anchor.diff:    double precision, dimension(:,:),   allocatable :: base_wind_x
     double precision, dimension(:,:),   allocatable :: base_wind_y
     logical :: DumpWind
  -  character(30) :: wind_mag_time_series_file
  +  character(60) :: wind_mag_time_series_file
     double precision, dimension(:),     allocatable :: wind_mag_time_series
     ! Sponge regions
     double precision, dimension(:,:,:), allocatable :: spongeHTimeScale
  
positive.code: subroutine read_input_file_time_series(name, array, default, nTimeSteps)
    implicit none
  
    character(30), intent(in) :: name
    double precision, intent(out) :: array(nTimeSteps)
    double precision, intent(in) :: default
    integer, intent(in) :: nTimeSteps
  
negative.code: subroutine read_input_fileH_2D(name, array, default, nx, ny)
    implicit none
  
    character(60), intent(in) :: name
    double precision, intent(out) :: array(0:nx+1, 0:ny+1)
    double precision, intent(in) :: default
    integer, intent(in) :: nx, ny
  