From 3624c712d72d246f21d4e710cec7c11e052e0326 Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Tue, 9 Dec 2025 16:32:32 +0100 Subject: Add the haskell book --- Haskell-book/05/src/Sing.purs | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 Haskell-book/05/src/Sing.purs (limited to 'Haskell-book/05/src/Sing.purs') diff --git a/Haskell-book/05/src/Sing.purs b/Haskell-book/05/src/Sing.purs new file mode 100644 index 0000000..2ca173e --- /dev/null +++ b/Haskell-book/05/src/Sing.purs @@ -0,0 +1,14 @@ +module Sing where + +import Prelude + +fstString :: String -> String +fstString x = x <> " in the rain" + +sndString :: String -> String +sndString x = x <> " over the rainbow" + +sing :: String +sing = if (x > y) then fstString x else sndString y + where x = "Singin" + y = "Somewhere" -- cgit v1.2.3