Scanf.scanf "%d %d" (fun a b -> Printf.printf "%d\n" ((a * b) mod 1000000007) )