Contents Prev Manual

Common Block NEWOLD

Specification

COMMON /NEWOLD/SHIFT,XOLD,XNEW,ESD,IFAM,IGEN,ISPC,NEWIN,KPACK,LKH,
&SHESD,ISHFT,AVSHFT,AMAXSH

Description

Shift information for one parameter after a least squares cycle
SHIFT shift, XOLD old value, XNEW new value ESD standard deviation
IFAM, IGEN, ISPC, family,genus and species of parameter
NEWIN fortran unit number of "new" crystal data file
KPACK packed parameter specification
LKH fortran unit number for hkl output
SHESD ratio SHIFT/ESD
ISHFT number of shifts dealt with so far in this cycle
AVSHFT the sum of their SHIFT/ESD so far
AMAXSH the maximum SHIFT/ESD so far

Declared by

ADJUST to use SHIFT XOLD XNEW IGEN ISPC KPACK
APSHDS to use SHIFT XOLD XNEW ESD IGEN ISPC KPACK SHESD
APSHFW to use SHIFT XOLD XNEW ESD KPACK
APSHSF to use SHIFT XOLD XNEW ESD IGEN ISPC KPACK SHESD
APSHT2 to use SHIFT XOLD XNEW ESD IGEN ISPC KPACK SHESD
BATCH to use NEWIN
CELNEW to use NEWIN
DOMAG to use XNEW IGEN ISPC NEWIN
DOMAG1 to use
DOMAG2 to use XNEW IGEN ISPC NEWIN
DOMPL2 to use SHIFT XOLD XNEW ESD IGEN ISPC NEWIN SHESD
DOTWN1 to use
DOTWN2 to use IGEN ISPC NEWIN
EXTINC to use NEWIN
F2NEW to use NEWIN
F2SHFT to use SHIFT ESD IGEN ISPC
FETSHF to use SHESD ISHFT AVSHFT AMAXSH
GEOMCO to use NEWIN
INITIL to use NEWIN LKH
JMPOL to use NEWIN
LLSCAL to use ISPC NEWIN
LLTFAC to use IGEN ISPC NEWIN
NEWCD to use NEWIN
NWINDS to use NEWIN
NWINFW to use NEWIN
NWINSF to use NEWIN
NWINT2 to use NEWIN
OTPUTI to use NEWIN
PARSSF to use IGEN ISPC
PRMBLK to use SHIFT XOLD XNEW ESD IGEN ISPC SHESD
RDFV to use IGEN ISPC
SHFESD to use SHIFT ESD
VARSSF to use IGEN ISPC KPACK
CHILSQ to use AMAXSH
MAGLSQ to use AMAXSH
MMPLSQ to use AMAXSH
DOTHER to use
MPLSQ to use AMAXSH
PALSQ to use AMAXSH
SFLSQ to use AMAXSH
SFTLSQ to use AMAXSH

Common Block NSYM

Specification

COMMON /NSYM/NOP,NCENT,NOPC,NLAT,NGEN,CENTRC,KOM13
LOGICAL CENTRC

Description

NOP number of symmetry operators
NCENT 1 if there is a centre of symmetry, 0 otherwise
NOPC 2 if there is a centre of symmetry, 1 otherwis
NLAT Number of non-primitive lattice translations
NGEN number of generating elements in the group
CENTRC true if centro-symmetric

Declared by

ADDELM to use NOPC
ASUNIT to use NOPC
ATMPLO to use NLAT
ATMPLT to use
ATOGEN to use NCENT NOPC NLAT
ATOMS to use NCENT NOPC NLAT
ATOPOS to use NOP NOPC NLAT CENTRC
BNDLST to use NCENT NOPC NLAT
DOCHI1 to use NOPC
DOMAG to use NOPC
DOMAG1 to use NOPC
DOMAG2 to use NOPC
ERRMAP to use NOP NOPC
FACGRP to use NOPC
FCALC to use NOPC CENTRC
FCHALC to use NOPC CENTRC
FMCALC to use NOPC CENTRC
FMMPCA to use NOPC CENTRC
FMPCAL to use NOPC CENTRC
FOUR1D to use NOPC
FOUR1Z to use NOPC
FOURGP to use NOPC
GENELM to use NOP NOPC NGEN
GENGRP to use NOPC
ISPABS to use NCENT NOPC
KSTARS to use NOPC
LATABS to use NLAT
LFCALC to use NOPC CENTRC
LMCALC to use NOPC CENTRC
LMMPCA to use NOPC CENTRC
LMPCAL to use NOPC CENTRC
MAGCON to use NOPC CENTRC
MAGSYM to use NOPC CENTRC
MAKGRP to use NOPC
MPCON to use NOPC
MUCALC to use NOPC
OPMSYM to use NOPC CENTRC
OPSYM to use NOPC NLAT CENTRC
POLUNI to use NOP NOPC
PROPAG to use NOPC
PROPER to use NOPC
PSICON to use NOP NOPC
RDATOM to use NOPC NLAT CENTRC
ROTOSM to use NOPC
SATFND to use NOPC
SATGEN to use NOP NOPC
SUBSYM to use NOP NCENT NOPC NGEN CENTRC
SYMBAK to use NOP NCENT NOPC CENTRC
SYMCEN to use NOP NCENT NOPC CENTRC
SYMEQU to use NOP
SYMFRI to use CENTRC
SYMGEN to use NOP NOPC NGEN CENTRC
SYMOP to use NOP NLAT
SYMREF to use NOP NCENT NOPC
SYMTID to use NOP NOPC NGEN CENTRC
SYMUNI to use NOP NOPC CENTRC
TRYUNI to use NOPC
UNUSYM to use NOPC
USYM to use NOPC
XROOT to use NCENT NOPC NLAT
ADDFC to use CENTRC
ARRINC to use NOPC
ARRNGE to use NOPC
LCHALC to use NOPC CENTRC
GENREF to use NOP
GETMSF to use NOPC
GETSFZ to use NOPC
INCMSF to use NOPC
MAG3D to use NCENT NOPC NLAT
MG3DGL to use NCENT NOPC NLAT
MPLSQ to use CENTRC
MVENTR to use NCENT NOPC NLAT
PALSQ to use CENTRC
SFLSQ to use CENTRC
SFTLSQ to use CENTRC

Common Block NTITL

Specification

COMMON /NTITL/NTITLE,KOM14

Description

NTITLE Number of character i the title

Declared by

INPUTN to use NTITLE
MAPTIT to use NTITLE
STPLOT to use NTITLE
MAG3D to use NTITLE
POSOUT to use NTITLE


Contents Manual

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