Skip to content

cloud cover changes related to Thompson MP and added namelist options… #778

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Closed
RuiyuSun wants to merge 9 commits into from
Closed

cloud cover changes related to Thompson MP and added namelist options… #778

Show file tree
Hide file tree
Changes from 8 commits
Commits
Show all changes
9 commits
Select commit Hold shift + click to select a range
1b03ef9
cloud cover changes related to Thompson MP and added namelist options…
RuiyuSun Nov 11, 2021
17489fd
remove semi-Lagrangian sedimentation of graupel, which is included in…
RuiyuSun Nov 17, 2021
3646159
hardcode new values for d0s and d0g and remove their namelist options
RuiyuSun Nov 19, 2021
6040a04
changes in response to reviewer comments
RuiyuSun Nov 22, 2021
e11d3e8
correct indentation and remove cloud cover change to a separate PR
RuiyuSun Nov 23, 2021
1784101
remove crt_sati namelist
RuiyuSun Nov 23, 2021
39cc6a6
remove trailing whitespace
RuiyuSun Nov 23, 2021
4f7e026
remove trailing whitespace and restor GFS_rrtmg_pre.F90
RuiyuSun Nov 23, 2021
2e9b652
revert the changes made
RuiyuSun Nov 23, 2021
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
10 changes: 5 additions & 5 deletions physics/module_mp_thompson.F90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -149,7 +149,7 @@ MODULE module_mp_thompson
REAL, PARAMETER, PRIVATE:: fv_s = 100.0
REAL, PARAMETER, PRIVATE:: av_g = 442.0
REAL, PARAMETER, PRIVATE:: bv_g = 0.89
REAL, PARAMETER, PRIVATE:: av_i = 1847.5
REAL, PARAMETER, PRIVATE:: av_i = 1493.9
REAL, PARAMETER, PRIVATE:: bv_i = 1.0
REAL, PARAMETER, PRIVATE:: av_c = 0.316946E8
REAL, PARAMETER, PRIVATE:: bv_c = 2.0
Expand Down Expand Up @@ -214,8 +214,8 @@ MODULE module_mp_thompson
REAL, PARAMETER, PRIVATE:: xm0i = 1.E-12
REAL, PARAMETER, PRIVATE:: D0c = 1.E-6
REAL, PARAMETER, PRIVATE:: D0r = 50.E-6
REAL, PARAMETER, PRIVATE:: D0s = 200.E-6
REAL, PARAMETER, PRIVATE:: D0g = 250.E-6
REAL, PARAMETER, PRIVATE:: D0s = 300.E-6
REAL, PARAMETER, PRIVATE:: D0g = 350.E-6
REAL, PRIVATE:: D0i, xm0s, xm0g

!..Min and max radiative effective radius of cloud water, cloud ice, and snow;
Expand Down Expand Up @@ -1908,12 +1908,12 @@ subroutine mp_thompson (qv1d, qc1d, qi1d, qr1d, qs1d, qg1d, ni1d, &

DOUBLE PRECISION, PARAMETER:: zeroD0 = 0.0d0
REAL, PARAMETER :: decfl = 8.0
REAL :: dtcfl,rainsfc
REAL :: dtcfl, rainsfc
INTEGER :: niter

REAL, DIMENSION(kts:kte):: temp, pres, qv
REAL, DIMENSION(kts:kte):: rc, ri, rr, rs, rg, ni, nr, nc, nwfa, nifa
REAL, DIMENSION(kts:kte):: rr_tmp,nr_tmp
REAL, DIMENSION(kts:kte):: rr_tmp, nr_tmp
REAL, DIMENSION(kts:kte):: rho, rhof, rhof2
REAL, DIMENSION(kts:kte):: qvs, qvsi, delQvs
REAL, DIMENSION(kts:kte):: satw, sati, ssatw, ssati
Expand Down
6 changes: 4 additions & 2 deletions physics/mp_thompson.F90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -116,7 +116,8 @@ subroutine mp_thompson_init(ncol, nlev, con_g, con_rd, con_eps, &
end if

! Call Thompson init
call thompson_init(is_aerosol_aware_in=is_aerosol_aware, mpicomm=mpicomm, &
call thompson_init(is_aerosol_aware_in=is_aerosol_aware, &

@gthompsnWRF gthompsnWRF Nov 23, 2021

Copy link
Copy Markdown
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Ruiyu - I think you need to revert back these changes. They involve whitespace only and should not be a part of this PR as Dom suggested - unless I am mistaken on something.

mpicomm=mpicomm, &
mpirank=mpirank, mpiroot=mpiroot, threads=threads, &
errmsg=errmsg, errflg=errflg)
if (errflg /= 0) return
Expand Down Expand Up @@ -303,7 +304,8 @@ subroutine mp_thompson_run(ncol, nlev, con_g, con_rd, &
nwfa2d, nifa2d, &
tgrs, prsl, phii, omega, &
sedi_semi, sedi_semi_update, &
sedi_semi_decfl, dtp, dt_inner, &
sedi_semi_decfl, &
dtp, dt_inner, &
first_time_step, istep, nsteps, &
prcp, rain, graupel, ice, snow, sr, &
refl_10cm, reset_dBZ, do_radar_ref, &
Expand Down