diff --git a/haskellAoC/inputs/2020/18 b/haskellAoC/inputs/2020/18 new file mode 100644 index 0000000..464f654 --- /dev/null +++ b/haskellAoC/inputs/2020/18 @@ -0,0 +1,377 @@ +9 * 2 + 3 + 9 * ((3 * 3 + 7 * 6 + 5 + 5) * 8 * (6 * 8 + 7 * 2) + 4) +(4 * (2 * 3)) + 7 + (4 + 2 + 6 * 4 + 9) * 2 * 3 +5 * (6 + (5 * 7 + 6 + 2) + 6) * (6 * 5 * 6 * (8 + 4 + 8) + 4) +8 * 2 * 9 +3 * (8 + 2 * 2 + 5) + ((2 + 6 + 5 * 7) * 6 + (7 * 7 + 3 + 8) * 5 * 2 * 4) + (8 + (5 + 4 + 5 + 5 * 5)) +4 + 3 * ((9 + 5 + 7 + 6 + 9 + 5) * 6 + 2 * 8) + 4 +8 + 7 * 9 + 7 * (4 * (8 + 3 + 7 * 6 + 6 + 9) + 6) +(9 + (3 * 9 * 4 * 9 * 3) + 8) * 2 +9 + 4 * 3 * 2 * (9 * 8 * 6 + 6) +8 * (3 + 5 + 6) * 5 + 3 + 4 * 4 +6 + 9 + (7 * 6 + 9 * 7 + 3) * (8 * 6 + (4 + 3 + 3)) * (4 * 8 + 6 + 3 * (5 + 4 + 3 * 6 * 2)) * 3 +(9 + 6 * 5) + 7 * 6 + (2 * 8 + 4 * 5) + (8 + 4 * 9 * 3 + 9) * 3 +7 * 5 * (5 + 9 + 3 + 6 * 5 * 4) + 4 +9 * 6 + 7 * 5 * (4 + 8 + 5 + (3 * 3 + 9 * 7 + 5 + 9)) +3 * (2 + (4 + 9 + 9) * 5 * 8 * 8 + (9 * 6 + 4 * 2 + 5 * 9)) + 6 + (6 + 7 * 9 + (2 * 7 * 3)) + 9 +(7 * 5 + (7 + 7 + 8) * 3 * (7 * 5 + 4 * 7 + 5)) + 3 * 6 * 3 * 2 +6 * 2 + 5 * 3 * 4 +((4 + 6 + 3 * 8 * 7 + 8) + 3) * 5 * ((6 + 4) * 6 + 4) +4 * 7 + 9 + 5 +6 * (2 + 3 + (7 + 7 * 2 * 5 + 7) * 4 * 5) +4 + 3 * (7 + 7 + 4) * (4 * (2 + 4 * 8 + 8) + 9 * 4) + 7 * 3 +6 + 2 + 4 + (5 + 6 + 8 + 2 * 9 + 5) + 4 + 4 +(8 + 6 * 7 * 4 + (7 + 6 * 8) + (9 + 8 + 2 * 5 + 9)) * 5 +(5 * 8 * (5 + 7) + 4 + (4 + 8 * 9 * 7 * 2 + 8) * 6) * 3 + 9 * (9 * 7) +7 * 7 * 8 * (2 * 9 + 2 * 4 * 8 * (7 + 7 * 9 * 4 + 2 + 2)) + (3 + 7 * 3 * 8) + 9 +(9 * 6 * 2 + 3) + 6 + (8 * 6 + 6 * 2) + (5 + (2 * 9)) +(7 * (3 * 8)) * 2 * ((2 * 8 * 4 * 2 * 5 + 2) * 6 * (6 * 9 + 4 + 9) * 8) * 2 * 2 + (5 + 7) +6 + (2 + 5 + (4 + 5 + 7 * 6 + 4)) + 8 + 7 + 6 +3 * 8 * (3 * (3 + 4 + 8 + 2) * 2 * 2) * 3 +8 * 7 + (3 * 5) * 5 + 9 * (6 * (7 + 8) + 9 + (9 * 9 + 8 + 8) * 5) +3 * ((6 + 7 + 5 * 6 + 6) * 8 * 8 + (4 + 9 * 5 * 8 + 8) + (5 * 6 * 4) * 8) * 5 + (8 * 2 + (2 * 2 * 7 * 4 + 7 + 8) + 8 * 6 + 3) +6 * ((2 + 8 * 8 + 6 * 7) + 3 * 6 + 2) * ((2 * 7 * 2) * 5) * 3 + 6 +6 * 4 * (8 + 6 + 6 + 2) + (7 * (5 * 5 + 7 * 6 + 6) * 9 + 3 * (7 + 7)) * 2 +(5 * 8 * 9 * 8 * (4 * 7 * 4 + 8 * 6) * 5) * 6 + (8 + 7 + 8 + 4 * (3 * 3 * 9 + 9 * 5 + 2)) +5 * 2 * (6 * (2 + 7 + 8 + 6 * 2) * 6) + (7 + 4 * 7 + 6) +4 * 9 + (8 * 6 + 7 + 8) +5 * 8 * ((7 + 8 + 4 + 8 + 3 + 9) + 4 * 9 * 2 * (4 * 7 + 2 + 6) * 6) * (4 * (7 + 9 + 8 + 6 + 5) * 8) +(9 + 9 * (6 + 3) * 8) * 9 +7 * 2 + 7 * (8 + 3 * 4 * 7) +8 * 9 + (3 + (6 * 7 + 6 * 2 * 5) * 7) + 5 +3 * (9 + 6) + 8 + (4 + 2 + 8 * 6) * 9 +5 * (9 + 5 * 7 * 3 * (5 + 4)) * 6 + 7 +4 * ((6 + 4) + 3) * 9 +2 * (3 * 7 * (6 * 8 + 9 + 2 * 7 * 9) * (5 * 3 + 9 * 6 + 6) + (2 * 5 + 5 + 8 * 4 * 4)) +(6 + 5 * 9 * 5 * 3 + 8) * 9 + (5 * 9) + (2 + (5 * 3 + 6 * 7) * (9 + 2 + 7)) + 7 + (7 + 6 + 3) +9 + 5 * ((7 + 6 + 2) * 2) +5 + (9 + 5) +2 + (3 + 9 + 2) + (8 * 2 + 4) +(5 * 4 + 5 * (2 + 9 + 6 * 5 * 7) * 9 + 3) + 4 + 4 +9 * (6 + 6 * 6 * (8 + 2 * 9 + 6 + 9) + 9) * 3 * 2 +4 * 6 * 2 + 9 + (5 * 4 + 7 * 6 * (3 + 4)) +5 + (6 * 9) * (8 * 7 * 3 * 6) + 8 +4 * 3 + (6 * 5 * (8 * 4 * 6 * 9 + 7 + 5) * (4 * 7 + 5) * 8 + 3) + (4 * 7 + (3 + 2 + 7) * 9 + (7 * 6 * 5 * 9)) + 2 +7 * 3 + (2 + 5 + (5 + 7) * 2) +9 + 3 + 4 * (4 + 5 * (3 + 6) + 2 + 2) +7 * 6 + (9 + 5 + 7 * 8 + (4 + 6 * 8) + 4) * ((7 * 3 * 7 * 2 * 3) + 4 * 9 * 8 + 2) + 9 * 5 +8 * 8 * 7 * 5 * (9 * 5 * 3 * 4 * (8 * 4 * 2 * 8 * 6)) +7 + 6 + 9 + 6 * 2 * (4 + 9 * 8 + 7 + (6 + 8 * 8 * 7) * 3) +6 + (5 * 9 * 6 + 2) +3 * 6 + (7 * (4 + 5) + 8 * 7) * 2 + (2 + (4 + 7 + 5) * 2 * 7 * 2 + 2) + (3 + 4) +((2 + 9 + 6 + 3 + 6 + 2) + 9 + 2 * 7 + 8) + ((2 + 4 + 6 * 3 * 3) * (8 + 4) * (5 + 9 * 7 + 8 + 9 + 4) * 5) * 3 * 8 + 6 * (7 * 5) +(4 * 4 * 4 * 4) + 2 +4 + 4 * 5 * ((4 + 4 + 7) + 8 * (7 + 8 + 6 * 8 + 9) * 3 * 5) * 4 +((5 * 8 + 2 * 6) * (8 * 3) + (7 + 4 * 8)) * 7 * (7 + (9 * 2 * 5 + 4 * 3 + 8) + 6 * 9 + 5) + 4 + 3 * 2 +(9 * 9 * 7 + (5 * 7 * 7 + 8 * 5 * 9) * 3 * 4) + 8 + 3 * 8 + 5 +3 * 3 + 6 * 6 * (5 + 9 + (6 + 6 + 7 * 5) * (4 + 4 * 2 + 4) * (2 * 3 + 8 + 5 + 2)) * 2 +8 * 2 * 7 * ((2 * 7 + 9 * 7 + 7 + 9) + (9 + 9 * 6) * 8) * 2 +(6 * 7 * (5 * 2)) * 9 +((4 * 5) + 9 + 5 * (5 * 6 * 7 * 5) * 7) + 7 * 9 +5 + 2 + 7 + 4 + 4 +(4 + 6 * (7 + 6 * 8) * 7 + (9 * 2 + 9)) + ((4 + 6 + 3 * 8) * 9 + 7 + 6 * 7 * 5) + 9 * 7 +(3 * 6 * 3) * 6 +9 + 3 +(6 + (6 + 5 * 8) * 3 + 4 * 5 * (3 + 3 * 4 + 4)) * 9 + 3 +(2 + 6 * (8 * 6 * 4 * 5) * 7) * 6 +(5 + 4 * 7) + 9 + 8 +5 * (2 + 5 + (6 + 9 + 9 + 6) + 5) * 6 * (9 * 9 + 8 * 4 * 4 * 4) * 3 +4 * (3 + 3 + 8 * (3 + 2 + 7 * 2)) * 2 +2 * ((4 * 2) * (6 * 3 * 6 + 9) + 9 * 2) + 9 +5 + 5 + 8 * 7 * (5 + (8 * 6 * 7 + 7 * 8 + 7) * 6) + 2 +8 + 6 + (9 + 7 * 6 * 7 + 5) + (8 * (4 + 7 + 2 + 6) * 4 + 2 * 3 * (4 + 3 + 8)) * 2 + 6 +7 * 5 +8 * 8 * 5 * (9 * 7 + 6) + (6 + 3 + 3) +8 + (7 + 5 + 3 * 3 * 2) * (2 + 8) + 2 +(6 + 5) * (2 + 6 + 9) +(6 + 5) + (5 + 9 + 6 + 2) + 3 + 8 * 2 * ((5 + 9 + 9) * 5) +((9 * 2 * 5) * (3 * 6 * 4) * (8 * 4) + 3 * 8 + 6) * ((8 + 4 * 7) + 5 + 8 * 9 + (6 + 3 + 4 * 3) * 8) + 2 * 5 * 9 + 7 +7 * (2 * 9 + 8 + 6 + 4 + 3) * 8 + 7 * 2 +5 + 8 * 6 + (8 * 8) + 8 +(7 * 2 + 8) + 6 + 2 * 5 + 8 * 7 +(6 * 3 * 8 + 9 + 3) * 4 + 3 * 9 * 8 +(4 + 2 + 9 + 3) + (7 + 8 * 2) + 2 * 3 +7 * ((6 + 7 * 4) + 8 + (3 + 6 * 3) * (6 * 6 + 8 + 5 * 4) + 3) + 3 * (9 + 5 * (6 * 6) * 2) * 6 +3 * 6 + (4 + 8 + 7 * 8 + 6) + 4 + (2 + 7 + 6 * 8 * 8) + 4 +(7 * 3 + 8 * 8) * (3 + 9) + 7 + 3 * 3 +9 + 5 + 2 + (4 * (9 * 8 + 3) + 7 * 6) + 3 +3 + (9 + 5 + 7 * 9) + 5 +(5 * 5 * 8 + 7) * 8 * 3 +((3 + 7 * 7 * 2 * 3 * 4) + 3 + 4 * 3) * 5 + (5 * 6 * 5) * (6 + (8 + 6 * 3 + 9 + 2 * 3) + 3 + 2) * 8 +8 * 9 + 3 * (9 * (3 + 2 * 3) * 9 + (5 * 6) + 4 * (5 * 4 + 7 + 5 + 4 * 4)) +6 + 2 +(9 * 7) + 9 + 6 + 7 +(7 + 6 * 4 + (5 * 4 * 8 * 6) + 5) * ((7 * 6) + 2 + (7 * 8 * 3 + 3 + 7) + 7 * 2) +((7 * 2 * 9 + 6) + 9 + 8 * 8 + 4 + 3) + 4 * 8 * 3 * 8 + 9 +4 + 7 + ((6 * 4 + 6 + 3 + 4) + 9 + (7 * 3 + 5 + 9 + 9) + (9 * 8) + 8) + 6 * 6 + 4 +(8 + (7 * 2) * 9 * 4) * (9 * 9 + 8 * 8 * 5) * 7 + 8 * 7 * 2 +2 * 5 + 2 + 3 +4 + 3 * 3 + 7 + ((4 * 2 * 8) * 2 + (9 + 8 * 8) * 5 * 8) + 4 +2 + 5 * 2 * (6 * 9) * 3 * 6 +(2 + 3 * 5 * 6) * 8 * 6 + (4 * 7 * 4 + (7 + 6 + 2) * 3) +8 + (2 + 6 + 9 * (2 + 8)) * 8 * 6 * 2 * 7 +7 * 7 * (9 + 3) +8 + 4 * (8 * 8 + (8 * 5 + 4 + 8 + 2)) * 5 + 9 * ((2 + 5) * 9 + (9 * 7)) +(4 + 8 * 4 + 4) + 6 * (7 * 7 + 7 + 3) * 5 + 5 * 7 +7 * (6 + 8 * (7 + 8 * 7 * 4) + 3 + 9) +(6 * 2 * 9 * 5) * ((4 + 7 * 3) * (7 + 9 * 9 * 7 * 6) + (2 * 8 + 3 * 3 * 5) * 8) * (3 * 3 + 7 * 9 + (2 * 5 + 7)) + 4 * 9 +6 * 5 + 9 * (6 + (3 * 6) + 8 + 4) * 9 * 7 +(5 * 9 * 4) * 5 * ((9 * 5 * 8 * 4 + 6 + 7) + (6 * 5 + 3) + 5 * 6 * 2 * 7) * 9 + 8 +(6 * 4 + 5 + 8) * 5 + 7 + 4 +5 + (2 + 5 * 6 * 9 + 7 + 7) + 2 * 4 + 6 * 4 +(6 + 4) * (4 + 7 + 5 * 9 + 5 * 5) +2 + 8 * 2 + 7 * 7 * 8 +4 * (8 + 2 + 4) +3 * (4 * 5 * 7 * 8 + (2 * 7 * 3)) + 9 +9 * 3 * ((2 + 2) * 4 * 2 + 3 * (4 + 9 * 4)) +3 + 8 * (3 + 5 + 2 + 8 * 5 * 7) * (8 + 5 * 9 + 9) * 6 + (4 * (3 + 3 + 2 * 6 * 2 * 4) * 6 * 8) +(4 + 7 * (5 * 2 + 5 * 2 + 2 + 7) * 2 * 8) + (8 + 9 + 7 * 2) * 7 * 7 * 5 * 7 +((9 + 6 + 5 + 8) + 6 + 3 * 2 + 8 * (3 * 5 + 4 * 6)) * 5 + ((5 + 3) + 5) +5 * 5 * 8 * 4 +7 + ((5 + 3) * 9 + 7 * 7) + 7 +((4 + 9 + 6 * 7 + 9 * 8) * (8 + 9 + 4 * 6 + 7)) + ((9 * 5 + 9 * 8) + (7 + 3 + 5) + (2 * 6 + 2 * 4 * 2) + 6 + 2) * 9 + 6 +(2 * 4 * (3 * 3 * 9 + 6) + (9 * 9 * 8 * 3 * 3 + 3) + 2 + 2) * 3 + 3 + 4 +7 + 7 * (8 + (5 * 2 * 7 + 2 * 3 + 7) * 9 + (9 + 7 + 8) + 5) +6 * 9 * (8 * 2) * 8 +((2 * 4 * 8 * 4 * 2 + 2) * 3 * 2 * 9) * 5 * 2 + (6 + (8 * 7) * 8 * 8 + 9 * 5) +2 + 7 + 8 + (4 * 3 + (9 * 7 * 7 + 3)) +4 * 3 * 2 + 6 * (4 + 4 * 9) +(3 + 9 + (9 * 7) + 9) + 5 + 5 +((2 * 2 * 9) + 3 + (9 * 4)) * 4 +(7 * 5 * 5 + 6 + 8) + 3 * 8 * (9 + 3 * (4 + 5 + 8) * 3 + 6) +6 * 8 * 8 * (6 + 9 + (6 * 4 + 6 * 4 * 3 * 4) + 4 * (3 + 9)) + ((3 + 6 + 7 + 5 + 4) + 6 + 6) +2 + (4 + 3) * 4 * 3 + 3 + (6 * (5 * 8 + 6) * 5) +(9 + 3 * 2 * 3 + 2 + 2) * 3 * 5 + 8 + 9 + 6 +(9 + 2 + 5 + 5) * (8 + 5 * 3) + 7 * 6 * 7 * 8 +5 * 2 * 4 + 2 + 5 * 6 +(8 + 3 + 3 * 8 * 5) * 8 +8 * 4 + ((4 + 4 + 7 * 9 + 7 + 6) + 5 + 5 + 6 + 9 * 3) +(6 * 5 + 9 + 9 + 4 + 9) * (6 * 2 * 4 + (7 * 2) + (8 + 5)) + 2 + ((7 * 7 * 9 * 5 * 5 * 9) + 2 * 9 + 7 * 2) + 9 +((4 + 2 * 6 * 3) + (2 * 7) + 7 + (3 * 5) * 4 * (9 * 2 * 8 + 3)) * (3 + 4 + 5 * 8 + 8) + 9 + 4 +((8 + 6 + 5 + 4 * 8 * 2) + (3 * 4 * 8 + 2 * 3) * 4 + 2 * 4) * (6 * 8 + 9) +8 * (8 + 2 * 9 * 4) + (7 + 8 + 2) +7 * (4 + 9 + 3 * (7 + 6 + 3 * 9 * 8)) * (4 + 8) * 9 + 8 +5 + (4 * 8 * 8 * 8 * (8 * 3 + 9)) * 9 * 7 +8 * (5 + 5) + 8 +(9 * 4 + 8 + (5 + 2 + 9 * 5 + 7 * 3) * (6 + 6 + 7 + 5 * 8 * 2)) + 3 * 6 * 7 + 3 * 7 +6 * (9 + 8 * (4 + 3 * 3 + 3) + (4 + 2 + 4) * 8) + 3 + (2 * (6 + 2 * 9 * 3 * 9) * (6 * 2) * (2 + 7 * 9 + 9 * 8 * 8) * (3 + 6 * 5)) + 4 +5 * 7 * (9 + 8 * 4 * 7) * 9 + (9 * (5 * 8 * 7 * 7 * 8) * 8 + 2 * 6 + 9) +7 * 7 + (4 + 9 * 9 * 4 + 6 * 9) +6 + (4 * 8 * 5 + 4 * 8 + 2) * 5 * 2 +(3 + 2 + 2 * 7 + 7 * 6) + (8 * 6) * 6 + (8 + 4) +8 + 8 + 4 + 3 * (6 * 9 * 2 * 6 * (2 * 9 * 2 * 6 * 8 + 3) + 2) * 6 +9 * 6 * 6 + 4 + 7 +5 + 8 + (8 * 8) * ((9 * 8 * 6) * (3 * 6 * 5 + 7)) +6 + 6 + (9 + 7 + 5 * 2 * 3 * 4) * 7 + 9 * (2 * 8) +((2 + 3 * 3) * 6 + 9 + 2 + 5) + 2 + 4 + 9 +7 + 9 * 6 * (2 + 3 * 2 + 6 + 4 + (2 + 4 * 6 + 5 + 5 * 4)) +6 + 3 + 7 * 4 * 3 * (6 + 3 + 7) +5 + 8 * 5 * ((2 * 7) * 3 * 4 + (3 * 8 + 6 + 6 + 7 * 5)) +(2 + (3 * 6 + 4) * (9 + 7) + 2) * 8 * 5 * 7 * 3 + 3 +(8 + (9 * 3 * 2 * 5 * 7 + 2) + 5 * 5) * 7 +3 * (6 + 5 * (8 + 8 * 2 * 3 + 2 * 8)) +((7 * 4 * 2) * (6 * 6 + 5) + 3 + (5 * 2 * 8 + 8 + 5) * (6 + 2)) * 3 +4 * (2 * 3 + 9) * 9 + 6 * (5 * 4 * 6 + 4 * (5 + 6 * 4 + 5)) * 3 +2 * 8 * ((7 * 7 + 9 + 8 * 6 * 4) + 9 * (7 * 4) * (5 * 6 + 9 * 2 * 9) * 6 + 7) + (3 * (8 * 5 * 7 + 9) + 2 + 2 * 6 * 2) * 9 +((9 * 5 * 5 * 5) + 2 * 7 * 7 + 8) + 5 + 2 * 5 +7 * 6 * 5 * ((4 + 9 * 2 + 7) + (5 + 5 * 2 + 8 * 7 + 7)) + (2 * 7 + (4 * 3 + 6 + 8)) * 6 +3 * 9 + (4 + 2 + 8 + (4 * 2 * 9 * 6) * (6 + 8) * 4) * 4 + 5 +6 * 3 + 8 * 3 * (3 * 2 + (5 + 8 * 3) + 7 + 9 + 5) +9 + 2 * (9 + 2 + 2 * (2 + 7 + 3 + 2)) +(3 + 8 * 3 + 9 + 7 + 5) * 8 +2 + 8 + 5 * (7 + 7 + 9) * 7 +5 * (6 + 6 + 8 + 2 + (4 * 6 * 2 * 4) * 2) +6 * (2 * 4 * 4 + 2 + 4) +4 + 8 * 7 * 5 * (4 + 5 * 7) * (7 * 4 * 6 * (4 + 8 * 8)) +7 + (2 + (7 + 6 * 8 * 4 * 8 * 4) + 5) +6 * (5 + 4 * 3) + 9 +(6 * 4 * 2 * 8 * 8 + 9) * (9 + 7 + 6 * 9 + 4) +(7 * 8 + 6 * 8 * 6) + (8 * 3 + 8 * 4) * 9 + ((8 * 7 + 6 + 5 + 3 + 2) + 3 * 5 + 7 + (2 * 3)) +5 * 4 + 9 +9 * 9 * 3 * 9 + (4 + 2 * (6 * 8) * 7) +2 + (9 + (5 + 4 + 7) * 3) + 9 * 8 +((7 + 5 + 7 * 9 * 8 * 2) + 2 * 6 * (9 + 3 + 8 * 4) + (3 + 6 * 6 * 7) + 7) * (2 + 4 + 8 + 6) + 6 + (6 + 6) +((3 * 7 * 4 + 6) + (5 + 3 * 8) * 3 * (2 * 6 + 6) + 2) * (9 * 3 + 2 * (6 * 9 * 6 * 7) + 6) +2 + 3 * 2 + (4 + 6 + (3 * 9) * 4) +2 + 2 + 7 * 2 + 3 + (5 * 7 * 4 * 8 + 6 + 2) +7 * 9 * (2 * (9 * 7 + 3 * 7) * 6 + 7 + 2 + 9) * 4 +2 * 9 + 9 * (4 + (2 + 8) * (2 + 9 + 2 * 5 * 4 + 9) + 6) + 2 +((6 + 5) + 7 * 2) * 9 + 7 * 9 +(3 * 9 * 9 + (4 + 3 * 6) + 9 * (7 * 7 + 4 + 5 + 2 + 4)) + 9 * 7 +2 + (3 + 4) + ((5 * 5) + 4 + 3 * 3) + 8 + 5 * 8 +5 + (6 + 2) * 2 + 8 + 3 * 8 +7 * 4 + 8 + 2 * (5 + 9 * (8 * 8 + 5 * 8) + 5) + 7 +4 + 7 * 2 +9 + (7 * 6) * ((6 + 4 * 4) + 2 * 5 * 6 * 4) * 2 +7 * (7 * (4 * 8) + 6 + 8 + (7 + 8 + 3 * 5)) + (8 * 3) + 8 +2 + (9 + 4 + 7 * 9 + 4 + 8) * (3 * 3 + 2) * 6 * (3 + 4 + 4 + 6 * 9 + 8) + 2 +(9 + 7) + (5 * 9 + 7) * 9 +(3 + 7 * 4 + 8 * (6 * 6) * 2) + 8 * 6 +7 * 4 * (3 + 2 * 4 + 6 + 2 * 4) * 4 + 7 +5 + 6 * 8 * (5 * 7 * 9 * 3 * 9 + 7) * ((9 + 2) + 6) * 8 +((6 * 3 + 9 + 3) * 8) + (3 * (4 * 2 * 8) * 3 + (5 * 5 * 8 * 9) * 9) + (3 * 5 * 7 * (9 + 5 + 3) + 8) +(6 * 2 * 4 * 8 * 2) + 6 * (7 * 5 + 4 + 5) * 5 +7 * 4 + 9 + (3 + 3 * 2 + 2) * 9 +8 * 2 * 5 * 3 * ((5 * 4 + 6 + 4 * 9) + 9 * 6 + 2 + 3) +3 + 6 * 3 * ((6 * 7 * 2 * 6 * 3 + 4) + (4 * 4 * 2 * 6 + 8) + (6 * 9 * 9 + 8 * 5)) + 9 * 2 +(5 * 4 + 6) * 3 * (4 + 8) + 7 +(2 * (2 + 3 + 6 * 3) + (8 * 9 + 6) + 4 * (3 + 9 + 9 + 4 + 8)) * 2 + 3 * (2 + 9) +6 + 5 * 6 + 8 * 2 +7 + (3 * 7 + (6 + 9 + 7 * 2)) + 4 +((2 + 5 * 4 * 6 * 5) * (6 * 2 + 4 * 6) * 8) * 2 + 7 +5 + (4 + 9 + 6 * 5 * 7) * 9 + 2 + 2 +7 + (2 * 6 * 6 * (6 * 7) + (2 + 9 * 6 * 3 + 3 + 9) * (8 * 5 + 8 * 7 + 4 * 7)) * 9 +3 + (3 * (9 * 7 * 7 + 5 + 2) + 7 + 9 * (7 + 4 * 7 + 4) * 2) * (3 + 2 * 4 * (3 * 4 + 5 * 7) + (9 * 4 * 5 + 4 + 8 + 4)) +7 + 7 * 3 + (3 * 2 + 5 * 2 * 9 * 8) + 8 +4 + 2 * (8 * 9 * 7 + (5 * 9 + 9 + 8) * (9 + 6 * 6 * 6 + 7 + 2) * (7 + 2 * 7 + 4)) * 3 + 6 * 8 +3 + (8 + 6 + (5 + 7 * 4 + 5) * 8 * 4) + 9 * 8 * (3 + 7 * (4 * 9 + 9) * 8 + 8 * (4 + 8 + 2 * 5 + 2)) * 4 +((4 + 9 + 8 + 3 * 7) + (9 + 2 + 2 * 6 + 7) + 8 + 2) * 6 + 2 * 5 + 9 * 3 +((2 * 2) + 6 + 6 + 9 * 3) * 2 * 6 +3 * (6 * 5 * (4 * 7 + 7 * 2 + 7) + (4 * 6) + 5 + 6) +(5 + 3 * (8 + 7) * 4 * 6 * (8 + 2 + 7)) * 9 +2 + 8 * (5 + 5 + 4 + 6) * 3 + 2 * (5 * 6) +((2 + 2) + 3 + (5 * 7 * 3) * 4 * 5) + (6 + 2 * 5) +5 * 8 * 9 * (8 * (9 * 7 + 3 + 3 + 3 + 6) + 5 * 9 + (3 * 4 * 9 + 4 * 4) + (9 * 9 * 3 * 6 * 6 + 6)) + 6 +3 * 8 + (4 * (8 * 2 + 3 + 3) + (2 * 8 * 4)) + 5 +5 + 6 * (4 * 2 + 7) * 7 * 3 + 9 +5 * 8 * 7 * (4 + 8 + 7 * 3 * (2 + 4 + 8) + 3) + (2 + 9 + 6) +4 + 8 + 8 * (8 + 6 * 7) + (9 + (8 * 4)) +9 + 3 * 7 + 3 * 2 + 8 +(8 + 7 + 3 * (8 + 9 * 5) * 5 * (9 + 6 * 3 + 2)) * 8 +7 * 4 + 3 * (2 * 3 + 8) + 2 * 2 +9 + 5 * 8 + ((6 * 5 * 9 + 3) + 2 + 9) * 3 +(7 * 5 + 2) * (7 * 9 * 2 + 9 + 3 * 5) * 6 +2 + 7 +(5 + 2 + (5 * 8 + 5 + 4 * 9 + 9)) * (8 * (2 + 7 * 6 + 3 + 4) * 4 * 7 + (5 + 5) + 6) * 4 +(3 + 5 + 9 + 5 * 4 + (8 * 8 * 3 + 4)) + 8 +(6 * 8) + (6 + (3 * 8 * 4 + 6) + 7 + 2) + 8 + 2 +(3 + (2 + 2) * 6 + 7) + 2 + 4 +(3 + 3 * 6 * 7 + 7 + 4) + 6 + 5 +9 * (6 + 5 + 9 + 2) * 9 * 8 +(5 + 7) + 2 + ((5 + 6 + 4 + 7 + 7 * 6) + 2) + 2 + 6 + 5 +8 + 4 + (8 * 2 + (8 * 5 * 3 * 7 + 7 * 7) + 9) + (5 * 6 + 4 + 5 + 6 + (4 + 7 * 3)) +3 + 5 + 3 + 3 + 6 + (2 + 9 * (3 + 3 + 5 * 2) * 2 * 6) +5 * ((6 * 7 * 3 * 3 * 2) + 9) +2 + 9 * 7 +7 + 4 + 5 + (7 + (8 + 9) + 8 + 6) +7 + (2 + 6 + 8 + 6 + (3 * 4 + 2) + 6) * 2 + 4 + 5 +8 * ((8 * 8 + 6 + 6 * 7) + 7 + 8) + 4 + 9 +8 + (5 * 5 * 3 * (3 * 6 + 9 * 4) * (4 * 2 + 4 * 6 * 9 + 2)) + 6 + 6 +7 * 8 * 9 + 3 + 5 * ((3 * 6 * 5 + 5 + 2 + 2) + 8) +(7 + 7 + 9) + 9 * 4 + 4 * 7 * (8 + 9 + 3) +(6 + 3 + 2 + 3 * 8 + 3) + 3 * 3 + (9 + 8 + 3 + 3 * 3) + 8 * 9 +6 * 5 + 6 * ((9 * 8 + 8 + 7 + 8 * 7) + 8 + (9 + 2) * (2 + 5) * (3 * 8 * 9 * 3 * 3 + 4)) * 3 + (6 * (5 + 2 + 3 * 7 * 4) + 3) +2 * 9 * (4 * 9 + 9 + 2 + 7) * (6 + 2 + (2 * 8 * 9 * 3 + 9 + 6) * 7 + 4) +(6 * 8 * 7 + 2 * 8) + 4 + 2 +2 + 4 * 8 + 6 + 9 + 9 +(5 + 4 * 8 * 8) * 3 * 2 * (3 + 3 + 8 + 3) + 2 + 9 +7 + 9 + (2 + 8 * 5 * 5 * 6) + 8 +4 * (6 * 2 + (6 * 2 + 7)) + 7 + 9 * 8 + 2 +8 * (4 * (4 + 2 * 4 + 5 * 2) + 7 + 9 * 4) + 8 * 2 +8 * 8 + 5 * 3 +7 + (6 + 9 + 8 * 5) + 7 + 4 + 8 * 2 +(7 * 6 * 2) + 9 * 7 + (7 + (9 * 4 * 7 + 9 * 5) * (6 + 3 * 4 + 7 + 3) * (3 * 7 * 4 * 5 + 5 * 3) * 7) + 4 + ((7 + 7 + 7) * (3 + 5 * 6 + 6 + 6) + 8) +(6 * 6 + 9 * (3 * 8 * 9 + 9) * 5 * 7) * 8 * 2 * 8 * 4 * 7 +5 * (7 * 9) + 6 + 3 * 4 +2 * (5 + 6 + (4 + 7 + 5) + 9 + 5) * 7 + 5 +3 * (8 + 5 + (8 * 7 + 6)) + 4 +2 + 6 * 5 + ((4 * 6 * 4) * 9 * 7 * 6 * 6) * 3 +(2 * 8 + 4 * 5 + 4) + ((5 * 6 + 2 + 4 * 8 + 4) * 5) * 7 +(9 + 4 * 4 + 4 * 7) + (4 * 6 * 2) + 8 * (4 * 3 + 2 + 9 * 8) * 2 +(9 + 8 * 8) + 7 + 8 * 9 +7 * 7 * (5 * 8 * 7 * 7 * (3 * 3 * 2)) * 3 * 7 + 4 +(7 * 9) + 9 +4 + 6 * (5 * (7 + 3 * 5 + 5 * 4) * 7 + 9 + 3) * 3 * 5 + 2 +3 + (5 + 7 * 7 * 6 * 2) * 5 + 6 + (9 * 7 * (2 * 8 * 8 + 7 + 9 * 6) + 5 + 9) + 8 +2 * 5 * (5 + 7 * 6) * 5 +4 * ((9 + 2 + 2 * 9) * 2 * 8) * 3 * 2 * 3 * 4 +4 + 2 * (4 + (2 + 9 * 3) * (6 + 3 + 4 * 2) + 8 + 4) +3 * 2 * (3 + (2 + 9 + 6 * 9 + 5) * 8 + (4 * 8 + 6 + 5 + 4) * 5 + 8) + 8 + (7 + 8 + 2) * ((7 + 7) * 4) +(8 + 5 * 8 + 8 + 3) + ((4 * 7) * 8) + 5 + 3 + 7 * 2 +8 + 2 + 9 + 6 + (8 * (9 * 2 + 6 + 9 * 3 + 6) * 5 + 4) +2 + 8 + 5 * 3 +(9 + 9 + 2 * 8 + 9 + 7) * 7 + 6 + 7 + (9 * 5 + 5 * 5 + 9 * 6) * 8 +3 * 4 * (8 + 7 * 7 + 2) * 6 * 9 + 6 +(7 * 9 + 2 + 7 * 7) + (3 + 7 + 8) + 2 + 9 * 6 +4 * (4 + 3 * 6 * 3) * (8 + 4) +9 + (8 + 3 * 5) + 3 * 2 * ((4 + 5 * 5 * 5 + 7 + 2) + (6 * 5) * 3 * 6 * 3 + 5) +9 + 3 + (9 * 3 + 5 + (7 + 2 * 4 + 9 * 9) * 8) * 7 * (6 + 2 * 5 * 8) * (2 + 3 * 5) +9 + 8 + 8 +5 + (9 + 9 + 8 * 8 * 7) + 8 * 5 +(5 + 5 * 6 * 3) + (6 * 9 * 9) * 5 + 5 + 2 +3 * 7 + (7 + 9 + 3 * 7) + 5 + 6 +3 + 5 + (5 * 3 * 8 + 6 + 8 * (2 * 4 + 5 + 7 * 9 + 3)) * 4 * 9 +((4 * 3 + 9 + 7) + 5 + 2 + 6 + 8) + 3 + 2 * 4 * 3 * 2 +(2 + 3 * 4 * (5 + 6 * 2 * 6)) + 8 + 3 * 6 +3 * (7 * (9 + 3 + 5 * 2 + 3 + 8) + 2 * 7) * 2 + 8 +8 * ((2 + 4 * 5 * 8 + 6 * 7) * 2 * 2 + 3) +2 * 7 + 8 * 4 * (8 + 5 + (6 + 4 + 6 + 5 * 6) + 6 * (8 + 3)) +(5 * 4 * 9 * (6 * 4 * 2 + 5 * 7) + 9 + 5) + 3 * (7 + 9 * 2) * 2 + 6 + 8 +(8 * 4) + (4 * 3 * (9 + 6 + 9 + 9 * 7 + 5)) * 8 * 8 * (3 * 6) + 6 +2 + (3 * 3 * (9 + 3 + 6) + 7 + 4 + 9) + 4 + 7 * (7 + 7) * 9 +5 + 8 * ((8 + 6 * 7 * 2) + (4 * 2 + 9 * 5 * 5 * 7) * 7 + 5) * 8 + 7 +5 + (5 + 2 * 4 * 7 * 9 * 2) * 2 * (9 * 3 * 8 + 9 + 8 * 7) * 4 +2 * 7 * 2 + ((5 + 3 + 3) * 2 * 3 * (2 * 3 * 7 * 4) + 5 * 3) * (8 * 7) +7 + 5 + (5 + 9 * (9 + 4 * 7 + 9) * 4 * 6 + 5) * 9 +9 * (7 * 9 * 9 * 3) * 5 + 5 + 6 +5 * 6 * (7 * 2 + (8 + 3) + 7 + 5) +4 * (5 * 4 * (4 + 7 * 2 + 4 + 2 * 4) * 6 + 9) + 7 + 8 * 5 +(2 + 4 * 3 * 3) * 6 + (4 * 2 * (6 * 6 * 8) * 4 + 4 + 4) +(8 * 4) + 9 * 5 * 9 * 2 +9 + 3 * (7 * 8 * 6) +(5 + 6 + 5 * (3 * 4 * 4 + 4 + 7) * (6 * 4 * 5 + 3 * 9)) * 4 + (7 * 9 + 9 * 7 + 6) +(2 + 9 + 5) + (3 + 6) +(5 * 5 + 6 + 2 * 6 * 3) * (7 * 4 + 6 * 3 + 9) * ((3 + 2 * 9 * 6) * 7 + 5) + 3 + 2 + 4 +3 * 7 * 6 * (4 + 8 + 2 * 7 + (9 * 5) * 8) +((8 * 2 + 5) * 5) + 3 +8 + 4 * (6 * 5 + 6 * 8) + 8 + (9 * 7) +2 + 2 * ((3 * 2 * 5) + 4 + (3 * 6 * 5) + 3 * 5 * 4) + 2 +(3 * 3 + 3 * 3 + 3 * 3) + 8 * (4 * 6 + 7 * 7 + 3) +(2 + (4 * 6 + 5 + 3 * 8 + 3)) * 4 +(7 * 6) * 6 * 6 * 2 + 8 * 2 +7 * 8 + ((7 * 4 * 2) + 2 * 4 * 3 + 2 + 9) + ((5 * 4) + 6 + 4 * 2 * (3 * 9)) + 9 * 2 +(6 * 3 * 3) + ((8 + 5 + 7 * 9) + 5 * 2 * (2 * 7 * 2) * 3 * (5 * 5 * 7 * 3 + 2 * 8)) * 2 * 3 + 5 * 5 +3 + (5 * 3) + 5 * 6 +7 + 8 * (4 * 5 + 9 * (5 + 7 * 8 + 3 + 9 + 3)) +(2 + 6 * 3) * (4 + 5) + 6 + (9 * 5 * 9) + (4 + 5 + 3) +(4 * 6 + 4 * 4 * (5 + 8 * 7 * 3 * 8) + 8) * 4 * (7 + 7 + 3 + 4 + (9 + 8 + 2 * 7 * 8 + 6) + 8) + 7 +5 + 2 * (3 * 7 + 6 + (5 + 4 * 9 * 5 * 7) + 7 + 9) + 6 * 5 + (3 + 3 + 6 * 2 * 8 * 5) +6 + (8 * (8 + 2 * 9 * 7 * 3) + 6) + 3 * 6 * 6 + (3 + 5 * 6 + 2 + (4 + 5 + 9 * 7)) +5 + 2 * 7 + 8 * (7 * 2 + 7) + 6 +9 + ((3 + 8 * 2 + 3 + 2) + 2 * 6 + 9 + 4 + (2 + 5 + 9 + 7)) + 8 + 3 * (3 + 4) +9 + ((9 * 4 + 8 * 5 + 8 * 9) * (5 * 3 * 4 + 8 * 5 * 6) + 7 + (5 + 9 + 5) * 7 + 8) + ((3 * 4 + 6 * 3) * 7 * (6 * 8 + 9) + 5) + 7 + 8 + 5 +2 * (7 * (9 + 7) * 3 + 6) * 8 + 7 * 8 + 7 +8 * ((2 + 5 * 9 * 4 + 9 + 2) * 8 + (9 * 7 * 6) * 3 * 9 + 3) * 9 + (5 + 2 * (8 * 9 + 7 + 7) * 4) + 7 +3 * 5 + 8 * (6 * (6 + 6 * 8 + 9 + 4) + 6 + 8 * 8) + (5 * 2) + 8 +2 + 5 +(5 * 7) + 6 * 4 + (9 + 7 + 3 + 6 * 3 + (5 * 8 * 9 + 9)) +((6 * 5 * 7 * 4 + 6) * 5 + 7 * (3 + 6)) + (4 * 5) + 5 * (3 * 7 * 9 + 5) + 9 * 7 +2 + 8 + 4 * 4 + (5 + (7 + 3 + 2 + 5) + 3 * 6 * 3) +3 + (7 + (8 * 6 + 6 * 2)) + 9 * 2 * 9 + 7 +5 + 6 * ((6 * 2) + (7 * 6 * 2 * 7 * 5 * 6) + (2 * 7 * 8 + 7) * 2 + (7 + 3 + 3)) * 5 +2 + 8 * 5 * 6 * 2 +(3 + 3 * 4) * ((5 + 7 + 7 * 2) * 4 + 2 + 5 + 8) + 8 * 8 * (3 + 9 + (5 + 8 + 3 + 6)) +8 + 8 * (8 + 4 * (4 + 5 + 7 * 4 + 8) * 5) +(5 + 7 + 4 + 9) + 5 + 5 + 6 + 4 +(7 + 5 * (4 * 4) + 8) * (3 + 8 + 2 * 2) * 2 * ((7 + 4 + 3 + 5) + 2 + 6 * 6 + 5 + 6) * 6 +5 * 2 * (2 * 4 + 9 + (2 * 4)) +4 * 6 * 6 + (7 * 4 * (8 * 3 + 4 * 2 + 6 * 7) * (9 + 8) + 7 * 3) * ((7 + 5) + 6 * 8 + 4) * (7 + 5 + 6 * 4 + 2) +7 * 6 * 4 * (7 * 2 * (5 * 2 + 2 + 3 + 5 * 9) * 8 + 2 + 5) + 7 + 6 +(8 + (6 + 4 + 3) * 9 * 2 * 5 + 3) * ((5 * 4 + 4) * 7 + 3 * 3 * 8 * 8) +4 + 7 * (9 * 6) + (4 + 6 * 5) + 7 * 3 +8 + 2 + 3 * (4 * (9 * 4 * 2 * 7 + 4 * 5) * 9 + 7 * 3) +3 * 6 + 8 + (2 * 4) +4 * 4 * 6 + 4 * 8 * 6 +(6 + 8) + 4 * 7 + (8 * (7 * 4 * 2 * 6 + 5 * 9) * 7 * 3 + 5) +(8 * 7 * 3 * (2 * 7 + 6 + 3 * 3)) + 3 * 8 * 3 * 3 + 4 +(6 * (4 + 4 * 4 * 9 + 2) + 5) + 5 + 9 + 2 * 4 + (4 * (4 * 7) * (8 + 5 * 2 + 8 * 7 * 8) * (2 + 8 * 4) + 4 + 6) +6 * ((9 * 3 * 6) + 8 * 4) + 4 * 6 * 4 + (3 * 2 * 6) +8 * (9 * 3 + 8 * 7 * 2) + (3 + 4 + 2 + 5) + 9 +(2 * (7 + 3) * 3) * 6 +5 * (6 + 2) + 5 * (4 * 6 * 8 * 7 + 9) +6 * 7 * 2 * (7 + 8 + 8) +9 * (8 + 5 + 7 + (8 * 6 + 4 * 3 + 2) * 8 * 4) * 3 * 8 * 5 * 6 +(2 * 6 + 9) + 5 + 6 + 8 + 8 +(9 * (2 + 7 * 6 + 7) * 7) + 2 * 9 * (4 + 2) + (9 + (5 + 7 + 9 * 3) + 3 * 9 * 8 + 4) * 7 +8 + 7 * 7 + (7 + (8 + 7 * 5 * 9 * 4) * (3 + 4 + 6 + 6 + 8 * 4)) * 9 +(5 * 2 + 4 + 3 + 8) + 3 * (9 + 7 * 3 * 2 + 7) +4 + (4 + 5 * (5 * 6 * 5 + 2 * 4) + (2 * 7 * 3 * 8 * 8 + 5) * 5 + 8) * 5 + (9 + (5 + 2 + 7 + 6 * 5 * 6) * 9) * (2 * (8 * 3 + 9)) + 8 diff --git a/haskellAoC/package.yaml b/haskellAoC/package.yaml index d89207b..5ba4690 100644 --- a/haskellAoC/package.yaml +++ b/haskellAoC/package.yaml @@ -30,6 +30,7 @@ dependencies: - scientific - sort - split +- text - unordered-containers - utf8-string - vector diff --git a/haskellAoC/src/Y2020/Day18.hs b/haskellAoC/src/Y2020/Day18.hs index f041748..59b930f 100644 --- a/haskellAoC/src/Y2020/Day18.hs +++ b/haskellAoC/src/Y2020/Day18.hs @@ -1,6 +1,54 @@ module Y2020.Day18 (y20day18) where +import Data.Text (pack, unpack, replace) + +-- Retrieve (if it exists) the first in-parenthesis expression it founds +getSubParen :: String -> String +getSubParen "" = "" +getSubParen ('(':s) = if '(' `notElem` s' + then s' + else getSubParen s' + where s' = takeWhile (/= ')') s +getSubParen (_:s) = getSubParen s + +-- Evaluate an expression (for part 1) left to right +-- Takes a wordified string to handle multi-character numbers... +evaluate :: [String] -> Int +evaluate input = fst $ foldl doOp (0, "") input + where doOp (0, "") c = (read c, "") + doOp (res, "+") c = (res + (read c), "") + doOp (res, "*") c = (res * (read c), "") + doOp (res, "") c = (res, c) + doOp e c = error ("Invalid fold on " ++ show (e,c) ++ " in " ++ input) + +-- Evaluate an expression (for part 2) by doing +'s first then calling P1 evaluate function +evaluateP2 :: [String] -> Int +evaluateP2 input + | "+" `elem` input = evaluateP2 $ removedPlus input + | otherwise = evaluate input + where removedPlus (a:"+":b:t) = (show ((read a :: Int) + (read b :: Int))):t + removedPlus (x:t) = x:(removedPlus t) + removedPlus [] = error ("Invalid formula, missing + operand in " ++ show input ++ "?") + +-- Replace an expression with its result directly in string +replaceExpr :: Bool -> String -> String -> String +replaceExpr isP2 baseExp subExp = resultExp + where toReplace = pack $ "(" ++ subExp ++ ")" + value False = evaluate $ words subExp + value True = evaluateP2 $ words subExp + replaceWith = pack $ show $ value isP2 + resultExp = unpack . replace toReplace replaceWith . pack $ baseExp + +-- Main function: as long as there are parenthesis, evaluate those and replace them with their results +computeExpression :: Bool -> String -> Int +computeExpression isP2 input + | '(' `elem` input = computeExpression isP2 simplified + | otherwise = result isP2 + where simplified = replaceExpr isP2 input $ getSubParen input + result False = evaluate $ words input + result True = evaluateP2 $ words input + y20day18 :: [String] -> (String, String) y20day18 input = (part1, part2) - where part1 = "WIP" - part2 = "WIP" + where part1 = show $ sum $ map (computeExpression False) input + part2 = show $ sum $ map (computeExpression True) input