From 627cae8a6bd5da6cd1a4b51b3eb5bb0f60ecbce2 Mon Sep 17 00:00:00 2001 From: Michael Orlitzky Date: Thu, 4 Aug 2011 12:43:27 -0400 Subject: [PATCH] Switch the order of the arguments to the 'rotate' function. --- src/FunctionValues.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/FunctionValues.hs b/src/FunctionValues.hs index f9111ad..681a23b 100644 --- a/src/FunctionValues.hs +++ b/src/FunctionValues.hs @@ -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), -- 2.43.2