srtm_setcoef.F90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	srtm_setcoef (KLEV, KNMOL, PAVEL, PTAVEL, PZ, PTZ, PTBOUND, PCOLDRY, PWKL, KLAYTROP, KLAYSWTCH, KLAYLOW, PCO2MULT, PCOLCH4, PCOLCO2, PCOLH2O, PCOLMOL, PCOLN2O, PCOLO2, PCOLO3, PFORFAC, PFORFRAC, KINDFOR, PSELFFAC, PSELFFRAC, KINDSELF, PFAC00, PFAC01, PFAC10, PFAC11, KJP, KJT, KJT1)

Function/Subroutine Documentation

subroutine srtm_setcoef	(	integer(kind=jpim), intent(in)	KLEV,
		integer(kind=jpim)	KNMOL,
		real(kind=jprb), dimension(jplay), intent(in)	PAVEL,
		real(kind=jprb), dimension(jplay), intent(in)	PTAVEL,
		real(kind=jprb), dimension(0:jplay)	PZ,
		real(kind=jprb), dimension(0:jplay), intent(in)	PTZ,
		real(kind=jprb), intent(in)	PTBOUND,
		real(kind=jprb), dimension(jplay), intent(in)	PCOLDRY,
		real(kind=jprb), dimension(35,jplay), intent(in)	PWKL,
		integer(kind=jpim), intent(out)	KLAYTROP,
		integer(kind=jpim), intent(out)	KLAYSWTCH,
		integer(kind=jpim), intent(out)	KLAYLOW,
		real(kind=jprb), dimension(jplay), intent(out)	PCO2MULT,
		real(kind=jprb), dimension(jplay), intent(out)	PCOLCH4,
		real(kind=jprb), dimension(jplay), intent(out)	PCOLCO2,
		real(kind=jprb), dimension(jplay), intent(out)	PCOLH2O,
		real(kind=jprb), dimension(jplay), intent(out)	PCOLMOL,
		real(kind=jprb), dimension(jplay), intent(out)	PCOLN2O,
		real(kind=jprb), dimension(jplay), intent(out)	PCOLO2,
		real(kind=jprb), dimension(jplay), intent(out)	PCOLO3,
		real(kind=jprb), dimension(jplay), intent(out)	PFORFAC,
		real(kind=jprb), dimension(jplay), intent(out)	PFORFRAC,
		integer(kind=jpim), dimension(jplay), intent(out)	KINDFOR,
		real(kind=jprb), dimension(jplay), intent(out)	PSELFFAC,
		real(kind=jprb), dimension(jplay), intent(out)	PSELFFRAC,
		integer(kind=jpim), dimension(jplay), intent(out)	KINDSELF,
		real(kind=jprb), dimension(jplay), intent(out)	PFAC00,
		real(kind=jprb), dimension(jplay), intent(out)	PFAC01,
		real(kind=jprb), dimension(jplay), intent(out)	PFAC10,
		real(kind=jprb), dimension(jplay), intent(out)	PFAC11,
		integer(kind=jpim), dimension(jplay), intent(out)	KJP,
		integer(kind=jpim), dimension(jplay), intent(out)	KJT,
		integer(kind=jpim), dimension(jplay), intent(out)	KJT1
	)

Definition at line 11 of file srtm_setcoef.F90.

Here is the call graph for this function:

Here is the caller graph for this function: