@pretextbook/pretext-html 0.3.0 → 0.5.0

package/assets/xsl/pretext-fo.xsl

@@ -610,7 +610,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     </xsl:choose>
     <!-- material following a formatted printout begins a fresh page; -->
     <!-- a conclusion, when present, carries that break itself         -->
-    <xsl:if test="(self::worksheet or self::handout) and $b-latex-worksheet-formatted and not(conclusion)">
+    <xsl:if test="(&PRINTOUT-FILTER;) and $b-latex-worksheet-formatted and not(conclusion)">
         <fo:block break-after="page"/>
     </xsl:if>
 </xsl:template>
@@ -764,7 +764,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
         <xsl:when test="@xml:id = str:tokenize($latex-pagebreaks-string)">
             <xsl:text>page</xsl:text>
         </xsl:when>
-        <xsl:when test="(self::worksheet or self::handout) and $b-latex-worksheet-formatted">
+        <xsl:when test="(&PRINTOUT-FILTER;) and $b-latex-worksheet-formatted">
             <xsl:text>page</xsl:text>
         </xsl:when>
     </xsl:choose>
@@ -1058,13 +1058,13 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
 </xsl:template>
 
 <!-- An exercise or project run-in heading.  The assembly stamps    -->
-<!-- "@exercise-customization" with the exercise's category; the     -->
+<!-- "@pi:exercise-customization" with the exercise's category; the  -->
 <!-- divisional kinds (divisional, worksheet, reading) show a bare   -->
 <!-- serial number, while an inline exercise or a project carries    -->
 <!-- the full type-name and number.                                  -->
 <xsl:template match="*" mode="exercise-heading">
     <xsl:choose>
-        <xsl:when test="@exercise-customization = 'inline' or @exercise-customization = 'project'">
+        <xsl:when test="@pi:exercise-customization = 'inline' or @pi:exercise-customization = 'project'">
             <xsl:apply-templates select="." mode="heading-full"/>
         </xsl:when>
         <xsl:otherwise>
@@ -1589,7 +1589,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
 <!-- tagged table must share a common width (ISO 14289-1).        -->
 <xsl:template match="exercisegroup">
     <!-- the exercises shift right to show the scope of the group, by -->
-    <!-- the shared fraction of the text measure (LaTeX's \egindent); -->
+    <!-- the shared fraction of the text measure (LaTeX's \ptxegindent); -->
     <!-- the introduction and conclusion stay at the left margin      -->
     <xsl:variable name="group-indent" select="format-number($exercisegroup-indentation * $text-width-points, '0.##')"/>
     <fo:block>
@@ -2017,23 +2017,23 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     </fo:list-item>
 </xsl:template>
 
-<!-- The assembly stylesheet stamps every "ol" with @format-code  -->
+<!-- The assembly stylesheet stamps each "ol" with @pi:format-code-->
 <!-- ('1', 'a', 'A', 'i', 'I', or '0' for a zero-based list), and -->
-<!-- with @marker-prefix and @marker-suffix adornments, all       -->
+<!-- with @pi:marker-prefix and @pi:marker-suffix adornments, all -->
 <!-- deconstructed from any authored @marker.                     -->
 <xsl:template match="ol/li" mode="list-label">
     <xsl:variable name="the-position" select="count(preceding-sibling::li) + 1"/>
-    <xsl:value-of select="parent::ol/@marker-prefix"/>
+    <xsl:value-of select="parent::ol/@pi:marker-prefix"/>
     <xsl:choose>
         <!-- a zero-based list counts from zero, in arabic numerals -->
-        <xsl:when test="parent::ol/@format-code = '0'">
+        <xsl:when test="parent::ol/@pi:format-code = '0'">
             <xsl:number value="$the-position - 1" format="1"/>
         </xsl:when>
         <xsl:otherwise>
-            <xsl:number value="$the-position" format="{parent::ol/@format-code}"/>
+            <xsl:number value="$the-position" format="{parent::ol/@pi:format-code}"/>
         </xsl:otherwise>
     </xsl:choose>
-    <xsl:value-of select="parent::ol/@marker-suffix"/>
+    <xsl:value-of select="parent::ol/@pi:marker-suffix"/>
 </xsl:template>
 
 <!-- Bullets via the "format-code" machinery of pretext-common.xsl, -->
@@ -2829,7 +2829,9 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
             <xsl:for-each select="line">
                 <fo:block text-align="end">
                     <xsl:if test="position() = 1">
-                        <xsl:call-template name="mdash-character"/>
+                        <xsl:call-template name="character">
+                            <xsl:with-param name="name" select="'mdash'"/>
+                        </xsl:call-template>
                     </xsl:if>
                     <xsl:apply-templates/>
                 </fo:block>
@@ -2837,7 +2839,9 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
         </xsl:when>
         <xsl:otherwise>
             <fo:block text-align="end">
-                <xsl:call-template name="mdash-character"/>
+                <xsl:call-template name="character">
+                    <xsl:with-param name="name" select="'mdash'"/>
+                </xsl:call-template>
                 <xsl:apply-templates/>
             </fo:block>
         </xsl:otherwise>
@@ -3078,16 +3082,23 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
 <!-- Side-by-Side -->
 <!-- ############ -->
 
-<!-- A "sidebyside" lays out its panels horizontally, as an        -->
-<!-- fo:table with a single row.  pretext-common.xsl computes the  -->
-<!-- whole layout from the authored attributes: per-panel widths   -->
-<!-- and vertical alignments, outer margins, and the uniform space -->
-<!-- between panels.  Margins and inter-panel spaces become empty  -->
-<!-- columns.  The panel element list mirrors the one in the       -->
-<!-- "sidebyside" main template of pretext-common.xsl.             -->
+<!-- A "sidebyside" lays out its panels horizontally, as an         -->
+<!-- fo:table with a single row.  The -common "compose-panels"      -->
+<!-- machinery is deliberately unused: XSL-FO has no container that -->
+<!-- distributes horizontal space over anonymous children, so       -->
+<!-- margins and inter-panel gaps are empty columns and cells       -->
+<!-- interleaved with the panel cells in document order, and each   -->
+<!-- panel cell carries its own vertical alignment.  Composition    -->
+<!-- must therefore place structure between the panels, and the     -->
+<!-- -common contract delivers the finished panels as one opaque    -->
+<!-- fragment, the wrong granularity.  Only the layout computation  -->
+<!-- is shared: -common "layout-parameters" supplies per-panel      -->
+<!-- widths and vertical alignments, outer margins, and the uniform -->
+<!-- inter-panel space.  The panel vocabulary is the "SBSPANEL"     -->
+<!-- entity.                                                        -->
 <xsl:template match="sidebyside">
     <xsl:apply-templates select="." mode="forced-pagebreak"/>
-    <xsl:variable name="panels" select="p|pre|ol|ul|dl|program|console|poem|audio|video|interactive|slate|exercise|image|figure|table|listing|list|tabular|stack|jsxgraph|paragraphs"/>
+    <xsl:variable name="panels" select="&SBSPANEL;"/>
     <xsl:variable name="rtf-layout">
         <xsl:apply-templates select="." mode="layout-parameters"/>
     </xsl:variable>
@@ -3152,9 +3163,9 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
 </xsl:template>
 
 <!-- A "stack" stacks several items vertically within one panel; -->
-<!-- the child list again mirrors pretext-common.xsl.            -->
+<!-- the child list is the "STACKABLE" entity.                   -->
 <xsl:template match="sidebyside/stack">
-    <xsl:apply-templates select="tabular|image|p|pre|ol|ul|dl|audio|video|interactive|slate|program|console|exercise"/>
+    <xsl:apply-templates select="&STACKABLE;"/>
 </xsl:template>
 
 <!-- A "sbsgroup" is as pure a container as there can be: the -->
@@ -3505,19 +3516,26 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     </fo:inline>
 </xsl:template>
 
-<!-- The Unicode code points below match the HTML conversion. -->
-<xsl:template name="nbsp-character">
-    <xsl:text>&#xa0;</xsl:text>
-</xsl:template>
-<xsl:template name="ndash-character">
-    <xsl:text>&#x2013;</xsl:text>
-</xsl:template>
-<xsl:template name="mdash-character">
-    <xsl:text>&#x2014;</xsl:text>
+<!-- Most characters read the Unicode code point straight from the -->
+<!-- representation table in  pretext-common.xsl; the code points   -->
+<!-- match the HTML conversion.  The exceptions below borrow the    -->
+<!-- symbol font for glyphs missing from the main (serif) face, or  -->
+<!-- are otherwise particular to this conversion.                   -->
+<xsl:template match="char" mode="character">
+    <xsl:choose>
+        <xsl:when test="@unicode">
+            <xsl:value-of select="@unicode"/>
+        </xsl:when>
+        <xsl:otherwise>
+            <xsl:call-template name="warn-unimplemented-character">
+                <xsl:with-param name="char-name" select="@name"/>
+            </xsl:call-template>
+        </xsl:otherwise>
+    </xsl:choose>
 </xsl:template>
 <!-- the thin space is missing from the main (serif) face, so it -->
 <!-- borrows the symbol font, as the narrow no-break space does   -->
-<xsl:template name="thin-space-character">
+<xsl:template match="char[@name = 'thin-space']" mode="character">
     <fo:inline font-family="{$font-family-symbol}">
         <xsl:text>&#x2009;</xsl:text>
     </fo:inline>
@@ -3531,112 +3549,70 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
 </xsl:template>
 <!-- the white square brackets are missing from the main (serif)  -->
 <!-- face, so they borrow the symbol font, as the tombstone does  -->
-<xsl:template name="ldblbracket-character">
+<xsl:template match="char[@name = 'ldblbracket']" mode="character">
     <fo:inline font-family="{$font-family-symbol}">
         <xsl:text>&#x27e6;</xsl:text>
     </fo:inline>
 </xsl:template>
-<xsl:template name="rdblbracket-character">
+<xsl:template match="char[@name = 'rdblbracket']" mode="character">
     <fo:inline font-family="{$font-family-symbol}">
         <xsl:text>&#x27e7;</xsl:text>
     </fo:inline>
 </xsl:template>
-<!-- the *mathematical* angle brackets (U+27E8, U+27E9), missing  -->
-<!-- from the main (serif) face, so they borrow the symbol font;  -->
-<!-- the CJK pair (U+3008, U+3009) is in no embedded font at all   -->
-<xsl:template name="langle-character">
+<!-- the mathematical angle brackets are missing from the main -->
+<!-- (serif) face, so they borrow the symbol font, as the      -->
+<!-- tombstone does                                            -->
+<xsl:template match="char[@name = 'langle']" mode="character">
     <fo:inline font-family="{$font-family-symbol}">
         <xsl:text>&#x27e8;</xsl:text>
     </fo:inline>
 </xsl:template>
-<xsl:template name="rangle-character">
+<xsl:template match="char[@name = 'rangle']" mode="character">
     <fo:inline font-family="{$font-family-symbol}">
         <xsl:text>&#x27e9;</xsl:text>
     </fo:inline>
 </xsl:template>
-<xsl:template name="ellipsis-character">
-    <xsl:text>&#x2026;</xsl:text>
-</xsl:template>
-<xsl:template name="midpoint-character">
-    <xsl:text>&#xb7;</xsl:text>
-</xsl:template>
 <!-- the swung dash is missing from the main (serif) face, so it -->
 <!-- borrows the symbol font, as the tombstone does              -->
-<xsl:template name="swungdash-character">
+<xsl:template match="char[@name = 'swungdash']" mode="character">
     <fo:inline font-family="{$font-family-symbol}">
         <xsl:text>&#x2053;</xsl:text>
     </fo:inline>
 </xsl:template>
-<xsl:template name="permille-character">
-    <xsl:text>&#x2030;</xsl:text>
-</xsl:template>
-<xsl:template name="pilcrow-character">
-    <xsl:text>&#xb6;</xsl:text>
-</xsl:template>
-<xsl:template name="section-mark-character">
-    <xsl:text>&#xa7;</xsl:text>
-</xsl:template>
-<xsl:template name="minus-character">
-    <xsl:text>&#x2212;</xsl:text>
-</xsl:template>
-<xsl:template name="times-character">
-    <xsl:text>&#xd7;</xsl:text>
-</xsl:template>
-<xsl:template name="solidus-character">
-    <xsl:text>&#x2044;</xsl:text>
-</xsl:template>
-<xsl:template name="obelus-character">
-    <xsl:text>&#xf7;</xsl:text>
-</xsl:template>
-<xsl:template name="plusminus-character">
-    <xsl:text>&#xb1;</xsl:text>
-</xsl:template>
-<xsl:template name="copyright-character">
-    <xsl:text>&#xa9;</xsl:text>
-</xsl:template>
 <!-- the sound-recording and service marks borrow the symbol font -->
-<xsl:template name="phonomark-character">
+<xsl:template match="char[@name = 'phonomark']" mode="character">
     <fo:inline font-family="{$font-family-symbol}">
         <xsl:text>&#x2117;</xsl:text>
     </fo:inline>
 </xsl:template>
+<xsl:template match="char[@name = 'servicemark']" mode="character">
+    <fo:inline font-family="{$font-family-symbol}">
+        <xsl:text>&#x2120;</xsl:text>
+    </fo:inline>
+</xsl:template>
 <!-- The copyleft symbol (U+1F12F) is in no embeddable font, so it  -->
 <!-- is built, as in its name, from a reversed "c" (U+2184) set in  -->
 <!-- parentheses.  The main font lacks the reversed "c", and it sits -->
 <!-- between the parentheses with no surrounding space, so it is     -->
 <!-- named from the symbol font explicitly, as the primes are.       -->
-<xsl:template name="copyleft-character">
+<xsl:template match="char[@name = 'copyleft']" mode="character">
     <xsl:text>(</xsl:text>
     <fo:inline font-family="{$font-family-symbol}">
         <xsl:text>&#x2184;</xsl:text>
     </fo:inline>
     <xsl:text>)</xsl:text>
 </xsl:template>
-<xsl:template name="registered-character">
-    <xsl:text>&#xae;</xsl:text>
-</xsl:template>
-<xsl:template name="trademark-character">
-    <xsl:text>&#x2122;</xsl:text>
-</xsl:template>
-<xsl:template name="servicemark-character">
-    <fo:inline font-family="{$font-family-symbol}">
-        <xsl:text>&#x2120;</xsl:text>
-    </fo:inline>
-</xsl:template>
-<xsl:template name="degree-character">
-    <xsl:text>&#xb0;</xsl:text>
-</xsl:template>
 <!-- the prime and double prime (minutes and seconds, feet and       -->
 <!-- inches) are missing from the main (serif) face; because they     -->
 <!-- sit *within* a measurement, with no surrounding space, FOP's     -->
 <!-- per-word font selection cannot reach the symbol font for them,   -->
 <!-- so each is named explicitly, as the tombstone is.                -->
-<xsl:template name="prime-character">
+<xsl:template match="char[@name = 'prime']" mode="character">
     <fo:inline font-family="{$font-family-symbol}">
         <xsl:text>&#x2032;</xsl:text>
     </fo:inline>
 </xsl:template>
-<xsl:template name="dblprime-character">
+<xsl:template match="char[@name = 'dblprime']" mode="character">
     <fo:inline font-family="{$font-family-symbol}">
         <xsl:text>&#x2033;</xsl:text>
     </fo:inline>
@@ -4244,11 +4220,15 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <fo:block space-before="1em" space-after="1em">
         <xsl:apply-templates select="." mode="link-id-attribute"/>
         <fo:block>
-            <xsl:call-template name="langle-character"/>
+            <xsl:call-template name="character">
+                <xsl:with-param name="name" select="'langle'"/>
+            </xsl:call-template>
             <xsl:apply-templates select="." mode="number"/>
             <xsl:text> </xsl:text>
             <xsl:apply-templates select="." mode="title-full"/>
-            <xsl:call-template name="rangle-character"/>
+            <xsl:call-template name="character">
+                <xsl:with-param name="name" select="'rangle'"/>
+            </xsl:call-template>
             <xsl:text> </xsl:text>
             <xsl:text>&#x2261;</xsl:text>
         </fo:block>
@@ -4286,7 +4266,9 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
         <xsl:apply-templates select="$target" mode="unique-id"/>
     </xsl:variable>
     <fo:block start-indent="2em">
-        <xsl:call-template name="langle-character"/>
+        <xsl:call-template name="character">
+            <xsl:with-param name="name" select="'langle'"/>
+        </xsl:call-template>
         <xsl:apply-templates select="$target" mode="title-full"/>
         <xsl:text> </xsl:text>
         <fo:inline font-size="70%">
@@ -4298,7 +4280,9 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
             </fo:basic-link>
             <xsl:text>]</xsl:text>
         </fo:inline>
-        <xsl:call-template name="rangle-character"/>
+        <xsl:call-template name="character">
+            <xsl:with-param name="name" select="'rangle'"/>
+        </xsl:call-template>
     </fo:block>
 </xsl:template>