fcoul_mod Module

Contents

Subroutines

SLATCOULFOU VCOULFOU

Subroutines

public subroutine SLATCOULFOU(G1, G2, G1P, G2P, N, CK, NMAX, ZIA, OUT)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	G1(3)
integer				::	G2(3)
integer				::	G1P(3)
integer				::	G2P(3)
integer				::	N
complex(kind=dp)				::	CK(-N/2:N/2-1,-N/2:N/2-1,-N/2:N/2-1)
integer				::	NMAX
complex(kind=dp)				::	ZIA(-N/2:N/2,NMAX,NMAX)
real(kind=dp)				::	OUT

private subroutine VCOULFOU(N, G1, G2, G1P, G2P, SUM, CK, NMAX, ZIA)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	N
integer				::	G1(3)
integer				::	G2(3)
integer				::	G1P(3)
integer				::	G2P(3)
real(kind=dp)				::	SUM
complex(kind=dp)				::	CK(-N/2:N/2-1,-N/2:N/2-1,-N/2:N/2-1)
integer				::	NMAX
complex(kind=dp)				::	ZIA(-N/2:N/2,NMAX,NMAX)