Play with syntax

2023-12-04 19:05:20 +01:00
parent e746e22b0b
commit 53cad097f8
15 changed files with 27 additions and 26 deletions
--- a/day03/Part2.hs
+++ b/day03/Part2.hs
@@ -32,4 +32,4 @@ getGearRatios (h: t) numberParts = let gearRatio = getGearRatio h numberParts
                                         else getGearRatios t numberParts

 getGearRatiosFromEngine :: Engine -> [Int]
-getGearRatiosFromEngine engine = getGearRatios (symbols engine) (numbers engine)
+getGearRatiosFromEngine engine = getGearRatios (symbols engine) $ numbers engine