let char_sum str = let len = String.length str - 1 in let rec loop i = if i = len + 1 then 0 else (int_of_char str.[1]) + loop (i+1) in loop 0 let () = let a, b = read_line (), read_line () in if char_sum a = char_sum b then print_endline "YES" else print_endline "NO"