create_block_nodata_r_sp Subroutine

private subroutine create_block_nodata_r_sp(block, sizes)

Create and allocate block, but no data.

Arguments

TypeIntentOptionalAttributesName
type(block_nd_r_sp), intent(out) :: block
integer, intent(in), DIMENSION(:):: sizes

Contents

None