churf/tests/DoStrings.hs
2023-03-25 00:02:38 +01:00

9 lines
203 B
Haskell

module DoStrings where
import Prelude hiding ((>>), (>>=))
(>>) :: String -> String -> String
(>>) str1 str2 = str1 ++ "\n" ++ str2
(>>=) :: String -> (String -> String) -> String
(>>=) str f = f str