v1.0.5.20 function TransfoParam_GR1A() cleaned

ef08ae63 · unknown · c13806c6 · ef08ae63
Commit ef08ae63 authored 8 years ago by unknown
Hide whitespace changes
Inline Side-by-side

Showing

with 1 addition and 1 deletion
+1 -1
--- 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