allocate_1d_c_sp Subroutine

private subroutine allocate_1d_c_sp(array, shape_spec, source, order)

Allocate array according to shape_spec. Possibly assign array from source.

Note

this does not fully replace Fortran RESHAPE intrinsic since source and target array must have same rank.

Arguments

Type IntentOptional Attributes Name
complex(kind=real_4), intent(out), DIMENSION(:), ALLOCATABLE :: array

target array.

integer, intent(in), optional, DIMENSION(1) :: shape_spec

shape of array to be allocated. If shape is not specified, it is derived from source.

complex(kind=real_4), intent(in), optional, DIMENSION(:) :: source

source array to be copied to target array, must have same rank as target array.

integer, intent(in), optional, DIMENSION(1) :: order

in which order to copy source to array (same convention as RESHAPE intrinsic).