Signed-off-by: Olivier Delaigue <olivier.delaigue@irstea.fr>

R/Calibration_optim.R

@@ -139,7 +139,7 @@ Calibration_optim <- function(InputsModel,RunOptions,InputsCrit,CalibOptions,FUN
     OutputsCalib <- list(as.double(ParamFinalR),CritFinal*Multiplier,as.integer(RESULT$counts[1]),CritName,CritBestValue);
     names(OutputsCalib) <- c("ParamFinalR","CritFinal","NRuns","CritName","CritBestValue");
     class(OutputsCalib) <- c("OutputsCalib","optim");
-    return(OutputsCalib);
+    return(OutputsCalib)
 
 
 }