Removed testFunc.

d1b98d3a · Laura A DeCicco · 3f46e781 · d1b98d3a
Commit d1b98d3a authored 12 years ago by Laura A DeCicco
--- a/R/fluxUnit.R
+++ b/R/fluxUnit.R
@@ -19,9 +19,9 @@ setClass("fluxUnit",
 		unitName   = "character"
 	)	
 )
-
-testFunc <- function (fluxUnitVar=FLUX_UNIT$POUNDS_DAY){
-  unitFactorReturn <- fluxUnitVar@unitFactor
-  return(unitFactorReturn)
-}
+# 
+# testFunc <- function (fluxUnitVar=FLUX_UNIT$POUNDS_DAY){
+#   unitFactorReturn <- fluxUnitVar@unitFactor
+#   return(unitFactorReturn)
+# }