init_vegn.F90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	init_veg_n (KPATCH, KI, OCANOPY, HROUGH, OAGRI_TO_GRASS, TPSNOW, HPHOTO, OIMP_VEG, OIMP_Z0, OIMP_EMIS, PLAIMIN, PH_TREE, PVEGTYPE_PATCH, PLAI, PZ0, PVEG, PEMIS, OTR_ML, PFAPARC, PFAPIRC, PLAI_EFFC, PMUS, PALBNIR_SOIL, PALBVIS_SOIL, PALBUV_SOIL, PALBNIR, PALBVIS, PALBUV, OSURF_DIAG_ALBEDO, PPSN, PPSNG, PPSNV, PPSNV_A, PDIR_ALB, PSCA_ALB, PEMIS_OUT, PTSRAD)

Function/Subroutine Documentation

subroutine init_veg_n	(	integer, intent(in)	KPATCH,
		integer, intent(in)	KI,
		logical, intent(in)	OCANOPY,
		character(len=4), intent(inout)	HROUGH,
		logical, intent(in)	OAGRI_TO_GRASS,
		type(surf_snow), intent(inout)	TPSNOW,
		character(len=3), intent(in)	HPHOTO,
		logical, intent(in)	OIMP_VEG,
		logical, intent(in)	OIMP_Z0,
		logical, intent(in)	OIMP_EMIS,
		real, dimension(:,:), intent(in)	PLAIMIN,
		real, dimension(:,:), intent(in)	PH_TREE,
		real, dimension(:,:,:), intent(in)	PVEGTYPE_PATCH,
		real, dimension(:,:), intent(inout)	PLAI,
		real, dimension(:,:), intent(inout)	PZ0,
		real, dimension(:,:), intent(inout)	PVEG,
		real, dimension(:,:), intent(inout)	PEMIS,
		logical, intent(in)	OTR_ML,
		real, dimension(:,:), pointer	PFAPARC,
		real, dimension(:,:), pointer	PFAPIRC,
		real, dimension(:,:), pointer	PLAI_EFFC,
		real, dimension(:,:), pointer	PMUS,
		real, dimension(:,:), pointer	PALBNIR_SOIL,
		real, dimension(:,:), pointer	PALBVIS_SOIL,
		real, dimension(:,:), pointer	PALBUV_SOIL,
		real, dimension(:,:), pointer	PALBNIR,
		real, dimension(:,:), pointer	PALBVIS,
		real, dimension(:,:), pointer	PALBUV,
		logical, intent(out)	OSURF_DIAG_ALBEDO,
		real, dimension(:,:), pointer	PPSN,
		real, dimension(:,:), pointer	PPSNG,
		real, dimension(:,:), pointer	PPSNV,
		real, dimension(:,:), pointer	PPSNV_A,
		real, dimension(:,:), intent(out)	PDIR_ALB,
		real, dimension(:,:), intent(out)	PSCA_ALB,
		real, dimension(:), intent(out)	PEMIS_OUT,
		real, dimension(:), intent(out)	PTSRAD
	)

Definition at line 6 of file init_vegn.F90.

Here is the call graph for this function:

Here is the caller graph for this function: