compute_tau_rayleigh Subroutine

public subroutine compute_tau_rayleigh(ncol, nlay, nbnd, ngpt, ngas, nflav, neta, npres, ntemp, gpoint_flavor, band_lims_gpt, krayl, idx_h2o, col_dry, col_gas, fminor, jeta, tropo, jtemp, tau_rayleigh) bind(C, name="0")

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	ncol
integer,	intent(in)			::	nlay
integer,	intent(in)			::	nbnd
integer,	intent(in)			::	ngpt
integer,	intent(in)			::	ngas
integer,	intent(in)			::	nflav
integer,	intent(in)			::	neta
integer,	intent(in)			::	npres
integer,	intent(in)			::	ntemp
integer,	intent(in),		dimension(2,ngpt)	::	gpoint_flavor
integer,	intent(in),		dimension(2,nbnd)	::	band_lims_gpt
real(kind=wp),	intent(in),		dimension(ntemp,neta,ngpt,2)	::	krayl
integer,	intent(in)			::	idx_h2o
real(kind=wp),	intent(in),		dimension(ncol,nlay)	::	col_dry
real(kind=wp),	intent(in),		dimension(ncol,nlay,0:ngas)	::	col_gas
real(kind=wp),	intent(in),		dimension(2,2,ncol,nlay,nflav)	::	fminor
integer,	intent(in),		dimension(2, ncol,nlay,nflav)	::	jeta
logical(kind=wl),	intent(in),		dimension(ncol,nlay)	::	tropo
integer,	intent(in),		dimension(ncol,nlay)	::	jtemp
real(kind=wp),	intent(out),		dimension(ncol,nlay,ngpt)	::	tau_rayleigh

Contents

None