CCPP SciDoc v7.0.x  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches
rrtmgp_sw_cloud_optics Module Reference

This module contains the cloud optics properties calculation for RRTMGP-SW.

Functions/Subroutines

subroutine rrtmgp_sw_cloud_optics_init (rrtmgp_root_dir, rrtmgp_sw_file_clouds, nrghice, mpicomm, mpirank, mpiroot, errmsg, errflg)
 

Variables

type(ty_cloud_optics) sw_cloud_props
 
integer nrghice_fromfilesw
 
integer nbandsw
 
integer nsize_liqsw
 
integer nsize_icesw
 
integer nsizeregsw
 
integer ncoeff_extsw
 
integer ncoeff_ssa_gsw
 
integer nboundsw
 
integer npairssw
 
real(wp), dimension(:,:), allocatable lut_extliqsw
 LUT shortwave liquid extinction coefficient.
 
real(wp), dimension(:,:), allocatable lut_ssaliqsw
 LUT shortwave liquid single scattering albedo.
 
real(wp), dimension(:,:), allocatable lut_asyliqsw
 LUT shortwave liquid asymmetry parameter.
 
real(wp), dimension(:,:), allocatable band_limscldsw
 Beginning and ending wavenumber [cm -1] for each band

 
real(wp), dimension(:,:,:), allocatable lut_exticesw
 LUT shortwave ice extinction coefficient.
 
real(wp), dimension(:,:,:), allocatable lut_ssaicesw
 LUT shortwave ice single scattering albedo.
 
real(wp), dimension(:,:,:), allocatable lut_asyicesw
 LUT shortwave ice asymmetry parameter.
 
real(wp) radliq_lwrsw
 Liquid particle size lower bound for LUT interpolation.
 
real(wp) radliq_uprsw
 Liquid particle size upper bound for LUT interpolation.
 
real(wp) radice_lwrsw
 Ice particle size upper bound for LUT interpolation.
 
real(wp) radice_uprsw
 Ice particle size lower bound for LUT interpolation.
 
real(wp), parameter a0r = 3.07e-3
 
real(wp), parameter a0s = 0.0
 
real(wp), parameter a1s = 1.5
 
real(wp), dimension(:), allocatable b0r
 
real(wp), dimension(:), allocatable b0s
 
real(wp), dimension(:), allocatable b1s
 
real(wp), dimension(:), allocatable c0r
 
real(wp), dimension(:), allocatable c0s