swni.F90 File Reference

#include "swclr.intfb.h"
#include "swde.intfb.h"
#include "swr.intfb.h"
#include "swtt.intfb.h"
#include "swtt1.intfb.h"

Include dependency graph for swni.F90:

Go to the source code of this file.

Functions/Subroutines
subroutine	swni (KIDIA, KFDIA, KLON, KLEV, KAER, KNU, PAER, PAKI, PALBD, PALBP, PCG, PCLD, PCLEAR, PDSIG, POMEGA, POZ, PRMU, PSEC, PTAU, PUD, PWV, PQS, PFDOWN, PFUP, PCDOWN, PCUP, PSUDU2, PDIFF, PDIRF,

Function/Subroutine Documentation

subroutine swni	(	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,2,nsw), intent(in)	PAKI,
		real(kind=jprb), dimension(klon,nsw), intent(in)	PALBD,
		real(kind=jprb), dimension(klon,nsw), intent(in)	PALBP,
		real(kind=jprb), dimension(klon,nsw,klev), intent(in)	PCG,
		real(kind=jprb), dimension(klon,klev), intent(in)	PCLD,
		real(kind=jprb), dimension(klon), intent(in)	PCLEAR,
		real(kind=jprb), dimension(klon,klev), intent(in)	PDSIG,
		real(kind=jprb), dimension(klon,nsw,klev), intent(in)	POMEGA,
		real(kind=jprb), dimension(klon,klev), intent(in)	POZ,
		real(kind=jprb), dimension(klon), intent(in)	PRMU,
		real(kind=jprb), dimension(klon), intent(in)	PSEC,
		real(kind=jprb), dimension(klon,nsw,klev), intent(in)	PTAU,
		real(kind=jprb), dimension(klon,5,klev+1), intent(in)	PUD,
		real(kind=jprb), dimension(klon,klev), intent(in)	PWV,
		real(kind=jprb), dimension(klon,klev), intent(in)	PQS,
		real(kind=jprb), dimension(klon,klev+1), intent(out)	PFDOWN,
		real(kind=jprb), dimension(klon,klev+1), intent(out)	PFUP,
		real(kind=jprb), dimension(klon,klev+1), intent(out)	PCDOWN,
		real(kind=jprb), dimension(klon,klev+1), intent(out)	PCUP,
		real(kind=jprb), dimension(klon), intent(out)	PSUDU2,
		real(kind=jprb), dimension(klon,klev), intent(out)	PDIFF,
		real(kind=jprb), dimension(klon,klev), intent(out)	PDIRF
	)

Definition at line 8 of file swni.F90.

Here is the call graph for this function:

Here is the caller graph for this function: