CAM: mo_jlong Module Reference

CAM

Data Types
interface	jlong

Functions/Subroutines
subroutine, public	jlong_init (xs_long_file, rsf_file, lng_indexer)

subroutine	get_xsqy (xs_long_file, lng_indexer)

subroutine	get_rsf (rsf_file)

subroutine, public	jlong_timestep_init

subroutine	jlong_hrates (nlev, sza_in, alb_in, p_in, t_in, mw, o2_vmr, o3_vmr, colo3_in, qrl_col, cparg, kbot)

subroutine	jlong_photo (nlev, sza_in, alb_in, p_in, t_in, colo3_in, j_long)

subroutine	interpolate_rsf (alb_in, sza_in, p_in, colo3_in, kbot,

Variables
real(r8), parameter	hc = 6.62608e-34_r8 * 2.9979e8_r8 / 1.

real(r8), parameter	wc_o2_b = 242.37_r8

real(r8), parameter	wc_o3_a = 310.32_r8

real(r8), parameter	wc_o3_b = 1179.87_r8

integer	nw

integer	nt

integer	np_xs

integer, public	numj

integer	nump

integer	numsza

integer	numalb

integer	numcolo3

real(r4), dimension(:,:,:,:), allocatable	xsqy

real(r8), dimension(:), allocatable	wc

real(r8), dimension(:), allocatable	we

real(r8), dimension(:), allocatable	wlintv

real(r8), dimension(:), allocatable	etfphot

real(r8), dimension(:), allocatable	bde_o2_b

real(r8), dimension(:), allocatable	bde_o3_a

real(r8), dimension(:), allocatable	bde_o3_b

real(r8), dimension(:,:,:), allocatable	xs_o2b

real(r8), dimension(:,:,:), allocatable	xs_o3a

real(r8), dimension(:,:,:), allocatable	xs_o3b

real(r8), dimension(:), allocatable	p

real(r8), dimension(:), allocatable	del_p

real(r8), dimension(:), allocatable	prs

real(r8), dimension(:), allocatable	dprs

real(r8), dimension(:), allocatable	sza

real(r8), dimension(:), allocatable	del_sza

real(r8), dimension(:), allocatable	alb

real(r8), dimension(:), allocatable	del_alb

real(r8), dimension(:), allocatable	o3rat

real(r8), dimension(:), allocatable	del_o3rat

real(r8), dimension(:), allocatable	colo3

real(r4), dimension(:,:,:,:,:), allocatable	rsf_tab

logical	jlong_used = .false.

Function/Subroutine Documentation

◆ get_rsf()

subroutine mo_jlong::get_rsf ( character(len=*) rsf_file )

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_xsqy()

subroutine mo_jlong::get_xsqy	(	character(len=*)	xs_long_file,
		integer, dimension(:), intent(inout)	lng_indexer
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ interpolate_rsf()

subroutine mo_jlong::interpolate_rsf	(	real(r8), dimension(:), intent(in)	alb_in,
		real(r8), intent(in)	sza_in,
		real(r8), dimension(:), intent(in)	p_in,
		real(r8), dimension(:), intent(in)	colo3_in,
		integer, intent(in)	kbot
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ jlong_hrates()

subroutine mo_jlong::jlong_hrates	(	integer, intent(in)	nlev,
		real(r8), intent(in)	sza_in,
		real(r8), dimension(nlev), intent(in)	alb_in,
		real(r8), dimension(nlev), intent(in)	p_in,
		real(r8), dimension(nlev), intent(in)	t_in,
		real(r8), dimension(nlev), intent(in)	mw,
		real(r8), dimension(nlev), intent(in)	o2_vmr,
		real(r8), dimension(nlev), intent(in)	o3_vmr,
		real(r8), dimension(nlev), intent(in)	colo3_in,
		real(r8), dimension(:,:), intent(inout)	qrl_col,
		real(r8), dimension(nlev), intent(in)	cparg,
		integer, intent(in)	kbot
	)

Here is the call graph for this function:

◆ jlong_init()

subroutine, public mo_jlong::jlong_init	(	character(len=*), intent(in)	xs_long_file,
		character(len=*), intent(in)	rsf_file,
		integer, dimension(:), intent(inout)	lng_indexer
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ jlong_photo()

subroutine mo_jlong::jlong_photo	(	integer, intent(in)	nlev,
		real(r8), intent(in)	sza_in,
		real(r8), dimension(nlev), intent(in)	alb_in,
		real(r8), dimension(nlev), intent(in)	p_in,
		real(r8), dimension(nlev), intent(in)	t_in,
		real(r8), dimension(nlev), intent(in)	colo3_in,
		real(r8), dimension(:,:), intent(out)	j_long
	)

Here is the call graph for this function:

◆ jlong_timestep_init()

subroutine, public mo_jlong::jlong_timestep_init ( )

Here is the call graph for this function:

Here is the caller graph for this function:

Variable Documentation

◆ alb

real(r8), dimension(:), allocatable mo_jlong::alb

private

◆ bde_o2_b

real(r8), dimension(:), allocatable mo_jlong::bde_o2_b

private

◆ bde_o3_a

real(r8), dimension(:), allocatable mo_jlong::bde_o3_a

private

◆ bde_o3_b

real(r8), dimension(:), allocatable mo_jlong::bde_o3_b

private

◆ colo3

real(r8), dimension(:), allocatable mo_jlong::colo3

private

◆ del_alb

real(r8), dimension(:), allocatable mo_jlong::del_alb

private

◆ del_o3rat

real(r8), dimension(:), allocatable mo_jlong::del_o3rat

private

◆ del_p

real(r8), dimension(:), allocatable mo_jlong::del_p

private

◆ del_sza

real(r8), dimension(:), allocatable mo_jlong::del_sza

private

◆ dprs

real(r8), dimension(:), allocatable mo_jlong::dprs

private

◆ etfphot

real(r8), dimension(:), allocatable mo_jlong::etfphot

private

◆ hc

real(r8), parameter mo_jlong::hc = 6.62608e-34_r8 * 2.9979e8_r8 / 1.

private

◆ jlong_used

logical mo_jlong::jlong_used = .false.

private

◆ np_xs

integer mo_jlong::np_xs

private

◆ nt

integer mo_jlong::nt

private

◆ numalb

integer mo_jlong::numalb

private

◆ numcolo3

integer mo_jlong::numcolo3

private

◆ numj

integer, public mo_jlong::numj

◆ nump

integer mo_jlong::nump

private

◆ numsza

integer mo_jlong::numsza

private

◆ nw

integer mo_jlong::nw

private

◆ o3rat

real(r8), dimension(:), allocatable mo_jlong::o3rat

private

◆ p

real(r8), dimension(:), allocatable mo_jlong::p

private

◆ prs

real(r8), dimension(:), allocatable mo_jlong::prs

private

◆ rsf_tab

real(r4), dimension(:,:,:,:,:), allocatable mo_jlong::rsf_tab

private

◆ sza

real(r8), dimension(:), allocatable mo_jlong::sza

private

◆ wc

real(r8), dimension(:), allocatable mo_jlong::wc

private

◆ wc_o2_b

real(r8), parameter mo_jlong::wc_o2_b = 242.37_r8

private

◆ wc_o3_a

real(r8), parameter mo_jlong::wc_o3_a = 310.32_r8

private

◆ wc_o3_b

real(r8), parameter mo_jlong::wc_o3_b = 1179.87_r8

private

◆ we

real(r8), dimension(:), allocatable mo_jlong::we

private

◆ wlintv

real(r8), dimension(:), allocatable mo_jlong::wlintv

private

◆ xs_o2b

real(r8), dimension(:,:,:), allocatable mo_jlong::xs_o2b

private

◆ xs_o3a

real(r8), dimension(:,:,:), allocatable mo_jlong::xs_o3a

private

◆ xs_o3b

real(r8), dimension(:,:,:), allocatable mo_jlong::xs_o3b

private

◆ xsqy

real(r4), dimension(:,:,:,:), allocatable mo_jlong::xsqy

private

mo_jlong
Generated by 1.8.13