diff --git a/R/RunModel_Lag.R b/R/RunModel_Lag.R
index 5b9bec1092004d50eabd392fc9bb177e8d7f9596..d3cb9467efe579b68c72e8453fcafaf81279d3c1 100644
--- a/R/RunModel_Lag.R
+++ b/R/RunModel_Lag.R
@@ -151,7 +151,7 @@ RunModel_Lag <- function(InputsModel, RunOptions, Param, QcontribDown) {
       lastTS <- RunOptions$IndPeriod_Run[length(RunOptions$IndPeriod_Run)]
       InputsModel$Qupstream[(lastTS - floor(PT[x])):lastTS, x]
     })
-    if(is.null(OutputsModel$StateEnd)) {
+    if (is.null(OutputsModel$StateEnd)) {
       OutputsModel$StateEnd <- CreateIniStates(RunModel_Lag, InputsModel, SD = SD)
     } else {
       OutputsModel$StateEnd$SD <- SD