Replacing $
operator with more readable |>
operator
This commit is contained in:
parent
2b1c486c17
commit
0792bf3c7d
12 changed files with 122 additions and 101 deletions
10
hs/Util.hs
Normal file
10
hs/Util.hs
Normal file
|
@ -0,0 +1,10 @@
|
|||
{-# LANGUAGE DataKinds #-}
|
||||
{-# LANGUAGE NumericUnderscores #-}
|
||||
|
||||
module Util(
|
||||
(|>),
|
||||
) where
|
||||
|
||||
(|>) :: (a -> b) -> a -> b
|
||||
f |> x = f x
|
||||
infixr 0 |>
|
Reference in a new issue