The function excessWater()
processes the excess of water.
It follows the expression of Skaugen and Onof (2013) and Skaugen,Peerebom and Nilsson(2015)
if (G(t)+Z(t))/D(t) >R : X(t) = G(t) + Z(t) -R*D(t)
if (G(t)+Z(t))/D(t) <R : X(t) = 0
excessWater(G, Z, D, R)
## Not run: ------------------------------------ # excessWater() ## ---------------------------------------------