Merge pull request NOAA-EMC#60 from hertneky/DTC_post

Change MXLVL back to 70 for COMMCODE in RQSTFLD.F
fossell · Feb 3, 2020 · 172bab0 · 172bab0
2 parents 3dd46e7 + f695537
commit 172bab0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/sorc/ncep_post.fd/RQSTFLD.F b/sorc/ncep_post.fd/RQSTFLD.F
@@ -27,7 +27,7 @@ module RQSTFLD_mod
 !     increase MXFLD each time you add a new field
       INTEGER, PARAMETER :: MXFLD=975
 #ifdef COMMCODE
-      INTEGER, PARAMETER :: MXLVL=500
+      INTEGER, PARAMETER :: MXLVL=70 
 #else
       INTEGER, PARAMETER :: MXLVL=500
 #endif