2020-07-28 18:46:05 +01:00
|
|
|
--------------------------------------------------------------------------------
|
|
|
|
module Utils where
|
|
|
|
--------------------------------------------------------------------------------
|
|
|
|
import Data.Function ((&))
|
|
|
|
--------------------------------------------------------------------------------
|
|
|
|
|
|
|
|
-- | Prefer this operator to the ampersand for stylistic reasons.
|
2020-08-04 09:19:48 +01:00
|
|
|
(|>) :: a -> (a -> b) -> b
|
2020-07-28 18:46:05 +01:00
|
|
|
(|>) = (&)
|