lwvb.F90 File Reference

#include "lwtt.intfb.h"

Include dependency graph for lwvb.F90:

Go to the source code of this file.

Functions/Subroutines
subroutine	lwvb (KIDIA, KFDIA, KLON, KLEV, KUAER, PABCU, PADJD, PADJU, PB, PBINT, PBSUR, PBTOP, PDISD, PDISU, PEMIS, PEMIW, PGASUR, PGBSUR, PGATOP, PGBTOP, PDWFSU, PFLUC)

Function/Subroutine Documentation

subroutine lwvb	(	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)	KUAER,
		real(kind=jprb), dimension(klon,nua,3*klev+1), intent(in)	PABCU,
		real(kind=jprb), dimension(klon,klev+1), intent(in)	PADJD,
		real(kind=jprb), dimension(klon,klev+1), intent(in)	PADJU,
		real(kind=jprb), dimension(klon,nsil,klev+1), intent(in)	PB,
		real(kind=jprb), dimension(klon,klev+1), intent(in)	PBINT,
		real(kind=jprb), dimension(klon,nsil), intent(in)	PBSUR,
		real(kind=jprb), dimension(klon,nsil), intent(in)	PBTOP,
		real(kind=jprb), dimension(klon,klev+1), intent(in)	PDISD,
		real(kind=jprb), dimension(klon,klev+1), intent(in)	PDISU,
		real(kind=jprb), dimension(klon), intent(in)	PEMIS,
		real(kind=jprb), dimension(klon), intent(in)	PEMIW,
		real(kind=jprb), dimension(klon,nipd,2), intent(in)	PGASUR,
		real(kind=jprb), dimension(klon,nipd,2), intent(in)	PGBSUR,
		real(kind=jprb), dimension(klon,nipd,2), intent(in)	PGATOP,
		real(kind=jprb), dimension(klon,nipd,2), intent(in)	PGBTOP,
		real(kind=jprb), dimension(klon,nsil), intent(inout)	PDWFSU,
		real(kind=jprb), dimension(klon,2,klev+1), intent(out)	PFLUC
	)

Definition at line 9 of file lwvb.F90.

Here is the call graph for this function:

Here is the caller graph for this function: