[ OrderedList
    ( 1 , Decimal , Period )
    [ [ Para [ Str "Top" , Space , Str "one" ]
      , OrderedList
          ( 1 , LowerAlpha , Period )
          [[ Plain
             [ Str "Sub"
             , Space
             , Str "item"
             , Space
             , Str "1.a"
             ]
            ]
          , [ Plain
              [ Str "Sub"
              , Space
              , Str "item"
              , Space
              , Str "1.b"
              ]
            ]
          ]
      ]
    ]
, Para []
, Para
    [ Str "Some"
    , Space
    , Str "text"
    , Space
    , Str "in"
    , Space
    , Str "between."
    ]
, Para []
, OrderedList
    ( 2 , Decimal , Period )
    [ [ Para [ Str "Top" , Space , Str "two" ]
      , OrderedList
          ( 1 , LowerAlpha , Period )
          [ [ Plain
              [ Str "Sub"
              , Space
              , Str "item"
              , Space
              , Str "2.a"
              ]
            ]
          , [ Plain
              [ Str "Sub"
              , Space
              , Str "item"
              , Space
              , Str "2.b"
              ]
            ]
          ]
      ]
    ]
, Para []
, Para
    [ Str "Some"
    , Space
    , Str "text"
    , Space
    , Str "in"
    , Space
    , Str "between."
    ]
, Para []
, OrderedList
    ( 3 , Decimal , Period )
    [ [ Para [ Str "Top" , Space , Str "three" ]
      , OrderedList
          ( 1 , LowerAlpha , Period )
          [ [ Plain
              [ Str "Sub"
              , Space
              , Str "item"
              , Space
              , Str "3.a"
              ]
            ]
          , [ Plain
              [ Str "Sub"
              , Space
              , Str "item"
              , Space
              , Str "3.b"
              ]
            ]
          ]
      ]
    ]
]