VCOULFOU Subroutine

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

Arguments

Type IntentOptional 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)

Contents