Scanf.scanf "%d %d" (fun a b -> Printf.printf "%d\n" @@ if b / 40 = a then 1 else 2 )