Pandoc
  ( Meta
    { unMeta = fromList
      [
        ( "abstract"
        , MetaBlocks
          [ Para
            [ Str "Book", Space, Str "annotation" ]
          , Para
            [ Str "Second"
            , Space
            , Str "paragraph"
            , Space
            , Str "of"
            , Space
            , Str "book"
            , Space
            , Str "annotation"
            ]
          ]
        )
      ,
        ( "author"
        , MetaList
          [ MetaInlines
            [ Str "First", Space, Str "Middle", Space, Str "Last" ]
          , MetaInlines
            [ Str "Another", Space, Str "Author" ]
          ]
        )
      ,
        ( "date", MetaInlines [ Str "2018" ] )
      ,
        ( "keywords"
        , MetaList
          [ MetaString "foo", MetaString "bar", MetaString "baz" ]
        )
      ,
        ( "title", MetaInlines [ Str "Book", Space, Str "title" ] )
      ]
    }
  )
  [ Header 1 ( "", [], [] ) [ Str "Body", Space, Str "title" ] ]