anchor.diff:      end subroutine
   
   
  -    ! count the number of variables specified, then allocate and store those variables in a list just their size.
  +    !>------------------------------------------------------------
  +    !! Setup the vars_to_read and var_dimensions arrays given a master set of variables
  +    !!
  +    !! Count the number of variables specified, then allocate and store those variables in a list just their size.
  +    !! The master list will have all variables, but not all will be set
  +    !!------------------------------------------------------------
       subroutine setup_variable_lists(master_var_list, master_dim_list, vars_to_read, var_dimensions)
           implicit none
           character(len=kMAX_NAME_LENGTH), intent(in)                 :: master_var_list(:)
  
positive.code:     end subroutine
  
  
      subroutine distribute_2d_array(arr, source, first, last)
          implicit none
          real, allocatable, intent(inout) :: arr(:,:)
  
negative.code:     end subroutine
  
  
      !>------------------------------------------------------------
      !! Update the curstep and curfile (increments curstep and curfile if necessary)
      !!
      !!------------------------------------------------------------
      subroutine update_forcing_step(bc, file_list, time_var)
          implicit none
          type(boundary_t),   intent(inout) :: bc
  