]> gitweb.michael.orlitzky.com - spline3.git/blobdiff - src/FunctionValues.hs
Switch the order of the arguments to the 'rotate' function.
[spline3.git] / src / FunctionValues.hs
index f9111ad23f406a6768ff7e641ced1022a0af4835..681a23b9fa517a935faf3d553d1202deaacb6bae 100644 (file)
@@ -137,8 +137,8 @@ make_values values i j k =
 --   'Cardinal' to another (called a rotation). Then it applies the
 --   rotation to each element of the 'FunctionValues' object, and
 --   returns the result.
-rotate :: FunctionValues -> (Cardinal -> Cardinal) -> FunctionValues
-rotate fv rotation =
+rotate :: (Cardinal -> Cardinal) -> FunctionValues -> FunctionValues
+rotate rotation fv =
     FunctionValues { front  = eval fv (rotation F),
                      back   = eval fv (rotation B),
                      left   = eval fv (rotation L),