Pandoc
  ( Meta
    { unMeta = fromList
      [
        ( "author"
        , MetaList
          [ MetaInlines
            [ Str "John", Space, Str "MacFarlane" ]
          , MetaInlines
            [ Str "Anonymous" ]
          ]
        )
      ,
        ( "date"
        , MetaInlines
          [ Str "July", Space, Str "17,", Space, Str "2006" ]
        )
      ,
        ( "title"
        , MetaInlines
          [ Str "Pandoc", Space, Str "Test", Space, Str "Suite" ]
        )
      ]
    }
  )
  [ Para
    [ Str "This"
    , Space
    , Str "is"
    , Space
    , Str "a"
    , Space
    , Str "set"
    , Space
    , Str "of"
    , Space
    , Str "tests"
    , Space
    , Str "for"
    , Space
    , Str "pandoc."
    , Space
    , Str "Most"
    , Space
    , Str "of"
    , Space
    , Str "them"
    , Space
    , Str "are"
    , Space
    , Str "adapted"
    , Space
    , Str "from"
    , SoftBreak
    , Str "John"
    , Space
    , Str "Gruber\8217s"
    , Space
    , Str "markdown"
    , Space
    , Str "test"
    , Space
    , Str "suite."
    ]
  , HorizontalRule
  , Header 1
    ( "headers", [], [] )
    [ Str "Headers" ]
  , Header 2
    ( "level-2-with-an-embedded-link", [], [] )
    [ Str "Level"
    , Space
    , Str "2"
    , Space
    , Str "with"
    , Space
    , Str "an"
    , Space
    , Link
      ( "", [], [] )
      [ Str "embedded", Space, Str "link" ]
      ( "/url", "" )
    ]
  , Header 3
    ( "level-3-with-emphasis", [], [] )
    [ Str "Level"
    , Space
    , Str "3"
    , Space
    , Str "with"
    , Space
    , Emph
      [ Str "emphasis" ]
    ]
  , Header 4
    ( "level-4", [], [] )
    [ Str "Level", Space, Str "4" ]
  , Header 5
    ( "level-5", [], [] )
    [ Str "Level", Space, Str "5" ]
  , Header 1
    ( "level-1", [], [] )
    [ Str "Level", Space, Str "1" ]
  , Header 2
    ( "level-2-with-emphasis", [], [] )
    [ Str "Level"
    , Space
    , Str "2"
    , Space
    , Str "with"
    , Space
    , Emph
      [ Str "emphasis" ]
    ]
  , Header 3
    ( "level-3", [], [] )
    [ Str "Level", Space, Str "3" ]
  , Para
    [ Str "with", Space, Str "no", Space, Str "blank", Space, Str "line" ]
  , Header 2
    ( "level-2", [], [] )
    [ Str "Level", Space, Str "2" ]
  , Para
    [ Str "with", Space, Str "no", Space, Str "blank", Space, Str "line" ]
  , HorizontalRule
  , Header 1
    ( "paragraphs", [], [] )
    [ Str "Paragraphs" ]
  , Para
    [ Str "Here\8217s"
    , Space
    , Str "a"
    , Space
    , Str "regular"
    , Space
    , Str "paragraph."
    ]
  , Para
    [ Str "In"
    , Space
    , Str "Markdown"
    , Space
    , Str "1.0.0"
    , Space
    , Str "and"
    , Space
    , Str "earlier."
    , Space
    , Str "Version"
    , SoftBreak
    , Str "8."
    , Space
    , Str "This"
    , Space
    , Str "line"
    , Space
    , Str "turns"
    , Space
    , Str "into"
    , Space
    , Str "a"
    , Space
    , Str "list"
    , Space
    , Str "item."
    , SoftBreak
    , Str "Because"
    , Space
    , Str "a"
    , Space
    , Str "hard-wrapped"
    , Space
    , Str "line"
    , Space
    , Str "in"
    , Space
    , Str "the"
    , SoftBreak
    , Str "middle"
    , Space
    , Str "of"
    , Space
    , Str "a"
    , Space
    , Str "paragraph"
    , Space
    , Str "looked"
    , Space
    , Str "like"
    , Space
    , Str "a"
    , SoftBreak
    , Str "list"
    , Space
    , Str "item."
    ]
  , Para
    [ Str "Here\8217s"
    , Space
    , Str "one"
    , Space
    , Str "with"
    , Space
    , Str "a"
    , Space
    , Str "bullet."
    , SoftBreak
    , Str "*"
    , Space
    , Str "criminey."
    ]
  , Para
    [ Str "There"
    , Space
    , Str "should"
    , Space
    , Str "be"
    , Space
    , Str "a"
    , Space
    , Str "hard"
    , Space
    , Str "line"
    , Space
    , Str "break"
    , LineBreak
    , Str "here."
    ]
  , HorizontalRule
  , Header 1
    ( "block-quotes", [], [] )
    [ Str "Block", Space, Str "Quotes" ]
  , Para
    [ Str "E-mail", Space, Str "style:" ]
  , BlockQuote
    [ Para
      [ Str "This"
      , Space
      , Str "is"
      , Space
      , Str "a"
      , Space
      , Str "block"
      , Space
      , Str "quote."
      , SoftBreak
      , Str "It"
      , Space
      , Str "is"
      , Space
      , Str "pretty"
      , Space
      , Str "short."
      ]
    ]
  , BlockQuote
    [ Para
      [ Str "Code"
      , Space
      , Str "in"
      , Space
      , Str "a"
      , Space
      , Str "block"
      , Space
      , Str "quote:"
      ]
    , CodeBlock
      ( "", [], [] ) "sub status {\n    print \"working\";\n}"
    , Para
      [ Str "A", Space, Str "list:" ]
    , OrderedList
      ( 1, Decimal, Period )
      [
        [ Plain [ Str "item", Space, Str "one" ] ]
      ,
        [ Plain [ Str "item", Space, Str "two" ] ]
      ]
    , Para
      [ Str "Nested", Space, Str "block", Space, Str "quotes:" ]
    , BlockQuote
      [ Para [ Str "nested" ] ]
    , BlockQuote
      [ Para [ Str "nested" ] ]
    ]
  , Para
    [ Str "This"
    , Space
    , Str "should"
    , Space
    , Str "not"
    , Space
    , Str "be"
    , Space
    , Str "a"
    , Space
    , Str "block"
    , Space
    , Str "quote:"
    , Space
    , Str "2"
    , SoftBreak
    , Str ">"
    , Space
    , Str "1."
    ]
  , Para
    [ Str "And"
    , Space
    , Str "a"
    , Space
    , Str "following"
    , Space
    , Str "paragraph."
    ]
  , HorizontalRule
  , Header 1
    ( "code-blocks", [], [] )
    [ Str "Code", Space, Str "Blocks" ]
  , Para
    [ Str "Code:" ]
  , CodeBlock
    ( ""
    , []
    , []
    ) "---- (should be four hyphens)\n\nsub status {\n    print \"working\";\n}\n\nthis code block is indented by one tab"
  , Para
    [ Str "And:" ]
  , CodeBlock
    ( ""
    , []
    , []
    ) "    this code block is indented by two tabs\n\nThese should not be escaped:  \\$ \\\\ \\> \\[ \\{"
  , HorizontalRule
  , Header 1
    ( "lists", [], [] )
    [ Str "Lists" ]
  , Header 2
    ( "unordered", [], [] )
    [ Str "Unordered" ]
  , Para
    [ Str "Asterisks", Space, Str "tight:" ]
  , BulletList
    [
      [ Plain [ Str "asterisk", Space, Str "1" ] ]
    ,
      [ Plain [ Str "asterisk", Space, Str "2" ] ]
    ,
      [ Plain [ Str "asterisk", Space, Str "3" ] ]
    ]
  , Para
    [ Str "Asterisks", Space, Str "loose:" ]
  , BulletList
    [
      [ Para [ Str "asterisk", Space, Str "1" ] ]
    ,
      [ Para [ Str "asterisk", Space, Str "2" ] ]
    ,
      [ Para [ Str "asterisk", Space, Str "3" ] ]
    ]
  , Para
    [ Str "Pluses", Space, Str "tight:" ]
  , BulletList
    [
      [ Plain [ Str "Plus", Space, Str "1" ] ]
    ,
      [ Plain [ Str "Plus", Space, Str "2" ] ]
    ,
      [ Plain [ Str "Plus", Space, Str "3" ] ]
    ]
  , Para
    [ Str "Pluses", Space, Str "loose:" ]
  , BulletList
    [
      [ Para [ Str "Plus", Space, Str "1" ] ]
    ,
      [ Para [ Str "Plus", Space, Str "2" ] ]
    ,
      [ Para [ Str "Plus", Space, Str "3" ] ]
    ]
  , Para
    [ Str "Minuses", Space, Str "tight:" ]
  , BulletList
    [
      [ Plain [ Str "Minus", Space, Str "1" ] ]
    ,
      [ Plain [ Str "Minus", Space, Str "2" ] ]
    ,
      [ Plain [ Str "Minus", Space, Str "3" ] ]
    ]
  , Para
    [ Str "Minuses", Space, Str "loose:" ]
  , BulletList
    [
      [ Para [ Str "Minus", Space, Str "1" ] ]
    ,
      [ Para [ Str "Minus", Space, Str "2" ] ]
    ,
      [ Para [ Str "Minus", Space, Str "3" ] ]
    ]
  , Header 2
    ( "ordered", [], [] )
    [ Str "Ordered" ]
  , Para
    [ Str "Tight:" ]
  , OrderedList
    ( 1, Decimal, Period )
    [
      [ Plain [ Str "First" ] ]
    ,
      [ Plain [ Str "Second" ] ]
    ,
      [ Plain [ Str "Third" ] ]
    ]
  , Para
    [ Str "and:" ]
  , OrderedList
    ( 1, Decimal, Period )
    [
      [ Plain [ Str "One" ] ]
    ,
      [ Plain [ Str "Two" ] ]
    ,
      [ Plain [ Str "Three" ] ]
    ]
  , Para
    [ Str "Loose", Space, Str "using", Space, Str "tabs:" ]
  , OrderedList
    ( 1, Decimal, Period )
    [
      [ Para [ Str "First" ] ]
    ,
      [ Para [ Str "Second" ] ]
    ,
      [ Para [ Str "Third" ] ]
    ]
  , Para
    [ Str "and", Space, Str "using", Space, Str "spaces:" ]
  , OrderedList
    ( 1, Decimal, Period )
    [ [ Para [ Str "One" ] ], [ Para [ Str "Two" ] ], [ Para [ Str "Three" ] ] ]
  , Para
    [ Str "Multiple", Space, Str "paragraphs:" ]
  , OrderedList
    ( 1, Decimal, Period )
    [
      [ Para
        [ Str "Item", Space, Str "1,", Space, Str "graf", Space, Str "one." ]
      , Para
        [ Str "Item"
        , Space
        , Str "1."
        , Space
        , Str "graf"
        , Space
        , Str "two."
        , Space
        , Str "The"
        , Space
        , Str "quick"
        , Space
        , Str "brown"
        , Space
        , Str "fox"
        , Space
        , Str "jumped"
        , Space
        , Str "over"
        , Space
        , Str "the"
        , Space
        , Str "lazy"
        , Space
        , Str "dog\8217s"
        , SoftBreak
        , Str "back."
        ]
      ]
    ,
      [ Para [ Str "Item", Space, Str "2." ] ]
    ,
      [ Para [ Str "Item", Space, Str "3." ] ]
    ]
  , Header 2
    ( "nested", [], [] )
    [ Str "Nested" ]
  , BulletList
    [
      [ Plain
        [ Str "Tab" ]
      , BulletList
        [ [ Plain [ Str "Tab" ], BulletList [ [ Plain [ Str "Tab" ] ] ] ] ]
      ]
    ]
  , Para
    [ Str "Here\8217s", Space, Str "another:" ]
  , OrderedList
    ( 1, Decimal, Period )
    [
      [ Plain [ Str "First" ] ]
    ,
      [ Plain
        [ Str "Second:" ]
      , BulletList
        [
          [ Plain [ Str "Fee" ] ]
        ,
          [ Plain [ Str "Fie" ] ]
        ,
          [ Plain [ Str "Foe" ] ]
        ]
      ]
    ,
      [ Plain [ Str "Third" ] ]
    ]
  , Para
    [ Str "Same"
    , Space
    , Str "thing"
    , Space
    , Str "but"
    , Space
    , Str "with"
    , Space
    , Str "paragraphs:"
    ]
  , OrderedList
    ( 1, Decimal, Period )
    [
      [ Para [ Str "First" ] ]
    ,
      [ Para
        [ Str "Second:" ]
      , BulletList
        [
          [ Plain [ Str "Fee" ] ]
        ,
          [ Plain [ Str "Fie" ] ]
        ,
          [ Plain [ Str "Foe" ] ]
        ]
      ]
    ,
      [ Para [ Str "Third" ] ]
    ]
  , Header 2
    ( "tabs-and-spaces", [], [] )
    [ Str "Tabs", Space, Str "and", Space, Str "spaces" ]
  , BulletList
    [
      [ Para
        [ Str "this"
        , Space
        , Str "is"
        , Space
        , Str "a"
        , Space
        , Str "list"
        , Space
        , Str "item"
        , SoftBreak
        , Str "indented"
        , Space
        , Str "with"
        , Space
        , Str "tabs"
        ]
      ]
    ,
      [ Para
        [ Str "this"
        , Space
        , Str "is"
        , Space
        , Str "a"
        , Space
        , Str "list"
        , Space
        , Str "item"
        , SoftBreak
        , Str "indented"
        , Space
        , Str "with"
        , Space
        , Str "spaces"
        ]
      , BulletList
        [
          [ Para
            [ Str "this"
            , Space
            , Str "is"
            , Space
            , Str "an"
            , Space
            , Str "example"
            , Space
            , Str "list"
            , Space
            , Str "item"
            , SoftBreak
            , Str "indented"
            , Space
            , Str "with"
            , Space
            , Str "tabs"
            ]
          ]
        ,
          [ Para
            [ Str "this"
            , Space
            , Str "is"
            , Space
            , Str "an"
            , Space
            , Str "example"
            , Space
            , Str "list"
            , Space
            , Str "item"
            , SoftBreak
            , Str "indented"
            , Space
            , Str "with"
            , Space
            , Str "spaces"
            ]
          ]
        ]
      ]
    ]
  , Header 2
    ( "fancy-list-markers", [], [] )
    [ Str "Fancy", Space, Str "list", Space, Str "markers" ]
  , OrderedList
    ( 2, Decimal, TwoParens )
    [
      [ Para [ Str "begins", Space, Str "with", Space, Str "2" ] ]
    ,
      [ Para
        [ Str "and", Space, Str "now", Space, Str "3" ]
      , Para
        [ Str "with", Space, Str "a", Space, Str "continuation" ]
      , OrderedList
        ( 4, LowerRoman, Period )
        [
          [ Plain
            [ Str "sublist"
            , Space
            , Str "with"
            , Space
            , Str "roman"
            , Space
            , Str "numerals,"
            , SoftBreak
            , Str "starting"
            , Space
            , Str "with"
            , Space
            , Str "4"
            ]
          ]
        ,
          [ Plain
            [ Str "more", Space, Str "items" ]
          , OrderedList
            ( 1, UpperAlpha, TwoParens )
            [
              [ Plain [ Str "a", Space, Str "subsublist" ] ]
            ,
              [ Plain [ Str "a", Space, Str "subsublist" ] ]
            ]
          ]
        ]
      ]
    ]
  , Para
    [ Str "Nesting:" ]
  , OrderedList
    ( 1, UpperAlpha, Period )
    [
      [ Plain
        [ Str "Upper", Space, Str "Alpha" ]
      , OrderedList
        ( 1, UpperRoman, Period )
        [
          [ Plain
            [ Str "Upper", Space, Str "Roman." ]
          , OrderedList
            ( 6, Decimal, TwoParens )
            [
              [ Plain
                [ Str "Decimal"
                , Space
                , Str "start"
                , Space
                , Str "with"
                , Space
                , Str "6"
                ]
              , OrderedList
                ( 3, LowerAlpha, OneParen )
                [
                  [ Plain
                    [ Str "Lower"
                    , Space
                    , Str "alpha"
                    , Space
                    , Str "with"
                    , Space
                    , Str "paren"
                    ]
                  ]
                ]
              ]
            ]
          ]
        ]
      ]
    ]
  , Para
    [ Str "Autonumbering:" ]
  , OrderedList
    ( 1, DefaultStyle, DefaultDelim )
    [
      [ Plain [ Str "Autonumber." ] ]
    ,
      [ Plain
        [ Str "More." ]
      , OrderedList
        ( 1, DefaultStyle, DefaultDelim )
        [ [ Plain [ Str "Nested." ] ] ]
      ]
    ]
  , Para
    [ Str "Should"
    , Space
    , Str "not"
    , Space
    , Str "be"
    , Space
    , Str "a"
    , Space
    , Str "list"
    , Space
    , Str "item:"
    ]
  , Para
    [ Str "M.A.\160\&2007" ]
  , Para
    [ Str "B.", Space, Str "Williams" ]
  , HorizontalRule
  , Header 1
    ( "definition-lists", [], [] )
    [ Str "Definition", Space, Str "Lists" ]
  , Para
    [ Str "Tight", Space, Str "using", Space, Str "spaces:" ]
  , DefinitionList
    [
      ( [ Str "apple" ], [ [ Plain [ Str "red", Space, Str "fruit" ] ] ] )
    ,
      ( [ Str "orange" ], [ [ Plain [ Str "orange", Space, Str "fruit" ] ] ] )
    ,
      ( [ Str "banana" ], [ [ Plain [ Str "yellow", Space, Str "fruit" ] ] ] )
    ]
  , Para
    [ Str "Tight", Space, Str "using", Space, Str "tabs:" ]
  , DefinitionList
    [
      ( [ Str "apple" ], [ [ Plain [ Str "red", Space, Str "fruit" ] ] ] )
    ,
      ( [ Str "orange" ], [ [ Plain [ Str "orange", Space, Str "fruit" ] ] ] )
    ,
      ( [ Str "banana" ], [ [ Plain [ Str "yellow", Space, Str "fruit" ] ] ] )
    ]
  , Para
    [ Str "Loose:" ]
  , DefinitionList
    [
      ( [ Str "apple" ], [ [ Para [ Str "red", Space, Str "fruit" ] ] ] )
    ,
      ( [ Str "orange" ], [ [ Para [ Str "orange", Space, Str "fruit" ] ] ] )
    ,
      ( [ Str "banana" ], [ [ Para [ Str "yellow", Space, Str "fruit" ] ] ] )
    ]
  , Para
    [ Str "Multiple"
    , Space
    , Str "blocks"
    , Space
    , Str "with"
    , Space
    , Str "italics:"
    ]
  , DefinitionList
    [
      (
        [ Emph [ Str "apple" ] ]
      ,
        [
          [ Para
            [ Str "red", Space, Str "fruit" ]
          , Para
            [ Str "contains"
            , Space
            , Str "seeds,"
            , SoftBreak
            , Str "crisp,"
            , Space
            , Str "pleasant"
            , Space
            , Str "to"
            , Space
            , Str "taste"
            ]
          ]
        ]
      )
    ,
      (
        [ Emph [ Str "orange" ] ]
      ,
        [
          [ Para
            [ Str "orange", Space, Str "fruit" ]
          , CodeBlock
            ( "", [], [] ) "{ orange code block }"
          , BlockQuote
            [ Para [ Str "orange", Space, Str "block", Space, Str "quote" ] ]
          ]
        ]
      )
    ]
  , Para
    [ Str "Multiple", Space, Str "definitions,", Space, Str "tight:" ]
  , DefinitionList
    [
      (
        [ Str "apple" ]
      ,
        [
          [ Plain [ Str "red", Space, Str "fruit" ] ]
        ,
          [ Plain [ Str "computer" ] ]
        ]
      )
    ,
      (
        [ Str "orange" ]
      ,
        [
          [ Plain [ Str "orange", Space, Str "fruit" ] ]
        ,
          [ Plain [ Str "bank" ] ]
        ]
      )
    ]
  , Para
    [ Str "Multiple", Space, Str "definitions,", Space, Str "loose:" ]
  , DefinitionList
    [
      (
        [ Str "apple" ]
      ,
        [
          [ Para [ Str "red", Space, Str "fruit" ] ]
        ,
          [ Para [ Str "computer" ] ]
        ]
      )
    ,
      (
        [ Str "orange" ]
      ,
        [
          [ Para [ Str "orange", Space, Str "fruit" ] ]
        ,
          [ Para [ Str "bank" ] ]
        ]
      )
    ]
  , Para
    [ Str "Blank"
    , Space
    , Str "line"
    , Space
    , Str "after"
    , Space
    , Str "term,"
    , Space
    , Str "indented"
    , Space
    , Str "marker,"
    , Space
    , Str "alternate"
    , Space
    , Str "markers:"
    ]
  , DefinitionList
    [
      (
        [ Str "apple" ]
      ,
        [
          [ Para [ Str "red", Space, Str "fruit" ] ]
        ,
          [ Para [ Str "computer" ] ]
        ]
      )
    ,
      (
        [ Str "orange" ]
      ,
        [
          [ Para
            [ Str "orange", Space, Str "fruit" ]
          , OrderedList
            ( 1, Decimal, Period )
            [ [ Plain [ Str "sublist" ] ], [ Plain [ Str "sublist" ] ] ]
          ]
        ]
      )
    ]
  , Header 1
    ( "html-blocks", [], [] )
    [ Str "HTML", Space, Str "Blocks" ]
  , Para
    [ Str "Simple"
    , Space
    , Str "block"
    , Space
    , Str "on"
    , Space
    , Str "one"
    , Space
    , Str "line:"
    ]
  , Div
    ( "", [], [] )
    [ Plain [ Str "foo" ] ]
  , Para
    [ Str "And"
    , Space
    , Str "nested"
    , Space
    , Str "without"
    , Space
    , Str "indentation:"
    ]
  , Div
    ( "", [], [] )
    [ Div
      ( "", [], [] )
      [ Div ( "", [], [] ) [ Para [ Str "foo" ] ] ]
    , Div
      ( "", [], [] )
      [ Plain [ Str "bar" ] ]
    ]
  , Para
    [ Str "Interpreted"
    , Space
    , Str "markdown"
    , Space
    , Str "in"
    , Space
    , Str "a"
    , Space
    , Str "table:"
    ]
  , RawBlock
    ( Format "html" ) "<table>"
  , RawBlock
    ( Format "html" ) "<tr>"
  , RawBlock
    ( Format "html" ) "<td>"
  , Plain
    [ Str "This", Space, Str "is", Space, Emph [ Str "emphasized" ] ]
  , RawBlock
    ( Format "html" ) "</td>"
  , RawBlock
    ( Format "html" ) "<td>"
  , Plain
    [ Str "And"
    , Space
    , Str "this"
    , Space
    , Str "is"
    , Space
    , Strong
      [ Str "strong" ]
    ]
  , RawBlock
    ( Format "html" ) "</td>"
  , RawBlock
    ( Format "html" ) "</tr>"
  , RawBlock
    ( Format "html" ) "</table>"
  , RawBlock
    ( Format "html" ) "<script type=\"text/javascript\">document.write('This *should not* be interpreted as markdown');</script>"
  , Para
    [ Str "Here\8217s"
    , Space
    , Str "a"
    , Space
    , Str "simple"
    , Space
    , Str "block:"
    ]
  , Div
    ( "", [], [] )
    [ Para [ Str "foo" ] ]
  , Para
    [ Str "This"
    , Space
    , Str "should"
    , Space
    , Str "be"
    , Space
    , Str "a"
    , Space
    , Str "code"
    , Space
    , Str "block,"
    , Space
    , Str "though:"
    ]
  , CodeBlock
    ( "", [], [] ) "<div>\n    foo\n</div>"
  , Para
    [ Str "As", Space, Str "should", Space, Str "this:" ]
  , CodeBlock
    ( "", [], [] ) "<div>foo</div>"
  , Para
    [ Str "Now,", Space, Str "nested:" ]
  , Div
    ( "", [], [] )
    [ Div ( "", [], [] ) [ Div ( "", [], [] ) [ Plain [ Str "foo" ] ] ] ]
  , Para
    [ Str "This"
    , Space
    , Str "should"
    , Space
    , Str "just"
    , Space
    , Str "be"
    , Space
    , Str "an"
    , Space
    , Str "HTML"
    , Space
    , Str "comment:"
    ]
  , RawBlock
    ( Format "html" ) "<!-- Comment -->"
  , Para
    [ Str "Multiline:" ]
  , RawBlock
    ( Format "html" ) "<!--\nBlah\nBlah\n-->"
  , RawBlock
    ( Format "html" ) "<!--\n    This is another comment.\n-->"
  , Para
    [ Str "Code", Space, Str "block:" ]
  , CodeBlock
    ( "", [], [] ) "<!-- Comment -->"
  , Para
    [ Str "Just"
    , Space
    , Str "plain"
    , Space
    , Str "comment,"
    , Space
    , Str "with"
    , Space
    , Str "trailing"
    , Space
    , Str "spaces"
    , Space
    , Str "on"
    , Space
    , Str "the"
    , Space
    , Str "line:"
    ]
  , RawBlock
    ( Format "html" ) "<!-- foo -->"
  , Para
    [ Str "Code:" ]
  , CodeBlock
    ( "", [], [] ) "<hr />"
  , Para
    [ Str "Hr\8217s:" ]
  , RawBlock
    ( Format "html" ) "<hr>"
  , RawBlock
    ( Format "html" ) "<hr />"
  , RawBlock
    ( Format "html" ) "<hr />"
  , RawBlock
    ( Format "html" ) "<hr>"
  , RawBlock
    ( Format "html" ) "<hr />"
  , RawBlock
    ( Format "html" ) "<hr />"
  , RawBlock
    ( Format "html" ) "<hr class=\"foo\" id=\"bar\" />"
  , RawBlock
    ( Format "html" ) "<hr class=\"foo\" id=\"bar\" />"
  , RawBlock
    ( Format "html" ) "<hr class=\"foo\" id=\"bar\">"
  , HorizontalRule
  , Header 1
    ( "inline-markup", [], [] )
    [ Str "Inline", Space, Str "Markup" ]
  , Para
    [ Str "This"
    , Space
    , Str "is"
    , Space
    , Emph
      [ Str "emphasized" ]
    , Str ","
    , Space
    , Str "and"
    , Space
    , Str "so"
    , Space
    , Emph
      [ Str "is", Space, Str "this" ]
    , Str "."
    ]
  , Para
    [ Str "This"
    , Space
    , Str "is"
    , Space
    , Strong
      [ Str "strong" ]
    , Str ","
    , Space
    , Str "and"
    , Space
    , Str "so"
    , Space
    , Strong
      [ Str "is", Space, Str "this" ]
    , Str "."
    ]
  , Para
    [ Str "An"
    , Space
    , Emph
      [ Link
        ( "", [], [] )
        [ Str "emphasized", Space, Str "link" ]
        ( "/url", "" )
      ]
    , Str "."
    ]
  , Para
    [ Strong
      [ Emph
        [ Str "This"
        , Space
        , Str "is"
        , Space
        , Str "strong"
        , Space
        , Str "and"
        , Space
        , Str "em."
        ]
      ]
    ]
  , Para
    [ Str "So"
    , Space
    , Str "is"
    , Space
    , Strong
      [ Emph [ Str "this" ] ]
    , Space
    , Str "word."
    ]
  , Para
    [ Strong
      [ Emph
        [ Str "This"
        , Space
        , Str "is"
        , Space
        , Str "strong"
        , Space
        , Str "and"
        , Space
        , Str "em."
        ]
      ]
    ]
  , Para
    [ Str "So"
    , Space
    , Str "is"
    , Space
    , Strong
      [ Emph [ Str "this" ] ]
    , Space
    , Str "word."
    ]
  , Para
    [ Str "This"
    , Space
    , Str "is"
    , Space
    , Str "code:"
    , Space
    , Code
      ( "", [], [] ) ">"
    , Str ","
    , Space
    , Code
      ( "", [], [] ) "$"
    , Str ","
    , Space
    , Code
      ( "", [], [] ) "\\"
    , Str ","
    , Space
    , Code
      ( "", [], [] ) "\\$"
    , Str ","
    , Space
    , Code
      ( "", [], [] ) "<html>"
    , Str "."
    ]
  , Para
    [ Strikeout
      [ Str "This", Space, Str "is", Space, Emph [ Str "strikeout" ], Str "." ]
    ]
  , Para
    [ Str "Superscripts:"
    , Space
    , Str "a"
    , Superscript
      [ Str "bc" ]
    , Str "d"
    , Space
    , Str "a"
    , Superscript
      [ Emph [ Str "hello" ] ]
    , Space
    , Str "a"
    , Superscript
      [ Str "hello\160there" ]
    , Str "."
    ]
  , Para
    [ Str "Subscripts:"
    , Space
    , Str "H"
    , Subscript
      [ Str "2" ]
    , Str "O,"
    , Space
    , Str "H"
    , Subscript
      [ Str "23" ]
    , Str "O,"
    , Space
    , Str "H"
    , Subscript
      [ Str "many\160of\160them" ]
    , Str "O."
    ]
  , Para
    [ Str "These"
    , Space
    , Str "should"
    , Space
    , Str "not"
    , Space
    , Str "be"
    , Space
    , Str "superscripts"
    , Space
    , Str "or"
    , Space
    , Str "subscripts,"
    , SoftBreak
    , Str "because"
    , Space
    , Str "of"
    , Space
    , Str "the"
    , Space
    , Str "unescaped"
    , Space
    , Str "spaces:"
    , Space
    , Str "a^b"
    , Space
    , Str "c^d,"
    , Space
    , Str "a~b"
    , Space
    , Str "c~d."
    ]
  , HorizontalRule
  , Header 1
    ( "smart-quotes-ellipses-dashes", [], [] )
    [ Str "Smart"
    , Space
    , Str "quotes,"
    , Space
    , Str "ellipses,"
    , Space
    , Str "dashes"
    ]
  , Para
    [ Quoted DoubleQuote
      [ Str "Hello," ]
    , Space
    , Str "said"
    , Space
    , Str "the"
    , Space
    , Str "spider."
    , Space
    , Quoted DoubleQuote
      [ Quoted SingleQuote
        [ Str "Shelob" ]
      , Space
      , Str "is"
      , Space
      , Str "my"
      , Space
      , Str "name."
      ]
    ]
  , Para
    [ Quoted SingleQuote
      [ Str "A" ]
    , Str ","
    , Space
    , Quoted SingleQuote
      [ Str "B" ]
    , Str ","
    , Space
    , Str "and"
    , Space
    , Quoted SingleQuote
      [ Str "C" ]
    , Space
    , Str "are"
    , Space
    , Str "letters."
    ]
  , Para
    [ Quoted SingleQuote
      [ Str "Oak," ]
    , Space
    , Quoted SingleQuote
      [ Str "elm," ]
    , Space
    , Str "and"
    , Space
    , Quoted SingleQuote
      [ Str "beech" ]
    , Space
    , Str "are"
    , Space
    , Str "names"
    , Space
    , Str "of"
    , Space
    , Str "trees."
    , SoftBreak
    , Str "So"
    , Space
    , Str "is"
    , Space
    , Quoted SingleQuote
      [ Str "pine." ]
    ]
  , Para
    [ Quoted SingleQuote
      [ Str "He"
      , Space
      , Str "said,"
      , Space
      , Quoted DoubleQuote
        [ Str "I", Space, Str "want", Space, Str "to", Space, Str "go." ]
      ]
    , Space
    , Str "Were"
    , Space
    , Str "you"
    , Space
    , Str "alive"
    , Space
    , Str "in"
    , Space
    , Str "the"
    , SoftBreak
    , Str "70\8217s?"
    ]
  , Para
    [ Str "Here"
    , Space
    , Str "is"
    , Space
    , Str "some"
    , Space
    , Str "quoted"
    , Space
    , Quoted SingleQuote
      [ Code ( "", [], [] ) "code" ]
    , Space
    , Str "and"
    , Space
    , Str "a"
    , Space
    , Quoted DoubleQuote
      [ Link
        ( "", [], [] )
        [ Str "quoted", Space, Str "link" ]
        ( "http://example.com/?foo=1&bar=2", "" )
      ]
    , Str "."
    ]
  , Para
    [ Str "Some"
    , Space
    , Str "dashes:"
    , Space
    , Str "one\8212two"
    , Space
    , Str "\8212"
    , Space
    , Str "three\8212four"
    , Space
    , Str "\8212"
    , Space
    , Str "five."
    ]
  , Para
    [ Str "Dashes"
    , Space
    , Str "between"
    , Space
    , Str "numbers:"
    , Space
    , Str "5\8211\&7,"
    , Space
    , Str "255\8211\&66,"
    , Space
    , Str "1987\8211\&1999."
    ]
  , Para
    [ Str "Ellipses\8230and\8230and\8230." ]
  , HorizontalRule
  , Header 1
    ( "latex", [], [] )
    [ Str "LaTeX" ]
  , BulletList
    [
      [ Plain [ RawInline ( Format "tex" ) "\\cite[22-23]{smith.1899}" ] ]
    ,
      [ Plain [ Math InlineMath "2+2=4" ] ]
    ,
      [ Plain [ Math InlineMath "x \\in y" ] ]
    ,
      [ Plain [ Math InlineMath "\\alpha \\wedge \\omega" ] ]
    ,
      [ Plain [ Math InlineMath "223" ] ]
    ,
      [ Plain [ Math InlineMath "p", Str "-Tree" ] ]
    ,
      [ Plain
        [ Str "Here\8217s"
        , Space
        , Str "some"
        , Space
        , Str "display"
        , Space
        , Str "math:"
        , SoftBreak
        , Math DisplayMath "\\frac{d}{dx}f(x)=\\lim_{h\\to 0}\\frac{f(x+h)-f(x)}{h}"
        ]
      ]
    ,
      [ Plain
        [ Str "Here\8217s"
        , Space
        , Str "one"
        , Space
        , Str "that"
        , Space
        , Str "has"
        , Space
        , Str "a"
        , Space
        , Str "line"
        , Space
        , Str "break"
        , Space
        , Str "in"
        , Space
        , Str "it:"
        , Space
        , Math InlineMath "\\alpha + \\omega \\times x^2"
        , Str "."
        ]
      ]
    ]
  , Para
    [ Str "These"
    , Space
    , Str "shouldn\8217t"
    , Space
    , Str "be"
    , Space
    , Str "math:"
    ]
  , BulletList
    [
      [ Plain
        [ Str "To"
        , Space
        , Str "get"
        , Space
        , Str "the"
        , Space
        , Str "famous"
        , Space
        , Str "equation,"
        , Space
        , Str "write"
        , Space
        , Code
          ( "", [], [] ) "$e = mc^2$"
        , Str "."
        ]
      ]
    ,
      [ Plain
        [ Str "$22,000"
        , Space
        , Str "is"
        , Space
        , Str "a"
        , Space
        , Emph
          [ Str "lot" ]
        , Space
        , Str "of"
        , Space
        , Str "money."
        , Space
        , Str "So"
        , Space
        , Str "is"
        , Space
        , Str "$34,000."
        , SoftBreak
        , Str "(It"
        , Space
        , Str "worked"
        , Space
        , Str "if"
        , Space
        , Quoted DoubleQuote
          [ Str "lot" ]
        , Space
        , Str "is"
        , Space
        , Str "emphasized.)"
        ]
      ]
    ,
      [ Plain
        [ Str "Shoes"
        , Space
        , Str "($20)"
        , Space
        , Str "and"
        , Space
        , Str "socks"
        , Space
        , Str "($5)."
        ]
      ]
    ,
      [ Plain
        [ Str "Escaped"
        , Space
        , Code
          ( "", [], [] ) "$"
        , Str ":"
        , Space
        , Str "$73"
        , Space
        , Emph
          [ Str "this"
          , Space
          , Str "should"
          , Space
          , Str "be"
          , Space
          , Str "emphasized"
          ]
        , Space
        , Str "23$."
        ]
      ]
    ]
  , Para
    [ Str "Here\8217s"
    , Space
    , Str "a"
    , Space
    , Str "LaTeX"
    , Space
    , Str "table:"
    ]
  , RawBlock
    ( Format "tex" ) "\\begin{tabular}{|l|l|}\\hline\nAnimal & Number \\\\ \\hline\nDog    & 2      \\\\\nCat    & 1      \\\\ \\hline\n\\end{tabular}"
  , HorizontalRule
  , Header 1
    ( "special-characters", [], [] )
    [ Str "Special", Space, Str "Characters" ]
  , Para
    [ Str "Here", Space, Str "is", Space, Str "some", Space, Str "unicode:" ]
  , BulletList
    [
      [ Plain [ Str "I", Space, Str "hat:", Space, Str "\206" ] ]
    ,
      [ Plain [ Str "o", Space, Str "umlaut:", Space, Str "\246" ] ]
    ,
      [ Plain [ Str "section:", Space, Str "\167" ] ]
    ,
      [ Plain [ Str "set", Space, Str "membership:", Space, Str "\8712" ] ]
    ,
      [ Plain [ Str "copyright:", Space, Str "\169" ] ]
    ]
  , Para
    [ Str "AT&T"
    , Space
    , Str "has"
    , Space
    , Str "an"
    , Space
    , Str "ampersand"
    , Space
    , Str "in"
    , Space
    , Str "their"
    , Space
    , Str "name."
    ]
  , Para
    [ Str "AT&T"
    , Space
    , Str "is"
    , Space
    , Str "another"
    , Space
    , Str "way"
    , Space
    , Str "to"
    , Space
    , Str "write"
    , Space
    , Str "it."
    ]
  , Para
    [ Str "This", Space, Str "&", Space, Str "that." ]
  , Para
    [ Str "4", Space, Str "<", Space, Str "5." ]
  , Para
    [ Str "6", Space, Str ">", Space, Str "5." ]
  , Para
    [ Str "Backslash:", Space, Str "\\" ]
  , Para
    [ Str "Backtick:", Space, Str "`" ]
  , Para
    [ Str "Asterisk:", Space, Str "*" ]
  , Para
    [ Str "Underscore:", Space, Str "_" ]
  , Para
    [ Str "Left", Space, Str "brace:", Space, Str "{" ]
  , Para
    [ Str "Right", Space, Str "brace:", Space, Str "}" ]
  , Para
    [ Str "Left", Space, Str "bracket:", Space, Str "[" ]
  , Para
    [ Str "Right", Space, Str "bracket:", Space, Str "]" ]
  , Para
    [ Str "Left", Space, Str "paren:", Space, Str "(" ]
  , Para
    [ Str "Right", Space, Str "paren:", Space, Str ")" ]
  , Para
    [ Str "Greater-than:", Space, Str ">" ]
  , Para
    [ Str "Hash:", Space, Str "#" ]
  , Para
    [ Str "Period:", Space, Str "." ]
  , Para
    [ Str "Bang:", Space, Str "!" ]
  , Para
    [ Str "Plus:", Space, Str "+" ]
  , Para
    [ Str "Minus:", Space, Str "-" ]
  , HorizontalRule
  , Header 1
    ( "links", [], [] )
    [ Str "Links" ]
  , Header 2
    ( "explicit", [], [] )
    [ Str "Explicit" ]
  , Para
    [ Str "Just"
    , Space
    , Str "a"
    , Space
    , Link
      ( "", [], [] )
      [ Str "URL" ]
      ( "/url/", "" )
    , Str "."
    ]
  , Para
    [ Link
      ( "", [], [] )
      [ Str "URL", Space, Str "and", Space, Str "title" ]
      ( "/url/", "title" )
    , Str "."
    ]
  , Para
    [ Link
      ( "", [], [] )
      [ Str "URL", Space, Str "and", Space, Str "title" ]
      ( "/url/", "title preceded by two spaces" )
    , Str "."
    ]
  , Para
    [ Link
      ( "", [], [] )
      [ Str "URL", Space, Str "and", Space, Str "title" ]
      ( "/url/", "title preceded by a tab" )
    , Str "."
    ]
  , Para
    [ Link
      ( "", [], [] )
      [ Str "URL", Space, Str "and", Space, Str "title" ]
      ( "/url/", "title with \"quotes\" in it" )
    ]
  , Para
    [ Link
      ( "", [], [] )
      [ Str "URL", Space, Str "and", Space, Str "title" ]
      ( "/url/", "title with single quotes" )
    ]
  , Para
    [ Link
      ( "", [], [] )
      [ Str "with_underscore" ]
      ( "/url/with_underscore", "" )
    ]
  , Para
    [ Link
      ( "", [], [] )
      [ Str "Email", Space, Str "link" ]
      ( "mailto:nobody@nowhere.net", "" )
    ]
  , Para
    [ Link ( "", [], [] ) [ Str "Empty" ] ( "", "" ), Str "." ]
  , Header 2
    ( "reference", [], [] )
    [ Str "Reference" ]
  , Para
    [ Str "Foo"
    , Space
    , Link
      ( "", [], [] )
      [ Str "bar" ]
      ( "/url/", "" )
    , Str "."
    ]
  , Para
    [ Str "With"
    , Space
    , Link
      ( "", [], [] )
      [ Str "embedded", Space, Str "[brackets]" ]
      ( "/url/", "" )
    , Str "."
    ]
  , Para
    [ Link
      ( "", [], [] )
      [ Str "b" ]
      ( "/url/", "" )
    , Space
    , Str "by"
    , Space
    , Str "itself"
    , Space
    , Str "should"
    , Space
    , Str "be"
    , Space
    , Str "a"
    , Space
    , Str "link."
    ]
  , Para
    [ Str "Indented"
    , Space
    , Link
      ( "", [], [] )
      [ Str "once" ]
      ( "/url", "" )
    , Str "."
    ]
  , Para
    [ Str "Indented"
    , Space
    , Link
      ( "", [], [] )
      [ Str "twice" ]
      ( "/url", "" )
    , Str "."
    ]
  , Para
    [ Str "Indented"
    , Space
    , Link
      ( "", [], [] )
      [ Str "thrice" ]
      ( "/url", "" )
    , Str "."
    ]
  , Para
    [ Str "This"
    , Space
    , Str "should"
    , Space
    , Str "[not][]"
    , Space
    , Str "be"
    , Space
    , Str "a"
    , Space
    , Str "link."
    ]
  , CodeBlock
    ( "", [], [] ) "[not]: /url"
  , Para
    [ Str "Foo"
    , Space
    , Link
      ( "", [], [] )
      [ Str "bar" ]
      ( "/url/", "Title with \"quotes\" inside" )
    , Str "."
    ]
  , Para
    [ Str "Foo"
    , Space
    , Link
      ( "", [], [] )
      [ Str "biz" ]
      ( "/url/", "Title with \"quote\" inside" )
    , Str "."
    ]
  , Header 2
    ( "with-ampersands", [], [] )
    [ Str "With", Space, Str "ampersands" ]
  , Para
    [ Str "Here\8217s"
    , Space
    , Str "a"
    , Space
    , Link
      ( "", [], [] )
      [ Str "link"
      , Space
      , Str "with"
      , Space
      , Str "an"
      , Space
      , Str "ampersand"
      , Space
      , Str "in"
      , Space
      , Str "the"
      , Space
      , Str "URL"
      ]
      ( "http://example.com/?foo=1&bar=2", "" )
    , Str "."
    ]
  , Para
    [ Str "Here\8217s"
    , Space
    , Str "a"
    , Space
    , Str "link"
    , Space
    , Str "with"
    , Space
    , Str "an"
    , Space
    , Str "amersand"
    , Space
    , Str "in"
    , Space
    , Str "the"
    , Space
    , Str "link"
    , Space
    , Str "text:"
    , Space
    , Link
      ( "", [], [] )
      [ Str "AT&T" ]
      ( "http://att.com/", "AT&T" )
    , Str "."
    ]
  , Para
    [ Str "Here\8217s"
    , Space
    , Str "an"
    , Space
    , Link
      ( "", [], [] )
      [ Str "inline", Space, Str "link" ]
      ( "/script?foo=1&bar=2", "" )
    , Str "."
    ]
  , Para
    [ Str "Here\8217s"
    , Space
    , Str "an"
    , Space
    , Link
      ( "", [], [] )
      [ Str "inline"
      , Space
      , Str "link"
      , Space
      , Str "in"
      , Space
      , Str "pointy"
      , Space
      , Str "braces"
      ]
      ( "/script?foo=1&bar=2", "" )
    , Str "."
    ]
  , Header 2
    ( "autolinks", [], [] )
    [ Str "Autolinks" ]
  , Para
    [ Str "With"
    , Space
    , Str "an"
    , Space
    , Str "ampersand:"
    , Space
    , Link
      ( "", [ "uri" ], [] )
      [ Str "http://example.com/?foo=1&bar=2" ]
      ( "http://example.com/?foo=1&bar=2", "" )
    ]
  , BulletList
    [
      [ Plain [ Str "In", Space, Str "a", Space, Str "list?" ] ]
    ,
      [ Plain
        [ Link
          ( "", [ "uri" ], [] )
          [ Str "http://example.com/" ]
          ( "http://example.com/", "" )
        ]
      ]
    ,
      [ Plain [ Str "It", Space, Str "should." ] ]
    ]
  , Para
    [ Str "An"
    , Space
    , Str "e-mail"
    , Space
    , Str "address:"
    , Space
    , Link
      ( "", [ "email" ], [] )
      [ Str "nobody@nowhere.net" ]
      ( "mailto:nobody@nowhere.net", "" )
    ]
  , BlockQuote
    [ Para
      [ Str "Blockquoted:"
      , Space
      , Link
        ( "", [ "uri" ], [] )
        [ Str "http://example.com/" ]
        ( "http://example.com/", "" )
      ]
    ]
  , Para
    [ Str "Auto-links"
    , Space
    , Str "should"
    , Space
    , Str "not"
    , Space
    , Str "occur"
    , Space
    , Str "here:"
    , Space
    , Code
      ( "", [], [] ) "<http://example.com/>"
    ]
  , CodeBlock
    ( "", [], [] ) "or here: <http://example.com/>"
  , HorizontalRule
  , Header 1
    ( "images", [], [] )
    [ Str "Images" ]
  , Para
    [ Str "From"
    , Space
    , Quoted DoubleQuote
      [ Str "Voyage", Space, Str "dans", Space, Str "la", Space, Str "Lune" ]
    , Space
    , Str "by"
    , Space
    , Str "Georges"
    , Space
    , Str "Melies"
    , Space
    , Str "(1902):"
    ]
  , Para
    [ Image
      ( "", [], [] )
      [ Str "lalune" ]
      ( "lalune.jpg", "fig:Voyage dans la Lune" )
    ]
  , Para
    [ Str "Here"
    , Space
    , Str "is"
    , Space
    , Str "a"
    , Space
    , Str "movie"
    , Space
    , Image
      ( "", [], [] )
      [ Str "movie" ]
      ( "movie.jpg", "" )
    , Space
    , Str "icon."
    ]
  , HorizontalRule
  , Header 1
    ( "footnotes", [], [] )
    [ Str "Footnotes" ]
  , Para
    [ Str "Here"
    , Space
    , Str "is"
    , Space
    , Str "a"
    , Space
    , Str "footnote"
    , Space
    , Str "reference,"
    , Note
      [ Para
        [ Str "Here"
        , Space
        , Str "is"
        , Space
        , Str "the"
        , Space
        , Str "footnote."
        , Space
        , Str "It"
        , Space
        , Str "can"
        , Space
        , Str "go"
        , Space
        , Str "anywhere"
        , Space
        , Str "after"
        , Space
        , Str "the"
        , Space
        , Str "footnote"
        , SoftBreak
        , Str "reference."
        , Space
        , Str "It"
        , Space
        , Str "need"
        , Space
        , Str "not"
        , Space
        , Str "be"
        , Space
        , Str "placed"
        , Space
        , Str "at"
        , Space
        , Str "the"
        , Space
        , Str "end"
        , Space
        , Str "of"
        , Space
        , Str "the"
        , Space
        , Str "document."
        ]
      ]
    , Space
    , Str "and"
    , Space
    , Str "another."
    , Note
      [ Para
        [ Str "Here\8217s"
        , Space
        , Str "the"
        , Space
        , Str "long"
        , Space
        , Str "note."
        , Space
        , Str "This"
        , Space
        , Str "one"
        , Space
        , Str "contains"
        , Space
        , Str "multiple"
        , SoftBreak
        , Str "blocks."
        ]
      , Para
        [ Str "Subsequent"
        , Space
        , Str "blocks"
        , Space
        , Str "are"
        , Space
        , Str "indented"
        , Space
        , Str "to"
        , Space
        , Str "show"
        , Space
        , Str "that"
        , Space
        , Str "they"
        , Space
        , Str "belong"
        , Space
        , Str "to"
        , Space
        , Str "the"
        , SoftBreak
        , Str "footnote"
        , Space
        , Str "(as"
        , Space
        , Str "with"
        , Space
        , Str "list"
        , Space
        , Str "items)."
        ]
      , CodeBlock
        ( "", [], [] ) "  { <code> }"
      , Para
        [ Str "If"
        , Space
        , Str "you"
        , Space
        , Str "want,"
        , Space
        , Str "you"
        , Space
        , Str "can"
        , Space
        , Str "indent"
        , Space
        , Str "every"
        , Space
        , Str "line,"
        , Space
        , Str "but"
        , Space
        , Str "you"
        , Space
        , Str "can"
        , Space
        , Str "also"
        , Space
        , Str "be"
        , SoftBreak
        , Str "lazy"
        , Space
        , Str "and"
        , Space
        , Str "just"
        , Space
        , Str "indent"
        , Space
        , Str "the"
        , Space
        , Str "first"
        , Space
        , Str "line"
        , Space
        , Str "of"
        , Space
        , Str "each"
        , Space
        , Str "block."
        ]
      ]
    , SoftBreak
    , Str "This"
    , Space
    , Str "should"
    , Space
    , Emph
      [ Str "not" ]
    , Space
    , Str "be"
    , Space
    , Str "a"
    , Space
    , Str "footnote"
    , Space
    , Str "reference,"
    , Space
    , Str "because"
    , Space
    , Str "it"
    , SoftBreak
    , Str "contains"
    , Space
    , Str "a"
    , Space
    , Str "space.[^my"
    , Space
    , Str "note]"
    , Space
    , Str "Here"
    , Space
    , Str "is"
    , Space
    , Str "an"
    , Space
    , Str "inline"
    , Space
    , Str "note."
    , Note
      [ Para
        [ Str "This"
        , SoftBreak
        , Str "is"
        , Space
        , Emph
          [ Str "easier" ]
        , Space
        , Str "to"
        , Space
        , Str "type."
        , Space
        , Str "Inline"
        , Space
        , Str "notes"
        , Space
        , Str "may"
        , Space
        , Str "contain"
        , SoftBreak
        , Link
          ( "", [], [] )
          [ Str "links" ]
          ( "http://google.com", "" )
        , Space
        , Str "and"
        , Space
        , Code
          ( "", [], [] ) "]"
        , Space
        , Str "verbatim"
        , Space
        , Str "characters,"
        , SoftBreak
        , Str "as"
        , Space
        , Str "well"
        , Space
        , Str "as"
        , Space
        , Str "[bracketed"
        , Space
        , Str "text]."
        ]
      ]
    ]
  , BlockQuote
    [ Para
      [ Str "Notes"
      , Space
      , Str "can"
      , Space
      , Str "go"
      , Space
      , Str "in"
      , Space
      , Str "quotes."
      , Note
        [ Para [ Str "In", Space, Str "quote." ] ]
      ]
    ]
  , OrderedList
    ( 1, Decimal, Period )
    [
      [ Plain
        [ Str "And"
        , Space
        , Str "in"
        , Space
        , Str "list"
        , Space
        , Str "items."
        , Note
          [ Para [ Str "In", Space, Str "list." ] ]
        ]
      ]
    ]
  , Para
    [ Str "This"
    , Space
    , Str "paragraph"
    , Space
    , Str "should"
    , Space
    , Str "not"
    , Space
    , Str "be"
    , Space
    , Str "part"
    , Space
    , Str "of"
    , Space
    , Str "the"
    , Space
    , Str "note,"
    , Space
    , Str "as"
    , Space
    , Str "it"
    , Space
    , Str "is"
    , Space
    , Str "not"
    , Space
    , Str "indented."
    ]
  ]