packages feed

pandoc 3.1.11.1 → 3.1.12

raw patch · 146 files changed

+16990/−12647 lines, 146 filesdep +djotdep ~commonmarkdep ~commonmark-extensionsdep ~commonmark-pandocPVP ok

version bump matches the API change (PVP)

Dependencies added: djot

Dependency ranges changed: commonmark, commonmark-extensions, commonmark-pandoc, containers, filepath, typst, zlib

API changes (from Hackage documentation)

+ Text.Pandoc.Readers: readDjot :: (PandocMonad m, ToSources a) => ReaderOptions -> a -> m Pandoc
+ Text.Pandoc.Readers: readMan :: (PandocMonad m, ToSources a) => ReaderOptions -> a -> m Pandoc
+ Text.Pandoc.Readers.Djot: instance GHC.Classes.Eq Text.Pandoc.Readers.Djot.Env
+ Text.Pandoc.Readers.Djot: instance GHC.Classes.Ord Text.Pandoc.Readers.Djot.Env
+ Text.Pandoc.Readers.Djot: instance GHC.Show.Show Text.Pandoc.Readers.Djot.Env
+ Text.Pandoc.Readers.Djot: readDjot :: (PandocMonad m, ToSources a) => ReaderOptions -> a -> m Pandoc
+ Text.Pandoc.Writers: writeDjot :: PandocMonad m => WriterOptions -> Pandoc -> m Text
+ Text.Pandoc.Writers.Djot: writeDjot :: PandocMonad m => WriterOptions -> Pandoc -> m Text
+ Text.Pandoc.Writers.Typst: instance GHC.Classes.Eq Text.Pandoc.Writers.Typst.LabelType
+ Text.Pandoc.Writers.Typst: instance GHC.Show.Show Text.Pandoc.Writers.Typst.LabelType

Files

AUTHORS.md view
@@ -133,7 +133,9 @@ - Gabor Pali - Gabriel Lewertowski - Gavin Beatty+- George Stagg - Georgi Lyubenov+- Gokul Rajiv - Gottfried Haider - Greg Maslov - Greg Rundlett@@ -149,6 +151,7 @@ - Hikaru Ibayashi - Hos Es - Hubert Plociniczak+- Iacobus1983 - Ian Max Andolina - Igor Khorlo - Igor Pashev@@ -219,6 +222,7 @@ - Krystof Beuermann - Lars-Dominik Braun - Laurent P. René de Cotret+- Lawrence Chonavel - Leif Metcalf - Leonard Rosenthol - Lila@@ -251,6 +255,7 @@ - Matthias C. M. Troffaes - Mauro Bieg - Max Bolingbroke+- Max Heller - Max Rydahl Andersen - Merijn Verstraaten - Michael Beaumont@@ -322,6 +327,7 @@ - S.P.H - Salim B - Sam S. Almahri+- Sam May - Samuel Tardieu - Saumel Lemmenmeier - Sascha Wilde@@ -361,6 +367,7 @@ - Timothy Humphries - Tiziano Müller - Todd Sifleet+- Tomas Dahlqvist - TomBen - Tom Leese - Toni Dietze@@ -415,11 +422,13 @@ - infinity0x - jeongminkim-islab - kaizshang91+- lawcho - lifeunleaded - lux-lth - luz paz - lwolfsonkin - mbrackeantidot+- mh4ckt3mh4ckt1c4s - mjfs - mt_caret - nbehrnd
CONTRIBUTING.md view
@@ -12,16 +12,15 @@ There are many ways in which you can support pandoc. Here are a few ideas: -  * Participate in online discussions. The [pandoc-discuss] mailing-    list is a good place for this. This gives valuable input and-    makes it easier to improve the program.+  * Participate in online discussions. The [discussion+    forum] is a good place for this.    * Help with questions. Every request that is answered by the wider     community frees time for programming contributors. This will     speed up development of new features and issue fixes. Don't     underestimate your knowledge, please share it! -    Good places to help are the [pandoc-discuss] mailing list, Q/A+    Good places to help are the [discussion forum], Q/A     sites like StackOverflow, community forums (e.g.     [RStudio][RStudio Community], [Zettlr][Zettlr Forum]), and, for     technical questions, the GitHub [issue tracker].@@ -62,7 +61,7 @@ Have a question? ---------------- -Ask on [pandoc-discuss].+Ask on the [discussion forum].   Found a bug?@@ -119,7 +118,7 @@ So before submitting a bug report, consider whether it might be "out of scope." If it concerns a feature of documents that isn't representable in pandoc's Markdown, then it very likely is.-(If in doubt, you can always ask on [pandoc-discuss].)+(If in doubt, you can always ask on the [discussion-forum].)  Fixing bugs from the issue tracker ----------------------------------@@ -133,8 +132,8 @@   issue is generic and can be resolved without deep knowledge of the code   base. * [enhancement] — A feature which would be desirable. We recommend-  you discuss any proposed enhancement on pandoc-discuss before-  writing code.+  you discuss any proposed enhancement on the [discussion forum]+  before writing code. * [bug] — A problem which needs to be fixed. * [complexity:low] — The fix should only be a couple of lines. * [complexity:high] — The fix might require structural changes or in depth@@ -156,7 +155,8 @@ Have an idea for a new feature? ------------------------------- -First, search [pandoc-discuss] and the issue tracker (both [open issues] *and*+First, search the [discussion forum]+and the issue tracker (both [open issues] *and* [closed issues]) to make sure that the idea has not been discussed before.  Explain the rationale for the feature you're requesting.  Why would this@@ -168,15 +168,16 @@ contributions. It is helpful to be sympathetic to that fact, and to communicate future plans and availability clearly. -Any potential new feature is best discussed on [pandoc-discuss]-before opening an issue.+Any potential new feature is best discussed on the [discussion+forum] before opening an issue.  Patches and pull requests -------------------------  Patches and pull requests are welcome.  Before you put time into a nontrivial-patch, it is a good idea to discuss it on [pandoc-discuss], especially if it is-for a new feature (rather than fixing a bug).+patch, it is a good idea to discuss it on the+[discussion forum], especially if it is for a new feature (rather+than fixing a bug).  Please follow these guidelines: @@ -457,3 +458,5 @@ [status:more-discussion-needed]: https://github.com/jgm/pandoc/labels/status:more-discussion-needed [status:more-info-needed]: https://github.com/jgm/pandoc/labels/status:more-info-needed [stack]: https://github.com/commercialhaskell/stack+[discussion forum]: https://github.com/jgm/pandoc/discussions+
MANUAL.txt view
@@ -1,7 +1,7 @@ --- title: Pandoc User's Guide author: John MacFarlane-date: January 5, 2024+date: February 14, 2024 ---  # Synopsis@@ -233,6 +233,7 @@     - `csljson` ([CSL JSON] bibliography)     - `csv` ([CSV] table)     - `tsv` ([TSV] table)+    - `djot` ([Djot markup])     - `docbook` ([DocBook])     - `docx` ([Word docx])     - `dokuwiki` ([DokuWiki markup])@@ -295,6 +296,7 @@     - `commonmark_x` ([CommonMark] Markdown with extensions)     - `context` ([ConTeXt])     - `csljson` ([CSL JSON] bibliography)+    - `djot` ([Djot markup])     - `docbook` or `docbook4` ([DocBook] 4)     - `docbook5` (DocBook 5)     - `docx` ([Word docx])@@ -479,6 +481,7 @@ [ConTeXt]: https://www.contextgarden.net/ [Rich Text Format]: https://en.wikipedia.org/wiki/Rich_Text_Format [DocBook]: https://docbook.org+[Djot markup]: https://djot.net [JATS]: https://jats.nlm.nih.gov [BITS]: https://jats.nlm.nih.gov/extensions/bits/ [Jira]: https://jira.atlassian.com/secure/WikiRendererHelpAction.jspa?section=all@@ -833,7 +836,7 @@     where there are nonsemantic newlines in the source, there     will be nonsemantic newlines in the output as well).     In `ipynb` output, this option affects wrapping of the-    contents of markdown cells.+    contents of Markdown cells.  `--columns=`*NUMBER* @@ -951,6 +954,11 @@     those that come earlier, so     `--resource-path foo:bar --resource-path baz:bim` is     equivalent to `--resource-path baz:bim:foo:bar`.+    Note that this option only has an effect when pandoc+    itself needs to find an image (e.g., in producing a+    PDF or docx, or when `--embed-resources` is used.)+    It will not cause image paths to be rewritten in other+    cases (e.g., when pandoc is generating LaTeX or HTML).  `--request-header=`*NAME*`:`*VAL* @@ -2938,6 +2946,19 @@         - Numbers=Proportional         ... +`mainfontfallback`, `sansfontfallback`, `monofontfallback`+:   fonts to try if a glyph isn't found in `mainfont`, `sansfont`, or `monofont`+    respectively. These are lists. The font name must be followed by a colon+    and optionally a set of options, for example:++        ---+        mainfontfallback:+          - "FreeSans:"+          - "NotoColorEmoji:mode=harf"+        ...++    Font fallbacks currently only work with `lualatex`.+ `babelfonts` :    a map of Babel language names (e.g. `chinese`) to the font      to be used with the language:@@ -3054,6 +3075,11 @@ :   font families: take the name of any system font (see     [ConTeXt Font Switching]) +`mainfontfallback`, `sansfontfallback`, `monofontfallback`+:   list of fonts to try, in order, if a glyph is not found in the+    main font. Use `\definefallbackfamily`-compatible font name syntax.+    Emoji fonts are unsupported.+ `margin-left`, `margin-right`, `margin-top`, `margin-bottom` :   sets margins, if `layout` is not used (otherwise `layout`     overrides these)@@ -3275,13 +3301,13 @@ enabled, while `--from markdown-footnotes-pipe_tables` is pandoc's Markdown without footnotes or pipe tables. -The markdown reader and writer make by far the most use of extensions.+The Markdown reader and writer make by far the most use of extensions. Extensions only used by them are therefore covered in the section [Pandoc's Markdown] below (see [Markdown variants] for `commonmark` and `gfm`). In the following, extensions that also work for other formats are covered. -Note that markdown extensions added to the `ipynb` format+Note that Markdown extensions added to the `ipynb` format affect Markdown cells in Jupyter notebooks (as do command-line options like `--markdown-headings`). @@ -3433,7 +3459,7 @@   :  `textile`, `commonmark`    Note: as applied to `ipynb`, `raw_html` and `raw_tex` affect not-  only raw TeX in markdown cells, but data with mime type+  only raw TeX in Markdown cells, but data with mime type   `text/html` in output cells.  Since the `ipynb` reader attempts   to preserve the richest possible outputs when several options   are given, you will get best results if you disable `raw_html`@@ -3526,7 +3552,7 @@ :  `docx`, `html`  output formats-:  `docx`, `odt`, `opendocument`, `html`+:  `docx`, `odt`, `opendocument`, `html`, `latex`  #### Extension: `native_numbering` #### @@ -3596,7 +3622,7 @@ In the `ipynb` input format, this causes Markdown cells to be included as raw Markdown blocks (allowing lossless round-tripping) rather than being parsed.  Use this only-when you are targeting `ipynb` or a markdown-based+when you are targeting `ipynb` or a Markdown-based output format.  #### Extension: `citations` {#org-citations}@@ -4572,7 +4598,7 @@  The cells of pipe tables cannot contain block elements like paragraphs and lists, and cannot span multiple lines.  If any line of the-markdown source is longer than the column width (see `--columns`),+Markdown source is longer than the column width (see `--columns`), then the table will take up the full text width and the cell contents will wrap, with the relative cell widths determined by the number of dashes in the line separating the table header@@ -4704,7 +4730,7 @@ Just be sure that the YAML file begins with `---` and ends with `---` or `...`. Alternatively, you can use the `--metadata-file` option. Using that approach however, you cannot reference content (like footnotes)-from the main markdown input document.+from the main Markdown input document.  Metadata will be taken from the fields of the YAML object and added to any existing document metadata.  Metadata can contain lists and objects (nested@@ -4790,7 +4816,7 @@ using `header-includes`; however, it is important to mark up this content as raw code for a particular output format, using the [`raw_attribute` extension](#extension-raw_attribute), or it-will be interpreted as markdown. For example:+will be interpreted as Markdown. For example:      header-includes:     - |@@ -5115,7 +5141,7 @@ whereas `Markdown.pl` will preserve it as is.  There is one exception to this rule:  text between `<script>`,-`<style>`, and `<textarea>` tags is not interpreted as Markdown.+`<style>`, `<pre>`, and `<textarea>` tags is not interpreted as Markdown.  This departure from original Markdown should make it easier to mix Markdown with HTML block elements.  For example, one can surround@@ -5428,7 +5454,7 @@  Using the `native_divs` and `native_spans` extensions (see [above][Extension: `native_divs`]), HTML syntax can-be used as part of markdown to create native `Div` and `Span`+be used as part of Markdown to create native `Div` and `Span` elements in the pandoc AST (as opposed to raw HTML). However, there is also nicer syntax available: @@ -5825,12 +5851,12 @@  #### Extension: `alerts` #### -Supports [GitHub-style markdown alerts], like+Supports [GitHub-style Markdown alerts], like      > [!INFO]     > This is an informational message. -  [GitHub-style markdown alerts]: https://docs.github.com/en/get-started/writing-on-github/getting-started-with-writing-and-formatting-on-github/basic-writing-and-formatting-syntax#alerts+  [GitHub-style Markdown alerts]: https://docs.github.com/en/get-started/writing-on-github/getting-started-with-writing-and-formatting-on-github/basic-writing-and-formatting-syntax#alerts  #### Extension: `autolink_bare_uris` #### @@ -5839,18 +5865,18 @@  #### Extension: `mmd_link_attributes` #### -Parses multimarkdown style key-value attributes on link+Parses MultiMarkdown-style key-value attributes on link and image references. This extension should not be confused with the [`link_attributes`](#extension-link_attributes) extension. -    This is a reference ![image][ref] with multimarkdown attributes.+    This is a reference ![image][ref] with MultiMarkdown attributes.      [ref]: https://path.to/image "Image title" width=20px height=30px            id=myId class="myClass1 myClass2"  #### Extension: `mmd_header_identifiers` #### -Parses multimarkdown style heading identifiers (in square brackets,+Parses MultiMarkdown-style heading identifiers (in square brackets, after the heading but before any trailing `#`s in an ATX heading).  #### Extension: `compact_definition_lists` ####@@ -5897,7 +5923,7 @@  #### Extension: `short_subsuperscripts` #### -Parse multimarkdown style subscripts and superscripts, which start with+Parse MultiMarkdown-style subscripts and superscripts, which start with a '~' or '^' character, respectively, and include the alphanumeric sequence that follows. For example: @@ -5909,7 +5935,7 @@  #### Extension: `wikilinks_title_after_pipe` #### -Pandoc supports multiple markdown wikilink syntaxes, regardless of+Pandoc supports multiple Markdown wikilink syntaxes, regardless of whether the title is before or after the pipe.  Using `--from=markdown+wikilinks_title_after_pipe` results in@@ -6156,7 +6182,7 @@  Pandoc's citation processing is designed to allow you to move between author-date, numerical, and note styles without-modifying the markdown source.  When you're using a note+modifying the Markdown source.  When you're using a note style, avoid inserting footnotes manually. Instead, insert citations just as you would in an author-date style---for example,@@ -6833,6 +6859,30 @@   ~ Either `ltr` or `rtl`. Specifies the `page-progression-direction`     attribute for the [`spine` element]. +`accessModes`+  ~ An array of strings ([schema][accessibility schema]).+    Defaults to `["textual"]`.++`accessModeSufficient`+  ~ An array of strings ([schema][accessibility schema]).+    Defaults to `["textual"]`.++`accessibilityHazards`+  ~ An array of strings ([schema][accessibility schema]).+    Defaults to `["none"]`.++`accessibilityFeatures`+  ~ An array of strings ([schema][accessibility schema]).+    Defaults to++        - "alternativeText"+        - "readingOrder"+        - "structuralNavigation"+        - "tableOfContents"++`accessibilitySummary`+  ~ A string value.+ `ibooks`   ~ iBooks-specific metadata, with the following fields: @@ -6843,6 +6893,7 @@     - `binding`: `true`|`false` (default `true`)     - `scroll-axis`: `vertical`|`horizontal`|`default` +[accessibility schema]:  https://kb.daisy.org/publishing/docs/metadata/schema.org/index.html [MARC relators]: https://loc.gov/marc/relators/relaterm.html [reserved authority value]: https://idpf.github.io/epub-registries/authorities/ [`spine` element]: http://idpf.org/epub/301/spec/epub-publications.html#sec-spine-elem@@ -6851,7 +6902,7 @@  For `epub3` output, you can mark up the heading that corresponds to an EPUB chapter using the [`epub:type` attribute][epub-type]. For example, to set-the attribute to the value `prologue`, use this markdown:+the attribute to the value `prologue`, use this Markdown:      # My chapter {epub:type=prologue} @@ -7078,8 +7129,9 @@ Pandoc will automatically highlight syntax in [fenced code blocks] that are marked with a language name.  The Haskell library [skylighting] is used for highlighting. Currently highlighting is supported only for-HTML, EPUB, Docx, Ms, and LaTeX/PDF output. To see a list of language names-that pandoc will recognize, type `pandoc --list-highlight-languages`.+HTML, EPUB, Docx, Ms, Man, and LaTeX/PDF output. To see a list+of language names that pandoc will recognize, type `pandoc+--list-highlight-languages`.  The color scheme can be selected using the `--highlight-style` option. The default color scheme is `pygments`, which imitates the default color
README.md view
@@ -43,6 +43,7 @@ - `tsv`   ([TSV](https://www.iana.org/assignments/media-types/text/tab-separated-values)   table)+- `djot` ([Djot markup](https://djot.net)) - `docbook` ([DocBook](https://docbook.org)) - `docx` ([Word docx](https://en.wikipedia.org/wiki/Office_Open_XML)) - `dokuwiki` ([DokuWiki markup](https://www.dokuwiki.org/dokuwiki))@@ -126,6 +127,7 @@ - `csljson` ([CSL   JSON](https://citeproc-js.readthedocs.io/en/latest/csl-json/markup.html)   bibliography)+- `djot` ([Djot markup](https://djot.net)) - `docbook` or `docbook4` ([DocBook](https://docbook.org) 4) - `docbook5` (DocBook 5) - `docx` ([Word docx](https://en.wikipedia.org/wiki/Office_Open_XML))
changelog.md view
@@ -1,6 +1,226 @@ # Revision history for pandoc -## pandoc 3.1.11.1 (2023-01-05)+## pandoc 3.1.12 (2024-02-14)++  * Add `djot` as input and output format. Djot is a light markup syntax+    (https://djot.net).++    + New module Text.Pandoc.Readers.Djot [API change]. The function+      `readDjot` is also exported by Text.Pandoc.Readers.+    + New module Text.Pandoc.Writers.Djot [API change]. The function+      `writeDjot` is also exported by Text.Pandoc.Writers.++  * `--number-sections` now uses the first digit for the number of+    the top-level section, no matter what its level. So if the top-level+    section is level-2, numbers will be `1`, `2`, etc. rather than+    `0.1`, `0.2`, as in the past (#5071). For some backwards compatibility,+    we revert to the old behavior when the `--number-offset` option is used.++  * DocBook reader:++    + Better handling of `<procedure>` and `<substeps>` (#9341):+      `<procedure>` now gets parsed as an ordered list, and+      `<substeps>` as a sublist.++  * Man reader:++    + Move spaces outside of emph/strong (#9445).++  * MediaWiki reader:++    + Don't make leading blanks underscores in image links (#9425).+    + Allow lowercase `image:` (#9424).++  * BibTeX reader:++    + Support `pagetotal` in converting BibLaTeX.++  * Markdown reader:++    + Fix wikilinks extensions to allow newlines in titles (#9454).++  * EPUB reader:++    + Don't put `#` characters in identifiers.++  * LaTeX reader:++    + Improve treatment of `\cref`, `\Cref` (#7463). Use the+      reference-type `ref+label` and `ref+Label`. Also, associate with+      `\vref` `ref` instead of `ref+page`.+    + Limited support for `\Cref` (#7463).+    + Generate relative widths for `\linewidth`, `\textheight` (#9388).++  * Typst reader:++    + Fix handling of `\overline` (#9294). Due to a typo, it was being+      incorrectly rendered as an `\underset`.+    + Improve handling of inline `#quote` (#9413).+    + Fix handling of `dot()`, `tilde()`, `ddot()` (jgm/typst-hs#38).+    + Fix character used for `norm` (jgm/typst-hs#38).++  * Typst writer:++    + Use reference form (e.g. `@jones2000[p. 30]`) for citations when+      possible.+    + Use `#ref` or `@` for links with `reference-type="ref"` (#7463).+      This attribute is added to LaTeX `\cref`, for example.+    + Improve citation support (#9452). Emit `form: "prose"` or `form: "year"`+      qualifiers if the citation is author-in-text or suppress-author.+      Strip initial comma from suffix, since typst will add an extra one.+    + Unescape URI escapes in image paths (#9389).+    + Handle labels and citaiton ids with spaces and other special+      characters (#9387). In these cases, we produce an explicit `label()`+      rather than using `<>` or `@`.+    + Avoid producing illegal labels (#9387).+    + Avoid unnecessary escapes (#9386).++  * LaTeX writer:++    + Make writer sensitive to `empty_paragraphs` extension (#9443).+    + Fix beamer highlighting (mh4ckt3mh4ckt1c4s).+    + Create valid table even when table is empty (#9350).+    + Set font fallback for babel main font (Max Heller).+    + Add some kerns where needed between quotes (#9371).++  * HTML writer:++    + Add suffix to multiple footnote section ids, so they are+      unique (Sam May). This is necessary when `--reference-location`+      is `block` or `section`.++  * EPUB writer:++    + Add ARA roles for accessibility (#9378, Iacobus1983).+      Footnote references are given role "doc-noteref", footnote text+      gets "doc-footnote", and nav gets "doc-toc".+    + Ensure that an alt attribute is always added (#9354). This seems to+      be required by iBooks; even an empty alt attribute will satisfy it.+    + Add `xml:lang` to package element (#9372).+    + Add accessibility metadata to EPUB metadata (#9372, #9400,+      Iacobus1983 and John MacFarlane). Reasonable default values are+      used to ensure that pandoc's EPUBs conform to the EU Accessibilty Act+      requirements, but values can be overridden using metadata.++  * Docx writer:++    + Restore ability to center-justify table (#9393). The fix to+      #5947 caused all tables to be left indented. This was necessary+      to avoid extra indentation in table cells when a table appeared+      in a list item. This change makes the changes conditional, so+      that they only affect tables in list items.++  * Man writer:++    + Fix bug with long URLs (#9458). URLs with more than 68 characters didn't+      display properly because of wrapping.+    + Support (limited) syntax highlighting in code blocks (#9446).+      Currently only boldface and italics are supported. The `monochrome`+      style might be of use for those generating man pages.++  * Org writer:++    + Escape special lines in code blocks (#9218, Albert Krewinkel).++  * Markdown writer:++    + Use different width fences for nested divs (#9450). Outer divs+      have longer fences. This aids clarity for the reader, making it+      easier to see where the div ends. It also makes the output+      compatible with some other implementations, e.g. micromark,+      which require different-width fences for nesting.+    + Fix output for pipe tables with a huge number+      of columns (#9346). Previously we got invalid pipe tables when the+      number of table columns exceeded the setting of `--columns`.++  * Powerpoint writer:++    + Fix regression in layout for slides with figures (#9442).+    + Use internal column widths in pptx writer tables (#5706,+      Tomas Dahlqvist). The table writer used to only divide all+      available width evenly for all columns. In this update the code+      uses the incoming widths if they are available. If they are not+      set the earlier even distribution is used. Some of the golden+      templates are adjusted slightly because of different rounding when+      using the new calculation model.++  * Custom writers:++    + Fix handling of common state (#9229, Albert Krewinkel).+      The CommonState (`PANDOC_STATE` in Lua) may change between the time that+      a custom writer script is first loaded and when the writer is run.+      However, the writer was always using the initial state, which led to+      problems, e.g. when the mediabag was updated in a filter, as those+      updates where not visible to the writer. The state is now updated+      right before the writer function runs.++  * Text.Pandoc.SelfContained:++    + Fix id replacements in SVGs with clipping paths (#9420).+      This fixes `--embed-resources` when SVGs have `clip-path` attributes.+    + Fix size of duplicated SVGs with `--embed-resources` (#9439).++  * ConTeXt template: support font fallback (#9361, Lawrence Chonavel).++  * Text.Pandoc.Shared:++    + `addPandocAttributes`: use `wrapper` attribute, not `wrap`, for+      Divs and Spans added as wrappers to hold attributes on elements+      that do not accept them.+    + `makeSections` behavior changes:+      - When the optional base level parameter is provided, we no+        longer ensure that the sequence of heading levels is gapless+        (#9398). Instead, we set the lowest heading level to+        the specified base level, and adjust the others accordingly. If+        an author wants to skip a level, e.g. from level 1 to level 3,+        they can do that. In general, the heading levels specified+        in the source document are preserved; `makeSections` only+        puts them into a hierarchical structure.+      - Section numbers are now assigned differently, as described above+        under `--number-sections` changes (#5071).+    + Improve `makeSections` code for section number calculation.++  * Text.Pandoc.Chunks:++    + Autogenerate unique ids for sections missing them (#9383).+      This is needed for TOC generation to work properly. We can't+      create TOC links if there are no ids. This fixes some EPUB validation+      issues we've been getting since switching over to Chunks for chunking.+    + Improve `fixTOCTreePaths`. We weren't adding ids for section headings+      that don't head a chunk, but these headings are needed for a TOC.++  * Lua: catch encoding error in `pandoc.read` (#9385, Albert Krewinkel).+    Fixed a bug that could lead to an un-catchable error and program+    termination when `pandoc.read` was called with invalid UTF-8 input.++  * LaTeX template: support font fallback (lawcho).  This support is+    LuaLaTeX-specific.  See MANUAL.txt for documentation.++  * Text.Pandoc.Readers: Add `readMan` to exports [API change] (George Stagg).++  * Text.Pandoc.PDF:++    + Reliably detect when TOC has changed (#9295). Sometimes the TOC+      changes but there are no warnings: this happens when no labels+      are present. In this case we must rerun LaTeX. So we now take the+      SHA1 hash of the TOC file and rerun LaTeX if it changes between runs.+    + Increase maximum number of LaTeX runs to 4 (#9299). On some documents,+      4 runs are needed (e.g. when a LastPage reference is used).+    + Avoid `readFileLazy`, which caused improperly cleaned-up+      temp directories on Windows (#9460).++  * MANUAL.txt:++    + Harmonize spelling of Markdown and MultiMarkdown (#9402, Salim B).+    + Add `<pre>` to list of exceptions for `markdown_in_html_blocks`+      extension (#9305).+    + Add clarification to docs for `--resource-path` (#9417).++  * Makefile: Validate generated EPUB as part of prerelease checks.++  * Add validation for docx golden files to CI (Edwin Török).++## pandoc 3.1.11.1 (2024-01-05)    * Docx reader:
data/templates/default.context view
@@ -59,6 +59,16 @@  \setupbodyfontenvironment[default][em=italic] % use italic as em, not slanted +$-- set up font fallbacks+$for(mainfontfallback)$+\definefallbackfamily[mainface][rm][$mainfontfallback$][range=0x0000-0xFFFF, check=yes, force=no]+$endfor$+$for(sansfontfallback)$+\definefallbackfamily[mainface][ss][$sansfontfallback$][range=0x0000-0xFFFF, check=yes, force=no]+$endfor$+$for(monofontfallback)$+\definefallbackfamily[mainface][tt][$monofontfallback$][range=0x0000-0xFFFF, check=yes, force=no]+$endfor$ \definefallbackfamily[mainface][rm][CMU Serif][preset=range:greek, force=yes] \definefontfamily[mainface][rm][$if(mainfont)$$mainfont$$else$Latin Modern Roman$endif$] \definefontfamily[mainface][mm][$if(mathfont)$$mathfont$$else$Latin Modern Math$endif$]
+ data/templates/default.djot view
@@ -0,0 +1,27 @@+$if(title)$+# $title$++$endif$+$if(author)$+$for(author)$+$author$+$endfor$++$endif$+$if(date)$+$date$++$endif$+$for(header-includes)$+$header-includes$++$endfor$+$for(include-before)$+$include-before$++$endfor$+$body$+$for(include-after)$+$include-after$++$endfor$
data/templates/default.latex view
@@ -139,13 +139,37 @@ \ifPDFTeX\else   % xetex/luatex font selection $if(mainfont)$-  \setmainfont[$for(mainfontoptions)$$mainfontoptions$$sep$,$endfor$]{$mainfont$}+  $if(mainfontfallback)$+    \ifLuaTeX+      \usepackage{luaotfload}+      \directlua{luaotfload.add_fallback("mainfontfallback",{+        $for(mainfontfallback)$"$mainfontfallback$"$sep$,$endfor$+      })}+    \fi+  $endif$+  \setmainfont[$for(mainfontoptions)$$mainfontoptions$$sep$,$endfor$$if(mainfontfallback)$,RawFeature={fallback=mainfontfallback}$endif$]{$mainfont$} $endif$ $if(sansfont)$-  \setsansfont[$for(sansfontoptions)$$sansfontoptions$$sep$,$endfor$]{$sansfont$}+  $if(sansfontfallback)$+    \ifLuaTeX+      \usepackage{luaotfload}+      \directlua{luaotfload.add_fallback("sansfontfallback",{+        $for(sansfontfallback)$"$sansfontfallback$"$sep$,$endfor$+      })}+    \fi+  $endif$+  \setsansfont[$for(sansfontoptions)$$sansfontoptions$$sep$,$endfor$$if(sansfontfallback)$,RawFeature={fallback=sansfontfallback}$endif$]{$sansfont$} $endif$ $if(monofont)$-  \setmonofont[$for(monofontoptions)$$monofontoptions$$sep$,$endfor$]{$monofont$}+  $if(monofontfallback)$+    \ifLuaTeX+      \usepackage{luaotfload}+      \directlua{luaotfload.add_fallback("monofontfallback",{+        $for(monofontfallback)$"$monofontfallback$"$sep$,$endfor$+      })}+    \fi+  $endif$+  \setmonofont[$for(monofontoptions)$$monofontoptions$$sep$,$endfor$$if(monofontfallback)$,RawFeature={fallback=monofontfallback}$endif$]{$monofont$} $endif$ $for(fontfamilies)$   \newfontfamily{$fontfamilies.name$}[$for(fontfamilies.options)$$fontfamilies.options$$sep$,$endfor$]{$fontfamilies.font$}@@ -297,6 +321,15 @@   \usepackage[soul]{lua-ul} \else   \usepackage{soul}+$if(beamer)$+  \makeatletter+  \let\HL\hl+  \renewcommand\hl{% fix for beamer highlighting+    \let\set@color\beamerorig@set@color+    \let\reset@color\beamerorig@reset@color+    \HL}+  \makeatother+$endif$ $if(CJKmainfont)$   \ifXeTeX     % soul's \st doesn't work for CJK:@@ -380,7 +413,7 @@ $if(mainfont)$ \ifPDFTeX \else-\babelfont{rm}[$for(mainfontoptions)$$mainfontoptions$$sep$,$endfor$]{$mainfont$}+\babelfont{rm}[$for(mainfontoptions)$$mainfontoptions$$sep$,$endfor$$if(mainfontfallback)$,RawFeature={fallback=mainfontfallback}$endif$]{$mainfont$} \fi $endif$ $endif$
pandoc.cabal view
@@ -1,6 +1,6 @@ cabal-version:   2.4 name:            pandoc-version:         3.1.11.1+version:         3.1.12 build-type:      Simple license:         GPL-2.0-or-later license-file:    COPYING.md@@ -19,7 +19,7 @@                  .                  - light markup formats (many variants of Markdown,                    reStructuredText, AsciiDoc, Org-mode, Muse, Textile,-                   txt2tags)+                   txt2tags, djot)                  - HTML formats (HTML 4 and 5)                  - Ebook formats (EPUB v2 and v3, FB2)                  - Documentation formats (GNU TexInfo, Haddock)@@ -56,6 +56,7 @@                  data/templates/default.html4                  data/templates/default.html5                  data/templates/default.chunkedhtml+                 data/templates/default.djot                  data/templates/default.docbook4                  data/templates/default.docbook5                  data/templates/default.jats_archiving@@ -271,6 +272,7 @@                  test/media/rId27.jpg                  test/typst-reader.typ                  test/undergradmath.typ+                 test/djot-reader.djot                  test/latex-reader.latex                  test/textile-reader.textile                  test/markdown-reader-more.txt@@ -293,6 +295,7 @@                  test/tables.jats_articleauthoring                  test/tables.jats_publishing                  test/tables.jira+                 test/tables.djot                  test/tables.dokuwiki                  test/tables.zimwiki                  test/tables.icml@@ -329,6 +332,7 @@                  test/testsuite.txt                  test/writer.latex                  test/writer.context+                 test/writer.djot                  test/writer.docbook4                  test/writer.docbook5                  test/writer.jats_archiving@@ -447,7 +451,7 @@   build-depends: xml                   >= 1.3.12   && < 1.4,                  xml-conduit           >= 1.9.1.1  && < 1.10,                  xml-types             >= 0.3      && < 0.4,-                 containers            >= 0.6.0.1  && < 0.7,+                 containers            >= 0.6.0.1  && < 0.8,                  text                  >= 1.1.1.0  && < 2.2    hs-source-dirs:  xml-light@@ -473,10 +477,10 @@                  bytestring            >= 0.9      && < 0.13,                  case-insensitive      >= 1.2      && < 1.3,                  citeproc              >= 0.8.1    && < 0.9,-                 commonmark            >= 0.2.4.1  && < 0.3,-                 commonmark-extensions >= 0.2.5    && < 0.3,-                 commonmark-pandoc     >= 0.2.2    && < 0.3,-                 containers            >= 0.6.0.1  && < 0.7,+                 commonmark            >= 0.2.5.1  && < 0.3,+                 commonmark-extensions >= 0.2.5.2  && < 0.3,+                 commonmark-pandoc     >= 0.2.2.1  && < 0.3,+                 containers            >= 0.6.0.1  && < 0.8,                  crypton-connection    >= 0.3.1    && < 0.4,                  data-default          >= 0.4      && < 0.8,                  deepseq               >= 1.3      && < 1.6,@@ -486,7 +490,7 @@                  emojis                >= 0.1      && < 0.2,                  exceptions            >= 0.8      && < 0.11,                  file-embed            >= 0.0      && < 0.1,-                 filepath              >= 1.1      && < 1.5,+                 filepath              >= 1.1      && < 1.6,                  gridtables            >= 0.1      && < 0.2,                  haddock-library       >= 1.10     && < 1.12,                  http-client           >= 0.4.30   && < 0.8,@@ -520,10 +524,11 @@                  unicode-transforms    >= 0.3      && < 0.5,                  yaml                  >= 0.11     && < 0.12,                  zip-archive           >= 0.4.3    && < 0.5,-                 zlib                  >= 0.5      && < 0.7,+                 zlib                  >= 0.5      && < 0.8,                  xml                   >= 1.3.12   && < 1.4,-                 typst                 >= 0.5      && < 0.5.1,-                 vector                >= 0.12     && < 0.14+                 typst                 >= 0.5.0.1  && < 0.5.1,+                 vector                >= 0.12     && < 0.14,+                 djot                  >= 0.1      && < 0.2    if !os(windows)     build-depends:  unix >= 2.4 && < 2.9@@ -580,6 +585,7 @@                    Text.Pandoc.Readers.CSV,                    Text.Pandoc.Readers.RTF,                    Text.Pandoc.Readers.Typst,+                   Text.Pandoc.Readers.Djot,                    Text.Pandoc.Writers,                    Text.Pandoc.Writers.Native,                    Text.Pandoc.Writers.DocBook,@@ -592,6 +598,7 @@                    Text.Pandoc.Writers.Jira,                    Text.Pandoc.Writers.LaTeX,                    Text.Pandoc.Writers.ConTeXt,+                   Text.Pandoc.Writers.Djot,                    Text.Pandoc.Writers.Typst,                    Text.Pandoc.Writers.OpenDocument,                    Text.Pandoc.Writers.Texinfo,@@ -753,10 +760,10 @@                   Diff              >= 0.2     && < 0.6,                   Glob              >= 0.7     && < 0.11,                   bytestring        >= 0.9     && < 0.13,-                  containers        >= 0.4.2.1 && < 0.7,+                  containers        >= 0.4.2.1 && < 0.8,                   directory         >= 1.2.3   && < 1.4,                   doctemplates      >= 0.11    && < 0.12,-                  filepath          >= 1.1     && < 1.5,+                  filepath          >= 1.1     && < 1.6,                   mtl               >= 2.2     && < 2.4,                   pandoc-types      >= 1.23.1  && < 1.24,                   process           >= 1.2.3   && < 1.7,
src/Text/Pandoc/Chunks.hs view
@@ -29,8 +29,8 @@  import Text.Pandoc.Definition import Text.Pandoc.Shared (makeSections, stringify, inlineListToIdentifier,-                           tshow)-import Text.Pandoc.Walk (Walkable(..))+                           tshow, uniqueIdent)+import Text.Pandoc.Walk (Walkable(..), query) import Data.Aeson (FromJSON, ToJSON) import Data.Text (Text) import Text.Printf (printf)@@ -43,6 +43,8 @@ import Data.Tree (Tree(..)) import Data.Data (Data) import Data.Typeable (Typeable)+import qualified Data.Set as Set+import Control.Monad.State  -- | Split 'Pandoc' into 'Chunk's, e.g. for conversion into -- a set of HTML pages or EPUB chapters.@@ -63,8 +65,24 @@  where   tocTree = fixTOCTreePaths chunks $ toTOCTree sections   chunks = makeChunks chunklev pathTemplate meta $ sections-  sections = makeSections numberSections mbBaseLevel $ blocks+  sections = ensureIds $ makeSections numberSections mbBaseLevel blocks +-- The TOC won't work if we don't have unique identifiers for all sections.+ensureIds :: [Block] -> [Block]+ensureIds bs = evalState (walkM go bs) mempty+ where+   go :: Block -> State (Set.Set Text) Block+   go b@(Div (ident,"section":cls,kvs) bs'@(Header _ _ ils : _))+     | T.null ident+       = do ids <- get+            let newid = uniqueIdent mempty ils ids+            modify $ Set.insert newid+            pure $ Div (newid,"section":cls,kvs) bs'+     | otherwise+       = do modify $ Set.insert ident+            pure b+   go b = pure b+ -- | Add chunkNext, chunkPrev, chunkUp addNav :: ChunkedDoc -> ChunkedDoc addNav chunkedDoc =@@ -371,15 +389,20 @@ fixTOCTreePaths :: [Chunk] -> Tree SecInfo -> Tree SecInfo fixTOCTreePaths chunks = go ""  where-  idMap = foldr (\chunk -> M.insert (chunkId chunk) (chunkPath chunk))+  idMap = foldr (\chunk m ->+                   let ids = filter (not . T.null)+                               (chunkId chunk :+                                  query getIds (chunkContents chunk))+                    in foldr (\i -> M.insert i (chunkPath chunk)) m ids)                 mempty chunks+  getIds :: Block -> [Text]+  getIds (Div (i,"section":_,_) _) = [i]+  getIds _ = []   go :: FilePath -> Tree SecInfo -> Tree SecInfo   go fp (Node secinfo subtrees) =     let newpath = M.lookup (secId secinfo) idMap         fp' = fromMaybe fp newpath-        fragment = case newpath of-                     Nothing -> "#" <> secId secinfo-                     Just _  -> "" -- link to top of file+        fragment = "#" <> secId secinfo      in Node secinfo{ secPath = T.pack fp' <> fragment }              (map (go fp') subtrees)
src/Text/Pandoc/Citeproc/BibTeX.hs view
@@ -147,6 +147,7 @@            , "volumes"            , "number"            , "pages"+           , "pagetotal"            , "version"            , "date"            , "eventdate"@@ -327,6 +328,8 @@   getContentsFor "year"  = getVariable "issued" >>= getYear   getContentsFor "month"  = getVariable "issued" >>= getMonth   getContentsFor "pages"  = getVariable "page" >>= toLaTeX . valToInlines+  getContentsFor "pagetotal" = getVariable "number-of-pages"+                                  >>= toLaTeX . valToInlines   getContentsFor "langid"  = getVariable "language" >>= toLaTeX . valToInlines   getContentsFor "number" = (getVariable "number"                          <|> getVariable "collection-number"
src/Text/Pandoc/Extensions.hs view
@@ -612,6 +612,7 @@     , Ext_raw_tex     , Ext_task_lists     , Ext_literate_haskell+    , Ext_empty_paragraphs     ]   getAll "beamer"          = getAll "latex"   getAll "context"         = autoIdExtensions <>@@ -653,4 +654,5 @@     extensionsFromList     [ Ext_smart ]   getAll "typst"           = extensionsFromList [Ext_citations]+  getAll "djot"            = extensionsFromList [Ext_sourcepos]   getAll _                 = mempty
src/Text/Pandoc/Format.hs view
@@ -179,6 +179,7 @@     ".csv"      -> defFlavor "csv"     ".ctx"      -> defFlavor "context"     ".db"       -> defFlavor "docbook"+    ".dj"       -> defFlavor "djot"     ".doc"      -> defFlavor "doc"  -- so we get an "unknown reader" error     ".docx"     -> defFlavor "docx"     ".dokuwiki" -> defFlavor "dokuwiki"
src/Text/Pandoc/PDF.hs view
@@ -58,7 +58,7 @@ #endif import Data.List (isPrefixOf, find) import Text.Pandoc.Class (fillMediaBag, getVerbosity, setVerbosity,-                          readFileLazy, readFileStrict, fileExists,+                          readFileStrict, fileExists,                           report, extractMedia, PandocMonad, runIOorExplode) import Text.Pandoc.Logging import Text.DocTemplates ( FromContext(lookupContext) )@@ -264,17 +264,16 @@         -> FilePath                        -- ^ temp directory for output         -> Text                            -- ^ tex source         -> m (Either ByteString ByteString)-tex2pdf program args tmpDir' source = do+tex2pdf program args tmpDir source = do   let isOutdirArg x = "-outdir=" `isPrefixOf` x ||                       "-output-directory=" `isPrefixOf` x-  let tmpDir =+  let outDir =         case find isOutdirArg args of           Just x  -> drop 1 $ dropWhile (/='=') x-          Nothing -> tmpDir'-  liftIO $ createDirectoryIfMissing True tmpDir+          Nothing -> tmpDir   let file = tmpDir ++ "/input.tex"  -- note: tmpDir has / path separators   liftIO $ BS.writeFile file $ UTF8.fromText source-  (exit, log', mbPdf) <- runTeXProgram program args tmpDir+  (exit, log', mbPdf) <- runTeXProgram program args tmpDir outDir   case (exit, mbPdf) of        (ExitFailure _, _)      -> do           let logmsg = extractMsg log'@@ -384,7 +383,7 @@               Just logFile' -> do                 logExists <- fileExists logFile'                 if logExists-                  then Just <$> readFileLazy logFile'+                  then Just . BL.fromStrict <$> readFileStrict logFile'                   else return Nothing               Nothing -> return Nothing     return (log', pdf)@@ -392,28 +391,32 @@ -- Run a TeX program once in a temp directory (on input.tex) and return (exit code, -- contents of stdout, contents of produced PDF if any). runTeXProgram :: (PandocMonad m, MonadIO m)-              => String -> [String] -> FilePath+              => String -> [String] -> FilePath -> FilePath               -> m (ExitCode, ByteString, Maybe ByteString)-runTeXProgram program args tmpDir = do-    let file = tmpDir ++ "/input.tex"+runTeXProgram program args tmpDir outDir = do     let isLatexMk = takeBaseName program == "latexmk"-        programArgs | isLatexMk = ["-interaction=batchmode", "-halt-on-error", "-pdf",-                                   "-quiet", "-outdir=" ++ tmpDir] ++ args ++ [file]-                    | otherwise = ["-halt-on-error", "-interaction", "nonstopmode",-                                   "-output-directory", tmpDir] ++ args ++ [file]+        programArgs | isLatexMk =+                      ["-interaction=batchmode", "-halt-on-error", "-pdf",+                       "-quiet", "-outdir=" ++ outDir] ++ args ++ [file]+                    | otherwise =+                      ["-halt-on-error", "-interaction", "nonstopmode",+                       "-output-directory", outDir] ++ args ++ [file]     env' <- liftIO getEnvironment     let sep = [searchPathSeparator]     let texinputs = maybe (tmpDir ++ sep) ((tmpDir ++ sep) ++)           $ lookup "TEXINPUTS" env'     let env'' = ("TEXINPUTS", texinputs) :-                ("TEXMFOUTPUT", tmpDir) :+                ("TEXMFOUTPUT", outDir) :                   [(k,v) | (k,v) <- env'                          , k /= "TEXINPUTS" && k /= "TEXMFOUTPUT"]     liftIO (UTF8.readFile file) >>=       showVerboseInfo (Just tmpDir) program programArgs env''-    go file env'' programArgs (1 :: Int)+    go env'' programArgs (1 :: Int) Nothing  where-   go file env'' programArgs runNumber = do+   file = tmpDir ++ "/input.tex"+   outfile = outDir ++ "/input.pdf"+   go env'' programArgs runNumber oldTocHash = do+     let maxruns = 4 -- stop if warnings present after 4 runs      report $ MakePDFInfo ("LaTeX run number " <> tshow runNumber) mempty      (exit, out) <- liftIO $ E.catch        (pipeProcess (Just env'') program programArgs BL.empty)@@ -423,18 +426,28 @@      let logFile = replaceExtension file ".log"      logExists <- fileExists logFile      logContents <- if logExists-                       then readFileLazy logFile+                       then BL.fromStrict <$> readFileStrict logFile                        else return mempty      let rerunWarnings = checkForRerun logContents-     if not (null rerunWarnings) && runNumber < 3+     tocHash <- do+       let tocFile = replaceExtension file ".toc"+       tocFileExists <- fileExists tocFile+       if tocFileExists+          then do+            tocContents <- BL.fromStrict <$> readFileStrict tocFile+            pure $ Just $! sha1 tocContents+          else pure Nothing+     -- compare hash of toc to former hash to see if it changed (#9295)+     let rerunWarnings' = rerunWarnings +++                           ["TOC changed" | tocHash /= oldTocHash ]+     if not (null rerunWarnings') && runNumber < maxruns         then do           report $ MakePDFInfo "Rerun needed"                     (T.intercalate "\n"-                      (map (UTF8.toText . BC.toStrict) rerunWarnings))-          go file env'' programArgs (runNumber + 1)+                      (map (UTF8.toText . BC.toStrict) rerunWarnings'))+          go env'' programArgs (runNumber + 1) tocHash        else do-          let pdfFile = replaceExtension file ".pdf"-          (log', pdf) <- getResultingPDF (Just logFile) pdfFile+          (log', pdf) <- getResultingPDF (Just logFile) outfile           return (exit, fromMaybe out log', pdf)     checkForRerun log' = filter isRerunWarning $ BC.lines log'
src/Text/Pandoc/Readers.hs view
@@ -50,6 +50,7 @@   , readTxt2Tags   , readEPUB   , readMuse+  , readMan   , readFB2   , readIpynb   , readCSV@@ -61,6 +62,7 @@   , readRIS   , readRTF   , readTypst+  , readDjot   -- * Miscellaneous   , getReader   , getDefaultExtensions@@ -111,6 +113,7 @@ import Text.Pandoc.Readers.RIS import Text.Pandoc.Readers.RTF import Text.Pandoc.Readers.Typst+import Text.Pandoc.Readers.Djot import qualified Text.Pandoc.UTF8 as UTF8 import Text.Pandoc.Sources (ToSources(..), sourcesToText) @@ -164,7 +167,8 @@           ,("ris"          , TextReader readRIS)           ,("rtf"          , TextReader readRTF)           ,("typst"        , TextReader readTypst)-           ]+          ,("djot"         , TextReader readDjot)+          ]  -- | Retrieve reader, extensions based on format spec (format+extensions). getReader :: PandocMonad m => Format.FlavoredFormat -> m (Reader m, Extensions)
+ src/Text/Pandoc/Readers/Djot.hs view
@@ -0,0 +1,274 @@+{-# LANGUAGE RankNTypes #-}+{-# LANGUAGE FlexibleInstances #-}+{-# LANGUAGE UndecidableInstances #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE ScopedTypeVariables #-}++{- |+   Module      : Text.Pandoc.Readers.Djot+   Copyright   : Copyright (C) 2024 John MacFarlane+   License     : GNU GPL, version 2 or above++   Maintainer  : John MacFarlane <jgm@berkeley.edu>+   Stability   : alpha+   Portability : portable++Reads and evaluates a Djot document as a Pandoc AST.+-}+module Text.Pandoc.Readers.Djot+  ( readDjot+  )+where++import Text.Pandoc.Class+import Text.Pandoc.Sources+import Text.Parsec.Pos (newPos)+import Text.Pandoc.Options+import Text.Pandoc.Definition+import Text.Pandoc.Shared (addPandocAttributes, tshow)+import qualified Text.Pandoc.UTF8 as UTF8+import Djot (ParseOptions(..), SourcePosOption(..), parseDoc, Pos(..))+import qualified Djot.AST as D+import Text.Pandoc.Error (PandocError(..))+import Control.Monad.Except (throwError)+import qualified Data.Text as T+import Text.Pandoc.Builder+import Text.Pandoc.Logging+import Text.Pandoc.Emoji (emojiToInline)+import Control.Monad.Reader+import qualified Data.Foldable as F+import Data.List (foldl')+import Data.ByteString (ByteString)+-- import Debug.Trace++-- | Read Djot from an input string and return a Pandoc document.+readDjot :: (PandocMonad m, ToSources a) => ReaderOptions -> a -> m Pandoc+readDjot opts inp = do+  let sources = toSources inp+  case parseDoc ParseOptions{ sourcePositions =+                              if isEnabled Ext_sourcepos opts+                                 then AllSourcePos+                                 else NoSourcePos }+          (UTF8.fromText $ sourcesToText sources) of+    Left e -> throwError $ PandocParseError $ T.pack $ show e+    Right d ->+      runReaderT (doc <$> convertBlocks (D.docBlocks d))+        Env{ references = D.docReferences d <> D.docAutoReferences d+           , footnotes = D.docFootnotes d+           }++data Env =+  Env{ references :: D.ReferenceMap+     , footnotes :: D.NoteMap+     }+  deriving (Show, Ord, Eq)++convertBlocks :: PandocMonad m => D.Blocks -> ReaderT Env m Blocks+convertBlocks =  fmap mconcat . mapM convertBlock . F.toList . D.unMany++convertBlock :: PandocMonad m => D.Node D.Block -> ReaderT Env m Blocks+convertBlock (D.Node pos attr bl) =  addAttrToBlock pos attr <$>+  case bl of+    D.Para ils -> para <$> convertInlines ils+    D.Section bls -> divWith ("",["section"],[]) <$> convertBlocks bls+    D.Heading lev ils -> header lev <$> convertInlines ils+    D.BlockQuote bls -> blockQuote <$> convertBlocks bls+    D.CodeBlock lang bs -> pure $+      codeBlockWith ("", [UTF8.toText lang], []) $ UTF8.toText bs+    D.Div bls -> divWith nullAttr <$> convertBlocks bls+    D.OrderedList olattr listSpacing items ->+      orderedListWith olattr' .+        (case listSpacing of+           D.Tight -> map toTight+           D.Loose -> id) <$> mapM convertBlocks items+     where+       olattr' = ( D.orderedListStart olattr+                 , case D.orderedListStyle olattr of+                     D.Decimal -> Decimal+                     D.LetterUpper -> UpperAlpha+                     D.LetterLower -> LowerAlpha+                     D.RomanUpper -> UpperRoman+                     D.RomanLower -> LowerRoman+                 , case D.orderedListDelim olattr of+                     D.RightPeriod -> Period+                     D.RightParen -> OneParen+                     D.LeftRightParen -> TwoParens+                 )+    D.BulletList listSpacing items ->+        bulletList .+        (case listSpacing of+           D.Tight -> map toTight+           D.Loose -> id) <$> mapM convertBlocks items+    D.TaskList listSpacing items ->+        bulletList .+        (case listSpacing of+           D.Tight -> map toTight+           D.Loose -> id) <$> mapM toTaskListItem items+    D.DefinitionList listSpacing items ->+      definitionList .+        (case listSpacing of+           D.Tight -> map (\(t,d) -> (t, map toTight d))+           D.Loose -> id) <$> mapM toDlItem items+     where+       toDlItem (ils,bls) = (,) <$> convertInlines ils+                                <*> ((:[]) <$> convertBlocks bls)+    D.ThematicBreak -> pure horizontalRule+    D.Table mbCaption rows -> do+      capt <- case mbCaption of+                Just (D.Caption bls') ->+                  Caption Nothing . toList <$> convertBlocks bls'+                Nothing -> pure $ Caption Nothing mempty+      let toAlign D.AlignLeft = AlignLeft+          toAlign D.AlignRight = AlignRight+          toAlign D.AlignCenter = AlignCenter+          toAlign D.AlignDefault = AlignDefault+      let toColSpec (D.Cell _ align _) = (toAlign align, ColWidthDefault)+      let colspecs = case rows of+                      [] -> []+                      (cells:_) -> map toColSpec cells+      let (headrow, rest) =+            case rows of+              (r@(D.Cell D.HeadCell _ _ : _) : rs) -> (r, rs)+              _ -> ([],rows)+      let getBody bods row =+            case row of+              (D.Cell D.HeadCell _ _ : _) ->+                   case bods of+                     [] -> [([row],[])]+                     ([],_):_ -> (([row],[]):bods)+                     (hs,bs):rs -> (hs,row:bs):rs+              _ -> case bods of+                     (hs,bs):rs -> (hs,row:bs):rs+                     [] -> [([],[row])]+      let reverseSnd (as,bs) = (as,reverse bs)+      let bodies = reverse $ map reverseSnd $ foldl' getBody [] rest+      let toCell (D.Cell _ al ils) =+            Cell nullAttr (toAlign al) (RowSpan 1) (ColSpan 1)+                   . (\is -> [Para $ toList is]) <$> convertInlines ils+      let toRow = fmap (Row nullAttr) . mapM toCell+      thead <- TableHead mempty <$> mapM toRow [headrow]+      let toTableBody (hs, rs) =+            TableBody mempty (RowHeadColumns 0) <$>+              mapM toRow hs <*> mapM toRow rs+      tbodies <- mapM toTableBody bodies+      let tfoot = TableFoot mempty []+      pure $ singleton $ Table mempty capt colspecs thead tbodies tfoot+    D.RawBlock (D.Format fmt) bs -> pure $+      rawBlock (UTF8.toText fmt) (UTF8.toText bs)++addAttrToBlock :: Pos -> D.Attr -> Blocks -> Blocks+addAttrToBlock pos (D.Attr as) =+  addPandocAttributes $+    case pos of+        NoPos -> textkvs+        Pos sl sc el ec ->+          ("data-pos", tshow sl <> ":" <> tshow sc <>+                 "-" <> tshow el <> ":" <> tshow ec) : textkvs+     where+       textkvs = (map (\(k,v) -> (UTF8.toText k, UTF8.toText v))+                    (filter (not . internalAttribute) as))++addAttrToInline :: Pos -> D.Attr -> Inlines -> Inlines+addAttrToInline pos (D.Attr as) =+  addPandocAttributes $+    case pos of+        NoPos -> textkvs+        Pos sl sc el ec ->+          ("data-pos", tshow sl <> ":" <> tshow sc <>+                 "-" <> tshow el <> ":" <> tshow ec) : textkvs+     where+       textkvs = (map (\(k,v) -> (UTF8.toText k, UTF8.toText v))+                    (filter (not . internalAttribute) as))++convertInlines :: PandocMonad m => D.Inlines -> ReaderT Env m Inlines+convertInlines = fmap mconcat . mapM convertInline . F.toList . D.unMany++convertInline :: PandocMonad m => D.Node D.Inline -> ReaderT Env m Inlines+convertInline (D.Node pos attr il) = addAttrToInline pos attr <$>+  case il of+    D.Str bs -> pure $ str (UTF8.toText bs)+    D.Emph ils -> emph <$> convertInlines ils+    D.Strong ils -> strong <$> convertInlines ils+    D.Highlight ils -> spanWith ("",["highlighted"],[]) <$> convertInlines ils+    D.Insert ils -> spanWith ("",["inserted"],[]) <$> convertInlines ils+    D.Delete ils -> spanWith ("",["deleted"],[]) <$> convertInlines ils+    D.Subscript ils -> subscript <$> convertInlines ils+    D.Superscript ils -> superscript <$> convertInlines ils+    D.Span ils -> spanWith nullAttr <$> convertInlines ils+    D.Quoted D.DoubleQuotes ils -> doubleQuoted <$> convertInlines ils+    D.Quoted D.SingleQuotes ils -> singleQuoted <$> convertInlines ils+    D.Verbatim bs -> pure $ code (UTF8.toText bs)+    D.Symbol bs -> pure $+      let s = UTF8.toText bs+       in maybe (spanWith ("",["symbol"],[]) (str s)) singleton $ emojiToInline s+    D.Math sty bs -> pure $+      (case sty of+        D.DisplayMath -> displayMath+        D.InlineMath -> math) (UTF8.toText bs)+    D.Link ils target ->+      case target of+        D.Direct url -> link (UTF8.toText url) "" <$> convertInlines ils+        D.Reference label -> do+          refs <- asks references+          case D.lookupReference label refs of+            Just (url, lattr) ->+              addAttrToInline pos lattr .+                link (UTF8.toText url) "" <$> convertInlines ils+            Nothing -> do+              report $ ReferenceNotFound (UTF8.toText label) (newPos "" 0 0)+              link "" "" <$> convertInlines ils+    D.Image ils target ->+      case target of+        D.Direct url -> image (UTF8.toText url) "" <$> convertInlines ils+        D.Reference label -> do+          refs <- asks references+          case D.lookupReference label refs of+            Just (url, lattr) ->+              addAttrToInline pos lattr .+                image (UTF8.toText url) "" <$> convertInlines ils+            Nothing -> do+              report $ ReferenceNotFound (UTF8.toText label) (newPos "" 0 0)+              image "" "" <$> convertInlines ils+    D.FootnoteReference bs -> do+      notes <- asks footnotes+      case D.lookupNote bs notes of+        Just bls -> note <$> convertBlocks bls+        Nothing -> do+          -- TODO consider new warning for this?+          report $ IgnoredElement ("Undefined footnote reference " <> tshow bs)+          pure mempty+    D.UrlLink bs -> do+      let url = UTF8.toText bs+      pure $ linkWith ("",["uri"],[]) url "" (str url)+    D.EmailLink bs -> do+      let email = UTF8.toText bs+      pure $ linkWith ("",["email"],[]) ("mailto:" <> email) "" (str email)+    D.RawInline (D.Format fbs) bs -> pure $+      rawInline (UTF8.toText fbs) (UTF8.toText bs)+    D.NonBreakingSpace -> pure $ str "\160"+    D.SoftBreak -> pure softbreak+    D.HardBreak -> pure linebreak++internalAttribute :: (ByteString, ByteString) -> Bool+internalAttribute ("_implicit",_) = True+internalAttribute ("_autogen",_) = True+internalAttribute _ = False++toTight :: Blocks -> Blocks+toTight (Many bls) = Many $ paraToPlain <$> bls+ where+   paraToPlain (Para ils) = Plain ils+   paraToPlain x = x++toTaskListItem :: PandocMonad m+               => (D.TaskStatus, D.Blocks) -> ReaderT Env m Blocks+toTaskListItem (status, bls) = do+  bls' <- convertBlocks bls+  case toList bls' of+    (Para ils : rest) -> pure $+      fromList $ Para (Str taskmarker : Space : ils) : rest+    _ -> pure $ para (str taskmarker) <> bls'+ where+   taskmarker+     | status == D.Complete = "[X]"+     | otherwise = "[ ]"
src/Text/Pandoc/Readers/DocBook.hs view
@@ -933,7 +933,8 @@           orderedListWith (start,listStyle,DefaultDelim) . handleCompact             <$> listitems         "variablelist" -> definitionList <$> deflistitems-        "procedure" -> bulletList <$> steps+        "procedure" -> orderedList <$> steps+        "substeps" -> orderedList <$> steps         "figure" -> getFigure e         "informalfigure" -> getFigure e         "mediaobject" -> para <$> getMediaobject e
src/Text/Pandoc/Readers/EPUB.hs view
@@ -239,7 +239,7 @@  addHash :: FilePath -> Text -> Text addHash _ ""    = ""-addHash s ident = T.pack (takeFileName s) <> "#" <> ident+addHash s ident = T.pack (takeFileName s) <> "_" <> ident  removeEPUBAttrs :: [(Text, Text)] -> [(Text, Text)] removeEPUBAttrs kvs = filter (not . isEPUBAttr) kvs
src/Text/Pandoc/Readers/LaTeX.hs view
@@ -114,9 +114,9 @@  resolveRefs :: M.Map Text [Inline] -> Inline -> Inline resolveRefs labels x@(Link (ident,classes,kvs) _ _) =-  case (lookup "reference-type" kvs,+  case (T.takeWhile (/='+') <$> lookup "reference-type" kvs,         lookup "reference" kvs) of-        (Just "ref", Just lab) ->+        (Just "ref", Just lab) -> -- TODO special treatment of ref+label           case M.lookup lab labels of                Just txt -> Link (ident,classes,kvs) txt ("#" <> lab, "")                Nothing  -> x@@ -207,11 +207,13 @@  mkImage :: PandocMonad m => [(Text, Text)] -> Text -> LP m Inlines mkImage options (T.unpack -> src) = do-   let replaceTextwidth (k,v) =+   let replaceRelative (k,v) =          case numUnit v of               Just (num, "\\textwidth") -> (k, showFl (num * 100) <> "%")+              Just (num, "\\linewidth") -> (k, showFl (num * 100) <> "%")+              Just (num, "\\textheight") -> (k, showFl (num * 100) <> "%")               _                         -> (k, v)-   let kvs = map replaceTextwidth+   let kvs = map replaceRelative              $ filter (\(k,_) -> k `elem` ["width", "height"]) options    let attr = ("",[], kvs)    let alt = maybe (str "image") str $ lookup "alt" options
src/Text/Pandoc/Readers/LaTeX/Inline.hs view
@@ -337,10 +337,11 @@ refCommands = M.fromList   [ ("label", rawInlineOr "label" dolabel)   , ("ref", rawInlineOr "ref" $ doref "ref")-  , ("cref", rawInlineOr "cref" $ doref "ref")       -- from cleveref.sty-  , ("vref", rawInlineOr "vref" $ doref "ref+page")  -- from varioref.sty+  , ("cref", rawInlineOr "cref" $ doref "ref+label")       -- from cleveref.sty+  , ("Cref", rawInlineOr "Cref" $ doref "ref+Label")       -- from cleveref.sty+  , ("vref", rawInlineOr "vref" $ doref "ref")  -- from varioref.sty   , ("eqref", rawInlineOr "eqref" $ doref "eqref")   -- from amsmath.sty-  , ("autoref", rawInlineOr "autoref" $ doref "autoref") -- from hyperref.sty+  , ("autoref", rawInlineOr "autoref" $ doref "ref+label") -- from hyperref.sty   ]  acronymCommands :: PandocMonad m => M.Map Text (LP m Inlines)
src/Text/Pandoc/Readers/Man.hs view
@@ -31,6 +31,7 @@ import Text.Pandoc.Readers.Roff  -- TODO explicit imports import qualified Text.Pandoc.Parsing as P import qualified Data.Foldable as Foldable+import Text.Pandoc.Shared (extractSpaces)  data ManState = ManState { readerOptions   :: ReaderOptions                          , metadata        :: Meta@@ -241,12 +242,12 @@     | otherwise = text s <> go mono xs   go mono (Font fs: xs)     | litals > 0 && litals >= lbolds && litals >= lmonos-       = emph (go mono (Font fs{ fontItalic = False } :+       = extractSpaces emph (go mono (Font fs{ fontItalic = False } :                    map (adjustFontSpec (\s -> s{ fontItalic = False }))                    itals)) <>             go mono italsrest     | lbolds > 0 && lbolds >= lmonos-       = strong (go mono (Font fs{ fontBold = False } :+       = extractSpaces strong (go mono (Font fs{ fontBold = False } :               map (adjustFontSpec (\s -> s{ fontBold = False }))               bolds)) <>             go mono boldsrest@@ -305,12 +306,12 @@     "RI" -> parseAlternatingFonts [id, emph] args     "BR" -> parseAlternatingFonts [strong, id] args     "RB" -> parseAlternatingFonts [id, strong] args-    "SY" -> return $ strong $ mconcat $ intersperse B.space+    "SY" -> return $ extractSpaces strong $ mconcat $ intersperse B.space                    $ map linePartsToInlines args     "YS" -> return mempty     "OP" -> case args of               (x:ys) -> return $ B.space <> str "[" <> B.space <>-                         mconcat (strong (linePartsToInlines x) :+                         mconcat (extractSpaces strong (linePartsToInlines x) :                            map ((B.space <>) . linePartsToInlines) ys)                          <> B.space <> str "]"               []     -> return mempty@@ -319,16 +320,18 @@ parseBold :: PandocMonad m => [Arg] -> ManParser m Inlines parseBold [] = do   TextLine lparts <- mline-  return $ strong $ linePartsToInlines lparts+  return $ extractSpaces strong $ linePartsToInlines lparts parseBold args = return $-  strong $ mconcat $ intersperse B.space $ map linePartsToInlines args+  extractSpaces strong $+  mconcat $ intersperse B.space $ map linePartsToInlines args  parseItalic :: PandocMonad m => [Arg] -> ManParser m Inlines parseItalic [] = do   TextLine lparts <- mline-  return $ emph $ linePartsToInlines lparts+  return $ extractSpaces emph $ linePartsToInlines lparts parseItalic args = return $-  emph $ mconcat $ intersperse B.space $ map linePartsToInlines args+  extractSpaces emph $+  mconcat $ intersperse B.space $ map linePartsToInlines args  parseAlternatingFonts :: [Inlines -> Inlines]                       -> [Arg]
src/Text/Pandoc/Readers/Markdown.hs view
@@ -1843,19 +1843,20 @@ wikilink :: PandocMonad m   => (Attr -> Text -> Text -> Inlines -> Inlines)   -> MarkdownParser m (F Inlines)-wikilink constructor =-  (guardEnabled Ext_wikilinks_title_after_pipe *> wikilink' swap) <|>-  (guardEnabled Ext_wikilinks_title_before_pipe *> wikilink' id)-  where-    swap (a, b) = (b, a)-    wikilink' order = try $ do-      string "[["-      notFollowedBy' (char '[')-      raw <- many1TillChar (noneOf "\n\r\f\t") (try $ string "]]")-      let (title, url) = case T.break (== '|') raw of-            (before, "") -> (before, before)-            (before, after) -> order (before, T.drop 1 after)-      return . pure . constructor nullAttr url "wikilink" $ B.str title+wikilink constructor = do+  titleAfter <-+    (True <$ guardEnabled Ext_wikilinks_title_after_pipe) <|>+    (False <$ guardEnabled Ext_wikilinks_title_before_pipe)+  string "[[" *> notFollowedBy' (char '[')+  raw <- many1TillChar anyChar (try $ string "]]")+  let (title, url) = case T.break (== '|') raw of+        (before, "") -> (before, before)+        (before, after)+          | titleAfter -> (T.drop 1 after, before)+          | otherwise -> (before, T.drop 1 after)+  guard $ T.all (`notElem` ['\n','\r','\f','\t']) url+  return . pure . constructor nullAttr url "wikilink" $+     B.text $ fromEntities title  link :: PandocMonad m => MarkdownParser m (F Inlines) link = try $ do
src/Text/Pandoc/Readers/MediaWiki.hs view
@@ -618,15 +618,16 @@                      notFollowedBy' header <*                      notFollowedBy anyListStart) -imageIdentifiers :: PandocMonad m => [MWParser m ()]-imageIdentifiers = [sym (identifier <> ":") | identifier <- identifiers]-    where identifiers = ["File", "Image", "Archivo", "Datei", "Fichier",-                         "Bild"]+imageIdentifier :: PandocMonad m => MWParser m ()+imageIdentifier = try $ do+  ident <- T.pack <$> many1Till letter (char ':')+  guard $ T.toLower ident `elem`+            ["file", "image", "archivo", "datei", "fichier", "bild"]  image :: PandocMonad m => MWParser m Inlines image = try $ do   sym "[["-  choice imageIdentifiers+  imageIdentifier   fname <- addUnderscores <$> many1Char (noneOf "|]")   _ <- many imageOption   dims <- try (char '|' *> sepBy (manyChar digit) (char 'x') <* string "px")@@ -653,7 +654,7 @@       <|> try (oneOfStrings ["link=","alt=","page=","class="] <* many (noneOf "|]"))  addUnderscores :: Text -> Text-addUnderscores = T.intercalate "_" . splitTextBy sep+addUnderscores = T.intercalate "_" . splitTextBy sep . T.strip   where     sep c = isSpace c || c == '_'
src/Text/Pandoc/Readers/Typst.hs view
@@ -503,8 +503,8 @@       B.underline <$> pWithContents pInlines body)   ,("quote", \_ fields -> do       (getField "block" fields <|> pure False) >>= guard . not-      body <- getField "body" fields >>= pWithContents pInlines-      pure $ B.doubleQuoted body)+      body <- getInlineBody fields >>= pWithContents pInlines+      pure $ B.doubleQuoted $ B.trimInlines body)   ,("link", \_ fields -> do       dest <- getField "dest" fields       src <- case dest of@@ -568,6 +568,19 @@       display <- getField "block" fields       (if display then B.displayMath else B.math) . writeTeX <$> pMathMany body)   ]++getInlineBody :: PandocMonad m => M.Map Identifier Val -> P m (Seq Content)+getInlineBody fields =+  parbreaksToLinebreaks <$> getField "body" fields++parbreaksToLinebreaks :: Seq Content -> Seq Content+parbreaksToLinebreaks =+  fmap go . Seq.dropWhileL isParbreak . Seq.dropWhileR isParbreak+ where+   go (Elt "parbreak" pos _) = Elt "linebreak" pos mempty+   go x = x+   isParbreak (Elt "parbreak" _ _) = True+   isParbreak _ = False  pPara :: PandocMonad m => P m B.Blocks pPara =
src/Text/Pandoc/Readers/Typst/Math.hs view
@@ -31,8 +31,6 @@     ( P, pTok, ignored, pWithContents, getField, chunks ) import Typst.Types --- import Debug.Trace- withGroup :: [Exp] -> Exp withGroup [x] = x withGroup xs = EGrouped xs@@ -91,6 +89,9 @@       base <- getField "base" fields >>= pMathGrouped       acc <- getField "accent" fields >>= pMathGrouped       let acc' = case acc of+            ESymbol _ "\8901" -> ESymbol Accent "\775" -- \dot+            ESymbol _ "\168" -> ESymbol Accent "\776" -- \ddot+            ESymbol _ "\8764" -> ESymbol Accent "\771" -- \tilde             ESymbol _ t -> ESymbol Accent t             _ -> acc       pure $ EOver False base acc'@@ -175,7 +176,7 @@         <$> (getField "body" fields >>= pMathGrouped)         <*> pure (ESymbol TUnder "_")     Elt "math.overline" _ fields ->-      EUnder False+      EOver False         <$> (getField "body" fields >>= pMathGrouped)         <*> pure (ESymbol TOver "\175")     Elt "math.underbrace" _ fields -> do@@ -229,7 +230,7 @@       pure $ EDelimited "\8968" "\8969" [Right body]     Elt "math.norm" _ fields -> do       body <- getField "body" fields >>= pMathGrouped-      pure $ EDelimited "\8741" "\8741" [Right body]+      pure $ EDelimited "\8214" "\8214" [Right body]     Elt "math.round" _ fields -> do       body <- getField "body" fields >>= pMathGrouped       pure $ EDelimited "\8970" "\8969" [Right body]
src/Text/Pandoc/SelfContained.hs view
@@ -160,9 +160,7 @@              case M.lookup hash svgmap of                Just (svgid, svgattrs) -> do                  let attrs' = [(k,v) | (k,v) <- combineSvgAttrs svgattrs attrs-                                     , k /= "id"-                                     , k /= "width"-                                     , k /= "height"]+                                     , k /= "id"]                  return $ TagOpen "svg" attrs' :                           TagOpen "use" [("href", "#" <> svgid),                                          ("width", "100%"),@@ -187,6 +185,10 @@                             case T.uncons x of                               Just ('#', x') -> (k, "#" <> svgid <> "_" <> x')                               _ -> (k, x)+                          addIdPrefix ("clip-path", x) = ("clip-path",+                            case T.stripPrefix "url(#" x of+                              Just x' -> "url(#" <> svgid <> "_" <> x'+                              Nothing -> x)                           addIdPrefix kv = kv                       let ensureUniqueId (TagOpen tname ats) =                             TagOpen tname (map addIdPrefix ats)
src/Text/Pandoc/Shared.hs view
@@ -96,8 +96,9 @@ import Data.List (find, foldl', groupBy, intercalate, intersperse,                   union, sortOn) import qualified Data.Map as M-import Data.Maybe (mapMaybe, fromMaybe)-import Data.Monoid (Any (..))+import Data.Maybe (mapMaybe)+import Data.Monoid (Any (..) )+import Data.Semigroup (Min (..)) import Data.Sequence (ViewL (..), ViewR (..), viewl, viewr) import qualified Data.Set as Set import qualified Data.Text as T@@ -299,7 +300,9 @@ -- and 'Cm () Blocks' are instances of 'HasAttributes'. addPandocAttributes   :: forall b . HasAttributes (Cm () b) => [(T.Text, T.Text)] -> b -> b-addPandocAttributes kvs bs = unCm . addAttributes kvs $ (Cm bs :: Cm () b)+addPandocAttributes [] bs = bs+addPandocAttributes kvs bs =+  unCm . addAttributes (("wrapper","1"):kvs) $ (Cm bs :: Cm () b)  -- | Generate infinite lazy list of markers for an ordered list, -- depending on list attributes.@@ -507,29 +510,28 @@ -- element a Header).  If the 'numbering' parameter is True, Header -- numbers are added via the number attribute on the header. -- If the baseLevel parameter is Just n, Header levels are--- adjusted to be gapless starting at level n.+-- adjusted so that the lowest header level is n.+-- (There may still be gaps in header level if the author leaves them.) makeSections :: Bool -> Maybe Int -> [Block] -> [Block] makeSections numbering mbBaseLevel bs =-  S.evalState (go bs) (mbBaseLevel, [])+  S.evalState (go bs) []  where-  go :: [Block] -> S.State (Maybe Int, [Int]) [Block]+  getLevel (Header level _ _) = Min level+  getLevel _ = Min 99+  minLevel = getMin $ query getLevel bs+  go :: [Block] -> S.State [Int] [Block]   go (Header level (ident,classes,kvs) title':xs) = do-    (mbLevel, lastnum) <- S.get-    let level' = fromMaybe level mbLevel-    let lastnum' = take level' lastnum-    let newnum =-          if level' > 0-             then case length lastnum' of-                      x | "unnumbered" `elem` classes -> []-                        | x >= level' -> init lastnum' ++ [last lastnum' + 1]-                        | otherwise -> lastnum ++-                             replicate (level' - length lastnum - 1) 0 ++ [1]-             else []-    unless (null newnum) $ S.modify $ \(mbl, _) -> (mbl, newnum)+    lastnum <- S.get+    let level' = maybe level (\n -> n + level - minLevel) mbBaseLevel+    let adjustNum lev numComponent+          | lev < level = numComponent+          | lev == level = numComponent + 1+          | otherwise = 0+    let newnum = zipWith adjustNum [minLevel..level]+                    (lastnum ++ repeat 0)+    unless (null newnum) $ S.put newnum     let (sectionContents, rest) = break (headerLtEq level) xs-    S.modify $ \(_, ln) -> (fmap (+ 1) mbLevel, ln)     sectionContents' <- go sectionContents-    S.modify $ \(_, ln) -> (mbLevel, ln)     rest' <- go rest     let kvs' = -- don't touch number if already present                case lookup "number" kvs of
src/Text/Pandoc/Writers.hs view
@@ -30,6 +30,7 @@     , writeConTeXt     , writeCslJson     , writeDZSlides+    , writeDjot     , writeDocBook4     , writeDocBook5     , writeDocx@@ -95,6 +96,7 @@ import Text.Pandoc.Writers.CommonMark import Text.Pandoc.Writers.ConTeXt import Text.Pandoc.Writers.CslJson+import Text.Pandoc.Writers.Djot import Text.Pandoc.Writers.DocBook import Text.Pandoc.Writers.Docx import Text.Pandoc.Writers.DokuWiki@@ -197,6 +199,7 @@   ,("biblatex"     , TextWriter writeBibLaTeX)   ,("markua"       , TextWriter writeMarkua)   ,("chunkedhtml"  , ByteStringWriter writeChunkedHTML)+  ,("djot"         , TextWriter writeDjot)   ]  -- | Retrieve writer, extensions based on formatSpec (format+extensions).
+ src/Text/Pandoc/Writers/Djot.hs view
@@ -0,0 +1,296 @@+{-# LANGUAGE OverloadedStrings   #-}+{-# LANGUAGE ScopedTypeVariables #-}+{- |+   Module      : Text.Pandoc.Writers.Djot+   Copyright   : Copyright (C) 2024 John MacFarlane+   License     : GNU GPL, version 2 or above++   Maintainer  : John MacFarlane <jgm@berkeley.edu>+   Stability   : alpha+   Portability : portable++Conversion of 'Pandoc' format into Djot markup (<https://djot.net>).+-}+module Text.Pandoc.Writers.Djot (+    writeDjot+  ) where+import Text.Pandoc.Definition+import Text.Pandoc.Logging+import Text.Pandoc.Class ( PandocMonad , report )+import Text.Pandoc.Options ( WriterOptions(..), WrapOption(..))+import Data.Text (Text)+import Data.Set (Set)+import qualified Data.Set as Set+import qualified Data.ByteString as B+import qualified Data.ByteString.Char8 as B8+import Data.List (intersperse)+import qualified Data.Text as T+import qualified Data.Map as M+import qualified Text.Pandoc.UTF8 as UTF8+import Text.Pandoc.Writers.Shared ( metaToContext, defField, toLegacyTable )+import Text.Pandoc.Shared (isTightList, tshow, stringify, onlySimpleTableCells,+                           makeSections)+import Text.DocLayout+import Text.DocTemplates (renderTemplate)++import Control.Monad.State (StateT(..), gets, modify)+import Control.Monad (zipWithM, when)+import Data.Maybe (fromMaybe)+import qualified Djot.AST as D+import Djot (renderDjot, RenderOptions(..), toIdentifier)+import Text.Pandoc.UTF8 (fromText)++-- | Convert Pandoc to Djot.+writeDjot :: PandocMonad m => WriterOptions -> Pandoc -> m Text+writeDjot opts (Pandoc meta blocks) = do+  let colwidth = if writerWrapText opts == WrapAuto+                    then Just $ writerColumns opts+                    else Nothing+  let ropts = RenderOptions{ preserveSoftBreaks =+                               writerWrapText opts == WrapPreserve }+  metadata <- metaToContext opts+               (fmap (renderDjot ropts) . bodyToDjot opts)+               (fmap (chomp . renderDjot ropts) . bodyToDjot opts .+                  (:[]) . Plain)+               meta+  main <- renderDjot ropts <$>+            bodyToDjot opts (makeSections False Nothing blocks)+  let context  = defField "body" main metadata+  return $ render colwidth $+    case writerTemplate opts of+       Nothing  -> main+       Just tpl -> renderTemplate tpl context++data DjotState =+  DjotState+  { footnotes :: D.NoteMap+  , references :: D.ReferenceMap+  , autoReferences :: D.ReferenceMap+  , autoIds :: Set B.ByteString+  , options :: WriterOptions }++bodyToDjot :: PandocMonad m => WriterOptions -> [Block] -> m D.Doc+bodyToDjot opts bls = do+  (bs, st) <- runStateT (blocksToDjot bls)+               (DjotState mempty mempty mempty mempty opts)+  let D.ReferenceMap autos = autoReferences st+  let D.ReferenceMap refs = references st+  pure $ D.Doc{ D.docBlocks = bs+              , D.docFootnotes = footnotes st+              , D.docReferences = D.ReferenceMap $ M.difference refs autos+              , D.docAutoReferences = D.ReferenceMap autos+              , D.docAutoIdentifiers = autoIds st+              }++blocksToDjot :: PandocMonad m => [Block] -> StateT DjotState m D.Blocks+blocksToDjot = fmap mconcat . mapM blockToDjot++blockToDjot :: PandocMonad m => Block -> StateT DjotState m D.Blocks+blockToDjot (Para ils) = D.para <$> inlinesToDjot ils+blockToDjot (Plain ils) = D.para <$> inlinesToDjot ils+blockToDjot (LineBlock ls) =+  D.para . mconcat . intersperse D.hardBreak <$> mapM inlinesToDjot ls+blockToDjot (CodeBlock attr@(_,_,kvs) t) = do+  let lang = fromMaybe mempty $ lookup "lang" kvs+  pure $ D.addAttr (toDjotAttr attr)+       <$> D.codeBlock (fromText lang) (fromText t)+blockToDjot (RawBlock (Format f) t) =+  pure $ D.rawBlock (D.Format (fromText f)) (fromText t)+blockToDjot (BlockQuote bls) = D.blockQuote <$> blocksToDjot bls+blockToDjot (Header lev attr ils) =+  fmap (D.addAttr (toDjotAttr attr)) . D.heading lev <$> inlinesToDjot ils+blockToDjot HorizontalRule = pure D.thematicBreak+blockToDjot (Div (ident,"section":cls,kvs) bls@(Header _ _ ils : _)) = do+  ilsBs <- D.inlinesToByteString <$> inlinesToDjot ils+  let ident' = toIdentifier ilsBs+  let label = D.normalizeLabel ilsBs+  let autoid = UTF8.toText ident' == ident+  when autoid $+    modify $ \st -> st{ autoIds = Set.insert ident' (autoIds st) }+  modify $ \st -> st{ autoReferences = D.insertReference label+                          (B8.cons '#' ident', mempty) (autoReferences st) }+  fmap+    (D.addAttr (toDjotAttr (if autoid then "" else ident,+                         filter (/= "section") cls,+                         filter (\(k,_) -> k /= "wrapper") kvs))) . D.section+     <$> blocksToDjot bls+blockToDjot (Div attr@(ident,cls,kvs) bls)+  | Just "1" <- lookup "wrapper" kvs+    = fmap (D.addAttr+             (toDjotAttr (ident,cls,filter (\(k,_) -> k /= "wrapper") kvs)))+       <$> blocksToDjot bls+  | otherwise+    = fmap (D.addAttr (toDjotAttr attr)) . D.div <$> blocksToDjot bls+blockToDjot (BulletList items) =+  D.bulletList spacing <$> mapM blocksToDjot items+ where+   spacing = if isTightList items then D.Tight else D.Loose+blockToDjot (OrderedList (start, sty, delim) items) =+  D.orderedList listAttr spacing <$> mapM blocksToDjot items+ where+   spacing = if isTightList items then D.Tight else D.Loose+   listAttr = D.OrderedListAttributes {+                D.orderedListStyle =+                  case sty of+                    DefaultStyle -> D.Decimal+                    Example -> D.Decimal+                    Decimal -> D.Decimal+                    LowerRoman -> D.RomanLower+                    UpperRoman -> D.RomanUpper+                    LowerAlpha -> D.LetterLower+                    UpperAlpha -> D.LetterUpper,+                D.orderedListDelim =+                    case delim of+                      DefaultDelim -> D.RightPeriod+                      Period -> D.RightPeriod+                      OneParen -> D.RightParen+                      TwoParens -> D.LeftRightParen,+                D.orderedListStart = start }+blockToDjot (DefinitionList items) =+  D.definitionList spacing <$> mapM toDLItem items+ where+   spacing = if isTightList (map (concat . snd) items)+                then D.Tight+                else D.Loose+   toDLItem (term, defs) = do+     term' <- inlinesToDjot term+     def' <- mconcat <$> mapM blocksToDjot defs+     pure (term', def')+blockToDjot (Figure attr (Caption _ capt) bls) = do+  content <- blocksToDjot bls+  caption <- fmap (D.addAttr (D.Attr [("class","caption")])) . D.div <$>+               blocksToDjot capt+  pure $ fmap (D.addAttr (toDjotAttr attr)) $ D.div $ content <> caption+blockToDjot (Table attr capt' colspecs thead tbodies tfoot) = do+  let (capt, aligns, _, headRow, bodyRows) =+        toLegacyTable capt' colspecs thead tbodies tfoot+  if onlySimpleTableCells (headRow : bodyRows)+     then do+       let alignToAlign al = case al of+                               AlignDefault -> D.AlignDefault+                               AlignLeft -> D.AlignLeft+                               AlignRight -> D.AlignRight+                               AlignCenter -> D.AlignCenter+       let defAligns = map alignToAlign aligns+       let cellToCell isHeader bls al =+             D.Cell (if isHeader then D.HeadCell else D.BodyCell) al+               <$> case bls of+                     [Para ils] -> inlinesToDjot ils+                     [Plain ils] -> inlinesToDjot ils+                     [] -> pure mempty+                     bs -> do+                       mapM_ (report . BlockNotRendered) bs+                       pure $ D.str "((omitted))"+       let rowToRow isHeader cells = zipWithM (cellToCell isHeader) cells defAligns+       hrows <- if null headRow+                   then pure []+                   else (:[]) <$> rowToRow True headRow+       rows <- mapM (rowToRow False) bodyRows+       caption <- case capt of+                       [] -> pure Nothing+                       _ -> Just . D.Caption . D.para <$> inlinesToDjot capt+       pure $ D.addAttr (toDjotAttr attr) <$> D.table caption (hrows <> rows)+     else do -- table can't be represented as a simple pipe table, use list+       tableList <- D.bulletList D.Loose <$> mapM+                     (fmap (D.bulletList D.Loose) . mapM blocksToDjot)+                      (headRow:bodyRows)+       pure $ D.addAttr (D.Attr [("class", "table")]) <$> tableList++inlinesToDjot :: PandocMonad m => [Inline] -> StateT DjotState m D.Inlines+inlinesToDjot = fmap mconcat . mapM inlineToDjot++inlineToDjot :: PandocMonad m => Inline -> StateT DjotState m D.Inlines+inlineToDjot (Str t) = pure $ D.str (fromText t)+inlineToDjot Space = pure $ D.str " "+inlineToDjot SoftBreak = pure D.softBreak+inlineToDjot LineBreak = pure D.hardBreak+inlineToDjot (Emph ils) = D.emph <$> inlinesToDjot ils+inlineToDjot (Underline ils) =+  fmap (D.addAttr (D.Attr [("class","underline")])) . D.span_+    <$> inlinesToDjot ils+inlineToDjot (Strong ils) = D.strong <$> inlinesToDjot ils+inlineToDjot (Strikeout ils) = D.delete <$> inlinesToDjot ils+inlineToDjot (Subscript ils) = D.subscript <$> inlinesToDjot ils+inlineToDjot (Superscript ils) = D.superscript <$> inlinesToDjot ils+inlineToDjot (Span attr@(ident,cls,kvs) ils)+  | Just "1" <- lookup "wrapper" kvs+    = fmap (D.addAttr+            (toDjotAttr (ident,cls,filter (\(k,_) -> k /= "wrapper") kvs)))+       <$> inlinesToDjot ils+  | otherwise+    = fmap (D.addAttr (toDjotAttr attr)) . D.span_ <$> inlinesToDjot ils+inlineToDjot (SmallCaps ils) =+  fmap (D.addAttr (D.Attr [("class","smallcaps")])) . D.span_+    <$> inlinesToDjot ils+inlineToDjot (Quoted DoubleQuote ils) = D.doubleQuoted <$> inlinesToDjot ils+inlineToDjot (Quoted SingleQuote ils) = D.singleQuoted <$> inlinesToDjot ils+inlineToDjot (Cite _cs ils) = inlinesToDjot ils+inlineToDjot (Code attr t) =+  pure $ D.addAttr (toDjotAttr attr) <$> D.verbatim (fromText t)+inlineToDjot (Math mt t) =+  pure $ (if mt == InlineMath+             then D.inlineMath+             else D.displayMath) (fromText t)+inlineToDjot (RawInline (Format f) t) =+  pure $ D.rawInline (D.Format (fromText f)) (fromText t)+inlineToDjot (Link attr ils (src,tit)) = do+  opts <- gets options+  description <- inlinesToDjot ils+  let ilstring = stringify ils+  let autolink = ilstring == src+  let email = ("mailto:" <> ilstring) == src+  let removeClass name (ident, cls, kvs) = (ident, filter (/= name) cls, kvs)+  let attr' = D.Attr [("title", fromText tit) | not (T.null tit)] <>+               toDjotAttr ( (if autolink+                                then removeClass "uri"+                                else id) .+                            (if email+                                then removeClass "email"+                                else id) $ attr)+  case () of+    _ | autolink -> pure $ D.addAttr attr' <$> D.urlLink (fromText ilstring)+      | email -> pure $ D.addAttr attr' <$> D.emailLink (fromText ilstring)+      | writerReferenceLinks opts+        -> do refs@(D.ReferenceMap m) <- gets references+              autoRefs <- gets autoReferences+              let lab' = D.inlinesToByteString description+              lab <- case D.lookupReference lab' (refs <> autoRefs) of+                       Just _ -> pure lab'+                       Nothing -> do+                         let refnum = M.size m + 1+                         let lab = fromText $ tshow refnum+                         modify $ \st -> st{ references =+                                               D.insertReference lab+                                                 (fromText src, attr') refs }+                         pure lab+              pure $ D.addAttr attr' <$> D.link description (D.Reference lab)+      | otherwise+         -> pure $ D.addAttr attr' <$> D.link description (D.Direct (fromText src))+inlineToDjot (Image attr ils (src,tit)) = do+  opts <- gets options+  description <- inlinesToDjot ils+  let attr' = D.Attr [("title", fromText tit) | not (T.null tit)] <>+                toDjotAttr attr+  if writerReferenceLinks opts+     then do+       refs@(D.ReferenceMap m) <- gets references+       let refnum = M.size m + 1+       let lab = fromText $ tshow refnum+       modify $ \st -> st{ references =+                             D.insertReference lab+                               (fromText src, attr') refs }+       pure $ D.addAttr attr' <$> D.image description (D.Reference lab)+     else pure $ D.addAttr attr' <$> D.image description (D.Direct (fromText src))+inlineToDjot (Note bs) = do+  notes@(D.NoteMap m) <- gets footnotes+  let notenum = M.size m + 1+  let lab = fromText $ tshow notenum+  contents <- blocksToDjot bs+  modify $ \st -> st{ footnotes = D.insertNote lab contents notes }+  pure $ D.footnoteReference lab++toDjotAttr :: (Text, [Text], [(Text, Text)]) -> D.Attr+toDjotAttr (ident, classes, kvs) =+  D.Attr $ [("id", fromText ident) | not (T.null ident)] +++           [("class", fromText (T.unwords classes)) | not (null classes)] +++           map (\(k,v) -> (fromText k, fromText v)) kvs
src/Text/Pandoc/Writers/Docx/Table.hs view
@@ -114,8 +114,8 @@   let tbl = mknode "w:tbl" []         ( mknode "w:tblPr" []           ( [ mknode "w:tblStyle" [("w:val","Table")] (),-              mknode "w:tblW" tblWattr (),-              mknode "w:jc" [("w:val","left")] () ] +++              mknode "w:tblW" tblWattr () ] +++            [ mknode "w:jc" [("w:val","left")] () | indent > 0 ] ++             [ mknode "w:tblInd" [("w:w", tshow indent),("w:type","dxa")] ()                 | indent > 0 ] ++             [ mknode "w:tblLayout" [("w:type", "fixed")] () | hasWidths ] ++
src/Text/Pandoc/Writers/EPUB.hs view
@@ -100,6 +100,11 @@   , epubPageDirection       :: Maybe ProgressionDirection   , epubIbooksFields        :: [(Text, Text)]   , epubCalibreFields       :: [(Text, Text)]+  , epubAccessModes         :: [Text] -- https://kb.daisy.org/publishing/docs/metadata/schema.org/accessMode.html+  , epubAccessModeSufficient :: [Text] -- https://kb.daisy.org/publishing/docs/metadata/schema.org/accessModeSufficient.html+  , epubAccessibilityFeatures :: [Text]  -- https://kb.daisy.org/publishing/docs/metadata/schema.org/accessibilityFeature.html+  , epubAccessibilityHazards :: [Text] -- https://kb.daisy.org/publishing/docs/metadata/schema.org/accessibilityHazard.html+  , epubAccessibilitySummary :: Maybe Text -- https://kb.daisy.org/publishing/docs/metadata/schema.org/accessibilitySummary.html   } deriving Show  data Date = Date{@@ -261,16 +266,15 @@   | otherwise = md   where getAttr n = lookupAttr (opfName n) attrs addMetadataFromXML e@(Element (QName "meta" _ _) attrs _ _) md =-  case getAttr "property" of+  case getAttr "property" `mplus` getAttr "name" of        Just s | "ibooks:" `T.isPrefixOf` s ->                 md{ epubIbooksFields = (T.drop 7 s, strContent e) :                        epubIbooksFields md }-       _ -> case getAttr "name" of-                 Just s | "calibre:" `T.isPrefixOf` s ->+              | "calibre:" `T.isPrefixOf` s ->                    md{ epubCalibreFields =                          (T.drop 8 s, fromMaybe "" $ getAttr "content") :                           epubCalibreFields md }-                 _ -> md+       _ -> md   where getAttr n = lookupAttr (unqual n) attrs addMetadataFromXML _ md = md @@ -359,6 +363,11 @@     , epubPageDirection        = pageDirection     , epubIbooksFields         = ibooksFields     , epubCalibreFields        = calibreFields+    , epubAccessModes          = accessModes+    , epubAccessModeSufficient = accessModeSufficient+    , epubAccessibilityFeatures = accessibilityFeatures+    , epubAccessibilityHazards = accessibilityHazards+    , epubAccessibilitySummary = accessibilitySummary     }   where identifiers = getIdentifier meta         titles = getTitle meta@@ -402,6 +411,22 @@                             Just (MetaMap mp)                                -> M.toList $ M.map metaValueToString mp                             _  -> []+        accessModes = case lookupMeta "accessModes" meta of+                         Just (MetaList xs) -> map metaValueToString xs+                         _ -> ["textual"]+        accessModeSufficient = case lookupMeta "accessModeSufficient" meta of+                         Just (MetaList xs) -> map metaValueToString xs+                         _ -> ["textual"]+        accessibilityFeatures =+                      case lookupMeta "accessibilityFeatures" meta of+                         Just (MetaList xs) -> map metaValueToString xs+                         _ -> ["alternativeText", "readingOrder",+                               "structuralNavigation", "tableOfContents"]+        accessibilityHazards =+                       case lookupMeta "accessibilityHazards" meta of+                         Just (MetaList xs) -> map metaValueToString xs+                         _ -> ["none"]+        accessibilitySummary = metaValueToString <$> lookupMeta "accessibilitySummary" meta  -- | Produce an EPUB2 file from a Pandoc document. writeEPUB2 :: PandocMonad m@@ -614,6 +639,7 @@                              EPUB2 -> "2.0"                              EPUB3 -> "3.0")            ,("xmlns","http://www.idpf.org/2007/opf")+           ,("xml:lang", epubLanguage metadata)            ,("unique-identifier","epub-id-1")            ] ++            [("prefix","ibooks: http://vocabulary.itunes.apple.com/rdf/ibooks/vocabulary-extensions-1.0/") | version == EPUB3]) $@@ -930,6 +956,7 @@   let navBlocks = [RawBlock (Format "html")                   $ showElement $ -- prettyprinting introduces bad spaces                    unode navtag ! ([("epub:type","toc") | version == EPUB3] +++                                   [("role","doc-toc") | version == EPUB3] ++                                    [("id","toc")]) $                     [ unode "h1" ! [("id","toc-title")] $ tocTitle                     , unode "ol" ! [("class","toc")] $ tocBlocks ]]@@ -981,6 +1008,9 @@                   ++ publisherNodes ++ sourceNodes ++ relationNodes                   ++ coverageNodes ++ rightsNodes ++ coverImageNodes                   ++ modifiedNodes ++ belongsToCollectionNodes+                  ++ accessModeNodes ++ accessModeSufficientNodes ++ accessibilityFeatureNodes+                  ++ accessibilityHazardNodes ++ accessibilitySummaryNodes+        metaprop = if version == EPUB2 then "name" else "property"         withIds base f = concat . zipWith f (map (\x -> base <>                                                         T.cons '-' (tshow x))                          ([1..] :: [Int]))@@ -996,9 +1026,9 @@                                  (x:_) -> [dcNode "date" ! [("id","epub-date")]                                             $ dateText x]         ibooksNodes = map ibooksNode (epubIbooksFields md)-        ibooksNode (k, v) = unode "meta" ! [("property", "ibooks:" <> k)] $ v+        ibooksNode (k, v) = unode "meta" ! [(metaprop, "ibooks:" <> k)] $ v         calibreNodes = map calibreNode (epubCalibreFields md)-        calibreNode (k, v) = unode "meta" ! [("name", "calibre:" <> k),+        calibreNode (k, v) = unode "meta" ! [(metaprop, "calibre:" <> k),                                              ("content", v)] $ ()         languageNodes = [dcTag "language" $ epubLanguage md]         creatorNodes = withIds "epub-creator" (toCreatorNode "creator") $@@ -1015,20 +1045,29 @@         coverageNodes = maybe [] (dcTag' "coverage") $ epubCoverage md         rightsNodes = maybe [] (dcTag' "rights") $ epubRights md         coverImageNodes = maybe []-            (\img -> [unode "meta" !  [("name","cover"),+            (\img -> [unode "meta" !  [(metaprop,"cover"),                                        ("content",toId img)] $ ()])             $ epubCoverImage md-        modifiedNodes = [ unode "meta" ! [("property", "dcterms:modified")] $+        modifiedNodes = [ unode "meta" ! [(metaprop, "dcterms:modified")] $                showDateTimeISO8601 currentTime | version == EPUB3 ]         belongsToCollectionNodes =             maybe []-                (\belongsToCollection -> (unode "meta" !  [("property", "belongs-to-collection"), ("id", "epub-collection-1")] $ belongsToCollection )+                (\belongsToCollection -> (unode "meta" !  [(metaprop, "belongs-to-collection"), ("id", "epub-collection-1")] $ belongsToCollection )                 :-                [unode "meta" !  [("refines", "#epub-collection-1"), ("property", "collection-type")] $ ("series" :: Text) ])+                [unode "meta" !  [("refines", "#epub-collection-1"), (metaprop, "collection-type")] $ ("series" :: Text) ])                 (epubBelongsToCollection md)++             maybe []-                (\groupPosition -> [unode "meta" !  [("refines", "#epub-collection-1"), ("property", "group-position")] $ groupPosition ])+                (\groupPosition -> [unode "meta" !  [("refines", "#epub-collection-1"), (metaprop, "group-position")] $ groupPosition ])                 (epubGroupPosition md)+        schemanode k v = unode "meta" ! [(metaprop, "schema:" <> k)] $ v+        accessModeNodes = map (schemanode "accessMode") (epubAccessModes md)+        accessModeSufficientNodes = map (schemanode "accessModeSufficient") (epubAccessModeSufficient md)+        accessibilityFeatureNodes = map (schemanode "accessibilityFeature")+            (epubAccessibilityFeatures md)+        accessibilityHazardNodes = map (schemanode "accessibilityHazard")+            (epubAccessibilityHazards md)+        accessibilitySummaryNodes = maybe [] (\summary -> [schemanode "accessibilitySummary" summary]) $ epubAccessibilitySummary md+         dcTag n s = unode ("dc:" <> n) s         dcTag' n s = [dcTag n s]         toIdentifierNode id' (Identifier txt scheme)@@ -1038,7 +1077,7 @@           | otherwise = (dcNode "identifier" ! [("id",id')] $ txt) :               maybe [] ((\x -> [unode "meta" !                                 [ ("refines","#" <> id')-                                , ("property","identifier-type")+                                , (metaprop,"identifier-type")                                 , ("scheme","onix:codelist5")                                 ]                                 $ x@@ -1053,10 +1092,10 @@                (creatorRole creator >>= toRelator)) $ creatorText creator]           | otherwise = [dcNode s ! [("id",id')] $ creatorText creator] ++               maybe [] (\x -> [unode "meta" !-                   [("refines","#" <> id'),("property","file-as")] $ x])+                   [("refines","#" <> id'),(metaprop,"file-as")] $ x])                    (creatorFileAs creator) ++               maybe [] (\x -> [unode "meta" !-                   [("refines","#" <> id'),("property","role"),+                   [("refines","#" <> id'),(metaprop,"role"),                      ("scheme","marc:relators")] $ x])                    (creatorRole creator >>= toRelator)         toTitleNode id' title@@ -1068,10 +1107,10 @@           | otherwise = [dcNode "title" ! [("id",id')] $ titleText title]               ++               maybe [] (\x -> [unode "meta" !-                   [("refines","#" <> id'),("property","file-as")] $ x])+                   [("refines","#" <> id'),(metaprop,"file-as")] $ x])                    (titleFileAs title) ++               maybe [] (\x -> [unode "meta" !-                   [("refines","#" <> id'),("property","title-type")] $ x])+                   [("refines","#" <> id'),(metaprop,"title-type")] $ x])                    (titleType title)         toDateNode id' date = [dcNode "date" !              (("id",id') :@@ -1082,9 +1121,9 @@             [("id",id')] $ subjectText subject]           | otherwise = (dcNode "subject" ! [("id",id')] $ subjectText subject)             : maybe [] (\x -> (unode "meta" !-                    [("refines", "#" <> id'),("property","authority")] $ x) :+                    [("refines", "#" <> id'),(metaprop,"authority")] $ x) :                     maybe [] (\y -> [unode "meta" !-                         [("refines", "#" <> id'),("property","term")] $ y])+                         [("refines", "#" <> id'),(metaprop,"term")] $ y])                          (subjectTerm subject))                     (subjectAuthority subject)         schemeToOnix :: Text -> Text
src/Text/Pandoc/Writers/HTML.hs view
@@ -87,6 +87,7 @@ data WriterState = WriterState     { stNotes        :: [Html]  -- ^ List of notes     , stEmittedNotes :: Int     -- ^ How many notes we've already pushed out to the HTML+    , stEmittedNoteBlocks :: Int  -- ^ How many @\<div class=footnote>@ blocks we've already pushed out     , stMath         :: Bool    -- ^ Math is used in document     , stQuotes       :: Bool    -- ^ <q> tag is used     , stHighlighting :: Bool    -- ^ Syntax highlighting is used@@ -102,7 +103,11 @@     }  defaultWriterState :: WriterState-defaultWriterState = WriterState {stNotes= [], stEmittedNotes = 0, stMath = False, stQuotes = False,+defaultWriterState = WriterState {stNotes= [],+                                  stEmittedNotes = 0,+                                  stEmittedNoteBlocks = 0,+                                  stMath = False,+                                  stQuotes = False,                                   stHighlighting = False,                                   stHtml5 = False,                                   stEPUBVersion = Nothing,@@ -530,6 +535,16 @@   let hrtag = if refLocation /= EndOfBlock                  then (if html5 then H5.hr else H.hr) <> nl                  else mempty+  idName <- do+    blockCount <- gets stEmittedNoteBlocks+    modify $ \st -> st{ stEmittedNoteBlocks = blockCount + 1 }+    return $+      -- Keep the first note section's id undecorated to maintain a target for+      -- old links which don't expect numbered sections, or for when the notes+      -- are rendered all together at the end of the document.+      if blockCount <= 0+        then "footnotes"+        else "footnotes-" <> show (blockCount + 1)   let additionalClassName = case refLocation of         EndOfBlock -> "footnotes-end-of-block"         EndOfDocument -> "footnotes-end-of-document"@@ -539,17 +554,17 @@   let container x         | html5         , epubVersion == Just EPUB3-                = H5.section ! A.id "footnotes"+                = H5.section ! A.id (fromString idName)                              ! A.class_ className                              ! customAttribute "epub:type" "footnotes" $ x         | html5         , refLocation == EndOfDocument         -- Note: we need a section for a new slide in slide formats.-                = H5.section ! A5.id "footnotes"+                = H5.section ! A5.id (fromString idName)                              ! A5.class_ className                              ! A5.role "doc-endnotes"                              $ x-        | html5 = H5.aside   ! prefixedId opts "footnotes"+        | html5 = H5.aside   ! prefixedId opts (fromString idName)                              ! A5.class_ className                              ! A5.role "doc-footnote"                              $ x@@ -721,17 +736,22 @@      then doc      else walk go doc   where-   go (Div (ident,"section":classes,kvs) lst) =-     Div (ident,"section":classes,map fixnum kvs) lst+   go (Div (ident,"section":classes,kvs) lst@(Header level _ _ : _)) =+     Div (ident,"section":classes,map (fixnum level) kvs) lst    go (Header level (ident,classes,kvs) lst) =-     Header level (ident,classes,map fixnum kvs) lst+     Header level (ident,classes,map (fixnum level) kvs) lst    go x = x-   fixnum ("number",num) = ("number",+   fixnum level ("number",num) = ("number",                                showSecNum $ zipWith (+)                                (writerNumberOffset opts ++ repeat 0)-                               (map (fromMaybe 0 . safeRead) $+                               (padTo level $+                                map (fromMaybe 0 . safeRead) $                                 T.split (=='.') num))-   fixnum x = x+   fixnum _ x = x+   padTo n xs =+     case n - length xs of+       x | x > 0 -> replicate x 0 ++ xs+         | otherwise -> xs    showSecNum = T.intercalate "." . map tshow  blockToHtmlInner :: PandocMonad m => WriterOptions -> Block -> StateT WriterState m Html@@ -1552,6 +1572,7 @@                                     then link'                                     else link' ! A.title (toValue tit)     (Image attr@(_, _, attrList) txt (s, tit)) -> do+                        epubVersion <- gets stEPUBVersion                         let alternate = stringify txt                         slideVariant <- gets stSlideVariant                         let isReveal = slideVariant == RevealJsSlides@@ -1564,8 +1585,9 @@                               [A.title $ toValue tit | not (T.null tit)] ++                               attrs                             imageTag = (if html5 then H5.img else H.img-                              , [A.alt $ toValue alternate | not (null txt) &&-                                  isNothing (lookup "alt" attrList)] )+                              , [A.alt $ toValue alternate |+                                  isNothing (lookup "alt" attrList) &&+                                  (isJust epubVersion || not (null txt))] )                             mediaTag tg fallbackTxt =                               let linkTxt = if null txt                                             then fallbackTxt@@ -1603,7 +1625,7 @@                                              else H.sup)                                        $ toHtml ref                         return $ case epubVersion of-                                      Just EPUB3 -> link ! customAttribute "epub:type" "noteref"+                                      Just EPUB3 -> link ! customAttribute "epub:type" "noteref" ! customAttribute "role" "doc-noteref"                                       _ | html5  -> link ! A5.role "doc-noteref"                                       _          -> link     (Cite cits il)-> do contents <- inlineListToHtml opts@@ -1666,7 +1688,7 @@              _ -> Para [backlink , Str "."] : blocks       contents <- blockListToHtml opts blocks'       let noteItem = (if epubv == EPUB3-                         then H5.aside ! customAttribute "epub:type" "footnote"+                         then H5.aside ! customAttribute "epub:type" "footnote" ! customAttribute "role" "doc-footnote"                          else H.div) ! prefixedId opts ("fn" <> ref)                       $ nl >> contents >> nl       return $ noteItem >> nl
src/Text/Pandoc/Writers/LaTeX.hs view
@@ -404,7 +404,13 @@      then blockToLaTeX (RawBlock "latex" "\\pause")      else inlineListToLaTeX [Str ".",Space,Str ".",Space,Str "."] blockToLaTeX (Para lst) =-  inlineListToLaTeX lst+  if null lst+     then do+       opts <- gets stOptions+       if isEnabled Ext_empty_paragraphs opts+          then pure "\\hfill\\par"+          else pure mempty+     else inlineListToLaTeX lst blockToLaTeX (LineBlock lns) =   blockToLaTeX $ linesToPara lns blockToLaTeX (BlockQuote lst) = do@@ -775,7 +781,8 @@                   => [Inline]  -- ^ Inlines to convert                   -> LW m (Doc Text) inlineListToLaTeX lst = hcat <$>-  mapM inlineToLaTeX (fixLineInitialSpaces . fixInitialLineBreaks $ lst)+  mapM inlineToLaTeX+    (addKerns . fixLineInitialSpaces . fixInitialLineBreaks $ lst)     -- nonbreaking spaces (~) in LaTeX don't work after line breaks,     -- so we insert a strut: this is mostly used in verse.  where fixLineInitialSpaces [] = []@@ -790,6 +797,21 @@          RawInline (Format "latex") "\\hfill\\break\n" :            fixInitialLineBreaks xs        fixInitialLineBreaks xs = xs+       addKerns [] = []+       addKerns (Str s : q@Quoted{} : rest)+         | isQuote (T.takeEnd 1 s) =+           Str s : RawInline (Format "latex") "\\," : addKerns (q:rest)+       addKerns (q@Quoted{} : Str s : rest)+         | isQuote (T.take 1 s) =+           q : RawInline (Format "latex") "\\," : addKerns (Str s : rest)+       addKerns (x:xs) = x : addKerns xs+       isQuote "\"" = True+       isQuote "'" = True+       isQuote "\x2018" = True+       isQuote "\x2019" = True+       isQuote "\x201C" = True+       isQuote "\x201D" = True+       isQuote _ = False  -- | Convert inline element to LaTeX inlineToLaTeX :: PandocMonad m@@ -928,13 +950,21 @@                DoubleQuote -> "\\enquote" <> braces contents                SingleQuote -> "\\enquote*" <> braces contents      else do-       let s1 = if not (null lst) && isQuoted (head lst)-                   then "\\,"-                   else empty-       let s2 = if not (null lst) && isQuoted (last lst)-                   then "\\,"-                   else empty-       let inner = s1 <> contents <> s2+       let endsWithQuote xs =+             case reverse xs of+                   Quoted{}:_ -> True+                   Span _ ys : _ -> endsWithQuote ys+                   Str s:_ -> T.takeEnd 1 s == "'"+                   _ -> False+       let beginsWithQuote xs =+             case xs of+                   Quoted{}:_ -> True+                   Span _ ys : _ -> beginsWithQuote ys+                   Str s:_ -> T.take 1 s == "`"+                   _ -> False+       let inner = (if beginsWithQuote lst then "\\," else mempty)+                    <> contents+                    <> (if endsWithQuote lst then "\\," else mempty)        return $ case qt of                 DoubleQuote ->                    if isEnabled Ext_smart opts@@ -944,10 +974,6 @@                    if isEnabled Ext_smart opts                       then char '`' <> inner <> char '\''                       else char '\x2018' <> inner <> char '\x2019'-    where-      isQuoted (Span _ (x:_)) = isQuoted x-      isQuoted (Quoted _ _)   = True-      isQuoted _              = False inlineToLaTeX (Str str) = do   setEmptyLine False   liftM literal $ stringToLaTeX TextString str
src/Text/Pandoc/Writers/LaTeX/Table.hs view
@@ -137,12 +137,14 @@                        then replicate (length specs)                             (1 / fromIntegral (length specs))                        else map toRelWidth widths-  in if defaultWidthsOnly && isSimpleTable-     then hcat $ map (literal . colAlign) aligns-     else (cr <>) . nest 2 . vcat . map literal $-          zipWith (toColDescriptor (length specs))-                  aligns-                  relativeWidths+  in if null aligns+        then "l"  -- #9350, table needs at least one column spec+        else if defaultWidthsOnly && isSimpleTable+                then hcat $ map (literal . colAlign) aligns+                else (cr <>) . nest 2 . vcat . map literal $+                     zipWith (toColDescriptor (length specs))+                             aligns+                             relativeWidths   where     toColDescriptor :: Int -> Alignment -> Double -> Text     toColDescriptor numcols align width =
src/Text/Pandoc/Writers/Man.hs view
@@ -14,12 +14,13 @@  -} module Text.Pandoc.Writers.Man ( writeMan ) where-import Control.Monad ( liftM, zipWithM, forM )+import Control.Monad ( liftM, zipWithM, forM, unless ) import Control.Monad.State.Strict ( StateT, gets, modify, evalStateT ) import Control.Monad.Trans (MonadTrans(lift)) import Data.List (intersperse) import Data.List.NonEmpty (nonEmpty) import Data.Maybe (fromMaybe)+import qualified Data.Map as M import Data.Text (Text) import qualified Data.Text as T import Text.Pandoc.Builder (deleteMeta)@@ -34,7 +35,10 @@ import Text.Pandoc.Writers.Math import Text.Pandoc.Writers.Shared import Text.Pandoc.Writers.Roff+import Text.Pandoc.Highlighting import Text.Printf (printf)+import Skylighting (TokenType(..), SourceLine, FormatOptions, defaultFormatOpts,+                    defStyle, TokenStyle(..), Style(..))  -- | Convert Pandoc to Man. writeMan :: PandocMonad m => WriterOptions -> Pandoc -> m Text@@ -129,14 +133,18 @@                   1 -> ".SH "                   _ -> ".SS "   return $ nowrap $ literal heading <> contents-blockToMan opts (CodeBlock _ str) = return $-  literal ".IP" $$-  literal ".EX" $$-  ((case T.uncons str of-    Just ('.',_) -> literal "\\&"-    _            -> mempty) <>-   literal (escString opts str)) $$-  literal ".EE"+blockToMan opts (CodeBlock attr str) = do+  hlCode <- case highlight (writerSyntaxMap opts) (formatSource opts)+                  attr str of+              Right d -> pure d+              Left msg -> do+                unless (T.null msg) $ report $ CouldNotHighlight msg+                pure $ formatSource opts defaultFormatOpts+                          (map (\t -> [(NormalTok,t)]) $ T.lines str)+  pure $ literal ".IP" $$+         literal ".EX" $$+         hlCode $$+         literal ".EE" blockToMan opts (BlockQuote blocks) = do   contents <- blockListToMan opts blocks   return $ literal ".RS" $$ contents $$ literal ".RE"@@ -324,7 +332,7 @@                         then (".MT", ".ME")                         else (".UR", ".UE")   return $ "\\c" <> cr -- \c avoids extra space-        $$ (start <+> literal srcSuffix)+        $$ nowrap (start <+> literal srcSuffix)         $$ linktext         $$ (end <+> "\\c" <> cr)  -- \c avoids space after inlineToMan opts (Image attr alternate (source, tit)) = do@@ -340,3 +348,29 @@   notes <- gets stNotes   let ref = tshow (length notes)   return $ char '[' <> literal ref <> char ']'++formatSource :: WriterOptions -> FormatOptions -> [SourceLine] -> Doc Text+formatSource wopts fopts = vcat . map (formatSourceLine wopts fopts)++formatSourceLine :: WriterOptions -> FormatOptions -> SourceLine -> Doc Text+formatSourceLine _wopts _fopts [] = blankline+formatSourceLine wopts fopts ts@((_,firstTxt):_) =+  (case T.uncons firstTxt of+     Just ('.',_) -> literal "\\&"+     _ -> mempty) <> mconcat (map (formatTok wopts fopts) ts) <> literal "\n"++formatTok :: WriterOptions -> FormatOptions -> (TokenType, Text) -> Doc Text+formatTok wopts _fopts (toktype, t) =+  let txt = literal (escString wopts t)+      styleMap = tokenStyles <$> writerHighlightStyle wopts+      tokStyle = fromMaybe defStyle $ styleMap >>= M.lookup toktype+  in  if toktype == NormalTok+         then txt+         else+           let fonts = ['B' | tokenBold tokStyle] +++                       ['I' | tokenItalic tokStyle || tokenUnderline tokStyle]+            in if null fonts+                  then txt+                  else literal ("\\f[" <> T.pack fonts <> "]") <>+                       txt <>+                       literal "\\f[R]"
src/Text/Pandoc/Writers/Markdown.hs view
@@ -401,9 +401,12 @@                   let attrsToMd = if variant == Commonmark                                   then attrsToMarkdown opts                                   else classOrAttrsToMarkdown opts-                  in nowrap (literal ":::" <+> attrsToMd attrs) $$+                      divNesting = computeDivNestingLevel bs+                      numcolons = 3 + divNesting+                      colons = literal $ T.replicate numcolons ":"+                  in nowrap (colons <+> attrsToMd attrs) $$                      chomp contents $$-                     literal ":::" <> blankline+                     colons <> blankline              | isEnabled Ext_native_divs opts ||                (isEnabled Ext_raw_html opts &&                 (variant == Commonmark ||@@ -895,3 +898,9 @@         go !afternewline (!c:cs)           | isSpace c = c : go afternewline cs           | otherwise = c : go False cs++computeDivNestingLevel :: [Block] -> Int+computeDivNestingLevel = foldr go 0+ where+   go (Div _ bls') n = max (n + 1) (foldr go (n + 1) bls')+   go _ n = n
src/Text/Pandoc/Writers/Markdown/Table.hs view
@@ -50,7 +50,9 @@                       not (all (== 0) widths) &&                       maxwidth + (numcols + 1) > colwidth                       then map-                            (floor . (* fromIntegral (colwidth - (numcols +1))))+                            (max 0 .+                              floor .+                                (* fromIntegral (colwidth - (numcols +1))))                             widths                       else contentWidths   let torow cs = nowrap $ literal "|" <>
src/Text/Pandoc/Writers/Org.hs view
@@ -194,7 +194,15 @@   let (beg, end) = case lang of         Nothing -> ("#+begin_example" <> numberlines, "#+end_example")         Just x  -> ("#+begin_src " <> x <> numberlines <> args, "#+end_src")-  return $ name $$ literal beg $$ literal str $$ literal end $$ blankline+  -- escape special lines+  let escape_line line =+        let (spaces, code) = T.span (\c -> c == ' ' || c == '\t') line+        in spaces <>+           (if T.isPrefixOf "#+" code || T.isPrefixOf "*" code+            then T.cons ',' code+            else code)+  let escaped = T.unlines . map escape_line . T.lines $ str+  return $ name $$ literal beg $$ literal escaped $$ literal end $$ blankline blockToOrg (BlockQuote blocks) = do   contents <- blockListToOrg blocks   return $ blankline $$ "#+begin_quote" $$
src/Text/Pandoc/Writers/Powerpoint/Output.hs view
@@ -1411,18 +1411,18 @@   return $ findAttr (QName "def" Nothing Nothing) tblStyleLst  graphicToElement :: PandocMonad m => Integer -> Graphic -> P m Element-graphicToElement tableWidth (Tbl tblPr hdrCells rows) = do-  let colWidths = if null hdrCells-                  then case rows of-                         r : _ | not (null r) -> replicate (length r) $+graphicToElement tableWidth (Tbl widths tblPr hdrCells rows) = do+  let totalWidth = sum widths+  let colWidths = if any (== 0.0) widths+                  then if null hdrCells+                      then case rows of+                         r@(_:_) : _ -> replicate (length r) $                                                  tableWidth `div` toInteger (length r)-                         -- satisfy the compiler. This is the same as-                         -- saying that rows is empty, but the compiler-                         -- won't understand that `[]` exhausts the-                         -- alternatives.-                         _ -> []-                  else replicate (length hdrCells) $-                       tableWidth `div` toInteger (length hdrCells)+                         []: _ -> []+                         [] -> []+                      else replicate (length hdrCells) $+                           tableWidth `div` toInteger (length hdrCells)+                  else map (\w -> round $ w / totalWidth * fromIntegral tableWidth) widths    let cellToOpenXML paras =         do elements <- mapM paragraphToElement paras
src/Text/Pandoc/Writers/Powerpoint/Presentation.hs view
@@ -244,7 +244,7 @@                              , tblPrBandRow :: Bool                              } deriving (Show, Eq) -data Graphic = Tbl TableProps [TableCell] [[TableCell]]+data Graphic = Tbl [Double] TableProps [TableCell] [[TableCell]]   deriving (Show, Eq)  @@ -537,7 +537,7 @@                    | otherwise -> Nothing   addIncremental env = env { envInIncrementalDiv = incremental }   in local addIncremental (concatMapM blockToParagraphs blks)-blockToParagraphs (Figure attr capt blks) =+blockToParagraphs (Figure attr capt blks) = -- This never seems to be used:   blockToParagraphs (Shared.figureDiv attr capt blks) blockToParagraphs hr@HorizontalRule = notRendered hr blockToParagraphs tbl@Table{} = notRendered tbl@@ -601,7 +601,7 @@       <$> inlinesToParElems ils blockToShape (Figure _figattr _caption [b]) = blockToShape b blockToShape (Table _ blkCapt specs thead tbody tfoot) = do-  let (caption, algn, _, hdrCells, rows) = toLegacyTable blkCapt specs thead tbody tfoot+  let (caption, algn, widths, hdrCells, rows) = toLegacyTable blkCapt specs thead tbody tfoot   caption' <- inlinesToParElems caption   hdrCells' <- rowToParagraphs algn hdrCells   rows' <- mapM (rowToParagraphs algn) rows@@ -613,7 +613,7 @@                               , tblPrBandRow = True                               } -  return $ GraphicFrame [Tbl tblPr hdrCells' rows'] caption'+  return $ GraphicFrame [Tbl widths tblPr hdrCells' rows'] caption' -- If the format isn't openxml, we fall through to blockToPargraphs blockToShape (RawBlock (Format "openxml") str) = return $ RawOOXMLShape str blockToShape blk = do paras <- blockToParagraphs blk@@ -649,6 +649,7 @@ notText :: Block -> Bool notText block | startsWithImage block = True notText Table{} = True+notText Figure{} = True notText _ = False  startsWithImage :: Block -> Bool
src/Text/Pandoc/Writers/Texinfo.hs view
@@ -446,6 +446,9 @@ inlineToTexinfo (SmallCaps lst) =   inCmd "sc" <$> inlineListToTexinfo lst +inlineToTexinfo (Code (_, cls , _) str) | T.pack "variable" `elem` cls  =+  return $ literal $ "@code{@var{" <> stringToTexinfo str <> "}}"+ inlineToTexinfo (Code _ str) =   return $ literal $ "@code{" <> stringToTexinfo str <> "}"
src/Text/Pandoc/Writers/Typst.hs view
@@ -22,6 +22,7 @@ import Text.Pandoc.Options ( WriterOptions(..), WrapOption(..), isEnabled ) import Data.Text (Text) import Data.List (intercalate)+import Network.URI (unEscapeString) import qualified Data.Text as T import Control.Monad.State ( StateT, evalStateT, gets, modify ) import Text.Pandoc.Writers.Shared ( metaToContext, defField, resetField,@@ -34,6 +35,7 @@ import Control.Monad.Except (catchError) import Text.Pandoc.Extensions (Extension(..)) import Text.Collate.Lang (Lang(..), parseLang)+import Data.Char (isAlphaNum)  -- | Convert Pandoc to Typst. writeTypst :: PandocMonad m => WriterOptions -> Pandoc -> m Text@@ -96,7 +98,7 @@     Para inlines -> ($$ blankline) <$> inlinesToTypst inlines     Header level (ident,cls,_) inlines -> do       contents <- inlinesToTypst inlines-      let lab = toLabel ident+      let lab = toLabel FreestandingLabel ident       return $         if "unlisted" `elem` cls            then literal "#heading(outlined: false)" <> brackets contents <>@@ -167,7 +169,7 @@                   else do                     captcontents <- inlinesToTypst caption                     return $ ", caption: " <> brackets captcontents-      let lab = toLabel ident+      let lab = toLabel FreestandingLabel ident       let formatalign AlignLeft = "left,"           formatalign AlignRight = "right,"           formatalign AlignCenter = "center,"@@ -190,14 +192,14 @@     Figure (ident,_,_) (Caption _mbshort capt) blocks -> do       caption <- blocksToTypst capt       contents <- blocksToTypst blocks-      let lab = toLabel ident+      let lab = toLabel FreestandingLabel ident       return $ "#figure(" <> nest 2 (brackets contents <> "," <> cr <>                                      ("caption: [" $$ nest 2 caption $$ "]"))                           $$ ")" $$ lab $$ blankline     Div (ident,_,_) (Header lev ("",cls,kvs) ils:rest) ->       blocksToTypst (Header lev (ident,cls,kvs) ils:rest)     Div (ident,_,_) blocks -> do-      let lab = toLabel ident+      let lab = toLabel FreestandingLabel ident       contents <- blocksToTypst blocks       return $ "#block[" $$ contents $$ ("]" <+> lab) @@ -223,7 +225,7 @@   case inline of     Str txt -> do       context <- gets stEscapeContext-      return $ literal $ escapeTypst context txt+      return $ escapeTypst context txt     Space -> return space     SoftBreak -> do       wrapText <- gets $ writerWrapText . stOptions@@ -259,7 +261,7 @@     Subscript inlines -> textstyle "#sub" inlines     SmallCaps inlines -> textstyle "#smallcaps" inlines     Span (ident,_,_) inlines -> do-      let lab = toLabel ident+      let lab = toLabel FreestandingLabel ident       (lab $$) <$> inlinesToTypst inlines     Quoted quoteType inlines -> do       let q = case quoteType of@@ -269,30 +271,33 @@       return $ q <> contents <> q     Cite citations inlines -> do       opts <-  gets stOptions-      let toCite cite = do-            suppl <- case citationSuffix cite of-                       [] -> pure mempty-                       suff -> brackets <$> inlinesToTypst suff-            pure $ "#cite" <> parens (toLabel (citationId cite)) <> suppl-                      <> endCode       if isEnabled Ext_citations opts          -- Note: this loses prefix          then mconcat <$> mapM toCite citations          else inlinesToTypst inlines-    Link _attrs inlines (src,_tit) -> do-      contents <- inlinesToTypst inlines-      let dest = case T.uncons src of-                   Just ('#', ident) -> "<" <> literal ident <> ">"-                   _ -> doubleQuoted src-      return $ "#link" <> parens dest <>-                (if inlines == [Str src]-                    then mempty-                    else nowrap $ brackets contents) <> endCode+    Link (_,_,kvs) inlines (src,_tit) -> do+      case lookup "reference-type" kvs of+        Just "ref"+          | Just ('#', ident) <- T.uncons src+          -> if T.all isIdentChar ident+                then pure $ literal $ "@" <> ident+                else pure $ "#ref" <> parens (toLabel ArgumentLabel ident)+                            <> endCode+        _ -> do+          contents <- inlinesToTypst inlines+          let dest = case T.uncons src of+                       Just ('#', ident) -> toLabel ArgumentLabel ident+                       _ -> doubleQuoted src+          pure $ "#link" <> parens dest <>+                    (if inlines == [Str src]+                          then mempty+                          else nowrap $ brackets contents) <> endCode     Image (_,_,kvs) _inlines (src,_tit) -> do       opts <- gets stOptions       let mbHeight = lookup "height" kvs       let mdWidth = lookup "width" kvs-      let coreImage = "image" <> parens (doubleQuoted src)+      let src' = T.pack $ unEscapeString $ T.unpack src -- #9389+      let coreImage = "image" <> parens (doubleQuoted src')       -- see #9104; we need a box or the image is treated as block-level:       case (mdWidth, mbHeight) of         (Nothing, Nothing) -> do@@ -322,12 +327,17 @@ textstyle s inlines =   (<> endCode) . (s <>) . brackets <$> inlinesToTypst inlines -escapeTypst :: EscapeContext -> Text -> Text+escapeTypst :: EscapeContext -> Text -> Doc Text escapeTypst context t =-  T.replace "//" "\\/\\/" $-  if T.any needsEscape t-     then T.concatMap escapeChar t-     else t+  (case T.uncons t of+    Just (c, _)+      | needsEscapeAtLineStart c+        -> afterBreak "\\"+    _ -> mempty) <>+  (literal (T.replace "//" "\\/\\/"+    (if T.any needsEscape t+        then T.concatMap escapeChar t+        else t)))   where     escapeChar c       | c == '\160' = "~"@@ -336,7 +346,6 @@     needsEscape '\160' = True     needsEscape '[' = True     needsEscape ']' = True-    needsEscape '(' = True -- see #9137     needsEscape '#' = True     needsEscape '<' = True     needsEscape '>' = True@@ -346,18 +355,63 @@     needsEscape '\'' = True     needsEscape '"' = True     needsEscape '`' = True-    needsEscape '=' = True     needsEscape '_' = True     needsEscape '*' = True     needsEscape '~' = True     needsEscape ':' = context == TermContext     needsEscape _ = False+    needsEscapeAtLineStart '/' = True+    needsEscapeAtLineStart '+' = True+    needsEscapeAtLineStart '-' = True+    needsEscapeAtLineStart '=' = True+    needsEscapeAtLineStart _ = False -toLabel :: Text -> Doc Text-toLabel ident =-  if T.null ident-     then mempty-     else "<" <> literal ident <> ">"+data LabelType =+    FreestandingLabel+  | ArgumentLabel+  deriving (Show, Eq)++toLabel :: LabelType -> Text -> Doc Text+toLabel labelType ident+  | T.null ident = mempty+  | T.all isIdentChar ident'+    = "<" <> literal ident' <> ">"+  | otherwise+     = case labelType of+          FreestandingLabel -> "#label" <> parens (doubleQuoted ident')+          ArgumentLabel -> "label" <> parens (doubleQuoted ident')+ where+   ident' = T.pack $ unEscapeString $ T.unpack ident++isIdentChar :: Char -> Bool+isIdentChar c = isAlphaNum c || c == '_' || c == '-' || c == '.' || c == ':'++toCite :: PandocMonad m => Citation -> TW m (Doc Text)+toCite cite = do+  let ident' = T.pack $ unEscapeString $ T.unpack $ citationId cite+  -- typst inserts comma and we get a doubled one if supplement contains it:+  let eatComma (Str "," : Space : xs) = xs+      eatComma xs = xs+  if citationMode cite == NormalCitation && T.all isIdentChar ident'+     then do+       suppl <- case citationSuffix cite of+                  [] -> pure mempty+                  suff -> (<> endCode) . brackets+                            <$> inlinesToTypst (eatComma suff)+       pure $ "@" <> literal ident' <> suppl+     else do+       let label = if T.all isIdentChar ident'+                      then "<" <> literal ident' <> ">"+                      else "label" <> parens (doubleQuoted ident')+       let form = case citationMode cite of+                     NormalCitation -> mempty+                     SuppressAuthor -> ", form: \"year\""+                     AuthorInText -> ", form: \"prose\""+       suppl <- case citationSuffix cite of+                  [] -> pure mempty+                  suff -> (", supplement: " <>) . brackets+                             <$> inlinesToTypst (eatComma suff)+       pure $ "#cite" <> parens (label <> form <> suppl) <> endCode  doubleQuoted :: Text -> Doc Text doubleQuoted = doubleQuotes . literal . escape
test/Tests/Old.hs view
@@ -83,6 +83,11 @@     , test' "reader" ["-r", "textile", "-w", "native", "-s"]       "textile-reader.textile" "textile-reader.native"     ]+  , testGroup "djot"+    [ testGroup "writer" $ writerTests' "djot"+    , test' "reader" ["-f", "djot", "-t" ,"native", "-s"]+       "djot-reader.djot" "djot-reader.native"+    ]   , testGroup "docbook"     [ testGroup "writer" $ writerTests' "docbook4"     , test' "reader" ["-r", "docbook", "-w", "native", "-s"]@@ -163,11 +168,11 @@     [ test' "reader" ["-r", "t2t", "-w", "native", "-s"]         "txt2tags.t2t" "txt2tags.native" ]   , testGroup "epub" [-      test' "features" ["-r", "epub", "-w", "native"]+      test' "features" ["-r", "epub", "-w", "native", "-s"]         "epub/features.epub" "epub/features.native"-    , test' "wasteland" ["-r", "epub", "-w", "native"]+    , test' "wasteland" ["-r", "epub", "-w", "native", "-s"]         "epub/wasteland.epub" "epub/wasteland.native"-    , test' "formatting" ["-r", "epub", "-w", "native"]+    , test' "formatting" ["-r", "epub", "-w", "native", "-s"]         "epub/formatting.epub" "epub/formatting.native"     ]   , testGroup "twiki"
test/Tests/Readers/Man.hs view
@@ -20,7 +20,6 @@ import Text.Pandoc import Text.Pandoc.Arbitrary () import Text.Pandoc.Builder-import Text.Pandoc.Readers.Man  man :: Text -> Pandoc man = purely $ readMan def
test/Tests/Readers/Markdown.hs view
@@ -321,10 +321,10 @@             para (link "random string" "wikilink" (str "title"))           , test markdownGH "autolink not being a link" $             "[[Name of page]]" =?>-            para (link "Name of page" "wikilink" (str "Name of page"))+            para (link "Name of page" "wikilink" (text "Name of page"))           , test markdownGH "autolink not being a link with a square bracket" $             "[[Name of ]page]]" =?>-            para (link "Name of ]page" "wikilink" (str "Name of ]page"))+            para (link "Name of ]page" "wikilink" (text "Name of ]page"))           , test markdownGH "link with inline start should be a link" $             "[[t`i*t_le|https://example.org]]" =?>             para (link "https://example.org" "wikilink" (str "t`i*t_le"))
test/command/1608.md view
@@ -129,7 +129,7 @@         , Link             ( ""             , []-            , [ ( "reference-type" , "ref" )+            , [ ( "reference-type" , "ref+label" )               , ( "reference" , "def:tri" )               ]             )
+ test/command/5071.md view
@@ -0,0 +1,68 @@+```+% pandoc -f markdown -t html --number-sections+## First section++### Subhead++##### Subhead with gap++## Second section+^D+<h2 data-number="1" id="first-section"><span+class="header-section-number">1</span> First section</h2>+<h3 data-number="1.1" id="subhead"><span+class="header-section-number">1.1</span> Subhead</h3>+<h5 data-number="1.1.0.1" id="subhead-with-gap"><span+class="header-section-number">1.1.0.1</span> Subhead with gap</h5>+<h2 data-number="2" id="second-section"><span+class="header-section-number">2</span> Second section</h2>++```++```+% pandoc -f markdown -t html --number-sections+## First section++### Subhead++# Higher-level section++## Sub+^D+<h2 data-number="0.1" id="first-section"><span+class="header-section-number">0.1</span> First section</h2>+<h3 data-number="0.1.1" id="subhead"><span+class="header-section-number">0.1.1</span> Subhead</h3>+<h1 data-number="1" id="higher-level-section"><span+class="header-section-number">1</span> Higher-level section</h1>+<h2 data-number="1.1" id="sub"><span+class="header-section-number">1.1</span> Sub</h2>+```++For backwards compatibility, we want it to work the old way,+giving numbers like 0.1, when `--number-offset` is used:+```+% pandoc -f markdown -t html --number-sections --number-offset=2,2,2+## First section++### Subhead+^D+<h2 data-number="2.3" id="first-section"><span+class="header-section-number">2.3</span> First section</h2>+<h3 data-number="2.3.3" id="subhead"><span+class="header-section-number">2.3.3</span> Subhead</h3>++```++```+% pandoc -f markdown -t html --number-sections --number-offset=0,2,2+## First section++### Subhead+^D+<h2 data-number="0.3" id="first-section"><span+class="header-section-number">0.3</span> First section</h2>+<h3 data-number="0.3.3" id="subhead"><span+class="header-section-number">0.3.3</span> Subhead</h3>++```
test/command/5986.md view
@@ -8,11 +8,11 @@ <ol> <li><a href="text/title_page.xhtml" class="titlepage">Title Page</a></li>-<li><a href="#nav.xhtml#toc" class="toc">Table of Contents</a></li>+<li><a href="#nav.xhtml_toc" class="toc">Table of Contents</a></li> </ol> </nav> <p><span id="ch001.xhtml"></span></p>-<section id="ch001.xhtml#hi" class="level1" data-number="1">+<section id="ch001.xhtml_hi" class="level1" data-number="1"> <h1 data-number="1"><span class="header-section-number">1</span> Hi</h1> </section> ```
test/command/6723.md view
@@ -22,11 +22,11 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-doe .csl-entry} Doe, John. "An Article," 2020. <https://doi.org/10.1109/5.771073>. :::-:::+::::  [^1]: John Doe, "An Article," 2020, <https://doi.org/10.1109/5.771073>. ```
+ test/command/8534.md view
@@ -0,0 +1,11 @@+```+% pandoc -f html -t texinfo+<html>+foo <code>bar <var>baz</var> bar</code> foo+</html>+^D+@node Top+@top Top++foo @code{bar }@code{@var{baz}}@code{ bar} foo+```
+ test/command/8770-block.md view
@@ -0,0 +1,75 @@+```+% pandoc -t html5 --reference-location=block+# Section 1++hello[^1]++: Sample table.[^2]++-----------+ Fruit[^3]+-----------+ Bans[^4]+-----------++# Section 2++dolly[^5]++[^1]: doc footnote+[^2]: caption footnote+[^3]: header footnote+[^4]: table cell footnote+[^5]: doc footnote+^D+<h1 id="section-1">Section 1</h1>+<p>hello<a href="#fn1" class="footnote-ref" id="fnref1"+role="doc-noteref"><sup>1</sup></a></p>+<aside id="footnotes" class="footnotes footnotes-end-of-block"+role="doc-footnote">+<ol>+<li id="fn1"><p>doc footnote<a href="#fnref1" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+</ol>+</aside>+<table style="width:17%;">+<caption>Sample table.<a href="#fn2" class="footnote-ref" id="fnref2"+role="doc-noteref"><sup>2</sup></a></caption>+<colgroup>+<col style="width: 16%" />+</colgroup>+<thead>+<tr class="header">+<th style="text-align: center;">Fruit<a href="#fn3" class="footnote-ref"+id="fnref3" role="doc-noteref"><sup>3</sup></a></th>+</tr>+</thead>+<tbody>+<tr class="odd">+<td style="text-align: center;">Bans<a href="#fn4" class="footnote-ref"+id="fnref4" role="doc-noteref"><sup>4</sup></a></td>+</tr>+</tbody>+</table>+<aside id="footnotes-2" class="footnotes footnotes-end-of-block"+role="doc-footnote">+<ol start="2">+<li id="fn2"><p>caption footnote<a href="#fnref2" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+<li id="fn3"><p>header footnote<a href="#fnref3" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+<li id="fn4"><p>table cell footnote<a href="#fnref4"+class="footnote-back" role="doc-backlink">↩︎</a></p></li>+</ol>+</aside>+<h1 id="section-2">Section 2</h1>+<p>dolly<a href="#fn5" class="footnote-ref" id="fnref5"+role="doc-noteref"><sup>5</sup></a></p>+<aside id="footnotes-3" class="footnotes footnotes-end-of-block"+role="doc-footnote">+<ol start="5">+<li id="fn5"><p>doc footnote<a href="#fnref5" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+</ol>+</aside>+```
+ test/command/8770-document.md view
@@ -0,0 +1,66 @@+```+% pandoc -t html5 --reference-location=document+# Section 1++hello[^1]++: Sample table.[^2]++-----------+ Fruit[^3]+-----------+ Bans[^4]+-----------++# Section 2++dolly[^5]++[^1]: doc footnote+[^2]: caption footnote+[^3]: header footnote+[^4]: table cell footnote+[^5]: doc footnote+^D+<h1 id="section-1">Section 1</h1>+<p>hello<a href="#fn1" class="footnote-ref" id="fnref1"+role="doc-noteref"><sup>1</sup></a></p>+<table style="width:17%;">+<caption>Sample table.<a href="#fn2" class="footnote-ref" id="fnref2"+role="doc-noteref"><sup>2</sup></a></caption>+<colgroup>+<col style="width: 16%" />+</colgroup>+<thead>+<tr class="header">+<th style="text-align: center;">Fruit<a href="#fn3" class="footnote-ref"+id="fnref3" role="doc-noteref"><sup>3</sup></a></th>+</tr>+</thead>+<tbody>+<tr class="odd">+<td style="text-align: center;">Bans<a href="#fn4" class="footnote-ref"+id="fnref4" role="doc-noteref"><sup>4</sup></a></td>+</tr>+</tbody>+</table>+<h1 id="section-2">Section 2</h1>+<p>dolly<a href="#fn5" class="footnote-ref" id="fnref5"+role="doc-noteref"><sup>5</sup></a></p>+<section id="footnotes" class="footnotes footnotes-end-of-document"+role="doc-endnotes">+<hr />+<ol>+<li id="fn1"><p>doc footnote<a href="#fnref1" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+<li id="fn2"><p>caption footnote<a href="#fnref2" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+<li id="fn3"><p>header footnote<a href="#fnref3" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+<li id="fn4"><p>table cell footnote<a href="#fnref4"+class="footnote-back" role="doc-backlink">↩︎</a></p></li>+<li id="fn5"><p>doc footnote<a href="#fnref5" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+</ol>+</section>+```
+ test/command/8770-section.md view
@@ -0,0 +1,72 @@+```+% pandoc -t html5 --reference-location=section+# Section 1++hello[^1]++: Sample table.[^2]++-----------+ Fruit[^3]+-----------+ Bans[^4]+-----------++# Section 2++dolly[^5]++[^1]: doc footnote+[^2]: caption footnote+[^3]: header footnote+[^4]: table cell footnote+[^5]: doc footnote+^D+<h1 id="section-1">Section 1</h1>+<p>hello<a href="#fn1" class="footnote-ref" id="fnref1"+role="doc-noteref"><sup>1</sup></a></p>+<table style="width:17%;">+<caption>Sample table.<a href="#fn2" class="footnote-ref" id="fnref2"+role="doc-noteref"><sup>2</sup></a></caption>+<colgroup>+<col style="width: 16%" />+</colgroup>+<thead>+<tr class="header">+<th style="text-align: center;">Fruit<a href="#fn3" class="footnote-ref"+id="fnref3" role="doc-noteref"><sup>3</sup></a></th>+</tr>+</thead>+<tbody>+<tr class="odd">+<td style="text-align: center;">Bans<a href="#fn4" class="footnote-ref"+id="fnref4" role="doc-noteref"><sup>4</sup></a></td>+</tr>+</tbody>+</table>+<aside id="footnotes" class="footnotes footnotes-end-of-section"+role="doc-footnote">+<hr />+<ol>+<li id="fn1"><p>doc footnote<a href="#fnref1" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+<li id="fn2"><p>caption footnote<a href="#fnref2" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+<li id="fn3"><p>header footnote<a href="#fnref3" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+<li id="fn4"><p>table cell footnote<a href="#fnref4"+class="footnote-back" role="doc-backlink">↩︎</a></p></li>+</ol>+</aside>+<h1 id="section-2">Section 2</h1>+<p>dolly<a href="#fn5" class="footnote-ref" id="fnref5"+role="doc-noteref"><sup>5</sup></a></p>+<aside id="footnotes-2" class="footnotes footnotes-end-of-section"+role="doc-footnote">+<hr />+<ol start="5">+<li id="fn5"><p>doc footnote<a href="#fnref5" class="footnote-back"+role="doc-backlink">↩︎</a></p></li>+</ol>+</aside>+```
test/command/8948.md view
@@ -3,7 +3,7 @@ ![minimal](command/minimal.svg) ![minimal](command/minimal.svg) ^D-<p><svg alt="minimal" viewBox="-.333 -.333 480 150" style="background-color:#ffffff00" xml:space="preserve"><use href="#svg_7868854ffb8f30209cd0" width="100%" height="100%" /></svg> <svg id="svg_7868854ffb8f30209cd0" alt="minimal" viewBox="-.333 -.333 480 150" style="background-color:#ffffff00" xml:space="preserve" width="480" height="150">+<p><svg alt="minimal" viewBox="-.333 -.333 480 150" style="background-color:#ffffff00" xml:space="preserve" width="480" height="150"><use href="#svg_7868854ffb8f30209cd0" width="100%" height="100%" /></svg> <svg id="svg_7868854ffb8f30209cd0" alt="minimal" viewBox="-.333 -.333 480 150" style="background-color:#ffffff00" xml:space="preserve" width="480" height="150">     <path d="M 0 35.5 L 6.5 22.5 L 16 37 L 23 24 L 34.8 43.7 L 42.5 30 L 50.3 47 L 59.7 27.7 L 69 47 L 85 17.7 L 98.3 39 L 113 9.7 L 127.7 42.3 L 136.3 23.7 L 147 44.3 L 158.3 20.3 L 170.3 40.3 L 177.7 25.7 L 189.7 43 L 199.7 21 L 207.7 35 L 219 11 L 233 37 L 240.3 23.7 L 251 43 L 263 18.3 L 272.7 33.3 L 283 10 L 295 32.3 L 301.3 23 L 311.7 37 L 323.7 7.7 L 339.3 39 L 346.3 25.7 L 356.3 42.3 L 369.7 15 L 376.3 25.7 L 384 9 L 393 28.3 L 400.3 19 L 411.7 38.3 L 421 21 L 434.3 43 L 445 25 L 453 36.3 L 464.3 18.3 L 476.2 40.3 L 480 33.5 L 480 215 L 0 215 L 0 35.5 Z" fill="#175720" /> </svg></p> ```@@ -13,7 +13,7 @@ ![minimal](command/minimal.svg) ![minimal](command/minimal.svg){#foo} ^D-<p><svg alt="minimal" viewBox="-.333 -.333 480 150" style="background-color:#ffffff00" xml:space="preserve"><use href="#foo" width="100%" height="100%" /></svg> <svg id="foo" alt="minimal" viewBox="-.333 -.333 480 150" style="background-color:#ffffff00" xml:space="preserve" width="480" height="150">+<p><svg alt="minimal" viewBox="-.333 -.333 480 150" style="background-color:#ffffff00" xml:space="preserve" width="480" height="150"><use href="#foo" width="100%" height="100%" /></svg> <svg id="foo" alt="minimal" viewBox="-.333 -.333 480 150" style="background-color:#ffffff00" xml:space="preserve" width="480" height="150">     <path d="M 0 35.5 L 6.5 22.5 L 16 37 L 23 24 L 34.8 43.7 L 42.5 30 L 50.3 47 L 59.7 27.7 L 69 47 L 85 17.7 L 98.3 39 L 113 9.7 L 127.7 42.3 L 136.3 23.7 L 147 44.3 L 158.3 20.3 L 170.3 40.3 L 177.7 25.7 L 189.7 43 L 199.7 21 L 207.7 35 L 219 11 L 233 37 L 240.3 23.7 L 251 43 L 263 18.3 L 272.7 33.3 L 283 10 L 295 32.3 L 301.3 23 L 311.7 37 L 323.7 7.7 L 339.3 39 L 346.3 25.7 L 356.3 42.3 L 369.7 15 L 376.3 25.7 L 384 9 L 393 28.3 L 400.3 19 L 411.7 38.3 L 421 21 L 434.3 43 L 445 25 L 453 36.3 L 464.3 18.3 L 476.2 40.3 L 480 33.5 L 480 215 L 0 215 L 0 35.5 Z" fill="#175720" /> </svg></p> ```
+ test/command/9218.md view
@@ -0,0 +1,22 @@+# Escape special lines in Org-mode code blocks++````+% pandoc -f markdown -t org+``` org+** Click Application+*** Imports++#+begin_src py+from addict import Dict+#+end_src+```+^D+#+begin_src org+,** Click Application+,*** Imports++,#+begin_src py+from addict import Dict+,#+end_src+#+end_src+````
+ test/command/9346.md view
@@ -0,0 +1,8 @@+```+% pandoc -f markdown -t markdown_strict+pipe_tables+|V1 |V2 |V3 |V4 |V5 |V6 |V7 |V8 |V9 |V10 |V11 |V12 |V13 |V14 |V15 |V16 |V17 |V18 |V19 |V20 |V21 |V22 |V23 |V24 |V25 |V26 |V27 |V28 |V29 |V30 |V31 |V32 |V33 |V34 |V35 |V36 |V37 |V38 |V39 |V40 |V41 |V42 |V43 |V44 |V45 |V46 |V47 |V48 |V49 |V50 |V51 |V52 |V53 |V54 |V55 |V56 |V57 |V58 |V59 |V60 |V61 |V62 |V63 |V64 |V65 |V66 |V67 |V68 |V69 |V70 |V71 |V72 |+|:--|:--|:--|:--|:--|:--|:--|:--|:--|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|:---|+^D+| V1  | V2  | V3  | V4  | V5  | V6  | V7  | V8  | V9  | V10 | V11 | V12 | V13 | V14 | V15 | V16 | V17 | V18 | V19 | V20 | V21 | V22 | V23 | V24 | V25 | V26 | V27 | V28 | V29 | V30 | V31 | V32 | V33 | V34 | V35 | V36 | V37 | V38 | V39 | V40 | V41 | V42 | V43 | V44 | V45 | V46 | V47 | V48 | V49 | V50 | V51 | V52 | V53 | V54 | V55 | V56 | V57 | V58 | V59 | V60 | V61 | V62 | V63 | V64 | V65 | V66 | V67 | V68 | V69 | V70 | V71 | V72 |+|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|:-|+```
+ test/command/9350.md view
@@ -0,0 +1,12 @@+```+% pandoc -f html -t latex+<table><tbody><tr></tr></tbody></table>+^D+\begin{longtable}[]{@{}l@{}}+\toprule\noalign{}+\endhead+\bottomrule\noalign{}+\endlastfoot+ \\+\end{longtable}+```
+ test/command/9371.md view
@@ -0,0 +1,30 @@+```+% pandoc -t latex+"'In this case (A),++I get a kern to separate the quotes,' he said."++"'Also in this case (B), I get a kern,' he added."++"'But in this case (C), there is no kern,'++he continued."++"He concluded,++'Nor in this case (D) is there a kern.'"+^D+``\,'In this case (A),++I get a kern to separate the quotes,' he said.''++``\,`Also in this case (B), I get a kern,' he added.''++``\,`But in this case (C), there is no kern,'++he continued.''++``He concluded,++`Nor in this case (D) is there a kern.'\,''+```
+ test/command/9386.md view
@@ -0,0 +1,17 @@+```+% pandoc -t typst --wrap=preserve+A string of text that is long enough that after 73 chars that includes a+/ slash creates a newline+^D+A string of text that is long enough that after 73 chars that includes a+\/ slash creates a newline+```++```+% pandoc -t typst --wrap=preserve+A string of text that is long enough that after 73 chars that includes+a / slash creates a newline+^D+A string of text that is long enough that after 73 chars that includes+a / slash creates a newline+```
+ test/command/9387.md view
@@ -0,0 +1,23 @@+```+% pandoc -f html -t typst+<div id="my label">+<p>test</p>+</div>+<p>See <a href="#my label">my label</a>.</p>+^D+#block[+test++] #label("my label")+See #link(label("my label"))[my label];.++```++```+% pandoc -f latex -t typst+\cite{10.1117/12.695309}+\cite{foo}+^D+#cite(label("10.1117/12.695309")) @foo++```
+ test/command/9388.md view
@@ -0,0 +1,21 @@+```+% pandoc -f latex -t native+\begin{figure}+\centering+\includegraphics[width=0.5\linewidth,height=0.5\textheight]{figures/placeholder}+\caption{Example figure}+\end{figure}+^D+[ Figure+    ( "" , [] , [] )+    (Caption+       Nothing [ Plain [ Str "Example" , Space , Str "figure" ] ])+    [ Plain+        [ Image+            ( "" , [] , [ ( "width" , "50%" ) , ( "height" , "50%" ) ] )+            []+            ( "figures/placeholder" , "" )+        ]+    ]+]+```
+ test/command/9420.md view
@@ -0,0 +1,13 @@+```+% pandoc --embed-resources+![](command/9420.svg)+^D+<p><svg id="svg_e1815ef374a63cf552e4" width="504pt" height="360pt" viewBox="0 0 504 360">+<defs>+<clipPath id="svg_e1815ef374a63cf552e4_clip1-c3ce354c">+  <path />+</clipPath>+</defs>+<g clip-path="url(#svg_e1815ef374a63cf552e4_clip1-c3ce354c)" clip-rule="nonzero"></g>+</svg></p>+```
+ test/command/9420.svg view
@@ -0,0 +1,9 @@+<?xml version="1.0" encoding="UTF-8"?>+<svg xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" width="504pt" height="360pt" viewBox="0 0 504 360" version="1.1">+<defs>+<clipPath id="clip1-c3ce354c">+  <path/>+</clipPath>+</defs>+<g clip-path="url(#clip1-c3ce354c)" clip-rule="nonzero"></g>+</svg>
+ test/command/9445.md view
@@ -0,0 +1,6 @@+```+% pandoc -f man -t markdown+\fB--c \fI<file>+^D+**\--c** *\<file\>*+```
+ test/command/9452.md view
@@ -0,0 +1,19 @@+```+% pandoc -t typst+@something2024 says blah.++Here is a sentence [@something2024].++With supplement [@something2024, p. 3].++And just the year [-@something2024].+^D+#cite(<something2024>, form: "prose") says blah.++Here is a sentence @something2024.++With supplement @something2024[p.~3];.++And just the year #cite(<something2024>, form: "year");.++```
test/command/citeproc-7a.md view
@@ -26,11 +26,11 @@  Test.[^4] -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-test .csl-entry} Doe, John. "Test," n.d. :::-:::+::::  [^1]: John Doe, "Test," n.d., 12.
test/command/pandoc-citeproc-118.md view
@@ -19,10 +19,10 @@ ^D (Hitchcock 1959) is a spy thriller film. -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-nbn .csl-entry} Hitchcock, Alfred, dir. 1959. *North by Northwest*. USA: Metro-Goldwyn-Mayer. :::-:::+:::: ```
test/command/pandoc-citeproc-119.md view
@@ -14,7 +14,7 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0" line-spacing="2"}+:::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0" line-spacing="2"} ::: {#ref-averroes/hercz .csl-entry} Averroes. (1869). *Drei Abhandlungen über die Conjunction des separaten Intellects mit dem Menschen: Von Averroes (Vater und Sohn), aus dem@@ -34,5 +34,5 @@ (K. P. Bland, Ed. & Trans.). New York: Jewish Theological Seminary of America. :::-:::+:::::: ```
test/command/pandoc-citeproc-13.md view
@@ -19,11 +19,11 @@ ^D Foo.[^1] -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item1 .csl-entry} Author, Ann. "Title." *Journal*, 2011. :::-:::+::::  [^1]: Author, "Title." ```
test/command/pandoc-citeproc-136.md view
@@ -15,9 +15,9 @@ ^D *Stanze in lode della donna brutta* (1547) is an anoynymous work. -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-stanze .csl-entry} *Stanze in lode della donna brutta*. 1547. Florence. :::-:::+:::: ```
test/command/pandoc-citeproc-14.md view
@@ -56,7 +56,7 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-CTv1c2 .csl-entry} Pelikan, Jaroslav. 1971a. "Chapter Two." In *The Christian Tradition: A History of the Development of Doctrine*, 1:34--56. Chicago: University@@ -73,5 +73,5 @@ *The Christian Tradition: A History of the Development of Doctrine*. Vol. 1. Chicago: University of Chicago Press. :::-:::+:::::: ```
test/command/pandoc-citeproc-152.md view
@@ -49,7 +49,7 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0" line-spacing="2"}+::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0" line-spacing="2"} ::: {#ref-Feminism2011ces .csl-entry} Communities. (2011, August 14). In *Geek Feminism*. Retrieved from <http://geekfeminism.wikia.com/wiki/Category:Communities>@@ -59,5 +59,5 @@ Geek Feminism. (2013, April 10). *Geek Feminism*. Retrieved April 10, 2013, from <http://geekfeminism.wikia.com/wiki/Geek_Feminism> :::-:::+::::: ```
test/command/pandoc-citeproc-160.md view
@@ -36,9 +36,9 @@ > > \[Jane11\] Jane Doe. A book. 2011. -::: {#refs .references .csl-bib-body}+:::: {#refs .references .csl-bib-body} ::: {#ref-item1 .csl-entry} \[Jane11\] Jane Doe. A book. 2011. :::-:::+:::: ```
test/command/pandoc-citeproc-175.md view
@@ -35,9 +35,9 @@  > Doe, Jane. 2011. "A Title." *A Magazine*, January--February. -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item1 .csl-entry} Doe, Jane. 2011. "A Title." *A Magazine*, January--February 2011. :::-:::+:::: ```
test/command/pandoc-citeproc-197.md view
@@ -21,11 +21,11 @@ ^D This is a test.[^1] -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-test .csl-entry} Abelard, Peter, ed. *Test*. Oxford: Clarendon Press, 1989. :::-:::+::::  [^1]: Peter Abelard, ed., *Test* (Oxford: Clarendon Press, 1989). ```
test/command/pandoc-citeproc-213.md view
@@ -25,9 +25,9 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent}+:::: {#refs .references .csl-bib-body .hanging-indent} ::: {#ref-doe1 .csl-entry} Doe, A. (1999). *Title*. The collection title. The publisher. 789 pp. :::-:::+:::: ```
test/command/pandoc-citeproc-25.md view
@@ -22,9 +22,9 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item1 .csl-entry} Author, Al. 1998. "Foo Bar Baz: Bazbaz Foo." :::-:::+:::: ```
test/command/pandoc-citeproc-250.md view
@@ -13,9 +13,9 @@ ^D ([Doe, n.d.](#ref-doe)) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-doe .csl-entry} Doe. n.d. "Title." :::-:::+:::: ```
test/command/pandoc-citeproc-27.md view
@@ -29,10 +29,10 @@  Here is some text that needs a citation (*1*). -::: {#refs .references .csl-bib-body}+:::: {#refs .references .csl-bib-body} ::: {#ref-AuthorOne2014 .csl-entry} [1. ]{.csl-left-margin}[J. AuthorOne, J. AuthorTwo, *Some Journal*, in press.]{.csl-right-inline} :::-:::+:::: ```
test/command/pandoc-citeproc-292.md view
@@ -27,7 +27,7 @@ ^D (Roe, 2007; Zoe, 2009; see for comparison Doe, 2007: 3) -::: {#refs .references .csl-bib-body .hanging-indent}+:::::: {#refs .references .csl-bib-body .hanging-indent} ::: {#ref-doe .csl-entry} Doe (2007). :::@@ -39,5 +39,5 @@ ::: {#ref-zoe .csl-entry} Zoe (2009). :::-:::+:::::: ```
test/command/pandoc-citeproc-301.md view
@@ -13,7 +13,7 @@ "Essays Presented to N.R. Ker (On Art)" (n.d.); "*Test:* An Experiment: An Abridgement" (n.d.) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-test .csl-entry} "Essays Presented to N.R. Ker (On Art)." n.d. :::@@ -21,5 +21,5 @@ ::: {#ref-test2 .csl-entry} "*Test:* An Experiment: An Abridgement." n.d. :::-:::+::::: ```
test/command/pandoc-citeproc-307.md view
@@ -22,10 +22,10 @@ ^D Bonjour(Bazin 1954) ! -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-bazin_cybernetique_1954 .csl-entry} Bazin, André. 1954. « La Cybernétique d'André Cayatte ». *Cahiers du cinéma*, nᵒ 36 (juin): 22‑27. :::-:::+:::: ```
test/command/pandoc-citeproc-31.md view
@@ -27,7 +27,7 @@ ^D Foo.[^1] Bar.[^2] Baz.[^3] -::: {#refs .references .csl-bib-body}+::::: {#refs .references .csl-bib-body} ::: {#ref-item1 .csl-entry} Olson HA, '[Codes, Costs, and Critiques: The Organization of Information in *Library Quarterly*, 1931--2004](https://doi.org/10.1086/504343)'@@ -37,7 +37,7 @@ ::: {#ref-item2 .csl-entry} 'Second Title' :::-:::+:::::  [^1]: Hope A Olson, 'Codes, Costs, and Critiques: The Organization of     Information in *Library Quarterly*, 1931--2004' (2006) 76 *Library
test/command/pandoc-citeproc-312.md view
@@ -122,7 +122,7 @@ ---  ^D-::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0" line-spacing="2"}+:::::::::::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0" line-spacing="2"} ::: {#ref-Y .csl-entry} NN. (1950). Date: Year. :::@@ -167,5 +167,5 @@ ::: {#ref-YS/YS_same .csl-entry} NN. (1966, Summer--Winter). Date range: Year+season, same year. :::-:::+:::::::::::::: ```
test/command/pandoc-citeproc-320.md view
@@ -138,7 +138,7 @@ Foo (Sainte-Beuve, n.d.; Saint-Gaudens, n.d.; Saint-Saëns, n.d.; San Martin, n.d.; St. Denis, n.d.; St. Laurent, n.d.). -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0" line-spacing="2"}+::::::::::::::::::::::::::::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0" line-spacing="2"} ::: {#ref-itemA2 .csl-entry} ben Yaakov, D. (n.d.). :::@@ -250,5 +250,5 @@ ::: {#ref-itemA14 .csl-entry} Villa-Lobos, J. (n.d.). :::-:::+::::::::::::::::::::::::::::::: ```
test/command/pandoc-citeproc-320a.md view
@@ -51,7 +51,7 @@ Foo (al-ʾUdhrī, n.d.; al-ʿUdhrī, n.d.; al-\'Udhrī, n.d.; al-'Udhrī, n.d.a, n.d.b; Uch, n.d.; Uebel, n.d.; Zzz, n.d.). -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::::::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item6 .csl-entry} Uch, Ann. n.d. :::@@ -83,5 +83,5 @@ ::: {#ref-item8 .csl-entry} Zzz, Zoe. n.d. :::-:::+::::::::::: ```
test/command/pandoc-citeproc-322.md view
@@ -23,12 +23,12 @@ ^D Foo.[^1] -::: {#refs .references .csl-bib-body}+:::: {#refs .references .csl-bib-body} ::: {#ref-timmory__justice_1950 .csl-entry} François [Timmory]{.smallcaps}, « *Justice est faite* : soyons justes », *L'Écran français*, 1950, nᵒ 272, p. 12. :::-:::+::::  [^1]: François [Timmory]{.smallcaps}, « *Justice est faite* : soyons     justes », *L'Écran français*, 1950, nᵒ 272, p. 12.
test/command/pandoc-citeproc-325.md view
@@ -18,7 +18,7 @@ ^D (Smith, n.d.a, n.d.b) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item1 .csl-entry} Smith, John. n.d.a. :::@@ -26,5 +26,5 @@ ::: {#ref-item2 .csl-entry} ---------. n.d.b. :::-:::+::::: ```
test/command/pandoc-citeproc-327.md view
@@ -41,11 +41,11 @@ ^D I referenced something here^\[1\]^ -::: {#refs .references .csl-bib-body entry-spacing="0"}+:::: {#refs .references .csl-bib-body entry-spacing="0"} ::: {#ref-LiLiaoDongWanHaiYuDiQiDongWuCiJiShengChanLiYanJiuJiShengJingGuaYiXingPingJie2017 .csl-entry} [\[1\] ]{.csl-left-margin}[李轶平, 于旭光, 孙明, 等. [辽东湾海域底栖动物次级生产力研究及生境适宜性评价](http://kns.cnki.net/kns/detail/detail.aspx?QueryID=4&CurRec=4&recid=&FileName=CHAN201706006&DbName=CJFDLAST2018&DbCode=CJFQ&yx=Y&pr=&URLID=21.1110.S.20171129.1725.006)\[J\]. 水产科学, 2017(6): 728--734.]{.csl-right-inline} :::-:::+:::: ```
test/command/pandoc-citeproc-338.md view
@@ -24,11 +24,11 @@ ---  ^D-::: {#refs .references .csl-bib-body .hanging-indent}+:::: {#refs .references .csl-bib-body .hanging-indent} ::: {#ref-item-1 .csl-entry} [Wolfinger, Christine]{.smallcaps}: *Keine Angst vor Linux, Unix: ein Lehrbuch für Linux- und Unix-Anwender*. 11., vollst. überarb. Aufl. Aufl. Berlin \[u.a.\] : Springer Vieweg, 2013 --- ISBN 978-3-642-32078-1 :::-:::+:::: ```
test/command/pandoc-citeproc-351.md view
@@ -17,11 +17,11 @@ ^D Friedrich Nietzsche (ed.)[^1] -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-Nie72 .csl-entry} Nietzsche, Friedrich (ed.), *Die geburt*, 1872. :::-:::+::::  [^1]: *Die geburt*, 1872. ```
test/command/pandoc-citeproc-360.md view
@@ -23,12 +23,12 @@ ^D [^1] -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-lestrange2017 .csl-entry} L'Estrange, Michael, and Stephen Merchant. "2017 Independent Intelligence Review," July 18, 2017. :::-:::+::::  [^1]: Michael L'Estrange and Stephen Merchant, "2017 Independent     Intelligence Review," July 18, 2017.
test/command/pandoc-citeproc-365.md view
@@ -27,12 +27,12 @@ ^D Foo.[^1] -::: {#refs .references .csl-bib-body}+:::: {#refs .references .csl-bib-body} ::: {#ref-legras_michel_2010 .csl-entry} [Le Gras]{.smallcaps} Gwénaëlle, *Michel Simon : l'art de la disgrâce*, Paris, Scope (coll. « Jeux d'acteurs »), 2010, 128 p. :::-:::+::::  [^1]: Gwénaëlle Le Gras, *Michel Simon : l'art de la disgrâce*, Paris,     Scope, 2010, 128 p.
test/command/pandoc-citeproc-371.md view
@@ -28,7 +28,7 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item2 .csl-entry} Doe, Jane. 2018. *Title Two*. :::@@ -36,5 +36,5 @@ ::: {#ref-item1 .csl-entry} ---------. In press. *Title One*. :::-:::+::::: ```
test/command/pandoc-citeproc-38.md view
@@ -21,9 +21,9 @@ ^D Doe, Doe, and Roe (2007) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-a .csl-entry} Doe, Ann, Ben Doe, and Ron Roe. 2007. "Title." :::-:::+:::: ```
test/command/pandoc-citeproc-386.md view
@@ -26,11 +26,11 @@ ^D ^\[1\]^ -::: {#refs .references .csl-bib-body entry-spacing="0" line-spacing="2"}+:::: {#refs .references .csl-bib-body entry-spacing="0" line-spacing="2"} ::: {#ref-ding_metallic_2012 .csl-entry} [\[1\] ]{.csl-left-margin}[[K. Ding, C. Z. Ning, *Light Sci. Appl.* **2012**, *1*, e20](https://doi.org/10.1038/lsa.2012.20).]{.csl-right-inline} :::-:::+:::: ```
test/command/pandoc-citeproc-392.md view
@@ -17,7 +17,7 @@ ^D (1); (2) -::: {#refs .references .csl-bib-body}+::::: {#refs .references .csl-bib-body} ::: {#ref-james .csl-entry} [1. ]{.csl-left-margin}[James MRCEL. ]{.csl-right-inline} :::@@ -25,5 +25,5 @@ ::: {#ref-macfarlane .csl-entry} [2. ]{.csl-left-margin}[MacFarlane JG. ]{.csl-right-inline} :::-:::+::::: ```
test/command/pandoc-citeproc-401.md view
@@ -43,7 +43,7 @@ ^D Haslanger (\[2003\] 2012, \[2000\] 2012) says... -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-haslanger2012FeminismMetaphysicsNegotiating .csl-entry} Haslanger, Sally. (2000) 2012. "Feminism in Metaphysics: Negotiating the Natural." In *Resisting Reality: Social Construction and Social@@ -55,5 +55,5 @@ In *Resisting Reality: Social Construction and Social Critique*, 113--38. Oxford: Oxford University Press. :::-:::+::::: ```
test/command/pandoc-citeproc-408.md view
@@ -27,7 +27,7 @@ ^D (Smith and Smith 2019; Smith 2019) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-smith1 .csl-entry} Smith, Mary. 2019. "Foo." :::@@ -35,5 +35,5 @@ ::: {#ref-smithsmith .csl-entry} Smith, Mary, and John Smith. 2019. "Foo Bar." :::-:::+::::: ```
test/command/pandoc-citeproc-416.md view
@@ -44,7 +44,7 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item2 .csl-entry} Doe, J. 2007. "The Title," December 12--13, 2007. :::@@ -56,5 +56,5 @@ ::: {#ref-item1 .csl-entry} ---------. 2010. "The Title," December 13, 2010. :::-:::+:::::: ```
test/command/pandoc-citeproc-47.md view
@@ -92,7 +92,7 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-doe .csl-entry} Doe, A. 2000a. *Title*. :::@@ -108,5 +108,5 @@ ::: {#ref-doepoe .csl-entry} Doe, A., and A. Poe. 2000. *Title*. :::-:::+::::::: ```
test/command/pandoc-citeproc-51.md view
@@ -33,7 +33,7 @@ ^D Doe (1987--1988); Roe (1987) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item1 .csl-entry} Doe, John. 1987--1988. "The Title." *Journal of Something* 3: 12--34. :::@@ -41,5 +41,5 @@ ::: {#ref-item2 .csl-entry} Roe, Ron. 1987. "The Title." *Journal of Something* 4: 12--34. :::-:::+::::: ```
test/command/pandoc-citeproc-53.md view
@@ -26,7 +26,7 @@ ^D Doe[^1] Doe[^2] Roe[^3] Roe[^4] Doe[^5] Doe[^6] Roe[^7] Roe[^8] -::: {#refs .references .csl-bib-body}+::::: {#refs .references .csl-bib-body} ::: {#ref-a .csl-entry} [[Doe J.]{.smallcaps} ]{.csl-block} [2000, *Work A*,.]{.csl-left-margin}@@ -36,7 +36,7 @@ [[Roe J.]{.smallcaps} ]{.csl-block} [1990, *Work B*,.]{.csl-left-margin} :::-:::+:::::  [^1]: 2000
test/command/pandoc-citeproc-57.md view
@@ -27,11 +27,11 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-Faraday-forthcoming .csl-entry} Faraday, Carry. Forthcoming. "Protean Photography." In *Seven Trips Beyond the Asteroid Belt*, edited by James Oring. Cape Canaveral, FL: Launch Press. :::-:::+:::: ```
test/command/pandoc-citeproc-58.md view
@@ -24,9 +24,9 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-stanze .csl-entry} *Stanze in lode della donna brutta*. 1547. Florence. :::-:::+:::: ```
test/command/pandoc-citeproc-61.md view
@@ -55,7 +55,7 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent}+::::: {#refs .references .csl-bib-body .hanging-indent} ::: {#ref-doe .csl-entry} Doe, John, *Title* (Publisher, 1985) :::@@ -63,7 +63,7 @@ ::: {#ref-roe .csl-entry} Roe, Rob, *Title* (Publisher, 1985) :::-:::+:::::  [^1]: John Doe, *Title* (Publisher, 1985), VIII, 89.
test/command/pandoc-citeproc-64.md view
@@ -7,7 +7,7 @@ ---  ^D-::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item1 .csl-entry} Doe, John. 2005. *First Book*. Cambridge: Cambridge University Press. :::@@ -20,5 +20,5 @@ Doe, John, and Jenny Roe. 2007. "Why Water Is Wet." In *Third Book*, edited by Sam Smith. Oxford: Oxford University Press. :::-:::+:::::: ```
test/command/pandoc-citeproc-65.md view
@@ -28,11 +28,11 @@ ^D (Stotz 1996--2004) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-stotz:1996handbuch .csl-entry} Stotz, Peter. 1996--2004. *Handbuch zur lateinischen Sprache des Mittelalters*. 5 vols. Handbuch der Altertumswissenschaft 2.5. Munich: Beck. :::-:::+:::: ```
test/command/pandoc-citeproc-68.md view
@@ -36,13 +36,13 @@ prose commentary[^2] \... and finally a note starting with a citation.[^3] -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-goering:1992william .csl-entry} Goering, Joseph. *William de Montibus (c. 1140--1213): The Schools and the Literature of Pastoral Care*. Studies and Texts 108. Toronto: Pontifical Institute of Mediaeval Studies, 1992. :::-:::+::::  [^1]: The text of fol. 9r is printed in Joseph Goering, *William de     Montibus (c. 1140--1213): The Schools and the Literature of Pastoral
test/command/pandoc-citeproc-7.md view
@@ -23,9 +23,9 @@ ^D Author (2011) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item1 .csl-entry} Author, Ann. 2011. "Title." *Journal*, September 24--26, 2011. :::-:::+:::: ```
test/command/pandoc-citeproc-70.md view
@@ -56,7 +56,7 @@ ^D (Thorndike 1955; Dinkova-Bruun 2009) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-bruun:2009samuel .csl-entry} Dinkova-Bruun, Greti. 2009. "Samuel Presbyter and the Glosses to His Versification of Psalm 1: An Anti-Church Invective?" In *Florilegium@@ -69,5 +69,5 @@ ::: {#ref-thorndike:1955unde .csl-entry} Thorndike, Lynn. 1955. "Unde versus." *Traditio* 11: 163--93. :::-:::+::::: ```
test/command/pandoc-citeproc-75.md view
@@ -59,9 +59,9 @@  (Doe, 2006, no. 6 and 7) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0" line-spacing="2"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0" line-spacing="2"} ::: {#ref-test .csl-entry} Doe, J. (2006). Test, *81*. :::-:::+:::: ```
test/command/pandoc-citeproc-76.md view
@@ -44,7 +44,7 @@ ^D Author (1998c), Author (1998d), Author (1998a), Author (1998b) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item3 .csl-entry} Author, Al. 1998a. "Foo Bar Baz: A Bazbaz Bar Foo." :::@@ -60,5 +60,5 @@ ::: {#ref-item2 .csl-entry} ---------. 1998d. "Foo Bar Baz: The Bazbaz Bar Foo." :::-:::+::::::: ```
test/command/pandoc-citeproc-77.md view
@@ -39,7 +39,7 @@ ^D [^1] -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item4 .csl-entry} Bennett, Frank G., Jr., n.d. :::@@ -59,7 +59,7 @@ ::: {#ref-item3 .csl-entry} Humboldt, Alexander von, n.d. :::-:::+::::::::  [^1]: John Doe III, n.d.; Vincent van Gogh, n.d.; Alexander von     Humboldt, n.d.; Frank G. Bennett, Jr., n.d.; Ezekiel Dumboldt III,
test/command/pandoc-citeproc-82.md view
@@ -28,12 +28,12 @@  Some text.[^1] -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-OCLC_i1099 .csl-entry} OCLC. "WorldCat." Accessed September 19, 2014. <https://www.worldcat.org/>. :::-:::+::::  [^1]: Comment regarding text, supported by citation (OCLC, "WorldCat"). ```
test/command/pandoc-citeproc-87.md view
@@ -122,7 +122,7 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item2a .csl-entry} Doe, John. 2006a. "Title." The Web Site. October--November 2006. <http://www.example.com>.@@ -152,5 +152,5 @@ ---------. 2006--2007. "Title." The Web Site. December 31, 2006--January 1, 2007. <http://www.example.com>. :::-:::+::::::::: ```
test/command/pandoc-citeproc-chicago-author-date.md view
@@ -83,7 +83,7 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item1 .csl-entry} Doe, John. 2005. *First Book*. Cambridge: Cambridge University Press. :::@@ -96,7 +96,7 @@ Doe, John, and Jenny Roe. 2007. "Why Water Is Wet." In *Third Book*, edited by Sam Smith. Oxford: Oxford University Press. :::-:::+::::::  [^1]: Doe and Roe ([2007, 12](#ref-пункт3)) and a citation without     locators ([Doe and Roe 2007](#ref-пункт3)).
test/command/pandoc-citeproc-chicago-fullnote-bibliography.md view
@@ -81,7 +81,7 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item2 .csl-entry} Doe, John. "Article." *Journal of Generic Studies* 6 (2006): 33--34. :::@@ -94,7 +94,7 @@ Doe, John, and Jenny Roe. "Why Water Is Wet." In *Third Book*, edited by Sam Smith. Oxford: Oxford University Press, 2007. :::-:::+::::::  [^1]: [**Nonexistent?**](#ref-nonexistent)
test/command/pandoc-citeproc-ieee.md view
@@ -84,7 +84,7 @@  # References {#references .unnumbered} -::: {#refs .references .csl-bib-body entry-spacing="0"}+:::::: {#refs .references .csl-bib-body entry-spacing="0"} ::: {#ref-item1 .csl-entry} [\[1\] ]{.csl-left-margin}[J. Doe, *First book*. Cambridge: Cambridge University Press, 2005.]{.csl-right-inline}@@ -100,7 +100,7 @@ *Third book*, S. Smith, Ed. Oxford: Oxford University Press, 2007.]{.csl-right-inline} :::-:::+::::::  [^1]: [\[3, p. 12\]](#ref-пункт3) and a citation without locators     [\[3\]](#ref-пункт3).
test/command/pandoc-citeproc-no-author.md view
@@ -45,7 +45,7 @@ *Magazine* (2012a, 3), *Magazine* (2012b), *Magazine* (2012c), *Magazine* (2012d), *Newspaper* (2012a), *Newspaper* (2012b) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+::::::::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item1 .csl-entry} *Magazine*. 2012a. "Title A," 2012. :::@@ -69,5 +69,5 @@ ::: {#ref-item6 .csl-entry} ---------. 2012b. "Title F," 2012. :::-:::+::::::::: ```
test/command/pandoc-citeproc-number-of-volumes.md view
@@ -21,9 +21,9 @@ ^D Author (2013) -::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"}+:::: {#refs .references .csl-bib-body .hanging-indent entry-spacing="0"} ::: {#ref-item1 .csl-entry} Author, Al. 2013. *Title*. 2 vols. Location: Publisher. :::-:::+:::: ```
test/command/refs.md view
@@ -28,7 +28,7 @@     , Link         ( ""         , []-        , [ ( "reference-type" , "ref" )+        , [ ( "reference-type" , "ref+label" )           , ( "reference" , "fig:1" )           ]         )@@ -48,7 +48,7 @@     , Link         ( ""         , []-        , [ ( "reference-type" , "ref+page" )+        , [ ( "reference-type" , "ref" )           , ( "reference" , "fig:1" )           ]         )@@ -66,7 +66,7 @@     [ Link         ( ""         , []-        , [ ( "reference-type" , "autoref" )+        , [ ( "reference-type" , "ref+label" )           , ( "reference" , "fig:flowchart" )           ]         )
+ test/djot-reader.djot view
@@ -0,0 +1,749 @@+# Pandoc Test Suite++John MacFarlane+Anonymous++July 17, 2006++This is a set of tests for pandoc. Most of them are adapted from John Gruber's+markdown test suite.++* * * *++{#headers}+# Headers++{#level-2-with-an-embedded-link}+## Level 2 with an [embedded link](/url)++{#level-3-with-emphasis}+### Level 3 with _emphasis_++{#level-4}+#### Level 4++{#level-5}+##### Level 5++{#level-1}+# Level 1++{#level-2-with-emphasis}+## Level 2 with _emphasis_++{#level-3}+### Level 3++with no blank line++{#level-2}+## Level 2++with no blank line++* * * *++{#paragraphs}+# Paragraphs++Here's a regular paragraph.++In Markdown 1.0.0 and earlier. Version 8. This line turns into a list item.+Because a hard-wrapped line in the middle of a paragraph looked like a list+item.++Here's one with a bullet. \* criminey.++There should be a hard line break\+here.++* * * *++{#block-quotes}+# Block Quotes++E-mail style:++> This is a block quote. It is pretty short.++> Code in a block quote:+>+> ```+> sub status {+>     print "working";+> }+> ```+>+> A list:+>+> 1. item one+> 2. item two+>+> Nested block quotes:+>+> > nested+>+> > nested++This should not be a block quote: 2 \> 1.++And a following paragraph.++* * * *++{#code-blocks}+# Code Blocks++Code:++```+---- (should be four hyphens)++sub status {+    print "working";+}++this code block is indented by one tab+```++And:++```+    this code block is indented by two tabs++These should not be escaped:  \$ \\ \> \[ \{+```++* * * *++{#lists}+# Lists++{#unordered}+## Unordered++Asterisks tight:++- asterisk 1+- asterisk 2+- asterisk 3++Asterisks loose:++- asterisk 1++- asterisk 2++- asterisk 3++Pluses tight:++- Plus 1+- Plus 2+- Plus 3++Pluses loose:++- Plus 1++- Plus 2++- Plus 3++Minuses tight:++- Minus 1+- Minus 2+- Minus 3++Minuses loose:++- Minus 1++- Minus 2++- Minus 3++{#ordered}+## Ordered++Tight:++1. First+2. Second+3. Third++and:++1. One+2. Two+3. Three++Loose using tabs:++1. First++2. Second++3. Third++and using spaces:++1. One++2. Two++3. Three++Multiple paragraphs:++1. Item 1, graf one.++   Item 1. graf two. The quick brown fox jumped over the lazy dog's back.++2. Item 2.++3. Item 3.++{#nested}+## Nested++- Tab++  - Tab++    - Tab++Here's another:++1. First+2. Second:++   - Fee+   - Fie+   - Foe+3. Third++Same thing but with paragraphs:++1. First++2. Second:++   - Fee+   - Fie+   - Foe++3. Third++{#tabs-and-spaces}+## Tabs and spaces++- this is a list item indented with tabs++- this is a list item indented with spaces++  - this is an example list item indented with tabs++  - this is an example list item indented with spaces++{#fancy-list-markers}+## Fancy list markers++(2) begins with 2++(3) and now 3++    with a continuation++    iv. sublist with roman numerals, starting with 4+    v. more items++       (A) a subsublist+       (B) a subsublist++Nesting:++A. Upper Alpha++   I. Upper Roman.++      (6) Decimal start with 6++          c) Lower alpha with paren++Autonumbering:++1. Autonumber.+2. More.++   1. Nested.++Should not be a list item:++M.A. 2007++B. Williams++* * * *++{#definition-lists}+# Definition Lists++Tight using spaces:++: apple++  red fruit+: orange++  orange fruit+: banana++  yellow fruit++Tight using tabs:++: apple++  red fruit+: orange++  orange fruit+: banana++  yellow fruit++Loose:++: apple++  red fruit++: orange++  orange fruit++: banana++  yellow fruit++Multiple blocks with italics:++: _apple_++  red fruit++  contains seeds, crisp, pleasant to taste++: _orange_++  orange fruit++  ```+  { orange code block }+  ```++  > orange block quote++Multiple definitions, tight:++: apple++  red fruit++  computer+: orange++  orange fruit++  bank++Multiple definitions, loose:++: apple++  red fruit++  computer++: orange++  orange fruit++  bank++Blank line after term, indented marker, alternate markers:++: apple++  red fruit++  computer++: orange++  orange fruit++  1. sublist+  2. sublist++{#html-blocks}+# HTML Blocks++Simple block on one line:++:::+foo++:::++And nested without indentation:++::::::+::::+:::+foo++:::++::::++:::+bar++:::++::::::++Interpreted markdown in a table:++This is _emphasized_++And this is *strong*++Here's a simple block:++:::+foo++:::++This should be a code block, though:++```+<div>+    foo+</div>+```++As should this:++```+<div>foo</div>+```++Now, nested:++:::::+::::+:::+foo++:::++::::++:::::++This should just be an HTML comment:++Multiline:++Code block:++```+<!-- Comment -->+```++Just plain comment, with trailing spaces on the line:++Code:++```+<hr />+```++Hr's:++* * * *++{#inline-markup}+# Inline Markup++This is _emphasized_, and so _is this_.++This is *strong*, and so *is this*.++An _[emphasized link](/url)_.++*_This is strong and em._*++So is *_this_* word.++*_This is strong and em._*++So is *_this_* word.++This is code: `>`, `$`, `\`, `\$`, `<html>`.++{-This is _strikeout_.-}++Superscripts: a^bc^d a^_hello_^ a^hello there^.++Subscripts: H~2~O, H~23~O, H~many of them~O.++These should not be superscripts or subscripts, because of the unescaped spaces:+a\^b c\^d, a\~b c\~d.++* * * *++{#smart-quotes-ellipses-dashes}+# Smart quotes, ellipses, dashes++"Hello," said the spider. "'Shelob' is my name."++'A', 'B', and 'C' are letters.++'Oak,' 'elm,' and 'beech' are names of trees. So is 'pine.'++'He said, "I want to go."' Were you alive in the 70's?++Here is some quoted '`code`' and a "[quoted+link](http://example.com/?foo=1&bar=2)".++Some dashes: one---two --- three---four --- five.++Dashes between numbers: 5--7, 255--66, 1987--1999.++Ellipses...and...and....++* * * *++{#latex}+# LaTeX++- +- $`2+2=4`+- $`x \in y`+- $`\alpha \wedge \omega`+- $`223`+- $`p`-Tree+- Here's some display math:+  $$`\frac{d}{dx}f(x)=\lim_{h\to 0}\frac{f(x+h)-f(x)}{h}`+- Here's one that has a line break in it: $`\alpha + \omega \times x^2`.++These shouldn't be math:++- To get the famous equation, write `$e = mc^2$`.+- $22,000 is a _lot_ of money. So is $34,000. (It worked if "lot" is+  emphasized.)+- Shoes ($20) and socks ($5).+- Escaped `$`\: $73 _this should be emphasized_ 23$.++Here's a LaTeX table:++* * * *++{#special-characters}+# Special Characters++Here is some unicode:++- I hat: Î+- o umlaut: ö+- section: §+- set membership: ∈+- copyright: ©++AT&T has an ampersand in their name.++AT&T is another way to write it.++This & that.++4 \< 5.++6 \> 5.++Backslash: \\++Backtick: \`++Asterisk: \*++Underscore: \_++Left brace: \{++Right brace: \}++Left bracket: \[++Right bracket: \]++Left paren: (++Right paren: )++Greater-than: \>++Hash: #++Period: .++Bang: \!++Plus: +++Minus: -++* * * *++{#links}+# Links++{#explicit}+## Explicit++Just a [URL](/url/).++[URL and title](/url/){title="title"}.++[URL and title](/url/){title="title preceded by two spaces"}.++[URL and title](/url/){title="title preceded by a tab"}.++[URL and title](/url/){title="title with \"quotes\" in it"}++[URL and title](/url/){title="title with single quotes"}++[with\_underscore](/url/with_underscore)++[Email link](mailto:nobody@nowhere.net)++[Empty]().++{#reference}+## Reference++Foo [bar](/url/).++With [embedded \[brackets\]](/url/).++[b](/url/) by itself should be a link.++Indented [once](/url).++Indented [twice](/url).++Indented [thrice](/url).++This should \[not\]\[\] be a link.++```+[not]: /url+```++Foo [bar](/url/){title="Title with \"quotes\" inside"}.++Foo [biz](/url/){title="Title with \"quote\" inside"}.++{#with-ampersands}+## With ampersands++Here's a [link with an ampersand in the URL](http://example.com/?foo=1&bar=2).++Here's a link with an amersand in the link text:+[AT&T](http://att.com/){title="AT&T"}.++Here's an [inline link](/script?foo=1&bar=2).++Here's an [inline link in pointy braces](/script?foo=1&bar=2).++{#autolinks}+## Autolinks++With an ampersand: <http://example.com/?foo=1&bar=2>++- In a list?+- <http://example.com/>+- It should.++An e-mail address: <nobody@nowhere.net>++> Blockquoted: <http://example.com/>++Auto-links should not occur here: `<http://example.com/>`++```+or here: <http://example.com/>+```++* * * *++{#images}+# Images++From "Voyage dans la Lune" by Georges Melies (1902):++::::+![lalune](lalune.jpg){title="Voyage dans la Lune"}++{.caption}+:::+lalune++:::++::::++Here is a movie ![movie](movie.jpg) icon.++* * * *++{#footnotes}+# Footnotes++Here is a footnote reference,[^1] and another.[^2] This should _not_ be a+footnote reference, because it contains a space.\[\^my note\] Here is an inline+note.[^3]++> Notes can go in quotes.[^4]++1. And in list items.[^5]++This paragraph should not be part of the note, as it is not indented.++[^1]: Here is the footnote. It can go anywhere after the footnote reference. It+    need not be placed at the end of the document.++[^2]: Here's the long note. This one contains multiple blocks.++    Subsequent blocks are indented to show that they belong to the footnote (as+    with list items).++    ```+      { <code> }+    ```++    If you want, you can indent every line, but you can also be lazy and just+    indent the first line of each block.++[^3]: This is _easier_ to type. Inline notes may contain+    [links](http://google.com) and `]` verbatim characters, as well as+    \[bracketed text\].++[^4]: In quote.++[^5]: In list.
+ test/djot-reader.native view
@@ -0,0 +1,986 @@+Pandoc+  Meta { unMeta = fromList [] }+  [ Div+      ( "Pandoc-Test-Suite"+      , [ "section" ]+      , [ ( "wrapper" , "1" ) ]+      )+      [ Header 1 ( "" , [] , [] ) [ Str "Pandoc Test Suite" ]+      , Para+          [ Str "John MacFarlane" , SoftBreak , Str "Anonymous" ]+      , Para [ Str "July 17, 2006" ]+      , Para+          [ Str+              "This is a set of tests for pandoc. Most of them are adapted from John Gruber\8217s"+          , SoftBreak+          , Str "markdown test suite."+          ]+      , HorizontalRule+      ]+  , Div+      ( "headers" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+      [ Header 1 ( "" , [] , [] ) [ Str "Headers" ]+      , Div+          ( "level-2-with-an-embedded-link"+          , [ "section" ]+          , [ ( "wrapper" , "1" ) ]+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Str "Level 2 with an "+              , Link+                  ( "" , [] , [] )+                  [ Str "embedded link" ]+                  ( "/url" , "" )+              ]+          , Div+              ( "level-3-with-emphasis"+              , [ "section" ]+              , [ ( "wrapper" , "1" ) ]+              )+              [ Header+                  3+                  ( "" , [] , [] )+                  [ Str "Level 3 with " , Emph [ Str "emphasis" ] ]+              , Div+                  ( "level-4"+                  , [ "section" ]+                  , [ ( "wrapper" , "1" ) ]+                  )+                  [ Header 4 ( "" , [] , [] ) [ Str "Level 4" ]+                  , Div+                      ( "level-5"+                      , [ "section" ]+                      , [ ( "wrapper" , "1" ) ]+                      )+                      [ Header 5 ( "" , [] , [] ) [ Str "Level 5" ] ]+                  ]+              ]+          ]+      ]+  , Div+      ( "level-1" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+      [ Header 1 ( "" , [] , [] ) [ Str "Level 1" ]+      , Div+          ( "level-2-with-emphasis"+          , [ "section" ]+          , [ ( "wrapper" , "1" ) ]+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Str "Level 2 with " , Emph [ Str "emphasis" ] ]+          , Div+              ( "level-3" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+              [ Header 3 ( "" , [] , [] ) [ Str "Level 3" ]+              , Para [ Str "with no blank line" ]+              ]+          ]+      , Div+          ( "level-2" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+          [ Header 2 ( "" , [] , [] ) [ Str "Level 2" ]+          , Para [ Str "with no blank line" ]+          , HorizontalRule+          ]+      ]+  , Div+      ( "paragraphs" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+      [ Header 1 ( "" , [] , [] ) [ Str "Paragraphs" ]+      , Para [ Str "Here\8217s a regular paragraph." ]+      , Para+          [ Str+              "In Markdown 1.0.0 and earlier. Version 8. This line turns into a list item."+          , SoftBreak+          , Str+              "Because a hard-wrapped line in the middle of a paragraph looked like a list"+          , SoftBreak+          , Str "item."+          ]+      , Para [ Str "Here\8217s one with a bullet. * criminey." ]+      , Para+          [ Str "There should be a hard line break"+          , LineBreak+          , Str "here."+          ]+      , HorizontalRule+      ]+  , Div+      ( "block-quotes" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+      [ Header 1 ( "" , [] , [] ) [ Str "Block Quotes" ]+      , Para [ Str "E-mail style:" ]+      , BlockQuote+          [ Para [ Str "This is a block quote. It is pretty short." ]+          ]+      , BlockQuote+          [ Para [ Str "Code in a block quote:" ]+          , CodeBlock+              ( "" , [ "" ] , [] )+              "sub status {\nprint \"working\";\n}\n"+          , Para [ Str "A list:" ]+          , OrderedList+              ( 1 , Decimal , Period )+              [ [ Plain [ Str "item one" ] ]+              , [ Plain [ Str "item two" ] ]+              ]+          , BlockQuote [ Para [ Str "nested" ] ]+          , BlockQuote [ Para [ Str "nested" ] ]+          ]+      , Para [ Str "This should not be a block quote: 2 > 1." ]+      , Para [ Str "And a following paragraph." ]+      , HorizontalRule+      ]+  , Div+      ( "code-blocks" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+      [ Header 1 ( "" , [] , [] ) [ Str "Code Blocks" ]+      , Para [ Str "Code:" ]+      , CodeBlock+          ( "" , [ "" ] , [] )+          "---- (should be four hyphens)\n\nsub status {\n    print \"working\";\n}\n\nthis code block is indented by one tab\n"+      , Para [ Str "And:" ]+      , CodeBlock+          ( "" , [ "" ] , [] )+          "    this code block is indented by two tabs\n\nThese should not be escaped:  \\$ \\\\ \\> \\[ \\{\n"+      , HorizontalRule+      ]+  , Div+      ( "lists" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+      [ Header 1 ( "" , [] , [] ) [ Str "Lists" ]+      , Div+          ( "unordered" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+          [ Header 2 ( "" , [] , [] ) [ Str "Unordered" ]+          , Para [ Str "Asterisks tight:" ]+          , BulletList+              [ [ Para [ Str "asterisk 1" ] ]+              , [ Para [ Str "asterisk 2" ] ]+              , [ Para [ Str "asterisk 3" ] ]+              , [ Para [ Str "asterisk 1" ] ]+              , [ Para [ Str "asterisk 2" ] ]+              , [ Para [ Str "asterisk 3" ] ]+              , [ Para [ Str "Plus 1" ] ]+              , [ Para [ Str "Plus 2" ] ]+              , [ Para [ Str "Plus 3" ] ]+              , [ Para [ Str "Plus 1" ] ]+              , [ Para [ Str "Plus 2" ] ]+              , [ Para [ Str "Plus 3" ] ]+              , [ Para [ Str "Minus 1" ] ]+              , [ Para [ Str "Minus 2" ] ]+              , [ Para [ Str "Minus 3" ] ]+              , [ Para [ Str "Minus 1" ] ]+              , [ Para [ Str "Minus 2" ] ]+              , [ Para [ Str "Minus 3" ] ]+              ]+          ]+      , Div+          ( "ordered" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+          [ Header 2 ( "" , [] , [] ) [ Str "Ordered" ]+          , Para [ Str "Tight:" ]+          , OrderedList+              ( 1 , Decimal , Period )+              [ [ Para [ Str "First" ] ]+              , [ Para [ Str "Second" ] ]+              , [ Para [ Str "Third" ] ]+              , [ Para [ Str "One" ] ]+              , [ Para [ Str "Two" ] ]+              , [ Para [ Str "Three" ] ]+              , [ Para [ Str "First" ] ]+              , [ Para [ Str "Second" ] ]+              , [ Para [ Str "Third" ] ]+              , [ Para [ Str "One" ] ]+              , [ Para [ Str "Two" ] ]+              , [ Para [ Str "Three" ] ]+              , [ Para [ Str "Item 1, graf one." ]+                , Para+                    [ Str+                        "Item 1. graf two. The quick brown fox jumped over the lazy dog\8217s back."+                    ]+                ]+              , [ Para [ Str "Item 2." ] ]+              , [ Para [ Str "Item 3." ] ]+              ]+          ]+      , Div+          ( "nested" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+          [ Header 2 ( "" , [] , [] ) [ Str "Nested" ]+          , BulletList+              [ [ Plain [ Str "Tab" ]+                , BulletList+                    [ [ Plain [ Str "Tab" ]+                      , BulletList [ [ Plain [ Str "Tab" ] ] ]+                      ]+                    ]+                ]+              ]+          , OrderedList+              ( 1 , Decimal , Period )+              [ [ Para [ Str "First" ] ]+              , [ Para [ Str "Second:" ]+                , BulletList+                    [ [ Plain [ Str "Fee" ] ]+                    , [ Plain [ Str "Fie" ] ]+                    , [ Plain [ Str "Foe" ] ]+                    ]+                ]+              , [ Para [ Str "Third" ] ]+              , [ Para [ Str "First" ] ]+              , [ Para [ Str "Second:" ]+                , BulletList+                    [ [ Plain [ Str "Fee" ] ]+                    , [ Plain [ Str "Fie" ] ]+                    , [ Plain [ Str "Foe" ] ]+                    ]+                ]+              , [ Para [ Str "Third" ] ]+              ]+          ]+      , Div+          ( "tabs-and-spaces"+          , [ "section" ]+          , [ ( "wrapper" , "1" ) ]+          )+          [ Header 2 ( "" , [] , [] ) [ Str "Tabs and spaces" ]+          , BulletList+              [ [ Para [ Str "this is a list item indented with tabs" ]+                ]+              , [ Para+                    [ Str "this is a list item indented with spaces" ]+                , BulletList+                    [ [ Para+                          [ Str+                              "this is an example list item indented with tabs"+                          ]+                      ]+                    , [ Para+                          [ Str+                              "this is an example list item indented with spaces"+                          ]+                      ]+                    ]+                ]+              ]+          ]+      , Div+          ( "fancy-list-markers"+          , [ "section" ]+          , [ ( "wrapper" , "1" ) ]+          )+          [ Header 2 ( "" , [] , [] ) [ Str "Fancy list markers" ]+          , OrderedList+              ( 2 , Decimal , TwoParens )+              [ [ Para [ Str "begins with 2" ] ]+              , [ Para [ Str "and now 3" ]+                , Para [ Str "with a continuation" ]+                , OrderedList+                    ( 4 , LowerRoman , Period )+                    [ [ Plain+                          [ Str+                              "sublist with roman numerals, starting with 4"+                          ]+                      ]+                    , [ Plain [ Str "more items" ]+                      , OrderedList+                          ( 1 , UpperAlpha , TwoParens )+                          [ [ Plain [ Str "a subsublist" ] ]+                          , [ Plain [ Str "a subsublist" ] ]+                          ]+                      ]+                    ]+                ]+              ]+          , OrderedList+              ( 1 , UpperAlpha , Period )+              [ [ Plain [ Str "Upper Alpha" ]+                , OrderedList+                    ( 1 , UpperRoman , Period )+                    [ [ Plain [ Str "Upper Roman." ]+                      , OrderedList+                          ( 6 , Decimal , TwoParens )+                          [ [ Plain [ Str "Decimal start with 6" ]+                            , OrderedList+                                ( 3 , LowerAlpha , OneParen )+                                [ [ Plain+                                      [ Str "Lower alpha with paren" ]+                                  ]+                                ]+                            ]+                          ]+                      ]+                    ]+                ]+              ]+          , OrderedList+              ( 1 , Decimal , Period )+              [ [ Plain [ Str "Autonumber." ] ]+              , [ Plain [ Str "More." ]+                , OrderedList+                    ( 1 , Decimal , Period )+                    [ [ Plain [ Str "Nested." ] ] ]+                ]+              ]+          , OrderedList+              ( 2 , UpperAlpha , Period )+              [ [ Plain [ Str "Williams" ] ] ]+          , HorizontalRule+          ]+      ]+  , Div+      ( "definition-lists"+      , [ "section" ]+      , [ ( "wrapper" , "1" ) ]+      )+      [ Header 1 ( "" , [] , [] ) [ Str "Definition Lists" ]+      , Para [ Str "Tight using spaces:" ]+      , DefinitionList+          [ ( [ Str "apple" ] , [ [ Para [ Str "red fruit" ] ] ] )+          , ( [ Str "orange" ] , [ [ Para [ Str "orange fruit" ] ] ] )+          , ( [ Str "banana" ] , [ [ Para [ Str "yellow fruit" ] ] ] )+          , ( [ Str "apple" ] , [ [ Para [ Str "red fruit" ] ] ] )+          , ( [ Str "orange" ] , [ [ Para [ Str "orange fruit" ] ] ] )+          , ( [ Str "banana" ] , [ [ Para [ Str "yellow fruit" ] ] ] )+          , ( [ Str "apple" ] , [ [ Para [ Str "red fruit" ] ] ] )+          , ( [ Str "orange" ] , [ [ Para [ Str "orange fruit" ] ] ] )+          , ( [ Str "banana" ] , [ [ Para [ Str "yellow fruit" ] ] ] )+          , ( [ Emph [ Str "apple" ] ]+            , [ [ Para [ Str "red fruit" ]+                , Para+                    [ Str "contains seeds, crisp, pleasant to taste" ]+                ]+              ]+            )+          , ( [ Emph [ Str "orange" ] ]+            , [ [ Para [ Str "orange fruit" ]+                , CodeBlock+                    ( "" , [ "" ] , [] ) "{ orange code block }\n"+                ]+              ]+            )+          ]+      , BlockQuote [ Para [ Str "orange block quote" ] ]+      , Para [ Str "Multiple definitions, tight:" ]+      , DefinitionList+          [ ( [ Str "apple" ]+            , [ [ Para [ Str "red fruit" ] , Para [ Str "computer" ] ] ]+            )+          , ( [ Str "orange" ]+            , [ [ Para [ Str "orange fruit" ] , Para [ Str "bank" ] ] ]+            )+          , ( [ Str "apple" ]+            , [ [ Para [ Str "red fruit" ] , Para [ Str "computer" ] ] ]+            )+          , ( [ Str "orange" ]+            , [ [ Para [ Str "orange fruit" ] , Para [ Str "bank" ] ] ]+            )+          , ( [ Str "apple" ]+            , [ [ Para [ Str "red fruit" ] , Para [ Str "computer" ] ] ]+            )+          , ( [ Str "orange" ]+            , [ [ Para [ Str "orange fruit" ]+                , OrderedList+                    ( 1 , Decimal , Period )+                    [ [ Plain [ Str "sublist" ] ]+                    , [ Plain [ Str "sublist" ] ]+                    ]+                ]+              ]+            )+          ]+      ]+  , Div+      ( "html-blocks" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+      [ Header 1 ( "" , [] , [] ) [ Str "HTML Blocks" ]+      , Para [ Str "Simple block on one line:" ]+      , Div ( "" , [] , [] ) [ Para [ Str "foo" ] ]+      , Para [ Str "And nested without indentation:" ]+      , Div+          ( "" , [] , [] )+          [ Div+              ( "" , [] , [] )+              [ Div ( "" , [] , [] ) [ Para [ Str "foo" ] ] ]+          , Div ( "" , [] , [] ) [ Para [ Str "bar" ] ]+          ]+      , Para [ Str "Interpreted markdown in a table:" ]+      , Para [ Str "This is " , Emph [ Str "emphasized" ] ]+      , Para [ Str "And this is " , Strong [ Str "strong" ] ]+      , Para [ Str "Here\8217s a simple block:" ]+      , Div ( "" , [] , [] ) [ Para [ Str "foo" ] ]+      , Para [ Str "This should be a code block, though:" ]+      , CodeBlock ( "" , [ "" ] , [] ) "<div>\n    foo\n</div>\n"+      , Para [ Str "As should this:" ]+      , CodeBlock ( "" , [ "" ] , [] ) "<div>foo</div>\n"+      , Para [ Str "Now, nested:" ]+      , Div+          ( "" , [] , [] )+          [ Div+              ( "" , [] , [] )+              [ Div ( "" , [] , [] ) [ Para [ Str "foo" ] ] ]+          ]+      , Para [ Str "This should just be an HTML comment:" ]+      , Para [ Str "Multiline:" ]+      , Para [ Str "Code block:" ]+      , CodeBlock ( "" , [ "" ] , [] ) "<!-- Comment -->\n"+      , Para+          [ Str+              "Just plain comment, with trailing spaces on the line:"+          ]+      , Para [ Str "Code:" ]+      , CodeBlock ( "" , [ "" ] , [] ) "<hr />\n"+      , Para [ Str "Hr\8217s:" ]+      , HorizontalRule+      ]+  , Div+      ( "inline-markup"+      , [ "section" ]+      , [ ( "wrapper" , "1" ) ]+      )+      [ Header 1 ( "" , [] , [] ) [ Str "Inline Markup" ]+      , Para+          [ Str "This is "+          , Emph [ Str "emphasized" ]+          , Str ", and so "+          , Emph [ Str "is this" ]+          , Str "."+          ]+      , Para+          [ Str "This is "+          , Strong [ Str "strong" ]+          , Str ", and so "+          , Strong [ Str "is this" ]+          , Str "."+          ]+      , Para+          [ Str "An "+          , Emph+              [ Link+                  ( "" , [] , [] )+                  [ Str "emphasized link" ]+                  ( "/url" , "" )+              ]+          , Str "."+          ]+      , Para [ Strong [ Emph [ Str "This is strong and em." ] ] ]+      , Para+          [ Str "So is "+          , Strong [ Emph [ Str "this" ] ]+          , Str " word."+          ]+      , Para [ Strong [ Emph [ Str "This is strong and em." ] ] ]+      , Para+          [ Str "So is "+          , Strong [ Emph [ Str "this" ] ]+          , Str " word."+          ]+      , Para+          [ Str "This is code: "+          , Code ( "" , [] , [] ) ">"+          , Str ", "+          , Code ( "" , [] , [] ) "$"+          , Str ", "+          , Code ( "" , [] , [] ) "\\`, "+          , Str "$"+          , Code ( "" , [] , [] ) ", "+          , Str "<html>"+          , Code ( "" , [] , [] ) "."+          ]+      , Para+          [ Span+              ( "" , [ "deleted" ] , [] )+              [ Str "This is " , Emph [ Str "strikeout" ] , Str "." ]+          ]+      , Para+          [ Str "Superscripts: a"+          , Superscript [ Str "bc" ]+          , Str "d a"+          , Superscript [ Emph [ Str "hello" ] ]+          , Str " a"+          , Superscript [ Str "hello\160there" ]+          , Str "."+          ]+      , Para+          [ Str "Subscripts: H"+          , Subscript [ Str "2" ]+          , Str "O, H"+          , Subscript [ Str "23" ]+          , Str "O, H"+          , Subscript [ Str "many\160of\160them" ]+          , Str "O."+          ]+      , Para+          [ Str+              "These should not be superscripts or subscripts, because of the unescaped spaces:"+          , SoftBreak+          , Str "a^b c^d, a~b c~d."+          ]+      , HorizontalRule+      ]+  , Div+      ( "smart-quotes-ellipses-dashes"+      , [ "section" ]+      , [ ( "wrapper" , "1" ) ]+      )+      [ Header+          1 ( "" , [] , [] ) [ Str "Smart quotes, ellipses, dashes" ]+      , Para+          [ Quoted DoubleQuote [ Str "Hello," ]+          , Str " said the spider. "+          , Quoted+              DoubleQuote+              [ Quoted SingleQuote [ Str "Shelob" ]+              , Str " is my name."+              ]+          ]+      , Para+          [ Quoted SingleQuote [ Str "A" ]+          , Str ", "+          , Quoted SingleQuote [ Str "B" ]+          , Str ", and "+          , Quoted SingleQuote [ Str "C" ]+          , Str " are letters."+          ]+      , Para+          [ Quoted SingleQuote [ Str "Oak," ]+          , Str " "+          , Quoted SingleQuote [ Str "elm," ]+          , Str " and "+          , Quoted SingleQuote [ Str "beech" ]+          , Str " are names of trees. So is "+          , Quoted SingleQuote [ Str "pine." ]+          ]+      , Para+          [ Quoted+              SingleQuote+              [ Str "He said, "+              , Quoted DoubleQuote [ Str "I want to go." ]+              ]+          , Str " Were you alive in the 70\8217s?"+          ]+      , Para+          [ Str "Here is some quoted "+          , Quoted SingleQuote [ Code ( "" , [] , [] ) "code" ]+          , Str " and a "+          , Quoted+              DoubleQuote+              [ Link+                  ( "" , [] , [] )+                  [ Str "quoted" , SoftBreak , Str "link" ]+                  ( "http://example.com/?foo=1&bar=2" , "" )+              ]+          , Str "."+          ]+      , Para+          [ Str+              "Some dashes: one\8212two \8212 three\8212four \8212 five."+          ]+      , Para+          [ Str+              "Dashes between numbers: 5\8211\&7, 255\8211\&66, 1987\8211\&1999."+          ]+      , Para [ Str "Ellipses\8230and\8230and\8230." ]+      , HorizontalRule+      ]+  , Div+      ( "latex" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+      [ Header 1 ( "" , [] , [] ) [ Str "LaTeX" ]+      , BulletList+          [ []+          , [ Para [ Math InlineMath "2+2=4" ] ]+          , [ Para [ Math InlineMath "x \\in y" ] ]+          , [ Para [ Math InlineMath "\\alpha \\wedge \\omega" ] ]+          , [ Para [ Math InlineMath "223" ] ]+          , [ Para [ Math InlineMath "p" , Str "-Tree" ] ]+          , [ Para+                [ Str "Here\8217s some display math:"+                , SoftBreak+                , Math+                    DisplayMath+                    "\\frac{d}{dx}f(x)=\\lim_{h\\to 0}\\frac{f(x+h)-f(x)}{h}"+                ]+            ]+          , [ Para+                [ Str "Here\8217s one that has a line break in it: "+                , Math InlineMath "\\alpha + \\omega \\times x^2"+                , Str "."+                ]+            ]+          , [ Para+                [ Str "To get the famous equation, write "+                , Code ( "" , [] , [] ) "$e = mc^2$"+                , Str "."+                ]+            ]+          , [ Para+                [ Str "$22,000 is a "+                , Emph [ Str "lot" ]+                , Str " of money. So is $34,000. (It worked if "+                , Quoted DoubleQuote [ Str "lot" ]+                , Str " is"+                , SoftBreak+                , Str "emphasized.)"+                ]+            ]+          , [ Para [ Str "Shoes ($20) and socks ($5)." ] ]+          , [ Para+                [ Str "Escaped "+                , Code ( "" , [] , [] ) "$"+                , Str ": $73 "+                , Emph [ Str "this should be emphasized" ]+                , Str " 23$."+                ]+            ]+          ]+      , HorizontalRule+      ]+  , Div+      ( "special-characters"+      , [ "section" ]+      , [ ( "wrapper" , "1" ) ]+      )+      [ Header 1 ( "" , [] , [] ) [ Str "Special Characters" ]+      , Para [ Str "Here is some unicode:" ]+      , BulletList+          [ [ Plain [ Str "I hat: \206" ] ]+          , [ Plain [ Str "o umlaut: \246" ] ]+          , [ Plain [ Str "section: \167" ] ]+          , [ Plain [ Str "set membership: \8712" ] ]+          , [ Plain [ Str "copyright: \169" ] ]+          ]+      , HorizontalRule+      ]+  , Div+      ( "links" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+      [ Header 1 ( "" , [] , [] ) [ Str "Links" ]+      , Div+          ( "explicit" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+          [ Header 2 ( "" , [] , [] ) [ Str "Explicit" ]+          , Para+              [ Str "Just a "+              , Link ( "" , [] , [] ) [ Str "URL" ] ( "/url/" , "" )+              , Str "."+              ]+          , Para+              [ Link+                  ( ""+                  , []+                  , [ ( "wrapper" , "1" ) , ( "title" , "title" ) ]+                  )+                  [ Str "URL and title" ]+                  ( "/url/" , "" )+              , Str "."+              ]+          , Para+              [ Link+                  ( ""+                  , []+                  , [ ( "wrapper" , "1" )+                    , ( "title" , "title preceded by two spaces" )+                    ]+                  )+                  [ Str "URL and title" ]+                  ( "/url/" , "" )+              , Str "."+              ]+          , Para+              [ Link+                  ( ""+                  , []+                  , [ ( "wrapper" , "1" )+                    , ( "title" , "title preceded by a tab" )+                    ]+                  )+                  [ Str "URL and title" ]+                  ( "/url/" , "" )+              , Str "."+              ]+          , Para+              [ Link+                  ( ""+                  , []+                  , [ ( "wrapper" , "1" )+                    , ( "title" , "title with \"quotes\" in it" )+                    ]+                  )+                  [ Str "URL and title" ]+                  ( "/url/" , "" )+              ]+          , Para+              [ Link+                  ( ""+                  , []+                  , [ ( "wrapper" , "1" )+                    , ( "title" , "title with single quotes" )+                    ]+                  )+                  [ Str "URL and title" ]+                  ( "/url/" , "" )+              ]+          , Para+              [ Link+                  ( "" , [] , [] )+                  [ Str "with_underscore" ]+                  ( "/url/with_underscore" , "" )+              ]+          , Para+              [ Link+                  ( "" , [] , [] )+                  [ Str "Email link" ]+                  ( "mailto:nobody@nowhere.net" , "" )+              ]+          , Para+              [ Link ( "" , [] , [] ) [ Str "Empty" ] ( "" , "" )+              , Str "."+              ]+          ]+      , Div+          ( "reference" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+          [ Header 2 ( "" , [] , [] ) [ Str "Reference" ]+          , Para+              [ Str "Foo "+              , Link ( "" , [] , [] ) [ Str "bar" ] ( "/url/" , "" )+              , Str "."+              ]+          , Para+              [ Str "With "+              , Link+                  ( "" , [] , [] )+                  [ Str "embedded [brackets]" ]+                  ( "/url/" , "" )+              , Str "."+              ]+          , Para+              [ Link ( "" , [] , [] ) [ Str "b" ] ( "/url/" , "" )+              , Str " by itself should be a link."+              ]+          , Para+              [ Str "Indented "+              , Link ( "" , [] , [] ) [ Str "once" ] ( "/url" , "" )+              , Str "."+              ]+          , Para+              [ Str "Indented "+              , Link ( "" , [] , [] ) [ Str "twice" ] ( "/url" , "" )+              , Str "."+              ]+          , Para+              [ Str "Indented "+              , Link ( "" , [] , [] ) [ Str "thrice" ] ( "/url" , "" )+              , Str "."+              ]+          , Para [ Str "This should [not][] be a link." ]+          , CodeBlock ( "" , [ "" ] , [] ) "[not]: /url\n"+          , Para+              [ Str "Foo "+              , Link+                  ( ""+                  , []+                  , [ ( "wrapper" , "1" )+                    , ( "title" , "Title with \"quotes\" inside" )+                    ]+                  )+                  [ Str "bar" ]+                  ( "/url/" , "" )+              , Str "."+              ]+          , Para+              [ Str "Foo "+              , Link+                  ( ""+                  , []+                  , [ ( "wrapper" , "1" )+                    , ( "title" , "Title with \"quote\" inside" )+                    ]+                  )+                  [ Str "biz" ]+                  ( "/url/" , "" )+              , Str "."+              ]+          ]+      , Div+          ( "with-ampersands"+          , [ "section" ]+          , [ ( "wrapper" , "1" ) ]+          )+          [ Header 2 ( "" , [] , [] ) [ Str "With ampersands" ]+          , Para+              [ Str "Here\8217s a "+              , Link+                  ( "" , [] , [] )+                  [ Str "link with an ampersand in the URL" ]+                  ( "http://example.com/?foo=1&bar=2" , "" )+              , Str "."+              ]+          , Para+              [ Str+                  "Here\8217s a link with an amersand in the link text:"+              , SoftBreak+              , Link+                  ( ""+                  , []+                  , [ ( "wrapper" , "1" ) , ( "title" , "AT&T" ) ]+                  )+                  [ Str "AT&T" ]+                  ( "http://att.com/" , "" )+              , Str "."+              ]+          , Para+              [ Str "Here\8217s an "+              , Link+                  ( "" , [] , [] )+                  [ Str "inline link" ]+                  ( "/script?foo=1&bar=2" , "" )+              , Str "."+              ]+          , Para+              [ Str "Here\8217s an "+              , Link+                  ( "" , [] , [] )+                  [ Str "inline link in pointy braces" ]+                  ( "/script?foo=1&bar=2" , "" )+              , Str "."+              ]+          ]+      , Div+          ( "autolinks" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+          [ Header 2 ( "" , [] , [] ) [ Str "Autolinks" ]+          , Para+              [ Str "With an ampersand: "+              , Link+                  ( "" , [ "uri" ] , [] )+                  [ Str "http://example.com/?foo=1&bar=2" ]+                  ( "http://example.com/?foo=1&bar=2" , "" )+              ]+          , BulletList+              [ [ Plain [ Str "In a list?" ] ]+              , [ Plain+                    [ Link+                        ( "" , [ "uri" ] , [] )+                        [ Str "http://example.com/" ]+                        ( "http://example.com/" , "" )+                    ]+                ]+              , [ Plain [ Str "It should." ] ]+              ]+          , BlockQuote+              [ Para+                  [ Str "Blockquoted: "+                  , Link+                      ( "" , [ "uri" ] , [] )+                      [ Str "http://example.com/" ]+                      ( "http://example.com/" , "" )+                  ]+              ]+          , Para+              [ Str "Auto-links should not occur here: "+              , Code ( "" , [] , [] ) "<http://example.com/>"+              ]+          , CodeBlock+              ( "" , [ "" ] , [] ) "or here: <http://example.com/>\n"+          , HorizontalRule+          ]+      ]+  , Div+      ( "images" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+      [ Header 1 ( "" , [] , [] ) [ Str "Images" ]+      , Para+          [ Str "From "+          , Quoted DoubleQuote [ Str "Voyage dans la Lune" ]+          , Str " by Georges Melies (1902):"+          ]+      , Div+          ( "" , [] , [] )+          [ Para+              [ Image+                  ( ""+                  , []+                  , [ ( "wrapper" , "1" )+                    , ( "title" , "Voyage dans la Lune" )+                    ]+                  )+                  [ Str "lalune" ]+                  ( "lalune.jpg" , "" )+              ]+          , Div+              ( "" , [ "caption" ] , [ ( "wrapper" , "1" ) ] )+              [ Para [ Str "lalune" ] ]+          ]+      , Para+          [ Str "Here is a movie "+          , Image+              ( "" , [] , [] ) [ Str "movie" ] ( "movie.jpg" , "" )+          , Str " icon."+          ]+      , HorizontalRule+      ]+  , Div+      ( "footnotes" , [ "section" ] , [ ( "wrapper" , "1" ) ] )+      [ Header 1 ( "" , [] , [] ) [ Str "Footnotes" ]+      , Para+          [ Str "Here is a footnote reference,"+          , Note+              [ Para+                  [ Str+                      "Here is the footnote. It can go anywhere after the footnote reference. It"+                  , SoftBreak+                  , Str "need not be placed at the end of the document."+                  ]+              ]+          , Str " and another."+          , Note+              [ Para+                  [ Str+                      "Here\8217s the long note. This one contains multiple blocks."+                  ]+              , Para+                  [ Str+                      "Subsequent blocks are indented to show that they belong to the footnote (as"+                  , SoftBreak+                  , Str "with list items)."+                  ]+              , CodeBlock ( "" , [ "" ] , [] ) "{ <code> }\n"+              , Para+                  [ Str+                      "If you want, you can indent every line, but you can also be lazy and just"+                  , SoftBreak+                  , Str "indent the first line of each block."+                  ]+              ]+          , Str " This should "+          , Emph [ Str "not" ]+          , Str " be a"+          , SoftBreak+          , Str+              "footnote reference, because it contains a space.[^my note] Here is an inline"+          , SoftBreak+          , Str "note."+          , Note+              [ Para+                  [ Str "This is "+                  , Emph [ Str "easier" ]+                  , Str " to type. Inline notes may contain"+                  , SoftBreak+                  , Link+                      ( "" , [] , [] )+                      [ Str "links" ]+                      ( "http://google.com" , "" )+                  , Str " and "+                  , Code ( "" , [] , [] ) "]"+                  , Str " verbatim characters, as well as"+                  , SoftBreak+                  , Str "[bracketed text]."+                  ]+              ]+          ]+      , BlockQuote+          [ Para+              [ Str "Notes can go in quotes."+              , Note [ Para [ Str "In quote." ] ]+              ]+          ]+      , OrderedList+          ( 1 , Decimal , Period )+          [ [ Plain+                [ Str "And in list items."+                , Note [ Para [ Str "In list." ] ]+                ]+            ]+          ]+      ]+  ]
test/docbook-reader.native view
@@ -2927,21 +2927,26 @@           ]       ]       (TableFoot ( "" , [] , [] ) [])-  , BulletList+  , OrderedList+      ( 1 , DefaultStyle , DefaultDelim )       [ [ Para [ Str "A" , Space , Str "Step" ] ]       , [ Para [ Str "Another" , Space , Str "Step" ]-        , Para-            [ Str "Substeps"-            , Space-            , Str "can"-            , Space-            , Str "be"-            , Space-            , Str "nested"-            , Space-            , Str "indefinitely"-            , Space-            , Str "deep."+        , OrderedList+            ( 1 , DefaultStyle , DefaultDelim )+            [ [ Para+                  [ Str "Substeps"+                  , Space+                  , Str "can"+                  , Space+                  , Str "be"+                  , Space+                  , Str "nested"+                  , Space+                  , Str "indefinitely"+                  , Space+                  , Str "deep."+                  ]+              ]             ]         ]       , [ Para
test/docx/golden/table_one_row.docx view

binary file changed (9826 → 9824 bytes)

test/docx/golden/table_with_list_cell.docx view

binary file changed (10146 → 10144 bytes)

test/docx/golden/tables-default-widths.docx view

binary file changed (10172 → 10169 bytes)

test/docx/golden/tables.docx view

binary file changed (10186 → 10183 bytes)

test/docx/golden/tables_separated_with_rawblock.docx view

binary file changed (9822 → 9822 bytes)

test/epub/features.native view
@@ -1,1686 +1,1721 @@-[ Para [ Span ( "front.xhtml" , [] , [] ) [] ]-, Div-    ( "" , [ "section" ] , [] )-    [ Header-        1-        ( "" , [] , [] )-        [ Str "Reflowable"-        , Space-        , Str "EPUB"-        , Space-        , Str "3"-        , Space-        , Str "Conformance"-        , Space-        , Str "Test"-        , Space-        , Str "Document:"-        , Space-        , Str "0100"-        ]-    , Div-        ( "" , [ "section" ] , [] )-        [ Header-            2-            ( "" , [] , [] )-            [ Str "Status"-            , Space-            , Str "of"-            , Space-            , Str "this"-            , Space-            , Str "Document"-            ]-        , Para-            [ Str "This"-            , Space-            , Str "publication"-            , Space-            , Str "is"-            , Space-            , Str "currently"-            , Space-            , Str "considered"-            , Space-            , Span-                ( "" , [ "status" ] , [] )-                [ Str "[UNDER" , Space , Str "DEVELOPMENT]" ]-            , Space-            , Str "by"-            , Space-            , Str "the"-            , Space-            , Str "IDPF."-            ]-        , Para-            [ Str "This"-            , Space-            , Str "publication"-            , Space-            , Str "is"-            , Space-            , Str "part"-            , Space-            , Str "of"-            , Space-            , Str "version"-            , Space-            , Span ( "" , [ "version" ] , [] ) [ Str "X.X" ]-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Str "EPUB"-            , Space-            , Str "3.0"-            , Space-            , Str "Compliance"-            , Space-            , Str "Test"-            , Space-            , Str "Suite"-            , Space-            , Str "released"-            , SoftBreak-            , Str "on"-            , Space-            , RawInline (Format "html") "<time class=\"release\">"-            , Str "TBD"-            , RawInline (Format "html") "</time>"-            , Str "."-            ]-        , Para-            [ Str "Before"-            , Space-            , Str "using"-            , Space-            , Str "this"-            , Space-            , Str "publication"-            , Space-            , Str "to"-            , Space-            , Str "evaluate"-            , Space-            , Str "reading"-            , Space-            , Str "systems,"-            , Space-            , Str "testers"-            , Space-            , Str "are"-            , Space-            , Str "strongly"-            , Space-            , Str "encouraged"-            , Space-            , Str "to"-            , SoftBreak-            , Str "verify"-            , Space-            , Str "that"-            , Space-            , Str "they"-            , Space-            , Str "have"-            , Space-            , Str "the"-            , Space-            , Str "latest"-            , Space-            , Str "release"-            , Space-            , Str "by"-            , Space-            , Str "checking"-            , Space-            , Str "the"-            , Space-            , Str "current"-            , Space-            , Str "release"-            , Space-            , Str "version"-            , Space-            , Str "and"-            , Space-            , Str "date"-            , Space-            , Str "of"-            , SoftBreak-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "suite"-            , Space-            , Str "at"-            , Space-            , Link-                ( "" , [] , [] )-                [ Str "TBD" ]-                ( "http://idpf.org/" , "" )-            ]-        , Para-            [ Str "This"-            , Space-            , Str "publication"-            , Space-            , Str "is"-            , Space-            , Str "one"-            , Space-            , Str "of"-            , Space-            , Str "several"-            , Space-            , Str "that"-            , Space-            , Str "currently"-            , Space-            , Str "comprise"-            , Space-            , Str "the"-            , Space-            , Str "EPUB"-            , Space-            , Str "3"-            , Space-            , Str "conformance"-            , Space-            , Str "test"-            , Space-            , Str "suite"-            , SoftBreak-            , Str "for"-            , Space-            , Str "reflowable"-            , Space-            , Str "content."-            , Space-            , Str "The"-            , Space-            , Str "complete"-            , Space-            , Str "test"-            , Space-            , Str "suite"-            , Space-            , Str "includes"-            , Space-            , Str "all"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Str "following"-            , Space-            , Str "publications:"-            ]-        , OrderedList-            ( 1 , DefaultStyle , DefaultDelim )-            [ [ Plain [ Str "." ] ] ]-        ]-    , Div-        ( "" , [ "section" ] , [] )-        [ Header-            2-            ( "" , [] , [] )-            [ Str "About"-            , Space-            , Str "this"-            , Space-            , Str "Document"-            ]-        , Para-            [ Str "This"-            , Space-            , Str "document"-            , Space-            , Str "focuses"-            , Space-            , Str "on"-            , Space-            , Str "human-evaluated"-            , Space-            , Str "binary"-            , Space-            , Str "(pass/fail)"-            , Space-            , Str "tests"-            , Space-            , Str "in"-            , Space-            , Str "a"-            , SoftBreak-            , Str "reflowable"-            , Space-            , Str "context."-            , Space-            , Str "Tests"-            , Space-            , Str "for"-            , Space-            , Str "fixed-layout"-            , Space-            , Str "content"-            , Space-            , Str "and"-            , Space-            , Str "other"-            , Space-            , Str "individual"-            , Space-            , Str "tests"-            , Space-            , Str "that"-            , SoftBreak-            , Str "require"-            , Space-            , Str "a"-            , Space-            , Str "dedicated"-            , Space-            , Str "epub"-            , Space-            , Str "file"-            , Space-            , Str "are"-            , Space-            , Str "available"-            , Space-            , Str "in"-            , Space-            , Str "additional"-            , Space-            , Str "sibling"-            , Space-            , Str "documents;"-            , Space-            , Str "refer"-            , Space-            , Str "to"-            , SoftBreak-            , Str "the"-            , Space-            , Link-                ( "" , [] , [] )-                [ Str "test"-                , Space-                , Str "suite"-                , SoftBreak-                , Str "wiki"-                ]-                ( "https://github.com/mgylling/epub-testsuite/wiki/Overview"-                , ""-                )-            , Space-            , Str "("-            , Code-                ( "" , [] , [] )-                "https://github.com/mgylling/epub-testsuite/wiki/Overview"-            , Str ")"-            , Space-            , Str "for"-            , Space-            , Str "additional"-            , SoftBreak-            , Str "information."-            ]-        ]-    , Div-        ( "" , [ "section" ] , [] )-        [ Header 2 ( "" , [] , [] ) [ Str "Conventions" ]-        , Para-            [ Str "The"-            , Space-            , Str "following"-            , Space-            , Str "conventions"-            , Space-            , Str "are"-            , Space-            , Str "used"-            , Space-            , Str "throughout"-            , Space-            , Str "the"-            , Space-            , Str "document:"-            ]-        , DefinitionList-            [ ( [ Str "1."-                , Space-                , Str "Locating"-                , Space-                , Str "a"-                , Space-                , Str "test"-                ]-              , [ [ Div-                      ( "" , [ "ctest" ] , [] )-                      [ Para-                          [ Str "Tests"-                          , Space-                          , Str "for"-                          , Space-                          , Emph [ Str "required" ]-                          , Space-                          , Str "Reading"-                          , Space-                          , Str "System"-                          , Space-                          , Str "functionality"-                          , Space-                          , Str "are"-                          , SoftBreak-                          , Str "preceded"-                          , Space-                          , Str "by"-                          , Space-                          , Str "the"-                          , Space-                          , Str "label:"-                          , Space-                          , Span-                              ( ""-                              , [ "nature" ]-                              , [ ( "style"-                                  , "display: inline; font-size: 100%"-                                  )-                                ]-                              )-                              [ Str "[REQUIRED]" ]-                          ]-                      ]-                  , Div-                      ( "" , [ "otest" ] , [] )-                      [ Para-                          [ Str "Tests"-                          , Space-                          , Str "for"-                          , Space-                          , Emph [ Str "optional" ]-                          , Space-                          , Str "Reading"-                          , Space-                          , Str "System"-                          , Space-                          , Str "functionality"-                          , Space-                          , Str "are"-                          , SoftBreak-                          , Str "preceded"-                          , Space-                          , Str "by"-                          , Space-                          , Str "the"-                          , Space-                          , Str "label:"-                          , Space-                          , Span-                              ( ""-                              , [ "nature" ]-                              , [ ( "style"-                                  , "display: inline; font-size: 100%"-                                  )-                                ]-                              )-                              [ Str "[OPTIONAL]" ]-                          ]-                      ]-                  ]-                ]-              )-            , ( [ Str "2."-                , Space-                , Str "Performing"-                , Space-                , Str "the"-                , Space-                , Str "test"-                ]-              , [ [ Plain-                      [ Str "Each"-                      , Space-                      , Str "test"-                      , Space-                      , Str "includes"-                      , Space-                      , Str "a"-                      , Space-                      , Str "description"-                      , Space-                      , Str "of"-                      , Space-                      , Str "its"-                      , Space-                      , Str "purpose"-                      , Space-                      , Str "followed"-                      , Space-                      , Str "by"-                      , Space-                      , Str "the"-                      , Space-                      , Str "actual"-                      , Space-                      , Strong-                          [ Str "test"-                          , Space-                          , Str "statement,"-                          , SoftBreak-                          , Str "which"-                          , Space-                          , Str "can"-                          , Space-                          , Str "always"-                          , Space-                          , Str "be"-                          , Space-                          , Str "evaluated"-                          , Space-                          , Str "to"-                          , Space-                          , Str "true"-                          , Space-                          , Str "or"-                          , Space-                          , Str "false"-                          ]-                      , Str "."-                      , Space-                      , Str "These"-                      , Space-                      , Str "statements"-                      , Space-                      , Str "typically"-                      , Space-                      , Str "have"-                      , Space-                      , Str "the"-                      , Space-                      , Str "form:"-                      , SoftBreak-                      , Str "\"If"-                      , Space-                      , Str "[some"-                      , Space-                      , Str "condition],"-                      , Space-                      , Str "the"-                      , Space-                      , Str "test"-                      , Space-                      , Str "passes\"."-                      ]-                  ]-                ]-              )-            , ( [ Str "3."-                , Space-                , Str "Scoring"-                , Space-                , Str "in"-                , Space-                , Str "the"-                , Space-                , Str "results"-                , Space-                , Str "form"-                ]-              , [ [ Plain-                      [ Str "@@@TODO"-                      , Space-                      , Str "provide"-                      , Space-                      , Str "info"-                      , Space-                      , Str "on"-                      , Space-                      , Str "where"-                      , Space-                      , Str "to"-                      , Space-                      , Str "get"-                      , Space-                      , Str "the"-                      , Space-                      , Str "results"-                      , Space-                      , Str "form"-                      ]-                  ]-                ]-              )-            ]-        ]-    ]-, Para [ Span ( "content-mathml-001.xhtml" , [] , [] ) [] ]-, Div-    ( "" , [ "section" ] , [] )-    [ Header-        2-        ( "content-mathml-001.xhtml#mathml" , [] , [] )-        [ Str "MathML" ]-    , Div-        ( "content-mathml-001.xhtml#mathml-010"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , SoftBreak-            , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-010" ]-            , Space-            , Str "Rendering"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "MathML"-            , Space-            , Str "equation"-            , Space-            , Str "rendering"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Plain-            [ Math-                DisplayMath-                "\\int_{- \\infty}^{\\infty}e^{- x^{2}}\\, dx = \\sqrt{\\pi}"-            , SoftBreak-            , Math-                DisplayMath-                "\\sum\\limits_{n = 1}^{\\infty}\\frac{1}{n^{2}} = \\frac{\\pi^{2}}{6}"-            , SoftBreak-            , Math-                DisplayMath-                "x = \\frac{- b \\pm \\sqrt{b^{2} - 4ac}}{2a}"-            ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "equations"-            , Space-            , Str "are"-            , Space-            , Str "not"-            , Space-            , Str "presented"-            , Space-            , Str "as"-            , Space-            , Str "linear"-            , Space-            , Str "text"-            , Space-            , Str "(e.g.,"-            , Space-            , Str "x=-b\177b2-4ac2a),"-            , SoftBreak-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "passes."-            ]-        ]-    , Div-        ( "content-mathml-001.xhtml#mathml-020"-        , [ "section" , "otest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[OPTIONAL]" ]-            , SoftBreak-            , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-020" ]-            , Space-            , Str "CSS"-            , Space-            , Str "Styling"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "math"-            , Space-            , Str "element"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "basic"-            , Space-            , Str "CSS"-            , Space-            , Str "styling"-            , Space-            , Str "of"-            , Space-            , Str "MathML"-            , Space-            , Str "is"-            , Space-            , Str "supported"-            , Space-            , Str "on"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "math"-            , Space-            , Str "element."-            ]-        , Plain [ Math InlineMath "{2x}{+ y - z}" ]-        , Para-            [ Str "The"-            , Space-            , Str "test"-            , Space-            , Str "passes"-            , Space-            , Str "if"-            , Space-            , Str "the"-            , Space-            , Str "equation"-            , Space-            , Str "has"-            , Space-            , Str "a"-            , Space-            , Str "yellow"-            , Space-            , Str "background"-            , Space-            , Str "and"-            , Space-            , Str "a"-            , Space-            , Str "dashed"-            , Space-            , Str "border."-            ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "reading"-            , Space-            , Str "system"-            , Space-            , Str "does"-            , Space-            , Str "not"-            , Space-            , Str "have"-            , Space-            , Str "a"-            , Space-            , Str "viewport,"-            , Space-            , Str "or"-            , Space-            , Str "does"-            , Space-            , Str "not"-            , Space-            , Str "support"-            , SoftBreak-            , Str "CSS"-            , Space-            , Str "styles,"-            , Space-            , Str "this"-            , Space-            , Str "test"-            , Space-            , Str "should"-            , Space-            , Str "be"-            , Space-            , Str "marked"-            , Space-            , Code ( "" , [] , [] ) "Not Supported"-            , Str "."-            ]-        ]-    , Div-        ( "content-mathml-001.xhtml#mathml-021"-        , [ "section" , "otest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[OPTIONAL]" ]-            , SoftBreak-            , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-021" ]-            , Space-            , Str "CSS"-            , Space-            , Str "Styling"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "mo"-            , Space-            , Str "element"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "basic"-            , Space-            , Str "CSS"-            , Space-            , Str "styling"-            , Space-            , Str "of"-            , Space-            , Str "MathML"-            , Space-            , Str "is"-            , Space-            , Str "supported"-            , Space-            , Str "on"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "mo"-            , Space-            , Str "element."-            ]-        , Plain [ Math InlineMath "{2x}{+ y - z}" ]-        , Para-            [ Str "The"-            , Space-            , Str "test"-            , Space-            , Str "passes"-            , Space-            , Str "if"-            , Space-            , Str "the"-            , Space-            , Str "operators"-            , Space-            , Str "are"-            , Space-            , Str "enlarged"-            , Space-            , Str "relative"-            , Space-            , Str "to"-            , Space-            , Str "the"-            , Space-            , Str "other"-            , Space-            , Str "symbols"-            , Space-            , Str "and"-            , Space-            , Str "numbers."-            ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "reading"-            , Space-            , Str "system"-            , Space-            , Str "does"-            , Space-            , Str "not"-            , Space-            , Str "have"-            , Space-            , Str "a"-            , Space-            , Str "viewport,"-            , Space-            , Str "or"-            , Space-            , Str "does"-            , Space-            , Str "not"-            , Space-            , Str "support"-            , SoftBreak-            , Str "CSS"-            , Space-            , Str "styles,"-            , Space-            , Str "this"-            , Space-            , Str "test"-            , Space-            , Str "should"-            , Space-            , Str "be"-            , Space-            , Str "marked"-            , Space-            , Code ( "" , [] , [] ) "Not Supported"-            , Str "."-            ]-        ]-    , Div-        ( "content-mathml-001.xhtml#mathml-022"-        , [ "section" , "otest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[OPTIONAL]" ]-            , SoftBreak-            , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-022" ]-            , Space-            , Str "CSS"-            , Space-            , Str "Styling"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "mi"-            , Space-            , Str "element"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "basic"-            , Space-            , Str "CSS"-            , Space-            , Str "styling"-            , Space-            , Str "of"-            , Space-            , Str "MathML"-            , Space-            , Str "is"-            , Space-            , Str "supported"-            , Space-            , Str "on"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "mi"-            , Space-            , Str "element."-            ]-        , Plain [ Math InlineMath "{2x}{+ y - z}" ]-        , Para-            [ Str "The"-            , Space-            , Str "test"-            , Space-            , Str "passes"-            , Space-            , Str "if"-            , Space-            , Str "the"-            , Space-            , Str "identifiers"-            , Space-            , Str "are"-            , Space-            , Str "bolded"-            , Space-            , Str "and"-            , Space-            , Str "blue."-            ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "reading"-            , Space-            , Str "system"-            , Space-            , Str "does"-            , Space-            , Str "not"-            , Space-            , Str "have"-            , Space-            , Str "a"-            , Space-            , Str "viewport,"-            , Space-            , Str "or"-            , Space-            , Str "does"-            , Space-            , Str "not"-            , Space-            , Str "support"-            , SoftBreak-            , Str "CSS"-            , Space-            , Str "styles,"-            , Space-            , Str "this"-            , Space-            , Str "test"-            , Space-            , Str "should"-            , Space-            , Str "be"-            , Space-            , Str "marked"-            , Space-            , Code ( "" , [] , [] ) "Not Supported"-            , Str "."-            ]-        ]-    , Div-        ( "content-mathml-001.xhtml#mathml-023"-        , [ "section" , "otest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[OPTIONAL]" ]-            , SoftBreak-            , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-023" ]-            , Space-            , Str "CSS"-            , Space-            , Str "Styling"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "mn"-            , Space-            , Str "element"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "basic"-            , Space-            , Str "CSS"-            , Space-            , Str "styling"-            , Space-            , Str "of"-            , Space-            , Str "MathML"-            , Space-            , Str "is"-            , Space-            , Str "supported"-            , Space-            , Str "on"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "mn"-            , Space-            , Str "element."-            ]-        , Plain [ Math InlineMath "{2x}{+ y - z}" ]-        , Para-            [ Str "The"-            , Space-            , Str "test"-            , Space-            , Str "passes"-            , Space-            , Str "if"-            , Space-            , Str "the"-            , Space-            , Str "number"-            , Space-            , Str "2"-            , Space-            , Str "is"-            , Space-            , Str "italicized"-            , Space-            , Str "and"-            , Space-            , Str "blue."-            ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "reading"-            , Space-            , Str "system"-            , Space-            , Str "does"-            , Space-            , Str "not"-            , Space-            , Str "have"-            , Space-            , Str "a"-            , Space-            , Str "viewport,"-            , Space-            , Str "or"-            , Space-            , Str "does"-            , Space-            , Str "not"-            , Space-            , Str "support"-            , SoftBreak-            , Str "CSS"-            , Space-            , Str "styles,"-            , Space-            , Str "this"-            , Space-            , Str "test"-            , Space-            , Str "should"-            , Space-            , Str "be"-            , Space-            , Str "marked"-            , Space-            , Code ( "" , [] , [] ) "Not Supported"-            , Str "."-            ]-        ]-    , Div-        ( "content-mathml-001.xhtml#mathml-024"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , SoftBreak-            , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-024" ]-            , Str "Horizontal"-            , Space-            , Str "stretch,"-            , Space-            , Code ( "" , [] , [] ) "mover"-            , Str ","-            , Space-            , Code ( "" , [] , [] ) "munder"-            , Str ","-            , Space-            , Str "and"-            , Space-            , Code ( "" , [] , [] ) "mspace"-            , Space-            , Str "elements"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "horizontal"-            , Space-            , Str "stretch,"-            , Space-            , Code ( "" , [] , [] ) "mover"-            , Str ","-            , Space-            , Code ( "" , [] , [] ) "munder"-            , Str ","-            , Space-            , Code ( "" , [] , [] ) "mspace"-            , Space-            , Str "elements"-            , Space-            , Str "are"-            , Space-            , Str "supported."-            ]-        , Plain-            [ Math-                DisplayMath-                "c = \\overset{\\text{complex number}}{\\overbrace{\\underset{\\text{real}}{\\underbrace{\\mspace{20mu} a\\mspace{20mu}}} + \\underset{\\text{imaginary}}{\\underbrace{\\quad b{\\mathbb{i}}\\quad}}}}"-            ]-        , Para-            [ Str "The"-            , Space-            , Str "test"-            , Space-            , Str "passes"-            , Space-            , Str "if"-            , Space-            , Str "the"-            , Space-            , Str "rendering"-            , Space-            , Str "looks"-            , Space-            , Str "like"-            , Space-            , Str "."-            ]-        ]-    , Div-        ( "content-mathml-001.xhtml#mathml-025"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , SoftBreak-            , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-025" ]-            , Str "Testing"-            , Space-            , Code ( "" , [] , [] ) "mtable"-            , Space-            , Str "with"-            , Space-            , Code ( "" , [] , [] ) "colspan"-            , Space-            , Str "and"-            , Space-            , Code ( "" , [] , [] ) "rowspan"-            , Space-            , Str "attributes,"-            , Space-            , Str "Hebrew"-            , Space-            , Str "and"-            , Space-            , Str "Script"-            , Space-            , Str "fonts"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Code ( "" , [] , [] ) "mtable"-            , Space-            , Str "with"-            , Space-            , Code ( "" , [] , [] ) "colspan"-            , Space-            , Str "and"-            , Space-            , Code ( "" , [] , [] ) "mspace"-            , Space-            , Str "attributes"-            , Space-            , Str "(column"-            , Space-            , Str "and"-            , Space-            , Str "row"-            , Space-            , Str "spanning)"-            , Space-            , Str "are"-            , Space-            , Str "supported;"-            , Space-            , Str "uses"-            , Space-            , Str "Hebrew"-            , Space-            , Str "and"-            , Space-            , Str "Script"-            , Space-            , Str "alphabets."-            ]-        , Plain-            [ Math-                DisplayMath-                "\\begin{matrix}\n & {\\operatorname{cov}(\\mathcal{L})} & \\longrightarrow & {\\operatorname{non}(\\mathcal{K})} & \\longrightarrow & {\\operatorname{cof}(\\mathcal{K})} & \\longrightarrow & {\\operatorname{cof}(\\mathcal{L})} & \\longrightarrow & 2^{\\aleph_{0}} \\\\\n & \\uparrow & & \\uparrow & & \\uparrow & & \\uparrow & & \\\\\n & {\\mathfrak{b}} & \\longrightarrow & {\\mathfrak{d}} & & & & & & \\\\\n & \\uparrow & & \\uparrow & & & & & & \\\\\n\\aleph_{1} & \\longrightarrow & {\\operatorname{add}(\\mathcal{L})} & \\longrightarrow & {\\operatorname{add}(\\mathcal{K})} & \\longrightarrow & {\\operatorname{cov}(\\mathcal{K})} & \\longrightarrow & {\\operatorname{non}(\\mathcal{L})} & \n\\end{matrix}"-            ]-        , Para-            [ Str "The"-            , Space-            , Str "test"-            , Space-            , Str "passes"-            , Space-            , Str "if"-            , Space-            , Str "the"-            , Space-            , Str "rendering"-            , Space-            , Str "looks"-            , Space-            , Str "like"-            , Space-            , Link-                ( "" , [] , [] )-                [ Str "Cicho\324's" , Space , Str "Diagram" ]-                ( "http://en.wikipedia.org/wiki/Cicho%C5%84's_diagram"-                , ""-                )-            , Str ":"-            , Space-            , Str "."-            ]-        ]-    , Div-        ( "content-mathml-001.xhtml#mathml-026"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , SoftBreak-            , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-026" ]-            , Str "BiDi,"-            , Space-            , Str "RTL"-            , Space-            , Str "and"-            , Space-            , Str "Arabic"-            , Space-            , Str "alphabets"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "right-to-left"-            , Space-            , Str "and"-            , Space-            , Str "Arabic"-            , Space-            , Str "alphabets"-            , Space-            , Str "are"-            , Space-            , Str "supported."-            ]-        , Plain-            [ Math-                DisplayMath-                "{\1583(\1587)} = \\left\\{ \\begin{matrix}\n{\\sum\\limits_{\1646 = 1}^{\1589}\1587^{\1646}} & {\\text{\1573\1584\1575\1603\1575\1606}\1587 > 0} \\\\\n{\\int_{1}^{\1589}{\1587^{\1646}\1569\1587}} & {\\text{\1573\1584\1575\1603\1575\1606}\1587 \\in \1605} \\\\\n{{\1591\1575}\\pi} & {\\text{\1594\1610\1585\1584\1604\1603}\\left( \\text{\1605\1593}\\pi \\simeq 3,141 \\right)}\n\\end{matrix} \\right."-            ]-        , Para-            [ Str "The"-            , Space-            , Str "test"-            , Space-            , Str "passes"-            , Space-            , Str "if"-            , Space-            , Str "the"-            , Space-            , Str "rendering"-            , Space-            , Str "looks"-            , Space-            , Str "like"-            , Space-            , Str "the"-            , Space-            , Str "following"-            , Space-            , Str "image:"-            ]-        ]-    , Div-        ( "content-mathml-001.xhtml#mathml-027"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , SoftBreak-            , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-027" ]-            , Str "Elementary"-            , Space-            , Str "math:"-            , Space-            , Str "long"-            , Space-            , Str "division"-            , Space-            , Str "notation"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Code ( "" , [] , [] ) "mlongdiv"-            , Space-            , Str "elements"-            , Space-            , Str "(from"-            , Space-            , Str "elementary"-            , Space-            , Str "math)"-            , Space-            , Str "are"-            , Space-            , Str "supported."-            ]-        , Plain-            [ Span-                ( ""-                , [ "math" ]-                , [ ( "xmlns" , "http://www.w3.org/1998/Math/MathML" ) ]-                )-                [ SoftBreak-                , Str "3"-                , SoftBreak-                , Str "435.3"-                , SoftBreak-                , Str "1306"-                , SoftBreak-                , Str "12"-                , SoftBreak-                , Str "10"-                , SoftBreak-                , Str "9"-                , SoftBreak-                , Str "16"-                , SoftBreak-                , Str "15"-                , SoftBreak-                , Str "1.0"-                , SoftBreak-                , Str "9"-                , SoftBreak-                , Str "1"-                , SoftBreak-                ]-            ]-        , Para-            [ Str "The"-            , Space-            , Str "test"-            , Space-            , Str "passes"-            , Space-            , Str "if"-            , Space-            , Str "the"-            , Space-            , Str "rendering"-            , Space-            , Str "looks"-            , Space-            , Str "like"-            , Space-            , Str "the"-            , Space-            , Str "following"-            , Space-            , Str "image:"-            , Space-            , Str "."-            ]-        ]-    ]-, Para [ Span ( "content-switch-001.xhtml" , [] , [] ) [] ]-, Div-    ( "content-switch-001.xhtml#epub-switch"-    , [ "section" ]-    , []-    )-    [ Header-        3 ( "" , [] , [] ) [ Code ( "" , [] , [] ) "epub:switch" ]-    , Div-        ( "content-switch-001.xhtml#switch-010"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            4-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "switch-010" ]-            , Space-            , Str "Support"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Link-                ( "" , [] , [] )-                [ Code ( "" , [] , [] ) "epub:switch" ]-                ( "http://idpf.org/epub/30/spec/epub30-contentdocs.html#sec-xhtml-content-switch"-                , ""-                )-            , Space-            , Str "element"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para [ Str "PASS" ]-        , Para-            [ Str "If"-            , Space-            , Str "only"-            , Space-            , Str "the"-            , Space-            , Str "word"-            , Space-            , Str "\"PASS\""-            , Space-            , Str "is"-            , Space-            , Str "rendered"-            , Space-            , Str "before"-            , Space-            , Str "this"-            , Space-            , Str "paragraph,"-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "passes."-            , Space-            , Str "If"-            , Space-            , Str "both"-            , Space-            , Str "\"PASS\""-            , Space-            , Str "and"-            , Space-            , Str "\"FAIL\""-            , Space-            , Str "are"-            , Space-            , Str "rendered,"-            , Space-            , Str "or"-            , Space-            , Str "neither"-            , SoftBreak-            , Str "\"PASS\""-            , Space-            , Str "nor"-            , Space-            , Str "\"FAIL\""-            , Space-            , Str "is"-            , Space-            , Str "rendered,"-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "fails."-            ]-        ]-    , Div-        ( "content-switch-001.xhtml#switch-020"-        , [ "section" , "otest" ]-        , []-        )-        [ Header-            4-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[OPTIONAL]" ]-            , SoftBreak-            , Span ( "" , [ "test-id" ] , [] ) [ Str "switch-020" ]-            , SoftBreak-            , Str "MathML"-            , Space-            , Str "Embedding"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Str "MathML"-            , Space-            , Str "namespace"-            , Space-            , Str "is"-            , Space-            , Str "recognized"-            , Space-            , Str "when"-            , Space-            , Str "used"-            , Space-            , Str "in"-            , Space-            , Str "an"-            , Space-            , Link-                ( "" , [] , [] )-                [ Code ( "" , [] , [] ) "epub:case" ]-                ( "http://idpf.org/epub/30/spec/epub30-contentdocs.html#sec-xhtml-epub-case"-                , ""-                )-            , Space-            , Str "element."-            ]-        , Para [ Math InlineMath "{2x}{+ y - z}" ]-        , Para-            [ Str "If"-            , Space-            , Str "a"-            , Space-            , Str "MathML"-            , Space-            , Str "equation"-            , Space-            , Str "is"-            , Space-            , Str "rendered"-            , Space-            , Str "before"-            , Space-            , Str "this"-            , Space-            , Str "paragraph,"-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "passes."-            ]-        , Para-            [ Str "If"-            , Space-            , Str "test"-            , Space-            , Code ( "" , [] , [] ) "switch-010"-            , Space-            , Str "did"-            , Space-            , Str "not"-            , Space-            , Str "pass,"-            , Space-            , Str "this"-            , Space-            , Str "test"-            , Space-            , Str "should"-            , Space-            , Str "be"-            , Space-            , Str "marked"-            , Space-            , Code ( "" , [] , [] ) "Not Supported"-            , Str "."-            ]-        ]-    ]-]+Pandoc+  Meta+    { unMeta =+        fromList+          [ ( "author"+            , MetaList+                [ MetaInlines [ Str "Ori Idan" ]+                , MetaInlines [ Str "Matt Garrish" ]+                , MetaInlines [ Str "Marisa DeMeglio" ]+                , MetaInlines [ Str "Toshiaki Koike" ]+                , MetaInlines [ Str "Vincent Gros" ]+                , MetaInlines [ Str "Markus Gylling" ]+                ]+            )+          , ( "description"+            , MetaInlines+                [ Str+                    "Tests for Content Documents in a reflowable context [UNDER CONSTRUCTION]"+                ]+            )+          , ( "identifier"+            , MetaInlines+                [ Str "com.github.epub-testsuite.epub30-test-0100" ]+            )+          , ( "language"+            , MetaList+                [ MetaInlines [ Str "jp" ] , MetaInlines [ Str "en" ] ]+            )+          , ( "title"+            , MetaInlines+                [ Str "EPUBTEST 0100 - Reflowable Content Tests" ]+            )+          ]+    }+  [ Para [ Span ( "front.xhtml" , [] , [] ) [] ]+  , Div+      ( "" , [ "section" ] , [] )+      [ Header+          1+          ( "" , [] , [] )+          [ Str "Reflowable"+          , Space+          , Str "EPUB"+          , Space+          , Str "3"+          , Space+          , Str "Conformance"+          , Space+          , Str "Test"+          , Space+          , Str "Document:"+          , Space+          , Str "0100"+          ]+      , Div+          ( "" , [ "section" ] , [] )+          [ Header+              2+              ( "" , [] , [] )+              [ Str "Status"+              , Space+              , Str "of"+              , Space+              , Str "this"+              , Space+              , Str "Document"+              ]+          , Para+              [ Str "This"+              , Space+              , Str "publication"+              , Space+              , Str "is"+              , Space+              , Str "currently"+              , Space+              , Str "considered"+              , Space+              , Span+                  ( "" , [ "status" ] , [] )+                  [ Str "[UNDER" , Space , Str "DEVELOPMENT]" ]+              , Space+              , Str "by"+              , Space+              , Str "the"+              , Space+              , Str "IDPF."+              ]+          , Para+              [ Str "This"+              , Space+              , Str "publication"+              , Space+              , Str "is"+              , Space+              , Str "part"+              , Space+              , Str "of"+              , Space+              , Str "version"+              , Space+              , Span ( "" , [ "version" ] , [] ) [ Str "X.X" ]+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Str "EPUB"+              , Space+              , Str "3.0"+              , Space+              , Str "Compliance"+              , Space+              , Str "Test"+              , Space+              , Str "Suite"+              , Space+              , Str "released"+              , SoftBreak+              , Str "on"+              , Space+              , RawInline (Format "html") "<time class=\"release\">"+              , Str "TBD"+              , RawInline (Format "html") "</time>"+              , Str "."+              ]+          , Para+              [ Str "Before"+              , Space+              , Str "using"+              , Space+              , Str "this"+              , Space+              , Str "publication"+              , Space+              , Str "to"+              , Space+              , Str "evaluate"+              , Space+              , Str "reading"+              , Space+              , Str "systems,"+              , Space+              , Str "testers"+              , Space+              , Str "are"+              , Space+              , Str "strongly"+              , Space+              , Str "encouraged"+              , Space+              , Str "to"+              , SoftBreak+              , Str "verify"+              , Space+              , Str "that"+              , Space+              , Str "they"+              , Space+              , Str "have"+              , Space+              , Str "the"+              , Space+              , Str "latest"+              , Space+              , Str "release"+              , Space+              , Str "by"+              , Space+              , Str "checking"+              , Space+              , Str "the"+              , Space+              , Str "current"+              , Space+              , Str "release"+              , Space+              , Str "version"+              , Space+              , Str "and"+              , Space+              , Str "date"+              , Space+              , Str "of"+              , SoftBreak+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "suite"+              , Space+              , Str "at"+              , Space+              , Link+                  ( "" , [] , [] )+                  [ Str "TBD" ]+                  ( "http://idpf.org/" , "" )+              ]+          , Para+              [ Str "This"+              , Space+              , Str "publication"+              , Space+              , Str "is"+              , Space+              , Str "one"+              , Space+              , Str "of"+              , Space+              , Str "several"+              , Space+              , Str "that"+              , Space+              , Str "currently"+              , Space+              , Str "comprise"+              , Space+              , Str "the"+              , Space+              , Str "EPUB"+              , Space+              , Str "3"+              , Space+              , Str "conformance"+              , Space+              , Str "test"+              , Space+              , Str "suite"+              , SoftBreak+              , Str "for"+              , Space+              , Str "reflowable"+              , Space+              , Str "content."+              , Space+              , Str "The"+              , Space+              , Str "complete"+              , Space+              , Str "test"+              , Space+              , Str "suite"+              , Space+              , Str "includes"+              , Space+              , Str "all"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Str "following"+              , Space+              , Str "publications:"+              ]+          , OrderedList+              ( 1 , DefaultStyle , DefaultDelim )+              [ [ Plain [ Str "." ] ] ]+          ]+      , Div+          ( "" , [ "section" ] , [] )+          [ Header+              2+              ( "" , [] , [] )+              [ Str "About"+              , Space+              , Str "this"+              , Space+              , Str "Document"+              ]+          , Para+              [ Str "This"+              , Space+              , Str "document"+              , Space+              , Str "focuses"+              , Space+              , Str "on"+              , Space+              , Str "human-evaluated"+              , Space+              , Str "binary"+              , Space+              , Str "(pass/fail)"+              , Space+              , Str "tests"+              , Space+              , Str "in"+              , Space+              , Str "a"+              , SoftBreak+              , Str "reflowable"+              , Space+              , Str "context."+              , Space+              , Str "Tests"+              , Space+              , Str "for"+              , Space+              , Str "fixed-layout"+              , Space+              , Str "content"+              , Space+              , Str "and"+              , Space+              , Str "other"+              , Space+              , Str "individual"+              , Space+              , Str "tests"+              , Space+              , Str "that"+              , SoftBreak+              , Str "require"+              , Space+              , Str "a"+              , Space+              , Str "dedicated"+              , Space+              , Str "epub"+              , Space+              , Str "file"+              , Space+              , Str "are"+              , Space+              , Str "available"+              , Space+              , Str "in"+              , Space+              , Str "additional"+              , Space+              , Str "sibling"+              , Space+              , Str "documents;"+              , Space+              , Str "refer"+              , Space+              , Str "to"+              , SoftBreak+              , Str "the"+              , Space+              , Link+                  ( "" , [] , [] )+                  [ Str "test"+                  , Space+                  , Str "suite"+                  , SoftBreak+                  , Str "wiki"+                  ]+                  ( "https://github.com/mgylling/epub-testsuite/wiki/Overview"+                  , ""+                  )+              , Space+              , Str "("+              , Code+                  ( "" , [] , [] )+                  "https://github.com/mgylling/epub-testsuite/wiki/Overview"+              , Str ")"+              , Space+              , Str "for"+              , Space+              , Str "additional"+              , SoftBreak+              , Str "information."+              ]+          ]+      , Div+          ( "" , [ "section" ] , [] )+          [ Header 2 ( "" , [] , [] ) [ Str "Conventions" ]+          , Para+              [ Str "The"+              , Space+              , Str "following"+              , Space+              , Str "conventions"+              , Space+              , Str "are"+              , Space+              , Str "used"+              , Space+              , Str "throughout"+              , Space+              , Str "the"+              , Space+              , Str "document:"+              ]+          , DefinitionList+              [ ( [ Str "1."+                  , Space+                  , Str "Locating"+                  , Space+                  , Str "a"+                  , Space+                  , Str "test"+                  ]+                , [ [ Div+                        ( "" , [ "ctest" ] , [] )+                        [ Para+                            [ Str "Tests"+                            , Space+                            , Str "for"+                            , Space+                            , Emph [ Str "required" ]+                            , Space+                            , Str "Reading"+                            , Space+                            , Str "System"+                            , Space+                            , Str "functionality"+                            , Space+                            , Str "are"+                            , SoftBreak+                            , Str "preceded"+                            , Space+                            , Str "by"+                            , Space+                            , Str "the"+                            , Space+                            , Str "label:"+                            , Space+                            , Span+                                ( ""+                                , [ "nature" ]+                                , [ ( "style"+                                    , "display: inline; font-size: 100%"+                                    )+                                  ]+                                )+                                [ Str "[REQUIRED]" ]+                            ]+                        ]+                    , Div+                        ( "" , [ "otest" ] , [] )+                        [ Para+                            [ Str "Tests"+                            , Space+                            , Str "for"+                            , Space+                            , Emph [ Str "optional" ]+                            , Space+                            , Str "Reading"+                            , Space+                            , Str "System"+                            , Space+                            , Str "functionality"+                            , Space+                            , Str "are"+                            , SoftBreak+                            , Str "preceded"+                            , Space+                            , Str "by"+                            , Space+                            , Str "the"+                            , Space+                            , Str "label:"+                            , Space+                            , Span+                                ( ""+                                , [ "nature" ]+                                , [ ( "style"+                                    , "display: inline; font-size: 100%"+                                    )+                                  ]+                                )+                                [ Str "[OPTIONAL]" ]+                            ]+                        ]+                    ]+                  ]+                )+              , ( [ Str "2."+                  , Space+                  , Str "Performing"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  ]+                , [ [ Plain+                        [ Str "Each"+                        , Space+                        , Str "test"+                        , Space+                        , Str "includes"+                        , Space+                        , Str "a"+                        , Space+                        , Str "description"+                        , Space+                        , Str "of"+                        , Space+                        , Str "its"+                        , Space+                        , Str "purpose"+                        , Space+                        , Str "followed"+                        , Space+                        , Str "by"+                        , Space+                        , Str "the"+                        , Space+                        , Str "actual"+                        , Space+                        , Strong+                            [ Str "test"+                            , Space+                            , Str "statement,"+                            , SoftBreak+                            , Str "which"+                            , Space+                            , Str "can"+                            , Space+                            , Str "always"+                            , Space+                            , Str "be"+                            , Space+                            , Str "evaluated"+                            , Space+                            , Str "to"+                            , Space+                            , Str "true"+                            , Space+                            , Str "or"+                            , Space+                            , Str "false"+                            ]+                        , Str "."+                        , Space+                        , Str "These"+                        , Space+                        , Str "statements"+                        , Space+                        , Str "typically"+                        , Space+                        , Str "have"+                        , Space+                        , Str "the"+                        , Space+                        , Str "form:"+                        , SoftBreak+                        , Str "\"If"+                        , Space+                        , Str "[some"+                        , Space+                        , Str "condition],"+                        , Space+                        , Str "the"+                        , Space+                        , Str "test"+                        , Space+                        , Str "passes\"."+                        ]+                    ]+                  ]+                )+              , ( [ Str "3."+                  , Space+                  , Str "Scoring"+                  , Space+                  , Str "in"+                  , Space+                  , Str "the"+                  , Space+                  , Str "results"+                  , Space+                  , Str "form"+                  ]+                , [ [ Plain+                        [ Str "@@@TODO"+                        , Space+                        , Str "provide"+                        , Space+                        , Str "info"+                        , Space+                        , Str "on"+                        , Space+                        , Str "where"+                        , Space+                        , Str "to"+                        , Space+                        , Str "get"+                        , Space+                        , Str "the"+                        , Space+                        , Str "results"+                        , Space+                        , Str "form"+                        ]+                    ]+                  ]+                )+              ]+          ]+      ]+  , Para [ Span ( "content-mathml-001.xhtml" , [] , [] ) [] ]+  , Div+      ( "" , [ "section" ] , [] )+      [ Header+          2+          ( "content-mathml-001.xhtml_mathml" , [] , [] )+          [ Str "MathML" ]+      , Div+          ( "content-mathml-001.xhtml_mathml-010"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , SoftBreak+              , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-010" ]+              , Space+              , Str "Rendering"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "MathML"+              , Space+              , Str "equation"+              , Space+              , Str "rendering"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Plain+              [ Math+                  DisplayMath+                  "\\int_{- \\infty}^{\\infty}e^{- x^{2}}\\, dx = \\sqrt{\\pi}"+              , SoftBreak+              , Math+                  DisplayMath+                  "\\sum\\limits_{n = 1}^{\\infty}\\frac{1}{n^{2}} = \\frac{\\pi^{2}}{6}"+              , SoftBreak+              , Math+                  DisplayMath+                  "x = \\frac{- b \\pm \\sqrt{b^{2} - 4ac}}{2a}"+              ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "equations"+              , Space+              , Str "are"+              , Space+              , Str "not"+              , Space+              , Str "presented"+              , Space+              , Str "as"+              , Space+              , Str "linear"+              , Space+              , Str "text"+              , Space+              , Str "(e.g.,"+              , Space+              , Str "x=-b\177b2-4ac2a),"+              , SoftBreak+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "passes."+              ]+          ]+      , Div+          ( "content-mathml-001.xhtml_mathml-020"+          , [ "section" , "otest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[OPTIONAL]" ]+              , SoftBreak+              , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-020" ]+              , Space+              , Str "CSS"+              , Space+              , Str "Styling"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "math"+              , Space+              , Str "element"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "basic"+              , Space+              , Str "CSS"+              , Space+              , Str "styling"+              , Space+              , Str "of"+              , Space+              , Str "MathML"+              , Space+              , Str "is"+              , Space+              , Str "supported"+              , Space+              , Str "on"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "math"+              , Space+              , Str "element."+              ]+          , Plain [ Math InlineMath "{2x}{+ y - z}" ]+          , Para+              [ Str "The"+              , Space+              , Str "test"+              , Space+              , Str "passes"+              , Space+              , Str "if"+              , Space+              , Str "the"+              , Space+              , Str "equation"+              , Space+              , Str "has"+              , Space+              , Str "a"+              , Space+              , Str "yellow"+              , Space+              , Str "background"+              , Space+              , Str "and"+              , Space+              , Str "a"+              , Space+              , Str "dashed"+              , Space+              , Str "border."+              ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "reading"+              , Space+              , Str "system"+              , Space+              , Str "does"+              , Space+              , Str "not"+              , Space+              , Str "have"+              , Space+              , Str "a"+              , Space+              , Str "viewport,"+              , Space+              , Str "or"+              , Space+              , Str "does"+              , Space+              , Str "not"+              , Space+              , Str "support"+              , SoftBreak+              , Str "CSS"+              , Space+              , Str "styles,"+              , Space+              , Str "this"+              , Space+              , Str "test"+              , Space+              , Str "should"+              , Space+              , Str "be"+              , Space+              , Str "marked"+              , Space+              , Code ( "" , [] , [] ) "Not Supported"+              , Str "."+              ]+          ]+      , Div+          ( "content-mathml-001.xhtml_mathml-021"+          , [ "section" , "otest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[OPTIONAL]" ]+              , SoftBreak+              , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-021" ]+              , Space+              , Str "CSS"+              , Space+              , Str "Styling"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "mo"+              , Space+              , Str "element"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "basic"+              , Space+              , Str "CSS"+              , Space+              , Str "styling"+              , Space+              , Str "of"+              , Space+              , Str "MathML"+              , Space+              , Str "is"+              , Space+              , Str "supported"+              , Space+              , Str "on"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "mo"+              , Space+              , Str "element."+              ]+          , Plain [ Math InlineMath "{2x}{+ y - z}" ]+          , Para+              [ Str "The"+              , Space+              , Str "test"+              , Space+              , Str "passes"+              , Space+              , Str "if"+              , Space+              , Str "the"+              , Space+              , Str "operators"+              , Space+              , Str "are"+              , Space+              , Str "enlarged"+              , Space+              , Str "relative"+              , Space+              , Str "to"+              , Space+              , Str "the"+              , Space+              , Str "other"+              , Space+              , Str "symbols"+              , Space+              , Str "and"+              , Space+              , Str "numbers."+              ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "reading"+              , Space+              , Str "system"+              , Space+              , Str "does"+              , Space+              , Str "not"+              , Space+              , Str "have"+              , Space+              , Str "a"+              , Space+              , Str "viewport,"+              , Space+              , Str "or"+              , Space+              , Str "does"+              , Space+              , Str "not"+              , Space+              , Str "support"+              , SoftBreak+              , Str "CSS"+              , Space+              , Str "styles,"+              , Space+              , Str "this"+              , Space+              , Str "test"+              , Space+              , Str "should"+              , Space+              , Str "be"+              , Space+              , Str "marked"+              , Space+              , Code ( "" , [] , [] ) "Not Supported"+              , Str "."+              ]+          ]+      , Div+          ( "content-mathml-001.xhtml_mathml-022"+          , [ "section" , "otest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[OPTIONAL]" ]+              , SoftBreak+              , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-022" ]+              , Space+              , Str "CSS"+              , Space+              , Str "Styling"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "mi"+              , Space+              , Str "element"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "basic"+              , Space+              , Str "CSS"+              , Space+              , Str "styling"+              , Space+              , Str "of"+              , Space+              , Str "MathML"+              , Space+              , Str "is"+              , Space+              , Str "supported"+              , Space+              , Str "on"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "mi"+              , Space+              , Str "element."+              ]+          , Plain [ Math InlineMath "{2x}{+ y - z}" ]+          , Para+              [ Str "The"+              , Space+              , Str "test"+              , Space+              , Str "passes"+              , Space+              , Str "if"+              , Space+              , Str "the"+              , Space+              , Str "identifiers"+              , Space+              , Str "are"+              , Space+              , Str "bolded"+              , Space+              , Str "and"+              , Space+              , Str "blue."+              ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "reading"+              , Space+              , Str "system"+              , Space+              , Str "does"+              , Space+              , Str "not"+              , Space+              , Str "have"+              , Space+              , Str "a"+              , Space+              , Str "viewport,"+              , Space+              , Str "or"+              , Space+              , Str "does"+              , Space+              , Str "not"+              , Space+              , Str "support"+              , SoftBreak+              , Str "CSS"+              , Space+              , Str "styles,"+              , Space+              , Str "this"+              , Space+              , Str "test"+              , Space+              , Str "should"+              , Space+              , Str "be"+              , Space+              , Str "marked"+              , Space+              , Code ( "" , [] , [] ) "Not Supported"+              , Str "."+              ]+          ]+      , Div+          ( "content-mathml-001.xhtml_mathml-023"+          , [ "section" , "otest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[OPTIONAL]" ]+              , SoftBreak+              , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-023" ]+              , Space+              , Str "CSS"+              , Space+              , Str "Styling"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "mn"+              , Space+              , Str "element"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "basic"+              , Space+              , Str "CSS"+              , Space+              , Str "styling"+              , Space+              , Str "of"+              , Space+              , Str "MathML"+              , Space+              , Str "is"+              , Space+              , Str "supported"+              , Space+              , Str "on"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "mn"+              , Space+              , Str "element."+              ]+          , Plain [ Math InlineMath "{2x}{+ y - z}" ]+          , Para+              [ Str "The"+              , Space+              , Str "test"+              , Space+              , Str "passes"+              , Space+              , Str "if"+              , Space+              , Str "the"+              , Space+              , Str "number"+              , Space+              , Str "2"+              , Space+              , Str "is"+              , Space+              , Str "italicized"+              , Space+              , Str "and"+              , Space+              , Str "blue."+              ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "reading"+              , Space+              , Str "system"+              , Space+              , Str "does"+              , Space+              , Str "not"+              , Space+              , Str "have"+              , Space+              , Str "a"+              , Space+              , Str "viewport,"+              , Space+              , Str "or"+              , Space+              , Str "does"+              , Space+              , Str "not"+              , Space+              , Str "support"+              , SoftBreak+              , Str "CSS"+              , Space+              , Str "styles,"+              , Space+              , Str "this"+              , Space+              , Str "test"+              , Space+              , Str "should"+              , Space+              , Str "be"+              , Space+              , Str "marked"+              , Space+              , Code ( "" , [] , [] ) "Not Supported"+              , Str "."+              ]+          ]+      , Div+          ( "content-mathml-001.xhtml_mathml-024"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , SoftBreak+              , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-024" ]+              , Str "Horizontal"+              , Space+              , Str "stretch,"+              , Space+              , Code ( "" , [] , [] ) "mover"+              , Str ","+              , Space+              , Code ( "" , [] , [] ) "munder"+              , Str ","+              , Space+              , Str "and"+              , Space+              , Code ( "" , [] , [] ) "mspace"+              , Space+              , Str "elements"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "horizontal"+              , Space+              , Str "stretch,"+              , Space+              , Code ( "" , [] , [] ) "mover"+              , Str ","+              , Space+              , Code ( "" , [] , [] ) "munder"+              , Str ","+              , Space+              , Code ( "" , [] , [] ) "mspace"+              , Space+              , Str "elements"+              , Space+              , Str "are"+              , Space+              , Str "supported."+              ]+          , Plain+              [ Math+                  DisplayMath+                  "c = \\overset{\\text{complex number}}{\\overbrace{\\underset{\\text{real}}{\\underbrace{\\mspace{20mu} a\\mspace{20mu}}} + \\underset{\\text{imaginary}}{\\underbrace{\\quad b{\\mathbb{i}}\\quad}}}}"+              ]+          , Para+              [ Str "The"+              , Space+              , Str "test"+              , Space+              , Str "passes"+              , Space+              , Str "if"+              , Space+              , Str "the"+              , Space+              , Str "rendering"+              , Space+              , Str "looks"+              , Space+              , Str "like"+              , Space+              , Str "."+              ]+          ]+      , Div+          ( "content-mathml-001.xhtml_mathml-025"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , SoftBreak+              , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-025" ]+              , Str "Testing"+              , Space+              , Code ( "" , [] , [] ) "mtable"+              , Space+              , Str "with"+              , Space+              , Code ( "" , [] , [] ) "colspan"+              , Space+              , Str "and"+              , Space+              , Code ( "" , [] , [] ) "rowspan"+              , Space+              , Str "attributes,"+              , Space+              , Str "Hebrew"+              , Space+              , Str "and"+              , Space+              , Str "Script"+              , Space+              , Str "fonts"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Code ( "" , [] , [] ) "mtable"+              , Space+              , Str "with"+              , Space+              , Code ( "" , [] , [] ) "colspan"+              , Space+              , Str "and"+              , Space+              , Code ( "" , [] , [] ) "mspace"+              , Space+              , Str "attributes"+              , Space+              , Str "(column"+              , Space+              , Str "and"+              , Space+              , Str "row"+              , Space+              , Str "spanning)"+              , Space+              , Str "are"+              , Space+              , Str "supported;"+              , Space+              , Str "uses"+              , Space+              , Str "Hebrew"+              , Space+              , Str "and"+              , Space+              , Str "Script"+              , Space+              , Str "alphabets."+              ]+          , Plain+              [ Math+                  DisplayMath+                  "\\begin{matrix}\n & {\\operatorname{cov}(\\mathcal{L})} & \\longrightarrow & {\\operatorname{non}(\\mathcal{K})} & \\longrightarrow & {\\operatorname{cof}(\\mathcal{K})} & \\longrightarrow & {\\operatorname{cof}(\\mathcal{L})} & \\longrightarrow & 2^{\\aleph_{0}} \\\\\n & \\uparrow & & \\uparrow & & \\uparrow & & \\uparrow & & \\\\\n & {\\mathfrak{b}} & \\longrightarrow & {\\mathfrak{d}} & & & & & & \\\\\n & \\uparrow & & \\uparrow & & & & & & \\\\\n\\aleph_{1} & \\longrightarrow & {\\operatorname{add}(\\mathcal{L})} & \\longrightarrow & {\\operatorname{add}(\\mathcal{K})} & \\longrightarrow & {\\operatorname{cov}(\\mathcal{K})} & \\longrightarrow & {\\operatorname{non}(\\mathcal{L})} & \n\\end{matrix}"+              ]+          , Para+              [ Str "The"+              , Space+              , Str "test"+              , Space+              , Str "passes"+              , Space+              , Str "if"+              , Space+              , Str "the"+              , Space+              , Str "rendering"+              , Space+              , Str "looks"+              , Space+              , Str "like"+              , Space+              , Link+                  ( "" , [] , [] )+                  [ Str "Cicho\324's" , Space , Str "Diagram" ]+                  ( "http://en.wikipedia.org/wiki/Cicho%C5%84's_diagram"+                  , ""+                  )+              , Str ":"+              , Space+              , Str "."+              ]+          ]+      , Div+          ( "content-mathml-001.xhtml_mathml-026"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , SoftBreak+              , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-026" ]+              , Str "BiDi,"+              , Space+              , Str "RTL"+              , Space+              , Str "and"+              , Space+              , Str "Arabic"+              , Space+              , Str "alphabets"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "right-to-left"+              , Space+              , Str "and"+              , Space+              , Str "Arabic"+              , Space+              , Str "alphabets"+              , Space+              , Str "are"+              , Space+              , Str "supported."+              ]+          , Plain+              [ Math+                  DisplayMath+                  "{\1583(\1587)} = \\left\\{ \\begin{matrix}\n{\\sum\\limits_{\1646 = 1}^{\1589}\1587^{\1646}} & {\\text{\1573\1584\1575\1603\1575\1606}\1587 > 0} \\\\\n{\\int_{1}^{\1589}{\1587^{\1646}\1569\1587}} & {\\text{\1573\1584\1575\1603\1575\1606}\1587 \\in \1605} \\\\\n{{\1591\1575}\\pi} & {\\text{\1594\1610\1585\1584\1604\1603}\\left( \\text{\1605\1593}\\pi \\simeq 3,141 \\right)}\n\\end{matrix} \\right."+              ]+          , Para+              [ Str "The"+              , Space+              , Str "test"+              , Space+              , Str "passes"+              , Space+              , Str "if"+              , Space+              , Str "the"+              , Space+              , Str "rendering"+              , Space+              , Str "looks"+              , Space+              , Str "like"+              , Space+              , Str "the"+              , Space+              , Str "following"+              , Space+              , Str "image:"+              ]+          ]+      , Div+          ( "content-mathml-001.xhtml_mathml-027"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , SoftBreak+              , Span ( "" , [ "test-id" ] , [] ) [ Str "mathml-027" ]+              , Str "Elementary"+              , Space+              , Str "math:"+              , Space+              , Str "long"+              , Space+              , Str "division"+              , Space+              , Str "notation"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Code ( "" , [] , [] ) "mlongdiv"+              , Space+              , Str "elements"+              , Space+              , Str "(from"+              , Space+              , Str "elementary"+              , Space+              , Str "math)"+              , Space+              , Str "are"+              , Space+              , Str "supported."+              ]+          , Plain+              [ Span+                  ( ""+                  , [ "math" ]+                  , [ ( "xmlns" , "http://www.w3.org/1998/Math/MathML" )+                    ]+                  )+                  [ SoftBreak+                  , Str "3"+                  , SoftBreak+                  , Str "435.3"+                  , SoftBreak+                  , Str "1306"+                  , SoftBreak+                  , Str "12"+                  , SoftBreak+                  , Str "10"+                  , SoftBreak+                  , Str "9"+                  , SoftBreak+                  , Str "16"+                  , SoftBreak+                  , Str "15"+                  , SoftBreak+                  , Str "1.0"+                  , SoftBreak+                  , Str "9"+                  , SoftBreak+                  , Str "1"+                  , SoftBreak+                  ]+              ]+          , Para+              [ Str "The"+              , Space+              , Str "test"+              , Space+              , Str "passes"+              , Space+              , Str "if"+              , Space+              , Str "the"+              , Space+              , Str "rendering"+              , Space+              , Str "looks"+              , Space+              , Str "like"+              , Space+              , Str "the"+              , Space+              , Str "following"+              , Space+              , Str "image:"+              , Space+              , Str "."+              ]+          ]+      ]+  , Para [ Span ( "content-switch-001.xhtml" , [] , [] ) [] ]+  , Div+      ( "content-switch-001.xhtml_epub-switch"+      , [ "section" ]+      , []+      )+      [ Header+          3 ( "" , [] , [] ) [ Code ( "" , [] , [] ) "epub:switch" ]+      , Div+          ( "content-switch-001.xhtml_switch-010"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              4+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "switch-010" ]+              , Space+              , Str "Support"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Link+                  ( "" , [] , [] )+                  [ Code ( "" , [] , [] ) "epub:switch" ]+                  ( "http://idpf.org/epub/30/spec/epub30-contentdocs.html#sec-xhtml-content-switch"+                  , ""+                  )+              , Space+              , Str "element"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para [ Str "PASS" ]+          , Para+              [ Str "If"+              , Space+              , Str "only"+              , Space+              , Str "the"+              , Space+              , Str "word"+              , Space+              , Str "\"PASS\""+              , Space+              , Str "is"+              , Space+              , Str "rendered"+              , Space+              , Str "before"+              , Space+              , Str "this"+              , Space+              , Str "paragraph,"+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "passes."+              , Space+              , Str "If"+              , Space+              , Str "both"+              , Space+              , Str "\"PASS\""+              , Space+              , Str "and"+              , Space+              , Str "\"FAIL\""+              , Space+              , Str "are"+              , Space+              , Str "rendered,"+              , Space+              , Str "or"+              , Space+              , Str "neither"+              , SoftBreak+              , Str "\"PASS\""+              , Space+              , Str "nor"+              , Space+              , Str "\"FAIL\""+              , Space+              , Str "is"+              , Space+              , Str "rendered,"+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "fails."+              ]+          ]+      , Div+          ( "content-switch-001.xhtml_switch-020"+          , [ "section" , "otest" ]+          , []+          )+          [ Header+              4+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[OPTIONAL]" ]+              , SoftBreak+              , Span ( "" , [ "test-id" ] , [] ) [ Str "switch-020" ]+              , SoftBreak+              , Str "MathML"+              , Space+              , Str "Embedding"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Str "MathML"+              , Space+              , Str "namespace"+              , Space+              , Str "is"+              , Space+              , Str "recognized"+              , Space+              , Str "when"+              , Space+              , Str "used"+              , Space+              , Str "in"+              , Space+              , Str "an"+              , Space+              , Link+                  ( "" , [] , [] )+                  [ Code ( "" , [] , [] ) "epub:case" ]+                  ( "http://idpf.org/epub/30/spec/epub30-contentdocs.html#sec-xhtml-epub-case"+                  , ""+                  )+              , Space+              , Str "element."+              ]+          , Para [ Math InlineMath "{2x}{+ y - z}" ]+          , Para+              [ Str "If"+              , Space+              , Str "a"+              , Space+              , Str "MathML"+              , Space+              , Str "equation"+              , Space+              , Str "is"+              , Space+              , Str "rendered"+              , Space+              , Str "before"+              , Space+              , Str "this"+              , Space+              , Str "paragraph,"+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "passes."+              ]+          , Para+              [ Str "If"+              , Space+              , Str "test"+              , Space+              , Code ( "" , [] , [] ) "switch-010"+              , Space+              , Str "did"+              , Space+              , Str "not"+              , Space+              , Str "pass,"+              , Space+              , Str "this"+              , Space+              , Str "test"+              , Space+              , Str "should"+              , Space+              , Str "be"+              , Space+              , Str "marked"+              , Space+              , Code ( "" , [] , [] ) "Not Supported"+              , Str "."+              ]+          ]+      ]+  ]
test/epub/formatting.native view
@@ -1,5989 +1,6020 @@-[ Para [ Span ( "front.xhtml" , [] , [] ) [] ]-, Div-    ( "" , [ "section" ] , [] )-    [ Header-        1-        ( "" , [] , [] )-        [ Str "EPUB"-        , Space-        , Str "3"-        , Space-        , Str "Styling"-        , Space-        , Str "Test"-        , Space-        , Str "Document:"-        , Space-        , Str "0101"-        ]-    , Div-        ( "" , [ "section" ] , [] )-        [ Header-            2-            ( "" , [] , [] )-            [ Str "Status"-            , Space-            , Str "of"-            , Space-            , Str "this"-            , Space-            , Str "Document"-            ]-        , Para-            [ Str "This"-            , Space-            , Str "publication"-            , Space-            , Str "is"-            , Space-            , Str "currently"-            , Space-            , Str "considered"-            , Space-            , Span-                ( "" , [ "status" ] , [] )-                [ Str "[UNDER" , Space , Str "DEVELOPMENT]" ]-            , Space-            , Str "by"-            , Space-            , Str "the"-            , Space-            , Str "IDPF."-            ]-        , Para-            [ Str "This"-            , Space-            , Str "publication"-            , Space-            , Str "is"-            , Space-            , Str "part"-            , Space-            , Str "of"-            , Space-            , Str "version"-            , Space-            , Span ( "" , [ "version" ] , [] ) [ Str "X.X" ]-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Str "EPUB"-            , Space-            , Str "3.0"-            , Space-            , Str "Compliance"-            , Space-            , Str "Test"-            , Space-            , Str "Suite"-            , Space-            , Str "released"-            , SoftBreak-            , Str "on"-            , Space-            , RawInline (Format "html") "<time class=\"release\">"-            , Str "TBD"-            , RawInline (Format "html") "</time>"-            , Str "."-            ]-        , Para-            [ Str "Before"-            , Space-            , Str "using"-            , Space-            , Str "this"-            , Space-            , Str "publication"-            , Space-            , Str "to"-            , Space-            , Str "evaluate"-            , Space-            , Str "reading"-            , Space-            , Str "systems,"-            , Space-            , Str "testers"-            , Space-            , Str "are"-            , Space-            , Str "strongly"-            , Space-            , Str "encouraged"-            , Space-            , Str "to"-            , SoftBreak-            , Str "verify"-            , Space-            , Str "that"-            , Space-            , Str "they"-            , Space-            , Str "have"-            , Space-            , Str "the"-            , Space-            , Str "latest"-            , Space-            , Str "release"-            , Space-            , Str "by"-            , Space-            , Str "checking"-            , Space-            , Str "the"-            , Space-            , Str "current"-            , Space-            , Str "release"-            , Space-            , Str "version"-            , Space-            , Str "and"-            , Space-            , Str "date"-            , Space-            , Str "of"-            , SoftBreak-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "suite"-            , Space-            , Str "at"-            , Space-            , Link-                ( "" , [] , [] )-                [ Str "TBD" ]-                ( "http://idpf.org/" , "" )-            ]-        , Para-            [ Str "This"-            , Space-            , Str "publication"-            , Space-            , Str "is"-            , Space-            , Str "one"-            , Space-            , Str "of"-            , Space-            , Str "several"-            , Space-            , Str "that"-            , Space-            , Str "currently"-            , Space-            , Str "comprise"-            , Space-            , Str "the"-            , Space-            , Str "EPUB"-            , Space-            , Str "3"-            , Space-            , Str "conformance"-            , Space-            , Str "test"-            , Space-            , Str "suite"-            , SoftBreak-            , Str "for"-            , Space-            , Str "reflowable"-            , Space-            , Str "content."-            , Space-            , Str "The"-            , Space-            , Str "complete"-            , Space-            , Str "test"-            , Space-            , Str "suite"-            , Space-            , Str "includes"-            , Space-            , Str "all"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Str "following"-            , Space-            , Str "publications:"-            ]-        , OrderedList-            ( 1 , DefaultStyle , DefaultDelim )-            [ [ Plain [ Str "." ] ] ]-        ]-    , Div-        ( "" , [ "section" ] , [] )-        [ Header-            2-            ( "" , [] , [] )-            [ Str "About"-            , Space-            , Str "this"-            , Space-            , Str "Document"-            ]-        , Para-            [ Str "This"-            , Space-            , Str "document"-            , Space-            , Str "focuses"-            , Space-            , Str "on"-            , Space-            , Str "human-evaluated"-            , Space-            , Str "binary"-            , Space-            , Str "(pass/fail)"-            , Space-            , Str "tests"-            , Space-            , Str "in"-            , Space-            , Str "a"-            , SoftBreak-            , Str "reflowable"-            , Space-            , Str "context."-            , Space-            , Str "Tests"-            , Space-            , Str "for"-            , Space-            , Str "fixed-layout"-            , Space-            , Str "content"-            , Space-            , Str "and"-            , Space-            , Str "other"-            , Space-            , Str "individual"-            , Space-            , Str "tests"-            , Space-            , Str "that"-            , SoftBreak-            , Str "require"-            , Space-            , Str "a"-            , Space-            , Str "dedicated"-            , Space-            , Str "epub"-            , Space-            , Str "file"-            , Space-            , Str "are"-            , Space-            , Str "available"-            , Space-            , Str "in"-            , Space-            , Str "additional"-            , Space-            , Str "sibling"-            , Space-            , Str "documents;"-            , Space-            , Str "refer"-            , Space-            , Str "to"-            , SoftBreak-            , Str "the"-            , Space-            , Link-                ( "" , [] , [] )-                [ Str "test"-                , Space-                , Str "suite"-                , SoftBreak-                , Str "wiki"-                ]-                ( "https://github.com/mgylling/epub-testsuite/wiki/Overview"-                , ""-                )-            , Space-            , Str "("-            , Code-                ( "" , [] , [] )-                "https://github.com/mgylling/epub-testsuite/wiki/Overview"-            , Str ")"-            , Space-            , Str "for"-            , Space-            , Str "additional"-            , SoftBreak-            , Str "information."-            ]-        ]-    , Div-        ( "" , [ "section" ] , [] )-        [ Header 2 ( "" , [] , [] ) [ Str "Conventions" ]-        , Para-            [ Str "The"-            , Space-            , Str "following"-            , Space-            , Str "conventions"-            , Space-            , Str "are"-            , Space-            , Str "used"-            , Space-            , Str "throughout"-            , Space-            , Str "the"-            , Space-            , Str "document:"-            ]-        , DefinitionList-            [ ( [ Str "1."-                , Space-                , Str "Locating"-                , Space-                , Str "a"-                , Space-                , Str "test"-                ]-              , [ [ Div-                      ( "" , [ "ctest" ] , [] )-                      [ Para-                          [ Str "Tests"-                          , Space-                          , Str "for"-                          , Space-                          , Emph [ Str "required" ]-                          , Space-                          , Str "Reading"-                          , Space-                          , Str "System"-                          , Space-                          , Str "functionality"-                          , Space-                          , Str "are"-                          , SoftBreak-                          , Str "preceded"-                          , Space-                          , Str "by"-                          , Space-                          , Str "the"-                          , Space-                          , Str "label:"-                          , Space-                          , Span-                              ( ""-                              , [ "nature" ]-                              , [ ( "style"-                                  , "display: inline; font-size: 100%"-                                  )-                                ]-                              )-                              [ Str "[REQUIRED]" ]-                          ]-                      ]-                  , Div-                      ( "" , [ "otest" ] , [] )-                      [ Para-                          [ Str "Tests"-                          , Space-                          , Str "for"-                          , Space-                          , Emph [ Str "optional" ]-                          , Space-                          , Str "Reading"-                          , Space-                          , Str "System"-                          , Space-                          , Str "functionality"-                          , Space-                          , Str "are"-                          , SoftBreak-                          , Str "preceded"-                          , Space-                          , Str "by"-                          , Space-                          , Str "the"-                          , Space-                          , Str "label:"-                          , Space-                          , Span-                              ( ""-                              , [ "nature" ]-                              , [ ( "style"-                                  , "display: inline; font-size: 100%"-                                  )-                                ]-                              )-                              [ Str "[OPTIONAL]" ]-                          ]-                      ]-                  ]-                ]-              )-            , ( [ Str "2."-                , Space-                , Str "Performing"-                , Space-                , Str "the"-                , Space-                , Str "test"-                ]-              , [ [ Plain-                      [ Str "Each"-                      , Space-                      , Str "test"-                      , Space-                      , Str "includes"-                      , Space-                      , Str "a"-                      , Space-                      , Str "description"-                      , Space-                      , Str "of"-                      , Space-                      , Str "its"-                      , Space-                      , Str "purpose"-                      , Space-                      , Str "followed"-                      , Space-                      , Str "by"-                      , Space-                      , Str "the"-                      , Space-                      , Str "actual"-                      , Space-                      , Strong-                          [ Str "test"-                          , Space-                          , Str "statement,"-                          , SoftBreak-                          , Str "which"-                          , Space-                          , Str "can"-                          , Space-                          , Str "always"-                          , Space-                          , Str "be"-                          , Space-                          , Str "evaluated"-                          , Space-                          , Str "to"-                          , Space-                          , Str "true"-                          , Space-                          , Str "or"-                          , Space-                          , Str "false"-                          ]-                      , Str "."-                      , Space-                      , Str "These"-                      , Space-                      , Str "statements"-                      , Space-                      , Str "typically"-                      , Space-                      , Str "have"-                      , Space-                      , Str "the"-                      , Space-                      , Str "form:"-                      , SoftBreak-                      , Str "\"If"-                      , Space-                      , Str "[some"-                      , Space-                      , Str "condition],"-                      , Space-                      , Str "the"-                      , Space-                      , Str "test"-                      , Space-                      , Str "passes\"."-                      ]-                  ]-                ]-              )-            , ( [ Str "3."-                , Space-                , Str "Scoring"-                , Space-                , Str "in"-                , Space-                , Str "the"-                , Space-                , Str "results"-                , Space-                , Str "form"-                ]-              , [ [ Plain-                      [ Str "@@@TODO"-                      , Space-                      , Str "provide"-                      , Space-                      , Str "info"-                      , Space-                      , Str "on"-                      , Space-                      , Str "where"-                      , Space-                      , Str "to"-                      , Space-                      , Str "get"-                      , Space-                      , Str "the"-                      , Space-                      , Str "results"-                      , Space-                      , Str "form"-                      ]-                  ]-                ]-              )-            ]-        ]-    ]-, Para [ Span ( "styling-xhtml-001.xhtml" , [] , [] ) [] ]-, Div-    ( "styling-xhtml-001.xhtml#epub-css" , [ "section" ] , [] )-    [ Header-        1-        ( "" , [] , [] )-        [ Str "EPUB" , Space , Str "Style" , Space , Str "Sheets" ]-    , Para-        [ Str "This"-        , Space-        , Str "section"-        , Space-        , Str "contains"-        , Space-        , Str "tests"-        , Space-        , Str "for"-        , Space-        , Str "styling"-        , Space-        , Str "and"-        , Space-        , Str "layout."-        ]-    ]-, Para [ Span ( "styling-xhtml-003.xhtml" , [] , [] ) [] ]-, Div-    ( "styling-xhtml-003.xhtml#style-110"-    , [ "section" , "ctest" ]-    , []-    )-    [ Header-        2-        ( "" , [] , [] )-        [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-        , Space-        , Span ( "" , [ "test-id" ] , [] ) [ Str "style-110" ]-        , Space-        , Str "Multi-Column"-        , Space-        , Str "Layouts"-        ]-    , Para-        [ Str "Tests"-        , Space-        , Str "whether"-        , Space-        , Str "the"-        , Space-        , Link-            ( "" , [] , [] )-            [ Code ( "" , [] , [] ) "CSS Multi-Column Layout" ]-            ( "http://idpf.org/epub/30/spec/epub30-contentdocs.html#sec-css-multi-column"-            , ""-            )-        , Space-        , Str "properties"-        , Space-        , Str "are"-        , Space-        , Str "supported."-        ]-    , Div-        ( "" , [ "multicol" ] , [] )-        [ Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        , Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        , Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        , Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        , Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        , Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        , Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        , Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        , Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        ]-    , Para-        [ Str "If"-        , Space-        , Str "the"-        , Space-        , Str "preceding"-        , Space-        , Str "text"-        , Space-        , Str "is"-        , Space-        , Str "rendered"-        , Space-        , Str "in"-        , Space-        , Str "three"-        , Space-        , Str "columns,"-        , Space-        , Str "the"-        , Space-        , Str "test"-        , Space-        , Str "passes."-        ]-    ]-, Para [ Span ( "styling-xhtml-002.xhtml" , [] , [] ) [] ]-, Div-    ( "styling-xhtml-002.xhtml#style-lists"-    , [ "section" ]-    , []-    )-    [ Header 2 ( "" , [] , [] ) [ Str "Lists" ]-    , Div-        ( "styling-xhtml-002.xhtml#style-list-style-type"-        , [ "section" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Str "The"-            , Space-            , Code ( "" , [] , [] ) "list-style-type"-            , Space-            , Str "property"-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-009"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-009" ]-                , Space-                , Code ( "" , [] , [] ) "decimal"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "decimal"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "decimal"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-010"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-010" ]-                , Space-                , Code ( "" , [] , [] ) "circle"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "circle"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ul"-                , Space-                , Str "element."-                ]-            , BulletList-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "circle"-                , Space-                , Str "markers,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-011"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-011" ]-                , Space-                , Code ( "" , [] , [] ) "square"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "square"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ul"-                , Space-                , Str "element."-                ]-            , BulletList-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "square"-                , Space-                , Str "markers,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-012"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-012" ]-                , Space-                , Code ( "" , [] , [] ) "disc"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "disc"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ul"-                , Space-                , Str "element."-                ]-            , BulletList-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "disc"-                , Space-                , Str "markers,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-013"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-013" ]-                , Space-                , Code ( "" , [] , [] ) "lower-latin"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "lower-latin"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "lower-latin"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-014"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-014" ]-                , Space-                , Code ( "" , [] , [] ) "lower-roman"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "lower-roman"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "lower-roman"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-015"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-015" ]-                , Space-                , Code ( "" , [] , [] ) "upper-alpha"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "upper-alpha"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "upper-alpha"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-016"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-016" ]-                , Space-                , Code ( "" , [] , [] ) "hiragana"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "hiragana"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "hiragana"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-017"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-017" ]-                , Space-                , Code ( "" , [] , [] ) "hiragana-iroha"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "hiragana-iroha"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "hiragana-iroha"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-018"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-018" ]-                , Space-                , Code ( "" , [] , [] ) "katakana"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "katakana"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "katakana"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-019"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-019" ]-                , Space-                , Code ( "" , [] , [] ) "katakana-iroha"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "katakana-iroha"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "katakana-iroha"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-020"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-020" ]-                , Space-                , Code ( "" , [] , [] ) "upper-roman"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "upper-roman"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "upper-roman"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-021"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-021" ]-                , Space-                , Code ( "" , [] , [] ) "upper-latin"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "upper-latin"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "upper-latin"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-022"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-022" ]-                , Space-                , Code ( "" , [] , [] ) "lower-alpha"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "lower-alpha"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "lower-alpha"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-023"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-023" ]-                , Space-                , Code ( "" , [] , [] ) "lower-greek"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "lower-greek"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "lower-greek"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-024"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-024" ]-                , Space-                , Code ( "" , [] , [] ) "armenian"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "armenian"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "armenian"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-025"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-025" ]-                , Space-                , Code ( "" , [] , [] ) "cjk-ideographic"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "cjk-ideographic"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "cjk-ideographic"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-026"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-026" ]-                , Space-                , Code ( "" , [] , [] ) "decimal-leading-zero"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "decimal-leading-zero"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "decimal-leading-zero"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-027"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-027" ]-                , Space-                , Code ( "" , [] , [] ) "georgian"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "georgian"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "georgian"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-028"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-028" ]-                , Space-                , Code ( "" , [] , [] ) "hebrew"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "hebrew"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "hebrew"-                , Space-                , Str "markers"-                , Space-                , Str "in"-                , Space-                , Str "ascending"-                , Space-                , Str "order,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-029"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-029" ]-                , Space-                , Code ( "" , [] , [] ) "none"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "none"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element."-                ]-            , OrderedList-                ( 1 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "no"-                , Space-                , Str "markers,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        ]-    , Div-        ( "styling-xhtml-002.xhtml#style-list-style"-        , [ "section" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Str "The"-            , Space-            , Code ( "" , [] , [] ) "list-style"-            , Space-            , Str "property"-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-030"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-030" ]-                , Space-                , Str "images"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style"-                , Space-                , Str "shorthand"-                , Space-                , Str "property"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "using"-                , Space-                , Str "a"-                , Space-                , Str "gif"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ul"-                , Space-                , Str "element."-                ]-            , BulletList-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "the"-                , Space-                , Str "purple"-                , Space-                , Str "and"-                , Space-                , Str "aqua"-                , Space-                , Str "square"-                , Space-                , Str "bullet"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        ]-    , Div-        ( "styling-xhtml-002.xhtml#style-list-style-position"-        , [ "section" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Str "The"-            , Space-            , Code ( "" , [] , [] ) "list-style-position"-            , Space-            , Str "property"-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-040"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-040" ]-                , Space-                , Str "The"-                , Space-                , Code ( "" , [] , [] ) "list-style-position"-                , Space-                , Str "property:"-                , Space-                , Code ( "" , [] , [] ) "inside"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-position"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "inside"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ul"-                , Space-                , Str "element."-                ]-            , BulletList-                [ [ Plain-                      [ Str "Lorem"-                      , Space-                      , Str "ipsum"-                      , Space-                      , Str "dolor"-                      , Space-                      , Str "sit"-                      , Space-                      , Str "amet,"-                      , Space-                      , Str "consectetur"-                      , Space-                      , Str "adipisicing"-                      , Space-                      , Str "elit,"-                      , Space-                      , Str "sed"-                      , Space-                      , Str "do"-                      , Space-                      , Str "eiusmod"-                      , Space-                      , Str "tempor"-                      , Space-                      , Str "incididunt"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "labore"-                      , Space-                      , Str "et"-                      , Space-                      , Str "dolore"-                      , Space-                      , Str "magna"-                      , Space-                      , Str "aliqua."-                      , Space-                      , Str "Ut"-                      , Space-                      , Str "enim"-                      , Space-                      , Str "ad"-                      , Space-                      , Str "minim"-                      , Space-                      , Str "veniam,"-                      , Space-                      , Str "quis"-                      , Space-                      , Str "nostrud"-                      , Space-                      , Str "exercitation"-                      , Space-                      , Str "ullamco"-                      , Space-                      , Str "laboris"-                      , Space-                      , Str "nisi"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "aliquip"-                      , Space-                      , Str "ex"-                      , Space-                      , Str "ea"-                      , Space-                      , Str "commodo"-                      , Space-                      , Str "consequat."-                      ]-                  ]-                , [ Plain-                      [ Str "Lorem"-                      , Space-                      , Str "ipsum"-                      , Space-                      , Str "dolor"-                      , Space-                      , Str "sit"-                      , Space-                      , Str "amet,"-                      , Space-                      , Str "consectetur"-                      , Space-                      , Str "adipisicing"-                      , Space-                      , Str "elit,"-                      , Space-                      , Str "sed"-                      , Space-                      , Str "do"-                      , Space-                      , Str "eiusmod"-                      , Space-                      , Str "tempor"-                      , Space-                      , Str "incididunt"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "labore"-                      , Space-                      , Str "et"-                      , Space-                      , Str "dolore"-                      , Space-                      , Str "magna"-                      , Space-                      , Str "aliqua."-                      , Space-                      , Str "Ut"-                      , Space-                      , Str "enim"-                      , Space-                      , Str "ad"-                      , Space-                      , Str "minim"-                      , Space-                      , Str "veniam,"-                      , Space-                      , Str "quis"-                      , Space-                      , Str "nostrud"-                      , Space-                      , Str "exercitation"-                      , Space-                      , Str "ullamco"-                      , Space-                      , Str "laboris"-                      , Space-                      , Str "nisi"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "aliquip"-                      , Space-                      , Str "ex"-                      , Space-                      , Str "ea"-                      , Space-                      , Str "commodo"-                      , Space-                      , Str "consequat."-                      ]-                  ]-                , [ Plain-                      [ Str "Lorem"-                      , Space-                      , Str "ipsum"-                      , Space-                      , Str "dolor"-                      , Space-                      , Str "sit"-                      , Space-                      , Str "amet,"-                      , Space-                      , Str "consectetur"-                      , Space-                      , Str "adipisicing"-                      , Space-                      , Str "elit,"-                      , Space-                      , Str "sed"-                      , Space-                      , Str "do"-                      , Space-                      , Str "eiusmod"-                      , Space-                      , Str "tempor"-                      , Space-                      , Str "incididunt"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "labore"-                      , Space-                      , Str "et"-                      , Space-                      , Str "dolore"-                      , Space-                      , Str "magna"-                      , Space-                      , Str "aliqua."-                      , Space-                      , Str "Ut"-                      , Space-                      , Str "enim"-                      , Space-                      , Str "ad"-                      , Space-                      , Str "minim"-                      , Space-                      , Str "veniam,"-                      , Space-                      , Str "quis"-                      , Space-                      , Str "nostrud"-                      , Space-                      , Str "exercitation"-                      , Space-                      , Str "ullamco"-                      , Space-                      , Str "laboris"-                      , Space-                      , Str "nisi"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "aliquip"-                      , Space-                      , Str "ex"-                      , Space-                      , Str "ea"-                      , Space-                      , Str "commodo"-                      , Space-                      , Str "consequat."-                      ]-                  ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "markers"-                , Space-                , Str "inside"-                , Space-                , Str "the"-                , Space-                , Str "indentation,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-041"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-041" ]-                , Space-                , Str "The"-                , Space-                , Code ( "" , [] , [] ) "list-style-position"-                , Space-                , Str "property:"-                , Space-                , Code ( "" , [] , [] ) "outside"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "list-style-position"-                , Space-                , Str "property"-                , Space-                , Str "set"-                , Space-                , Str "to"-                , Space-                , Code ( "" , [] , [] ) "outside"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ul"-                , Space-                , Str "element."-                ]-            , BulletList-                [ [ Plain-                      [ Str "Lorem"-                      , Space-                      , Str "ipsum"-                      , Space-                      , Str "dolor"-                      , Space-                      , Str "sit"-                      , Space-                      , Str "amet,"-                      , Space-                      , Str "consectetur"-                      , Space-                      , Str "adipisicing"-                      , Space-                      , Str "elit,"-                      , Space-                      , Str "sed"-                      , Space-                      , Str "do"-                      , Space-                      , Str "eiusmod"-                      , Space-                      , Str "tempor"-                      , Space-                      , Str "incididunt"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "labore"-                      , Space-                      , Str "et"-                      , Space-                      , Str "dolore"-                      , Space-                      , Str "magna"-                      , Space-                      , Str "aliqua."-                      , Space-                      , Str "Ut"-                      , Space-                      , Str "enim"-                      , Space-                      , Str "ad"-                      , Space-                      , Str "minim"-                      , Space-                      , Str "veniam,"-                      , Space-                      , Str "quis"-                      , Space-                      , Str "nostrud"-                      , Space-                      , Str "exercitation"-                      , Space-                      , Str "ullamco"-                      , Space-                      , Str "laboris"-                      , Space-                      , Str "nisi"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "aliquip"-                      , Space-                      , Str "ex"-                      , Space-                      , Str "ea"-                      , Space-                      , Str "commodo"-                      , Space-                      , Str "consequat."-                      ]-                  ]-                , [ Plain-                      [ Str "Lorem"-                      , Space-                      , Str "ipsum"-                      , Space-                      , Str "dolor"-                      , Space-                      , Str "sit"-                      , Space-                      , Str "amet,"-                      , Space-                      , Str "consectetur"-                      , Space-                      , Str "adipisicing"-                      , Space-                      , Str "elit,"-                      , Space-                      , Str "sed"-                      , Space-                      , Str "do"-                      , Space-                      , Str "eiusmod"-                      , Space-                      , Str "tempor"-                      , Space-                      , Str "incididunt"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "labore"-                      , Space-                      , Str "et"-                      , Space-                      , Str "dolore"-                      , Space-                      , Str "magna"-                      , Space-                      , Str "aliqua."-                      , Space-                      , Str "Ut"-                      , Space-                      , Str "enim"-                      , Space-                      , Str "ad"-                      , Space-                      , Str "minim"-                      , Space-                      , Str "veniam,"-                      , Space-                      , Str "quis"-                      , Space-                      , Str "nostrud"-                      , Space-                      , Str "exercitation"-                      , Space-                      , Str "ullamco"-                      , Space-                      , Str "laboris"-                      , Space-                      , Str "nisi"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "aliquip"-                      , Space-                      , Str "ex"-                      , Space-                      , Str "ea"-                      , Space-                      , Str "commodo"-                      , Space-                      , Str "consequat."-                      ]-                  ]-                , [ Plain-                      [ Str "Lorem"-                      , Space-                      , Str "ipsum"-                      , Space-                      , Str "dolor"-                      , Space-                      , Str "sit"-                      , Space-                      , Str "amet,"-                      , Space-                      , Str "consectetur"-                      , Space-                      , Str "adipisicing"-                      , Space-                      , Str "elit,"-                      , Space-                      , Str "sed"-                      , Space-                      , Str "do"-                      , Space-                      , Str "eiusmod"-                      , Space-                      , Str "tempor"-                      , Space-                      , Str "incididunt"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "labore"-                      , Space-                      , Str "et"-                      , Space-                      , Str "dolore"-                      , Space-                      , Str "magna"-                      , Space-                      , Str "aliqua."-                      , Space-                      , Str "Ut"-                      , Space-                      , Str "enim"-                      , Space-                      , Str "ad"-                      , Space-                      , Str "minim"-                      , Space-                      , Str "veniam,"-                      , Space-                      , Str "quis"-                      , Space-                      , Str "nostrud"-                      , Space-                      , Str "exercitation"-                      , Space-                      , Str "ullamco"-                      , Space-                      , Str "laboris"-                      , Space-                      , Str "nisi"-                      , Space-                      , Str "ut"-                      , Space-                      , Str "aliquip"-                      , Space-                      , Str "ex"-                      , Space-                      , Str "ea"-                      , Space-                      , Str "commodo"-                      , Space-                      , Str "consequat."-                      ]-                  ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "has"-                , Space-                , Str "the"-                , Space-                , Str "default"-                , Space-                , Str "setting"-                , Space-                , Str "(marker"-                , Space-                , Str "outside"-                , Space-                , Str "the"-                , Space-                , Str "indentation),"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        ]-    , Div-        ( "styling-xhtml-002.xhtml#style-list-start"-        , [ "section" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Str "The"-            , Space-            , Str "HTML"-            , Space-            , Code ( "" , [] , [] ) "start"-            , Space-            , Str "attribute"-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-050"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-050" ]-                , Space-                , Str "Without"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "set"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "start"-                , Space-                , Str "attribute"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element"-                , Space-                , Str "with"-                , Space-                , Str "no"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property."-                ]-            , OrderedList-                ( 25 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "starts"-                , Space-                , Str "at"-                , Space-                , Str "25,"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        , Div-            ( "styling-xhtml-002.xhtml#style-051"-            , [ "section" , "ctest" ]-            , []-            )-            [ Header-                4-                ( "" , [] , [] )-                [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-                , Space-                , Span ( "" , [ "test-id" ] , [] ) [ Str "style-051" ]-                , Space-                , Str "With"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "set"-                ]-            , Para-                [ Str "Tests"-                , Space-                , Str "whether"-                , Space-                , Str "the"-                , Space-                , Code ( "" , [] , [] ) "start"-                , Space-                , Str "attribute"-                , Space-                , Str "is"-                , Space-                , Str "supported"-                , Space-                , Str "on"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "ol"-                , Space-                , Str "element"-                , Space-                , Str "with"-                , Space-                , Str "a"-                , Space-                , Code ( "" , [] , [] ) "list-style-type"-                , Space-                , Str "property."-                ]-            , OrderedList-                ( 50 , DefaultStyle , DefaultDelim )-                [ [ Plain [ Str "Lorem" ] ]-                , [ Plain [ Str "Ipsum" ] ]-                , [ Plain [ Str "Dolor" ] ]-                , [ Plain [ Str "Sit" ] ]-                , [ Plain [ Str "Amet" ] ]-                ]-            , Para-                [ Str "If"-                , Space-                , Str "the"-                , Space-                , Str "preceding"-                , Space-                , Str "list"-                , Space-                , Str "starts"-                , Space-                , Str "at"-                , Space-                , Str "'L'"-                , Space-                , Str "(50),"-                , Space-                , Str "the"-                , Space-                , Str "test"-                , Space-                , Str "passes."-                ]-            ]-        ]-    ]-, Para [ Span ( "styling-xhtml-004.xhtml" , [] , [] ) [] ]-, Div-    ( "styling-xhtml-004.xhtml#style-media-rules"-    , [ "section" ]-    , []-    )-    [ Header-        2-        ( "" , [] , [] )-        [ Code ( "" , [] , [] ) "@media" , Space , Str "Rules" ]-    , Div-        ( "styling-xhtml-004.xhtml#style-210"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-210" ]-            , Space-            , Code ( "" , [] , [] ) "all"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "@media"-            , Space-            , Str "rule"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Code ( "" , [] , [] ) "all"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para [ Str "FAIL" ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "reads"-            , Space-            , Str "\"FAIL\","-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "fails."-            ]-        ]-    , Div-        ( "styling-xhtml-004.xhtml#style-211"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-211" ]-            , Space-            , Code ( "" , [] , [] ) "screen"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "@media"-            , Space-            , Str "rule"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Code ( "" , [] , [] ) "screen"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para [ Str "FAIL" ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "reads"-            , Space-            , Str "\"FAIL\","-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "fails."-            ]-        ]-    , Div-        ( "styling-xhtml-004.xhtml#style-212"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-212" ]-            , Space-            , Code ( "" , [] , [] ) "handheld"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "@media"-            , Space-            , Str "rule"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Code ( "" , [] , [] ) "handheld"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para [ Str "FAIL" ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "reads"-            , Space-            , Str "\"FAIL\","-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "fails."-            ]-        ]-    , Div-        ( "styling-xhtml-004.xhtml#style-213"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-213" ]-            , Space-            , Code ( "" , [] , [] ) "tv"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "@media"-            , Space-            , Str "rule"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Code ( "" , [] , [] ) "tv"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para [ Str "FAIL" ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "reads"-            , Space-            , Str "\"FAIL\","-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "fails."-            ]-        ]-    , Div-        ( "styling-xhtml-004.xhtml#style-220"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-220" ]-            , Space-            , Code ( "" , [] , [] ) "orientation:landscape"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "@media"-            , Space-            , Str "rule"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Code ( "" , [] , [] ) "orientation:landscape"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para [ Str "FAIL" ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "reads"-            , Space-            , Str "\"FAIL\""-            , Space-            , Str "when"-            , Space-            , Str "the"-            , Space-            , Str "device"-            , Space-            , Str "is"-            , Space-            , Str "held"-            , Space-            , Str "in"-            , Space-            , Str "landscape"-            , Space-            , Str "mode,"-            , Space-            , Str "and"-            , Space-            , Str "the"-            , Space-            , Str "device"-            , Space-            , Str "supports"-            , Space-            , Str "multiple"-            , Space-            , Str "orientations,"-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "fails."-            ]-        ]-    , Div-        ( "styling-xhtml-004.xhtml#style-221"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-221" ]-            , Space-            , Code ( "" , [] , [] ) "orientation:portrait"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "@media"-            , Space-            , Str "rule"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Code ( "" , [] , [] ) "orientation:portrait"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para [ Str "FAIL" ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "reads"-            , Space-            , Str "\"FAIL\""-            , Space-            , Str "when"-            , Space-            , Str "the"-            , Space-            , Str "device"-            , Space-            , Str "is"-            , Space-            , Str "held"-            , Space-            , Str "in"-            , Space-            , Str "portrait"-            , Space-            , Str "mode,"-            , Space-            , Str "and"-            , Space-            , Str "the"-            , Space-            , Str "device"-            , Space-            , Str "supports"-            , Space-            , Str "multiple"-            , Space-            , Str "orientations,"-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "fails."-            ]-        ]-    , Div-        ( "styling-xhtml-004.xhtml#style-230"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-230" ]-            , Space-            , Code ( "" , [] , [] ) "min-width"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "@media"-            , Space-            , Str "rule"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Code ( "" , [] , [] ) "min-width:200px"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para [ Str "FAIL" ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "reads"-            , Space-            , Str "\"FAIL\","-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "fails."-            ]-        ]-    , Div-        ( "styling-xhtml-004.xhtml#style-231"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-231" ]-            , Space-            , Code ( "" , [] , [] ) "max-width"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "@media"-            , Space-            , Str "rule"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Code ( "" , [] , [] ) "max-width:2000px"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para [ Str "FAIL" ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "reads"-            , Space-            , Str "\"FAIL\","-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "fails."-            ]-        ]-    , Div-        ( "styling-xhtml-004.xhtml#style-240"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-240" ]-            , Space-            , Code ( "" , [] , [] ) "min-device-width"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "@media"-            , Space-            , Str "rule"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Code ( "" , [] , [] ) "min-device-width:200px"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para [ Str "FAIL" ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "reads"-            , Space-            , Str "\"FAIL\","-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "fails."-            ]-        ]-    , Div-        ( "styling-xhtml-004.xhtml#style-241"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            3-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-241" ]-            , Space-            , Code ( "" , [] , [] ) "max-device-width"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "@media"-            , Space-            , Str "rule"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Code ( "" , [] , [] ) "max-device-width:2000px"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para [ Str "FAIL" ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "reads"-            , Space-            , Str "\"FAIL\","-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "fails."-            ]-        ]-    ]-, Para [ Span ( "styling-xhtml-005.xhtml" , [] , [] ) [] ]-, Div-    ( "styling-xhtml-005.xhtml#style-text-xform"-    , [ "section" ]-    , []-    )-    [ Header-        2-        ( "" , [] , [] )-        [ Str "The"-        , Space-        , Code ( "" , [] , [] ) "text-transform"-        , Space-        , Str "property"-        ]-    , Div-        ( "styling-xhtml-005.xhtml#style-310"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-310" ]-            , Space-            , Code ( "" , [] , [] ) "uppercase"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "text-transform"-            , Space-            , Str "property"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Str "uppercase"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "is"-            , Space-            , Str "in"-            , Space-            , Str "upper"-            , Space-            , Str "case,"-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "passes."-            ]-        ]-    , Div-        ( "styling-xhtml-005.xhtml#style-311"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-311" ]-            , Space-            , Code ( "" , [] , [] ) "capitalize"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "text-transform"-            , Space-            , Str "property"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Str "capitalize"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        , Para-            [ Str "If"-            , Space-            , Str "each"-            , Space-            , Str "first"-            , Space-            , Str "letter"-            , Space-            , Str "of"-            , Space-            , Str "each"-            , Space-            , Str "word"-            , Space-            , Str "in"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "is"-            , Space-            , Str "in"-            , Space-            , Str "upper"-            , Space-            , Str "case,"-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "passes."-            ]-        ]-    , Div-        ( "styling-xhtml-005.xhtml#style-312"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-312" ]-            , Space-            , Code ( "" , [] , [] ) "lowercase"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "text-transform"-            , Space-            , Str "property"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Str "lowercase"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Para-            [ Str "Lorem"-            , Space-            , Str "ipsum"-            , Space-            , Str "dolor"-            , Space-            , Str "sit"-            , Space-            , Str "amet,"-            , Space-            , Str "consectetur"-            , Space-            , Str "adipisicing"-            , Space-            , Str "elit,"-            , Space-            , Str "sed"-            , Space-            , Str "do"-            , Space-            , Str "eiusmod"-            , Space-            , Str "tempor"-            , Space-            , Str "incididunt"-            , Space-            , Str "ut"-            , Space-            , Str "labore"-            , Space-            , Str "et"-            , Space-            , Str "dolore"-            , Space-            , Str "magna"-            , Space-            , Str "aliqua."-            , Space-            , Str "Ut"-            , Space-            , Str "enim"-            , Space-            , Str "ad"-            , Space-            , Str "minim"-            , Space-            , Str "veniam,"-            , Space-            , Str "quis"-            , Space-            , Str "nostrud"-            , Space-            , Str "exercitation"-            , Space-            , Str "ullamco"-            , Space-            , Str "laboris"-            , Space-            , Str "nisi"-            , Space-            , Str "ut"-            , Space-            , Str "aliquip"-            , Space-            , Str "ex"-            , Space-            , Str "ea"-            , Space-            , Str "commodo"-            , Space-            , Str "consequat."-            , Space-            , Str "Duis"-            , Space-            , Str "aute"-            , Space-            , Str "irure"-            , Space-            , Str "dolor"-            , Space-            , Str "in"-            , Space-            , Str "reprehenderit"-            , Space-            , Str "in"-            , Space-            , Str "voluptate"-            , Space-            , Str "velit"-            , Space-            , Str "esse"-            , Space-            , Str "cillum"-            , Space-            , Str "dolore"-            , Space-            , Str "eu"-            , Space-            , Str "fugiat"-            , Space-            , Str "nulla"-            , Space-            , Str "pariatur."-            , Space-            , Str "Excepteur"-            , Space-            , Str "sint"-            , Space-            , Str "occaecat"-            , Space-            , Str "cupidatat"-            , Space-            , Str "non"-            , Space-            , Str "proident,"-            , Space-            , Str "sunt"-            , Space-            , Str "in"-            , Space-            , Str "culpa"-            , Space-            , Str "qui"-            , Space-            , Str "officia"-            , Space-            , Str "deserunt"-            , Space-            , Str "mollit"-            , Space-            , Str "anim"-            , Space-            , Str "id"-            , Space-            , Str "est"-            , Space-            , Str "laborum."-            ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "preceding"-            , Space-            , Str "paragraph"-            , Space-            , Str "is"-            , Space-            , Str "in"-            , Space-            , Str "lower"-            , Space-            , Str "case,"-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "passes."-            ]-        ]-    ]-, Para [ Span ( "styling-xhtml-006.xhtml" , [] , [] ) [] ]-, Div-    ( "styling-xhtml-006.xhtml#style-ruby"-    , [ "section" ]-    , []-    )-    [ Header-        2-        ( "" , [] , [] )-        [ Str "The"-        , Space-        , Code ( "" , [] , [] ) "epub-ruby-position"-        , Space-        , Str "property"-        ]-    , Div-        ( "styling-xhtml-006.xhtml#style-410"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-410" ]-            , Space-            , Code ( "" , [] , [] ) "over"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "-epub-ruby-position"-            , Space-            , Str "property"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Str "over"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Plain-            [ RawInline (Format "html") "<ruby class=\"ruby-over\">"-            , Strong [ Str "Lorem" , Space , Str "Ipsum" ]-            , Space-            , RawInline (Format "html") "<rp>"-            , Str "("-            , RawInline (Format "html") "</rp>"-            , RawInline (Format "html") "<rt>"-            , Str "Lorem"-            , Space-            , Str "Ipsum"-            , RawInline (Format "html") "</rt>"-            , RawInline (Format "html") "<rp>"-            , Str ")"-            , RawInline (Format "html") "</rp>"-            , RawInline (Format "html") "</ruby>"-            ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "Ruby"-            , Space-            , Str "text"-            , Space-            , Str "is"-            , Space-            , Str "positioned"-            , Space-            , Str "on"-            , Space-            , Str "the"-            , Space-            , Link-                ( "" , [] , [] )-                [ Str "over" ]-                ( "http://www.w3.org/TR/css3-writing-modes/#over" , "" )-            , Space-            , Str "side"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Str "ruby"-            , Space-            , Str "base,"-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "passes."-            ]-        ]-    , Div-        ( "styling-xhtml-006.xhtml#style-411"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-411" ]-            , Space-            , Code ( "" , [] , [] ) "under"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "-epub-ruby-position"-            , Space-            , Str "property"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Str "under"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Plain-            [ RawInline (Format "html") "<ruby class=\"ruby-under\">"-            , Strong [ Str "Lorem" , Space , Str "Ipsum" ]-            , Space-            , RawInline (Format "html") "<rp>"-            , Str "("-            , RawInline (Format "html") "</rp>"-            , RawInline (Format "html") "<rt>"-            , Str "Lorem"-            , Space-            , Str "Ipsum"-            , RawInline (Format "html") "</rt>"-            , RawInline (Format "html") "<rp>"-            , Str ")"-            , RawInline (Format "html") "</rp>"-            , RawInline (Format "html") "</ruby>"-            ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "Ruby"-            , Space-            , Str "text"-            , Space-            , Str "is"-            , Space-            , Str "positioned"-            , Space-            , Str "on"-            , Space-            , Str "the"-            , Space-            , Link-                ( "" , [] , [] )-                [ Str "under" ]-                ( "http://www.w3.org/TR/css3-writing-modes/#under"-                , ""-                )-            , Space-            , Str "side"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Str "ruby"-            , Space-            , Str "base,"-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "passes."-            ]-        ]-    , Div-        ( "styling-xhtml-006.xhtml#style-412"-        , [ "section" , "ctest" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]-            , Space-            , Span ( "" , [ "test-id" ] , [] ) [ Str "style-412" ]-            , Space-            , Code ( "" , [] , [] ) "inter-character"-            ]-        , Para-            [ Str "Tests"-            , Space-            , Str "whether"-            , Space-            , Str "the"-            , Space-            , Code ( "" , [] , [] ) "-epub-ruby-position"-            , Space-            , Str "property"-            , Space-            , Str "set"-            , Space-            , Str "to"-            , Space-            , Str "inter-caracter"-            , Space-            , Str "is"-            , Space-            , Str "supported."-            ]-        , Plain-            [ RawInline-                (Format "html") "<ruby class=\"ruby-inter-character\">"-            , Strong [ Str "Lorem" , Space , Str "Ipsum" ]-            , Space-            , RawInline (Format "html") "<rp>"-            , Str "("-            , RawInline (Format "html") "</rp>"-            , RawInline (Format "html") "<rt>"-            , Str "Lorem"-            , Space-            , Str "Ipsum"-            , RawInline (Format "html") "</rt>"-            , RawInline (Format "html") "<rp>"-            , Str ")"-            , RawInline (Format "html") "</rp>"-            , RawInline (Format "html") "</ruby>"-            ]-        , Para-            [ Str "If"-            , Space-            , Str "the"-            , Space-            , Str "Ruby"-            , Space-            , Str "text"-            , Space-            , Str "is"-            , Space-            , Str "positioned"-            , Space-            , Str "on"-            , Space-            , Str "the"-            , Space-            , Str "right"-            , Space-            , Str "side"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Str "base"-            , Space-            , Str "text,"-            , Space-            , Str "the"-            , Space-            , Str "test"-            , Space-            , Str "passes."-            ]-        ]-    ]-]+Pandoc+  Meta+    { unMeta =+        fromList+          [ ( "author"+            , MetaList+                [ MetaInlines [ Str "Ori Idan" ]+                , MetaInlines [ Str "Matt Garrish" ]+                , MetaInlines [ Str "Marisa DeMeglio" ]+                , MetaInlines [ Str "Toshiaki Koike" ]+                , MetaInlines [ Str "Vincent Gros" ]+                , MetaInlines [ Str "Markus Gylling" ]+                ]+            )+          , ( "description"+            , MetaInlines+                [ Str "Tests for Styling [UNDER CONSTRUCTION]" ]+            )+          , ( "identifier"+            , MetaInlines+                [ Str "com.github.epub-testsuite.epub30-test-0101" ]+            )+          , ( "language" , MetaInlines [ Str "en" ] )+          , ( "title"+            , MetaInlines [ Str "EPUBTEST 0101 - Styling Tests" ]+            )+          ]+    }+  [ Para [ Span ( "front.xhtml" , [] , [] ) [] ]+  , Div+      ( "" , [ "section" ] , [] )+      [ Header+          1+          ( "" , [] , [] )+          [ Str "EPUB"+          , Space+          , Str "3"+          , Space+          , Str "Styling"+          , Space+          , Str "Test"+          , Space+          , Str "Document:"+          , Space+          , Str "0101"+          ]+      , Div+          ( "" , [ "section" ] , [] )+          [ Header+              2+              ( "" , [] , [] )+              [ Str "Status"+              , Space+              , Str "of"+              , Space+              , Str "this"+              , Space+              , Str "Document"+              ]+          , Para+              [ Str "This"+              , Space+              , Str "publication"+              , Space+              , Str "is"+              , Space+              , Str "currently"+              , Space+              , Str "considered"+              , Space+              , Span+                  ( "" , [ "status" ] , [] )+                  [ Str "[UNDER" , Space , Str "DEVELOPMENT]" ]+              , Space+              , Str "by"+              , Space+              , Str "the"+              , Space+              , Str "IDPF."+              ]+          , Para+              [ Str "This"+              , Space+              , Str "publication"+              , Space+              , Str "is"+              , Space+              , Str "part"+              , Space+              , Str "of"+              , Space+              , Str "version"+              , Space+              , Span ( "" , [ "version" ] , [] ) [ Str "X.X" ]+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Str "EPUB"+              , Space+              , Str "3.0"+              , Space+              , Str "Compliance"+              , Space+              , Str "Test"+              , Space+              , Str "Suite"+              , Space+              , Str "released"+              , SoftBreak+              , Str "on"+              , Space+              , RawInline (Format "html") "<time class=\"release\">"+              , Str "TBD"+              , RawInline (Format "html") "</time>"+              , Str "."+              ]+          , Para+              [ Str "Before"+              , Space+              , Str "using"+              , Space+              , Str "this"+              , Space+              , Str "publication"+              , Space+              , Str "to"+              , Space+              , Str "evaluate"+              , Space+              , Str "reading"+              , Space+              , Str "systems,"+              , Space+              , Str "testers"+              , Space+              , Str "are"+              , Space+              , Str "strongly"+              , Space+              , Str "encouraged"+              , Space+              , Str "to"+              , SoftBreak+              , Str "verify"+              , Space+              , Str "that"+              , Space+              , Str "they"+              , Space+              , Str "have"+              , Space+              , Str "the"+              , Space+              , Str "latest"+              , Space+              , Str "release"+              , Space+              , Str "by"+              , Space+              , Str "checking"+              , Space+              , Str "the"+              , Space+              , Str "current"+              , Space+              , Str "release"+              , Space+              , Str "version"+              , Space+              , Str "and"+              , Space+              , Str "date"+              , Space+              , Str "of"+              , SoftBreak+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "suite"+              , Space+              , Str "at"+              , Space+              , Link+                  ( "" , [] , [] )+                  [ Str "TBD" ]+                  ( "http://idpf.org/" , "" )+              ]+          , Para+              [ Str "This"+              , Space+              , Str "publication"+              , Space+              , Str "is"+              , Space+              , Str "one"+              , Space+              , Str "of"+              , Space+              , Str "several"+              , Space+              , Str "that"+              , Space+              , Str "currently"+              , Space+              , Str "comprise"+              , Space+              , Str "the"+              , Space+              , Str "EPUB"+              , Space+              , Str "3"+              , Space+              , Str "conformance"+              , Space+              , Str "test"+              , Space+              , Str "suite"+              , SoftBreak+              , Str "for"+              , Space+              , Str "reflowable"+              , Space+              , Str "content."+              , Space+              , Str "The"+              , Space+              , Str "complete"+              , Space+              , Str "test"+              , Space+              , Str "suite"+              , Space+              , Str "includes"+              , Space+              , Str "all"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Str "following"+              , Space+              , Str "publications:"+              ]+          , OrderedList+              ( 1 , DefaultStyle , DefaultDelim )+              [ [ Plain [ Str "." ] ] ]+          ]+      , Div+          ( "" , [ "section" ] , [] )+          [ Header+              2+              ( "" , [] , [] )+              [ Str "About"+              , Space+              , Str "this"+              , Space+              , Str "Document"+              ]+          , Para+              [ Str "This"+              , Space+              , Str "document"+              , Space+              , Str "focuses"+              , Space+              , Str "on"+              , Space+              , Str "human-evaluated"+              , Space+              , Str "binary"+              , Space+              , Str "(pass/fail)"+              , Space+              , Str "tests"+              , Space+              , Str "in"+              , Space+              , Str "a"+              , SoftBreak+              , Str "reflowable"+              , Space+              , Str "context."+              , Space+              , Str "Tests"+              , Space+              , Str "for"+              , Space+              , Str "fixed-layout"+              , Space+              , Str "content"+              , Space+              , Str "and"+              , Space+              , Str "other"+              , Space+              , Str "individual"+              , Space+              , Str "tests"+              , Space+              , Str "that"+              , SoftBreak+              , Str "require"+              , Space+              , Str "a"+              , Space+              , Str "dedicated"+              , Space+              , Str "epub"+              , Space+              , Str "file"+              , Space+              , Str "are"+              , Space+              , Str "available"+              , Space+              , Str "in"+              , Space+              , Str "additional"+              , Space+              , Str "sibling"+              , Space+              , Str "documents;"+              , Space+              , Str "refer"+              , Space+              , Str "to"+              , SoftBreak+              , Str "the"+              , Space+              , Link+                  ( "" , [] , [] )+                  [ Str "test"+                  , Space+                  , Str "suite"+                  , SoftBreak+                  , Str "wiki"+                  ]+                  ( "https://github.com/mgylling/epub-testsuite/wiki/Overview"+                  , ""+                  )+              , Space+              , Str "("+              , Code+                  ( "" , [] , [] )+                  "https://github.com/mgylling/epub-testsuite/wiki/Overview"+              , Str ")"+              , Space+              , Str "for"+              , Space+              , Str "additional"+              , SoftBreak+              , Str "information."+              ]+          ]+      , Div+          ( "" , [ "section" ] , [] )+          [ Header 2 ( "" , [] , [] ) [ Str "Conventions" ]+          , Para+              [ Str "The"+              , Space+              , Str "following"+              , Space+              , Str "conventions"+              , Space+              , Str "are"+              , Space+              , Str "used"+              , Space+              , Str "throughout"+              , Space+              , Str "the"+              , Space+              , Str "document:"+              ]+          , DefinitionList+              [ ( [ Str "1."+                  , Space+                  , Str "Locating"+                  , Space+                  , Str "a"+                  , Space+                  , Str "test"+                  ]+                , [ [ Div+                        ( "" , [ "ctest" ] , [] )+                        [ Para+                            [ Str "Tests"+                            , Space+                            , Str "for"+                            , Space+                            , Emph [ Str "required" ]+                            , Space+                            , Str "Reading"+                            , Space+                            , Str "System"+                            , Space+                            , Str "functionality"+                            , Space+                            , Str "are"+                            , SoftBreak+                            , Str "preceded"+                            , Space+                            , Str "by"+                            , Space+                            , Str "the"+                            , Space+                            , Str "label:"+                            , Space+                            , Span+                                ( ""+                                , [ "nature" ]+                                , [ ( "style"+                                    , "display: inline; font-size: 100%"+                                    )+                                  ]+                                )+                                [ Str "[REQUIRED]" ]+                            ]+                        ]+                    , Div+                        ( "" , [ "otest" ] , [] )+                        [ Para+                            [ Str "Tests"+                            , Space+                            , Str "for"+                            , Space+                            , Emph [ Str "optional" ]+                            , Space+                            , Str "Reading"+                            , Space+                            , Str "System"+                            , Space+                            , Str "functionality"+                            , Space+                            , Str "are"+                            , SoftBreak+                            , Str "preceded"+                            , Space+                            , Str "by"+                            , Space+                            , Str "the"+                            , Space+                            , Str "label:"+                            , Space+                            , Span+                                ( ""+                                , [ "nature" ]+                                , [ ( "style"+                                    , "display: inline; font-size: 100%"+                                    )+                                  ]+                                )+                                [ Str "[OPTIONAL]" ]+                            ]+                        ]+                    ]+                  ]+                )+              , ( [ Str "2."+                  , Space+                  , Str "Performing"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  ]+                , [ [ Plain+                        [ Str "Each"+                        , Space+                        , Str "test"+                        , Space+                        , Str "includes"+                        , Space+                        , Str "a"+                        , Space+                        , Str "description"+                        , Space+                        , Str "of"+                        , Space+                        , Str "its"+                        , Space+                        , Str "purpose"+                        , Space+                        , Str "followed"+                        , Space+                        , Str "by"+                        , Space+                        , Str "the"+                        , Space+                        , Str "actual"+                        , Space+                        , Strong+                            [ Str "test"+                            , Space+                            , Str "statement,"+                            , SoftBreak+                            , Str "which"+                            , Space+                            , Str "can"+                            , Space+                            , Str "always"+                            , Space+                            , Str "be"+                            , Space+                            , Str "evaluated"+                            , Space+                            , Str "to"+                            , Space+                            , Str "true"+                            , Space+                            , Str "or"+                            , Space+                            , Str "false"+                            ]+                        , Str "."+                        , Space+                        , Str "These"+                        , Space+                        , Str "statements"+                        , Space+                        , Str "typically"+                        , Space+                        , Str "have"+                        , Space+                        , Str "the"+                        , Space+                        , Str "form:"+                        , SoftBreak+                        , Str "\"If"+                        , Space+                        , Str "[some"+                        , Space+                        , Str "condition],"+                        , Space+                        , Str "the"+                        , Space+                        , Str "test"+                        , Space+                        , Str "passes\"."+                        ]+                    ]+                  ]+                )+              , ( [ Str "3."+                  , Space+                  , Str "Scoring"+                  , Space+                  , Str "in"+                  , Space+                  , Str "the"+                  , Space+                  , Str "results"+                  , Space+                  , Str "form"+                  ]+                , [ [ Plain+                        [ Str "@@@TODO"+                        , Space+                        , Str "provide"+                        , Space+                        , Str "info"+                        , Space+                        , Str "on"+                        , Space+                        , Str "where"+                        , Space+                        , Str "to"+                        , Space+                        , Str "get"+                        , Space+                        , Str "the"+                        , Space+                        , Str "results"+                        , Space+                        , Str "form"+                        ]+                    ]+                  ]+                )+              ]+          ]+      ]+  , Para [ Span ( "styling-xhtml-001.xhtml" , [] , [] ) [] ]+  , Div+      ( "styling-xhtml-001.xhtml_epub-css" , [ "section" ] , [] )+      [ Header+          1+          ( "" , [] , [] )+          [ Str "EPUB" , Space , Str "Style" , Space , Str "Sheets" ]+      , Para+          [ Str "This"+          , Space+          , Str "section"+          , Space+          , Str "contains"+          , Space+          , Str "tests"+          , Space+          , Str "for"+          , Space+          , Str "styling"+          , Space+          , Str "and"+          , Space+          , Str "layout."+          ]+      ]+  , Para [ Span ( "styling-xhtml-003.xhtml" , [] , [] ) [] ]+  , Div+      ( "styling-xhtml-003.xhtml_style-110"+      , [ "section" , "ctest" ]+      , []+      )+      [ Header+          2+          ( "" , [] , [] )+          [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+          , Space+          , Span ( "" , [ "test-id" ] , [] ) [ Str "style-110" ]+          , Space+          , Str "Multi-Column"+          , Space+          , Str "Layouts"+          ]+      , Para+          [ Str "Tests"+          , Space+          , Str "whether"+          , Space+          , Str "the"+          , Space+          , Link+              ( "" , [] , [] )+              [ Code ( "" , [] , [] ) "CSS Multi-Column Layout" ]+              ( "http://idpf.org/epub/30/spec/epub30-contentdocs.html#sec-css-multi-column"+              , ""+              )+          , Space+          , Str "properties"+          , Space+          , Str "are"+          , Space+          , Str "supported."+          ]+      , Div+          ( "" , [ "multicol" ] , [] )+          [ Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          , Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          , Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          , Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          , Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          , Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          , Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          , Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          , Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          ]+      , Para+          [ Str "If"+          , Space+          , Str "the"+          , Space+          , Str "preceding"+          , Space+          , Str "text"+          , Space+          , Str "is"+          , Space+          , Str "rendered"+          , Space+          , Str "in"+          , Space+          , Str "three"+          , Space+          , Str "columns,"+          , Space+          , Str "the"+          , Space+          , Str "test"+          , Space+          , Str "passes."+          ]+      ]+  , Para [ Span ( "styling-xhtml-002.xhtml" , [] , [] ) [] ]+  , Div+      ( "styling-xhtml-002.xhtml_style-lists"+      , [ "section" ]+      , []+      )+      [ Header 2 ( "" , [] , [] ) [ Str "Lists" ]+      , Div+          ( "styling-xhtml-002.xhtml_style-list-style-type"+          , [ "section" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Str "The"+              , Space+              , Code ( "" , [] , [] ) "list-style-type"+              , Space+              , Str "property"+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-009"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-009" ]+                  , Space+                  , Code ( "" , [] , [] ) "decimal"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "decimal"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "decimal"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-010"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-010" ]+                  , Space+                  , Code ( "" , [] , [] ) "circle"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "circle"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ul"+                  , Space+                  , Str "element."+                  ]+              , BulletList+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "circle"+                  , Space+                  , Str "markers,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-011"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-011" ]+                  , Space+                  , Code ( "" , [] , [] ) "square"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "square"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ul"+                  , Space+                  , Str "element."+                  ]+              , BulletList+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "square"+                  , Space+                  , Str "markers,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-012"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-012" ]+                  , Space+                  , Code ( "" , [] , [] ) "disc"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "disc"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ul"+                  , Space+                  , Str "element."+                  ]+              , BulletList+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "disc"+                  , Space+                  , Str "markers,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-013"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-013" ]+                  , Space+                  , Code ( "" , [] , [] ) "lower-latin"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "lower-latin"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "lower-latin"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-014"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-014" ]+                  , Space+                  , Code ( "" , [] , [] ) "lower-roman"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "lower-roman"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "lower-roman"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-015"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-015" ]+                  , Space+                  , Code ( "" , [] , [] ) "upper-alpha"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "upper-alpha"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "upper-alpha"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-016"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-016" ]+                  , Space+                  , Code ( "" , [] , [] ) "hiragana"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "hiragana"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "hiragana"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-017"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-017" ]+                  , Space+                  , Code ( "" , [] , [] ) "hiragana-iroha"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "hiragana-iroha"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "hiragana-iroha"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-018"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-018" ]+                  , Space+                  , Code ( "" , [] , [] ) "katakana"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "katakana"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "katakana"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-019"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-019" ]+                  , Space+                  , Code ( "" , [] , [] ) "katakana-iroha"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "katakana-iroha"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "katakana-iroha"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-020"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-020" ]+                  , Space+                  , Code ( "" , [] , [] ) "upper-roman"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "upper-roman"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "upper-roman"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-021"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-021" ]+                  , Space+                  , Code ( "" , [] , [] ) "upper-latin"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "upper-latin"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "upper-latin"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-022"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-022" ]+                  , Space+                  , Code ( "" , [] , [] ) "lower-alpha"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "lower-alpha"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "lower-alpha"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-023"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-023" ]+                  , Space+                  , Code ( "" , [] , [] ) "lower-greek"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "lower-greek"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "lower-greek"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-024"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-024" ]+                  , Space+                  , Code ( "" , [] , [] ) "armenian"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "armenian"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "armenian"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-025"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-025" ]+                  , Space+                  , Code ( "" , [] , [] ) "cjk-ideographic"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "cjk-ideographic"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "cjk-ideographic"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-026"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-026" ]+                  , Space+                  , Code ( "" , [] , [] ) "decimal-leading-zero"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "decimal-leading-zero"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "decimal-leading-zero"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-027"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-027" ]+                  , Space+                  , Code ( "" , [] , [] ) "georgian"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "georgian"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "georgian"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-028"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-028" ]+                  , Space+                  , Code ( "" , [] , [] ) "hebrew"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "hebrew"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "hebrew"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "in"+                  , Space+                  , Str "ascending"+                  , Space+                  , Str "order,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-029"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-029" ]+                  , Space+                  , Code ( "" , [] , [] ) "none"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "none"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element."+                  ]+              , OrderedList+                  ( 1 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "no"+                  , Space+                  , Str "markers,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          ]+      , Div+          ( "styling-xhtml-002.xhtml_style-list-style"+          , [ "section" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Str "The"+              , Space+              , Code ( "" , [] , [] ) "list-style"+              , Space+              , Str "property"+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-030"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-030" ]+                  , Space+                  , Str "images"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style"+                  , Space+                  , Str "shorthand"+                  , Space+                  , Str "property"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "using"+                  , Space+                  , Str "a"+                  , Space+                  , Str "gif"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ul"+                  , Space+                  , Str "element."+                  ]+              , BulletList+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "the"+                  , Space+                  , Str "purple"+                  , Space+                  , Str "and"+                  , Space+                  , Str "aqua"+                  , Space+                  , Str "square"+                  , Space+                  , Str "bullet"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          ]+      , Div+          ( "styling-xhtml-002.xhtml_style-list-style-position"+          , [ "section" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Str "The"+              , Space+              , Code ( "" , [] , [] ) "list-style-position"+              , Space+              , Str "property"+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-040"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-040" ]+                  , Space+                  , Str "The"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-position"+                  , Space+                  , Str "property:"+                  , Space+                  , Code ( "" , [] , [] ) "inside"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-position"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "inside"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ul"+                  , Space+                  , Str "element."+                  ]+              , BulletList+                  [ [ Plain+                        [ Str "Lorem"+                        , Space+                        , Str "ipsum"+                        , Space+                        , Str "dolor"+                        , Space+                        , Str "sit"+                        , Space+                        , Str "amet,"+                        , Space+                        , Str "consectetur"+                        , Space+                        , Str "adipisicing"+                        , Space+                        , Str "elit,"+                        , Space+                        , Str "sed"+                        , Space+                        , Str "do"+                        , Space+                        , Str "eiusmod"+                        , Space+                        , Str "tempor"+                        , Space+                        , Str "incididunt"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "labore"+                        , Space+                        , Str "et"+                        , Space+                        , Str "dolore"+                        , Space+                        , Str "magna"+                        , Space+                        , Str "aliqua."+                        , Space+                        , Str "Ut"+                        , Space+                        , Str "enim"+                        , Space+                        , Str "ad"+                        , Space+                        , Str "minim"+                        , Space+                        , Str "veniam,"+                        , Space+                        , Str "quis"+                        , Space+                        , Str "nostrud"+                        , Space+                        , Str "exercitation"+                        , Space+                        , Str "ullamco"+                        , Space+                        , Str "laboris"+                        , Space+                        , Str "nisi"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "aliquip"+                        , Space+                        , Str "ex"+                        , Space+                        , Str "ea"+                        , Space+                        , Str "commodo"+                        , Space+                        , Str "consequat."+                        ]+                    ]+                  , [ Plain+                        [ Str "Lorem"+                        , Space+                        , Str "ipsum"+                        , Space+                        , Str "dolor"+                        , Space+                        , Str "sit"+                        , Space+                        , Str "amet,"+                        , Space+                        , Str "consectetur"+                        , Space+                        , Str "adipisicing"+                        , Space+                        , Str "elit,"+                        , Space+                        , Str "sed"+                        , Space+                        , Str "do"+                        , Space+                        , Str "eiusmod"+                        , Space+                        , Str "tempor"+                        , Space+                        , Str "incididunt"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "labore"+                        , Space+                        , Str "et"+                        , Space+                        , Str "dolore"+                        , Space+                        , Str "magna"+                        , Space+                        , Str "aliqua."+                        , Space+                        , Str "Ut"+                        , Space+                        , Str "enim"+                        , Space+                        , Str "ad"+                        , Space+                        , Str "minim"+                        , Space+                        , Str "veniam,"+                        , Space+                        , Str "quis"+                        , Space+                        , Str "nostrud"+                        , Space+                        , Str "exercitation"+                        , Space+                        , Str "ullamco"+                        , Space+                        , Str "laboris"+                        , Space+                        , Str "nisi"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "aliquip"+                        , Space+                        , Str "ex"+                        , Space+                        , Str "ea"+                        , Space+                        , Str "commodo"+                        , Space+                        , Str "consequat."+                        ]+                    ]+                  , [ Plain+                        [ Str "Lorem"+                        , Space+                        , Str "ipsum"+                        , Space+                        , Str "dolor"+                        , Space+                        , Str "sit"+                        , Space+                        , Str "amet,"+                        , Space+                        , Str "consectetur"+                        , Space+                        , Str "adipisicing"+                        , Space+                        , Str "elit,"+                        , Space+                        , Str "sed"+                        , Space+                        , Str "do"+                        , Space+                        , Str "eiusmod"+                        , Space+                        , Str "tempor"+                        , Space+                        , Str "incididunt"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "labore"+                        , Space+                        , Str "et"+                        , Space+                        , Str "dolore"+                        , Space+                        , Str "magna"+                        , Space+                        , Str "aliqua."+                        , Space+                        , Str "Ut"+                        , Space+                        , Str "enim"+                        , Space+                        , Str "ad"+                        , Space+                        , Str "minim"+                        , Space+                        , Str "veniam,"+                        , Space+                        , Str "quis"+                        , Space+                        , Str "nostrud"+                        , Space+                        , Str "exercitation"+                        , Space+                        , Str "ullamco"+                        , Space+                        , Str "laboris"+                        , Space+                        , Str "nisi"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "aliquip"+                        , Space+                        , Str "ex"+                        , Space+                        , Str "ea"+                        , Space+                        , Str "commodo"+                        , Space+                        , Str "consequat."+                        ]+                    ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "markers"+                  , Space+                  , Str "inside"+                  , Space+                  , Str "the"+                  , Space+                  , Str "indentation,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-041"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-041" ]+                  , Space+                  , Str "The"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-position"+                  , Space+                  , Str "property:"+                  , Space+                  , Code ( "" , [] , [] ) "outside"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-position"+                  , Space+                  , Str "property"+                  , Space+                  , Str "set"+                  , Space+                  , Str "to"+                  , Space+                  , Code ( "" , [] , [] ) "outside"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ul"+                  , Space+                  , Str "element."+                  ]+              , BulletList+                  [ [ Plain+                        [ Str "Lorem"+                        , Space+                        , Str "ipsum"+                        , Space+                        , Str "dolor"+                        , Space+                        , Str "sit"+                        , Space+                        , Str "amet,"+                        , Space+                        , Str "consectetur"+                        , Space+                        , Str "adipisicing"+                        , Space+                        , Str "elit,"+                        , Space+                        , Str "sed"+                        , Space+                        , Str "do"+                        , Space+                        , Str "eiusmod"+                        , Space+                        , Str "tempor"+                        , Space+                        , Str "incididunt"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "labore"+                        , Space+                        , Str "et"+                        , Space+                        , Str "dolore"+                        , Space+                        , Str "magna"+                        , Space+                        , Str "aliqua."+                        , Space+                        , Str "Ut"+                        , Space+                        , Str "enim"+                        , Space+                        , Str "ad"+                        , Space+                        , Str "minim"+                        , Space+                        , Str "veniam,"+                        , Space+                        , Str "quis"+                        , Space+                        , Str "nostrud"+                        , Space+                        , Str "exercitation"+                        , Space+                        , Str "ullamco"+                        , Space+                        , Str "laboris"+                        , Space+                        , Str "nisi"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "aliquip"+                        , Space+                        , Str "ex"+                        , Space+                        , Str "ea"+                        , Space+                        , Str "commodo"+                        , Space+                        , Str "consequat."+                        ]+                    ]+                  , [ Plain+                        [ Str "Lorem"+                        , Space+                        , Str "ipsum"+                        , Space+                        , Str "dolor"+                        , Space+                        , Str "sit"+                        , Space+                        , Str "amet,"+                        , Space+                        , Str "consectetur"+                        , Space+                        , Str "adipisicing"+                        , Space+                        , Str "elit,"+                        , Space+                        , Str "sed"+                        , Space+                        , Str "do"+                        , Space+                        , Str "eiusmod"+                        , Space+                        , Str "tempor"+                        , Space+                        , Str "incididunt"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "labore"+                        , Space+                        , Str "et"+                        , Space+                        , Str "dolore"+                        , Space+                        , Str "magna"+                        , Space+                        , Str "aliqua."+                        , Space+                        , Str "Ut"+                        , Space+                        , Str "enim"+                        , Space+                        , Str "ad"+                        , Space+                        , Str "minim"+                        , Space+                        , Str "veniam,"+                        , Space+                        , Str "quis"+                        , Space+                        , Str "nostrud"+                        , Space+                        , Str "exercitation"+                        , Space+                        , Str "ullamco"+                        , Space+                        , Str "laboris"+                        , Space+                        , Str "nisi"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "aliquip"+                        , Space+                        , Str "ex"+                        , Space+                        , Str "ea"+                        , Space+                        , Str "commodo"+                        , Space+                        , Str "consequat."+                        ]+                    ]+                  , [ Plain+                        [ Str "Lorem"+                        , Space+                        , Str "ipsum"+                        , Space+                        , Str "dolor"+                        , Space+                        , Str "sit"+                        , Space+                        , Str "amet,"+                        , Space+                        , Str "consectetur"+                        , Space+                        , Str "adipisicing"+                        , Space+                        , Str "elit,"+                        , Space+                        , Str "sed"+                        , Space+                        , Str "do"+                        , Space+                        , Str "eiusmod"+                        , Space+                        , Str "tempor"+                        , Space+                        , Str "incididunt"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "labore"+                        , Space+                        , Str "et"+                        , Space+                        , Str "dolore"+                        , Space+                        , Str "magna"+                        , Space+                        , Str "aliqua."+                        , Space+                        , Str "Ut"+                        , Space+                        , Str "enim"+                        , Space+                        , Str "ad"+                        , Space+                        , Str "minim"+                        , Space+                        , Str "veniam,"+                        , Space+                        , Str "quis"+                        , Space+                        , Str "nostrud"+                        , Space+                        , Str "exercitation"+                        , Space+                        , Str "ullamco"+                        , Space+                        , Str "laboris"+                        , Space+                        , Str "nisi"+                        , Space+                        , Str "ut"+                        , Space+                        , Str "aliquip"+                        , Space+                        , Str "ex"+                        , Space+                        , Str "ea"+                        , Space+                        , Str "commodo"+                        , Space+                        , Str "consequat."+                        ]+                    ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "has"+                  , Space+                  , Str "the"+                  , Space+                  , Str "default"+                  , Space+                  , Str "setting"+                  , Space+                  , Str "(marker"+                  , Space+                  , Str "outside"+                  , Space+                  , Str "the"+                  , Space+                  , Str "indentation),"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          ]+      , Div+          ( "styling-xhtml-002.xhtml_style-list-start"+          , [ "section" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Str "The"+              , Space+              , Str "HTML"+              , Space+              , Code ( "" , [] , [] ) "start"+              , Space+              , Str "attribute"+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-050"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-050" ]+                  , Space+                  , Str "Without"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "set"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "start"+                  , Space+                  , Str "attribute"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element"+                  , Space+                  , Str "with"+                  , Space+                  , Str "no"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property."+                  ]+              , OrderedList+                  ( 25 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "starts"+                  , Space+                  , Str "at"+                  , Space+                  , Str "25,"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          , Div+              ( "styling-xhtml-002.xhtml_style-051"+              , [ "section" , "ctest" ]+              , []+              )+              [ Header+                  4+                  ( "" , [] , [] )+                  [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+                  , Space+                  , Span ( "" , [ "test-id" ] , [] ) [ Str "style-051" ]+                  , Space+                  , Str "With"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "set"+                  ]+              , Para+                  [ Str "Tests"+                  , Space+                  , Str "whether"+                  , Space+                  , Str "the"+                  , Space+                  , Code ( "" , [] , [] ) "start"+                  , Space+                  , Str "attribute"+                  , Space+                  , Str "is"+                  , Space+                  , Str "supported"+                  , Space+                  , Str "on"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "ol"+                  , Space+                  , Str "element"+                  , Space+                  , Str "with"+                  , Space+                  , Str "a"+                  , Space+                  , Code ( "" , [] , [] ) "list-style-type"+                  , Space+                  , Str "property."+                  ]+              , OrderedList+                  ( 50 , DefaultStyle , DefaultDelim )+                  [ [ Plain [ Str "Lorem" ] ]+                  , [ Plain [ Str "Ipsum" ] ]+                  , [ Plain [ Str "Dolor" ] ]+                  , [ Plain [ Str "Sit" ] ]+                  , [ Plain [ Str "Amet" ] ]+                  ]+              , Para+                  [ Str "If"+                  , Space+                  , Str "the"+                  , Space+                  , Str "preceding"+                  , Space+                  , Str "list"+                  , Space+                  , Str "starts"+                  , Space+                  , Str "at"+                  , Space+                  , Str "'L'"+                  , Space+                  , Str "(50),"+                  , Space+                  , Str "the"+                  , Space+                  , Str "test"+                  , Space+                  , Str "passes."+                  ]+              ]+          ]+      ]+  , Para [ Span ( "styling-xhtml-004.xhtml" , [] , [] ) [] ]+  , Div+      ( "styling-xhtml-004.xhtml_style-media-rules"+      , [ "section" ]+      , []+      )+      [ Header+          2+          ( "" , [] , [] )+          [ Code ( "" , [] , [] ) "@media" , Space , Str "Rules" ]+      , Div+          ( "styling-xhtml-004.xhtml_style-210"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-210" ]+              , Space+              , Code ( "" , [] , [] ) "all"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "@media"+              , Space+              , Str "rule"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Code ( "" , [] , [] ) "all"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para [ Str "FAIL" ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "reads"+              , Space+              , Str "\"FAIL\","+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "fails."+              ]+          ]+      , Div+          ( "styling-xhtml-004.xhtml_style-211"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-211" ]+              , Space+              , Code ( "" , [] , [] ) "screen"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "@media"+              , Space+              , Str "rule"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Code ( "" , [] , [] ) "screen"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para [ Str "FAIL" ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "reads"+              , Space+              , Str "\"FAIL\","+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "fails."+              ]+          ]+      , Div+          ( "styling-xhtml-004.xhtml_style-212"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-212" ]+              , Space+              , Code ( "" , [] , [] ) "handheld"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "@media"+              , Space+              , Str "rule"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Code ( "" , [] , [] ) "handheld"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para [ Str "FAIL" ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "reads"+              , Space+              , Str "\"FAIL\","+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "fails."+              ]+          ]+      , Div+          ( "styling-xhtml-004.xhtml_style-213"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-213" ]+              , Space+              , Code ( "" , [] , [] ) "tv"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "@media"+              , Space+              , Str "rule"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Code ( "" , [] , [] ) "tv"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para [ Str "FAIL" ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "reads"+              , Space+              , Str "\"FAIL\","+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "fails."+              ]+          ]+      , Div+          ( "styling-xhtml-004.xhtml_style-220"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-220" ]+              , Space+              , Code ( "" , [] , [] ) "orientation:landscape"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "@media"+              , Space+              , Str "rule"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Code ( "" , [] , [] ) "orientation:landscape"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para [ Str "FAIL" ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "reads"+              , Space+              , Str "\"FAIL\""+              , Space+              , Str "when"+              , Space+              , Str "the"+              , Space+              , Str "device"+              , Space+              , Str "is"+              , Space+              , Str "held"+              , Space+              , Str "in"+              , Space+              , Str "landscape"+              , Space+              , Str "mode,"+              , Space+              , Str "and"+              , Space+              , Str "the"+              , Space+              , Str "device"+              , Space+              , Str "supports"+              , Space+              , Str "multiple"+              , Space+              , Str "orientations,"+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "fails."+              ]+          ]+      , Div+          ( "styling-xhtml-004.xhtml_style-221"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-221" ]+              , Space+              , Code ( "" , [] , [] ) "orientation:portrait"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "@media"+              , Space+              , Str "rule"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Code ( "" , [] , [] ) "orientation:portrait"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para [ Str "FAIL" ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "reads"+              , Space+              , Str "\"FAIL\""+              , Space+              , Str "when"+              , Space+              , Str "the"+              , Space+              , Str "device"+              , Space+              , Str "is"+              , Space+              , Str "held"+              , Space+              , Str "in"+              , Space+              , Str "portrait"+              , Space+              , Str "mode,"+              , Space+              , Str "and"+              , Space+              , Str "the"+              , Space+              , Str "device"+              , Space+              , Str "supports"+              , Space+              , Str "multiple"+              , Space+              , Str "orientations,"+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "fails."+              ]+          ]+      , Div+          ( "styling-xhtml-004.xhtml_style-230"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-230" ]+              , Space+              , Code ( "" , [] , [] ) "min-width"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "@media"+              , Space+              , Str "rule"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Code ( "" , [] , [] ) "min-width:200px"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para [ Str "FAIL" ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "reads"+              , Space+              , Str "\"FAIL\","+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "fails."+              ]+          ]+      , Div+          ( "styling-xhtml-004.xhtml_style-231"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-231" ]+              , Space+              , Code ( "" , [] , [] ) "max-width"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "@media"+              , Space+              , Str "rule"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Code ( "" , [] , [] ) "max-width:2000px"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para [ Str "FAIL" ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "reads"+              , Space+              , Str "\"FAIL\","+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "fails."+              ]+          ]+      , Div+          ( "styling-xhtml-004.xhtml_style-240"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-240" ]+              , Space+              , Code ( "" , [] , [] ) "min-device-width"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "@media"+              , Space+              , Str "rule"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Code ( "" , [] , [] ) "min-device-width:200px"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para [ Str "FAIL" ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "reads"+              , Space+              , Str "\"FAIL\","+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "fails."+              ]+          ]+      , Div+          ( "styling-xhtml-004.xhtml_style-241"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              3+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-241" ]+              , Space+              , Code ( "" , [] , [] ) "max-device-width"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "@media"+              , Space+              , Str "rule"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Code ( "" , [] , [] ) "max-device-width:2000px"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para [ Str "FAIL" ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "reads"+              , Space+              , Str "\"FAIL\","+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "fails."+              ]+          ]+      ]+  , Para [ Span ( "styling-xhtml-005.xhtml" , [] , [] ) [] ]+  , Div+      ( "styling-xhtml-005.xhtml_style-text-xform"+      , [ "section" ]+      , []+      )+      [ Header+          2+          ( "" , [] , [] )+          [ Str "The"+          , Space+          , Code ( "" , [] , [] ) "text-transform"+          , Space+          , Str "property"+          ]+      , Div+          ( "styling-xhtml-005.xhtml_style-310"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-310" ]+              , Space+              , Code ( "" , [] , [] ) "uppercase"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "text-transform"+              , Space+              , Str "property"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Str "uppercase"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "is"+              , Space+              , Str "in"+              , Space+              , Str "upper"+              , Space+              , Str "case,"+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "passes."+              ]+          ]+      , Div+          ( "styling-xhtml-005.xhtml_style-311"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-311" ]+              , Space+              , Code ( "" , [] , [] ) "capitalize"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "text-transform"+              , Space+              , Str "property"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Str "capitalize"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          , Para+              [ Str "If"+              , Space+              , Str "each"+              , Space+              , Str "first"+              , Space+              , Str "letter"+              , Space+              , Str "of"+              , Space+              , Str "each"+              , Space+              , Str "word"+              , Space+              , Str "in"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "is"+              , Space+              , Str "in"+              , Space+              , Str "upper"+              , Space+              , Str "case,"+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "passes."+              ]+          ]+      , Div+          ( "styling-xhtml-005.xhtml_style-312"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-312" ]+              , Space+              , Code ( "" , [] , [] ) "lowercase"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "text-transform"+              , Space+              , Str "property"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Str "lowercase"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Para+              [ Str "Lorem"+              , Space+              , Str "ipsum"+              , Space+              , Str "dolor"+              , Space+              , Str "sit"+              , Space+              , Str "amet,"+              , Space+              , Str "consectetur"+              , Space+              , Str "adipisicing"+              , Space+              , Str "elit,"+              , Space+              , Str "sed"+              , Space+              , Str "do"+              , Space+              , Str "eiusmod"+              , Space+              , Str "tempor"+              , Space+              , Str "incididunt"+              , Space+              , Str "ut"+              , Space+              , Str "labore"+              , Space+              , Str "et"+              , Space+              , Str "dolore"+              , Space+              , Str "magna"+              , Space+              , Str "aliqua."+              , Space+              , Str "Ut"+              , Space+              , Str "enim"+              , Space+              , Str "ad"+              , Space+              , Str "minim"+              , Space+              , Str "veniam,"+              , Space+              , Str "quis"+              , Space+              , Str "nostrud"+              , Space+              , Str "exercitation"+              , Space+              , Str "ullamco"+              , Space+              , Str "laboris"+              , Space+              , Str "nisi"+              , Space+              , Str "ut"+              , Space+              , Str "aliquip"+              , Space+              , Str "ex"+              , Space+              , Str "ea"+              , Space+              , Str "commodo"+              , Space+              , Str "consequat."+              , Space+              , Str "Duis"+              , Space+              , Str "aute"+              , Space+              , Str "irure"+              , Space+              , Str "dolor"+              , Space+              , Str "in"+              , Space+              , Str "reprehenderit"+              , Space+              , Str "in"+              , Space+              , Str "voluptate"+              , Space+              , Str "velit"+              , Space+              , Str "esse"+              , Space+              , Str "cillum"+              , Space+              , Str "dolore"+              , Space+              , Str "eu"+              , Space+              , Str "fugiat"+              , Space+              , Str "nulla"+              , Space+              , Str "pariatur."+              , Space+              , Str "Excepteur"+              , Space+              , Str "sint"+              , Space+              , Str "occaecat"+              , Space+              , Str "cupidatat"+              , Space+              , Str "non"+              , Space+              , Str "proident,"+              , Space+              , Str "sunt"+              , Space+              , Str "in"+              , Space+              , Str "culpa"+              , Space+              , Str "qui"+              , Space+              , Str "officia"+              , Space+              , Str "deserunt"+              , Space+              , Str "mollit"+              , Space+              , Str "anim"+              , Space+              , Str "id"+              , Space+              , Str "est"+              , Space+              , Str "laborum."+              ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "preceding"+              , Space+              , Str "paragraph"+              , Space+              , Str "is"+              , Space+              , Str "in"+              , Space+              , Str "lower"+              , Space+              , Str "case,"+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "passes."+              ]+          ]+      ]+  , Para [ Span ( "styling-xhtml-006.xhtml" , [] , [] ) [] ]+  , Div+      ( "styling-xhtml-006.xhtml_style-ruby"+      , [ "section" ]+      , []+      )+      [ Header+          2+          ( "" , [] , [] )+          [ Str "The"+          , Space+          , Code ( "" , [] , [] ) "epub-ruby-position"+          , Space+          , Str "property"+          ]+      , Div+          ( "styling-xhtml-006.xhtml_style-410"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-410" ]+              , Space+              , Code ( "" , [] , [] ) "over"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "-epub-ruby-position"+              , Space+              , Str "property"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Str "over"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Plain+              [ RawInline (Format "html") "<ruby class=\"ruby-over\">"+              , Strong [ Str "Lorem" , Space , Str "Ipsum" ]+              , Space+              , RawInline (Format "html") "<rp>"+              , Str "("+              , RawInline (Format "html") "</rp>"+              , RawInline (Format "html") "<rt>"+              , Str "Lorem"+              , Space+              , Str "Ipsum"+              , RawInline (Format "html") "</rt>"+              , RawInline (Format "html") "<rp>"+              , Str ")"+              , RawInline (Format "html") "</rp>"+              , RawInline (Format "html") "</ruby>"+              ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "Ruby"+              , Space+              , Str "text"+              , Space+              , Str "is"+              , Space+              , Str "positioned"+              , Space+              , Str "on"+              , Space+              , Str "the"+              , Space+              , Link+                  ( "" , [] , [] )+                  [ Str "over" ]+                  ( "http://www.w3.org/TR/css3-writing-modes/#over"+                  , ""+                  )+              , Space+              , Str "side"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Str "ruby"+              , Space+              , Str "base,"+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "passes."+              ]+          ]+      , Div+          ( "styling-xhtml-006.xhtml_style-411"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-411" ]+              , Space+              , Code ( "" , [] , [] ) "under"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "-epub-ruby-position"+              , Space+              , Str "property"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Str "under"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Plain+              [ RawInline (Format "html") "<ruby class=\"ruby-under\">"+              , Strong [ Str "Lorem" , Space , Str "Ipsum" ]+              , Space+              , RawInline (Format "html") "<rp>"+              , Str "("+              , RawInline (Format "html") "</rp>"+              , RawInline (Format "html") "<rt>"+              , Str "Lorem"+              , Space+              , Str "Ipsum"+              , RawInline (Format "html") "</rt>"+              , RawInline (Format "html") "<rp>"+              , Str ")"+              , RawInline (Format "html") "</rp>"+              , RawInline (Format "html") "</ruby>"+              ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "Ruby"+              , Space+              , Str "text"+              , Space+              , Str "is"+              , Space+              , Str "positioned"+              , Space+              , Str "on"+              , Space+              , Str "the"+              , Space+              , Link+                  ( "" , [] , [] )+                  [ Str "under" ]+                  ( "http://www.w3.org/TR/css3-writing-modes/#under"+                  , ""+                  )+              , Space+              , Str "side"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Str "ruby"+              , Space+              , Str "base,"+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "passes."+              ]+          ]+      , Div+          ( "styling-xhtml-006.xhtml_style-412"+          , [ "section" , "ctest" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Span ( "" , [ "nature" ] , [] ) [ Str "[REQUIRED]" ]+              , Space+              , Span ( "" , [ "test-id" ] , [] ) [ Str "style-412" ]+              , Space+              , Code ( "" , [] , [] ) "inter-character"+              ]+          , Para+              [ Str "Tests"+              , Space+              , Str "whether"+              , Space+              , Str "the"+              , Space+              , Code ( "" , [] , [] ) "-epub-ruby-position"+              , Space+              , Str "property"+              , Space+              , Str "set"+              , Space+              , Str "to"+              , Space+              , Str "inter-caracter"+              , Space+              , Str "is"+              , Space+              , Str "supported."+              ]+          , Plain+              [ RawInline+                  (Format "html")+                  "<ruby class=\"ruby-inter-character\">"+              , Strong [ Str "Lorem" , Space , Str "Ipsum" ]+              , Space+              , RawInline (Format "html") "<rp>"+              , Str "("+              , RawInline (Format "html") "</rp>"+              , RawInline (Format "html") "<rt>"+              , Str "Lorem"+              , Space+              , Str "Ipsum"+              , RawInline (Format "html") "</rt>"+              , RawInline (Format "html") "<rp>"+              , Str ")"+              , RawInline (Format "html") "</rp>"+              , RawInline (Format "html") "</ruby>"+              ]+          , Para+              [ Str "If"+              , Space+              , Str "the"+              , Space+              , Str "Ruby"+              , Space+              , Str "text"+              , Space+              , Str "is"+              , Space+              , Str "positioned"+              , Space+              , Str "on"+              , Space+              , Str "the"+              , Space+              , Str "right"+              , Space+              , Str "side"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Str "base"+              , Space+              , Str "text,"+              , Space+              , Str "the"+              , Space+              , Str "test"+              , Space+              , Str "passes."+              ]+          ]+      ]+  ]
test/epub/wasteland.native view
@@ -1,4551 +1,4602 @@-[ Para-    [ Image ( "" , [] , [] ) [] ( "wasteland-cover.jpg" , "" ) ]-, Para [ Span ( "wasteland-content.xhtml" , [] , [] ) [] ]-, Div-    ( "wasteland-content.xhtml#frontmatter"-    , [ "section" , "frontmatter" ]-    , []-    )-    []-, Div-    ( "wasteland-content.xhtml#bodymatter"-    , [ "section" , "bodymatter" ]-    , []-    )-    [ Div-        ( "wasteland-content.xhtml#ch1" , [ "section" ] , [] )-        [ Header-            2-            ( "" , [] , [] )-            [ Str "I."-            , Space-            , Str "THE"-            , Space-            , Str "BURIAL"-            , Space-            , Str "OF"-            , Space-            , Str "THE"-            , Space-            , Str "DEAD"-            ]-        , Div-            ( "" , [ "linegroup" ] , [] )-            [ Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "April"-                    , Space-                    , Str "is"-                    , Space-                    , Str "the"-                    , Space-                    , Str "cruellest"-                    , Space-                    , Str "month,"-                    , Space-                    , Str "breeding"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Lilacs"-                    , Space-                    , Str "out"-                    , Space-                    , Str "of"-                    , Space-                    , Str "the"-                    , Space-                    , Str "dead"-                    , Space-                    , Str "land,"-                    , Space-                    , Str "mixing"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Memory"-                    , Space-                    , Str "and"-                    , Space-                    , Str "desire,"-                    , Space-                    , Str "stirring"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Dull"-                    , Space-                    , Str "roots"-                    , Space-                    , Str "with"-                    , Space-                    , Str "spring"-                    , Space-                    , Str "rain."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Winter"-                    , Space-                    , Str "kept"-                    , Space-                    , Str "us"-                    , Space-                    , Str "warm,"-                    , Space-                    , Str "covering"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Earth"-                    , Space-                    , Str "in"-                    , Space-                    , Str "forgetful"-                    , Space-                    , Str "snow,"-                    , Space-                    , Str "feeding"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "A"-                    , Space-                    , Str "little"-                    , Space-                    , Str "life"-                    , Space-                    , Str "with"-                    , Space-                    , Str "dried"-                    , Space-                    , Str "tubers."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Summer"-                    , Space-                    , Str "surprised"-                    , Space-                    , Str "us,"-                    , Space-                    , Str "coming"-                    , Space-                    , Str "over"-                    , Space-                    , Str "the"-                    , Space-                    , Str "Starnbergersee"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "With"-                    , Space-                    , Str "a"-                    , Space-                    , Str "shower"-                    , Space-                    , Str "of"-                    , Space-                    , Str "rain;"-                    , Space-                    , Str "we"-                    , Space-                    , Str "stopped"-                    , Space-                    , Str "in"-                    , Space-                    , Str "the"-                    , Space-                    , Str "colonnade,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "went"-                    , Space-                    , Str "on"-                    , Space-                    , Str "in"-                    , Space-                    , Str "sunlight,"-                    , Space-                    , Str "into"-                    , Space-                    , Str "the"-                    , Space-                    , Str "Hofgarten,"-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "10" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "drank"-                    , Space-                    , Str "coffee,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "talked"-                    , Space-                    , Str "for"-                    , Space-                    , Str "an"-                    , Space-                    , Str "hour."-                    ]-                ]-            , Div-                ( "" , [] , [ ( "lang" , "de" ) ] )-                [ Plain-                    [ Str "Bin"-                    , Space-                    , Str "gar"-                    , Space-                    , Str "keine"-                    , Space-                    , Str "Russin,"-                    , Space-                    , Str "stamm'"-                    , Space-                    , Str "aus"-                    , Space-                    , Str "Litauen,"-                    , Space-                    , Str "echt"-                    , SoftBreak-                    , Str "deutsch."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "when"-                    , Space-                    , Str "we"-                    , Space-                    , Str "were"-                    , Space-                    , Str "children,"-                    , Space-                    , Str "staying"-                    , Space-                    , Str "at"-                    , Space-                    , Str "the"-                    , Space-                    , Str "archduke's,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "My"-                    , Space-                    , Str "cousin's,"-                    , Space-                    , Str "he"-                    , Space-                    , Str "took"-                    , Space-                    , Str "me"-                    , Space-                    , Str "out"-                    , Space-                    , Str "on"-                    , Space-                    , Str "a"-                    , Space-                    , Str "sled,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "I"-                    , Space-                    , Str "was"-                    , Space-                    , Str "frightened."-                    , Space-                    , Str "He"-                    , Space-                    , Str "said,"-                    , Space-                    , Str "Marie,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Marie,"-                    , Space-                    , Str "hold"-                    , Space-                    , Str "on"-                    , Space-                    , Str "tight."-                    , Space-                    , Str "And"-                    , Space-                    , Str "down"-                    , Space-                    , Str "we"-                    , Space-                    , Str "went."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "In"-                    , Space-                    , Str "the"-                    , Space-                    , Str "mountains,"-                    , Space-                    , Str "there"-                    , Space-                    , Str "you"-                    , Space-                    , Str "feel"-                    , Space-                    , Str "free."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "I"-                    , Space-                    , Str "read,"-                    , Space-                    , Str "much"-                    , Space-                    , Str "of"-                    , Space-                    , Str "the"-                    , Space-                    , Str "night,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "go"-                    , Space-                    , Str "south"-                    , Space-                    , Str "in"-                    , Space-                    , Str "the"-                    , Space-                    , Str "winter."-                    ]-                ]-            ]-        , Div-            ( "" , [ "linegroup" ] , [] )-            [ Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "What"-                    , Space-                    , Str "are"-                    , Space-                    , Str "the"-                    , Space-                    , Str "roots"-                    , Space-                    , Str "that"-                    , Space-                    , Str "clutch,"-                    , Space-                    , Str "what"-                    , Space-                    , Str "branches"-                    , Space-                    , Str "grow"-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln20" , [] , [] )-                [ Plain-                    [ Str "Out"-                    , Space-                    , Str "of"-                    , Space-                    , Str "this"-                    , Space-                    , Str "stony"-                    , Space-                    , Str "rubbish?"-                    , Space-                    , Str "Son"-                    , Space-                    , Str "of"-                    , Space-                    , Str "man,"-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "Line" , Space , Str "20." ]-                                ( "#wasteland-content.xhtml#ln20" , "" )-                            , Space-                            , Str "Cf."-                            , Space-                            , Str "Ezekiel"-                            , Space-                            , Str "2:1."-                            ]-                        ]-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "20" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "You"-                    , Space-                    , Str "cannot"-                    , Space-                    , Str "say,"-                    , Space-                    , Str "or"-                    , Space-                    , Str "guess,"-                    , Space-                    , Str "for"-                    , Space-                    , Str "you"-                    , Space-                    , Str "know"-                    , Space-                    , Str "only"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "A"-                    , Space-                    , Str "heap"-                    , Space-                    , Str "of"-                    , Space-                    , Str "broken"-                    , Space-                    , Str "images,"-                    , Space-                    , Str "where"-                    , Space-                    , Str "the"-                    , Space-                    , Str "sun"-                    , Space-                    , Str "beats,"-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln23" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "the"-                    , Space-                    , Str "dead"-                    , Space-                    , Str "tree"-                    , Space-                    , Str "gives"-                    , Space-                    , Str "no"-                    , Space-                    , Str "shelter,"-                    , Space-                    , Str "the"-                    , Space-                    , Str "cricket"-                    , Space-                    , Str "no"-                    , Space-                    , Str "relief,"-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "23." ]-                                ( "#wasteland-content.xhtml#ln23" , "" )-                            , Space-                            , Str "Cf."-                            , Space-                            , Str "Ecclesiastes"-                            , Space-                            , Str "12:5."-                            ]-                        ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "the"-                    , Space-                    , Str "dry"-                    , Space-                    , Str "stone"-                    , Space-                    , Str "no"-                    , Space-                    , Str "sound"-                    , Space-                    , Str "of"-                    , Space-                    , Str "water."-                    , Space-                    , Str "Only"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "There"-                    , Space-                    , Str "is"-                    , Space-                    , Str "shadow"-                    , Space-                    , Str "under"-                    , Space-                    , Str "this"-                    , Space-                    , Str "red"-                    , Space-                    , Str "rock,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "(Come"-                    , Space-                    , Str "in"-                    , Space-                    , Str "under"-                    , Space-                    , Str "the"-                    , Space-                    , Str "shadow"-                    , Space-                    , Str "of"-                    , Space-                    , Str "this"-                    , Space-                    , Str "red"-                    , Space-                    , Str "rock),"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "I"-                    , Space-                    , Str "will"-                    , Space-                    , Str "show"-                    , Space-                    , Str "you"-                    , Space-                    , Str "something"-                    , Space-                    , Str "different"-                    , Space-                    , Str "from"-                    , Space-                    , Str "either"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Your"-                    , Space-                    , Str "shadow"-                    , Space-                    , Str "at"-                    , Space-                    , Str "morning"-                    , Space-                    , Str "striding"-                    , Space-                    , Str "behind"-                    , Space-                    , Str "you"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Or"-                    , Space-                    , Str "your"-                    , Space-                    , Str "shadow"-                    , Space-                    , Str "at"-                    , Space-                    , Str "evening"-                    , Space-                    , Str "rising"-                    , Space-                    , Str "to"-                    , Space-                    , Str "meet"-                    , Space-                    , Str "you;"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "I"-                    , Space-                    , Str "will"-                    , Space-                    , Str "show"-                    , Space-                    , Str "you"-                    , Space-                    , Str "fear"-                    , Space-                    , Str "in"-                    , Space-                    , Str "a"-                    , Space-                    , Str "handful"-                    , Space-                    , Str "of"-                    , Space-                    , Str "dust."-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "30" ]-                    ]-                ]-            , BlockQuote-                [ Div-                    ( "" , [] , [] )-                    [ Div-                        ( "wasteland-content.xhtml#ln31" , [] , [] )-                        [ Plain-                            [ Str "Frisch"-                            , Space-                            , Str "weht"-                            , Space-                            , Str "der"-                            , Space-                            , Str "Wind"-                            , Note-                                [ Para-                                    [ Link-                                        ( "" , [] , [] )-                                        [ Str "31." ]-                                        ( "#wasteland-content.xhtml#ln31"-                                        , ""-                                        )-                                    , Space-                                    , Str "V."-                                    , Space-                                    , Str "Tristan"-                                    , Space-                                    , Str "und"-                                    , Space-                                    , Str "Isolde,"-                                    , Space-                                    , Str "i,"-                                    , Space-                                    , Str "verses"-                                    , Space-                                    , Str "5-8."-                                    ]-                                ]-                            ]-                        ]-                    , Div-                        ( "" , [] , [] )-                        [ Plain-                            [ Str "Der"-                            , Space-                            , Str "Heimat"-                            , Space-                            , Str "zu"-                            ]-                        ]-                    , Div-                        ( "" , [] , [] )-                        [ Plain-                            [ Str "Mein"-                            , Space-                            , Str "Irisch"-                            , Space-                            , Str "Kind,"-                            ]-                        ]-                    , Div-                        ( "" , [] , [] )-                        [ Plain-                            [ Str "Wo"-                            , Space-                            , Str "weilest"-                            , Space-                            , Str "du?"-                            ]-                        ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"You"-                    , Space-                    , Str "gave"-                    , Space-                    , Str "me"-                    , Space-                    , Str "hyacinths"-                    , Space-                    , Str "first"-                    , Space-                    , Str "a"-                    , Space-                    , Str "year"-                    , Space-                    , Str "ago;"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"They"-                    , Space-                    , Str "called"-                    , Space-                    , Str "me"-                    , Space-                    , Str "the"-                    , Space-                    , Str "hyacinth"-                    , Space-                    , Str "girl.\""-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\8213Yet"-                    , Space-                    , Str "when"-                    , Space-                    , Str "we"-                    , Space-                    , Str "came"-                    , Space-                    , Str "back,"-                    , Space-                    , Str "late,"-                    , Space-                    , Str "from"-                    , Space-                    , Str "the"-                    , Space-                    , Str "Hyacinth"-                    , SoftBreak-                    , Str "garden,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Your"-                    , Space-                    , Str "arms"-                    , Space-                    , Str "full,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "your"-                    , Space-                    , Str "hair"-                    , Space-                    , Str "wet,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "could"-                    , Space-                    , Str "not"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Speak,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "my"-                    , Space-                    , Str "eyes"-                    , Space-                    , Str "failed,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "was"-                    , Space-                    , Str "neither"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Living"-                    , Space-                    , Str "nor"-                    , Space-                    , Str "dead,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "I"-                    , Space-                    , Str "knew"-                    , Space-                    , Str "nothing,"-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "40" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Looking"-                    , Space-                    , Str "into"-                    , Space-                    , Str "the"-                    , Space-                    , Str "heart"-                    , Space-                    , Str "of"-                    , Space-                    , Str "light,"-                    , Space-                    , Str "the"-                    , Space-                    , Str "silence."-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln42"-                , []-                , [ ( "lang" , "de" ) ]-                )-                [ Plain-                    [ Emph-                        [ Str "Od'"-                        , Space-                        , Str "und"-                        , Space-                        , Str "leer"-                        , Space-                        , Str "das"-                        , Space-                        , Str "Meer"-                        ]-                    , Str "."-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "42." ]-                                ( "#wasteland-content.xhtml#ln42" , "" )-                            , Space-                            , Str "Id."-                            , Space-                            , Str "iii,"-                            , Space-                            , Str "verse"-                            , Space-                            , Str "24."-                            ]-                        ]-                    ]-                ]-            ]-        , Div-            ( "" , [ "linegroup" ] , [] )-            [ Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Madame"-                    , Space-                    , Str "Sosostris,"-                    , Space-                    , Str "famous"-                    , Space-                    , Str "clairvoyante,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Had"-                    , Space-                    , Str "a"-                    , Space-                    , Str "bad"-                    , Space-                    , Str "cold,"-                    , Space-                    , Str "nevertheless"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Is"-                    , Space-                    , Str "known"-                    , Space-                    , Str "to"-                    , Space-                    , Str "be"-                    , Space-                    , Str "the"-                    , Space-                    , Str "wisest"-                    , Space-                    , Str "woman"-                    , Space-                    , Str "in"-                    , Space-                    , Str "Europe,"-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln46" , [] , [] )-                [ Plain-                    [ Str "With"-                    , Space-                    , Str "a"-                    , Space-                    , Str "wicked"-                    , Space-                    , Str "pack"-                    , Space-                    , Str "of"-                    , Space-                    , Str "cards."-                    , Space-                    , Str "Here,"-                    , Space-                    , Str "said"-                    , Space-                    , Str "she,"-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "46." ]-                                ( "#wasteland-content.xhtml#ln46" , "" )-                            , Space-                            , Str "I"-                            , Space-                            , Str "am"-                            , Space-                            , Str "not"-                            , Space-                            , Str "familiar"-                            , Space-                            , Str "with"-                            , Space-                            , Str "the"-                            , Space-                            , Str "exact"-                            , Space-                            , Str "constitution"-                            , Space-                            , Str "of"-                            , Space-                            , Str "the"-                            , Space-                            , Str "Tarot"-                            , Space-                            , Str "pack"-                            , Space-                            , Str "of"-                            , SoftBreak-                            , Str "cards,"-                            , Space-                            , Str "from"-                            , Space-                            , Str "which"-                            , Space-                            , Str "I"-                            , Space-                            , Str "have"-                            , Space-                            , Str "obviously"-                            , Space-                            , Str "departed"-                            , Space-                            , Str "to"-                            , Space-                            , Str "suit"-                            , Space-                            , Str "my"-                            , Space-                            , Str "own"-                            , Space-                            , Str "convenience."-                            , SoftBreak-                            , Str "The"-                            , Space-                            , Str "Hanged"-                            , Space-                            , Str "Man,"-                            , Space-                            , Str "a"-                            , Space-                            , Str "member"-                            , Space-                            , Str "of"-                            , Space-                            , Str "the"-                            , Space-                            , Str "traditional"-                            , Space-                            , Str "pack,"-                            , Space-                            , Str "fits"-                            , Space-                            , Str "my"-                            , Space-                            , Str "purpose"-                            , Space-                            , Str "in"-                            , Space-                            , Str "two"-                            , SoftBreak-                            , Str "ways:"-                            , Space-                            , Str "because"-                            , Space-                            , Str "he"-                            , Space-                            , Str "is"-                            , Space-                            , Str "associated"-                            , Space-                            , Str "in"-                            , Space-                            , Str "my"-                            , Space-                            , Str "mind"-                            , Space-                            , Str "with"-                            , Space-                            , Str "the"-                            , Space-                            , Str "Hanged"-                            , Space-                            , Str "God"-                            , Space-                            , Str "of"-                            , Space-                            , Str "Frazer,"-                            , SoftBreak-                            , Str "and"-                            , Space-                            , Str "because"-                            , Space-                            , Str "I"-                            , Space-                            , Str "associate"-                            , Space-                            , Str "him"-                            , Space-                            , Str "with"-                            , Space-                            , Str "the"-                            , Space-                            , Str "hooded"-                            , Space-                            , Str "figure"-                            , Space-                            , Str "in"-                            , Space-                            , Str "the"-                            , Space-                            , Str "passage"-                            , Space-                            , Str "of"-                            , Space-                            , Str "the"-                            , SoftBreak-                            , Str "disciples"-                            , Space-                            , Str "to"-                            , Space-                            , Str "Emmaus"-                            , Space-                            , Str "in"-                            , Space-                            , Str "Part"-                            , Space-                            , Str "V."-                            , Space-                            , Str "The"-                            , Space-                            , Str "Phoenician"-                            , Space-                            , Str "Sailor"-                            , Space-                            , Str "and"-                            , Space-                            , Str "the"-                            , Space-                            , Str "Merchant"-                            , SoftBreak-                            , Str "appear"-                            , Space-                            , Str "later;"-                            , Space-                            , Str "also"-                            , Space-                            , Str "the"-                            , Space-                            , Str "\"crowds"-                            , Space-                            , Str "of"-                            , Space-                            , Str "people,\""-                            , Space-                            , Str "and"-                            , Space-                            , Str "Death"-                            , Space-                            , Str "by"-                            , Space-                            , Str "Water"-                            , Space-                            , Str "is"-                            , SoftBreak-                            , Str "executed"-                            , Space-                            , Str "in"-                            , Space-                            , Str "Part"-                            , Space-                            , Str "IV."-                            , Space-                            , Str "The"-                            , Space-                            , Str "Man"-                            , Space-                            , Str "with"-                            , Space-                            , Str "Three"-                            , Space-                            , Str "Staves"-                            , Space-                            , Str "(an"-                            , Space-                            , Str "authentic"-                            , Space-                            , Str "member"-                            , Space-                            , Str "of"-                            , SoftBreak-                            , Str "the"-                            , Space-                            , Str "Tarot"-                            , Space-                            , Str "pack)"-                            , Space-                            , Str "I"-                            , Space-                            , Str "associate,"-                            , Space-                            , Str "quite"-                            , Space-                            , Str "arbitrarily,"-                            , Space-                            , Str "with"-                            , Space-                            , Str "the"-                            , Space-                            , Str "Fisher"-                            , Space-                            , Str "King"-                            , SoftBreak-                            , Str "himself."-                            ]-                        ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Is"-                    , Space-                    , Str "your"-                    , Space-                    , Str "card,"-                    , Space-                    , Str "the"-                    , Space-                    , Str "drowned"-                    , Space-                    , Str "Phoenician"-                    , Space-                    , Str "Sailor,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "(Those"-                    , Space-                    , Str "are"-                    , Space-                    , Str "pearls"-                    , Space-                    , Str "that"-                    , Space-                    , Str "were"-                    , Space-                    , Str "his"-                    , Space-                    , Str "eyes."-                    , Space-                    , Str "Look!)"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Here"-                    , Space-                    , Str "is"-                    , Space-                    , Str "Belladonna,"-                    , Space-                    , Str "the"-                    , Space-                    , Str "Lady"-                    , Space-                    , Str "of"-                    , Space-                    , Str "the"-                    , Space-                    , Str "Rocks,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "The"-                    , Space-                    , Str "lady"-                    , Space-                    , Str "of"-                    , Space-                    , Str "situations."-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "50" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Here"-                    , Space-                    , Str "is"-                    , Space-                    , Str "the"-                    , Space-                    , Str "man"-                    , Space-                    , Str "with"-                    , Space-                    , Str "three"-                    , Space-                    , Str "staves,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "here"-                    , Space-                    , Str "the"-                    , Space-                    , Str "Wheel,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "here"-                    , Space-                    , Str "is"-                    , Space-                    , Str "the"-                    , Space-                    , Str "one-eyed"-                    , Space-                    , Str "merchant,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "this"-                    , Space-                    , Str "card,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Which"-                    , Space-                    , Str "is"-                    , Space-                    , Str "blank,"-                    , Space-                    , Str "is"-                    , Space-                    , Str "something"-                    , Space-                    , Str "he"-                    , Space-                    , Str "carries"-                    , Space-                    , Str "on"-                    , Space-                    , Str "his"-                    , Space-                    , Str "back,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Which"-                    , Space-                    , Str "I"-                    , Space-                    , Str "am"-                    , Space-                    , Str "forbidden"-                    , Space-                    , Str "to"-                    , Space-                    , Str "see."-                    , Space-                    , Str "I"-                    , Space-                    , Str "do"-                    , Space-                    , Str "not"-                    , Space-                    , Str "find"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "The"-                    , Space-                    , Str "Hanged"-                    , Space-                    , Str "Man."-                    , Space-                    , Str "Fear"-                    , Space-                    , Str "death"-                    , Space-                    , Str "by"-                    , Space-                    , Str "water."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "I"-                    , Space-                    , Str "see"-                    , Space-                    , Str "crowds"-                    , Space-                    , Str "of"-                    , Space-                    , Str "people,"-                    , Space-                    , Str "walking"-                    , Space-                    , Str "round"-                    , Space-                    , Str "in"-                    , Space-                    , Str "a"-                    , Space-                    , Str "ring."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Thank"-                    , Space-                    , Str "you."-                    , Space-                    , Str "If"-                    , Space-                    , Str "you"-                    , Space-                    , Str "see"-                    , Space-                    , Str "dear"-                    , Space-                    , Str "Mrs."-                    , Space-                    , Str "Equitone,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Tell"-                    , Space-                    , Str "her"-                    , Space-                    , Str "I"-                    , Space-                    , Str "bring"-                    , Space-                    , Str "the"-                    , Space-                    , Str "horoscope"-                    , Space-                    , Str "myself:"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "One"-                    , Space-                    , Str "must"-                    , Space-                    , Str "be"-                    , Space-                    , Str "so"-                    , Space-                    , Str "careful"-                    , Space-                    , Str "these"-                    , Space-                    , Str "days."-                    ]-                ]-            ]-        , Div-            ( "" , [ "linegroup" ] , [] )-            [ Div-                ( "wasteland-content.xhtml#ln60" , [] , [] )-                [ Plain-                    [ Str "Unreal"-                    , Space-                    , Str "City,"-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "60." ]-                                ( "#wasteland-content.xhtml#ln60" , "" )-                            , Space-                            , Str "Cf."-                            , Space-                            , Str "Baudelaire:"-                            ]-                        , BlockQuote-                            [ Para-                                [ Str "\"Fourmillante"-                                , Space-                                , Str "cite;,"-                                , Space-                                , Str "cite;"-                                , Space-                                , Str "pleine"-                                , Space-                                , Str "de"-                                , Space-                                , Str "reves,"-                                , LineBreak-                                , Str "Ou"-                                , Space-                                , Str "le"-                                , Space-                                , Str "spectre"-                                , Space-                                , Str "en"-                                , SoftBreak-                                , Str "plein"-                                , Space-                                , Str "jour"-                                , Space-                                , Str "raccroche"-                                , Space-                                , Str "le"-                                , Space-                                , Str "passant.\""-                                ]-                            ]-                        ]-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "60" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Under"-                    , Space-                    , Str "the"-                    , Space-                    , Str "brown"-                    , Space-                    , Str "fog"-                    , Space-                    , Str "of"-                    , Space-                    , Str "a"-                    , Space-                    , Str "winter"-                    , Space-                    , Str "dawn,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "A"-                    , Space-                    , Str "crowd"-                    , Space-                    , Str "flowed"-                    , Space-                    , Str "over"-                    , Space-                    , Str "London"-                    , Space-                    , Str "Bridge,"-                    , Space-                    , Str "so"-                    , Space-                    , Str "many,"-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln63" , [] , [] )-                [ Plain-                    [ Str "I"-                    , Space-                    , Str "had"-                    , Space-                    , Str "not"-                    , Space-                    , Str "thought"-                    , Space-                    , Str "death"-                    , Space-                    , Str "had"-                    , Space-                    , Str "undone"-                    , Space-                    , Str "so"-                    , Space-                    , Str "many."-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "63." ]-                                ( "#wasteland-content.xhtml#ln63" , "" )-                            , Space-                            , Str "Cf."-                            , Space-                            , Str "Inferno,"-                            , Space-                            , Str "iii."-                            , Space-                            , Str "55-7."-                            ]-                        , BlockQuote-                            [ Para-                                [ Str "\"si"-                                , Space-                                , Str "lunga"-                                , Space-                                , Str "tratta"-                                , LineBreak-                                , Str "di"-                                , Space-                                , Str "gente,"-                                , Space-                                , Str "ch'io"-                                , Space-                                , Str "non"-                                , Space-                                , Str "avrei"-                                , Space-                                , Str "mai"-                                , Space-                                , Str "creduto"-                                , LineBreak-                                , Str "che"-                                , SoftBreak-                                , Str "morte"-                                , Space-                                , Str "tanta"-                                , Space-                                , Str "n'avesse"-                                , Space-                                , Str "disfatta.\""-                                ]-                            ]-                        ]-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln64" , [] , [] )-                [ Plain-                    [ Str "Sighs,"-                    , Space-                    , Str "short"-                    , Space-                    , Str "and"-                    , Space-                    , Str "infrequent,"-                    , Space-                    , Str "were"-                    , Space-                    , Str "exhaled,"-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "64." ]-                                ( "#wasteland-content.xhtml#ln64" , "" )-                            , Space-                            , Str "Cf."-                            , Space-                            , Str "Inferno,"-                            , Space-                            , Str "iv."-                            , Space-                            , Str "25-7:"-                            ]-                        , BlockQuote-                            [ Para-                                [ Str "\"Quivi,"-                                , Space-                                , Str "secondo"-                                , Space-                                , Str "che"-                                , Space-                                , Str "per"-                                , Space-                                , Str "ascoltahre,"-                                , LineBreak-                                , Str "\"non"-                                , Space-                                , Str "avea"-                                , Space-                                , Str "pianto,"-                                , Space-                                , Str "ma'"-                                , Space-                                , Str "che"-                                , Space-                                , Str "di"-                                , SoftBreak-                                , Str "sospiri,"-                                , LineBreak-                                , Str "\"che"-                                , Space-                                , Str "l'aura"-                                , Space-                                , Str "eterna"-                                , Space-                                , Str "facevan"-                                , Space-                                , Str "tremare.\""-                                ]-                            ]-                        ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "each"-                    , Space-                    , Str "man"-                    , Space-                    , Str "fixed"-                    , Space-                    , Str "his"-                    , Space-                    , Str "eyes"-                    , Space-                    , Str "before"-                    , Space-                    , Str "his"-                    , Space-                    , Str "feet."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Flowed"-                    , Space-                    , Str "up"-                    , Space-                    , Str "the"-                    , Space-                    , Str "hill"-                    , Space-                    , Str "and"-                    , Space-                    , Str "down"-                    , Space-                    , Str "King"-                    , Space-                    , Str "William"-                    , Space-                    , Str "Street,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "To"-                    , Space-                    , Str "where"-                    , Space-                    , Str "Saint"-                    , Space-                    , Str "Mary"-                    , Space-                    , Str "Woolnoth"-                    , Space-                    , Str "kept"-                    , Space-                    , Str "the"-                    , Space-                    , Str "hours"-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln68" , [] , [] )-                [ Plain-                    [ Str "With"-                    , Space-                    , Str "a"-                    , Space-                    , Str "dead"-                    , Space-                    , Str "sound"-                    , Space-                    , Str "on"-                    , Space-                    , Str "the"-                    , Space-                    , Str "final"-                    , Space-                    , Str "stroke"-                    , Space-                    , Str "of"-                    , Space-                    , Str "nine."-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "68." ]-                                ( "#wasteland-content.xhtml#ln68" , "" )-                            , Space-                            , Str "A"-                            , Space-                            , Str "phenomenon"-                            , Space-                            , Str "which"-                            , Space-                            , Str "I"-                            , Space-                            , Str "have"-                            , Space-                            , Str "often"-                            , Space-                            , Str "noticed."-                            ]-                        ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "There"-                    , Space-                    , Str "I"-                    , Space-                    , Str "saw"-                    , Space-                    , Str "one"-                    , Space-                    , Str "I"-                    , Space-                    , Str "knew,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "stopped"-                    , Space-                    , Str "him,"-                    , Space-                    , Str "crying"-                    , SoftBreak-                    , Str "\"Stetson!"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"You"-                    , Space-                    , Str "who"-                    , Space-                    , Str "were"-                    , Space-                    , Str "with"-                    , Space-                    , Str "me"-                    , Space-                    , Str "in"-                    , Space-                    , Str "the"-                    , Space-                    , Str "ships"-                    , Space-                    , Str "at"-                    , Space-                    , Str "Mylae!"-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "70" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"That"-                    , Space-                    , Str "corpse"-                    , Space-                    , Str "you"-                    , Space-                    , Str "planted"-                    , Space-                    , Str "last"-                    , Space-                    , Str "year"-                    , Space-                    , Str "in"-                    , Space-                    , Str "your"-                    , Space-                    , Str "garden,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"Has"-                    , Space-                    , Str "it"-                    , Space-                    , Str "begun"-                    , Space-                    , Str "to"-                    , Space-                    , Str "sprout?"-                    , Space-                    , Str "Will"-                    , Space-                    , Str "it"-                    , Space-                    , Str "bloom"-                    , Space-                    , Str "this"-                    , Space-                    , Str "year?"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"Or"-                    , Space-                    , Str "has"-                    , Space-                    , Str "the"-                    , Space-                    , Str "sudden"-                    , Space-                    , Str "frost"-                    , Space-                    , Str "disturbed"-                    , Space-                    , Str "its"-                    , Space-                    , Str "bed?"-                    ]-                ]-            ]-        , Div-            ( "" , [ "linegroup" ] , [] )-            [ Div-                ( "wasteland-content.xhtml#ln74" , [] , [] )-                [ Plain-                    [ Str "\"Oh"-                    , Space-                    , Str "keep"-                    , Space-                    , Str "the"-                    , Space-                    , Str "Dog"-                    , Space-                    , Str "far"-                    , Space-                    , Str "hence,"-                    , Space-                    , Str "that's"-                    , Space-                    , Str "friend"-                    , Space-                    , Str "to"-                    , Space-                    , Str "men,"-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "74." ]-                                ( "#wasteland-content.xhtml#ln74" , "" )-                            , Space-                            , Str "Cf."-                            , Space-                            , Str "the"-                            , Space-                            , Str "Dirge"-                            , Space-                            , Str "in"-                            , Space-                            , Str "Webster's"-                            , Space-                            , Str "White"-                            , Space-                            , Str "Devil"-                            , Space-                            , Str "."-                            ]-                        ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"Or"-                    , Space-                    , Str "with"-                    , Space-                    , Str "his"-                    , Space-                    , Str "nails"-                    , Space-                    , Str "he'll"-                    , Space-                    , Str "dig"-                    , Space-                    , Str "it"-                    , Space-                    , Str "up"-                    , Space-                    , Str "again!"-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln76" , [] , [] )-                [ Plain-                    [ Str "\"You!"-                    , Space-                    , Span-                        ( "" , [] , [ ( "lang" , "fr" ) ] )-                        [ Str "hypocrite"-                        , Space-                        , Str "lecteur!"-                        , Space-                        , Str "-"-                        , Space-                        , Str "mon"-                        , Space-                        , Str "semblable,"-                        , Space-                        , Str "-"-                        , SoftBreak-                        , Str "mon"-                        , Space-                        , Str "frere"-                        ]-                    , Space-                    , Str "!\""-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "76." ]-                                ( "#wasteland-content.xhtml#ln76" , "" )-                            , Space-                            , Str "V."-                            , Space-                            , Str "Baudelaire,"-                            , Space-                            , Str "Preface"-                            , Space-                            , Str "to"-                            , Space-                            , Str "Fleurs"-                            , Space-                            , Str "du"-                            , Space-                            , Str "Mal."-                            ]-                        ]-                    ]-                ]-            ]-        ]-    , Div-        ( "wasteland-content.xhtml#ch2" , [ "section" ] , [] )-        [ Header-            2-            ( "" , [] , [] )-            [ Str "II."-            , Space-            , Str "A"-            , Space-            , Str "GAME"-            , Space-            , Str "OF"-            , Space-            , Str "CHESS"-            ]-        , Div-            ( "" , [ "linegroup" ] , [] )-            [ Div-                ( "wasteland-content.xhtml#ln77" , [] , [] )-                [ Plain-                    [ Str "The"-                    , Space-                    , Str "Chair"-                    , Space-                    , Str "she"-                    , Space-                    , Str "sat"-                    , Space-                    , Str "in,"-                    , Space-                    , Str "like"-                    , Space-                    , Str "a"-                    , Space-                    , Str "burnished"-                    , Space-                    , Str "throne,"-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "77." ]-                                ( "#wasteland-content.xhtml#ln77" , "" )-                            , Space-                            , Str "Cf."-                            , Space-                            , Str "Antony"-                            , Space-                            , Str "and"-                            , Space-                            , Str "Cleopatra,"-                            , Space-                            , Str "II."-                            , Space-                            , Str "ii.,"-                            , Space-                            , Str "l."-                            , Space-                            , Str "190."-                            ]-                        ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Glowed"-                    , Space-                    , Str "on"-                    , Space-                    , Str "the"-                    , Space-                    , Str "marble,"-                    , Space-                    , Str "where"-                    , Space-                    , Str "the"-                    , Space-                    , Str "glass"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Held"-                    , Space-                    , Str "up"-                    , Space-                    , Str "by"-                    , Space-                    , Str "standards"-                    , Space-                    , Str "wrought"-                    , Space-                    , Str "with"-                    , Space-                    , Str "fruited"-                    , Space-                    , Str "vines"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "From"-                    , Space-                    , Str "which"-                    , Space-                    , Str "a"-                    , Space-                    , Str "golden"-                    , Space-                    , Str "Cupidon"-                    , Space-                    , Str "peeped"-                    , Space-                    , Str "out"-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "80" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "(Another"-                    , Space-                    , Str "hid"-                    , Space-                    , Str "his"-                    , Space-                    , Str "eyes"-                    , Space-                    , Str "behind"-                    , Space-                    , Str "his"-                    , Space-                    , Str "wing)"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Doubled"-                    , Space-                    , Str "the"-                    , Space-                    , Str "flames"-                    , Space-                    , Str "of"-                    , Space-                    , Str "sevenbranched"-                    , Space-                    , Str "candelabra"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Reflecting"-                    , Space-                    , Str "light"-                    , Space-                    , Str "upon"-                    , Space-                    , Str "the"-                    , Space-                    , Str "table"-                    , Space-                    , Str "as"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "The"-                    , Space-                    , Str "glitter"-                    , Space-                    , Str "of"-                    , Space-                    , Str "her"-                    , Space-                    , Str "jewels"-                    , Space-                    , Str "rose"-                    , Space-                    , Str "to"-                    , Space-                    , Str "meet"-                    , Space-                    , Str "it,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "From"-                    , Space-                    , Str "satin"-                    , Space-                    , Str "cases"-                    , Space-                    , Str "poured"-                    , Space-                    , Str "in"-                    , Space-                    , Str "rich"-                    , Space-                    , Str "profusion;"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "In"-                    , Space-                    , Str "vials"-                    , Space-                    , Str "of"-                    , Space-                    , Str "ivory"-                    , Space-                    , Str "and"-                    , Space-                    , Str "coloured"-                    , Space-                    , Str "glass"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Unstoppered,"-                    , Space-                    , Str "lurked"-                    , Space-                    , Str "her"-                    , Space-                    , Str "strange"-                    , Space-                    , Str "synthetic"-                    , Space-                    , Str "perfumes,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Unguent,"-                    , Space-                    , Str "powdered,"-                    , Space-                    , Str "or"-                    , Space-                    , Str "liquid"-                    , Space-                    , Str "-"-                    , Space-                    , Str "troubled,"-                    , Space-                    , Str "confused"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "drowned"-                    , Space-                    , Str "the"-                    , Space-                    , Str "sense"-                    , Space-                    , Str "in"-                    , Space-                    , Str "odours;"-                    , Space-                    , Str "stirred"-                    , Space-                    , Str "by"-                    , Space-                    , Str "the"-                    , Space-                    , Str "air"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "That"-                    , Space-                    , Str "freshened"-                    , Space-                    , Str "from"-                    , Space-                    , Str "the"-                    , Space-                    , Str "window,"-                    , Space-                    , Str "these"-                    , Space-                    , Str "ascended"-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "90" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "In"-                    , Space-                    , Str "fattening"-                    , Space-                    , Str "the"-                    , Space-                    , Str "prolonged"-                    , Space-                    , Str "candle-flames,"-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln92" , [] , [] )-                [ Plain-                    [ Str "Flung"-                    , Space-                    , Str "their"-                    , Space-                    , Str "smoke"-                    , Space-                    , Str "into"-                    , Space-                    , Str "the"-                    , Space-                    , Str "laquearia,"-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "92." ]-                                ( "#wasteland-content.xhtml#ln92" , "" )-                            , Space-                            , Str "Laquearia."-                            , Space-                            , Str "V."-                            , Space-                            , Str "Aeneid,"-                            , Space-                            , Str "I."-                            , Space-                            , Str "726:"-                            ]-                        , BlockQuote-                            [ Para-                                [ Str "dependent"-                                , Space-                                , Str "lychni"-                                , Space-                                , Str "laquearibus"-                                , Space-                                , Str "aureis"-                                , Space-                                , Str "incensi,"-                                , Space-                                , Str "et"-                                , Space-                                , Str "noctem"-                                , SoftBreak-                                , Str "flammis"-                                , LineBreak-                                , Str "funalia"-                                , Space-                                , Str "vincunt."-                                ]-                            ]-                        ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Stirring"-                    , Space-                    , Str "the"-                    , Space-                    , Str "pattern"-                    , Space-                    , Str "on"-                    , Space-                    , Str "the"-                    , Space-                    , Str "coffered"-                    , Space-                    , Str "ceiling."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Huge"-                    , Space-                    , Str "sea-wood"-                    , Space-                    , Str "fed"-                    , Space-                    , Str "with"-                    , Space-                    , Str "copper"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Burned"-                    , Space-                    , Str "green"-                    , Space-                    , Str "and"-                    , Space-                    , Str "orange,"-                    , Space-                    , Str "framed"-                    , Space-                    , Str "by"-                    , Space-                    , Str "the"-                    , Space-                    , Str "coloured"-                    , Space-                    , Str "stone,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "In"-                    , Space-                    , Str "which"-                    , Space-                    , Str "sad"-                    , Space-                    , Str "light"-                    , Space-                    , Str "a"-                    , Space-                    , Str "carved"-                    , Space-                    , Str "dolphin"-                    , Space-                    , Str "swam."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Above"-                    , Space-                    , Str "the"-                    , Space-                    , Str "antique"-                    , Space-                    , Str "mantel"-                    , Space-                    , Str "was"-                    , Space-                    , Str "displayed"-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln98" , [] , [] )-                [ Plain-                    [ Str "As"-                    , Space-                    , Str "though"-                    , Space-                    , Str "a"-                    , Space-                    , Str "window"-                    , Space-                    , Str "gave"-                    , Space-                    , Str "upon"-                    , Space-                    , Str "the"-                    , Space-                    , Str "sylvan"-                    , Space-                    , Str "scene"-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "98." ]-                                ( "#wasteland-content.xhtml#ln98" , "" )-                            , Space-                            , Str "Sylvan"-                            , Space-                            , Str "scene."-                            , Space-                            , Str "V."-                            , Space-                            , Str "Milton,"-                            , Space-                            , Str "Paradise"-                            , Space-                            , Str "Lost,"-                            , Space-                            , Str "iv."-                            , Space-                            , Str "140."-                            ]-                        ]-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln99" , [] , [] )-                [ Plain-                    [ Str "The"-                    , Space-                    , Str "change"-                    , Space-                    , Str "of"-                    , Space-                    , Str "Philomel,"-                    , Space-                    , Str "by"-                    , Space-                    , Str "the"-                    , Space-                    , Str "barbarous"-                    , Space-                    , Str "king"-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "99." ]-                                ( "#wasteland-content.xhtml#ln99" , "" )-                            , Space-                            , Str "V."-                            , Space-                            , Str "Ovid,"-                            , Space-                            , Str "Metamorphoses,"-                            , Space-                            , Str "vi,"-                            , Space-                            , Str "Philomela."-                            ]-                        ]-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln100" , [] , [] )-                [ Plain-                    [ Str "So"-                    , Space-                    , Str "rudely"-                    , Space-                    , Str "forced;"-                    , Space-                    , Str "yet"-                    , Space-                    , Str "there"-                    , Space-                    , Str "the"-                    , Space-                    , Str "nightingale"-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "100." ]-                                ( "#wasteland-content.xhtml#ln100"-                                , ""-                                )-                            , Space-                            , Str "Cf."-                            , Space-                            , Str "Part"-                            , Space-                            , Str "III,"-                            , Space-                            , Str "l."-                            , Space-                            , Str "204."-                            ]-                        ]-                    , SoftBreak-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "100" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Filled"-                    , Space-                    , Str "all"-                    , Space-                    , Str "the"-                    , Space-                    , Str "desert"-                    , Space-                    , Str "with"-                    , Space-                    , Str "inviolable"-                    , Space-                    , Str "voice"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "still"-                    , Space-                    , Str "she"-                    , Space-                    , Str "cried,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "still"-                    , Space-                    , Str "the"-                    , Space-                    , Str "world"-                    , Space-                    , Str "pursues,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"Jug"-                    , Space-                    , Str "Jug\""-                    , Space-                    , Str "to"-                    , Space-                    , Str "dirty"-                    , Space-                    , Str "ears."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "other"-                    , Space-                    , Str "withered"-                    , Space-                    , Str "stumps"-                    , Space-                    , Str "of"-                    , Space-                    , Str "time"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Were"-                    , Space-                    , Str "told"-                    , Space-                    , Str "upon"-                    , Space-                    , Str "the"-                    , Space-                    , Str "walls;"-                    , Space-                    , Str "staring"-                    , Space-                    , Str "forms"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Leaned"-                    , Space-                    , Str "out,"-                    , Space-                    , Str "leaning,"-                    , Space-                    , Str "hushing"-                    , Space-                    , Str "the"-                    , Space-                    , Str "room"-                    , Space-                    , Str "enclosed."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Footsteps"-                    , Space-                    , Str "shuffled"-                    , Space-                    , Str "on"-                    , Space-                    , Str "the"-                    , Space-                    , Str "stair."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Under"-                    , Space-                    , Str "the"-                    , Space-                    , Str "firelight,"-                    , Space-                    , Str "under"-                    , Space-                    , Str "the"-                    , Space-                    , Str "brush,"-                    , Space-                    , Str "her"-                    , Space-                    , Str "hair"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Spread"-                    , Space-                    , Str "out"-                    , Space-                    , Str "in"-                    , Space-                    , Str "fiery"-                    , Space-                    , Str "points"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Glowed"-                    , Space-                    , Str "into"-                    , Space-                    , Str "words,"-                    , Space-                    , Str "then"-                    , Space-                    , Str "would"-                    , Space-                    , Str "be"-                    , Space-                    , Str "savagely"-                    , Space-                    , Str "still."-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "110" ]-                    ]-                ]-            ]-        , Div-            ( "" , [ "linegroup" ] , [] )-            [ Div-                ( "" , [ "linegroup" ] , [] )-                [ Div-                    ( "" , [] , [] )-                    [ Plain-                        [ Str "\"My"-                        , Space-                        , Str "nerves"-                        , Space-                        , Str "are"-                        , Space-                        , Str "bad"-                        , Space-                        , Str "to-night."-                        , Space-                        , Str "Yes,"-                        , Space-                        , Str "bad."-                        , Space-                        , Str "Stay"-                        , Space-                        , Str "with"-                        , Space-                        , Str "me."-                        ]-                    ]-                , Div-                    ( "" , [] , [] )-                    [ Plain-                        [ Str "\"Speak"-                        , Space-                        , Str "to"-                        , Space-                        , Str "me."-                        , Space-                        , Str "Why"-                        , Space-                        , Str "do"-                        , Space-                        , Str "you"-                        , Space-                        , Str "never"-                        , Space-                        , Str "speak."-                        , Space-                        , Str "Speak."-                        ]-                    ]-                , Div-                    ( "" , [] , [] )-                    [ Plain-                        [ Str "\"What"-                        , Space-                        , Str "are"-                        , Space-                        , Str "you"-                        , Space-                        , Str "thinking"-                        , Space-                        , Str "of?"-                        , Space-                        , Str "What"-                        , Space-                        , Str "thinking?"-                        , Space-                        , Str "What?"-                        ]-                    ]-                , Div-                    ( "" , [] , [] )-                    [ Plain-                        [ Str "\"I"-                        , Space-                        , Str "never"-                        , Space-                        , Str "know"-                        , Space-                        , Str "what"-                        , Space-                        , Str "you"-                        , Space-                        , Str "are"-                        , Space-                        , Str "thinking."-                        , Space-                        , Str "Think.\""-                        ]-                    ]-                ]-            , Div-                ( "" , [ "linegroup" ] , [] )-                [ Div-                    ( "wasteland-content.xhtml#ln115" , [] , [] )-                    [ Plain-                        [ Str "I"-                        , Space-                        , Str "think"-                        , Space-                        , Str "we"-                        , Space-                        , Str "are"-                        , Space-                        , Str "in"-                        , Space-                        , Str "rats'"-                        , Space-                        , Str "alley"-                        , Note-                            [ Para-                                [ Link-                                    ( "" , [] , [] )-                                    [ Str "115." ]-                                    ( "#wasteland-content.xhtml#ln115"-                                    , ""-                                    )-                                , Space-                                , Str "Cf."-                                , Space-                                , Str "Part"-                                , Space-                                , Str "III,"-                                , Space-                                , Str "l."-                                , Space-                                , Str "195."-                                ]-                            ]-                        ]-                    ]-                , Div-                    ( "" , [] , [] )-                    [ Plain-                        [ Str "Where"-                        , Space-                        , Str "the"-                        , Space-                        , Str "dead"-                        , Space-                        , Str "men"-                        , Space-                        , Str "lost"-                        , Space-                        , Str "their"-                        , Space-                        , Str "bones."-                        ]-                    ]-                ]-            ]-        , Div-            ( "" , [ "linegroup" ] , [] )-            [ Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"What"-                    , Space-                    , Str "is"-                    , Space-                    , Str "that"-                    , Space-                    , Str "noise?\""-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln118" , [ "indent" ] , [] )-                [ Plain-                    [ Str "The"-                    , Space-                    , Str "wind"-                    , Space-                    , Str "under"-                    , Space-                    , Str "the"-                    , Space-                    , Str "door."-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "118." ]-                                ( "#wasteland-content.xhtml#ln118"-                                , ""-                                )-                            , Space-                            , Str "Cf."-                            , Space-                            , Str "Webster:"-                            ]-                        , BlockQuote-                            [ Para-                                [ Str "\"Is"-                                , Space-                                , Str "the"-                                , Space-                                , Str "wind"-                                , Space-                                , Str "in"-                                , Space-                                , Str "that"-                                , Space-                                , Str "door"-                                , Space-                                , Str "still?\""-                                ]-                            ]-                        ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"What"-                    , Space-                    , Str "is"-                    , Space-                    , Str "that"-                    , Space-                    , Str "noise"-                    , Space-                    , Str "now?"-                    , Space-                    , Str "What"-                    , Space-                    , Str "is"-                    , Space-                    , Str "the"-                    , Space-                    , Str "wind"-                    , Space-                    , Str "doing?\""-                    ]-                ]-            , Div-                ( "" , [ "indent" ] , [] )-                [ Plain-                    [ Str "Nothing"-                    , Space-                    , Str "again"-                    , Space-                    , Str "nothing."-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "120" ]-                    ]-                ]-            ]-        , Div-            ( "" , [ "linegroup" ] , [] )-            [ Div ( "" , [] , [] ) [ Plain [ Str "\"Do" ] ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"You"-                    , Space-                    , Str "know"-                    , Space-                    , Str "nothing?"-                    , Space-                    , Str "Do"-                    , Space-                    , Str "you"-                    , Space-                    , Str "see"-                    , Space-                    , Str "nothing?"-                    , Space-                    , Str "Do"-                    , Space-                    , Str "you"-                    , Space-                    , Str "remember"-                    ]-                ]-            , Div ( "" , [] , [] ) [ Plain [ Str "\"Nothing?\"" ] ]-            ]-        , Div-            ( "" , [ "linegroup" ] , [] )-            [ Div-                ( "" , [] , [] )-                [ Plain [ Str "I" , Space , Str "remember" ] ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Those"-                    , Space-                    , Str "are"-                    , Space-                    , Str "pearls"-                    , Space-                    , Str "that"-                    , Space-                    , Str "were"-                    , Space-                    , Str "his"-                    , Space-                    , Str "eyes."-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln126" , [] , [] )-                [ Plain-                    [ Str "\"Are"-                    , Space-                    , Str "you"-                    , Space-                    , Str "alive,"-                    , Space-                    , Str "or"-                    , Space-                    , Str "not?"-                    , Space-                    , Str "Is"-                    , Space-                    , Str "there"-                    , Space-                    , Str "nothing"-                    , Space-                    , Str "in"-                    , Space-                    , Str "your"-                    , Space-                    , Str "head?\""-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "126." ]-                                ( "#wasteland-content.xhtml#ln126"-                                , ""-                                )-                            , Space-                            , Str "Cf."-                            , Space-                            , Str "Part"-                            , Space-                            , Str "I,"-                            , Space-                            , Str "l."-                            , Space-                            , Str "37,"-                            , Space-                            , Str "48."-                            ]-                        ]-                    ]-                ]-            , Div ( "" , [] , [] ) [ Plain [ Str "But" ] ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "O"-                    , Space-                    , Str "O"-                    , Space-                    , Str "O"-                    , Space-                    , Str "O"-                    , Space-                    , Str "that"-                    , Space-                    , Str "Shakespeherian"-                    , Space-                    , Str "Rag\8213"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "It's"-                    , Space-                    , Str "so"-                    , Space-                    , Str "elegant"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "So"-                    , Space-                    , Str "intelligent"-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "130" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"What"-                    , Space-                    , Str "shall"-                    , Space-                    , Str "I"-                    , Space-                    , Str "do"-                    , Space-                    , Str "now?"-                    , Space-                    , Str "What"-                    , Space-                    , Str "shall"-                    , Space-                    , Str "I"-                    , Space-                    , Str "do?\""-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "I"-                    , Space-                    , Str "shall"-                    , Space-                    , Str "rush"-                    , Space-                    , Str "out"-                    , Space-                    , Str "as"-                    , Space-                    , Str "I"-                    , Space-                    , Str "am,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "walk"-                    , Space-                    , Str "the"-                    , Space-                    , Str "street"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"With"-                    , Space-                    , Str "my"-                    , Space-                    , Str "hair"-                    , Space-                    , Str "down,"-                    , Space-                    , Str "so."-                    , Space-                    , Str "What"-                    , Space-                    , Str "shall"-                    , Space-                    , Str "we"-                    , Space-                    , Str "do"-                    , Space-                    , Str "to-morrow?"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "\"What"-                    , Space-                    , Str "shall"-                    , Space-                    , Str "we"-                    , Space-                    , Str "ever"-                    , Space-                    , Str "do?\""-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "The"-                    , Space-                    , Str "hot"-                    , Space-                    , Str "water"-                    , Space-                    , Str "at"-                    , Space-                    , Str "ten."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "if"-                    , Space-                    , Str "it"-                    , Space-                    , Str "rains,"-                    , Space-                    , Str "a"-                    , Space-                    , Str "closed"-                    , Space-                    , Str "car"-                    , Space-                    , Str "at"-                    , Space-                    , Str "four."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "we"-                    , Space-                    , Str "shall"-                    , Space-                    , Str "play"-                    , Space-                    , Str "a"-                    , Space-                    , Str "game"-                    , Space-                    , Str "of"-                    , Space-                    , Str "chess,"-                    ]-                ]-            , Div-                ( "wasteland-content.xhtml#ln138" , [] , [] )-                [ Plain-                    [ Str "Pressing"-                    , Space-                    , Str "lidless"-                    , Space-                    , Str "eyes"-                    , Space-                    , Str "and"-                    , Space-                    , Str "waiting"-                    , Space-                    , Str "for"-                    , Space-                    , Str "a"-                    , Space-                    , Str "knock"-                    , Space-                    , Str "upon"-                    , Space-                    , Str "the"-                    , Space-                    , Str "door."-                    , Note-                        [ Para-                            [ Link-                                ( "" , [] , [] )-                                [ Str "138." ]-                                ( "#wasteland-content.xhtml#ln138"-                                , ""-                                )-                            , Space-                            , Str "Cf."-                            , Space-                            , Str "the"-                            , Space-                            , Str "game"-                            , Space-                            , Str "of"-                            , Space-                            , Str "chess"-                            , Space-                            , Str "in"-                            , Space-                            , Str "Middleton's"-                            , Space-                            , Str "Women"-                            , Space-                            , Str "beware"-                            , Space-                            , Str "Women."-                            ]-                        ]-                    ]-                ]-            ]-        , Div-            ( "" , [ "linegroup" ] , [] )-            [ Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "When"-                    , Space-                    , Str "Lil's"-                    , Space-                    , Str "husband"-                    , Space-                    , Str "got"-                    , Space-                    , Str "demobbed,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "said"-                    , Space-                    , Str "-"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "I"-                    , Space-                    , Str "didn't"-                    , Space-                    , Str "mince"-                    , Space-                    , Str "my"-                    , Space-                    , Str "words,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "said"-                    , Space-                    , Str "to"-                    , Space-                    , Str "her"-                    , Space-                    , Str "myself,"-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "140" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "HURRY"-                    , Space-                    , Str "UP"-                    , Space-                    , Str "PLEASE"-                    , Space-                    , Str "ITS"-                    , Space-                    , Str "TIME"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Now"-                    , Space-                    , Str "Albert's"-                    , Space-                    , Str "coming"-                    , Space-                    , Str "back,"-                    , Space-                    , Str "make"-                    , Space-                    , Str "yourself"-                    , Space-                    , Str "a"-                    , Space-                    , Str "bit"-                    , Space-                    , Str "smart."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "He'll"-                    , Space-                    , Str "want"-                    , Space-                    , Str "to"-                    , Space-                    , Str "know"-                    , Space-                    , Str "what"-                    , Space-                    , Str "you"-                    , Space-                    , Str "done"-                    , Space-                    , Str "with"-                    , Space-                    , Str "that"-                    , Space-                    , Str "money"-                    , Space-                    , Str "he"-                    , Space-                    , Str "gave"-                    , SoftBreak-                    , Str "you"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "To"-                    , Space-                    , Str "get"-                    , Space-                    , Str "yourself"-                    , Space-                    , Str "some"-                    , Space-                    , Str "teeth."-                    , Space-                    , Str "He"-                    , Space-                    , Str "did,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "was"-                    , Space-                    , Str "there."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "You"-                    , Space-                    , Str "have"-                    , Space-                    , Str "them"-                    , Space-                    , Str "all"-                    , Space-                    , Str "out,"-                    , Space-                    , Str "Lil,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "get"-                    , Space-                    , Str "a"-                    , Space-                    , Str "nice"-                    , Space-                    , Str "set,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "He"-                    , Space-                    , Str "said,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "swear,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "can't"-                    , Space-                    , Str "bear"-                    , Space-                    , Str "to"-                    , Space-                    , Str "look"-                    , Space-                    , Str "at"-                    , Space-                    , Str "you."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "no"-                    , Space-                    , Str "more"-                    , Space-                    , Str "can't"-                    , Space-                    , Str "I,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "said,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "think"-                    , Space-                    , Str "of"-                    , Space-                    , Str "poor"-                    , Space-                    , Str "Albert,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "He's"-                    , Space-                    , Str "been"-                    , Space-                    , Str "in"-                    , Space-                    , Str "the"-                    , Space-                    , Str "army"-                    , Space-                    , Str "four"-                    , Space-                    , Str "years,"-                    , Space-                    , Str "he"-                    , Space-                    , Str "wants"-                    , Space-                    , Str "a"-                    , Space-                    , Str "good"-                    , Space-                    , Str "time,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "if"-                    , Space-                    , Str "you"-                    , Space-                    , Str "don't"-                    , Space-                    , Str "give"-                    , Space-                    , Str "it"-                    , Space-                    , Str "him,"-                    , Space-                    , Str "there's"-                    , Space-                    , Str "others"-                    , Space-                    , Str "will,"-                    , Space-                    , Str "I"-                    , SoftBreak-                    , Str "said."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Oh"-                    , Space-                    , Str "is"-                    , Space-                    , Str "there,"-                    , Space-                    , Str "she"-                    , Space-                    , Str "said."-                    , Space-                    , Str "Something"-                    , Space-                    , Str "o'"-                    , Space-                    , Str "that,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "said."-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "150" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Then"-                    , Space-                    , Str "I'll"-                    , Space-                    , Str "know"-                    , Space-                    , Str "who"-                    , Space-                    , Str "to"-                    , Space-                    , Str "thank,"-                    , Space-                    , Str "she"-                    , Space-                    , Str "said,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "give"-                    , Space-                    , Str "me"-                    , Space-                    , Str "a"-                    , Space-                    , Str "straight"-                    , SoftBreak-                    , Str "look."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "HURRY"-                    , Space-                    , Str "UP"-                    , Space-                    , Str "PLEASE"-                    , Space-                    , Str "ITS"-                    , Space-                    , Str "TIME"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "If"-                    , Space-                    , Str "you"-                    , Space-                    , Str "don't"-                    , Space-                    , Str "like"-                    , Space-                    , Str "it"-                    , Space-                    , Str "you"-                    , Space-                    , Str "can"-                    , Space-                    , Str "get"-                    , Space-                    , Str "on"-                    , Space-                    , Str "with"-                    , Space-                    , Str "it,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "said."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Others"-                    , Space-                    , Str "can"-                    , Space-                    , Str "pick"-                    , Space-                    , Str "and"-                    , Space-                    , Str "choose"-                    , Space-                    , Str "if"-                    , Space-                    , Str "you"-                    , Space-                    , Str "can't."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "But"-                    , Space-                    , Str "if"-                    , Space-                    , Str "Albert"-                    , Space-                    , Str "makes"-                    , Space-                    , Str "off,"-                    , Space-                    , Str "it"-                    , Space-                    , Str "won't"-                    , Space-                    , Str "be"-                    , Space-                    , Str "for"-                    , Space-                    , Str "lack"-                    , Space-                    , Str "of"-                    , SoftBreak-                    , Str "telling."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "You"-                    , Space-                    , Str "ought"-                    , Space-                    , Str "to"-                    , Space-                    , Str "be"-                    , Space-                    , Str "ashamed,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "said,"-                    , Space-                    , Str "to"-                    , Space-                    , Str "look"-                    , Space-                    , Str "so"-                    , Space-                    , Str "antique."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "(And"-                    , Space-                    , Str "her"-                    , Space-                    , Str "only"-                    , Space-                    , Str "thirty-one.)"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "I"-                    , Space-                    , Str "can't"-                    , Space-                    , Str "help"-                    , Space-                    , Str "it,"-                    , Space-                    , Str "she"-                    , Space-                    , Str "said,"-                    , Space-                    , Str "pulling"-                    , Space-                    , Str "a"-                    , Space-                    , Str "long"-                    , Space-                    , Str "face,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "It's"-                    , Space-                    , Str "them"-                    , Space-                    , Str "pills"-                    , Space-                    , Str "I"-                    , Space-                    , Str "took,"-                    , Space-                    , Str "to"-                    , Space-                    , Str "bring"-                    , Space-                    , Str "it"-                    , Space-                    , Str "off,"-                    , Space-                    , Str "she"-                    , Space-                    , Str "said."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "(She's"-                    , Space-                    , Str "had"-                    , Space-                    , Str "five"-                    , Space-                    , Str "already,"-                    , Space-                    , Str "and"-                    , Space-                    , Str "nearly"-                    , Space-                    , Str "died"-                    , Space-                    , Str "of"-                    , Space-                    , Str "young"-                    , Space-                    , Str "George.)"-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "160" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "The"-                    , Space-                    , Str "chemist"-                    , Space-                    , Str "said"-                    , Space-                    , Str "it"-                    , Space-                    , Str "would"-                    , Space-                    , Str "be"-                    , Space-                    , Str "all"-                    , Space-                    , Str "right,"-                    , Space-                    , Str "but"-                    , Space-                    , Str "I've"-                    , Space-                    , Str "never"-                    , Space-                    , Str "been"-                    , Space-                    , Str "the"-                    , SoftBreak-                    , Str "same."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "You"-                    , Space-                    , Emph [ Str "are" ]-                    , Space-                    , Str "a"-                    , Space-                    , Str "proper"-                    , Space-                    , Str "fool,"-                    , Space-                    , Str "I"-                    , Space-                    , Str "said."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Well,"-                    , Space-                    , Str "if"-                    , Space-                    , Str "Albert"-                    , Space-                    , Str "won't"-                    , Space-                    , Str "leave"-                    , Space-                    , Str "you"-                    , Space-                    , Str "alone,"-                    , Space-                    , Str "there"-                    , Space-                    , Str "it"-                    , Space-                    , Str "is,"-                    , Space-                    , Str "I"-                    , SoftBreak-                    , Str "said,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "What"-                    , Space-                    , Str "you"-                    , Space-                    , Str "get"-                    , Space-                    , Str "married"-                    , Space-                    , Str "for"-                    , Space-                    , Str "if"-                    , Space-                    , Str "you"-                    , Space-                    , Str "don't"-                    , Space-                    , Str "want"-                    , Space-                    , Str "children?"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "HURRY"-                    , Space-                    , Str "UP"-                    , Space-                    , Str "PLEASE"-                    , Space-                    , Str "ITS"-                    , Space-                    , Str "TIME"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Well,"-                    , Space-                    , Str "that"-                    , Space-                    , Str "Sunday"-                    , Space-                    , Str "Albert"-                    , Space-                    , Str "was"-                    , Space-                    , Str "home,"-                    , Space-                    , Str "they"-                    , Space-                    , Str "had"-                    , Space-                    , Str "a"-                    , Space-                    , Str "hot"-                    , SoftBreak-                    , Str "gammon,"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "And"-                    , Space-                    , Str "they"-                    , Space-                    , Str "asked"-                    , Space-                    , Str "me"-                    , Space-                    , Str "in"-                    , Space-                    , Str "to"-                    , Space-                    , Str "dinner,"-                    , Space-                    , Str "to"-                    , Space-                    , Str "get"-                    , Space-                    , Str "the"-                    , Space-                    , Str "beauty"-                    , Space-                    , Str "of"-                    , Space-                    , Str "it"-                    , SoftBreak-                    , Str "hot\8213"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "HURRY"-                    , Space-                    , Str "UP"-                    , Space-                    , Str "PLEASE"-                    , Space-                    , Str "ITS"-                    , Space-                    , Str "TIME"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "HURRY"-                    , Space-                    , Str "UP"-                    , Space-                    , Str "PLEASE"-                    , Space-                    , Str "ITS"-                    , Space-                    , Str "TIME"-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Goonight"-                    , Space-                    , Str "Bill."-                    , Space-                    , Str "Goonight"-                    , Space-                    , Str "Lou."-                    , Space-                    , Str "Goonight"-                    , Space-                    , Str "May."-                    , Space-                    , Str "Goonight."-                    , Span ( "" , [ "lnum" ] , [] ) [ Str "170" ]-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Ta"-                    , Space-                    , Str "ta."-                    , Space-                    , Str "Goonight."-                    , Space-                    , Str "Goonight."-                    ]-                ]-            , Div-                ( "" , [] , [] )-                [ Plain-                    [ Str "Good"-                    , Space-                    , Str "night,"-                    , Space-                    , Str "ladies,"-                    , Space-                    , Str "good"-                    , Space-                    , Str "night,"-                    , Space-                    , Str "sweet"-                    , Space-                    , Str "ladies,"-                    , Space-                    , Str "good"-                    , Space-                    , Str "night,"-                    , Space-                    , Str "good"-                    , SoftBreak-                    , Str "night."-                    ]-                ]-            ]-        ]-    ]-, Div-    ( "wasteland-content.xhtml#backmatter"-    , [ "section" , "backmatter" ]-    , []-    )-    [ Div-        ( "wasteland-content.xhtml#rearnotes"-        , [ "rearnotes" ]-        , []-        )-        [ Header-            2-            ( "" , [] , [] )-            [ Str "NOTES"-            , Space-            , Str "ON"-            , Space-            , Str "\"THE"-            , Space-            , Str "WASTE"-            , Space-            , Str "LAND\""-            ]-        , Para-            [ Str "Not"-            , Space-            , Str "only"-            , Space-            , Str "the"-            , Space-            , Str "title,"-            , Space-            , Str "but"-            , Space-            , Str "the"-            , Space-            , Str "plan"-            , Space-            , Str "and"-            , Space-            , Str "a"-            , Space-            , Str "good"-            , Space-            , Str "deal"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Str "incidental"-            , Space-            , Str "symbolism"-            , Space-            , Str "of"-            , SoftBreak-            , Str "the"-            , Space-            , Str "poem"-            , Space-            , Str "were"-            , Space-            , Str "suggested"-            , Space-            , Str "by"-            , Space-            , Str "Miss"-            , Space-            , Str "Jessie"-            , Space-            , Str "L."-            , Space-            , Str "Weston's"-            , Space-            , Str "book"-            , Space-            , Str "on"-            , Space-            , Str "the"-            , Space-            , Str "Grail"-            , Space-            , Str "legend:"-            , SoftBreak-            , Str "From"-            , Space-            , Str "Ritual"-            , Space-            , Str "to"-            , Space-            , Str "Romance"-            ]-        , Para-            [ Str "Indeed,"-            , Space-            , Str "so"-            , Space-            , Str "deeply"-            , Space-            , Str "am"-            , Space-            , Str "I"-            , Space-            , Str "indebted,"-            , Space-            , Str "Miss"-            , Space-            , Str "Weston's"-            , Space-            , Str "book"-            , Space-            , Str "will"-            , Space-            , Str "elucidate"-            , Space-            , Str "the"-            , SoftBreak-            , Str "difficulties"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Str "poem"-            , Space-            , Str "much"-            , Space-            , Str "better"-            , Space-            , Str "than"-            , Space-            , Str "my"-            , Space-            , Str "notes"-            , Space-            , Str "can"-            , Space-            , Str "do;"-            , Space-            , Str "and"-            , Space-            , Str "I"-            , Space-            , Str "recommend"-            , Space-            , Str "it"-            , SoftBreak-            , Str "(apart"-            , Space-            , Str "from"-            , Space-            , Str "the"-            , Space-            , Str "great"-            , Space-            , Str "interest"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Str "book"-            , Space-            , Str "itself)"-            , Space-            , Str "to"-            , Space-            , Str "any"-            , Space-            , Str "who"-            , Space-            , Str "think"-            , Space-            , Str "such"-            , SoftBreak-            , Str "elucidation"-            , Space-            , Str "of"-            , Space-            , Str "the"-            , Space-            , Str "poem"-            , Space-            , Str "worth"-            , Space-            , Str "the"-            , Space-            , Str "trouble."-            , Space-            , Str "To"-            , Space-            , Str "another"-            , Space-            , Str "work"-            , Space-            , Str "of"-            , Space-            , Str "anthropology"-            , Space-            , Str "I"-            , Space-            , Str "am"-            , SoftBreak-            , Str "indebted"-            , Space-            , Str "in"-            , Space-            , Str "general,"-            , Space-            , Str "one"-            , Space-            , Str "which"-            , Space-            , Str "has"-            , Space-            , Str "influenced"-            , Space-            , Str "our"-            , Space-            , Str "generation"-            , Space-            , Str "profoundly;"-            , Space-            , Str "I"-            , Space-            , Str "mean"-            , SoftBreak-            , Str "The"-            , Space-            , Str "Golden"-            , Space-            , Str "Bough;"-            , Space-            , Str "I"-            , Space-            , Str "have"-            , Space-            , Str "used"-            , Space-            , Str "especially"-            , Space-            , Str "the"-            , Space-            , Str "two"-            , Space-            , Str "volumes"-            , Space-            , Str "Adonis,"-            , Space-            , Str "Attis,"-            , Space-            , Str "Osiris."-            , SoftBreak-            , Str "Anyone"-            , Space-            , Str "who"-            , Space-            , Str "is"-            , Space-            , Str "acquainted"-            , Space-            , Str "with"-            , Space-            , Str "these"-            , Space-            , Str "works"-            , Space-            , Str "will"-            , Space-            , Str "immediately"-            , Space-            , Str "recognise"-            , Space-            , Str "in"-            , Space-            , Str "the"-            , Space-            , Str "poem"-            , SoftBreak-            , Str "certain"-            , Space-            , Str "references"-            , Space-            , Str "to"-            , Space-            , Str "vegetation"-            , Space-            , Str "ceremonies."-            ]-        , Div-            ( "" , [ "section" ] , [] )-            [ Header-                3-                ( "" , [] , [] )-                [ Str "I."-                , Space-                , Str "THE"-                , Space-                , Str "BURIAL"-                , Space-                , Str "OF"-                , Space-                , Str "THE"-                , Space-                , Str "DEAD"-                ]-            ]-        , Div-            ( "" , [ "section" ] , [] )-            [ Header-                3-                ( "" , [] , [] )-                [ Str "II."-                , Space-                , Str "A"-                , Space-                , Str "GAME"-                , Space-                , Str "OF"-                , Space-                , Str "CHESS"-                ]-            ]-        ]-    ]-]+Pandoc+  Meta+    { unMeta =+        fromList+          [ ( "author" , MetaInlines [ Str "T.S. Eliot" ] )+          , ( "date" , MetaInlines [ Str "2011-09-01" ] )+          , ( "identifier"+            , MetaInlines+                [ Str "code.google.com.epub-samples.wasteland-basic" ]+            )+          , ( "language" , MetaInlines [ Str "en-US" ] )+          , ( "rights"+            , MetaInlines+                [ Str+                    "This work is shared with the public using the Attribution-ShareAlike 3.0 Unported (CC BY-SA 3.0) license."+                ]+            )+          , ( "title" , MetaInlines [ Str "The Waste Land" ] )+          ]+    }+  [ Para+      [ Image ( "" , [] , [] ) [] ( "wasteland-cover.jpg" , "" ) ]+  , Para [ Span ( "wasteland-content.xhtml" , [] , [] ) [] ]+  , Div+      ( "wasteland-content.xhtml_frontmatter"+      , [ "section" , "frontmatter" ]+      , []+      )+      []+  , Div+      ( "wasteland-content.xhtml_bodymatter"+      , [ "section" , "bodymatter" ]+      , []+      )+      [ Div+          ( "wasteland-content.xhtml_ch1" , [ "section" ] , [] )+          [ Header+              2+              ( "" , [] , [] )+              [ Str "I."+              , Space+              , Str "THE"+              , Space+              , Str "BURIAL"+              , Space+              , Str "OF"+              , Space+              , Str "THE"+              , Space+              , Str "DEAD"+              ]+          , Div+              ( "" , [ "linegroup" ] , [] )+              [ Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "April"+                      , Space+                      , Str "is"+                      , Space+                      , Str "the"+                      , Space+                      , Str "cruellest"+                      , Space+                      , Str "month,"+                      , Space+                      , Str "breeding"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Lilacs"+                      , Space+                      , Str "out"+                      , Space+                      , Str "of"+                      , Space+                      , Str "the"+                      , Space+                      , Str "dead"+                      , Space+                      , Str "land,"+                      , Space+                      , Str "mixing"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Memory"+                      , Space+                      , Str "and"+                      , Space+                      , Str "desire,"+                      , Space+                      , Str "stirring"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Dull"+                      , Space+                      , Str "roots"+                      , Space+                      , Str "with"+                      , Space+                      , Str "spring"+                      , Space+                      , Str "rain."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Winter"+                      , Space+                      , Str "kept"+                      , Space+                      , Str "us"+                      , Space+                      , Str "warm,"+                      , Space+                      , Str "covering"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Earth"+                      , Space+                      , Str "in"+                      , Space+                      , Str "forgetful"+                      , Space+                      , Str "snow,"+                      , Space+                      , Str "feeding"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "A"+                      , Space+                      , Str "little"+                      , Space+                      , Str "life"+                      , Space+                      , Str "with"+                      , Space+                      , Str "dried"+                      , Space+                      , Str "tubers."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Summer"+                      , Space+                      , Str "surprised"+                      , Space+                      , Str "us,"+                      , Space+                      , Str "coming"+                      , Space+                      , Str "over"+                      , Space+                      , Str "the"+                      , Space+                      , Str "Starnbergersee"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "With"+                      , Space+                      , Str "a"+                      , Space+                      , Str "shower"+                      , Space+                      , Str "of"+                      , Space+                      , Str "rain;"+                      , Space+                      , Str "we"+                      , Space+                      , Str "stopped"+                      , Space+                      , Str "in"+                      , Space+                      , Str "the"+                      , Space+                      , Str "colonnade,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "went"+                      , Space+                      , Str "on"+                      , Space+                      , Str "in"+                      , Space+                      , Str "sunlight,"+                      , Space+                      , Str "into"+                      , Space+                      , Str "the"+                      , Space+                      , Str "Hofgarten,"+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "10" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "drank"+                      , Space+                      , Str "coffee,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "talked"+                      , Space+                      , Str "for"+                      , Space+                      , Str "an"+                      , Space+                      , Str "hour."+                      ]+                  ]+              , Div+                  ( "" , [] , [ ( "lang" , "de" ) ] )+                  [ Plain+                      [ Str "Bin"+                      , Space+                      , Str "gar"+                      , Space+                      , Str "keine"+                      , Space+                      , Str "Russin,"+                      , Space+                      , Str "stamm'"+                      , Space+                      , Str "aus"+                      , Space+                      , Str "Litauen,"+                      , Space+                      , Str "echt"+                      , SoftBreak+                      , Str "deutsch."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "when"+                      , Space+                      , Str "we"+                      , Space+                      , Str "were"+                      , Space+                      , Str "children,"+                      , Space+                      , Str "staying"+                      , Space+                      , Str "at"+                      , Space+                      , Str "the"+                      , Space+                      , Str "archduke's,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "My"+                      , Space+                      , Str "cousin's,"+                      , Space+                      , Str "he"+                      , Space+                      , Str "took"+                      , Space+                      , Str "me"+                      , Space+                      , Str "out"+                      , Space+                      , Str "on"+                      , Space+                      , Str "a"+                      , Space+                      , Str "sled,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "I"+                      , Space+                      , Str "was"+                      , Space+                      , Str "frightened."+                      , Space+                      , Str "He"+                      , Space+                      , Str "said,"+                      , Space+                      , Str "Marie,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Marie,"+                      , Space+                      , Str "hold"+                      , Space+                      , Str "on"+                      , Space+                      , Str "tight."+                      , Space+                      , Str "And"+                      , Space+                      , Str "down"+                      , Space+                      , Str "we"+                      , Space+                      , Str "went."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "In"+                      , Space+                      , Str "the"+                      , Space+                      , Str "mountains,"+                      , Space+                      , Str "there"+                      , Space+                      , Str "you"+                      , Space+                      , Str "feel"+                      , Space+                      , Str "free."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "I"+                      , Space+                      , Str "read,"+                      , Space+                      , Str "much"+                      , Space+                      , Str "of"+                      , Space+                      , Str "the"+                      , Space+                      , Str "night,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "go"+                      , Space+                      , Str "south"+                      , Space+                      , Str "in"+                      , Space+                      , Str "the"+                      , Space+                      , Str "winter."+                      ]+                  ]+              ]+          , Div+              ( "" , [ "linegroup" ] , [] )+              [ Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "What"+                      , Space+                      , Str "are"+                      , Space+                      , Str "the"+                      , Space+                      , Str "roots"+                      , Space+                      , Str "that"+                      , Space+                      , Str "clutch,"+                      , Space+                      , Str "what"+                      , Space+                      , Str "branches"+                      , Space+                      , Str "grow"+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln20" , [] , [] )+                  [ Plain+                      [ Str "Out"+                      , Space+                      , Str "of"+                      , Space+                      , Str "this"+                      , Space+                      , Str "stony"+                      , Space+                      , Str "rubbish?"+                      , Space+                      , Str "Son"+                      , Space+                      , Str "of"+                      , Space+                      , Str "man,"+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "Line" , Space , Str "20." ]+                                  ( "#wasteland-content.xhtml_ln20"+                                  , ""+                                  )+                              , Space+                              , Str "Cf."+                              , Space+                              , Str "Ezekiel"+                              , Space+                              , Str "2:1."+                              ]+                          ]+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "20" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "You"+                      , Space+                      , Str "cannot"+                      , Space+                      , Str "say,"+                      , Space+                      , Str "or"+                      , Space+                      , Str "guess,"+                      , Space+                      , Str "for"+                      , Space+                      , Str "you"+                      , Space+                      , Str "know"+                      , Space+                      , Str "only"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "A"+                      , Space+                      , Str "heap"+                      , Space+                      , Str "of"+                      , Space+                      , Str "broken"+                      , Space+                      , Str "images,"+                      , Space+                      , Str "where"+                      , Space+                      , Str "the"+                      , Space+                      , Str "sun"+                      , Space+                      , Str "beats,"+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln23" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "the"+                      , Space+                      , Str "dead"+                      , Space+                      , Str "tree"+                      , Space+                      , Str "gives"+                      , Space+                      , Str "no"+                      , Space+                      , Str "shelter,"+                      , Space+                      , Str "the"+                      , Space+                      , Str "cricket"+                      , Space+                      , Str "no"+                      , Space+                      , Str "relief,"+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "23." ]+                                  ( "#wasteland-content.xhtml_ln23"+                                  , ""+                                  )+                              , Space+                              , Str "Cf."+                              , Space+                              , Str "Ecclesiastes"+                              , Space+                              , Str "12:5."+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "the"+                      , Space+                      , Str "dry"+                      , Space+                      , Str "stone"+                      , Space+                      , Str "no"+                      , Space+                      , Str "sound"+                      , Space+                      , Str "of"+                      , Space+                      , Str "water."+                      , Space+                      , Str "Only"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "There"+                      , Space+                      , Str "is"+                      , Space+                      , Str "shadow"+                      , Space+                      , Str "under"+                      , Space+                      , Str "this"+                      , Space+                      , Str "red"+                      , Space+                      , Str "rock,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "(Come"+                      , Space+                      , Str "in"+                      , Space+                      , Str "under"+                      , Space+                      , Str "the"+                      , Space+                      , Str "shadow"+                      , Space+                      , Str "of"+                      , Space+                      , Str "this"+                      , Space+                      , Str "red"+                      , Space+                      , Str "rock),"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "I"+                      , Space+                      , Str "will"+                      , Space+                      , Str "show"+                      , Space+                      , Str "you"+                      , Space+                      , Str "something"+                      , Space+                      , Str "different"+                      , Space+                      , Str "from"+                      , Space+                      , Str "either"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Your"+                      , Space+                      , Str "shadow"+                      , Space+                      , Str "at"+                      , Space+                      , Str "morning"+                      , Space+                      , Str "striding"+                      , Space+                      , Str "behind"+                      , Space+                      , Str "you"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Or"+                      , Space+                      , Str "your"+                      , Space+                      , Str "shadow"+                      , Space+                      , Str "at"+                      , Space+                      , Str "evening"+                      , Space+                      , Str "rising"+                      , Space+                      , Str "to"+                      , Space+                      , Str "meet"+                      , Space+                      , Str "you;"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "I"+                      , Space+                      , Str "will"+                      , Space+                      , Str "show"+                      , Space+                      , Str "you"+                      , Space+                      , Str "fear"+                      , Space+                      , Str "in"+                      , Space+                      , Str "a"+                      , Space+                      , Str "handful"+                      , Space+                      , Str "of"+                      , Space+                      , Str "dust."+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "30" ]+                      ]+                  ]+              , BlockQuote+                  [ Div+                      ( "" , [] , [] )+                      [ Div+                          ( "wasteland-content.xhtml_ln31" , [] , [] )+                          [ Plain+                              [ Str "Frisch"+                              , Space+                              , Str "weht"+                              , Space+                              , Str "der"+                              , Space+                              , Str "Wind"+                              , Note+                                  [ Para+                                      [ Link+                                          ( "" , [] , [] )+                                          [ Str "31." ]+                                          ( "#wasteland-content.xhtml_ln31"+                                          , ""+                                          )+                                      , Space+                                      , Str "V."+                                      , Space+                                      , Str "Tristan"+                                      , Space+                                      , Str "und"+                                      , Space+                                      , Str "Isolde,"+                                      , Space+                                      , Str "i,"+                                      , Space+                                      , Str "verses"+                                      , Space+                                      , Str "5-8."+                                      ]+                                  ]+                              ]+                          ]+                      , Div+                          ( "" , [] , [] )+                          [ Plain+                              [ Str "Der"+                              , Space+                              , Str "Heimat"+                              , Space+                              , Str "zu"+                              ]+                          ]+                      , Div+                          ( "" , [] , [] )+                          [ Plain+                              [ Str "Mein"+                              , Space+                              , Str "Irisch"+                              , Space+                              , Str "Kind,"+                              ]+                          ]+                      , Div+                          ( "" , [] , [] )+                          [ Plain+                              [ Str "Wo"+                              , Space+                              , Str "weilest"+                              , Space+                              , Str "du?"+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"You"+                      , Space+                      , Str "gave"+                      , Space+                      , Str "me"+                      , Space+                      , Str "hyacinths"+                      , Space+                      , Str "first"+                      , Space+                      , Str "a"+                      , Space+                      , Str "year"+                      , Space+                      , Str "ago;"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"They"+                      , Space+                      , Str "called"+                      , Space+                      , Str "me"+                      , Space+                      , Str "the"+                      , Space+                      , Str "hyacinth"+                      , Space+                      , Str "girl.\""+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\8213Yet"+                      , Space+                      , Str "when"+                      , Space+                      , Str "we"+                      , Space+                      , Str "came"+                      , Space+                      , Str "back,"+                      , Space+                      , Str "late,"+                      , Space+                      , Str "from"+                      , Space+                      , Str "the"+                      , Space+                      , Str "Hyacinth"+                      , SoftBreak+                      , Str "garden,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Your"+                      , Space+                      , Str "arms"+                      , Space+                      , Str "full,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "your"+                      , Space+                      , Str "hair"+                      , Space+                      , Str "wet,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "could"+                      , Space+                      , Str "not"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Speak,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "my"+                      , Space+                      , Str "eyes"+                      , Space+                      , Str "failed,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "was"+                      , Space+                      , Str "neither"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Living"+                      , Space+                      , Str "nor"+                      , Space+                      , Str "dead,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "I"+                      , Space+                      , Str "knew"+                      , Space+                      , Str "nothing,"+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "40" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Looking"+                      , Space+                      , Str "into"+                      , Space+                      , Str "the"+                      , Space+                      , Str "heart"+                      , Space+                      , Str "of"+                      , Space+                      , Str "light,"+                      , Space+                      , Str "the"+                      , Space+                      , Str "silence."+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln42"+                  , []+                  , [ ( "lang" , "de" ) ]+                  )+                  [ Plain+                      [ Emph+                          [ Str "Od'"+                          , Space+                          , Str "und"+                          , Space+                          , Str "leer"+                          , Space+                          , Str "das"+                          , Space+                          , Str "Meer"+                          ]+                      , Str "."+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "42." ]+                                  ( "#wasteland-content.xhtml_ln42"+                                  , ""+                                  )+                              , Space+                              , Str "Id."+                              , Space+                              , Str "iii,"+                              , Space+                              , Str "verse"+                              , Space+                              , Str "24."+                              ]+                          ]+                      ]+                  ]+              ]+          , Div+              ( "" , [ "linegroup" ] , [] )+              [ Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Madame"+                      , Space+                      , Str "Sosostris,"+                      , Space+                      , Str "famous"+                      , Space+                      , Str "clairvoyante,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Had"+                      , Space+                      , Str "a"+                      , Space+                      , Str "bad"+                      , Space+                      , Str "cold,"+                      , Space+                      , Str "nevertheless"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Is"+                      , Space+                      , Str "known"+                      , Space+                      , Str "to"+                      , Space+                      , Str "be"+                      , Space+                      , Str "the"+                      , Space+                      , Str "wisest"+                      , Space+                      , Str "woman"+                      , Space+                      , Str "in"+                      , Space+                      , Str "Europe,"+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln46" , [] , [] )+                  [ Plain+                      [ Str "With"+                      , Space+                      , Str "a"+                      , Space+                      , Str "wicked"+                      , Space+                      , Str "pack"+                      , Space+                      , Str "of"+                      , Space+                      , Str "cards."+                      , Space+                      , Str "Here,"+                      , Space+                      , Str "said"+                      , Space+                      , Str "she,"+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "46." ]+                                  ( "#wasteland-content.xhtml_ln46"+                                  , ""+                                  )+                              , Space+                              , Str "I"+                              , Space+                              , Str "am"+                              , Space+                              , Str "not"+                              , Space+                              , Str "familiar"+                              , Space+                              , Str "with"+                              , Space+                              , Str "the"+                              , Space+                              , Str "exact"+                              , Space+                              , Str "constitution"+                              , Space+                              , Str "of"+                              , Space+                              , Str "the"+                              , Space+                              , Str "Tarot"+                              , Space+                              , Str "pack"+                              , Space+                              , Str "of"+                              , SoftBreak+                              , Str "cards,"+                              , Space+                              , Str "from"+                              , Space+                              , Str "which"+                              , Space+                              , Str "I"+                              , Space+                              , Str "have"+                              , Space+                              , Str "obviously"+                              , Space+                              , Str "departed"+                              , Space+                              , Str "to"+                              , Space+                              , Str "suit"+                              , Space+                              , Str "my"+                              , Space+                              , Str "own"+                              , Space+                              , Str "convenience."+                              , SoftBreak+                              , Str "The"+                              , Space+                              , Str "Hanged"+                              , Space+                              , Str "Man,"+                              , Space+                              , Str "a"+                              , Space+                              , Str "member"+                              , Space+                              , Str "of"+                              , Space+                              , Str "the"+                              , Space+                              , Str "traditional"+                              , Space+                              , Str "pack,"+                              , Space+                              , Str "fits"+                              , Space+                              , Str "my"+                              , Space+                              , Str "purpose"+                              , Space+                              , Str "in"+                              , Space+                              , Str "two"+                              , SoftBreak+                              , Str "ways:"+                              , Space+                              , Str "because"+                              , Space+                              , Str "he"+                              , Space+                              , Str "is"+                              , Space+                              , Str "associated"+                              , Space+                              , Str "in"+                              , Space+                              , Str "my"+                              , Space+                              , Str "mind"+                              , Space+                              , Str "with"+                              , Space+                              , Str "the"+                              , Space+                              , Str "Hanged"+                              , Space+                              , Str "God"+                              , Space+                              , Str "of"+                              , Space+                              , Str "Frazer,"+                              , SoftBreak+                              , Str "and"+                              , Space+                              , Str "because"+                              , Space+                              , Str "I"+                              , Space+                              , Str "associate"+                              , Space+                              , Str "him"+                              , Space+                              , Str "with"+                              , Space+                              , Str "the"+                              , Space+                              , Str "hooded"+                              , Space+                              , Str "figure"+                              , Space+                              , Str "in"+                              , Space+                              , Str "the"+                              , Space+                              , Str "passage"+                              , Space+                              , Str "of"+                              , Space+                              , Str "the"+                              , SoftBreak+                              , Str "disciples"+                              , Space+                              , Str "to"+                              , Space+                              , Str "Emmaus"+                              , Space+                              , Str "in"+                              , Space+                              , Str "Part"+                              , Space+                              , Str "V."+                              , Space+                              , Str "The"+                              , Space+                              , Str "Phoenician"+                              , Space+                              , Str "Sailor"+                              , Space+                              , Str "and"+                              , Space+                              , Str "the"+                              , Space+                              , Str "Merchant"+                              , SoftBreak+                              , Str "appear"+                              , Space+                              , Str "later;"+                              , Space+                              , Str "also"+                              , Space+                              , Str "the"+                              , Space+                              , Str "\"crowds"+                              , Space+                              , Str "of"+                              , Space+                              , Str "people,\""+                              , Space+                              , Str "and"+                              , Space+                              , Str "Death"+                              , Space+                              , Str "by"+                              , Space+                              , Str "Water"+                              , Space+                              , Str "is"+                              , SoftBreak+                              , Str "executed"+                              , Space+                              , Str "in"+                              , Space+                              , Str "Part"+                              , Space+                              , Str "IV."+                              , Space+                              , Str "The"+                              , Space+                              , Str "Man"+                              , Space+                              , Str "with"+                              , Space+                              , Str "Three"+                              , Space+                              , Str "Staves"+                              , Space+                              , Str "(an"+                              , Space+                              , Str "authentic"+                              , Space+                              , Str "member"+                              , Space+                              , Str "of"+                              , SoftBreak+                              , Str "the"+                              , Space+                              , Str "Tarot"+                              , Space+                              , Str "pack)"+                              , Space+                              , Str "I"+                              , Space+                              , Str "associate,"+                              , Space+                              , Str "quite"+                              , Space+                              , Str "arbitrarily,"+                              , Space+                              , Str "with"+                              , Space+                              , Str "the"+                              , Space+                              , Str "Fisher"+                              , Space+                              , Str "King"+                              , SoftBreak+                              , Str "himself."+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Is"+                      , Space+                      , Str "your"+                      , Space+                      , Str "card,"+                      , Space+                      , Str "the"+                      , Space+                      , Str "drowned"+                      , Space+                      , Str "Phoenician"+                      , Space+                      , Str "Sailor,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "(Those"+                      , Space+                      , Str "are"+                      , Space+                      , Str "pearls"+                      , Space+                      , Str "that"+                      , Space+                      , Str "were"+                      , Space+                      , Str "his"+                      , Space+                      , Str "eyes."+                      , Space+                      , Str "Look!)"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Here"+                      , Space+                      , Str "is"+                      , Space+                      , Str "Belladonna,"+                      , Space+                      , Str "the"+                      , Space+                      , Str "Lady"+                      , Space+                      , Str "of"+                      , Space+                      , Str "the"+                      , Space+                      , Str "Rocks,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "The"+                      , Space+                      , Str "lady"+                      , Space+                      , Str "of"+                      , Space+                      , Str "situations."+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "50" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Here"+                      , Space+                      , Str "is"+                      , Space+                      , Str "the"+                      , Space+                      , Str "man"+                      , Space+                      , Str "with"+                      , Space+                      , Str "three"+                      , Space+                      , Str "staves,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "here"+                      , Space+                      , Str "the"+                      , Space+                      , Str "Wheel,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "here"+                      , Space+                      , Str "is"+                      , Space+                      , Str "the"+                      , Space+                      , Str "one-eyed"+                      , Space+                      , Str "merchant,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "this"+                      , Space+                      , Str "card,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Which"+                      , Space+                      , Str "is"+                      , Space+                      , Str "blank,"+                      , Space+                      , Str "is"+                      , Space+                      , Str "something"+                      , Space+                      , Str "he"+                      , Space+                      , Str "carries"+                      , Space+                      , Str "on"+                      , Space+                      , Str "his"+                      , Space+                      , Str "back,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Which"+                      , Space+                      , Str "I"+                      , Space+                      , Str "am"+                      , Space+                      , Str "forbidden"+                      , Space+                      , Str "to"+                      , Space+                      , Str "see."+                      , Space+                      , Str "I"+                      , Space+                      , Str "do"+                      , Space+                      , Str "not"+                      , Space+                      , Str "find"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "The"+                      , Space+                      , Str "Hanged"+                      , Space+                      , Str "Man."+                      , Space+                      , Str "Fear"+                      , Space+                      , Str "death"+                      , Space+                      , Str "by"+                      , Space+                      , Str "water."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "I"+                      , Space+                      , Str "see"+                      , Space+                      , Str "crowds"+                      , Space+                      , Str "of"+                      , Space+                      , Str "people,"+                      , Space+                      , Str "walking"+                      , Space+                      , Str "round"+                      , Space+                      , Str "in"+                      , Space+                      , Str "a"+                      , Space+                      , Str "ring."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Thank"+                      , Space+                      , Str "you."+                      , Space+                      , Str "If"+                      , Space+                      , Str "you"+                      , Space+                      , Str "see"+                      , Space+                      , Str "dear"+                      , Space+                      , Str "Mrs."+                      , Space+                      , Str "Equitone,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Tell"+                      , Space+                      , Str "her"+                      , Space+                      , Str "I"+                      , Space+                      , Str "bring"+                      , Space+                      , Str "the"+                      , Space+                      , Str "horoscope"+                      , Space+                      , Str "myself:"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "One"+                      , Space+                      , Str "must"+                      , Space+                      , Str "be"+                      , Space+                      , Str "so"+                      , Space+                      , Str "careful"+                      , Space+                      , Str "these"+                      , Space+                      , Str "days."+                      ]+                  ]+              ]+          , Div+              ( "" , [ "linegroup" ] , [] )+              [ Div+                  ( "wasteland-content.xhtml_ln60" , [] , [] )+                  [ Plain+                      [ Str "Unreal"+                      , Space+                      , Str "City,"+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "60." ]+                                  ( "#wasteland-content.xhtml_ln60"+                                  , ""+                                  )+                              , Space+                              , Str "Cf."+                              , Space+                              , Str "Baudelaire:"+                              ]+                          , BlockQuote+                              [ Para+                                  [ Str "\"Fourmillante"+                                  , Space+                                  , Str "cite;,"+                                  , Space+                                  , Str "cite;"+                                  , Space+                                  , Str "pleine"+                                  , Space+                                  , Str "de"+                                  , Space+                                  , Str "reves,"+                                  , LineBreak+                                  , Str "Ou"+                                  , Space+                                  , Str "le"+                                  , Space+                                  , Str "spectre"+                                  , Space+                                  , Str "en"+                                  , SoftBreak+                                  , Str "plein"+                                  , Space+                                  , Str "jour"+                                  , Space+                                  , Str "raccroche"+                                  , Space+                                  , Str "le"+                                  , Space+                                  , Str "passant.\""+                                  ]+                              ]+                          ]+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "60" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Under"+                      , Space+                      , Str "the"+                      , Space+                      , Str "brown"+                      , Space+                      , Str "fog"+                      , Space+                      , Str "of"+                      , Space+                      , Str "a"+                      , Space+                      , Str "winter"+                      , Space+                      , Str "dawn,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "A"+                      , Space+                      , Str "crowd"+                      , Space+                      , Str "flowed"+                      , Space+                      , Str "over"+                      , Space+                      , Str "London"+                      , Space+                      , Str "Bridge,"+                      , Space+                      , Str "so"+                      , Space+                      , Str "many,"+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln63" , [] , [] )+                  [ Plain+                      [ Str "I"+                      , Space+                      , Str "had"+                      , Space+                      , Str "not"+                      , Space+                      , Str "thought"+                      , Space+                      , Str "death"+                      , Space+                      , Str "had"+                      , Space+                      , Str "undone"+                      , Space+                      , Str "so"+                      , Space+                      , Str "many."+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "63." ]+                                  ( "#wasteland-content.xhtml_ln63"+                                  , ""+                                  )+                              , Space+                              , Str "Cf."+                              , Space+                              , Str "Inferno,"+                              , Space+                              , Str "iii."+                              , Space+                              , Str "55-7."+                              ]+                          , BlockQuote+                              [ Para+                                  [ Str "\"si"+                                  , Space+                                  , Str "lunga"+                                  , Space+                                  , Str "tratta"+                                  , LineBreak+                                  , Str "di"+                                  , Space+                                  , Str "gente,"+                                  , Space+                                  , Str "ch'io"+                                  , Space+                                  , Str "non"+                                  , Space+                                  , Str "avrei"+                                  , Space+                                  , Str "mai"+                                  , Space+                                  , Str "creduto"+                                  , LineBreak+                                  , Str "che"+                                  , SoftBreak+                                  , Str "morte"+                                  , Space+                                  , Str "tanta"+                                  , Space+                                  , Str "n'avesse"+                                  , Space+                                  , Str "disfatta.\""+                                  ]+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln64" , [] , [] )+                  [ Plain+                      [ Str "Sighs,"+                      , Space+                      , Str "short"+                      , Space+                      , Str "and"+                      , Space+                      , Str "infrequent,"+                      , Space+                      , Str "were"+                      , Space+                      , Str "exhaled,"+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "64." ]+                                  ( "#wasteland-content.xhtml_ln64"+                                  , ""+                                  )+                              , Space+                              , Str "Cf."+                              , Space+                              , Str "Inferno,"+                              , Space+                              , Str "iv."+                              , Space+                              , Str "25-7:"+                              ]+                          , BlockQuote+                              [ Para+                                  [ Str "\"Quivi,"+                                  , Space+                                  , Str "secondo"+                                  , Space+                                  , Str "che"+                                  , Space+                                  , Str "per"+                                  , Space+                                  , Str "ascoltahre,"+                                  , LineBreak+                                  , Str "\"non"+                                  , Space+                                  , Str "avea"+                                  , Space+                                  , Str "pianto,"+                                  , Space+                                  , Str "ma'"+                                  , Space+                                  , Str "che"+                                  , Space+                                  , Str "di"+                                  , SoftBreak+                                  , Str "sospiri,"+                                  , LineBreak+                                  , Str "\"che"+                                  , Space+                                  , Str "l'aura"+                                  , Space+                                  , Str "eterna"+                                  , Space+                                  , Str "facevan"+                                  , Space+                                  , Str "tremare.\""+                                  ]+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "each"+                      , Space+                      , Str "man"+                      , Space+                      , Str "fixed"+                      , Space+                      , Str "his"+                      , Space+                      , Str "eyes"+                      , Space+                      , Str "before"+                      , Space+                      , Str "his"+                      , Space+                      , Str "feet."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Flowed"+                      , Space+                      , Str "up"+                      , Space+                      , Str "the"+                      , Space+                      , Str "hill"+                      , Space+                      , Str "and"+                      , Space+                      , Str "down"+                      , Space+                      , Str "King"+                      , Space+                      , Str "William"+                      , Space+                      , Str "Street,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "To"+                      , Space+                      , Str "where"+                      , Space+                      , Str "Saint"+                      , Space+                      , Str "Mary"+                      , Space+                      , Str "Woolnoth"+                      , Space+                      , Str "kept"+                      , Space+                      , Str "the"+                      , Space+                      , Str "hours"+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln68" , [] , [] )+                  [ Plain+                      [ Str "With"+                      , Space+                      , Str "a"+                      , Space+                      , Str "dead"+                      , Space+                      , Str "sound"+                      , Space+                      , Str "on"+                      , Space+                      , Str "the"+                      , Space+                      , Str "final"+                      , Space+                      , Str "stroke"+                      , Space+                      , Str "of"+                      , Space+                      , Str "nine."+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "68." ]+                                  ( "#wasteland-content.xhtml_ln68"+                                  , ""+                                  )+                              , Space+                              , Str "A"+                              , Space+                              , Str "phenomenon"+                              , Space+                              , Str "which"+                              , Space+                              , Str "I"+                              , Space+                              , Str "have"+                              , Space+                              , Str "often"+                              , Space+                              , Str "noticed."+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "There"+                      , Space+                      , Str "I"+                      , Space+                      , Str "saw"+                      , Space+                      , Str "one"+                      , Space+                      , Str "I"+                      , Space+                      , Str "knew,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "stopped"+                      , Space+                      , Str "him,"+                      , Space+                      , Str "crying"+                      , SoftBreak+                      , Str "\"Stetson!"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"You"+                      , Space+                      , Str "who"+                      , Space+                      , Str "were"+                      , Space+                      , Str "with"+                      , Space+                      , Str "me"+                      , Space+                      , Str "in"+                      , Space+                      , Str "the"+                      , Space+                      , Str "ships"+                      , Space+                      , Str "at"+                      , Space+                      , Str "Mylae!"+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "70" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"That"+                      , Space+                      , Str "corpse"+                      , Space+                      , Str "you"+                      , Space+                      , Str "planted"+                      , Space+                      , Str "last"+                      , Space+                      , Str "year"+                      , Space+                      , Str "in"+                      , Space+                      , Str "your"+                      , Space+                      , Str "garden,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"Has"+                      , Space+                      , Str "it"+                      , Space+                      , Str "begun"+                      , Space+                      , Str "to"+                      , Space+                      , Str "sprout?"+                      , Space+                      , Str "Will"+                      , Space+                      , Str "it"+                      , Space+                      , Str "bloom"+                      , Space+                      , Str "this"+                      , Space+                      , Str "year?"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"Or"+                      , Space+                      , Str "has"+                      , Space+                      , Str "the"+                      , Space+                      , Str "sudden"+                      , Space+                      , Str "frost"+                      , Space+                      , Str "disturbed"+                      , Space+                      , Str "its"+                      , Space+                      , Str "bed?"+                      ]+                  ]+              ]+          , Div+              ( "" , [ "linegroup" ] , [] )+              [ Div+                  ( "wasteland-content.xhtml_ln74" , [] , [] )+                  [ Plain+                      [ Str "\"Oh"+                      , Space+                      , Str "keep"+                      , Space+                      , Str "the"+                      , Space+                      , Str "Dog"+                      , Space+                      , Str "far"+                      , Space+                      , Str "hence,"+                      , Space+                      , Str "that's"+                      , Space+                      , Str "friend"+                      , Space+                      , Str "to"+                      , Space+                      , Str "men,"+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "74." ]+                                  ( "#wasteland-content.xhtml_ln74"+                                  , ""+                                  )+                              , Space+                              , Str "Cf."+                              , Space+                              , Str "the"+                              , Space+                              , Str "Dirge"+                              , Space+                              , Str "in"+                              , Space+                              , Str "Webster's"+                              , Space+                              , Str "White"+                              , Space+                              , Str "Devil"+                              , Space+                              , Str "."+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"Or"+                      , Space+                      , Str "with"+                      , Space+                      , Str "his"+                      , Space+                      , Str "nails"+                      , Space+                      , Str "he'll"+                      , Space+                      , Str "dig"+                      , Space+                      , Str "it"+                      , Space+                      , Str "up"+                      , Space+                      , Str "again!"+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln76" , [] , [] )+                  [ Plain+                      [ Str "\"You!"+                      , Space+                      , Span+                          ( "" , [] , [ ( "lang" , "fr" ) ] )+                          [ Str "hypocrite"+                          , Space+                          , Str "lecteur!"+                          , Space+                          , Str "-"+                          , Space+                          , Str "mon"+                          , Space+                          , Str "semblable,"+                          , Space+                          , Str "-"+                          , SoftBreak+                          , Str "mon"+                          , Space+                          , Str "frere"+                          ]+                      , Space+                      , Str "!\""+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "76." ]+                                  ( "#wasteland-content.xhtml_ln76"+                                  , ""+                                  )+                              , Space+                              , Str "V."+                              , Space+                              , Str "Baudelaire,"+                              , Space+                              , Str "Preface"+                              , Space+                              , Str "to"+                              , Space+                              , Str "Fleurs"+                              , Space+                              , Str "du"+                              , Space+                              , Str "Mal."+                              ]+                          ]+                      ]+                  ]+              ]+          ]+      , Div+          ( "wasteland-content.xhtml_ch2" , [ "section" ] , [] )+          [ Header+              2+              ( "" , [] , [] )+              [ Str "II."+              , Space+              , Str "A"+              , Space+              , Str "GAME"+              , Space+              , Str "OF"+              , Space+              , Str "CHESS"+              ]+          , Div+              ( "" , [ "linegroup" ] , [] )+              [ Div+                  ( "wasteland-content.xhtml_ln77" , [] , [] )+                  [ Plain+                      [ Str "The"+                      , Space+                      , Str "Chair"+                      , Space+                      , Str "she"+                      , Space+                      , Str "sat"+                      , Space+                      , Str "in,"+                      , Space+                      , Str "like"+                      , Space+                      , Str "a"+                      , Space+                      , Str "burnished"+                      , Space+                      , Str "throne,"+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "77." ]+                                  ( "#wasteland-content.xhtml_ln77"+                                  , ""+                                  )+                              , Space+                              , Str "Cf."+                              , Space+                              , Str "Antony"+                              , Space+                              , Str "and"+                              , Space+                              , Str "Cleopatra,"+                              , Space+                              , Str "II."+                              , Space+                              , Str "ii.,"+                              , Space+                              , Str "l."+                              , Space+                              , Str "190."+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Glowed"+                      , Space+                      , Str "on"+                      , Space+                      , Str "the"+                      , Space+                      , Str "marble,"+                      , Space+                      , Str "where"+                      , Space+                      , Str "the"+                      , Space+                      , Str "glass"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Held"+                      , Space+                      , Str "up"+                      , Space+                      , Str "by"+                      , Space+                      , Str "standards"+                      , Space+                      , Str "wrought"+                      , Space+                      , Str "with"+                      , Space+                      , Str "fruited"+                      , Space+                      , Str "vines"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "From"+                      , Space+                      , Str "which"+                      , Space+                      , Str "a"+                      , Space+                      , Str "golden"+                      , Space+                      , Str "Cupidon"+                      , Space+                      , Str "peeped"+                      , Space+                      , Str "out"+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "80" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "(Another"+                      , Space+                      , Str "hid"+                      , Space+                      , Str "his"+                      , Space+                      , Str "eyes"+                      , Space+                      , Str "behind"+                      , Space+                      , Str "his"+                      , Space+                      , Str "wing)"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Doubled"+                      , Space+                      , Str "the"+                      , Space+                      , Str "flames"+                      , Space+                      , Str "of"+                      , Space+                      , Str "sevenbranched"+                      , Space+                      , Str "candelabra"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Reflecting"+                      , Space+                      , Str "light"+                      , Space+                      , Str "upon"+                      , Space+                      , Str "the"+                      , Space+                      , Str "table"+                      , Space+                      , Str "as"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "The"+                      , Space+                      , Str "glitter"+                      , Space+                      , Str "of"+                      , Space+                      , Str "her"+                      , Space+                      , Str "jewels"+                      , Space+                      , Str "rose"+                      , Space+                      , Str "to"+                      , Space+                      , Str "meet"+                      , Space+                      , Str "it,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "From"+                      , Space+                      , Str "satin"+                      , Space+                      , Str "cases"+                      , Space+                      , Str "poured"+                      , Space+                      , Str "in"+                      , Space+                      , Str "rich"+                      , Space+                      , Str "profusion;"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "In"+                      , Space+                      , Str "vials"+                      , Space+                      , Str "of"+                      , Space+                      , Str "ivory"+                      , Space+                      , Str "and"+                      , Space+                      , Str "coloured"+                      , Space+                      , Str "glass"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Unstoppered,"+                      , Space+                      , Str "lurked"+                      , Space+                      , Str "her"+                      , Space+                      , Str "strange"+                      , Space+                      , Str "synthetic"+                      , Space+                      , Str "perfumes,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Unguent,"+                      , Space+                      , Str "powdered,"+                      , Space+                      , Str "or"+                      , Space+                      , Str "liquid"+                      , Space+                      , Str "-"+                      , Space+                      , Str "troubled,"+                      , Space+                      , Str "confused"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "drowned"+                      , Space+                      , Str "the"+                      , Space+                      , Str "sense"+                      , Space+                      , Str "in"+                      , Space+                      , Str "odours;"+                      , Space+                      , Str "stirred"+                      , Space+                      , Str "by"+                      , Space+                      , Str "the"+                      , Space+                      , Str "air"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "That"+                      , Space+                      , Str "freshened"+                      , Space+                      , Str "from"+                      , Space+                      , Str "the"+                      , Space+                      , Str "window,"+                      , Space+                      , Str "these"+                      , Space+                      , Str "ascended"+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "90" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "In"+                      , Space+                      , Str "fattening"+                      , Space+                      , Str "the"+                      , Space+                      , Str "prolonged"+                      , Space+                      , Str "candle-flames,"+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln92" , [] , [] )+                  [ Plain+                      [ Str "Flung"+                      , Space+                      , Str "their"+                      , Space+                      , Str "smoke"+                      , Space+                      , Str "into"+                      , Space+                      , Str "the"+                      , Space+                      , Str "laquearia,"+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "92." ]+                                  ( "#wasteland-content.xhtml_ln92"+                                  , ""+                                  )+                              , Space+                              , Str "Laquearia."+                              , Space+                              , Str "V."+                              , Space+                              , Str "Aeneid,"+                              , Space+                              , Str "I."+                              , Space+                              , Str "726:"+                              ]+                          , BlockQuote+                              [ Para+                                  [ Str "dependent"+                                  , Space+                                  , Str "lychni"+                                  , Space+                                  , Str "laquearibus"+                                  , Space+                                  , Str "aureis"+                                  , Space+                                  , Str "incensi,"+                                  , Space+                                  , Str "et"+                                  , Space+                                  , Str "noctem"+                                  , SoftBreak+                                  , Str "flammis"+                                  , LineBreak+                                  , Str "funalia"+                                  , Space+                                  , Str "vincunt."+                                  ]+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Stirring"+                      , Space+                      , Str "the"+                      , Space+                      , Str "pattern"+                      , Space+                      , Str "on"+                      , Space+                      , Str "the"+                      , Space+                      , Str "coffered"+                      , Space+                      , Str "ceiling."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Huge"+                      , Space+                      , Str "sea-wood"+                      , Space+                      , Str "fed"+                      , Space+                      , Str "with"+                      , Space+                      , Str "copper"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Burned"+                      , Space+                      , Str "green"+                      , Space+                      , Str "and"+                      , Space+                      , Str "orange,"+                      , Space+                      , Str "framed"+                      , Space+                      , Str "by"+                      , Space+                      , Str "the"+                      , Space+                      , Str "coloured"+                      , Space+                      , Str "stone,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "In"+                      , Space+                      , Str "which"+                      , Space+                      , Str "sad"+                      , Space+                      , Str "light"+                      , Space+                      , Str "a"+                      , Space+                      , Str "carved"+                      , Space+                      , Str "dolphin"+                      , Space+                      , Str "swam."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Above"+                      , Space+                      , Str "the"+                      , Space+                      , Str "antique"+                      , Space+                      , Str "mantel"+                      , Space+                      , Str "was"+                      , Space+                      , Str "displayed"+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln98" , [] , [] )+                  [ Plain+                      [ Str "As"+                      , Space+                      , Str "though"+                      , Space+                      , Str "a"+                      , Space+                      , Str "window"+                      , Space+                      , Str "gave"+                      , Space+                      , Str "upon"+                      , Space+                      , Str "the"+                      , Space+                      , Str "sylvan"+                      , Space+                      , Str "scene"+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "98." ]+                                  ( "#wasteland-content.xhtml_ln98"+                                  , ""+                                  )+                              , Space+                              , Str "Sylvan"+                              , Space+                              , Str "scene."+                              , Space+                              , Str "V."+                              , Space+                              , Str "Milton,"+                              , Space+                              , Str "Paradise"+                              , Space+                              , Str "Lost,"+                              , Space+                              , Str "iv."+                              , Space+                              , Str "140."+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln99" , [] , [] )+                  [ Plain+                      [ Str "The"+                      , Space+                      , Str "change"+                      , Space+                      , Str "of"+                      , Space+                      , Str "Philomel,"+                      , Space+                      , Str "by"+                      , Space+                      , Str "the"+                      , Space+                      , Str "barbarous"+                      , Space+                      , Str "king"+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "99." ]+                                  ( "#wasteland-content.xhtml_ln99"+                                  , ""+                                  )+                              , Space+                              , Str "V."+                              , Space+                              , Str "Ovid,"+                              , Space+                              , Str "Metamorphoses,"+                              , Space+                              , Str "vi,"+                              , Space+                              , Str "Philomela."+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln100" , [] , [] )+                  [ Plain+                      [ Str "So"+                      , Space+                      , Str "rudely"+                      , Space+                      , Str "forced;"+                      , Space+                      , Str "yet"+                      , Space+                      , Str "there"+                      , Space+                      , Str "the"+                      , Space+                      , Str "nightingale"+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "100." ]+                                  ( "#wasteland-content.xhtml_ln100"+                                  , ""+                                  )+                              , Space+                              , Str "Cf."+                              , Space+                              , Str "Part"+                              , Space+                              , Str "III,"+                              , Space+                              , Str "l."+                              , Space+                              , Str "204."+                              ]+                          ]+                      , SoftBreak+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "100" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Filled"+                      , Space+                      , Str "all"+                      , Space+                      , Str "the"+                      , Space+                      , Str "desert"+                      , Space+                      , Str "with"+                      , Space+                      , Str "inviolable"+                      , Space+                      , Str "voice"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "still"+                      , Space+                      , Str "she"+                      , Space+                      , Str "cried,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "still"+                      , Space+                      , Str "the"+                      , Space+                      , Str "world"+                      , Space+                      , Str "pursues,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"Jug"+                      , Space+                      , Str "Jug\""+                      , Space+                      , Str "to"+                      , Space+                      , Str "dirty"+                      , Space+                      , Str "ears."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "other"+                      , Space+                      , Str "withered"+                      , Space+                      , Str "stumps"+                      , Space+                      , Str "of"+                      , Space+                      , Str "time"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Were"+                      , Space+                      , Str "told"+                      , Space+                      , Str "upon"+                      , Space+                      , Str "the"+                      , Space+                      , Str "walls;"+                      , Space+                      , Str "staring"+                      , Space+                      , Str "forms"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Leaned"+                      , Space+                      , Str "out,"+                      , Space+                      , Str "leaning,"+                      , Space+                      , Str "hushing"+                      , Space+                      , Str "the"+                      , Space+                      , Str "room"+                      , Space+                      , Str "enclosed."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Footsteps"+                      , Space+                      , Str "shuffled"+                      , Space+                      , Str "on"+                      , Space+                      , Str "the"+                      , Space+                      , Str "stair."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Under"+                      , Space+                      , Str "the"+                      , Space+                      , Str "firelight,"+                      , Space+                      , Str "under"+                      , Space+                      , Str "the"+                      , Space+                      , Str "brush,"+                      , Space+                      , Str "her"+                      , Space+                      , Str "hair"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Spread"+                      , Space+                      , Str "out"+                      , Space+                      , Str "in"+                      , Space+                      , Str "fiery"+                      , Space+                      , Str "points"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Glowed"+                      , Space+                      , Str "into"+                      , Space+                      , Str "words,"+                      , Space+                      , Str "then"+                      , Space+                      , Str "would"+                      , Space+                      , Str "be"+                      , Space+                      , Str "savagely"+                      , Space+                      , Str "still."+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "110" ]+                      ]+                  ]+              ]+          , Div+              ( "" , [ "linegroup" ] , [] )+              [ Div+                  ( "" , [ "linegroup" ] , [] )+                  [ Div+                      ( "" , [] , [] )+                      [ Plain+                          [ Str "\"My"+                          , Space+                          , Str "nerves"+                          , Space+                          , Str "are"+                          , Space+                          , Str "bad"+                          , Space+                          , Str "to-night."+                          , Space+                          , Str "Yes,"+                          , Space+                          , Str "bad."+                          , Space+                          , Str "Stay"+                          , Space+                          , Str "with"+                          , Space+                          , Str "me."+                          ]+                      ]+                  , Div+                      ( "" , [] , [] )+                      [ Plain+                          [ Str "\"Speak"+                          , Space+                          , Str "to"+                          , Space+                          , Str "me."+                          , Space+                          , Str "Why"+                          , Space+                          , Str "do"+                          , Space+                          , Str "you"+                          , Space+                          , Str "never"+                          , Space+                          , Str "speak."+                          , Space+                          , Str "Speak."+                          ]+                      ]+                  , Div+                      ( "" , [] , [] )+                      [ Plain+                          [ Str "\"What"+                          , Space+                          , Str "are"+                          , Space+                          , Str "you"+                          , Space+                          , Str "thinking"+                          , Space+                          , Str "of?"+                          , Space+                          , Str "What"+                          , Space+                          , Str "thinking?"+                          , Space+                          , Str "What?"+                          ]+                      ]+                  , Div+                      ( "" , [] , [] )+                      [ Plain+                          [ Str "\"I"+                          , Space+                          , Str "never"+                          , Space+                          , Str "know"+                          , Space+                          , Str "what"+                          , Space+                          , Str "you"+                          , Space+                          , Str "are"+                          , Space+                          , Str "thinking."+                          , Space+                          , Str "Think.\""+                          ]+                      ]+                  ]+              , Div+                  ( "" , [ "linegroup" ] , [] )+                  [ Div+                      ( "wasteland-content.xhtml_ln115" , [] , [] )+                      [ Plain+                          [ Str "I"+                          , Space+                          , Str "think"+                          , Space+                          , Str "we"+                          , Space+                          , Str "are"+                          , Space+                          , Str "in"+                          , Space+                          , Str "rats'"+                          , Space+                          , Str "alley"+                          , Note+                              [ Para+                                  [ Link+                                      ( "" , [] , [] )+                                      [ Str "115." ]+                                      ( "#wasteland-content.xhtml_ln115"+                                      , ""+                                      )+                                  , Space+                                  , Str "Cf."+                                  , Space+                                  , Str "Part"+                                  , Space+                                  , Str "III,"+                                  , Space+                                  , Str "l."+                                  , Space+                                  , Str "195."+                                  ]+                              ]+                          ]+                      ]+                  , Div+                      ( "" , [] , [] )+                      [ Plain+                          [ Str "Where"+                          , Space+                          , Str "the"+                          , Space+                          , Str "dead"+                          , Space+                          , Str "men"+                          , Space+                          , Str "lost"+                          , Space+                          , Str "their"+                          , Space+                          , Str "bones."+                          ]+                      ]+                  ]+              ]+          , Div+              ( "" , [ "linegroup" ] , [] )+              [ Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"What"+                      , Space+                      , Str "is"+                      , Space+                      , Str "that"+                      , Space+                      , Str "noise?\""+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln118"+                  , [ "indent" ]+                  , []+                  )+                  [ Plain+                      [ Str "The"+                      , Space+                      , Str "wind"+                      , Space+                      , Str "under"+                      , Space+                      , Str "the"+                      , Space+                      , Str "door."+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "118." ]+                                  ( "#wasteland-content.xhtml_ln118"+                                  , ""+                                  )+                              , Space+                              , Str "Cf."+                              , Space+                              , Str "Webster:"+                              ]+                          , BlockQuote+                              [ Para+                                  [ Str "\"Is"+                                  , Space+                                  , Str "the"+                                  , Space+                                  , Str "wind"+                                  , Space+                                  , Str "in"+                                  , Space+                                  , Str "that"+                                  , Space+                                  , Str "door"+                                  , Space+                                  , Str "still?\""+                                  ]+                              ]+                          ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"What"+                      , Space+                      , Str "is"+                      , Space+                      , Str "that"+                      , Space+                      , Str "noise"+                      , Space+                      , Str "now?"+                      , Space+                      , Str "What"+                      , Space+                      , Str "is"+                      , Space+                      , Str "the"+                      , Space+                      , Str "wind"+                      , Space+                      , Str "doing?\""+                      ]+                  ]+              , Div+                  ( "" , [ "indent" ] , [] )+                  [ Plain+                      [ Str "Nothing"+                      , Space+                      , Str "again"+                      , Space+                      , Str "nothing."+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "120" ]+                      ]+                  ]+              ]+          , Div+              ( "" , [ "linegroup" ] , [] )+              [ Div ( "" , [] , [] ) [ Plain [ Str "\"Do" ] ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"You"+                      , Space+                      , Str "know"+                      , Space+                      , Str "nothing?"+                      , Space+                      , Str "Do"+                      , Space+                      , Str "you"+                      , Space+                      , Str "see"+                      , Space+                      , Str "nothing?"+                      , Space+                      , Str "Do"+                      , Space+                      , Str "you"+                      , Space+                      , Str "remember"+                      ]+                  ]+              , Div ( "" , [] , [] ) [ Plain [ Str "\"Nothing?\"" ] ]+              ]+          , Div+              ( "" , [ "linegroup" ] , [] )+              [ Div+                  ( "" , [] , [] )+                  [ Plain [ Str "I" , Space , Str "remember" ] ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Those"+                      , Space+                      , Str "are"+                      , Space+                      , Str "pearls"+                      , Space+                      , Str "that"+                      , Space+                      , Str "were"+                      , Space+                      , Str "his"+                      , Space+                      , Str "eyes."+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln126" , [] , [] )+                  [ Plain+                      [ Str "\"Are"+                      , Space+                      , Str "you"+                      , Space+                      , Str "alive,"+                      , Space+                      , Str "or"+                      , Space+                      , Str "not?"+                      , Space+                      , Str "Is"+                      , Space+                      , Str "there"+                      , Space+                      , Str "nothing"+                      , Space+                      , Str "in"+                      , Space+                      , Str "your"+                      , Space+                      , Str "head?\""+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "126." ]+                                  ( "#wasteland-content.xhtml_ln126"+                                  , ""+                                  )+                              , Space+                              , Str "Cf."+                              , Space+                              , Str "Part"+                              , Space+                              , Str "I,"+                              , Space+                              , Str "l."+                              , Space+                              , Str "37,"+                              , Space+                              , Str "48."+                              ]+                          ]+                      ]+                  ]+              , Div ( "" , [] , [] ) [ Plain [ Str "But" ] ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "O"+                      , Space+                      , Str "O"+                      , Space+                      , Str "O"+                      , Space+                      , Str "O"+                      , Space+                      , Str "that"+                      , Space+                      , Str "Shakespeherian"+                      , Space+                      , Str "Rag\8213"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "It's"+                      , Space+                      , Str "so"+                      , Space+                      , Str "elegant"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "So"+                      , Space+                      , Str "intelligent"+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "130" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"What"+                      , Space+                      , Str "shall"+                      , Space+                      , Str "I"+                      , Space+                      , Str "do"+                      , Space+                      , Str "now?"+                      , Space+                      , Str "What"+                      , Space+                      , Str "shall"+                      , Space+                      , Str "I"+                      , Space+                      , Str "do?\""+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "I"+                      , Space+                      , Str "shall"+                      , Space+                      , Str "rush"+                      , Space+                      , Str "out"+                      , Space+                      , Str "as"+                      , Space+                      , Str "I"+                      , Space+                      , Str "am,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "walk"+                      , Space+                      , Str "the"+                      , Space+                      , Str "street"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"With"+                      , Space+                      , Str "my"+                      , Space+                      , Str "hair"+                      , Space+                      , Str "down,"+                      , Space+                      , Str "so."+                      , Space+                      , Str "What"+                      , Space+                      , Str "shall"+                      , Space+                      , Str "we"+                      , Space+                      , Str "do"+                      , Space+                      , Str "to-morrow?"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "\"What"+                      , Space+                      , Str "shall"+                      , Space+                      , Str "we"+                      , Space+                      , Str "ever"+                      , Space+                      , Str "do?\""+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "The"+                      , Space+                      , Str "hot"+                      , Space+                      , Str "water"+                      , Space+                      , Str "at"+                      , Space+                      , Str "ten."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "if"+                      , Space+                      , Str "it"+                      , Space+                      , Str "rains,"+                      , Space+                      , Str "a"+                      , Space+                      , Str "closed"+                      , Space+                      , Str "car"+                      , Space+                      , Str "at"+                      , Space+                      , Str "four."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "we"+                      , Space+                      , Str "shall"+                      , Space+                      , Str "play"+                      , Space+                      , Str "a"+                      , Space+                      , Str "game"+                      , Space+                      , Str "of"+                      , Space+                      , Str "chess,"+                      ]+                  ]+              , Div+                  ( "wasteland-content.xhtml_ln138" , [] , [] )+                  [ Plain+                      [ Str "Pressing"+                      , Space+                      , Str "lidless"+                      , Space+                      , Str "eyes"+                      , Space+                      , Str "and"+                      , Space+                      , Str "waiting"+                      , Space+                      , Str "for"+                      , Space+                      , Str "a"+                      , Space+                      , Str "knock"+                      , Space+                      , Str "upon"+                      , Space+                      , Str "the"+                      , Space+                      , Str "door."+                      , Note+                          [ Para+                              [ Link+                                  ( "" , [] , [] )+                                  [ Str "138." ]+                                  ( "#wasteland-content.xhtml_ln138"+                                  , ""+                                  )+                              , Space+                              , Str "Cf."+                              , Space+                              , Str "the"+                              , Space+                              , Str "game"+                              , Space+                              , Str "of"+                              , Space+                              , Str "chess"+                              , Space+                              , Str "in"+                              , Space+                              , Str "Middleton's"+                              , Space+                              , Str "Women"+                              , Space+                              , Str "beware"+                              , Space+                              , Str "Women."+                              ]+                          ]+                      ]+                  ]+              ]+          , Div+              ( "" , [ "linegroup" ] , [] )+              [ Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "When"+                      , Space+                      , Str "Lil's"+                      , Space+                      , Str "husband"+                      , Space+                      , Str "got"+                      , Space+                      , Str "demobbed,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "said"+                      , Space+                      , Str "-"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "I"+                      , Space+                      , Str "didn't"+                      , Space+                      , Str "mince"+                      , Space+                      , Str "my"+                      , Space+                      , Str "words,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "said"+                      , Space+                      , Str "to"+                      , Space+                      , Str "her"+                      , Space+                      , Str "myself,"+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "140" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "HURRY"+                      , Space+                      , Str "UP"+                      , Space+                      , Str "PLEASE"+                      , Space+                      , Str "ITS"+                      , Space+                      , Str "TIME"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Now"+                      , Space+                      , Str "Albert's"+                      , Space+                      , Str "coming"+                      , Space+                      , Str "back,"+                      , Space+                      , Str "make"+                      , Space+                      , Str "yourself"+                      , Space+                      , Str "a"+                      , Space+                      , Str "bit"+                      , Space+                      , Str "smart."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "He'll"+                      , Space+                      , Str "want"+                      , Space+                      , Str "to"+                      , Space+                      , Str "know"+                      , Space+                      , Str "what"+                      , Space+                      , Str "you"+                      , Space+                      , Str "done"+                      , Space+                      , Str "with"+                      , Space+                      , Str "that"+                      , Space+                      , Str "money"+                      , Space+                      , Str "he"+                      , Space+                      , Str "gave"+                      , SoftBreak+                      , Str "you"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "To"+                      , Space+                      , Str "get"+                      , Space+                      , Str "yourself"+                      , Space+                      , Str "some"+                      , Space+                      , Str "teeth."+                      , Space+                      , Str "He"+                      , Space+                      , Str "did,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "was"+                      , Space+                      , Str "there."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "You"+                      , Space+                      , Str "have"+                      , Space+                      , Str "them"+                      , Space+                      , Str "all"+                      , Space+                      , Str "out,"+                      , Space+                      , Str "Lil,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "get"+                      , Space+                      , Str "a"+                      , Space+                      , Str "nice"+                      , Space+                      , Str "set,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "He"+                      , Space+                      , Str "said,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "swear,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "can't"+                      , Space+                      , Str "bear"+                      , Space+                      , Str "to"+                      , Space+                      , Str "look"+                      , Space+                      , Str "at"+                      , Space+                      , Str "you."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "no"+                      , Space+                      , Str "more"+                      , Space+                      , Str "can't"+                      , Space+                      , Str "I,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "said,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "think"+                      , Space+                      , Str "of"+                      , Space+                      , Str "poor"+                      , Space+                      , Str "Albert,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "He's"+                      , Space+                      , Str "been"+                      , Space+                      , Str "in"+                      , Space+                      , Str "the"+                      , Space+                      , Str "army"+                      , Space+                      , Str "four"+                      , Space+                      , Str "years,"+                      , Space+                      , Str "he"+                      , Space+                      , Str "wants"+                      , Space+                      , Str "a"+                      , Space+                      , Str "good"+                      , Space+                      , Str "time,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "if"+                      , Space+                      , Str "you"+                      , Space+                      , Str "don't"+                      , Space+                      , Str "give"+                      , Space+                      , Str "it"+                      , Space+                      , Str "him,"+                      , Space+                      , Str "there's"+                      , Space+                      , Str "others"+                      , Space+                      , Str "will,"+                      , Space+                      , Str "I"+                      , SoftBreak+                      , Str "said."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Oh"+                      , Space+                      , Str "is"+                      , Space+                      , Str "there,"+                      , Space+                      , Str "she"+                      , Space+                      , Str "said."+                      , Space+                      , Str "Something"+                      , Space+                      , Str "o'"+                      , Space+                      , Str "that,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "said."+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "150" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Then"+                      , Space+                      , Str "I'll"+                      , Space+                      , Str "know"+                      , Space+                      , Str "who"+                      , Space+                      , Str "to"+                      , Space+                      , Str "thank,"+                      , Space+                      , Str "she"+                      , Space+                      , Str "said,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "give"+                      , Space+                      , Str "me"+                      , Space+                      , Str "a"+                      , Space+                      , Str "straight"+                      , SoftBreak+                      , Str "look."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "HURRY"+                      , Space+                      , Str "UP"+                      , Space+                      , Str "PLEASE"+                      , Space+                      , Str "ITS"+                      , Space+                      , Str "TIME"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "If"+                      , Space+                      , Str "you"+                      , Space+                      , Str "don't"+                      , Space+                      , Str "like"+                      , Space+                      , Str "it"+                      , Space+                      , Str "you"+                      , Space+                      , Str "can"+                      , Space+                      , Str "get"+                      , Space+                      , Str "on"+                      , Space+                      , Str "with"+                      , Space+                      , Str "it,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "said."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Others"+                      , Space+                      , Str "can"+                      , Space+                      , Str "pick"+                      , Space+                      , Str "and"+                      , Space+                      , Str "choose"+                      , Space+                      , Str "if"+                      , Space+                      , Str "you"+                      , Space+                      , Str "can't."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "But"+                      , Space+                      , Str "if"+                      , Space+                      , Str "Albert"+                      , Space+                      , Str "makes"+                      , Space+                      , Str "off,"+                      , Space+                      , Str "it"+                      , Space+                      , Str "won't"+                      , Space+                      , Str "be"+                      , Space+                      , Str "for"+                      , Space+                      , Str "lack"+                      , Space+                      , Str "of"+                      , SoftBreak+                      , Str "telling."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "You"+                      , Space+                      , Str "ought"+                      , Space+                      , Str "to"+                      , Space+                      , Str "be"+                      , Space+                      , Str "ashamed,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "said,"+                      , Space+                      , Str "to"+                      , Space+                      , Str "look"+                      , Space+                      , Str "so"+                      , Space+                      , Str "antique."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "(And"+                      , Space+                      , Str "her"+                      , Space+                      , Str "only"+                      , Space+                      , Str "thirty-one.)"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "I"+                      , Space+                      , Str "can't"+                      , Space+                      , Str "help"+                      , Space+                      , Str "it,"+                      , Space+                      , Str "she"+                      , Space+                      , Str "said,"+                      , Space+                      , Str "pulling"+                      , Space+                      , Str "a"+                      , Space+                      , Str "long"+                      , Space+                      , Str "face,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "It's"+                      , Space+                      , Str "them"+                      , Space+                      , Str "pills"+                      , Space+                      , Str "I"+                      , Space+                      , Str "took,"+                      , Space+                      , Str "to"+                      , Space+                      , Str "bring"+                      , Space+                      , Str "it"+                      , Space+                      , Str "off,"+                      , Space+                      , Str "she"+                      , Space+                      , Str "said."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "(She's"+                      , Space+                      , Str "had"+                      , Space+                      , Str "five"+                      , Space+                      , Str "already,"+                      , Space+                      , Str "and"+                      , Space+                      , Str "nearly"+                      , Space+                      , Str "died"+                      , Space+                      , Str "of"+                      , Space+                      , Str "young"+                      , Space+                      , Str "George.)"+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "160" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "The"+                      , Space+                      , Str "chemist"+                      , Space+                      , Str "said"+                      , Space+                      , Str "it"+                      , Space+                      , Str "would"+                      , Space+                      , Str "be"+                      , Space+                      , Str "all"+                      , Space+                      , Str "right,"+                      , Space+                      , Str "but"+                      , Space+                      , Str "I've"+                      , Space+                      , Str "never"+                      , Space+                      , Str "been"+                      , Space+                      , Str "the"+                      , SoftBreak+                      , Str "same."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "You"+                      , Space+                      , Emph [ Str "are" ]+                      , Space+                      , Str "a"+                      , Space+                      , Str "proper"+                      , Space+                      , Str "fool,"+                      , Space+                      , Str "I"+                      , Space+                      , Str "said."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Well,"+                      , Space+                      , Str "if"+                      , Space+                      , Str "Albert"+                      , Space+                      , Str "won't"+                      , Space+                      , Str "leave"+                      , Space+                      , Str "you"+                      , Space+                      , Str "alone,"+                      , Space+                      , Str "there"+                      , Space+                      , Str "it"+                      , Space+                      , Str "is,"+                      , Space+                      , Str "I"+                      , SoftBreak+                      , Str "said,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "What"+                      , Space+                      , Str "you"+                      , Space+                      , Str "get"+                      , Space+                      , Str "married"+                      , Space+                      , Str "for"+                      , Space+                      , Str "if"+                      , Space+                      , Str "you"+                      , Space+                      , Str "don't"+                      , Space+                      , Str "want"+                      , Space+                      , Str "children?"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "HURRY"+                      , Space+                      , Str "UP"+                      , Space+                      , Str "PLEASE"+                      , Space+                      , Str "ITS"+                      , Space+                      , Str "TIME"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Well,"+                      , Space+                      , Str "that"+                      , Space+                      , Str "Sunday"+                      , Space+                      , Str "Albert"+                      , Space+                      , Str "was"+                      , Space+                      , Str "home,"+                      , Space+                      , Str "they"+                      , Space+                      , Str "had"+                      , Space+                      , Str "a"+                      , Space+                      , Str "hot"+                      , SoftBreak+                      , Str "gammon,"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "And"+                      , Space+                      , Str "they"+                      , Space+                      , Str "asked"+                      , Space+                      , Str "me"+                      , Space+                      , Str "in"+                      , Space+                      , Str "to"+                      , Space+                      , Str "dinner,"+                      , Space+                      , Str "to"+                      , Space+                      , Str "get"+                      , Space+                      , Str "the"+                      , Space+                      , Str "beauty"+                      , Space+                      , Str "of"+                      , Space+                      , Str "it"+                      , SoftBreak+                      , Str "hot\8213"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "HURRY"+                      , Space+                      , Str "UP"+                      , Space+                      , Str "PLEASE"+                      , Space+                      , Str "ITS"+                      , Space+                      , Str "TIME"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "HURRY"+                      , Space+                      , Str "UP"+                      , Space+                      , Str "PLEASE"+                      , Space+                      , Str "ITS"+                      , Space+                      , Str "TIME"+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Goonight"+                      , Space+                      , Str "Bill."+                      , Space+                      , Str "Goonight"+                      , Space+                      , Str "Lou."+                      , Space+                      , Str "Goonight"+                      , Space+                      , Str "May."+                      , Space+                      , Str "Goonight."+                      , Span ( "" , [ "lnum" ] , [] ) [ Str "170" ]+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Ta"+                      , Space+                      , Str "ta."+                      , Space+                      , Str "Goonight."+                      , Space+                      , Str "Goonight."+                      ]+                  ]+              , Div+                  ( "" , [] , [] )+                  [ Plain+                      [ Str "Good"+                      , Space+                      , Str "night,"+                      , Space+                      , Str "ladies,"+                      , Space+                      , Str "good"+                      , Space+                      , Str "night,"+                      , Space+                      , Str "sweet"+                      , Space+                      , Str "ladies,"+                      , Space+                      , Str "good"+                      , Space+                      , Str "night,"+                      , Space+                      , Str "good"+                      , SoftBreak+                      , Str "night."+                      ]+                  ]+              ]+          ]+      ]+  , Div+      ( "wasteland-content.xhtml_backmatter"+      , [ "section" , "backmatter" ]+      , []+      )+      [ Div+          ( "wasteland-content.xhtml_rearnotes"+          , [ "rearnotes" ]+          , []+          )+          [ Header+              2+              ( "" , [] , [] )+              [ Str "NOTES"+              , Space+              , Str "ON"+              , Space+              , Str "\"THE"+              , Space+              , Str "WASTE"+              , Space+              , Str "LAND\""+              ]+          , Para+              [ Str "Not"+              , Space+              , Str "only"+              , Space+              , Str "the"+              , Space+              , Str "title,"+              , Space+              , Str "but"+              , Space+              , Str "the"+              , Space+              , Str "plan"+              , Space+              , Str "and"+              , Space+              , Str "a"+              , Space+              , Str "good"+              , Space+              , Str "deal"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Str "incidental"+              , Space+              , Str "symbolism"+              , Space+              , Str "of"+              , SoftBreak+              , Str "the"+              , Space+              , Str "poem"+              , Space+              , Str "were"+              , Space+              , Str "suggested"+              , Space+              , Str "by"+              , Space+              , Str "Miss"+              , Space+              , Str "Jessie"+              , Space+              , Str "L."+              , Space+              , Str "Weston's"+              , Space+              , Str "book"+              , Space+              , Str "on"+              , Space+              , Str "the"+              , Space+              , Str "Grail"+              , Space+              , Str "legend:"+              , SoftBreak+              , Str "From"+              , Space+              , Str "Ritual"+              , Space+              , Str "to"+              , Space+              , Str "Romance"+              ]+          , Para+              [ Str "Indeed,"+              , Space+              , Str "so"+              , Space+              , Str "deeply"+              , Space+              , Str "am"+              , Space+              , Str "I"+              , Space+              , Str "indebted,"+              , Space+              , Str "Miss"+              , Space+              , Str "Weston's"+              , Space+              , Str "book"+              , Space+              , Str "will"+              , Space+              , Str "elucidate"+              , Space+              , Str "the"+              , SoftBreak+              , Str "difficulties"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Str "poem"+              , Space+              , Str "much"+              , Space+              , Str "better"+              , Space+              , Str "than"+              , Space+              , Str "my"+              , Space+              , Str "notes"+              , Space+              , Str "can"+              , Space+              , Str "do;"+              , Space+              , Str "and"+              , Space+              , Str "I"+              , Space+              , Str "recommend"+              , Space+              , Str "it"+              , SoftBreak+              , Str "(apart"+              , Space+              , Str "from"+              , Space+              , Str "the"+              , Space+              , Str "great"+              , Space+              , Str "interest"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Str "book"+              , Space+              , Str "itself)"+              , Space+              , Str "to"+              , Space+              , Str "any"+              , Space+              , Str "who"+              , Space+              , Str "think"+              , Space+              , Str "such"+              , SoftBreak+              , Str "elucidation"+              , Space+              , Str "of"+              , Space+              , Str "the"+              , Space+              , Str "poem"+              , Space+              , Str "worth"+              , Space+              , Str "the"+              , Space+              , Str "trouble."+              , Space+              , Str "To"+              , Space+              , Str "another"+              , Space+              , Str "work"+              , Space+              , Str "of"+              , Space+              , Str "anthropology"+              , Space+              , Str "I"+              , Space+              , Str "am"+              , SoftBreak+              , Str "indebted"+              , Space+              , Str "in"+              , Space+              , Str "general,"+              , Space+              , Str "one"+              , Space+              , Str "which"+              , Space+              , Str "has"+              , Space+              , Str "influenced"+              , Space+              , Str "our"+              , Space+              , Str "generation"+              , Space+              , Str "profoundly;"+              , Space+              , Str "I"+              , Space+              , Str "mean"+              , SoftBreak+              , Str "The"+              , Space+              , Str "Golden"+              , Space+              , Str "Bough;"+              , Space+              , Str "I"+              , Space+              , Str "have"+              , Space+              , Str "used"+              , Space+              , Str "especially"+              , Space+              , Str "the"+              , Space+              , Str "two"+              , Space+              , Str "volumes"+              , Space+              , Str "Adonis,"+              , Space+              , Str "Attis,"+              , Space+              , Str "Osiris."+              , SoftBreak+              , Str "Anyone"+              , Space+              , Str "who"+              , Space+              , Str "is"+              , Space+              , Str "acquainted"+              , Space+              , Str "with"+              , Space+              , Str "these"+              , Space+              , Str "works"+              , Space+              , Str "will"+              , Space+              , Str "immediately"+              , Space+              , Str "recognise"+              , Space+              , Str "in"+              , Space+              , Str "the"+              , Space+              , Str "poem"+              , SoftBreak+              , Str "certain"+              , Space+              , Str "references"+              , Space+              , Str "to"+              , Space+              , Str "vegetation"+              , Space+              , Str "ceremonies."+              ]+          , Div+              ( "" , [ "section" ] , [] )+              [ Header+                  3+                  ( "" , [] , [] )+                  [ Str "I."+                  , Space+                  , Str "THE"+                  , Space+                  , Str "BURIAL"+                  , Space+                  , Str "OF"+                  , Space+                  , Str "THE"+                  , Space+                  , Str "DEAD"+                  ]+              ]+          , Div+              ( "" , [ "section" ] , [] )+              [ Header+                  3+                  ( "" , [] , [] )+                  [ Str "II."+                  , Space+                  , Str "A"+                  , Space+                  , Str "GAME"+                  , Space+                  , Str "OF"+                  , Space+                  , Str "CHESS"+                  ]+              ]+          ]+      ]+  ]
test/pptx/comparison/both-columns/templated.pptx view

binary file changed (57662 → 57667 bytes)

test/pptx/comparison/extra-image/templated.pptx view

binary file changed (57688 → 57693 bytes)

test/pptx/comparison/extra-text/templated.pptx view

binary file changed (57662 → 57667 bytes)

test/pptx/comparison/non-text-first/templated.pptx view

binary file changed (57553 → 57553 bytes)

test/pptx/comparison/one-column/templated.pptx view

binary file changed (41000 → 41004 bytes)

test/pptx/footer/basic/output.pptx view

binary file changed (52727 → 52724 bytes)

test/pptx/footer/fixed-date/output.pptx view

binary file changed (51354 → 51349 bytes)

test/pptx/footer/higher-slide-number/output.pptx view

binary file changed (52740 → 52735 bytes)

test/pptx/footer/no-title-slide/output.pptx view

binary file changed (52314 → 52309 bytes)

+ test/tables.djot view
@@ -0,0 +1,54 @@+Simple table with caption:++| Right | Left | Center | Default |+|------:|:-----|:------:|-------|+|    12 | 12   |   12   | 12      |+|   123 | 123  |  123   | 123     |+|     1 | 1    |   1    | 1       |++^ Demonstration of simple table syntax.++Simple table without caption:++| Right | Left | Center | Default |+|------:|:-----|:------:|-------|+|    12 | 12   |   12   | 12      |+|   123 | 123  |  123   | 123     |+|     1 | 1    |   1    | 1       |++Simple table indented two spaces:++| Right | Left | Center | Default |+|------:|:-----|:------:|-------|+|    12 | 12   |   12   | 12      |+|   123 | 123  |  123   | 123     |+|     1 | 1    |   1    | 1       |++^ Demonstration of simple table syntax.++Multiline table with caption:++| Centered Header | Left Aligned | Right Aligned | Default aligned                                       |+|:---------------:|:-------------|--------------:|:------------------------------------------------------|+|      First      | row          |          12.0 | Example of a row that spans multiple lines.           |+|     Second      | row          |           5.0 | Here's another one. Note the blank line between rows. |++^ Here's the caption. It may span multiple lines.++Multiline table without caption:++| Centered Header | Left Aligned | Right Aligned | Default aligned                                       |+|:---------------:|:-------------|--------------:|:------------------------------------------------------|+|      First      | row          |          12.0 | Example of a row that spans multiple lines.           |+|     Second      | row          |           5.0 | Here's another one. Note the blank line between rows. |++Table without column headers:++|  12 | 12  | 12  |  12 |+| 123 | 123 | 123 | 123 |+|   1 | 1   |  1  |   1 |++Multiline table without column headers:++| First  | row | 12.0 | Example of a row that spans multiple lines.           |+| Second | row |  5.0 | Here's another one. Note the blank line between rows. |
test/typst-reader.native view
@@ -1674,7 +1674,7 @@           , Space           , Str "or"           , Space-          , Math InlineMath "\\underset{\175}{A}"+          , Math InlineMath "\\overline{A}"           , Space           , Str "with"           , Space@@ -1847,8 +1847,7 @@                           [ Para                               [ Span                                   ( "" , [ "box" ] , [] )-                                  [ Math-                                      InlineMath "\\overset{\\cdot}{a}"+                                  [ Math InlineMath "\\dot{a}"                                   , Str "\8192"                                   , Code ( "" , [] , [] ) "dot(a)"                                   ]@@ -1862,8 +1861,7 @@                           [ Para                               [ Span                                   ( "" , [ "box" ] , [] )-                                  [ Math-                                      InlineMath "\\overset{\\sim}{a}"+                                  [ Math InlineMath "\\widetilde{a}"                                   , Str "\8192"                                   , Code ( "" , [] , [] ) "tilde(a)"                                   ]@@ -1895,7 +1893,7 @@                           [ Para                               [ Span                                   ( "" , [ "box" ] , [] )-                                  [ Math InlineMath "\\overset{\168}{a}"+                                  [ Math InlineMath "\\ddot{a}"                                   , Str "\8192"                                   , Code ( "" , [] , [] ) "diaer(a)"                                   ]@@ -2042,7 +2040,7 @@           , Space           , Str "produces"           , Space-          , Math InlineMath "\\underset{\175}{x + y}"+          , Math InlineMath "\\overline{x + y}"           , Str ","           , Space           , Str "and"@@ -4045,7 +4043,7 @@                                   ( "" , [ "box" ] , [] )                                   [ Math                                       InlineMath-                                      "\\left. \\parallel{} \\right.\\parallel"+                                      "\\left\\| {} \\right\\|"                                   , Str "\8192"                                   , Code ( "" , [] , [] ) "norm(\"\")"                                   ]
+ test/writer.djot view
@@ -0,0 +1,749 @@+# Pandoc Test Suite++John MacFarlane+Anonymous++July 17, 2006++This is a set of tests for pandoc. Most of them are adapted from John Gruber's+markdown test suite.++* * * *++{#headers}+# Headers++{#level-2-with-an-embedded-link}+## Level 2 with an [embedded link](/url)++{#level-3-with-emphasis}+### Level 3 with _emphasis_++{#level-4}+#### Level 4++{#level-5}+##### Level 5++{#level-1}+# Level 1++{#level-2-with-emphasis}+## Level 2 with _emphasis_++{#level-3}+### Level 3++with no blank line++{#level-2}+## Level 2++with no blank line++* * * *++{#paragraphs}+# Paragraphs++Here's a regular paragraph.++In Markdown 1.0.0 and earlier. Version 8. This line turns into a list item.+Because a hard-wrapped line in the middle of a paragraph looked like a list+item.++Here's one with a bullet. \* criminey.++There should be a hard line break\+here.++* * * *++{#block-quotes}+# Block Quotes++E-mail style:++> This is a block quote. It is pretty short.++> Code in a block quote:+>+> ```+> sub status {+>     print "working";+> }+> ```+>+> A list:+>+> 1. item one+> 2. item two+>+> Nested block quotes:+>+> > nested+>+> > nested++This should not be a block quote: 2 \> 1.++And a following paragraph.++* * * *++{#code-blocks}+# Code Blocks++Code:++```+---- (should be four hyphens)++sub status {+    print "working";+}++this code block is indented by one tab+```++And:++```+    this code block is indented by two tabs++These should not be escaped:  \$ \\ \> \[ \{+```++* * * *++{#lists}+# Lists++{#unordered}+## Unordered++Asterisks tight:++- asterisk 1+- asterisk 2+- asterisk 3++Asterisks loose:++- asterisk 1++- asterisk 2++- asterisk 3++Pluses tight:++- Plus 1+- Plus 2+- Plus 3++Pluses loose:++- Plus 1++- Plus 2++- Plus 3++Minuses tight:++- Minus 1+- Minus 2+- Minus 3++Minuses loose:++- Minus 1++- Minus 2++- Minus 3++{#ordered}+## Ordered++Tight:++1. First+2. Second+3. Third++and:++1. One+2. Two+3. Three++Loose using tabs:++1. First++2. Second++3. Third++and using spaces:++1. One++2. Two++3. Three++Multiple paragraphs:++1. Item 1, graf one.++   Item 1. graf two. The quick brown fox jumped over the lazy dog's back.++2. Item 2.++3. Item 3.++{#nested}+## Nested++- Tab++  - Tab++    - Tab++Here's another:++1. First+2. Second:++   - Fee+   - Fie+   - Foe+3. Third++Same thing but with paragraphs:++1. First++2. Second:++   - Fee+   - Fie+   - Foe++3. Third++{#tabs-and-spaces}+## Tabs and spaces++- this is a list item indented with tabs++- this is a list item indented with spaces++  - this is an example list item indented with tabs++  - this is an example list item indented with spaces++{#fancy-list-markers}+## Fancy list markers++(2) begins with 2++(3) and now 3++    with a continuation++    iv. sublist with roman numerals, starting with 4+    v. more items++       (A) a subsublist+       (B) a subsublist++Nesting:++A. Upper Alpha++   I. Upper Roman.++      (6) Decimal start with 6++          c) Lower alpha with paren++Autonumbering:++1. Autonumber.+2. More.++   1. Nested.++Should not be a list item:++M.A. 2007++B. Williams++* * * *++{#definition-lists}+# Definition Lists++Tight using spaces:++: apple++  red fruit+: orange++  orange fruit+: banana++  yellow fruit++Tight using tabs:++: apple++  red fruit+: orange++  orange fruit+: banana++  yellow fruit++Loose:++: apple++  red fruit++: orange++  orange fruit++: banana++  yellow fruit++Multiple blocks with italics:++: _apple_++  red fruit++  contains seeds, crisp, pleasant to taste++: _orange_++  orange fruit++  ```+  { orange code block }+  ```++  > orange block quote++Multiple definitions, tight:++: apple++  red fruit++  computer+: orange++  orange fruit++  bank++Multiple definitions, loose:++: apple++  red fruit++  computer++: orange++  orange fruit++  bank++Blank line after term, indented marker, alternate markers:++: apple++  red fruit++  computer++: orange++  orange fruit++  1. sublist+  2. sublist++{#html-blocks}+# HTML Blocks++Simple block on one line:++:::+foo++:::++And nested without indentation:++::::::+::::+:::+foo++:::++::::++:::+bar++:::++::::::++Interpreted markdown in a table:++This is _emphasized_++And this is *strong*++Here's a simple block:++:::+foo++:::++This should be a code block, though:++```+<div>+    foo+</div>+```++As should this:++```+<div>foo</div>+```++Now, nested:++:::::+::::+:::+foo++:::++::::++:::::++This should just be an HTML comment:++Multiline:++Code block:++```+<!-- Comment -->+```++Just plain comment, with trailing spaces on the line:++Code:++```+<hr />+```++Hr's:++* * * *++{#inline-markup}+# Inline Markup++This is _emphasized_, and so _is this_.++This is *strong*, and so *is this*.++An _[emphasized link](/url)_.++*_This is strong and em._*++So is *_this_* word.++*_This is strong and em._*++So is *_this_* word.++This is code: `>`, `$`, `\`, `\$`, `<html>`.++{-This is _strikeout_.-}++Superscripts: a^bc^d a^_hello_^ a^hello there^.++Subscripts: H~2~O, H~23~O, H~many of them~O.++These should not be superscripts or subscripts, because of the unescaped spaces:+a\^b c\^d, a\~b c\~d.++* * * *++{#smart-quotes-ellipses-dashes}+# Smart quotes, ellipses, dashes++"Hello," said the spider. "'Shelob' is my name."++'A', 'B', and 'C' are letters.++'Oak,' 'elm,' and 'beech' are names of trees. So is 'pine.'++'He said, "I want to go."' Were you alive in the 70's?++Here is some quoted '`code`' and a "[quoted+link](http://example.com/?foo=1&bar=2)".++Some dashes: one---two --- three---four --- five.++Dashes between numbers: 5--7, 255--66, 1987--1999.++Ellipses...and...and....++* * * *++{#latex}+# LaTeX++- +- $`2+2=4`+- $`x \in y`+- $`\alpha \wedge \omega`+- $`223`+- $`p`-Tree+- Here's some display math:+  $$`\frac{d}{dx}f(x)=\lim_{h\to 0}\frac{f(x+h)-f(x)}{h}`+- Here's one that has a line break in it: $`\alpha + \omega \times x^2`.++These shouldn't be math:++- To get the famous equation, write `$e = mc^2$`.+- $22,000 is a _lot_ of money. So is $34,000. (It worked if "lot" is+  emphasized.)+- Shoes ($20) and socks ($5).+- Escaped `$`\: $73 _this should be emphasized_ 23$.++Here's a LaTeX table:++* * * *++{#special-characters}+# Special Characters++Here is some unicode:++- I hat: Î+- o umlaut: ö+- section: §+- set membership: ∈+- copyright: ©++AT&T has an ampersand in their name.++AT&T is another way to write it.++This & that.++4 \< 5.++6 \> 5.++Backslash: \\++Backtick: \`++Asterisk: \*++Underscore: \_++Left brace: \{++Right brace: \}++Left bracket: \[++Right bracket: \]++Left paren: (++Right paren: )++Greater-than: \>++Hash: #++Period: .++Bang: \!++Plus: +++Minus: -++* * * *++{#links}+# Links++{#explicit}+## Explicit++Just a [URL](/url/).++[URL and title](/url/){title="title"}.++[URL and title](/url/){title="title preceded by two spaces"}.++[URL and title](/url/){title="title preceded by a tab"}.++[URL and title](/url/){title="title with \"quotes\" in it"}++[URL and title](/url/){title="title with single quotes"}++[with\_underscore](/url/with_underscore)++[Email link](mailto:nobody@nowhere.net)++[Empty]().++{#reference}+## Reference++Foo [bar](/url/).++With [embedded \[brackets\]](/url/).++[b](/url/) by itself should be a link.++Indented [once](/url).++Indented [twice](/url).++Indented [thrice](/url).++This should \[not\]\[\] be a link.++```+[not]: /url+```++Foo [bar](/url/){title="Title with \"quotes\" inside"}.++Foo [biz](/url/){title="Title with \"quote\" inside"}.++{#with-ampersands}+## With ampersands++Here's a [link with an ampersand in the URL](http://example.com/?foo=1&bar=2).++Here's a link with an amersand in the link text:+[AT&T](http://att.com/){title="AT&T"}.++Here's an [inline link](/script?foo=1&bar=2).++Here's an [inline link in pointy braces](/script?foo=1&bar=2).++{#autolinks}+## Autolinks++With an ampersand: <http://example.com/?foo=1&bar=2>++- In a list?+- <http://example.com/>+- It should.++An e-mail address: <nobody@nowhere.net>++> Blockquoted: <http://example.com/>++Auto-links should not occur here: `<http://example.com/>`++```+or here: <http://example.com/>+```++* * * *++{#images}+# Images++From "Voyage dans la Lune" by Georges Melies (1902):++::::+![lalune](lalune.jpg){title="Voyage dans la Lune"}++{.caption}+:::+lalune++:::++::::++Here is a movie ![movie](movie.jpg) icon.++* * * *++{#footnotes}+# Footnotes++Here is a footnote reference,[^1] and another.[^2] This should _not_ be a+footnote reference, because it contains a space.\[\^my note\] Here is an inline+note.[^3]++> Notes can go in quotes.[^4]++1. And in list items.[^5]++This paragraph should not be part of the note, as it is not indented.++[^1]: Here is the footnote. It can go anywhere after the footnote reference. It+    need not be placed at the end of the document.++[^2]: Here's the long note. This one contains multiple blocks.++    Subsequent blocks are indented to show that they belong to the footnote (as+    with list items).++    ```+      { <code> }+    ```++    If you want, you can indent every line, but you can also be lazy and just+    indent the first line of each block.++[^3]: This is _easier_ to type. Inline notes may contain+    [links](http://google.com) and `]` verbatim characters, as well as+    \[bracketed text\].++[^4]: In quote.++[^5]: In list.
test/writer.typst view
@@ -634,9 +634,9 @@ These shouldn’t be math:  - To get the famous equation, write `$e = mc^2$`.-- \$22,000 is a #emph[lot] of money. So is \$34,000. \(It worked if "lot" is+- \$22,000 is a #emph[lot] of money. So is \$34,000. (It worked if "lot" is   emphasized.)-- Shoes \(\$20) and socks \(\$5).+- Shoes (\$20) and socks (\$5). - Escaped `$`: \$73 #emph[this should be emphasized] 23\$.  Here’s a LaTeX table:@@ -679,7 +679,7 @@  Right bracket: \] -Left paren: \(+Left paren: (  Right paren: ) @@ -778,7 +778,7 @@  = Images <images>-From "Voyage dans la Lune" by Georges Melies \(1902):+From "Voyage dans la Lune" by Georges Melies (1902):  #figure([#box(width: 150.0pt, image("lalune.jpg"));],   caption: [@@ -796,8 +796,8 @@ after the footnote reference. It need not be placed at the end of the document.] and another.#footnote[Here’s the long note. This one contains multiple blocks. -Subsequent blocks are indented to show that they belong to the footnote \(as-with list items).+Subsequent blocks are indented to show that they belong to the footnote (as with+list items).  ```   { <code> }