aoc2025 - add missing file, update for Prelude change

aoc2025/Day10.newt

@@ -8,10 +8,6 @@ import Data.Vect
 import Data.Fin
 import Z3
 
-instance ∀ a b. {{Show a}} → {{Show b}} → Show (Either a b) where
-  show (Left a) = "Left \{show a}"
-  show (Right b) = "Right \{show b}"
-
 record Machine where
   goal : Int
   buttons : List Int

aoc2025/Day7.newt

@@ -4,7 +4,6 @@ import Prelude
 import Node
 import Aoc
 import Data.SortedMap
-import Monad.State
 
 gridPoints : String → List (Char × Int × Int)
 gridPoints text = go 0 0 (unpack text) Nil

aoc2025/Monad

@@ -0,0 +1 @@
+../src/Monad