read_array Interface

public interface read_array

Module Procedures

private subroutine data_readA1_R(pname, Y1)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
real(kind=8),			dimension(:)	::	Y1

private subroutine data_readA1_C(pname, Y1)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
complex(kind=8),			dimension(:)	::	Y1

private subroutine data_readA2_R(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
real(kind=8),			dimension(:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace

private subroutine data_readA2_C(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
complex(kind=8),			dimension(:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace

private subroutine data_readA3_R(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
real(kind=8),			dimension(:,:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace

private subroutine data_readA3_C(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
complex(kind=8),			dimension(:,:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace

private subroutine data_readA4_R(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
real(kind=8),			dimension(:,:,:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace

private subroutine data_readA4_C(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
complex(kind=8),			dimension(:,:,:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace

private subroutine data_readA5_R(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
real(kind=8),			dimension(:,:,:,:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace

private subroutine data_readA5_C(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
complex(kind=8),			dimension(:,:,:,:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace

private subroutine data_readA6_R(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
real(kind=8),			dimension(:,:,:,:,:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace

private subroutine data_readA6_C(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
complex(kind=8),			dimension(:,:,:,:,:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace

private subroutine data_readA7_R(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
real(kind=8),			dimension(:,:,:,:,:,:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace

private subroutine data_readA7_C(pname, Y1, order, wspace)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	pname
complex(kind=8),			dimension(:,:,:,:,:,:,:)	::	Y1
character(len=*),		optional		::	order
logical,		optional		::	wspace