CAM
advance_clubb_core_module Module Reference

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)
 

Function/Subroutine Documentation

◆ advance_clubb_core()

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 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ calculate_thlp2_rad()

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 
)
Here is the caller graph for this function:

◆ cleanup_clubb_core()

subroutine, public advance_clubb_core_module::cleanup_clubb_core ( logical, intent(in)  l_implemented)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ clip_rcm()

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 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ compute_cloud_cover()

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 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ set_lscale_max()

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 
)
Here is the caller graph for this function:

◆ setup_clubb_core()

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 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ trapezoid_zm()

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 
)
Here is the caller graph for this function:

◆ trapezoid_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 
)
Here is the caller graph for this function:

◆ trapezoidal_rule_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 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ trapezoidal_rule_zt()

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 
)
Here is the call graph for this function:
Here is the caller graph for this function: