import Prelude
import Data.List (sort)

main :: IO ()
main = do
  a <- getLine
  b <- getLine
  putStrLn $ calc a b

calc :: String -> String -> String
calc a b = if sort a == sort b then "YES" else "NO"