module Target where import Board (boardSize) import Geometry (distance) import Vec2 (Vec2) import Player (..) type Target = { score : Int , pos : Vec2 } targetSize : Float targetSize = 20 targetCollision : Player -> Target -> Bool targetCollision player target = (distance player.pos target.pos) < playerSize + targetSize initTarget : Target initTarget = { score = 0 , pos = { x = 50, y = 0 } }