. level 1 .. level 2 ... level 3 .... level 4 ..... level 5 .. level 2 >>> Document { docMeta = Meta { docTitle = [] , docTitleAttributes = Nothing , docAuthors = [] , docRevision = Nothing , docAttributes = fromList [ ( "sectids" , "" ) ] } , docBlocks = [ Block mempty Nothing (List (OrderedList (Level 1) Nothing) [ ListItem Nothing [ Block mempty Nothing (Paragraph [ Inline mempty (Str "level 1") ]) , Block mempty Nothing (List (OrderedList (Level 2) Nothing) [ ListItem Nothing [ Block mempty Nothing (Paragraph [ Inline mempty (Str "level 2") ]) , Block mempty Nothing (List (OrderedList (Level 3) Nothing) [ ListItem Nothing [ Block mempty Nothing (Paragraph [ Inline mempty (Str "level 3") ]) , Block mempty Nothing (List (OrderedList (Level 4) Nothing) [ ListItem Nothing [ Block mempty Nothing (Paragraph [ Inline mempty (Str "level 4") ]) , Block mempty Nothing (List (OrderedList (Level 5) Nothing) [ ListItem Nothing [ Block mempty Nothing (Paragraph [ Inline mempty (Str "level 5") ]) ] ]) ] ]) ] ]) ] , ListItem Nothing [ Block mempty Nothing (Paragraph [ Inline mempty (Str "level 2") ]) ] ]) ] ]) ] }