aboutsummaryrefslogtreecommitdiff
path: root/hypsrc-test/src/Operators.hs
diff options
context:
space:
mode:
Diffstat (limited to 'hypsrc-test/src/Operators.hs')
-rw-r--r--hypsrc-test/src/Operators.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/hypsrc-test/src/Operators.hs b/hypsrc-test/src/Operators.hs
index 1dcb8856..82c4da04 100644
--- a/hypsrc-test/src/Operators.hs
+++ b/hypsrc-test/src/Operators.hs
@@ -1,7 +1,6 @@
{-# LANGUAGE Haskell2010 #-}
module Operators where
-
(+++) :: [a] -> [a] -> [a]
a +++ b = a ++ b ++ a
@@ -18,6 +17,5 @@ a */\* b = concatMap (*** b) a
(**/\**) :: [[a]] -> [[a]] -> [[a]]
a **/\** b = zipWith (*/\*) [a +++ b] (a $$$ b)
-
(#.#) :: a -> b -> (c -> (a, b))
-a #.# b = const $ (a, b)
+a #.# b = const (a, b)