(define A (symbol->string (read))) (define B (symbol->string (read))) (print (if (equal? (sort A) (sort B)) "YES" "NO"))