blob: 9fc4f0ba1feeae047c2b5a46925c8e1e963cda0e (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
|
DocUnorderedList
[DocAppend
(DocParagraph (DocString "Something about foo"))
(DocCodeBlock
(DocString
(concat ["foo :: a -> b -> c\n", "foo a b = bar c b\n"]))),
DocAppend
(DocParagraph (DocString "Something about bar"))
(DocCodeBlock
(DocString
(concat ["bar :: a -> b -> c\n", "bar a b = foo b a\n"]))),
DocParagraph (DocString "And then we continue")]
|