From 9dcbd0d067b83d03956510faa26b96dff32007e4 Mon Sep 17 00:00:00 2001 From: William Carroll Date: Sat, 8 Aug 2020 11:06:53 +0100 Subject: Define Utils module Dumping grounds for personal, stylistic functions intended to improve readabily and writability (in that order). --- website/sandbox/learnpianochords/src/server/Utils.hs | 8 ++++++++ 1 file changed, 8 insertions(+) create mode 100644 website/sandbox/learnpianochords/src/server/Utils.hs (limited to 'website/sandbox') diff --git a/website/sandbox/learnpianochords/src/server/Utils.hs b/website/sandbox/learnpianochords/src/server/Utils.hs new file mode 100644 index 000000000000..2f401af2fb8f --- /dev/null +++ b/website/sandbox/learnpianochords/src/server/Utils.hs @@ -0,0 +1,8 @@ +-------------------------------------------------------------------------------- +module Utils where +-------------------------------------------------------------------------------- +import Data.Function ((&)) +-------------------------------------------------------------------------------- + +(|>) :: a -> (a -> b) -> b +(|>) = (&) -- cgit 1.4.1