m_Permuter Module

Interfaces

public interface permute

private subroutine permutei_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permuteio_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		dimension(:)	::	aout
integer,	intent(in),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permutei1_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permuteio1_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		dimension(:,:)	::	aout
integer,	intent(in),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permuter_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(inout),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permutero_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(inout),		dimension(:)	::	aout
real(kind=SP),	intent(in),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permuter1_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(inout),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permutero1_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(inout),		dimension(:,:)	::	aout
real(kind=SP),	intent(in),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permuted_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=DP),	intent(inout),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permutedo_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=DP),	intent(inout),		dimension(:)	::	aout
real(kind=DP),	intent(in),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permuted1_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=DP),	intent(inout),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permutedo1_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=DP),	intent(inout),		dimension(:,:)	::	aout
real(kind=DP),	intent(in),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permutel_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permutelo_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout),		dimension(:)	::	aout
logical,	intent(in),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permutel1_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine permutelo1_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout),		dimension(:,:)	::	aout
logical,	intent(in),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

public interface unpermute

private subroutine unpermutei_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermuteio_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		dimension(:)	::	aout
integer,	intent(in),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermutei1_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermuteio1_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		dimension(:,:)	::	aout
integer,	intent(in),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermuter_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(inout),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermutero_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(inout),		dimension(:)	::	aout
real(kind=SP),	intent(in),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermuter1_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(inout),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermutero1_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(inout),		dimension(:,:)	::	aout
real(kind=SP),	intent(in),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermuted_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=DP),	intent(inout),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermutedo_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=DP),	intent(inout),		dimension(:)	::	aout
real(kind=DP),	intent(in),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermuted1_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=DP),	intent(inout),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermutedo1_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=DP),	intent(inout),		dimension(:,:)	::	aout
real(kind=DP),	intent(in),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermutel_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermutelo_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout),		dimension(:)	::	aout
logical,	intent(in),		dimension(:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermutel1_(ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n

private subroutine unpermutelo1_(aout, ary, indx, n)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(inout),		dimension(:,:)	::	aout
logical,	intent(in),		dimension(:,:)	::	ary
integer,	intent(in),		dimension(:)	::	indx
integer,	intent(in)			::	n