|
| subroutine | mp_wdm6::wdm6 (th, q, qc, qr, qi, qs, qg, nn, nc, nr, den, pii, p, delz, delt, g, cpd, cpv, ccn0, rd, rv, t0c, ep1, ep2, qmin, xls, xlv0, xlf0, den0, denr, cliq, cice, psat, xland, rain, rainncv, snow, snowncv, sr, refl_10cm, diagflag, do_radar_ref, graupel, graupelncv, itimestep, has_reqc, has_reqi, has_reqs, re_cloud, re_ice, re_snow, ids, ide, jds, jde, kds, kde, ims, ime, jms, jme, kms, kme, its, ite, jts, jte, kts, kte) |
| |
| subroutine | mp_wdm6::wdm62d (t, q, qci, qrs, ncr, den, p, delz, delt, g, cpd, cpv, ccn0, rd, rv, t0c, ep1, ep2, qmin, xls, xlv0, xlf0, den0, denr, cliq, cice, psat, lat, slmsk, rain, rainncv, sr, ids, ide, jds, jde, kds, kde, ims, ime, jms, jme, kms, kme, its, ite, jts, jte, kts, kte, snow, snowncv, graupel, graupelncv, microphysics_debug, diag_i_dbg, diag_j_dbg) |
| |
| real(kind=kind_phys) function | mp_wdm6::rgmma (x) |
| |
| real(kind=kind_phys) function | mp_wdm6::fpvs (t, ice, rd, rv, cvap, cliq, cice, hvap, hsub, psat, t0c) |
| |
| subroutine | mp_wdm6::wdm6init (den0, denr, dens, cl, cpv, ccn0, hail_opt, allowed_to_read) |
| |
| subroutine | mp_wdm6::slope_wdm6 (qrs, ncr, den, denfac, t, rslope, rslopeb, rslope2, rslope3, vt, vtn, its, ite, kts, kte) |
| |
| subroutine | mp_wdm6::slope_rain (qrs, ncr, den, denfac, t, rslope, rslopeb, rslope2, rslope3, vt, vtn, its, ite, kts, kte) |
| |
| subroutine | mp_wdm6::slope_snow (qrs, den, denfac, t, rslope, rslopeb, rslope2, rslope3, vt, its, ite, kts, kte) |
| |
| subroutine | mp_wdm6::slope_graup (qrs, den, denfac, t, rslope, rslopeb, rslope2, rslope3, vt, its, ite, kts, kte) |
| |
| subroutine | mp_wdm6::nislfv_rain_plmr (im, km, denl, denfacl, tkl, dzl, wwl, rql, rnl, precip, dt, id, iter, rid) |
| |
| subroutine | mp_wdm6::nislfv_rain_plm6 (im, km, denl, denfacl, tkl, dzl, wwl, rql, rql2, precip1, precip2, dt, id, iter) |
| |
| subroutine | mp_wdm6::refl10cm_wdm6 (qv1d, qr1d, nr1d, qs1d, qg1d, t1d, p1d, dBZ, kts, kte, ii, jj) |
| |
| subroutine | mp_wdm6::effectrad_wdm6 (t, qc, nc, qi, qs, rho, qmin, t0c, re_qc, re_qi, re_qs, kts, kte, ii, jj) |
| |
| subroutine, public | mp_wdm6::mp_wdm6_init (den0, denr, dens, cl, cpv, ccn0, hail_opt, errmsg, errflg) |
| |
| subroutine, public | mp_wdm6::mp_wdm6_run (t, q, qc, qi, qr, qs, qg, nn, nc, nr, den, p, delz, delt, g, cpd, cpv, rd, rv, t0c, ep1, ep2, qmin, xls, xlv0, xlf0, den0, denr, cliq, cice, psat, ccn0, xland, rain, rainncv, sr, snow, snowncv, graupel, graupelncv, its, ite, kts, kte, microphysics_debug, diag_i_dbg, diag_j_dbg, diag_k_raw_base, errmsg, errflg) |
| |
|
| integer, parameter | mp_wdm6::kind_phys = c_double |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::dtcldcr = 120. |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::n0r = 8.e6 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::n0s = 2.e6 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::n0smax = 1.e11 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::dens = 100.0 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::alpha = .12 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::avtr = 841.9 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::bvtr = 0.8 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::avts = 11.72 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::bvts = .41 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::lamdacmax = 5.e5 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::lamdacmin = 2.e4 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::lamdarmax = 5.e4 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::lamdarmin = 2.e3 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::lamdasmax = 1.e5 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::r0 = .8e-5 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::peaut = .55 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::xncr = 3.e8 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::xncr0 = 5.e7 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::xncr1 = 5.e8 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::xmyu = 1.718e-5 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::dicon = 11.9 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::dimax = 500.e-6 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::pfrz1 = 100. |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::pfrz2 = 0.66 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::qcrmin = 1.e-9 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::ncmin = 1.e1 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::nrmin = 1.e-2 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::eacrc = 1.0 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::qs0 = 6.e-4 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::satmax = 1.0048 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::actk = 0.6 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::actr = 1.5 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::ncrk1 = 3.03e3 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::ncrk2 = 2.59e15 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::di100 = 1.e-4 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::di600 = 6.e-4 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::di2000 = 2000.e-6 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::di82 = 82.e-6 |
| |
| real(kind=kind_phys), parameter, private | mp_wdm6::di15 = 15.e-6 |
| |
| real(kind=kind_phys), save | mp_wdm6::qc0 |
| |
| real(kind=kind_phys), save | mp_wdm6::qc1 |
| |
| real(kind=kind_phys), save | mp_wdm6::qck1 |
| |
| real(kind=kind_phys), save | mp_wdm6::pidnc |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtr1 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtr2 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtr3 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtr4 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtr5 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtr6 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtr7 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtr2o5 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtr3o5 |
| |
| real(kind=kind_phys), save | mp_wdm6::g1pbr |
| |
| real(kind=kind_phys), save | mp_wdm6::g2pbr |
| |
| real(kind=kind_phys), save | mp_wdm6::g3pbr |
| |
| real(kind=kind_phys), save | mp_wdm6::g4pbr |
| |
| real(kind=kind_phys), save | mp_wdm6::g5pbr |
| |
| real(kind=kind_phys), save | mp_wdm6::g6pbr |
| |
| real(kind=kind_phys), save | mp_wdm6::g7pbr |
| |
| real(kind=kind_phys), save | mp_wdm6::g5pbro2 |
| |
| real(kind=kind_phys), save | mp_wdm6::g7pbro2 |
| |
| real(kind=kind_phys), save | mp_wdm6::pi |
| |
| real(kind=kind_phys), save | mp_wdm6::pvtr |
| |
| real(kind=kind_phys), save | mp_wdm6::pvtrn |
| |
| real(kind=kind_phys), save | mp_wdm6::eacrr |
| |
| real(kind=kind_phys), save | mp_wdm6::pacrr |
| |
| real(kind=kind_phys), save | mp_wdm6::pidn0r |
| |
| real(kind=kind_phys), save | mp_wdm6::pidnr |
| |
| real(kind=kind_phys), save | mp_wdm6::precr1 |
| |
| real(kind=kind_phys), save | mp_wdm6::precr2 |
| |
| real(kind=kind_phys), save | mp_wdm6::xmmax |
| |
| real(kind=kind_phys), save | mp_wdm6::roqimax |
| |
| real(kind=kind_phys), save | mp_wdm6::bvts1 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvts2 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvts3 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvts4 |
| |
| real(kind=kind_phys), save | mp_wdm6::g1pbs |
| |
| real(kind=kind_phys), save | mp_wdm6::g3pbs |
| |
| real(kind=kind_phys), save | mp_wdm6::g4pbs |
| |
| real(kind=kind_phys), save | mp_wdm6::g5pbso2 |
| |
| real(kind=kind_phys), save | mp_wdm6::pvts |
| |
| real(kind=kind_phys), save | mp_wdm6::pacrs |
| |
| real(kind=kind_phys), save | mp_wdm6::precs1 |
| |
| real(kind=kind_phys), save | mp_wdm6::precs2 |
| |
| real(kind=kind_phys), save | mp_wdm6::pidn0s |
| |
| real(kind=kind_phys), save | mp_wdm6::xlv1 |
| |
| real(kind=kind_phys), save | mp_wdm6::pacrc |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtg1 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtg2 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtg3 |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtg4 |
| |
| real(kind=kind_phys), save | mp_wdm6::g1pbg |
| |
| real(kind=kind_phys), save | mp_wdm6::g3pbg |
| |
| real(kind=kind_phys), save | mp_wdm6::g4pbg |
| |
| real(kind=kind_phys), save | mp_wdm6::g5pbgo2 |
| |
| real(kind=kind_phys), save | mp_wdm6::pvtg |
| |
| real(kind=kind_phys), save | mp_wdm6::pacrg |
| |
| real(kind=kind_phys), save | mp_wdm6::precg1 |
| |
| real(kind=kind_phys), save | mp_wdm6::precg2 |
| |
| real(kind=kind_phys), save | mp_wdm6::pidn0g |
| |
| real(kind=kind_phys), save | mp_wdm6::n0g |
| |
| real(kind=kind_phys), save | mp_wdm6::avtg |
| |
| real(kind=kind_phys), save | mp_wdm6::bvtg |
| |
| real(kind=kind_phys), save | mp_wdm6::deng |
| |
| real(kind=kind_phys), save | mp_wdm6::lamdagmax |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopecmax |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopec2max |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopec3max |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopermax |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopesmax |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopegmax |
| |
| real(kind=kind_phys), save | mp_wdm6::rsloperbmax |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopesbmax |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopegbmax |
| |
| real(kind=kind_phys), save | mp_wdm6::rsloper2max |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopes2max |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopeg2max |
| |
| real(kind=kind_phys), save | mp_wdm6::rsloper3max |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopes3max |
| |
| real(kind=kind_phys), save | mp_wdm6::rslopeg3max |
| |
1.9.1