main: Int
main = 1 + (if (distance_squared 10 2) > 10 then 1000 else 2000)
distance_squared: Int, Int -> Int
distance_squared a b = a * a + b * b