anchor.diff:      fPosition = "asis"
     end select
   
  +  ! Check that we don't have a fixed vs. assigned unit crash
  +  if(allocated(units_uList(unit)%file)) then
  +    if(units_uList(unit)%file /= file) then
  +      write(lerr,"(a,i0,a)") "UNITS> ERROR Unit ",unit," has already been assigned to file '"//trim(units_uList(unit)%file)//"'"
  +      call prror
  +    end if
  +  end if
  +
     call f_getUnit(trim(file),chkUnit)
     if(chkUnit > 0) then
       ! We already have that file name in the record
  
positive.code: 
    use crcoall
  
    implicit none
  
    integer,                    intent(in)  :: unit
    character(len=*),           intent(in)  :: file
    logical,                    intent(in)  :: formatted
  
negative.code: ! ================================================================================================ !
  !  FILE UNITS MODULE
  ! ===================
  !  V.K. Berglyd Olsen, BE-ABP-HSS
  !  Created: 2018-12-13
  !  Updated: 2019-05-02
  !
  !  Module for keeping track of opened file units, their file names, and open the files correctly
  !  depending on build flags like BOINC or FIO.
  !
  !  Note: The maximum number of allowed open units is 256. To ensure we cannot run out of units, the
  !  module sets the last assigned unit number to 250. The log file is at 251. this leaves 4 units for
  !  debug use in the code, if absolutely necessary.
  ! ================================================================================================ !
  module mod_units
  
  