Scanf.scanf "%d %d" (fun x y -> Printf.printf "%d\n" @@ (x mod 4) + (3 - x / 4 - y / 4) * 4 )