land_model Module

Sam Hatfield, Fred Kucharski, Franco Molteni
09/05/2019
130 statements
Source File

For running the land-surface model.

Uses

- params
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Used by

Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Variables

Type	Visibility	Attributes		Name		Initial
real,	private		::	rhcapl(ix,il)			1/heat capacity (land)
real,	private		::	cdland(ix,il)			1/dissipation time (land)
real,	private		::	stlcl_ob(ix,il)			Climatological land surface temperature
real,	private		::	snowdcl_ob(ix,il)			Climatological snow depth (water equivalent)
real,	private		::	soilwcl_ob(ix,il)			Climatological soil water availability
real,	public		::	stl_am(ix,il)			Land surface temperature
real,	public		::	snowd_am(ix,il)			Snow depth (water equivalent)
real,	public		::	soilw_am(ix,il)			Soil water availability
real,	private		::	stl_lm(ix,il)			Land-model surface temperature
real,	public		::	fmask_l(ix,il)			Fraction of land
real,	private		::	bmask_l(ix,il)			Binary land mask
real,	private		::	stl12(ix,il,12)			Land surface temperature monthly-mean climatology
real,	private		::	snowd12(ix,il,12)			Snow depth (water equivalent) monthly-mean climatology
real,	private		::	soilw12(ix,il,12)			Soil water availability monthly-mean climatology
integer,	public		::	land_coupling_flag	=	1	Flag for land-coupling (0: off, 1: on)
real,	public,	parameter	::	sd2sc	=	60.0	Snow depth (mm water) corresponding to snow cover = 1

Subroutines

public subroutine land_model_init()

Initializes land model.

Arguments

None

public subroutine couple_land_atm(day)

Exchanges fluxes between land and atmosphere.

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	day	The day (starting at 0 for the first time step)

private subroutine run_land_model()

Integrates slab land-surface model for one day.

Arguments

None