From 268f5afdee7f19787fcfa5fadacab16fe26fc6bb Mon Sep 17 00:00:00 2001 From: Helen Kershaw Date: Tue, 29 Oct 2024 10:24:22 -0400 Subject: [PATCH] chore: removed unused routine query_vert_localization_coord https://github.com/NCAR/DART/issues/753#issuecomment-2444418331 removed done todo comment --- models/mpas_atm/model_mod.f90 | 11 ----------- 1 file changed, 11 deletions(-) diff --git a/models/mpas_atm/model_mod.f90 b/models/mpas_atm/model_mod.f90 index d402d0ca5..ba4671be5 100644 --- a/models/mpas_atm/model_mod.f90 +++ b/models/mpas_atm/model_mod.f90 @@ -1979,7 +1979,6 @@ subroutine verify_state_variables(ncid, filename, ngood, qty_list, variable_boun failure = .FALSE. ! this is for unsupported dimensions u_already_in_list = .FALSE. -!HK @todo varible bounds variable_bounds(:,:) = MISSING_R8 ngood = 0 @@ -4749,16 +4748,6 @@ subroutine compute_full_pressure(ens_size, theta, rho, qv, pressure, tk, istatus end subroutine compute_full_pressure -!-------------------------------------------------------------------- -!> pass the vertical localization coordinate to assim_tools_mod -function query_vert_localization_coord() - -integer :: query_vert_localization_coord - -query_vert_localization_coord = vert_localization_coord - -end function query_vert_localization_coord - !-------------------------------------------------------------------- !> read the time from the input file function read_model_time(filename)