# The following is a toy example. I strongly recommend to see
# the package vignettes in order to improve your skills on HBV.IANIGLA
## Create an input data and run the module
DataMatrix <- cbind(
runif(n = 100, min = 0, max = 50),
runif(n = 100, min = 0, max = 200)
)
dischGl <- Glacier_Disch(model = 1, inputData = DataMatrix,
initCond = 100, param = c(0.1, 0.9, 10))
Run the code above in your browser using DataLab