diff --git a/src/Types/Collidible.hs b/src/Types/Collidible.hs index 13f14e3..323c67c 100644 --- a/src/Types/Collidible.hs +++ b/src/Types/Collidible.hs @@ -60,13 +60,13 @@ instance Collidible ImgId where [ Boundaries (0, 0.34) (1, 1) ] collisionObstacle ImgTableNW = - [ Boundaries (0, 0) (0.63, 1) + [ Boundaries (0.34, 0) (1, 1) ] collisionObstacle ImgTableNE = [ Boundaries (0, 0) (1, 0.63) ] collisionObstacle ImgTableSE = - [ Boundaries (0.34, 0) (1, 1) + [ Boundaries (0, 0) (0.63, 1) ] collisionObstacle ImgTableCorner = [ Boundaries (0, 0) (0.63, 1)