assert_shape Interface

public interface assert_shape

Module Procedures

private subroutine i_assert_shape_N1(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in),		dimension(:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine i_assert_shape_N2(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in),		dimension(:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine i_assert_shape_N3(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in),		dimension(:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine i_assert_shape_N4(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in),		dimension(:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine i_assert_shape_N5(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in),		dimension(:,:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine i_assert_shape_N6(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in),		dimension(:,:,:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine i_assert_shape_N7(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in),		dimension(:,:,:,:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine d_assert_shape_N1(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=8),	intent(in),		dimension(:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine d_assert_shape_N2(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=8),	intent(in),		dimension(:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine d_assert_shape_N3(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=8),	intent(in),		dimension(:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine d_assert_shape_N4(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=8),	intent(in),		dimension(:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine d_assert_shape_N5(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=8),	intent(in),		dimension(:,:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine d_assert_shape_N6(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=8),	intent(in),		dimension(:,:,:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine d_assert_shape_N7(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=8),	intent(in),		dimension(:,:,:,:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine z_assert_shape_N1(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=8),	intent(in),		dimension(:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine z_assert_shape_N2(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=8),	intent(in),		dimension(:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine z_assert_shape_N3(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=8),	intent(in),		dimension(:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine z_assert_shape_N4(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=8),	intent(in),		dimension(:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine z_assert_shape_N5(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=8),	intent(in),		dimension(:,:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine z_assert_shape_N6(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=8),	intent(in),		dimension(:,:,:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname

private subroutine z_assert_shape_N7(A, Ndim, routine, matname)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=8),	intent(in),		dimension(:,:,:,:,:,:,:)	::	A
integer,	intent(in),		dimension(:)	::	Ndim
character(len=*),		optional		::	routine
character(len=*),		optional		::	matname