Commit cba7f37e authored by unknown's avatar unknown
Browse files

v1.0.9.53 minor revision of Calibration_Michel

parent 1b62dfdd
Package: airGR
Type: Package
Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
Version: 1.0.9.52
Date: 2017-10-23
Version: 1.0.9.53
Date: 2017-10-26
Authors@R: c(
person("Laurent", "Coron", role = c("aut", "trl")),
person("Charles", "Perrin", role = c("aut", "ths")),
......
......@@ -14,7 +14,7 @@ output:
### 1.0.9.52 Release Notes (2017-10-23)
### 1.0.9.53 Release Notes (2017-10-26)
#### New features
......
......@@ -341,12 +341,7 @@ Calibration_Michel <- function(InputsModel, RunOptions, InputsCrit, CalibOptions
VectPace <- NewParamOptimT-OldParamOptimT
for (iC in 1:NParam) {
if (OptimParam[iC]) {
if (VectPace[iC] != 0) {
PaceDiag[iC] <- CLG * PaceDiag[iC] + (1-CLG) * VectPace[iC]
}
if (VectPace[iC] == 0) {
PaceDiag[iC] <- CLG*PaceDiag[iC]
}
PaceDiag[iC] <- CLG * PaceDiag[iC] + (1-CLG) * VectPace[iC]
}
}
} else {
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment