From bc0a9edd47dad7a0bf7df26941a0d870c0c3d0ad Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Mon, 9 Jan 2017 19:53:06 +1100 Subject: Cleaning things up, splitting code into more modules --- src/Miscellaneous.hs | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100644 src/Miscellaneous.hs (limited to 'src/Miscellaneous.hs') diff --git a/src/Miscellaneous.hs b/src/Miscellaneous.hs new file mode 100644 index 0000000..94e9672 --- /dev/null +++ b/src/Miscellaneous.hs @@ -0,0 +1,19 @@ +module Miscellaneous( + if' + (?) + ) where\ + + + + +if' :: Bool -> t -> t -> t +if' a b c = if a then b else c + + + + +infixr 1 ? +(?) :: Bool -> t -> t -> t +(?) = if' + + -- cgit