anchor.diff:    logical, public, save :: scatter_writePLog   = .false.
   
     ! Scatter Parameters
  -  integer,          parameter :: scatter_nProc            = 9
  -  integer,          parameter :: scatter_idAbsorb         = 1
  -  integer,          parameter :: scatter_idNonDiff        = 2
  -  integer,          parameter :: scatter_idElastic        = 3
  -  integer,          parameter :: scatter_idSingleDiffXB   = 4
  -  integer,          parameter :: scatter_idSingleDiffAX   = 5
  -  integer,          parameter :: scatter_idDoubleDiff     = 6
  -  integer,          parameter :: scatter_idCentralDiff    = 7
  -  integer,          parameter :: scatter_idUnknown        = 8
  -  integer,          parameter :: scatter_idError          = 9
  -  character(len=8), parameter :: scatter_procNames(scatter_nProc) = (/  &
  -    "Absorbed","NonDiff ","Elastic ","SingD_XB","SingD_AX",             &
  -    "DoubD_XX","CentDiff","Unknown ","Error   "                         &
  +  integer,          parameter :: scatter_nProc          = 9
  +  integer,          parameter :: scatter_idAbsorb       = 1
  +  integer,          parameter :: scatter_idNonDiff      = 2
  +  integer,          parameter :: scatter_idElastic      = 3
  +  integer,          parameter :: scatter_idSingleDiffXB = 4
  +  integer,          parameter :: scatter_idSingleDiffAX = 5
  +  integer,          parameter :: scatter_idDoubleDiff   = 6
  +  integer,          parameter :: scatter_idCentralDiff  = 7
  +  integer,          parameter :: scatter_idUnknown      = 8
  +  integer,          parameter :: scatter_idError        = 9
  +  character(len=8), parameter :: scatter_procNames(scatter_nProc) = (/ &
  +    "Absorbed","NonDiff ","Elastic ","SingD_XB","SingD_AX",            &
  +    "DoubD_XX","CentDiff","Unknown ","Error   "                        &
     /)
   
     ! Generator Parameters
  
positive.code: ! =================================================================================================
  !  V.K. Berglyd Olsen, K. Sjobak, BE-ABP-HSS
  !  Created: 2017-08
  !  Updated: 2017-11-02
  ! =================================================================================================
  subroutine scatter_getDensity(idPro, xPos, yPos, sPos, xProj, yProj, rhoOut)
  
  
negative.code: ! ~~~~~~~~~~~~~~~~~~~~~~~~~
  !  V.K. Berglyd Olsen, K.N. Sjobak, H. Burkhardt, BE-ABP-HSS
  !  Created: 2017-08
  !  Updated: 2019-11-20
  !
  !  References
  ! ~~~~~~~~~~~~
  