lMat_indexing Module

Uses

Contents

Variables

strideInner strideOuter

Functions

lMatIndSym oldLMatInd lMatIndSymBroken lMatIndSpin

Variables

Type	Visibility	Attributes		Name		Initial
integer,	public		::	strideInner
integer,	public		::	strideOuter

Functions

public pure function lMatIndSym(a, b, c, i, j, k) result(index)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in),		value	::	a
integer(kind=int64),	intent(in),		value	::	b
integer(kind=int64),	intent(in),		value	::	c
integer(kind=int64),	intent(in),		value	::	i
integer(kind=int64),	intent(in),		value	::	j
integer(kind=int64),	intent(in),		value	::	k

Return Value integer(kind=int64)

public pure function oldLMatInd(aI, bI, cI, iI, jI, kI) result(index)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in),		value	::	aI
integer(kind=int64),	intent(in),		value	::	bI
integer(kind=int64),	intent(in),		value	::	cI
integer(kind=int64),	intent(in),		value	::	iI
integer(kind=int64),	intent(in),		value	::	jI
integer(kind=int64),	intent(in),		value	::	kI

Return Value integer(kind=int64)

public pure function lMatIndSymBroken(a, b, c, i, j, k) result(index)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in),		value	::	a
integer(kind=int64),	intent(in),		value	::	b
integer(kind=int64),	intent(in),		value	::	c
integer(kind=int64),	intent(in),		value	::	i
integer(kind=int64),	intent(in),		value	::	j
integer(kind=int64),	intent(in),		value	::	k

Return Value integer(kind=int64)

public pure function lMatIndSpin(i, j, k, a, b, c) result(index)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in),		value	::	i
integer(kind=int64),	intent(in),		value	::	j
integer(kind=int64),	intent(in),		value	::	k
integer(kind=int64),	intent(in),		value	::	a
integer(kind=int64),	intent(in),		value	::	b
integer(kind=int64),	intent(in),		value	::	c

Return Value integer(kind=int64)