diff options
author | Phil de Joux <philderbeast@gmail.com> | 2022-07-24 07:45:59 -0400 |
---|---|---|
committer | GitHub <noreply@github.com> | 2022-07-24 13:45:59 +0200 |
commit | 2f1711b301fea88eb1d0b40d1c04b2f0539fd882 (patch) | |
tree | 4523ca2ffd88b1002036879ab593d4abaff8d417 /hypsrc-test/src | |
parent | 90c38242e54d1a742426e2b1b3c7d71e226811bd (diff) |
Follow hlint suggestion: redundant $. (#1505)
* Follow hlint suggestion: redundant $.
* Remove $ and surplus blank lines in Operators.
Diffstat (limited to 'hypsrc-test/src')
-rw-r--r-- | hypsrc-test/src/Operators.hs | 4 |
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) |