役割が違うだろ

read "\"foo\"" :: String
  = "foo"
fromString "\"foo\"" :: String
  = "\"foo\""