symsetupexcits3_worker Subroutine

public subroutine symsetupexcits3_worker(NI, NEL, G1, NBASIS, STORE, SPIin, ETin, NAPin, OPin, TCOUNT, ICOUNT, CLASSES, ILUT, SYMPRODS, ILEVEL, iMinElec1, iMaxElec1)

Arguments

Type IntentOptional Attributes Name
integer :: NI(NEL)
integer :: NEL
type(BasisFN) :: G1(nBasis)
integer :: NBASIS
integer :: STORE(6)
integer, target :: SPIin(1:2,1:3,1:*)
integer, target :: ETin(1:5,*)
integer, target :: NAPin(1:3,*)
integer, target :: OPin(1:2,*)
logical :: TCOUNT
integer :: ICOUNT
type(SymClass) :: CLASSES(*)
integer :: ILUT(0:nBasis/32)
type(Symmetry) :: SYMPRODS(0:NEL*NEL)
integer :: ILEVEL
integer :: iMinElec1
integer :: iMaxElec1

Contents