Skip to content
Merged
Show file tree
Hide file tree
Changes from 2 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
Comment thread
grantfirl marked this conversation as resolved.
Outdated
units = none
dimensions = ()
type = real
kind = kind_phys
intent = in
[nssl_ehw0_in]
standard_name = nssl_hw_collec_eff
Comment thread
grantfirl marked this conversation as resolved.
Outdated
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_hlw_collec_eff
Comment thread
grantfirl marked this conversation as resolved.
Outdated
long_name = graupel 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