drag.F90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	drag (HISBA, HSNOW_ISBA, HCPSURF, PTSTEP, PTG, PWG, PWGI, PEXNS, PEXNA, PTA, PVMOD, PQA, PRR, PSR, PPS, PRS, PVEG, PZ0, PZ0EFF, PZ0H, PWFC, PWSAT, PPSNG, PPSNV, PZREF, PUREF, PDIRCOSZW, PDELTA, PF5, PRA, PCH, PCD, PCDN, PRI, PHUG, PHUGI, PHV, PHU, PCPS, PQS, PFFG, PFFV, PFF, PFFG_NOSNOW, PFFV_NOSNOW, PLEG_DELTA, PLEGI_DELTA, PWR, PRHOA, PLVTT, PQSAT)
subroutine	limit_ler (PDELTA)

Function/Subroutine Documentation

drag()

subroutine drag	(	character(len=*), intent(in)	HISBA,
		character(len=*), intent(in)	HSNOW_ISBA,
		character(len=*), intent(in)	HCPSURF,
		real, intent(in)	PTSTEP,
		real, dimension(:), intent(in)	PTG,
		real, dimension(:), intent(in)	PWG,
		real, dimension(:), intent(in)	PWGI,
		real, dimension(:), intent(in)	PEXNS,
		real, dimension(:), intent(in)	PEXNA,
		real, dimension(:), intent(in)	PTA,
		real, dimension(:), intent(in)	PVMOD,
		real, dimension(:), intent(in)	PQA,
		real, dimension(:), intent(in)	PRR,
		real, dimension(:), intent(in)	PSR,
		real, dimension(:), intent(in)	PPS,
		real, dimension(:), intent(in)	PRS,
		real, dimension(:), intent(in)	PVEG,
		real, dimension(:), intent(in)	PZ0,
		real, dimension(:), intent(in)	PZ0EFF,
		real, dimension(:), intent(in)	PZ0H,
		real, dimension(:), intent(in)	PWFC,
		real, dimension(:), intent(in)	PWSAT,
		real, dimension(:), intent(in)	PPSNG,
		real, dimension(:), intent(in)	PPSNV,
		real, dimension(:), intent(in)	PZREF,
		real, dimension(:), intent(in)	PUREF,
		real, dimension(:), intent(in)	PDIRCOSZW,
		real, dimension(:), intent(inout)	PDELTA,
		real, dimension(:), intent(in)	PF5,
		real, dimension(:), intent(inout)	PRA,
		real, dimension(:), intent(out)	PCH,
		real, dimension(:), intent(out)	PCD,
		real, dimension(:), intent(out)	PCDN,
		real, dimension(:), intent(out)	PRI,
		real, dimension(:), intent(out)	PHUG,
		real, dimension(:), intent(out)	PHUGI,
		real, dimension(:), intent(out)	PHV,
		real, dimension(:), intent(out)	PHU,
		real, dimension(:), intent(inout)	PCPS,
		real, dimension(:), intent(out)	PQS,
		real, dimension(:), intent(in)	PFFG,
		real, dimension(:), intent(in)	PFFV,
		real, dimension(:), intent(in)	PFF,
		real, dimension(:), intent(in)	PFFG_NOSNOW,
		real, dimension(:), intent(in)	PFFV_NOSNOW,
		real, dimension(:), intent(out)	PLEG_DELTA,
		real, dimension(:), intent(out)	PLEGI_DELTA,
		real, dimension(:), intent(in)	PWR,
		real, dimension(:), intent(in)	PRHOA,
		real, dimension(:), intent(in)	PLVTT,
		real, dimension(:), intent(out), optional	PQSAT
	)

Definition at line 13 of file drag.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

limit_ler()

subroutine drag::limit_ler

(

real, dimension(:), intent(inout)

PDELTA

)

Definition at line 431 of file drag.F90.

Here is the caller graph for this function: