Richtingen toegevoegd
This commit is contained in:
parent
e44a36a6b3
commit
ae043bb239
1 changed files with 4 additions and 4 deletions
|
@ -84,10 +84,10 @@ initBoard = Board {
|
||||||
|
|
||||||
-- De mogelijke richtingen van de selector.
|
-- De mogelijke richtingen van de selector.
|
||||||
left, right, up, down :: Direction
|
left, right, up, down :: Direction
|
||||||
left = undefined
|
left = ((-1), 0 )
|
||||||
right = undefined
|
right = ( 1 , 0 )
|
||||||
up = undefined
|
up = ( 0 ,(-1))
|
||||||
down = undefined
|
down = ( 0 , 1 )
|
||||||
|
|
||||||
-- Controleer of twee kaarten dezelfde kleur hebben.
|
-- Controleer of twee kaarten dezelfde kleur hebben.
|
||||||
match :: Card -> Card -> Bool
|
match :: Card -> Card -> Bool
|
||||||
|
|
Reference in a new issue