Fixed stratosphere warm bias and code optimization for MERRA2 (NOAA-E…

…MC#674) * optimized the code and decrease the stratosphere warm bias for mraerosol=T --------- Co-authored-by: anning.cheng <anning.cheng@noaa.gov>
DusanJovic-NOAA · Jul 24, 2023 · b32981f · b32981f
1 parent e7dc085
commit b32981f
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/ccpp/data/CCPP_typedefs.F90 b/ccpp/data/CCPP_typedefs.F90
@@ -929,6 +929,8 @@ subroutine gfs_interstitial_setup_tracers(Interstitial, Model)
     if (Model%imp_physics == Model%imp_physics_thompson) then
       if (Model%ltaerosol) then
         Interstitial%nvdiff = 12
+     else if (Model%mraerosol) then
+        Interstitial%nvdiff = 10
       else
         Interstitial%nvdiff = 9
       endif
@@ -1018,6 +1020,8 @@ subroutine gfs_interstitial_setup_tracers(Interstitial, Model)
       elseif (Model%imp_physics == Model%imp_physics_thompson) then
         if (Model%ltaerosol) then
           Interstitial%nvdiff = 12
+        else if (Model%mraerosol) then
+          Interstitial%nvdiff = 10
         else
           Interstitial%nvdiff = 9
         endif

diff --git a/ccpp/physics b/ccpp/physics
+1 −6		physics/GFS_rrtmgp_cloud_mp.F90
+12 −8		physics/module_mp_thompson.F90
+11 −9		physics/mp_thompson.F90