anchor.diff:    integer,          save :: kanf       = 0    ! Structure index where the GO keyword is issued
   
     ! TRACK Block Variables
  +  real(kind=fPrec), save :: amp0       = zero ! End amplitude
     integer,          save :: numl       = 0    ! Number of turns in the forward direction
     integer,          save :: numlr      = 0    ! Number of turns in the backward direction
     integer,          save :: napx       = 0    ! Number of amplitude variations
  -  real(kind=fPrec), save :: amp0       = zero ! End amplitude
     integer,          save :: ird        = 0    ! Ignored
     integer,          save :: imc        = 0    ! Variations of relative momentum deviation
     integer,          save :: niu(2)     = 0    ! Unknown
  
positive.code: 
  ! ================================================================================================ !
  !  THAT BIG COMMON VARIABLES MODULE
  !  Last modified: 2018-06-13
  ! ================================================================================================ !
  module mod_common
  
  
negative.code:   call alloc(bezr,    mNameLen, 3, nele_new,       str_nmSpace, "bezr")
    call alloc(kpa,                  nele_new,       0,           "kpa")
    call alloc(bez,     mNameLen,    nele_new,       str_nmSpace, "bez")
    call alloc(bezl,    mNameLen,    nele_new,       str_nmSpace, "bezl")
    call alloc(ncororb,              nele_new,       0,           "ncororb")
    call alloc(ratioe,               nele_new,       one,         "ratioe")
  