test/rtf/list_complex.native


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51

Pandoc
  Meta
    { unMeta =
        fromList
          [ ( "author" , MetaInlines [ Str "Cynthia Johnson" ] )
          , ( "operator" , MetaInlines [ Str "John MacFarlane" ] )
          , ( "title" , MetaInlines [ Str "Text before 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 of list!" ]
  , Para [ Str "Start with" ]
  , OrderedList
      ( 7 , Decimal , Period )
      [ [ Para [ Str "Seven Start" ] ]
      , [ Para [ Str "Eight Continue" ] ]
      ]
  ]