movePlayer West game  = game { player = (player game) { playerX = xv } }
                      where
                      x= playerX (player game)
                      xv = x - 10
                      
-- Functie die de positie van alle vijanden en achtergrondobjecten aanpast.
-- De functie geeft dus een GameState terug waarin de enemyX, enemyY, backX en backY van alle vijanden en achtergrondobjecten zijn aangepast.       
movePlayer West game  = game { player = (player game) { playerX = xv } }
                      where
                      x= playerX (player game)
                      xv = x - 10
                      
-- Functie die de positie van alle vijanden en achtergrondobjecten aanpast.
-- De functie geeft dus een GameState terug waarin de enemyX, enemyY, backX en backY van alle vijanden en achtergrondobjecten zijn aangepast.       
movePlayer West game  = game { player = (player game) { playerX = xv } }
                      where
                      x= playerX (player game)
                      xv = x - 10
                      
-- Functie die de positie van alle vijanden en achtergrondobjecten aanpast.
-- De functie geeft dus een GameState terug waarin de enemyX, enemyY, backX en backY van alle vijanden en achtergrondobjecten zijn aangepast.       