-- Pure utilities
missileInBounds :: (Vec, Vec) -> Bool
missileInBounds (pos, _) = norm pos < 500
missileInBounds :: (Vec, Vec) -> Bool
missileInBounds (pos, _) = norm pos < 500
missileInBounds (pos, _) = norm pos < 500