import qualified Data.List as L main = do a <- getLine b <- getLine putStrLn $ solve a b solve :: String -> String -> String solve a b = if a' == b' then "YES" else "NO" where a' = L.sort a b' = L.sort b