diff --git a/R/CreateInputsModel.Griwrm.R b/R/CreateInputsModel.Griwrm.R
index 56c1cc98cacf79a0c0253e198b48d955627785f6..13c80194bfca9fa2e9b67a0d29db29b39e535333 100644
--- a/R/CreateInputsModel.Griwrm.R
+++ b/R/CreateInputsModel.Griwrm.R
@@ -58,13 +58,10 @@ CreateOneGriwrmInputsModel <- function(id, ginet, girop, gits) {
         Qupstream <- cbind(Qupstream, Qupstream1)
       }
     }
-    LengthHydro <- matrix(ginet$length[girop$id %in% UpstreamNodes] , nrow = 1)
-    BasinAreas <- matrix(
-      c(
+    LengthHydro <- ginet$length[girop$id %in% UpstreamNodes]
+    BasinAreas <- c(
         girop$area[girop$id %in% UpstreamNodes],
         girop$area[girop$id == id] - sum(girop$area[girop$id %in% UpstreamNodes])
-      ),
-      nrow = 1
     )
   }