CCPP SciDoc v7.0.x  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches

◆ progomega_calc()

subroutine, public progomega::progomega_calc ( logical, intent(in)  first_time_step,
logical, intent(in)  flag_restart,
integer, intent(in)  im,
integer, intent(in)  km,
integer, dimension(im), intent(in)  kbcon1,
integer, dimension(im), intent(in)  ktcon,
real(kind=kind_phys), dimension(im,km), intent(in)  omegain,
real(kind=kind_phys), intent(in)  delt,
real(kind=kind_phys), dimension(im,km), intent(in)  del,
real(kind=kind_phys), dimension(im,km), intent(in)  zi,
logical, dimension(im), intent(in)  cnvflg,
real(kind=kind_phys), dimension(im,km), intent(inout)  omegaout,
real(kind=kind_phys), intent(in)  grav,
real(kind=kind_phys), dimension(im,km), intent(in)  buo,
real(kind=kind_phys), dimension(im,km), intent(in)  drag,
real(kind=kind_phys), dimension(im,km), intent(in)  wush,
real(kind=kind_phys), dimension(im,km), intent(in)  tentr,
real(kind=kind_phys), intent(in)  bb1,
real(kind=kind_phys), intent(in)  bb2 
)

progomega_calc General Algorithm

  • Expand the steady state solution of updraft velocity from Han et al.'s (2017) [80] equation 7 to include the time-derivative, and an aerodynamic drag term from Gueremy 2016. Solve using implicit time-stepping scheme, solving the quadratic equation for omega.

Definition at line 22 of file progomega_calc.f90.

Referenced by samfdeepcnv::samfdeepcnv_run(), and samfshalcnv::samfshalcnv_run().

Here is the caller graph for this function: