
C     INCLUDE 'Zotra.inc'
  
C     COTRA in TRACOR main
      COMMON /COTRA/ MULS(48,48), INDX(3,3), IDIMF, TT(3,48),
     *               EFST(48), FHST(48), PHST(48), CELLN(6), MAXHKL(3),
     *  EMIN, EO2AV, SCX, BOVX, DAMPX, SMM, IOMAPS, SMAX,
     *  IRR(3,3,48), IORG, BBB, D2R, R2D

C end of 'Zotra.inc'
 