double precision Lattice_Eref, Lattice_Tref
      double precision Lattice_Circumference 
      double precision Lattice_NuX0, Lattice_TauX
      double precision Lattice_Eta
      double precision Lattice_Js, Lattice_dermsNatural
      double precision Lattice_Urad_B, Lattice_Urad_ID
      double precision Lattice_Urad
      logical Lattice_LRadiationExcitation_ON
      logical Lattice_LRadiationDamping_ON
      logical Lattice_TRadiationExcitation_ON
      logical Lattice_TRadiationDamping_ON
      integer Lattice_NSuperPeriod, Lattice_NperSuperPeriod
      common / Lattice_Data_COM / Lattice_Eref, Lattice_Tref
     &                      , Lattice_Circumference
     &                      , Lattice_NuX0, Lattice_TauX
     &                      , Lattice_Eta
     &                      , Lattice_Js, Lattice_dermsNatural
     &                      , Lattice_Urad_B, Lattice_Urad_ID
     &                      , Lattice_Urad
     &                      , Lattice_LRadiationExcitation_ON
     &                      , Lattice_LRadiationDamping_ON
     &                      , Lattice_TRadiationExcitation_ON
     &                      , Lattice_TRadiationDamping_ON
     &                      , Lattice_NSuperPeriod
     &                      , Lattice_NperSuperPeriod
      double precision Eref, Tref
      double precision Circumference 
      double precision NuX0, TauX
      double precision Eta
      double precision Js, dermsNatural 
      double precision Urad_B, Urad_ID
      double precision Urad
      integer NSuperPeriod, NperSuperPeriod