gases_ckd Module Reference

Public Member Functions
subroutine, public	gases (ncol, nlm, ib, ig, pp, dp, tt, rmix, o3mix, umco2, umch4, umn2o, hk, tg, pkd, ip1, ip2)
subroutine	qopn2o (fkg, dp, tg)
subroutine	qoph2o (fkg, dp, rmix, tg)
subroutine	qopo3i (fkg, dp, o3mix, tg)
subroutine	qopo3s (fk, dp, o3mix, tg)
subroutine	qophc (fkg, dp, tg)
subroutine, public	pscale (ncol, nlm, ppl, stanp, pkd, ip1, ip2)

Public Attributes
integer(kind=int_kind), parameter, public	mb = 18
integer(kind=int_kind), parameter, public	mbs = 6
integer(kind=int_kind), parameter, public	mbir = 12
integer(kind=int_kind), dimension(mb), parameter, public	kg = (/ 10, 8, 12, 7, 12, 5, 2, 3, 4, 4, 3, 5, 2, 10, 12, 7, 7, 8 /)
real(kind=dbl_kind), dimension(numps), parameter, public	stanps = (/ 10.0, 15.8, 25.1, 39.8, 63.1, 100.0, 158.0, 251.0, 398.0, 631.0, 1000.0 /)
real(kind=dbl_kind), dimension(numpir), parameter, public	stanpir = (/ 0.251, 0.398, 0.631, 1.000, 1.58, 2.51, 3.98, 6.31, 10.0, 15.8, 25.1, 39.8, 63.1, 100.0, 158.0, 251.0, 398.0, 631.0, 1000.0 /)

Detailed Description

Definition at line 6 of file gases_ckd.f90.

Member Function/Subroutine Documentation

subroutine, public gases_ckd::gases	(	integer (kind=int_kind), intent(in)	ncol,
		integer (kind=int_kind), intent(in)	nlm,
		integer (kind=int_kind), intent(in)	ib,
		integer (kind=int_kind), intent(in)	ig,
		real (kind=dbl_kind), dimension(ncol,nlm+1), intent(in)	pp,
		real (kind=dbl_kind), dimension(ncol,nlm), intent(in)	dp,
		real (kind=dbl_kind), dimension(ncol,nlm), intent(in)	tt,
		real (kind=dbl_kind), dimension(ncol,nlm), intent(in)	rmix,
		real (kind=dbl_kind), dimension(ncol,nlm), intent(in)	o3mix,
		real (kind=dbl_kind), intent(in)	umco2,
		real (kind=dbl_kind), intent(in)	umch4,
		real (kind=dbl_kind), intent(in)	umn2o,
		real (kind=dbl_kind), intent(out)	hk,
		real (kind=dbl_kind), dimension(ncol,nlm), intent(out)	tg,
		real (kind=dbl_kind), dimension(ncol,nlm), intent(in)	pkd,
		integer (kind=int_kind), dimension(ncol,nlm), intent(in)	ip1,
		integer (kind=int_kind), dimension(ncol,nlm), intent(in)	ip2
	)

Definition at line 995 of file gases_ckd.f90.

subroutine, public gases_ckd::pscale	(	integer (kind=int_kind), intent(in)	ncol,
		integer (kind=int_kind), intent(in)	nlm,
		real (kind=dbl_kind), dimension(:,:)	ppl,
		real (kind=dbl_kind), dimension(:)	stanp,
		real (kind=dbl_kind), dimension(:,:)	pkd,
		integer (kind=int_kind), dimension(:,:)	ip1,
		integer (kind=int_kind), dimension(:,:)	ip2
	)

Definition at line 1468 of file gases_ckd.f90.

subroutine gases_ckd::qoph2o	(	real (kind=dbl_kind), dimension(:,:), intent(in)	fkg,
		real (kind=dbl_kind), dimension(:,:), intent(in)	dp,
		real (kind=dbl_kind), dimension(:,:), intent(in)	rmix,
		real (kind=dbl_kind), dimension(:,:), intent(out)	tg
	)

Definition at line 1264 of file gases_ckd.f90.

subroutine gases_ckd::qophc	(	real (kind=dbl_kind), dimension(:,:), intent(in)	fkg,
		real (kind=dbl_kind), dimension(:,:), intent(in)	dp,
		real (kind=dbl_kind), dimension(:,:), intent(out)	tg
	)

Definition at line 1332 of file gases_ckd.f90.

subroutine gases_ckd::qopn2o	(	real (kind=dbl_kind), dimension(:,:), intent(in)	fkg,
		real (kind=dbl_kind), dimension(:,:), intent(in)	dp,
		real (kind=dbl_kind), dimension(:,:), intent(out)	tg
	)

Definition at line 1238 of file gases_ckd.f90.

subroutine gases_ckd::qopo3i	(	real (kind=dbl_kind), dimension(:,:), intent(in)	fkg,
		real (kind=dbl_kind), dimension(:,:), intent(in)	dp,
		real (kind=dbl_kind), dimension(:,:), intent(in)	o3mix,
		real (kind=dbl_kind), dimension(:,:), intent(out)	tg
	)

Definition at line 1286 of file gases_ckd.f90.

subroutine gases_ckd::qopo3s	(	real (kind=dbl_kind), intent(in)	fk,
		real (kind=dbl_kind), dimension(:,:), intent(in)	dp,
		real (kind=dbl_kind), dimension(:,:), intent(in)	o3mix,
		real (kind=dbl_kind), dimension(:,:), intent(out)	tg
	)

Definition at line 1308 of file gases_ckd.f90.

Member Data Documentation

integer(kind=int_kind), dimension(mb), parameter, public gases_ckd::kg = (/ 10, 8, 12, 7, 12, 5, 2, 3, 4, 4, 3, 5, 2, 10, 12, 7, 7, 8 /)

Definition at line 41 of file gases_ckd.f90.

integer(kind=int_kind), parameter, public gases_ckd::mb = 18

Definition at line 35 of file gases_ckd.f90.

integer(kind=int_kind), parameter, public gases_ckd::mbir = 12

Definition at line 35 of file gases_ckd.f90.

integer(kind=int_kind), parameter, public gases_ckd::mbs = 6

Definition at line 35 of file gases_ckd.f90.

real(kind=dbl_kind), dimension(numpir), parameter, public gases_ckd::stanpir = (/ 0.251, 0.398, 0.631, 1.000, 1.58, 2.51, 3.98, 6.31, 10.0, 15.8, 25.1, 39.8, 63.1, 100.0, 158.0, 251.0, 398.0, 631.0, 1000.0 /)

Definition at line 61 of file gases_ckd.f90.

real(kind=dbl_kind), dimension(numps), parameter, public gases_ckd::stanps = (/ 10.0, 15.8, 25.1, 39.8, 63.1, 100.0, 158.0, 251.0, 398.0, 631.0, 1000.0 /)

Definition at line 57 of file gases_ckd.f90.

---

The documentation for this module was generated from the following file:

• gases_ckd.f90