open Str let s = read_line () let ans = global_replace (regexp "ao") "ki" s let () = print_endline ans