This module contains two routines: The first initializes data and functions needed to compute the longwave cloud radiative properteis in RRTMGP. The second routine is a ccpp scheme within the "radiation loop", where the shortwave optical prperties (optical-depth, single-scattering albedo, asymmetry parameter) are computed for ALL cloud types visible to RRTMGP. More...

Functions/Subroutines
subroutine	rrtmgp_lw_cloud_optics_init (rrtmgp_root_dir, rrtmgp_lw_file_clouds, nrghice, mpicomm, mpirank, mpiroot, is_initialized, errmsg, errflg)

Variables
type(ty_cloud_optics)	lw_cloud_props

integer	nrghice_fromfilelw

integer	nbandlw

integer	nsize_liqlw

integer	nsize_icelw

integer	nsizereglw

integer	ncoeff_extlw

integer	ncoeff_ssa_glw

integer	nboundlw

integer	npairslw

real(wp), dimension(:,:), allocatable	lut_extliqlw
	LUT shortwave liquid extinction coefficient.

real(wp), dimension(:,:), allocatable	lut_ssaliqlw
	LUT shortwave liquid single scattering albedo.

real(wp), dimension(:,:), allocatable	lut_asyliqlw
	LUT shortwave liquid asymmetry parameter.

real(wp), dimension(:,:), allocatable	band_limscldlw
	Beginning and ending wavenumber [cm -1] for each band

real(wp), dimension(:,:,:), allocatable	lut_exticelw
	LUT shortwave ice extinction coefficient.

real(wp), dimension(:,:,:), allocatable	lut_ssaicelw
	LUT shortwave ice single scattering albedo.

real(wp), dimension(:,:,:), allocatable	lut_asyicelw
	LUT shortwave ice asymmetry parameter.

real(wp), parameter	absrain = 0.33e-3
	Rain drop absorption coefficient m2/g .

real(wp), parameter	abssnow0 = 1.5
	Snow flake absorption coefficient (micron), fu coeff.

real(wp), parameter	abssnow1 = 2.34e-3
	Snow flake absorption coefficient m2/g, ncar coef.

real(wp)	radliq_lwrlw
	Liquid particle size lower bound for LUT interpolation.

real(wp)	radliq_uprlw
	Liquid particle size upper bound for LUT interpolation.

real(wp)	radice_lwrlw
	Ice particle size upper bound for LUT interpolation.

real(wp)	radice_uprlw
	Ice particle size lower bound for LUT interpolation.

Detailed Description

This module contains two routines: The first initializes data and functions needed to compute the longwave cloud radiative properteis in RRTMGP. The second routine is a ccpp scheme within the "radiation loop", where the shortwave optical prperties (optical-depth, single-scattering albedo, asymmetry parameter) are computed for ALL cloud types visible to RRTMGP.

Function/Subroutine Documentation

◆ rrtmgp_lw_cloud_optics_init()

subroutine rrtmgp_lw_cloud_optics::rrtmgp_lw_cloud_optics_init	(	character(len=128), intent(in)	rrtmgp_root_dir,
		character(len=128), intent(in)	rrtmgp_lw_file_clouds,
		integer, intent(inout)	nrghice,
		type(mpi_comm), intent(in)	mpicomm,
		integer, intent(in)	mpirank,
		integer, intent(in)	mpiroot,
		logical, intent(inout)	is_initialized,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg
	)

Parameters

[in]	rrtmgp_lw_file_clouds	RRTMGP file containing clouds optics data
[in,out]	nrghice	Number of ice-roughness categories
[in]	mpicomm	MPI communicator
[in]	mpiroot	Master MPI rank
[in,out]	is_initialized	Initialization flag
[out]	errmsg	Error message
[out]	errflg	Error code

Parameters

rrtmgp_root_dir	RTE-RRTMGP root directory
mpirank	Current MPI rank

Definition at line 50 of file rrtmgp_lw_cloud_optics.F90.

Variable Documentation

◆ absrain

real(wp), parameter rrtmgp_lw_cloud_optics::absrain = 0.33e-3

Rain drop absorption coefficient m2/g .

Definition at line 34 of file rrtmgp_lw_cloud_optics.F90.

◆ abssnow0

real(wp), parameter rrtmgp_lw_cloud_optics::abssnow0 = 1.5

Snow flake absorption coefficient (micron), fu coeff.

Definition at line 34 of file rrtmgp_lw_cloud_optics.F90.

◆ abssnow1

real(wp), parameter rrtmgp_lw_cloud_optics::abssnow1 = 2.34e-3

Snow flake absorption coefficient m2/g, ncar coef.

Definition at line 34 of file rrtmgp_lw_cloud_optics.F90.

◆ band_limscldlw

real(wp), dimension(:,:), allocatable rrtmgp_lw_cloud_optics::band_limscldlw

Beginning and ending wavenumber [cm -1] for each band

Definition at line 23 of file rrtmgp_lw_cloud_optics.F90.

◆ lut_asyicelw

real(wp), dimension(:,:,:), allocatable rrtmgp_lw_cloud_optics::lut_asyicelw

LUT shortwave ice asymmetry parameter.

Definition at line 28 of file rrtmgp_lw_cloud_optics.F90.

◆ lut_asyliqlw

real(wp), dimension(:,:), allocatable rrtmgp_lw_cloud_optics::lut_asyliqlw

LUT shortwave liquid asymmetry parameter.

Definition at line 23 of file rrtmgp_lw_cloud_optics.F90.

◆ lut_exticelw

real(wp), dimension(:,:,:), allocatable rrtmgp_lw_cloud_optics::lut_exticelw

LUT shortwave ice extinction coefficient.

Definition at line 28 of file rrtmgp_lw_cloud_optics.F90.

◆ lut_extliqlw

real(wp), dimension(:,:), allocatable rrtmgp_lw_cloud_optics::lut_extliqlw

LUT shortwave liquid extinction coefficient.

Definition at line 23 of file rrtmgp_lw_cloud_optics.F90.

◆ lut_ssaicelw

real(wp), dimension(:,:,:), allocatable rrtmgp_lw_cloud_optics::lut_ssaicelw

LUT shortwave ice single scattering albedo.

Definition at line 28 of file rrtmgp_lw_cloud_optics.F90.

◆ lut_ssaliqlw

real(wp), dimension(:,:), allocatable rrtmgp_lw_cloud_optics::lut_ssaliqlw

LUT shortwave liquid single scattering albedo.

Definition at line 23 of file rrtmgp_lw_cloud_optics.F90.

◆ lw_cloud_props

type(ty_cloud_optics) rrtmgp_lw_cloud_optics::lw_cloud_props

Definition at line 19 of file rrtmgp_lw_cloud_optics.F90.

◆ nbandlw

integer rrtmgp_lw_cloud_optics::nbandlw

Definition at line 20 of file rrtmgp_lw_cloud_optics.F90.

◆ nboundlw

integer rrtmgp_lw_cloud_optics::nboundlw

Definition at line 20 of file rrtmgp_lw_cloud_optics.F90.

◆ ncoeff_extlw

integer rrtmgp_lw_cloud_optics::ncoeff_extlw

Definition at line 20 of file rrtmgp_lw_cloud_optics.F90.

◆ ncoeff_ssa_glw

integer rrtmgp_lw_cloud_optics::ncoeff_ssa_glw

Definition at line 20 of file rrtmgp_lw_cloud_optics.F90.

◆ npairslw

integer rrtmgp_lw_cloud_optics::npairslw

Definition at line 20 of file rrtmgp_lw_cloud_optics.F90.

◆ nrghice_fromfilelw

integer rrtmgp_lw_cloud_optics::nrghice_fromfilelw

Definition at line 20 of file rrtmgp_lw_cloud_optics.F90.

◆ nsize_icelw

integer rrtmgp_lw_cloud_optics::nsize_icelw

Definition at line 20 of file rrtmgp_lw_cloud_optics.F90.

◆ nsize_liqlw

integer rrtmgp_lw_cloud_optics::nsize_liqlw

Definition at line 20 of file rrtmgp_lw_cloud_optics.F90.

◆ nsizereglw

integer rrtmgp_lw_cloud_optics::nsizereglw

Definition at line 20 of file rrtmgp_lw_cloud_optics.F90.

◆ radice_lwrlw

real(wp) rrtmgp_lw_cloud_optics::radice_lwrlw

Ice particle size upper bound for LUT interpolation.

Definition at line 38 of file rrtmgp_lw_cloud_optics.F90.

◆ radice_uprlw

real(wp) rrtmgp_lw_cloud_optics::radice_uprlw

Ice particle size lower bound for LUT interpolation.

Definition at line 38 of file rrtmgp_lw_cloud_optics.F90.

◆ radliq_lwrlw

real(wp) rrtmgp_lw_cloud_optics::radliq_lwrlw

Liquid particle size lower bound for LUT interpolation.

Definition at line 38 of file rrtmgp_lw_cloud_optics.F90.

◆ radliq_uprlw

real(wp) rrtmgp_lw_cloud_optics::radliq_uprlw

Liquid particle size upper bound for LUT interpolation.

Definition at line 38 of file rrtmgp_lw_cloud_optics.F90.

Functions/Subroutines

Variables

Detailed Description

Function/Subroutine Documentation

◆ rrtmgp_lw_cloud_optics_init()

Variable Documentation

◆ absrain

◆ abssnow0

◆ abssnow1

◆ band_limscldlw

◆ lut_asyicelw

◆ lut_asyliqlw

◆ lut_exticelw

◆ lut_extliqlw

◆ lut_ssaicelw

◆ lut_ssaliqlw

◆ lw_cloud_props

◆ nbandlw

◆ nboundlw

◆ ncoeff_extlw

◆ ncoeff_ssa_glw

◆ npairslw

◆ nrghice_fromfilelw

◆ nsize_icelw

◆ nsize_liqlw

◆ nsizereglw

◆ radice_lwrlw

◆ radice_uprlw

◆ radliq_lwrlw

◆ radliq_uprlw