---

Common Block WAVCHR

Specification

COMMON /WAVCHR/IFUN(10,5)
CHARACTER*4 IFUN


Description

IFUN names of wave-functions

Declared by

MOLORB to use

Common Block WAVEFN

Specification

COMMON /WAVEFN/NQUANT(70,5,5),IREST(70,5,5),AMP(70,5),PAMP(10,5),
&NEL(5),IX(5),NFUN(10,5),NEIG(5)
COMPLEX AMP,PAMP


Description

Data for molecular orbital wave-functions

Declared by

MOLORB to use AMP NFUN NEIG

Common Block WHEN

Specification

COMMON /WHEN/DATIM,MAIN
CHARACTER *24 DATIM
CHARACTER *6 MAIN


Description

Job specific information
DATIM date and time at which run
MAIN name of program

Declared by

ARPRIN to use DATIM
INITIL to use all members
NOPFIL to use MAIN
PSFILE to use MAIN
POSOUT to use all members
SORGAM to use DATIM

Common Block WDSPC

Specification

COMMON /WDSPC/IWDNUM,IWDSPC(60)


Description

Specifications for IWDNUM CCSL parameter names

Declared by

LSETSF to use IWDNUM
LSETUP to use all members
PRIWRD to use all members
TBLFND to use all members
VOCAB to use all members

Symbolic parameters used

WORD set to 60 dimensioning IWDSPC

Common Block WORDS

Specification

COMMON /WORDS/LSQWD(60)
CHARACTER *4 LSQWD


Description

IWDNUM CCSL parameter names

Declared by

LSETSF to use
LSETUP to use all members
PRIWRD to use all members
TBLFND to use all members
VOCAB to use all members

Symbolic parameters used

WORD set to 60 dimensioning LSQWD

---

---

P. Jane Brown e-mail: brown@ill.fr
Institut Laue Langevin,
Grenoble, FRANCE