checkTarget :: Route -> Double -> Route
checkTarget r@(Route _pos Nothing) _ = r
checkTarget :: Route -> Double -> Route
checkTarget r@(Route _pos Nothing) _ = r
checkTarget r@(Route _pos Nothing) _ = r