lwvd.F90 File Reference

#include "lwttm.intfb.h"

Include dependency graph for lwvd.F90:

Go to the source code of this file.

Functions/Subroutines
subroutine	lwvd (KIDIA, KFDIA, KLON, KLEV, KTRAER, PABCU, PDBDT, PGA, PGB, PCNTRB, PDISD, PDISU, PDWFSU)

Function/Subroutine Documentation

subroutine lwvd	(	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)	KTRAER,
		real(kind=jprb), dimension(klon,nua,3*klev+1), intent(in)	PABCU,
		real(kind=jprb), dimension(klon,nsil,klev), intent(in)	PDBDT,
		real(kind=jprb), dimension(klon,nipd,2,klev), intent(in)	PGA,
		real(kind=jprb), dimension(klon,nipd,2,klev), intent(in)	PGB,
		real(kind=jprb), dimension(klon,klev+1,klev+1), intent(out)	PCNTRB,
		real(kind=jprb), dimension(klon,klev+1), intent(out)	PDISD,
		real(kind=jprb), dimension(klon,klev+1), intent(out)	PDISU,
		real(kind=jprb), dimension(klon,nsil), intent(inout)	PDWFSU
	)

Definition at line 7 of file lwvd.F90.

Here is the call graph for this function:

Here is the caller graph for this function: