Skip to content

Commit

Permalink
bug fix
Browse files Browse the repository at this point in the history
  • Loading branch information
mzhangw committed Nov 19, 2019
1 parent 8805acd commit 98c58ad
Showing 1 changed file with 0 additions and 1 deletion.
1 change: 0 additions & 1 deletion model/fv_mapz.F90
Original file line number Diff line number Diff line change
Expand Up @@ -3473,7 +3473,6 @@ subroutine moist_cv(is,ie, isd,ied, jsd,jed, km, j, k, nwat, sphum, liq_wat, rai
#else
cvm(i) = (1.-(qv(i)+qd(i)))*cv_air + qv(i)*cv_vap + qd(i)*c_liq
#endif
#else
#else
qv(i) = q(i,j,k,sphum)
ql(i) = q(i,j,k,liq_wat) + q(i,j,k,rainwat)
Expand Down

0 comments on commit 98c58ad

Please sign in to comment.