run_one_day: Runs SPLASH at a single location for one day

Description

Runs SPLASH at a single location for one day

Usage

run_one_day(lat, elv, n, y, wn, sf, tc, pn, kCw = 1.05, kWm = 150)

Value

List with the following components:

ho .......... daily solar irradiation, J/m2
hn .......... daily net radiation, J/m2
ppfd ........ daily PPFD, mol/m2
cond ........ daily condensation water, mm
eet ......... daily equilibrium ET, mm
pet ......... daily potential ET, mm
aet ......... daily actual ET, mm
wn .......... daily soil moisture, mm
ro .......... daily runoff, mm

Arguments

lat: double, decimal degrees.
elv: double, elevation, m A.S.L. Default: $0$ .
n: double, day of year.
y: double, year. Default: $0$ .
wn: double, daily soil moisture content, mm (wn).
sf: double, fraction of sunshine hours. Default: $1$ .
tc: double, mean daily air temperature, degrees C. Default: $23.0$ .
pn: double, daily precipitation, mm/day.
kCw: double, supply constant, mm/hr. Default: $1.05$ (Federer, 1982)
kWm: double, soil moisture capacity, mm. Default: $150$ (Cramer-Prentice, 1988)

References

Cramer, W. and Prentice, I.C., 1988. Simulation of regional soil moisture deficits on a European scale. Norsk Geografisk Tidsskrift - Norwegian Journal of Geography, 42(2-3), pp.149–151. tools:::Rd_expr_doi("10.1080/00291958808552193")

Federer, C.A., 1982. Transpirational supply and demand: plant, soil, and atmospheric effects evaluated by simulation. Water Resources Research, 18(2), pp.355-362. tools:::Rd_expr_doi("10.1029/WR018i002p00355")

Examples

Run this code

soil <- run_one_day(lat = 37.7,
                    elv = 142,
                    n = 172,
                    y = 2000,
                    wn = 75,
                    sf = 1,
                    tc = 23,
                    pn = 5)
cat(sprintf("Soil moisture (run one day):\n"))
cat(sprintf("  Ho: %0.6f J/m2\n", soil$ho))
cat(sprintf("  Hn: %0.6f J/m2\n", soil$hn))
cat(sprintf("  PPFD: %0.6f mol/m2\n", soil$ppfd))
cat(sprintf("  EET: %0.6f mm/d\n", soil$eet))
cat(sprintf("  PET: %0.6f mm/d\n", soil$pet))
cat(sprintf("  AET: %0.6f mm/d\n", soil$aet))
cat(sprintf("  Cn: %0.6f mm/d\n", soil$cond))
cat(sprintf("  Wn: %0.6f mm\n", soil$wn))
cat(sprintf("  RO: %0.6f mm\n", soil$ro))