rrtmgp_sw_main Module Reference

This module contain the RRTMGP-SW radiation scheme. More...

Functions/Subroutines
subroutine, public	rrtmgp_sw_main_init (rrtmgp_root_dir, rrtmgp_sw_file_gas, rrtmgp_sw_file_clouds, active_gases_array, nrghice, mpicomm, mpirank, mpiroot, nlay, rrtmgp_phys_blksz, is_init_gas_optics, is_init_cloud_optics, errmsg, errflg)
subroutine, public	rrtmgp_sw_main_run (doswrad, doswclrsky, top_at_1, ncol, nday, nlay, ngases, rrtmgp_phys_blksz, idx, icseed_sw, iovr, iovr_convcld, iovr_max, iovr_maxrand, iovr_rand, iovr_dcorr, iovr_exp, iovr_exprand, isubc_sw, isfc, sfc_alb_nir_dir, sfc_alb_nir_dif, sfc_alb_uvvis_dir, sfc_alb_uvvis_dif, coszen, p_lay, p_lev, t_lay, t_lev, vmr_o2, vmr_h2o, vmr_o3, vmr_ch4, vmr_n2o, vmr_co2, cld_frac, cld_lwp, cld_reliq, cld_iwp, cld_reice, cld_swp, cld_resnow, cld_rwp, cld_rerain, precip_frac, cld_cnv_lwp, cld_cnv_reliq, cld_cnv_iwp, cld_cnv_reice, cld_pbl_lwp, cld_pbl_reliq, cld_pbl_iwp, cld_pbl_reice, cloud_overlap_param, active_gases_array, aersw_tau, aersw_ssa, aersw_g, solcon, scmpsw, fluxswup_allsky, fluxswdown_allsky, fluxswup_clrsky, fluxswdown_clrsky, cldtausw, errmsg, errflg)

Detailed Description

This module contain the RRTMGP-SW radiation scheme.

Function/Subroutine Documentation

rrtmgp_sw_main_init()

subroutine, public rrtmgp_sw_main::rrtmgp_sw_main_init	(	character(len=128), intent(in)	rrtmgp_root_dir,
		character(len=128), intent(in)	rrtmgp_sw_file_gas,
		character(len=128), intent(in)	rrtmgp_sw_file_clouds,
		character(len=*), dimension(:), intent(in), optional	active_gases_array,
		integer, intent(inout)	nrghice,
		type(mpi_comm), intent(in)	mpicomm,
		integer, intent(in)	mpirank,
		integer, intent(in)	mpiroot,
		integer, intent(in)	nlay,
		integer, intent(in)	rrtmgp_phys_blksz,
		logical, intent(inout)	is_init_gas_optics,
		logical, intent(inout)	is_init_cloud_optics,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg
	)

Argument Table

[in] rrtmgp_sw_file_gas RRTMGP file containing cloud-optics data

Parameters

[in]	active_gases_array	List of active gases from namelist as array)
[in,out]	nrghice	Number of ice-roughness categories
[in]	mpicomm	MPI communicator
[in,out]	is_init_cloud_optics	Initialization flag
[out]	errmsg	CCPP error message
[out]	errflg	CCPP error code

Parameters

rrtmgp_root_dir	RTE-RRTMGP root directory
rrtmgp_sw_file_clouds	RRTMGP file containing K-distribution data
mpirank	Current MPI rank
mpiroot	Master MPI rank
rrtmgp_phys_blksz	Number of horizontal points to process at once.
is_init_gas_optics	Initialization flag

Definition at line 32 of file rrtmgp_sw_main.F90.

rrtmgp_sw_main_run()

subroutine, public rrtmgp_sw_main::rrtmgp_sw_main_run	(	logical, intent(in)	doswrad,
		logical, intent(in)	doswclrsky,
		logical, intent(in)	top_at_1,
		integer, intent(in)	ncol,
		integer, intent(in)	nday,
		integer, intent(in)	nlay,
		integer, intent(in)	ngases,
		integer, intent(in)	rrtmgp_phys_blksz,
		integer, dimension(:), intent(in)	idx,
		integer, dimension(:), intent(in)	icseed_sw,
		integer, intent(in)	iovr,
		integer, intent(in)	iovr_convcld,
		integer, intent(in)	iovr_max,
		integer, intent(in)	iovr_maxrand,
		integer, intent(in)	iovr_rand,
		integer, intent(in)	iovr_dcorr,
		integer, intent(in)	iovr_exp,
		integer, intent(in)	iovr_exprand,
		integer, intent(in)	isubc_sw,
		integer, intent(in)	isfc,
		real(kind_phys), dimension(:), intent(in)	sfc_alb_nir_dir,
		real(kind_phys), dimension(:), intent(in)	sfc_alb_nir_dif,
		real(kind_phys), dimension(:), intent(in)	sfc_alb_uvvis_dir,
		real(kind_phys), dimension(:), intent(in)	sfc_alb_uvvis_dif,
		real(kind_phys), dimension(:), intent(in)	coszen,
		real(kind_phys), dimension(:,:), intent(in)	p_lay,
		real(kind_phys), dimension(:,:), intent(in)	p_lev,
		real(kind_phys), dimension(:,:), intent(in)	t_lay,
		real(kind_phys), dimension(:,:), intent(in)	t_lev,
		real(kind_phys), dimension(:,:), intent(in)	vmr_o2,
		real(kind_phys), dimension(:,:), intent(in)	vmr_h2o,
		real(kind_phys), dimension(:,:), intent(in)	vmr_o3,
		real(kind_phys), dimension(:,:), intent(in)	vmr_ch4,
		real(kind_phys), dimension(:,:), intent(in)	vmr_n2o,
		real(kind_phys), dimension(:,:), intent(in)	vmr_co2,
		real(kind_phys), dimension(:,:), intent(in)	cld_frac,
		real(kind_phys), dimension(:,:), intent(in)	cld_lwp,
		real(kind_phys), dimension(:,:), intent(in)	cld_reliq,
		real(kind_phys), dimension(:,:), intent(in)	cld_iwp,
		real(kind_phys), dimension(:,:), intent(in)	cld_reice,
		real(kind_phys), dimension(:,:), intent(in)	cld_swp,
		real(kind_phys), dimension(:,:), intent(in)	cld_resnow,
		real(kind_phys), dimension(:,:), intent(in)	cld_rwp,
		real(kind_phys), dimension(:,:), intent(in)	cld_rerain,
		real(kind_phys), dimension(:,:), intent(in)	precip_frac,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_cnv_lwp,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_cnv_reliq,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_cnv_iwp,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_cnv_reice,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_pbl_lwp,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_pbl_reliq,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_pbl_iwp,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_pbl_reice,
		real(kind_phys), dimension(:,:), intent(in)	cloud_overlap_param,
		character(len=*), dimension(:), intent(in)	active_gases_array,
		real(kind_phys), dimension(:,:,:), intent(in)	aersw_tau,
		real(kind_phys), dimension(:,:,:), intent(in)	aersw_ssa,
		real(kind_phys), dimension(:,:,:), intent(in)	aersw_g,
		real(kind_phys), intent(in)	solcon,
		type(cmpfsw_type), dimension(:), intent(inout)	scmpsw,
		real(kind_phys), dimension(:,:), intent(inout)	fluxswup_allsky,
		real(kind_phys), dimension(:,:), intent(inout)	fluxswdown_allsky,
		real(kind_phys), dimension(:,:), intent(inout)	fluxswup_clrsky,
		real(kind_phys), dimension(:,:), intent(inout)	fluxswdown_clrsky,
		real(kind_phys), dimension(:,:), intent(inout)	cldtausw,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg
	)

Argument Table

Definition at line 78 of file rrtmgp_sw_main.F90.