anchor.diff:  
       end subroutine write_logging_death
   
  +! --- Generic helper functions ---
  +
       function get_log_filename(in_name) result(out_name)
   
           ! Helper function to generate filenames to use for a generic log file.
  
positive.code: 
      end subroutine prep_logging_mc_cycle
  
      subroutine write_iter_to_log(iter, iunit)
  
          ! Writes iteration number to given io unit for logging.
  
          ! In:
          !   iter: iteration number.
          !   iunit: io unit.
  
          integer :: iter, iunit
  
          write(iunit, '("#",1X,20("="))')
          write(iunit, '("#",1X,"Iteration",1X,i10)') iter
          write(iunit, '("#",1X,20("="))')
  
      end subroutine write_iter_to_log
  
      subroutine end_logging(logging_info)
  
          ! Closes all active log files within fortran.
  
negative.code:         call write_logging_death_preamble(logging_info)
  
      end subroutine init_logging_death
  
  ! --- Log-specific functions to write log preambles and headers ---
  
      subroutine write_logging_calc_header(logging_info)
          ! Write header and preamble for calculation log file.
  