itBlt")) ==> #f
          (eq? 'JollyWog
            (string->symbol (symbol->string 'JollyWog))) ==> #t
          (string=? "K. Harper, M.D."
            (symbol->string
              (string->symbol "K. Harper, M.D."))) ==>#t