anchor.diff:      if (nSplit>=4) then
         select case (chr_toLower(trim(lnSplit(4))))
         case('all')
  +        do tmpi1=1,nelens-1
  +          elens_emin(tmpi1) = -one
  +          elens_iSet(tmpi1) = tmpi2
  +          elens_sigdpp(tmpi1) = tmpflt
  +        end do
           elens_emin_def=-one
           elens_sigdpp_def=tmpflt
           elens_iSet_def=tmpi2
  -        do tmpi1=1,nelens-1
  -          elens_emin(tmpi1) = elens_emin_def
  -          elens_iSet(tmpi1) = elens_iSet_def
  -          elens_sigdpp(tmpi1) = elens_sigdpp_def
  -        end do
           if(st_debug) write(lout,"(a)") "ELENS> Applying read rms of delta distribution to all e-lenses"
         case('before')
           do tmpi1=1,nelens-1
  
positive.code:       call sixin_echoVal("rms of delta distribution []",tmpflt,"ELENS",iLine)
      end if
      
  !   case("SPEC")
  !     if(nSplit<3.or.nSplit>4) then
  !       write(lerr,"(a,i0)") "ELENS> ERROR Expected 2 or 3 input parameters for SPEC line, got ",nSplit-1
  !       write(lerr,"(a)")    "ELENS>       example:     SPEC  m  Q (ALL|BEF(ORE)|AFT(ER))"
  !       iErr = .true.
  !       return
  !     end if
  !    
  !     call chr_cast(lnSPlit(2), tmpl,iErr)
  !     if (nelens>0) elens_lFox(nelens)=tmpl
  ! 
  !     if (nSplit>=3) then
  !       select case (chr_toLower(trim(lnSplit(3))))
  !       case('all')
  !         elens_lFox_def=tmpl
  !         do tmpi1=1,nelens-1
  !           elens_lFox(tmpi1) = elens_lFox_def
  !         end do
  !         if(st_debug) write(lout,"(a)") "ELENS> Setting lFox as read to all e-lenses"
  !       case('bef','before')
  !         do tmpi1=1,nelens-1
  !           elens_lFox(tmpi1) = elens_lFox_def
  !         end do
  !         if(st_debug) write(lout,"(a)") "ELENS> Setting lFox as read to all e-lenses "// &
  !              "declared before the current FOX line"
  !       case('aft','after')
  !         elens_lFox_def=tmpl
  !         if(st_debug) write(lout,"(a)") "ELENS> Setting lFox as read to all e-lenses "// &
  !              "declared after the current FOX line"
  !       case default
  !         write(lerr,"(a)") "ELENS> ERROR Unidentified third parameter of FOX line, got: '"//trim(lnSplit(3))//"'"
  !         write(lerr,"(a)") "ELENS>       example:     FOX  on|off|true|false (ALL|BEF(ORE)|AFT(ER))"
  !         iErr = .true.
  !         return
  !       end select ! case (lnSplit(3))
  !     end if
  !     
  !     if(st_debug) then
  !       call sixin_echoVal("fox",tmpl,"ELENS",iLine)
  !     end if
       
    case default
      if(nSplit < 7) then
  
negative.code:     if (nSplit>=3) then
        select case (chr_toLower(trim(lnSplit(3))))
        case('all')
          do tmpi1=1,nelens-1
            elens_radial_mpoints(tmpi1) = tmpi2
          end do
          elens_radial_mpoints_def=tmpi2
          if(st_debug) write(lout,"(a)") "ELENS> Setting elens_radial_mpoints as read to all e-lenses"
        case('bef','before')
          do tmpi1=1,nelens-1
  