v1.0.5.20 function TransfoParam_GR1A() cleaned

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

Showing

with 2 additions and 2 deletions
+2 -2
--- a/R/TransfoParam_GR1A.R
+++ b/R/TransfoParam_GR1A.R
@@ -13,10 +13,10 @@ 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
+    ParamOut <-  ParamIn * 8 - 10.0
  }
  
  if (Bool == FALSE) {