pointer_rank_remap2 Interface

public interface pointer_rank_remap2

Contents


Module Procedures

private subroutine pointer_s_rank_remap2(r2p, d1, d2, r1p)

Sets a rank-2 pointer to rank-1 data using Fortran 2003 pointer rank remapping.

Arguments

TypeIntentOptionalAttributesName
real(kind=real_4), DIMENSION(:, :), POINTER:: r2p
integer, intent(in) :: d1
integer, intent(in) :: d2
real(kind=real_4), DIMENSION(:), POINTER:: r1p

private subroutine pointer_d_rank_remap2(r2p, d1, d2, r1p)

Sets a rank-2 pointer to rank-1 data using Fortran 2003 pointer rank remapping.

Arguments

TypeIntentOptionalAttributesName
real(kind=real_8), DIMENSION(:, :), POINTER:: r2p
integer, intent(in) :: d1
integer, intent(in) :: d2
real(kind=real_8), DIMENSION(:), POINTER:: r1p

private subroutine pointer_c_rank_remap2(r2p, d1, d2, r1p)

Sets a rank-2 pointer to rank-1 data using Fortran 2003 pointer rank remapping.

Arguments

TypeIntentOptionalAttributesName
complex(kind=real_4), DIMENSION(:, :), POINTER:: r2p
integer, intent(in) :: d1
integer, intent(in) :: d2
complex(kind=real_4), DIMENSION(:), POINTER:: r1p

private subroutine pointer_z_rank_remap2(r2p, d1, d2, r1p)

Sets a rank-2 pointer to rank-1 data using Fortran 2003 pointer rank remapping.

Arguments

TypeIntentOptionalAttributesName
complex(kind=real_8), DIMENSION(:, :), POINTER:: r2p
integer, intent(in) :: d1
integer, intent(in) :: d2
complex(kind=real_8), DIMENSION(:), POINTER:: r1p

private subroutine pointer_l_rank_remap2(r2p, d1, d2, r1p)

Sets a rank-2 pointer to rank-1 data using Fortran 2003 pointer rank remapping.

Arguments

TypeIntentOptionalAttributesName
integer(kind=int_8), DIMENSION(:, :), POINTER:: r2p
integer, intent(in) :: d1
integer, intent(in) :: d2
integer(kind=int_8), DIMENSION(:), POINTER:: r1p

private subroutine pointer_i_rank_remap2(r2p, d1, d2, r1p)

Sets a rank-2 pointer to rank-1 data using Fortran 2003 pointer rank remapping.

Arguments

TypeIntentOptionalAttributesName
integer(kind=int_4), DIMENSION(:, :), POINTER:: r2p
integer, intent(in) :: d1
integer, intent(in) :: d2
integer(kind=int_4), DIMENSION(:), POINTER:: r1p