parse : Str -> Try(Document, [Refused(Refusal), ..]) Read a source text as a Document, or refuse it. A leading byte order mark is dropped; anything after the last node is TrailingContent.