Radiation Scheme in CCPP
radiation_clouds.f File Reference

Go to the source code of this file.

Modules

module  module_radiation_clouds
 This module computes cloud related quantities for radiation computations.
 

Functions/Subroutines

subroutine module_radiation_clouds::gethml
 This subroutine computes high, mid, low, total, and boundary cloud fractions and cloud top/bottom layer indices for model diagnostic output. More...
 
subroutine module_radiation_clouds::rhtable
 cld-rh relations obtained from mitchell-hahn procedure. More...
 
subroutine, public module_radiation_clouds::cld_init
 This subroutine is an initialization program for cloud-radiation calculations. It sets up boundary layer cloud top. More...
 
subroutine, public module_radiation_clouds::progcld1
 This subroutine computes cloud related quantities using zhao/moorthi's prognostic cloud microphysics scheme. More...
 
subroutine, public module_radiation_clouds::progcld2
 This subroutine computes cloud related quantities using ferrier's prognostic cloud microphysics scheme. More...
 
subroutine, public module_radiation_clouds::progcld3
 This subroutine computes cloud related quantities using zhao/moorthi's prognostic cloud microphysics scheme + pdfcld. More...
 
subroutine, public module_radiation_clouds::diagcld1
 This subroutine computes cloud fractions for radiation calculations. More...
 

Variables

character(40), parameter module_radiation_clouds::vtagcld ='NCEP-Radiation_clouds v5.1 Nov 2012 '
 
real(kind=kind_phys), parameter module_radiation_clouds::gfac =1.0e5/con_g
 
real(kind=kind_phys), parameter module_radiation_clouds::gord =con_g/con_rd
 
integer, parameter, public module_radiation_clouds::nf_clds = 9
 number of fields in cloud array More...
 
integer, parameter, public module_radiation_clouds::nk_clds = 3
 number of cloud vertical domains More...
 
real(kind=kind_phys), dimension(nk_clds+1, 2), save module_radiation_clouds::ptopc
 
real(kind=kind_phys), parameter module_radiation_clouds::climit = 0.001
 
real(kind=kind_phys), parameter module_radiation_clouds::climit2 =0.05
 
real(kind=kind_phys), parameter module_radiation_clouds::ovcst = 1.0 - 1.0e-8
 
real(kind=kind_phys), parameter module_radiation_clouds::reliq_def = 10.0
 
real(kind=kind_phys), parameter module_radiation_clouds::reice_def = 50.0
 
real(kind=kind_phys), parameter module_radiation_clouds::rrain_def = 1000.0
 
real(kind=kind_phys), parameter module_radiation_clouds::rsnow_def = 250.0
 
integer, parameter module_radiation_clouds::nbin =100
 
integer, parameter module_radiation_clouds::nlon =2
 
integer, parameter module_radiation_clouds::nlat =4
 
integer, parameter module_radiation_clouds::mcld =4
 
integer, parameter module_radiation_clouds::nseal =2
 
real(kind=kind_phys), parameter module_radiation_clouds::cldssa_def = 0.99
 
real(kind=kind_phys), parameter module_radiation_clouds::cldasy_def = 0.84
 
real(kind=kind_phys), parameter module_radiation_clouds::xlim =5.0
 
real(kind=kind_phys), dimension(3) module_radiation_clouds::xlabdy
 
real(kind=kind_phys), dimension(3) module_radiation_clouds::xlobdy
 
real(kind=kind_phys), parameter module_radiation_clouds::vvcld1 = 0.0003e0
 
real(kind=kind_phys), parameter module_radiation_clouds::vvcld2 =-0.0005e0
 
real(kind=kind_phys), dimension(nbin, nlon, nlat, mcld, nseal) module_radiation_clouds::rhcl
 
integer module_radiation_clouds::llyr = 2
 
integer module_radiation_clouds::iovr = 1