Skip to content

Commit

Permalink
Fixes after the atmos_phys merge
Browse files Browse the repository at this point in the history
  • Loading branch information
cacraigucar committed Aug 5, 2024
1 parent a6b5db5 commit 1e78173
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 4 deletions.
3 changes: 1 addition & 2 deletions src/physics/cam/convect_shallow.F90
Original file line number Diff line number Diff line change
Expand Up @@ -899,8 +899,7 @@ subroutine convect_shallow_tend( ztodt , cmfmc , &
landfracdum(:ncol), &
ptend_loc%s(:ncol,:), tend_s_snwprd(:ncol,:), tend_s_snwevmlt(:ncol,:), ptend_loc%q(:ncol,:pver,1), &
rprdsh(:ncol,:), cld(:ncol,:), ztodt, &
precc(:ncol), snow(:ncol), ntprprd(:ncol,:), ntsnprd(:ncol,:), flxprec(:ncol,:), flxsnow(:ncol,:), &
fsnow_conv(:ncol,:) )
precc(:ncol), snow(:ncol), ntprprd(:ncol,:), ntsnprd(:ncol,:), fsnow_conv(:ncol,:), flxprec(:ncol,:), flxsnow(:ncol,:))

! ---------------------------------------------- !
! record history variables from zm_conv_evap_run !
Expand Down
3 changes: 1 addition & 2 deletions src/physics/cam/zm_conv_intr.F90
Original file line number Diff line number Diff line change
Expand Up @@ -684,8 +684,7 @@ subroutine zm_conv_tend(pblh ,mcon ,cme , &
landfrac(:ncol), &
ptend_loc%s(:ncol,:), tend_s_snwprd(:ncol,:), tend_s_snwevmlt(:ncol,:), ptend_loc%q(:ncol,:pver,1), &
rprd(:ncol,:), cld(:ncol,:), ztodt, &
prec(:ncol), snow(:ncol), ntprprd(:ncol,:), ntsnprd(:ncol,:), flxprec(:ncol,:), flxsnow(:ncol,:),&
fsnow_conv(:ncol,:) )
prec(:ncol), snow(:ncol), ntprprd(:ncol,:), ntsnprd(:ncol,:), fsnow_conv(:ncol,:), flxprec(:ncol,:), flxsnow(:ncol,:))

evapcdp(:ncol,:pver) = ptend_loc%q(:ncol,:pver,1)

Expand Down

0 comments on commit 1e78173

Please sign in to comment.