Pandoc (Meta {unMeta = fromList [("author",MetaInlines [Str "Cynthia",Space,Str "Johnson"]),("operator",MetaInlines [Str "John",Space,Str "MacFarlane"]),("title",MetaInlines [Str "Text",Space,Str "before",Space,Str "list"])]})
[OrderedList (1,Decimal,Period)
 [[Para [Str "One"]]
 ,[Para [Str "Two"]
  ,OrderedList (1,LowerAlpha,Period)
   [[Para [Str "Three"]]
   ,[Para [Str "Four"]
    ,OrderedList (1,LowerRoman,Period)
     [[Para [Str "Five"]]
     ,[Para [Str "Six"]
      ,OrderedList (1,UpperAlpha,Period)
       [[Para [Str "Seven"]]
       ,[Para [Str "Eight"]
        ,OrderedList (1,UpperRoman,Period)
         [[Para [Str "Nine"]]
         ,[Para [Str "Ten"]
          ,BulletList
           [[Para [Str "Eleven"]]
           ,[Para [Str "Twelve"]]]]]]]]]]]]]
,Para [Str "Out",Space,Str "of",Space,Str "list!"]
,Para [Str "Start",Space,Str "with"]
,OrderedList (7,Decimal,Period)
 [[Para [Str "Seven",Space,Str "Start"]]
 ,[Para [Str "Eight",Space,Str "Continue"]]]]