CAM
unicon.F90 File Reference

Modules

module  unicon
 

Functions/Subroutines

subroutine, public unicon::unicon_init (xlv_in, cp_in, xlf_in, zvir_in, r_in, g_in)
 
subroutine, public unicon::compute_unicon (mix, mkx, iend, ncnst, dt, ps0_in, zs0_in, p0_in, z0_in, dp0_in, dpdry0_in, t0_in, qv0_in, ql0_in, qi0_in, tr0_in, u0_in, v0_in, ast0_in, tke0_in, bprod0_in, kpblh_in, pblh_in, went_in, qflx_in, shflx_in, taux_in, tauy_in, aflx_in, landfrac_in, sgh30_in, am_evp_st_in, evprain_st_in, evpsnow_st_in, cush_inout, cushavg_inout, cuorg_inout, awk_PBL_inout, delta_thl_PBL_inout, delta_qt_PBL_inout, delta_u_PBL_inout, delta_v_PBL_inout, delta_tr_PBL_inout, cu_cmfum_out, cu_cmfr_inout, cu_thlr_inout, cu_qtr_inout, cu_ur_inout, cu_vr_inout, cu_qlr_inout, cu_qir_inout, cu_trr_inout, cu_cmfrd_out, cu_thlrd_out, cu_qtrd_out, cu_urd_out, cu_vrd_out, cu_qlrd_out, cu_qird_out, cu_trrd_out, am_u_out, qlm_u_out, qim_u_out, am_d_out, qlm_d_out, qim_d_out, cmf_u_out, slflx_out, qtflx_out, qvten_out, qlten_out, qiten_out, trten_out, sten_out, uten_out, vten_out, qrten_out, qsten_out, rqc_l_out, rqc_i_out, rqc_out, rnc_l_out, rnc_i_out, rliq_out, precip_out, snow_out, evapc_out, cnt_out, cnb_out, cmf_det_out, ql_det_out, qi_det_out, lchnk)
 

Variables

real(r8) unicon::xlv
 
real(r8) unicon::xlf
 
real(r8) unicon::xls
 
real(r8) unicon::cp
 
real(r8) unicon::zvir
 
real(r8) unicon::r
 
real(r8) unicon::g
 
real(r8) unicon::p00
 
real(r8) unicon::rovcp
 
integer, parameter unicon::nseg = 1
 
integer, parameter unicon::inorm = 2
 
integer, parameter unicon::iprd_prep = 5
 
integer, parameter unicon::ievp_prep = 1
 
integer, parameter unicon::nacc = 1
 
integer, parameter unicon::niter = 1
 
logical, parameter unicon::dbsort_con = .false.
 
integer, parameter unicon::ithv_mine = 1
 
real(r8), parameter unicon::mu_mix = 0.5_r8
 
real(r8), parameter unicon::mu_top = 0.5_r8
 
real(r8), parameter unicon::mu_area = 0.5_r8
 
real(r8), parameter unicon::offset_mine = 0._r8
 
real(r8), parameter unicon::epsz_dn = 0.e-4_r8
 
real(r8), parameter unicon::delz_dn = 0.e-4_r8
 
real(r8), parameter unicon::eps_wk = 0.e-5_r8
 
real(r8), parameter unicon::del_wk = 0.e-5_r8
 
integer, parameter unicon::i_budget_coldpool = 6
 
integer, parameter unicon::i_energy_coldpool = 1
 
real(r8), parameter unicon::eps_wk0 = 0.e-5_r8
 
real(r8), parameter unicon::del_wk0 = 0.e-5_r8
 
real(r8), parameter unicon::b1 = 15.0_r8
 
integer, parameter unicon::int_del_wk = 0
 
real(r8), parameter unicon::c_del_wk = 0._r8
 
integer, parameter unicon::icudist_tail = 0
 
real(r8), parameter unicon::au_base_min_ocn = 0.045_r8
 
real(r8), parameter unicon::au_base_max_ocn = 0.045_r8
 
real(r8), parameter unicon::au_base_min_lnd = 0.03_r8
 
real(r8), parameter unicon::au_base_max_lnd = 0.03_r8
 
integer, parameter unicon::iau_base_ocn = 1
 
integer, parameter unicon::iau_base_lnd = 1
 
real(r8), parameter unicon::cadj_area_ocn = 3._r8
 
real(r8), parameter unicon::cadj_area_lnd = 3._r8
 
integer, parameter unicon::icridis = 1
 
real(r8), parameter unicon::rlc = 0.15_r8
 
real(r8), parameter unicon::cridis_in = 1.e8_r8
 
integer, parameter unicon::i_downloading = 0
 
real(r8), parameter unicon::vfall_rain = 1.e1_r8
 
real(r8), parameter unicon::vfall_snow = 1.e1_r8
 
real(r8), parameter unicon::prepminpblh_org = 0.0_r8
 
logical, parameter unicon::iorg_adv = .true.
 
logical, parameter unicon::orgfeedback_off = .false.
 
real(r8), parameter unicon::norm_sgh = 1.e3_r8
 
real(r8), parameter unicon::a_oro_max = 0._r8
 
real(r8), parameter unicon::awk_pbl_min = 0.05_r8
 
real(r8), parameter unicon::cdrag = 1.5e-3_r8
 
real(r8), parameter unicon::delta_thv_wc = -0.1_r8
 
real(r8), parameter unicon::kw_omega = 1.414_r8
 
real(r8), parameter unicon::kstar = 0.1_r8
 
integer, parameter unicon::iorg_ent = 1
 
integer, parameter unicon::iorg_detrain = 1
 
integer, parameter unicon::i_detrain = 1
 
real(r8), parameter unicon::fac_org_ent = 1._r8
 
real(r8), parameter unicon::fac_org_rad = 1._r8
 
real(r8), parameter unicon::orp = 1._r8
 
real(r8), parameter unicon::ro_min_ocn = 100._r8
 
real(r8), parameter unicon::ro_max_ocn = 4000._r8
 
real(r8), parameter unicon::sigmar_min_ocn = 100._r8
 
real(r8), parameter unicon::sigmar_max_ocn = 100._r8
 
real(r8), parameter unicon::ro_min_lnd = 100._r8
 
real(r8), parameter unicon::ro_max_lnd =10000._r8
 
real(r8), parameter unicon::sigmar_min_lnd = 100._r8
 
real(r8), parameter unicon::sigmar_max_lnd = 100._r8
 
real(r8), parameter unicon::ro_eps0 = 25._r8
 
real(r8), parameter unicon::eta2 = 0.1_r8
 
real(r8), parameter unicon::beta2 = 1.0_r8
 
real(r8), parameter unicon::beta2_st = 0.0_r8
 
real(r8), parameter unicon::sigma_wo = 0.0_r8
 
real(r8), parameter unicon::kw_min_ocn = 0.35_r8
 
real(r8), parameter unicon::kw_max_ocn = 0.35_r8
 
real(r8), parameter unicon::kw_min_lnd = 0.35_r8
 
real(r8), parameter unicon::kw_max_lnd = 0.35_r8
 
real(r8), parameter unicon::pgfc_up = 0.9_r8
 
real(r8), parameter unicon::pgfc_dn = 0.9_r8
 
integer, parameter unicon::mclimit = 1
 
real(r8), parameter unicon::caer = 0.15_r8
 
real(r8), parameter unicon::criqc_lnd = 6.5e-4_r8
 
real(r8), parameter unicon::criqc_ocn = 6.5e-4_r8
 
real(r8), parameter unicon::c0_ac_lnd = 1.0e-3_r8
 
real(r8), parameter unicon::c0_ac_ocn = 1.0e-3_r8
 
real(r8), parameter unicon::kevp_rain_dn_lnd = 2.e-5_r8
 
real(r8), parameter unicon::kevp_snow_dn_lnd = 2.e-5_r8
 
real(r8), parameter unicon::kevp_rain_lnd = 2.e-5_r8
 
real(r8), parameter unicon::kevp_snow_lnd = 2.e-5_r8
 
real(r8), parameter unicon::kevp_rain_dn_ocn = 2.e-5_r8
 
real(r8), parameter unicon::kevp_snow_dn_ocn = 2.e-5_r8
 
real(r8), parameter unicon::kevp_rain_ocn = 2.e-5_r8
 
real(r8), parameter unicon::kevp_snow_ocn = 2.e-5_r8
 
real(r8), parameter unicon::c0 = 0.2_r8
 
integer, parameter unicon::i_eps0 = 1
 
real(r8), parameter unicon::cevpeps0 = 1.0_r8
 
integer, parameter unicon::i_dnmixing = 0
 
real(r8), parameter unicon::rbuoy_min = 0.33_r8
 
real(r8), parameter unicon::rbuoy_max = 1.00_r8
 
real(r8), parameter unicon::rdrag = 2.0_r8
 
real(r8), parameter unicon::rjet = 0.0_r8
 
real(r8), parameter unicon::r_buo = 100._r8
 
real(r8), parameter unicon::xc_min = 0._r8
 
real(r8), parameter unicon::xc_max = 1._r8
 
real(r8), parameter unicon::droprad_liq = 10.e-6_r8
 
real(r8), parameter unicon::droprad_ice = 85.e-6_r8
 
real(r8), parameter unicon::density_liq = 997._r8
 
real(r8), parameter unicon::density_ice = 500._r8
 
real(r8), parameter unicon::droprad_rain = 10.e-6_r8
 
real(r8), parameter unicon::droprad_snow = 85.e-6_r8
 
real(r8), parameter unicon::density_rain = 1000._r8
 
real(r8), parameter unicon::density_snow = 250._r8
 
real(r8), parameter unicon::epsz0_max = 0.05_r8
 
integer, parameter unicon::exp_cmf = 1
 
real(r8), parameter unicon::alpha_max = 2._r8
 
real(r8), parameter unicon::cmfmin = 1.e-5_r8
 
real(r8), parameter unicon::au_max = 1.e-1_r8
 
real(r8), parameter unicon::wumin = 1.e-1_r8
 
real(r8), parameter unicon::wumax = 20._r8
 
real(r8), parameter unicon::wdmin = 1.e-1_r8
 
real(r8), parameter unicon::nonzero = 1.e-20_r8
 
real(r8), parameter unicon::unity = 0.9999_r8
 
real(r8), parameter unicon::thv_ref = 300._r8
 
integer, parameter unicon::iup_par = 4
 
integer, parameter unicon::idn_par = 1
 
integer, parameter unicon::islope_on_thlqttr = 1
 
integer, parameter unicon::islope_on_uv = 1
 
integer, parameter unicon::iflux_env = 1
 
integer, parameter unicon::kiss = 0
 
real(r8), parameter unicon::sigfac = 1.0_r8