anchor.diff:    ! Check that the profile name is unique
     do i=1,scatter_nPro-1
       if(scatter_proList(i)%proName == lnSplit(2)) then
  -      write(lout,"(a)") "SCATTER> ERROR Profile name '"//lnSplit(2)//"' is not unique."
  +      write(lout,"(a)") "SCATTER> ERROR Profile name '"//trim(lnSplit(2))//"' is not unique."
         iErr = .true.
         return
       end if
  
positive.code: 
  ! =================================================================================================
  !  K. Sjobak, V.K. Berglyd Olsen, BE-ABP-HSS
  !  Last modified: 2018-04-26
  !  Called from CRPOINT; write checkpoint data to fort.95/96
  ! =================================================================================================
  subroutine scatter_crpoint(fileUnit, writeErr, iError)
  
negative.code: end subroutine scatter_generator_getEvent
  
  ! =================================================================================================
  !  H. Burkhardt, K. Sjobak, V.K. Berglyd Olsen, BE-ABP-HSS
  !  Last modified: 2017-11-02
  !  Converted from C++ code from:
  !  "Elastic pp scattering estimates and simulation relevant for burn-off"
  !  https://indico.cern.ch/event/625576/
  ! =================================================================================================
  