Hypsographic Functions for Conical Lake Geometry

Share:

Description

The functions calculate area resp. volume of a lake with an ellipsoidic depth profile.

Usage

1
2
3
4
5
areaFunction(level, zmax, amax)

volumeFunction(level, zmax, amax)

vol2level(vol, zmax, amax)

Arguments

level

vector of water level above ground

zmax

maximum lake depth

amax

surface area of the lake surface for level = zmax

vol

vector of given volume(s)

Examples

1
2
3
4
5
6
7
level <- seq(0, 50, 1)
amax  <- 9e6
zmax  <- 50
area <- areaFunction(level, zmax, amax)
vol  <- volumeFunction(level, zmax, amax)
plot(vol, cumsum(area), type="l")
(vol - cumsum(area)) / vol

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.