createFood :: WormsObject
createFood = let pic = Tex (tileSize,tileSize) 9
             in object "food" pic True (0,0) (0,0) NoObjectAttribute
createFood :: WormsObject
createFood = let pic = Tex (tileSize,tileSize) 9
             in object "food" pic True (0,0) (0,0) NoObjectAttribute
createFood = let pic = Tex (tileSize,tileSize) 9
             in object "food" pic True (0,0) (0,0) NoObjectAttribute