import Data.List

main :: IO ()
main = interact $ solve . words

solve :: [String] -> String
solve [s1, s2]
    | sort s1 == sort s2 = "YES"
    | otherwise          = "NO"