ADDRESS4 INTEGER +I1NG(60), +I2NG(60)
COMPATAB CHARACTER*8 +BOND(60), +GUT(60)
COMPATAB CHARACTER*8 +SPIN(240)
COMPATAB INTEGER +NO
CONFIG INTEGER +NORB
CONSFP REAL*8 ONE, PRECIS
CONSFP REAL*8 TEN, THREE
CONSFP REAL*8 TWO, ZERO
DEBUG INTEGER +IDBG(1000)
DEBUG INTEGER INCRMU, INCRNI
DEBUG INTEGER +IPRINT(1000)
DIMES INTEGER MAXMU, MAXNI
DIMES INTEGER MAXORB
DIMES REAL*8 HOMOLEVL
EXTPOT INTEGER +IFEFIELD
EXTPOT REAL*8 FFIELD, +ZCUTOFF
GRIDI INTEGER NGRIDS, +NMU(10)
GRIDI INTEGER +NNI
HYDINI REAL*8 +CO1(60), +CO2(60)
HYDINI REAL*8 +EZA1(60), +EZA2(60)
INPUTD1 CHARACTER*10 +FORMFP, FORMFP128
INPUTD1 CHARACTER*10 FORMFP64
INPUTD1 CHARACTER*80 HEADER
INPUTD1 INTEGER +IENTERM, +IFERMI
INPUTD1 INTEGER +IFIX(60), +IFORM
INPUTD1 INTEGER +IINTERP, +IMETHOD
INPUTD1 INTEGER +INCLORB, +INI
INPUTD1 INTEGER +INOTERM, +INOUT128
INPUTD1 INTEGER +INOUT32, +INOUT64
INPUTD1 INTEGER +IOUTFORM, +IPOT
INPUTD1 REAL*8 +Z1ATMASS, +Z2ATMASS
INPUTD2 REAL*8 +R, +R2
INPUTD2 REAL*8 +RGRID(10)
INPUTD2 REAL*8 +RINF, +Z1
INPUTD2 REAL*8 +Z2
INPUTD3 CHARACTER*4 +CDFTCORR(10)
INPUTD3 CHARACTER*4 +CDFTEX(10)
IOCHAN INTEGER IOUT6, LENGTHFP
IOCHAN INTEGER +LENGTHFPIN
IOCHAN INTEGER LENGTHINT
IOCHAN INTEGER +LENGTHINTIN
IORD_DATA INTEGER +IORD_MU_COUL
IORD_DATA INTEGER +IORD_MU_EXCH
IORD_DATA INTEGER +IORD_MU_ORB
IORD_DATA INTEGER +IORD_NU_COUL
IORD_DATA INTEGER +IORD_NU_EXCH
IORD_DATA INTEGER +IORD_NU_ORB
OEPOT INTEGER MPOT, +NSIMP
OEPOT REAL*8 +APOT, EPSPOT
OEPOT REAL*8 HOOK, OMPOT
OEPOT REAL*8 +V0POT
ORBITI CHARACTER*8 +ORBSYM(60)
ORBITI INTEGER +LOCK(60), +MGX(9,60)
ORBITR REAL*8 +OCC(60)
PERTAB REAL*8 ALPHAOPT(0:100)
PERTAB REAL*8 ATWEIGHT(0:100)
PERTAB REAL*8 BOHR2ANG
SCFI INTEGER +IBREAK, +IDFT
SCFI INTEGER +IDFTCORR, +IDFTEX
SCFI INTEGER +IHOMON, +ISCFORDER(60)
SCFI INTEGER +ISCMC, +ISLAT
SCFI INTEGER +MAXSCF, +NENLAST
SCFI INTEGER +NEXT, +NNOLAST
SCFI INTEGER +NOBCKUP, +NSCF2SKIP
SCFR INTEGER +ILAGRA, +NLMF(60,60)
SCFR REAL*8 +ALPHAF, +EXLCOUL
SCFR REAL*8 +EXLEXP, +EXLORB
SCFR REAL*8 +FACMUL, SFLAGRA
SCFR REAL*8 +SFLAGRAT(60,60)
SORI INTEGER +IALTSWEEPS
SORI INTEGER +IOMEGA, +IORDER(10)
SORI INTEGER +IPOISS, +IPRTLEV
SORI INTEGER +MAXSOR2, +MAXSOR3
SORI INTEGER +MAXSORORB(60)
SORI INTEGER +MAXSORPOT(60)
SORI INTEGER +MPOLE
SORR REAL*8 +OMEGASFORB
SORR REAL*8 +OMEGASFPOT
SORR REAL*8 +OVFCOUL(10)
SORR REAL*8 +OVFEXCH(10)
SORR REAL*8 +OVFORB(10)
|