Pandoc
  Meta { unMeta = fromList [] }
  [ OrderedList
      ( 1 , Decimal , OneParen )
      [ [ Para [ Str "This is at the first level" ]
        , OrderedList
            ( 1 , LowerAlpha , DefaultDelim )
            [ [ Para [ Str "This is at the second level" ]
              , OrderedList
                  ( 1 , LowerRoman , DefaultDelim )
                  [ [ Para
                        [ Str "This is "
                        , Emph
                            [ Str "at "
                            , Strong [ Str "the third level" ]
                            , Str ", and I want to"
                            ]
                        , Str " test normalization here."
                        ]
                    ]
                  ]
              ]
            ]
        ]
      ]
  ]