Pandoc
  Meta { unMeta = fromList [] }
  [ Div
      ( "" , [ "section" ] , [] )
      [ Header
          2 ( "" , [] , [] ) [ Str "Poem" , Space , Str "title" ]
      , Div
          ( "" , [ "epigraph" ] , [] )
          [ Para [ Str "Poem" , Space , Str "epigraph" ] ]
      , Header 2 ( "" , [ "unnumbered" ] , [] ) [ Str "Subtitle" ]
      , Header
          2
          ( "" , [] , [] )
          [ Str "First" , Space , Str "stanza" , Space , Str "title" ]
      , LineBlock
          [ [ Str "Verse" ]
          , [ Emph [ Str "More" ] , Space , Str "verse" ]
          ]
      , LineBlock
          [ [ Str "One" , Space , Str "more" , Space , Str "stanza" ]
          ]
      , Para [ Str "Author" ]
      , Para [ Str "April" , Space , Str "2018" ]
      ]
  ]