Scanf.scanf "%d %d %d %d" (fun a b x0 n -> let a, b = if x0 mod 2 = 0 then 0, n / 2 else n / 2, 0 in Printf.printf "%d %d\n" a b )