Formatting

Clean up Main.hs formatting; clarify language in parsing branch
2024-12-19 19:08:56 -06:00
parent e5f3a53bcc
commit 602048dc53
2 changed files with 6 additions and 2 deletions
--- a/src/Main.hs
+++ b/src/Main.hs
@ -9,4 +9,8 @@ import Data.Map as Map
 import Text.Megaparsec (runParser)

 main :: IO ()
-main = putStr $ show $ result $ evalMulti Map.empty (parseMulti "false = t\nnot = t (t (t t) (t t t)) t\ntrue = not false\ntrue")
+main = putStr 
+     $ show 
+     $ result 
+     $ evalMulti Map.empty (parseMulti 
+      "false = t\nnot = t (t (t t) (t t t)) t\ntrue = not false\ntrue")