Skip to content

Commit

Permalink
remove comment and previous tests
Browse files Browse the repository at this point in the history
  • Loading branch information
RuiyuSun committed Feb 2, 2024
1 parent 23ef3b4 commit 26ac3dd
Showing 1 changed file with 0 additions and 4 deletions.
4 changes: 0 additions & 4 deletions physics/MP/GFDL_2022_v3/module_gfdl_cld_mp.F90
Original file line number Diff line number Diff line change
Expand Up @@ -4459,10 +4459,6 @@ subroutine pidep_pisub (ks, ke, dts, qv, ql, qr, qi, qs, qg, tz, dp, cvm, te8, d
tmp = dq / (1. + tcpk (k) * dqdt)

if (qi (k) .gt. qcmin) then

!rsun added for ice number associated with prog_ccn
cin (k) = 5.38e7 * exp (0.75 * log (qi (k) * den (k)))

if (.not. prog_ccn) then
if (inflag .eq. 1) &
cin (k) = 5.38e7 * exp (0.75 * log (qi (k) * den (k)))
Expand Down

0 comments on commit 26ac3dd

Please sign in to comment.