Skip to content

Commit

Permalink
create mr2_innl and fixed evaporation for mraerosol
Browse files Browse the repository at this point in the history
  • Loading branch information
AnningCheng-NOAA committed Mar 29, 2024
1 parent 9b0ac7b commit 5e3f87a
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion physics/MP/Thompson/module_mp_thompson.F90
Original file line number Diff line number Diff line change
Expand Up @@ -3587,7 +3587,7 @@ subroutine mp_thompson (qv1d, qc1d, qi1d, qr1d, qs1d, qg1d, ni1d, &

!+---+-----------------------------------------------------------------+ ! EVAPORATION
elseif (clap .lt. -eps .AND. ssatw(k).lt.-1.E-6 .AND. &
(is_aerosol_aware .or. merra2_aerosol_aware)) then
(is_aerosol_aware)) then
tempc = temp(k) - 273.15
otemp = 1./temp(k)
rvs = rho(k)*qvs(k)
Expand Down

0 comments on commit 5e3f87a

Please sign in to comment.