diff --git a/horiz_interp/include/horiz_interp_conserve_xgrid.h b/horiz_interp/include/horiz_interp_conserve_xgrid.h index 214ff1265..471172335 100644 --- a/horiz_interp/include/horiz_interp_conserve_xgrid.h +++ b/horiz_interp/include/horiz_interp_conserve_xgrid.h @@ -27,8 +27,6 @@ #define MASK_THRESH (0.5) #define MAX_V 8 -/* this value is small compare to earth area */ - int create_xgrid_1dx2d_order1(const int *nlon_in, const int *nlat_in, const int *nlon_out, const int *nlat_out, const double *lon_in, const double *lat_in, const double *lon_out, const double *lat_out, const double *mask_in, int *i_in, int *j_in, int *i_out, diff --git a/test_fms/exchange/test_xgrid.F90 b/test_fms/exchange/test_xgrid.F90 index 048124328..e28cab347 100644 --- a/test_fms/exchange/test_xgrid.F90 +++ b/test_fms/exchange/test_xgrid.F90 @@ -42,7 +42,7 @@ program xgrid_test use mosaic2_mod, only : get_mosaic_ntiles, get_mosaic_grid_sizes use mosaic2_mod, only : get_mosaic_ncontacts, get_mosaic_contact, get_mosaic_tile_grid use grid2_mod, only : get_grid_comp_area - use gradient_mod, only : calc_cubic_grid_info + use gradient_mod, only : calc_cubic_grid_info use ensemble_manager_mod, only : ensemble_manager_init, ensemble_pelist_setup use ensemble_manager_mod, only : get_ensemble_size use platform_mod, only: r8_kind, i8_kind