diff --git a/R/TransfoParam_GR1A.R b/R/TransfoParam_GR1A.R
index f823e53baa481da40ce2a6df129b61818e1a227a..afd0c53ce1f54c5f08553a893fc4c1e74fff191a 100644
--- a/R/TransfoParam_GR1A.R
+++ b/R/TransfoParam_GR1A.R
@@ -13,7 +13,7 @@ TransfoParam_GR1A <- function(ParamIn, Direction) {
   }
   
   if (Direction == "TR") {
-    ParamOut <-  (ParamIn + 10.0) / 8
+    ParamOut <- (ParamIn + 10.0) / 8
   }
   if (Direction == "RT") {
     ParamOut <-  ParamIn * 8 - 10.0