anchor.diff:      if(nSplit > 3)  call chr_cast(lnSplit(4), amp(1), iErr) ! End amplitude
       if(nSplit > 4)  call chr_cast(lnSplit(5), amp0,   iErr) ! Start amplitude
       if(nSplit > 5)  call chr_cast(lnSplit(6), ird,    iErr) ! Ignored
  -    if(nSplit > 6)  call chr_cast(lnSplit(7), iDummy, iErr) ! Number of variations of the relative momentum deviation dp/p
  +    if(nSplit > 6)  call chr_cast(lnSplit(7), imc,    iErr) ! Number of variations of the relative momentum deviation dp/p
       if(nSplit > 7)  call chr_cast(lnSplit(8), niu(1), iErr) ! Unknown
       if(nSplit > 8)  call chr_cast(lnSplit(9), niu(2), iErr) ! Unknown
       if(nSplit > 9)  call chr_cast(lnSplit(10),numlcp, iErr) ! CR: How often to write checkpointing files
       if(nSplit > 10) call chr_cast(lnSplit(11),numlmax,iErr) ! CR: Maximum amount of turns; default is 1e6
   
  -    if(iDummy > 1) then
  +    if(imc /= 1) then
         write(lerr,"(a)") "TRAC> ERROR Variations of the relative momentum deviation is no longer supporter. "//&
           "The value imc must be set to 1."
         iErr = .true.
  
positive.code:       iErr = .true.
        return
      end if
  
      if(nSplit > 0)  call chr_cast(lnSplit(1), numl,   iErr) ! Number of turns in the forward direction
      if(nSplit > 1)  call chr_cast(lnSplit(2), numlr,  iErr) ! Number of turns in the backward direction
  
negative.code: 
    character(len=:), allocatable   :: lnSplit(:)
    character(len=:), allocatable   :: expLine
    integer nSplit, imc, ibidu
    logical spErr
  
    call chr_split(inLine, lnSplit, nSplit, spErr)
  