anchor.diff:      if(nSplit > 6)  call chr_cast(lnSplit(7), jaw_ssf(2),  iErr)
   
     case(9)
  +    if(nSplit /= 4) then
  +      write(lout,"(a,i0)") "COLL> ERROR Expected 4 values on line 9, got ",nSplit
  +      iErr = .true.
  +      return
  +    end if
       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 /= 9) then
  +      write(lout,"(a,i0)") "COLL> ERROR Expected 9 values on line 10, got ",nSplit
  +      iErr = .true.
  +      return
  +    end if
       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)
  
positive.code:   select case(iLine)
  
    case(1)
  
      if(nSplit /= 1) then
        write(lout,"(a,i0)") "COLL> ERROR Expected 1 value on line 1, got ",nSplit
        iErr = .true.
        return
      end if
  
      if(nSplit > 0) call chr_cast(lnSplit(1),do_coll,iErr)
  
    case(2)
  
      if(nSplit > 0) call chr_cast(lnSplit(1),nloop,iErr)
      if(nSplit > 1) call chr_cast(lnSplit(2),myenom,iErr)
  
  
negative.code:     call cdb_addFamily("tcryo",nSigIn(23),famID,fErr)
  
    case(6)
      if(nSplit /= 5) then
        write(lout,"(a,i0)") "COLL> ERROR Expected 5 values on line 6, got ",nSplit
        iErr = .true.
        return
      end if
      if(nSplit > 0)  call chr_cast(lnSplit(1), n_slices,   iErr)
      if(nSplit > 1)  call chr_cast(lnSplit(2), smin_slices,iErr)
      if(nSplit > 2)  call chr_cast(lnSplit(3), smax_slices,iErr)
  