anchor.diff:      if(nSplit > 8)  call chr_cast(lnSplit(9), dowrite_amplitude,iErr)
   
     case(11)
  +    if(nSplit /= 4) then
  +      write(lout,"(a,i0)") "COLL> ERROR Expected 4 values on line 11, got ",nSplit
  +      iErr = .true.
  +      return
  +    end if
       if(nSplit > 0)  call chr_cast(lnSplit(1), xbeat,     iErr)
       if(nSplit > 1)  call chr_cast(lnSplit(2), xbeatphase,iErr)
       if(nSplit > 2)  call chr_cast(lnSplit(3), ybeat,     iErr)
       if(nSplit > 3)  call chr_cast(lnSplit(4), ybeatphase,iErr)
   
     case(12)
  +    if(nSplit /= 11) then
  +      write(lout,"(a,i0)") "COLL> ERROR Expected 11 values on line 12, got ",nSplit
  +      iErr = .true.
  +      return
  +    end if
       if(nSplit > 0)  call chr_cast(lnSplit(1), c_rmstilt_prim,   iErr)
       if(nSplit > 1)  call chr_cast(lnSplit(2), c_rmstilt_sec,    iErr)
       if(nSplit > 2)  call chr_cast(lnSplit(3), c_systilt_prim,   iErr)
  
positive.code:     if(nSplit > 6)  call chr_cast(lnSplit(7), jaw_ssf(2),  iErr)
  
    case(9)
      if(nSplit > 0)  call chr_cast(lnSplit(1), emitnx0_dist,   iErr)
      if(nSplit > 1)  call chr_cast(lnSplit(2), emitny0_dist,   iErr)
      if(nSplit > 2)  call chr_cast(lnSplit(3), emitnx0_collgap,iErr)
      if(nSplit > 3)  call chr_cast(lnSplit(4), emitny0_collgap,iErr)
  
    case(10)
      if(nSplit > 0)  call chr_cast(lnSplit(1), do_select,        iErr)
      if(nSplit > 1)  call chr_cast(lnSplit(2), do_nominal,       iErr)
      if(nSplit > 2)  call chr_cast(lnSplit(3), rnd_seed,         iErr)
  
negative.code:     call cdb_addFamily("tdi",    nSigIn(13),famID,fErr)
  
    case(5)
      if(nSplit /= 10) then
        write(lout,"(a,i0)") "COLL> ERROR Expected 10 values on line 5, got ",nSplit
        iErr = .true.
        return
      end if
      if(nSplit > 0)  call chr_cast(lnSplit(1), nSigIn(14),iErr)
      if(nSplit > 1)  call chr_cast(lnSplit(2), nSigIn(15),iErr)
      if(nSplit > 2)  call chr_cast(lnSplit(3), nSigIn(16),iErr)
  