init_coul_mod Module



Contents


Functions

private elemental function ZIO(K)

Arguments

Type IntentOptional 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 IntentOptional 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 IntentOptional 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 IntentOptional Attributes Name
integer :: KMAX
integer :: NMAX
complex(kind=dp) :: ZIA(-KMAX/2:KMAX/2,NMAX,NMAX)