feat: implement gamestate type
This commit is contained in:
parent
d3aa836a8f
commit
c8079cb914
1 changed files with 1 additions and 1 deletions
2
Proj2.hs
2
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)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue