From 498e0fe49ddd63bd52cab2ec6f32cb98520bcbc3 Mon Sep 17 00:00:00 2001 From: "denise.worthen" Date: Fri, 27 Oct 2023 09:19:19 -0400 Subject: [PATCH] add 5deg as destination grid --- src/ocnicepost.fd/init_mod.F90 | 1 + 1 file changed, 1 insertion(+) diff --git a/src/ocnicepost.fd/init_mod.F90 b/src/ocnicepost.fd/init_mod.F90 index 39631f59..11484ea8 100644 --- a/src/ocnicepost.fd/init_mod.F90 +++ b/src/ocnicepost.fd/init_mod.F90 @@ -106,6 +106,7 @@ subroutine readnml if (nxr == 1440 .and. nyr == 721) fdst = '0p25' ! 1/4deg rectilinear if (nxr == 720 .and. nyr == 361) fdst = '0p5' ! 1/2 deg rectilinear if (nxr == 360 .and. nyr == 181) fdst = '1p0' ! 1 deg rectilinear + if (nxr == 72 .and. nyr == 36) fdst = '5p0' ! 5 deg rectilinear if (len_trim(fdst) == 0) then write(logunit,'(a)')'destination grid dimensions unknown' stop