Functions/Subroutines | |
subroutine, public | micro_mg_init (kind, gravit, rair, rh2o, cpair, eps, tmelt_in, latvap, latice, rhmini_in, micro_mg_dcs, ts_auto, mg_qcvar, microp_uniform_in, do_cldice_in, use_hetfrz_classnuc_in, micro_mg_precip_frac_method_in, micro_mg_berg_eff_factor_in, allow_sed_supersat_in, do_sb_physics_in, do_ice_gmao_in, do_liq_liu_in, nccons_in, nicons_in, ncnst_in, ninst_in) |
This subroutine calculates. | |
subroutine, public | micro_mg_tend (mgncol, nlev, deltatin, t, q, qcn, qin, ncn, nin, qrn, qsn, nrn, nsn, relvar, accre_enhan_i, p, pdel, cldn, liqcldf, icecldf, qsatfac, qcsinksum_rate1ord, naai, npccnin, rndst, nacon, tlat, qvlat, qctend, qitend, nctend, nitend, qrtend, qstend, nrtend, nstend, effc, effc_fn, effi, sadice, sadsnow, prect, preci, nevapr, evapsnow, am_evp_st, prain, prodsnow, cmeout, deffi, pgamrad, lamcrad, qsout, dsout, lflx, iflx, rflx, sflx, qrout, reff_rain, reff_snow, qcsevap, qisevap, qvres, cmeitot, vtrmc, vtrmi, umr, ums, qcsedten, qisedten, qrsedten, qssedten, pratot, prctot, mnuccctot, mnuccttot, msacwitot, psacwstot, bergstot, bergtot, melttot, homotot, qcrestot, prcitot, praitot, qirestot, mnuccrtot, pracstot, meltsdttot, frzrdttot, mnuccdtot, nrout, nsout, refl, arefl, areflz, frefl, csrfl, acsrfl, fcsrfl, rercld, ncai, ncal, qrout2, qsout2, nrout2, nsout2, drout2, dsout2, freqs, freqr, nfice, qcrat, prer_evap, xlat, xlon, lprnt, iccn, nlball) |
This subroutine is the main microphysics routine to be called each time step. | |
subroutine | calc_rercld (lamr, n0r, lamc, pgam, qric, qcic, ncic, rercld, mgncol, nlev) |
This subroutine. | |
Variables | |
logical | nccons |
logical | nicons |
real(r8) | ncnst |
real(r8) | ninst |
real(r8), parameter | csmin = -30._r8 |
real(r8), parameter | csmax = 26._r8 |
real(r8), parameter | mindbz = -99._r8 |
real(r8), parameter | minrefl = 1.26e-10_r8 |
real(r8) | dcs |
real(r8) | ts_au |
real(r8) | ts_au_min |
real(r8), public | qcvar |
real(r8), parameter | mi0l_min = 4._r8/3._r8*pi*rhow*(4.e-6_r8)**3 |
real(r8), parameter | zero =0.0_r8 |
real(r8), parameter | one =1.0_r8 |
real(r8), parameter | two =2.0_r8 |
real(r8), parameter | three =3.0_r8 |
real(r8), parameter | four =4.0_r8 |
real(r8), parameter | five =5.0_r8 |
real(r8), parameter | six =6._r8 |
real(r8), parameter | half =0.5_r8 |
real(r8), parameter | ten =10.0_r8 |
real(r8), parameter | forty =40.0_r8 |
real(r8), parameter | oneo6 =one/six |
real(r8) | g |
real(r8) | r |
real(r8) | rv |
real(r8) | cpp |
real(r8) | tmelt |
real(r8) | xxlv |
real(r8) | xlf |
real(r8) | xxls |
real(r8) | rhmini |
logical | microp_uniform |
logical | do_cldice |
logical | use_hetfrz_classnuc |
real(r8) | rhosu |
real(r8) | icenuct |
real(r8) | snowmelt |
real(r8) | rainfrze |
real(r8) | gamma_br_plus1 |
real(r8) | gamma_bs_plus1 |
real(r8) | gamma_bi_plus1 |
real(r8) | gamma_bj_plus1 |
real(r8) | gamma_br_plus4 |
real(r8) | gamma_bs_plus4 |
real(r8) | gamma_bi_plus4 |
real(r8) | gamma_bj_plus4 |
real(r8) | xxlv_squared |
real(r8) | xxls_squared |
real(r8) | omeps |
real(r8) | epsqs |
character(len=16) | micro_mg_precip_frac_method |
real(r8) | micro_mg_berg_eff_factor |
logical | allow_sed_supersat |
logical | do_sb_physics |
logical | do_ice_gmao |
logical | do_liq_liu |