swr.F90 File Reference

#include "swde.intfb.h"

Include dependency graph for swr.F90:

Go to the source code of this file.

Functions/Subroutines
subroutine	swr (KIDIA, KFDIA, KLON, KLEV, KNU, PALBD, PCG, PCLD, POMEGA, PSEC, PTAU, PCGAZ, PPIZAZ, PRAY1, PRAY2, PREFZ, PRJ, PRK, PRMUE, PTAUAZ, PTRA1, PTRA2, PTRCLD)

Function/Subroutine Documentation

subroutine swr	(	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)	KNU,
		real(kind=jprb), dimension(klon,nsw), intent(in)	PALBD,
		real(kind=jprb), dimension(klon,nsw,klev), intent(in)	PCG,
		real(kind=jprb), dimension(klon,klev), intent(in)	PCLD,
		real(kind=jprb), dimension(klon,nsw,klev), intent(in)	POMEGA,
		real(kind=jprb), dimension(klon), intent(in)	PSEC,
		real(kind=jprb), dimension(klon,nsw,klev), intent(in)	PTAU,
		real(kind=jprb), dimension(klon,klev), intent(in)	PCGAZ,
		real(kind=jprb), dimension(klon,klev), intent(in)	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)	PRMUE,
		real(kind=jprb), dimension(klon,klev), intent(in)	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)	PTRCLD
	)

Definition at line 7 of file swr.F90.

Here is the call graph for this function:

Here is the caller graph for this function: