From 34c18587ed491921b48ce1cb5c9ef1f40e607602 Mon Sep 17 00:00:00 2001
From: matsuand <30614168+matsuand@users.noreply.github.com>
Date: Sun, 8 Aug 2021 15:31:55 +0900
Subject: [PATCH] info: GNU_which: Add sources which aim to make a general case
 for building Info-derived documents.

---
 info/GNU_which/Makefile                            |    17 +
 info/GNU_which/draft/html/Fan-riZhi-.html          |    62 +
 info/GNU_which/draft/html/Guan-Lian-Xiang-Mu-.html |    60 +
 info/GNU_which/draft/html/Li.html                  |    88 +
 info/GNU_which/draft/html/bagu.html                |    63 +
 info/GNU_which/draft/html/index.html               |    87 +
 info/GNU_which/draft/html/opusiyonnoGai-Yao-.html  |   137 +
 info/GNU_which/draft/html/sakuin.html              |   157 +
 info/GNU_which/draft/html/which-noQi-Dong-.html    |    67 +
 info/GNU_which/draft/html/which-puroguramu.html    |    64 +
 info/GNU_which/draft/info/which.info               |   Bin 0 -> 9502 bytes
 info/GNU_which/draft/pdf/which.pdf                 |   Bin 0 -> 107533 bytes
 info/GNU_which/draft/texi/version.texi             |     4 +
 info/GNU_which/draft/texi/which.texi               |   278 +
 info/GNU_which/draft/text/which.txt                |   182 +
 info/GNU_which/original/texi/version.texi          |     4 +
 info/GNU_which/original/texi/which.texi            |   287 +
 info/GNU_which/po4a/texi/adddocumentlanguage.txt   |     3 +
 info/GNU_which/po4a/texi/ja.po                     |   694 ++
 info/GNU_which/po4a/texi/which-texi.cfg            |     6 +
 info/GNU_which/po4a/texi/which-texi.pot            |   633 +
 info/build-aux/po4a-texi.mk                        |    98 +
 info/build-aux/texi2pod.pl                         |   453 +
 info/build-aux/texinfo-ja.tex                      |    84 +
 info/build-aux/texinfo-modified.tex                | 11619 +++++++++++++++++++
 info/build-aux/texinfo.tex                         | 11612 ++++++++++++++++++
 info/build-aux/txi-ja.tex                          |   486 +
 27 files changed, 27245 insertions(+)
 create mode 100644 info/GNU_which/Makefile
 create mode 100644 info/GNU_which/draft/html/Fan-riZhi-.html
 create mode 100644 info/GNU_which/draft/html/Guan-Lian-Xiang-Mu-.html
 create mode 100644 info/GNU_which/draft/html/Li.html
 create mode 100644 info/GNU_which/draft/html/bagu.html
 create mode 100644 info/GNU_which/draft/html/index.html
 create mode 100644 info/GNU_which/draft/html/opusiyonnoGai-Yao-.html
 create mode 100644 info/GNU_which/draft/html/sakuin.html
 create mode 100644 info/GNU_which/draft/html/which-noQi-Dong-.html
 create mode 100644 info/GNU_which/draft/html/which-puroguramu.html
 create mode 100644 info/GNU_which/draft/info/which.info
 create mode 100644 info/GNU_which/draft/pdf/which.pdf
 create mode 100644 info/GNU_which/draft/texi/version.texi
 create mode 100644 info/GNU_which/draft/texi/which.texi
 create mode 100644 info/GNU_which/draft/text/which.txt
 create mode 100644 info/GNU_which/original/texi/version.texi
 create mode 100644 info/GNU_which/original/texi/which.texi
 create mode 100644 info/GNU_which/po4a/texi/adddocumentlanguage.txt
 create mode 100644 info/GNU_which/po4a/texi/ja.po
 create mode 100644 info/GNU_which/po4a/texi/which-texi.cfg
 create mode 100644 info/GNU_which/po4a/texi/which-texi.pot
 create mode 100644 info/build-aux/po4a-texi.mk
 create mode 100755 info/build-aux/texi2pod.pl
 create mode 100644 info/build-aux/texinfo-ja.tex
 create mode 100644 info/build-aux/texinfo-modified.tex
 create mode 100644 info/build-aux/texinfo.tex
 create mode 100644 info/build-aux/txi-ja.tex

diff --git a/info/GNU_which/Makefile b/info/GNU_which/Makefile
new file mode 100644
index 00000000..4fef25a3
--- /dev/null
+++ b/info/GNU_which/Makefile
@@ -0,0 +1,17 @@
+PACKAGE_NAME      = which
+FULL_PACKAGE_NAME = GNU which
+PACKAGE_VERSION   = 2.21
+
+texi_source_main  = \
+	$(PACKAGE_NAME).texi
+texi_source_others = \
+	version.texi
+
+THRESH = 0
+EXTFLAGS =
+LANGS = ja
+PO4ACFG = po4a/texi/$(PACKAGE_NAME)-texi.cfg
+PO4AFLAGS += -M UTF-8 -k $(THRESH) $(EXTFLAGS)
+WORK_DIR = .
+
+include ../build-aux/po4a-texi.mk
diff --git a/info/GNU_which/draft/html/Fan-riZhi-.html b/info/GNU_which/draft/html/Fan-riZhi-.html
new file mode 100644
index 00000000..65738f0c
--- /dev/null
+++ b/info/GNU_which/draft/html/Fan-riZhi-.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
+<html>
+<!-- Created by GNU Texinfo 6.8, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>返り値 (which: コマンドのフルパス表示)</title>
+
+<meta name="description" content="返り値 (which: コマンドのフルパス表示)">
+<meta name="keywords" content="返り値 (which: コマンドのフルパス表示)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="sakuin.html" rel="index" title="さくいん">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Li.html" rel="next" title="例">
+<link href="opusiyonnoGai-Yao-.html" rel="prev" title="オプションの概要">
+<style type="text/css">
+<!--
+a.copiable-anchor {visibility: hidden; text-decoration: none; line-height: 0em}
+a.summary-letter {text-decoration: none}
+blockquote.indentedblock {margin-right: 0em}
+div.display {margin-left: 3.2em}
+div.example {margin-left: 3.2em}
+kbd {font-style: oblique}
+pre.display {font-family: inherit}
+pre.format {font-family: inherit}
+pre.menu-comment {font-family: serif}
+pre.menu-preformatted {font-family: serif}
+span.nolinebreak {white-space: nowrap}
+span.roman {font-family: initial; font-weight: normal}
+span.sansserif {font-family: sans-serif; font-weight: normal}
+span:hover a.copiable-anchor {visibility: visible}
+ul.no-bullet {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="ja">
+<div class="chapter" id="g_t_8fd4_308a_5024">
+<div class="header">
+<p>
+Next: <a href="Li.html" accesskey="n" rel="next">例</a>, Previous: <a href="opusiyonnoGai-Yao-.html" accesskey="p" rel="prev">オプションの概要</a>, Up: <a href="index.html" accesskey="u" rel="up"><code>which</code>: コマンドのフルパス表示</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="sakuin.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<span id="Fan-riZhi-"></span><h2 class="chapter">4 返り値</h2>
+<span id="index-Return-value-of-which"></span>
+
+<p><code>which</code> は、処理に失敗した引数の数を返します。また <samp>programname</samp> が指定されなかった場合は -1
+を返します。
+</p>
+</div>
+
+
+
+</body>
+</html>
diff --git a/info/GNU_which/draft/html/Guan-Lian-Xiang-Mu-.html b/info/GNU_which/draft/html/Guan-Lian-Xiang-Mu-.html
new file mode 100644
index 00000000..e0655435
--- /dev/null
+++ b/info/GNU_which/draft/html/Guan-Lian-Xiang-Mu-.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
+<html>
+<!-- Created by GNU Texinfo 6.8, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>関連項目 (which: コマンドのフルパス表示)</title>
+
+<meta name="description" content="関連項目 (which: コマンドのフルパス表示)">
+<meta name="keywords" content="関連項目 (which: コマンドのフルパス表示)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="sakuin.html" rel="index" title="さくいん">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="sakuin.html" rel="next" title="さくいん">
+<link href="bagu.html" rel="prev" title="バグ">
+<style type="text/css">
+<!--
+a.copiable-anchor {visibility: hidden; text-decoration: none; line-height: 0em}
+a.summary-letter {text-decoration: none}
+blockquote.indentedblock {margin-right: 0em}
+div.display {margin-left: 3.2em}
+div.example {margin-left: 3.2em}
+kbd {font-style: oblique}
+pre.display {font-family: inherit}
+pre.format {font-family: inherit}
+pre.menu-comment {font-family: serif}
+pre.menu-preformatted {font-family: serif}
+span.nolinebreak {white-space: nowrap}
+span.roman {font-family: initial; font-weight: normal}
+span.sansserif {font-family: sans-serif; font-weight: normal}
+span:hover a.copiable-anchor {visibility: visible}
+ul.no-bullet {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="ja">
+<div class="chapter" id="g_t_95a2_9023_9805_76ee">
+<div class="header">
+<p>
+Next: <a href="sakuin.html" accesskey="n" rel="next">さくいん</a>, Previous: <a href="bagu.html" accesskey="p" rel="prev">バグ</a>, Up: <a href="index.html" accesskey="u" rel="up"><code>which</code>: コマンドのフルパス表示</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="sakuin.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<span id="Guan-Lian-Xiang-Mu-"></span><h2 class="chapter">7 関連項目</h2>
+
+<p><code>bash(1)</code>
+</p>
+</div>
+
+
+
+</body>
+</html>
diff --git a/info/GNU_which/draft/html/Li.html b/info/GNU_which/draft/html/Li.html
new file mode 100644
index 00000000..d568c63e
--- /dev/null
+++ b/info/GNU_which/draft/html/Li.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
+<html>
+<!-- Created by GNU Texinfo 6.8, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>例 (which: コマンドのフルパス表示)</title>
+
+<meta name="description" content="例 (which: コマンドのフルパス表示)">
+<meta name="keywords" content="例 (which: コマンドのフルパス表示)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="sakuin.html" rel="index" title="さくいん">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="bagu.html" rel="next" title="バグ">
+<link href="Fan-riZhi-.html" rel="prev" title="返り値">
+<style type="text/css">
+<!--
+a.copiable-anchor {visibility: hidden; text-decoration: none; line-height: 0em}
+a.summary-letter {text-decoration: none}
+blockquote.indentedblock {margin-right: 0em}
+div.display {margin-left: 3.2em}
+div.example {margin-left: 3.2em}
+kbd {font-style: oblique}
+pre.display {font-family: inherit}
+pre.format {font-family: inherit}
+pre.menu-comment {font-family: serif}
+pre.menu-preformatted {font-family: serif}
+span.nolinebreak {white-space: nowrap}
+span.roman {font-family: initial; font-weight: normal}
+span.sansserif {font-family: sans-serif; font-weight: normal}
+span:hover a.copiable-anchor {visibility: visible}
+ul.no-bullet {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="ja">
+<div class="chapter" id="g_t_4f8b">
+<div class="header">
+<p>
+Next: <a href="bagu.html" accesskey="n" rel="next">バグ</a>, Previous: <a href="Fan-riZhi-.html" accesskey="p" rel="prev">返り値</a>, Up: <a href="index.html" accesskey="u" rel="up"><code>which</code>: コマンドのフルパス表示</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="sakuin.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<span id="Li"></span><h2 class="chapter">5 例</h2>
+<span id="index-Examples"></span>
+<span id="index-aliases_002c-handling-of"></span>
+
+<p>本ユーティリティーを利用するには、<code>which</code> に対して、エイリアスを追加する (C シェルの場合) 、あるいはシェル関数を追加する
+(Bourne シェル) 方法が推奨されます。たとえば以下のようにします。
+</p>
+<p>[ba]sh:
+</p>
+<div class="example">
+<pre class="example">which ()
+{
+  (alias; declare -f) | /usr/bin/which --tty-only --read-alias --read-functions --show-tilde --show-dot $@
+}
+export -f which
+</pre></div>
+
+<p>[t]csh:
+</p>
+<div class="example">
+<pre class="example">alias which 'alias | /usr/bin/which --tty-only --read-alias --show-dot --show-tilde'
+</pre></div>
+
+<p>この方法にすると、端末から起動した際には、わかりやすく ~/ や ./ を表示します。一方でスクリプトから実行した際には、フルパスを表示します。
+</p>
+<div class="example">
+<pre class="example">&gt; which q2
+~/bin/q2
+&gt; echo `which q2`
+/home/carlo/bin/q2
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
diff --git a/info/GNU_which/draft/html/bagu.html b/info/GNU_which/draft/html/bagu.html
new file mode 100644
index 00000000..5bf321e8
--- /dev/null
+++ b/info/GNU_which/draft/html/bagu.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
+<html>
+<!-- Created by GNU Texinfo 6.8, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>バグ (which: コマンドのフルパス表示)</title>
+
+<meta name="description" content="バグ (which: コマンドのフルパス表示)">
+<meta name="keywords" content="バグ (which: コマンドのフルパス表示)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="sakuin.html" rel="index" title="さくいん">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Guan-Lian-Xiang-Mu-.html" rel="next" title="関連項目">
+<link href="Li.html" rel="prev" title="例">
+<style type="text/css">
+<!--
+a.copiable-anchor {visibility: hidden; text-decoration: none; line-height: 0em}
+a.summary-letter {text-decoration: none}
+blockquote.indentedblock {margin-right: 0em}
+div.display {margin-left: 3.2em}
+div.example {margin-left: 3.2em}
+kbd {font-style: oblique}
+pre.display {font-family: inherit}
+pre.format {font-family: inherit}
+pre.menu-comment {font-family: serif}
+pre.menu-preformatted {font-family: serif}
+span.nolinebreak {white-space: nowrap}
+span.roman {font-family: initial; font-weight: normal}
+span.sansserif {font-family: sans-serif; font-weight: normal}
+span:hover a.copiable-anchor {visibility: visible}
+ul.no-bullet {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="ja">
+<div class="chapter" id="g_t_30d0_30b0">
+<div class="header">
+<p>
+Next: <a href="Guan-Lian-Xiang-Mu-.html" accesskey="n" rel="next">関連項目</a>, Previous: <a href="Li.html" accesskey="p" rel="prev">例</a>, Up: <a href="index.html" accesskey="u" rel="up"><code>which</code>: コマンドのフルパス表示</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="sakuin.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<span id="bagu"></span><h2 class="chapter">6 バグ</h2>
+<span id="index-Bugs_002c-known"></span>
+
+<p><code>HOME</code> ディレクトリは、環境変数 <code>HOME</code>
+を調べることで決定されますが、この変数が存在しない場合には、その処理がキャンセルされます。<code>which</code> は 2
+つの同等のディレクトリであっても、その 1 つにシンボリックリンクを使ったパスが含まれている場合に、別のディレクトリと取り扱ってしまいます。
+</p>
+</div>
+
+
+
+</body>
+</html>
diff --git a/info/GNU_which/draft/html/index.html b/info/GNU_which/draft/html/index.html
new file mode 100644
index 00000000..de70666a
--- /dev/null
+++ b/info/GNU_which/draft/html/index.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
+<html>
+<!-- Created by GNU Texinfo 6.8, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Top (which: コマンドのフルパス表示)</title>
+
+<meta name="description" content="Top (which: コマンドのフルパス表示)">
+<meta name="keywords" content="Top (which: コマンドのフルパス表示)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="#Top" rel="start" title="Top">
+<link href="sakuin.html" rel="index" title="さくいん">
+<link href="#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="../dir/index.html" rel="up" title="(dir)">
+<link href="which-puroguramu.html" rel="next" title="which プログラム">
+<link href="../dir/index.html" rel="prev" title="(dir)">
+<style type="text/css">
+<!--
+a.copiable-anchor {visibility: hidden; text-decoration: none; line-height: 0em}
+a.summary-letter {text-decoration: none}
+blockquote.indentedblock {margin-right: 0em}
+div.display {margin-left: 3.2em}
+div.example {margin-left: 3.2em}
+kbd {font-style: oblique}
+pre.display {font-family: inherit}
+pre.format {font-family: inherit}
+pre.menu-comment {font-family: serif}
+pre.menu-preformatted {font-family: serif}
+span.nolinebreak {white-space: nowrap}
+span.roman {font-family: initial; font-weight: normal}
+span.sansserif {font-family: sans-serif; font-weight: normal}
+span:hover a.copiable-anchor {visibility: visible}
+ul.no-bullet {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="ja">
+<h1 class="settitle" align="center"><code>which</code>: コマンドのフルパス表示</h1>
+
+
+
+
+<div class="top" id="Top">
+<div class="header">
+<p>
+Next: <a href="which-puroguramu.html" accesskey="n" rel="next"><code>which</code> プログラム</a>, Previous: <a href="../dir/index.html" accesskey="p" rel="prev">(dir)</a>, Up: <a href="../dir/index.html" accesskey="u" rel="up">(dir)</a> &nbsp; [<a href="#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="sakuin.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<span id="which_003a-komandonohurupasuBiao-Shi"></span><h1 class="top"><code>which</code>: コマンドのフルパス表示</h1>
+
+
+
+<div class="Contents_element" id="SEC_Contents">
+<h2 class="contents-heading">Table of Contents</h2>
+
+<div class="contents">
+
+<ul class="no-bullet">
+  <li><a id="toc-which-puroguramu" href="which-puroguramu.html">1 <code>which</code> プログラム</a></li>
+  <li><a id="toc-which-noShi-Xing-" href="which-noQi-Dong-.html">2 <code>which</code> の実行</a></li>
+  <li><a id="toc-opusiyonnoGai-Yao-" href="opusiyonnoGai-Yao-.html">3 オプションの概要</a></li>
+  <li><a id="toc-Fan-riZhi-" href="Fan-riZhi-.html">4 返り値</a></li>
+  <li><a id="toc-Li" href="Li.html">5 例</a></li>
+  <li><a id="toc-bagu" href="bagu.html">6 バグ</a></li>
+  <li><a id="toc-Guan-Lian-Xiang-Mu-" href="Guan-Lian-Xiang-Mu-.html">7 関連項目</a></li>
+  <li><a id="toc-sakuin" href="sakuin.html" rel="index">さくいん</a></li>
+</ul>
+</div>
+</div>
+</div>
+<hr>
+<div class="header">
+<p>
+Next: <a href="which-puroguramu.html" accesskey="n" rel="next"><code>which</code> プログラム</a>, Previous: <a href="../dir/index.html" accesskey="p" rel="prev">(dir)</a>, Up: <a href="../dir/index.html" accesskey="u" rel="up">(dir)</a> &nbsp; [<a href="#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="sakuin.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
diff --git a/info/GNU_which/draft/html/opusiyonnoGai-Yao-.html b/info/GNU_which/draft/html/opusiyonnoGai-Yao-.html
new file mode 100644
index 00000000..2f7c04a8
--- /dev/null
+++ b/info/GNU_which/draft/html/opusiyonnoGai-Yao-.html
@@ -0,0 +1,137 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
+<html>
+<!-- Created by GNU Texinfo 6.8, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>オプションの概要 (which: コマンドのフルパス表示)</title>
+
+<meta name="description" content="オプションの概要 (which: コマンドのフルパス表示)">
+<meta name="keywords" content="オプションの概要 (which: コマンドのフルパス表示)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="sakuin.html" rel="index" title="さくいん">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Fan-riZhi-.html" rel="next" title="返り値">
+<link href="which-noQi-Dong-.html" rel="prev" title="which の起動">
+<style type="text/css">
+<!--
+a.copiable-anchor {visibility: hidden; text-decoration: none; line-height: 0em}
+a.summary-letter {text-decoration: none}
+blockquote.indentedblock {margin-right: 0em}
+div.display {margin-left: 3.2em}
+div.example {margin-left: 3.2em}
+kbd {font-style: oblique}
+pre.display {font-family: inherit}
+pre.format {font-family: inherit}
+pre.menu-comment {font-family: serif}
+pre.menu-preformatted {font-family: serif}
+span.nolinebreak {white-space: nowrap}
+span.roman {font-family: initial; font-weight: normal}
+span.sansserif {font-family: sans-serif; font-weight: normal}
+span:hover a.copiable-anchor {visibility: visible}
+ul.no-bullet {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="ja">
+<div class="chapter" id="g_t_30aa_30d7_30b7_30e7_30f3_306e_6982_8981">
+<div class="header">
+<p>
+Next: <a href="Fan-riZhi-.html" accesskey="n" rel="next">返り値</a>, Previous: <a href="which-noQi-Dong-.html" accesskey="p" rel="prev"><code>which</code> の実行</a>, Up: <a href="index.html" accesskey="u" rel="up"><code>which</code>: コマンドのフルパス表示</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="sakuin.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<span id="opusiyonnoGai-Yao-"></span><h2 class="chapter">3 オプションの概要</h2>
+<span id="index-Options_002c-command-line"></span>
+<span id="index-Command-line-Options"></span>
+<span id="index-Overview-of-command-line-options"></span>
+
+<dl compact="compact">
+<dd><span id="index-_002d_002dall"></span>
+<span id="index-_002da"></span>
+</dd>
+<dt><span>&lsquo;<samp>--all</samp>&rsquo;</span></dt>
+<dt><span>&lsquo;<samp>-a</samp>&rsquo;</span></dt>
+<dd><p><code>PATH</code> において見つかった実行ファイルをすべて表示します。最初に見つかった一つだけではありません。
+</p>
+<span id="index-_002d_002dread_002dalias"></span>
+<span id="index-_002di"></span>
+</dd>
+<dt><span>&lsquo;<samp>--read-alias</samp>&rsquo;</span></dt>
+<dt><span>&lsquo;<samp>-i</samp>&rsquo;</span></dt>
+<dd><p>標準入力からエイリアスを読み込んで、合致したものを標準出力します。 これは which そのものを含む alias
+において、本オプションを合わせて利用すると便利です。 たとえば以下です。<br> <code>alias which='alias | which -i'</code>
+</p>
+<span id="index-_002d_002dskip_002dalias"></span>
+</dd>
+<dt><span>&lsquo;<samp>--skip-alias</samp>&rsquo;</span></dt>
+<dd><p><samp>--read-alias</samp> が指定されても無視します。which に対するエイリアスや関数の中で
+<samp>--read-alias</samp> オプションを利用している場合であっても、明示的に通常の実行ファイルを検索する場合に利用できます。
+</p>
+<span id="index-_002d_002dread_002dfunctions"></span>
+</dd>
+<dt><span>&lsquo;<samp>--read-functions</samp>&rsquo;</span></dt>
+<dd><p>標準入力からシェル関数定義を読み込んで、合致したものを標準出力します。これは which
+そのものを含むシェル関数において、本オプションを合わせて利用すると便利です。たとえば以下です。<br> <code>which() { declare
+-f | which --read-functions $@ }<br>export -f which</code>
+</p>
+<span id="index-_002d_002dskip_002dfunctions"></span>
+</dd>
+<dt><span>&lsquo;<samp>--skip-functions</samp>&rsquo;</span></dt>
+<dd><p><samp>--read-functions</samp> が指定されても無視します。which に対するエイリアスや関数の中で
+<samp>--read-functions</samp> オプションを利用している場合であっても、明示的に通常の実行ファイルを検索する場合に利用できます。
+</p>
+<span id="index-_002d_002dskip_002ddot"></span>
+</dd>
+<dt><span>&lsquo;<samp>--skip-dot</samp>&rsquo;</span></dt>
+<dd><p><code>PATH</code> 内のディレクトリにうち、ドットで始まるディレクトリは除外します。
+</p>
+<span id="index-_002d_002dskip_002dtilde"></span>
+</dd>
+<dt><span>&lsquo;<samp>--skip-tilde</samp>&rsquo;</span></dt>
+<dd><p>チルダで始まる <code>PATH</code> 内のディレクトリ、および <code>HOME</code> ディレクトリ内に存在する実行ファイルは除外します。
+</p>
+<span id="index-_002d_002dshow_002ddot"></span>
+</dd>
+<dt><span>&lsquo;<samp>--show-dot</samp>&rsquo;</span></dt>
+<dd><p><code>PATH</code> 内にドットで始まるディレクトリがあって、合致した実行ファイルがその中に見つかった場合には、フルパスでなく
+&quot;./programname&quot; と表示します。
+</p>
+<span id="index-_002d_002dshow_002dtilde"></span>
+</dd>
+<dt><span>&lsquo;<samp>--show-tilde</samp>&rsquo;</span></dt>
+<dd><p>ディレクトリが <code>HOME</code> に合致した場合、チルダを表示します。 このオプションは root ユーザーが実行した際には無視されます。 
+</p>
+<span id="index-_002d_002dtty_002donly"></span>
+</dd>
+<dt><span>&lsquo;<samp>--tty-only</samp>&rsquo;</span></dt>
+<dd><p>tty 上でない場合、この右側に指定されたオプションの実行を停止します。
+</p>
+<span id="index-_002d_002dversion"></span>
+<span id="index-_002dv"></span>
+<span id="index-_002dV"></span>
+</dd>
+<dt><span>&lsquo;<samp>--version, -v, -V</samp>&rsquo;</span></dt>
+<dd><p>バージョン情報を標準出力して正常終了します。
+</p>
+<span id="index-_002d_002dhelp"></span>
+</dd>
+<dt><span>&lsquo;<samp>--help</samp>&rsquo;</span></dt>
+<dd><p>利用方法を標準出力して正常終了します。
+</p>
+</dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
diff --git a/info/GNU_which/draft/html/sakuin.html b/info/GNU_which/draft/html/sakuin.html
new file mode 100644
index 00000000..f39b2d35
--- /dev/null
+++ b/info/GNU_which/draft/html/sakuin.html
@@ -0,0 +1,157 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
+<html>
+<!-- Created by GNU Texinfo 6.8, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>さくいん (which: コマンドのフルパス表示)</title>
+
+<meta name="description" content="さくいん (which: コマンドのフルパス表示)">
+<meta name="keywords" content="さくいん (which: コマンドのフルパス表示)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="#g_t_3055_304f_3044_3093" rel="index" title="さくいん">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Guan-Lian-Xiang-Mu-.html" rel="prev" title="関連項目">
+<style type="text/css">
+<!--
+a.copiable-anchor {visibility: hidden; text-decoration: none; line-height: 0em}
+a.summary-letter {text-decoration: none}
+blockquote.indentedblock {margin-right: 0em}
+div.display {margin-left: 3.2em}
+div.example {margin-left: 3.2em}
+kbd {font-style: oblique}
+pre.display {font-family: inherit}
+pre.format {font-family: inherit}
+pre.menu-comment {font-family: serif}
+pre.menu-preformatted {font-family: serif}
+span.nolinebreak {white-space: nowrap}
+span.roman {font-family: initial; font-weight: normal}
+span.sansserif {font-family: sans-serif; font-weight: normal}
+span:hover a.copiable-anchor {visibility: visible}
+ul.no-bullet {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="ja">
+<div class="unnumbered" id="g_t_3055_304f_3044_3093">
+<div class="header">
+<p>
+Previous: <a href="Guan-Lian-Xiang-Mu-.html" accesskey="p" rel="prev">関連項目</a>, Up: <a href="index.html" accesskey="u" rel="up"><code>which</code>: コマンドのフルパス表示</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="#g_t_3055_304f_3044_3093" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<span id="sakuin"></span><h2 class="unnumbered">さくいん</h2>
+
+<table><tr><th valign="top">Jump to: &nbsp; </th><td><a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_symbol-1"><b>-</b></a>
+ &nbsp; 
+<br>
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-A"><b>A</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-B"><b>B</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-C"><b>C</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-D"><b>D</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-E"><b>E</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-O"><b>O</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-R"><b>R</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-S"><b>S</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-W"><b>W</b></a>
+ &nbsp; 
+</td></tr></table>
+<table class="index-cp" border="0">
+<tr><td></td><th align="left">Index Entry</th><td>&nbsp;</td><th align="left"> Section</th></tr>
+<tr><td colspan="4"> <hr></td></tr>
+<tr><th id="g_t_3055_304f_3044_3093_cp_symbol-1">-</th><td></td><td></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dall"><samp>--all</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dhelp"><samp>--help</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dread_002dalias"><samp>--read-alias</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dread_002dfunctions"><samp>--read-functions</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dshow_002ddot"><samp>--show-dot</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dshow_002dtilde"><samp>--show-tilde</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dskip_002dalias"><samp>--skip-alias</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dskip_002ddot"><samp>--skip-dot</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dskip_002dfunctions"><samp>--skip-functions</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dskip_002dtilde"><samp>--skip-tilde</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dtty_002donly"><samp>--tty-only</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002d_002dversion"><samp>--version</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002da"><samp>-a</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002di"><samp>-i</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002dv"><samp>-v</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-_002dV"><samp>-V</samp></a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td colspan="4"> <hr></td></tr>
+<tr><th id="g_t_3055_304f_3044_3093_cp_letter-A">A</th><td></td><td></td></tr>
+<tr><td></td><td valign="top"><a href="Li.html#index-aliases_002c-handling-of">aliases, handling of</a>:</td><td>&nbsp;</td><td valign="top"><a href="Li.html">例</a></td></tr>
+<tr><td colspan="4"> <hr></td></tr>
+<tr><th id="g_t_3055_304f_3044_3093_cp_letter-B">B</th><td></td><td></td></tr>
+<tr><td></td><td valign="top"><a href="bagu.html#index-Bugs_002c-known">Bugs, known</a>:</td><td>&nbsp;</td><td valign="top"><a href="bagu.html">バグ</a></td></tr>
+<tr><td colspan="4"> <hr></td></tr>
+<tr><th id="g_t_3055_304f_3044_3093_cp_letter-C">C</th><td></td><td></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-Command-line-Options">Command line Options</a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td colspan="4"> <hr></td></tr>
+<tr><th id="g_t_3055_304f_3044_3093_cp_letter-D">D</th><td></td><td></td></tr>
+<tr><td></td><td valign="top"><a href="which-puroguramu.html#index-Description-of-which">Description of <code>which</code></a>:</td><td>&nbsp;</td><td valign="top"><a href="which-puroguramu.html">which プログラム</a></td></tr>
+<tr><td colspan="4"> <hr></td></tr>
+<tr><th id="g_t_3055_304f_3044_3093_cp_letter-E">E</th><td></td><td></td></tr>
+<tr><td></td><td valign="top"><a href="Li.html#index-Examples">Examples</a>:</td><td>&nbsp;</td><td valign="top"><a href="Li.html">例</a></td></tr>
+<tr><td colspan="4"> <hr></td></tr>
+<tr><th id="g_t_3055_304f_3044_3093_cp_letter-O">O</th><td></td><td></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-Options_002c-command-line">Options, command line</a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td></td><td valign="top"><a href="opusiyonnoGai-Yao-.html#index-Overview-of-command-line-options">Overview of command line options</a>:</td><td>&nbsp;</td><td valign="top"><a href="opusiyonnoGai-Yao-.html">オプションの概要</a></td></tr>
+<tr><td colspan="4"> <hr></td></tr>
+<tr><th id="g_t_3055_304f_3044_3093_cp_letter-R">R</th><td></td><td></td></tr>
+<tr><td></td><td valign="top"><a href="Fan-riZhi-.html#index-Return-value-of-which">Return value of <code>which</code></a>:</td><td>&nbsp;</td><td valign="top"><a href="Fan-riZhi-.html">返り値</a></td></tr>
+<tr><td colspan="4"> <hr></td></tr>
+<tr><th id="g_t_3055_304f_3044_3093_cp_letter-S">S</th><td></td><td></td></tr>
+<tr><td></td><td valign="top"><a href="which-noQi-Dong-.html#index-Synopsis">Synopsis</a>:</td><td>&nbsp;</td><td valign="top"><a href="which-noQi-Dong-.html">which の起動</a></td></tr>
+<tr><td colspan="4"> <hr></td></tr>
+<tr><th id="g_t_3055_304f_3044_3093_cp_letter-W">W</th><td></td><td></td></tr>
+<tr><td></td><td valign="top"><a href="which-noQi-Dong-.html#index-which-noShi-Xing-"><code>which</code> の実行</a>:</td><td>&nbsp;</td><td valign="top"><a href="which-noQi-Dong-.html">which の起動</a></td></tr>
+<tr><td colspan="4"> <hr></td></tr>
+</table>
+<table><tr><th valign="top">Jump to: &nbsp; </th><td><a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_symbol-1"><b>-</b></a>
+ &nbsp; 
+<br>
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-A"><b>A</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-B"><b>B</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-C"><b>C</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-D"><b>D</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-E"><b>E</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-O"><b>O</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-R"><b>R</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-S"><b>S</b></a>
+ &nbsp; 
+<a class="summary-letter" href="#g_t_3055_304f_3044_3093_cp_letter-W"><b>W</b></a>
+ &nbsp; 
+</td></tr></table>
+
+</div>
+<hr>
+<div class="header">
+<p>
+Previous: <a href="Guan-Lian-Xiang-Mu-.html">関連項目</a>, Up: <a href="index.html"><code>which</code>: コマンドのフルパス表示</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="#g_t_3055_304f_3044_3093" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
diff --git a/info/GNU_which/draft/html/which-noQi-Dong-.html b/info/GNU_which/draft/html/which-noQi-Dong-.html
new file mode 100644
index 00000000..1595c37e
--- /dev/null
+++ b/info/GNU_which/draft/html/which-noQi-Dong-.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
+<html>
+<!-- Created by GNU Texinfo 6.8, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>which の起動 (which: コマンドのフルパス表示)</title>
+
+<meta name="description" content="which の起動 (which: コマンドのフルパス表示)">
+<meta name="keywords" content="which の起動 (which: コマンドのフルパス表示)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="sakuin.html" rel="index" title="さくいん">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="opusiyonnoGai-Yao-.html" rel="next" title="オプションの概要">
+<link href="which-puroguramu.html" rel="prev" title="which プログラム">
+<style type="text/css">
+<!--
+a.copiable-anchor {visibility: hidden; text-decoration: none; line-height: 0em}
+a.summary-letter {text-decoration: none}
+blockquote.indentedblock {margin-right: 0em}
+div.display {margin-left: 3.2em}
+div.example {margin-left: 3.2em}
+kbd {font-style: oblique}
+pre.display {font-family: inherit}
+pre.format {font-family: inherit}
+pre.menu-comment {font-family: serif}
+pre.menu-preformatted {font-family: serif}
+span.nolinebreak {white-space: nowrap}
+span.roman {font-family: initial; font-weight: normal}
+span.sansserif {font-family: sans-serif; font-weight: normal}
+span:hover a.copiable-anchor {visibility: visible}
+ul.no-bullet {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="ja">
+<div class="chapter" id="which-_306e_8d77_52d5">
+<div class="header">
+<p>
+Next: <a href="opusiyonnoGai-Yao-.html" accesskey="n" rel="next">オプションの概要</a>, Previous: <a href="which-puroguramu.html" accesskey="p" rel="prev"><code>which</code> プログラム</a>, Up: <a href="index.html" accesskey="u" rel="up"><code>which</code>: コマンドのフルパス表示</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="sakuin.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<span id="which-noShi-Xing-"></span><h2 class="chapter">2 <code>which</code> の実行</h2>
+<span id="index-which-noShi-Xing-"></span>
+<span id="index-Synopsis"></span>
+
+<p><code>which</code> の実行書式は以下のとおりです。
+</p>
+<div class="example">
+<pre class="example">which [options] [--] programname [...]
+</pre></div>
+
+
+</div>
+
+
+
+</body>
+</html>
diff --git a/info/GNU_which/draft/html/which-puroguramu.html b/info/GNU_which/draft/html/which-puroguramu.html
new file mode 100644
index 00000000..24ab1736
--- /dev/null
+++ b/info/GNU_which/draft/html/which-puroguramu.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
+<html>
+<!-- Created by GNU Texinfo 6.8, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>which プログラム (which: コマンドのフルパス表示)</title>
+
+<meta name="description" content="which プログラム (which: コマンドのフルパス表示)">
+<meta name="keywords" content="which プログラム (which: コマンドのフルパス表示)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="sakuin.html" rel="index" title="さくいん">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="which-noQi-Dong-.html" rel="next" title="which の起動">
+<link href="index.html" rel="prev" title="Top">
+<style type="text/css">
+<!--
+a.copiable-anchor {visibility: hidden; text-decoration: none; line-height: 0em}
+a.summary-letter {text-decoration: none}
+blockquote.indentedblock {margin-right: 0em}
+div.display {margin-left: 3.2em}
+div.example {margin-left: 3.2em}
+kbd {font-style: oblique}
+pre.display {font-family: inherit}
+pre.format {font-family: inherit}
+pre.menu-comment {font-family: serif}
+pre.menu-preformatted {font-family: serif}
+span.nolinebreak {white-space: nowrap}
+span.roman {font-family: initial; font-weight: normal}
+span.sansserif {font-family: sans-serif; font-weight: normal}
+span:hover a.copiable-anchor {visibility: visible}
+ul.no-bullet {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="ja">
+<div class="chapter" id="which-_30d7_30ed_30b0_30e9_30e0">
+<div class="header">
+<p>
+Next: <a href="which-noQi-Dong-.html" accesskey="n" rel="next"><code>which</code> の実行</a>, Previous: <a href="index.html" accesskey="p" rel="prev"><code>which</code>: コマンドのフルパス表示</a>, Up: <a href="index.html" accesskey="u" rel="up"><code>which</code>: コマンドのフルパス表示</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="sakuin.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<span id="which-puroguramu"></span><h2 class="chapter">1 <code>which</code> プログラム</h2>
+<span id="index-Description-of-which"></span>
+
+<p><code>which</code> は 1
+つまたは複数の引数を取ります。その引数それぞれに対して、その引数がシェルプロンプトから入力された際に、実行されることになる実行モジュールのフルパスを
+stdout に出力します。 これを実現する際には、環境変数 <code>PATH</code> に列記されたディレクトリ内から実行ファイルやスクリプトを検索します。
+これは <code>bash(1)</code> と同じアルゴリズムを用いています。
+</p>
+</div>
+
+
+
+</body>
+</html>
diff --git a/info/GNU_which/draft/info/which.info b/info/GNU_which/draft/info/which.info
new file mode 100644
index 0000000000000000000000000000000000000000..d74d8514b98311740b6d35f3b1a8f52b0cb6008e
GIT binary patch
literal 9502
zcmcIq`%fEJ7VeML{1d&ZR$GWLVDm`A?p7s0)JR)W5!&u5id16{VN~pKZ9_oaEzFoS
zBw-txlswsz2O$(1NR)I-(ln9wPw6m*{M3J8zjI$6kB#fyW>HK0xcA)i_|A9EJ;UIL
zm1Fqt)QFWBX|~eCb`#5F?c`X(OtPU#mWqF3(x+_P%;qdR%{rS8u;Hwok~{L|gw<>q
zNBR#Rjr1NFh#c$d89Z{dpB<ab<;@g}CsS71%H^~1JT@E02D=9aBYJUP|KPx1jeYDR
zI=qWDa3va>S>VTWA9;muyaIlo^_&f_u;3Ney~0<X`^0lE?%rD6S$=Bt_4kH_8iwaw
zk{jGxp1VxjoK5!g^i_V!&(qhmNwMY$M#9#<D_;H5bFO*rdCzrevvZH$PP>NDV`nC_
z*2$4P`}emj*4o<2BKRlT(F7;q+jw@=W*^yhvWX3hr5XHmWT1!rF+rcd6CbtGw%MGp
zQ*Rps$GRiY)>u1ho#>3UclUJncChHdgZm?`(MYT_V7PvH%sQE7zh`~vM0PThHx66r
zlV&!PwbJ=$C;Jm?i?O~Q*1ew{>SWzLtoIP>>|ouHbhwlL>*!#;y)23^df4H^tTSpD
z@0;0_mE*xg;7?}b={#bcw|T5tJe_1oikLMtmN&^qLx^39CG3o4=9oQf<OwpVczP^8
zN>CZMlC*uqq$ScvX*+KvOfHMB&XkT6Um5YNiOput%#LF>{1qP^m1h7>Z@|n^v#Si1
ztlv)Jqd_~<#8|&Mk(XaHuW-dH-1poEUg2A>a1-CYpEbt;r=*o_#JdkN^0i?EqThv(
z?+Go5t9`Y9%H)OB0N8$cHtV@Rc<w!5@0Vw1Yn-Q{>^WCF=eYviAbENio?uBkF_tpZ
z`P?1=jzyc;SSA^#NXA;(d+}^ygyR#=+{fNC(_>xqf<r&7X;&9vE#R8)g3?B3WB2<X
z{PPQ9i-2g^Mzx@L`APB70ycW?8pQ{0D8LPmkW|GLcX!1h31tpJ>?lbe?X>~2c3*t$
zx##@p<>2wvl$fKH&NZyWuI=aNE7yx%WePYO{>IYotvReGy$ka|RMm~eE4O!+?s9IS
zHCX)e^6i(?cV6B+y>nwDv_*U+NQHgSf8;M^R?|Vwg6CZDoEgu(6xtj7s%B194Qn_{
zRA_X5h)kmFz$?Ru)`mcpR0!c8>>7nR%N)Q<!2j;@nc~6&ILd#vKrh^j{)Nkkphmdo
z{Im2eUb}Oi^9}#K?r$OskP9o`w1Z_}b0x)@(@90hLgrI(z>8VW0dJr6Pv7;=-5}qQ
zxTTlZ@p>InM0DlnV0bDItMrw#2Ev!$7H)g)mf;oddWC1aVuULW%jJ{ySRQt+`)8i=
zgGw2TPcPA_Fmz*S=K{}T_q^1=*@O~17a#by3;yz1_=DK!{qDhcsT7g8*(<xNSGC?=
z;f&|r@e1F0?k3q*So6O)EiL3YrBbLXn+y1$AYvs?H>`Ir7MB-y9^V#>0{>ARQwoYg
zI26x~G(;Q4`K$gs+;!D+Z<F2bW0K@P1)oCF&ew3%3<ZOJYkI1|(h`vY%n8QcE4wu)
z_kyy9X{;QkDr=1}KEvRY*<HM`<v&BZZEpW~cY6ycK#_-W=Qu2NwdeF8R5@;EsCCJm
zV8<ho6IAd}F;nSy%4Elzo10IR@#|jZQDTR_6Es*etwTGYtJtJ7TN7f~eF48~$F+qu
z(DEvLw{IW!UL=B|40I4sBXN4c{ZbBF@*T&<?h3q#<j3zj$UBu#L6BY~6gp1;BvD|4
z)vmZW?azV^)`c8#l$N%=HO+<J^qjAFSGMUnE{_?|cmveQn>5lhk~QN=C~n1bN_9)C
zUR=Fae0o_i1hIwZuJXDAup{+(Pq}vAb6)H|e@0T#0D?K@XLrv$=E^R~#t_*hL{)Hr
zQk)Y3@=Rp{F`eG*&m+aA(epq{<RmyqIuWN87m@PiMH757kBkOv!DTDr1b_Bho|e2@
zbyl~ZzrZKDVTDjIFn~SlIS&-n6}(jx#qnIhKfNX1{7vc`vECx5@yJJVpIDiaN7e3-
zr*Yz3aqf)2aa~c^3e4S^xwX4;IT&Z<55e%F*A9hXMp%f_Dayz879w(w^1kBCN=Hez
z@X|p=^}K)cF?o+#dGz#vCg}w~i$l=y;|8&F9lW;wa{9WzwS_oU#jc`LQd!9aX^SX8
z_&);7SW<O(ES=!|Q4@o*NfZ{tg*(sD4dFuaKO#|KkSJf4q}oW-6;=7XE=0;>6fTu7
zsw1)<Kyqv}G_ucF(oBrf6(KUrG$ci4YlpJmy~F-4R4^wpb~aCoxr7jM^$s0^>fw1c
z2v$yc;<+=*n;R7f4(e3F%SiW{C|2PuVfp`vVxIg-J0EnO>RNb5f(|L%sc=U7!gFpR
z&FJ1<DDdv=o_`O;;W_fB+Lq0i*OvWd$rZ{(arx%);)>+0(WI$W@d^-+X}~nHTgxV%
z_*Dg|sYJ~OEj*(2?;d@x4^q+fhfNWRa6{Mq`&a!%a4Khj${x%qvp_Ulia|&0Q;}Lu
zgb{VR2~C=!vGU4PNm|N@*h1BZgHV=NU05}fp(Wzc3d~oCGS_f9VQ)6K1p1ygktnP3
zhRlmWklup^hl3UNEh<Kt^U(tbDy`Iv5Tv5420p<9p$wn%@Jb*pF5NaaS=P4Etru3P
zp?Cj9znwYhD!N~&`+>8mN|m@b=q8tAFQ1=`*y+(pjXZq7wzp8Ug^OlN%5rV|3y*vU
z9m9HgMMU>dUf6Z1LCQOe#rv{b2X>?-G<xD1$njefi;Uy{549q6PbJH?#QnNhIPKqj
zNX>t^Jy|K<zk}+w^S!(M6scLdw8#TS%+ZXND)>iS;{QuwH7*6gc2!&laM#wYYo%{=
zx2t>D_R<VMH?3TM#rr@5!Pq~uvNI1W*Zt*(#Rb?(k(RembkY1S%4Y;6H}LAcM0gB9
zopXZfYYf%cASYClD|?Gg7QxjQ@T9pzNoLLNUf3?LMSR+zT@iGYw!MQU8Qf~apdL{`
zy6}ZZw?x27yZ{t*^$>*^rJP&>!van!zh77Oz%PFC&)pPEXEgM{G})n0bHr_KWW*NK
zgTobQo;LLoS@g&mB_XWgkUf@7n<Yt&Ou`H9{c_dt?}Av%Qm<OWfDRgzO@S?UGid1e
zQ2a!01XC_fN!(P{&?w%0CjMcpfp@uo2(%ZC=r3Bva@m$4E8QY?MItKQS+L(!Z*=L#
z2RY((PIKxFNFI%eIIntl!ZkdeKanVD8)(FtZp7=>iYr0q2K9MM4ZxL`;W2@SRRnHl
zeY3cTPv{0DCVC=8f};w4-@pQtNyHcTwhQd@7Q}CcHPb(G_KtnX3(1zarQtXt#n3Q9
z3}!^hEN5LpQMH+VMSK~1Ti#7RjS2UD&SR$Dz0J(Th|NA0G5j?4u~^hHVyDa&K8IJ!
zYfYEM*iT=ufn`0|)7dE!SLbCXs*9Kd?xP=0M|<}ZA{m2Ypt2GOx30aQD>9{(7*O3S
zK71OuRdH8i21eO;39jD|!z8L|vONL+fT2`LqEz9PUCi1fF=9rAxfzH9^VT1!hbqs#
za<bTDG4Sd#KWu((=e~FlQ(4W!H!RV1sG%Tkyg%?!-6E%}f|^!A1CYnX?Vn&b4G!>d
z#~}Q`Al#CvT}1z~LL?KocfovrR?J{4^;i{S#^TwB^1df288Fsmy+)Y|1zj?9U`(r#
zpwXhiu)k~;%-NcwLcpRlaI0AvC>Uxatj`K*rB4hl*5?_<Yp)--(n)jTwbxHz$gCd#
z@R1Im_j8)u>(^ejSUj3*!1FAVvCc+Fjzp+&_*IGZ2<$j01eOLkHN@5<Fd7XA)U>^a
z(0T;M+Jr#GxO<2aUad!9dr%;+BQ-?UCGddMP>*bWqrhlTAc{;4aTOy@kdtWPg0N}p
z2x#~!g3{I+5cn#5*d}qPx`5woaz{*PD0}#t@=#gBSA<F*c8JuA*OnxcyB>ium#tSO
zP^KQ9!q)LqkA~9Z4_~oB-g%k1CN_fS-k`OUc)(rd2$cM?ze<os1&Q#`*hz@_ByFEc
zR}rASAWBB1u%M_OJB7#VNycgRsCfKPMP@y26M^kDbBV0Q1;IYiMpY3gS|^X5rIjA1
z2Xj|Q>zjzDGNWd$iUe&YUew_;X<HK>{Ff}Q6kETcN0DOVmU)V-49aBkA&!(?zrX=A
zk82AXkB^R-HC(4JY~jEL!+LBoZD(@UulY?zK|R7LNes%;i^M3S(q}pndZp;|tBIp#
zWH5e`4aSG?M;C_vJBz8#&X{~x6&h2~_Kw!_1xo9wShV$k{Aw?6PsQ5X+T<GTz^M-W
zRgL@*2%73>->=?^)S2pRJD?;7d!nh%gRSlA#6SZzwZ9doykYbqp|p`?@t^Gk{($Af
ac-A7bb6rNlPJ#fs*jRoza)8!%8UF!I?4pbS

literal 0
HcmV?d00001

diff --git a/info/GNU_which/draft/pdf/which.pdf b/info/GNU_which/draft/pdf/which.pdf
new file mode 100644
index 0000000000000000000000000000000000000000..cec45a6a812a6cad2d99b48e1c43f38710d15965
GIT binary patch
literal 107533
zcmce;RZwQVvo|`pySuyVgS-3S?(RIeyA2M5JA=EsySonV?hXT-dG|RN|6O}uymjiU
z@2XdNWu;R|C%;a*dr>HfNieW5a==m?++4oEvak>{6FV4N!}9SlNm$vsm;sq2Y>iyZ
z#LP?_OwE|&%<L^(EQvW;Sp@`Oon3%tMs~0szl&13?9qggN4#^4#~VUc*g9GaM(c?w
z!AXh&G-U#*WACw)_mJsOlxFY2JE0Lezo8PKH#QP~pC>iE>NI>utidG7ty+Jaa<Fjt
zWaD*21Ro^=rF#{jR`hh~-PYodbG#<rpkFY5l9=rXCH{_m$sS!SgxFq~9Zzn=-knP@
zLzGM)zSenf=mPa5>4+%fQ38`wnZwaWe7uVej5*(h!SCCo>-se^1p4NCvPsRv7?m`4
za0+26=(ksa2oG87?%aAO1e#wvzCI3CB*pbB&8$o4E*a1FXAvPd(i2j6$5^iMfi7$?
z!yS6k=(e$G75D<4X{ePzPgKHdXn{@Q;foQfCkolRF4r1qhZE|nN%TeIY_WLGD*4?C
z_8MM(yf%v5{i|q5)-Q~-mQl21F+Vi2B#h;zQ8Q(5gGm$9(~uN-V0sG8O!d&{IGh!(
zAuo+`?@W(a?>q#z>|)UBa|WNf^g*hFi7C-Rr?}hiqWIJnlY#-_V+Np=Rd6S(N^-iS
zViOKTm3^97BHa0sf(A`fdFA|PS!Ku4qd>+`m_{SQ@qrlS>615mR28#llAO45>5VIU
zRJNhl!ZB;iAMT8yoIr-V#V_~JnX&saQ{00~*e@)UgCB9~>~<)N!q?V*%AV6~G@Xe4
zdoqOKL#(60;fW>EE1XN7^4z(cl~Ve774R@79uwo9u^QPGYqgp=S#|kS4g0aFTCQ=A
zOlJE5V*r-!-(^R|dG%Lc0_X1R@H#1jtW<lC2pURwZkp=n2DuE3Lu<e%CU$$?RsnX)
zVApHme(y5TYa^*B*K-sJ*W<pf5vD|O^%__+d(;0<@%}#jqp2*M|3+omxc-~U#>C4j
z4lu)qUH|!!r9?YN@79eAgRIv<+FGZ!_YGeHAW>9>w-mqHLuJJZK95+ccG;?^-^2Mz
zEY#{9fbGIWHD%7_%-R(r-SehlrknJg0@~5M4MMpGWmKxX&5U%RP@iwkxI=b!R&=|1
z3vKd5z_aW+G7&z8ST2vC)Vws7_ECoxBN{I8Q)mWX_29Glr=0X5yeBmGu{3Q+o)z?o
zy<W%zhp;?Suvj?;Tlzh0Mj-UtP^W<d0S&jW9BUz?d*_$A%Ps}^{Het;THZQiyt|5^
zK8o+DV7C&RNrUCZ-A`8wP<e3N?N9S=d*1E&SqhuxOqF&VRwZl)z1+kmx$zf&o(Yv5
z>R_GEqVGq+`<<$ObSXhil!rU!2uV}F)v_-6Dq+8~e%p7W&^5s}rP5m<a(k~`DZf;o
z@LOrg*4PThLY1oViB~nuqZE&5gL$lrJ+AE~VHzQ^#`rqzRZrlTC=%(SAHa!yjvCeY
z4i$z%$>GWM4p}~5ru@H5A@{$TLKbcgz<+K#O_|(r1mege&H_UbmISRW71t^BvXIUZ
zqWxRq&4&=@+4O1aHo`$@Lj9a5ATS_%@z5kfdoQ5zr~xV=V!ap%B&MaF9T9+~^NhO(
zO}87{%l9rX4%d$g@61$OOZLw|O58scnQP7!{^v&zU{Fl@erNGtZ5ADCo!gvwYRfno
zmuCA}DqF9RmE(*Y>-YC~jt7yK;TiAE4v&6+R!iYMR=SClofo~5MKryyk3OpJ*|gS>
z@rpPq{Z5iMODsB|h=40c%TY<knI<C{Q)mrc6G;{=ST$E1cz~}tKrH)69N;;t)BQ_D
z9!&TZ*;!Uj8YJXVQJ{E=lt_^IPq*ZC7soSF7~Jo&czh71RMHy@{M7)~E##ZYh~6GY
zLp-&DjYHMJkA!`%5?dMcPWzkBj(#upra5Hh#C|)zV=P#@#vhy`DaTFqJe4eSVU5(b
zCt~cMw)1YAh$l@()2qla<CLg)m7{$c*tYew^ED~Qq!$p7nc2WG_c|w%ejpNPqXwnN
zk@QBQx2xp&Xg<qXqcg#SZWPe-mUM&zgl)jBb<HM$F6X#4%}E$<4|Xo8qxM(K@hqd!
zyfBpAarG9403CEN-z{P|f|glkM^0K$NXH}Ci2Ms~`-UkcsdtUj2K@NpVv~Dfh02=c
zFS+Po;4A*fP;n)H8462eYnn@#C?36FTa?6e#H^yDZq$BA(W8ZWw#%@mS>JYKAsgYj
zqT4U3Y#2@dz1p{db}r+OTl4s+?W0yMRc<(PUelz(Bz%BH7I<Xay|r`I@Ltj#u`?4;
zH@F6Dm-729w|~;UcCT=Ujt?bc#0CF=Q}*|iX{ztTdO%$V4D^Q7R7|3s*~^F{%iFRU
zc)Yro!rQ1gc}<^w0vZ8MC<yyMd;2cEWv-gHo+0}Ml~FD)F!h!1LHoG$0;YE?Y+5#-
zA^Y0&0^|`TtQQU!A@le{tnlByV92zDJNlNTCjpAB!5o)f)Rp57E4t|gA4y5(wcGJ4
zZR+pV0PtT~I7gul+!z+gfW;2yHMv)2s{Jh36vJS6@8l#WLIY)Is)D)e#h@i8uAi-p
z?(N9QqYKw{q>SYk5q(jS^mK$4YP#y;>S7xF0^f=uUit?XtU(adu<eFUap{%Euj>hi
z2Q@kJT^-?@y>>w45U?Wq>H|w^=D^IMs`&dQ{6BrwN4b+D=@Ky^hIHa;MG%X=A^fP#
zQj@IfdkA3mL&vktq=b*&JFkqL7@yBe8x1m!!qCADt{SyiBXmhs)8W!zsLnEWb<4A(
zB^RXU&oMewujr)#tO#;X#{B%qlN_Pkv_|1|8(!mNdFYLPk4$ztjjxkTaWbf9WlVLB
zOCQ_YwNQ6B1>R_lgT6SZ+X{2P1~4c4n=GZ!ND}ShPgXE^k6w@^>AZQX+q4-!u|#QJ
zLYMe*zf1Ao>cy?nVgy$1`!A6-kFQy9R_Q~3l{E8gOpCn4-)E@Hnk`cIRU+CjUQQXb
zcCL6EJ13-4mN8U)sSHuPFB){R-@Y{QY@oY7-b90~T0_-NCr?jXc*Uj}6Z;`ohgCmh
zu~?mLqdaY1k|enaArPAFA_V-PMQL`~?;3(dpZuJkDAvzk%?nZh=PR30cKnWmYTs{y
z=STbO<iEQ)hO`#%cuGm<n|NnOq6-DJ>o@|bI|*xxi|M$cwVR~oO}yyql4Oly$&Ltf
z`DRDJ7Y5D#O-4ts)Vv;QWH<meuwBFrxIx7f!*LQL<*cn5|14mlnCaL^($pVZ>X_r3
zttN=c7H1lf`$PF{BNlQQ=TezJk&3IO?i0Uavs{JA-F+;41Ds`SU*odVX1@+?9Z8+T
zE$TZiDg2N51>Ur^N<-#x>))Zr1@#_wk~&jAAb-_U@b|yJU8cFJzY6KxLP!1GZdq}|
zIC9}C@%u<Nw5{tZ34I2}QEGJad_5S^7K!S-3i*kO<&A0AUB0%QpU@Z{Z<UXJC~66#
zCL=74u$Af;v;>hK_m9*w-rB^G!i2qPHbZhf77Ha*I+r->bv-$V!&z3~r`@J}o`k43
zyR_983HG#&jbrVwGy^UlJB9k@FA=Dg!19C`bV(M^h#ZySl*+Mo%4`GP(iXHK4KRgS
z5SG?MHwbkx40qjj5!CIt%_g{V7O%0it03Bm;jrLypCYP4m}qdy>1Ji@ih}5)5Apbc
z6GK6K{ppl1Ztn*1p^vTC=G$jSI4~9oxw*quqmQN4OOJ8(Yw??;9+&n{x>6N}G~B~)
zYOvEH<LUh*Wb`WVX-@@w6md?zvzkS&!i1-w`AxJuutX;L#v6SY=EiOx5<?z~<Z~Dp
z4%#(9u<3|=Vj`eg7hR&UlC=AFGfTGa@6EM<Y_cw8tCnNjOovpKLDKJVn-W#0URU*1
zkduf$8D=dq(@z`bU<PRfX4zk&>T`LJHb|OM($0@iB>DWc%wReX$G%v<<%DxW&)izt
z=ON7vJKo!`C3GtABc~bydlKin7E*x1`WbJ|aElxyeYI}xo)*8Zjdco7LQ|K<l0dCQ
zO(UwhU)wTZG<sl79j<>Lj}hAKQv(*ia1nU=sv6~?_(Yx`E}Pmw`4sNqS3&vA+`TQF
z&#L`F6eLG!|0mS5vi=*WXXE-$pjV+*WmaYWCL#*qOh(MABsC3jkANPuksn>)QXmG}
z_D#wb3Gly2;`ld`*a4jXDXM5`QwC2M9qPtAcTaaXDl3a^8;nG$3bPQy`nh<JSavep
zP(V)Qw<NW1q=4RbADt^_HF-mtk&+wJ)A=9s*W5L&Rxn6dykHC?D(q>_V{ok8v*4wJ
zWI9O*7X=FDe5x6xXknUAZ7ah_eQxUNcLq-`>gk=rRSlxBCTh)!@*IN3A_<GhVs%?<
z-V$1`;a}{S@eu%|kBlw&l1E~wY=;RT;wGbu0Q`#J#Jcf=H$qjoWCoE)4U{BNT&^TW
zFJx0)H)^)1c>^ynHKgNeiOKKo(4%JkE7dU_9k;}IHDNsP%SWLv=({D#fH~hrU~a{v
zy>q#vyk)efhHZ$tmyTzKQV2`~$9B^16prXYmiMR0=1Q|h9`pUdr~3VO@N;n5Z4aFp
z?u#XgI{8ukf_VHfH+rC{Ho0c;j+T9+-Ov4;FU7XXS>VMuYlXux2~2uHs6>&8_Gu@z
zGFn=Z@RLJ&FS~r*cwQ>PvU!~ajk*r}x&9z-?$D=v-Ee+^1gu#OuXNioS%rB!<-|u0
zFkA8%x7t<fiXuU3HV8T<!YWqaNJD*T_M*0$r+>5OyAIsa8B@x6=Fp#!Jf5X0zYaYj
z292n(@~o+ewbJg;h~U((gOy+^b;W0v|3yK#{*8kCpHM}%e|4$`Ftc*}r!F?>>BSX}
zsCCcOVAGS=h!^W_6OC#PN=KXhxkQLPM37c=pSki{>BxNi9SPwU0Wlhz5EQfr=MxAm
z6+kgaK!S=Y2Av*(*BbExflRZ@s4GsbbbQ(3{g#Eh;@!O6P+vq)Q<7U&#^ZX%O{BOq
zml`*jQ2mwm%k;eG&GL2pX8Y}=%>b{b)%P{4$MaxsE;z28?3dcy5WXHC|J_!_&Om}w
z`HPQ>)8l;TO)nOsfZxMf6w&kRn@LhVrN>L>nB)j!DgOSA7QpWb4N1V?#%cc~KRlN3
z&*I&*P1HHoib0pN%kJ@4iJ;HU$!>TY;p=1x!0>5Q48xfA+fgEr<q}Mw@N(>K*NHFJ
z_ilkG?wyEWL&={T3;L?P*0E>3PhK1168b7J{QVcAy@CvtsH381tKj7h?xm^=1Q;)Y
zW-q|2SDminbo>wl>g8;m-w;bp#`N@05C_J!Ul)|FUB72k;0nnlNN$5p?{5>1;+Q&r
zE9NICqL}yXJ=G>?{y$&)`$LcC`_IJKndhv7w;fkR-TSLJ80TEE=MwCFH#b<vfq1`s
zprNybUf#$ipLla#7l%eD0hdkYlua_#g)!gL&v?q4idBuK+%B=`e|dF6*;d{aA@7W?
zL*|}>tn);Yd^a2c6}SZHXzw|jOe{0Jta0By2hm`%OC0HCx#henhr;*y_&twuU%a>C
z-OEC~UP&-Rox;DN`fS5rIvT(L_Y%dwgP**zNIjnc_Gdo#AwaegF&JBXIS1^|G#bIq
znWI{5EcOu1b?YA^q*c=*w#~WoLD0_yLS`-j<DsVz3tRuK0ax*Kk(fR5`T+lVuqW{%
zWSAS8bKQmQGZ4wDEUV)F+5m$K5DkUIq+jM)TD=Yr0nYpy_#8hHEqLX1&R!EHgca_y
z=?Dx<?24LAC7Dv`cL08EQ1BLwl<En~e8*2BNUel&b!)_t79$Ri0ofYM$^ZlPhN-Eg
zV4A~$%FD#%W+(y?R|o9h=*x(0y7{h1?Su-9@$!j$Has~Ug?cAOD`4f=^@_lwx)j10
zprg<b5P9Y-G3qV6Jc?40kq=*qdprrw0I5_a@?b5r21<2aJxA}wOJvOhxy{46Kdqum
zZATfb)^a4m9>=0akAw4=h2H(Jdod6~WdfWtyWTMOa+p}!Ooh7E9K_&im{==RD3Hy;
z&%w<k-Ws_G#9S-HuMm&+1eZj4XVe69`y>qZ@mvfm4(o?I5*1nuY#1mTQb}riU62|l
z`_Zs7n*U-9MkVc|EWD2~MJ&IH?nj2<zVo#SDw+hA8dgqfdTW<{Wh~Z84Wm9kQ#f)3
zUL_T%j1sv@nIkS5dS@;$IX(BJkWjyRq$>TvZy0oGot1C7x##vX<T-e7OTd1be#2q~
z?Me|U+PmId+;+y7dG`yIYuR_Fz5jmT<?M^Nr6F#D-*P+K(SJA|rx}jW>Cc2cZ1G}J
zfLtBF)?_S8-v@#|EZDt55Rqc5VBQgQD$bC9$@z!1uGuMiZtWf7n>X4PlXm_2#hs~}
z5`6W{n)wec$rZq7dnV285*-Sg0QW8hd-w9xPocNyX(yxXz3o5m_Qm9jmYI`I^-fQ7
zW_qf_9L}~DY!v6e#$zfBS&O_VpRzg;kfjVQRWz?&_9*OJ04OS=Fox}x1sqX{ejonr
zk!h8zS^Mw3QA1-F<bhM-5X2sq1?kd3Om6oS$xa?;ksiW7{5mq3%1U~k7uPbuCKTRZ
zQGXREE*>3~9A`Cf{GoyJET9?Q<5MN7<g;?hXB|OCG+_`tFP8NwvNg?MV`@K}#~e*g
z^T4(_J(^=hf4nf#Da@3lQxYz`5Fw6(EJMXBqnIF{C)O!&Ex1Z*`N+u~O#wekwcE?4
z@b4W>G4yw0<vk$`hS2z;KI)8r&l)ZFS|?fQcrJr8Xal;w2FPPo%V8??%pUe?x0&-<
zaj!GrT7==Ue#mPy@VDKXRAG_9wF1#>Ki+0p+_lVHXjdWAk0+Tvl~awp58=fTV^iJU
zvKfb}W4{AT7)#K!0ut5m-QIHQav)yA)nBSy_XS35*m?#XvWaH2Lg<zDTe_$7Y!Z&K
zUhSYcs;%QaAu6Pc@qYbC2x4oyI#hIfwN%z$5Z7h!7=ANKjX#oqOt!5ReQ$n}4fa&Q
z9UO&nx4(4WEKs(NN4nbleO%bC90K{eb5-T5Z2c1sJ$=1<si<R%cEMh>I4UcmR`>Cu
zXf1LQS=PT{LY8jV&VA3ApV#@K+=7UjM<4^MAsdQ$!C9fLw}MZASy-OtCPR|gpu;6!
zR^G-?k;;?csD;)eN!4}(GU>h>&?oC_JsH&ErNPySUPDM1_wXPnho+LN_GB{df4F=f
zV_dmMVp#m$C5hhz2Wc1R%+CZo^T5`kMEt#Uhs*^)ej_bOlML(1v2*IMCQP^1Kf7a5
z;6@^oB)nr#;E#(=KfK9(Q&bQ}BIyXVSe}d7M}I_aMY>n{)sdL<;ukpBta!S0fn^g^
zPwDzRab!~Zjq9!68oa2r3;JM{8z45V;dl7i)$?liGT`tza^w(Ov*oY9dBar*(mK4)
z$ySk7qu=3mUR|CAUio>(ktiWPQ|$6Psyye!{<8AHQ4XWV_P027CHqKywcgp)Rl6xS
z^3CA>0n>+*ySv5_-_PWy1V#9`OaJN)kU(xc9+I({X)3i$HT#<x==AjOXOO||UgRtE
zq-@we9UbrG6eY9K>8{$ouUM4*ub^Ee(4I}ko}cd9xzNW8y_pG142s8C{MKAV84&2B
zC%=)CiL7IxwTO#!;^t*AP1wwFwzG&!Wc#Sr#fViE3H>h^>(f^#_w+9_Hz#CKyB_ZC
zH{ckiTyC)hU|ni(ljV3EBeyc4y+keDuZ`V;!N9w!XE*8QcE1VNxHb#tZ0~*hUSnUZ
zl{eCttYp`*)&(k$i2OL8-G2>y*^I0O9GHV(RZbqX^sr$(YqtmV)ytXqMxni2fu-hI
zlzae8QGU`h-*k+<3cB*4JgeVD24YR}v!c9YY{YUs(XfOx4eiBk5+wX_3<7XN-{0ne
z-_`VH!n=f-m<Il-fSAiG>IFU3u(5SLbvdP&uMx!%TWCs^>H)RGorf|7nfe2cd_%b@
z*C?frd`2u95tyGI*@sp9gE&5;_rA~6yF^7iesPr`soLMX0NR)=8^ONow96i)keVQ4
zZRdOB%zGrMR2UD7$TT0xg6Z#`yS|e$jlJRzCdEbJPFX!FAI)pNMPb{0-n6d!iO6OA
zO;WZ{iV`#z=1h+~@g9C*s9*M-s13`4-;eRnh;xG2&a+CE9`?j&#4OrP)NOcmUIB|D
zteY%yr`zW$mCTgwdI}rH&Gxp2p>>;#^ap~Sh1q7vqH>K2T9Mb=lM92$Kg!1J2o|h4
zxAEafp;M)~I!LeUh=WGx@@}^<#E|PlM!hu<`kYDf?zYrKnd<|l{}xF`??bmbtf3_Y
zk}U;sD@aTy=>c9%_JT7s5r+3Whw<B;aViMHqcl@9QJ3W;9wOk0jQ`ZeG?eL3hIW!7
zm4os6kj>kQo%mTT&;CAwis#=F4^2NWkr$8`3K~@@XPuWGICL0k{sp>6%u2-fb!!T!
zrKSyo<YqjkDwU17k`1QM->hM2wNex%dF*DPrGlNFXX&>il+NrxVa@4wGx0n=o5DLz
zdHrE!uam*R)!4T@JNAPX(U%2WQwn%ePtnVoF@Ss9FHZ)oCE=p^Gth<^xjy1zRt*#d
z*R=TRrUPxU@I@#g9jB`2L^-KF3BQTkTlpv{$1)t0OZX@u$Kkmt+z~~cauhY)GN}tz
zRJA>BQcnCCZk@vR$Dl{a4eYwXdj%s?<ba;02Ww(_E*E=zEN6@rG&QBoY^lmVCpmdi
zbxvPGI|9m7VYmzC<_2lOm}ZYXpe4kbwQqNk7;cP`F5EpbNEU`_;s{fibscnE8p>Kv
zo**a0Wge#nXoa5>;#LoQ`Ke<Ha$C4gIdGdmk(X16?suX})l5a43m*^UnPiY3r!x7@
znC30ir%U))1Lag(9e{dfSuKpIq~v8cGI&Qqei3RfGH>4=g7}-x!4)l0!EEz|4+f*?
z-lQ{Xgr4lz!!Pn&kA+vBahAe}x^{lLl7dQ-(9lm2czWVr^u*9N=pHgsR+AowyIUiL
zKYwo7;u4MGGm4u=dfg<vxMRdCgT8W3waZG;(7n2W4e*#wZf6j0=gAEAqRNab1MKsf
zY4Zyk+v~kHv2D1sxBCr=?N%nkga$3_R6)R9O>>SVeU^*P&_Km8BVLG!(%?3OP*I2q
z!NT7eky%?_OEU?pRE-y=f&o7QsyUXF203(;L{_vL@BR++sCKw*o?R>)j@EfRLNvOr
z$nqJz6xOMn?5OrGV*H|qUtl$D>o?Pdo`84?)vElr;|nAgX~B$EP}BHhv=Nd#>#B<p
z3hO!2@@1KTMg%BA4V6m<h<?_yYjV{pM~n!zm|d7s?fj9v!4&K1)FzQQVfHKL<2few
zOCI>A1o1ODvdik~-{4eKHk-}Z7yB}*fEETwXbqu7uVv$acnH-h3kJydQPTe9212k#
zAJF-KC?5gn-m+d?A4xF_h5cp|&P8xkgpNBuq{r(2%LhqW!D_kkf=8|oXnm|4`4;Ed
z{SP%H(vsTnS~jUgVkEKWKWB;GV*1<ovtdsb2aeAlzgJDC3I;c5+7_H>x>QD02aX60
zf1CRe>#ol3)~+o}ojAqk!s;uzv$OTP#~Xy6mx@fmZTv)1F9YB9&$Ft`mg{JqwFTc!
zm?7IXyrGNDl!Y?uW{GsK=ajjTl~W}3Y04L^o8PJ*!j2!sr9jS=ZKSIXp&iokHEWKX
zSZxt5o2ClF-?OjC$kY8F#khN#(exx)P2Kf~iU|}U4TyyW`8W*$j>{U>sVA^Mpe@c7
zI2?zKe<dML4>z{?hOdSN067DFy6bpg4(T@>VQZM<Sti&i?HstpcambH2MCIBzM7TC
zwUh`}%_GTwHW2gX(UFs8g=VJy;C2k%%53+fX(E&q;(|*Ip7p?o*`?R*I>3!1BhG^8
z5@wl_rpn7Acz~n;m|!YRBepPc9MR`z5h#PiEWuD)02-&4zA;!ZrM8Eu2K?$pt=Afb
zAeRmJ+i6i&A&a1YY9@l@L6Mo{Bu<Ou<=&25<;eSS^@)jCQmX8|^^c3$7AMh==03*%
zwxv`N5yUHySu_<tXh@ED5lQ$j3jd555Aid8#@tf<7ajG&p?=;(I%9r_4`!)M#~k=#
zgX3nqRg9<*KV0IpaRvpt(hO+ZkM6Z#)H5v)VXg(w6y+I-nv7Rulo@ruWYLTEU9h1B
zoV{u{1c=3kWCMijpm>%UjTw<DaY_Gw5Tma~y8>-)8gZrCLH~9O3~PQm$EniS5$5t@
zw2ssiJt)i3jlP9g7iR53(_Xk$q+m^N2qI9n)Z85dE9CEtZDQz-hD@eTU%@hZOrq|s
z+4Vt?L`7J%EMfBD{Znj$Ad~&CVh}xX&ZfE!bNwLO*t#_wPD6x;n}%cG5y@Y+noeyC
z8uH9lIfI7?`C!A}*AgknGxo9!gES0<TMoG7*&gK-gAF>;$0U-yVw!bJE~J(TwZ>Fu
zgR`J}YuN=!lOsO2^bd~W3&d~{7TL}w(?}$6{61B?Kk9-x_YM|T{1yZvdbRenQnOj-
zHszZfT<@nnUAyBUJuPacEo{Kghgr8JYThSH7zH?!V?3Xp+c%)!UJY%&odVWd-qi1%
z&4*W~eAS@S*D*i7r{ZyA*adg)QOJK*R%kqq4?(_$VCDXCPj&5sW6L4E=PLcoWITtZ
zeTVcMyBGSJH`8-+b|y_f9{K~|QYl9<=f#^?D~T9ulSr$s<Jn3hx~#9RthbLRo8iRN
zTUJxOxlC({pq{ff6ONDVO`ogy6i&s%DXOxY4A$^?DPaV#(hgyAPjXt#qT0!1ho`xG
zRl}9gZ;Z%dCb;VMywvC!9}Fv>2mp=4s5cXVPbShhG3lPV&rEZ0<0FviTIzpFWm^mC
zpL-v9(bR6Ad+&KWJl(`MZh4^`#8bU@Ub4dptAI%OJ#gZO%7`w103DI)RRuQjY&JRD
z2CisT<_j!w@y<puuS2qr5hq95bYHCK8~5$V??K84^<%>~<lsfg0bwK!P7&)TurhXs
z27mDc^(Rj&1}_H{N${b!%I4aUI3nXjkMrZ3^^_09FAbTGPtzanql&3^u6~E+$En0a
zaC@NelX6TS`(m+J9=tepy-`d&cC5zOT01wP@HHi(DO}zpeKrC6J0x&fUBk)pd*8@@
zH9U8Y`_E=p_HK=U?@f$9<l|u?NsxC>THSx+(Q*!asTWf3S^EY`4wm+LBLVT()WBIr
zSKEmv&2$r(s;&MFp(g~B0z$ui?v`=f0B`s@phsiMn!>6W*54-6*9Nk*k0!PqZjO*n
zyX;OG(QUP{AEY7R*)(zAHQuH*VEo=aeCh?%y7<G$_w<mIo6UzPn4uJ(@q``^jp(E2
zY;e`r9a<f>i$Zzp3)d#MP6&p&D}2X69P@0rFQO<)e^?u{&L19d?`eX_7hWy@z>d9c
z3u4ZDdtBm$i=TZQYPL2E_aP|(GN+=Elr~n0h4c2E4-XWgA>l&AdURVa6WD?;@We)}
z8)^KqIuqb1F0;FC4#|gxT6AN_1}2e09qN#Y16?mf<Fh^)kdR(CF0b&HjX6qnk%3b?
zHFkjJ_5lyAOPX7IZqbWI8n3we$Yy8?V>Z#88yKzi)TIDEJwYYrVH}gK*b2O-6HyZ_
zE6D$D2Hi!AHrp|R29Bsgjr-Q8azW-i0T4{1#<gy}gC>JhrHc-p&=3vg>(Msin|0eJ
zhARaF-C#1#^u&}(8)Vk){t+OKN(pn8m5!)IY6O}pd_K$${sW`9ei~J0A%2vc90PJW
zGG3e&ri~S=z3ne`w2?NMLQM}D=awIXx=JEa+;GawYlxPEj2q!+aT>XF<R_9iavgBR
z8?Xx+C}Kef9Cpmyr6~Q|D(-+?8I_FvNB5+iChpZ{@s7yzUAvdD9jM2_4f)k!6;(<;
zqxONeK3A=BgC2SH;p0uARfC>~d#cL-yXBlrs6AGs(3JRW+59CbN_n4}&Jg>$II(JQ
zMYE4>bCgi&Q5degGbU_^bvzYJn`=?UTJ_=z+Qf^f-YFL4Jh?Q0U3#ZrK`#URz2o)A
zJd1pyidpQ{)j{D3wpF69E+vD1s?!8!e@x`@lSU;w3}GFb2ZKo_rSRzF3Tw(gjD~Fg
zl0`=Opm<Newsl*-6v{P8OlwZTiJuq2vh10;Mbe1OCw^O&sg!-AHZYXVDKu+P$ICf>
zqvJpGjM!$%b8F|xq0>*Fzp}~RiA~%Zu2omZ1ejUx6+$QQ*PvLCwqD;@C7*=jJ?oAZ
z@TZ_|J<k0S9H>rK-&aH5r{#?=T?b2{95%Z>U!V4p@uD=Aj}IFXiF)q4$BcKA880U?
zp^nE~>fk@K8G#>NzQv;xW@!wkF5+}Hry|U1*=SS7UUI5CU?K%tld7;w#8K=~T8F;8
z=K1DzxISjv9@-K>z{z;>>U9~ym|mHAT^wbk5%UsPupwzVswmiH6}BcZlA7^HJx*PS
zAt>V?h^WC))F2q@Rgt66$@+l5tk=M3-t?GPPwErQg};}*5)yq2o}0$;*!M3cortjl
z3>C{_;fZFgrW}i_*yUn5!;9F%pfsYRsFAq58;FaV<w6CJiJjF=s(}ID5<83PRB0Z|
z=rUJM5VZ!!hO55;mcBbOwtaqzRj)MK8~K$m7J7yI;p|}^wVa8RuM96nuT8I{VR;zT
zu~_E}cPe%^ZnC43nxgDM#IaFWFQN{@C3X%Rl0w<tc4My4{mR5ZpWho^Y^NY$uvgj&
zF~^$re}X~n;%pI^nf6~pkV$eZ!r^XJzb6_B5OV;dzomv$rF0%x2fvcRyX(v+u?KZ8
zLh#gAia~V%eAPGZ@`s8Xr+aJtmY2v$)f^sN*CW$#R~PS!%yiiH*;y@yGeMJzGx*Sm
zQyF-)CL|dEzvI06a^rsV=)e`>oJ4)wc1vg4s6IMLO9eG?D-QFx>SYmRxfRf^n@aP9
zi2OX{&j*$GK@ap)ba}jK1W(t2Jm-up@<R6fLEmS*>)V*6W2zsw1%(!eCaE+`dN9~Y
zeEoZHe~?kxG;;F(hNsRxVdb7_uld&^BuSL+;AMRfJ713Z5&uSRrsalXl^L||oPJwp
zEP5KwMHk0Xv#^u6{WB-oz@Q4r0+?21ePq!6ylEf2qVDaysryx@lh6I|BOr}G{#Z8|
zc#Nn^@HxEr3d7|6;Ai3yhEsn*V(&A9y~P89@JnS#$ux32fW<E<f@<{MV1$j+mQlTb
zln=00L)U&A>%cn0+D1&Irhu+X9b>qIfoyppva`Y7f4@n_<6y7R-@t&}o2L4c5rLH{
z!1J?YlMGkiyl~Whi05Zc+XBDT<I#~<NGJ3Cb$s2hE%>Y{CnoB3wx&%oBD(Hg7aA{L
zo+V8EXfPFFB6>3mU*H0JfK-*RIbq2ryhY4YlhsIP4nfj7ZZ?I-=U<CR*AQ{e&nljR
zk(mg%h)_Q$o6NBh?gj-<f2(8`^Mppg0wBLOx3R?`{|J9+_lql7fz^(^NuZc3z@}ZR
zLr=%cbltv)E*?%Qsxwn>zD$=*ZI@;l9Znf0sC$`gO0rk31TrfoEX+^M46D1PhF4;{
z;ewhu>T##p#Z!#$6a#BlW3`Im?f28fhE2l;t^skW_a`6c=j%24U7q_%`?5AQ4m~e1
z&IV$^^PNUmLtl37)cRe&BF)e3FE1A7R~aH5+aim4GOtnw_w^Y6LX}<%xdi6TUWdJO
z$fV1@!JCCb3%SU&jXunRV><=P9qrGxE4LMf$m8^5dxP%6>|GaG(woCX437<u+y#cn
zk_>m@-3GyZ7g^(jK@q<zFog<o5q&0gP_@@OHB_d8-e95*b?N9yl|Ee^pf&{xFtVhf
zrgytZCedy*;}}4++bCmfIs<f9{17NnLtU4k0iF4ZsY--e8`jA>uVbkf3v%@4<-}>2
zz4zb$Sbd>CK#s61s84^7KTCdm)HzNF-IXwyp@94F9t7ALIp~U{M#Q;*fZbOk8~8h9
zFcNQIFmbzQyFx(-=X^CU#xfF{mVp5$u#sCwLE6mVp|uVIHdrB}>79h^PeD0(1Hpij
zSU04w`0;q{v&3-t@x1K;@#2W140^qE)c;jSB87{%#RX(NY!IZa2=1R=;<pDRQ2bMc
z*d(Pa&khF+lnUygA@{|<6omooe>w=+*#ECN2m${_5`c~6KmCJMsS^sS!pLFIeBw;H
zy+H-#Z_1l6Bq(BNOpzzp6o#Wl=HHlf$+7ibzYPx#7R?;8y<l4tnWL5<iO%6r)^f!^
z0G7VWs%u7km`$0#;!&o1EZ;^_{eO8r8UAtf<2n>P=WhUR<BCY7jXoeoJ0o`9htZQ`
z$vf0GP|MbMBTboKw?Dp`K%{lrtf;V0EQ`YL0;}+9^fW#Fmb229)Ea;-{<n3W+jxH6
z%u)WIeqT+d%gd8*T`?%p2oN{I%5V*!oTKE97*NeUoYfZhW5Z3lf65(wx3V57QZrQt
ze7z)hVS^-ffSF;Gt-r*LSZ_J&;^A;1o=#8XzfOv0Zysb&ppBDs?GXdb64ReC!`0F+
zNfSj7!KIYrX^ap&&s%~pKyN8Hhc$z{Mj@a=@jV{|C`UzcRK;%<`Y7Qp+F<}3t9A_f
z{gblQJLAG?El38|x<F!z<{7mb1T}hZN0y%~Ql)!WR=Rir46dze2%Rla7aWan@rAY=
zypC!xxmLPN#JZf?cdjV8mK(@@p^K-DeV6CSKcSj4%eIJc0mUgAKRXmTR%viw;>;#z
zG=Vl8d9KW8f%kkWQ2ukRlR{;-YznT<7CQUd)5^`+UM82876_O0A(p%i+4e-C?mKA~
zKSc0Q@%auG^5G+Cip_3c+h#A<UQc&Doqgu<ksN+rnG_M8*IVlz7lwUg_&(iNpde&B
z&}I3Qg?^M@ZNHW|1%uIB^a?Bylw;wl*V|QF=35W%0b=m@J=RYPi)oE~Dx6f(fClC5
zaC>B-=Stsr6?T+dWqZ4ar&8_O_Q1OzBZ2sRNx9-3HCe+=YaIEDp7`pAv+Lp_Y5;RB
z@CZvE+M7ID$jhfJ70YXxq}978zC&J>t^5gtZ<Lq}j0-XQVrXR+hCdZ>oSCgGAy8$m
z_~dA-_<1%w)7YDzPJqXT^NYXtWxAYMXpHD^4C-Z*Gpa)URh|h}|L00%XZ|<q<Nt)K
zo}KOANMdFA@8QH%+EcOkOBh@C=uHt~I?~(SUxI`6sCe+C;352@#Bmtb?G>A3!wXNX
zlEWaK#zrE@i4?1*C}Q!3sT6w<1-1=Bo<X(5QJq2}K>MZ1!t1IWmGJ6BNuay@3ZO(W
zJNKIR81otSyW<NLEY)r})&lRNx4y3T=fTk2C4vUyHF{D-IdT>Rp;#RoQ{(car3&;=
z(9_WL#Syh`Yty~)?Z&j{^FXev9PF?CkA5r@v$U4x?v<>K_r-&^&AZxGkGix!z;+%+
zB)9SwjiHn9ukO3u(7pMhy}JetTxKokiD*}nAexb%uIB+*o*Wpd3KyPND;m>7T^|jY
zj1~$I?$(8&Odg=zbleb${^3G0GnMj2hZ{+TUopMqy+464mDIAR7Y4|h131T&O>Pnm
zPm0i$hm$<X{Z}}s7thd@XmVERuWrBBVf0xUA)kfgcffj*k!ppIbpz3wqe7^#t7msY
z>CvC0Xx!|cK_Tfm8Uzr+#uNT{ck=cJ<l|B&g^8L;Vcr9nb?tCw3Zl)KzL0}CF#p6u
zfZz6Yh3;xo$5J9dpIWub!moHbiee&nlkQ#t8E5Oy(;H|Sq0gII+QzB@<S3wQx;2~Z
zUbU;ajP1B^XMAPg4FS!e_x7IwyVfuSbRS_w&E&_My^b-)x@O5sbB@Q@j5}?e&|YkV
z11Sn@RS<WzGvS}Gc8wXHWeq{%QSVI58-{6!TA$ZzTT`-56Cs=Bp1!etpz?RDrbpJO
zR{-p4mz}W6O1WpRXPhFwR-+1m`&)lz-OF?hE3Ti;iCrrK1CH|ayjEP6XkP9(hg@j(
zH;ljdpa9^76Sg~Vw9w|L)vUh>^iJt34anRq5tVyQ<2+@Y*Hf_>rJ`rYy>PDtS#)<U
zDQDhZqeHwSc0rv|J^e}gx~q9ZqMYTR=M3L|sJ^(lwe1k>QIw+pzV+02V6HlNlP4n%
z(d%27<8Xn`y^vMz7&eo;;W8v-9ZFVznC3lChuqEFLtWc!NIQU$6Kl@>UE$ThOO!S<
zMUmK1^WC*S{d=1~)TsA26W01UaF2jNEah5aAkqTsSJKRPPf$>$!d8hy(t`G=aWv!r
zKG}Ig4}S>g4c3s9sP`6gBiCO(%Yor1Q~iOUlaBw;U{IIzD5$xBKF<E*Kdg26y)q|7
zVVRBnv5ZV{aflWA^4e#;Su6t<6^-~@JwyUJMQBP$b*7sKf=rsYej$)*zQIq@j`%HQ
z1Z>(`0xy^tFj-|g&W0Jt-Z059LE`SFF(E&L7iyHUiPP>qx#tUk55u4su!&ZwudAuC
z2R~Mnit>a4L-;zZ5>KB?Rh1@>DGXBBryiie!a%LHFGwdLkx9a&?ONzudUwdn#o*z#
zj?iNzn*4%e`x&SgHq3F|wOphy6C~>&8UwuZMH@U)Q?+Ely4NYRZS~DRvOxdb2||~f
z5ojbA!h7P7hn*=g27<NoU9Qx(jDiBVviniRG5w>jbsOPu80)_24W%+FAG8kQeqnaI
z!cdM-C<Hm|*kIuSb@yg(QM%pdXyL+1%C!UDu7DdxKeRWxL-;}#3Yw)!WHH&nOLvso
zJO+g9uaaA?m~zUjqy$dGIE{(lL(D`%o1~vtr4S~sLpmK_z<pE}cDhsyf*B1aW}6Hy
zV#k9&?mlNSJ1mwS^7zX4@Yrx?K+63d?eDh_UOwkc9ljiaPtQA|`%7oL9-baIHxD1*
z)ux9zEP-ZzK3sa2Oh_};TL$z*(Hiei4YX~nI@KA^g0DlTBCq=S`5Mq_eAJb7azo8X
zPr*@kP8OGm_KXDRD^VJNO6W#2fp!FRJ*CG~f2Lbi-!iZFt2@gj4--BI`qwW~5^v!C
zqeXruR7*QYkzgwu;B+oSF<1XyUvZ^`QP2Ht0k6{r{YDnbTH}uETf`QB2Rau0t@7pO
zJ==koq*JQ0unLcChj4jE%ppHS@sj(`p^@zNX$Hcep^>U~bcP*a+RhkQerNHu4%6W&
zufoB#f%6)VeS5vX;ip{KIy>jCSR<V2bQ{F)(xrDilt54ge8JBrgA;5znUIZ(#4w-t
z5&|2yB#W`=R-|{ekqo^b>YrM;cTgwf69J44$<c}Eu0;GNt4)%<=xf-hY~4?GBh7l{
zeC$smOPOXc#Ot$C+T51jaK)|mfbQfF_OXXkqFGPO6Y!+)2D0grxgoxXlD{sGBE(D|
zSs3x3Em0@LRCs%yphb^v$-(~7(`RCA6%&a?XW2XR-;h%MCcwY+M#@0@%qGl#<KOtY
zAeN>%H-}bwx%Yci3S~0z?$Qw)!-m+d%)tsi6?pL7r%_&?%u!Zbrv;aco+HWe9QR-U
zV(UsHMSQ%XO#f@Sc&$gcX5JN=XqJdf*fdrRnz(dZvhQ;uy`TOZoF^1mV5xTIsnM%G
zs~OzyRDf$RixZNJb~@bE*|dnjG3mNj(lJ*JCtP{77Hc}IB91NRy5_MV20C&ybtOyk
zx8A$)p7uGQQMzk6H+0Q_EzK+R{X)MRA%J{ye%@gm!1$Qa&X&7UHr%tS=s}Zkr*Raw
zvGk{yyi(rL@_+N=>68tGGQ2KX=s-`C*mC$xVD6R;;HQ$$CF&8w*`gRt!NvseAS&uC
z0Edw`^l&i^jz+;8-7!j3x$lrS_zCl#s?F|^EfQl)I0*|T<HNa=ZTVFwp-O=6s_gB(
z9+v5PZJ#9?d)$OeB9w%>?|8JmTx?EO$!mYd5|t)^61KsN*E2|lcdXTl1W5?9C~-2h
zQw>2FlLA@y7w~{&v;aJaZvE2rTRnA^k#1u=6mb+PbTwPK**&o-iY4-ba1*NT4s7Kb
ztyuDf{4XoUCdjvEQ}4N(Qo>`49+dNMOD=V`SN?2$Ud{syNkexE9O)^NP!q1YwQox$
zpHN9E?G*ou)$}hjqyF<yq4NJL)|UO>CGc>v{kLG-s*H{}d~xJq=P!&T;_OgMca29C
z9<6?Xd(;#&?*zLw%-<zQ%zk;IorR)7lUzV4nP|r_WDpP#L=qBGQPOX$z&!J7`f8ht
z3}XuytV)K<YcHF#Ti>Pi4Le<v(-97slNHYUmX)vOsZcB=gHGptm@jAR`793*JPY}{
zA&w-q{kpWLB2g6|d&;N^ooRv|0nZ|CHc#AuPkYv#AO{dez>E<y_wZxp{;qdicB_Yl
zSH;?vy#k-$wzs>NbG?s$&Dz^L(fj`G(ZSf!;`AvPHalYmvWk^a8vL*edaIog3>DIh
z^U=j=i8B%GhEOgd*#2}J5NQiNF0A;&G-1o*rca;8{YmcH;yvFP(gro9F}4v9aR{9l
zTT5LY_Y@j{uw}ZZwyLFM^o3r_f=yIAT%AIDp#jP%ZlWij&5QAvAT)JOH6_BUX5^1m
zOMwHGGh|rZzlB*lO^L=9C9*v9l+mOh(qYTDXsJ;N+4ZcnC&IaN4h@CHu`!V=qdQ5t
z&NFDlx!_o%+n@j+%CsnZrbN$dH9NtJ3P4vWU#_*2t>v#G*Fqckx~4)Z4E|{;W27ah
zg0awb4bG_K6{aMZbgKMVc?pG@3S8h$d7`Lj&6U<2pTa(e0#(s_H2B%djsqexCEu>q
zNasYuq5`S@Sw7eZAh&Pa1W8hxxjYL0`(dhL8g^%x_oH)Urk=&%WL9-oH>DGti@BUK
z!O9j^tz|y1X>qx_*)s(rP0jRA8aRySAA=AV3h9M(EgBSzUSOl+4AaAD`ckN6g`Hy$
zsB}0wF@wd?&4~`ux~S4VgF^bzEM3f@(?4-cyhx-ea)X$=I45EM2Fe&ERknI*p-x>g
zkGra52FcLrwKr1)u3H_PSEm#x01Oga*<%vT`ngYwk26tQvL)n>EV8{<6U4xaG-b})
zd|oD%D9$=pSLI39)tv5?IpV2QG1cYR5-Bf6$EsD0JY-qFU!KU(qkHmbo=Hk}BD$lO
z<z|hMEL++&bTWF<;5vsokxW4WCW0W>hgHHwmgr}`DBEcqeyfRP+iP*0JW&sSZ&YEA
zN49xlWq@pvh3X>@?|gDmd61n``tHxv+smdG`iJ&+nJF<hr2Z-HkwHQ3_;7uvP{qC<
zofDastf3wBQM<)+IJm-)*u?vhHH&7e@+0nKr%p7nUY|1F4}88LH;7}o+fJ=$VttTa
z@|{hQGX1hr;RjbsANWpZp0z$OE0tQc%r!5E=a^Ufn(!V5uL{ecq@w{e^=2VYW4lML
zmb_<dxH(pg{aR;4{OWkS4tgg%*AI0#kGUO9G%eqmALR?a5A~Lgqp5DaGF23i1HmA<
z0NAirt>J*M^58(pRR*%MDO*q9xLUp81L@`aH$tPH=(Z+Pe7^o4II`qDJD$<uOzB-Q
z#otmv$2sm1=61<}q`I&tm?BTAaYMK1Sgwmh9@RHokAbcNzDp*+QVWrg5jj0b|9J}_
zm;0H7R&e~-t|X!8TGCixZyaAxJyntk%N;V)0m(9FfSbY1c4qTN9!|>K;4C);VsqFK
zUR;i|tLs<OiB1p*6g(f(07Mg9@z0D3jK!Xa9EuEd9PE^dK7v^z*8DEr^4@X8m#!17
z`o6!3R6F9>d}hCSiB}js&n%9^!bvfc*laOjS!h@zi(0jmBNC{|Q<xnvBcTc`Na_we
z_|L0brhVzXF!SyVA+n3_`xfB7S&`oqD#g~Uh!2Q#)w{yD?k{6(DelRmM^c=qHdb5s
zkp+T9QcTc!3E*`C0<p^kJk(E~D3dJ2$x=!MG}XZy2N-~qbqAi}bPRVNgfoy?6%P*;
z0u#f>;p!}x4=+tWJ(N$LruHBlZB|8g?DXBi=o#yE2Es;Zy(;B7J)0lxJeI;FG|g)G
zb=Kr+9$-{Z?Gm2hidegD<Z5h8b|7LMMO)nLr00wA{L*bMe|wPO_5q1nIjaGZwHr{?
zRb&idI#(mrc4!bcr6WxVqpVwf9`+qgb~(<;Z`K-5w%uL#<$diAuDXBPMjE*hr}Lr)
z`Nx_Pu;8-M6xDF}I_M1KhWh(7!)l;d@ulQ3_jlg|MXI=5`v#bTbqr6B>h5?vdXCMl
zKSJv>Di<+$`Ts_N$V#YBpMK<Y(1cqJuo<Al5RUaPlEgV1?0`xSEJvz3x*0isuJ&{{
zgG>KUOyu~#mVd(Wukue=IoSRaeq-i@We1r5=AXO^41qCS_C0hJkICktZ)64S2v1FU
zmD(I5s&HoSjogrWJb}HTEV@+92GNmmlLtOec>gg%06)P38Sx{VylQa|nOJzb@pzt@
zSQU054OG%>1h+?wY%CB+MCWAL89xs&_1K>_JaYs2G{9sjD})^F%~$QW>|!`-c0<>z
z`T-@S5)o^jd2D=IzJdV0EqI+vVu}+TM}>e1W|hyrj+;bZc*K}i@FS}7(!xt%?X;T!
zzI9xYN^QGp+?wc_Oi~q${g)E;JNvJ-aKBevM+7+2vyQ{gb)ZUNht;x?rJzmHklk(L
zDA@Qw&)**n{JjH@eg0qO>i=4T2KT?ZUt(ba{I>*+%M2aGeF^lD?Prxq6Vj#dHUrv_
zMxkcqC0LC4C!?isc9y~4@r7-@1s|Zk*H9;b&C9xx!lX(x+oYnOO%Wj`!y|iNna-Iw
zcTh$ldq`wq`{9Y7u20#C_t$q(YifPj`;6QkWYE8MN=*vAr3)S7^;tm_wC4#r?O2vR
ztKRufT?7F)XFJBf@sb8afj8|vnokm&FCRgT0)7R8En{;i+yeZ!*E=CrO21nl2qqJy
zsB5)Lo{(q&chvr($0JFXoHK5#=%`G9%d^&>n+pVP7+{nS#d_bzuMBuEtii&@5juMA
zd#nAS(`AsA@8!6_WVldqLdfJGk41-%c49~{vzA#2AeGrrSs-*@g}*Q2#oPsQVvka2
z1`{u^Y&VmcYtAu!wq_c922wTEPhs#eVwF$ONX3#@f*qL_*L&@}BAc91Ml0tnAEAfe
zT55;Pfk^gj6OA0p?<62Ce#2HSm19PzPB{j*aB>KkPJ1|lz{eN{zxw>bx9Ms|OcDA$
zuE{m9S|UoHI^pD>AU7;-84Y4IBrB#O`7G2i-VTR2T&w&1>IlR`po{_?qR<C^B=Zcs
zP4Ps4rqhunf;Os?6o|9p4$2RD`3%AqRz-^&MOJL^r?`(bN|V3$qe|)EM5z-eL)Wo`
zT*84j3LT9{L=R(*hegO7c;)@%IL)b=(9rU-36Ld}**-|*hp76eLs?TP9DFH5dyE;;
zlJ4@ezujkHO{;%Is6agkRBa44a7$E>3Z=ER+Acd19?AqRC$q4G6YgQT7wCf!57+M5
z@L3|Mp9LVCs8Z5VYo@HMON&0GC;V6OFZ_%wXNFy{k>Smj$*DWdvTr}U6p_47jzYQ+
zlIpZx4-r6E|5^0NUT_`4Gw41U$CTQ81zbu=ZQ(u*2Y+Ynmg$LHKBzB!ZV)Q6TJ~hq
z528ih7}3-SPwhQZJvgTw>F|8ja_a1C4}Y}hvvOW&XQ1_RBILHnP`@RKFRdJs!X*Kl
zo$LTNQIj$bhWSy~#BiKsoOoKm#&xs;qd>W`a$-kF@uqv>du7{hH#a2B{3Lk!nM;W+
z6De@W6<O=uBBK@;N=FLcMZf)rhe7y&J?Gg%y11vL{)fL2>QH0>{shYgV$x@=Wsg>%
z)1KJ{V1;-D9Fv+<5KjduTLNye;ryrJisyDmPV63OPXc-r#TGidH;4_or9S^=RVz>~
zZT!vcz7l+e5B~_K=F4FcUBH~vi1mC2gP~=-E#*Bvl8pxK>ZTZ}(E?y+uXB4r8R?)Q
z>=^a*IiqurA^M(JRzmz;vS}x`I#sV#Mnl2p)J@-*Hg_cIkbZ_9U{_T4pg+uu8Y7{h
zlg+=LVR-;2#qN4z)MQpv(=5l}6U0jY@dvz>I`DeWo-chmsUV&4|KaVOf;3y3ZqY8=
z^_Fehwr$(CtE<blZQFKNmu=g&t4{wB`{Mh~S+Qfqi5>f5&X~__J~J{iMvgI(g`zNX
z-qibmx{iT;;JLm4PoJeYJD0E*4IgOowF3^}+@%#?1J@o;qd5&>K9KLlEZT9UrWrXj
zX<aZqu+IK_%MhL0PHr;9P+B@0^6NenH>4VzdLhKnclG-s?D9=f3QlYEG3Asx`@xmW
zEpII*{Byq2?+0Uh+dqKkoc{{a{yzbpGcx?En#aM)@SipBGL6$7MG$rP-6uj&fkgC=
z{S~H(C=og`aPXjt|A6K?2{4fW(45ea;;*2%lQ@d<lNT&hi6)mYU@R|#C2^j{7V}&b
z2*Em=(N5}Vd$X;tZPo)eL(q><q`^;g3AaXHgoC})tD$Ub;T)PJ2~$->@CAS4q9r0F
zt20=`04__(>UzFTR`+JNkg5gn&}kLA%?kTOt7H{9Q*QTjcB{!vT&DN?<?d@|6GML*
zI(k>LzZtcn$?+9-BEd7iY>{hNJ%84U&c$4Vvy~;m^HU>$vZ$BFK~@=bV~W6@P%?O-
zs}<4sV~YFT<kDA7&GZGIjuPV7J@b42>qxC-wfWD8>p-c$E3{RAi{nx)iUx-*z+>L<
z31J&q$GrSzJgU7KE#jT7-!w}3j|@<jBkGGa^aQ|F2cX{N59}xBA6zIFMwEsi;XkCM
z5Fs@aParon$z09NZ?>|j=*cnG8~PH(AW%Fji~|8Rk{!b+)(*Jr_Yu--jlStH(5r=7
z?+dg2WF5F9ssjrL;^&II?F_5Z)=ZCTFYMc^#tU%!5*)e~-_J)HS|LhJure*|FFbr_
zBLp8^-$F$0_F-pIsgf}zF7DQlL5h+QzeX{*EIaIgoO0Nqr<6xifzbqQb=bkDlxI_s
z()$6UKyl+Xm)ISm;yBc{()d_M5*W|`)=*VwbNeF56s)B$3UHlODPakf(&zdk#xq8E
zxFgBJl7z+GhaoL^^JJijW{~6i8#Ik?HuVq~-5|#RSO)TlBRq%SABusnP0ySZy19op
zuKw_=m4_oe^c~sTz?HdXr5&LVS>}L}xVZ5NmGJ4;NuahG8SbG^z|5^sNyH0wfW?d0
z#!AN>(#lE<g{x)q6Hs9#A0vIqi@*1c9%6LArlz<x2CLK%cNX*$f~E5Pl%<e`51U)=
zgzs;YF%cx^q7c2F{;)>*s(?M$D2`nG;V@=UcI+~gZguq^s6?aUHXvw&cuv5aE21Jh
zFBnc1zA!yW?o>bN=a0OQai4Q~K~qePJ_60#vd*mUK#X!}7W7E16v$cYQhq_F=%e*x
z9sa1xa?%uKod+@S2kw<<uc|e<i(vt`PdY-8W&J%^@_H~6d7NV$q-Gwjb~`X(-+=YX
z^#5(77#aSrbyAG~&OwTU<v%mP{|0oTA(A76ezW@n9Rlu^0-h2AO=t;C_9w-Qpd`OO
zr#L)VNJ6S9B){FvCM-3;8WIiUuN)jJ4KwZ^V!-zAV!-rY5S4C%tbO4B_yoNIINdVH
zAQetXf|>&2I9w{hlih+1xQdVp1Q0%-BaN2^;djXYOr0Zibx~2V)@*QRYA)5?8LD*q
zoAzKrbp@W6r9pb|kGXQUw`OTgc6}_IJ-Y#40aTT<GLJu8K9Kvziz!7XyfG+>+O2o`
z-D)D<da4*yt<pR*n5Merz4se3xVO6>ogw5;-Whn)6m?&(5|*cwx0}BFp%%t`Q%tY8
z1X)MhLq%JWWh!g>l(wfmv{EoZ7Qf%gh@?)zUpKK*LTcF-o~sQlRk&J0ir@R{SyP1f
z5IG6uXod&=ep8bDN#h`ji9`4eVKNt?NIezqY%&+E$WFKk>Y7-1*oU5PZBohc^4AQ9
z^*51F1=VjUA{P;FD^Z(r)TsTwA>Jo4`#&rG9hV)dyDH*fvG@YhSdAO^FiyyscmHq~
z?ElekE4v!GcsiKUtNeX23jc3h$Cx<S{;T~qRfADMF-OZ`Bw;2f_-jD2D5+3sfF!s<
zq}mEC<vXjS|H39nOh6yabC3@yM%oSv<{5?ni3G%mg#<~f>Z4k<X63tJdtPbXYzJsw
zbh|e3TifKH+2l2Up5XM8Gy7_Pe(&+VenuE?Yh$1p_matGw72@*)haY7j0PU%y5;E&
zw92?*+D)uZ*WE7>sA(yIAekijsT;xo`(C=7MLnNcGcm|F<%+7iq5Q@~M>Ae(=HKg=
zm)rZjGE>xi+OcwyW|I6Yg|8~$;1E}9Rn_ZPXC)P&hTf@^SO&dJGHikJ7y6g)va*{S
z)39~w81pugak^V`{}UxCEqy;vQuQo7C;GiQte%XPiBp(Ss9U>OY^7d4kbs=1dTou|
zRAIO9bCW+`63SXRp_xn7V~(ntE`IL<kOyg2(&p1QVMvS#*O(A(xSviUHf*A_<D33d
z#!t)uoB;$={>asgf;kFvs%tdL;3HkY42L-f%CLlKJ`Hn1hAb=G;AoD0`$TZGlfiHT
z$_>anPh29_xj`U((ljkn@rrJFL>sUb;YOG4zWey0ybP#8-{9H!x=_1%a+VKHIwoum
z)TOFxRcUBLI%M*>+6m$U`5mrohJ;!4qgPNjp98uS2HX8UTUDg|C_}ba!1}y)=7MiS
zF2rF9@+2hHQ6V#%H#Cp|_<fuN<qs5=s9psh5w&^bPh=Ay`9Bm`@ZUG7yu}oq?#*yH
zcPAwsay;Qa3pCqcPc+iqlOOevleb4NxY78zTZZ6Yj^hUkq%vBFSjA*eB$LeK=&*59
z<`VnanvK}8g<-z2Tf<+IY){x1{<|lngHB!ac`&fr4LDtpg)+gIVA3%wk<SZ*ggun?
zbW(|FWtjIyd{2LN?EO3l2cR}lm`aY`Gp6YVT0g31q(vlk0*JRXU3l&dHfNzDMiQJ&
zEES#SRVhHf2!lu|2o2vG+R9w(&tbKMTNo$XHtSds9_q5EDT1Wxr4?0Hiqlo*YU7h7
z=NSY}>S7a0C@P}4U5vO$<FiG%xcF~W_8AKZsxm5>c_G&0j}?Sjafgu9q>x8kfj3!d
z_pLeB-cZKIEkurtWrXB0-z2?*iM6c^5O99U?@B5A4wc9D4O|B`*vv{WAJ}N8w0qp^
zq=86FrC!Zv-pP3OnG4H>Bs4i-8#oth0GE8|lA0d2q+FLRFnAeJz!G;SR~ou`UX*^E
zZbqxNxUyEFEEUn?KHDNbiS)*Vu0Zhq;U^GIqBa~wbH&*PLkNF_?O0q}QA1_GdLLx~
z^+Vrj42WztugF-B@q-5#jC1GB+fB;^H2b*7-t7i1`O>1R{bWn(5+jo(I-K{v=*M~R
zd4j7@U_GOrQ<e$Tth=+t({vI{1M6U3ceiaCu%$Sve?C>doHiVguuo%{pmb}|q!MQ@
zWpSRBCDSY}6=Ey~SIZHheh~0+Gs|@0hAj?3)+^Ky7TBs9p<i{i)wguq<z0c{nNmQ^
z@vt3>iVY+1vHL-DRNC54SC2L3jt;oof-#)|=IFrDrQ19s^ZBtkrFH90zWWnn|KiEt
zLnRH|gzXl6pU_MFY^y`45flEtr8%X|)tX67hP(5Ibo1ODLAv(G-#MDdL%Ki+;^F-0
z2_4(uC~s)(y-2;lO$hgN&H#u>a%w-5`S4K!s4_>@ZYil3L^xiIcvJmHCziC<6(rij
zI~@0NAUy2)!zoGc{dLZp3<JsG>0Jx=F`I5RhegK^S623Zq0R_tAX<`SG}OS+rhOLp
z8<EC6<lEF(HEQ@wuDsowX$9HVSEmF2BuWDLj02Oxfx%e`=bWa3p{c!07qhR3K+|Dd
z!hpBsDR}zkrntc!ZiHN_-O(3%$yy^EJ!Nlnt=D0})=`f5337c%i+;=v>H8wld9`3<
zb<$hHXHcGSX%3f7@wCH6<88vMxj{#+^_ci%j`=7>w<jVm$=69H@fhPQ1OEV2N2ikw
z`4apz;J^{IJ@GA)N=ei=M0^$l45t%+yZ4qOb4q6dh^S2GaC#&n5CbyMt6Xo&62dE*
zJjm&%4I5tf*QLk=`5iO^`bk2jWcEX}`Mo<d2HZSIJth2$Jep8reoF?^)f@ekew-;`
z`>~&JCCK_0vP4NFd#(Nf3;u;|5Dv6Y8Ya3bLq-I^h|5(YX~m4=CACmLwg%&+7Oh+M
zx8$=Nc^T6Zw0@zTMV0?He<VQ`(w)W6TnETY7i_7r?Gr{DImH~&G6Fvr^a6_qx*p*X
z-AqP^OvJl?3GMPcDRCb((QKQtbG)r|BxOkIP8;_3LSYDt;0U^y@Y+_#lVpe#MtJOM
zd6mz=6pGGC)<7~Fx^+Lzld`vdLb9L6ZP|CMIbDjma&P#<oOK)y^U=VB#_x1{eiSh1
zp>xagj!N#kwXiP63|Cn+KD$B(!JRD9OLLvbyoF49flS@dhisAW8kKfwGl^!O0#<B#
z1#mAZ>3RM<a{KcFq8&Iotv2&D)^g@g0gGtfR7W-S&@Z{;c*)o6N_CR$Kv7=%CAN`!
z%86w_C$%=76VKyoURvJ(!xJ8FRp{RUTNY$+0I2u`a||(x#o@uK8^rR6o=*@v{%D;<
z2Caws;pQ)=p2@W>LbtxaVl$>X0zed?FEhWd;5TFqa72R$?*XQ>^Fk!A>yhZN_^cMJ
zH~X(TsWdxnt)5#IlglObQF^5@Sk>}Q_C?ZuA-!y___i>Afuzuu9mxHk6cQkOfV%`s
zZUy<pYotg5{@$XtrX~+}*T+{=cXr*puf6Y~+Fq*N;T!Rw>LXt8P7LSCm>jn!{Kq-|
z;DXPRf%m@kc2RJU2}xN0$E(3boz>?$MW}_L*5icmY-gTPZ>6q}a9t$x8xY%%vKrav
zcCvvu!faTmLIl4iYGgP*MBHPTj+)T4cWnJM#k|@8K~)6>l{R!?l4$Y}H!Eo7&MURP
zDO^#&!pwzsHHK>7e$@q1l3~()pVB_%uH%U49&2iwEzBH_TrH=HxgBD@P%nSsf|k!O
zEH1xhN$e_}(fE222e9~8;@qd=J8O<voz;O_@JD&0%z-YLii!55(F>omMzox|<Dgl=
zQ^&}{st1)%p!7F$Zp*K(YBtNfXj=hypJ~e-#uKU}+YlT^l&C+pt8Z}DrLp<Nx4;jd
zWxV(hdwm6NgKSi>vla|ThqhzDxV4-Kinewun_j67!S|9YELJBtm>(vvF~5I#9YmJ7
zkF{zQFIRK)R#Phz7KhVkp-k!01gJ_iWJ#B6D58s@z~LfEsF<wWw>rk%(KM;ywBE(z
zgaF1ab=vS^s7b?frn6%~C*NV%Mdv?#f4uwV2dQyrE-Ludbk6|G&Lr6B3J#0O(GFEp
zldGl-9m?5S*Xw#9y9PWUiudi6W21Nw^C`zsY9II!obuq89MP0uD`>CVZWv;W6FR>?
z92y@zUPlxi`Qba`y>Pl>mS2+NOci`2!!C212+e1_sVd&qYuWnR%sX29CQ6hfU?$mm
zqpw@*3ibqLtc^ST0*6Z7I)f*6ZE_u!aF{^-!e4YPD{ue0Zc^f|-Z)ol$vM*uxne2@
zPb|ZY@{|LXm}xUK`GNW3!2)hD6L`F$PC|B<F980dW9t&RazJhIW%eicr(1pXW~vG%
zTzp*+K0=cdFz=$e3*~T+*CVngX3YR<zgCd{36<SO)pTC&FU6&(GpqBSl9rJ*(mjzd
zxb?Dpp)pjG4?lu$!8^2trOi_!&M7EN>1rB@W79cL8bDR{@v;Nns;QC)V@(+irE;99
zXx1j&YL0ls=4O0z+cWZ}P5{-W?)@fjQO@T#7-KO}_&>Gb|H_w$k&*eoW)!+=>vq`e
zh`!6}7sdevHwojrU<{x)5pRT+3gnlKG}X93^&}%q3g5n|$7PgOAT5p|&b-XRSF%0S
z?xCNiZLdyzcGt(_H*NeEQ}^Syk6qcJp|6&H8kD>jPwV4=-Rmb$XRXZx`ONv_$$Op+
zpRfDYUaPOeE9tE7uO=Kn{;#)7Yh|~U$=HSWH@6H3-y!$IuggOw{%u^m*ul$7D-63Y
zjg20iDf_|DHg3KN{LYK#dpo{s1o^>G`&Yb#_vQK1;SU~sy1_QB+Fd!u`b$Ul-YmBD
z*Dg+;$;x%dS51Ug+gHunqrt1q_H>J<o3_s$PWm${mq$ySMJx#<%RCH!tt$!b986gj
zBupa029cN%6x9Oo0}Of8c(RNz*my+74iW-+S!vnnlayIsf(VhO#wM61=O&mOiXWnC
z2bzjS^76Uyn%-vFWte5@C(JYEMh_=p7`zQnN#SXlRw7^&^X4W&GP#x{M7iNe4Wve9
z!5Qfp!J6iGnii>+>gAecn*Z~x77Eo+TT@i!H#`mWu)9^M5WQ7Btgh5c>0uSp`@fy&
zn%k@vo{xNT7py&5jPoZLOT;uHa=A&Qg^we?ozKK^(4#g0kEh=U3n|&8+vG7QoKQr;
z52UT^SQnB(qNK+hP<TT+6Mn*~P|&bUqq4o(6xAmzq)?bV1RFI7VJ&d<Xb%<h)nI3^
z8v?4`Bupc+EtF3^2L#f%3ZRrv&F4_3rR;NL9*jhknUNkpM8sDxUy|}@6!{zd#|bLL
z9YXfoG-xO!4ptXB3B?9WCCrD#55v9cdpMfpb!z*Y!(0;=UJ<Y3)06Qw%|frVGZA$S
z530^(UUrcB3uf)CEOKpqNxIl)T#T>9ZVC}uP1uOgOTFQGNUbt*N?i{ocHf}cNDA=e
zvr4khGioeU&W&QtGX^ubCc=YcxT{)q$zUj+nKNlFnbIJEE;`1TtHZc*>14__4U3DS
zqkg@S$jm$tdnEx+@w^cz`^($!6yFFv0h7@{%<X3Y77_c6{cKF>w!E_zsrO_kE>eyc
zR*%A&eC{$HHE^I(%*!m&X~YCX_sFf5rt%g}D^|(pVla83!P{lJ2m*hE3#$j%njoSe
z1JX3OAc`25B@NJ{!S-ZCc#P=O>QEi4$IC23d7mqgcD>kC3)eIl2^nYM-_Nx7HP3Gc
z?jYTg>JXTu$i^<9r^z1r?{+12=1Bw7<$*M<^%^O4juZ6~gkAU`%Il1CG5|<PU}G77
zsc#b-RFlW7=2@bEusY5hUMk~0SSP;mAkKNMu$4(hM8_1WOR@_M>X0%ckP)R_+&#`*
zFmDrdsxVOQNh@g)Gr7Vw;3M>)NlGy8>NW&0gyd%84$Z!<MnD;K1>njIFq{eG28bO}
zQY0AI%0P0~6&5JvRs1btb>%%YZ>`m<|K(lw(D~kmHZ=LeyV(Kn;Tx~@D|nF~+V3Zd
zo&NOkAvc_U%nR@ZzV-Xy$Nm1D3y&-H#}|kwy*AK4<*a`<z-9X{sf2FAq+K8bV$d~D
zaBOu2^!>SrkOUM9a`K#*zm6AiU6I5PfiS%1`<2%`j@J)AJhv3as!V`q{<~-!1Tz~c
zO~JXVwE<pj36NumbS>^Qy6ra2b9OhoFfXTFOKoYa*N@$ws@IF_yQJ&*ysusrZhACY
zCv62CvIHORJtO1mU405CcBqnjkh^&GyIpCS9&1hem^qT~EVOBQ`oHHXsjHRrN>3rc
zXCmX|GS=Mi#I63I9hKYlExZBC5t&jYY|^<3w0`G!B56<Q-s@tM-x|{-Bcq!HUr5`_
zb{YAKcA1g!8o<-or?LO$bdJGsl9ga3JSRMjx5q?3_{B+}HWA@5-bHF=FS4cK)RN4*
zz}x-CJ^s1zGei`~UHDIHBJ}|=kuf#`XH3<vC}7oL9FCG7jE@QlU}yOh%|?+0ClNFe
zv?E!eC^OF`{T>sd&aB|yY1w$(Fc0fqaIrv{f5LU1-oTi`YX5<P#>oC38k&EN^ssU;
z{uk0yt?8+Px_ozKXwb2#fXR(%G#5SFHiR*Y!7|&1y}T2^-Cz$q$Vc>E_gBw637bjN
zfB+i_0^CrB0Tzyh5)G9xL~AwTEN#RRdBmo-<=x9oAUWlE-Mh^lI*-#~zg_WWx2Ueq
zN;I~XfgCPU=+;r?s9C@JXnM}hIn}U{b{-8kt>R0`HsB%Up-IwZMCxF)D|)U@A%)7d
z<kXBMTeIM9OtZW^V*0_sJ*Gusgj%1W*?2UO#cKW3FjJQn#`^`N2(R2-%E>X6d(ARv
z_*A8NkDD^$OZ?>F9l}xd90h%o>@610AArji>UDh^9pRYPK|nx7b&<`!9TgLkb4nST
zg^9KMz14&XKkHopjKlUS_9k}m_~@vCiG_T4<6pY5Y}j|44zg^Tf5#x2WFIv6rhva4
zhPZc_HoAvNd=!bM6iHfH{<uIk%Vve%oOxGw+X~$hgD9@8h$_ptz+lC}8qrWJrfghR
zpM*<V{6~@I5%`gav{0|$k1`IczgKdGglvIcA(^sr+3A9e75pO_Ypj+)w>WKniqd%5
z;R3W3X>){@Y&BsDUtU%@+=7@D^P!M!ev8t2Iqrho*k}Z@;?jcZtcha8Ny;K>rF&J2
z_F;JOUiO~!QvA}fEi$Pw3A7hUcaog38xwm-JN&!b%iS(6F<C4mz9nyivr5;c%(`of
zf6K7gHHNSGL<i&Ya7~?agLNu=DqZ52x6WD{{))xZ70eL*Lr>emkiKd1lQU?ut$z6c
zO%!{fQDNEV((b)Q7gTm7;JI43P~$P6+25`Xti=@^_ljfjO?3D%B@z(r?h=*$G;cFo
zktEkq7oQk#3P0ZiiI*@x-(;0~YIp5zBTF+t^bo;a&^hhv2u8<*>)4u7tG~zO4>EmW
z8r^6vo7#Q}j}S;Zq0PR`yVnyK8_UA}z~P7UOsM03Z~o9N(@Sq<JZM)o9gyC>skQ9^
zPiDoT@j0a(zZ*5&SvA`%@zcat(_+5GthYIHsWcdvnf}a>9bp^K>g>wMW>(O@b|tcd
zjHmfrlo%jZ{;MlU?@8x?G4@wl-OWux9a#+y{DG<Y`2$xrJO(d`$qiysi_PX+5y{N2
z49W4ak+EJ^Ft}qIFibWTo^>5MFBi2ayL}ck*t}TUe&cvu#5KqhI00#d!eR>+ENzV+
zUJMMJnBag^*qCekzPZa4DyYbQD72$}MSR0dXAhU_3?739W;o6deeXh!22XCLItSTs
zv33G%a~7{F^U=OCCMFf0GC^gu`}+lE4|oIpzQ~UoCm!&1Qh2V)v5AqRyPYd^d}2%T
z1}XugHd{d;drX1+fIJ49A7Jjd-h>U4@A8Nd`2^hb>b0q-E^DB8OCdjZt}2u)o8uUN
z2=qUmhaK6(-)k!JQ2`3M4kmJjim@#l*m(etd;sE9WgA@+RS5|b6A1}b6J1?ZRa`-t
zPo9eTfk-1m*<9*ORSTf#QTf%{17reX&Fm<@mt`eQuL4pgv37paT<#y~o*_ITT~!QE
zqfrGZ+7!<z8aD#^^$x_JVtvb<ei`}~P*Zg*8`fqsV-LYMbTm^gHrg%+*|i1o0_-~F
z9B;(R+lj7lHOwpcenW44;K~#7W6lovd?7FnjIEup(JyAbP*^)gGOG(+lXZ|w{YD=8
z?J428^^#ZMXy*oK8I$6p;X%H%V#Du$>Q(b%_m*n2K?M6i=MPP4YphCo!=BX1Ih_Ri
z6T}9eXV%_$Sz@wG;0tgUUnjdvGb>L<6ZI$D$a4vvy^+X(dmgCXAJ|!79FIG8>v<D6
zw)$FD%tkXC*>gdKC5;8OU1eN<q*`$*+8&y3PMZ6-yB}n~@^p0?`;U8F1b~=Ik$Pf{
zO5{Q|6`|2KhsPC-&u=8|&nu}18ufXLUYh>SlT5aFq0h~@Sc`vL?=5h@rhk)-pmYJ{
zHMC#K>K3_a=RAHmPekXWhi18|WKP9Cm+KJXG3RrvuY*c!iA9a!A+cl&=^S^zR1~*R
zZjR4jkytFTButNgqE6;i7{E>5u=(kS_0!WdjQbiWQW}`gPKF(Omth`N4G$SJX@~E;
z--<-2<@xG!3~ArNd9yhj5cpD%IuSq)^zxz#%#bnNBl>QgB;D5CpTH)J-qe~Kzy^G%
z=M_%Y8~*)O?-@}S*_VSmTpVX3DLZid_B;|`X~NW~K`Urwm^LY}Gje9$G!>@TW$J!6
zOUJzCF8&r;2X<*T8}=H@ICKdd%kljK+_rFB70&XpFK;&W3Sd^*IOjnt$f}E*-N5Vx
z@EE+pS&mQ%4B0SFAY_dhCO^TD;O#s7wH241t-rDHN$cWo>24=epSuO&#xQ4&_+u(Q
zC!X);Zl@uo4Hw|OUeJ2x2xMNtsG=f*6^snD=rU)W8CUaujvw*<TwY=f;f1D4%kx~1
znzO8P<oGM2bM7aJ@OFbL%b1vP23I?kg*xUl!|m1%nhwC8hOe#nFzY?^{)U4GuaP4w
zm2dDcO!MnUxZj6=7iIP*3YzoW*K@zU_X8bxbl-N}xxi03Ra9pjI{`}P>aSZ}r3YLC
zJ^eF?bwl!t0Nna7r{m32#lTZ#LLWC(m$ip|-+Dwc9@A%S$m)Q8Ok^9FjDaX7G9l!!
zZW|e7;oGnKU@*?r<-9n7Q(DD8w0%UPdBk}5VV)k*0>?|UK*M)!a#(y!K1u7@nx1*j
zC#8X$YcAhz#SEj!PZ{qc$8?+&j2#o;vmB0lSJ65&HnX9)MlnZA$!WxqsE&82xvHCb
z+k|MV1*wXN;aHfApF=iNU~Ydr+C1AuJqL`yV?T#kOeQ72UqIK^sHd4cCcJHME<$$h
z87Cc(X<!|@3fhkjb_c|O1qO4FTLbbYT<bE^Tg~5a?0(HEoH#3?*nB50-msp3n{@Oj
znQTXxwM580cN1P|huGDLnkwk^ARxbd<&r?X6L59F{zdV`yOMbsUPyATzXg%`Uk-lA
zyD4DJG7xtt{M@?BG>9$3bIF5HB&)y4uFI@mI4fw=ki@ZYt;pIuZpFO;GMkG^Ux8o$
z<hW<=!RD*tUdd^#w%#^0_;TE7<yRom3%a<~=|YnqcD|wO0&;xeJs5NE56*%SU0k&=
zAx35Pv=o4ju(6i>Z0$A|>j8q*3)B~gIq_}6lohGX_dEeKL24T=W?IHng5))Z>96(+
z!J3d<xazm+0^lZ?j`c{y_F}zz_s(|*+e#*b-zCETFtqqm7EQRP1uq^Jy!DV8?JoAX
z+IZ!Yk;Cr^R7=VCZGG~O8MSy1+s`7)RWIPqvZr^lJQiJ?;v$t;;lXzBWcPq{QwS4q
z25--po~Xtd(r?2W>M(4Yw1I}kx>&4_zG19kB0D9)!LmVn(lqoh+tdjet+!@#ILwA=
zO}K^i22b(nyrn5P1Q`qw(Qf8Vb57+mCWJ=Y+v|4DLq)!NQ(g=<<iOmp-hXDY-@@qh
zsyZYeROp>fKdaBqkq6~&?GptCr;?6*U1j5Yy!`xP*U;&!8eZ1qQQNB+wcJr;T@&E9
z%5ArLZFx-`X@8@f@U>67l=~(FWkvq-bHMr>F|vPPa}&WQD9uHRP2(AnJV^RMW$Q$h
zbHach`RnzEJ%13F=P7*|j4k&ARH%r9xf*9qmHdxKAcKg0h5ka54p65g9dHvwzKwd3
zqvfX0gY!NKd;@c*8|ONR`dp|ZzIe@`Ha)>Njg6JoFu0n6P$4Yn5vc$)0(e<b>=`m1
zJkC8)9=vCH2sZ+v-5Ua>Skhdf*aGL*c)0iD0inJ<->EO|!a+9MEE$eMdmx~<EKF7$
z<owj@ylk?Ej!^^T!qnP&VX>Z+rb3^&N}`*IvSJU$QResKxa93({3D3&$xH>yAd?y<
z53b{|Ig-HPL8-8Y3P;L6JjMw@M8UG(?fK00m(B!Yv6+g)d5Y*L84?wTUfaMez5COF
zl^78TE+^JAb8ZM35<Q@E%z1V3;%j<urCo&ca-;sW&d!QY&hx~i7F=m;=*BT=Eu!B(
zF$d%Bza<Di#@I0LYMmF&B!77Uy}Z%<`au*>d3qjlJX4Vj)8-I4d+yM7`1XqivJ|~c
zlD^TG?eSF&zFBCo)u`w!^G^xJqQD3`{l~l`D=v6VqC^h+ncN9BmYfBR_DtfA2OK@i
zsYTISsj8ZhniSs3aUdZ(Grr}!*r>~ADyi@-8+OmHl$7cG^e%MCUUSPrA;4zQbnlpI
z`mK;8$1gTo@X)8+#MLKJ$|%qYWw8ZOso--_EtAHR*4zrHQL+3|8mhc}Way|69$(xf
z5NC8v^POciv7W%vyI7RfP}OBVf9nZ(4JT~*-J4^-$_zsD4A|6g=2VD2zbn{NI~Lkc
zbH*m&{hYxsMA%9LIFHu9f1Y0v7vw~9LT2-7T<%EXn#62Lc?!gDkvP5Nwe%Z;+Yp+g
zfhq7*ra6fYiQvhKW^P^FpFqBjhStpw)DM*e#<v{zZ$!Cv9M*p2?}^qpUg%LCdM%l9
zU{rJQFocy+;++sM6mU&zO+~+CnLM-A*KM32jY>IDJks2)PMhmKqNa+Z>x)XP=HN>f
z-&BK+!Gs7JeTJFH=|Is;ZF%eKwS5KGizcN>lZHuzv|wX(Pc<aQ$)yBKr$-^O`)3@+
zx{d?Bapwp_H(xL{Z|7=vZqG914x=s`fkj2PK^w~+G>cwVL3hcty^bXGVB%J#YM_?J
zgqO|+X&V=h*X{&XAgEj`#DYtoy+?1fg$me|6X7(UAf|;_&B>si`Ci_<PP%E%rv<=J
zU$E6j7`A&srvXVKp$ETqduu+yndV_W;;j90C*q7G=z>7<rblT+?t^JCy-NALZ%RIQ
zHvK&ZX5MVXDk0(Q0fjm?2HK_knYVR--n&|lH+y;UxKiggC5?}W=Rv>8w5w>ncnvb9
zt5eVgfUezhv7)~iGMyU|TjOFq>z5A8Uzf;y;X+bph(dpmbe@G{AJ4D(fa5_GFS8D(
zEh3(c_OVL|V@ug)(;fvZ<4KAU4d3P4pP{ogpJz4iBjv}`i7G##AN35GyRCU*L6mPt
z{q0}pkup!Ck*G`!{?yaJx6hFrYkg$;YPq3a1DkzGEic~Pt(>jRIn6mk&tbcrTVcr`
zpg4N$MNQjm#irnKHtTi^b<6d5$p2<@FyHdTaLgfAqZ1OhUUejcn=~$+VNSVpTt8j(
zNC=Ewv(JBBO<7REN(Kyw5Z_t1dangW*h}uu8X2NS(#?7#%#o$_BxSZFUi%poxOQxS
zunuFMh8L7Q;p!)fVBWq@i=0Z7@(v*DVf7;N=<FL|fY6!6qr;izjnmt4ek$4lZ~{wi
zsJ5->2gz=L`J<h~*0&6{`)GH-zf|KVWrV=e+oZy&v6ILa9C}wx+)vQf-1z&M!eNC8
zX`DJ%e@3h$95+XQ=~*S?AgABVovfYRB?RizSa~AE`l2X%z>@n04D)74iAAKI&5m?+
znJAzDYDQ<ugv@Fr?}%x|SGbNLGsY2usw~hiAcV+DBD{-k2hw6!7FjY9?2Sv*i;l8(
ziphhvzu|wtmk4L@RJ6v8VSk;m5Lp)U%ZsMe(f8F0mw17zY8cCBNWe!ksr8J@?iz;I
zaNRk0WWK>R2{wM|Y}P~H?}pe}1U-2)VkhEDKgdknmmLBu%4chy(4^Wq7=CFM(y(F6
zcG_}*PS|^TbRonlKQ)x;8L<cq71AQyYD{!-Ld70R&d~Fw$5@zn!-kLFDLtO1<f&#X
z{F01`gXQjfH&AK(5N?B%MdOX^rkX8jY^6q0SzB}y^$Se-IlprFQ|&DjSu}6xLi?sI
zArwp3H=eRJub~Byc5NtyieR{w_Y$^HRHk5$%(p)%M5dCG)Ed-MKK{#dX5KkD^r-D9
zY^+3BR<pPWwV^Lh)vSn`Fg%=AhH8p>yqrd|;+gPqzvk}Y&gO<C4$0wYEcyC&$L@jk
zQZ_0UD(HvUnz*1tel6!3C))@}SGsAePFM`ym-jI%JQfO9>#|+-CM3Q9sE0rX9ffl(
zCgfG30|K|F=`kf97d$&YD+9i?S3K*)W`oZ#%eZ19rsqzc=tu>`>r+_#B49}tsuJ8w
zt+c14L)v*{u2GG07bA9QwpX9ech~1DMHWXc?|Z$&_IKA4K_J`w49w9^Nl-%HUGxs<
z)l_{C?Azrvr7_Z(S$_#`w3pTM<U9bq7-0r_7X*!4L(Qi}Uo>Hi!=zAexw_WM2B)c>
zi?}j)q(WwwK^tEY39AYc27x&w(^?kr2y&LoVul?1Qh-r?qCNQ4EhQcDWIdBTmnlQe
zGU@lnZ2kH17dv#}CIRY!xEHWyeke^%-Zy{T2YsIO%TLK3Y)lDVUZG{?Is4ohj{s7t
z({Mo&h^brq9_iRmdYtcTcsNeSM|tuXUU#8t7O2K3BBc@t`|w}_)R6*5<(xf5j|&$X
zBGS>XFD}9=#omvoA{_YPnktAk^&nRfoM8DpD6PECGYi?_+XyudXmQj<yhXe^B%gl#
z7K#nb;7sok_;G{v;MR;;*g}JCJVP(J5d<j0SQC1_>FRM#DtEm%TfaU9nNSzqx3i2X
z!An+*cVI96Y`}8Q;g~)R?<W!&@#kRh&M96s0gdkO0*Q{Adl6l727O;9i1i&s>a3KT
ztsQN=B{2$3h@wZB{ZI!#uUpI72P!Xg-(ezZtb4zstcMl-(wPG8np#_4_-a32R6*v^
zBFE#1!$i=NW-D74<RIpJ!0jI;WkFwGhinM)?he!sby5#R>#RA7E?u)_gNPTzp|k?N
zq%A={3u^0$HcW`|v`e5Z7*6sV{>E!=*L*f+Pl>S+@M0OX6BkocFQbyCi?U-zTd?r#
ztCtUHJh@Q>G63k(`+?U{g7IcnZw2BMQ}m*3H%>zUjks?eohiSgy@JChQ(5aA6gN3p
zIdg(C(?U<P9-@5O^pg9c86I$iur+GbgPgBN_1QS+UUL-UOOg|+mDv55Xzz1g>WECe
zNZRj$a5EmH>c}{Y<8j;)Q-+9Z2i$0JehI4%9q(6Qcd~(CJ)-AFZLnvlw)_&4dA_9G
z_n_NlO>r#Qw@Ol6;jll-UsjUTr>$<?y$h849_XPxf2}*P%FORQxVjO|@-eeqwk<id
zw4W(4e||`$`h|yaj7PoOyM)s6TGH7x`4FgE2sK3@vVZbL&RET1854l2<VnhB1wW6M
z6ud<N(;B+GXP{A#H_(W5>Y`90%#PAlX69=orlu8-r5;~oM$VfuD|mK@LYu-@r&zOF
z7cjM)eb83Q3;A~tK(6lcn`lCXEC^A6`noOo>nkK)sBdJIH*GY~gARVljJGaQNgt()
zf(6J$X(=Lm-`wn?s4gCrv=r>4)ef>c*|zyq^366l2a~bKN1Z#4hM!hE!kEJN5u$|R
zHC*PGS@^y7SzTJmZs;xd`vL0!XFs*w6Hkn7^%1+-Zse`PJoURYZ&g*+STCz+R!A61
zPzMn)EV26B9VSyY=$IPf^plX1@=e?!?c`lGZE4IG@LFhgfEhg~x}t^Fm)1YD<S|5!
z*+m9(g6^H&XLlGy%Eb^NiVwA&0nqNvY#nI`b4;qqcrBTh#_BLIneSNAL7UIaDE7g-
zqv7uHe!mD86v2b$oqiH&dKn4jQ7P^scR0}&B}&@pmvb^NLk`J2_Ux5eh!$*AZ+?@w
z<E>4pWE<K5#0)i|phu_Kr0UdxZ1J|32ip7&Msn`r3)^;=<PM2L^S2zoA<9cQfd6TB
z@vrFd%zyWD{Ks}x-T42ts`3@U2T!;_p8`c$0g4OYwINu83fE3;D@2wpY~sGy-Y40F
z$I;?<{Lrf1FDq+FzA_KvyP&Yn%0F*z;D|P-MvCz`W0h7?=*~(_{2tF|rJ-`GUTp;t
zdT920|MF?4cau#lLI^F9;h?w>l5}Q-JawvRc{I&%EOTKGK!hcDD~g%7p|A5&+ef<A
zx!R;^>gMY|Q&`|r&i!jr3iJreIPSbn2bFVB=D<`fvVMlbgfz?<)-Zu-^>`g)cAH>K
z?x!^_@+MX6DB~YqbtB`?aloAF7sab=5I~+oiD>T6JS;e#odQAYuB8V~#%z@6RU*&@
z-{sZ?)pZ+!Za%tr%!J}D`a$W^sTRV`Uc5eRi+g87+nuPNvHi=tN^jq`){I5&u$O<0
zEXn4dBL5!-TmO0t!N~gGdiCN2Zv_=s)M39=T{`wc)@p49r|UJA2*tLwvfVU<8=$=k
z+9JyU+O|PqH}uqC)96wdU~jY_U4#An&ITCdJ?23NuMR!@_6RP{Ba>BQDz6yX#NP7{
ztCC0-!P?%p;|<PZcfalJW1s2#IGq@Z2&F3h>^4Od{KPyt*=$ztBBo)vF_G)+1BF{f
z61n`}Wr*>K;Rxe}hy^7w2}EzUdlDaeU-2BO(1wnQ@mU3F1;`5JIWel`X5<+6)g@U~
zHjPYN&LK`}IvZW&$&IQN9EZr=Q%Q;CtQ3n{&Mk7atkRM>Ohakuh0NN?voH;lM<1`u
z=2|o<8r3}nOBQ2V9Q%^Rq{CU&3n$PnB}AKOhfan4RXWv+=ShV#^@X{hg?zm;Rm_x&
ze`vW91q<L}MPX)ynlLOC$;O~Zg~7*ypyNdca>5D_V@nD=novm#NSct#XR(^lit}7g
zz+C(w3lzd!bbiSxj+f`hrNtR)c3iNoPXFZ~s{b|Y$MzBj;z$~><WLEr2VeQ}$u+DT
zZBpItzFhpNFHc{}aR^}dEK4+MlF^||si&P<B3qgCsJ=q3nX+qK77V6M@R4arQdd<K
z@FdaDuGHbag)4}3SZb@t^tar;e7f7Iu`72-K=E+>?J=b4fq(ACrQHwLNuAXq<^*z1
zRN=Oo;r2t>h?ahjwEZlFibp_AG!CesrmCV0+}dRJ>dviZYu9N(xRP2)kv0qU28dDt
z#D5yZLsEcDEF7(+s=Y58VItswQ$&socCz>Fh#kaZR<uv8AxI=H{D3e)1lf@zyial4
z$75;PHbANe)GE(OT&|{u2pi*2Ic*?zpZw>`D|rvPUhRq2C`lr<jn<#`bM|cxSDTx(
zw^h&63|Kv)zWZQ(P%6aVLxSlX*!X6(mV899R=K|pU%jQCoMdP8uRU<FaN+H{*KZ>h
z?9p+4{hTKx#^|qWxoXF1HXVFApwZ~3@%5WzXvLpm?QtGSd{^5<GVtL$x!eRV{$Q(H
zNM&QBrmr&yDTvy;xXjE$OKYaT<ac{}0`l3`jgtpGs|a$`C9@kqrDiqVpHMJf*VIbu
zsPFiZ)()i}vVApV_+r=t(d9bnW}ZC=&yCIWb|Kq$u{poxY>8z<7O52Ogr^8AKfL=A
zAIR@^18oGia|lHEiy3%90kIS`HYdSwQnQ5zZfoCAey~QDPTtaQmC&H4<D=i4=cV#J
z;;nPt2ktVaq)V?81fzBP@hm6d3v~<nlyz-mqXs7x31hM0g_8%B?d-`EfNlM#0Kb|o
zwj86<edxI|z~gKU`1yn1;e12(gF_R%eS=J<5qmB+myg%uW6~XBjwK^?Zt1rB0F9gY
z>xBT}G8zKG-L<*3kJO;2kMPDt>*ENs3mDW#wJ%D*7yWnnT-ec`;8SQ*KZhNd&5|v>
zSshtbZ3k(nbb)lMfBy`e?MJ=7Ev7MMj$EtjH)AMlmWUre%T3PC)S|<|VN{*pcO;&t
ztHjHhG_*Rn=}VDE&Z9ODS>liplPAs3-r@b@5hJGH&-*u9CJ~Dc7JVsiv4yuk3kA2O
z54u8<Dos$RbV(!-zauX;iPHIERBkJyDgGQD|4}J=D+7EV4jNjFe?&r=oP1|6bR-HP
zdIu77rw{K*R^USsNdRQY;z#v|H+nuF-94DZ^+=}cpw6tf;d6T(UhiIuRxlp-Kz}X>
zLl1-AR-7|sh2|RHcC**|jIj!#u&iM>JS}qhpPrp;aOYjF^pOXM<)#ea;AS5+F+NzE
zSj@JGT^NVOZi?cVhrd9+$LbPzaoLF)z5#PA3>$9qy9c+Orkh9MJDKl>ZO@OIyyhi#
z-k@W<dEMgrTcJmq?s47XEgh%E+=+`3;bXr*d4V7aUAo9VkNb~(E*VsFqqhjjwzIA_
z6pSfYn_fJ4(FEn>t$TgBtt0S#!D8BtU6ox1j1($d-|1NKtvEL1hdR#0G>8?t=abj}
z97Z|;Mc_bSj&N#Cn~6eiw={AMfkFv*hTh%nzj<$ia;jwfz^i}k-v&Y}u~Po0s`9TS
zB~1S>`jkSwT@VB8<~;!KT16E!L=Li?NPNh_c2S@>hLDkEE?$HX_QO{aesiWj<>Mpg
z^0>-Q)7s_N#k}??V_#YHUE9i{bPy1^t%TmMIVK#{F(<SblSkDycSd59?ajmLUY<qu
zuf+M|9_u@F1&%Gs%_GE!LOaaulwZ!)VlbwXKN@O%_mDrpOVv#wc*HLTsUOy49L}tB
z5PP`X2Qg)TNL5fpk6*J(RysHe6`-35DJf|QuCf3G3%?%WhZx56ciqX>)4@z>91&P5
z3VK6%+r4_PW#uJe_MB{QZpqDcRf=CgCa`V&{~=r)|9?~;%<TWQ^qF*8RvK6l6?~_i
z4RC6KPeM!8T}c6*ZG|L;YKTS}vH}502-g}3&k+;dDq=xMS4E)JBvBwL!f%*D`%ZeP
z)xup!UV*8Vb$ruP=^REfj!a16(w4i%B{50H>@9v@v0Rnp_tdGMU8-j;<U|&Za?3f3
zXD$=tb1~8zVXu@>lxrxD^AJQhO^H4rR-`8sP&j$cHczXzH&L}fn_m&hsH!XBB}k77
zmTkuD!WXZRQ3z9!k#`Q>>Qa(yDTX3yXE6Xr+F{O=9m$ogM+vQ{88d9%tR=%-!8lJ<
zH8nAtK^MU?T)EM)Q|dBL1JhB7nf1kw{H`xKUzP=9Hyh<SR^8xD4Ar3{$tQGxa?G{R
z{X1dvwQ00-)3edL1KR;TM0_GJgtn{S*kt98_(&l*ZJWQb!Ay*gd9V5)g#)(J%rCMc
zLKt%b18nD&KC%+VNb^~R$L7YTxzK%tPo&<ihbq_&>Mw0lgZIl{pG6c`pu5Ho2#%V`
zvj23O|B5`w{NI`#-Gu(XM4Z2RDjw08?2>Z-gr;P~IcU+n8CxtB?)m?vr}BLtVmvp5
z7(u^(kHzhp8tYp4oLItlQvpm={UzcUV%e(!b@nwc3u4r_sNXl-+q1HeX_%M(>0$+`
zdpusw=gG-wRMrjsIMhMUH=%VQDZd8SXu25h>X2uKExr;<Apvq8opQ{$%&yj3zXg`Z
z@NT7D(bHc&%Tnc2+KhVj2YQ(Bh%4EmE6P|{88E>DYnfGtM4nPkK^4XNW%un1^PJ>#
z`j_(&ND`5i<lM>;6K;G^y&o3peSkaUKH_Z@WiK>s=P1L6{Se-6-pWBH8<nAf2xD>=
zHOu^0RCN%r0?38DLpmWYWAkr@lB9|MAH~)GoH-YJ?^EkssK31QuPDb9M98_^bo17a
zB&zd@f8UWl($qtQM_eKc3@t%W3^8VleR;fdkjFAAvRiL{-wz&;gZLTM?lRh&v7{a5
z>SrA_K>pK}{f83xUw6SQ?Eg*1iPnJ8P*!i@BXn>=jTYij&T2VU&~C0?Du}^t)}!vx
z!e3Fl)dbTQ@DLLs5J1M;os8%r4Eh0u2#FwCWj{15v8a%3X|Y(}%4J*KqQ<@GcCk5Z
z$K~wq0r`26-M&5S{xZe+Ue&$y_WfAfOkA+BNf|FeqTBs*w}BK$84U~+T<+PKH$6Gf
zbzn=Jnm4GFau+lHrYf^9Jh*ftx0ph)AoZNf2)12GKiX9{mpHZb%0u~z2q`fSjK4R1
z{^P@pM(ILIDI|1MwTJ%7W7PdEi_<UbjC*kU@6s<nmoO%u;TDYTU$#`95)W*E_V7F1
z!WAUE0;xM+#~hvFHP+`v^+l`4CfixZdDOAGS9;k;)zHd=o=V|8p(H3mZr@ZYBbA=Y
z7SYg`CvM*A?`<N{hZ+ynusL>tdS($!;g5$Lfo=g=w@j)WIxpQWfu<m@Na(yRG%%&}
zvgb0|g(akTrRcPR-$@Wd3dCjc3l>sR(fNOrwvwW}LcCJ;C~~}FG6epTaSBQle=fLK
zp*@OQ;j!l4mHuV;lnpH)TTwoe)ptf|$yJjqsVmwmUn^WIRhF}=5HzP;H07)b*cP!V
zW{$=PsxYvwM<XlREojYh%z6`bp5(97w8Gh0wSF40J4U@!b*8>^U!lc9;Q^Y^b?MSc
z8Kr)js4;n`)r#K`3yJ5&bBp2K`m8EndwMTG6duRWCB8|pN9F$^iRR>cTC6Xr|9+@=
z651l%GB-UpSso6K?wpP>re4vb?1+hp{1PqJvFP>QufZ6CL|+Zq-z}z$gJiS>>rdub
z8P21Xs0)OPu!3EL)rxNUdI!v{F5Sma=N9%&cj6w?ZXMIrv^@szzf)7wjs2`IFfL2~
zbROF!Sowh+z*Z|^tVReI*_@EKcj>yOJQRFbtT4T@U$OXBmqm*+!N-ozXem=B0y4IQ
zR+rxXiA++>`$+mAP`c;MQy(7xc@Mirxti##WWE)b6Q2!D8CAiRKe}dcv9qJKL+)Y1
zIZwzKNXrGCgheM3u&Jch1@wie9!1GQA93oauiImXpA~>Y4)2o6tmLwk@vDP;`&rEC
zca75s=tFhfkRHtC3SK-acI$Y7)vi?DNF8>X(2V(QTw15aR!Y>xgUt+s<RX{ypuF6{
zq~x&%{*b1~$TlTfO0{V|RU^Y_*znIDuxN+__~&P0yw5LdXHiK)6~^M#logCF!21pp
zeBE*V=_U3wO;<+=P}(0NX-a+z>s;k1yn=fgf@#{;L-J)^y%_*R6q9sze_#tyBL({8
zp8_f#n3TZ-g^B&r&n6P$JX5BK#TK(Bz-u0pT!bgGKI>D1SK*`uvcIUnC0G@kK_eL}
zIWIdU_Ciz(ReQ%}C_f?l@YHjldszXoa7MCsn-K+L(ghim)d`X-)K4Qrcq@bG%b6{@
zP!&8snbI*qI(rCWdawghqNVQNC-ZhK#2t)GBA5Wc8uEI}_R`uIQV5TdrpR$nxe?*X
zEJn+3n;#UWR!xgmba+h7nv^g0y)=)b3kM)343es&Xf^Os6%o{!lpLVt`w$6{HVKiD
z1Ep0k8gxhvN{!0GdfK@uX{Dp`BOqXfRiia~R=Wnb@t-o+I{e{e@C6073PXiL9b@3M
z)sA_)pBAb8I-w^IstXsW--kGr(<5WxxG1I|%%MH`&q+zmx6uh&WiYA21p$LzZy)8}
z>InERb>}OhFHwSpWV%C2JWg9#%R-lyi%V}-+z@{*q<ke8>-Vew5^5Z6$7S$RY`okx
z3HHZ$u)@1$m<|rdx|g|+O%Y~F1Ktxc6E;0dm$PLxu@lNBN5&RSk*(Sp$~&LQ55A61
zTH@+7MB56qwnim8tAy%`@nhUU;j|T%G@+Yid<zr@PYK!eONZHS;PHLcq`=FUljfT4
zWFAQ2Zy8Tv?#6#HE@Pd0mXS_N-vBjDh(|0vZ=4`qq5}^J{pgs+dPZ~+798Hcw$!B%
zbVm?G=l!j$sSM$XvODl;&czzgb@~H^e<O3TES{Fy%@ZUU6L3oUB8|FNNIlMa;y+7L
zQX#P$cbtCmL+>bXl$3V<aL+^4wj!N65IC?rD&CA!j#B}qJuJq>cQZJ}B|I2Ch=k3(
zwSWvbZ8>#%0B@zy{3?0MJ2dW_Q~;|BgFkS1uk=RyMV4e}KmPi1n%|;@njl*~L`OnC
zRXn697$mSf6)Bi3FBR|OhS)x|@bs}V4e(;@cHaV%`}60;MSh|9RyH@g#iQDQ$uK|8
zh^OuXiAY$ya@*9|^Es>{A_&$@=+11n8a{3r0X01>HFdUxybH04Gye=LT#%s^<o@~h
zuD@R4dG0f$GRhaL0Ngi-?j|HHkBV7pDVizZcVJ3eqePfF+ym*wLmwZVT!9A!w3~<D
zv4}ipEEhYsDZk&bL7`=I0){0C3EIm~t1YZNvw#fk2wG%K`Ur7($(FzpU;2ebCwFi?
z>lWu1O4O*krP*-A-d5Zyw5x_9)=HkNb6i1dV?wSm)8=CPb5ICqr!YIN_zhCs0mmga
z6^50>C92UgaE5y}oS;LBlVyAS)bwigQk)Lq9O23&3ZPNP0H=|;+O4P8o36w@y0cTE
z7CJ^Q8jrei!?(0546<A~em)e;`-pk$q&yHa*<K{-rrT~VNt1y-H}<znQUMbB-&iC7
zZMwa_fg~kWQwc>g#}LMO$YcX5T2=t6pMONOIfk%3&1dHS!`nMH3EE}rx@p_CZQHhO
z+p1)xZQHhOJG0WZZJk=t5$E)KqW6mawEw~!&l54`HE-Zwkl3nO*eV95=nLD2;$-us
z#FudXRthbf49}1VJUqpTgd<&b1b~xR4Te7u{-a9)P+es$6w1+so7%uEXerB^?geEx
zpm`b+OBJJ<W6!$nUpZG(3&mm=0$K+JWZ<~2MP@5&GXUdIj-z!ZAd(6Jcpo-5E$T^g
zUx4WR_MFZA-CF;9w8F6N={!UcxZVYoP{W$$jxz(z<(hx~1&&^~)$U?}^3(a3SE+Lt
zR<=bK@*Bb;Ib`413A@J~3vPToVn2NnkFPUW^v!a0Dop<|KgfocR)!(!GnWW!pc+jT
zsn|<9(utFiQE#c5#mULR1LXzM&e$dwU+#?EZ22GeE}EzpOFyF{KD@U_wbanGe9RGc
zL{Q2L0^{I=`3E?}zt@A_FAEm#p$=0QkrKXyAJbrx3XWg&p((J&hfCtKi$VJ55^d)A
zyra*<;yqYUCg=3C2jzp;sZZ*uDhAi`Vp~>`>{@#o!5Ryc^pMVLWUjwhQX$vgJo^p>
zG#L@+0_DFyG%OW85!2E$OcLp?+lyDdeZ^1vd0C@japLO*z%#DfZf^N5Hoc%hIZPn~
zwXwC)U5Who8J;@;Lu`W{3!;F)L?!w3J~(|1FGMsjY?oOaR1N5vT?ESe4c2U#RDkBM
zdjB@YO-;rekhXhFiKPwDd^x<qXVK&XcSy&yGFe)neuzWH7yr(dG#nR<1C;4|?!I}L
zdou;k&^TRK7N8b_JDewH9F|K*n@07~XzIfM2oADgx)b+~v}7eg;H+Qe&^+n44Sllh
zBbax0kB5m)zk50HNPp&qkb;Uex)pnwOn5k%@$op?9N?GHZ15TP8}H@XgTm8w4x{5%
z+@!5Xh!Cmb1#94dEjlr+XjDRC{{VhiFUYBtUyTRhwf%+v*d?e}Nn9u&)ZFoQ|A6ot
zy(>C5JzV@3H=-x8@6Ar-+xKtZrIVi?z#l)p@sNOP0QYpZjrY@{gP`9=@8KS|Fj{{w
z=exGLlE-Q+CRAt!jqQ6sks%AA;aJx)F;UKXG#bb(o<E1}{d_L;W{Yzov#o(X20V^|
zuuc%NT?@d3`aLaRt*e9KL~38Tzj2?lm@s4e7r+w{%1aJfZEFbLNXEvdWukWK)M^Pt
zdv=SCrAHhBSatdQTEOLmTN^Hedz5b62<U}olV@)1A{6Td8YQ@*`WFr!OZ@`S=t^zO
zJBzn%dT+Tb^m2QT;5R$Q6ME`&GM)h3<*|@JmKaC?6D=s^I{ZKRIlKXF+jqBo=;p(L
zvTt&|Uy#>+iU@JFrfRm_KBvINW3s*%^QSM=z`<)zN+;I>yS^&q40_r>$7%7j9;e6M
zD(my>78JTF`5JN3&b^GCe;Hk9@xihk*+Z_Vj9Iq=JWT9^*51`Ma}`j<#~V_~7RH8J
z#APO#mVXQ0k`*yF;?)Qp%(aDX={wBDyEq9eOO3a5ob}P<GZTO^xmgoJE6G}x_&{HV
z3~ZGQIDvWY!>^4)!{P7cmsC|x8!@N$n;O^=!l$8j8C;mChhCQkO49&CGTG-DUk1U3
zo;cbIDtH(X1*v_3Rl4>IyIYXiIu%PxF5pI`%)QiJ^1F@{d1MZrXMa)JIaPa^u2Oa2
zw_Y5^AvpP!E4zWaLige$q(Bb(-}Y^JJTlnwF@j8iXgv#zIk%3kP@>%3L5b>iZRx3-
zpMYWPNn-4YW$XZ|OcXFm?9cN(Qs%HNX>wb9V&$9%;5~!4`$!CPdAnwYSgtn_%Gq|v
z`MCv?JTHHj7u5>J;xOT}u97Mk=?A?|3K%el6kob`b4|f@_A*A*_hOI9<qdwwpx?WE
zjn@#zGsI6@D+(hq#0zu9c9I%G0%Lwx>;!`_vE{RqHq2;)$KqG9lhU8m$t7?=3@+=_
zzQ;;8kfI4Z!q8#0lv21^y*$IlG+e|ZR7Xad<9)1&<F2t51Rkuim95`dkDq?Co5bUO
z`OSe^p7DuI)WAA8383;j5MdkIU_=mI{aSxn#qE^$M)WpZ+bSP}ZQtq^hfDCl&KZ6O
z*Xe$EDwf9gb8>9oY4QjC?n0r)Jyk`200w9M<ibS$>udtSkazllUB;WUS#zKEEQ!-k
z4f*<sNWt5Dj1YF|3qKD(2?(U$;5Q-*b?D4!Wv?NtIOnUESMB|U*?x!LUk_)^8$`?w
zn~AN5FDB|mDRg-*>wNr5f7AXY8~e~$DSkqKfCn6;=U7n8ZYmz1@YrNOyCYo4DXi1H
z4knX5ylEoI%aXYRK%D@j&eUM-{UHs|30wcob)Caq1tv3SB_Z<?wEGnfT+CH~b4cM9
zv6NAvpqob%LFuyyal;&KTkYQ78$j7X@F%W|yB!r{g<y#L!&h#1e~c$B71IWmjGP**
zw<ZI5WUvxGv3H)afjb*Bx44gsjD=+&b_2$mDk;}&<xph^=pbYHEmgPIyeZB&X3gO8
z6oxy|ocwgk;^S|r!85>jfTp#HBEBe})2BpC2MH*%1R<4fw&8OfSLUxEU!Jeow?PHw
zSE!Q(Wj?4*pQHCZZB~P1@k4SF=QqI0Mb*Bk(8ZR3?=@bD50OV_Z0oQlAy|gN4RXqJ
z@(pti!_UX|^7sb>dF;^h+$1#}F?q)k-D8t*@I3?1(Cql*EHQQ50x-i=4Gjq+3rw_u
zFhYk*7PP%ejo&q1tA5S<^-Ilj5`i}ugR}<0cg+g$sNP|Y)c5X0^};4-3qu2FslQe@
zFu^5xQsyKbhrD=~?z11od?tu<XDnqnQ@j|?1~;KNi;y=L_MMsC4d}#WW6&<<DPw28
z3p1gR@cryaOPirz)$%I@ya7h={R11YLa(TU%JX6v=R_~KZ^H&)jGbUH@`0hIf?a_t
zgyf?3=-$*C!o=vkaPnkjgO;$vI^Z%qekARAZY^-K033G=tMmon<}65j<8jQ)Jufl5
zBE(>F<O*Kt=hL)3qC$y$6$Zs&uIhtOtP2KN<M4al@E3X@LQ8*}k(!FNhumv*vo^Y6
zO+40rv4K^yWccHwmI&h=#)k47WuchL7-;0M;lqd)D~zuuSS58PBpS6|ZOxBwg%*yL
z)(x<B6eia6_Qxnq2g1UkB>lPkv2y2T7*5#_QA0P928dKjFh4f$7gJzZBt-yQXOK;E
zGv>>;OW~rX>mcmSvY!(F3p1=SdDMlDBl8v+LsiU~<pG4_tZmh>9(jCA0G<V@gUlrR
zQoI@Jj^e7VV*5v6KCgc-@eYNH%QuQyq)rOvOnlvkkf0u3UCr4Y<~Tg_K)Z2t^t}D;
zW(;;RNPt{4wswX<(ZRc;59~Kd#Z`?DRkbF1U=xN5N|ho28@L_n;!7>GQJCKO-I-Ex
z5n{vv>2}=m+e5v1wyXC1cYZ$qdkTjz7ruF)UFSmwMtNL>7;W$2FXS(ZkHD<HpNWiS
zGuTux&9!vR`3Q~Z7zOr1n&C91@|KW6It2@raVuLH9ume3s_67e|NVl5eKhaFHIO5P
zidva!nfkvK$7FSx7nQWC)2<4_G4-ee1x$}(pwWp^Br)-F@}p&nGm3@n@z;_Oip0M=
z9Dks-iF0KB6Ttd6H<_5Fjf<%hy_k)mi>ZjIvAu~Yy^N`yxr+q>GXv8<AJAw2hdGYi
zctYWG%Od+#%oB-9P@_akZj}h)`;&zbMk9cFoo>uZYQS?N{1{!%j;9jTMo7UzgXEea
zvC_@KN?~P{Rw6?Dm6;6}U>p*pxSpsnwq$_5l`r31g&}0kh(5eOr{!jl{o-ObP4XX_
zQD<R~MyUO$D6@YEG%oId<S+;5M~9q=Z0|o7l|%QbYlkPEhp7mi=B(8%>9P6>BCY@x
zN->qAyB9}F9MWtBlCAVI;elb^HBDz!x!>vSzG-vW?_`Y{1yv0p1Rcpm9!0^BCmKZw
zd&zl8QJyV73OWfo+H{uddSFGl{B&J-w!iioGLaSy&y|n~C%&V53@=O$w>3Ix-dCM;
z->}yFxp|JPWHgELCNXb!HCOQP6X&(uIO@@74T+cdPiOvbDf0g{G-Tvt{l^T7RlOCI
z)v<b0Nm8kWhGJ6p-MZPUmj&^#nyuzzP<@)T5S#NVjkKc#iQ<OhFn|I7%CvgI{2`Fy
z1rP!u_$rH)tBb44p6DX0@0zbK&zIa*v__k`y{~5+&0av7!WXxCpL3a=uX#^CczZ_k
zDciFOEV+nCf9b7nMD8D#6cv-c^UG|6M;0OfXcffi6%_3(ETkcXr%KXKj4GheMv+iI
z#Ug$`(Z_#3nKr<5z5<b!TK-YmRj4eLQ>iSSV#Tl}+X}I1q!MEmWaVUZ6zj5z(8?~8
znpn(m$&l%$B3;a?o}Oe$l&v|}4H7G5-B4k)H_4nHNlzrxto{?8?)iocTLRliK2%x7
z<=kS`&Zcj@UZq>BWiXeiD$VrJR3SKn48GDH!c#b0#agZebJ0x3yT?Tnpe1Okgr&)r
zEqoy?1BIPmS!AX#zQkk2*X-{VsU<;MfTm2TLe-q4CDtuntax@fBX#b+WJN{wyPzDw
z3a2^ooxMAQ51)z5L>nTZc&uhje4=%{SD~w<%#4h|bSgF<TIg4mY<NcPyuOrGItwtX
zv+L;I>K)B0)vj-e2(;$9u>w6sE4y?y(Jz69$s(3BmX$3i-OwimlCFVO*to`d;H?24
zpDK@HQQa0h7tjL>%B%IY6oPJytt&!uSOaqM$j3tyYR+&m-nCZuZtO0G4p^<cXNpQ1
z<av`j@c8e|P#V5;7Hr%jyOQmpisl2un4aN39lee3%G=tW09FCrPvaw`KsiT!^Oy_)
zznlq<0QKQl@?S(MYtTFVpWeqY^A+j_%~q8L$zUA}LZ-1ULIPj%a8`>iI^>`njuqJ>
zT;PaaA|KiLl0MYalY%X3*7U6RBJ&|yw56^<(;ot|dkl83&9i?*3V(}Pl&!+rg*Fbf
zcPp***z(t1*|~o-JH`bhrtGGc7#+zoT7Y0}yv>om3hSdOhDo@8#3hzVrTEUeUX?B1
z*)xgyuB`Wy`a~UIN+*sq0%_1hMh+6+g?ZP9A$je(9LyKm(4l1Q*D}NEacr8B(Dlrc
z<Wtanb*DR{(R>YV-3)zKqR-UGoO~&4nxY88bcH|brAji-GtF!PjUslQiccB-^_KGB
zh=1b*iRJG+ZdyNCqeSGTSxo7F!zJ}GrOn%R&vMZ_%lf^)52-tV@@Z)^hpGmKd5NOX
zEm*|MhgcOOz`;V-^$+qH*66w5?Ndij2T%90HM8RMBtbl{G4rR9R7F73vJ8yi^iF`c
zxqm8rcbkNArG>yD4d|mCVDgLY<jMLy<QMy9D!{)uxXKgd0$M{iVQW6ho!07j8+r2A
z2`>i02uV)Kuf%3?F2?mHjlOZ_11_x^V237cy>mymAR89A<UC~Xf(5PFFnCPq)s7w<
zIa0;!UkVd^fEM+2YhZ$`V<X%_b@an1`JAg$+(mW}2$w3rhK3Ng??W6|k(;x}7Ytb)
zr>5z`#EcrFp6<o<1p`L%{W8)-Hc8|1Z$8FyKA<8*E*u*tzjhM{@*e=+bN-qjfhH7q
zhsgF;bM)XcW>2uN^(9r5r{SQo@M90tU0U?{tTpkV##-Uk@9qAvCkx@ag~qoc^59CE
z%pdz5su6$+$;g2uz8x#-MAG{MAbPJ6w5;QFzU;lD+r#2;bdf}vsGOJxO3D^a@r`M@
zU_pVM*+zheDPz73xiQ*Dv=;Pn3d-WMPE3Q&M9@f}J&Q+Mv%s&fb!{MMm=Jw&!R_pr
zcT>GmLgU5lx&6Lzl2ei{Ru3{6h2|XlenSvZJ9VFO4g6<u^VD{I{h^}{2koR*(wsXq
zA@V4o>j&{=2I_JyK)|j3G97;>!lITUF`+1x6TRu=){J7~-LSmHk`*ORk#VJl4We$}
z#P=)adV0HIG}!j2HNp@zvvM}(Al1KQZC(AGu9g`f6V$9S53V`rj^QRSB!hRmaqXmE
zb}DV{eGrlf+?o49HzTN|0z}>HX@HAkqy_icch(O+nXA+^H6QmGz#E1~_HV+Cyw7Ec
zVwSx^`!GLj37Bk9d22e^t;rkW-z*LAj-T1pnW!(ek4$c0bRTgxK}dZFHF41x<LHqB
zU^YlE?Od>*;?tt}A5#T0MrJen<>`<ZIlSgiufNp<GD1Hk*q?|Tny&A2*F5Yv0MG9a
z$$z5oB3&v?k|doW-rz=99}|~;Y2<CJr>WP!QX!$*3VK39A65nl6298~N&(L>bV0`X
z?ezo9hT+w#LX^lPaawAR(2ju!;gg~nDNjk2cK<v;?~c>pr`N*|%_h*^?Vu^C<|x)4
zUTvV3uN=`RScfQVyAGwd$J3)+XiJ!m{R@lgg-!2v)2$;Lwkollg{4GA8%vowlAkC+
zJMWmIa!5^)i(;Ylm#`G}xVCn)^=wTDmWAQCvreCJ2qi%v2t^H@Q?fc|7=uQ%aUtxY
zl#8j_KvC16m)&Br3yDZ)*wDG|M}^gS-!PIQ+s~0u_s@OG`&Bc(8YdS79afNEj2oAm
zeK1rRL$BeAHp@FwVqpp8y5msO3RqQt%W&D*=Wdn*s29EKreQLv>%u0lg&b~Bt4e5u
zVb7kCM;kp)AbjEm%-&#8isBDoM{V|heBJ#w!QB6O(_&)&hfiNuq2Fqd0jB$d+T{|1
zSPm>G05Zu0P`M$wnAe7VRE=rS2z!+C@CLmzKNOc_ZqYj-ry*ix^AuohO?%DIUl9Aq
zu_ZDUf;VP8t_z^pbhR?+hy-W6LhY}%fzU+%>FvYCt7<)^mrs{o_8SN)6#Jlo>$g#@
z=T^0IUwCFekTD3s$0pcJf2{)t)y9GF5MP&2?KDKF^)hLZcGkx*<X>&W1XJ{+J^5d4
zgWLaT8$<>uXaiVfCFjcgx^?H_@5Ma^a$>O)7xrl#-T#Ukx;wesJ$kQX`Tr$u_$K?8
zxWNnCmiIrcN&i-X^Ixw?%#8ool8j9Z3=IuTOb(-6Aj9sT|F}IrJvD(qt{#3}f4F{{
zBVWK<hTt<r@tdUkjxqiqn8$mc4&Ud7N~Qz^>}3;#`AowT<wE;QxDxbJ&<*tsjEyO3
zEn6BGRGAwX9A@b&XeOoSC>G?!SCt!BSX$N;8kiUul<%fxY9*y-rIqexY9z#GWNH8%
z9#VjukeipJs8Cs~nj|HmXq;W7rlwwy9;00xp%-sho>L^5r<hQH6r+`*B^Q@av>lx!
zQ@oNMmr(g<*MO5{KR826Nh?L7_&g{pMc(_z7&QTL#pVWt$H$8viG%OFL~re2V&MCk
z8+_wAD!7P_CuC(M6m)foidL%8YBdPO)Vl1!pI9!I{F>Dtd**h;>cl~heDlGZk>t_g
z<=L!kt8t=F9~*r5%7*}WQa5h=55xHH^8A?@IsbW2khT8%^@iMhqw?8B#m6281wvMx
z0R=Sw^><_|Yo7r{8fQJu`SGt!c&!rtF&6duA_6t-u6E^r*d2^%2uOGDRzoYfvm(7^
z*72GyNUPMFnVimbvVeu2(6xTP0^srZ`t-7XmOr|#^X0>>q&R@$qT<+wx%FsY**IpK
zW?1ULZbyiE*!A~Xw6Xu(6OA_aaA|k1?0bG6z?U;UV4hx1!^aSq<uMW6J0fx-5eH4Q
zBwbb0_YY^FX)CJ;3{d;|7A0)X;(puGBHKrj9z*~}t{h_qJ4C&kaFoj8`l~${wcclS
zQt}+>6T$Kx@t5H$UmTaf4`OcNkof+j*+yQ;nu`oq9?KFElQ-2f3(5*jS~VbYr{z>7
zNaPrA2W%7FdLgO(vk&pb_T{vR;|==~oH^e{_wxm0yqY%rpN8;nNiF~NAHl-F_7C-Q
zwg$9{vihGM#yIcFuw@Tww{;z{q<1veD*H+$(Yvn^a08L;009`F0)%Zzw!JSg0s)WU
zRCobVk)|d!+vdU}{O0dwt>!<9+8+j?oHJFN{pT4^wKJbT?<<lsTACMGoiE?dt-am$
zB2m$>#7N<nDYjcJUW@CJHP&o1&EGlAsYO52tGNc&Z@|W$;wGN%aiU}`Q4OA{h9Z%n
zi`i%RW?MfWvKM?YcEr~)1~wu@a=6Lo`%KOik&`g$rW#FDbNm8V9NXrB2aoN}=JIY?
zd;3f)j*?-uRCD5Z=WSv&aJR7Wm1pq52V}+ad9_^Yj-P=5&0IFyO_uTT@ybVpA0<?(
z-;rc8Zc#8Q;2d_3TPKz4H=Qev?My0HZEAS?7Z$Fb6|T;zA-_e-eyPS-Cwc!;&0ku~
zPfS0Xk}*SL&P<=AL9I1ri#UvmC0SJ)W|~qk17S|^jC3^EHp@z@pW+xvcg!#S8KN=e
zGf82b#AG)EZA@@9S7WwLYo6jV<82IB8?rHLVbD&ujRJ4XUh9v-9SXz1HbYFLcrPq7
zpGy-YA95a&W$Th{n1<Z|8n+r3cEkL@WDlP79XyHt2s(l9;V_wtlj{_9OBNo5WnG<Z
zjcx2@w;9a5%tQ~dueZ3mqgXQ<8XgOq+aeKrLBb0(xCXB&r;LO0q9diI<o<bv#rYI{
zjqe6jG&D3cHJmQl-)BkhCWW6$AvQx4+eR>!?@eMqgQZ%_P+b%N%nGCplHb!|eJKcg
zS{#v02BjvUJ$uP-egbS-jb;UJRBi?p2YHVRTh|`jO|!!J928v)b3@sC7MISE{t3W8
zp#Lm9M%Eud-;92t=isE(`4LnQRng6!*I4PQ<xo)Ddbac=chFC*+9VZ_xR*<=9iSFK
zuTVa7iG#>`yn%cd;k9U6#o?g2h}-1uuwlYHJH8<l=^v7*-A+l;LS}J{rZO(0I?VGK
zDLfk6yA_AenJoJ8_n!17$7~0@QFu%u3M%YDb7f7<VEhhvHTRhi4=RyJ0Y1ajY=5#X
zt(*Z`0XM1W6)@H>e1uAzEPNjD(r`4<x5qL$YY3pOrM6)dPYStGA9-v0G{uT=Je8Nf
zlf~h>z(j=PHWZif=MUXjdk1ljz~sPj`|>rka}tZl1I8sOx{SD&NgA}fow%ckoLvgQ
zYvTyxX8_2Xce<lijD7nMH<GR@j-8zb2gcwuii<<cqg_gIl#)caYpzZ<Q91Te(TK}-
zg^nl#<sT<uis%yE+#j=9<<J7wE9Kf1$*)QT^{EAFzrLUc<hb9$O+1QaVTIqqHyjhT
z%r(W(J0jL7Al=`>HnqAPgRnnjBH`>X=5)xajG<GfDl8CIbGz~N=h1~LOOpHvQ60K|
zIQxyuo{W|3%MNL4y3j+v=izS2E&dAshOr9Rk6sufM4nZ05p`$rYo&ewtqqEGl6gP!
zlj+ZZot<UeB1-x%KZdkBW@J3ZSb<V*kE`0r97$RXOTnJ;xGloLRuXw_^cw9Zqc@ZQ
znbbVFL4N9=2h!7{o@|#)jxjxl2&r+{pb>cw#s2p*mPiw;V3GGo(<+dk+pjNiAfDI7
zR1uv%M0lsjo#IJ5q&g_}x-s0$I=A@__z|e*FL0u%FXgF%oRgF!tooz&BYdAa&jaz9
zzW8brxOCC3F}y5svt6^S7v!Eu`$NHNLP9hG$=o;zGUQHD;{fm6s>=~E8-bVW+F<kB
z$$hH(9zr(SVuUuNF%~F{NxYCv4oxJB=5ffZUw*7<AEHg0Bb$vJyvX|J?uS3(2xxMF
z(hh&GO;2s{5FFV)6mtfoX}9k4lL9ofmjEKa6389;3rBv2LX6Zg;Jpo|j!ic<bzW-0
ztjuvmUji|)Geu5c0lKY+Q@+1JKO-+{6{)>#Z?Pr0k2k1DshDUtlYImZ+>^RQ{$^Z$
zGzl<Dmklcwo2X?O1=>)NN$DM**g|#)T%{oGk1b1Ge#D9|J;~QL2A2EMUB`~xcx=j+
z?0uNv>MoAi?8|n|2N$%b(4l7qY%|@bZSG}<-_jlzqGj9hdIritQ{X>@Gc2Ybi(?xu
zWYkao)=eTZzBc@Zx6a{bm4-K9dA>^<6>27Ir6FFK0}$K2E<hRkt+`z}&J7d+cOPqQ
z=L^K%Zf<gFd!G}f^Ml*sQj{C8SbCO9m7bwnG|5k7z(s8<#69k6aXT$h{Sp*(OIQVP
zv)F^{i%x*w#y$K}(U52053Z7~q(=QrNr1s}6dsC9g;Yb9E7O(c5FD0iIj@`l=v0pS
zq%*RSI-In6^YAb^NIwX9J<&etZZbBwCMh~|rf5kC+J`F0b~J(3g5y-BGk=k|Z&dgI
z71V-DvEyb2H9dyis5=5#S7&T)HX(VlfPz!dg_~Sy4I{J2{?_j`V>@buzD7hKBuq53
zj4rH3;}A-~s6?Q>Dj`7=XDY0v<tAuo>0@)S7I|SetUNCIvBCccIoJ3z)bqY|(tW=b
zSuK^%D9TpYTYmjvR)Nay&NuMZy<%O=&HDPvl}lOsU=KdyQvOQ4M|@<a2E6h0wdWEJ
zqpNuuKvt{PJCZ%T5s=v}(<5cbqoAv-rnhySU5;*5A%F4*aAo;`TN%QrczFtKYd;CK
zzXlL-qc1e`gXA(IYW)=}CWpS_2&re6oDS}8`)JEW3@rEM6SLGran{Y!s{Y7Ox4P_%
z&PzGogy!b{Lzx&}kOEx~PgB>H$EK(4@>GV&DS;SM?lqTu*8l~}!NM*8tceNMpYF}y
z>#f8AephXpS9)^ts4@mxh%jprS5dREm=Tvrdz&d=e*?m*-$i!a0yEl;M<nQZ*EcxT
zJP97vF1O;g<<@PBd=3Ctb8C5&8cS<>YYuGmW#!cglu>1_u<cR)Es3V~I+(?J5QiKg
z2j-_AGZaF9VEkE$n0%`_Vp#I6#q19)VW)E4=TyQSmNuw2E4wB56>tvAgg=#z3DWYG
z=#^@{DUH|zYP!Lv<)SfD!m6wzk$r+<Z&&EE#m<^~dUirG!B7yJWG)tmUC1@T<!@fr
z^O8KdFHnnvg^E|5toOVkw3$IrPb|#wwFA`kYujlHhVZ%P^}-LM%a*94X%mR`26%4y
zmdSep`P5XbTr6a8D!MM3broeTwO>oEjt>Lv7nZp7&?v2A`Wo`ERY{bqcEW~QD|b|1
zq*{XUmrB*mfnJ&uL=B~2>iX{$V2M^DuK0WX*s}QHjvO6#B^VF=%6+^&zE3Ft*%KwJ
z1qZaa3ILSrLnvX#ENhC%qNJW94Z>#lniL+EK%awD&uHTTnV07+0sygIKM6rx*-QXD
zgmpu`Wb4EuqwsEy_<S2-#Ez@<TkIxtSgr%LR>}`xX)y6kEXc6=nu@F}hNS7k?ZKN5
zD!yPm)d+bbb1rQaZCxd8Xl>vOiq#?Ei^0k!h&%p+j}L5g_ZduvlA~`4U9&d}O&W^W
zyCD#^Uh}o;QI+poZ+_#OkqPQ)E*KLFa=CO%?#eQ&$ygkudE6fte%alRl6x_(Oh^x%
zCp-e6Ud*AHny*;rNz><AI|ElL9&R8MY>r-#**8^|*23H-VsnDl<E&@II<}gViS=sm
zbSGpt2w`{2iSk%cmgG|Fd5iBRFH2L#fsdmulZrjQ`l?|<)ljh2D(M%M73XKS?ooVd
zO0j#k1wGbAIx&P@q*-5Eb#fRombTSoU*ju=Ut@ZFFTbOx!pFjcgbNRv9U}lYR4qr(
zvGQiTXds@8-*U-}9U=!8?d5PgGiK7)0IK0Wg$5Q|R-;wxhTj88!UD?DR)34w5sdjN
zW+tZ@>3rqh@-91S?7XcbeteSy7x9^38BWLaJ`rCP*_QZ=A0MYfpGd#ZeYp4aO3nRv
z-Rd*Bz*_~yT-M%G-h!yF5~|xpe+-qHvQ35JZajNCEo{7(A~9VzpA>!WVEal|t>k<>
zNy)>tef<<ps;qW@#w9F>dL2N1_&pQID_f^?5U|s_52sMT96BZ~&YEDvb8#yTV}3t)
z;DjvT`wbZ~AxZMQUJ<aD#|F2ab?%|y1mG!K|5{1kN2~a$?mr4hzGs1t3&OWi@N|}v
zpOw(+V3BHAj!KkGX`KSM5`TO$8rD6d(+PihD~X*=Z3T3H7;qUt2;Z3U3`BobyRnX;
zEnT$7JTX(o-9~xjyiyf*nA3MeiAlQ!#-y<cxI*ml=CC{{-f8oqrS@#SCEDc=KKq0^
z?Xmu~qm-7atZO?x`l3Lz*vQ43-1$o<?M|S$zM-v$uxMMl1@6%4DFcwDTrBntm&H%~
z>yj3kg)CA!xU3x7xO3=rh$$97?MLbK6Cb;Dk(7j_l!6LHGoXo^1BCVofuN0|i>W};
zk)@nEpZdG5WnVzAfD+25J$=SOf(>q<H=Mh4deM9smgUhRAj$+@Kq!DFlI?M!A*$+g
zU}~y`x3r1uVngiXi5e&?sw%t;#^!NWPYETby$QjqEo7o4l*xp^J4P@W4SYNp7+4(h
z=}$PBzSRilQGveq-IW&OHqI&7fkSh`@+=$%_g{0}bv#$f>ZY2zzGaV(?4QET0XoIk
zk6M3wX;Y2ap7X30+geH+$Dy~+sH;kylcJ{F#68>;nT7&);3j4erg%{IxLl~RNE=x$
zIP?6*hHD`5XsJx%{=3>vqJ4XJ-;0P*7O}|<GsSjM@)6XqE;i{@&@~-b=%n$fOS^2X
z8(ajaZ#Bs?e<q4&Ve>#ZO-9ajov~mX;b%i1aC>fy&J5^`#WILsi*A8Zl_JV&_H&m|
zcp;9V3)gZi@`N)1eHdTnm0rP3ew>>-)Z7*`jOrJkG7r!<JRtmwZns~G7*`B;9VWI5
zED6`UQLHYP@}ZCO%Vxr?Pm{`>;6^C<2sXT107vhi!tEJC_;Z1DqQLL%Bm;&_Xk_Th
z73NVjoNNe@<k7?A6evK|?sCHUH3SHr_m#qCI$l1ED8gdCV%yF(F0bJ%W<%x{5r!^|
ze^p3_j`Yo&e`u&04kORB-9d7bpe<c6?f7QK|8@nc{<4ZDP{9Vv@0q73ruc(Owg6#-
z#6me<iN-<Wlaf@)EbweWF-Bk3l=HkCe9`TKZCLyCh;A^Kt@VSvhf6fjS`(#UtKX{F
zy7P`NsOts0#L9AtU3F9<wSpJI10}5Zw|%<3V_U^<axI@GaDg9_<*xqY@lgod7U?Pk
zkHf5c7nl%1(fTQOOqSH0#tQ0_-N<EB|Lu@y3<Owx3q%ZR8cw%JujXqyJyD^A8e$NW
zUITpjJ*+z4?wUah6dbBKB&%s1$6~*tP->~-G>xH_t+%mZHt*}8;-PJUX@{`4qv@$3
zU<9p7Rp62uE^8rxzbG&SjxT(Mq`#l9U|`=1L-?VQio`@7&>C-(dnn1&d_~)cU4?Dc
z%&mP3`_<!+AJG4U#QHyxgMafW{BQ7)<sbOw|AUV<n1A6Tcd&pX_85V-rdCU(F?D%<
zee^!g{fqSG+#np%=^3x2e0W(*GAm#LGv~5_|BQw#M@Kk{P-J&K&9neEY73PatHdml
zqVx|X`0qpEteIYZ`huED7VmDoiAP)(H~0zDXNWa5^-(iCV7TNfoI_4viJsJO<2+0^
z@GGs&+EsK*5@YXGT~XwCv-|HD;B|m3R8gE%K0773gVSQ6gck7>XFUPE6j0&HpC>la
zjq*&AlwMpkvXeDRCw3Rr>hGNAC6T7fX!)?1KSv|`5Axe@s;CF>4fnR%|LMH`%~$?k
zlNM&ie?;W|zwGhB$qhCPV&#9>BMS>q`0C;3^#|+K{|+Au|H8*ncp`nsf5At>f5At!
zMce<I@KIp120TCO{|6su{s%tB{R=*x{SSN`-m=HQ?>79tZq#-Wz5Cqny5HaL8a|3t
zpVIHrh^e*dhd(L*iyrAU`kuKBss4!`q1$I1=(C3Yg&r>~jT`>cEdDES{!dFy<qtnp
z2<0m{z$xw8f5e&p<}>`4#(|N5^RF?E;eTmMVrAuE|Hpuby1{+0RsZnuxU*o5H+Zd-
zxsO|^-K1<D=^1gy9B{N4bB8Z-6Bdz!AOYpKf(RjLp=m%svOcyX(bV+~D6!Rb(MWF`
zZJD|U3?JOYn5;D*Klk2z{PgUg|JYcY)kIx8&+wjb9_b<Y6G$*Nz~&Pc(>C(-%>1ms
zQ*}9G`M%I=^s142%k7IJ<OQyHi>uM;Jcl-)UfsUad33w&EkqORZ@CZCfe5NX)IHN<
z;b9EKlNUnN>4W5kqV;26_AW5rzLRvZ(Q36k2R<J>W$rzBLlpRWokf5G%R1M5paC|s
zE38a{(P@;+8hs!#Y{HISq`=c)$N08>OM3hQ3}o<Yc6z#<SfU~d_dl|H%?h5g=mi5u
z;0iQ=xc1MT$o+u*d7AeEz!haAdATtL!Hw;HoQ}OMj_atgrd=Vl6k-1+2eZx!CWwM#
ziOGWq1{L~9`G$DX7k79kZn8%-$r8mA8{!D`jDM1Vk|fF=BkL3W4#yGFiU%x$#}wm=
z^CMs#!!e;8awK-*R0`h=suFmQryVoBeL@{GJ5)OaGa<*>0`en^+lXJg?T*|{i@vr0
zLtx$LXH2;esX{0#fuZUDNWge#btv`vaxL~u;EhN!ec-e@Tt!3%Tx!gMLLiq;zUQR0
z17w)=P8h`h)=&@f^w4=Z8{5FYQ{o%be{-|@B7XZ}oBH6H`e2!gED60A1t_411v_}^
zf@98rU}?3Vy964~%Y1GAdMBUfwkv@+Am$-q+>yn7Czys2DmFR<aO5}yAXpv?ir`PA
z^Qx&Sdh5)DIm|)^%x8=qx#tH~*k5|fuB5c@&}VN?sY^e{{0IQyj|g!J!0^ex`8#&=
z<>2Mi?y<Oj+Iy639(%MU#+Gle&Hk};)~^HU<?E4C_G_?K%d#Q2#~&Y8ld%Ve7Whd4
zz37Yx4en=y21az#E_Ork>oz5#h^bt}hDC$+&*ZnOqR(9Il@H>QyS}D6@51MwCxsb`
z1;*`AH-A13c3LCJ$U`5p+*pRaTqQ_`djIJWh1Su*pOByE!GoFa=M*6PCv{AYC-<NL
z2MIHSU8H)M^Os=Ze*a~l^$Vm-=4ff;Z))}urfA1nE*_O5di&=9KI^T3{$n-MD_ZZ&
z%XE*tnVT~wQM2ht3`8rw+Cp{)l%}sRD8*7v3c)f6##~T-Nc3^Jap0f!a(IG?@6xG!
zhq0SU`8kWcgSFVlgU=&){#(2@qhH~AcrioTrnI<&{87<duvT{og6rRiW{CZ}4a*q`
zBq5y^!&5sZ%Xn{=pORqMH~#Ou@S0JZDR$U|GJ?sSy|t~Sot1^%&GjWTn9m=ZGf0Vo
zr9_8HbfI!V46u~6il$m+G#NN+I*BuIt|=NY8JlB7R%IKqki*#@tak;w$s4ly(2hA>
zGrU<o(t8XPAd##v#n7d*r3WsRl;GW{Mtx(@xCMgY;J&7!pra?GAo@x`zx9`t!-!l#
z@1Vzbc`>_yX^66rsGh(s^Hxi5!oMwV0Pi2j$N3@qs<2<|^&OfWTt@j)B=G2I-`<aj
zdpAFrvJ)$I^e~xIQ?~vvi5Da#OZS>WGt?MN+FCUh|21sUys_jut_inpYgTDDwnS}8
z&DrU<mdtMP$3B})*tEb<v)lLve;ywXziV7<SI6ROb46nCz0ZN=($Ze?IljlQ;P-Zv
zet?)UvtWK`zO>6I)vp&`BvslD{~?qtlBjvq2F3h2^|ddcxSPO6=iy3i;sLCSxv1r2
zz_?ZP`bOI~@;Fl`A{&YXS+oL!>M~2zAQ8a8Nrju3zhKBzQSu0i5wtCwdp7BJ4||>E
z*C&z^98wGmqiN09MXyE>hvYB)CW=dhWQAf~#M36DivJCJmuIcK8W530J2D%QM&X_-
zL$A7|1Dn%P-&$g3S*W}um?Ib)zw@EyjrJj{by8w4=ReQNs;hUC5UD}M`Gd|q7R%3~
zg${%}VV$Mie0h!i=PBTzR`~)w3zI)Q@^(55B%FxWvQoM@q4G<SKPxLDPD+FaEQV00
zQwbe*P@BsmQh00JTIJeX=!_@Wy@5;2a<nK%mWCNDJENSk^Zveq9Ks}bH<2wMBw3~P
z-ah9>qpRU;;Dbp(_h#!3%QFS}q%{cC`&y&p_vfSOJsn}#raPN5r~M3Ur<}!6u^6zF
zI?}U}+Ah+E5od4O4%W!3v_1yw^-lW*iRb=S=7e!IdoR$CIQnymuyt^}La1iKa39w<
zd<cmC@7s7g6OQZ(m2_PZ6%m)^d_@$O)>c+kY*?>qrM^<(hp`hE&uJ(+aC6~uWq9n0
zpe18gA3d4TIm^|<74oG(q%x55O{8g}#KB-KE-`DkB+8(nK0skG{m6zf#fUxnzdpZO
z9=&!_s49$XFNuTHOYY?p44swwFOPGHbK`qV!3Lz$-j^|scPc+7sTw`;Uh79W+)#zK
z>8nCU$Q^s8wyf5P3;T-l{qUjn+hBSAW_>CsubVe-fX$$U*hKS5&@G@24MqH(1-`sw
z*WY);==2i7Qv+@4)JX`3-@&g&_r2_^)ix;z>SHi$c=*&6)jj8Vyk3{r;>$sl8?HN`
zeZU?kKI7z^+Hbf6M!y{}AOASVAs!C62%{s~sw}^&oFgS;3h^y0>gcQMV#2LfNrA#s
z;Se1@u4F6&aRqyJQXQ$Ci@!SsDeV#9l&DjY@W>(Jqyuj!qW2d)O=gT_p*RVRMGz`j
zOhfIO?*b_U9xA86cR<b;VK~i!KM*^S(Ua3N9C6aBJz~+u8~mD0*d_iODH<(viTO$n
zl|awiXgx}czU6!A^*r(PLZ{`Tc$30CwkT6cs>amHx_lI9?3Jn;e>X&bar(+Zgq^Nx
zH=KT|O>euUexvYyvSK@uQoWk-r}8(Q4<N16yqBpIZ3+Y=5l$8Hj()4d>n*V~mky<>
z_6F+5xe)evXv-)y(6xp$3xZzv-cn~*B@3>xxmqixN6qh@ohVxv_!zn~DZN!q#hj-L
z`)I%Z)v#2;r!j&CCS6r=m83Edu;zhKDg}mB#>#xO4$4w7+8{Kbn(%EXz-T17$c9lO
z!Q|l}USwgRB@D<~4tgy4eCCOWqp2bTs1$KII#0{P!vXWdF9o;*$jX3)l1s5axZw^X
zNrMG8bHC$E7fqZxRDpvVDw;QO)Ms;h=`gt!)ophj@QLkU$4SM$EF^T7>-XQT?5bxd
z_Mss&l5}16LS1j#o6wSxJV5SP#BlU#uIxHg+k3cByD2SIFj8M=`muhj83e{&4MXRx
zviyWQ>-=VHNglfO{GPIFj*!fb@$;_O;PbIQu-~qYGIjr2Hg(!G2fXo<C)Z8JMc{ig
zeKPt>Fuhu9F&^K6a;6evYwEyOX_5-g%=2XQMsh`&;@Ig!x?U1o#A)Ma#*32@CfDbO
zA3oMMw9YFkCy?Y8f4dZAB@b?$ZSGqtxtSg{y1kw5gFbw8+y?=#%`+dd3}f9}pa0-`
zewi<1B&h<z(zeC&Emf(JXi#rVOiLbpdSd5+U{k~3Y!?nG=IRtMM~AR1+gAE{%35b6
z;FIMantzXr%Z$;-SW><<<Ei|mxFtp5bJeH#c00QIIW81Ztv+>)%~W=aZS*7Oy=gb(
zMW1Dh7L3pMR%kOfJ<%pVJ>V0I^*St+@(U8%Z)qZCN*!q<RV<Mw(h2o?cIc3rgwso%
zzutiCPe^BZnkMAN6Wj)Lv%^f4thw<U{-lU9s}4F-enb6<?hWFH`<er2;L+VGO-QZ4
zF-wLce)U0VS}~s>GR)mDZN-Ac3LHJNs|f?e<>G7%OQ0@5a&K<^V_pFT9=?`Cxt@w%
zaN^^pz%w{`>U1Blg7U4g4Wd<*_=ka7%K90%K@w^#%}16#4*#fJ;i1}lTcdH3051Ho
z+g3gf{>Nx1T=wPb3R1dDNGN9K{R{O^wf**2e)~l~E<6ktdex@0xU)gtSf7sa8cE}Z
zex!y^btSVol`;Pk7Ot=fOFh@Q((0sLr^iZtK3$wnBHXxR%g`0tt=i)yzs5;x3ay@b
zMcZIKqwZVTud(EYopv~CWH$Ytrs)!wv+j;5*vR9O<r>Y@=xttVh5|RsLsP)8pVkBS
z`Pu<-L}nw2hbbe%0oDSV0hmGvmdUfc_uRc)M+FX{se2TR05<&0jA~D%MoQU{l&oq)
z>I@uXeU`w;9lo^rP<sz2KF;mcS?gaX=XA!Xd|Z{%SM*4~9}gFj)*c4Q-KWm2zs^-&
z#uZFAY~+r^f6<acC4)O9joeLQ()j?~^=r6GavhOMAyK3)E9j%%dT+9U#v0-A$c2Xq
zrW+c}31?eKuTW%~vGy~bNw_5m)~bzpc*ZDUh{`myFe|X<_-ZAoBSbVSRnn20Tk8E;
zvS~yLk>-)!9U!#sCz=rhR46Xv27(AFBd`!4)FOO0i<g=o+>3}!TXXTxZ}LrDzEr0i
zBL{%p>WIW)26od25-X&y(o3t7)I`VA<$TU-l`a9Wa2ztdR$>Suf}6GEzt*&{8D+{V
zrW**)e@d_&u$`7{SL#2(R$?>{k{9}u&C|X3aa-HU)AbJCthBLzO7QV?!|pzkeA#pD
z4%qQrhrRkyfEZn~)N`n{PI&)XyRG8`KMc7-i2G{x4k;4C5ig=uO=Keqa@=&r;)FTu
zPuMkQG+_!<whkIK%P7hVC2@-qJT{t%z!pJx>Z)ulS6gVazNRdG-1N&e!1Jqr(zjU!
zTk*`AjXf%kK4CPQ-44*jz-O#Rg7R(LeC*&byA@x_AYv<W^#ixsswRoz?i9B+-nG`v
zY=Nd*<@n@nrRtr`THR}uf6)DaHO}6(I4GK`U9or^Gr2)x?275akY{3lX-Enei!+hY
zP&Q9K&4*(;Cd*pzJNj#G97;wkr$y^wJ*gFSKxo!xDSv7M?#E@`26eWiUTxStVN$>Q
zt1m>^|9iP7TYvjyH2L_db@MU3T!elpX;L?^KOn42!j1ylTKOX-?tSu4Tl;3)jJf9D
zSgAw4I!9OQND%aiE;c;#lhdu0CiRhAa%FX{_r)jT>J%om%^I^8eJ@o%F|-;EG2ce+
zvia2yUa?;cksIlEwRi4!6h<PSmdPo73@8|&b7*s%2*jj`)kzqnKzz)pOzB$uiPYdw
z$xbdliuv+EXuzm4yQBj<SKQCu_bYyQ=ZQ?i2}KS~tkXw~pSG-}Js#gnPLFi=!`%F<
zZSVMfplY`1{G&FiUTdb?NN%R45jLdy?;Z7@+k^fQh8Cc?%do`l>rJ#To`ra=lppDl
z9Q_HOr7=n)eJo#%@|l8cMqlzL05ccaKVMTLe0e;!kczvOKZD~1TbeuRdRtF%tcg)(
zRH5FDK2NK!b|XeU>`Ql^bKW7|D#ce760q?V6*8m;^%CWsLw0|xQIQlK5s~-YKr@p6
zR7ky&0N`s(d!>gdiv;XZj%9e<pCvHIWNrU#DEG<I?(-GW%wakMa}1%xUd1c{Vg*CJ
zGLt<b`3R^Kh>KjmZ%?Md&j<^ChzBtfpC{6xu@z%}&Sb<gIPibmK{6XF`lMIK#}crl
zP-Ave0*$ifTD$f}S1&zgrIk%e>?Ng#l$6R=3vVq@-C`@S>$nc-_aEL-wR+&3yvRno
z#6RBVOVlDV61&SW0`1poU0OyB_R}AuS*x$JJ&|1aa`BkmgB`8?>q__bRL=&3Sk|qo
zSj8DeB8v=pcr_+Z6~k>F5BM%?B?~usuvdkcX@eVqnT#_%s}MbZQxh5`88Skl!Nt{L
zD9x|o!HpEKGh!>(2n%EOd#)nG<;E5>&uwL0QcW#It`DPU51AE$YE)NN+%n<dr36rM
zlgq2hg-9x$pRB7>2+mI$SZvN<BPLD5Wyv0jV0dgNN+MH>a@k?@t%iozhPewmT=Toq
z*keRzv@8v+Qj2U=ISy;3f6EdL3tbcEF?DEWP;@x@kf|P~)zrmKydOg6J5>O`s^O6K
z`^uMMR#&q5TU_+KE9j|TsYYfdIdsU}bai-q9PiSoW@<i8l0mS6@jPYU@z+~~HNELk
zB)Mh<R>j1Rcu@Z67T-^BwuP43)nu2WGz-mi3C68vO6oVORM%93ggzoZK8UMlUFS4}
zy3kl%=wCQ7ei?L!jzLiqP-Vn%RY`*6J1|XpTLMNAF2Qj+U4vbiV6X?FZe?ppC2xMC
zWGz-nlBNu8w!muwxzL1~)JnstnLdSV){C%T)gb?X=i`i!8PSbsFbs8sK{b`k!0;&M
zz^ieSdzGT2IKv*k3~i2oo~y6lTj70zO3Ku&l}xC=!w;fU^u^8GOMcbtjiVlbvKk%_
z9@E~A*V@ftQ5)Bq8nggasz4&&$@A@d53ZHRK8}L+^v0M(8X=Mrea*3+gfcOO2KTW$
z&<Xfp>hneO%;-7<#ZZTA|LjbC@RWe3rkJNOESG#9rL$ede|(QiAI(3(5xfJ+m=haC
zguNIpnI$g%elmMS1A=WtI}^amwZ!iyXFiFtkKo`4=lJ5{mo@AT^jt2=WIFN9zPjj#
z_i@`KGX6Hr-+|2oV%B-mQT(CI)2IMV%EZuH<2b!(n<T<g!F69v4IU6=L(<CxeNxnw
zqBMJ?K+?(R^rHwqdq7DE$2D1e1<qGai5M}2idSoWieKiXJ}BbRQb>Ej@;p}+gcwq0
z(I+piIUwP&wx2zUr7V<=IB{A+>JId&>hq@a%&58wrBD|+k94R;dOoy8Q(vtySmSUW
ztt0nhuQ;WP9BaN{O~wO-8a*G^iohluKrg~0K{eS%T@j|nZfGmIOmQkv8VIOgz6huu
z5;&S~9QOAvstt-^I;lWfSjd<iaV&nQqzuEw#>=YO#soEZ7H-hN(9akCq;g1uA{&|R
z7~(px*QY4pMTgl~K+g_K*@F<VEVgz{l}lG~2>;}Jf6v$`NSyHI=lN2CXpu!*lk$`~
z|8*to-bD#AHLGunLs#7$^O@~D9@zOO`q@A*oK4w}|7~Oj5!r3+1{{g5w@|fM%^h|)
z39mV@lHF>V)VP-v9d-hRbX|}EW*a4CmHF7Wp~94o7E4?2Mv1dEKKCXHR8)sg(P-}u
z49h<BA}FSd^_$liz6Z{b5UB|3?6<Xvb4Pn9MmbReaTz{np>8(pQ+h_ky~ol;epS4R
z(v(n9R!>Qhs=qmJm`*t!?&Z17cr3IxFM>BKYm)lZK%C_24>4qxdhri`JoMM$b;x}~
zLY166LVhk=mbgkS4zIWhdVVT;M8)xYR@oo=95Sl+6FR9*<-eQej5Yfi2RDNIoAi1T
z7Dad2f~@3ho-*giHlcWF5jj=;N;<figuOTo#o;|F9CMQ1Anu%>56d^8FV>B)R$RPG
zgQhCB5~iTBuxqe(rAinGPlS!56|xv)Gn+rO)I@2MkrW&&$(5U6W=UMXVVn=)q7)P-
zq%4Uo`Tl%)!GH^umPSBE{BSmnjcg^I!jQL;%qgTSqjVL;NzE+D>;2dY?RA1EZsnLa
z=n>r0_@FqxhwpSp$2l|~88C;&W9iPc?Y8&l9r?;Fs#SDCHN-R9BTbYlC=M*Rxp8Q#
z>4d6Ud=`EQHj7yg{jJoTsmxh(j>%<a=81ibh`B4CPFr59QD&Qr_k0IB+tAlv4HSx6
zW3z~+AF+i=Ic)Zb=UQ8#Yu1qZyq!Rkgy}ksI-|vJu(IDia)^If3M??tc#uFu^6)KL
ztTK!}dfhT)7X=hQpoT}qE>RAcWX(RLmabxFJ*Lk4-5G4B-wWMZP*65`%wy~IC$lFq
zVX9W<Jij*6yZ&Po-)*b(v*p2E<Vr5roZ20nJWb*2pyeTeuoOC>7X~pU2^EfN<&za&
z>hy0unLLxTJ!v%L^rTYaUMS~WTJ3PwGv{Uk7~duz(y*KpU4782biP|wg72;yx_jb#
zX{D(m+|8!L>q@-t(9anv(xzg@TF{G%rru7ojgP~~*v))Ny|9HG%*zTneNse;2_RX{
zoCge}5&qI#5vllwCP}eVPLLQRIbJ9!TQ!gaj$|7i>mE@vkHIQaLSz?y^m)`c*>mDd
z^0^`^_BdaNlHguW^bGnjjjEmB*pc(xiX!^B%quXe!+y<)pO!DTK^Y+om2$P;Nj?X2
zd=+y@q&qT|Iz38&TU>s#b&7V+1#K?NrH9!!HkZQ;?QJYxkA1Pbmi~K@p{C`BHm8Mn
z!bwp_j|UENjzwT2&jACT%Ov}H9H`*{hK^JNOP{x!pH>Uu9&?%5#UgzZnj@5puYUYH
z58AW#pVc=14**F(w!ica3WbQZW+)SWX%G3+p21V9W<RgSG=)Nh{7t#i?JX5xpPXYD
z>8d^m3}N!pATWO<kN@_90$`p6C_XwYg}{*C=OV;4om2iCfQJw<z8W_pK_s0v8i>+T
z6o^G!29DqyTM@)XqY4P50jCt+WapFMIi}^A$aqf$#TFVBS_CPp!w}2N1%3gWirZ#p
zLuhqf9=2H9=xRP#+yf4KYwfSu`Hdv;!D}1WjlJ<c*DfuJYK>iIe<XKYdm%0P7?{04
zsHBzQ{g-|9(N}~BMhhd|T4|B?S4VH$zue<?(2D62xjn?z_B0&&2c_c}a(4W6h7qqt
z3{WHHAghoA={eo1SuR3vR^fW8KCo)p@K8@zXIo2cDj5oTjWGP<u$fZMiY2oe%5(bR
zSH|orl&4~?TDEw2s6RWpsTKy&G3pIkwTyZTi-~%s)i*uUN(Pg$@yt4bIUo0;@V6`r
zRYB?p{?;47wBR@Ab3<7ir|f*r;ZC|+%D&OFtTg8ruz~=N#;m`%e|_r`Nz5-{6%%KM
zuZ~Ni9Uq|NtM`GWTU!U~X0@h=u6F3gepSDO-P$nA5nT{+=zF}2-oE91jj_uA+g%s7
z?CG#JuN<Z|nk&j=dS%0%5`b;04-#&5Yr|qkdF#ds4+{X!)-{}pdA3>g_f!PuB<lSQ
z!$jaOU{q$X)@DrVx*!IgtWWU0Y_T+|T)a<hQN}e=r<>eKE{XO?+dw(+%l2A3@8*bv
zjAAC_vaYagRc%WgLY|EwfEmH?@95tmCM1EhAq&!pa-zvi*tsZZt4t;WPKVWORLBAJ
zwoTPOd)AccRYIv!-Bt&mhjIhd3c0YDPPq$@XL@VMIR#Rv<}#EqAtH%*!gY#rx}KE>
zl>rL<Om>q&J1+_C3oQ|vSpcIEf;wNc-x@Wyc#PVcwauu9`GV5>)J9|TEl=<CNvrkB
zzTw5oj=WU5dgP^{?Rul%Xz%QNf&9be+lA;`3i8wNs<6k83)r|&edY1*egs{6eW@mM
zusWc1RFOB6Kisw8AZljbiw-&LcCJ>U^M;~(Nc9yVuZ+nTI!gqC{+=U9HgEJ1qGf35
zhY%YQL#opjKf$u9q#$TFYc+D{ZKW&-WEA!AA?wWEB;=FDfP8jnGG&%$j}sJeT9sI@
zlVO5<x;)6YTJ(kC7iBMm&_+C46OHxGZfTlV-WoRQGwGH803$&B9FYC>Bl1cvnDfM)
z&mAJi!fRgJwW>VP=q`0dRu62Vw+=V1d*P*D9?#Tvgx4(Jbm-cP7k;w)1@ahq|ATkB
z<K@4)|1Usx@0H@<n)z4my7<mjHQ@{Y34GTM<n(I%EMp1oK&p_|Y(;Ta6XB{=1uIpt
zKGX#*#^Oao{q1elsj^7eVb!XYR6$X~i3N?Ktd6Z198oT*Q+Zb{fddDjxtJL1by%sE
z2-)<4Vgd8^cnb7x(&<d4bS&rLcoVM+)5X#PT1Snb6=rKh&;m?alDszOyC?*CWzMT|
zI7Cm-RO<So3+pSmY}$dS$r2KaJ<H#w@%JCu9+W$8zZ@3{Jx#Z5A0FL5cWuuC_N@aq
zq<o%$)90Lf(WxB^z8+3B@AA5S`Z%ymz(VPK4p*ZX*ubqc-RIgP5T%@0)yO>^Y8@vG
z^eU&QH+@=fm2o&)tH^C454`8?s7=%ucP2(7K1)@yV)T-fU5XkdR&9?qB@&Ezjn_4s
zWa%ilMMl0~<tWpuygVt7ZG8ZAzJw~~XuHZBgIh(L$bICamp9q>E`V_rz{j6se1U&7
zA=|CUUgTi9Z$iE?DBQi<wyvWDJR!5Zcx9Z6H&Ftn`~m3iE0FTuUE8*9Tz8JF&oAn8
zBwdh<$gY^lGSiv=A7y@iwnA6aRGNmOP4(rxV%pUqLkXn`Yu=>sE_iHvSn51_71RV*
z^Wj}XP!rbA9$`Pwa(%hq<#qd<JsVDMS@`u(swJxlzNLJq2?7pJtLR(DEjQfnx>TSF
zd$FoDm9b=r)Uxu-HptT)GW{;hy!d#RO2dhuFc1^=l|QbxC^#IwRpg|U!#2M<k%7vw
zDC)OVB-2YTDYJ=Dqs*r3)|QF*W2L6+TA^~pz^zj9?UW;BmiyS0a@-F(o<Vh8`tG=6
zV4L7VaxeMt<xTO8qgcdSmx^Ul>-z8a)W&0(ih+exp6Z$L*BI~MXOTu^HZn;07%34)
ziA)>?gWa>68mlU!!GKMUa5#OlGHwGi%NGb$SeP2@?VjC64M;`9!GP1Ile3Ym26(13
zgo56I0{&kpXC%)p1$<i8c1{)^CksS0hLEZ|>hnDWli8{Bi}Gtv#r$7hXd`55yImX9
zlLwbCIR3Zmu4rUy`I&keV|4bT5r#6UR7o6nt>o0-bSL@F_^uVpn(oKR&s1i$!R(RI
zD|Qu9QL7eG(Y^&Sn@_FRn?*d8iM*WL@y@ED6Ayt5Fac+2RHM)~FMsg*=fW(Lsaq{g
zd<lwi^30#fryqOg_<=8e|H^?k@kIieH@*-Ea-9JA+*9QUm3z7YAsO@O-ys&n3%z|~
z+Ds5kRBcE^d|sE;V$jH?Vj&v_)`^f0+F1*A&1cU@mOG{aKRw_=a)1}s=x1cR&kyAj
zX`5UJ`lFsm<f6v``ow}&LHEeE_s*UOD@5L3Toc3fgew)(W4*g`dAhA1=BYdSa<dU!
zTISvQ`19BJ6Lrm1bAR>1tI_aF@62I(tIKDjPrGs{xTz!sRfAnK{wjU|Z-rcTA+kB$
zI7CEyRppS;HrINnCNW4&Td5W>zul}<P+2$;XI5>wRzx+rfGE_>epPa6RMPLVo2g_R
zrzoF`^SIARU+0+qG{ZE}Ej!iTA}MTo6;E|P(6eev&!Z(S>~V&82WUB_l+|zAWYgF*
zzDs)(XUkd{7u3c0ti$znT1)vzcrLjL{cMiaGvruF-U;Y5+83axIjl5){Z4!1{YRD$
zZXCF=Z)@?xE%z<8CTpDYJg1qj%=^tk>&ll#9=!abm6>#VX3<sUF6`xhDO{|CL8<5T
zhBr$Ee1SM@7pZM0)))-@po^n1>u*?|iQMW5HmV<~G765A#p=s@Hm7{d2vG2M+rvDT
z0GRkY9qm7@)4FYmGMh2%g8b>3@y8f@>3>7&k#=NVI@U&DN<!MyP*+=1l}^M0ewV|j
zhqP15=VA!Ah3Qd7au3TAu?Y1vOG^3NiM+OZT9$6A{5GwgQ21=3Mmg0`<j*z~6?E+t
z=IIz1eOm6QAYTo6naE@|<eHXgOCDdcd{I}atvs>l=zEJdHSJsBGYFPTBgWdHw`&L$
zPhky8w8SwF5CDr>CXWc_)_J|B7A4ctvITn&k+lkN@ecCO<mi3tPV`=genZ}O;pXyS
z^X5hUiQW&uLWx1eWj)31@pA=2tJ@~x3Zvw;L$=E<TOHMCd2!6HZoB!3f!0v0D%>-V
zT)IDaH@N6{ux`Uct8(>(PsZP6bm4tSH?j!XLUFcXRmD72{cNJ$N+c2}*s^-n;?9oN
z#&oGitrS47EZ|(wUSA<8%3ADY%Jl;^bCg<_GGJ7dZCO7txF%f|DD_Z|T)-)C<R14F
z*`2B-%rNBByD6stFNoL}xurwtxh@x~(ZWL66jjzi@fEI?P&hCdS<Ebnp1(^B-7Hrm
zFonH4;AC;QI~OWSTU|pWm%#}q>M}dPiv2;MAe3knI#eoW!wq|HA+<(NM|Y`re(Ss{
zFF--p(7~juZpqwgsVvYEa%t7cwA)GRy1dp=-@Zrv>W0AzwN&VxbuISRNk>RQ;BnNb
zvWpeQ=ZG*jBN4l-<kuUNgH2m@HmA(y3b|V8?F1YyIbO2VYAvx7B?{SRi(5U(<mx>O
zW+^=bvjd!K^s~lZZ8Mtc%i0!LO*NIEk4DF2iQeHRZ{_9dH?C95*&-YPzzXf)K70`}
z3t5wnmJ`j*nc8H~>!E6J8mW-Vo>DzM+-hZgs+~~k+w0-;sMiA{K7DpT?)l6{u!%y_
zgfOS?639QziZ$;AWcjTC)WuY|eQpwVS_)Re*XMd?!v&i@&|6M6*Et=&p4vSaG{~Bo
z&zoJ5+NKBPOr}H<l6)@bS%2ZN1^R=1<Y!v-Z<^czty0?j*t=|C{o9o*_PKud(9!q*
zwyqcLwc7jaH3~7RJ~+P?z0sZ&h-lYVm3d4uxh(4K(KMDktCC34Mxma#^GU8w2*F6O
z3C2ac$Um){ea*esSReT9s~0W1bn*Qgs95l>@p~9m(BD+S2)jRBnj#`56;DOT+M249
z(D}McEQCUqYcuBRl%lpec$?a$K`2BMOQxW`HQyHRnar*g#5?)Ms$3QcLi@Ab#!`_m
zzaM~BSdGq^Hj%WTEgapql&8_lDyzGi6=kL1_3s{CxAd~**FAE-bjP(<%<JiI-uyAy
zRd>NMoibyyU3~P46`0CGSiEklG3heItn-@3pV`_j7HbUlC3n$22W)ME$D+l!9k1^E
zWWn46Cr4V_qxR;eEgQ>xpPwdwPyRS7QQox^+zoy?s}2>(9k!Iirx&{|=oVg`x5_M+
z1$TI}F*evR{t<o*uYwVFJ<^=^R1=1zs>FcGQ4sh0oGKwCFI0O9H<y7eS6SlJ_7{sv
z3ZJl$f^gzIrJCuPHiK0tnoR$gX9fx=jl$eIp{TTJHYFUwta|yWebq%JYGwGb*CQSp
z0X(<wP3aSd$WJk@C|dvQ9Sav-zvzO+JH!~ylgy{Z4JU9}{gqo6H?+>ntk@F^76Ggt
zEea_WGMz>e=R=HsQ$Me{s>-{)cWI=~m#nB<v$NXG2O&U!b<r9;imwy6um5R|)?%-n
zW!Jf^4eTslua7^8Uxg1Lb|i_kr){{(n2d)#ZYNcW*Gj}}=t<RlRB25Hvp20~g+$E9
zkQr&XiN+PrRJC|w`xD)C&VGwfScXrK8*xEKo_3z?8#IJQubO??H6I*bBXsG6LVt-{
zNux1kE;g$Xv;y$ki#mR~0PR|_bA#umPct^HU+s;$_HM(rfce9<{ri^OtcZo?9{T;M
zc`St?M%Wu~eM%YpcK3oUWNDH<U{YEhH{YvZ8VG$ko9jXV8XUim{u<tn_>oN7BvPS1
zFJ!<fNihrMdQ>`-(#})jKCd0#)Da4J8=pwp7Pja(3cGoz3KFF+lgStXKM%&_?i^8J
zsSj#MSV;SzuV+oi>KE@N@0EbMo7blNbE_-1%?`4XW`%>xYF1WQ?=XjSGPHOb-P*nN
ze)1Uk@E@L?6W#XtJy6)H%T_h-|Mc=%JL|n2ZypD!p|Xl<`+}9m`q8TvrsvyHa7|Y3
z72}`cH{fO%fAt{qA(v9s!8tKi;S>s*%KbjK$)Hh7#0Z;H7q%$4*?#U$RW+uJH&vIz
zmE<nT4d5fwGkfRR{NOD$ho%?Cpb{YAa|-=aW*mOWLNoWFOsp#@!!qTdWm4?9hg&i`
zM=m+>(7(1Ajo}~-9iWr@N6nguzeMJ(N?ka%)hOaP5-z>X=Y9R1<M^Qi8?QLE_wv_{
zfB*O8r7C$<V&2v321k@lb+hZt>aNgWPk(%<_o^dvYdcmx6(014X!sCwWvQ?xHcPpn
z#-ig!U1|lFXLG*#=56=_n||%a=f2&$wpAB&Ia^ChhC44^+K@3SOEPw%xHwx2IyU|s
z;{@J}j38UmsV1UEfwBm}NME*mTvL$_`LcZ&0v?yz5-C$+Or>aKurHemZ>X<GQ=Y)C
zRf^zqtk615@4LwD#q-R_kx!A@tR^CUpCG^J;2K1YhFprmXaIas;f9|{|BFuT`N?fQ
zVVq}k-h|L5dG9mez2Co}l@F!Tjn&abe|c3YTyiVP7NS}$;lk;JbG?<_?lq$TfG=06
zlwLVA(7j=s3BRq{P8iH)j^7k=e2ufEbNCzTqe3CaDl;3c9$F3ffc!T7{hxMiZtZ(j
zL>dA2R#5zC^f2il|3tngR4ljKYZ9gPS9{rWLdNLxZ}gMT9k=&t^sL0fs}DI}M5~Rm
zaHL(@(cZeIOYV|{al1}W)K#w%>$QwXbRbu^yKnq0MiBbsUSx4PT|vYJDpZMr-ky$G
zO^sFQR2VLNy{MRl2sv>Vn%#oJQR2Nl-5s-9ni@0I2+CmSWpE6R6z<C^q(L(?--v!{
zcUsm~>VWWEaZCmp*>xa-e6>&(f#5WLG!=w=1Y)4_%%-c!u~*5n40J{7@G0mi9!Eu}
z)TFYrd8O95Mv1N6%G|WQT}Nmn0$$ghf52a~dy6dw12?LPIle#@(purS0$j>e%Ux<u
zkk$&ko38#H`Q_1Vg6Os2x=R=CBwr%GB>!ko&N28iO?B}hhsc<*ppv`pS?V@wl{#<N
zFMu3<b-q{{^mhm=+Z|$8-yEG*66LKG)vB&hxRfH3Zvo_<$?=!*C-DqiD;KA$hE=_d
zDrJnQ8tCusX>YEtN|#Yq$Eb!bPmtq9Ayr1Nw4lo3f&QMZ=K4%Unqo+Bh(adfoU^;c
z<DTplo7%nVDQMQ1N+HeMYm)Qg(`YA*6hc!}6JunZRxl96rvi_h81&hSoH;PV2NvcL
zX{u2*QO%4duHCtQb)CLFc?<cM<(D4a@sjSt>&xSglYQi=+nA};gY`{wyWar#9s^-i
zxkx4X*wztn^S+I*l!f(H8J9J9=yuuCB|)#tp{oom=*ND4GOXuv@Gze7e542(!**HH
zdi3ZO<UbZyYlTLKasF(renZ`&OD<jZT=7t*p?;p(<X{U;ruNqKo)^Cydp_OfH4qxl
z;7xx=b*g52RK$a8<lFJHj7D6Bgpj7R%ST{rRf!PAP!KA$!0=inm%{Lx&7s<V34QjS
zp1LXKPWD{nontmFTR^VRsSSq|R1;M<WLgyn<lREP15?CkY&df9@kf%;q9UEb-Lm%e
z-AY$94EmnwX*Ld(`Kul!Z^rLjKC6C3se{3Cm2_Tz$+i~sI`Y^ruiU)x%}e~YRlgyh
zt{8DFMlS*_x5YvMw>4gBEnZ0eee6E`!}e5X!>yl|29MkTvfJ;Ejo*W>!)`)+NIb35
z6LLE>VIiMO<%75`ctO3M%=k>WMMps%As6GobxF5oEox2!LSc+PqxI7?-63NA7&AqV
z=wIw<;nO9;GX7!5u_L6NJj>B3ggU=pXZP52?d87%E4o7lAx|Clx}w@g&=c|qseQ+@
z@1E=5E+^!2zu3Fuc83`)X8L?p+5nry)fUrL?66O#VK5cfWNjeejz5I|M1Kt_MZ#$U
z&e58kBD<KHqJx?tyO=R;hJ_O>m>(3}lq<nzw6>b3&u$UMnnNmd;BFsNBd_Ck)g=@!
zeD>4vH5!Fn87K=IyrF<&!58R*!30rkk9r-!#DCG&idx3@eeMNPw6w#lRYi-mgzDPw
zdbwCJD;;Ul$NB6Ux{hBN)+$*=o>RHGZ5n@$eggXd(IW1&L_;V9R4#}sQ)yJ$*R1?*
z>d79*+{ECN_<1HmtzAKWAIc<g!}^LbiO>})#y=(ZsDbI_Cr(?V(lgczXlBy?X1O*g
z5k?KKT?_iJyee?Xo^2;g2C>l<4$7SuWc|+9FlJHWcEo@L(}p4xC<(DhK=t2H&1PyP
zfpXMz1m2=?;9!6__$5>cFyH?VKc0j??UVzdfNF1<)<cG^;-YGmkr47x5qT#$K%h*p
z_tPrb=Muu6!qk5t-H(d3^GsTqNZzai64dj-!SH{B%18V<rz_DU70B#mISjjyW%zO0
zpO6&f$VM+=(-E>rz~!`=O)8~KB;YUr!cD*%)U~J>Acg&JjvQO|6fB3V!q9v(&PUMA
zTo0izZTgLH!5gqJ$^&-4&ZemfIQ{<iO%d`<a#@70k=VR$voY*3S2)&Q(S}yNPcJj5
zU3Q;Vl^Xf_c-UKNirI|yTWRfMr`RZ)t5s@(c(I+uV7r{P#!@bu$;QwOE>bHR%${PF
zLR2IW5mJpOE3=cxw~Si45otiG()tkLG7yTgn9u7nn>1>Lh*tz*sDRhhC8rRD2@uZ3
zAXM1wdR`RFxuARoGUjPaIV<Zhy5__RRkc+wtm<$CMeJ7&lFekaQms{aV*!gJ8S-{)
z1WVE6qK&*Fy_i*9V)S{!9(yKoe<KiY3`U$`Z$KurFIz2N)Prpt)6<LSfF|U6m1Ykr
z3NktDh`-4i7Vx#`+jJHi02*r6&Nln`TrRHWOQdqbrY&X^fg&cv>67u_F{03?H^XSW
zR7@17Q9$KnBX+Gu&gapoCW27VQ=E;)sRxOO-)_u5E9^V=Ol!vXmWHV{D8kOg!!pU5
zCSs~WT&)Ji40eUdEHvnQNHuW2`uH{Ejux{}%5x{fR#z<ODtFwoAJ8xcO+d_NUYiLq
znKb-{K2@pN;HdKUAKP_^t43uClTM=c2akvV!K5o*`R8k+ffqh}6%-i+Oa?RJ%b0ya
zKC?)=b3?@97es-9uqxGBarL8Y0bMH8%N%}MF)1W>6ZT|jFx;rsHN;!d`_b*>t)HIG
ztvPJ`5r!3yBOORj+Sx|bml4qxNQf#D@u=Tp*DDo*tWD;&G*kDe+Jh2?r}W9A6Q**i
z1(auM9Zuzl3N~3zDHR=F7b+P&pCq!-@~v|dAzbcAkHQ#%b~vilU4YH1-G|X__iUCJ
zOu8y-u<K>=E4^a~fL2q9E?nka_91y-&?0S2$aNK~$tw&zu3*U`$E-46?V0avx<3zv
ziuHP3u+(8Lukdu;jBNm1e+*4>yD$9EWMj$|OpeXN)1>cwLJ}7%)MCERQzWP(_wQ~9
zbzS!c=p<ILikOGYDXt^(#x;Jm0Owi_0f&dH%wiiI|0{kY?nN9(S=s<7eyNhnL`V?_
z#$!N8b+*__Y!i2dETpiTH@AUNl%+8f2T&B`|FbQIkjiHpMXjbn9)r_9Ir-<9P9YUX
z(^{MDx8#43e<fEC;54BB^PaKiw(hw6aU*E_pr=>3wk9Dg!_M-wOt}P(m5Jr8WYdp-
z-W&WijP#4ak>D>k>|Emi9yDAUa+|_@tHC7EbY*)j*f5rP3x5~RD}<CIt!YbnG8}^R
zI6oDfnpt@~94dAG-24if{b!_e|7Wv3e}Rv7^5L)ka|}?~IsN$9Gd#_?uqXiw91Tst
z(s)V8V}!8iO;Sx4D4S9L9PXt!0rD2UiS9tsNGz=i6K)Z~qOu=qC67zB<M@3RlUB{+
z7H(s8OpE5SYe$$fME}M#GicfN#d957_KUtpp&k41mtk9xltXuf15Rt1*Iqa8w%s7?
zOA-QUAg<OhqKzpsM$UGL!~$d7=e9RmN?c2R;hx>75B0T!s{sSWOC$^yN~ihUjpkCS
z8CF3vaQ!KxNGh!zyNO765;&8Y@Hd!!JOP)6<0y^EfVwh*oM60xKa%Z<@1nARO+=NQ
z(A8zCV$|U*I=NILph8-1T_zC=`pqW!%ue@7WIXO^4H)i!+vNU#jT(7Qv7CGt0{Q;E
z|8pQ0-|Okh0*O1O)TA~Uqw2#y{ujV=*aH0Lv5hkzwt)uIG;EPO#vf&TgnxkaAj8N?
zYOj4QkzToUWO!iiobFcYJcM*2K&?uxQbJYFxGP77=Q>NY)azo-==^q{q8MlAMkY)~
zCMVK8r<<aHkpGpGOdW+Yt+YH*gP*FBO=Z@mF$@NOG7=HtbaAeGB_E+q&-Mf+oN6|0
zi%TS?^NSSwD_hXdUE5TSGXS6Va#*joRC(H&gV*e<zMRw(-)~<QiqcMyFJfr3O31^w
z+ZyAB(wN_D?VK0+5Tz9r4{$%H(QwcY?%F-M-X}zhIbP`RRhU#^leUDbP}3KFBOv&C
zskIEcXY$rl<Ym`|m+o9~%VAK5%NJTIy40F=QjuEfdVV8E$`80It@XT1``b)zU6?t{
z<%v;O{fi2;WV%hL8tR4X!Gm}h_4H2>HX=h@Fb>iZYP%f;F1=1J<FFAXM?@Vumc0~k
z*oDhrTI+6My@WP}(L^5#0%Rzd>ODuBpIP50kr-^sxzB$0#>$>XqiNZFH?=zg7hiZ4
zI08m}ACn*aojg`=RSF?JGtoaa^<-*Ha=G`GUh;l>cc!H=d}rGj)>Dz}2NLj=mE1%A
z@WE4d9;-Szm+H@QA#BE__~D5;MUYCQKJCiQt1=pK=jX=eqyi#lmW@>=qty1u^UTtn
zKW(bye>K&g*~QiPKLP+Fay{GLEt8EO^rs6kvCW|{xvO;o6EXPON?t;KpT~r5KWDE>
zme;?DG{gA!*6hh!3P|d0Svt?no>=G9sHv9|=hjWp`DxKFHhH90Zcj+w%KcpUi((7G
zB@gu0YxK{PS3dgoOXN>7a1t=SyO!MZoL{KY=mT!T>r(3cAA<EBvz9H6gq0=QE$Bzb
zPR>aU`ho71-(7X-Nc1yc1_H3%rzv8x%A*x(KUd(v6~b_Ykg-Ln@oX*sRV2tbh<}>x
z^r=PK(pEUX+DfY2XtNYdv$i~$fK<V9?rihiv0&0u`~Lnnb3gxSE7-u#AhP4hX^8wD
ztSvQ7BJ%b*2dbbi-2Pw=qnF>i`qGhD4x?>8_0M30o|$0{CUoK?(uKcE{|C|r*Nmx^
zsC5zH#)jHd*lRHv^s=nkZfr>TsVk-6+|!2~Q%PXYbiO?;PNB_6`am)ctujqKwcB{+
zUgH_iqMu+Wjlo~S+SOE!(P#o18cc^2BC#q~VaynQ@s<6R2Rg@Y#fplx!EYbmX0UCI
z?jm15*fu-Z$S<bb`)9M2Q9aug^;%(staMh=4g;gVR~#b}s7dSOE99I$^0UKYXi|d-
zuY|8IdHpf_bHJoNO%BX9T6IAWyUWVf3IxuwIYDrySgWEj<(!ze&hF!~bA9E}@lP1v
z;GZD@B!$!?i_$4jpH2l`RQt0`BF^qFVj?0=P27QHw{TGeOr<o|S5aFWJub7cU?6K^
z2mLum&P-NrCt5ypP10GI5K1MpXhEWy?ZPRbsiFT!GyneQv{4hefV_?*)Zi|#YV8xo
zOP+b6f9&iZ$$O2U==A<R)o6Ke@eqiWtEB>2%CA-Hwp?<~_7ZgD#lH6FqRr%*!~VO#
z;T4;_ReOL6@Pg#spOwA?RPSb-7H_e`V3i+ani(3Y-=mPIh#K-QG}-x76zb^j#@}Ih
z@G2yZ%t<?Jgg%t5*P4ua4P^EbDlr4WjD&*z-0j@m;=;8(iJ`+idHlfC!`#sujF|^n
zGSG?2CS2%@sh%@)NPxjGpkTWSwwVQ*+M+t6uiVpW)OglhIWD>N0Qr;#v~8}Ek*`0M
zHVT^-TGJ)wkPIboa{rG^v=*4UBL3s`qjcG?PRZyhzFFaNpeUET{gr1g4&C$P9)PNJ
zT;?5CACF^Q36PAmtb4sluCyq7EA(<pR_Bh5pT?W9HIUm<elMC<mKgL3xsXk5P2g&k
zmJ$nf&1V<W0OBqv24u?vlO8X-vu*O!ox)ZiT6Xe<;SL1}IOh7UQO{$u34pk^``qnn
z4!fB6qZV{O@o2lGU9>b6<I9A%zw-p`kH%xy^~yw%OTRQMZmOvrluHu_{x#-%{o@aS
zqE=_Ic%&tk5~WxZAh*2n2!bM?jGt!M>2D$yxQ43IdOMMn6TDQ?V>O#JVo|m|2jQmt
zR)biSPetbqw_{Sm9#6rUF(^d>&zDOvn+nn<V7l$jW~{TLvCX{Yd&qZ<fWD*^CEvQ=
zEY>rFsi4JCWim&u0Uv@p90^ye*VX>&g+J|`*Lgosv<A)6q|Z}B9w6^8;&SM6PRjso
zH+kR;Ilj+#Z0u=JqE*5;CF!d*hj=`@nJ?3-oGv;VXwkD2LPBBmpgc36(ExT!ZZFci
z;}0-Cfqu=BwJV)SZ`zf^rL(P}z9u~r9jf#SP0D#On)GkekSgqI{lCS_e15~S=08R8
zqMt6C*ZBaDPoj7Q`9K~;%sP!VQ<jFdk-YNP<oI514p@RQ16YR(gTU%?z`AKXQx@1m
zkDqI10D8;#BX|t2Kx~LJEw<^jqU_E~n@L9nFKp%nMf6Pe1ZNjd0WF{$msli}$;1<7
zWg*oMF}ZLgw1c4h;X5iU?xu@3Jq9Bvv@1nJ0hi5NE!@yv#^%w!ZeKMrud8feZdcV|
zk|h7OwtYhn+u@LbM(_xDCtYn0(0yh-p)z$)YaiVXKks+YCQ@;28C)&8vQW@&(5Uj^
zY#FuB%waWXX6)QPcNSA~Ie#SkpU#l3KPQbb_RPPZH2tBxC?3v-C}VH_PjJAHt;p+)
zjkq16pv&fi(rFFkcMhvw2ce*LP2-#pb$)<8d*<ro_UOV4P+>;MTPg}omOl!5HYTw_
z!TDj@`qa8LbE}p}Hq1(}g|ek5Zul6J{p*4IGhxLtatC0ab4(9FuG@F%$z7>Zlb=y)
zP{{?dF!|Kc{j{%+{`k+!mJLEuSP!`FYO0%i^%OeD#GKDCYVcI{tmq(;hSE34RZPAL
zNhhEZ*mQ8#7MDteiB;@0R09{h#m1%%wV2pB;wflw`cF=i{y*V@Z=Ib8R74x+z@M?E
zxZUWo`eQbu%ksmo{~b1Xsv_Eud(Z56pu%bOCT!GOqc-Eez|UZG?1wx?**s?-BE}!1
z??bF`?aDF22&`(QLXO}ZBNgjqFD83=CbyX7^gU<Uru8;cOiBdF{Zvf1FXgmFngI@U
zZ$&L)p}Hb!S89&DN&bzTs|Sz&>%{@`0&+{YU2b*70}lGSm`Es;C>a`VMN})&h+4>j
z-;-zW3493VfMT%4<YP<N<<U;)zw5{U%=j9A34ZP{j9Hq~uC%H&qO#>@fY3RmHX}Pr
z7v*pwRVrsf6$m(|PiW#)@M*jI|3|a?KgoRqHTy=u{Q23hC$~+`{)3-U0(vuqMI@$R
zDUVIT@(ce2EM{*G7I1L#-Q7?fTo&KtAEC~;0POLzjHmG%vUYDSGJ>o^7N;wEh*@bA
ztXep)w|jO|U2RRss#ayswh(ca4a^GoT>_j*sluuy3m4?aBtl-Ro*FjuT#ISRrt_o%
z&M}aIe^-<-8yNg)-KDv*xF9g2o<NgLb|g)$DJ%V(-7~X*W9=9w(hLYLZ4BddQ2ffi
zNWiM-DYey;KaGqR1B|9s+4T~Ms{aPwFD^sT7avXNOvRpv-|Fb=u3@H(`^zKA%>A@$
zA6wSm5f+rcgtKy1W=-eAwp>oIckG#wJ)IgK5vFORr2>nQJ$i)4!$o|Z!s=!6$zPEN
zRS~OTOTbf>kkr+A!uoB%cg=HR8H2_0xoY+8<lAiWy$4$RBEcO%wc&<U{UaHmekjM~
zzd$Z#u<6!Z4njxBY!;PLCg5?{&}TW}Yw9J26qXb{(>n|bTh$?wCNQ(XV1~*gSou%{
zQjNsm&h?Mz#|{A@V2*uBO3f+<*BSGdII8WI=;dG*XuEfgThCUPC0*e(`QIqg-Bn>4
z8M$Ng>J8qFTYds7OVU^|HyQ5K#rS+B!J(U^$uhN0AgLzbhx7UriQ^yOT*Qf_(i(@_
zVz*f+4<yP)&{z>P!PGI}f~ljGC%SdcI0_kBwxdue5*D72g3?Up>3pi7G6f#{%{8mK
z^j~QCPA~D`Z$JgQr~4t#o4dES`uIi*IhQOR@>>;6^F5`t((l1hunuU$)$U+trzWK8
zUlbs(A}?@mx&Msy_Sc?Wvm$-4YsE5&od1HZIxDM}kw*MW`bNk)Thi7lA{8RM3c}b}
zQJ#uM0)DT<s1{Hq@z#oR>e`_dOw`1u)q~vyRdLUxaVks*WY4J(OJ*bk@|}^v!fhyK
z!OTr5g@1&090$Ei7FZ0Cw8vF{)^V2nN-vKlc5mpN3wC<izdO}C+nafDw?U|sb`83^
z>z4z^)|E!4R8-aH>1eKh@`_j2MSY$!yCu`LXCC%CIizN>L}Eg238F>PFESVTjBK`0
z*lyy;r4n!E>bJH^qzoqOE@QJ2+{EVLD1N=Uj>}f?q++GQ;$>izZ(5V>tN9~j@0F0F
z5mBnH=`d5d6<)T_D-rkGsmtt+(P^FUj>1gKgl+)KWV3q~uWVpHBe4>mDq>QpM_M6b
zv>LWVu2%GvyDvqVRt)err9(QlgouRg8u!ryjz@b*q{-<?>v$XnU^^Q&t`rLt{L~72
zCK{y$qP^?<PI`<LH>>Bq2$D)ZN5?i>HF5zraC(LHnL}&HtM7g=+$s_}=q*4C)~O8)
z7JIkDOX1LgT!%k`36OHg(6nVlm`5;U(Xij^vg&2oga<bUfzd0AS^0B7Cou5jj|?oV
zNKMU2cAlfO7{2iN|DP23;n<T}#fMKeO6`)yPKQ&k33M;GdWGMp<eL2+t%9yISnE7C
zog!(sr#!98s{Tq^LSng~tKS|s>q<>;Tn`dJ144XiBhUe}on4GGi|Go9->Kp%M85C;
ziqXVeg~H~=@MsZ}d4wvdaEr3Jwoe${bUso|VUW&Zkcfw~5D0P@B;pP#&Bi*nB$or>
zoT}W^q-JE;XraQB1kTrSLAC0CZ_txVFPN_@<IbJuh}cc#k&^(F*Xa#BYdWYk<I>m)
zhc9JPI%DaIrq;#l$!o^Gtdyt}?#e`oqsHY5`$1y%EeF97P!8@e@rs$;yUczbn<*?}
zD&*;)TqM`Tj+5<}TBy}K!Z@RbRm4t)o6G^BK!O*sVB94{s_5TfnQYG125pR%kaGwo
zG%*ksB_S7108>#;_5LXd;S@NNtle>L8|q|lHa5*%m}i1ELvd)6j(S@0pRN&L<m(4h
zJQ=@kz*^r^-q{Aq_~hZoqQx3PWY8QpYRZS-TRGPtBY5h#U8zEGyGkY%2}0kIyMzi8
zy?TzdJ6?YA4S)F8I<1t&U|nnqGZ_Y8)hHMkbFaCC#pE+NG?5IxS3>AYXOWB|g<Ps&
z;H4;&bx>2yD$e$`4~_p0-%bAuqCu*l2APdS8YNVqDi+adAlXejRIDsl3{zY&772T_
z8txRaIp_SR^B7S2RN|F(KCQ|o#E=5=h&FU>Z<)U?)27wvVlGS4(Q^;^Yn;br(u<|V
zEpxAoI4#lc)8M+58MBP933$y)`7M9?fP7GmUjG95B)MtGYnGNK!&>@R<v63LSSZxU
zRZ)yVfb2i)3i2W!pUc&<a0NdcFerq)IC=fsFRu#%CwimI$r7=X!J6#e7?e5wCjEZA
z29ZN%5lItXqd}uq$k|i`=(Xl9xU8bdI6kjGj)FYkRINuMm<)1rU9uu-e}kZ~DO|$O
zqJhd+R)?9zwDvTOhVsSA%G01_@5M4nALq8T9m8d%j~*i5r@zCn8{ppv-A;b6YG|lP
zW6(VN$yQ^D<j3J7XWxhXci9e$O%cI-Iz8K5R!0i9kY`U^zao3C#zDlx*h_y0vfU&S
zN-L64k6V)qY?IXSvn7UXR67;kPcDi4#Jr_plPDyZe&{R}xfLYY^L_Bs0(u6TC9($r
zzG_hGuuGOzW|&Nld*9X{@RxVLaOu}!o<L-Es4+TV(lNexuJ9JWgT<n;KYHwzU-mx_
z(2s$uQ)T7`p^I=4YU3jE#&@2-j@JF|qdOk3ixqL33NPl+WpyjS>tJr6Tpg3^l|fb{
zG<WRAk2W2>>~-if9zlW(DgE<_bHt4@DV(+0sFX>mUD}f~otP!nWJ@oYPj)WTY7i*H
z1Q^o4y#EP#i(4+1n8Oa1gw51Q{lW|DQfv+lqtj_<3-}ktC7*u$*%t||x;|p!$^GCN
z)a)_Kg^HlSVX`Vrw&kbDkI1Li{)nb>`?BIl7rvj~jFccg#Fv(NJuZh{A(L`hQ1{?#
zGknd;b6StvU0~9uX`RtTpWr>&{Z-*}-8)L7A~&JPME`H6LZBA=$#tZZ$1^7|T*wph
z7wT_ro)4<tyl9@SL`)=7W>t~vpjR+<_Wxn*JpkLP&c5+`&bg8-Sy$HH!?G-ES(0Tf
zZ_BnUFWHvm5wF;eGjKME<2WXZkc2=21PGf1LP%Ln8G%yvDruUgdGqm7%10^i0;Lq%
zLZOru>*hO0vK<H7_y140Sh1xm>zrr&e$P7W5t$MefCDmvT&(AFk!i$iUVT5f0z?O5
z&Hmapj!ekm7)}1LRcTa}us>y=2VVfYLC5Z3CoP%Jcr6v?1v&dM?=n)3h>S64jcH?y
zA&ilHox|+&CX-!+)-xUR=}{6FxaR|3tnF{hD;j^LG+Y+l0r!FJ-V<Mc%HBDtv6h-b
z0Rv}$!^*DsSmKq*b8jc3pbM5e*!w?z=T|ifbA7ar<o$Zjui>5I-j3HkOf8~bj2w-@
zg)SMN7IdMJt`exCV2J{?f{ymqmZrvNbrr^6m=8Mgje40EBC5Yfgcu>Ht09d~96F1E
z)ZjpO7h2SrEFnJ#hq47osQ^V@fIsP?k%fcUV}}C%BD}8-TS0zat`S>$g)DO}8i%GV
zOs__age6^_?Jd!|8XnU)&|h6uT4Llh0=lO=+0oR<p<GUJy2Qarid^x3E}7Tma#ha;
zU@4hY5;WV)X$nAk9x@LgRt7FFKht9kkr;$z7J~SsGBc2n&NH4wZo%LXFLY3nS>jMw
zg6|_CFPGrEs8l?<P1!!d{$Cp~4p*|TOOZCQRaNauzSlOT3idwwJm5Cuv8lViXU7d-
z(?{<_!LqA+zT?x%@l|p5#?&1TACTPk%;V_g=JkzxG<?0+_t*yZYZ)+{9lUg)AR<-L
zQuc{|v3vjG0ut~Fuz<U_`$sOx&EXr~{nyAUomi-2&wTLP9l^4nJkL%~7F`b%zytrz
zLN@#h5Yz}N<$wWe*ss~PNO>U9pW1x;aGqZjhN2L^=ZV66@RlFEfIM0gdu)4thtihL
z`))sf18+CCno?3WtbGe2#rcp6L9rcgr->APk<n}-#)I7=Lm~jhg)=|VW->>@ixl%h
zDtLB$f4YkQA~}Yc07|B2pOo<MWcgMVl^)tQe+mlc?SHOqjQOO=51&r`!UPv?YeHud
z;&YceUhA>~56DrmHg*j%IHErTe|T+KwApEDeF|D0yk|uu8UFG^w(+q0eQ+K);3lC@
zt4m#$`ilM&^5{(Gp5Af5&%X0y@1rI3(_3yFZb<gO^)SYk2NBI%ie9I<lr5q{6b%8z
zp#cTBT>L{3Ij(QE<kW?w?<H3{>!aeCZQSVA;d;$?qf%6UTW6;ujD60D^V_)(ahoVF
z6{2p5OetWnARoF-Fh37@Jsd<K1PpqaRKU?-4f5F`QvgCmSdSoOD*)DfV96s#@ZopV
zYKYc2c}@Wj6}gdJ!$EEe`Gd9sYaZDHnN)<IC1NOFkr4zvZX-FsFBAmcd<%uh34Np*
z+~x9m=V{7}qL{fn^Q>BMEooAe>6$R7H3EyeSu&?W5(~)a0J@T`7P-MU@f~8HELry`
z-B|I|mxC+wO8Ke38blj=3PR-?a5U8+g^#vv7lkKb=WE@x^vZXKR_cWUGn+iTqf)0d
zml#G4gXCpJ22cr>YAhl!<{w*T5@lIf-MP29FQ9<d^xbj1j`8zTynWmoC<o=HZp7=z
z<3OVZa`cGOJD~+Z<a8mKNPrlg!*0!|nF6UKi-%N7E(aO(!0iNuE`V1wZDOItii8He
zN<zxBIDD%OX>1h4mIpDp7UJA!hH@7cSdGZya@uW1gjX`(0vr^WT}LNgNLR-4;58%y
zkTx}VkwP=E2C|}9B(R;qt2euHL9@allb9ti@&x;_4LtVi)F~Alswq6P$m*t%V?5rX
zJ@@7%tMc;Ys4}rj;hUPiWAkRT3?62`e%%4CfmQyqZ&}@X*@3-++iHhg>}L<>NChKH
zOp<I<N`2c=WJ)~+8#A$?9p|s+ZQ+(;tkV<;%5oSe$q}aEKbPS$;vArmix_g&pIk;J
z?sFNM$`J`kn9qoWfX3FE7}l3wA|I7}-i(xAXk(UGG7^D5A}t5*r|zh>`0r#N+nJ)}
zoKGeideqa8((dj1HYH-Q6aRJYPR^(P1K}kuY-4)x@3onGCzV6Vs0!*(WS5B&L!Q_G
z1J-;bmms}bM3$eF8aWsYIr&VHz-Ry}CBU+*kP~H)iGfrCvIPJ`7|7#e?S%YnWYz`)
znEjhgMlGMwV+|&^P%5~LJY>)tp&aWN--vi3#t5<ztyall77s{BLKn>{hnIMc^rv-Z
zHua*7lPFbq>o{{hVCIJktTVQGIukTY0qJVtw1I_*%bC&%c49K-1N+XY*eAuH|7;Hs
zv~8CLP^|nH$nL)S;NW6K5V0R3)@cJwyNT1YY`Kxow|@WD!>2j#>j%%>Ot0MT2e0yr
zbVl~6u~k||XdavXpJ(qzVU1Q-q8a)QUOzRxl^wEzM)3Nx>AfGqe*78kwb<e;i*#B{
zDp?MPQ3Q%Hek#QBT!8&Gw$)I=a4GDKL+JxP?FEoATSDYXX&;<Jo<WHjjf6%*qr1>#
z#L56@mowjj(k|CICmGIkD-S(;#sUw2_>2n7ED&C{^m=6+E*2bY_sI%LWw5of5m;*q
zrNKRGUbKO(iC21bT2RxxUFu$R#o693K&;%ve)!Vlm1|x|g)QKrv)dav++Xg$?#f30
zo{9f{F&8`vPg)%s_0-_VDl@~^?Arlv=NDoNKYHrw;>hg}PhW>V-hXU*n7zz}{pYhl
z0CwZ`;ZlzCD|jz(@1QK$&$*};YCE+Hlts=Dj2Yk-Dj!zxV7?z!`K@r*<r5ncZLRU9
z8iCV}3OfX_UIA9GB16!7yXw6jvq`5>NW>y6r%C~~-<OpJ^B{+zz@=-KwKQ{>F-VQC
zPj;a4vVb2&s*8PSY7?N)&MUTUo!n^4=M`9i%LyEIBFubBbVXMZ#aE%r*TYpik&NCn
zxnW#Jb0>I6BZ7#>N0+XZhylgL!d@4yBk(J1(q)-T(YCEyE}L40f2$7s%Q8$)+>f`>
z!(j?nuQG!8#t9?X*-Q>PC^d3OYkmP%1P;%I&7?5f$T4&1zTP<8wKF0DEx|w`!fKIc
z2Anxdm)44mYNUO524j(bWA7n8gLmIQrzRFjx;y`ZFw6iaC5B8A<j1}P5|3iB`7huo
zo<%Y1=kd?e-!XI3qgf;~EyyH;GRsCJGlmx5D`S5wkcV$5L6xsJu8>+*f3xm(`#>(>
zMZH2Kdi4Xo%3i+Gy8(TJ|FH5!S34gad0+DN$)4I)eBX~gskbq@?sc5_vZSv}!+x5j
zS{G}pW~2gtPL2nac-LK-Yk82}Vg^rL#U584XjX#1_r;2&&-3puM-OwU(IL5zQBVKR
zMCz2Sami%v=|_@Xy29<t5)T=3ID0}B>_<SC+6=<%VfNP_8o)Xz_Jb2VpH9y{G*z0g
zyg9M6-nVY>-23SBeWfE-Ygdj@txLV(3lF}m`gOq9sZi+jN$@B3k}n*f8OHr^oqtC|
z%*I~%4e)_TYCo1`KDMW;c&D+hTPY95Y_(L3%(I}@P!k{-IUlJTh08`q;H4{TYeGS;
ze=S<Sb{wvTaHt*Sw^LBSgGFAH^yb1P<zd8>4)k?*COjC86OymfYRFJ8ah8%<Aj+Ls
z3pR{{#iL;Cl0_qkoau(vEF5e{Wu>64rMV$m$H8jS7^~+5{KQ6+9H<vNTyriGQKE7I
zjPTG}H{|(I8HD}<<dOnZ(108^Sf@t0+9;%2&9KxQfD;?mtX{d|l4VO4cP5PnQK%h_
zufJ3&7jv0PAvQ&k(M3ZG`?|Tz!1A#~yAcgEH`V%$C=#nPf`+zMBZ$Va5F1gb$m=PH
zxUs?4X^lW#?8`G_1C~XP3=a;Vnh0oY0QFJKNC1|0jT&I@o|O@JXWF4>{$$$c=Du;k
zAt*vKRX*f&F>KWkwrZrjNtSjK1W%FP7)ubl4Uq917r>K6;+J7%Fykx3G&nOlVwoq?
z8O5+>P$fDAcQ#E(-CEOD3tzY4-d}uCmdEaVdHh@UQZx9)XY9FkZunRBYev+4>H4Zf
zst<lJ{l(frEBt%gWKMW3`(MvLzv9=^Up$$*VcU)T^X%XFYG+{O?Qe=d{!$E%57+qQ
z-}?KjoeCO`_7^G6MHI-_)u$E-4d0uKJFRm1lEJBPpk^;{r#=U7ety00IZ)CJPKntY
zq&cg4R<<m9|9!Zx4I13Co*@mNZ(*+o2iP}(WA;i-v8IAhc;_X}kH{U6_JcqBH#bGB
ztadV5W8Jqp8npSb9P_A?=U4N_xHqS9feN$FrPOk2Jy1rz?1Oe_;z6+lty#Zj#qdxx
zQo+v>2ue|`Gz?ptLMZG<?S3Bw0}DC}b2&b2hDWq%3<0nR<S{}n#?p1QWu>UGp(Kpr
zE!Y%yB(NzalWEb?QJEMmSuB;Hu}f4+w0xODjusALo{E`{)-(XC79`qR;|;NBU8JfY
zPovHmScobX4#QRSs?H9~f@{k#gY^~CqG28)SY-W*(h`5M*8?a4Hq(03CCipB85}Tj
zOe4caurP~f1bmg8pbjI4q3K)`SU$FRbZ8+5yIhP<I3fnnL=In_F}YsX#b_OWBTb>^
z0TT%kFNHY>%t7<q_vM!K!O0mToEA)sOoPFB_%vf@@k8^h!Of(Mf|88D;yYsAteBe|
z2L`}>&FjUkan`@N!wJr?esZCE!HX?ZQrj;}%^MYJgJs+E%h^dCxH`aAs=<4ZU89Dk
zX8+Ny@W9!wqB1qx3PDG=zf8qaAm>k;8qj62Mpif8S^z#`b*cCN7<Dp=CEW1PLS2r)
zkoq!yu8}9QbR9p=cAW(3p~YGz$MC&lf2l4<sdL=5<ez>1O#qWx%|rfuH%9Z+s5!aT
z)nz$i60az1wq?blOUjC~s?nJ$xX+kK-{j=J!Li2RNEby@%douN$vsM$vE>X=mDEF#
z{bk{D=(O`tIR_PaAqOG7Sct(PQsh}+2`O~uFkzimrKA~kWf)YH11^UUvm6nYBWoV9
zAy}j^CgqFyP@zJB%8K%`5-cA0l^9!NUI8eXN`q*P4!;d#q>3Uh2QfNpzFK8O3QL|=
zV?;VgV@#&kUCcDR7pO+s3WdTyj%dt*RQwl%Qwip*ToR<Cu)j=?|CME|32cXr$=d0k
z$kDRKt@4u6w%b~FNrD(cPH|<D>_!^xWc$HtsI0c6&a*Fa*;A?0CKv>^r$(Fmn}e#<
zVKw;Z#^e5;rAASf>cHOqB|4$NlKS)R-S8<49XRH4b{t$wPq2rc^w+-&b_v+xe|do$
z8a#GApAD`ktFrouz7OK{zk@rK*7s_PoCDWI4FGQBeT}oZ!4G>XU`sdZ?e2p$eGym}
z@xpeW9CoxNVO1qo?j(gg1-T{#kBjX>V;C|)!WC%7DH!Mm{e7UT4Rj_!YXgY4fLH{Z
zdN0KE0lTJRAE>^VM2IO-xS|+_e6U!KFcj)ZcC<7{>w*DV=;5L6_Qo2>!Pu*<A%a&F
z>vU@zW-|!CIrf)%6$AZUoiPr>R9E?nji|!wF#>s7%hNiJu#Q(&5ZXet8`X;#NYCu+
ztImu%&m$a}KWRkuZ-@tw%uR)w8B<O$QF>|w@h|fUdT_>ZfPedC6fA7oqVTR|cZ_4_
zy&b$^F@JHl*_Web!q6slqV72R9{XxA7_9@ZrKVJHZ*sHDH!-ant*la|CZ*to(b}jg
zb(aD>J5n0cq$b6%ZuvsHY<i~@eAU0y$Yf&-vvVgrqa9{P!Chc~itAwnLUHZVS5+?8
zD^B^COl&eOLAy;>*yvv}W)KNYDbuwNO@<Q|KZILLI<5X`cFLc$`60EnD@?=%^Z&B*
z<Gi0?oa3ODQC~;?n<Edw!2)RLL_?h&aIpq<=+IJ(Xd0tFOmgft%ypf`NDku7)s-ay
zwOlOX^8izfokL%@88N2XnliF=Xk-|}^U+0#cC@Um)rtJYpu7xVvy3SxRzl49u^%w=
zd8j~-%5!x{PoV|NmM$J09vU22Q0ybTC`au?mCiUUE5SS<o6A@LNkF#03ObYRZOx6*
z+L~$s6N@hz>F*2pT}~q}?yzGfiV8GpBeocHcUMQEHO{dW5OGX%&{yXo3mNV`8_b-=
z+4Ch}78C#5{pY0d1KDng(p+rCR4mtuSywukGjk?tI+i)hWfd83kU<^v?~VGO+*V(d
zqviW0VlQf1_8I$m$Q3IEds4ra!}8eWGVl0w@dLebmCmDNkNg$FFM-cyViT$B+3yb5
zS3To+PWF5&hZne--6RJG*+*qy@yV`3T~$F9`}nViDg$ctOzQO_zCa*|EWAy8!e<#)
z7%aMl@Ii$Z{L0@mq9Y=4dRZ>}(ssE<SL0wur*!__N7wv?ed(VDun_8`4wbYubb2d%
z*$;w#(93nH@;=*IU+Z8`?~b&(NL}A`SY9sY9-$Uf*HX7o_W*6=UtQ*fN_gp#b#P+c
zINUtG1zx^o8@yuMPIzO{EjL~lsVE_*BVm5T?5skyRY4dxg5d={$wXVcF-Bt38nrxI
zKu(%hTCg15bL*NF%Q(!TC17;X0Abh*A$2Y0hUl7o>(`;ZS8o_cSMAxl1zov&`!=*|
zC#bF>5e&@uuwEfZyoHbw-E!T&y?d_QdBx@1F^Ahcv0;4ux=YurUbSM`lF>!O1L-$!
z#Mq-YQcaG&EG{G`dj^=>uOI7cF7xn&=$>1zz2@qxcJCsr&YEw@%O$_0EJwwlU?5vS
zBTjk<L?$}^YUavtw>kcnJ^{gIR-|LzymabhHkc6%@@5GfK@LIEuxp*gy$W;sa0H%Q
zl>rb0@Ls^gWI$%xNRgLg01}eT;*QL-73RzYx7mk0a{tT)=(%FqxzZI*sMEu?y?Jxi
zv$t51_6BaHd-cXGrNSdyWy%8k_Ybft4TQ(uQGgR5Ys#c39$5<>(4r@5<lwgc$`VED
zDO2<Ejw?ONoa%K=i#*Cuo}Z417r*iHN%jxAf2vwa9_#jFUbDC%B1;v69sNis=GsH5
z)YGtXv?8JTZbE~wIBH;9s!>B926U}mk$2hj2Y_o*s@yXD#IZe3Kd6)ht!nzyH9Aq5
zQX(mll-&uHOv9sDqWk=hX@oxC+BSn&pq4$k?=;`8(p<H8Jka2}dh@c~%{DnqjKsYf
zz*9|fuR$wczoy&U$+>3TJ%Kz8zou`hs>ym}9W4-XawC=}HWx3j`k(M0@u!|GyENu&
zi=(aOm*?uG<%3Pcr}muh=RJUB-b?wZFx81s^g8M?EcyQw8-}`u;brSrjV(!VhZ|6`
zp#*N+STYLNjIM<q2-i}G7Ye|Na#-X;gMHntO&q2xT3c0`4j9=id1j45PLeWN3MOLk
zty{Tb6kWO&EW#!fTTsy6*4ThLWA!B%;Sf$03;=%-akbf$XxZ4ZB?F<LzgWPBK*-BR
z3s#ISK-p&0-v`ZIXv1Y2)`tVWBK$rUO4#K_E$c2_G}4(&w6|20+ii@y1g%}O3Y%N}
z3-B45*AT0%qM2x0YiWrQMKP%Z*$`V&(9~ETMJuy-P?!xo?)lLRmv<IHT_AJbANyI$
zoN=8st?6Oj5=*9WMP?y>ScXxtmEdeb+-T0f%L?&8kd$1_N;SAx?rn2DMwrx1HE)!<
zC$2Xu`wl6zIU%9Yhbqd>Q~RB+Yh6$5XaA-FU-<T~?=ZvLQe)&|ZCkEq*bmurTy?SM
z>4Ec<9LP`iCVI=tRp5hDT_8SKQKLHdfCgUOQFturxdfO8>!ONt2075a*Idl!uS64F
z16rZb#O6iWryP8)JN#48y>>@JDOYN`zzX)CmyZQ}d%>C{oYJ#@eBz0~Q6Nk;JF0_s
zuS^^-GQxNKkVYPjkzKMQ&}Rd^(_U@vfr)V3>Sy=dd9c!=MXjqhm$h5{z_)Z;Jho^l
z#i2$p&O5}thq6;1ERzvxfO<G`y+7>tI_)wskCGsTL<t9KA|=^bG>@r(-CbsEYPCFO
zL9-G=CWt%^>?}z%UMk__TQEnXDN!PtEp|h$O29?#EL3QOSrpQfnm{R+VZ;O7UF3j5
zFR_T`TnNNWyfIql;|M8|6%pHML>W;Qq$OhDbnvrgk|VReSA1qhRMP(>GV+6fZ)Tg#
zDk;I&2+px9nFNz531`-P$>!`B;LdhTr~9P?v$0~Sj4o&2l!MB%J;0LOniF2Ju*oe?
z#RMOMcglmT|Ebp0FLdCGR@STl-*Tt8p!)kgz!deW3$Az=xSQ=7`}N>o?6W4JW-u<w
zs>y5c8Wsm1dyIb15B782x;*y%u@wdeQ*y)Zj)+al)}1P7I}bicJ$=Iacc}9>RDqrB
z=B6^3W$wH_5nD3=-fO-#S-Y~6{d_vvS7P$5YuVW-TM??gqEN{Xa+iTVaE?l!jaQ2I
z^hs=I3aG+#%xN)|ioDa)(gb-3z(su(<>6qyFbi*69c6=_LJ6`t(87fdIqd3a#YV-?
z$zoa-kH+fLQ6`N_CS@3TXENS`dKWY|Axx?GSrDLtYypLe-F6!yCru)AE~e&~T?r*J
z7>OvdG1s7ZGCm?VEYflL6mk~i;_aZ!XrLXt&aTe(igKetVCg{NphiVAB1ubgQ>>oD
z)Qv9c>rHkTId#Q8xy*<pg*JdCg72`WgG4mFxHVpfFgx(Lu>@jAP5&SkI-B|N&JwcV
zY}`gM54g{lk2HwqV89g$h6(4MVP_~E%p|YK#6`mwn-cT9z$pFPy(-Ys=84LG1?2Hf
z*l@7_coIAvF|pg8=t{j|0-r?LuO~t+K)`+q#N0_5*x6qK2=1t~u-AV0I=dzpTz2Mo
z?{xo)``n+$X!ctfFugu9(NkO^XW#oW<`PO5kE5}_`1{TEw!id_s4xU$SFB`D9dS3_
z3%0Paz25u5p($9a_W0R9mHLi9Wvc{wIL*HKinHlcP{UsOR|k-SKjk^q{1k^hb>0Ae
z0Upz&<DCXQdu+0#-SW=Mcef?B+;Q$71fOj_zmB(^J2vC1%Bfo;+r$Q5k&n0|l6|w=
zti<U^F|A`5g8)00j7!131$&s%5`xpQ&&bObaAwm${A}p7S}5A=LgbY+b{BS=ySyYE
zAl}Ew<E7n2S!pOp{Ed<4MsyYrWE@5se`nHN7bw~P>LS8(==&lUkq(?-P@}+`4cky>
z@=96h<cD_eW6zi^(r}Kr3U#*si~XR?_lExTG4_ZKF82I>G8{pdPhXz7xZKfYrX0R`
zS~<m<iy2XA=pV|nz7QHv%B{xb;B)r=`)>;Pw?Wlz`WD6LS6{Jjv3~Z;v|bLLAL1S7
zPGX%5QDsyWHB7x7c~NXwz=NF~XfRv~huX_wcM(Jk6>qA?sM6~p3q8-htC$8uWmhL4
z`hf=eF)bQyYpo`3J>(}#UlInGGgg#?s!HPAXP3RuLLsvo5mwZ@pu4NC785XUHQ5Es
zfO&)uHPv&Ocz<7{+KA#+<z?6mUf7Y!3R3cnZ8OhH(}WYD%(fJH=V{)>@!0=Q=WUtq
zyz%!ldz0B5NqTcG^5L22>ug3dqkZTjxI4ZzCpdAZPPbqa_Rv9v%ukmT-~Zcy?{@uT
z2id1}V8_<Fob3~>dLg_gHJrK5?YjIPG5c5cM2^xCe0G`OGcn74Edl@N4>hUT_uB@m
zLn^LjXgE*Ew@hm;N&U;k7glxsS@ri~N4Hw8Q4ByQ`-{hJZ}o2f`if^Rp?BoxL_YtV
zeV6^t&;A9_ti}=!>{=avvOo(V*AG7PZ!PMxvC<vo2}h=%sTbSkYq>ip3AWB|EC+`p
zSLmVB=7J%QMJ(jF%*bk%LSWQtWCA{qrub6KWdcQZ#MppJ!R62lq}(==EzdK9f?Si7
z_}gL;#N5bTXwKDYR0_;<VU7`dQJM=0JS?zU^0F9d$Rps>4A*2d0x5?!0xqOwQo!TR
zhO&q|{dd&|X?tgp%q9*kT#iIOmrxDPZpv)*B0v2c$brh`ZIieC#0rLAxo5Bk9eoqk
z`;OmrXEHS^MMu}Q#xT`f7wObYH_KCb!1~&4i(h4*K?zx|$}qhPt$KWm74(3Y>KvxK
zg42h8g35JbLs(jaH2!O&-8NWpb$Fp8!0vk&bT`<w>|aP)731p>%qbt>9;6KEsG$RE
zSOb-$-if><;2>CzN@1lKmO7E%NkN4r4~7CBw+r)o#OFbVlT0)>HdGgp0Ae=NR#%LK
zYOG3CC1EGxa<I752&E&5*xy+5fXN8Vxxj7%jsg-@#8gqtB|*h_BHr9kog)%roy=Bg
zP_nVAvb@aW=FkG26J?VvWoo1ftWZTX6LL9?AVg}m%|^A#$WxHgh+LCaW8~=&O`2oU
zp++<>B$e@PbMYvW+?xqDs?t&79|WcVQ6-Y)NC&8X0E*MwHiLq!Ab*w~V%fOKC}CYH
zbZkXqnOvUwS6v&J?ARjlO{Q*|Y=n2FZi1^aSL(C7uM@J*vfuFa&a!*1Wd9)ppAJQ8
zlyDoA)fx@gu^&vo0wQnT>E#uC&Av>(xBjNU&a!Ha_3EvoqXwbCJlzxTrJMBZP2U37
zhaaYH#m@0-bY}WUAmo2=xaXO?0<_b=qcrI__td((n+<ntV*kA2&A3fY-_xAdrM2hR
z@{VwCNXIBGl#ALIS#MW5pn=pVa2%L3i6zi#F=^!-Mwy8}3S9Y0=yY5ZVB}IFhdrIY
zH4{LJpAINKKO4E6B#@|9LTn-pdS<3RVJ2<}iE9!u8Qq!jOY<sD{zHh6fC@7DabCnX
z9rEo&t;s7T;i>5zQ{h^)o!tn=A*{_~Y4$YxyVN6Q*aRdm4xCwBTCLDbFVey2=yJ7y
zv8ArM_FANpkFqB4KAppM{=r`ha=_11)9gQ7pa)i(^A*a}<W_G~X%CS4u~BS$j&l34
zc9ddNcwJ<ihE-KTcb=Y;uSM8*_<d%TB8TBp*=lTbfFv8jEJW3oVdGOE%gWR{>9j=N
z`B|94iS#)PqEx6P9Q6C##LndBW%IMRVy41rL_+*RomQie@EDbuG6EH#)haMo4oIAZ
z*eQ3(iJ|e%l%37Q!fY1?(9KFJSxQh~n|n;Ep72^CQmHT(k$~>S|NSZ$_#aSLBxJkT
zg|Gj9NW|T~n^qMp`00b}3sO+scDce0k1{lSwH&N%y~@<X|3CZK>SA{L`UluS3;5Oa
z7BJRatdIN@cpok+H6+TL+K!0?cU;<aXu&pU_Kz;piG&95t3}TQ##S0-LMvO#zJ2nD
zy$J-tLAHoJ?*a?Z*Sn7;V>j=l_|(|>mApr1<Wq%_RDg<8395_gqdtwCE{8-sqeLz_
zf?CvA8-e<W7MeRcA?RCBU0E6q7JD3)>~6djB7(U<yoDUdm`Rs`L^~-N;Iy@ZWCy^A
zpr@N`O`u4lMsvcA&4)@(L|lYjM3JY^<*;ZqYDK!#1_CLs8HLGAdto+}6>LRKjnTRQ
zMs<3ffHBg%+M3EznyGGSHiF=S9?bY#jht#o_jPx5w712Byht_3sK7-L^NX`#uIhiI
z2s4>0V7ZVYA$yrlgoVNdh(xML!ODfat9dq9Y9UE9P8z)_^25-H4kk9syc5%96W$p5
z)pQx$J}HN58aK;=3wIs+s#g2?&5y9>jQ{tM>vM;%n~F|<k)>ciW?#%v+wDh^(^9T)
zwNO|S(M}JIvr}Ntyvy6m4Gs=#MM5(hscD6aC5!I3gWZ4hD4XL?j_Pvwh7TUOsVf*>
zyZ_0R?)9%f2Bh!b^vJJL(+EY~vB$Yt@I(I&VU{oEIQJ>)ec{Vr`9Cv>DM~;+f%Wep
z?gJSARZw+QJGFw^M(w2bQU|DmKpOe$emDpfav0l)yc?_G?(JJwMr$j}N#l?X`wi^E
zWYxRSo?TbLwW}8!D9%-j(DFqI*bMHt<-oq7{*LBGi#a=irDfBGac6;2EX-o;;NVSt
z-PU{}GkbS|tFHo+8^P!zuwrC5fgE<w5Cd22h*T5W)@D-c)G(n$w-uU12k*G;mYeoo
zO+w?{v1o0iI`eCI3!M(T*+h;D5D7EC66I1_(1Cqd?b*HSiXGdxZkpV<VSMfCl`EDn
z9#t~eUX~ahQW{~Ru_51LL{^B=BZ;u4jpnOqx`qLVmoWN^ii3&ZRHtVX&Xz3A#>Fqx
z2V>zDTLQLpcGW*8N9m!Vne0A(F@8YqA(`p#1(J)Rr!y`vEm|m3CQyLFbEN=e#+q4)
zW?;=+uppGdKs>nhiVayNnXVx?XgS|`EY4#DoEPiXW(AJ0wcPi2kC!yP(KwmoS~7Vj
zxL+d5U2Lp9A}C%EFuo&j>`iSO3x3jL?UG7ScGBL0?A8POM`NsCjn*we5_z^UpnQJk
zYe5(L>E+3AP$~ny=B+v5HMjMK**9a$x?&+^>Q*JRf%_Wmc^&Ug+y1)lzMh-EhA)ro
z@pabJv}5QDZr2qkb7Td2re~Rvk92Gn`@P4`zR{^qeaZb=<?6pgE6mcc&))DM-`E)S
zFNlpb9a^_R)oEwH{?{kxUg5euOaH(=#Y#8mL?MM-6Hruur~KnIBjKw{T(Irf-n{7h
zfOiaF{VD5RVPm-R$2zXR`*C*BvS78<&zhgUr!9K-UF@>wfih;-eYh`kZfX+C{}Jw8
zl!mIL?vGqs;nhNyHD9lk<?yr&GO4kVLwRO|T@T^{9xMwLBgShq@JdUHyr|OS)}nM(
zqy`%-L@XHLA=rBdN<swvYKbY$7U+>nZ-kW<Wu+RmQbDRkg^Yyqdh*OPV>IZEz?dV-
z7Nl!Nt@$P+lFPt_`rEV@&*XMy@s-3JR%HU<KMW*tXJBzi7R-oI8i`#LP~`Z)*rc_>
zr#a_PKpi`x1W%srnI212>87oVFPpgajP=9&_)e0St*=P^T?$KUicgLd6e8cHt=&pE
zp1R>CYiWhs57+v^8$!3v#NKsnQ``kNfByWm3;CXX(EU3gxev(zO~V}r{l`y-9mbr^
z6L-~)*$Cg<gV%c}_W(vlo$2oJE!2~d!w#b!s#TDr%53?$h%s(izi#dFOO`Gf?C<G{
z&z!SX8Z7n|c?+?Q8<|b3M-sJR2~Q|2u;TS{ISqP*T@6KA1~B*Nr*v@3dh)_(Rl0hO
zSOy4W%*NifNFL1<QZu*j>5Ad|8Vy>tijgrZhh#{oEAnCipo|<Hpo@LECcTa`Q@of#
z2pOPz!H1+<KF!>@<1Fx+r_&OdBw2<W0xpN_3olc*lOGP}gIQo3F1B7Me#=CDEnMD(
zHurfLcwQ+j?T2IWgQkY$N?V!t`*)DrUD@ndlM{qISU&x=0-0Xxg|#c9t;*@QVC6~n
zcg<6q-)5gvsND{5_>==^LC(QispMVuv&VA5nbxHS@KDr}r=HedKK#Jo(gP#qM*HZq
zid$GM2tIvxILmeh1LYdvziGVI7&ySbLGK*7vQUNu1FgpH4cB+~HX0qP|C^iL`kEgI
zxo*Ag$j*`lw&|l9Jva3zjAkp8UBBe>;d4M0&r`w2Z_hSHqxnZ}Z44HG^_L$kv#UoI
zH&@2Od&g{^=@qwq*Wl98Cs%=2x<=b-;-wGn%5c=O^UHb9ac`fAQY5H9M4l5N0ILHs
zj4e>CPL0B)sJ%tV=WrNABK!Vg0xmKwB3g}<(UII166atQ4M`;wswyuDBchVXSESb=
zth2IgsMaE$ln1qZly8K53Wdl$IFt{y*0i^_)R4}gEPoxUuB(T6xtLLL7=@a=S)CEo
zS5@k?Mx-ta7m>n$BbQ%VQtUG#KTXH#2|leT*Gt3#J~!acz>`^oeo=TZ6B_)1_{@(G
zra=fV-<pmQ&W!lK5Go{v;?^IKV;-b`k-Aq3*PiVKmyflUt5Wxas^m6VaGd=aYQVDa
zLR8BRv8e}GzYaWf{i5#tOIkfNdvHU%3?$iuV96xtJm*~7HL>JMH^|@na({v@{n8K0
z`GtDj*`2Wl$Cpc&8iW{@nAbjg>&e#g+V!uq-z@fR1%gGZtShQEUB4D?%`5P;hrtNB
zs+74J{kfZH^@)cq;3Pa~FVyF-e@n-r66aU(4ss7ucB+V~q3WqisOKX0EQv1}=uNc6
zn`6~}X*S*pb&01C^HZ~4tCnZi)}f(=JxPYo;W4nPvaHl(<TB;OK2TpvlBN~qm?a~K
zibz5LZ}C9Pk4nl=*U-Y=o~~rEFRQEqB`T`mXt1QM8KY4Lxv|Np*UF`gFq@CT1fVpG
zGKYtRRrS&GG9xOftF5dsqAEz2mXQ4HTq5Ari-Npfk_EshF(jKSok~LlbWs~ifi2TN
zM82=WKJ`bi6mO^O0_>dWdO_if2NHnfUnPKRx4+zF)xFicRpqW+`)zryC%pJ)><cDf
zy<u>7mQb^9`$@XK<KE8UAUF=yiAfAmQ_qjLSz%pVqF_(4)iR~a^fLFR1!o4={LBq(
zK-GSw`FE3%s54hWANIch_!@^=bNcEfi*kix0~=@0+%gocs$0Omew+IV;HqiW*b)|S
z6Idh1H~VXSAuxa^Qg8J18Zcl@b=+|WYPHB}Qr|#6Sc6a~zwH?sfG)5v;MNM+-?P7i
z*{U0EwB2{Czb4-0C$cb!{ls?eAxcciDK!<N)==L?Uh7%vfc0e>xODl_Mai&1uN6Uo
zhC)FTq?E|-_Z9MJr2@HZP=c*Ot_(s76hHx_)~r}K*wNn9P#3AlW?IYg(gcSQ)Yg=j
zp;&2&hR_q05~vk~p<w5m=@V#&5EJlKtC|2sWA0rQtFNoAGU$2BHE7YoLBzDsyt2|D
zIhKdVxYi^)8jNUpO(Y#F;kfYLNYXXaWcKw;>E4RvSRhNng)YvISc-R6cwU|5pP3wF
z^}j9c0a(=~v*8ocb~Z2e#k-iM&I1SGSyw`HNOH-1aaG7nRS=mc7KNI`W`%ny_0m)@
z0;8#yU?lZY>f7h<6#V|0=TXeHXw}+Um7*k&E6})o2M@9DOM&l9@7SW|u<8UD`s`+R
zj-CA-`-sg46pz=IC{;qgET@c{Y-R6ZZz~C&?t+gF4(lb^hLmE*4s^9LkKMt30FvoI
zOOTD0R)&|CrmjAWYV|qdps<{TH5Ah9#FKe;@E++v!{(Yjwy(9>wr2U!POF@|DRzIg
zP$&{a<2$7HdK@D%smU}7ckv5#`b=NT#QD#7*Km6&J+&;-p;J;MkN`P=3)KpVNWfvR
zCILMK#5p8~#NlxXgb)hFBB<A?Ra|TYvKSea#p6rFMnL6=jDVl6xFdjXey}B7aW@Ch
zX7E`i3pkeyBpra)gHLvJS8Bdf%E8oIBjDJF%fQe?eL$^7iRstw>+Ny*>Ggb%E^iug
z!~7y+Uh3#w_4P(aCXW_BzXJ2MgJgaSRf;j|2=z|nd9kUV2a7w<aHs?}H&j>A*sLw+
zEFuN1q{5nn?41s4zC|~ek*_mVq~rC8b`p0A7Lz)+xg1Gl1?eo93)EXFWO1Xx?wa92
z%)Q!coDROX3h79oUPbdr@SSFojreVisHt~>5hN=~z9f(i)?<zZvWd`RcT9ry9J;xQ
zl-bQi>pAmuAX8xS|0iNUSIcI}`w!WaOu*i%py#q-8HYGuCDQPXj=(^28&f*5L#k|E
zDzz|Ss1$oparmcC7g%;Gj_zeY(t~gK%f<uMa3J-Q%ysTc&{JkJ*4#3&^8pJOKa=`I
z3W6tlb~IfsE8oD?j4U+@_}1yXq0~18e4(rT&r*NIZnq&RSD6h-Xl5V$$=){4BjB4w
z^ftw!xlsN85#4%ItaSIf>CGr{^$r_o2CoLd4$_>$elmKgk>MNO%$%FM<or6`0q&l3
ztiF@l8|jI__F~Z98ZUM^?WE#}0~jLYo#7BUB#XzGv2625e_);&xRnaREkvEI@y6P!
zvT&%#<Hj$uTJkW9))9Up7w2U2=ADq?x%fcPnGtsB@gVa!vNv;Bj4YGFB$Z>CPEASB
zGOvhiK4_jJu$+st-ShL^AsHv@hQpx0%E_L+KJF;k`Z#-?0aPA6{QA`0wl8{54HXu{
zUnTY_OE=u$UDo>DcfiqBlw-ab*0X1gV&z~xher#m&AmQTOX#jw=o2pXUiQ!I$@ksO
ze*+B<f5g7^Hv5}LT+e_CPzs)^WzXGf28+R;^RVT(b$sn^jYOb*>rvx_{{-P(2a?e%
zFMB2>Z?4lMFI&F55n24Ej=CLgjX20neg%F*Flzt#Dc&M(DW#-LloM;{mdJ1c6he>7
z3uRsjR7fZYoVg~0MkOM>J9vi*U4YMll+Q&}fkel|ITT5rcrosD=B5k0nS9DuL|#L{
zBPW~Di7>bXB0!VKziYMt(3$R+6~8o-BB@SS{{5TC0uRh!!V7Ey^P-HgqGP)Q9y$@Z
z>#vIv(_gAMcWv%#QGF){>Rr$EKE%FG{}Pm4mx$X7R<gg{ygreXfB%va?VLWm-6X8h
z$rYu_I%M+S(%j>iJ_;1zP_skNWe>g!-}}w!iA2u`&;cR*dSCfax;7J0cb&hFcN>=B
z0;-&fVi{gXGgj=eOC%x8v28F~kscYrV<NeJACb>&9+%H}85=fI<ybtBIhQ!<0*b5}
z26oYO-L%VDV9hh<l2^*p!;)1@m5z^uwouULCWRh;yUhqN{>IksLKFC0<wnNfNM#pQ
zqEQI19GQd^Oe6A4?HXRk|1EQ2qyN$H#~s0dC!~lg<4Yf49~_>pmZP&YWKOrqz|qm_
z60!2!&Tmf(*bcT&tZ@Z?`(NzMa(K;(=4v%?0!d?uShtPd%?jD)Uj$d^PK^CjKllu|
z0^aUdTPE(>mt$91T(=zBUr{f2v$d?j9}XT`nmnm10N?xfM>}2Uo;BCT>n4|D-?#t#
z8s25x9aJ%OMP!x7qJlo1RtY&OB4!*|=&+g%9LAE9?rLQ?>0Z4euUeG}K}aRo`w?eI
zL5C6%p%i3sIWz>>jLl&&8*~_gV-3fzW=u*_abZMCKwI-wN_0Uqe~^H{lJ>(Y7>Rja
zIBlM<#E<2e>AKgqw&<q6{~N5YDoDL?dRL0k!k?~BK^f8r*(J+vas5~8sa}&C?0lma
z+`76ws!VN%CvUDBbh1?^3S0jM-bp?8knb$C1`-LN{o~yREC4TfoI2_F7&s&F=#1>q
z1Mv<A`#}SV2Th(I;~nN6rTkPkbt3Z9XkAT##l(#nP&{sj1|4$iG|;P2!D1yuGmF@n
ztSAj~n855Jc9)k0P(uum^O=y-fyrf|ORK>&^P*+VN-wJ=fMWPPu=JJ|dEJE$dx3Rk
ziLvO0%}8kJ?o2iq(j}T?p+!uave-wq$;iP=9Si`Ik)#JXaHbg8Id8!Ufc%e(9-J+o
z`~lHScX*&V`gtM5p;FF|anNR%STzt(Pk;OwoDAir9{hMuN~DK3?oF8th!LkgQbJ$q
zm<p~u+XEh2(q67h?F1_p)kIXO)2q((!j19U%&~&ijzabKPeE>}r!4MXB@ED9@V6c9
zHCFbPm_M-r9A>>E{_WtdKugv7z{mbKQK81TZfmU0_VHvWVck@RRskX3sWsm<vcEuq
zvI;s)4PBz0t9ok8?(w&>6k*c0Idpy*?+NZ!N`=v15fz|HFlIU!xzg)0K-vHyMtqo3
zx?Pp!>A3_(tx_(N<S^M{CchLL=YSszwSj~AWGFaO$bc!Ko^%1>{VOz>Al@}hL}y;b
z&!P!qlrvldHbr?fV>cR%z*L@Y_%U+qkghB(3Hpn3O+1Hve!Ip@yL4Jd=5i326mm!o
zVrJfiR3?>?9_k+?A$WugfDGOVh3P$asNs`syJg|#S8fH0`oh0o^BeXZGvJ;)&UD^?
zb5)8n#eT%TlcO&7O!hvhLWWD4t97X^u$A38d;R+79BE)|i<aS=Sq^*eA6|9W{Q6Dy
zqdQ$sf+$GBAS+^D2QKi{<KI01KATK7KO+&-NBp}Z?GE-C5M%eS5Bu2(dw|NK1~H$1
zh5H0$rCihyHBN1zc2n0;w^Of1j;^~DW;@Z2O{@Cr!R`C6x$4T@JGO4wv|-gH7-RM(
z+nefZB2}S4A!$4|kmZ$P$YOV5kGXVF5hnXwCL3JWkwDDNkit09<s|*cD^@Im?H%a$
z{kykr*|4+;-yu+x>0Qp;VusOEX6C^5jf?Awb9h<8_UrI_ue%h#ZEvVh$n5P%v>QPO
zppzZ5&efR)_Vc?~2~JJ-FaH?TWcrmeU^J9IwJIH-0khmaeMm|;^OL!u-<d%`X@Gix
zyUi6p&mVa?=U=SKi(>yg$eSM=JTmrE+t=gI^lFTtC$U`>T(#?M07C`rw@*nvU|%%=
z@duDcgH?sSTX#m-tEUsR`1C`Edmet5j)se~{6UX3V)(w+D;4BiW}&mVXq+PuaHIPa
za&w-4NxUoeaAII1GumjC29Fws%g}LfFk*D{zMgvFY;y>qHK~6Li=T>xx1-Zw$+6WD
zL;2n8z4RxK9<cxic;08zNXr{Xmzyz=`R9?B*Ls@{oREC5*L@9O5Jp0K|8)1><4>pF
zp%s7wIvVUc^v}NoE=>cPLwB{A9zPUMI$WwOGMs996kSceX3HY?Aq1xHd^b{{;U3t|
z?`(_vZ`+!0v!}%CH`jVstS&$O=*ZyFU#4D~1{L-Kg_Ql`H=u6mrnb^p<%72pPSu;v
zfju!-12sT>6M0LMt%XJkYV{~rZ-!O`k=cT57CS7&a_Dh-G100k_Hn#5C|*+yRk9os
zdCczbThP<pl}uzY)lH4HHK?sMQjL@fVKxf+by^e*81$&BGS7@E%CV;{D|Ofrfi2kQ
zlCBX&ju15j5wAL%&*N}vi%^nuk~cRI&uh0?^9i)kYE(*@nyHuQ`ul1k2yz*!yQ{Im
zh-#e<OP*e5<OE5vRKV{mGV-v4TF_Hhi%7XtD99<M<`-_vpGGm8S-7Yb|KHT#|LBWF
zHq%EKO!pFA>`&66N`NIheLBL;8?G?}%?&^AbGX21UXkiVPhAN7X(&>oO05JFL*^k>
z>I9e=jfEAdm%;l>>gqM;1QQeBEbE)Q##6KkE&XLP>{?OLuAKe~^ni~-cGk<DnPP8a
z#U^l$e)Fp31%L)e-EJK}5tClC(PPyJ7nhQf<HuKOhHNiwsEk>Eds(>E*@KE6e>~Oy
z+rUdHo&SkEvsBT%)jeqYYRsLu3&>Mng7?|q@A5vFIVX=gzn|C0y^iuww?wu(>=u(+
zo+HW<OOeOP@VR6c$kxz|4l`Q{*$O0LWX0?U>2)NUke#h&AdQs?78U{un$46RD%IpH
zP9sv2xPuWfQVEZ1M8IRWQAXq-$EF#Pkwa_LBve#jg#cp-QscwPG<$ky{${q2xcQ4>
z4W!HS!b8G~Ge4Yt2;Ktkyw(Fg`DNP#tAcH(5>wxQKXtMVR<f3fQ(fo?{2L1DO{qQD
zMHcA{sbB1#{v3SEFV^Z(4<0-Se~yaudUiLG+z5Xzn2EDwQHy8lwr67#?Nl$dh}r^-
zk#85NVYUVtD5%k)g$qqkmy0kMLAiNo)20HLXG0S%XmcR9!vj~YUD*_?^%e0v5!4c?
zf?G!WdJ{^ih|du)UD@qzRgDc;?px#4RfvQ$P_P(-tAHQFtkRG<7i}yFTk`12GP@1y
znA3q#E72^uNQkrn6y-&EFc3rhSQX6Xz$!0_w=^{p0&FYDw~)C+gaAtwj99y6<HTB0
z^qas63>jwK>g7uZl3XFx*4hv=VjadB6$}_TTH@UO#YNt<vbERNR3TCmtkZIQv&uF@
zF1%isYkpl$CcyVYPx1qu^I!C3zRq!Gt{>{0#4_h4=F&*k|5Q#MlA-9r4c5=Ed$=cL
z2i{uK6J13epnSBlLB^^+?uvR<?DD@S8@&p47<fl2suk1A$H#$}eQoCY$Mk&~G=8QB
zwyo){&`h72Obr3p=u|jX?)g6E$x&{ByV<j9kuDh(@T;sth59AsKlv$r*N&AYpajp9
z*;Rr|V>cZNIJNxV-mRey$8$r$u=T|9igN3zb^f@u4f&pX?(-8TzCCp+^{D@Zz^*n8
zUftYkW!Libotv90$Ll_7y`s5dVBvV`kgwEbZEhT`MlBA{@;sR^oYnSw(2>sZl6c8+
z%z@gee(EQYD}7Z>P;IM&o;oG00t-44Ee-XxWM045Vm28>439%8Ix*C6<jci0V?(gj
zZX?MAm68;-w6&5lBZsFJ+HJ5liY<H#ekqr6c@}hab|f0`Ez~NdTuknR!G?m-N-cG@
zM&Kc#uqdRlJl03&$_+B2F~4&!6Y<TY2hy`+;g6=HkZeInLTXcI`*{D|&<l%1%ppNu
zF3*w+GJ~0Ta+MTb`ULxi1(@z$Xa|UfeUG~VtT~yKsPV>4<%DZ)>7RPL*`fYj+vc2b
zazT!gA6AL|C|Yva4Nk|`?0e_I-zSgz<Zq@R`yy|&oc$Xg8#NuqjZdHOehk*V2<qr;
zK^FVB&n)0c_*zb}TDNZN&?<u{%f$AwzuMRP4M>46^VFh|Wd>5s+E-cK_g{)XmOJ`n
zVuL<`{?1;R`pb9s39H)SeZtSd?N+N^CS>2v<myR&Xf5|3l}~k0M<aVputg53T4WIb
zR2xA7kf^FGF9`*TJQ(y@4SJ<Gf_Jeonu8byBX>0yJ7`EXH(`HR6Cp-5pCs)`Ye-9T
zBt%}7KC4oR4Lg}8$K?P@%e2Od3nd((6)Scn&D52akP%O1O^rrS2kG)MA{TIO3dBVv
zBbj&@`q4Z&GW%y<KSvNKX8YhS<b7wNmEcFwN{)N~KK8d(P`@(DKBq*@?N>;`Xf*az
z(EHpo6T8)==-ld+#qELH63O^aBl!g_ho|;o;FScz)a!EKKGk(=+h$4Wb)38QrCww2
zXCFW70DACCU<6m}@sE)iTh?<`kMBigdZndIw*zQV=xFLtR*`YrRSj0nNMxcfR<mz%
zdJ;u%*yRF6;EMp*LHa1!PnN9GF#^LERC-p<3hW0CaF5K?n6*=#)B@_;$RE9hP_IQk
zts0gE11MC2DoQG0O=UH#tByhugwafOWTpaOrZzI2-e1szQB!x9$BnIOXTo2sQFD?V
z?QPfxghQyMxwHf|HC9z(%8gAm)~z4cnu#e<DX$Rb5p33(#27!`LgLjW*c7HK1c~9-
zsfmHaJ0&I|a?Ik~g$%;fJW^RvMn>agGY*>9)=Jtzj9Lw!VFG@4dhiVvBy8vZ1E%_4
zYRzW(ckw)?J=;`Eo_i6_nrn45hiCf9Fdq0Uu~p@sI``RR%tuSleFk2cepi9Qsnb%}
zaJmcJmRK+Jj`x?9%h=Z@*dAye3N^@6YPfrGW2NFds6_RtxDx&*^{fgGPJ)Nnp7eF9
zcSw;fv#`|I7`#>2dE^MY{^_Ub_XCFlPxy5D_~3{^z&CHXHri`t--#Zb@^#rBnk;X&
z`XBNi^&dNSEN}?#|I2v)f5AOWnJ7P1okjtRsdppK3_}TwS*u`eA;!R3RN*lqEk#QF
zunq!5@-ZQ>cu`+ZG7$<C=gM-j7%tY|_Lhjv!eOkSH_t2*3P{;lft6%lby{H3s41jU
z;-yHRe9NUoWkv0=2%==DtH?o8yb0{yt15~!sa>m9qg0S6jaHV6@H<6oO-8+rBzPER
zVJlS~!1x;FsZ|7(QINLefi#$#UmE86H-%xDXzOgiYEHM)A=f#Q{)3{h^mNqOGafKQ
zwEnQSXEt#>f1+Uo#Kx-X)v1rqx{LSTIn>COE5X}eOTqD;X1D4bGtm_Jw0Wc4o0vTF
zJ=&El9n?q<Ei7iI(ffc8Zml-4Ti!auZZm^5&py+WYWvONM|-aL0QH}|yfIdslXw%o
z&;Dg+u*a2Je+LTdv<knZ3^w|K+P}80%$mBA<#N9=SO!-Z#968jUwfVXl6?_%bPL<c
zI?ulG^<T@`Ctvb6{sk;!$3Afb5%?<4sm}TC!#@CfnMce2*HP%b<R?SXr2j9kkoiMX
z=lgm0rE5^#R1=lNd}|4{n%YS1p#B{BRb!<GE-0Y~7Ic<j%Hs2q6M(ciA}$RnxkrTx
zR0_Cb`_$yd4VSK2y>jW2!DMr+u9_h^t*y&P+Gt^Ap;IOma~MT^6x)QRigFLK;5|il
zn^HlH{iU8VIMf|CWbc^VxMs=F;6Qh0GTvNSf#1tc41rFoR*16=WenOrwSi10DokTT
zhS|Kn1_?d*Ju&~1av`6&gsQG0B>^5X9}de)w9e~67|YK}OeS`a4j0T-7|+EHW`|s*
z0Xk=1SS}M~=FJP*ftk@Pnf~fIxR)vTn(Gan1$}cB2J>PBGu{Qvwqny9D7)f%fyQ2b
z;`P%#6Hu^e`Y&?$@~Y|YRmjFYnV{j4l^rGO=?}kzWA&QUU10swrQS<64aBCuR3YoL
z@yVpGTt3Y{(TMqe$8jL7EtFYyx1NppggHa0qwh5b_{zof@f{O~dpF*j8ifWhdc8~U
zWG`W*=%XD=dXBc=0+Yz2)}8zOF1C5pw+me6&&$0Rc{KW3wRLB8n}a>kTwS{j{h2+v
zw^Sj|@d-=63LF#K)VkPecdHG&IeA$!zG594X`5;eE{}tES8Z=@8(TDX&5en+eG}|+
zcmKJ;qPgi>usysvW|3yKn=^Ufos^Wfom)!Dsbr*DmUAHwEFnW6bHq77PG$NCGdW-~
z=P;B06_WHXNw^phAJ78+MUxKyL(Vrn7l8|hcGN9Uedm=U_~knA@#=<z5{*p%`Dkpl
zHNg2NzbH2^^~Npr!&VZ9=s&*}>&3pgnOw^NC-Og1IP9;3Wpz<F+Smt|^fkapbw#<G
zQ|Urpmjkv!=%7#%5L?&QLL`+02~<ikPf9-DKur)aerzjqvPqW?sh&m4mi8{dgbBpz
z2oh~-1kDYkH>=PE(oK`teP&alpbC~%;Ai<97NbF&lTBq;RH6K;2wb>y$>^emZLNed
znRD@tBQ1!8u9Z9pvY0Sk*4NvWpqZX!Bf~95)YI4ytFNpua>|;UqIK0(Mot9L1N{qn
z5XMdzg<TwuaQ(RGc7C}wnKU|&x>zz9MoZ@Z>7&7CyRo?FKY87Yr)OQ%If=f7_cd)5
z1<|U8E6S}m9~vGrdH8!2kEA{}gWuo(=x^8o6BvE)zI*>*0ru<J!*aT5c@#6Ew@d4x
zx@{`QKc0Giydn(iQqQy812@S(XP@J%^J0hAeJci8r+VT;l_3@TJ)G<v(uuOHtY=qG
z&>%4eHA`;+m43GIe_a0rKVxtDx%)*Bd~%)RC1CS!E@`)|MC*DNYP0#~)Tce8@CDt-
z@#Aa~)1ikOhJ7zS(sp-65Kj4_AdSLC_B6z8<a{cOlW*r9qa4&AH9{>1vdAX`g*iy>
zL{jHMsPSneXyFj*?@N~Wi@AXiY5+|Q_0ig@N?tP-ndOVfscQma;g(W>r1v8PH@lo*
zWFZ(H0=)|`dh6-N(5t<zr5QOadD!G}6mn8BLzhS;G+o(*JYf$PHTf_uFNCzuj|%Fe
zu7WIz>kp#Ei=D8w7j^fy!{zCKtvrV`ft3j>vH4ZdjIN`($p|V(h68>h^2J+1K_hA%
zTG-cXME&XLtix^u7A}oNw%7+2^t832fqv3)kZ%Fp*^ww2#y!`^pO&guXT&N)y5|w?
z|5V1A5f09LQJNc;#haH|C4)`zm8txkm9`7nZNW(F$==qLU`6wOb>p@&TZ`fQ`%sam
zB5v3wECD>&d#Z~af~V>)lex#)v*4}v%`)#vR2SHD?}{j^oMH<nO*J;~DtmIg#{fT^
zUI?^p#W|X5{~vpA0^U}2t_$zA*4AikS@U2`mStIzWm%SGd6q5Dvn>yCJlk;`J9A<j
z$C*uVAPoT$AV3Hq%#@~3C=EjiGo(O)LphYvz)2~GwzRYirIbQqt=zRF+p!bqY0vGs
zxBq{;c{Y|6Nw)V|`y1cyeR-ZEk5{>jsDE|OWllMg?C_d4bYC;nQ)#qa^`cNx3MNG<
zdL#bz2jMQQB;JM}tUuY_ucJV{cdilTXjIB<c^*(lu7zu`40ee1ij!^Nx0dR!zJg1J
zFK;VdyDl2bQ+)IR{vpQ5B$B)<Onmhq5QToJggI%cu%)@Np^%sAL`BXNSe9ak74}M4
zQ<DHuC4<`A1u)5qfLbm@8nUmJ^ae61!6X>$(d%SViGXaXXbhc~>rN%+z~w}tVn+%J
zmzLOR`;6Ej5`iUKDX&hVg=XIpMp{}}kOg@HHOipel>W>N%A^S-YCB@=TG-zoZfvNc
zwNjCO3976pqcMI!$gzT!=8m?W!6jzUlVnXaY1C$(AUP`eYUb$?+uH-uJ*ln~I|XJX
z=x6xUo}Y#FoJXnVof+buKS;8W10}W_=%5>=^Hct{R@;odnyc_@=?p=13o2(QlTX36
zx{Kp;CS7_|n05Ko#&Bf+gx3rYMfSt>k^QG}u>!n-#R@2VxgC@Y6jo~^p8-urPNfRF
zz=qz!D)pHOS-y`iYjfPCkGvMJOqI)eAA6w%8M=nd5}_^9yGtX?)5~=MY48MYLBCeS
z;Wr=u<mgdw??e70{x3!83C6vf1C6dDBko%JL!-W0S84l`HyOTjFR+U5Uye`YY0QVu
zJS^}aZ-Vu!5cOkprt3PAr^lwWi<#9x9r|N4Ts05}6XHV9f*52lp>iukrX<wcy|}Ha
zq9jF_l#HCoF4)@SK`u7})n4eP4!RL$KxW18piU(d@r2w!tv?fS8Bs>b)%|@T68=l#
zP)?T7fQX?mp@Ljn66(y)vnR8~g~Xc`1=HM!ER>j$Y9!E@jRdr|&Sv}2(CSqymJd~w
zBPe1*Xtw*BWTg#Nk^{&ToWeNJ-@Ul0u~xvfjttYXqnX!Q934eA^Ng_yV5Tox_@fk)
zZLQJ%xyi`$pR2RagZ9lK`{s7f{AzpldF6Jwf5Dfz(q9zzH+$xsqn)3R|NA=hAG*40
zBn3FOKi?DX0y#W39DJ<3cq@?f7Zs{-`#l3C8ESm^p23_#Ej|R`%Boz=^qz?c;K6Ui
z&gnN**RK;lF!l&4^7Rjlm0AMJ#af5&rPcTY39!H3x2~_WK+B4^bR~ju@OoCNN%Hgo
ziRjoDCFw@d&ZCogtq%Oe&YDseKDs@xJ`Eq(TNZZj<R#)KKpDOq9|i4rBR&9DBLgnr
zXSlQ4eUWSKF4ZZeIg&icm#9)&k9n-%*HH#~vjN|`yR_Ls=WE-}t`|H*?30D5Bbme)
zvz@t&*~fem`bh~~Cx%QMl5bl&IN;Anql>Ch%enYC7Yeu>5Nzn{Y;CNsttboHlM^`y
z*=zf*+_U?#9cxxB6Y_wByMzHf-HR7hSJ9L+(?|AFb2um4>ENwiWfAZh-lmDs^=6YK
zPCz2X^v2qB#A6Wsgl(H9HjJ)cw}x!5W#mVb45M@LqSi3^IXRTmCQd9AIJmtd#qo$I
z;a#?)xxTu}M>(WugD25KIaJl$#f(PHN%%Z7kBN;aqVu|uv+gX45v9TBd<KYxn78B{
zt3x>>O=X*%1&M7kTdd<a*NCKZ?=vk+K5w4b0WCz%Z+4P*3Mhqc)L{w~;DSs8T7Fpj
zX<La+i`RkLJd36E;&u0&HUn@7Psu)t(`v;_hwHHlxRO$DX|{k#a`iM10>}ba$FaPG
zgv#K3_*)5}{N~NWlQ-1c@dxQ_)xE$_kb*zH<|N*40mIMit8Lok{%PkEZ4NhhuP2<N
zdILKDw9^3bJ|GaGhBM!Jr!p;Gy&P8b79R`;FJV6h_li<<YW%=hWlm~+)mW*0s0hCa
za*l0xA32pZ?NcV(<er=F@HdQRC8|aBgGE_3B$UT}_p;8K0!>-!(?#CeXDd1r@-O+$
zD*vx;$trvHO?+~X=LaC~D{%O`*H}OYEOn+BWDjrOSyP#!$B91!8Q@!5o?I)$LuhQr
z=K6|NYw>6M?<=tzI=9hWr2Xv2f@}G;jFs6ETBcVkp;;zDO4@9Ur6mF&gj%&m4QP{y
z($QNf)G1C30Z$~Ph$pF3A%n9GL7{+-6ftTQjilm?2AZfSC|orzI#4f(J2y}toh6z#
zNTks&M5@ja8pINq0qEYSmHG0uUw*6t<8SnU+ae+@uVJ*MOcQAYYgaUdbnsN9{05EG
zSMTzpSK`wQ=IMKQeg1=0-LA;hSJs3bQO@D&vnxp)ab%_@XozALDTm`?<}aattAQ0I
z0;E<UTcQ!k6o^C;bY`@<uBtK=%*#%v#XyddWryq2oKo6s1B+XWbCRrlE)&w><yfUp
zE(7F`CH~u>n}KkbwU)uU3beQiRuB`<X0Vh~m;zf1f(6;>F<$JvI1Z+oi%C4=H1oMc
zWK2wgjbY*m>g&uPOl&@=AeR{=MW<9{QB*5M+$iLdIJ1D`(fPs33J@z6Nx4{ijz$i1
zY^<>_^B@FYKZJS?)NPfYPjEo<(FOMytqje?2T`jZqrMi<><DE8bJb>*dknugRtuKk
z7eQ|9#2ZFC#yU2;fx7Rx?i}a=Io0Xvv|BK9eE3M`MX#fk&$SHgZ|-;@{8EwQ627!+
zz#xw^oVmSzfG1AGo%mHS46OLwhzZo<hvAgOZZw?P%Ic2aX9j<UYrSrR<fAiZzH@7B
z^@06(-_3uiO3|aowtzR;9y%y8EyG_(%K0jZS7$t}{WdDq#cQH9{ZbMue4l?Si7xAz
zmqPcrp@rnF`EiiRMbg}CSY1(4oRul&K~Z)Fs>`rK;Bh&VgaSSZ9vG8ejW`8JW)a1<
z=H*fZb5*4;1J!%et;lFlDo~<a79ISktjMBlBih`Y46n<XY|v}fN*N>dK_rDNq~+j}
z;{3d9S_tO2vO+6Wf?zq8l0R7yGy@j0N!BPmnV83-^VttB957xmhxau@c;I}#3i-^a
z-du$+7Ai&uLF1PUZ$9#4`xiHu6#CLY<S#1da~1t)Fx`miNBfF3k<Z^kB`JrGEw7Ed
zp@YTEy3vwIjSjxqvd>aHvd`28){j_|LwcU+4|kn;53PRrHpi!ccT_5t?7G}P{*E)%
zq}W}3eMh~0`gI)qE-E&Xq*Pl3F7*SuRL~Rl4{fw61k%=8S)5M!;2vudWeuUaKidTl
z^7oRQAjH%#4~4Gt!XO7BgNn24l<~f%qQvJ(p~VP2ak_T0TKU;=LY8EbAkAqs&|*Yk
z0ZAl7{!BZHl6FOzEQl{HQ}S!dN@!-_)GOujQjUroDFQ-dGeaRFIYO|I<#O%TM56%$
zK8HvI2J9sE1NkDM86d=_*eQseMe|~?^H@Z@Gwqp$#Tv>Azi>JyDgm`1x>^`h%@KFO
zPb1$^fvFQMK-yDKs(Gtu>n{pYG{Ge&@KX+ud*7}f+rRx_GrIL<l%I9e9h=G`zg0uW
z>m8SN)%vv46Cl4lU7dLwd(sakQJOIce>|1b;lNj%#a~`p8@TaCeDfP_3?`m=%W>d^
zr(QjC>VZ7HR+py;qL2MxT9j_G;0YR7z54bK!!6I;M{+ibXL*2sGh=7cm<pziS;cGs
zRiU%Xp$j%ww!m&r5N=rAPs>P&!k`%?nT=2jp^-uB!TOcMLra$|N^?6>h_Q<o3gpxs
zHP(>`JwMy;6>*isG%4g#P9mmSO>GVJm8i7^1hUdSB-Ezx1R4M%VuKkZV5EtHd}x6%
zpTzU-02Bu#(C3p#VX{9RGU+mCOn}7Nmz60zQ14N}-Wu|=`+K`-T3KT@ahf``cI_fq
zSBY#%kjrHS8&<CzZfoUpmDDs>(weOq<x~D#e?@VT$BaU0ZZi<j2@Q!-VFog_$_z9@
zmL!v8LxeP0ep+%OX4;X$Nf7ZCBu5i2n8Aq|?3w?4eW8CY<0H#X%=YYm8tokE2}$R)
z^5||MCOvZ@CSwMD!JFMg+F8cGbJJZER~!rBQEWRx#Qq*U*}7RCxD#En?twLTj5!zo
zC|QI<3iSNa;!0)Yor0GdvH)Q~p1%W;A|O4{4$Q~v*F~0%zSI%f`BZqKN0FYPi8M&T
z7;W}e`X8_MPcFZmhoAjIqIVWuoBV8PCgM-PLw#K)5oeFQas+kgD&UDo8vJR5k5<dP
z7q9V;XEivs-w}CGkPA()6}<1#SnyV|Ra12aJXqfj`Sj7dbnoiT_=BC=>~fobx{5EA
zia-r`JIAFJ<4<sZYDMm`mF*AM(GWiLhp{1`0@<{_P<eK>;4c16QH>so8!2PjnMmj)
z)#`B?5sj(K8857>4(3^T-gMNM=7$abOc;u)iY8Oi)oj=nR>sHiI6-YqZVt<37Z-uD
zY;aD?Cps9M;RU{Q3KaCD(OH*3CM6D$Fw$b9f&#lZ;?gOCQ^-Srk=X30pumw01$>yD
zi&`q%TEdlVZZ#^eu7zc#A&pwe=gd~x46HVT+9DFzn^Ba)-9v%70&5`3PMKmi3mhz4
zS4+ogi1%<hE*SjueqF=RpB;#8rG*LMg|yvsOgi+OgZRw01s28+0(PtmilmW0sh}Ok
z@m^|2BH$fv%T`DJ$O^?DH16Q?#;|G30lnA+-jAL5g|VmV(Vpd1Roc^ziMH{fD?Gq>
z`4im*_3V{=N!A{}^^z4RU2C*YT^cTNSX;XX`fMVRZF+QUFI%R-*S!xkufHBS@y9>n
zo3^vpqYRy4dgu1+Rwuh%VN1}TS;yAB{<IbR0$$|GFvwo~VRX)S4aw(@Ms-$FNp!f9
zVz9f~+u%|Tw#A{rco-)`BXuJKec^_>=saICf=s+DA64YLVTXu^xb~cY&zqhWRT(30
zUds91i`zj|RBm?O&y7ex>~hLwG&1OM=RlICb$4|vuA&ou-gK8UC3)uEa#{Q=YBZT!
zRwO_YcVGLWws1oYo&1aAa!RPlK{<e>Gfrp$lgtczmD_zGSac@yiUEA*1mzT3h0@BO
zH&~FIa~|6=n&Td$Lo##LMvy#DK!v@kdb#_Vh9?`6oZ$6=oUrP3ijuV7dn-sTv*NF=
zJBha&!ItBP6eYJ`V#G((kz4Pc7UOkzy-e%O0`3m{tOA5jgm3L?bnB<^8~8ni+HUSI
zx3}0KepCS;9Lx+G@Oa%N0PW8jF#}JTH(rANa^yM_=!Shxr(SmVm6vAqrwC+n5iZ6L
zym)J{@YoCZ(`!5r13Qp|lX&%?K?*n?j7;DslPUrSdK!<rWuU_kTzt32@WMoSu><_N
z-cxoDpAY}?6TZ+tmEQ0A>6rxm>Ji)V?>1I?qBBrHOnjV&KglF8W+sW*8XA#u&|pM*
z5uZ-I(H^cWp3ljn4O|k07!VaaL)3TC7(*nLK~~5@8K2}@8py>-6D=fNLeeCwQX$}*
zdBAAUYRpK7=$MV!q*jr<ORt-u+<toAsP8=B-2#1uc^vHIyaB3D_CR;rrOLdmk>|EY
zPHrtMh7R~x<T>^M@S2D^{X3VhHpPo<k=(tJc6jt2v|B$Ac@_F&C;gknOxxLE!R7q5
zj3vr|SjJQ_1I!53ZDF>7{h_l)xN12AC)%1DWW3cI(dLa?ASKuw?1nW<(9n`)u(!Go
zuFoc^MBh4eQ7K$Eh6>V?P<bM9WK=*3bTB9Ii+l*keROhG4^tttB2Iuf5iO0WStQ_6
zw`~Mlw}6<i%i85&&1x{R1Pm_&=cqUbx;m>-e;;N3t173N5i!Ts#2F?=Vt>UVU?JC>
zk;ci)Ft@L_dvSZNS}Zgdpr)?2)~0M;K@bIk%`ia^o2yY)buk?1ud5aDN*I*9W%JlY
zt5+=>A`yQa-+?AJu3s^j#CN#Ry5&o(p}s_(%Z)ayT{FzOJ&2QS+d4kNavnMXX-3Ue
zl|>}hDJU&5gJL=b<cbnHA`j)BlhKhXVj`m>k%a}IqC8ZL{F$jPl<uKfB}u;ob82|A
z(ZM&=_2yClVqP2y`8*w$h4Waze<2x{eV!^(>^Z+21#AxgypFGJ1|#D5YlQviH=n!j
zDQkw0h9|Y&%_Z@uDEGQ+FRea3I9)Lz^{m6c8PoQF1bFAk;&GXK-B)YcwO>8_mh!{n
z^?mhe*{Uz68nZK1k+oW^ZZ8UGB4-p}O?xm;6*;X09WDNHJ?81bk)A-UI?|!wos6uD
zjN|W^z%tl{#5(8TQlnUAIz4iUMjSL~)B$ObH$H9X=rc)$CJe(<@JFH*l;!`=jh(u9
zkqHmA?1VkmI(z~Y0OcS3pNpJ2_4Pw(<&Hlt&#1Cz4J{9pQIh{Pfl5m9KkTleB>!U>
z&GzV=`0&|L!5#bu8B_Frs3Xzt??TT(7!G@3c?HV$W$4&U4Kig_!-DD>2<R?X%Hvo@
zR7A@x9ORQAw!SnqC5d?Sc)rVNF{9YF^=Hy8TvrWhYv>jxp`uzvH$ogE%`Wi5Kq?IS
zP;%5)Sj+;U&yN}t8WSMdraF?nDiNP0A!}MeTYa?ZDBzTJwb2b&RY_SPyp%N}RGj5E
z3rb96^C?;4LFf=*X$hTco6le6_0CE@%-?CzaZAN~ax&HV)MWmg^LkthI#>&2BFH(H
z%4n{IuYCamJ}K_QU8jD%r27tov*oVq@hJ^()o)k&z|{xX)Z{1Yb85li#z|TBcw`NH
zscM_tHx_YCxa;Ay<omZy4}jj<^u*FzfET}OsjjH3{K5El!Z&qHK)Zinh!{E(JSG|Z
zf!&=TYU^qrh*A!(34b2$v2Y>_PTsncr&09b=Rh#B0^bd~(4`0N2v^^{HO8q(*Zdy-
zr8C_Hy6z*)dXNzMv>vW^yWr~8S(%Pxn-K~r-(GGW9Lx*Ck-kDG2ff{k8mnpbh9;II
zg^{V~E?5l1kXi15oVzo;WPtWKo5Qpn9>ZHRG;YX6Wug2$6vdQORTdW_S`9*EFL=EW
z3X~|jIXf$pm`VDnfZ>#C<gifgManUy)uU9s0j?ZcIpju$YBabAR`;TCBPH=$zkCVp
zF$lQc5fV!F((S2Int6h%@`8NYoKja-<mFOA0RzkS_0rs>thBgDqvl0%<@3_pS&KAp
zo6J17AZeKoB$;Vj5(70O)O<k&B8o4b2{37|>U=)D3%1-`&vP+Iri8;k@Y`3eZ3*EU
zM)Cb)b%kJGyln6%s)t77_KZYyMkKD?t;@gcu~6i5&<x(jH-Ht<SAyn9^Wq=90516h
zXiJx21I~Ej`9&p%^se^9yYcT;K-IV{-j81arL`HxtOM-rG4+S((+7*yN`+sNa{})M
zn{hi^W-!MqMq6EuJbp)?zvUvUoG)!|^?3AEZ@q>2pL_yrZ@rcE3BK`)V9*q*Xly>T
z?mOWd+sC2DKe)_H_90re|F)L;>$g!mL;IjdX6l!A;(b>DP3Xfqn33Y6&_y4ER8hSt
zom>o;k7OHY#ZoBFLd)7)f(2%ipeu}u!y(uY`WtFWS&B<dcRP|3d0YypE~j$?kRjHl
zyNm9;rpA&G@_W)!5b>DvSs}%Yw8ax;g>*H$01}m;G&d}1AQ=)&i9<EjlpAtsl4kkH
zvZdYOrYwIZ31c-<PKQ*w1lZM1DbpyAae5rhrOl=Us(n^Ml|>R35=pWwu|kd%im*Gc
zra4<mai3TB`WmpteB=f1f^@__zZdFI&STx97&=?l1%zlcL$+$>$)#&G=pHy4vpZvB
z-8y*XnW<Ibu_}_IC?=k2&xeO!ZU@^3i_2AK#Okf+v$}7ogIUcmQG+{PEppy^?RYy5
zs*rbyM6MvAU;;NSL{7WkWK?^a;<I?{srLQ^iP(bQs|<tZ(rR9Qd01&RP~IBxk#{WM
zckrOwWsLvT$d{tj1mnJ`ycV}V(%!ehra;p2Drk4%p4;;^GE<JM7%cU#i<8C!i7Yo~
zTSJverLj5cA7v95NOGM~!9o75B-05q_lNeYVR1ozE{_*PsH}`62LL&25)$bmnOF{i
z%WTvt8NQrso%%X|MjDTETNCx+OrM(;US<i<$u1##B|%T(6{#-+irgqjKGUC>Kyw*M
zlmK1M1=2;~`nuvGmxI>lj0j4(DmxR~0}Nn^<paz-gnDd1aR#A2Yf|hB8wInvF;TR+
zJz7AUO+1OM&AeckbXKNg7Hgr=qT`W$D)z|o;(A@=Qm}nUEXvQ-MIQVW$lUa^w8TH-
z1pNLZyH?}hxj-oJ!lHQfji0~T0k=0Cv{aP$*xi=XkCwW9Mw7y}Ns<l8)wmjk{1cvb
z2VTBcC@!dW;l2`C=Axscr|{h;9iSdo5Z9wz8UB);1P-q;>9N79oC-cy7BV&T%WfYj
zF)8$kw#k#i_(Y8;%DeIK+3kXB`S;G`8|6#`^Mla!0VuO2!iI`eIh$ueHFY(?Le^kH
zfC|Pd6@2Pk%8Kne36&{eKt?*rB5ibrl&liXN<fl@a_O2)AcmfyH1+&Av5?OKMnGIh
zLtRB#F{P;TXJ(|Q+LLWE1y@z#kg{aY%1O+SWHlKnltByGM2p#=Qu1`#Swf<j`;(Fa
z%zzf6H|M#S!2eC0GIK))3&2*^b0iLPP(u(bWi!mrwd6GayyYUXe;n@~x735FsP)~A
zHb8rLQkuv1=Km<C<fXS)txjr1k;g82$o*0M>m7-kK}CI5y!}C*LweKCov8`&+b&<T
z(kK+$&y3yt25+&{8F>}!VFGvxmw=PQ>nKuT`gZ*8v23HsoU8Bo2(5_fV;+P##!O@U
z%~<pH_uE?TJ07hew4L21*v<bwlSx*IDgyFDzgP=9U@i+89x4)7Rus8Yb!xd-#M7Vz
zjR9H=CTKM!!QrL-D5)1M?`?$OqLp3ki<<b2^meNb_&m|3Q!`|i4fXY+6+PXJ6hX%z
zDiRnk<?{qCCoxEl6r%w}$G&Mhhz19I*w}@X%|4GZUdjl%)D-L@XVrGJV)^j0S*!sa
z_m*)>gpC)i?Coh^R9{W&5cz>DzmtS9DsFXcA(Ghp`?|Z#s4=?Yl(uqcX;UMjn3Z!{
z6m!CFlnCNnKY~UFv!zR_x-+wSwz($5g*bEn4E&fkLo_(=J+r&uf)2*K9A&O9&b|R&
z>#GlFBcI<|o+VNawP!6FXanCHE-%nTreNQSrXu}URxK)xT&sYSw(COowj@n|1bTYn
zbKH8|{aAHoymoEYju))ceUG*)(7{(xasC~5T-<WzdpdUI%WZECHfL&1-vL%srW&$-
z#Cv9YO_{xYb!~9@NK=y}!C)KSS<vWyV^3|3%m0S|_3s1LnXHR%a&DCtl-QSTtgjqj
z{gZ3VKm_`oDGBizXHMXXgQ!ra*X1Zmz%u`PR`TrV&Z=^k;pQXtp<PF!c&H_3R|>A+
z?_<)Ki<phf7G?)?3Gjr@8sPdk*xiX1k#H~($rumJvcOFfsI8T_TwYEd3g#6-P+wD4
z8ZzkxH1}A$YQ@qe1HD34#Eo==3a3M-;&D~PDXi}4Mi-5Cb&_;C-GjDm-Mk6y*uG@~
zU9xk-7`k|J<2Y(*&dovLCK8V}HWU|879s>`j!mq#l#yD62rl!Du3x*Xth6ZT)9WB$
zq$mq*n%FqDX2nv9Uh$?o9r0NnbjjrQZHrr5DunfIDA8h4$>PKUj^hiL40LxjHP#5Y
zwk?~-H;|M&RGgRVF~`-j$P9##(hlsrc*oY>p3V-64~$#%a2usxUckER^|}`*NX-in
z&Kqi30P9pJ16EoE=Tirgtz3{1&%hh9?dLf7qq{YhEBm951?MSFMc<+%?+uWbImlOm
zKVai^;%PN7ywvhV!-UL(1}iTsO229U;1**x!e2t!HQVv8Z6Ie^kc+hcu6nIHY28=v
zb=7z^c<J>(8;9+<U8Z-YpFCy3qe^i5XKRC{@8N1Cc-j5p{R;3W(6P#@^jvZeFn5&X
zt8wyI<e2!39&Ae#shMEF!-GQ_370gz__pyZquQ9K+YUsqWTPe?Yw*t_PrAsaT>VQ>
z16x{kT)Y8$ik@2)%y*p7<OX(@HXM_i**E>qwZIJ;$M^h4S+y{bzNy2e5UaEgugkBn
z;o768ZYRg7qr?{Cv)>YA@p~8p<7T`}Hghy|wNC&w8OWcJ1yjv1%ZO}g9+*JcoGH~i
z$!kcUAdKUbDcKn`12!3fH;u|&#6;(!EfXmes9|E3-<K!>e6<Z_n4!&%Oh&nkwL4ID
zfI%)TVg=rGIxJ<QdJ$&iB6bT1NKOOvEKA%VNv`ID?Pf#DIbp+v;5tFp0=T8->!{3U
zXl%gc?9Uf%S9=?MZ7s$3JbHEg>FJ3I@FVc!#tkaRIOfKE<={`5L$w9^X@iD$dT@zZ
zCbgeFIAT-rgL;)ZPgcfj{OTG0qo&AE_kcQHYKpuyc^Ljo)s2^fgJ9)kc~w+?mJu_9
z#1<UmAByG#8B8tH%ycmQ%yMRm*$<Y7&Q6Xls)8-;Xz7v~6!f8GS#V$&)emRF?93e4
zSl0x*yy+UYNrjROFtHQ$boRo%ySHpiF`J}N)XN~}6_+^?BSTYLR|r^=Ta2%PaxrSH
zEGuTYmi@bEioxeb#mfi4$S~;d1SCJ~XaS4cL314lH-TubT3cA)Lo|Ruxj8h-h*^ob
zj6%UkOG>tk!##U^`7kw^-G9a2-IwheUbb`zbwo{#6yxSiPfbZqvZ`29z5oq$wbn<q
zEjwH4V%nB{9gD*(Nj#?3tf;N2s;tP#&hjUkO$JRUPp#lK>9#B%>2GE^j!KGei49En
z7OGut-2%$XGJPnjcX>W}cQoCYNo->~!|VR9buSmjnwnU&ITLGw*#g=;n$}n&4t!HZ
zE%snmz$IyxC~uCB3?$2A-cLqx8D)TriDkYvR_X&jFa<wroKlxmmb#tBh?sRGxf%_f
z$R`31o$M*g*Gyln1fzIB1&+PiF+JdMX6jDA+f$XPi99a@TZgJLw2{wbVC7)FOBeZ(
z47@%h=F*B(5hM9gQqG5p(=U5E#rH(LLS4I7X^@@y0JJ|<y>sYg@Ojsuh3aa)F*OBW
zHg`sKHE-(MoFqfir6u~dL2;U5ydqF+G7P@LTETyOzBO2H_kZpOdgL{k@161_g&g?a
ziLz3=AHvP$WwiD-QBg!|Z(D_&t;yk^&Uq@shdOl%m8K6)ic^VMlctHpIh_yVwj03h
z4~U$4V>SNc&0ESS-f8;mDnXdPmt@X+L+dl35M-u%94XNv42+{aW~(_t&2l>6cBzy!
z9Zt09b;wVdS|RaiDVfm7rz+!#MloNQX+{#rAhVw2+woFXuRyjGf2J9v&|<EhwtiKJ
zCH9I~7qaKke0Ah`Icp53F*jdjkEz5*D<azSYWnlx-mFKg{oOT}hEg0C;XhuAhm*it
zNs*^Emt^Xo@8vew*l?LV=PlHb_te9;hS}G5ja;$s(r|VC%OBv5motD3R-8V>`?<~_
z0lQI#HVOZFc(p|$ww}5Ac3IFMGvq59*%o@et~`5{U?0Dd(K30VBtENAE9LQVjDUkY
zmU??~O=3?`vLJGW=8?2fS~ha~JWc+(1>yt>Fe^^L3RMWRD)8&xou)>^Ek6g(SGyv=
zfAO<OzZE{lPObi~fAexvyv&7H<6q!S_z&JHupahAYVivma0Me|+Rv^R+|55chvh0{
zDwsxQG4r#~!?iF+0A&G`7s!X@rBF^wUpg4{q)~JiSk&BD=}0mgsp*nXJeS`aQ{7(N
zWT(Xt$YcjVNvI(IoL)c-%{4d4DQ2YhC@p8}qE_-@Bu^qHsJyf!MAF<mim&u~(o!9i
z^Vg{1s(mby2o^VSQF}wneo>o4E+RWCIUty)mob+#{a0!Ma;qNB;<V;B@EjL(`C=f+
zc&IoJzD0+z2Emfr&0Js|-aeL>PqL=%^kgr+4WtJh`1GxB;yo5H{M0QCuwlFRCq*aP
zOfCoqTs^ASoqyVt1o1in<ab7{1_|XZUHZk5)6aL`-9CDf4+oc;MIy(UgFVZ6vV>lI
z3fQJ0D8o;H3E;!8;j&jANiTckXZW{=J@*q!g~0x}x1Y9vV=!BtW>Eg{vZ>@XDOmeU
zAP2W;WpPs6jyonUt}foZ1n)fdNzh|><f<44A)Up3h(F0VNF=<7c_(ySDvpO?C5*2^
zZB-svB4?mqN2jQKsG+8^R3hMW;^LzGyxdf~jjm1ti{iP0s0!pF4{Z$<7DOj?<LRQO
zlZb)rQbwA@@L^qGQCqmFE?{Gkh@Xr64f!xLzZ#a8S9@Tg4|+;aTB_4wr=O`)Du_ji
z6U#X@Q(RP%mum+3w8&LmRhjNFqY^o7^dLS<2e)ggX{|jv=#{#VmSI6lK03q=VvQW_
zxq?S5ZjJFX@naBKzd}pmRr(KeF{|7LV?Cf~w0jOXM1ht4_{Z)KP3=~gysF)&nSLKy
z8ZMUSbsV@Ept9umuYCYNYXWhP-Bus0zj<r<>G$~X-SC9mH}-}3InSLZ8sB`jsklv)
zpmS@`!?lq%e6Iy8fxF;caW2{3_F@;V8(1B!q~HDF@hkl0ho1iQQqO*na0YC`ufF#)
zP!tYdzC$tCXNebEBc<?NoP>X6BKP<c@H%3(lW+&DWYdXpvQJ4Z=291pb@HN^qC+$F
zj}#`Asb`juSZ9pc0lGtH7egTnVS&@3=Ol4}5y4CpR6s)p3S}5!tx*k^x@k|AuO39p
z28Ur~UnLywK?6Mva0}SBW#ib2&PC}SQ3EjvxmkP?6o4HY=s;V2ose4xndO5t#Odv!
z>Y)v>aHhD(mw|{aOm$K47%z%6Gw|%mw9U&S=7P$IF6-s^JibDORxBNquqrVc6WigY
zO)X($18CdEMQscZXwdQzsL`SF>>V3=y346DQZ}&~x?HqmppUWyuZdS=`ZCfzJkH(K
zX$B2-wKN$r^W2FRwaSbXbZEdFN<(6^2?7%B&NPnsY-0nc&+@xTSOb!*abiTwk`3u~
zu^FY=f#TVCW<J5xxezB>v6<`ht1svn`sH-47?7_HlGOmZ*_0Q^0cy{Y3V`#mZ1YvJ
z&b<(vljTKs-HNAV=r2nPn^d^tvC54K_vrL*M+1e&;LwZsjVH-5{aDYvo|lL57fN7#
zy>GC+CPj@u-q=u3?o=lAj-fA}Ls@AnCzs|$PHI@$(uztozOy5@Ml)Tffe)M-Ypiry
zo8Fne^_j_=^Azzre#L|D`X{{Y_IJZAROK6ARZt66>Q4L?aLqsc??yWDf8dWzU<zPA
zI3bRb0&lJl+TN*H(VSmiJ-Ok`Z=oOeTv?!3D6-=HV2OXCpxy@Tea<Rd7T(h`TwPFK
zeElAL<Bey+E**S$JT@cRb9O**6aOGn$2<}`oN6&augL&?20hHyYhkWd4V`wX1zuZC
zB?*)YS-eC@M?@JpS1MLJsKk4k+iXJV9-{%#vMUN?>9l0aYSa{L!q|0Ct%ET3_Iygp
zM7ag1A{w8k=0Y}mjLuJ~kO;+GJOx3L-Nn;U2x>fJt%;PNhDVGfTp(~WPo_48Jx!i3
zQ%CI+n8zUS&0|Ol1evKW6l>me4{)56;+@zp(WDk6|EBb9{9`?o0C~i&MLCft)UYE`
zsfDk<)&V{pZp+a{a=_NXrd&<rL0B@{70^YPfddCFKAfkP?RemqprXVTxdVA8H)D6O
zFlX<o#z%R{ap1NcoxVpwHi<re;r|k)87%uIYs>7vn5-#ve7?7>#P!+T*S*-EtcROM
z-`-GA4z#o$OY!8#`A13Q5z{Z)1(HK&bt*mFkp%VQ$S8v2V`wU|1v(^gsHGY8G&jP5
zj`l_5wnVGCU;_`W9n5e!g#rOD9c`V^D5N}2HM)MyYO*q=B~)7`5M9;b+U?smj-w4@
zG?FC22uYw?TR>YgXlexE2H;L5tM5$*b+r^s7RX3avkn)M)zJkG=8%=OCaM%N9wT@0
zkugDv_(F8?=Api+i+60_JT^q9L%KRjODIRZQn&~eP<;>{mznGs-!QtK<u<Nf)xOA#
z)@<8q1{*0VGSy|~IoevoO%$UdWZAWAsCtgmabEQ$Hgmopot{VV72`=hKUT3uLt*U#
zse$u}?f8NPBO<gdXeTF69qZ7{)ca?w$X}scUUSPw7O>)bSB}-Kv%frayj^XA&4V@h
zs_EyG{T!Q82+r1QmU+kU=UI7T&{6O$b#V2K$3aV068^#Wg@V7}MJll4&rMlNm+V-J
zC#~Ss$h*)Qc{g%YRA98^74EAqsXrXFS_`LyW1H?s1Z}TlnH;EJ>l<s@s`0G@d#_vP
z`UNNm!rm3jtN?&DW|v-(9o$@2VXvrUA!qCuFo-xSR_1lrNUMj9Qc=Rb(b0gfw(Uxm
zy}Ql3?6HRLZfaV3gB=u|IPv8J4?JSvo8_wBJIYcFXmRmGM_KXa&BEzDsCw592dD-=
z$^w%pJs}ByJhaXhFVemitx-3U7`ltUGs;O>K=$w}q3;wyHLOVS!Tf9w@@0};WlOT~
z0EyWVs0<Yr1W3Fp)DsU`;!H+d3aGC(8KpF4CW%g#kKz?FtceVj!X?|3*qYqxTo}qn
z^@T7$fKmmiVgU+xkW<fNS&tV{Q<b1pNU0{E*NVz2Oh#LD)**_drnq-+rf){uwz7ia
zXS4hn-Z^F4*nq>i(S~`G4N=}3mEh}VwyiY(kk3@?&h53>G+T6&2<FW*M7cEJm;zX9
zH_CjX;^6H?>Dvx=jp))4eyJCa*}%P1<DL%iliICv{}@()kHKZnh3${FH=byGtu$~Y
z`cie><z0i?II$Jm_e>QTRq7l~-?u@3<lVE33#@>@&~1jNWbU3GgH&vbyf6&Dz(Mfb
znF4l?C{1HHbLw+hG2bLg*BVc&zK=>sW*O}TQ61VnB>zby(QiYP<LrB(139Tq*jBcr
zzq_-ey^RDe6=fx%!hDMXDxC}p_%qU2j)cB?N<<l@3Kejil`^@as>-}vmy<^&_^gz5
zAl+0*;tjhgUL>q=qmK4Qs%4ky;Nk=jNVyg^kN%AMx~h^;s>^A!S`4wzWVBqbyRyOz
z@&KEkN8t-_-Y~RxmMG5aU7%eP6BA*{U2TsAvS3!!Dk^!lz*}6{o0UbYtqUTD8Fp!u
z2c{dh8wz$l2`a$J3JcD{&k`pB4d5Nnb>;T^@b7KlB7p7~2o_1KTOWL2Yvkj|K`nB>
zxCpveicRh!ZRFL5+=-j7$gRX59^Ck$1>6F+e6YEr)MM`c<P7`ihVS+5#nZ4Yyv(c+
z>2^;Y$;m3~{NcM@zSVCJ?zwKv^9Wd$ZZ+^LgA&vD$}Lx+nk<Y`jfO*$e1omZiS36o
zHA<OZTmo*#FFbesO7|CFbYilvqPFt6A7IN{z@MLLM)>S^X-pttT1c+*0RP^o5(UL5
z7cwEHoLS54jOwHv0)3&gx$uSq2jRt&>l$j5P;ihz6O0;e-P+bFVAUF=(1_uxWrID<
zO;r^c2Acco(Pb+-z|~joz5KFER*ZC%myr~<xF}diqR&8<pCU<|)<g@v+pilRMce^!
z?a)#hCs5&3DaVn!{?Gw%<3W0>lZ~TO)4D84p9GBbx<mmqkQ6x|9k3;!d=Ua7JJh>9
zknzUBU1RNahi<%l*Cpd)J?(9+%?))mQckWIM4LB{!oeYQ@CL}4*u-neFLv?d#JW`@
z<QL|+eM3tJ&0vVe#%7dQUP8;c_COYe&$%+ZX5i6<JlZILK%<T`Lxq4{Hbfm|sJJjY
z#m*}$O?4s4|4-SHsJ!d^eL3T+&d1x&MaJjl-wNQ!Rz|tcqSSYDSp2MoSbQ28N4Kag
zhkTE0a{nv^D@n;OBww|~$XBEBQnvDZN0y@j7t*cH;OsCwP%|O*jYYx;|I)qBZK_Cv
z4@7<sLlqNJ@AX4#Cf95kO={W#I<u1ed-m*EGdX#tTF5<g?R8DJKl98*);!ZY#cATW
zI8}CrnJ*lFS*TDaS$$1~iM63SYHBvLl%}fP`*ed~^odF@Uo?OX-SPJqWo_aYEibQ7
zoM~6`Odb8iKUwkpEs+YmEAceQe+T4%)rpJ#^d~F`cUUAsYh=fMRHv>0593;LYSH6d
zKYj&dMF#kJfbR!c^c!+MF4mHrR9)#xz^C7k$JdscZ#dW(EHm>Y#PCdap{r6r(cQGO
z{_frH2V8poH8(evR~KKt!Il<Ddg-Q?u50d(JP-jncDpJbfBGt4yfb@|%OBHj>Nz_m
zILsesEKC*gbc>khL$|Xq-RXtR&3@?hA-gXT<|e>I9Rk%<Vwyz8#Pz9_9G{U<<^U4<
z3L&$oAvJ~NoN}SdNr7^iJ`!|QCDM$F?0pjdkiB1;XopS4rZQWSk!NR60=Z4ph{R%5
z74$Qs2z_ERMMA!c3nVUT(Cf6ycmb#OWh9!R-NKlG8q(<@l0L$P*s6u#yBMbGd~MM4
zu}}&y2mjPwST;zWnYKlM;#$t3?;HbfyaQHz1mtcl9>X1{-X7?9p4Gd;hn~cbDL{F6
zyV4JiAp9%W%SA2l(jmU7C|xssDco5(sSix;e+fwZcKpc?-o-z)0OmixyB72wZjO90
zKCJ<(Ykj8B{h;871qFtJ`l_lQu6?xe#)iwG#XqpbERk42TjW>xX)7p&07Mc}r}+Au
zJSV=pZM8wl8S$_0d0?fxa@P-jeo^|S&tC;T96s^;X{6ru-S+B(J7{0D^z4Y>Zjv{7
zXShGh$U6Tn^s<d)P)<E1POmQaAWGL(=0_xRZwu2bicU~?)5$7O76&?)j}#n}Xo)eW
zN1N%C)t|E0W|M?J(}zkzfeaLtUJ)`<XCm}4$idiQ00Cqdp%R0dev&|>nVH$Jm?d#S
zU2JY6*=7~+cwDMyc5EXj+n3>G%sfw7Q83?R6q)&UIub>)cb+afwUO=td1TKJ3r6<X
z1(IF!ibT{z&A3v>g}PkUa|!%8Ll&S27#cr2V#=Y`?7#&x8<2lJJ|r#zdT<wse5+5r
zh|3ee?x#9Ny=z<TVtn_was#NvQZ4#?q$Q}1+(%N99diFTJ_5lIKC&6#33|xc1*h@4
z_VIzMJRs*=kF|v1=r68&Jm{@o^$5mg{&pbkIAYmdzUs+AB<BZC`==^v9H)EwtP&Cr
zjUN5%_96wa|Bf8~&t&<aeMY-0;qe!&U>Z&&QSGj;X0*Hd1g}J6q7J5)*~m-+edsS^
z?lPEJwi1r7?1RNiN{WMQUq4z}2>XZ7<V01jh{qqQKwO25c*^=ZWP?Z!8K_}Yuu}(B
zdbEDE$H8*$#Zhjf6siIn$LTK`U9}QzT(P_ljSLU;BjRaDs8e1>A-g@@$u<<#`yyV3
zL9{@F=zKIHso7e=#__R>)($OQG7zPBm2<HTr%6#FI-%blD>qeDmX!nxbBP0X+pIdS
zCd-Q?$&(W+R}3$+m?02zn@PBB2FauA`}?Bwy#fZZ73KD1w0hO@5t5!Wf(7JX=QhdQ
zTv@CGJ`aYYozL@NqZWjhf^0EDnb{awLt9I8wHrG8G0&XDlxpd)DcN%hAfN4Toi{yl
z&WnA9uhc+cdE$2}i>s%41m;wm4sZWnds(I)-#U(uYQY-xr|UY)CN$;(GkBwNv(}DE
zb5`*~S!2h7Es}W5f-h@GDpj@PivP%UK61s*=j;#OGZMg;c1-{D&7Ml1etNZn1Xd3#
zK+iMvw|3-a>LQ&_RHupJ+u&CJEkDTdXwatKt%9WVbQgY~_Lgudc+x+35(K6P`M=<#
zR#{K4R-!Z&J1{QK&7+`BS!Llzk&D`v>m_nCKJ#zaZ+4cC-~GgH`yC+b*^luVRE4K$
z{+0z;KQQr0!2a-9QHcW|9lxkHxS^i`%;B@E1grSBkZkMX(6U4*X5yeXU54UF0%SI+
zQ8IBeLLNXI15#ajEp0$$3HS^NTgZNjm(pP|5}KP$5;~EVOa<-ZDUpMiQy^Ye%&*v`
zB97tn%*2bb<c!S%#lUm(@}qNP4KbTAKT&d|EWlgESmc#~=%^2R;;laDUSHL!n!ZR6
zyIXcD1M$16cA?IK7f)Tj!x%!5z5Z*zjqkI7yLOezAdCzvcnWYO-)pww53UUkI(~D<
z&@wX>W2@Uyg^J9Yq&&;eTi_vl{1;yx_I(8oz6x?2R=?j*{58#QsD^n?bhdXXb8l#W
zfMhp?p~76qI%A?2OKWRNNKzx<DpGrU!byq71f7heHDaNZ>u)n_SP3th+~j1toWzoo
zyV0H;(-P@w6!J;ViYOOG^gR^)#Bu2=W-0j~Dj=OpQBBF@BjdzMuDzwPET1QFP*R^L
zIx)wW5o5!cK|E1H##xT#d2$#0Ii0*YVthxeB$ksCE0Qi8{<Y3wmXvd?8X!2IHhBi3
z!n1?Pb(J-S$Q2?ub+i!F09(f~8&F?SUh7KIyYXP;v|8tMzMFM*Bj&4NC0-{7x4+&6
zJbk$h8q7bl5?CrT;~kgY13cBKdgs;P8T^GvBQf;VizP>MEZs?a???LULcM7+5&kj$
z6I3VdeZ>CsD}$x&UHNSdMfE=tLEr?rS>&z(yZIi24S%>dFzC>??hpI74S;uR_k~NB
zx8tX$CymW17GHPg?n>0yUiy?VAgl&jm_~MI*V#3KhxuC>C$lj$n5b4lDPoWkpky8d
zd}KCg5vNX(%V-6hPcdgG$*NK!P7=kKQVbv?rKo^Jvx$~JiCt#YlrE11i=4<9B|$gy
zL{yYO%85n1nVTVXz81^^izkl?(4V&?4DDC~Ht^W0>JlAZxgGCQfGPY&<TD!-12$5v
zM20szpm%(kQx}l}Gb}82MgEMZ+0p6u_mnodaXmQZhbJO;;>TU!QaJ7h_lnYuN%*Bh
z%k$mjh2PIE0qbB=tnNERa=h#K+Zh+LGql_wmB2)a7$%8@<U*(L5yKM_1EE#P5GMuX
z3Q@iRN+pU+Moxk(<~T7*wuyxFsyI`UZAnx%R;!8Q6b$|Ig?y?`NvFu@Re^w&#Zxae
z@2bo%pwLSbWz3IVj|JCc9u*K1t<U<l<F_KGt&jnh$ki%%EW+0!IUO}yt<?DQwbLJh
z6RShb36Zs+9EuB_*aCk#eGpl2_)8D)fj6?ic0agOl#!5xKfPL^^wv1=)RlpOG~9J6
zqX7t+IA+z^m4fT}#~J(Fgf5NlYMEB1j~QVip|@2sHPlmFu^J%*0x%IU<eJ)`f^sU#
zM*4dfwYApO7Kyl}olT{z#3q-4=%j3#MlGOovhGx!mPI0pG;ujiMhHX{q2{2(zl<nK
z=_aiXjr2oJI%;T0_rg$XT?l3RQMshHyhtkHIb>*&7|IwFyXv&DtB^~$C7Rwgdotxk
z5pvy3VSz8*j5N79flM><=4DfAIR|C@l9^eCWhr4I3g%~c5j8WktwfDn>YRen3<PD?
z)XdXiCW{kwyx+{+M2sql_sD6bStvOXc?{?|->}%{ls&X_9CYV;#>epsS`Z$-%8svi
zpgmw=TbC3Usqq(^`-*~U{9NBaxnK2_PXWGniX7<1Pd>p%KA;EaA`kg@E)GHz0`~$o
zoGVse92xiNwv-e%7T?KU4K8oYGWy>Dr@#|_;N8B`{ugk0W{N>F;@@7_WXFA1m-IMr
z+1{$K!%tsvJMN<=mVqa58F(V{?9+!PN@a>T&0SX;pTBRQ?Y?6Q#q>3ejn1S2z&-VB
zd)r-)L@|@Ekv-JLADlxAgqTX^-$M_2V3IKiZHyiY^hK~dAF4_a@Vb*JIzT|t0R?7?
z4lsi30L}a$V={tJkPc&&m4eC=Ko)@b*%&~8+*+{;2nqGfHZOFirkIR8ZxB`bU@#xC
zY`y>nqQHS{vbLf)l$2<rC6^4ZnP)4=H-q2|Mu2K{M8!JE)+;BO0m(15Dq_KAaY=Oe
z^L(nxZ^8*sUCHxM)eGxqF;*sJc3=)vK$3!P&{4lZ;U2?N6MCJ<U<X@bx;$tY{71_c
znfJ}wygQE`ERIa8+lRlf<9ZLdCexT@c`prg8YJ=7Gh6q(#aqFNS*a@W3^qY6RnCAp
zL;d<Vnd9{Cqq#<vGEY_tPX7AN6IZyN0NT4gMzzLXJPCGA-wSTV@B3O97F>IFAOA4F
zX%6GDJhYgSb4w{saE6=vn=l%}8SO|0lIzS0W}y}{yg73ajM!)ioCW8c8>jt7v;}mb
zTU&O@1C!Hv+t<j@3)6Y@<o#}VSt7^TPqTO5&A-)GjaPx|PCrN@n>z4Ya0Cy=bTfO%
z9<=crqAZ3^CXLBt?hfsdLqUoi`pnR3LqHiX6|xkvZ=ru<bO2aP%j<xKgpL$y8tf>;
zn`A}lo@ghRWEXt;rz&B*l=vg1ns|s*=+VPeGx@WP1~Z9btkG#MZ+e<5I?YARof(mT
zCV#xsVN24ec@}dFpfpoazc5;yPdKrFa+2be<mY&U(2Ne0Tm?R3I~S7x@l6!WJaomy
zU6GUHINps<xd3cnABvoW4*HA|e1zrT6RhNYFudF(mDo-ny$==Yl)4<UIUbKZM#2`y
zA6&$(#-Vk_$nWuT@G{tqH`5abz(M?U9-YNoN3QFB{+07^0qrFJ`%~x*iU-g~8DSI#
zBP`0#ru~0`IunI5Ga#R(oM<iK@^p_|%++TE3;mfS4J$42W$?~5^_>oiCAhG+Pc~SP
z;~|9#b(czzN{qt9x!F-}=c2;=+-$zxhI(uOF7{`5+zcORP`XA3OF~7&5A(U&ctvYV
zrjJE@PB*`UkHoY;Z$`6&-z+=Zx2Ju5G+O~U2TPohDxF8B^|guq!XZmK<4azKV!*@;
zC>~-hICfUYDOQ!A>9xHIw2@<aKC>>|q>5|@p4v&RckIk%W4Q&ujhgUtcnL_y|4z?o
zuVc;4yCN?t;Ha=6|IR*=JlIz^RA_P6(%XdE1P)5`^exBnv-o7BMGyOc^6^(beSiM|
zX8YLpKlSepwK_iS8Ze1vCfw3D2HO-JQI5WOr~lJ42|l;`j_+qlR<H6|6Zm<#lfl}w
z=Wj)PKD%Qi<mw;#NaVLam(yeMU;D^Z6fd-n#8=h)Em2*}a;n0S1x+LoNCxGF*(6hN
zCMP1uNGRcZK~6@RL8p%AB;q(uDFmTZ7Y(-(^d!Erm`Ugf8EJYb9cE{s@=TcFMoIFd
zC~KZPUg*}LyaG-lq^}ZiOis2L6i`l>440GQ3C$#VqjR=ou~Nk%W{$^cK_6>|CYIiM
zQR$7G87H4S*BbvCqP?$aUd@1(VdfoQIY8>=EZ(XE_q=*Q1AhFgt5OZg4I2|58*a!_
z;W4ni+-C`WXEWUOTsZCUmAxk#E;82Dm)-zB!4FM4z;f`E%nv#|3g6NLtxlEDkSNA`
zuWYGuynOt&aP2iWOs@n_upOc_qj6gOsiKVcB?;#Yrweu^2?WLDIuifec=lnz<NS-}
zMR1(}gnrX3fDLu1J+%gQ)a1jWV1X@3N~abjs8R+ca#UJg8d9@zCDJN&u!&^I9Mjkk
zoAh7QR$GHQtE-|wJ*s|#NGO*cV{*;O_M{<eBDr%cW)d8mj0!o5lGsrtBdWwhY`=iE
zCE_4su)@xc_C-|9p(sd8HBwtX(rMLl8F9e^I=NpS;&YX4t+ew{N%>Wxn%Xpuqrsk8
z5JzLVBr9>^v}9LRNm~qbu%Bvf3uc>@Gb$_Y7+1IVYlIo(^EvNkqwWiw_^gHH$<J~0
zP!?(bEX)5)%!l5DH-)#!{TuL`AbqepsEV8g>sHj3XimSchHG%13cQ1VHO3S2Q7L?z
zyvB{++=PDxjIk3dzP($6k9{dha2MRP?LTFoeWnIK84Q)E@jHzj*~KcpVqm#RBDPMy
z8pcPrm(<(vE#InWa8ZN{XrDr7X^q~5bMf8aN>GoF(Ua`4uJ^GikmJ9nqvZjs9rFF)
zxBkieRy)@1%<i-^092m6ivJp)D%UoK^7UGCESKZ4jF^+Eb=p`>T&iSc&`dlZ!{ZE)
zrPQke9w+0mltO`}=(>4DkEm^=b@Fqq+?exP$aKc;Pw0CuH~*FIf48zK{U<M<*{)#^
zw;s~e|B<!EOU;Jqoll}XLqbxHwh%p!M0-#8`?fk2NOp|)<%zSa1XBJG@#fv3s(7l{
z!s9raMCep}&caY(4oF#{X+?&SCUa2CLsa2K6)zQVa-rDeq-u?Pju$6310G<h;>&q|
zK<Z4jZtkW&SFI78tJWYZj45koqw2^$9o!4w?SgQ)Ww*wQcGUa;b?3kP!QoL`KZ;yx
zJoGFsv4Ef5T*p@W-4$Rf$}lA1Ki8O6u1b{1EYtt-%S%wmtacUH+unx%j?3{!_^#vL
zX>j6=SR6xfcvthUC!RK)#L-nu2lG<s?pi44;$UT|0mbQ&SMP!lbhOl0SC!=DX8Y6A
z9Ent<hf%tSb!~1aE{G?W3ADEbvh2x}+mu`<db?24u2dJjQswP!<*2?AbyUO35)|~A
zii5uNG!g{alM{)d)kl>`Y5i2lXAC8NRN#gF0BUN^%MCQtn?W<>*r+5a76>3Jq*zr+
z)icq2Uc~cY1G9}j{!B|Q1{#@hiTrcJinCXl@{W=Xd9GkS!=3d_5CZg`+?*=Yuk76K
z0;yT}Gdb)Z2$pN{XtEXp06uJ-(7Ic$yA7X62KkRHPQlm_{9WY8nvSuSt)8>1pKQrN
zH=Jl$cKcA}3ym+8rtXJ&X-;F^{dZWwU2s{{VV+$CSsof(LgG+8?!XxT=2b@oJoMfd
z2c}wv0hZYkjAy=uzIyO`R`5OejMJ%C;J-|3*)A&XJuM?vo3D*BBkJ#`C<Dz54^lUO
zn5;9M+Nol$3XLnt8V7vQH4YV0QKPD|l7gJ<j5N9~bS-3D9(0k_jLM?Tt){=s4+{dQ
zDhCEKP*G@R9mz71uzYSAHC(zWqp-jXLcR>LZjdbr(M3Bq1niEDV8q}=U$<1Vi#2zH
z#FmQ6P7ycByKrTq)oge?-sse%ZeDiG1)7%ONd*e5NzkXJYcT{|VkRi4pH%tB?s*L#
zuz}v+Y^cHa_;LXs3QvTq9@!Cot>aD9lye09SyD9K_wBnJU<~&8uhbb*^Id|1YxWNe
zTcmL&y#6ov^=CZ41h<?7`d$6own_iM<_bJo<Fxl9c{%SrN>6#Z=D`Z1N<re;6=&B8
z?%*GeD#gb7{6owdU=KxVU_6OvSFE5)4h+%<vSELAJ{;=KgXtb}HF-u#q-TSmtD~i^
zBE>GS(Z*#PY=F#~WgIb09NXT|*9&^Ose+g!j>jUoY_?NTT$CF?p&&6NQHrYavcf!)
zZkUWH)nzdwIt5C6uhgQFAiV(z8<j$25R*?&gCk2umbjcGm`$%h{VlMf3pLc)k`iU{
zoRHJ#*DUMn?dfO}a9u+cX3$j>%+I6xkoxixsyXRM;qxFc$BD~Ivjd(qGcTQGySr#I
zN84bu1xNX2<GktT6HQ#u4?RaS@pbUR`OG6x3hNjSQ624XXtdh@F2@AA2EfR)1}41P
z4%QCU5-)oksA_h^`^WIx;IdV{>8i-ViO9P;n1_Emrr_E2DlyQ3o5??>;I}96Z-Fi{
z+WN|qVB$kCkS@a}T=4o6%_A3?Tx~a8g+EdOMR<qWi~kK2RcETbN7!S>{in(8YTUQI
zyvBCCtIt9;8D4AoaH_q)j<Ns4F8G=V%HqT&FT8-gCr<+L3orOi;;!9Ad8Uf;w)z_n
z?P$5VbrW>^hgRz2<4kDHRd=+MAGnOx9vOy(`>1*Ek1zZ)6ECC>nHQy3oTOiW{+nMt
z5&3oGgpd)mMXM>0i5=v90`XZf!w9>`zyGH&_DS;(k|;5+GXFaMb^Po2reht`_IJPM
zwSQf<|AWUgIZ5yfh$RD*OZ;>4-K$`neD^6i>&ZzU_t006*W5{7QBKZxm>0<F-e69V
z=flk7<eA5q$H2qn>$|`n{oGT)4*1bW&&>O22j`6E7<vA^nV)&j%ySdqH5dS;(VxOF
z--|vMWIhFV0x8(a{2}^%J9CVDc`y2yC1)OxL?3Sj!{p1|zzaOg>&(m1SH(Uxk0F*G
z#6I&q<}G*x?p$yMCdq%XSN4&!cJ6)jbALz9_sRJZ`F%;e!5o7M@^uIbnZw{wP%zIK
zT=}o9^tDIF-}I`<f51;V{8#?%#MeAm|NqDeEZptw|CGOD-`peD|8LjfZ@uy_%zHfi
zKla-Yi_YZ#4X?ZE|HD`EU&rh*@OQmB?`xjh`Zw;W|F^x`z<JT{-*XK9Lx02Nf5&TS
ztkm*%e*W(N(d)a=GKDYr_lX7Hjeo<Z{H-2-Xu)?~=l$!EuX)G5zxw<9qkQ3i-?IPj
zMPuip+W+bWOE0*R=dabuuYKP$U;FIl|4VoC)Yq*4<llWq{NFhKE1S{wzxC<=^0WU_
zNA=(En$rJ~OzWR5`>Xt#=hpmHn<V}p`d$C_du8~)6`QyGt$*QvaXkD_y|e%JtGI;0
z|6pr(;W7Q+{44%XRdfFNEo}Io`nSvbr^`L6|KXq5cwP?HGV|A#{=?Su@ZXr<{o{|W
z|HgZU{#Sc<AKOG3#{v9zZCCcf%9uC@6nHFUbh!0x1;>oK!9X?vXH^89lkRqFtKD6_
zUdQGO;xb;;p*RSM2{DEc644knge-&@V{|cuKaBFn;vbdp$AbQ`7(xs&O8njVbnD={
z^-2dt+E3bj?|Ghkes`DaUUFTVcD0vPThqMWz#P0Ie$!}8`|nY;o1k)5YCCG{QyjQM
z^LGICTk@Z@LFL(ylarH-2t%6vnRDwfqs*wzi_YuL>j(4$hPFJLvD`Rf9GO*tVzXlT
zjp#!Dg@RQDrwV%tdy2e8-r0uPvEoA}agG^@bB5;(mpDs?=hn`xEv+d1Np_ESUj4mW
zWo70BAIIG%mRHTUqLKL{3;O@F(7f=dx!ini(NWprcG(iolCOxB43gOW9>tJlBN~$}
zJ+kzOHQ#zfwrugTbIZ<E9A93t{FtrO_Iaf@ZUw9uKv!fB?5uKEy;E(PWS_l+3fV&r
z<G4}BsMCwiIM2A+To+vz-5u_+n*N%8PpN08=kJv*E5Dtv%9Nw#!PE?9z)*6vttzhE
z9ah&*ayc8-^~F7O>Hq5Cjj4I0f5M}UGo`+@zO_M`-kP!O(^#9M%{q$~>l;;!P4BTk
z?iL$9QrC1iQL|l>(M)=LEOndsP5kBxZJt;&lUh89o~*l`cl#v6>Yn-`HBTQ(^vsIu
z#BQ{ud$MQSGH0v#=4=Zm_gtSg&(E7$>-NcBXlyH=>_t`EZEAcSx5>#w?ISYw8dskE
zIyX<vf8u5YEIBhHXrJCog&K`ypOAezU8`=yH&5xinGxQcs#iA1#6E2zpG}bZ(ih#D
z&ARubYDcVRK$}-Bnw?J1Yx%dv>xJ3w4P7?d*&X+0b9UHuBGca57uUB-)=&D$?$X_*
zd(yJEUB%VCSNHvXJG?EX;aa-hC93{P&p`W~V83a?dzPDaA@2Rl={c}5MZ>B2;Pli6
zyOTNih5YhV)33~Wa4FYwbs+z1uN9yK^y}y~UMq8I{6(xEj=!Llfg)UD=vuSj7|nWE
z0H4xqz%k#`oChZOk!B;d$7n9bYQNEJ!dk`hyIEmB)?!>VGf=>sr5S56Khuo0m|ti%
z;Fv2kV=d+%nz5Fyh-R#%E29}}>FPj!yUqgK8Mm&DW(Lai2WZxTNq?MXJ$UpdX*S@P
zOEl+!S$~aYBa|5y&|C}~3{IL&n0u5wSFUCFhGqs#d6#L%T1KE5YZ*;68?b#1%~;FW
zLNnGfhG@oG#y*;{mhtRbA>1nl{Q=3wR+1*ZQxLm+Qc&QlC5{d7LP+rUk`__u668kG
z;OBU@w~93T!aknZnpzqvtBBj_tf_W8U90V6n-C>k(TGHREX#!@VhKo6I8x_u2w{$o
z2vL#c?1Jcbgn}$Ca}fv5;II%$Akhd%q(Cr2!lKX-WhFcIa6OxXJR1<aoIe`!i3u%a
z3nxb84RSg?cBd<$Cuv72TawC!omWs3j<Uu9r34hEH-S(>mn8HOL+`x^L3#-_^cGMQ
zsnP`mL5k8r=^c?ysM6sd2`Ei^lbT48<GFJm?%XqT@7p)u?0oyOPrupO&Dw+8#ddLA
z@iz5=QgV+XNj;RpA*T@(O21Tycx#ENG88`m&|CdBG@rX;_m#fFOdVH!REZjhxV~Ka
zdKOx-G5Hij;Ax7t&V92G4~(Km$7Bqc5B=WX-SqCE$<R(=%Pl8!d7DmU7RheevH~-@
z!bPXh<i1`0EVAmu7&2Uls)^E}DZfRYhF7a*Hu{G?qb>-^dG(F0_o1VkLToVkcQW#E
zRUZyw&LZviU+BB1Xmst76LPh&7&Ce6*hr4`lOG}L2#RG4qe3!ZMJirv;QqG=PwsJ6
z1!etpx{$pQ_@|npuq0jfbltIZ`Mzm*pPb$wwQN|!o8Jcn@f{t0@qWZ;@S*J~_(UJ5
zPKoq#@(=Js+I#+6c{{jMLLop1@ZSOk1Dl5UAi)L>?j`}AV0|D|N&>9z=I0*(gi1gl
ze<dma=?7Lv*#{t1k&fO@NU$!_%O$`SC?O^(35QeucP<*YZ)xGbpicXI$@XOngD}$W
zfM?yfN_0@0+Y&jfQAi-><;rG=H`N^RIILN!aZ$VvB+ib{s;a7z)N>&Edip!iV1nov
zpwp@;;}2*7;6-UfXp;Gr`O>KQj0lwPT^|%{Hm=9b#z9H&bfc(3v;$PXqF*puAO~GR
zJ4Wjb)r@FF#z_G-t@v?~Y~pc7GVb}zc|LKSWcUofxR-ZWdGGW?DX%A&gzmxt!OKJ&
zi;)QouTA3mM^t@i6+y}ZnTWeRB?cm@X48EC@G0x0Besx0Mpas~k^a=Q$ry>#G=6Fv
zL{8a*S}iZ4nq*ThmDW#wt6D}UH~RR_rf6!+%HrBq;Ho|SZh`nf$UuR7^6U3|y}&L!
zgzo1ia}kh*6=r0dx=yM~&L9(c6yRE}nmrkQ<mqbHS~TvH;dej6-|FbyGZ%XghOb$!
z)plS*EUg%=f}Xa2;w)JyP{(cb74-!|DPVHY{d2?$qjQ8M?LLqyTS;EY`~mAvE#;R*
za9WPDS#rLa{EPcyu(OxGP4~i<AE}2eGxn9=D-)h2*A!2@@ImL2+idmS0^3E9+mIvy
zQ*;w4!suCFGN}XZb}YN{{5`Z_z&5-^d7-JKPNWJt<AP}EIM}_RZh?&4NA~9NoY3BX
z6d1!LViKjKn0Rn2vHJ-#^?fa!uy7%Qn9@B`E_<y{E4t+llFN5UD~Z`OJ(30$li1AY
z^dh)WL=Bc2-NaVIPQ=L&z?}_dB0$xH;fcGyK+B=Y<-R0b#0qk~cf91(mVIQ51858d
zx9&&aOtwDos0m27I+BL4YZyoX+CPxv@`(j)h}w(ExTpQQb9v}HfJ3WY#f{wpg<Rmx
zC~rMgAGJs!X&_OeqH=(g9f^CU59M<D2!-w8aIX}QL+a-%U7`oTwVyK16y>TfS+rGN
zNr&f|G}6J8pD3dWNE3LD0c}p<KE+RYGkeh^U@lWw6HKuPpnHFk_V2b4iyBpks3I%u
zcAFlWQYV6X-qO&ANb#q%GTnMyxPPQ5gs=OKJXORyZt>Si836%tB>Hsy0Fg`@6>WFw
z15mca$!vlTFg$#7qM>gah4@;{EC#vEvR=e9*&fF4ZBG5f?-8|t>s!3_x7&krQU(&X
z@sZD@^8c(k`@Pq9k?y#@-qV93ta=OuN$J04_WEgh2qE8a-8RS;<HX}{$Q;0>>7?wh
z!@3Xj&Pi5S*_=L10^2_jf8K1^UM@sfAvXuX^`on!-0~e`-tk3fnZ(!`$q@$jdKFaa
zKk{4_TGk^7x|@k(f-S?=jo+1R@(qXVJHdmr<Aok4G3!QTJ7?+JnLV_DdA1%pRp=u*
zuMT?=>ul*A@lUCIbNc&lNb!QDJq%O@CTqbXFQ>)bqvCIwSDZP&6@i?Tnesjs$<lp9
zCy!h~36-}BTDXEu1{U=#5b4^p^$b+}kgnmpdWc*}e7l2vh!8>ldsUOR8@ovzL?lD`
z@J)1@ASI50YTX3%Ti-%6^+^XwRi^0N^uZg_5qcN14|Bbx>idk1xh0(&lwQW4f)XqS
zjGfI{D24lHxAU9@)}M`hr)(Jc6wtD*V)2%;r9Qn-d3rB1x~@Xi)4Hx!Z2cVY`YcD}
zwRuw2ycVSYg3cl5gyEi(LhM<7v0aexS8Ye*N{JwQ!LecG2*x@$MAwWM0!L5vj=#KC
z$;NRCSR2H3%&O_&&aYoSBusisZRcGHg5+>oir#bN?ayqjXvuco8dyZOl*#QTnxQMe
zOO*7ma5(9wKZ-UdvkD;OsNS(|PlHsN#;T+CVcHe#g=#0@GAXU$qr@lN%rvE3qw6jH
z=JMQ2ZxI!9Xc4_wLdip&m!wj%N%ro8vbp^4#aKr47{8V<di;(jtvm=$M`VgL&bcir
zb2B#1#VTXktbtz~3c}rSRZr?CO>Ks)d9&h4??mJLF(fg5)BC)m!WGlCZDcxtPUFZ8
zl{0!5pSIy!rIa}vIvfxNe}n9*Q@(rOwC5HJ?1U}X8z1&I<JLZ0E1bNyX@_TGCyExP
z9G*Af6Y=M*TVY>q)?3tIW!Bz?i%<DNVFyP0Q)=v%l^Sfb1zP5wC}Zr0Kdd1#bi`Ih
zgM$0^v0NWD+P@W4JZ)@YeOIa>KVRVXv{AQ+uRLKWe;|hu{t>_UWbMv$xNii*^wAdq
zD_gv0f%VevwKmx*o9cI-W_V-wWA(ajQ}qg~l%U;;^{0*2DgU&fCp#}<P`i=EEvGs6
zj)X5(v=92g3omTY-hM{tK|c#ZuB<g;X(B=UYS6IAg^E{FYe(|>^X{)t<qdByPZdAx
z0gt~F@?E4l6ZS`qjnX5LE5AnZ+w;n@hM|lWhco^$K1OHu8DXIxX!NabaOBCNv3ZE<
z^KD|C*13|0kK!#@j?1Qeo~xz!`3S;>0U8x+M#D&~FuTf8AGnJzAH=AcvzRi-c@xBN
zcgnACH<_(5Z^?HsaPgI^SNjwwb8D5R=Ub2p+^lcwO(xq^e~MA9f7DKW;SP66J8EuQ
z`8!g01}VH$0dz@edRoSvx7eOb4dY}w!N6d_cj9tHt&<toR(}WjhK*(YOau&MH6^md
z)(n~tG~1=!t#ZN`*28hpgKzhxom&QrDc(sPTR<(M_=9<W3F|&s5wvSZt=iA)7F_<p
z$x5OTrDtE;1P6at5*~2q{1bJ|t~@*hn<(<VZ~{K70Rfy~VksKa?v$rnxmdx%PjTfI
zv9ID)1F$Nf>`_TNckA3Sk@?|CEXy%<%sb|f9=xlP>QMP$niNWrxCH9eQdMpqdN0->
zN&bNPl|ZTb$Rv=I&1SDS7gWd9Bi<p;8v9^+_{pqA&EWD6?`hU&51)?OG&r8;+^=sb
zu)7Sv4cC<}B}}0@%YCl>;Wbf1$)$Ma9anBD4(hg5J?Q%%6J(fN8-)U!g3d=8AoHW?
z(g$#h<y_|xh#X_j$uHhc2U{MO7La*Oi`kkZOUoE~32qaV6g+mM+?XQ0kc@3QdW;Wo
z^QsdK7LZys&8Ik<H0)sgXs&{^$m@?xAm7IY{<4-MNV4Mwb?Vj$h-t56>_W2n{+jh5
z!OzSpsio>~YAc3-(DqtUvGrH|<-&cv7KX^os$<o3+ScjAWf)p(|B?hbU839f3FnHl
zsD-2bm*wpwb&F3w4($FloEMHP$s7cOf2rp3(_ZtFK+QgBRqD|_RxjK(EEJ|)Yqr#j
z6QZrry&wN$j4GBwny$c+Tb>RpB1JN+jzrOaRY%NgV$_ACjO$Y4lT1;?tK1As6|I^W
zH6c-B-_-a7Q>%YlSg8uaIEATR$0HAYA@vqLAsbH}eXlsuHb2+Iu6}clFULkooD8Sy
zB&l`BL!(6kDaZ%nb5iYM4ImPk8IMv()rs(K)EjI5Z~5OtHWRy)UY-o*G+3?ht-F_d
z)VkgMJB<$=yWe{FI&!{=e4Fbyf+*cZ_Jc8(S$Pb7M$cugY0po$qNR7=rpTo@t953L
zpQqi!Adk4Re}E4Tm`>rW`xL7;c!7s{Dd)X0_(+FlJdzL+ApNEDI_;`iqoek-U)Nb^
z>bR?%>^KwV#}R&ovE%Ps>yfa*t0k7pr!|Y2k(4eo_Ng6tOf`p0Yg4ybqrYeU`olZ#
z6cX~7kc!I~jsPVetHJYsM1@g?md+j_*S)XTUVpAC!?SNktA*xatIl3^n8IT4j{-w7
zPVV}hPAM6R(7Ib!fI{{<V4~4RJ?0(~iQUTB>CrxdcIZ4-t*2LZLr;!2#XD@RhQjS$
z!a8osA+&+weuCH}2`9pJ`m(}kAe`-jU|2kmg6XdbEP>NCqtuUe_%d9#K5o%CggDL3
zg&KrDO09l)_)@lGRQC|7vW|{cojuL3tF@0+Y0Bylvu?G#3B$SM(Kcl+ZCr0;;PPs>
zG0brs_X~8aCVhWfE7+dRGQ_(phZVWxaeG*K>|%d>N;1F(U*=mTRf{w&7%+_m-Tf9>
z72D)o!q}V9B`GsZ{yc{>R3YESxtZDfi+Ac`rg>E<xyQXeM2r>PrQlaFF-5bO6M+IU
zuzOoQ_E_{{W{JWsDD%glJTF7XEN7Q}U&f2dQohg#<3~J&!m#$-&b&mjp|h-nRouq4
zYb!zGUX5#PtbF4$g^M>6wCjC4j~d%v&)dVnB$&0C(Y2G&!{l*l1s|HM2TUhDsDM~E
z;V*F=I3I*|-A=g0>H!k^`FB(tHha$w{-FYkR?CSgxK3RANpCXj>H}$GVFHYbGGg}S
zg=FfP)~;eQ2O>Ne1vsZgF7AN-h+l})>RX-;m2>uWFctZ7(RqzFG19jQFg~3RFm_6K
zq2GWhvoLbP3aHobPHl4Mq;xu+tolQT`LcHEBljTkBgqZvdx7VC?L$9YLZpUb=F3oT
zk{aBkM&pMe?_cbY+DKSSJ#27}7@^T98w}8w?jI?y`O)$0h2QD-?cYjA>nI79XYah8
zG%p6rJnAIK#j5G^V`mHvz9()Z%wszuR~l_k>#?V`J`!#7^6b62MHnmxV(EKQf@Qtv
z!qP<YlF8lSSJUgKu`_E8SE80d2SHZbLYs)O#}3;MTs-ni;N<VUNg8Xf#3c;?D%F%V
zR}GM=FsqZm(^}&Bnl)~E{`BoH=yAggF(vuul}9P(#X^@Y%&C=+KQy1LJC4yZa$m*G
z@ENkL^l}7D4Bz&>EpJ}>^t@i;D}+2<aIVT%$udQ5v<uTjQ|v4FnAFY6crL>9bLi{i
zjP5R*Kj;uYYJtub6uVYL-M*tKTu42s=0WRmn*)8G>Brj4Ez_~Buil68^RV}K8Wax7
zsDLaEPQj)HDG9sv3}EWgmX?t7?cMMEQ6gkXrF|&4x~lVykn@aZ-!lli0l&r3U>JP-
zSnc7Cty9^&1<UVi3pk+zaT_oa^oDDQS#;Avp*WViUC^Z8Q%dPwt4d*(OTr%f(&Zd<
z`DBzakje8N#rNA$78AHqGKvH9aP-a2dW|=A&;GHWxChlhi~8+N2JXqq`&?138c|+K
zw>4f|$b&9SL~C-;wR*5O$?QxgAweo0?;O;h7g~LhIOTP6WNvj{jQPA^*&@r2JCjWv
zeHZ9qvf4hH&iNxhd;tUYT;cnp+FDgF;_>Z_r3`zjz4j5=*?2Z@Ncfp8-6+=ku?JTg
z_8o_kVICt}bAWVQ%303tVJBTZE-_U(BhU3K%Y+{rm^&l8r4R2J7>pOTKe;1tBNouS
zA*{@QeN>DIn`z8PJpuRM)GCa}%pA$Qf5heTaAxjHD?28a9>_^&a+g4^sRvHYvT@m*
zN1h+}R&0Mx%wF=?-cAux3QHCgdL74eX(*VhmiGG@g!Q5Nn!S;Vc3<EEkD6p^A@(He
zAnV)s4-VVTD`@RWj-t^E2E$5s;&{QA5yuN??Cp3rl9GVm?e(vC%|+O!azR6YGmFCN
z!}EWd^mac>?(RI94-Y~v+9prDxZdW6$jf^|tA7N}O%5S5qNV*TD%l|?RaolrmN5p&
zwYjr-9NL$^Rm`R>(kilaCwybL9j{>fr4Z18L2uLuwLM7{6mFQ}?5N4EdgkpUNg7p5
zPit72p`6_)l=^P>!_`Zx`b;hN{PKC{ry4`0JhPbse~z|(UiDorpEVl~{waY}@8pps
zf^08T8VM>dZVlXx2LA3MZuJPI_)h{N29fz+2n1n_bOvjwTEe8I?WG}7;!p>uv@{gr
z=p-#I<18x%ah64jIYJ;Zj`07#!WwMs?Hxb~{oBGAtmWnG4HWw?Y2p@&1d2gq!RD4w
zpg2&>`u_kdk`Sr?$yXlE4C>Px(uc43tE;Lx)jIS<SS!}{Q5c)5D^Au$+={r%R*oPO
z)+22%On#+}Z54;I+H?~ry%Obl;^L_A@46QiTu#<E6o$vfw5neX4ZYIfRmc63;=u3|
z9=vy8mNzn$e@3JBg_|DZ_$|8TG0YaV)5DrkE+y>vt5qA-ks$!15nQTD#LNi!-c+hO
zR>ijrjL1})XlXTyaZIRcw`Ty*W}y9!3}#qO8izNM+s1I1U=Lyhe{{O2((Tm|l6_It
zZ?6fGcEu!^n;w6z>R*%G8?f0M9F`$1Tb0O77KaeKtcv6&`9o+nS7Es+R1g5uDz{al
zj*p;d-+C)a`s3rG{cAzAb;)vBhAFC7$tun*EBTX;WOYwdt3Jlo9bY-<oKa|NCS{kP
z?c1$Qw&B3B;RwiFrT*HV$J}k*%7$NdUW|Y*#*=OhdLmw_A!69-nDJ{ii?It(a%p=;
zXGd9%fm_V|l$HIFi0C;qh4+deEP}s|V`2q~>dryms&U|HR&TyoXvS3=)B4@C>~%F9
z7oEuqJ)WzM+NoT8?8Y2a0$mt+lu`P`{K+%3gHMfrd_h+|BeycfdCf!VDq*JE!T}{W
zIT;#4kxJ(9=qi}m@2k1-3DX!7FS*lkZSv0Uw*<;1yL;y=M4gY>hiF+yRrH;p|2ew;
a0rq|YXg{R$UyLUu1BFt8Kxzi+l>Y+h%oZvD

literal 0
HcmV?d00001

diff --git a/info/GNU_which/draft/texi/version.texi b/info/GNU_which/draft/texi/version.texi
new file mode 100644
index 00000000..efddb3cc
--- /dev/null
+++ b/info/GNU_which/draft/texi/version.texi
@@ -0,0 +1,4 @@
+@set UPDATED 20 March 2015
+@set UPDATED-MONTH March 2015
+@set EDITION 2.21
+@set VERSION 2.21
diff --git a/info/GNU_which/draft/texi/which.texi b/info/GNU_which/draft/texi/which.texi
new file mode 100644
index 00000000..72e87292
--- /dev/null
+++ b/info/GNU_which/draft/texi/which.texi
@@ -0,0 +1,278 @@
+\input texinfo-ja   @c -*-texinfo-*-
+@c ===========================================================================
+@c
+@c This file was generated with po4a. Translate the source file.
+@c
+@c ===========================================================================
+
+@c %**start of header
+@setfilename which.info
+@documentencoding UTF-8
+@documentlanguage ja
+@settitle @command{which}: コマンドのフルパス表示
+@include version.texi
+@dircategory System administration
+@direntry
+* Which: (which).            コマンドのフルパスを表示
+@end direntry
+@c %**end of header
+
+@setchapternewpage odd
+
+@ifinfo
+@format
+
+@c !BEGIN INTRO
+@c !END INTRO
+このファイルは `which' version 2.x@ を説明するものです。
+
+@c !BEGIN COPYING
+Copyright @copyright{} 2000 - 2015, by
+
+Carlo Wood, Run on IRC <carlo@@alinoe.com>
+RSA-1024 0x624ACAD5 1997-01-26                    Sign & Encrypt
+Fingerprint16 = 32 EC A7 B6 AC DB 65 A6  F6 F6 55 DD 1C DC FF 61
+
+Permission is granted to make and distribute verbatim copies of
+this manual provided the copyright notice and this permission notice
+are preserved on all copies.
+@end format
+
+@ignore
+Permission is granted to copy and distribute modified versions of this
+manual under the conditions for verbatim copying, provided also that the
+section entitled ``GNU General Public License'' is included exactly as
+in the original, and provided that the entire resulting derived work is
+distributed under the terms of a permission notice identical to this
+one.
+
+Permission is granted to copy and distribute translations of this manual
+into another language, under the above conditions for modified versions,
+except that the section entitled ``GNU General Public License'' may be
+included in a translation approved by the author instead of in the
+original English.
+@end ignore
+@c !END COPYING
+@end ifinfo
+
+@titlepage
+@title Which
+@subtitle コマンドのフルパス表示
+@sp 1
+@subtitle 編集版 @value{EDITION}, Which バージョン @value{VERSION}
+@subtitle @value{UPDATED}
+@c !BEGIN AUTHORS
+@author Carlo Wood <@email{carlo@@gnu.org}>
+@c !END AUTHORS
+@page
+@vskip 0pt plus 1filll
+Copyright @copyright{} 2000 - 2015, by
+
+Carlo Wood, Run on IRC <carlo@@alinoe.com> RSA-1024 0x624ACAD5 1997-01-26
+Sign & Encrypt Fingerprint16 = 32 EC A7 B6 AC DB 65 A6 F6 F6 55 DD 1C DC FF
+61
+
+@end titlepage
+
+@ifnottex
+@node Top, which プログラム, (dir), (dir)
+@top @command{which}: コマンドのフルパス表示
+@end ifnottex
+
+@ifinfo
+@c !BEGIN NAME
+@c !END NAME
+@command{which} プログラムは（シェル）コマンドのフルパスを表示します。
+
+@noindent
+This file documents @command{which} version @value{VERSION}, updated
+@value{UPDATED}.
+@end ifinfo
+
+@menu
+* which プログラム::    @command{which} プログラム
+* which の起動::          @command{which} の起動方法
+* オプションの概要::  コマンドラインオプションの概要
+* 返り値::                @command{which} が返す値
+* 例::                      コマンドの実行例
+* バグ::                   既知のバグ
+* 関連項目::             関連する UNIX コマンド
+* さくいん::             さくいん
+@end menu
+
+@node which プログラム, which の起動, Top, Top
+@chapter @command{which} プログラム
+@cindex Description of @command{which}
+
+@c !BEGIN DESCRIPTION
+@c !END DESCRIPTION
+@command{which} は 1
+つまたは複数の引数を取ります。その引数それぞれに対して、その引数がシェルプロンプトから入力された際に、実行されることになる実行モジュールのフルパスを
+stdout に出力します。 これを実現する際には、環境変数 @env{PATH} に列記されたディレクトリ内から実行ファイルやスクリプトを検索します。
+これは @command{bash(1)} と同じアルゴリズムを用いています。
+
+@node which の起動, オプションの概要, which プログラム, Top
+@chapter @command{which} の実行
+@cindex @command{which} の実行
+@cindex Synopsis
+
+@noindent
+@command{which} の実行書式は以下のとおりです。
+
+@c !BEGIN SYNOPSIS
+@example
+which [options] [--] programname [...]
+@end example
+@c !END SYNOPSIS
+
+@menu
+* オプションの概要::  オプション概要
+@end menu
+
+@node オプションの概要, 返り値, which の起動, Top
+@chapter オプションの概要
+@cindex Options, command line
+@cindex Command line Options
+@cindex Overview of command line options
+
+@c !BEGIN OPTIONS
+@table @samp
+@cindex @option{--all}
+@cindex @option{-a}
+@item --all
+@itemx -a
+@env{PATH} において見つかった実行ファイルをすべて表示します。最初に見つかった一つだけではありません。
+
+@cindex @option{--read-alias}
+@cindex @option{-i}
+@item --read-alias
+@itemx -i
+標準入力からエイリアスを読み込んで、合致したものを標準出力します。 これは which そのものを含む alias
+において、本オプションを合わせて利用すると便利です。 たとえば以下です。@* @code{alias which='alias | which -i'}
+
+@cindex @option{--skip-alias}
+@item --skip-alias
+@option{--read-alias} が指定されても無視します。which に対するエイリアスや関数の中で
+@option{--read-alias} オプションを利用している場合であっても、明示的に通常の実行ファイルを検索する場合に利用できます。
+
+@cindex @option{--read-functions}
+@item --read-functions
+標準入力からシェル関数定義を読み込んで、合致したものを標準出力します。これは which
+そのものを含むシェル関数において、本オプションを合わせて利用すると便利です。たとえば以下です。@* @code{which() @{ declare
+-f | which --read-functions $@@ @}@*export -f which}
+
+@cindex @option{--skip-functions}
+@item --skip-functions
+@option{--read-functions} が指定されても無視します。which に対するエイリアスや関数の中で
+@option{--read-functions} オプションを利用している場合であっても、明示的に通常の実行ファイルを検索する場合に利用できます。
+
+@cindex @option{--skip-dot}
+@item --skip-dot
+@env{PATH} 内のディレクトリにうち、ドットで始まるディレクトリは除外します。
+
+@cindex @option{--skip-tilde}
+@item --skip-tilde
+チルダで始まる @env{PATH} 内のディレクトリ、および @env{HOME} ディレクトリ内に存在する実行ファイルは除外します。
+
+@cindex @option{--show-dot}
+@item --show-dot
+@env{PATH} 内にドットで始まるディレクトリがあって、合致した実行ファイルがその中に見つかった場合には、フルパスでなく
+"./programname" と表示します。
+
+@cindex @option{--show-tilde}
+@item --show-tilde
+ディレクトリが @env{HOME} に合致した場合、チルダを表示します。 このオプションは root ユーザーが実行した際には無視されます。 
+
+@cindex @option{--tty-only}
+@item --tty-only
+tty 上でない場合、この右側に指定されたオプションの実行を停止します。
+
+@cindex @option{--version}
+@cindex @option{-v}
+@cindex @option{-V}
+@item --version, -v, -V
+バージョン情報を標準出力して正常終了します。
+
+@cindex @option{--help}
+@item --help
+利用方法を標準出力して正常終了します。
+
+@end table
+@c !END OPTIONS
+
+@node 返り値, 例, オプションの概要, Top
+@chapter 返り値
+@cindex Return value of @command{which}
+
+@c !BEGIN RETURNVALUE
+@c !END RETURNVALUE
+@command{which} は、処理に失敗した引数の数を返します。また @file{programname} が指定されなかった場合は -1
+を返します。
+
+@node 例, バグ, 返り値, Top
+@chapter 例
+@cindex Examples
+@cindex aliases, handling of
+
+@c !BEGIN EXAMPLE
+本ユーティリティーを利用するには、@command{which} に対して、エイリアスを追加する (C シェルの場合) 、あるいはシェル関数を追加する
+(Bourne シェル) 方法が推奨されます。たとえば以下のようにします。
+
+[ba]sh:
+
+@example
+@group
+which ()
+@{
+  (alias; declare -f) | /usr/bin/which --tty-only --read-alias --read-functions --show-tilde --show-dot $@@
+@}
+export -f which
+@end group
+@end example
+
+[t]csh:
+
+@example
+@group
+alias which 'alias | /usr/bin/which --tty-only --read-alias --show-dot --show-tilde'
+@end group
+@end example
+
+@noindent
+この方法にすると、端末から起動した際には、わかりやすく ~/ や ./ を表示します。一方でスクリプトから実行した際には、フルパスを表示します。
+
+@example
+@group
+> which q2
+~/bin/q2
+> echo `which q2`
+/home/carlo/bin/q2
+@end group
+@end example
+@c !END EXAMPLE
+
+@node バグ, 関連項目, 例, Top
+@chapter バグ
+@cindex Bugs, known
+
+@c !BEGIN BUGS
+@c !END BUGS
+@env{HOME} ディレクトリは、環境変数 @env{HOME}
+を調べることで決定されますが、この変数が存在しない場合には、その処理がキャンセルされます。@command{which} は 2
+つの同等のディレクトリであっても、その 1 つにシンボリックリンクを使ったパスが含まれている場合に、別のディレクトリと取り扱ってしまいます。
+
+@node 関連項目, さくいん, バグ, Top
+@chapter 関連項目
+
+@c !BEGIN SEEALSO
+@c !END SEEALSO
+@command{bash(1)}
+
+@node さくいん, , 関連項目, Top
+@comment node-name,    next,  previous,       up
+@unnumbered さくいん
+
+@printindex cp
+
+@contents
+@bye
diff --git a/info/GNU_which/draft/text/which.txt b/info/GNU_which/draft/text/which.txt
new file mode 100644
index 00000000..e71e6d74
--- /dev/null
+++ b/info/GNU_which/draft/text/which.txt
@@ -0,0 +1,182 @@
+
+このファイルは ‘which’ version 2.x を説明するものです。
+
+Copyright © 2000 - 2015, by
+
+Carlo Wood, Run on IRC <carlo@alinoe.com>
+RSA-1024 0x624ACAD5 1997-01-26                    Sign & Encrypt
+Fingerprint16 = 32 EC A7 B6 AC DB 65 A6  F6 F6 55 DD 1C DC FF 61
+
+Permission is granted to make and distribute verbatim copies of
+this manual provided the copyright notice and this permission notice
+are preserved on all copies.
+
+‘which’: コマンドのフルパス表示
+*******************************
+
+‘which’ プログラムは（シェル）コマンドのフルパスを表示します。
+
+This file documents ‘which’ version 2.21, updated 20 March 2015.
+
+1 ‘which’ プログラム
+********************
+
+‘which’ は 1 つまたは複数の引数を取ります。その引数それぞれに対して、そ
+の引数がシェルプロンプトから入力された際に、実行されることになる実行モジ
+ュールのフルパスを stdout に出力します。 これを実現する際には、環境変数
+‘PATH’ に列記されたディレクトリ内から実行ファイルやスクリプトを検索しま
+す。 これは ‘bash(1)’ と同じアルゴリズムを用いています。
+
+2 ‘which’ の実行
+****************
+
+‘which’ の実行書式は以下のとおりです。
+
+     which [options] [--] programname [...]
+
+3 オプションの概要
+******************
+
+‘--all’
+‘-a’
+     ‘PATH’ において見つかった実行ファイルをすべて表示します。最初に見つ
+     かった一つだけではありません。
+
+‘--read-alias’
+‘-i’
+     標準入力からエイリアスを読み込んで、合致したものを標準出力します。
+     これは which そのものを含む alias において、本オプションを合わせて
+     利用すると便利です。 たとえば以下です。
+     ‘alias which='alias | which -i'’
+
+‘--skip-alias’
+     ‘--read-alias’ が指定されても無視します。which に対するエイリアスや
+     関数の中で ‘--read-alias’ オプションを利用している場合であっても、
+     明示的に通常の実行ファイルを検索する場合に利用できます。
+
+‘--read-functions’
+     標準入力からシェル関数定義を読み込んで、合致したものを標準出力しま
+     す。これは which そのものを含むシェル関数において、本オプションを合
+     わせて利用すると便利です。たとえば以下です。
+     ‘which() { declare -f | which --read-functions $@ }
+     export -f which’
+
+‘--skip-functions’
+     ‘--read-functions’ が指定されても無視します。which に対するエイリア
+     スや関数の中で ‘--read-functions’ オプションを利用している場合であ
+     っても、明示的に通常の実行ファイルを検索する場合に利用できます。
+
+‘--skip-dot’
+     ‘PATH’ 内のディレクトリにうち、ドットで始まるディレクトリは除外しま
+     す。
+
+‘--skip-tilde’
+     チルダで始まる ‘PATH’ 内のディレクトリ、および ‘HOME’ ディレクトリ
+     内に存在する実行ファイルは除外します。
+
+‘--show-dot’
+     ‘PATH’ 内にドットで始まるディレクトリがあって、合致した実行ファイル
+     がその中に見つかった場合には、フルパスでなく "./programname" と表示
+     します。
+
+‘--show-tilde’
+     ディレクトリが ‘HOME’ に合致した場合、チルダを表示します。 このオプ
+     ションは root ユーザーが実行した際には無視されます。
+
+‘--tty-only’
+     tty 上でない場合、この右側に指定されたオプションの実行を停止します
+     。
+
+‘--version, -v, -V’
+     バージョン情報を標準出力して正常終了します。
+
+‘--help’
+     利用方法を標準出力して正常終了します。
+
+4 返り値
+********
+
+‘which’ は、処理に失敗した引数の数を返します。また ‘programname’ が指定
+されなかった場合は -1 を返します。
+
+5 例
+****
+
+本ユーティリティーを利用するには、‘which’ に対して、エイリアスを追加する
+(C シェルの場合) 、あるいはシェル関数を追加する (Bourne シェル) 方法が推
+奨されます。たとえば以下のようにします。
+
+   [ba]sh:
+
+     which ()
+     {
+       (alias; declare -f) | /usr/bin/which --tty-only --read-alias --read-functions --show-tilde --show-dot $@
+     }
+     export -f which
+
+   [t]csh:
+
+     alias which 'alias | /usr/bin/which --tty-only --read-alias --show-dot --show-tilde'
+
+この方法にすると、端末から起動した際には、わかりやすく ~/ や ./ を表示し
+ます。一方でスクリプトから実行した際には、フルパスを表示します。
+
+     > which q2
+     ~/bin/q2
+     > echo `which q2`
+     /home/carlo/bin/q2
+
+6 バグ
+******
+
+‘HOME’ ディレクトリは、環境変数 ‘HOME’ を調べることで決定されますが、こ
+の変数が存在しない場合には、その処理がキャンセルされます。‘which’ は 2 つ
+の同等のディレクトリであっても、その 1 つにシンボリックリンクを使ったパ
+スが含まれている場合に、別のディレクトリと取り扱ってしまいます。
+
+7 関連項目
+**********
+
+‘bash(1)’
+
+さくいん
+********
+
+* Menu:
+
+* --all:                                 オプションの概要.    (line  39)
+* --help:                                オプションの概要.    (line  92)
+* --read-alias:                          オプションの概要.    (line  44)
+* --read-functions:                      オプションの概要.    (line  56)
+* --show-dot:                            オプションの概要.    (line  76)
+* --show-tilde:                          オプションの概要.    (line  81)
+* --skip-alias:                          オプションの概要.    (line  51)
+* --skip-dot:                            オプションの概要.    (line  68)
+* --skip-functions:                      オプションの概要.    (line  63)
+* --skip-tilde:                          オプションの概要.    (line  72)
+* --tty-only:                            オプションの概要.    (line  85)
+* --version:                             オプションの概要.    (line  89)
+* -a:                                    オプションの概要.    (line  39)
+* -i:                                    オプションの概要.    (line  44)
+* -v:                                    オプションの概要.    (line  89)
+* -V:                                    オプションの概要.    (line  89)
+* aliases, handling of:                  例.                  (line 104)
+* Bugs, known:                           バグ.                (line 131)
+* Command line Options:                  オプションの概要.    (line  39)
+* Description of which:                  which プログラム.    (line  23)
+* Examples:                              例.                  (line 104)
+* Options, command line:                 オプションの概要.    (line  39)
+* Overview of command line options:      オプションの概要.    (line  39)
+* Return value of which:                 返り値.              (line  98)
+* Synopsis:                              which の起動.        (line  32)
+* which の実行:                          which の起動.        (line  32)
+
+‘which’: コマンドのフルパス表示
+1 ‘which’ プログラム
+2 ‘which’ の実行
+3 オプションの概要
+4 返り値
+5 例
+6 バグ
+7 関連項目
+さくいん
diff --git a/info/GNU_which/original/texi/version.texi b/info/GNU_which/original/texi/version.texi
new file mode 100644
index 00000000..efddb3cc
--- /dev/null
+++ b/info/GNU_which/original/texi/version.texi
@@ -0,0 +1,4 @@
+@set UPDATED 20 March 2015
+@set UPDATED-MONTH March 2015
+@set EDITION 2.21
+@set VERSION 2.21
diff --git a/info/GNU_which/original/texi/which.texi b/info/GNU_which/original/texi/which.texi
new file mode 100644
index 00000000..5c622149
--- /dev/null
+++ b/info/GNU_which/original/texi/which.texi
@@ -0,0 +1,287 @@
+\input texinfo   @c -*-texinfo-*-
+@c %**start of header
+@setfilename which.info
+@settitle @command{which}: show full path of commands
+@include version.texi
+@dircategory System administration
+@direntry
+* Which: (which).                               Show full path of commands.
+@end direntry
+@c %**end of header
+
+@setchapternewpage odd
+
+@ifinfo
+@format
+
+@c !BEGIN INTRO
+This file documents `which' version 2.x@.
+@c !END INTRO
+
+@c !BEGIN COPYING
+Copyright @copyright{} 2000 - 2015, by
+
+Carlo Wood, Run on IRC <carlo@@alinoe.com>
+RSA-1024 0x624ACAD5 1997-01-26                    Sign & Encrypt
+Fingerprint16 = 32 EC A7 B6 AC DB 65 A6  F6 F6 55 DD 1C DC FF 61
+
+Permission is granted to make and distribute verbatim copies of
+this manual provided the copyright notice and this permission notice
+are preserved on all copies.
+@end format
+
+@ignore
+Permission is granted to copy and distribute modified versions of this
+manual under the conditions for verbatim copying, provided also that the
+section entitled ``GNU General Public License'' is included exactly as
+in the original, and provided that the entire resulting derived work is
+distributed under the terms of a permission notice identical to this
+one.
+
+Permission is granted to copy and distribute translations of this manual
+into another language, under the above conditions for modified versions,
+except that the section entitled ``GNU General Public License'' may be
+included in a translation approved by the author instead of in the
+original English.
+@end ignore
+@c !END COPYING
+@end ifinfo
+
+@titlepage
+@title Which
+@subtitle Show the full path of commands
+@sp 1
+@subtitle Edition @value{EDITION}, for Which Version @value{VERSION}
+@subtitle @value{UPDATED}
+@c !BEGIN AUTHORS
+@author Carlo Wood <@email{carlo@@gnu.org}>
+@c !END AUTHORS
+@page
+@vskip 0pt plus 1filll
+Copyright @copyright{} 2000 - 2015, by
+
+Carlo Wood, Run on IRC <carlo@@alinoe.com>
+RSA-1024 0x624ACAD5 1997-01-26                    Sign & Encrypt
+Fingerprint16 = 32 EC A7 B6 AC DB 65 A6  F6 F6 55 DD 1C DC FF 61
+
+@end titlepage
+
+@ifnottex
+@node Top, Which Program, (dir), (dir)
+@top @command{which}: Show the full path of commands
+@end ifnottex
+
+@ifinfo
+The @command{which} program
+@c !BEGIN NAME
+shows the full path of (shell) commands.
+@c !END NAME
+
+@noindent
+This file documents @command{which} version @value{VERSION}, updated @value{UPDATED}.
+@end ifinfo
+
+@menu
+* Which Program::               The @command{which} Program
+* Invoking Which::              How to invoke @command{which}
+* Option Summary::              Overview of commandline options
+* Return Value::		The return value of @command{which}
+* Example::			Examples of invokation
+* Bugs::			Known bugs
+* See Also::			Related UNIX commands
+* Index::                       Index
+@end menu
+
+@node Which Program, Invoking Which, Top, Top
+@chapter The @command{which} Program
+@cindex Description of @command{which}
+
+@c !BEGIN DESCRIPTION
+@command{Which} takes one or more arguments. For each of its arguments
+it prints to stdout the full path of the executables
+that would have been executed when this argument had been
+entered at the shell prompt. It does this by searching
+for an executable or script in the directories listed in
+the environment variable @env{PATH} using the same algorithm as @command{bash(1)}.
+@c !END DESCRIPTION
+
+@node    Invoking Which, Option Summary, Which Program, Top
+@chapter Invoking @command{which}
+@cindex Invoking @command{which}
+@cindex Synopsis
+
+@noindent
+The synopsis to invoke @command{which} is
+
+@c !BEGIN SYNOPSIS
+@example
+which [options] [--] programname [...]
+@end example
+@c !END SYNOPSIS
+
+@menu
+* Option Summary::        Option summary
+@end menu
+
+@node    Option Summary, Return Value, Invoking Which, Top
+@chapter Option Summary
+@cindex Options, command line
+@cindex Command line Options
+@cindex Overview of command line options
+
+@c !BEGIN OPTIONS
+@table @samp
+@cindex @option{--all}
+@cindex @option{-a}
+@item --all
+@itemx -a
+Print all matching executables in @env{PATH}, not just the first.
+
+@cindex @option{--read-alias}
+@cindex @option{-i}
+@item --read-alias
+@itemx -i
+Read aliases from stdin, reporting matching ones on
+stdout. This is useful in combination with using an
+alias for which itself. For example@*
+@code{alias which='alias | which -i'}.
+
+@cindex @option{--skip-alias}
+@item --skip-alias
+Ignore option @option{--read-alias}, if any. This is useful to
+explicity search for normal binaries, while using
+the @option{--read-alias} option in an alias or function for which.
+
+@cindex @option{--read-functions}
+@item --read-functions
+Read shell function definitions from stdin, reporting matching
+ones on stdout. This is useful in combination with using a shell
+function for which itself.  For example:@*
+@code{which() @{ declare -f | which --read-functions $@@ @}@*export -f which}
+
+@cindex @option{--skip-functions}
+@item --skip-functions
+Ignore option @option{--read-functions}, if any. This is useful to
+explicity search for normal binaries, while using
+the @option{--read-functions} option in an alias or function for which.
+
+@cindex @option{--skip-dot}
+@item --skip-dot
+Skip directories in @env{PATH} that start with a dot.
+
+@cindex @option{--skip-tilde}
+@item --skip-tilde
+Skip directories in @env{PATH} that start with a tilde and
+executables which reside in the @env{HOME} directory.
+
+@cindex @option{--show-dot}
+@item --show-dot
+If a directory in @env{PATH} starts with a dot and a matching
+executable was found for that path, then print
+"./programname" rather than the full path.
+
+@cindex @option{--show-tilde}
+@item --show-tilde
+Output a tilde when a directory matches the @env{HOME}
+directory. This option is ignored when which is
+invoked as root.
+
+@cindex @option{--tty-only}
+@item --tty-only
+Stop processing options on the right if not on tty.
+
+@cindex @option{--version}
+@cindex @option{-v}
+@cindex @option{-V}
+@item --version, -v, -V
+Print version information on standard output then exit
+successfully.
+
+@cindex @option{--help}
+@item --help
+Print usage information on standard output then exit
+successfully.
+
+@end table
+@c !END OPTIONS
+
+@node    Return Value, Example, Option Summary, Top
+@chapter Return Value
+@cindex Return value of @command{which}
+
+@c !BEGIN RETURNVALUE
+@command{Which} returns the number of failed arguments, or -1 when
+no @file{programname} was given.
+@c !END RETURNVALUE
+
+@node    Example, Bugs, Return Value, Top
+@chapter Example
+@cindex Examples
+@cindex aliases, handling of
+
+@c !BEGIN EXAMPLE
+The recommended way to use this utility is by adding an alias (C shell)
+or shell function (Bourne shell) for @command{which} like the following:
+
+[ba]sh:
+
+@example
+@group
+which ()
+@{
+  (alias; declare -f) | /usr/bin/which --tty-only --read-alias --read-functions --show-tilde --show-dot $@@
+@}
+export -f which
+@end group
+@end example
+
+[t]csh:
+
+@example
+@group
+alias which 'alias | /usr/bin/which --tty-only --read-alias --show-dot --show-tilde'
+@end group
+@end example
+
+@noindent
+This will print the readable ~/ and ./ when starting which
+from your prompt, while still printing the full path when
+used from a script:
+
+@example
+@group
+> which q2
+~/bin/q2
+> echo `which q2`
+/home/carlo/bin/q2
+@end group
+@end example
+@c !END EXAMPLE
+
+@node    Bugs, See Also, Example, Top
+@chapter Bugs
+@cindex Bugs, known
+
+@c !BEGIN BUGS
+The @env{HOME} directory is determined by looking for the @env{HOME}
+environment variable, which aborts when this variable
+doesn't exist.  @command{Which} will consider two equivalent directories
+to be different when one of them contains a path
+with a symbolic link.
+@c !END BUGS
+
+@node    See Also, Index, Bugs, Top
+@chapter See Also
+
+@c !BEGIN SEEALSO
+@command{bash(1)}
+@c !END SEEALSO
+
+@node    Index,            ,  See Also, Top
+@comment node-name,    next,  previous,       up
+@unnumbered Index
+
+@printindex cp
+
+@contents
+@bye
diff --git a/info/GNU_which/po4a/texi/adddocumentlanguage.txt b/info/GNU_which/po4a/texi/adddocumentlanguage.txt
new file mode 100644
index 00000000..ba9d2fa1
--- /dev/null
+++ b/info/GNU_which/po4a/texi/adddocumentlanguage.txt
@@ -0,0 +1,3 @@
+PO4A-HEADER: mode=before; position=^@settitle
+@documentencoding UTF-8
+@documentlanguage ja
diff --git a/info/GNU_which/po4a/texi/ja.po b/info/GNU_which/po4a/texi/ja.po
new file mode 100644
index 00000000..e5e93acf
--- /dev/null
+++ b/info/GNU_which/po4a/texi/ja.po
@@ -0,0 +1,694 @@
+# Japanese translations for GNU which package
+#
+# Japanese Version Copyright (c) 2021 Linux JM project
+#         all rights reserved.
+#
+msgid ""
+msgstr ""
+"Project-Id-Version: GNU which 2.21\n"
+"POT-Creation-Date: 2021-07-12 13:00+0900\n"
+"PO-Revision-Date: 2021-07-12 21:31+0900\n"
+"Last-Translator: michio_matsuyama@yahoo.co.jp\n"
+"Language-Team: Linux JM project <linuxjm-discuss@lists.osdn.me>\n"
+"Language: ja\n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+"Plural-Forms: nplurals=1; plural=0;\n"
+
+#. type: settitle
+#: original/texi/which.texi:4
+#, no-wrap
+msgid "@command{which}: show full path of commands"
+msgstr "@command{which}: コマンドのフルパス表示"
+
+#. type: include
+#: original/texi/which.texi:5
+#, no-wrap
+msgid "version.texi"
+msgstr "version.texi"
+
+#. type: dircategory
+#: original/texi/which.texi:6
+#, no-wrap
+msgid "System administration"
+msgstr "System administration"
+
+#. type: menuentry
+#: original/texi/which.texi:9
+msgid "Which: (which)"
+msgstr "Which: (which)"
+
+#. type: menuentry
+#: original/texi/which.texi:9
+msgid "Show full path of commands."
+msgstr "コマンドのフルパスを表示"
+
+#. type: format
+#: original/texi/which.texi:20
+#, no-wrap
+msgid ""
+"This file documents `which' version 2.x@.\n"
+"\n"
+msgstr ""
+"このファイルは `which' version 2.x@ を説明するものです。\n"
+"\n"
+
+#. type: format
+#: original/texi/which.texi:23
+#, no-wrap
+msgid ""
+"Copyright @copyright{} 2000 - 2015, by\n"
+"\n"
+msgstr ""
+"Copyright @copyright{} 2000 - 2015, by\n"
+"\n"
+
+#. type: format
+#: original/texi/which.texi:27
+#, no-wrap
+msgid ""
+"Carlo Wood, Run on IRC <carlo@@alinoe.com>\n"
+"RSA-1024 0x624ACAD5 1997-01-26                    Sign & Encrypt\n"
+"Fingerprint16 = 32 EC A7 B6 AC DB 65 A6  F6 F6 55 DD 1C DC FF 61\n"
+"\n"
+msgstr ""
+"Carlo Wood, Run on IRC <carlo@@alinoe.com>\n"
+"RSA-1024 0x624ACAD5 1997-01-26                    Sign & Encrypt\n"
+"Fingerprint16 = 32 EC A7 B6 AC DB 65 A6  F6 F6 55 DD 1C DC FF 61\n"
+"\n"
+
+#. type: format
+#: original/texi/which.texi:31
+#, no-wrap
+msgid ""
+"Permission is granted to make and distribute verbatim copies of\n"
+"this manual provided the copyright notice and this permission notice\n"
+"are preserved on all copies.\n"
+msgstr ""
+"Permission is granted to make and distribute verbatim copies of\n"
+"this manual provided the copyright notice and this permission notice\n"
+"are preserved on all copies.\n"
+
+#. type: title
+#: original/texi/which.texi:51
+#, no-wrap
+msgid "Which"
+msgstr "Which"
+
+#. type: subtitle
+#: original/texi/which.texi:52
+#, no-wrap
+msgid "Show the full path of commands"
+msgstr "コマンドのフルパス表示"
+
+#. type: subtitle
+#: original/texi/which.texi:54
+#, no-wrap
+msgid "Edition @value{EDITION}, for Which Version @value{VERSION}"
+msgstr "編集版 @value{EDITION}, Which バージョン @value{VERSION}"
+
+#. type: subtitle
+#: original/texi/which.texi:55
+#, no-wrap
+msgid "@value{UPDATED}"
+msgstr "@value{UPDATED}"
+
+#. type: author
+#: original/texi/which.texi:57
+#, no-wrap
+msgid "Carlo Wood <@email{carlo@@gnu.org}>"
+msgstr "Carlo Wood <@email{carlo@@gnu.org}>"
+
+#. type: titlepage
+#: original/texi/which.texi:62
+msgid "Copyright @copyright{} 2000 - 2015, by"
+msgstr "Copyright @copyright{} 2000 - 2015, by"
+
+#. type: titlepage
+#: original/texi/which.texi:66
+msgid ""
+"Carlo Wood, Run on IRC <carlo@@alinoe.com> RSA-1024 0x624ACAD5 1997-01-26 "
+"Sign & Encrypt Fingerprint16 = 32 EC A7 B6 AC DB 65 A6 F6 F6 55 DD 1C DC FF "
+"61"
+msgstr ""
+"Carlo Wood, Run on IRC <carlo@@alinoe.com> RSA-1024 0x624ACAD5 1997-01-26 "
+"Sign & Encrypt Fingerprint16 = 32 EC A7 B6 AC DB 65 A6 F6 F6 55 DD 1C DC FF "
+"61"
+
+#. type: node
+#: original/texi/which.texi:70
+#: original/texi/which.texi:95
+#: original/texi/which.texi:108
+#: original/texi/which.texi:126
+#: original/texi/which.texi:208
+#: original/texi/which.texi:217
+#: original/texi/which.texi:261
+#: original/texi/which.texi:273
+#: original/texi/which.texi:280
+#, no-wrap
+msgid "Top"
+msgstr "Top"
+
+#. type: node
+#: original/texi/which.texi:70
+#: original/texi/which.texi:93
+#: original/texi/which.texi:95
+#: original/texi/which.texi:108
+#, no-wrap
+msgid "Which Program"
+msgstr "which プログラム"
+
+#. type: node
+#: original/texi/which.texi:70
+#, no-wrap
+msgid "(dir)"
+msgstr "(dir)"
+
+#. type: top
+#: original/texi/which.texi:71
+#, no-wrap
+msgid "@command{which}: Show the full path of commands"
+msgstr "@command{which}: コマンドのフルパス表示"
+
+#. type: ifinfo
+#: original/texi/which.texi:79
+msgid "The @command{which} program shows the full path of (shell) commands."
+msgstr "@command{which} プログラムは（シェル）コマンドのフルパスを表示します。"
+
+#. type: ifinfo
+#: original/texi/which.texi:82
+msgid ""
+"This file documents @command{which} version @value{VERSION}, updated "
+"@value{UPDATED}."
+msgstr ""
+"This file documents @command{which} version @value{VERSION}, updated "
+"@value{UPDATED}."
+
+#. type: chapter
+#: original/texi/which.texi:93
+#: original/texi/which.texi:96
+#, no-wrap
+msgid "The @command{which} Program"
+msgstr "@command{which} プログラム"
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:95
+#: original/texi/which.texi:108
+#: original/texi/which.texi:126
+#, no-wrap
+msgid "Invoking Which"
+msgstr "which の起動"
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "How to invoke @command{which}"
+msgstr "@command{which} の起動方法"
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:108
+#: original/texi/which.texi:124
+#: original/texi/which.texi:126
+#: original/texi/which.texi:127
+#: original/texi/which.texi:208
+#, no-wrap
+msgid "Option Summary"
+msgstr "オプションの概要"
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "Overview of commandline options"
+msgstr "コマンドラインオプションの概要"
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:126
+#: original/texi/which.texi:208
+#: original/texi/which.texi:209
+#: original/texi/which.texi:217
+#, no-wrap
+msgid "Return Value"
+msgstr "返り値"
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "The return value of @command{which}"
+msgstr "@command{which} が返す値"
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:208
+#: original/texi/which.texi:217
+#: original/texi/which.texi:218
+#: original/texi/which.texi:261
+#, no-wrap
+msgid "Example"
+msgstr "例"
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "Examples of invokation"
+msgstr "コマンドの実行例"
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:217
+#: original/texi/which.texi:261
+#: original/texi/which.texi:262
+#: original/texi/which.texi:273
+#, no-wrap
+msgid "Bugs"
+msgstr "バグ"
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "Known bugs"
+msgstr "既知のバグ"
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:261
+#: original/texi/which.texi:273
+#: original/texi/which.texi:274
+#: original/texi/which.texi:280
+#, no-wrap
+msgid "See Also"
+msgstr "関連項目"
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "Related UNIX commands"
+msgstr "関連する UNIX コマンド"
+
+#. type: unnumbered
+#: original/texi/which.texi:93
+#: original/texi/which.texi:273
+#: original/texi/which.texi:280
+#: original/texi/which.texi:282
+#, no-wrap
+msgid "Index"
+msgstr "さくいん"
+
+#. type: cindex
+#: original/texi/which.texi:97
+#, no-wrap
+msgid "Description of @command{which}"
+msgstr "Description of @command{which}"
+
+#. type: Plain text
+#: original/texi/which.texi:107
+msgid ""
+"@command{Which} takes one or more arguments. For each of its arguments it "
+"prints to stdout the full path of the executables that would have been "
+"executed when this argument had been entered at the shell prompt. It does "
+"this by searching for an executable or script in the directories listed in "
+"the environment variable @env{PATH} using the same algorithm as "
+"@command{bash(1)}."
+msgstr ""
+"@command{which} は 1 つまたは複数の引数を取ります。"
+"その引数それぞれに対して、その引数がシェルプロンプトから入力された際に、実行されることになる実行モジュールの"
+"フルパスを stdout に出力します。 "
+"これを実現する際には、環境変数 @env{PATH} に列記されたディレクトリ内から実行ファイルやスクリプトを検索します。 "
+"これは @command{bash(1)} と同じアルゴリズムを用いています。"
+
+#. type: cindex
+#: original/texi/which.texi:109
+#: original/texi/which.texi:110
+#, no-wrap
+msgid "Invoking @command{which}"
+msgstr "@command{which} の実行"
+
+#. type: cindex
+#: original/texi/which.texi:111
+#, no-wrap
+msgid "Synopsis"
+msgstr "Synopsis"
+
+#. type: Plain text
+#: original/texi/which.texi:115
+msgid "The synopsis to invoke @command{which} is"
+msgstr "@command{which} の実行書式は以下のとおりです。"
+
+#. type: example
+#: original/texi/which.texi:119
+#, no-wrap
+msgid "which [options] [--] programname [...]\n"
+msgstr "which [options] [--] programname [...]\n"
+
+#. type: menuentry
+#: original/texi/which.texi:124
+msgid "Option summary"
+msgstr "オプション概要"
+
+#. type: cindex
+#: original/texi/which.texi:128
+#, no-wrap
+msgid "Options, command line"
+msgstr "Options, command line"
+
+#. type: cindex
+#: original/texi/which.texi:129
+#, no-wrap
+msgid "Command line Options"
+msgstr "Command line Options"
+
+#. type: cindex
+#: original/texi/which.texi:130
+#, no-wrap
+msgid "Overview of command line options"
+msgstr "Overview of command line options"
+
+#. type: item
+#: original/texi/which.texi:134
+#: original/texi/which.texi:136
+#, no-wrap
+msgid "--all"
+msgstr "--all"
+
+#. type: itemx
+#: original/texi/which.texi:135
+#: original/texi/which.texi:137
+#, no-wrap
+msgid "-a"
+msgstr "-a"
+
+#. type: table
+#: original/texi/which.texi:139
+msgid "Print all matching executables in @env{PATH}, not just the first."
+msgstr "@env{PATH} において見つかった実行ファイルをすべて表示します。"
+"最初に見つかった一つだけではありません。"
+
+#. type: item
+#: original/texi/which.texi:140
+#: original/texi/which.texi:142
+#, no-wrap
+msgid "--read-alias"
+msgstr "--read-alias"
+
+#. type: itemx
+#: original/texi/which.texi:141
+#: original/texi/which.texi:143
+#, no-wrap
+msgid "-i"
+msgstr "-i"
+
+#. type: table
+#: original/texi/which.texi:148
+msgid ""
+"Read aliases from stdin, reporting matching ones on stdout. This is useful "
+"in combination with using an alias for which itself. For example@* "
+"@code{alias which='alias | which -i'}."
+msgstr ""
+"標準入力からエイリアスを読み込んで、合致したものを標準出力します。 "
+"これは which そのものを含む alias において、本オプションを合わせて利用すると便利です。 "
+"たとえば以下です。@* "
+"@code{alias which='alias | which -i'}"
+
+#. type: item
+#: original/texi/which.texi:149
+#: original/texi/which.texi:150
+#, no-wrap
+msgid "--skip-alias"
+msgstr "--skip-alias"
+
+#. type: table
+#: original/texi/which.texi:154
+msgid ""
+"Ignore option @option{--read-alias}, if any. This is useful to explicity "
+"search for normal binaries, while using the @option{--read-alias} option in "
+"an alias or function for which."
+msgstr ""
+"@option{--read-alias} が指定されても無視します。"
+"which に対するエイリアスや関数の中で @option{--read-alias} オプションを利用している場合であっても、"
+"明示的に通常の実行ファイルを検索する場合に利用できます。"
+
+#. type: item
+#: original/texi/which.texi:155
+#: original/texi/which.texi:156
+#, no-wrap
+msgid "--read-functions"
+msgstr "--read-functions"
+
+#. type: table
+#: original/texi/which.texi:161
+msgid ""
+"Read shell function definitions from stdin, reporting matching ones on "
+"stdout. This is useful in combination with using a shell function for which "
+"itself.  For example:@* @code{which() @{ declare -f | which --read-functions "
+"$@@ @}@*export -f which}"
+msgstr ""
+"標準入力からシェル関数定義を読み込んで、合致したものを標準出力します。"
+"これは which そのものを含むシェル関数において、本オプションを合わせて利用すると便利です。"
+"たとえば以下です。@* @code{which() @{ declare -f | which --read-functions "
+"$@@ @}@*export -f which}"
+
+#. type: item
+#: original/texi/which.texi:162
+#: original/texi/which.texi:163
+#, no-wrap
+msgid "--skip-functions"
+msgstr "--skip-functions"
+
+#. type: table
+#: original/texi/which.texi:167
+msgid ""
+"Ignore option @option{--read-functions}, if any. This is useful to explicity "
+"search for normal binaries, while using the @option{--read-functions} option "
+"in an alias or function for which."
+msgstr ""
+"@option{--read-functions} が指定されても無視します。"
+"which に対するエイリアスや関数の中で @option{--read-functions} オプションを利用している場合であっても、"
+"明示的に通常の実行ファイルを検索する場合に利用できます。"
+
+#. type: item
+#: original/texi/which.texi:168
+#: original/texi/which.texi:169
+#, no-wrap
+msgid "--skip-dot"
+msgstr "--skip-dot"
+
+#. type: table
+#: original/texi/which.texi:171
+msgid "Skip directories in @env{PATH} that start with a dot."
+msgstr "@env{PATH} 内のディレクトリにうち、ドットで始まるディレクトリは除外します。"
+
+#. type: item
+#: original/texi/which.texi:172
+#: original/texi/which.texi:173
+#, no-wrap
+msgid "--skip-tilde"
+msgstr "--skip-tilde"
+
+#. type: table
+#: original/texi/which.texi:176
+msgid ""
+"Skip directories in @env{PATH} that start with a tilde and executables which "
+"reside in the @env{HOME} directory."
+msgstr ""
+"チルダで始まる @env{PATH} 内のディレクトリ、"
+"および @env{HOME} ディレクトリ内に存在する実行ファイルは除外します。"
+
+#. type: item
+#: original/texi/which.texi:177
+#: original/texi/which.texi:178
+#, no-wrap
+msgid "--show-dot"
+msgstr "--show-dot"
+
+#. type: table
+#: original/texi/which.texi:182
+msgid ""
+"If a directory in @env{PATH} starts with a dot and a matching executable was "
+"found for that path, then print \"./programname\" rather than the full path."
+msgstr ""
+"@env{PATH} 内にドットで始まるディレクトリがあって、"
+"合致した実行ファイルがその中に見つかった場合には、"
+"フルパスでなく \"./programname\" と表示します。"
+
+#. type: item
+#: original/texi/which.texi:183
+#: original/texi/which.texi:184
+#, no-wrap
+msgid "--show-tilde"
+msgstr "--show-tilde"
+
+#. type: table
+#: original/texi/which.texi:188
+msgid ""
+"Output a tilde when a directory matches the @env{HOME} directory. This "
+"option is ignored when which is invoked as root."
+msgstr ""
+"ディレクトリが @env{HOME} に合致した場合、チルダを表示します。 "
+"このオプションは root ユーザーが実行した際には無視されます。 "
+
+#. type: item
+#: original/texi/which.texi:189
+#: original/texi/which.texi:190
+#, no-wrap
+msgid "--tty-only"
+msgstr "--tty-only"
+
+#. type: table
+#: original/texi/which.texi:192
+msgid "Stop processing options on the right if not on tty."
+msgstr "tty 上でない場合、この右側に指定されたオプションの実行を停止します。"
+
+#. type: option{#1}
+#: original/texi/which.texi:193
+#, no-wrap
+msgid "--version"
+msgstr "--version"
+
+#. type: option{#1}
+#: original/texi/which.texi:194
+#, no-wrap
+msgid "-v"
+msgstr "-v"
+
+#. type: option{#1}
+#: original/texi/which.texi:195
+#, no-wrap
+msgid "-V"
+msgstr "-V"
+
+#. type: item
+#: original/texi/which.texi:196
+#, no-wrap
+msgid "--version, -v, -V"
+msgstr "--version, -v, -V"
+
+#. type: table
+#: original/texi/which.texi:199
+msgid "Print version information on standard output then exit successfully."
+msgstr "バージョン情報を標準出力して正常終了します。"
+
+#. type: item
+#: original/texi/which.texi:200
+#: original/texi/which.texi:201
+#, no-wrap
+msgid "--help"
+msgstr "--help"
+
+#. type: table
+#: original/texi/which.texi:204
+msgid "Print usage information on standard output then exit successfully."
+msgstr "利用方法を標準出力して正常終了します。"
+
+#. type: cindex
+#: original/texi/which.texi:210
+#, no-wrap
+msgid "Return value of @command{which}"
+msgstr "Return value of @command{which}"
+
+#. type: Plain text
+#: original/texi/which.texi:216
+msgid ""
+"@command{Which} returns the number of failed arguments, or -1 when no "
+"@file{programname} was given."
+msgstr ""
+"@command{which} は、処理に失敗した引数の数を返します。"
+"また @file{programname} が指定されなかった場合は -1 を返します。"
+
+#. type: cindex
+#: original/texi/which.texi:219
+#, no-wrap
+msgid "Examples"
+msgstr "Examples"
+
+#. type: cindex
+#: original/texi/which.texi:220
+#, no-wrap
+msgid "aliases, handling of"
+msgstr "aliases, handling of"
+
+#. type: Plain text
+#: original/texi/which.texi:225
+msgid ""
+"The recommended way to use this utility is by adding an alias (C shell)  or "
+"shell function (Bourne shell) for @command{which} like the following:"
+msgstr ""
+"本ユーティリティーを利用するには、@command{which} に対して、"
+"エイリアスを追加する (C シェルの場合) 、"
+"あるいはシェル関数を追加する (Bourne シェル) 方法が推奨されます。"
+"たとえば以下のようにします。"
+
+#. type: Plain text
+#: original/texi/which.texi:227
+msgid "[ba]sh:"
+msgstr "[ba]sh:"
+
+#. type: group
+#: original/texi/which.texi:235
+#, no-wrap
+msgid ""
+"which ()\n"
+"@{\n"
+"  (alias; declare -f) | /usr/bin/which --tty-only --read-alias --read-functions --show-tilde --show-dot $@@\n"
+"@}\n"
+"export -f which\n"
+msgstr ""
+"which ()\n"
+"@{\n"
+"  (alias; declare -f) | /usr/bin/which --tty-only --read-alias --read-functions --show-tilde --show-dot $@@\n"
+"@}\n"
+"export -f which\n"
+
+#. type: Plain text
+#: original/texi/which.texi:239
+msgid "[t]csh:"
+msgstr "[t]csh:"
+
+#. type: group
+#: original/texi/which.texi:243
+#, no-wrap
+msgid "alias which 'alias | /usr/bin/which --tty-only --read-alias --show-dot --show-tilde'\n"
+msgstr "alias which 'alias | /usr/bin/which --tty-only --read-alias --show-dot --show-tilde'\n"
+
+#. type: Plain text
+#: original/texi/which.texi:250
+msgid ""
+"This will print the readable ~/ and ./ when starting which from your prompt, "
+"while still printing the full path when used from a script:"
+msgstr ""
+"この方法にすると、端末から起動した際には、わかりやすく ~/ や ./ を表示します。"
+"一方でスクリプトから実行した際には、フルパスを表示します。"
+
+#. type: group
+#: original/texi/which.texi:257
+#, no-wrap
+msgid ""
+"> which q2\n"
+"~/bin/q2\n"
+"> echo `which q2`\n"
+"/home/carlo/bin/q2\n"
+msgstr ""
+"> which q2\n"
+"~/bin/q2\n"
+"> echo `which q2`\n"
+"/home/carlo/bin/q2\n"
+
+#. type: cindex
+#: original/texi/which.texi:263
+#, no-wrap
+msgid "Bugs, known"
+msgstr "Bugs, known"
+
+#. type: Plain text
+#: original/texi/which.texi:272
+msgid ""
+"The @env{HOME} directory is determined by looking for the @env{HOME} "
+"environment variable, which aborts when this variable doesn't exist.  "
+"@command{Which} will consider two equivalent directories to be different "
+"when one of them contains a path with a symbolic link."
+msgstr ""
+"@env{HOME} ディレクトリは、環境変数 @env{HOME} を調べることで決定されますが、"
+"この変数が存在しない場合には、その処理がキャンセルされます。"
+"@command{which} は 2 つの同等のディレクトリであっても、その 1 つにシンボリック"
+"リンクを使ったパスが含まれている場合に、別のディレクトリと取り扱ってしまいます。"
+
+#. type: command{#1}
+#: original/texi/which.texi:279
+msgid "bash(1)"
+msgstr "bash(1)"
diff --git a/info/GNU_which/po4a/texi/which-texi.cfg b/info/GNU_which/po4a/texi/which-texi.cfg
new file mode 100644
index 00000000..4c0ba1e1
--- /dev/null
+++ b/info/GNU_which/po4a/texi/which-texi.cfg
@@ -0,0 +1,6 @@
+[po4a_langs] ja
+[po4a_paths] po4a/texi/which-texi.pot $lang:po4a/texi/ja.po
+
+[type: texinfo] original/texi/which.texi   $lang:draft/texi/which.texi \
+	add_$lang:po4a/texi/adddocumentlanguage.txt
+[type: texinfo] original/texi/version.texi $lang:draft/texi/version.texi
diff --git a/info/GNU_which/po4a/texi/which-texi.pot b/info/GNU_which/po4a/texi/which-texi.pot
new file mode 100644
index 00000000..3fc99c9d
--- /dev/null
+++ b/info/GNU_which/po4a/texi/which-texi.pot
@@ -0,0 +1,633 @@
+# SOME DESCRIPTIVE TITLE
+# Copyright (C) YEAR Free Software Foundation, Inc.
+# This file is distributed under the same license as the PACKAGE package.
+# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n"
+"POT-Creation-Date: 2021-07-12 13:00+0900\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME <EMAIL@ADDRESS>\n"
+"Language-Team: LANGUAGE <LL@li.org>\n"
+"Language: \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#. type: settitle
+#: original/texi/which.texi:4
+#, no-wrap
+msgid "@command{which}: show full path of commands"
+msgstr ""
+
+#. type: include
+#: original/texi/which.texi:5
+#, no-wrap
+msgid "version.texi"
+msgstr ""
+
+#. type: dircategory
+#: original/texi/which.texi:6
+#, no-wrap
+msgid "System administration"
+msgstr ""
+
+#. type: menuentry
+#: original/texi/which.texi:9
+msgid "Which: (which)"
+msgstr ""
+
+#. type: menuentry
+#: original/texi/which.texi:9
+msgid "Show full path of commands."
+msgstr ""
+
+#. type: format
+#: original/texi/which.texi:20
+#, no-wrap
+msgid ""
+"This file documents `which' version 2.x@.\n"
+"\n"
+msgstr ""
+
+#. type: format
+#: original/texi/which.texi:23
+#, no-wrap
+msgid ""
+"Copyright @copyright{} 2000 - 2015, by\n"
+"\n"
+msgstr ""
+
+#. type: format
+#: original/texi/which.texi:27
+#, no-wrap
+msgid ""
+"Carlo Wood, Run on IRC <carlo@@alinoe.com>\n"
+"RSA-1024 0x624ACAD5 1997-01-26                    Sign & Encrypt\n"
+"Fingerprint16 = 32 EC A7 B6 AC DB 65 A6  F6 F6 55 DD 1C DC FF 61\n"
+"\n"
+msgstr ""
+
+#. type: format
+#: original/texi/which.texi:31
+#, no-wrap
+msgid ""
+"Permission is granted to make and distribute verbatim copies of\n"
+"this manual provided the copyright notice and this permission notice\n"
+"are preserved on all copies.\n"
+msgstr ""
+
+#. type: title
+#: original/texi/which.texi:51
+#, no-wrap
+msgid "Which"
+msgstr ""
+
+#. type: subtitle
+#: original/texi/which.texi:52
+#, no-wrap
+msgid "Show the full path of commands"
+msgstr ""
+
+#. type: subtitle
+#: original/texi/which.texi:54
+#, no-wrap
+msgid "Edition @value{EDITION}, for Which Version @value{VERSION}"
+msgstr ""
+
+#. type: subtitle
+#: original/texi/which.texi:55
+#, no-wrap
+msgid "@value{UPDATED}"
+msgstr ""
+
+#. type: author
+#: original/texi/which.texi:57
+#, no-wrap
+msgid "Carlo Wood <@email{carlo@@gnu.org}>"
+msgstr ""
+
+#. type: titlepage
+#: original/texi/which.texi:62
+msgid "Copyright @copyright{} 2000 - 2015, by"
+msgstr ""
+
+#. type: titlepage
+#: original/texi/which.texi:66
+msgid ""
+"Carlo Wood, Run on IRC <carlo@@alinoe.com> RSA-1024 0x624ACAD5 1997-01-26 "
+"Sign & Encrypt Fingerprint16 = 32 EC A7 B6 AC DB 65 A6 F6 F6 55 DD 1C DC FF "
+"61"
+msgstr ""
+
+#. type: node
+#: original/texi/which.texi:70
+#: original/texi/which.texi:95
+#: original/texi/which.texi:108
+#: original/texi/which.texi:126
+#: original/texi/which.texi:208
+#: original/texi/which.texi:217
+#: original/texi/which.texi:261
+#: original/texi/which.texi:273
+#: original/texi/which.texi:280
+#, no-wrap
+msgid "Top"
+msgstr ""
+
+#. type: node
+#: original/texi/which.texi:70
+#: original/texi/which.texi:93
+#: original/texi/which.texi:95
+#: original/texi/which.texi:108
+#, no-wrap
+msgid "Which Program"
+msgstr ""
+
+#. type: node
+#: original/texi/which.texi:70
+#, no-wrap
+msgid "(dir)"
+msgstr ""
+
+#. type: top
+#: original/texi/which.texi:71
+#, no-wrap
+msgid "@command{which}: Show the full path of commands"
+msgstr ""
+
+#. type: ifinfo
+#: original/texi/which.texi:79
+msgid "The @command{which} program shows the full path of (shell) commands."
+msgstr ""
+
+#. type: ifinfo
+#: original/texi/which.texi:82
+msgid ""
+"This file documents @command{which} version @value{VERSION}, updated "
+"@value{UPDATED}."
+msgstr ""
+
+#. type: chapter
+#: original/texi/which.texi:93
+#: original/texi/which.texi:96
+#, no-wrap
+msgid "The @command{which} Program"
+msgstr ""
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:95
+#: original/texi/which.texi:108
+#: original/texi/which.texi:126
+#, no-wrap
+msgid "Invoking Which"
+msgstr ""
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "How to invoke @command{which}"
+msgstr ""
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:108
+#: original/texi/which.texi:124
+#: original/texi/which.texi:126
+#: original/texi/which.texi:127
+#: original/texi/which.texi:208
+#, no-wrap
+msgid "Option Summary"
+msgstr ""
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "Overview of commandline options"
+msgstr ""
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:126
+#: original/texi/which.texi:208
+#: original/texi/which.texi:209
+#: original/texi/which.texi:217
+#, no-wrap
+msgid "Return Value"
+msgstr ""
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "The return value of @command{which}"
+msgstr ""
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:208
+#: original/texi/which.texi:217
+#: original/texi/which.texi:218
+#: original/texi/which.texi:261
+#, no-wrap
+msgid "Example"
+msgstr ""
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "Examples of invokation"
+msgstr ""
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:217
+#: original/texi/which.texi:261
+#: original/texi/which.texi:262
+#: original/texi/which.texi:273
+#, no-wrap
+msgid "Bugs"
+msgstr ""
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "Known bugs"
+msgstr ""
+
+#. type: node
+#: original/texi/which.texi:93
+#: original/texi/which.texi:261
+#: original/texi/which.texi:273
+#: original/texi/which.texi:274
+#: original/texi/which.texi:280
+#, no-wrap
+msgid "See Also"
+msgstr ""
+
+#. type: menuentry
+#: original/texi/which.texi:93
+msgid "Related UNIX commands"
+msgstr ""
+
+#. type: unnumbered
+#: original/texi/which.texi:93
+#: original/texi/which.texi:273
+#: original/texi/which.texi:280
+#: original/texi/which.texi:282
+#, no-wrap
+msgid "Index"
+msgstr ""
+
+#. type: cindex
+#: original/texi/which.texi:97
+#, no-wrap
+msgid "Description of @command{which}"
+msgstr ""
+
+#. type: Plain text
+#: original/texi/which.texi:107
+msgid ""
+"@command{Which} takes one or more arguments. For each of its arguments it "
+"prints to stdout the full path of the executables that would have been "
+"executed when this argument had been entered at the shell prompt. It does "
+"this by searching for an executable or script in the directories listed in "
+"the environment variable @env{PATH} using the same algorithm as "
+"@command{bash(1)}."
+msgstr ""
+
+#. type: cindex
+#: original/texi/which.texi:109
+#: original/texi/which.texi:110
+#, no-wrap
+msgid "Invoking @command{which}"
+msgstr ""
+
+#. type: cindex
+#: original/texi/which.texi:111
+#, no-wrap
+msgid "Synopsis"
+msgstr ""
+
+#. type: Plain text
+#: original/texi/which.texi:115
+msgid "The synopsis to invoke @command{which} is"
+msgstr ""
+
+#. type: example
+#: original/texi/which.texi:119
+#, no-wrap
+msgid "which [options] [--] programname [...]\n"
+msgstr ""
+
+#. type: menuentry
+#: original/texi/which.texi:124
+msgid "Option summary"
+msgstr ""
+
+#. type: cindex
+#: original/texi/which.texi:128
+#, no-wrap
+msgid "Options, command line"
+msgstr ""
+
+#. type: cindex
+#: original/texi/which.texi:129
+#, no-wrap
+msgid "Command line Options"
+msgstr ""
+
+#. type: cindex
+#: original/texi/which.texi:130
+#, no-wrap
+msgid "Overview of command line options"
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:134
+#: original/texi/which.texi:136
+#, no-wrap
+msgid "--all"
+msgstr ""
+
+#. type: itemx
+#: original/texi/which.texi:135
+#: original/texi/which.texi:137
+#, no-wrap
+msgid "-a"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:139
+msgid "Print all matching executables in @env{PATH}, not just the first."
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:140
+#: original/texi/which.texi:142
+#, no-wrap
+msgid "--read-alias"
+msgstr ""
+
+#. type: itemx
+#: original/texi/which.texi:141
+#: original/texi/which.texi:143
+#, no-wrap
+msgid "-i"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:148
+msgid ""
+"Read aliases from stdin, reporting matching ones on stdout. This is useful "
+"in combination with using an alias for which itself. For example@* "
+"@code{alias which='alias | which -i'}."
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:149
+#: original/texi/which.texi:150
+#, no-wrap
+msgid "--skip-alias"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:154
+msgid ""
+"Ignore option @option{--read-alias}, if any. This is useful to explicity "
+"search for normal binaries, while using the @option{--read-alias} option in "
+"an alias or function for which."
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:155
+#: original/texi/which.texi:156
+#, no-wrap
+msgid "--read-functions"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:161
+msgid ""
+"Read shell function definitions from stdin, reporting matching ones on "
+"stdout. This is useful in combination with using a shell function for which "
+"itself.  For example:@* @code{which() @{ declare -f | which --read-functions "
+"$@@ @}@*export -f which}"
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:162
+#: original/texi/which.texi:163
+#, no-wrap
+msgid "--skip-functions"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:167
+msgid ""
+"Ignore option @option{--read-functions}, if any. This is useful to explicity "
+"search for normal binaries, while using the @option{--read-functions} option "
+"in an alias or function for which."
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:168
+#: original/texi/which.texi:169
+#, no-wrap
+msgid "--skip-dot"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:171
+msgid "Skip directories in @env{PATH} that start with a dot."
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:172
+#: original/texi/which.texi:173
+#, no-wrap
+msgid "--skip-tilde"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:176
+msgid ""
+"Skip directories in @env{PATH} that start with a tilde and executables which "
+"reside in the @env{HOME} directory."
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:177
+#: original/texi/which.texi:178
+#, no-wrap
+msgid "--show-dot"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:182
+msgid ""
+"If a directory in @env{PATH} starts with a dot and a matching executable was "
+"found for that path, then print \"./programname\" rather than the full path."
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:183
+#: original/texi/which.texi:184
+#, no-wrap
+msgid "--show-tilde"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:188
+msgid ""
+"Output a tilde when a directory matches the @env{HOME} directory. This "
+"option is ignored when which is invoked as root."
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:189
+#: original/texi/which.texi:190
+#, no-wrap
+msgid "--tty-only"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:192
+msgid "Stop processing options on the right if not on tty."
+msgstr ""
+
+#. type: option{#1}
+#: original/texi/which.texi:193
+#, no-wrap
+msgid "--version"
+msgstr ""
+
+#. type: option{#1}
+#: original/texi/which.texi:194
+#, no-wrap
+msgid "-v"
+msgstr ""
+
+#. type: option{#1}
+#: original/texi/which.texi:195
+#, no-wrap
+msgid "-V"
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:196
+#, no-wrap
+msgid "--version, -v, -V"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:199
+msgid "Print version information on standard output then exit successfully."
+msgstr ""
+
+#. type: item
+#: original/texi/which.texi:200
+#: original/texi/which.texi:201
+#, no-wrap
+msgid "--help"
+msgstr ""
+
+#. type: table
+#: original/texi/which.texi:204
+msgid "Print usage information on standard output then exit successfully."
+msgstr ""
+
+#. type: cindex
+#: original/texi/which.texi:210
+#, no-wrap
+msgid "Return value of @command{which}"
+msgstr ""
+
+#. type: Plain text
+#: original/texi/which.texi:216
+msgid ""
+"@command{Which} returns the number of failed arguments, or -1 when no "
+"@file{programname} was given."
+msgstr ""
+
+#. type: cindex
+#: original/texi/which.texi:219
+#, no-wrap
+msgid "Examples"
+msgstr ""
+
+#. type: cindex
+#: original/texi/which.texi:220
+#, no-wrap
+msgid "aliases, handling of"
+msgstr ""
+
+#. type: Plain text
+#: original/texi/which.texi:225
+msgid ""
+"The recommended way to use this utility is by adding an alias (C shell)  or "
+"shell function (Bourne shell) for @command{which} like the following:"
+msgstr ""
+
+#. type: Plain text
+#: original/texi/which.texi:227
+msgid "[ba]sh:"
+msgstr ""
+
+#. type: group
+#: original/texi/which.texi:235
+#, no-wrap
+msgid ""
+"which ()\n"
+"@{\n"
+"  (alias; declare -f) | /usr/bin/which --tty-only --read-alias "
+"--read-functions --show-tilde --show-dot $@@\n"
+"@}\n"
+"export -f which\n"
+msgstr ""
+
+#. type: Plain text
+#: original/texi/which.texi:239
+msgid "[t]csh:"
+msgstr ""
+
+#. type: group
+#: original/texi/which.texi:243
+#, no-wrap
+msgid ""
+"alias which 'alias | /usr/bin/which --tty-only --read-alias --show-dot "
+"--show-tilde'\n"
+msgstr ""
+
+#. type: Plain text
+#: original/texi/which.texi:250
+msgid ""
+"This will print the readable ~/ and ./ when starting which from your prompt, "
+"while still printing the full path when used from a script:"
+msgstr ""
+
+#. type: group
+#: original/texi/which.texi:257
+#, no-wrap
+msgid ""
+"> which q2\n"
+"~/bin/q2\n"
+"> echo `which q2`\n"
+"/home/carlo/bin/q2\n"
+msgstr ""
+
+#. type: cindex
+#: original/texi/which.texi:263
+#, no-wrap
+msgid "Bugs, known"
+msgstr ""
+
+#. type: Plain text
+#: original/texi/which.texi:272
+msgid ""
+"The @env{HOME} directory is determined by looking for the @env{HOME} "
+"environment variable, which aborts when this variable doesn't exist.  "
+"@command{Which} will consider two equivalent directories to be different "
+"when one of them contains a path with a symbolic link."
+msgstr ""
+
+#. type: command{#1}
+#: original/texi/which.texi:279
+msgid "bash(1)"
+msgstr ""
diff --git a/info/build-aux/po4a-texi.mk b/info/build-aux/po4a-texi.mk
new file mode 100644
index 00000000..6c257116
--- /dev/null
+++ b/info/build-aux/po4a-texi.mk
@@ -0,0 +1,98 @@
+texi_sources = $(texi_source_main) $(texi_source_others)
+
+original_source_main   = ${addprefix original/texi/,$(texi_source_main)}
+original_source_others = ${addprefix original/texi/,$(texi_source_others)}
+original_sources       = $(original_source_main) $(original_source_others)
+
+ifdef PACKAGE_SUBNAME
+  po_source              = po4a/texi/$(PACKAGE_SUBNAME).po
+  target_htmldir         = draft/html/$(PACKAGE_SUBNAME)
+  target_info            = draft/info/$(PACKAGE_SUBNAME).info
+  target_plaintext       = draft/text/$(PACKAGE_SUBNAME).txt
+  target_pdf             = draft/pdf/$(PACKAGE_SUBNAME).pdf
+  target_pod             = draft/pod/$(PACKAGE_SUBNAME).pod
+else
+  po_source              = po4a/texi/ja.po
+  target_htmldir         = draft/html
+  target_info            = draft/info/$(PACKAGE_NAME).info
+  target_plaintext       = draft/text/$(PACKAGE_NAME).txt
+  target_pdf             = draft/pdf/$(PACKAGE_NAME).pdf
+  target_pod             = draft/pod/$(PACKAGE_NAME).pod
+endif
+
+target_source_main     = ${addprefix draft/texi/,$(texi_source_main)}
+target_source_others   = ${addprefix draft/texi/,$(texi_source_others)}
+target_sources         = $(target_source_main) $(target_source_others)
+
+target_html            = $(target_htmldir)/index.html
+target_man             = draft/man/man1/$(PACKAGE_NAME).1
+
+POTFILE=po4a/texi/$(PACKAGE_NAME)-texi.pot
+ifdef PACKAGE_SUBNAME
+  POFILE=po4a/texi/$(PACKAGE_SUBNAME).po
+else
+  POFILE=po4a/texi/ja.po
+endif
+
+.DEFAULT_GOAL := all
+all: extra_texi info #html text pdf
+
+info: $(target_info)
+$(target_info): $(target_sources)
+	makeinfo -o $@ $(target_source_main)
+#$(target_source_main): $(target_source_others)
+
+original-info: $(original_sources)
+	mkdir -p tmp/info
+	makeinfo -o tmp/info/$(PACKAGE_NAME).info $<
+
+html: $(target_html)
+$(target_html): $(target_sources)
+	makeinfo --html -o $(target_htmldir) $(target_source_main)
+
+text: $(target_plaintext)
+$(target_plaintext): $(target_sources)
+	makeinfo --plaintext -o $@ $(target_source_main)
+
+pdf: $(target_pdf)
+$(target_pdf): texi
+	mkdir -p draft/pdf
+	cd draft/pdf && \
+	  TEXINPUTS=../../../build-aux: PDFTEX=xetex texi2pdf ../../$(target_source_main)
+
+$(target_sources): $(original_sources) $(po_source) $(PO4ACFG)
+	po4a $(PO4AFLAGS) -v --previous $(PO4ACFG)
+	@sed -i -e "s|$(PWD)/||g" $(POTFILE)
+	@sed -i -e "s|$(PWD)/||g" $(POFILE)
+	@sed -i -e "s/\(\\input texinfo\) /\1\-ja /" $(target_source_main)
+	@touch $(target_sources)
+$(po_source):
+	po4a $(PO4AFLAGS) -v --previous $(PO4ACFG)
+	@sed -i -e "s|$(PWD)/||g" $(POTFILE)
+	@sed -i -e "s|$(PWD)/||g" $(POFILE)
+	@sed -i -e "s/\(\\input texinfo\) /\1\-ja /" $(target_source_main)
+	@touch $(target_sources)
+#M#texibuild:
+
+extra_texi::
+
+pod: $(target_pod)
+$(target_pod): $(target_source_main)
+	@mkdir -p $(@D)
+	$(eval VERSION=$(shell grep '^@set VERSION' draft/texi/version.texi | sed -e "s/\@set VERSION //"))
+	@../build-aux/texi2pod.pl -D VERSION="$(VERSION)" $(target_source_main) $@
+
+man: $(target_man)
+$(target_man): $(target_pod)
+	@mkdir -p $(@D)
+	pod2man --center="$(FULL_PACKAGE_NAME)" --release="$(FULL_PACKAGE_NAME) $(PACKAGE_VERSION)" --utf8 $? > $@ || \
+	pod2man --center="$(FULL_PACKAGE_NAME)" --release="$(FULL_PACKAGE_NAME) $(PACKAGE_VERSION)" $? > $@
+
+stat:
+	@echo -n $(po_source)": "
+	@msgfmt --statistics -o /dev/null $(po_source)
+
+clean:
+	rm -f draft/pdf/$(PACKAGE_MAIN).{aux,cp,cps,fn,fns,log,tmp,toc}
+
+.PHONY: all info html text dvi pdf texi texibuild extra_texi pod man stat clean
diff --git a/info/build-aux/texi2pod.pl b/info/build-aux/texi2pod.pl
new file mode 100755
index 00000000..a5f6b2c2
--- /dev/null
+++ b/info/build-aux/texi2pod.pl
@@ -0,0 +1,453 @@
+#! /usr/bin/env perl
+
+#   Copyright (C) 1999-2001, 2003, 2007, 2009-2011, 2015, 2018-2021 Free
+#   Software Foundation, Inc.
+
+# This file is part of GCC.
+
+# GCC is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3, or (at your option)
+# any later version.
+
+# GCC is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with GCC.  If not, see <http://www.gnu.org/licenses/>.
+
+# This does trivial (and I mean _trivial_) conversion of Texinfo
+# markup to Perl POD format.  It's intended to be used to extract
+# something suitable for a manpage from a Texinfo document.
+
+use warnings;
+BEGIN { eval { require warnings; } and warnings->import; }
+
+$output = 0;
+$skipping = 0;
+%sects = ();
+$section = "";
+@icstack = ();
+@endwstack = ();
+@skstack = ();
+@instack = ();
+$shift = "";
+%defs = ();
+$fnno = 1;
+$inf = "";
+$ibase = "";
+
+while ($_ = shift) {
+    if (/^-D(.*)$/) {
+	if ($1 ne "") {
+	    $flag = $1;
+	} else {
+	    $flag = shift;
+	}
+	$value = "";
+	($flag, $value) = ($flag =~ /^([^=]+)(?:=(.+))?/);
+	die "no flag specified for -D\n"
+	    unless $flag ne "";
+	die "flags may only contain letters, digits, hyphens, dashes and underscores\n"
+	    unless $flag =~ /^[a-zA-Z0-9_-]+$/;
+	$defs{$flag} = $value;
+    } elsif (/^-/) {
+	usage();
+    } else {
+	$in = $_, next unless defined $in;
+	$out = $_, next unless defined $out;
+	usage();
+    }
+}
+
+if (defined $in) {
+    $inf = gensym();
+    open($inf, "<$in") or die "opening \"$in\": $!\n";
+    $ibase = $1 if $in =~ m|^(.+)/[^/]+$|;
+} else {
+    $inf = \*STDIN;
+}
+
+if (defined $out) {
+    open(STDOUT, ">$out") or die "opening \"$out\": $!\n";
+}
+
+while(defined $inf) {
+while(<$inf>) {
+    # Certain commands are discarded without further processing.
+    /^\@(?:
+	 [a-z]+index		# @*index: useful only in complete manual
+	 |need			# @need: useful only in printed manual
+	 |(?:end\s+)?group	# @group .. @end group: ditto
+	 |page			# @page: ditto
+	 |node			# @node: useful only in .info file
+	 |(?:end\s+)?ifnottex   # @ifnottex .. @end ifnottex: use contents
+	)\b/x and next;
+
+    chomp;
+
+    # Look for filename and title markers.
+    /^\@setfilename\s+([^.]+)/ and $fn = $1, next;
+    /^\@settitle\s+([^.]+)/ and $tl = postprocess($1), next;
+
+    # Identify a man title but keep only the one we are interested in.
+    /^\@c\s+man\s+title\s+([A-Za-z0-9-]+)\s+(.+)/ and do {
+	if (exists $defs{$1}) {
+	    $fn = $1;
+	    $tl = postprocess($2);
+	}
+	next;
+    };
+
+    # Look for blocks surrounded by @c man begin SECTION ... @c man end.
+    # This really oughta be @ifman ... @end ifman and the like, but such
+    # would require rev'ing all other Texinfo translators.
+    /^\@c\s+man\s+begin\s+([A-Z]+)\s+([A-Za-z0-9-]+)/ and do {
+	$output = 1 if exists $defs{$2};
+        $sect = $1;
+	next;
+    };
+    /^\@c\s+man\s+begin\s+([A-Z]+)/ and $sect = $1, $output = 1, next;
+    /^\@c\s+man\s+end/ and do {
+	$sects{$sect} = "" unless exists $sects{$sect};
+	$sects{$sect} .= postprocess($section);
+	$section = "";
+	$output = 0;
+	next;
+    };
+
+    # handle variables
+    /^\@set\s+([a-zA-Z0-9_-]+)\s*(.*)$/ and do {
+	$defs{$1} = $2;
+	next;
+    };
+    /^\@clear\s+([a-zA-Z0-9_-]+)/ and do {
+	delete $defs{$1};
+	next;
+    };
+
+    next unless $output;
+
+    # Discard comments.  (Can't do it above, because then we'd never see
+    # @c man lines.)
+    /^\@c\b/ and next;
+
+    # End-block handler goes up here because it needs to operate even
+    # if we are skipping.
+    /^\@end\s+([a-z]+)/ and do {
+	# Ignore @end foo, where foo is not an operation which may
+	# cause us to skip, if we are presently skipping.
+	my $ended = $1;
+	next if $skipping && $ended !~ /^(?:ifset|ifclear|ignore|menu|iftex|copying)$/;
+
+	die "\@end $ended without \@$ended at line $.\n" unless defined $endw;
+	die "\@$endw ended by \@end $ended at line $.\n" unless $ended eq $endw;
+
+	$endw = pop @endwstack;
+
+	if ($ended =~ /^(?:ifset|ifclear|ignore|menu|iftex)$/) {
+	    $skipping = pop @skstack;
+	    next;
+	} elsif ($ended =~ /^(?:example|smallexample|display)$/) {
+	    $shift = "";
+	    $_ = "";	# need a paragraph break
+	} elsif ($ended =~ /^(?:itemize|enumerate|[fv]?table)$/) {
+	    $_ = "\n=back\n";
+	    $ic = pop @icstack;
+	} else {
+	    die "unknown command \@end $ended at line $.\n";
+	}
+    };
+
+    # We must handle commands which can cause skipping even while we
+    # are skipping, otherwise we will not process nested conditionals
+    # correctly.
+    /^\@ifset\s+([a-zA-Z0-9_-]+)/ and do {
+	push @endwstack, $endw;
+	push @skstack, $skipping;
+	$endw = "ifset";
+	$skipping = 1 unless exists $defs{$1};
+	next;
+    };
+
+    /^\@ifclear\s+([a-zA-Z0-9_-]+)/ and do {
+	push @endwstack, $endw;
+	push @skstack, $skipping;
+	$endw = "ifclear";
+	$skipping = 1 if exists $defs{$1};
+	next;
+    };
+
+    /^\@(ignore|menu|iftex|copying)\b/ and do {
+	push @endwstack, $endw;
+	push @skstack, $skipping;
+	$endw = $1;
+	$skipping = 1;
+	next;
+    };
+
+    next if $skipping;
+
+    # Character entities.  First the ones that can be replaced by raw text
+    # or discarded outright:
+    s/\@copyright\{\}/(c)/g;
+    s/\@dots\{\}/.../g;
+    s/\@enddots\{\}/..../g;
+    s/\@([.!? ])/$1/g;
+    s/\@[:-]//g;
+    s/\@bullet(?:\{\})?/*/g;
+    s/\@TeX\{\}/TeX/g;
+    s/\@pounds\{\}/\#/g;
+    s/\@minus(?:\{\})?/-/g;
+    s/\\,/,/g;
+
+    # Now the ones that have to be replaced by special escapes
+    # (which will be turned back into text by unmunge())
+    s/&/&amp;/g;
+    s/\@\@/&at;/g;
+    s/\@\{/&lbrace;/g;
+    s/\@\}/&rbrace;/g;
+
+    # Inside a verbatim block, handle @var specially.
+    if ($shift ne "") {
+	s/\@var\{([^\}]*)\}/<$1>/g;
+    }
+
+    # POD doesn't interpret E<> inside a verbatim block.
+    if ($shift eq "") {
+	s/</&lt;/g;
+	s/>/&gt;/g;
+    } else {
+	s/</&LT;/g;
+	s/>/&GT;/g;
+    }
+
+    # Single line command handlers.
+
+    /^\@include\s+(.+)$/ and do {
+	push @instack, $inf;
+	$inf = gensym();
+	$file = postprocess($1);
+
+	# Try cwd and $ibase.
+	open($inf, "<" . $file)
+	    or open($inf, "<" . $ibase . "/" . $file)
+		or die "cannot open $file or $ibase/$file: $!\n";
+	next;
+    };
+
+    /^\@(?:section|unnumbered|unnumberedsec|center)\s+(.+)$/
+	and $_ = "\n=head2 $1\n";
+    /^\@subsection\s+(.+)$/
+	and $_ = "\n=head3 $1\n";
+
+    # Block command handlers:
+    /^\@itemize(?:\s+(\@[a-z]+|\*|-))?/ and do {
+	push @endwstack, $endw;
+	push @icstack, $ic;
+	if (defined $1) {
+	    $ic = $1;
+	} else {
+	    $ic = '@bullet';
+	}
+	$_ = "\n=over 4\n";
+	$endw = "itemize";
+    };
+
+    /^\@enumerate(?:\s+([a-zA-Z0-9]+))?/ and do {
+	push @endwstack, $endw;
+	push @icstack, $ic;
+	if (defined $1) {
+	    $ic = $1 . ".";
+	} else {
+	    $ic = "1.";
+	}
+	$_ = "\n=over 4\n";
+	$endw = "enumerate";
+    };
+
+    /^\@([fv]?table)\s+(\@[a-z]+)/ and do {
+	push @endwstack, $endw;
+	push @icstack, $ic;
+	$endw = $1;
+	$ic = $2;
+	$ic =~ s/\@(?:samp|strong|key|gcctabopt|env)/B/;
+	$ic =~ s/\@(?:code|kbd)/C/;
+	$ic =~ s/\@(?:dfn|var|emph|cite|i)/I/;
+	$ic =~ s/\@(?:file)/F/;
+	$_ = "\n=over 4\n";
+    };
+
+    /^\@((?:small)?example|display)/ and do {
+	push @endwstack, $endw;
+	$endw = $1;
+	$shift = "\t";
+	$_ = "";	# need a paragraph break
+    };
+
+    /^\@itemx?\s*(.+)?$/ and do {
+	if (defined $1) {
+            my $thing = $1;
+            if ($ic =~ /\@asis/) {
+                $_ = "\n=item C<$thing>\n";
+            } else {
+                # Entity escapes prevent munging by the <> processing below.
+                $_ = "\n=item $ic\&LT;$thing\&GT;\n";
+            }
+	} else {
+	    $_ = "\n=item $ic\n";
+	    $ic =~ y/A-Ya-y/B-Zb-z/;
+	    $ic =~ s/(\d+)/$1 + 1/eg;
+	}
+    };
+
+    $section .= $shift.$_."\n";
+}
+# End of current file.
+close($inf);
+$inf = pop @instack;
+}
+
+die "No filename or title\n" unless defined $fn && defined $tl;
+
+$sects{NAME} = "$fn \- $tl\n";
+$sects{FOOTNOTES} .= "=back\n" if exists $sects{FOOTNOTES};
+
+print "=encoding utf-8\n\n";
+
+for $sect (qw(NAME SYNOPSIS DESCRIPTION OPTIONS ENVIRONMENT EXITSTATUS
+           FILES BUGS NOTES FOOTNOTES SEEALSO AUTHOR COPYRIGHT)) {
+    if(exists $sects{$sect}) {
+	$head = $sect;
+	$head =~ s/SEEALSO/SEE ALSO/;
+	$head =~ s/EXITSTATUS/EXIT STATUS/;
+	print "=head1 $head\n\n";
+	print scalar unmunge ($sects{$sect});
+	print "\n";
+    }
+}
+
+sub usage
+{
+    die "usage: $0 [-D toggle...] [infile [outfile]]\n";
+}
+
+sub postprocess
+{
+    local $_ = $_[0];
+
+    # @value{foo} is replaced by whatever 'foo' is defined as.
+    while (m/(\@value\{([a-zA-Z0-9_-]+)\})/g) {
+	if (! exists $defs{$2}) {
+	    print STDERR "Option $2 not defined\n";
+	    s/\Q$1\E//;
+	} else {
+	    $value = $defs{$2};
+	    s/\Q$1\E/$value/;
+	}
+    }
+
+    # Formatting commands.
+    # Temporary escape for @r.
+    s/\@r\{([^\}]*)\}/R<$1>/g;
+    s/\@(?:dfn|var|emph|cite|i)\{([^\}]*)\}/I<$1>/g;
+    s/\@(?:code|kbd)\{([^\}]*)\}/C<$1>/g;
+    s/\@(?:gccoptlist|samp|strong|key|option|env|command|b)\{([^\}]*)\}/B<$1>/g;
+    s/\@sc\{([^\}]*)\}/\U$1/g;
+    s/\@file\{([^\}]*)\}/F<$1>/g;
+    s/\@w\{([^\}]*)\}/S<$1>/g;
+    s/\@(?:dmn|math)\{([^\}]*)\}/$1/g;
+
+    # keep references of the form @ref{...}, print them bold
+    s/\@(?:ref)\{([^\}]*)\}/B<$1>/g;
+
+    # Change double single quotes to double quotes.
+    s/''/"/g;
+    s/``/"/g;
+
+    # Cross references are thrown away, as are @noindent and @refill.
+    # (@noindent is impossible in .pod, and @refill is unnecessary.)
+    # @* is also impossible in .pod; we discard it and any newline that
+    # follows it.  Similarly, our macro @gol must be discarded.
+
+    s/\(?\@xref\{(?:[^\}]*)\}(?:[^.<]|(?:<[^<>]*>))*\.\)?//g;
+    s/\s+\(\@pxref\{(?:[^\}]*)\}\)//g;
+    s/;\s+\@pxref\{(?:[^\}]*)\}//g;
+    s/\@noindent\s*//g;
+    s/\@refill//g;
+    s/\@gol//g;
+    s/\@\*\s*\n?//g;
+
+    # @uref can take one, two, or three arguments, with different
+    # semantics each time.  @url and @email are just like @uref with
+    # one argument, for our purposes.
+    s/\@(?:uref|url|email)\{([^\},]*)\}/&lt;B<$1>&gt;/g;
+    s/\@uref\{([^\},]*),([^\},]*)\}/$2 (C<$1>)/g;
+    s/\@uref\{([^\},]*),([^\},]*),([^\},]*)\}/$3/g;
+
+    # Un-escape <> at this point.
+    s/&LT;/</g;
+    s/&GT;/>/g;
+
+    # Now un-nest all B<>, I<>, R<>.  Theoretically we could have
+    # indefinitely deep nesting; in practice, one level suffices.
+    1 while s/([BIR])<([^<>]*)([BIR])<([^<>]*)>/$1<$2>$3<$4>$1</g;
+
+    # Replace R<...> with bare ...; eliminate empty markup, B<>;
+    # shift white space at the ends of [BI]<...> expressions outside
+    # the expression.
+    s/R<([^<>]*)>/$1/g;
+    s/[BI]<>//g;
+    s/([BI])<(\s+)([^>]+)>/$2$1<$3>/g;
+    s/([BI])<([^>]+?)(\s+)>/$1<$2>$3/g;
+
+    # Extract footnotes.  This has to be done after all other
+    # processing because otherwise the regexp will choke on formatting
+    # inside @footnote.
+    while (/\@footnote/g) {
+	s/\@footnote\{([^\}]+)\}/[$fnno]/;
+	add_footnote($1, $fnno);
+	$fnno++;
+    }
+
+    return $_;
+}
+
+sub unmunge
+{
+    # Replace escaped symbols with their equivalents.
+    local $_ = $_[0];
+
+    s/&lt;/E<lt>/g;
+    s/&gt;/E<gt>/g;
+    s/&lbrace;/\{/g;
+    s/&rbrace;/\}/g;
+    s/&at;/\@/g;
+    s/&amp;/&/g;
+    return $_;
+}
+
+sub add_footnote
+{
+    unless (exists $sects{FOOTNOTES}) {
+	$sects{FOOTNOTES} = "\n=over 4\n\n";
+    }
+
+    $sects{FOOTNOTES} .= "=item $fnno.\n\n"; $fnno++;
+    $sects{FOOTNOTES} .= $_[0];
+    $sects{FOOTNOTES} .= "\n\n";
+}
+
+# stolen from Symbol.pm
+{
+    my $genseq = 0;
+    sub gensym
+    {
+	my $name = "GEN" . $genseq++;
+	my $ref = \*{$name};
+	delete $::{$name};
+	return $ref;
+    }
+}
diff --git a/info/build-aux/texinfo-ja.tex b/info/build-aux/texinfo-ja.tex
new file mode 100644
index 00000000..a2261687
--- /dev/null
+++ b/info/build-aux/texinfo-ja.tex
@@ -0,0 +1,84 @@
+% texinfo-ja.tex -- Japanese texinfo.tex loader
+% Some CJK packages are necessary to load before texinfo.tex.
+%
+% Copyright 2016, 2017 Free Software Foundation, Inc.
+%
+% This program is free software; you can redistribute it and/or modify
+% it under the terms of the GNU General Public License as published by
+% the Free Software Foundation; either version 3 of the license, or (at
+% your option) any later version.
+%
+% This program is distributed in the hope that it will be useful,
+% but WITHOUT ANY WARRANTY; without even the implied warranty of
+% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+% GNU General Public License for more details.
+%
+% You should have received a copy of the GNU General Public License
+% along with this program.  If not, see <http://www.gnu.org/licenses/>.
+%
+% Written by Masamichi Hosoda, 6 May 2016, <trueroad@trueroad.jp>
+
+%
+% For LuaTeX
+%
+\ifx\luatexversion\thisisundefined
+\else
+  % LuaTeX 0.95+ is required.
+  \ifnum\luatexversion<95
+    \errmessage{LuaTeX 0.95+ is required}
+  \fi
+  % LuaTeX-ja: Typeset Japanese with Lua(La)TeX
+  % http://www.ctan.org/tex-archive/macros/luatex/generic/luatexja
+  \openin 1 luatexja.sty \ifeof 1
+    \errmessage{LuaTeX-ja is not found.
+    It is required for Japanese Texinfo files with LuaTeX.
+    http://www.ctan.org/tex-archive/macros/luatex/generic/luatexja
+    It might be contained in texlive-lang-japanese package}
+  \else
+    \input luatexja.sty
+    \def\txijapackage{LaTeX-ja}
+  \fi
+\fi
+
+%
+% For XeTeX
+%
+\ifx\XeTeXrevision\thisisundefined
+\else
+  % XeTeX 0.9998+ is required.
+  \ifnum\strcmp{\the\XeTeXversion\XeTeXrevision}{0.9998}<0
+    \errmessage{XeTeX 0.9998+ is required}
+  \fi
+  % zhspacing: Spacing for mixed CJK-English documents in XeTeX
+  % http://www.ctan.org/tex-archive/macros/xetex/generic/zhspacing
+  %
+  % This package is originally for Chinese,
+  % but can also used in Japanese.
+  %
+  \openin 1 zhspacing.sty \ifeof 1
+    \errmessage{zhspacing is not found.
+    It is required for Japanese Texinfo files with XeTeX.
+    http://www.ctan.org/tex-archive/macros/xetex/generic/zhspacing
+    It might be contained in texlive-lang-chinese.
+    (This package is for Chinese, but can also used in Japanese)}
+  \else
+    \def\zhfont{dummy} % Cancel the request of SimSun font
+    \def\zhpunctfont{dummy} % Cancel the request of SimSun font
+    \input zhspacing.sty
+    \zhspacing
+    \def\txijapackage{zhspacing}
+  \fi
+\fi
+
+%
+% For others
+%
+\ifx\luatexversion\thisisundefined
+  \ifx\XeTeXrevision\thisisundefined
+    \errmessage{The TeX engine is not LuaTeX / XeTeX.
+    LuaTeX / XeTeX is required for Japanese Texinfo files}
+  \fi
+\fi
+
+% Original texinfo.tex, but the modified version!
+\input texinfo-modified.tex
diff --git a/info/build-aux/texinfo-modified.tex b/info/build-aux/texinfo-modified.tex
new file mode 100644
index 00000000..70324f7d
--- /dev/null
+++ b/info/build-aux/texinfo-modified.tex
@@ -0,0 +1,11619 @@
+% texinfo.tex -- TeX macros to handle Texinfo files.
+% 
+% Load plain if necessary, i.e., if running under initex.
+\expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi
+%
+\def\texinfoversion{2021-04-25.21}
+%
+% Copyright 1985, 1986, 1988, 1990-2021 Free Software Foundation, Inc.
+%
+% This texinfo.tex file is free software: you can redistribute it and/or
+% modify it under the terms of the GNU General Public License as
+% published by the Free Software Foundation, either version 3 of the
+% License, or (at your option) any later version.
+%
+% This texinfo.tex file is distributed in the hope that it will be
+% useful, but WITHOUT ANY WARRANTY; without even the implied warranty
+% of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+% General Public License for more details.
+%
+% You should have received a copy of the GNU General Public License
+% along with this program.  If not, see <https://www.gnu.org/licenses/>.
+%
+% As a special exception, when this file is read by TeX when processing
+% a Texinfo source document, you may use the result without
+% restriction. This Exception is an additional permission under section 7
+% of the GNU General Public License, version 3 ("GPLv3").
+%
+% Please try the latest version of texinfo.tex before submitting bug
+% reports; you can get the latest version from:
+%   https://ftp.gnu.org/gnu/texinfo/ (the Texinfo release area), or
+%   https://ftpmirror.gnu.org/texinfo/ (same, via a mirror), or
+%   https://www.gnu.org/software/texinfo/ (the Texinfo home page)
+% The texinfo.tex in any given distribution could well be out
+% of date, so if that's what you're using, please check.
+%
+% Send bug reports to bug-texinfo@gnu.org.  Please include a
+% complete document in each bug report with which we can reproduce the
+% problem.  Patches are, of course, greatly appreciated.
+%
+% To process a Texinfo manual with TeX, it's most reliable to use the
+% texi2dvi shell script that comes with the distribution.  For a simple
+% manual foo.texi, however, you can get away with this:
+%   tex foo.texi
+%   texindex foo.??
+%   tex foo.texi
+%   tex foo.texi
+%   dvips foo.dvi -o  # or whatever; this makes foo.ps.
+% The extra TeX runs get the cross-reference information correct.
+% Sometimes one run after texindex suffices, and sometimes you need more
+% than two; texi2dvi does it as many times as necessary.
+%
+% It is possible to adapt texinfo.tex for other languages, to some
+% extent.  You can get the existing language-specific files from the
+% full Texinfo distribution.
+%
+% The GNU Texinfo home page is https://www.gnu.org/software/texinfo.
+
+
+\message{Loading texinfo [version \texinfoversion]:}
+
+% If in a .fmt file, print the version number
+% and turn on active characters that we couldn't do earlier because
+% they might have appeared in the input file name.
+\everyjob{\message{[Texinfo version \texinfoversion]}%
+  \catcode`+=\active \catcode`\_=\active}
+
+% LaTeX's \typeout.  This ensures that the messages it is used for
+% are identical in format to the corresponding ones from latex/pdflatex.
+\def\typeout{\immediate\write17}%
+
+\chardef\other=12
+
+% We never want plain's \outer definition of \+ in Texinfo.
+% For @tex, we can use \tabalign.
+\let\+ = \relax
+
+% Save some plain tex macros whose names we will redefine.
+\let\ptexb=\b
+\let\ptexbullet=\bullet
+\let\ptexc=\c
+\let\ptexcomma=\,
+\let\ptexdot=\.
+\let\ptexdots=\dots
+\let\ptexend=\end
+\let\ptexequiv=\equiv
+\let\ptexexclam=\!
+\let\ptexfootnote=\footnote
+\let\ptexgtr=>
+\let\ptexhat=^
+\let\ptexi=\i
+\let\ptexindent=\indent
+\let\ptexinsert=\insert
+\let\ptexlbrace=\{
+\let\ptexless=<
+\let\ptexnewwrite\newwrite
+\let\ptexnoindent=\noindent
+\let\ptexplus=+
+\let\ptexraggedright=\raggedright
+\let\ptexrbrace=\}
+\let\ptexslash=\/
+\let\ptexsp=\sp
+\let\ptexstar=\*
+\let\ptexsup=\sup
+\let\ptext=\t
+\let\ptextop=\top
+{\catcode`\'=\active \global\let\ptexquoteright'}% active in plain's math mode
+
+% If this character appears in an error message or help string, it
+% starts a new line in the output.
+\newlinechar = `^^J
+
+% Use TeX 3.0's \inputlineno to get the line number, for better error
+% messages, but if we're using an old version of TeX, don't do anything.
+%
+\ifx\inputlineno\thisisundefined
+  \let\linenumber = \empty % Pre-3.0.
+\else
+  \def\linenumber{l.\the\inputlineno:\space}
+\fi
+
+% Set up fixed words for English if not already set.
+\ifx\putwordAppendix\undefined  \gdef\putwordAppendix{Appendix}\fi
+\ifx\putwordChapter\undefined   \gdef\putwordChapter{Chapter}\fi
+\ifx\putworderror\undefined     \gdef\putworderror{error}\fi
+\ifx\putwordfile\undefined      \gdef\putwordfile{file}\fi
+\ifx\putwordin\undefined        \gdef\putwordin{in}\fi
+\ifx\putwordIndexIsEmpty\undefined       \gdef\putwordIndexIsEmpty{(Index is empty)}\fi
+\ifx\putwordIndexNonexistent\undefined   \gdef\putwordIndexNonexistent{(Index is nonexistent)}\fi
+\ifx\putwordInfo\undefined      \gdef\putwordInfo{Info}\fi
+\ifx\putwordInstanceVariableof\undefined \gdef\putwordInstanceVariableof{Instance Variable of}\fi
+\ifx\putwordMethodon\undefined  \gdef\putwordMethodon{Method on}\fi
+\ifx\putwordNoTitle\undefined   \gdef\putwordNoTitle{No Title}\fi
+\ifx\putwordof\undefined        \gdef\putwordof{of}\fi
+\ifx\putwordon\undefined        \gdef\putwordon{on}\fi
+\ifx\putwordpage\undefined      \gdef\putwordpage{page}\fi
+\ifx\putwordsection\undefined   \gdef\putwordsection{section}\fi
+\ifx\putwordSection\undefined   \gdef\putwordSection{Section}\fi
+\ifx\putwordsee\undefined       \gdef\putwordsee{see}\fi
+\ifx\putwordSee\undefined       \gdef\putwordSee{See}\fi
+\ifx\putwordShortTOC\undefined  \gdef\putwordShortTOC{Short Contents}\fi
+\ifx\putwordTOC\undefined       \gdef\putwordTOC{Table of Contents}\fi
+%
+\ifx\putwordMJan\undefined \gdef\putwordMJan{January}\fi
+\ifx\putwordMFeb\undefined \gdef\putwordMFeb{February}\fi
+\ifx\putwordMMar\undefined \gdef\putwordMMar{March}\fi
+\ifx\putwordMApr\undefined \gdef\putwordMApr{April}\fi
+\ifx\putwordMMay\undefined \gdef\putwordMMay{May}\fi
+\ifx\putwordMJun\undefined \gdef\putwordMJun{June}\fi
+\ifx\putwordMJul\undefined \gdef\putwordMJul{July}\fi
+\ifx\putwordMAug\undefined \gdef\putwordMAug{August}\fi
+\ifx\putwordMSep\undefined \gdef\putwordMSep{September}\fi
+\ifx\putwordMOct\undefined \gdef\putwordMOct{October}\fi
+\ifx\putwordMNov\undefined \gdef\putwordMNov{November}\fi
+\ifx\putwordMDec\undefined \gdef\putwordMDec{December}\fi
+%
+\ifx\putwordDefmac\undefined    \gdef\putwordDefmac{Macro}\fi
+\ifx\putwordDefspec\undefined   \gdef\putwordDefspec{Special Form}\fi
+\ifx\putwordDefvar\undefined    \gdef\putwordDefvar{Variable}\fi
+\ifx\putwordDefopt\undefined    \gdef\putwordDefopt{User Option}\fi
+\ifx\putwordDeffunc\undefined   \gdef\putwordDeffunc{Function}\fi
+
+% Give the space character the catcode for a space.
+\def\spaceisspace{\catcode`\ =10\relax}
+
+% Likewise for ^^M, the end of line character.
+\def\endlineisspace{\catcode13=10\relax}
+
+\chardef\dashChar  = `\-
+\chardef\slashChar = `\/
+\chardef\underChar = `\_
+
+% Ignore a token.
+%
+\def\gobble#1{}
+
+% The following is used inside several \edef's.
+\def\makecsname#1{\expandafter\noexpand\csname#1\endcsname}
+
+% Hyphenation fixes.
+\hyphenation{
+  Flor-i-da Ghost-script Ghost-view Mac-OS Post-Script
+  ap-pen-dix bit-map bit-maps
+  data-base data-bases eshell fall-ing half-way long-est man-u-script
+  man-u-scripts mini-buf-fer mini-buf-fers over-view par-a-digm
+  par-a-digms rath-er rec-tan-gu-lar ro-bot-ics se-vere-ly set-up spa-ces
+  spell-ing spell-ings
+  stand-alone strong-est time-stamp time-stamps which-ever white-space
+  wide-spread wrap-around
+}
+
+% Sometimes it is convenient to have everything in the transcript file
+% and nothing on the terminal.  We don't just call \tracingall here,
+% since that produces some useless output on the terminal.  We also make
+% some effort to order the tracing commands to reduce output in the log
+% file; cf. trace.sty in LaTeX.
+%
+\def\gloggingall{\begingroup \globaldefs = 1 \loggingall \endgroup}%
+\def\loggingall{%
+  \tracingstats2
+  \tracingpages1
+  \tracinglostchars2  % 2 gives us more in etex
+  \tracingparagraphs1
+  \tracingoutput1
+  \tracingmacros2
+  \tracingrestores1
+  \showboxbreadth\maxdimen \showboxdepth\maxdimen
+  \ifx\eTeXversion\thisisundefined\else % etex gives us more logging
+    \tracingscantokens1
+    \tracingifs1
+    \tracinggroups1
+    \tracingnesting2
+    \tracingassigns1
+  \fi
+  \tracingcommands3  % 3 gives us more in etex
+  \errorcontextlines16
+}%
+
+% @errormsg{MSG}.  Do the index-like expansions on MSG, but if things
+% aren't perfect, it's not the end of the world, being an error message,
+% after all.
+% 
+\def\errormsg{\begingroup \indexnofonts \doerrormsg}
+\def\doerrormsg#1{\errmessage{#1}}
+
+% add check for \lastpenalty to plain's definitions.  If the last thing
+% we did was a \nobreak, we don't want to insert more space.
+%
+\def\smallbreak{\ifnum\lastpenalty<10000\par\ifdim\lastskip<\smallskipamount
+  \removelastskip\penalty-50\smallskip\fi\fi}
+\def\medbreak{\ifnum\lastpenalty<10000\par\ifdim\lastskip<\medskipamount
+  \removelastskip\penalty-100\medskip\fi\fi}
+\def\bigbreak{\ifnum\lastpenalty<10000\par\ifdim\lastskip<\bigskipamount
+  \removelastskip\penalty-200\bigskip\fi\fi}
+
+% Output routine
+%
+
+% For a final copy, take out the rectangles
+% that mark overfull boxes (in case you have decided
+% that the text looks ok even though it passes the margin).
+%
+\def\finalout{\overfullrule=0pt }
+
+\newdimen\outerhsize \newdimen\outervsize % set by the paper size routines
+\newdimen\topandbottommargin \topandbottommargin=.75in
+
+% Output a mark which sets \thischapter, \thissection and \thiscolor.
+% We dump everything together because we only have one kind of mark.
+% This works because we only use \botmark / \topmark, not \firstmark.
+%
+% A mark contains a subexpression of the \ifcase ... \fi construct.
+% \get*marks macros below extract the needed part using \ifcase.
+%
+% Another complication is to let the user choose whether \thischapter
+% (\thissection) refers to the chapter (section) in effect at the top
+% of a page, or that at the bottom of a page.
+
+% \domark is called twice inside \chapmacro, to add one
+% mark before the section break, and one after.
+%   In the second call \prevchapterdefs is the same as \currentchapterdefs,
+% and \prevsectiondefs is the same as \currentsectiondefs.
+%   Then if the page is not broken at the mark, some of the previous
+% section appears on the page, and we can get the name of this section
+% from \firstmark for @everyheadingmarks top.
+%   @everyheadingmarks bottom uses \botmark.
+%
+% See page 260 of The TeXbook.
+\def\domark{%
+  \toks0=\expandafter{\currentchapterdefs}%
+  \toks2=\expandafter{\currentsectiondefs}%
+  \toks4=\expandafter{\prevchapterdefs}%
+  \toks6=\expandafter{\prevsectiondefs}%
+  \toks8=\expandafter{\currentcolordefs}%
+  \mark{%
+                   \the\toks0 \the\toks2  % 0: marks for @everyheadingmarks top
+      \noexpand\or \the\toks4 \the\toks6  % 1: for @everyheadingmarks bottom
+    \noexpand\else \the\toks8             % 2: color marks
+  }%
+}
+
+% \gettopheadingmarks, \getbottomheadingmarks,
+% \getcolormarks - extract needed part of mark.
+%
+% \topmark doesn't work for the very first chapter (after the title
+% page or the contents), so we use \firstmark there -- this gets us
+% the mark with the chapter defs, unless the user sneaks in, e.g.,
+% @setcolor (or @url, or @link, etc.) between @contents and the very
+% first @chapter.
+\def\gettopheadingmarks{%
+  \ifcase0\the\savedtopmark\fi
+  \ifx\thischapter\empty \ifcase0\firstmark\fi \fi
+}
+\def\getbottomheadingmarks{\ifcase1\botmark\fi}
+\def\getcolormarks{\ifcase2\the\savedtopmark\fi}
+
+% Avoid "undefined control sequence" errors.
+\def\currentchapterdefs{}
+\def\currentsectiondefs{}
+\def\currentsection{}
+\def\prevchapterdefs{}
+\def\prevsectiondefs{}
+\def\currentcolordefs{}
+
+% Margin to add to right of even pages, to left of odd pages.
+\newdimen\bindingoffset
+\newdimen\normaloffset
+\newdimen\txipagewidth \newdimen\txipageheight
+
+% Main output routine.
+%
+\chardef\PAGE = 255
+\newtoks\defaultoutput
+\defaultoutput = {\savetopmark\onepageout{\pagecontents\PAGE}}
+\output=\expandafter{\the\defaultoutput}
+
+\newbox\headlinebox
+\newbox\footlinebox
+
+% When outputting the double column layout for indices, an output routine
+% is run several times, which hides the original value of \topmark.  This
+% can lead to a page heading being output and duplicating the chapter heading
+% of the index.  Hence, save the contents of \topmark at the beginning of
+% the output routine.  The saved contents are valid until we actually
+% \shipout a page.
+%
+% (We used to run a short output routine to actually set \topmark and 
+% \firstmark to the right values, but if this was called with an empty page 
+% containing whatsits for writing index entries, the whatsits would be thrown 
+% away and the index auxiliary file would remain empty.)
+%
+\newtoks\savedtopmark
+\newif\iftopmarksaved
+\topmarksavedtrue
+\def\savetopmark{%
+  \iftopmarksaved\else
+    \global\savedtopmark=\expandafter{\topmark}%
+    \global\topmarksavedtrue
+  \fi
+}
+
+% \onepageout takes a vbox as an argument.
+% \shipout a vbox for a single page, adding an optional header, footer
+% and footnote.  This also causes index entries for this page to be written
+% to the auxiliary files.
+%
+\def\onepageout#1{%
+  \hoffset=\normaloffset
+  %
+  \ifodd\pageno  \advance\hoffset by \bindingoffset
+  \else \advance\hoffset by -\bindingoffset\fi
+  %
+  \checkchapterpage
+  %
+  % Retrieve the information for the headings from the marks in the page,
+  % and call Plain TeX's \makeheadline and \makefootline, which use the
+  % values in \headline and \footline.
+  %
+  % Common context changes for both heading and footing.
+  % Do this outside of the \shipout so @code etc. will be expanded in
+  % the headline as they should be, not taken literally (outputting ''code).
+  \def\commonheadfootline{\let\hsize=\txipagewidth \texinfochars}
+  %
+  \ifodd\pageno \getoddheadingmarks \else \getevenheadingmarks \fi
+  \global\setbox\headlinebox = \vbox{\commonheadfootline \makeheadline}%
+  \ifodd\pageno \getoddfootingmarks \else \getevenfootingmarks \fi
+  \global\setbox\footlinebox = \vbox{\commonheadfootline \makefootline}%
+  %
+  {%
+    % Set context for writing to auxiliary files like index files.
+    % Have to do this stuff outside the \shipout because we want it to
+    % take effect in \write's, yet the group defined by the \vbox ends
+    % before the \shipout runs.
+    %
+    \atdummies         % don't expand commands in the output.
+    \turnoffactive
+    \shipout\vbox{%
+      % Do this early so pdf references go to the beginning of the page.
+      \ifpdfmakepagedest \pdfdest name{\the\pageno} xyz\fi
+      %
+      \unvbox\headlinebox
+      \pagebody{#1}%
+      \ifdim\ht\footlinebox > 0pt
+        % Only leave this space if the footline is nonempty.
+        % (We lessened \vsize for it in \oddfootingyyy.)
+        % The \baselineskip=24pt in plain's \makefootline has no effect.
+        \vskip 24pt
+        \unvbox\footlinebox
+      \fi
+      %
+    }%
+  }%
+  \global\topmarksavedfalse
+  \advancepageno
+  \ifnum\outputpenalty>-20000 \else\dosupereject\fi
+}
+
+\newinsert\margin \dimen\margin=\maxdimen
+
+% Main part of page, including any footnotes
+\def\pagebody#1{\vbox to\txipageheight{\boxmaxdepth=\maxdepth #1}}
+{\catcode`\@ =11
+\gdef\pagecontents#1{\ifvoid\topins\else\unvbox\topins\fi
+% marginal hacks, juha@viisa.uucp (Juha Takala)
+\ifvoid\margin\else % marginal info is present
+  \rlap{\kern\hsize\vbox to\z@{\kern1pt\box\margin \vss}}\fi
+\dimen@=\dp#1\relax \unvbox#1\relax
+\ifvoid\footins\else\vskip\skip\footins\footnoterule \unvbox\footins\fi
+\ifr@ggedbottom \kern-\dimen@ \vfil \fi}
+}
+
+% Check if we are on the first page of a chapter.  Used for printing headings.
+\newif\ifchapterpage
+\def\checkchapterpage{%
+  % Get the chapter that was current at the end of the last page
+  \ifcase1\the\savedtopmark\fi
+  \let\prevchaptername\thischaptername
+  %
+  \ifodd\pageno \getoddheadingmarks \else \getevenheadingmarks \fi
+  \let\curchaptername\thischaptername
+  %
+  \ifx\curchaptername\prevchaptername
+    \chapterpagefalse
+  \else
+    \chapterpagetrue
+  \fi
+}
+
+% Argument parsing
+
+% Parse an argument, then pass it to #1.  The argument is the rest of
+% the input line (except we remove a trailing comment).  #1 should be a
+% macro which expects an ordinary undelimited TeX argument.
+% For example, \def\foo{\parsearg\fooxxx}.
+%
+\def\parsearg{\parseargusing{}}
+\def\parseargusing#1#2{%
+  \def\argtorun{#2}%
+  \begingroup
+    \obeylines
+    \spaceisspace
+    #1%
+    \parseargline\empty% Insert the \empty token, see \finishparsearg below.
+}
+
+{\obeylines %
+  \gdef\parseargline#1^^M{%
+    \endgroup % End of the group started in \parsearg.
+    \argremovecomment #1\comment\ArgTerm%
+  }%
+}
+
+% First remove any @comment, then any @c comment.  Pass the result on to 
+% \argcheckspaces.
+\def\argremovecomment#1\comment#2\ArgTerm{\argremovec #1\c\ArgTerm}
+\def\argremovec#1\c#2\ArgTerm{\argcheckspaces#1\^^M\ArgTerm}
+
+% Each occurrence of `\^^M' or `<space>\^^M' is replaced by a single space.
+%
+% \argremovec might leave us with trailing space, e.g.,
+%    @end itemize  @c foo
+% This space token undergoes the same procedure and is eventually removed
+% by \finishparsearg.
+%
+\def\argcheckspaces#1\^^M{\argcheckspacesX#1\^^M \^^M}
+\def\argcheckspacesX#1 \^^M{\argcheckspacesY#1\^^M}
+\def\argcheckspacesY#1\^^M#2\^^M#3\ArgTerm{%
+  \def\temp{#3}%
+  \ifx\temp\empty
+    % Do not use \next, perhaps the caller of \parsearg uses it; reuse \temp:
+    \let\temp\finishparsearg
+  \else
+    \let\temp\argcheckspaces
+  \fi
+  % Put the space token in:
+  \temp#1 #3\ArgTerm
+}
+
+% If a _delimited_ argument is enclosed in braces, they get stripped; so
+% to get _exactly_ the rest of the line, we had to prevent such situation.
+% We prepended an \empty token at the very beginning and we expand it now,
+% just before passing the control to \argtorun.
+% (Similarly, we have to think about #3 of \argcheckspacesY above: it is
+% either the null string, or it ends with \^^M---thus there is no danger
+% that a pair of braces would be stripped.
+%
+% But first, we have to remove the trailing space token.
+%
+\def\finishparsearg#1 \ArgTerm{\expandafter\argtorun\expandafter{#1}}
+
+
+% \parseargdef - define a command taking an argument on the line
+%
+% \parseargdef\foo{...}
+%	is roughly equivalent to
+% \def\foo{\parsearg\Xfoo}
+% \def\Xfoo#1{...}
+\def\parseargdef#1{%
+  \expandafter \doparseargdef \csname\string#1\endcsname #1%
+}
+\def\doparseargdef#1#2{%
+  \def#2{\parsearg#1}%
+  \def#1##1%
+}
+
+% Several utility definitions with active space:
+{
+  \obeyspaces
+  \gdef\obeyedspace{ }
+
+  % Make each space character in the input produce a normal interword
+  % space in the output.  Don't allow a line break at this space, as this
+  % is used only in environments like @example, where each line of input
+  % should produce a line of output anyway.
+  %
+  \gdef\sepspaces{\obeyspaces\let =\tie}
+
+  % If an index command is used in an @example environment, any spaces
+  % therein should become regular spaces in the raw index file, not the
+  % expansion of \tie (\leavevmode \penalty \@M \ ).
+  \gdef\unsepspaces{\let =\space}
+}
+
+
+\def\flushcr{\ifx\par\lisppar \def\next##1{}\else \let\next=\relax \fi \next}
+
+% Define the framework for environments in texinfo.tex.  It's used like this:
+%
+%   \envdef\foo{...}
+%   \def\Efoo{...}
+%
+% It's the responsibility of \envdef to insert \begingroup before the
+% actual body; @end closes the group after calling \Efoo.  \envdef also
+% defines \thisenv, so the current environment is known; @end checks
+% whether the environment name matches.  The \checkenv macro can also be
+% used to check whether the current environment is the one expected.
+%
+% Non-false conditionals (@iftex, @ifset) don't fit into this, so they
+% are not treated as environments; they don't open a group.  (The
+% implementation of @end takes care not to call \endgroup in this
+% special case.)
+
+
+% At run-time, environments start with this:
+\def\startenvironment#1{\begingroup\def\thisenv{#1}}
+% initialize
+\let\thisenv\empty
+
+% ... but they get defined via ``\envdef\foo{...}'':
+\long\def\envdef#1#2{\def#1{\startenvironment#1#2}}
+\def\envparseargdef#1#2{\parseargdef#1{\startenvironment#1#2}}
+
+% Check whether we're in the right environment:
+\def\checkenv#1{%
+  \def\temp{#1}%
+  \ifx\thisenv\temp
+  \else
+    \badenverr
+  \fi
+}
+
+% Environment mismatch, #1 expected:
+\def\badenverr{%
+  \errhelp = \EMsimple
+  \errmessage{This command can appear only \inenvironment\temp,
+    not \inenvironment\thisenv}%
+}
+\def\inenvironment#1{%
+  \ifx#1\empty
+    outside of any environment%
+  \else
+    in environment \expandafter\string#1%
+  \fi
+}
+
+
+% @end foo calls \checkenv and executes the definition of \Efoo.
+\parseargdef\end{%
+  \if 1\csname iscond.#1\endcsname
+  \else
+    % The general wording of \badenverr may not be ideal.
+    \expandafter\checkenv\csname#1\endcsname
+    \csname E#1\endcsname
+    \endgroup
+  \fi
+}
+
+\newhelp\EMsimple{Press RETURN to continue.}
+
+
+% Be sure we're in horizontal mode when doing a tie, since we make space
+% equivalent to this in @example-like environments. Otherwise, a space
+% at the beginning of a line will start with \penalty -- and
+% since \penalty is valid in vertical mode, we'd end up putting the
+% penalty on the vertical list instead of in the new paragraph.
+{\catcode`@ = 11
+ % Avoid using \@M directly, because that causes trouble
+ % if the definition is written into an index file.
+ \global\let\tiepenalty = \@M
+ \gdef\tie{\leavevmode\penalty\tiepenalty\ }
+}
+
+% @: forces normal size whitespace following.
+\def\:{\spacefactor=1000 }
+
+% @* forces a line break.
+\def\*{\unskip\hfil\break\hbox{}\ignorespaces}
+
+% @/ allows a line break.
+\let\/=\allowbreak
+
+% @. is an end-of-sentence period.
+\def\.{.\spacefactor=\endofsentencespacefactor\space}
+
+% @! is an end-of-sentence bang.
+\def\!{!\spacefactor=\endofsentencespacefactor\space}
+
+% @? is an end-of-sentence query.
+\def\?{?\spacefactor=\endofsentencespacefactor\space}
+
+% @frenchspacing on|off  says whether to put extra space after punctuation.
+%
+\def\onword{on}
+\def\offword{off}
+%
+\parseargdef\frenchspacing{%
+  \def\temp{#1}%
+  \ifx\temp\onword \plainfrenchspacing
+  \else\ifx\temp\offword \plainnonfrenchspacing
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @frenchspacing option `\temp', must be on|off}%
+  \fi\fi
+}
+
+% @w prevents a word break.  Without the \leavevmode, @w at the
+% beginning of a paragraph, when TeX is still in vertical mode, would
+% produce a whole line of output instead of starting the paragraph.
+\def\w#1{\leavevmode\hbox{#1}}
+
+% @group ... @end group forces ... to be all on one page, by enclosing
+% it in a TeX vbox.  We use \vtop instead of \vbox to construct the box
+% to keep its height that of a normal line.  According to the rules for
+% \topskip (p.114 of the TeXbook), the glue inserted is
+% max (\topskip - \ht (first item), 0).  If that height is large,
+% therefore, no glue is inserted, and the space between the headline and
+% the text is small, which looks bad.
+%
+% Another complication is that the group might be very large.  This can
+% cause the glue on the previous page to be unduly stretched, because it
+% does not have much material.  In this case, it's better to add an
+% explicit \vfill so that the extra space is at the bottom.  The
+% threshold for doing this is if the group is more than \vfilllimit
+% percent of a page (\vfilllimit can be changed inside of @tex).
+%
+\newbox\groupbox
+\def\vfilllimit{0.7}
+%
+\envdef\group{%
+  \ifnum\catcode`\^^M=\active \else
+    \errhelp = \groupinvalidhelp
+    \errmessage{@group invalid in context where filling is enabled}%
+  \fi
+  \startsavinginserts
+  %
+  \setbox\groupbox = \vtop\bgroup
+    % Do @comment since we are called inside an environment such as
+    % @example, where each end-of-line in the input causes an
+    % end-of-line in the output.  We don't want the end-of-line after
+    % the `@group' to put extra space in the output.  Since @group
+    % should appear on a line by itself (according to the Texinfo
+    % manual), we don't worry about eating any user text.
+    \comment
+}
+%
+% The \vtop produces a box with normal height and large depth; thus, TeX puts
+% \baselineskip glue before it, and (when the next line of text is done)
+% \lineskip glue after it.  Thus, space below is not quite equal to space
+% above.  But it's pretty close.
+\def\Egroup{%
+    % To get correct interline space between the last line of the group
+    % and the first line afterwards, we have to propagate \prevdepth.
+    \endgraf % Not \par, as it may have been set to \lisppar.
+    \global\dimen1 = \prevdepth
+  \egroup           % End the \vtop.
+  \addgroupbox
+  \prevdepth = \dimen1
+  \checkinserts
+}
+
+\def\addgroupbox{
+  % \dimen0 is the vertical size of the group's box.
+  \dimen0 = \ht\groupbox  \advance\dimen0 by \dp\groupbox
+  % \dimen2 is how much space is left on the page (more or less).
+  \dimen2 = \txipageheight   \advance\dimen2 by -\pagetotal
+  % if the group doesn't fit on the current page, and it's a big big
+  % group, force a page break.
+  \ifdim \dimen0 > \dimen2
+    \ifdim \pagetotal < \vfilllimit\txipageheight
+      \page
+    \fi
+  \fi
+  \box\groupbox
+}
+
+%
+% TeX puts in an \escapechar (i.e., `@') at the beginning of the help
+% message, so this ends up printing `@group can only ...'.
+%
+\newhelp\groupinvalidhelp{%
+group can only be used in environments such as @example,^^J%
+where each line of input produces a line of output.}
+
+% @need space-in-mils
+% forces a page break if there is not space-in-mils remaining.
+
+\newdimen\mil  \mil=0.001in
+
+\parseargdef\need{%
+  % Ensure vertical mode, so we don't make a big box in the middle of a
+  % paragraph.
+  \par
+  %
+  % If the @need value is less than one line space, it's useless.
+  \dimen0 = #1\mil
+  \dimen2 = \ht\strutbox
+  \advance\dimen2 by \dp\strutbox
+  \ifdim\dimen0 > \dimen2
+    %
+    % Do a \strut just to make the height of this box be normal, so the
+    % normal leading is inserted relative to the preceding line.
+    % And a page break here is fine.
+    \vtop to #1\mil{\strut\vfil}%
+    %
+    % TeX does not even consider page breaks if a penalty added to the
+    % main vertical list is 10000 or more.  But in order to see if the
+    % empty box we just added fits on the page, we must make it consider
+    % page breaks.  On the other hand, we don't want to actually break the
+    % page after the empty box.  So we use a penalty of 9999.
+    %
+    % There is an extremely small chance that TeX will actually break the
+    % page at this \penalty, if there are no other feasible breakpoints in
+    % sight.  (If the user is using lots of big @group commands, which
+    % almost-but-not-quite fill up a page, TeX will have a hard time doing
+    % good page breaking, for example.)  However, I could not construct an
+    % example where a page broke at this \penalty; if it happens in a real
+    % document, then we can reconsider our strategy.
+    \penalty9999
+    %
+    % Back up by the size of the box, whether we did a page break or not.
+    \kern -#1\mil
+    %
+    % Do not allow a page break right after this kern.
+    \nobreak
+  \fi
+}
+
+% @br   forces paragraph break (and is undocumented).
+
+\let\br = \par
+
+% @page forces the start of a new page.
+%
+\def\page{\par\vfill\supereject}
+
+% @exdent text....
+% outputs text on separate line in roman font, starting at standard page margin
+
+% This records the amount of indent in the innermost environment.
+% That's how much \exdent should take out.
+\newskip\exdentamount
+
+% This defn is used inside fill environments such as @defun.
+\parseargdef\exdent{\hfil\break\hbox{\kern -\exdentamount{\rm#1}}\hfil\break}
+
+% This defn is used inside nofill environments such as @example.
+\parseargdef\nofillexdent{{\advance \leftskip by -\exdentamount
+  \leftline{\hskip\leftskip{\rm#1}}}}
+
+% @inmargin{WHICH}{TEXT} puts TEXT in the WHICH margin next to the current
+% paragraph.  For more general purposes, use the \margin insertion
+% class.  WHICH is `l' or `r'.  Not documented, written for gawk manual.
+%
+\newskip\inmarginspacing \inmarginspacing=1cm
+\def\strutdepth{\dp\strutbox}
+%
+\def\doinmargin#1#2{\strut\vadjust{%
+  \nobreak
+  \kern-\strutdepth
+  \vtop to \strutdepth{%
+    \baselineskip=\strutdepth
+    \vss
+    % if you have multiple lines of stuff to put here, you'll need to
+    % make the vbox yourself of the appropriate size.
+    \ifx#1l%
+      \llap{\ignorespaces #2\hskip\inmarginspacing}%
+    \else
+      \rlap{\hskip\hsize \hskip\inmarginspacing \ignorespaces #2}%
+    \fi
+    \null
+  }%
+}}
+\def\inleftmargin{\doinmargin l}
+\def\inrightmargin{\doinmargin r}
+%
+% @inmargin{TEXT [, RIGHT-TEXT]}
+% (if RIGHT-TEXT is given, use TEXT for left page, RIGHT-TEXT for right;
+% else use TEXT for both).
+%
+\def\inmargin#1{\parseinmargin #1,,\finish}
+\def\parseinmargin#1,#2,#3\finish{% not perfect, but better than nothing.
+  \setbox0 = \hbox{\ignorespaces #2}%
+  \ifdim\wd0 > 0pt
+    \def\lefttext{#1}%  have both texts
+    \def\righttext{#2}%
+  \else
+    \def\lefttext{#1}%  have only one text
+    \def\righttext{#1}%
+  \fi
+  %
+  \ifodd\pageno
+    \def\temp{\inrightmargin\righttext}% odd page -> outside is right margin
+  \else
+    \def\temp{\inleftmargin\lefttext}%
+  \fi
+  \temp
+}
+
+% @include FILE -- \input text of FILE.
+%
+\def\include{\parseargusing\filenamecatcodes\includezzz}
+\def\includezzz#1{%
+  \pushthisfilestack
+  \def\thisfile{#1}%
+  {%
+    \makevalueexpandable  % we want to expand any @value in FILE.
+    \turnoffactive        % and allow special characters in the expansion
+    \indexnofonts         % Allow `@@' and other weird things in file names.
+    \wlog{texinfo.tex: doing @include of #1^^J}%
+    \edef\temp{\noexpand\input #1 }%
+    %
+    % This trickery is to read FILE outside of a group, in case it makes
+    % definitions, etc.
+    \expandafter
+  }\temp
+  \popthisfilestack
+}
+\def\filenamecatcodes{%
+  \catcode`\\=\other
+  \catcode`~=\other
+  \catcode`^=\other
+  \catcode`_=\other
+  \catcode`|=\other
+  \catcode`<=\other
+  \catcode`>=\other
+  \catcode`+=\other
+  \catcode`-=\other
+  \catcode`\`=\other
+  \catcode`\'=\other
+}
+
+\def\pushthisfilestack{%
+  \expandafter\pushthisfilestackX\popthisfilestack\StackTerm
+}
+\def\pushthisfilestackX{%
+  \expandafter\pushthisfilestackY\thisfile\StackTerm
+}
+\def\pushthisfilestackY #1\StackTerm #2\StackTerm {%
+  \gdef\popthisfilestack{\gdef\thisfile{#1}\gdef\popthisfilestack{#2}}%
+}
+
+\def\popthisfilestack{\errthisfilestackempty}
+\def\errthisfilestackempty{\errmessage{Internal error:
+  the stack of filenames is empty.}}
+%
+\def\thisfile{}
+
+% @center line
+% outputs that line, centered.
+%
+\parseargdef\center{%
+  \ifhmode
+    \let\centersub\centerH
+  \else
+    \let\centersub\centerV
+  \fi
+  \centersub{\hfil \ignorespaces#1\unskip \hfil}%
+  \let\centersub\relax % don't let the definition persist, just in case
+}
+\def\centerH#1{{%
+  \hfil\break
+  \advance\hsize by -\leftskip
+  \advance\hsize by -\rightskip
+  \line{#1}%
+  \break
+}}
+%
+\newcount\centerpenalty
+\def\centerV#1{%
+  % The idea here is the same as in \startdefun, \cartouche, etc.: if
+  % @center is the first thing after a section heading, we need to wipe
+  % out the negative parskip inserted by \sectionheading, but still
+  % prevent a page break here.
+  \centerpenalty = \lastpenalty
+  \ifnum\centerpenalty>10000 \vskip\parskip \fi
+  \ifnum\centerpenalty>9999 \penalty\centerpenalty \fi
+  \line{\kern\leftskip #1\kern\rightskip}%
+}
+
+% @sp n   outputs n lines of vertical space
+%
+\parseargdef\sp{\vskip #1\baselineskip}
+
+% @comment ...line which is ignored...
+% @c is the same as @comment
+% @ignore ... @end ignore  is another way to write a comment
+
+
+\def\c{\begingroup \catcode`\^^M=\active%
+\catcode`\@=\other \catcode`\{=\other \catcode`\}=\other%
+\cxxx}
+{\catcode`\^^M=\active \gdef\cxxx#1^^M{\endgroup}}
+%
+\let\comment\c
+
+% @paragraphindent NCHARS
+% We'll use ems for NCHARS, close enough.
+% NCHARS can also be the word `asis' or `none'.
+% We cannot feasibly implement @paragraphindent asis, though.
+%
+\def\asisword{asis} % no translation, these are keywords
+\def\noneword{none}
+%
+\parseargdef\paragraphindent{%
+  \def\temp{#1}%
+  \ifx\temp\asisword
+  \else
+    \ifx\temp\noneword
+      \defaultparindent = 0pt
+    \else
+      \defaultparindent = #1em
+    \fi
+  \fi
+  \parindent = \defaultparindent
+}
+
+% @exampleindent NCHARS
+% We'll use ems for NCHARS like @paragraphindent.
+% It seems @exampleindent asis isn't necessary, but
+% I preserve it to make it similar to @paragraphindent.
+\parseargdef\exampleindent{%
+  \def\temp{#1}%
+  \ifx\temp\asisword
+  \else
+    \ifx\temp\noneword
+      \lispnarrowing = 0pt
+    \else
+      \lispnarrowing = #1em
+    \fi
+  \fi
+}
+
+% @firstparagraphindent WORD
+% If WORD is `none', then suppress indentation of the first paragraph
+% after a section heading.  If WORD is `insert', then do indent at such
+% paragraphs.
+%
+% The paragraph indentation is suppressed or not by calling
+% \suppressfirstparagraphindent, which the sectioning commands do.
+% We switch the definition of this back and forth according to WORD.
+% By default, we suppress indentation.
+%
+\def\suppressfirstparagraphindent{\dosuppressfirstparagraphindent}
+\def\insertword{insert}
+%
+\parseargdef\firstparagraphindent{%
+  \def\temp{#1}%
+  \ifx\temp\noneword
+    \let\suppressfirstparagraphindent = \dosuppressfirstparagraphindent
+  \else\ifx\temp\insertword
+    \let\suppressfirstparagraphindent = \relax
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @firstparagraphindent option `\temp'}%
+  \fi\fi
+}
+
+% Here is how we actually suppress indentation.  Redefine \everypar to
+% \kern backwards by \parindent, and then reset itself to empty.
+%
+% We also make \indent itself not actually do anything until the next
+% paragraph.
+%
+\gdef\dosuppressfirstparagraphindent{%
+  \gdef\indent  {\restorefirstparagraphindent \indent}%
+  \gdef\noindent{\restorefirstparagraphindent \noindent}%
+  \global\everypar = {\kern -\parindent \restorefirstparagraphindent}%
+}
+%
+\gdef\restorefirstparagraphindent{%
+  \global\let\indent = \ptexindent
+  \global\let\noindent = \ptexnoindent
+  \global\everypar = {}%
+}
+
+% leave vertical mode without cancelling any first paragraph indent
+\gdef\imageindent{%
+  \toks0=\everypar
+  \everypar={}%
+  \ptexnoindent
+  \global\everypar=\toks0
+}
+
+
+% @refill is a no-op.
+\let\refill=\relax
+
+% @setfilename INFO-FILENAME - ignored
+\let\setfilename=\comment
+
+% @bye.
+\outer\def\bye{\chappager\pagelabels\tracingstats=1\ptexend}
+
+
+\message{pdf,}
+% adobe `portable' document format
+\newcount\tempnum
+\newcount\lnkcount
+\newtoks\filename
+\newcount\filenamelength
+\newcount\pgn
+\newtoks\toksA
+\newtoks\toksB
+\newtoks\toksC
+\newtoks\toksD
+\newbox\boxA
+\newbox\boxB
+\newcount\countA
+\newif\ifpdf
+\newif\ifpdfmakepagedest
+
+%
+% For LuaTeX
+%
+
+\newif\iftxiuseunicodedestname
+\txiuseunicodedestnamefalse % For pdfTeX etc.
+
+\ifx\luatexversion\thisisundefined
+\else
+  % Use Unicode destination names
+  \txiuseunicodedestnametrue
+  % Escape PDF strings with converting UTF-16 from UTF-8
+  \begingroup
+    \catcode`\%=12
+    \directlua{
+      function UTF16oct(str)
+        tex.sprint(string.char(0x5c) .. '376' .. string.char(0x5c) .. '377')
+        for c in string.utfvalues(str) do
+          if c < 0x10000 then
+            tex.sprint(
+              string.format(string.char(0x5c) .. string.char(0x25) .. '03o' ..
+                            string.char(0x5c) .. string.char(0x25) .. '03o',
+                            math.floor(c / 256), math.floor(c % 256)))
+          else
+            c = c - 0x10000
+            local c_hi = c / 1024 + 0xd800
+            local c_lo = c % 1024 + 0xdc00
+            tex.sprint(
+              string.format(string.char(0x5c) .. string.char(0x25) .. '03o' ..
+                            string.char(0x5c) .. string.char(0x25) .. '03o' ..
+                            string.char(0x5c) .. string.char(0x25) .. '03o' ..
+                            string.char(0x5c) .. string.char(0x25) .. '03o',
+                            math.floor(c_hi / 256), math.floor(c_hi % 256),
+                            math.floor(c_lo / 256), math.floor(c_lo % 256)))
+          end
+        end
+      end
+    }
+  \endgroup
+  \def\pdfescapestrutfsixteen#1{\directlua{UTF16oct('\luaescapestring{#1}')}}
+  % Escape PDF strings without converting
+  \begingroup
+    \directlua{
+      function PDFescstr(str)
+        for c in string.bytes(str) do
+          if c <= 0x20 or c >= 0x80 or c == 0x28 or c == 0x29 or c == 0x5c then
+            tex.sprint(-2,
+              string.format(string.char(0x5c) .. string.char(0x25) .. '03o',
+                            c))
+          else
+            tex.sprint(-2, string.char(c))
+          end
+        end
+      end
+    }
+    % The -2 in the arguments here gives all the input to TeX catcode 12 
+    % (other) or 10 (space), preventing undefined control sequence errors. See 
+    % https://lists.gnu.org/archive/html/bug-texinfo/2019-08/msg00031.html
+    %
+  \endgroup
+  \def\pdfescapestring#1{\directlua{PDFescstr('\luaescapestring{#1}')}}
+  \ifnum\luatexversion>84
+    % For LuaTeX >= 0.85
+    \def\pdfdest{\pdfextension dest}
+    \let\pdfoutput\outputmode
+    \def\pdfliteral{\pdfextension literal}
+    \def\pdfcatalog{\pdfextension catalog}
+    \def\pdftexversion{\numexpr\pdffeedback version\relax}
+    \let\pdfximage\saveimageresource
+    \let\pdfrefximage\useimageresource
+    \let\pdflastximage\lastsavedimageresourceindex
+    \def\pdfendlink{\pdfextension endlink\relax}
+    \def\pdfoutline{\pdfextension outline}
+    \def\pdfstartlink{\pdfextension startlink}
+    \def\pdffontattr{\pdfextension fontattr}
+    \def\pdfobj{\pdfextension obj}
+    \def\pdflastobj{\numexpr\pdffeedback lastobj\relax}
+    \let\pdfpagewidth\pagewidth
+    \let\pdfpageheight\pageheight
+    \edef\pdfhorigin{\pdfvariable horigin}
+    \edef\pdfvorigin{\pdfvariable vorigin}
+  \fi
+\fi
+
+% when pdftex is run in dvi mode, \pdfoutput is defined (so \pdfoutput=1
+% can be set).  So we test for \relax and 0 as well as being undefined.
+\ifx\pdfoutput\thisisundefined
+\else
+  \ifx\pdfoutput\relax
+  \else
+    \ifcase\pdfoutput
+    \else
+      \pdftrue
+    \fi
+  \fi
+\fi
+
+\newif\ifpdforxetex
+\pdforxetexfalse
+\ifpdf
+  \pdforxetextrue
+\fi
+\ifx\XeTeXrevision\thisisundefined\else
+  \pdforxetextrue
+\fi
+
+
+% Output page labels information.
+% See PDF reference v.1.7 p.594, section 8.3.1.
+\ifpdf
+\def\pagelabels{%
+  \def\title{0 << /P (T-) /S /D >>}%
+  \edef\roman{\the\romancount << /S /r >>}%
+  \edef\arabic{\the\arabiccount << /S /D >>}%
+  %
+  % Page label ranges must be increasing.  Remove any duplicates.
+  % (There is a slight chance of this being wrong if e.g. there is
+  % a @contents but no @titlepage, etc.)
+  %
+  \ifnum\romancount=0 \def\roman{}\fi
+  \ifnum\arabiccount=0 \def\title{}%
+  \else
+    \ifnum\romancount=\arabiccount \def\roman{}\fi
+  \fi
+  %
+  \ifnum\romancount<\arabiccount
+    \pdfcatalog{/PageLabels << /Nums [\title \roman \arabic ] >> }\relax
+  \else
+    \pdfcatalog{/PageLabels << /Nums [\title \arabic \roman ] >> }\relax
+  \fi
+}
+\else
+  \let\pagelabels\relax
+\fi
+
+\newcount\pagecount \pagecount=0
+\newcount\romancount \romancount=0
+\newcount\arabiccount \arabiccount=0
+\ifpdf
+  \let\ptxadvancepageno\advancepageno
+  \def\advancepageno{%
+    \ptxadvancepageno\global\advance\pagecount by 1
+  }
+\fi
+
+
+% PDF uses PostScript string constants for the names of xref targets,
+% for display in the outlines, and in other places.  Thus, we have to
+% double any backslashes.  Otherwise, a name like "\node" will be
+% interpreted as a newline (\n), followed by o, d, e.  Not good.
+% 
+% See http://www.ntg.nl/pipermail/ntg-pdftex/2004-July/000654.html and
+% related messages.  The final outcome is that it is up to the TeX user
+% to double the backslashes and otherwise make the string valid, so
+% that's what we do.  pdftex 1.30.0 (ca.2005) introduced a primitive to
+% do this reliably, so we use it.
+
+% #1 is a control sequence in which to do the replacements,
+% which we \xdef.
+\def\txiescapepdf#1{%
+  \ifx\pdfescapestring\thisisundefined
+    % No primitive available; should we give a warning or log?
+    % Many times it won't matter.
+    \xdef#1{#1}%
+  \else
+    % The expandable \pdfescapestring primitive escapes parentheses,
+    % backslashes, and other special chars.
+    \xdef#1{\pdfescapestring{#1}}%
+  \fi
+}
+\def\txiescapepdfutfsixteen#1{%
+  \ifx\pdfescapestrutfsixteen\thisisundefined
+    % No UTF-16 converting macro available.
+    \txiescapepdf{#1}%
+  \else
+    \xdef#1{\pdfescapestrutfsixteen{#1}}%
+  \fi
+}
+
+\newhelp\nopdfimagehelp{Texinfo supports .png, .jpg, .jpeg, and .pdf images
+with PDF output, and none of those formats could be found.  (.eps cannot
+be supported due to the design of the PDF format; use regular TeX (DVI
+output) for that.)}
+
+\ifpdf
+  %
+  % Color manipulation macros using ideas from pdfcolor.tex,
+  % except using rgb instead of cmyk; the latter is said to render as a
+  % very dark gray on-screen and a very dark halftone in print, instead
+  % of actual black. The dark red here is dark enough to print on paper as
+  % nearly black, but still distinguishable for online viewing.  We use
+  % black by default, though.
+  \def\rgbDarkRed{0.50 0.09 0.12}
+  \def\rgbBlack{0 0 0}
+  %
+  % rg sets the color for filling (usual text, etc.);
+  % RG sets the color for stroking (thin rules, e.g., normal _'s).
+  \def\pdfsetcolor#1{\pdfliteral{#1 rg  #1 RG}}
+  %
+  % Set color, and create a mark which defines \thiscolor accordingly,
+  % so that \makeheadline knows which color to restore.
+  \def\setcolor#1{%
+    \xdef\currentcolordefs{\gdef\noexpand\thiscolor{#1}}%
+    \domark
+    \pdfsetcolor{#1}%
+  }
+  %
+  \def\maincolor{\rgbBlack}
+  \pdfsetcolor{\maincolor}
+  \edef\thiscolor{\maincolor}
+  \def\currentcolordefs{}
+  %
+  \def\makefootline{%
+    \baselineskip24pt
+    \line{\pdfsetcolor{\maincolor}\the\footline}%
+  }
+  %
+  \def\makeheadline{%
+    \vbox to 0pt{%
+      \vskip-22.5pt
+      \line{%
+        \vbox to8.5pt{}%
+        % Extract \thiscolor definition from the marks.
+        \getcolormarks
+        % Typeset the headline with \maincolor, then restore the color.
+        \pdfsetcolor{\maincolor}\the\headline\pdfsetcolor{\thiscolor}%
+      }%
+      \vss
+    }%
+    \nointerlineskip
+  }
+  %
+  %
+  \pdfcatalog{/PageMode /UseOutlines}
+  %
+  % #1 is image name, #2 width (might be empty/whitespace), #3 height (ditto).
+  \def\dopdfimage#1#2#3{%
+    \def\pdfimagewidth{#2}\setbox0 = \hbox{\ignorespaces #2}%
+    \def\pdfimageheight{#3}\setbox2 = \hbox{\ignorespaces #3}%
+    %
+    % pdftex (and the PDF format) support .pdf, .png, .jpg (among
+    % others).  Let's try in that order, PDF first since if
+    % someone has a scalable image, presumably better to use that than a
+    % bitmap.
+    \let\pdfimgext=\empty
+    \begingroup
+      \openin 1 #1.pdf \ifeof 1
+        \openin 1 #1.PDF \ifeof 1
+          \openin 1 #1.png \ifeof 1
+            \openin 1 #1.jpg \ifeof 1
+              \openin 1 #1.jpeg \ifeof 1
+                \openin 1 #1.JPG \ifeof 1
+                  \errhelp = \nopdfimagehelp
+                  \errmessage{Could not find image file #1 for pdf}%
+                \else \gdef\pdfimgext{JPG}%
+                \fi
+              \else \gdef\pdfimgext{jpeg}%
+              \fi
+            \else \gdef\pdfimgext{jpg}%
+            \fi
+          \else \gdef\pdfimgext{png}%
+          \fi
+        \else \gdef\pdfimgext{PDF}%
+        \fi
+      \else \gdef\pdfimgext{pdf}%
+      \fi
+      \closein 1
+    \endgroup
+    %
+    % without \immediate, ancient pdftex seg faults when the same image is
+    % included twice.  (Version 3.14159-pre-1.0-unofficial-20010704.)
+    \ifnum\pdftexversion < 14
+      \immediate\pdfimage
+    \else
+      \immediate\pdfximage
+    \fi
+      \ifdim \wd0 >0pt width \pdfimagewidth \fi
+      \ifdim \wd2 >0pt height \pdfimageheight \fi
+      \ifnum\pdftexversion<13
+         #1.\pdfimgext
+       \else
+         {#1.\pdfimgext}%
+       \fi
+    \ifnum\pdftexversion < 14 \else
+      \pdfrefximage \pdflastximage
+    \fi}
+  %
+  \def\setpdfdestname#1{{%
+    % We have to set dummies so commands such as @code, and characters
+    % such as \, aren't expanded when present in a section title.
+    \indexnofonts
+    \makevalueexpandable
+    \turnoffactive
+    \iftxiuseunicodedestname
+      \ifx \declaredencoding \latone
+        % Pass through Latin-1 characters.
+        % LuaTeX with byte wise I/O converts Latin-1 characters to Unicode.
+      \else
+        \ifx \declaredencoding \utfeight
+          % Pass through Unicode characters.
+        \else
+          % Use ASCII approximations in destination names.
+          \passthroughcharsfalse
+        \fi
+      \fi
+    \else
+      % Use ASCII approximations in destination names.
+      \passthroughcharsfalse
+    \fi
+    \def\pdfdestname{#1}%
+    \txiescapepdf\pdfdestname
+  }}
+  %
+  \def\setpdfoutlinetext#1{{%
+    \indexnofonts
+    \makevalueexpandable
+    \turnoffactive
+    \ifx \declaredencoding \latone
+      % The PDF format can use an extended form of Latin-1 in bookmark
+      % strings.  See Appendix D of the PDF Reference, Sixth Edition, for
+      % the "PDFDocEncoding".
+      \passthroughcharstrue
+      % Pass through Latin-1 characters.
+      %   LuaTeX: Convert to Unicode
+      %   pdfTeX: Use Latin-1 as PDFDocEncoding
+      \def\pdfoutlinetext{#1}%
+    \else
+      \ifx \declaredencoding \utfeight
+        \ifx\luatexversion\thisisundefined
+          % For pdfTeX  with UTF-8.
+          % TODO: the PDF format can use UTF-16 in bookmark strings,
+          % but the code for this isn't done yet.
+          % Use ASCII approximations.
+          \passthroughcharsfalse
+          \def\pdfoutlinetext{#1}%
+        \else
+          % For LuaTeX with UTF-8.
+          % Pass through Unicode characters for title texts.
+          \passthroughcharstrue
+          \def\pdfoutlinetext{#1}%
+        \fi
+      \else
+        % For non-Latin-1 or non-UTF-8 encodings.
+        % Use ASCII approximations.
+        \passthroughcharsfalse
+        \def\pdfoutlinetext{#1}%
+      \fi
+    \fi
+    % LuaTeX: Convert to UTF-16
+    % pdfTeX: Use Latin-1 as PDFDocEncoding
+    \txiescapepdfutfsixteen\pdfoutlinetext
+  }}
+  %
+  \def\pdfmkdest#1{%
+    \setpdfdestname{#1}%
+    \safewhatsit{\pdfdest name{\pdfdestname} xyz}%
+  }
+  %
+  % used to mark target names; must be expandable.
+  \def\pdfmkpgn#1{#1}
+  %
+  % by default, use black for everything.
+  \def\urlcolor{\rgbBlack}
+  \def\linkcolor{\rgbBlack}
+  \def\endlink{\setcolor{\maincolor}\pdfendlink}
+  %
+  % Adding outlines to PDF; macros for calculating structure of outlines
+  % come from Petr Olsak
+  \def\expnumber#1{\expandafter\ifx\csname#1\endcsname\relax 0%
+    \else \csname#1\endcsname \fi}
+  \def\advancenumber#1{\tempnum=\expnumber{#1}\relax
+    \advance\tempnum by 1
+    \expandafter\xdef\csname#1\endcsname{\the\tempnum}}
+  %
+  % #1 is the section text, which is what will be displayed in the
+  % outline by the pdf viewer.  #2 is the pdf expression for the number
+  % of subentries (or empty, for subsubsections).  #3 is the node text,
+  % which might be empty if this toc entry had no corresponding node.
+  % #4 is the page number
+  %
+  \def\dopdfoutline#1#2#3#4{%
+    % Generate a link to the node text if that exists; else, use the
+    % page number.  We could generate a destination for the section
+    % text in the case where a section has no node, but it doesn't
+    % seem worth the trouble, since most documents are normally structured.
+    \setpdfoutlinetext{#1}
+    \setpdfdestname{#3}
+    \ifx\pdfdestname\empty
+      \def\pdfdestname{#4}%
+    \fi
+    %
+    \pdfoutline goto name{\pdfmkpgn{\pdfdestname}}#2{\pdfoutlinetext}%
+  }
+  %
+  \def\pdfmakeoutlines{%
+    \begingroup
+      % Read toc silently, to get counts of subentries for \pdfoutline.
+      \def\partentry##1##2##3##4{}% ignore parts in the outlines
+      \def\numchapentry##1##2##3##4{%
+	\def\thischapnum{##2}%
+	\def\thissecnum{0}%
+	\def\thissubsecnum{0}%
+      }%
+      \def\numsecentry##1##2##3##4{%
+	\advancenumber{chap\thischapnum}%
+	\def\thissecnum{##2}%
+	\def\thissubsecnum{0}%
+      }%
+      \def\numsubsecentry##1##2##3##4{%
+	\advancenumber{sec\thissecnum}%
+	\def\thissubsecnum{##2}%
+      }%
+      \def\numsubsubsecentry##1##2##3##4{%
+	\advancenumber{subsec\thissubsecnum}%
+      }%
+      \def\thischapnum{0}%
+      \def\thissecnum{0}%
+      \def\thissubsecnum{0}%
+      %
+      % use \def rather than \let here because we redefine \chapentry et
+      % al. a second time, below.
+      \def\appentry{\numchapentry}%
+      \def\appsecentry{\numsecentry}%
+      \def\appsubsecentry{\numsubsecentry}%
+      \def\appsubsubsecentry{\numsubsubsecentry}%
+      \def\unnchapentry{\numchapentry}%
+      \def\unnsecentry{\numsecentry}%
+      \def\unnsubsecentry{\numsubsecentry}%
+      \def\unnsubsubsecentry{\numsubsubsecentry}%
+      \readdatafile{toc}%
+      %
+      % Read toc second time, this time actually producing the outlines.
+      % The `-' means take the \expnumber as the absolute number of
+      % subentries, which we calculated on our first read of the .toc above.
+      %
+      % We use the node names as the destinations.
+      %
+      % Currently we prefix the section name with the section number
+      % for chapter and appendix headings only in order to avoid too much 
+      % horizontal space being required in the PDF viewer.
+      \def\numchapentry##1##2##3##4{%
+        \dopdfoutline{##2 ##1}{count-\expnumber{chap##2}}{##3}{##4}}%
+      \def\unnchapentry##1##2##3##4{%
+        \dopdfoutline{##1}{count-\expnumber{chap##2}}{##3}{##4}}%
+      \def\numsecentry##1##2##3##4{%
+        \dopdfoutline{##1}{count-\expnumber{sec##2}}{##3}{##4}}%
+      \def\numsubsecentry##1##2##3##4{%
+        \dopdfoutline{##1}{count-\expnumber{subsec##2}}{##3}{##4}}%
+      \def\numsubsubsecentry##1##2##3##4{% count is always zero
+        \dopdfoutline{##1}{}{##3}{##4}}%
+      %
+      % PDF outlines are displayed using system fonts, instead of
+      % document fonts.  Therefore we cannot use special characters,
+      % since the encoding is unknown.  For example, the eogonek from
+      % Latin 2 (0xea) gets translated to a | character.  Info from
+      % Staszek Wawrykiewicz, 19 Jan 2004 04:09:24 +0100.
+      %
+      % TODO this right, we have to translate 8-bit characters to
+      % their "best" equivalent, based on the @documentencoding.  Too
+      % much work for too little return.  Just use the ASCII equivalents
+      % we use for the index sort strings.
+      % 
+      \indexnofonts
+      \setupdatafile
+      % We can have normal brace characters in the PDF outlines, unlike
+      % Texinfo index files.  So set that up.
+      \def\{{\lbracecharliteral}%
+      \def\}{\rbracecharliteral}%
+      \catcode`\\=\active \otherbackslash
+      \input \tocreadfilename
+    \endgroup
+  }
+  {\catcode`[=1 \catcode`]=2
+   \catcode`{=\other \catcode`}=\other
+   \gdef\lbracecharliteral[{]%
+   \gdef\rbracecharliteral[}]%
+  ]
+  %
+  \def\skipspaces#1{\def\PP{#1}\def\D{|}%
+    \ifx\PP\D\let\nextsp\relax
+    \else\let\nextsp\skipspaces
+      \addtokens{\filename}{\PP}%
+      \advance\filenamelength by 1
+    \fi
+    \nextsp}
+  \def\getfilename#1{%
+    \filenamelength=0
+    % If we don't expand the argument now, \skipspaces will get
+    % snagged on things like "@value{foo}".
+    \edef\temp{#1}%
+    \expandafter\skipspaces\temp|\relax
+  }
+  \ifnum\pdftexversion < 14
+    \let \startlink \pdfannotlink
+  \else
+    \let \startlink \pdfstartlink
+  \fi
+  % make a live url in pdf output.
+  \def\pdfurl#1{%
+    \begingroup
+      % it seems we really need yet another set of dummies; have not
+      % tried to figure out what each command should do in the context
+      % of @url.  for now, just make @/ a no-op, that's the only one
+      % people have actually reported a problem with.
+      %
+      \normalturnoffactive
+      \def\@{@}%
+      \let\/=\empty
+      \makevalueexpandable
+      % do we want to go so far as to use \indexnofonts instead of just
+      % special-casing \var here?
+      \def\var##1{##1}%
+      %
+      \leavevmode\setcolor{\urlcolor}%
+      \startlink attr{/Border [0 0 0]}%
+        user{/Subtype /Link /A << /S /URI /URI (#1) >>}%
+    \endgroup}
+  % \pdfgettoks - Surround page numbers in #1 with @pdflink.  #1 may
+  % be a simple number, or a list of numbers in the case of an index
+  % entry.
+  \def\pdfgettoks#1.{\setbox\boxA=\hbox{\toksA={#1.}\toksB={}\maketoks}}
+  \def\addtokens#1#2{\edef\addtoks{\noexpand#1={\the#1#2}}\addtoks}
+  \def\adn#1{\addtokens{\toksC}{#1}\global\countA=1\let\next=\maketoks}
+  \def\poptoks#1#2|ENDTOKS|{\let\first=#1\toksD={#1}\toksA={#2}}
+  \def\maketoks{%
+    \expandafter\poptoks\the\toksA|ENDTOKS|\relax
+    \ifx\first0\adn0
+    \else\ifx\first1\adn1 \else\ifx\first2\adn2 \else\ifx\first3\adn3
+    \else\ifx\first4\adn4 \else\ifx\first5\adn5 \else\ifx\first6\adn6
+    \else\ifx\first7\adn7 \else\ifx\first8\adn8 \else\ifx\first9\adn9
+    \else
+      \ifnum0=\countA\else\makelink\fi
+      \ifx\first.\let\next=\done\else
+        \let\next=\maketoks
+        \addtokens{\toksB}{\the\toksD}
+        \ifx\first,\addtokens{\toksB}{\space}\fi
+      \fi
+    \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
+    \next}
+  \def\makelink{\addtokens{\toksB}%
+    {\noexpand\pdflink{\the\toksC}}\toksC={}\global\countA=0}
+  \def\pdflink#1{%
+    \startlink attr{/Border [0 0 0]} goto name{\pdfmkpgn{#1}}
+    \setcolor{\linkcolor}#1\endlink}
+  \def\done{\edef\st{\global\noexpand\toksA={\the\toksB}}\st}
+\else
+  % non-pdf mode
+  \let\pdfmkdest = \gobble
+  \let\pdfurl = \gobble
+  \let\endlink = \relax
+  \let\setcolor = \gobble
+  \let\pdfsetcolor = \gobble
+  \let\pdfmakeoutlines = \relax
+\fi  % \ifx\pdfoutput
+
+%
+% For XeTeX
+%
+\ifx\XeTeXrevision\thisisundefined
+\else
+  %
+  % XeTeX version check
+  %
+  \ifnum\strcmp{\the\XeTeXversion\XeTeXrevision}{0.99996}>-1
+    % TeX Live 2016 contains XeTeX 0.99996 and xdvipdfmx 20160307.
+    % It can use the `dvipdfmx:config' special (from TeX Live SVN r40941).
+    % For avoiding PDF destination name replacement, we use this special
+    % instead of xdvipdfmx's command line option `-C 0x0010'.
+    \special{dvipdfmx:config C 0x0010}
+    % XeTeX 0.99995+ comes with xdvipdfmx 20160307+.
+    % It can handle Unicode destination names for PDF.
+    \txiuseunicodedestnametrue
+  \else
+    % XeTeX < 0.99996 (TeX Live < 2016) cannot use the
+    % `dvipdfmx:config' special.
+    % So for avoiding PDF destination name replacement,
+    % xdvipdfmx's command line option `-C 0x0010' is necessary.
+    %
+    % XeTeX < 0.99995 can not handle Unicode destination names for PDF
+    % because xdvipdfmx 20150315 has a UTF-16 conversion issue.
+    % It is fixed by xdvipdfmx 20160106 (TeX Live SVN r39753).
+    \txiuseunicodedestnamefalse
+  \fi
+  %
+  % Color support
+  %
+  \def\rgbDarkRed{0.50 0.09 0.12}
+  \def\rgbBlack{0 0 0}
+  %
+  \def\pdfsetcolor#1{\special{pdf:scolor [#1]}}
+  %
+  % Set color, and create a mark which defines \thiscolor accordingly,
+  % so that \makeheadline knows which color to restore.
+  \def\setcolor#1{%
+    \xdef\currentcolordefs{\gdef\noexpand\thiscolor{#1}}%
+    \domark
+    \pdfsetcolor{#1}%
+  }
+  %
+  \def\maincolor{\rgbBlack}
+  \pdfsetcolor{\maincolor}
+  \edef\thiscolor{\maincolor}
+  \def\currentcolordefs{}
+  %
+  \def\makefootline{%
+    \baselineskip24pt
+    \line{\pdfsetcolor{\maincolor}\the\footline}%
+  }
+  %
+  \def\makeheadline{%
+    \vbox to 0pt{%
+      \vskip-22.5pt
+      \line{%
+        \vbox to8.5pt{}%
+        % Extract \thiscolor definition from the marks.
+        \getcolormarks
+        % Typeset the headline with \maincolor, then restore the color.
+        \pdfsetcolor{\maincolor}\the\headline\pdfsetcolor{\thiscolor}%
+      }%
+      \vss
+    }%
+    \nointerlineskip
+  }
+  %
+  % PDF outline support
+  %
+  % Emulate pdfTeX primitive
+  \def\pdfdest name#1 xyz{%
+    \special{pdf:dest (#1) [@thispage /XYZ @xpos @ypos null]}%
+  }
+  %
+  \def\setpdfdestname#1{{%
+    % We have to set dummies so commands such as @code, and characters
+    % such as \, aren't expanded when present in a section title.
+    \indexnofonts
+    \makevalueexpandable
+    \turnoffactive
+    \iftxiuseunicodedestname
+      % Pass through Unicode characters.
+    \else
+      % Use ASCII approximations in destination names.
+      \passthroughcharsfalse
+    \fi
+    \def\pdfdestname{#1}%
+    \txiescapepdf\pdfdestname
+  }}
+  %
+  \def\setpdfoutlinetext#1{{%
+    \turnoffactive
+    % Always use Unicode characters in title texts.
+    \def\pdfoutlinetext{#1}%
+    % For XeTeX, xdvipdfmx converts to UTF-16.
+    % So we do not convert.
+    \txiescapepdf\pdfoutlinetext
+  }}
+  %
+  \def\pdfmkdest#1{%
+    \setpdfdestname{#1}%
+    \safewhatsit{\pdfdest name{\pdfdestname} xyz}%
+  }
+  %
+  % by default, use black for everything.
+  \def\urlcolor{\rgbBlack}
+  \def\linkcolor{\rgbBlack}
+  \def\endlink{\setcolor{\maincolor}\pdfendlink}
+  %
+  \def\dopdfoutline#1#2#3#4{%
+    \setpdfoutlinetext{#1}
+    \setpdfdestname{#3}
+    \ifx\pdfdestname\empty
+      \def\pdfdestname{#4}%
+    \fi
+    %
+    \special{pdf:out [-] #2 << /Title (\pdfoutlinetext) /A
+      << /S /GoTo /D (\pdfdestname) >> >> }%
+  }
+  %
+  \def\pdfmakeoutlines{%
+    \begingroup
+      %
+      % For XeTeX, counts of subentries are not necessary.
+      % Therefore, we read toc only once.
+      %
+      % We use node names as destinations.
+      %
+      % Currently we prefix the section name with the section number
+      % for chapter and appendix headings only in order to avoid too much 
+      % horizontal space being required in the PDF viewer.
+      \def\partentry##1##2##3##4{}% ignore parts in the outlines
+      \def\numchapentry##1##2##3##4{%
+        \dopdfoutline{##2 ##1}{1}{##3}{##4}}%
+      \def\numsecentry##1##2##3##4{%
+        \dopdfoutline{##1}{2}{##3}{##4}}%
+      \def\numsubsecentry##1##2##3##4{%
+        \dopdfoutline{##1}{3}{##3}{##4}}%
+      \def\numsubsubsecentry##1##2##3##4{%
+        \dopdfoutline{##1}{4}{##3}{##4}}%
+      %
+      \let\appentry\numchapentry%
+      \let\appsecentry\numsecentry%
+      \let\appsubsecentry\numsubsecentry%
+      \let\appsubsubsecentry\numsubsubsecentry%
+      \def\unnchapentry##1##2##3##4{%
+        \dopdfoutline{##1}{1}{##3}{##4}}%
+      \let\unnsecentry\numsecentry%
+      \let\unnsubsecentry\numsubsecentry%
+      \let\unnsubsubsecentry\numsubsubsecentry%
+      %
+      % For XeTeX, xdvipdfmx converts strings to UTF-16.
+      % Therefore, the encoding and the language may not be considered.
+      %
+      \indexnofonts
+      \setupdatafile
+      % We can have normal brace characters in the PDF outlines, unlike
+      % Texinfo index files.  So set that up.
+      \def\{{\lbracecharliteral}%
+      \def\}{\rbracecharliteral}%
+      \catcode`\\=\active \otherbackslash
+      \input \tocreadfilename
+    \endgroup
+  }
+  {\catcode`[=1 \catcode`]=2
+   \catcode`{=\other \catcode`}=\other
+   \gdef\lbracecharliteral[{]%
+   \gdef\rbracecharliteral[}]%
+  ]
+
+  \special{pdf:docview << /PageMode /UseOutlines >> }
+  % ``\special{pdf:tounicode ...}'' is not necessary
+  % because xdvipdfmx converts strings from UTF-8 to UTF-16 without it.
+  % However, due to a UTF-16 conversion issue of xdvipdfmx 20150315,
+  % ``\special{pdf:dest ...}'' cannot handle non-ASCII strings.
+  % It is fixed by xdvipdfmx 20160106 (TeX Live SVN r39753).
+%
+  \def\skipspaces#1{\def\PP{#1}\def\D{|}%
+    \ifx\PP\D\let\nextsp\relax
+    \else\let\nextsp\skipspaces
+      \addtokens{\filename}{\PP}%
+      \advance\filenamelength by 1
+    \fi
+    \nextsp}
+  \def\getfilename#1{%
+    \filenamelength=0
+    % If we don't expand the argument now, \skipspaces will get
+    % snagged on things like "@value{foo}".
+    \edef\temp{#1}%
+    \expandafter\skipspaces\temp|\relax
+  }
+  % make a live url in pdf output.
+  \def\pdfurl#1{%
+    \begingroup
+      % it seems we really need yet another set of dummies; have not
+      % tried to figure out what each command should do in the context
+      % of @url.  for now, just make @/ a no-op, that's the only one
+      % people have actually reported a problem with.
+      %
+      \normalturnoffactive
+      \def\@{@}%
+      \let\/=\empty
+      \makevalueexpandable
+      % do we want to go so far as to use \indexnofonts instead of just
+      % special-casing \var here?
+      \def\var##1{##1}%
+      %
+      \leavevmode\setcolor{\urlcolor}%
+      \special{pdf:bann << /Border [0 0 0]
+        /Subtype /Link /A << /S /URI /URI (#1) >> >>}%
+    \endgroup}
+  \def\endlink{\setcolor{\maincolor}\special{pdf:eann}}
+  \def\pdfgettoks#1.{\setbox\boxA=\hbox{\toksA={#1.}\toksB={}\maketoks}}
+  \def\addtokens#1#2{\edef\addtoks{\noexpand#1={\the#1#2}}\addtoks}
+  \def\adn#1{\addtokens{\toksC}{#1}\global\countA=1\let\next=\maketoks}
+  \def\poptoks#1#2|ENDTOKS|{\let\first=#1\toksD={#1}\toksA={#2}}
+  \def\maketoks{%
+    \expandafter\poptoks\the\toksA|ENDTOKS|\relax
+    \ifx\first0\adn0
+    \else\ifx\first1\adn1 \else\ifx\first2\adn2 \else\ifx\first3\adn3
+    \else\ifx\first4\adn4 \else\ifx\first5\adn5 \else\ifx\first6\adn6
+    \else\ifx\first7\adn7 \else\ifx\first8\adn8 \else\ifx\first9\adn9
+    \else
+      \ifnum0=\countA\else\makelink\fi
+      \ifx\first.\let\next=\done\else
+        \let\next=\maketoks
+        \addtokens{\toksB}{\the\toksD}
+        \ifx\first,\addtokens{\toksB}{\space}\fi
+      \fi
+    \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
+    \next}
+  \def\makelink{\addtokens{\toksB}%
+    {\noexpand\pdflink{\the\toksC}}\toksC={}\global\countA=0}
+  \def\pdflink#1{%
+    \special{pdf:bann << /Border [0 0 0]
+      /Type /Annot /Subtype /Link /A << /S /GoTo /D (#1) >> >>}%
+    \setcolor{\linkcolor}#1\endlink}
+  \def\done{\edef\st{\global\noexpand\toksA={\the\toksB}}\st}
+%
+  %
+  % @image support
+  %
+  % #1 is image name, #2 width (might be empty/whitespace), #3 height (ditto).
+  \def\doxeteximage#1#2#3{%
+    \def\xeteximagewidth{#2}\setbox0 = \hbox{\ignorespaces #2}%
+    \def\xeteximageheight{#3}\setbox2 = \hbox{\ignorespaces #3}%
+    %
+    % XeTeX (and the PDF format) supports .pdf, .png, .jpg (among
+    % others).  Let's try in that order, PDF first since if
+    % someone has a scalable image, presumably better to use that than a
+    % bitmap.
+    \let\xeteximgext=\empty
+    \begingroup
+      \openin 1 #1.pdf \ifeof 1
+        \openin 1 #1.PDF \ifeof 1
+          \openin 1 #1.png \ifeof 1
+            \openin 1 #1.jpg \ifeof 1
+              \openin 1 #1.jpeg \ifeof 1
+                \openin 1 #1.JPG \ifeof 1
+                  \errmessage{Could not find image file #1 for XeTeX}%
+                \else \gdef\xeteximgext{JPG}%
+                \fi
+              \else \gdef\xeteximgext{jpeg}%
+              \fi
+            \else \gdef\xeteximgext{jpg}%
+            \fi
+          \else \gdef\xeteximgext{png}%
+          \fi
+        \else \gdef\xeteximgext{PDF}%
+        \fi
+      \else \gdef\xeteximgext{pdf}%
+      \fi
+      \closein 1
+    \endgroup
+    %
+    % Putting an \hbox around the image can prevent an over-long line
+    % after the image.
+    \hbox\bgroup
+      \def\xetexpdfext{pdf}%
+      \ifx\xeteximgext\xetexpdfext
+        \XeTeXpdffile "#1".\xeteximgext ""
+      \else
+        \def\xetexpdfext{PDF}%
+        \ifx\xeteximgext\xetexpdfext
+          \XeTeXpdffile "#1".\xeteximgext ""
+        \else
+          \XeTeXpicfile "#1".\xeteximgext ""
+        \fi
+      \fi
+      \ifdim \wd0 >0pt width \xeteximagewidth \fi
+      \ifdim \wd2 >0pt height \xeteximageheight \fi \relax
+    \egroup
+  }
+\fi
+
+
+%
+\message{fonts,}
+
+% Set the baselineskip to #1, and the lineskip and strut size
+% correspondingly.  There is no deep meaning behind these magic numbers
+% used as factors; they just match (closely enough) what Knuth defined.
+%
+\def\lineskipfactor{.08333}
+\def\strutheightpercent{.70833}
+\def\strutdepthpercent {.29167}
+%
+% can get a sort of poor man's double spacing by redefining this.
+\def\baselinefactor{1}
+%
+\newdimen\textleading
+\def\setleading#1{%
+  \dimen0 = #1\relax
+  \normalbaselineskip = \baselinefactor\dimen0
+  \normallineskip = \lineskipfactor\normalbaselineskip
+  \normalbaselines
+  \setbox\strutbox =\hbox{%
+    \vrule width0pt height\strutheightpercent\baselineskip
+                    depth \strutdepthpercent \baselineskip
+  }%
+}
+
+% PDF CMaps.  See also LaTeX's t1.cmap.
+%
+% do nothing with this by default.
+\expandafter\let\csname cmapOT1\endcsname\gobble
+\expandafter\let\csname cmapOT1IT\endcsname\gobble
+\expandafter\let\csname cmapOT1TT\endcsname\gobble
+
+% if we are producing pdf, and we have \pdffontattr, then define cmaps.
+% (\pdffontattr was introduced many years ago, but people still run
+% older pdftex's; it's easy to conditionalize, so we do.)
+\ifpdf \ifx\pdffontattr\thisisundefined \else
+  \begingroup
+    \catcode`\^^M=\active \def^^M{^^J}% Output line endings as the ^^J char.
+    \catcode`\%=12 \immediate\pdfobj stream {%!PS-Adobe-3.0 Resource-CMap
+%%DocumentNeededResources: ProcSet (CIDInit)
+%%IncludeResource: ProcSet (CIDInit)
+%%BeginResource: CMap (TeX-OT1-0)
+%%Title: (TeX-OT1-0 TeX OT1 0)
+%%Version: 1.000
+%%EndComments
+/CIDInit /ProcSet findresource begin
+12 dict begin
+begincmap
+/CIDSystemInfo
+<< /Registry (TeX)
+/Ordering (OT1)
+/Supplement 0
+>> def
+/CMapName /TeX-OT1-0 def
+/CMapType 2 def
+1 begincodespacerange
+<00> <7F>
+endcodespacerange
+8 beginbfrange
+<00> <01> <0393>
+<09> <0A> <03A8>
+<23> <26> <0023>
+<28> <3B> <0028>
+<3F> <5B> <003F>
+<5D> <5E> <005D>
+<61> <7A> <0061>
+<7B> <7C> <2013>
+endbfrange
+40 beginbfchar
+<02> <0398>
+<03> <039B>
+<04> <039E>
+<05> <03A0>
+<06> <03A3>
+<07> <03D2>
+<08> <03A6>
+<0B> <00660066>
+<0C> <00660069>
+<0D> <0066006C>
+<0E> <006600660069>
+<0F> <00660066006C>
+<10> <0131>
+<11> <0237>
+<12> <0060>
+<13> <00B4>
+<14> <02C7>
+<15> <02D8>
+<16> <00AF>
+<17> <02DA>
+<18> <00B8>
+<19> <00DF>
+<1A> <00E6>
+<1B> <0153>
+<1C> <00F8>
+<1D> <00C6>
+<1E> <0152>
+<1F> <00D8>
+<21> <0021>
+<22> <201D>
+<27> <2019>
+<3C> <00A1>
+<3D> <003D>
+<3E> <00BF>
+<5C> <201C>
+<5F> <02D9>
+<60> <2018>
+<7D> <02DD>
+<7E> <007E>
+<7F> <00A8>
+endbfchar
+endcmap
+CMapName currentdict /CMap defineresource pop
+end
+end
+%%EndResource
+%%EOF
+    }\endgroup
+  \expandafter\edef\csname cmapOT1\endcsname#1{%
+    \pdffontattr#1{/ToUnicode \the\pdflastobj\space 0 R}%
+  }%
+%
+% \cmapOT1IT
+  \begingroup
+    \catcode`\^^M=\active \def^^M{^^J}% Output line endings as the ^^J char.
+    \catcode`\%=12 \immediate\pdfobj stream {%!PS-Adobe-3.0 Resource-CMap
+%%DocumentNeededResources: ProcSet (CIDInit)
+%%IncludeResource: ProcSet (CIDInit)
+%%BeginResource: CMap (TeX-OT1IT-0)
+%%Title: (TeX-OT1IT-0 TeX OT1IT 0)
+%%Version: 1.000
+%%EndComments
+/CIDInit /ProcSet findresource begin
+12 dict begin
+begincmap
+/CIDSystemInfo
+<< /Registry (TeX)
+/Ordering (OT1IT)
+/Supplement 0
+>> def
+/CMapName /TeX-OT1IT-0 def
+/CMapType 2 def
+1 begincodespacerange
+<00> <7F>
+endcodespacerange
+8 beginbfrange
+<00> <01> <0393>
+<09> <0A> <03A8>
+<25> <26> <0025>
+<28> <3B> <0028>
+<3F> <5B> <003F>
+<5D> <5E> <005D>
+<61> <7A> <0061>
+<7B> <7C> <2013>
+endbfrange
+42 beginbfchar
+<02> <0398>
+<03> <039B>
+<04> <039E>
+<05> <03A0>
+<06> <03A3>
+<07> <03D2>
+<08> <03A6>
+<0B> <00660066>
+<0C> <00660069>
+<0D> <0066006C>
+<0E> <006600660069>
+<0F> <00660066006C>
+<10> <0131>
+<11> <0237>
+<12> <0060>
+<13> <00B4>
+<14> <02C7>
+<15> <02D8>
+<16> <00AF>
+<17> <02DA>
+<18> <00B8>
+<19> <00DF>
+<1A> <00E6>
+<1B> <0153>
+<1C> <00F8>
+<1D> <00C6>
+<1E> <0152>
+<1F> <00D8>
+<21> <0021>
+<22> <201D>
+<23> <0023>
+<24> <00A3>
+<27> <2019>
+<3C> <00A1>
+<3D> <003D>
+<3E> <00BF>
+<5C> <201C>
+<5F> <02D9>
+<60> <2018>
+<7D> <02DD>
+<7E> <007E>
+<7F> <00A8>
+endbfchar
+endcmap
+CMapName currentdict /CMap defineresource pop
+end
+end
+%%EndResource
+%%EOF
+    }\endgroup
+  \expandafter\edef\csname cmapOT1IT\endcsname#1{%
+    \pdffontattr#1{/ToUnicode \the\pdflastobj\space 0 R}%
+  }%
+%
+% \cmapOT1TT
+  \begingroup
+    \catcode`\^^M=\active \def^^M{^^J}% Output line endings as the ^^J char.
+    \catcode`\%=12 \immediate\pdfobj stream {%!PS-Adobe-3.0 Resource-CMap
+%%DocumentNeededResources: ProcSet (CIDInit)
+%%IncludeResource: ProcSet (CIDInit)
+%%BeginResource: CMap (TeX-OT1TT-0)
+%%Title: (TeX-OT1TT-0 TeX OT1TT 0)
+%%Version: 1.000
+%%EndComments
+/CIDInit /ProcSet findresource begin
+12 dict begin
+begincmap
+/CIDSystemInfo
+<< /Registry (TeX)
+/Ordering (OT1TT)
+/Supplement 0
+>> def
+/CMapName /TeX-OT1TT-0 def
+/CMapType 2 def
+1 begincodespacerange
+<00> <7F>
+endcodespacerange
+5 beginbfrange
+<00> <01> <0393>
+<09> <0A> <03A8>
+<21> <26> <0021>
+<28> <5F> <0028>
+<61> <7E> <0061>
+endbfrange
+32 beginbfchar
+<02> <0398>
+<03> <039B>
+<04> <039E>
+<05> <03A0>
+<06> <03A3>
+<07> <03D2>
+<08> <03A6>
+<0B> <2191>
+<0C> <2193>
+<0D> <0027>
+<0E> <00A1>
+<0F> <00BF>
+<10> <0131>
+<11> <0237>
+<12> <0060>
+<13> <00B4>
+<14> <02C7>
+<15> <02D8>
+<16> <00AF>
+<17> <02DA>
+<18> <00B8>
+<19> <00DF>
+<1A> <00E6>
+<1B> <0153>
+<1C> <00F8>
+<1D> <00C6>
+<1E> <0152>
+<1F> <00D8>
+<20> <2423>
+<27> <2019>
+<60> <2018>
+<7F> <00A8>
+endbfchar
+endcmap
+CMapName currentdict /CMap defineresource pop
+end
+end
+%%EndResource
+%%EOF
+    }\endgroup
+  \expandafter\edef\csname cmapOT1TT\endcsname#1{%
+    \pdffontattr#1{/ToUnicode \the\pdflastobj\space 0 R}%
+  }%
+\fi\fi
+
+
+% Set the font macro #1 to the font named \fontprefix#2.
+% #3 is the font's design size, #4 is a scale factor, #5 is the CMap
+% encoding (only OT1, OT1IT and OT1TT are allowed, or empty to omit).
+% Example:
+% #1 = \textrm
+% #2 = \rmshape
+% #3 = 10
+% #4 = \mainmagstep
+% #5 = OT1
+%
+\def\setfont#1#2#3#4#5{%
+  \font#1=\fontprefix#2#3 scaled #4
+  \csname cmap#5\endcsname#1%
+}
+% This is what gets called when #5 of \setfont is empty.
+\let\cmap\gobble
+%
+% (end of cmaps)
+
+% Use cm as the default font prefix.
+% To specify the font prefix, you must define \fontprefix
+% before you read in texinfo.tex.
+\ifx\fontprefix\thisisundefined
+\def\fontprefix{cm}
+\fi
+% Support font families that don't use the same naming scheme as CM.
+\def\rmshape{r}
+\def\rmbshape{bx}               % where the normal face is bold
+\def\bfshape{b}
+\def\bxshape{bx}
+\def\ttshape{tt}
+\def\ttbshape{tt}
+\def\ttslshape{sltt}
+\def\itshape{ti}
+\def\itbshape{bxti}
+\def\slshape{sl}
+\def\slbshape{bxsl}
+\def\sfshape{ss}
+\def\sfbshape{ss}
+\def\scshape{csc}
+\def\scbshape{csc}
+
+% Definitions for a main text size of 11pt.  (The default in Texinfo.)
+%
+\def\definetextfontsizexi{%
+% Text fonts (11.2pt, magstep1).
+\def\textnominalsize{11pt}
+\edef\mainmagstep{\magstephalf}
+\setfont\textrm\rmshape{10}{\mainmagstep}{OT1}
+\setfont\texttt\ttshape{10}{\mainmagstep}{OT1TT}
+\setfont\textbf\bfshape{10}{\mainmagstep}{OT1}
+\setfont\textit\itshape{10}{\mainmagstep}{OT1IT}
+\setfont\textsl\slshape{10}{\mainmagstep}{OT1}
+\setfont\textsf\sfshape{10}{\mainmagstep}{OT1}
+\setfont\textsc\scshape{10}{\mainmagstep}{OT1}
+\setfont\textttsl\ttslshape{10}{\mainmagstep}{OT1TT}
+\font\texti=cmmi10 scaled \mainmagstep
+\font\textsy=cmsy10 scaled \mainmagstep
+\def\textecsize{1095}
+
+% A few fonts for @defun names and args.
+\setfont\defbf\bfshape{10}{\magstep1}{OT1}
+\setfont\deftt\ttshape{10}{\magstep1}{OT1TT}
+\setfont\defsl\slshape{10}{\magstep1}{OT1}
+\setfont\defttsl\ttslshape{10}{\magstep1}{OT1TT}
+\def\df{\let\ttfont=\deftt \let\bffont = \defbf
+\let\ttslfont=\defttsl \let\slfont=\defsl \bf}
+
+% Fonts for indices, footnotes, small examples (9pt).
+\def\smallnominalsize{9pt}
+\setfont\smallrm\rmshape{9}{1000}{OT1}
+\setfont\smalltt\ttshape{9}{1000}{OT1TT}
+\setfont\smallbf\bfshape{10}{900}{OT1}
+\setfont\smallit\itshape{9}{1000}{OT1IT}
+\setfont\smallsl\slshape{9}{1000}{OT1}
+\setfont\smallsf\sfshape{9}{1000}{OT1}
+\setfont\smallsc\scshape{10}{900}{OT1}
+\setfont\smallttsl\ttslshape{10}{900}{OT1TT}
+\font\smalli=cmmi9
+\font\smallsy=cmsy9
+\def\smallecsize{0900}
+
+% Fonts for small examples (8pt).
+\def\smallernominalsize{8pt}
+\setfont\smallerrm\rmshape{8}{1000}{OT1}
+\setfont\smallertt\ttshape{8}{1000}{OT1TT}
+\setfont\smallerbf\bfshape{10}{800}{OT1}
+\setfont\smallerit\itshape{8}{1000}{OT1IT}
+\setfont\smallersl\slshape{8}{1000}{OT1}
+\setfont\smallersf\sfshape{8}{1000}{OT1}
+\setfont\smallersc\scshape{10}{800}{OT1}
+\setfont\smallerttsl\ttslshape{10}{800}{OT1TT}
+\font\smalleri=cmmi8
+\font\smallersy=cmsy8
+\def\smallerecsize{0800}
+
+% Fonts for math mode superscripts (7pt).
+\def\sevennominalsize{7pt}
+\setfont\sevenrm\rmshape{7}{1000}{OT1}
+\setfont\seventt\ttshape{10}{700}{OT1TT}
+\setfont\sevenbf\bfshape{10}{700}{OT1}
+\setfont\sevenit\itshape{7}{1000}{OT1IT}
+\setfont\sevensl\slshape{10}{700}{OT1}
+\setfont\sevensf\sfshape{10}{700}{OT1}
+\setfont\sevensc\scshape{10}{700}{OT1}
+\setfont\seventtsl\ttslshape{10}{700}{OT1TT}
+\font\seveni=cmmi7
+\font\sevensy=cmsy7
+\def\sevenecsize{0700}
+
+% Fonts for title page (20.4pt):
+\def\titlenominalsize{20pt}
+\setfont\titlerm\rmbshape{12}{\magstep3}{OT1}
+\setfont\titleit\itbshape{10}{\magstep4}{OT1IT}
+\setfont\titlesl\slbshape{10}{\magstep4}{OT1}
+\setfont\titlett\ttbshape{12}{\magstep3}{OT1TT}
+\setfont\titlettsl\ttslshape{10}{\magstep4}{OT1TT}
+\setfont\titlesf\sfbshape{17}{\magstep1}{OT1}
+\let\titlebf=\titlerm
+\setfont\titlesc\scbshape{10}{\magstep4}{OT1}
+\font\titlei=cmmi12 scaled \magstep3
+\font\titlesy=cmsy10 scaled \magstep4
+\def\titleecsize{2074}
+
+% Chapter (and unnumbered) fonts (17.28pt).
+\def\chapnominalsize{17pt}
+\setfont\chaprm\rmbshape{12}{\magstep2}{OT1}
+\setfont\chapit\itbshape{10}{\magstep3}{OT1IT}
+\setfont\chapsl\slbshape{10}{\magstep3}{OT1}
+\setfont\chaptt\ttbshape{12}{\magstep2}{OT1TT}
+\setfont\chapttsl\ttslshape{10}{\magstep3}{OT1TT}
+\setfont\chapsf\sfbshape{17}{1000}{OT1}
+\let\chapbf=\chaprm
+\setfont\chapsc\scbshape{10}{\magstep3}{OT1}
+\font\chapi=cmmi12 scaled \magstep2
+\font\chapsy=cmsy10 scaled \magstep3
+\def\chapecsize{1728}
+
+% Section fonts (14.4pt).
+\def\secnominalsize{14pt}
+\setfont\secrm\rmbshape{12}{\magstep1}{OT1}
+\setfont\secrmnotbold\rmshape{12}{\magstep1}{OT1}
+\setfont\secit\itbshape{10}{\magstep2}{OT1IT}
+\setfont\secsl\slbshape{10}{\magstep2}{OT1}
+\setfont\sectt\ttbshape{12}{\magstep1}{OT1TT}
+\setfont\secttsl\ttslshape{10}{\magstep2}{OT1TT}
+\setfont\secsf\sfbshape{12}{\magstep1}{OT1}
+\let\secbf\secrm
+\setfont\secsc\scbshape{10}{\magstep2}{OT1}
+\font\seci=cmmi12 scaled \magstep1
+\font\secsy=cmsy10 scaled \magstep2
+\def\sececsize{1440}
+
+% Subsection fonts (13.15pt).
+\def\ssecnominalsize{13pt}
+\setfont\ssecrm\rmbshape{12}{\magstephalf}{OT1}
+\setfont\ssecit\itbshape{10}{1315}{OT1IT}
+\setfont\ssecsl\slbshape{10}{1315}{OT1}
+\setfont\ssectt\ttbshape{12}{\magstephalf}{OT1TT}
+\setfont\ssecttsl\ttslshape{10}{1315}{OT1TT}
+\setfont\ssecsf\sfbshape{12}{\magstephalf}{OT1}
+\let\ssecbf\ssecrm
+\setfont\ssecsc\scbshape{10}{1315}{OT1}
+\font\sseci=cmmi12 scaled \magstephalf
+\font\ssecsy=cmsy10 scaled 1315
+\def\ssececsize{1200}
+
+% Reduced fonts for @acronym in text (10pt).
+\def\reducednominalsize{10pt}
+\setfont\reducedrm\rmshape{10}{1000}{OT1}
+\setfont\reducedtt\ttshape{10}{1000}{OT1TT}
+\setfont\reducedbf\bfshape{10}{1000}{OT1}
+\setfont\reducedit\itshape{10}{1000}{OT1IT}
+\setfont\reducedsl\slshape{10}{1000}{OT1}
+\setfont\reducedsf\sfshape{10}{1000}{OT1}
+\setfont\reducedsc\scshape{10}{1000}{OT1}
+\setfont\reducedttsl\ttslshape{10}{1000}{OT1TT}
+\font\reducedi=cmmi10
+\font\reducedsy=cmsy10
+\def\reducedecsize{1000}
+
+\textleading = 13.2pt % line spacing for 11pt CM
+\textfonts            % reset the current fonts
+\rm
+} % end of 11pt text font size definitions, \definetextfontsizexi
+
+
+% Definitions to make the main text be 10pt Computer Modern, with
+% section, chapter, etc., sizes following suit.  This is for the GNU
+% Press printing of the Emacs 22 manual.  Maybe other manuals in the
+% future.  Used with @smallbook, which sets the leading to 12pt.
+%
+\def\definetextfontsizex{%
+% Text fonts (10pt).
+\def\textnominalsize{10pt}
+\edef\mainmagstep{1000}
+\setfont\textrm\rmshape{10}{\mainmagstep}{OT1}
+\setfont\texttt\ttshape{10}{\mainmagstep}{OT1TT}
+\setfont\textbf\bfshape{10}{\mainmagstep}{OT1}
+\setfont\textit\itshape{10}{\mainmagstep}{OT1IT}
+\setfont\textsl\slshape{10}{\mainmagstep}{OT1}
+\setfont\textsf\sfshape{10}{\mainmagstep}{OT1}
+\setfont\textsc\scshape{10}{\mainmagstep}{OT1}
+\setfont\textttsl\ttslshape{10}{\mainmagstep}{OT1TT}
+\font\texti=cmmi10 scaled \mainmagstep
+\font\textsy=cmsy10 scaled \mainmagstep
+\def\textecsize{1000}
+
+% A few fonts for @defun names and args.
+\setfont\defbf\bfshape{10}{\magstephalf}{OT1}
+\setfont\deftt\ttshape{10}{\magstephalf}{OT1TT}
+\setfont\defsl\slshape{10}{\magstephalf}{OT1}
+\setfont\defttsl\ttslshape{10}{\magstephalf}{OT1TT}
+\def\df{\let\ttfont=\deftt \let\bffont = \defbf
+\let\slfont=\defsl \let\ttslfont=\defttsl \bf}
+
+% Fonts for indices, footnotes, small examples (9pt).
+\def\smallnominalsize{9pt}
+\setfont\smallrm\rmshape{9}{1000}{OT1}
+\setfont\smalltt\ttshape{9}{1000}{OT1TT}
+\setfont\smallbf\bfshape{10}{900}{OT1}
+\setfont\smallit\itshape{9}{1000}{OT1IT}
+\setfont\smallsl\slshape{9}{1000}{OT1}
+\setfont\smallsf\sfshape{9}{1000}{OT1}
+\setfont\smallsc\scshape{10}{900}{OT1}
+\setfont\smallttsl\ttslshape{10}{900}{OT1TT}
+\font\smalli=cmmi9
+\font\smallsy=cmsy9
+\def\smallecsize{0900}
+
+% Fonts for small examples (8pt).
+\def\smallernominalsize{8pt}
+\setfont\smallerrm\rmshape{8}{1000}{OT1}
+\setfont\smallertt\ttshape{8}{1000}{OT1TT}
+\setfont\smallerbf\bfshape{10}{800}{OT1}
+\setfont\smallerit\itshape{8}{1000}{OT1IT}
+\setfont\smallersl\slshape{8}{1000}{OT1}
+\setfont\smallersf\sfshape{8}{1000}{OT1}
+\setfont\smallersc\scshape{10}{800}{OT1}
+\setfont\smallerttsl\ttslshape{10}{800}{OT1TT}
+\font\smalleri=cmmi8
+\font\smallersy=cmsy8
+\def\smallerecsize{0800}
+
+% Fonts for math mode superscripts (7pt).
+\def\sevennominalsize{7pt}
+\setfont\sevenrm\rmshape{7}{1000}{OT1}
+\setfont\seventt\ttshape{10}{700}{OT1TT}
+\setfont\sevenbf\bfshape{10}{700}{OT1}
+\setfont\sevenit\itshape{7}{1000}{OT1IT}
+\setfont\sevensl\slshape{10}{700}{OT1}
+\setfont\sevensf\sfshape{10}{700}{OT1}
+\setfont\sevensc\scshape{10}{700}{OT1}
+\setfont\seventtsl\ttslshape{10}{700}{OT1TT}
+\font\seveni=cmmi7
+\font\sevensy=cmsy7
+\def\sevenecsize{0700}
+
+% Fonts for title page (20.4pt):
+\def\titlenominalsize{20pt}
+\setfont\titlerm\rmbshape{12}{\magstep3}{OT1}
+\setfont\titleit\itbshape{10}{\magstep4}{OT1IT}
+\setfont\titlesl\slbshape{10}{\magstep4}{OT1}
+\setfont\titlett\ttbshape{12}{\magstep3}{OT1TT}
+\setfont\titlettsl\ttslshape{10}{\magstep4}{OT1TT}
+\setfont\titlesf\sfbshape{17}{\magstep1}{OT1}
+\let\titlebf=\titlerm
+\setfont\titlesc\scbshape{10}{\magstep4}{OT1}
+\font\titlei=cmmi12 scaled \magstep3
+\font\titlesy=cmsy10 scaled \magstep4
+\def\titleecsize{2074}
+
+% Chapter fonts (14.4pt).
+\def\chapnominalsize{14pt}
+\setfont\chaprm\rmbshape{12}{\magstep1}{OT1}
+\setfont\chapit\itbshape{10}{\magstep2}{OT1IT}
+\setfont\chapsl\slbshape{10}{\magstep2}{OT1}
+\setfont\chaptt\ttbshape{12}{\magstep1}{OT1TT}
+\setfont\chapttsl\ttslshape{10}{\magstep2}{OT1TT}
+\setfont\chapsf\sfbshape{12}{\magstep1}{OT1}
+\let\chapbf\chaprm
+\setfont\chapsc\scbshape{10}{\magstep2}{OT1}
+\font\chapi=cmmi12 scaled \magstep1
+\font\chapsy=cmsy10 scaled \magstep2
+\def\chapecsize{1440}
+
+% Section fonts (12pt).
+\def\secnominalsize{12pt}
+\setfont\secrm\rmbshape{12}{1000}{OT1}
+\setfont\secit\itbshape{10}{\magstep1}{OT1IT}
+\setfont\secsl\slbshape{10}{\magstep1}{OT1}
+\setfont\sectt\ttbshape{12}{1000}{OT1TT}
+\setfont\secttsl\ttslshape{10}{\magstep1}{OT1TT}
+\setfont\secsf\sfbshape{12}{1000}{OT1}
+\let\secbf\secrm
+\setfont\secsc\scbshape{10}{\magstep1}{OT1}
+\font\seci=cmmi12
+\font\secsy=cmsy10 scaled \magstep1
+\def\sececsize{1200}
+
+% Subsection fonts (10pt).
+\def\ssecnominalsize{10pt}
+\setfont\ssecrm\rmbshape{10}{1000}{OT1}
+\setfont\ssecit\itbshape{10}{1000}{OT1IT}
+\setfont\ssecsl\slbshape{10}{1000}{OT1}
+\setfont\ssectt\ttbshape{10}{1000}{OT1TT}
+\setfont\ssecttsl\ttslshape{10}{1000}{OT1TT}
+\setfont\ssecsf\sfbshape{10}{1000}{OT1}
+\let\ssecbf\ssecrm
+\setfont\ssecsc\scbshape{10}{1000}{OT1}
+\font\sseci=cmmi10
+\font\ssecsy=cmsy10
+\def\ssececsize{1000}
+
+% Reduced fonts for @acronym in text (9pt).
+\def\reducednominalsize{9pt}
+\setfont\reducedrm\rmshape{9}{1000}{OT1}
+\setfont\reducedtt\ttshape{9}{1000}{OT1TT}
+\setfont\reducedbf\bfshape{10}{900}{OT1}
+\setfont\reducedit\itshape{9}{1000}{OT1IT}
+\setfont\reducedsl\slshape{9}{1000}{OT1}
+\setfont\reducedsf\sfshape{9}{1000}{OT1}
+\setfont\reducedsc\scshape{10}{900}{OT1}
+\setfont\reducedttsl\ttslshape{10}{900}{OT1TT}
+\font\reducedi=cmmi9
+\font\reducedsy=cmsy9
+\def\reducedecsize{0900}
+
+\divide\parskip by 2  % reduce space between paragraphs
+\textleading = 12pt   % line spacing for 10pt CM
+\textfonts            % reset the current fonts
+\rm
+} % end of 10pt text font size definitions, \definetextfontsizex
+
+% Fonts for short table of contents.
+\setfont\shortcontrm\rmshape{12}{1000}{OT1}
+\setfont\shortcontbf\bfshape{10}{\magstep1}{OT1}  % no cmb12
+\setfont\shortcontsl\slshape{12}{1000}{OT1}
+\setfont\shortconttt\ttshape{12}{1000}{OT1TT}
+
+
+% We provide the user-level command
+%   @fonttextsize 10
+% (or 11) to redefine the text font size.  pt is assumed.
+%
+\def\xiword{11}
+\def\xword{10}
+\def\xwordpt{10pt}
+%
+\parseargdef\fonttextsize{%
+  \def\textsizearg{#1}%
+  %\wlog{doing @fonttextsize \textsizearg}%
+  %
+  % Set \globaldefs so that documents can use this inside @tex, since
+  % makeinfo 4.8 does not support it, but we need it nonetheless.
+  %
+ \begingroup \globaldefs=1
+  \ifx\textsizearg\xword \definetextfontsizex
+  \else \ifx\textsizearg\xiword \definetextfontsizexi
+  \else
+    \errhelp=\EMsimple
+    \errmessage{@fonttextsize only supports `10' or `11', not `\textsizearg'}
+  \fi\fi
+ \endgroup
+}
+
+%
+% Change the current font style to #1, remembering it in \curfontstyle.
+% For now, we do not accumulate font styles: @b{@i{foo}} prints foo in
+% italics, not bold italics.
+%
+\def\setfontstyle#1{%
+  \def\curfontstyle{#1}% not as a control sequence, because we are \edef'd.
+  \csname #1font\endcsname  % change the current font
+}
+
+\def\rm{\fam=0 \setfontstyle{rm}}
+\def\it{\fam=\itfam \setfontstyle{it}}
+\def\sl{\fam=\slfam \setfontstyle{sl}}
+\def\bf{\fam=\bffam \setfontstyle{bf}}\def\bfstylename{bf}
+\def\tt{\fam=\ttfam \setfontstyle{tt}}\def\ttstylename{tt}
+
+% Texinfo sort of supports the sans serif font style, which plain TeX does not.
+% So we set up a \sf.
+\newfam\sffam
+\def\sf{\fam=\sffam \setfontstyle{sf}}
+
+% We don't need math for this font style.
+\def\ttsl{\setfontstyle{ttsl}}
+
+
+% In order for the font changes to affect most math symbols and letters,
+% we have to define the \textfont of the standard families.
+% We don't bother to reset \scriptscriptfont; awaiting user need.
+%
+\def\resetmathfonts{%
+  \textfont0=\rmfont \textfont1=\ifont \textfont2=\syfont
+  \textfont\itfam=\itfont \textfont\slfam=\slfont \textfont\bffam=\bffont
+  \textfont\ttfam=\ttfont \textfont\sffam=\sffont
+  %
+  % Fonts for superscript.  Note that the 7pt fonts are used regardless
+  % of the current font size.
+  \scriptfont0=\sevenrm \scriptfont1=\seveni \scriptfont2=\sevensy
+  \scriptfont\itfam=\sevenit \scriptfont\slfam=\sevensl
+  \scriptfont\bffam=\sevenbf \scriptfont\ttfam=\seventt
+  \scriptfont\sffam=\sevensf
+}
+
+%
+
+% The font-changing commands (all called \...fonts) redefine the meanings
+% of \STYLEfont, instead of just \STYLE.  We do this because \STYLE needs
+% to also set the current \fam for math mode.  Our \STYLE (e.g., \rm)
+% commands hardwire \STYLEfont to set the current font.
+%
+% The fonts used for \ifont are for "math italics"  (\itfont is for italics
+% in regular text).  \syfont is also used in math mode only.
+%
+% Each font-changing command also sets the names \lsize (one size lower)
+% and \lllsize (three sizes lower).  These relative commands are used
+% in, e.g., the LaTeX logo and acronyms.
+%
+% This all needs generalizing, badly.
+%
+
+\def\assignfonts#1{%
+  \expandafter\let\expandafter\rmfont\csname #1rm\endcsname
+  \expandafter\let\expandafter\itfont\csname #1it\endcsname
+  \expandafter\let\expandafter\slfont\csname #1sl\endcsname
+  \expandafter\let\expandafter\bffont\csname #1bf\endcsname
+  \expandafter\let\expandafter\ttfont\csname #1tt\endcsname
+  \expandafter\let\expandafter\smallcaps\csname #1sc\endcsname
+  \expandafter\let\expandafter\sffont  \csname #1sf\endcsname
+  \expandafter\let\expandafter\ifont   \csname #1i\endcsname
+  \expandafter\let\expandafter\syfont  \csname #1sy\endcsname
+  \expandafter\let\expandafter\ttslfont\csname #1ttsl\endcsname
+}
+
+\newif\ifrmisbold
+
+% Select smaller font size with the current style.  Used to change font size
+% in, e.g., the LaTeX logo and acronyms.  If we are using bold fonts for
+% normal roman text, also use bold fonts for roman text in the smaller size.
+\def\switchtolllsize{%
+   \expandafter\assignfonts\expandafter{\lllsize}%
+   \ifrmisbold
+     \let\rmfont\bffont
+   \fi
+   \csname\curfontstyle\endcsname
+}%
+
+\def\switchtolsize{%
+   \expandafter\assignfonts\expandafter{\lsize}%
+   \ifrmisbold
+     \let\rmfont\bffont
+   \fi
+   \csname\curfontstyle\endcsname
+}%
+
+\def\definefontsetatsize#1#2#3#4#5{%
+\expandafter\def\csname #1fonts\endcsname{%
+  \def\curfontsize{#1}%
+  \def\lsize{#2}\def\lllsize{#3}%
+  \csname rmisbold#5\endcsname
+  \assignfonts{#1}%
+  \resetmathfonts
+  \setleading{#4}%
+}}
+
+\definefontsetatsize{text}   {reduced}{smaller}{\textleading}{false}
+\definefontsetatsize{title}  {chap}   {subsec} {27pt}  {true}
+\definefontsetatsize{chap}   {sec}    {text}   {19pt}  {true}
+\definefontsetatsize{sec}    {subsec} {reduced}{17pt}  {true}
+\definefontsetatsize{ssec}   {text}   {small}  {15pt}  {true}
+\definefontsetatsize{reduced}{small}  {smaller}{10.5pt}{false}
+\definefontsetatsize{small}  {smaller}{smaller}{10.5pt}{false}
+\definefontsetatsize{smaller}{smaller}{smaller}{9.5pt} {false}
+
+\def\titlefont#1{{\titlefonts\rm #1}}
+\let\subsecfonts = \ssecfonts
+\let\subsubsecfonts = \ssecfonts
+
+% Define these just so they can be easily changed for other fonts.
+\def\angleleft{$\langle$}
+\def\angleright{$\rangle$}
+
+% Set the fonts to use with the @small... environments.
+\let\smallexamplefonts = \smallfonts
+
+% About \smallexamplefonts.  If we use \smallfonts (9pt), @smallexample
+% can fit this many characters:
+%   8.5x11=86   smallbook=72  a4=90  a5=69
+% If we use \scriptfonts (8pt), then we can fit this many characters:
+%   8.5x11=90+  smallbook=80  a4=90+  a5=77
+% For me, subjectively, the few extra characters that fit aren't worth
+% the additional smallness of 8pt.  So I'm making the default 9pt.
+%
+% By the way, for comparison, here's what fits with @example (10pt):
+%   8.5x11=71  smallbook=60  a4=75  a5=58
+% --karl, 24jan03.
+
+% Set up the default fonts, so we can use them for creating boxes.
+%
+\definetextfontsizexi
+
+
+% Check if we are currently using a typewriter font.  Since all the
+% Computer Modern typewriter fonts have zero interword stretch (and
+% shrink), and it is reasonable to expect all typewriter fonts to have
+% this property, we can check that font parameter.
+%
+\def\ifmonospace{\ifdim\fontdimen3\font=0pt }
+
+{
+\catcode`\'=\active
+\catcode`\`=\active
+
+\gdef\setcodequotes{\let`\codequoteleft \let'\codequoteright}
+\gdef\setregularquotes{\let`\lq \let'\rq}
+}
+
+% Allow an option to not use regular directed right quote/apostrophe
+% (char 0x27), but instead the undirected quote from cmtt (char 0x0d).
+% The undirected quote is ugly, so don't make it the default, but it
+% works for pasting with more pdf viewers (at least evince), the
+% lilypond developers report.  xpdf does work with the regular 0x27.
+%
+\def\codequoteright{%
+  \ifmonospace
+    \expandafter\ifx\csname SETtxicodequoteundirected\endcsname\relax
+      \expandafter\ifx\csname SETcodequoteundirected\endcsname\relax
+        '%
+      \else \char'15 \fi
+    \else \char'15 \fi
+   \else
+     '%
+   \fi
+}
+%
+% and a similar option for the left quote char vs. a grave accent.
+% Modern fonts display ASCII 0x60 as a grave accent, so some people like
+% the code environments to do likewise.
+%
+\def\codequoteleft{%
+  \ifmonospace
+    \expandafter\ifx\csname SETtxicodequotebacktick\endcsname\relax
+      \expandafter\ifx\csname SETcodequotebacktick\endcsname\relax
+        % [Knuth] pp. 380,381,391
+        % \relax disables Spanish ligatures ?` and !` of \tt font.
+        \relax`%
+      \else \char'22 \fi
+    \else \char'22 \fi
+   \else
+     \relax`%
+   \fi
+}
+
+% Commands to set the quote options.
+% 
+\parseargdef\codequoteundirected{%
+  \def\temp{#1}%
+  \ifx\temp\onword
+    \expandafter\let\csname SETtxicodequoteundirected\endcsname
+      = t%
+  \else\ifx\temp\offword
+    \expandafter\let\csname SETtxicodequoteundirected\endcsname
+      = \relax
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @codequoteundirected value `\temp', must be on|off}%
+  \fi\fi
+}
+%
+\parseargdef\codequotebacktick{%
+  \def\temp{#1}%
+  \ifx\temp\onword
+    \expandafter\let\csname SETtxicodequotebacktick\endcsname
+      = t%
+  \else\ifx\temp\offword
+    \expandafter\let\csname SETtxicodequotebacktick\endcsname
+      = \relax
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @codequotebacktick value `\temp', must be on|off}%
+  \fi\fi
+}
+
+% [Knuth] pp. 380,381,391, disable Spanish ligatures ?` and !` of \tt font.
+\def\noligaturesquoteleft{\relax\lq}
+
+% Count depth in font-changes, for error checks
+\newcount\fontdepth \fontdepth=0
+
+% Font commands.
+
+% #1 is the font command (\sl or \it), #2 is the text to slant.
+% If we are in a monospaced environment, however, 1) always use \ttsl,
+% and 2) do not add an italic correction.
+\def\dosmartslant#1#2{%
+  \ifusingtt 
+    {{\ttsl #2}\let\next=\relax}%
+    {\def\next{{#1#2}\futurelet\next\smartitaliccorrection}}%
+  \next
+}
+\def\smartslanted{\dosmartslant\sl}
+\def\smartitalic{\dosmartslant\it}
+
+% Output an italic correction unless \next (presumed to be the following
+% character) is such as not to need one.
+\def\smartitaliccorrection{%
+  \ifx\next,%
+  \else\ifx\next-%
+  \else\ifx\next.%
+  \else\ifx\next\.%
+  \else\ifx\next\comma%
+  \else\ptexslash
+  \fi\fi\fi\fi\fi
+  \aftersmartic
+}
+
+% Unconditional use \ttsl, and no ic.  @var is set to this for defuns.
+\def\ttslanted#1{{\ttsl #1}}
+
+% @cite is like \smartslanted except unconditionally use \sl.  We never want
+% ttsl for book titles, do we?
+\def\cite#1{{\sl #1}\futurelet\next\smartitaliccorrection}
+
+\def\aftersmartic{}
+\def\var#1{%
+  \let\saveaftersmartic = \aftersmartic
+  \def\aftersmartic{\null\let\aftersmartic=\saveaftersmartic}%
+  \smartslanted{#1}%
+}
+
+\let\i=\smartitalic
+\let\slanted=\smartslanted
+\let\dfn=\smartslanted
+\let\emph=\smartitalic
+
+% Explicit font changes: @r, @sc, undocumented @ii.
+\def\r#1{{\rm #1}}              % roman font
+\def\sc#1{{\smallcaps#1}}       % smallcaps font
+\def\ii#1{{\it #1}}             % italic font
+
+% @b, explicit bold.  Also @strong.
+\def\b#1{{\bf #1}}
+\let\strong=\b
+
+% @sansserif, explicit sans.
+\def\sansserif#1{{\sf #1}}
+
+% We can't just use \exhyphenpenalty, because that only has effect at
+% the end of a paragraph.  Restore normal hyphenation at the end of the
+% group within which \nohyphenation is presumably called.
+%
+\def\nohyphenation{\hyphenchar\font = -1  \aftergroup\restorehyphenation}
+\def\restorehyphenation{\hyphenchar\font = `- }
+
+% Set sfcode to normal for the chars that usually have another value.
+% Can't use plain's \frenchspacing because it uses the `\x notation, and
+% sometimes \x has an active definition that messes things up.
+%
+\catcode`@=11
+  \def\plainfrenchspacing{%
+    \sfcode`\.=\@m \sfcode`\?=\@m \sfcode`\!=\@m
+    \sfcode`\:=\@m \sfcode`\;=\@m \sfcode`\,=\@m
+    \def\endofsentencespacefactor{1000}% for @. and friends
+  }
+  \def\plainnonfrenchspacing{%
+    \sfcode`\.3000\sfcode`\?3000\sfcode`\!3000
+    \sfcode`\:2000\sfcode`\;1500\sfcode`\,1250
+    \def\endofsentencespacefactor{3000}% for @. and friends
+  }
+\catcode`@=\other
+\def\endofsentencespacefactor{3000}% default
+
+% @t, explicit typewriter.
+\def\t#1{%
+  {\tt \plainfrenchspacing #1}%
+  \null
+}
+
+% @samp.
+\def\samp#1{{\setcodequotes\lq\tclose{#1}\rq\null}}
+
+% @indicateurl is \samp, that is, with quotes.
+\let\indicateurl=\samp
+
+% @code (and similar) prints in typewriter, but with spaces the same
+% size as normal in the surrounding text, without hyphenation, etc.
+% This is a subroutine for that.
+\def\tclose#1{%
+  {%
+    % Change normal interword space to be same as for the current font.
+    \spaceskip = \fontdimen2\font
+    %
+    % Switch to typewriter.
+    \tt
+    %
+    % But `\ ' produces the large typewriter interword space.
+    \def\ {{\spaceskip = 0pt{} }}%
+    %
+    % Turn off hyphenation.
+    \nohyphenation
+    %
+    \plainfrenchspacing
+    #1%
+  }%
+  \null % reset spacefactor to 1000
+}
+
+% We *must* turn on hyphenation at `-' and `_' in @code.
+% (But see \codedashfinish below.)
+% Otherwise, it is too hard to avoid overfull hboxes
+% in the Emacs manual, the Library manual, etc.
+%
+% Unfortunately, TeX uses one parameter (\hyphenchar) to control
+% both hyphenation at - and hyphenation within words.
+% We must therefore turn them both off (\tclose does that)
+% and arrange explicitly to hyphenate at a dash. -- rms.
+{
+  \catcode`\-=\active \catcode`\_=\active
+  \catcode`\'=\active \catcode`\`=\active
+  \global\let'=\rq \global\let`=\lq  % default definitions
+  %
+  \global\def\code{\begingroup
+    \setcodequotes
+    \catcode\dashChar=\active  \catcode\underChar=\active
+    \ifallowcodebreaks
+     \let-\codedash
+     \let_\codeunder
+    \else
+     \let-\normaldash
+     \let_\realunder
+    \fi
+    % Given -foo (with a single dash), we do not want to allow a break
+    % after the hyphen.
+    \global\let\codedashprev=\codedash
+    %
+    \codex
+  }
+  %
+  \gdef\codedash{\futurelet\next\codedashfinish}
+  \gdef\codedashfinish{%
+    \normaldash % always output the dash character itself.
+    % 
+    % Now, output a discretionary to allow a line break, unless
+    % (a) the next character is a -, or
+    % (b) the preceding character is a -.
+    % E.g., given --posix, we do not want to allow a break after either -.
+    % Given --foo-bar, we do want to allow a break between the - and the b.
+    \ifx\next\codedash \else
+      \ifx\codedashprev\codedash 
+      \else \discretionary{}{}{}\fi
+    \fi
+    % we need the space after the = for the case when \next itself is a
+    % space token; it would get swallowed otherwise.  As in @code{- a}.
+    \global\let\codedashprev= \next
+  }
+}
+\def\normaldash{-}
+%
+\def\codex #1{\tclose{#1}\endgroup}
+
+\def\codeunder{%
+  % this is all so @math{@code{var_name}+1} can work.  In math mode, _
+  % is "active" (mathcode"8000) and \normalunderscore (or \char95, etc.)
+  % will therefore expand the active definition of _, which is us
+  % (inside @code that is), therefore an endless loop.
+  \ifusingtt{\ifmmode
+               \mathchar"075F % class 0=ordinary, family 7=ttfam, pos 0x5F=_.
+             \else\normalunderscore \fi
+             \discretionary{}{}{}}%
+            {\_}%
+}
+
+% An additional complication: the above will allow breaks after, e.g.,
+% each of the four underscores in __typeof__.  This is bad.
+% @allowcodebreaks provides a document-level way to turn breaking at -
+% and _ on and off.
+%
+\newif\ifallowcodebreaks  \allowcodebreakstrue
+
+\def\keywordtrue{true}
+\def\keywordfalse{false}
+
+\parseargdef\allowcodebreaks{%
+  \def\txiarg{#1}%
+  \ifx\txiarg\keywordtrue
+    \allowcodebreakstrue
+  \else\ifx\txiarg\keywordfalse
+    \allowcodebreaksfalse
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @allowcodebreaks option `\txiarg', must be true|false}%
+  \fi\fi
+}
+
+% For @command, @env, @file, @option quotes seem unnecessary,
+% so use \code rather than \samp.
+\let\command=\code
+\let\env=\code
+\let\file=\code
+\let\option=\code
+
+% @uref (abbreviation for `urlref') aka @url takes an optional
+% (comma-separated) second argument specifying the text to display and
+% an optional third arg as text to display instead of (rather than in
+% addition to) the url itself.  First (mandatory) arg is the url.
+
+% TeX-only option to allow changing PDF output to show only the second
+% arg (if given), and not the url (which is then just the link target).
+\newif\ifurefurlonlylink
+
+% The default \pretolerance setting stops the penalty inserted in
+% \urefallowbreak being a discouragement to line breaking.  Set it to
+% a negative value for this paragraph only.  Hopefully this does not
+% conflict with redefinitions of \par done elsewhere.
+\def\nopretolerance{%
+\pretolerance=-1
+\def\par{\endgraf\pretolerance=100 \let\par\endgraf}%
+}
+
+% The main macro is \urefbreak, which allows breaking at expected
+% places within the url.
+\def\urefbreak{\nopretolerance \begingroup \urefcatcodes \dourefbreak}
+\let\uref=\urefbreak
+%
+\def\dourefbreak#1{\urefbreakfinish #1,,,\finish}
+\def\urefbreakfinish#1,#2,#3,#4\finish{% doesn't work in @example
+  \unsepspaces
+  \pdfurl{#1}%
+  \setbox0 = \hbox{\ignorespaces #3}%
+  \ifdim\wd0 > 0pt
+    \unhbox0 % third arg given, show only that
+  \else
+    \setbox0 = \hbox{\ignorespaces #2}% look for second arg
+    \ifdim\wd0 > 0pt
+      \ifpdf
+        % For pdfTeX and LuaTeX
+        \ifurefurlonlylink
+          % PDF plus option to not display url, show just arg
+          \unhbox0             
+        \else
+          % PDF, normally display both arg and url for consistency,
+          % visibility, if the pdf is eventually used to print, etc.
+          \unhbox0\ (\urefcode{#1})%
+        \fi
+      \else
+        \ifx\XeTeXrevision\thisisundefined
+          \unhbox0\ (\urefcode{#1})% DVI, always show arg and url
+        \else
+          % For XeTeX
+          \ifurefurlonlylink
+            % PDF plus option to not display url, show just arg
+            \unhbox0             
+          \else
+            % PDF, normally display both arg and url for consistency,
+            % visibility, if the pdf is eventually used to print, etc.
+            \unhbox0\ (\urefcode{#1})%
+          \fi
+        \fi
+      \fi
+    \else
+      \urefcode{#1}% only url given, so show it
+    \fi
+  \fi
+  \endlink
+\endgroup}
+
+% Allow line breaks around only a few characters (only).
+\def\urefcatcodes{%
+  \catcode`\&=\active \catcode`\.=\active
+  \catcode`\#=\active \catcode`\?=\active
+  \catcode`\/=\active
+}
+{
+  \urefcatcodes
+  %
+  \global\def\urefcode{\begingroup
+    \setcodequotes
+    \urefcatcodes
+    \let&\urefcodeamp
+    \let.\urefcodedot
+    \let#\urefcodehash
+    \let?\urefcodequest
+    \let/\urefcodeslash
+    \codex
+  }
+  %
+  % By default, they are just regular characters.
+  \global\def&{\normalamp}
+  \global\def.{\normaldot}
+  \global\def#{\normalhash}
+  \global\def?{\normalquest}
+  \global\def/{\normalslash}
+}
+
+\def\urefcodeamp{\urefprebreak \&\urefpostbreak}
+\def\urefcodedot{\urefprebreak .\urefpostbreak}
+\def\urefcodehash{\urefprebreak \#\urefpostbreak}
+\def\urefcodequest{\urefprebreak ?\urefpostbreak}
+\def\urefcodeslash{\futurelet\next\urefcodeslashfinish}
+{
+  \catcode`\/=\active
+  \global\def\urefcodeslashfinish{%
+    \urefprebreak \slashChar
+    % Allow line break only after the final / in a sequence of
+    % slashes, to avoid line break between the slashes in http://.
+    \ifx\next/\else \urefpostbreak \fi
+  }
+}
+
+% By default we'll break after the special characters, but some people like to 
+% break before the special chars, so allow that.  Also allow no breaking at 
+% all, for manual control.
+% 
+\parseargdef\urefbreakstyle{%
+  \def\txiarg{#1}%
+  \ifx\txiarg\wordnone
+    \def\urefprebreak{\nobreak}\def\urefpostbreak{\nobreak}
+  \else\ifx\txiarg\wordbefore
+    \def\urefprebreak{\urefallowbreak}\def\urefpostbreak{\nobreak}
+  \else\ifx\txiarg\wordafter
+    \def\urefprebreak{\nobreak}\def\urefpostbreak{\urefallowbreak}
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @urefbreakstyle setting `\txiarg'}%
+  \fi\fi\fi
+}
+\def\wordafter{after}
+\def\wordbefore{before}
+\def\wordnone{none}
+
+% Allow a ragged right output to aid breaking long URL's.  There can
+% be a break at the \allowbreak with no extra glue (if the existing stretch in 
+% the line is sufficient), a break at the \penalty with extra glue added
+% at the end of the line, or no break at all here.
+%   Changing the value of the penalty and/or the amount of stretch affects how 
+% preferable one choice is over the other.
+\def\urefallowbreak{%
+  \penalty0\relax
+  \hskip 0pt plus 2 em\relax
+  \penalty1000\relax
+  \hskip 0pt plus -2 em\relax
+}
+
+\urefbreakstyle after
+
+% @url synonym for @uref, since that's how everyone uses it.
+%
+\let\url=\uref
+
+% rms does not like angle brackets --karl, 17may97.
+% So now @email is just like @uref, unless we are pdf.
+%
+%\def\email#1{\angleleft{\tt #1}\angleright}
+\ifpdforxetex
+  \def\email#1{\doemail#1,,\finish}
+  \def\doemail#1,#2,#3\finish{\begingroup
+    \unsepspaces
+    \pdfurl{mailto:#1}%
+    \setbox0 = \hbox{\ignorespaces #2}%
+    \ifdim\wd0>0pt\unhbox0\else\code{#1}\fi
+    \endlink
+  \endgroup}
+\else
+  \let\email=\uref
+\fi
+
+% @kbdinputstyle -- arg is `distinct' (@kbd uses slanted tty font always),
+%   `example' (@kbd uses ttsl only inside of @example and friends),
+%   or `code' (@kbd uses normal tty font always).
+\parseargdef\kbdinputstyle{%
+  \def\txiarg{#1}%
+  \ifx\txiarg\worddistinct
+    \gdef\kbdexamplefont{\ttsl}\gdef\kbdfont{\ttsl}%
+  \else\ifx\txiarg\wordexample
+    \gdef\kbdexamplefont{\ttsl}\gdef\kbdfont{\tt}%
+  \else\ifx\txiarg\wordcode
+    \gdef\kbdexamplefont{\tt}\gdef\kbdfont{\tt}%
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @kbdinputstyle setting `\txiarg'}%
+  \fi\fi\fi
+}
+\def\worddistinct{distinct}
+\def\wordexample{example}
+\def\wordcode{code}
+
+% Default is `distinct'.
+\kbdinputstyle distinct
+
+% @kbd is like @code, except that if the argument is just one @key command,
+% then @kbd has no effect.
+\def\kbd#1{{\def\look{#1}\expandafter\kbdsub\look??\par}}
+
+\def\xkey{\key}
+\def\kbdsub#1#2#3\par{%
+  \def\one{#1}\def\three{#3}\def\threex{??}%
+  \ifx\one\xkey\ifx\threex\three \key{#2}%
+  \else{\tclose{\kbdfont\setcodequotes\look}}\fi
+  \else{\tclose{\kbdfont\setcodequotes\look}}\fi
+}
+
+% definition of @key that produces a lozenge.  Doesn't adjust to text size.
+%\setfont\keyrm\rmshape{8}{1000}{OT1}
+%\font\keysy=cmsy9
+%\def\key#1{{\keyrm\textfont2=\keysy \leavevmode\hbox{%
+%  \raise0.4pt\hbox{\angleleft}\kern-.08em\vtop{%
+%    \vbox{\hrule\kern-0.4pt
+%     \hbox{\raise0.4pt\hbox{\vphantom{\angleleft}}#1}}%
+%    \kern-0.4pt\hrule}%
+%  \kern-.06em\raise0.4pt\hbox{\angleright}}}}
+
+% definition of @key with no lozenge.  If the current font is already
+% monospace, don't change it; that way, we respect @kbdinputstyle.  But
+% if it isn't monospace, then use \tt.
+%
+\def\key#1{{\setregularquotes
+  \nohyphenation
+  \ifmonospace\else\tt\fi
+  #1}\null}
+
+% @clicksequence{File @click{} Open ...}
+\def\clicksequence#1{\begingroup #1\endgroup}
+
+% @clickstyle @arrow   (by default)
+\parseargdef\clickstyle{\def\click{#1}}
+\def\click{\arrow}
+
+% Typeset a dimension, e.g., `in' or `pt'.  The only reason for the
+% argument is to make the input look right: @dmn{pt} instead of @dmn{}pt.
+%
+\def\dmn#1{\thinspace #1}
+
+% @acronym for "FBI", "NATO", and the like.
+% We print this one point size smaller, since it's intended for
+% all-uppercase.
+%
+\def\acronym#1{\doacronym #1,,\finish}
+\def\doacronym#1,#2,#3\finish{%
+  {\switchtolsize #1}%
+  \def\temp{#2}%
+  \ifx\temp\empty \else
+    \space ({\unsepspaces \ignorespaces \temp \unskip})%
+  \fi
+  \null % reset \spacefactor=1000
+}
+
+% @abbr for "Comput. J." and the like.
+% No font change, but don't do end-of-sentence spacing.
+%
+\def\abbr#1{\doabbr #1,,\finish}
+\def\doabbr#1,#2,#3\finish{%
+  {\plainfrenchspacing #1}%
+  \def\temp{#2}%
+  \ifx\temp\empty \else
+    \space ({\unsepspaces \ignorespaces \temp \unskip})%
+  \fi
+  \null % reset \spacefactor=1000
+}
+
+% @asis just yields its argument.  Used with @table, for example.
+%
+\def\asis#1{#1}
+
+% @math outputs its argument in math mode.
+%
+% One complication: _ usually means subscripts, but it could also mean
+% an actual _ character, as in @math{@var{some_variable} + 1}.  So make
+% _ active, and distinguish by seeing if the current family is \slfam,
+% which is what @var uses.
+{
+  \catcode`\_ = \active
+  \gdef\mathunderscore{%
+    \catcode`\_=\active
+    \def_{\ifnum\fam=\slfam \_\else\sb\fi}%
+  }
+}
+% Another complication: we want \\ (and @\) to output a math (or tt) \.
+% FYI, plain.tex uses \\ as a temporary control sequence (for no
+% particular reason), but this is not advertised and we don't care.
+%
+% The \mathchar is class=0=ordinary, family=7=ttfam, position=5C=\.
+\def\mathbackslash{\ifnum\fam=\ttfam \mathchar"075C \else\backslash \fi}
+%
+\def\math{%
+  \ifmmode\else % only go into math if not in math mode already
+    \tex
+    \mathunderscore
+    \let\\ = \mathbackslash
+    \mathactive
+    % make the texinfo accent commands work in math mode
+    \let\"=\ddot
+    \let\'=\acute
+    \let\==\bar
+    \let\^=\hat
+    \let\`=\grave
+    \let\u=\breve
+    \let\v=\check
+    \let\~=\tilde
+    \let\dotaccent=\dot
+    % have to provide another name for sup operator
+    \let\mathopsup=\sup
+  $\expandafter\finishmath\fi
+}
+\def\finishmath#1{#1$\endgroup}  % Close the group opened by \tex.
+
+% Some active characters (such as <) are spaced differently in math.
+% We have to reset their definitions in case the @math was an argument
+% to a command which sets the catcodes (such as @item or @section).
+%
+{
+  \catcode`^ = \active
+  \catcode`< = \active
+  \catcode`> = \active
+  \catcode`+ = \active
+  \catcode`' = \active
+  \gdef\mathactive{%
+    \let^ = \ptexhat
+    \let< = \ptexless
+    \let> = \ptexgtr
+    \let+ = \ptexplus
+    \let' = \ptexquoteright
+  }
+}
+
+% for @sub and @sup, if in math mode, just do a normal sub/superscript.
+% If in text, use math to place as sub/superscript, but switch
+% into text mode, with smaller fonts.  This is a different font than the
+% one used for real math sub/superscripts (8pt vs. 7pt), but let's not
+% fix it (significant additions to font machinery) until someone notices.
+%
+\def\sub{\ifmmode \expandafter\sb \else \expandafter\finishsub\fi}
+\def\finishsub#1{$\sb{\hbox{\switchtolllsize #1}}$}%
+%
+\def\sup{\ifmmode \expandafter\ptexsp \else \expandafter\finishsup\fi}
+\def\finishsup#1{$\ptexsp{\hbox{\switchtolllsize #1}}$}%
+
+% provide this command from LaTeX as it is very common
+\def\frac#1#2{{{#1}\over{#2}}}
+
+% @displaymath.
+% \globaldefs is needed to recognize the end lines in \tex and
+% \end tex.  Set \thisenv as @end displaymath is seen before @end tex.
+{\obeylines
+\globaldefs=1
+\envdef\displaymath{%
+\tex%
+\def\thisenv{\displaymath}%
+\begingroup\let\end\displaymathend%
+$$%
+}
+
+\def\displaymathend{$$\endgroup\end}%
+
+\def\Edisplaymath{%
+\def\thisenv{\tex}%
+\end tex
+}}
+
+
+% @inlinefmt{FMTNAME,PROCESSED-TEXT} and @inlineraw{FMTNAME,RAW-TEXT}.
+% Ignore unless FMTNAME == tex; then it is like @iftex and @tex,
+% except specified as a normal braced arg, so no newlines to worry about.
+% 
+\def\outfmtnametex{tex}
+%
+\long\def\inlinefmt#1{\doinlinefmt #1,\finish}
+\long\def\doinlinefmt#1,#2,\finish{%
+  \def\inlinefmtname{#1}%
+  \ifx\inlinefmtname\outfmtnametex \ignorespaces #2\fi
+}
+% 
+% @inlinefmtifelse{FMTNAME,THEN-TEXT,ELSE-TEXT} expands THEN-TEXT if
+% FMTNAME is tex, else ELSE-TEXT.
+\long\def\inlinefmtifelse#1{\doinlinefmtifelse #1,,,\finish}
+\long\def\doinlinefmtifelse#1,#2,#3,#4,\finish{%
+  \def\inlinefmtname{#1}%
+  \ifx\inlinefmtname\outfmtnametex \ignorespaces #2\else \ignorespaces #3\fi
+}
+%
+% For raw, must switch into @tex before parsing the argument, to avoid
+% setting catcodes prematurely.  Doing it this way means that, for
+% example, @inlineraw{html, foo{bar} gets a parse error instead of being
+% ignored.  But this isn't important because if people want a literal
+% *right* brace they would have to use a command anyway, so they may as
+% well use a command to get a left brace too.  We could re-use the
+% delimiter character idea from \verb, but it seems like overkill.
+% 
+\long\def\inlineraw{\tex \doinlineraw}
+\long\def\doinlineraw#1{\doinlinerawtwo #1,\finish}
+\def\doinlinerawtwo#1,#2,\finish{%
+  \def\inlinerawname{#1}%
+  \ifx\inlinerawname\outfmtnametex \ignorespaces #2\fi
+  \endgroup % close group opened by \tex.
+}
+
+% @inlineifset{VAR, TEXT} expands TEXT if VAR is @set.
+%
+\long\def\inlineifset#1{\doinlineifset #1,\finish}
+\long\def\doinlineifset#1,#2,\finish{%
+  \def\inlinevarname{#1}%
+  \expandafter\ifx\csname SET\inlinevarname\endcsname\relax
+  \else\ignorespaces#2\fi
+}
+
+% @inlineifclear{VAR, TEXT} expands TEXT if VAR is not @set.
+%
+\long\def\inlineifclear#1{\doinlineifclear #1,\finish}
+\long\def\doinlineifclear#1,#2,\finish{%
+  \def\inlinevarname{#1}%
+  \expandafter\ifx\csname SET\inlinevarname\endcsname\relax \ignorespaces#2\fi
+}
+
+
+\message{glyphs,}
+% and logos.
+
+% @@ prints an @, as does @atchar{}.
+\def\@{\char64 }
+\let\atchar=\@
+
+% @{ @} @lbracechar{} @rbracechar{} all generate brace characters.
+\def\lbracechar{{\ifmonospace\char123\else\ensuremath\lbrace\fi}}
+\def\rbracechar{{\ifmonospace\char125\else\ensuremath\rbrace\fi}}
+\let\{=\lbracechar
+\let\}=\rbracechar
+
+% @comma{} to avoid , parsing problems.
+\let\comma = ,
+
+% Accents: @, @dotaccent @ringaccent @ubaraccent @udotaccent
+% Others are defined by plain TeX: @` @' @" @^ @~ @= @u @v @H.
+\let\, = \ptexc
+\let\dotaccent = \ptexdot
+\def\ringaccent#1{{\accent23 #1}}
+\let\tieaccent = \ptext
+\let\ubaraccent = \ptexb
+\let\udotaccent = \d
+
+% Other special characters: @questiondown @exclamdown @ordf @ordm
+% Plain TeX defines: @AA @AE @O @OE @L (plus lowercase versions) @ss.
+\def\questiondown{?`}
+\def\exclamdown{!`}
+\def\ordf{\leavevmode\raise1ex\hbox{\switchtolllsize \underbar{a}}}
+\def\ordm{\leavevmode\raise1ex\hbox{\switchtolllsize \underbar{o}}}
+
+% Dotless i and dotless j, used for accents.
+\def\imacro{i}
+\def\jmacro{j}
+\def\dotless#1{%
+  \def\temp{#1}%
+  \ifx\temp\imacro \ifmmode\imath \else\ptexi \fi
+  \else\ifx\temp\jmacro \ifmmode\jmath \else\j \fi
+  \else \errmessage{@dotless can be used only with i or j}%
+  \fi\fi
+}
+
+% The \TeX{} logo, as in plain, but resetting the spacing so that a
+% period following counts as ending a sentence.  (Idea found in latex.)
+%
+\edef\TeX{\TeX \spacefactor=1000 }
+
+% @LaTeX{} logo.  Not quite the same results as the definition in
+% latex.ltx, since we use a different font for the raised A; it's most
+% convenient for us to use an explicitly smaller font, rather than using
+% the \scriptstyle font (since we don't reset \scriptstyle and
+% \scriptscriptstyle).
+%
+\def\LaTeX{%
+  L\kern-.36em
+  {\setbox0=\hbox{T}%
+   \vbox to \ht0{\hbox{%
+     \ifx\textnominalsize\xwordpt
+       % for 10pt running text, lllsize (8pt) is too small for the A in LaTeX.
+       % Revert to plain's \scriptsize, which is 7pt.
+       \count255=\the\fam $\fam\count255 \scriptstyle A$%
+     \else
+       % For 11pt, we can use our lllsize.
+       \switchtolllsize A%
+     \fi
+     }%
+     \vss
+  }}%
+  \kern-.15em
+  \TeX
+}
+
+% Some math mode symbols.  Define \ensuremath to switch into math mode
+% unless we are already there.  Expansion tricks may not be needed here,
+% but safer, and can't hurt.
+\def\ensuremath{\ifmmode \expandafter\asis \else\expandafter\ensuredmath \fi}
+\def\ensuredmath#1{$\relax#1$}
+%
+\def\bullet{\ensuremath\ptexbullet}
+\def\geq{\ensuremath\ge}
+\def\leq{\ensuremath\le}
+\def\minus{\ensuremath-}
+
+% @dots{} outputs an ellipsis using the current font.
+% We do .5em per period so that it has the same spacing in the cm
+% typewriter fonts as three actual period characters; on the other hand,
+% in other typewriter fonts three periods are wider than 1.5em.  So do
+% whichever is larger.
+%
+\def\dots{%
+  \leavevmode
+  \setbox0=\hbox{...}% get width of three periods
+  \ifdim\wd0 > 1.5em
+    \dimen0 = \wd0
+  \else
+    \dimen0 = 1.5em
+  \fi
+  \hbox to \dimen0{%
+    \hskip 0pt plus.25fil
+    .\hskip 0pt plus1fil
+    .\hskip 0pt plus1fil
+    .\hskip 0pt plus.5fil
+  }%
+}
+
+% @enddots{} is an end-of-sentence ellipsis.
+%
+\def\enddots{%
+  \dots
+  \spacefactor=\endofsentencespacefactor
+}
+
+% @point{}, @result{}, @expansion{}, @print{}, @equiv{}.
+%
+% Since these characters are used in examples, they should be an even number of
+% \tt widths. Each \tt character is 1en, so two makes it 1em.
+%
+\def\point{$\star$}
+\def\arrow{\leavevmode\raise.05ex\hbox to 1em{\hfil$\rightarrow$\hfil}}
+\def\result{\leavevmode\raise.05ex\hbox to 1em{\hfil$\Rightarrow$\hfil}}
+\def\expansion{\leavevmode\hbox to 1em{\hfil$\mapsto$\hfil}}
+\def\print{\leavevmode\lower.1ex\hbox to 1em{\hfil$\dashv$\hfil}}
+\def\equiv{\leavevmode\hbox to 1em{\hfil$\ptexequiv$\hfil}}
+
+% The @error{} command.
+% Adapted from the TeXbook's \boxit.
+%
+\newbox\errorbox
+%
+{\ttfont \global\dimen0 = 3em}% Width of the box.
+\dimen2 = .55pt % Thickness of rules
+% The text. (`r' is open on the right, `e' somewhat less so on the left.)
+\setbox0 = \hbox{\kern-.75pt \reducedsf \putworderror\kern-1.5pt}
+%
+\setbox\errorbox=\hbox to \dimen0{\hfil
+   \hsize = \dimen0 \advance\hsize by -5.8pt % Space to left+right.
+   \advance\hsize by -2\dimen2 % Rules.
+   \vbox{%
+      \hrule height\dimen2
+      \hbox{\vrule width\dimen2 \kern3pt          % Space to left of text.
+         \vtop{\kern2.4pt \box0 \kern2.4pt}% Space above/below.
+         \kern3pt\vrule width\dimen2}% Space to right.
+      \hrule height\dimen2}
+    \hfil}
+%
+\def\error{\leavevmode\lower.7ex\copy\errorbox}
+
+% @pounds{} is a sterling sign, which Knuth put in the CM italic font.
+%
+\def\pounds{\ifmonospace{\ecfont\char"BF}\else{\it\$}\fi}
+
+% @euro{} comes from a separate font, depending on the current style.
+% We use the free feym* fonts from the eurosym package by Henrik
+% Theiling, which support regular, slanted, bold and bold slanted (and
+% "outlined" (blackboard board, sort of) versions, which we don't need).
+% It is available from http://www.ctan.org/tex-archive/fonts/eurosym.
+%
+% Although only regular is the truly official Euro symbol, we ignore
+% that.  The Euro is designed to be slightly taller than the regular
+% font height.
+%
+% feymr - regular
+% feymo - slanted
+% feybr - bold
+% feybo - bold slanted
+%
+% There is no good (free) typewriter version, to my knowledge.
+% A feymr10 euro is ~7.3pt wide, while a normal cmtt10 char is ~5.25pt wide.
+% Hmm.
+%
+% Also doesn't work in math.  Do we need to do math with euro symbols?
+% Hope not.
+%
+%
+\def\euro{{\eurofont e}}
+\def\eurofont{%
+  % We set the font at each command, rather than predefining it in
+  % \textfonts and the other font-switching commands, so that
+  % installations which never need the symbol don't have to have the
+  % font installed.
+  %
+  % There is only one designed size (nominal 10pt), so we always scale
+  % that to the current nominal size.
+  %
+  % By the way, simply using "at 1em" works for cmr10 and the like, but
+  % does not work for cmbx10 and other extended/shrunken fonts.
+  %
+  \def\eurosize{\csname\curfontsize nominalsize\endcsname}%
+  %
+  \ifx\curfontstyle\bfstylename
+    % bold:
+    \font\thiseurofont = \ifusingit{feybo10}{feybr10} at \eurosize
+  \else
+    % regular:
+    \font\thiseurofont = \ifusingit{feymo10}{feymr10} at \eurosize
+  \fi
+  \thiseurofont
+}
+
+% Glyphs from the EC fonts.  We don't use \let for the aliases, because
+% sometimes we redefine the original macro, and the alias should reflect
+% the redefinition.
+%
+% Use LaTeX names for the Icelandic letters.
+\def\DH{{\ecfont \char"D0}} % Eth
+\def\dh{{\ecfont \char"F0}} % eth
+\def\TH{{\ecfont \char"DE}} % Thorn
+\def\th{{\ecfont \char"FE}} % thorn
+%
+\def\guillemetleft{{\ecfont \char"13}}
+\def\guillemotleft{\guillemetleft}
+\def\guillemetright{{\ecfont \char"14}}
+\def\guillemotright{\guillemetright}
+\def\guilsinglleft{{\ecfont \char"0E}}
+\def\guilsinglright{{\ecfont \char"0F}}
+\def\quotedblbase{{\ecfont \char"12}}
+\def\quotesinglbase{{\ecfont \char"0D}}
+%
+% This positioning is not perfect (see the ogonek LaTeX package), but
+% we have the precomposed glyphs for the most common cases.  We put the
+% tests to use those glyphs in the single \ogonek macro so we have fewer
+% dummy definitions to worry about for index entries, etc.
+%
+% ogonek is also used with other letters in Lithuanian (IOU), but using
+% the precomposed glyphs for those is not so easy since they aren't in
+% the same EC font.
+\def\ogonek#1{{%
+  \def\temp{#1}%
+  \ifx\temp\macrocharA\Aogonek
+  \else\ifx\temp\macrochara\aogonek
+  \else\ifx\temp\macrocharE\Eogonek
+  \else\ifx\temp\macrochare\eogonek
+  \else
+    \ecfont \setbox0=\hbox{#1}%
+    \ifdim\ht0=1ex\accent"0C #1%
+    \else\ooalign{\unhbox0\crcr\hidewidth\char"0C \hidewidth}%
+    \fi
+  \fi\fi\fi\fi
+  }%
+}
+\def\Aogonek{{\ecfont \char"81}}\def\macrocharA{A}
+\def\aogonek{{\ecfont \char"A1}}\def\macrochara{a}
+\def\Eogonek{{\ecfont \char"86}}\def\macrocharE{E}
+\def\eogonek{{\ecfont \char"A6}}\def\macrochare{e}
+%
+% Use the European Computer Modern fonts (cm-super in outline format)
+% for non-CM glyphs.  That is ec* for regular text and tc* for the text
+% companion symbols (LaTeX TS1 encoding).  Both are part of the ec
+% package and follow the same conventions.
+% 
+\def\ecfont{\etcfont{e}}
+\def\tcfont{\etcfont{t}}
+%
+\def\etcfont#1{%
+  % We can't distinguish serif/sans and italic/slanted, but this
+  % is used for crude hacks anyway (like adding French and German
+  % quotes to documents typeset with CM, where we lose kerning), so
+  % hopefully nobody will notice/care.
+  \edef\ecsize{\csname\curfontsize ecsize\endcsname}%
+  \edef\nominalsize{\csname\curfontsize nominalsize\endcsname}%
+  \ifmonospace
+    % typewriter:
+    \font\thisecfont = #1ctt\ecsize \space at \nominalsize
+  \else
+    \ifx\curfontstyle\bfstylename
+      % bold:
+      \font\thisecfont = #1cb\ifusingit{i}{x}\ecsize \space at \nominalsize
+    \else
+      % regular:
+      \font\thisecfont = #1c\ifusingit{ti}{rm}\ecsize \space at \nominalsize
+    \fi
+  \fi
+  \thisecfont
+}
+
+% @registeredsymbol - R in a circle.  The font for the R should really
+% be smaller yet, but lllsize is the best we can do for now.
+% Adapted from the plain.tex definition of \copyright.
+%
+\def\registeredsymbol{%
+  $^{{\ooalign{\hfil\raise.07ex\hbox{\switchtolllsize R}%
+               \hfil\crcr\Orb}}%
+    }$%
+}
+
+% @textdegree - the normal degrees sign.
+%
+\def\textdegree{$^\circ$}
+
+% Laurent Siebenmann reports \Orb undefined with:
+%  Textures 1.7.7 (preloaded format=plain 93.10.14)  (68K)  16 APR 2004 02:38
+% so we'll define it if necessary.
+%
+\ifx\Orb\thisisundefined
+\def\Orb{\mathhexbox20D}
+\fi
+
+% Quotes.
+\chardef\quoteleft=`\`
+\chardef\quoteright=`\'
+
+% only change font for tt for correct kerning and to avoid using
+% \ecfont unless necessary.
+\def\quotedblleft{%
+  \ifmonospace{\ecfont\char"10}\else{\char"5C}\fi
+}
+
+\def\quotedblright{%
+  \ifmonospace{\ecfont\char"11}\else{\char`\"}\fi
+}
+
+
+\message{page headings,}
+
+\newskip\titlepagetopglue \titlepagetopglue = 1.5in
+\newskip\titlepagebottomglue \titlepagebottomglue = 2pc
+
+% First the title page.  Must do @settitle before @titlepage.
+\newif\ifseenauthor
+\newif\iffinishedtitlepage
+
+% @setcontentsaftertitlepage used to do an implicit @contents or
+% @shortcontents after @end titlepage, but it is now obsolete.
+\def\setcontentsaftertitlepage{%
+  \errmessage{@setcontentsaftertitlepage has been removed as a Texinfo
+              command; move your @contents command if you want the contents
+              after the title page.}}%
+\def\setshortcontentsaftertitlepage{%
+  \errmessage{@setshortcontentsaftertitlepage has been removed as a Texinfo
+              command; move your @shortcontents and @contents commands if you 
+              want the contents after the title page.}}%
+
+\parseargdef\shorttitlepage{%
+  \begingroup \hbox{}\vskip 1.5in \chaprm \centerline{#1}%
+  \endgroup\page\hbox{}\page}
+
+\envdef\titlepage{%
+  % Open one extra group, as we want to close it in the middle of \Etitlepage.
+  \begingroup
+    \parindent=0pt \textfonts
+    % Leave some space at the very top of the page.
+    \vglue\titlepagetopglue
+    % No rule at page bottom unless we print one at the top with @title.
+    \finishedtitlepagetrue
+    %
+    % Most title ``pages'' are actually two pages long, with space
+    % at the top of the second.  We don't want the ragged left on the second.
+    \let\oldpage = \page
+    \def\page{%
+      \iffinishedtitlepage\else
+	 \finishtitlepage
+      \fi
+      \let\page = \oldpage
+      \page
+      \null
+    }%
+}
+
+\def\Etitlepage{%
+    \iffinishedtitlepage\else
+	\finishtitlepage
+    \fi
+    % It is important to do the page break before ending the group,
+    % because the headline and footline are only empty inside the group.
+    % If we use the new definition of \page, we always get a blank page
+    % after the title page, which we certainly don't want.
+    \oldpage
+  \endgroup
+  %
+  % Need this before the \...aftertitlepage checks so that if they are
+  % in effect the toc pages will come out with page numbers.
+  \HEADINGSon
+}
+
+\def\finishtitlepage{%
+  \vskip4pt \hrule height 2pt width \hsize
+  \vskip\titlepagebottomglue
+  \finishedtitlepagetrue
+}
+
+% Settings used for typesetting titles: no hyphenation, no indentation,
+% don't worry much about spacing, ragged right.  This should be used
+% inside a \vbox, and fonts need to be set appropriately first. \par should
+% be specified before the end of the \vbox, since a vbox is a group.
+% 
+\def\raggedtitlesettings{%
+  \rm
+  \hyphenpenalty=10000
+  \parindent=0pt
+  \tolerance=5000
+  \ptexraggedright
+}
+
+% Macros to be used within @titlepage:
+
+\let\subtitlerm=\rmfont
+\def\subtitlefont{\subtitlerm \normalbaselineskip = 13pt \normalbaselines}
+
+\parseargdef\title{%
+  \checkenv\titlepage
+  \vbox{\titlefonts \raggedtitlesettings #1\par}%
+  % print a rule at the page bottom also.
+  \finishedtitlepagefalse
+  \vskip4pt \hrule height 4pt width \hsize \vskip4pt
+}
+
+\parseargdef\subtitle{%
+  \checkenv\titlepage
+  {\subtitlefont \rightline{#1}}%
+}
+
+% @author should come last, but may come many times.
+% It can also be used inside @quotation.
+%
+\parseargdef\author{%
+  \def\temp{\quotation}%
+  \ifx\thisenv\temp
+    \def\quotationauthor{#1}% printed in \Equotation.
+  \else
+    \checkenv\titlepage
+    \ifseenauthor\else \vskip 0pt plus 1filll \seenauthortrue \fi
+    {\secfonts\rm \leftline{#1}}%
+  \fi
+}
+
+
+% Set up page headings and footings.
+
+\let\thispage=\folio
+
+\newtoks\evenheadline    % headline on even pages
+\newtoks\oddheadline     % headline on odd pages
+\newtoks\evenchapheadline% headline on even pages with a new chapter
+\newtoks\oddchapheadline % headline on odd pages with a new chapter
+\newtoks\evenfootline    % footline on even pages
+\newtoks\oddfootline     % footline on odd pages
+
+% Now make \makeheadline and \makefootline in Plain TeX use those variables
+\headline={{\textfonts\rm
+            \ifchapterpage
+              \ifodd\pageno\the\oddchapheadline\else\the\evenchapheadline\fi
+            \else
+              \ifodd\pageno\the\oddheadline\else\the\evenheadline\fi
+            \fi}}
+
+\footline={{\textfonts\rm \ifodd\pageno \the\oddfootline
+                            \else \the\evenfootline \fi}\HEADINGShook}
+\let\HEADINGShook=\relax
+
+% Commands to set those variables.
+% For example, this is what  @headings on  does
+% @evenheading @thistitle|@thispage|@thischapter
+% @oddheading @thischapter|@thispage|@thistitle
+% @evenfooting @thisfile||
+% @oddfooting ||@thisfile
+
+
+\def\evenheading{\parsearg\evenheadingxxx}
+\def\evenheadingxxx #1{\evenheadingyyy #1\|\|\|\|\finish}
+\def\evenheadingyyy #1\|#2\|#3\|#4\finish{%
+  \global\evenheadline={\rlap{\centerline{#2}}\line{#1\hfil#3}}
+  \global\evenchapheadline=\evenheadline}
+
+\def\oddheading{\parsearg\oddheadingxxx}
+\def\oddheadingxxx #1{\oddheadingyyy #1\|\|\|\|\finish}
+\def\oddheadingyyy #1\|#2\|#3\|#4\finish{%
+  \global\oddheadline={\rlap{\centerline{#2}}\line{#1\hfil#3}}%
+  \global\oddchapheadline=\oddheadline}
+
+\parseargdef\everyheading{\oddheadingxxx{#1}\evenheadingxxx{#1}}%
+
+\def\evenfooting{\parsearg\evenfootingxxx}
+\def\evenfootingxxx #1{\evenfootingyyy #1\|\|\|\|\finish}
+\def\evenfootingyyy #1\|#2\|#3\|#4\finish{%
+\global\evenfootline={\rlap{\centerline{#2}}\line{#1\hfil#3}}}
+
+\def\oddfooting{\parsearg\oddfootingxxx}
+\def\oddfootingxxx #1{\oddfootingyyy #1\|\|\|\|\finish}
+\def\oddfootingyyy #1\|#2\|#3\|#4\finish{%
+  \global\oddfootline = {\rlap{\centerline{#2}}\line{#1\hfil#3}}%
+  %
+  % Leave some space for the footline.  Hopefully ok to assume
+  % @evenfooting will not be used by itself.
+  \global\advance\txipageheight by -12pt
+  \global\advance\vsize by -12pt
+}
+
+\parseargdef\everyfooting{\oddfootingxxx{#1}\evenfootingxxx{#1}}
+
+% @evenheadingmarks top     \thischapter <- chapter at the top of a page
+% @evenheadingmarks bottom  \thischapter <- chapter at the bottom of a page
+%
+% The same set of arguments for:
+%
+% @oddheadingmarks
+% @evenfootingmarks
+% @oddfootingmarks
+% @everyheadingmarks
+% @everyfootingmarks
+
+% These define \getoddheadingmarks, \getevenheadingmarks,
+% \getoddfootingmarks, and \getevenfootingmarks, each to one of
+% \gettopheadingmarks, \getbottomheadingmarks.
+%
+\def\evenheadingmarks{\headingmarks{even}{heading}}
+\def\oddheadingmarks{\headingmarks{odd}{heading}}
+\def\evenfootingmarks{\headingmarks{even}{footing}}
+\def\oddfootingmarks{\headingmarks{odd}{footing}}
+\parseargdef\everyheadingmarks{\headingmarks{even}{heading}{#1}
+                          \headingmarks{odd}{heading}{#1} }
+\parseargdef\everyfootingmarks{\headingmarks{even}{footing}{#1}
+                          \headingmarks{odd}{footing}{#1} }
+% #1 = even/odd, #2 = heading/footing, #3 = top/bottom.
+\def\headingmarks#1#2#3 {%
+  \expandafter\let\expandafter\temp \csname get#3headingmarks\endcsname
+  \global\expandafter\let\csname get#1#2marks\endcsname \temp
+}
+
+\everyheadingmarks bottom
+\everyfootingmarks bottom
+
+% @headings double      turns headings on for double-sided printing.
+% @headings single      turns headings on for single-sided printing.
+% @headings off         turns them off.
+% @headings on          same as @headings double, retained for compatibility.
+% @headings after       turns on double-sided headings after this page.
+% @headings doubleafter turns on double-sided headings after this page.
+% @headings singleafter turns on single-sided headings after this page.
+% By default, they are off at the start of a document,
+% and turned `on' after @end titlepage.
+
+\parseargdef\headings{\csname HEADINGS#1\endcsname}
+
+\def\headingsoff{% non-global headings elimination
+  \evenheadline={\hfil}\evenfootline={\hfil}\evenchapheadline={\hfil}%
+   \oddheadline={\hfil}\oddfootline={\hfil}\oddchapheadline={\hfil}%
+}
+
+\def\HEADINGSoff{{\globaldefs=1 \headingsoff}} % global setting
+\HEADINGSoff  % it's the default
+
+% When we turn headings on, set the page number to 1.
+\def\pageone{
+  \global\pageno=1
+  \global\arabiccount = \pagecount
+}
+
+% For double-sided printing, put current file name in lower left corner,
+% chapter name on inside top of right hand pages, document
+% title on inside top of left hand pages, and page numbers on outside top
+% edge of all pages.
+\def\HEADINGSdouble{%
+\pageone
+\HEADINGSdoublex
+}
+\let\contentsalignmacro = \chappager
+
+% For single-sided printing, chapter title goes across top left of page,
+% page number on top right.
+\def\HEADINGSsingle{%
+\pageone
+\HEADINGSsinglex
+}
+\def\HEADINGSon{\HEADINGSdouble}
+
+\def\HEADINGSafter{\let\HEADINGShook=\HEADINGSdoublex}
+\let\HEADINGSdoubleafter=\HEADINGSafter
+\def\HEADINGSdoublex{%
+\global\evenfootline={\hfil}
+\global\oddfootline={\hfil}
+\global\evenheadline={\line{\folio\hfil\thistitle}}
+\global\oddheadline={\line{\thischapter\hfil\folio}}
+\global\evenchapheadline={\line{\folio\hfil}}
+\global\oddchapheadline={\line{\hfil\folio}}
+\global\let\contentsalignmacro = \chapoddpage
+}
+
+\def\HEADINGSsingleafter{\let\HEADINGShook=\HEADINGSsinglex}
+\def\HEADINGSsinglex{%
+\global\evenfootline={\hfil}
+\global\oddfootline={\hfil}
+\global\evenheadline={\line{\thischapter\hfil\folio}}
+\global\oddheadline={\line{\thischapter\hfil\folio}}
+\global\evenchapheadline={\line{\hfil\folio}}
+\global\oddchapheadline={\line{\hfil\folio}}
+\global\let\contentsalignmacro = \chappager
+}
+
+% for @setchapternewpage off
+\def\HEADINGSsinglechapoff{%
+\pageone
+\global\evenfootline={\hfil}
+\global\oddfootline={\hfil}
+\global\evenheadline={\line{\thischapter\hfil\folio}}
+\global\oddheadline={\line{\thischapter\hfil\folio}}
+\global\evenchapheadline=\evenheadline
+\global\oddchapheadline=\oddheadline
+\global\let\contentsalignmacro = \chappager
+}
+
+% Subroutines used in generating headings
+% This produces Day Month Year style of output.
+% Only define if not already defined, in case a txi-??.tex file has set
+% up a different format (e.g., txi-cs.tex does this).
+\ifx\today\thisisundefined
+\def\today{%
+  \number\day\space
+  \ifcase\month
+  \or\putwordMJan\or\putwordMFeb\or\putwordMMar\or\putwordMApr
+  \or\putwordMMay\or\putwordMJun\or\putwordMJul\or\putwordMAug
+  \or\putwordMSep\or\putwordMOct\or\putwordMNov\or\putwordMDec
+  \fi
+  \space\number\year}
+\fi
+
+% @settitle line...  specifies the title of the document, for headings.
+% It generates no output of its own.
+\def\thistitle{\putwordNoTitle}
+\def\settitle{\parsearg{\gdef\thistitle}}
+
+
+\message{tables,}
+% Tables -- @table, @ftable, @vtable, @item(x).
+
+% default indentation of table text
+\newdimen\tableindent \tableindent=.8in
+% default indentation of @itemize and @enumerate text
+\newdimen\itemindent  \itemindent=.3in
+% margin between end of table item and start of table text.
+\newdimen\itemmargin  \itemmargin=.1in
+
+% used internally for \itemindent minus \itemmargin
+\newdimen\itemmax
+
+% Note @table, @ftable, and @vtable define @item, @itemx, etc., with
+% these defs.
+% They also define \itemindex
+% to index the item name in whatever manner is desired (perhaps none).
+
+\newif\ifitemxneedsnegativevskip
+
+\def\itemxpar{\par\ifitemxneedsnegativevskip\nobreak\vskip-\parskip\nobreak\fi}
+
+\def\internalBitem{\smallbreak \parsearg\itemzzz}
+\def\internalBitemx{\itemxpar \parsearg\itemzzz}
+
+\def\itemzzz #1{\begingroup %
+  \advance\hsize by -\rightskip
+  \advance\hsize by -\tableindent
+  \setbox0=\hbox{\itemindicate{#1}}%
+  \itemindex{#1}%
+  \nobreak % This prevents a break before @itemx.
+  %
+  % If the item text does not fit in the space we have, put it on a line
+  % by itself, and do not allow a page break either before or after that
+  % line.  We do not start a paragraph here because then if the next
+  % command is, e.g., @kindex, the whatsit would get put into the
+  % horizontal list on a line by itself, resulting in extra blank space.
+  \ifdim \wd0>\itemmax
+    %
+    % Make this a paragraph so we get the \parskip glue and wrapping,
+    % but leave it ragged-right.
+    \begingroup
+      \advance\leftskip by-\tableindent
+      \advance\hsize by\tableindent
+      \advance\rightskip by0pt plus1fil\relax
+      \leavevmode\unhbox0\par
+    \endgroup
+    %
+    % We're going to be starting a paragraph, but we don't want the
+    % \parskip glue -- logically it's part of the @item we just started.
+    \nobreak \vskip-\parskip
+    %
+    % Stop a page break at the \parskip glue coming up.  However, if
+    % what follows is an environment such as @example, there will be no
+    % \parskip glue; then the negative vskip we just inserted would
+    % cause the example and the item to crash together.  So we use this
+    % bizarre value of 10001 as a signal to \aboveenvbreak to insert
+    % \parskip glue after all.  Section titles are handled this way also.
+    %
+    \penalty 10001
+    \endgroup
+    \itemxneedsnegativevskipfalse
+  \else
+    % The item text fits into the space.  Start a paragraph, so that the
+    % following text (if any) will end up on the same line.
+    \noindent
+    % Do this with kerns and \unhbox so that if there is a footnote in
+    % the item text, it can migrate to the main vertical list and
+    % eventually be printed.
+    \nobreak\kern-\tableindent
+    \dimen0 = \itemmax  \advance\dimen0 by \itemmargin \advance\dimen0 by -\wd0
+    \unhbox0
+    \nobreak\kern\dimen0
+    \endgroup
+    \itemxneedsnegativevskiptrue
+  \fi
+}
+
+\def\item{\errmessage{@item while not in a list environment}}
+\def\itemx{\errmessage{@itemx while not in a list environment}}
+
+% @table, @ftable, @vtable.
+\envdef\table{%
+  \let\itemindex\gobble
+  \tablecheck{table}%
+}
+\envdef\ftable{%
+  \def\itemindex ##1{\doind {fn}{\code{##1}}}%
+  \tablecheck{ftable}%
+}
+\envdef\vtable{%
+  \def\itemindex ##1{\doind {vr}{\code{##1}}}%
+  \tablecheck{vtable}%
+}
+\def\tablecheck#1{%
+  \ifnum \the\catcode`\^^M=\active
+    \endgroup
+    \errmessage{This command won't work in this context; perhaps the problem is
+      that we are \inenvironment\thisenv}%
+    \def\next{\doignore{#1}}%
+  \else
+    \let\next\tablex
+  \fi
+  \next
+}
+\def\tablex#1{%
+  \def\itemindicate{#1}%
+  \parsearg\tabley
+}
+\def\tabley#1{%
+  {%
+    \makevalueexpandable
+    \edef\temp{\noexpand\tablez #1\space\space\space}%
+    \expandafter
+  }\temp \endtablez
+}
+\def\tablez #1 #2 #3 #4\endtablez{%
+  \aboveenvbreak
+  \ifnum 0#1>0 \advance \leftskip by #1\mil \fi
+  \ifnum 0#2>0 \tableindent=#2\mil \fi
+  \ifnum 0#3>0 \advance \rightskip by #3\mil \fi
+  \itemmax=\tableindent
+  \advance \itemmax by -\itemmargin
+  \advance \leftskip by \tableindent
+  \exdentamount=\tableindent
+  \parindent = 0pt
+  \parskip = \smallskipamount
+  \ifdim \parskip=0pt \parskip=2pt \fi
+  \let\item = \internalBitem
+  \let\itemx = \internalBitemx
+}
+\def\Etable{\endgraf\afterenvbreak}
+\let\Eftable\Etable
+\let\Evtable\Etable
+\let\Eitemize\Etable
+\let\Eenumerate\Etable
+
+% This is the counter used by @enumerate, which is really @itemize
+
+\newcount \itemno
+
+\envdef\itemize{\parsearg\doitemize}
+
+\def\doitemize#1{%
+  \aboveenvbreak
+  \itemmax=\itemindent
+  \advance\itemmax by -\itemmargin
+  \advance\leftskip by \itemindent
+  \exdentamount=\itemindent
+  \parindent=0pt
+  \parskip=\smallskipamount
+  \ifdim\parskip=0pt \parskip=2pt \fi
+  %
+  % Try typesetting the item mark so that if the document erroneously says
+  % something like @itemize @samp (intending @table), there's an error
+  % right away at the @itemize.  It's not the best error message in the
+  % world, but it's better than leaving it to the @item.  This means if
+  % the user wants an empty mark, they have to say @w{} not just @w.
+  \def\itemcontents{#1}%
+  \setbox0 = \hbox{\itemcontents}%
+  %
+  % @itemize with no arg is equivalent to @itemize @bullet.
+  \ifx\itemcontents\empty\def\itemcontents{\bullet}\fi
+  %
+  \let\item=\itemizeitem
+}
+
+% Definition of @item while inside @itemize and @enumerate.
+%
+\def\itemizeitem{%
+  \advance\itemno by 1  % for enumerations
+  {\let\par=\endgraf \smallbreak}% reasonable place to break
+  {%
+   % If the document has an @itemize directly after a section title, a
+   % \nobreak will be last on the list, and \sectionheading will have
+   % done a \vskip-\parskip.  In that case, we don't want to zero
+   % parskip, or the item text will crash with the heading.  On the
+   % other hand, when there is normal text preceding the item (as there
+   % usually is), we do want to zero parskip, or there would be too much
+   % space.  In that case, we won't have a \nobreak before.  At least
+   % that's the theory.
+   \ifnum\lastpenalty<10000 \parskip=0in \fi
+   \noindent
+   \hbox to 0pt{\hss \itemcontents \kern\itemmargin}%
+   %
+   \ifinner\else
+     \vadjust{\penalty 1200}% not good to break after first line of item.
+   \fi
+   % We can be in inner vertical mode in a footnote, although an
+   % @itemize looks awful there.
+  }%
+  \flushcr
+}
+
+% \splitoff TOKENS\endmark defines \first to be the first token in
+% TOKENS, and \rest to be the remainder.
+%
+\def\splitoff#1#2\endmark{\def\first{#1}\def\rest{#2}}%
+
+% Allow an optional argument of an uppercase letter, lowercase letter,
+% or number, to specify the first label in the enumerated list.  No
+% argument is the same as `1'.
+%
+\envparseargdef\enumerate{\enumeratey #1  \endenumeratey}
+\def\enumeratey #1 #2\endenumeratey{%
+  % If we were given no argument, pretend we were given `1'.
+  \def\thearg{#1}%
+  \ifx\thearg\empty \def\thearg{1}\fi
+  %
+  % Detect if the argument is a single token.  If so, it might be a
+  % letter.  Otherwise, the only valid thing it can be is a number.
+  % (We will always have one token, because of the test we just made.
+  % This is a good thing, since \splitoff doesn't work given nothing at
+  % all -- the first parameter is undelimited.)
+  \expandafter\splitoff\thearg\endmark
+  \ifx\rest\empty
+    % Only one token in the argument.  It could still be anything.
+    % A ``lowercase letter'' is one whose \lccode is nonzero.
+    % An ``uppercase letter'' is one whose \lccode is both nonzero, and
+    %   not equal to itself.
+    % Otherwise, we assume it's a number.
+    %
+    % We need the \relax at the end of the \ifnum lines to stop TeX from
+    % continuing to look for a <number>.
+    %
+    \ifnum\lccode\expandafter`\thearg=0\relax
+      \numericenumerate % a number (we hope)
+    \else
+      % It's a letter.
+      \ifnum\lccode\expandafter`\thearg=\expandafter`\thearg\relax
+        \lowercaseenumerate % lowercase letter
+      \else
+        \uppercaseenumerate % uppercase letter
+      \fi
+    \fi
+  \else
+    % Multiple tokens in the argument.  We hope it's a number.
+    \numericenumerate
+  \fi
+}
+
+% An @enumerate whose labels are integers.  The starting integer is
+% given in \thearg.
+%
+\def\numericenumerate{%
+  \itemno = \thearg
+  \startenumeration{\the\itemno}%
+}
+
+% The starting (lowercase) letter is in \thearg.
+\def\lowercaseenumerate{%
+  \itemno = \expandafter`\thearg
+  \startenumeration{%
+    % Be sure we're not beyond the end of the alphabet.
+    \ifnum\itemno=0
+      \errmessage{No more lowercase letters in @enumerate; get a bigger
+                  alphabet}%
+    \fi
+    \char\lccode\itemno
+  }%
+}
+
+% The starting (uppercase) letter is in \thearg.
+\def\uppercaseenumerate{%
+  \itemno = \expandafter`\thearg
+  \startenumeration{%
+    % Be sure we're not beyond the end of the alphabet.
+    \ifnum\itemno=0
+      \errmessage{No more uppercase letters in @enumerate; get a bigger
+                  alphabet}
+    \fi
+    \char\uccode\itemno
+  }%
+}
+
+% Call \doitemize, adding a period to the first argument and supplying the
+% common last two arguments.  Also subtract one from the initial value in
+% \itemno, since @item increments \itemno.
+%
+\def\startenumeration#1{%
+  \advance\itemno by -1
+  \doitemize{#1.}\flushcr
+}
+
+
+% @multitable macros
+
+% Macros used to set up halign preamble:
+%
+\let\endsetuptable\relax
+\def\xendsetuptable{\endsetuptable}
+\let\columnfractions\relax
+\def\xcolumnfractions{\columnfractions}
+\newif\ifsetpercent
+
+% #1 is the @columnfraction, usually a decimal number like .5, but might
+% be just 1.  We just use it, whatever it is.
+%
+\def\pickupwholefraction#1 {%
+  \global\advance\colcount by 1
+  \expandafter\xdef\csname col\the\colcount\endcsname{#1\hsize}%
+  \setuptable
+}
+
+\newcount\colcount
+\def\setuptable#1{%
+  \def\firstarg{#1}%
+  \ifx\firstarg\xendsetuptable
+    \let\go = \relax
+  \else
+    \ifx\firstarg\xcolumnfractions
+      \global\setpercenttrue
+    \else
+      \ifsetpercent
+         \let\go\pickupwholefraction
+      \else
+         \global\advance\colcount by 1
+         \setbox0=\hbox{#1\unskip\space}% Add a normal word space as a
+                   % separator; typically that is always in the input, anyway.
+         \expandafter\xdef\csname col\the\colcount\endcsname{\the\wd0}%
+      \fi
+    \fi
+    \ifx\go\pickupwholefraction
+      % Put the argument back for the \pickupwholefraction call, so
+      % we'll always have a period there to be parsed.
+      \def\go{\pickupwholefraction#1}%
+    \else
+      \let\go = \setuptable
+    \fi%
+  \fi
+  \go
+}
+
+% @headitem starts a heading row, which we typeset in bold.  Assignments
+% have to be global since we are inside the implicit group of an
+% alignment entry.  \everycr below resets \everytab so we don't have to
+% undo it ourselves.
+\def\headitemfont{\b}% for people to use in the template row; not changeable
+\def\headitem{%
+  \checkenv\multitable
+  \crcr
+  \gdef\headitemcrhook{\nobreak}% attempt to avoid page break after headings
+  \global\everytab={\bf}% can't use \headitemfont since the parsing differs
+  \the\everytab % for the first item
+}%
+%
+% default for tables with no headings.
+\let\headitemcrhook=\relax
+%
+\def\tab{\checkenv\multitable &\the\everytab}%
+
+\newtoks\everytab  % insert after every tab.
+%
+\envdef\multitable{%
+  \vskip\parskip
+  \startsavinginserts
+  %
+  % @item within a multitable starts a normal row.
+  % We use \def instead of \let so that if one of the multitable entries
+  % contains an @itemize, we don't choke on the \item (seen as \crcr aka
+  % \endtemplate) expanding \doitemize.
+  \def\item{\crcr}%
+  %
+  \tolerance=9500
+  \hbadness=9500
+  \parskip=0pt
+  \parindent=6pt
+  \overfullrule=0pt
+  \global\colcount=0
+  %
+  \everycr = {%
+    \noalign{%
+      \global\everytab={}% Reset from possible headitem.
+      \global\colcount=0 % Reset the column counter.
+      %
+      % Check for saved footnotes, etc.:
+      \checkinserts
+      %
+      % Perhaps a \nobreak, then reset:
+      \headitemcrhook
+      \global\let\headitemcrhook=\relax
+    }%
+  }%
+  %
+  \parsearg\domultitable
+}
+\def\domultitable#1{%
+  % To parse everything between @multitable and @item:
+  \setuptable#1 \endsetuptable
+  %
+  % This preamble sets up a generic column definition, which will
+  % be used as many times as user calls for columns.
+  % \vtop will set a single line and will also let text wrap and
+  % continue for many paragraphs if desired.
+  \halign\bgroup &%
+    \global\advance\colcount by 1
+    \strut
+    \vtop{%
+      \advance\hsize by -1\leftskip
+      % Find the correct column width
+      \hsize=\expandafter\csname col\the\colcount\endcsname
+      %
+      \rightskip=0pt
+      \ifnum\colcount=1
+        \advance\hsize by\leftskip % Add indent of surrounding text
+      \else
+        % In order to keep entries from bumping into each other.
+        \leftskip=12pt
+        \ifsetpercent \else
+          % If a template has been used
+          \advance\hsize by \leftskip
+        \fi
+      \fi
+      \noindent\ignorespaces##\unskip\strut
+    }\cr
+}
+\def\Emultitable{%
+  \crcr
+  \egroup % end the \halign
+  \global\setpercentfalse
+}
+
+
+\message{conditionals,}
+
+% @iftex, @ifnotdocbook, @ifnothtml, @ifnotinfo, @ifnotplaintext,
+% @ifnotxml always succeed.  They currently do nothing; we don't
+% attempt to check whether the conditionals are properly nested.  But we
+% have to remember that they are conditionals, so that @end doesn't
+% attempt to close an environment group.
+%
+\def\makecond#1{%
+  \expandafter\let\csname #1\endcsname = \relax
+  \expandafter\let\csname iscond.#1\endcsname = 1
+}
+\makecond{iftex}
+\makecond{ifnotdocbook}
+\makecond{ifnothtml}
+\makecond{ifnotinfo}
+\makecond{ifnotplaintext}
+\makecond{ifnotxml}
+
+% Ignore @ignore, @ifhtml, @ifinfo, and the like.
+%
+\def\direntry{\doignore{direntry}}
+\def\documentdescription{\doignore{documentdescription}}
+\def\docbook{\doignore{docbook}}
+\def\html{\doignore{html}}
+\def\ifdocbook{\doignore{ifdocbook}}
+\def\ifhtml{\doignore{ifhtml}}
+\def\ifinfo{\doignore{ifinfo}}
+\def\ifnottex{\doignore{ifnottex}}
+\def\ifplaintext{\doignore{ifplaintext}}
+\def\ifxml{\doignore{ifxml}}
+\def\ignore{\doignore{ignore}}
+\def\menu{\doignore{menu}}
+\def\xml{\doignore{xml}}
+
+% Ignore text until a line `@end #1', keeping track of nested conditionals.
+%
+% A count to remember the depth of nesting.
+\newcount\doignorecount
+
+\def\doignore#1{\begingroup
+  % Scan in ``verbatim'' mode:
+  \obeylines
+  \catcode`\@ = \other
+  \catcode`\{ = \other
+  \catcode`\} = \other
+  %
+  % Make sure that spaces turn into tokens that match what \doignoretext wants.
+  \spaceisspace
+  %
+  % Count number of #1's that we've seen.
+  \doignorecount = 0
+  %
+  % Swallow text until we reach the matching `@end #1'.
+  \dodoignore{#1}%
+}
+
+{ \catcode`_=11 % We want to use \_STOP_ which cannot appear in texinfo source.
+  \obeylines %
+  %
+  \gdef\dodoignore#1{%
+    % #1 contains the command name as a string, e.g., `ifinfo'.
+    %
+    % Define a command to find the next `@end #1'.
+    \long\def\doignoretext##1^^M@end #1{%
+      \doignoretextyyy##1^^M@#1\_STOP_}%
+    %
+    % And this command to find another #1 command, at the beginning of a
+    % line.  (Otherwise, we would consider a line `@c @ifset', for
+    % example, to count as an @ifset for nesting.)
+    \long\def\doignoretextyyy##1^^M@#1##2\_STOP_{\doignoreyyy{##2}\_STOP_}%
+    %
+    % And now expand that command.
+    \doignoretext ^^M%
+  }%
+}
+
+\def\doignoreyyy#1{%
+  \def\temp{#1}%
+  \ifx\temp\empty			% Nothing found.
+    \let\next\doignoretextzzz
+  \else					% Found a nested condition, ...
+    \advance\doignorecount by 1
+    \let\next\doignoretextyyy		% ..., look for another.
+    % If we're here, #1 ends with ^^M\ifinfo (for example).
+  \fi
+  \next #1% the token \_STOP_ is present just after this macro.
+}
+
+% We have to swallow the remaining "\_STOP_".
+%
+\def\doignoretextzzz#1{%
+  \ifnum\doignorecount = 0	% We have just found the outermost @end.
+    \let\next\enddoignore
+  \else				% Still inside a nested condition.
+    \advance\doignorecount by -1
+    \let\next\doignoretext      % Look for the next @end.
+  \fi
+  \next
+}
+
+% Finish off ignored text.
+{ \obeylines%
+  % Ignore anything after the last `@end #1'; this matters in verbatim
+  % environments, where otherwise the newline after an ignored conditional
+  % would result in a blank line in the output.
+  \gdef\enddoignore#1^^M{\endgroup\ignorespaces}%
+}
+
+
+% @set VAR sets the variable VAR to an empty value.
+% @set VAR REST-OF-LINE sets VAR to the value REST-OF-LINE.
+%
+% Since we want to separate VAR from REST-OF-LINE (which might be
+% empty), we can't just use \parsearg; we have to insert a space of our
+% own to delimit the rest of the line, and then take it out again if we
+% didn't need it.
+% We rely on the fact that \parsearg sets \catcode`\ =10.
+%
+\parseargdef\set{\setyyy#1 \endsetyyy}
+\def\setyyy#1 #2\endsetyyy{%
+  {%
+    \makevalueexpandable
+    \def\temp{#2}%
+    \edef\next{\gdef\makecsname{SET#1}}%
+    \ifx\temp\empty
+      \next{}%
+    \else
+      \setzzz#2\endsetzzz
+    \fi
+  }%
+}
+% Remove the trailing space \setxxx inserted.
+\def\setzzz#1 \endsetzzz{\next{#1}}
+
+% @clear VAR clears (i.e., unsets) the variable VAR.
+%
+\parseargdef\clear{%
+  {%
+    \makevalueexpandable
+    \global\expandafter\let\csname SET#1\endcsname=\relax
+  }%
+}
+
+% @value{foo} gets the text saved in variable foo.
+\def\value{\begingroup\makevalueexpandable\valuexxx}
+\def\valuexxx#1{\expandablevalue{#1}\endgroup}
+{
+  \catcode`\-=\active \catcode`\_=\active
+  %
+  \gdef\makevalueexpandable{%
+    \let\value = \expandablevalue
+    % We don't want these characters active, ...
+    \catcode`\-=\other \catcode`\_=\other
+    % ..., but we might end up with active ones in the argument if
+    % we're called from @code, as @code{@value{foo-bar_}}, though.
+    % So \let them to their normal equivalents.
+    \let-\normaldash \let_\normalunderscore
+  }
+}
+
+\def\expandablevalue#1{%
+  \expandafter\ifx\csname SET#1\endcsname\relax
+    {[No value for ``#1'']}%
+    \message{Variable `#1', used in @value, is not set.}%
+  \else
+    \csname SET#1\endcsname
+  \fi
+}
+
+% Like \expandablevalue, but completely expandable (the \message in the
+% definition above operates at the execution level of TeX).  Used when
+% writing to auxiliary files, due to the expansion that \write does.
+% If flag is undefined, pass through an unexpanded @value command: maybe it 
+% will be set by the time it is read back in.
+%
+% NB flag names containing - or _ may not work here.
+\def\dummyvalue#1{%
+  \expandafter\ifx\csname SET#1\endcsname\relax
+    \string\value{#1}%
+  \else
+    \csname SET#1\endcsname
+  \fi
+}
+
+% Used for @value's in index entries to form the sort key: expand the @value
+% if possible, otherwise sort late.
+\def\indexnofontsvalue#1{%
+  \expandafter\ifx\csname SET#1\endcsname\relax
+    ZZZZZZZ%
+  \else
+    \csname SET#1\endcsname
+  \fi
+}
+
+% @ifset VAR ... @end ifset reads the `...' iff VAR has been defined
+% with @set.
+% 
+% To get the special treatment we need for `@end ifset,' we call
+% \makecond and then redefine.
+%
+\makecond{ifset}
+\def\ifset{\parsearg{\doifset{\let\next=\ifsetfail}}}
+\def\doifset#1#2{%
+  {%
+    \makevalueexpandable
+    \let\next=\empty
+    \expandafter\ifx\csname SET#2\endcsname\relax
+      #1% If not set, redefine \next.
+    \fi
+    \expandafter
+  }\next
+}
+\def\ifsetfail{\doignore{ifset}}
+
+% @ifclear VAR ... @end executes the `...' iff VAR has never been
+% defined with @set, or has been undefined with @clear.
+%
+% The `\else' inside the `\doifset' parameter is a trick to reuse the
+% above code: if the variable is not set, do nothing, if it is set,
+% then redefine \next to \ifclearfail.
+%
+\makecond{ifclear}
+\def\ifclear{\parsearg{\doifset{\else \let\next=\ifclearfail}}}
+\def\ifclearfail{\doignore{ifclear}}
+
+% @ifcommandisdefined CMD ... @end executes the `...' if CMD (written
+% without the @) is in fact defined.  We can only feasibly check at the
+% TeX level, so something like `mathcode' is going to considered
+% defined even though it is not a Texinfo command.
+% 
+\makecond{ifcommanddefined}
+\def\ifcommanddefined{\parsearg{\doifcmddefined{\let\next=\ifcmddefinedfail}}}
+%
+\def\doifcmddefined#1#2{{%
+    \makevalueexpandable
+    \let\next=\empty
+    \expandafter\ifx\csname #2\endcsname\relax
+      #1% If not defined, \let\next as above.
+    \fi
+    \expandafter
+  }\next
+}
+\def\ifcmddefinedfail{\doignore{ifcommanddefined}}
+
+% @ifcommandnotdefined CMD ... handled similar to @ifclear above.
+\makecond{ifcommandnotdefined}
+\def\ifcommandnotdefined{%
+  \parsearg{\doifcmddefined{\else \let\next=\ifcmdnotdefinedfail}}}
+\def\ifcmdnotdefinedfail{\doignore{ifcommandnotdefined}}
+
+% Set the `txicommandconditionals' variable, so documents have a way to
+% test if the @ifcommand...defined conditionals are available.
+\set txicommandconditionals
+
+% @dircategory CATEGORY  -- specify a category of the dir file
+% which this file should belong to.  Ignore this in TeX.
+\let\dircategory=\comment
+
+% @defininfoenclose.
+\let\definfoenclose=\comment
+
+
+\message{indexing,}
+% Index generation facilities
+
+% Define \newwrite to be identical to plain tex's \newwrite
+% except not \outer, so it can be used within macros and \if's.
+\edef\newwrite{\makecsname{ptexnewwrite}}
+
+% \newindex {foo} defines an index named IX.
+% It automatically defines \IXindex such that
+% \IXindex ...rest of line... puts an entry in the index IX.
+% It also defines \IXindfile to be the number of the output channel for
+% the file that accumulates this index.  The file's extension is IX.
+% The name of an index should be no more than 2 characters long
+% for the sake of vms.
+%
+\def\newindex#1{%
+  \expandafter\chardef\csname#1indfile\endcsname=0
+  \expandafter\xdef\csname#1index\endcsname{%     % Define @#1index
+    \noexpand\doindex{#1}}
+}
+
+% @defindex foo  ==  \newindex{foo}
+%
+\def\defindex{\parsearg\newindex}
+
+% Define @defcodeindex, like @defindex except put all entries in @code.
+%
+\def\defcodeindex{\parsearg\newcodeindex}
+%
+\def\newcodeindex#1{%
+  \expandafter\chardef\csname#1indfile\endcsname=0
+  \expandafter\xdef\csname#1index\endcsname{%
+    \noexpand\docodeindex{#1}}%
+}
+
+% The default indices:
+\newindex{cp}%      concepts,
+\newcodeindex{fn}%  functions,
+\newcodeindex{vr}%  variables,
+\newcodeindex{tp}%  types,
+\newcodeindex{ky}%  keys
+\newcodeindex{pg}%  and programs.
+
+
+% @synindex foo bar    makes index foo feed into index bar.
+% Do this instead of @defindex foo if you don't want it as a separate index.
+%
+% @syncodeindex foo bar   similar, but put all entries made for index foo
+% inside @code.
+%
+\def\synindex#1 #2 {\dosynindex\doindex{#1}{#2}}
+\def\syncodeindex#1 #2 {\dosynindex\docodeindex{#1}{#2}}
+
+% #1 is \doindex or \docodeindex, #2 the index getting redefined (foo),
+% #3 the target index (bar).
+\def\dosynindex#1#2#3{%
+  \requireopenindexfile{#3}%
+  % redefine \fooindfile:
+  \expandafter\let\expandafter\temp\expandafter=\csname#3indfile\endcsname
+  \expandafter\let\csname#2indfile\endcsname=\temp
+  % redefine \fooindex:
+  \expandafter\xdef\csname#2index\endcsname{\noexpand#1{#3}}%
+}
+
+% Define \doindex, the driver for all index macros.
+% Argument #1 is generated by the calling \fooindex macro,
+% and it is the two-letter name of the index.
+
+\def\doindex#1{\edef\indexname{#1}\parsearg\doindexxxx}
+\def\doindexxxx #1{\doind{\indexname}{#1}}
+
+% like the previous two, but they put @code around the argument.
+\def\docodeindex#1{\edef\indexname{#1}\parsearg\docodeindexxxx}
+\def\docodeindexxxx #1{\docind{\indexname}{#1}}
+
+
+% Used for the aux, toc and index files to prevent expansion of Texinfo 
+% commands.
+%
+\def\atdummies{%
+  \definedummyletter\@%
+  \definedummyletter\ %
+  \definedummyletter\{%
+  \definedummyletter\}%
+  \definedummyletter\&%
+  %
+  % Do the redefinitions.
+  \definedummies
+  \otherbackslash
+}
+
+% \definedummyword defines \#1 as \string\#1\space, thus effectively
+% preventing its expansion.  This is used only for control words,
+% not control letters, because the \space would be incorrect for
+% control characters, but is needed to separate the control word
+% from whatever follows.
+%
+% These can be used both for control words that take an argument and
+% those that do not.  If it is followed by {arg} in the input, then
+% that will dutifully get written to the index (or wherever).
+%
+% For control letters, we have \definedummyletter, which omits the
+% space.
+%
+\def\definedummyword  #1{\def#1{\string#1\space}}%
+\def\definedummyletter#1{\def#1{\string#1}}%
+\let\definedummyaccent\definedummyletter
+
+% Called from \atdummies to prevent the expansion of commands.
+%
+\def\definedummies{%
+  %
+  \let\commondummyword\definedummyword
+  \let\commondummyletter\definedummyletter
+  \let\commondummyaccent\definedummyaccent
+  \commondummiesnofonts
+  %
+  \definedummyletter\_%
+  \definedummyletter\-%
+  %
+  % Non-English letters.
+  \definedummyword\AA
+  \definedummyword\AE
+  \definedummyword\DH
+  \definedummyword\L
+  \definedummyword\O
+  \definedummyword\OE
+  \definedummyword\TH
+  \definedummyword\aa
+  \definedummyword\ae
+  \definedummyword\dh
+  \definedummyword\exclamdown
+  \definedummyword\l
+  \definedummyword\o
+  \definedummyword\oe
+  \definedummyword\ordf
+  \definedummyword\ordm
+  \definedummyword\questiondown
+  \definedummyword\ss
+  \definedummyword\th
+  %
+  % Although these internal commands shouldn't show up, sometimes they do.
+  \definedummyword\bf
+  \definedummyword\gtr
+  \definedummyword\hat
+  \definedummyword\less
+  \definedummyword\sf
+  \definedummyword\sl
+  \definedummyword\tclose
+  \definedummyword\tt
+  %
+  \definedummyword\LaTeX
+  \definedummyword\TeX
+  %
+  % Assorted special characters.
+  \definedummyword\ampchar
+  \definedummyword\atchar
+  \definedummyword\arrow
+  \definedummyword\backslashchar
+  \definedummyword\bullet
+  \definedummyword\comma
+  \definedummyword\copyright
+  \definedummyword\registeredsymbol
+  \definedummyword\dots
+  \definedummyword\enddots
+  \definedummyword\entrybreak
+  \definedummyword\equiv
+  \definedummyword\error
+  \definedummyword\euro
+  \definedummyword\expansion
+  \definedummyword\geq
+  \definedummyword\guillemetleft
+  \definedummyword\guillemetright
+  \definedummyword\guilsinglleft
+  \definedummyword\guilsinglright
+  \definedummyword\lbracechar
+  \definedummyword\leq
+  \definedummyword\mathopsup
+  \definedummyword\minus
+  \definedummyword\ogonek
+  \definedummyword\pounds
+  \definedummyword\point
+  \definedummyword\print
+  \definedummyword\quotedblbase
+  \definedummyword\quotedblleft
+  \definedummyword\quotedblright
+  \definedummyword\quoteleft
+  \definedummyword\quoteright
+  \definedummyword\quotesinglbase
+  \definedummyword\rbracechar
+  \definedummyword\result
+  \definedummyword\sub
+  \definedummyword\sup
+  \definedummyword\textdegree
+  %
+  \definedummyword\subentry
+  %
+  % We want to disable all macros so that they are not expanded by \write.
+  \macrolist
+  \let\value\dummyvalue
+  %
+  \normalturnoffactive
+}
+
+% \commondummiesnofonts: common to \definedummies and \indexnofonts.
+% Define \commondummyletter, \commondummyaccent and \commondummyword before
+% using.  Used for accents, font commands, and various control letters.
+%
+\def\commondummiesnofonts{%
+  % Control letters and accents.
+  \commondummyletter\!%
+  \commondummyaccent\"%
+  \commondummyaccent\'%
+  \commondummyletter\*%
+  \commondummyaccent\,%
+  \commondummyletter\.%
+  \commondummyletter\/%
+  \commondummyletter\:%
+  \commondummyaccent\=%
+  \commondummyletter\?%
+  \commondummyaccent\^%
+  \commondummyaccent\`%
+  \commondummyaccent\~%
+  \commondummyword\u
+  \commondummyword\v
+  \commondummyword\H
+  \commondummyword\dotaccent
+  \commondummyword\ogonek
+  \commondummyword\ringaccent
+  \commondummyword\tieaccent
+  \commondummyword\ubaraccent
+  \commondummyword\udotaccent
+  \commondummyword\dotless
+  %
+  % Texinfo font commands.
+  \commondummyword\b
+  \commondummyword\i
+  \commondummyword\r
+  \commondummyword\sansserif
+  \commondummyword\sc
+  \commondummyword\slanted
+  \commondummyword\t
+  %
+  % Commands that take arguments.
+  \commondummyword\abbr
+  \commondummyword\acronym
+  \commondummyword\anchor
+  \commondummyword\cite
+  \commondummyword\code
+  \commondummyword\command
+  \commondummyword\dfn
+  \commondummyword\dmn
+  \commondummyword\email
+  \commondummyword\emph
+  \commondummyword\env
+  \commondummyword\file
+  \commondummyword\image
+  \commondummyword\indicateurl
+  \commondummyword\inforef
+  \commondummyword\kbd
+  \commondummyword\key
+  \commondummyword\math
+  \commondummyword\option
+  \commondummyword\pxref
+  \commondummyword\ref
+  \commondummyword\samp
+  \commondummyword\strong
+  \commondummyword\tie
+  \commondummyword\U
+  \commondummyword\uref
+  \commondummyword\url
+  \commondummyword\var
+  \commondummyword\verb
+  \commondummyword\w
+  \commondummyword\xref
+}
+
+\let\indexlbrace\relax
+\let\indexrbrace\relax
+\let\indexatchar\relax
+\let\indexbackslash\relax
+
+{\catcode`\@=0
+\catcode`\\=13
+  @gdef@backslashdisappear{@def\{}}
+}
+
+{
+\catcode`\<=13
+\catcode`\-=13
+\catcode`\`=13
+  \gdef\indexnonalnumdisappear{%
+    \expandafter\ifx\csname SETtxiindexlquoteignore\endcsname\relax\else
+      % @set txiindexlquoteignore makes us ignore left quotes in the sort term.
+      % (Introduced for FSFS 2nd ed.)
+      \let`=\empty
+    \fi
+    %
+    \expandafter\ifx\csname SETtxiindexbackslashignore\endcsname\relax\else
+      \backslashdisappear
+    \fi
+    %
+    \expandafter\ifx\csname SETtxiindexhyphenignore\endcsname\relax\else
+      \def-{}%
+    \fi
+    \expandafter\ifx\csname SETtxiindexlessthanignore\endcsname\relax\else
+      \def<{}%
+    \fi
+    \expandafter\ifx\csname SETtxiindexatsignignore\endcsname\relax\else
+      \def\@{}%
+    \fi
+  }
+
+  \gdef\indexnonalnumreappear{%
+    \let-\normaldash
+    \let<\normalless
+  }
+}
+
+
+% \indexnofonts is used when outputting the strings to sort the index
+% by, and when constructing control sequence names.  It eliminates all
+% control sequences and just writes whatever the best ASCII sort string
+% would be for a given command (usually its argument).
+%
+\def\indexnofonts{%
+  % Accent commands should become @asis.
+  \def\commondummyaccent##1{\let##1\asis}%
+  % We can just ignore other control letters.
+  \def\commondummyletter##1{\let##1\empty}%
+  % All control words become @asis by default; overrides below.
+  \let\commondummyword\commondummyaccent
+  \commondummiesnofonts
+  %
+  % Don't no-op \tt, since it isn't a user-level command
+  % and is used in the definitions of the active chars like <, >, |, etc.
+  % Likewise with the other plain tex font commands.
+  %\let\tt=\asis
+  %
+  \def\ { }%
+  \def\@{@}%
+  \def\_{\normalunderscore}%
+  \def\-{}% @- shouldn't affect sorting
+  %
+  \uccode`\1=`\{ \uppercase{\def\{{1}}%
+  \uccode`\1=`\} \uppercase{\def\}{1}}%
+  \let\lbracechar\{%
+  \let\rbracechar\}%
+  %
+  % Non-English letters.
+  \def\AA{AA}%
+  \def\AE{AE}%
+  \def\DH{DZZ}%
+  \def\L{L}%
+  \def\OE{OE}%
+  \def\O{O}%
+  \def\TH{TH}%
+  \def\aa{aa}%
+  \def\ae{ae}%
+  \def\dh{dzz}%
+  \def\exclamdown{!}%
+  \def\l{l}%
+  \def\oe{oe}%
+  \def\ordf{a}%
+  \def\ordm{o}%
+  \def\o{o}%
+  \def\questiondown{?}%
+  \def\ss{ss}%
+  \def\th{th}%
+  %
+  \let\do\indexnofontsdef
+  %
+  \do\LaTeX{LaTeX}%
+  \do\TeX{TeX}%
+  %
+  % Assorted special characters.
+  \do\atchar{@}%
+  \do\arrow{->}%
+  \do\bullet{bullet}%
+  \do\comma{,}%
+  \do\copyright{copyright}%
+  \do\dots{...}%
+  \do\enddots{...}%
+  \do\equiv{==}%
+  \do\error{error}%
+  \do\euro{euro}%
+  \do\expansion{==>}%
+  \do\geq{>=}%
+  \do\guillemetleft{<<}%
+  \do\guillemetright{>>}%
+  \do\guilsinglleft{<}%
+  \do\guilsinglright{>}%
+  \do\leq{<=}%
+  \do\lbracechar{\{}%
+  \do\minus{-}%
+  \do\point{.}%
+  \do\pounds{pounds}%
+  \do\print{-|}%
+  \do\quotedblbase{"}%
+  \do\quotedblleft{"}%
+  \do\quotedblright{"}%
+  \do\quoteleft{`}%
+  \do\quoteright{'}%
+  \do\quotesinglbase{,}%
+  \do\rbracechar{\}}%
+  \do\registeredsymbol{R}%
+  \do\result{=>}%
+  \do\textdegree{o}%
+  %
+  % We need to get rid of all macros, leaving only the arguments (if present).
+  % Of course this is not nearly correct, but it is the best we can do for now.
+  % makeinfo does not expand macros in the argument to @deffn, which ends up
+  % writing an index entry, and texindex isn't prepared for an index sort entry
+  % that starts with \.
+  %
+  % Since macro invocations are followed by braces, we can just redefine them
+  % to take a single TeX argument.  The case of a macro invocation that
+  % goes to end-of-line is not handled.
+  %
+  \macrolist
+  \let\value\indexnofontsvalue
+}
+
+% Give the control sequence a definition that removes the {} that follows 
+% its use, e.g. @AA{} -> AA
+\def\indexnofontsdef#1#2{\def#1##1{#2}}%
+
+
+
+
+% #1 is the index name, #2 is the entry text.
+\def\doind#1#2{%
+  \iflinks
+  {%
+    %
+    \requireopenindexfile{#1}%
+    \edef\writeto{\csname#1indfile\endcsname}%
+    %
+    \def\indextext{#2}%
+    \safewhatsit\doindwrite
+  }%
+  \fi
+}
+
+% Same as \doind, but for code indices
+\def\docind#1#2{%
+  \iflinks
+  {%
+    %
+    \requireopenindexfile{#1}%
+    \edef\writeto{\csname#1indfile\endcsname}%
+    %
+    \def\indextext{#2}%
+    \safewhatsit\docindwrite
+  }%
+  \fi
+}
+
+% Check if an index file has been opened, and if not, open it.
+\def\requireopenindexfile#1{%
+\ifnum\csname #1indfile\endcsname=0
+  \expandafter\newwrite \csname#1indfile\endcsname
+  \edef\suffix{#1}%
+  % A .fls suffix would conflict with the file extension for the output
+  % of -recorder, so use .f1s instead.
+  \ifx\suffix\indexisfl\def\suffix{f1}\fi
+  % Open the file
+  \immediate\openout\csname#1indfile\endcsname \jobname.\suffix
+  % Using \immediate above here prevents an object entering into the current 
+  % box, which could confound checks such as those in \safewhatsit for
+  % preceding skips.
+  \typeout{Writing index file \jobname.\suffix}%
+\fi}
+\def\indexisfl{fl}
+
+% Definition for writing index entry sort key.
+{
+\catcode`\-=13
+\gdef\indexwritesortas{%
+  \begingroup
+  \indexnonalnumreappear
+  \indexwritesortasxxx}
+\gdef\indexwritesortasxxx#1{%
+  \xdef\indexsortkey{#1}\endgroup}
+}
+
+\def\indexwriteseealso#1{
+  \gdef\pagenumbertext{\string\seealso{#1}}%
+}
+\def\indexwriteseeentry#1{
+  \gdef\pagenumbertext{\string\seeentry{#1}}%
+}
+
+% The default definitions
+\def\sortas#1{}%
+\def\seealso#1{\i{\putwordSeeAlso}\ #1}% for sorted index file only
+\def\putwordSeeAlso{See also}
+\def\seeentry#1{\i{\putwordSee}\ #1}% for sorted index file only
+
+
+% Given index entry text like "aaa @subentry bbb @sortas{ZZZ}":
+%   * Set \bracedtext to "{aaa}{bbb}"
+%   * Set \fullindexsortkey to "aaa @subentry ZZZ"
+%   * If @seealso occurs, set \pagenumbertext
+%
+\def\splitindexentry#1{%
+  \gdef\fullindexsortkey{}%
+  \xdef\bracedtext{}%
+  \def\sep{}%
+  \def\seealso##1{}%
+  \def\seeentry##1{}%
+  \expandafter\doindexsegment#1\subentry\finish\subentry
+}
+
+% append the results from the next segment
+\def\doindexsegment#1\subentry{%
+  \def\segment{#1}%
+  \ifx\segment\isfinish
+  \else
+    %
+    % Fully expand the segment, throwing away any @sortas directives, and 
+    % trim spaces.
+    \edef\trimmed{\segment}%
+    \edef\trimmed{\expandafter\eatspaces\expandafter{\trimmed}}%
+    \ifincodeindex
+      \edef\trimmed{\noexpand\code{\trimmed}}%
+    \fi
+    %
+    \xdef\bracedtext{\bracedtext{\trimmed}}%
+    %
+    % Get the string to sort by.  Process the segment with all
+    % font commands turned off.
+    \bgroup
+      \let\sortas\indexwritesortas
+      \let\seealso\indexwriteseealso
+      \let\seeentry\indexwriteseeentry
+      \indexnofonts
+      % The braces around the commands are recognized by texindex.
+      \def\lbracechar{{\string\indexlbrace}}%
+      \def\rbracechar{{\string\indexrbrace}}%
+      \let\{=\lbracechar
+      \let\}=\rbracechar
+      \def\@{{\string\indexatchar}}%
+      \def\atchar##1{\@}%
+      \def\backslashchar{{\string\indexbackslash}}%
+      \uccode`\~=`\\ \uppercase{\let~\backslashchar}%
+      %
+      \let\indexsortkey\empty
+      \global\let\pagenumbertext\empty
+      % Execute the segment and throw away the typeset output.  This executes
+      % any @sortas or @seealso commands in this segment.
+      \setbox\dummybox = \hbox{\segment}%
+      \ifx\indexsortkey\empty{%
+        \indexnonalnumdisappear
+        \xdef\trimmed{\segment}%
+        \xdef\trimmed{\expandafter\eatspaces\expandafter{\trimmed}}%
+        \xdef\indexsortkey{\trimmed}%
+        \ifx\indexsortkey\empty\xdef\indexsortkey{ }\fi
+      }\fi
+      %
+      % Append to \fullindexsortkey.
+      \edef\tmp{\gdef\noexpand\fullindexsortkey{%
+                  \fullindexsortkey\sep\indexsortkey}}%
+      \tmp
+    \egroup
+    \def\sep{\subentry}%
+    %
+    \expandafter\doindexsegment
+  \fi
+}
+\def\isfinish{\finish}%
+\newbox\dummybox % used above
+
+\let\subentry\relax
+
+% Use \ instead of @ in index files.  To support old texi2dvi and texindex.
+% This works without changing the escape character used in the toc or aux
+% files because the index entries are fully expanded here, and \string uses
+% the current value of \escapechar.
+\def\escapeisbackslash{\escapechar=`\\}
+
+% Use \ in index files by default.  texi2dvi didn't support @ as the escape 
+% character (as it checked for "\entry" in the files, and not "@entry").  When 
+% the new version of texi2dvi has had a chance to become more prevalent, then 
+% the escape character can change back to @ again.  This should be an easy 
+% change to make now because both @ and \ are only used as escape characters in 
+% index files, never standing for themselves. 
+%
+\set txiindexescapeisbackslash
+
+% Write the entry in \indextext to the index file.
+%
+
+\newif\ifincodeindex
+\def\doindwrite{\incodeindexfalse\doindwritex}
+\def\docindwrite{\incodeindextrue\doindwritex}
+
+\def\doindwritex{%
+  \maybemarginindex
+  %
+  \atdummies
+  %
+  \expandafter\ifx\csname SETtxiindexescapeisbackslash\endcsname\relax\else
+    \escapeisbackslash
+  \fi
+  %
+  % For texindex which always views { and } as separators.
+  \def\{{\lbracechar{}}%
+  \def\}{\rbracechar{}}%
+  \uccode`\~=`\\ \uppercase{\def~{\backslashchar{}}}%
+  %
+  % Split the entry into primary entry and any subentries, and get the index 
+  % sort key.
+  \splitindexentry\indextext
+  %
+  % Set up the complete index entry, with both the sort key and
+  % the original text, including any font commands.  We write
+  % three arguments to \entry to the .?? file (four in the
+  % subentry case), texindex reduces to two when writing the .??s
+  % sorted result.
+  %
+  \edef\temp{%
+    \write\writeto{%
+      \string\entry{\fullindexsortkey}%
+        {\ifx\pagenumbertext\empty\noexpand\folio\else\pagenumbertext\fi}%
+        \bracedtext}%
+  }%
+  \temp
+}
+
+% Put the index entry in the margin if desired (undocumented).
+\def\maybemarginindex{%
+  \ifx\SETmarginindex\relax\else
+    \insert\margin{\hbox{\vrule height8pt depth3pt width0pt \relax\indextext}}%
+  \fi
+}
+\let\SETmarginindex=\relax
+
+
+% Take care of unwanted page breaks/skips around a whatsit:
+%
+% If a skip is the last thing on the list now, preserve it
+% by backing up by \lastskip, doing the \write, then inserting
+% the skip again.  Otherwise, the whatsit generated by the
+% \write or \pdfdest will make \lastskip zero.  The result is that
+% sequences like this:
+% @end defun
+% @tindex whatever
+% @defun ...
+% will have extra space inserted, because the \medbreak in the
+% start of the @defun won't see the skip inserted by the @end of
+% the previous defun.
+%
+% But don't do any of this if we're not in vertical mode.  We
+% don't want to do a \vskip and prematurely end a paragraph.
+%
+% Avoid page breaks due to these extra skips, too.
+%
+% But wait, there is a catch there:
+% We'll have to check whether \lastskip is zero skip.  \ifdim is not
+% sufficient for this purpose, as it ignores stretch and shrink parts
+% of the skip.  The only way seems to be to check the textual
+% representation of the skip.
+%
+% The following is almost like \def\zeroskipmacro{0.0pt} except that
+% the ``p'' and ``t'' characters have catcode \other, not 11 (letter).
+%
+\edef\zeroskipmacro{\expandafter\the\csname z@skip\endcsname}
+%
+\newskip\whatsitskip
+\newcount\whatsitpenalty
+%
+% ..., ready, GO:
+%
+\def\safewhatsit#1{\ifhmode
+  #1%
+ \else
+  % \lastskip and \lastpenalty cannot both be nonzero simultaneously.
+  \whatsitskip = \lastskip
+  \edef\lastskipmacro{\the\lastskip}%
+  \whatsitpenalty = \lastpenalty
+  %
+  % If \lastskip is nonzero, that means the last item was a
+  % skip.  And since a skip is discardable, that means this
+  % -\whatsitskip glue we're inserting is preceded by a
+  % non-discardable item, therefore it is not a potential
+  % breakpoint, therefore no \nobreak needed.
+  \ifx\lastskipmacro\zeroskipmacro
+  \else
+    \vskip-\whatsitskip
+  \fi
+  %
+  #1%
+  %
+  \ifx\lastskipmacro\zeroskipmacro
+    % If \lastskip was zero, perhaps the last item was a penalty, and
+    % perhaps it was >=10000, e.g., a \nobreak.  In that case, we want
+    % to re-insert the same penalty (values >10000 are used for various
+    % signals); since we just inserted a non-discardable item, any
+    % following glue (such as a \parskip) would be a breakpoint.  For example:
+    %   @deffn deffn-whatever
+    %   @vindex index-whatever
+    %   Description.
+    % would allow a break between the index-whatever whatsit
+    % and the "Description." paragraph.
+    \ifnum\whatsitpenalty>9999 \penalty\whatsitpenalty \fi
+  \else
+    % On the other hand, if we had a nonzero \lastskip,
+    % this make-up glue would be preceded by a non-discardable item
+    % (the whatsit from the \write), so we must insert a \nobreak.
+    \nobreak\vskip\whatsitskip
+  \fi
+\fi}
+
+% The index entry written in the file actually looks like
+%  \entry {sortstring}{page}{topic}
+% or
+%  \entry {sortstring}{page}{topic}{subtopic}
+% The texindex program reads in these files and writes files
+% containing these kinds of lines:
+%  \initial {c}
+%     before the first topic whose initial is c
+%  \entry {topic}{pagelist}
+%     for a topic that is used without subtopics
+%  \primary {topic}
+%  \entry {topic}{}
+%     for the beginning of a topic that is used with subtopics
+%  \secondary {subtopic}{pagelist}
+%     for each subtopic.
+%  \secondary {subtopic}{}
+%     for a subtopic with sub-subtopics
+%  \tertiary {subtopic}{subsubtopic}{pagelist}
+%     for each sub-subtopic.
+
+% Define the user-accessible indexing commands
+% @findex, @vindex, @kindex, @cindex.
+
+\def\findex {\fnindex}
+\def\kindex {\kyindex}
+\def\cindex {\cpindex}
+\def\vindex {\vrindex}
+\def\tindex {\tpindex}
+\def\pindex {\pgindex}
+
+% Define the macros used in formatting output of the sorted index material.
+
+% @printindex causes a particular index (the ??s file) to get printed.
+% It does not print any chapter heading (usually an @unnumbered).
+%
+\parseargdef\printindex{\begingroup
+  \dobreak \chapheadingskip{10000}%
+  %
+  \smallfonts \rm
+  \tolerance = 9500
+  \plainfrenchspacing
+  \everypar = {}% don't want the \kern\-parindent from indentation suppression.
+  %
+  % See comment in \requireopenindexfile.
+  \def\indexname{#1}\ifx\indexname\indexisfl\def\indexname{f1}\fi
+  %
+  % See if the index file exists and is nonempty.
+  \openin 1 \jobname.\indexname s
+  \ifeof 1
+    % \enddoublecolumns gets confused if there is no text in the index,
+    % and it loses the chapter title and the aux file entries for the
+    % index.  The easiest way to prevent this problem is to make sure
+    % there is some text.
+    \putwordIndexNonexistent
+    \typeout{No file \jobname.\indexname s.}%
+  \else
+    % If the index file exists but is empty, then \openin leaves \ifeof
+    % false.  We have to make TeX try to read something from the file, so
+    % it can discover if there is anything in it.
+    \read 1 to \thisline
+    \ifeof 1
+      \putwordIndexIsEmpty
+    \else
+      \expandafter\printindexzz\thisline\relax\relax\finish%
+    \fi
+  \fi
+  \closein 1
+\endgroup}
+
+% If the index file starts with a backslash, forgo reading the index
+% file altogether.  If somebody upgrades texinfo.tex they may still have
+% old index files using \ as the escape character.  Reading this would
+% at best lead to typesetting garbage, at worst a TeX syntax error.
+\def\printindexzz#1#2\finish{%
+  \expandafter\ifx\csname SETtxiindexescapeisbackslash\endcsname\relax
+    \uccode`\~=`\\ \uppercase{\if\noexpand~}\noexpand#1
+      \expandafter\ifx\csname SETtxiskipindexfileswithbackslash\endcsname\relax
+\errmessage{%
+ERROR: A sorted index file in an obsolete format was skipped.  
+To fix this problem, please upgrade your version of 'texi2dvi'
+or 'texi2pdf' to that at <https://ftp.gnu.org/gnu/texinfo>.
+If you are using an old version of 'texindex' (part of the Texinfo 
+distribution), you may also need to upgrade to a newer version (at least 6.0).
+You may be able to typeset the index if you run
+'texindex \jobname.\indexname' yourself.
+You could also try setting the 'txiindexescapeisbackslash' flag by 
+running a command like
+'texi2dvi -t "@set txiindexescapeisbackslash" \jobname.texi'.  If you do 
+this, Texinfo will try to use index files in the old format.
+If you continue to have problems, deleting the index files and starting again 
+might help (with 'rm \jobname.?? \jobname.??s')%
+}%
+      \else
+        (Skipped sorted index file in obsolete format)
+      \fi
+    \else
+      \begindoublecolumns
+      \input \jobname.\indexname s
+      \enddoublecolumns
+    \fi
+  \else
+    \begindoublecolumns
+    \catcode`\\=0\relax
+    %
+    % Make @ an escape character to give macros a chance to work.  This
+    % should work because we (hopefully) don't otherwise use @ in index files.
+    %\catcode`\@=12\relax
+    \catcode`\@=0\relax
+    \input \jobname.\indexname s
+    \enddoublecolumns
+  \fi
+}
+
+% These macros are used by the sorted index file itself.
+% Change them to control the appearance of the index.
+
+{\catcode`\/=13 \catcode`\-=13 \catcode`\^=13 \catcode`\~=13 \catcode`\_=13
+\catcode`\|=13 \catcode`\<=13 \catcode`\>=13 \catcode`\+=13 \catcode`\"=13
+\catcode`\$=3
+\gdef\initialglyphs{%
+  % special control sequences used in the index sort key
+  \let\indexlbrace\{%
+  \let\indexrbrace\}%
+  \let\indexatchar\@%
+  \def\indexbackslash{\math{\backslash}}%
+  %
+  % Some changes for non-alphabetic characters.  Using the glyphs from the
+  % math fonts looks more consistent than the typewriter font used elsewhere
+  % for these characters.
+  \uccode`\~=`\\ \uppercase{\def~{\math{\backslash}}}
+  %
+  % In case @\ is used for backslash
+  \uppercase{\let\\=~}
+  % Can't get bold backslash so don't use bold forward slash
+  \catcode`\/=13
+  \def/{{\secrmnotbold \normalslash}}%
+  \def-{{\normaldash\normaldash}}% en dash `--'
+  \def^{{\chapbf \normalcaret}}%
+  \def~{{\chapbf \normaltilde}}%
+  \def\_{%
+     \leavevmode \kern.07em \vbox{\hrule width.3em height.1ex}\kern .07em }%
+  \def|{$\vert$}%
+  \def<{$\less$}%
+  \def>{$\gtr$}%
+  \def+{$\normalplus$}%
+}}
+
+\def\initial{%
+  \bgroup
+  \initialglyphs
+  \initialx
+}
+
+\def\initialx#1{%
+  % Remove any glue we may have, we'll be inserting our own.
+  \removelastskip
+  %
+  % We like breaks before the index initials, so insert a bonus.
+  % The glue before the bonus allows a little bit of space at the
+  % bottom of a column to reduce an increase in inter-line spacing.
+  \nobreak
+  \vskip 0pt plus 5\baselineskip
+  \penalty -300 
+  \vskip 0pt plus -5\baselineskip
+  %
+  % Typeset the initial.  Making this add up to a whole number of
+  % baselineskips increases the chance of the dots lining up from column
+  % to column.  It still won't often be perfect, because of the stretch
+  % we need before each entry, but it's better.
+  %
+  % No shrink because it confuses \balancecolumns.
+  \vskip 1.67\baselineskip plus 1\baselineskip
+  \leftline{\secfonts \kern-0.05em \secbf #1}%
+  % \secfonts is inside the argument of \leftline so that the change of
+  % \baselineskip will not affect any glue inserted before the vbox that
+  % \leftline creates.
+  % Do our best not to break after the initial.
+  \nobreak
+  \vskip .33\baselineskip plus .1\baselineskip
+  \egroup % \initialglyphs
+}
+
+\newdimen\entryrightmargin
+\entryrightmargin=0pt
+
+% \entry typesets a paragraph consisting of the text (#1), dot leaders, and
+% then page number (#2) flushed to the right margin.  It is used for index
+% and table of contents entries.  The paragraph is indented by \leftskip.
+%
+\def\entry{%
+  \begingroup
+    %
+    % Start a new paragraph if necessary, so our assignments below can't
+    % affect previous text.
+    \par
+    %
+    % No extra space above this paragraph.
+    \parskip = 0in
+    %
+    % When reading the text of entry, convert explicit line breaks
+    % from @* into spaces.  The user might give these in long section
+    % titles, for instance.
+    \def\*{\unskip\space\ignorespaces}%
+    \def\entrybreak{\hfil\break}% An undocumented command
+    %
+    % Swallow the left brace of the text (first parameter):
+    \afterassignment\doentry
+    \let\temp =
+}
+\def\entrybreak{\unskip\space\ignorespaces}%
+\def\doentry{%
+    % Save the text of the entry
+    \global\setbox\boxA=\hbox\bgroup
+    \bgroup % Instead of the swallowed brace.
+      \noindent
+      \aftergroup\finishentry
+      % And now comes the text of the entry.
+      % Not absorbing as a macro argument reduces the chance of problems
+      % with catcodes occurring.
+}
+{\catcode`\@=11
+\gdef\finishentry#1{%
+    \egroup % end box A
+    \dimen@ = \wd\boxA % Length of text of entry
+    \global\setbox\boxA=\hbox\bgroup
+      \unhbox\boxA
+      % #1 is the page number.
+      %
+      % Get the width of the page numbers, and only use
+      % leaders if they are present.
+      \global\setbox\boxB = \hbox{#1}%
+      \ifdim\wd\boxB = 0pt
+        \null\nobreak\hfill\ %
+      \else
+        %
+        \null\nobreak\indexdotfill % Have leaders before the page number.
+        %
+        \ifpdforxetex
+          \pdfgettoks#1.%
+          \hskip\skip\thinshrinkable\the\toksA
+        \else
+          \hskip\skip\thinshrinkable #1%
+        \fi
+      \fi
+    \egroup % end \boxA
+    \ifdim\wd\boxB = 0pt
+      \noindent\unhbox\boxA\par
+      \nobreak
+    \else\bgroup
+      % We want the text of the entries to be aligned to the left, and the
+      % page numbers to be aligned to the right.
+      %
+      \parindent = 0pt
+      \advance\leftskip by 0pt plus 1fil
+      \advance\leftskip by 0pt plus -1fill
+      \rightskip = 0pt plus -1fil
+      \advance\rightskip by 0pt plus 1fill
+      % Cause last line, which could consist of page numbers on their own
+      % if the list of page numbers is long, to be aligned to the right.
+      \parfillskip=0pt plus -1fill
+      %
+      \advance\rightskip by \entryrightmargin
+      % Determine how far we can stretch into the margin.
+      % This allows, e.g., "Appendix H  GNU Free Documentation License" to
+      % fit on one line in @letterpaper format.
+      \ifdim\entryrightmargin>2.1em
+        \dimen@i=2.1em
+      \else
+        \dimen@i=0em
+      \fi
+      \advance \parfillskip by 0pt minus 1\dimen@i
+      %
+      \dimen@ii = \hsize
+      \advance\dimen@ii by -1\leftskip
+      \advance\dimen@ii by -1\entryrightmargin
+      \advance\dimen@ii by 1\dimen@i
+      \ifdim\wd\boxA > \dimen@ii % If the entry doesn't fit in one line
+      \ifdim\dimen@ > 0.8\dimen@ii   % due to long index text
+        % Try to split the text roughly evenly.  \dimen@ will be the length of 
+        % the first line.
+        \dimen@ = 0.7\dimen@
+        \dimen@ii = \hsize
+        \ifnum\dimen@>\dimen@ii
+          % If the entry is too long (for example, if it needs more than
+          % two lines), use all the space in the first line.
+          \dimen@ = \dimen@ii
+        \fi
+        \advance\leftskip by 0pt plus 1fill % ragged right
+        \advance \dimen@ by 1\rightskip
+        \parshape = 2 0pt \dimen@ 0em \dimen@ii
+        % Ideally we'd add a finite glue at the end of the first line only,
+        % instead of using \parshape with explicit line lengths, but TeX
+        % doesn't seem to provide a way to do such a thing.
+        %
+        % Indent all lines but the first one.
+        \advance\leftskip by 1em
+        \advance\parindent by -1em
+      \fi\fi
+      \indent % start paragraph
+      \unhbox\boxA
+      %
+      % Do not prefer a separate line ending with a hyphen to fewer lines.
+      \finalhyphendemerits = 0
+      %
+      % Word spacing - no stretch
+      \spaceskip=\fontdimen2\font minus \fontdimen4\font
+      %
+      \linepenalty=1000  % Discourage line breaks.
+      \hyphenpenalty=5000  % Discourage hyphenation.
+      %
+      \par % format the paragraph
+    \egroup % The \vbox
+    \fi
+  \endgroup
+}}
+
+\newskip\thinshrinkable
+\skip\thinshrinkable=.15em minus .15em
+
+% Like plain.tex's \dotfill, except uses up at least 1 em.
+% The filll stretch here overpowers both the fil and fill stretch to push
+% the page number to the right.
+\def\indexdotfill{\cleaders
+  \hbox{$\mathsurround=0pt \mkern1.5mu.\mkern1.5mu$}\hskip 1em plus 1filll}
+
+
+\def\primary #1{\line{#1\hfil}}
+
+\def\secondary{\indententry{0.5cm}}
+\def\tertiary{\indententry{1cm}}
+
+\def\indententry#1#2#3{%
+  \bgroup
+  \leftskip=#1
+  \entry{#2}{#3}%
+  \egroup
+}
+
+% Define two-column mode, which we use to typeset indexes.
+% Adapted from the TeXbook, page 416, which is to say,
+% the manmac.tex format used to print the TeXbook itself.
+\catcode`\@=11  % private names
+
+\newbox\partialpage
+\newdimen\doublecolumnhsize
+
+\def\begindoublecolumns{\begingroup % ended by \enddoublecolumns
+  % If not much space left on page, start a new page.
+  \ifdim\pagetotal>0.8\vsize\vfill\eject\fi
+  %
+  % Grab any single-column material above us.
+  \output = {%
+    \savetopmark
+    %
+    \global\setbox\partialpage = \vbox{%
+      % Unvbox the main output page.
+      \unvbox\PAGE
+      \kern-\topskip \kern\baselineskip
+    }%
+  }%
+  \eject % run that output routine to set \partialpage
+  %
+  % Use the double-column output routine for subsequent pages.
+  \output = {\doublecolumnout}%
+  %
+  % Change the page size parameters.  We could do this once outside this
+  % routine, in each of @smallbook, @afourpaper, and the default 8.5x11
+  % format, but then we repeat the same computation.  Repeating a couple
+  % of assignments once per index is clearly meaningless for the
+  % execution time, so we may as well do it in one place.
+  %
+  % First we halve the line length, less a little for the gutter between
+  % the columns.  We compute the gutter based on the line length, so it
+  % changes automatically with the paper format.  The magic constant
+  % below is chosen so that the gutter has the same value (well, +-<1pt)
+  % as it did when we hard-coded it.
+  %
+  % We put the result in a separate register, \doublecolumhsize, so we
+  % can restore it in \pagesofar, after \hsize itself has (potentially)
+  % been clobbered.
+  %
+  \doublecolumnhsize = \hsize
+    \advance\doublecolumnhsize by -.04154\hsize
+    \divide\doublecolumnhsize by 2
+  \hsize = \doublecolumnhsize
+  %
+  % Get the available space for the double columns -- the normal
+  % (undoubled) page height minus any material left over from the
+  % previous page.
+  \advance\vsize by -\ht\partialpage
+  \vsize = 2\vsize
+  %
+  % For the benefit of balancing columns
+  \advance\baselineskip by 0pt plus 0.5pt
+}
+
+% The double-column output routine for all double-column pages except
+% the last, which is done by \balancecolumns.
+%
+\def\doublecolumnout{%
+  %
+  \savetopmark
+  \splittopskip=\topskip \splitmaxdepth=\maxdepth
+  \dimen@ = \vsize
+  \divide\dimen@ by 2
+  %
+  % box0 will be the left-hand column, box2 the right.
+  \setbox0=\vsplit\PAGE to\dimen@ \setbox2=\vsplit\PAGE to\dimen@
+  \global\advance\vsize by 2\ht\partialpage
+  \onepageout\pagesofar % empty except for the first time we are called
+  \unvbox\PAGE
+  \penalty\outputpenalty
+}
+%
+% Re-output the contents of the output page -- any previous material,
+% followed by the two boxes we just split, in box0 and box2.
+\def\pagesofar{%
+  \unvbox\partialpage
+  %
+  \hsize = \doublecolumnhsize
+  \wd0=\hsize \wd2=\hsize
+  \hbox to\txipagewidth{\box0\hfil\box2}%
+}
+
+
+% Finished with double columns.
+\def\enddoublecolumns{%
+  % The following penalty ensures that the page builder is exercised
+  % _before_ we change the output routine.  This is necessary in the
+  % following situation:
+  %
+  % The last section of the index consists only of a single entry.
+  % Before this section, \pagetotal is less than \pagegoal, so no
+  % break occurs before the last section starts.  However, the last
+  % section, consisting of \initial and the single \entry, does not
+  % fit on the page and has to be broken off.  Without the following
+  % penalty the page builder will not be exercised until \eject
+  % below, and by that time we'll already have changed the output
+  % routine to the \balancecolumns version, so the next-to-last
+  % double-column page will be processed with \balancecolumns, which
+  % is wrong:  The two columns will go to the main vertical list, with
+  % the broken-off section in the recent contributions.  As soon as
+  % the output routine finishes, TeX starts reconsidering the page
+  % break.  The two columns and the broken-off section both fit on the
+  % page, because the two columns now take up only half of the page
+  % goal.  When TeX sees \eject from below which follows the final
+  % section, it invokes the new output routine that we've set after
+  % \balancecolumns below; \onepageout will try to fit the two columns
+  % and the final section into the vbox of \txipageheight (see
+  % \pagebody), causing an overfull box.
+  %
+  % Note that glue won't work here, because glue does not exercise the
+  % page builder, unlike penalties (see The TeXbook, pp. 280-281).
+  \penalty0
+  %
+  \output = {%
+    % Split the last of the double-column material.
+    \savetopmark
+    \balancecolumns
+  }%
+  \eject % call the \output just set
+  \ifdim\pagetotal=0pt
+    % Having called \balancecolumns once, we do not
+    % want to call it again.  Therefore, reset \output to its normal
+    % definition right away.
+    \global\output=\expandafter{\the\defaultoutput}
+    %
+    \endgroup % started in \begindoublecolumns
+    % Leave the double-column material on the current page, no automatic
+    % page break.
+    \box\balancedcolumns
+    %
+    % \pagegoal was set to the doubled \vsize above, since we restarted
+    % the current page.  We're now back to normal single-column
+    % typesetting, so reset \pagegoal to the normal \vsize.
+    \global\vsize = \txipageheight %
+    \pagegoal = \txipageheight %
+  \else
+    % We had some left-over material.  This might happen when \doublecolumnout
+    % is called in \balancecolumns.  Try again.
+    \expandafter\enddoublecolumns
+  \fi
+}
+\newbox\balancedcolumns
+\setbox\balancedcolumns=\vbox{shouldnt see this}%
+%
+% Only called for the last of the double column material.  \doublecolumnout 
+% does the others.
+\def\balancecolumns{%
+  \setbox0 = \vbox{\unvbox\PAGE}% like \box255 but more efficient, see p.120.
+  \dimen@ = \ht0
+  \ifdim\dimen@<7\baselineskip
+    % Don't split a short final column in two.
+    \setbox2=\vbox{}%
+    \global\setbox\balancedcolumns=\vbox{\pagesofar}%
+  \else
+    % double the leading vertical space
+    \advance\dimen@ by \topskip
+    \advance\dimen@ by-\baselineskip
+    \divide\dimen@ by 2 % target to split to
+    \dimen@ii = \dimen@
+    \splittopskip = \topskip
+    % Loop until left column is at least as high as the right column.
+    {%
+      \vbadness = 10000
+      \loop
+        \global\setbox3 = \copy0
+        \global\setbox1 = \vsplit3 to \dimen@
+      \ifdim\ht1<\ht3
+        \global\advance\dimen@ by 1pt
+      \repeat
+    }%
+    % Now the left column is in box 1, and the right column in box 3.
+    %
+    % Check whether the left column has come out higher than the page itself.  
+    % (Note that we have doubled \vsize for the double columns, so
+    % the actual height of the page is 0.5\vsize).
+    \ifdim2\ht1>\vsize
+      % It appears that we have been called upon to balance too much material.
+      % Output some of it with \doublecolumnout, leaving the rest on the page.
+      \setbox\PAGE=\box0
+      \doublecolumnout
+    \else
+      % Compare the heights of the two columns.
+      \ifdim4\ht1>5\ht3
+        % Column heights are too different, so don't make their bottoms
+        % flush with each other.
+        \setbox2=\vbox to \ht1 {\unvbox3\vfill}%
+        \setbox0=\vbox to \ht1 {\unvbox1\vfill}%
+      \else
+        % Make column bottoms flush with each other.
+        \setbox2=\vbox to\ht1{\unvbox3\unskip}%
+        \setbox0=\vbox to\ht1{\unvbox1\unskip}%
+      \fi
+      \global\setbox\balancedcolumns=\vbox{\pagesofar}%
+    \fi
+  \fi
+  %
+}
+\catcode`\@ = \other
+
+
+\message{sectioning,}
+% Chapters, sections, etc.
+
+% Let's start with @part.
+\outer\parseargdef\part{\partzzz{#1}}
+\def\partzzz#1{%
+  \chapoddpage
+  \null
+  \vskip.3\vsize  % move it down on the page a bit
+  \begingroup
+    \noindent \titlefonts\rm #1\par % the text
+    \let\lastnode=\empty      % no node to associate with
+    \writetocentry{part}{#1}{}% but put it in the toc
+    \headingsoff              % no headline or footline on the part page
+    % This outputs a mark at the end of the page that clears \thischapter
+    % and \thissection, as is done in \startcontents.
+    \let\pchapsepmacro\relax
+    \chapmacro{}{Yomitfromtoc}{}%
+    \chapoddpage
+  \endgroup
+}
+
+% \unnumberedno is an oxymoron.  But we count the unnumbered
+% sections so that we can refer to them unambiguously in the pdf
+% outlines by their "section number".  We avoid collisions with chapter
+% numbers by starting them at 10000.  (If a document ever has 10000
+% chapters, we're in trouble anyway, I'm sure.)
+\newcount\unnumberedno \unnumberedno = 10000
+\newcount\chapno
+\newcount\secno        \secno=0
+\newcount\subsecno     \subsecno=0
+\newcount\subsubsecno  \subsubsecno=0
+
+% This counter is funny since it counts through charcodes of letters A, B, ...
+\newcount\appendixno  \appendixno = `\@
+%
+% \def\appendixletter{\char\the\appendixno}
+% We do the following ugly conditional instead of the above simple
+% construct for the sake of pdftex, which needs the actual
+% letter in the expansion, not just typeset.
+%
+\def\appendixletter{%
+  \ifnum\appendixno=`A A%
+  \else\ifnum\appendixno=`B B%
+  \else\ifnum\appendixno=`C C%
+  \else\ifnum\appendixno=`D D%
+  \else\ifnum\appendixno=`E E%
+  \else\ifnum\appendixno=`F F%
+  \else\ifnum\appendixno=`G G%
+  \else\ifnum\appendixno=`H H%
+  \else\ifnum\appendixno=`I I%
+  \else\ifnum\appendixno=`J J%
+  \else\ifnum\appendixno=`K K%
+  \else\ifnum\appendixno=`L L%
+  \else\ifnum\appendixno=`M M%
+  \else\ifnum\appendixno=`N N%
+  \else\ifnum\appendixno=`O O%
+  \else\ifnum\appendixno=`P P%
+  \else\ifnum\appendixno=`Q Q%
+  \else\ifnum\appendixno=`R R%
+  \else\ifnum\appendixno=`S S%
+  \else\ifnum\appendixno=`T T%
+  \else\ifnum\appendixno=`U U%
+  \else\ifnum\appendixno=`V V%
+  \else\ifnum\appendixno=`W W%
+  \else\ifnum\appendixno=`X X%
+  \else\ifnum\appendixno=`Y Y%
+  \else\ifnum\appendixno=`Z Z%
+  % The \the is necessary, despite appearances, because \appendixletter is
+  % expanded while writing the .toc file.  \char\appendixno is not
+  % expandable, thus it is written literally, thus all appendixes come out
+  % with the same letter (or @) in the toc without it.
+  \else\char\the\appendixno
+  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
+  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
+
+% Each @chapter defines these (using marks) as the number+name, number
+% and name of the chapter.  Page headings and footings can use
+% these.  @section does likewise.
+\def\thischapter{}
+\def\thischapternum{}
+\def\thischaptername{}
+\def\thissection{}
+\def\thissectionnum{}
+\def\thissectionname{}
+
+\newcount\absseclevel % used to calculate proper heading level
+\newcount\secbase\secbase=0 % @raisesections/@lowersections modify this count
+
+% @raisesections: treat @section as chapter, @subsection as section, etc.
+\def\raisesections{\global\advance\secbase by -1}
+
+% @lowersections: treat @chapter as section, @section as subsection, etc.
+\def\lowersections{\global\advance\secbase by 1}
+
+% we only have subsub.
+\chardef\maxseclevel = 3
+%
+% A numbered section within an unnumbered changes to unnumbered too.
+% To achieve this, remember the "biggest" unnum. sec. we are currently in:
+\chardef\unnlevel = \maxseclevel
+%
+% Trace whether the current chapter is an appendix or not:
+% \chapheadtype is "N" or "A", unnumbered chapters are ignored.
+\def\chapheadtype{N}
+
+% Choose a heading macro
+% #1 is heading type
+% #2 is heading level
+% #3 is text for heading
+\def\genhead#1#2#3{%
+  % Compute the abs. sec. level:
+  \absseclevel=#2
+  \advance\absseclevel by \secbase
+  % Make sure \absseclevel doesn't fall outside the range:
+  \ifnum \absseclevel < 0
+    \absseclevel = 0
+  \else
+    \ifnum \absseclevel > 3
+      \absseclevel = 3
+    \fi
+  \fi
+  % The heading type:
+  \def\headtype{#1}%
+  \if \headtype U%
+    \ifnum \absseclevel < \unnlevel
+      \chardef\unnlevel = \absseclevel
+    \fi
+  \else
+    % Check for appendix sections:
+    \ifnum \absseclevel = 0
+      \edef\chapheadtype{\headtype}%
+    \else
+      \if \headtype A\if \chapheadtype N%
+	\errmessage{@appendix... within a non-appendix chapter}%
+      \fi\fi
+    \fi
+    % Check for numbered within unnumbered:
+    \ifnum \absseclevel > \unnlevel
+      \def\headtype{U}%
+    \else
+      \chardef\unnlevel = 3
+    \fi
+  \fi
+  % Now print the heading:
+  \if \headtype U%
+    \ifcase\absseclevel
+	\unnumberedzzz{#3}%
+    \or \unnumberedseczzz{#3}%
+    \or \unnumberedsubseczzz{#3}%
+    \or \unnumberedsubsubseczzz{#3}%
+    \fi
+  \else
+    \if \headtype A%
+      \ifcase\absseclevel
+	  \appendixzzz{#3}%
+      \or \appendixsectionzzz{#3}%
+      \or \appendixsubseczzz{#3}%
+      \or \appendixsubsubseczzz{#3}%
+      \fi
+    \else
+      \ifcase\absseclevel
+	  \chapterzzz{#3}%
+      \or \seczzz{#3}%
+      \or \numberedsubseczzz{#3}%
+      \or \numberedsubsubseczzz{#3}%
+      \fi
+    \fi
+  \fi
+  \suppressfirstparagraphindent
+}
+
+% an interface:
+\def\numhead{\genhead N}
+\def\apphead{\genhead A}
+\def\unnmhead{\genhead U}
+
+% @chapter, @appendix, @unnumbered.  Increment top-level counter, reset
+% all lower-level sectioning counters to zero.
+%
+% Also set \chaplevelprefix, which we prepend to @float sequence numbers
+% (e.g., figures), q.v.  By default (before any chapter), that is empty.
+\let\chaplevelprefix = \empty
+%
+\outer\parseargdef\chapter{\numhead0{#1}} % normally numhead0 calls chapterzzz
+\def\chapterzzz#1{%
+  % section resetting is \global in case the chapter is in a group, such
+  % as an @include file.
+  \global\secno=0 \global\subsecno=0 \global\subsubsecno=0
+    \global\advance\chapno by 1
+  %
+  % Used for \float.
+  \gdef\chaplevelprefix{\the\chapno.}%
+  \resetallfloatnos
+  %
+  % \putwordChapter can contain complex things in translations.
+  \toks0=\expandafter{\putwordChapter}%
+  \message{\the\toks0 \space \the\chapno}%
+  %
+  % Write the actual heading.
+  \chapmacro{#1}{Ynumbered}{\the\chapno}%
+  %
+  % So @section and the like are numbered underneath this chapter.
+  \global\let\section = \numberedsec
+  \global\let\subsection = \numberedsubsec
+  \global\let\subsubsection = \numberedsubsubsec
+}
+
+\outer\parseargdef\appendix{\apphead0{#1}} % normally calls appendixzzz
+%
+\def\appendixzzz#1{%
+  \global\secno=0 \global\subsecno=0 \global\subsubsecno=0
+    \global\advance\appendixno by 1
+  \gdef\chaplevelprefix{\appendixletter.}%
+  \resetallfloatnos
+  %
+  % \putwordAppendix can contain complex things in translations.
+  \toks0=\expandafter{\putwordAppendix}%
+  \message{\the\toks0 \space \appendixletter}%
+  %
+  \chapmacro{#1}{Yappendix}{\appendixletter}%
+  %
+  \global\let\section = \appendixsec
+  \global\let\subsection = \appendixsubsec
+  \global\let\subsubsection = \appendixsubsubsec
+}
+
+% normally unnmhead0 calls unnumberedzzz:
+\outer\parseargdef\unnumbered{\unnmhead0{#1}}
+\def\unnumberedzzz#1{%
+  \global\secno=0 \global\subsecno=0 \global\subsubsecno=0
+    \global\advance\unnumberedno by 1
+  %
+  % Since an unnumbered has no number, no prefix for figures.
+  \global\let\chaplevelprefix = \empty
+  \resetallfloatnos
+  %
+  % This used to be simply \message{#1}, but TeX fully expands the
+  % argument to \message.  Therefore, if #1 contained @-commands, TeX
+  % expanded them.  For example, in `@unnumbered The @cite{Book}', TeX
+  % expanded @cite (which turns out to cause errors because \cite is meant
+  % to be executed, not expanded).
+  %
+  % Anyway, we don't want the fully-expanded definition of @cite to appear
+  % as a result of the \message, we just want `@cite' itself.  We use
+  % \the<toks register> to achieve this: TeX expands \the<toks> only once,
+  % simply yielding the contents of <toks register>.  (We also do this for
+  % the toc entries.)
+  \toks0 = {#1}%
+  \message{(\the\toks0)}%
+  %
+  \chapmacro{#1}{Ynothing}{\the\unnumberedno}%
+  %
+  \global\let\section = \unnumberedsec
+  \global\let\subsection = \unnumberedsubsec
+  \global\let\subsubsection = \unnumberedsubsubsec
+}
+
+% @centerchap is like @unnumbered, but the heading is centered.
+\outer\parseargdef\centerchap{%
+  \let\centerparametersmaybe = \centerparameters
+  \unnmhead0{#1}%
+  \let\centerparametersmaybe = \relax
+}
+
+% @top is like @unnumbered.
+\let\top\unnumbered
+
+% Sections.
+% 
+\outer\parseargdef\numberedsec{\numhead1{#1}} % normally calls seczzz
+\def\seczzz#1{%
+  \global\subsecno=0 \global\subsubsecno=0  \global\advance\secno by 1
+  \sectionheading{#1}{sec}{Ynumbered}{\the\chapno.\the\secno}%
+}
+
+% normally calls appendixsectionzzz:
+\outer\parseargdef\appendixsection{\apphead1{#1}}
+\def\appendixsectionzzz#1{%
+  \global\subsecno=0 \global\subsubsecno=0  \global\advance\secno by 1
+  \sectionheading{#1}{sec}{Yappendix}{\appendixletter.\the\secno}%
+}
+\let\appendixsec\appendixsection
+
+% normally calls unnumberedseczzz:
+\outer\parseargdef\unnumberedsec{\unnmhead1{#1}}
+\def\unnumberedseczzz#1{%
+  \global\subsecno=0 \global\subsubsecno=0  \global\advance\secno by 1
+  \sectionheading{#1}{sec}{Ynothing}{\the\unnumberedno.\the\secno}%
+}
+
+% Subsections.
+% 
+% normally calls numberedsubseczzz:
+\outer\parseargdef\numberedsubsec{\numhead2{#1}}
+\def\numberedsubseczzz#1{%
+  \global\subsubsecno=0  \global\advance\subsecno by 1
+  \sectionheading{#1}{subsec}{Ynumbered}{\the\chapno.\the\secno.\the\subsecno}%
+}
+
+% normally calls appendixsubseczzz:
+\outer\parseargdef\appendixsubsec{\apphead2{#1}}
+\def\appendixsubseczzz#1{%
+  \global\subsubsecno=0  \global\advance\subsecno by 1
+  \sectionheading{#1}{subsec}{Yappendix}%
+                 {\appendixletter.\the\secno.\the\subsecno}%
+}
+
+% normally calls unnumberedsubseczzz:
+\outer\parseargdef\unnumberedsubsec{\unnmhead2{#1}}
+\def\unnumberedsubseczzz#1{%
+  \global\subsubsecno=0  \global\advance\subsecno by 1
+  \sectionheading{#1}{subsec}{Ynothing}%
+                 {\the\unnumberedno.\the\secno.\the\subsecno}%
+}
+
+% Subsubsections.
+% 
+% normally numberedsubsubseczzz:
+\outer\parseargdef\numberedsubsubsec{\numhead3{#1}}
+\def\numberedsubsubseczzz#1{%
+  \global\advance\subsubsecno by 1
+  \sectionheading{#1}{subsubsec}{Ynumbered}%
+                 {\the\chapno.\the\secno.\the\subsecno.\the\subsubsecno}%
+}
+
+% normally appendixsubsubseczzz:
+\outer\parseargdef\appendixsubsubsec{\apphead3{#1}}
+\def\appendixsubsubseczzz#1{%
+  \global\advance\subsubsecno by 1
+  \sectionheading{#1}{subsubsec}{Yappendix}%
+                 {\appendixletter.\the\secno.\the\subsecno.\the\subsubsecno}%
+}
+
+% normally unnumberedsubsubseczzz:
+\outer\parseargdef\unnumberedsubsubsec{\unnmhead3{#1}}
+\def\unnumberedsubsubseczzz#1{%
+  \global\advance\subsubsecno by 1
+  \sectionheading{#1}{subsubsec}{Ynothing}%
+                 {\the\unnumberedno.\the\secno.\the\subsecno.\the\subsubsecno}%
+}
+
+% These macros control what the section commands do, according
+% to what kind of chapter we are in (ordinary, appendix, or unnumbered).
+% Define them by default for a numbered chapter.
+\let\section = \numberedsec
+\let\subsection = \numberedsubsec
+\let\subsubsection = \numberedsubsubsec
+
+% Define @majorheading, @heading and @subheading
+
+\def\majorheading{%
+  {\advance\chapheadingskip by 10pt \chapbreak }%
+  \parsearg\chapheadingzzz
+}
+
+\def\chapheading{\chapbreak \parsearg\chapheadingzzz}
+\def\chapheadingzzz#1{%
+  \vbox{\chapfonts \raggedtitlesettings #1\par}%
+  \nobreak\bigskip \nobreak
+  \suppressfirstparagraphindent
+}
+
+% @heading, @subheading, @subsubheading.
+\parseargdef\heading{\sectionheading{#1}{sec}{Yomitfromtoc}{}
+  \suppressfirstparagraphindent}
+\parseargdef\subheading{\sectionheading{#1}{subsec}{Yomitfromtoc}{}
+  \suppressfirstparagraphindent}
+\parseargdef\subsubheading{\sectionheading{#1}{subsubsec}{Yomitfromtoc}{}
+  \suppressfirstparagraphindent}
+
+% These macros generate a chapter, section, etc. heading only
+% (including whitespace, linebreaking, etc. around it),
+% given all the information in convenient, parsed form.
+
+% Args are the skip and penalty (usually negative)
+\def\dobreak#1#2{\par\ifdim\lastskip<#1\removelastskip\penalty#2\vskip#1\fi}
+
+% Parameter controlling skip before chapter headings (if needed)
+\newskip\chapheadingskip
+
+% Define plain chapter starts, and page on/off switching for it.
+\def\chapbreak{\dobreak \chapheadingskip {-4000}}
+
+% Start a new page
+\def\chappager{\par\vfill\supereject}
+
+% \chapoddpage - start on an odd page for a new chapter
+% Because \domark is called before \chapoddpage, the filler page will
+% get the headings for the next chapter, which is wrong.  But we don't
+% care -- we just disable all headings on the filler page.
+\def\chapoddpage{%
+  \chappager
+  \ifodd\pageno \else
+    \begingroup
+      \headingsoff
+      \null
+      \chappager
+    \endgroup
+  \fi
+}
+
+\parseargdef\setchapternewpage{\csname CHAPPAG#1\endcsname}
+
+\def\CHAPPAGoff{%
+\global\let\contentsalignmacro = \chappager
+\global\let\pchapsepmacro=\chapbreak
+\global\def\HEADINGSon{\HEADINGSsinglechapoff}}
+
+\def\CHAPPAGon{%
+\global\let\contentsalignmacro = \chappager
+\global\let\pchapsepmacro=\chappager
+\global\def\HEADINGSon{\HEADINGSsingle}}
+
+\def\CHAPPAGodd{%
+\global\let\contentsalignmacro = \chapoddpage
+\global\let\pchapsepmacro=\chapoddpage
+\global\def\HEADINGSon{\HEADINGSdouble}}
+
+\CHAPPAGon
+
+% \chapmacro - Chapter opening.
+%
+% #1 is the text, #2 is the section type (Ynumbered, Ynothing,
+% Yappendix, Yomitfromtoc), #3 the chapter number.
+% Not used for @heading series.
+%
+% To test against our argument.
+\def\Ynothingkeyword{Ynothing}
+\def\Yappendixkeyword{Yappendix}
+\def\Yomitfromtockeyword{Yomitfromtoc}
+%
+\def\chapmacro#1#2#3{%
+  \expandafter\ifx\thisenv\titlepage\else
+    \checkenv{}% chapters, etc., should not start inside an environment.
+  \fi
+  % Insert the first mark before the heading break (see notes for \domark).
+  \let\prevchapterdefs=\currentchapterdefs
+  \let\prevsectiondefs=\currentsectiondefs
+  \gdef\currentsectiondefs{\gdef\thissectionname{}\gdef\thissectionnum{}%
+                        \gdef\thissection{}}%
+  %
+  \def\temptype{#2}%
+  \ifx\temptype\Ynothingkeyword
+    \gdef\currentchapterdefs{\gdef\thischaptername{#1}\gdef\thischapternum{}%
+                          \gdef\thischapter{\thischaptername}}%
+  \else\ifx\temptype\Yomitfromtockeyword
+    \gdef\currentchapterdefs{\gdef\thischaptername{#1}\gdef\thischapternum{}%
+                          \gdef\thischapter{}}%
+  \else\ifx\temptype\Yappendixkeyword
+    \toks0={#1}%
+    \xdef\currentchapterdefs{%
+      \gdef\noexpand\thischaptername{\the\toks0}%
+      \gdef\noexpand\thischapternum{\appendixletter}%
+      % \noexpand\putwordAppendix avoids expanding indigestible
+      % commands in some of the translations.
+      \gdef\noexpand\thischapter{\noexpand\putwordAppendix{}
+                                 \noexpand\thischapternum:
+                                 \noexpand\thischaptername}%
+    }%
+  \else
+    \toks0={#1}%
+    \xdef\currentchapterdefs{%
+      \gdef\noexpand\thischaptername{\the\toks0}%
+      \gdef\noexpand\thischapternum{\the\chapno}%
+      % \noexpand\putwordChapter avoids expanding indigestible
+      % commands in some of the translations.
+      \gdef\noexpand\thischapter{\noexpand\putwordChapterPre{}
+                                 \noexpand\thischapternum
+                                 \noexpand\putwordChapterSuf{}:
+                                 \noexpand\thischaptername}%
+    }%
+  \fi\fi\fi
+  %
+  % Output the mark.  Pass it through \safewhatsit, to take care of
+  % the preceding space.
+  \safewhatsit\domark
+  %
+  % Insert the chapter heading break.
+  \pchapsepmacro
+  %
+  % Now the second mark, after the heading break.  No break points
+  % between here and the heading.
+  \let\prevchapterdefs=\currentchapterdefs
+  \let\prevsectiondefs=\currentsectiondefs
+  \domark
+  %
+  {%
+    \chapfonts \rm
+    \let\footnote=\errfootnoteheading % give better error message
+    %
+    % Have to define \currentsection before calling \donoderef, because the
+    % xref code eventually uses it.  On the other hand, it has to be called
+    % after \pchapsepmacro, or the headline will change too soon.
+    \gdef\currentsection{#1}%
+    %
+    % Only insert the separating space if we have a chapter/appendix
+    % number, and don't print the unnumbered ``number''.
+    \ifx\temptype\Ynothingkeyword
+      \setbox0 = \hbox{}%
+      \def\toctype{unnchap}%
+    \else\ifx\temptype\Yomitfromtockeyword
+      \setbox0 = \hbox{}% contents like unnumbered, but no toc entry
+      \def\toctype{omit}%
+    \else\ifx\temptype\Yappendixkeyword
+      \setbox0 = \hbox{\putwordAppendix{} #3\enspace}%
+      \def\toctype{app}%
+    \else
+      \setbox0 = \hbox{#3\enspace}%
+      \def\toctype{numchap}%
+    \fi\fi\fi
+    %
+    % Write the toc entry for this chapter.  Must come before the
+    % \donoderef, because we include the current node name in the toc
+    % entry, and \donoderef resets it to empty.
+    \writetocentry{\toctype}{#1}{#3}%
+    %
+    % For pdftex, we have to write out the node definition (aka, make
+    % the pdfdest) after any page break, but before the actual text has
+    % been typeset.  If the destination for the pdf outline is after the
+    % text, then jumping from the outline may wind up with the text not
+    % being visible, for instance under high magnification.
+    \donoderef{#2}%
+    %
+    % Typeset the actual heading.
+    \nobreak % Avoid page breaks at the interline glue.
+    \vbox{\raggedtitlesettings \hangindent=\wd0 \centerparametersmaybe
+          \unhbox0 #1\par}%
+  }%
+  \nobreak\bigskip % no page break after a chapter title
+  \nobreak
+}
+
+% @centerchap -- centered and unnumbered.
+\let\centerparametersmaybe = \relax
+\def\centerparameters{%
+  \advance\rightskip by 3\rightskip
+  \leftskip = \rightskip
+  \parfillskip = 0pt
+}
+
+
+% Section titles.  These macros combine the section number parts and
+% call the generic \sectionheading to do the printing.
+%
+\newskip\secheadingskip
+\def\secheadingbreak{\dobreak \secheadingskip{-1000}}
+
+% Subsection titles.
+\newskip\subsecheadingskip
+\def\subsecheadingbreak{\dobreak \subsecheadingskip{-500}}
+
+% Subsubsection titles.
+\def\subsubsecheadingskip{\subsecheadingskip}
+\def\subsubsecheadingbreak{\subsecheadingbreak}
+
+
+% Print any size, any type, section title.
+%
+% #1 is the text of the title,
+% #2 is the section level (sec/subsec/subsubsec),
+% #3 is the section type (Ynumbered, Ynothing, Yappendix, Yomitfromtoc),
+% #4 is the section number.
+%
+\def\seckeyword{sec}
+%
+\def\sectionheading#1#2#3#4{%
+  {%
+    \def\sectionlevel{#2}%
+    \def\temptype{#3}%
+    %
+    % It is ok for the @heading series commands to appear inside an
+    % environment (it's been historically allowed, though the logic is
+    % dubious), but not the others.
+    \ifx\temptype\Yomitfromtockeyword\else
+      \checkenv{}% non-@*heading should not be in an environment.
+    \fi
+    \let\footnote=\errfootnoteheading
+    %
+    % Switch to the right set of fonts.
+    \csname #2fonts\endcsname \rm
+    %
+    % Insert first mark before the heading break (see notes for \domark).
+    \let\prevsectiondefs=\currentsectiondefs
+    \ifx\temptype\Ynothingkeyword
+      \ifx\sectionlevel\seckeyword
+        \gdef\currentsectiondefs{\gdef\thissectionname{#1}\gdef\thissectionnum{}%
+                              \gdef\thissection{\thissectionname}}%
+      \fi
+    \else\ifx\temptype\Yomitfromtockeyword
+      % Don't redefine \thissection.
+    \else\ifx\temptype\Yappendixkeyword
+      \ifx\sectionlevel\seckeyword
+        \toks0={#1}%
+        \xdef\currentsectiondefs{%
+          \gdef\noexpand\thissectionname{\the\toks0}%
+          \gdef\noexpand\thissectionnum{#4}%
+          % \noexpand\putwordSection avoids expanding indigestible
+          % commands in some of the translations.
+          \gdef\noexpand\thissection{\noexpand\putwordSection{}
+                                     \noexpand\thissectionnum:
+                                     \noexpand\thissectionname}%
+        }%
+      \fi
+    \else
+      \ifx\sectionlevel\seckeyword
+        \toks0={#1}%
+        \xdef\currentsectiondefs{%
+          \gdef\noexpand\thissectionname{\the\toks0}%
+          \gdef\noexpand\thissectionnum{#4}%
+          % \noexpand\putwordSection avoids expanding indigestible
+          % commands in some of the translations.
+          \gdef\noexpand\thissection{\noexpand\putwordSection{}
+                                     \noexpand\thissectionnum:
+                                     \noexpand\thissectionname}%
+        }%
+      \fi
+    \fi\fi\fi
+    %
+    % Go into vertical mode.  Usually we'll already be there, but we
+    % don't want the following whatsit to end up in a preceding paragraph
+    % if the document didn't happen to have a blank line.
+    \par
+    %
+    % Output the mark.  Pass it through \safewhatsit, to take care of
+    % the preceding space.
+    \safewhatsit\domark
+    %
+    % Insert space above the heading.
+    \csname #2headingbreak\endcsname
+    %
+    % Now the second mark, after the heading break.  No break points
+    % between here and the heading.
+    \global\let\prevsectiondefs=\currentsectiondefs
+    \domark
+    %
+    % Only insert the space after the number if we have a section number.
+    \ifx\temptype\Ynothingkeyword
+      \setbox0 = \hbox{}%
+      \def\toctype{unn}%
+      \gdef\currentsection{#1}%
+    \else\ifx\temptype\Yomitfromtockeyword
+      % for @headings -- no section number, don't include in toc,
+      % and don't redefine \currentsection.
+      \setbox0 = \hbox{}%
+      \def\toctype{omit}%
+      \let\sectionlevel=\empty
+    \else\ifx\temptype\Yappendixkeyword
+      \setbox0 = \hbox{#4\enspace}%
+      \def\toctype{app}%
+      \gdef\currentsection{#1}%
+    \else
+      \setbox0 = \hbox{#4\enspace}%
+      \def\toctype{num}%
+      \gdef\currentsection{#1}%
+    \fi\fi\fi
+    %
+    % Write the toc entry (before \donoderef).  See comments in \chapmacro.
+    \writetocentry{\toctype\sectionlevel}{#1}{#4}%
+    %
+    % Write the node reference (= pdf destination for pdftex).
+    % Again, see comments in \chapmacro.
+    \donoderef{#3}%
+    %
+    % Interline glue will be inserted when the vbox is completed.
+    % That glue will be a valid breakpoint for the page, since it'll be
+    % preceded by a whatsit (usually from the \donoderef, or from the
+    % \writetocentry if there was no node).  We don't want to allow that
+    % break, since then the whatsits could end up on page n while the
+    % section is on page n+1, thus toc/etc. are wrong.  Debian bug 276000.
+    \nobreak
+    %
+    % Output the actual section heading.
+    \vbox{\hyphenpenalty=10000 \tolerance=5000 \parindent=0pt \ptexraggedright
+          \hangindent=\wd0  % zero if no section number
+          \unhbox0 #1}%
+  }%
+  % Add extra space after the heading -- half of whatever came above it.
+  % Don't allow stretch, though.
+  \kern .5 \csname #2headingskip\endcsname
+  %
+  % Do not let the kern be a potential breakpoint, as it would be if it
+  % was followed by glue.
+  \nobreak
+  %
+  % We'll almost certainly start a paragraph next, so don't let that
+  % glue accumulate.  (Not a breakpoint because it's preceded by a
+  % discardable item.)  However, when a paragraph is not started next
+  % (\startdefun, \cartouche, \center, etc.), this needs to be wiped out
+  % or the negative glue will cause weirdly wrong output, typically
+  % obscuring the section heading with something else.
+  \vskip-\parskip
+  %
+  % This is so the last item on the main vertical list is a known
+  % \penalty > 10000, so \startdefun, etc., can recognize the situation
+  % and do the needful.
+  \penalty 10001
+}
+
+
+\message{toc,}
+% Table of contents.
+\newwrite\tocfile
+
+% Write an entry to the toc file, opening it if necessary.
+% Called from @chapter, etc.
+%
+% Example usage: \writetocentry{sec}{Section Name}{\the\chapno.\the\secno}
+% We append the current node name (if any) and page number as additional
+% arguments for the \{chap,sec,...}entry macros which will eventually
+% read this.  The node name is used in the pdf outlines as the
+% destination to jump to.
+%
+% We open the .toc file for writing here instead of at @setfilename (or
+% any other fixed time) so that @contents can be anywhere in the document.
+% But if #1 is `omit', then we don't do anything.  This is used for the
+% table of contents chapter openings themselves.
+%
+\newif\iftocfileopened
+\def\omitkeyword{omit}%
+%
+\def\writetocentry#1#2#3{%
+  \edef\writetoctype{#1}%
+  \ifx\writetoctype\omitkeyword \else
+    \iftocfileopened\else
+      \immediate\openout\tocfile = \jobname.toc
+      \global\tocfileopenedtrue
+    \fi
+    %
+    \iflinks
+      {\atdummies
+       \edef\temp{%
+         \write\tocfile{@#1entry{#2}{#3}{\lastnode}{\noexpand\folio}}}%
+       \temp
+      }%
+    \fi
+  \fi
+  %
+  % Tell \shipout to create a pdf destination on each page, if we're
+  % writing pdf.  These are used in the table of contents.  We can't
+  % just write one on every page because the title pages are numbered
+  % 1 and 2 (the page numbers aren't printed), and so are the first
+  % two pages of the document.  Thus, we'd have two destinations named
+  % `1', and two named `2'.
+  \ifpdforxetex
+    \global\pdfmakepagedesttrue
+  \fi
+}
+
+
+% These characters do not print properly in the Computer Modern roman
+% fonts, so we must take special care.  This is more or less redundant
+% with the Texinfo input format setup at the end of this file.
+%
+\def\activecatcodes{%
+  \catcode`\"=\active
+  \catcode`\$=\active
+  \catcode`\<=\active
+  \catcode`\>=\active
+  \catcode`\\=\active
+  \catcode`\^=\active
+  \catcode`\_=\active
+  \catcode`\|=\active
+  \catcode`\~=\active
+}
+
+
+% Read the toc file, which is essentially Texinfo input.
+\def\readtocfile{%
+  \setupdatafile
+  \activecatcodes
+  \input \tocreadfilename
+}
+
+\newskip\contentsrightmargin \contentsrightmargin=1in
+\newcount\savepageno
+\newcount\lastnegativepageno \lastnegativepageno = -1
+
+% Prepare to read what we've written to \tocfile.
+%
+\def\startcontents#1{%
+  % If @setchapternewpage on, and @headings double, the contents should
+  % start on an odd page, unlike chapters.
+  \contentsalignmacro
+  \immediate\closeout\tocfile
+  %
+  % Don't need to put `Contents' or `Short Contents' in the headline.
+  % It is abundantly clear what they are.
+  \chapmacro{#1}{Yomitfromtoc}{}%
+  %
+  \savepageno = \pageno
+  \begingroup                  % Set up to handle contents files properly.
+    \raggedbottom              % Worry more about breakpoints than the bottom.
+    \entryrightmargin=\contentsrightmargin % Don't use the full line length.
+    %
+    % Roman numerals for page numbers.
+    \ifnum \pageno>0 \global\pageno = \lastnegativepageno \fi
+    \def\thistitle{}% no title in double-sided headings
+    % Record where the Roman numerals started.
+    \ifnum\romancount=0 \global\romancount=\pagecount \fi
+}
+
+% redefined for the two-volume lispref.  We always output on
+% \jobname.toc even if this is redefined.
+%
+\def\tocreadfilename{\jobname.toc}
+
+% Normal (long) toc.
+%
+\def\contents{%
+  \startcontents{\putwordTOC}%
+    \openin 1 \tocreadfilename\space
+    \ifeof 1 \else
+      \readtocfile
+    \fi
+    \vfill \eject
+    \contentsalignmacro % in case @setchapternewpage odd is in effect
+    \ifeof 1 \else
+      \pdfmakeoutlines
+    \fi
+    \closein 1
+  \endgroup
+  \contentsendroman
+}
+
+% And just the chapters.
+\def\summarycontents{%
+  \startcontents{\putwordShortTOC}%
+    %
+    \let\partentry = \shortpartentry
+    \let\numchapentry = \shortchapentry
+    \let\appentry = \shortchapentry
+    \let\unnchapentry = \shortunnchapentry
+    % We want a true roman here for the page numbers.
+    \secfonts
+    \let\rm=\shortcontrm \let\bf=\shortcontbf
+    \let\sl=\shortcontsl \let\tt=\shortconttt
+    \rm
+    \hyphenpenalty = 10000
+    \advance\baselineskip by 1pt % Open it up a little.
+    \def\numsecentry##1##2##3##4{}
+    \let\appsecentry = \numsecentry
+    \let\unnsecentry = \numsecentry
+    \let\numsubsecentry = \numsecentry
+    \let\appsubsecentry = \numsecentry
+    \let\unnsubsecentry = \numsecentry
+    \let\numsubsubsecentry = \numsecentry
+    \let\appsubsubsecentry = \numsecentry
+    \let\unnsubsubsecentry = \numsecentry
+    \openin 1 \tocreadfilename\space
+    \ifeof 1 \else
+      \readtocfile
+    \fi
+    \closein 1
+    \vfill \eject
+    \contentsalignmacro % in case @setchapternewpage odd is in effect
+  \endgroup
+  \contentsendroman
+}
+\let\shortcontents = \summarycontents
+
+% Get ready to use Arabic numerals again
+\def\contentsendroman{%
+  \lastnegativepageno = \pageno
+  \global\pageno = \savepageno
+  %
+  % If \romancount > \arabiccount, the contents are at the end of the
+  % document.  Otherwise, advance where the Arabic numerals start for
+  % the page numbers.
+  \ifnum\romancount>\arabiccount\else\global\arabiccount=\pagecount\fi
+}
+
+% Typeset the label for a chapter or appendix for the short contents.
+% The arg is, e.g., `A' for an appendix, or `3' for a chapter.
+%
+\def\shortchaplabel#1{%
+  % This space should be enough, since a single number is .5em, and the
+  % widest letter (M) is 1em, at least in the Computer Modern fonts.
+  % But use \hss just in case.
+  % (This space doesn't include the extra space that gets added after
+  % the label; that gets put in by \shortchapentry above.)
+  %
+  % We'd like to right-justify chapter numbers, but that looks strange
+  % with appendix letters.  And right-justifying numbers and
+  % left-justifying letters looks strange when there is less than 10
+  % chapters.  Have to read the whole toc once to know how many chapters
+  % there are before deciding ...
+  \hbox to 1em{#1\hss}%
+}
+
+% These macros generate individual entries in the table of contents.
+% The first argument is the chapter or section name.
+% The last argument is the page number.
+% The arguments in between are the chapter number, section number, ...
+
+% Parts, in the main contents.  Replace the part number, which doesn't
+% exist, with an empty box.  Let's hope all the numbers have the same width.
+% Also ignore the page number, which is conventionally not printed.
+\def\numeralbox{\setbox0=\hbox{8}\hbox to \wd0{\hfil}}
+\def\partentry#1#2#3#4{%
+  % Add stretch and a bonus for breaking the page before the part heading.
+  % This reduces the chance of the page being broken immediately after the
+  % part heading, before a following chapter heading.
+  \vskip 0pt plus 5\baselineskip
+  \penalty-300
+  \vskip 0pt plus -5\baselineskip
+  \dochapentry{\numeralbox\labelspace#1}{}%
+}
+%
+% Parts, in the short toc.
+\def\shortpartentry#1#2#3#4{%
+  \penalty-300
+  \vskip.5\baselineskip plus.15\baselineskip minus.1\baselineskip
+  \shortchapentry{{\bf #1}}{\numeralbox}{}{}%
+}
+
+% Chapters, in the main contents.
+\def\numchapentry#1#2#3#4{\dochapentry{#2\labelspace#1}{#4}}
+
+% Chapters, in the short toc.
+% See comments in \dochapentry re vbox and related settings.
+\def\shortchapentry#1#2#3#4{%
+  \tocentry{\shortchaplabel{#2}\labelspace #1}{\doshortpageno\bgroup#4\egroup}%
+}
+
+% Appendices, in the main contents.
+% Need the word Appendix, and a fixed-size box.
+%
+\def\appendixbox#1{%
+  % We use M since it's probably the widest letter.
+  \setbox0 = \hbox{\putwordAppendix{} M}%
+  \hbox to \wd0{\putwordAppendix{} #1\hss}}
+%
+\def\appentry#1#2#3#4{\dochapentry{\appendixbox{#2}\hskip.7em#1}{#4}}
+
+% Unnumbered chapters.
+\def\unnchapentry#1#2#3#4{\dochapentry{#1}{#4}}
+\def\shortunnchapentry#1#2#3#4{\tocentry{#1}{\doshortpageno\bgroup#4\egroup}}
+
+% Sections.
+\def\numsecentry#1#2#3#4{\dosecentry{#2\labelspace#1}{#4}}
+\let\appsecentry=\numsecentry
+\def\unnsecentry#1#2#3#4{\dosecentry{#1}{#4}}
+
+% Subsections.
+\def\numsubsecentry#1#2#3#4{\dosubsecentry{#2\labelspace#1}{#4}}
+\let\appsubsecentry=\numsubsecentry
+\def\unnsubsecentry#1#2#3#4{\dosubsecentry{#1}{#4}}
+
+% And subsubsections.
+\def\numsubsubsecentry#1#2#3#4{\dosubsubsecentry{#2\labelspace#1}{#4}}
+\let\appsubsubsecentry=\numsubsubsecentry
+\def\unnsubsubsecentry#1#2#3#4{\dosubsubsecentry{#1}{#4}}
+
+% This parameter controls the indentation of the various levels.
+% Same as \defaultparindent.
+\newdimen\tocindent \tocindent = 15pt
+
+% Now for the actual typesetting. In all these, #1 is the text and #2 is the
+% page number.
+%
+% If the toc has to be broken over pages, we want it to be at chapters
+% if at all possible; hence the \penalty.
+\def\dochapentry#1#2{%
+   \penalty-300 \vskip1\baselineskip plus.33\baselineskip minus.25\baselineskip
+   \begingroup
+     % Move the page numbers slightly to the right
+     \advance\entryrightmargin by -0.05em
+     \chapentryfonts
+     \tocentry{#1}{\dopageno\bgroup#2\egroup}%
+   \endgroup
+   \nobreak\vskip .25\baselineskip plus.1\baselineskip
+}
+
+\def\dosecentry#1#2{\begingroup
+  \secentryfonts \leftskip=\tocindent
+  \tocentry{#1}{\dopageno\bgroup#2\egroup}%
+\endgroup}
+
+\def\dosubsecentry#1#2{\begingroup
+  \subsecentryfonts \leftskip=2\tocindent
+  \tocentry{#1}{\dopageno\bgroup#2\egroup}%
+\endgroup}
+
+\def\dosubsubsecentry#1#2{\begingroup
+  \subsubsecentryfonts \leftskip=3\tocindent
+  \tocentry{#1}{\dopageno\bgroup#2\egroup}%
+\endgroup}
+
+% We use the same \entry macro as for the index entries.
+\let\tocentry = \entry
+
+% Space between chapter (or whatever) number and the title.
+\def\labelspace{\hskip1em \relax}
+
+\def\dopageno#1{{\rm #1}}
+\def\doshortpageno#1{{\rm #1}}
+
+\def\chapentryfonts{\secfonts \rm}
+\def\secentryfonts{\textfonts}
+\def\subsecentryfonts{\textfonts}
+\def\subsubsecentryfonts{\textfonts}
+
+
+\message{environments,}
+% @foo ... @end foo.
+
+% @tex ... @end tex    escapes into raw TeX temporarily.
+% One exception: @ is still an escape character, so that @end tex works.
+% But \@ or @@ will get a plain @ character.
+
+\envdef\tex{%
+  \setregularquotes
+  \catcode `\\=0 \catcode `\{=1 \catcode `\}=2
+  \catcode `\$=3 \catcode `\&=4 \catcode `\#=6
+  \catcode `\^=7 \catcode `\_=8 \catcode `\~=\active \let~=\tie
+  \catcode `\%=14
+  \catcode `\+=\other
+  \catcode `\"=\other
+  \catcode `\|=\other
+  \catcode `\<=\other
+  \catcode `\>=\other
+  \catcode `\`=\other
+  \catcode `\'=\other
+  %
+  % ' is active in math mode (mathcode"8000).  So reset it, and all our
+  % other math active characters (just in case), to plain's definitions.
+  \mathactive
+  %
+  % Inverse of the list at the beginning of the file.
+  \let\b=\ptexb
+  \let\bullet=\ptexbullet
+  \let\c=\ptexc
+  \let\,=\ptexcomma
+  \let\.=\ptexdot
+  \let\dots=\ptexdots
+  \let\equiv=\ptexequiv
+  \let\!=\ptexexclam
+  \let\i=\ptexi
+  \let\indent=\ptexindent
+  \let\noindent=\ptexnoindent
+  \let\{=\ptexlbrace
+  \let\+=\tabalign
+  \let\}=\ptexrbrace
+  \let\/=\ptexslash
+  \let\sp=\ptexsp
+  \let\*=\ptexstar
+  %\let\sup=\ptexsup % do not redefine, we want @sup to work in math mode
+  \let\t=\ptext
+  \expandafter \let\csname top\endcsname=\ptextop  % we've made it outer
+  \let\frenchspacing=\plainfrenchspacing
+  %
+  \def\endldots{\mathinner{\ldots\ldots\ldots\ldots}}%
+  \def\enddots{\relax\ifmmode\endldots\else$\mathsurround=0pt \endldots\,$\fi}%
+  \def\@{@}%
+}
+% There is no need to define \Etex.
+
+% Define @lisp ... @end lisp.
+% @lisp environment forms a group so it can rebind things,
+% including the definition of @end lisp (which normally is erroneous).
+
+% Amount to narrow the margins by for @lisp.
+\newskip\lispnarrowing \lispnarrowing=0.4in
+
+% This is the definition that ^^M gets inside @lisp, @example, and other
+% such environments.  \null is better than a space, since it doesn't
+% have any width.
+\def\lisppar{\null\endgraf}
+
+% This space is always present above and below environments.
+\newskip\envskipamount \envskipamount = 0pt
+
+% Make spacing and below environment symmetrical.  We use \parskip here
+% to help in doing that, since in @example-like environments \parskip
+% is reset to zero; thus the \afterenvbreak inserts no space -- but the
+% start of the next paragraph will insert \parskip.
+%
+\def\aboveenvbreak{{%
+  % =10000 instead of <10000 because of a special case in \itemzzz and
+  % \sectionheading, q.v.
+  \ifnum \lastpenalty=10000 \else
+    \advance\envskipamount by \parskip
+    \endgraf
+    \ifdim\lastskip<\envskipamount
+      \removelastskip
+      \ifnum\lastpenalty<10000
+        % Penalize breaking before the environment, because preceding text
+        % often leads into it.
+        \penalty100
+      \fi
+      \vskip\envskipamount
+    \fi
+  \fi
+}}
+
+\def\afterenvbreak{{%
+  % =10000 instead of <10000 because of a special case in \itemzzz and
+  % \sectionheading, q.v.
+  \ifnum \lastpenalty=10000 \else
+    \advance\envskipamount by \parskip
+    \endgraf
+    \ifdim\lastskip<\envskipamount
+      \removelastskip
+      % it's not a good place to break if the last penalty was \nobreak
+      % or better ...
+      \ifnum\lastpenalty<10000 \penalty-50 \fi
+      \vskip\envskipamount
+    \fi
+  \fi
+}}
+
+% \nonarrowing is a flag.  If "set", @lisp etc don't narrow margins; it will
+% also clear it, so that its embedded environments do the narrowing again.
+\let\nonarrowing=\relax
+
+% @cartouche ... @end cartouche: draw rectangle w/rounded corners around
+% environment contents.
+
+%
+\def\ctl{{\circle\char'013\hskip -6pt}}% 6pt from pl file: 1/2charwidth
+\def\ctr{{\hskip 6pt\circle\char'010}}
+\def\cbl{{\circle\char'012\hskip -6pt}}
+\def\cbr{{\hskip 6pt\circle\char'011}}
+\def\carttop{\hbox to \cartouter{\hskip\lskip
+        \ctl\leaders\hrule height\circthick\hfil\ctr
+        \hskip\rskip}}
+\def\cartbot{\hbox to \cartouter{\hskip\lskip
+        \cbl\leaders\hrule height\circthick\hfil\cbr
+        \hskip\rskip}}
+%
+\newskip\lskip\newskip\rskip
+
+% only require the font if @cartouche is actually used
+\def\cartouchefontdefs{%
+  \font\circle=lcircle10\relax
+  \circthick=\fontdimen8\circle
+}
+\newdimen\circthick
+\newdimen\cartouter\newdimen\cartinner
+\newskip\normbskip\newskip\normpskip\newskip\normlskip
+
+
+\envdef\cartouche{%
+  \cartouchefontdefs
+  \ifhmode\par\fi  % can't be in the midst of a paragraph.
+  \startsavinginserts
+  \lskip=\leftskip \rskip=\rightskip
+  \leftskip=0pt\rightskip=0pt % we want these *outside*.
+  \cartinner=\hsize \advance\cartinner by-\lskip
+  \advance\cartinner by-\rskip
+  \cartouter=\hsize
+  \advance\cartouter by 18.4pt	% allow for 3pt kerns on either
+				% side, and for 6pt waste from
+				% each corner char, and rule thickness
+  \normbskip=\baselineskip \normpskip=\parskip \normlskip=\lineskip
+  %
+  % If this cartouche directly follows a sectioning command, we need the
+  % \parskip glue (backspaced over by default) or the cartouche can
+  % collide with the section heading.
+  \ifnum\lastpenalty>10000 \vskip\parskip \penalty\lastpenalty \fi
+  %
+  \setbox\groupbox=\vbox\bgroup
+      \baselineskip=0pt\parskip=0pt\lineskip=0pt
+      \carttop
+      \hbox\bgroup
+	  \hskip\lskip
+	  \vrule\kern3pt
+	  \vbox\bgroup
+	      \kern3pt
+	      \hsize=\cartinner
+	      \baselineskip=\normbskip
+	      \lineskip=\normlskip
+	      \parskip=\normpskip
+	      \vskip -\parskip
+	      \comment % For explanation, see the end of def\group.
+}
+\def\Ecartouche{%
+              \ifhmode\par\fi
+	      \kern3pt
+	  \egroup
+	  \kern3pt\vrule
+	  \hskip\rskip
+      \egroup
+      \cartbot
+  \egroup
+  \addgroupbox
+  \checkinserts
+}
+
+
+% This macro is called at the beginning of all the @example variants,
+% inside a group.
+\newdimen\nonfillparindent
+\def\nonfillstart{%
+  \aboveenvbreak
+  \ifdim\hfuzz < 12pt \hfuzz = 12pt \fi % Don't be fussy
+  \sepspaces % Make spaces be word-separators rather than space tokens.
+  \let\par = \lisppar % don't ignore blank lines
+  \obeylines % each line of input is a line of output
+  \parskip = 0pt
+  % Turn off paragraph indentation but redefine \indent to emulate
+  % the normal \indent.
+  \nonfillparindent=\parindent
+  \parindent = 0pt
+  \let\indent\nonfillindent
+  %
+  \emergencystretch = 0pt % don't try to avoid overfull boxes
+  \ifx\nonarrowing\relax
+    \advance \leftskip by \lispnarrowing
+    \exdentamount=\lispnarrowing
+  \else
+    \let\nonarrowing = \relax
+  \fi
+  \let\exdent=\nofillexdent
+}
+
+\begingroup
+\obeyspaces
+% We want to swallow spaces (but not other tokens) after the fake
+% @indent in our nonfill-environments, where spaces are normally
+% active and set to @tie, resulting in them not being ignored after
+% @indent.
+\gdef\nonfillindent{\futurelet\temp\nonfillindentcheck}%
+\gdef\nonfillindentcheck{%
+\ifx\temp %
+\expandafter\nonfillindentgobble%
+\else%
+\leavevmode\nonfillindentbox%
+\fi%
+}%
+\endgroup
+\def\nonfillindentgobble#1{\nonfillindent}
+\def\nonfillindentbox{\hbox to \nonfillparindent{\hss}}
+
+% If you want all examples etc. small: @set dispenvsize small.
+% If you want even small examples the full size: @set dispenvsize nosmall.
+% This affects the following displayed environments:
+%    @example, @display, @format, @lisp, @verbatim
+%
+\def\smallword{small}
+\def\nosmallword{nosmall}
+\let\SETdispenvsize\relax
+\def\setnormaldispenv{%
+  \ifx\SETdispenvsize\smallword
+    % end paragraph for sake of leading, in case document has no blank
+    % line.  This is redundant with what happens in \aboveenvbreak, but
+    % we need to do it before changing the fonts, and it's inconvenient
+    % to change the fonts afterward.
+    \ifnum \lastpenalty=10000 \else \endgraf \fi
+    \smallexamplefonts \rm
+  \fi
+}
+\def\setsmalldispenv{%
+  \ifx\SETdispenvsize\nosmallword
+  \else
+    \ifnum \lastpenalty=10000 \else \endgraf \fi
+    \smallexamplefonts \rm
+  \fi
+}
+
+% We often define two environments, @foo and @smallfoo.
+% Let's do it in one command.  #1 is the env name, #2 the definition.
+\def\makedispenvdef#1#2{%
+  \expandafter\envdef\csname#1\endcsname {\setnormaldispenv #2}%
+  \expandafter\envdef\csname small#1\endcsname {\setsmalldispenv #2}%
+  \expandafter\let\csname E#1\endcsname \afterenvbreak
+  \expandafter\let\csname Esmall#1\endcsname \afterenvbreak
+}
+
+% Define two environment synonyms (#1 and #2) for an environment.
+\def\maketwodispenvdef#1#2#3{%
+  \makedispenvdef{#1}{#3}%
+  \makedispenvdef{#2}{#3}%
+}
+%
+% @lisp: indented, narrowed, typewriter font;
+% @example: same as @lisp.
+%
+% @smallexample and @smalllisp: use smaller fonts.
+% Originally contributed by Pavel@xerox.
+%
+\maketwodispenvdef{lisp}{example}{%
+  \nonfillstart
+  \tt\setcodequotes
+  \let\kbdfont = \kbdexamplefont % Allow @kbd to do something special.
+  \parsearg\gobble
+}
+% @display/@smalldisplay: same as @lisp except keep current font.
+%
+\makedispenvdef{display}{%
+  \nonfillstart
+  \gobble
+}
+
+% @format/@smallformat: same as @display except don't narrow margins.
+%
+\makedispenvdef{format}{%
+  \let\nonarrowing = t%
+  \nonfillstart
+  \gobble
+}
+
+% @flushleft: same as @format, but doesn't obey \SETdispenvsize.
+\envdef\flushleft{%
+  \let\nonarrowing = t%
+  \nonfillstart
+  \gobble
+}
+\let\Eflushleft = \afterenvbreak
+
+% @flushright.
+%
+\envdef\flushright{%
+  \let\nonarrowing = t%
+  \nonfillstart
+  \advance\leftskip by 0pt plus 1fill\relax
+  \gobble
+}
+\let\Eflushright = \afterenvbreak
+
+
+% @raggedright does more-or-less normal line breaking but no right
+% justification.  From plain.tex.
+\envdef\raggedright{%
+  \rightskip0pt plus2.4em \spaceskip.3333em \xspaceskip.5em\relax
+}
+\let\Eraggedright\par
+
+\envdef\raggedleft{%
+  \parindent=0pt \leftskip0pt plus2em
+  \spaceskip.3333em \xspaceskip.5em \parfillskip=0pt
+  \hbadness=10000 % Last line will usually be underfull, so turn off
+                  % badness reporting.
+}
+\let\Eraggedleft\par
+
+\envdef\raggedcenter{%
+  \parindent=0pt \rightskip0pt plus1em \leftskip0pt plus1em
+  \spaceskip.3333em \xspaceskip.5em \parfillskip=0pt
+  \hbadness=10000 % Last line will usually be underfull, so turn off
+                  % badness reporting.
+}
+\let\Eraggedcenter\par
+
+
+% @quotation does normal linebreaking (hence we can't use \nonfillstart)
+% and narrows the margins.  We keep \parskip nonzero in general, since
+% we're doing normal filling.  So, when using \aboveenvbreak and
+% \afterenvbreak, temporarily make \parskip 0.
+%
+\makedispenvdef{quotation}{\quotationstart}
+%
+\def\quotationstart{%
+  \indentedblockstart % same as \indentedblock, but increase right margin too.
+  \ifx\nonarrowing\relax
+    \advance\rightskip by \lispnarrowing
+  \fi
+  \parsearg\quotationlabel
+}
+
+% We have retained a nonzero parskip for the environment, since we're
+% doing normal filling.
+%
+\def\Equotation{%
+  \par
+  \ifx\quotationauthor\thisisundefined\else
+    % indent a bit.
+    \leftline{\kern 2\leftskip \sl ---\quotationauthor}%
+  \fi
+  {\parskip=0pt \afterenvbreak}%
+}
+\def\Esmallquotation{\Equotation}
+
+% If we're given an argument, typeset it in bold with a colon after.
+\def\quotationlabel#1{%
+  \def\temp{#1}%
+  \ifx\temp\empty \else
+    {\bf #1: }%
+  \fi
+}
+
+% @indentedblock is like @quotation, but indents only on the left and
+% has no optional argument.
+% 
+\makedispenvdef{indentedblock}{\indentedblockstart}
+%
+\def\indentedblockstart{%
+  {\parskip=0pt \aboveenvbreak}% because \aboveenvbreak inserts \parskip
+  \parindent=0pt
+  %
+  % @cartouche defines \nonarrowing to inhibit narrowing at next level down.
+  \ifx\nonarrowing\relax
+    \advance\leftskip by \lispnarrowing
+    \exdentamount = \lispnarrowing
+  \else
+    \let\nonarrowing = \relax
+  \fi
+}
+
+% Keep a nonzero parskip for the environment, since we're doing normal filling.
+%
+\def\Eindentedblock{%
+  \par
+  {\parskip=0pt \afterenvbreak}%
+}
+\def\Esmallindentedblock{\Eindentedblock}
+
+
+% LaTeX-like @verbatim...@end verbatim and @verb{<char>...<char>}
+% If we want to allow any <char> as delimiter,
+% we need the curly braces so that makeinfo sees the @verb command, eg:
+% `@verbx...x' would look like the '@verbx' command.  --janneke@gnu.org
+%
+% [Knuth]: Donald Ervin Knuth, 1996.  The TeXbook.
+%
+% [Knuth] p.344; only we need to do the other characters Texinfo sets
+% active too.  Otherwise, they get lost as the first character on a
+% verbatim line.
+\def\dospecials{%
+  \do\ \do\\\do\{\do\}\do\$\do\&%
+  \do\#\do\^\do\^^K\do\_\do\^^A\do\%\do\~%
+  \do\<\do\>\do\|\do\@\do+\do\"%
+  % Don't do the quotes -- if we do, @set txicodequoteundirected and
+  % @set txicodequotebacktick will not have effect on @verb and
+  % @verbatim, and ?` and !` ligatures won't get disabled.
+  %\do\`\do\'%
+}
+%
+% [Knuth] p. 380
+\def\uncatcodespecials{%
+  \def\do##1{\catcode`##1=\other}\dospecials}
+%
+% Setup for the @verb command.
+%
+% Eight spaces for a tab
+\begingroup
+  \catcode`\^^I=\active
+  \gdef\tabeightspaces{\catcode`\^^I=\active\def^^I{\ \ \ \ \ \ \ \ }}
+\endgroup
+%
+\def\setupverb{%
+  \tt  % easiest (and conventionally used) font for verbatim
+  \def\par{\leavevmode\endgraf}%
+  \setcodequotes
+  \tabeightspaces
+  % Respect line breaks,
+  % print special symbols as themselves, and
+  % make each space count
+  % must do in this order:
+  \obeylines \uncatcodespecials \sepspaces
+}
+
+% Setup for the @verbatim environment
+%
+% Real tab expansion.
+\newdimen\tabw \setbox0=\hbox{\tt\space} \tabw=8\wd0 % tab amount
+%
+% We typeset each line of the verbatim in an \hbox, so we can handle
+% tabs.
+\newbox\verbbox
+\def\starttabbox{\setbox\verbbox=\hbox\bgroup}
+%
+\begingroup
+  \catcode`\^^I=\active
+  \gdef\tabexpand{%
+    \catcode`\^^I=\active
+    \def^^I{\leavevmode\egroup
+      \dimen\verbbox=\wd\verbbox % the width so far, or since the previous tab
+      \divide\dimen\verbbox by\tabw
+      \multiply\dimen\verbbox by\tabw % compute previous multiple of \tabw
+      \advance\dimen\verbbox by\tabw  % advance to next multiple of \tabw
+      \wd\verbbox=\dimen\verbbox
+      \leavevmode\box\verbbox \starttabbox
+    }%
+  }
+\endgroup
+
+% start the verbatim environment.
+\def\setupverbatim{%
+  \let\nonarrowing = t%
+  \nonfillstart
+  \tt % easiest (and conventionally used) font for verbatim
+  \def\par{\egroup\leavevmode\box\verbbox\endgraf\starttabbox}%
+  \tabexpand
+  \setcodequotes
+  % Respect line breaks,
+  % print special symbols as themselves, and
+  % make each space count.
+  % Must do in this order:
+  \obeylines \uncatcodespecials \sepspaces
+}
+
+% Do the @verb magic: verbatim text is quoted by unique
+% delimiter characters.  Before first delimiter expect a
+% right brace, after last delimiter expect closing brace:
+%
+%    \def\doverb'{'<char>#1<char>'}'{#1}
+%
+% [Knuth] p. 382; only eat outer {}
+\begingroup
+  \catcode`[=1\catcode`]=2\catcode`\{=\other\catcode`\}=\other
+  \gdef\doverb{#1[\def\next##1#1}[##1\endgroup]\next]
+\endgroup
+%
+\def\verb{\begingroup\setupverb\doverb}
+%
+%
+% Do the @verbatim magic: define the macro \doverbatim so that
+% the (first) argument ends when '@end verbatim' is reached, ie:
+%
+%     \def\doverbatim#1@end verbatim{#1}
+%
+% For Texinfo it's a lot easier than for LaTeX,
+% because texinfo's \verbatim doesn't stop at '\end{verbatim}':
+% we need not redefine '\', '{' and '}'.
+%
+% Inspired by LaTeX's verbatim command set [latex.ltx]
+%
+\begingroup
+  \catcode`\ =\active
+  \obeylines %
+  % ignore everything up to the first ^^M, that's the newline at the end
+  % of the @verbatim input line itself.  Otherwise we get an extra blank
+  % line in the output.
+  \xdef\doverbatim#1^^M#2@end verbatim{%
+    \starttabbox#2\egroup\noexpand\end\gobble verbatim}%
+  % We really want {...\end verbatim} in the body of the macro, but
+  % without the active space; thus we have to use \xdef and \gobble.
+  % The \egroup ends the \verbbox started at the end of the last line in
+  % the block.
+\endgroup
+%
+\envdef\verbatim{%
+    \setnormaldispenv\setupverbatim\doverbatim
+}
+\let\Everbatim = \afterenvbreak
+
+
+% @verbatiminclude FILE - insert text of file in verbatim environment.
+%
+\def\verbatiminclude{\parseargusing\filenamecatcodes\doverbatiminclude}
+%
+\def\doverbatiminclude#1{%
+  {%
+    \makevalueexpandable
+    \setupverbatim
+    {%
+      \indexnofonts       % Allow `@@' and other weird things in file names.
+      \wlog{texinfo.tex: doing @verbatiminclude of #1^^J}%
+      \edef\tmp{\noexpand\input #1 }
+      \expandafter
+    }\expandafter\starttabbox\tmp\egroup
+    \afterenvbreak
+  }%
+}
+
+% @copying ... @end copying.
+% Save the text away for @insertcopying later.
+%
+% We save the uninterpreted tokens, rather than creating a box.
+% Saving the text in a box would be much easier, but then all the
+% typesetting commands (@smallbook, font changes, etc.) have to be done
+% beforehand -- and a) we want @copying to be done first in the source
+% file; b) letting users define the frontmatter in as flexible order as
+% possible is desirable.
+%
+\def\copying{\checkenv{}\begingroup\scanargctxt\docopying}
+\def\docopying#1@end copying{\endgroup\def\copyingtext{#1}}
+%
+\def\insertcopying{%
+  \begingroup
+    \parindent = 0pt  % paragraph indentation looks wrong on title page
+    \scanexp\copyingtext
+  \endgroup
+}
+
+
+\message{defuns,}
+% @defun etc.
+
+\newskip\defbodyindent \defbodyindent=.4in
+\newskip\defargsindent \defargsindent=50pt
+\newskip\deflastargmargin \deflastargmargin=18pt
+\newcount\defunpenalty
+
+% Start the processing of @deffn:
+\def\startdefun{%
+  \ifnum\lastpenalty<10000
+    \medbreak
+    \defunpenalty=10003 % Will keep this @deffn together with the
+                        % following @def command, see below.
+  \else
+    % If there are two @def commands in a row, we'll have a \nobreak,
+    % which is there to keep the function description together with its
+    % header.  But if there's nothing but headers, we need to allow a
+    % break somewhere.  Check specifically for penalty 10002, inserted
+    % by \printdefunline, instead of 10000, since the sectioning
+    % commands also insert a nobreak penalty, and we don't want to allow
+    % a break between a section heading and a defun.
+    %
+    % As a further refinement, we avoid "club" headers by signalling
+    % with penalty of 10003 after the very first @deffn in the
+    % sequence (see above), and penalty of 10002 after any following
+    % @def command.
+    \ifnum\lastpenalty=10002 \penalty2000 \else \defunpenalty=10002 \fi
+    %
+    % Similarly, after a section heading, do not allow a break.
+    % But do insert the glue.
+    \medskip  % preceded by discardable penalty, so not a breakpoint
+  \fi
+  %
+  \parindent=0in
+  \advance\leftskip by \defbodyindent
+  \exdentamount=\defbodyindent
+}
+
+\def\dodefunx#1{%
+  % First, check whether we are in the right environment:
+  \checkenv#1%
+  %
+  % As above, allow line break if we have multiple x headers in a row.
+  % It's not a great place, though.
+  \ifnum\lastpenalty=10002 \penalty3000 \else \defunpenalty=10002 \fi
+  %
+  % And now, it's time to reuse the body of the original defun:
+  \expandafter\gobbledefun#1%
+}
+\def\gobbledefun#1\startdefun{}
+
+% \printdefunline \deffnheader{text}
+%
+\def\printdefunline#1#2{%
+  \begingroup
+    % call \deffnheader:
+    #1#2 \endheader
+    % common ending:
+    \interlinepenalty = 10000
+    \advance\rightskip by 0pt plus 1fil\relax
+    \endgraf
+    \nobreak\vskip -\parskip
+    \penalty\defunpenalty  % signal to \startdefun and \dodefunx
+    % Some of the @defun-type tags do not enable magic parentheses,
+    % rendering the following check redundant.  But we don't optimize.
+    \checkparencounts
+  \endgroup
+}
+
+\def\Edefun{\endgraf\medbreak}
+
+% \makedefun{deffn} creates \deffn, \deffnx and \Edeffn;
+% the only thing remaining is to define \deffnheader.
+%
+\def\makedefun#1{%
+  \expandafter\let\csname E#1\endcsname = \Edefun
+  \edef\temp{\noexpand\domakedefun
+    \makecsname{#1}\makecsname{#1x}\makecsname{#1header}}%
+  \temp
+}
+
+% \domakedefun \deffn \deffnx \deffnheader { (defn. of \deffnheader) }
+%
+% Define \deffn and \deffnx, without parameters.
+% \deffnheader has to be defined explicitly.
+%
+\def\domakedefun#1#2#3{%
+  \envdef#1{%
+    \startdefun
+    \doingtypefnfalse    % distinguish typed functions from all else
+    \parseargusing\activeparens{\printdefunline#3}%
+  }%
+  \def#2{\dodefunx#1}%
+  \def#3%
+}
+
+\newif\ifdoingtypefn       % doing typed function?
+\newif\ifrettypeownline    % typeset return type on its own line?
+
+% @deftypefnnewline on|off says whether the return type of typed functions
+% are printed on their own line.  This affects @deftypefn, @deftypefun,
+% @deftypeop, and @deftypemethod.
+% 
+\parseargdef\deftypefnnewline{%
+  \def\temp{#1}%
+  \ifx\temp\onword
+    \expandafter\let\csname SETtxideftypefnnl\endcsname
+      = \empty
+  \else\ifx\temp\offword
+    \expandafter\let\csname SETtxideftypefnnl\endcsname
+      = \relax
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @txideftypefnnl value `\temp',
+                must be on|off}%
+  \fi\fi
+}
+
+% \dosubind {index}{topic}{subtopic}
+%
+% If SUBTOPIC is present, precede it with a space, and call \doind.
+% (At some time during the 20th century, this made a two-level entry in an 
+% index such as the operation index.  Nobody seemed to notice the change in 
+% behaviour though.)
+\def\dosubind#1#2#3{%
+  \def\thirdarg{#3}%
+  \ifx\thirdarg\empty
+    \doind{#1}{#2}%
+  \else
+    \doind{#1}{#2\space#3}%
+  \fi
+}
+
+% Untyped functions:
+
+% @deffn category name args
+\makedefun{deffn}{\deffngeneral{}}
+
+% @deffn category class name args
+\makedefun{defop}#1 {\defopon{#1\ \putwordon}}
+
+% \defopon {category on}class name args
+\def\defopon#1#2 {\deffngeneral{\putwordon\ \code{#2}}{#1\ \code{#2}} }
+
+% \deffngeneral {subind}category name args
+%
+\def\deffngeneral#1#2 #3 #4\endheader{%
+  \dosubind{fn}{\code{#3}}{#1}%
+  \defname{#2}{}{#3}\magicamp\defunargs{#4\unskip}%
+}
+
+% Typed functions:
+
+% @deftypefn category type name args
+\makedefun{deftypefn}{\deftypefngeneral{}}
+
+% @deftypeop category class type name args
+\makedefun{deftypeop}#1 {\deftypeopon{#1\ \putwordon}}
+
+% \deftypeopon {category on}class type name args
+\def\deftypeopon#1#2 {\deftypefngeneral{\putwordon\ \code{#2}}{#1\ \code{#2}} }
+
+% \deftypefngeneral {subind}category type name args
+%
+\def\deftypefngeneral#1#2 #3 #4 #5\endheader{%
+  \dosubind{fn}{\code{#4}}{#1}%
+  \doingtypefntrue
+  \defname{#2}{#3}{#4}\defunargs{#5\unskip}%
+}
+
+% Typed variables:
+
+% @deftypevr category type var args
+\makedefun{deftypevr}{\deftypecvgeneral{}}
+
+% @deftypecv category class type var args
+\makedefun{deftypecv}#1 {\deftypecvof{#1\ \putwordof}}
+
+% \deftypecvof {category of}class type var args
+\def\deftypecvof#1#2 {\deftypecvgeneral{\putwordof\ \code{#2}}{#1\ \code{#2}} }
+
+% \deftypecvgeneral {subind}category type var args
+%
+\def\deftypecvgeneral#1#2 #3 #4 #5\endheader{%
+  \dosubind{vr}{\code{#4}}{#1}%
+  \defname{#2}{#3}{#4}\defunargs{#5\unskip}%
+}
+
+% Untyped variables:
+
+% @defvr category var args
+\makedefun{defvr}#1 {\deftypevrheader{#1} {} }
+
+% @defcv category class var args
+\makedefun{defcv}#1 {\defcvof{#1\ \putwordof}}
+
+% \defcvof {category of}class var args
+\def\defcvof#1#2 {\deftypecvof{#1}#2 {} }
+
+% Types:
+
+% @deftp category name args
+\makedefun{deftp}#1 #2 #3\endheader{%
+  \doind{tp}{\code{#2}}%
+  \defname{#1}{}{#2}\defunargs{#3\unskip}%
+}
+
+% Remaining @defun-like shortcuts:
+\makedefun{defun}{\deffnheader{\putwordDeffunc} }
+\makedefun{defmac}{\deffnheader{\putwordDefmac} }
+\makedefun{defspec}{\deffnheader{\putwordDefspec} }
+\makedefun{deftypefun}{\deftypefnheader{\putwordDeffunc} }
+\makedefun{defvar}{\defvrheader{\putwordDefvar} }
+\makedefun{defopt}{\defvrheader{\putwordDefopt} }
+\makedefun{deftypevar}{\deftypevrheader{\putwordDefvar} }
+\makedefun{defmethod}{\defopon\putwordMethodon}
+\makedefun{deftypemethod}{\deftypeopon\putwordMethodon}
+\makedefun{defivar}{\defcvof\putwordInstanceVariableof}
+\makedefun{deftypeivar}{\deftypecvof\putwordInstanceVariableof}
+
+% \defname, which formats the name of the @def (not the args).
+% #1 is the category, such as "Function".
+% #2 is the return type, if any.
+% #3 is the function name.
+%
+% We are followed by (but not passed) the arguments, if any.
+%
+\def\defname#1#2#3{%
+  \par
+  % Get the values of \leftskip and \rightskip as they were outside the @def...
+  \advance\leftskip by -\defbodyindent
+  %
+  % Determine if we are typesetting the return type of a typed function
+  % on a line by itself.
+  \rettypeownlinefalse
+  \ifdoingtypefn  % doing a typed function specifically?
+    % then check user option for putting return type on its own line:
+    \expandafter\ifx\csname SETtxideftypefnnl\endcsname\relax \else
+      \rettypeownlinetrue
+    \fi
+  \fi
+  %
+  % How we'll format the category name.  Putting it in brackets helps
+  % distinguish it from the body text that may end up on the next line
+  % just below it.
+  \def\temp{#1}%
+  \setbox0=\hbox{\kern\deflastargmargin \ifx\temp\empty\else [\rm\temp]\fi}
+  %
+  % Figure out line sizes for the paragraph shape.  We'll always have at
+  % least two.
+  \tempnum = 2
+  %
+  % The first line needs space for \box0; but if \rightskip is nonzero,
+  % we need only space for the part of \box0 which exceeds it:
+  \dimen0=\hsize  \advance\dimen0 by -\wd0  \advance\dimen0 by \rightskip
+  %
+  % If doing a return type on its own line, we'll have another line.
+  \ifrettypeownline
+    \advance\tempnum by 1
+    \def\maybeshapeline{0in \hsize}%
+  \else
+    \def\maybeshapeline{}%
+  \fi
+  %
+  % The continuations:
+  \dimen2=\hsize  \advance\dimen2 by -\defargsindent
+  %
+  % The final paragraph shape:
+  \parshape \tempnum  0in \dimen0  \maybeshapeline  \defargsindent \dimen2
+  %
+  % Put the category name at the right margin.
+  \noindent
+  \hbox to 0pt{%
+    \hfil\box0 \kern-\hsize
+    % \hsize has to be shortened this way:
+    \kern\leftskip
+    % Intentionally do not respect \rightskip, since we need the space.
+  }%
+  %
+  % Allow all lines to be underfull without complaint:
+  \tolerance=10000 \hbadness=10000
+  \exdentamount=\defbodyindent
+  {%
+    % defun fonts. We use typewriter by default (used to be bold) because:
+    % . we're printing identifiers, they should be in tt in principle.
+    % . in languages with many accents, such as Czech or French, it's
+    %   common to leave accents off identifiers.  The result looks ok in
+    %   tt, but exceedingly strange in rm.
+    % . we don't want -- and --- to be treated as ligatures.
+    % . this still does not fix the ?` and !` ligatures, but so far no
+    %   one has made identifiers using them :).
+    \df \tt
+    \def\temp{#2}% text of the return type
+    \ifx\temp\empty\else
+      \tclose{\temp}% typeset the return type
+      \ifrettypeownline
+        % put return type on its own line; prohibit line break following:
+        \hfil\vadjust{\nobreak}\break  
+      \else
+        \space  % type on same line, so just followed by a space
+      \fi
+    \fi           % no return type
+    #3% output function name
+  }%
+  {\rm\enskip}% hskip 0.5 em of \rmfont
+  %
+  \boldbrax
+  % arguments will be output next, if any.
+}
+
+% Print arguments in slanted roman (not ttsl), inconsistently with using
+% tt for the name.  This is because literal text is sometimes needed in
+% the argument list (groff manual), and ttsl and tt are not very
+% distinguishable.  Prevent hyphenation at `-' chars.
+%
+\def\defunargs#1{%
+  % use sl by default (not ttsl),
+  % tt for the names.
+  \df \sl \hyphenchar\font=0
+  %
+  % On the other hand, if an argument has two dashes (for instance), we
+  % want a way to get ttsl.  We used to recommend @var for that, so
+  % leave the code in, but it's strange for @var to lead to typewriter.
+  % Nowadays we recommend @code, since the difference between a ttsl hyphen
+  % and a tt hyphen is pretty tiny.  @code also disables ?` !`.
+  \def\var##1{{\setregularquotes\ttslanted{##1}}}%
+  #1%
+  \sl\hyphenchar\font=45
+}
+
+% We want ()&[] to print specially on the defun line.
+%
+\def\activeparens{%
+  \catcode`\(=\active \catcode`\)=\active
+  \catcode`\[=\active \catcode`\]=\active
+  \catcode`\&=\active
+}
+
+% Make control sequences which act like normal parenthesis chars.
+\let\lparen = ( \let\rparen = )
+
+% Be sure that we always have a definition for `(', etc.  For example,
+% if the fn name has parens in it, \boldbrax will not be in effect yet,
+% so TeX would otherwise complain about undefined control sequence.
+{
+  \activeparens
+  \global\let(=\lparen \global\let)=\rparen
+  \global\let[=\lbrack \global\let]=\rbrack
+  \global\let& = \&
+
+  \gdef\boldbrax{\let(=\opnr\let)=\clnr\let[=\lbrb\let]=\rbrb}
+  \gdef\magicamp{\let&=\amprm}
+}
+\let\ampchar\&
+
+\newcount\parencount
+
+% If we encounter &foo, then turn on ()-hacking afterwards
+\newif\ifampseen
+\def\amprm#1 {\ampseentrue{\bf\&#1 }}
+
+\def\parenfont{%
+  \ifampseen
+    % At the first level, print parens in roman,
+    % otherwise use the default font.
+    \ifnum \parencount=1 \rm \fi
+  \else
+    % The \sf parens (in \boldbrax) actually are a little bolder than
+    % the contained text.  This is especially needed for [ and ] .
+    \sf
+  \fi
+}
+\def\infirstlevel#1{%
+  \ifampseen
+    \ifnum\parencount=1
+      #1%
+    \fi
+  \fi
+}
+\def\bfafterword#1 {#1 \bf}
+
+\def\opnr{%
+  \global\advance\parencount by 1
+  {\parenfont(}%
+  \infirstlevel \bfafterword
+}
+\def\clnr{%
+  {\parenfont)}%
+  \infirstlevel \sl
+  \global\advance\parencount by -1
+}
+
+\newcount\brackcount
+\def\lbrb{%
+  \global\advance\brackcount by 1
+  {\bf[}%
+}
+\def\rbrb{%
+  {\bf]}%
+  \global\advance\brackcount by -1
+}
+
+\def\checkparencounts{%
+  \ifnum\parencount=0 \else \badparencount \fi
+  \ifnum\brackcount=0 \else \badbrackcount \fi
+}
+% these should not use \errmessage; the glibc manual, at least, actually
+% has such constructs (when documenting function pointers).
+\def\badparencount{%
+  \message{Warning: unbalanced parentheses in @def...}%
+  \global\parencount=0
+}
+\def\badbrackcount{%
+  \message{Warning: unbalanced square brackets in @def...}%
+  \global\brackcount=0
+}
+
+
+\message{macros,}
+% @macro.
+
+% To do this right we need a feature of e-TeX, \scantokens,
+% which we arrange to emulate with a temporary file in ordinary TeX.
+\ifx\eTeXversion\thisisundefined
+  \newwrite\macscribble
+  \def\scantokens#1{%
+    \toks0={#1}%
+    \immediate\openout\macscribble=\jobname.tmp
+    \immediate\write\macscribble{\the\toks0}%
+    \immediate\closeout\macscribble
+    \input \jobname.tmp
+  }
+\fi
+
+\let\E=\expandafter
+
+% Used at the time of macro expansion.
+% Argument is macro body with arguments substituted
+\def\scanmacro#1{%
+  \newlinechar`\^^M
+  % expand the expansion of \eatleadingcr twice to maybe remove a leading
+  % newline (and \else and \fi tokens), then call \eatspaces on the result.
+  \def\xeatspaces##1{%
+    \E\E\E\E\E\E\E\eatspaces\E\E\E\E\E\E\E{\eatleadingcr##1%
+  }}%
+  \def\xempty##1{}%
+  %
+  % Process the macro body under the current catcode regime.
+  \scantokens{#1@comment}%
+  %
+  % The \comment is to remove the \newlinechar added by \scantokens, and
+  % can be noticed by \parsearg.  Note \c isn't used because this means cedilla 
+  % in math mode.
+}
+
+% Used for copying and captions
+\def\scanexp#1{%
+  \expandafter\scanmacro\expandafter{#1}%
+}
+
+\newcount\paramno   % Count of parameters
+\newtoks\macname    % Macro name
+\newif\ifrecursive  % Is it recursive?
+
+% List of all defined macros in the form
+%    \commondummyword\macro1\commondummyword\macro2...
+% Currently is also contains all @aliases; the list can be split
+% if there is a need.
+\def\macrolist{}
+
+% Add the macro to \macrolist
+\def\addtomacrolist#1{\expandafter \addtomacrolistxxx \csname#1\endcsname}
+\def\addtomacrolistxxx#1{%
+     \toks0 = \expandafter{\macrolist\commondummyword#1}%
+     \xdef\macrolist{\the\toks0}%
+}
+
+% Utility routines.
+% This does \let #1 = #2, with \csnames; that is,
+%   \let \csname#1\endcsname = \csname#2\endcsname
+% (except of course we have to play expansion games).
+%
+\def\cslet#1#2{%
+  \expandafter\let
+  \csname#1\expandafter\endcsname
+  \csname#2\endcsname
+}
+
+% Trim leading and trailing spaces off a string.
+% Concepts from aro-bend problem 15 (see CTAN).
+{\catcode`\@=11
+\gdef\eatspaces #1{\expandafter\trim@\expandafter{#1 }}
+\gdef\trim@ #1{\trim@@ @#1 @ #1 @ @@}
+\gdef\trim@@ #1@ #2@ #3@@{\trim@@@\empty #2 @}
+\def\unbrace#1{#1}
+\unbrace{\gdef\trim@@@ #1 } #2@{#1}
+}
+
+{\catcode`\^^M=\other%
+\gdef\eatleadingcr#1{\if\noexpand#1\noexpand^^M\else\E#1\fi}}%
+% Warning: this won't work for a delimited argument
+% or for an empty argument
+
+% Trim a single trailing ^^M off a string.
+{\catcode`\^^M=\other \catcode`\Q=3%
+\gdef\eatcr #1{\eatcra #1Q^^MQ}%
+\gdef\eatcra#1^^MQ{\eatcrb#1Q}%
+\gdef\eatcrb#1Q#2Q{#1}%
+}
+
+% Macro bodies are absorbed as an argument in a context where
+% all characters are catcode 10, 11 or 12, except \ which is active
+% (as in normal texinfo). It is necessary to change the definition of \
+% to recognize macro arguments; this is the job of \mbodybackslash.
+%
+% Non-ASCII encodings make 8-bit characters active, so un-activate
+% them to avoid their expansion.  Must do this non-globally, to
+% confine the change to the current group.
+%
+% It's necessary to have hard CRs when the macro is executed. This is
+% done by making ^^M (\endlinechar) catcode 12 when reading the macro
+% body, and then making it the \newlinechar in \scanmacro.
+%
+\def\scanctxt{% used as subroutine
+  \catcode`\"=\other
+  \catcode`\+=\other
+  \catcode`\<=\other
+  \catcode`\>=\other
+  \catcode`\^=\other
+  \catcode`\_=\other
+  \catcode`\|=\other
+  \catcode`\~=\other
+  \passthroughcharstrue
+}
+
+\def\scanargctxt{% used for copying and captions, not macros.
+  \scanctxt
+  \catcode`\@=\other
+  \catcode`\\=\other
+  \catcode`\^^M=\other
+}
+
+\def\macrobodyctxt{% used for @macro definitions
+  \scanctxt
+  \catcode`\ =\other
+  \catcode`\@=\other
+  \catcode`\{=\other
+  \catcode`\}=\other
+  \catcode`\^^M=\other
+  \usembodybackslash
+}
+
+% Used when scanning braced macro arguments.  Note, however, that catcode
+% changes here are ineffectual if the macro invocation was nested inside
+% an argument to another Texinfo command.
+\def\macroargctxt{%
+  \scanctxt
+  \catcode`\ =\active
+  \catcode`\@=\other
+  \catcode`\^^M=\other
+  \catcode`\\=\active
+}
+
+\def\macrolineargctxt{% used for whole-line arguments without braces
+  \scanctxt
+  \catcode`\@=\other
+  \catcode`\{=\other
+  \catcode`\}=\other
+}
+
+% \mbodybackslash is the definition of \ in @macro bodies.
+% It maps \foo\ => \csname macarg.foo\endcsname => #N
+% where N is the macro parameter number.
+% We define \csname macarg.\endcsname to be \realbackslash, so
+% \\ in macro replacement text gets you a backslash.
+%
+{\catcode`@=0 @catcode`@\=@active
+ @gdef@usembodybackslash{@let\=@mbodybackslash}
+ @gdef@mbodybackslash#1\{@csname macarg.#1@endcsname}
+}
+\expandafter\def\csname macarg.\endcsname{\realbackslash}
+
+\def\margbackslash#1{\char`\#1 }
+
+\def\macro{\recursivefalse\parsearg\macroxxx}
+\def\rmacro{\recursivetrue\parsearg\macroxxx}
+
+\def\macroxxx#1{%
+  \getargs{#1}% now \macname is the macname and \argl the arglist
+  \ifx\argl\empty       % no arguments
+     \paramno=0\relax
+  \else
+     \expandafter\parsemargdef \argl;%
+     \if\paramno>256\relax
+       \ifx\eTeXversion\thisisundefined
+         \errhelp = \EMsimple
+         \errmessage{You need eTeX to compile a file with macros with more than 256 arguments}
+       \fi
+     \fi
+  \fi
+  \if1\csname ismacro.\the\macname\endcsname
+     \message{Warning: redefining \the\macname}%
+  \else
+     \expandafter\ifx\csname \the\macname\endcsname \relax
+     \else \errmessage{Macro name \the\macname\space already defined}\fi
+     \global\cslet{macsave.\the\macname}{\the\macname}%
+     \global\expandafter\let\csname ismacro.\the\macname\endcsname=1%
+     \addtomacrolist{\the\macname}%
+  \fi
+  \begingroup \macrobodyctxt
+  \ifrecursive \expandafter\parsermacbody
+  \else \expandafter\parsemacbody
+  \fi}
+
+\parseargdef\unmacro{%
+  \if1\csname ismacro.#1\endcsname
+    \global\cslet{#1}{macsave.#1}%
+    \global\expandafter\let \csname ismacro.#1\endcsname=0%
+    % Remove the macro name from \macrolist:
+    \begingroup
+      \expandafter\let\csname#1\endcsname \relax
+      \let\commondummyword\unmacrodo
+      \xdef\macrolist{\macrolist}%
+    \endgroup
+  \else
+    \errmessage{Macro #1 not defined}%
+  \fi
+}
+
+% Called by \do from \dounmacro on each macro.  The idea is to omit any
+% macro definitions that have been changed to \relax.
+%
+\def\unmacrodo#1{%
+  \ifx #1\relax
+    % remove this
+  \else
+    \noexpand\commondummyword \noexpand#1%
+  \fi
+}
+
+% \getargs -- Parse the arguments to a @macro line.  Set \macname to
+% the name of the macro, and \argl to the braced argument list.
+\def\getargs#1{\getargsxxx#1{}}
+\def\getargsxxx#1#{\getmacname #1 \relax\getmacargs}
+\def\getmacname#1 #2\relax{\macname={#1}}
+\def\getmacargs#1{\def\argl{#1}}
+% This made use of the feature that if the last token of a
+% <parameter list> is #, then the preceding argument is delimited by
+% an opening brace, and that opening brace is not consumed.
+
+% Parse the optional {params} list to @macro or @rmacro.
+% Set \paramno to the number of arguments,
+% and \paramlist to a parameter text for the macro (e.g. #1,#2,#3 for a
+% three-param macro.)  Define \macarg.BLAH for each BLAH in the params
+% list to some hook where the argument is to be expanded.  If there are
+% less than 10 arguments that hook is to be replaced by ##N where N
+% is the position in that list, that is to say the macro arguments are to be
+% defined `a la TeX in the macro body.  
+%
+% That gets used by \mbodybackslash (above).
+%
+% If there are 10 or more arguments, a different technique is used: see
+% \parsemmanyargdef.
+%
+\def\parsemargdef#1;{%
+  \paramno=0\def\paramlist{}%
+  \let\hash\relax
+  % \hash is redefined to `#' later to get it into definitions
+  \let\xeatspaces\relax
+  \let\xempty\relax
+  \parsemargdefxxx#1,;,%
+  \ifnum\paramno<10\relax\else
+    \paramno0\relax
+    \parsemmanyargdef@@#1,;,% 10 or more arguments
+  \fi
+}
+\def\parsemargdefxxx#1,{%
+  \if#1;\let\next=\relax
+  \else \let\next=\parsemargdefxxx
+    \advance\paramno by 1
+    \expandafter\edef\csname macarg.\eatspaces{#1}\endcsname
+        {\xeatspaces{\hash\the\paramno\noexpand\xempty{}}}%
+    \edef\paramlist{\paramlist\hash\the\paramno,}%
+  \fi\next}
+% the \xempty{} is to give \eatleadingcr an argument in the case of an
+% empty macro argument.
+
+% \parsemacbody, \parsermacbody
+%
+% Read recursive and nonrecursive macro bodies. (They're different since
+% rec and nonrec macros end differently.)
+% 
+% We are in \macrobodyctxt, and the \xdef causes backslashshes in the macro 
+% body to be transformed.
+% Set \macrobody to the body of the macro, and call \defmacro.
+%
+{\catcode`\ =\other\long\gdef\parsemacbody#1@end macro{%
+\xdef\macrobody{\eatcr{#1}}\endgroup\defmacro}}%
+{\catcode`\ =\other\long\gdef\parsermacbody#1@end rmacro{%
+\xdef\macrobody{\eatcr{#1}}\endgroup\defmacro}}%
+
+% Make @ a letter, so that we can make private-to-Texinfo macro names.
+\edef\texiatcatcode{\the\catcode`\@}
+\catcode `@=11\relax
+
+%%%%%%%%%%%%%% Code for > 10 arguments only   %%%%%%%%%%%%%%%%%%
+
+% If there are 10 or more arguments, a different technique is used, where the
+% hook remains in the body, and when macro is to be expanded the body is
+% processed again to replace the arguments.
+%
+% In that case, the hook is \the\toks N-1, and we simply set \toks N-1 to the
+% argument N value and then \edef the body (nothing else will expand because of
+% the catcode regime under which the body was input).
+%
+% If you compile with TeX (not eTeX), and you have macros with 10 or more
+% arguments, no macro can have more than 256 arguments (else error).
+%
+% In case that there are 10 or more arguments we parse again the arguments
+% list to set new definitions for the \macarg.BLAH macros corresponding to
+% each BLAH argument. It was anyhow needed to parse already once this list
+% in order to count the arguments, and as macros with at most 9 arguments
+% are by far more frequent than macro with 10 or more arguments, defining
+% twice the \macarg.BLAH macros does not cost too much processing power.
+\def\parsemmanyargdef@@#1,{%
+  \if#1;\let\next=\relax
+  \else 
+    \let\next=\parsemmanyargdef@@
+    \edef\tempb{\eatspaces{#1}}%
+    \expandafter\def\expandafter\tempa
+       \expandafter{\csname macarg.\tempb\endcsname}%
+    % Note that we need some extra \noexpand\noexpand, this is because we
+    % don't want \the  to be expanded in the \parsermacbody  as it uses an
+    % \xdef .
+    \expandafter\edef\tempa
+      {\noexpand\noexpand\noexpand\the\toks\the\paramno}%
+    \advance\paramno by 1\relax
+  \fi\next}
+
+
+\let\endargs@\relax
+\let\nil@\relax
+\def\nilm@{\nil@}%
+\long\def\nillm@{\nil@}%
+
+% This macro is expanded during the Texinfo macro expansion, not during its
+% definition.  It gets all the arguments' values and assigns them to macros
+% macarg.ARGNAME
+%
+% #1 is the macro name
+% #2 is the list of argument names
+% #3 is the list of argument values
+\def\getargvals@#1#2#3{%
+  \def\macargdeflist@{}%
+  \def\saveparamlist@{#2}% Need to keep a copy for parameter expansion.
+  \def\paramlist{#2,\nil@}%
+  \def\macroname{#1}%
+  \begingroup
+  \macroargctxt
+  \def\argvaluelist{#3,\nil@}%
+  \def\@tempa{#3}%
+  \ifx\@tempa\empty
+    \setemptyargvalues@
+  \else
+    \getargvals@@
+  \fi
+}
+\def\getargvals@@{%
+  \ifx\paramlist\nilm@
+      % Some sanity check needed here that \argvaluelist is also empty.
+      \ifx\argvaluelist\nillm@
+      \else
+        \errhelp = \EMsimple
+        \errmessage{Too many arguments in macro `\macroname'!}%
+      \fi
+      \let\next\macargexpandinbody@
+  \else
+    \ifx\argvaluelist\nillm@
+       % No more arguments values passed to macro.  Set remaining named-arg
+       % macros to empty.
+       \let\next\setemptyargvalues@
+    \else
+      % pop current arg name into \@tempb
+      \def\@tempa##1{\pop@{\@tempb}{\paramlist}##1\endargs@}%
+      \expandafter\@tempa\expandafter{\paramlist}%
+       % pop current argument value into \@tempc
+      \def\@tempa##1{\longpop@{\@tempc}{\argvaluelist}##1\endargs@}%
+      \expandafter\@tempa\expandafter{\argvaluelist}%
+       % Here \@tempb is the current arg name and \@tempc is the current arg value.
+       % First place the new argument macro definition into \@tempd
+       \expandafter\macname\expandafter{\@tempc}%
+       \expandafter\let\csname macarg.\@tempb\endcsname\relax
+       \expandafter\def\expandafter\@tempe\expandafter{%
+         \csname macarg.\@tempb\endcsname}%
+       \edef\@tempd{\long\def\@tempe{\the\macname}}%
+       \push@\@tempd\macargdeflist@
+       \let\next\getargvals@@
+    \fi
+  \fi
+  \next
+}
+
+\def\push@#1#2{%
+  \expandafter\expandafter\expandafter\def
+  \expandafter\expandafter\expandafter#2%
+  \expandafter\expandafter\expandafter{%
+  \expandafter#1#2}%
+}
+
+% Replace arguments by their values in the macro body, and place the result
+% in macro \@tempa.
+% 
+\def\macvalstoargs@{%
+  %  To do this we use the property that token registers that are \the'ed
+  % within an \edef  expand only once. So we are going to place all argument
+  % values into respective token registers.
+  %
+  % First we save the token context, and initialize argument numbering.
+  \begingroup
+    \paramno0\relax
+    % Then, for each argument number #N, we place the corresponding argument
+    % value into a new token list register \toks#N
+    \expandafter\putargsintokens@\saveparamlist@,;,%
+    % Then, we expand the body so that argument are replaced by their
+    % values. The trick for values not to be expanded themselves is that they
+    % are within tokens and that tokens expand only once in an \edef .
+    \edef\@tempc{\csname mac.\macroname .body\endcsname}%
+    % Now we restore the token stack pointer to free the token list registers
+    % which we have used, but we make sure that expanded body is saved after
+    % group.
+    \expandafter
+  \endgroup
+  \expandafter\def\expandafter\@tempa\expandafter{\@tempc}%
+  }
+
+% Define the named-macro outside of this group and then close this group. 
+% 
+\def\macargexpandinbody@{% 
+  \expandafter
+  \endgroup
+  \macargdeflist@
+  % First the replace in body the macro arguments by their values, the result
+  % is in \@tempa .
+  \macvalstoargs@
+  % Then we point at the \norecurse or \gobble (for recursive) macro value
+  % with \@tempb .
+  \expandafter\let\expandafter\@tempb\csname mac.\macroname .recurse\endcsname
+  % Depending on whether it is recursive or not, we need some tailing
+  % \egroup .
+  \ifx\@tempb\gobble
+     \let\@tempc\relax
+  \else
+     \let\@tempc\egroup
+  \fi
+  % And now we do the real job:
+  \edef\@tempd{\noexpand\@tempb{\macroname}\noexpand\scanmacro{\@tempa}\@tempc}%
+  \@tempd
+}
+
+\def\putargsintokens@#1,{%
+  \if#1;\let\next\relax
+  \else
+    \let\next\putargsintokens@
+    % First we allocate the new token list register, and give it a temporary
+    % alias \@tempb .
+    \toksdef\@tempb\the\paramno
+    % Then we place the argument value into that token list register.
+    \expandafter\let\expandafter\@tempa\csname macarg.#1\endcsname
+    \expandafter\@tempb\expandafter{\@tempa}%
+    \advance\paramno by 1\relax
+  \fi
+  \next
+}
+
+% Trailing missing arguments are set to empty.
+% 
+\def\setemptyargvalues@{%
+  \ifx\paramlist\nilm@
+    \let\next\macargexpandinbody@
+  \else
+    \expandafter\setemptyargvaluesparser@\paramlist\endargs@
+    \let\next\setemptyargvalues@
+  \fi
+  \next
+}
+
+\def\setemptyargvaluesparser@#1,#2\endargs@{%
+  \expandafter\def\expandafter\@tempa\expandafter{%
+    \expandafter\def\csname macarg.#1\endcsname{}}%
+  \push@\@tempa\macargdeflist@
+  \def\paramlist{#2}%
+}
+
+% #1 is the element target macro
+% #2 is the list macro
+% #3,#4\endargs@ is the list value
+\def\pop@#1#2#3,#4\endargs@{%
+   \def#1{#3}%
+   \def#2{#4}%
+}
+\long\def\longpop@#1#2#3,#4\endargs@{%
+   \long\def#1{#3}%
+   \long\def#2{#4}%
+}
+
+
+%%%%%%%%%%%%%% End of code for > 10 arguments %%%%%%%%%%%%%%%%%%
+
+
+% This defines a Texinfo @macro or @rmacro, called by \parsemacbody.
+%    \macrobody has the body of the macro in it, with placeholders for
+% its parameters, looking like "\xeatspaces{\hash 1}".
+%    \paramno is the number of parameters
+%    \paramlist is a TeX parameter text, e.g. "#1,#2,#3,"
+% There are four cases: macros of zero, one, up to nine, and many arguments.
+% \xdef is used so that macro definitions will survive the file
+% they're defined in: @include reads the file inside a group.
+%
+\def\defmacro{%
+  \let\hash=##% convert placeholders to macro parameter chars
+  \ifnum\paramno=1
+    \def\xeatspaces##1{##1}%
+    % This removes the pair of braces around the argument.  We don't
+    % use \eatspaces, because this can cause ends of lines to be lost
+    % when the argument to \eatspaces is read, leading to line-based
+    % commands like "@itemize" not being read correctly.
+  \else
+    \let\xeatspaces\relax % suppress expansion
+  \fi
+  \ifcase\paramno
+  % 0
+    \expandafter\xdef\csname\the\macname\endcsname{%
+      \bgroup
+        \noexpand\spaceisspace
+        \noexpand\endlineisspace
+        \noexpand\expandafter % skip any whitespace after the macro name.
+        \expandafter\noexpand\csname\the\macname @@@\endcsname}%
+    \expandafter\xdef\csname\the\macname @@@\endcsname{%
+      \egroup
+      \noexpand\scanmacro{\macrobody}}%
+  \or % 1
+    \expandafter\xdef\csname\the\macname\endcsname{%
+       \bgroup
+       \noexpand\braceorline
+       \expandafter\noexpand\csname\the\macname @@@\endcsname}%
+    \expandafter\xdef\csname\the\macname @@@\endcsname##1{%
+      \egroup
+      \noexpand\scanmacro{\macrobody}%
+      }%
+  \else % at most 9
+    \ifnum\paramno<10\relax
+      % @MACNAME sets the context for reading the macro argument
+      % @MACNAME@@ gets the argument, processes backslashes and appends a 
+      % comma.
+      % @MACNAME@@@ removes braces surrounding the argument list.
+      % @MACNAME@@@@ scans the macro body with arguments substituted.
+      \expandafter\xdef\csname\the\macname\endcsname{%
+        \bgroup
+        \noexpand\expandafter  % This \expandafter skip any spaces after the
+        \noexpand\macroargctxt % macro before we change the catcode of space.
+        \noexpand\expandafter
+        \expandafter\noexpand\csname\the\macname @@\endcsname}%
+      \expandafter\xdef\csname\the\macname @@\endcsname##1{%
+          \noexpand\passargtomacro
+          \expandafter\noexpand\csname\the\macname @@@\endcsname{##1,}}%
+      \expandafter\xdef\csname\the\macname @@@\endcsname##1{%
+          \expandafter\noexpand\csname\the\macname @@@@\endcsname ##1}%
+      \expandafter\expandafter
+      \expandafter\xdef
+      \expandafter\expandafter
+        \csname\the\macname @@@@\endcsname\paramlist{%
+          \egroup\noexpand\scanmacro{\macrobody}}%
+    \else % 10 or more:
+      \expandafter\xdef\csname\the\macname\endcsname{%
+        \noexpand\getargvals@{\the\macname}{\argl}%
+      }%
+      \global\expandafter\let\csname mac.\the\macname .body\endcsname\macrobody
+      \global\expandafter\let\csname mac.\the\macname .recurse\endcsname\gobble
+    \fi
+  \fi}
+
+\catcode `\@\texiatcatcode\relax % end private-to-Texinfo catcodes
+
+\def\norecurse#1{\bgroup\cslet{#1}{macsave.#1}}
+
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+{\catcode`\@=0 \catcode`\\=13  % We need to manipulate \ so use @ as escape
+@catcode`@_=11  % private names
+@catcode`@!=11  % used as argument separator
+
+% \passargtomacro#1#2 -
+% Call #1 with a list of tokens #2, with any doubled backslashes in #2
+% compressed to one.
+%
+% This implementation works by expansion, and not execution (so we cannot use 
+% \def or similar).  This reduces the risk of this failing in contexts where 
+% complete expansion is done with no execution (for example, in writing out to 
+% an auxiliary file for an index entry).
+% 
+% State is kept in the input stream: the argument passed to
+% @look_ahead, @gobble_and_check_finish and @add_segment is
+%
+% THE_MACRO ARG_RESULT ! {PENDING_BS} NEXT_TOKEN  (... rest of input)
+%
+% where:
+% THE_MACRO - name of the macro we want to call
+% ARG_RESULT - argument list we build to pass to that macro
+% PENDING_BS - either a backslash or nothing
+% NEXT_TOKEN - used to look ahead in the input stream to see what's coming next
+
+@gdef@passargtomacro#1#2{%
+  @add_segment #1!{}@relax#2\@_finish\%
+}
+@gdef@_finish{@_finishx} @global@let@_finishx@relax
+
+% #1 - THE_MACRO ARG_RESULT
+% #2 - PENDING_BS
+% #3 - NEXT_TOKEN
+% #4 used to look ahead
+%
+% If the next token is not a backslash, process the rest of the argument; 
+% otherwise, remove the next token.
+@gdef@look_ahead#1!#2#3#4{%
+  @ifx#4\%
+   @expandafter@gobble_and_check_finish 
+  @else
+   @expandafter@add_segment
+  @fi#1!{#2}#4#4%
+}
+
+% #1 - THE_MACRO ARG_RESULT
+% #2 - PENDING_BS
+% #3 - NEXT_TOKEN
+% #4 should be a backslash, which is gobbled.
+% #5 looks ahead
+%
+% Double backslash found.  Add a single backslash, and look ahead.
+@gdef@gobble_and_check_finish#1!#2#3#4#5{%
+  @add_segment#1\!{}#5#5%
+}
+
+@gdef@is_fi{@fi}
+
+% #1 - THE_MACRO ARG_RESULT
+% #2 - PENDING_BS
+% #3 - NEXT_TOKEN
+% #4 is input stream until next backslash
+%
+% Input stream is either at the start of the argument, or just after a 
+% backslash sequence, either a lone backslash, or a doubled backslash.  
+% NEXT_TOKEN contains the first token in the input stream: if it is \finish, 
+% finish; otherwise, append to ARG_RESULT the segment of the argument up until
+% the next backslash.  PENDING_BACKSLASH contains a backslash to represent
+% a backslash just before the start of the input stream that has not been
+% added to ARG_RESULT.
+@gdef@add_segment#1!#2#3#4\{%
+@ifx#3@_finish
+  @call_the_macro#1!%
+@else
+  % append the pending backslash to the result, followed by the next segment
+  @expandafter@is_fi@look_ahead#1#2#4!{\}@fi
+  % this @fi is discarded by @look_ahead.
+  % we can't get rid of it with \expandafter because we don't know how 
+  % long #4 is.
+}
+
+% #1 - THE_MACRO
+% #2 - ARG_RESULT
+% #3 discards the res of the conditional in @add_segment, and @is_fi ends the 
+% conditional.
+@gdef@call_the_macro#1#2!#3@fi{@is_fi #1{#2}}
+
+}
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% \braceorline MAC is used for a one-argument macro MAC.  It checks
+% whether the next non-whitespace character is a {.  It sets the context
+% for reading the argument (slightly different in the two cases).  Then,
+% to read the argument, in the whole-line case, it then calls the regular
+% \parsearg MAC; in the lbrace case, it calls \passargtomacro MAC.
+% 
+\def\braceorline#1{\let\macnamexxx=#1\futurelet\nchar\braceorlinexxx}
+\def\braceorlinexxx{%
+  \ifx\nchar\bgroup
+    \macroargctxt
+    \expandafter\passargtomacro
+  \else
+    \macrolineargctxt\expandafter\parsearg
+  \fi \macnamexxx}
+
+
+% @alias.
+% We need some trickery to remove the optional spaces around the equal
+% sign.  Make them active and then expand them all to nothing.
+%
+\def\alias{\parseargusing\obeyspaces\aliasxxx}
+\def\aliasxxx #1{\aliasyyy#1\relax}
+\def\aliasyyy #1=#2\relax{%
+  {%
+    \expandafter\let\obeyedspace=\empty
+    \addtomacrolist{#1}%
+    \xdef\next{\global\let\makecsname{#1}=\makecsname{#2}}%
+  }%
+  \next
+}
+
+
+\message{cross references,}
+
+\newwrite\auxfile
+\newif\ifhavexrefs    % True if xref values are known.
+\newif\ifwarnedxrefs  % True if we warned once that they aren't known.
+
+% @inforef is relatively simple.
+\def\inforef #1{\inforefzzz #1,,,,**}
+\def\inforefzzz #1,#2,#3,#4**{%
+  \putwordSee{} \putwordInfo{} \putwordfile{} \file{\ignorespaces #3{}},
+  node \samp{\ignorespaces#1{}}}
+
+% @node's only job in TeX is to define \lastnode, which is used in
+% cross-references.  The @node line might or might not have commas, and
+% might or might not have spaces before the first comma, like:
+% @node foo , bar , ...
+% We don't want such trailing spaces in the node name.
+%
+\parseargdef\node{\checkenv{}\donode #1 ,\finishnodeparse}
+%
+% also remove a trailing comma, in case of something like this:
+% @node Help-Cross,  ,  , Cross-refs
+\def\donode#1 ,#2\finishnodeparse{\dodonode #1,\finishnodeparse}
+\def\dodonode#1,#2\finishnodeparse{\gdef\lastnode{#1}\omittopnode}
+
+% Used so that the @top node doesn't have to be wrapped in an @ifnottex
+% conditional.
+% \doignore goes to more effort to skip nested conditionals but we don't need 
+% that here.
+\def\omittopnode{%
+   \ifx\lastnode\wordTop
+   \expandafter\ignorenode\fi
+}
+\def\wordTop{Top}
+
+% Until the next @node or @bye command, divert output to a box that is not 
+% output.
+\def\ignorenode{\setbox\dummybox\vbox\bgroup\def\node{\egroup\node}%
+\ignorenodebye
+}
+
+{\let\bye\relax
+\gdef\ignorenodebye{\let\bye\ignorenodebyedef}
+\gdef\ignorenodebyedef{\egroup(`Top' node ignored)\bye}}
+% The redefinition of \bye here is because it is declared \outer
+
+\let\lastnode=\empty
+
+% Write a cross-reference definition for the current node.  #1 is the
+% type (Ynumbered, Yappendix, Ynothing).
+%
+\def\donoderef#1{%
+  \ifx\lastnode\empty\else
+    \setref{\lastnode}{#1}%
+    \global\let\lastnode=\empty
+  \fi
+}
+
+% @anchor{NAME} -- define xref target at arbitrary point.
+%
+\newcount\savesfregister
+%
+\def\savesf{\relax \ifhmode \savesfregister=\spacefactor \fi}
+\def\restoresf{\relax \ifhmode \spacefactor=\savesfregister \fi}
+\def\anchor#1{\savesf \setref{#1}{Ynothing}\restoresf \ignorespaces}
+
+% \setref{NAME}{SNT} defines a cross-reference point NAME (a node or an
+% anchor), which consists of three parts:
+% 1) NAME-title - the current sectioning name taken from \currentsection,
+%                 or the anchor name.
+% 2) NAME-snt   - section number and type, passed as the SNT arg, or
+%                 empty for anchors.
+% 3) NAME-pg    - the page number.
+%
+% This is called from \donoderef, \anchor, and \dofloat.  In the case of
+% floats, there is an additional part, which is not written here:
+% 4) NAME-lof   - the text as it should appear in a @listoffloats.
+%
+\def\setref#1#2{%
+  \pdfmkdest{#1}%
+  \iflinks
+    {%
+      \requireauxfile
+      \atdummies  % preserve commands, but don't expand them
+      % match definition in \xrdef, \refx, \xrefX.
+      \def\value##1{##1}%
+      \edef\writexrdef##1##2{%
+	\write\auxfile{@xrdef{#1-% #1 of \setref, expanded by the \edef
+	  ##1}{##2}}% these are parameters of \writexrdef
+      }%
+      \toks0 = \expandafter{\currentsection}%
+      \immediate \writexrdef{title}{\the\toks0 }%
+      \immediate \writexrdef{snt}{\csname #2\endcsname}% \Ynumbered etc.
+      \safewhatsit{\writexrdef{pg}{\folio}}% will be written later, at \shipout
+    }%
+  \fi
+}
+
+% @xrefautosectiontitle on|off says whether @section(ing) names are used
+% automatically in xrefs, if the third arg is not explicitly specified.
+% This was provided as a "secret" @set xref-automatic-section-title
+% variable, now it's official.
+% 
+\parseargdef\xrefautomaticsectiontitle{%
+  \def\temp{#1}%
+  \ifx\temp\onword
+    \expandafter\let\csname SETxref-automatic-section-title\endcsname
+      = \empty
+  \else\ifx\temp\offword
+    \expandafter\let\csname SETxref-automatic-section-title\endcsname
+      = \relax
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @xrefautomaticsectiontitle value `\temp',
+                must be on|off}%
+  \fi\fi
+}
+
+% 
+% @xref, @pxref, and @ref generate cross-references.  For \xrefX, #1 is
+% the node name, #2 the name of the Info cross-reference, #3 the printed
+% node name, #4 the name of the Info file, #5 the name of the printed
+% manual.  All but the node name can be omitted.
+%
+%MODIFIED
+\def\pxref{\xrefXX} %\def\pxref{\putwordsee{} \xrefXX}
+\def\xref{\xrefXX}  %\def\xref{\putwordSee{} \xrefXX}
+\def\ref{\xrefXX}
+
+\def\xrefXX#1{\def\xrefXXarg{#1}\futurelet\tokenafterxref\xrefXXX}
+\def\xrefXXX{\expandafter\xrefX\expandafter[\xrefXXarg,,,,,,,]}
+%
+\newbox\toprefbox
+\newbox\printedrefnamebox
+\newbox\infofilenamebox
+\newbox\printedmanualbox
+%
+\def\xrefX[#1,#2,#3,#4,#5,#6]{\begingroup
+  \unsepspaces
+  %
+  % Get args without leading/trailing spaces.
+  \def\printedrefname{\ignorespaces #3}%
+  \setbox\printedrefnamebox = \hbox{\printedrefname\unskip}%
+  %
+  \def\infofilename{\ignorespaces #4}%
+  \setbox\infofilenamebox = \hbox{\infofilename\unskip}%
+  %
+  \def\printedmanual{\ignorespaces #5}%
+  \setbox\printedmanualbox  = \hbox{\printedmanual\unskip}%
+  %
+  % If the printed reference name (arg #3) was not explicitly given in
+  % the @xref, figure out what we want to use.
+  \ifdim \wd\printedrefnamebox = 0pt
+    % No printed node name was explicitly given.
+    \expandafter\ifx\csname SETxref-automatic-section-title\endcsname \relax
+      % Not auto section-title: use node name inside the square brackets.
+      \def\printedrefname{\ignorespaces #1}%
+    \else
+      % Auto section-title: use chapter/section title inside
+      % the square brackets if we have it.
+      \ifdim \wd\printedmanualbox > 0pt
+        % It is in another manual, so we don't have it; use node name.
+        \def\printedrefname{\ignorespaces #1}%
+      \else
+        \ifhavexrefs
+          % We (should) know the real title if we have the xref values.
+          \def\printedrefname{\refx{#1-title}}%
+        \else
+          % Otherwise just copy the Info node name.
+          \def\printedrefname{\ignorespaces #1}%
+        \fi%
+      \fi
+    \fi
+  \fi
+  %
+  % Make link in pdf output.
+  \ifpdf
+    % For pdfTeX and LuaTeX
+    {\indexnofonts
+     \makevalueexpandable
+     \turnoffactive
+     % This expands tokens, so do it after making catcode changes, so _
+     % etc. don't get their TeX definitions.  This ignores all spaces in
+     % #4, including (wrongly) those in the middle of the filename.
+     \getfilename{#4}%
+     %
+     % This (wrongly) does not take account of leading or trailing
+     % spaces in #1, which should be ignored.
+     \setpdfdestname{#1}%
+     %
+     \ifx\pdfdestname\empty
+       \def\pdfdestname{Top}% no empty targets
+     \fi
+     %
+     \leavevmode
+     \startlink attr{/Border [0 0 0]}%
+     \ifnum\filenamelength>0
+       goto file{\the\filename.pdf} name{\pdfdestname}%
+     \else
+       goto name{\pdfmkpgn{\pdfdestname}}%
+     \fi
+    }%
+    \setcolor{\linkcolor}%
+  \else
+    \ifx\XeTeXrevision\thisisundefined
+    \else
+      % For XeTeX
+      {\indexnofonts
+       \makevalueexpandable
+       \turnoffactive
+       % This expands tokens, so do it after making catcode changes, so _
+       % etc. don't get their TeX definitions.  This ignores all spaces in
+       % #4, including (wrongly) those in the middle of the filename.
+       \getfilename{#4}%
+       %
+       % This (wrongly) does not take account of leading or trailing
+       % spaces in #1, which should be ignored.
+       \setpdfdestname{#1}%
+       %
+       \ifx\pdfdestname\empty
+         \def\pdfdestname{Top}% no empty targets
+       \fi
+       %
+       \leavevmode
+       \ifnum\filenamelength>0
+         % With default settings,
+         % XeTeX (xdvipdfmx) replaces link destination names with integers.
+         % In this case, the replaced destination names of
+         % remote PDFs are no longer known.  In order to avoid a replacement,
+         % you can use xdvipdfmx's command line option `-C 0x0010'.
+         % If you use XeTeX 0.99996+ (TeX Live 2016+),
+         % this command line option is no longer necessary
+         % because we can use the `dvipdfmx:config' special.
+         \special{pdf:bann << /Border [0 0 0] /Type /Annot /Subtype /Link /A
+           << /S /GoToR /F (\the\filename.pdf) /D (\pdfdestname) >> >>}%
+       \else
+         \special{pdf:bann << /Border [0 0 0] /Type /Annot /Subtype /Link /A
+           << /S /GoTo /D (\pdfdestname) >> >>}%
+       \fi
+      }%
+      \setcolor{\linkcolor}%
+    \fi
+  \fi
+  {%
+    % Have to otherify everything special to allow the \csname to
+    % include an _ in the xref name, etc.
+    \indexnofonts
+    \turnoffactive
+    \def\value##1{##1}%
+    \expandafter\global\expandafter\let\expandafter\Xthisreftitle
+      \csname XR#1-title\endcsname
+  }%
+  %
+  % Float references are printed completely differently: "Figure 1.2"
+  % instead of "[somenode], p.3".  \iffloat distinguishes them by
+  % \Xthisreftitle being set to a magic string.
+  \iffloat\Xthisreftitle
+    % If the user specified the print name (third arg) to the ref,
+    % print it instead of our usual "Figure 1.2".
+    \ifdim\wd\printedrefnamebox = 0pt
+      \refx{#1-snt}%
+    \else
+      \printedrefname
+    \fi
+    %
+    % If the user also gave the printed manual name (fifth arg), append
+    % "in MANUALNAME".
+    \ifdim \wd\printedmanualbox > 0pt
+      \space \putwordin{} \cite{\printedmanual}%
+    \fi
+  \else
+    % node/anchor (non-float) references.
+    % 
+    % If we use \unhbox to print the node names, TeX does not insert
+    % empty discretionaries after hyphens, which means that it will not
+    % find a line break at a hyphen in a node names.  Since some manuals
+    % are best written with fairly long node names, containing hyphens,
+    % this is a loss.  Therefore, we give the text of the node name
+    % again, so it is as if TeX is seeing it for the first time.
+    % 
+    \ifdim \wd\printedmanualbox > 0pt
+      % Cross-manual reference with a printed manual name.
+      % 
+      \crossmanualxref{\cite{\printedmanual\unskip}}%
+    %
+    \else\ifdim \wd\infofilenamebox > 0pt
+      % Cross-manual reference with only an info filename (arg 4), no
+      % printed manual name (arg 5).  This is essentially the same as
+      % the case above; we output the filename, since we have nothing else.
+      % 
+      \crossmanualxref{\code{\infofilename\unskip}}%
+    %
+    \else
+      % Reference within this manual.
+      %
+      % Only output a following space if the -snt ref is nonempty, as the ref
+      % will be empty for @unnumbered and @anchor.
+      \setbox2 = \hbox{\ignorespaces \refx{#1-snt}}%
+      \ifdim \wd2 > 0pt \refx{#1-snt}\space\fi
+      %
+      % output the `[mynode]' via the macro below so it can be overridden.
+      \xrefprintnodename\printedrefname
+      %
+      \expandafter\ifx\csname SETtxiomitxrefpg\endcsname\relax
+        % But we always want a comma and a space:
+        ,\space
+        %
+        % output the `page 3'.
+        \turnoffactive \putwordpage\tie\refx{#1-pg}%
+        % Add a , if xref followed by a space
+        \if\space\noexpand\tokenafterxref ,%
+        \else\ifx\	\tokenafterxref ,% @TAB
+        \else\ifx\*\tokenafterxref ,%   @*
+        \else\ifx\ \tokenafterxref ,%   @SPACE
+        \else\ifx\
+                  \tokenafterxref ,%    @NL
+        \else\ifx\tie\tokenafterxref ,% @tie
+        \fi\fi\fi\fi\fi\fi
+        %MODIFIED
+        \putwordSeeSuf{}。
+      \fi
+    \fi\fi
+  \fi
+  \endlink
+\endgroup}
+
+% Output a cross-manual xref to #1.  Used just above (twice).
+% 
+% Only include the text "Section ``foo'' in" if the foo is neither
+% missing or Top.  Thus, @xref{,,,foo,The Foo Manual} outputs simply
+% "see The Foo Manual", the idea being to refer to the whole manual.
+% 
+% But, this being TeX, we can't easily compare our node name against the
+% string "Top" while ignoring the possible spaces before and after in
+% the input.  By adding the arbitrary 7sp below, we make it much less
+% likely that a real node name would have the same width as "Top" (e.g.,
+% in a monospaced font).  Hopefully it will never happen in practice.
+% 
+% For the same basic reason, we retypeset the "Top" at every
+% reference, since the current font is indeterminate.
+% 
+\def\crossmanualxref#1{%
+  \setbox\toprefbox = \hbox{Top\kern7sp}%
+  \setbox2 = \hbox{\ignorespaces \printedrefname \unskip \kern7sp}%
+  \ifdim \wd2 > 7sp  % nonempty?
+    \ifdim \wd2 = \wd\toprefbox \else  % same as Top?
+      \putwordSection{} ``\printedrefname'' \putwordin{}\space
+    \fi
+  \fi
+  #1%
+}
+
+% This macro is called from \xrefX for the `[nodename]' part of xref
+% output.  It's a separate macro only so it can be changed more easily,
+% since square brackets don't work well in some documents.  Particularly
+% one that Bob is working on :).
+%
+%MODIFIED
+\def\xrefprintnodename#1{「#1」}
+
+% Things referred to by \setref.
+%
+\def\Ynothing{}
+\def\Yomitfromtoc{}
+%MODIFIED
+\def\Ynumbered{%
+  \ifnum\secno=0
+    \putwordChapterPre\the\chapno \putwordChapterSuf{}%
+  \else \ifnum\subsecno=0
+    \putwordSectionPre\the\chapno.\the\secno \putwordSectionSuf{}%
+  \else \ifnum\subsubsecno=0
+    \putwordSectionPre\the\chapno.\the\secno.\the\subsecno \putwordSectionSuf{}%
+  \else
+    \putwordSectionPre\the\chapno.\the\secno.\the\subsecno.\the\subsubsecno \putwordSectionSuf{}%
+  \fi\fi\fi
+}
+%MODIFIED
+\def\Yappendix{%
+  \ifnum\secno=0
+     \putwordAppendixPre@char\the\appendixno{} \putwordAppendixChapterSuf{}%
+  \else \ifnum\subsecno=0
+     \putwordSectionPre@char\the\appendixno.\the\secno \putwordSectionSuf{}%
+  \else \ifnum\subsubsecno=0
+    \putwordSectionPre@char\the\appendixno.\the\secno.\the\subsecno \putwordSectionSuf{}%
+  \else
+    \putwordSectionPre%
+      @char\the\appendixno.\the\secno.\the\subsecno.\the\subsubsecno \putwordSectionSuf{}%
+  \fi\fi\fi
+}
+
+% \refx{NAME} - reference a cross-reference string named NAME.
+\def\refx#1{%
+  \requireauxfile
+  {%
+    \indexnofonts
+    \turnoffactive
+    \def\value##1{##1}%
+    \expandafter\global\expandafter\let\expandafter\thisrefX
+      \csname XR#1\endcsname
+  }%
+  \ifx\thisrefX\relax
+    % If not defined, say something at least.
+    \angleleft un\-de\-fined\angleright
+    \iflinks
+      \ifhavexrefs
+        {\toks0 = {#1}% avoid expansion of possibly-complex value
+         \message{\linenumber Undefined cross reference `\the\toks0'.}}%
+      \else
+        \ifwarnedxrefs\else
+          \global\warnedxrefstrue
+          \message{Cross reference values unknown; you must run TeX again.}%
+        \fi
+      \fi
+    \fi
+  \else
+    % It's defined, so just use it.
+    \thisrefX
+  \fi
+}
+
+% This is the macro invoked by entries in the aux file.  Define a control 
+% sequence for a cross-reference target (we prepend XR to the control sequence 
+% name to avoid collisions).  The value is the page number.  If this is a float 
+% type, we have more work to do.
+%
+\def\xrdef#1#2{%
+  {% Expand the node or anchor name to remove control sequences.
+   % \turnoffactive stops 8-bit characters being changed to commands
+   % like @'e.  \refx does the same to retrieve the value in the definition.
+    \indexnofonts
+    \turnoffactive
+    \def\value##1{##1}%
+    \xdef\safexrefname{#1}%
+  }%
+  %
+  \bgroup
+    \expandafter\gdef\csname XR\safexrefname\endcsname{#2}%
+  \egroup
+  % We put the \gdef inside a group to avoid the definitions building up on 
+  % TeX's save stack, which can cause it to run out of space for aux files with 
+  % thousands of lines.  \gdef doesn't use the save stack, but \csname does
+  % when it defines an unknown control sequence as \relax. 
+  %
+  % Was that xref control sequence that we just defined for a float?
+  \expandafter\iffloat\csname XR\safexrefname\endcsname
+    % it was a float, and we have the (safe) float type in \iffloattype.
+    \expandafter\let\expandafter\floatlist
+      \csname floatlist\iffloattype\endcsname
+    %
+    % Is this the first time we've seen this float type?
+    \expandafter\ifx\floatlist\relax
+      \toks0 = {\do}% yes, so just \do
+    \else
+      % had it before, so preserve previous elements in list.
+      \toks0 = \expandafter{\floatlist\do}%
+    \fi
+    %
+    % Remember this xref in the control sequence \floatlistFLOATTYPE,
+    % for later use in \listoffloats.
+    \expandafter\xdef\csname floatlist\iffloattype\endcsname{\the\toks0
+      {\safexrefname}}%
+  \fi
+}
+
+% If working on a large document in chapters, it is convenient to
+% be able to disable indexing, cross-referencing, and contents, for test runs.
+% This is done with @novalidate at the beginning of the file.
+%
+\newif\iflinks \linkstrue % by default we want the aux files.
+\let\novalidate = \linksfalse
+
+% Used when writing to the aux file, or when using data from it.
+\def\requireauxfile{%
+  \iflinks
+    \tryauxfile
+    % Open the new aux file.  TeX will close it automatically at exit.
+    \immediate\openout\auxfile=\jobname.aux
+  \fi
+  \global\let\requireauxfile=\relax   % Only do this once.
+}
+
+% Read the last existing aux file, if any.  No error if none exists.
+%
+\def\tryauxfile{%
+  \openin 1 \jobname.aux
+  \ifeof 1 \else
+    \readdatafile{aux}%
+    \global\havexrefstrue
+  \fi
+  \closein 1
+}
+
+\def\setupdatafile{%
+  \catcode`\^^@=\other
+  \catcode`\^^A=\other
+  \catcode`\^^B=\other
+  \catcode`\^^C=\other
+  \catcode`\^^D=\other
+  \catcode`\^^E=\other
+  \catcode`\^^F=\other
+  \catcode`\^^G=\other
+  \catcode`\^^H=\other
+  \catcode`\^^K=\other
+  \catcode`\^^L=\other
+  \catcode`\^^N=\other
+  \catcode`\^^P=\other
+  \catcode`\^^Q=\other
+  \catcode`\^^R=\other
+  \catcode`\^^S=\other
+  \catcode`\^^T=\other
+  \catcode`\^^U=\other
+  \catcode`\^^V=\other
+  \catcode`\^^W=\other
+  \catcode`\^^X=\other
+  \catcode`\^^Z=\other
+  \catcode`\^^[=\other
+  \catcode`\^^\=\other
+  \catcode`\^^]=\other
+  \catcode`\^^^=\other
+  \catcode`\^^_=\other
+  \catcode`\^=\other
+  %
+  % Special characters.  Should be turned off anyway, but...
+  \catcode`\~=\other
+  \catcode`\[=\other
+  \catcode`\]=\other
+  \catcode`\"=\other
+  \catcode`\_=\active
+  \catcode`\|=\active
+  \catcode`\<=\active
+  \catcode`\>=\active
+  \catcode`\$=\other
+  \catcode`\#=\other
+  \catcode`\&=\other
+  \catcode`\%=\other
+  \catcode`+=\other % avoid \+ for paranoia even though we've turned it off
+  %
+  \catcode`\\=\active
+  %
+  % @ is our escape character in .aux files, and we need braces.
+  \catcode`\{=1
+  \catcode`\}=2
+  \catcode`\@=0
+}
+
+\def\readdatafile#1{%
+\begingroup
+  \setupdatafile
+  \input\jobname.#1
+\endgroup}
+
+
+\message{insertions,}
+% including footnotes.
+
+\newcount \footnoteno
+
+% The trailing space in the following definition for supereject is
+% vital for proper filling; pages come out unaligned when you do a
+% pagealignmacro call if that space before the closing brace is
+% removed. (Generally, numeric constants should always be followed by a
+% space to prevent strange expansion errors.)
+\def\supereject{\par\penalty -20000\footnoteno =0 }
+
+% @footnotestyle is meaningful for Info output only.
+\let\footnotestyle=\comment
+
+{\catcode `\@=11
+%
+% Auto-number footnotes.  Otherwise like plain.
+\gdef\footnote{%
+  \global\advance\footnoteno by \@ne
+  \edef\thisfootno{$^{\the\footnoteno}$}%
+  %
+  % In case the footnote comes at the end of a sentence, preserve the
+  % extra spacing after we do the footnote number.
+  \let\@sf\empty
+  \ifhmode\edef\@sf{\spacefactor\the\spacefactor}\ptexslash\fi
+  %
+  % Remove inadvertent blank space before typesetting the footnote number.
+  \unskip
+  \thisfootno\@sf
+  \dofootnote
+}%
+
+% Don't bother with the trickery in plain.tex to not require the
+% footnote text as a parameter.  Our footnotes don't need to be so general.
+%
+% Oh yes, they do; otherwise, @ifset (and anything else that uses
+% \parseargline) fails inside footnotes because the tokens are fixed when
+% the footnote is read.  --karl, 16nov96.
+%
+\gdef\dofootnote{%
+  \insert\footins\bgroup
+  %
+  % Nested footnotes are not supported in TeX, that would take a lot
+  % more work.  (\startsavinginserts does not suffice.)
+  \let\footnote=\errfootnotenest
+  %
+  % We want to typeset this text as a normal paragraph, even if the
+  % footnote reference occurs in (for example) a display environment.
+  % So reset some parameters.
+  \hsize=\txipagewidth
+  \interlinepenalty\interfootnotelinepenalty
+  \splittopskip\ht\strutbox % top baseline for broken footnotes
+  \splitmaxdepth\dp\strutbox
+  \floatingpenalty\@MM
+  \leftskip\z@skip
+  \rightskip\z@skip
+  \spaceskip\z@skip
+  \xspaceskip\z@skip
+  \parindent\defaultparindent
+  %
+  \smallfonts \rm
+  %
+  % Because we use hanging indentation in footnotes, a @noindent appears
+  % to exdent this text, so make it be a no-op.  makeinfo does not use
+  % hanging indentation so @noindent can still be needed within footnote
+  % text after an @example or the like (not that this is good style).
+  \let\noindent = \relax
+  %
+  % Hang the footnote text off the number.  Use \everypar in case the
+  % footnote extends for more than one paragraph.
+  \everypar = {\hang}%
+  \textindent{\thisfootno}%
+  %
+  % Don't crash into the line above the footnote text.  Since this
+  % expands into a box, it must come within the paragraph, lest it
+  % provide a place where TeX can split the footnote.
+  \footstrut
+  %
+  % Invoke rest of plain TeX footnote routine.
+  \futurelet\next\fo@t
+}
+}%end \catcode `\@=11
+
+\def\errfootnotenest{%
+  \errhelp=\EMsimple
+  \errmessage{Nested footnotes not supported in texinfo.tex,
+    even though they work in makeinfo; sorry}
+}
+
+\def\errfootnoteheading{%
+  \errhelp=\EMsimple
+  \errmessage{Footnotes in chapters, sections, etc., are not supported}
+}
+
+% In case a @footnote appears in a vbox, save the footnote text and create
+% the real \insert just after the vbox finished.  Otherwise, the insertion
+% would be lost.
+% Similarly, if a @footnote appears inside an alignment, save the footnote
+% text to a box and make the \insert when a row of the table is finished.
+% And the same can be done for other insert classes.  --kasal, 16nov03.
+%
+% Replace the \insert primitive by a cheating macro.
+% Deeper inside, just make sure that the saved insertions are not spilled
+% out prematurely.
+%
+\def\startsavinginserts{%
+  \ifx \insert\ptexinsert
+    \let\insert\saveinsert
+  \else
+    \let\checkinserts\relax
+  \fi
+}
+
+% This \insert replacement works for both \insert\footins{foo} and
+% \insert\footins\bgroup foo\egroup, but it doesn't work for \insert27{foo}.
+%
+\def\saveinsert#1{%
+  \edef\next{\noexpand\savetobox \makeSAVEname#1}%
+  \afterassignment\next
+  % swallow the left brace
+  \let\temp =
+}
+\def\makeSAVEname#1{\makecsname{SAVE\expandafter\gobble\string#1}}
+\def\savetobox#1{\global\setbox#1 = \vbox\bgroup \unvbox#1}
+
+\def\checksaveins#1{\ifvoid#1\else \placesaveins#1\fi}
+
+\def\placesaveins#1{%
+  \ptexinsert \csname\expandafter\gobblesave\string#1\endcsname
+    {\box#1}%
+}
+
+% eat @SAVE -- beware, all of them have catcode \other:
+{
+  \def\dospecials{\do S\do A\do V\do E} \uncatcodespecials  %  ;-)
+  \gdef\gobblesave @SAVE{}
+}
+
+% initialization:
+\def\newsaveins #1{%
+  \edef\next{\noexpand\newsaveinsX \makeSAVEname#1}%
+  \next
+}
+\def\newsaveinsX #1{%
+  \csname newbox\endcsname #1%
+  \expandafter\def\expandafter\checkinserts\expandafter{\checkinserts
+    \checksaveins #1}%
+}
+
+% initialize:
+\let\checkinserts\empty
+\newsaveins\footins
+\newsaveins\margin
+
+
+% @image.  We use the macros from epsf.tex to support this.
+% If epsf.tex is not installed and @image is used, we complain.
+%
+% Check for and read epsf.tex up front.  If we read it only at @image
+% time, we might be inside a group, and then its definitions would get
+% undone and the next image would fail.
+\openin 1 = epsf.tex
+\ifeof 1 \else
+  % Do not bother showing banner with epsf.tex v2.7k (available in
+  % doc/epsf.tex and on ctan).
+  \def\epsfannounce{\toks0 = }%
+  \input epsf.tex
+\fi
+\closein 1
+%
+% We will only complain once about lack of epsf.tex.
+\newif\ifwarnednoepsf
+\newhelp\noepsfhelp{epsf.tex must be installed for images to
+  work.  It is also included in the Texinfo distribution, or you can get
+  it from https://ctan.org/texarchive/macros/texinfo/texinfo/doc/epsf.tex.}
+%
+\def\image#1{%
+  \ifx\epsfbox\thisisundefined
+    \ifwarnednoepsf \else
+      \errhelp = \noepsfhelp
+      \errmessage{epsf.tex not found, images will be ignored}%
+      \global\warnednoepsftrue
+    \fi
+  \else
+    \imagexxx #1,,,,,\finish
+  \fi
+}
+%
+% Arguments to @image:
+% #1 is (mandatory) image filename; we tack on .eps extension.
+% #2 is (optional) width, #3 is (optional) height.
+% #4 is (ignored optional) html alt text.
+% #5 is (ignored optional) extension.
+% #6 is just the usual extra ignored arg for parsing stuff.
+\newif\ifimagevmode
+\def\imagexxx#1,#2,#3,#4,#5,#6\finish{\begingroup
+  \catcode`\^^M = 5     % in case we're inside an example
+  \normalturnoffactive  % allow _ et al. in names
+  \makevalueexpandable
+  % If the image is by itself, center it.
+  \ifvmode
+    \imagevmodetrue
+  \else \ifx\centersub\centerV
+    % for @center @image, we need a vbox so we can have our vertical space
+    \imagevmodetrue
+    \vbox\bgroup % vbox has better behavior than vtop herev
+  \fi\fi
+  %
+  \ifimagevmode
+    \nobreak\medskip
+    % Usually we'll have text after the image which will insert
+    % \parskip glue, so insert it here too to equalize the space
+    % above and below.
+    \nobreak\vskip\parskip
+    \nobreak
+  \fi
+  %
+  % Leave vertical mode so that indentation from an enclosing
+  %  environment such as @quotation is respected.
+  % However, if we're at the top level, we don't want the
+  %  normal paragraph indentation.
+  % On the other hand, if we are in the case of @center @image, we don't
+  %  want to start a paragraph, which will create a hsize-width box and
+  %  eradicate the centering.
+  \ifx\centersub\centerV \else \imageindent \fi
+  %
+  % Output the image.
+  \ifpdf
+    % For pdfTeX and LuaTeX <= 0.80
+    \dopdfimage{#1}{#2}{#3}%
+  \else
+    \ifx\XeTeXrevision\thisisundefined
+      % For epsf.tex
+      % \epsfbox itself resets \epsf?size at each figure.
+      \setbox0 = \hbox{\ignorespaces #2}%
+        \ifdim\wd0 > 0pt \epsfxsize=#2\relax \fi
+      \setbox0 = \hbox{\ignorespaces #3}%
+        \ifdim\wd0 > 0pt \epsfysize=#3\relax \fi
+      \epsfbox{#1.eps}%
+    \else
+      % For XeTeX
+      \doxeteximage{#1}{#2}{#3}%
+    \fi
+  \fi
+  %
+  \ifimagevmode
+    \medskip  % space after a standalone image
+  \fi  
+  \ifx\centersub\centerV \egroup \fi
+\endgroup}
+
+
+% @float FLOATTYPE,LABEL,LOC ... @end float for displayed figures, tables,
+% etc.  We don't actually implement floating yet, we always include the
+% float "here".  But it seemed the best name for the future.
+%
+\envparseargdef\float{\eatcommaspace\eatcommaspace\dofloat#1, , ,\finish}
+
+% There may be a space before second and/or third parameter; delete it.
+\def\eatcommaspace#1, {#1,}
+
+% #1 is the optional FLOATTYPE, the text label for this float, typically
+% "Figure", "Table", "Example", etc.  Can't contain commas.  If omitted,
+% this float will not be numbered and cannot be referred to.
+%
+% #2 is the optional xref label.  Also must be present for the float to
+% be referable.
+%
+% #3 is the optional positioning argument; for now, it is ignored.  It
+% will somehow specify the positions allowed to float to (here, top, bottom).
+%
+% We keep a separate counter for each FLOATTYPE, which we reset at each
+% chapter-level command.
+\let\resetallfloatnos=\empty
+%
+\def\dofloat#1,#2,#3,#4\finish{%
+  \let\thiscaption=\empty
+  \let\thisshortcaption=\empty
+  %
+  % don't lose footnotes inside @float.
+  %
+  % BEWARE: when the floats start float, we have to issue warning whenever an
+  % insert appears inside a float which could possibly float. --kasal, 26may04
+  %
+  \startsavinginserts
+  %
+  % We can't be used inside a paragraph.
+  \par
+  %
+  \vtop\bgroup
+    \def\floattype{#1}%
+    \def\floatlabel{#2}%
+    \def\floatloc{#3}% we do nothing with this yet.
+    %
+    \ifx\floattype\empty
+      \let\safefloattype=\empty
+    \else
+      {%
+        % the floattype might have accents or other special characters,
+        % but we need to use it in a control sequence name.
+        \indexnofonts
+        \turnoffactive
+        \xdef\safefloattype{\floattype}%
+      }%
+    \fi
+    %
+    % If label is given but no type, we handle that as the empty type.
+    \ifx\floatlabel\empty \else
+      % We want each FLOATTYPE to be numbered separately (Figure 1,
+      % Table 1, Figure 2, ...).  (And if no label, no number.)
+      %
+      \expandafter\getfloatno\csname\safefloattype floatno\endcsname
+      \global\advance\floatno by 1
+      %
+      {%
+        % This magic value for \currentsection is output by \setref as the
+        % XREFLABEL-title value.  \xrefX uses it to distinguish float
+        % labels (which have a completely different output format) from
+        % node and anchor labels.  And \xrdef uses it to construct the
+        % lists of floats.
+        %
+        \edef\currentsection{\floatmagic=\safefloattype}%
+        \setref{\floatlabel}{Yfloat}%
+      }%
+    \fi
+    %
+    % start with \parskip glue, I guess.
+    \vskip\parskip
+    %
+    % Don't suppress indentation if a float happens to start a section.
+    \restorefirstparagraphindent
+}
+
+% we have these possibilities:
+% @float Foo,lbl & @caption{Cap}: Foo 1.1: Cap
+% @float Foo,lbl & no caption:    Foo 1.1
+% @float Foo & @caption{Cap}:     Foo: Cap
+% @float Foo & no caption:        Foo
+% @float ,lbl & Caption{Cap}:     1.1: Cap
+% @float ,lbl & no caption:       1.1
+% @float & @caption{Cap}:         Cap
+% @float & no caption:
+%
+\def\Efloat{%
+    \let\floatident = \empty
+    %
+    % In all cases, if we have a float type, it comes first.
+    \ifx\floattype\empty \else \def\floatident{\floattype}\fi
+    %
+    % If we have an xref label, the number comes next.
+    \ifx\floatlabel\empty \else
+      \ifx\floattype\empty \else % if also had float type, need tie first.
+        \appendtomacro\floatident{\tie}%
+      \fi
+      % the number.
+      \appendtomacro\floatident{\chaplevelprefix\the\floatno}%
+    \fi
+    %
+    % Start the printed caption with what we've constructed in
+    % \floatident, but keep it separate; we need \floatident again.
+    \let\captionline = \floatident
+    %
+    \ifx\thiscaption\empty \else
+      \ifx\floatident\empty \else
+        \appendtomacro\captionline{: }% had ident, so need a colon between
+      \fi
+      %
+      % caption text.
+      \appendtomacro\captionline{\scanexp\thiscaption}%
+    \fi
+    %
+    % If we have anything to print, print it, with space before.
+    % Eventually this needs to become an \insert.
+    \ifx\captionline\empty \else
+      \vskip.5\parskip
+      \captionline
+      %
+      % Space below caption.
+      \vskip\parskip
+    \fi
+    %
+    % If have an xref label, write the list of floats info.  Do this
+    % after the caption, to avoid chance of it being a breakpoint.
+    \ifx\floatlabel\empty \else
+      % Write the text that goes in the lof to the aux file as
+      % \floatlabel-lof.  Besides \floatident, we include the short
+      % caption if specified, else the full caption if specified, else nothing.
+      {%
+        \requireauxfile
+        \atdummies
+        %
+        \ifx\thisshortcaption\empty
+          \def\gtemp{\thiscaption}%
+        \else
+          \def\gtemp{\thisshortcaption}%
+        \fi
+        \immediate\write\auxfile{@xrdef{\floatlabel-lof}{\floatident
+          \ifx\gtemp\empty \else : \gtemp \fi}}%
+      }%
+    \fi
+  \egroup  % end of \vtop
+  %
+  \checkinserts
+}
+
+% Append the tokens #2 to the definition of macro #1, not expanding either.
+%
+\def\appendtomacro#1#2{%
+  \expandafter\def\expandafter#1\expandafter{#1#2}%
+}
+
+% @caption, @shortcaption
+%
+\def\caption{\docaption\thiscaption}
+\def\shortcaption{\docaption\thisshortcaption}
+\def\docaption{\checkenv\float \bgroup\scanargctxt\defcaption}
+\def\defcaption#1#2{\egroup \def#1{#2}}
+
+% The parameter is the control sequence identifying the counter we are
+% going to use.  Create it if it doesn't exist and assign it to \floatno.
+\def\getfloatno#1{%
+  \ifx#1\relax
+      % Haven't seen this figure type before.
+      \csname newcount\endcsname #1%
+      %
+      % Remember to reset this floatno at the next chap.
+      \expandafter\gdef\expandafter\resetallfloatnos
+        \expandafter{\resetallfloatnos #1=0 }%
+  \fi
+  \let\floatno#1%
+}
+
+% \setref calls this to get the XREFLABEL-snt value.  We want an @xref
+% to the FLOATLABEL to expand to "Figure 3.1".  We call \setref when we
+% first read the @float command.
+%
+\def\Yfloat{\floattype@tie \chaplevelprefix\the\floatno}%
+
+% Magic string used for the XREFLABEL-title value, so \xrefX can
+% distinguish floats from other xref types.
+\def\floatmagic{!!float!!}
+
+% #1 is the control sequence we are passed; we expand into a conditional
+% which is true if #1 represents a float ref.  That is, the magic
+% \currentsection value which we \setref above.
+%
+\def\iffloat#1{\expandafter\doiffloat#1==\finish}
+%
+% #1 is (maybe) the \floatmagic string.  If so, #2 will be the
+% (safe) float type for this float.  We set \iffloattype to #2.
+%
+\def\doiffloat#1=#2=#3\finish{%
+  \def\temp{#1}%
+  \def\iffloattype{#2}%
+  \ifx\temp\floatmagic
+}
+
+% @listoffloats FLOATTYPE - print a list of floats like a table of contents.
+%
+\parseargdef\listoffloats{%
+  \def\floattype{#1}% floattype
+  {%
+    % the floattype might have accents or other special characters,
+    % but we need to use it in a control sequence name.
+    \indexnofonts
+    \turnoffactive
+    \xdef\safefloattype{\floattype}%
+  }%
+  %
+  % \xrdef saves the floats as a \do-list in \floatlistSAFEFLOATTYPE.
+  \expandafter\ifx\csname floatlist\safefloattype\endcsname \relax
+    \ifhavexrefs
+      % if the user said @listoffloats foo but never @float foo.
+      \message{\linenumber No `\safefloattype' floats to list.}%
+    \fi
+  \else
+    \begingroup
+      \leftskip=\tocindent  % indent these entries like a toc
+      \let\do=\listoffloatsdo
+      \csname floatlist\safefloattype\endcsname
+    \endgroup
+  \fi
+}
+
+% This is called on each entry in a list of floats.  We're passed the
+% xref label, in the form LABEL-title, which is how we save it in the
+% aux file.  We strip off the -title and look up \XRLABEL-lof, which
+% has the text we're supposed to typeset here.
+%
+% Figures without xref labels will not be included in the list (since
+% they won't appear in the aux file).
+%
+\def\listoffloatsdo#1{\listoffloatsdoentry#1\finish}
+\def\listoffloatsdoentry#1-title\finish{{%
+  % Can't fully expand XR#1-lof because it can contain anything.  Just
+  % pass the control sequence.  On the other hand, XR#1-pg is just the
+  % page number, and we want to fully expand that so we can get a link
+  % in pdf output.
+  \toksA = \expandafter{\csname XR#1-lof\endcsname}%
+  %
+  % use the same \entry macro we use to generate the TOC and index.
+  \edef\writeentry{\noexpand\entry{\the\toksA}{\csname XR#1-pg\endcsname}}%
+  \writeentry
+}}
+
+
+\message{localization,}
+
+% For single-language documents, @documentlanguage is usually given very
+% early, just after @documentencoding.  Single argument is the language
+% (de) or locale (de_DE) abbreviation.
+%
+{
+  \catcode`\_ = \active
+  \globaldefs=1
+\parseargdef\documentlanguage{%
+  \tex % read txi-??.tex file in plain TeX.
+    % Read the file by the name they passed if it exists.
+    \let_ = \normalunderscore  % normal _ character for filename test
+    \openin 1 txi-#1.tex
+    \ifeof 1
+      \documentlanguagetrywithoutunderscore #1_\finish
+    \else
+      \globaldefs = 1  % everything in the txi-LL files needs to persist
+      \input txi-#1.tex
+    \fi
+    \closein 1
+  \endgroup % end raw TeX
+}
+%
+% If they passed de_DE, and txi-de_DE.tex doesn't exist,
+% try txi-de.tex.
+%
+\gdef\documentlanguagetrywithoutunderscore#1_#2\finish{%
+  \openin 1 txi-#1.tex
+  \ifeof 1
+    \errhelp = \nolanghelp
+    \errmessage{Cannot read language file txi-#1.tex}%
+  \else
+    \globaldefs = 1  % everything in the txi-LL files needs to persist
+    \input txi-#1.tex
+  \fi
+  \closein 1
+}
+}% end of special _ catcode
+%
+\newhelp\nolanghelp{The given language definition file cannot be found or
+is empty.  Maybe you need to install it?  Putting it in the current
+directory should work if nowhere else does.}
+
+% This macro is called from txi-??.tex files; the first argument is the
+% \language name to set (without the "\lang@" prefix), the second and
+% third args are \{left,right}hyphenmin.
+%
+% The language names to pass are determined when the format is built.
+% See the etex.log file created at that time, e.g.,
+% /usr/local/texlive/2008/texmf-var/web2c/pdftex/etex.log.
+%
+% With TeX Live 2008, etex now includes hyphenation patterns for all
+% available languages.  This means we can support hyphenation in
+% Texinfo, at least to some extent.  (This still doesn't solve the
+% accented characters problem.)
+%
+\catcode`@=11
+\def\txisetlanguage#1#2#3{%
+  % do not set the language if the name is undefined in the current TeX.
+  \expandafter\ifx\csname lang@#1\endcsname \relax
+    \message{no patterns for #1}%
+  \else
+    \global\language = \csname lang@#1\endcsname
+  \fi
+  % but there is no harm in adjusting the hyphenmin values regardless.
+  \global\lefthyphenmin = #2\relax
+  \global\righthyphenmin = #3\relax
+}
+
+% XeTeX and LuaTeX can handle Unicode natively.
+% Their default I/O uses UTF-8 sequences instead of a byte-wise operation.
+% Other TeX engines' I/O (pdfTeX, etc.) is byte-wise.
+%
+\newif\iftxinativeunicodecapable
+\newif\iftxiusebytewiseio
+
+\ifx\XeTeXrevision\thisisundefined
+  \ifx\luatexversion\thisisundefined
+    \txinativeunicodecapablefalse
+    \txiusebytewiseiotrue
+  \else
+    \txinativeunicodecapabletrue
+    \txiusebytewiseiofalse
+  \fi
+\else
+  \txinativeunicodecapabletrue
+  \txiusebytewiseiofalse
+\fi
+
+% Set I/O by bytes instead of UTF-8 sequence for XeTeX and LuaTex
+% for non-UTF-8 (byte-wise) encodings.
+%
+\def\setbytewiseio{%
+  \ifx\XeTeXrevision\thisisundefined
+  \else
+    \XeTeXdefaultencoding "bytes"  % For subsequent files to be read
+    \XeTeXinputencoding "bytes"  % For document root file
+    % Unfortunately, there seems to be no corresponding XeTeX command for
+    % output encoding.  This is a problem for auxiliary index and TOC files.
+    % The only solution would be perhaps to write out @U{...} sequences in
+    % place of non-ASCII characters.
+  \fi
+
+  \ifx\luatexversion\thisisundefined
+  \else
+    \directlua{
+    local utf8_char, byte, gsub = unicode.utf8.char, string.byte, string.gsub
+    local function convert_char (char)
+      return utf8_char(byte(char))
+    end
+
+    local function convert_line (line)
+      return gsub(line, ".", convert_char)
+    end
+
+    callback.register("process_input_buffer", convert_line)
+
+    local function convert_line_out (line)
+      local line_out = ""
+      for c in string.utfvalues(line) do
+         line_out = line_out .. string.char(c)
+      end
+      return line_out
+    end
+
+    callback.register("process_output_buffer", convert_line_out)
+    }
+  \fi
+
+  \txiusebytewiseiotrue
+}
+
+
+% Helpers for encodings.
+% Set the catcode of characters 128 through 255 to the specified number.
+%
+\def\setnonasciicharscatcode#1{%
+   \count255=128
+   \loop\ifnum\count255<256
+      \global\catcode\count255=#1\relax
+      \advance\count255 by 1
+   \repeat
+}
+
+\def\setnonasciicharscatcodenonglobal#1{%
+   \count255=128
+   \loop\ifnum\count255<256
+      \catcode\count255=#1\relax
+      \advance\count255 by 1
+   \repeat
+}
+
+% @documentencoding sets the definition of non-ASCII characters
+% according to the specified encoding.
+%
+\def\documentencoding{\parseargusing\filenamecatcodes\documentencodingzzz}
+\def\documentencodingzzz#1{%
+  %
+  % Encoding being declared for the document.
+  \def\declaredencoding{\csname #1.enc\endcsname}%
+  %
+  % Supported encodings: names converted to tokens in order to be able
+  % to compare them with \ifx.
+  \def\ascii{\csname US-ASCII.enc\endcsname}%
+  \def\latnine{\csname ISO-8859-15.enc\endcsname}%
+  \def\latone{\csname ISO-8859-1.enc\endcsname}%
+  \def\lattwo{\csname ISO-8859-2.enc\endcsname}%
+  \def\utfeight{\csname UTF-8.enc\endcsname}%
+  %
+  \ifx \declaredencoding \ascii
+     \asciichardefs
+  %
+  \else \ifx \declaredencoding \lattwo
+     \iftxinativeunicodecapable
+       \setbytewiseio
+     \fi
+     \setnonasciicharscatcode\active
+     \lattwochardefs
+  %
+  \else \ifx \declaredencoding \latone
+     \iftxinativeunicodecapable
+       \setbytewiseio
+     \fi
+     \setnonasciicharscatcode\active
+     \latonechardefs
+  %
+  \else \ifx \declaredencoding \latnine
+     \iftxinativeunicodecapable
+       \setbytewiseio
+     \fi
+     \setnonasciicharscatcode\active
+     \latninechardefs
+  %
+  \else \ifx \declaredencoding \utfeight
+     \iftxinativeunicodecapable
+       % For native Unicode handling (XeTeX and LuaTeX)
+       \nativeunicodechardefs
+     \else
+       % For treating UTF-8 as byte sequences (TeX, eTeX and pdfTeX)
+       \setnonasciicharscatcode\active
+       % since we already invoked \utfeightchardefs at the top level
+       % (below), do not re-invoke it, otherwise our check for duplicated
+       % definitions gets triggered.  Making non-ascii chars active is
+       % sufficient.
+     \fi
+  %
+  \else
+    \message{Ignoring unknown document encoding: #1.}%
+  %
+  \fi % utfeight
+  \fi % latnine
+  \fi % latone
+  \fi % lattwo
+  \fi % ascii
+  %
+  \ifx\XeTeXrevision\thisisundefined
+  \else
+    \ifx \declaredencoding \utfeight
+    \else
+      \ifx \declaredencoding \ascii
+      \else
+        \message{Warning: XeTeX with non-UTF-8 encodings cannot handle %
+        non-ASCII characters in auxiliary files.}%
+      \fi
+    \fi
+  \fi
+}
+
+% emacs-page
+% A message to be logged when using a character that isn't available
+% the default font encoding (OT1).
+%
+\def\missingcharmsg#1{\message{Character missing, sorry: #1.}}
+
+% Take account of \c (plain) vs. \, (Texinfo) difference.
+\def\cedilla#1{\ifx\c\ptexc\c{#1}\else\,{#1}\fi}
+
+% First, make active non-ASCII characters in order for them to be
+% correctly categorized when TeX reads the replacement text of
+% macros containing the character definitions.
+\setnonasciicharscatcode\active
+%
+
+\def\gdefchar#1#2{%
+\gdef#1{%
+   \ifpassthroughchars
+     \string#1%
+   \else
+     #2%
+   \fi
+}}
+
+% Latin1 (ISO-8859-1) character definitions.
+\def\latonechardefs{%
+  \gdefchar^^a0{\tie}
+  \gdefchar^^a1{\exclamdown}
+  \gdefchar^^a2{{\tcfont \char162}} % cent
+  \gdefchar^^a3{\pounds{}}
+  \gdefchar^^a4{{\tcfont \char164}} % currency
+  \gdefchar^^a5{{\tcfont \char165}} % yen
+  \gdefchar^^a6{{\tcfont \char166}} % broken bar
+  \gdefchar^^a7{\S}
+  \gdefchar^^a8{\"{}}
+  \gdefchar^^a9{\copyright{}}
+  \gdefchar^^aa{\ordf}
+  \gdefchar^^ab{\guillemetleft{}}
+  \gdefchar^^ac{\ensuremath\lnot}
+  \gdefchar^^ad{\-}
+  \gdefchar^^ae{\registeredsymbol{}}
+  \gdefchar^^af{\={}}
+  %
+  \gdefchar^^b0{\textdegree}
+  \gdefchar^^b1{$\pm$}
+  \gdefchar^^b2{$^2$}
+  \gdefchar^^b3{$^3$}
+  \gdefchar^^b4{\'{}}
+  \gdefchar^^b5{$\mu$}
+  \gdefchar^^b6{\P}
+  \gdefchar^^b7{\ensuremath\cdot}
+  \gdefchar^^b8{\cedilla\ }
+  \gdefchar^^b9{$^1$}
+  \gdefchar^^ba{\ordm}
+  \gdefchar^^bb{\guillemetright{}}
+  \gdefchar^^bc{$1\over4$}
+  \gdefchar^^bd{$1\over2$}
+  \gdefchar^^be{$3\over4$}
+  \gdefchar^^bf{\questiondown}
+  %
+  \gdefchar^^c0{\`A}
+  \gdefchar^^c1{\'A}
+  \gdefchar^^c2{\^A}
+  \gdefchar^^c3{\~A}
+  \gdefchar^^c4{\"A}
+  \gdefchar^^c5{\ringaccent A}
+  \gdefchar^^c6{\AE}
+  \gdefchar^^c7{\cedilla C}
+  \gdefchar^^c8{\`E}
+  \gdefchar^^c9{\'E}
+  \gdefchar^^ca{\^E}
+  \gdefchar^^cb{\"E}
+  \gdefchar^^cc{\`I}
+  \gdefchar^^cd{\'I}
+  \gdefchar^^ce{\^I}
+  \gdefchar^^cf{\"I}
+  %
+  \gdefchar^^d0{\DH}
+  \gdefchar^^d1{\~N}
+  \gdefchar^^d2{\`O}
+  \gdefchar^^d3{\'O}
+  \gdefchar^^d4{\^O}
+  \gdefchar^^d5{\~O}
+  \gdefchar^^d6{\"O}
+  \gdefchar^^d7{$\times$}
+  \gdefchar^^d8{\O}
+  \gdefchar^^d9{\`U}
+  \gdefchar^^da{\'U}
+  \gdefchar^^db{\^U}
+  \gdefchar^^dc{\"U}
+  \gdefchar^^dd{\'Y}
+  \gdefchar^^de{\TH}
+  \gdefchar^^df{\ss}
+  %
+  \gdefchar^^e0{\`a}
+  \gdefchar^^e1{\'a}
+  \gdefchar^^e2{\^a}
+  \gdefchar^^e3{\~a}
+  \gdefchar^^e4{\"a}
+  \gdefchar^^e5{\ringaccent a}
+  \gdefchar^^e6{\ae}
+  \gdefchar^^e7{\cedilla c}
+  \gdefchar^^e8{\`e}
+  \gdefchar^^e9{\'e}
+  \gdefchar^^ea{\^e}
+  \gdefchar^^eb{\"e}
+  \gdefchar^^ec{\`{\dotless i}}
+  \gdefchar^^ed{\'{\dotless i}}
+  \gdefchar^^ee{\^{\dotless i}}
+  \gdefchar^^ef{\"{\dotless i}}
+  %
+  \gdefchar^^f0{\dh}
+  \gdefchar^^f1{\~n}
+  \gdefchar^^f2{\`o}
+  \gdefchar^^f3{\'o}
+  \gdefchar^^f4{\^o}
+  \gdefchar^^f5{\~o}
+  \gdefchar^^f6{\"o}
+  \gdefchar^^f7{$\div$}
+  \gdefchar^^f8{\o}
+  \gdefchar^^f9{\`u}
+  \gdefchar^^fa{\'u}
+  \gdefchar^^fb{\^u}
+  \gdefchar^^fc{\"u}
+  \gdefchar^^fd{\'y}
+  \gdefchar^^fe{\th}
+  \gdefchar^^ff{\"y}
+}
+
+% Latin9 (ISO-8859-15) encoding character definitions.
+\def\latninechardefs{%
+  % Encoding is almost identical to Latin1.
+  \latonechardefs
+  %
+  \gdefchar^^a4{\euro{}}
+  \gdefchar^^a6{\v S}
+  \gdefchar^^a8{\v s}
+  \gdefchar^^b4{\v Z}
+  \gdefchar^^b8{\v z}
+  \gdefchar^^bc{\OE}
+  \gdefchar^^bd{\oe}
+  \gdefchar^^be{\"Y}
+}
+
+% Latin2 (ISO-8859-2) character definitions.
+\def\lattwochardefs{%
+  \gdefchar^^a0{\tie}
+  \gdefchar^^a1{\ogonek{A}}
+  \gdefchar^^a2{\u{}}
+  \gdefchar^^a3{\L}
+  \gdefchar^^a4{\missingcharmsg{CURRENCY SIGN}}
+  \gdefchar^^a5{\v L}
+  \gdefchar^^a6{\'S}
+  \gdefchar^^a7{\S}
+  \gdefchar^^a8{\"{}}
+  \gdefchar^^a9{\v S}
+  \gdefchar^^aa{\cedilla S}
+  \gdefchar^^ab{\v T}
+  \gdefchar^^ac{\'Z}
+  \gdefchar^^ad{\-}
+  \gdefchar^^ae{\v Z}
+  \gdefchar^^af{\dotaccent Z}
+  %
+  \gdefchar^^b0{\textdegree{}}
+  \gdefchar^^b1{\ogonek{a}}
+  \gdefchar^^b2{\ogonek{ }}
+  \gdefchar^^b3{\l}
+  \gdefchar^^b4{\'{}}
+  \gdefchar^^b5{\v l}
+  \gdefchar^^b6{\'s}
+  \gdefchar^^b7{\v{}}
+  \gdefchar^^b8{\cedilla\ }
+  \gdefchar^^b9{\v s}
+  \gdefchar^^ba{\cedilla s}
+  \gdefchar^^bb{\v t}
+  \gdefchar^^bc{\'z}
+  \gdefchar^^bd{\H{}}
+  \gdefchar^^be{\v z}
+  \gdefchar^^bf{\dotaccent z}
+  %
+  \gdefchar^^c0{\'R}
+  \gdefchar^^c1{\'A}
+  \gdefchar^^c2{\^A}
+  \gdefchar^^c3{\u A}
+  \gdefchar^^c4{\"A}
+  \gdefchar^^c5{\'L}
+  \gdefchar^^c6{\'C}
+  \gdefchar^^c7{\cedilla C}
+  \gdefchar^^c8{\v C}
+  \gdefchar^^c9{\'E}
+  \gdefchar^^ca{\ogonek{E}}
+  \gdefchar^^cb{\"E}
+  \gdefchar^^cc{\v E}
+  \gdefchar^^cd{\'I}
+  \gdefchar^^ce{\^I}
+  \gdefchar^^cf{\v D}
+  %
+  \gdefchar^^d0{\DH}
+  \gdefchar^^d1{\'N}
+  \gdefchar^^d2{\v N}
+  \gdefchar^^d3{\'O}
+  \gdefchar^^d4{\^O}
+  \gdefchar^^d5{\H O}
+  \gdefchar^^d6{\"O}
+  \gdefchar^^d7{$\times$}
+  \gdefchar^^d8{\v R}
+  \gdefchar^^d9{\ringaccent U}
+  \gdefchar^^da{\'U}
+  \gdefchar^^db{\H U}
+  \gdefchar^^dc{\"U}
+  \gdefchar^^dd{\'Y}
+  \gdefchar^^de{\cedilla T}
+  \gdefchar^^df{\ss}
+  %
+  \gdefchar^^e0{\'r}
+  \gdefchar^^e1{\'a}
+  \gdefchar^^e2{\^a}
+  \gdefchar^^e3{\u a}
+  \gdefchar^^e4{\"a}
+  \gdefchar^^e5{\'l}
+  \gdefchar^^e6{\'c}
+  \gdefchar^^e7{\cedilla c}
+  \gdefchar^^e8{\v c}
+  \gdefchar^^e9{\'e}
+  \gdefchar^^ea{\ogonek{e}}
+  \gdefchar^^eb{\"e}
+  \gdefchar^^ec{\v e}
+  \gdefchar^^ed{\'{\dotless{i}}}
+  \gdefchar^^ee{\^{\dotless{i}}}
+  \gdefchar^^ef{\v d}
+  %
+  \gdefchar^^f0{\dh}
+  \gdefchar^^f1{\'n}
+  \gdefchar^^f2{\v n}
+  \gdefchar^^f3{\'o}
+  \gdefchar^^f4{\^o}
+  \gdefchar^^f5{\H o}
+  \gdefchar^^f6{\"o}
+  \gdefchar^^f7{$\div$}
+  \gdefchar^^f8{\v r}
+  \gdefchar^^f9{\ringaccent u}
+  \gdefchar^^fa{\'u}
+  \gdefchar^^fb{\H u}
+  \gdefchar^^fc{\"u}
+  \gdefchar^^fd{\'y}
+  \gdefchar^^fe{\cedilla t}
+  \gdefchar^^ff{\dotaccent{}}
+}
+
+% UTF-8 character definitions.
+%
+% This code to support UTF-8 is based on LaTeX's utf8.def, with some
+% changes for Texinfo conventions.  It is included here under the GPL by
+% permission from Frank Mittelbach and the LaTeX team.
+%
+\newcount\countUTFx
+\newcount\countUTFy
+\newcount\countUTFz
+
+\gdef\UTFviiiTwoOctets#1#2{\expandafter
+   \UTFviiiDefined\csname u8:#1\string #2\endcsname}
+%
+\gdef\UTFviiiThreeOctets#1#2#3{\expandafter
+   \UTFviiiDefined\csname u8:#1\string #2\string #3\endcsname}
+%
+\gdef\UTFviiiFourOctets#1#2#3#4{\expandafter
+   \UTFviiiDefined\csname u8:#1\string #2\string #3\string #4\endcsname}
+
+\gdef\UTFviiiDefined#1{%
+  \ifx #1\relax
+    \message{\linenumber Unicode char \string #1 not defined for Texinfo}%
+  \else
+    \expandafter #1%
+  \fi
+}
+
+% Give non-ASCII bytes the active definitions for processing UTF-8 sequences
+\begingroup
+  \catcode`\~13
+  \catcode`\$12
+  \catcode`\"12
+
+  % Loop from \countUTFx to \countUTFy, performing \UTFviiiTmp
+  % substituting ~ and $ with a character token of that value.
+  \def\UTFviiiLoop{%
+    \global\catcode\countUTFx\active
+    \uccode`\~\countUTFx
+    \uccode`\$\countUTFx
+    \uppercase\expandafter{\UTFviiiTmp}%
+    \advance\countUTFx by 1
+    \ifnum\countUTFx < \countUTFy
+      \expandafter\UTFviiiLoop
+    \fi}
+
+  % For bytes other than the first in a UTF-8 sequence.  Not expected to
+  % be expanded except when writing to auxiliary files.
+  \countUTFx = "80
+  \countUTFy = "C2
+  \def\UTFviiiTmp{%
+    \gdef~{%
+        \ifpassthroughchars $\fi}}%
+  \UTFviiiLoop
+
+  \countUTFx = "C2
+  \countUTFy = "E0
+  \def\UTFviiiTmp{%
+    \gdef~{%
+        \ifpassthroughchars $%
+        \else\expandafter\UTFviiiTwoOctets\expandafter$\fi}}%
+  \UTFviiiLoop
+
+  \countUTFx = "E0
+  \countUTFy = "F0
+  \def\UTFviiiTmp{%
+    \gdef~{%
+        \ifpassthroughchars $%
+        \else\expandafter\UTFviiiThreeOctets\expandafter$\fi}}%
+  \UTFviiiLoop
+
+  \countUTFx = "F0
+  \countUTFy = "F4
+  \def\UTFviiiTmp{%
+    \gdef~{%
+        \ifpassthroughchars $%
+        \else\expandafter\UTFviiiFourOctets\expandafter$\fi
+        }}%
+  \UTFviiiLoop
+\endgroup
+
+\def\globallet{\global\let} % save some \expandafter's below
+
+% @U{xxxx} to produce U+xxxx, if we support it.
+\def\U#1{%
+  \expandafter\ifx\csname uni:#1\endcsname \relax
+    \iftxinativeunicodecapable
+      % All Unicode characters can be used if native Unicode handling is
+      % active.  However, if the font does not have the glyph,
+      % letters are missing.
+      \begingroup
+        \uccode`\.="#1\relax
+        \uppercase{.}
+      \endgroup
+    \else
+      \errhelp = \EMsimple	
+      \errmessage{Unicode character U+#1 not supported, sorry}%
+    \fi
+  \else
+    \csname uni:#1\endcsname
+  \fi
+}
+
+% These macros are used here to construct the name of a control
+% sequence to be defined.
+\def\UTFviiiTwoOctetsName#1#2{%
+  \csname u8:#1\string #2\endcsname}%
+\def\UTFviiiThreeOctetsName#1#2#3{%
+  \csname u8:#1\string #2\string #3\endcsname}%
+\def\UTFviiiFourOctetsName#1#2#3#4{%
+  \csname u8:#1\string #2\string #3\string #4\endcsname}%
+
+% For UTF-8 byte sequences (TeX, e-TeX and pdfTeX),
+% provide a definition macro to replace a Unicode character;
+% this gets used by the @U command
+%
+\begingroup
+  \catcode`\"=12
+  \catcode`\<=12
+  \catcode`\.=12
+  \catcode`\,=12
+  \catcode`\;=12
+  \catcode`\!=12
+  \catcode`\~=13
+  \gdef\DeclareUnicodeCharacterUTFviii#1#2{%
+    \countUTFz = "#1\relax
+    \begingroup
+      \parseXMLCharref
+    
+      % Give \u8:... its definition.  The sequence of seven \expandafter's
+      % expands after the \gdef three times, e.g.
+      %
+      % 1.  \UTFviiTwoOctetsName B1 B2
+      % 2.  \csname u8:B1 \string B2 \endcsname
+      % 3.  \u8: B1 B2  (a single control sequence token)
+      %
+      \expandafter\expandafter
+      \expandafter\expandafter
+      \expandafter\expandafter
+      \expandafter\gdef       \UTFviiiTmp{#2}%
+      % 
+      \expandafter\ifx\csname uni:#1\endcsname \relax \else
+       \message{Internal error, already defined: #1}%
+      \fi
+      %
+      % define an additional control sequence for this code point.
+      \expandafter\globallet\csname uni:#1\endcsname \UTFviiiTmp
+    \endgroup}
+  %
+  % Given the value in \countUTFz as a Unicode code point, set \UTFviiiTmp
+  % to the corresponding UTF-8 sequence.
+  \gdef\parseXMLCharref{%
+    \ifnum\countUTFz < "A0\relax
+      \errhelp = \EMsimple
+      \errmessage{Cannot define Unicode char value < 00A0}%
+    \else\ifnum\countUTFz < "800\relax
+      \parseUTFviiiA,%
+      \parseUTFviiiB C\UTFviiiTwoOctetsName.,%
+    \else\ifnum\countUTFz < "10000\relax
+      \parseUTFviiiA;%
+      \parseUTFviiiA,%
+      \parseUTFviiiB E\UTFviiiThreeOctetsName.{,;}%
+    \else
+      \parseUTFviiiA;%
+      \parseUTFviiiA,%
+      \parseUTFviiiA!%
+      \parseUTFviiiB F\UTFviiiFourOctetsName.{!,;}%
+    \fi\fi\fi
+  }
+
+  % Extract a byte from the end of the UTF-8 representation of \countUTFx.
+  % It must be a non-initial byte in the sequence.
+  % Change \uccode of #1 for it to be used in \parseUTFviiiB as one
+  % of the bytes.
+  \gdef\parseUTFviiiA#1{%
+    \countUTFx = \countUTFz
+    \divide\countUTFz by 64
+    \countUTFy = \countUTFz  % Save to be the future value of \countUTFz.
+    \multiply\countUTFz by 64
+    
+    % \countUTFz is now \countUTFx with the last 5 bits cleared.  Subtract
+    % in order to get the last five bits.
+    \advance\countUTFx by -\countUTFz
+
+    % Convert this to the byte in the UTF-8 sequence.
+    \advance\countUTFx by 128
+    \uccode `#1\countUTFx
+    \countUTFz = \countUTFy}
+
+  % Used to put a UTF-8 byte sequence into \UTFviiiTmp
+  % #1 is the increment for \countUTFz to yield a the first byte of the UTF-8
+  %    sequence.
+  % #2 is one of the \UTFviii*OctetsName macros.
+  % #3 is always a full stop (.)
+  % #4 is a template for the other bytes in the sequence.  The values for these
+  %    bytes is substituted in here with \uppercase using the \uccode's.
+  \gdef\parseUTFviiiB#1#2#3#4{%
+    \advance\countUTFz by "#10\relax
+    \uccode `#3\countUTFz
+    \uppercase{\gdef\UTFviiiTmp{#2#3#4}}}
+\endgroup
+
+% For native Unicode handling (XeTeX and LuaTeX),
+% provide a definition macro that sets a catcode to `other' non-globally
+%
+\def\DeclareUnicodeCharacterNativeOther#1#2{%
+  \catcode"#1=\other
+}
+
+% https://en.wikipedia.org/wiki/Plane_(Unicode)#Basic_M
+% U+0000..U+007F = https://en.wikipedia.org/wiki/Basic_Latin_(Unicode_block)
+% U+0080..U+00FF = https://en.wikipedia.org/wiki/Latin-1_Supplement_(Unicode_block)
+% U+0100..U+017F = https://en.wikipedia.org/wiki/Latin_Extended-A
+% U+0180..U+024F = https://en.wikipedia.org/wiki/Latin_Extended-B
+% 
+% Many of our renditions are less than wonderful, and all the missing
+% characters are available somewhere.  Loading the necessary fonts
+% awaits user request.  We can't truly support Unicode without
+% reimplementing everything that's been done in LaTeX for many years,
+% plus probably using luatex or xetex, and who knows what else.
+% We won't be doing that here in this simple file.  But we can try to at
+% least make most of the characters not bomb out.
+%
+\def\unicodechardefs{%
+  \DeclareUnicodeCharacter{00A0}{\tie}%
+  \DeclareUnicodeCharacter{00A1}{\exclamdown}%
+  \DeclareUnicodeCharacter{00A2}{{\tcfont \char162}}% 0242=cent
+  \DeclareUnicodeCharacter{00A3}{\pounds{}}%
+  \DeclareUnicodeCharacter{00A4}{{\tcfont \char164}}% 0244=currency
+  \DeclareUnicodeCharacter{00A5}{{\tcfont \char165}}% 0245=yen
+  \DeclareUnicodeCharacter{00A6}{{\tcfont \char166}}% 0246=brokenbar
+  \DeclareUnicodeCharacter{00A7}{\S}%
+  \DeclareUnicodeCharacter{00A8}{\"{ }}%
+  \DeclareUnicodeCharacter{00A9}{\copyright{}}%
+  \DeclareUnicodeCharacter{00AA}{\ordf}%
+  \DeclareUnicodeCharacter{00AB}{\guillemetleft{}}%
+  \DeclareUnicodeCharacter{00AC}{\ensuremath\lnot}%
+  \DeclareUnicodeCharacter{00AD}{\-}%
+  \DeclareUnicodeCharacter{00AE}{\registeredsymbol{}}%
+  \DeclareUnicodeCharacter{00AF}{\={ }}%
+  %
+  \DeclareUnicodeCharacter{00B0}{\ringaccent{ }}%
+  \DeclareUnicodeCharacter{00B1}{\ensuremath\pm}%
+  \DeclareUnicodeCharacter{00B2}{$^2$}%
+  \DeclareUnicodeCharacter{00B3}{$^3$}%
+  \DeclareUnicodeCharacter{00B4}{\'{ }}%
+  \DeclareUnicodeCharacter{00B5}{$\mu$}%
+  \DeclareUnicodeCharacter{00B6}{\P}%
+  \DeclareUnicodeCharacter{00B7}{\ensuremath\cdot}%
+  \DeclareUnicodeCharacter{00B8}{\cedilla{ }}%
+  \DeclareUnicodeCharacter{00B9}{$^1$}%
+  \DeclareUnicodeCharacter{00BA}{\ordm}%
+  \DeclareUnicodeCharacter{00BB}{\guillemetright{}}%
+  \DeclareUnicodeCharacter{00BC}{$1\over4$}%
+  \DeclareUnicodeCharacter{00BD}{$1\over2$}%
+  \DeclareUnicodeCharacter{00BE}{$3\over4$}%
+  \DeclareUnicodeCharacter{00BF}{\questiondown}%
+  %
+  \DeclareUnicodeCharacter{00C0}{\`A}%
+  \DeclareUnicodeCharacter{00C1}{\'A}%
+  \DeclareUnicodeCharacter{00C2}{\^A}%
+  \DeclareUnicodeCharacter{00C3}{\~A}%
+  \DeclareUnicodeCharacter{00C4}{\"A}%
+  \DeclareUnicodeCharacter{00C5}{\AA}%
+  \DeclareUnicodeCharacter{00C6}{\AE}%
+  \DeclareUnicodeCharacter{00C7}{\cedilla{C}}%
+  \DeclareUnicodeCharacter{00C8}{\`E}%
+  \DeclareUnicodeCharacter{00C9}{\'E}%
+  \DeclareUnicodeCharacter{00CA}{\^E}%
+  \DeclareUnicodeCharacter{00CB}{\"E}%
+  \DeclareUnicodeCharacter{00CC}{\`I}%
+  \DeclareUnicodeCharacter{00CD}{\'I}%
+  \DeclareUnicodeCharacter{00CE}{\^I}%
+  \DeclareUnicodeCharacter{00CF}{\"I}%
+  %
+  \DeclareUnicodeCharacter{00D0}{\DH}%
+  \DeclareUnicodeCharacter{00D1}{\~N}%
+  \DeclareUnicodeCharacter{00D2}{\`O}%
+  \DeclareUnicodeCharacter{00D3}{\'O}%
+  \DeclareUnicodeCharacter{00D4}{\^O}%
+  \DeclareUnicodeCharacter{00D5}{\~O}%
+  \DeclareUnicodeCharacter{00D6}{\"O}%
+  \DeclareUnicodeCharacter{00D7}{\ensuremath\times}%
+  \DeclareUnicodeCharacter{00D8}{\O}%
+  \DeclareUnicodeCharacter{00D9}{\`U}%
+  \DeclareUnicodeCharacter{00DA}{\'U}%
+  \DeclareUnicodeCharacter{00DB}{\^U}%
+  \DeclareUnicodeCharacter{00DC}{\"U}%
+  \DeclareUnicodeCharacter{00DD}{\'Y}%
+  \DeclareUnicodeCharacter{00DE}{\TH}%
+  \DeclareUnicodeCharacter{00DF}{\ss}%
+  %
+  \DeclareUnicodeCharacter{00E0}{\`a}%
+  \DeclareUnicodeCharacter{00E1}{\'a}%
+  \DeclareUnicodeCharacter{00E2}{\^a}%
+  \DeclareUnicodeCharacter{00E3}{\~a}%
+  \DeclareUnicodeCharacter{00E4}{\"a}%
+  \DeclareUnicodeCharacter{00E5}{\aa}%
+  \DeclareUnicodeCharacter{00E6}{\ae}%
+  \DeclareUnicodeCharacter{00E7}{\cedilla{c}}%
+  \DeclareUnicodeCharacter{00E8}{\`e}%
+  \DeclareUnicodeCharacter{00E9}{\'e}%
+  \DeclareUnicodeCharacter{00EA}{\^e}%
+  \DeclareUnicodeCharacter{00EB}{\"e}%
+  \DeclareUnicodeCharacter{00EC}{\`{\dotless{i}}}%
+  \DeclareUnicodeCharacter{00ED}{\'{\dotless{i}}}%
+  \DeclareUnicodeCharacter{00EE}{\^{\dotless{i}}}%
+  \DeclareUnicodeCharacter{00EF}{\"{\dotless{i}}}%
+  %
+  \DeclareUnicodeCharacter{00F0}{\dh}%
+  \DeclareUnicodeCharacter{00F1}{\~n}%
+  \DeclareUnicodeCharacter{00F2}{\`o}%
+  \DeclareUnicodeCharacter{00F3}{\'o}%
+  \DeclareUnicodeCharacter{00F4}{\^o}%
+  \DeclareUnicodeCharacter{00F5}{\~o}%
+  \DeclareUnicodeCharacter{00F6}{\"o}%
+  \DeclareUnicodeCharacter{00F7}{\ensuremath\div}%
+  \DeclareUnicodeCharacter{00F8}{\o}%
+  \DeclareUnicodeCharacter{00F9}{\`u}%
+  \DeclareUnicodeCharacter{00FA}{\'u}%
+  \DeclareUnicodeCharacter{00FB}{\^u}%
+  \DeclareUnicodeCharacter{00FC}{\"u}%
+  \DeclareUnicodeCharacter{00FD}{\'y}%
+  \DeclareUnicodeCharacter{00FE}{\th}%
+  \DeclareUnicodeCharacter{00FF}{\"y}%
+  %
+  \DeclareUnicodeCharacter{0100}{\=A}%
+  \DeclareUnicodeCharacter{0101}{\=a}%
+  \DeclareUnicodeCharacter{0102}{\u{A}}%
+  \DeclareUnicodeCharacter{0103}{\u{a}}%
+  \DeclareUnicodeCharacter{0104}{\ogonek{A}}%
+  \DeclareUnicodeCharacter{0105}{\ogonek{a}}%
+  \DeclareUnicodeCharacter{0106}{\'C}%
+  \DeclareUnicodeCharacter{0107}{\'c}%
+  \DeclareUnicodeCharacter{0108}{\^C}%
+  \DeclareUnicodeCharacter{0109}{\^c}%
+  \DeclareUnicodeCharacter{010A}{\dotaccent{C}}%
+  \DeclareUnicodeCharacter{010B}{\dotaccent{c}}%
+  \DeclareUnicodeCharacter{010C}{\v{C}}%
+  \DeclareUnicodeCharacter{010D}{\v{c}}%
+  \DeclareUnicodeCharacter{010E}{\v{D}}%
+  \DeclareUnicodeCharacter{010F}{d'}%
+  %
+  \DeclareUnicodeCharacter{0110}{\DH}%
+  \DeclareUnicodeCharacter{0111}{\dh}%
+  \DeclareUnicodeCharacter{0112}{\=E}%
+  \DeclareUnicodeCharacter{0113}{\=e}%
+  \DeclareUnicodeCharacter{0114}{\u{E}}%
+  \DeclareUnicodeCharacter{0115}{\u{e}}%
+  \DeclareUnicodeCharacter{0116}{\dotaccent{E}}%
+  \DeclareUnicodeCharacter{0117}{\dotaccent{e}}%
+  \DeclareUnicodeCharacter{0118}{\ogonek{E}}%
+  \DeclareUnicodeCharacter{0119}{\ogonek{e}}%
+  \DeclareUnicodeCharacter{011A}{\v{E}}%
+  \DeclareUnicodeCharacter{011B}{\v{e}}%
+  \DeclareUnicodeCharacter{011C}{\^G}%
+  \DeclareUnicodeCharacter{011D}{\^g}%
+  \DeclareUnicodeCharacter{011E}{\u{G}}%
+  \DeclareUnicodeCharacter{011F}{\u{g}}%
+  %
+  \DeclareUnicodeCharacter{0120}{\dotaccent{G}}%
+  \DeclareUnicodeCharacter{0121}{\dotaccent{g}}%
+  \DeclareUnicodeCharacter{0122}{\cedilla{G}}%
+  \DeclareUnicodeCharacter{0123}{\cedilla{g}}%
+  \DeclareUnicodeCharacter{0124}{\^H}%
+  \DeclareUnicodeCharacter{0125}{\^h}%
+  \DeclareUnicodeCharacter{0126}{\missingcharmsg{H WITH STROKE}}%
+  \DeclareUnicodeCharacter{0127}{\missingcharmsg{h WITH STROKE}}%
+  \DeclareUnicodeCharacter{0128}{\~I}%
+  \DeclareUnicodeCharacter{0129}{\~{\dotless{i}}}%
+  \DeclareUnicodeCharacter{012A}{\=I}%
+  \DeclareUnicodeCharacter{012B}{\={\dotless{i}}}%
+  \DeclareUnicodeCharacter{012C}{\u{I}}%
+  \DeclareUnicodeCharacter{012D}{\u{\dotless{i}}}%
+  \DeclareUnicodeCharacter{012E}{\ogonek{I}}%
+  \DeclareUnicodeCharacter{012F}{\ogonek{i}}%
+  %
+  \DeclareUnicodeCharacter{0130}{\dotaccent{I}}%
+  \DeclareUnicodeCharacter{0131}{\dotless{i}}%
+  \DeclareUnicodeCharacter{0132}{IJ}%
+  \DeclareUnicodeCharacter{0133}{ij}%
+  \DeclareUnicodeCharacter{0134}{\^J}%
+  \DeclareUnicodeCharacter{0135}{\^{\dotless{j}}}%
+  \DeclareUnicodeCharacter{0136}{\cedilla{K}}%
+  \DeclareUnicodeCharacter{0137}{\cedilla{k}}%
+  \DeclareUnicodeCharacter{0138}{\ensuremath\kappa}%
+  \DeclareUnicodeCharacter{0139}{\'L}%
+  \DeclareUnicodeCharacter{013A}{\'l}%
+  \DeclareUnicodeCharacter{013B}{\cedilla{L}}%
+  \DeclareUnicodeCharacter{013C}{\cedilla{l}}%
+  \DeclareUnicodeCharacter{013D}{L'}% should kern
+  \DeclareUnicodeCharacter{013E}{l'}% should kern
+  \DeclareUnicodeCharacter{013F}{L\U{00B7}}%
+  %
+  \DeclareUnicodeCharacter{0140}{l\U{00B7}}%
+  \DeclareUnicodeCharacter{0141}{\L}%
+  \DeclareUnicodeCharacter{0142}{\l}%
+  \DeclareUnicodeCharacter{0143}{\'N}%
+  \DeclareUnicodeCharacter{0144}{\'n}%
+  \DeclareUnicodeCharacter{0145}{\cedilla{N}}%
+  \DeclareUnicodeCharacter{0146}{\cedilla{n}}%
+  \DeclareUnicodeCharacter{0147}{\v{N}}%
+  \DeclareUnicodeCharacter{0148}{\v{n}}%
+  \DeclareUnicodeCharacter{0149}{'n}%
+  \DeclareUnicodeCharacter{014A}{\missingcharmsg{ENG}}%
+  \DeclareUnicodeCharacter{014B}{\missingcharmsg{eng}}%
+  \DeclareUnicodeCharacter{014C}{\=O}%
+  \DeclareUnicodeCharacter{014D}{\=o}%
+  \DeclareUnicodeCharacter{014E}{\u{O}}%
+  \DeclareUnicodeCharacter{014F}{\u{o}}%
+  %
+  \DeclareUnicodeCharacter{0150}{\H{O}}%
+  \DeclareUnicodeCharacter{0151}{\H{o}}%
+  \DeclareUnicodeCharacter{0152}{\OE}%
+  \DeclareUnicodeCharacter{0153}{\oe}%
+  \DeclareUnicodeCharacter{0154}{\'R}%
+  \DeclareUnicodeCharacter{0155}{\'r}%
+  \DeclareUnicodeCharacter{0156}{\cedilla{R}}%
+  \DeclareUnicodeCharacter{0157}{\cedilla{r}}%
+  \DeclareUnicodeCharacter{0158}{\v{R}}%
+  \DeclareUnicodeCharacter{0159}{\v{r}}%
+  \DeclareUnicodeCharacter{015A}{\'S}%
+  \DeclareUnicodeCharacter{015B}{\'s}%
+  \DeclareUnicodeCharacter{015C}{\^S}%
+  \DeclareUnicodeCharacter{015D}{\^s}%
+  \DeclareUnicodeCharacter{015E}{\cedilla{S}}%
+  \DeclareUnicodeCharacter{015F}{\cedilla{s}}%
+  %
+  \DeclareUnicodeCharacter{0160}{\v{S}}%
+  \DeclareUnicodeCharacter{0161}{\v{s}}%
+  \DeclareUnicodeCharacter{0162}{\cedilla{T}}%
+  \DeclareUnicodeCharacter{0163}{\cedilla{t}}%
+  \DeclareUnicodeCharacter{0164}{\v{T}}%
+  \DeclareUnicodeCharacter{0165}{\v{t}}%
+  \DeclareUnicodeCharacter{0166}{\missingcharmsg{H WITH STROKE}}%
+  \DeclareUnicodeCharacter{0167}{\missingcharmsg{h WITH STROKE}}%
+  \DeclareUnicodeCharacter{0168}{\~U}%
+  \DeclareUnicodeCharacter{0169}{\~u}%
+  \DeclareUnicodeCharacter{016A}{\=U}%
+  \DeclareUnicodeCharacter{016B}{\=u}%
+  \DeclareUnicodeCharacter{016C}{\u{U}}%
+  \DeclareUnicodeCharacter{016D}{\u{u}}%
+  \DeclareUnicodeCharacter{016E}{\ringaccent{U}}%
+  \DeclareUnicodeCharacter{016F}{\ringaccent{u}}%
+  %
+  \DeclareUnicodeCharacter{0170}{\H{U}}%
+  \DeclareUnicodeCharacter{0171}{\H{u}}%
+  \DeclareUnicodeCharacter{0172}{\ogonek{U}}%
+  \DeclareUnicodeCharacter{0173}{\ogonek{u}}%
+  \DeclareUnicodeCharacter{0174}{\^W}%
+  \DeclareUnicodeCharacter{0175}{\^w}%
+  \DeclareUnicodeCharacter{0176}{\^Y}%
+  \DeclareUnicodeCharacter{0177}{\^y}%
+  \DeclareUnicodeCharacter{0178}{\"Y}%
+  \DeclareUnicodeCharacter{0179}{\'Z}%
+  \DeclareUnicodeCharacter{017A}{\'z}%
+  \DeclareUnicodeCharacter{017B}{\dotaccent{Z}}%
+  \DeclareUnicodeCharacter{017C}{\dotaccent{z}}%
+  \DeclareUnicodeCharacter{017D}{\v{Z}}%
+  \DeclareUnicodeCharacter{017E}{\v{z}}%
+  \DeclareUnicodeCharacter{017F}{\missingcharmsg{LONG S}}%
+  %
+  \DeclareUnicodeCharacter{01C4}{D\v{Z}}%
+  \DeclareUnicodeCharacter{01C5}{D\v{z}}%
+  \DeclareUnicodeCharacter{01C6}{d\v{z}}%
+  \DeclareUnicodeCharacter{01C7}{LJ}%
+  \DeclareUnicodeCharacter{01C8}{Lj}%
+  \DeclareUnicodeCharacter{01C9}{lj}%
+  \DeclareUnicodeCharacter{01CA}{NJ}%
+  \DeclareUnicodeCharacter{01CB}{Nj}%
+  \DeclareUnicodeCharacter{01CC}{nj}%
+  \DeclareUnicodeCharacter{01CD}{\v{A}}%
+  \DeclareUnicodeCharacter{01CE}{\v{a}}%
+  \DeclareUnicodeCharacter{01CF}{\v{I}}%
+  %
+  \DeclareUnicodeCharacter{01D0}{\v{\dotless{i}}}%
+  \DeclareUnicodeCharacter{01D1}{\v{O}}%
+  \DeclareUnicodeCharacter{01D2}{\v{o}}%
+  \DeclareUnicodeCharacter{01D3}{\v{U}}%
+  \DeclareUnicodeCharacter{01D4}{\v{u}}%
+  %
+  \DeclareUnicodeCharacter{01E2}{\={\AE}}%
+  \DeclareUnicodeCharacter{01E3}{\={\ae}}%
+  \DeclareUnicodeCharacter{01E6}{\v{G}}%
+  \DeclareUnicodeCharacter{01E7}{\v{g}}%
+  \DeclareUnicodeCharacter{01E8}{\v{K}}%
+  \DeclareUnicodeCharacter{01E9}{\v{k}}%
+  %
+  \DeclareUnicodeCharacter{01F0}{\v{\dotless{j}}}%
+  \DeclareUnicodeCharacter{01F1}{DZ}%
+  \DeclareUnicodeCharacter{01F2}{Dz}%
+  \DeclareUnicodeCharacter{01F3}{dz}%
+  \DeclareUnicodeCharacter{01F4}{\'G}%
+  \DeclareUnicodeCharacter{01F5}{\'g}%
+  \DeclareUnicodeCharacter{01F8}{\`N}%
+  \DeclareUnicodeCharacter{01F9}{\`n}%
+  \DeclareUnicodeCharacter{01FC}{\'{\AE}}%
+  \DeclareUnicodeCharacter{01FD}{\'{\ae}}%
+  \DeclareUnicodeCharacter{01FE}{\'{\O}}%
+  \DeclareUnicodeCharacter{01FF}{\'{\o}}%
+  %
+  \DeclareUnicodeCharacter{021E}{\v{H}}%
+  \DeclareUnicodeCharacter{021F}{\v{h}}%
+  %
+  \DeclareUnicodeCharacter{0226}{\dotaccent{A}}%
+  \DeclareUnicodeCharacter{0227}{\dotaccent{a}}%
+  \DeclareUnicodeCharacter{0228}{\cedilla{E}}%
+  \DeclareUnicodeCharacter{0229}{\cedilla{e}}%
+  \DeclareUnicodeCharacter{022E}{\dotaccent{O}}%
+  \DeclareUnicodeCharacter{022F}{\dotaccent{o}}%
+  %
+  \DeclareUnicodeCharacter{0232}{\=Y}%
+  \DeclareUnicodeCharacter{0233}{\=y}%
+  \DeclareUnicodeCharacter{0237}{\dotless{j}}%
+  %
+  \DeclareUnicodeCharacter{02BC}{'}%
+  %
+  \DeclareUnicodeCharacter{02DB}{\ogonek{ }}%
+  %
+  % Greek letters upper case
+  \DeclareUnicodeCharacter{0391}{{\it A}}%
+  \DeclareUnicodeCharacter{0392}{{\it B}}%
+  \DeclareUnicodeCharacter{0393}{\ensuremath{\mit\Gamma}}%
+  \DeclareUnicodeCharacter{0394}{\ensuremath{\mit\Delta}}%
+  \DeclareUnicodeCharacter{0395}{{\it E}}%
+  \DeclareUnicodeCharacter{0396}{{\it Z}}%
+  \DeclareUnicodeCharacter{0397}{{\it H}}%
+  \DeclareUnicodeCharacter{0398}{\ensuremath{\mit\Theta}}%
+  \DeclareUnicodeCharacter{0399}{{\it I}}%
+  \DeclareUnicodeCharacter{039A}{{\it K}}%
+  \DeclareUnicodeCharacter{039B}{\ensuremath{\mit\Lambda}}%
+  \DeclareUnicodeCharacter{039C}{{\it M}}%
+  \DeclareUnicodeCharacter{039D}{{\it N}}%
+  \DeclareUnicodeCharacter{039E}{\ensuremath{\mit\Xi}}%
+  \DeclareUnicodeCharacter{039F}{{\it O}}%
+  \DeclareUnicodeCharacter{03A0}{\ensuremath{\mit\Pi}}%
+  \DeclareUnicodeCharacter{03A1}{{\it P}}%
+  %\DeclareUnicodeCharacter{03A2}{} % none - corresponds to final sigma
+  \DeclareUnicodeCharacter{03A3}{\ensuremath{\mit\Sigma}}%
+  \DeclareUnicodeCharacter{03A4}{{\it T}}%
+  \DeclareUnicodeCharacter{03A5}{\ensuremath{\mit\Upsilon}}%
+  \DeclareUnicodeCharacter{03A6}{\ensuremath{\mit\Phi}}%
+  \DeclareUnicodeCharacter{03A7}{{\it X}}%
+  \DeclareUnicodeCharacter{03A8}{\ensuremath{\mit\Psi}}%
+  \DeclareUnicodeCharacter{03A9}{\ensuremath{\mit\Omega}}%
+  %
+  % Vowels with accents
+  \DeclareUnicodeCharacter{0390}{\ensuremath{\ddot{\acute\iota}}}%
+  \DeclareUnicodeCharacter{03AC}{\ensuremath{\acute\alpha}}%
+  \DeclareUnicodeCharacter{03AD}{\ensuremath{\acute\epsilon}}%
+  \DeclareUnicodeCharacter{03AE}{\ensuremath{\acute\eta}}%
+  \DeclareUnicodeCharacter{03AF}{\ensuremath{\acute\iota}}%
+  \DeclareUnicodeCharacter{03B0}{\ensuremath{\acute{\ddot\upsilon}}}%
+  %
+  % Standalone accent
+  \DeclareUnicodeCharacter{0384}{\ensuremath{\acute{\ }}}%
+  %
+  % Greek letters lower case
+  \DeclareUnicodeCharacter{03B1}{\ensuremath\alpha}%
+  \DeclareUnicodeCharacter{03B2}{\ensuremath\beta}%
+  \DeclareUnicodeCharacter{03B3}{\ensuremath\gamma}%
+  \DeclareUnicodeCharacter{03B4}{\ensuremath\delta}%
+  \DeclareUnicodeCharacter{03B5}{\ensuremath\epsilon}%
+  \DeclareUnicodeCharacter{03B6}{\ensuremath\zeta}%
+  \DeclareUnicodeCharacter{03B7}{\ensuremath\eta}%
+  \DeclareUnicodeCharacter{03B8}{\ensuremath\theta}%
+  \DeclareUnicodeCharacter{03B9}{\ensuremath\iota}%
+  \DeclareUnicodeCharacter{03BA}{\ensuremath\kappa}%
+  \DeclareUnicodeCharacter{03BB}{\ensuremath\lambda}%
+  \DeclareUnicodeCharacter{03BC}{\ensuremath\mu}%
+  \DeclareUnicodeCharacter{03BD}{\ensuremath\nu}%
+  \DeclareUnicodeCharacter{03BE}{\ensuremath\xi}%
+  \DeclareUnicodeCharacter{03BF}{{\it o}}% omicron
+  \DeclareUnicodeCharacter{03C0}{\ensuremath\pi}%
+  \DeclareUnicodeCharacter{03C1}{\ensuremath\rho}%
+  \DeclareUnicodeCharacter{03C2}{\ensuremath\varsigma}%
+  \DeclareUnicodeCharacter{03C3}{\ensuremath\sigma}%
+  \DeclareUnicodeCharacter{03C4}{\ensuremath\tau}%
+  \DeclareUnicodeCharacter{03C5}{\ensuremath\upsilon}%
+  \DeclareUnicodeCharacter{03C6}{\ensuremath\phi}%
+  \DeclareUnicodeCharacter{03C7}{\ensuremath\chi}%
+  \DeclareUnicodeCharacter{03C8}{\ensuremath\psi}%
+  \DeclareUnicodeCharacter{03C9}{\ensuremath\omega}%
+  %
+  % More Greek vowels with accents
+  \DeclareUnicodeCharacter{03CA}{\ensuremath{\ddot\iota}}%
+  \DeclareUnicodeCharacter{03CB}{\ensuremath{\ddot\upsilon}}%
+  \DeclareUnicodeCharacter{03CC}{\ensuremath{\acute o}}%
+  \DeclareUnicodeCharacter{03CD}{\ensuremath{\acute\upsilon}}%
+  \DeclareUnicodeCharacter{03CE}{\ensuremath{\acute\omega}}%
+  %
+  % Variant Greek letters
+  \DeclareUnicodeCharacter{03D1}{\ensuremath\vartheta}%
+  \DeclareUnicodeCharacter{03D6}{\ensuremath\varpi}%
+  \DeclareUnicodeCharacter{03F1}{\ensuremath\varrho}%
+  %
+  \DeclareUnicodeCharacter{1E02}{\dotaccent{B}}%
+  \DeclareUnicodeCharacter{1E03}{\dotaccent{b}}%
+  \DeclareUnicodeCharacter{1E04}{\udotaccent{B}}%
+  \DeclareUnicodeCharacter{1E05}{\udotaccent{b}}%
+  \DeclareUnicodeCharacter{1E06}{\ubaraccent{B}}%
+  \DeclareUnicodeCharacter{1E07}{\ubaraccent{b}}%
+  \DeclareUnicodeCharacter{1E0A}{\dotaccent{D}}%
+  \DeclareUnicodeCharacter{1E0B}{\dotaccent{d}}%
+  \DeclareUnicodeCharacter{1E0C}{\udotaccent{D}}%
+  \DeclareUnicodeCharacter{1E0D}{\udotaccent{d}}%
+  \DeclareUnicodeCharacter{1E0E}{\ubaraccent{D}}%
+  \DeclareUnicodeCharacter{1E0F}{\ubaraccent{d}}%
+  %
+  \DeclareUnicodeCharacter{1E1E}{\dotaccent{F}}%
+  \DeclareUnicodeCharacter{1E1F}{\dotaccent{f}}%
+  %
+  \DeclareUnicodeCharacter{1E20}{\=G}%
+  \DeclareUnicodeCharacter{1E21}{\=g}%
+  \DeclareUnicodeCharacter{1E22}{\dotaccent{H}}%
+  \DeclareUnicodeCharacter{1E23}{\dotaccent{h}}%
+  \DeclareUnicodeCharacter{1E24}{\udotaccent{H}}%
+  \DeclareUnicodeCharacter{1E25}{\udotaccent{h}}%
+  \DeclareUnicodeCharacter{1E26}{\"H}%
+  \DeclareUnicodeCharacter{1E27}{\"h}%
+  %
+  \DeclareUnicodeCharacter{1E30}{\'K}%
+  \DeclareUnicodeCharacter{1E31}{\'k}%
+  \DeclareUnicodeCharacter{1E32}{\udotaccent{K}}%
+  \DeclareUnicodeCharacter{1E33}{\udotaccent{k}}%
+  \DeclareUnicodeCharacter{1E34}{\ubaraccent{K}}%
+  \DeclareUnicodeCharacter{1E35}{\ubaraccent{k}}%
+  \DeclareUnicodeCharacter{1E36}{\udotaccent{L}}%
+  \DeclareUnicodeCharacter{1E37}{\udotaccent{l}}%
+  \DeclareUnicodeCharacter{1E3A}{\ubaraccent{L}}%
+  \DeclareUnicodeCharacter{1E3B}{\ubaraccent{l}}%
+  \DeclareUnicodeCharacter{1E3E}{\'M}%
+  \DeclareUnicodeCharacter{1E3F}{\'m}%
+  %
+  \DeclareUnicodeCharacter{1E40}{\dotaccent{M}}%
+  \DeclareUnicodeCharacter{1E41}{\dotaccent{m}}%
+  \DeclareUnicodeCharacter{1E42}{\udotaccent{M}}%
+  \DeclareUnicodeCharacter{1E43}{\udotaccent{m}}%
+  \DeclareUnicodeCharacter{1E44}{\dotaccent{N}}%
+  \DeclareUnicodeCharacter{1E45}{\dotaccent{n}}%
+  \DeclareUnicodeCharacter{1E46}{\udotaccent{N}}%
+  \DeclareUnicodeCharacter{1E47}{\udotaccent{n}}%
+  \DeclareUnicodeCharacter{1E48}{\ubaraccent{N}}%
+  \DeclareUnicodeCharacter{1E49}{\ubaraccent{n}}%
+  %
+  \DeclareUnicodeCharacter{1E54}{\'P}%
+  \DeclareUnicodeCharacter{1E55}{\'p}%
+  \DeclareUnicodeCharacter{1E56}{\dotaccent{P}}%
+  \DeclareUnicodeCharacter{1E57}{\dotaccent{p}}%
+  \DeclareUnicodeCharacter{1E58}{\dotaccent{R}}%
+  \DeclareUnicodeCharacter{1E59}{\dotaccent{r}}%
+  \DeclareUnicodeCharacter{1E5A}{\udotaccent{R}}%
+  \DeclareUnicodeCharacter{1E5B}{\udotaccent{r}}%
+  \DeclareUnicodeCharacter{1E5E}{\ubaraccent{R}}%
+  \DeclareUnicodeCharacter{1E5F}{\ubaraccent{r}}%
+  %
+  \DeclareUnicodeCharacter{1E60}{\dotaccent{S}}%
+  \DeclareUnicodeCharacter{1E61}{\dotaccent{s}}%
+  \DeclareUnicodeCharacter{1E62}{\udotaccent{S}}%
+  \DeclareUnicodeCharacter{1E63}{\udotaccent{s}}%
+  \DeclareUnicodeCharacter{1E6A}{\dotaccent{T}}%
+  \DeclareUnicodeCharacter{1E6B}{\dotaccent{t}}%
+  \DeclareUnicodeCharacter{1E6C}{\udotaccent{T}}%
+  \DeclareUnicodeCharacter{1E6D}{\udotaccent{t}}%
+  \DeclareUnicodeCharacter{1E6E}{\ubaraccent{T}}%
+  \DeclareUnicodeCharacter{1E6F}{\ubaraccent{t}}%
+  %
+  \DeclareUnicodeCharacter{1E7C}{\~V}%
+  \DeclareUnicodeCharacter{1E7D}{\~v}%
+  \DeclareUnicodeCharacter{1E7E}{\udotaccent{V}}%
+  \DeclareUnicodeCharacter{1E7F}{\udotaccent{v}}%
+  %
+  \DeclareUnicodeCharacter{1E80}{\`W}%
+  \DeclareUnicodeCharacter{1E81}{\`w}%
+  \DeclareUnicodeCharacter{1E82}{\'W}%
+  \DeclareUnicodeCharacter{1E83}{\'w}%
+  \DeclareUnicodeCharacter{1E84}{\"W}%
+  \DeclareUnicodeCharacter{1E85}{\"w}%
+  \DeclareUnicodeCharacter{1E86}{\dotaccent{W}}%
+  \DeclareUnicodeCharacter{1E87}{\dotaccent{w}}%
+  \DeclareUnicodeCharacter{1E88}{\udotaccent{W}}%
+  \DeclareUnicodeCharacter{1E89}{\udotaccent{w}}%
+  \DeclareUnicodeCharacter{1E8A}{\dotaccent{X}}%
+  \DeclareUnicodeCharacter{1E8B}{\dotaccent{x}}%
+  \DeclareUnicodeCharacter{1E8C}{\"X}%
+  \DeclareUnicodeCharacter{1E8D}{\"x}%
+  \DeclareUnicodeCharacter{1E8E}{\dotaccent{Y}}%
+  \DeclareUnicodeCharacter{1E8F}{\dotaccent{y}}%
+  %
+  \DeclareUnicodeCharacter{1E90}{\^Z}%
+  \DeclareUnicodeCharacter{1E91}{\^z}%
+  \DeclareUnicodeCharacter{1E92}{\udotaccent{Z}}%
+  \DeclareUnicodeCharacter{1E93}{\udotaccent{z}}%
+  \DeclareUnicodeCharacter{1E94}{\ubaraccent{Z}}%
+  \DeclareUnicodeCharacter{1E95}{\ubaraccent{z}}%
+  \DeclareUnicodeCharacter{1E96}{\ubaraccent{h}}%
+  \DeclareUnicodeCharacter{1E97}{\"t}%
+  \DeclareUnicodeCharacter{1E98}{\ringaccent{w}}%
+  \DeclareUnicodeCharacter{1E99}{\ringaccent{y}}%
+  %
+  \DeclareUnicodeCharacter{1EA0}{\udotaccent{A}}%
+  \DeclareUnicodeCharacter{1EA1}{\udotaccent{a}}%
+  %
+  \DeclareUnicodeCharacter{1EB8}{\udotaccent{E}}%
+  \DeclareUnicodeCharacter{1EB9}{\udotaccent{e}}%
+  \DeclareUnicodeCharacter{1EBC}{\~E}%
+  \DeclareUnicodeCharacter{1EBD}{\~e}%
+  %
+  \DeclareUnicodeCharacter{1ECA}{\udotaccent{I}}%
+  \DeclareUnicodeCharacter{1ECB}{\udotaccent{i}}%
+  \DeclareUnicodeCharacter{1ECC}{\udotaccent{O}}%
+  \DeclareUnicodeCharacter{1ECD}{\udotaccent{o}}%
+  %
+  \DeclareUnicodeCharacter{1EE4}{\udotaccent{U}}%
+  \DeclareUnicodeCharacter{1EE5}{\udotaccent{u}}%
+  %
+  \DeclareUnicodeCharacter{1EF2}{\`Y}%
+  \DeclareUnicodeCharacter{1EF3}{\`y}%
+  \DeclareUnicodeCharacter{1EF4}{\udotaccent{Y}}%
+  %
+  \DeclareUnicodeCharacter{1EF8}{\~Y}%
+  \DeclareUnicodeCharacter{1EF9}{\~y}%
+  %
+  % Punctuation
+  \DeclareUnicodeCharacter{2013}{--}%
+  \DeclareUnicodeCharacter{2014}{---}%
+  \DeclareUnicodeCharacter{2018}{\quoteleft{}}%
+  \DeclareUnicodeCharacter{2019}{\quoteright{}}%
+  \DeclareUnicodeCharacter{201A}{\quotesinglbase{}}%
+  \DeclareUnicodeCharacter{201C}{\quotedblleft{}}%
+  \DeclareUnicodeCharacter{201D}{\quotedblright{}}%
+  \DeclareUnicodeCharacter{201E}{\quotedblbase{}}%
+  \DeclareUnicodeCharacter{2020}{\ensuremath\dagger}%
+  \DeclareUnicodeCharacter{2021}{\ensuremath\ddagger}%
+  \DeclareUnicodeCharacter{2022}{\bullet{}}%
+  \DeclareUnicodeCharacter{202F}{\thinspace}%
+  \DeclareUnicodeCharacter{2026}{\dots{}}%
+  \DeclareUnicodeCharacter{2039}{\guilsinglleft{}}%
+  \DeclareUnicodeCharacter{203A}{\guilsinglright{}}%
+  %
+  \DeclareUnicodeCharacter{20AC}{\euro{}}%
+  %
+  \DeclareUnicodeCharacter{2192}{\expansion{}}%
+  \DeclareUnicodeCharacter{21D2}{\result{}}%
+  %
+  % Mathematical symbols
+  \DeclareUnicodeCharacter{2200}{\ensuremath\forall}%
+  \DeclareUnicodeCharacter{2203}{\ensuremath\exists}%
+  \DeclareUnicodeCharacter{2208}{\ensuremath\in}%
+  \DeclareUnicodeCharacter{2212}{\minus{}}%
+  \DeclareUnicodeCharacter{2217}{\ast}%
+  \DeclareUnicodeCharacter{221E}{\ensuremath\infty}%
+  \DeclareUnicodeCharacter{2225}{\ensuremath\parallel}%
+  \DeclareUnicodeCharacter{2227}{\ensuremath\wedge}%
+  \DeclareUnicodeCharacter{2229}{\ensuremath\cap}%
+  \DeclareUnicodeCharacter{2261}{\equiv{}}%
+  \DeclareUnicodeCharacter{2264}{\ensuremath\leq}%
+  \DeclareUnicodeCharacter{2265}{\ensuremath\geq}%
+  \DeclareUnicodeCharacter{2282}{\ensuremath\subset}%
+  \DeclareUnicodeCharacter{2287}{\ensuremath\supseteq}%
+  %
+  \DeclareUnicodeCharacter{2016}{\ensuremath\Vert}%
+  \DeclareUnicodeCharacter{2032}{\ensuremath\prime}%
+  \DeclareUnicodeCharacter{210F}{\ensuremath\hbar}%
+  \DeclareUnicodeCharacter{2111}{\ensuremath\Im}%
+  \DeclareUnicodeCharacter{2113}{\ensuremath\ell}%
+  \DeclareUnicodeCharacter{2118}{\ensuremath\wp}%
+  \DeclareUnicodeCharacter{211C}{\ensuremath\Re}%
+  \DeclareUnicodeCharacter{2135}{\ensuremath\aleph}%
+  \DeclareUnicodeCharacter{2190}{\ensuremath\leftarrow}%
+  \DeclareUnicodeCharacter{2191}{\ensuremath\uparrow}%
+  \DeclareUnicodeCharacter{2193}{\ensuremath\downarrow}%
+  \DeclareUnicodeCharacter{2194}{\ensuremath\leftrightarrow}%
+  \DeclareUnicodeCharacter{2195}{\ensuremath\updownarrow}%
+  \DeclareUnicodeCharacter{2196}{\ensuremath\nwarrow}%
+  \DeclareUnicodeCharacter{2197}{\ensuremath\nearrow}%
+  \DeclareUnicodeCharacter{2198}{\ensuremath\searrow}%
+  \DeclareUnicodeCharacter{2199}{\ensuremath\swarrow}%
+  \DeclareUnicodeCharacter{21A6}{\ensuremath\mapsto}%
+  \DeclareUnicodeCharacter{21A9}{\ensuremath\hookleftarrow}%
+  \DeclareUnicodeCharacter{21AA}{\ensuremath\hookrightarrow}%
+  \DeclareUnicodeCharacter{21BC}{\ensuremath\leftharpoonup}%
+  \DeclareUnicodeCharacter{21BD}{\ensuremath\leftharpoondown}%
+  \DeclareUnicodeCharacter{21C0}{\ensuremath\rightharpoonup}%
+  \DeclareUnicodeCharacter{21C1}{\ensuremath\rightharpoondown}%
+  \DeclareUnicodeCharacter{21CC}{\ensuremath\rightleftharpoons}%
+  \DeclareUnicodeCharacter{21D0}{\ensuremath\Leftarrow}%
+  \DeclareUnicodeCharacter{21D1}{\ensuremath\Uparrow}%
+  \DeclareUnicodeCharacter{21D3}{\ensuremath\Downarrow}%
+  \DeclareUnicodeCharacter{21D4}{\ensuremath\Leftrightarrow}%
+  \DeclareUnicodeCharacter{21D5}{\ensuremath\Updownarrow}%
+  \DeclareUnicodeCharacter{2202}{\ensuremath\partial}%
+  \DeclareUnicodeCharacter{2205}{\ensuremath\emptyset}%
+  \DeclareUnicodeCharacter{2207}{\ensuremath\nabla}%
+  \DeclareUnicodeCharacter{2209}{\ensuremath\notin}%
+  \DeclareUnicodeCharacter{220B}{\ensuremath\owns}%
+  \DeclareUnicodeCharacter{220F}{\ensuremath\prod}%
+  \DeclareUnicodeCharacter{2210}{\ensuremath\coprod}%
+  \DeclareUnicodeCharacter{2211}{\ensuremath\sum}%
+  \DeclareUnicodeCharacter{2213}{\ensuremath\mp}%
+  \DeclareUnicodeCharacter{2218}{\ensuremath\circ}%
+  \DeclareUnicodeCharacter{221A}{\ensuremath\surd}%
+  \DeclareUnicodeCharacter{221D}{\ensuremath\propto}%
+  \DeclareUnicodeCharacter{2220}{\ensuremath\angle}%
+  \DeclareUnicodeCharacter{2223}{\ensuremath\mid}%
+  \DeclareUnicodeCharacter{2228}{\ensuremath\vee}%
+  \DeclareUnicodeCharacter{222A}{\ensuremath\cup}%
+  \DeclareUnicodeCharacter{222B}{\ensuremath\smallint}%
+  \DeclareUnicodeCharacter{222E}{\ensuremath\oint}%
+  \DeclareUnicodeCharacter{223C}{\ensuremath\sim}%
+  \DeclareUnicodeCharacter{2240}{\ensuremath\wr}%
+  \DeclareUnicodeCharacter{2243}{\ensuremath\simeq}%
+  \DeclareUnicodeCharacter{2245}{\ensuremath\cong}%
+  \DeclareUnicodeCharacter{2248}{\ensuremath\approx}%
+  \DeclareUnicodeCharacter{224D}{\ensuremath\asymp}%
+  \DeclareUnicodeCharacter{2250}{\ensuremath\doteq}%
+  \DeclareUnicodeCharacter{2260}{\ensuremath\neq}%
+  \DeclareUnicodeCharacter{226A}{\ensuremath\ll}%
+  \DeclareUnicodeCharacter{226B}{\ensuremath\gg}%
+  \DeclareUnicodeCharacter{227A}{\ensuremath\prec}%
+  \DeclareUnicodeCharacter{227B}{\ensuremath\succ}%
+  \DeclareUnicodeCharacter{2283}{\ensuremath\supset}%
+  \DeclareUnicodeCharacter{2286}{\ensuremath\subseteq}%
+  \DeclareUnicodeCharacter{228E}{\ensuremath\uplus}%
+  \DeclareUnicodeCharacter{2291}{\ensuremath\sqsubseteq}%
+  \DeclareUnicodeCharacter{2292}{\ensuremath\sqsupseteq}%
+  \DeclareUnicodeCharacter{2293}{\ensuremath\sqcap}%
+  \DeclareUnicodeCharacter{2294}{\ensuremath\sqcup}%
+  \DeclareUnicodeCharacter{2295}{\ensuremath\oplus}%
+  \DeclareUnicodeCharacter{2296}{\ensuremath\ominus}%
+  \DeclareUnicodeCharacter{2297}{\ensuremath\otimes}%
+  \DeclareUnicodeCharacter{2298}{\ensuremath\oslash}%
+  \DeclareUnicodeCharacter{2299}{\ensuremath\odot}%
+  \DeclareUnicodeCharacter{22A2}{\ensuremath\vdash}%
+  \DeclareUnicodeCharacter{22A3}{\ensuremath\dashv}%
+  \DeclareUnicodeCharacter{22A4}{\ensuremath\ptextop}%
+  \DeclareUnicodeCharacter{22A5}{\ensuremath\bot}%
+  \DeclareUnicodeCharacter{22A8}{\ensuremath\models}%
+  \DeclareUnicodeCharacter{22C0}{\ensuremath\bigwedge}%
+  \DeclareUnicodeCharacter{22C1}{\ensuremath\bigvee}%
+  \DeclareUnicodeCharacter{22C2}{\ensuremath\bigcap}%
+  \DeclareUnicodeCharacter{22C3}{\ensuremath\bigcup}%
+  \DeclareUnicodeCharacter{22C4}{\ensuremath\diamond}%
+  \DeclareUnicodeCharacter{22C5}{\ensuremath\cdot}%
+  \DeclareUnicodeCharacter{22C6}{\ensuremath\star}%
+  \DeclareUnicodeCharacter{22C8}{\ensuremath\bowtie}%
+  \DeclareUnicodeCharacter{2308}{\ensuremath\lceil}%
+  \DeclareUnicodeCharacter{2309}{\ensuremath\rceil}%
+  \DeclareUnicodeCharacter{230A}{\ensuremath\lfloor}%
+  \DeclareUnicodeCharacter{230B}{\ensuremath\rfloor}%
+  \DeclareUnicodeCharacter{2322}{\ensuremath\frown}%
+  \DeclareUnicodeCharacter{2323}{\ensuremath\smile}%
+  %
+  \DeclareUnicodeCharacter{25B3}{\ensuremath\triangle}%
+  \DeclareUnicodeCharacter{25B7}{\ensuremath\triangleright}%
+  \DeclareUnicodeCharacter{25BD}{\ensuremath\bigtriangledown}%
+  \DeclareUnicodeCharacter{25C1}{\ensuremath\triangleleft}%
+  \DeclareUnicodeCharacter{25C7}{\ensuremath\diamond}%
+  \DeclareUnicodeCharacter{2660}{\ensuremath\spadesuit}%
+  \DeclareUnicodeCharacter{2661}{\ensuremath\heartsuit}%
+  \DeclareUnicodeCharacter{2662}{\ensuremath\diamondsuit}%
+  \DeclareUnicodeCharacter{2663}{\ensuremath\clubsuit}%
+  \DeclareUnicodeCharacter{266D}{\ensuremath\flat}%
+  \DeclareUnicodeCharacter{266E}{\ensuremath\natural}%
+  \DeclareUnicodeCharacter{266F}{\ensuremath\sharp}%
+  \DeclareUnicodeCharacter{26AA}{\ensuremath\bigcirc}%
+  \DeclareUnicodeCharacter{27B9}{\ensuremath\rangle}%
+  \DeclareUnicodeCharacter{27C2}{\ensuremath\perp}%
+  \DeclareUnicodeCharacter{27E8}{\ensuremath\langle}%
+  \DeclareUnicodeCharacter{27F5}{\ensuremath\longleftarrow}%
+  \DeclareUnicodeCharacter{27F6}{\ensuremath\longrightarrow}%
+  \DeclareUnicodeCharacter{27F7}{\ensuremath\longleftrightarrow}%
+  \DeclareUnicodeCharacter{27FC}{\ensuremath\longmapsto}%
+  \DeclareUnicodeCharacter{29F5}{\ensuremath\setminus}%
+  \DeclareUnicodeCharacter{2A00}{\ensuremath\bigodot}%
+  \DeclareUnicodeCharacter{2A01}{\ensuremath\bigoplus}%
+  \DeclareUnicodeCharacter{2A02}{\ensuremath\bigotimes}%
+  \DeclareUnicodeCharacter{2A04}{\ensuremath\biguplus}%
+  \DeclareUnicodeCharacter{2A06}{\ensuremath\bigsqcup}%
+  \DeclareUnicodeCharacter{2A3F}{\ensuremath\amalg}%
+  \DeclareUnicodeCharacter{2AAF}{\ensuremath\preceq}%
+  \DeclareUnicodeCharacter{2AB0}{\ensuremath\succeq}%
+  %
+  \global\mathchardef\checkmark="1370% actually the square root sign
+  \DeclareUnicodeCharacter{2713}{\ensuremath\checkmark}%
+}% end of \unicodechardefs
+
+% UTF-8 byte sequence (pdfTeX) definitions (replacing and @U command)
+% It makes the setting that replace UTF-8 byte sequence.
+\def\utfeightchardefs{%
+  \let\DeclareUnicodeCharacter\DeclareUnicodeCharacterUTFviii
+  \unicodechardefs
+}
+
+% Whether the active definitions of non-ASCII characters expand to
+% non-active tokens with the same character code.  This is used to
+% write characters literally, instead of using active definitions for
+% printing the correct glyphs.
+\newif\ifpassthroughchars
+\passthroughcharsfalse
+
+% For native Unicode handling (XeTeX and LuaTeX),
+% provide a definition macro to replace/pass-through a Unicode character
+%
+\def\DeclareUnicodeCharacterNative#1#2{%
+  \catcode"#1=\active
+  \def\dodeclareunicodecharacternative##1##2##3{%
+    \begingroup
+      \uccode`\~="##2\relax
+      \uppercase{\gdef~}{%
+        \ifpassthroughchars
+          ##1%
+        \else
+          ##3%
+        \fi
+      }
+    \endgroup
+  }
+  \begingroup
+    \uccode`\.="#1\relax
+    \uppercase{\def\UTFNativeTmp{.}}%
+    \expandafter\dodeclareunicodecharacternative\UTFNativeTmp{#1}{#2}%
+  \endgroup
+}
+
+% Native Unicode handling (XeTeX and LuaTeX) character replacing definition.
+% It activates the setting that replaces Unicode characters.
+\def\nativeunicodechardefs{%
+  \let\DeclareUnicodeCharacter\DeclareUnicodeCharacterNative
+  \unicodechardefs
+}
+
+% For native Unicode handling (XeTeX and LuaTeX),
+% make the character token expand
+% to the sequences given in \unicodechardefs for printing.
+\def\DeclareUnicodeCharacterNativeAtU#1#2{%
+  \def\UTFAtUTmp{#2}
+  \expandafter\globallet\csname uni:#1\endcsname \UTFAtUTmp
+}
+
+% @U command definitions for native Unicode handling (XeTeX and LuaTeX).
+\def\nativeunicodechardefsatu{%
+  \let\DeclareUnicodeCharacter\DeclareUnicodeCharacterNativeAtU
+  \unicodechardefs
+}
+
+% US-ASCII character definitions.
+\def\asciichardefs{% nothing need be done
+   \relax
+}
+
+% Define all Unicode characters we know about.  This makes UTF-8 the default
+% input encoding and allows @U to work.
+\iftxinativeunicodecapable
+  \nativeunicodechardefsatu
+\else
+  \utfeightchardefs
+\fi
+
+\message{formatting,}
+
+\newdimen\defaultparindent \defaultparindent = 15pt
+
+\chapheadingskip = 15pt plus 4pt minus 2pt
+\secheadingskip = 12pt plus 3pt minus 2pt
+\subsecheadingskip = 9pt plus 2pt minus 2pt
+
+% Prevent underfull vbox error messages.
+\vbadness = 10000
+
+% Don't be very finicky about underfull hboxes, either.
+\hbadness = 6666
+
+% Following George Bush, get rid of widows and orphans.
+\widowpenalty=10000
+\clubpenalty=10000
+
+% Use TeX 3.0's \emergencystretch to help line breaking, but if we're
+% using an old version of TeX, don't do anything.  We want the amount of
+% stretch added to depend on the line length, hence the dependence on
+% \hsize.  We call this whenever the paper size is set.
+%
+\def\setemergencystretch{%
+  \ifx\emergencystretch\thisisundefined
+    % Allow us to assign to \emergencystretch anyway.
+    \def\emergencystretch{\dimen0}%
+  \else
+    \emergencystretch = .15\hsize
+  \fi
+}
+
+% Parameters in order: 1) textheight; 2) textwidth;
+% 3) voffset; 4) hoffset; 5) binding offset; 6) topskip;
+% 7) physical page height; 8) physical page width.
+%
+% We also call \setleading{\textleading}, so the caller should define
+% \textleading.  The caller should also set \parskip.
+%
+\def\internalpagesizes#1#2#3#4#5#6#7#8{%
+  \voffset = #3\relax
+  \topskip = #6\relax
+  \splittopskip = \topskip
+  %
+  \vsize = #1\relax
+  \advance\vsize by \topskip
+  \outervsize = \vsize
+  \advance\outervsize by 2\topandbottommargin
+  \txipageheight = \vsize
+  %
+  \hsize = #2\relax
+  \outerhsize = \hsize
+  \advance\outerhsize by 0.5in
+  \txipagewidth = \hsize
+  %
+  \normaloffset = #4\relax
+  \bindingoffset = #5\relax
+  %
+  \ifpdf
+    \pdfpageheight #7\relax
+    \pdfpagewidth #8\relax
+    % if we don't reset these, they will remain at "1 true in" of
+    % whatever layout pdftex was dumped with.
+    \pdfhorigin = 1 true in
+    \pdfvorigin = 1 true in
+  \else
+    \ifx\XeTeXrevision\thisisundefined
+      \special{papersize=#8,#7}%
+    \else
+      \pdfpageheight #7\relax
+      \pdfpagewidth #8\relax
+      % XeTeX does not have \pdfhorigin and \pdfvorigin.
+    \fi
+  \fi
+  %
+  \setleading{\textleading}
+  %
+  \parindent = \defaultparindent
+  \setemergencystretch
+}
+
+% @letterpaper (the default).
+\def\letterpaper{{\globaldefs = 1
+  \parskip = 3pt plus 2pt minus 1pt
+  \textleading = 13.2pt
+  %
+  % If page is nothing but text, make it come out even.
+  \internalpagesizes{607.2pt}{6in}% that's 46 lines
+                    {\voffset}{.25in}%
+                    {\bindingoffset}{36pt}%
+                    {11in}{8.5in}%
+}}
+
+% Use @smallbook to reset parameters for 7x9.25 trim size.
+\def\smallbook{{\globaldefs = 1
+  \parskip = 2pt plus 1pt
+  \textleading = 12pt
+  %
+  \internalpagesizes{7.5in}{5in}%
+                    {-.2in}{0in}%
+                    {\bindingoffset}{16pt}%
+                    {9.25in}{7in}%
+  %
+  \lispnarrowing = 0.3in
+  \tolerance = 700
+  \contentsrightmargin = 0pt
+  \defbodyindent = .5cm
+}}
+
+% Use @smallerbook to reset parameters for 6x9 trim size.
+% (Just testing, parameters still in flux.)
+\def\smallerbook{{\globaldefs = 1
+  \parskip = 1.5pt plus 1pt
+  \textleading = 12pt
+  %
+  \internalpagesizes{7.4in}{4.8in}%
+                    {-.2in}{-.4in}%
+                    {0pt}{14pt}%
+                    {9in}{6in}%
+  %
+  \lispnarrowing = 0.25in
+  \tolerance = 700
+  \contentsrightmargin = 0pt
+  \defbodyindent = .4cm
+}}
+
+% Use @afourpaper to print on European A4 paper.
+\def\afourpaper{{\globaldefs = 1
+  \parskip = 3pt plus 2pt minus 1pt
+  \textleading = 13.2pt
+  %
+  % Double-side printing via postscript on Laserjet 4050
+  % prints double-sided nicely when \bindingoffset=10mm and \hoffset=-6mm.
+  % To change the settings for a different printer or situation, adjust
+  % \normaloffset until the front-side and back-side texts align.  Then
+  % do the same for \bindingoffset.  You can set these for testing in
+  % your texinfo source file like this:
+  % @tex
+  % \global\normaloffset = -6mm
+  % \global\bindingoffset = 10mm
+  % @end tex
+  \internalpagesizes{673.2pt}{160mm}% that's 51 lines
+                    {\voffset}{\hoffset}%
+                    {\bindingoffset}{44pt}%
+                    {297mm}{210mm}%
+  %
+  \tolerance = 700
+  \contentsrightmargin = 0pt
+  \defbodyindent = 5mm
+}}
+
+% Use @afivepaper to print on European A5 paper.
+% From romildo@urano.iceb.ufop.br, 2 July 2000.
+% He also recommends making @example and @lisp be small.
+\def\afivepaper{{\globaldefs = 1
+  \parskip = 2pt plus 1pt minus 0.1pt
+  \textleading = 12.5pt
+  %
+  \internalpagesizes{160mm}{120mm}%
+                    {\voffset}{\hoffset}%
+                    {\bindingoffset}{8pt}%
+                    {210mm}{148mm}%
+  %
+  \lispnarrowing = 0.2in
+  \tolerance = 800
+  \contentsrightmargin = 0pt
+  \defbodyindent = 2mm
+  \tableindent = 12mm
+}}
+
+% A specific text layout, 24x15cm overall, intended for A4 paper.
+\def\afourlatex{{\globaldefs = 1
+  \afourpaper
+  \internalpagesizes{237mm}{150mm}%
+                    {\voffset}{4.6mm}%
+                    {\bindingoffset}{7mm}%
+                    {297mm}{210mm}%
+  %
+  % Must explicitly reset to 0 because we call \afourpaper.
+  \globaldefs = 0
+}}
+
+% Use @afourwide to print on A4 paper in landscape format.
+\def\afourwide{{\globaldefs = 1
+  \afourpaper
+  \internalpagesizes{241mm}{165mm}%
+                    {\voffset}{-2.95mm}%
+                    {\bindingoffset}{7mm}%
+                    {297mm}{210mm}%
+  \globaldefs = 0
+}}
+
+\def\bsixpaper{{\globaldefs = 1
+  \afourpaper
+  \internalpagesizes{140mm}{100mm}%
+                    {-6.35mm}{-12.7mm}%
+                    {\bindingoffset}{14pt}%
+                    {176mm}{125mm}%
+  \let\SETdispenvsize=\smallword
+  \lispnarrowing = 0.2in
+  \globaldefs = 0
+}}
+
+
+% @pagesizes TEXTHEIGHT[,TEXTWIDTH]
+% Perhaps we should allow setting the margins, \topskip, \parskip,
+% and/or leading, also. Or perhaps we should compute them somehow.
+%
+\parseargdef\pagesizes{\pagesizesyyy #1,,\finish}
+\def\pagesizesyyy#1,#2,#3\finish{{%
+  \setbox0 = \hbox{\ignorespaces #2}\ifdim\wd0 > 0pt \hsize=#2\relax \fi
+  \globaldefs = 1
+  %
+  \parskip = 3pt plus 2pt minus 1pt
+  \setleading{\textleading}%
+  %
+  \dimen0 = #1\relax
+  \advance\dimen0 by 2.5in % default 1in margin above heading line
+                           % and 1.5in to include heading, footing and
+                           % bottom margin
+  %
+  \dimen2 = \hsize
+  \advance\dimen2 by 2in % default to 1 inch margin on each side
+  %
+  \internalpagesizes{#1}{\hsize}%
+                    {\voffset}{\normaloffset}%
+                    {\bindingoffset}{44pt}%
+                    {\dimen0}{\dimen2}%
+}}
+
+% Set default to letter.
+%
+\letterpaper
+
+% Default value of \hfuzz, for suppressing warnings about overfull hboxes.
+\hfuzz = 1pt
+
+
+\message{and turning on texinfo input format.}
+
+\def^^L{\par} % remove \outer, so ^L can appear in an @comment
+
+% DEL is a comment character, in case @c does not suffice.
+\catcode`\^^? = 14
+
+% Define macros to output various characters with catcode for normal text.
+\catcode`\"=\other \def\normaldoublequote{"}
+\catcode`\$=\other \def\normaldollar{$}%$ font-lock fix
+\catcode`\+=\other \def\normalplus{+}
+\catcode`\<=\other \def\normalless{<}
+\catcode`\>=\other \def\normalgreater{>}
+\catcode`\^=\other \def\normalcaret{^}
+\catcode`\_=\other \def\normalunderscore{_}
+\catcode`\|=\other \def\normalverticalbar{|}
+\catcode`\~=\other \def\normaltilde{~}
+
+% This macro is used to make a character print one way in \tt
+% (where it can probably be output as-is), and another way in other fonts,
+% where something hairier probably needs to be done.
+%
+% #1 is what to print if we are indeed using \tt; #2 is what to print
+% otherwise.  Since all the Computer Modern typewriter fonts have zero
+% interword stretch (and shrink), and it is reasonable to expect all
+% typewriter fonts to have this, we can check that font parameter.
+%
+\def\ifusingtt#1#2{\ifdim \fontdimen3\font=0pt #1\else #2\fi}
+
+% Same as above, but check for italic font.  Actually this also catches
+% non-italic slanted fonts since it is impossible to distinguish them from
+% italic fonts.  But since this is only used by $ and it uses \sl anyway
+% this is not a problem.
+\def\ifusingit#1#2{\ifdim \fontdimen1\font>0pt #1\else #2\fi}
+
+% Set catcodes for Texinfo file
+
+% Active characters for printing the wanted glyph.
+% Most of these we simply print from the \tt font, but for some, we can
+% use math or other variants that look better in normal text.
+%
+\catcode`\"=\active
+\def\activedoublequote{{\tt\char34}}
+\let"=\activedoublequote
+\catcode`\~=\active \def\activetilde{{\tt\char126}} \let~ = \activetilde
+\chardef\hatchar=`\^
+\catcode`\^=\active \def\activehat{{\tt \hatchar}} \let^ = \activehat
+
+\catcode`\_=\active
+\def_{\ifusingtt\normalunderscore\_}
+\def\_{\leavevmode \kern.07em \vbox{\hrule width.3em height.1ex}\kern .07em }
+\let\realunder=_
+
+\catcode`\|=\active \def|{{\tt\char124}}
+
+\chardef \less=`\<
+\catcode`\<=\active \def\activeless{{\tt \less}}\let< = \activeless
+\chardef \gtr=`\>
+\catcode`\>=\active \def\activegtr{{\tt \gtr}}\let> = \activegtr
+\catcode`\+=\active \def+{{\tt \char 43}}
+\catcode`\$=\active \def${\ifusingit{{\sl\$}}\normaldollar}%$ font-lock fix
+\catcode`\-=\active \let-=\normaldash
+
+
+% used for headline/footline in the output routine, in case the page
+% breaks in the middle of an @tex block.
+\def\texinfochars{%
+  \let< = \activeless
+  \let> = \activegtr
+  \let~ = \activetilde 
+  \let^ = \activehat
+  \setregularquotes
+  \let\b = \strong
+  \let\i = \smartitalic
+  % in principle, all other definitions in \tex have to be undone too.
+}
+
+% Used sometimes to turn off (effectively) the active characters even after
+% parsing them.
+\def\turnoffactive{%
+  \normalturnoffactive
+  \otherbackslash
+}
+
+\catcode`\@=0
+
+% \backslashcurfont outputs one backslash character in current font,
+% as in \char`\\.
+\global\chardef\backslashcurfont=`\\
+
+% \realbackslash is an actual character `\' with catcode other.
+{\catcode`\\=\other @gdef@realbackslash{\}}
+
+% In Texinfo, backslash is an active character; it prints the backslash
+% in fixed width font.
+\catcode`\\=\active  % @ for escape char from now on.
+
+% Print a typewriter backslash.  For math mode, we can't simply use
+% \backslashcurfont: the story here is that in math mode, the \char
+% of \backslashcurfont ends up printing the roman \ from the math symbol
+% font (because \char in math mode uses the \mathcode, and plain.tex
+% sets \mathcode`\\="026E).  Hence we use an explicit \mathchar,
+% which is the decimal equivalent of "715c (class 7, e.g., use \fam;
+% ignored family value; char position "5C).  We can't use " for the
+% usual hex value because it has already been made active.
+
+@def@ttbackslash{{@tt @ifmmode @mathchar29020 @else @backslashcurfont @fi}}
+@let@backslashchar = @ttbackslash % @backslashchar{} is for user documents.
+
+% \otherbackslash defines an active \ to be a literal `\' character with
+% catcode other.
+@gdef@otherbackslash{@let\=@realbackslash}
+
+% Same as @turnoffactive except outputs \ as {\tt\char`\\} instead of
+% the literal character `\'.
+%
+{@catcode`- = @active
+ @gdef@normalturnoffactive{%
+   @passthroughcharstrue
+   @let-=@normaldash
+   @let"=@normaldoublequote
+   @let$=@normaldollar %$ font-lock fix
+   @let+=@normalplus
+   @let<=@normalless
+   @let>=@normalgreater
+   @let^=@normalcaret
+   @let_=@normalunderscore
+   @let|=@normalverticalbar
+   @let~=@normaltilde
+   @let\=@ttbackslash
+   @setregularquotes
+   @unsepspaces
+ }
+}
+
+% If a .fmt file is being used, characters that might appear in a file
+% name cannot be active until we have parsed the command line.
+% So turn them off again, and have @fixbackslash turn them back on.
+@catcode`+=@other @catcode`@_=@other
+
+% \enablebackslashhack - allow file to begin `\input texinfo'
+%
+% If a .fmt file is being used, we don't want the `\input texinfo' to show up.
+% That is what \eatinput is for; after that, the `\' should revert to printing
+% a backslash.
+% If the file did not have a `\input texinfo', then it is turned off after
+% the first line; otherwise the first `\' in the file would cause an error.
+% This is used on the very last line of this file, texinfo.tex.
+% We also use @c to call @fixbackslash, in case ends of lines are hidden.
+{
+@catcode`@^=7
+@catcode`@^^M=13@gdef@enablebackslashhack{%
+  @global@let\ = @eatinput%
+  @catcode`@^^M=13%
+  @def@c{@fixbackslash@c}%
+  % Definition for the newline at the end of this file.
+  @def ^^M{@let^^M@secondlinenl}%
+  % Definition for a newline in the main Texinfo file.
+  @gdef @secondlinenl{@fixbackslash}%
+  % In case the first line has a whole-line command on it
+  @let@originalparsearg@parsearg
+  @def@parsearg{@fixbackslash@originalparsearg}
+}}
+
+{@catcode`@^=7 @catcode`@^^M=13%
+@gdef@eatinput input texinfo#1^^M{@fixbackslash}}
+
+% Emergency active definition of newline, in case an active newline token
+% appears by mistake.
+{@catcode`@^=7 @catcode13=13%
+@gdef@enableemergencynewline{%
+  @gdef^^M{%
+    @par%
+    %<warning: active newline>@par%
+}}}
+
+
+@gdef@fixbackslash{%
+  @ifx\@eatinput @let\ = @ttbackslash @fi
+  @catcode13=5 % regular end of line
+  @enableemergencynewline
+  @let@c=@comment
+  @let@parsearg@originalparsearg
+  % Also turn back on active characters that might appear in the input
+  % file name, in case not using a pre-dumped format.
+  @catcode`+=@active
+  @catcode`@_=@active
+  %
+  % If texinfo.cnf is present on the system, read it.
+  % Useful for site-wide @afourpaper, etc.  This macro, @fixbackslash, gets
+  % called at the beginning of every Texinfo file.  Not opening texinfo.cnf
+  % directly in this file, texinfo.tex, makes it possible to make a format
+  % file for Texinfo.
+  %
+  @openin 1 texinfo.cnf
+  @ifeof 1 @else @input texinfo.cnf @fi
+  @closein 1
+}
+
+
+% Say @foo, not \foo, in error messages.
+@escapechar = `@@
+
+% These (along with & and #) are made active for url-breaking, so need
+% active definitions as the normal characters.
+@def@normaldot{.}
+@def@normalquest{?}
+@def@normalslash{/}
+
+% These look ok in all fonts, so just make them not special.
+% @hashchar{} gets its own user-level command, because of #line.
+@catcode`@& = @other @def@normalamp{&}
+@catcode`@# = @other @def@normalhash{#}
+@catcode`@% = @other @def@normalpercent{%}
+
+@let @hashchar = @normalhash
+
+@c Finally, make ` and ' active, so that txicodequoteundirected and
+@c txicodequotebacktick work right in, e.g., @w{@code{`foo'}}.  If we
+@c don't make ` and ' active, @code will not get them as active chars.
+@c Do this last of all since we use ` in the previous @catcode assignments.
+@catcode`@'=@active
+@catcode`@`=@active
+@setregularquotes
+
+@c Local variables:
+@c eval: (add-hook 'before-save-hook 'time-stamp)
+@c page-delimiter: "^\\\\message\\|emacs-page"
+@c time-stamp-start: "def\\\\texinfoversion{"
+@c time-stamp-format: "%:y-%02m-%02d.%02H"
+@c time-stamp-end: "}"
+@c End:
+
+@c vim:sw=2:
+
+@enablebackslashhack
+
diff --git a/info/build-aux/texinfo.tex b/info/build-aux/texinfo.tex
new file mode 100644
index 00000000..89bd6025
--- /dev/null
+++ b/info/build-aux/texinfo.tex
@@ -0,0 +1,11612 @@
+% texinfo.tex -- TeX macros to handle Texinfo files.
+% 
+% Load plain if necessary, i.e., if running under initex.
+\expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi
+%
+\def\texinfoversion{2021-04-25.21}
+%
+% Copyright 1985, 1986, 1988, 1990-2021 Free Software Foundation, Inc.
+%
+% This texinfo.tex file is free software: you can redistribute it and/or
+% modify it under the terms of the GNU General Public License as
+% published by the Free Software Foundation, either version 3 of the
+% License, or (at your option) any later version.
+%
+% This texinfo.tex file is distributed in the hope that it will be
+% useful, but WITHOUT ANY WARRANTY; without even the implied warranty
+% of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+% General Public License for more details.
+%
+% You should have received a copy of the GNU General Public License
+% along with this program.  If not, see <https://www.gnu.org/licenses/>.
+%
+% As a special exception, when this file is read by TeX when processing
+% a Texinfo source document, you may use the result without
+% restriction. This Exception is an additional permission under section 7
+% of the GNU General Public License, version 3 ("GPLv3").
+%
+% Please try the latest version of texinfo.tex before submitting bug
+% reports; you can get the latest version from:
+%   https://ftp.gnu.org/gnu/texinfo/ (the Texinfo release area), or
+%   https://ftpmirror.gnu.org/texinfo/ (same, via a mirror), or
+%   https://www.gnu.org/software/texinfo/ (the Texinfo home page)
+% The texinfo.tex in any given distribution could well be out
+% of date, so if that's what you're using, please check.
+%
+% Send bug reports to bug-texinfo@gnu.org.  Please include a
+% complete document in each bug report with which we can reproduce the
+% problem.  Patches are, of course, greatly appreciated.
+%
+% To process a Texinfo manual with TeX, it's most reliable to use the
+% texi2dvi shell script that comes with the distribution.  For a simple
+% manual foo.texi, however, you can get away with this:
+%   tex foo.texi
+%   texindex foo.??
+%   tex foo.texi
+%   tex foo.texi
+%   dvips foo.dvi -o  # or whatever; this makes foo.ps.
+% The extra TeX runs get the cross-reference information correct.
+% Sometimes one run after texindex suffices, and sometimes you need more
+% than two; texi2dvi does it as many times as necessary.
+%
+% It is possible to adapt texinfo.tex for other languages, to some
+% extent.  You can get the existing language-specific files from the
+% full Texinfo distribution.
+%
+% The GNU Texinfo home page is https://www.gnu.org/software/texinfo.
+
+
+\message{Loading texinfo [version \texinfoversion]:}
+
+% If in a .fmt file, print the version number
+% and turn on active characters that we couldn't do earlier because
+% they might have appeared in the input file name.
+\everyjob{\message{[Texinfo version \texinfoversion]}%
+  \catcode`+=\active \catcode`\_=\active}
+
+% LaTeX's \typeout.  This ensures that the messages it is used for
+% are identical in format to the corresponding ones from latex/pdflatex.
+\def\typeout{\immediate\write17}%
+
+\chardef\other=12
+
+% We never want plain's \outer definition of \+ in Texinfo.
+% For @tex, we can use \tabalign.
+\let\+ = \relax
+
+% Save some plain tex macros whose names we will redefine.
+\let\ptexb=\b
+\let\ptexbullet=\bullet
+\let\ptexc=\c
+\let\ptexcomma=\,
+\let\ptexdot=\.
+\let\ptexdots=\dots
+\let\ptexend=\end
+\let\ptexequiv=\equiv
+\let\ptexexclam=\!
+\let\ptexfootnote=\footnote
+\let\ptexgtr=>
+\let\ptexhat=^
+\let\ptexi=\i
+\let\ptexindent=\indent
+\let\ptexinsert=\insert
+\let\ptexlbrace=\{
+\let\ptexless=<
+\let\ptexnewwrite\newwrite
+\let\ptexnoindent=\noindent
+\let\ptexplus=+
+\let\ptexraggedright=\raggedright
+\let\ptexrbrace=\}
+\let\ptexslash=\/
+\let\ptexsp=\sp
+\let\ptexstar=\*
+\let\ptexsup=\sup
+\let\ptext=\t
+\let\ptextop=\top
+{\catcode`\'=\active \global\let\ptexquoteright'}% active in plain's math mode
+
+% If this character appears in an error message or help string, it
+% starts a new line in the output.
+\newlinechar = `^^J
+
+% Use TeX 3.0's \inputlineno to get the line number, for better error
+% messages, but if we're using an old version of TeX, don't do anything.
+%
+\ifx\inputlineno\thisisundefined
+  \let\linenumber = \empty % Pre-3.0.
+\else
+  \def\linenumber{l.\the\inputlineno:\space}
+\fi
+
+% Set up fixed words for English if not already set.
+\ifx\putwordAppendix\undefined  \gdef\putwordAppendix{Appendix}\fi
+\ifx\putwordChapter\undefined   \gdef\putwordChapter{Chapter}\fi
+\ifx\putworderror\undefined     \gdef\putworderror{error}\fi
+\ifx\putwordfile\undefined      \gdef\putwordfile{file}\fi
+\ifx\putwordin\undefined        \gdef\putwordin{in}\fi
+\ifx\putwordIndexIsEmpty\undefined       \gdef\putwordIndexIsEmpty{(Index is empty)}\fi
+\ifx\putwordIndexNonexistent\undefined   \gdef\putwordIndexNonexistent{(Index is nonexistent)}\fi
+\ifx\putwordInfo\undefined      \gdef\putwordInfo{Info}\fi
+\ifx\putwordInstanceVariableof\undefined \gdef\putwordInstanceVariableof{Instance Variable of}\fi
+\ifx\putwordMethodon\undefined  \gdef\putwordMethodon{Method on}\fi
+\ifx\putwordNoTitle\undefined   \gdef\putwordNoTitle{No Title}\fi
+\ifx\putwordof\undefined        \gdef\putwordof{of}\fi
+\ifx\putwordon\undefined        \gdef\putwordon{on}\fi
+\ifx\putwordpage\undefined      \gdef\putwordpage{page}\fi
+\ifx\putwordsection\undefined   \gdef\putwordsection{section}\fi
+\ifx\putwordSection\undefined   \gdef\putwordSection{Section}\fi
+\ifx\putwordsee\undefined       \gdef\putwordsee{see}\fi
+\ifx\putwordSee\undefined       \gdef\putwordSee{See}\fi
+\ifx\putwordShortTOC\undefined  \gdef\putwordShortTOC{Short Contents}\fi
+\ifx\putwordTOC\undefined       \gdef\putwordTOC{Table of Contents}\fi
+%
+\ifx\putwordMJan\undefined \gdef\putwordMJan{January}\fi
+\ifx\putwordMFeb\undefined \gdef\putwordMFeb{February}\fi
+\ifx\putwordMMar\undefined \gdef\putwordMMar{March}\fi
+\ifx\putwordMApr\undefined \gdef\putwordMApr{April}\fi
+\ifx\putwordMMay\undefined \gdef\putwordMMay{May}\fi
+\ifx\putwordMJun\undefined \gdef\putwordMJun{June}\fi
+\ifx\putwordMJul\undefined \gdef\putwordMJul{July}\fi
+\ifx\putwordMAug\undefined \gdef\putwordMAug{August}\fi
+\ifx\putwordMSep\undefined \gdef\putwordMSep{September}\fi
+\ifx\putwordMOct\undefined \gdef\putwordMOct{October}\fi
+\ifx\putwordMNov\undefined \gdef\putwordMNov{November}\fi
+\ifx\putwordMDec\undefined \gdef\putwordMDec{December}\fi
+%
+\ifx\putwordDefmac\undefined    \gdef\putwordDefmac{Macro}\fi
+\ifx\putwordDefspec\undefined   \gdef\putwordDefspec{Special Form}\fi
+\ifx\putwordDefvar\undefined    \gdef\putwordDefvar{Variable}\fi
+\ifx\putwordDefopt\undefined    \gdef\putwordDefopt{User Option}\fi
+\ifx\putwordDeffunc\undefined   \gdef\putwordDeffunc{Function}\fi
+
+% Give the space character the catcode for a space.
+\def\spaceisspace{\catcode`\ =10\relax}
+
+% Likewise for ^^M, the end of line character.
+\def\endlineisspace{\catcode13=10\relax}
+
+\chardef\dashChar  = `\-
+\chardef\slashChar = `\/
+\chardef\underChar = `\_
+
+% Ignore a token.
+%
+\def\gobble#1{}
+
+% The following is used inside several \edef's.
+\def\makecsname#1{\expandafter\noexpand\csname#1\endcsname}
+
+% Hyphenation fixes.
+\hyphenation{
+  Flor-i-da Ghost-script Ghost-view Mac-OS Post-Script
+  ap-pen-dix bit-map bit-maps
+  data-base data-bases eshell fall-ing half-way long-est man-u-script
+  man-u-scripts mini-buf-fer mini-buf-fers over-view par-a-digm
+  par-a-digms rath-er rec-tan-gu-lar ro-bot-ics se-vere-ly set-up spa-ces
+  spell-ing spell-ings
+  stand-alone strong-est time-stamp time-stamps which-ever white-space
+  wide-spread wrap-around
+}
+
+% Sometimes it is convenient to have everything in the transcript file
+% and nothing on the terminal.  We don't just call \tracingall here,
+% since that produces some useless output on the terminal.  We also make
+% some effort to order the tracing commands to reduce output in the log
+% file; cf. trace.sty in LaTeX.
+%
+\def\gloggingall{\begingroup \globaldefs = 1 \loggingall \endgroup}%
+\def\loggingall{%
+  \tracingstats2
+  \tracingpages1
+  \tracinglostchars2  % 2 gives us more in etex
+  \tracingparagraphs1
+  \tracingoutput1
+  \tracingmacros2
+  \tracingrestores1
+  \showboxbreadth\maxdimen \showboxdepth\maxdimen
+  \ifx\eTeXversion\thisisundefined\else % etex gives us more logging
+    \tracingscantokens1
+    \tracingifs1
+    \tracinggroups1
+    \tracingnesting2
+    \tracingassigns1
+  \fi
+  \tracingcommands3  % 3 gives us more in etex
+  \errorcontextlines16
+}%
+
+% @errormsg{MSG}.  Do the index-like expansions on MSG, but if things
+% aren't perfect, it's not the end of the world, being an error message,
+% after all.
+% 
+\def\errormsg{\begingroup \indexnofonts \doerrormsg}
+\def\doerrormsg#1{\errmessage{#1}}
+
+% add check for \lastpenalty to plain's definitions.  If the last thing
+% we did was a \nobreak, we don't want to insert more space.
+%
+\def\smallbreak{\ifnum\lastpenalty<10000\par\ifdim\lastskip<\smallskipamount
+  \removelastskip\penalty-50\smallskip\fi\fi}
+\def\medbreak{\ifnum\lastpenalty<10000\par\ifdim\lastskip<\medskipamount
+  \removelastskip\penalty-100\medskip\fi\fi}
+\def\bigbreak{\ifnum\lastpenalty<10000\par\ifdim\lastskip<\bigskipamount
+  \removelastskip\penalty-200\bigskip\fi\fi}
+
+% Output routine
+%
+
+% For a final copy, take out the rectangles
+% that mark overfull boxes (in case you have decided
+% that the text looks ok even though it passes the margin).
+%
+\def\finalout{\overfullrule=0pt }
+
+\newdimen\outerhsize \newdimen\outervsize % set by the paper size routines
+\newdimen\topandbottommargin \topandbottommargin=.75in
+
+% Output a mark which sets \thischapter, \thissection and \thiscolor.
+% We dump everything together because we only have one kind of mark.
+% This works because we only use \botmark / \topmark, not \firstmark.
+%
+% A mark contains a subexpression of the \ifcase ... \fi construct.
+% \get*marks macros below extract the needed part using \ifcase.
+%
+% Another complication is to let the user choose whether \thischapter
+% (\thissection) refers to the chapter (section) in effect at the top
+% of a page, or that at the bottom of a page.
+
+% \domark is called twice inside \chapmacro, to add one
+% mark before the section break, and one after.
+%   In the second call \prevchapterdefs is the same as \currentchapterdefs,
+% and \prevsectiondefs is the same as \currentsectiondefs.
+%   Then if the page is not broken at the mark, some of the previous
+% section appears on the page, and we can get the name of this section
+% from \firstmark for @everyheadingmarks top.
+%   @everyheadingmarks bottom uses \botmark.
+%
+% See page 260 of The TeXbook.
+\def\domark{%
+  \toks0=\expandafter{\currentchapterdefs}%
+  \toks2=\expandafter{\currentsectiondefs}%
+  \toks4=\expandafter{\prevchapterdefs}%
+  \toks6=\expandafter{\prevsectiondefs}%
+  \toks8=\expandafter{\currentcolordefs}%
+  \mark{%
+                   \the\toks0 \the\toks2  % 0: marks for @everyheadingmarks top
+      \noexpand\or \the\toks4 \the\toks6  % 1: for @everyheadingmarks bottom
+    \noexpand\else \the\toks8             % 2: color marks
+  }%
+}
+
+% \gettopheadingmarks, \getbottomheadingmarks,
+% \getcolormarks - extract needed part of mark.
+%
+% \topmark doesn't work for the very first chapter (after the title
+% page or the contents), so we use \firstmark there -- this gets us
+% the mark with the chapter defs, unless the user sneaks in, e.g.,
+% @setcolor (or @url, or @link, etc.) between @contents and the very
+% first @chapter.
+\def\gettopheadingmarks{%
+  \ifcase0\the\savedtopmark\fi
+  \ifx\thischapter\empty \ifcase0\firstmark\fi \fi
+}
+\def\getbottomheadingmarks{\ifcase1\botmark\fi}
+\def\getcolormarks{\ifcase2\the\savedtopmark\fi}
+
+% Avoid "undefined control sequence" errors.
+\def\currentchapterdefs{}
+\def\currentsectiondefs{}
+\def\currentsection{}
+\def\prevchapterdefs{}
+\def\prevsectiondefs{}
+\def\currentcolordefs{}
+
+% Margin to add to right of even pages, to left of odd pages.
+\newdimen\bindingoffset
+\newdimen\normaloffset
+\newdimen\txipagewidth \newdimen\txipageheight
+
+% Main output routine.
+%
+\chardef\PAGE = 255
+\newtoks\defaultoutput
+\defaultoutput = {\savetopmark\onepageout{\pagecontents\PAGE}}
+\output=\expandafter{\the\defaultoutput}
+
+\newbox\headlinebox
+\newbox\footlinebox
+
+% When outputting the double column layout for indices, an output routine
+% is run several times, which hides the original value of \topmark.  This
+% can lead to a page heading being output and duplicating the chapter heading
+% of the index.  Hence, save the contents of \topmark at the beginning of
+% the output routine.  The saved contents are valid until we actually
+% \shipout a page.
+%
+% (We used to run a short output routine to actually set \topmark and 
+% \firstmark to the right values, but if this was called with an empty page 
+% containing whatsits for writing index entries, the whatsits would be thrown 
+% away and the index auxiliary file would remain empty.)
+%
+\newtoks\savedtopmark
+\newif\iftopmarksaved
+\topmarksavedtrue
+\def\savetopmark{%
+  \iftopmarksaved\else
+    \global\savedtopmark=\expandafter{\topmark}%
+    \global\topmarksavedtrue
+  \fi
+}
+
+% \onepageout takes a vbox as an argument.
+% \shipout a vbox for a single page, adding an optional header, footer
+% and footnote.  This also causes index entries for this page to be written
+% to the auxiliary files.
+%
+\def\onepageout#1{%
+  \hoffset=\normaloffset
+  %
+  \ifodd\pageno  \advance\hoffset by \bindingoffset
+  \else \advance\hoffset by -\bindingoffset\fi
+  %
+  \checkchapterpage
+  %
+  % Retrieve the information for the headings from the marks in the page,
+  % and call Plain TeX's \makeheadline and \makefootline, which use the
+  % values in \headline and \footline.
+  %
+  % Common context changes for both heading and footing.
+  % Do this outside of the \shipout so @code etc. will be expanded in
+  % the headline as they should be, not taken literally (outputting ''code).
+  \def\commonheadfootline{\let\hsize=\txipagewidth \texinfochars}
+  %
+  \ifodd\pageno \getoddheadingmarks \else \getevenheadingmarks \fi
+  \global\setbox\headlinebox = \vbox{\commonheadfootline \makeheadline}%
+  \ifodd\pageno \getoddfootingmarks \else \getevenfootingmarks \fi
+  \global\setbox\footlinebox = \vbox{\commonheadfootline \makefootline}%
+  %
+  {%
+    % Set context for writing to auxiliary files like index files.
+    % Have to do this stuff outside the \shipout because we want it to
+    % take effect in \write's, yet the group defined by the \vbox ends
+    % before the \shipout runs.
+    %
+    \atdummies         % don't expand commands in the output.
+    \turnoffactive
+    \shipout\vbox{%
+      % Do this early so pdf references go to the beginning of the page.
+      \ifpdfmakepagedest \pdfdest name{\the\pageno} xyz\fi
+      %
+      \unvbox\headlinebox
+      \pagebody{#1}%
+      \ifdim\ht\footlinebox > 0pt
+        % Only leave this space if the footline is nonempty.
+        % (We lessened \vsize for it in \oddfootingyyy.)
+        % The \baselineskip=24pt in plain's \makefootline has no effect.
+        \vskip 24pt
+        \unvbox\footlinebox
+      \fi
+      %
+    }%
+  }%
+  \global\topmarksavedfalse
+  \advancepageno
+  \ifnum\outputpenalty>-20000 \else\dosupereject\fi
+}
+
+\newinsert\margin \dimen\margin=\maxdimen
+
+% Main part of page, including any footnotes
+\def\pagebody#1{\vbox to\txipageheight{\boxmaxdepth=\maxdepth #1}}
+{\catcode`\@ =11
+\gdef\pagecontents#1{\ifvoid\topins\else\unvbox\topins\fi
+% marginal hacks, juha@viisa.uucp (Juha Takala)
+\ifvoid\margin\else % marginal info is present
+  \rlap{\kern\hsize\vbox to\z@{\kern1pt\box\margin \vss}}\fi
+\dimen@=\dp#1\relax \unvbox#1\relax
+\ifvoid\footins\else\vskip\skip\footins\footnoterule \unvbox\footins\fi
+\ifr@ggedbottom \kern-\dimen@ \vfil \fi}
+}
+
+% Check if we are on the first page of a chapter.  Used for printing headings.
+\newif\ifchapterpage
+\def\checkchapterpage{%
+  % Get the chapter that was current at the end of the last page
+  \ifcase1\the\savedtopmark\fi
+  \let\prevchaptername\thischaptername
+  %
+  \ifodd\pageno \getoddheadingmarks \else \getevenheadingmarks \fi
+  \let\curchaptername\thischaptername
+  %
+  \ifx\curchaptername\prevchaptername
+    \chapterpagefalse
+  \else
+    \chapterpagetrue
+  \fi
+}
+
+% Argument parsing
+
+% Parse an argument, then pass it to #1.  The argument is the rest of
+% the input line (except we remove a trailing comment).  #1 should be a
+% macro which expects an ordinary undelimited TeX argument.
+% For example, \def\foo{\parsearg\fooxxx}.
+%
+\def\parsearg{\parseargusing{}}
+\def\parseargusing#1#2{%
+  \def\argtorun{#2}%
+  \begingroup
+    \obeylines
+    \spaceisspace
+    #1%
+    \parseargline\empty% Insert the \empty token, see \finishparsearg below.
+}
+
+{\obeylines %
+  \gdef\parseargline#1^^M{%
+    \endgroup % End of the group started in \parsearg.
+    \argremovecomment #1\comment\ArgTerm%
+  }%
+}
+
+% First remove any @comment, then any @c comment.  Pass the result on to 
+% \argcheckspaces.
+\def\argremovecomment#1\comment#2\ArgTerm{\argremovec #1\c\ArgTerm}
+\def\argremovec#1\c#2\ArgTerm{\argcheckspaces#1\^^M\ArgTerm}
+
+% Each occurrence of `\^^M' or `<space>\^^M' is replaced by a single space.
+%
+% \argremovec might leave us with trailing space, e.g.,
+%    @end itemize  @c foo
+% This space token undergoes the same procedure and is eventually removed
+% by \finishparsearg.
+%
+\def\argcheckspaces#1\^^M{\argcheckspacesX#1\^^M \^^M}
+\def\argcheckspacesX#1 \^^M{\argcheckspacesY#1\^^M}
+\def\argcheckspacesY#1\^^M#2\^^M#3\ArgTerm{%
+  \def\temp{#3}%
+  \ifx\temp\empty
+    % Do not use \next, perhaps the caller of \parsearg uses it; reuse \temp:
+    \let\temp\finishparsearg
+  \else
+    \let\temp\argcheckspaces
+  \fi
+  % Put the space token in:
+  \temp#1 #3\ArgTerm
+}
+
+% If a _delimited_ argument is enclosed in braces, they get stripped; so
+% to get _exactly_ the rest of the line, we had to prevent such situation.
+% We prepended an \empty token at the very beginning and we expand it now,
+% just before passing the control to \argtorun.
+% (Similarly, we have to think about #3 of \argcheckspacesY above: it is
+% either the null string, or it ends with \^^M---thus there is no danger
+% that a pair of braces would be stripped.
+%
+% But first, we have to remove the trailing space token.
+%
+\def\finishparsearg#1 \ArgTerm{\expandafter\argtorun\expandafter{#1}}
+
+
+% \parseargdef - define a command taking an argument on the line
+%
+% \parseargdef\foo{...}
+%	is roughly equivalent to
+% \def\foo{\parsearg\Xfoo}
+% \def\Xfoo#1{...}
+\def\parseargdef#1{%
+  \expandafter \doparseargdef \csname\string#1\endcsname #1%
+}
+\def\doparseargdef#1#2{%
+  \def#2{\parsearg#1}%
+  \def#1##1%
+}
+
+% Several utility definitions with active space:
+{
+  \obeyspaces
+  \gdef\obeyedspace{ }
+
+  % Make each space character in the input produce a normal interword
+  % space in the output.  Don't allow a line break at this space, as this
+  % is used only in environments like @example, where each line of input
+  % should produce a line of output anyway.
+  %
+  \gdef\sepspaces{\obeyspaces\let =\tie}
+
+  % If an index command is used in an @example environment, any spaces
+  % therein should become regular spaces in the raw index file, not the
+  % expansion of \tie (\leavevmode \penalty \@M \ ).
+  \gdef\unsepspaces{\let =\space}
+}
+
+
+\def\flushcr{\ifx\par\lisppar \def\next##1{}\else \let\next=\relax \fi \next}
+
+% Define the framework for environments in texinfo.tex.  It's used like this:
+%
+%   \envdef\foo{...}
+%   \def\Efoo{...}
+%
+% It's the responsibility of \envdef to insert \begingroup before the
+% actual body; @end closes the group after calling \Efoo.  \envdef also
+% defines \thisenv, so the current environment is known; @end checks
+% whether the environment name matches.  The \checkenv macro can also be
+% used to check whether the current environment is the one expected.
+%
+% Non-false conditionals (@iftex, @ifset) don't fit into this, so they
+% are not treated as environments; they don't open a group.  (The
+% implementation of @end takes care not to call \endgroup in this
+% special case.)
+
+
+% At run-time, environments start with this:
+\def\startenvironment#1{\begingroup\def\thisenv{#1}}
+% initialize
+\let\thisenv\empty
+
+% ... but they get defined via ``\envdef\foo{...}'':
+\long\def\envdef#1#2{\def#1{\startenvironment#1#2}}
+\def\envparseargdef#1#2{\parseargdef#1{\startenvironment#1#2}}
+
+% Check whether we're in the right environment:
+\def\checkenv#1{%
+  \def\temp{#1}%
+  \ifx\thisenv\temp
+  \else
+    \badenverr
+  \fi
+}
+
+% Environment mismatch, #1 expected:
+\def\badenverr{%
+  \errhelp = \EMsimple
+  \errmessage{This command can appear only \inenvironment\temp,
+    not \inenvironment\thisenv}%
+}
+\def\inenvironment#1{%
+  \ifx#1\empty
+    outside of any environment%
+  \else
+    in environment \expandafter\string#1%
+  \fi
+}
+
+
+% @end foo calls \checkenv and executes the definition of \Efoo.
+\parseargdef\end{%
+  \if 1\csname iscond.#1\endcsname
+  \else
+    % The general wording of \badenverr may not be ideal.
+    \expandafter\checkenv\csname#1\endcsname
+    \csname E#1\endcsname
+    \endgroup
+  \fi
+}
+
+\newhelp\EMsimple{Press RETURN to continue.}
+
+
+% Be sure we're in horizontal mode when doing a tie, since we make space
+% equivalent to this in @example-like environments. Otherwise, a space
+% at the beginning of a line will start with \penalty -- and
+% since \penalty is valid in vertical mode, we'd end up putting the
+% penalty on the vertical list instead of in the new paragraph.
+{\catcode`@ = 11
+ % Avoid using \@M directly, because that causes trouble
+ % if the definition is written into an index file.
+ \global\let\tiepenalty = \@M
+ \gdef\tie{\leavevmode\penalty\tiepenalty\ }
+}
+
+% @: forces normal size whitespace following.
+\def\:{\spacefactor=1000 }
+
+% @* forces a line break.
+\def\*{\unskip\hfil\break\hbox{}\ignorespaces}
+
+% @/ allows a line break.
+\let\/=\allowbreak
+
+% @. is an end-of-sentence period.
+\def\.{.\spacefactor=\endofsentencespacefactor\space}
+
+% @! is an end-of-sentence bang.
+\def\!{!\spacefactor=\endofsentencespacefactor\space}
+
+% @? is an end-of-sentence query.
+\def\?{?\spacefactor=\endofsentencespacefactor\space}
+
+% @frenchspacing on|off  says whether to put extra space after punctuation.
+%
+\def\onword{on}
+\def\offword{off}
+%
+\parseargdef\frenchspacing{%
+  \def\temp{#1}%
+  \ifx\temp\onword \plainfrenchspacing
+  \else\ifx\temp\offword \plainnonfrenchspacing
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @frenchspacing option `\temp', must be on|off}%
+  \fi\fi
+}
+
+% @w prevents a word break.  Without the \leavevmode, @w at the
+% beginning of a paragraph, when TeX is still in vertical mode, would
+% produce a whole line of output instead of starting the paragraph.
+\def\w#1{\leavevmode\hbox{#1}}
+
+% @group ... @end group forces ... to be all on one page, by enclosing
+% it in a TeX vbox.  We use \vtop instead of \vbox to construct the box
+% to keep its height that of a normal line.  According to the rules for
+% \topskip (p.114 of the TeXbook), the glue inserted is
+% max (\topskip - \ht (first item), 0).  If that height is large,
+% therefore, no glue is inserted, and the space between the headline and
+% the text is small, which looks bad.
+%
+% Another complication is that the group might be very large.  This can
+% cause the glue on the previous page to be unduly stretched, because it
+% does not have much material.  In this case, it's better to add an
+% explicit \vfill so that the extra space is at the bottom.  The
+% threshold for doing this is if the group is more than \vfilllimit
+% percent of a page (\vfilllimit can be changed inside of @tex).
+%
+\newbox\groupbox
+\def\vfilllimit{0.7}
+%
+\envdef\group{%
+  \ifnum\catcode`\^^M=\active \else
+    \errhelp = \groupinvalidhelp
+    \errmessage{@group invalid in context where filling is enabled}%
+  \fi
+  \startsavinginserts
+  %
+  \setbox\groupbox = \vtop\bgroup
+    % Do @comment since we are called inside an environment such as
+    % @example, where each end-of-line in the input causes an
+    % end-of-line in the output.  We don't want the end-of-line after
+    % the `@group' to put extra space in the output.  Since @group
+    % should appear on a line by itself (according to the Texinfo
+    % manual), we don't worry about eating any user text.
+    \comment
+}
+%
+% The \vtop produces a box with normal height and large depth; thus, TeX puts
+% \baselineskip glue before it, and (when the next line of text is done)
+% \lineskip glue after it.  Thus, space below is not quite equal to space
+% above.  But it's pretty close.
+\def\Egroup{%
+    % To get correct interline space between the last line of the group
+    % and the first line afterwards, we have to propagate \prevdepth.
+    \endgraf % Not \par, as it may have been set to \lisppar.
+    \global\dimen1 = \prevdepth
+  \egroup           % End the \vtop.
+  \addgroupbox
+  \prevdepth = \dimen1
+  \checkinserts
+}
+
+\def\addgroupbox{
+  % \dimen0 is the vertical size of the group's box.
+  \dimen0 = \ht\groupbox  \advance\dimen0 by \dp\groupbox
+  % \dimen2 is how much space is left on the page (more or less).
+  \dimen2 = \txipageheight   \advance\dimen2 by -\pagetotal
+  % if the group doesn't fit on the current page, and it's a big big
+  % group, force a page break.
+  \ifdim \dimen0 > \dimen2
+    \ifdim \pagetotal < \vfilllimit\txipageheight
+      \page
+    \fi
+  \fi
+  \box\groupbox
+}
+
+%
+% TeX puts in an \escapechar (i.e., `@') at the beginning of the help
+% message, so this ends up printing `@group can only ...'.
+%
+\newhelp\groupinvalidhelp{%
+group can only be used in environments such as @example,^^J%
+where each line of input produces a line of output.}
+
+% @need space-in-mils
+% forces a page break if there is not space-in-mils remaining.
+
+\newdimen\mil  \mil=0.001in
+
+\parseargdef\need{%
+  % Ensure vertical mode, so we don't make a big box in the middle of a
+  % paragraph.
+  \par
+  %
+  % If the @need value is less than one line space, it's useless.
+  \dimen0 = #1\mil
+  \dimen2 = \ht\strutbox
+  \advance\dimen2 by \dp\strutbox
+  \ifdim\dimen0 > \dimen2
+    %
+    % Do a \strut just to make the height of this box be normal, so the
+    % normal leading is inserted relative to the preceding line.
+    % And a page break here is fine.
+    \vtop to #1\mil{\strut\vfil}%
+    %
+    % TeX does not even consider page breaks if a penalty added to the
+    % main vertical list is 10000 or more.  But in order to see if the
+    % empty box we just added fits on the page, we must make it consider
+    % page breaks.  On the other hand, we don't want to actually break the
+    % page after the empty box.  So we use a penalty of 9999.
+    %
+    % There is an extremely small chance that TeX will actually break the
+    % page at this \penalty, if there are no other feasible breakpoints in
+    % sight.  (If the user is using lots of big @group commands, which
+    % almost-but-not-quite fill up a page, TeX will have a hard time doing
+    % good page breaking, for example.)  However, I could not construct an
+    % example where a page broke at this \penalty; if it happens in a real
+    % document, then we can reconsider our strategy.
+    \penalty9999
+    %
+    % Back up by the size of the box, whether we did a page break or not.
+    \kern -#1\mil
+    %
+    % Do not allow a page break right after this kern.
+    \nobreak
+  \fi
+}
+
+% @br   forces paragraph break (and is undocumented).
+
+\let\br = \par
+
+% @page forces the start of a new page.
+%
+\def\page{\par\vfill\supereject}
+
+% @exdent text....
+% outputs text on separate line in roman font, starting at standard page margin
+
+% This records the amount of indent in the innermost environment.
+% That's how much \exdent should take out.
+\newskip\exdentamount
+
+% This defn is used inside fill environments such as @defun.
+\parseargdef\exdent{\hfil\break\hbox{\kern -\exdentamount{\rm#1}}\hfil\break}
+
+% This defn is used inside nofill environments such as @example.
+\parseargdef\nofillexdent{{\advance \leftskip by -\exdentamount
+  \leftline{\hskip\leftskip{\rm#1}}}}
+
+% @inmargin{WHICH}{TEXT} puts TEXT in the WHICH margin next to the current
+% paragraph.  For more general purposes, use the \margin insertion
+% class.  WHICH is `l' or `r'.  Not documented, written for gawk manual.
+%
+\newskip\inmarginspacing \inmarginspacing=1cm
+\def\strutdepth{\dp\strutbox}
+%
+\def\doinmargin#1#2{\strut\vadjust{%
+  \nobreak
+  \kern-\strutdepth
+  \vtop to \strutdepth{%
+    \baselineskip=\strutdepth
+    \vss
+    % if you have multiple lines of stuff to put here, you'll need to
+    % make the vbox yourself of the appropriate size.
+    \ifx#1l%
+      \llap{\ignorespaces #2\hskip\inmarginspacing}%
+    \else
+      \rlap{\hskip\hsize \hskip\inmarginspacing \ignorespaces #2}%
+    \fi
+    \null
+  }%
+}}
+\def\inleftmargin{\doinmargin l}
+\def\inrightmargin{\doinmargin r}
+%
+% @inmargin{TEXT [, RIGHT-TEXT]}
+% (if RIGHT-TEXT is given, use TEXT for left page, RIGHT-TEXT for right;
+% else use TEXT for both).
+%
+\def\inmargin#1{\parseinmargin #1,,\finish}
+\def\parseinmargin#1,#2,#3\finish{% not perfect, but better than nothing.
+  \setbox0 = \hbox{\ignorespaces #2}%
+  \ifdim\wd0 > 0pt
+    \def\lefttext{#1}%  have both texts
+    \def\righttext{#2}%
+  \else
+    \def\lefttext{#1}%  have only one text
+    \def\righttext{#1}%
+  \fi
+  %
+  \ifodd\pageno
+    \def\temp{\inrightmargin\righttext}% odd page -> outside is right margin
+  \else
+    \def\temp{\inleftmargin\lefttext}%
+  \fi
+  \temp
+}
+
+% @include FILE -- \input text of FILE.
+%
+\def\include{\parseargusing\filenamecatcodes\includezzz}
+\def\includezzz#1{%
+  \pushthisfilestack
+  \def\thisfile{#1}%
+  {%
+    \makevalueexpandable  % we want to expand any @value in FILE.
+    \turnoffactive        % and allow special characters in the expansion
+    \indexnofonts         % Allow `@@' and other weird things in file names.
+    \wlog{texinfo.tex: doing @include of #1^^J}%
+    \edef\temp{\noexpand\input #1 }%
+    %
+    % This trickery is to read FILE outside of a group, in case it makes
+    % definitions, etc.
+    \expandafter
+  }\temp
+  \popthisfilestack
+}
+\def\filenamecatcodes{%
+  \catcode`\\=\other
+  \catcode`~=\other
+  \catcode`^=\other
+  \catcode`_=\other
+  \catcode`|=\other
+  \catcode`<=\other
+  \catcode`>=\other
+  \catcode`+=\other
+  \catcode`-=\other
+  \catcode`\`=\other
+  \catcode`\'=\other
+}
+
+\def\pushthisfilestack{%
+  \expandafter\pushthisfilestackX\popthisfilestack\StackTerm
+}
+\def\pushthisfilestackX{%
+  \expandafter\pushthisfilestackY\thisfile\StackTerm
+}
+\def\pushthisfilestackY #1\StackTerm #2\StackTerm {%
+  \gdef\popthisfilestack{\gdef\thisfile{#1}\gdef\popthisfilestack{#2}}%
+}
+
+\def\popthisfilestack{\errthisfilestackempty}
+\def\errthisfilestackempty{\errmessage{Internal error:
+  the stack of filenames is empty.}}
+%
+\def\thisfile{}
+
+% @center line
+% outputs that line, centered.
+%
+\parseargdef\center{%
+  \ifhmode
+    \let\centersub\centerH
+  \else
+    \let\centersub\centerV
+  \fi
+  \centersub{\hfil \ignorespaces#1\unskip \hfil}%
+  \let\centersub\relax % don't let the definition persist, just in case
+}
+\def\centerH#1{{%
+  \hfil\break
+  \advance\hsize by -\leftskip
+  \advance\hsize by -\rightskip
+  \line{#1}%
+  \break
+}}
+%
+\newcount\centerpenalty
+\def\centerV#1{%
+  % The idea here is the same as in \startdefun, \cartouche, etc.: if
+  % @center is the first thing after a section heading, we need to wipe
+  % out the negative parskip inserted by \sectionheading, but still
+  % prevent a page break here.
+  \centerpenalty = \lastpenalty
+  \ifnum\centerpenalty>10000 \vskip\parskip \fi
+  \ifnum\centerpenalty>9999 \penalty\centerpenalty \fi
+  \line{\kern\leftskip #1\kern\rightskip}%
+}
+
+% @sp n   outputs n lines of vertical space
+%
+\parseargdef\sp{\vskip #1\baselineskip}
+
+% @comment ...line which is ignored...
+% @c is the same as @comment
+% @ignore ... @end ignore  is another way to write a comment
+
+
+\def\c{\begingroup \catcode`\^^M=\active%
+\catcode`\@=\other \catcode`\{=\other \catcode`\}=\other%
+\cxxx}
+{\catcode`\^^M=\active \gdef\cxxx#1^^M{\endgroup}}
+%
+\let\comment\c
+
+% @paragraphindent NCHARS
+% We'll use ems for NCHARS, close enough.
+% NCHARS can also be the word `asis' or `none'.
+% We cannot feasibly implement @paragraphindent asis, though.
+%
+\def\asisword{asis} % no translation, these are keywords
+\def\noneword{none}
+%
+\parseargdef\paragraphindent{%
+  \def\temp{#1}%
+  \ifx\temp\asisword
+  \else
+    \ifx\temp\noneword
+      \defaultparindent = 0pt
+    \else
+      \defaultparindent = #1em
+    \fi
+  \fi
+  \parindent = \defaultparindent
+}
+
+% @exampleindent NCHARS
+% We'll use ems for NCHARS like @paragraphindent.
+% It seems @exampleindent asis isn't necessary, but
+% I preserve it to make it similar to @paragraphindent.
+\parseargdef\exampleindent{%
+  \def\temp{#1}%
+  \ifx\temp\asisword
+  \else
+    \ifx\temp\noneword
+      \lispnarrowing = 0pt
+    \else
+      \lispnarrowing = #1em
+    \fi
+  \fi
+}
+
+% @firstparagraphindent WORD
+% If WORD is `none', then suppress indentation of the first paragraph
+% after a section heading.  If WORD is `insert', then do indent at such
+% paragraphs.
+%
+% The paragraph indentation is suppressed or not by calling
+% \suppressfirstparagraphindent, which the sectioning commands do.
+% We switch the definition of this back and forth according to WORD.
+% By default, we suppress indentation.
+%
+\def\suppressfirstparagraphindent{\dosuppressfirstparagraphindent}
+\def\insertword{insert}
+%
+\parseargdef\firstparagraphindent{%
+  \def\temp{#1}%
+  \ifx\temp\noneword
+    \let\suppressfirstparagraphindent = \dosuppressfirstparagraphindent
+  \else\ifx\temp\insertword
+    \let\suppressfirstparagraphindent = \relax
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @firstparagraphindent option `\temp'}%
+  \fi\fi
+}
+
+% Here is how we actually suppress indentation.  Redefine \everypar to
+% \kern backwards by \parindent, and then reset itself to empty.
+%
+% We also make \indent itself not actually do anything until the next
+% paragraph.
+%
+\gdef\dosuppressfirstparagraphindent{%
+  \gdef\indent  {\restorefirstparagraphindent \indent}%
+  \gdef\noindent{\restorefirstparagraphindent \noindent}%
+  \global\everypar = {\kern -\parindent \restorefirstparagraphindent}%
+}
+%
+\gdef\restorefirstparagraphindent{%
+  \global\let\indent = \ptexindent
+  \global\let\noindent = \ptexnoindent
+  \global\everypar = {}%
+}
+
+% leave vertical mode without cancelling any first paragraph indent
+\gdef\imageindent{%
+  \toks0=\everypar
+  \everypar={}%
+  \ptexnoindent
+  \global\everypar=\toks0
+}
+
+
+% @refill is a no-op.
+\let\refill=\relax
+
+% @setfilename INFO-FILENAME - ignored
+\let\setfilename=\comment
+
+% @bye.
+\outer\def\bye{\chappager\pagelabels\tracingstats=1\ptexend}
+
+
+\message{pdf,}
+% adobe `portable' document format
+\newcount\tempnum
+\newcount\lnkcount
+\newtoks\filename
+\newcount\filenamelength
+\newcount\pgn
+\newtoks\toksA
+\newtoks\toksB
+\newtoks\toksC
+\newtoks\toksD
+\newbox\boxA
+\newbox\boxB
+\newcount\countA
+\newif\ifpdf
+\newif\ifpdfmakepagedest
+
+%
+% For LuaTeX
+%
+
+\newif\iftxiuseunicodedestname
+\txiuseunicodedestnamefalse % For pdfTeX etc.
+
+\ifx\luatexversion\thisisundefined
+\else
+  % Use Unicode destination names
+  \txiuseunicodedestnametrue
+  % Escape PDF strings with converting UTF-16 from UTF-8
+  \begingroup
+    \catcode`\%=12
+    \directlua{
+      function UTF16oct(str)
+        tex.sprint(string.char(0x5c) .. '376' .. string.char(0x5c) .. '377')
+        for c in string.utfvalues(str) do
+          if c < 0x10000 then
+            tex.sprint(
+              string.format(string.char(0x5c) .. string.char(0x25) .. '03o' ..
+                            string.char(0x5c) .. string.char(0x25) .. '03o',
+                            math.floor(c / 256), math.floor(c % 256)))
+          else
+            c = c - 0x10000
+            local c_hi = c / 1024 + 0xd800
+            local c_lo = c % 1024 + 0xdc00
+            tex.sprint(
+              string.format(string.char(0x5c) .. string.char(0x25) .. '03o' ..
+                            string.char(0x5c) .. string.char(0x25) .. '03o' ..
+                            string.char(0x5c) .. string.char(0x25) .. '03o' ..
+                            string.char(0x5c) .. string.char(0x25) .. '03o',
+                            math.floor(c_hi / 256), math.floor(c_hi % 256),
+                            math.floor(c_lo / 256), math.floor(c_lo % 256)))
+          end
+        end
+      end
+    }
+  \endgroup
+  \def\pdfescapestrutfsixteen#1{\directlua{UTF16oct('\luaescapestring{#1}')}}
+  % Escape PDF strings without converting
+  \begingroup
+    \directlua{
+      function PDFescstr(str)
+        for c in string.bytes(str) do
+          if c <= 0x20 or c >= 0x80 or c == 0x28 or c == 0x29 or c == 0x5c then
+            tex.sprint(-2,
+              string.format(string.char(0x5c) .. string.char(0x25) .. '03o',
+                            c))
+          else
+            tex.sprint(-2, string.char(c))
+          end
+        end
+      end
+    }
+    % The -2 in the arguments here gives all the input to TeX catcode 12 
+    % (other) or 10 (space), preventing undefined control sequence errors. See 
+    % https://lists.gnu.org/archive/html/bug-texinfo/2019-08/msg00031.html
+    %
+  \endgroup
+  \def\pdfescapestring#1{\directlua{PDFescstr('\luaescapestring{#1}')}}
+  \ifnum\luatexversion>84
+    % For LuaTeX >= 0.85
+    \def\pdfdest{\pdfextension dest}
+    \let\pdfoutput\outputmode
+    \def\pdfliteral{\pdfextension literal}
+    \def\pdfcatalog{\pdfextension catalog}
+    \def\pdftexversion{\numexpr\pdffeedback version\relax}
+    \let\pdfximage\saveimageresource
+    \let\pdfrefximage\useimageresource
+    \let\pdflastximage\lastsavedimageresourceindex
+    \def\pdfendlink{\pdfextension endlink\relax}
+    \def\pdfoutline{\pdfextension outline}
+    \def\pdfstartlink{\pdfextension startlink}
+    \def\pdffontattr{\pdfextension fontattr}
+    \def\pdfobj{\pdfextension obj}
+    \def\pdflastobj{\numexpr\pdffeedback lastobj\relax}
+    \let\pdfpagewidth\pagewidth
+    \let\pdfpageheight\pageheight
+    \edef\pdfhorigin{\pdfvariable horigin}
+    \edef\pdfvorigin{\pdfvariable vorigin}
+  \fi
+\fi
+
+% when pdftex is run in dvi mode, \pdfoutput is defined (so \pdfoutput=1
+% can be set).  So we test for \relax and 0 as well as being undefined.
+\ifx\pdfoutput\thisisundefined
+\else
+  \ifx\pdfoutput\relax
+  \else
+    \ifcase\pdfoutput
+    \else
+      \pdftrue
+    \fi
+  \fi
+\fi
+
+\newif\ifpdforxetex
+\pdforxetexfalse
+\ifpdf
+  \pdforxetextrue
+\fi
+\ifx\XeTeXrevision\thisisundefined\else
+  \pdforxetextrue
+\fi
+
+
+% Output page labels information.
+% See PDF reference v.1.7 p.594, section 8.3.1.
+\ifpdf
+\def\pagelabels{%
+  \def\title{0 << /P (T-) /S /D >>}%
+  \edef\roman{\the\romancount << /S /r >>}%
+  \edef\arabic{\the\arabiccount << /S /D >>}%
+  %
+  % Page label ranges must be increasing.  Remove any duplicates.
+  % (There is a slight chance of this being wrong if e.g. there is
+  % a @contents but no @titlepage, etc.)
+  %
+  \ifnum\romancount=0 \def\roman{}\fi
+  \ifnum\arabiccount=0 \def\title{}%
+  \else
+    \ifnum\romancount=\arabiccount \def\roman{}\fi
+  \fi
+  %
+  \ifnum\romancount<\arabiccount
+    \pdfcatalog{/PageLabels << /Nums [\title \roman \arabic ] >> }\relax
+  \else
+    \pdfcatalog{/PageLabels << /Nums [\title \arabic \roman ] >> }\relax
+  \fi
+}
+\else
+  \let\pagelabels\relax
+\fi
+
+\newcount\pagecount \pagecount=0
+\newcount\romancount \romancount=0
+\newcount\arabiccount \arabiccount=0
+\ifpdf
+  \let\ptxadvancepageno\advancepageno
+  \def\advancepageno{%
+    \ptxadvancepageno\global\advance\pagecount by 1
+  }
+\fi
+
+
+% PDF uses PostScript string constants for the names of xref targets,
+% for display in the outlines, and in other places.  Thus, we have to
+% double any backslashes.  Otherwise, a name like "\node" will be
+% interpreted as a newline (\n), followed by o, d, e.  Not good.
+% 
+% See http://www.ntg.nl/pipermail/ntg-pdftex/2004-July/000654.html and
+% related messages.  The final outcome is that it is up to the TeX user
+% to double the backslashes and otherwise make the string valid, so
+% that's what we do.  pdftex 1.30.0 (ca.2005) introduced a primitive to
+% do this reliably, so we use it.
+
+% #1 is a control sequence in which to do the replacements,
+% which we \xdef.
+\def\txiescapepdf#1{%
+  \ifx\pdfescapestring\thisisundefined
+    % No primitive available; should we give a warning or log?
+    % Many times it won't matter.
+    \xdef#1{#1}%
+  \else
+    % The expandable \pdfescapestring primitive escapes parentheses,
+    % backslashes, and other special chars.
+    \xdef#1{\pdfescapestring{#1}}%
+  \fi
+}
+\def\txiescapepdfutfsixteen#1{%
+  \ifx\pdfescapestrutfsixteen\thisisundefined
+    % No UTF-16 converting macro available.
+    \txiescapepdf{#1}%
+  \else
+    \xdef#1{\pdfescapestrutfsixteen{#1}}%
+  \fi
+}
+
+\newhelp\nopdfimagehelp{Texinfo supports .png, .jpg, .jpeg, and .pdf images
+with PDF output, and none of those formats could be found.  (.eps cannot
+be supported due to the design of the PDF format; use regular TeX (DVI
+output) for that.)}
+
+\ifpdf
+  %
+  % Color manipulation macros using ideas from pdfcolor.tex,
+  % except using rgb instead of cmyk; the latter is said to render as a
+  % very dark gray on-screen and a very dark halftone in print, instead
+  % of actual black. The dark red here is dark enough to print on paper as
+  % nearly black, but still distinguishable for online viewing.  We use
+  % black by default, though.
+  \def\rgbDarkRed{0.50 0.09 0.12}
+  \def\rgbBlack{0 0 0}
+  %
+  % rg sets the color for filling (usual text, etc.);
+  % RG sets the color for stroking (thin rules, e.g., normal _'s).
+  \def\pdfsetcolor#1{\pdfliteral{#1 rg  #1 RG}}
+  %
+  % Set color, and create a mark which defines \thiscolor accordingly,
+  % so that \makeheadline knows which color to restore.
+  \def\setcolor#1{%
+    \xdef\currentcolordefs{\gdef\noexpand\thiscolor{#1}}%
+    \domark
+    \pdfsetcolor{#1}%
+  }
+  %
+  \def\maincolor{\rgbBlack}
+  \pdfsetcolor{\maincolor}
+  \edef\thiscolor{\maincolor}
+  \def\currentcolordefs{}
+  %
+  \def\makefootline{%
+    \baselineskip24pt
+    \line{\pdfsetcolor{\maincolor}\the\footline}%
+  }
+  %
+  \def\makeheadline{%
+    \vbox to 0pt{%
+      \vskip-22.5pt
+      \line{%
+        \vbox to8.5pt{}%
+        % Extract \thiscolor definition from the marks.
+        \getcolormarks
+        % Typeset the headline with \maincolor, then restore the color.
+        \pdfsetcolor{\maincolor}\the\headline\pdfsetcolor{\thiscolor}%
+      }%
+      \vss
+    }%
+    \nointerlineskip
+  }
+  %
+  %
+  \pdfcatalog{/PageMode /UseOutlines}
+  %
+  % #1 is image name, #2 width (might be empty/whitespace), #3 height (ditto).
+  \def\dopdfimage#1#2#3{%
+    \def\pdfimagewidth{#2}\setbox0 = \hbox{\ignorespaces #2}%
+    \def\pdfimageheight{#3}\setbox2 = \hbox{\ignorespaces #3}%
+    %
+    % pdftex (and the PDF format) support .pdf, .png, .jpg (among
+    % others).  Let's try in that order, PDF first since if
+    % someone has a scalable image, presumably better to use that than a
+    % bitmap.
+    \let\pdfimgext=\empty
+    \begingroup
+      \openin 1 #1.pdf \ifeof 1
+        \openin 1 #1.PDF \ifeof 1
+          \openin 1 #1.png \ifeof 1
+            \openin 1 #1.jpg \ifeof 1
+              \openin 1 #1.jpeg \ifeof 1
+                \openin 1 #1.JPG \ifeof 1
+                  \errhelp = \nopdfimagehelp
+                  \errmessage{Could not find image file #1 for pdf}%
+                \else \gdef\pdfimgext{JPG}%
+                \fi
+              \else \gdef\pdfimgext{jpeg}%
+              \fi
+            \else \gdef\pdfimgext{jpg}%
+            \fi
+          \else \gdef\pdfimgext{png}%
+          \fi
+        \else \gdef\pdfimgext{PDF}%
+        \fi
+      \else \gdef\pdfimgext{pdf}%
+      \fi
+      \closein 1
+    \endgroup
+    %
+    % without \immediate, ancient pdftex seg faults when the same image is
+    % included twice.  (Version 3.14159-pre-1.0-unofficial-20010704.)
+    \ifnum\pdftexversion < 14
+      \immediate\pdfimage
+    \else
+      \immediate\pdfximage
+    \fi
+      \ifdim \wd0 >0pt width \pdfimagewidth \fi
+      \ifdim \wd2 >0pt height \pdfimageheight \fi
+      \ifnum\pdftexversion<13
+         #1.\pdfimgext
+       \else
+         {#1.\pdfimgext}%
+       \fi
+    \ifnum\pdftexversion < 14 \else
+      \pdfrefximage \pdflastximage
+    \fi}
+  %
+  \def\setpdfdestname#1{{%
+    % We have to set dummies so commands such as @code, and characters
+    % such as \, aren't expanded when present in a section title.
+    \indexnofonts
+    \makevalueexpandable
+    \turnoffactive
+    \iftxiuseunicodedestname
+      \ifx \declaredencoding \latone
+        % Pass through Latin-1 characters.
+        % LuaTeX with byte wise I/O converts Latin-1 characters to Unicode.
+      \else
+        \ifx \declaredencoding \utfeight
+          % Pass through Unicode characters.
+        \else
+          % Use ASCII approximations in destination names.
+          \passthroughcharsfalse
+        \fi
+      \fi
+    \else
+      % Use ASCII approximations in destination names.
+      \passthroughcharsfalse
+    \fi
+    \def\pdfdestname{#1}%
+    \txiescapepdf\pdfdestname
+  }}
+  %
+  \def\setpdfoutlinetext#1{{%
+    \indexnofonts
+    \makevalueexpandable
+    \turnoffactive
+    \ifx \declaredencoding \latone
+      % The PDF format can use an extended form of Latin-1 in bookmark
+      % strings.  See Appendix D of the PDF Reference, Sixth Edition, for
+      % the "PDFDocEncoding".
+      \passthroughcharstrue
+      % Pass through Latin-1 characters.
+      %   LuaTeX: Convert to Unicode
+      %   pdfTeX: Use Latin-1 as PDFDocEncoding
+      \def\pdfoutlinetext{#1}%
+    \else
+      \ifx \declaredencoding \utfeight
+        \ifx\luatexversion\thisisundefined
+          % For pdfTeX  with UTF-8.
+          % TODO: the PDF format can use UTF-16 in bookmark strings,
+          % but the code for this isn't done yet.
+          % Use ASCII approximations.
+          \passthroughcharsfalse
+          \def\pdfoutlinetext{#1}%
+        \else
+          % For LuaTeX with UTF-8.
+          % Pass through Unicode characters for title texts.
+          \passthroughcharstrue
+          \def\pdfoutlinetext{#1}%
+        \fi
+      \else
+        % For non-Latin-1 or non-UTF-8 encodings.
+        % Use ASCII approximations.
+        \passthroughcharsfalse
+        \def\pdfoutlinetext{#1}%
+      \fi
+    \fi
+    % LuaTeX: Convert to UTF-16
+    % pdfTeX: Use Latin-1 as PDFDocEncoding
+    \txiescapepdfutfsixteen\pdfoutlinetext
+  }}
+  %
+  \def\pdfmkdest#1{%
+    \setpdfdestname{#1}%
+    \safewhatsit{\pdfdest name{\pdfdestname} xyz}%
+  }
+  %
+  % used to mark target names; must be expandable.
+  \def\pdfmkpgn#1{#1}
+  %
+  % by default, use black for everything.
+  \def\urlcolor{\rgbBlack}
+  \def\linkcolor{\rgbBlack}
+  \def\endlink{\setcolor{\maincolor}\pdfendlink}
+  %
+  % Adding outlines to PDF; macros for calculating structure of outlines
+  % come from Petr Olsak
+  \def\expnumber#1{\expandafter\ifx\csname#1\endcsname\relax 0%
+    \else \csname#1\endcsname \fi}
+  \def\advancenumber#1{\tempnum=\expnumber{#1}\relax
+    \advance\tempnum by 1
+    \expandafter\xdef\csname#1\endcsname{\the\tempnum}}
+  %
+  % #1 is the section text, which is what will be displayed in the
+  % outline by the pdf viewer.  #2 is the pdf expression for the number
+  % of subentries (or empty, for subsubsections).  #3 is the node text,
+  % which might be empty if this toc entry had no corresponding node.
+  % #4 is the page number
+  %
+  \def\dopdfoutline#1#2#3#4{%
+    % Generate a link to the node text if that exists; else, use the
+    % page number.  We could generate a destination for the section
+    % text in the case where a section has no node, but it doesn't
+    % seem worth the trouble, since most documents are normally structured.
+    \setpdfoutlinetext{#1}
+    \setpdfdestname{#3}
+    \ifx\pdfdestname\empty
+      \def\pdfdestname{#4}%
+    \fi
+    %
+    \pdfoutline goto name{\pdfmkpgn{\pdfdestname}}#2{\pdfoutlinetext}%
+  }
+  %
+  \def\pdfmakeoutlines{%
+    \begingroup
+      % Read toc silently, to get counts of subentries for \pdfoutline.
+      \def\partentry##1##2##3##4{}% ignore parts in the outlines
+      \def\numchapentry##1##2##3##4{%
+	\def\thischapnum{##2}%
+	\def\thissecnum{0}%
+	\def\thissubsecnum{0}%
+      }%
+      \def\numsecentry##1##2##3##4{%
+	\advancenumber{chap\thischapnum}%
+	\def\thissecnum{##2}%
+	\def\thissubsecnum{0}%
+      }%
+      \def\numsubsecentry##1##2##3##4{%
+	\advancenumber{sec\thissecnum}%
+	\def\thissubsecnum{##2}%
+      }%
+      \def\numsubsubsecentry##1##2##3##4{%
+	\advancenumber{subsec\thissubsecnum}%
+      }%
+      \def\thischapnum{0}%
+      \def\thissecnum{0}%
+      \def\thissubsecnum{0}%
+      %
+      % use \def rather than \let here because we redefine \chapentry et
+      % al. a second time, below.
+      \def\appentry{\numchapentry}%
+      \def\appsecentry{\numsecentry}%
+      \def\appsubsecentry{\numsubsecentry}%
+      \def\appsubsubsecentry{\numsubsubsecentry}%
+      \def\unnchapentry{\numchapentry}%
+      \def\unnsecentry{\numsecentry}%
+      \def\unnsubsecentry{\numsubsecentry}%
+      \def\unnsubsubsecentry{\numsubsubsecentry}%
+      \readdatafile{toc}%
+      %
+      % Read toc second time, this time actually producing the outlines.
+      % The `-' means take the \expnumber as the absolute number of
+      % subentries, which we calculated on our first read of the .toc above.
+      %
+      % We use the node names as the destinations.
+      %
+      % Currently we prefix the section name with the section number
+      % for chapter and appendix headings only in order to avoid too much 
+      % horizontal space being required in the PDF viewer.
+      \def\numchapentry##1##2##3##4{%
+        \dopdfoutline{##2 ##1}{count-\expnumber{chap##2}}{##3}{##4}}%
+      \def\unnchapentry##1##2##3##4{%
+        \dopdfoutline{##1}{count-\expnumber{chap##2}}{##3}{##4}}%
+      \def\numsecentry##1##2##3##4{%
+        \dopdfoutline{##1}{count-\expnumber{sec##2}}{##3}{##4}}%
+      \def\numsubsecentry##1##2##3##4{%
+        \dopdfoutline{##1}{count-\expnumber{subsec##2}}{##3}{##4}}%
+      \def\numsubsubsecentry##1##2##3##4{% count is always zero
+        \dopdfoutline{##1}{}{##3}{##4}}%
+      %
+      % PDF outlines are displayed using system fonts, instead of
+      % document fonts.  Therefore we cannot use special characters,
+      % since the encoding is unknown.  For example, the eogonek from
+      % Latin 2 (0xea) gets translated to a | character.  Info from
+      % Staszek Wawrykiewicz, 19 Jan 2004 04:09:24 +0100.
+      %
+      % TODO this right, we have to translate 8-bit characters to
+      % their "best" equivalent, based on the @documentencoding.  Too
+      % much work for too little return.  Just use the ASCII equivalents
+      % we use for the index sort strings.
+      % 
+      \indexnofonts
+      \setupdatafile
+      % We can have normal brace characters in the PDF outlines, unlike
+      % Texinfo index files.  So set that up.
+      \def\{{\lbracecharliteral}%
+      \def\}{\rbracecharliteral}%
+      \catcode`\\=\active \otherbackslash
+      \input \tocreadfilename
+    \endgroup
+  }
+  {\catcode`[=1 \catcode`]=2
+   \catcode`{=\other \catcode`}=\other
+   \gdef\lbracecharliteral[{]%
+   \gdef\rbracecharliteral[}]%
+  ]
+  %
+  \def\skipspaces#1{\def\PP{#1}\def\D{|}%
+    \ifx\PP\D\let\nextsp\relax
+    \else\let\nextsp\skipspaces
+      \addtokens{\filename}{\PP}%
+      \advance\filenamelength by 1
+    \fi
+    \nextsp}
+  \def\getfilename#1{%
+    \filenamelength=0
+    % If we don't expand the argument now, \skipspaces will get
+    % snagged on things like "@value{foo}".
+    \edef\temp{#1}%
+    \expandafter\skipspaces\temp|\relax
+  }
+  \ifnum\pdftexversion < 14
+    \let \startlink \pdfannotlink
+  \else
+    \let \startlink \pdfstartlink
+  \fi
+  % make a live url in pdf output.
+  \def\pdfurl#1{%
+    \begingroup
+      % it seems we really need yet another set of dummies; have not
+      % tried to figure out what each command should do in the context
+      % of @url.  for now, just make @/ a no-op, that's the only one
+      % people have actually reported a problem with.
+      %
+      \normalturnoffactive
+      \def\@{@}%
+      \let\/=\empty
+      \makevalueexpandable
+      % do we want to go so far as to use \indexnofonts instead of just
+      % special-casing \var here?
+      \def\var##1{##1}%
+      %
+      \leavevmode\setcolor{\urlcolor}%
+      \startlink attr{/Border [0 0 0]}%
+        user{/Subtype /Link /A << /S /URI /URI (#1) >>}%
+    \endgroup}
+  % \pdfgettoks - Surround page numbers in #1 with @pdflink.  #1 may
+  % be a simple number, or a list of numbers in the case of an index
+  % entry.
+  \def\pdfgettoks#1.{\setbox\boxA=\hbox{\toksA={#1.}\toksB={}\maketoks}}
+  \def\addtokens#1#2{\edef\addtoks{\noexpand#1={\the#1#2}}\addtoks}
+  \def\adn#1{\addtokens{\toksC}{#1}\global\countA=1\let\next=\maketoks}
+  \def\poptoks#1#2|ENDTOKS|{\let\first=#1\toksD={#1}\toksA={#2}}
+  \def\maketoks{%
+    \expandafter\poptoks\the\toksA|ENDTOKS|\relax
+    \ifx\first0\adn0
+    \else\ifx\first1\adn1 \else\ifx\first2\adn2 \else\ifx\first3\adn3
+    \else\ifx\first4\adn4 \else\ifx\first5\adn5 \else\ifx\first6\adn6
+    \else\ifx\first7\adn7 \else\ifx\first8\adn8 \else\ifx\first9\adn9
+    \else
+      \ifnum0=\countA\else\makelink\fi
+      \ifx\first.\let\next=\done\else
+        \let\next=\maketoks
+        \addtokens{\toksB}{\the\toksD}
+        \ifx\first,\addtokens{\toksB}{\space}\fi
+      \fi
+    \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
+    \next}
+  \def\makelink{\addtokens{\toksB}%
+    {\noexpand\pdflink{\the\toksC}}\toksC={}\global\countA=0}
+  \def\pdflink#1{%
+    \startlink attr{/Border [0 0 0]} goto name{\pdfmkpgn{#1}}
+    \setcolor{\linkcolor}#1\endlink}
+  \def\done{\edef\st{\global\noexpand\toksA={\the\toksB}}\st}
+\else
+  % non-pdf mode
+  \let\pdfmkdest = \gobble
+  \let\pdfurl = \gobble
+  \let\endlink = \relax
+  \let\setcolor = \gobble
+  \let\pdfsetcolor = \gobble
+  \let\pdfmakeoutlines = \relax
+\fi  % \ifx\pdfoutput
+
+%
+% For XeTeX
+%
+\ifx\XeTeXrevision\thisisundefined
+\else
+  %
+  % XeTeX version check
+  %
+  \ifnum\strcmp{\the\XeTeXversion\XeTeXrevision}{0.99996}>-1
+    % TeX Live 2016 contains XeTeX 0.99996 and xdvipdfmx 20160307.
+    % It can use the `dvipdfmx:config' special (from TeX Live SVN r40941).
+    % For avoiding PDF destination name replacement, we use this special
+    % instead of xdvipdfmx's command line option `-C 0x0010'.
+    \special{dvipdfmx:config C 0x0010}
+    % XeTeX 0.99995+ comes with xdvipdfmx 20160307+.
+    % It can handle Unicode destination names for PDF.
+    \txiuseunicodedestnametrue
+  \else
+    % XeTeX < 0.99996 (TeX Live < 2016) cannot use the
+    % `dvipdfmx:config' special.
+    % So for avoiding PDF destination name replacement,
+    % xdvipdfmx's command line option `-C 0x0010' is necessary.
+    %
+    % XeTeX < 0.99995 can not handle Unicode destination names for PDF
+    % because xdvipdfmx 20150315 has a UTF-16 conversion issue.
+    % It is fixed by xdvipdfmx 20160106 (TeX Live SVN r39753).
+    \txiuseunicodedestnamefalse
+  \fi
+  %
+  % Color support
+  %
+  \def\rgbDarkRed{0.50 0.09 0.12}
+  \def\rgbBlack{0 0 0}
+  %
+  \def\pdfsetcolor#1{\special{pdf:scolor [#1]}}
+  %
+  % Set color, and create a mark which defines \thiscolor accordingly,
+  % so that \makeheadline knows which color to restore.
+  \def\setcolor#1{%
+    \xdef\currentcolordefs{\gdef\noexpand\thiscolor{#1}}%
+    \domark
+    \pdfsetcolor{#1}%
+  }
+  %
+  \def\maincolor{\rgbBlack}
+  \pdfsetcolor{\maincolor}
+  \edef\thiscolor{\maincolor}
+  \def\currentcolordefs{}
+  %
+  \def\makefootline{%
+    \baselineskip24pt
+    \line{\pdfsetcolor{\maincolor}\the\footline}%
+  }
+  %
+  \def\makeheadline{%
+    \vbox to 0pt{%
+      \vskip-22.5pt
+      \line{%
+        \vbox to8.5pt{}%
+        % Extract \thiscolor definition from the marks.
+        \getcolormarks
+        % Typeset the headline with \maincolor, then restore the color.
+        \pdfsetcolor{\maincolor}\the\headline\pdfsetcolor{\thiscolor}%
+      }%
+      \vss
+    }%
+    \nointerlineskip
+  }
+  %
+  % PDF outline support
+  %
+  % Emulate pdfTeX primitive
+  \def\pdfdest name#1 xyz{%
+    \special{pdf:dest (#1) [@thispage /XYZ @xpos @ypos null]}%
+  }
+  %
+  \def\setpdfdestname#1{{%
+    % We have to set dummies so commands such as @code, and characters
+    % such as \, aren't expanded when present in a section title.
+    \indexnofonts
+    \makevalueexpandable
+    \turnoffactive
+    \iftxiuseunicodedestname
+      % Pass through Unicode characters.
+    \else
+      % Use ASCII approximations in destination names.
+      \passthroughcharsfalse
+    \fi
+    \def\pdfdestname{#1}%
+    \txiescapepdf\pdfdestname
+  }}
+  %
+  \def\setpdfoutlinetext#1{{%
+    \turnoffactive
+    % Always use Unicode characters in title texts.
+    \def\pdfoutlinetext{#1}%
+    % For XeTeX, xdvipdfmx converts to UTF-16.
+    % So we do not convert.
+    \txiescapepdf\pdfoutlinetext
+  }}
+  %
+  \def\pdfmkdest#1{%
+    \setpdfdestname{#1}%
+    \safewhatsit{\pdfdest name{\pdfdestname} xyz}%
+  }
+  %
+  % by default, use black for everything.
+  \def\urlcolor{\rgbBlack}
+  \def\linkcolor{\rgbBlack}
+  \def\endlink{\setcolor{\maincolor}\pdfendlink}
+  %
+  \def\dopdfoutline#1#2#3#4{%
+    \setpdfoutlinetext{#1}
+    \setpdfdestname{#3}
+    \ifx\pdfdestname\empty
+      \def\pdfdestname{#4}%
+    \fi
+    %
+    \special{pdf:out [-] #2 << /Title (\pdfoutlinetext) /A
+      << /S /GoTo /D (\pdfdestname) >> >> }%
+  }
+  %
+  \def\pdfmakeoutlines{%
+    \begingroup
+      %
+      % For XeTeX, counts of subentries are not necessary.
+      % Therefore, we read toc only once.
+      %
+      % We use node names as destinations.
+      %
+      % Currently we prefix the section name with the section number
+      % for chapter and appendix headings only in order to avoid too much 
+      % horizontal space being required in the PDF viewer.
+      \def\partentry##1##2##3##4{}% ignore parts in the outlines
+      \def\numchapentry##1##2##3##4{%
+        \dopdfoutline{##2 ##1}{1}{##3}{##4}}%
+      \def\numsecentry##1##2##3##4{%
+        \dopdfoutline{##1}{2}{##3}{##4}}%
+      \def\numsubsecentry##1##2##3##4{%
+        \dopdfoutline{##1}{3}{##3}{##4}}%
+      \def\numsubsubsecentry##1##2##3##4{%
+        \dopdfoutline{##1}{4}{##3}{##4}}%
+      %
+      \let\appentry\numchapentry%
+      \let\appsecentry\numsecentry%
+      \let\appsubsecentry\numsubsecentry%
+      \let\appsubsubsecentry\numsubsubsecentry%
+      \def\unnchapentry##1##2##3##4{%
+        \dopdfoutline{##1}{1}{##3}{##4}}%
+      \let\unnsecentry\numsecentry%
+      \let\unnsubsecentry\numsubsecentry%
+      \let\unnsubsubsecentry\numsubsubsecentry%
+      %
+      % For XeTeX, xdvipdfmx converts strings to UTF-16.
+      % Therefore, the encoding and the language may not be considered.
+      %
+      \indexnofonts
+      \setupdatafile
+      % We can have normal brace characters in the PDF outlines, unlike
+      % Texinfo index files.  So set that up.
+      \def\{{\lbracecharliteral}%
+      \def\}{\rbracecharliteral}%
+      \catcode`\\=\active \otherbackslash
+      \input \tocreadfilename
+    \endgroup
+  }
+  {\catcode`[=1 \catcode`]=2
+   \catcode`{=\other \catcode`}=\other
+   \gdef\lbracecharliteral[{]%
+   \gdef\rbracecharliteral[}]%
+  ]
+
+  \special{pdf:docview << /PageMode /UseOutlines >> }
+  % ``\special{pdf:tounicode ...}'' is not necessary
+  % because xdvipdfmx converts strings from UTF-8 to UTF-16 without it.
+  % However, due to a UTF-16 conversion issue of xdvipdfmx 20150315,
+  % ``\special{pdf:dest ...}'' cannot handle non-ASCII strings.
+  % It is fixed by xdvipdfmx 20160106 (TeX Live SVN r39753).
+%
+  \def\skipspaces#1{\def\PP{#1}\def\D{|}%
+    \ifx\PP\D\let\nextsp\relax
+    \else\let\nextsp\skipspaces
+      \addtokens{\filename}{\PP}%
+      \advance\filenamelength by 1
+    \fi
+    \nextsp}
+  \def\getfilename#1{%
+    \filenamelength=0
+    % If we don't expand the argument now, \skipspaces will get
+    % snagged on things like "@value{foo}".
+    \edef\temp{#1}%
+    \expandafter\skipspaces\temp|\relax
+  }
+  % make a live url in pdf output.
+  \def\pdfurl#1{%
+    \begingroup
+      % it seems we really need yet another set of dummies; have not
+      % tried to figure out what each command should do in the context
+      % of @url.  for now, just make @/ a no-op, that's the only one
+      % people have actually reported a problem with.
+      %
+      \normalturnoffactive
+      \def\@{@}%
+      \let\/=\empty
+      \makevalueexpandable
+      % do we want to go so far as to use \indexnofonts instead of just
+      % special-casing \var here?
+      \def\var##1{##1}%
+      %
+      \leavevmode\setcolor{\urlcolor}%
+      \special{pdf:bann << /Border [0 0 0]
+        /Subtype /Link /A << /S /URI /URI (#1) >> >>}%
+    \endgroup}
+  \def\endlink{\setcolor{\maincolor}\special{pdf:eann}}
+  \def\pdfgettoks#1.{\setbox\boxA=\hbox{\toksA={#1.}\toksB={}\maketoks}}
+  \def\addtokens#1#2{\edef\addtoks{\noexpand#1={\the#1#2}}\addtoks}
+  \def\adn#1{\addtokens{\toksC}{#1}\global\countA=1\let\next=\maketoks}
+  \def\poptoks#1#2|ENDTOKS|{\let\first=#1\toksD={#1}\toksA={#2}}
+  \def\maketoks{%
+    \expandafter\poptoks\the\toksA|ENDTOKS|\relax
+    \ifx\first0\adn0
+    \else\ifx\first1\adn1 \else\ifx\first2\adn2 \else\ifx\first3\adn3
+    \else\ifx\first4\adn4 \else\ifx\first5\adn5 \else\ifx\first6\adn6
+    \else\ifx\first7\adn7 \else\ifx\first8\adn8 \else\ifx\first9\adn9
+    \else
+      \ifnum0=\countA\else\makelink\fi
+      \ifx\first.\let\next=\done\else
+        \let\next=\maketoks
+        \addtokens{\toksB}{\the\toksD}
+        \ifx\first,\addtokens{\toksB}{\space}\fi
+      \fi
+    \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
+    \next}
+  \def\makelink{\addtokens{\toksB}%
+    {\noexpand\pdflink{\the\toksC}}\toksC={}\global\countA=0}
+  \def\pdflink#1{%
+    \special{pdf:bann << /Border [0 0 0]
+      /Type /Annot /Subtype /Link /A << /S /GoTo /D (#1) >> >>}%
+    \setcolor{\linkcolor}#1\endlink}
+  \def\done{\edef\st{\global\noexpand\toksA={\the\toksB}}\st}
+%
+  %
+  % @image support
+  %
+  % #1 is image name, #2 width (might be empty/whitespace), #3 height (ditto).
+  \def\doxeteximage#1#2#3{%
+    \def\xeteximagewidth{#2}\setbox0 = \hbox{\ignorespaces #2}%
+    \def\xeteximageheight{#3}\setbox2 = \hbox{\ignorespaces #3}%
+    %
+    % XeTeX (and the PDF format) supports .pdf, .png, .jpg (among
+    % others).  Let's try in that order, PDF first since if
+    % someone has a scalable image, presumably better to use that than a
+    % bitmap.
+    \let\xeteximgext=\empty
+    \begingroup
+      \openin 1 #1.pdf \ifeof 1
+        \openin 1 #1.PDF \ifeof 1
+          \openin 1 #1.png \ifeof 1
+            \openin 1 #1.jpg \ifeof 1
+              \openin 1 #1.jpeg \ifeof 1
+                \openin 1 #1.JPG \ifeof 1
+                  \errmessage{Could not find image file #1 for XeTeX}%
+                \else \gdef\xeteximgext{JPG}%
+                \fi
+              \else \gdef\xeteximgext{jpeg}%
+              \fi
+            \else \gdef\xeteximgext{jpg}%
+            \fi
+          \else \gdef\xeteximgext{png}%
+          \fi
+        \else \gdef\xeteximgext{PDF}%
+        \fi
+      \else \gdef\xeteximgext{pdf}%
+      \fi
+      \closein 1
+    \endgroup
+    %
+    % Putting an \hbox around the image can prevent an over-long line
+    % after the image.
+    \hbox\bgroup
+      \def\xetexpdfext{pdf}%
+      \ifx\xeteximgext\xetexpdfext
+        \XeTeXpdffile "#1".\xeteximgext ""
+      \else
+        \def\xetexpdfext{PDF}%
+        \ifx\xeteximgext\xetexpdfext
+          \XeTeXpdffile "#1".\xeteximgext ""
+        \else
+          \XeTeXpicfile "#1".\xeteximgext ""
+        \fi
+      \fi
+      \ifdim \wd0 >0pt width \xeteximagewidth \fi
+      \ifdim \wd2 >0pt height \xeteximageheight \fi \relax
+    \egroup
+  }
+\fi
+
+
+%
+\message{fonts,}
+
+% Set the baselineskip to #1, and the lineskip and strut size
+% correspondingly.  There is no deep meaning behind these magic numbers
+% used as factors; they just match (closely enough) what Knuth defined.
+%
+\def\lineskipfactor{.08333}
+\def\strutheightpercent{.70833}
+\def\strutdepthpercent {.29167}
+%
+% can get a sort of poor man's double spacing by redefining this.
+\def\baselinefactor{1}
+%
+\newdimen\textleading
+\def\setleading#1{%
+  \dimen0 = #1\relax
+  \normalbaselineskip = \baselinefactor\dimen0
+  \normallineskip = \lineskipfactor\normalbaselineskip
+  \normalbaselines
+  \setbox\strutbox =\hbox{%
+    \vrule width0pt height\strutheightpercent\baselineskip
+                    depth \strutdepthpercent \baselineskip
+  }%
+}
+
+% PDF CMaps.  See also LaTeX's t1.cmap.
+%
+% do nothing with this by default.
+\expandafter\let\csname cmapOT1\endcsname\gobble
+\expandafter\let\csname cmapOT1IT\endcsname\gobble
+\expandafter\let\csname cmapOT1TT\endcsname\gobble
+
+% if we are producing pdf, and we have \pdffontattr, then define cmaps.
+% (\pdffontattr was introduced many years ago, but people still run
+% older pdftex's; it's easy to conditionalize, so we do.)
+\ifpdf \ifx\pdffontattr\thisisundefined \else
+  \begingroup
+    \catcode`\^^M=\active \def^^M{^^J}% Output line endings as the ^^J char.
+    \catcode`\%=12 \immediate\pdfobj stream {%!PS-Adobe-3.0 Resource-CMap
+%%DocumentNeededResources: ProcSet (CIDInit)
+%%IncludeResource: ProcSet (CIDInit)
+%%BeginResource: CMap (TeX-OT1-0)
+%%Title: (TeX-OT1-0 TeX OT1 0)
+%%Version: 1.000
+%%EndComments
+/CIDInit /ProcSet findresource begin
+12 dict begin
+begincmap
+/CIDSystemInfo
+<< /Registry (TeX)
+/Ordering (OT1)
+/Supplement 0
+>> def
+/CMapName /TeX-OT1-0 def
+/CMapType 2 def
+1 begincodespacerange
+<00> <7F>
+endcodespacerange
+8 beginbfrange
+<00> <01> <0393>
+<09> <0A> <03A8>
+<23> <26> <0023>
+<28> <3B> <0028>
+<3F> <5B> <003F>
+<5D> <5E> <005D>
+<61> <7A> <0061>
+<7B> <7C> <2013>
+endbfrange
+40 beginbfchar
+<02> <0398>
+<03> <039B>
+<04> <039E>
+<05> <03A0>
+<06> <03A3>
+<07> <03D2>
+<08> <03A6>
+<0B> <00660066>
+<0C> <00660069>
+<0D> <0066006C>
+<0E> <006600660069>
+<0F> <00660066006C>
+<10> <0131>
+<11> <0237>
+<12> <0060>
+<13> <00B4>
+<14> <02C7>
+<15> <02D8>
+<16> <00AF>
+<17> <02DA>
+<18> <00B8>
+<19> <00DF>
+<1A> <00E6>
+<1B> <0153>
+<1C> <00F8>
+<1D> <00C6>
+<1E> <0152>
+<1F> <00D8>
+<21> <0021>
+<22> <201D>
+<27> <2019>
+<3C> <00A1>
+<3D> <003D>
+<3E> <00BF>
+<5C> <201C>
+<5F> <02D9>
+<60> <2018>
+<7D> <02DD>
+<7E> <007E>
+<7F> <00A8>
+endbfchar
+endcmap
+CMapName currentdict /CMap defineresource pop
+end
+end
+%%EndResource
+%%EOF
+    }\endgroup
+  \expandafter\edef\csname cmapOT1\endcsname#1{%
+    \pdffontattr#1{/ToUnicode \the\pdflastobj\space 0 R}%
+  }%
+%
+% \cmapOT1IT
+  \begingroup
+    \catcode`\^^M=\active \def^^M{^^J}% Output line endings as the ^^J char.
+    \catcode`\%=12 \immediate\pdfobj stream {%!PS-Adobe-3.0 Resource-CMap
+%%DocumentNeededResources: ProcSet (CIDInit)
+%%IncludeResource: ProcSet (CIDInit)
+%%BeginResource: CMap (TeX-OT1IT-0)
+%%Title: (TeX-OT1IT-0 TeX OT1IT 0)
+%%Version: 1.000
+%%EndComments
+/CIDInit /ProcSet findresource begin
+12 dict begin
+begincmap
+/CIDSystemInfo
+<< /Registry (TeX)
+/Ordering (OT1IT)
+/Supplement 0
+>> def
+/CMapName /TeX-OT1IT-0 def
+/CMapType 2 def
+1 begincodespacerange
+<00> <7F>
+endcodespacerange
+8 beginbfrange
+<00> <01> <0393>
+<09> <0A> <03A8>
+<25> <26> <0025>
+<28> <3B> <0028>
+<3F> <5B> <003F>
+<5D> <5E> <005D>
+<61> <7A> <0061>
+<7B> <7C> <2013>
+endbfrange
+42 beginbfchar
+<02> <0398>
+<03> <039B>
+<04> <039E>
+<05> <03A0>
+<06> <03A3>
+<07> <03D2>
+<08> <03A6>
+<0B> <00660066>
+<0C> <00660069>
+<0D> <0066006C>
+<0E> <006600660069>
+<0F> <00660066006C>
+<10> <0131>
+<11> <0237>
+<12> <0060>
+<13> <00B4>
+<14> <02C7>
+<15> <02D8>
+<16> <00AF>
+<17> <02DA>
+<18> <00B8>
+<19> <00DF>
+<1A> <00E6>
+<1B> <0153>
+<1C> <00F8>
+<1D> <00C6>
+<1E> <0152>
+<1F> <00D8>
+<21> <0021>
+<22> <201D>
+<23> <0023>
+<24> <00A3>
+<27> <2019>
+<3C> <00A1>
+<3D> <003D>
+<3E> <00BF>
+<5C> <201C>
+<5F> <02D9>
+<60> <2018>
+<7D> <02DD>
+<7E> <007E>
+<7F> <00A8>
+endbfchar
+endcmap
+CMapName currentdict /CMap defineresource pop
+end
+end
+%%EndResource
+%%EOF
+    }\endgroup
+  \expandafter\edef\csname cmapOT1IT\endcsname#1{%
+    \pdffontattr#1{/ToUnicode \the\pdflastobj\space 0 R}%
+  }%
+%
+% \cmapOT1TT
+  \begingroup
+    \catcode`\^^M=\active \def^^M{^^J}% Output line endings as the ^^J char.
+    \catcode`\%=12 \immediate\pdfobj stream {%!PS-Adobe-3.0 Resource-CMap
+%%DocumentNeededResources: ProcSet (CIDInit)
+%%IncludeResource: ProcSet (CIDInit)
+%%BeginResource: CMap (TeX-OT1TT-0)
+%%Title: (TeX-OT1TT-0 TeX OT1TT 0)
+%%Version: 1.000
+%%EndComments
+/CIDInit /ProcSet findresource begin
+12 dict begin
+begincmap
+/CIDSystemInfo
+<< /Registry (TeX)
+/Ordering (OT1TT)
+/Supplement 0
+>> def
+/CMapName /TeX-OT1TT-0 def
+/CMapType 2 def
+1 begincodespacerange
+<00> <7F>
+endcodespacerange
+5 beginbfrange
+<00> <01> <0393>
+<09> <0A> <03A8>
+<21> <26> <0021>
+<28> <5F> <0028>
+<61> <7E> <0061>
+endbfrange
+32 beginbfchar
+<02> <0398>
+<03> <039B>
+<04> <039E>
+<05> <03A0>
+<06> <03A3>
+<07> <03D2>
+<08> <03A6>
+<0B> <2191>
+<0C> <2193>
+<0D> <0027>
+<0E> <00A1>
+<0F> <00BF>
+<10> <0131>
+<11> <0237>
+<12> <0060>
+<13> <00B4>
+<14> <02C7>
+<15> <02D8>
+<16> <00AF>
+<17> <02DA>
+<18> <00B8>
+<19> <00DF>
+<1A> <00E6>
+<1B> <0153>
+<1C> <00F8>
+<1D> <00C6>
+<1E> <0152>
+<1F> <00D8>
+<20> <2423>
+<27> <2019>
+<60> <2018>
+<7F> <00A8>
+endbfchar
+endcmap
+CMapName currentdict /CMap defineresource pop
+end
+end
+%%EndResource
+%%EOF
+    }\endgroup
+  \expandafter\edef\csname cmapOT1TT\endcsname#1{%
+    \pdffontattr#1{/ToUnicode \the\pdflastobj\space 0 R}%
+  }%
+\fi\fi
+
+
+% Set the font macro #1 to the font named \fontprefix#2.
+% #3 is the font's design size, #4 is a scale factor, #5 is the CMap
+% encoding (only OT1, OT1IT and OT1TT are allowed, or empty to omit).
+% Example:
+% #1 = \textrm
+% #2 = \rmshape
+% #3 = 10
+% #4 = \mainmagstep
+% #5 = OT1
+%
+\def\setfont#1#2#3#4#5{%
+  \font#1=\fontprefix#2#3 scaled #4
+  \csname cmap#5\endcsname#1%
+}
+% This is what gets called when #5 of \setfont is empty.
+\let\cmap\gobble
+%
+% (end of cmaps)
+
+% Use cm as the default font prefix.
+% To specify the font prefix, you must define \fontprefix
+% before you read in texinfo.tex.
+\ifx\fontprefix\thisisundefined
+\def\fontprefix{cm}
+\fi
+% Support font families that don't use the same naming scheme as CM.
+\def\rmshape{r}
+\def\rmbshape{bx}               % where the normal face is bold
+\def\bfshape{b}
+\def\bxshape{bx}
+\def\ttshape{tt}
+\def\ttbshape{tt}
+\def\ttslshape{sltt}
+\def\itshape{ti}
+\def\itbshape{bxti}
+\def\slshape{sl}
+\def\slbshape{bxsl}
+\def\sfshape{ss}
+\def\sfbshape{ss}
+\def\scshape{csc}
+\def\scbshape{csc}
+
+% Definitions for a main text size of 11pt.  (The default in Texinfo.)
+%
+\def\definetextfontsizexi{%
+% Text fonts (11.2pt, magstep1).
+\def\textnominalsize{11pt}
+\edef\mainmagstep{\magstephalf}
+\setfont\textrm\rmshape{10}{\mainmagstep}{OT1}
+\setfont\texttt\ttshape{10}{\mainmagstep}{OT1TT}
+\setfont\textbf\bfshape{10}{\mainmagstep}{OT1}
+\setfont\textit\itshape{10}{\mainmagstep}{OT1IT}
+\setfont\textsl\slshape{10}{\mainmagstep}{OT1}
+\setfont\textsf\sfshape{10}{\mainmagstep}{OT1}
+\setfont\textsc\scshape{10}{\mainmagstep}{OT1}
+\setfont\textttsl\ttslshape{10}{\mainmagstep}{OT1TT}
+\font\texti=cmmi10 scaled \mainmagstep
+\font\textsy=cmsy10 scaled \mainmagstep
+\def\textecsize{1095}
+
+% A few fonts for @defun names and args.
+\setfont\defbf\bfshape{10}{\magstep1}{OT1}
+\setfont\deftt\ttshape{10}{\magstep1}{OT1TT}
+\setfont\defsl\slshape{10}{\magstep1}{OT1}
+\setfont\defttsl\ttslshape{10}{\magstep1}{OT1TT}
+\def\df{\let\ttfont=\deftt \let\bffont = \defbf
+\let\ttslfont=\defttsl \let\slfont=\defsl \bf}
+
+% Fonts for indices, footnotes, small examples (9pt).
+\def\smallnominalsize{9pt}
+\setfont\smallrm\rmshape{9}{1000}{OT1}
+\setfont\smalltt\ttshape{9}{1000}{OT1TT}
+\setfont\smallbf\bfshape{10}{900}{OT1}
+\setfont\smallit\itshape{9}{1000}{OT1IT}
+\setfont\smallsl\slshape{9}{1000}{OT1}
+\setfont\smallsf\sfshape{9}{1000}{OT1}
+\setfont\smallsc\scshape{10}{900}{OT1}
+\setfont\smallttsl\ttslshape{10}{900}{OT1TT}
+\font\smalli=cmmi9
+\font\smallsy=cmsy9
+\def\smallecsize{0900}
+
+% Fonts for small examples (8pt).
+\def\smallernominalsize{8pt}
+\setfont\smallerrm\rmshape{8}{1000}{OT1}
+\setfont\smallertt\ttshape{8}{1000}{OT1TT}
+\setfont\smallerbf\bfshape{10}{800}{OT1}
+\setfont\smallerit\itshape{8}{1000}{OT1IT}
+\setfont\smallersl\slshape{8}{1000}{OT1}
+\setfont\smallersf\sfshape{8}{1000}{OT1}
+\setfont\smallersc\scshape{10}{800}{OT1}
+\setfont\smallerttsl\ttslshape{10}{800}{OT1TT}
+\font\smalleri=cmmi8
+\font\smallersy=cmsy8
+\def\smallerecsize{0800}
+
+% Fonts for math mode superscripts (7pt).
+\def\sevennominalsize{7pt}
+\setfont\sevenrm\rmshape{7}{1000}{OT1}
+\setfont\seventt\ttshape{10}{700}{OT1TT}
+\setfont\sevenbf\bfshape{10}{700}{OT1}
+\setfont\sevenit\itshape{7}{1000}{OT1IT}
+\setfont\sevensl\slshape{10}{700}{OT1}
+\setfont\sevensf\sfshape{10}{700}{OT1}
+\setfont\sevensc\scshape{10}{700}{OT1}
+\setfont\seventtsl\ttslshape{10}{700}{OT1TT}
+\font\seveni=cmmi7
+\font\sevensy=cmsy7
+\def\sevenecsize{0700}
+
+% Fonts for title page (20.4pt):
+\def\titlenominalsize{20pt}
+\setfont\titlerm\rmbshape{12}{\magstep3}{OT1}
+\setfont\titleit\itbshape{10}{\magstep4}{OT1IT}
+\setfont\titlesl\slbshape{10}{\magstep4}{OT1}
+\setfont\titlett\ttbshape{12}{\magstep3}{OT1TT}
+\setfont\titlettsl\ttslshape{10}{\magstep4}{OT1TT}
+\setfont\titlesf\sfbshape{17}{\magstep1}{OT1}
+\let\titlebf=\titlerm
+\setfont\titlesc\scbshape{10}{\magstep4}{OT1}
+\font\titlei=cmmi12 scaled \magstep3
+\font\titlesy=cmsy10 scaled \magstep4
+\def\titleecsize{2074}
+
+% Chapter (and unnumbered) fonts (17.28pt).
+\def\chapnominalsize{17pt}
+\setfont\chaprm\rmbshape{12}{\magstep2}{OT1}
+\setfont\chapit\itbshape{10}{\magstep3}{OT1IT}
+\setfont\chapsl\slbshape{10}{\magstep3}{OT1}
+\setfont\chaptt\ttbshape{12}{\magstep2}{OT1TT}
+\setfont\chapttsl\ttslshape{10}{\magstep3}{OT1TT}
+\setfont\chapsf\sfbshape{17}{1000}{OT1}
+\let\chapbf=\chaprm
+\setfont\chapsc\scbshape{10}{\magstep3}{OT1}
+\font\chapi=cmmi12 scaled \magstep2
+\font\chapsy=cmsy10 scaled \magstep3
+\def\chapecsize{1728}
+
+% Section fonts (14.4pt).
+\def\secnominalsize{14pt}
+\setfont\secrm\rmbshape{12}{\magstep1}{OT1}
+\setfont\secrmnotbold\rmshape{12}{\magstep1}{OT1}
+\setfont\secit\itbshape{10}{\magstep2}{OT1IT}
+\setfont\secsl\slbshape{10}{\magstep2}{OT1}
+\setfont\sectt\ttbshape{12}{\magstep1}{OT1TT}
+\setfont\secttsl\ttslshape{10}{\magstep2}{OT1TT}
+\setfont\secsf\sfbshape{12}{\magstep1}{OT1}
+\let\secbf\secrm
+\setfont\secsc\scbshape{10}{\magstep2}{OT1}
+\font\seci=cmmi12 scaled \magstep1
+\font\secsy=cmsy10 scaled \magstep2
+\def\sececsize{1440}
+
+% Subsection fonts (13.15pt).
+\def\ssecnominalsize{13pt}
+\setfont\ssecrm\rmbshape{12}{\magstephalf}{OT1}
+\setfont\ssecit\itbshape{10}{1315}{OT1IT}
+\setfont\ssecsl\slbshape{10}{1315}{OT1}
+\setfont\ssectt\ttbshape{12}{\magstephalf}{OT1TT}
+\setfont\ssecttsl\ttslshape{10}{1315}{OT1TT}
+\setfont\ssecsf\sfbshape{12}{\magstephalf}{OT1}
+\let\ssecbf\ssecrm
+\setfont\ssecsc\scbshape{10}{1315}{OT1}
+\font\sseci=cmmi12 scaled \magstephalf
+\font\ssecsy=cmsy10 scaled 1315
+\def\ssececsize{1200}
+
+% Reduced fonts for @acronym in text (10pt).
+\def\reducednominalsize{10pt}
+\setfont\reducedrm\rmshape{10}{1000}{OT1}
+\setfont\reducedtt\ttshape{10}{1000}{OT1TT}
+\setfont\reducedbf\bfshape{10}{1000}{OT1}
+\setfont\reducedit\itshape{10}{1000}{OT1IT}
+\setfont\reducedsl\slshape{10}{1000}{OT1}
+\setfont\reducedsf\sfshape{10}{1000}{OT1}
+\setfont\reducedsc\scshape{10}{1000}{OT1}
+\setfont\reducedttsl\ttslshape{10}{1000}{OT1TT}
+\font\reducedi=cmmi10
+\font\reducedsy=cmsy10
+\def\reducedecsize{1000}
+
+\textleading = 13.2pt % line spacing for 11pt CM
+\textfonts            % reset the current fonts
+\rm
+} % end of 11pt text font size definitions, \definetextfontsizexi
+
+
+% Definitions to make the main text be 10pt Computer Modern, with
+% section, chapter, etc., sizes following suit.  This is for the GNU
+% Press printing of the Emacs 22 manual.  Maybe other manuals in the
+% future.  Used with @smallbook, which sets the leading to 12pt.
+%
+\def\definetextfontsizex{%
+% Text fonts (10pt).
+\def\textnominalsize{10pt}
+\edef\mainmagstep{1000}
+\setfont\textrm\rmshape{10}{\mainmagstep}{OT1}
+\setfont\texttt\ttshape{10}{\mainmagstep}{OT1TT}
+\setfont\textbf\bfshape{10}{\mainmagstep}{OT1}
+\setfont\textit\itshape{10}{\mainmagstep}{OT1IT}
+\setfont\textsl\slshape{10}{\mainmagstep}{OT1}
+\setfont\textsf\sfshape{10}{\mainmagstep}{OT1}
+\setfont\textsc\scshape{10}{\mainmagstep}{OT1}
+\setfont\textttsl\ttslshape{10}{\mainmagstep}{OT1TT}
+\font\texti=cmmi10 scaled \mainmagstep
+\font\textsy=cmsy10 scaled \mainmagstep
+\def\textecsize{1000}
+
+% A few fonts for @defun names and args.
+\setfont\defbf\bfshape{10}{\magstephalf}{OT1}
+\setfont\deftt\ttshape{10}{\magstephalf}{OT1TT}
+\setfont\defsl\slshape{10}{\magstephalf}{OT1}
+\setfont\defttsl\ttslshape{10}{\magstephalf}{OT1TT}
+\def\df{\let\ttfont=\deftt \let\bffont = \defbf
+\let\slfont=\defsl \let\ttslfont=\defttsl \bf}
+
+% Fonts for indices, footnotes, small examples (9pt).
+\def\smallnominalsize{9pt}
+\setfont\smallrm\rmshape{9}{1000}{OT1}
+\setfont\smalltt\ttshape{9}{1000}{OT1TT}
+\setfont\smallbf\bfshape{10}{900}{OT1}
+\setfont\smallit\itshape{9}{1000}{OT1IT}
+\setfont\smallsl\slshape{9}{1000}{OT1}
+\setfont\smallsf\sfshape{9}{1000}{OT1}
+\setfont\smallsc\scshape{10}{900}{OT1}
+\setfont\smallttsl\ttslshape{10}{900}{OT1TT}
+\font\smalli=cmmi9
+\font\smallsy=cmsy9
+\def\smallecsize{0900}
+
+% Fonts for small examples (8pt).
+\def\smallernominalsize{8pt}
+\setfont\smallerrm\rmshape{8}{1000}{OT1}
+\setfont\smallertt\ttshape{8}{1000}{OT1TT}
+\setfont\smallerbf\bfshape{10}{800}{OT1}
+\setfont\smallerit\itshape{8}{1000}{OT1IT}
+\setfont\smallersl\slshape{8}{1000}{OT1}
+\setfont\smallersf\sfshape{8}{1000}{OT1}
+\setfont\smallersc\scshape{10}{800}{OT1}
+\setfont\smallerttsl\ttslshape{10}{800}{OT1TT}
+\font\smalleri=cmmi8
+\font\smallersy=cmsy8
+\def\smallerecsize{0800}
+
+% Fonts for math mode superscripts (7pt).
+\def\sevennominalsize{7pt}
+\setfont\sevenrm\rmshape{7}{1000}{OT1}
+\setfont\seventt\ttshape{10}{700}{OT1TT}
+\setfont\sevenbf\bfshape{10}{700}{OT1}
+\setfont\sevenit\itshape{7}{1000}{OT1IT}
+\setfont\sevensl\slshape{10}{700}{OT1}
+\setfont\sevensf\sfshape{10}{700}{OT1}
+\setfont\sevensc\scshape{10}{700}{OT1}
+\setfont\seventtsl\ttslshape{10}{700}{OT1TT}
+\font\seveni=cmmi7
+\font\sevensy=cmsy7
+\def\sevenecsize{0700}
+
+% Fonts for title page (20.4pt):
+\def\titlenominalsize{20pt}
+\setfont\titlerm\rmbshape{12}{\magstep3}{OT1}
+\setfont\titleit\itbshape{10}{\magstep4}{OT1IT}
+\setfont\titlesl\slbshape{10}{\magstep4}{OT1}
+\setfont\titlett\ttbshape{12}{\magstep3}{OT1TT}
+\setfont\titlettsl\ttslshape{10}{\magstep4}{OT1TT}
+\setfont\titlesf\sfbshape{17}{\magstep1}{OT1}
+\let\titlebf=\titlerm
+\setfont\titlesc\scbshape{10}{\magstep4}{OT1}
+\font\titlei=cmmi12 scaled \magstep3
+\font\titlesy=cmsy10 scaled \magstep4
+\def\titleecsize{2074}
+
+% Chapter fonts (14.4pt).
+\def\chapnominalsize{14pt}
+\setfont\chaprm\rmbshape{12}{\magstep1}{OT1}
+\setfont\chapit\itbshape{10}{\magstep2}{OT1IT}
+\setfont\chapsl\slbshape{10}{\magstep2}{OT1}
+\setfont\chaptt\ttbshape{12}{\magstep1}{OT1TT}
+\setfont\chapttsl\ttslshape{10}{\magstep2}{OT1TT}
+\setfont\chapsf\sfbshape{12}{\magstep1}{OT1}
+\let\chapbf\chaprm
+\setfont\chapsc\scbshape{10}{\magstep2}{OT1}
+\font\chapi=cmmi12 scaled \magstep1
+\font\chapsy=cmsy10 scaled \magstep2
+\def\chapecsize{1440}
+
+% Section fonts (12pt).
+\def\secnominalsize{12pt}
+\setfont\secrm\rmbshape{12}{1000}{OT1}
+\setfont\secit\itbshape{10}{\magstep1}{OT1IT}
+\setfont\secsl\slbshape{10}{\magstep1}{OT1}
+\setfont\sectt\ttbshape{12}{1000}{OT1TT}
+\setfont\secttsl\ttslshape{10}{\magstep1}{OT1TT}
+\setfont\secsf\sfbshape{12}{1000}{OT1}
+\let\secbf\secrm
+\setfont\secsc\scbshape{10}{\magstep1}{OT1}
+\font\seci=cmmi12
+\font\secsy=cmsy10 scaled \magstep1
+\def\sececsize{1200}
+
+% Subsection fonts (10pt).
+\def\ssecnominalsize{10pt}
+\setfont\ssecrm\rmbshape{10}{1000}{OT1}
+\setfont\ssecit\itbshape{10}{1000}{OT1IT}
+\setfont\ssecsl\slbshape{10}{1000}{OT1}
+\setfont\ssectt\ttbshape{10}{1000}{OT1TT}
+\setfont\ssecttsl\ttslshape{10}{1000}{OT1TT}
+\setfont\ssecsf\sfbshape{10}{1000}{OT1}
+\let\ssecbf\ssecrm
+\setfont\ssecsc\scbshape{10}{1000}{OT1}
+\font\sseci=cmmi10
+\font\ssecsy=cmsy10
+\def\ssececsize{1000}
+
+% Reduced fonts for @acronym in text (9pt).
+\def\reducednominalsize{9pt}
+\setfont\reducedrm\rmshape{9}{1000}{OT1}
+\setfont\reducedtt\ttshape{9}{1000}{OT1TT}
+\setfont\reducedbf\bfshape{10}{900}{OT1}
+\setfont\reducedit\itshape{9}{1000}{OT1IT}
+\setfont\reducedsl\slshape{9}{1000}{OT1}
+\setfont\reducedsf\sfshape{9}{1000}{OT1}
+\setfont\reducedsc\scshape{10}{900}{OT1}
+\setfont\reducedttsl\ttslshape{10}{900}{OT1TT}
+\font\reducedi=cmmi9
+\font\reducedsy=cmsy9
+\def\reducedecsize{0900}
+
+\divide\parskip by 2  % reduce space between paragraphs
+\textleading = 12pt   % line spacing for 10pt CM
+\textfonts            % reset the current fonts
+\rm
+} % end of 10pt text font size definitions, \definetextfontsizex
+
+% Fonts for short table of contents.
+\setfont\shortcontrm\rmshape{12}{1000}{OT1}
+\setfont\shortcontbf\bfshape{10}{\magstep1}{OT1}  % no cmb12
+\setfont\shortcontsl\slshape{12}{1000}{OT1}
+\setfont\shortconttt\ttshape{12}{1000}{OT1TT}
+
+
+% We provide the user-level command
+%   @fonttextsize 10
+% (or 11) to redefine the text font size.  pt is assumed.
+%
+\def\xiword{11}
+\def\xword{10}
+\def\xwordpt{10pt}
+%
+\parseargdef\fonttextsize{%
+  \def\textsizearg{#1}%
+  %\wlog{doing @fonttextsize \textsizearg}%
+  %
+  % Set \globaldefs so that documents can use this inside @tex, since
+  % makeinfo 4.8 does not support it, but we need it nonetheless.
+  %
+ \begingroup \globaldefs=1
+  \ifx\textsizearg\xword \definetextfontsizex
+  \else \ifx\textsizearg\xiword \definetextfontsizexi
+  \else
+    \errhelp=\EMsimple
+    \errmessage{@fonttextsize only supports `10' or `11', not `\textsizearg'}
+  \fi\fi
+ \endgroup
+}
+
+%
+% Change the current font style to #1, remembering it in \curfontstyle.
+% For now, we do not accumulate font styles: @b{@i{foo}} prints foo in
+% italics, not bold italics.
+%
+\def\setfontstyle#1{%
+  \def\curfontstyle{#1}% not as a control sequence, because we are \edef'd.
+  \csname #1font\endcsname  % change the current font
+}
+
+\def\rm{\fam=0 \setfontstyle{rm}}
+\def\it{\fam=\itfam \setfontstyle{it}}
+\def\sl{\fam=\slfam \setfontstyle{sl}}
+\def\bf{\fam=\bffam \setfontstyle{bf}}\def\bfstylename{bf}
+\def\tt{\fam=\ttfam \setfontstyle{tt}}\def\ttstylename{tt}
+
+% Texinfo sort of supports the sans serif font style, which plain TeX does not.
+% So we set up a \sf.
+\newfam\sffam
+\def\sf{\fam=\sffam \setfontstyle{sf}}
+
+% We don't need math for this font style.
+\def\ttsl{\setfontstyle{ttsl}}
+
+
+% In order for the font changes to affect most math symbols and letters,
+% we have to define the \textfont of the standard families.
+% We don't bother to reset \scriptscriptfont; awaiting user need.
+%
+\def\resetmathfonts{%
+  \textfont0=\rmfont \textfont1=\ifont \textfont2=\syfont
+  \textfont\itfam=\itfont \textfont\slfam=\slfont \textfont\bffam=\bffont
+  \textfont\ttfam=\ttfont \textfont\sffam=\sffont
+  %
+  % Fonts for superscript.  Note that the 7pt fonts are used regardless
+  % of the current font size.
+  \scriptfont0=\sevenrm \scriptfont1=\seveni \scriptfont2=\sevensy
+  \scriptfont\itfam=\sevenit \scriptfont\slfam=\sevensl
+  \scriptfont\bffam=\sevenbf \scriptfont\ttfam=\seventt
+  \scriptfont\sffam=\sevensf
+}
+
+%
+
+% The font-changing commands (all called \...fonts) redefine the meanings
+% of \STYLEfont, instead of just \STYLE.  We do this because \STYLE needs
+% to also set the current \fam for math mode.  Our \STYLE (e.g., \rm)
+% commands hardwire \STYLEfont to set the current font.
+%
+% The fonts used for \ifont are for "math italics"  (\itfont is for italics
+% in regular text).  \syfont is also used in math mode only.
+%
+% Each font-changing command also sets the names \lsize (one size lower)
+% and \lllsize (three sizes lower).  These relative commands are used
+% in, e.g., the LaTeX logo and acronyms.
+%
+% This all needs generalizing, badly.
+%
+
+\def\assignfonts#1{%
+  \expandafter\let\expandafter\rmfont\csname #1rm\endcsname
+  \expandafter\let\expandafter\itfont\csname #1it\endcsname
+  \expandafter\let\expandafter\slfont\csname #1sl\endcsname
+  \expandafter\let\expandafter\bffont\csname #1bf\endcsname
+  \expandafter\let\expandafter\ttfont\csname #1tt\endcsname
+  \expandafter\let\expandafter\smallcaps\csname #1sc\endcsname
+  \expandafter\let\expandafter\sffont  \csname #1sf\endcsname
+  \expandafter\let\expandafter\ifont   \csname #1i\endcsname
+  \expandafter\let\expandafter\syfont  \csname #1sy\endcsname
+  \expandafter\let\expandafter\ttslfont\csname #1ttsl\endcsname
+}
+
+\newif\ifrmisbold
+
+% Select smaller font size with the current style.  Used to change font size
+% in, e.g., the LaTeX logo and acronyms.  If we are using bold fonts for
+% normal roman text, also use bold fonts for roman text in the smaller size.
+\def\switchtolllsize{%
+   \expandafter\assignfonts\expandafter{\lllsize}%
+   \ifrmisbold
+     \let\rmfont\bffont
+   \fi
+   \csname\curfontstyle\endcsname
+}%
+
+\def\switchtolsize{%
+   \expandafter\assignfonts\expandafter{\lsize}%
+   \ifrmisbold
+     \let\rmfont\bffont
+   \fi
+   \csname\curfontstyle\endcsname
+}%
+
+\def\definefontsetatsize#1#2#3#4#5{%
+\expandafter\def\csname #1fonts\endcsname{%
+  \def\curfontsize{#1}%
+  \def\lsize{#2}\def\lllsize{#3}%
+  \csname rmisbold#5\endcsname
+  \assignfonts{#1}%
+  \resetmathfonts
+  \setleading{#4}%
+}}
+
+\definefontsetatsize{text}   {reduced}{smaller}{\textleading}{false}
+\definefontsetatsize{title}  {chap}   {subsec} {27pt}  {true}
+\definefontsetatsize{chap}   {sec}    {text}   {19pt}  {true}
+\definefontsetatsize{sec}    {subsec} {reduced}{17pt}  {true}
+\definefontsetatsize{ssec}   {text}   {small}  {15pt}  {true}
+\definefontsetatsize{reduced}{small}  {smaller}{10.5pt}{false}
+\definefontsetatsize{small}  {smaller}{smaller}{10.5pt}{false}
+\definefontsetatsize{smaller}{smaller}{smaller}{9.5pt} {false}
+
+\def\titlefont#1{{\titlefonts\rm #1}}
+\let\subsecfonts = \ssecfonts
+\let\subsubsecfonts = \ssecfonts
+
+% Define these just so they can be easily changed for other fonts.
+\def\angleleft{$\langle$}
+\def\angleright{$\rangle$}
+
+% Set the fonts to use with the @small... environments.
+\let\smallexamplefonts = \smallfonts
+
+% About \smallexamplefonts.  If we use \smallfonts (9pt), @smallexample
+% can fit this many characters:
+%   8.5x11=86   smallbook=72  a4=90  a5=69
+% If we use \scriptfonts (8pt), then we can fit this many characters:
+%   8.5x11=90+  smallbook=80  a4=90+  a5=77
+% For me, subjectively, the few extra characters that fit aren't worth
+% the additional smallness of 8pt.  So I'm making the default 9pt.
+%
+% By the way, for comparison, here's what fits with @example (10pt):
+%   8.5x11=71  smallbook=60  a4=75  a5=58
+% --karl, 24jan03.
+
+% Set up the default fonts, so we can use them for creating boxes.
+%
+\definetextfontsizexi
+
+
+% Check if we are currently using a typewriter font.  Since all the
+% Computer Modern typewriter fonts have zero interword stretch (and
+% shrink), and it is reasonable to expect all typewriter fonts to have
+% this property, we can check that font parameter.
+%
+\def\ifmonospace{\ifdim\fontdimen3\font=0pt }
+
+{
+\catcode`\'=\active
+\catcode`\`=\active
+
+\gdef\setcodequotes{\let`\codequoteleft \let'\codequoteright}
+\gdef\setregularquotes{\let`\lq \let'\rq}
+}
+
+% Allow an option to not use regular directed right quote/apostrophe
+% (char 0x27), but instead the undirected quote from cmtt (char 0x0d).
+% The undirected quote is ugly, so don't make it the default, but it
+% works for pasting with more pdf viewers (at least evince), the
+% lilypond developers report.  xpdf does work with the regular 0x27.
+%
+\def\codequoteright{%
+  \ifmonospace
+    \expandafter\ifx\csname SETtxicodequoteundirected\endcsname\relax
+      \expandafter\ifx\csname SETcodequoteundirected\endcsname\relax
+        '%
+      \else \char'15 \fi
+    \else \char'15 \fi
+   \else
+     '%
+   \fi
+}
+%
+% and a similar option for the left quote char vs. a grave accent.
+% Modern fonts display ASCII 0x60 as a grave accent, so some people like
+% the code environments to do likewise.
+%
+\def\codequoteleft{%
+  \ifmonospace
+    \expandafter\ifx\csname SETtxicodequotebacktick\endcsname\relax
+      \expandafter\ifx\csname SETcodequotebacktick\endcsname\relax
+        % [Knuth] pp. 380,381,391
+        % \relax disables Spanish ligatures ?` and !` of \tt font.
+        \relax`%
+      \else \char'22 \fi
+    \else \char'22 \fi
+   \else
+     \relax`%
+   \fi
+}
+
+% Commands to set the quote options.
+% 
+\parseargdef\codequoteundirected{%
+  \def\temp{#1}%
+  \ifx\temp\onword
+    \expandafter\let\csname SETtxicodequoteundirected\endcsname
+      = t%
+  \else\ifx\temp\offword
+    \expandafter\let\csname SETtxicodequoteundirected\endcsname
+      = \relax
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @codequoteundirected value `\temp', must be on|off}%
+  \fi\fi
+}
+%
+\parseargdef\codequotebacktick{%
+  \def\temp{#1}%
+  \ifx\temp\onword
+    \expandafter\let\csname SETtxicodequotebacktick\endcsname
+      = t%
+  \else\ifx\temp\offword
+    \expandafter\let\csname SETtxicodequotebacktick\endcsname
+      = \relax
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @codequotebacktick value `\temp', must be on|off}%
+  \fi\fi
+}
+
+% [Knuth] pp. 380,381,391, disable Spanish ligatures ?` and !` of \tt font.
+\def\noligaturesquoteleft{\relax\lq}
+
+% Count depth in font-changes, for error checks
+\newcount\fontdepth \fontdepth=0
+
+% Font commands.
+
+% #1 is the font command (\sl or \it), #2 is the text to slant.
+% If we are in a monospaced environment, however, 1) always use \ttsl,
+% and 2) do not add an italic correction.
+\def\dosmartslant#1#2{%
+  \ifusingtt 
+    {{\ttsl #2}\let\next=\relax}%
+    {\def\next{{#1#2}\futurelet\next\smartitaliccorrection}}%
+  \next
+}
+\def\smartslanted{\dosmartslant\sl}
+\def\smartitalic{\dosmartslant\it}
+
+% Output an italic correction unless \next (presumed to be the following
+% character) is such as not to need one.
+\def\smartitaliccorrection{%
+  \ifx\next,%
+  \else\ifx\next-%
+  \else\ifx\next.%
+  \else\ifx\next\.%
+  \else\ifx\next\comma%
+  \else\ptexslash
+  \fi\fi\fi\fi\fi
+  \aftersmartic
+}
+
+% Unconditional use \ttsl, and no ic.  @var is set to this for defuns.
+\def\ttslanted#1{{\ttsl #1}}
+
+% @cite is like \smartslanted except unconditionally use \sl.  We never want
+% ttsl for book titles, do we?
+\def\cite#1{{\sl #1}\futurelet\next\smartitaliccorrection}
+
+\def\aftersmartic{}
+\def\var#1{%
+  \let\saveaftersmartic = \aftersmartic
+  \def\aftersmartic{\null\let\aftersmartic=\saveaftersmartic}%
+  \smartslanted{#1}%
+}
+
+\let\i=\smartitalic
+\let\slanted=\smartslanted
+\let\dfn=\smartslanted
+\let\emph=\smartitalic
+
+% Explicit font changes: @r, @sc, undocumented @ii.
+\def\r#1{{\rm #1}}              % roman font
+\def\sc#1{{\smallcaps#1}}       % smallcaps font
+\def\ii#1{{\it #1}}             % italic font
+
+% @b, explicit bold.  Also @strong.
+\def\b#1{{\bf #1}}
+\let\strong=\b
+
+% @sansserif, explicit sans.
+\def\sansserif#1{{\sf #1}}
+
+% We can't just use \exhyphenpenalty, because that only has effect at
+% the end of a paragraph.  Restore normal hyphenation at the end of the
+% group within which \nohyphenation is presumably called.
+%
+\def\nohyphenation{\hyphenchar\font = -1  \aftergroup\restorehyphenation}
+\def\restorehyphenation{\hyphenchar\font = `- }
+
+% Set sfcode to normal for the chars that usually have another value.
+% Can't use plain's \frenchspacing because it uses the `\x notation, and
+% sometimes \x has an active definition that messes things up.
+%
+\catcode`@=11
+  \def\plainfrenchspacing{%
+    \sfcode`\.=\@m \sfcode`\?=\@m \sfcode`\!=\@m
+    \sfcode`\:=\@m \sfcode`\;=\@m \sfcode`\,=\@m
+    \def\endofsentencespacefactor{1000}% for @. and friends
+  }
+  \def\plainnonfrenchspacing{%
+    \sfcode`\.3000\sfcode`\?3000\sfcode`\!3000
+    \sfcode`\:2000\sfcode`\;1500\sfcode`\,1250
+    \def\endofsentencespacefactor{3000}% for @. and friends
+  }
+\catcode`@=\other
+\def\endofsentencespacefactor{3000}% default
+
+% @t, explicit typewriter.
+\def\t#1{%
+  {\tt \plainfrenchspacing #1}%
+  \null
+}
+
+% @samp.
+\def\samp#1{{\setcodequotes\lq\tclose{#1}\rq\null}}
+
+% @indicateurl is \samp, that is, with quotes.
+\let\indicateurl=\samp
+
+% @code (and similar) prints in typewriter, but with spaces the same
+% size as normal in the surrounding text, without hyphenation, etc.
+% This is a subroutine for that.
+\def\tclose#1{%
+  {%
+    % Change normal interword space to be same as for the current font.
+    \spaceskip = \fontdimen2\font
+    %
+    % Switch to typewriter.
+    \tt
+    %
+    % But `\ ' produces the large typewriter interword space.
+    \def\ {{\spaceskip = 0pt{} }}%
+    %
+    % Turn off hyphenation.
+    \nohyphenation
+    %
+    \plainfrenchspacing
+    #1%
+  }%
+  \null % reset spacefactor to 1000
+}
+
+% We *must* turn on hyphenation at `-' and `_' in @code.
+% (But see \codedashfinish below.)
+% Otherwise, it is too hard to avoid overfull hboxes
+% in the Emacs manual, the Library manual, etc.
+%
+% Unfortunately, TeX uses one parameter (\hyphenchar) to control
+% both hyphenation at - and hyphenation within words.
+% We must therefore turn them both off (\tclose does that)
+% and arrange explicitly to hyphenate at a dash. -- rms.
+{
+  \catcode`\-=\active \catcode`\_=\active
+  \catcode`\'=\active \catcode`\`=\active
+  \global\let'=\rq \global\let`=\lq  % default definitions
+  %
+  \global\def\code{\begingroup
+    \setcodequotes
+    \catcode\dashChar=\active  \catcode\underChar=\active
+    \ifallowcodebreaks
+     \let-\codedash
+     \let_\codeunder
+    \else
+     \let-\normaldash
+     \let_\realunder
+    \fi
+    % Given -foo (with a single dash), we do not want to allow a break
+    % after the hyphen.
+    \global\let\codedashprev=\codedash
+    %
+    \codex
+  }
+  %
+  \gdef\codedash{\futurelet\next\codedashfinish}
+  \gdef\codedashfinish{%
+    \normaldash % always output the dash character itself.
+    % 
+    % Now, output a discretionary to allow a line break, unless
+    % (a) the next character is a -, or
+    % (b) the preceding character is a -.
+    % E.g., given --posix, we do not want to allow a break after either -.
+    % Given --foo-bar, we do want to allow a break between the - and the b.
+    \ifx\next\codedash \else
+      \ifx\codedashprev\codedash 
+      \else \discretionary{}{}{}\fi
+    \fi
+    % we need the space after the = for the case when \next itself is a
+    % space token; it would get swallowed otherwise.  As in @code{- a}.
+    \global\let\codedashprev= \next
+  }
+}
+\def\normaldash{-}
+%
+\def\codex #1{\tclose{#1}\endgroup}
+
+\def\codeunder{%
+  % this is all so @math{@code{var_name}+1} can work.  In math mode, _
+  % is "active" (mathcode"8000) and \normalunderscore (or \char95, etc.)
+  % will therefore expand the active definition of _, which is us
+  % (inside @code that is), therefore an endless loop.
+  \ifusingtt{\ifmmode
+               \mathchar"075F % class 0=ordinary, family 7=ttfam, pos 0x5F=_.
+             \else\normalunderscore \fi
+             \discretionary{}{}{}}%
+            {\_}%
+}
+
+% An additional complication: the above will allow breaks after, e.g.,
+% each of the four underscores in __typeof__.  This is bad.
+% @allowcodebreaks provides a document-level way to turn breaking at -
+% and _ on and off.
+%
+\newif\ifallowcodebreaks  \allowcodebreakstrue
+
+\def\keywordtrue{true}
+\def\keywordfalse{false}
+
+\parseargdef\allowcodebreaks{%
+  \def\txiarg{#1}%
+  \ifx\txiarg\keywordtrue
+    \allowcodebreakstrue
+  \else\ifx\txiarg\keywordfalse
+    \allowcodebreaksfalse
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @allowcodebreaks option `\txiarg', must be true|false}%
+  \fi\fi
+}
+
+% For @command, @env, @file, @option quotes seem unnecessary,
+% so use \code rather than \samp.
+\let\command=\code
+\let\env=\code
+\let\file=\code
+\let\option=\code
+
+% @uref (abbreviation for `urlref') aka @url takes an optional
+% (comma-separated) second argument specifying the text to display and
+% an optional third arg as text to display instead of (rather than in
+% addition to) the url itself.  First (mandatory) arg is the url.
+
+% TeX-only option to allow changing PDF output to show only the second
+% arg (if given), and not the url (which is then just the link target).
+\newif\ifurefurlonlylink
+
+% The default \pretolerance setting stops the penalty inserted in
+% \urefallowbreak being a discouragement to line breaking.  Set it to
+% a negative value for this paragraph only.  Hopefully this does not
+% conflict with redefinitions of \par done elsewhere.
+\def\nopretolerance{%
+\pretolerance=-1
+\def\par{\endgraf\pretolerance=100 \let\par\endgraf}%
+}
+
+% The main macro is \urefbreak, which allows breaking at expected
+% places within the url.
+\def\urefbreak{\nopretolerance \begingroup \urefcatcodes \dourefbreak}
+\let\uref=\urefbreak
+%
+\def\dourefbreak#1{\urefbreakfinish #1,,,\finish}
+\def\urefbreakfinish#1,#2,#3,#4\finish{% doesn't work in @example
+  \unsepspaces
+  \pdfurl{#1}%
+  \setbox0 = \hbox{\ignorespaces #3}%
+  \ifdim\wd0 > 0pt
+    \unhbox0 % third arg given, show only that
+  \else
+    \setbox0 = \hbox{\ignorespaces #2}% look for second arg
+    \ifdim\wd0 > 0pt
+      \ifpdf
+        % For pdfTeX and LuaTeX
+        \ifurefurlonlylink
+          % PDF plus option to not display url, show just arg
+          \unhbox0             
+        \else
+          % PDF, normally display both arg and url for consistency,
+          % visibility, if the pdf is eventually used to print, etc.
+          \unhbox0\ (\urefcode{#1})%
+        \fi
+      \else
+        \ifx\XeTeXrevision\thisisundefined
+          \unhbox0\ (\urefcode{#1})% DVI, always show arg and url
+        \else
+          % For XeTeX
+          \ifurefurlonlylink
+            % PDF plus option to not display url, show just arg
+            \unhbox0             
+          \else
+            % PDF, normally display both arg and url for consistency,
+            % visibility, if the pdf is eventually used to print, etc.
+            \unhbox0\ (\urefcode{#1})%
+          \fi
+        \fi
+      \fi
+    \else
+      \urefcode{#1}% only url given, so show it
+    \fi
+  \fi
+  \endlink
+\endgroup}
+
+% Allow line breaks around only a few characters (only).
+\def\urefcatcodes{%
+  \catcode`\&=\active \catcode`\.=\active
+  \catcode`\#=\active \catcode`\?=\active
+  \catcode`\/=\active
+}
+{
+  \urefcatcodes
+  %
+  \global\def\urefcode{\begingroup
+    \setcodequotes
+    \urefcatcodes
+    \let&\urefcodeamp
+    \let.\urefcodedot
+    \let#\urefcodehash
+    \let?\urefcodequest
+    \let/\urefcodeslash
+    \codex
+  }
+  %
+  % By default, they are just regular characters.
+  \global\def&{\normalamp}
+  \global\def.{\normaldot}
+  \global\def#{\normalhash}
+  \global\def?{\normalquest}
+  \global\def/{\normalslash}
+}
+
+\def\urefcodeamp{\urefprebreak \&\urefpostbreak}
+\def\urefcodedot{\urefprebreak .\urefpostbreak}
+\def\urefcodehash{\urefprebreak \#\urefpostbreak}
+\def\urefcodequest{\urefprebreak ?\urefpostbreak}
+\def\urefcodeslash{\futurelet\next\urefcodeslashfinish}
+{
+  \catcode`\/=\active
+  \global\def\urefcodeslashfinish{%
+    \urefprebreak \slashChar
+    % Allow line break only after the final / in a sequence of
+    % slashes, to avoid line break between the slashes in http://.
+    \ifx\next/\else \urefpostbreak \fi
+  }
+}
+
+% By default we'll break after the special characters, but some people like to 
+% break before the special chars, so allow that.  Also allow no breaking at 
+% all, for manual control.
+% 
+\parseargdef\urefbreakstyle{%
+  \def\txiarg{#1}%
+  \ifx\txiarg\wordnone
+    \def\urefprebreak{\nobreak}\def\urefpostbreak{\nobreak}
+  \else\ifx\txiarg\wordbefore
+    \def\urefprebreak{\urefallowbreak}\def\urefpostbreak{\nobreak}
+  \else\ifx\txiarg\wordafter
+    \def\urefprebreak{\nobreak}\def\urefpostbreak{\urefallowbreak}
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @urefbreakstyle setting `\txiarg'}%
+  \fi\fi\fi
+}
+\def\wordafter{after}
+\def\wordbefore{before}
+\def\wordnone{none}
+
+% Allow a ragged right output to aid breaking long URL's.  There can
+% be a break at the \allowbreak with no extra glue (if the existing stretch in 
+% the line is sufficient), a break at the \penalty with extra glue added
+% at the end of the line, or no break at all here.
+%   Changing the value of the penalty and/or the amount of stretch affects how 
+% preferable one choice is over the other.
+\def\urefallowbreak{%
+  \penalty0\relax
+  \hskip 0pt plus 2 em\relax
+  \penalty1000\relax
+  \hskip 0pt plus -2 em\relax
+}
+
+\urefbreakstyle after
+
+% @url synonym for @uref, since that's how everyone uses it.
+%
+\let\url=\uref
+
+% rms does not like angle brackets --karl, 17may97.
+% So now @email is just like @uref, unless we are pdf.
+%
+%\def\email#1{\angleleft{\tt #1}\angleright}
+\ifpdforxetex
+  \def\email#1{\doemail#1,,\finish}
+  \def\doemail#1,#2,#3\finish{\begingroup
+    \unsepspaces
+    \pdfurl{mailto:#1}%
+    \setbox0 = \hbox{\ignorespaces #2}%
+    \ifdim\wd0>0pt\unhbox0\else\code{#1}\fi
+    \endlink
+  \endgroup}
+\else
+  \let\email=\uref
+\fi
+
+% @kbdinputstyle -- arg is `distinct' (@kbd uses slanted tty font always),
+%   `example' (@kbd uses ttsl only inside of @example and friends),
+%   or `code' (@kbd uses normal tty font always).
+\parseargdef\kbdinputstyle{%
+  \def\txiarg{#1}%
+  \ifx\txiarg\worddistinct
+    \gdef\kbdexamplefont{\ttsl}\gdef\kbdfont{\ttsl}%
+  \else\ifx\txiarg\wordexample
+    \gdef\kbdexamplefont{\ttsl}\gdef\kbdfont{\tt}%
+  \else\ifx\txiarg\wordcode
+    \gdef\kbdexamplefont{\tt}\gdef\kbdfont{\tt}%
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @kbdinputstyle setting `\txiarg'}%
+  \fi\fi\fi
+}
+\def\worddistinct{distinct}
+\def\wordexample{example}
+\def\wordcode{code}
+
+% Default is `distinct'.
+\kbdinputstyle distinct
+
+% @kbd is like @code, except that if the argument is just one @key command,
+% then @kbd has no effect.
+\def\kbd#1{{\def\look{#1}\expandafter\kbdsub\look??\par}}
+
+\def\xkey{\key}
+\def\kbdsub#1#2#3\par{%
+  \def\one{#1}\def\three{#3}\def\threex{??}%
+  \ifx\one\xkey\ifx\threex\three \key{#2}%
+  \else{\tclose{\kbdfont\setcodequotes\look}}\fi
+  \else{\tclose{\kbdfont\setcodequotes\look}}\fi
+}
+
+% definition of @key that produces a lozenge.  Doesn't adjust to text size.
+%\setfont\keyrm\rmshape{8}{1000}{OT1}
+%\font\keysy=cmsy9
+%\def\key#1{{\keyrm\textfont2=\keysy \leavevmode\hbox{%
+%  \raise0.4pt\hbox{\angleleft}\kern-.08em\vtop{%
+%    \vbox{\hrule\kern-0.4pt
+%     \hbox{\raise0.4pt\hbox{\vphantom{\angleleft}}#1}}%
+%    \kern-0.4pt\hrule}%
+%  \kern-.06em\raise0.4pt\hbox{\angleright}}}}
+
+% definition of @key with no lozenge.  If the current font is already
+% monospace, don't change it; that way, we respect @kbdinputstyle.  But
+% if it isn't monospace, then use \tt.
+%
+\def\key#1{{\setregularquotes
+  \nohyphenation
+  \ifmonospace\else\tt\fi
+  #1}\null}
+
+% @clicksequence{File @click{} Open ...}
+\def\clicksequence#1{\begingroup #1\endgroup}
+
+% @clickstyle @arrow   (by default)
+\parseargdef\clickstyle{\def\click{#1}}
+\def\click{\arrow}
+
+% Typeset a dimension, e.g., `in' or `pt'.  The only reason for the
+% argument is to make the input look right: @dmn{pt} instead of @dmn{}pt.
+%
+\def\dmn#1{\thinspace #1}
+
+% @acronym for "FBI", "NATO", and the like.
+% We print this one point size smaller, since it's intended for
+% all-uppercase.
+%
+\def\acronym#1{\doacronym #1,,\finish}
+\def\doacronym#1,#2,#3\finish{%
+  {\switchtolsize #1}%
+  \def\temp{#2}%
+  \ifx\temp\empty \else
+    \space ({\unsepspaces \ignorespaces \temp \unskip})%
+  \fi
+  \null % reset \spacefactor=1000
+}
+
+% @abbr for "Comput. J." and the like.
+% No font change, but don't do end-of-sentence spacing.
+%
+\def\abbr#1{\doabbr #1,,\finish}
+\def\doabbr#1,#2,#3\finish{%
+  {\plainfrenchspacing #1}%
+  \def\temp{#2}%
+  \ifx\temp\empty \else
+    \space ({\unsepspaces \ignorespaces \temp \unskip})%
+  \fi
+  \null % reset \spacefactor=1000
+}
+
+% @asis just yields its argument.  Used with @table, for example.
+%
+\def\asis#1{#1}
+
+% @math outputs its argument in math mode.
+%
+% One complication: _ usually means subscripts, but it could also mean
+% an actual _ character, as in @math{@var{some_variable} + 1}.  So make
+% _ active, and distinguish by seeing if the current family is \slfam,
+% which is what @var uses.
+{
+  \catcode`\_ = \active
+  \gdef\mathunderscore{%
+    \catcode`\_=\active
+    \def_{\ifnum\fam=\slfam \_\else\sb\fi}%
+  }
+}
+% Another complication: we want \\ (and @\) to output a math (or tt) \.
+% FYI, plain.tex uses \\ as a temporary control sequence (for no
+% particular reason), but this is not advertised and we don't care.
+%
+% The \mathchar is class=0=ordinary, family=7=ttfam, position=5C=\.
+\def\mathbackslash{\ifnum\fam=\ttfam \mathchar"075C \else\backslash \fi}
+%
+\def\math{%
+  \ifmmode\else % only go into math if not in math mode already
+    \tex
+    \mathunderscore
+    \let\\ = \mathbackslash
+    \mathactive
+    % make the texinfo accent commands work in math mode
+    \let\"=\ddot
+    \let\'=\acute
+    \let\==\bar
+    \let\^=\hat
+    \let\`=\grave
+    \let\u=\breve
+    \let\v=\check
+    \let\~=\tilde
+    \let\dotaccent=\dot
+    % have to provide another name for sup operator
+    \let\mathopsup=\sup
+  $\expandafter\finishmath\fi
+}
+\def\finishmath#1{#1$\endgroup}  % Close the group opened by \tex.
+
+% Some active characters (such as <) are spaced differently in math.
+% We have to reset their definitions in case the @math was an argument
+% to a command which sets the catcodes (such as @item or @section).
+%
+{
+  \catcode`^ = \active
+  \catcode`< = \active
+  \catcode`> = \active
+  \catcode`+ = \active
+  \catcode`' = \active
+  \gdef\mathactive{%
+    \let^ = \ptexhat
+    \let< = \ptexless
+    \let> = \ptexgtr
+    \let+ = \ptexplus
+    \let' = \ptexquoteright
+  }
+}
+
+% for @sub and @sup, if in math mode, just do a normal sub/superscript.
+% If in text, use math to place as sub/superscript, but switch
+% into text mode, with smaller fonts.  This is a different font than the
+% one used for real math sub/superscripts (8pt vs. 7pt), but let's not
+% fix it (significant additions to font machinery) until someone notices.
+%
+\def\sub{\ifmmode \expandafter\sb \else \expandafter\finishsub\fi}
+\def\finishsub#1{$\sb{\hbox{\switchtolllsize #1}}$}%
+%
+\def\sup{\ifmmode \expandafter\ptexsp \else \expandafter\finishsup\fi}
+\def\finishsup#1{$\ptexsp{\hbox{\switchtolllsize #1}}$}%
+
+% provide this command from LaTeX as it is very common
+\def\frac#1#2{{{#1}\over{#2}}}
+
+% @displaymath.
+% \globaldefs is needed to recognize the end lines in \tex and
+% \end tex.  Set \thisenv as @end displaymath is seen before @end tex.
+{\obeylines
+\globaldefs=1
+\envdef\displaymath{%
+\tex%
+\def\thisenv{\displaymath}%
+\begingroup\let\end\displaymathend%
+$$%
+}
+
+\def\displaymathend{$$\endgroup\end}%
+
+\def\Edisplaymath{%
+\def\thisenv{\tex}%
+\end tex
+}}
+
+
+% @inlinefmt{FMTNAME,PROCESSED-TEXT} and @inlineraw{FMTNAME,RAW-TEXT}.
+% Ignore unless FMTNAME == tex; then it is like @iftex and @tex,
+% except specified as a normal braced arg, so no newlines to worry about.
+% 
+\def\outfmtnametex{tex}
+%
+\long\def\inlinefmt#1{\doinlinefmt #1,\finish}
+\long\def\doinlinefmt#1,#2,\finish{%
+  \def\inlinefmtname{#1}%
+  \ifx\inlinefmtname\outfmtnametex \ignorespaces #2\fi
+}
+% 
+% @inlinefmtifelse{FMTNAME,THEN-TEXT,ELSE-TEXT} expands THEN-TEXT if
+% FMTNAME is tex, else ELSE-TEXT.
+\long\def\inlinefmtifelse#1{\doinlinefmtifelse #1,,,\finish}
+\long\def\doinlinefmtifelse#1,#2,#3,#4,\finish{%
+  \def\inlinefmtname{#1}%
+  \ifx\inlinefmtname\outfmtnametex \ignorespaces #2\else \ignorespaces #3\fi
+}
+%
+% For raw, must switch into @tex before parsing the argument, to avoid
+% setting catcodes prematurely.  Doing it this way means that, for
+% example, @inlineraw{html, foo{bar} gets a parse error instead of being
+% ignored.  But this isn't important because if people want a literal
+% *right* brace they would have to use a command anyway, so they may as
+% well use a command to get a left brace too.  We could re-use the
+% delimiter character idea from \verb, but it seems like overkill.
+% 
+\long\def\inlineraw{\tex \doinlineraw}
+\long\def\doinlineraw#1{\doinlinerawtwo #1,\finish}
+\def\doinlinerawtwo#1,#2,\finish{%
+  \def\inlinerawname{#1}%
+  \ifx\inlinerawname\outfmtnametex \ignorespaces #2\fi
+  \endgroup % close group opened by \tex.
+}
+
+% @inlineifset{VAR, TEXT} expands TEXT if VAR is @set.
+%
+\long\def\inlineifset#1{\doinlineifset #1,\finish}
+\long\def\doinlineifset#1,#2,\finish{%
+  \def\inlinevarname{#1}%
+  \expandafter\ifx\csname SET\inlinevarname\endcsname\relax
+  \else\ignorespaces#2\fi
+}
+
+% @inlineifclear{VAR, TEXT} expands TEXT if VAR is not @set.
+%
+\long\def\inlineifclear#1{\doinlineifclear #1,\finish}
+\long\def\doinlineifclear#1,#2,\finish{%
+  \def\inlinevarname{#1}%
+  \expandafter\ifx\csname SET\inlinevarname\endcsname\relax \ignorespaces#2\fi
+}
+
+
+\message{glyphs,}
+% and logos.
+
+% @@ prints an @, as does @atchar{}.
+\def\@{\char64 }
+\let\atchar=\@
+
+% @{ @} @lbracechar{} @rbracechar{} all generate brace characters.
+\def\lbracechar{{\ifmonospace\char123\else\ensuremath\lbrace\fi}}
+\def\rbracechar{{\ifmonospace\char125\else\ensuremath\rbrace\fi}}
+\let\{=\lbracechar
+\let\}=\rbracechar
+
+% @comma{} to avoid , parsing problems.
+\let\comma = ,
+
+% Accents: @, @dotaccent @ringaccent @ubaraccent @udotaccent
+% Others are defined by plain TeX: @` @' @" @^ @~ @= @u @v @H.
+\let\, = \ptexc
+\let\dotaccent = \ptexdot
+\def\ringaccent#1{{\accent23 #1}}
+\let\tieaccent = \ptext
+\let\ubaraccent = \ptexb
+\let\udotaccent = \d
+
+% Other special characters: @questiondown @exclamdown @ordf @ordm
+% Plain TeX defines: @AA @AE @O @OE @L (plus lowercase versions) @ss.
+\def\questiondown{?`}
+\def\exclamdown{!`}
+\def\ordf{\leavevmode\raise1ex\hbox{\switchtolllsize \underbar{a}}}
+\def\ordm{\leavevmode\raise1ex\hbox{\switchtolllsize \underbar{o}}}
+
+% Dotless i and dotless j, used for accents.
+\def\imacro{i}
+\def\jmacro{j}
+\def\dotless#1{%
+  \def\temp{#1}%
+  \ifx\temp\imacro \ifmmode\imath \else\ptexi \fi
+  \else\ifx\temp\jmacro \ifmmode\jmath \else\j \fi
+  \else \errmessage{@dotless can be used only with i or j}%
+  \fi\fi
+}
+
+% The \TeX{} logo, as in plain, but resetting the spacing so that a
+% period following counts as ending a sentence.  (Idea found in latex.)
+%
+\edef\TeX{\TeX \spacefactor=1000 }
+
+% @LaTeX{} logo.  Not quite the same results as the definition in
+% latex.ltx, since we use a different font for the raised A; it's most
+% convenient for us to use an explicitly smaller font, rather than using
+% the \scriptstyle font (since we don't reset \scriptstyle and
+% \scriptscriptstyle).
+%
+\def\LaTeX{%
+  L\kern-.36em
+  {\setbox0=\hbox{T}%
+   \vbox to \ht0{\hbox{%
+     \ifx\textnominalsize\xwordpt
+       % for 10pt running text, lllsize (8pt) is too small for the A in LaTeX.
+       % Revert to plain's \scriptsize, which is 7pt.
+       \count255=\the\fam $\fam\count255 \scriptstyle A$%
+     \else
+       % For 11pt, we can use our lllsize.
+       \switchtolllsize A%
+     \fi
+     }%
+     \vss
+  }}%
+  \kern-.15em
+  \TeX
+}
+
+% Some math mode symbols.  Define \ensuremath to switch into math mode
+% unless we are already there.  Expansion tricks may not be needed here,
+% but safer, and can't hurt.
+\def\ensuremath{\ifmmode \expandafter\asis \else\expandafter\ensuredmath \fi}
+\def\ensuredmath#1{$\relax#1$}
+%
+\def\bullet{\ensuremath\ptexbullet}
+\def\geq{\ensuremath\ge}
+\def\leq{\ensuremath\le}
+\def\minus{\ensuremath-}
+
+% @dots{} outputs an ellipsis using the current font.
+% We do .5em per period so that it has the same spacing in the cm
+% typewriter fonts as three actual period characters; on the other hand,
+% in other typewriter fonts three periods are wider than 1.5em.  So do
+% whichever is larger.
+%
+\def\dots{%
+  \leavevmode
+  \setbox0=\hbox{...}% get width of three periods
+  \ifdim\wd0 > 1.5em
+    \dimen0 = \wd0
+  \else
+    \dimen0 = 1.5em
+  \fi
+  \hbox to \dimen0{%
+    \hskip 0pt plus.25fil
+    .\hskip 0pt plus1fil
+    .\hskip 0pt plus1fil
+    .\hskip 0pt plus.5fil
+  }%
+}
+
+% @enddots{} is an end-of-sentence ellipsis.
+%
+\def\enddots{%
+  \dots
+  \spacefactor=\endofsentencespacefactor
+}
+
+% @point{}, @result{}, @expansion{}, @print{}, @equiv{}.
+%
+% Since these characters are used in examples, they should be an even number of
+% \tt widths. Each \tt character is 1en, so two makes it 1em.
+%
+\def\point{$\star$}
+\def\arrow{\leavevmode\raise.05ex\hbox to 1em{\hfil$\rightarrow$\hfil}}
+\def\result{\leavevmode\raise.05ex\hbox to 1em{\hfil$\Rightarrow$\hfil}}
+\def\expansion{\leavevmode\hbox to 1em{\hfil$\mapsto$\hfil}}
+\def\print{\leavevmode\lower.1ex\hbox to 1em{\hfil$\dashv$\hfil}}
+\def\equiv{\leavevmode\hbox to 1em{\hfil$\ptexequiv$\hfil}}
+
+% The @error{} command.
+% Adapted from the TeXbook's \boxit.
+%
+\newbox\errorbox
+%
+{\ttfont \global\dimen0 = 3em}% Width of the box.
+\dimen2 = .55pt % Thickness of rules
+% The text. (`r' is open on the right, `e' somewhat less so on the left.)
+\setbox0 = \hbox{\kern-.75pt \reducedsf \putworderror\kern-1.5pt}
+%
+\setbox\errorbox=\hbox to \dimen0{\hfil
+   \hsize = \dimen0 \advance\hsize by -5.8pt % Space to left+right.
+   \advance\hsize by -2\dimen2 % Rules.
+   \vbox{%
+      \hrule height\dimen2
+      \hbox{\vrule width\dimen2 \kern3pt          % Space to left of text.
+         \vtop{\kern2.4pt \box0 \kern2.4pt}% Space above/below.
+         \kern3pt\vrule width\dimen2}% Space to right.
+      \hrule height\dimen2}
+    \hfil}
+%
+\def\error{\leavevmode\lower.7ex\copy\errorbox}
+
+% @pounds{} is a sterling sign, which Knuth put in the CM italic font.
+%
+\def\pounds{\ifmonospace{\ecfont\char"BF}\else{\it\$}\fi}
+
+% @euro{} comes from a separate font, depending on the current style.
+% We use the free feym* fonts from the eurosym package by Henrik
+% Theiling, which support regular, slanted, bold and bold slanted (and
+% "outlined" (blackboard board, sort of) versions, which we don't need).
+% It is available from http://www.ctan.org/tex-archive/fonts/eurosym.
+%
+% Although only regular is the truly official Euro symbol, we ignore
+% that.  The Euro is designed to be slightly taller than the regular
+% font height.
+%
+% feymr - regular
+% feymo - slanted
+% feybr - bold
+% feybo - bold slanted
+%
+% There is no good (free) typewriter version, to my knowledge.
+% A feymr10 euro is ~7.3pt wide, while a normal cmtt10 char is ~5.25pt wide.
+% Hmm.
+%
+% Also doesn't work in math.  Do we need to do math with euro symbols?
+% Hope not.
+%
+%
+\def\euro{{\eurofont e}}
+\def\eurofont{%
+  % We set the font at each command, rather than predefining it in
+  % \textfonts and the other font-switching commands, so that
+  % installations which never need the symbol don't have to have the
+  % font installed.
+  %
+  % There is only one designed size (nominal 10pt), so we always scale
+  % that to the current nominal size.
+  %
+  % By the way, simply using "at 1em" works for cmr10 and the like, but
+  % does not work for cmbx10 and other extended/shrunken fonts.
+  %
+  \def\eurosize{\csname\curfontsize nominalsize\endcsname}%
+  %
+  \ifx\curfontstyle\bfstylename
+    % bold:
+    \font\thiseurofont = \ifusingit{feybo10}{feybr10} at \eurosize
+  \else
+    % regular:
+    \font\thiseurofont = \ifusingit{feymo10}{feymr10} at \eurosize
+  \fi
+  \thiseurofont
+}
+
+% Glyphs from the EC fonts.  We don't use \let for the aliases, because
+% sometimes we redefine the original macro, and the alias should reflect
+% the redefinition.
+%
+% Use LaTeX names for the Icelandic letters.
+\def\DH{{\ecfont \char"D0}} % Eth
+\def\dh{{\ecfont \char"F0}} % eth
+\def\TH{{\ecfont \char"DE}} % Thorn
+\def\th{{\ecfont \char"FE}} % thorn
+%
+\def\guillemetleft{{\ecfont \char"13}}
+\def\guillemotleft{\guillemetleft}
+\def\guillemetright{{\ecfont \char"14}}
+\def\guillemotright{\guillemetright}
+\def\guilsinglleft{{\ecfont \char"0E}}
+\def\guilsinglright{{\ecfont \char"0F}}
+\def\quotedblbase{{\ecfont \char"12}}
+\def\quotesinglbase{{\ecfont \char"0D}}
+%
+% This positioning is not perfect (see the ogonek LaTeX package), but
+% we have the precomposed glyphs for the most common cases.  We put the
+% tests to use those glyphs in the single \ogonek macro so we have fewer
+% dummy definitions to worry about for index entries, etc.
+%
+% ogonek is also used with other letters in Lithuanian (IOU), but using
+% the precomposed glyphs for those is not so easy since they aren't in
+% the same EC font.
+\def\ogonek#1{{%
+  \def\temp{#1}%
+  \ifx\temp\macrocharA\Aogonek
+  \else\ifx\temp\macrochara\aogonek
+  \else\ifx\temp\macrocharE\Eogonek
+  \else\ifx\temp\macrochare\eogonek
+  \else
+    \ecfont \setbox0=\hbox{#1}%
+    \ifdim\ht0=1ex\accent"0C #1%
+    \else\ooalign{\unhbox0\crcr\hidewidth\char"0C \hidewidth}%
+    \fi
+  \fi\fi\fi\fi
+  }%
+}
+\def\Aogonek{{\ecfont \char"81}}\def\macrocharA{A}
+\def\aogonek{{\ecfont \char"A1}}\def\macrochara{a}
+\def\Eogonek{{\ecfont \char"86}}\def\macrocharE{E}
+\def\eogonek{{\ecfont \char"A6}}\def\macrochare{e}
+%
+% Use the European Computer Modern fonts (cm-super in outline format)
+% for non-CM glyphs.  That is ec* for regular text and tc* for the text
+% companion symbols (LaTeX TS1 encoding).  Both are part of the ec
+% package and follow the same conventions.
+% 
+\def\ecfont{\etcfont{e}}
+\def\tcfont{\etcfont{t}}
+%
+\def\etcfont#1{%
+  % We can't distinguish serif/sans and italic/slanted, but this
+  % is used for crude hacks anyway (like adding French and German
+  % quotes to documents typeset with CM, where we lose kerning), so
+  % hopefully nobody will notice/care.
+  \edef\ecsize{\csname\curfontsize ecsize\endcsname}%
+  \edef\nominalsize{\csname\curfontsize nominalsize\endcsname}%
+  \ifmonospace
+    % typewriter:
+    \font\thisecfont = #1ctt\ecsize \space at \nominalsize
+  \else
+    \ifx\curfontstyle\bfstylename
+      % bold:
+      \font\thisecfont = #1cb\ifusingit{i}{x}\ecsize \space at \nominalsize
+    \else
+      % regular:
+      \font\thisecfont = #1c\ifusingit{ti}{rm}\ecsize \space at \nominalsize
+    \fi
+  \fi
+  \thisecfont
+}
+
+% @registeredsymbol - R in a circle.  The font for the R should really
+% be smaller yet, but lllsize is the best we can do for now.
+% Adapted from the plain.tex definition of \copyright.
+%
+\def\registeredsymbol{%
+  $^{{\ooalign{\hfil\raise.07ex\hbox{\switchtolllsize R}%
+               \hfil\crcr\Orb}}%
+    }$%
+}
+
+% @textdegree - the normal degrees sign.
+%
+\def\textdegree{$^\circ$}
+
+% Laurent Siebenmann reports \Orb undefined with:
+%  Textures 1.7.7 (preloaded format=plain 93.10.14)  (68K)  16 APR 2004 02:38
+% so we'll define it if necessary.
+%
+\ifx\Orb\thisisundefined
+\def\Orb{\mathhexbox20D}
+\fi
+
+% Quotes.
+\chardef\quoteleft=`\`
+\chardef\quoteright=`\'
+
+% only change font for tt for correct kerning and to avoid using
+% \ecfont unless necessary.
+\def\quotedblleft{%
+  \ifmonospace{\ecfont\char"10}\else{\char"5C}\fi
+}
+
+\def\quotedblright{%
+  \ifmonospace{\ecfont\char"11}\else{\char`\"}\fi
+}
+
+
+\message{page headings,}
+
+\newskip\titlepagetopglue \titlepagetopglue = 1.5in
+\newskip\titlepagebottomglue \titlepagebottomglue = 2pc
+
+% First the title page.  Must do @settitle before @titlepage.
+\newif\ifseenauthor
+\newif\iffinishedtitlepage
+
+% @setcontentsaftertitlepage used to do an implicit @contents or
+% @shortcontents after @end titlepage, but it is now obsolete.
+\def\setcontentsaftertitlepage{%
+  \errmessage{@setcontentsaftertitlepage has been removed as a Texinfo
+              command; move your @contents command if you want the contents
+              after the title page.}}%
+\def\setshortcontentsaftertitlepage{%
+  \errmessage{@setshortcontentsaftertitlepage has been removed as a Texinfo
+              command; move your @shortcontents and @contents commands if you 
+              want the contents after the title page.}}%
+
+\parseargdef\shorttitlepage{%
+  \begingroup \hbox{}\vskip 1.5in \chaprm \centerline{#1}%
+  \endgroup\page\hbox{}\page}
+
+\envdef\titlepage{%
+  % Open one extra group, as we want to close it in the middle of \Etitlepage.
+  \begingroup
+    \parindent=0pt \textfonts
+    % Leave some space at the very top of the page.
+    \vglue\titlepagetopglue
+    % No rule at page bottom unless we print one at the top with @title.
+    \finishedtitlepagetrue
+    %
+    % Most title ``pages'' are actually two pages long, with space
+    % at the top of the second.  We don't want the ragged left on the second.
+    \let\oldpage = \page
+    \def\page{%
+      \iffinishedtitlepage\else
+	 \finishtitlepage
+      \fi
+      \let\page = \oldpage
+      \page
+      \null
+    }%
+}
+
+\def\Etitlepage{%
+    \iffinishedtitlepage\else
+	\finishtitlepage
+    \fi
+    % It is important to do the page break before ending the group,
+    % because the headline and footline are only empty inside the group.
+    % If we use the new definition of \page, we always get a blank page
+    % after the title page, which we certainly don't want.
+    \oldpage
+  \endgroup
+  %
+  % Need this before the \...aftertitlepage checks so that if they are
+  % in effect the toc pages will come out with page numbers.
+  \HEADINGSon
+}
+
+\def\finishtitlepage{%
+  \vskip4pt \hrule height 2pt width \hsize
+  \vskip\titlepagebottomglue
+  \finishedtitlepagetrue
+}
+
+% Settings used for typesetting titles: no hyphenation, no indentation,
+% don't worry much about spacing, ragged right.  This should be used
+% inside a \vbox, and fonts need to be set appropriately first. \par should
+% be specified before the end of the \vbox, since a vbox is a group.
+% 
+\def\raggedtitlesettings{%
+  \rm
+  \hyphenpenalty=10000
+  \parindent=0pt
+  \tolerance=5000
+  \ptexraggedright
+}
+
+% Macros to be used within @titlepage:
+
+\let\subtitlerm=\rmfont
+\def\subtitlefont{\subtitlerm \normalbaselineskip = 13pt \normalbaselines}
+
+\parseargdef\title{%
+  \checkenv\titlepage
+  \vbox{\titlefonts \raggedtitlesettings #1\par}%
+  % print a rule at the page bottom also.
+  \finishedtitlepagefalse
+  \vskip4pt \hrule height 4pt width \hsize \vskip4pt
+}
+
+\parseargdef\subtitle{%
+  \checkenv\titlepage
+  {\subtitlefont \rightline{#1}}%
+}
+
+% @author should come last, but may come many times.
+% It can also be used inside @quotation.
+%
+\parseargdef\author{%
+  \def\temp{\quotation}%
+  \ifx\thisenv\temp
+    \def\quotationauthor{#1}% printed in \Equotation.
+  \else
+    \checkenv\titlepage
+    \ifseenauthor\else \vskip 0pt plus 1filll \seenauthortrue \fi
+    {\secfonts\rm \leftline{#1}}%
+  \fi
+}
+
+
+% Set up page headings and footings.
+
+\let\thispage=\folio
+
+\newtoks\evenheadline    % headline on even pages
+\newtoks\oddheadline     % headline on odd pages
+\newtoks\evenchapheadline% headline on even pages with a new chapter
+\newtoks\oddchapheadline % headline on odd pages with a new chapter
+\newtoks\evenfootline    % footline on even pages
+\newtoks\oddfootline     % footline on odd pages
+
+% Now make \makeheadline and \makefootline in Plain TeX use those variables
+\headline={{\textfonts\rm
+            \ifchapterpage
+              \ifodd\pageno\the\oddchapheadline\else\the\evenchapheadline\fi
+            \else
+              \ifodd\pageno\the\oddheadline\else\the\evenheadline\fi
+            \fi}}
+
+\footline={{\textfonts\rm \ifodd\pageno \the\oddfootline
+                            \else \the\evenfootline \fi}\HEADINGShook}
+\let\HEADINGShook=\relax
+
+% Commands to set those variables.
+% For example, this is what  @headings on  does
+% @evenheading @thistitle|@thispage|@thischapter
+% @oddheading @thischapter|@thispage|@thistitle
+% @evenfooting @thisfile||
+% @oddfooting ||@thisfile
+
+
+\def\evenheading{\parsearg\evenheadingxxx}
+\def\evenheadingxxx #1{\evenheadingyyy #1\|\|\|\|\finish}
+\def\evenheadingyyy #1\|#2\|#3\|#4\finish{%
+  \global\evenheadline={\rlap{\centerline{#2}}\line{#1\hfil#3}}
+  \global\evenchapheadline=\evenheadline}
+
+\def\oddheading{\parsearg\oddheadingxxx}
+\def\oddheadingxxx #1{\oddheadingyyy #1\|\|\|\|\finish}
+\def\oddheadingyyy #1\|#2\|#3\|#4\finish{%
+  \global\oddheadline={\rlap{\centerline{#2}}\line{#1\hfil#3}}%
+  \global\oddchapheadline=\oddheadline}
+
+\parseargdef\everyheading{\oddheadingxxx{#1}\evenheadingxxx{#1}}%
+
+\def\evenfooting{\parsearg\evenfootingxxx}
+\def\evenfootingxxx #1{\evenfootingyyy #1\|\|\|\|\finish}
+\def\evenfootingyyy #1\|#2\|#3\|#4\finish{%
+\global\evenfootline={\rlap{\centerline{#2}}\line{#1\hfil#3}}}
+
+\def\oddfooting{\parsearg\oddfootingxxx}
+\def\oddfootingxxx #1{\oddfootingyyy #1\|\|\|\|\finish}
+\def\oddfootingyyy #1\|#2\|#3\|#4\finish{%
+  \global\oddfootline = {\rlap{\centerline{#2}}\line{#1\hfil#3}}%
+  %
+  % Leave some space for the footline.  Hopefully ok to assume
+  % @evenfooting will not be used by itself.
+  \global\advance\txipageheight by -12pt
+  \global\advance\vsize by -12pt
+}
+
+\parseargdef\everyfooting{\oddfootingxxx{#1}\evenfootingxxx{#1}}
+
+% @evenheadingmarks top     \thischapter <- chapter at the top of a page
+% @evenheadingmarks bottom  \thischapter <- chapter at the bottom of a page
+%
+% The same set of arguments for:
+%
+% @oddheadingmarks
+% @evenfootingmarks
+% @oddfootingmarks
+% @everyheadingmarks
+% @everyfootingmarks
+
+% These define \getoddheadingmarks, \getevenheadingmarks,
+% \getoddfootingmarks, and \getevenfootingmarks, each to one of
+% \gettopheadingmarks, \getbottomheadingmarks.
+%
+\def\evenheadingmarks{\headingmarks{even}{heading}}
+\def\oddheadingmarks{\headingmarks{odd}{heading}}
+\def\evenfootingmarks{\headingmarks{even}{footing}}
+\def\oddfootingmarks{\headingmarks{odd}{footing}}
+\parseargdef\everyheadingmarks{\headingmarks{even}{heading}{#1}
+                          \headingmarks{odd}{heading}{#1} }
+\parseargdef\everyfootingmarks{\headingmarks{even}{footing}{#1}
+                          \headingmarks{odd}{footing}{#1} }
+% #1 = even/odd, #2 = heading/footing, #3 = top/bottom.
+\def\headingmarks#1#2#3 {%
+  \expandafter\let\expandafter\temp \csname get#3headingmarks\endcsname
+  \global\expandafter\let\csname get#1#2marks\endcsname \temp
+}
+
+\everyheadingmarks bottom
+\everyfootingmarks bottom
+
+% @headings double      turns headings on for double-sided printing.
+% @headings single      turns headings on for single-sided printing.
+% @headings off         turns them off.
+% @headings on          same as @headings double, retained for compatibility.
+% @headings after       turns on double-sided headings after this page.
+% @headings doubleafter turns on double-sided headings after this page.
+% @headings singleafter turns on single-sided headings after this page.
+% By default, they are off at the start of a document,
+% and turned `on' after @end titlepage.
+
+\parseargdef\headings{\csname HEADINGS#1\endcsname}
+
+\def\headingsoff{% non-global headings elimination
+  \evenheadline={\hfil}\evenfootline={\hfil}\evenchapheadline={\hfil}%
+   \oddheadline={\hfil}\oddfootline={\hfil}\oddchapheadline={\hfil}%
+}
+
+\def\HEADINGSoff{{\globaldefs=1 \headingsoff}} % global setting
+\HEADINGSoff  % it's the default
+
+% When we turn headings on, set the page number to 1.
+\def\pageone{
+  \global\pageno=1
+  \global\arabiccount = \pagecount
+}
+
+% For double-sided printing, put current file name in lower left corner,
+% chapter name on inside top of right hand pages, document
+% title on inside top of left hand pages, and page numbers on outside top
+% edge of all pages.
+\def\HEADINGSdouble{%
+\pageone
+\HEADINGSdoublex
+}
+\let\contentsalignmacro = \chappager
+
+% For single-sided printing, chapter title goes across top left of page,
+% page number on top right.
+\def\HEADINGSsingle{%
+\pageone
+\HEADINGSsinglex
+}
+\def\HEADINGSon{\HEADINGSdouble}
+
+\def\HEADINGSafter{\let\HEADINGShook=\HEADINGSdoublex}
+\let\HEADINGSdoubleafter=\HEADINGSafter
+\def\HEADINGSdoublex{%
+\global\evenfootline={\hfil}
+\global\oddfootline={\hfil}
+\global\evenheadline={\line{\folio\hfil\thistitle}}
+\global\oddheadline={\line{\thischapter\hfil\folio}}
+\global\evenchapheadline={\line{\folio\hfil}}
+\global\oddchapheadline={\line{\hfil\folio}}
+\global\let\contentsalignmacro = \chapoddpage
+}
+
+\def\HEADINGSsingleafter{\let\HEADINGShook=\HEADINGSsinglex}
+\def\HEADINGSsinglex{%
+\global\evenfootline={\hfil}
+\global\oddfootline={\hfil}
+\global\evenheadline={\line{\thischapter\hfil\folio}}
+\global\oddheadline={\line{\thischapter\hfil\folio}}
+\global\evenchapheadline={\line{\hfil\folio}}
+\global\oddchapheadline={\line{\hfil\folio}}
+\global\let\contentsalignmacro = \chappager
+}
+
+% for @setchapternewpage off
+\def\HEADINGSsinglechapoff{%
+\pageone
+\global\evenfootline={\hfil}
+\global\oddfootline={\hfil}
+\global\evenheadline={\line{\thischapter\hfil\folio}}
+\global\oddheadline={\line{\thischapter\hfil\folio}}
+\global\evenchapheadline=\evenheadline
+\global\oddchapheadline=\oddheadline
+\global\let\contentsalignmacro = \chappager
+}
+
+% Subroutines used in generating headings
+% This produces Day Month Year style of output.
+% Only define if not already defined, in case a txi-??.tex file has set
+% up a different format (e.g., txi-cs.tex does this).
+\ifx\today\thisisundefined
+\def\today{%
+  \number\day\space
+  \ifcase\month
+  \or\putwordMJan\or\putwordMFeb\or\putwordMMar\or\putwordMApr
+  \or\putwordMMay\or\putwordMJun\or\putwordMJul\or\putwordMAug
+  \or\putwordMSep\or\putwordMOct\or\putwordMNov\or\putwordMDec
+  \fi
+  \space\number\year}
+\fi
+
+% @settitle line...  specifies the title of the document, for headings.
+% It generates no output of its own.
+\def\thistitle{\putwordNoTitle}
+\def\settitle{\parsearg{\gdef\thistitle}}
+
+
+\message{tables,}
+% Tables -- @table, @ftable, @vtable, @item(x).
+
+% default indentation of table text
+\newdimen\tableindent \tableindent=.8in
+% default indentation of @itemize and @enumerate text
+\newdimen\itemindent  \itemindent=.3in
+% margin between end of table item and start of table text.
+\newdimen\itemmargin  \itemmargin=.1in
+
+% used internally for \itemindent minus \itemmargin
+\newdimen\itemmax
+
+% Note @table, @ftable, and @vtable define @item, @itemx, etc., with
+% these defs.
+% They also define \itemindex
+% to index the item name in whatever manner is desired (perhaps none).
+
+\newif\ifitemxneedsnegativevskip
+
+\def\itemxpar{\par\ifitemxneedsnegativevskip\nobreak\vskip-\parskip\nobreak\fi}
+
+\def\internalBitem{\smallbreak \parsearg\itemzzz}
+\def\internalBitemx{\itemxpar \parsearg\itemzzz}
+
+\def\itemzzz #1{\begingroup %
+  \advance\hsize by -\rightskip
+  \advance\hsize by -\tableindent
+  \setbox0=\hbox{\itemindicate{#1}}%
+  \itemindex{#1}%
+  \nobreak % This prevents a break before @itemx.
+  %
+  % If the item text does not fit in the space we have, put it on a line
+  % by itself, and do not allow a page break either before or after that
+  % line.  We do not start a paragraph here because then if the next
+  % command is, e.g., @kindex, the whatsit would get put into the
+  % horizontal list on a line by itself, resulting in extra blank space.
+  \ifdim \wd0>\itemmax
+    %
+    % Make this a paragraph so we get the \parskip glue and wrapping,
+    % but leave it ragged-right.
+    \begingroup
+      \advance\leftskip by-\tableindent
+      \advance\hsize by\tableindent
+      \advance\rightskip by0pt plus1fil\relax
+      \leavevmode\unhbox0\par
+    \endgroup
+    %
+    % We're going to be starting a paragraph, but we don't want the
+    % \parskip glue -- logically it's part of the @item we just started.
+    \nobreak \vskip-\parskip
+    %
+    % Stop a page break at the \parskip glue coming up.  However, if
+    % what follows is an environment such as @example, there will be no
+    % \parskip glue; then the negative vskip we just inserted would
+    % cause the example and the item to crash together.  So we use this
+    % bizarre value of 10001 as a signal to \aboveenvbreak to insert
+    % \parskip glue after all.  Section titles are handled this way also.
+    %
+    \penalty 10001
+    \endgroup
+    \itemxneedsnegativevskipfalse
+  \else
+    % The item text fits into the space.  Start a paragraph, so that the
+    % following text (if any) will end up on the same line.
+    \noindent
+    % Do this with kerns and \unhbox so that if there is a footnote in
+    % the item text, it can migrate to the main vertical list and
+    % eventually be printed.
+    \nobreak\kern-\tableindent
+    \dimen0 = \itemmax  \advance\dimen0 by \itemmargin \advance\dimen0 by -\wd0
+    \unhbox0
+    \nobreak\kern\dimen0
+    \endgroup
+    \itemxneedsnegativevskiptrue
+  \fi
+}
+
+\def\item{\errmessage{@item while not in a list environment}}
+\def\itemx{\errmessage{@itemx while not in a list environment}}
+
+% @table, @ftable, @vtable.
+\envdef\table{%
+  \let\itemindex\gobble
+  \tablecheck{table}%
+}
+\envdef\ftable{%
+  \def\itemindex ##1{\doind {fn}{\code{##1}}}%
+  \tablecheck{ftable}%
+}
+\envdef\vtable{%
+  \def\itemindex ##1{\doind {vr}{\code{##1}}}%
+  \tablecheck{vtable}%
+}
+\def\tablecheck#1{%
+  \ifnum \the\catcode`\^^M=\active
+    \endgroup
+    \errmessage{This command won't work in this context; perhaps the problem is
+      that we are \inenvironment\thisenv}%
+    \def\next{\doignore{#1}}%
+  \else
+    \let\next\tablex
+  \fi
+  \next
+}
+\def\tablex#1{%
+  \def\itemindicate{#1}%
+  \parsearg\tabley
+}
+\def\tabley#1{%
+  {%
+    \makevalueexpandable
+    \edef\temp{\noexpand\tablez #1\space\space\space}%
+    \expandafter
+  }\temp \endtablez
+}
+\def\tablez #1 #2 #3 #4\endtablez{%
+  \aboveenvbreak
+  \ifnum 0#1>0 \advance \leftskip by #1\mil \fi
+  \ifnum 0#2>0 \tableindent=#2\mil \fi
+  \ifnum 0#3>0 \advance \rightskip by #3\mil \fi
+  \itemmax=\tableindent
+  \advance \itemmax by -\itemmargin
+  \advance \leftskip by \tableindent
+  \exdentamount=\tableindent
+  \parindent = 0pt
+  \parskip = \smallskipamount
+  \ifdim \parskip=0pt \parskip=2pt \fi
+  \let\item = \internalBitem
+  \let\itemx = \internalBitemx
+}
+\def\Etable{\endgraf\afterenvbreak}
+\let\Eftable\Etable
+\let\Evtable\Etable
+\let\Eitemize\Etable
+\let\Eenumerate\Etable
+
+% This is the counter used by @enumerate, which is really @itemize
+
+\newcount \itemno
+
+\envdef\itemize{\parsearg\doitemize}
+
+\def\doitemize#1{%
+  \aboveenvbreak
+  \itemmax=\itemindent
+  \advance\itemmax by -\itemmargin
+  \advance\leftskip by \itemindent
+  \exdentamount=\itemindent
+  \parindent=0pt
+  \parskip=\smallskipamount
+  \ifdim\parskip=0pt \parskip=2pt \fi
+  %
+  % Try typesetting the item mark so that if the document erroneously says
+  % something like @itemize @samp (intending @table), there's an error
+  % right away at the @itemize.  It's not the best error message in the
+  % world, but it's better than leaving it to the @item.  This means if
+  % the user wants an empty mark, they have to say @w{} not just @w.
+  \def\itemcontents{#1}%
+  \setbox0 = \hbox{\itemcontents}%
+  %
+  % @itemize with no arg is equivalent to @itemize @bullet.
+  \ifx\itemcontents\empty\def\itemcontents{\bullet}\fi
+  %
+  \let\item=\itemizeitem
+}
+
+% Definition of @item while inside @itemize and @enumerate.
+%
+\def\itemizeitem{%
+  \advance\itemno by 1  % for enumerations
+  {\let\par=\endgraf \smallbreak}% reasonable place to break
+  {%
+   % If the document has an @itemize directly after a section title, a
+   % \nobreak will be last on the list, and \sectionheading will have
+   % done a \vskip-\parskip.  In that case, we don't want to zero
+   % parskip, or the item text will crash with the heading.  On the
+   % other hand, when there is normal text preceding the item (as there
+   % usually is), we do want to zero parskip, or there would be too much
+   % space.  In that case, we won't have a \nobreak before.  At least
+   % that's the theory.
+   \ifnum\lastpenalty<10000 \parskip=0in \fi
+   \noindent
+   \hbox to 0pt{\hss \itemcontents \kern\itemmargin}%
+   %
+   \ifinner\else
+     \vadjust{\penalty 1200}% not good to break after first line of item.
+   \fi
+   % We can be in inner vertical mode in a footnote, although an
+   % @itemize looks awful there.
+  }%
+  \flushcr
+}
+
+% \splitoff TOKENS\endmark defines \first to be the first token in
+% TOKENS, and \rest to be the remainder.
+%
+\def\splitoff#1#2\endmark{\def\first{#1}\def\rest{#2}}%
+
+% Allow an optional argument of an uppercase letter, lowercase letter,
+% or number, to specify the first label in the enumerated list.  No
+% argument is the same as `1'.
+%
+\envparseargdef\enumerate{\enumeratey #1  \endenumeratey}
+\def\enumeratey #1 #2\endenumeratey{%
+  % If we were given no argument, pretend we were given `1'.
+  \def\thearg{#1}%
+  \ifx\thearg\empty \def\thearg{1}\fi
+  %
+  % Detect if the argument is a single token.  If so, it might be a
+  % letter.  Otherwise, the only valid thing it can be is a number.
+  % (We will always have one token, because of the test we just made.
+  % This is a good thing, since \splitoff doesn't work given nothing at
+  % all -- the first parameter is undelimited.)
+  \expandafter\splitoff\thearg\endmark
+  \ifx\rest\empty
+    % Only one token in the argument.  It could still be anything.
+    % A ``lowercase letter'' is one whose \lccode is nonzero.
+    % An ``uppercase letter'' is one whose \lccode is both nonzero, and
+    %   not equal to itself.
+    % Otherwise, we assume it's a number.
+    %
+    % We need the \relax at the end of the \ifnum lines to stop TeX from
+    % continuing to look for a <number>.
+    %
+    \ifnum\lccode\expandafter`\thearg=0\relax
+      \numericenumerate % a number (we hope)
+    \else
+      % It's a letter.
+      \ifnum\lccode\expandafter`\thearg=\expandafter`\thearg\relax
+        \lowercaseenumerate % lowercase letter
+      \else
+        \uppercaseenumerate % uppercase letter
+      \fi
+    \fi
+  \else
+    % Multiple tokens in the argument.  We hope it's a number.
+    \numericenumerate
+  \fi
+}
+
+% An @enumerate whose labels are integers.  The starting integer is
+% given in \thearg.
+%
+\def\numericenumerate{%
+  \itemno = \thearg
+  \startenumeration{\the\itemno}%
+}
+
+% The starting (lowercase) letter is in \thearg.
+\def\lowercaseenumerate{%
+  \itemno = \expandafter`\thearg
+  \startenumeration{%
+    % Be sure we're not beyond the end of the alphabet.
+    \ifnum\itemno=0
+      \errmessage{No more lowercase letters in @enumerate; get a bigger
+                  alphabet}%
+    \fi
+    \char\lccode\itemno
+  }%
+}
+
+% The starting (uppercase) letter is in \thearg.
+\def\uppercaseenumerate{%
+  \itemno = \expandafter`\thearg
+  \startenumeration{%
+    % Be sure we're not beyond the end of the alphabet.
+    \ifnum\itemno=0
+      \errmessage{No more uppercase letters in @enumerate; get a bigger
+                  alphabet}
+    \fi
+    \char\uccode\itemno
+  }%
+}
+
+% Call \doitemize, adding a period to the first argument and supplying the
+% common last two arguments.  Also subtract one from the initial value in
+% \itemno, since @item increments \itemno.
+%
+\def\startenumeration#1{%
+  \advance\itemno by -1
+  \doitemize{#1.}\flushcr
+}
+
+
+% @multitable macros
+
+% Macros used to set up halign preamble:
+%
+\let\endsetuptable\relax
+\def\xendsetuptable{\endsetuptable}
+\let\columnfractions\relax
+\def\xcolumnfractions{\columnfractions}
+\newif\ifsetpercent
+
+% #1 is the @columnfraction, usually a decimal number like .5, but might
+% be just 1.  We just use it, whatever it is.
+%
+\def\pickupwholefraction#1 {%
+  \global\advance\colcount by 1
+  \expandafter\xdef\csname col\the\colcount\endcsname{#1\hsize}%
+  \setuptable
+}
+
+\newcount\colcount
+\def\setuptable#1{%
+  \def\firstarg{#1}%
+  \ifx\firstarg\xendsetuptable
+    \let\go = \relax
+  \else
+    \ifx\firstarg\xcolumnfractions
+      \global\setpercenttrue
+    \else
+      \ifsetpercent
+         \let\go\pickupwholefraction
+      \else
+         \global\advance\colcount by 1
+         \setbox0=\hbox{#1\unskip\space}% Add a normal word space as a
+                   % separator; typically that is always in the input, anyway.
+         \expandafter\xdef\csname col\the\colcount\endcsname{\the\wd0}%
+      \fi
+    \fi
+    \ifx\go\pickupwholefraction
+      % Put the argument back for the \pickupwholefraction call, so
+      % we'll always have a period there to be parsed.
+      \def\go{\pickupwholefraction#1}%
+    \else
+      \let\go = \setuptable
+    \fi%
+  \fi
+  \go
+}
+
+% @headitem starts a heading row, which we typeset in bold.  Assignments
+% have to be global since we are inside the implicit group of an
+% alignment entry.  \everycr below resets \everytab so we don't have to
+% undo it ourselves.
+\def\headitemfont{\b}% for people to use in the template row; not changeable
+\def\headitem{%
+  \checkenv\multitable
+  \crcr
+  \gdef\headitemcrhook{\nobreak}% attempt to avoid page break after headings
+  \global\everytab={\bf}% can't use \headitemfont since the parsing differs
+  \the\everytab % for the first item
+}%
+%
+% default for tables with no headings.
+\let\headitemcrhook=\relax
+%
+\def\tab{\checkenv\multitable &\the\everytab}%
+
+\newtoks\everytab  % insert after every tab.
+%
+\envdef\multitable{%
+  \vskip\parskip
+  \startsavinginserts
+  %
+  % @item within a multitable starts a normal row.
+  % We use \def instead of \let so that if one of the multitable entries
+  % contains an @itemize, we don't choke on the \item (seen as \crcr aka
+  % \endtemplate) expanding \doitemize.
+  \def\item{\crcr}%
+  %
+  \tolerance=9500
+  \hbadness=9500
+  \parskip=0pt
+  \parindent=6pt
+  \overfullrule=0pt
+  \global\colcount=0
+  %
+  \everycr = {%
+    \noalign{%
+      \global\everytab={}% Reset from possible headitem.
+      \global\colcount=0 % Reset the column counter.
+      %
+      % Check for saved footnotes, etc.:
+      \checkinserts
+      %
+      % Perhaps a \nobreak, then reset:
+      \headitemcrhook
+      \global\let\headitemcrhook=\relax
+    }%
+  }%
+  %
+  \parsearg\domultitable
+}
+\def\domultitable#1{%
+  % To parse everything between @multitable and @item:
+  \setuptable#1 \endsetuptable
+  %
+  % This preamble sets up a generic column definition, which will
+  % be used as many times as user calls for columns.
+  % \vtop will set a single line and will also let text wrap and
+  % continue for many paragraphs if desired.
+  \halign\bgroup &%
+    \global\advance\colcount by 1
+    \strut
+    \vtop{%
+      \advance\hsize by -1\leftskip
+      % Find the correct column width
+      \hsize=\expandafter\csname col\the\colcount\endcsname
+      %
+      \rightskip=0pt
+      \ifnum\colcount=1
+        \advance\hsize by\leftskip % Add indent of surrounding text
+      \else
+        % In order to keep entries from bumping into each other.
+        \leftskip=12pt
+        \ifsetpercent \else
+          % If a template has been used
+          \advance\hsize by \leftskip
+        \fi
+      \fi
+      \noindent\ignorespaces##\unskip\strut
+    }\cr
+}
+\def\Emultitable{%
+  \crcr
+  \egroup % end the \halign
+  \global\setpercentfalse
+}
+
+
+\message{conditionals,}
+
+% @iftex, @ifnotdocbook, @ifnothtml, @ifnotinfo, @ifnotplaintext,
+% @ifnotxml always succeed.  They currently do nothing; we don't
+% attempt to check whether the conditionals are properly nested.  But we
+% have to remember that they are conditionals, so that @end doesn't
+% attempt to close an environment group.
+%
+\def\makecond#1{%
+  \expandafter\let\csname #1\endcsname = \relax
+  \expandafter\let\csname iscond.#1\endcsname = 1
+}
+\makecond{iftex}
+\makecond{ifnotdocbook}
+\makecond{ifnothtml}
+\makecond{ifnotinfo}
+\makecond{ifnotplaintext}
+\makecond{ifnotxml}
+
+% Ignore @ignore, @ifhtml, @ifinfo, and the like.
+%
+\def\direntry{\doignore{direntry}}
+\def\documentdescription{\doignore{documentdescription}}
+\def\docbook{\doignore{docbook}}
+\def\html{\doignore{html}}
+\def\ifdocbook{\doignore{ifdocbook}}
+\def\ifhtml{\doignore{ifhtml}}
+\def\ifinfo{\doignore{ifinfo}}
+\def\ifnottex{\doignore{ifnottex}}
+\def\ifplaintext{\doignore{ifplaintext}}
+\def\ifxml{\doignore{ifxml}}
+\def\ignore{\doignore{ignore}}
+\def\menu{\doignore{menu}}
+\def\xml{\doignore{xml}}
+
+% Ignore text until a line `@end #1', keeping track of nested conditionals.
+%
+% A count to remember the depth of nesting.
+\newcount\doignorecount
+
+\def\doignore#1{\begingroup
+  % Scan in ``verbatim'' mode:
+  \obeylines
+  \catcode`\@ = \other
+  \catcode`\{ = \other
+  \catcode`\} = \other
+  %
+  % Make sure that spaces turn into tokens that match what \doignoretext wants.
+  \spaceisspace
+  %
+  % Count number of #1's that we've seen.
+  \doignorecount = 0
+  %
+  % Swallow text until we reach the matching `@end #1'.
+  \dodoignore{#1}%
+}
+
+{ \catcode`_=11 % We want to use \_STOP_ which cannot appear in texinfo source.
+  \obeylines %
+  %
+  \gdef\dodoignore#1{%
+    % #1 contains the command name as a string, e.g., `ifinfo'.
+    %
+    % Define a command to find the next `@end #1'.
+    \long\def\doignoretext##1^^M@end #1{%
+      \doignoretextyyy##1^^M@#1\_STOP_}%
+    %
+    % And this command to find another #1 command, at the beginning of a
+    % line.  (Otherwise, we would consider a line `@c @ifset', for
+    % example, to count as an @ifset for nesting.)
+    \long\def\doignoretextyyy##1^^M@#1##2\_STOP_{\doignoreyyy{##2}\_STOP_}%
+    %
+    % And now expand that command.
+    \doignoretext ^^M%
+  }%
+}
+
+\def\doignoreyyy#1{%
+  \def\temp{#1}%
+  \ifx\temp\empty			% Nothing found.
+    \let\next\doignoretextzzz
+  \else					% Found a nested condition, ...
+    \advance\doignorecount by 1
+    \let\next\doignoretextyyy		% ..., look for another.
+    % If we're here, #1 ends with ^^M\ifinfo (for example).
+  \fi
+  \next #1% the token \_STOP_ is present just after this macro.
+}
+
+% We have to swallow the remaining "\_STOP_".
+%
+\def\doignoretextzzz#1{%
+  \ifnum\doignorecount = 0	% We have just found the outermost @end.
+    \let\next\enddoignore
+  \else				% Still inside a nested condition.
+    \advance\doignorecount by -1
+    \let\next\doignoretext      % Look for the next @end.
+  \fi
+  \next
+}
+
+% Finish off ignored text.
+{ \obeylines%
+  % Ignore anything after the last `@end #1'; this matters in verbatim
+  % environments, where otherwise the newline after an ignored conditional
+  % would result in a blank line in the output.
+  \gdef\enddoignore#1^^M{\endgroup\ignorespaces}%
+}
+
+
+% @set VAR sets the variable VAR to an empty value.
+% @set VAR REST-OF-LINE sets VAR to the value REST-OF-LINE.
+%
+% Since we want to separate VAR from REST-OF-LINE (which might be
+% empty), we can't just use \parsearg; we have to insert a space of our
+% own to delimit the rest of the line, and then take it out again if we
+% didn't need it.
+% We rely on the fact that \parsearg sets \catcode`\ =10.
+%
+\parseargdef\set{\setyyy#1 \endsetyyy}
+\def\setyyy#1 #2\endsetyyy{%
+  {%
+    \makevalueexpandable
+    \def\temp{#2}%
+    \edef\next{\gdef\makecsname{SET#1}}%
+    \ifx\temp\empty
+      \next{}%
+    \else
+      \setzzz#2\endsetzzz
+    \fi
+  }%
+}
+% Remove the trailing space \setxxx inserted.
+\def\setzzz#1 \endsetzzz{\next{#1}}
+
+% @clear VAR clears (i.e., unsets) the variable VAR.
+%
+\parseargdef\clear{%
+  {%
+    \makevalueexpandable
+    \global\expandafter\let\csname SET#1\endcsname=\relax
+  }%
+}
+
+% @value{foo} gets the text saved in variable foo.
+\def\value{\begingroup\makevalueexpandable\valuexxx}
+\def\valuexxx#1{\expandablevalue{#1}\endgroup}
+{
+  \catcode`\-=\active \catcode`\_=\active
+  %
+  \gdef\makevalueexpandable{%
+    \let\value = \expandablevalue
+    % We don't want these characters active, ...
+    \catcode`\-=\other \catcode`\_=\other
+    % ..., but we might end up with active ones in the argument if
+    % we're called from @code, as @code{@value{foo-bar_}}, though.
+    % So \let them to their normal equivalents.
+    \let-\normaldash \let_\normalunderscore
+  }
+}
+
+\def\expandablevalue#1{%
+  \expandafter\ifx\csname SET#1\endcsname\relax
+    {[No value for ``#1'']}%
+    \message{Variable `#1', used in @value, is not set.}%
+  \else
+    \csname SET#1\endcsname
+  \fi
+}
+
+% Like \expandablevalue, but completely expandable (the \message in the
+% definition above operates at the execution level of TeX).  Used when
+% writing to auxiliary files, due to the expansion that \write does.
+% If flag is undefined, pass through an unexpanded @value command: maybe it 
+% will be set by the time it is read back in.
+%
+% NB flag names containing - or _ may not work here.
+\def\dummyvalue#1{%
+  \expandafter\ifx\csname SET#1\endcsname\relax
+    \string\value{#1}%
+  \else
+    \csname SET#1\endcsname
+  \fi
+}
+
+% Used for @value's in index entries to form the sort key: expand the @value
+% if possible, otherwise sort late.
+\def\indexnofontsvalue#1{%
+  \expandafter\ifx\csname SET#1\endcsname\relax
+    ZZZZZZZ%
+  \else
+    \csname SET#1\endcsname
+  \fi
+}
+
+% @ifset VAR ... @end ifset reads the `...' iff VAR has been defined
+% with @set.
+% 
+% To get the special treatment we need for `@end ifset,' we call
+% \makecond and then redefine.
+%
+\makecond{ifset}
+\def\ifset{\parsearg{\doifset{\let\next=\ifsetfail}}}
+\def\doifset#1#2{%
+  {%
+    \makevalueexpandable
+    \let\next=\empty
+    \expandafter\ifx\csname SET#2\endcsname\relax
+      #1% If not set, redefine \next.
+    \fi
+    \expandafter
+  }\next
+}
+\def\ifsetfail{\doignore{ifset}}
+
+% @ifclear VAR ... @end executes the `...' iff VAR has never been
+% defined with @set, or has been undefined with @clear.
+%
+% The `\else' inside the `\doifset' parameter is a trick to reuse the
+% above code: if the variable is not set, do nothing, if it is set,
+% then redefine \next to \ifclearfail.
+%
+\makecond{ifclear}
+\def\ifclear{\parsearg{\doifset{\else \let\next=\ifclearfail}}}
+\def\ifclearfail{\doignore{ifclear}}
+
+% @ifcommandisdefined CMD ... @end executes the `...' if CMD (written
+% without the @) is in fact defined.  We can only feasibly check at the
+% TeX level, so something like `mathcode' is going to considered
+% defined even though it is not a Texinfo command.
+% 
+\makecond{ifcommanddefined}
+\def\ifcommanddefined{\parsearg{\doifcmddefined{\let\next=\ifcmddefinedfail}}}
+%
+\def\doifcmddefined#1#2{{%
+    \makevalueexpandable
+    \let\next=\empty
+    \expandafter\ifx\csname #2\endcsname\relax
+      #1% If not defined, \let\next as above.
+    \fi
+    \expandafter
+  }\next
+}
+\def\ifcmddefinedfail{\doignore{ifcommanddefined}}
+
+% @ifcommandnotdefined CMD ... handled similar to @ifclear above.
+\makecond{ifcommandnotdefined}
+\def\ifcommandnotdefined{%
+  \parsearg{\doifcmddefined{\else \let\next=\ifcmdnotdefinedfail}}}
+\def\ifcmdnotdefinedfail{\doignore{ifcommandnotdefined}}
+
+% Set the `txicommandconditionals' variable, so documents have a way to
+% test if the @ifcommand...defined conditionals are available.
+\set txicommandconditionals
+
+% @dircategory CATEGORY  -- specify a category of the dir file
+% which this file should belong to.  Ignore this in TeX.
+\let\dircategory=\comment
+
+% @defininfoenclose.
+\let\definfoenclose=\comment
+
+
+\message{indexing,}
+% Index generation facilities
+
+% Define \newwrite to be identical to plain tex's \newwrite
+% except not \outer, so it can be used within macros and \if's.
+\edef\newwrite{\makecsname{ptexnewwrite}}
+
+% \newindex {foo} defines an index named IX.
+% It automatically defines \IXindex such that
+% \IXindex ...rest of line... puts an entry in the index IX.
+% It also defines \IXindfile to be the number of the output channel for
+% the file that accumulates this index.  The file's extension is IX.
+% The name of an index should be no more than 2 characters long
+% for the sake of vms.
+%
+\def\newindex#1{%
+  \expandafter\chardef\csname#1indfile\endcsname=0
+  \expandafter\xdef\csname#1index\endcsname{%     % Define @#1index
+    \noexpand\doindex{#1}}
+}
+
+% @defindex foo  ==  \newindex{foo}
+%
+\def\defindex{\parsearg\newindex}
+
+% Define @defcodeindex, like @defindex except put all entries in @code.
+%
+\def\defcodeindex{\parsearg\newcodeindex}
+%
+\def\newcodeindex#1{%
+  \expandafter\chardef\csname#1indfile\endcsname=0
+  \expandafter\xdef\csname#1index\endcsname{%
+    \noexpand\docodeindex{#1}}%
+}
+
+% The default indices:
+\newindex{cp}%      concepts,
+\newcodeindex{fn}%  functions,
+\newcodeindex{vr}%  variables,
+\newcodeindex{tp}%  types,
+\newcodeindex{ky}%  keys
+\newcodeindex{pg}%  and programs.
+
+
+% @synindex foo bar    makes index foo feed into index bar.
+% Do this instead of @defindex foo if you don't want it as a separate index.
+%
+% @syncodeindex foo bar   similar, but put all entries made for index foo
+% inside @code.
+%
+\def\synindex#1 #2 {\dosynindex\doindex{#1}{#2}}
+\def\syncodeindex#1 #2 {\dosynindex\docodeindex{#1}{#2}}
+
+% #1 is \doindex or \docodeindex, #2 the index getting redefined (foo),
+% #3 the target index (bar).
+\def\dosynindex#1#2#3{%
+  \requireopenindexfile{#3}%
+  % redefine \fooindfile:
+  \expandafter\let\expandafter\temp\expandafter=\csname#3indfile\endcsname
+  \expandafter\let\csname#2indfile\endcsname=\temp
+  % redefine \fooindex:
+  \expandafter\xdef\csname#2index\endcsname{\noexpand#1{#3}}%
+}
+
+% Define \doindex, the driver for all index macros.
+% Argument #1 is generated by the calling \fooindex macro,
+% and it is the two-letter name of the index.
+
+\def\doindex#1{\edef\indexname{#1}\parsearg\doindexxxx}
+\def\doindexxxx #1{\doind{\indexname}{#1}}
+
+% like the previous two, but they put @code around the argument.
+\def\docodeindex#1{\edef\indexname{#1}\parsearg\docodeindexxxx}
+\def\docodeindexxxx #1{\docind{\indexname}{#1}}
+
+
+% Used for the aux, toc and index files to prevent expansion of Texinfo 
+% commands.
+%
+\def\atdummies{%
+  \definedummyletter\@%
+  \definedummyletter\ %
+  \definedummyletter\{%
+  \definedummyletter\}%
+  \definedummyletter\&%
+  %
+  % Do the redefinitions.
+  \definedummies
+  \otherbackslash
+}
+
+% \definedummyword defines \#1 as \string\#1\space, thus effectively
+% preventing its expansion.  This is used only for control words,
+% not control letters, because the \space would be incorrect for
+% control characters, but is needed to separate the control word
+% from whatever follows.
+%
+% These can be used both for control words that take an argument and
+% those that do not.  If it is followed by {arg} in the input, then
+% that will dutifully get written to the index (or wherever).
+%
+% For control letters, we have \definedummyletter, which omits the
+% space.
+%
+\def\definedummyword  #1{\def#1{\string#1\space}}%
+\def\definedummyletter#1{\def#1{\string#1}}%
+\let\definedummyaccent\definedummyletter
+
+% Called from \atdummies to prevent the expansion of commands.
+%
+\def\definedummies{%
+  %
+  \let\commondummyword\definedummyword
+  \let\commondummyletter\definedummyletter
+  \let\commondummyaccent\definedummyaccent
+  \commondummiesnofonts
+  %
+  \definedummyletter\_%
+  \definedummyletter\-%
+  %
+  % Non-English letters.
+  \definedummyword\AA
+  \definedummyword\AE
+  \definedummyword\DH
+  \definedummyword\L
+  \definedummyword\O
+  \definedummyword\OE
+  \definedummyword\TH
+  \definedummyword\aa
+  \definedummyword\ae
+  \definedummyword\dh
+  \definedummyword\exclamdown
+  \definedummyword\l
+  \definedummyword\o
+  \definedummyword\oe
+  \definedummyword\ordf
+  \definedummyword\ordm
+  \definedummyword\questiondown
+  \definedummyword\ss
+  \definedummyword\th
+  %
+  % Although these internal commands shouldn't show up, sometimes they do.
+  \definedummyword\bf
+  \definedummyword\gtr
+  \definedummyword\hat
+  \definedummyword\less
+  \definedummyword\sf
+  \definedummyword\sl
+  \definedummyword\tclose
+  \definedummyword\tt
+  %
+  \definedummyword\LaTeX
+  \definedummyword\TeX
+  %
+  % Assorted special characters.
+  \definedummyword\ampchar
+  \definedummyword\atchar
+  \definedummyword\arrow
+  \definedummyword\backslashchar
+  \definedummyword\bullet
+  \definedummyword\comma
+  \definedummyword\copyright
+  \definedummyword\registeredsymbol
+  \definedummyword\dots
+  \definedummyword\enddots
+  \definedummyword\entrybreak
+  \definedummyword\equiv
+  \definedummyword\error
+  \definedummyword\euro
+  \definedummyword\expansion
+  \definedummyword\geq
+  \definedummyword\guillemetleft
+  \definedummyword\guillemetright
+  \definedummyword\guilsinglleft
+  \definedummyword\guilsinglright
+  \definedummyword\lbracechar
+  \definedummyword\leq
+  \definedummyword\mathopsup
+  \definedummyword\minus
+  \definedummyword\ogonek
+  \definedummyword\pounds
+  \definedummyword\point
+  \definedummyword\print
+  \definedummyword\quotedblbase
+  \definedummyword\quotedblleft
+  \definedummyword\quotedblright
+  \definedummyword\quoteleft
+  \definedummyword\quoteright
+  \definedummyword\quotesinglbase
+  \definedummyword\rbracechar
+  \definedummyword\result
+  \definedummyword\sub
+  \definedummyword\sup
+  \definedummyword\textdegree
+  %
+  \definedummyword\subentry
+  %
+  % We want to disable all macros so that they are not expanded by \write.
+  \macrolist
+  \let\value\dummyvalue
+  %
+  \normalturnoffactive
+}
+
+% \commondummiesnofonts: common to \definedummies and \indexnofonts.
+% Define \commondummyletter, \commondummyaccent and \commondummyword before
+% using.  Used for accents, font commands, and various control letters.
+%
+\def\commondummiesnofonts{%
+  % Control letters and accents.
+  \commondummyletter\!%
+  \commondummyaccent\"%
+  \commondummyaccent\'%
+  \commondummyletter\*%
+  \commondummyaccent\,%
+  \commondummyletter\.%
+  \commondummyletter\/%
+  \commondummyletter\:%
+  \commondummyaccent\=%
+  \commondummyletter\?%
+  \commondummyaccent\^%
+  \commondummyaccent\`%
+  \commondummyaccent\~%
+  \commondummyword\u
+  \commondummyword\v
+  \commondummyword\H
+  \commondummyword\dotaccent
+  \commondummyword\ogonek
+  \commondummyword\ringaccent
+  \commondummyword\tieaccent
+  \commondummyword\ubaraccent
+  \commondummyword\udotaccent
+  \commondummyword\dotless
+  %
+  % Texinfo font commands.
+  \commondummyword\b
+  \commondummyword\i
+  \commondummyword\r
+  \commondummyword\sansserif
+  \commondummyword\sc
+  \commondummyword\slanted
+  \commondummyword\t
+  %
+  % Commands that take arguments.
+  \commondummyword\abbr
+  \commondummyword\acronym
+  \commondummyword\anchor
+  \commondummyword\cite
+  \commondummyword\code
+  \commondummyword\command
+  \commondummyword\dfn
+  \commondummyword\dmn
+  \commondummyword\email
+  \commondummyword\emph
+  \commondummyword\env
+  \commondummyword\file
+  \commondummyword\image
+  \commondummyword\indicateurl
+  \commondummyword\inforef
+  \commondummyword\kbd
+  \commondummyword\key
+  \commondummyword\math
+  \commondummyword\option
+  \commondummyword\pxref
+  \commondummyword\ref
+  \commondummyword\samp
+  \commondummyword\strong
+  \commondummyword\tie
+  \commondummyword\U
+  \commondummyword\uref
+  \commondummyword\url
+  \commondummyword\var
+  \commondummyword\verb
+  \commondummyword\w
+  \commondummyword\xref
+}
+
+\let\indexlbrace\relax
+\let\indexrbrace\relax
+\let\indexatchar\relax
+\let\indexbackslash\relax
+
+{\catcode`\@=0
+\catcode`\\=13
+  @gdef@backslashdisappear{@def\{}}
+}
+
+{
+\catcode`\<=13
+\catcode`\-=13
+\catcode`\`=13
+  \gdef\indexnonalnumdisappear{%
+    \expandafter\ifx\csname SETtxiindexlquoteignore\endcsname\relax\else
+      % @set txiindexlquoteignore makes us ignore left quotes in the sort term.
+      % (Introduced for FSFS 2nd ed.)
+      \let`=\empty
+    \fi
+    %
+    \expandafter\ifx\csname SETtxiindexbackslashignore\endcsname\relax\else
+      \backslashdisappear
+    \fi
+    %
+    \expandafter\ifx\csname SETtxiindexhyphenignore\endcsname\relax\else
+      \def-{}%
+    \fi
+    \expandafter\ifx\csname SETtxiindexlessthanignore\endcsname\relax\else
+      \def<{}%
+    \fi
+    \expandafter\ifx\csname SETtxiindexatsignignore\endcsname\relax\else
+      \def\@{}%
+    \fi
+  }
+
+  \gdef\indexnonalnumreappear{%
+    \let-\normaldash
+    \let<\normalless
+  }
+}
+
+
+% \indexnofonts is used when outputting the strings to sort the index
+% by, and when constructing control sequence names.  It eliminates all
+% control sequences and just writes whatever the best ASCII sort string
+% would be for a given command (usually its argument).
+%
+\def\indexnofonts{%
+  % Accent commands should become @asis.
+  \def\commondummyaccent##1{\let##1\asis}%
+  % We can just ignore other control letters.
+  \def\commondummyletter##1{\let##1\empty}%
+  % All control words become @asis by default; overrides below.
+  \let\commondummyword\commondummyaccent
+  \commondummiesnofonts
+  %
+  % Don't no-op \tt, since it isn't a user-level command
+  % and is used in the definitions of the active chars like <, >, |, etc.
+  % Likewise with the other plain tex font commands.
+  %\let\tt=\asis
+  %
+  \def\ { }%
+  \def\@{@}%
+  \def\_{\normalunderscore}%
+  \def\-{}% @- shouldn't affect sorting
+  %
+  \uccode`\1=`\{ \uppercase{\def\{{1}}%
+  \uccode`\1=`\} \uppercase{\def\}{1}}%
+  \let\lbracechar\{%
+  \let\rbracechar\}%
+  %
+  % Non-English letters.
+  \def\AA{AA}%
+  \def\AE{AE}%
+  \def\DH{DZZ}%
+  \def\L{L}%
+  \def\OE{OE}%
+  \def\O{O}%
+  \def\TH{TH}%
+  \def\aa{aa}%
+  \def\ae{ae}%
+  \def\dh{dzz}%
+  \def\exclamdown{!}%
+  \def\l{l}%
+  \def\oe{oe}%
+  \def\ordf{a}%
+  \def\ordm{o}%
+  \def\o{o}%
+  \def\questiondown{?}%
+  \def\ss{ss}%
+  \def\th{th}%
+  %
+  \let\do\indexnofontsdef
+  %
+  \do\LaTeX{LaTeX}%
+  \do\TeX{TeX}%
+  %
+  % Assorted special characters.
+  \do\atchar{@}%
+  \do\arrow{->}%
+  \do\bullet{bullet}%
+  \do\comma{,}%
+  \do\copyright{copyright}%
+  \do\dots{...}%
+  \do\enddots{...}%
+  \do\equiv{==}%
+  \do\error{error}%
+  \do\euro{euro}%
+  \do\expansion{==>}%
+  \do\geq{>=}%
+  \do\guillemetleft{<<}%
+  \do\guillemetright{>>}%
+  \do\guilsinglleft{<}%
+  \do\guilsinglright{>}%
+  \do\leq{<=}%
+  \do\lbracechar{\{}%
+  \do\minus{-}%
+  \do\point{.}%
+  \do\pounds{pounds}%
+  \do\print{-|}%
+  \do\quotedblbase{"}%
+  \do\quotedblleft{"}%
+  \do\quotedblright{"}%
+  \do\quoteleft{`}%
+  \do\quoteright{'}%
+  \do\quotesinglbase{,}%
+  \do\rbracechar{\}}%
+  \do\registeredsymbol{R}%
+  \do\result{=>}%
+  \do\textdegree{o}%
+  %
+  % We need to get rid of all macros, leaving only the arguments (if present).
+  % Of course this is not nearly correct, but it is the best we can do for now.
+  % makeinfo does not expand macros in the argument to @deffn, which ends up
+  % writing an index entry, and texindex isn't prepared for an index sort entry
+  % that starts with \.
+  %
+  % Since macro invocations are followed by braces, we can just redefine them
+  % to take a single TeX argument.  The case of a macro invocation that
+  % goes to end-of-line is not handled.
+  %
+  \macrolist
+  \let\value\indexnofontsvalue
+}
+
+% Give the control sequence a definition that removes the {} that follows 
+% its use, e.g. @AA{} -> AA
+\def\indexnofontsdef#1#2{\def#1##1{#2}}%
+
+
+
+
+% #1 is the index name, #2 is the entry text.
+\def\doind#1#2{%
+  \iflinks
+  {%
+    %
+    \requireopenindexfile{#1}%
+    \edef\writeto{\csname#1indfile\endcsname}%
+    %
+    \def\indextext{#2}%
+    \safewhatsit\doindwrite
+  }%
+  \fi
+}
+
+% Same as \doind, but for code indices
+\def\docind#1#2{%
+  \iflinks
+  {%
+    %
+    \requireopenindexfile{#1}%
+    \edef\writeto{\csname#1indfile\endcsname}%
+    %
+    \def\indextext{#2}%
+    \safewhatsit\docindwrite
+  }%
+  \fi
+}
+
+% Check if an index file has been opened, and if not, open it.
+\def\requireopenindexfile#1{%
+\ifnum\csname #1indfile\endcsname=0
+  \expandafter\newwrite \csname#1indfile\endcsname
+  \edef\suffix{#1}%
+  % A .fls suffix would conflict with the file extension for the output
+  % of -recorder, so use .f1s instead.
+  \ifx\suffix\indexisfl\def\suffix{f1}\fi
+  % Open the file
+  \immediate\openout\csname#1indfile\endcsname \jobname.\suffix
+  % Using \immediate above here prevents an object entering into the current 
+  % box, which could confound checks such as those in \safewhatsit for
+  % preceding skips.
+  \typeout{Writing index file \jobname.\suffix}%
+\fi}
+\def\indexisfl{fl}
+
+% Definition for writing index entry sort key.
+{
+\catcode`\-=13
+\gdef\indexwritesortas{%
+  \begingroup
+  \indexnonalnumreappear
+  \indexwritesortasxxx}
+\gdef\indexwritesortasxxx#1{%
+  \xdef\indexsortkey{#1}\endgroup}
+}
+
+\def\indexwriteseealso#1{
+  \gdef\pagenumbertext{\string\seealso{#1}}%
+}
+\def\indexwriteseeentry#1{
+  \gdef\pagenumbertext{\string\seeentry{#1}}%
+}
+
+% The default definitions
+\def\sortas#1{}%
+\def\seealso#1{\i{\putwordSeeAlso}\ #1}% for sorted index file only
+\def\putwordSeeAlso{See also}
+\def\seeentry#1{\i{\putwordSee}\ #1}% for sorted index file only
+
+
+% Given index entry text like "aaa @subentry bbb @sortas{ZZZ}":
+%   * Set \bracedtext to "{aaa}{bbb}"
+%   * Set \fullindexsortkey to "aaa @subentry ZZZ"
+%   * If @seealso occurs, set \pagenumbertext
+%
+\def\splitindexentry#1{%
+  \gdef\fullindexsortkey{}%
+  \xdef\bracedtext{}%
+  \def\sep{}%
+  \def\seealso##1{}%
+  \def\seeentry##1{}%
+  \expandafter\doindexsegment#1\subentry\finish\subentry
+}
+
+% append the results from the next segment
+\def\doindexsegment#1\subentry{%
+  \def\segment{#1}%
+  \ifx\segment\isfinish
+  \else
+    %
+    % Fully expand the segment, throwing away any @sortas directives, and 
+    % trim spaces.
+    \edef\trimmed{\segment}%
+    \edef\trimmed{\expandafter\eatspaces\expandafter{\trimmed}}%
+    \ifincodeindex
+      \edef\trimmed{\noexpand\code{\trimmed}}%
+    \fi
+    %
+    \xdef\bracedtext{\bracedtext{\trimmed}}%
+    %
+    % Get the string to sort by.  Process the segment with all
+    % font commands turned off.
+    \bgroup
+      \let\sortas\indexwritesortas
+      \let\seealso\indexwriteseealso
+      \let\seeentry\indexwriteseeentry
+      \indexnofonts
+      % The braces around the commands are recognized by texindex.
+      \def\lbracechar{{\string\indexlbrace}}%
+      \def\rbracechar{{\string\indexrbrace}}%
+      \let\{=\lbracechar
+      \let\}=\rbracechar
+      \def\@{{\string\indexatchar}}%
+      \def\atchar##1{\@}%
+      \def\backslashchar{{\string\indexbackslash}}%
+      \uccode`\~=`\\ \uppercase{\let~\backslashchar}%
+      %
+      \let\indexsortkey\empty
+      \global\let\pagenumbertext\empty
+      % Execute the segment and throw away the typeset output.  This executes
+      % any @sortas or @seealso commands in this segment.
+      \setbox\dummybox = \hbox{\segment}%
+      \ifx\indexsortkey\empty{%
+        \indexnonalnumdisappear
+        \xdef\trimmed{\segment}%
+        \xdef\trimmed{\expandafter\eatspaces\expandafter{\trimmed}}%
+        \xdef\indexsortkey{\trimmed}%
+        \ifx\indexsortkey\empty\xdef\indexsortkey{ }\fi
+      }\fi
+      %
+      % Append to \fullindexsortkey.
+      \edef\tmp{\gdef\noexpand\fullindexsortkey{%
+                  \fullindexsortkey\sep\indexsortkey}}%
+      \tmp
+    \egroup
+    \def\sep{\subentry}%
+    %
+    \expandafter\doindexsegment
+  \fi
+}
+\def\isfinish{\finish}%
+\newbox\dummybox % used above
+
+\let\subentry\relax
+
+% Use \ instead of @ in index files.  To support old texi2dvi and texindex.
+% This works without changing the escape character used in the toc or aux
+% files because the index entries are fully expanded here, and \string uses
+% the current value of \escapechar.
+\def\escapeisbackslash{\escapechar=`\\}
+
+% Use \ in index files by default.  texi2dvi didn't support @ as the escape 
+% character (as it checked for "\entry" in the files, and not "@entry").  When 
+% the new version of texi2dvi has had a chance to become more prevalent, then 
+% the escape character can change back to @ again.  This should be an easy 
+% change to make now because both @ and \ are only used as escape characters in 
+% index files, never standing for themselves. 
+%
+\set txiindexescapeisbackslash
+
+% Write the entry in \indextext to the index file.
+%
+
+\newif\ifincodeindex
+\def\doindwrite{\incodeindexfalse\doindwritex}
+\def\docindwrite{\incodeindextrue\doindwritex}
+
+\def\doindwritex{%
+  \maybemarginindex
+  %
+  \atdummies
+  %
+  \expandafter\ifx\csname SETtxiindexescapeisbackslash\endcsname\relax\else
+    \escapeisbackslash
+  \fi
+  %
+  % For texindex which always views { and } as separators.
+  \def\{{\lbracechar{}}%
+  \def\}{\rbracechar{}}%
+  \uccode`\~=`\\ \uppercase{\def~{\backslashchar{}}}%
+  %
+  % Split the entry into primary entry and any subentries, and get the index 
+  % sort key.
+  \splitindexentry\indextext
+  %
+  % Set up the complete index entry, with both the sort key and
+  % the original text, including any font commands.  We write
+  % three arguments to \entry to the .?? file (four in the
+  % subentry case), texindex reduces to two when writing the .??s
+  % sorted result.
+  %
+  \edef\temp{%
+    \write\writeto{%
+      \string\entry{\fullindexsortkey}%
+        {\ifx\pagenumbertext\empty\noexpand\folio\else\pagenumbertext\fi}%
+        \bracedtext}%
+  }%
+  \temp
+}
+
+% Put the index entry in the margin if desired (undocumented).
+\def\maybemarginindex{%
+  \ifx\SETmarginindex\relax\else
+    \insert\margin{\hbox{\vrule height8pt depth3pt width0pt \relax\indextext}}%
+  \fi
+}
+\let\SETmarginindex=\relax
+
+
+% Take care of unwanted page breaks/skips around a whatsit:
+%
+% If a skip is the last thing on the list now, preserve it
+% by backing up by \lastskip, doing the \write, then inserting
+% the skip again.  Otherwise, the whatsit generated by the
+% \write or \pdfdest will make \lastskip zero.  The result is that
+% sequences like this:
+% @end defun
+% @tindex whatever
+% @defun ...
+% will have extra space inserted, because the \medbreak in the
+% start of the @defun won't see the skip inserted by the @end of
+% the previous defun.
+%
+% But don't do any of this if we're not in vertical mode.  We
+% don't want to do a \vskip and prematurely end a paragraph.
+%
+% Avoid page breaks due to these extra skips, too.
+%
+% But wait, there is a catch there:
+% We'll have to check whether \lastskip is zero skip.  \ifdim is not
+% sufficient for this purpose, as it ignores stretch and shrink parts
+% of the skip.  The only way seems to be to check the textual
+% representation of the skip.
+%
+% The following is almost like \def\zeroskipmacro{0.0pt} except that
+% the ``p'' and ``t'' characters have catcode \other, not 11 (letter).
+%
+\edef\zeroskipmacro{\expandafter\the\csname z@skip\endcsname}
+%
+\newskip\whatsitskip
+\newcount\whatsitpenalty
+%
+% ..., ready, GO:
+%
+\def\safewhatsit#1{\ifhmode
+  #1%
+ \else
+  % \lastskip and \lastpenalty cannot both be nonzero simultaneously.
+  \whatsitskip = \lastskip
+  \edef\lastskipmacro{\the\lastskip}%
+  \whatsitpenalty = \lastpenalty
+  %
+  % If \lastskip is nonzero, that means the last item was a
+  % skip.  And since a skip is discardable, that means this
+  % -\whatsitskip glue we're inserting is preceded by a
+  % non-discardable item, therefore it is not a potential
+  % breakpoint, therefore no \nobreak needed.
+  \ifx\lastskipmacro\zeroskipmacro
+  \else
+    \vskip-\whatsitskip
+  \fi
+  %
+  #1%
+  %
+  \ifx\lastskipmacro\zeroskipmacro
+    % If \lastskip was zero, perhaps the last item was a penalty, and
+    % perhaps it was >=10000, e.g., a \nobreak.  In that case, we want
+    % to re-insert the same penalty (values >10000 are used for various
+    % signals); since we just inserted a non-discardable item, any
+    % following glue (such as a \parskip) would be a breakpoint.  For example:
+    %   @deffn deffn-whatever
+    %   @vindex index-whatever
+    %   Description.
+    % would allow a break between the index-whatever whatsit
+    % and the "Description." paragraph.
+    \ifnum\whatsitpenalty>9999 \penalty\whatsitpenalty \fi
+  \else
+    % On the other hand, if we had a nonzero \lastskip,
+    % this make-up glue would be preceded by a non-discardable item
+    % (the whatsit from the \write), so we must insert a \nobreak.
+    \nobreak\vskip\whatsitskip
+  \fi
+\fi}
+
+% The index entry written in the file actually looks like
+%  \entry {sortstring}{page}{topic}
+% or
+%  \entry {sortstring}{page}{topic}{subtopic}
+% The texindex program reads in these files and writes files
+% containing these kinds of lines:
+%  \initial {c}
+%     before the first topic whose initial is c
+%  \entry {topic}{pagelist}
+%     for a topic that is used without subtopics
+%  \primary {topic}
+%  \entry {topic}{}
+%     for the beginning of a topic that is used with subtopics
+%  \secondary {subtopic}{pagelist}
+%     for each subtopic.
+%  \secondary {subtopic}{}
+%     for a subtopic with sub-subtopics
+%  \tertiary {subtopic}{subsubtopic}{pagelist}
+%     for each sub-subtopic.
+
+% Define the user-accessible indexing commands
+% @findex, @vindex, @kindex, @cindex.
+
+\def\findex {\fnindex}
+\def\kindex {\kyindex}
+\def\cindex {\cpindex}
+\def\vindex {\vrindex}
+\def\tindex {\tpindex}
+\def\pindex {\pgindex}
+
+% Define the macros used in formatting output of the sorted index material.
+
+% @printindex causes a particular index (the ??s file) to get printed.
+% It does not print any chapter heading (usually an @unnumbered).
+%
+\parseargdef\printindex{\begingroup
+  \dobreak \chapheadingskip{10000}%
+  %
+  \smallfonts \rm
+  \tolerance = 9500
+  \plainfrenchspacing
+  \everypar = {}% don't want the \kern\-parindent from indentation suppression.
+  %
+  % See comment in \requireopenindexfile.
+  \def\indexname{#1}\ifx\indexname\indexisfl\def\indexname{f1}\fi
+  %
+  % See if the index file exists and is nonempty.
+  \openin 1 \jobname.\indexname s
+  \ifeof 1
+    % \enddoublecolumns gets confused if there is no text in the index,
+    % and it loses the chapter title and the aux file entries for the
+    % index.  The easiest way to prevent this problem is to make sure
+    % there is some text.
+    \putwordIndexNonexistent
+    \typeout{No file \jobname.\indexname s.}%
+  \else
+    % If the index file exists but is empty, then \openin leaves \ifeof
+    % false.  We have to make TeX try to read something from the file, so
+    % it can discover if there is anything in it.
+    \read 1 to \thisline
+    \ifeof 1
+      \putwordIndexIsEmpty
+    \else
+      \expandafter\printindexzz\thisline\relax\relax\finish%
+    \fi
+  \fi
+  \closein 1
+\endgroup}
+
+% If the index file starts with a backslash, forgo reading the index
+% file altogether.  If somebody upgrades texinfo.tex they may still have
+% old index files using \ as the escape character.  Reading this would
+% at best lead to typesetting garbage, at worst a TeX syntax error.
+\def\printindexzz#1#2\finish{%
+  \expandafter\ifx\csname SETtxiindexescapeisbackslash\endcsname\relax
+    \uccode`\~=`\\ \uppercase{\if\noexpand~}\noexpand#1
+      \expandafter\ifx\csname SETtxiskipindexfileswithbackslash\endcsname\relax
+\errmessage{%
+ERROR: A sorted index file in an obsolete format was skipped.  
+To fix this problem, please upgrade your version of 'texi2dvi'
+or 'texi2pdf' to that at <https://ftp.gnu.org/gnu/texinfo>.
+If you are using an old version of 'texindex' (part of the Texinfo 
+distribution), you may also need to upgrade to a newer version (at least 6.0).
+You may be able to typeset the index if you run
+'texindex \jobname.\indexname' yourself.
+You could also try setting the 'txiindexescapeisbackslash' flag by 
+running a command like
+'texi2dvi -t "@set txiindexescapeisbackslash" \jobname.texi'.  If you do 
+this, Texinfo will try to use index files in the old format.
+If you continue to have problems, deleting the index files and starting again 
+might help (with 'rm \jobname.?? \jobname.??s')%
+}%
+      \else
+        (Skipped sorted index file in obsolete format)
+      \fi
+    \else
+      \begindoublecolumns
+      \input \jobname.\indexname s
+      \enddoublecolumns
+    \fi
+  \else
+    \begindoublecolumns
+    \catcode`\\=0\relax
+    %
+    % Make @ an escape character to give macros a chance to work.  This
+    % should work because we (hopefully) don't otherwise use @ in index files.
+    %\catcode`\@=12\relax
+    \catcode`\@=0\relax
+    \input \jobname.\indexname s
+    \enddoublecolumns
+  \fi
+}
+
+% These macros are used by the sorted index file itself.
+% Change them to control the appearance of the index.
+
+{\catcode`\/=13 \catcode`\-=13 \catcode`\^=13 \catcode`\~=13 \catcode`\_=13
+\catcode`\|=13 \catcode`\<=13 \catcode`\>=13 \catcode`\+=13 \catcode`\"=13
+\catcode`\$=3
+\gdef\initialglyphs{%
+  % special control sequences used in the index sort key
+  \let\indexlbrace\{%
+  \let\indexrbrace\}%
+  \let\indexatchar\@%
+  \def\indexbackslash{\math{\backslash}}%
+  %
+  % Some changes for non-alphabetic characters.  Using the glyphs from the
+  % math fonts looks more consistent than the typewriter font used elsewhere
+  % for these characters.
+  \uccode`\~=`\\ \uppercase{\def~{\math{\backslash}}}
+  %
+  % In case @\ is used for backslash
+  \uppercase{\let\\=~}
+  % Can't get bold backslash so don't use bold forward slash
+  \catcode`\/=13
+  \def/{{\secrmnotbold \normalslash}}%
+  \def-{{\normaldash\normaldash}}% en dash `--'
+  \def^{{\chapbf \normalcaret}}%
+  \def~{{\chapbf \normaltilde}}%
+  \def\_{%
+     \leavevmode \kern.07em \vbox{\hrule width.3em height.1ex}\kern .07em }%
+  \def|{$\vert$}%
+  \def<{$\less$}%
+  \def>{$\gtr$}%
+  \def+{$\normalplus$}%
+}}
+
+\def\initial{%
+  \bgroup
+  \initialglyphs
+  \initialx
+}
+
+\def\initialx#1{%
+  % Remove any glue we may have, we'll be inserting our own.
+  \removelastskip
+  %
+  % We like breaks before the index initials, so insert a bonus.
+  % The glue before the bonus allows a little bit of space at the
+  % bottom of a column to reduce an increase in inter-line spacing.
+  \nobreak
+  \vskip 0pt plus 5\baselineskip
+  \penalty -300 
+  \vskip 0pt plus -5\baselineskip
+  %
+  % Typeset the initial.  Making this add up to a whole number of
+  % baselineskips increases the chance of the dots lining up from column
+  % to column.  It still won't often be perfect, because of the stretch
+  % we need before each entry, but it's better.
+  %
+  % No shrink because it confuses \balancecolumns.
+  \vskip 1.67\baselineskip plus 1\baselineskip
+  \leftline{\secfonts \kern-0.05em \secbf #1}%
+  % \secfonts is inside the argument of \leftline so that the change of
+  % \baselineskip will not affect any glue inserted before the vbox that
+  % \leftline creates.
+  % Do our best not to break after the initial.
+  \nobreak
+  \vskip .33\baselineskip plus .1\baselineskip
+  \egroup % \initialglyphs
+}
+
+\newdimen\entryrightmargin
+\entryrightmargin=0pt
+
+% \entry typesets a paragraph consisting of the text (#1), dot leaders, and
+% then page number (#2) flushed to the right margin.  It is used for index
+% and table of contents entries.  The paragraph is indented by \leftskip.
+%
+\def\entry{%
+  \begingroup
+    %
+    % Start a new paragraph if necessary, so our assignments below can't
+    % affect previous text.
+    \par
+    %
+    % No extra space above this paragraph.
+    \parskip = 0in
+    %
+    % When reading the text of entry, convert explicit line breaks
+    % from @* into spaces.  The user might give these in long section
+    % titles, for instance.
+    \def\*{\unskip\space\ignorespaces}%
+    \def\entrybreak{\hfil\break}% An undocumented command
+    %
+    % Swallow the left brace of the text (first parameter):
+    \afterassignment\doentry
+    \let\temp =
+}
+\def\entrybreak{\unskip\space\ignorespaces}%
+\def\doentry{%
+    % Save the text of the entry
+    \global\setbox\boxA=\hbox\bgroup
+    \bgroup % Instead of the swallowed brace.
+      \noindent
+      \aftergroup\finishentry
+      % And now comes the text of the entry.
+      % Not absorbing as a macro argument reduces the chance of problems
+      % with catcodes occurring.
+}
+{\catcode`\@=11
+\gdef\finishentry#1{%
+    \egroup % end box A
+    \dimen@ = \wd\boxA % Length of text of entry
+    \global\setbox\boxA=\hbox\bgroup
+      \unhbox\boxA
+      % #1 is the page number.
+      %
+      % Get the width of the page numbers, and only use
+      % leaders if they are present.
+      \global\setbox\boxB = \hbox{#1}%
+      \ifdim\wd\boxB = 0pt
+        \null\nobreak\hfill\ %
+      \else
+        %
+        \null\nobreak\indexdotfill % Have leaders before the page number.
+        %
+        \ifpdforxetex
+          \pdfgettoks#1.%
+          \hskip\skip\thinshrinkable\the\toksA
+        \else
+          \hskip\skip\thinshrinkable #1%
+        \fi
+      \fi
+    \egroup % end \boxA
+    \ifdim\wd\boxB = 0pt
+      \noindent\unhbox\boxA\par
+      \nobreak
+    \else\bgroup
+      % We want the text of the entries to be aligned to the left, and the
+      % page numbers to be aligned to the right.
+      %
+      \parindent = 0pt
+      \advance\leftskip by 0pt plus 1fil
+      \advance\leftskip by 0pt plus -1fill
+      \rightskip = 0pt plus -1fil
+      \advance\rightskip by 0pt plus 1fill
+      % Cause last line, which could consist of page numbers on their own
+      % if the list of page numbers is long, to be aligned to the right.
+      \parfillskip=0pt plus -1fill
+      %
+      \advance\rightskip by \entryrightmargin
+      % Determine how far we can stretch into the margin.
+      % This allows, e.g., "Appendix H  GNU Free Documentation License" to
+      % fit on one line in @letterpaper format.
+      \ifdim\entryrightmargin>2.1em
+        \dimen@i=2.1em
+      \else
+        \dimen@i=0em
+      \fi
+      \advance \parfillskip by 0pt minus 1\dimen@i
+      %
+      \dimen@ii = \hsize
+      \advance\dimen@ii by -1\leftskip
+      \advance\dimen@ii by -1\entryrightmargin
+      \advance\dimen@ii by 1\dimen@i
+      \ifdim\wd\boxA > \dimen@ii % If the entry doesn't fit in one line
+      \ifdim\dimen@ > 0.8\dimen@ii   % due to long index text
+        % Try to split the text roughly evenly.  \dimen@ will be the length of 
+        % the first line.
+        \dimen@ = 0.7\dimen@
+        \dimen@ii = \hsize
+        \ifnum\dimen@>\dimen@ii
+          % If the entry is too long (for example, if it needs more than
+          % two lines), use all the space in the first line.
+          \dimen@ = \dimen@ii
+        \fi
+        \advance\leftskip by 0pt plus 1fill % ragged right
+        \advance \dimen@ by 1\rightskip
+        \parshape = 2 0pt \dimen@ 0em \dimen@ii
+        % Ideally we'd add a finite glue at the end of the first line only,
+        % instead of using \parshape with explicit line lengths, but TeX
+        % doesn't seem to provide a way to do such a thing.
+        %
+        % Indent all lines but the first one.
+        \advance\leftskip by 1em
+        \advance\parindent by -1em
+      \fi\fi
+      \indent % start paragraph
+      \unhbox\boxA
+      %
+      % Do not prefer a separate line ending with a hyphen to fewer lines.
+      \finalhyphendemerits = 0
+      %
+      % Word spacing - no stretch
+      \spaceskip=\fontdimen2\font minus \fontdimen4\font
+      %
+      \linepenalty=1000  % Discourage line breaks.
+      \hyphenpenalty=5000  % Discourage hyphenation.
+      %
+      \par % format the paragraph
+    \egroup % The \vbox
+    \fi
+  \endgroup
+}}
+
+\newskip\thinshrinkable
+\skip\thinshrinkable=.15em minus .15em
+
+% Like plain.tex's \dotfill, except uses up at least 1 em.
+% The filll stretch here overpowers both the fil and fill stretch to push
+% the page number to the right.
+\def\indexdotfill{\cleaders
+  \hbox{$\mathsurround=0pt \mkern1.5mu.\mkern1.5mu$}\hskip 1em plus 1filll}
+
+
+\def\primary #1{\line{#1\hfil}}
+
+\def\secondary{\indententry{0.5cm}}
+\def\tertiary{\indententry{1cm}}
+
+\def\indententry#1#2#3{%
+  \bgroup
+  \leftskip=#1
+  \entry{#2}{#3}%
+  \egroup
+}
+
+% Define two-column mode, which we use to typeset indexes.
+% Adapted from the TeXbook, page 416, which is to say,
+% the manmac.tex format used to print the TeXbook itself.
+\catcode`\@=11  % private names
+
+\newbox\partialpage
+\newdimen\doublecolumnhsize
+
+\def\begindoublecolumns{\begingroup % ended by \enddoublecolumns
+  % If not much space left on page, start a new page.
+  \ifdim\pagetotal>0.8\vsize\vfill\eject\fi
+  %
+  % Grab any single-column material above us.
+  \output = {%
+    \savetopmark
+    %
+    \global\setbox\partialpage = \vbox{%
+      % Unvbox the main output page.
+      \unvbox\PAGE
+      \kern-\topskip \kern\baselineskip
+    }%
+  }%
+  \eject % run that output routine to set \partialpage
+  %
+  % Use the double-column output routine for subsequent pages.
+  \output = {\doublecolumnout}%
+  %
+  % Change the page size parameters.  We could do this once outside this
+  % routine, in each of @smallbook, @afourpaper, and the default 8.5x11
+  % format, but then we repeat the same computation.  Repeating a couple
+  % of assignments once per index is clearly meaningless for the
+  % execution time, so we may as well do it in one place.
+  %
+  % First we halve the line length, less a little for the gutter between
+  % the columns.  We compute the gutter based on the line length, so it
+  % changes automatically with the paper format.  The magic constant
+  % below is chosen so that the gutter has the same value (well, +-<1pt)
+  % as it did when we hard-coded it.
+  %
+  % We put the result in a separate register, \doublecolumhsize, so we
+  % can restore it in \pagesofar, after \hsize itself has (potentially)
+  % been clobbered.
+  %
+  \doublecolumnhsize = \hsize
+    \advance\doublecolumnhsize by -.04154\hsize
+    \divide\doublecolumnhsize by 2
+  \hsize = \doublecolumnhsize
+  %
+  % Get the available space for the double columns -- the normal
+  % (undoubled) page height minus any material left over from the
+  % previous page.
+  \advance\vsize by -\ht\partialpage
+  \vsize = 2\vsize
+  %
+  % For the benefit of balancing columns
+  \advance\baselineskip by 0pt plus 0.5pt
+}
+
+% The double-column output routine for all double-column pages except
+% the last, which is done by \balancecolumns.
+%
+\def\doublecolumnout{%
+  %
+  \savetopmark
+  \splittopskip=\topskip \splitmaxdepth=\maxdepth
+  \dimen@ = \vsize
+  \divide\dimen@ by 2
+  %
+  % box0 will be the left-hand column, box2 the right.
+  \setbox0=\vsplit\PAGE to\dimen@ \setbox2=\vsplit\PAGE to\dimen@
+  \global\advance\vsize by 2\ht\partialpage
+  \onepageout\pagesofar % empty except for the first time we are called
+  \unvbox\PAGE
+  \penalty\outputpenalty
+}
+%
+% Re-output the contents of the output page -- any previous material,
+% followed by the two boxes we just split, in box0 and box2.
+\def\pagesofar{%
+  \unvbox\partialpage
+  %
+  \hsize = \doublecolumnhsize
+  \wd0=\hsize \wd2=\hsize
+  \hbox to\txipagewidth{\box0\hfil\box2}%
+}
+
+
+% Finished with double columns.
+\def\enddoublecolumns{%
+  % The following penalty ensures that the page builder is exercised
+  % _before_ we change the output routine.  This is necessary in the
+  % following situation:
+  %
+  % The last section of the index consists only of a single entry.
+  % Before this section, \pagetotal is less than \pagegoal, so no
+  % break occurs before the last section starts.  However, the last
+  % section, consisting of \initial and the single \entry, does not
+  % fit on the page and has to be broken off.  Without the following
+  % penalty the page builder will not be exercised until \eject
+  % below, and by that time we'll already have changed the output
+  % routine to the \balancecolumns version, so the next-to-last
+  % double-column page will be processed with \balancecolumns, which
+  % is wrong:  The two columns will go to the main vertical list, with
+  % the broken-off section in the recent contributions.  As soon as
+  % the output routine finishes, TeX starts reconsidering the page
+  % break.  The two columns and the broken-off section both fit on the
+  % page, because the two columns now take up only half of the page
+  % goal.  When TeX sees \eject from below which follows the final
+  % section, it invokes the new output routine that we've set after
+  % \balancecolumns below; \onepageout will try to fit the two columns
+  % and the final section into the vbox of \txipageheight (see
+  % \pagebody), causing an overfull box.
+  %
+  % Note that glue won't work here, because glue does not exercise the
+  % page builder, unlike penalties (see The TeXbook, pp. 280-281).
+  \penalty0
+  %
+  \output = {%
+    % Split the last of the double-column material.
+    \savetopmark
+    \balancecolumns
+  }%
+  \eject % call the \output just set
+  \ifdim\pagetotal=0pt
+    % Having called \balancecolumns once, we do not
+    % want to call it again.  Therefore, reset \output to its normal
+    % definition right away.
+    \global\output=\expandafter{\the\defaultoutput}
+    %
+    \endgroup % started in \begindoublecolumns
+    % Leave the double-column material on the current page, no automatic
+    % page break.
+    \box\balancedcolumns
+    %
+    % \pagegoal was set to the doubled \vsize above, since we restarted
+    % the current page.  We're now back to normal single-column
+    % typesetting, so reset \pagegoal to the normal \vsize.
+    \global\vsize = \txipageheight %
+    \pagegoal = \txipageheight %
+  \else
+    % We had some left-over material.  This might happen when \doublecolumnout
+    % is called in \balancecolumns.  Try again.
+    \expandafter\enddoublecolumns
+  \fi
+}
+\newbox\balancedcolumns
+\setbox\balancedcolumns=\vbox{shouldnt see this}%
+%
+% Only called for the last of the double column material.  \doublecolumnout 
+% does the others.
+\def\balancecolumns{%
+  \setbox0 = \vbox{\unvbox\PAGE}% like \box255 but more efficient, see p.120.
+  \dimen@ = \ht0
+  \ifdim\dimen@<7\baselineskip
+    % Don't split a short final column in two.
+    \setbox2=\vbox{}%
+    \global\setbox\balancedcolumns=\vbox{\pagesofar}%
+  \else
+    % double the leading vertical space
+    \advance\dimen@ by \topskip
+    \advance\dimen@ by-\baselineskip
+    \divide\dimen@ by 2 % target to split to
+    \dimen@ii = \dimen@
+    \splittopskip = \topskip
+    % Loop until left column is at least as high as the right column.
+    {%
+      \vbadness = 10000
+      \loop
+        \global\setbox3 = \copy0
+        \global\setbox1 = \vsplit3 to \dimen@
+      \ifdim\ht1<\ht3
+        \global\advance\dimen@ by 1pt
+      \repeat
+    }%
+    % Now the left column is in box 1, and the right column in box 3.
+    %
+    % Check whether the left column has come out higher than the page itself.  
+    % (Note that we have doubled \vsize for the double columns, so
+    % the actual height of the page is 0.5\vsize).
+    \ifdim2\ht1>\vsize
+      % It appears that we have been called upon to balance too much material.
+      % Output some of it with \doublecolumnout, leaving the rest on the page.
+      \setbox\PAGE=\box0
+      \doublecolumnout
+    \else
+      % Compare the heights of the two columns.
+      \ifdim4\ht1>5\ht3
+        % Column heights are too different, so don't make their bottoms
+        % flush with each other.
+        \setbox2=\vbox to \ht1 {\unvbox3\vfill}%
+        \setbox0=\vbox to \ht1 {\unvbox1\vfill}%
+      \else
+        % Make column bottoms flush with each other.
+        \setbox2=\vbox to\ht1{\unvbox3\unskip}%
+        \setbox0=\vbox to\ht1{\unvbox1\unskip}%
+      \fi
+      \global\setbox\balancedcolumns=\vbox{\pagesofar}%
+    \fi
+  \fi
+  %
+}
+\catcode`\@ = \other
+
+
+\message{sectioning,}
+% Chapters, sections, etc.
+
+% Let's start with @part.
+\outer\parseargdef\part{\partzzz{#1}}
+\def\partzzz#1{%
+  \chapoddpage
+  \null
+  \vskip.3\vsize  % move it down on the page a bit
+  \begingroup
+    \noindent \titlefonts\rm #1\par % the text
+    \let\lastnode=\empty      % no node to associate with
+    \writetocentry{part}{#1}{}% but put it in the toc
+    \headingsoff              % no headline or footline on the part page
+    % This outputs a mark at the end of the page that clears \thischapter
+    % and \thissection, as is done in \startcontents.
+    \let\pchapsepmacro\relax
+    \chapmacro{}{Yomitfromtoc}{}%
+    \chapoddpage
+  \endgroup
+}
+
+% \unnumberedno is an oxymoron.  But we count the unnumbered
+% sections so that we can refer to them unambiguously in the pdf
+% outlines by their "section number".  We avoid collisions with chapter
+% numbers by starting them at 10000.  (If a document ever has 10000
+% chapters, we're in trouble anyway, I'm sure.)
+\newcount\unnumberedno \unnumberedno = 10000
+\newcount\chapno
+\newcount\secno        \secno=0
+\newcount\subsecno     \subsecno=0
+\newcount\subsubsecno  \subsubsecno=0
+
+% This counter is funny since it counts through charcodes of letters A, B, ...
+\newcount\appendixno  \appendixno = `\@
+%
+% \def\appendixletter{\char\the\appendixno}
+% We do the following ugly conditional instead of the above simple
+% construct for the sake of pdftex, which needs the actual
+% letter in the expansion, not just typeset.
+%
+\def\appendixletter{%
+  \ifnum\appendixno=`A A%
+  \else\ifnum\appendixno=`B B%
+  \else\ifnum\appendixno=`C C%
+  \else\ifnum\appendixno=`D D%
+  \else\ifnum\appendixno=`E E%
+  \else\ifnum\appendixno=`F F%
+  \else\ifnum\appendixno=`G G%
+  \else\ifnum\appendixno=`H H%
+  \else\ifnum\appendixno=`I I%
+  \else\ifnum\appendixno=`J J%
+  \else\ifnum\appendixno=`K K%
+  \else\ifnum\appendixno=`L L%
+  \else\ifnum\appendixno=`M M%
+  \else\ifnum\appendixno=`N N%
+  \else\ifnum\appendixno=`O O%
+  \else\ifnum\appendixno=`P P%
+  \else\ifnum\appendixno=`Q Q%
+  \else\ifnum\appendixno=`R R%
+  \else\ifnum\appendixno=`S S%
+  \else\ifnum\appendixno=`T T%
+  \else\ifnum\appendixno=`U U%
+  \else\ifnum\appendixno=`V V%
+  \else\ifnum\appendixno=`W W%
+  \else\ifnum\appendixno=`X X%
+  \else\ifnum\appendixno=`Y Y%
+  \else\ifnum\appendixno=`Z Z%
+  % The \the is necessary, despite appearances, because \appendixletter is
+  % expanded while writing the .toc file.  \char\appendixno is not
+  % expandable, thus it is written literally, thus all appendixes come out
+  % with the same letter (or @) in the toc without it.
+  \else\char\the\appendixno
+  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
+  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
+
+% Each @chapter defines these (using marks) as the number+name, number
+% and name of the chapter.  Page headings and footings can use
+% these.  @section does likewise.
+\def\thischapter{}
+\def\thischapternum{}
+\def\thischaptername{}
+\def\thissection{}
+\def\thissectionnum{}
+\def\thissectionname{}
+
+\newcount\absseclevel % used to calculate proper heading level
+\newcount\secbase\secbase=0 % @raisesections/@lowersections modify this count
+
+% @raisesections: treat @section as chapter, @subsection as section, etc.
+\def\raisesections{\global\advance\secbase by -1}
+
+% @lowersections: treat @chapter as section, @section as subsection, etc.
+\def\lowersections{\global\advance\secbase by 1}
+
+% we only have subsub.
+\chardef\maxseclevel = 3
+%
+% A numbered section within an unnumbered changes to unnumbered too.
+% To achieve this, remember the "biggest" unnum. sec. we are currently in:
+\chardef\unnlevel = \maxseclevel
+%
+% Trace whether the current chapter is an appendix or not:
+% \chapheadtype is "N" or "A", unnumbered chapters are ignored.
+\def\chapheadtype{N}
+
+% Choose a heading macro
+% #1 is heading type
+% #2 is heading level
+% #3 is text for heading
+\def\genhead#1#2#3{%
+  % Compute the abs. sec. level:
+  \absseclevel=#2
+  \advance\absseclevel by \secbase
+  % Make sure \absseclevel doesn't fall outside the range:
+  \ifnum \absseclevel < 0
+    \absseclevel = 0
+  \else
+    \ifnum \absseclevel > 3
+      \absseclevel = 3
+    \fi
+  \fi
+  % The heading type:
+  \def\headtype{#1}%
+  \if \headtype U%
+    \ifnum \absseclevel < \unnlevel
+      \chardef\unnlevel = \absseclevel
+    \fi
+  \else
+    % Check for appendix sections:
+    \ifnum \absseclevel = 0
+      \edef\chapheadtype{\headtype}%
+    \else
+      \if \headtype A\if \chapheadtype N%
+	\errmessage{@appendix... within a non-appendix chapter}%
+      \fi\fi
+    \fi
+    % Check for numbered within unnumbered:
+    \ifnum \absseclevel > \unnlevel
+      \def\headtype{U}%
+    \else
+      \chardef\unnlevel = 3
+    \fi
+  \fi
+  % Now print the heading:
+  \if \headtype U%
+    \ifcase\absseclevel
+	\unnumberedzzz{#3}%
+    \or \unnumberedseczzz{#3}%
+    \or \unnumberedsubseczzz{#3}%
+    \or \unnumberedsubsubseczzz{#3}%
+    \fi
+  \else
+    \if \headtype A%
+      \ifcase\absseclevel
+	  \appendixzzz{#3}%
+      \or \appendixsectionzzz{#3}%
+      \or \appendixsubseczzz{#3}%
+      \or \appendixsubsubseczzz{#3}%
+      \fi
+    \else
+      \ifcase\absseclevel
+	  \chapterzzz{#3}%
+      \or \seczzz{#3}%
+      \or \numberedsubseczzz{#3}%
+      \or \numberedsubsubseczzz{#3}%
+      \fi
+    \fi
+  \fi
+  \suppressfirstparagraphindent
+}
+
+% an interface:
+\def\numhead{\genhead N}
+\def\apphead{\genhead A}
+\def\unnmhead{\genhead U}
+
+% @chapter, @appendix, @unnumbered.  Increment top-level counter, reset
+% all lower-level sectioning counters to zero.
+%
+% Also set \chaplevelprefix, which we prepend to @float sequence numbers
+% (e.g., figures), q.v.  By default (before any chapter), that is empty.
+\let\chaplevelprefix = \empty
+%
+\outer\parseargdef\chapter{\numhead0{#1}} % normally numhead0 calls chapterzzz
+\def\chapterzzz#1{%
+  % section resetting is \global in case the chapter is in a group, such
+  % as an @include file.
+  \global\secno=0 \global\subsecno=0 \global\subsubsecno=0
+    \global\advance\chapno by 1
+  %
+  % Used for \float.
+  \gdef\chaplevelprefix{\the\chapno.}%
+  \resetallfloatnos
+  %
+  % \putwordChapter can contain complex things in translations.
+  \toks0=\expandafter{\putwordChapter}%
+  \message{\the\toks0 \space \the\chapno}%
+  %
+  % Write the actual heading.
+  \chapmacro{#1}{Ynumbered}{\the\chapno}%
+  %
+  % So @section and the like are numbered underneath this chapter.
+  \global\let\section = \numberedsec
+  \global\let\subsection = \numberedsubsec
+  \global\let\subsubsection = \numberedsubsubsec
+}
+
+\outer\parseargdef\appendix{\apphead0{#1}} % normally calls appendixzzz
+%
+\def\appendixzzz#1{%
+  \global\secno=0 \global\subsecno=0 \global\subsubsecno=0
+    \global\advance\appendixno by 1
+  \gdef\chaplevelprefix{\appendixletter.}%
+  \resetallfloatnos
+  %
+  % \putwordAppendix can contain complex things in translations.
+  \toks0=\expandafter{\putwordAppendix}%
+  \message{\the\toks0 \space \appendixletter}%
+  %
+  \chapmacro{#1}{Yappendix}{\appendixletter}%
+  %
+  \global\let\section = \appendixsec
+  \global\let\subsection = \appendixsubsec
+  \global\let\subsubsection = \appendixsubsubsec
+}
+
+% normally unnmhead0 calls unnumberedzzz:
+\outer\parseargdef\unnumbered{\unnmhead0{#1}}
+\def\unnumberedzzz#1{%
+  \global\secno=0 \global\subsecno=0 \global\subsubsecno=0
+    \global\advance\unnumberedno by 1
+  %
+  % Since an unnumbered has no number, no prefix for figures.
+  \global\let\chaplevelprefix = \empty
+  \resetallfloatnos
+  %
+  % This used to be simply \message{#1}, but TeX fully expands the
+  % argument to \message.  Therefore, if #1 contained @-commands, TeX
+  % expanded them.  For example, in `@unnumbered The @cite{Book}', TeX
+  % expanded @cite (which turns out to cause errors because \cite is meant
+  % to be executed, not expanded).
+  %
+  % Anyway, we don't want the fully-expanded definition of @cite to appear
+  % as a result of the \message, we just want `@cite' itself.  We use
+  % \the<toks register> to achieve this: TeX expands \the<toks> only once,
+  % simply yielding the contents of <toks register>.  (We also do this for
+  % the toc entries.)
+  \toks0 = {#1}%
+  \message{(\the\toks0)}%
+  %
+  \chapmacro{#1}{Ynothing}{\the\unnumberedno}%
+  %
+  \global\let\section = \unnumberedsec
+  \global\let\subsection = \unnumberedsubsec
+  \global\let\subsubsection = \unnumberedsubsubsec
+}
+
+% @centerchap is like @unnumbered, but the heading is centered.
+\outer\parseargdef\centerchap{%
+  \let\centerparametersmaybe = \centerparameters
+  \unnmhead0{#1}%
+  \let\centerparametersmaybe = \relax
+}
+
+% @top is like @unnumbered.
+\let\top\unnumbered
+
+% Sections.
+% 
+\outer\parseargdef\numberedsec{\numhead1{#1}} % normally calls seczzz
+\def\seczzz#1{%
+  \global\subsecno=0 \global\subsubsecno=0  \global\advance\secno by 1
+  \sectionheading{#1}{sec}{Ynumbered}{\the\chapno.\the\secno}%
+}
+
+% normally calls appendixsectionzzz:
+\outer\parseargdef\appendixsection{\apphead1{#1}}
+\def\appendixsectionzzz#1{%
+  \global\subsecno=0 \global\subsubsecno=0  \global\advance\secno by 1
+  \sectionheading{#1}{sec}{Yappendix}{\appendixletter.\the\secno}%
+}
+\let\appendixsec\appendixsection
+
+% normally calls unnumberedseczzz:
+\outer\parseargdef\unnumberedsec{\unnmhead1{#1}}
+\def\unnumberedseczzz#1{%
+  \global\subsecno=0 \global\subsubsecno=0  \global\advance\secno by 1
+  \sectionheading{#1}{sec}{Ynothing}{\the\unnumberedno.\the\secno}%
+}
+
+% Subsections.
+% 
+% normally calls numberedsubseczzz:
+\outer\parseargdef\numberedsubsec{\numhead2{#1}}
+\def\numberedsubseczzz#1{%
+  \global\subsubsecno=0  \global\advance\subsecno by 1
+  \sectionheading{#1}{subsec}{Ynumbered}{\the\chapno.\the\secno.\the\subsecno}%
+}
+
+% normally calls appendixsubseczzz:
+\outer\parseargdef\appendixsubsec{\apphead2{#1}}
+\def\appendixsubseczzz#1{%
+  \global\subsubsecno=0  \global\advance\subsecno by 1
+  \sectionheading{#1}{subsec}{Yappendix}%
+                 {\appendixletter.\the\secno.\the\subsecno}%
+}
+
+% normally calls unnumberedsubseczzz:
+\outer\parseargdef\unnumberedsubsec{\unnmhead2{#1}}
+\def\unnumberedsubseczzz#1{%
+  \global\subsubsecno=0  \global\advance\subsecno by 1
+  \sectionheading{#1}{subsec}{Ynothing}%
+                 {\the\unnumberedno.\the\secno.\the\subsecno}%
+}
+
+% Subsubsections.
+% 
+% normally numberedsubsubseczzz:
+\outer\parseargdef\numberedsubsubsec{\numhead3{#1}}
+\def\numberedsubsubseczzz#1{%
+  \global\advance\subsubsecno by 1
+  \sectionheading{#1}{subsubsec}{Ynumbered}%
+                 {\the\chapno.\the\secno.\the\subsecno.\the\subsubsecno}%
+}
+
+% normally appendixsubsubseczzz:
+\outer\parseargdef\appendixsubsubsec{\apphead3{#1}}
+\def\appendixsubsubseczzz#1{%
+  \global\advance\subsubsecno by 1
+  \sectionheading{#1}{subsubsec}{Yappendix}%
+                 {\appendixletter.\the\secno.\the\subsecno.\the\subsubsecno}%
+}
+
+% normally unnumberedsubsubseczzz:
+\outer\parseargdef\unnumberedsubsubsec{\unnmhead3{#1}}
+\def\unnumberedsubsubseczzz#1{%
+  \global\advance\subsubsecno by 1
+  \sectionheading{#1}{subsubsec}{Ynothing}%
+                 {\the\unnumberedno.\the\secno.\the\subsecno.\the\subsubsecno}%
+}
+
+% These macros control what the section commands do, according
+% to what kind of chapter we are in (ordinary, appendix, or unnumbered).
+% Define them by default for a numbered chapter.
+\let\section = \numberedsec
+\let\subsection = \numberedsubsec
+\let\subsubsection = \numberedsubsubsec
+
+% Define @majorheading, @heading and @subheading
+
+\def\majorheading{%
+  {\advance\chapheadingskip by 10pt \chapbreak }%
+  \parsearg\chapheadingzzz
+}
+
+\def\chapheading{\chapbreak \parsearg\chapheadingzzz}
+\def\chapheadingzzz#1{%
+  \vbox{\chapfonts \raggedtitlesettings #1\par}%
+  \nobreak\bigskip \nobreak
+  \suppressfirstparagraphindent
+}
+
+% @heading, @subheading, @subsubheading.
+\parseargdef\heading{\sectionheading{#1}{sec}{Yomitfromtoc}{}
+  \suppressfirstparagraphindent}
+\parseargdef\subheading{\sectionheading{#1}{subsec}{Yomitfromtoc}{}
+  \suppressfirstparagraphindent}
+\parseargdef\subsubheading{\sectionheading{#1}{subsubsec}{Yomitfromtoc}{}
+  \suppressfirstparagraphindent}
+
+% These macros generate a chapter, section, etc. heading only
+% (including whitespace, linebreaking, etc. around it),
+% given all the information in convenient, parsed form.
+
+% Args are the skip and penalty (usually negative)
+\def\dobreak#1#2{\par\ifdim\lastskip<#1\removelastskip\penalty#2\vskip#1\fi}
+
+% Parameter controlling skip before chapter headings (if needed)
+\newskip\chapheadingskip
+
+% Define plain chapter starts, and page on/off switching for it.
+\def\chapbreak{\dobreak \chapheadingskip {-4000}}
+
+% Start a new page
+\def\chappager{\par\vfill\supereject}
+
+% \chapoddpage - start on an odd page for a new chapter
+% Because \domark is called before \chapoddpage, the filler page will
+% get the headings for the next chapter, which is wrong.  But we don't
+% care -- we just disable all headings on the filler page.
+\def\chapoddpage{%
+  \chappager
+  \ifodd\pageno \else
+    \begingroup
+      \headingsoff
+      \null
+      \chappager
+    \endgroup
+  \fi
+}
+
+\parseargdef\setchapternewpage{\csname CHAPPAG#1\endcsname}
+
+\def\CHAPPAGoff{%
+\global\let\contentsalignmacro = \chappager
+\global\let\pchapsepmacro=\chapbreak
+\global\def\HEADINGSon{\HEADINGSsinglechapoff}}
+
+\def\CHAPPAGon{%
+\global\let\contentsalignmacro = \chappager
+\global\let\pchapsepmacro=\chappager
+\global\def\HEADINGSon{\HEADINGSsingle}}
+
+\def\CHAPPAGodd{%
+\global\let\contentsalignmacro = \chapoddpage
+\global\let\pchapsepmacro=\chapoddpage
+\global\def\HEADINGSon{\HEADINGSdouble}}
+
+\CHAPPAGon
+
+% \chapmacro - Chapter opening.
+%
+% #1 is the text, #2 is the section type (Ynumbered, Ynothing,
+% Yappendix, Yomitfromtoc), #3 the chapter number.
+% Not used for @heading series.
+%
+% To test against our argument.
+\def\Ynothingkeyword{Ynothing}
+\def\Yappendixkeyword{Yappendix}
+\def\Yomitfromtockeyword{Yomitfromtoc}
+%
+\def\chapmacro#1#2#3{%
+  \expandafter\ifx\thisenv\titlepage\else
+    \checkenv{}% chapters, etc., should not start inside an environment.
+  \fi
+  % Insert the first mark before the heading break (see notes for \domark).
+  \let\prevchapterdefs=\currentchapterdefs
+  \let\prevsectiondefs=\currentsectiondefs
+  \gdef\currentsectiondefs{\gdef\thissectionname{}\gdef\thissectionnum{}%
+                        \gdef\thissection{}}%
+  %
+  \def\temptype{#2}%
+  \ifx\temptype\Ynothingkeyword
+    \gdef\currentchapterdefs{\gdef\thischaptername{#1}\gdef\thischapternum{}%
+                          \gdef\thischapter{\thischaptername}}%
+  \else\ifx\temptype\Yomitfromtockeyword
+    \gdef\currentchapterdefs{\gdef\thischaptername{#1}\gdef\thischapternum{}%
+                          \gdef\thischapter{}}%
+  \else\ifx\temptype\Yappendixkeyword
+    \toks0={#1}%
+    \xdef\currentchapterdefs{%
+      \gdef\noexpand\thischaptername{\the\toks0}%
+      \gdef\noexpand\thischapternum{\appendixletter}%
+      % \noexpand\putwordAppendix avoids expanding indigestible
+      % commands in some of the translations.
+      \gdef\noexpand\thischapter{\noexpand\putwordAppendix{}
+                                 \noexpand\thischapternum:
+                                 \noexpand\thischaptername}%
+    }%
+  \else
+    \toks0={#1}%
+    \xdef\currentchapterdefs{%
+      \gdef\noexpand\thischaptername{\the\toks0}%
+      \gdef\noexpand\thischapternum{\the\chapno}%
+      % \noexpand\putwordChapter avoids expanding indigestible
+      % commands in some of the translations.
+      \gdef\noexpand\thischapter{\noexpand\putwordChapter{}
+                                 \noexpand\thischapternum:
+                                 \noexpand\thischaptername}%
+    }%
+  \fi\fi\fi
+  %
+  % Output the mark.  Pass it through \safewhatsit, to take care of
+  % the preceding space.
+  \safewhatsit\domark
+  %
+  % Insert the chapter heading break.
+  \pchapsepmacro
+  %
+  % Now the second mark, after the heading break.  No break points
+  % between here and the heading.
+  \let\prevchapterdefs=\currentchapterdefs
+  \let\prevsectiondefs=\currentsectiondefs
+  \domark
+  %
+  {%
+    \chapfonts \rm
+    \let\footnote=\errfootnoteheading % give better error message
+    %
+    % Have to define \currentsection before calling \donoderef, because the
+    % xref code eventually uses it.  On the other hand, it has to be called
+    % after \pchapsepmacro, or the headline will change too soon.
+    \gdef\currentsection{#1}%
+    %
+    % Only insert the separating space if we have a chapter/appendix
+    % number, and don't print the unnumbered ``number''.
+    \ifx\temptype\Ynothingkeyword
+      \setbox0 = \hbox{}%
+      \def\toctype{unnchap}%
+    \else\ifx\temptype\Yomitfromtockeyword
+      \setbox0 = \hbox{}% contents like unnumbered, but no toc entry
+      \def\toctype{omit}%
+    \else\ifx\temptype\Yappendixkeyword
+      \setbox0 = \hbox{\putwordAppendix{} #3\enspace}%
+      \def\toctype{app}%
+    \else
+      \setbox0 = \hbox{#3\enspace}%
+      \def\toctype{numchap}%
+    \fi\fi\fi
+    %
+    % Write the toc entry for this chapter.  Must come before the
+    % \donoderef, because we include the current node name in the toc
+    % entry, and \donoderef resets it to empty.
+    \writetocentry{\toctype}{#1}{#3}%
+    %
+    % For pdftex, we have to write out the node definition (aka, make
+    % the pdfdest) after any page break, but before the actual text has
+    % been typeset.  If the destination for the pdf outline is after the
+    % text, then jumping from the outline may wind up with the text not
+    % being visible, for instance under high magnification.
+    \donoderef{#2}%
+    %
+    % Typeset the actual heading.
+    \nobreak % Avoid page breaks at the interline glue.
+    \vbox{\raggedtitlesettings \hangindent=\wd0 \centerparametersmaybe
+          \unhbox0 #1\par}%
+  }%
+  \nobreak\bigskip % no page break after a chapter title
+  \nobreak
+}
+
+% @centerchap -- centered and unnumbered.
+\let\centerparametersmaybe = \relax
+\def\centerparameters{%
+  \advance\rightskip by 3\rightskip
+  \leftskip = \rightskip
+  \parfillskip = 0pt
+}
+
+
+% Section titles.  These macros combine the section number parts and
+% call the generic \sectionheading to do the printing.
+%
+\newskip\secheadingskip
+\def\secheadingbreak{\dobreak \secheadingskip{-1000}}
+
+% Subsection titles.
+\newskip\subsecheadingskip
+\def\subsecheadingbreak{\dobreak \subsecheadingskip{-500}}
+
+% Subsubsection titles.
+\def\subsubsecheadingskip{\subsecheadingskip}
+\def\subsubsecheadingbreak{\subsecheadingbreak}
+
+
+% Print any size, any type, section title.
+%
+% #1 is the text of the title,
+% #2 is the section level (sec/subsec/subsubsec),
+% #3 is the section type (Ynumbered, Ynothing, Yappendix, Yomitfromtoc),
+% #4 is the section number.
+%
+\def\seckeyword{sec}
+%
+\def\sectionheading#1#2#3#4{%
+  {%
+    \def\sectionlevel{#2}%
+    \def\temptype{#3}%
+    %
+    % It is ok for the @heading series commands to appear inside an
+    % environment (it's been historically allowed, though the logic is
+    % dubious), but not the others.
+    \ifx\temptype\Yomitfromtockeyword\else
+      \checkenv{}% non-@*heading should not be in an environment.
+    \fi
+    \let\footnote=\errfootnoteheading
+    %
+    % Switch to the right set of fonts.
+    \csname #2fonts\endcsname \rm
+    %
+    % Insert first mark before the heading break (see notes for \domark).
+    \let\prevsectiondefs=\currentsectiondefs
+    \ifx\temptype\Ynothingkeyword
+      \ifx\sectionlevel\seckeyword
+        \gdef\currentsectiondefs{\gdef\thissectionname{#1}\gdef\thissectionnum{}%
+                              \gdef\thissection{\thissectionname}}%
+      \fi
+    \else\ifx\temptype\Yomitfromtockeyword
+      % Don't redefine \thissection.
+    \else\ifx\temptype\Yappendixkeyword
+      \ifx\sectionlevel\seckeyword
+        \toks0={#1}%
+        \xdef\currentsectiondefs{%
+          \gdef\noexpand\thissectionname{\the\toks0}%
+          \gdef\noexpand\thissectionnum{#4}%
+          % \noexpand\putwordSection avoids expanding indigestible
+          % commands in some of the translations.
+          \gdef\noexpand\thissection{\noexpand\putwordSection{}
+                                     \noexpand\thissectionnum:
+                                     \noexpand\thissectionname}%
+        }%
+      \fi
+    \else
+      \ifx\sectionlevel\seckeyword
+        \toks0={#1}%
+        \xdef\currentsectiondefs{%
+          \gdef\noexpand\thissectionname{\the\toks0}%
+          \gdef\noexpand\thissectionnum{#4}%
+          % \noexpand\putwordSection avoids expanding indigestible
+          % commands in some of the translations.
+          \gdef\noexpand\thissection{\noexpand\putwordSection{}
+                                     \noexpand\thissectionnum:
+                                     \noexpand\thissectionname}%
+        }%
+      \fi
+    \fi\fi\fi
+    %
+    % Go into vertical mode.  Usually we'll already be there, but we
+    % don't want the following whatsit to end up in a preceding paragraph
+    % if the document didn't happen to have a blank line.
+    \par
+    %
+    % Output the mark.  Pass it through \safewhatsit, to take care of
+    % the preceding space.
+    \safewhatsit\domark
+    %
+    % Insert space above the heading.
+    \csname #2headingbreak\endcsname
+    %
+    % Now the second mark, after the heading break.  No break points
+    % between here and the heading.
+    \global\let\prevsectiondefs=\currentsectiondefs
+    \domark
+    %
+    % Only insert the space after the number if we have a section number.
+    \ifx\temptype\Ynothingkeyword
+      \setbox0 = \hbox{}%
+      \def\toctype{unn}%
+      \gdef\currentsection{#1}%
+    \else\ifx\temptype\Yomitfromtockeyword
+      % for @headings -- no section number, don't include in toc,
+      % and don't redefine \currentsection.
+      \setbox0 = \hbox{}%
+      \def\toctype{omit}%
+      \let\sectionlevel=\empty
+    \else\ifx\temptype\Yappendixkeyword
+      \setbox0 = \hbox{#4\enspace}%
+      \def\toctype{app}%
+      \gdef\currentsection{#1}%
+    \else
+      \setbox0 = \hbox{#4\enspace}%
+      \def\toctype{num}%
+      \gdef\currentsection{#1}%
+    \fi\fi\fi
+    %
+    % Write the toc entry (before \donoderef).  See comments in \chapmacro.
+    \writetocentry{\toctype\sectionlevel}{#1}{#4}%
+    %
+    % Write the node reference (= pdf destination for pdftex).
+    % Again, see comments in \chapmacro.
+    \donoderef{#3}%
+    %
+    % Interline glue will be inserted when the vbox is completed.
+    % That glue will be a valid breakpoint for the page, since it'll be
+    % preceded by a whatsit (usually from the \donoderef, or from the
+    % \writetocentry if there was no node).  We don't want to allow that
+    % break, since then the whatsits could end up on page n while the
+    % section is on page n+1, thus toc/etc. are wrong.  Debian bug 276000.
+    \nobreak
+    %
+    % Output the actual section heading.
+    \vbox{\hyphenpenalty=10000 \tolerance=5000 \parindent=0pt \ptexraggedright
+          \hangindent=\wd0  % zero if no section number
+          \unhbox0 #1}%
+  }%
+  % Add extra space after the heading -- half of whatever came above it.
+  % Don't allow stretch, though.
+  \kern .5 \csname #2headingskip\endcsname
+  %
+  % Do not let the kern be a potential breakpoint, as it would be if it
+  % was followed by glue.
+  \nobreak
+  %
+  % We'll almost certainly start a paragraph next, so don't let that
+  % glue accumulate.  (Not a breakpoint because it's preceded by a
+  % discardable item.)  However, when a paragraph is not started next
+  % (\startdefun, \cartouche, \center, etc.), this needs to be wiped out
+  % or the negative glue will cause weirdly wrong output, typically
+  % obscuring the section heading with something else.
+  \vskip-\parskip
+  %
+  % This is so the last item on the main vertical list is a known
+  % \penalty > 10000, so \startdefun, etc., can recognize the situation
+  % and do the needful.
+  \penalty 10001
+}
+
+
+\message{toc,}
+% Table of contents.
+\newwrite\tocfile
+
+% Write an entry to the toc file, opening it if necessary.
+% Called from @chapter, etc.
+%
+% Example usage: \writetocentry{sec}{Section Name}{\the\chapno.\the\secno}
+% We append the current node name (if any) and page number as additional
+% arguments for the \{chap,sec,...}entry macros which will eventually
+% read this.  The node name is used in the pdf outlines as the
+% destination to jump to.
+%
+% We open the .toc file for writing here instead of at @setfilename (or
+% any other fixed time) so that @contents can be anywhere in the document.
+% But if #1 is `omit', then we don't do anything.  This is used for the
+% table of contents chapter openings themselves.
+%
+\newif\iftocfileopened
+\def\omitkeyword{omit}%
+%
+\def\writetocentry#1#2#3{%
+  \edef\writetoctype{#1}%
+  \ifx\writetoctype\omitkeyword \else
+    \iftocfileopened\else
+      \immediate\openout\tocfile = \jobname.toc
+      \global\tocfileopenedtrue
+    \fi
+    %
+    \iflinks
+      {\atdummies
+       \edef\temp{%
+         \write\tocfile{@#1entry{#2}{#3}{\lastnode}{\noexpand\folio}}}%
+       \temp
+      }%
+    \fi
+  \fi
+  %
+  % Tell \shipout to create a pdf destination on each page, if we're
+  % writing pdf.  These are used in the table of contents.  We can't
+  % just write one on every page because the title pages are numbered
+  % 1 and 2 (the page numbers aren't printed), and so are the first
+  % two pages of the document.  Thus, we'd have two destinations named
+  % `1', and two named `2'.
+  \ifpdforxetex
+    \global\pdfmakepagedesttrue
+  \fi
+}
+
+
+% These characters do not print properly in the Computer Modern roman
+% fonts, so we must take special care.  This is more or less redundant
+% with the Texinfo input format setup at the end of this file.
+%
+\def\activecatcodes{%
+  \catcode`\"=\active
+  \catcode`\$=\active
+  \catcode`\<=\active
+  \catcode`\>=\active
+  \catcode`\\=\active
+  \catcode`\^=\active
+  \catcode`\_=\active
+  \catcode`\|=\active
+  \catcode`\~=\active
+}
+
+
+% Read the toc file, which is essentially Texinfo input.
+\def\readtocfile{%
+  \setupdatafile
+  \activecatcodes
+  \input \tocreadfilename
+}
+
+\newskip\contentsrightmargin \contentsrightmargin=1in
+\newcount\savepageno
+\newcount\lastnegativepageno \lastnegativepageno = -1
+
+% Prepare to read what we've written to \tocfile.
+%
+\def\startcontents#1{%
+  % If @setchapternewpage on, and @headings double, the contents should
+  % start on an odd page, unlike chapters.
+  \contentsalignmacro
+  \immediate\closeout\tocfile
+  %
+  % Don't need to put `Contents' or `Short Contents' in the headline.
+  % It is abundantly clear what they are.
+  \chapmacro{#1}{Yomitfromtoc}{}%
+  %
+  \savepageno = \pageno
+  \begingroup                  % Set up to handle contents files properly.
+    \raggedbottom              % Worry more about breakpoints than the bottom.
+    \entryrightmargin=\contentsrightmargin % Don't use the full line length.
+    %
+    % Roman numerals for page numbers.
+    \ifnum \pageno>0 \global\pageno = \lastnegativepageno \fi
+    \def\thistitle{}% no title in double-sided headings
+    % Record where the Roman numerals started.
+    \ifnum\romancount=0 \global\romancount=\pagecount \fi
+}
+
+% redefined for the two-volume lispref.  We always output on
+% \jobname.toc even if this is redefined.
+%
+\def\tocreadfilename{\jobname.toc}
+
+% Normal (long) toc.
+%
+\def\contents{%
+  \startcontents{\putwordTOC}%
+    \openin 1 \tocreadfilename\space
+    \ifeof 1 \else
+      \readtocfile
+    \fi
+    \vfill \eject
+    \contentsalignmacro % in case @setchapternewpage odd is in effect
+    \ifeof 1 \else
+      \pdfmakeoutlines
+    \fi
+    \closein 1
+  \endgroup
+  \contentsendroman
+}
+
+% And just the chapters.
+\def\summarycontents{%
+  \startcontents{\putwordShortTOC}%
+    %
+    \let\partentry = \shortpartentry
+    \let\numchapentry = \shortchapentry
+    \let\appentry = \shortchapentry
+    \let\unnchapentry = \shortunnchapentry
+    % We want a true roman here for the page numbers.
+    \secfonts
+    \let\rm=\shortcontrm \let\bf=\shortcontbf
+    \let\sl=\shortcontsl \let\tt=\shortconttt
+    \rm
+    \hyphenpenalty = 10000
+    \advance\baselineskip by 1pt % Open it up a little.
+    \def\numsecentry##1##2##3##4{}
+    \let\appsecentry = \numsecentry
+    \let\unnsecentry = \numsecentry
+    \let\numsubsecentry = \numsecentry
+    \let\appsubsecentry = \numsecentry
+    \let\unnsubsecentry = \numsecentry
+    \let\numsubsubsecentry = \numsecentry
+    \let\appsubsubsecentry = \numsecentry
+    \let\unnsubsubsecentry = \numsecentry
+    \openin 1 \tocreadfilename\space
+    \ifeof 1 \else
+      \readtocfile
+    \fi
+    \closein 1
+    \vfill \eject
+    \contentsalignmacro % in case @setchapternewpage odd is in effect
+  \endgroup
+  \contentsendroman
+}
+\let\shortcontents = \summarycontents
+
+% Get ready to use Arabic numerals again
+\def\contentsendroman{%
+  \lastnegativepageno = \pageno
+  \global\pageno = \savepageno
+  %
+  % If \romancount > \arabiccount, the contents are at the end of the
+  % document.  Otherwise, advance where the Arabic numerals start for
+  % the page numbers.
+  \ifnum\romancount>\arabiccount\else\global\arabiccount=\pagecount\fi
+}
+
+% Typeset the label for a chapter or appendix for the short contents.
+% The arg is, e.g., `A' for an appendix, or `3' for a chapter.
+%
+\def\shortchaplabel#1{%
+  % This space should be enough, since a single number is .5em, and the
+  % widest letter (M) is 1em, at least in the Computer Modern fonts.
+  % But use \hss just in case.
+  % (This space doesn't include the extra space that gets added after
+  % the label; that gets put in by \shortchapentry above.)
+  %
+  % We'd like to right-justify chapter numbers, but that looks strange
+  % with appendix letters.  And right-justifying numbers and
+  % left-justifying letters looks strange when there is less than 10
+  % chapters.  Have to read the whole toc once to know how many chapters
+  % there are before deciding ...
+  \hbox to 1em{#1\hss}%
+}
+
+% These macros generate individual entries in the table of contents.
+% The first argument is the chapter or section name.
+% The last argument is the page number.
+% The arguments in between are the chapter number, section number, ...
+
+% Parts, in the main contents.  Replace the part number, which doesn't
+% exist, with an empty box.  Let's hope all the numbers have the same width.
+% Also ignore the page number, which is conventionally not printed.
+\def\numeralbox{\setbox0=\hbox{8}\hbox to \wd0{\hfil}}
+\def\partentry#1#2#3#4{%
+  % Add stretch and a bonus for breaking the page before the part heading.
+  % This reduces the chance of the page being broken immediately after the
+  % part heading, before a following chapter heading.
+  \vskip 0pt plus 5\baselineskip
+  \penalty-300
+  \vskip 0pt plus -5\baselineskip
+  \dochapentry{\numeralbox\labelspace#1}{}%
+}
+%
+% Parts, in the short toc.
+\def\shortpartentry#1#2#3#4{%
+  \penalty-300
+  \vskip.5\baselineskip plus.15\baselineskip minus.1\baselineskip
+  \shortchapentry{{\bf #1}}{\numeralbox}{}{}%
+}
+
+% Chapters, in the main contents.
+\def\numchapentry#1#2#3#4{\dochapentry{#2\labelspace#1}{#4}}
+
+% Chapters, in the short toc.
+% See comments in \dochapentry re vbox and related settings.
+\def\shortchapentry#1#2#3#4{%
+  \tocentry{\shortchaplabel{#2}\labelspace #1}{\doshortpageno\bgroup#4\egroup}%
+}
+
+% Appendices, in the main contents.
+% Need the word Appendix, and a fixed-size box.
+%
+\def\appendixbox#1{%
+  % We use M since it's probably the widest letter.
+  \setbox0 = \hbox{\putwordAppendix{} M}%
+  \hbox to \wd0{\putwordAppendix{} #1\hss}}
+%
+\def\appentry#1#2#3#4{\dochapentry{\appendixbox{#2}\hskip.7em#1}{#4}}
+
+% Unnumbered chapters.
+\def\unnchapentry#1#2#3#4{\dochapentry{#1}{#4}}
+\def\shortunnchapentry#1#2#3#4{\tocentry{#1}{\doshortpageno\bgroup#4\egroup}}
+
+% Sections.
+\def\numsecentry#1#2#3#4{\dosecentry{#2\labelspace#1}{#4}}
+\let\appsecentry=\numsecentry
+\def\unnsecentry#1#2#3#4{\dosecentry{#1}{#4}}
+
+% Subsections.
+\def\numsubsecentry#1#2#3#4{\dosubsecentry{#2\labelspace#1}{#4}}
+\let\appsubsecentry=\numsubsecentry
+\def\unnsubsecentry#1#2#3#4{\dosubsecentry{#1}{#4}}
+
+% And subsubsections.
+\def\numsubsubsecentry#1#2#3#4{\dosubsubsecentry{#2\labelspace#1}{#4}}
+\let\appsubsubsecentry=\numsubsubsecentry
+\def\unnsubsubsecentry#1#2#3#4{\dosubsubsecentry{#1}{#4}}
+
+% This parameter controls the indentation of the various levels.
+% Same as \defaultparindent.
+\newdimen\tocindent \tocindent = 15pt
+
+% Now for the actual typesetting. In all these, #1 is the text and #2 is the
+% page number.
+%
+% If the toc has to be broken over pages, we want it to be at chapters
+% if at all possible; hence the \penalty.
+\def\dochapentry#1#2{%
+   \penalty-300 \vskip1\baselineskip plus.33\baselineskip minus.25\baselineskip
+   \begingroup
+     % Move the page numbers slightly to the right
+     \advance\entryrightmargin by -0.05em
+     \chapentryfonts
+     \tocentry{#1}{\dopageno\bgroup#2\egroup}%
+   \endgroup
+   \nobreak\vskip .25\baselineskip plus.1\baselineskip
+}
+
+\def\dosecentry#1#2{\begingroup
+  \secentryfonts \leftskip=\tocindent
+  \tocentry{#1}{\dopageno\bgroup#2\egroup}%
+\endgroup}
+
+\def\dosubsecentry#1#2{\begingroup
+  \subsecentryfonts \leftskip=2\tocindent
+  \tocentry{#1}{\dopageno\bgroup#2\egroup}%
+\endgroup}
+
+\def\dosubsubsecentry#1#2{\begingroup
+  \subsubsecentryfonts \leftskip=3\tocindent
+  \tocentry{#1}{\dopageno\bgroup#2\egroup}%
+\endgroup}
+
+% We use the same \entry macro as for the index entries.
+\let\tocentry = \entry
+
+% Space between chapter (or whatever) number and the title.
+\def\labelspace{\hskip1em \relax}
+
+\def\dopageno#1{{\rm #1}}
+\def\doshortpageno#1{{\rm #1}}
+
+\def\chapentryfonts{\secfonts \rm}
+\def\secentryfonts{\textfonts}
+\def\subsecentryfonts{\textfonts}
+\def\subsubsecentryfonts{\textfonts}
+
+
+\message{environments,}
+% @foo ... @end foo.
+
+% @tex ... @end tex    escapes into raw TeX temporarily.
+% One exception: @ is still an escape character, so that @end tex works.
+% But \@ or @@ will get a plain @ character.
+
+\envdef\tex{%
+  \setregularquotes
+  \catcode `\\=0 \catcode `\{=1 \catcode `\}=2
+  \catcode `\$=3 \catcode `\&=4 \catcode `\#=6
+  \catcode `\^=7 \catcode `\_=8 \catcode `\~=\active \let~=\tie
+  \catcode `\%=14
+  \catcode `\+=\other
+  \catcode `\"=\other
+  \catcode `\|=\other
+  \catcode `\<=\other
+  \catcode `\>=\other
+  \catcode `\`=\other
+  \catcode `\'=\other
+  %
+  % ' is active in math mode (mathcode"8000).  So reset it, and all our
+  % other math active characters (just in case), to plain's definitions.
+  \mathactive
+  %
+  % Inverse of the list at the beginning of the file.
+  \let\b=\ptexb
+  \let\bullet=\ptexbullet
+  \let\c=\ptexc
+  \let\,=\ptexcomma
+  \let\.=\ptexdot
+  \let\dots=\ptexdots
+  \let\equiv=\ptexequiv
+  \let\!=\ptexexclam
+  \let\i=\ptexi
+  \let\indent=\ptexindent
+  \let\noindent=\ptexnoindent
+  \let\{=\ptexlbrace
+  \let\+=\tabalign
+  \let\}=\ptexrbrace
+  \let\/=\ptexslash
+  \let\sp=\ptexsp
+  \let\*=\ptexstar
+  %\let\sup=\ptexsup % do not redefine, we want @sup to work in math mode
+  \let\t=\ptext
+  \expandafter \let\csname top\endcsname=\ptextop  % we've made it outer
+  \let\frenchspacing=\plainfrenchspacing
+  %
+  \def\endldots{\mathinner{\ldots\ldots\ldots\ldots}}%
+  \def\enddots{\relax\ifmmode\endldots\else$\mathsurround=0pt \endldots\,$\fi}%
+  \def\@{@}%
+}
+% There is no need to define \Etex.
+
+% Define @lisp ... @end lisp.
+% @lisp environment forms a group so it can rebind things,
+% including the definition of @end lisp (which normally is erroneous).
+
+% Amount to narrow the margins by for @lisp.
+\newskip\lispnarrowing \lispnarrowing=0.4in
+
+% This is the definition that ^^M gets inside @lisp, @example, and other
+% such environments.  \null is better than a space, since it doesn't
+% have any width.
+\def\lisppar{\null\endgraf}
+
+% This space is always present above and below environments.
+\newskip\envskipamount \envskipamount = 0pt
+
+% Make spacing and below environment symmetrical.  We use \parskip here
+% to help in doing that, since in @example-like environments \parskip
+% is reset to zero; thus the \afterenvbreak inserts no space -- but the
+% start of the next paragraph will insert \parskip.
+%
+\def\aboveenvbreak{{%
+  % =10000 instead of <10000 because of a special case in \itemzzz and
+  % \sectionheading, q.v.
+  \ifnum \lastpenalty=10000 \else
+    \advance\envskipamount by \parskip
+    \endgraf
+    \ifdim\lastskip<\envskipamount
+      \removelastskip
+      \ifnum\lastpenalty<10000
+        % Penalize breaking before the environment, because preceding text
+        % often leads into it.
+        \penalty100
+      \fi
+      \vskip\envskipamount
+    \fi
+  \fi
+}}
+
+\def\afterenvbreak{{%
+  % =10000 instead of <10000 because of a special case in \itemzzz and
+  % \sectionheading, q.v.
+  \ifnum \lastpenalty=10000 \else
+    \advance\envskipamount by \parskip
+    \endgraf
+    \ifdim\lastskip<\envskipamount
+      \removelastskip
+      % it's not a good place to break if the last penalty was \nobreak
+      % or better ...
+      \ifnum\lastpenalty<10000 \penalty-50 \fi
+      \vskip\envskipamount
+    \fi
+  \fi
+}}
+
+% \nonarrowing is a flag.  If "set", @lisp etc don't narrow margins; it will
+% also clear it, so that its embedded environments do the narrowing again.
+\let\nonarrowing=\relax
+
+% @cartouche ... @end cartouche: draw rectangle w/rounded corners around
+% environment contents.
+
+%
+\def\ctl{{\circle\char'013\hskip -6pt}}% 6pt from pl file: 1/2charwidth
+\def\ctr{{\hskip 6pt\circle\char'010}}
+\def\cbl{{\circle\char'012\hskip -6pt}}
+\def\cbr{{\hskip 6pt\circle\char'011}}
+\def\carttop{\hbox to \cartouter{\hskip\lskip
+        \ctl\leaders\hrule height\circthick\hfil\ctr
+        \hskip\rskip}}
+\def\cartbot{\hbox to \cartouter{\hskip\lskip
+        \cbl\leaders\hrule height\circthick\hfil\cbr
+        \hskip\rskip}}
+%
+\newskip\lskip\newskip\rskip
+
+% only require the font if @cartouche is actually used
+\def\cartouchefontdefs{%
+  \font\circle=lcircle10\relax
+  \circthick=\fontdimen8\circle
+}
+\newdimen\circthick
+\newdimen\cartouter\newdimen\cartinner
+\newskip\normbskip\newskip\normpskip\newskip\normlskip
+
+
+\envdef\cartouche{%
+  \cartouchefontdefs
+  \ifhmode\par\fi  % can't be in the midst of a paragraph.
+  \startsavinginserts
+  \lskip=\leftskip \rskip=\rightskip
+  \leftskip=0pt\rightskip=0pt % we want these *outside*.
+  \cartinner=\hsize \advance\cartinner by-\lskip
+  \advance\cartinner by-\rskip
+  \cartouter=\hsize
+  \advance\cartouter by 18.4pt	% allow for 3pt kerns on either
+				% side, and for 6pt waste from
+				% each corner char, and rule thickness
+  \normbskip=\baselineskip \normpskip=\parskip \normlskip=\lineskip
+  %
+  % If this cartouche directly follows a sectioning command, we need the
+  % \parskip glue (backspaced over by default) or the cartouche can
+  % collide with the section heading.
+  \ifnum\lastpenalty>10000 \vskip\parskip \penalty\lastpenalty \fi
+  %
+  \setbox\groupbox=\vbox\bgroup
+      \baselineskip=0pt\parskip=0pt\lineskip=0pt
+      \carttop
+      \hbox\bgroup
+	  \hskip\lskip
+	  \vrule\kern3pt
+	  \vbox\bgroup
+	      \kern3pt
+	      \hsize=\cartinner
+	      \baselineskip=\normbskip
+	      \lineskip=\normlskip
+	      \parskip=\normpskip
+	      \vskip -\parskip
+	      \comment % For explanation, see the end of def\group.
+}
+\def\Ecartouche{%
+              \ifhmode\par\fi
+	      \kern3pt
+	  \egroup
+	  \kern3pt\vrule
+	  \hskip\rskip
+      \egroup
+      \cartbot
+  \egroup
+  \addgroupbox
+  \checkinserts
+}
+
+
+% This macro is called at the beginning of all the @example variants,
+% inside a group.
+\newdimen\nonfillparindent
+\def\nonfillstart{%
+  \aboveenvbreak
+  \ifdim\hfuzz < 12pt \hfuzz = 12pt \fi % Don't be fussy
+  \sepspaces % Make spaces be word-separators rather than space tokens.
+  \let\par = \lisppar % don't ignore blank lines
+  \obeylines % each line of input is a line of output
+  \parskip = 0pt
+  % Turn off paragraph indentation but redefine \indent to emulate
+  % the normal \indent.
+  \nonfillparindent=\parindent
+  \parindent = 0pt
+  \let\indent\nonfillindent
+  %
+  \emergencystretch = 0pt % don't try to avoid overfull boxes
+  \ifx\nonarrowing\relax
+    \advance \leftskip by \lispnarrowing
+    \exdentamount=\lispnarrowing
+  \else
+    \let\nonarrowing = \relax
+  \fi
+  \let\exdent=\nofillexdent
+}
+
+\begingroup
+\obeyspaces
+% We want to swallow spaces (but not other tokens) after the fake
+% @indent in our nonfill-environments, where spaces are normally
+% active and set to @tie, resulting in them not being ignored after
+% @indent.
+\gdef\nonfillindent{\futurelet\temp\nonfillindentcheck}%
+\gdef\nonfillindentcheck{%
+\ifx\temp %
+\expandafter\nonfillindentgobble%
+\else%
+\leavevmode\nonfillindentbox%
+\fi%
+}%
+\endgroup
+\def\nonfillindentgobble#1{\nonfillindent}
+\def\nonfillindentbox{\hbox to \nonfillparindent{\hss}}
+
+% If you want all examples etc. small: @set dispenvsize small.
+% If you want even small examples the full size: @set dispenvsize nosmall.
+% This affects the following displayed environments:
+%    @example, @display, @format, @lisp, @verbatim
+%
+\def\smallword{small}
+\def\nosmallword{nosmall}
+\let\SETdispenvsize\relax
+\def\setnormaldispenv{%
+  \ifx\SETdispenvsize\smallword
+    % end paragraph for sake of leading, in case document has no blank
+    % line.  This is redundant with what happens in \aboveenvbreak, but
+    % we need to do it before changing the fonts, and it's inconvenient
+    % to change the fonts afterward.
+    \ifnum \lastpenalty=10000 \else \endgraf \fi
+    \smallexamplefonts \rm
+  \fi
+}
+\def\setsmalldispenv{%
+  \ifx\SETdispenvsize\nosmallword
+  \else
+    \ifnum \lastpenalty=10000 \else \endgraf \fi
+    \smallexamplefonts \rm
+  \fi
+}
+
+% We often define two environments, @foo and @smallfoo.
+% Let's do it in one command.  #1 is the env name, #2 the definition.
+\def\makedispenvdef#1#2{%
+  \expandafter\envdef\csname#1\endcsname {\setnormaldispenv #2}%
+  \expandafter\envdef\csname small#1\endcsname {\setsmalldispenv #2}%
+  \expandafter\let\csname E#1\endcsname \afterenvbreak
+  \expandafter\let\csname Esmall#1\endcsname \afterenvbreak
+}
+
+% Define two environment synonyms (#1 and #2) for an environment.
+\def\maketwodispenvdef#1#2#3{%
+  \makedispenvdef{#1}{#3}%
+  \makedispenvdef{#2}{#3}%
+}
+%
+% @lisp: indented, narrowed, typewriter font;
+% @example: same as @lisp.
+%
+% @smallexample and @smalllisp: use smaller fonts.
+% Originally contributed by Pavel@xerox.
+%
+\maketwodispenvdef{lisp}{example}{%
+  \nonfillstart
+  \tt\setcodequotes
+  \let\kbdfont = \kbdexamplefont % Allow @kbd to do something special.
+  \parsearg\gobble
+}
+% @display/@smalldisplay: same as @lisp except keep current font.
+%
+\makedispenvdef{display}{%
+  \nonfillstart
+  \gobble
+}
+
+% @format/@smallformat: same as @display except don't narrow margins.
+%
+\makedispenvdef{format}{%
+  \let\nonarrowing = t%
+  \nonfillstart
+  \gobble
+}
+
+% @flushleft: same as @format, but doesn't obey \SETdispenvsize.
+\envdef\flushleft{%
+  \let\nonarrowing = t%
+  \nonfillstart
+  \gobble
+}
+\let\Eflushleft = \afterenvbreak
+
+% @flushright.
+%
+\envdef\flushright{%
+  \let\nonarrowing = t%
+  \nonfillstart
+  \advance\leftskip by 0pt plus 1fill\relax
+  \gobble
+}
+\let\Eflushright = \afterenvbreak
+
+
+% @raggedright does more-or-less normal line breaking but no right
+% justification.  From plain.tex.
+\envdef\raggedright{%
+  \rightskip0pt plus2.4em \spaceskip.3333em \xspaceskip.5em\relax
+}
+\let\Eraggedright\par
+
+\envdef\raggedleft{%
+  \parindent=0pt \leftskip0pt plus2em
+  \spaceskip.3333em \xspaceskip.5em \parfillskip=0pt
+  \hbadness=10000 % Last line will usually be underfull, so turn off
+                  % badness reporting.
+}
+\let\Eraggedleft\par
+
+\envdef\raggedcenter{%
+  \parindent=0pt \rightskip0pt plus1em \leftskip0pt plus1em
+  \spaceskip.3333em \xspaceskip.5em \parfillskip=0pt
+  \hbadness=10000 % Last line will usually be underfull, so turn off
+                  % badness reporting.
+}
+\let\Eraggedcenter\par
+
+
+% @quotation does normal linebreaking (hence we can't use \nonfillstart)
+% and narrows the margins.  We keep \parskip nonzero in general, since
+% we're doing normal filling.  So, when using \aboveenvbreak and
+% \afterenvbreak, temporarily make \parskip 0.
+%
+\makedispenvdef{quotation}{\quotationstart}
+%
+\def\quotationstart{%
+  \indentedblockstart % same as \indentedblock, but increase right margin too.
+  \ifx\nonarrowing\relax
+    \advance\rightskip by \lispnarrowing
+  \fi
+  \parsearg\quotationlabel
+}
+
+% We have retained a nonzero parskip for the environment, since we're
+% doing normal filling.
+%
+\def\Equotation{%
+  \par
+  \ifx\quotationauthor\thisisundefined\else
+    % indent a bit.
+    \leftline{\kern 2\leftskip \sl ---\quotationauthor}%
+  \fi
+  {\parskip=0pt \afterenvbreak}%
+}
+\def\Esmallquotation{\Equotation}
+
+% If we're given an argument, typeset it in bold with a colon after.
+\def\quotationlabel#1{%
+  \def\temp{#1}%
+  \ifx\temp\empty \else
+    {\bf #1: }%
+  \fi
+}
+
+% @indentedblock is like @quotation, but indents only on the left and
+% has no optional argument.
+% 
+\makedispenvdef{indentedblock}{\indentedblockstart}
+%
+\def\indentedblockstart{%
+  {\parskip=0pt \aboveenvbreak}% because \aboveenvbreak inserts \parskip
+  \parindent=0pt
+  %
+  % @cartouche defines \nonarrowing to inhibit narrowing at next level down.
+  \ifx\nonarrowing\relax
+    \advance\leftskip by \lispnarrowing
+    \exdentamount = \lispnarrowing
+  \else
+    \let\nonarrowing = \relax
+  \fi
+}
+
+% Keep a nonzero parskip for the environment, since we're doing normal filling.
+%
+\def\Eindentedblock{%
+  \par
+  {\parskip=0pt \afterenvbreak}%
+}
+\def\Esmallindentedblock{\Eindentedblock}
+
+
+% LaTeX-like @verbatim...@end verbatim and @verb{<char>...<char>}
+% If we want to allow any <char> as delimiter,
+% we need the curly braces so that makeinfo sees the @verb command, eg:
+% `@verbx...x' would look like the '@verbx' command.  --janneke@gnu.org
+%
+% [Knuth]: Donald Ervin Knuth, 1996.  The TeXbook.
+%
+% [Knuth] p.344; only we need to do the other characters Texinfo sets
+% active too.  Otherwise, they get lost as the first character on a
+% verbatim line.
+\def\dospecials{%
+  \do\ \do\\\do\{\do\}\do\$\do\&%
+  \do\#\do\^\do\^^K\do\_\do\^^A\do\%\do\~%
+  \do\<\do\>\do\|\do\@\do+\do\"%
+  % Don't do the quotes -- if we do, @set txicodequoteundirected and
+  % @set txicodequotebacktick will not have effect on @verb and
+  % @verbatim, and ?` and !` ligatures won't get disabled.
+  %\do\`\do\'%
+}
+%
+% [Knuth] p. 380
+\def\uncatcodespecials{%
+  \def\do##1{\catcode`##1=\other}\dospecials}
+%
+% Setup for the @verb command.
+%
+% Eight spaces for a tab
+\begingroup
+  \catcode`\^^I=\active
+  \gdef\tabeightspaces{\catcode`\^^I=\active\def^^I{\ \ \ \ \ \ \ \ }}
+\endgroup
+%
+\def\setupverb{%
+  \tt  % easiest (and conventionally used) font for verbatim
+  \def\par{\leavevmode\endgraf}%
+  \setcodequotes
+  \tabeightspaces
+  % Respect line breaks,
+  % print special symbols as themselves, and
+  % make each space count
+  % must do in this order:
+  \obeylines \uncatcodespecials \sepspaces
+}
+
+% Setup for the @verbatim environment
+%
+% Real tab expansion.
+\newdimen\tabw \setbox0=\hbox{\tt\space} \tabw=8\wd0 % tab amount
+%
+% We typeset each line of the verbatim in an \hbox, so we can handle
+% tabs.
+\newbox\verbbox
+\def\starttabbox{\setbox\verbbox=\hbox\bgroup}
+%
+\begingroup
+  \catcode`\^^I=\active
+  \gdef\tabexpand{%
+    \catcode`\^^I=\active
+    \def^^I{\leavevmode\egroup
+      \dimen\verbbox=\wd\verbbox % the width so far, or since the previous tab
+      \divide\dimen\verbbox by\tabw
+      \multiply\dimen\verbbox by\tabw % compute previous multiple of \tabw
+      \advance\dimen\verbbox by\tabw  % advance to next multiple of \tabw
+      \wd\verbbox=\dimen\verbbox
+      \leavevmode\box\verbbox \starttabbox
+    }%
+  }
+\endgroup
+
+% start the verbatim environment.
+\def\setupverbatim{%
+  \let\nonarrowing = t%
+  \nonfillstart
+  \tt % easiest (and conventionally used) font for verbatim
+  \def\par{\egroup\leavevmode\box\verbbox\endgraf\starttabbox}%
+  \tabexpand
+  \setcodequotes
+  % Respect line breaks,
+  % print special symbols as themselves, and
+  % make each space count.
+  % Must do in this order:
+  \obeylines \uncatcodespecials \sepspaces
+}
+
+% Do the @verb magic: verbatim text is quoted by unique
+% delimiter characters.  Before first delimiter expect a
+% right brace, after last delimiter expect closing brace:
+%
+%    \def\doverb'{'<char>#1<char>'}'{#1}
+%
+% [Knuth] p. 382; only eat outer {}
+\begingroup
+  \catcode`[=1\catcode`]=2\catcode`\{=\other\catcode`\}=\other
+  \gdef\doverb{#1[\def\next##1#1}[##1\endgroup]\next]
+\endgroup
+%
+\def\verb{\begingroup\setupverb\doverb}
+%
+%
+% Do the @verbatim magic: define the macro \doverbatim so that
+% the (first) argument ends when '@end verbatim' is reached, ie:
+%
+%     \def\doverbatim#1@end verbatim{#1}
+%
+% For Texinfo it's a lot easier than for LaTeX,
+% because texinfo's \verbatim doesn't stop at '\end{verbatim}':
+% we need not redefine '\', '{' and '}'.
+%
+% Inspired by LaTeX's verbatim command set [latex.ltx]
+%
+\begingroup
+  \catcode`\ =\active
+  \obeylines %
+  % ignore everything up to the first ^^M, that's the newline at the end
+  % of the @verbatim input line itself.  Otherwise we get an extra blank
+  % line in the output.
+  \xdef\doverbatim#1^^M#2@end verbatim{%
+    \starttabbox#2\egroup\noexpand\end\gobble verbatim}%
+  % We really want {...\end verbatim} in the body of the macro, but
+  % without the active space; thus we have to use \xdef and \gobble.
+  % The \egroup ends the \verbbox started at the end of the last line in
+  % the block.
+\endgroup
+%
+\envdef\verbatim{%
+    \setnormaldispenv\setupverbatim\doverbatim
+}
+\let\Everbatim = \afterenvbreak
+
+
+% @verbatiminclude FILE - insert text of file in verbatim environment.
+%
+\def\verbatiminclude{\parseargusing\filenamecatcodes\doverbatiminclude}
+%
+\def\doverbatiminclude#1{%
+  {%
+    \makevalueexpandable
+    \setupverbatim
+    {%
+      \indexnofonts       % Allow `@@' and other weird things in file names.
+      \wlog{texinfo.tex: doing @verbatiminclude of #1^^J}%
+      \edef\tmp{\noexpand\input #1 }
+      \expandafter
+    }\expandafter\starttabbox\tmp\egroup
+    \afterenvbreak
+  }%
+}
+
+% @copying ... @end copying.
+% Save the text away for @insertcopying later.
+%
+% We save the uninterpreted tokens, rather than creating a box.
+% Saving the text in a box would be much easier, but then all the
+% typesetting commands (@smallbook, font changes, etc.) have to be done
+% beforehand -- and a) we want @copying to be done first in the source
+% file; b) letting users define the frontmatter in as flexible order as
+% possible is desirable.
+%
+\def\copying{\checkenv{}\begingroup\scanargctxt\docopying}
+\def\docopying#1@end copying{\endgroup\def\copyingtext{#1}}
+%
+\def\insertcopying{%
+  \begingroup
+    \parindent = 0pt  % paragraph indentation looks wrong on title page
+    \scanexp\copyingtext
+  \endgroup
+}
+
+
+\message{defuns,}
+% @defun etc.
+
+\newskip\defbodyindent \defbodyindent=.4in
+\newskip\defargsindent \defargsindent=50pt
+\newskip\deflastargmargin \deflastargmargin=18pt
+\newcount\defunpenalty
+
+% Start the processing of @deffn:
+\def\startdefun{%
+  \ifnum\lastpenalty<10000
+    \medbreak
+    \defunpenalty=10003 % Will keep this @deffn together with the
+                        % following @def command, see below.
+  \else
+    % If there are two @def commands in a row, we'll have a \nobreak,
+    % which is there to keep the function description together with its
+    % header.  But if there's nothing but headers, we need to allow a
+    % break somewhere.  Check specifically for penalty 10002, inserted
+    % by \printdefunline, instead of 10000, since the sectioning
+    % commands also insert a nobreak penalty, and we don't want to allow
+    % a break between a section heading and a defun.
+    %
+    % As a further refinement, we avoid "club" headers by signalling
+    % with penalty of 10003 after the very first @deffn in the
+    % sequence (see above), and penalty of 10002 after any following
+    % @def command.
+    \ifnum\lastpenalty=10002 \penalty2000 \else \defunpenalty=10002 \fi
+    %
+    % Similarly, after a section heading, do not allow a break.
+    % But do insert the glue.
+    \medskip  % preceded by discardable penalty, so not a breakpoint
+  \fi
+  %
+  \parindent=0in
+  \advance\leftskip by \defbodyindent
+  \exdentamount=\defbodyindent
+}
+
+\def\dodefunx#1{%
+  % First, check whether we are in the right environment:
+  \checkenv#1%
+  %
+  % As above, allow line break if we have multiple x headers in a row.
+  % It's not a great place, though.
+  \ifnum\lastpenalty=10002 \penalty3000 \else \defunpenalty=10002 \fi
+  %
+  % And now, it's time to reuse the body of the original defun:
+  \expandafter\gobbledefun#1%
+}
+\def\gobbledefun#1\startdefun{}
+
+% \printdefunline \deffnheader{text}
+%
+\def\printdefunline#1#2{%
+  \begingroup
+    % call \deffnheader:
+    #1#2 \endheader
+    % common ending:
+    \interlinepenalty = 10000
+    \advance\rightskip by 0pt plus 1fil\relax
+    \endgraf
+    \nobreak\vskip -\parskip
+    \penalty\defunpenalty  % signal to \startdefun and \dodefunx
+    % Some of the @defun-type tags do not enable magic parentheses,
+    % rendering the following check redundant.  But we don't optimize.
+    \checkparencounts
+  \endgroup
+}
+
+\def\Edefun{\endgraf\medbreak}
+
+% \makedefun{deffn} creates \deffn, \deffnx and \Edeffn;
+% the only thing remaining is to define \deffnheader.
+%
+\def\makedefun#1{%
+  \expandafter\let\csname E#1\endcsname = \Edefun
+  \edef\temp{\noexpand\domakedefun
+    \makecsname{#1}\makecsname{#1x}\makecsname{#1header}}%
+  \temp
+}
+
+% \domakedefun \deffn \deffnx \deffnheader { (defn. of \deffnheader) }
+%
+% Define \deffn and \deffnx, without parameters.
+% \deffnheader has to be defined explicitly.
+%
+\def\domakedefun#1#2#3{%
+  \envdef#1{%
+    \startdefun
+    \doingtypefnfalse    % distinguish typed functions from all else
+    \parseargusing\activeparens{\printdefunline#3}%
+  }%
+  \def#2{\dodefunx#1}%
+  \def#3%
+}
+
+\newif\ifdoingtypefn       % doing typed function?
+\newif\ifrettypeownline    % typeset return type on its own line?
+
+% @deftypefnnewline on|off says whether the return type of typed functions
+% are printed on their own line.  This affects @deftypefn, @deftypefun,
+% @deftypeop, and @deftypemethod.
+% 
+\parseargdef\deftypefnnewline{%
+  \def\temp{#1}%
+  \ifx\temp\onword
+    \expandafter\let\csname SETtxideftypefnnl\endcsname
+      = \empty
+  \else\ifx\temp\offword
+    \expandafter\let\csname SETtxideftypefnnl\endcsname
+      = \relax
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @txideftypefnnl value `\temp',
+                must be on|off}%
+  \fi\fi
+}
+
+% \dosubind {index}{topic}{subtopic}
+%
+% If SUBTOPIC is present, precede it with a space, and call \doind.
+% (At some time during the 20th century, this made a two-level entry in an 
+% index such as the operation index.  Nobody seemed to notice the change in 
+% behaviour though.)
+\def\dosubind#1#2#3{%
+  \def\thirdarg{#3}%
+  \ifx\thirdarg\empty
+    \doind{#1}{#2}%
+  \else
+    \doind{#1}{#2\space#3}%
+  \fi
+}
+
+% Untyped functions:
+
+% @deffn category name args
+\makedefun{deffn}{\deffngeneral{}}
+
+% @deffn category class name args
+\makedefun{defop}#1 {\defopon{#1\ \putwordon}}
+
+% \defopon {category on}class name args
+\def\defopon#1#2 {\deffngeneral{\putwordon\ \code{#2}}{#1\ \code{#2}} }
+
+% \deffngeneral {subind}category name args
+%
+\def\deffngeneral#1#2 #3 #4\endheader{%
+  \dosubind{fn}{\code{#3}}{#1}%
+  \defname{#2}{}{#3}\magicamp\defunargs{#4\unskip}%
+}
+
+% Typed functions:
+
+% @deftypefn category type name args
+\makedefun{deftypefn}{\deftypefngeneral{}}
+
+% @deftypeop category class type name args
+\makedefun{deftypeop}#1 {\deftypeopon{#1\ \putwordon}}
+
+% \deftypeopon {category on}class type name args
+\def\deftypeopon#1#2 {\deftypefngeneral{\putwordon\ \code{#2}}{#1\ \code{#2}} }
+
+% \deftypefngeneral {subind}category type name args
+%
+\def\deftypefngeneral#1#2 #3 #4 #5\endheader{%
+  \dosubind{fn}{\code{#4}}{#1}%
+  \doingtypefntrue
+  \defname{#2}{#3}{#4}\defunargs{#5\unskip}%
+}
+
+% Typed variables:
+
+% @deftypevr category type var args
+\makedefun{deftypevr}{\deftypecvgeneral{}}
+
+% @deftypecv category class type var args
+\makedefun{deftypecv}#1 {\deftypecvof{#1\ \putwordof}}
+
+% \deftypecvof {category of}class type var args
+\def\deftypecvof#1#2 {\deftypecvgeneral{\putwordof\ \code{#2}}{#1\ \code{#2}} }
+
+% \deftypecvgeneral {subind}category type var args
+%
+\def\deftypecvgeneral#1#2 #3 #4 #5\endheader{%
+  \dosubind{vr}{\code{#4}}{#1}%
+  \defname{#2}{#3}{#4}\defunargs{#5\unskip}%
+}
+
+% Untyped variables:
+
+% @defvr category var args
+\makedefun{defvr}#1 {\deftypevrheader{#1} {} }
+
+% @defcv category class var args
+\makedefun{defcv}#1 {\defcvof{#1\ \putwordof}}
+
+% \defcvof {category of}class var args
+\def\defcvof#1#2 {\deftypecvof{#1}#2 {} }
+
+% Types:
+
+% @deftp category name args
+\makedefun{deftp}#1 #2 #3\endheader{%
+  \doind{tp}{\code{#2}}%
+  \defname{#1}{}{#2}\defunargs{#3\unskip}%
+}
+
+% Remaining @defun-like shortcuts:
+\makedefun{defun}{\deffnheader{\putwordDeffunc} }
+\makedefun{defmac}{\deffnheader{\putwordDefmac} }
+\makedefun{defspec}{\deffnheader{\putwordDefspec} }
+\makedefun{deftypefun}{\deftypefnheader{\putwordDeffunc} }
+\makedefun{defvar}{\defvrheader{\putwordDefvar} }
+\makedefun{defopt}{\defvrheader{\putwordDefopt} }
+\makedefun{deftypevar}{\deftypevrheader{\putwordDefvar} }
+\makedefun{defmethod}{\defopon\putwordMethodon}
+\makedefun{deftypemethod}{\deftypeopon\putwordMethodon}
+\makedefun{defivar}{\defcvof\putwordInstanceVariableof}
+\makedefun{deftypeivar}{\deftypecvof\putwordInstanceVariableof}
+
+% \defname, which formats the name of the @def (not the args).
+% #1 is the category, such as "Function".
+% #2 is the return type, if any.
+% #3 is the function name.
+%
+% We are followed by (but not passed) the arguments, if any.
+%
+\def\defname#1#2#3{%
+  \par
+  % Get the values of \leftskip and \rightskip as they were outside the @def...
+  \advance\leftskip by -\defbodyindent
+  %
+  % Determine if we are typesetting the return type of a typed function
+  % on a line by itself.
+  \rettypeownlinefalse
+  \ifdoingtypefn  % doing a typed function specifically?
+    % then check user option for putting return type on its own line:
+    \expandafter\ifx\csname SETtxideftypefnnl\endcsname\relax \else
+      \rettypeownlinetrue
+    \fi
+  \fi
+  %
+  % How we'll format the category name.  Putting it in brackets helps
+  % distinguish it from the body text that may end up on the next line
+  % just below it.
+  \def\temp{#1}%
+  \setbox0=\hbox{\kern\deflastargmargin \ifx\temp\empty\else [\rm\temp]\fi}
+  %
+  % Figure out line sizes for the paragraph shape.  We'll always have at
+  % least two.
+  \tempnum = 2
+  %
+  % The first line needs space for \box0; but if \rightskip is nonzero,
+  % we need only space for the part of \box0 which exceeds it:
+  \dimen0=\hsize  \advance\dimen0 by -\wd0  \advance\dimen0 by \rightskip
+  %
+  % If doing a return type on its own line, we'll have another line.
+  \ifrettypeownline
+    \advance\tempnum by 1
+    \def\maybeshapeline{0in \hsize}%
+  \else
+    \def\maybeshapeline{}%
+  \fi
+  %
+  % The continuations:
+  \dimen2=\hsize  \advance\dimen2 by -\defargsindent
+  %
+  % The final paragraph shape:
+  \parshape \tempnum  0in \dimen0  \maybeshapeline  \defargsindent \dimen2
+  %
+  % Put the category name at the right margin.
+  \noindent
+  \hbox to 0pt{%
+    \hfil\box0 \kern-\hsize
+    % \hsize has to be shortened this way:
+    \kern\leftskip
+    % Intentionally do not respect \rightskip, since we need the space.
+  }%
+  %
+  % Allow all lines to be underfull without complaint:
+  \tolerance=10000 \hbadness=10000
+  \exdentamount=\defbodyindent
+  {%
+    % defun fonts. We use typewriter by default (used to be bold) because:
+    % . we're printing identifiers, they should be in tt in principle.
+    % . in languages with many accents, such as Czech or French, it's
+    %   common to leave accents off identifiers.  The result looks ok in
+    %   tt, but exceedingly strange in rm.
+    % . we don't want -- and --- to be treated as ligatures.
+    % . this still does not fix the ?` and !` ligatures, but so far no
+    %   one has made identifiers using them :).
+    \df \tt
+    \def\temp{#2}% text of the return type
+    \ifx\temp\empty\else
+      \tclose{\temp}% typeset the return type
+      \ifrettypeownline
+        % put return type on its own line; prohibit line break following:
+        \hfil\vadjust{\nobreak}\break  
+      \else
+        \space  % type on same line, so just followed by a space
+      \fi
+    \fi           % no return type
+    #3% output function name
+  }%
+  {\rm\enskip}% hskip 0.5 em of \rmfont
+  %
+  \boldbrax
+  % arguments will be output next, if any.
+}
+
+% Print arguments in slanted roman (not ttsl), inconsistently with using
+% tt for the name.  This is because literal text is sometimes needed in
+% the argument list (groff manual), and ttsl and tt are not very
+% distinguishable.  Prevent hyphenation at `-' chars.
+%
+\def\defunargs#1{%
+  % use sl by default (not ttsl),
+  % tt for the names.
+  \df \sl \hyphenchar\font=0
+  %
+  % On the other hand, if an argument has two dashes (for instance), we
+  % want a way to get ttsl.  We used to recommend @var for that, so
+  % leave the code in, but it's strange for @var to lead to typewriter.
+  % Nowadays we recommend @code, since the difference between a ttsl hyphen
+  % and a tt hyphen is pretty tiny.  @code also disables ?` !`.
+  \def\var##1{{\setregularquotes\ttslanted{##1}}}%
+  #1%
+  \sl\hyphenchar\font=45
+}
+
+% We want ()&[] to print specially on the defun line.
+%
+\def\activeparens{%
+  \catcode`\(=\active \catcode`\)=\active
+  \catcode`\[=\active \catcode`\]=\active
+  \catcode`\&=\active
+}
+
+% Make control sequences which act like normal parenthesis chars.
+\let\lparen = ( \let\rparen = )
+
+% Be sure that we always have a definition for `(', etc.  For example,
+% if the fn name has parens in it, \boldbrax will not be in effect yet,
+% so TeX would otherwise complain about undefined control sequence.
+{
+  \activeparens
+  \global\let(=\lparen \global\let)=\rparen
+  \global\let[=\lbrack \global\let]=\rbrack
+  \global\let& = \&
+
+  \gdef\boldbrax{\let(=\opnr\let)=\clnr\let[=\lbrb\let]=\rbrb}
+  \gdef\magicamp{\let&=\amprm}
+}
+\let\ampchar\&
+
+\newcount\parencount
+
+% If we encounter &foo, then turn on ()-hacking afterwards
+\newif\ifampseen
+\def\amprm#1 {\ampseentrue{\bf\&#1 }}
+
+\def\parenfont{%
+  \ifampseen
+    % At the first level, print parens in roman,
+    % otherwise use the default font.
+    \ifnum \parencount=1 \rm \fi
+  \else
+    % The \sf parens (in \boldbrax) actually are a little bolder than
+    % the contained text.  This is especially needed for [ and ] .
+    \sf
+  \fi
+}
+\def\infirstlevel#1{%
+  \ifampseen
+    \ifnum\parencount=1
+      #1%
+    \fi
+  \fi
+}
+\def\bfafterword#1 {#1 \bf}
+
+\def\opnr{%
+  \global\advance\parencount by 1
+  {\parenfont(}%
+  \infirstlevel \bfafterword
+}
+\def\clnr{%
+  {\parenfont)}%
+  \infirstlevel \sl
+  \global\advance\parencount by -1
+}
+
+\newcount\brackcount
+\def\lbrb{%
+  \global\advance\brackcount by 1
+  {\bf[}%
+}
+\def\rbrb{%
+  {\bf]}%
+  \global\advance\brackcount by -1
+}
+
+\def\checkparencounts{%
+  \ifnum\parencount=0 \else \badparencount \fi
+  \ifnum\brackcount=0 \else \badbrackcount \fi
+}
+% these should not use \errmessage; the glibc manual, at least, actually
+% has such constructs (when documenting function pointers).
+\def\badparencount{%
+  \message{Warning: unbalanced parentheses in @def...}%
+  \global\parencount=0
+}
+\def\badbrackcount{%
+  \message{Warning: unbalanced square brackets in @def...}%
+  \global\brackcount=0
+}
+
+
+\message{macros,}
+% @macro.
+
+% To do this right we need a feature of e-TeX, \scantokens,
+% which we arrange to emulate with a temporary file in ordinary TeX.
+\ifx\eTeXversion\thisisundefined
+  \newwrite\macscribble
+  \def\scantokens#1{%
+    \toks0={#1}%
+    \immediate\openout\macscribble=\jobname.tmp
+    \immediate\write\macscribble{\the\toks0}%
+    \immediate\closeout\macscribble
+    \input \jobname.tmp
+  }
+\fi
+
+\let\E=\expandafter
+
+% Used at the time of macro expansion.
+% Argument is macro body with arguments substituted
+\def\scanmacro#1{%
+  \newlinechar`\^^M
+  % expand the expansion of \eatleadingcr twice to maybe remove a leading
+  % newline (and \else and \fi tokens), then call \eatspaces on the result.
+  \def\xeatspaces##1{%
+    \E\E\E\E\E\E\E\eatspaces\E\E\E\E\E\E\E{\eatleadingcr##1%
+  }}%
+  \def\xempty##1{}%
+  %
+  % Process the macro body under the current catcode regime.
+  \scantokens{#1@comment}%
+  %
+  % The \comment is to remove the \newlinechar added by \scantokens, and
+  % can be noticed by \parsearg.  Note \c isn't used because this means cedilla 
+  % in math mode.
+}
+
+% Used for copying and captions
+\def\scanexp#1{%
+  \expandafter\scanmacro\expandafter{#1}%
+}
+
+\newcount\paramno   % Count of parameters
+\newtoks\macname    % Macro name
+\newif\ifrecursive  % Is it recursive?
+
+% List of all defined macros in the form
+%    \commondummyword\macro1\commondummyword\macro2...
+% Currently is also contains all @aliases; the list can be split
+% if there is a need.
+\def\macrolist{}
+
+% Add the macro to \macrolist
+\def\addtomacrolist#1{\expandafter \addtomacrolistxxx \csname#1\endcsname}
+\def\addtomacrolistxxx#1{%
+     \toks0 = \expandafter{\macrolist\commondummyword#1}%
+     \xdef\macrolist{\the\toks0}%
+}
+
+% Utility routines.
+% This does \let #1 = #2, with \csnames; that is,
+%   \let \csname#1\endcsname = \csname#2\endcsname
+% (except of course we have to play expansion games).
+%
+\def\cslet#1#2{%
+  \expandafter\let
+  \csname#1\expandafter\endcsname
+  \csname#2\endcsname
+}
+
+% Trim leading and trailing spaces off a string.
+% Concepts from aro-bend problem 15 (see CTAN).
+{\catcode`\@=11
+\gdef\eatspaces #1{\expandafter\trim@\expandafter{#1 }}
+\gdef\trim@ #1{\trim@@ @#1 @ #1 @ @@}
+\gdef\trim@@ #1@ #2@ #3@@{\trim@@@\empty #2 @}
+\def\unbrace#1{#1}
+\unbrace{\gdef\trim@@@ #1 } #2@{#1}
+}
+
+{\catcode`\^^M=\other%
+\gdef\eatleadingcr#1{\if\noexpand#1\noexpand^^M\else\E#1\fi}}%
+% Warning: this won't work for a delimited argument
+% or for an empty argument
+
+% Trim a single trailing ^^M off a string.
+{\catcode`\^^M=\other \catcode`\Q=3%
+\gdef\eatcr #1{\eatcra #1Q^^MQ}%
+\gdef\eatcra#1^^MQ{\eatcrb#1Q}%
+\gdef\eatcrb#1Q#2Q{#1}%
+}
+
+% Macro bodies are absorbed as an argument in a context where
+% all characters are catcode 10, 11 or 12, except \ which is active
+% (as in normal texinfo). It is necessary to change the definition of \
+% to recognize macro arguments; this is the job of \mbodybackslash.
+%
+% Non-ASCII encodings make 8-bit characters active, so un-activate
+% them to avoid their expansion.  Must do this non-globally, to
+% confine the change to the current group.
+%
+% It's necessary to have hard CRs when the macro is executed. This is
+% done by making ^^M (\endlinechar) catcode 12 when reading the macro
+% body, and then making it the \newlinechar in \scanmacro.
+%
+\def\scanctxt{% used as subroutine
+  \catcode`\"=\other
+  \catcode`\+=\other
+  \catcode`\<=\other
+  \catcode`\>=\other
+  \catcode`\^=\other
+  \catcode`\_=\other
+  \catcode`\|=\other
+  \catcode`\~=\other
+  \passthroughcharstrue
+}
+
+\def\scanargctxt{% used for copying and captions, not macros.
+  \scanctxt
+  \catcode`\@=\other
+  \catcode`\\=\other
+  \catcode`\^^M=\other
+}
+
+\def\macrobodyctxt{% used for @macro definitions
+  \scanctxt
+  \catcode`\ =\other
+  \catcode`\@=\other
+  \catcode`\{=\other
+  \catcode`\}=\other
+  \catcode`\^^M=\other
+  \usembodybackslash
+}
+
+% Used when scanning braced macro arguments.  Note, however, that catcode
+% changes here are ineffectual if the macro invocation was nested inside
+% an argument to another Texinfo command.
+\def\macroargctxt{%
+  \scanctxt
+  \catcode`\ =\active
+  \catcode`\@=\other
+  \catcode`\^^M=\other
+  \catcode`\\=\active
+}
+
+\def\macrolineargctxt{% used for whole-line arguments without braces
+  \scanctxt
+  \catcode`\@=\other
+  \catcode`\{=\other
+  \catcode`\}=\other
+}
+
+% \mbodybackslash is the definition of \ in @macro bodies.
+% It maps \foo\ => \csname macarg.foo\endcsname => #N
+% where N is the macro parameter number.
+% We define \csname macarg.\endcsname to be \realbackslash, so
+% \\ in macro replacement text gets you a backslash.
+%
+{\catcode`@=0 @catcode`@\=@active
+ @gdef@usembodybackslash{@let\=@mbodybackslash}
+ @gdef@mbodybackslash#1\{@csname macarg.#1@endcsname}
+}
+\expandafter\def\csname macarg.\endcsname{\realbackslash}
+
+\def\margbackslash#1{\char`\#1 }
+
+\def\macro{\recursivefalse\parsearg\macroxxx}
+\def\rmacro{\recursivetrue\parsearg\macroxxx}
+
+\def\macroxxx#1{%
+  \getargs{#1}% now \macname is the macname and \argl the arglist
+  \ifx\argl\empty       % no arguments
+     \paramno=0\relax
+  \else
+     \expandafter\parsemargdef \argl;%
+     \if\paramno>256\relax
+       \ifx\eTeXversion\thisisundefined
+         \errhelp = \EMsimple
+         \errmessage{You need eTeX to compile a file with macros with more than 256 arguments}
+       \fi
+     \fi
+  \fi
+  \if1\csname ismacro.\the\macname\endcsname
+     \message{Warning: redefining \the\macname}%
+  \else
+     \expandafter\ifx\csname \the\macname\endcsname \relax
+     \else \errmessage{Macro name \the\macname\space already defined}\fi
+     \global\cslet{macsave.\the\macname}{\the\macname}%
+     \global\expandafter\let\csname ismacro.\the\macname\endcsname=1%
+     \addtomacrolist{\the\macname}%
+  \fi
+  \begingroup \macrobodyctxt
+  \ifrecursive \expandafter\parsermacbody
+  \else \expandafter\parsemacbody
+  \fi}
+
+\parseargdef\unmacro{%
+  \if1\csname ismacro.#1\endcsname
+    \global\cslet{#1}{macsave.#1}%
+    \global\expandafter\let \csname ismacro.#1\endcsname=0%
+    % Remove the macro name from \macrolist:
+    \begingroup
+      \expandafter\let\csname#1\endcsname \relax
+      \let\commondummyword\unmacrodo
+      \xdef\macrolist{\macrolist}%
+    \endgroup
+  \else
+    \errmessage{Macro #1 not defined}%
+  \fi
+}
+
+% Called by \do from \dounmacro on each macro.  The idea is to omit any
+% macro definitions that have been changed to \relax.
+%
+\def\unmacrodo#1{%
+  \ifx #1\relax
+    % remove this
+  \else
+    \noexpand\commondummyword \noexpand#1%
+  \fi
+}
+
+% \getargs -- Parse the arguments to a @macro line.  Set \macname to
+% the name of the macro, and \argl to the braced argument list.
+\def\getargs#1{\getargsxxx#1{}}
+\def\getargsxxx#1#{\getmacname #1 \relax\getmacargs}
+\def\getmacname#1 #2\relax{\macname={#1}}
+\def\getmacargs#1{\def\argl{#1}}
+% This made use of the feature that if the last token of a
+% <parameter list> is #, then the preceding argument is delimited by
+% an opening brace, and that opening brace is not consumed.
+
+% Parse the optional {params} list to @macro or @rmacro.
+% Set \paramno to the number of arguments,
+% and \paramlist to a parameter text for the macro (e.g. #1,#2,#3 for a
+% three-param macro.)  Define \macarg.BLAH for each BLAH in the params
+% list to some hook where the argument is to be expanded.  If there are
+% less than 10 arguments that hook is to be replaced by ##N where N
+% is the position in that list, that is to say the macro arguments are to be
+% defined `a la TeX in the macro body.  
+%
+% That gets used by \mbodybackslash (above).
+%
+% If there are 10 or more arguments, a different technique is used: see
+% \parsemmanyargdef.
+%
+\def\parsemargdef#1;{%
+  \paramno=0\def\paramlist{}%
+  \let\hash\relax
+  % \hash is redefined to `#' later to get it into definitions
+  \let\xeatspaces\relax
+  \let\xempty\relax
+  \parsemargdefxxx#1,;,%
+  \ifnum\paramno<10\relax\else
+    \paramno0\relax
+    \parsemmanyargdef@@#1,;,% 10 or more arguments
+  \fi
+}
+\def\parsemargdefxxx#1,{%
+  \if#1;\let\next=\relax
+  \else \let\next=\parsemargdefxxx
+    \advance\paramno by 1
+    \expandafter\edef\csname macarg.\eatspaces{#1}\endcsname
+        {\xeatspaces{\hash\the\paramno\noexpand\xempty{}}}%
+    \edef\paramlist{\paramlist\hash\the\paramno,}%
+  \fi\next}
+% the \xempty{} is to give \eatleadingcr an argument in the case of an
+% empty macro argument.
+
+% \parsemacbody, \parsermacbody
+%
+% Read recursive and nonrecursive macro bodies. (They're different since
+% rec and nonrec macros end differently.)
+% 
+% We are in \macrobodyctxt, and the \xdef causes backslashshes in the macro 
+% body to be transformed.
+% Set \macrobody to the body of the macro, and call \defmacro.
+%
+{\catcode`\ =\other\long\gdef\parsemacbody#1@end macro{%
+\xdef\macrobody{\eatcr{#1}}\endgroup\defmacro}}%
+{\catcode`\ =\other\long\gdef\parsermacbody#1@end rmacro{%
+\xdef\macrobody{\eatcr{#1}}\endgroup\defmacro}}%
+
+% Make @ a letter, so that we can make private-to-Texinfo macro names.
+\edef\texiatcatcode{\the\catcode`\@}
+\catcode `@=11\relax
+
+%%%%%%%%%%%%%% Code for > 10 arguments only   %%%%%%%%%%%%%%%%%%
+
+% If there are 10 or more arguments, a different technique is used, where the
+% hook remains in the body, and when macro is to be expanded the body is
+% processed again to replace the arguments.
+%
+% In that case, the hook is \the\toks N-1, and we simply set \toks N-1 to the
+% argument N value and then \edef the body (nothing else will expand because of
+% the catcode regime under which the body was input).
+%
+% If you compile with TeX (not eTeX), and you have macros with 10 or more
+% arguments, no macro can have more than 256 arguments (else error).
+%
+% In case that there are 10 or more arguments we parse again the arguments
+% list to set new definitions for the \macarg.BLAH macros corresponding to
+% each BLAH argument. It was anyhow needed to parse already once this list
+% in order to count the arguments, and as macros with at most 9 arguments
+% are by far more frequent than macro with 10 or more arguments, defining
+% twice the \macarg.BLAH macros does not cost too much processing power.
+\def\parsemmanyargdef@@#1,{%
+  \if#1;\let\next=\relax
+  \else 
+    \let\next=\parsemmanyargdef@@
+    \edef\tempb{\eatspaces{#1}}%
+    \expandafter\def\expandafter\tempa
+       \expandafter{\csname macarg.\tempb\endcsname}%
+    % Note that we need some extra \noexpand\noexpand, this is because we
+    % don't want \the  to be expanded in the \parsermacbody  as it uses an
+    % \xdef .
+    \expandafter\edef\tempa
+      {\noexpand\noexpand\noexpand\the\toks\the\paramno}%
+    \advance\paramno by 1\relax
+  \fi\next}
+
+
+\let\endargs@\relax
+\let\nil@\relax
+\def\nilm@{\nil@}%
+\long\def\nillm@{\nil@}%
+
+% This macro is expanded during the Texinfo macro expansion, not during its
+% definition.  It gets all the arguments' values and assigns them to macros
+% macarg.ARGNAME
+%
+% #1 is the macro name
+% #2 is the list of argument names
+% #3 is the list of argument values
+\def\getargvals@#1#2#3{%
+  \def\macargdeflist@{}%
+  \def\saveparamlist@{#2}% Need to keep a copy for parameter expansion.
+  \def\paramlist{#2,\nil@}%
+  \def\macroname{#1}%
+  \begingroup
+  \macroargctxt
+  \def\argvaluelist{#3,\nil@}%
+  \def\@tempa{#3}%
+  \ifx\@tempa\empty
+    \setemptyargvalues@
+  \else
+    \getargvals@@
+  \fi
+}
+\def\getargvals@@{%
+  \ifx\paramlist\nilm@
+      % Some sanity check needed here that \argvaluelist is also empty.
+      \ifx\argvaluelist\nillm@
+      \else
+        \errhelp = \EMsimple
+        \errmessage{Too many arguments in macro `\macroname'!}%
+      \fi
+      \let\next\macargexpandinbody@
+  \else
+    \ifx\argvaluelist\nillm@
+       % No more arguments values passed to macro.  Set remaining named-arg
+       % macros to empty.
+       \let\next\setemptyargvalues@
+    \else
+      % pop current arg name into \@tempb
+      \def\@tempa##1{\pop@{\@tempb}{\paramlist}##1\endargs@}%
+      \expandafter\@tempa\expandafter{\paramlist}%
+       % pop current argument value into \@tempc
+      \def\@tempa##1{\longpop@{\@tempc}{\argvaluelist}##1\endargs@}%
+      \expandafter\@tempa\expandafter{\argvaluelist}%
+       % Here \@tempb is the current arg name and \@tempc is the current arg value.
+       % First place the new argument macro definition into \@tempd
+       \expandafter\macname\expandafter{\@tempc}%
+       \expandafter\let\csname macarg.\@tempb\endcsname\relax
+       \expandafter\def\expandafter\@tempe\expandafter{%
+         \csname macarg.\@tempb\endcsname}%
+       \edef\@tempd{\long\def\@tempe{\the\macname}}%
+       \push@\@tempd\macargdeflist@
+       \let\next\getargvals@@
+    \fi
+  \fi
+  \next
+}
+
+\def\push@#1#2{%
+  \expandafter\expandafter\expandafter\def
+  \expandafter\expandafter\expandafter#2%
+  \expandafter\expandafter\expandafter{%
+  \expandafter#1#2}%
+}
+
+% Replace arguments by their values in the macro body, and place the result
+% in macro \@tempa.
+% 
+\def\macvalstoargs@{%
+  %  To do this we use the property that token registers that are \the'ed
+  % within an \edef  expand only once. So we are going to place all argument
+  % values into respective token registers.
+  %
+  % First we save the token context, and initialize argument numbering.
+  \begingroup
+    \paramno0\relax
+    % Then, for each argument number #N, we place the corresponding argument
+    % value into a new token list register \toks#N
+    \expandafter\putargsintokens@\saveparamlist@,;,%
+    % Then, we expand the body so that argument are replaced by their
+    % values. The trick for values not to be expanded themselves is that they
+    % are within tokens and that tokens expand only once in an \edef .
+    \edef\@tempc{\csname mac.\macroname .body\endcsname}%
+    % Now we restore the token stack pointer to free the token list registers
+    % which we have used, but we make sure that expanded body is saved after
+    % group.
+    \expandafter
+  \endgroup
+  \expandafter\def\expandafter\@tempa\expandafter{\@tempc}%
+  }
+
+% Define the named-macro outside of this group and then close this group. 
+% 
+\def\macargexpandinbody@{% 
+  \expandafter
+  \endgroup
+  \macargdeflist@
+  % First the replace in body the macro arguments by their values, the result
+  % is in \@tempa .
+  \macvalstoargs@
+  % Then we point at the \norecurse or \gobble (for recursive) macro value
+  % with \@tempb .
+  \expandafter\let\expandafter\@tempb\csname mac.\macroname .recurse\endcsname
+  % Depending on whether it is recursive or not, we need some tailing
+  % \egroup .
+  \ifx\@tempb\gobble
+     \let\@tempc\relax
+  \else
+     \let\@tempc\egroup
+  \fi
+  % And now we do the real job:
+  \edef\@tempd{\noexpand\@tempb{\macroname}\noexpand\scanmacro{\@tempa}\@tempc}%
+  \@tempd
+}
+
+\def\putargsintokens@#1,{%
+  \if#1;\let\next\relax
+  \else
+    \let\next\putargsintokens@
+    % First we allocate the new token list register, and give it a temporary
+    % alias \@tempb .
+    \toksdef\@tempb\the\paramno
+    % Then we place the argument value into that token list register.
+    \expandafter\let\expandafter\@tempa\csname macarg.#1\endcsname
+    \expandafter\@tempb\expandafter{\@tempa}%
+    \advance\paramno by 1\relax
+  \fi
+  \next
+}
+
+% Trailing missing arguments are set to empty.
+% 
+\def\setemptyargvalues@{%
+  \ifx\paramlist\nilm@
+    \let\next\macargexpandinbody@
+  \else
+    \expandafter\setemptyargvaluesparser@\paramlist\endargs@
+    \let\next\setemptyargvalues@
+  \fi
+  \next
+}
+
+\def\setemptyargvaluesparser@#1,#2\endargs@{%
+  \expandafter\def\expandafter\@tempa\expandafter{%
+    \expandafter\def\csname macarg.#1\endcsname{}}%
+  \push@\@tempa\macargdeflist@
+  \def\paramlist{#2}%
+}
+
+% #1 is the element target macro
+% #2 is the list macro
+% #3,#4\endargs@ is the list value
+\def\pop@#1#2#3,#4\endargs@{%
+   \def#1{#3}%
+   \def#2{#4}%
+}
+\long\def\longpop@#1#2#3,#4\endargs@{%
+   \long\def#1{#3}%
+   \long\def#2{#4}%
+}
+
+
+%%%%%%%%%%%%%% End of code for > 10 arguments %%%%%%%%%%%%%%%%%%
+
+
+% This defines a Texinfo @macro or @rmacro, called by \parsemacbody.
+%    \macrobody has the body of the macro in it, with placeholders for
+% its parameters, looking like "\xeatspaces{\hash 1}".
+%    \paramno is the number of parameters
+%    \paramlist is a TeX parameter text, e.g. "#1,#2,#3,"
+% There are four cases: macros of zero, one, up to nine, and many arguments.
+% \xdef is used so that macro definitions will survive the file
+% they're defined in: @include reads the file inside a group.
+%
+\def\defmacro{%
+  \let\hash=##% convert placeholders to macro parameter chars
+  \ifnum\paramno=1
+    \def\xeatspaces##1{##1}%
+    % This removes the pair of braces around the argument.  We don't
+    % use \eatspaces, because this can cause ends of lines to be lost
+    % when the argument to \eatspaces is read, leading to line-based
+    % commands like "@itemize" not being read correctly.
+  \else
+    \let\xeatspaces\relax % suppress expansion
+  \fi
+  \ifcase\paramno
+  % 0
+    \expandafter\xdef\csname\the\macname\endcsname{%
+      \bgroup
+        \noexpand\spaceisspace
+        \noexpand\endlineisspace
+        \noexpand\expandafter % skip any whitespace after the macro name.
+        \expandafter\noexpand\csname\the\macname @@@\endcsname}%
+    \expandafter\xdef\csname\the\macname @@@\endcsname{%
+      \egroup
+      \noexpand\scanmacro{\macrobody}}%
+  \or % 1
+    \expandafter\xdef\csname\the\macname\endcsname{%
+       \bgroup
+       \noexpand\braceorline
+       \expandafter\noexpand\csname\the\macname @@@\endcsname}%
+    \expandafter\xdef\csname\the\macname @@@\endcsname##1{%
+      \egroup
+      \noexpand\scanmacro{\macrobody}%
+      }%
+  \else % at most 9
+    \ifnum\paramno<10\relax
+      % @MACNAME sets the context for reading the macro argument
+      % @MACNAME@@ gets the argument, processes backslashes and appends a 
+      % comma.
+      % @MACNAME@@@ removes braces surrounding the argument list.
+      % @MACNAME@@@@ scans the macro body with arguments substituted.
+      \expandafter\xdef\csname\the\macname\endcsname{%
+        \bgroup
+        \noexpand\expandafter  % This \expandafter skip any spaces after the
+        \noexpand\macroargctxt % macro before we change the catcode of space.
+        \noexpand\expandafter
+        \expandafter\noexpand\csname\the\macname @@\endcsname}%
+      \expandafter\xdef\csname\the\macname @@\endcsname##1{%
+          \noexpand\passargtomacro
+          \expandafter\noexpand\csname\the\macname @@@\endcsname{##1,}}%
+      \expandafter\xdef\csname\the\macname @@@\endcsname##1{%
+          \expandafter\noexpand\csname\the\macname @@@@\endcsname ##1}%
+      \expandafter\expandafter
+      \expandafter\xdef
+      \expandafter\expandafter
+        \csname\the\macname @@@@\endcsname\paramlist{%
+          \egroup\noexpand\scanmacro{\macrobody}}%
+    \else % 10 or more:
+      \expandafter\xdef\csname\the\macname\endcsname{%
+        \noexpand\getargvals@{\the\macname}{\argl}%
+      }%
+      \global\expandafter\let\csname mac.\the\macname .body\endcsname\macrobody
+      \global\expandafter\let\csname mac.\the\macname .recurse\endcsname\gobble
+    \fi
+  \fi}
+
+\catcode `\@\texiatcatcode\relax % end private-to-Texinfo catcodes
+
+\def\norecurse#1{\bgroup\cslet{#1}{macsave.#1}}
+
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+{\catcode`\@=0 \catcode`\\=13  % We need to manipulate \ so use @ as escape
+@catcode`@_=11  % private names
+@catcode`@!=11  % used as argument separator
+
+% \passargtomacro#1#2 -
+% Call #1 with a list of tokens #2, with any doubled backslashes in #2
+% compressed to one.
+%
+% This implementation works by expansion, and not execution (so we cannot use 
+% \def or similar).  This reduces the risk of this failing in contexts where 
+% complete expansion is done with no execution (for example, in writing out to 
+% an auxiliary file for an index entry).
+% 
+% State is kept in the input stream: the argument passed to
+% @look_ahead, @gobble_and_check_finish and @add_segment is
+%
+% THE_MACRO ARG_RESULT ! {PENDING_BS} NEXT_TOKEN  (... rest of input)
+%
+% where:
+% THE_MACRO - name of the macro we want to call
+% ARG_RESULT - argument list we build to pass to that macro
+% PENDING_BS - either a backslash or nothing
+% NEXT_TOKEN - used to look ahead in the input stream to see what's coming next
+
+@gdef@passargtomacro#1#2{%
+  @add_segment #1!{}@relax#2\@_finish\%
+}
+@gdef@_finish{@_finishx} @global@let@_finishx@relax
+
+% #1 - THE_MACRO ARG_RESULT
+% #2 - PENDING_BS
+% #3 - NEXT_TOKEN
+% #4 used to look ahead
+%
+% If the next token is not a backslash, process the rest of the argument; 
+% otherwise, remove the next token.
+@gdef@look_ahead#1!#2#3#4{%
+  @ifx#4\%
+   @expandafter@gobble_and_check_finish 
+  @else
+   @expandafter@add_segment
+  @fi#1!{#2}#4#4%
+}
+
+% #1 - THE_MACRO ARG_RESULT
+% #2 - PENDING_BS
+% #3 - NEXT_TOKEN
+% #4 should be a backslash, which is gobbled.
+% #5 looks ahead
+%
+% Double backslash found.  Add a single backslash, and look ahead.
+@gdef@gobble_and_check_finish#1!#2#3#4#5{%
+  @add_segment#1\!{}#5#5%
+}
+
+@gdef@is_fi{@fi}
+
+% #1 - THE_MACRO ARG_RESULT
+% #2 - PENDING_BS
+% #3 - NEXT_TOKEN
+% #4 is input stream until next backslash
+%
+% Input stream is either at the start of the argument, or just after a 
+% backslash sequence, either a lone backslash, or a doubled backslash.  
+% NEXT_TOKEN contains the first token in the input stream: if it is \finish, 
+% finish; otherwise, append to ARG_RESULT the segment of the argument up until
+% the next backslash.  PENDING_BACKSLASH contains a backslash to represent
+% a backslash just before the start of the input stream that has not been
+% added to ARG_RESULT.
+@gdef@add_segment#1!#2#3#4\{%
+@ifx#3@_finish
+  @call_the_macro#1!%
+@else
+  % append the pending backslash to the result, followed by the next segment
+  @expandafter@is_fi@look_ahead#1#2#4!{\}@fi
+  % this @fi is discarded by @look_ahead.
+  % we can't get rid of it with \expandafter because we don't know how 
+  % long #4 is.
+}
+
+% #1 - THE_MACRO
+% #2 - ARG_RESULT
+% #3 discards the res of the conditional in @add_segment, and @is_fi ends the 
+% conditional.
+@gdef@call_the_macro#1#2!#3@fi{@is_fi #1{#2}}
+
+}
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% \braceorline MAC is used for a one-argument macro MAC.  It checks
+% whether the next non-whitespace character is a {.  It sets the context
+% for reading the argument (slightly different in the two cases).  Then,
+% to read the argument, in the whole-line case, it then calls the regular
+% \parsearg MAC; in the lbrace case, it calls \passargtomacro MAC.
+% 
+\def\braceorline#1{\let\macnamexxx=#1\futurelet\nchar\braceorlinexxx}
+\def\braceorlinexxx{%
+  \ifx\nchar\bgroup
+    \macroargctxt
+    \expandafter\passargtomacro
+  \else
+    \macrolineargctxt\expandafter\parsearg
+  \fi \macnamexxx}
+
+
+% @alias.
+% We need some trickery to remove the optional spaces around the equal
+% sign.  Make them active and then expand them all to nothing.
+%
+\def\alias{\parseargusing\obeyspaces\aliasxxx}
+\def\aliasxxx #1{\aliasyyy#1\relax}
+\def\aliasyyy #1=#2\relax{%
+  {%
+    \expandafter\let\obeyedspace=\empty
+    \addtomacrolist{#1}%
+    \xdef\next{\global\let\makecsname{#1}=\makecsname{#2}}%
+  }%
+  \next
+}
+
+
+\message{cross references,}
+
+\newwrite\auxfile
+\newif\ifhavexrefs    % True if xref values are known.
+\newif\ifwarnedxrefs  % True if we warned once that they aren't known.
+
+% @inforef is relatively simple.
+\def\inforef #1{\inforefzzz #1,,,,**}
+\def\inforefzzz #1,#2,#3,#4**{%
+  \putwordSee{} \putwordInfo{} \putwordfile{} \file{\ignorespaces #3{}},
+  node \samp{\ignorespaces#1{}}}
+
+% @node's only job in TeX is to define \lastnode, which is used in
+% cross-references.  The @node line might or might not have commas, and
+% might or might not have spaces before the first comma, like:
+% @node foo , bar , ...
+% We don't want such trailing spaces in the node name.
+%
+\parseargdef\node{\checkenv{}\donode #1 ,\finishnodeparse}
+%
+% also remove a trailing comma, in case of something like this:
+% @node Help-Cross,  ,  , Cross-refs
+\def\donode#1 ,#2\finishnodeparse{\dodonode #1,\finishnodeparse}
+\def\dodonode#1,#2\finishnodeparse{\gdef\lastnode{#1}\omittopnode}
+
+% Used so that the @top node doesn't have to be wrapped in an @ifnottex
+% conditional.
+% \doignore goes to more effort to skip nested conditionals but we don't need 
+% that here.
+\def\omittopnode{%
+   \ifx\lastnode\wordTop
+   \expandafter\ignorenode\fi
+}
+\def\wordTop{Top}
+
+% Until the next @node or @bye command, divert output to a box that is not 
+% output.
+\def\ignorenode{\setbox\dummybox\vbox\bgroup\def\node{\egroup\node}%
+\ignorenodebye
+}
+
+{\let\bye\relax
+\gdef\ignorenodebye{\let\bye\ignorenodebyedef}
+\gdef\ignorenodebyedef{\egroup(`Top' node ignored)\bye}}
+% The redefinition of \bye here is because it is declared \outer
+
+\let\lastnode=\empty
+
+% Write a cross-reference definition for the current node.  #1 is the
+% type (Ynumbered, Yappendix, Ynothing).
+%
+\def\donoderef#1{%
+  \ifx\lastnode\empty\else
+    \setref{\lastnode}{#1}%
+    \global\let\lastnode=\empty
+  \fi
+}
+
+% @anchor{NAME} -- define xref target at arbitrary point.
+%
+\newcount\savesfregister
+%
+\def\savesf{\relax \ifhmode \savesfregister=\spacefactor \fi}
+\def\restoresf{\relax \ifhmode \spacefactor=\savesfregister \fi}
+\def\anchor#1{\savesf \setref{#1}{Ynothing}\restoresf \ignorespaces}
+
+% \setref{NAME}{SNT} defines a cross-reference point NAME (a node or an
+% anchor), which consists of three parts:
+% 1) NAME-title - the current sectioning name taken from \currentsection,
+%                 or the anchor name.
+% 2) NAME-snt   - section number and type, passed as the SNT arg, or
+%                 empty for anchors.
+% 3) NAME-pg    - the page number.
+%
+% This is called from \donoderef, \anchor, and \dofloat.  In the case of
+% floats, there is an additional part, which is not written here:
+% 4) NAME-lof   - the text as it should appear in a @listoffloats.
+%
+\def\setref#1#2{%
+  \pdfmkdest{#1}%
+  \iflinks
+    {%
+      \requireauxfile
+      \atdummies  % preserve commands, but don't expand them
+      % match definition in \xrdef, \refx, \xrefX.
+      \def\value##1{##1}%
+      \edef\writexrdef##1##2{%
+	\write\auxfile{@xrdef{#1-% #1 of \setref, expanded by the \edef
+	  ##1}{##2}}% these are parameters of \writexrdef
+      }%
+      \toks0 = \expandafter{\currentsection}%
+      \immediate \writexrdef{title}{\the\toks0 }%
+      \immediate \writexrdef{snt}{\csname #2\endcsname}% \Ynumbered etc.
+      \safewhatsit{\writexrdef{pg}{\folio}}% will be written later, at \shipout
+    }%
+  \fi
+}
+
+% @xrefautosectiontitle on|off says whether @section(ing) names are used
+% automatically in xrefs, if the third arg is not explicitly specified.
+% This was provided as a "secret" @set xref-automatic-section-title
+% variable, now it's official.
+% 
+\parseargdef\xrefautomaticsectiontitle{%
+  \def\temp{#1}%
+  \ifx\temp\onword
+    \expandafter\let\csname SETxref-automatic-section-title\endcsname
+      = \empty
+  \else\ifx\temp\offword
+    \expandafter\let\csname SETxref-automatic-section-title\endcsname
+      = \relax
+  \else
+    \errhelp = \EMsimple
+    \errmessage{Unknown @xrefautomaticsectiontitle value `\temp',
+                must be on|off}%
+  \fi\fi
+}
+
+% 
+% @xref, @pxref, and @ref generate cross-references.  For \xrefX, #1 is
+% the node name, #2 the name of the Info cross-reference, #3 the printed
+% node name, #4 the name of the Info file, #5 the name of the printed
+% manual.  All but the node name can be omitted.
+%
+\def\pxref{\putwordsee{} \xrefXX}
+\def\xref{\putwordSee{} \xrefXX}
+\def\ref{\xrefXX}
+
+\def\xrefXX#1{\def\xrefXXarg{#1}\futurelet\tokenafterxref\xrefXXX}
+\def\xrefXXX{\expandafter\xrefX\expandafter[\xrefXXarg,,,,,,,]}
+%
+\newbox\toprefbox
+\newbox\printedrefnamebox
+\newbox\infofilenamebox
+\newbox\printedmanualbox
+%
+\def\xrefX[#1,#2,#3,#4,#5,#6]{\begingroup
+  \unsepspaces
+  %
+  % Get args without leading/trailing spaces.
+  \def\printedrefname{\ignorespaces #3}%
+  \setbox\printedrefnamebox = \hbox{\printedrefname\unskip}%
+  %
+  \def\infofilename{\ignorespaces #4}%
+  \setbox\infofilenamebox = \hbox{\infofilename\unskip}%
+  %
+  \def\printedmanual{\ignorespaces #5}%
+  \setbox\printedmanualbox  = \hbox{\printedmanual\unskip}%
+  %
+  % If the printed reference name (arg #3) was not explicitly given in
+  % the @xref, figure out what we want to use.
+  \ifdim \wd\printedrefnamebox = 0pt
+    % No printed node name was explicitly given.
+    \expandafter\ifx\csname SETxref-automatic-section-title\endcsname \relax
+      % Not auto section-title: use node name inside the square brackets.
+      \def\printedrefname{\ignorespaces #1}%
+    \else
+      % Auto section-title: use chapter/section title inside
+      % the square brackets if we have it.
+      \ifdim \wd\printedmanualbox > 0pt
+        % It is in another manual, so we don't have it; use node name.
+        \def\printedrefname{\ignorespaces #1}%
+      \else
+        \ifhavexrefs
+          % We (should) know the real title if we have the xref values.
+          \def\printedrefname{\refx{#1-title}}%
+        \else
+          % Otherwise just copy the Info node name.
+          \def\printedrefname{\ignorespaces #1}%
+        \fi%
+      \fi
+    \fi
+  \fi
+  %
+  % Make link in pdf output.
+  \ifpdf
+    % For pdfTeX and LuaTeX
+    {\indexnofonts
+     \makevalueexpandable
+     \turnoffactive
+     % This expands tokens, so do it after making catcode changes, so _
+     % etc. don't get their TeX definitions.  This ignores all spaces in
+     % #4, including (wrongly) those in the middle of the filename.
+     \getfilename{#4}%
+     %
+     % This (wrongly) does not take account of leading or trailing
+     % spaces in #1, which should be ignored.
+     \setpdfdestname{#1}%
+     %
+     \ifx\pdfdestname\empty
+       \def\pdfdestname{Top}% no empty targets
+     \fi
+     %
+     \leavevmode
+     \startlink attr{/Border [0 0 0]}%
+     \ifnum\filenamelength>0
+       goto file{\the\filename.pdf} name{\pdfdestname}%
+     \else
+       goto name{\pdfmkpgn{\pdfdestname}}%
+     \fi
+    }%
+    \setcolor{\linkcolor}%
+  \else
+    \ifx\XeTeXrevision\thisisundefined
+    \else
+      % For XeTeX
+      {\indexnofonts
+       \makevalueexpandable
+       \turnoffactive
+       % This expands tokens, so do it after making catcode changes, so _
+       % etc. don't get their TeX definitions.  This ignores all spaces in
+       % #4, including (wrongly) those in the middle of the filename.
+       \getfilename{#4}%
+       %
+       % This (wrongly) does not take account of leading or trailing
+       % spaces in #1, which should be ignored.
+       \setpdfdestname{#1}%
+       %
+       \ifx\pdfdestname\empty
+         \def\pdfdestname{Top}% no empty targets
+       \fi
+       %
+       \leavevmode
+       \ifnum\filenamelength>0
+         % With default settings,
+         % XeTeX (xdvipdfmx) replaces link destination names with integers.
+         % In this case, the replaced destination names of
+         % remote PDFs are no longer known.  In order to avoid a replacement,
+         % you can use xdvipdfmx's command line option `-C 0x0010'.
+         % If you use XeTeX 0.99996+ (TeX Live 2016+),
+         % this command line option is no longer necessary
+         % because we can use the `dvipdfmx:config' special.
+         \special{pdf:bann << /Border [0 0 0] /Type /Annot /Subtype /Link /A
+           << /S /GoToR /F (\the\filename.pdf) /D (\pdfdestname) >> >>}%
+       \else
+         \special{pdf:bann << /Border [0 0 0] /Type /Annot /Subtype /Link /A
+           << /S /GoTo /D (\pdfdestname) >> >>}%
+       \fi
+      }%
+      \setcolor{\linkcolor}%
+    \fi
+  \fi
+  {%
+    % Have to otherify everything special to allow the \csname to
+    % include an _ in the xref name, etc.
+    \indexnofonts
+    \turnoffactive
+    \def\value##1{##1}%
+    \expandafter\global\expandafter\let\expandafter\Xthisreftitle
+      \csname XR#1-title\endcsname
+  }%
+  %
+  % Float references are printed completely differently: "Figure 1.2"
+  % instead of "[somenode], p.3".  \iffloat distinguishes them by
+  % \Xthisreftitle being set to a magic string.
+  \iffloat\Xthisreftitle
+    % If the user specified the print name (third arg) to the ref,
+    % print it instead of our usual "Figure 1.2".
+    \ifdim\wd\printedrefnamebox = 0pt
+      \refx{#1-snt}%
+    \else
+      \printedrefname
+    \fi
+    %
+    % If the user also gave the printed manual name (fifth arg), append
+    % "in MANUALNAME".
+    \ifdim \wd\printedmanualbox > 0pt
+      \space \putwordin{} \cite{\printedmanual}%
+    \fi
+  \else
+    % node/anchor (non-float) references.
+    % 
+    % If we use \unhbox to print the node names, TeX does not insert
+    % empty discretionaries after hyphens, which means that it will not
+    % find a line break at a hyphen in a node names.  Since some manuals
+    % are best written with fairly long node names, containing hyphens,
+    % this is a loss.  Therefore, we give the text of the node name
+    % again, so it is as if TeX is seeing it for the first time.
+    % 
+    \ifdim \wd\printedmanualbox > 0pt
+      % Cross-manual reference with a printed manual name.
+      % 
+      \crossmanualxref{\cite{\printedmanual\unskip}}%
+    %
+    \else\ifdim \wd\infofilenamebox > 0pt
+      % Cross-manual reference with only an info filename (arg 4), no
+      % printed manual name (arg 5).  This is essentially the same as
+      % the case above; we output the filename, since we have nothing else.
+      % 
+      \crossmanualxref{\code{\infofilename\unskip}}%
+    %
+    \else
+      % Reference within this manual.
+      %
+      % Only output a following space if the -snt ref is nonempty, as the ref
+      % will be empty for @unnumbered and @anchor.
+      \setbox2 = \hbox{\ignorespaces \refx{#1-snt}}%
+      \ifdim \wd2 > 0pt \refx{#1-snt}\space\fi
+      %
+      % output the `[mynode]' via the macro below so it can be overridden.
+      \xrefprintnodename\printedrefname
+      %
+      \expandafter\ifx\csname SETtxiomitxrefpg\endcsname\relax
+        % But we always want a comma and a space:
+        ,\space
+        %
+        % output the `page 3'.
+        \turnoffactive \putwordpage\tie\refx{#1-pg}%
+        % Add a , if xref followed by a space
+        \if\space\noexpand\tokenafterxref ,%
+        \else\ifx\	\tokenafterxref ,% @TAB
+        \else\ifx\*\tokenafterxref ,%   @*
+        \else\ifx\ \tokenafterxref ,%   @SPACE
+        \else\ifx\
+                  \tokenafterxref ,%    @NL
+        \else\ifx\tie\tokenafterxref ,% @tie
+        \fi\fi\fi\fi\fi\fi
+      \fi
+    \fi\fi
+  \fi
+  \endlink
+\endgroup}
+
+% Output a cross-manual xref to #1.  Used just above (twice).
+% 
+% Only include the text "Section ``foo'' in" if the foo is neither
+% missing or Top.  Thus, @xref{,,,foo,The Foo Manual} outputs simply
+% "see The Foo Manual", the idea being to refer to the whole manual.
+% 
+% But, this being TeX, we can't easily compare our node name against the
+% string "Top" while ignoring the possible spaces before and after in
+% the input.  By adding the arbitrary 7sp below, we make it much less
+% likely that a real node name would have the same width as "Top" (e.g.,
+% in a monospaced font).  Hopefully it will never happen in practice.
+% 
+% For the same basic reason, we retypeset the "Top" at every
+% reference, since the current font is indeterminate.
+% 
+\def\crossmanualxref#1{%
+  \setbox\toprefbox = \hbox{Top\kern7sp}%
+  \setbox2 = \hbox{\ignorespaces \printedrefname \unskip \kern7sp}%
+  \ifdim \wd2 > 7sp  % nonempty?
+    \ifdim \wd2 = \wd\toprefbox \else  % same as Top?
+      \putwordSection{} ``\printedrefname'' \putwordin{}\space
+    \fi
+  \fi
+  #1%
+}
+
+% This macro is called from \xrefX for the `[nodename]' part of xref
+% output.  It's a separate macro only so it can be changed more easily,
+% since square brackets don't work well in some documents.  Particularly
+% one that Bob is working on :).
+%
+\def\xrefprintnodename#1{[#1]}
+
+% Things referred to by \setref.
+%
+\def\Ynothing{}
+\def\Yomitfromtoc{}
+\def\Ynumbered{%
+  \ifnum\secno=0
+    \putwordChapter@tie \the\chapno
+  \else \ifnum\subsecno=0
+    \putwordSection@tie \the\chapno.\the\secno
+  \else \ifnum\subsubsecno=0
+    \putwordSection@tie \the\chapno.\the\secno.\the\subsecno
+  \else
+    \putwordSection@tie \the\chapno.\the\secno.\the\subsecno.\the\subsubsecno
+  \fi\fi\fi
+}
+\def\Yappendix{%
+  \ifnum\secno=0
+     \putwordAppendix@tie @char\the\appendixno{}%
+  \else \ifnum\subsecno=0
+     \putwordSection@tie @char\the\appendixno.\the\secno
+  \else \ifnum\subsubsecno=0
+    \putwordSection@tie @char\the\appendixno.\the\secno.\the\subsecno
+  \else
+    \putwordSection@tie
+      @char\the\appendixno.\the\secno.\the\subsecno.\the\subsubsecno
+  \fi\fi\fi
+}
+
+% \refx{NAME} - reference a cross-reference string named NAME.
+\def\refx#1{%
+  \requireauxfile
+  {%
+    \indexnofonts
+    \turnoffactive
+    \def\value##1{##1}%
+    \expandafter\global\expandafter\let\expandafter\thisrefX
+      \csname XR#1\endcsname
+  }%
+  \ifx\thisrefX\relax
+    % If not defined, say something at least.
+    \angleleft un\-de\-fined\angleright
+    \iflinks
+      \ifhavexrefs
+        {\toks0 = {#1}% avoid expansion of possibly-complex value
+         \message{\linenumber Undefined cross reference `\the\toks0'.}}%
+      \else
+        \ifwarnedxrefs\else
+          \global\warnedxrefstrue
+          \message{Cross reference values unknown; you must run TeX again.}%
+        \fi
+      \fi
+    \fi
+  \else
+    % It's defined, so just use it.
+    \thisrefX
+  \fi
+}
+
+% This is the macro invoked by entries in the aux file.  Define a control 
+% sequence for a cross-reference target (we prepend XR to the control sequence 
+% name to avoid collisions).  The value is the page number.  If this is a float 
+% type, we have more work to do.
+%
+\def\xrdef#1#2{%
+  {% Expand the node or anchor name to remove control sequences.
+   % \turnoffactive stops 8-bit characters being changed to commands
+   % like @'e.  \refx does the same to retrieve the value in the definition.
+    \indexnofonts
+    \turnoffactive
+    \def\value##1{##1}%
+    \xdef\safexrefname{#1}%
+  }%
+  %
+  \bgroup
+    \expandafter\gdef\csname XR\safexrefname\endcsname{#2}%
+  \egroup
+  % We put the \gdef inside a group to avoid the definitions building up on 
+  % TeX's save stack, which can cause it to run out of space for aux files with 
+  % thousands of lines.  \gdef doesn't use the save stack, but \csname does
+  % when it defines an unknown control sequence as \relax. 
+  %
+  % Was that xref control sequence that we just defined for a float?
+  \expandafter\iffloat\csname XR\safexrefname\endcsname
+    % it was a float, and we have the (safe) float type in \iffloattype.
+    \expandafter\let\expandafter\floatlist
+      \csname floatlist\iffloattype\endcsname
+    %
+    % Is this the first time we've seen this float type?
+    \expandafter\ifx\floatlist\relax
+      \toks0 = {\do}% yes, so just \do
+    \else
+      % had it before, so preserve previous elements in list.
+      \toks0 = \expandafter{\floatlist\do}%
+    \fi
+    %
+    % Remember this xref in the control sequence \floatlistFLOATTYPE,
+    % for later use in \listoffloats.
+    \expandafter\xdef\csname floatlist\iffloattype\endcsname{\the\toks0
+      {\safexrefname}}%
+  \fi
+}
+
+% If working on a large document in chapters, it is convenient to
+% be able to disable indexing, cross-referencing, and contents, for test runs.
+% This is done with @novalidate at the beginning of the file.
+%
+\newif\iflinks \linkstrue % by default we want the aux files.
+\let\novalidate = \linksfalse
+
+% Used when writing to the aux file, or when using data from it.
+\def\requireauxfile{%
+  \iflinks
+    \tryauxfile
+    % Open the new aux file.  TeX will close it automatically at exit.
+    \immediate\openout\auxfile=\jobname.aux
+  \fi
+  \global\let\requireauxfile=\relax   % Only do this once.
+}
+
+% Read the last existing aux file, if any.  No error if none exists.
+%
+\def\tryauxfile{%
+  \openin 1 \jobname.aux
+  \ifeof 1 \else
+    \readdatafile{aux}%
+    \global\havexrefstrue
+  \fi
+  \closein 1
+}
+
+\def\setupdatafile{%
+  \catcode`\^^@=\other
+  \catcode`\^^A=\other
+  \catcode`\^^B=\other
+  \catcode`\^^C=\other
+  \catcode`\^^D=\other
+  \catcode`\^^E=\other
+  \catcode`\^^F=\other
+  \catcode`\^^G=\other
+  \catcode`\^^H=\other
+  \catcode`\^^K=\other
+  \catcode`\^^L=\other
+  \catcode`\^^N=\other
+  \catcode`\^^P=\other
+  \catcode`\^^Q=\other
+  \catcode`\^^R=\other
+  \catcode`\^^S=\other
+  \catcode`\^^T=\other
+  \catcode`\^^U=\other
+  \catcode`\^^V=\other
+  \catcode`\^^W=\other
+  \catcode`\^^X=\other
+  \catcode`\^^Z=\other
+  \catcode`\^^[=\other
+  \catcode`\^^\=\other
+  \catcode`\^^]=\other
+  \catcode`\^^^=\other
+  \catcode`\^^_=\other
+  \catcode`\^=\other
+  %
+  % Special characters.  Should be turned off anyway, but...
+  \catcode`\~=\other
+  \catcode`\[=\other
+  \catcode`\]=\other
+  \catcode`\"=\other
+  \catcode`\_=\active
+  \catcode`\|=\active
+  \catcode`\<=\active
+  \catcode`\>=\active
+  \catcode`\$=\other
+  \catcode`\#=\other
+  \catcode`\&=\other
+  \catcode`\%=\other
+  \catcode`+=\other % avoid \+ for paranoia even though we've turned it off
+  %
+  \catcode`\\=\active
+  %
+  % @ is our escape character in .aux files, and we need braces.
+  \catcode`\{=1
+  \catcode`\}=2
+  \catcode`\@=0
+}
+
+\def\readdatafile#1{%
+\begingroup
+  \setupdatafile
+  \input\jobname.#1
+\endgroup}
+
+
+\message{insertions,}
+% including footnotes.
+
+\newcount \footnoteno
+
+% The trailing space in the following definition for supereject is
+% vital for proper filling; pages come out unaligned when you do a
+% pagealignmacro call if that space before the closing brace is
+% removed. (Generally, numeric constants should always be followed by a
+% space to prevent strange expansion errors.)
+\def\supereject{\par\penalty -20000\footnoteno =0 }
+
+% @footnotestyle is meaningful for Info output only.
+\let\footnotestyle=\comment
+
+{\catcode `\@=11
+%
+% Auto-number footnotes.  Otherwise like plain.
+\gdef\footnote{%
+  \global\advance\footnoteno by \@ne
+  \edef\thisfootno{$^{\the\footnoteno}$}%
+  %
+  % In case the footnote comes at the end of a sentence, preserve the
+  % extra spacing after we do the footnote number.
+  \let\@sf\empty
+  \ifhmode\edef\@sf{\spacefactor\the\spacefactor}\ptexslash\fi
+  %
+  % Remove inadvertent blank space before typesetting the footnote number.
+  \unskip
+  \thisfootno\@sf
+  \dofootnote
+}%
+
+% Don't bother with the trickery in plain.tex to not require the
+% footnote text as a parameter.  Our footnotes don't need to be so general.
+%
+% Oh yes, they do; otherwise, @ifset (and anything else that uses
+% \parseargline) fails inside footnotes because the tokens are fixed when
+% the footnote is read.  --karl, 16nov96.
+%
+\gdef\dofootnote{%
+  \insert\footins\bgroup
+  %
+  % Nested footnotes are not supported in TeX, that would take a lot
+  % more work.  (\startsavinginserts does not suffice.)
+  \let\footnote=\errfootnotenest
+  %
+  % We want to typeset this text as a normal paragraph, even if the
+  % footnote reference occurs in (for example) a display environment.
+  % So reset some parameters.
+  \hsize=\txipagewidth
+  \interlinepenalty\interfootnotelinepenalty
+  \splittopskip\ht\strutbox % top baseline for broken footnotes
+  \splitmaxdepth\dp\strutbox
+  \floatingpenalty\@MM
+  \leftskip\z@skip
+  \rightskip\z@skip
+  \spaceskip\z@skip
+  \xspaceskip\z@skip
+  \parindent\defaultparindent
+  %
+  \smallfonts \rm
+  %
+  % Because we use hanging indentation in footnotes, a @noindent appears
+  % to exdent this text, so make it be a no-op.  makeinfo does not use
+  % hanging indentation so @noindent can still be needed within footnote
+  % text after an @example or the like (not that this is good style).
+  \let\noindent = \relax
+  %
+  % Hang the footnote text off the number.  Use \everypar in case the
+  % footnote extends for more than one paragraph.
+  \everypar = {\hang}%
+  \textindent{\thisfootno}%
+  %
+  % Don't crash into the line above the footnote text.  Since this
+  % expands into a box, it must come within the paragraph, lest it
+  % provide a place where TeX can split the footnote.
+  \footstrut
+  %
+  % Invoke rest of plain TeX footnote routine.
+  \futurelet\next\fo@t
+}
+}%end \catcode `\@=11
+
+\def\errfootnotenest{%
+  \errhelp=\EMsimple
+  \errmessage{Nested footnotes not supported in texinfo.tex,
+    even though they work in makeinfo; sorry}
+}
+
+\def\errfootnoteheading{%
+  \errhelp=\EMsimple
+  \errmessage{Footnotes in chapters, sections, etc., are not supported}
+}
+
+% In case a @footnote appears in a vbox, save the footnote text and create
+% the real \insert just after the vbox finished.  Otherwise, the insertion
+% would be lost.
+% Similarly, if a @footnote appears inside an alignment, save the footnote
+% text to a box and make the \insert when a row of the table is finished.
+% And the same can be done for other insert classes.  --kasal, 16nov03.
+%
+% Replace the \insert primitive by a cheating macro.
+% Deeper inside, just make sure that the saved insertions are not spilled
+% out prematurely.
+%
+\def\startsavinginserts{%
+  \ifx \insert\ptexinsert
+    \let\insert\saveinsert
+  \else
+    \let\checkinserts\relax
+  \fi
+}
+
+% This \insert replacement works for both \insert\footins{foo} and
+% \insert\footins\bgroup foo\egroup, but it doesn't work for \insert27{foo}.
+%
+\def\saveinsert#1{%
+  \edef\next{\noexpand\savetobox \makeSAVEname#1}%
+  \afterassignment\next
+  % swallow the left brace
+  \let\temp =
+}
+\def\makeSAVEname#1{\makecsname{SAVE\expandafter\gobble\string#1}}
+\def\savetobox#1{\global\setbox#1 = \vbox\bgroup \unvbox#1}
+
+\def\checksaveins#1{\ifvoid#1\else \placesaveins#1\fi}
+
+\def\placesaveins#1{%
+  \ptexinsert \csname\expandafter\gobblesave\string#1\endcsname
+    {\box#1}%
+}
+
+% eat @SAVE -- beware, all of them have catcode \other:
+{
+  \def\dospecials{\do S\do A\do V\do E} \uncatcodespecials  %  ;-)
+  \gdef\gobblesave @SAVE{}
+}
+
+% initialization:
+\def\newsaveins #1{%
+  \edef\next{\noexpand\newsaveinsX \makeSAVEname#1}%
+  \next
+}
+\def\newsaveinsX #1{%
+  \csname newbox\endcsname #1%
+  \expandafter\def\expandafter\checkinserts\expandafter{\checkinserts
+    \checksaveins #1}%
+}
+
+% initialize:
+\let\checkinserts\empty
+\newsaveins\footins
+\newsaveins\margin
+
+
+% @image.  We use the macros from epsf.tex to support this.
+% If epsf.tex is not installed and @image is used, we complain.
+%
+% Check for and read epsf.tex up front.  If we read it only at @image
+% time, we might be inside a group, and then its definitions would get
+% undone and the next image would fail.
+\openin 1 = epsf.tex
+\ifeof 1 \else
+  % Do not bother showing banner with epsf.tex v2.7k (available in
+  % doc/epsf.tex and on ctan).
+  \def\epsfannounce{\toks0 = }%
+  \input epsf.tex
+\fi
+\closein 1
+%
+% We will only complain once about lack of epsf.tex.
+\newif\ifwarnednoepsf
+\newhelp\noepsfhelp{epsf.tex must be installed for images to
+  work.  It is also included in the Texinfo distribution, or you can get
+  it from https://ctan.org/texarchive/macros/texinfo/texinfo/doc/epsf.tex.}
+%
+\def\image#1{%
+  \ifx\epsfbox\thisisundefined
+    \ifwarnednoepsf \else
+      \errhelp = \noepsfhelp
+      \errmessage{epsf.tex not found, images will be ignored}%
+      \global\warnednoepsftrue
+    \fi
+  \else
+    \imagexxx #1,,,,,\finish
+  \fi
+}
+%
+% Arguments to @image:
+% #1 is (mandatory) image filename; we tack on .eps extension.
+% #2 is (optional) width, #3 is (optional) height.
+% #4 is (ignored optional) html alt text.
+% #5 is (ignored optional) extension.
+% #6 is just the usual extra ignored arg for parsing stuff.
+\newif\ifimagevmode
+\def\imagexxx#1,#2,#3,#4,#5,#6\finish{\begingroup
+  \catcode`\^^M = 5     % in case we're inside an example
+  \normalturnoffactive  % allow _ et al. in names
+  \makevalueexpandable
+  % If the image is by itself, center it.
+  \ifvmode
+    \imagevmodetrue
+  \else \ifx\centersub\centerV
+    % for @center @image, we need a vbox so we can have our vertical space
+    \imagevmodetrue
+    \vbox\bgroup % vbox has better behavior than vtop herev
+  \fi\fi
+  %
+  \ifimagevmode
+    \nobreak\medskip
+    % Usually we'll have text after the image which will insert
+    % \parskip glue, so insert it here too to equalize the space
+    % above and below.
+    \nobreak\vskip\parskip
+    \nobreak
+  \fi
+  %
+  % Leave vertical mode so that indentation from an enclosing
+  %  environment such as @quotation is respected.
+  % However, if we're at the top level, we don't want the
+  %  normal paragraph indentation.
+  % On the other hand, if we are in the case of @center @image, we don't
+  %  want to start a paragraph, which will create a hsize-width box and
+  %  eradicate the centering.
+  \ifx\centersub\centerV \else \imageindent \fi
+  %
+  % Output the image.
+  \ifpdf
+    % For pdfTeX and LuaTeX <= 0.80
+    \dopdfimage{#1}{#2}{#3}%
+  \else
+    \ifx\XeTeXrevision\thisisundefined
+      % For epsf.tex
+      % \epsfbox itself resets \epsf?size at each figure.
+      \setbox0 = \hbox{\ignorespaces #2}%
+        \ifdim\wd0 > 0pt \epsfxsize=#2\relax \fi
+      \setbox0 = \hbox{\ignorespaces #3}%
+        \ifdim\wd0 > 0pt \epsfysize=#3\relax \fi
+      \epsfbox{#1.eps}%
+    \else
+      % For XeTeX
+      \doxeteximage{#1}{#2}{#3}%
+    \fi
+  \fi
+  %
+  \ifimagevmode
+    \medskip  % space after a standalone image
+  \fi  
+  \ifx\centersub\centerV \egroup \fi
+\endgroup}
+
+
+% @float FLOATTYPE,LABEL,LOC ... @end float for displayed figures, tables,
+% etc.  We don't actually implement floating yet, we always include the
+% float "here".  But it seemed the best name for the future.
+%
+\envparseargdef\float{\eatcommaspace\eatcommaspace\dofloat#1, , ,\finish}
+
+% There may be a space before second and/or third parameter; delete it.
+\def\eatcommaspace#1, {#1,}
+
+% #1 is the optional FLOATTYPE, the text label for this float, typically
+% "Figure", "Table", "Example", etc.  Can't contain commas.  If omitted,
+% this float will not be numbered and cannot be referred to.
+%
+% #2 is the optional xref label.  Also must be present for the float to
+% be referable.
+%
+% #3 is the optional positioning argument; for now, it is ignored.  It
+% will somehow specify the positions allowed to float to (here, top, bottom).
+%
+% We keep a separate counter for each FLOATTYPE, which we reset at each
+% chapter-level command.
+\let\resetallfloatnos=\empty
+%
+\def\dofloat#1,#2,#3,#4\finish{%
+  \let\thiscaption=\empty
+  \let\thisshortcaption=\empty
+  %
+  % don't lose footnotes inside @float.
+  %
+  % BEWARE: when the floats start float, we have to issue warning whenever an
+  % insert appears inside a float which could possibly float. --kasal, 26may04
+  %
+  \startsavinginserts
+  %
+  % We can't be used inside a paragraph.
+  \par
+  %
+  \vtop\bgroup
+    \def\floattype{#1}%
+    \def\floatlabel{#2}%
+    \def\floatloc{#3}% we do nothing with this yet.
+    %
+    \ifx\floattype\empty
+      \let\safefloattype=\empty
+    \else
+      {%
+        % the floattype might have accents or other special characters,
+        % but we need to use it in a control sequence name.
+        \indexnofonts
+        \turnoffactive
+        \xdef\safefloattype{\floattype}%
+      }%
+    \fi
+    %
+    % If label is given but no type, we handle that as the empty type.
+    \ifx\floatlabel\empty \else
+      % We want each FLOATTYPE to be numbered separately (Figure 1,
+      % Table 1, Figure 2, ...).  (And if no label, no number.)
+      %
+      \expandafter\getfloatno\csname\safefloattype floatno\endcsname
+      \global\advance\floatno by 1
+      %
+      {%
+        % This magic value for \currentsection is output by \setref as the
+        % XREFLABEL-title value.  \xrefX uses it to distinguish float
+        % labels (which have a completely different output format) from
+        % node and anchor labels.  And \xrdef uses it to construct the
+        % lists of floats.
+        %
+        \edef\currentsection{\floatmagic=\safefloattype}%
+        \setref{\floatlabel}{Yfloat}%
+      }%
+    \fi
+    %
+    % start with \parskip glue, I guess.
+    \vskip\parskip
+    %
+    % Don't suppress indentation if a float happens to start a section.
+    \restorefirstparagraphindent
+}
+
+% we have these possibilities:
+% @float Foo,lbl & @caption{Cap}: Foo 1.1: Cap
+% @float Foo,lbl & no caption:    Foo 1.1
+% @float Foo & @caption{Cap}:     Foo: Cap
+% @float Foo & no caption:        Foo
+% @float ,lbl & Caption{Cap}:     1.1: Cap
+% @float ,lbl & no caption:       1.1
+% @float & @caption{Cap}:         Cap
+% @float & no caption:
+%
+\def\Efloat{%
+    \let\floatident = \empty
+    %
+    % In all cases, if we have a float type, it comes first.
+    \ifx\floattype\empty \else \def\floatident{\floattype}\fi
+    %
+    % If we have an xref label, the number comes next.
+    \ifx\floatlabel\empty \else
+      \ifx\floattype\empty \else % if also had float type, need tie first.
+        \appendtomacro\floatident{\tie}%
+      \fi
+      % the number.
+      \appendtomacro\floatident{\chaplevelprefix\the\floatno}%
+    \fi
+    %
+    % Start the printed caption with what we've constructed in
+    % \floatident, but keep it separate; we need \floatident again.
+    \let\captionline = \floatident
+    %
+    \ifx\thiscaption\empty \else
+      \ifx\floatident\empty \else
+        \appendtomacro\captionline{: }% had ident, so need a colon between
+      \fi
+      %
+      % caption text.
+      \appendtomacro\captionline{\scanexp\thiscaption}%
+    \fi
+    %
+    % If we have anything to print, print it, with space before.
+    % Eventually this needs to become an \insert.
+    \ifx\captionline\empty \else
+      \vskip.5\parskip
+      \captionline
+      %
+      % Space below caption.
+      \vskip\parskip
+    \fi
+    %
+    % If have an xref label, write the list of floats info.  Do this
+    % after the caption, to avoid chance of it being a breakpoint.
+    \ifx\floatlabel\empty \else
+      % Write the text that goes in the lof to the aux file as
+      % \floatlabel-lof.  Besides \floatident, we include the short
+      % caption if specified, else the full caption if specified, else nothing.
+      {%
+        \requireauxfile
+        \atdummies
+        %
+        \ifx\thisshortcaption\empty
+          \def\gtemp{\thiscaption}%
+        \else
+          \def\gtemp{\thisshortcaption}%
+        \fi
+        \immediate\write\auxfile{@xrdef{\floatlabel-lof}{\floatident
+          \ifx\gtemp\empty \else : \gtemp \fi}}%
+      }%
+    \fi
+  \egroup  % end of \vtop
+  %
+  \checkinserts
+}
+
+% Append the tokens #2 to the definition of macro #1, not expanding either.
+%
+\def\appendtomacro#1#2{%
+  \expandafter\def\expandafter#1\expandafter{#1#2}%
+}
+
+% @caption, @shortcaption
+%
+\def\caption{\docaption\thiscaption}
+\def\shortcaption{\docaption\thisshortcaption}
+\def\docaption{\checkenv\float \bgroup\scanargctxt\defcaption}
+\def\defcaption#1#2{\egroup \def#1{#2}}
+
+% The parameter is the control sequence identifying the counter we are
+% going to use.  Create it if it doesn't exist and assign it to \floatno.
+\def\getfloatno#1{%
+  \ifx#1\relax
+      % Haven't seen this figure type before.
+      \csname newcount\endcsname #1%
+      %
+      % Remember to reset this floatno at the next chap.
+      \expandafter\gdef\expandafter\resetallfloatnos
+        \expandafter{\resetallfloatnos #1=0 }%
+  \fi
+  \let\floatno#1%
+}
+
+% \setref calls this to get the XREFLABEL-snt value.  We want an @xref
+% to the FLOATLABEL to expand to "Figure 3.1".  We call \setref when we
+% first read the @float command.
+%
+\def\Yfloat{\floattype@tie \chaplevelprefix\the\floatno}%
+
+% Magic string used for the XREFLABEL-title value, so \xrefX can
+% distinguish floats from other xref types.
+\def\floatmagic{!!float!!}
+
+% #1 is the control sequence we are passed; we expand into a conditional
+% which is true if #1 represents a float ref.  That is, the magic
+% \currentsection value which we \setref above.
+%
+\def\iffloat#1{\expandafter\doiffloat#1==\finish}
+%
+% #1 is (maybe) the \floatmagic string.  If so, #2 will be the
+% (safe) float type for this float.  We set \iffloattype to #2.
+%
+\def\doiffloat#1=#2=#3\finish{%
+  \def\temp{#1}%
+  \def\iffloattype{#2}%
+  \ifx\temp\floatmagic
+}
+
+% @listoffloats FLOATTYPE - print a list of floats like a table of contents.
+%
+\parseargdef\listoffloats{%
+  \def\floattype{#1}% floattype
+  {%
+    % the floattype might have accents or other special characters,
+    % but we need to use it in a control sequence name.
+    \indexnofonts
+    \turnoffactive
+    \xdef\safefloattype{\floattype}%
+  }%
+  %
+  % \xrdef saves the floats as a \do-list in \floatlistSAFEFLOATTYPE.
+  \expandafter\ifx\csname floatlist\safefloattype\endcsname \relax
+    \ifhavexrefs
+      % if the user said @listoffloats foo but never @float foo.
+      \message{\linenumber No `\safefloattype' floats to list.}%
+    \fi
+  \else
+    \begingroup
+      \leftskip=\tocindent  % indent these entries like a toc
+      \let\do=\listoffloatsdo
+      \csname floatlist\safefloattype\endcsname
+    \endgroup
+  \fi
+}
+
+% This is called on each entry in a list of floats.  We're passed the
+% xref label, in the form LABEL-title, which is how we save it in the
+% aux file.  We strip off the -title and look up \XRLABEL-lof, which
+% has the text we're supposed to typeset here.
+%
+% Figures without xref labels will not be included in the list (since
+% they won't appear in the aux file).
+%
+\def\listoffloatsdo#1{\listoffloatsdoentry#1\finish}
+\def\listoffloatsdoentry#1-title\finish{{%
+  % Can't fully expand XR#1-lof because it can contain anything.  Just
+  % pass the control sequence.  On the other hand, XR#1-pg is just the
+  % page number, and we want to fully expand that so we can get a link
+  % in pdf output.
+  \toksA = \expandafter{\csname XR#1-lof\endcsname}%
+  %
+  % use the same \entry macro we use to generate the TOC and index.
+  \edef\writeentry{\noexpand\entry{\the\toksA}{\csname XR#1-pg\endcsname}}%
+  \writeentry
+}}
+
+
+\message{localization,}
+
+% For single-language documents, @documentlanguage is usually given very
+% early, just after @documentencoding.  Single argument is the language
+% (de) or locale (de_DE) abbreviation.
+%
+{
+  \catcode`\_ = \active
+  \globaldefs=1
+\parseargdef\documentlanguage{%
+  \tex % read txi-??.tex file in plain TeX.
+    % Read the file by the name they passed if it exists.
+    \let_ = \normalunderscore  % normal _ character for filename test
+    \openin 1 txi-#1.tex
+    \ifeof 1
+      \documentlanguagetrywithoutunderscore #1_\finish
+    \else
+      \globaldefs = 1  % everything in the txi-LL files needs to persist
+      \input txi-#1.tex
+    \fi
+    \closein 1
+  \endgroup % end raw TeX
+}
+%
+% If they passed de_DE, and txi-de_DE.tex doesn't exist,
+% try txi-de.tex.
+%
+\gdef\documentlanguagetrywithoutunderscore#1_#2\finish{%
+  \openin 1 txi-#1.tex
+  \ifeof 1
+    \errhelp = \nolanghelp
+    \errmessage{Cannot read language file txi-#1.tex}%
+  \else
+    \globaldefs = 1  % everything in the txi-LL files needs to persist
+    \input txi-#1.tex
+  \fi
+  \closein 1
+}
+}% end of special _ catcode
+%
+\newhelp\nolanghelp{The given language definition file cannot be found or
+is empty.  Maybe you need to install it?  Putting it in the current
+directory should work if nowhere else does.}
+
+% This macro is called from txi-??.tex files; the first argument is the
+% \language name to set (without the "\lang@" prefix), the second and
+% third args are \{left,right}hyphenmin.
+%
+% The language names to pass are determined when the format is built.
+% See the etex.log file created at that time, e.g.,
+% /usr/local/texlive/2008/texmf-var/web2c/pdftex/etex.log.
+%
+% With TeX Live 2008, etex now includes hyphenation patterns for all
+% available languages.  This means we can support hyphenation in
+% Texinfo, at least to some extent.  (This still doesn't solve the
+% accented characters problem.)
+%
+\catcode`@=11
+\def\txisetlanguage#1#2#3{%
+  % do not set the language if the name is undefined in the current TeX.
+  \expandafter\ifx\csname lang@#1\endcsname \relax
+    \message{no patterns for #1}%
+  \else
+    \global\language = \csname lang@#1\endcsname
+  \fi
+  % but there is no harm in adjusting the hyphenmin values regardless.
+  \global\lefthyphenmin = #2\relax
+  \global\righthyphenmin = #3\relax
+}
+
+% XeTeX and LuaTeX can handle Unicode natively.
+% Their default I/O uses UTF-8 sequences instead of a byte-wise operation.
+% Other TeX engines' I/O (pdfTeX, etc.) is byte-wise.
+%
+\newif\iftxinativeunicodecapable
+\newif\iftxiusebytewiseio
+
+\ifx\XeTeXrevision\thisisundefined
+  \ifx\luatexversion\thisisundefined
+    \txinativeunicodecapablefalse
+    \txiusebytewiseiotrue
+  \else
+    \txinativeunicodecapabletrue
+    \txiusebytewiseiofalse
+  \fi
+\else
+  \txinativeunicodecapabletrue
+  \txiusebytewiseiofalse
+\fi
+
+% Set I/O by bytes instead of UTF-8 sequence for XeTeX and LuaTex
+% for non-UTF-8 (byte-wise) encodings.
+%
+\def\setbytewiseio{%
+  \ifx\XeTeXrevision\thisisundefined
+  \else
+    \XeTeXdefaultencoding "bytes"  % For subsequent files to be read
+    \XeTeXinputencoding "bytes"  % For document root file
+    % Unfortunately, there seems to be no corresponding XeTeX command for
+    % output encoding.  This is a problem for auxiliary index and TOC files.
+    % The only solution would be perhaps to write out @U{...} sequences in
+    % place of non-ASCII characters.
+  \fi
+
+  \ifx\luatexversion\thisisundefined
+  \else
+    \directlua{
+    local utf8_char, byte, gsub = unicode.utf8.char, string.byte, string.gsub
+    local function convert_char (char)
+      return utf8_char(byte(char))
+    end
+
+    local function convert_line (line)
+      return gsub(line, ".", convert_char)
+    end
+
+    callback.register("process_input_buffer", convert_line)
+
+    local function convert_line_out (line)
+      local line_out = ""
+      for c in string.utfvalues(line) do
+         line_out = line_out .. string.char(c)
+      end
+      return line_out
+    end
+
+    callback.register("process_output_buffer", convert_line_out)
+    }
+  \fi
+
+  \txiusebytewiseiotrue
+}
+
+
+% Helpers for encodings.
+% Set the catcode of characters 128 through 255 to the specified number.
+%
+\def\setnonasciicharscatcode#1{%
+   \count255=128
+   \loop\ifnum\count255<256
+      \global\catcode\count255=#1\relax
+      \advance\count255 by 1
+   \repeat
+}
+
+\def\setnonasciicharscatcodenonglobal#1{%
+   \count255=128
+   \loop\ifnum\count255<256
+      \catcode\count255=#1\relax
+      \advance\count255 by 1
+   \repeat
+}
+
+% @documentencoding sets the definition of non-ASCII characters
+% according to the specified encoding.
+%
+\def\documentencoding{\parseargusing\filenamecatcodes\documentencodingzzz}
+\def\documentencodingzzz#1{%
+  %
+  % Encoding being declared for the document.
+  \def\declaredencoding{\csname #1.enc\endcsname}%
+  %
+  % Supported encodings: names converted to tokens in order to be able
+  % to compare them with \ifx.
+  \def\ascii{\csname US-ASCII.enc\endcsname}%
+  \def\latnine{\csname ISO-8859-15.enc\endcsname}%
+  \def\latone{\csname ISO-8859-1.enc\endcsname}%
+  \def\lattwo{\csname ISO-8859-2.enc\endcsname}%
+  \def\utfeight{\csname UTF-8.enc\endcsname}%
+  %
+  \ifx \declaredencoding \ascii
+     \asciichardefs
+  %
+  \else \ifx \declaredencoding \lattwo
+     \iftxinativeunicodecapable
+       \setbytewiseio
+     \fi
+     \setnonasciicharscatcode\active
+     \lattwochardefs
+  %
+  \else \ifx \declaredencoding \latone
+     \iftxinativeunicodecapable
+       \setbytewiseio
+     \fi
+     \setnonasciicharscatcode\active
+     \latonechardefs
+  %
+  \else \ifx \declaredencoding \latnine
+     \iftxinativeunicodecapable
+       \setbytewiseio
+     \fi
+     \setnonasciicharscatcode\active
+     \latninechardefs
+  %
+  \else \ifx \declaredencoding \utfeight
+     \iftxinativeunicodecapable
+       % For native Unicode handling (XeTeX and LuaTeX)
+       \nativeunicodechardefs
+     \else
+       % For treating UTF-8 as byte sequences (TeX, eTeX and pdfTeX)
+       \setnonasciicharscatcode\active
+       % since we already invoked \utfeightchardefs at the top level
+       % (below), do not re-invoke it, otherwise our check for duplicated
+       % definitions gets triggered.  Making non-ascii chars active is
+       % sufficient.
+     \fi
+  %
+  \else
+    \message{Ignoring unknown document encoding: #1.}%
+  %
+  \fi % utfeight
+  \fi % latnine
+  \fi % latone
+  \fi % lattwo
+  \fi % ascii
+  %
+  \ifx\XeTeXrevision\thisisundefined
+  \else
+    \ifx \declaredencoding \utfeight
+    \else
+      \ifx \declaredencoding \ascii
+      \else
+        \message{Warning: XeTeX with non-UTF-8 encodings cannot handle %
+        non-ASCII characters in auxiliary files.}%
+      \fi
+    \fi
+  \fi
+}
+
+% emacs-page
+% A message to be logged when using a character that isn't available
+% the default font encoding (OT1).
+%
+\def\missingcharmsg#1{\message{Character missing, sorry: #1.}}
+
+% Take account of \c (plain) vs. \, (Texinfo) difference.
+\def\cedilla#1{\ifx\c\ptexc\c{#1}\else\,{#1}\fi}
+
+% First, make active non-ASCII characters in order for them to be
+% correctly categorized when TeX reads the replacement text of
+% macros containing the character definitions.
+\setnonasciicharscatcode\active
+%
+
+\def\gdefchar#1#2{%
+\gdef#1{%
+   \ifpassthroughchars
+     \string#1%
+   \else
+     #2%
+   \fi
+}}
+
+% Latin1 (ISO-8859-1) character definitions.
+\def\latonechardefs{%
+  \gdefchar^^a0{\tie}
+  \gdefchar^^a1{\exclamdown}
+  \gdefchar^^a2{{\tcfont \char162}} % cent
+  \gdefchar^^a3{\pounds{}}
+  \gdefchar^^a4{{\tcfont \char164}} % currency
+  \gdefchar^^a5{{\tcfont \char165}} % yen
+  \gdefchar^^a6{{\tcfont \char166}} % broken bar
+  \gdefchar^^a7{\S}
+  \gdefchar^^a8{\"{}}
+  \gdefchar^^a9{\copyright{}}
+  \gdefchar^^aa{\ordf}
+  \gdefchar^^ab{\guillemetleft{}}
+  \gdefchar^^ac{\ensuremath\lnot}
+  \gdefchar^^ad{\-}
+  \gdefchar^^ae{\registeredsymbol{}}
+  \gdefchar^^af{\={}}
+  %
+  \gdefchar^^b0{\textdegree}
+  \gdefchar^^b1{$\pm$}
+  \gdefchar^^b2{$^2$}
+  \gdefchar^^b3{$^3$}
+  \gdefchar^^b4{\'{}}
+  \gdefchar^^b5{$\mu$}
+  \gdefchar^^b6{\P}
+  \gdefchar^^b7{\ensuremath\cdot}
+  \gdefchar^^b8{\cedilla\ }
+  \gdefchar^^b9{$^1$}
+  \gdefchar^^ba{\ordm}
+  \gdefchar^^bb{\guillemetright{}}
+  \gdefchar^^bc{$1\over4$}
+  \gdefchar^^bd{$1\over2$}
+  \gdefchar^^be{$3\over4$}
+  \gdefchar^^bf{\questiondown}
+  %
+  \gdefchar^^c0{\`A}
+  \gdefchar^^c1{\'A}
+  \gdefchar^^c2{\^A}
+  \gdefchar^^c3{\~A}
+  \gdefchar^^c4{\"A}
+  \gdefchar^^c5{\ringaccent A}
+  \gdefchar^^c6{\AE}
+  \gdefchar^^c7{\cedilla C}
+  \gdefchar^^c8{\`E}
+  \gdefchar^^c9{\'E}
+  \gdefchar^^ca{\^E}
+  \gdefchar^^cb{\"E}
+  \gdefchar^^cc{\`I}
+  \gdefchar^^cd{\'I}
+  \gdefchar^^ce{\^I}
+  \gdefchar^^cf{\"I}
+  %
+  \gdefchar^^d0{\DH}
+  \gdefchar^^d1{\~N}
+  \gdefchar^^d2{\`O}
+  \gdefchar^^d3{\'O}
+  \gdefchar^^d4{\^O}
+  \gdefchar^^d5{\~O}
+  \gdefchar^^d6{\"O}
+  \gdefchar^^d7{$\times$}
+  \gdefchar^^d8{\O}
+  \gdefchar^^d9{\`U}
+  \gdefchar^^da{\'U}
+  \gdefchar^^db{\^U}
+  \gdefchar^^dc{\"U}
+  \gdefchar^^dd{\'Y}
+  \gdefchar^^de{\TH}
+  \gdefchar^^df{\ss}
+  %
+  \gdefchar^^e0{\`a}
+  \gdefchar^^e1{\'a}
+  \gdefchar^^e2{\^a}
+  \gdefchar^^e3{\~a}
+  \gdefchar^^e4{\"a}
+  \gdefchar^^e5{\ringaccent a}
+  \gdefchar^^e6{\ae}
+  \gdefchar^^e7{\cedilla c}
+  \gdefchar^^e8{\`e}
+  \gdefchar^^e9{\'e}
+  \gdefchar^^ea{\^e}
+  \gdefchar^^eb{\"e}
+  \gdefchar^^ec{\`{\dotless i}}
+  \gdefchar^^ed{\'{\dotless i}}
+  \gdefchar^^ee{\^{\dotless i}}
+  \gdefchar^^ef{\"{\dotless i}}
+  %
+  \gdefchar^^f0{\dh}
+  \gdefchar^^f1{\~n}
+  \gdefchar^^f2{\`o}
+  \gdefchar^^f3{\'o}
+  \gdefchar^^f4{\^o}
+  \gdefchar^^f5{\~o}
+  \gdefchar^^f6{\"o}
+  \gdefchar^^f7{$\div$}
+  \gdefchar^^f8{\o}
+  \gdefchar^^f9{\`u}
+  \gdefchar^^fa{\'u}
+  \gdefchar^^fb{\^u}
+  \gdefchar^^fc{\"u}
+  \gdefchar^^fd{\'y}
+  \gdefchar^^fe{\th}
+  \gdefchar^^ff{\"y}
+}
+
+% Latin9 (ISO-8859-15) encoding character definitions.
+\def\latninechardefs{%
+  % Encoding is almost identical to Latin1.
+  \latonechardefs
+  %
+  \gdefchar^^a4{\euro{}}
+  \gdefchar^^a6{\v S}
+  \gdefchar^^a8{\v s}
+  \gdefchar^^b4{\v Z}
+  \gdefchar^^b8{\v z}
+  \gdefchar^^bc{\OE}
+  \gdefchar^^bd{\oe}
+  \gdefchar^^be{\"Y}
+}
+
+% Latin2 (ISO-8859-2) character definitions.
+\def\lattwochardefs{%
+  \gdefchar^^a0{\tie}
+  \gdefchar^^a1{\ogonek{A}}
+  \gdefchar^^a2{\u{}}
+  \gdefchar^^a3{\L}
+  \gdefchar^^a4{\missingcharmsg{CURRENCY SIGN}}
+  \gdefchar^^a5{\v L}
+  \gdefchar^^a6{\'S}
+  \gdefchar^^a7{\S}
+  \gdefchar^^a8{\"{}}
+  \gdefchar^^a9{\v S}
+  \gdefchar^^aa{\cedilla S}
+  \gdefchar^^ab{\v T}
+  \gdefchar^^ac{\'Z}
+  \gdefchar^^ad{\-}
+  \gdefchar^^ae{\v Z}
+  \gdefchar^^af{\dotaccent Z}
+  %
+  \gdefchar^^b0{\textdegree{}}
+  \gdefchar^^b1{\ogonek{a}}
+  \gdefchar^^b2{\ogonek{ }}
+  \gdefchar^^b3{\l}
+  \gdefchar^^b4{\'{}}
+  \gdefchar^^b5{\v l}
+  \gdefchar^^b6{\'s}
+  \gdefchar^^b7{\v{}}
+  \gdefchar^^b8{\cedilla\ }
+  \gdefchar^^b9{\v s}
+  \gdefchar^^ba{\cedilla s}
+  \gdefchar^^bb{\v t}
+  \gdefchar^^bc{\'z}
+  \gdefchar^^bd{\H{}}
+  \gdefchar^^be{\v z}
+  \gdefchar^^bf{\dotaccent z}
+  %
+  \gdefchar^^c0{\'R}
+  \gdefchar^^c1{\'A}
+  \gdefchar^^c2{\^A}
+  \gdefchar^^c3{\u A}
+  \gdefchar^^c4{\"A}
+  \gdefchar^^c5{\'L}
+  \gdefchar^^c6{\'C}
+  \gdefchar^^c7{\cedilla C}
+  \gdefchar^^c8{\v C}
+  \gdefchar^^c9{\'E}
+  \gdefchar^^ca{\ogonek{E}}
+  \gdefchar^^cb{\"E}
+  \gdefchar^^cc{\v E}
+  \gdefchar^^cd{\'I}
+  \gdefchar^^ce{\^I}
+  \gdefchar^^cf{\v D}
+  %
+  \gdefchar^^d0{\DH}
+  \gdefchar^^d1{\'N}
+  \gdefchar^^d2{\v N}
+  \gdefchar^^d3{\'O}
+  \gdefchar^^d4{\^O}
+  \gdefchar^^d5{\H O}
+  \gdefchar^^d6{\"O}
+  \gdefchar^^d7{$\times$}
+  \gdefchar^^d8{\v R}
+  \gdefchar^^d9{\ringaccent U}
+  \gdefchar^^da{\'U}
+  \gdefchar^^db{\H U}
+  \gdefchar^^dc{\"U}
+  \gdefchar^^dd{\'Y}
+  \gdefchar^^de{\cedilla T}
+  \gdefchar^^df{\ss}
+  %
+  \gdefchar^^e0{\'r}
+  \gdefchar^^e1{\'a}
+  \gdefchar^^e2{\^a}
+  \gdefchar^^e3{\u a}
+  \gdefchar^^e4{\"a}
+  \gdefchar^^e5{\'l}
+  \gdefchar^^e6{\'c}
+  \gdefchar^^e7{\cedilla c}
+  \gdefchar^^e8{\v c}
+  \gdefchar^^e9{\'e}
+  \gdefchar^^ea{\ogonek{e}}
+  \gdefchar^^eb{\"e}
+  \gdefchar^^ec{\v e}
+  \gdefchar^^ed{\'{\dotless{i}}}
+  \gdefchar^^ee{\^{\dotless{i}}}
+  \gdefchar^^ef{\v d}
+  %
+  \gdefchar^^f0{\dh}
+  \gdefchar^^f1{\'n}
+  \gdefchar^^f2{\v n}
+  \gdefchar^^f3{\'o}
+  \gdefchar^^f4{\^o}
+  \gdefchar^^f5{\H o}
+  \gdefchar^^f6{\"o}
+  \gdefchar^^f7{$\div$}
+  \gdefchar^^f8{\v r}
+  \gdefchar^^f9{\ringaccent u}
+  \gdefchar^^fa{\'u}
+  \gdefchar^^fb{\H u}
+  \gdefchar^^fc{\"u}
+  \gdefchar^^fd{\'y}
+  \gdefchar^^fe{\cedilla t}
+  \gdefchar^^ff{\dotaccent{}}
+}
+
+% UTF-8 character definitions.
+%
+% This code to support UTF-8 is based on LaTeX's utf8.def, with some
+% changes for Texinfo conventions.  It is included here under the GPL by
+% permission from Frank Mittelbach and the LaTeX team.
+%
+\newcount\countUTFx
+\newcount\countUTFy
+\newcount\countUTFz
+
+\gdef\UTFviiiTwoOctets#1#2{\expandafter
+   \UTFviiiDefined\csname u8:#1\string #2\endcsname}
+%
+\gdef\UTFviiiThreeOctets#1#2#3{\expandafter
+   \UTFviiiDefined\csname u8:#1\string #2\string #3\endcsname}
+%
+\gdef\UTFviiiFourOctets#1#2#3#4{\expandafter
+   \UTFviiiDefined\csname u8:#1\string #2\string #3\string #4\endcsname}
+
+\gdef\UTFviiiDefined#1{%
+  \ifx #1\relax
+    \message{\linenumber Unicode char \string #1 not defined for Texinfo}%
+  \else
+    \expandafter #1%
+  \fi
+}
+
+% Give non-ASCII bytes the active definitions for processing UTF-8 sequences
+\begingroup
+  \catcode`\~13
+  \catcode`\$12
+  \catcode`\"12
+
+  % Loop from \countUTFx to \countUTFy, performing \UTFviiiTmp
+  % substituting ~ and $ with a character token of that value.
+  \def\UTFviiiLoop{%
+    \global\catcode\countUTFx\active
+    \uccode`\~\countUTFx
+    \uccode`\$\countUTFx
+    \uppercase\expandafter{\UTFviiiTmp}%
+    \advance\countUTFx by 1
+    \ifnum\countUTFx < \countUTFy
+      \expandafter\UTFviiiLoop
+    \fi}
+
+  % For bytes other than the first in a UTF-8 sequence.  Not expected to
+  % be expanded except when writing to auxiliary files.
+  \countUTFx = "80
+  \countUTFy = "C2
+  \def\UTFviiiTmp{%
+    \gdef~{%
+        \ifpassthroughchars $\fi}}%
+  \UTFviiiLoop
+
+  \countUTFx = "C2
+  \countUTFy = "E0
+  \def\UTFviiiTmp{%
+    \gdef~{%
+        \ifpassthroughchars $%
+        \else\expandafter\UTFviiiTwoOctets\expandafter$\fi}}%
+  \UTFviiiLoop
+
+  \countUTFx = "E0
+  \countUTFy = "F0
+  \def\UTFviiiTmp{%
+    \gdef~{%
+        \ifpassthroughchars $%
+        \else\expandafter\UTFviiiThreeOctets\expandafter$\fi}}%
+  \UTFviiiLoop
+
+  \countUTFx = "F0
+  \countUTFy = "F4
+  \def\UTFviiiTmp{%
+    \gdef~{%
+        \ifpassthroughchars $%
+        \else\expandafter\UTFviiiFourOctets\expandafter$\fi
+        }}%
+  \UTFviiiLoop
+\endgroup
+
+\def\globallet{\global\let} % save some \expandafter's below
+
+% @U{xxxx} to produce U+xxxx, if we support it.
+\def\U#1{%
+  \expandafter\ifx\csname uni:#1\endcsname \relax
+    \iftxinativeunicodecapable
+      % All Unicode characters can be used if native Unicode handling is
+      % active.  However, if the font does not have the glyph,
+      % letters are missing.
+      \begingroup
+        \uccode`\.="#1\relax
+        \uppercase{.}
+      \endgroup
+    \else
+      \errhelp = \EMsimple	
+      \errmessage{Unicode character U+#1 not supported, sorry}%
+    \fi
+  \else
+    \csname uni:#1\endcsname
+  \fi
+}
+
+% These macros are used here to construct the name of a control
+% sequence to be defined.
+\def\UTFviiiTwoOctetsName#1#2{%
+  \csname u8:#1\string #2\endcsname}%
+\def\UTFviiiThreeOctetsName#1#2#3{%
+  \csname u8:#1\string #2\string #3\endcsname}%
+\def\UTFviiiFourOctetsName#1#2#3#4{%
+  \csname u8:#1\string #2\string #3\string #4\endcsname}%
+
+% For UTF-8 byte sequences (TeX, e-TeX and pdfTeX),
+% provide a definition macro to replace a Unicode character;
+% this gets used by the @U command
+%
+\begingroup
+  \catcode`\"=12
+  \catcode`\<=12
+  \catcode`\.=12
+  \catcode`\,=12
+  \catcode`\;=12
+  \catcode`\!=12
+  \catcode`\~=13
+  \gdef\DeclareUnicodeCharacterUTFviii#1#2{%
+    \countUTFz = "#1\relax
+    \begingroup
+      \parseXMLCharref
+    
+      % Give \u8:... its definition.  The sequence of seven \expandafter's
+      % expands after the \gdef three times, e.g.
+      %
+      % 1.  \UTFviiTwoOctetsName B1 B2
+      % 2.  \csname u8:B1 \string B2 \endcsname
+      % 3.  \u8: B1 B2  (a single control sequence token)
+      %
+      \expandafter\expandafter
+      \expandafter\expandafter
+      \expandafter\expandafter
+      \expandafter\gdef       \UTFviiiTmp{#2}%
+      % 
+      \expandafter\ifx\csname uni:#1\endcsname \relax \else
+       \message{Internal error, already defined: #1}%
+      \fi
+      %
+      % define an additional control sequence for this code point.
+      \expandafter\globallet\csname uni:#1\endcsname \UTFviiiTmp
+    \endgroup}
+  %
+  % Given the value in \countUTFz as a Unicode code point, set \UTFviiiTmp
+  % to the corresponding UTF-8 sequence.
+  \gdef\parseXMLCharref{%
+    \ifnum\countUTFz < "A0\relax
+      \errhelp = \EMsimple
+      \errmessage{Cannot define Unicode char value < 00A0}%
+    \else\ifnum\countUTFz < "800\relax
+      \parseUTFviiiA,%
+      \parseUTFviiiB C\UTFviiiTwoOctetsName.,%
+    \else\ifnum\countUTFz < "10000\relax
+      \parseUTFviiiA;%
+      \parseUTFviiiA,%
+      \parseUTFviiiB E\UTFviiiThreeOctetsName.{,;}%
+    \else
+      \parseUTFviiiA;%
+      \parseUTFviiiA,%
+      \parseUTFviiiA!%
+      \parseUTFviiiB F\UTFviiiFourOctetsName.{!,;}%
+    \fi\fi\fi
+  }
+
+  % Extract a byte from the end of the UTF-8 representation of \countUTFx.
+  % It must be a non-initial byte in the sequence.
+  % Change \uccode of #1 for it to be used in \parseUTFviiiB as one
+  % of the bytes.
+  \gdef\parseUTFviiiA#1{%
+    \countUTFx = \countUTFz
+    \divide\countUTFz by 64
+    \countUTFy = \countUTFz  % Save to be the future value of \countUTFz.
+    \multiply\countUTFz by 64
+    
+    % \countUTFz is now \countUTFx with the last 5 bits cleared.  Subtract
+    % in order to get the last five bits.
+    \advance\countUTFx by -\countUTFz
+
+    % Convert this to the byte in the UTF-8 sequence.
+    \advance\countUTFx by 128
+    \uccode `#1\countUTFx
+    \countUTFz = \countUTFy}
+
+  % Used to put a UTF-8 byte sequence into \UTFviiiTmp
+  % #1 is the increment for \countUTFz to yield a the first byte of the UTF-8
+  %    sequence.
+  % #2 is one of the \UTFviii*OctetsName macros.
+  % #3 is always a full stop (.)
+  % #4 is a template for the other bytes in the sequence.  The values for these
+  %    bytes is substituted in here with \uppercase using the \uccode's.
+  \gdef\parseUTFviiiB#1#2#3#4{%
+    \advance\countUTFz by "#10\relax
+    \uccode `#3\countUTFz
+    \uppercase{\gdef\UTFviiiTmp{#2#3#4}}}
+\endgroup
+
+% For native Unicode handling (XeTeX and LuaTeX),
+% provide a definition macro that sets a catcode to `other' non-globally
+%
+\def\DeclareUnicodeCharacterNativeOther#1#2{%
+  \catcode"#1=\other
+}
+
+% https://en.wikipedia.org/wiki/Plane_(Unicode)#Basic_M
+% U+0000..U+007F = https://en.wikipedia.org/wiki/Basic_Latin_(Unicode_block)
+% U+0080..U+00FF = https://en.wikipedia.org/wiki/Latin-1_Supplement_(Unicode_block)
+% U+0100..U+017F = https://en.wikipedia.org/wiki/Latin_Extended-A
+% U+0180..U+024F = https://en.wikipedia.org/wiki/Latin_Extended-B
+% 
+% Many of our renditions are less than wonderful, and all the missing
+% characters are available somewhere.  Loading the necessary fonts
+% awaits user request.  We can't truly support Unicode without
+% reimplementing everything that's been done in LaTeX for many years,
+% plus probably using luatex or xetex, and who knows what else.
+% We won't be doing that here in this simple file.  But we can try to at
+% least make most of the characters not bomb out.
+%
+\def\unicodechardefs{%
+  \DeclareUnicodeCharacter{00A0}{\tie}%
+  \DeclareUnicodeCharacter{00A1}{\exclamdown}%
+  \DeclareUnicodeCharacter{00A2}{{\tcfont \char162}}% 0242=cent
+  \DeclareUnicodeCharacter{00A3}{\pounds{}}%
+  \DeclareUnicodeCharacter{00A4}{{\tcfont \char164}}% 0244=currency
+  \DeclareUnicodeCharacter{00A5}{{\tcfont \char165}}% 0245=yen
+  \DeclareUnicodeCharacter{00A6}{{\tcfont \char166}}% 0246=brokenbar
+  \DeclareUnicodeCharacter{00A7}{\S}%
+  \DeclareUnicodeCharacter{00A8}{\"{ }}%
+  \DeclareUnicodeCharacter{00A9}{\copyright{}}%
+  \DeclareUnicodeCharacter{00AA}{\ordf}%
+  \DeclareUnicodeCharacter{00AB}{\guillemetleft{}}%
+  \DeclareUnicodeCharacter{00AC}{\ensuremath\lnot}%
+  \DeclareUnicodeCharacter{00AD}{\-}%
+  \DeclareUnicodeCharacter{00AE}{\registeredsymbol{}}%
+  \DeclareUnicodeCharacter{00AF}{\={ }}%
+  %
+  \DeclareUnicodeCharacter{00B0}{\ringaccent{ }}%
+  \DeclareUnicodeCharacter{00B1}{\ensuremath\pm}%
+  \DeclareUnicodeCharacter{00B2}{$^2$}%
+  \DeclareUnicodeCharacter{00B3}{$^3$}%
+  \DeclareUnicodeCharacter{00B4}{\'{ }}%
+  \DeclareUnicodeCharacter{00B5}{$\mu$}%
+  \DeclareUnicodeCharacter{00B6}{\P}%
+  \DeclareUnicodeCharacter{00B7}{\ensuremath\cdot}%
+  \DeclareUnicodeCharacter{00B8}{\cedilla{ }}%
+  \DeclareUnicodeCharacter{00B9}{$^1$}%
+  \DeclareUnicodeCharacter{00BA}{\ordm}%
+  \DeclareUnicodeCharacter{00BB}{\guillemetright{}}%
+  \DeclareUnicodeCharacter{00BC}{$1\over4$}%
+  \DeclareUnicodeCharacter{00BD}{$1\over2$}%
+  \DeclareUnicodeCharacter{00BE}{$3\over4$}%
+  \DeclareUnicodeCharacter{00BF}{\questiondown}%
+  %
+  \DeclareUnicodeCharacter{00C0}{\`A}%
+  \DeclareUnicodeCharacter{00C1}{\'A}%
+  \DeclareUnicodeCharacter{00C2}{\^A}%
+  \DeclareUnicodeCharacter{00C3}{\~A}%
+  \DeclareUnicodeCharacter{00C4}{\"A}%
+  \DeclareUnicodeCharacter{00C5}{\AA}%
+  \DeclareUnicodeCharacter{00C6}{\AE}%
+  \DeclareUnicodeCharacter{00C7}{\cedilla{C}}%
+  \DeclareUnicodeCharacter{00C8}{\`E}%
+  \DeclareUnicodeCharacter{00C9}{\'E}%
+  \DeclareUnicodeCharacter{00CA}{\^E}%
+  \DeclareUnicodeCharacter{00CB}{\"E}%
+  \DeclareUnicodeCharacter{00CC}{\`I}%
+  \DeclareUnicodeCharacter{00CD}{\'I}%
+  \DeclareUnicodeCharacter{00CE}{\^I}%
+  \DeclareUnicodeCharacter{00CF}{\"I}%
+  %
+  \DeclareUnicodeCharacter{00D0}{\DH}%
+  \DeclareUnicodeCharacter{00D1}{\~N}%
+  \DeclareUnicodeCharacter{00D2}{\`O}%
+  \DeclareUnicodeCharacter{00D3}{\'O}%
+  \DeclareUnicodeCharacter{00D4}{\^O}%
+  \DeclareUnicodeCharacter{00D5}{\~O}%
+  \DeclareUnicodeCharacter{00D6}{\"O}%
+  \DeclareUnicodeCharacter{00D7}{\ensuremath\times}%
+  \DeclareUnicodeCharacter{00D8}{\O}%
+  \DeclareUnicodeCharacter{00D9}{\`U}%
+  \DeclareUnicodeCharacter{00DA}{\'U}%
+  \DeclareUnicodeCharacter{00DB}{\^U}%
+  \DeclareUnicodeCharacter{00DC}{\"U}%
+  \DeclareUnicodeCharacter{00DD}{\'Y}%
+  \DeclareUnicodeCharacter{00DE}{\TH}%
+  \DeclareUnicodeCharacter{00DF}{\ss}%
+  %
+  \DeclareUnicodeCharacter{00E0}{\`a}%
+  \DeclareUnicodeCharacter{00E1}{\'a}%
+  \DeclareUnicodeCharacter{00E2}{\^a}%
+  \DeclareUnicodeCharacter{00E3}{\~a}%
+  \DeclareUnicodeCharacter{00E4}{\"a}%
+  \DeclareUnicodeCharacter{00E5}{\aa}%
+  \DeclareUnicodeCharacter{00E6}{\ae}%
+  \DeclareUnicodeCharacter{00E7}{\cedilla{c}}%
+  \DeclareUnicodeCharacter{00E8}{\`e}%
+  \DeclareUnicodeCharacter{00E9}{\'e}%
+  \DeclareUnicodeCharacter{00EA}{\^e}%
+  \DeclareUnicodeCharacter{00EB}{\"e}%
+  \DeclareUnicodeCharacter{00EC}{\`{\dotless{i}}}%
+  \DeclareUnicodeCharacter{00ED}{\'{\dotless{i}}}%
+  \DeclareUnicodeCharacter{00EE}{\^{\dotless{i}}}%
+  \DeclareUnicodeCharacter{00EF}{\"{\dotless{i}}}%
+  %
+  \DeclareUnicodeCharacter{00F0}{\dh}%
+  \DeclareUnicodeCharacter{00F1}{\~n}%
+  \DeclareUnicodeCharacter{00F2}{\`o}%
+  \DeclareUnicodeCharacter{00F3}{\'o}%
+  \DeclareUnicodeCharacter{00F4}{\^o}%
+  \DeclareUnicodeCharacter{00F5}{\~o}%
+  \DeclareUnicodeCharacter{00F6}{\"o}%
+  \DeclareUnicodeCharacter{00F7}{\ensuremath\div}%
+  \DeclareUnicodeCharacter{00F8}{\o}%
+  \DeclareUnicodeCharacter{00F9}{\`u}%
+  \DeclareUnicodeCharacter{00FA}{\'u}%
+  \DeclareUnicodeCharacter{00FB}{\^u}%
+  \DeclareUnicodeCharacter{00FC}{\"u}%
+  \DeclareUnicodeCharacter{00FD}{\'y}%
+  \DeclareUnicodeCharacter{00FE}{\th}%
+  \DeclareUnicodeCharacter{00FF}{\"y}%
+  %
+  \DeclareUnicodeCharacter{0100}{\=A}%
+  \DeclareUnicodeCharacter{0101}{\=a}%
+  \DeclareUnicodeCharacter{0102}{\u{A}}%
+  \DeclareUnicodeCharacter{0103}{\u{a}}%
+  \DeclareUnicodeCharacter{0104}{\ogonek{A}}%
+  \DeclareUnicodeCharacter{0105}{\ogonek{a}}%
+  \DeclareUnicodeCharacter{0106}{\'C}%
+  \DeclareUnicodeCharacter{0107}{\'c}%
+  \DeclareUnicodeCharacter{0108}{\^C}%
+  \DeclareUnicodeCharacter{0109}{\^c}%
+  \DeclareUnicodeCharacter{010A}{\dotaccent{C}}%
+  \DeclareUnicodeCharacter{010B}{\dotaccent{c}}%
+  \DeclareUnicodeCharacter{010C}{\v{C}}%
+  \DeclareUnicodeCharacter{010D}{\v{c}}%
+  \DeclareUnicodeCharacter{010E}{\v{D}}%
+  \DeclareUnicodeCharacter{010F}{d'}%
+  %
+  \DeclareUnicodeCharacter{0110}{\DH}%
+  \DeclareUnicodeCharacter{0111}{\dh}%
+  \DeclareUnicodeCharacter{0112}{\=E}%
+  \DeclareUnicodeCharacter{0113}{\=e}%
+  \DeclareUnicodeCharacter{0114}{\u{E}}%
+  \DeclareUnicodeCharacter{0115}{\u{e}}%
+  \DeclareUnicodeCharacter{0116}{\dotaccent{E}}%
+  \DeclareUnicodeCharacter{0117}{\dotaccent{e}}%
+  \DeclareUnicodeCharacter{0118}{\ogonek{E}}%
+  \DeclareUnicodeCharacter{0119}{\ogonek{e}}%
+  \DeclareUnicodeCharacter{011A}{\v{E}}%
+  \DeclareUnicodeCharacter{011B}{\v{e}}%
+  \DeclareUnicodeCharacter{011C}{\^G}%
+  \DeclareUnicodeCharacter{011D}{\^g}%
+  \DeclareUnicodeCharacter{011E}{\u{G}}%
+  \DeclareUnicodeCharacter{011F}{\u{g}}%
+  %
+  \DeclareUnicodeCharacter{0120}{\dotaccent{G}}%
+  \DeclareUnicodeCharacter{0121}{\dotaccent{g}}%
+  \DeclareUnicodeCharacter{0122}{\cedilla{G}}%
+  \DeclareUnicodeCharacter{0123}{\cedilla{g}}%
+  \DeclareUnicodeCharacter{0124}{\^H}%
+  \DeclareUnicodeCharacter{0125}{\^h}%
+  \DeclareUnicodeCharacter{0126}{\missingcharmsg{H WITH STROKE}}%
+  \DeclareUnicodeCharacter{0127}{\missingcharmsg{h WITH STROKE}}%
+  \DeclareUnicodeCharacter{0128}{\~I}%
+  \DeclareUnicodeCharacter{0129}{\~{\dotless{i}}}%
+  \DeclareUnicodeCharacter{012A}{\=I}%
+  \DeclareUnicodeCharacter{012B}{\={\dotless{i}}}%
+  \DeclareUnicodeCharacter{012C}{\u{I}}%
+  \DeclareUnicodeCharacter{012D}{\u{\dotless{i}}}%
+  \DeclareUnicodeCharacter{012E}{\ogonek{I}}%
+  \DeclareUnicodeCharacter{012F}{\ogonek{i}}%
+  %
+  \DeclareUnicodeCharacter{0130}{\dotaccent{I}}%
+  \DeclareUnicodeCharacter{0131}{\dotless{i}}%
+  \DeclareUnicodeCharacter{0132}{IJ}%
+  \DeclareUnicodeCharacter{0133}{ij}%
+  \DeclareUnicodeCharacter{0134}{\^J}%
+  \DeclareUnicodeCharacter{0135}{\^{\dotless{j}}}%
+  \DeclareUnicodeCharacter{0136}{\cedilla{K}}%
+  \DeclareUnicodeCharacter{0137}{\cedilla{k}}%
+  \DeclareUnicodeCharacter{0138}{\ensuremath\kappa}%
+  \DeclareUnicodeCharacter{0139}{\'L}%
+  \DeclareUnicodeCharacter{013A}{\'l}%
+  \DeclareUnicodeCharacter{013B}{\cedilla{L}}%
+  \DeclareUnicodeCharacter{013C}{\cedilla{l}}%
+  \DeclareUnicodeCharacter{013D}{L'}% should kern
+  \DeclareUnicodeCharacter{013E}{l'}% should kern
+  \DeclareUnicodeCharacter{013F}{L\U{00B7}}%
+  %
+  \DeclareUnicodeCharacter{0140}{l\U{00B7}}%
+  \DeclareUnicodeCharacter{0141}{\L}%
+  \DeclareUnicodeCharacter{0142}{\l}%
+  \DeclareUnicodeCharacter{0143}{\'N}%
+  \DeclareUnicodeCharacter{0144}{\'n}%
+  \DeclareUnicodeCharacter{0145}{\cedilla{N}}%
+  \DeclareUnicodeCharacter{0146}{\cedilla{n}}%
+  \DeclareUnicodeCharacter{0147}{\v{N}}%
+  \DeclareUnicodeCharacter{0148}{\v{n}}%
+  \DeclareUnicodeCharacter{0149}{'n}%
+  \DeclareUnicodeCharacter{014A}{\missingcharmsg{ENG}}%
+  \DeclareUnicodeCharacter{014B}{\missingcharmsg{eng}}%
+  \DeclareUnicodeCharacter{014C}{\=O}%
+  \DeclareUnicodeCharacter{014D}{\=o}%
+  \DeclareUnicodeCharacter{014E}{\u{O}}%
+  \DeclareUnicodeCharacter{014F}{\u{o}}%
+  %
+  \DeclareUnicodeCharacter{0150}{\H{O}}%
+  \DeclareUnicodeCharacter{0151}{\H{o}}%
+  \DeclareUnicodeCharacter{0152}{\OE}%
+  \DeclareUnicodeCharacter{0153}{\oe}%
+  \DeclareUnicodeCharacter{0154}{\'R}%
+  \DeclareUnicodeCharacter{0155}{\'r}%
+  \DeclareUnicodeCharacter{0156}{\cedilla{R}}%
+  \DeclareUnicodeCharacter{0157}{\cedilla{r}}%
+  \DeclareUnicodeCharacter{0158}{\v{R}}%
+  \DeclareUnicodeCharacter{0159}{\v{r}}%
+  \DeclareUnicodeCharacter{015A}{\'S}%
+  \DeclareUnicodeCharacter{015B}{\'s}%
+  \DeclareUnicodeCharacter{015C}{\^S}%
+  \DeclareUnicodeCharacter{015D}{\^s}%
+  \DeclareUnicodeCharacter{015E}{\cedilla{S}}%
+  \DeclareUnicodeCharacter{015F}{\cedilla{s}}%
+  %
+  \DeclareUnicodeCharacter{0160}{\v{S}}%
+  \DeclareUnicodeCharacter{0161}{\v{s}}%
+  \DeclareUnicodeCharacter{0162}{\cedilla{T}}%
+  \DeclareUnicodeCharacter{0163}{\cedilla{t}}%
+  \DeclareUnicodeCharacter{0164}{\v{T}}%
+  \DeclareUnicodeCharacter{0165}{\v{t}}%
+  \DeclareUnicodeCharacter{0166}{\missingcharmsg{H WITH STROKE}}%
+  \DeclareUnicodeCharacter{0167}{\missingcharmsg{h WITH STROKE}}%
+  \DeclareUnicodeCharacter{0168}{\~U}%
+  \DeclareUnicodeCharacter{0169}{\~u}%
+  \DeclareUnicodeCharacter{016A}{\=U}%
+  \DeclareUnicodeCharacter{016B}{\=u}%
+  \DeclareUnicodeCharacter{016C}{\u{U}}%
+  \DeclareUnicodeCharacter{016D}{\u{u}}%
+  \DeclareUnicodeCharacter{016E}{\ringaccent{U}}%
+  \DeclareUnicodeCharacter{016F}{\ringaccent{u}}%
+  %
+  \DeclareUnicodeCharacter{0170}{\H{U}}%
+  \DeclareUnicodeCharacter{0171}{\H{u}}%
+  \DeclareUnicodeCharacter{0172}{\ogonek{U}}%
+  \DeclareUnicodeCharacter{0173}{\ogonek{u}}%
+  \DeclareUnicodeCharacter{0174}{\^W}%
+  \DeclareUnicodeCharacter{0175}{\^w}%
+  \DeclareUnicodeCharacter{0176}{\^Y}%
+  \DeclareUnicodeCharacter{0177}{\^y}%
+  \DeclareUnicodeCharacter{0178}{\"Y}%
+  \DeclareUnicodeCharacter{0179}{\'Z}%
+  \DeclareUnicodeCharacter{017A}{\'z}%
+  \DeclareUnicodeCharacter{017B}{\dotaccent{Z}}%
+  \DeclareUnicodeCharacter{017C}{\dotaccent{z}}%
+  \DeclareUnicodeCharacter{017D}{\v{Z}}%
+  \DeclareUnicodeCharacter{017E}{\v{z}}%
+  \DeclareUnicodeCharacter{017F}{\missingcharmsg{LONG S}}%
+  %
+  \DeclareUnicodeCharacter{01C4}{D\v{Z}}%
+  \DeclareUnicodeCharacter{01C5}{D\v{z}}%
+  \DeclareUnicodeCharacter{01C6}{d\v{z}}%
+  \DeclareUnicodeCharacter{01C7}{LJ}%
+  \DeclareUnicodeCharacter{01C8}{Lj}%
+  \DeclareUnicodeCharacter{01C9}{lj}%
+  \DeclareUnicodeCharacter{01CA}{NJ}%
+  \DeclareUnicodeCharacter{01CB}{Nj}%
+  \DeclareUnicodeCharacter{01CC}{nj}%
+  \DeclareUnicodeCharacter{01CD}{\v{A}}%
+  \DeclareUnicodeCharacter{01CE}{\v{a}}%
+  \DeclareUnicodeCharacter{01CF}{\v{I}}%
+  %
+  \DeclareUnicodeCharacter{01D0}{\v{\dotless{i}}}%
+  \DeclareUnicodeCharacter{01D1}{\v{O}}%
+  \DeclareUnicodeCharacter{01D2}{\v{o}}%
+  \DeclareUnicodeCharacter{01D3}{\v{U}}%
+  \DeclareUnicodeCharacter{01D4}{\v{u}}%
+  %
+  \DeclareUnicodeCharacter{01E2}{\={\AE}}%
+  \DeclareUnicodeCharacter{01E3}{\={\ae}}%
+  \DeclareUnicodeCharacter{01E6}{\v{G}}%
+  \DeclareUnicodeCharacter{01E7}{\v{g}}%
+  \DeclareUnicodeCharacter{01E8}{\v{K}}%
+  \DeclareUnicodeCharacter{01E9}{\v{k}}%
+  %
+  \DeclareUnicodeCharacter{01F0}{\v{\dotless{j}}}%
+  \DeclareUnicodeCharacter{01F1}{DZ}%
+  \DeclareUnicodeCharacter{01F2}{Dz}%
+  \DeclareUnicodeCharacter{01F3}{dz}%
+  \DeclareUnicodeCharacter{01F4}{\'G}%
+  \DeclareUnicodeCharacter{01F5}{\'g}%
+  \DeclareUnicodeCharacter{01F8}{\`N}%
+  \DeclareUnicodeCharacter{01F9}{\`n}%
+  \DeclareUnicodeCharacter{01FC}{\'{\AE}}%
+  \DeclareUnicodeCharacter{01FD}{\'{\ae}}%
+  \DeclareUnicodeCharacter{01FE}{\'{\O}}%
+  \DeclareUnicodeCharacter{01FF}{\'{\o}}%
+  %
+  \DeclareUnicodeCharacter{021E}{\v{H}}%
+  \DeclareUnicodeCharacter{021F}{\v{h}}%
+  %
+  \DeclareUnicodeCharacter{0226}{\dotaccent{A}}%
+  \DeclareUnicodeCharacter{0227}{\dotaccent{a}}%
+  \DeclareUnicodeCharacter{0228}{\cedilla{E}}%
+  \DeclareUnicodeCharacter{0229}{\cedilla{e}}%
+  \DeclareUnicodeCharacter{022E}{\dotaccent{O}}%
+  \DeclareUnicodeCharacter{022F}{\dotaccent{o}}%
+  %
+  \DeclareUnicodeCharacter{0232}{\=Y}%
+  \DeclareUnicodeCharacter{0233}{\=y}%
+  \DeclareUnicodeCharacter{0237}{\dotless{j}}%
+  %
+  \DeclareUnicodeCharacter{02BC}{'}%
+  %
+  \DeclareUnicodeCharacter{02DB}{\ogonek{ }}%
+  %
+  % Greek letters upper case
+  \DeclareUnicodeCharacter{0391}{{\it A}}%
+  \DeclareUnicodeCharacter{0392}{{\it B}}%
+  \DeclareUnicodeCharacter{0393}{\ensuremath{\mit\Gamma}}%
+  \DeclareUnicodeCharacter{0394}{\ensuremath{\mit\Delta}}%
+  \DeclareUnicodeCharacter{0395}{{\it E}}%
+  \DeclareUnicodeCharacter{0396}{{\it Z}}%
+  \DeclareUnicodeCharacter{0397}{{\it H}}%
+  \DeclareUnicodeCharacter{0398}{\ensuremath{\mit\Theta}}%
+  \DeclareUnicodeCharacter{0399}{{\it I}}%
+  \DeclareUnicodeCharacter{039A}{{\it K}}%
+  \DeclareUnicodeCharacter{039B}{\ensuremath{\mit\Lambda}}%
+  \DeclareUnicodeCharacter{039C}{{\it M}}%
+  \DeclareUnicodeCharacter{039D}{{\it N}}%
+  \DeclareUnicodeCharacter{039E}{\ensuremath{\mit\Xi}}%
+  \DeclareUnicodeCharacter{039F}{{\it O}}%
+  \DeclareUnicodeCharacter{03A0}{\ensuremath{\mit\Pi}}%
+  \DeclareUnicodeCharacter{03A1}{{\it P}}%
+  %\DeclareUnicodeCharacter{03A2}{} % none - corresponds to final sigma
+  \DeclareUnicodeCharacter{03A3}{\ensuremath{\mit\Sigma}}%
+  \DeclareUnicodeCharacter{03A4}{{\it T}}%
+  \DeclareUnicodeCharacter{03A5}{\ensuremath{\mit\Upsilon}}%
+  \DeclareUnicodeCharacter{03A6}{\ensuremath{\mit\Phi}}%
+  \DeclareUnicodeCharacter{03A7}{{\it X}}%
+  \DeclareUnicodeCharacter{03A8}{\ensuremath{\mit\Psi}}%
+  \DeclareUnicodeCharacter{03A9}{\ensuremath{\mit\Omega}}%
+  %
+  % Vowels with accents
+  \DeclareUnicodeCharacter{0390}{\ensuremath{\ddot{\acute\iota}}}%
+  \DeclareUnicodeCharacter{03AC}{\ensuremath{\acute\alpha}}%
+  \DeclareUnicodeCharacter{03AD}{\ensuremath{\acute\epsilon}}%
+  \DeclareUnicodeCharacter{03AE}{\ensuremath{\acute\eta}}%
+  \DeclareUnicodeCharacter{03AF}{\ensuremath{\acute\iota}}%
+  \DeclareUnicodeCharacter{03B0}{\ensuremath{\acute{\ddot\upsilon}}}%
+  %
+  % Standalone accent
+  \DeclareUnicodeCharacter{0384}{\ensuremath{\acute{\ }}}%
+  %
+  % Greek letters lower case
+  \DeclareUnicodeCharacter{03B1}{\ensuremath\alpha}%
+  \DeclareUnicodeCharacter{03B2}{\ensuremath\beta}%
+  \DeclareUnicodeCharacter{03B3}{\ensuremath\gamma}%
+  \DeclareUnicodeCharacter{03B4}{\ensuremath\delta}%
+  \DeclareUnicodeCharacter{03B5}{\ensuremath\epsilon}%
+  \DeclareUnicodeCharacter{03B6}{\ensuremath\zeta}%
+  \DeclareUnicodeCharacter{03B7}{\ensuremath\eta}%
+  \DeclareUnicodeCharacter{03B8}{\ensuremath\theta}%
+  \DeclareUnicodeCharacter{03B9}{\ensuremath\iota}%
+  \DeclareUnicodeCharacter{03BA}{\ensuremath\kappa}%
+  \DeclareUnicodeCharacter{03BB}{\ensuremath\lambda}%
+  \DeclareUnicodeCharacter{03BC}{\ensuremath\mu}%
+  \DeclareUnicodeCharacter{03BD}{\ensuremath\nu}%
+  \DeclareUnicodeCharacter{03BE}{\ensuremath\xi}%
+  \DeclareUnicodeCharacter{03BF}{{\it o}}% omicron
+  \DeclareUnicodeCharacter{03C0}{\ensuremath\pi}%
+  \DeclareUnicodeCharacter{03C1}{\ensuremath\rho}%
+  \DeclareUnicodeCharacter{03C2}{\ensuremath\varsigma}%
+  \DeclareUnicodeCharacter{03C3}{\ensuremath\sigma}%
+  \DeclareUnicodeCharacter{03C4}{\ensuremath\tau}%
+  \DeclareUnicodeCharacter{03C5}{\ensuremath\upsilon}%
+  \DeclareUnicodeCharacter{03C6}{\ensuremath\phi}%
+  \DeclareUnicodeCharacter{03C7}{\ensuremath\chi}%
+  \DeclareUnicodeCharacter{03C8}{\ensuremath\psi}%
+  \DeclareUnicodeCharacter{03C9}{\ensuremath\omega}%
+  %
+  % More Greek vowels with accents
+  \DeclareUnicodeCharacter{03CA}{\ensuremath{\ddot\iota}}%
+  \DeclareUnicodeCharacter{03CB}{\ensuremath{\ddot\upsilon}}%
+  \DeclareUnicodeCharacter{03CC}{\ensuremath{\acute o}}%
+  \DeclareUnicodeCharacter{03CD}{\ensuremath{\acute\upsilon}}%
+  \DeclareUnicodeCharacter{03CE}{\ensuremath{\acute\omega}}%
+  %
+  % Variant Greek letters
+  \DeclareUnicodeCharacter{03D1}{\ensuremath\vartheta}%
+  \DeclareUnicodeCharacter{03D6}{\ensuremath\varpi}%
+  \DeclareUnicodeCharacter{03F1}{\ensuremath\varrho}%
+  %
+  \DeclareUnicodeCharacter{1E02}{\dotaccent{B}}%
+  \DeclareUnicodeCharacter{1E03}{\dotaccent{b}}%
+  \DeclareUnicodeCharacter{1E04}{\udotaccent{B}}%
+  \DeclareUnicodeCharacter{1E05}{\udotaccent{b}}%
+  \DeclareUnicodeCharacter{1E06}{\ubaraccent{B}}%
+  \DeclareUnicodeCharacter{1E07}{\ubaraccent{b}}%
+  \DeclareUnicodeCharacter{1E0A}{\dotaccent{D}}%
+  \DeclareUnicodeCharacter{1E0B}{\dotaccent{d}}%
+  \DeclareUnicodeCharacter{1E0C}{\udotaccent{D}}%
+  \DeclareUnicodeCharacter{1E0D}{\udotaccent{d}}%
+  \DeclareUnicodeCharacter{1E0E}{\ubaraccent{D}}%
+  \DeclareUnicodeCharacter{1E0F}{\ubaraccent{d}}%
+  %
+  \DeclareUnicodeCharacter{1E1E}{\dotaccent{F}}%
+  \DeclareUnicodeCharacter{1E1F}{\dotaccent{f}}%
+  %
+  \DeclareUnicodeCharacter{1E20}{\=G}%
+  \DeclareUnicodeCharacter{1E21}{\=g}%
+  \DeclareUnicodeCharacter{1E22}{\dotaccent{H}}%
+  \DeclareUnicodeCharacter{1E23}{\dotaccent{h}}%
+  \DeclareUnicodeCharacter{1E24}{\udotaccent{H}}%
+  \DeclareUnicodeCharacter{1E25}{\udotaccent{h}}%
+  \DeclareUnicodeCharacter{1E26}{\"H}%
+  \DeclareUnicodeCharacter{1E27}{\"h}%
+  %
+  \DeclareUnicodeCharacter{1E30}{\'K}%
+  \DeclareUnicodeCharacter{1E31}{\'k}%
+  \DeclareUnicodeCharacter{1E32}{\udotaccent{K}}%
+  \DeclareUnicodeCharacter{1E33}{\udotaccent{k}}%
+  \DeclareUnicodeCharacter{1E34}{\ubaraccent{K}}%
+  \DeclareUnicodeCharacter{1E35}{\ubaraccent{k}}%
+  \DeclareUnicodeCharacter{1E36}{\udotaccent{L}}%
+  \DeclareUnicodeCharacter{1E37}{\udotaccent{l}}%
+  \DeclareUnicodeCharacter{1E3A}{\ubaraccent{L}}%
+  \DeclareUnicodeCharacter{1E3B}{\ubaraccent{l}}%
+  \DeclareUnicodeCharacter{1E3E}{\'M}%
+  \DeclareUnicodeCharacter{1E3F}{\'m}%
+  %
+  \DeclareUnicodeCharacter{1E40}{\dotaccent{M}}%
+  \DeclareUnicodeCharacter{1E41}{\dotaccent{m}}%
+  \DeclareUnicodeCharacter{1E42}{\udotaccent{M}}%
+  \DeclareUnicodeCharacter{1E43}{\udotaccent{m}}%
+  \DeclareUnicodeCharacter{1E44}{\dotaccent{N}}%
+  \DeclareUnicodeCharacter{1E45}{\dotaccent{n}}%
+  \DeclareUnicodeCharacter{1E46}{\udotaccent{N}}%
+  \DeclareUnicodeCharacter{1E47}{\udotaccent{n}}%
+  \DeclareUnicodeCharacter{1E48}{\ubaraccent{N}}%
+  \DeclareUnicodeCharacter{1E49}{\ubaraccent{n}}%
+  %
+  \DeclareUnicodeCharacter{1E54}{\'P}%
+  \DeclareUnicodeCharacter{1E55}{\'p}%
+  \DeclareUnicodeCharacter{1E56}{\dotaccent{P}}%
+  \DeclareUnicodeCharacter{1E57}{\dotaccent{p}}%
+  \DeclareUnicodeCharacter{1E58}{\dotaccent{R}}%
+  \DeclareUnicodeCharacter{1E59}{\dotaccent{r}}%
+  \DeclareUnicodeCharacter{1E5A}{\udotaccent{R}}%
+  \DeclareUnicodeCharacter{1E5B}{\udotaccent{r}}%
+  \DeclareUnicodeCharacter{1E5E}{\ubaraccent{R}}%
+  \DeclareUnicodeCharacter{1E5F}{\ubaraccent{r}}%
+  %
+  \DeclareUnicodeCharacter{1E60}{\dotaccent{S}}%
+  \DeclareUnicodeCharacter{1E61}{\dotaccent{s}}%
+  \DeclareUnicodeCharacter{1E62}{\udotaccent{S}}%
+  \DeclareUnicodeCharacter{1E63}{\udotaccent{s}}%
+  \DeclareUnicodeCharacter{1E6A}{\dotaccent{T}}%
+  \DeclareUnicodeCharacter{1E6B}{\dotaccent{t}}%
+  \DeclareUnicodeCharacter{1E6C}{\udotaccent{T}}%
+  \DeclareUnicodeCharacter{1E6D}{\udotaccent{t}}%
+  \DeclareUnicodeCharacter{1E6E}{\ubaraccent{T}}%
+  \DeclareUnicodeCharacter{1E6F}{\ubaraccent{t}}%
+  %
+  \DeclareUnicodeCharacter{1E7C}{\~V}%
+  \DeclareUnicodeCharacter{1E7D}{\~v}%
+  \DeclareUnicodeCharacter{1E7E}{\udotaccent{V}}%
+  \DeclareUnicodeCharacter{1E7F}{\udotaccent{v}}%
+  %
+  \DeclareUnicodeCharacter{1E80}{\`W}%
+  \DeclareUnicodeCharacter{1E81}{\`w}%
+  \DeclareUnicodeCharacter{1E82}{\'W}%
+  \DeclareUnicodeCharacter{1E83}{\'w}%
+  \DeclareUnicodeCharacter{1E84}{\"W}%
+  \DeclareUnicodeCharacter{1E85}{\"w}%
+  \DeclareUnicodeCharacter{1E86}{\dotaccent{W}}%
+  \DeclareUnicodeCharacter{1E87}{\dotaccent{w}}%
+  \DeclareUnicodeCharacter{1E88}{\udotaccent{W}}%
+  \DeclareUnicodeCharacter{1E89}{\udotaccent{w}}%
+  \DeclareUnicodeCharacter{1E8A}{\dotaccent{X}}%
+  \DeclareUnicodeCharacter{1E8B}{\dotaccent{x}}%
+  \DeclareUnicodeCharacter{1E8C}{\"X}%
+  \DeclareUnicodeCharacter{1E8D}{\"x}%
+  \DeclareUnicodeCharacter{1E8E}{\dotaccent{Y}}%
+  \DeclareUnicodeCharacter{1E8F}{\dotaccent{y}}%
+  %
+  \DeclareUnicodeCharacter{1E90}{\^Z}%
+  \DeclareUnicodeCharacter{1E91}{\^z}%
+  \DeclareUnicodeCharacter{1E92}{\udotaccent{Z}}%
+  \DeclareUnicodeCharacter{1E93}{\udotaccent{z}}%
+  \DeclareUnicodeCharacter{1E94}{\ubaraccent{Z}}%
+  \DeclareUnicodeCharacter{1E95}{\ubaraccent{z}}%
+  \DeclareUnicodeCharacter{1E96}{\ubaraccent{h}}%
+  \DeclareUnicodeCharacter{1E97}{\"t}%
+  \DeclareUnicodeCharacter{1E98}{\ringaccent{w}}%
+  \DeclareUnicodeCharacter{1E99}{\ringaccent{y}}%
+  %
+  \DeclareUnicodeCharacter{1EA0}{\udotaccent{A}}%
+  \DeclareUnicodeCharacter{1EA1}{\udotaccent{a}}%
+  %
+  \DeclareUnicodeCharacter{1EB8}{\udotaccent{E}}%
+  \DeclareUnicodeCharacter{1EB9}{\udotaccent{e}}%
+  \DeclareUnicodeCharacter{1EBC}{\~E}%
+  \DeclareUnicodeCharacter{1EBD}{\~e}%
+  %
+  \DeclareUnicodeCharacter{1ECA}{\udotaccent{I}}%
+  \DeclareUnicodeCharacter{1ECB}{\udotaccent{i}}%
+  \DeclareUnicodeCharacter{1ECC}{\udotaccent{O}}%
+  \DeclareUnicodeCharacter{1ECD}{\udotaccent{o}}%
+  %
+  \DeclareUnicodeCharacter{1EE4}{\udotaccent{U}}%
+  \DeclareUnicodeCharacter{1EE5}{\udotaccent{u}}%
+  %
+  \DeclareUnicodeCharacter{1EF2}{\`Y}%
+  \DeclareUnicodeCharacter{1EF3}{\`y}%
+  \DeclareUnicodeCharacter{1EF4}{\udotaccent{Y}}%
+  %
+  \DeclareUnicodeCharacter{1EF8}{\~Y}%
+  \DeclareUnicodeCharacter{1EF9}{\~y}%
+  %
+  % Punctuation
+  \DeclareUnicodeCharacter{2013}{--}%
+  \DeclareUnicodeCharacter{2014}{---}%
+  \DeclareUnicodeCharacter{2018}{\quoteleft{}}%
+  \DeclareUnicodeCharacter{2019}{\quoteright{}}%
+  \DeclareUnicodeCharacter{201A}{\quotesinglbase{}}%
+  \DeclareUnicodeCharacter{201C}{\quotedblleft{}}%
+  \DeclareUnicodeCharacter{201D}{\quotedblright{}}%
+  \DeclareUnicodeCharacter{201E}{\quotedblbase{}}%
+  \DeclareUnicodeCharacter{2020}{\ensuremath\dagger}%
+  \DeclareUnicodeCharacter{2021}{\ensuremath\ddagger}%
+  \DeclareUnicodeCharacter{2022}{\bullet{}}%
+  \DeclareUnicodeCharacter{202F}{\thinspace}%
+  \DeclareUnicodeCharacter{2026}{\dots{}}%
+  \DeclareUnicodeCharacter{2039}{\guilsinglleft{}}%
+  \DeclareUnicodeCharacter{203A}{\guilsinglright{}}%
+  %
+  \DeclareUnicodeCharacter{20AC}{\euro{}}%
+  %
+  \DeclareUnicodeCharacter{2192}{\expansion{}}%
+  \DeclareUnicodeCharacter{21D2}{\result{}}%
+  %
+  % Mathematical symbols
+  \DeclareUnicodeCharacter{2200}{\ensuremath\forall}%
+  \DeclareUnicodeCharacter{2203}{\ensuremath\exists}%
+  \DeclareUnicodeCharacter{2208}{\ensuremath\in}%
+  \DeclareUnicodeCharacter{2212}{\minus{}}%
+  \DeclareUnicodeCharacter{2217}{\ast}%
+  \DeclareUnicodeCharacter{221E}{\ensuremath\infty}%
+  \DeclareUnicodeCharacter{2225}{\ensuremath\parallel}%
+  \DeclareUnicodeCharacter{2227}{\ensuremath\wedge}%
+  \DeclareUnicodeCharacter{2229}{\ensuremath\cap}%
+  \DeclareUnicodeCharacter{2261}{\equiv{}}%
+  \DeclareUnicodeCharacter{2264}{\ensuremath\leq}%
+  \DeclareUnicodeCharacter{2265}{\ensuremath\geq}%
+  \DeclareUnicodeCharacter{2282}{\ensuremath\subset}%
+  \DeclareUnicodeCharacter{2287}{\ensuremath\supseteq}%
+  %
+  \DeclareUnicodeCharacter{2016}{\ensuremath\Vert}%
+  \DeclareUnicodeCharacter{2032}{\ensuremath\prime}%
+  \DeclareUnicodeCharacter{210F}{\ensuremath\hbar}%
+  \DeclareUnicodeCharacter{2111}{\ensuremath\Im}%
+  \DeclareUnicodeCharacter{2113}{\ensuremath\ell}%
+  \DeclareUnicodeCharacter{2118}{\ensuremath\wp}%
+  \DeclareUnicodeCharacter{211C}{\ensuremath\Re}%
+  \DeclareUnicodeCharacter{2135}{\ensuremath\aleph}%
+  \DeclareUnicodeCharacter{2190}{\ensuremath\leftarrow}%
+  \DeclareUnicodeCharacter{2191}{\ensuremath\uparrow}%
+  \DeclareUnicodeCharacter{2193}{\ensuremath\downarrow}%
+  \DeclareUnicodeCharacter{2194}{\ensuremath\leftrightarrow}%
+  \DeclareUnicodeCharacter{2195}{\ensuremath\updownarrow}%
+  \DeclareUnicodeCharacter{2196}{\ensuremath\nwarrow}%
+  \DeclareUnicodeCharacter{2197}{\ensuremath\nearrow}%
+  \DeclareUnicodeCharacter{2198}{\ensuremath\searrow}%
+  \DeclareUnicodeCharacter{2199}{\ensuremath\swarrow}%
+  \DeclareUnicodeCharacter{21A6}{\ensuremath\mapsto}%
+  \DeclareUnicodeCharacter{21A9}{\ensuremath\hookleftarrow}%
+  \DeclareUnicodeCharacter{21AA}{\ensuremath\hookrightarrow}%
+  \DeclareUnicodeCharacter{21BC}{\ensuremath\leftharpoonup}%
+  \DeclareUnicodeCharacter{21BD}{\ensuremath\leftharpoondown}%
+  \DeclareUnicodeCharacter{21C0}{\ensuremath\rightharpoonup}%
+  \DeclareUnicodeCharacter{21C1}{\ensuremath\rightharpoondown}%
+  \DeclareUnicodeCharacter{21CC}{\ensuremath\rightleftharpoons}%
+  \DeclareUnicodeCharacter{21D0}{\ensuremath\Leftarrow}%
+  \DeclareUnicodeCharacter{21D1}{\ensuremath\Uparrow}%
+  \DeclareUnicodeCharacter{21D3}{\ensuremath\Downarrow}%
+  \DeclareUnicodeCharacter{21D4}{\ensuremath\Leftrightarrow}%
+  \DeclareUnicodeCharacter{21D5}{\ensuremath\Updownarrow}%
+  \DeclareUnicodeCharacter{2202}{\ensuremath\partial}%
+  \DeclareUnicodeCharacter{2205}{\ensuremath\emptyset}%
+  \DeclareUnicodeCharacter{2207}{\ensuremath\nabla}%
+  \DeclareUnicodeCharacter{2209}{\ensuremath\notin}%
+  \DeclareUnicodeCharacter{220B}{\ensuremath\owns}%
+  \DeclareUnicodeCharacter{220F}{\ensuremath\prod}%
+  \DeclareUnicodeCharacter{2210}{\ensuremath\coprod}%
+  \DeclareUnicodeCharacter{2211}{\ensuremath\sum}%
+  \DeclareUnicodeCharacter{2213}{\ensuremath\mp}%
+  \DeclareUnicodeCharacter{2218}{\ensuremath\circ}%
+  \DeclareUnicodeCharacter{221A}{\ensuremath\surd}%
+  \DeclareUnicodeCharacter{221D}{\ensuremath\propto}%
+  \DeclareUnicodeCharacter{2220}{\ensuremath\angle}%
+  \DeclareUnicodeCharacter{2223}{\ensuremath\mid}%
+  \DeclareUnicodeCharacter{2228}{\ensuremath\vee}%
+  \DeclareUnicodeCharacter{222A}{\ensuremath\cup}%
+  \DeclareUnicodeCharacter{222B}{\ensuremath\smallint}%
+  \DeclareUnicodeCharacter{222E}{\ensuremath\oint}%
+  \DeclareUnicodeCharacter{223C}{\ensuremath\sim}%
+  \DeclareUnicodeCharacter{2240}{\ensuremath\wr}%
+  \DeclareUnicodeCharacter{2243}{\ensuremath\simeq}%
+  \DeclareUnicodeCharacter{2245}{\ensuremath\cong}%
+  \DeclareUnicodeCharacter{2248}{\ensuremath\approx}%
+  \DeclareUnicodeCharacter{224D}{\ensuremath\asymp}%
+  \DeclareUnicodeCharacter{2250}{\ensuremath\doteq}%
+  \DeclareUnicodeCharacter{2260}{\ensuremath\neq}%
+  \DeclareUnicodeCharacter{226A}{\ensuremath\ll}%
+  \DeclareUnicodeCharacter{226B}{\ensuremath\gg}%
+  \DeclareUnicodeCharacter{227A}{\ensuremath\prec}%
+  \DeclareUnicodeCharacter{227B}{\ensuremath\succ}%
+  \DeclareUnicodeCharacter{2283}{\ensuremath\supset}%
+  \DeclareUnicodeCharacter{2286}{\ensuremath\subseteq}%
+  \DeclareUnicodeCharacter{228E}{\ensuremath\uplus}%
+  \DeclareUnicodeCharacter{2291}{\ensuremath\sqsubseteq}%
+  \DeclareUnicodeCharacter{2292}{\ensuremath\sqsupseteq}%
+  \DeclareUnicodeCharacter{2293}{\ensuremath\sqcap}%
+  \DeclareUnicodeCharacter{2294}{\ensuremath\sqcup}%
+  \DeclareUnicodeCharacter{2295}{\ensuremath\oplus}%
+  \DeclareUnicodeCharacter{2296}{\ensuremath\ominus}%
+  \DeclareUnicodeCharacter{2297}{\ensuremath\otimes}%
+  \DeclareUnicodeCharacter{2298}{\ensuremath\oslash}%
+  \DeclareUnicodeCharacter{2299}{\ensuremath\odot}%
+  \DeclareUnicodeCharacter{22A2}{\ensuremath\vdash}%
+  \DeclareUnicodeCharacter{22A3}{\ensuremath\dashv}%
+  \DeclareUnicodeCharacter{22A4}{\ensuremath\ptextop}%
+  \DeclareUnicodeCharacter{22A5}{\ensuremath\bot}%
+  \DeclareUnicodeCharacter{22A8}{\ensuremath\models}%
+  \DeclareUnicodeCharacter{22C0}{\ensuremath\bigwedge}%
+  \DeclareUnicodeCharacter{22C1}{\ensuremath\bigvee}%
+  \DeclareUnicodeCharacter{22C2}{\ensuremath\bigcap}%
+  \DeclareUnicodeCharacter{22C3}{\ensuremath\bigcup}%
+  \DeclareUnicodeCharacter{22C4}{\ensuremath\diamond}%
+  \DeclareUnicodeCharacter{22C5}{\ensuremath\cdot}%
+  \DeclareUnicodeCharacter{22C6}{\ensuremath\star}%
+  \DeclareUnicodeCharacter{22C8}{\ensuremath\bowtie}%
+  \DeclareUnicodeCharacter{2308}{\ensuremath\lceil}%
+  \DeclareUnicodeCharacter{2309}{\ensuremath\rceil}%
+  \DeclareUnicodeCharacter{230A}{\ensuremath\lfloor}%
+  \DeclareUnicodeCharacter{230B}{\ensuremath\rfloor}%
+  \DeclareUnicodeCharacter{2322}{\ensuremath\frown}%
+  \DeclareUnicodeCharacter{2323}{\ensuremath\smile}%
+  %
+  \DeclareUnicodeCharacter{25B3}{\ensuremath\triangle}%
+  \DeclareUnicodeCharacter{25B7}{\ensuremath\triangleright}%
+  \DeclareUnicodeCharacter{25BD}{\ensuremath\bigtriangledown}%
+  \DeclareUnicodeCharacter{25C1}{\ensuremath\triangleleft}%
+  \DeclareUnicodeCharacter{25C7}{\ensuremath\diamond}%
+  \DeclareUnicodeCharacter{2660}{\ensuremath\spadesuit}%
+  \DeclareUnicodeCharacter{2661}{\ensuremath\heartsuit}%
+  \DeclareUnicodeCharacter{2662}{\ensuremath\diamondsuit}%
+  \DeclareUnicodeCharacter{2663}{\ensuremath\clubsuit}%
+  \DeclareUnicodeCharacter{266D}{\ensuremath\flat}%
+  \DeclareUnicodeCharacter{266E}{\ensuremath\natural}%
+  \DeclareUnicodeCharacter{266F}{\ensuremath\sharp}%
+  \DeclareUnicodeCharacter{26AA}{\ensuremath\bigcirc}%
+  \DeclareUnicodeCharacter{27B9}{\ensuremath\rangle}%
+  \DeclareUnicodeCharacter{27C2}{\ensuremath\perp}%
+  \DeclareUnicodeCharacter{27E8}{\ensuremath\langle}%
+  \DeclareUnicodeCharacter{27F5}{\ensuremath\longleftarrow}%
+  \DeclareUnicodeCharacter{27F6}{\ensuremath\longrightarrow}%
+  \DeclareUnicodeCharacter{27F7}{\ensuremath\longleftrightarrow}%
+  \DeclareUnicodeCharacter{27FC}{\ensuremath\longmapsto}%
+  \DeclareUnicodeCharacter{29F5}{\ensuremath\setminus}%
+  \DeclareUnicodeCharacter{2A00}{\ensuremath\bigodot}%
+  \DeclareUnicodeCharacter{2A01}{\ensuremath\bigoplus}%
+  \DeclareUnicodeCharacter{2A02}{\ensuremath\bigotimes}%
+  \DeclareUnicodeCharacter{2A04}{\ensuremath\biguplus}%
+  \DeclareUnicodeCharacter{2A06}{\ensuremath\bigsqcup}%
+  \DeclareUnicodeCharacter{2A3F}{\ensuremath\amalg}%
+  \DeclareUnicodeCharacter{2AAF}{\ensuremath\preceq}%
+  \DeclareUnicodeCharacter{2AB0}{\ensuremath\succeq}%
+  %
+  \global\mathchardef\checkmark="1370% actually the square root sign
+  \DeclareUnicodeCharacter{2713}{\ensuremath\checkmark}%
+}% end of \unicodechardefs
+
+% UTF-8 byte sequence (pdfTeX) definitions (replacing and @U command)
+% It makes the setting that replace UTF-8 byte sequence.
+\def\utfeightchardefs{%
+  \let\DeclareUnicodeCharacter\DeclareUnicodeCharacterUTFviii
+  \unicodechardefs
+}
+
+% Whether the active definitions of non-ASCII characters expand to
+% non-active tokens with the same character code.  This is used to
+% write characters literally, instead of using active definitions for
+% printing the correct glyphs.
+\newif\ifpassthroughchars
+\passthroughcharsfalse
+
+% For native Unicode handling (XeTeX and LuaTeX),
+% provide a definition macro to replace/pass-through a Unicode character
+%
+\def\DeclareUnicodeCharacterNative#1#2{%
+  \catcode"#1=\active
+  \def\dodeclareunicodecharacternative##1##2##3{%
+    \begingroup
+      \uccode`\~="##2\relax
+      \uppercase{\gdef~}{%
+        \ifpassthroughchars
+          ##1%
+        \else
+          ##3%
+        \fi
+      }
+    \endgroup
+  }
+  \begingroup
+    \uccode`\.="#1\relax
+    \uppercase{\def\UTFNativeTmp{.}}%
+    \expandafter\dodeclareunicodecharacternative\UTFNativeTmp{#1}{#2}%
+  \endgroup
+}
+
+% Native Unicode handling (XeTeX and LuaTeX) character replacing definition.
+% It activates the setting that replaces Unicode characters.
+\def\nativeunicodechardefs{%
+  \let\DeclareUnicodeCharacter\DeclareUnicodeCharacterNative
+  \unicodechardefs
+}
+
+% For native Unicode handling (XeTeX and LuaTeX),
+% make the character token expand
+% to the sequences given in \unicodechardefs for printing.
+\def\DeclareUnicodeCharacterNativeAtU#1#2{%
+  \def\UTFAtUTmp{#2}
+  \expandafter\globallet\csname uni:#1\endcsname \UTFAtUTmp
+}
+
+% @U command definitions for native Unicode handling (XeTeX and LuaTeX).
+\def\nativeunicodechardefsatu{%
+  \let\DeclareUnicodeCharacter\DeclareUnicodeCharacterNativeAtU
+  \unicodechardefs
+}
+
+% US-ASCII character definitions.
+\def\asciichardefs{% nothing need be done
+   \relax
+}
+
+% Define all Unicode characters we know about.  This makes UTF-8 the default
+% input encoding and allows @U to work.
+\iftxinativeunicodecapable
+  \nativeunicodechardefsatu
+\else
+  \utfeightchardefs
+\fi
+
+\message{formatting,}
+
+\newdimen\defaultparindent \defaultparindent = 15pt
+
+\chapheadingskip = 15pt plus 4pt minus 2pt
+\secheadingskip = 12pt plus 3pt minus 2pt
+\subsecheadingskip = 9pt plus 2pt minus 2pt
+
+% Prevent underfull vbox error messages.
+\vbadness = 10000
+
+% Don't be very finicky about underfull hboxes, either.
+\hbadness = 6666
+
+% Following George Bush, get rid of widows and orphans.
+\widowpenalty=10000
+\clubpenalty=10000
+
+% Use TeX 3.0's \emergencystretch to help line breaking, but if we're
+% using an old version of TeX, don't do anything.  We want the amount of
+% stretch added to depend on the line length, hence the dependence on
+% \hsize.  We call this whenever the paper size is set.
+%
+\def\setemergencystretch{%
+  \ifx\emergencystretch\thisisundefined
+    % Allow us to assign to \emergencystretch anyway.
+    \def\emergencystretch{\dimen0}%
+  \else
+    \emergencystretch = .15\hsize
+  \fi
+}
+
+% Parameters in order: 1) textheight; 2) textwidth;
+% 3) voffset; 4) hoffset; 5) binding offset; 6) topskip;
+% 7) physical page height; 8) physical page width.
+%
+% We also call \setleading{\textleading}, so the caller should define
+% \textleading.  The caller should also set \parskip.
+%
+\def\internalpagesizes#1#2#3#4#5#6#7#8{%
+  \voffset = #3\relax
+  \topskip = #6\relax
+  \splittopskip = \topskip
+  %
+  \vsize = #1\relax
+  \advance\vsize by \topskip
+  \outervsize = \vsize
+  \advance\outervsize by 2\topandbottommargin
+  \txipageheight = \vsize
+  %
+  \hsize = #2\relax
+  \outerhsize = \hsize
+  \advance\outerhsize by 0.5in
+  \txipagewidth = \hsize
+  %
+  \normaloffset = #4\relax
+  \bindingoffset = #5\relax
+  %
+  \ifpdf
+    \pdfpageheight #7\relax
+    \pdfpagewidth #8\relax
+    % if we don't reset these, they will remain at "1 true in" of
+    % whatever layout pdftex was dumped with.
+    \pdfhorigin = 1 true in
+    \pdfvorigin = 1 true in
+  \else
+    \ifx\XeTeXrevision\thisisundefined
+      \special{papersize=#8,#7}%
+    \else
+      \pdfpageheight #7\relax
+      \pdfpagewidth #8\relax
+      % XeTeX does not have \pdfhorigin and \pdfvorigin.
+    \fi
+  \fi
+  %
+  \setleading{\textleading}
+  %
+  \parindent = \defaultparindent
+  \setemergencystretch
+}
+
+% @letterpaper (the default).
+\def\letterpaper{{\globaldefs = 1
+  \parskip = 3pt plus 2pt minus 1pt
+  \textleading = 13.2pt
+  %
+  % If page is nothing but text, make it come out even.
+  \internalpagesizes{607.2pt}{6in}% that's 46 lines
+                    {\voffset}{.25in}%
+                    {\bindingoffset}{36pt}%
+                    {11in}{8.5in}%
+}}
+
+% Use @smallbook to reset parameters for 7x9.25 trim size.
+\def\smallbook{{\globaldefs = 1
+  \parskip = 2pt plus 1pt
+  \textleading = 12pt
+  %
+  \internalpagesizes{7.5in}{5in}%
+                    {-.2in}{0in}%
+                    {\bindingoffset}{16pt}%
+                    {9.25in}{7in}%
+  %
+  \lispnarrowing = 0.3in
+  \tolerance = 700
+  \contentsrightmargin = 0pt
+  \defbodyindent = .5cm
+}}
+
+% Use @smallerbook to reset parameters for 6x9 trim size.
+% (Just testing, parameters still in flux.)
+\def\smallerbook{{\globaldefs = 1
+  \parskip = 1.5pt plus 1pt
+  \textleading = 12pt
+  %
+  \internalpagesizes{7.4in}{4.8in}%
+                    {-.2in}{-.4in}%
+                    {0pt}{14pt}%
+                    {9in}{6in}%
+  %
+  \lispnarrowing = 0.25in
+  \tolerance = 700
+  \contentsrightmargin = 0pt
+  \defbodyindent = .4cm
+}}
+
+% Use @afourpaper to print on European A4 paper.
+\def\afourpaper{{\globaldefs = 1
+  \parskip = 3pt plus 2pt minus 1pt
+  \textleading = 13.2pt
+  %
+  % Double-side printing via postscript on Laserjet 4050
+  % prints double-sided nicely when \bindingoffset=10mm and \hoffset=-6mm.
+  % To change the settings for a different printer or situation, adjust
+  % \normaloffset until the front-side and back-side texts align.  Then
+  % do the same for \bindingoffset.  You can set these for testing in
+  % your texinfo source file like this:
+  % @tex
+  % \global\normaloffset = -6mm
+  % \global\bindingoffset = 10mm
+  % @end tex
+  \internalpagesizes{673.2pt}{160mm}% that's 51 lines
+                    {\voffset}{\hoffset}%
+                    {\bindingoffset}{44pt}%
+                    {297mm}{210mm}%
+  %
+  \tolerance = 700
+  \contentsrightmargin = 0pt
+  \defbodyindent = 5mm
+}}
+
+% Use @afivepaper to print on European A5 paper.
+% From romildo@urano.iceb.ufop.br, 2 July 2000.
+% He also recommends making @example and @lisp be small.
+\def\afivepaper{{\globaldefs = 1
+  \parskip = 2pt plus 1pt minus 0.1pt
+  \textleading = 12.5pt
+  %
+  \internalpagesizes{160mm}{120mm}%
+                    {\voffset}{\hoffset}%
+                    {\bindingoffset}{8pt}%
+                    {210mm}{148mm}%
+  %
+  \lispnarrowing = 0.2in
+  \tolerance = 800
+  \contentsrightmargin = 0pt
+  \defbodyindent = 2mm
+  \tableindent = 12mm
+}}
+
+% A specific text layout, 24x15cm overall, intended for A4 paper.
+\def\afourlatex{{\globaldefs = 1
+  \afourpaper
+  \internalpagesizes{237mm}{150mm}%
+                    {\voffset}{4.6mm}%
+                    {\bindingoffset}{7mm}%
+                    {297mm}{210mm}%
+  %
+  % Must explicitly reset to 0 because we call \afourpaper.
+  \globaldefs = 0
+}}
+
+% Use @afourwide to print on A4 paper in landscape format.
+\def\afourwide{{\globaldefs = 1
+  \afourpaper
+  \internalpagesizes{241mm}{165mm}%
+                    {\voffset}{-2.95mm}%
+                    {\bindingoffset}{7mm}%
+                    {297mm}{210mm}%
+  \globaldefs = 0
+}}
+
+\def\bsixpaper{{\globaldefs = 1
+  \afourpaper
+  \internalpagesizes{140mm}{100mm}%
+                    {-6.35mm}{-12.7mm}%
+                    {\bindingoffset}{14pt}%
+                    {176mm}{125mm}%
+  \let\SETdispenvsize=\smallword
+  \lispnarrowing = 0.2in
+  \globaldefs = 0
+}}
+
+
+% @pagesizes TEXTHEIGHT[,TEXTWIDTH]
+% Perhaps we should allow setting the margins, \topskip, \parskip,
+% and/or leading, also. Or perhaps we should compute them somehow.
+%
+\parseargdef\pagesizes{\pagesizesyyy #1,,\finish}
+\def\pagesizesyyy#1,#2,#3\finish{{%
+  \setbox0 = \hbox{\ignorespaces #2}\ifdim\wd0 > 0pt \hsize=#2\relax \fi
+  \globaldefs = 1
+  %
+  \parskip = 3pt plus 2pt minus 1pt
+  \setleading{\textleading}%
+  %
+  \dimen0 = #1\relax
+  \advance\dimen0 by 2.5in % default 1in margin above heading line
+                           % and 1.5in to include heading, footing and
+                           % bottom margin
+  %
+  \dimen2 = \hsize
+  \advance\dimen2 by 2in % default to 1 inch margin on each side
+  %
+  \internalpagesizes{#1}{\hsize}%
+                    {\voffset}{\normaloffset}%
+                    {\bindingoffset}{44pt}%
+                    {\dimen0}{\dimen2}%
+}}
+
+% Set default to letter.
+%
+\letterpaper
+
+% Default value of \hfuzz, for suppressing warnings about overfull hboxes.
+\hfuzz = 1pt
+
+
+\message{and turning on texinfo input format.}
+
+\def^^L{\par} % remove \outer, so ^L can appear in an @comment
+
+% DEL is a comment character, in case @c does not suffice.
+\catcode`\^^? = 14
+
+% Define macros to output various characters with catcode for normal text.
+\catcode`\"=\other \def\normaldoublequote{"}
+\catcode`\$=\other \def\normaldollar{$}%$ font-lock fix
+\catcode`\+=\other \def\normalplus{+}
+\catcode`\<=\other \def\normalless{<}
+\catcode`\>=\other \def\normalgreater{>}
+\catcode`\^=\other \def\normalcaret{^}
+\catcode`\_=\other \def\normalunderscore{_}
+\catcode`\|=\other \def\normalverticalbar{|}
+\catcode`\~=\other \def\normaltilde{~}
+
+% This macro is used to make a character print one way in \tt
+% (where it can probably be output as-is), and another way in other fonts,
+% where something hairier probably needs to be done.
+%
+% #1 is what to print if we are indeed using \tt; #2 is what to print
+% otherwise.  Since all the Computer Modern typewriter fonts have zero
+% interword stretch (and shrink), and it is reasonable to expect all
+% typewriter fonts to have this, we can check that font parameter.
+%
+\def\ifusingtt#1#2{\ifdim \fontdimen3\font=0pt #1\else #2\fi}
+
+% Same as above, but check for italic font.  Actually this also catches
+% non-italic slanted fonts since it is impossible to distinguish them from
+% italic fonts.  But since this is only used by $ and it uses \sl anyway
+% this is not a problem.
+\def\ifusingit#1#2{\ifdim \fontdimen1\font>0pt #1\else #2\fi}
+
+% Set catcodes for Texinfo file
+
+% Active characters for printing the wanted glyph.
+% Most of these we simply print from the \tt font, but for some, we can
+% use math or other variants that look better in normal text.
+%
+\catcode`\"=\active
+\def\activedoublequote{{\tt\char34}}
+\let"=\activedoublequote
+\catcode`\~=\active \def\activetilde{{\tt\char126}} \let~ = \activetilde
+\chardef\hatchar=`\^
+\catcode`\^=\active \def\activehat{{\tt \hatchar}} \let^ = \activehat
+
+\catcode`\_=\active
+\def_{\ifusingtt\normalunderscore\_}
+\def\_{\leavevmode \kern.07em \vbox{\hrule width.3em height.1ex}\kern .07em }
+\let\realunder=_
+
+\catcode`\|=\active \def|{{\tt\char124}}
+
+\chardef \less=`\<
+\catcode`\<=\active \def\activeless{{\tt \less}}\let< = \activeless
+\chardef \gtr=`\>
+\catcode`\>=\active \def\activegtr{{\tt \gtr}}\let> = \activegtr
+\catcode`\+=\active \def+{{\tt \char 43}}
+\catcode`\$=\active \def${\ifusingit{{\sl\$}}\normaldollar}%$ font-lock fix
+\catcode`\-=\active \let-=\normaldash
+
+
+% used for headline/footline in the output routine, in case the page
+% breaks in the middle of an @tex block.
+\def\texinfochars{%
+  \let< = \activeless
+  \let> = \activegtr
+  \let~ = \activetilde 
+  \let^ = \activehat
+  \setregularquotes
+  \let\b = \strong
+  \let\i = \smartitalic
+  % in principle, all other definitions in \tex have to be undone too.
+}
+
+% Used sometimes to turn off (effectively) the active characters even after
+% parsing them.
+\def\turnoffactive{%
+  \normalturnoffactive
+  \otherbackslash
+}
+
+\catcode`\@=0
+
+% \backslashcurfont outputs one backslash character in current font,
+% as in \char`\\.
+\global\chardef\backslashcurfont=`\\
+
+% \realbackslash is an actual character `\' with catcode other.
+{\catcode`\\=\other @gdef@realbackslash{\}}
+
+% In Texinfo, backslash is an active character; it prints the backslash
+% in fixed width font.
+\catcode`\\=\active  % @ for escape char from now on.
+
+% Print a typewriter backslash.  For math mode, we can't simply use
+% \backslashcurfont: the story here is that in math mode, the \char
+% of \backslashcurfont ends up printing the roman \ from the math symbol
+% font (because \char in math mode uses the \mathcode, and plain.tex
+% sets \mathcode`\\="026E).  Hence we use an explicit \mathchar,
+% which is the decimal equivalent of "715c (class 7, e.g., use \fam;
+% ignored family value; char position "5C).  We can't use " for the
+% usual hex value because it has already been made active.
+
+@def@ttbackslash{{@tt @ifmmode @mathchar29020 @else @backslashcurfont @fi}}
+@let@backslashchar = @ttbackslash % @backslashchar{} is for user documents.
+
+% \otherbackslash defines an active \ to be a literal `\' character with
+% catcode other.
+@gdef@otherbackslash{@let\=@realbackslash}
+
+% Same as @turnoffactive except outputs \ as {\tt\char`\\} instead of
+% the literal character `\'.
+%
+{@catcode`- = @active
+ @gdef@normalturnoffactive{%
+   @passthroughcharstrue
+   @let-=@normaldash
+   @let"=@normaldoublequote
+   @let$=@normaldollar %$ font-lock fix
+   @let+=@normalplus
+   @let<=@normalless
+   @let>=@normalgreater
+   @let^=@normalcaret
+   @let_=@normalunderscore
+   @let|=@normalverticalbar
+   @let~=@normaltilde
+   @let\=@ttbackslash
+   @setregularquotes
+   @unsepspaces
+ }
+}
+
+% If a .fmt file is being used, characters that might appear in a file
+% name cannot be active until we have parsed the command line.
+% So turn them off again, and have @fixbackslash turn them back on.
+@catcode`+=@other @catcode`@_=@other
+
+% \enablebackslashhack - allow file to begin `\input texinfo'
+%
+% If a .fmt file is being used, we don't want the `\input texinfo' to show up.
+% That is what \eatinput is for; after that, the `\' should revert to printing
+% a backslash.
+% If the file did not have a `\input texinfo', then it is turned off after
+% the first line; otherwise the first `\' in the file would cause an error.
+% This is used on the very last line of this file, texinfo.tex.
+% We also use @c to call @fixbackslash, in case ends of lines are hidden.
+{
+@catcode`@^=7
+@catcode`@^^M=13@gdef@enablebackslashhack{%
+  @global@let\ = @eatinput%
+  @catcode`@^^M=13%
+  @def@c{@fixbackslash@c}%
+  % Definition for the newline at the end of this file.
+  @def ^^M{@let^^M@secondlinenl}%
+  % Definition for a newline in the main Texinfo file.
+  @gdef @secondlinenl{@fixbackslash}%
+  % In case the first line has a whole-line command on it
+  @let@originalparsearg@parsearg
+  @def@parsearg{@fixbackslash@originalparsearg}
+}}
+
+{@catcode`@^=7 @catcode`@^^M=13%
+@gdef@eatinput input texinfo#1^^M{@fixbackslash}}
+
+% Emergency active definition of newline, in case an active newline token
+% appears by mistake.
+{@catcode`@^=7 @catcode13=13%
+@gdef@enableemergencynewline{%
+  @gdef^^M{%
+    @par%
+    %<warning: active newline>@par%
+}}}
+
+
+@gdef@fixbackslash{%
+  @ifx\@eatinput @let\ = @ttbackslash @fi
+  @catcode13=5 % regular end of line
+  @enableemergencynewline
+  @let@c=@comment
+  @let@parsearg@originalparsearg
+  % Also turn back on active characters that might appear in the input
+  % file name, in case not using a pre-dumped format.
+  @catcode`+=@active
+  @catcode`@_=@active
+  %
+  % If texinfo.cnf is present on the system, read it.
+  % Useful for site-wide @afourpaper, etc.  This macro, @fixbackslash, gets
+  % called at the beginning of every Texinfo file.  Not opening texinfo.cnf
+  % directly in this file, texinfo.tex, makes it possible to make a format
+  % file for Texinfo.
+  %
+  @openin 1 texinfo.cnf
+  @ifeof 1 @else @input texinfo.cnf @fi
+  @closein 1
+}
+
+
+% Say @foo, not \foo, in error messages.
+@escapechar = `@@
+
+% These (along with & and #) are made active for url-breaking, so need
+% active definitions as the normal characters.
+@def@normaldot{.}
+@def@normalquest{?}
+@def@normalslash{/}
+
+% These look ok in all fonts, so just make them not special.
+% @hashchar{} gets its own user-level command, because of #line.
+@catcode`@& = @other @def@normalamp{&}
+@catcode`@# = @other @def@normalhash{#}
+@catcode`@% = @other @def@normalpercent{%}
+
+@let @hashchar = @normalhash
+
+@c Finally, make ` and ' active, so that txicodequoteundirected and
+@c txicodequotebacktick work right in, e.g., @w{@code{`foo'}}.  If we
+@c don't make ` and ' active, @code will not get them as active chars.
+@c Do this last of all since we use ` in the previous @catcode assignments.
+@catcode`@'=@active
+@catcode`@`=@active
+@setregularquotes
+
+@c Local variables:
+@c eval: (add-hook 'before-save-hook 'time-stamp)
+@c page-delimiter: "^\\\\message\\|emacs-page"
+@c time-stamp-start: "def\\\\texinfoversion{"
+@c time-stamp-format: "%:y-%02m-%02d.%02H"
+@c time-stamp-end: "}"
+@c End:
+
+@c vim:sw=2:
+
+@enablebackslashhack
+
diff --git a/info/build-aux/txi-ja.tex b/info/build-aux/txi-ja.tex
new file mode 100644
index 00000000..26d6129f
--- /dev/null
+++ b/info/build-aux/txi-ja.tex
@@ -0,0 +1,486 @@
+% txi-ja.tex -- Japanese translations and font definitions for texinfo.tex.
+%
+% Copyright 1999, 2007, 2008, 2016 Free Software Foundation, Inc.
+% 
+% This program is free software; you can redistribute it and/or modify
+% it under the terms of the GNU General Public License as published by
+% the Free Software Foundation; either version 3 of the license, or (at
+% your option) any later version.
+%
+% This program is distributed in the hope that it will be useful,
+% but WITHOUT ANY WARRANTY; without even the implied warranty of
+% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+% GNU General Public License for more details.
+%
+% You should have received a copy of the GNU General Public License
+% along with this program.  If not, see <http://www.gnu.org/licenses/>.
+%
+% Written by Masamichi Hosoda, 5 May 2016, <trueroad@trueroad.jp>
+
+\txisetlanguage{USenglish}{2}{3}
+
+\plainnonfrenchspacing
+
+\gdef\putwordAppendix{付録}
+\gdef\putwordChapter{Chapter}
+\gdef\putworderror{エラー}
+\gdef\putwordfile{ファイル}
+\gdef\putwordin{in}
+\gdef\putwordIndexIsEmpty{（インデックスが空です）}
+\gdef\putwordIndexNonexistent{（インデックスがありません）}
+\gdef\putwordInfo{Info}
+\gdef\putwordInstanceVariableof{Instance Variable of}
+\gdef\putwordMethodon{Method on}
+\gdef\putwordNoTitle{無題}
+\gdef\putwordof{of}
+\gdef\putwordon{on}
+\gdef\putwordpage{p.}
+\gdef\putwordsection{section}
+\gdef\putwordSection{Section}
+\gdef\putwordsee{see}
+\gdef\putwordSee{See}
+\gdef\putwordShortTOC{簡単な目次}
+\gdef\putwordTOC{目次}
+% And for MODIFIED VERSION, texinfo-modified.tex
+\gdef\putwordChapterPre{} % "第"をつけるなら "\gdef\putwordChapterPre{第@tie }" と定義すること。
+\gdef\putwordChapterSuf{ç« }
+\gdef\putwordSectionPre{} % "第"について同上。
+\gdef\putwordSectionSuf{節}
+\gdef\putwordAppendixPre{付録}
+\gdef\putwordAppendixChapterSuf{ç« }
+\gdef\putwordAppendixSectionSuf{ç« }
+\gdef\putwordSeeSuf{参照}
+%
+\gdef\putwordMJan{1月}
+\gdef\putwordMFeb{2月}
+\gdef\putwordMMar{3月}
+\gdef\putwordMApr{4月}
+\gdef\putwordMMay{5月}
+\gdef\putwordMJun{6月}
+\gdef\putwordMJul{7月}
+\gdef\putwordMAug{8月}
+\gdef\putwordMSep{9月}
+\gdef\putwordMOct{10月}
+\gdef\putwordMNov{11月}
+\gdef\putwordMDec{12月}
+%
+\gdef\putwordDefmac{マクロ}
+\gdef\putwordDefspec{特殊フォーム}
+\gdef\putwordDefvar{変数}
+\gdef\putwordDefopt{ユーザオプション}
+\gdef\putwordDeffunc{関数}
+
+% Produces Year Month Day style of output.
+\def\today{%
+  \number\year å¹´\space
+  \ifcase\month
+  \or\putwordMJan\or\putwordMFeb\or\putwordMMar\or\putwordMApr
+  \or\putwordMMay\or\putwordMJun\or\putwordMJul\or\putwordMAug
+  \or\putwordMSep\or\putwordMOct\or\putwordMNov\or\putwordMDec
+  \fi
+  \space\number\day 日}
+
+
+%
+% Japanese font definitions
+%
+
+\ifx\txijapackage\thisisundefined
+  \errmessage{Required CJK package is not found.
+  Use `texinfo-ja.tex' instead of `texinfo.tex'}
+\else
+
+  %
+  % For LuaTeX
+  %
+  \ifx\luatexversion\thisisundefined
+  \else
+    % Definitions for a main text size of 11pt.  (The default in Texinfo.)
+    % Japanese font size is muliplied by 0.962216.
+    \let\definealphabetictextfontsizexi\definetextfontsizexi
+    \gdef\definetextfontsizexi{%
+      % Text fonts (11.2pt, magstep1).
+      \jfont\textmc{file:ipaexm.ttf:jfm=ujis} at 10.78pt
+      \jfont\textgt{file:ipaexg.ttf:jfm=ujis} at 10.78pt
+
+      % Fonts for indices, footnotes, small examples (9pt).
+      \jfont\smallmc{file:ipaexm.ttf:jfm=ujis} at 8.66pt
+      \jfont\smallgt{file:ipaexg.ttf:jfm=ujis} at 8.66pt
+
+      % Fonts for small examples (8pt).
+      \jfont\smallermc{file:ipaexm.ttf:jfm=ujis} at 7.70pt
+      \jfont\smallergt{file:ipaexg.ttf:jfm=ujis} at 7.70pt
+
+      % Fonts for title page (20.4pt):
+      \jfont\titlemc{file:ipaexm.ttf:jfm=ujis} at 19.63pt
+      \jfont\titlegt{file:ipaexg.ttf:jfm=ujis} at 19.63pt
+
+      % Chapter (and unnumbered) fonts (17.28pt).
+      \jfont\chapmc{file:ipaexm.ttf:jfm=ujis} at 16.63pt
+      \jfont\chapgt{file:ipaexg.ttf:jfm=ujis} at 16.63pt
+
+      % Section fonts (14.4pt).
+      \jfont\secmc{file:ipaexm.ttf:jfm=ujis} at 13.86pt
+      \jfont\secgt{file:ipaexg.ttf:jfm=ujis} at 13.86pt
+
+      % Subsection fonts (13.15pt).
+      \jfont\ssecmc{file:ipaexm.ttf:jfm=ujis} at 12.65pt
+      \jfont\ssecgt{file:ipaexg.ttf:jfm=ujis} at 12.65pt
+
+      % Reduced fonts for @acro in text (10pt).
+      \jfont\reducedmc{file:ipaexm.ttf:jfm=ujis} at 9.62pt
+      \jfont\reducedgt{file:ipaexg.ttf:jfm=ujis} at 9.62pt
+
+      % Fonts for short table of contents.
+      \jfont\shortcontmc{file:ipaexm.ttf:jfm=ujis} at 11.55pt
+      \jfont\shortcontgt{file:ipaexg.ttf:jfm=ujis} at 11.55pt
+
+      \definealphabetictextfontsizexi
+    }
+
+    % Definitions for a main text size of 10pt.
+    % Japanese font size is muliplied by 0.962216.
+    \let\definealphabetictextfontsizex\definetextfontsizex
+    \gdef\definetextfontsizex{%
+      % Text fonts (10pt).
+      \jfont\textmc{file:ipaexm.ttf:jfm=ujis} at 9.62pt
+      \jfont\textgt{file:ipaexg.ttf:jfm=ujis} at 9.62pt
+
+      % Fonts for indices, footnotes, small examples (9pt).
+      \jfont\smallmc{file:ipaexm.ttf:jfm=ujis} at 8.66pt
+      \jfont\smallgt{file:ipaexg.ttf:jfm=ujis} at 8.66pt
+
+      % Fonts for small examples (8pt).
+      \jfont\smallermc{file:ipaexm.ttf:jfm=ujis} at 7.70pt
+      \jfont\smallergt{file:ipaexg.ttf:jfm=ujis} at 7.70pt
+
+      % Fonts for title page (20.4pt):
+      \jfont\titlemc{file:ipaexm.ttf:jfm=ujis} at 19.63pt
+      \jfont\titlegt{file:ipaexg.ttf:jfm=ujis} at 19.63pt
+
+      % Chapter fonts (14.4pt).
+      \jfont\chapmc{file:ipaexm.ttf:jfm=ujis} at 13.86pt
+      \jfont\chapgt{file:ipaexg.ttf:jfm=ujis} at 13.86pt
+
+      % Section fonts (12pt).
+      \jfont\secmc{file:ipaexm.ttf:jfm=ujis} at 11.55pt
+      \jfont\secgt{file:ipaexg.ttf:jfm=ujis} at 11.55pt
+
+      % Subsection fonts (10pt).
+      \jfont\ssecmc{file:ipaexm.ttf:jfm=ujis} at 9.62pt
+      \jfont\ssecgt{file:ipaexg.ttf:jfm=ujis} at 9.62pt
+
+      % Reduced fonts for @acro in text (9pt).
+      \jfont\reducedmc{file:ipaexm.ttf:jfm=ujis} at 8.66pt
+      \jfont\reducedgt{file:ipaexg.ttf:jfm=ujis} at 8.66pt
+
+      % Fonts for short table of contents.
+      \jfont\shortcontmc{file:ipaexm.ttf:jfm=ujis} at 11.55pt
+      \jfont\shortcontgt{file:ipaexg.ttf:jfm=ujis} at 11.55pt
+
+      \definealphabetictextfontsizex
+    }
+
+    % Ignore LuaTeX-ja added line end comment
+    % https://osdn.jp/ticket/browse.php?group_id=5593&tid=36096
+    %
+    % Re-define texinfo.tex's \parseargusing
+    \def\parseargusing#1#2{%
+      \def\argtorun{#2}%
+      \begingroup
+        \ifx\ltjlineendcomment\thisisundefined
+          % Ignore U+FFFFF for LuaTeX-ja <= 20160208.0
+          \catcode"FFFFF=9
+        \else
+          % Ignore the character \ltjlineendcomment for LuaTeX-ja > 20160208.0
+          \catcode\ltjlineendcomment=9
+        \fi
+        \obeylines
+        \spaceisspace
+        #1%
+        \parseargline\empty% Insert the \empty token, see \finishparsearg below.
+    }
+    % Re-define texinfo.tex's \c
+    \def\c{\begingroup \catcode`\^^M=\active%
+      \ifx\ltjlineendcomment\thisisundefined
+        % Ignore U+FFFFF for LuaTeX-ja <= 20160208.0
+        \catcode"FFFFF=9%
+      \else
+        % Ignore the character \ltjlineendcomment for LuaTeX-ja > 20160208.0
+        \catcode\ltjlineendcomment=9%
+      \fi
+    \catcode`\@=\other \catcode`\{=\other \catcode`\}=\other%
+    \cxxx}
+    % Re-let \c related macro
+    \let\comment=\c
+    % Re-let \comment related macros
+    \let\setfilename=\comment
+    \let\dircategory=\comment
+    \let\definfoenclose=\comment
+    \let\footnotestyle=\comment
+  \fi % LuaTeX
+
+  %
+  % For XeTeX
+  %
+  \ifx\XeTeXrevision\thisisundefined
+  \else
+    % Fix some Japanese character class
+    % (unicode-letters.tex is wrong.)
+    \def\do#1{\XeTeXcharclass"#1=1 }
+    \do{3041}\do{3043}\do{3045}\do{3047}\do{3049}\do{3063}
+    \do{3083}\do{3085}\do{3087}\do{308E}\do{3095}\do{3096}
+    \do{30A1}\do{30A3}\do{30A5}\do{30A7}\do{30A9}\do{30C3}
+    \do{30E3}\do{30E5}\do{30E7}\do{30EE}\do{30F5}\do{30F6}
+    \do{30FC}\do{31F0}\do{31F1}\do{31F2}\do{31F3}\do{31F4}
+    \do{31F5}\do{31F6}\do{31F7}\do{31F8}\do{31F9}\do{31FA}
+    \do{31FB}\do{31FC}\do{31FD}\do{31FE}\do{31FF}
+
+    % Add some character class
+    \do{2015}\do{2016}\do{2025}\do{2030}\do{2032}\do{2033}
+    \do{203B}\do{2103}\do{212B}
+
+    \do{2500}\do{2501}\do{2502}\do{2503}\do{250C}\do{250F}
+    \do{2510}\do{2513}\do{2514}\do{2517}\do{2518}\do{251B}
+    \do{251C}\do{251D}\do{2520}\do{2523}\do{2524}\do{2525}
+    \do{2528}\do{252B}\do{252C}\do{252F}\do{2530}\do{2533}
+    \do{2534}\do{2537}\do{2538}\do{253B}\do{253C}\do{253F}
+    \do{2542}\do{254B}
+
+    \do{25A0}\do{25A1}\do{25B2}\do{25B3}\do{25BC}\do{25BD}
+    \do{25C6}\do{25C7}\do{25CB}\do{25CE}\do{25CF}\do{25EF}
+    \do{2605}\do{2606}\do{2640}\do{2642}
+
+    \do{3000}
+
+    % Setting Japanese font instead of Chinese font
+    \def\setjafont#1{%
+      \let\zhfont#1\let\zhpunctfont#1%
+      \let\zhextafont#1\let\zhextbfont#1%
+    }
+
+    % Definitions for a main text size of 11pt.  (The default in Texinfo.)
+    % Japanese font size is muliplied by 0.962216.
+    \let\definealphabetictextfontsizexi\definetextfontsizexi
+    \gdef\definetextfontsizexi{%
+      % Text fonts (11.2pt, magstep1).
+      \font\textmczzz"[ipaexm.ttf]:mapping=tex-text" at 10.78pt
+      \font\textgtzzz"[ipaexg.ttf]:mapping=tex-text" at 10.78pt
+      \def\textmc{\setjafont\textmczzz}
+      \def\textgt{\setjafont\textgtzzz}
+
+      % Fonts for indices, footnotes, small examples (9pt).
+      \font\smallmczzz"[ipaexm.ttf]:mapping=tex-text" at 8.66pt
+      \font\smallgtzzz"[ipaexg.ttf]:mapping=tex-text" at 8.66pt
+      \def\smallmc{\setjafont\smallmczzz}
+      \def\smallgt{\setjafont\smallgtzzz}
+
+      % Fonts for small examples (8pt).
+      \font\smallermczzz"[ipaexm.ttf]:mapping=tex-text" at 7.70pt
+      \font\smallergtzzz"[ipaexg.ttf]:mapping=tex-text" at 7.70pt
+      \def\smallermc{\setjafont\smallermczzz}
+      \def\smallergt{\setjafont\smallergtzzz}
+
+      % Fonts for title page (20.4pt):
+      \font\titlemczzz"[ipaexm.ttf]:mapping=tex-text" at 19.63pt
+      \font\titlegtzzz"[ipaexg.ttf]:mapping=tex-text" at 19.63pt
+      \def\titlemc{\setjafont\titlemczzz}
+      \def\titlegt{\setjafont\titlegtzzz}
+
+      % Chapter (and unnumbered) fonts (17.28pt).
+      \font\chapmczzz"[ipaexm.ttf]:mapping=tex-text" at 16.63pt
+      \font\chapgtzzz"[ipaexg.ttf]:mapping=tex-text" at 16.63pt
+      \def\chapmc{\setjafont\chapmczzz}
+      \def\chapgt{\setjafont\chapgtzzz}
+
+      % Section fonts (14.4pt).
+      \font\secmczzz"[ipaexm.ttf]:mapping=tex-text" at 13.86pt
+      \font\secgtzzz"[ipaexg.ttf]:mapping=tex-text" at 13.86pt
+      \def\secmc{\setjafont\secmczzz}
+      \def\secgt{\setjafont\secgtzzz}
+
+      % Subsection fonts (13.15pt).
+      \font\ssecmczzz"[ipaexm.ttf]:mapping=tex-text" at 12.65pt
+      \font\ssecgtzzz"[ipaexg.ttf]:mapping=tex-text" at 12.65pt
+      \def\ssecmc{\setjafont\ssecmczzz}
+      \def\ssecgt{\setjafont\ssecgtzzz}
+
+      % Reduced fonts for @acro in text (10pt).
+      \font\reducedmczzz"[ipaexm.ttf]:mapping=tex-text" at 9.62pt
+      \font\reducedgtzzz"[ipaexg.ttf]:mapping=tex-text" at 9.62pt
+      \def\reducedmc{\setjafont\reducedmczzz}
+      \def\reducedgt{\setjafont\reducedgtzzz}
+
+      % Fonts for short table of contents.
+      \font\shortcontmczzz"[ipaexm.ttf]:mapping=tex-text" at 11.55pt
+      \font\shortcontgtzzz"[ipaexg.ttf]:mapping=tex-text" at 11.55pt
+      \def\shortcontmc{\setjafont\shortcontmczzz}
+      \def\shortcontgt{\setjafont\shortcontgtzzz}
+
+      \definealphabetictextfontsizexi
+    }
+
+    % Definitions for a main text size of 10pt.
+    % Japanese font size is muliplied by 0.962216.
+    \let\definealphabetictextfontsizex\definetextfontsizex
+    \gdef\definetextfontsizex{%
+      % Text fonts (10pt).
+      \font\textmczzz"[ipaexm.ttf]:mapping=tex-text" at 9.62pt
+      \font\textgtzzz"[ipaexg.ttf]:mapping=tex-text" at 9.62pt
+      \def\textmc{\setjafont\textmczzz}
+      \def\textgt{\setjafont\textgtzzz}
+
+      % Fonts for indices, footnotes, small examples (9pt).
+      \font\smallmczzz"[ipaexm.ttf]:mapping=tex-text" at 8.66pt
+      \font\smallgtzzz"[ipaexg.ttf]:mapping=tex-text" at 8.66pt
+      \def\smallmc{\setjafont\smallmczzz}
+      \def\smallgt{\setjafont\smallgtzzz}
+
+      % Fonts for small examples (8pt).
+      \font\smallermczzz"[ipaexm.ttf]:mapping=tex-text" at 7.70pt
+      \font\smallergtzzz"[ipaexg.ttf]:mapping=tex-text" at 7.70pt
+      \def\smallermc{\setjafont\smallermczzz}
+      \def\smallergt{\setjafont\smallergtzzz}
+
+      % Fonts for title page (20.4pt):
+      \font\titlemczzz"[ipaexm.ttf]:mapping=tex-text" at 19.63pt
+      \font\titlegtzzz"[ipaexg.ttf]:mapping=tex-text" at 19.63pt
+      \def\titlemc{\setjafont\titlemczzz}
+      \def\titlegt{\setjafont\titlegtzzz}
+
+      % Chapter fonts (14.4pt).
+      \font\chapmczzz"[ipaexm.ttf]:mapping=tex-text" at 13.86pt
+      \font\chapgtzzz"[ipaexg.ttf]:mapping=tex-text" at 13.86pt
+      \def\chapmc{\setjafont\chapmczzz}
+      \def\chapgt{\setjafont\chapgtzzz}
+
+      % Section fonts (12pt).
+      \font\secmczzz"[ipaexm.ttf]:mapping=tex-text" at 11.55pt
+      \font\secgtzzz"[ipaexg.ttf]:mapping=tex-text" at 11.55pt
+      \def\secmc{\setjafont\secmczzz}
+      \def\secgt{\setjafont\secgtzzz}
+
+      % Subsection fonts (10pt).
+      \font\ssecmczzz"[ipaexm.ttf]:mapping=tex-text" at 9.62pt
+      \font\ssecgtzzz"[ipaexg.ttf]:mapping=tex-text" at 9.62pt
+      \def\ssecmc{\setjafont\ssecmczzz}
+      \def\ssecgt{\setjafont\ssecgtzzz}
+
+      % Reduced fonts for @acro in text (9pt).
+      \font\reducedmczzz"[ipaexm.ttf]:mapping=tex-text" at 8.66pt
+      \font\reducedgtzzz"[ipaexg.ttf]:mapping=tex-text" at 8.66pt
+      \def\reducedmc{\setjafont\reducedmczzz}
+      \def\reducedgt{\setjafont\reducedgtzzz}
+
+      % Fonts for short table of contents.
+      \font\shortcontmczzz"[ipaexm.ttf]:mapping=tex-text" at 11.55pt
+      \font\shortcontgtzzz"[ipaexg.ttf]:mapping=tex-text" at 11.55pt
+      \def\shortcontmc{\setjafont\shortcontmczzz}
+      \def\shortcontgt{\setjafont\shortcontgtzzz}
+
+      \definealphabetictextfontsizex
+    }
+
+    % Japanese line break settings
+    \XeTeXlinebreaklocale "ja_JP"
+    \XeTeXlinebreakskip=0em plus 0.1em minus 0.01em
+    \XeTeXlinebreakpenalty=0
+
+    % For copy & paste Unicode characters (XeTeX 0.99995+)
+    \ifx\XeTeXgenerateactualtext\thisisundefined
+    \else
+      \XeTeXgenerateactualtext=1
+    \fi
+
+  \fi % XeTeX
+
+  \iftxinativeunicodecapable
+
+    % Sync fonts
+
+    \let\alphabeticrm\rm
+    \gdef\rm{\alphabeticrm\tenmc}
+
+    \let\alphabeticit\it
+    \gdef\it{\alphabeticit\tenmc}
+
+    \let\alphabeticsl\sl
+    \gdef\sl{\alphabeticsl\tengt}
+
+    \let\alphabeticbf\bf
+    \gdef\bf{\alphabeticbf\tengt}
+
+    \let\alphabetictt\tt
+    \gdef\tt{\alphabetictt\tengt}
+
+    % Add fonts
+
+    \let\alphabetictextfonts\textfonts
+    \gdef\textfonts{%
+      \alphabetictextfonts
+      \let\tenmc\textmc
+      \let\tengt\textgt
+    }
+
+    \let\alphabetictitlefonts\titlefonts
+    \gdef\titlefonts{%
+      \alphabetictitlefonts
+      \let\tenmc\titlemc
+      \let\tengt\titlegt
+    }
+
+    \let\alphabeticchapfonts\chapfonts
+    \gdef\chapfonts{%
+      \alphabeticchapfonts
+      \let\tenmc\chapmc
+      \let\tengt\chapgt
+    }
+
+    \let\alphabeticsecfonts\secfonts
+    \gdef\secfonts{%
+      \alphabeticsecfonts
+      \let\tenmc\secmc
+      \let\tengt\secgt
+    }
+
+    \let\alphabeticsubsecfonts\subsecfonts
+    \gdef\subsecfonts{%
+      \alphabeticsubsecfonts
+      \let\tenmc\ssecmc
+      \let\tengt\ssecgt
+    }
+
+    \global\let\subsubsecfonts\subsecfonts
+
+    \let\alphabeticreducedfonts\reducedfonts
+    \gdef\reducedfonts{%
+      \alphabeticreducedfonts
+      \let\tenmc\reducedmc
+      \let\tengt\reducedgt
+    }
+
+    \let\alphabeticsmallfonts\smallfonts
+    \gdef\smallfonts{%
+      \alphabeticsmallfonts
+      \let\tenmc\smallmc
+      \let\tengt\smallgt
+    }
+
+    \let\alphabeticsmallerfonts\smallerfonts
+    \gdef\smallerfonts{%
+      \alphabeticsmallerfonts
+      \let\tenmc\smallermc
+      \let\tengt\smallergt
+    }
+
+    \let\smallexamplefonts\smallfonts
+
+    % Reset fonts
+
+    \globaldefs = 1
+    \definetextfontsizexi
+    \globaldefs = 0
+
+  \fi % \iftxinativeunicodecapable
+
+\fi % \ifx\txijapackage\thisisundefined
-- 
2.11.0