anchor.diff:    use mod_alloc
     use strings
     use string_tools
  +  use mod_settings
   
     implicit none
   
  
positive.code: 
    ! Temporary Variables
    type(scatter_proStore), allocatable :: tmpPro(:)
    character(len=:), allocatable :: proName
    real(kind=fPrec), allocatable :: fParams(:)
    integer proType
    integer i, ii, tmpIdx
  
  
negative.code: 
      ! Request space to store the arguments
      tmpIdx = scatter_nfData + 1
      scatter_GENERATOR(scatter_nGen,3) = tmpIdx ! Parameters
      scatter_GENERATOR(scatter_nGen,4) = 0      ! CrossSection
      scatter_nfData = scatter_nfData + nSplit - 3
      call alloc(scatter_fData, scatter_nfData, zero, "scatter_fData")
  
  