Skip to content

Commit 30c03dc

Browse files
authored
NSSL-mp bug fix for (obsolete) droplet nucleation (#2195)
TYPE: bug fix KEYWORDS: NSSL microphysics scheme SOURCE: Ted Mansell (NOAA/NSSL) (@MicroTed ) DESCRIPTION OF CHANGES: Problem: Other updates resulted in the old droplet nucleation scheme (irenuc=2) producing too few cloud droplets. This option is no longer the default, but ought to work the same as it did before in case anybody wanted to use it. Solution: Restored use of background value for this particular option. LIST OF MODIFIED FILES: phys/module_mp_nssl_2mom.F TESTS CONDUCTED: The Jenkins tests are all passing.
1 parent 3f2465b commit 30c03dc

File tree

1 file changed

+5
-1
lines changed

1 file changed

+5
-1
lines changed

phys/module_mp_nssl_2mom.F

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -10334,7 +10334,11 @@ SUBROUTINE NUCOND &
1033410334
DO mgs = 1,ngscnt
1033510335
! default value of renucfrac is 0.0
1033610336
IF ( irenuc /= 6 ) THEN
10337-
cnuc(mgs) = ccnc(mgs)*(1. - renucfrac) + ccnc(mgs)*renucfrac
10337+
IF ( irenuc == 2 ) THEN
10338+
cnuc(mgs) = Max(ccnc(mgs),cwnccn(mgs))*(1. - renucfrac) + ccnc(mgs)*renucfrac
10339+
ELSE
10340+
cnuc(mgs) = ccnc(mgs)*(1. - renucfrac) + ccnc(mgs)*renucfrac
10341+
ENDIF
1033810342
ELSE
1033910343
cnuc(mgs) = ccnc(mgs)*(1. - renucfrac) + Max(0.0,ccnc(mgs) - ccna(mgs))*renucfrac
1034010344
ENDIF

0 commit comments

Comments
 (0)