suaerv.F90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	suaerv (KLEV, PETAH, PVDAES, PVDAEL, PVDAEU, PVDAED, PTRBGA, PVOBGA, PSTBGA, PAEOPS, PAEOPL, PAEOPU, PAEOPD, PTRPT, PAEADK, PAEADM, PAEROS)

Function/Subroutine Documentation

subroutine suaerv	(	integer(kind=jpim), intent(in)	KLEV,
		real(kind=jprb), dimension(klev+1), intent(in)	PETAH,
		real(kind=jprb), dimension(klev+1), intent(out)	PVDAES,
		real(kind=jprb), dimension(klev+1), intent(out)	PVDAEL,
		real(kind=jprb), dimension(klev+1), intent(out)	PVDAEU,
		real(kind=jprb), dimension(klev+1), intent(out)	PVDAED,
		real(kind=jprb), intent(out)	PTRBGA,
		real(kind=jprb), intent(out)	PVOBGA,
		real(kind=jprb), intent(out)	PSTBGA,
		real(kind=jprb), intent(out)	PAEOPS,
		real(kind=jprb), intent(out)	PAEOPL,
		real(kind=jprb), intent(out)	PAEOPU,
		real(kind=jprb), intent(out)	PAEOPD,
		real(kind=jprb), intent(out)	PTRPT,
		real(kind=jprb), dimension(3), intent(out)	PAEADK,
		real(kind=jprb), intent(out)	PAEADM,
		real(kind=jprb), intent(out)	PAEROS
	)

Definition at line 7 of file suaerv.F90.

Here is the call graph for this function:

Here is the caller graph for this function: