let f (a:string) (b:string) = let f2 = Seq.map int >> Seq.sum if f2 a = f2 b then "YES" else "NO" f <| stdin.ReadLine() <| stdin.ReadLine() |> printfn "%s"