init_coul_mod Module

Contents

Functions

ZIO

Subroutines

INITFOU GEN_CK_FFT GEN_ZIA

Functions

private elemental function ZIO(K)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	K

Return Value complex(kind=dp)

Subroutines

public subroutine INITFOU(NMESHX, CK, NMAX, A, TALPHA, ALPHA, OMEGA, ZIA)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	NMESHX
complex(kind=dp)				::	CK(NMESHX,NMESHX,NMESHX)
integer				::	NMAX
real(kind=dp)				::	A(3)
logical				::	TALPHA
real(kind=dp)				::	ALPHA
real(kind=dp)				::	OMEGA
complex(kind=dp)				::	ZIA(-NMESHX/2:NMESHX/2,NMAX,NMAX)

public subroutine GEN_CK_FFT(N, DIST, A, TALPHA, ALPHA, OMEGA)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	N
complex(kind=dp)				::	DIST(-N/2:N/2-1,-N/2:N/2-1,-N/2:N/2-1)
real(kind=dp)				::	A(3)
logical				::	TALPHA
real(kind=dp)				::	ALPHA
real(kind=dp)				::	OMEGA

public subroutine GEN_ZIA(KMAX, NMAX, ZIA)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	KMAX
integer				::	NMAX
complex(kind=dp)				::	ZIA(-KMAX/2:KMAX/2,NMAX,NMAX)