subroutine, public cldmacro::macro_cloud | ( | integer, intent(in) | irun, |
integer, intent(in) | lm, | ||
real, intent(in) | dt, | ||
real, intent(in) | alf_fac, | ||
real, dimension(irun, lm), intent(in) | pp_dev, | ||
real, dimension(irun,0:lm), intent(in) | ppe_dev, | ||
real, dimension(irun, lm), intent(in) | qlwdtr_dev, | ||
real, dimension(irun, lm), intent(inout) | th_dev, | ||
real, dimension(irun, lm), intent(inout) | q_dev, | ||
real, dimension(irun, lm), intent(inout) | qlw_ls_dev, | ||
real, dimension(irun, lm), intent(inout) | qlw_an_dev, | ||
real, dimension(irun, lm), intent(inout) | qiw_ls_dev, | ||
real, dimension(irun, lm), intent(inout) | qiw_an_dev, | ||
real, dimension(irun, lm), intent(inout) | anvfrc_dev, | ||
real, dimension(irun, lm), intent(inout) | cldfrc_dev, | ||
real, dimension(58 ), intent(in) | physparams, | ||
real, intent(in) | sclmfdfr, | ||
real, dimension(irun, lm), intent(out) | alpht_dev, | ||
real, dimension(irun, lm), intent(inout) | cnv_fice_dev, | ||
real, dimension(irun, lm), intent(inout) | cnv_ndrop_dev, | ||
real, dimension(irun, lm), intent(inout) | cnv_nice_dev, | ||
real, dimension(irun, lm), intent(inout) | scice_dev, | ||
real, dimension(irun, lm), intent(inout) | ncpl_dev, | ||
real, dimension(irun, lm), intent(inout) | ncpi_dev, | ||
real, dimension(irun, lm), intent(out) | pfrz_dev, | ||
logical | lprnt, | ||
integer | ipr, | ||
real, dimension(irun, lm), intent(in) | rhc, | ||
integer, intent(in) | pdfflag, | ||
real, dimension(2), intent(in) | qc_min ) |
Definition at line 112 of file cldmacro.F.
References fix_up_clouds_2m(), and pfreezing().
Referenced by m_micro::m_micro_run().