{-# OPTIONS_GHC -Wall #-}

module Text.Pandoc.Z.Readers where

import Control.Lens ( review )
import Citeproc.Types ( Citation )
import Data.ByteString.Lazy ( ByteString )
import Data.Text ( Text )
import Text.Pandoc.Class ( PandocMonad )
import qualified Text.Pandoc.Definition as Pandoc(Pandoc)
import qualified Text.Pandoc.Readers.BibTeX as R
import qualified Text.Pandoc.Readers.CSV as R
import qualified Text.Pandoc.Readers.CommonMark as R
import qualified Text.Pandoc.Readers.Creole as R
import qualified Text.Pandoc.Readers.CslJson as R
import qualified Text.Pandoc.Readers.Djot as R
import qualified Text.Pandoc.Readers.DocBook as R
import qualified Text.Pandoc.Readers.Docx as R
import qualified Text.Pandoc.Readers.DokuWiki as R
import qualified Text.Pandoc.Readers.EPUB as R
import qualified Text.Pandoc.Readers.EndNote as R
import qualified Text.Pandoc.Readers.FB2 as R
import qualified Text.Pandoc.Readers.HTML as R
import qualified Text.Pandoc.Readers.Haddock as R
import qualified Text.Pandoc.Readers.Ipynb as R
import qualified Text.Pandoc.Readers.JATS as R
import qualified Text.Pandoc.Readers.Jira as R
import qualified Text.Pandoc.Readers.LaTeX as R
import qualified Text.Pandoc.Readers.Man as R
import qualified Text.Pandoc.Readers.Markdown as R
import qualified Text.Pandoc.Readers.MediaWiki as R
import qualified Text.Pandoc.Readers.Muse as R
import qualified Text.Pandoc.Readers.Native as R
import qualified Text.Pandoc.Readers.ODT as R
import qualified Text.Pandoc.Readers.OPML as R
import qualified Text.Pandoc.Readers.Org as R
import qualified Text.Pandoc.Readers.RIS as R
import qualified Text.Pandoc.Readers.RST as R
import qualified Text.Pandoc.Readers.RTF as R
import qualified Text.Pandoc.Readers.TWiki as R
import qualified Text.Pandoc.Readers.Textile as R
import qualified Text.Pandoc.Readers.TikiWiki as R
import qualified Text.Pandoc.Readers.Txt2Tags as R
import qualified Text.Pandoc.Readers.Typst as R
import qualified Text.Pandoc.Readers.Vimwiki as R
import Text.Pandoc.Sources ( ToSources )
import Text.Pandoc.Z.Definition(Pandoc, isPandoc)
import Text.Pandoc.Z.ReaderOptions ( ReaderOptions )

-- $setup
-- >>> import Text.Pandoc.Z.Util

convertReader ::
  Functor f =>
  (a -> b -> f Pandoc.Pandoc)
  -> a
  -> b
  -> f Pandoc
convertReader :: forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader a -> b -> f Pandoc
r a
o b
a =
  AReview Pandoc Pandoc -> Pandoc -> Pandoc
forall b (m :: * -> *) t. MonadReader b m => AReview t b -> m t
review AReview Pandoc Pandoc
Iso' Pandoc Pandoc
isPandoc (Pandoc -> Pandoc) -> f Pandoc -> f Pandoc
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> a -> b -> f Pandoc
r a
o b
a

readBibTeX ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readBibTeX :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readBibTeX =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readBibTeX

readBibLaTeX ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readBibLaTeX :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readBibLaTeX =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readBibTeX

-- |
--
-- >>> readPandocExtensions readCSV "abc,def,\"ghi\""
-- Right (Pandoc (Meta (fromList [])) [TableBlock (Table (Attr "" [] []) (Caption Nothing []) [ColSpec AlignDefault ColWidthDefault,ColSpec AlignDefault ColWidthDefault,ColSpec AlignDefault ColWidthDefault] (TableHead (Attr "" [] []) [Row (Attr "" [] []) [Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "abc"]],Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "def"]],Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "ghi"]]]]) [TableBody (Attr "" [] []) (RowHeadColumns (RowHeadColumns 0)) [] []] (TableFoot (Attr "" [] []) []))])
--
-- >>> readPandocExtensions readCSV "abc,def,\"ghi\"\njkl,mno,pqr\n"
-- Right (Pandoc (Meta (fromList [])) [TableBlock (Table (Attr "" [] []) (Caption Nothing []) [ColSpec AlignDefault ColWidthDefault,ColSpec AlignDefault ColWidthDefault,ColSpec AlignDefault ColWidthDefault] (TableHead (Attr "" [] []) [Row (Attr "" [] []) [Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "abc"]],Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "def"]],Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "ghi"]]]]) [TableBody (Attr "" [] []) (RowHeadColumns (RowHeadColumns 0)) [] [Row (Attr "" [] []) [Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "jkl"]],Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "mno"]],Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "pqr"]]]]] (TableFoot (Attr "" [] []) []))])
readCSV ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readCSV :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readCSV =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readCSV

-- |
--
-- >>> readPandocExtensions readTSV "abc\tdef\t,\"ghi\""
-- Right (Pandoc (Meta (fromList [])) [TableBlock (Table (Attr "" [] []) (Caption Nothing []) [ColSpec AlignDefault ColWidthDefault,ColSpec AlignDefault ColWidthDefault] (TableHead (Attr "" [] []) [Row (Attr "" [] []) [Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "abc",Space,Str "def",Space]],Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "ghi"]]]]) [TableBody (Attr "" [] []) (RowHeadColumns (RowHeadColumns 0)) [] []] (TableFoot (Attr "" [] []) []))])
readTSV ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readTSV :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readTSV =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readCSV

readCommonMark ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readCommonMark :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readCommonMark =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readCommonMark

readCreole ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readCreole :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readCreole =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readCreole

readCslJson ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readCslJson :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readCslJson =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readCslJson

readDjot ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readDjot :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readDjot =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readDjot

readDocBook::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readDocBook :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readDocBook =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readDocBook

readDocx ::
  PandocMonad m =>
  ReaderOptions
  -> ByteString
  -> m Pandoc
readDocx :: forall (m :: * -> *).
PandocMonad m =>
ReaderOptions -> ByteString -> m Pandoc
readDocx =
  (ReaderOptions -> ByteString -> m Pandoc)
-> ReaderOptions -> ByteString -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> ByteString -> m Pandoc
forall (m :: * -> *).
PandocMonad m =>
ReaderOptions -> ByteString -> m Pandoc
R.readDocx

readDokuWiki ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readDokuWiki :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readDokuWiki =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readDokuWiki

readEPUB ::
  PandocMonad m =>
  ReaderOptions
  -> ByteString
  -> m Pandoc
readEPUB :: forall (m :: * -> *).
PandocMonad m =>
ReaderOptions -> ByteString -> m Pandoc
readEPUB =
  (ReaderOptions -> ByteString -> m Pandoc)
-> ReaderOptions -> ByteString -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> ByteString -> m Pandoc
forall (m :: * -> *).
PandocMonad m =>
ReaderOptions -> ByteString -> m Pandoc
R.readEPUB

readEndNoteXML ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readEndNoteXML :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readEndNoteXML =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readEndNoteXML

readEndNoteXMLCitation ::
  PandocMonad m =>
  Text
  -> m (Citation Text)
readEndNoteXMLCitation :: forall (m :: * -> *). PandocMonad m => Text -> m (Citation Text)
readEndNoteXMLCitation =
  Text -> m (Citation Text)
forall (m :: * -> *). PandocMonad m => Text -> m (Citation Text)
R.readEndNoteXMLCitation

readFB2::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readFB2 :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readFB2 =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readFB2

-- |
--
-- >>> readPandocExtensions readHtml "abc"
-- Right (Pandoc (Meta (fromList [])) [Plain [Str "abc"]])
--
-- >>> readPandocExtensions readHtml "<p><div>abc</div></p>"
-- Right (Pandoc (Meta (fromList [])) [DivBlock (Div (Attr "" [] []) [Plain [Str "abc"]]),RawBlock (Raw (Format (Format "html")) "</p>")])
--
-- >>> readPandocExtensions readHtml "<b><p><div>abc</div></p></b>"
-- Right (Pandoc (Meta (fromList [])) [Plain [Strong []],DivBlock (Div (Attr "" [] []) [Plain [Str "abc"]]),RawBlock (Raw (Format (Format "html")) "</p>"),Plain [RawInline (Raw (Format (Format "html")) "</b>")]])
readHtml::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readHtml :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readHtml =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readHtml

readHaddock::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readHaddock :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readHaddock =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readHaddock

readIpynb::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readIpynb :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readIpynb =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readIpynb

readJATS::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readJATS :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readJATS =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readJATS

readJira::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readJira :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readJira =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readJira

readLaTeX::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readLaTeX :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readLaTeX =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readLaTeX

readMan::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readMan :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readMan =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readMan

-- |
--
-- >>> readPandocExtensions readMarkdown "abc"
-- Right (Pandoc (Meta (fromList [])) [Para [Str "abc"]])
--
-- >>> readPandocExtensions readMarkdown "**abc** _def_"
-- Right (Pandoc (Meta (fromList [])) [Para [Strong [Str "abc"],Space,Emph [Str "def"]]])
--
-- >>> readPandocExtensions readMarkdown "  abc   def   ghi\n  ----- ----- -----\n  jkl   mno   pqr\n"
-- Right (Pandoc (Meta (fromList [])) [TableBlock (Table (Attr "" [] []) (Caption Nothing []) [ColSpec AlignLeft ColWidthDefault,ColSpec AlignLeft ColWidthDefault,ColSpec AlignLeft ColWidthDefault] (TableHead (Attr "" [] []) [Row (Attr "" [] []) [Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "abc"]],Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "def"]],Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "ghi"]]]]) [TableBody (Attr "" [] []) (RowHeadColumns (RowHeadColumns 0)) [] [Row (Attr "" [] []) [Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "jkl"]],Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "mno"]],Cell (Attr "" [] []) AlignDefault (RowSpan (RowSpan 1)) (ColSpan (ColSpan 1)) [Plain [Str "pqr"]]]]] (TableFoot (Attr "" [] []) []))])
readMarkdown::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readMarkdown :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readMarkdown =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readMarkdown

readMediaWiki::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readMediaWiki :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readMediaWiki =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readMediaWiki

readMuse::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readMuse :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readMuse =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readMuse

readNative ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readNative :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readNative =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readNative

readODT ::
  PandocMonad m =>
  ReaderOptions
  -> ByteString
  -> m Pandoc
readODT :: forall (m :: * -> *).
PandocMonad m =>
ReaderOptions -> ByteString -> m Pandoc
readODT =
  (ReaderOptions -> ByteString -> m Pandoc)
-> ReaderOptions -> ByteString -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> ByteString -> m Pandoc
forall (m :: * -> *).
PandocMonad m =>
ReaderOptions -> ByteString -> m Pandoc
R.readODT

readOPML ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readOPML :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readOPML =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readOPML

readOrg ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readOrg :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readOrg =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readOrg

readRIS ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readRIS :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readRIS =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readRIS

readRST ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readRST :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readRST =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readRST

readRTF ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readRTF :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readRTF =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readRTF

readTWiki ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readTWiki :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readTWiki =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readTWiki

readTextile ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readTextile :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readTextile =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readTextile

readTikiWiki ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readTikiWiki :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readTikiWiki =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readTikiWiki

readTxt2Tags ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readTxt2Tags :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readTxt2Tags =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readTxt2Tags

readTypst ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readTypst :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readTypst =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readTypst

readVimwiki ::
  (PandocMonad m, ToSources a) =>
  ReaderOptions
  -> a
  -> m Pandoc
readVimwiki :: forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
readVimwiki =
  (ReaderOptions -> a -> m Pandoc) -> ReaderOptions -> a -> m Pandoc
forall (f :: * -> *) a b.
Functor f =>
(a -> b -> f Pandoc) -> a -> b -> f Pandoc
convertReader ReaderOptions -> a -> m Pandoc
forall (m :: * -> *) a.
(PandocMonad m, ToSources a) =>
ReaderOptions -> a -> m Pandoc
R.readVimwiki