diff --git a/src/Main.hs b/src/Main.hs
index 8ffaa2e..9df3159 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -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.