---

Common Block LENINT

Specification

COMMON /LENINT/NBITS


Description

Length in bits of an integer (system dependent)

Declared by

ADDCON to use all members
BITSET to use all members
INITIL to use all members
LOCBIT to use all members
LOGAND to use all members
LOGOR to use all members
MINIM to use all members
NPACK to use all members
RGAUSS to use all members
STPLOT to use all members

Common Block LINKAG

Specification

COMMON /LINKAG/NUMFV,NUMPAK,KKFV(200),KTYPFV(200),KSTFV(200),
&KTIME(200),KUNPFV(5,30),NTIME,NUMCON,KKCON(500),AMCON(500),
&KPTCON(201),KSTCON(200),KTPCON(200)


Description

All information for fixing, varying and constraining parameters in LSQ

Declared by

ADDCON to use NUMCON KKCON AMCON KPTCON KSTCON KTPCON
FIXVAR to use NUMFV NUMPAK KKFV KTYPFV KSTFV KTIME KUNPFV NTIME
LSETSF to use NUMFV NUMPAK NUMCON KPTCON
LSETUP to use NUMFV NUMPAK NUMCON KPTCON
RDFV to use NUMCON KKCON KPTCON
SYMFIX to use NUMFV KKFV KSTFV
VARMAK to use NUMFV KKFV KSTFV KTIME NUMCON KKCON AMCON KPTCON KSTCON

Symbolic parameters used

AL+1 set to 201 dimensioning KPTCON
ALLC set to 200 dimensioning KSTCON KTPCON
CONC set to 500 dimensioning KKCON AMCON
FVPK set to 30 dimensioning KUNPFV
FXVA set to 200 dimensioning KKFV KTYPFV KSTFV KTIME

Common Block LOONEY

Specification

COMMON /LOONEY/IOTAB(15),LUNTAB(15)


Description

CCSL input output units
IOTAB marks which are available
LUNTAB gives the unit number associated with each allocated unit

Declared by

CLOFIL to use all members
FILNOM to use LUNTAB
INITIL to use all members
LISPEC to use
NOPFIL to use all members
OPNFIL to use all members

Symbolic parameters used

FILE set to 15 dimensioning IOTAB LUNTAB

Common Block LREAD

Specification

COMMON /LREAD/ILREA(22,1),KOM18
DIMENSION ILREAD(22)
EQUIVALENCE (ILREAD(1),ILREA(1,1))


Description

ILREAD Indicates which L cards have been read

Declared by

INPLSF to use
LLSCAL to use
STLSSF to use

Symbolic parameters used

LCRD set to 22 dimensioning ILREA ILREAD
SORC set to 1 dimensioning ILREA

Common Block LSETDA

Specification

COMMON /LSETDA/MFAM,MGEN,MSPC,LASTST


Description

Maximum number of Families, Genuses and Species in the problem

Common Block LSQPAK

Specification

COMMON /LSQPAK/KKPACK(10,3)


Description

Packing specification for least squares parameters

Declared by

KPAK to use all members
KUNPAK to use all members
LSETSF to use all members
LSETUP to use all members
PUNPAK to use all members

---

---

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