From c8079cb9143a8258f650b9df0cc6c468165a2b1a Mon Sep 17 00:00:00 2001 From: wi11-holdsworth <83637728+wi11-holdsworth@users.noreply.github.com> Date: Wed, 24 Sep 2025 14:54:29 +1000 Subject: [PATCH] feat: implement gamestate type --- Proj2.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Proj2.hs b/Proj2.hs index 6a23ce6..a1e6774 100644 --- a/Proj2.hs +++ b/Proj2.hs @@ -10,10 +10,10 @@ module Proj2 ) where -type GameState = () import Data.List import Data.Set qualified as S +type GameState = [[Pitch]] data Note = A | B | C | D | E | F | G deriving (Eq, Show, Ord)