CAM
|
Functions/Subroutines | |
subroutine, public | advance_clubb_core (l_implemented, dt, fcor, sfc_elevation, hydromet_dim, thlm_forcing, rtm_forcing, um_forcing, vm_forcing, sclrm_forcing, edsclrm_forcing, wprtp_forcing, wpthlp_forcing, rtp2_forcing, thlp2_forcing, rtpthlp_forcing, wm_zm, wm_zt, wpthlp_sfc, wprtp_sfc, upwp_sfc, vpwp_sfc, wpsclrp_sfc, wpedsclrp_sfc, p_in_Pa, rho_zm, rho, exner, rho_ds_zm, rho_ds_zt, invrs_rho_ds_zm, invrs_rho_ds_zt, thv_ds_zm, thv_ds_zt, hydromet, rfrzm, radf, do_expldiff, ifdef CLUBBND_CAM |
subroutine, public | setup_clubb_core (nzmax, T0_in, ts_nudge_in, hydromet_dim_in, sclr_dim_in, sclr_tol_in, edsclr_dim_in, params, l_host_applies_sfc_fluxes, l_uv_nudge, saturation_formula, l_implemented, grid_type, deltaz, zm_init, zm_top, momentum_heights, thermodynamic_heights, sfc_elevation, err_code) |
subroutine, public | cleanup_clubb_core (l_implemented) |
subroutine | trapezoidal_rule_zt (l_call_pdf_closure_twice, wprtp2, wpthlp2, wprtpthlp, cloud_frac, ice_supersat_frac, rcm, wp2thvp, wpsclrprtp, wpsclrp2, wpsclrpthlp, pdf_params, wprtp2_zm, wpthlp2_zm, wprtpthlp_zm, cloud_frac_zm, ice_supersat_frac_zm, rcm_zm, wp2thvp_zm, wpsclrprtp_zm, wpsclrp2_zm, wpsclrpthlp_zm, pdf_params_zm) |
subroutine | trapezoidal_rule_zm (wpthvp_zt, thlpthvp_zt, rtpthvp_zt, wpthvp, thlpthvp, rtpthvp) |
pure real(kind=core_rknd) function, dimension(gr%nz) | trapezoid_zt (variable_zt, variable_zm) |
pure real(kind=core_rknd) function, dimension(gr%nz) | trapezoid_zm (variable_zm, variable_zt) |
subroutine | compute_cloud_cover (pdf_params, cloud_frac, rcm, cloud_cover, rcm_in_layer) |
subroutine | clip_rcm (rtm, message, rcm) |
subroutine, public | set_lscale_max (l_implemented, host_dx, host_dy, Lscale_max) |
pure subroutine, public | calculate_thlp2_rad (nz, rcm_zm, thlprcp, radht_zm, thlp2_forcing) |
subroutine, public advance_clubb_core_module::advance_clubb_core | ( | logical, intent(in) | l_implemented, |
real( kind = core_rknd ), intent(in) | dt, | ||
real( kind = core_rknd ), intent(in) | fcor, | ||
real( kind = core_rknd ), intent(in) | sfc_elevation, | ||
integer, intent(in) | hydromet_dim, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | thlm_forcing, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | rtm_forcing, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | um_forcing, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | vm_forcing, | ||
real( kind = core_rknd ), dimension(gr%nz,sclr_dim), intent(in) | sclrm_forcing, | ||
real( kind = core_rknd ), dimension(gr%nz,edsclr_dim), intent(in) | edsclrm_forcing, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | wprtp_forcing, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | wpthlp_forcing, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | rtp2_forcing, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | thlp2_forcing, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | rtpthlp_forcing, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | wm_zm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | wm_zt, | ||
real( kind = core_rknd ), intent(in) | wpthlp_sfc, | ||
real( kind = core_rknd ), intent(in) | wprtp_sfc, | ||
real( kind = core_rknd ), intent(in) | upwp_sfc, | ||
real( kind = core_rknd ), intent(in) | vpwp_sfc, | ||
real( kind = core_rknd ), dimension(sclr_dim), intent(in) | wpsclrp_sfc, | ||
real( kind = core_rknd ), dimension(edsclr_dim), intent(in) | wpedsclrp_sfc, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | p_in_Pa, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | rho_zm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | rho, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | exner, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | rho_ds_zm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | rho_ds_zt, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | invrs_rho_ds_zm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | invrs_rho_ds_zt, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | thv_ds_zm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | thv_ds_zt, | ||
real( kind = core_rknd ), dimension(gr%nz,hydromet_dim), intent(in) | hydromet, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | rfrzm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | radf, | ||
logical, intent(in) | do_expldiff, | ||
ifdef, | |||
CLUBBND_CAM | |||
) |
pure subroutine, public advance_clubb_core_module::calculate_thlp2_rad | ( | integer, intent(in) | nz, |
real( kind = core_rknd ), dimension(nz), intent(in) | rcm_zm, | ||
real( kind = core_rknd ), dimension(nz), intent(in) | thlprcp, | ||
real( kind = core_rknd ), dimension(nz), intent(in) | radht_zm, | ||
real( kind = core_rknd ), dimension(nz), intent(inout) | thlp2_forcing | ||
) |
subroutine, public advance_clubb_core_module::cleanup_clubb_core | ( | logical, intent(in) | l_implemented | ) |
subroutine advance_clubb_core_module::clip_rcm | ( | real( kind = core_rknd ), dimension(gr%nz), intent(in) | rtm, |
character(len= * ), intent(in) | message, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | rcm | ||
) |
subroutine advance_clubb_core_module::compute_cloud_cover | ( | type (pdf_parameter), dimension(gr%nz), intent(in) | pdf_params, |
real( kind = core_rknd ), dimension(gr%nz), intent(in) | cloud_frac, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | rcm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(out) | cloud_cover, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(out) | rcm_in_layer | ||
) |
subroutine, public advance_clubb_core_module::set_lscale_max | ( | logical, intent(in) | l_implemented, |
real( kind = core_rknd ), intent(in) | host_dx, | ||
real( kind = core_rknd ), intent(in) | host_dy, | ||
real( kind = core_rknd ), intent(out) | Lscale_max | ||
) |
subroutine, public advance_clubb_core_module::setup_clubb_core | ( | integer, intent(in) | nzmax, |
real( kind = core_rknd ), intent(in) | T0_in, | ||
real( kind = core_rknd ), intent(in) | ts_nudge_in, | ||
integer, intent(in) | hydromet_dim_in, | ||
integer, intent(in) | sclr_dim_in, | ||
real( kind = core_rknd ), dimension(sclr_dim_in), intent(in) | sclr_tol_in, | ||
integer, intent(in) | edsclr_dim_in, | ||
real( kind = core_rknd ), dimension(nparams), intent(in) | params, | ||
logical, intent(in) | l_host_applies_sfc_fluxes, | ||
logical, intent(in) | l_uv_nudge, | ||
character(len=*), intent(in) | saturation_formula, | ||
logical, intent(in) | l_implemented, | ||
integer, intent(in) | grid_type, | ||
real( kind = core_rknd ), intent(in) | deltaz, | ||
real( kind = core_rknd ), intent(in) | zm_init, | ||
real( kind = core_rknd ), intent(in) | zm_top, | ||
real( kind = core_rknd ), dimension(nzmax), intent(in) | momentum_heights, | ||
real( kind = core_rknd ), dimension(nzmax), intent(in) | thermodynamic_heights, | ||
real( kind = core_rknd ), intent(in) | sfc_elevation, | ||
integer, intent(out) | err_code | ||
) |
pure real( kind = core_rknd ) function, dimension(gr%nz) advance_clubb_core_module::trapezoid_zm | ( | real( kind = core_rknd ), dimension(gr%nz), intent(in) | variable_zm, |
real( kind = core_rknd ), dimension(gr%nz), intent(in) | variable_zt | ||
) |
pure real( kind = core_rknd ) function, dimension(gr%nz) advance_clubb_core_module::trapezoid_zt | ( | real( kind = core_rknd ), dimension(gr%nz), intent(in) | variable_zt, |
real( kind = core_rknd ), dimension(gr%nz), intent(in) | variable_zm | ||
) |
subroutine advance_clubb_core_module::trapezoidal_rule_zm | ( | real( kind = core_rknd ), dimension(gr%nz), intent(in) | wpthvp_zt, |
real( kind = core_rknd ), dimension(gr%nz), intent(in) | thlpthvp_zt, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(in) | rtpthvp_zt, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | wpthvp, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | thlpthvp, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | rtpthvp | ||
) |
subroutine advance_clubb_core_module::trapezoidal_rule_zt | ( | logical, intent(in) | l_call_pdf_closure_twice, |
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | wprtp2, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | wpthlp2, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | wprtpthlp, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | cloud_frac, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | ice_supersat_frac, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | rcm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | wp2thvp, | ||
real( kind = core_rknd ), dimension(gr%nz,sclr_dim), intent(inout) | wpsclrprtp, | ||
real( kind = core_rknd ), dimension(gr%nz,sclr_dim), intent(inout) | wpsclrp2, | ||
real( kind = core_rknd ), dimension(gr%nz,sclr_dim), intent(inout) | wpsclrpthlp, | ||
type (pdf_parameter), dimension(gr%nz), intent(inout) | pdf_params, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | wprtp2_zm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | wpthlp2_zm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | wprtpthlp_zm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | cloud_frac_zm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | ice_supersat_frac_zm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | rcm_zm, | ||
real( kind = core_rknd ), dimension(gr%nz), intent(inout) | wp2thvp_zm, | ||
real( kind = core_rknd ), dimension(gr%nz,sclr_dim), intent(inout) | wpsclrprtp_zm, | ||
real( kind = core_rknd ), dimension(gr%nz,sclr_dim), intent(inout) | wpsclrp2_zm, | ||
real( kind = core_rknd ), dimension(gr%nz,sclr_dim), intent(inout) | wpsclrpthlp_zm, | ||
type (pdf_parameter), dimension(gr%nz), intent(inout) | pdf_params_zm | ||
) |