c.....................common-mml-lattice.f .................

      common/lattice/alat(0:NELMAX1,13),alength,NELMAX 
      common/nameelement/nameele(0:NELMAX1),labelele(0:NELMAX1) 
      common/linopt/aopt(0:NELMAX1,20),ap0, gtr
      common/actualtunes/qx_actual,qy_actual 
      COMMON/BEAMPIPE/AAPIPE,BBPIPE
      common/quadfigfgh/fgh,fgh1,fac1,fac2
      common/tengw/AW1(4,4),AW2(4,4),AWC1(4,4),AWC2(4,4),
     +             RTENG(4,4), RITENG(4,4)
      COMMON/CAVITYDATA/VOLT,FREQUENCY,PHASEINI,PHASE,
     +XCAVI,XCAVF, HARMONIC

      common/bpm_c/nbpm

 
Mon Jul 17 08:57:53 CEST 2017