swclr.F90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	swclr (KIDIA, KFDIA, KLON, KLEV, KAER, KNU, PAER, PALBP, PDSIG, PRAYL, PSEC, PCGAZ, PPIZAZ, PRAY1, PRAY2, PREFZ, PRJ, PRK, PRMU0, PTAUAZ, PTRA1, PTRA2, PTRCLR,

Function/Subroutine Documentation

subroutine swclr	(	integer(kind=jpim), intent(in)	KIDIA,
		integer(kind=jpim), intent(in)	KFDIA,
		integer(kind=jpim), intent(in)	KLON,
		integer(kind=jpim), intent(in)	KLEV,
		integer(kind=jpim), intent(in)	KAER,
		integer(kind=jpim), intent(in)	KNU,
		real(kind=jprb), dimension(klon,6,klev), intent(in)	PAER,
		real(kind=jprb), dimension(klon,nsw), intent(in)	PALBP,
		real(kind=jprb), dimension(klon,klev), intent(in)	PDSIG,
		real(kind=jprb), dimension(klon), intent(in)	PRAYL,
		real(kind=jprb), dimension(klon), intent(in)	PSEC,
		real(kind=jprb), dimension(klon,klev), intent(out)	PCGAZ,
		real(kind=jprb), dimension(klon,klev), intent(out)	PPIZAZ,
		real(kind=jprb), dimension(klon,klev+1), intent(out)	PRAY1,
		real(kind=jprb), dimension(klon,klev+1), intent(out)	PRAY2,
		real(kind=jprb), dimension(klon,2,klev+1), intent(out)	PREFZ,
		real(kind=jprb), dimension(klon,6,klev+1), intent(out)	PRJ,
		real(kind=jprb), dimension(klon,6,klev+1), intent(out)	PRK,
		real(kind=jprb), dimension(klon,klev+1), intent(out)	PRMU0,
		real(kind=jprb), dimension(klon,klev), intent(out)	PTAUAZ,
		real(kind=jprb), dimension(klon,klev+1), intent(out)	PTRA1,
		real(kind=jprb), dimension(klon,klev+1), intent(out)	PTRA2,
		real(kind=jprb), dimension(klon), intent(out)	PTRCLR
	)

Definition at line 7 of file swclr.F90.

Here is the call graph for this function:

Here is the caller graph for this function: