CAM
micro_mg2_0.F90 File Reference

Modules

module  micro_mg2_0
 

Functions/Subroutines

subroutine, public micro_mg2_0::micro_mg_init (kind, gravit, rair, rh2o, cpair, tmelt_in, latvap, latice, rhmini_in, micro_mg_dcs, micro_mg_dcs_tdep, microp_uniform_in, do_cldice_in, use_hetfrz_classnuc_in, do_nccons_in, do_nicons_in, ncnst_in, ninst_in, micro_mg_precip_frac_method_in, micro_mg_berg_eff_factor_in, allow_sed_supersat_in, ice_sed_ai, prc_coef1_in, prc_exp_in, prc_exp1_in, cld_sed_in, mg_prc_coeff_fix_in, alpha_grad_in, beta_grad_in, errstring)
 
subroutine, public micro_mg2_0::micro_mg_tend (mgncol, nlev, deltatin, t, q, qcn, qin, ncn, nin, qrn, qsn, nrn, nsn, relvar, accre_enhan, precip_off, p, pdel, cldn, liqcldf, icecldf, qcsinksum_rate1ord, naai, npccn, rndst, nacon, tlat, qvlat, qctend, qitend, nctend, nitend, qrtend, qstend, nrtend, nstend, effc, effc_fn, effi, prect, preci, nevapr, evapsnow, 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, errstring, tnd_qsnow, tnd_nsnow, re_ice, prer_evap, frzimm, frzcnt, frzdep)
 
elemental subroutine micro_mg2_0::calc_rercld (lamr, n0r, lamc, pgam, qric, qcic, ncic, rercld)
 
pure subroutine, public micro_mg2_0::micro_mg_get_cols (ncol, nlev, top_lev, qcn, qin, qrn, qsn, mgncol, mgcols)
 
subroutine micro_mg2_0::get_dcst (ncol, pver, temp, dcst)
 

Variables

real(r8), parameter micro_mg2_0::csmin = -30._r8
 
real(r8), parameter micro_mg2_0::csmax = 26._r8
 
real(r8), parameter micro_mg2_0::mindbz = -99._r8
 
real(r8), parameter micro_mg2_0::minrefl = 1.26e-10_r8
 
real(r8) micro_mg2_0::dcs
 
logical micro_mg2_0::dcs_tdep
 
real(r8), parameter micro_mg2_0::mi0l_min = 4._r8/3._r8*pi*rhow*(4.e-6_r8)**3
 
real(r8) micro_mg2_0::g
 
real(r8) micro_mg2_0::r
 
real(r8) micro_mg2_0::rv
 
real(r8) micro_mg2_0::cpp
 
real(r8) micro_mg2_0::tmelt
 
real(r8) micro_mg2_0::prc_coef1 = huge(1.0_r8)
 
real(r8) micro_mg2_0::prc_exp = huge(1.0_r8)
 
real(r8) micro_mg2_0::prc_exp1 = huge(1.0_r8)
 
real(r8) micro_mg2_0::cld_sed = huge(1.0_r8)
 
logical micro_mg2_0::mg_prc_coeff_fix = .false.
 
real(r8) micro_mg2_0::xxlv
 
real(r8) micro_mg2_0::xlf
 
real(r8) micro_mg2_0::xxls
 
real(r8) micro_mg2_0::rhmini
 
logical micro_mg2_0::microp_uniform
 
logical micro_mg2_0::do_cldice
 
logical micro_mg2_0::do_nccons
 
logical micro_mg2_0::do_nicons
 
logical micro_mg2_0::use_hetfrz_classnuc
 
real(r8) micro_mg2_0::ncnst
 
real(r8) micro_mg2_0::ninst
 
real(r8) micro_mg2_0::rhosu
 
real(r8) micro_mg2_0::icenuct
 
real(r8) micro_mg2_0::snowmelt
 
real(r8) micro_mg2_0::rainfrze
 
real(r8) micro_mg2_0::alpha_grad
 
real(r8) micro_mg2_0::beta_grad
 
real(r8) micro_mg2_0::gamma_br_plus1
 
real(r8) micro_mg2_0::gamma_br_plus4
 
real(r8) micro_mg2_0::gamma_bs_plus1
 
real(r8) micro_mg2_0::gamma_bs_plus4
 
real(r8) micro_mg2_0::gamma_bi_plus1
 
real(r8) micro_mg2_0::gamma_bi_plus4
 
real(r8) micro_mg2_0::xxlv_squared
 
real(r8) micro_mg2_0::xxls_squared
 
character(len=16) micro_mg2_0::micro_mg_precip_frac_method
 
real(r8) micro_mg2_0::micro_mg_berg_eff_factor
 
logical micro_mg2_0::allow_sed_supersat
 
logical micro_mg2_0::nccons
 
logical micro_mg2_0::nicons