From 8fa9f3698c53252bc3c7b24747bb852fc4da0ecd Mon Sep 17 00:00:00 2001 From: hi Date: Thu, 31 Jul 2025 12:32:46 +0000 Subject: [PATCH] oops: the last commit but properly --- Main.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/Main.hs b/Main.hs index 9421ae3..1d75a66 100644 --- a/Main.hs +++ b/Main.hs @@ -263,12 +263,12 @@ truthtable s = open <> header <> "\\hline\n" <> body <> close line assignments = intercalate " & " (bools assignments) <> - " & " <> - intercalate " & " (parts assignments) <> - " \\\\\n" + " &" <> + intercalate "&" (parts assignments) <> + "\\\\\n" bools assignments = [if bool then "1" else "0" | (key, bool) <- assignments] parts assignments = - (\xs -> [[x] | x <- filter (\i -> i /= ' ') xs]) $ + (\xs -> [if x /= ' ' then [' ', x, ' '] else " " | x <- xs]) $ fromJust $ serializeLatexTruthTableRow assignments s