let f (a:string) (b:string) = Seq.zip (a |> Seq.sort) (b |> Seq.sort) |> Seq.forall (fun (a,b) -> a = b) |> function | true -> "YES" | false -> "NO" f <| stdin.ReadLine() <| stdin.ReadLine() |> printfn "%s"