From 08b564acb08f56713aa12064c2b7b8ca6f3490f8 Mon Sep 17 00:00:00 2001 From: mlee03 Date: Tue, 10 Dec 2024 09:29:10 -0500 Subject: [PATCH] fix starting lat in test --- test_fms/horiz_interp/test_create_xgrid_order2.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/test_fms/horiz_interp/test_create_xgrid_order2.F90 b/test_fms/horiz_interp/test_create_xgrid_order2.F90 index 68b4e9faf..5a3252c30 100644 --- a/test_fms/horiz_interp/test_create_xgrid_order2.F90 +++ b/test_fms/horiz_interp/test_create_xgrid_order2.F90 @@ -72,7 +72,7 @@ subroutine get_grid(nlon, nlat, lon, lat) integer :: ilon, ilat, igridpt real :: dlat=0.0_lkind, dlon=0.0_lkind - real :: lon_start=0.0_lkind, lat_start=-90.0_lkind + real :: lon_start=0.0_lkind, lat_start=-90.0_lkind*DEG_TO_RAD dlat = 180._lkind/real(nlat, HI_TEST_KIND_) * DEG_TO_RAD dlon = 360._lkind/real(nlon, HI_TEST_KIND_) * DEG_TO_RAD