showCard & hideCard toegevoegd
Bleek minder moeilijk dan initieel gedacht, probeer het niet te ver te zoeken
This commit is contained in:
		
							parent
							
								
									84e3bf1a82
								
							
						
					
					
						commit
						e505411e19
					
				
					 1 changed files with 4 additions and 3 deletions
				
			
		|  | @ -141,19 +141,20 @@ move board (dw, dh) | |||
| -- wanneer de posities overeenkomen. | ||||
| changeCard :: Coordinate -> CardStatus -> Card -> Card | ||||
| changeCard c0 s0 (c1, color, s1) | ||||
|     | c0 == c1 = (c0, color, s0) | ||||
|     | c0 == c1  = (c0, color, s0) | ||||
|     | otherwise = (c1, color, s1) | ||||
| 
 | ||||
| -- Verander de status van een enkele kaart in een reeks van  | ||||
| -- kaarten. Deze functie geeft een lijst terug waar de status  | ||||
| -- van de kaart is aangepast naar `Shown`. | ||||
| showCard :: Coordinate -> [Card] -> [Card] | ||||
| showCard target = undefined | ||||
| showCard target = map (changeCard target Shown) | ||||
| 
 | ||||
| -- Verander de status van een enkele kaart in een reeks van  | ||||
| -- kaarten. Deze functie geeft een lijst terug waar de status  | ||||
| -- van de kaart is aangepast naar `Hidden`. | ||||
| hideCard :: Coordinate -> [Card] -> [Card] | ||||
| hideCard target = undefined | ||||
| hideCard target = map (changeCard target Hidden) | ||||
| 
 | ||||
| -- Draai de kaart op een gegeven positie op het bord om  | ||||
| -- als deze nog niet eerder werd omgedraaid. | ||||
|  |  | |||
		Reference in a new issue