packages feed

pandoc-3.10: test/djot-reader.native

Pandoc
  Meta { unMeta = fromList [] }
  [ Div
      ( "Pandoc-Test-Suite" , [ "section" ] , [] )
      [ Header
          1
          ( "" , [] , [] )
          [ Str "Pandoc" , Space , Str "Test" , Space , Str "Suite" ]
      , Para
          [ Str "John"
          , Space
          , Str "MacFarlane"
          , SoftBreak
          , Str "Anonymous"
          ]
      , Para
          [ Str "July" , Space , Str "17," , Space , Str "2006" ]
      , 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"
          , Space
          , Str "John"
          , Space
          , Str "Gruber\8217s"
          , SoftBreak
          , Str "markdown"
          , Space
          , Str "test"
          , Space
          , Str "suite."
          ]
      , HorizontalRule
      ]
  , Div
      ( "headers" , [ "section" ] , [] )
      [ Header 1 ( "" , [] , [] ) [ Str "Headers" ]
      , Div
          ( "level-2-with-an-embedded-link" , [ "section" ] , [] )
          [ Header
              2
              ( "" , [] , [] )
              [ Str "Level"
              , Space
              , Str "2"
              , Space
              , Str "with"
              , Space
              , Str "an"
              , Space
              , Link
                  ( "" , [] , [] )
                  [ Str "embedded" , Space , Str "link" ]
                  ( "/url" , "" )
              ]
          , Div
              ( "level-3-with-emphasis" , [ "section" ] , [] )
              [ Header
                  3
                  ( "" , [] , [] )
                  [ Str "Level"
                  , Space
                  , Str "3"
                  , Space
                  , Str "with"
                  , Space
                  , Emph [ Str "emphasis" ]
                  ]
              , Div
                  ( "level-4" , [ "section" ] , [] )
                  [ Header
                      4
                      ( "" , [] , [] )
                      [ Str "Level" , Space , Str "4" ]
                  , Div
                      ( "level-5" , [ "section" ] , [] )
                      [ Header
                          5
                          ( "" , [] , [] )
                          [ Str "Level" , Space , Str "5" ]
                      ]
                  ]
              ]
          ]
      ]
  , Div
      ( "level-1" , [ "section" ] , [] )
      [ Header
          1 ( "" , [] , [] ) [ Str "Level" , Space , Str "1" ]
      , Div
          ( "level-2-with-emphasis" , [ "section" ] , [] )
          [ Header
              2
              ( "" , [] , [] )
              [ Str "Level"
              , Space
              , Str "2"
              , Space
              , Str "with"
              , Space
              , Emph [ Str "emphasis" ]
              ]
          , Div
              ( "level-3" , [ "section" ] , [] )
              [ Header
                  3 ( "" , [] , [] ) [ Str "Level" , Space , Str "3" ]
              , Para
                  [ Str "with"
                  , Space
                  , Str "no"
                  , Space
                  , Str "blank"
                  , Space
                  , Str "line"
                  ]
              ]
          ]
      , Div
          ( "level-2" , [ "section" ] , [] )
          [ Header
              2 ( "" , [] , [] ) [ Str "Level" , Space , Str "2" ]
          , Para
              [ Str "with"
              , Space
              , Str "no"
              , Space
              , Str "blank"
              , Space
              , Str "line"
              ]
          , HorizontalRule
          ]
      ]
  , Div
      ( "paragraphs" , [ "section" ] , [] )
      [ Header 1 ( "" , [] , [] ) [ 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"
          , Space
          , 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"
          , Space
          , Str "middle"
          , Space
          , Str "of"
          , Space
          , Str "a"
          , Space
          , Str "paragraph"
          , Space
          , Str "looked"
          , Space
          , Str "like"
          , Space
          , Str "a"
          , Space
          , Str "list"
          , SoftBreak
          , Str "item."
          ]
      , Para
          [ Str "Here\8217s"
          , Space
          , Str "one"
          , Space
          , Str "with"
          , Space
          , Str "a"
          , Space
          , Str "bullet."
          , Space
          , 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
      ]
  , Div
      ( "block-quotes" , [ "section" ] , [] )
      [ Header
          1 ( "" , [] , [] ) [ 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."
              , Space
              , 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}\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"
          , Space
          , Str ">"
          , Space
          , Str "1."
          ]
      , Para
          [ Str "And"
          , Space
          , Str "a"
          , Space
          , Str "following"
          , Space
          , Str "paragraph."
          ]
      , HorizontalRule
      ]
  , Div
      ( "code-blocks" , [ "section" ] , [] )
      [ Header
          1 ( "" , [] , [] ) [ 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\n"
      , Para [ Str "And:" ]
      , CodeBlock
          ( "" , [ "" ] , [] )
          "    this code block is indented by two tabs\n\nThese should not be escaped:  \\$ \\\\ \\> \\[ \\{\n"
      , HorizontalRule
      ]
  , Div
      ( "lists" , [ "section" ] , [] )
      [ Header 1 ( "" , [] , [] ) [ Str "Lists" ]
      , Div
          ( "unordered" , [ "section" ] , [] )
          [ Header 2 ( "" , [] , [] ) [ 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" ] ]
              ]
          ]
      , Div
          ( "ordered" , [ "section" ] , [] )
          [ Header 2 ( "" , [] , [] ) [ 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"
                    , Space
                    , Str "back."
                    ]
                ]
              , [ Para [ Str "Item" , Space , Str "2." ] ]
              , [ Para [ Str "Item" , Space , Str "3." ] ]
              ]
          ]
      , Div
          ( "nested" , [ "section" ] , [] )
          [ Header 2 ( "" , [] , [] ) [ 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" ] ]
              ]
          ]
      , Div
          ( "tabs-and-spaces" , [ "section" ] , [] )
          [ Header
              2
              ( "" , [] , [] )
              [ Str "Tabs" , Space , Str "and" , Space , Str "spaces" ]
          , BulletList
              [ [ Para
                    [ Str "this"
                    , Space
                    , Str "is"
                    , Space
                    , Str "a"
                    , Space
                    , Str "list"
                    , Space
                    , Str "item"
                    , Space
                    , Str "indented"
                    , Space
                    , Str "with"
                    , Space
                    , Str "tabs"
                    ]
                ]
              , [ Para
                    [ Str "this"
                    , Space
                    , Str "is"
                    , Space
                    , Str "a"
                    , Space
                    , Str "list"
                    , Space
                    , Str "item"
                    , Space
                    , 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"
                          , Space
                          , 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"
                          , Space
                          , Str "indented"
                          , Space
                          , Str "with"
                          , Space
                          , Str "spaces"
                          ]
                      ]
                    ]
                ]
              ]
          ]
      , Div
          ( "fancy-list-markers" , [ "section" ] , [] )
          [ Header
              2
              ( "" , [] , [] )
              [ 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,"
                          , Space
                          , 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 , Decimal , Period )
              [ [ Plain [ Str "Autonumber." ] ]
              , [ Plain [ Str "More." ]
                , OrderedList
                    ( 1 , Decimal , Period )
                    [ [ 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" ]
          , OrderedList
              ( 2 , UpperAlpha , Period )
              [ [ Plain [ Str "Williams" ] ] ]
          , HorizontalRule
          ]
      ]
  , Div
      ( "definition-lists" , [ "section" ] , [] )
      [ Header
          1
          ( "" , [] , [] )
          [ 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,"
                    , Space
                    , Str "crisp,"
                    , Space
                    , Str "pleasant"
                    , Space
                    , Str "to"
                    , Space
                    , Str "taste"
                    ]
                ]
              ]
            )
          , ( [ Emph [ Str "orange" ] ]
            , [ [ Para [ Str "orange" , Space , Str "fruit" ]
                , CodeBlock
                    ( "" , [ "" ] , [] ) "{ orange code block }\n"
                , BlockQuote
                    [ Para
                        [ Str "orange"
                        , Space
                        , Str "block"
                        , Space
                        , Str "quote"
                        ]
                    ]
                ]
              ]
            )
          ]
      , Para
          [ Str "Multiple"
          , Space
          , Str "definitions,"
          , Space
          , Str "tight:"
          ]
      , 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 "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" ] ]
                    ]
                ]
              ]
            )
          ]
      ]
  , Div
      ( "html-blocks" , [ "section" ] , [] )
      [ Header
          1 ( "" , [] , [] ) [ Str "HTML" , Space , Str "Blocks" ]
      , Para
          [ Str "Simple"
          , Space
          , Str "block"
          , Space
          , Str "on"
          , Space
          , Str "one"
          , Space
          , Str "line:"
          ]
      , Div ( "" , [] , [] ) [ Para [ Str "foo" ] ]
      , Para
          [ Str "And"
          , Space
          , Str "nested"
          , Space
          , Str "without"
          , Space
          , Str "indentation:"
          ]
      , Div
          ( "" , [] , [] )
          [ Div
              ( "" , [] , [] )
              [ Div ( "" , [] , [] ) [ Para [ Str "foo" ] ] ]
          , Div ( "" , [] , [] ) [ Para [ Str "bar" ] ]
          ]
      , Para
          [ Str "Interpreted"
          , Space
          , Str "markdown"
          , Space
          , Str "in"
          , Space
          , Str "a"
          , Space
          , Str "table:"
          ]
      , Para
          [ Str "This"
          , Space
          , Str "is"
          , Space
          , Emph [ Str "emphasized" ]
          ]
      , Para
          [ Str "And"
          , Space
          , Str "this"
          , Space
          , Str "is"
          , Space
          , Strong [ Str "strong" ]
          ]
      , 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>\n"
      , Para
          [ Str "As" , Space , Str "should" , Space , Str "this:" ]
      , CodeBlock ( "" , [ "" ] , [] ) "<div>foo</div>\n"
      , Para [ Str "Now," , Space , Str "nested:" ]
      , Div
          ( "" , [] , [] )
          [ Div
              ( "" , [] , [] )
              [ Div ( "" , [] , [] ) [ Para [ Str "foo" ] ] ]
          ]
      , Para
          [ Str "This"
          , Space
          , Str "should"
          , Space
          , Str "just"
          , Space
          , Str "be"
          , Space
          , Str "an"
          , Space
          , Str "HTML"
          , Space
          , Str "comment:"
          ]
      , Para [ Str "Multiline:" ]
      , Para [ Str "Code" , Space , Str "block:" ]
      , CodeBlock ( "" , [ "" ] , [] ) "<!-- Comment -->\n"
      , 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:"
          ]
      , Para [ Str "Code:" ]
      , CodeBlock ( "" , [ "" ] , [] ) "<hr />\n"
      , Para [ Str "Hr\8217s:" ]
      , HorizontalRule
      ]
  , Div
      ( "inline-markup" , [ "section" ] , [] )
      [ Header
          1 ( "" , [] , [] ) [ 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 "$"
          , Code ( "" , [] , [] ) ", "
          , Str "<html>"
          , Code ( "" , [] , [] ) "."
          ]
      , Para
          [ Span
              ( "" , [ "deleted" ] , [] )
              [ 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,"
          , Space
          , Str "because"
          , Space
          , Str "of"
          , Space
          , Str "the"
          , Space
          , Str "unescaped"
          , Space
          , Str "spaces:"
          , SoftBreak
          , Str "a^b"
          , Space
          , Str "c^d,"
          , Space
          , Str "a~b"
          , Space
          , Str "c~d."
          ]
      , HorizontalRule
      ]
  , Div
      ( "smart-quotes-ellipses-dashes" , [ "section" ] , [] )
      [ Header
          1
          ( "" , [] , [] )
          [ 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."
          , Space
          , 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"
          , Space
          , 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" , SoftBreak , 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
      ]
  , Div
      ( "latex" , [ "section" ] , [] )
      [ Header 1 ( "" , [] , [] ) [ Str "LaTeX" ]
      , BulletList
          [ []
          , [ 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."
                , Space
                , Str "(It"
                , Space
                , Str "worked"
                , Space
                , Str "if"
                , Space
                , Quoted DoubleQuote [ Str "lot" ]
                , Space
                , Str "is"
                , SoftBreak
                , 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:"
          ]
      , HorizontalRule
      ]
  , Div
      ( "special-characters" , [ "section" ] , [] )
      [ Header
          1
          ( "" , [] , [] )
          [ 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
      ]
  , Div
      ( "links" , [ "section" ] , [] )
      [ Header 1 ( "" , [] , [] ) [ Str "Links" ]
      , Div
          ( "explicit" , [ "section" ] , [] )
          [ Header 2 ( "" , [] , [] ) [ Str "Explicit" ]
          , Para
              [ Str "Just"
              , Space
              , Str "a"
              , Space
              , Link ( "" , [] , [] ) [ Str "URL" ] ( "/url/" , "" )
              , Str "."
              ]
          , Para
              [ Link
                  ( "" , [] , [ ( "title" , "title" ) ] )
                  [ Str "URL"
                  , Space
                  , Str "and"
                  , Space
                  , Str "title"
                  ]
                  ( "/url/" , "" )
              , Str "."
              ]
          , Para
              [ Link
                  ( ""
                  , []
                  , [ ( "title" , "title preceded by two spaces" ) ]
                  )
                  [ Str "URL"
                  , Space
                  , Str "and"
                  , Space
                  , Str "title"
                  ]
                  ( "/url/" , "" )
              , Str "."
              ]
          , Para
              [ Link
                  ( ""
                  , []
                  , [ ( "title" , "title preceded by a tab" ) ]
                  )
                  [ Str "URL"
                  , Space
                  , Str "and"
                  , Space
                  , Str "title"
                  ]
                  ( "/url/" , "" )
              , Str "."
              ]
          , Para
              [ Link
                  ( ""
                  , []
                  , [ ( "title" , "title with \"quotes\" in it" ) ]
                  )
                  [ Str "URL"
                  , Space
                  , Str "and"
                  , Space
                  , Str "title"
                  ]
                  ( "/url/" , "" )
              ]
          , Para
              [ Link
                  ( ""
                  , []
                  , [ ( "title" , "title with single quotes" ) ]
                  )
                  [ Str "URL"
                  , Space
                  , Str "and"
                  , Space
                  , Str "title"
                  ]
                  ( "/url/" , "" )
              ]
          , Para
              [ Link
                  ( "" , [] , [] )
                  [ Str "with_underscore" ]
                  ( "/url/with_underscore" , "" )
              ]
          , Para
              [ Link
                  ( "" , [] , [] )
                  [ Str "Email" , Space , Str "link" ]
                  ( "mailto:nobody@nowhere.net" , "" )
              ]
          , Para
              [ Link ( "" , [] , [] ) [ Str "Empty" ] ( "" , "" )
              , Str "."
              ]
          ]
      , Div
          ( "reference" , [ "section" ] , [] )
          [ Header 2 ( "" , [] , [] ) [ 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\n"
          , Para
              [ Str "Foo"
              , Space
              , Link
                  ( ""
                  , []
                  , [ ( "title" , "Title with \"quotes\" inside" ) ]
                  )
                  [ Str "bar" ]
                  ( "/url/" , "" )
              , Str "."
              ]
          , Para
              [ Str "Foo"
              , Space
              , Link
                  ( ""
                  , []
                  , [ ( "title" , "Title with \"quote\" inside" ) ]
                  )
                  [ Str "biz" ]
                  ( "/url/" , "" )
              , Str "."
              ]
          ]
      , Div
          ( "with-ampersands" , [ "section" ] , [] )
          [ Header
              2
              ( "" , [] , [] )
              [ 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:"
              , SoftBreak
              , Link
                  ( "" , [] , [ ( "title" , "AT&T" ) ] )
                  [ Str "AT&T" ]
                  ( "http://att.com/" , "" )
              , 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 "."
              ]
          ]
      , Div
          ( "autolinks" , [ "section" ] , [] )
          [ Header 2 ( "" , [] , [] ) [ 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/>\n"
          , HorizontalRule
          ]
      ]
  , Div
      ( "images" , [ "section" ] , [] )
      [ Header 1 ( "" , [] , [] ) [ 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):"
          ]
      , Div
          ( "" , [] , [] )
          [ Para
              [ Image
                  ( "" , [] , [ ( "title" , "Voyage dans la Lune" ) ] )
                  [ Str "lalune" ]
                  ( "lalune.jpg" , "" )
              ]
          , Div ( "" , [ "caption" ] , [] ) [ Para [ Str "lalune" ] ]
          ]
      , Para
          [ Str "Here"
          , Space
          , Str "is"
          , Space
          , Str "a"
          , Space
          , Str "movie"
          , Space
          , Image
              ( "" , [] , [] ) [ Str "movie" ] ( "movie.jpg" , "" )
          , Space
          , Str "icon."
          ]
      , HorizontalRule
      ]
  , Div
      ( "footnotes" , [ "section" ] , [] )
      [ Header 1 ( "" , [] , [] ) [ 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"
                  , Space
                  , Str "reference."
                  , Space
                  , Str "It"
                  , SoftBreak
                  , 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"
                  , Space
                  , 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"
                  , Space
                  , Str "footnote"
                  , Space
                  , Str "(as"
                  , SoftBreak
                  , Str "with"
                  , Space
                  , Str "list"
                  , Space
                  , Str "items)."
                  ]
              , CodeBlock ( "" , [ "" ] , [] ) "{ <code> }\n"
              , 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"
                  , Space
                  , Str "lazy"
                  , Space
                  , Str "and"
                  , Space
                  , Str "just"
                  , SoftBreak
                  , Str "indent"
                  , Space
                  , Str "the"
                  , Space
                  , Str "first"
                  , Space
                  , Str "line"
                  , Space
                  , Str "of"
                  , Space
                  , Str "each"
                  , Space
                  , Str "block."
                  ]
              ]
          , Space
          , Str "This"
          , Space
          , Str "should"
          , Space
          , Emph [ Str "not" ]
          , Space
          , Str "be"
          , Space
          , Str "a"
          , SoftBreak
          , Str "footnote"
          , Space
          , Str "reference,"
          , Space
          , Str "because"
          , Space
          , Str "it"
          , Space
          , Str "contains"
          , Space
          , Str "a"
          , Space
          , Str "space.[^my"
          , Space
          , Str "note]"
          , Space
          , Str "Here"
          , Space
          , Str "is"
          , Space
          , Str "an"
          , Space
          , Str "inline"
          , SoftBreak
          , Str "note."
          , Note
              [ Para
                  [ Str "This"
                  , Space
                  , 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,"
                  , Space
                  , Str "as"
                  , Space
                  , Str "well"
                  , Space
                  , Str "as"
                  , SoftBreak
                  , 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."
          ]
      ]
  ]