Skip to content
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.

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

add three parameters to input.nml for NSSL MP #45

Merged
merged 4 commits into from
Mar 15, 2023
Merged
Show file tree
Hide file tree
Changes from 3 commits
Commits
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
1 change: 1 addition & 0 deletions physics/module_mp_nssl_2mom.F90
Original file line number Diff line number Diff line change
Expand Up @@ -1228,6 +1228,7 @@ SUBROUTINE nssl_2mom_init( &
rho_qh = nssl_params(8)
rho_qhl = nssl_params(9)
rho_qs = nssl_params(10)
alphar = nssl_params(14)

! ipelec = Nint(nssl_params(11))
! isaund = Nint(nssl_params(12))
Expand Down
5 changes: 4 additions & 1 deletion physics/mp_nssl.F90
Original file line number Diff line number Diff line change
Expand Up @@ -31,6 +31,7 @@ subroutine mp_nssl_init(ncol, nlev, errflg, errmsg, threads, restart, &
con_t0c, con_cliq, con_csol, con_eps, &
imp_physics, imp_physics_nssl, &
nssl_cccn, nssl_alphah, nssl_alphahl, &
nssl_alphar, nssl_ehw0_in, nssl_ehlw0_in, &
nssl_ccn_on, nssl_hail_on, nssl_invertccn )


Expand All @@ -52,6 +53,7 @@ subroutine mp_nssl_init(ncol, nlev, errflg, errmsg, threads, restart, &
integer, intent(in) :: imp_physics
integer, intent(in) :: imp_physics_nssl
real(kind_phys), intent(in) :: nssl_cccn, nssl_alphah, nssl_alphahl
real(kind_phys), intent(in) :: nssl_alphar, nssl_ehw0_in, nssl_ehlw0_in
logical, intent(in) :: nssl_ccn_on, nssl_hail_on, nssl_invertccn

! Local variables: dimensions used in nssl_init
Expand Down Expand Up @@ -115,6 +117,7 @@ subroutine mp_nssl_init(ncol, nlev, errflg, errmsg, threads, restart, &
nssl_params(11) = 0 ! nssl_ipelec_tmp
nssl_params(12) = 11 ! nssl_isaund
nssl_params(13) = 0 ! 1= turn on cccna; 0 = turn off
nssl_params(14) = nssl_alphar

nssl_qccn = nssl_cccn/1.225
! if (mpirank==mpiroot) then
Expand All @@ -129,7 +132,7 @@ subroutine mp_nssl_init(ncol, nlev, errflg, errmsg, threads, restart, &

! write(0,*) 'call nssl_2mom_init'
CALL nssl_2mom_init(ims,ime, jms,jme, kms,kme,nssl_params,ipctmp=5,mixphase=0, &
ihvol=ihailv,errmsg=errmsg,errflg=errflg,myrank=mpirank,mpiroot=mpiroot)
ihvol=ihailv,nssl_ehw0=nssl_ehw0_in,nssl_ehlw0=nssl_ehlw0_in,errmsg=errmsg,errflg=errflg,myrank=mpirank,mpiroot=mpiroot)

! For restart runs, the init is done here
if (restart) then
Expand Down
24 changes: 24 additions & 0 deletions physics/mp_nssl.meta
Original file line number Diff line number Diff line change
Expand Up @@ -165,6 +165,30 @@
type = real
kind = kind_phys
intent = in
[nssl_alphar]
standard_name = nssl_alpha_rain
long_name = rain PSD shape parameter in NSSL micro
grantfirl marked this conversation as resolved.
Show resolved Hide resolved
units = none
dimensions = ()
type = real
kind = kind_phys
intent = in
[nssl_ehw0_in]
standard_name = nssl_graupel_collection_efficiency
long_name = graupel droplet collection efficiency in NSSL micro
units = none
dimensions = ()
type = real
kind = kind_phys
intent = in
[nssl_ehlw0_in]
standard_name = nssl_hail_collection_efficiency
long_name = hail droplet collection efficiency in NSSL micro
units = none
dimensions = ()
type = real
kind = kind_phys
intent = in
[nssl_ccn_on]
standard_name = nssl_ccn_on
long_name = CCN activation flag in NSSL micro
Expand Down