Lout 3.17.

git-svn-id: http://svn.savannah.nongnu.org/svn/lout/trunk@2 9365b830-b601-4143-9ba8-b4a8e2c3339c

473 files changed, 227103 insertions, 0 deletions

diff --git a/README b/README
new file mode 100644
index 0000000..82749f0
--- /dev/null
+++ b/README
@@ -0,0 +1,56 @@
+THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)
+BASSER LOUT VERSION 3 COPYRIGHT (C) 1994, 1999 Jeffrey H. Kingston
+
+Jeffrey H. Kingston
+Basser Department of Computer Science
+The University of Sydney 2006
+AUSTRALIA
+
+Telephone (direct): 61 2 692 4216
+Telephone (messages): 61 2 692 3423
+Email: jeff@cs.usyd.edu.au
+Fax: 61 2 692 3838
+
+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 1, 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
+(file gnu.gpl in this directory); if not, write to the Free Software
+Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+This directory contains everything needed to install the Lout document
+formatting system.  It contains the following directories:
+
+    data            Lout databases (in Lout)
+    doc             Lout documentation (in Lout)
+    font            Adobe Systems font metrics files
+    hyph            Lout hyphenation files (see hyph/README for info)
+    include         Lout packages (in Lout)
+    locale          Locale-specific error messages
+    man             Lout and c2lout manual entries
+    maps            Lout Character Mapping (LCM) files
+    setup           Lout setup files (in Lout)
+    software        Information about Lout-related software from elsewhere
+
+and the following files:
+
+    READMEPDF       A description of the PDF back end
+    blurb           A news blurb describing Lout
+    blurb.short     A short news blurb describing Lout
+    c2lout.c        c2lout source code (all in one file)
+    externs.h z*.c  Lout source code
+    gnu.gpl         A copy of the GNU General Public License
+    makefile        A makefile for installing Lout
+    maillist        Information about a public mailing list about Lout
+    notes.dsc       Notes on the degree of Lout's conformance with the
+                    PostScript Document Structuring Conventions
+    whatsnew        A brief informal update on recent changes
+
+See the makefile for installation instructions.
diff --git a/READMEPDF b/READMEPDF
new file mode 100644
index 0000000..df03071
--- /dev/null
+++ b/READMEPDF
@@ -0,0 +1,420 @@
+to do: manually created links
+
+
+PDF backend instructions and notes
+==================================
+
+By Vincent Tan
+vtan@ugrad.cs.usyd.edu.au
+
+Usage
+-----
+
+To create a PDF file from your Lout files, use the -Z switch.
+
+Example:
+
+$ lout -Z < all > outfile.pdf
+
+[lout -PDF is now an alternative - JeffK]
+If the file has previously been processed by Lout, you should first
+delete all the ".ld" and ".li" files generated by the previous runs
+of Lout. Doing this will avoid spurious error messages from Lout.
+
+
+General notes
+-------------
+
+The PDF backend automatically supports text output and has custom
+handlers for graphics via the use of special @Graphic keywords.
+All such keywords begin with "__" (double underscore). Anything
+else is passed verbatim into the PDF output stream.
+
+One of the best way of learning how to use the backend is to study
+the standard Lout libraries, which have been converted to generate
+PDF files as best as possible. Many of the trickier conversions
+have comments next to them to help you.
+
+
+Compatibility
+=============
+
+
+Standard packages
+-----------------
+
+The PDF backend implements a subset of the Lout packages. The PDF versions
+of the standard Lout packages are described below.
+
+All packages are "safe", in the sense that using them will not produce
+any snippets of PostScript in the PDF file, which would otherwise cause
+rendering errors.
+
+Packages marked "complete" or "no change" will work fully and
+correctly, with a few small provisos. Packages marked "incomplete" will
+have problems when viewed or printed with a PDF rendering program.
+The packages that are affected the worst are the figure, diagram and
+graph packages. Most or all of the uses of these packages will not
+produce any PDF output. In the basic document layout package, only
+a few Lout commands are not implemented; they are listed below.
+
+	fig    [ incomplete ]
+	diag   [ incomplete ]
+	dl     [ incomplete ]
+		unimplemented definitions:
+			@Background/LoutPageSet,
+			@MargSet/LoutMargSet,
+			@MargPut/LoutMargShift
+	doc    [ no change ]
+	eq     [ complete ]
+	graph  [ incomplete ]
+		unimplemented definitions:
+			@GraphObj,
+			@GraphSolid,
+			@GraphDashed,
+			@GraphDotted,
+			@Graph
+	report [ no change ]
+	slides [ no change ]
+	tab    [ complete ]
+	tbl    [ complete - done by JeffK (not a guarantee of quality!) ]
+
+Currently, there is no work-around for this lack of functionality.
+[ ? add a mechanism to include external graphical files (such as
+JPEG compressed images) into the PDF file ? ]
+
+Minor point: surd characters in the 'eq' package will look slightly
+odd when viewed in Adobe Acrobat Reader: the top of the surd
+character will be "short" of the top. This seems to be a problem
+with the way Acrobat renders surds (Lout typically requests that the
+surd be rendered at a slightly larger than normal size but it appears
+that Acrobat renders this enlarged surd incorrectly).
+
+
+User-defined
+------------
+
+If you have used custom snippets of PostScript (usually with a
+@Graphic command) then you will to modify it so that it produces a
+PDF file that can be rendered. At the very least, you should suppress
+the PostScript from appearing in the PDF file using a modification
+like this:
+
+from the original:
+
+{ "0 0 moveto" xsize ysize "lineto stroke" } @Graphic { obj }
+
+to the modified version:
+
+@BackEnd @Case {
+  PostScript @Yield {
+    { "0 0 moveto" xsize ysize "lineto stroke" } @Graphic { obj }
+  }
+  PDF @Yield {
+    # PDF version produces no output [ safe but useless ]
+  }
+}
+
+better yet, translate the PostScript operators into PDF operators:
+
+@BackEnd @Case {
+  PostScript @Yield {
+    { "0 0 moveto" xsize ysize "lineto stroke" } @Graphic { obj }
+  }
+  PDF @Yield {
+    { "0 0 m" __xsize __ysize "l S" } @Graphic { obj }
+  }
+}
+
+More information about how to do this is given below.
+
+
+Text
+====
+
+PDF support for text is automatic. Text that would usually produce
+marks on a page in PostScript will instead produce marks on a page
+in PDF. Lout commands that change text location, size, font, style,
+colour, etc. will work fine.
+
+
+Graphic
+=======
+
+If you are using custom pieces of PostScript to generate rendering
+marks, you will need to modify them for PDF output. These pieces of
+PostScript typically occur within @Graphic commands. At the very
+least, you should modify them so that the PostScript is not placed
+into the PDF file, since this will produce errors when the PDF file
+is rendered. A description of this is described in the Compatibility
+section.
+
+Since PDF is not a programming language whereas PostScript is one,
+it will not be possible to translate all PostScript operators into
+PDF operators which produce the same functionality. If the
+PostScript is straight-forward (eg, move pen to a location, draw a
+few lines, stroke and fill the shape) then it will be possible to
+write equivalent PDF code. If the PostScript code is more
+sophisticated, then it will probably not be possible to write
+equivalent PDF. Currently there is no work-around for this
+limitation.
+
+The possible PostScript to PDF changes are now listed:
+
+	PostScript			PDF
+
+	xsize				__xsize
+	ysize				__ysize
+	xmark				__xmark
+	ymark				__ymark
+	<val>in				__mul(<val>, __in)
+	<val>cm				__mul(<val>, __cm)
+	<val>pt				__mul(<val>, __pt)
+	<val>em				__mul(<val>, __em)
+	<val>vs				__mul(<val>, __loutv)
+	<val>ft				__mul(<val>, __loutf)
+	<val>sp				__mul(<val>, __louts)
+
+	setlinewidth			w
+	stroke				S
+	closepath stroke		s
+	closepath			h
+	moveto				m
+	lineto				l
+	fill				f
+	stroke fill			B
+	gsave				q
+	grestore			Q
+	setgray				g [fill]   G [stroke]
+	setrgbcolor			rg [fill]  RG [stroke]
+	setcmykcolor			k [fill]   K [stroke]
+	setdash				d
+	concat				cm
+	curveto				c
+
+It is also possible to convert arcs to curves but it is not a
+straight-forward procedure because you need to calculate
+Bezier control points.
+
+There are also more PDF marking operators. See the PDF v1.2
+specification, available from <http://www.adobe.com>, for
+more information.
+
+
+For expressions, the PDF backend supports a simple prefix
+notation expression evaluator. The syntax is:
+
+	<expr>		=	<operator> | <value>
+	<operator>	=	__add(<subexpr>, <subexpr>) | __sub(<subexpr>, <subexpr>) |
+				__mul(<subexpr>, <subexpr>) | __div(<subexpr>, <subexpr>) |
+				__sin(<subexpr>) | __cos(<subexpr) |
+				__pick(<cardinal number>, <list of expr>)
+	<value>		=	__in | __cm | __pt | __em | __loutv | __loutf | __louts |
+				__xsize | __ysize | __xmark | __ymark
+	<subexpr>	=	<expr> | +<subexpr> | -<subexpr> | <constant>
+	<constant>	=	0-9.[0-9]*
+
+Note that expressions must start with an <operator> or a <value>. It cannot
+start with a <subexpr> (or a <constant>) although negation is simple to do:
+use __sub(0, <expr>).
+
+Of the operators, add, sub, mul, div, sin and cos do as you would expect. The
+pick operator picks the nth expression from the list of expressions where n
+is the first parameter of the __pick() command: eg, __pick(2, 4, 5, 6) produces
+5. The list in the __pick() command can also be whitespace delimited: eg,
+__pick(2, 7 8 9) produces 8.
+
+Example:
+
+	"xmark ymark moveto xmark xsize add ymark ysize 2 mul add lineto stroke"
+
+becomes:
+
+	"__xmark __ymark m __add(__xmark, __xsize) __add(__ymark, __mul(2, __ysize)) l S"
+
+For more examples, please look in the Lout library files (in the include
+directory).
+
+
+EPS files
+=========
+
+EPS files will not be included into PDF files. Currently, there is
+no work-around for this lack of functionality.
+
+
+Hyperlinks
+==========
+
+The PDF backend supports the creation of hyperlinks. Some hyperlinking is
+automatic and it is possible to specify your own hyperlinks should you so
+desire.
+
+Hyperlinks can be specified to be either accessible from an external file
+(either another PDF file or by external sources such as a hyperlink in an
+HTML document) or which can only be accessed from within the same file.
+
+
+Automatic links
+---------------
+
+Links are automatically generated for the following document layout items:
+
+@Chapter and any other item that uses the @LargeScaleStructure item
+@Index
+@IndexA
+@IndexB
+
+The name of the link is the @Title parameter passed to these items.
+
+Items in @Index entries are kept internal to the document (they cannot
+be linked to from external documents) but items that use
+@LargeScaleStructure can be externally linked.
+
+Index entries are coloured blue. Clicking on the page number in Adobe
+Acrobat Reader will take you to the page. Items that use the
+@LargeScaleStructure item will have no visible indication that they
+have been linked to but moving the mouse over them changes the cursor
+to a pointing finger. For example, mousing over the Table of Contents
+of a document will change the cursor. Clicking on an entry in the Table
+takes you to the page that that entry lies on.
+
+
+User-defined links
+------------------
+
+To create a link, you need to specify a starting (or source) location and
+a destination (or target) location. Source locations often appear visually
+distinctive - for example, hyperlinks appear as blue underlined text,
+like what is seen in web browsers. Clicking on such links often produces
+some kind of highlighting. Releasing the mouse button then transports
+you to the destination location. For each source location, you can specify
+a change in the document's zooming for the target location. Finally,
+target locations can be "exported" so that you can link to them from
+external documents.
+
+Here are the possible link keywords available for the PDF backend:
+
+(1) specifying a source location/link which targets a location internal
+to the PDF document:
+
+	syntax:  "__link_source=<<name_of_target_link [dest_link_option]>>"
+
+	example: "__link_source=<<chapter6>>"
+	example: "__link_source=<<part7 __FitH>>"
+
+The possible destination link options are:
+
+__FitNoChange	no change to the zoom state of the window
+__Fit		change zoom to fit the page to the window
+__FitH		change zoom to fit the width of the page to the window
+__FitV		change zoom to fit the height of the page to the window
+__FitR		change zoom to fit the rectangle of the target to the window
+__FitB		change zoom to fit the page's bounding box to the window
+__FitBH		change zoom to fit the width of the page's bounding box to the window
+__FitBV		change zoom to fit the height of the page's bounding box to the window
+
+The default option is __FitNoChange.
+
+
+(2) specifying a source location/link which targets a location external
+to the PDF document:
+
+for external files:
+	syntax:  "__link_external=<<name_of_target_link __link_to=file_spec>>"
+
+	example: "__link_external=<<chapter6 __link_to=/usr/bin/file.pdf>>"
+
+for URLs:
+	syntax:  "__link_external=<<name_of_target_link __link_to=<< /FS /URL /F (url)>>>>"
+
+	example: "__link_external=<<chapter6 __link_to=<< /FS /URL /F (ftp://ftp.cs.su.oz.au/jeff/lout/user.pdf) >>>>"
+
+	**	note the special format required for URL links **
+	**	note the need to have balanced "<<" and ">>" pairs! **
+
+
+(3) specifying a source location/link which targets a URI:
+
+	syntax:  "__link_URI=<<URL>>"
+
+	example: "__link_URI=<<http://www.adobe.com>>"
+
+
+(4) specifying a target location which cannot be linked to from external
+documents:
+
+	syntax:  "__link_target=<<name_of_target_link>>" where
+			name_of_target_link is in the PDF file
+
+	example: "__link_target=<<chap6.subsection2.paragraph3>>"
+
+
+(5) specifying a target location which can be linked to from external
+documents:
+
+	syntax: "__link_target_for_export=<<name_of_target_link>>"
+			where name_of_target_link is in the PDF file
+
+	example: "__link_target_for_export=<<chapter5>>"
+
+
+PDF Document Information
+========================
+
+PDF files can have some pieces of information such as author, keywords
+included in them, to facilitate searching. The PDF backend supports
+the ability to set these pieces of information, using special keywords:
+
+__author=<author>
+
+example: "__author=John Smith" @Graphic ""
+
+
+__title=<document title>
+
+example: "__title=PDF backend for Lout" @Graphic ""
+
+
+__subject=<subject>
+
+example: "__subject=Lout PDF support" @Graphic ""
+
+
+__keywords=<list of keywords>
+
+example: "__keywords=Lout PDF PostScript" @Graphic ""
+
+
+Troubleshooting
+===============
+
+(1) strange error messages, esp. the PDF backend complaining about
+    unresolved links. Did you delete the ".ld" and ".li" files from
+    previous runs of Lout for PostScript output? Lout needs to
+    create PDF-specific versions of these cross references. Do not
+    mix the PostScript and PDF versions of these files!
+
+(2) "left parameter of @Graphic is bad" - usually from @Title statements
+    which include definitions. For example: "@Title { Using @Tex styles }"
+    where @Tex is defined as: "def @Tex { @Onecol {TEX} }". When the PDF
+    backend tries to create a target entry for a hyperlink, this error
+    message will be generated. The PDF output will still work but the
+    actual title of the link will be "Usingstyles".
+
+(3) figures, diagrams and graphs don't appear in the PDF file. This is
+    currently unimplemented.
+
+(4) EPS files are ignored. EPS files cannot be included in PDF files.
+
+(5) when viewing or printing the PDF file, the renderer complains that
+    it is unable to properly render the page or that there were
+    rendering errors. Solution: check that you are not accidentally
+    including snippets of PostScript into the PDF file. See the
+    Compatilibity section above.
+
+(6) surd (square root) symbols look strange. This appears to be a
+    rendering problem in Adobe Acrobat Reader.
+
+
+
diff --git a/blurb b/blurb
new file mode 100644
index 0000000..4c748a8
--- /dev/null
+++ b/blurb
@@ -0,0 +1,49 @@
+
+         THE LOUT DOCUMENT FORMATTING SYSTEM, VERSION 3.17
+
+Version 3.17 of the Lout document formatting system is now available
+(free of charge).  The system reads a high-level description of a
+document similar in style to LaTeX and produces a PostScript, PDF or
+plain text output file.
+
+Lout offers an unprecedented range of advanced features, including
+optimal paragraph and page breaking, automatic hyphenation, PostScript
+EPS file inclusion and generation, equation formatting, tables, diagrams,
+rotation and scaling, sorted indexes, bibliographic databases, running
+headers and odd-even pages, automatic cross referencing, multilingual
+documents including hyphenation (most European languages are supported,
+including Russian), formatting of C/C++ programs, and much more, all
+ready to use.  Furthermore, Lout is easily extended with definitions
+which are very much easier to write than troff of TeX macros because
+Lout is a high-level language, the outcome of an eight-year research
+project that went back to the beginning.
+
+Lout is written in highly portable ANSI C.  It is distributed under the
+GNU public license as follows:
+
+   ftp://ftp.cs.usyd.edu.au/jeff/lout/lout-3.17.tar.gz
+
+In other words, in a gzipped tar file called "lout-3.17.tar.gz" in the
+"jeff/lout" subdirectory of the home directory of "ftp ftp.cs.usyd.edu.au"
+with login name "ftp" or "anonymous" using any non-empty password.  The
+distribution contains
+
+  *  Complete C source code
+
+  *  Standard library packages of definitions for ordinary documents,
+     technical reports, books, overhead transparencies, stand-alone
+     illustrations, plain text documents, equations, tables, diagrams,
+     graphs, C and C++ program formatting, and Pascal
+
+  *  Complete documentation for all these features consisting of a
+     User's Guide plus an Expert's Guide
+
+  *  A makefile and installation instructions
+
+For those who want to browse first, a PostScript version of the User's
+Guide may be found in the same ftp directory:
+
+   ftp://ftp.cs.usyd.edu.au/jeff/lout/lout-3.17.user.ps.gz
+
+Lout was designed and implemented by Jeffrey H. Kingston (jeff@cs.usyd.edu.au)
+of the Basser Department of Computer Science at the University of Sydney.
diff --git a/blurb.short b/blurb.short
new file mode 100644
index 0000000..1c31792
--- /dev/null
+++ b/blurb.short
@@ -0,0 +1,24 @@
+
+THE LOUT DOCUMENT FORMATTING SYSTEM
+
+Lout is a document formatting system similar in style to LaTeX.  It
+offers a very full range of features, including PostScript, PDF, and
+plain text output, optimal paragraph and page breaking, automatic
+hyphenation, PostScript EPS file inclusion and generation, equation
+formatting, tables, diagrams, rotation and scaling, sorted indexes,
+bibliographic databases, running headers and odd-even pages, automatic
+cross referencing, multilingual documents including hyphenation (most
+European languages are supported, including Russian), formatting of
+C/C++ programs, and more.  Lout may be extended by writing definitions
+which are much simpler than the equivalent troff of TeX macros.
+
+Lout is written in highly portable ANSI C and runs on most platforms.
+It is distributed under the GNU public license.  Its primary web site is
+
+   ftp://ftp.cs.usyd.edu.au/jeff/lout/
+
+Consult the README file in that directory for information about the
+latest version.
+
+Lout was designed and implemented by Jeffrey H. Kingston (jeff@cs.usyd.edu.au)
+of the Basser Department of Computer Science at the University of Sydney.
diff --git a/c2lout.c b/c2lout.c
new file mode 100644
index 0000000..e1f5bb1
--- /dev/null
+++ b/c2lout.c
@@ -0,0 +1,916 @@
+/*****************************************************************************/
+/*                                                                           */
+/*  C2LOUT: A PROGRAM TO CONVERT C AND C++ SOURCE INTO LOUT (VERSION 1.0)    */
+/*  COPYRIGHT (C) 1993 Jeffrey H. Kingston                                   */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 1, 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, write to the Free Software              */
+/*  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.                */
+/*                                                                           */
+/*****************************************************************************/
+#include <string.h>
+#include <stdlib.h>
+#include <stdio.h>
+
+#define C2LOUT_VERSION	"c2lout Version 3.15 (May 1999)"
+#define	BOOLEAN		unsigned
+#define	FALSE		0
+#define	TRUE		1
+#define	MAX_LINE	1024
+
+/* print styles */
+#define	NO_STYLE	0
+#define	FIXED_STYLE	1
+#define	VARYING_STYLE	2
+#define	SYMBOL_STYLE	3
+
+static char	file_name[MAX_LINE];	/* current input file name           */
+static int	line_num;		/* current input line number         */
+static int	line_pos;		/* current input column number       */
+static FILE	*err_fp;		/* where error messages go           */
+
+static BOOLEAN	headers_option;		/* TRUE if no -n option (headers)    */
+static int	style_option;		/* value of -p option, or NO_STYLE   */
+static char	*font_option;		/* value of -f option, else null     */
+static char	*size_option;		/* value of -s option, else null     */
+static char	*line_option;		/* value of -v option, else null     */
+static char	*tabin_option;		/* value of -t option, else null     */
+static char	*tabout_option;		/* value of -T option, else null     */
+
+static BOOLEAN	tab_by_spacing;		/* TRUE if using space chars to tab  */
+static int	tab_in;			/* tab interval, value of -t option  */
+static float	tab_out;		/* tab interval width (-T option)    */
+static char 	tab_unit;		/* unit of measurement for tab       */
+static BOOLEAN	Scan();
+
+extern void ProcessStandAlone(char *fname, FILE *in_fp, FILE *out_fp);
+
+#define Error0(str)							\
+{									\
+  if( line_num > 0 )							\
+    fprintf(err_fp, "c2lout %s %d,%d: ", file_name, line_num, line_pos);\
+  else									\
+    fprintf(err_fp, "c2lout: ");					\
+  fprintf(err_fp, str);							\
+  fprintf(err_fp, "\n");						\
+}
+
+#define Error1(str, arg)						\
+{									\
+  if( line_num > 0 )							\
+    fprintf(err_fp, "c2lout %s %d,%d: ", file_name, line_num, line_pos);\
+  else									\
+    fprintf(err_fp, "c2lout: ");					\
+  fprintf(err_fp, str, arg);						\
+  fprintf(err_fp, "\n");						\
+}
+
+#define GetArg(arg, message, null_ok)					\
+{ if( strcmp(argv[i]+2, "") != 0 )					\
+    arg = argv[i]+2;							\
+  else if( !null_ok && i < argc-1 && *argv[i+1] != '-' )		\
+    arg = argv[++i];							\
+  else if( null_ok )							\
+    arg = (char *) NULL;						\
+  else									\
+  { Error0(message);							\
+    exit(1);								\
+  }									\
+} /* end GetArg */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  main(argc, argv)                                                         */
+/*                                                                           */
+/*  Read command line and process each file in turn.                         */
+/*                                                                           */
+/*****************************************************************************/
+
+int main(int argc, char *argv[])
+{ FILE *in_fp, *out_fp = stdout;
+  BOOLEAN at_least_one_file, raw_seen;  int i;
+  char *infilename, *outfilename, *errfilename, *str;
+
+  /* read command line */
+  in_fp = out_fp = NULL;
+  err_fp = stderr;
+  line_num = 0;
+  raw_seen = FALSE;
+  tab_by_spacing = TRUE;
+  style_option = NO_STYLE;
+  tab_in = 8;
+  tab_out = 3;
+  tab_unit = 'f';
+  at_least_one_file = FALSE;
+  headers_option = TRUE;
+  font_option = size_option = line_option =
+    tabin_option = tabout_option = (char *) NULL;
+  for( i = 1;  i < argc;  i++ )
+  { if( *argv[i] == '-' ) switch( *(argv[i]+1) )
+    {
+      case 'r':
+
+	if( i > 1 )
+	{ Error0("-r must be first if it occurs at all");
+	  exit(1);
+	}
+	raw_seen = TRUE;
+	break;
+
+
+      case 'i':
+     
+	/* read name of input file */
+	if( !raw_seen )
+	{ Error0("-i illegal without -r");
+	  exit(1);
+	}
+	if( in_fp != NULL )
+	{ Error0("-i seen twice");
+	  exit(1);
+	}
+	GetArg(infilename, "usage: -i<filename>", FALSE);
+
+	/* open the file */
+	in_fp = fopen(infilename, "r");
+	if( in_fp == NULL )
+	{ Error1("cannot open input file %s", infilename);
+	  exit(1);
+	}
+
+	/* initialize file position */
+	strcpy(file_name, infilename);
+	line_num = 1;
+	line_pos = 0;
+	break;
+
+
+      case 'o':
+     
+	/* read name of output file */
+	if( out_fp != NULL )
+	{ Error0("-o seen twice");
+	  exit(1);
+	}
+	GetArg(outfilename, "usage: -o<filename>", FALSE);
+	out_fp = fopen(outfilename, "w");
+	if( out_fp == NULL )
+	{ Error1("cannot open output file %s", outfilename);
+	  exit(1);
+	}
+	break;
+
+
+      case 'e':
+     
+	/* read name of error file */
+	GetArg(errfilename, "usage: -e<filename>", FALSE);
+	err_fp = fopen(errfilename, "w");
+	if( err_fp == NULL )
+	{ Error1("cannot open error file %s", errfilename);
+	  exit(1);
+	}
+	break;
+
+
+      case 'p':
+     
+	/* read print style */
+	if( raw_seen )
+	{ Error0("-p illegal with -r option");
+	  exit(1);
+	}
+	GetArg(str, "usage: -p<printstyle>", FALSE);
+	if( style_option != NO_STYLE )
+	{ Error0("-p option appears twice");
+	  exit(1);
+	}
+	else if( strcmp(str, "fixed")   == 0 )
+	{ style_option = FIXED_STYLE;
+	}
+	else if( strcmp(str, "varying") == 0 )
+	{ style_option = VARYING_STYLE;
+	  tab_by_spacing = FALSE;
+	}
+	else if( strcmp(str, "symbol")  == 0 )
+	{ style_option = SYMBOL_STYLE;
+	  tab_by_spacing = FALSE;
+	}
+	else
+	{ Error1("unknown -p option %s", str);
+	  exit(1);
+	}
+	break;
+
+
+      case 'f':
+     
+	/* read font family */
+	if( raw_seen )
+	{ Error0("-f illegal with -r option");
+	  exit(1);
+	}
+	GetArg(font_option, "usage: -f<font>", FALSE);
+	break;
+
+
+      case 's':
+     
+	/* read font size */
+	if( raw_seen )
+	{ Error0("-s illegal with -r option");
+	  exit(1);
+	}
+	GetArg(size_option, "usage: -s<size>", FALSE);
+	break;
+
+
+      case 'v':
+     
+	/* read line spacing */
+	if( raw_seen )
+	{ Error0("-v illegal with -r option");
+	  exit(1);
+	}
+	GetArg(line_option, "usage: -v<vsize>", FALSE);
+	break;
+
+
+      case 't':
+     
+	/* read tab interval */
+	GetArg(tabin_option, "usage: -t<number>", TRUE);
+	if( tabin_option != NULL && sscanf(tabin_option,"%d",&tab_in) != 1 )
+	{ Error0("usage: -t<number>\n");
+	  exit(1);
+	}
+	if( tab_in <= 0 )
+	{ Error0("-t: tab interval must be greater than 0\n");
+	  exit(1);
+	}
+	break;
+
+
+      case 'T':
+     
+	/* read tab_out and tab_unit */
+	GetArg(tabout_option, "usage: -T<number><unit>", TRUE);
+	if( tabout_option != NULL )
+	{ if( sscanf(tabout_option, "%f%c",&tab_out,&tab_unit) != 2 )
+	  { Error0("usage: -T<number><unit>\n");
+	    exit(1);
+	  }
+	  if( tab_out <= 0 || tab_out >= 50 )
+	  { Error0("-T: unreasonably large or small tab interval");
+	    exit(1);
+	  }
+	  if( tab_unit != 'c' && tab_unit != 'i' && tab_unit != 'p' &&
+	      tab_unit != 'm' && tab_unit != 'f' && tab_unit != 's' &&
+	      tab_unit != 'v' )
+	  { Error0("-T: tab unit must be one of cipmfsv\n");
+	    exit(1);
+	  }
+	  tab_by_spacing = FALSE;
+	}
+	break;
+
+
+      case 'n':
+     
+	if( raw_seen )
+	{ Error0("-n illegal with -r option");
+	  exit(1);
+	}
+	headers_option = FALSE;
+	break;
+
+
+      case 'V':
+     
+	if( raw_seen )
+	{ Error0("-V illegal with -r option");
+	  exit(1);
+	}
+	Error1("%s", C2LOUT_VERSION);
+	exit(0);
+	break;
+
+
+      case 'u':
+     
+	if( raw_seen )
+	{ Error0("-u illegal with -r option");
+	  exit(1);
+	}
+	Error0("usage: c2lout C-files   or   c2lout -r Lout-files");
+	exit(0);
+	break;
+
+
+      default:
+     
+	Error1("unknown command line flag %s", argv[i]);
+	exit(1);
+	break;
+
+    }
+    else
+    {
+	/* argument is source file, so open it */
+	if( raw_seen )
+	{ Error0("file parameter illegal with -r flag!");
+	  exit(1);
+	}
+	at_least_one_file = TRUE;
+	in_fp = fopen(argv[i], "r");
+	if( in_fp == NULL )
+	{ Error1("cannot open input file %s", argv[i]);
+	  exit(1);
+	}
+
+	/* initialize file position */
+	strcpy(file_name, argv[i]);
+	line_num = 1;
+	line_pos = 0;
+
+	ProcessStandAlone(argv[i], in_fp, out_fp == NULL ? stdout : out_fp);
+    }
+  } /* for */
+
+  /* raw case: filter in_fp to out_fp using Scan() */
+  if( raw_seen )
+  {
+    /* check that input and output files are open */
+    if( in_fp == NULL )
+    { Error0("-r: missing -i option");
+      exit(1);
+    }
+    if( out_fp == NULL )
+    { Error0("-r: missing -o option");
+      exit(1);
+    }
+
+    /* scan the file and leave unchanged if an error occurred */
+    if( !Scan(in_fp, out_fp) )  exit(1);
+  }
+
+  /* finish of non-raw case with end text */
+  else if( at_least_one_file )
+    fprintf(out_fp == NULL ? stdout : out_fp, "@End @Text\n");
+
+  return 0;
+} /* end main */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  ProcessStandAlone(fname, in_fp, out_fp)                                  */
+/*                                                                           */
+/*  Process one file consisting completely of C code.                        */
+/*                                                                           */
+/*****************************************************************************/
+
+void ProcessStandAlone(char *fname, FILE *in_fp, FILE *out_fp)
+{ static BOOLEAN first = TRUE;
+  char *style_str, *font_str, *size_str, *line_str, *face_str,
+       *tabin_str, *tabout_str;
+
+  /* print heading information on out_fp */
+  if( first )
+  {
+    /* sort out the options' values */
+    switch( style_option )
+    {
+
+      case NO_STYLE:
+      case FIXED_STYLE:
+
+	style_str  = "fixed";
+	face_str   = "Base";
+	font_str   = font_option   != NULL ? font_option   : "Courier";
+	size_str   = size_option   != NULL ? size_option   : "9p";
+	line_str   = line_option   != NULL ? line_option   : "1.1fx";
+	tabin_str  = tabin_option  != NULL ? tabin_option  : "8";
+	tabout_str = tabout_option != NULL ? tabout_option : "8s";
+	break;
+
+
+      case VARYING_STYLE:
+
+	style_str  = "varying";
+	face_str   = "Slope";
+	font_str   = font_option   != NULL ? font_option   : "Times";
+	size_str   = size_option   != NULL ? size_option   : "10p";
+	line_str   = line_option   != NULL ? line_option   : "1.1fx";
+	tabin_str  = tabin_option  != NULL ? tabin_option  : "8";
+	tabout_str = tabout_option != NULL ? tabout_option : "3f";
+	break;
+
+
+      case SYMBOL_STYLE:
+
+	style_str  = "symbol";
+	face_str   = "Slope";
+	font_str   = font_option   != NULL ? font_option   : "Times";
+	size_str   = size_option   != NULL ? size_option   : "10p";
+	line_str   = line_option   != NULL ? line_option   : "1.1fx";
+	tabin_str  = tabin_option  != NULL ? tabin_option  : "8";
+	tabout_str = tabout_option != NULL ? tabout_option : "3f";
+	break;
+
+
+      default:
+
+	Error0("internal error in -p option");
+	exit(1);
+	break;
+    }
+		 
+
+    /* now print the initial @Use clauses etc.*/
+    fprintf(out_fp, "@SysInclude { cprint }\n");
+    fprintf(out_fp, "@SysInclude { doc }\n");
+    fprintf(out_fp, "@Use { @CP\n");
+    fprintf(out_fp, "    style  { %s }\n", style_str);
+    fprintf(out_fp, "    font   { %s }\n", font_str);
+    fprintf(out_fp, "    size   { %s }\n", size_str);
+    fprintf(out_fp, "    line   { %s }\n", line_str);
+    fprintf(out_fp, "    tabin  { %s }\n", tabin_str);
+    fprintf(out_fp, "    tabout { %s }\n", tabout_str);
+    fprintf(out_fp, "{}\n");
+    fprintf(out_fp, "}\n");
+    fprintf(out_fp, "@Document\n");
+    fprintf(out_fp, "    @InitialFont { \"%s\" \"%s\" \"%s\" }\n",
+      font_str, face_str, size_str);
+    fprintf(out_fp, "    @InitialBreak { lines \"%s\" nohyphen }\n", line_str);
+    fprintf(out_fp, "//\n");
+    fprintf(out_fp, "@Text @Begin\n\n");
+    first = FALSE;
+  }
+  else fprintf(out_fp, "@NP\n\n");
+
+  /* print file name and contents */
+  if( headers_option )
+    fprintf(out_fp, "{ Times Bold \"+3p\" } @Font \"%s\"\n@DP\n", fname);
+  if( !Scan(in_fp, out_fp) )  exit(1);
+
+} /* end ProcessStandAlone */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  EmitTab(out_fp)                                                          */
+/*                                                                           */
+/*  Emit the equivalent of one tab character, depending on whether we        */
+/*  are using spaces or Lout tab operators to simulate it.                   */
+/*                                                                           */
+/*****************************************************************************/
+
+void EmitTab(FILE *out_fp)
+{
+  if( tab_by_spacing )
+  { putc(' ', out_fp);
+    while( line_pos % tab_in != 0 )
+    { putc(' ', out_fp);
+      line_pos++;
+    }
+  }
+  else
+  { while( line_pos % tab_in != 0 )
+    { line_pos++;
+    }
+    fprintf(out_fp, " $>%.1f%ct ",
+      (line_pos/tab_in) * tab_out, tab_unit);
+  }
+} /* end EmitTab */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN Scan(in_fp, out_fp)                                              */
+/*                                                                           */
+/*  Scan the C source beginning in file in_fp and write it in modified       */
+/*  Lout source form onto out_fp.  Return TRUE if successful.                */
+/*                                                                           */
+/*****************************************************************************/
+
+/* states of scanner */
+#define	C_REGULAR		 1
+#define	C_SLASH			 2
+#define	C_COMMENT		 3
+#define	CPP_COMMENT		 4
+#define	LOUT_INSERT		 5
+#define	CPP_LOUT_INSERT		 6
+#define	LOUT_INSERT_STAR	 7
+#define	C_COMMENT_STAR		 8
+#define	C_STRING		 9
+#define	C_STRING_BACKSLASH	10
+#define	C_CHAR			11
+#define	C_CHAR_BACKSLASH	12
+
+static BOOLEAN Scan(FILE *in_fp, FILE *out_fp)
+{ int state, ch;
+  state = C_REGULAR;
+  while( (ch = getc(in_fp)) != EOF )
+  {
+    if( ch == '\n' )
+    { line_num++;
+      line_pos = 0;
+    }
+    else line_pos++;
+
+    switch( state )
+    {
+
+      case C_REGULAR:		/* in ordinary C code */
+
+	if( ch == '\f' )
+	{ fprintf(out_fp, "\n@NP\n");
+	}
+	else if( ch == '\t' )
+	{ EmitTab(out_fp);
+	}
+	else if( ch == '#' )
+	{ fputs("$$", out_fp);
+	}
+	else if( ch == '\\' )
+	{ fputs("\"\\\\\"", out_fp);
+	}
+	else if( ch == '{' )  /*}*/
+	{ fputs("${", out_fp);   /*}*/
+	}
+	else if( ch == /*{*/ '}' )
+	{ /*{*/ fputs("$}", out_fp);
+	}
+	else if( ch == '@' )
+	{ Error0("@ character in C program text");
+	  return FALSE;
+	}
+	else if( ch == '/' )
+	{ state = C_SLASH;
+	}
+	else if( ch == '\'' )
+	{ fputs("{@L \"", out_fp);
+	  state = C_CHAR;
+	}
+	else if( ch == '"' )
+	{ fputs("{@S \"", out_fp); /*}*/
+	  state = C_STRING;
+	}
+	else
+	{ putc(ch, out_fp);
+	}
+	break;
+
+
+      case C_SLASH:	/* in ordinary C code just after / */
+
+	if( ch == '*' )
+	{ int nextch = getc(in_fp);
+	  if( nextch == EOF )
+	  { Error0("unexpected end-of-file");
+	    return FALSE;
+	  }
+	  else if( nextch == '@' )
+	  { state = LOUT_INSERT;
+	  }
+	  else
+	  { ungetc(nextch, in_fp);
+	    if( nextch == '\n' )  line_num--;
+	    fputs("{@C \"/*", out_fp);
+	    state = C_COMMENT;
+	  }
+	}
+	else if( ch == '/' ) /* C++ comment */
+	{ int nextch = getc(in_fp);
+	  if( nextch == EOF )
+	  { Error0("unexpected end-of-file");
+	    return FALSE;
+	  }
+	  else if( nextch == '@' )
+	  { state = CPP_LOUT_INSERT;
+	  }
+	  else
+	  { ungetc(nextch, in_fp);
+	    if( nextch == '\n' )  line_num--;
+	    fputs("{@C \"//", out_fp);
+	    state = CPP_COMMENT;
+	  }
+	}
+	else
+	{ putc('/', out_fp);
+	  ungetc(ch, in_fp);
+	  if( ch == '\n' )  line_num--;
+	  state = C_REGULAR;
+	}
+	break;
+
+
+      case C_COMMENT:		/* inside a C comment */
+
+	if( ch == '\t' )
+	{ fputs("\"}", out_fp);
+	  EmitTab(out_fp);
+	  fputs("{@C \"", out_fp);
+	}
+	else if( ch == '\n' )
+	{ int nextch = getc(in_fp);
+	  if( nextch != EOF )
+	  { fputs("\"}\n{@C \"", out_fp);
+	  }
+	  ungetc(nextch, in_fp);
+	  if( ch == '\n' )  line_num--;
+	}
+	else if( ch == '\\' )
+	{ fputs("\\\\", out_fp);
+	}
+	else if( ch == '"' )
+	{ fputs("\\\"", out_fp);
+	}
+	else if( ch == '*' )
+	{ putc(ch, out_fp);
+	  state = C_COMMENT_STAR;
+	}
+	else
+	{ putc(ch, out_fp);
+	}
+	break;
+
+
+      case CPP_COMMENT:		/* inside a C++ comment */
+
+	if( ch == '\t' )
+	{ fputs("\"}", out_fp);
+	  EmitTab(out_fp);
+	  fputs("{@C \"", out_fp);
+	}
+	else if( ch == '\n' )
+	{ fputs("\"}\n", out_fp);
+	  state = C_REGULAR;
+	}
+	else if( ch == '\\' )
+	{ fputs("\\\\", out_fp);
+	}
+	else if( ch == '"' )
+	{ fputs("\\\"", out_fp);
+	}
+	else
+	{ putc(ch, out_fp);
+	}
+	break;
+
+
+      case LOUT_INSERT:		/* inside C comment which is a Lout insert */
+
+	if( ch == '*' )
+	{ state = LOUT_INSERT_STAR;
+	}
+	else
+	{ putc(ch, out_fp);
+	}
+	break;
+
+      
+      case LOUT_INSERT_STAR:	/* inside Lout insert comment just after * */
+
+	if( ch == '/' )
+	{ state = C_REGULAR;
+	}
+	else if( ch == '*' )
+	{ putc('*', out_fp);
+	}
+	else
+	{ putc('*', out_fp);
+	  putc(ch, out_fp);
+	  state = LOUT_INSERT;
+	}
+	break;
+
+
+      case CPP_LOUT_INSERT:	/* inside C++ comment which is a Lout insert */
+
+	if( ch == '\n' )
+	{ putc(ch, out_fp);
+	  state = C_REGULAR;
+	}
+	else
+	{ putc(ch, out_fp);
+	}
+	break;
+
+      
+      case C_COMMENT_STAR:	/* inside C comment just after * */
+
+	if( ch == '/' )
+	{ fputs("/\"}", out_fp);
+	  state = C_REGULAR;
+	}
+	else if( ch == '*' )
+	{ putc(ch, out_fp);
+	}
+	else if( ch == '\t' )
+	{ fputs("\"}", out_fp);
+	  EmitTab(out_fp);
+	  fputs("{@C \"", out_fp);
+	  state = C_COMMENT;
+	}
+	else if( ch == '\n' )
+	{ fputs("\"}\n{@C \"", out_fp);
+	  state = C_COMMENT;
+	}
+	else if( ch == '\\' )
+	{ fputs("\\\\", out_fp);
+	  state = C_COMMENT;
+	}
+	else if( ch == '"' )
+	{ fputs("\\\"", out_fp);
+	  state = C_COMMENT;
+	}
+	else
+	{ putc(ch, out_fp);
+	  state = C_COMMENT;
+	}
+	break;
+
+
+      case C_STRING:		/* inside a C string */
+
+	if( ch == '\t' )
+	{ Error0("replaced tab character in string by \\t");
+	  fputs("\\\\t", out_fp);
+	}
+	else if( ch == '\\' )
+	{ fputs("\\\\", out_fp);
+	  state = C_STRING_BACKSLASH;
+	}
+	else if( ch == '"' )
+	{ /*{*/ fputs("\"}", out_fp);
+	  state = C_REGULAR;
+	}
+	else if( ch == '\n' )
+	{ Error0("unterminated C string");
+	  /*{*/ fputs("\"}\n", out_fp);
+	  state = C_REGULAR;
+	}
+	else putc(ch, out_fp);
+	break;
+
+
+      case C_STRING_BACKSLASH:	/* inside a C string just after \ */
+
+	if( ch == '\t' )
+	{ Error0("replacing literal tab character after \\ by t");
+	  putc('t', out_fp);
+	  state = C_STRING;
+	}
+	else if( ch == '\\' )
+	{ fputs("\\\\", out_fp);
+	  state = C_STRING;
+	}
+	else if( ch == '"' )
+	{ fputs("\\\"", out_fp);
+	  state = C_STRING;
+	}
+	else if( ch == '\n' )
+	{ Error0("multi-line string printed as two strings, sorry");
+	  fputs("\"}\n{@S \"", out_fp);
+	  state = C_STRING;
+	}
+	else
+	{ putc(ch, out_fp);
+	  state = C_STRING;
+	}
+	break;
+
+
+      case C_CHAR:	/* inside char literal */
+
+	if( ch == '\t' )
+	{ Error0("replacing literal tab character by \\t");
+	  fputs("\\\\t", out_fp);
+	}
+	else if( ch == '\\' )
+	{ fputs("\\\\", out_fp);
+	  state = C_CHAR_BACKSLASH;
+	}
+	else if( ch == '"' )
+	{ fputs("\\\"", out_fp);
+	}
+	else if( ch == '\n' )
+	{ Error0("unterminated C character constant");
+	  fputs("\"}\n", out_fp);
+	  state = C_REGULAR;
+	}
+	else if( ch == '\'' )
+	{ /*{*/ fputs("\"}", out_fp);
+	  state = C_REGULAR;
+	}
+	else putc(ch, out_fp);
+	break;
+
+
+
+      case C_CHAR_BACKSLASH:	/* inside quoted char just after \ */
+
+	if( ch == '"' )
+	{ fputs("\\\"", out_fp);
+	  state = C_CHAR;
+	}
+	else if( ch == '\\' )
+	{ fputs("\\\\", out_fp);
+	  state = C_CHAR;
+	}
+	else if( ch == '\n' )
+	{ Error0("unterminated C character constant");
+	  /*{*/ fputs("\"}\n", out_fp);
+	  state = C_REGULAR;
+	}
+	else
+	{ putc(ch, out_fp);
+	  state = C_CHAR;
+	}
+	break;
+
+
+      default:
+
+	Error1("unknown case %d", state);
+	exit(1);
+	break;
+
+    }
+  }
+
+  /* check that final state is reasonable */
+  switch( state )
+  {
+    case C_REGULAR:		/* in ordinary C code */
+
+      break;
+
+
+    case C_SLASH:		/* in ordinary C code just after / */
+
+      fputs("/\n", out_fp);
+      break;
+
+
+    case C_COMMENT:		/* inside a C comment */
+    case CPP_COMMENT:		/* inside a C++ comment */
+    case C_COMMENT_STAR:	/* inside C comment just after * */
+
+      /*{*/ fputs("\"}\n", out_fp);
+      Error0("C text ended inside a comment");
+      break;
+
+
+    case LOUT_INSERT:		/* inside C comment which is a Lout insert */
+    case CPP_LOUT_INSERT:	/* inside C++ comment which is a Lout insert */
+    case LOUT_INSERT_STAR:	/* inside Lout insert comment just after * */
+
+      Error0("C text ended inside a Lout inclusion");
+      exit(1);
+      break;
+
+
+    case C_STRING:		/* inside a C string */
+    case C_STRING_BACKSLASH:	/* inside a C string just after \ */
+
+      /*{*/ fputs("\"}\n", out_fp);
+      Error0("C text ended inside a string literal");
+      break;
+
+
+    case C_CHAR:		/* inside char literal (has been quoted) */
+    case C_CHAR_BACKSLASH:	/* inside quoted char just after \ */
+
+      /*{*/ fputs("\"}\n", out_fp);
+      Error0("C text ended inside a character literal");
+      break;
+
+
+    default:
+
+      Error0("unknown final state");
+      exit(1);
+      break;
+  }
+
+  return TRUE;
+} /* end Scan */
diff --git a/data/README b/data/README
new file mode 100644
index 0000000..47a7cb8
--- /dev/null
+++ b/data/README
@@ -0,0 +1,14 @@
+Directory lout/data
+
+This directory contains Lout database files:
+
+    loutrefs.ld		References used in the Lout documentation
+    oldrefs.ld		More references used in the Lout documentation
+    refstyle.ld		Standard reference printing styles
+    standard.ld		Roman numerals, months, etc.
+
+Corresponding .li files will be created during the initializing
+"lout -x" run, or else the first time each database is accessed.
+
+Jeffrey H. Kingston
+30 March 1999
diff --git a/data/loutrefs.ld b/data/loutrefs.ld
new file mode 100644
index 0000000..bcff3cf
--- /dev/null
+++ b/data/loutrefs.ld
@@ -0,0 +1,285 @@
+{ @Reference
+     @Tag { knuth1984tex }
+     @Type { Book }
+     @Author { Donald E. Knuth }
+     @Title { The {@TeX}Book }
+     @Publisher { Addison-Wesley }
+     @Year { 1984 }
+}
+
+{ @Reference
+     @Tag { adobe1990ps }
+     @Type { Book }
+     @Author { Adobe Systems, Inc. }
+     @Title { PostScript Language Reference Manual, Second Edition }
+     @Publisher { Addison-Wesley }
+     @Year { 1990 }
+}
+
+{ @Reference
+     @Tag { jensen1975pascal }
+     @Type { Book }
+     @Author { K. Jensen and N. Wirth }
+     @Title { Pascal User Manual and Report }
+     @Publisher { Springer-Verlag }
+     @Year { 1975 }
+}
+
+{ @Reference
+     @Tag { meyer1992eiffel }
+     @Type { Book }
+     @Author { Bertrand Meyer }
+     @Title { Eiffel:  The Language }
+     @Publisher { Prentice-Hall }
+     @Year { 1992 }
+}
+
+{ @Reference
+     @Tag { reid1980scribe }
+     @Type { InProceedings }
+     @Author { Brian K. Reid }
+     @Title { A High-Level Approach to Computer Document Production }
+     @InTitle { Proceedings of the 7th Symposium on the Principles
+of Programming Languages (POPL), Las Vegas NV }
+     @Pages { 24--31 }
+     @Year { 1980 }
+}
+
+{ @Reference
+     @Tag { strunk1979style }
+     @Type { Book }
+     @Author { William Strunk and E. B. White }
+     @Title { The Elements of Style }
+     @Publisher { Macmillan }
+     @Edition { Third Edition }
+     @Year { 1979 }
+}
+
+{ @Reference
+     @Tag { ossanna1976troff }
+     @Type { TechReport }
+     @Author { Joseph F. Ossanna }
+     @Title { "Nroff/Troff" User's Manual }
+     @Number { 54 }
+     @Institution { Bell Laboratories }
+     @Address { Murray Hill, NJ 07974 }
+     @Year { 1976 }
+}
+
+{ @Reference
+     @Tag { kernighan1975eqn }
+     @Type { Article }
+     @Author { Brian W. Kernighan and Lorinda L. Cherry }
+     @Title { A system for typesetting mathematics }
+     @Journal { Communications of the ACM }
+     @Volume { 18 }
+     @Pages { 182--193 }
+     @Year { 1975 }
+}
+
+{ @Reference
+     @Tag { lesk1976tbl }
+     @Type { TechReport }
+     @Author { M. E. Lesk }
+     @Title { Tbl -- a program to format tables }
+     @Number { 49 }
+     @Institution { AT"&"T Bell Laboratories }
+     @Address { Murray Hill, NJ 07974 }
+     @Year { 1976 }
+}
+
+{ @Reference
+     @Tag { kernighan1982pic }
+     @Type { Article }
+     @Author { Brian W. Kernighan }
+     @Title { PIC -- A language for typesetting graphics }
+     @Journal { Software Practice and Experience }
+     @Volume { 12 }
+     @Pages { 1--21 }
+     @Year { 1982 }
+}
+
+{ @Reference
+     @Tag { bentley1984grap }
+     @Type { TechReport }
+     @Author { Jon L. Bentley and Brian W. Kernighan }
+     @Title { GRAP -- a language for typesetting graphs }
+     @Number { 114 (Computing Science) }
+     @Institution { AT"&"T Bell Laboratories }
+     @Address { Murray Hill, NJ 07974 }
+     @Year { 1984 }
+}
+
+{ @Reference
+     @Tag { ellis1990cpp }
+     @Type { Book }
+     @Author { Margaret A. Ellis and Bjarne Stroustrup }
+     @Title { The annotated C++ reference manual }
+     @Publisher { Addison-Wesley }
+     @Year { 1990 }
+}
+
+{ @Reference
+     @Tag { kingston1995lout.program }
+     @Type { Book }
+     @Author { Jeffrey H. Kingston }
+     @Title { The Basser Lout Document Formatting System (Version 3) }
+     @TitleNote { Computer program }
+     @Year { 1995 }
+     @Note { Publicly available in the
+@I jeff subdirectory of the home directory of @I ftp to host
+@I ftp.cs.su.oz.au with login name @I anonymous or @I ftp and any
+non-empty password (e.g. {@I none}).  Lout distributions are also
+available from the @I comp.sources.misc newsgroup, and by electronic
+mail from the author.  All enquiries to {@I "jeff@cs.su.oz.au" }. }
+}
+
+{ @Reference
+     @Tag { kingston1995lout.expert }
+     @Type { Book }
+     @Author { Jeffrey H. Kingston }
+     @Title { An Expert's Guide to the Lout Document Formatting
+System (Version 3) }
+     @Institution { Basser Department of Computer Science }
+     @Address { University of Sydney }
+     @Year { 1995 }
+}
+
+{ @Reference
+     @Tag { kingston1995lout.user }
+     @Type { Book }
+     @Author { Jeffrey H. Kingston }
+     @Title { A User's Guide to the Lout Document Formatting
+System (Version 3) }
+     @Institution { Basser Department of Computer Science }
+     @Address { University of Sydney }
+     @Year { 1995 }
+}
+
+{ @Reference
+     @Tag { kingston1994lout.overheads }
+     @Type { TechReport }
+     @TRType { Overhead transparencies }
+     @Author { Jeffrey H. Kingston }
+     @Title { A Practical Introduction to the Lout Document Formatting
+System }
+     @Institution { Basser Department of Computer Science }
+     @Address { University of Sydney }
+     @Year { 1994 }
+}
+
+{ @Reference
+     @Tag { kingston1993lout.design }
+     @Type { Article }
+     @Author { Jeffrey H. Kingston }
+     @Title { The design and implementation of the Lout document
+formatting language }
+     @Journal { Software---Practice and Experience }
+     @Volume { 23 }
+     @Pages { 1001--1041 }
+     @Year { 1993 }
+}
+
+{ @Reference
+     @Tag { wirth1971pascal }
+     @Type { Article }
+     @Author { N. Wirth }
+     @Title { The programming language Pascal }
+     @Journal { Acta Informatica }
+     @Volume { 1 }
+     @Year { 1975 }
+     @Pages { 35--63 }
+}
+
+{ @Reference
+     @Tag { brooks1991lilac }
+     @Type { Article }
+     @Author { Kenneth P. Brooks }
+     @Title { Lilac:  a two-view document editor }
+     @Journal { IEEE Computer }
+     @Pages { 7--19 }
+     @Year { 1991 }
+}
+
+{ @Reference
+     @Tag { furuta1982survey }
+     @Type { Article }
+     @Author { Richard Furuta, Jeffrey Scofield, and Alan Shaw }
+     @Title { Document formatting systems:  survey,
+concepts, and issues }
+     @Journal { Computing Surveys }
+     @Volume { 14 }
+     @Pages { 417--472 }
+     @Year { 1982 }
+}
+
+{ @Reference
+     @Tag { kernighan1988c }
+     @Type { Book }
+     @Author { Brian W. Kernighan and Dennis M. Ritchie }
+     @Title { The C programming language (second edition) }
+     @Publisher { Prentice Hall }
+     @Year { 1988 }
+}
+
+{ @Reference
+     @Tag { vanleunen1992handbook }
+     @Type { Book }
+     @Author { Mary-Claire van Leunen }
+     @Title { A Handbook for Scholars }
+     @Publisher { Oxford }
+     @Edition { Revised Edition }
+     @Year { 1992 }
+}
+
+{ @Reference
+     @Tag { homer.odyssey }
+     @Type { Book }
+     @Author { Homer }
+     @Title { The Odyssey }
+     @TitleNote { Translated by E. V. Rieu }
+     @Pinpoint { Chapter VI }
+     @Pages { 102--111 }
+     @Page { 102 }
+     @Publisher { Penguin Books }
+     @Address { Harmondsworth, Middlesex }
+     @Edition { Penguin Classics Edition }
+     @Month { August }
+     @Year { 1942 }
+     @Note { The date of composition is unknown, but
+is thought to be about the tenth century BC. }
+}
+
+{ @Reference
+     @Tag { rieu1942intro }
+     @Type { InBook }
+     @Author { E. V. Rieu }
+     @Title { Introduction to @I { The Odyssey } }
+     @InAuthor { Homer }
+     @InTitle { The Odyssey }
+     @Publisher { Penguin }
+     @Year { 1942 }
+}
+
+{ @Reference
+     @Tag { christofides1976tsp }
+     @Type { TechReport }
+     @Author { N. Christofides }
+     @Title { Worst-case analysis of a new heuristic
+for the travelling salesman problem }
+     @Number { 388 }
+     @Institution { Graduate School of Industrial
+Administration, Carnegie-Mellon University }
+     @Address { Pittsburgh, PA }
+     @Year { 1976 }
+}
+
+{ @Reference
+     @Tag { lamport1986latex }
+     @Type { Book }
+     @Author { Leslie Lamport }
+     @Title { @LaTeX User's Guide and Reference Manual }
+     @Publisher { Addison-Wesley }
+     @Year { 1986 }
+}
+
diff --git a/data/oldrefs.ld b/data/oldrefs.ld
new file mode 100644
index 0000000..cda4992
--- /dev/null
+++ b/data/oldrefs.ld
@@ -0,0 +1,209 @@
+{ @Reference
+     @Tag { knuth84 }
+     @Type { Book }
+     @Author { Knuth, Donald E. }
+     @Title { The T{ /0.2fo E}XBook }
+     @Publisher { Addison-Wesley }
+     @Year { 1984 }
+}
+
+{ @Reference
+     @Tag { adobe85 }
+     @Type { Book }
+     @Author { Adobe Systems, Inc. }
+     @Title { PostScript Language Reference Manual }
+     @Publisher { Addison-Wesley }
+     @Year { 1985 }
+}
+
+{ @Reference
+     @Tag { reid80 }
+     @Type { InProceedings }
+     @Author { Reid, Brian K. }
+     @Title { A High-Level Approach to Computer Document Production }
+     @InTitle { Proceedings of the 7th Symposium on the Principles
+of Programming Languages (POPL), Las Vegas NV }
+     @Pages { 24--31 }
+     @Year { 1980 }
+}
+
+{ @Reference
+     @Tag { strunk79 }
+     @Type { Book }
+     @Author { Strunk, William and White, E. B. }
+     @Title { The Elements of Style }
+     @Publisher { Macmillan }
+     @Edition { Third Edition }
+     @Year { 1979 }
+}
+
+{ @Reference
+     @Tag { ossanna76 }
+     @Type { TechReport }
+     @Author { Joseph F. Ossanna }
+     @Title { "Nroff/Troff" User's Manual }
+     @Number { 54 }
+     @Institution { Bell Laboratories }
+     @Address { Murray Hill, NJ 07974 }
+     @Year { 1976 }
+}
+
+{ @Reference
+     @Tag { kernighan75 }
+     @Type { Article }
+     @Author { Kernighan, Brian W. and Cherry, Lorinda L. }
+     @Title { A system for typesetting mathematics }
+     @Journal { Communications of the ACM }
+     @Volume { 18 }
+     @Pages { 182--193 }
+     @Year { 1975 }
+}
+
+{ @Reference
+     @Tag { lesk76 }
+     @Type { TechReport }
+     @Author { Lesk, M. E. }
+     @Title { Tbl -- a program to format tables }
+     @Number { 49 }
+     @Institution { Bell Laboratories }
+     @Address { Murray Hill, NJ 07974 }
+     @Year { 1976 }
+}
+
+{ @Reference
+     @Tag { kernighan82 }
+     @Type { Article }
+     @Author { Kernighan, Brian W. }
+     @Title { PIC -- A language for typesetting graphics}
+     @Journal { Software Practice and Experience }
+     @Volume { 12 }
+     @Pages { 1--21 }
+     @Year { 1982 }
+}
+
+{ @Reference
+     @Tag { kingston91 }
+     @Type { TechReport }
+     @Author { Kingston, Jeffrey H. }
+     @Title { Document Formatting with Lout }
+     @Number { 408 }
+     @Institution { Basser Department of Computer
+Science, The University of Sydney, Australia }
+     @Year { 1991 }
+}
+
+{ @Reference
+     @Tag { kingston91basser }
+     @Type { Misc }
+     @Author { Kingston, Jeffrey H. }
+     @Title { The Basser Lout Document Formatter }
+     @Year { 1991 }
+     @Note { Computer program; Version 2 publicly available
+in the @I pub subdirectory
+of the home directory of @I ftp to host
+@I ftp.cs.su.oz.au with login name
+@I anonymous and no password.  Distribution
+via email is available for non-{@I ftp} sites.  All enquiries to "jeff@cs.su.oz.au". }
+}
+
+{ @Reference
+     @Tag { kingston91begin }
+     @Type { TechReport }
+     @Author { Kingston, Jeffrey H. }
+     @Title { A beginners' guide to Lout }
+     @Number { 409 }
+     @Institution { Basser Department of Computer
+Science, The University of Sydney, Australia }
+     @Year { 1991 }
+}
+
+{ @Reference
+     @Tag { kingston91eq }
+     @Type { TechReport }
+     @Author { Kingston, Jeffrey H. }
+     @Title { Eq -- a Lout package for typesetting mathematics }
+     @Number { 410 }
+     @Institution { Basser Department of Computer
+Science, The University of Sydney, Australia }
+     @Year { 1991 }
+     @Note { (Contains an appendix describing the Pas Pascal formatter.) }
+}
+
+{ @Reference
+     @Tag { kingston91fig }
+     @Type { TechReport }
+     @Author { Kingston, Jeffrey H. }
+     @Title { Fig -- a Lout package for drawing figures }
+     @Number { 411 }
+     @Institution { Basser Department of Computer
+Science, The University of Sydney, Australia }
+     @Year { 1991 }
+}
+
+{ @Reference
+     @Tag { kingston91over }
+     @Type { TechReport }
+     @Author { Kingston, Jeffrey H. }
+     @Title { A new approach to document formatting }
+     @Number { 412 }
+     @Institution { Basser Department of Computer
+Science, The University of Sydney, Australia }
+     @Year { 1991 }
+}
+
+{ @Reference
+     @Tag { kingston91tab }
+     @Type { TechReport }
+     @Author { Kingston, Jeffrey H. }
+     @Title { Tab -- a Lout package for formatting tables }
+     @Number { 413 }
+     @Institution { Basser Department of Computer
+Science, The University of Sydney, Australia }
+     @Year { 1991 }
+}
+
+{ @Reference
+     @Tag { kingston91design }
+     @Type { TechReport }
+     @Author { Kingston, Jeffrey H. }
+     @Title { The design and implementation of a document formatting language }
+     @Number { @Null }
+     @Institution { Basser Department of Computer
+Science, The University of Sydney, Australia }
+     @Year { 1991 }
+     @Note { @I { In preparation. } }
+}
+
+{ @Reference
+     @Tag { wirth71 }
+     @Type { Article }
+     @Author { Wirth, N. }
+     @Title { The programming language Pascal }
+     @Journal { Acta Informatica }
+     @Volume { 1 }
+     @Year { 1975 }
+     @Pages { 35--63 }
+}
+
+{ @Reference
+     @Tag { brooks91 }
+     @Type { Article }
+     @Author { Brooks, Kenneth P. }
+     @Title { Lilac: a two-view document editor }
+     @Journal { IEEE Computer }
+     @Pages { 7--19 }
+     @Year { 1991 }
+}
+
+{ @Reference
+     @Tag { furuta82 }
+     @Type { Article }
+     @Author { Furuta, Richard, Scofield, Jeffrey,
+and Shaw, Alan }
+     @Title { Document formatting systems:  survey,
+concepts, and issues }
+     @Journal { Computing Surveys }
+     @Volume { 14 }
+     @Pages { 417--472 }
+     @Year { 1982 }
+}
diff --git a/data/refstyle.ld b/data/refstyle.ld
new file mode 100644
index 0000000..31a92e4
--- /dev/null
+++ b/data/refstyle.ld
@@ -0,0 +1,306 @@
+##########################################################################
+#                                                                        #
+#  refstyles.ld                                                          #
+#                                                                        #
+#  Standard reference styles database.                                   #
+#  Jeffrey H. Kingston                                                   #
+#  August 1994 (@NumSep added in Version 3.13, February 1999).           #
+#                                                                        #
+##########################################################################
+
+
+##########################################################################
+#                                                                        #
+#  Large works: Book, Proceedings (identical to Book), PhDThesis.        #
+#                                                                        #
+##########################################################################
+
+{ Book @RefStyle @Style
+  {  @Reference&&reftag @Open
+     {
+	{ @Author.  {}			} @If @Author
+	{ @I @Title			} @If @Title
+	{ @Word&&notitle		} @If @Not @Title
+	{ , @Pinpoint			} @If @Pinpoint
+	{ , @Word&&pages @NumSep @Pages } @If @Pages
+	{ , @Word&&page @NumSep @Page	} @If @Page
+	{ .  @TitleNote			} @If @TitleNote
+	{ .  @HowPublished		} @If @HowPublished
+	{ .  @Publisher			} @If @Publisher
+	{ .  @Organization		} @If @Organization
+	{ .  @Institution		} @If @Institution
+	{ , @Address			} @If @Address
+	{ .  @Edition			} @If @Edition
+	{ , @Month @Year		} @If @Year @And @Month
+	{ , @Year 			} @If @Year @And @Not @Month
+	{ .				} @If @True
+	{ {}  URL @I { @URL }.		} @If @URL
+	{ {}  @Note			} @If @Note
+     }
+  }
+}
+
+{ Proceedings @RefStyle @Style
+  {  @Reference&&reftag @Open
+     {
+	{ @Author.  {}			} @If @Author
+	{ @I @Title			} @If @Title
+	{ @Word&&notitle		} @If @Not @Title
+	{ , @Pinpoint			} @If @Pinpoint
+	{ , @Word&&pages @NumSep @Pages } @If @Pages
+	{ , @Word&&page @NumSep @Page	} @If @Page
+	{ .  @TitleNote			} @If @TitleNote
+	{ .  @HowPublished		} @If @HowPublished
+	{ .  @Publisher			} @If @Publisher
+	{ .  @Organization		} @If @Organization
+	{ .  @Institution		} @If @Institution
+	{ , @Address			} @If @Address
+	{ .  @Edition			} @If @Edition
+	{ , @Month @Year		} @If @Year @And @Month
+	{ , @Year 			} @If @Year @And @Not @Month
+	{ .				} @If @True
+	{ {}  URL @I { @URL }.		} @If @URL
+	{ {}  @Note			} @If @Note
+     }
+  }
+}
+
+{ PhDThesis @RefStyle @Style
+  {  @Reference&&reftag @Open
+     {
+	{ @Author.  {}			} @If @Author
+	{ @I @Title			} @If @Title
+	{ @Word&&notitle		} @If @Not @Title
+	{ , @Pinpoint			} @If @Pinpoint
+	{ , @Word&&pages @NumSep @Pages } @If @Pages
+	{ , @Word&&page @NumSep @Page	} @If @Page
+	{ .  @TitleNote			} @If @TitleNote
+	{ .  @Word&&phdthesis		} @If @True
+	{ , @HowPublished		} @If @HowPublished
+	{ , @Publisher			} @If @Publisher
+	{ , @Organization		} @If @Organization
+	{ , @Institution		} @If @Institution
+	{ , @Address			} @If @Address
+	{ .  @Edition			} @If @Edition
+	{ , @Month @Year		} @If @Year @And @Month
+	{ , @Year 			} @If @Year @And @Not @Month
+	{ .				} @If @True
+	{ {}  URL @I { @URL }.		} @If @URL
+	{ {}  @Note			} @If @Note
+     }
+  }
+}
+
+
+##########################################################################
+#                                                                        #
+#  Small works not appearing within anything else: TechReport, Manual,   #
+#  MastersThesis, Seminar, Misc                                          #
+#                                                                        #
+##########################################################################
+
+{ TechReport @RefStyle @Style
+  {  @Reference&&reftag @Open
+     {
+	{ @Author.  {}			} @If @Author
+	{ @Title			} @If @Title
+	{ @Word&&notitle		} @If @Not @Title
+	{ , @Pinpoint			} @If @Pinpoint
+	{ , @Word&&pages @NumSep @Pages } @If @Pages
+	{ , @Word&&page @NumSep @Page	} @If @Page
+	{ .  @TitleNote			} @If @TitleNote
+	{ .  @TRType			} @If @TRType
+	{ .  @Word&&techrep		} @If @Not @TRType
+	{ {} @Number			} @If @Number
+	{ {} (@Month @Year)		} @If @Year @And @Month
+	{ {} (@Year)			} @If @Year @And @Not @Month
+	{ , @HowPublished		} @If @HowPublished
+	{ , @Publisher			} @If @Publisher
+	{ , @Organization		} @If @Organization
+	{ , @Institution		} @If @Institution
+	{ , @Address			} @If @Address
+	{ .  @Edition			} @If @Edition
+	{ .				} @If @True
+	{ {}  URL @I { @URL }.		} @If @URL
+	{ {}  @Note			} @If @Note
+     }
+  }
+}
+
+{ MastersThesis @RefStyle @Style
+  {  @Reference&&reftag @Open
+     {
+	{ @Author.  {}			} @If @Author
+	{ @Title			} @If @Title
+	{ @Word&&notitle		} @If @Not @Title
+	{ , @Pinpoint			} @If @Pinpoint
+	{ , @Word&&pages @NumSep @Pages } @If @Pages
+	{ , @Word&&page @NumSep @Page	} @If @Page
+	{ .  @TitleNote			} @If @TitleNote
+	{ .  @Word&&mastersthesis	} @If @True
+	{ {} @Number			} @If @Number
+	{ {} (@Month @Year)		} @If @Year @And @Month
+	{ {} (@Year)			} @If @Year @And @Not @Month
+	{ , @HowPublished		} @If @HowPublished
+	{ , @Publisher			} @If @Publisher
+	{ , @Organization		} @If @Organization
+	{ , @Institution		} @If @Institution
+	{ , @Address			} @If @Address
+	{ .  @Edition			} @If @Edition
+	{ .				} @If @True
+	{ {}  URL @I { @URL }.		} @If @URL
+	{ {}  @Note			} @If @Note
+     }
+  }
+}
+
+{ Seminar @RefStyle @Style
+  {  @Reference&&reftag @Open
+     {
+	{ @Author.  {}			} @If @Author
+	{ @I @Title			} @If @Title
+	{ @Word&&notitle		} @If @Not @Title
+	{ , @Pinpoint			} @If @Pinpoint
+	{ , @Word&&pages @NumSep @Pages } @If @Pages
+	{ , @Word&&page @NumSep @Page	} @If @Page
+	{ .  @TitleNote			} @If @TitleNote
+	{ .  @HowPublished		} @If @HowPublished
+	{ .  @Publisher			} @If @Publisher
+	{ .  @Organization		} @If @Organization
+	{ .  @Institution		} @If @Institution
+	{ , @Address			} @If @Address
+	{ .  @Edition			} @If @Edition
+	{ , @Day @Month @Year		} @If @Year @And @Month @And @Day
+	{ , @Month @Year		} @If @Year @And @Month @And @Not @Day
+	{ , @Year 			} @If @Year @And @Not @Month
+	{ .				} @If @True
+	{ {}  URL @I { @URL }.		} @If @URL
+	{ {}  @Note			} @If @Note
+     }
+  }
+}
+
+{ Misc @RefStyle @Style
+  {  @Reference&&reftag @Open
+     {
+	{ @Author.  {}			} @If @Author
+	{ @Title			} @If @Title
+	{ @Word&&notitle		} @If @Not @Title
+	{ , @Pinpoint			} @If @Pinpoint
+	{ , @Word&&pages @NumSep @Pages } @If @Pages
+	{ , @Word&&page @NumSep @Page	} @If @Page
+	{ .  @TitleNote			} @If @TitleNote
+	{ .  @HowPublished		} @If @HowPublished
+	{ , @Publisher			} @If @Publisher
+	{ , @Organization		} @If @Organization
+	{ , @Institution		} @If @Institution
+	{ , @Address			} @If @Address
+	{ .  @Edition			} @If @Edition
+	{ , @Month @Year		} @If @Year @And @Month
+	{ , @Year			} @If @Year @And @Not @Month
+	{ .				} @If @True
+	{ {}  URL @I { @URL }.		} @If @URL
+	{ {}  @Note			} @If @Note
+     }
+  }
+}
+
+
+##########################################################################
+#                                                                        #
+#  Small works appearing within an ongoing forum: Article.               #
+#                                                                        #
+##########################################################################
+
+{ Article @RefStyle @Style
+  {  @Reference&&reftag @Open
+     {
+	{ @Author.  {}			} @If @Author
+	{ @Title			} @If @Title
+	{ @Word&&notitle		} @If @Not @Title
+	{ , @Pinpoint			} @If @Pinpoint
+	{ .				} @If @True
+	{ {}  @TitleNote.		} @If @TitleNote
+	{ {}  @I @Journal		} @If @Journal
+	{ {}  @Word&&nopublisher	} @If @Not @Journal
+	{ {} @B @Volume			} @If @Volume
+	{ {} (@Number)			} @If @Number @And @Volume
+	{ {} @Number			} @If @Number @And @Not @Volume
+	{ , @Pages			} @If @Pages
+	{ , @Word&&page @Page		} @If @Page
+	{ , @Word&&page @NumSep @Page	} @If @Page
+	{ {} (@Day @Month @Year)	} @If @Year @And @Month @And @Day
+	{ {} (@Month @Year)		} @If @Year @And @Month @And @Not @Day
+	{ {} (@Year)			} @If @Year @And @Not @Month
+	{ .				} @If @True
+	{ {}  URL @I { @URL }.		} @If @URL
+	{ {}  @Note			} @If @Note
+     }
+  }
+}
+
+
+##########################################################################
+#                                                                        #
+#  Small works appearing within large works:  InBook, InProceedings      #
+#  (identical to InBook).                                                #
+#                                                                        #
+##########################################################################
+
+{ InBook @RefStyle @Style
+  {  @Reference&&reftag @Open
+     {
+	{ @Author.  {}			} @If @Author
+	{ @Title			} @If @Title
+	{ @Word&&notitle		} @If @Not @Title
+	{ .  @Word&&in {}		} @If @True
+	{ @InAuthor, {}			} @If @InAuthor
+	{ @I @InTitle			} @If @InTitle
+	{ @Word&&notitle		} @If @Not @InTitle
+	{ , @Pinpoint			} @If @Pinpoint
+	{ , @Word&&pages @NumSep @Pages } @If @Pages
+	{ , @Word&&page @NumSep @Page	} @If @Page
+	{ .  @TitleNote			} @If @TitleNote
+	{ .  @HowPublished		} @If @HowPublished
+	{ .  @Publisher			} @If @Publisher
+	{ .  @Organization		} @If @Organization
+	{ .  @Institution		} @If @Institution
+	{ , @Address			} @If @Address
+	{ .  @Edition			} @If @Edition
+	{ , @Month @Year		} @If @Year @And @Month
+	{ , @Year 			} @If @Year @And @Not @Month
+	{ .				} @If @True
+	{ {}  URL @I { @URL }.		} @If @URL
+	{ {}  @Note			} @If @Note
+     }
+  }
+}
+
+{ InProceedings @RefStyle @Style
+  {  @Reference&&reftag @Open
+     {
+	{ @Author.  {}			} @If @Author
+	{ @Title			} @If @Title
+	{ @Word&&notitle		} @If @Not @Title
+	{ .  @Word&&in {}		} @If @True
+	{ @InAuthor, {}			} @If @InAuthor
+	{ @I @InTitle			} @If @InTitle
+	{ @Word&&notitle		} @If @Not @InTitle
+	{ , @Pinpoint			} @If @Pinpoint
+	{ , @Word&&pages @NumSep @Pages } @If @Pages
+	{ , @Word&&page @NumSep @Page	} @If @Page
+	{ .  @TitleNote			} @If @TitleNote
+	{ .  @HowPublished		} @If @HowPublished
+	{ .  @Publisher			} @If @Publisher
+	{ .  @Organization		} @If @Organization
+	{ .  @Institution		} @If @Institution
+	{ , @Address			} @If @Address
+	{ .  @Edition			} @If @Edition
+	{ , @Month @Year		} @If @Year @And @Month
+	{ , @Year 			} @If @Year @And @Not @Month
+	{ .				} @If @True
+	{ {}  URL @I { @URL }.		} @If @URL
+	{ {}  @Note			} @If @Note
+     }
+  }
+}
diff --git a/data/standard.ld b/data/standard.ld
new file mode 100644
index 0000000..23934c2
--- /dev/null
+++ b/data/standard.ld
@@ -0,0 +1,2176 @@
+######################################################
+#                                                    #
+#  standard.ld                  Jeffrey H. Kingston  #
+#                                     February 1995  #
+#                                     February 1999  #
+#                                                    #
+#  Database of commonly used symbols:                #
+#                                                    #
+#    @Word           language-specific words         #
+#    @Roman          lower case Roman numerals       #
+#    @UCRoman        upper case Roman numerals       #
+#    @Alpha          lower case Roman alphabet       #
+#    @UCAlpha        upper case Roman alphabet       #
+#    @Months         months of the year              #
+#    @ShortMonths    months of the year, abbreviated #
+#    @WeekDays       days of the week                #
+#    @ShortWeekDays  days of the week, abbreviated   #
+#    @TwelveHours    hours on twelve-hour clock      #
+#    @ShortHours     short hours on 24-hour clock    #
+#    @MeriDiem       a.m. or p.m.                    #
+#    @ShortMeriDiem  am or pm                        #
+#    @DateTimeFormat format of date and time.        #
+#                                                    #
+######################################################
+
+{ contents @Word @CurrLang @Case {
+    Czech	@Yield { Obsah }
+    Danish	@Yield { Indhold }
+    Dutch       @Yield { Inhoudsopgave }
+    English	@Yield { Contents }
+    EnglishUK	@Yield { Contents }
+    Finnish	@Yield { Sis{@Char adieresis}lt{@Char odieresis} }
+    French	@Yield { Table des Mati{@Char egrave}res }
+    German	@Yield { Inhalt }
+    Hungarian	@Yield { Tartalom }
+    Italian	@Yield { Contenuto }
+    Norwegian   @Yield { Innhold }
+    Polish	@Yield { Spis tre{@Char sacute}ci }
+    Russian	@Yield { "\363\317\304\305\322\326\301\316\311\305" }
+    Slovenian   @Yield { Vsebina }
+    Spanish	@Yield { Contenidos }
+    Swedish	@Yield { Inneh{@Char aring}ll }
+  }
+}
+
+{ references @Word @CurrLang @Case {
+    Czech	@Yield { Odkazy na literaturu }
+    Danish	@Yield { Referencer }
+    Dutch       @Yield { Referenties }
+    English	@Yield { References }
+    EnglishUK	@Yield { References }
+    Finnish	@Yield { Viitteet }
+    French	@Yield { R{@Char eacute}f{@Char eacute}rences }
+    German	@Yield { Literaturverzeichnis }
+    Hungarian	@Yield { Hivatkoz{@Char aacute}sok }
+    Italian	@Yield { Riferimenti }
+    Norwegian   @Yield { Referanser }
+    Polish	@Yield { Odno{@Char sacute}niki }
+    Russian	@Yield { "\354\311\324\305\322\301\324\325\322\301" }
+    Slovenian   @Yield { Reference }
+    Spanish	@Yield { Referencias }
+    Swedish	@Yield { Referenser }
+  }
+}
+
+{ bibliography @Word @CurrLang @Case {
+    Czech	@Yield { Seznam literatury }
+    Danish	@Yield { Bibliografi }
+    Dutch       @Yield { Bibliografie } 
+    English	@Yield { Bibliography }
+    EnglishUK	@Yield { Bibliography }
+    Finnish	@Yield { Kirjallisuusluettelo }
+    French	@Yield { Bibliographie }
+    German	@Yield { Literaturverzeichnis }
+    Hungarian	@Yield { Irodalomjegyz{@Char eacute}k }
+    Italian	@Yield { Bibliografia }
+    Norwegian   @Yield { Litteratur }
+    Polish	@Yield { Literatura }
+    Russian	@Yield { "\354\311\324\305\322\301\324\325\322\301" }
+    Slovenian   @Yield { Literatura }
+    Spanish	@Yield { Bibliograf{@Char iacute}a }
+    Swedish	@Yield { Bibliografi }
+  }
+}
+
+{ figure @Word @CurrLang @Case {
+    Czech	@Yield { Obr{@Char aacute}zek }
+    Danish	@Yield { Figur }
+    Dutch       @Yield { Figuur }
+    English	@Yield { Figure }
+    EnglishUK	@Yield { Figure }
+    Finnish	@Yield { Kuva }
+    French	@Yield { Figure }
+    German	@Yield { Abbildung }
+    Hungarian	@Yield { {@Char aacute}bra }
+    Italian	@Yield { Figura }
+    Norwegian   @Yield { Figur  }
+    Polish	@Yield { Rysunek }
+    Russian	@Yield { "\362\311\323\325\316\317\313" }
+    Slovenian   @Yield { Slika }
+    Spanish	@Yield { Figura }
+    Swedish	@Yield { Figur }
+  }
+}
+
+{ figurelist @Word @CurrLang @Case {
+    Czech	@Yield { ?? }
+    Danish	@Yield { Figurliste }
+    Dutch       @Yield { ?? }
+    English	@Yield { List of Figures }
+    EnglishUK	@Yield { List of Figures }
+    Finnish	@Yield { ?? }
+    French	@Yield { Liste des figures }
+    German	@Yield { Abbildungsverzeichnis }
+    Hungarian	@Yield { {@Char Aacute}br{@Char aacute}k jegyz{@Char eacute}ke }
+    Italian	@Yield { Elenco delle Figure }
+    Norwegian   @Yield { ??  }
+    Polish	@Yield { Spis rysunk{@Char oacute}w }
+    Russian	@Yield { "\363\320\311\323\317\313 \311\314\314\300\323\324\322\301\303\311\312" }
+    Slovenian   @Yield { Seznam slik }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { ?? }
+  }
+}
+
+{ table @Word @CurrLang @Case {
+    Czech	@Yield { Tabulka }
+    Danish	@Yield { Tabel }
+    Dutch       @Yield { Tabel }
+    English	@Yield { Table }
+    EnglishUK	@Yield { Table }
+    Finnish	@Yield { Taulukko }
+    French	@Yield { Table }
+    German	@Yield { Tabelle }
+    Hungarian	@Yield { t{@Char aacute}bl{@Char aacute}zat }
+    Italian	@Yield { Tabella }
+    Norwegian   @Yield { Tabell }
+    Polish	@Yield { Tabela }
+    Russian	@Yield { "\364\301\302\314\311\303\301" }
+    Slovenian   @Yield { Tabela }
+    Spanish	@Yield { Tabla }
+    Swedish	@Yield { Tabell }
+  }
+}
+
+{ tablelist @Word @CurrLang @Case {
+    Czech	@Yield { Seznam tabulek }
+    Danish	@Yield { Tabelliste }
+    Dutch       @Yield { ?? }
+    English	@Yield { List of Tables }
+    EnglishUK	@Yield { List of Tables }
+    Finnish	@Yield { ?? }
+    French	@Yield { Liste des tables }
+    German	@Yield { Tabellenverzeichnis }
+    Hungarian	@Yield { T{@Char aacute}bl{@Char aacute}zatok jegyz{@Char eacute}ke }
+    Italian	@Yield { Elenco delle Tabelle }
+    Norwegian   @Yield { ?? }
+    Polish	@Yield { Spis tabel }
+    Russian	@Yield { "\363\320\311\323\317\313 \324\301\302\314\311\303" }
+    Slovenian   @Yield { Seznam tabel }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { ?? }
+  }
+}
+
+{ definition @Word @CurrLang @Case {
+    Czech	@Yield { Definice }
+    Danish	@Yield { Definition }
+    Dutch       @Yield { ?? }
+    English	@Yield { Definition }
+    EnglishUK	@Yield { Definition }
+    Finnish	@Yield { ?? }
+    French	@Yield { D{@Char eacute}finition }
+    German	@Yield { Definition }
+    Hungarian	@Yield { defin{@Char iacute}ci{@Char oacute} }
+    Italian	@Yield { Definizione }
+    Norwegian   @Yield { ?? }
+    Polish	@Yield { Definicja }
+    Russian	@Yield { "\357\320\322\305\304\305\314\305\316\311\305" }
+    Slovenian   @Yield { Definicija }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { ?? }
+  }
+}
+
+{ lemma @Word @CurrLang @Case {
+    Czech	@Yield { Lemma }
+    Danish	@Yield { Lemma }
+    Dutch       @Yield { ?? }
+    English	@Yield { Lemma }
+    EnglishUK	@Yield { Lemma }
+    Finnish	@Yield { ?? }
+    French	@Yield { Lemme }
+    German	@Yield { Lemma }
+    Hungarian	@Yield { lemma }
+    Italian	@Yield { Lemma }
+    Norwegian   @Yield { ?? }
+    Polish	@Yield { Lemat }
+    Russian	@Yield { "\354\305\315\315\301" }
+    Slovenian   @Yield { Lema }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { ?? }
+  }
+}
+
+{ theorem @Word @CurrLang @Case {
+    Czech	@Yield { Teor{@Char eacute}m }
+    Danish	@Yield { S{@Char ae}tning }
+    Dutch       @Yield { ?? }
+    English	@Yield { Theorem }
+    EnglishUK	@Yield { Theorem }
+    Finnish	@Yield { ?? }
+    French	@Yield { Th{@Char eacute}or{@Char egrave}me }
+    German	@Yield { Theorem }
+    Hungarian	@Yield { t{@Char eacute}tel }
+    Italian	@Yield { Teorema }
+    Norwegian   @Yield { ?? }
+    Polish	@Yield { Twierdzenie }
+    Russian	@Yield { "\364\305\317\322\305\315\301" }
+    Slovenian   @Yield { Teorem }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { ?? }
+  }
+}
+
+{ proposition @Word @CurrLang @Case {
+    Czech	@Yield { P{@Char rcaron}edpoklad }
+    Danish	@Yield { Proposition }
+    Dutch       @Yield { ?? }
+    English	@Yield { Proposition }
+    EnglishUK	@Yield { Proposition }
+    Finnish	@Yield { ?? }
+    French	@Yield { Proposition }
+    German	@Yield { Satz }
+    Hungarian	@Yield { {@Char aacute}ll{@Char iacute}t{@Char aacute}s }
+    Italian	@Yield { Proposizione }
+    Norwegian   @Yield { ?? }
+    Polish	@Yield { Za{@Char lslash}o{@Char zdotabove}enie }
+    Russian	@Yield { "\360\322\305\304\314\317\326\305\316\311\305" }
+    Slovenian   @Yield { Predpostavka }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { ?? }
+  }
+}
+
+{ corollary @Word @CurrLang @Case {
+    Czech	@Yield { D{@Char uring}sledek }
+    Danish	@Yield { Korollar }
+    Dutch       @Yield { ?? }
+    English	@Yield { Corollary }
+    EnglishUK	@Yield { Corollary }
+    Finnish	@Yield { ?? }
+    French	@Yield { Corollaire }
+    German	@Yield { Korollar }
+    Hungarian	@Yield { ?? }
+    Italian	@Yield { Corollario }
+    Norwegian   @Yield { ?? }
+    Polish	@Yield { Wniosek }
+    Russian	@Yield { "\363\314\305\304\323\324\327\311\305" }
+    Slovenian   @Yield { Sklep }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { ?? }
+  }
+}
+
+{ example @Word @CurrLang @Case {
+    Czech	@Yield { P{@Char rcaron}{@Char iacute}klad }
+    Danish	@Yield { Eksempel }
+    Dutch       @Yield { ?? }
+    English	@Yield { Example }
+    EnglishUK	@Yield { Example }
+    Finnish	@Yield { ?? }
+    French	@Yield { Exemple }
+    German	@Yield { Beispiel }
+    Hungarian	@Yield { p{@Char eacute}lda }
+    Italian	@Yield { Esempio }
+    Norwegian   @Yield { ?? }
+    Polish	@Yield { Przyk{@Char lslash}ad }
+    Russian	@Yield { "\360\322\311\315\305\322" }
+    Slovenian   @Yield { Primer }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { ?? }
+  }
+}
+
+{ claim @Word @CurrLang @Case {
+    Czech	@Yield { Tvrzen{@Char iacute} }
+    Danish	@Yield { P{@Char aa}stand }
+    Dutch       @Yield { ?? }
+    English	@Yield { Claim }
+    EnglishUK	@Yield { Claim }
+    Finnish	@Yield { ?? }
+    French	@Yield { Affirmation }
+    German	@Yield { Behauptung }
+    Hungarian	@Yield { kijelent{@Char eacute}s }
+    Italian	@Yield { Affermazione }
+    Norwegian   @Yield { ?? }
+    Polish	@Yield { Stwierdzenie }
+    Russian	@Yield { "\365\324\327\305\322\326\304\305\316\311\305" }
+    Slovenian   @Yield { Trditev }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { ?? }
+  }
+}
+
+{ proof @Word @CurrLang @Case {
+    Czech	@Yield { D{@Char uring}kaz }
+    Danish	@Yield { Bevis }
+    Dutch       @Yield { ?? }
+    English	@Yield { Proof }
+    EnglishUK	@Yield { Proof }
+    Finnish	@Yield { ?? }
+    French	@Yield { Preuve }
+    German	@Yield { Beweis }
+    Hungarian	@Yield { Bizony{@Char iacute}t{@Char aacute}s }
+    Italian	@Yield { Dimostrazione }
+    Norwegian   @Yield { ?? }
+    Polish	@Yield { Dow{@Char oacute}d }
+    Russian	@Yield { "\344\317\313\301\332\301\324\305\314\330\323\324\327\317" }
+    Slovenian   @Yield { Dokaz }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { ?? }
+  }
+}
+
+{ abstract @Word @CurrLang @Case {
+    Czech	@Yield { Abstrakt }
+    Danish	@Yield { Synopsis }
+    Dutch       @Yield { Samenvatting }
+    English	@Yield { Abstract }
+    EnglishUK	@Yield { Abstract }
+    Finnish	@Yield { Yleiskatsaus }
+    French	@Yield { R{@Char eacute}sum{@Char eacute} }
+    German	@Yield { Zusammenfassung }
+    Hungarian	@Yield { Kivonat }
+    Italian	@Yield { Riassunto }
+    Norwegian   @Yield { Sammendrag }
+    Polish	@Yield { Abstrakt }
+    Russian	@Yield { "\341\302\323\324\322\301\313\324" } #correct!
+    Slovenian   @Yield { Povzetek }
+    Spanish	@Yield { Sinopsis }
+    Swedish	@Yield { {@Char Odieresis}versikt }
+  }
+}
+
+{ preface @Word @CurrLang @Case {
+    Czech	@Yield { P{@Char rcaron}edmluva }
+    Danish	@Yield { Forord }
+    Dutch       @Yield { Voorwoord } # or { Woord vooraf }
+    English	@Yield { Preface }
+    EnglishUK	@Yield { Preface }
+    Finnish	@Yield { Esipuhe }
+    French	@Yield { Pr{@Char eacute}face }
+    German	@Yield { Vorwort }
+    Hungarian	@Yield { El{@Char odblacute}sz{@Char oacute} }
+    Italian	@Yield { Prefazione }
+    Norwegian   @Yield { Forord }
+    Polish	@Yield { Przedmowa }
+    Russian	@Yield { "\360\322\305\304\311\323\314\317\327\311\305" }
+    Slovenian   @Yield { Predgovor }
+    Spanish	@Yield { Prefacio }
+    Swedish	@Yield { F{@Char odieresis}rord }
+  }
+}
+
+{ abbreviations @Word @CurrLang @Case {
+    Czech	@Yield { ?? }
+    Danish	@Yield { ?? }
+    Dutch       @Yield { ?? }
+    English	@Yield { Abbreviations }
+    EnglishUK	@Yield { Abbreviations }
+    Finnish	@Yield { ?? }
+    French	@Yield { ?? }
+    German	@Yield { ?? }
+    Hungarian	@Yield { ?? }
+    Italian	@Yield { ?? }
+    Norwegian   @Yield { ?? }
+    Polish	@Yield { ?? }
+    Russian	@Yield { ?? }
+    Slovenian   @Yield { ?? }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { ?? }
+  }
+}
+
+{ introduction @Word @CurrLang @Case {
+    Czech	@Yield { {@Char Uacute}vod }
+    Danish	@Yield { Indledning }
+    Dutch       @Yield { Inleiding }
+    English	@Yield { Introduction }
+    EnglishUK	@Yield { Introduction }
+    Finnish	@Yield { Johdanto }
+    French	@Yield { Introduction }
+    German	@Yield { Einleitung }
+    Hungarian	@Yield { Bevezet{@Char eacute}s }
+    Italian	@Yield { Introduzione }
+    Norwegian   @Yield { Innledning }
+    Polish	@Yield { Wst{@Char eogonek}p }
+    Russian	@Yield { "\367\327\305\304\305\316\311\305" }
+    Slovenian   @Yield { Uvod }
+    Spanish	@Yield { Introducci{@Char oacute}n }
+    Swedish	@Yield { Inledning }
+  }
+}
+
+{ chapter @Word @CurrLang @Case {
+    Czech	@Yield { Kapitola }
+    Danish	@Yield { Kapitel }
+    Dutch       @Yield { Hoofdstuk }
+    English	@Yield { Chapter }
+    EnglishUK	@Yield { Chapter }
+    Finnish	@Yield { Luku }
+    French	@Yield { Chapitre }
+    German	@Yield { Kapitel }
+    Hungarian	@Yield { fejezet }
+    Italian	@Yield { Capitolo }
+    Norwegian   @Yield { Kapittel }
+    Polish	@Yield { Rozdzia{@Char lslash} }
+    Russian	@Yield { "\347\314\301\327\301" }
+    Slovenian   @Yield { Poglavje }
+    Spanish	@Yield { Cap{@Char iacute}tulo }
+    Swedish	@Yield { Kapitel }
+  }
+}
+
+{ appendix @Word @CurrLang @Case {
+    Czech	@Yield { P{@Char rcaron}{@Char iacute}loha }
+    Danish	@Yield { Appendiks }
+    Dutch       @Yield { Appendix }
+    English	@Yield { Appendix }
+    EnglishUK	@Yield { Appendix }
+    Finnish	@Yield { Liite }
+    French	@Yield { Annexe }
+    German	@Yield { Anhang }
+    Hungarian	@Yield { f{@Char udieresis}ggel{@Char eacute}k }
+    Italian	@Yield { Appendice }
+    Norwegian   @Yield { Tillegg }
+    Polish	@Yield { Dodatek }
+    Russian	@Yield { "\360\322\311\314\317\326\305\316\311\305" }
+    Slovenian   @Yield { Dodatek }
+    Spanish	@Yield { Ap{@Char eacute}ndice }
+    Swedish	@Yield { Appendix }
+  }
+}
+
+{ lecture @Word @CurrLang @Case {
+    Czech	@Yield { Lecture }
+    Danish	@Yield { Lecture }
+    Dutch       @Yield { Lecture }
+    English	@Yield { Lecture }
+    EnglishUK	@Yield { Lecture }
+    Finnish	@Yield { Lecture }
+    French	@Yield { Lecture }
+    German	@Yield { Lecture }
+    Hungarian	@Yield { Lecture }
+    Italian	@Yield { Lecture }
+    Norwegian   @Yield { Lecture }
+    Polish	@Yield { Lecture }
+    Russian	@Yield { Lecture }
+    Slovenian   @Yield { Lecture }
+    Spanish	@Yield { Lecture }
+    Swedish	@Yield { Lecture }
+  }
+}
+
+{ index @Word @CurrLang @Case {
+    Czech	@Yield { Index }
+    Danish	@Yield { Indeks }
+    Dutch       @Yield { Index }
+    English	@Yield { Index }
+    EnglishUK	@Yield { Index }
+    Finnish	@Yield { Hakemisto }
+    French	@Yield { Index }
+    German	@Yield { Index }
+    Hungarian	@Yield { Index }
+    Italian	@Yield { Indice }
+    Norwegian   @Yield { Register }
+    Polish	@Yield { Skorowidz }
+    Russian	@Yield { "\351\316\304\305\313\323" }
+    Slovenian   @Yield { Indeks }
+    Spanish	@Yield { Indice }
+    Swedish	@Yield { Index }
+  }
+}
+
+{ notitle @Word @CurrLang @Case {
+    Czech	@Yield { Bez n{@Char aacute}zvu }
+    Danish	@Yield { Ingen titel }
+    Dutch       @Yield { Zonder titel }
+    English	@Yield { No title }
+    EnglishUK	@Yield { No title }
+    Finnish	@Yield { Ei nime{@Char adieresis} }
+    French	@Yield { Sans titre }
+    German	@Yield { Ohne Titel }
+    Hungarian	@Yield { C{@Char iacute}m n{@Char eacute}lk{@Char udieresis}l }
+    Polish	@Yield { Bez tytu{@Char lslash}u }
+    Italian	@Yield { Senza titolo }
+    Norwegian   @Yield { Utel tittel }
+    Russian	@Yield { "\342\305\332 \316\301\332\327\301\316\311\321" }
+    Slovenian   @Yield { Brez naslova }
+    Spanish	@Yield { Sin t{@Char iacute}tulo }
+    Swedish	@Yield { Ingen titel }
+  }
+}
+
+{ pages @Word @CurrLang @Case {
+    Czech	@Yield { stranky }
+    Danish	@Yield { sider }
+    Dutch       @Yield { pagina's } # or {bladzijden}, {pag.}, {blz.}
+    English	@Yield { pages }
+    EnglishUK	@Yield { pages }
+    Finnish	@Yield { sivut }
+    French	@Yield { pages }
+    German	@Yield { Seiten }
+    Hungarian	@Yield { oldal }
+    Italian	@Yield { pagine }
+    Norwegian   @Yield { sider }
+    Polish	@Yield { strony }
+    Russian	@Yield { "\323\324\322\301\316\311\303\331" }
+    Slovenian   @Yield { strani }
+    Spanish	@Yield { p{@Char aacute}ginas }
+    Swedish	@Yield { sidor }
+  }
+}
+
+{ page @Word @CurrLang @Case {
+    Czech	@Yield { strana }
+    Danish	@Yield { side }
+    Dutch       @Yield { pagina } # or {bladzijde}, {pag.}, {blz.}
+    English	@Yield { page }
+    EnglishUK	@Yield { page }
+    Finnish	@Yield { sivu }
+    French	@Yield { page }
+    German	@Yield { Seite }
+    Hungarian	@Yield { oldal }
+    Italian	@Yield { pagina }
+    Norwegian   @Yield { side }
+    Polish	@Yield { strona }
+    Russian	@Yield { "\323\324\322\301\316\311\303\301" }
+    Slovenian   @Yield { stran }
+    Spanish	@Yield { p{@Char aacute}gina }
+    Swedish	@Yield { sida }
+  }
+}
+
+{ nopublisher @Word @CurrLang @Case {
+    Czech	@Yield { Bez vydavatele }
+    Danish	@Yield { Intet forlag }
+    Dutch       @Yield { Ongepubliceerd } # or {Zonder uitgever}
+    English	@Yield { No publisher }
+    EnglishUK	@Yield { No publisher }
+    Finnish	@Yield { Ei kustantamo }
+    French	@Yield { Sans {@Char eacute}diteur }
+    German	@Yield { Ohne Verleger }
+    Hungarian	@Yield { Kiad{@Char oacute} n{@Char eacute}lk{@Char udieresis}l }
+    Italian	@Yield { Senza editore }
+    Norwegian   @Yield { Upublisert }
+    Polish	@Yield { Bez wydawcy }
+    Russian	@Yield { "\302\305\332 \311\332\304\301\324\305\314\321" }
+    Slovenian   @Yield { Brez zalo{@Char zcaron}nika }
+    Spanish	@Yield { Sin editor }
+    Swedish	@Yield { Inget f{@Char odieresis}rlag }
+  }
+}
+
+{ techrep @Word @CurrLang @Case {
+    Czech	@Yield { Technick{@Char aacute} zpr{@Char aacute}va }
+    Danish	@Yield { Teknisk rapport }
+    Dutch       @Yield { Technisch rapport }
+    English	@Yield { Tech. Rep. }
+    EnglishUK	@Yield { Tech. Rep. }
+    Finnish	@Yield { Tekn. rap. }
+    French	@Yield { Rapport technique }
+    German	@Yield { Techn. Ber. }
+    Hungarian	@Yield { Techn. jel. }
+    Italian	@Yield { Rapporto tecnico }
+    Norwegian   @Yield { Tekn. Rapp. }
+    Russian	@Yield { "\324\305\310. \304\317\313\314\301\304" }
+    Polish	@Yield { Sprawozdanie techniczne }
+    Slovenian   @Yield { Tehn. por. }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { Tekn. rap. }
+  }
+}
+
+{ phdthesis @Word @CurrLang @Case {
+    Czech	@Yield { Doktorsk{@Char aacute} disertace }
+    Danish	@Yield { Ph.D.-afhandling }
+    Dutch       @Yield { Proefschrift } # or {Dissertatie}
+    English	@Yield { Ph.D. thesis }
+    EnglishUK	@Yield { Ph.D. thesis }
+    Finnish	@Yield { tohtorinv{@Char adieresis}it{@Char odieresis}skirja }
+    French	@Yield { Th{@Char egrave}se de Doctorat }
+    German	@Yield { Doktorarbeit }
+    Hungarian	@Yield { Doktori disszert{@Char aacute}ci{@Char oacute} }
+    Italian	@Yield { Tesi di dottorato }
+    Norwegian   @Yield { Doktorgradsavhandling }
+    Polish	@Yield { Praca doktorska }
+    Russian	@Yield { "\313\301\316\304\311\304\301\324\323\313\301\321"
+"\304\311\323\323\305\322\324\301\303\311\321" }
+    Slovenian   @Yield { Doktorska disertacija }
+    Spanish	@Yield { Tesis Doctoral }
+    Swedish	@Yield { doktorsavhandling }
+  }
+}
+
+{ mastersthesis @Word @CurrLang @Case {
+    Czech	@Yield { Diplomov{@Char aacute} pr{@Char aacute}ce }
+    Danish	@Yield { Specialeafhandling }
+    Dutch       @Yield { Doctoraalscriptie } 
+    English	@Yield { Master's thesis }
+    EnglishUK	@Yield { Master's thesis }
+    Finnish	@Yield { diplomity{@Char odieresis} }
+    French	@Yield { M{@Char eacute}moire de Ma{@Char icircumflex}trise }
+    German	@Yield { Magisterarbeit }
+    Hungarian	@Yield { Diplomamunka }
+    Italian	@Yield { Tesi di laurea }
+    Norwegian   @Yield { Diplomoppgave }
+    Polish	@Yield { Praca magisterska }
+    Russian	@Yield { "\304\311\320\314\317\315\316\301\321"
+"\322\301\302\317\324\301" }
+    Slovenian   @Yield { Diploma }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { diplomarbete }
+  }
+}
+
+{ in @Word @CurrLang @Case {
+    Czech	@Yield { V }
+    Danish	@Yield { I }
+    Dutch       @Yield { In }
+    English	@Yield { In }
+    EnglishUK	@Yield { In }
+    Finnish	@Yield { teoksessa }
+    French	@Yield { dans }
+    German	@Yield { In }
+    Hungarian	@Yield { ?? }
+    Italian	@Yield { In }
+    Norwegian   @Yield { I }
+    Polish	@Yield { W }
+    Russian	@Yield { "\327" }
+    Slovenian   @Yield { V }
+    Spanish	@Yield { En }
+    Swedish	@Yield { I }
+  }
+}
+
+{ am @Word @CurrLang @Case {
+    Czech	@Yield { a.m. }
+    Danish	@Yield { a.m. }
+    Dutch       @Yield { a.m. }
+    English	@Yield { a.m. }
+    EnglishUK	@Yield { a.m. }
+    Finnish	@Yield { a.m. }
+    French	@Yield { a.m. }
+    German	@Yield { a.m. }
+    Hungarian	@Yield { de.  }
+    Italian	@Yield { a.m. }
+    Norwegian   @Yield { a.m. }
+    Polish	@Yield { a.m. }
+    Russian	@Yield { a.m. }
+    Slovenian   @Yield { a.m. }
+    Spanish	@Yield { a.m. }
+    Swedish	@Yield { a.m. }
+  }
+}
+
+{ pm @Word @CurrLang @Case {
+    Czech	@Yield { p.m. }
+    Danish	@Yield { p.m. }
+    Dutch       @Yield { p.m. }
+    English	@Yield { p.m. }
+    EnglishUK	@Yield { p.m. }
+    Finnish	@Yield { p.m. }
+    French	@Yield { p.m. }
+    German	@Yield { p.m. }
+    Hungarian	@Yield { du.  }
+    Italian	@Yield { p.m. }
+    Norwegian   @Yield { p.m. }
+    Polish	@Yield { p.m. }
+    Russian	@Yield { p.m. }
+    Slovenian   @Yield { p.m. }
+    Spanish	@Yield { p.m. }
+    Swedish	@Yield { p.m. }
+  }
+}
+
+{ shortam @Word @CurrLang @Case {
+    Czech	@Yield { am }
+    Danish	@Yield { am }
+    Dutch       @Yield { am }
+    English	@Yield { am }
+    EnglishUK	@Yield { am }
+    Finnish	@Yield { am }
+    French	@Yield { am }
+    German	@Yield { am }
+    Hungarian	@Yield { de }
+    Italian	@Yield { am }
+    Norwegian   @Yield { am }
+    Polish	@Yield { am }
+    Russian	@Yield { am }
+    Slovenian   @Yield { am }
+    Spanish	@Yield { am }
+    Swedish	@Yield { am }
+  }
+}
+
+{ shortpm @Word @CurrLang @Case {
+    Czech	@Yield { pm }
+    Danish	@Yield { pm }
+    Dutch       @Yield { pm }
+    English	@Yield { pm }
+    EnglishUK	@Yield { pm }
+    Finnish	@Yield { pm }
+    French	@Yield { pm }
+    German	@Yield { pm }
+    Hungarian	@Yield { du }
+    Italian	@Yield { pm }
+    Norwegian   @Yield { pm }
+    Polish	@Yield { pm }
+    Russian	@Yield { pm }
+    Slovenian   @Yield { pm }
+    Spanish	@Yield { pm }
+    Swedish	@Yield { pm }
+  }
+}
+
+
+{  ?? @Roman ??		}
+{   1 @Roman i		}
+{   2 @Roman ii		}
+{   3 @Roman iii	}
+{   4 @Roman iv		}
+{   5 @Roman v		}
+{   6 @Roman vi		}
+{   7 @Roman vii	}
+{   8 @Roman viii	}
+{   9 @Roman ix		}
+{  10 @Roman x		}
+{  11 @Roman xi		}
+{  12 @Roman xii	}
+{  13 @Roman xiii	}
+{  14 @Roman xiv	}
+{  15 @Roman xv		}
+{  16 @Roman xvi	}
+{  17 @Roman xvii	}
+{  18 @Roman xviii	}
+{  19 @Roman xix	}
+{  20 @Roman xx		}
+{  21 @Roman xxi	}
+{  22 @Roman xxii	}
+{  23 @Roman xxiii	}
+{  24 @Roman xxiv	}
+{  25 @Roman xxv	}
+{  26 @Roman xxvi	}
+{  27 @Roman xxvii	}
+{  28 @Roman xxviii	}
+{  29 @Roman xxix	}
+{  30 @Roman xxx	}
+{  31 @Roman xxxi	}
+{  32 @Roman xxxii	}
+{  33 @Roman xxxiii	}
+{  34 @Roman xxxiv	}
+{  35 @Roman xxxv	}
+{  36 @Roman xxxvi	}
+{  37 @Roman xxxvii	}
+{  38 @Roman xxxviii	}
+{  39 @Roman xxxix	}
+{  40 @Roman xl		}
+{  41 @Roman xli	}
+{  42 @Roman xlii	}
+{  43 @Roman xliii	}
+{  44 @Roman xliv	}
+{  45 @Roman xlv	}
+{  46 @Roman xlvi	}
+{  47 @Roman xlvii	}
+{  48 @Roman xlviii	}
+{  49 @Roman xlix	}
+{  50 @Roman l		}
+{  51 @Roman li		}
+{  52 @Roman lii	}
+{  53 @Roman liii	}
+{  54 @Roman liv	}
+{  55 @Roman lv		}
+{  56 @Roman lvi	}
+{  57 @Roman lvii	}
+{  58 @Roman lviii	}
+{  59 @Roman lix	}
+{  60 @Roman lx		}
+{  61 @Roman lxi	}
+{  62 @Roman lxii	}
+{  63 @Roman lxiii	}
+{  64 @Roman lxiv	}
+{  65 @Roman lxv	}
+{  66 @Roman lxvi	}
+{  67 @Roman lxvii	}
+{  68 @Roman lxviii	}
+{  69 @Roman lxix	}
+{  70 @Roman lxx	}
+{  71 @Roman lxxi	}
+{  72 @Roman lxxii	}
+{  73 @Roman lxxiii	}
+{  74 @Roman lxxiv	}
+{  75 @Roman lxxv	}
+{  76 @Roman lxxvi	}
+{  77 @Roman lxxvii	}
+{  78 @Roman lxxviii	}
+{  79 @Roman lxxix	}
+{  80 @Roman lxxx	}
+{  81 @Roman lxxxi	}
+{  82 @Roman lxxxii	}
+{  83 @Roman lxxxiii	}
+{  84 @Roman lxxxiv	}
+{  85 @Roman lxxxv	}
+{  86 @Roman lxxxvi	}
+{  87 @Roman lxxxvii	}
+{  88 @Roman lxxxviii	}
+{  89 @Roman lxxxix	}
+{  90 @Roman xc		}
+{  91 @Roman xci	}
+{  92 @Roman xcii	}
+{  93 @Roman xciii	}
+{  94 @Roman xciv	}
+{  95 @Roman xcv	}
+{  96 @Roman xcvi	}
+{  97 @Roman xcvii	}
+{  98 @Roman xcviii	}
+{  99 @Roman xcix	}
+{ 100 @Roman cc		}
+{ 101 @Roman ci		}
+{ 102 @Roman cii	}
+{ 103 @Roman ciii	}
+{ 104 @Roman civ	}
+{ 105 @Roman cv		}
+{ 106 @Roman cvi	}
+{ 107 @Roman cvii	}
+{ 108 @Roman cviii	}
+{ 109 @Roman cix	}
+{ 110 @Roman cx		}
+{ 111 @Roman cxi	}
+{ 112 @Roman cxii	}
+{ 113 @Roman cxiii	}
+{ 114 @Roman cxiv	}
+{ 115 @Roman cxv	}
+{ 116 @Roman cxvi	}
+{ 117 @Roman cxvii	}
+{ 118 @Roman cxviii	}
+{ 119 @Roman cxix	}
+{ 120 @Roman cxx	}
+{ 121 @Roman cxxi	}
+{ 122 @Roman cxxii	}
+{ 123 @Roman cxxiii	}
+{ 124 @Roman cxxiv	}
+{ 125 @Roman cxxv	}
+{ 126 @Roman cxxvi	}
+{ 127 @Roman cxxvii	}
+{ 128 @Roman cxxviii	}
+{ 129 @Roman cxxix	}
+{ 130 @Roman cxxx	}
+{ 131 @Roman cxxxi	}
+{ 132 @Roman cxxxii	}
+{ 133 @Roman cxxxiii	}
+{ 134 @Roman cxxxiv	}
+{ 135 @Roman cxxxv	}
+{ 136 @Roman cxxxvi	}
+{ 137 @Roman cxxxvii	}
+{ 138 @Roman cxxxviii	}
+{ 139 @Roman cxxxix	}
+{ 140 @Roman cxl	}
+{ 141 @Roman cxli	}
+{ 142 @Roman cxlii	}
+{ 143 @Roman cxliii	}
+{ 144 @Roman cxliv	}
+{ 145 @Roman cxlv	}
+{ 146 @Roman cxlvi	}
+{ 147 @Roman cxlvii	}
+{ 148 @Roman cxlviii	}
+{ 149 @Roman cxlix	}
+{ 150 @Roman cl		}
+{ 151 @Roman cli	}
+{ 152 @Roman clii	}
+{ 153 @Roman cliii	}
+{ 154 @Roman cliv	}
+{ 155 @Roman clv	}
+{ 156 @Roman clvi	}
+{ 157 @Roman clvii	}
+{ 158 @Roman clviii	}
+{ 159 @Roman clix	}
+{ 160 @Roman clx	}
+{ 161 @Roman clxi	}
+{ 162 @Roman clxii	}
+{ 163 @Roman clxiii	}
+{ 164 @Roman clxiv	}
+{ 165 @Roman clxv	}
+{ 166 @Roman clxvi	}
+{ 167 @Roman clxvii	}
+{ 168 @Roman clxviii	}
+{ 169 @Roman clxix	}
+{ 170 @Roman clxx	}
+{ 171 @Roman clxxi	}
+{ 172 @Roman clxxii	}
+{ 173 @Roman clxxiii	}
+{ 174 @Roman clxxiv	}
+{ 175 @Roman clxxv	}
+{ 176 @Roman clxxvi	}
+{ 177 @Roman clxxvii	}
+{ 178 @Roman clxxviii	}
+{ 179 @Roman clxxix	}
+{ 180 @Roman clxxx	}
+{ 181 @Roman clxxxi	}
+{ 182 @Roman clxxxii	}
+{ 183 @Roman clxxxiii	}
+{ 184 @Roman clxxxiv	}
+{ 185 @Roman clxxxv	}
+{ 186 @Roman clxxxvi	}
+{ 187 @Roman clxxxvii	}
+{ 188 @Roman clxxxviii	}
+{ 189 @Roman clxxxix	}
+{ 190 @Roman cxc	}
+{ 191 @Roman cxci	}
+{ 192 @Roman cxcii	}
+{ 193 @Roman cxciii	}
+{ 194 @Roman cxciv	}
+{ 195 @Roman cxcv	}
+{ 196 @Roman cxcvi	}
+{ 197 @Roman cxcvii	}
+{ 198 @Roman cxcviii	}
+{ 199 @Roman cxcix	}
+{ 200 @Roman cc		}
+
+{  ?? @UCRoman ??	}
+{   1 @UCRoman I	}
+{   2 @UCRoman II	}
+{   3 @UCRoman III	}
+{   4 @UCRoman IV	}
+{   5 @UCRoman V	}
+{   6 @UCRoman VI	}
+{   7 @UCRoman VII	}
+{   8 @UCRoman VIII	}
+{   9 @UCRoman IX	}
+{  10 @UCRoman X	}
+{  11 @UCRoman XI	}
+{  12 @UCRoman XII	}
+{  13 @UCRoman XIII	}
+{  14 @UCRoman XIV	}
+{  15 @UCRoman XV	}
+{  16 @UCRoman XVI	}
+{  17 @UCRoman XVII	}
+{  18 @UCRoman XVIII	}
+{  19 @UCRoman XIX	}
+{  20 @UCRoman XX	}
+{  21 @UCRoman XXI	}
+{  22 @UCRoman XXII	}
+{  23 @UCRoman XXIII	}
+{  24 @UCRoman XXIV	}
+{  25 @UCRoman XXV	}
+{  26 @UCRoman XXVI	}
+{  27 @UCRoman XXVII	}
+{  28 @UCRoman XXVIII	}
+{  29 @UCRoman XXIX	}
+{  30 @UCRoman XXX	}
+{  31 @UCRoman XXXI	}
+{  32 @UCRoman XXXII	}
+{  33 @UCRoman XXXIII	}
+{  34 @UCRoman XXXIV	}
+{  35 @UCRoman XXXV	}
+{  36 @UCRoman XXXVI	}
+{  37 @UCRoman XXXVII	}
+{  38 @UCRoman XXXVIII	}
+{  39 @UCRoman XXXIX	}
+{  40 @UCRoman XL	}
+{  41 @UCRoman XLI	}
+{  42 @UCRoman XLII	}
+{  43 @UCRoman XLIII	}
+{  44 @UCRoman XLIV	}
+{  45 @UCRoman XLV	}
+{  46 @UCRoman XLVI	}
+{  47 @UCRoman XLVII	}
+{  48 @UCRoman XLVIII	}
+{  49 @UCRoman XLIX	}
+{  50 @UCRoman L	}
+{  51 @UCRoman LI	}
+{  52 @UCRoman LII	}
+{  53 @UCRoman LIII	}
+{  54 @UCRoman LIV	}
+{  55 @UCRoman LV	}
+{  56 @UCRoman LVI	}
+{  57 @UCRoman LVII	}
+{  58 @UCRoman LVIII	}
+{  59 @UCRoman LIX	}
+{  60 @UCRoman LX	}
+{  61 @UCRoman LXI	}
+{  62 @UCRoman LXII	}
+{  63 @UCRoman LXIII	}
+{  64 @UCRoman LXIV	}
+{  65 @UCRoman LXV	}
+{  66 @UCRoman LXVI	}
+{  67 @UCRoman LXVII	}
+{  68 @UCRoman LXVIII	}
+{  69 @UCRoman LXIX	}
+{  70 @UCRoman LXX	}
+{  71 @UCRoman LXXI	}
+{  72 @UCRoman LXXII	}
+{  73 @UCRoman LXXIII	}
+{  74 @UCRoman LXXIV	}
+{  75 @UCRoman LXXV	}
+{  76 @UCRoman LXXVI	}
+{  77 @UCRoman LXXVII	}
+{  78 @UCRoman LXXVIII	}
+{  79 @UCRoman LXXIX	}
+{  80 @UCRoman LXXX	}
+{  81 @UCRoman LXXXI	}
+{  82 @UCRoman LXXXII	}
+{  83 @UCRoman LXXXIII	}
+{  84 @UCRoman LXXXIV	}
+{  85 @UCRoman LXXXV	}
+{  86 @UCRoman LXXXVI	}
+{  87 @UCRoman LXXXVII	}
+{  88 @UCRoman LXXXVIII	}
+{  89 @UCRoman LXXXIX	}
+{  90 @UCRoman XC	}
+{  91 @UCRoman XCI	}
+{  92 @UCRoman XCII	}
+{  93 @UCRoman XCIII	}
+{  94 @UCRoman XCIV	}
+{  95 @UCRoman XCV	}
+{  96 @UCRoman XCVI	}
+{  97 @UCRoman XCVII	}
+{  98 @UCRoman XCVIII	}
+{  99 @UCRoman XCIX	}
+{ 100 @UCRoman CC	}
+{ 101 @UCRoman CI	}
+{ 102 @UCRoman CII	}
+{ 103 @UCRoman CIII	}
+{ 104 @UCRoman CIV	}
+{ 105 @UCRoman CV	}
+{ 106 @UCRoman CVI	}
+{ 107 @UCRoman CVII	}
+{ 108 @UCRoman CVIII	}
+{ 109 @UCRoman CIX	}
+{ 110 @UCRoman CX	}
+{ 111 @UCRoman CXI	}
+{ 112 @UCRoman CXII	}
+{ 113 @UCRoman CXIII	}
+{ 114 @UCRoman CXIV	}
+{ 115 @UCRoman CXV	}
+{ 116 @UCRoman CXVI	}
+{ 117 @UCRoman CXVII	}
+{ 118 @UCRoman CXVIII	}
+{ 119 @UCRoman CXIX	}
+{ 120 @UCRoman CXX	}
+{ 121 @UCRoman CXXI	}
+{ 122 @UCRoman CXXII	}
+{ 123 @UCRoman CXXIII	}
+{ 124 @UCRoman CXXIV	}
+{ 125 @UCRoman CXXV	}
+{ 126 @UCRoman CXXVI	}
+{ 127 @UCRoman CXXVII	}
+{ 128 @UCRoman CXXVIII	}
+{ 129 @UCRoman CXXIX	}
+{ 130 @UCRoman CXXX	}
+{ 131 @UCRoman CXXXI	}
+{ 132 @UCRoman CXXXII	}
+{ 133 @UCRoman CXXXIII	}
+{ 134 @UCRoman CXXXIV	}
+{ 135 @UCRoman CXXXV	}
+{ 136 @UCRoman CXXXVI	}
+{ 137 @UCRoman CXXXVII	}
+{ 138 @UCRoman CXXXVIII	}
+{ 139 @UCRoman CXXXIX	}
+{ 140 @UCRoman CXL	}
+{ 141 @UCRoman CXLI	}
+{ 142 @UCRoman CXLII	}
+{ 143 @UCRoman CXLIII	}
+{ 144 @UCRoman CXLIV	}
+{ 145 @UCRoman CXLV	}
+{ 146 @UCRoman CXLVI	}
+{ 147 @UCRoman CXLVII	}
+{ 148 @UCRoman CXLVIII	}
+{ 149 @UCRoman CXLIX	}
+{ 150 @UCRoman CL	}
+{ 151 @UCRoman CLI	}
+{ 152 @UCRoman CLII	}
+{ 153 @UCRoman CLIII	}
+{ 154 @UCRoman CLIV	}
+{ 155 @UCRoman CLV	}
+{ 156 @UCRoman CLVI	}
+{ 157 @UCRoman CLVII	}
+{ 158 @UCRoman CLVIII	}
+{ 159 @UCRoman CLIX	}
+{ 160 @UCRoman CLX	}
+{ 161 @UCRoman CLXI	}
+{ 162 @UCRoman CLXII	}
+{ 163 @UCRoman CLXIII	}
+{ 164 @UCRoman CLXIV	}
+{ 165 @UCRoman CLXV	}
+{ 166 @UCRoman CLXVI	}
+{ 167 @UCRoman CLXVII	}
+{ 168 @UCRoman CLXVIII	}
+{ 169 @UCRoman CLXIX	}
+{ 170 @UCRoman CLXX	}
+{ 171 @UCRoman CLXXI	}
+{ 172 @UCRoman CLXXII	}
+{ 173 @UCRoman CLXXIII	}
+{ 174 @UCRoman CLXXIV	}
+{ 175 @UCRoman CLXXV	}
+{ 176 @UCRoman CLXXVI	}
+{ 177 @UCRoman CLXXVII	}
+{ 178 @UCRoman CLXXVIII	}
+{ 179 @UCRoman CLXXIX	}
+{ 180 @UCRoman CLXXX	}
+{ 181 @UCRoman CLXXXI	}
+{ 182 @UCRoman CLXXXII	}
+{ 183 @UCRoman CLXXXIII	}
+{ 184 @UCRoman CLXXXIV	}
+{ 185 @UCRoman CLXXXV	}
+{ 186 @UCRoman CLXXXVI	}
+{ 187 @UCRoman CLXXXVII	}
+{ 188 @UCRoman CLXXXVIII}
+{ 189 @UCRoman CLXXXIX	}
+{ 190 @UCRoman CXC	}
+{ 191 @UCRoman CXCI	}
+{ 192 @UCRoman CXCII	}
+{ 193 @UCRoman CXCIII	}
+{ 194 @UCRoman CXCIV	}
+{ 195 @UCRoman CXCV	}
+{ 196 @UCRoman CXCVI	}
+{ 197 @UCRoman CXCVII	}
+{ 198 @UCRoman CXCVIII	}
+{ 199 @UCRoman CXCIX	}
+{ 200 @UCRoman CC	}
+
+
+{  ?? @Alpha ??		}
+{   1 @Alpha a		}
+{   2 @Alpha b		}
+{   3 @Alpha c		}
+{   4 @Alpha d		}
+{   5 @Alpha e		}
+{   6 @Alpha f		}
+{   7 @Alpha g		}
+{   8 @Alpha h		}
+{   9 @Alpha i		}
+{  10 @Alpha j		}
+{  11 @Alpha k		}
+{  12 @Alpha l		}
+{  13 @Alpha m		}
+{  14 @Alpha n		}
+{  15 @Alpha o		}
+{  16 @Alpha p		}
+{  17 @Alpha q		}
+{  18 @Alpha r		}
+{  19 @Alpha s		}
+{  20 @Alpha t		}
+{  21 @Alpha u		}
+{  22 @Alpha v		}
+{  23 @Alpha w		}
+{  24 @Alpha x		}
+{  25 @Alpha y		}
+{  26 @Alpha z		}
+
+{ 27 @Alpha @CurrLang @Case {
+    Czech	@Yield { ?? }
+    Danish	@Yield { @Char ae }
+    English	@Yield { ?? }
+    EnglishUK	@Yield { ?? }
+    Dutch	@Yield { ?? }
+    Finnish	@Yield { @Char aring }
+    French	@Yield { @Char ae }
+    German	@Yield { ?? }
+    Hungarian	@Yield { ?? }
+    Italian	@Yield { @Char ae }
+    Norwegian	@Yield { @Char ae }
+    Polish	@Yield { ?? }
+    Russian	@Yield { ?? }
+    Slovenian   @Yield { ?? }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { @Char aring }
+} }
+
+{ 28 @Alpha @CurrLang @Case {
+    Czech	@Yield { ?? }
+    Danish	@Yield { @Char oslash }
+    Dutch	@Yield { ?? }
+    English	@Yield { ?? }
+    EnglishUK	@Yield { ?? }
+    Finnish	@Yield { @Char adieresis }
+    French	@Yield { ?? }
+    German	@Yield { ?? }
+    Hungarian	@Yield { ?? }
+    Italian	@Yield { ?? }
+    Norwegian	@Yield { @Char oslash }
+    Polish	@Yield { ?? }
+    Russian	@Yield { ?? }
+    Slovenian   @Yield { ?? }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { @Char adieresis }
+} }
+
+{ 29 @Alpha @CurrLang @Case {
+    Czech	@Yield { ?? }
+    Danish	@Yield { @Char aring }
+    Dutch	@Yield { ?? }
+    English	@Yield { ?? }
+    EnglishUK	@Yield { ?? }
+    Finnish	@Yield { @Char odieresis }
+    French	@Yield { ?? }
+    German	@Yield { ?? }
+    Hungarian	@Yield { ?? }
+    Italian	@Yield { ?? }
+    Norwegian	@Yield { @Char aring }
+    Polish	@Yield { ?? }
+    Russian	@Yield { ?? }
+    Slovenian   @Yield { ?? }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { @Char odieresis }
+} }
+
+{  ?? @UCAlpha ??	}
+{   1 @UCAlpha A	}
+{   2 @UCAlpha B	}
+{   3 @UCAlpha C	}
+{   4 @UCAlpha D	}
+{   5 @UCAlpha E	}
+{   6 @UCAlpha F	}
+{   7 @UCAlpha G	}
+{   8 @UCAlpha H	}
+{   9 @UCAlpha I	}
+{  10 @UCAlpha J	}
+{  11 @UCAlpha K	}
+{  12 @UCAlpha L	}
+{  13 @UCAlpha M	}
+{  14 @UCAlpha N	}
+{  15 @UCAlpha O	}
+{  16 @UCAlpha P	}
+{  17 @UCAlpha Q	}
+{  18 @UCAlpha R	}
+{  19 @UCAlpha S	}
+{  20 @UCAlpha T	}
+{  21 @UCAlpha U	}
+{  22 @UCAlpha V	}
+{  23 @UCAlpha W	}
+{  24 @UCAlpha X	}
+{  25 @UCAlpha Y	}
+{  26 @UCAlpha Z	}
+
+{ 27 @UCAlpha @CurrLang @Case {
+    Czech	@Yield { ?? }
+    Danish	@Yield { @Char AE }
+    Dutch	@Yield { ?? }
+    English	@Yield { ?? }
+    EnglishUK	@Yield { ?? }
+    Finnish	@Yield { @Char Aring }
+    French	@Yield { @Char AE }
+    German	@Yield { ?? }
+    Hungarian	@Yield { ?? }
+    Italian	@Yield { @Char AE }
+    Norwegian	@Yield { @Char AE }
+    Polish	@Yield { ?? }
+    Russian	@Yield { ?? }
+    Slovenian   @Yield { ?? }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { @Char Aring }
+} }
+
+{ 28 @UCAlpha @CurrLang @Case {
+    Czech	@Yield { ?? }
+    Danish	@Yield { @Char Oslash }
+    Dutch	@Yield { ?? }
+    English	@Yield { ?? }
+    EnglishUK	@Yield { ?? }
+    Finnish	@Yield { @Char Adieresis }
+    French	@Yield { ?? }
+    German	@Yield { ?? }
+    Hungarian	@Yield { ?? }
+    Italian	@Yield { ?? }
+    Norwegian	@Yield { @Char Oslash }
+    Polish	@Yield { ?? }
+    Russian	@Yield { ?? }
+    Slovenian   @Yield { ?? }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { @Char Adieresis }
+} }
+
+{ 29 @UCAlpha @CurrLang @Case {
+    Czech	@Yield { ?? }
+    Danish	@Yield { @Char Aring }
+    Dutch	@Yield { ?? }
+    English	@Yield { ?? }
+    EnglishUK	@Yield { ?? }
+    Finnish	@Yield { @Char Odieresis }
+    French	@Yield { ?? }
+    German	@Yield { ?? }
+    Hungarian	@Yield { ?? }
+    Italian	@Yield { ?? }
+    Norwegian	@Yield { @Char Aring }
+    Polish	@Yield { ?? }
+    Russian	@Yield { ?? }
+    Slovenian   @Yield { ?? }
+    Spanish	@Yield { ?? }
+    Swedish	@Yield { @Char Odieresis }
+} }
+
+
+{ 1 @Months @CurrLang @Case {
+    Czech	@Yield { leden }
+    Danish	@Yield { januar }
+    Dutch       @Yield { januari }
+    English	@Yield { January }
+    EnglishUK	@Yield { January }
+    Finnish	@Yield { tammikuu }
+    French	@Yield { janvier }
+    German	@Yield { Januar }
+    Hungarian	@Yield { janu{@Char aacute}r }
+    Italian	@Yield { gennaio }
+    Norwegian	@Yield { januar }
+    Polish	@Yield { stycze{@Char nacute} }
+    Russian	@Yield { "\321\316\327\301\322\321" }
+    Slovenian   @Yield { januar }
+    Spanish	@Yield { Enero }
+    Swedish	@Yield { januari }
+} }
+
+{ 2 @Months @CurrLang @Case {
+    Czech	@Yield { {@Char uacute}nor }
+    Danish	@Yield { februar }
+    Dutch       @Yield { februari }
+    English	@Yield { February }
+    EnglishUK	@Yield { February }
+    Finnish	@Yield { helmikuu }
+    French	@Yield { f{@Char eacute}vrier }
+    German	@Yield { Februar }
+    Hungarian	@Yield { febru{@Char aacute}r }
+    Italian	@Yield { febbraio }
+    Norwegian	@Yield { februar }
+    Polish	@Yield { luty }
+    Russian	@Yield { "\306\305\327\322\301\314\321" }
+    Slovenian   @Yield { februar }
+    Spanish	@Yield { Febrero }
+    Swedish	@Yield { februari }
+} }
+
+{ 3 @Months @CurrLang @Case {
+    Czech	@Yield { b{@Char rcaron}ezen }
+    Danish	@Yield { marts }
+    Dutch       @Yield { maart }
+    English	@Yield { March }
+    EnglishUK	@Yield { March }
+    Finnish	@Yield { maaliskuu }
+    French	@Yield { mars }
+    German	@Yield { M{@Char adieresis}rz }
+    Hungarian	@Yield { m{@Char aacute}rcius }
+    Italian	@Yield { marzo }
+    Norwegian	@Yield { mars }
+    Polish	@Yield { marzec }
+    Russian	@Yield { "\315\301\322\324\301" }
+    Slovenian   @Yield { marec }
+    Spanish	@Yield { Marzo }
+    Swedish	@Yield { mars }
+} }
+
+{ 4 @Months @CurrLang @Case {
+    Czech	@Yield { duben }
+    Danish	@Yield { april }
+    Dutch       @Yield { april }
+    English	@Yield { April }
+    EnglishUK	@Yield { April }
+    Finnish	@Yield { huhtikuu }
+    French	@Yield { avril }
+    German	@Yield { April }
+    Hungarian	@Yield { {@Char aacute}prilis }
+    Italian	@Yield { aprile }
+    Norwegian	@Yield { april }
+    Polish	@Yield { kwiecie{@Char nacute} }
+    Russian	@Yield { "\301\320\322\305\314\321" }
+    Slovenian   @Yield { april }
+    Spanish	@Yield { Abril }
+    Swedish	@Yield { april }
+} }
+
+{ 5 @Months @CurrLang @Case {
+    Czech	@Yield { kv{@Char ecaron}ten }
+    Danish	@Yield { maj }
+    Dutch       @Yield { mei }
+    English	@Yield { May }
+    EnglishUK	@Yield { May }
+    Finnish	@Yield { toukokuu }
+    French	@Yield { mai }
+    German	@Yield { Mai }
+    Hungarian	@Yield { m{@Char aacute}jus }
+    Italian	@Yield { maggio }
+    Norwegian	@Yield { mai }
+    Polish	@Yield { maj }
+    Russian	@Yield { "\315\301\321" }
+    Slovenian   @Yield { maj }
+    Spanish	@Yield { Mayo }
+    Swedish	@Yield { maj }
+} }
+
+{ 6 @Months @CurrLang @Case {
+    Czech	@Yield { {@Char ccaron}erven }
+    Danish	@Yield { juni }
+    Dutch       @Yield { juni }
+    English	@Yield { June }
+    EnglishUK	@Yield { June }
+    Finnish	@Yield { kes{@Char adieresis}kuu }
+    French	@Yield { juin }
+    German	@Yield { Juni }
+    Hungarian	@Yield { j{@Char uacute}nius }
+    Italian	@Yield { giugno }
+    Norwegian	@Yield { juni }
+    Polish	@Yield { czerwiec }
+    Russian	@Yield { "\311\300\316\321" }
+    Slovenian   @Yield { junij }
+    Spanish	@Yield { Junio }
+    Swedish	@Yield { juni }
+} }
+
+
+{ 7 @Months @CurrLang @Case {
+    Czech	@Yield { {@Char ccaron}ervenec }
+    Danish	@Yield { juli }
+    Dutch       @Yield { juli }
+    English	@Yield { July }
+    EnglishUK	@Yield { July }
+    Finnish	@Yield { hein{@Char adieresis}kuu }
+    French	@Yield { juillet }
+    German	@Yield { Juli }
+    Hungarian	@Yield { j{@Char uacute}lius }
+    Italian	@Yield { luglio }
+    Norwegian	@Yield { juli }
+    Polish	@Yield { lipiec }
+    Russian	@Yield { "\311\300\314\321" }
+    Slovenian   @Yield { julij }
+    Spanish	@Yield { Julio }
+    Swedish	@Yield { juli }
+} }
+
+{ 8 @Months @CurrLang @Case {
+    Czech	@Yield { srpen }
+    Danish	@Yield { august }
+    Dutch       @Yield { augustus }
+    English	@Yield { August }
+    EnglishUK	@Yield { August }
+    Finnish	@Yield { elokuu }
+    French	@Yield { ao{@Char ucircumflex}t }
+    German	@Yield { August }
+    Hungarian	@Yield { augusztus }
+    Italian	@Yield { agosto }
+    Norwegian	@Yield { august }
+    Polish	@Yield { sierpie{@Char nacute} }
+    Russian	@Yield { "\301\327\307\325\323\324\301" }
+    Slovenian   @Yield { avgust }
+    Spanish	@Yield { Agosto }
+    Swedish	@Yield { augusti }
+} }
+
+{ 9 @Months @CurrLang @Case {
+    Czech	@Yield { z{@Char aacute}{@Char rcaron}{@Char iacute} }
+    Danish	@Yield { september }
+    Dutch       @Yield { september }
+    English	@Yield { September }
+    EnglishUK	@Yield { September }
+    Finnish	@Yield { syyskuu }
+    French	@Yield { septembre }
+    German	@Yield { September }
+    Hungarian	@Yield { szeptember }
+    Italian	@Yield { settembre }
+    Norwegian	@Yield { september }
+    Polish	@Yield { wrzesie{@Char nacute} }
+    Russian	@Yield { "\323\305\316\324\321\302\322\321" }
+    Slovenian   @Yield { september }
+    Spanish	@Yield { Septiembre }
+    Swedish	@Yield { september }
+} }
+
+{ 10 @Months @CurrLang @Case {
+    Czech	@Yield { {@Char rcaron}{@Char iacute}jen }
+    Danish	@Yield { oktober }
+    Dutch       @Yield { oktober }
+    English	@Yield { October }
+    EnglishUK	@Yield { October }
+    Finnish	@Yield { lokakuu }
+    French	@Yield { octobre }
+    German	@Yield { Oktober }
+    Hungarian	@Yield { okt{@Char oacute}ber }
+    Italian	@Yield { ottobre }
+    Norwegian	@Yield { oktober }
+    Polish	@Yield { pa{@Char zacute}dziernik }
+    Russian	@Yield { "\317\313\324\321\302\322\321" }
+    Slovenian   @Yield { oktober }
+    Spanish	@Yield { Octubre }
+    Swedish	@Yield { oktober }
+} }
+
+{ 11 @Months @CurrLang @Case {
+    Czech	@Yield { listopad }
+    Danish	@Yield { november }
+    Dutch       @Yield { november }
+    English	@Yield { November }
+    EnglishUK	@Yield { November }
+    Finnish	@Yield { marraskuu }
+    French	@Yield { novembre }
+    German	@Yield { November }
+    Hungarian	@Yield { november }
+    Italian	@Yield { novembre }
+    Norwegian	@Yield { november }
+    Polish	@Yield { listopad }
+    Russian	@Yield { "\316\317\321\302\322\321" }
+    Slovenian   @Yield { november }
+    Spanish	@Yield { Noviembre }
+    Swedish	@Yield { november }
+} }
+
+{ 12 @Months @CurrLang @Case {
+    Czech	@Yield { prosinec }
+    Danish	@Yield { december }
+    Dutch       @Yield { december }
+    English	@Yield { December }
+    EnglishUK	@Yield { December }
+    Finnish	@Yield { joulukuu }
+    French	@Yield { d{@Char eacute}cembre }
+    German	@Yield { Dezember }
+    Hungarian	@Yield { december }
+    Italian	@Yield { dicembre }
+    Norwegian	@Yield { desember }
+    Polish	@Yield { grudzie{@Char nacute} }
+    Russian	@Yield { "\304\305\313\301\302\322\321" }
+    Slovenian   @Yield { december }
+    Spanish	@Yield { Diciembre }
+    Swedish	@Yield { december }
+} }
+
+
+{ 1 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { leden }
+    Danish	@Yield { jan }
+    Dutch       @Yield { jan }
+    English	@Yield { Jan }
+    EnglishUK	@Yield { Jan }
+    Finnish	@Yield { tammikuu }
+    French	@Yield { jan }
+    German	@Yield { Jan }
+    Hungarian	@Yield { jan }
+    Italian	@Yield { gen }
+    Norwegian	@Yield { jan }
+    Polish	@Yield { sty }
+    Russian	@Yield { "\321\316\327" }
+    Slovenian   @Yield { jan }
+    Spanish	@Yield { Ene }
+    Swedish	@Yield { jan }
+} }
+
+{ 2 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { {@Char uacute}nor }
+    Danish	@Yield { feb }
+    Dutch       @Yield { feb }
+    English	@Yield { Feb }
+    EnglishUK	@Yield { Feb }
+    Finnish	@Yield { helmikuu }
+    French	@Yield { f{@Char eacute}v }
+    German	@Yield { Feb }
+    Hungarian	@Yield { feb }
+    Italian	@Yield { feb }
+    Norwegian	@Yield { feb }
+    Polish	@Yield { luty }
+    Russian	@Yield { "\306\305\327" }
+    Slovenian   @Yield { feb }
+    Spanish	@Yield { Feb }
+    Swedish	@Yield { feb }
+} }
+
+{ 3 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { b{@Char rcaron}ezen }
+    Danish	@Yield { mar }
+    Dutch       @Yield { mrt }
+    English	@Yield { Mar }
+    EnglishUK	@Yield { Mar }
+    Finnish	@Yield { maaliskuu }
+    French	@Yield { mar }
+    German	@Yield { M{@Char adieresis}r }
+    Hungarian	@Yield { m{@Char aacute}rc }
+    Italian	@Yield { mar }
+    Norwegian	@Yield { mar }
+    Polish	@Yield { marz }
+    Russian	@Yield { "\315\301\322" }
+    Slovenian   @Yield { mar }
+    Spanish	@Yield { Mar }
+    Swedish	@Yield { mar }
+} }
+
+{ 4 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { duben }
+    Danish	@Yield { apr }
+    Dutch       @Yield { apr }
+    English	@Yield { Apr }
+    EnglishUK	@Yield { Apr }
+    Finnish	@Yield { huhtikuu }
+    French	@Yield { avr }
+    German	@Yield { Apr }
+    Hungarian	@Yield { {@Char aacute}pr }
+    Italian	@Yield { apr }
+    Norwegian	@Yield { apr }
+    Polish	@Yield { kwie }
+    Russian	@Yield { "\301\320\322" }
+    Slovenian   @Yield { apr }
+    Spanish	@Yield { Abr }
+    Swedish	@Yield { apr }
+} }
+
+{ 5 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { kv{@Char ecaron}ten }
+    Danish	@Yield { maj }
+    Dutch       @Yield { mei }
+    English	@Yield { May }
+    EnglishUK	@Yield { May }
+    Finnish	@Yield { toukokuu }
+    French	@Yield { mai }
+    German	@Yield { Mai }
+    Hungarian	@Yield { m{@Char aacute}j }
+    Italian	@Yield { mag }
+    Norwegian	@Yield { mai }
+    Polish	@Yield { maj }
+    Russian	@Yield { "\315\301\321" }
+    Slovenian   @Yield { maj }
+    Spanish	@Yield { May }
+    Swedish	@Yield { maj }
+} }
+
+{ 6 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { {@Char ccaron}erven }
+    Danish	@Yield { jun }
+    Dutch       @Yield { jun }
+    English	@Yield { Jun }
+    EnglishUK	@Yield { Jun }
+    Finnish	@Yield { kes{@Char adieresis}kuu }
+    French	@Yield { juin }
+    German	@Yield { Jun }
+    Hungarian	@Yield { j{@Char uacute}n }
+    Italian	@Yield { giu }
+    Norwegian	@Yield { jun }
+    Polish	@Yield { czer }
+    Russian	@Yield { "\311\300\316\321" }
+    Slovenian   @Yield { jun }
+    Spanish	@Yield { Jun }
+    Swedish	@Yield { jun }
+} }
+
+{ 7 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { {@Char ccaron}ervenec }
+    Danish	@Yield { jul }
+    Dutch       @Yield { jul }
+    English	@Yield { Jul }
+    EnglishUK	@Yield { Jul }
+    Finnish	@Yield { hein{@Char adieresis}kuu }
+    French	@Yield { juil }
+    German	@Yield { Jul }
+    Hungarian	@Yield { j{@Char uacute}l }
+    Italian	@Yield { lug }
+    Norwegian	@Yield { jul }
+    Polish	@Yield { lip }
+    Russian	@Yield { "\311\300\314\321" }
+    Slovenian   @Yield { jul }
+    Spanish	@Yield { Jul }
+    Swedish	@Yield { jul }
+} }
+
+{ 8 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { srpen }
+    Danish	@Yield { aug }
+    Dutch       @Yield { aug }
+    English	@Yield { Aug }
+    EnglishUK	@Yield { Aug }
+    Finnish	@Yield { elokuu }
+    French	@Yield { ao{@Char ucircumflex} }
+    German	@Yield { Aug }
+    Hungarian	@Yield { aug }
+    Italian	@Yield { ago }
+    Norwegian	@Yield { aug }
+    Polish	@Yield { sier }
+    Russian	@Yield { "\301\327\307" }
+    Slovenian   @Yield { avg }
+    Spanish	@Yield { Ago }
+    Swedish	@Yield { aug }
+} }
+
+{ 9 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { z{@Char aacute}{@Char rcaron}{@Char iacute} }
+    Danish	@Yield { sep }
+    Dutch       @Yield { sep }
+    English	@Yield { Sep }
+    EnglishUK	@Yield { Sep }
+    Finnish	@Yield { syyskuu }
+    French	@Yield { sep }
+    German	@Yield { Sep }
+    Hungarian	@Yield { szept }
+    Italian	@Yield { set }
+    Norwegian	@Yield { sep }
+    Polish	@Yield { wrze }
+    Russian	@Yield { "\323\305\316" }
+    Slovenian   @Yield { sep }
+    Spanish	@Yield { Sep }
+    Swedish	@Yield { sep }
+} }
+
+{ 10 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { {@Char rcaron}{@Char iacute}jen }
+    Danish	@Yield { okt }
+    Dutch       @Yield { okt }
+    English	@Yield { Oct }
+    EnglishUK	@Yield { Oct }
+    Finnish	@Yield { lokakuu }
+    French	@Yield { oct }
+    German	@Yield { Okt }
+    Hungarian	@Yield { okt }
+    Italian	@Yield { ott }
+    Norwegian	@Yield { okt }
+    Polish	@Yield { pa{@Char zacute} }
+    Russian	@Yield { "\317\313\324" }
+    Slovenian   @Yield { okt }
+    Spanish	@Yield { Oct }
+    Swedish	@Yield { okt }
+} }
+
+{ 11 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { listopad }
+    Danish	@Yield { nov }
+    Dutch       @Yield { nov }
+    English	@Yield { Nov }
+    EnglishUK	@Yield { Nov }
+    Finnish	@Yield { marraskuu }
+    French	@Yield { nov }
+    German	@Yield { Nov }
+    Hungarian	@Yield { nov }
+    Italian	@Yield { nov }
+    Norwegian	@Yield { nov }
+    Polish	@Yield { list }
+    Russian	@Yield { "\316\317\321" }
+    Slovenian   @Yield { nov }
+    Spanish	@Yield { Nov }
+    Swedish	@Yield { nov }
+} }
+
+{ 12 @ShortMonths @CurrLang @Case {
+    Czech	@Yield { prosinec }
+    Danish	@Yield { dec }
+    Dutch       @Yield { dec }
+    English	@Yield { Dec }
+    EnglishUK	@Yield { Dec }
+    Finnish	@Yield { joulukuu }
+    French	@Yield { d{@Char eacute}c }
+    German	@Yield { Dez }
+    Hungarian	@Yield { dec }
+    Italian	@Yield { dic }
+    Norwegian	@Yield { des }
+    Polish	@Yield { gru }
+    Russian	@Yield { "\304\305\313" }
+    Slovenian   @Yield { dec }
+    Spanish	@Yield { Dic }
+    Swedish	@Yield { dec }
+} }
+
+
+{ 1 @WeekDays @CurrLang @Case {
+    Czech	@Yield { ned{@Char ecaron}le }
+    Danish	@Yield { s{@Char oslash}ndag }
+    Dutch       @Yield { zondag }
+    English	@Yield { Sunday }
+    EnglishUK	@Yield { Sunday }
+    Finnish	@Yield { sunnuntai }
+    French	@Yield { dimanche }
+    German	@Yield { Sonntag }
+    Hungarian	@Yield { h{@Char eacute}tf{@Char odblacute} }
+    Italian	@Yield { domenica }
+    Norwegian	@Yield { s{@Char oslash}ndag }
+    Polish	@Yield { niedziela }
+    Russian	@Yield { "\327\317\323\313\322\305\323\305\316\330\305" }
+    Slovenian   @Yield { nedelja }
+    Spanish	@Yield { Domingo }
+    Swedish	@Yield { s{@Char odieresis}ndag }
+} }
+
+{ 2 @WeekDays @CurrLang @Case {
+    Czech	@Yield { pon{@Char ecaron}l{@Char iacute} }
+    Danish	@Yield { mandag }
+    Dutch       @Yield { maandag }
+    English	@Yield { Monday }
+    EnglishUK	@Yield { Monday }
+    Finnish	@Yield { maanantai }
+    French	@Yield { lundi }
+    German	@Yield { Montag }
+    Hungarian	@Yield { kedd }
+    Italian	@Yield { luned{@Char igrave} }
+    Norwegian	@Yield { mandag }
+    Polish	@Yield { poniedzia{@Char lslash}ek }
+    Russian	@Yield { "\320\317\316\305\304\305\314\330\316\311\313" }
+    Slovenian   @Yield { ponedeljek }
+    Spanish	@Yield { Lunes }
+    Swedish	@Yield { m{@Char aring}ndag }
+} }
+
+{ 3 @WeekDays @CurrLang @Case {
+    Czech	@Yield { {@Char uacute}ter{@Char yacute} }
+    Danish	@Yield { tirsdag }
+    Dutch       @Yield { dinsdag }
+    English	@Yield { Tuesday }
+    EnglishUK	@Yield { Tuesday }
+    Finnish	@Yield { tiistai }
+    French	@Yield { mardi }
+    German	@Yield { Dienstag }
+    Hungarian	@Yield { szerda }
+    Italian	@Yield { marted{@Char igrave} }
+    Norwegian	@Yield { tirsdag }
+    Polish	@Yield { wtorek }
+    Russian	@Yield { "\327\324\317\322\316\311\313" }
+    Slovenian   @Yield { torek }
+    Spanish	@Yield { Martes }
+    Swedish	@Yield { tisdag }
+} }
+
+{ 4 @WeekDays @CurrLang @Case {
+    Czech	@Yield { st{@Char rcaron}eda }
+    Danish	@Yield { onsdag }
+    Dutch       @Yield { woensdag }
+    English	@Yield { Wednesday }
+    EnglishUK	@Yield { Wednesday }
+    Finnish	@Yield { keskiviikko }
+    French	@Yield { mercredi }
+    German	@Yield { Mittwoch }
+    Hungarian	@Yield { cs{@Char udieresis}t{@Char odieresis}rt{@Char odieresis} }
+    Italian	@Yield { mercoled{@Char igrave} }
+    Norwegian	@Yield { onsdag }
+    Polish	@Yield { {@Char sacute}roda }
+    Russian	@Yield { "\323\322\305\304\301" }
+    Slovenian   @Yield { sreda }
+    Spanish	@Yield { Mi{@Char eacute}rcoles }
+    Swedish	@Yield { onsdag }
+} }
+
+{ 5 @WeekDays @CurrLang @Case {
+    Czech	@Yield { {@Char ccaron}tvrtek }
+    Danish	@Yield { torsdag }
+    Dutch       @Yield { donderdag }
+    English	@Yield { Thursday }
+    EnglishUK	@Yield { Thursday }
+    Finnish	@Yield { torstai }
+    French	@Yield { jeudi }
+    German	@Yield { Donnerstag }
+    Hungarian	@Yield { p{@Char eacute}ntek }
+    Italian	@Yield { gioved{@Char igrave} }
+    Norwegian	@Yield { torsdag }
+    Polish	@Yield { czwartek }
+    Russian	@Yield { "\336\305\324\327\305\322\307" }
+    Slovenian   @Yield { {@Char ccaron}etrtek }
+    Spanish	@Yield { Jueves }
+    Swedish	@Yield { torsdag }
+} }
+
+{ 6 @WeekDays @CurrLang @Case {
+    Czech	@Yield { p{@Char aacute}tek }
+    Danish	@Yield { fredag }
+    Dutch       @Yield { vrijdag }
+    English	@Yield { Friday }
+    EnglishUK	@Yield { Friday }
+    Finnish	@Yield { perjantai }
+    French	@Yield { vendredi }
+    German	@Yield { Freitag }
+    Hungarian	@Yield { szombat }
+    Italian	@Yield { venerd{@Char igrave} }
+    Norwegian	@Yield { fredag }
+    Polish	@Yield { pi{@Char aogonek}tek }
+    Russian	@Yield { "\320\321\324\316\311\303\301" }
+    Slovenian   @Yield { petek }
+    Spanish	@Yield { Viernes }
+    Swedish	@Yield { fredag }
+} }
+
+{ 7 @WeekDays @CurrLang @Case {
+    Czech	@Yield { sobota }
+    Danish	@Yield { l{@Char oslash}rdag }
+    Dutch       @Yield { zaterdag }
+    English	@Yield { Saturday }
+    EnglishUK	@Yield { Saturday }
+    Finnish	@Yield { lauantai }
+    French	@Yield { samedi }
+    German	@Yield { Samstag }
+    Hungarian	@Yield { vas{@Char aacute}rnap }
+    Italian	@Yield { sabato }
+    Norwegian	@Yield { l{@Char oslash}rdag }
+    Polish	@Yield { sobota }
+    Russian	@Yield { "\323\325\302\302\317\324\301" }
+    Slovenian   @Yield { sobota }
+    Spanish	@Yield { S{@Char aacute}bado }
+    Swedish	@Yield { l{@Char odieresis}rdag }
+} }
+
+
+{ 1 @ShortWeekDays @CurrLang @Case {
+    Czech	@Yield { ne }
+    Danish	@Yield { s{@Char oslash}n }
+    Dutch       @Yield { zo }
+    English	@Yield { Sun }
+    EnglishUK	@Yield { Sun }
+    Finnish	@Yield { su }
+    French	@Yield { dim }
+    German	@Yield { So }
+    Hungarian	@Yield { H }
+    Italian	@Yield { dom }
+    Norwegian	@Yield { s{@Char oslash}n }
+    Polish	@Yield { niedz }
+    Russian	@Yield { "\327\323" }
+    Slovenian   @Yield { ned }
+    Spanish	@Yield { Dom }
+    Swedish	@Yield { s{@Char odieresis} }
+} }
+
+{ 2 @ShortWeekDays @CurrLang @Case {
+    Czech	@Yield { po }
+    Danish	@Yield { man }
+    Dutch       @Yield { ma }
+    English	@Yield { Mon }
+    EnglishUK	@Yield { Mon }
+    Finnish	@Yield { ma }
+    French	@Yield { lun }
+    German	@Yield { Mo }
+    Hungarian	@Yield { K }
+    Italian	@Yield { lun }
+    Norwegian	@Yield { man }
+    Polish	@Yield { pon }
+    Russian	@Yield { "\320\316" }
+    Slovenian   @Yield { pon }
+    Spanish	@Yield { Lun }
+    Swedish	@Yield { m{@Char aring} }
+} }
+
+{ 3 @ShortWeekDays @CurrLang @Case {
+    Czech	@Yield { {@Char uacute}t }
+    Danish	@Yield { tir }
+    Dutch       @Yield { di }
+    English	@Yield { Tue }
+    EnglishUK	@Yield { Tue }
+    Finnish	@Yield { ti }
+    French	@Yield { mar }
+    German	@Yield { Di }
+    Hungarian	@Yield { Sze }
+    Italian	@Yield { mar }
+    Norwegian	@Yield { tir }
+    Polish	@Yield { wto }
+    Russian	@Yield { "\327\324" }
+    Slovenian   @Yield { tor }
+    Spanish	@Yield { Mar }
+    Swedish	@Yield { ti }
+} }
+
+{ 4 @ShortWeekDays @CurrLang @Case {
+    Czech	@Yield { st }
+    Danish	@Yield { ons }
+    Dutch       @Yield { wo }
+    English	@Yield { Wed }
+    EnglishUK	@Yield { Wed }
+    Finnish	@Yield { ke }
+    French	@Yield { mer }
+    German	@Yield { Mi }
+    Hungarian	@Yield { Cs }
+    Italian	@Yield { mer }
+    Norwegian	@Yield { ons }
+    Polish	@Yield { {@Char sacute}ro }
+    Russian	@Yield { "\323\322" }
+    Slovenian   @Yield { sre }
+    Spanish	@Yield { Mie }
+    Swedish	@Yield { on }
+} }
+
+{ 5 @ShortWeekDays @CurrLang @Case {
+    Czech	@Yield { {@Char ccaron}t }
+    Danish	@Yield { tor }
+    Dutch       @Yield { do }
+    English	@Yield { Thu }
+    EnglishUK	@Yield { Thu }
+    Finnish	@Yield { to }
+    French	@Yield { jeu }
+    German	@Yield { Do }
+    Hungarian	@Yield { P }
+    Italian	@Yield { gio }
+    Norwegian	@Yield { tor }
+    Polish	@Yield { czw }
+    Russian	@Yield { "\336\324" }
+    Slovenian   @Yield { cet }
+    Spanish	@Yield { Jue }
+    Swedish	@Yield { to }
+} }
+
+{ 6 @ShortWeekDays @CurrLang @Case {
+    Czech	@Yield { p{@Char aacute} }
+    Danish	@Yield { fre }
+    Dutch       @Yield { vr }
+    English	@Yield { Fri }
+    EnglishUK	@Yield { Fri }
+    Finnish	@Yield { pe }
+    French	@Yield { ven }
+    German	@Yield { Fr }
+    Hungarian	@Yield { Szo }
+    Italian	@Yield { ven }
+    Norwegian	@Yield { fre }
+    Polish	@Yield { pi{@Char aogonek}t }
+    Russian	@Yield { "\320\324" }
+    Slovenian   @Yield { pet }
+    Spanish	@Yield { Vie }
+    Swedish	@Yield { fr }
+} }
+
+{ 7 @ShortWeekDays @CurrLang @Case {
+    Czech	@Yield { so }
+    Danish	@Yield { l{@Char oslash}r }
+    Dutch       @Yield { za }
+    English	@Yield { Sat }
+    EnglishUK	@Yield { Sat }
+    Finnish	@Yield { la }
+    French	@Yield { sam }
+    German	@Yield { Sa }
+    Hungarian	@Yield { V }
+    Italian	@Yield { sab }
+    Norwegian	@Yield { l{@Char oslash}r }
+    Polish	@Yield { sob }
+    Russian	@Yield { "\323\302" }
+    Slovenian   @Yield { sob }
+    Spanish	@Yield { Sab }
+    Swedish	@Yield { l{@Char odieresis} }
+} }
+
+
+{ 00 @TwelveHours 12 }
+{ 01 @TwelveHours  1 }
+{ 02 @TwelveHours  2 }
+{ 03 @TwelveHours  3 }
+{ 04 @TwelveHours  4 }
+{ 05 @TwelveHours  5 }
+{ 06 @TwelveHours  6 }
+{ 07 @TwelveHours  7 }
+{ 08 @TwelveHours  8 }
+{ 09 @TwelveHours  9 }
+{ 10 @TwelveHours 10 }
+{ 11 @TwelveHours 11 }
+{ 12 @TwelveHours 12 }
+{ 13 @TwelveHours  1 }
+{ 14 @TwelveHours  2 }
+{ 15 @TwelveHours  3 }
+{ 16 @TwelveHours  4 }
+{ 17 @TwelveHours  5 }
+{ 18 @TwelveHours  6 }
+{ 19 @TwelveHours  7 }
+{ 20 @TwelveHours  8 }
+{ 21 @TwelveHours  9 }
+{ 22 @TwelveHours 10 }
+{ 23 @TwelveHours 11 }
+
+
+{ 00 @ShortHours  0 }
+{ 01 @ShortHours  1 }
+{ 02 @ShortHours  2 }
+{ 03 @ShortHours  3 }
+{ 04 @ShortHours  4 }
+{ 05 @ShortHours  5 }
+{ 06 @ShortHours  6 }
+{ 07 @ShortHours  7 }
+{ 08 @ShortHours  8 }
+{ 09 @ShortHours  9 }
+{ 10 @ShortHours 10 }
+{ 11 @ShortHours 11 }
+{ 12 @ShortHours 12 }
+{ 13 @ShortHours 13 }
+{ 14 @ShortHours 14 }
+{ 15 @ShortHours 15 }
+{ 16 @ShortHours 16 }
+{ 17 @ShortHours 17 }
+{ 18 @ShortHours 18 }
+{ 19 @ShortHours 19 }
+{ 20 @ShortHours 20 }
+{ 21 @ShortHours 21 }
+{ 22 @ShortHours 22 }
+{ 23 @ShortHours 23 }
+
+
+{ 00 @MeriDiems @Word&&am }
+{ 01 @MeriDiems @Word&&am }
+{ 02 @MeriDiems @Word&&am }
+{ 03 @MeriDiems @Word&&am }
+{ 04 @MeriDiems @Word&&am }
+{ 05 @MeriDiems @Word&&am }
+{ 06 @MeriDiems @Word&&am }
+{ 07 @MeriDiems @Word&&am }
+{ 08 @MeriDiems @Word&&am }
+{ 09 @MeriDiems @Word&&am }
+{ 10 @MeriDiems @Word&&am }
+{ 11 @MeriDiems @Word&&am }
+{ 12 @MeriDiems @Word&&pm }
+{ 13 @MeriDiems @Word&&pm }
+{ 14 @MeriDiems @Word&&pm }
+{ 15 @MeriDiems @Word&&pm }
+{ 16 @MeriDiems @Word&&pm }
+{ 17 @MeriDiems @Word&&pm }
+{ 18 @MeriDiems @Word&&pm }
+{ 19 @MeriDiems @Word&&pm }
+{ 20 @MeriDiems @Word&&pm }
+{ 21 @MeriDiems @Word&&pm }
+{ 22 @MeriDiems @Word&&pm }
+{ 23 @MeriDiems @Word&&pm }
+
+
+{ 00 @ShortMeriDiems @Word&&shortam }
+{ 01 @ShortMeriDiems @Word&&shortam }
+{ 02 @ShortMeriDiems @Word&&shortam }
+{ 03 @ShortMeriDiems @Word&&shortam }
+{ 04 @ShortMeriDiems @Word&&shortam }
+{ 05 @ShortMeriDiems @Word&&shortam }
+{ 06 @ShortMeriDiems @Word&&shortam }
+{ 07 @ShortMeriDiems @Word&&shortam }
+{ 08 @ShortMeriDiems @Word&&shortam }
+{ 09 @ShortMeriDiems @Word&&shortam }
+{ 10 @ShortMeriDiems @Word&&shortam }
+{ 11 @ShortMeriDiems @Word&&shortam }
+{ 12 @ShortMeriDiems @Word&&shortpm }
+{ 13 @ShortMeriDiems @Word&&shortpm }
+{ 14 @ShortMeriDiems @Word&&shortpm }
+{ 15 @ShortMeriDiems @Word&&shortpm }
+{ 16 @ShortMeriDiems @Word&&shortpm }
+{ 17 @ShortMeriDiems @Word&&shortpm }
+{ 18 @ShortMeriDiems @Word&&shortpm }
+{ 19 @ShortMeriDiems @Word&&shortpm }
+{ 20 @ShortMeriDiems @Word&&shortpm }
+{ 21 @ShortMeriDiems @Word&&shortpm }
+{ 22 @ShortMeriDiems @Word&&shortpm }
+{ 23 @ShortMeriDiems @Word&&shortpm }
+
+
+{ date @DateTimeFormat @Value { @CurrLang @Case {
+    Czech	@Yield { @DayNum. @Month @Year			}
+    Danish	@Yield { @DayNum. @Month, @Year			}
+    Dutch	@Yield { @DayNum @Month @Year			}
+    English	@Yield { @DayNum @Month, @Year			}
+    EnglishUK	@Yield { @DayNum @Month, @Year			}
+    Finnish	@Yield { @DayNum. @Month"ta" @Year		}
+    French	@Yield { @DayNum @Month @Year			}
+    German	@Yield { @DayNum. @Month @Year			}
+    Hungarian	@Yield { @Year. @Month @DayNum.			}
+    Italian	@Yield { @DayNum @Month @Year			}
+    Norwegian   @Yield { @DayNum @Month, @Year			}
+    Polish	@Yield { @DayNum @Month @Year			}
+    Russian	@Yield { @DayNum @Month @Year			}
+    Slovenian   @Yield { @DayNum @Month @Year			}
+    Spanish	@Yield { @DayNum "de" @Month, @Year		}
+    Swedish	@Yield { @DayNum @Month @Year			}
+  } }
+}
+
+{ time @DateTimeFormat @Value { @CurrLang @Case {
+    Czech	@Yield { @ShortHour "hodin" @Minute "minut"	}
+    Danish	@Yield { @ShortHour.@Minute			}
+    Dutch	@Yield { @ShortHour.@Minute			}
+    English	@Yield { @TwelveHour.@Minute @MeriDiem		}
+    EnglishUK	@Yield { @TwelveHour.@Minute @MeriDiem		}
+    Finnish	@Yield { @ShortHour.@Minute			}
+    French	@Yield { @ShortHour"h"@Minute			}
+    German	@Yield { @ShortHour.@Minute			}
+    Hungarian	@Yield { @ShortHour {@Char oacute}ra @Minute perc }
+    Italian	@Yield { @ShortHour.@Minute			}
+    Norwegian   @Yield { @ShortHour.@Minute 			}
+    Polish	@Yield { @ShortHour.@Minute			}
+    Russian	@Yield { @ShortHour.@Minute			}
+    Slovenian   @Yield { @ShortHour.@Minute			}
+    Spanish	@Yield { @ShortHour:@Minute 			}
+    Swedish	@Yield { @ShortHour.@Minute			}
+  } }
+}
+
+
diff --git a/doc/README b/doc/README
new file mode 100644
index 0000000..62f2260
--- /dev/null
+++ b/doc/README
@@ -0,0 +1,18 @@
+Directory lout/doc
+
+This directory contains directories holding the four documents
+that describe the Lout document formatting system:
+
+design	`The design and implementation of the Lout document
+	formatting language,' Software--Practice and Experience,
+	vol. 23, pp1001-1041 (September 1993)
+
+expert	An Expert's Guide to the Lout Document Formatting System
+
+slides	A Practical Introduction to the Lout Document Formatting
+	System (overhead transparencies)
+
+user	A User's Guide to the Lout Document Formatting System
+
+Jeffrey H. Kingston
+17 November 1997
diff --git a/doc/design/README b/doc/design/README
new file mode 100644
index 0000000..1e7a8af
--- /dev/null
+++ b/doc/design/README
@@ -0,0 +1,25 @@
+Directory lout/doc/design
+
+This directory contains the Lout source files
+for the report entitled `The design and
+implementation of the Lout document formatting
+language'  which appeared in Software--Practice
+and Experience, vol 23, pp1001-1041 (September
+1993).  To produce the report, type the command
+
+	lout all > outfile.ps
+
+in this directory.  This must be done three
+times to completely resolve all cross references,
+although the PostScript file outfile.ps is
+printable after the first run.  Auxiliary files
+with .li and .ld suffixes will be created in
+this directory.  A copy of the final outfile.ps
+is included.
+
+The second and third runs should produce no error
+messages (although changing the paper size might
+produce one or two benign ones).
+
+Jeffrey H. Kingston
+17 September 1999
diff --git a/doc/design/all b/doc/design/all
new file mode 100644
index 0000000..2755e5b
--- /dev/null
+++ b/doc/design/all
@@ -0,0 +1,58 @@
+@SysInclude { eq }
+@SysInclude { tab }
+@SysInclude { fig }
+@SysInclude { report }
+@SysDatabase @Reference { oldrefs }
+@Report
+    @Title { The Design and Implementation
+of the
+Lout Document Formatting Language }
+    @Author { Jeffrey H. Kingston }
+    @Institution { Basser Department of Computer Science,
+The University of Sydney 2006,
+Australia }
+    @DateLine { 27 January, 1993 }
+    @InitialLanguage { English }
+    @OptimizePages { Yes }
+    @AbstractTitle { SUMMARY }
+    @Abstract
+{
+Lout is a high-level language for document formatting, whose ease of use
+has permitted an unprecedented number of advanced features to be added
+quickly and reliably.  This paper charts the evolution of the design and
+implementation of Lout from conception in mid-1984 to public release in
+October 1991.  It includes extensive discussions of remaining problems
+and possible solutions.
+@DP
+{@B Keywords}  document formatting typesetting
+}
+
+//
+
+@Include { s1_0 }
+@Include { s2_0 }
+@Include { s2_1 }
+@Include { s2_2 }
+@Include { s2_3 }
+@Include { s2_4 }
+@Include { s2_5 }
+@Include { s2_9 }
+@Include { s3_0 }
+@Include { s3_1 }
+@Include { s3_2 }
+@Include { s3_3 }
+@Include { s3_4 }
+@Include { s3_9 }
+@Include { s4_0 }
+@Include { s5_0 }
+@Include { s5_1 }
+@Include { s5_2 }
+@Include { s5_3 }
+@Include { s5_4 }
+@Include { s5_5 }
+@Include { s5_9 }
+@Include { s6_0 }
+@Include { s6_1 }
+@Include { s6_2 }
+@Include { s6_9 }
+@Include { s7_0 }
diff --git a/doc/design/mydefs b/doc/design/mydefs
new file mode 100644
index 0000000..5473fbf
--- /dev/null
+++ b/doc/design/mydefs
@@ -0,0 +1,591 @@
+
+def @TeX { T{ /0.2fo E}X }
+
+def @Code
+    right x
+{   { Helvetica Base -1p } @Font lines @Break x
+}
+
+######################################################
+#                                                    #
+#  Nodes and trees.                                  #
+#                                                    #
+######################################################
+
+import @Fig
+def @FBox
+    named width  { 0.6c }
+    named height { 0.4c }
+    named margin { 0.1c }
+    right x
+{
+    @Box margin { margin }
+    {	width @Wide height @High
+	{ /0.5rt |0.5rt @OneCol @OneRow 0.8f @Font x
+	}
+    }
+}
+
+import @Fig
+def @FEllipse
+    named width  { 0.6c }
+    named height { 0.4c }
+    named margin { 0.1c }
+    right x
+{
+    @Ellipse margin { margin }
+    {	height @High
+	{ /0.5rt |0.5rt @OneCol @OneRow 0.8f @Font x
+	}
+    }
+}
+
+import @Fig
+def @FCircle
+    named width  { 0.4c }
+    named height { 0.4c }
+    named margin { 0.1c }
+    right x
+{
+    @Circle margin { margin }
+    {	width @Wide height @High
+	{ /0.5rt |0.5rt @OneCol @OneRow 0.8f @Font x
+	}
+    }
+}
+
+import @Fig
+def @JoinFigures
+    left A
+    named linestyle  { solid   }
+    named linewidth  { 0.5 pt  }
+    named linecap    { round   }
+    named dashlength { 0.15 cm }
+    named arrow      { noarrow }
+    named headstyle  { open    }
+    named headwidth  { 0.05 cm }
+    named headlength { 0.15 cm }
+    right B
+{
+    @Line
+	from       { {A"@CTR"} ++ {{A"@CTR"} @Angle {B"@CTR"} A"@CIRCUM"} }
+	to         { {B"@CTR"} ++ {{B"@CTR"} @Angle {A"@CTR"} B"@CIRCUM"} }
+	linestyle  { linestyle  }
+	linewidth  { linewidth  }
+	linecap    { linecap    }
+	dashlength { dashlength }
+	arrow      { arrow      }
+	headstyle  { headstyle  }
+	headwidth  { headwidth  }
+	headlength { headlength }
+    {}
+}
+
+import @Fig
+export @LeftSub @RightSub @FirstSub @NextSub @StubSub @Node
+def @Tree
+    named hmargin    { 0.2c    }
+    named vmargin    { 0.3c    }
+    named linestyle  { solid   }
+    named linewidth  { 0.5 pt  }
+    named linecap    { round   }
+    named dashlength { 0.15 cm }
+    named arrow      { noarrow }
+    named headstyle  { open    }
+    named headwidth  { 0.05 cm }
+    named headlength { 0.15 cm }
+    body x
+@Begin
+
+    def @LeftSub
+	precedence 90
+	associativity left
+	left root
+	named hmargin    { hmargin    }
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named arrow      { arrow      }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	right x
+    {
+	{ /vmargin {L::x} } |hmargin  root |
+	L@T @JoinFigures
+	        linestyle  { linestyle  }
+	        linewidth  { linewidth  }
+	        linecap    { linecap    }
+	        dashlength { dashlength }
+	        arrow      { arrow      }
+	        headstyle  { headstyle  }
+	        headwidth  { headwidth  }
+	        headlength { headlength }
+	T
+    }
+
+    def fixroot
+	precedence 90
+	left root
+    {
+	|0.5rt root
+    }
+
+    def firstsub
+	precedence 90
+	associativity left
+	named hmargin    { hmargin    }
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named arrow      { arrow      }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	right x
+    {
+	S::x &
+	S@T @JoinFigures
+		linestyle  { linestyle  }
+		linewidth  { linewidth  }
+		linecap    { linecap    }
+		dashlength { dashlength }
+		arrow      { arrow      }
+		headstyle  { headstyle  }
+		headwidth  { headwidth  }
+		headlength { headlength }
+	T
+    }
+
+    macro @FirstSub { fixroot //vmargin |0.5rt firstsub }
+
+    def @NextSub
+	precedence 90
+	associativity left
+	left others
+	named hmargin    { hmargin    }
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named arrow      { arrow      }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	right x
+    {
+	others &hmargin S::x &
+	S@T @JoinFigures
+		linestyle  { linestyle  }
+		linewidth  { linewidth  }
+		linecap    { linecap    }
+		dashlength { dashlength }
+		arrow      { arrow      }
+		headstyle  { headstyle  }
+		headwidth  { headwidth  }
+		headlength { headlength }
+	T
+    }
+
+    def @RightSub
+	precedence 90
+	associativity left
+	left root
+	named hmargin    { hmargin    }
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named arrow      { arrow      }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	right x
+    {
+	root |hmargin  { /vmargin {R::x} } |
+	R@T @JoinFigures
+		linestyle  { linestyle  }
+		linewidth  { linewidth  }
+		linecap    { linecap    }
+		dashlength { dashlength }
+		arrow      { arrow      }
+		headstyle  { headstyle  }
+		headwidth  { headwidth  }
+		headlength { headlength }
+	T
+    }
+
+    def @StubSub
+	precedence 90
+	associativity left
+	left root
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+    {
+	root |
+	@Figure
+	    shape { T@SW
+		    T@W -- { 0.1 cm 0.7 cm }
+		    T@E -- {-0.1 cm 0.7 cm }
+		    T@SE
+		  }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	{ @Null }
+    }
+
+    def @Node
+	# named mark {}
+	right root
+    {
+	T:: root
+	# & T@W ++ { -0.2 cm 0.1 cm } @BaseOf mark
+    }
+
+    @OneCol @OneRow x
+
+@End @Tree
+
+
+def @ShowMarks
+    named linewidth  { 0.015 cm }
+    named linestyle  { dashed   }
+    named dashlength { 0.15 cm  }
+    named paint      { lightgrey    }
+    named marks      { both     } # none, horizontal, vertical, or both
+    right x
+{
+    @Fig
+    {	@Box margin { 0c } linewidth { linewidth } paint { paint }
+	{   @Figure
+		shape {
+		    marks @Case {
+		        { horizontal both } @Yield
+			    { -0.3 cm ymark {xsize ymark} ++ {0.3 cm 0} }
+		        else @Yield {}
+		    }
+		    marks @Case {
+			both @Yield []
+			else @Yield {}
+		    }
+		    marks @Case {
+			{ vertical both } @Yield
+			    { xmark -0.3 cm {xmark ysize} ++ {0 0.3 cm} }
+			else @Yield {}
+		    }
+		}
+		linewidth { linewidth }
+		linestyle { linestyle }
+		dashlength { dashlength }
+	      x
+	}
+    }
+}
+
+   import @Fig
+   def @DagBox
+      named top {}
+      named mid {}
+      named base {}
+   {
+      @OneRow {
+	   TOP::  @FBox top
+	// MID::  @FBox mid
+	// BASE:: @FBox base
+      }
+   }
+
+   import @Fig
+   def @BlackDot
+      named diameter { 0.07c }
+   {
+      @Circle
+	margin { 0c }
+	paint { black }
+      { diameter @Wide diameter @High {}
+      }
+   }
+
+   import @Fig
+   def @TVShape   # television shape enclosing points ne, nw, se, sw
+       named nw {}
+       named ne {}
+       named sw {}
+       named se {}
+       named delta { 0.5 cm }
+   {
+       @Figure
+	   shape {
+		{ {nw @Min sw @Min ne @Min se} -- { delta 0 } } @Label BL
+		{ {nw @Max sw @Max ne @Max se} ++ { delta 0 } } @Label TR
+		BL ++ { 0 BL @YDistance TR } @Label TL
+		BL ++ { BL @XDistance TR 0 } @Label BR
+		BL
+		BR			[ BR ++ {0 delta} ]
+		BR ++ {delta delta}
+		TR ++ {delta -delta}	[ TR -- {0 delta} ]
+		TR
+		TL			[ TL -- {0 delta} ]
+		TL -- {delta delta}
+		BL ++ {-delta delta}	[ BL ++ {0 delta} ]
+		BL
+	   }
+       {}
+   }
+
+   import @Fig
+   def @FunnyArrow
+      named from {}
+      named to {}
+      named arrow { forward }
+   {
+      @Figure
+         shape {from from ++ {0 from @YDistance to} to}
+         arrow { arrow }
+      {}
+   }
+
+   def "->" { {Symbol Base} @Font "\256" } #174 decimal
+   def "=>" { {Symbol Base} @Font "\336" } #222 decimal
+   macro @JP	{ /0.5v  }
+
+   ###################################################
+   #                                                 #
+   #  Lout keywords.                                 #
+   #                                                 #
+   ###################################################
+
+   def @@Begin         { @Code "@Begin"        }
+   def @@Break         { @Code "@Break"        }
+   def @@Case          { @Code "@Case"         }
+   def @@Database      { @Code "@Database"     }
+   def @@End           { @Code "@End"          }
+   def @@Font          { @Code "@Font"         }
+   def @@Galley        { @Code "@Galley"       }
+   def @@Graphic       { @Code "@Graphic"      }
+   def @@HExpand       { @Code "@HExpand"      }
+   def @@HScale        { @Code "@HScale"       }
+   def @@High          { @Code "@High"         }
+   def @@Include       { @Code "@Include"      }
+   def @@Key           { @Code "@Key"          }
+   def @@LClos         { @Code "@LClos"        }
+   def @@LEnv          { @Code "@LEnv"         }
+   def @@LInput        { @Code "@LInput"       }
+   def @@Moment        { @Code "@Moment"       }
+   def @@Next          { @Code "@Next"         }
+   def @@Null          { @Code "@Null"         }
+   def @@OneCol        { @Code "@OneCol"       }
+   def @@OneRow        { @Code "@OneRow"       }
+   def @@Open          { @Code "@Open"         }
+   def @@Prepend       { @Code "@Prepend"      }
+   def @@Rotate        { @Code "@Rotate"       }
+   def @@Space         { @Code "@Space"        }
+   def @@SysDatabase   { @Code "@SysDatabase"  }
+   def @@SysInclude    { @Code "@SysInclude"   }
+   def @@SysPrepend    { @Code "@SysPrepend"   }
+   def @@Tag           { @Code "@Tag"          }
+   def @@Tagged        { @Code "@Tagged"       }
+   def @@Use           { @Code "@Use"          }
+   def @@VExpand       { @Code "@VExpand"      }
+   def @@VScale        { @Code "@VScale"       }
+   def @@Yield         { @Code "@Yield"        }
+   def @@Wide          { @Code "@Wide"         }
+
+
+   ###################################################
+   #                                                 #
+   #  Miscellaneous, mostly graphical definitions.   #
+   #                                                 #
+   ###################################################
+
+   def @Leaders
+   { ..   @Leaders
+   }
+
+   def @HLine {
+     @BackEnd @Case {
+       PostScript @Yield {
+        { 0 0 moveto xsize 0 lineto stroke }
+        @Graphic {}
+       }
+       PDF @Yield {
+        { 0 0 m __xsize 0 l S }
+        @Graphic {}
+       }
+     }
+   }
+
+   def @VDashLine
+      right length
+   {
+     @BackEnd @Case {
+       PostScript @Yield {
+         length @High
+         { 0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke }
+         @Graphic {}
+       }
+       PDF @Yield {
+         length @High
+         { [ __mul(3, __pt) ] 0 d   0 0 m 0 __ysize l stroke }
+         @Graphic {}
+       }
+     }
+   }
+
+   def @LBox
+      right offset
+   {
+     @BackEnd @Case {
+       PostScript @Yield {
+         @OneCol @OneRow
+         {
+         {  //0.2c
+            0.6c @High 1.2c @Wide
+            { 0 0 moveto xsize 0 lineto
+	          xsize ysize lineto 0 ysize lineto closepath
+	          gsave 0.9 setgray fill grestore stroke }
+            @Graphic {}
+         }
+         ||offset @VDashLine 1c
+         }
+       }
+       PDF @Yield {
+         @OneCol @OneRow
+         {
+         {  //0.2c
+            0.6c @High 1.2c @Wide
+            { 0 0 m __xsize 0 l
+	          __xsize __ysize l 0 __ysize l h
+	          q 0.9 g f Q S }
+            @Graphic {}
+         }
+         ||offset @VDashLine 1c
+         }
+       }
+     }
+   }
+
+   def @Arrow
+      right length
+   {  @OneCol @OneRow
+      {
+	   30d @Rotate {0.12c @Wide @HLine}
+	   //
+	   length @Wide @HLine
+	   //
+	   "-30d" @Rotate {0.12c @Wide @HLine}
+      }
+   }
+
+   def @DoubleArrow
+      right length
+   {  @OneCol @OneRow
+      { 
+         & 180d @Rotate @Arrow length
+         |0io @Arrow length
+      }
+   }
+
+   def @Put
+     left coord
+     right x
+   { @OneCol @OneRow
+     { coord / | @OneCol @OneRow x
+     }
+   }
+   
+   macro @At { //0io }
+
+
+   ###################################################
+   #                                                 #
+   #  Interpolated example documents.                #
+   #                                                 #
+   ###################################################
+
+   def @LittleEndRunPlace { @Galley }
+   def @LittleEndRun
+      force into { @LittleEndRunPlace&&preceding }
+   {}
+
+   def @LittleTextPlace { @Galley }
+   def @LittleText into { @LittleTextPlace&&preceding }
+      right x
+   { x
+   }
+
+   def @LittleFootPlace { @Galley }
+   def @LittleFootNote into { @LittleFootPlace&&following }
+      right x
+   { x
+   }
+
+   def @LittlePageColumn
+      right x
+   {
+        9px @Break 8p @Font
+        2.8c @Wide x
+   }
+
+   def @LittlePage
+      right x
+   {
+     @BackEnd @Case {
+       PostScript @Yield {
+         @HContract @VContract
+         { 0 0 moveto xsize 0 lineto xsize ysize lineto
+	       0 ysize lineto closepath stroke } @Graphic
+         {  //0.3c ||0.3c
+           9px @Break 8p @Font
+           2.8c @Wide 3.8c @High x
+           ||0.3c //0.3c
+         }
+       }
+       PDF @Yield {
+         @HContract @VContract
+         { 0 0 m __xsize 0 l __xsize __ysize l 0 __ysize l s } @Graphic
+         {  //0.3c ||0.3c
+           9px @Break 8p @Font
+           2.8c @Wide 3.8c @High x
+           ||0.3c //0.3c
+         }
+       }
+     }
+   }
+
+   def @LittleFootSect
+   {  1c @Wide @HLine
+      //0.3v @LittleFootPlace ||0.5c
+   }
+
+   def @LittlePageList
+     right @PageNum
+   {
+      @LittlePage { # |0.5rt @PageNum //0.8v
+		//0.3v @LittleTextPlace
+		//1rt @LittleFootSect
+	     }
+      //
+      @LittlePageList @Next @PageNum
+   }
+
+   def @LittleDocument
+   {  @LittlePage
+      {  @LittleTextPlace
+         //1rt @LittleFootSect
+      }
+      // @LittlePageList 2
+      // @LittleEndRunPlace
+   }
+		
+   def @Strange
+       named @Format right @Val { [@Val] }
+       right x
+   {   @Format x
+   }
diff --git a/doc/design/outfile.ps b/doc/design/outfile.ps
new file mode 100644
index 0000000..3f7525a
--- /dev/null
+++ b/doc/design/outfile.ps
@@ -0,0 +1,11727 @@
+%!PS-Adobe-3.0
+%%Creator: Basser Lout Version 3.17 (September 1999)
+%%CreationDate: Fri Sep 17 11:56:58 1999
+%%DocumentData: Binary
+%%DocumentNeededResources: (atend)
+%%DocumentMedia: Plain 595 842 0 white ()
+%%DocumentSuppliedResources: (atend)
+%%Pages: (atend)
+%%BoundingBox: 0 0 595 842
+%%EndComments
+
+%%BeginProlog
+%%BeginResource: procset LoutStartUp
+/m  { 3 1 roll moveto show } bind def
+/s  { exch currentpoint exch pop moveto show } bind def
+/k  { exch neg 0 rmoveto show } bind def
+/ul { gsave setlinewidth dup 3 1 roll
+      moveto lineto stroke grestore } bind def
+/in { 1440 mul } def
+/cm { 567 mul } def
+/pt { 20 mul } def
+/em { 120 mul } def
+/sp { louts mul } def
+/vs { loutv mul } def
+/ft { loutf mul } def
+/dg {           } def
+
+/LoutGraphic {
+  /louts exch def
+  /loutv exch def
+  /loutf exch def
+  /ymark exch def
+  /xmark exch def
+  /ysize exch def
+  /xsize exch def
+} def
+
+/LoutGr2 { gsave translate LoutGraphic gsave } def
+
+/LoutFont
+{ findfont exch scalefont setfont
+} bind def
+
+/LoutRecode {
+  { findfont dup length dict begin
+    {1 index /FID ne {def} {pop pop} ifelse} forall
+    /Encoding exch def
+    currentdict end definefont pop
+  }
+  stopped pop
+} bind def
+
+/BeginEPSF {
+  /LoutEPSFState save def
+  /dict_count countdictstack def
+  /op_count count 1 sub def
+  userdict begin
+  /showpage { } def
+  0 setgray 0 setlinecap
+  1 setlinewidth 0 setlinejoin
+  10 setmiterlimit [] 0 setdash newpath
+  /languagelevel where
+  { pop languagelevel
+    1 ne
+    { false setstrokeadjust false setoverprint
+    } if
+  } if
+} bind def
+
+/EndEPSF {
+  count op_count sub { pop } repeat
+  countdictstack dict_count sub { end } repeat
+  LoutEPSFState restore
+} bind def
+%%EndResource
+
+%%BeginResource encoding vec2
+/vec2 [
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright
+/parenleft /parenright /asterisk /plus /comma /hyphen /period /slash
+/zero /one /two /three /four /five /six /seven
+/eight /nine /colon /semicolon /less /equal /greater /question
+/at /A /B /C /D /E /F /G
+/H /I /J /K /L /M /N /O
+/P /Q /R /S /T /U /V /W
+/X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore
+/quoteleft /a /b /c /d /e /f /g
+/h /i /j /k /l /m /n /o
+/p /q /r /s /t /u /v /w
+/x /y /z /braceleft /bar /braceright /asciitilde /.notdef
+/quotesinglbase /quotedblbase /ellipsis /OE /oe /quotedblleft /quotedblright /fi
+/fl /endash /emdash /bullet /dagger /daggerdbl /florin /fraction
+/dotlessi /grave /acute /circumflex /tilde /macron /breve /dotaccent
+/dieresis /.notdef /ring /cedilla /.notdef /hungarumlaut /ogonek /caron
+/space /exclamdown /cent /sterling /currency /yen /brokenbar /section
+/dieresis /copyright /ordfeminine /guillemotleft /logicalnot /hyphen /registered /macron
+/degree /plusminus /twosuperior /threesuperior /acute /mu /paragraph /periodcentered
+/cedilla /onesuperior /ordmasculine /guillemotright /onequarter /onehalf /threequarters /questiondown
+/Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla
+/Egrave /Eacute /Ecircumflex /Edieresis /Igrave /Iacute /Icircumflex /Idieresis
+/Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply
+/Oslash /Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn /germandbls
+/agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla
+/egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex /idieresis
+/eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis /divide
+/oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn /ydieresis
+] def
+%%EndResource
+
+%%BeginResource: procset LoutTabPrependGraphic
+% @PrependGraphic file /usr/staff/jeff/lout.lib/include/tabf.lpg
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                  %
+%  PostScript @SysPrependGraphic file for @Tab     %
+%                                                  %
+%  To assist in avoiding name clashes, the names   %
+%  of all these symbols begin with "ltab".         %
+%                                                  %
+%  Jeffrey H. Kingston                             %
+%  24 September 1991                               %
+%  22 December 1992                                %
+%                                                  %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% linewidth ltabhs -
+% horizontal single line
+/ltabhs
+{  0 0 moveto xsize 0 lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhsp -
+% horizontal single line with projecting ends
+/ltabhsp
+{  0 0 moveto xsize 0 lineto
+   setlinewidth 2 setlinecap stroke
+} def
+
+% linewidth ltabhd -
+% horizontal double line
+/ltabhd
+{  dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch 3 mul moveto xsize exch 3 mul lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhdb -
+% horizontal double line below mark
+/ltabhdb
+{  dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch -3 mul moveto xsize exch -3 mul lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhdnw -
+% horizontal double line with northwest corner
+/ltabhdnw
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   xsize exch 3 mul moveto
+   -3 mul exch 3 mul lineto
+   -3 mul 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdne -
+% horizontal double line with northeast corner
+/ltabhdne
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch 3 mul moveto
+   3 mul xsize add exch 3 mul lineto
+   3 mul xsize add 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdsw -
+% horizontal double line with southwest corner
+/ltabhdsw
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   xsize exch -3 mul moveto
+   -3 mul exch -3 mul lineto
+   -3 mul 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdse -
+% horizontal double line with southeast corner
+/ltabhdse
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch -3 mul moveto
+   3 mul xsize add exch -3 mul lineto
+   3 mul xsize add 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabvs -
+% vertical single line
+/ltabvs
+{  0 0 moveto 0 ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabvd -
+% vertical double line
+/ltabvd
+{  dup dup
+   0 0 moveto 0 ysize lineto
+   -3 mul 0 moveto -3 mul ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabvdr -
+% vertical double line to right of mark
+/ltabvdr
+{  dup dup
+   0 0 moveto 0 ysize lineto
+   3 mul 0 moveto 3 mul ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+%%EndResource
+
+%%BeginResource: procset LoutFigPrependGraphic
+% @PrependGraphic file /usr/staff/jeff/lout.lib/include/figf.lpg
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                                    %
+%  PostScript @SysPrependGraphic file for @Fig  Jeffrey H. Kingston  %
+%  Version 2.0 (includes CIRCUM label)                 January 1992  %
+%                                                                    %
+%  To assist in avoiding name clashes, the names of all symbols      %
+%  defined here begin with "lfig".  However, this is not feasible    %
+%  with user-defined labels and some labels used by users.           %
+%                                                                    %
+%  <point>      is two numbers, a point.                             %
+%  <length>     is one number, a length                              %
+%  <angle>      is one number, an angle in degrees                   %
+%  <dashlength> is one number, the preferred length of a dash        %
+%                                                                    %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+errordict begin
+   /handleerror
+   {
+      {  /Times-Roman findfont 8 pt scalefont setfont
+	 0 setgray 4 pt 4 pt moveto
+	 $error /errorname get
+	 dup lfigdict exch known
+	 { lfigdict exch get }
+	 { 30 string cvs } ifelse
+	 show
+	 (  Command: ) show
+	 $error /command get 30 string cvs show
+      } stopped {} if
+      showpage stop
+   } def
+end
+
+% concat strings: <string> <string> lfigconcat <string>
+% must be defined outside lfigdict since used in lfigpromotelabels
+/lfigconcat
+{ 2 copy length exch length add string
+  dup 0 4 index putinterval
+  dup 3 index length 3 index putinterval
+  3 1 roll pop pop
+} def
+
+% <string> lfigdebugprint -
+% must be defined outside lfigdict since used in arbitrary places
+% /lfigdebugprint
+% { print
+%   (;  operand stack:\n) print
+%   count copy
+%   count 2 idiv
+%   { ==
+%     (\n) print
+%   } repeat
+%   (\n) print
+% } def
+
+/lfigdict 120 dict def
+lfigdict begin
+
+% error messages
+/dictfull (dictfull error:  too many labels?) def
+/dictstackoverflow (dictstackoverflow error:  labels nested too deeply?) def
+/execstackoverflow (execstackoverflow error:  figure nested too deeply?) def
+/limitcheck (limitcheck error:  figure nested too deeply or too large?) def
+/syntaxerror (syntaxerror error:  syntax error in text of figure?) def
+/typecheck (typecheck error:  syntax error in text of figure?) def
+/undefined (undefined error:  unknown or misspelt label?) def
+/VMError (VMError error:  run out of memory?) def
+
+% push pi onto stack:  - lfigpi <num>
+/lfigpi 3.14159 def
+
+% arc directions
+/clockwise     false def
+/anticlockwise true  def
+
+% maximum of two numbers:  <num> <num> lfigmax <num>
+/lfigmax { 2 copy gt { pop } { exch pop } ifelse } def
+
+% minimum of two numbers:  <num> <num> lfigmin <num>
+/lfigmin { 2 copy lt { pop } { exch pop } ifelse } def
+
+% add two points:  <point> <point> lfigpadd <point>
+/lfigpadd { exch 3 1 roll add 3 1 roll add exch } def
+
+% subtract first point from second:  <point> <point> lfigpsub <point>
+/lfigpsub { 3 2 roll sub 3 1 roll exch sub exch } def
+
+% max two points:  <point> <point> lfigpmax <point>
+/lfigpmax { exch 3 1 roll lfigmax 3 1 roll lfigmax exch } def
+
+% min two points:  <point> <point> lfigpmin <point>
+/lfigpmin { exch 3 1 roll lfigmin 3 1 roll lfigmin exch } def
+
+% scalar multiplication: <point> <num> lfigpmul <point>
+/lfigpmul { dup 3 1 roll mul 3 1 roll mul exch } def
+
+% point at angle and distance:  <point> <length> <angle> lfigatangle <point>
+/lfigatangle { 2 copy cos mul 3 1 roll sin mul lfigpadd } def
+
+% angle from one point to another:  <point> <point> lfigangle <angle>
+/lfigangle { lfigpsub 2 copy 0 eq exch 0 eq and {pop} {exch atan} ifelse } def
+
+% distance between two points:  <point> <point> lfigdistance <length>
+/lfigdistance { lfigpsub dup mul exch dup mul add sqrt } def
+
+% difference in x coords: <point> <point> lfigxdistance <length>
+/lfigxdistance { pop 3 1 roll pop sub } def
+
+%difference in y coords: <point> <point> lfigydistance <length>
+/lfigydistance { 3 1 roll pop sub exch pop } def
+
+% stroke a solid line:  <length> <dashlength> lfigsolid -
+/lfigsolid
+{  pop pop [] 0 setdash stroke
+} def
+
+% stroke a lfigdashed line:   <length> <dashlength> lfigdashed -
+/lfigdashed
+{  2 copy div 2 le 1 index 0 le or
+   {  exch pop 1 pt lfigmax [ exch dup ] 0 setdash }
+   {  dup [ exch 4 2 roll 2 copy div
+      1 sub 2 div ceiling dup 4 1 roll
+      1 add mul sub exch div ] 0 setdash
+   } ifelse stroke
+} def
+
+% stroke a lfigcdashed line:  <length> <dashlength> lfigcdashed -
+/lfigcdashed
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt lfigmax [ exch dup ] dup 0 get 2 div setdash }
+   { dup [ 4 2 roll exch 2 copy exch div
+     2 div ceiling div 1 index sub
+     ] exch 2 div setdash
+   } ifelse stroke
+} def
+
+% stroke a dotted line:  <length> <dashlength> lfigdotted -
+/lfigdotted
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt lfigmax [ exch 0 exch ] 0 setdash }
+   { 1 index exch div ceiling div
+     [ 0 3 2 roll ] 0 setdash
+   } ifelse stroke
+} def
+
+% stroke a noline line:  <length> <dashlength> lfignoline -
+/lfignoline
+{ pop pop
+} def
+
+% painting (i.e. filling): - lfigwhite - (etc.)
+/lfignopaint		{			       } def
+/lfignochange		{ 			  fill } def
+/lfigdarkblue		{ 0.0 0.0 0.5 setrgbcolor fill } def
+/lfigblue		{ 0.0 0.0 1.0 setrgbcolor fill } def
+/lfiglightblue		{ 0.5 0.5 1.0 setrgbcolor fill } def
+/lfigdarkgreen		{ 0.0 0.5 0.0 setrgbcolor fill } def
+/lfiggreen		{ 0.0 1.0 0.0 setrgbcolor fill } def
+/lfiglightgreen		{ 0.5 1.0 0.5 setrgbcolor fill } def
+/lfigdarkred		{ 0.5 0.0 0.0 setrgbcolor fill } def
+/lfigred		{ 1.0 0.0 0.0 setrgbcolor fill } def
+/lfiglightred		{ 1.0 0.5 0.5 setrgbcolor fill } def
+/lfigdarkcyan		{ 0.0 0.5 0.5 setrgbcolor fill } def
+/lfigcyan		{ 0.0 1.0 1.0 setrgbcolor fill } def
+/lfiglightcyan		{ 0.5 1.0 1.0 setrgbcolor fill } def
+/lfigdarkmagenta	{ 0.5 0.0 0.5 setrgbcolor fill } def
+/lfigmagenta		{ 1.0 0.0 1.0 setrgbcolor fill } def
+/lfiglightmagenta	{ 1.0 0.5 1.0 setrgbcolor fill } def
+/lfigdarkyellow		{ 0.5 0.5 0.0 setrgbcolor fill } def
+/lfigyellow		{ 1.0 1.0 0.0 setrgbcolor fill } def
+/lfiglightyellow	{ 1.0 1.0 0.5 setrgbcolor fill } def
+/lfigdarkgray		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/lfiggray		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/lfiglightgray		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/lfigdarkgrey		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/lfiggrey		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/lfiglightgrey		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/lfigblack		{ 0.0 0.0 0.0 setrgbcolor fill } def
+/lfigwhite		{ 1.0 1.0 1.0 setrgbcolor fill } def
+
+% line caps (and joins, not currently used)
+/lfigbutt       0 def
+/lfiground      1 def
+/lfigprojecting 2 def
+/lfigmiter      0 def
+/lfigbevel      2 def
+
+% shape and labels of the @Box symbol
+/lfigbox
+{
+   0     0     /SW  lfigpointdef
+   xsize 0     /SE  lfigpointdef
+   xsize ysize /NE  lfigpointdef
+   0     ysize /NW  lfigpointdef
+   SE 0.5 lfigpmul /S   lfigpointdef
+   NW 0.5 lfigpmul /W   lfigpointdef
+   W SE lfigpadd   /E   lfigpointdef
+   S NW lfigpadd   /N   lfigpointdef
+   NE 0.5 lfigpmul /CTR lfigpointdef
+   [ CTR NE lfigpsub /lfigboxcircum cvx ] lfigcircumdef
+   SW SE NE NW SW
+} def
+
+% shape and labels of the @CurveBox symbol
+/lfigcurvebox
+{
+
+   xsize 0.5 mul	ysize 0.5 mul	/CTR lfigpointdef
+   xsize 0.5 mul	0		/S   lfigpointdef
+   xsize		ysize 0.5 mul	/E   lfigpointdef
+   xsize 0.5 mul	ysize		/N   lfigpointdef
+   0			ysize 0.5 mul	/W   lfigpointdef
+
+   xmark 0.293 mul		xmark 0.293 mul		  /SW  lfigpointdef
+   xsize xmark 0.293 mul sub	xmark 0.293 mul		  /SE  lfigpointdef
+   xsize xmark 0.293 mul sub	ysize xmark 0.293 mul sub /NE  lfigpointdef
+   xmark 0.293 mul		ysize xmark 0.293 mul sub /NW  lfigpointdef
+
+   [ xsize ysize 0.5 lfigpmul xmark /lfigcurveboxcircum cvx ] lfigcircumdef
+
+   xmark		0
+   xsize xmark sub	0
+   [ xsize xmark sub	xmark		]
+   xsize		xmark
+   xsize		ysize xmark sub
+   [ xsize xmark sub	ysize xmark sub	]
+   xsize xmark sub	ysize
+   xmark		ysize
+   [ xmark		ysize xmark sub	]
+   0			ysize xmark sub
+   0			xmark
+   [ xmark		xmark		]
+   xmark		0
+} def
+
+% shadow of the @ShadowBox symbol
+% its shape and labels are done, somewhat inaccurately, with lfigbox
+/lfigshadow
+{ xmark 2 mul 0 moveto xsize 0 lineto
+  xsize ysize xmark 2 mul sub lineto
+  xsize xmark sub ysize xmark 2 mul sub lineto
+  xsize xmark sub xmark lineto
+  xmark 2 mul xmark lineto closepath fill
+} def
+
+% shape and labels of the @Square symbol
+/lfigsquare
+{
+   xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   CTR xsize xsize ysize ysize lfigpmax 0.5 lfigpmul lfigpadd /NE lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 135 lfigatangle lfigpadd /NW lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 225 lfigatangle lfigpadd /SW lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 315 lfigatangle lfigpadd /SE lfigpointdef
+   SW 0.5 lfigpmul SE 0.5 lfigpmul lfigpadd /S lfigpointdef
+   NW 0.5 lfigpmul NE 0.5 lfigpmul lfigpadd /N lfigpointdef
+   SW 0.5 lfigpmul NW 0.5 lfigpmul lfigpadd /W lfigpointdef
+   SE 0.5 lfigpmul NE 0.5 lfigpmul lfigpadd /E lfigpointdef
+   [ CTR NE lfigpsub /lfigboxcircum cvx ] lfigcircumdef
+   SW SE NE NW SW
+} def
+
+% shape and labels of the @Diamond symbol
+/lfigdiamond
+{
+   xsize 0 0.5 lfigpmul /S   lfigpointdef
+   0 ysize 0.5 lfigpmul /W   lfigpointdef
+   S W         lfigpadd /CTR lfigpointdef
+   CTR W       lfigpadd /N   lfigpointdef
+   CTR S       lfigpadd /E   lfigpointdef
+   [ xsize ysize 0.5 lfigpmul /lfigdiamondcircum cvx ] lfigcircumdef
+   S E N W S
+} def
+
+% shape and labels of the @Ellipse symbol
+/lfigellipse
+{
+   xsize 0 0.5 lfigpmul /S   lfigpointdef
+   0 ysize 0.5 lfigpmul /W   lfigpointdef
+   S W         lfigpadd /CTR lfigpointdef
+   CTR W       lfigpadd /N   lfigpointdef
+   CTR S       lfigpadd /E   lfigpointdef
+   CTR xsize 0 0.3536 lfigpmul lfigpadd 0 ysize 0.3536 lfigpmul lfigpadd /NE lfigpointdef
+   0 ysize 0.3536 lfigpmul CTR xsize 0 0.3536 lfigpmul lfigpadd lfigpsub /SE lfigpointdef
+   xsize 0 0.3536 lfigpmul CTR lfigpsub 0 ysize 0.3536 lfigpmul lfigpadd /NW lfigpointdef
+   0 ysize 0.3536 lfigpmul xsize 0 0.3536 lfigpmul CTR lfigpsub lfigpsub /SW lfigpointdef
+   [ xsize ysize 0.5 lfigpmul /lfigellipsecircum cvx ] lfigcircumdef
+   S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+} def
+
+% shape and labels of the @Circle symbol
+/lfigcircle
+{
+   xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   CTR xsize 0 ysize 0 lfigpmax 0.5 lfigpmul lfigpadd /E lfigpointdef
+   CTR 0 0 CTR E lfigdistance 45 lfigatangle lfigpadd /NE lfigpointdef
+   CTR 0 0 CTR E lfigdistance 90 lfigatangle lfigpadd /N lfigpointdef
+   CTR 0 0 CTR E lfigdistance 135 lfigatangle lfigpadd /NW lfigpointdef
+   CTR 0 0 CTR E lfigdistance 180 lfigatangle lfigpadd /W lfigpointdef
+   CTR 0 0 CTR E lfigdistance 225 lfigatangle lfigpadd /SW lfigpointdef
+   CTR 0 0 CTR E lfigdistance 270 lfigatangle lfigpadd /S lfigpointdef
+   CTR 0 0 CTR E lfigdistance 315 lfigatangle lfigpadd /SE lfigpointdef
+   [ S E lfigpsub /lfigellipsecircum cvx ] lfigcircumdef
+   S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+} def
+
+% shape and labels of the @HLine and @HArrow symbols
+/lfighline
+{
+   0 ymark lfigprevious /FROM lfigpointdef
+   xsize ymark lfigprevious /TO lfigpointdef
+} def
+
+% shape and labels of the @VLine and @VArrow symbols
+/lfigvline
+{
+   xmark ysize lfigprevious /FROM lfigpointdef
+   xmark 0 lfigprevious /TO lfigpointdef
+} def
+
+% points of a polygon around base with given no of sides, vert init angle:
+% <sides> <angle> figpolygon <point> ... <point>
+/lfigpolygon
+{  xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   90 sub CTR 2 copy lfigmax 5 3 roll
+   [ 4 copy pop /lfigpolycircum cvx ] lfigcircumdef
+   exch dup 360 exch div exch
+   1 1  3 2 roll
+   {  4 string cvs (P) exch lfigconcat cvn
+      6 copy pop pop lfigatangle 2 copy 10 2 roll
+      3 2 roll lfigpointdef
+      dup 3 1 roll add exch
+   }  for
+   pop lfigatangle
+} def
+
+% next array element:  <array> <index> lfiggetnext <array> <index> <any> true
+%                                               or <array> <index> false
+/lfiggetnext
+{  2 copy exch length ge
+   { false }
+   { 2 copy get exch 1 add exch true } ifelse
+} def
+
+% check whether thing is number:  <any> lfigisnumbertype <any> <bool>
+/lfigisnumbertype
+{  dup type dup
+   /integertype eq exch /realtype eq or
+} def
+
+% check whether thing is an array:  <any> lfigisarraytype <any> <bool>
+/lfigisarraytype { dup type /arraytype eq } def
+
+% get next item:  <array> <index> lfiggetnextitem <array> <index> 0
+%                                              or <array> <index> <array> 1
+%                                              or <array> <index> <point> 2
+/lfiggetnextitem
+{   lfiggetnext
+    {	lfigisarraytype
+	{   1
+	}
+	{   lfigisnumbertype
+	    {	3 1 roll
+		lfiggetnext
+		{   lfigisnumbertype
+		    {	4 3 roll exch  2
+		    }
+		    {	pop 3 2 roll pop  0
+		    } ifelse
+		}
+		{   3 2 roll pop  0
+		} ifelse
+	    }
+	    {	pop 0
+	    } ifelse
+	} ifelse
+    }
+    {	0
+    } ifelse
+} def
+
+% set arc path:  bool x1 y1  x2 y2  x0 y0  lfigsetarc  <angle> <angle> <dist>
+% the path goes from x1 y1 to x2 y2 about centre x0 y0,
+% anticlockwise if bool is true else clockwise.
+% The orientations of backwards pointing and forwards pointing
+% arrowheads are returned in the two angles, and
+% the length of the arc is returned in <dist>.
+/lfigsetarc
+{
+  20 dict begin
+     matrix currentmatrix 8 1 roll
+     2 copy translate 2 copy 8 2 roll
+     4 2 roll lfigpsub 6 2 roll lfigpsub
+     dup /y1 exch def dup mul /y1s exch def
+     dup /x1 exch def dup mul /x1s exch def
+     dup /y2 exch def dup mul /y2s exch def
+     dup /x2 exch def dup mul /x2s exch def
+
+     y1s y2s eq
+     {	-1
+     }
+     {	y1s x2s mul y2s x1s mul sub y1s y2s sub div
+     } ifelse
+     /da exch def
+
+     x1s x2s eq
+     {	-1
+     }
+     {	x1s y2s mul x2s y1s mul sub x1s x2s sub div
+     } ifelse
+     /db exch def
+
+     da 0 gt db 0 gt and
+     {	/LMax da sqrt db sqrt lfigmax def
+	/scalex da sqrt LMax div def
+	/scaley db sqrt LMax div def
+	scalex scaley scale
+	0 0 LMax
+	0 0 x1 scalex mul y1 scaley mul lfigangle
+	0 0 x2 scalex mul y2 scaley mul lfigangle
+	2 copy eq { 360 add } if
+	2 copy 8 2 roll
+	5 index { arc } { arcn } ifelse
+	2 index 1 index
+	{ 90 sub } { 90 add } ifelse
+	dup sin scaley mul exch cos scalex mul atan
+	2 index 2 index
+	{ 90 add } { 90 sub } ifelse
+	dup sin scaley mul exch cos scalex mul atan
+	5 2 roll  % res1 res2 ang1 ang2 anticlockwise
+	{ exch sub } { sub } ifelse
+	dup 0 le { 360 add } if  lfigpi mul LMax mul 180 div
+     }
+     {	0 0 x1 y1 lfigdistance 0 0 x2 y2 lfigdistance eq
+	0 0 x1 y1 lfigdistance 0 gt and
+	{	0 0
+		0 0 x1 y1 lfigdistance
+		0 0 x1 y1 lfigangle
+		0 0 x2 y2 lfigangle
+		2 copy eq { 360 add } if
+		2 copy 8 2 roll
+		5 index { arc } { arcn } ifelse
+		2 index 1 index
+		{ 90 sub } { 90 add } ifelse
+		2 index 2 index
+		{ 90 add } { 90 sub } ifelse
+		5 2 roll % res1 res2 ang1 ang2 clockwise
+		{ exch sub } { sub } ifelse
+		dup 0 le { 360 add } if lfigpi mul 0 0 x1 y1 lfigdistance mul 180 div
+	}
+	{	x2 y2 lineto pop
+		x2 y2 x1 y1 lfigangle
+		x1 y1 x2 y2 lfigangle
+		x1 y1 x2 y2 lfigdistance
+	} ifelse
+     } ifelse
+     4 -1 roll setmatrix
+   end
+} def
+
+% lfigsetcurve: set up a Bezier curve from x0 y0 to x3 y3
+% and return arrowhead angles and length of curve (actually 0)
+% x0 y0 x1 y1 x2 y2 x3 y3 lfigsetcurve <angle> <angle> <length>
+/lfigsetcurve
+{ 8 copy curveto pop pop
+  lfigangle
+  5 1 roll
+  4 2 roll lfigangle
+  exch
+  0
+} def
+
+% lfigpaintpath: paint a path of the given shape
+% /paint [ shape ] lfigpaintpath -
+/lfigpaintpath
+{
+  10 dict begin
+    0 newpath
+    /prevseen false def
+    /curveseen false def
+    { lfiggetnextitem
+      dup 0 eq { pop exit }
+      { 1 eq
+        { /curveseen true def
+	  /curve exch def
+	  curve length 0 eq { /curveseen false def } if
+        }
+        { /ycurr exch def
+	  /xcurr exch def
+	  prevseen
+	  { curveseen
+	    { curve length 4 eq
+	      { xprev yprev
+		curve 0 get curve 1 get
+		curve 2 get curve 3 get
+		xcurr ycurr
+		lfigsetcurve pop pop pop
+	      }
+	      { xprev yprev xcurr ycurr
+	        curve length 1 ge { curve 0 get } { 0 } ifelse
+	        curve length 2 ge { curve 1 get } { 0 } ifelse
+	        curve length 3 ge { curve 2 get } { true } ifelse
+	        7 1 roll
+	        lfigsetarc pop pop pop
+	      } ifelse
+	    }
+	    { xcurr ycurr lineto
+	    } ifelse
+	  }
+	  { xcurr ycurr moveto
+	  } ifelse
+	  /xprev xcurr def
+	  /yprev ycurr def
+	  /prevseen true def
+	  /curveseen false def
+        } ifelse
+      } ifelse
+    } loop pop pop cvx exec
+  end
+} def
+
+% stroke a path of the given shape in the given linestyle and dash length.
+% Return the origin and angle of the backward and forward arrow heads.
+% dashlength /linestyle [shape] lfigdopath  [<point> <angle>] [<point> <angle>] 
+/lfigdopath
+{
+  10 dict begin
+    0
+    /prevseen  false def
+    /curveseen false def
+    /backarrow []    def
+    /fwdarrow  []    def
+    {
+	lfiggetnextitem
+	dup 0 eq { pop exit }
+	{
+	    1 eq
+	    {	/curveseen true def
+		/curve exch def
+		curve length 0 eq { /prevseen false def } if
+	    }
+	    {	/ycurr exch def
+		/xcurr exch def
+		prevseen
+		{   newpath xprev yprev moveto
+		    curveseen
+		    {	curve length 4 eq
+			{   xprev yprev
+			    curve 0 get curve 1 get
+			    curve 2 get curve 3 get
+			    xcurr ycurr lfigsetcurve
+			}
+			{   xprev yprev xcurr ycurr
+			    curve length 1 ge { curve 0 get } { 0 } ifelse
+			    curve length 2 ge { curve 1 get } { 0 } ifelse
+			    curve length 3 ge { curve 2 get } { true } ifelse
+			    7 1 roll
+			    lfigsetarc
+			} ifelse
+		    }
+		    {	xcurr ycurr lineto
+			xcurr ycurr xprev yprev lfigangle dup 180 sub
+			xprev yprev xcurr ycurr lfigdistance
+		    } ifelse
+		    6 index 6 index cvx exec
+		    [ xprev yprev 5 -1 roll ]
+		    backarrow length 0 eq
+		    { /backarrow exch def }
+		    { pop } ifelse
+		    [ xcurr ycurr 4 -1 roll ] /fwdarrow exch def
+		} if
+		/xprev xcurr def
+		/yprev ycurr def
+		/prevseen true def
+		/curveseen false def
+	    } ifelse
+	} ifelse
+    } loop
+    pop pop pop pop
+    backarrow length 0 eq { [ 0 0 0 ] } { backarrow } ifelse
+    fwdarrow  length 0 eq { [ 0 0 0 ] } { fwdarrow  } ifelse
+  end
+} def
+
+% lfigdoarrow: draw an arrow head of given form
+% dashlength /lstyle /pstyle hfrac height width [ <point> <angle> ] lfigdoarrow -
+/lfigdoarrow
+{  matrix currentmatrix 8 1 roll
+   dup 0 get 1 index 1 get translate
+   2 get rotate
+   [ 2 index neg 2 index 0 0
+     3 index 3 index neg
+     1 index 10 index mul 0
+     7 index 7 index ]
+   4 1 roll pop pop pop
+   dup 3 1 roll
+   gsave lfigpaintpath grestore lfigdopath pop pop
+   setmatrix
+} def
+
+% arrow head styles
+/lfigopen     0.0 def
+/lfighalfopen 0.5 def
+/lfigclosed   1.0 def
+
+% stroke no arrows, forward, back, and both
+/lfignoarrow { pop pop pop pop pop pop pop pop                        } def
+/lfigforward { 7 -1 roll lfigdoarrow pop                              } def
+/lfigback    { 8 -2 roll pop lfigdoarrow                              } def
+/lfigboth    { 8 -1 roll 7 copy lfigdoarrow pop 7 -1 roll lfigdoarrow } def
+
+% lfigprevious: return previous point on path
+/lfigprevious
+{ lfigisnumbertype
+  { 2 copy }
+  { lfigisarraytype
+    { 2 index 2 index }
+    { 0 0 }
+    ifelse
+  } ifelse
+} def
+
+% label a point in 2nd top dictionary:  <point> /name lfigpointdef -
+/lfigpointdef
+{
+  % (Entering lfigpointdef) lfigdebugprint
+  [ 4 2 roll transform
+    /itransform cvx ] cvx
+    currentdict end
+    3 1 roll
+    % currentdict length currentdict maxlength lt
+    % { def }
+    % { exec moveto (too many labels) show stop }
+    % ifelse
+    def
+    begin
+  % (Leaving lfigpointdef) lfigdebugprint
+} def
+
+% promote labels from second top to third top dictionary
+% <string> lfigpromotelabels -
+/lfigpromotelabels
+{
+  % (Entering lfigpromotelabels) lfigdebugprint
+  currentdict end exch currentdict end
+  { exch 20 string cvs 2 index
+    (@) lfigconcat exch lfigconcat cvn exch def
+  } forall pop begin
+  % (Leaving lfigpromotelabels) lfigdebugprint
+} def
+
+% show labels (except CIRCUM): - lfigshowlabels -
+/lfigshowlabels
+{
+  % (Entering lfigshowlabels) lfigdebugprint
+  currentdict end
+    currentdict
+    { 1 index 20 string cvs (CIRCUM) search % if CIRCUM in key
+      { pop pop pop pop pop }
+      { pop cvx exec 2 copy
+        newpath 1.5 pt 0 360 arc
+        0 setgray fill
+        /Times-Roman findfont 8 pt scalefont setfont
+        moveto 0.2 cm 0.1 cm rmoveto 20 string cvs show
+      }
+      ifelse
+    } forall
+  begin
+  % (Leaving lfigshowlabels) lfigdebugprint
+} def
+
+% fix an angle to 0 <= res < 360:  <angle> lfigfixangle <angle>
+/lfigfixangle
+{
+  % (Entering lfigfixangle) lfigdebugprint
+  { dup 0 ge { exit } if
+    360 add
+  } loop
+  { dup 360 lt { exit } if
+    360 sub
+  } loop
+  % (Leaving lfigfixangle) lfigdebugprint
+} def
+
+% find point on circumference of box:  alpha a b lfigboxcircum x y
+/lfigboxcircum
+{
+  % (Entering lfigboxcircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    0 0 a b lfigangle /theta exch def
+
+    % if alpha <= theta, return (a, a*tan(alpha))
+    alpha theta le
+    { a  a alpha sin mul alpha cos div }
+    {
+      % else if alpha <= 180 - theta, return (b*cot(alpha), b)
+      alpha 180 theta sub le
+      { b alpha cos mul alpha sin div  b }
+      {
+        % else if alpha <= 180 + theta, return (-a, -a*tan(alpha))
+        alpha 180 theta add le
+        { a neg  a neg alpha sin mul alpha cos div }
+        {
+	  % else if alpha <= 360 - theta, return (-b*cot(alpha), -b)
+	  alpha 360 theta sub le
+          { b neg alpha cos mul alpha sin div  b neg }
+	  {
+	    % else 360 - theta <= alpha, return (a, a*tan(alpha))
+	    a  a alpha sin mul alpha cos div
+	  } ifelse
+        } ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigboxcircum) lfigdebugprint
+} def
+
+% find quadratic roots (assume a != 0): a b c lfigqroots x1 x2 2
+%                                                     or    x2 1
+%                                                     or       0
+/lfigqroots
+{
+  4 dict begin
+    /c exch def
+    /b exch def
+    /a exch def
+    /disc b b mul 4 a c mul mul sub def
+    disc 0 lt
+    { 0
+    }
+    { disc 0 eq
+      { b neg 2 a mul div
+	1
+      }
+      { b neg disc sqrt add 2 a mul div
+        b neg disc sqrt sub 2 a mul div
+	2
+      }
+      ifelse
+    }
+    ifelse
+  end
+} def
+
+% work our which quadrant: <angle> lfigquadrant <0-3>
+/lfigquadrant
+{ dup 90 lt
+  { pop 0
+  }
+  { dup 180 lt
+    { pop 1
+    }
+    { 270 lt
+      { 2
+      }
+      { 3
+      } ifelse
+    } ifelse
+  } ifelse
+} def
+
+% find curvebox circum, assuming upper right quadrant: alpha a b xmk lfigcb x y
+/lfigcb
+{
+  6 dict begin
+    /xmk exch def
+    /b exch def
+    /a exch def
+    /alpha exch def
+    /theta1 0 0 a b xmk sub lfigangle def
+    /theta2 0 0 a xmk sub b lfigangle def
+    alpha theta1 le
+    { % if alpha <= theta1, return (a, a*tan(alpha))
+      a  a alpha sin mul alpha cos div
+    }
+    { alpha theta2 ge
+      { % else if alpha > theta2, return (b*cot(alpha), b)
+	b alpha cos mul alpha sin div  b
+      }
+      {
+	% else, return the intersection of line and circle
+	a xmk sub b xmk sub xmk  0 0 alpha lfigcircleintersect
+	dup 0 eq
+	{ % should never happen, just return any reasonable point
+	  pop
+	  a b 0.5 lfigpmul
+	}
+	{ 1 eq
+	  { % should never happen, just return the point on top of stack
+	  }
+	  { % the usual case, two points on stack, return the larger
+	    lfigpmax
+	  } ifelse
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+} def
+
+% find point on circumference of curvebox: alpha a b xmk lfigcurveboxcircum x y
+/lfigcurveboxcircum
+{
+  % (Entering lfigcurveboxcircum) lfigdebugprint
+  5 dict begin
+    /xmk exch def
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+
+    % work out which quadrant we are in, and reflect accordingly
+    /quad alpha lfigquadrant def
+    quad 0 eq
+    { alpha a b xmk lfigcb
+    }
+    { quad 1 eq
+      { 180 alpha sub a b xmk lfigcb exch neg exch
+      }
+      { quad 2 eq
+	{ alpha 180 sub a b xmk lfigcb neg exch neg exch
+	}
+	{ 360 alpha sub a b xmk lfigcb neg
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigcurveboxcircum) lfigdebugprint
+} def
+
+% find point on circumference of diamond:  alpha a b lfigdiamondcircum x y
+/lfigdiamondcircum
+{
+  % (Entering lfigdiamondcircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    b alpha cos abs mul  a alpha sin abs mul  add  /denom exch def
+    a b mul alpha cos mul denom div
+    a b mul alpha sin mul denom div
+  end
+  % (Leaving lfigdiamondcircum) lfigdebugprint
+} def
+
+% find point on circumference of ellipse:  alpha a b lfigellipsecircum x y
+/lfigellipsecircum
+{
+  % (Entering lfigellipsecircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    b alpha cos mul dup mul  a alpha sin mul dup mul  add sqrt /denom exch def
+    a b mul alpha cos mul denom div
+    a b mul alpha sin mul denom div
+  end
+  % (Leaving lfigellipsecircum) lfigdebugprint
+} def
+
+% find point of intersection of two lines each defined by two points
+% x1 y1 x2 y2  x3 y3 x4 y4  lfiglineintersect x y
+/lfiglineintersect
+{
+  % (Entering lfiglineintersect) lfigdebugprint
+  13 dict begin
+    /y4 exch def
+    /x4 exch def
+    /y3 exch def
+    /x3 exch def
+    /y2 exch def
+    /x2 exch def
+    /y1 exch def
+    /x1 exch def
+    x2 x1 sub /x21 exch def
+    x4 x3 sub /x43 exch def
+    y2 y1 sub /y21 exch def
+    y4 y3 sub /y43 exch def
+    y21 x43 mul y43 x21 mul sub /det exch def
+  
+    % calculate x 
+    y21 x43 mul x1 mul
+    y43 x21 mul x3 mul sub
+    y3 y1 sub x21 mul x43 mul add
+    det div
+
+    % calculate y
+    x21 y43 mul y1 mul
+    x43 y21 mul y3 mul sub
+    x3 x1 sub y21 mul y43 mul add
+    det neg div
+
+  end
+  % (Leaving lfiglineintersect) lfigdebugprint
+} def
+
+% find point on circumference of polygon
+% alpha radius num theta lfigpolycircum x y
+/lfigpolycircum
+{
+  % (Entering lfigpolycircum) lfigdebugprint
+  13 dict begin
+    /theta exch def
+    /num exch def
+    /radius exch def
+    /alpha exch def
+
+    % calculate delta, the angle from theta to alpha
+    alpha theta sub lfigfixangle
+
+    % calculate the angle which is the multiple of 360/num closest to delta
+    360 num div div truncate 360 num div mul theta add /anglea exch def
+
+    % calculate the next multiple of 360/num after anglea
+    anglea 360 num div add /angleb exch def
+
+    % intersect the line through these two points with the alpha line
+    anglea cos anglea sin  angleb cos angleb sin
+    0 0  alpha cos 2 mul alpha sin 2 mul
+    lfiglineintersect radius lfigpmul
+
+  end
+  % (Leaving lfigpolycircum) lfigdebugprint
+} def
+
+% find point of intersection of a point and a circle
+% x0 y0 r  x1 y1 theta  lfigcircleintersect xa ya xb yb 2
+%                                        or       xb yb 1
+%                                        or             0
+/lfigcircleintersect
+{
+  % (Entering lfigcircleintersect) lfigdebugprint
+  15 dict begin
+    /theta exch def
+    /y1    exch def
+    /x1    exch def
+    /r     exch def
+    /y0    exch def
+    /x0    exch def
+
+    % if sin(theta) = 0 then line is horizontal and y must be y1
+    theta sin abs 0.00001 lt
+    { 
+      /a 1 def
+      /b -2 x0 mul def
+      /c x0 dup mul y1 y0 sub dup mul add r dup mul sub def
+      a b c lfigqroots dup
+      0 eq
+      { pop
+	0
+      }
+      { 1 eq
+	{ y1 1
+	}
+	{ y1 exch y1 2
+	} ifelse
+      } ifelse
+    }
+    {
+      /ct theta cos theta sin div def
+      /a ct ct mul 1 add def
+      /b ct x1 x0 sub mul y1 add y0 sub 2 mul def
+      /c x1 x0 sub dup mul y1 y0 sub dup mul add r dup mul sub def
+      a b c lfigqroots dup
+      0 eq
+      { pop
+	0
+      }
+      { 1 eq
+	{ y1 add /yb exch def
+	  yb y1 sub ct mul x1 add /xb exch def
+	  xb yb 1
+	}
+	{ y1 add /ya exch def
+	  ya y1 sub ct mul x1 add /xa exch def
+	  y1 add /yb exch def
+	  yb y1 sub ct mul x1 add /xb exch def
+	  xa ya xb yb 2
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigcircleintersect) lfigdebugprint
+} def
+
+% add CIRCUM operator with this body:  <array> lfigcircumdef -
+/lfigcircumdef
+{   % (Entering lfigcircumdef) lfigdebugprint
+    /CIRCUM exch cvx
+    currentdict end
+    3 1 roll
+    % currentdict length currentdict maxlength lt
+    % { def }
+    % { exec moveto (too many labels) show stop }
+    % ifelse
+    def
+    begin
+    % (Leaving lfigcircumdef) lfigdebugprint
+} def
+
+end
+%%EndResource
+
+%%BeginResource: procset LoutBasicSetup
+% @PrependGraphic file /usr/staff/jeff/lout.lib/include/bsf.lpg
+
+% width height linethickness louteuro -
+% draw a Euro symbol of this width and height with this line thickness
+% Author: Jeff Kingston, based on code from Andrew Beardsley
+/louteuro {
+  20 dict begin
+    /eurothick exch def
+    /euroheight exch def
+    /eurowidth exch def
+    /eurostrokewidth euroheight 0.8 mul def
+    /eurostep eurothick 60 cos mul 60 sin div def
+    /eurotheta 40 def
+
+    % llx lly width thickness louteurobox -
+    % draw angled box starting at (llx, lly) with given width and thickness
+    /louteurobox
+    {
+      /euroboxthick exch def
+      /euroboxwidth exch def
+      newpath moveto euroboxwidth 0 rlineto
+      eurostep euroboxthick rlineto
+      euroboxwidth neg 0 rlineto closepath fill
+    } def
+
+    % lower cross stroke
+    0 euroheight 2 div eurothick 1.5 mul sub
+    eurostrokewidth eurothick louteurobox
+
+    % upper cross stroke
+    0 euroheight 2 div eurothick 0.5 mul add
+    eurostrokewidth eurostep 2 mul add eurothick louteurobox
+
+    % circular part
+    /eurohctr eurowidth euroheight 2 div eurotheta cos mul sub def
+    /eurovctr euroheight 2 div def
+    newpath
+    eurohctr eurovctr eurovctr eurotheta 350 eurotheta sub arc
+    eurohctr eurovctr eurovctr eurothick sub 365 eurotheta sub eurotheta arcn
+    closepath fill
+  end
+} def
+
+% path for @FullWidthRule symbol
+/LoutRule
+{ 0 0 moveto xsize 0 lineto
+} def
+
+% path for @Box symbol
+/LoutBox
+{ 0 0 moveto xsize 0 lineto
+  xsize ysize lineto 0 ysize lineto
+  closepath
+} def
+
+% path for @CurveBox symbol
+/LoutCurveBox
+{ xmark 0 moveto
+  xsize xmark sub xmark xmark 270 360 arc
+  xsize xmark sub ysize xmark sub xmark 0 90 arc
+  xmark ysize xmark sub xmark 90 180 arc
+  xmark xmark xmark 180 270 arc
+  closepath
+} def
+
+% path for @ShadowBox symbol
+/LoutShadowBox
+{ xmark 2 mul 0 moveto xsize 0 lineto
+  xsize ysize xmark 2 mul sub lineto
+  xsize xmark sub ysize xmark 2 mul sub lineto
+  xsize xmark sub xmark lineto
+  xmark 2 mul xmark lineto
+  closepath
+} def
+
+% set up dictionary containing margin note data: parity LoutMargSet -
+/LoutMargSet
+{ /LoutMargDict 12 dict def
+  LoutMargDict begin
+    /parity exch def
+    /matr matrix currentmatrix def
+    /rightx xsize def
+    /lefty ysize def   % highest allowable point for top of next left note
+    /righty ysize def  % highest allowable point for top of next right note
+    /max { 2 copy gt { pop } { exch pop } ifelse } def
+    /min { 2 copy lt { pop } { exch pop } ifelse } def
+  end
+} def
+
+%translate coordinate system for marginal notes:  type LoutMargShift -
+% where type 0 is left margin, 1 is right margin, 2 is outer, 3 is inner
+/LoutMargShift
+{ LoutMargDict begin
+
+    % y coordinate of top of note, in margin coords, before vertical adjust
+    0 ysize transform matr itransform exch pop
+
+    % decide whether left or right margin based on type and parity
+    exch [ 0 1 parity 1 parity sub ] exch get 0 eq
+    {
+      % left margin: adjust top of note downwards if overlaps previous note
+      lefty min
+
+      % bottom of note is new lefty position and also translate position
+      ysize sub dup /lefty exch def
+
+      % want right edge of note at coordinate zero
+      xsize neg exch
+    }
+    {
+      % right margin: adjust top of note downwards if overlaps previous note
+      righty min
+
+      % bottom of note is new righty position and also translate position
+      ysize sub dup /righty exch def
+
+      % want left edge of note at coordinate rightx
+      rightx exch
+    } ifelse
+
+    % stack now contains coord of bottom left corner in margin coordinates
+    matr setmatrix translate
+  end
+} def
+
+% create LoutPageDict with left, right, foot, top for @Place symbol users
+/LoutPageSet
+{
+  /LoutPageDict 5 dict def
+  LoutPageDict begin
+    /matr matrix currentmatrix def
+    /left 0 def
+    /right xsize def
+    /foot 0 def
+    /top ysize def
+  end
+
+} def
+
+%%EndResource
+
+%%EndProlog
+
+%%BeginSetup
+%%IncludeResource: font Times-Roman
+/Times-Romanfnt82 vec2 /Times-Roman LoutRecode
+/fnt82 { /Times-Romanfnt82 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%EndSetup
+
+%%Page: i 1
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt84 2897 12401(The)m 3352(Design)s 4099(and)s 4540(Implementation)s
+4239 11998(of)m 4511(the)s 2589 11595(Lout)m 3141(Document)s 4250(F)s 6(ormatting)k
+5468(Language)s 240 fnt83 3630 11097(J)m 6(ef)k 4(fr)k 8(e)k 7(y)k
+4310(H.)s 4577(Kingston)s 240 fnt82 2551 10596(Basser)m 3248(Department)s
+4436(of)s 4707(Computer)s 5724(Science,)s 3007 10308(The)m 3435(Uni)s 6(v)k 3(ersity)k
+4489(of)s 4760(Sydne)s 3(y)k 5530(2006,)s 4095 10020(Australia)m
+3739 9568(27)m 4027(January)s 15(,)k 4863(1993)s 240 fnt84
+3901 8775(SUMMAR)m 8(Y)k 240 fnt82 480 8320(Lout)m 992(is)s
+1202(a)s 1367(high-)s 1861(le)s 6(v)k 3(el)k
+2371(language)s 3291(for)s 3628(document)s 4632(formatting,)s 5746(whose)s
+6414(ease)s 6881(of)s 7151(use)s 7526(has)s 7895(permit)s
+8518(-)s 480 8032(ted)m 839(an)s 1131(unprecedented)s 2593(number)s
+3394(of)s 3674(adv)s 6(anced)k 4639(features)s 5454(to)s
+5703(be)s 5994(added)s 6633(quickly)s 7414(and)s 7828(reliably)s 15(.)k
+480 7744(This)m 942(paper)s 1518(charts)s 2125(the)s 2458(e)s 6(v)k 4(olution)k
+3395(of)s 3651(the)s 3985(design)s 4652(and)s 5042(implementation)s
+6584(of)s 6841(Lout)s 7338(from)s 7847(concep)s 8518(-)s
+480 7456(tion)m 913(in)s 1161(mid-)s 1601(1984)s 2139(to)s
+2383(public)s 3038(release)s 3761(in)s 4008(October)s 4843(1991.)s
+5491(It)s 5701(includes)s 6553(e)s 3(xtensi)k 6(v)k 3(e)k
+7505(discussions)s 480 7168(of)m 751(remaining)s 1773(problems)s 2714(and)s
+3118(possible)s 3958(solutions.)s 240 fnt84 480 6664(K)m 6(eyw)k 2(ords)k
+240 fnt82 1623 6665(document)m 2627(formatting)s 3688(typesetting)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 1 2
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt84 2897 12401(The)m 3352(Design)s 4099(and)s 4540(Implementation)s
+4239 11998(of)m 4511(the)s 2589 11595(Lout)m 3141(Document)s 4250(F)s 6(ormatting)k
+5468(Language)s 240 fnt83 3630 11097(J)m 6(ef)k 4(fr)k 8(e)k 7(y)k
+4310(H.)s 4577(Kingston)s 240 fnt82 2551 10596(Basser)m 3248(Department)s
+4436(of)s 4707(Computer)s 5724(Science,)s 3007 10308(The)m 3435(Uni)s 6(v)k 3(ersity)k
+4489(of)s 4760(Sydne)s 3(y)k 5530(2006,)s 4095 10020(Australia)m
+3739 9568(27)m 4027(January)s 15(,)k 4863(1993)s 240 fnt84
+0 8926(1.)m 291(Intr)s 4(oduction)k 240 fnt82 480 8495(Lout)m
+985([1,)s 1284(2])s 1515(is)s 1718(a)s 1877(high-le)s 6(v)k 3(el)k
+2885(language)s 3798(for)s 4129(document)s 5126(formatting,)s 6234(designed)s
+7136(and)s 7533(implemented)s 8832(by)s 0 8207(the)m 341(author)s 13(.)k
+1096(The)s 1517(implementation,)s 3117(kno)s 6(wn)k 3814(as)s
+4057(Basser)s 4747(Lout,)s 5299(is)s 5502(a)s 5661(fully)s
+6159(operational)s 7282(production)s 8368(v)s 3(ersion)k 0 7919(written)m
+736(in)s 983(C)s 1198(for)s 1540(the)s 1891(Unix)s
+2429(operating)s 3389(system,)s 153 fnt82 4100 8008(1)m 240 fnt82
+4223 7919(which)m 4869(translates)s 5824(Lout)s 6340(source)s 7023(code)s
+7535(into)s 7964(PostScript,)s 153 fnt82 8993 8008(2)m 240 fnt82
+0 7631(a)m 201(de)s 6(vice-independent)k 2164(graphics)s 3061(rendering)s
+4066(language)s 5021(accepted)s 5951(by)s 6281(man)s 3(y)k
+6900(high-resolution)s 8454(output)s 0 7343(de)m 6(vices,)k 833(including)s
+1805(most)s 2346(laser)s 2871(printers.)s 3779(Basser)s 4492(Lout)s
+5019(is)s 5244(a)s 4(v)k 6(ailable)k 6168(free)s
+6609(of)s 6895(char)s 4(ge)k 7600([3].)s 8057(It)s
+8278(includes)s 0 7055(installation)m 1118(instructions,)s 2339(C)s 2550(source,)s
+3281(se)s 6(v)k 3(en)k 3873(standard)s 4740(packages,)s
+5723(and)s 6127(complete)s 7058(documentation)s 8536(in)s 8778(the)s
+0 6767(form)m 524(of)s 795(six)s 1129(technical)s 2046(reports)s
+2760(and)s 3164(a)s 3330(manual)s 4089(page.)s 480 6393(The)m
+900(Lout)s 1404(project)s 2118(arose)s 2670(out)s 3027(of)s
+3290(the)s 3629(author')s 13(s)k 4442(desire)s 5060(to)s
+5290(bring)s 5840(to)s 6070(document)s 7066(formatting)s 8118(languages)s
+0 6105(the)m 343(ele)s 3(g)k 1(ance)k 1225(of)s
+1491(e)s 3(xpression)k 2562(found)s 3174(in)s 3411(programming)s
+4761(languages)s 5763(lik)s 2(e)k 6170(Algol-)s 6783(60)s
+7072(and)s 7471(P)s 3(ascal.)k 8236(This)s 8706(em)s
+8998(-)s 0 5817(phasis)m 638(on)s 924(e)s 3(xpressi)k 6(v)k 3(eness)k
+2373(has)s 2731(produced)s 3669(an)s 3941(order)s 4493(of)s
+4753(magnitude)s 5808(reduction)s 6757(in)s 6988(the)s 7325(cost)s
+7759(of)s 8018(de)s 6(v)k 3(eloping)k 0 5529(document)m
+998(formatting)s 2053(applications.)s 3366(F)s 3(or)k 3748(e)s 3(xample,)k
+4656(an)s 4933(equation)s 5807(formatting)s 6862(application,)s 8025(which)s
+8660(may)s 0 5241(be)m 282(dif\207cult)s 1098(or)s 1357(impossible)s
+2449(to)s 2688(add)s 3092(to)s 3331(other)s 3882(systems,)s
+4746(can)s 5135(be)s 5417(written)s 6150(in)s 6393(Lout)s
+6905(in)s 7148(a)s 7314(fe)s 6(w)k 7720(days.)s
+480 4867(When)m 1099(e)s 3(xpert)k 1742(users)s 2274(can)s
+2652(implement)s 3724(such)s 4209(applications)s 5405(quickly)s 15(,)k
+6204(non-)s 6632(e)s 3(xperts)k 7360(bene\207t.)s 8164(Although)s
+0 4579(Lout)m 509(itself)s 1053(pro)s 3(vides)k 1922(only)s
+2398(a)s 2560(small)s 3129(k)s 2(ernel)k 3775(of)s
+4042(carefully)s 4941(chosen)s 5659(primiti)s 6(v)k 3(es,)k
+6721(packages)s 7646(written)s 8375(in)s 8614(Lout)s 0 4291(and)m
+399(distrib)s 4(uted)k 1470(with)s 1946(Basser)s 2638(Lout)s
+3145(pro)s 3(vide)k 3923(an)s 4201(unprecedented)s 5649(array)s
+6187(of)s 6453(adv)s 6(anced)k 7404(features)s 8204(in)s
+8442(a)s 8602(form)s 0 4003(accessible)m 1035(to)s 1286(non-)s
+1714(e)s 3(xpert)k 2380(users.)s 3047(The)s 3487(features)s
+4305(include)s 5076(rotation)s 5888(and)s 6304(scaling,)s 7100(fonts,)s
+7697(paragraph)s 8722(and)s 0 3715(page)m 500(breaking,)s 1436(displays)s
+2263(and)s 2659(lists,)s 3141(\210oating)s 3917(\207gures)s 4611(and)s
+5007(tables,)s 5662(footnotes,)s 6651(chapters)s 7490(and)s 7886(sections)s
+8698(\(au)s 8998(-)s 0 3427(tomatically)m 1128(numbered\),)s 2272(running)s
+3070(page)s 3579(headers)s 4361(and)s 4765(footers,)s 5536(odd-)s
+5964(e)s 6(v)k 3(en)k 6464(page)s 6973(layouts,)s
+7772(automatically)s 0 3139(generated)m 975(tables)s 1570(of)s 1829(contents,)s
+2720(sorted)s 3350(inde)s 3(x)k 3(es)k 4113(and)s
+4505(reference)s 5435(lists,)s 5914(bibliographic)s 7229(and)s 7621(other)s
+8159(databases)s 0 2851(\(including)m 1038(databases)s 2008(of)s 2281(formats)s
+3064(for)s 3405(printing)s 4217(references\),)s 5386(equations,)s 6412(tables,)s
+7079(diagrams,)s 8065(formatting)s 0 2563(of)m 271(P)s 3(ascal)k
+933(programs,)s 1943(and)s 2347(automatically)s 3701(maintained)s 4821(cross)s
+5363(references.)s 480 2189(This)m 1015(paper)s 1666(charts)s 2347(the)s
+2755(e)s 6(v)k 4(olution)k 3766(of)s 4097(Lout)s
+4669(from)s 5253(conception)s 6420(in)s 6723(mid-1984)s 7768(to)s
+8067(the)s 8475(public)s 0 1901(release)m 722(of)s 997(Basser)s
+1699(Lout)s 2215(in)s 2462(October)s 3297(1991.)s 3945(Lout)s
+4461(is)s 4676(or)s 4(g)k 1(anized)k 5676(around)s
+6403(four)s 6866(k)s 2(e)k 3(y)k 7265(concepts)s
+8157(\211)s 8342(objects,)s 0 1613(de\207nitions,)m 1131(g)s 1(alle)k 3(ys,)k
+1925(and)s 2343(cross)s 2899(references)s 3944(\211)s 4138(and)s
+4556(the)s 3(y)k 5033(were)s 5567(de)s 6(v)k 3(eloped)k
+6614(in)s 6871(the)s 7233(order)s 7811(listed,)s 8449(so)s
+8730(this)s 0 1325(paper)m 593(will)s 1022(treat)s 1508(each)s
+2006(in)s 2252(turn,)s 2747(discussing)s 3800(its)s 4079(design,)s
+4814(implementation,)s 6424(problems,)s 7424(and)s 7831(prospects)s 8788(for)s
+1134 0 0 0 240 288 60 0 574 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+122 fnt82 0 379(1)m 192 fnt82 58 309(Unix)m 485(is)s
+653(a)s 786(trademark)s 1609(of)s 1825(A)s 21(T&T)k
+2370(Bell)s 2733(Laboratories.)s 122 fnt82 0 112(2)m 192 fnt82
+67 42(PostScript)m 900(is)s 1068(a)s 1201(trademark)s 2024(of)s
+2240(Adobe)s 2796(Systems,)s 3519(Incorporated.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 2 3
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Symbol
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4348 13844(-)m 4476(2)s 4650(-)s 0 13256(further)m 709(impro)s 3(v)k 3(ement.)k
+240 fnt84 0 12463(2.)m 291(Objects)s 240 fnt82 480 11987(The)m
+923(essence)s 1725(of)s 2011(an)s 3(y)k 2424(mo)s 3(v)k 3(e)k
+3021(to)s 3276(a)s 3457(higher)s 4144(le)s 6(v)k 3(el)k
+4669(is)s 4895(the)s 5258(introduction)s 6500(of)s 6786(some)s
+7363(abstraction)s 8484(which)s 0 11699(serv)m 3(es)k 639(to)s
+872(or)s 4(g)k 1(anize)k 1740(the)s 2082(lo)s 6(w-)k
+2503(le)s 6(v)k 3(el)k 3006(operations,)s 4103(resulting)s
+4986(in)s 5223(a)s 5383(more)s 5923(succinct)s 6760(e)s 3(xpression)k
+7831(of)s 8096(their)s 8586(com)s 8998(-)s 0 11411(mon)m
+475(combinations)s 1806(at)s 2030(the)s 2369(cost)s 2805(of)s
+3068(some)s 3620(loss)s 4034(of)s 4297(detailed)s 5102(control.)s
+5934(The)s 6354(early)s 6876(part)s 7298(of)s 7561(the)s
+7900(Lout)s 8403(project)s 0 11123(w)m 2(as)k 426(spent)s
+996(in)s 1245(the)s 1598(de)s 6(v)k 3(elopment)k
+2891(of)s 3167(such)s 3668(an)s 3957(abstraction)s 5067(for)s
+5411(the)s 5764(b)s 4(uilding)k 6616(blocks)s 7298(of)s
+7574(documents,)s 8724(one)s 0 10835(which)m 635(could)s 1217(e)s 3(xplain,)k
+2017(not)s 2375(just)s 2772(the)s 3113(simple)s 3798(phenomena)s
+4954(of)s 5217(w)s 2(ords,)k 5899(lines,)s 6450(and)s
+6846(paragraphs,)s 7994(b)s 4(ut)k 8348(also)s 8778(the)s
+0 10547(alignment)m 1016(of)s 1287(columns)s 2149(in)s 2392(tables,)s
+3056(and)s 3460(the)s 3808(comple)s 3(x)k 4684(nested)s
+5353(structures)s 6332(of)s 6603(equations.)s 240 fnt84 0 9898(2.1.)m
+471(The)s 926(genesis)s 1697(of)s 1969(the)s 2343(object)s
+3026(abstraction)s 240 fnt82 480 9421(When)m 1163(one)s 1620(e)s 3(xamines)k
+2626(pre)s 6(vious)k 3549(document)s 4608(formatting)s 5724(systems)s
+6587([4])s 6958(looking)s 7798(for)s 8191(ideas)s 8788(for)s
+0 9133(abstractions,)m 1245(as)s 1492(the)s 1837(author)s 2505(did)s
+2866(in)s 3106(1984,)s 3690(the)s 4035(Eqn)s 4475(formatting)s
+5533(language)s 6450([5])s 6764(stands)s 7410(out)s 7773(lik)s 2(e)k
+8182(a)s 8344(beacon.)s 0 8845(In)m 256(Eqn,)s 749(a)s
+915(mathematical)s 2256(formula)s 3072(such)s 3568(as)s 168 fnt78
+586 8390(2)m 240 fnt83 480 8330(x)m 240 fnt78 738 8322(+)m
+939(1)s gsave
+480 8274 translate
+240 fnt83 553 0 0 0 240 288 12 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto 0.05 ft setlinewidth stroke
+grestore
+
+grestore
+700 8046(4)m 240 fnt82 0 7535(is)m 210(produced)s
+1159(by)s 1453(typing)s 220 fnt35 480 7037({ x sup 2 + 1 } o)m 3(v)k 5(er 4)k
+240 fnt82 0 6541(in)m 261(the)s 627(input)s 1197(\207le;)s
+220 fnt35 1632 6538(sup)m 240 fnt82 2056 6541(and)m 220 fnt35
+2478 6538(o)m 3(v)k 5(er)k 240 fnt82 2975 6541(are)m
+3340(binary)s 4023(operators,)s 5037(and)s 5459(braces)s 6138(are)s
+6503(used)s 7018(for)s 7374(grouping.)s 8421(This)s 8916(is)s
+0 6253(document)m 1017(formatting)s 2091(at)s 2337(a)s 2516(v)s 3(ery)k
+3006(high)s 3502(le)s 6(v)k 3(el,)k 4077(close)s
+4638(to)s 4890(the)s 5252(language)s 6185(of)s 6469(mathematics)s
+7741(itself,)s 8337(with)s 8833(all)s 0 5965(reference)m 943(to)s
+1182(font)s 1627(changes)s 2449(and)s 2853(spacing)s 3637(suppressed.)s
+480 5591(Eqn)m 916(pro)s 3(vides)k 1780(a)s 1938(single)s
+2557(data)s 3008(type)s 3468(\(let)s 3837(us)s 4093(call)s
+4485(it)s 4669(the)s 240 fnt83 5009 5593(e)m 4(xpr)k 8(ession)k
+240 fnt82 6014 5591(\),)m 6192(b)s 4(uilt)k 6679(up)s
+6964(recursi)s 6(v)k 3(ely)k 8062(in)s 8297(conte)s 3(xt-)k
+0 5303(free)m 457(style:)s 1106(where)s 1778(one)s 2212(e)s 3(xpression)k
+3321(may)s 3819(appear)s 9(,)k 4586(an)s 3(y)k
+5015(e)s 3(xpression)k 6124(may)s 6622(appear)s 13(.)k
+7442(This)s 7950(approach)s 8916(is)s 0 5015(common)m 905(in)s
+1158(algebra)s 1931(and)s 2345(programming)s 3710(languages,)s 4785(where)s
+5435(its)s 5721(simplicity)s 6740(and)s 7154(e)s 3(xpressi)k 6(v)k 3(eness)k
+8625(ha)s 4(v)k 3(e)k 0 4727(long)m 478(been)s
+986(appreciated;)s 2198(b)s 4(ut)k 2559(Eqn)s 3001(w)s 2(as)k
+3421(the)s 3768(\207rst)s 4198(language)s 5117(to)s 5355(demonstrate)s
+6578(its)s 6853(utility)s 7476(in)s 7718(document)s 8720(for)s
+8998(-)s 0 4439(matting.)m 480 4065(Each)m 1015(e)s 3(xpression)k
+2092(is)s 2302(treated)s 3009(by)s 3304(Eqn)s 3747(as)s
+3997(a)s 4163(rectangle)s 5094(with)s 5577(a)s 240 fnt83
+5743 4067(horizontal)m 6787(axis)s 240 fnt82 7167 4065(,)m 7274(used)s
+7771(for)s 8110(alignment)s 0 3777(with)m 482(adjacent)s 1338(e)s 3(xpressions:)k
+553 519 0 288 240 288 60 480 2918 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+553 519 0 288 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+553 519 0 288 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+
+ ] lfigdopath
+pop pop
+grestore
+168 fnt78 106 404(2)m 240 fnt83 0 344(x)m 240 fnt78
+258 336(+)m 459(1)s gsave
+0 288 translate
+240 fnt83 553 0 0 0 240 288 12 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto 0.05 ft setlinewidth stroke
+grestore
+
+grestore
+220 60(4)m 
+grestore
+
+grestore
+end end restore
+grestore
+0 2467(The)m 425(size)s
+848(and)s 1248(rendering)s 2213(of)s 2481(the)s 2825(e)s 3(xpression)k
+3898(on)s 4191(the)s 4536(printed)s 5267(page)s 5771(are)s
+6114(kno)s 6(wn)k 6815(only)s 7291(to)s 7526(the)s
+7870(implementa)s 8998(-)s 0 2179(tion,)m 481(ne)s 6(v)k 3(er)k
+1066(e)s 3(xplicitly)k 2022(calculated)s 3051(or)s 3313(accessed)s
+4209(by)s 4506(the)s 4857(user)s 13(.)k 5409(This)s
+5888(prohibition)s 7010(is)s 7223(crucial)s 7930(to)s 8172(the)s
+8523(main)s 8998(-)s 0 1891(tenance)m 785(of)s 1055(the)s
+1402(conte)s 3(xt-)k 2171(free)s 2596(property)s 3459(in)s
+3701(practice.)s 4619(In)s 4874(Lout,)s 5432(for)s 5769(e)s 3(xample,)k
+6682(equations,)s 7705(\207gures,)s 8462(tables,)s 0 1603(and)m 393(arbitrary)s
+1256(objects)s 1972(may)s 2427(be)s 2697(mix)s 3(ed)k
+3338(together)s 4169(freely)s 15(.)k 4863(This)s 5327(w)s 2(ould)k
+5970(be)s 6241(impossible)s 7321(if)s 7526(size)s 7941(information)s
+0 1315(w)m 2(as)k 421(hidden)s 1130(from)s 1654(the)s
+2002(implementation)s 3559(in)s 3802(user)s 4260(calculations.)s 480 941(The)m
+927(object)s 1591(abstraction)s 2715(of)s 3006(Lout)s 3537(is)s
+3767(a)s 3952(direct)s 4575(descendant)s 5717(of)s 6008(the)s
+6375(Eqn)s 6838(e)s 3(xpression.)k 8041(It)s 8266(emplo)s 2(ys)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 3 4
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Symbol
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4353 13844(-)m 4481(3)s 4645(-)s 0 13253(the)m 385(same)s
+969(conte)s 3(xt-free)k 2212(recursi)s 6(v)k 3(e)k
+3171(style)s 3715(of)s 4023(construction,)s 5350(and)s 5791(each)s
+6323(object)s 7004(is)s 7251(treated)s 7995(by)s 8326(Lout)s
+8876(as)s 0 12965(a)m 166(rectangle:)s 1701 453 567 198 240 288 60 480 12172 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1701 453 567 198 240 288 60 0 0 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1701 453 567 198 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1701 453 567 198 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+end end restore
+grestore
+end end restore
+grestore
+0 11719(The)m 442(horizontal)s
+1481(axis,)s 1987(called)s 2630(a)s 240 fnt83 2810 11721(r)m 10(ow)k
+3244(mark)s 240 fnt82 3814 11719(in)m 4072(Lout,)s 4645(has)s
+5030(a)s 5210(v)s 3(ertical)k 5992(analogue)s 6926(called)s
+7569(a)s 240 fnt83 7749 11721(column)m 8523(mark)s 240 fnt82
+9019 11719(,)m 0 11431(creating)m 822(a)s 988(v)s 6(aluable)k
+1848(symmetry)s 2857(between)s 3711(horizontal)s 4735(and)s 5139(v)s 3(ertical.)k
+6014(Multiple)s 6893(column)s 7668(and)s 8072(ro)s 6(w)k
+8491(marks)s 0 11143(are)m 347(permitted:)s 1984 1189 0 1189 240 288 60 480 9614 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+680 453 0 453 240 288 60 0 736 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+680 453 0 453 240 288 60 0 0 LoutGr2
+/lfiggrey [ lfigbox ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(A) lfigpromotelabels
+grestore
+737 453 0 453 240 288 60 1247 736 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+567 453 0 453 240 288 60 0 0 LoutGr2
+/lfiggrey [ lfigbox ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(B) lfigpromotelabels
+grestore
+680 453 0 453 240 288 60 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+396 453 0 453 240 288 60 0 0 LoutGr2
+/lfiggrey [ lfigbox ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(C) lfigpromotelabels
+grestore
+737 453 0 453 240 288 60 1247 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+737 453 0 453 240 288 60 0 0 LoutGr2
+/lfiggrey [ lfigbox ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(D) lfigpromotelabels
+grestore
+0 0 0 0 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ 0.3 cm 0 A@W lfigpsub lfigprevious /FROM lfigpointdef
+B@W 1.6 cm 0 lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+0 0 0 0 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ 0.3 cm 0 C@W lfigpsub lfigprevious /FROM lfigpointdef
+D@W 1.6 cm 0 lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+0 0 0 0 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ A@NW 0 0.3 cm lfigpadd lfigprevious /FROM lfigpointdef
+0 0.3 cm C@SW lfigpsub lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+0 0 0 0 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ B@NW 0.3 cm 0.3 cm lfigpadd lfigprevious /FROM lfigpointdef
+D@SW 0.3 cm -0.3 cm lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+0 9163(so)m 266(that)s
+684(objects)s 1412(are)s 1759(able)s 2213(to)s 2452(represent)s
+3387(tables.)s 480 8789(This)m 946(abstraction)s 2041(has)s 2401(some)s
+2952(limitations,)s 4069(the)s 4407(most)s 4922(ob)s 3(vious)k
+5719(being)s 6293(the)s 6631(restriction)s 7645(of)s 7906(size)s
+8322(calcula)s 8998(-)s 0 8501(tions)m 507(to)s 736(rectangular)s
+1860(bounding)s 2809(box)s 3(es.)k 3519(Non-)s 4000(rectangular)s
+5124(and)s 5518(disconnected)s 6815(shapes)s 7494(arise)s 7990(naturally)s
+8883(in)s 0 8213(\207gures)m 704(and)s 1111(in)s 1356(the)s
+1707(characters)s 2727(of)s 3001(fonts;)s 3594(the)s 3944(e)s 3(xtension)k
+4918(to)s 5159(them)s 5700(is)s 5912(conceptually)s 7191(straightforw)s 2(ard)k
+8722(and)s 0 7925(might)m 615(help)s 1076(to)s 1311(e)s 3(xplain)k
+2066(some)s 2623(\207ne)s 3034(points)s 3667(of)s 3934(layout)s
+4588(such)s 5081(as)s 5327(k)s 2(erning.)k 6216(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+7173(there)s 7702(are)s 8045(implemen)s 8998(-)s 0 7637(tation)m
+599(and)s 1001(language)s 1918(design)s 2598(problems,)s 3592(particularly)s
+4744(when)s 5317(\207lling)s 5939(non-)s 6367(rectangular)s 7498(shapes)s
+8185(with)s 8664(te)s 3(xt,)k 0 7349(and)m 404(so)s
+670(the)s 1018(author)s 1689(chose)s 2290(to)s 2529(k)s 2(eep)k
+3032(to)s 3271(Eqn')s 13(s)k 3867(rectangles.)s 480 6975(A)m
+766(more)s 1370(fundamental)s 2676(limitation)s 3718(of)s 4045(the)s
+4450(object)s 5151(abstraction)s 6312(arises)s 6963(from)s 7543(the)s
+7948(inability)s 8855(of)s 0 6687(recursi)m 6(v)k 3(e)k
+936(data)s 1408(types)s 1978(to)s 2231(describe)s 3097(cross-link)s 2(ed)k
+4335(structures,)s 5384(which)s 6040(seem)s 6605(to)s 6858(require)s
+7604(some)s 8179(means)s 8855(of)s 0 6399(naming)m 756(the)s
+1089(multiply)s 1938(referenced)s 2988(parts.)s 3601(Lout)s 4098(is)s
+4293(obliged)s 5054(to)s 5278(introduce)s 6222(additional)s 7218(abstractions)s
+8395(to)s 8618(cope)s 0 6111(with)m 490(cross)s 1040(linking:)s
+1892(g)s 1(alle)k 3(ys)k 2624(for)s 2970(inserting)s
+3867(te)s 3(xt)k 4291(into)s 4724(pages)s 5328(\(Section)s
+6189(5.1\),)s 6683(cross)s 7233(references)s 8273(\(Section)s 0 5823(6.1\),)m
+490(and)s 898(labelled)s 1716(points)s 2356(in)s 2603(\207gure)s
+3221(dra)s 3(wing)k 4059([6].)s 4506(An)s 4860(abstraction)s
+5969(closer)s 6603(to)s 6846(h)s 1(yperte)k 3(xt)k
+7809(might)s 8431(form)s 8960(a)s 0 5535(more)m 547(uni\207ed)s
+1270(basis)s 1799(for)s 2137(these)s 2684(features.)s 240 fnt84
+0 4936(2.2.)m 471(Grammatical)s 1893(and)s 2334(lexical)s 3039(structur)s 4(e)k
+240 fnt82 480 4504(If)m 700(objects)s 1418(are)s 1755(to)s
+1984(be)s 2256(constructed)s 3406(lik)s 2(e)k 3807(mathematical)s
+5138(e)s 3(xpressions,)k 6348(the)s 6686(natural)s 7394(notation)s
+8225(is)s 8425(a)s 8580(func)s 8998(-)s 0 4216(tional)m
+599(language)s 1519(based)s 2122(on)s 2419(operators,)s 3415(as)s
+3665(in)s 3908(Eqn.)s 4458(The)s 4886(grammar)s 5808(of)s
+6079(Lout)s 6591(objects)s 7319(is)s 7529(accordingly)s 240 fnt78
+1332 3657(\256)m 1332 3324(\256)m 1332 2991(\256)m 1332 2707(\256)m 1332 2374(\256)m
+1332 2080(\256)m 1332 1747(\256)m 1332 1463(\256)m 240 fnt83 480 3665(object)m
+1826(object)s 2498(in\207xop)s 3227(object)s 1826 3332(pr)m 8(e\207xop)k
+2680(object)s 1826 2999(object)m 2498(post\207xop)s 1826 2715(nopar)m 2(sop)k
+1826 2382(liter)m 3(alwor)k 8(d)k 220 fnt35 1826 2083({)m
+240 fnt83 1974 2088(object)m 220 fnt35 2646 2083(})m 240 fnt83
+1826 1755(object)m 2498(object)s 240 fnt82 0 960(where)m 240 fnt83
+640 962(in\207xop)m 240 fnt82 1285 960(,)m 240 fnt83 1391 962(pr)m 8(e\207xop)k
+240 fnt82 2161 960(,)m 240 fnt83 2267 962(post\207xop)m 240 fnt82
+3125 960(,)m 3232(and)s 240 fnt83 3635 962(nopar)m 2(sop)k
+240 fnt82 4591 960(are)m 4938(identi\207ers)s 5943(naming)s 6713(operators)s
+7653(which)s 8294(tak)s 2(e)k 8745(0,)s 8971(1)s
+0 672(or)m 255(2)s 424(parameters,)s 1573(as)s 1819(sho)s 6(wn,)k
+2541(and)s 240 fnt83 2940 674(liter)m 3(alwor)k 8(d)k
+240 fnt82 4067 672(is)m 4272(a)s 4433(sequence)s 5362(of)s
+5628(non-space)s 6649(characters,)s 7719(or)s 7973(an)s 8251(arbitrary)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 4 5
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Italic
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4348 13844(-)m 4476(4)s 4650(-)s 0 13256(sequence)m 969(of)s
+1276(characters)s 2330(enclosed)s 3262(in)s 3541(double)s 4285(quotes.)s
+5110(Ambiguities)s 6380(are)s 6763(resolv)s 3(ed)k 7664(by)s
+7995(precedence)s 0 12968(and)m 404(associati)s 6(vity)k 15(.)k
+480 12594(The)m 941(last)s 1366(production)s 2494(allo)s 6(ws)k
+3197(a)s 3397(meaning)s 4307(for)s 4679(e)s 3(xpressions)k
+5877(such)s 6407(as)s 220 fnt35 6691 12591({})m 240 fnt82
+6828 12594(,)m 6968(in)s 7245(which)s 7921(an)s 8238(object)s
+8916(is)s 0 12306(missing.)m 907(The)s 1333(v)s 6(alue)k
+1899(of)s 2168(this)s 240 fnt83 2562 12308(empty)m 3187(object)s
+240 fnt82 3833 12306(is)m 4041(a)s 4205(rectangle)s 5135(of)s
+5404(size)s 5829(0)s 6002(by)s 6294(0,)s 6519(with)s
+6999(one)s 7399(column)s 8172(mark)s 8722(and)s 0 12018(one)m
+402(ro)s 6(w)k 822(mark,)s 1420(that)s 1838(prints)s
+2433(as)s 2683(nothing.)s 480 11644(The)m 938(second-last)s 2103(production)s
+3227(generates)s 4210(sequences)s 5261(of)s 5562(arbitrary)s 6467(objects)s
+7225(separated)s 8215(by)s 8539(white)s 0 11356(space,)m 671(called)s
+240 fnt83 1333 11358(par)m 3(a)k 2(gr)k 3(aphs)k
+240 fnt82 2439 11356(.)m 2636(Ignoring)s 3547(paragraph)s 4593(breaking)s
+5517(for)s 5888(no)s 6(w)k 15(,)k 6421(the)s
+6802(natural)s 7554(meaning)s 8464(is)s 8708(that)s 0 11068(the)m
+361(tw)s 2(o)k 784(objects)s 1525(should)s 2235(appear)s
+2946(side)s 3400(by)s 3707(side,)s 4212(and)s 4629(Lout')s 13(s)k
+5305(parser)s 5961(accordingly)s 7157(interpolates)s 8335(an)s 8632(in\207x)s
+0 10780(horizontal)m 1017(concatenation)s 2395(operator)s 3244(\(see)s 3677(belo)s 6(w\))k
+4377(between)s 5224(them.)s 5859(This)s 6328(operator)s 7177(is)s
+7380(associati)s 6(v)k 3(e,)k 8519(so)s 8778(the)s
+0 10492(grammatical)m 1262(ambiguity)s 2301(does)s 2806(no)s 3113(harm.)s
+3783(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+4758(the)s 5120(Algol-60)s 6054(rule)s 6496(that)s 6928(white)s
+7530(space)s 8132(should)s 8844(be)s 0 10204(signi\207cant)m 1056(only)s
+1536(as)s 1786(a)s 1952(separator)s 2887(is)s 3097(necessarily)s
+4212(brok)s 2(en)k 4932(by)s 5226(Lout)s 5738(in)s
+5981(just)s 6386(this)s 6782(one)s 7184(place.)s 480 9830(Algol-lik)m 2(e)k
+1506(languages)s 2504(distinguish)s 3601(literal)s 4201(strings)s 4879(from)s
+5393(identi\207ers)s 6389(by)s 6673(enclosing)s 7633(them)s 8161(in)s
+8394(quotes,)s 0 9542(b)m 4(ut)k 372(literals)s 1082(are)s
+1440(f)s 2(ar)k 1773(too)s 2143(frequent)s 3010(in)s
+3264(document)s 4278(formatting)s 5350(for)s 5699(this)s 6106(to)s
+6356(be)s 6649(viable.)s 7408(The)s 7847(con)s 9(v)k 3(entional)k
+0 9254(solution)m 829(is)s 1041(to)s 1282(be)s 3(gin)k
+1870(identi\207ers)s 2878(with)s 3362(a)s 3530(special)s 4250(character)s 9(,)k
+5224(and)s 5630(Lout)s 6144(follo)s 6(ws)k 6908(Scribe)s
+7576([7])s 7895(in)s 8140(using)s 8714(`@')s 0 8966(rather)m
+616(than)s 1085(the)s 1433(`\\')s 1690(of)s 1961(trof)s 6(f)k
+2450([8])s 2767(and)s 3171(T)s 3313 8918(E)m 3456 8966(X)m
+3685([9].)s 480 8592(Ho)m 6(we)k 6(v)k 3(er)k 9(,)k
+1447(Lout)s 1966(tak)s 2(es)k 2513(the)s 2868(unusual)s
+3675(step)s 4120(of)s 4398(making)s 5176(an)s 5466(initial)s
+6084(`@')s 6503(optional.)s 7458(The)s 7893(designers)s 8855(of)s
+0 8304(Eqn)m 449(apparently)s 1519(considered)s 2620(such)s 3122(characters)s
+4147(dis\207guring)s 5244(in)s 5494(\207ne-grained)s 6713(input)s 7272(lik)s 2(e)k
+7691(equations,)s 8722(and)s 0 8016(this)m 401(author)s 1077(agrees.)s
+1856(The)s 2289(implementation)s 3851(is)s 4066(straightforw)s 2(ard:)k
+5707(`@')s 6124(is)s 6339(classed)s 7092(as)s 7347(just)s
+7757(another)s 8539(letter)s 9(,)k 0 7728(and)m 407(e)s 6(v)k 3(ery)k
+986(w)s 2(ord)k 1537(is)s 1750(searched)s 2647(for)s
+2988(in)s 3234(the)s 3585(symbol)s 4348(table.)s 4979(If)s
+5212(it)s 5407(is)s 5620(found,)s 6289(it)s 6484(is)s
+6697(an)s 6983(identi\207er)s 9(,)k 7946(otherwise)s 8934(it)s
+0 7440(is)m 214(a)s 384(literal.)s 1107(A)s 1341(w)s 2(arning)k
+2181(message)s 3051(is)s 3265(printed)s 4004(when)s 4585(a)s
+4755(literal)s 5369(be)s 3(ginning)k 6381(with)s 6867(`@')s
+7284(is)s 7498(found,)s 8168(since)s 8719(it)s 8916(is)s
+0 7152(probably)m 905(a)s 1071(mis-spelt)s 2006(identi\207er)s 13(.)k
+3019(No)s 3365(such)s 3861(safety)s 4485(net)s 4837(is)s
+5047(possible)s 5887(for)s 6225(identi\207ers)s 7231(without)s 8022(`@'.)s
+480 6778(Equation)m 1418(formatting)s 2496(also)s 2951(demands)s 3871(symbols)s
+4737(made)s 5328(from)s 5869(punctuation)s 7074(characters,)s 8165(such)s
+8678(as)s 220 fnt35 8946 6775(+)m 240 fnt82 0 6490(and)m
+220 fnt35 404 6487(<=)m 240 fnt82 652 6490(.)m 816(It)s
+1021(is)s 1231(traditional)s 2267(to)s 2506(allo)s 6(w)k
+3085(such)s 3581(symbols)s 4430(to)s 4669(be)s 4951(juxtaposed,)s
+6095(which)s 6737(means)s 7399(that)s 7817(the)s 8165(input)s
+220 fnt35 480 6040(<=++)m 240 fnt82 0 5589(for)m 354(e)s 3(xample)k
+1234(must)s 1776(be)s 2075(interpreted)s 3184(within)s 3869(the)s
+4234(le)s 3(xical)k 4939(analyser)s 5812(by)s 6123(searching)s
+7109(the)s 7474(symbol)s 8251(table)s 8788(for)s 0 5301(its)m
+306(pre\207x)s 3(es)k 1142(in)s 1416(the)s 1795(order)s
+220 fnt35 2390 5298(<=++)m 240 fnt82 2894 5301(,)m 220 fnt35
+3032 5298(<=+)m 240 fnt82 3408 5301(,)m 220 fnt35 3546 5298(<=)m
+240 fnt82 3794 5301(.)m 3988(Although)s 4981(this)s 5408(tak)s 2(es)k
+5979(quadratic)s 6952(time,)s 7514(in)s 7788(practice)s 8630(such)s
+0 5013(sequences)m 1021(are)s 1368(too)s 1727(short)s 2265(to)s
+2504(mak)s 2(e)k 3076(a)s 3242(more)s 3789(sophisticated)s
+5095(linear)s 5698(method)s 6474(lik)s 2(e)k 6886(tries)s
+7347(w)s 2(orthwhile.)k 240 fnt84 0 4364(2.3.)m 471(Basic)s
+1073(structural)s 2149(operators)s 240 fnt82 480 3887(A)m 696(programming)s
+2036(language)s 2941(may)s 3393(be)s 3660(considered)s 4739(complete)s
+5656(when)s 6218(it)s 6395(attains)s 7054(the)s 7388(po)s 6(wer)k
+8025(of)s 8281(a)s 8432(T)s 10(uring)k 0 3599(machine,)m
+917(b)s 4(ut)k 1280(no)s 1574(such)s 2071(criterion)s
+2937(seems)s 3573(rele)s 6(v)k 6(ant)k 4390(to)s
+4630(document)s 5635(formatting.)s 6808(Instead,)s 7606(as)s 7857(the)s
+8206(language)s 0 3311(de)m 6(v)k 3(elops)k 913(and)s
+1338(ne)s 6(w)k 1806(applications)s 3033(are)s 3401(attempted,)s
+4471(de\207ciencies)s 5670(are)s 6038(e)s 3(xposed)k 6899(and)s
+7324(the)s 7693(operator)s 8570(set)s 8916(is)s 0 3023(re)m 6(vised)k
+742(to)s 981(o)s 3(v)k 3(ercome)k 1974(them.)s
+480 2649(Lout)m 1025(has)s 1429(a)s 1629(repertoire)s 2646(of)s
+2950(23)s 3268(primiti)s 6(v)k 3(e)k 4224(operators)s
+5198(\(Figure)s 5990(1\),)s 6390(which)s 7066(has)s 7470(pro)s 3(v)k 3(en)k
+8220(adequate)s 0 2361(for)m 348(a)s 525(wide)s 1056(v)s 6(ariety)k
+1778(of)s 2059(features,)s 2932(including)s 3899(equations,)s 4934(tables,)s
+5609(and)s 6023(page)s 6542(layout,)s 7257(and)s 7672(so)s
+7948(seems)s 8594(to)s 8844(be)s 0 2073(reasonably)m 1077(complete)s
+1995(in)s 2225(this)s 2607(pragmatic)s 3602(sense.)s 4270(In)s
+4513(this)s 4895(section)s 5616(we)s 5937(introduce)s 6883(the)s
+7217(eight)s 7741(concatenation)s 0 1785(and)m 424(mark-hiding)s 1680(operators.)s
+2754(T)s 19(o)k 3075(them)s 3634(f)s 2(alls)k
+4114(the)s 4482(basic)s 5047(task)s 5514(of)s 5806(assembling)s
+6956(comple)s 3(x)k 7853(objects)s 8602(from)s 0 1497(simple)m
+693(ones,)s 1239(and)s 1643(the)s 3(y)k 2106(were)s
+2626(the)s 2974(\207rst)s 3405(to)s 3644(be)s 3926(designed)s
+4835(and)s 5239(implemented.)s 480 1123(Man)m 3(y)k 1094(of)s
+1370(the)s 1723(operators)s 2668(of)s 2944(Eqn)s 3392(can)s
+3786(be)s 4073(vie)s 6(wed)k 4821(as)s 5076(b)s 4(uilding)k
+5928(small)s 6505(tables.)s 7231(A)s 7466(b)s 4(uilt-up)k
+8277(fraction,)s 0 835(for)m 367(e)s 3(xample,)k 1310(has)s
+1710(one)s 2141(column)s 2945(and)s 3379(three)s 3941(ro)s 6(ws)k
+4480(\(numerator)s 9(,)k 5669(line,)s 6163(and)s 6596(denominator\).)s
+8078(Numerous)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 5 6
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Helvetica
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4352 13841(-)m 4480(5)s 4646(-)s 240 fnt83 266 13217(object)m
+220 fnt35 974 13212(/)m 240 fnt83 1038 13217(gap)m 1511(object)s
+240 fnt82 3816 13215(V)m 26(ertical)k 4613(concatenation)s 5998(with)s
+6480(mark)s 7032(alignment)s 240 fnt83 266 12929(object)m 220 fnt35
+974 12924(//)m 240 fnt83 1099 12929(gap)m 1572(object)s 240 fnt82
+3816 12927(V)m 26(ertical)k 4613(concatenation)s 5998(with)s 6480(left)s
+6857(justi\207cation)s 240 fnt83 266 12641(object)m 220 fnt35 974 12636(|)m
+240 fnt83 1011 12641(gap)m 1484(object)s 240 fnt82 3816 12639(Horizontal)m
+4893(concatenation)s 6278(with)s 6760(mark)s 7312(alignment)s 240 fnt83
+266 12353(object)m 220 fnt35 974 12348(||)m 240 fnt83 1068 12353(gap)m
+1541(object)s 240 fnt82 3816 12351(Horizontal)m 4893(concatenation)s 6278(with)s
+6760(top-justi\207cation)s 240 fnt83 266 12065(object)m 220 fnt35 974 12060(&)m
+240 fnt83 1116 12065(gap)m 1589(object)s 240 fnt82 3816 12063(Horizontal)m
+4893(concatenation)s 6278(within)s 6946(paragraphs)s 220 fnt35 266 11772(@OneCol)m
+240 fnt83 1338 11777(object)m 240 fnt82 3816 11775(Hide)m 4337(all)s
+4630(b)s 4(ut)k 4992(one)s 5394(column)s 6169(mark)s
+6721(of)s 240 fnt83 6992 11777(object)m 220 fnt35 266 11484(@OneRo)m 3(w)k
+240 fnt83 1457 11489(object)m 240 fnt82 3816 11487(Hide)m 4337(all)s
+4630(b)s 4(ut)k 4992(one)s 5394(ro)s 6(w)k
+5814(mark)s 6366(of)s 240 fnt83 6637 11489(object)m 266 11201(font)m
+220 fnt35 762 11196(@F)m 6(ont)k 240 fnt83 1534 11201(object)m
+240 fnt82 3816 11199(Render)m 240 fnt83 4567 11201(object)m 240 fnt82
+5215 11199(in)m 5458(nominated)s 6526(font)s 240 fnt83 266 10913(br)m 8(eakstyle)k
+220 fnt35 1353 10908(@Break)m 240 fnt83 2269 10913(object)m 240 fnt82
+3816 10911(Break)m 4448(paragraphs)s 5548(of)s 240 fnt83 5819 10913(object)m
+240 fnt82 6467 10911(in)m 6710(nominated)s 7778(style)s 240 fnt83
+266 10625(spacestyle)m 220 fnt35 1361 10620(@Space)m 240 fnt83 2318 10625(object)m
+240 fnt82 3816 10623(Render)m 4567(spaces)s 5242(between)s 6096(w)s 2(ords)k
+6730(in)s 6973(nominated)s 8041(style)s 240 fnt83 266 10337(length)m
+220 fnt35 979 10332(@Wide)m 240 fnt83 1813 10337(object)m 240 fnt82
+3816 10335(Render)m 240 fnt83 4567 10337(object)m 240 fnt82 5215 10335(to)m
+5454(width)s 240 fnt83 6056 10337(length)m 266 10049(length)m 220 fnt35
+979 10044(@High)m 240 fnt83 1758 10049(object)m 240 fnt82 3816 10047(Render)m
+240 fnt83 4567 10049(object)m 240 fnt82 5215 10047(to)m 5454(height)s
+240 fnt83 6112 10049(length)m 220 fnt35 266 9756(@HExpand)m 240 fnt83
+1499 9761(object)m 240 fnt82 3816 9759(Expand)m 4606(horizontal)s 5630(g)s 1(aps)k
+6119(to)s 6358(\207ll)s 6678(a)s 4(v)k 6(ailable)k
+7586(space)s 220 fnt35 266 9468(@VExpand)m 240 fnt83 1487 9473(object)m
+240 fnt82 3816 9471(Expand)m 4606(v)s 3(ertical)k 5373(g)s 1(aps)k
+5862(to)s 6101(\207ll)s 6421(a)s 4(v)k 6(ailable)k
+7329(space)s 220 fnt35 266 9180(@HScale)m 240 fnt83 1307 9185(object)m
+240 fnt82 3816 9183(Horizontal)m 4893(geometrical)s 6075(scaling)s 6805(to)s
+7044(\207ll)s 7364(a)s 4(v)k 6(ailable)k 8272(space)s
+220 fnt35 266 8892(@VScale)m 240 fnt83 1295 8897(object)m 240 fnt82
+3816 8895(V)m 26(ertical)k 4613(geometrical)s 5795(scaling)s 6525(to)s
+6764(\207ll)s 7084(a)s 4(v)k 6(ailable)k 7992(space)s
+240 fnt83 266 8609(angle)m 220 fnt35 911 8604(@Rotate)m 240 fnt83
+1892 8609(object)m 240 fnt82 3816 8607(Rotate)m 240 fnt83 4496 8609(object)m
+240 fnt82 5144 8607(by)m 240 fnt83 5438 8609(angle)m 266 8321(P)m 19(ostScript)k
+220 fnt35 1367 8316(@Gr)m 2(aphic)k 240 fnt83 2471 8321(object)m
+240 fnt82 3816 8319(Escape)m 4549(to)s 4788(graphics)s 5649(language)s
+220 fnt35 266 8028(@Ne)m 6(xt)k 240 fnt83 1050 8033(object)m
+240 fnt82 3816 8031(Add)m 4287(1)s 4442(to)s 4681(an)s
+4964(object)s 5608(denoting)s 6499(a)s 6665(number)s 240 fnt83
+266 7745(object)m 220 fnt35 974 7740(@Case)m 240 fnt83 1821 7745(alternatives)m
+240 fnt82 3816 7743(Select)m 4459(from)s 4983(a)s 5149(set)s
+5474(of)s 5745(alternati)s 6(v)k 3(e)k 6799(objects)s
+240 fnt83 266 7457(identi\207er)m 220 fnt35 1254 7452(&&)m 240 fnt83
+1662 7457(object)m 240 fnt82 3816 7455(Cross)m 4412(reference)s 240 fnt83
+266 7169(cr)m 10(oss-r)k 8(efer)k 8(ence)k 220 fnt35
+1839 7164(@Open)m 240 fnt83 2705 7169(object)m 240 fnt82 3816 7167(Retrie)m 6(v)k 3(e)k
+4672(v)s 6(alue)k 5240(from)s 5764(cross)s 6306(reference)s
+240 fnt83 266 6881(cr)m 10(oss-r)k 8(efer)k 8(ence)k
+220 fnt35 1839 6876(@T)m 26(agged)k 240 fnt83 2888 6881(object)m
+240 fnt82 3816 6879(Attach)m 4510(cross)s 5052(referencing)s 6192(tag)s
+6537(to)s 6776(object)s 240 fnt84 472 6199(Figur)m 4(e)k
+1201(1.)s 1492(The)s 1947(23)s 2240(primiti)s 2(v)k 2(e)k
+3233(operators)s 4270(of)s 4542(Lout,)s 5148(in)s 5403(order)s
+6032(of)s 6304(incr)s 4(easing)k 7405(pr)s 4(ecedence.)k
+240 fnt82 0 5562(in)m 9(v)k 3(estig)k 1(ations)k
+1377(of)s 1660(this)s 2068(kind)s 2564(con)s 9(vinced)k
+3609(the)s 3969(author)s 4652(that)s 5082(operators)s 6034(capable)s
+6832(of)s 7115(assembling)s 8256(the)s 8616(ro)s 6(ws)k
+0 5274(and)m 404(columns)s 1266(of)s 1537(tables)s 2145(w)s 2(ould)k
+2800(suf\207ce)s 3493(for)s 3831(b)s 4(uilding)k 4678(all)s
+4971(kinds)s 5541(of)s 5812(objects.)s 480 4900(The)m 906(simplest)s
+1759(objects)s 2485(are)s 2829(empty)s 3479(objects)s 4204(and)s
+4605(literal)s 5213(w)s 2(ords)k 5844(lik)s 2(e)k
+220 fnt35 6254 4897(metempsychosis)m 240 fnt82 7882 4900(,)m 7986(which)s
+8625(ha)s 4(v)k 3(e)k 0 4612(one)m 402(column)s
+1177(mark)s 1729(and)s 2133(one)s 2535(ro)s 6(w)k
+2955(mark:)s 1572 215 0 106 240 288 60 480 4106 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1572 215 0 106 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1572 215 0 106 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 52(metempsychosis)m 
+grestore
+
+grestore
+end end restore
+grestore
+0 3655(T)m 19(o)k 337(place)s
+934(tw)s 2(o)k 1381(arbitrary)s 2294(objects)s 3059(side)s
+3537(by)s 3868(side,)s 4398(we)s 4770(use)s 5182(the)s
+5567(in\207x)s 6099(operator)s 220 fnt35 6992 3652(|)m 240 fnt82
+7029 3655(,)m 7173(denoting)s 8102(horizontal)s 0 3367(concatenation.)m 1492(F)s 3(or)k
+1881(e)s 3(xample,)k 220 fnt35 480 2866(USA  |0.2i  A)m 6(ustr)k 2(alia)k
+240 fnt82 0 2411(produces)m 915(the)s 1263(object)s 476 166 0 57 240 288 60 480 1905 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 3(USA)m
+
+grestore
+
+grestore
+end end restore
+grestore
+875 166 0 57 240 288 60 1244 1905 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+875 165 0 56 240 288 60 0 1 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+875 165 0 56 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 2(Australia)m 
+grestore
+
+grestore
+end end restore
+grestore
+0 1454(The)m 443(ro)s 6(w)k 879(marks)s
+1529(are)s 1892(mer)s 4(ged)k 2678(into)s 3119(one,)s
+3587(\207xing)s 4215(the)s 4579(v)s 3(ertical)k 5361(position)s
+6205(of)s 6491(the)s 6855(objects)s 7598(relati)s 6(v)k 3(e)k
+8376(to)s 8631(each)s 0 1166(other;)m 611(their)s 1116(horizontal)s
+2148(separation)s 3196(is)s 3414(determined)s 4555(by)s 4857(the)s
+240 fnt83 5214 1168(gap)m 240 fnt82 5635 1166(attached)m 6497(to)s
+6744(the)s 7101(operator)s 9(,)k 8003(in)s 8254(this)s
+8659(case)s 0 878(0.2)m 361(inches.)s 1143(W)s 19(e)k
+1519(think)s 2080(of)s 2358(the)s 2713(g)s 1(ap)k
+3118(as)s 3376(part)s 3814(of)s 4092(the)s 4448(operator)s 9(,)k
+5349(although)s 6251(strictly)s 6974(it)s 7174(is)s 7391(a)s
+7564(third)s 8081(parameter)s 13(.)k 0 590(It)m 205(may)s
+671(be)s 953(omitted,)s 1790(def)s 2(aulting)k 2810(to)s
+220 fnt35 3049 587(0i)m 240 fnt82 3205 590(.)m 240 fnt83
+480 218(V)m 26(ertical)k 1294(concatenation)s 240 fnt82 2644 216(,)m
+2762(denoted)s 3590(by)s 3895(the)s 4254(in\207x)s 4760(operator)s
+220 fnt35 5627 213(/)m 240 fnt82 5691 216(,)m 5809(is)s
+6031(the)s 6390(same)s 6948(apart)s 7497(from)s 8032(the)s
+8392(change)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 6 7
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4348 13842(-)m 4476(6)s 4649(-)s 0 13251(of)m 271(direction:)s
+220 fnt35 480 12800(A)m 6(ustr)k 2(alia  /0.1i  USA)k 240 fnt82
+0 12345(produces)m 915(the)s 1263(object)s 875 165 0 56 240 288 60 480 11840 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+875 165 0 56 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+875 165 0 56 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 2(Australia)m 
+grestore
+
+grestore
+end end restore
+grestore
+875 165 0 57 240 288 60 480 11531 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 3(USA)m
+
+grestore
+
+grestore
+end end restore
+grestore
+0 11080(with)m 482(column)s 1257(marks)s 1892(mer)s 4(ged)k
+2663(and)s 3067(a)s 3233(0.1)s 3568(inch)s 4037(g)s 1(ap.)k
+480 10706(Consider)m 1404(no)s 6(w)k 1865(what)s 2390(happens)s
+3226(when)s 3802(horizontal)s 4826(and)s 5230(v)s 3(ertical)k
+5997(are)s 6344(combined:)s 220 fnt35 1000 10205({)m 1186(USA)s
+2442(|0.2i)s 2958(A)s 6(ustr)k 2(alia)k 3919(})s
+480 9917(/0.1i)m 1000({)s 1186(W)s 8(ashington)k 2442(|)s
+2958(Canberr)s 2(a)k 3987(})s 240 fnt82 0 9418(The)m
+445(tw)s 2(o)k 872(parameters)s 1987(of)s 220 fnt35
+2275 9415(/)m 240 fnt82 2416 9418(no)m 6(w)k 2895(ha)s 4(v)k 3(e)k
+3413(tw)s 2(o)k 3840(column)s 4632(marks)s 5284(each,)s
+5846(and)s 6268(the)s 3(y)k 6748(will)s 7191(be)s
+7490(mer)s 4(ged)k 8278(with)s 8778(the)s 0 9130(corresponding)m
+1422(marks)s 2057(in)s 2300(the)s 2648(other)s 3199(parameter)s 9(,)k
+4251(yielding)s 5088(the)s 5436(object)s 476 166 0 57 240 288 60 480 8624 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 3(USA)m 
+grestore
+
+grestore
+end end restore
+grestore
+659 166 0 57 240 288 60 956 8624 LoutGr2
+0 ymark moveto xsize 10 pt add ymark lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+876 166 0 57 240 288 60 1903 8624 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+875 165 0 56 240 288 60 0 1 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+875 165 0 56 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 2(Australia)m
+
+grestore
+
+grestore
+end end restore
+grestore
+1135 215 0 106 240 288 60 480 8265 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1135 215 0 106 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1135 215 0 106 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 52(W)m 19(ashington)k 
+grestore
+
+grestore
+end end restore
+grestore
+876 215 0 106 240 288 60 1903 8265 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+876 166 0 57 240 288 60 0 49 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+876 166 0 57 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 3(Canberra)m 
+grestore
+
+grestore
+end end restore
+grestore
+0 7814(The)m 220 fnt35
+425 7811(0.2i)m 240 fnt82 821 7814(g)m 1(ap)k 1216(separates)s
+2139(columns,)s 3054(not)s 3416(indi)s 6(vidual)k 4432(items)s
+4997(in)s 5237(columns,)s 6152(so)s 6414(a)s 6577(g)s 1(ap)k
+6972(attached)s 7823(to)s 8059(the)s 8403(second)s 220 fnt35
+0 7523(|)m 240 fnt82 96 7526(w)m 2(ould)k 749(serv)s 3(e)k
+1304(no)s 1595(purpose;)s 2464(an)s 3(y)k 2859(such)s
+3353(g)s 1(ap)k 3749(is)s 3957(ignored.)s 4851(If)s
+5079(the)s 5425(number)s 6214(of)s 6484(marks)s 7117(to)s
+7354(be)s 7634(mer)s 4(ged)k 8403(dif)s 6(fers,)k
+0 7238(empty)m 638(columns)s 1485(are)s 1818(added)s 2433(at)s
+2651(the)s 2984(right)s 3481(to)s 3705(equalize)s 4542(the)s
+4876(number)s 13(.)k 5743(The)s 6157(four)s 6600(marks)s
+7221(protruding)s 8269(from)s 8778(the)s 0 6950(result)m 601(are)s
+959(all)s 1263(a)s 4(v)k 6(ailable)k 2182(for)s
+2531(mer)s 4(ging)k 3389(with)s 3882(neighbouring)s 5223(marks)s
+5869(by)s 6174(other)s 6736(concatenation)s 8133(operators.)s 0 6662(The)m
+428(precedence)s 1559(of)s 220 fnt35 1830 6659(|)m 240 fnt82
+1927 6662(is)m 2137(higher)s 2808(than)s 3277(the)s 3625(precedence)s
+4756(of)s 220 fnt35 5027 6659(/)m 240 fnt82 5091 6662(,)m
+5198(so)s 5464(the)s 5812(braces)s 6473(could)s 7063(be)s
+7345(omitted.)s 480 6288(When)m 1131(lines)s 1656(of)s 1950(te)s 3(xt)k
+2387(are)s 2757(concatenated,)s 4135(it)s 4349(is)s 4582(con)s 9(v)k 3(entional)k
+5884(to)s 6145(measure)s 7020(their)s 7540(separation)s 8602(from)s
+0 6000(baseline)m 832(to)s 1063(baseline)s 1894(\(mark)s 2517(to)s
+2748(mark)s 3292(in)s 3527(Lout\),)s 4157(rather)s 4765(than)s
+5226(from)s 5742(edge)s 6242(to)s 6473(edge)s 6973(as)s
+7215(abo)s 3(v)k 3(e.)k 7937(This)s 8405(idea)s
+8855(of)s 0 5712(dif)m 6(ferent)k 863(reference)s 1794(points)s
+2417(for)s 2743(measurement)s 4065(e)s 6(v)k 4(olv)k 3(ed)k
+4855(o)s 3(v)k 3(er)k 5322(the)s 5658(years)s
+6200(into)s 6613(a)s 6767(system)s 7478(of)s 7737(six)s
+240 fnt83 8059 5714(gap)m 8459(modes)s 240 fnt82 0 5424(\(Figure)m
+769(2\),)s 1085(e)s 3(xpressed)k 2094(by)s 2398(appending)s
+3460(a)s 3636(letter)s 4195(to)s 4445(the)s 4803(length.)s
+5576(F)s 3(or)k 5975(e)s 3(xample,)k 220 fnt35
+6899 5421(|0.2i)m 240 fnt82 7366 5424(is)m 7586(an)s 7880(abbre)s 6(viation)k
+0 5136(for)m 220 fnt35 377 5133(|0.2ie)m 240 fnt82 901 5136(,)m
+1047(meaning)s 1963(0.2)s 2356(inches)s 3057(measured)s 4070(from)s
+4633(edge)s 5180(to)s 5458(edge;)s 220 fnt35 6061 5133(|0.3ix)m
+240 fnt82 6678 5136(produces)m 7632(a)s 7837(0.3)s 8220(inch)s
+8728(g)s 1(ap)k 0 4848(measured)m 972(from)s 1493(mark)s
+2043(to)s 2279(mark)s 2829(and)s 3230(widened)s 4097(if)s
+4311(necessary)s 5292(to)s 5528(pre)s 6(v)k 3(ent)k
+6294(o)s 3(v)k 3(erstriking;)k 7552(and)s 220 fnt35
+7954 4845(|2.5it)m 240 fnt82 8478 4848(places)m 0 4560(its)m 273(right)s
+781(parameter)s 1792(2.5)s 2135(inches)s 2794(from)s 3314(the)s
+3659(current)s 4392(left)s 4766(mar)s 4(gin,)k 5543(irrespecti)s 6(v)k 3(e)k
+6699(of)s 6967(the)s 7312(position)s 8137(of)s 8405(the)s
+8749(left)s 0 4272(parameter)m 13(.)k 1098(There)s 1704(is)s
+1907(also)s 2338(a)s 2496(choice)s 3169(of)s 3433(ele)s 6(v)k 3(en)k
+4098(units)s 4606(of)s 4870(measurement)s 6197(\(inches,)s 6987(centimetres,)s
+8186(multiples)s 0 3984(of)m 288(the)s 654(current)s 1407(font)s
+1870(size,)s 2365(etc.\),)s 2907(the)s 3272(most)s 3815(interesting)s
+4894(being)s 5496(the)s 220 fnt35 5862 3981(r)m 240 fnt82
+6012 3984(unit:)m 6568(one)s 220 fnt35 6987 3981(r)m 240 fnt82
+7138 3984(is)m 7365(the)s 7731(column)s 8524(width)s 0 3696(minus)m
+635(the)s 982(width)s 1583(of)s 1852(the)s 2199(follo)s 6(wing)k
+3175(object,)s 3864(so)s 4129(that)s 220 fnt35 4546 3693(|1r)m -8(t)k
+240 fnt82 4921 3696(produces)m 5835(suf\207cient)s 6783(space)s 7368(to)s
+7606(right)s 8116(justify)s 8778(the)s 0 3408(follo)m 6(wing)k
+987(object,)s 1688(and)s 220 fnt35 2103 3405(|0.5r)m -8(t)k
+240 fnt82 2673 3408(to)m 2923(center)s 3576(it.)s 3883(These)s
+4520(features)s 5337(implement)s 6429(spacings)s 7315(needed)s 8061(in)s
+8315(practice)s 0 3120(rather)m 608(than)s 1069(suggested)s 2063(by)s
+2349(theory)s 15(.)k 3101(The)s 3(y)k 3636(w)s 2(ork)k
+4179(with)s 4653(all)s 4938(\207v)s 3(e)k 5342(concatenation)s
+6719(operators,)s 7707(horizontal)s 8722(and)s 0 2832(v)m 3(ertical.)k
+480 2458(When)m 1113(we)s 1452(construct)s 2392(a)s 2562(b)s 4(uilt-up)k
+3372(fraction,)s 4225(the)s 4577(result)s 5171(has)s 5545(three)s
+6082(ro)s 6(w)k 6506(marks,)s 7201(b)s 4(ut)k
+7567(only)s 8051(the)s 8403(second)s 0 2170(should)m 697(be)s
+979(visible)s 1672(outside)s 2419(the)s 2767(object:)s gsave
+480 1339 translate
+240 fnt83 156 491 0 288 240 288 12 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+156 491 0 288 240 288 12 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+156 491 0 288 240 288 12 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 336(X)m
+156 0 0 0 240 288 12 0 288 LoutGr2
+0 0 moveto xsize 0 lineto 0.05 ft setlinewidth stroke
+grestore
+
+grestore
+2 68(Y)m 
+grestore
+
+grestore
+end end restore
+grestore
+0 888(This)m 493(is)s 721(a)s 905(common)s
+1817(problem,)s 2739(and)s 3161(accordingly)s 4361(a)s 220 fnt35
+4545 885(@OneRo)m 3(w)k 240 fnt82 5694 888(operator)m 6567(w)s 2(as)k
+7006(introduced)s 8105(for)s 8461(hiding)s 0 600(all)m 291(b)s 4(ut)k
+650(one)s 1050(of)s 1318(the)s 1663(ro)s 6(w)k
+2081(marks)s 2713(of)s 2981(its)s 3255(parameter)s 13(.)k
+4357(Normally)s 15(,)k 5363(the)s 5708(\207rst)s 6136(mark)s
+6686(is)s 6893(the)s 7238(survi)s 6(v)k 4(or)k 9(,)k
+8121(b)s 4(ut)k 8480(a)s 8643(later)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 7 8
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Italic
+%%+ font Symbol
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4351 13848(-)m 4479(7)s 4647(-)s 6693 8221 0 8221 240 288 60 1186 5201 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+0 7447(Edge-to-edge)m 220 fnt35
+1786 7444(|)m 240 fnt83 1843 7449(length)m 220 fnt35 2456 7444(e)m
+240 fnt82 0 6238(Hyphenation)m 220 fnt35 1786 6235(|)m 240 fnt83
+1843 6240(length)m 220 fnt35 2456 6235(h)m 240 fnt82 0 5029(Ov)m 3(erstrik)k 2(e)k
+220 fnt35 1786 5026(|)m 240 fnt83 1843 5031(length)m 220 fnt35
+2456 5026(o)m 240 fnt82 0 3820(Mark-to-mark)m 220 fnt35 1786 3817(|)m
+240 fnt83 1843 3822(length)m 220 fnt35 2456 3817(x)m 240 fnt82
+0 2611(K)m 6(erning)k 220 fnt35 1786 2608(|)m 240 fnt83
+1843 2613(length)m 220 fnt35 2456 2608(k)m 240 fnt82 0 1402(T)m 19(ab)k 4(ulation)k
+220 fnt35 1786 1399(|)m 240 fnt83 1843 1404(length)m 220 fnt35
+2456 1399(t)m gsave
+3291 0 translate
+240 fnt82 3402 8221 0 8221 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+567 7485 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 7371 translate
+180 fnt82 2722 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 7485 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 7371 translate
+180 fnt82 851 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2267 7395 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 1020 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+1247 7395 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+1247 7395 translate
+180 fnt82 1020 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+1247 7395 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+180 fnt83 1534 7192(length)m gsave
+567 6304 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 6190 translate
+180 fnt82 2722 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 6304 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 6190 translate
+180 fnt82 851 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2267 6214 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 1020 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+1247 6214 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+1247 6214 translate
+180 fnt82 1020 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+1247 6214 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+1534 6011(length)m gsave
+567 5123 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 5009 translate
+180 fnt82 2722 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 5123 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 5009 translate
+180 fnt82 851 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2551 4976 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+680 4976 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+680 4976 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+680 4976 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+1392 4774(length)m
+gsave
+567 3886 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 3772 translate
+180 fnt82 2722 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 3886 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 3772 translate
+180 fnt82 851 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2551 3739 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+680 3739 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+680 3739 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+680 3739 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+180 fnt82 941 3536(max)m 180 fnt78 1256 3531(\()m 180 fnt83
+1319 3537(length)m 180 fnt78 1774 3531(,)m 180 fnt83 1854 3537(a)m
+180 fnt78 1994 3531(+)m 180 fnt83 2145 3537(b)m 180 fnt78
+2240 3531(\))m gsave
+1247 4363 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 567 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+680 4363 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+680 4363 translate
+180 fnt82 567 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+680 4363 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+180 fnt83 920 4431(a)m gsave
+2551 4363 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 283 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+2268 4363 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+2268 4363 translate
+180 fnt82 283 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+2268 4363 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+2366 4387(b)m gsave
+567 2590 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 2476 translate
+180 fnt82 2722 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 2590 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 2476 translate
+180 fnt82 851 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2551 2443 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+680 2443 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+680 2443 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+680 2443 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+180 fnt82
+999 2240(max)m 180 fnt78 1314 2235(\()m 180 fnt83 1377 2241(length)m
+180 fnt78 1832 2235(,)m 180 fnt83 1912 2241(a)m 180 fnt78
+2007 2235(,)m 180 fnt83 2087 2241(b)m 180 fnt78 2182 2235(\))m
+gsave
+1247 3067 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 567 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+680 3067 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+680 3067 translate
+180 fnt82 567 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+680 3067 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+180 fnt83 920 3135(a)m gsave
+2551 3067 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 283 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+2268 3067 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+2268 3067 translate
+180 fnt82 283 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+2268 3067 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+2366 3091(b)m gsave
+567 1438 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 1324 translate
+180 fnt82 2722 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 1438 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 1324 translate
+180 fnt82 851 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 1234 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 2268 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+0 1234 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 1234 translate
+180 fnt82 2268 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 1234 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+1587 1032(length)m gsave
+3402 734 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 3402 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+0 734 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 734 translate
+180 fnt82 3402 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 734 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+1189 523(curr)m 6(ent)k
+1759(bound)s 
+grestore
+end end restore
+grestore
+240 fnt84 0 4610(Figur)m 4(e)k 774(2.)s
+1110(The)s 1610(six)s 1991(gap)s 2462(modes)s 3212(\()s
+240 fnt83 3285 4613(length)m 240 fnt84 3984 4610(is)m 4242(any)s
+4716(length\).)s 5648(Hyphenation)s 7078(mode)s 7737(has)s 8182(an)s
+8537(extra)s 0 4322(pr)m 4(operty)k 955(not)s 1347(sho)s 2(wn)k
+2053(her)s 4(e.)k 240 fnt82 0 3685(mark)m 552(can)s
+941(be)s 1223(chosen)s 1945(by)s 2239(pre\207xing)s 220 fnt35
+3156 3682(^)m 240 fnt82 3322 3685(to)m 3561(the)s 3909(preceding)s
+4905(concatenation)s 6290(operator:)s 220 fnt35 480 3184(@OneRo)m 3(w { X  ^/2p  @HLine  /2p  )k 19(Y })k
+240 fnt82 0 2688(has)m 396(the)s 770(desired)s 1545(result,)s
+2208(where)s 220 fnt35 2874 2685(2p)m 240 fnt82 3197 2688(is)m
+3433(tw)s 2(o)k 3870(points)s 4532(and)s 220 fnt35
+4962 2685(@HLine)m 240 fnt82 5836 2688(is)m 6072(an)s 6381(easy)s
+6887(combination)s 8166(of)s 8464(Lout')s 13(s)k 0 2400(graphics)m
+861(operators.)s 1914(A)s 2144(similar)s 2866(operator)s 9(,)k
+220 fnt35 3760 2397(@OneCol)m 240 fnt82 4712 2400(,)m 4819(hides)s
+5375(column)s 6150(marks.)s 480 2026(A)m 728(v)s 6(ariant)k
+1463(of)s 220 fnt35 1753 2023(/)m 240 fnt82 1895 2026(called)m
+220 fnt35 2542 2023(//)m 240 fnt82 2745 2026(is)m 2974(pro)s 3(vided)k
+3898(which)s 4558(performs)s 5490(v)s 3(ertical)k 6275(concatenation)s
+7679(b)s 4(ut)k 8059(ignores)s 8833(all)s 0 1738(column)m
+775(marks)s 1410(and)s 1814(simply)s 2519(left-justi\207es)s 3709(its)s
+3985(tw)s 2(o)k 4395(parameters:)s 220 fnt35 480 1237(Heading  //0.1i)m
+480 949(A  |0.2i  B  /0.1i)m 480 661(C  |  D)m 240 fnt82 0 206(has)m 370(result)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 8 9
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4351 13844(-)m 4479(8)s 4646(-)s 480 13253(Heading)m 480 12896(A)m
+938(B)s 480 12590(C)m 938(D)s 0 12136(sho)m 6(wing)k
+883(that)s 1325(spanning)s 2267(columns)s 3153(in)s 3420(tables)s
+4052(moti)s 6(v)k 6(ate)k 4956(the)s 5328(inclusion)s
+6286(of)s 6581(this)s 7001(operator)s 13(.)k 7972(There)s
+8609(is)s 8843(an)s 0 11848(analogous)m 220 fnt35 1029 11845(||)m
+240 fnt82 1191 11848(operator)m 13(.)k 2145(The)s 2581(author)s
+3259(w)s 2(ould)k 3922(ha)s 4(v)k 3(e)k
+4430(preferred)s 5370(to)s 5616(lea)s 4(v)k 3(e)k
+6177(out)s 6550(these)s 7105(operators,)s 8108(since)s 8663(the)s 3(y)k
+0 11560(complicate)m 1104(the)s 1452(implementation,)s 3059(and)s 3463(it)s
+3655(is)s 3865(interesting)s 4926(to)s 5165(e)s 3(xamine)k
+6028(the)s 6376(prospects)s 7330(of)s 7601(doing)s 8200(so.)s
+480 11186(The)m 220 fnt35 953 11183(//)m 240 fnt82 1184 11186(operator)m
+2086(is)s 2342(formally)s 3263(redundant,)s 4373(because)s 5232(in)s
+5521(general)s 6324(the)s 6718(e)s 3(xpression)k 220 fnt35
+7841 11183(x // y)m 240 fnt82 8409 11186(can)m 8844(be)s 0 10898(replaced)m
+867(by)s 220 fnt35 480 10397(@OneCol {  |  x  }   /)m 480 10109(@OneCol {  |  y  })m 240 fnt82
+0 9611(for)m 338(an)s 3(y)k 734(objects)s 220 fnt35
+1462 9608(x)m 240 fnt82 1629 9611(and)m 220 fnt35 2032 9608(y)m
+240 fnt82 2140 9611(.)m 2304(By)s 2637(concatenating)s 4017(an)s
+4300(empty)s 4951(object)s 5594(at)s 5826(the)s 6173(left)s
+6549(of)s 220 fnt35 6820 9608(x)m 240 fnt82 6987 9611(and)m
+7390(hiding)s 8055(all)s 8347(b)s 4(ut)k 8708(that)s
+0 9323(empty)m 641(object')s 13(s)k 1423(column)s 2186(mark,)s
+2772(we)s 3095(ef)s 6(fecti)k 6(v)k 3(ely)k
+4143(shift)s 220 fnt35 4615 9320(x)m 240 fnt82 4723 9323(')m 13(s)k
+4921(column)s 5684(mark)s 6224(to)s 6452(its)s 6716(left)s
+7081(edge.)s 7685(The)s 8101(same)s 8636(goes)s 0 9035(for)m
+220 fnt35 349 9032(y)m 240 fnt82 457 9035(,)m 575(so)s
+852(the)s 220 fnt35 1211 9032(/)m 240 fnt82 1347 9035(operator)m
+2214(has)s 2595(just)s 3011(one)s 3424(column)s 4211(mark)s
+4774(to)s 5024(mer)s 4(ge,)k 5735(at)s 5978(the)s
+6338(e)s 3(xtreme)k 7171(left,)s 7606(and)s 8021(its)s
+8308(ef)s 6(fect)k 8916(is)s 0 8747(indistinguishable)m 1690(from)s
+220 fnt35 2214 8744(//)m 240 fnt82 2339 8747(.)m 480 8373(Unfortunately)m 15(,)k
+1915(if)s 220 fnt35 2134 8370(y)m 240 fnt82 2304 8373(consists)m
+3114(of)s 3387(tw)s 2(o)k 3799(ro)s 6(ws)k
+4311(separated)s 5274(by)s 220 fnt35 5570 8370(/)m 240 fnt82
+5634 8373(,)m 5743(as)s 5995(in)s 6240(the)s 6590(e)s 3(xample)k
+7455(abo)s 3(v)k 3(e,)k 8130(both)s 8616(ro)s 6(ws)k
+0 8085(must)m 533(be)s 823(placed)s 1513(inside)s 2148(the)s
+220 fnt35 2504 8082(@OneCol)m 240 fnt82 3456 8085(,)m 3571(and)s
+3983(the)s 4340(table)s 4868(cannot)s 5574(be)s 5864(entered)s
+6633(in)s 6884(the)s 7240(simple)s 7942(ro)s 6(w-by-ro)k 6(w)k
+0 7797(manner)m 777(that)s 1194(non-e)s 3(xpert)k 2287(users)s
+2828(naturally)s 3731(e)s 3(xpect.)k 4515(Another)s 5359(adv)s 6(antage)k
+6378(of)s 220 fnt35 6649 7794(//)m 240 fnt82 6833 7797(is)m
+7043(that)s 7460(its)s 7736(left)s 8112(parameter)s 0 7509(can)m
+382(be)s 657(printed)s 1385(before)s 2044(its)s 2313(right)s
+2817(parameter)s 3824(is)s 4027(kno)s 6(wn;)k 4779(this)s
+5168(is)s 5371(important)s 6353(when)s 6922(the)s 7263(left)s
+7633(parameter)s 8640(is)s 8843(an)s 0 7221(entire)m 599(page.)s
+480 6847(The)m 960(\207fth)s 1468(and)s 1924(\207nal)s 2457(concatenation)s
+3895(operator)s 9(,)k 220 fnt35 4841 6844(&)m 240 fnt82
+4983 6847(,)m 5143(is)s 5405(an)s 5741(e)s 3(xplicit)k
+6567(v)s 3(ersion)k 7377(of)s 7701(the)s 8102(horizontal)s
+0 6559(concatenation)m 1402(operator)s 2275(interpolated)s 3492(when)s 4085(objects)s
+4830(are)s 5195(separated)s 6172(by)s 6483(white)s 7088(space.)s
+7800(It)s 8022(is)s 8250(formally)s 0 6271(identical)m 907(to)s
+220 fnt35 1177 6268(|)m 240 fnt82 1305 6271(e)m 3(xcept)k
+2017(for)s 2386(taking)s 3068(higher)s 3770(precedence)s 4932(and)s
+5367(being)s 5983(subject)s 6751(to)s 7021(replacement)s 8279(by)s
+220 fnt35 8604 6268(//1vx)m 240 fnt82 0 5983(during)m 678(paragraph)s
+1691(breaking)s 2581(\(Section)s 3434(2.5\).)s 240 fnt84 0 5334(2.4.)m
+471(Implementation)s 2159(of)s 2431(objects)s 3201(and)s 3642(concatenation)s
+240 fnt82 480 4857(In)m 738(this)s 1136(section)s 1872(we)s
+2210(discuss)s 2954(the)s 3304(implementation)s 4863(of)s 5137(objects)s
+5867(and)s 6273(concatenation,)s 7710(and)s 8117(especially)s 0 4569(mark)m
+552(alignment.)s 1672(The)s 2100(\207rst)s 2531(step)s 2969(is)s
+3179(to)s 3418(use)s 3793(an)s 4076(operator)s 4932(precedence)s
+6063(parser)s 6706(to)s 6945(con)s 9(v)k 3(ert)k
+7710(input)s 8262(such)s 8758(as)s 220 fnt35 480 4068(a  |0.5i  b  /0.2i  c  |  d)m
+240 fnt82 0 3613(into)m 425(parse)s 985(trees)s 1486(such)s
+1982(as)s gsave
+480 1919 translate
+240 fnt83 3396 1354 0 1298 240 288 12 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1867 338 56 282 240 288 12 1529 1016 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 136 106(\244)m 
+grestore
+(T) lfigpromotelabels
+grestore
+1413 846 0 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+876 338 56 282 240 288 12 537 508 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 156 121(|)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+511 338 56 282 240 288 12 451 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+511 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+511 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt78 56 105(0)m 192 fnt83
+195 111(.)m 192 fnt78 270 105(5)m 192 fnt83 404 111(i)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 962 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 1075 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 105(b)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1413 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1413 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+517 846 56 790 240 288 12 1526 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+517 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+517 338 56 282 240 288 12 0 508 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt78 56 105(0)m 192 fnt83
+195 111(.)m 192 fnt78 270 105(2)m 192 fnt83 410 111(i)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 2043 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+1240 846 0 790 240 288 12 2156 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+789 338 56 282 240 288 12 451 508 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 156 121(|)m 
+grestore
+(T) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 128 128(c)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 451 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 789 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 902 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83
+118 105(d)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1240 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 3396 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+0 1468(Missing)m 879(objects)s 1662(are)s 2065(replaced)s
+2987(by)s 3336(empty)s 4044(objects,)s 4883(and)s 5342(sequences)s
+6419(of)s 6745(concatenation)s 8186(operators)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 9 10
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Symbol
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4349 13844(-)m 4477(9)s 4648(-)s 0 13251(are)m 347(consolidated:)s
+gsave
+480 11602 translate
+240 fnt83 2492 1359 0 1298 240 288 12 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1415 338 56 282 240 288 12 1077 1016 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 156 121(|)m 
+grestore
+(T) lfigpromotelabels
+grestore
+338 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 508 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+517 846 56 790 240 288 12 451 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+517 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+517 338 56 282 240 288 12 0 508 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt78
+56 105(0)m 192 fnt83 195 111(.)m 192 fnt78 270 105(2)m
+192 fnt83 410 111(i)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 968 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+1411 846 0 790 240 288 12 1081 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+875 338 56 282 240 288 12 536 508 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 156 121(|)m 
+grestore
+(T) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83
+128 128(c)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+509 338 56 282 240 288 12 451 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+509 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+509 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt78 56 105(0)m 192 fnt83 195 111(.)m
+192 fnt78 270 105(3)m 192 fnt83 402 111(i)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 960 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 1073 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83
+118 105(d)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1411 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 2492 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+240 fnt78 3284 12840(\336)m gsave
+3825 11602 translate
+240 fnt83 2492 1359 0 1298 240 288 12 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1415 338 56 282 240 288 12 1077 1016 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 156 121(|)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+338 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 508 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+517 846 56 790 240 288 12 451 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+517 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+517 338 56 282 240 288 12 0 508 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt78 56 105(0)m 192 fnt83
+195 111(.)m 192 fnt78 270 105(2)m 192 fnt83 410 111(i)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 968 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 846 56 790 240 288 12 1081 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 508 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 128 128(c)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1419 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+509 846 56 790 240 288 12 1532 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+509 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+509 338 56 282 240 288 12 0 508 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt78 56 105(0)m 192 fnt83
+195 111(.)m 192 fnt78 270 105(3)m 192 fnt83 402 111(i)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 2041 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 846 56 790 240 288 12 2154 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 508 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 118 105(d)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 2492 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+240 fnt82 0 11151(to)m 239(mak)s 2(e)k
+811(manifest)s 1693(their)s 2190(associati)s 6(vity)k 3432(and)s
+3836(reduce)s 4529(the)s 4877(depth)s 5466(of)s 5737(the)s
+6085(tree)s 6498(for)s 6836(ef\207cienc)s 3(y)k 7829(later)s 13(.)k
+480 10777(The)m 970(required)s 1887(semantic)s 2851(information)s 4099(is)s
+4371(the)s 4782(size)s 5271(of)s 5605(each)s 6162(subobject,)s
+7249(consisting)s 8334(of)s 8668(four)s 0 10489(inte)m 3(gers:)k
+920(width)s 1524(to)s 1765(left)s 2144(and)s 2550(right)s
+3062(of)s 3335(the)s 3685(distinguished)s 5021(column)s 5798(mark,)s
+6397(and)s 6803(height)s 7463(abo)s 3(v)k 3(e)k
+8087(and)s 8493(belo)s 6(w)k 0 10201(the)m 368(distinguished)s
+1722(ro)s 6(w)k 2162(mark.)s 2837(These)s 3484(numbers)s
+4379(are)s 4746(al)s 2(w)k 2(ays)k 5477(non-ne)s 3(g)k 1(ati)k 6(v)k 3(e)k
+6789(in)s 7052(Basser)s 7769(Lout,)s 8348(b)s 4(ut)k
+8730(this)s 0 9913(restriction)m 1024(is)s 1234(unnecessary)s 2457(and)s
+2861(should)s 3558(be)s 3840(dropped.)s 480 9539(F)m 3(or)k
+867(the)s 1212(lea)s 4(v)k 3(es,)k 1907(which)s
+2546(are)s 2890(simple)s 3581(w)s 2(ords,)k 4268(the)s
+4614(numbers)s 5486(are)s 5830(obtained)s 6710(from)s 7231(font)s
+7674(tables.)s 8392(F)s 3(or)k 8778(the)s 0 9251(higher)m
+678(le)s 6(v)k 3(els)k 1285(we)s 1628(apply)s
+2222(recursi)s 6(v)k 3(e)k 3152(rules.)s 3788(Suppose)s
+4664(that)s 240 fnt83 5090 9253(hgap)m 240 fnt78 5583 9245(\()m
+240 fnt83 5675 9253(x)m 240 fnt78 5801 9245(,)m 240 fnt83
+5932 9253(g)m 240 fnt78 6066 9245(,)m 240 fnt83 6197 9253(y)m
+240 fnt78 6319 9245(\))m 240 fnt82 6453 9251(returns)m 7175(the)s
+7531(desired)s 8287(distance)s 0 8963(between)m 846(the)s 1186(column)s
+1952(marks)s 2579(of)s 2841(objects)s 240 fnt83 3561 8965(x)m
+240 fnt82 3719 8963(and)m 240 fnt83 4114 8965(y)m 240 fnt82
+4268 8963(when)m 4835(the)s 3(y)k 5290(are)s 5629(separated)s
+6580(by)s 6866(g)s 1(ap)k 240 fnt83 7255 8965(g)m
+240 fnt82 7369 8963(:)m 240 fnt83 7527 8965(right)m 240 fnt78
+8000 8957(\()m 240 fnt83 8075 8965(x)m 240 fnt78 8185 8957(\))m
+8298(+)s 240 fnt83 8473 8965(length)m 240 fnt78 0 8669(\()m
+240 fnt83 89 8677(g)m 240 fnt78 221 8669(\))m 376(+)s
+240 fnt83 594 8677(left)m 240 fnt78 920 8669(\()m 240 fnt83
+1009 8677(y)m 240 fnt78 1129 8669(\))m 240 fnt82 1261 8675(when)m
+1842(the)s 2196(g)s 1(ap)k 2600(mode)s 3193(is)s
+3409(edge-to-edge,)s 4770(the)s 5124(lar)s 4(ger)k 5741(of)s
+240 fnt83 6018 8677(length)m 240 fnt78 6629 8669(\()m 240 fnt83
+6718 8677(g)m 240 fnt78 6850 8669(\))m 240 fnt82 6982 8675(and)m
+240 fnt83 7391 8677(right)m 240 fnt78 7878 8669(\()m 240 fnt83
+7968 8677(x)m 240 fnt78 8091 8669(\))m 8246(+)s 240 fnt83
+8464 8677(left)m 240 fnt78 8790 8669(\()m 240 fnt83 8880 8677(y)m
+240 fnt78 9000 8669(\))m 240 fnt82 0 8387(when)m 576(the)s
+924(mode)s 1512(is)s 1722(mark-to-mark,)s 3155(and)s 3559(so)s
+3825(on.)s 4229(Gi)s 6(v)k 3(en)k 4862(an)s
+5145(object)s 240 fnt83 480 7892(X)m 240 fnt78 720 7884(=)m
+240 fnt83 933 7892(x)m 168 fnt78 1039 7799(1)m 240 fnt78
+1249 7884(|)m 240 fnt83 1294 7892(g)m 168 fnt78 1405 7799(1)m
+240 fnt78 1615 7884(\274)m 200 fnt83 1973 7900(^)m 240 fnt78
+2069 7884(|)m 240 fnt83 2114 7892(g)m 168 fnt83 2225 7805(i)m
+168 fnt78 2291 7799(-)m 2403(1)s 240 fnt83 2613 7892(x)m
+168 fnt83 2719 7805(i)m 240 fnt78 2907 7884(\274)m 3265(|)s
+240 fnt83 3310 7892(g)m 168 fnt83 3421 7805(n)m 168 fnt78
+3523 7799(-)m 3635(1)s 240 fnt83 3845 7892(x)m 168 fnt83
+3951 7805(n)m 240 fnt82 0 7348(we)m 335(may)s 801(calculate)s
+1705(its)s 1981(size)s 2408(as)s 2658(follo)s 6(ws:)k
+240 fnt83 740 6845(left)m 240 fnt78 1060 6837(\()m 240 fnt83
+1144 6845(X)m 240 fnt78 1312 6837(\))m 1474(=)s 240 fnt83
+1687 6845(left)m 240 fnt78 2007 6837(\()m 240 fnt83 2091 6845(x)m
+168 fnt78 2197 6752(1)m 240 fnt78 2275 6837(\))m 2413(+)s
+240 fnt83 2614 6845(hgap)m 240 fnt78 3099 6837(\()m 240 fnt83
+3183 6845(x)m 168 fnt78 3289 6752(1)m 240 fnt78 3367 6837(,)m
+240 fnt83 3474 6845(g)m 168 fnt78 3585 6752(1)m 240 fnt78
+3663 6837(,)m 240 fnt83 3770 6845(x)m 168 fnt78 3876 6752(2)m
+240 fnt78 3968 6837(\))m 4106(+)s 4307(\274)s 4593(+)s
+240 fnt83 4794 6845(hgap)m 240 fnt78 5279 6837(\()m 240 fnt83
+5363 6845(x)m 168 fnt83 5469 6758(i)m 168 fnt78 5535 6752(-)m
+5647(1)s 240 fnt78 5725 6837(,)m 240 fnt83 5832 6845(g)m
+168 fnt83 5943 6758(i)m 168 fnt78 6009 6752(-)m 6121(1)s
+240 fnt78 6199 6837(,)m 240 fnt83 6306 6845(x)m 168 fnt83
+6412 6758(i)m 240 fnt78 6468 6837(\))m 240 fnt83 579 6442(right)m
+240 fnt78 1060 6434(\()m 240 fnt83 1144 6442(X)m 240 fnt78
+1312 6434(\))m 1474(=)s 240 fnt83 1687 6442(hgap)m 240 fnt78
+2172 6434(\()m 240 fnt83 2256 6442(x)m 168 fnt83 2362 6355(i)m
+240 fnt78 2418 6434(,)m 240 fnt83 2525 6442(g)m 168 fnt83
+2636 6355(i)m 240 fnt78 2692 6434(,)m 240 fnt83 2799 6442(x)m
+168 fnt83 2905 6355(i)m 168 fnt78 2971 6349(+)m 3084(1)s
+240 fnt78 3162 6434(\))m 3300(+)s 3501(\274)s 3787(+)s
+240 fnt83 3988 6442(hgap)m 240 fnt78 4473 6434(\()m 240 fnt83
+4557 6442(x)m 168 fnt83 4663 6355(n)m 168 fnt78 4765 6349(-)m
+4877(1)s 240 fnt78 4955 6434(,)m 240 fnt83 5062 6442(g)m
+168 fnt83 5173 6355(n)m 168 fnt78 5275 6349(-)m 5387(1)s
+240 fnt78 5465 6434(,)m 240 fnt83 5572 6442(x)m 168 fnt83
+5678 6355(n)m 240 fnt78 5770 6434(\))m 5908(+)s 240 fnt83
+6109 6442(right)m 240 fnt78 6590 6434(\()m 240 fnt83 6674 6442(x)m
+168 fnt83 6780 6355(n)m 240 fnt78 6872 6434(\))m 240 fnt83
+485 6039(abo)m 2(ve)k 240 fnt78 1060 6031(\()m 240 fnt83
+1144 6039(X)m 240 fnt78 1312 6031(\))m 1474(=)s 240 fnt83
+1687 6039(abo)m 2(ve)k 240 fnt78 2262 6031(\()m 240 fnt83
+2346 6039(x)m 168 fnt78 2452 5944(1)m 240 fnt78 2530 6031(\))m
+2680(\255)s 2901(\274)s 3199(\255)s 240 fnt83 3420 6039(abo)m 2(ve)k
+240 fnt78 3995 6031(\()m 240 fnt83 4079 6039(x)m 168 fnt83
+4185 5950(n)m 240 fnt78 4277 6031(\))m 240 fnt83 480 5636(below)m
+240 fnt78 1060 5628(\()m 240 fnt83 1144 5636(X)m 240 fnt78
+1312 5628(\))m 1474(=)s 240 fnt83 1687 5636(below)m 240 fnt78
+2267 5628(\()m 240 fnt83 2351 5636(x)m 168 fnt78 2457 5541(1)m
+240 fnt78 2535 5628(\))m 2685(\255)s 2906(\274)s 3204(\255)s
+240 fnt83 3425 5636(below)m 240 fnt78 4005 5628(\()m 240 fnt83
+4089 5636(x)m 168 fnt83 4195 5547(n)m 240 fnt78 4287 5628(\))m
+240 fnt82 0 5041(where)m 240 fnt78 693 5035(\255)m 240 fnt82
+943 5041(returns)m 1678(the)s 2046(lar)s 4(ger)k 2679(of)s
+2971(its)s 3267(tw)s 2(o)k 3698(parameters.)s 4930(Similar)s
+5712(formulas)s 6633(are)s 7001(easily)s 7632(deri)s 6(v)k 3(ed)k
+8419(for)s 8778(the)s 0 4753(other)m 551(operators.)s 480 4379(F)m 3(or)k
+866(purposes)s 1765(of)s 2033(e)s 3(xposition)k 3081(we)s
+3412(will)s 3835(no)s 6(w)k 4293(mak)s 2(e)k
+4862(the)s 5207(simplifying)s 6358(assumptions)s 7589(that)s 8004(all)s
+8294(g)s 1(aps)k 8779(are)s 220 fnt35 0 4088(0i)m
+240 fnt82 156 4091(,)m 248(all)s 525(column)s 1285(marks)s
+1904(lie)s 2183(at)s 2399(the)s 2732(left)s 3093(edge,)s
+3637(and)s 4025(all)s 4303(ro)s 6(w)k 4707(marks)s
+5327(lie)s 5605(at)s 5822(the)s 6154(top)s 6498(edge.)s
+7098(Then)s 7632(the)s 7964(size)s 8376(of)s 8631(each)s
+0 3803(object)m 644(can)s 1033(be)s 1315(e)s 3(xpressed)k
+2313(by)s 2607(just)s 3012(tw)s 2(o)k 3422(numbers,)s
+4353(width)s 4955(and)s 5359(height,)s 6064(and)s 6468(the)s
+6816(four)s 7274(formulas)s 8174(reduce)s 8867(to)s 240 fnt83
+555 3300(width)m 240 fnt78 1094 3292(\()m 240 fnt83 1178 3300(x)m
+168 fnt78 1284 3207(1)m 240 fnt78 1434 3292(|)m 1551(\274)s
+1849(|)s 240 fnt83 1966 3300(x)m 168 fnt83 2072 3213(n)m
+240 fnt78 2164 3292(\))m 2326(=)s 240 fnt83 2539 3300(width)m
+240 fnt78 3078 3292(\()m 240 fnt83 3162 3300(x)m 168 fnt78
+3268 3207(1)m 240 fnt78 3346 3292(\))m 3484(+)s 3685(\274)s
+3971(+)s 240 fnt83 4172 3300(width)m 240 fnt78 4711 3292(\()m
+240 fnt83 4795 3300(x)m 168 fnt83 4901 3213(n)m 240 fnt78
+4993 3292(\))m 240 fnt83 480 2897(height)m 240 fnt78 1094 2889(\()m
+240 fnt83 1178 2897(x)m 168 fnt78 1284 2804(1)m 240 fnt78
+1434 2889(|)m 1551(\274)s 1849(|)s 240 fnt83 1966 2897(x)m
+168 fnt83 2072 2810(n)m 240 fnt78 2164 2889(\))m 2326(=)s
+240 fnt83 2539 2897(height)m 240 fnt78 3153 2889(\()m 240 fnt83
+3237 2897(x)m 168 fnt78 3343 2804(1)m 240 fnt78 3421 2889(\))m
+3571(\255)s 3792(\274)s 4090(\255)s 240 fnt83 4311 2897(height)m
+240 fnt78 4925 2889(\()m 240 fnt83 5009 2897(x)m 168 fnt83
+5115 2810(n)m 240 fnt78 5207 2889(\))m 240 fnt82 0 2353(The)m
+428(corresponding)s 1850(formulas)s 2750(for)s 3088(v)s 3(ertical)k
+3855(concatenation)s 5240(are)s 240 fnt83 555 1803(width)m 240 fnt78
+1094 1795(\()m 240 fnt83 1178 1803(x)m 168 fnt78 1284 1710(1)m
+240 fnt83 1434 1803(/)m 240 fnt78 1609 1795(\274)m 240 fnt83
+1907 1803(/)m 2082(x)s 168 fnt83 2188 1716(n)m 240 fnt78
+2280 1795(\))m 2442(=)s 240 fnt83 2655 1803(width)m 240 fnt78
+3194 1795(\()m 240 fnt83 3278 1803(x)m 168 fnt78 3384 1710(1)m
+240 fnt78 3462 1795(\))m 3612(\255)s 3833(\274)s 4131(\255)s
+240 fnt83 4352 1803(width)m 240 fnt78 4891 1795(\()m 240 fnt83
+4975 1803(x)m 168 fnt83 5081 1716(n)m 240 fnt78 5173 1795(\))m
+240 fnt83 480 1400(height)m 240 fnt78 1094 1392(\()m 240 fnt83
+1178 1400(x)m 168 fnt78 1284 1307(1)m 240 fnt83 1434 1400(/)m
+240 fnt78 1609 1392(\274)m 240 fnt83 1907 1400(/)m 2082(x)s
+168 fnt83 2188 1313(n)m 240 fnt78 2280 1392(\))m 2442(=)s
+240 fnt83 2655 1400(height)m 240 fnt78 3269 1392(\()m 240 fnt83
+3353 1400(x)m 168 fnt78 3459 1307(1)m 240 fnt78 3537 1392(\))m
+3675(+)s 3876(\274)s 4162(+)s 240 fnt83 4363 1400(height)m
+240 fnt78 4977 1392(\()m 240 fnt83 5061 1400(x)m 168 fnt83
+5167 1313(n)m 240 fnt78 5259 1392(\))m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 10 11
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4287 13844(-)m 4415(10)s 4710(-)s 0 13253(According)m 1063(to)s
+1302(these)s 1849(formulas,)s 2805(the)s 3153(height)s 3811(of)s
+gsave
+480 11559 translate
+240 fnt83 3044 1354 56 1298 240 288 12 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1240 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(L) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 451 508 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 156 121(|)m 
+grestore
+(T) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 789 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ L@T@CTR L@T@CTR T@CTR lfigangle L@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR L@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 902 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83
+123 105(b)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(R) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1240 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ R@T@CTR R@T@CTR T@CTR lfigangle R@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR R@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(L) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 1353 1016 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 136 106(\244)m 
+grestore
+(T) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1691 1298 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ L@T@CTR L@T@CTR T@CTR lfigangle L@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR L@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+1240 846 56 790 240 288 12 1804 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 128 128(c)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+(L) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 451 508 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 156 121(|)m 
+grestore
+(T) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 789 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ L@T@CTR L@T@CTR T@CTR lfigangle L@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR L@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 902 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 118 105(d)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(R) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1240 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ R@T@CTR R@T@CTR T@CTR lfigangle R@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR R@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(R) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 3044 1298 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ R@T@CTR R@T@CTR T@CTR lfigangle R@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR R@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+0 11108(is)m
+240 fnt78 480 10600([)m 240 fnt83 563 10608(height)m 240 fnt78
+1177 10600(\()m 240 fnt83 1261 10608(a)m 240 fnt78 1388 10600(\))m
+1538(\255)s 240 fnt83 1759 10608(height)m 240 fnt78 2373 10600(\()m
+240 fnt83 2457 10608(b)m 240 fnt78 2583 10600(\))m 2661(])s
+2792(+)s 2993([)s 240 fnt83 3076 10608(height)m 240 fnt78
+3690 10600(\()m 240 fnt83 3774 10608(c)m 240 fnt78 3888 10600(\))m
+4038(\255)s 240 fnt83 4259 10608(height)m 240 fnt78 4873 10600(\()m
+240 fnt83 4957 10608(d)m 240 fnt78 5095 10600(\))m 5173(])s
+240 fnt82 0 10104(which)m 642(is)s 852(correct,)s 1621(b)s 4(ut)k
+1983(for)s 2321(width)s 2923(the)s 3(y)k 3386(yield)s
+240 fnt78 480 9546([)m 240 fnt83 563 9554(width)m 240 fnt78
+1102 9546(\()m 240 fnt83 1186 9554(a)m 240 fnt78 1313 9546(\))m
+1451(+)s 240 fnt83 1652 9554(width)m 240 fnt78 2191 9546(\()m
+240 fnt83 2275 9554(b)m 240 fnt78 2401 9546(\))m 2479(])s
+2622(\255)s 2843([)s 240 fnt83 2926 9554(width)m 240 fnt78
+3465 9546(\()m 240 fnt83 3549 9554(c)m 240 fnt78 3663 9546(\))m
+3801(+)s 240 fnt83 4002 9554(width)m 240 fnt78 4541 9546(\()m
+240 fnt83 4625 9554(d)m 240 fnt78 4763 9546(\))m 4841(])s
+240 fnt82 0 9050(which)m 645(is)s 859(not,)s 1276(since)s
+1827(it)s 2023(does)s 2517(not)s 2887(tak)s 2(e)k
+3343(the)s 3694(mer)s 4(ging)k 4544(of)s 4819(column)s
+5598(marks)s 6237(into)s 6666(account.)s 7578(The)s 8010(asymmetry)s
+0 8762(between)m 874(horizontal)s 1918(and)s 2342(v)s 3(ertical)k
+3130(has)s 3520(come)s 4114(about)s 4726(because)s 5560(the)s
+5928(ro)s 6(w)k 6368(entries,)s 7131(such)s 7648(as)s
+240 fnt83 7918 8764(a)m 240 fnt82 8113 8762(and)m 240 fnt83
+8537 8764(b)m 240 fnt82 8651 8762(,)m 8779(are)s 0 8474(adjacent)m
+849(in)s 1085(the)s 1426(tree,)s 1883(b)s 4(ut)k
+2238(the)s 2579(column)s 3346(entries,)s 4082(such)s 4571(as)s
+240 fnt83 4814 8476(a)m 240 fnt82 4982 8474(and)m 240 fnt83
+5379 8476(c)m 240 fnt82 5481 8474(,)m 5581(are)s 5920(not.)s
+6383(It)s 6581(w)s 2(ould)k 7229(be)s 7504(possible)s
+8337(to)s 8568(solv)s 3(e)k 0 8186(this)m 395(cross-linking)s
+1694(problem)s 2550(by)s 2842(augmenting)s 4024(the)s 4370(size)s
+4795(information)s 5979(stored)s 6619(in)s 6861(each)s 7354(node)s
+7875(to)s 8112(record)s 8778(the)s 0 7898(number)m 791(of)s
+1063(marks)s 1698(and)s 2103(the)s 2451(size)s 2879(of)s
+3150(each,)s 3696(b)s 4(ut)k 4058(the)s 4407(author)s
+5078(has)s 5449(preferred)s 6381(the)s 6730(follo)s 6(wing)k
+7707(method)s 8484(which)s 0 7610(mak)m 2(es)k 660(structural)s
+1616(changes)s 2438(to)s 2677(the)s 3025(tree)s 3438(instead.)s
+480 7236(If)m 240 fnt83 715 7238(a)m 240 fnt82 896 7236(and)m
+240 fnt83 1305 7238(c)m 240 fnt82 1473 7236(share)m 2038(a)s
+2210(column)s 2990(mark,)s 3594(the)s 3(y)k 4063(each)s
+4563(might)s 5187(as)s 5442(well)s 5914(ha)s 4(v)k 3(e)k
+6420(width)s 240 fnt83 7028 7238(width)m 240 fnt78 7572 7230(\()m
+240 fnt83 7662 7238(a)m 240 fnt78 7795 7230(\))m 7961(\255)s
+240 fnt83 8199 7238(width)m 240 fnt78 8743 7230(\()m 240 fnt83
+8833 7238(c)m 240 fnt78 8953 7230(\))m 240 fnt82 9019 7236(,)m
+0 6948(since)m 547(all)s 840(width)s 1442(calculations)s 2635(apply)s
+3221(to)s 3460(entire)s 4060(columns.)s 5035(Accordingly)s 15(,)k
+6323(we)s 6659(introduce)s 7618(a)s 7784(ne)s 6(w)k
+8232(operator)s 9(,)k 240 fnt83 0 6662(COL)m 240 fnt82
+466 6660(,)m 573(de\207ned)s 1336(by)s 240 fnt83 480 6110(width)m
+240 fnt78 1019 6102(\()m 240 fnt83 1103 6110(x)m 168 fnt78
+1209 6017(1)m 240 fnt83 1347 6110(COL)m 240 fnt78 1885 6102(\274)m
+240 fnt83 2171 6110(COL)m 2709(x)s 168 fnt83 2815 6023(n)m
+240 fnt78 2907 6102(\))m 3057(=)s 240 fnt83 3270 6110(width)m
+240 fnt78 3809 6102(\()m 240 fnt83 3893 6110(x)m 168 fnt78
+3999 6017(1)m 240 fnt78 4077 6102(\))m 4227(\255)s 4448(\274)s
+4746(\255)s 240 fnt83 4967 6110(width)m 240 fnt78 5506 6102(\()m
+240 fnt83 5590 6110(x)m 168 fnt83 5696 6023(n)m 240 fnt78
+5788 6102(\))m 240 fnt82 0 5566(and)m 440(replace)s 1221(both)s
+240 fnt83 1741 5568(a)m 240 fnt82 1952 5566(and)m 240 fnt83
+2393 5568(c)m 240 fnt82 2591 5566(by)m 240 fnt83 2922 5568(a)m
+3218(COL)s 3865(c)s 240 fnt82 3967 5566(.)m 4168(T)s 19(o)k
+4504(pre)s 6(v)k 3(ent)k 240 fnt83 5309 5568(COL)m
+240 fnt82 5871 5566(operators)m 6848(from)s 7408(disturbing)s 8468(height)s
+0 5278(calculations,)m 1248(we)s 1583(de\207ne)s 2224(a)s 2390(binary)s
+3055(operator)s 3911(called)s 240 fnt83 4539 5280(SPLIT)m 240 fnt82
+5228 5278(by)m 240 fnt83 555 4775(width)m 240 fnt78 1094 4767(\()m
+240 fnt83 1178 4775(x)m 1356(SPLIT)s 2057(y)s 240 fnt78
+2171 4767(\))m 2333(=)s 240 fnt83 2546 4775(width)m 240 fnt78
+3085 4767(\()m 240 fnt83 3169 4775(x)m 240 fnt78 3287 4767(\))m
+240 fnt83 480 4372(height)m 240 fnt78 1094 4364(\()m 240 fnt83
+1178 4372(x)m 1356(SPLIT)s 2057(y)s 240 fnt78 2171 4364(\))m
+2333(=)s 240 fnt83 2546 4372(height)m 240 fnt78 3160 4364(\()m
+240 fnt83 3244 4372(y)m 240 fnt78 3358 4364(\))m 240 fnt82
+0 3868(which)m 642(switches)s 1516(height)s 2174(and)s 2578(width)s
+3180(calculations)s 4372(onto)s 4851(dif)s 6(ferent)k 5726(subtrees.)s
+6673(Then)s 7222(the)s 7570(transformation)s gsave
+480 2169 translate
+240 fnt83 338 1359 56 1298 240 288 12 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+338 1359 56 1298 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 1016 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+end end restore
+grestore
+240 fnt78 1130 3407(\336)m gsave
+1671 2169 translate
+240 fnt83 2564 1359 56 1298 240 288 12 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1386 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(L) lfigpromotelabels
+grestore
+484 338 56 282 240 288 12 451 508 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+484 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83
+56 107(COL)m 
+grestore
+(T) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 935 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ L@T@CTR L@T@CTR T@CTR lfigangle L@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR L@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 1048 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 128 128(c)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(R) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1386 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ R@T@CTR R@T@CTR T@CTR lfigangle R@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR R@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(L) lfigpromotelabels
+grestore
+614 338 56 282 240 288 12 1499 1016 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+614 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83 56 107(SPLIT)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 2113 1298 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ L@T@CTR L@T@CTR T@CTR lfigangle L@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR L@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 846 56 790 240 288 12 2226 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 508 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(R) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 2564 1298 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ R@T@CTR R@T@CTR T@CTR lfigangle R@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR R@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+240 fnt82 0 1669(widens)m 240 fnt83
+740 1671(a)m 240 fnt82 926 1669(to)m 240 fnt83 1176 1671(width)m
+240 fnt78 1726 1663(\()m 240 fnt83 1821 1671(a)m 240 fnt78
+1959 1663(\))m 2142(\255)s 240 fnt83 2396 1671(width)m 240 fnt78
+2946 1663(\()m 240 fnt83 3041 1671(c)m 240 fnt78 3166 1663(\))m
+240 fnt82 3303 1669(without)m 4105(af)s 6(fecting)k 5011(its)s
+5298(height;)s 6019(it)s 6222(is)s 6443(applied)s 7216(to)s
+7466(e)s 6(v)k 3(ery)k 8053(object)s 8708(that)s
+0 1381(shares)m 638(its)s 904(column)s 1669(mark)s 2211(with)s
+2683(at)s 2905(least)s 3392(one)s 3784(other)s 4325(object.)s
+5063(A)s 5283(similar)s 5995(transformation)s 7448(in)s 9(v)k 4(olving)k
+8396(a)s 240 fnt83 8552 1383(R)m 9(O)k 12(W)k
+240 fnt82 0 1093(operator)m 856(deals)s 1398(with)s 1880(shared)s
+2562(ro)s 6(w)k 2982(marks.)s 3730(The)s 4158(ef)s 6(fect)k
+4754(on)s 5051(our)s 5430(little)s 5922(table)s 6442(is)s
+6652(to)s 6891(replace)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 11 12
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Symbol
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4297 13844(-)m 4425(11)s 4700(-)s gsave
+480 12065 translate
+240 fnt83 3044 1354 56 1298 240 288 12 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1240 846 56 790 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+(L) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 451 508 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 156 121(|)m 
+grestore
+(T) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 789 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ L@T@CTR L@T@CTR T@CTR lfigangle L@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR L@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 902 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 105(b)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(R) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1240 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ R@T@CTR R@T@CTR T@CTR lfigangle R@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR R@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(L) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 1353 1016 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78
+136 106(\244)m 
+grestore
+(T) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1691 1298 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ L@T@CTR L@T@CTR T@CTR lfigangle L@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR L@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+1240 846 56 790 240 288 12 1804 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 128 128(c)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(L) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 451 508 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 156 121(|)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 789 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ L@T@CTR L@T@CTR T@CTR lfigangle L@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR L@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 902 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 118 105(d)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(R) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1240 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ R@T@CTR R@T@CTR T@CTR lfigangle R@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR R@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(R) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 3044 1298 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ R@T@CTR R@T@CTR T@CTR lfigangle R@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR R@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+0 11614(by)m gsave
+480 8904 translate
+240 fnt83 6248 2370 0 2314 240 288 12 LoutGraphic
+gsave
+grestore save gsave 70 dict begin lfigdict begin
+grestore
+3293 338 56 282 240 288 12 2955 2032 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 136 106(\244)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+3096 1862 0 1806 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+1717 338 56 282 240 288 12 1379 1524 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78 156 121(|)m 
+grestore
+(T) lfigpromotelabels
+grestore
+1520 1354 0 1298 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+1067 338 56 282 240 288 12 453 1016 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+614 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83 56 107(SPLIT)m 
+grestore
+(T) lfigpromotelabels
+grestore
+732 846 0 790 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+608 338 56 282 240 288 12 124 508 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+484 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83
+56 107(COL)m 
+grestore
+(T) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 394 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 128 128(c)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+732 846 0 790 240 288 12 788 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+628 338 56 282 240 288 12 104 508 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+524 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83 56 107(R)m 7(O)k 9(W)k 
+grestore
+(T) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83
+123 128(a)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 394 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 105(b)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1520 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1520 1298 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+1520 1354 0 1298 240 288 12 1576 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+1067 338 56 282 240 288 12 453 1016 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+614 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83 56 107(SPLIT)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+732 846 0 790 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+608 338 56 282 240 288 12 124 508 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+484 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83 56 107(COL)m 
+grestore
+(T) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 105(b)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 394 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83
+118 105(d)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+732 846 0 790 240 288 12 788 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+628 338 56 282 240 288 12 104 508 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+524 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83 56 107(R)m 7(O)k 9(W)k
+
+grestore
+(T) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 394 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 105(b)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1520 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 3096 1298 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 3096 1806 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+3096 1862 0 1806 240 288 12 3152 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+1717 338 56 282 240 288 12 1379 1524 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt78
+156 121(|)m 
+grestore
+(T) lfigpromotelabels
+grestore
+1520 1354 0 1298 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+1067 338 56 282 240 288 12 453 1016 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+614 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83 56 107(SPLIT)m 
+grestore
+(T) lfigpromotelabels
+grestore
+732 846 0 790 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+608 338 56 282 240 288 12 124 508 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+484 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83 56 107(COL)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 394 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 128 128(c)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+732 846 0 790 240 288 12 788 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+628 338 56 282 240 288 12 104 508 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+524 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83
+56 107(R)m 7(O)k 9(W)k 
+grestore
+(T) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 128 128(c)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 394 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 118 105(d)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1520 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1520 1298 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+1520 1354 0 1298 240 288 12 1576 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+1067 338 56 282 240 288 12 453 1016 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+614 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83 56 107(SPLIT)m 
+grestore
+(T) lfigpromotelabels
+grestore
+732 846 0 790 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+608 338 56 282 240 288 12 124 508 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+484 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83
+56 107(COL)m 
+grestore
+(T) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 105(b)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 394 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 118 105(d)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+732 846 0 790 240 288 12 788 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+628 338 56 282 240 288 12 104 508 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+524 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+192 fnt83 56 107(R)m 7(O)k 9(W)k 
+grestore
+(T) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83
+128 128(c)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 338 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+338 338 56 282 240 288 12 394 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 70 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 118 105(d)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 732 282 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 1520 790 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 3096 1298 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 6248 1806 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+0 8453(In)m 244(f)s 2(act,)k
+693(common)s 1576(sube)s 3(xpressions)k 3060(are)s 3395(identi\207ed)s
+4343(\(tri)s 6(vially\))k 5286(and)s 5678(the)s 6013(result)s
+6591(is)s 6788(a)s 6942(directed)s 7756(ac)s 3(yclic)k
+8469(graph;)s 0 8165(each)m 486(af)s 6(fected)k 1296(leaf)s
+1716(has)s 2076(tw)s 2(o)k 2477(parents,)s 3264(one)s
+3657(for)s 3985(width)s 4578(and)s 4972(one)s 5365(for)s
+5693(height;)s 6394(and)s 6788(each)s 240 fnt83 7274 8167(COL)m
+240 fnt82 7790 8165(or)m 240 fnt83 8040 8167(R)m 9(O)k 12(W)k
+240 fnt82 8604 8165(node)m 0 7877(has)m 360(one)s 752(parent)s
+1398(and)s 1792(one)s 2184(child)s 2709(for)s 3037(each)s
+3521(object)s 4155(lying)s 4690(on)s 4976(the)s 5314(corresponding)s
+6726(mark.)s 7370(The)s 7788(data)s 8235(structure)s 0 7589(roughly)m
+799(doubles)s 1595(in)s 1838(size,)s 2316(and)s 2720(this)s
+3116(occurs)s 3791(only)s 4271(rarely)s 4881(in)s 5124(practice.)s
+480 7215(This)m 956(method)s 1732(can)s 2121(cope)s 2629(with)s
+3111(an)s 3(y)k 3508(le)s 3(g)k 1(al)k
+4023(input,)s 4622(including)s 220 fnt35 480 6714({  a  //  c  |  d  }  |  {  b  /  e  })m 480 6426(/  {  f  /  i  }  |  {  g  |  h  //  j  })m
+240 fnt82 0 5927(which)m 642(produces)s 1557(o)s 3(v)k 3(erlapping)k
+2747(spanning)s 3665(columns:)s gsave
+480 3779 translate
+240 fnt83 1699 1808 0 1695 240 288 60 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1133 452 113 339 240 288 60 0 1356 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+230 fnt83 511 178(a)m 
+grestore
+566 452 113 339 240 288 60 1133 1356 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+230 fnt83
+228 150(b)m 
+grestore
+566 452 113 339 240 288 60 0 904 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+230 fnt83 234 178(c)m 
+grestore
+566 452 113 339 240 288 60 566 904 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+230 fnt83 222 150(d)m
+
+grestore
+566 452 113 339 240 288 60 1132 904 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+230 fnt83 235 178(e)m 
+grestore
+566 452 113 339 240 288 60 0 452 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+230 fnt83 235 173(f)m 
+grestore
+566 452 113 339 240 288 60 566 452 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+230 fnt83
+228 200(g)m 
+grestore
+566 452 113 339 240 288 60 1132 452 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+230 fnt83 228 149(h)m 
+grestore
+566 452 113 339 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+230 fnt83 253 153(i)m
+
+grestore
+1133 452 113 339 240 288 60 566 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+230 fnt83 535 176(j)m 
+grestore
+end end restore
+grestore
+0 3328(The)m 428(box)s 3(es)k
+1035(ha)s 4(v)k 3(e)k 1536(been)s 2045(added)s
+2675(to)s 2914(clarify)s 3590(the)s 3938(structure.)s 4937(The)s
+5365(width)s 5967(of)s 6238(this)s 6634(object)s 7278(is)s
+7488(formally)s 240 fnt78 480 2770(\()m 564(\()s 240 fnt83
+648 2778(width)m 240 fnt78 1187 2770(\()m 240 fnt83 1271 2778(a)m
+240 fnt78 1398 2770(\))m 1548(\255)s 1769(\()s 240 fnt83
+1853 2778(x)m 240 fnt78 2031 2770(+)m 240 fnt83 2232 2778(y)m
+240 fnt78 2346 2770(\))m 2424(\))s 2562(+)s 240 fnt83
+2763 2778(z)m 240 fnt78 2866 2770(\))m 3016(\255)s 3237(\()s
+240 fnt83 3321 2778(x)m 240 fnt78 3499 2770(+)m 3700(\()s
+3784(\()s 240 fnt83 3868 2778(y)m 240 fnt78 4042 2770(+)m
+240 fnt83 4243 2778(z)m 240 fnt78 4346 2770(\))m 4496(\255)s
+240 fnt83 4717 2778(width)m 240 fnt78 5256 2770(\()m 240 fnt83
+5340 2778(j)m 240 fnt78 5418 2770(\))m 5496(\))s 5574(\))s
+240 fnt82 0 2274(where)m 240 fnt83 480 1773(x)m 240 fnt78
+670 1765(=)m 240 fnt83 883 1773(width)m 240 fnt78 1422 1765(\()m
+240 fnt83 1506 1773(c)m 240 fnt78 1620 1765(\))m 1770(\255)s
+240 fnt83 1991 1773(width)m 240 fnt78 2530 1765(\()m 240 fnt83
+2662 1773(f)m 240 fnt78 2823 1765(\))m 2973(\255)s 240 fnt83
+3194 1773(width)m 240 fnt78 3733 1765(\()m 240 fnt83 3817 1773(i)m
+240 fnt78 3892 1765(\))m 240 fnt83 480 1222(y)m 240 fnt78
+666 1214(=)m 240 fnt83 879 1222(width)m 240 fnt78 1418 1214(\()m
+240 fnt83 1502 1222(d)m 240 fnt78 1688 1214(\))m 1838(\255)s
+240 fnt83 2059 1222(width)m 240 fnt78 2598 1214(\()m 240 fnt83
+2682 1222(g)m 240 fnt78 2808 1214(\))m 240 fnt83 480 671(z)m
+240 fnt78 655 663(=)m 240 fnt83 868 671(width)m 240 fnt78
+1407 663(\()m 240 fnt83 1491 671(b)m 240 fnt78 1617 663(\))m
+1767(\255)s 240 fnt83 1988 671(width)m 240 fnt78 2527 663(\()m
+240 fnt83 2611 671(e)m 240 fnt78 2722 663(\))m 2872(\255)s
+240 fnt83 3093 671(width)m 240 fnt78 3632 663(\()m 240 fnt83
+3716 671(h)m 240 fnt78 3843 663(\))m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 12 13
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4288 13844(-)m 4416(12)s 4710(-)s 0 12968(It)m 224(seems)s
+878(clear)s 1420(that)s 240 fnt83 1857 12970(y)m 240 fnt82
+2038 12968(at)m 2289(least)s 2805(must)s 3349(appear)s 4065(twice)s
+4657(in)s 4919(an)s 3(y)k 5335(e)s 3(xpression)k
+6431(for)s 6788(the)s 7155(width)s 7776(of)s 8066(this)s
+8482(object)s 0 12680(made)m 602(out)s 997(of)s 1297(simple)s
+2019(addition)s 2889(and)s 3322(maxing)s 4121(operations,)s 5253(sho)s 6(wing)k
+6141(that)s 6588(an)s 6900(ordinary)s 7793(tree)s 8235(structure)s
+0 12392(is)m 227(insuf\207cient)s 1379(for)s 1734(o)s 3(v)k 3(erlapping)k
+2941(spanning)s 3876(columns.)s 4868(The)s 5313(Basser)s 6027(Lout)s
+6556(interpreter)s 7626(actually)s 8453(rejects)s 0 12104(such)m 521(structures,)s
+1581(o)s 6(wing)k 2252(to)s 2517(the)s 2890(author')s 13(s)k
+3736(doubts)s 4451(about)s 5069(the)s 5442(implementability)s 7153(of)s
+240 fnt83 7449 12106(Constr)m 3(ained)k 240 fnt82 8722 12104(and)m
+240 fnt83 0 11818(AdjustSize)m 240 fnt82 1049 11816(\(Section)m 1902(5.3\))s
+2330(on)s 2627(them;)s 3217(b)s 4(ut)k 3579(with)s
+4061(hindsight)s 5012(this)s 5408(caution)s 6169(w)s 2(as)k
+6590(unnecessary)s 15(.)k 480 11442(The)m 915(directed)s 1749(ac)s 3(yclic)k
+2482(graph)s 3091(is)s 3308(ordered)s 4104(in)s 4354(the)s
+4709(sense)s 5290(that)s 5715(the)s 6071(order)s 6642(of)s
+6920(the)s 7275(edges)s 7878(entering)s 8722(and)s 0 11154(lea)m 4(ving)k
+746(each)s 1234(node)s 1748(matters.)s 2607(The)s 3028(structure)s
+3911(is)s 4114(highly)s 4773(dynamic,)s 5696(and)s 6093(tra)s 4(v)k 3(ersals)k
+7044(both)s 7519(with)s 7994(and)s 8390(ag)s 1(ainst)k
+0 10866(the)m 349(arro)s 6(ws)k 1045(are)s 1394(required.)s
+2355(After)s 2920(a)s 3087(fe)s 6(w)k 3494(ad-)s
+3788(hoc)s 4189(attempts)s 5050(to)s 5291(e)s 3(xtend)k
+5985(the)s 6334(usual)s 6896(tree)s 7310(representation)s 8722(had)s
+0 10578(f)m 2(ailed,)k 665(the)s 1030(author)s 1718(de)s 6(v)k 3(eloped)k
+2769(a)s 2952(representation)s 4379(based)s 5000(on)s 5314(doubly)s
+6051(link)s 2(ed)k 6723(lists)s 7175(of)s 7463(records)s
+8235(denoting)s 0 10290(links,)m 578(whose)s 1253(\210e)s 3(xibility)k
+2240(more)s 2794(than)s 3270(compensated)s 4584(for)s 4929(the)s
+5284(some)s 6(what)k 6315(e)s 3(xcessi)k 6(v)k 3(e)k
+7282(memory)s 8140(consump)s 8998(-)s 0 10002(tion.)m 536(F)s 3(or)k
+925(e)s 3(xample,)k gsave
+480 8136 translate
+240 fnt83 3282 1526 0 1470 240 288 12 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+338 338 56 282 240 288 12 0 1188 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 123 128(a)m 
+grestore
+(A) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 2944 1188 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83
+123 105(b)m 
+grestore
+(B) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 128 128(c)m 
+grestore
+(C) lfigpromotelabels
+grestore
+338 338 56 282 240 288 12 1472 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+338 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+192 fnt83 118 105(d)m
+
+grestore
+(D) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR C@CTR lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+C@CTR C@CTR A@CTR lfigangle C@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+0 0 0 0 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR D@CTR lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+D@CTR D@CTR A@CTR lfigangle D@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+0 0 0 0 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ B@CTR B@CTR D@CTR lfigangle B@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+D@CTR D@CTR B@CTR lfigangle D@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+end end restore
+grestore
+0 7685(is)m 210(represented)s 1369(by)s gsave
+1135 3169 translate
+240 fnt83 6796 4176 0 4120 240 288 12 LoutGraphic
+gsave
+grestore save gsave 300 dict begin lfigdict begin
+grestore
+452 1014 0 958 240 288 12 0 3162 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 676 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(TOP) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 338 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+206 150 translate
+192 fnt83 39 39 0 39 192 288 48 LoutGraphic
+gsave
+/lfigblack [ lfigcircle ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+(MID) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+192 fnt83 180 128(a)m
+
+grestore
+(BASE) lfigpromotelabels
+grestore
+(A) lfigpromotelabels
+grestore
+452 1014 0 958 240 288 12 6344 3162 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 676 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(TOP) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 338 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+206 150 translate
+192 fnt83 39 39 0 39 192 288 48 LoutGraphic
+gsave
+/lfigblack [ lfigcircle ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+(MID) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+192 fnt83 180 105(b)m 
+grestore
+(BASE) lfigpromotelabels
+grestore
+(B) lfigpromotelabels
+grestore
+452 1014 0 958 240 288 12 0 1581 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 676 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+206 150 translate
+192 fnt83 39 39 0 39 192 288 48 LoutGraphic
+gsave
+/lfigblack [ lfigcircle ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+(TOP) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 338 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+206 150 translate
+192 fnt83 39 39 0 39 192 288 48 LoutGraphic
+gsave
+/lfigblack [ lfigcircle ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+(MID) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+192 fnt83 104 107(LK)m 
+grestore
+(BASE) lfigpromotelabels
+grestore
+(L) lfigpromotelabels
+grestore
+452 1014 0 958 240 288 12 1586 1581 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 676 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+206 150 translate
+192 fnt83 39 39 0 39 192 288 48 LoutGraphic
+gsave
+/lfigblack [ lfigcircle ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+(TOP) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 338 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+206 150 translate
+192 fnt83 39 39 0 39 192 288 48 LoutGraphic
+gsave
+/lfigblack [ lfigcircle ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+(MID) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+192 fnt83
+104 107(LK)m 
+grestore
+(BASE) lfigpromotelabels
+grestore
+(M) lfigpromotelabels
+grestore
+452 1014 0 958 240 288 12 4758 1581 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 676 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+206 150 translate
+192 fnt83 39 39 0 39 192 288 48 LoutGraphic
+gsave
+/lfigblack [ lfigcircle ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+(TOP) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 338 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+206 150 translate
+192 fnt83 39 39 0 39 192 288 48 LoutGraphic
+gsave
+/lfigblack [ lfigcircle ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+(MID) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+192 fnt83 104 107(LK)m 
+grestore
+(BASE) lfigpromotelabels
+grestore
+(N) lfigpromotelabels
+grestore
+452 1014 0 958 240 288 12 0 0 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 676 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+206 150 translate
+192 fnt83 39 39 0 39 192 288 48 LoutGraphic
+gsave
+/lfigblack [ lfigcircle ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+(TOP) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 338 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(MID) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+192 fnt83 185 128(c)m
+
+grestore
+(BASE) lfigpromotelabels
+grestore
+(C) lfigpromotelabels
+grestore
+452 1014 0 958 240 288 12 3172 0 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 676 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+206 150 translate
+192 fnt83 39 39 0 39 192 288 48 LoutGraphic
+gsave
+/lfigblack [ lfigcircle ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigcircle ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+(TOP) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 338 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(MID) lfigpromotelabels
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+currentdict end 300 dict begin begin
+grestore
+452 338 56 282 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+192 fnt83 175 105(d)m 
+grestore
+(BASE) lfigpromotelabels
+grestore
+(D) lfigpromotelabels
+grestore
+0 0 0 0 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ 0.5 cm 0 A@MID@CTR L@MID@CTR A@MID@CTR M@MID@CTR lfigpmin lfigpmin lfigpmin lfigpsub /BL lfigpointdef
+A@MID@CTR L@MID@CTR A@MID@CTR M@MID@CTR lfigpmax lfigpmax lfigpmax 0.5 cm 0 lfigpadd /TR lfigpointdef
+BL 0 BL TR lfigydistance lfigpadd /TL lfigpointdef
+BL BL TR lfigxdistance 0 lfigpadd /BR lfigpointdef
+BL
+BR [ BR 0 0.5 cm lfigpadd ]
+BR 0.5 cm 0.5 cm lfigpadd
+TR 0.5 cm -0.5 cm lfigpadd [ 0 0.5 cm TR lfigpsub ]
+TR
+TL [ 0 0.5 cm TL lfigpsub ]
+0.5 cm 0.5 cm TL lfigpsub
+BL -0.5 cm 0.5 cm lfigpadd [ BL 0 0.5 cm lfigpadd ]
+BL ] lfigdopath
+pop pop
+grestore
+
+grestore
+0 0 0 0 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ 0.5 cm 0 L@TOP@CTR C@TOP@CTR L@TOP@CTR C@TOP@CTR lfigpmin lfigpmin lfigpmin lfigpsub /BL lfigpointdef
+L@TOP@CTR C@TOP@CTR L@TOP@CTR C@TOP@CTR lfigpmax lfigpmax lfigpmax 0.5 cm 0 lfigpadd /TR lfigpointdef
+BL 0 BL TR lfigydistance lfigpadd /TL lfigpointdef
+BL BL TR lfigxdistance 0 lfigpadd /BR lfigpointdef
+BL
+BR [ BR 0 0.5 cm lfigpadd ]
+BR 0.5 cm 0.5 cm lfigpadd
+TR 0.5 cm -0.5 cm lfigpadd [ 0 0.5 cm TR lfigpsub ]
+TR
+TL [ 0 0.5 cm TL lfigpsub ]
+0.5 cm 0.5 cm TL lfigpsub
+BL -0.5 cm 0.5 cm lfigpadd [ BL 0 0.5 cm lfigpadd ]
+BL ] lfigdopath
+pop pop
+grestore
+
+grestore
+0 0 0 0 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ 0.5 cm 0 M@TOP@CTR D@TOP@CTR N@TOP@CTR D@TOP@CTR lfigpmin lfigpmin lfigpmin lfigpsub /BL lfigpointdef
+M@TOP@CTR D@TOP@CTR N@TOP@CTR D@TOP@CTR lfigpmax lfigpmax lfigpmax 0.5 cm 0 lfigpadd /TR lfigpointdef
+BL 0 BL TR lfigydistance lfigpadd /TL lfigpointdef
+BL BL TR lfigxdistance 0 lfigpadd /BR lfigpointdef
+BL
+BR [ BR 0 0.5 cm lfigpadd ]
+BR 0.5 cm 0.5 cm lfigpadd
+TR 0.5 cm -0.5 cm lfigpadd [ 0 0.5 cm TR lfigpsub ]
+TR
+TL [ 0 0.5 cm TL lfigpsub ]
+0.5 cm 0.5 cm TL lfigpsub
+BL -0.5 cm 0.5 cm lfigpadd [ BL 0 0.5 cm lfigpadd ]
+BL ] lfigdopath
+pop pop
+grestore
+
+grestore
+0 0 0 0 240 288 12 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ 0.5 cm 0 B@MID@CTR N@MID@CTR B@MID@CTR N@MID@CTR lfigpmin lfigpmin lfigpmin lfigpsub /BL lfigpointdef
+B@MID@CTR N@MID@CTR B@MID@CTR N@MID@CTR lfigpmax lfigpmax lfigpmax 0.5 cm 0 lfigpadd /TR lfigpointdef
+BL 0 BL TR lfigydistance lfigpadd /TL lfigpointdef
+BL BL TR lfigxdistance 0 lfigpadd /BR lfigpointdef
+BL
+BR [ BR 0 0.5 cm lfigpadd ]
+BR 0.5 cm 0.5 cm lfigpadd
+TR 0.5 cm -0.5 cm lfigpadd [ 0 0.5 cm TR lfigpsub ]
+TR
+TL [ 0 0.5 cm TL lfigpsub ]
+0.5 cm 0.5 cm TL lfigpsub
+BL -0.5 cm 0.5 cm lfigpadd [ BL 0 0.5 cm lfigpadd ]
+BL ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+0 2718(where)m 240 fnt83 645 2720(LK)m
+240 fnt82 1017 2718(tags)m 1458(a)s 1630(record)s 2304(representing)s
+3543(a)s 3715(link.)s 4257(The)s 4690(\207rst)s 5127(list)s
+5484(in)s 5732(an)s 3(y)k 6135(node)s 6663(contains)s
+7516(all)s 7815(the)s 8169(incoming)s 0 2430(links,)m 577(the)s
+931(second)s 1660(contains)s 2514(the)s 2867(outgoing)s 3778(ones.)s
+4387(The)s 4821(node)s 5348(serv)s 3(es)k 5999(as)s
+6255(the)s 6609(header)s 7311(for)s 7655(both)s 8144(lists.)s
+8698(The)s 0 2142(required)m 890(operations)s 1974(reduce)s 2704(to)s
+2979(simple)s 3709(appends,)s 4638(deletes,)s 5444(and)s 5885(tra)s 4(v)k 3(ersals)k
+6880(of)s 7187(doubly)s 7944(link)s 2(ed)k 8635(lists,)s
+0 1854(all)m 325(ha)s 4(ving)k 1058(small)s 1663(constant)s
+2552(cost.)s 3133(There)s 3779(is)s 4021(a)s 4219(highly)s
+4918(tuned)s 5540(memory)s 6423(allocator)s 9(,)k 7389(and)s
+7825(care)s 8310(is)s 8553(tak)s 2(en)k 0 1566(to)m
+269(dispose)s 1073(of)s 1374(each)s 1900(node)s 2452(when)s
+3058(the)s 3436(last)s 3858(incoming)s 4845(link)s 5308(is)s
+5549(deleted,)s 6376(so)s 6672(that)s 7120(there)s 7684(is)s
+7924(no)s 8247(need)s 8788(for)s 0 1278(g)m 1(arbage)k
+812(collection.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 13 14
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4293 13844(-)m 4421(13)s 4705(-)s 480 13253(In)m 739(normal)s
+1475(use)s 1854(the)s 2205(number)s 3000(of)s 3275(nodes)s
+3888(at)s 4124(higher)s 4799(le)s 6(v)k 3(els)k
+5402(of)s 5676(the)s 6028(dag)s 6431(is)s 6644(small)s
+7220(in)s 7467(comparison)s 8644(with)s 0 12965(the)m 351(lea)s 4(v)k 3(es)k
+995(and)s 1402(their)s 1903(incoming)s 2863(links,)s 3438(so)s
+3707(we)s 4046(may)s 4515(estimate)s 5369(the)s 5720(space)s
+6311(comple)s 3(xity)k 7441(at)s 7676(about)s 8271(60)s
+8570(bytes)s 0 12677(per)m 355(input)s 896(w)s 2(ord)k
+1433(\(20)s 1797(bytes)s 2342(per)s 2696(link,)s 3165(40)s
+3449(per)s 3803(leaf)s 4222(node\).)s 4920(Careful)s 5680(optimization)s
+6935(could)s 7514(easily)s 8114(halv)s 3(e)k 8674(this,)s
+0 12389(b)m 4(ut)k 362(since)s 909(memory)s 1760(is)s
+1970(reclaimed)s 2969(after)s 3465(printing)s 4275(each)s 4770(page)s
+5278(there)s 5811(is)s 6021(little)s 6513(need.)s 240 fnt84
+0 11740(2.5.)m 471(Context-sensiti)s 2(v)k 2(e)k 2274(attrib)s 4(utes)k
+3318(of)s 3590(objects)s 240 fnt82 480 11264(Although)m 1466(we)s
+1826(are)s 2198(free)s 2649(to)s 2913(place)s 3498(an)s 3(y)k
+3920(object)s 4588(in)s 4856(an)s 3(y)k 5278(conte)s 3(xt,)k
+6111(the)s 6484(conte)s 3(xt)k 7270(must)s 7820(in\210uence)s
+8778(the)s 0 10976(appearance)m 1131(of)s 1402(the)s 1750(object,)s
+2441(since)s 2988(otherwise)s 220 fnt35 480 10477(A shor)m -8(t par)k 2(ag)k 2(r)k 2(aph of te)k 6(xt.)k
+240 fnt82 0 9978(could)m 588(not)s 952(appear)s 1647(in)s
+1887(a)s 2051(v)s 6(ariety)k 2760(of)s 3028(fonts,)s
+3611(column)s 4384(widths,)s 5126(etc.)s 5566(This)s 6040(in\210uence)s
+6970(cannot)s 7666(tak)s 2(e)k 8116(the)s 8461(purely)s
+0 9690(static)m 569(form)s 1106(that)s 1538(block-structured)s 3175(languages)s
+4196(use)s 4585(to)s 4837(associate)s 5769(v)s 6(alues)k
+6438(with)s 6933(identi\207ers,)s 8009(for)s 8360(then)s 8843(an)s
+0 9402(operator)m 850(could)s 1434(not)s 1794(in\210uence)s 2721(the)s
+3063(appearance)s 4188(of)s 4453(its)s 4723(parameters;)s 5876(and)s
+6274(a)s 6434(state)s 6921(v)s 6(ariable)k 7734(solution)s
+8556(is)s 8760(not)s 0 9114(compatible)m 1118(with)s 1600(the)s
+1948(o)s 3(v)k 3(erall)k 2660(functional)s 3684(design.)s
+480 8740(The)m 914(information)s 2105(needed)s 2848(from)s 3378(the)s
+3733(conte)s 3(xt)k 4500(seems)s 5141(quite)s 5682(limited,)s
+6471(comprising)s 7607(the)s 7961(font)s 8413(f)s 2(amily)k 15(,)k
+0 8452(f)m 2(ace,)k 525(and)s 952(size)s 1402(to)s
+1664(use,)s 2114(the)s 2485(style)s 3015(of)s 3309(paragraph)s
+4345(breaking)s 5259(required,)s 6185(ho)s 6(w)k 6669(much)s
+7281(space)s 7891(to)s 8154(substitute)s 0 8164(between)m 873(the)s
+1240(w)s 2(ords)k 1893(of)s 2184(paragraphs,)s 3359(and)s
+3782(ho)s 6(w)k 4263(much)s 4871(horizontal)s 5914(and)s
+6337(v)s 3(ertical)k 7124(space)s 7730(is)s 7959(a)s 4(v)k 6(ailable)k
+8887(to)s 0 7876(recei)m 6(v)k 3(e)k 763(the)s
+1139(object.)s 1914(These)s 2569(four)s 3054(items)s 3650(constitute)s
+4662(the)s 5038(so-called)s 5985(`style)s 6599(information')s 7866(of)s
+8165(Lout.)s 8809(As)s 0 7588(graphics)m 902(rendering)s 1912(hardw)s 2(are)k
+2896(impro)s 3(v)k 3(es,)k 3928(the)s 4317(style)s
+4865(information)s 6091(will)s 6558(probably)s 7504(gro)s 6(w)k
+8085(to)s 8366(include)s 0 7300(colour)m 671(and)s 1075(te)s 3(xture)k
+1791(information.)s 480 6926(The)m 908(w)s 2(ay)k 1359(to)s
+1598(deal)s 2051(with)s 2533(fonts)s 3062(at)s 3294(least)s
+3791(is)s 4001(v)s 3(ery)k 4477(clear:)s 220 fnt35
+480 6425({ )m 11(Times Slope 12p } @F)k 6(ont { Hello)k 8(, w)k 2(or)k -3(ld })k
+240 fnt82 0 5929(should)m 697(ha)s 4(v)k 3(e)k
+1198(result)s 240 fnt83 480 5475(Hello,)m 1104(world)s 240 fnt82
+0 4993(Lout)m 528(also)s 983(pro)s 3(vides)k 220 fnt35
+1872 4990(@Break)m 240 fnt82 2745 4993(and)m 220 fnt35 3166 4990(@Space)m
+240 fnt82 4080 4993(symbols)m 4946(for)s 5301(controlling)s 6420(the)s
+6785(paragraph)s 7815(breaking)s 8722(and)s 0 4705(space)m 610(styles)s
+1229(mentioned)s 2320(abo)s 3(v)k 3(e.)k 3074(These)s
+3724(w)s 2(ork)k 4299(in)s 4565(the)s 4937(same)s
+5507(w)s 2(ay)k 15(,)k 6020(returning)s 6972(their)s
+7493(right)s 8028(parameters)s 0 4417(in)m 261(the)s 627(style)s
+1152(of)s 1441(their)s 1956(left.)s 2455(The)s 2901(implementation)s
+4476(is)s 4704(v)s 3(ery)k 5198(simple:)s 6019(one)s
+6439(merely)s 7174(broadcasts)s 8252(the)s 8619(style)s 0 4129(information)m
+1183(do)s 6(wn)k 1765(into)s 2188(the)s 2533(parse)s
+3091(tree)s 3502(of)s 3771(the)s 4116(right)s 4625(parameter)s 13(.)k
+5728(A)s 5956(font,)s 6445(for)s 6781(e)s 3(xample,)k
+7693(is)s 7901(con)s 9(v)k 3(erted)k 8887(to)s
+0 3841(an)m 278(8-bit)s 783(internal)s 1562(name)s 2130(and)s
+2529(stored)s 3165(in)s 3403(each)s 3892(leaf,)s 4351(while)s
+4932(a)s 5093(breaking)s 5977(style)s 6479(is)s 6683(stored)s
+7320(in)s 7557(the)s 7900(root)s 8339(node)s 8855(of)s
+0 3553(each)m 495(paragraph.)s 480 3179(The)m 954(same)s 1547(language)s
+2514(design)s 3242(can)s 3677(be)s 4006(used)s 4549(for)s
+4933(a)s 4(v)k 6(ailable)k 5888(width)s 6536(and)s
+6986(height,)s 7738(only)s 8264(here)s 8778(the)s 0 2891(implementation)m
+1557(is)s 1767(much)s 2356(more)s 2903(demanding:)s 220 fnt35
+480 2390(2i @Wide {)m 480 2102(\(1\)  |0.1i  An e)m 6(xample)k 480 1814(containing a small)m 480 1526(par)m 2(ag)k 2(r)k 2(aph of \207lled te)k 6(xt.)k
+480 1238(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 14 15
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Italic
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4288 13844(-)m 4416(14)s 4710(-)s 0 13256(is)m 210(guaranteed)s
+1317(to)s 1556(be)s 1838(tw)s 2(o)k 2248(inches)s
+2910(wide:)s 480 12753(\(1\))m 891(An)s 1270(e)s 3(xample)k
+2162(containing)s 3254(a)s 891 12465(small)m 1504(paragraph)s 2558(of)s
+2871(\207lled)s 891 12177(te)m 3(xt.)k 0 11724(One)m 448(must)s
+966(calculate)s 1863(that)s 2273(1.9)s 2617(inches)s 3272(minus)s
+3900(the)s 4241(width)s 4836(of)s 220 fnt35 5100 11721(\(1\))m
+240 fnt82 5406 11724(is)m 5609(a)s 4(v)k 6(ailable)k
+6510(to)s 6741(the)s 7082(paragraph,)s 8138(and)s 8534(break)s
+0 11436(it)m 186(accordingly;)s 1421(Basser)s 2111(Lout)s 2617(does)s
+3100(this)s 3490(in)s 3727(tw)s 2(o)k 4130(stages.)s
+4872(In)s 5121(the)s 5463(\207rst,)s 5935(upw)s 2(ard-mo)k 3(ving)k
+7505(stage,)s 8097(widths)s 8779(are)s 0 11148(calculated)m 1018(using)s
+1581(the)s 1920(formulae)s 2829(of)s 3091(Section)s 3856(2.3,)s
+4254(which)s 4887(assume)s 5638(that)s 6047(a)s 4(v)k 6(ailable)k
+6946(space)s 7524(is)s 7725(in\207nite.)s 8557(If)s 8778(the)s
+0 10860(upw)m 2(ard)k 763(mo)s 3(v)k 3(ement)k
+1815(reaches)s 2570(a)s 240 fnt83 2724 10862(WIDE)m 240 fnt82
+3375 10860(node,)m 3936(corresponding)s 5346(to)s 5573(a)s 220 fnt35
+5728 10857(@Wide)m 240 fnt82 6490 10860(operator)m 9(,)k 7372(and)s
+7764(the)s 8100(calculated)s 0 10572(width)m 627(e)s 3(xceeds)k
+1457(that)s 1900(allo)s 6(wed,)k 2784(a)s 2975(second,)s
+3772(do)s 6(wnw)k 2(ard-mo)k 3(ving)k 5661(stage)s
+6234(is)s 6469(initiated)s 7334(which)s 8001(attempts)s 8887(to)s
+0 10284(reduce)m 681(the)s 1017(width)s 1606(by)s 1888(\207nding)s
+2607(and)s 2999(breaking)s 3877(paragraphs.)s 5077(This)s 5541(second)s
+6251(stage)s 6786(is)s 6984(quite)s 7505(routine)s 8226(e)s 3(xcept)k
+8894(at)s 220 fnt35 0 9993(|)m 240 fnt82 84 9996(nodes,)m
+736(whose)s 1390(children)s 2216(are)s 2549(the)s 2883(columns)s
+3731(of)s 3988(a)s 4141(table.)s 4755(It)s 4946(is)s
+5142(necessary)s 6111(to)s 6336(apportion)s 7296(the)s 7630(a)s 4(v)k 6(ailable)k
+8524(width)s 0 9708(\(minus)m 727(inter)s 4(-column)k 2026(g)s 1(aps\))k
+2604(among)s 3321(the)s 3681(columns.)s 4668(Basser)s 5377(Lout)s
+5901(lea)s 4(v)k 3(es)k 6554(narro)s 6(w)k
+7291(columns)s 8166(unbrok)s 2(en)k 0 9420(and)m 404(breaks)s
+1079(the)s 1427(remaining)s 2449(columns)s 3311(to)s 3550(equal)s
+4123(width,)s 4775(using)s 5347(up)s 5640(all)s 5933(of)s
+6204(the)s 6552(a)s 4(v)k 6(ailable)k 7460(space.)s
+480 9046(The)m 897(size)s 1313(of)s 1572(an)s 1844(object)s
+2476(is)s 2675(not)s 3029(clearly)s 3721(determined)s 4843(when)s
+5407(the)s 5744(upw)s 2(ard-mo)k 3(ving)k 7309(size)s
+7725(is)s 7923(less)s 8321(than)s 8778(the)s 0 8758(do)m 6(wnw)k 2(ard-mo)k 3(ving)k
+1871(a)s 4(v)k 6(ailable)k 2786(space,)s 3431(and)s
+3842(the)s 4197(object)s 4849(contains)s 5704(constructs)s 6731(that)s
+7156(depend)s 7913(on)s 8218(a)s 4(v)k 6(ailable)k
+0 8470(space)m 587(\(e.g.)s 1056(right)s 1567(justi\207cation\).)s 2938(F)s 3(or)k
+3327(e)s 3(xample,)k 4241(in)s 220 fnt35 480 7969(2i @Wide { Heading // a |1r)m -8(t b })k
+240 fnt82 0 7470(it)m 211(seems)s 865(natural)s 1603(to)s
+1861(assign)s 2536(a)s 2721(width)s 3342(of)s 3633(tw)s 2(o)k
+4062(inches)s 4744(to)s 5002(the)s 5369(subobject)s 220 fnt35
+6366 7467(a |1r)m -8(t b)k 240 fnt82 7124 7470(because)m 7957(of)s
+8247(the)s 8615(right)s 0 7182(justi\207cation,)m 1270(b)s 4(ut)k
+1667(it)s 1895(w)s 2(ould)k 2585(be)s 2903(equally)s
+3696(plausible)s 4650(if)s 4903(the)s 5286(width)s 5924(of)s
+220 fnt35 6230 7179(Heading)m 240 fnt82 7129 7182(w)m 2(as)k
+7586(assigned)s 8503(to)s 8778(the)s 0 6894(subobject)m 989(instead.)s
+1843(The)s 2284(author)s 2968(is)s 3191(conscious)s 4199(of)s
+4483(ha)s 4(ving)k 5197(f)s 2(ailed)k 5809(to)s
+6061(resolv)s 3(e)k 6817(this)s 7226(matter)s 7908(properly;)s
+8843(an)s 0 6606(e)m 3(xtra)k 534(operator)s 1390(for)s
+1728(controlling)s 2830(a)s 4(v)k 6(ailable)k 3738(space)s
+4325(is)s 4535(probably)s 5440(necessary)s 15(.)k 480 6232(The)m
+930(actual)s 1578(paragraph)s 2614(breaking)s 3527(is)s 3759(just)s
+4187(a)s 4376(simple)s 5092(transformation)s 6578(on)s 6897(the)s
+7268(parse)s 7851(tree;)s 8343(the)s 8714(real)s 0 5944(issue)m
+544(is)s 764(ho)s 6(w)k 1235(to)s 1484(describe)s
+2346(the)s 2704(v)s 6(arious)k 3463(styles:)s 4183(ragged)s
+4902(right,)s 5470(adjusted,)s 6384(outdented,)s 7445(and)s 7859(so)s
+8135(on.)s 8549(Their)s 0 5656(di)m 6(v)k 3(ersity)k
+874(suggests)s 1729(that)s 2140(the)s 3(y)k 2596(should)s
+3286(someho)s 6(w)k 4245(be)s 4519(de\207ned)s 5275(using)s
+5840(more)s 6380(basic)s 6917(features;)s 7777(b)s 4(ut)k
+8132(then)s 8593(there)s 0 5368(are)m 367(algorithms)s 1461(for)s
+1820(high-quality)s 3064(paragraph)s 4098(breaking,)s 5063(which)s 5726(presumably)s
+6917(must)s 7463(be)s 7766(b)s 4(uilt-in.)k 8650(This)s
+0 5080(dilemma)m 915(w)s 2(as)k 1355(not)s 1741(clearly)s
+2463(grasped)s 3285(by)s 3598(the)s 3966(author)s 4656(in)s
+4919(1985,)s 5525(and)s 5949(he)s 6250(included)s 7152(a)s
+7337(b)s 4(uilt-in)k 8113(paragraph)s 0 4792(break)m 2(er)k 9(,)k
+818(with)s 1306(the)s 220 fnt35 1660 4789(@Break)m 240 fnt82
+2522 4792(operator)m 3384(selecting)s 4292(from)s 4822(a)s 4995(\207x)s 3(ed)k
+5535(set)s 5866(of)s 6143(styles.)s 6857(A)s 7093(much)s
+7688(better)s 8298(solution)s 0 4504(based)m 603(on)s 900(g)s 1(alle)k 3(ys)k
+1624(will)s 2050(be)s 2332(gi)s 6(v)k 3(en)k
+2912(in)s 3155(Section)s 3929(5.5,)s 4336(b)s 4(ut,)k
+4745(re)s 3(grettably)k 15(,)k 5868(it)s 6060(is)s
+6270(not)s 6636(implemented.)s 240 fnt84 0 3711(3.)m 291(De\207nitions)s
+240 fnt82 480 3280(The)m 936(need)s 1474(to)s 1741(pro)s 3(vide)k
+2554(a)s 2748(means)s 3438(of)s 3737(packaging)s 4803(useful)s
+5470(pieces)s 6146(of)s 6445(code)s 6982(for)s 7348(easy)s
+7855(repeated)s 8751(use)s 0 2992(w)m 2(as)k 440(recognised)s
+1554(in)s 1816(the)s 2184(v)s 3(ery)k 2679(earliest)s
+3447(programming)s 4822(languages.)s 5962(This)s 6458(need)s 6987(is)s
+7217(e)s 6(v)k 3(en)k 7736(more)s 8303(acute)s
+8883(in)s 0 2704(document)m 1004(formatting,)s 2118(if)s 2335(that)s
+2752(is)s 2962(possible,)s 3852(because)s 4664(the)s 5012(majority)s
+5874(of)s 6145(users)s 6686(are)s 7033(not)s 7398(programmers)s
+8722(and)s 0 2416(do)m 293(not)s 659(understand)s 1767(the)s
+2115(code)s 2623(the)s 3(y)k 3086(in)s 9(v)k 4(ok)k 2(e.)k
+240 fnt84 0 1767(3.1.)m 471(Operators)s 240 fnt82 480 1290(It)m
+680(is)s 885(e)s 6(vident)k 1637(from)s 2156(the)s
+2498(e)s 3(xample)k 3356(of)s 3621(Eqn)s 4059(that)s
+4471(user)s 4(-de\207ned)k 5702(operators)s 6636(are)s 6978(needed)s
+7708(that)s 8121(mimic)s 8778(the)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 15 16
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Symbol
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4292 13841(-)m 4420(15)s 4706(-)s 0 13250(primiti)m 6(v)k 3(e)k
+929(ones)s 1426(in)s 1677(taking)s 2335(objects)s 3071(as)s
+3328(parameters)s 4434(and)s 4845(returning)s 5781(objects)s 6517(as)s
+6774(results.)s 7569(F)s 3(or)k 7965(e)s 3(xample,)k
+8887(to)s 0 12962(de\207ne)m 641(a)s 807(superscript)s 1915(operator)s
+2771(so)s 3037(that)s 220 fnt35 480 12468(2 sup n)m 240 fnt82
+0 11943(appears)m 781(as)s 168 fnt82 1145 12059(n)m 240 fnt78
+1031 11937(2)m 240 fnt82 1227 11943(,)m 1334(the)s 1682(follo)s 6(wing)k
+2659(operator)s 3515(de\207nition)s 4489(may)s 4955(be)s 5237(used:)s
+220 fnt35 480 11444(def sup)m 480 11156(    precedence 50)m 480 10868(    associativity r)m -3(ight)k
+480 10580(    left x)m 480 10292(    r)m -3(ight y)k 480 10004({)m 480 9716(    @OneRo)m 3(w {  |  {-2p @F)k 6(ont y}  ^/0.5fk  x  })k
+480 9428(})m 240 fnt82 0 8932(The)m 220 fnt35 481 8929(sup)m
+240 fnt82 940 8932(operator)m 1850(has)s 2273(precedence)s 3458(50,)s
+3858(is)s 4122(right)s 4686(associati)s 6(v)k 3(e,)k
+5886(tak)s 2(es)k 6479(tw)s 2(o)k 6943(objects)s
+7724(as)s 8028(parameters)s 0 8644(passed)m 720(on)s 1041(the)s
+1413(left)s 1814(and)s 2242(right,)s 2825(and)s 3253(returns)s
+3991(the)s 4363(object)s 5031(between)s 5910(braces)s 6595(as)s
+6869(result.)s 7587(This)s 8087(object)s 8756(has)s 0 8356(the)m
+348(structure)s gsave
+608 7875 translate
+280 fnt83 128 191 0 123 280 288 70 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+128 191 0 123 280 288 70 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+128 191 0 123 280 288 70 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+260 fnt35 0 56(y)m 
+grestore
+
+grestore
+end end restore
+grestore
+gsave
+480 7740 translate
+280 fnt83 128 135 0 67 280 288 70 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+128 135 0 67 280 288 70 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+128 135 0 67 280 288 70 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+260 fnt35 0 0(x)m
+
+grestore
+
+grestore
+end end restore
+grestore
+0 7289(b)m 4(ut)k 381(with)s 882(the)s 1249(\207rst)s
+1699(ro)s 6(w)k 2138(mark)s 2709(hidden)s 3437(by)s
+3751(the)s 220 fnt35 4118 7286(@OneRo)m 3(w)k 240 fnt82
+5268 7289(operator)m 9(,)k 6181(and)s 220 fnt35 6604 7286(y)m
+240 fnt82 6791 7289(tw)m 2(o)k 7220(points)s 7875(smaller)s
+8657(than)s 0 7001(it)m 220(w)s 2(ould)k 904(otherwise)s
+1917(ha)s 4(v)k 3(e)k 2447(been.)s 3091(The)s
+3548(length)s 220 fnt35 4231 6998(0.5f)m 240 fnt82 4683 7001(speci\207es)m
+5585(half)s 6057(the)s 6433(current)s 7198(font)s 7671(size;)s
+8243(Figure)s 8952(2)s 0 6713(describes)m 936(the)s 220 fnt35
+1280 6710(k)m 240 fnt82 1446 6713(g)m 1(ap)k 1840(mode.)s
+2532(In)s 2784(the)s 3128(Eq)s 3448(equation)s 4325(formatting)s
+5382(package)s 6218([10])s 6651(the)s 6995(equation)s 7872(as)s
+8118(a)s 8280(whole)s 8916(is)s 0 6425(set)m 331(in)s
+580(italic)s 1116(font,)s 1614(and)s 220 fnt35 2024 6422(2)m
+240 fnt82 2203 6425(is)m 2419(an)s 2709(identi\207er)s 3637(whose)s
+4311(body)s 4852(contains)s 5706(a)s 5879(font)s 6330(change)s
+7070(back)s 7590(to)s 7835(Roman.)s 8698(The)s 0 6137(digits)m
+220 fnt35 586 6134(0)m 240 fnt82 765 6137(to)m 220 fnt35
+1009 6134(9)m 240 fnt82 1186 6137(are)m 1538(classed)s 2291(as)s
+2546(punctuation)s 3737(characters,)s 4816(permitting)s 220 fnt35 5869 6134(234)m
+240 fnt82 6293 6137(for)m 6635(e)s 3(xample)k 7503(to)s
+7747(be)s 8034(interpreted)s 0 5849(as)m 250(a)s 416(sequence)s
+1349(of)s 1620(three)s 2153(identi\207ers.)s 480 5475(These)m 1152(de\207nitions)s
+2258(are)s 2650(easily)s 3307(implemented)s 4658(by)s 4997(a)s
+5208(standard)s 6122(symbol)s 6927(table)s 7492(and)s 7941(an)s
+8270(operator)s 0 5187(precedence)m 1155(parser)s 13(.)k 1914(Algol)s
+2539(block)s 3157(structure)s 4073(with)s 4580(the)s 4953(usual)s
+5538(scope)s 6164(rules)s 6704(w)s 2(as)k 7150(adopted)s
+7991(as)s 8266(a)s 8457(matter)s 0 4899(of)m 271(course.)s
+480 4525(Operators)m 1481(are)s 1837(limited)s 2580(to)s 2828(at)s
+3069(most)s 3603(tw)s 2(o)k 4022(parameters,)s 5185(left)s
+5571(and)s 5984(right,)s 6551(and)s 6964(the)s 7321(parameters)s
+8428(cannot)s 0 4237(be)m 282(gi)s 6(v)k 3(en)k
+862(def)s 2(ault)k 1583(v)s 6(alues.)k 240 fnt83
+2352 4239(Named)m 240 fnt82 3097 4237(parameters)m 4195(solv)s 3(e)k
+4753(both)s 5236(problems:)s 220 fnt35 480 3736(def @Pref)m 6(ace)k
+480 3448(    named @T)m 26(ag {})k 480 3160(    named @Title { Pref)m 6(ace })k 480 2872(    r)m -3(ight @Body)k
+480 2584({)m 480 2296(    Bold @F)m 6(ont @Title)k 480 2008(    //0.3v  @Body)m 480 1720(})m
+240 fnt82 0 1226(The)m 452(def)s 2(ault)k 1197(v)s 6(alue)k
+1789(appears)s 2594(just)s 3023(after)s 3543(the)s 3915(parameter')s 13(s)k
+5103(declaration,)s 6295(between)s 7173(braces.)s 7972(In)s 9(v)k 4(ocations)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 16 17
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4288 13842(-)m 4416(16)s 4709(-)s 0 13251(ha)m 4(v)k 3(e)k
+501(a)s 667(natural)s 1385(syntax:)s 220 fnt35 480 12750(@Pref)m 6(ace)k
+480 12462(    @Title { About this book })m 480 12174({)m 480 11886(    F)m 6(e)k 4(w obser)k -6(v)k 5(ers w)k 2(ould ha)k 4(v)k 5(e supposed in 1984, that ...)k
+480 11598(})m 240 fnt82 0 11104(with)m 481(the)s 827(actual)s
+1450(named)s 2145(parameters)s 3241(follo)s 6(wing)k 4216(directly)s
+4998(after)s 5492(the)s 5838(operator)s 9(,)k 6731(before)s
+7395(an)s 3(y)k 7790(right)s 8299(parame)s 8998(-)s
+0 10816(ter)m 13(.)k 400(In)s 653(this)s 1046(e)s 3(xample,)k
+220 fnt35 1958 10813(@T)m 26(ag)k 240 fnt82 2578 10816(will)m
+3001(recei)s 6(v)k 3(e)k 3735(its)s 4008(def)s 2(ault)k
+4726(v)s 6(alue,)k 5342(and)s 5744(a)s 5907(less)s
+6313(e)s 3(xpert)k 6965(user)s 7420(could)s 8007(safely)s
+8628(omit)s 0 10528(the)m 220 fnt35 348 10525(@Title)m 240 fnt82
+1036 10528(parameter)m 2050(as)s 2300(well.)s 480 10154(Lout)m 1007(permits)s
+1790(named)s 2502(parameters)s 3616(to)s 3870(ha)s 4(v)k 3(e)k
+4387(parameters,)s 5557(a)s 5739(feature)s 6472(with)s 6970(applications)s
+8192(to)s 8447(biblio)s 8998(-)s 0 9866(graphic)m 781(databases,)s
+1816(running)s 2626(headers,)s 3475(and)s 3891(other)s 4454(places)s
+5114(where)s 5766(a)s 5944(format)s 6652(has)s 7034(to)s
+7285(be)s 7579(supplied)s 8460(before)s 0 9578(content)m 760(is)s
+965(kno)s 6(wn.)k 1771(One)s 2221(could)s 2806(go)s
+3094(further)s 3798(and)s 4197(pro)s 3(vide)k 4976(a)s
+5137(complete)s 6064(lambda)s 6823(calculus,)s 7708(with)s 8185(functions)s
+0 9290(as)m 250(\207rst-)s 689(class)s 1204(objects,)s 1988(pro)s 3(vided)k
+2894(care)s 3347(w)s 2(as)k 3768(tak)s 2(en)k
+4341(not)s 4707(to)s 4946(intimidate)s 5970(the)s 6318(non-)s
+6746(e)s 3(xpert)k 7400(user)s 13(.)k 240 fnt84
+0 8641(3.2.)m 471(Recursion)s 1563(and)s 2004(page)s 2539(lay)s 6(out)k
+240 fnt82 480 8164(Design)m 1302(and)s 1794(implementation)s 3439(should)s
+4223(proceed)s 5126(together)s 6057(in)s 6387(e)s 3(xploratory)k
+7628(projects,)s 8579(since)s 0 7876(otherwise)m 988(the)s 1340(design)s
+2025(too)s 2388(easily)s 3003(becomes)s 3894(unrealistic.)s 5056(Sometimes)s
+6173(the)s 6524(implementation)s 8085(does)s 8579(more)s 0 7588(than)m
+469(its)s 745(designer)s 1615(intended.)s 2603(The)s 3031(author)s
+3702(wrote)s 4302(the)s 4650(follo)s 6(wing)k 5627(purely)s
+6292(as)s 6542(a)s 6708(testing)s 7398(scaf)s 6(fold:)k
+220 fnt35 480 7087(def @P)m 8(age r)k -3(ight x)k 480 6799({)m
+480 6511(    8i @Wide 11i @High)m 480 6223(    {)m 480 5935(        //1i  ||1i  x  ||1i)m 480 5647(        //1i)m 480 5359(    })m
+480 5071(})m 240 fnt82 0 4577(Only)m 518(afterw)s 2(ards)k
+1558(did)s 1906(he)s 2172(realize)s 2848(its)s 3108(signi\207cance:)s
+4400(the)s 4732(concept)s 5521(of)s 5776(a)s 5926(page)s
+6418(had)s 6807(been)s 7300(de\207ned)s 8047(outside)s 8778(the)s
+0 4289(implementation,)m 1619(remo)s 3(ving)k 2598(the)s 2959(need)s
+3481(for)s 3831(commands)s 4932(for)s 5282(setting)s 5984(page)s
+6505(width)s 7119(and)s 7535(height,)s 8253(mar)s 4(gins,)k
+0 4001(and)m 404(so)s 670(on.)s 480 3627(De\207ning)m 1393(a)s
+1582(sequence)s 2538(of)s 2831(pages)s 3450(is)s 3683(harder)s 9(,)k
+4414(since)s 4983(their)s 5503(number)s 6317(is)s 6550(not)s
+6938(kno)s 6(wn)k 7665(in)s 7931(adv)s 6(ance.)k
+8896(A)s 0 3339(simple)m 693(v)s 3(ersion)k 1451(of)s
+1722(this)s 2118(same)s 2665(problem)s 3522(is)s 3732(af)s 6(forded)k
+4593(by)s 4887(the)s 5235(leaders)s 5962(found)s 6579(in)s
+6822(tables)s 7430(of)s 7701(contents:)s 480 2834(Chapter)m 1297(7)s
+1525(..)s 1809(..)s 2093(..)s 2377(..)s 2661(..)s
+2945(..)s 3229(..)s 3513(..)s 3797(..)s 4081(..)s
+4365(..)s 4649(..)s 4933(..)s 5217(..)s 5501(..)s
+5785(..)s 6009(53)s 0 2331(This)m 476(seemed)s 1251(to)s
+1490(require)s 2222(recursion,)s 3218(speci\207cally)s 4360(the)s 4708(de\207nition)s
+220 fnt35 480 1830(def @Leaders { ..)m 13(   @Leaders })k 240 fnt82 0 1336(Note)m
+535(that)s 968(both)s 220 fnt35 1465 1333(..)m 240 fnt82
+1643 1336(and)m 220 fnt35 2061 1333(@Leaders)m 240 fnt82 3145 1336(are)m
+3506(objects,)s 4305(so)s 4585(the)s 4948(tw)s 2(o)k
+5372(spaces)s 6062(separating)s 7111(them)s 7664(are)s 8026(signi\207cant.)s
+0 1048(No)m 361(base)s 858(case)s 1341(is)s 1567(gi)s 6(v)k 3(en,)k
+2213(and)s 2633(indeed)s 3345(we)s 3696(ha)s 4(v)k 3(e)k
+4213(no)s 4522(boolean)s 5353(or)s 5628(conditional)s 6775(operators)s
+7731(with)s 8229(which)s 8887(to)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 17 18
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4291 13844(-)m 4419(17)s 4707(-)s 0 13255(e)m 3(xpress)k
+757(it;)s 993(b)s 4(ut)k 1346(we)s 1673(can)s
+2053(adopt)s 2637(the)s 2977(implicit)s 3770(base)s 4243(`if)s
+4530(space)s 5109(is)s 5311(not)s 5668(suf\207cient,)s 6656(delete)s
+220 fnt35 7273 13252(@Leaders)m 240 fnt82 8334 13255(and)m 8729(an)s 3(y)k
+0 12967(preceding)m 996(space'.)s 1770(Then)s 2319(the)s 2667(e)s 3(xpression)k
+220 fnt35 480 12466(4i @Wide { Chapter 7  @Leaders  53 })m 240 fnt82 0 11970(will)m 417(produce)s
+1234(the)s 1572(object)s 2206(sho)s 6(wn)k 2873(abo)s 3(v)k 3(e.)k
+3593(It)s 3788(is)s 3988(hard)s 4461(to)s 4691(see)s
+5042(ho)s 6(w)k 5493(this)s 5879(base)s 6350(could)s
+6930(be)s 7202(made)s 7766(e)s 3(xplicit,)k 8576(with)s
+8998(-)s 0 11682(out)m 348(violating)s 1232(the)s 1561(general)s
+2301(principle)s 3187(of)s 3439(k)s 2(eeping)k 4230(all)s
+4504(size)s 4912(information)s 6079(internal.)s 6953(In)s 7190(the)s
+7519(implementation,)s 220 fnt35 0 11391(@Leaders)m 240 fnt82 1071 11394(remains)m
+1881(une)s 3(xpanded)k 3097(while)s 3686(sizes)s 4204(are)s
+4554(being)s 5142(calculated;)s 6224(then)s 6696(it)s 6891(is)s
+7103(treated)s 7813(similarly)s 8718(to)s 8960(a)s 0 11106(recepti)m 6(v)k 3(e)k
+922(symbol,)s 1734(with)s 2216(its)s 2492(body)s 3026(as)s
+3276(an)s 3559(incoming)s 4516(g)s 1(alle)k 3(y)k
+5150(\(Section)s 6003(5.2\).)s 480 10732(W)m 9(ith)k 1014(this)s
+1418(settled,)s 2156(it)s 2356(is)s 2574(no)s 6(w)k
+3044(clear)s 3575(ho)s 6(w)k 4044(to)s 4291(de\207ne)s
+4940(a)s 5115(document)s 6127(which)s 6777(is)s 6995(a)s
+7169(numbered)s 8193(sequence)s 0 10444(of)m 271(pages.)s 980(Let)s
+220 fnt35 1358 10441(@Ne)m 6(xt)k 240 fnt82 2082 10444(be)m
+2364(a)s 2530(pre\207x)s 3143(operator)s 3999(which)s 4641(returns)s
+5355(its)s 5631(parameter)s 6645(plus)s 7095(one.)s 7605(Then)s
+220 fnt35 480 9943(def @P)m 8(ageList)k 480 9655(    r)m -3(ight @P)k 8(ageNum)k
+480 9367({)m 480 9079(    @P)m 8(age {)k 480 8791(          |0.5r)m -8(t - @P)k 8(ageNum -)k
+480 8503(          //1v   @T)m 26(e)k 6(xtPlace)k 480 8215(          //1r)m -8(t  @F)k 6(ootSect)k
+480 7927(    })m 480 7639(    //)m 480 7351(    @P)m 8(ageList @Ne)k 6(xt @P)k 8(ageNum)k
+480 7063(})m 240 fnt82 0 6569(when)m 576(in)s 9(v)k 4(ok)k 2(ed)k
+1391(in)s 1634(the)s 1982(e)s 3(xpression)k 220 fnt35
+3059 6566(@P)m 8(ageList 1)k 240 fnt82 4267 6569(,)m 4374(has)s
+4744(for)s 5082(its)s 5358(result)s 5948(the)s 6296(potentially)s
+7372(in\207nite)s 8105(object)s 1927 2494 0 2494 240 288 60 480 3735 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt82 845 2216(-)m 931(1)s
+1035(-)s 140 fnt35 170 2000(@T)m 16(e)k 4(xtPlace)k
+170 173(@F)m 4(ootSect)k 
+grestore
+1927 2494 0 2494 240 288 60 480 1241 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt82 839 2216(-)m 925(2)s
+1041(-)s 140 fnt35 170 2000(@T)m 16(e)k 4(xtPlace)k
+170 173(@F)m 4(ootSect)k 
+grestore
+140 fnt35 480 1026(@P)m 5(ageList 3)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 18 19
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4291 13844(-)m 4419(18)s 4706(-)s 0 13253(Similarly)m 15(,)k
+980(we)s 1315(may)s 1781(de\207ne)s 220 fnt35 2422 13250(@F)m 6(ootSect)k
+240 fnt82 3573 13253(lik)m 2(e)k 3985(this:)s 220 fnt35
+480 12752(def @F)m 6(ootSect)k 480 12464({)m 480 12176(    def @F)m 6(ootList)k
+480 11888(        r)m -3(ight @Num)k 480 11600(    {)m 480 11312(        @F)m 6(ootPlace)k
+480 11024(        //1v)m 480 10736(        @F)m 6(ootList @Ne)k 6(xt @Num)k 480 10448(    })m
+480 9872(    1i @Wide @HLine)m 480 9584(    //1v)m 480 9296(    @F)m 6(ootList 1)k 480 9008(})m
+240 fnt82 0 8514(so)m 266(that)s 684(an)s 967(in)s 9(v)k 4(ocation)k
+2021(of)s 220 fnt35 2292 8511(@F)m 6(ootSect)k 240 fnt82
+3443 8514(produces)m gsave
+480 8174 translate
+220 fnt35 1440 0 0 0 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+220 fnt35 480 7829(@F)m 6(ootPlace)k 480 7541(@F)m 6(ootPlace)k
+480 7253(@F)m 6(ootPlace)k 480 6965(...)m 240 fnt82 0 6514(The)m
+476(e)s 3(xpansion)k 1550(process)s 2367(is)s 2626(v)s 3(ery)k
+3150(similar)s 3921(to)s 4209(a)s 4424(BNF)s 4997(deri)s 6(v)k 6(ation,)k
+6109(and)s 6562(w)s 2(ould)k 7266(be)s 7597(attempted)s
+8646(only)s 0 6226(on)m 297(demand.)s 480 5852(Clearly)m 15(,)k
+1276(deciding)s 2154(which)s 2797(e)s 3(xpansions)k 3910(to)s
+4150(tak)s 2(e)k 4603(and)s 5008(replacing)s 220 fnt35
+5951 5849(@T)m 26(e)k 6(xtPlace)k 240 fnt82 7170 5852(and)m
+220 fnt35 7575 5849(@F)m 6(ootPlace)k 240 fnt82 8832 5852(by)m
+0 5564(the)m 338(appropriate)s 1471(actual)s 2085(te)s 3(xt)k
+2489(will)s 2904(not)s 3259(be)s 3530(easy;)s 4056(this)s
+4441(is)s 4640(the)s 4977(subject)s 5703(of)s 5963(Section)s
+6726(5.1.)s 7179(The)s 7596(important)s 8574(point)s 0 5276(for)m
+331(no)s 6(w)k 784(is)s 986(that)s 1397(we)s
+1724(ha)s 4(v)k 3(e)k 2217(here)s 2677(a)s
+2835(v)s 3(ery)k 3303(simple)s 3989(and)s 4385(\210e)s 3(xible)k
+5147(method)s 5916(of)s 6179(specifying)s 7220(the)s 7561(layout)s
+8211(of)s 8474(pages,)s 0 4988(which)m 642(requires)s 1462(no)s
+1755(specialized)s 2874(language)s 3794(features.)s 240 fnt84 0 4340(3.3.)m
+471(Modules)s 240 fnt82 480 3909(It)m 679(is)s 882(well)s
+1342(accepted)s 2229(that)s 2641(the)s 2982(visibility)s 3879(of)s
+4143(symbols)s 4986(is)s 5189(not)s 5549(adequately)s 6632(controlled)s
+7653(by)s 7940(Algol)s 8533(block)s 0 3621(structure.)m 999(The)s
+1427(author)s 2098(is)s 2308(a)s 3(w)k 2(are)k
+2929(of)s 3200(se)s 6(v)k 3(eral)k 3922(major)s
+4539(problems)s 5480(of)s 5751(this)s 6147(kind)s 6631(in)s
+6874(document)s 7878(formatting.)s 480 3247(One)m 976(problem)s 1874(is)s
+2126(that)s 2585(some)s 3187(symbols)s 4078(should)s 4816(be)s
+5139(visible)s 5874(only)s 6395(within)s 7104(restricted)s 8091(parts)s
+8647(of)s 8960(a)s 0 2959(document.)m 1108(F)s 3(or)k
+1497(e)s 3(xample,)k 2411(we)s 2746(naturally)s 3649(e)s 3(xpect)k
+4330(equation)s 5211(formatting)s 6272(to)s 6511(be)s 6793(accomplished)s
+8166(lik)s 2(e)k 8578(this:)s 220 fnt35 480 2462(surrounding te)m 6(xt)k
+480 2174(@Eq { {x sup 2  +  1} o)m 3(v)k 5(er 4 })k 480 1886(surrounding te)m 6(xt)k
+240 fnt82 0 1387(with)m 482(the)s 830(symbols)s 220 fnt35
+1679 1384(sup)m 240 fnt82 2025 1387(,)m 220 fnt35 2132 1384(o)m 3(v)k 5(er)k
+240 fnt82 2551 1387(,)m 2658(etc.,)s 3103(visible)s 3796(only)s
+4276(within)s 4944(the)s 5292(equation,)s 6223(not)s 6589(in)s
+6832(the)s 7180(surrounding)s 8390(te)s 3(xt.)k 480 1013(It)m
+695(seems)s 1341(natural)s 2069(to)s 2319(de\207ne)s 2970(these)s
+3528(symbols)s 4387(within)s 220 fnt35 5066 1010(@Eq)m 240 fnt82
+5544 1013(,)m 5661(since)s 6219(the)s 3(y)k 6692(are)s
+7050(local)s 7579(to)s 7829(equations.)s 8921(It)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 19 20
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4289 13844(-)m 4417(19)s 4708(-)s 0 13251(only)m 494(remains)s
+1316(then)s 1799(to)s 2053(decree)s 2746(that)s 3179(symbols)s
+4043(local)s 4576(to)s 220 fnt35 4830 13248(@Eq)m 240 fnt82
+5382 13251(are)m 5744(to)s 5998(be)s 6294(visible)s 7002(within)s
+7684(its)s 7975(actual)s 8615(right)s 0 12963(parameter)m 9(,)k
+1052(and)s 1456(this)s 1852(is)s 2062(done)s 2584(by)s
+2878(replacing)s 3820(the)s 4168(right)s 4679(formal)s 5370(parameter)s
+6384(with)s 6866(a)s 240 fnt83 7032 12965(body)m 240 fnt82
+7554 12963(parameter:)m 220 fnt35 480 12477(e)m 6(xpor)k -8(t sup o)k 3(v)k 5(er)k
+480 12189(def @Eq)m 480 11901(    body @Body)m 480 11613({)m 480 11325(    def sup ...)m 480 11037(    def o)m 3(v)k 5(er ...)k
+480 10461(    Slope @F)m 6(ont @Body)k 480 10173(})m 240 fnt82 0 9679(The)m
+220 fnt35 426 9676(e)m 6(xpor)k -8(t)k 240 fnt82
+1092 9679(clause)m 1743(lists)s 2176(the)s 2522(identi\207ers)s 3526(which)s
+4166(are)s 4511(permitted)s 5482(to)s 5719(be)s 5999(visible)s
+6690(outside)s 7435(their)s 7930(usual)s 8488(range,)s 0 9391(the)m
+359(body)s 905(of)s 220 fnt35 1188 9388(@Eq)m 240 fnt82
+1666 9391(;)m 1790(and)s 2206(the)s 220 fnt35 2566 9388(body)m
+240 fnt82 3112 9391(declaration)m 4241(imports)s 5034(them)s 5584(into)s
+6021(\(mak)s 2(es)k 6772(them)s 7322(visible)s 8027(within\))s
+8778(the)s 0 9103(actual)m 614(right)s 1114(parameter)s 2117(of)s
+2376(each)s 2860(in)s 9(v)k 4(ocation)k 3903(of)s
+220 fnt35 4162 9100(@Eq)m 240 fnt82 4640 9103(.)m 4793(This)s
+5258(arrangement)s 6500(has)s 6859(pro)s 3(v)k 3(en)k
+7564(v)s 3(ery)k 8028(con)s 9(v)k 3(enient)k
+0 8815(for)m 338(de\207ning)s 1176(a)s 1342(v)s 6(ariety)k
+2053(of)s 2324(special-purpose)s 3880(packages.)s 480 8441(Another)m 1361(problem)s
+2256(arises)s 2888(when)s 3502(global)s 4193(symbols,)s 5136(such)s
+5669(as)s 5957(the)s 6343(ones)s 6871(used)s 7406(for)s
+7782(headings)s 8722(and)s 0 8153(paragraph)m 1034(separators,)s 2130(call)s
+2550(on)s 2868(v)s 6(alues)k 3545(that)s 3984(the)s
+4353(non-e)s 3(xpert)k 5468(user)s 5947(will)s 6394(need)s
+6925(to)s 7185(modify)s 15(,)k 7989(such)s 8506(as)s
+8778(the)s 0 7865(initial)m 605(font)s 1044(or)s 1297(paragraph)s
+2303(indent.)s 3059(These)s 3680(v)s 6(alues)k 4329(are)s
+4670(lik)s 2(e)k 5076(parameters)s 6167(of)s 6432(the)s
+6774(document)s 7771(as)s 8015(a)s 8175(whole,)s 8860(so)s
+0 7577(it)m 192(is)s 402(natural)s 1120(to)s 1359(try)s
+1678(this:)s 220 fnt35 480 7076(e)m 6(xpor)k -8(t @Heading @PP ...)k
+480 6788(def @BookLa)m 6(y)k 4(out)k 480 6500(    named @InitialF)m 6(ont { )k 11(Times Base 12p })k
+480 6212(    named @InitialBreak { adjust 14p })m 480 5924(    named @ColumnWidth { 6i })m 480 5636(    ...)m 480 5348({)m 480 5060(    def @Heading ...)m
+480 4772(    def @PP ...)m 480 4484(})m 240 fnt82 0 3990(No)m 6(w)k
+220 fnt35 579 3987(@Heading)m 240 fnt82 1732 3990(and)m 220 fnt35
+2202 3987(@PP)m 240 fnt82 2833 3990(may)m 3365(in)s 9(v)k 4(ok)k 2(e)k
+220 fnt35 4124 3987(@InitialF)m 6(ont)k 240 fnt82 5411 3990(and)m
+5881(the)s 6295(other)s 6911(parameters.)s 8188(T)s 19(o)k
+8554(mak)s 2(e)k 220 fnt35 0 3699(@Heading)m 240 fnt82
+1100 3702(and)m 220 fnt35 1517 3699(@PP)m 240 fnt82 2096 3702(visible)m
+2802(throughout)s 3926(the)s 4287(document,)s 5352(we)s 5700(need)s
+6223(only)s 6716(add)s 7133(a)s 7312(body)s 7859(parameter)s
+8887(to)s 220 fnt35 0 3411(@BookLa)m 6(y)k 4(out)k
+240 fnt82 1428 3414(and)m 1832(present)s 2582(the)s 2930(entire)s
+3529(document)s 4533(as)s 220 fnt35 480 2913(@BookLa)m 6(y)k 4(out)k
+480 2625(    @InitialF)m 6(ont { Helv)k 5(etica Base 10p })k 480 2337(    @InitialBreak { adjust 12p })m 480 2049({)m
+480 1761(    )m 11(The document.)k 480 1473(})m 240 fnt82 0 979(b)m 4(ut)k
+383(for)s 742(practical)s 1639(reasons)s 2429(gi)s 6(v)k 3(en)k
+3030(belo)s 6(w)k 3684(we)s 4040(prefer)s 4691(not)s
+5078(to)s 5338(enclose)s 6132(the)s 6502(entire)s 7122(document)s
+8147(in)s 8412(braces.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 20 21
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4287 13844(-)m 4415(20)s 4710(-)s 0 13253(Instead,)m 797(we)s
+1132(write)s 220 fnt35 480 12771(@Use { @BookLa)m 6(y)k 4(out)k
+480 12483(    @InitialF)m 6(ont { Helv)k 5(etica Base 10p })k 480 12195(    @InitialBreak { adjust 12p })m 480 11907(})m
+480 11619(The document.)m 240 fnt82 0 11165(which)m 643(has)s 1015(the)s
+1365(same)s 1914(ef)s 6(fect:)k 220 fnt35 2617 11162(@Use)m
+240 fnt82 3284 11165(mak)m 2(es)k 3946(the)s 4296(e)s 3(xported)k
+5190(symbols)s 6040(of)s 220 fnt35 6313 11162(@BookLa)m 6(y)k 4(out)k
+240 fnt82 7743 11165(visible)m 8438(for)s 8778(the)s 0 10877(remainder)m
+1028(of)s 1299(the)s 1647(document,)s 2698(and)s 3102(is)s
+3312(permitted)s 4285(only)s 4765(at)s 4997(the)s 5345(be)s 3(ginning.)k
+480 10503(The)m 925(third)s 1451(feature)s 2187(that)s 2622(af)s 6(fects)k
+3319(visibility)s 15(,)k 4278(and)s 4699(which)s 5359(will)s
+5802(pro)s 3(v)k 3(e)k 6414(useful)s 7071(for)s
+7426(cross)s 7986(referencing)s 0 10215(\(Section)m 851(6.1\),)s 1335(is)s
+1543(the)s 220 fnt35 1889 10212(@Open)m 240 fnt82 2693 10215(symbol.)m
+3560(It)s 3763(mak)s 2(es)k 4421(the)s 4767(e)s 3(xported)k
+5657(symbols)s 6504(of)s 6773(its)s 7047(left)s 7422(parameter)s
+8433(visible)s 0 9927(within)m 668(its)s 944(right)s 1455(parameter)s 9(,)k
+2507(and)s 2911(is)s 3121(therefore)s 4038(similar)s 4760(to)s
+4999(the)s 5347(P)s 3(ascal)k 220 fnt35 6009 9924(with)m
+240 fnt82 6444 9927(statement.)m 480 9553(It)m 698(could)s 1301(be)s
+1596(ar)s 4(gued)k 2314(that)s 2745(Lout)s 3270(is)s
+3493(o)s 3(v)k 3(er)k 4(-supplied)k 4869(with)s
+5364(these)s 5924(visibility)s 6840(modifying)s 7903(features:)s 8778(the)s
+0 9265(body)m 544(parameter)s 9(,)k 220 fnt35 1606 9262(@Use)m
+240 fnt82 2282 9265(and)m 220 fnt35 2696 9262(@Open)m 240 fnt82
+3513 9265(do)m 3816(not)s 4193(seem)s 4754(suf\207ciently)s 5894(dif)s 6(ferent)k
+6779(from)s 7314(each)s 7819(another)s 13(.)k 8698(The)s
+220 fnt35 0 8974(@Open)m 240 fnt82 806 8977(symbol)m 1566(is)s
+1776(the)s 2124(most)s 2649(general,)s 3459(being)s 4044(capable)s
+4830(of)s 5101(replacing)s 6043(the)s 6391(other)s 6942(tw)s 2(o.)k
+7463(F)s 3(or)k 7852(e)s 3(xample,)k 220 fnt35
+480 8476(@Use { x })m 480 8188(@Use { y })m 480 7900(Body of document)m 240 fnt82 0 7402(can)m
+389(be)s 671(replaced)s 1538(by)s 220 fnt35 480 6901(x @Open {)m
+480 6613(y @Open {)m 480 6325(Body of document)m 480 6037(}})m 240 fnt82 0 5543(and,)m
+453(taking)s 1104(the)s 220 fnt35 1452 5540(@Eq)m 240 fnt82
+1990 5543(symbol)m 2750(abo)s 3(v)k 3(e)k 3372(as)s
+3622(e)s 3(xample,)k 4536(we)s 4871(could)s 5461(eliminate)s
+6405(its)s 6681(body)s 7215(parameter)s 9(,)k 8267(add)s
+220 fnt35 480 5042(def @Body r)m -3(ight x { Slope @F)k 6(ont x })k 240 fnt82
+0 4543(to)m 239(the)s 587(e)s 3(xported)k 1479(de\207nitions)s
+2540(of)s 220 fnt35 2811 4540(@Eq)m 240 fnt82 3289 4543(,)m
+3396(and)s 3800(replace)s 220 fnt35 480 4042(@Eq { object })m 240 fnt82
+0 3545(by)m 220 fnt35 480 3044(@Eq @Open { @Body { object } })m 240 fnt82 0 2544(If)m
+220 fnt35 232 2541(@Eq)m 240 fnt82 772 2544(is)m 985(a)s
+1153(g)s 1(alle)k 3(y)k 1790(\(Section)s 2645(5.1\),)s
+220 fnt35 3133 2541(@Body)m 240 fnt82 3917 2544(must)m 4444(tak)s 2(e)k
+4899(o)s 3(v)k 3(er)k 5380(that)s 5800(function.)s
+6764(But)s 7172(one)s 7577(w)s 2(ould)k 8234(not)s
+8603(w)s 2(ant)k 0 2256(to)m 253(write)s 813(these)s
+1374(clumsy)s 2133(e)s 3(xpressions)k 3311(in)s 3568(practice,)s
+4444(and)s 4862(the)s 5224(enclosure)s 6210(of)s 6495(lar)s 4(ge)k
+7038(quantities)s 8032(of)s 8317(input)s 8883(in)s 0 1968(e)m 3(xtra)k
+534(braces)s 1195(could)s 1785(cause)s 2372(Basser)s 3069(Lout)s
+3581(to)s 3820(run)s 4196(out)s 4562(of)s 4833(memory)s
+5684(\(Section)s 6537(5.4\).)s 480 1594(A)m 700(quite)s 1224(separate)s
+2052(kind)s 2526(of)s 2786(visibility)s 3679(problem)s 4526(arises)s
+5110(when)s 5676(e)s 3(xpert)k 6319(users)s 6851(wish)s
+7350(to)s 7579(de\207ne)s 8210(an)s 8482(object)s 0 1306(or)m
+259(operator)s 1115(for)s 1453(repeated)s 2320(use)s 2695(within,)s
+3413(say)s 15(,)k 3824(equations:)s 220 fnt35 480 807(def isum { sum from i=1 to n })m
+240 fnt82 0 313(As)m 338(it)s 551(stands)s 1221(this)s
+1638(can)s 2048(only)s 2549(be)s 2852(placed)s 3555(within)s
+4244(the)s 220 fnt35 4613 310(@Eq)m 240 fnt82 5172 313(package)m
+6033(itself,)s 6637(where)s 220 fnt35 7298 310(sum)m 240 fnt82
+7780 313(and)m 8205(the)s 8575(other)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 21 22
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4297 13844(-)m 4425(21)s 4700(-)s 0 13256(symbols)m 841(are)s
+1179(visible,)s 1915(b)s 4(ut)k 2268(it)s 2451(is)s
+2653(not)s 3010(desirable)s 3919(to)s 4150(modify)s 4886(the)s
+5225(source)s 5897(code)s 6396(of)s 6658(a)s 6816(standard)s
+7675(package.)s 8614(Lout)s 0 12968(pro)m 3(vides)k 872(an)s
+220 fnt35 1155 12965(impor)m -8(t)k 240 fnt82 1828 12968(clause)m
+2481(to)s 2720(solv)s 3(e)k 3278(this)s 3674(problem:)s
+220 fnt35 480 12467(impor)m -8(t @Eq)k 480 12179(def isum { sum from i=1 to n })m 240 fnt82
+0 11685(may)m 469(appear)s 1169(after)s 220 fnt35 1669 11682(@Eq)m
+240 fnt82 2210 11685(is)m 2423(de\207ned,)s 3239(and)s 3646(it)s
+3842(will)s 4271(mak)s 2(e)k 4846(the)s 5198(e)s 3(xported)k
+6093(symbols)s 6945(of)s 220 fnt35 7220 11682(@Eq)m 240 fnt82
+7761 11685(visible)m 8458(within)s 0 11397(the)m 335(body)s 855(of)s
+220 fnt35 1112 11394(isum)m 240 fnt82 1561 11397(.)m 1711(This)s
+2174(feature)s 2878(complicates)s 4056(the)s 4390(treatment)s 5337(of)s
+5595(en)s 9(vironments)k 6925(\(Section)s 7764(3.4\),)s 8236(and)s
+8626(e)s 6(v)k 3(en)k 0 11109(introduces)m 1050(an)s
+1336(insecurity)s 15(,)k 2373(when)s 220 fnt35 2952 11106(isum)m
+240 fnt82 3464 11109(is)m 3677(in)s 9(v)k 4(ok)k 2(ed)k
+4495(outside)s 5245(an)s 5531(equation.)s 6522(A)s 6755(simpler)s
+7534(approach)s 8471(w)s 2(ould)k 0 10821(be)m 290(to)s
+538(allo)s 6(w)k 1126(only)s 1615(one)s 2026(symbol)s
+2795(in)s 3047(an)s 220 fnt35 3339 10818(impor)m -8(t)k
+240 fnt82 4020 10821(clause,)m 4733(and)s 5146(treat)s 5638(the)s
+5995(follo)s 6(wing)k 6981(de\207nition)s 7964(e)s 3(xactly)k
+8714(lik)s 2(e)k 0 10533(a)m 174(local)s 702(de\207nition)s
+1684(of)s 1964(that)s 2390(symbol;)s 3216(b)s 4(ut)k
+3587(then)s 4064(it)s 4265(w)s 2(ould)k 4928(not)s
+5303(be)s 5594(possible)s 6442(to)s 6690(de\207ne)s 7339(symbols)s
+8197(using)s 8778(the)s 0 10245(resources)m 953(of)s 1224(more)s
+1771(than)s 2240(one)s 2642(of)s 2913(the)s 3261(standard)s
+4129(packages.)s 240 fnt84 0 9596(3.4.)m 471(Implementation)s 2159(of)s
+2431(de\207nitions)s 240 fnt82 480 9119(Input)m 1089(is)s 1343(processed)s
+2388(by)s 2726(a)s 2936(h)s 1(ybrid)k 3663(parser)s
+4350(which)s 5036(emplo)s 2(ys)k 5940(operator)s 6840(precedence)s
+8015(for)s 8398(objects)s 0 8831(and)m 433(simple)s 1156(recursi)s 6(v)k 3(e)k
+2108(descent)s 2915(for)s 3283(the)s 3661(headers)s 4472(of)s
+4772(de\207nitions.)s 5976(A)s 6236(symbol)s 7026(table)s 7576(stores)s
+8214(the)s 8592(body)s 0 8543(of)m 278(each)s 780(de\207nition)s
+1761(as)s 2018(a)s 2191(parse)s 2758(tree,)s 3229(e)s 3(xcept)k
+3917(for)s 4263(macros)s 5011(which)s 5660(are)s 6014(lists)s
+6456(of)s 6734(tok)s 2(ens,)k 7471(and)s 7882(manages)s
+8778(the)s 0 8255(usual)m 564(stack)s 1121(of)s 1397(static)s
+1958(scopes,)s 2708(accepting)s 240 fnt83 3682 8257(PushScope)m 240 fnt82
+4791 8255(and)m 240 fnt83 5200 8257(P)m 19(opScope)k 240 fnt82
+6197 8255(operations)m 7249(as)s 7504(the)s 7857(parser)s 8505(enters)s
+0 7967(and)m 447(lea)s 4(v)k 3(es)k 1131(scope)s
+1775(re)s 3(gions,)k 2626(including)s 3627(actual)s 4295(body)s
+4872(parameters)s 6013(and)s 6461(the)s 6852(right)s 7406(parameter)s
+8463(of)s 8778(the)s 220 fnt35 0 7676(@Open)m 240 fnt82
+806 7679(operator)m 13(.)k 480 7305(As)m 818(the)s 1187(parse)s
+1769(proceeds,)s 2747(a)s 2934(complete)s 3888(call)s 4308(graph)s
+4932(is)s 5163(constructed,)s 6393(recording,)s 7438(for)s 7797(each)s
+8314(symbol,)s 0 7017(which)m 633(symbols)s 1473(are)s 1810(in)s 9(v)k 4(ok)k 2(ed)k
+2616(within)s 3274(its)s 3541(body)s 15(.)k 4160(Immediately)s
+5412(after)s 5898(the)s 6237(last)s 6618(de\207nition)s 7583(is)s
+7783(read,)s 8292(the)s 8630(tran)s 8998(-)s 0 6729(siti)m 6(v)k 3(e)k
+565(closure)s 1312(of)s 1584(the)s 1933(call)s 2334(graph)s
+2937(is)s 3148(computed,)s 4200(and)s 4605(used)s 5104(to)s
+5344(determine)s 6356(whether)s 7187(each)s 7684(non-)s 8112(parameter)s
+0 6441(symbol)m 775(is)s 1001(recursi)s 6(v)k 3(e)k
+1939(or)s 2214(recepti)s 6(v)k 3(e)k 3151(\(Section)s
+4020(5.1\),)s 4522(and)s 4942(whether)s 5787(each)s 6298(parameter)s
+7328(is)s 7554(in)s 9(v)k 4(ok)k 2(ed)k
+8385(e)s 3(xactly)k 0 6153(once)m 508(or)s 767(not.)s
+480 5779(Purely)m 1188(functional)s 2243(systems)s 3082(may)s 3579(e)s 6(v)k 6(aluate)k
+4450(symbol)s 5240(in)s 9(v)k 4(ocations)k 6412(in)s
+6686(applicati)s 6(v)k 3(e)k 7812(order)s 8407(\(where)s
+0 5491(parameters)m 1092(are)s 1433(e)s 6(v)k 6(aluated)k
+2389(before)s 3049(substitution)s 4216(into)s 4635(bodies\),)s 5440(or)s
+5693(in)s 5930(normal)s 6656(order)s 7214(\(substitution)s 8460(before)s
+0 5203(e)m 6(v)k 6(aluation\),)k 1164(and)s 1562(the)s 3(y)k
+2018(may)s 2478(also)s 2909(share)s 3463(the)s 3804(v)s 6(alue)k
+4366(of)s 4630(a)s 4790(parameter)s 5798(among)s 6496(all)s
+6783(uses)s 7239(of)s 7504(it.)s 7793(But)s 8193(in)s
+8429(Basser)s 0 4915(Lout,)m 603(the)s 996(presence)s 1932(of)s
+2248(conte)s 3(xt-sensiti)k 6(v)k 3(e)k 3955(style)s
+4507(information)s 5736(\(Section)s 6634(2.5\))s 7106(forces)s 7785(normal)s
+8562(order)s 0 4627(e)m 6(v)k 6(aluation)k 1041(and)s
+1445(pre)s 6(v)k 3(ents)k 2297(sharing)s 3054(of)s
+3325(parameter)s 4339(v)s 6(alues.)k 480 4253(T)m 19(o)k
+780(e)s 6(v)k 6(aluate)k 1620(an)s 1903(unsized)s
+2692(object)s 3336(\(pure)s 3896(parse)s 4456(tree\),)s 4999(its)s
+240 fnt83 5275 4255(en)m 9(vir)k 10(onment)k 240 fnt82
+6456 4253(,)m 6563(the)s 6911(equi)s 6(v)k 6(alent)k
+7955(of)s 8226(the)s 8574(stack)s 0 3965(frames)m 728(in)s
+999(Algol-lik)s 2(e)k 2064(languages,)s 3156(must)s 3710(be)s
+4020(a)s 4(v)k 6(ailable,)k 5008(containing)s 6099(the)s
+6476(actual)s 7129(v)s 6(alues)k 7814(of)s 8113(all)s
+8435(formal)s 0 3677(parameters)m 1119(that)s 1558(are)s 1927(visible)s
+2641(within)s 3330(the)s 3700(unsized)s 4510(object.)s 5279(En)s 9(vironment)k
+6601(handling)s 7513(is)s 7744(a)s 7932(well-kno)s 6(wn)k
+0 3389(implementation)m 1557(technique,)s 2594(so)s 2860(it)s 3052(will)s
+3478(be)s 3760(discussed)s 4735(only)s 5215(brie\210y)s 5893(here.)s
+480 3015(En)m 9(vironments)k 1894(are)s 2272(e)s 3(xtra)k
+2837(subtrees)s 3702(hung)s 4265(from)s 4820(the)s 5199(objects)s
+5958(the)s 3(y)k 6451(refer)s 6991(to.)s 7372(This)s
+7879(or)s 4(g)k 1(anization)k 0 2727(mak)m 2(es)k
+668(e)s 3(xcellent)k 1595(use)s 1978(of)s 2257(the)s
+2613(ordered)s 3409(dag)s 3816(to)s 4063(permit)s 4754(en)s 9(vironments)k
+6106(to)s 6353(be)s 6643(shared,)s 7382(and)s 7794(deleted)s
+8550(when)s 0 2439(the)m 339(last)s 721(reference)s 1655(to)s
+1885(them)s 2413(is)s 2614(remo)s 3(v)k 3(ed.)k
+3600(Se)s 6(v)k 3(eral)k 4353(optimizations)s 5695(ha)s 4(v)k 3(e)k
+6187(been)s 6687(implemented.)s 8090(Actual)s 8772(pa)s 8998(-)s
+0 2151(rameters)m 860(kno)s 6(wn)k 1552(to)s 1778(be)s
+2048(in)s 9(v)k 4(ok)k 2(ed)k 2850(only)s
+3318(once)s 3814(are)s 4148(mo)s 3(v)k 3(ed)k
+4840(in)s 5070(from)s 5582(the)s 5918(en)s 9(vironment,)k
+7212(not)s 7566(copied;)s 8303(cop)s 2(ying)k 0 1863(could)m
+581(lead)s 1028(to)s 1258(quadratic)s 2191(time)s 2662(comple)s 3(xity)k 15(.)k
+3875(Actual)s 4558(parameters)s 5647(of)s 5909(the)s 6248(form)s
+220 fnt35 6763 1860(@Ne)m 6(xt)k 240 fnt83 7478 1865(object)m
+240 fnt82 8117 1863(recei)m 6(v)k 3(e)k 8843(an)s
+0 1575(applicati)m 6(v)k 3(e)k 1105(pre-)s 1478(e)s 6(v)k 6(aluation)k
+2529(which)s 3181(pre)s 6(v)k 3(ents)k 4044(long)s
+4533(chains)s 5205(of)s 220 fnt35 5486 1572(@Ne)m 6(xt)k
+240 fnt82 6221 1575(symbols)m 7080(from)s 7614(forming)s 8448(during)s
+0 1287(the)m 359(generation)s 1437(of)s 1719(lar)s 4(ge)k
+2260(page)s 2779(numbers.)s 3779(Some)s 4391(en)s 9(vironments)k
+5747(which)s 6400(pro)s 3(v)k 6(ably)k 7308(contrib)s 4(ute)k
+8341(nothing)s 0 999(are)m 344(deleted,)s 1137(most)s 1659(notably)s
+2427(when)s 3000(a)s 3162(symbol)s 3918(in)s 9(v)k 4(ocation)k
+4969(has)s 5335(no)s 5625(symbols)s 6470(within)s 7135(its)s
+7407(actual)s 8028(parameters)s 0 711(and)m 406(no)s 702(import)s
+1402(list,)s 1803(so)s 2071(that)s 2492(only)s 2975(the)s
+3326(en)s 9(vironment)k 4589(of)s 4862(its)s 5141(body)s
+5678(need)s 6191(be)s 6476(k)s 2(ept;)k 7000(this)s
+7399(sa)s 4(v)k 3(es)k 7964(a)s 8133(great)s
+8673(deal)s 0 423(of)m 271(space)s 858(when)s 1434(objects)s
+2162(with)s 2644(en)s 9(vironments)k 3988(are)s 4335(written)s
+5068(to)s 5307(auxiliary)s 6210(\207les)s 6659(\(Section)s 7512(6.1\).)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 22 23
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4288 13844(-)m 4416(22)s 4710(-)s 240 fnt84 0 12678(4.)m
+291(Implementation)s 1979(of)s 2251(the)s 2625(functional)s 3715(subset)s
+240 fnt82 480 12201(The)m 941(objects)s 1702(and)s 2139(de\207nitions)s
+3233(of)s 3537(Lout)s 4082(are)s 4462(v)s 3(ery)k
+4971(similar)s 5726(to)s 5998(those)s 6592(found)s 7242(in)s
+7518(other)s 8102(functional)s 0 11913(languages,)m 1085(and)s 1510(the)s 3(y)k
+1994(form)s 2539(a)s 2726(natural)s 3465(subset)s 4144(of)s
+4436(the)s 4805(language.)s 5854(So)s 6181(we)s 6537(pause)s
+7159(here)s 7647(and)s 8072(present)s 8843(an)s 0 11625(o)m 3(v)k 3(ervie)k 6(w)k
+932(of)s 1203(the)s 1551(Basser)s 2248(Lout)s 2760(object)s
+3404(e)s 6(v)k 6(aluation)k 4445(algorithm.)s 480 11251(The)m
+922(problem)s 1794(is)s 2019(to)s 2272(tak)s 2(e)k
+2739(an)s 3037(unsized)s 3841(object)s 4499(\(pure)s 5074(parse)s
+5649(tree\),)s 6206(its)s 6497(en)s 9(vironment)k 7772(\(Section)s
+8640(3.4\),)s 0 10963(and)m 404(its)s 681(style)s 1188(\(Section)s
+2042(2.5\),)s 2528(and)s 2933(to)s 3173(produce)s 4000(a)s
+4167(PostScript)s 5209(\207le)s 5571(for)s 5910(rendering)s 6879(the)s
+7228(object)s 7872(on)s 8170(an)s 8454(output)s 0 10675(de)m 6(vice.)k
+786(This)s 1267(\207le)s 1632(is)s 1847(essentially)s 2914(a)s
+3084(sequence)s 4022(of)s 4298(instructions)s 5468(to)s 5712(print)s
+6227(a)s 6398(gi)s 6(v)k 3(en)k 6983(string)s
+7584(of)s 7860(characters)s 8883(in)s 0 10387(a)m 166(gi)s 6(v)k 3(en)k
+746(font)s 1191(at)s 1423(a)s 1589(gi)s 6(v)k 3(en)k
+2169(point.)s 480 10013(Before)m 1189(the)s 1541(algorithm)s 2534(be)s 3(gins,)k
+3266(the)s 3618(parse)s 4182(tree)s 4599(must)s 5127(be)s
+5413(obtained,)s 6348(either)s 6955(by)s 7252(parsing)s 8013(input)s
+8569(or)s 8832(by)s 0 9725(cop)m 2(ying)k 823(from)s
+1347(the)s 1695(symbol)s 2455(table.)s 3082(Afterw)s 2(ards)k
+4205(the)s 4553(data)s 5011(structure)s 5901(must)s 6426(be)s
+6708(disposed.)s 7710(The)s 8137(algorithm)s 0 9437(proper)m 692(consists)s
+1508(of)s 1787(\207v)s 3(e)k 2207(passes,)s 2933(each)s
+3437(a)s 3611(recursi)s 6(v)k 3(e)k 4541(tra)s 4(v)k 3(ersal)k
+5418(of)s 5697(the)s 6054(structure)s 6953(from)s 7485(the)s
+7841(root)s 8294(do)s 6(wn)k 8887(to)s 0 9149(the)m
+348(lea)s 4(v)k 3(es)k 989(and)s 1393(back.)s
+240 fnt83 0 8695(1.)m 330(Evaluation)s 1490(of)s 1827(unsized)s
+2667(objects.)s 240 fnt82 3554 8693(On)m 3960(the)s 4364(w)s 2(ay)k
+4871(do)s 6(wn,)k 5561(calculate)s 6521(en)s 9(vironments)k
+7921(and)s 8381(replace)s 0 8405(non-recursi)m 6(v)k 3(e,)k
+1404(non-recepti)s 6(v)k 3(e)k 2757(symbols)s 3598(by)s
+3884(their)s 4373(bodies)s 5041(\(Section)s 5886(3.4\);)s 6369(broadcast)s
+7337(fonts)s 7858(to)s 8089(the)s 8429(lea)s 4(v)k 3(es,)k
+0 8117(and)m 409(paragraph)s 1427(breaking)s 2322(and)s 2731(spacing)s
+3521(styles)s 4121(to)s 4365(the)s 4718(paragraph)s 5736(nodes.)s
+6465(On)s 6820(the)s 7173(w)s 2(ay)k 7629(back)s
+8147(up,)s 8500(delete)s 240 fnt83 0 7831(FONT)m 240 fnt82
+630 7829(,)m 240 fnt83 737 7831(BREAK)m 240 fnt82 1494 7829(,)m
+1601(and)s 240 fnt83 2005 7831(SP)m 21(A)k 7(CE)k
+240 fnt82 2760 7829(nodes,)m 3426(and)s 3830(insert)s 240 fnt83
+4420 7831(SPLIT)m 240 fnt82 5049 7829(,)m 240 fnt83 5156 7831(COL)m
+240 fnt82 5622 7829(,)m 5729(and)s 240 fnt83 6133 7831(R)m 9(O)k 12(W)k
+240 fnt82 6707 7829(nodes)m 7317(\(Section)s 8170(2.3\).)s 240 fnt83
+0 7336(2.)m 293(W)s 13(idth)k 925(calculations)s 2169(and)s
+2614(br)s 8(eaking)k 3(.)k 240 fnt82 3628 7334(Calculate)m
+4605(the)s 4973(width)s 5594(of)s 5885(e)s 6(v)k 3(ery)k
+6480(subobject)s 7477(from)s 8020(the)s 8388(bottom)s 0 7046(up.)m
+404(As)s 720(described)s 1693(in)s 1936(Section)s 2709(2.3,)s
+240 fnt83 3115 7048(WIDE)m 240 fnt82 3777 7046(nodes)m 4386(may)s
+4851(trigger)s 5547(object)s 6190(breaking)s 7079(sub-tra)s 4(v)k 3(ersals)k
+8448(during)s 0 6758(this)m 396(pass.)s 240 fnt83 0 6255(3.)m
+274(Height)s 989(calculations.)s 240 fnt82 2312 6253(Calculate)m 3270(the)s
+3618(height)s 4276(of)s 4547(e)s 6(v)k 3(ery)k
+5123(subobject,)s 6147(from)s 6671(the)s 7019(bottom)s 7757(up.)s
+240 fnt83 0 5750(4.)m 283(Horizontal)s 1389(coor)s 8(dinates.)k
+240 fnt82 2674 5748(Calculate)m 3641(the)s 3998(horizontal)s 5032(coordinate)s
+6106(of)s 6386(each)s 6890(subobject)s 7876(from)s 8409(the)s
+8767(top)s 0 5460(do)m 6(wn,)k 634(and)s 1038(store)s
+1558(each)s 2053(leaf)s -13(')k 13(s)k 2633(coordinate)s
+3698(in)s 3941(the)s 4289(leaf.)s 240 fnt83 0 4976(5.)m
+295(V)s 26(ertical)k 1119(coor)s 8(dinates)k 2317(and)s
+2765(P)s 19(ostScript)k 3827(g)s 2(ener)k 3(ation.)k
+240 fnt82 5034 4974(Calculate)m 6013(the)s 6383(v)s 3(ertical)k
+7171(coordinate)s 8257(of)s 8550(e)s 6(v)k 3(ery)k
+0 4686(subobject)m 981(from)s 1509(the)s 1861(top)s 2224(do)s 6(wn,)k
+2862(and)s 3270(at)s 3506(each)s 4005(leaf,)s 4473(retrie)s 6(v)k 3(e)k
+5252(the)s 5604(character)s 6542(string,)s 7197(font,)s 7693(and)s
+8102(horizontal)s 0 4398(coordinate,)m 1116(and)s 1520(print)s 2031(the)s
+2379(PostScript)s 3421(instruction)s 4500(for)s 4838(rendering)s 5807(that)s
+6225(leaf.)s 0 3895(Figure)m 692(3)s 869(gi)s 6(v)k 3(es)k
+1428(the)s 1789(amount)s 2579(of)s 2863(code)s 3383(required)s
+4250(for)s 4600(each)s 5168(pass.)s 5756(Symmetry)s 6819(between)s
+7685(horizontal)s 8722(and)s 0 3607(v)m 3(ertical)k 764(is)s
+971(e)s 3(xploited)k 1913(throughout)s 3021(Basser)s 3715(Lout,)s
+4271(and)s 4672(passes)s 5331(2)s 5502(and)s 5903(3,)s
+6127(as)s 6374(well)s 6837(as)s 7084(4)s 7255(and)s
+7656(5,)s 7880(are)s 8224(e)s 3(x)k 3(ecuted)k
+0 3319(on)m 297(shared)s 979(code.)s 480 2945(The)m 929(author)s
+1621(can)s 2031(see)s 2413(no)s 2728(simple)s 3442(w)s 2(ay)k
+3914(to)s 4174(reduce)s 4888(the)s 5258(number)s 6070(of)s
+6362(passes.)s 7158(The)s 7607(introduction)s 8855(of)s 0 2657(horizontal)m
+1027(g)s 1(alle)k 3(ys)k 1755(\(Section)s 2612(5.5\))s
+3044(w)s 2(ould)k 3703(remo)s 3(v)k 3(e)k
+4474(the)s 4826(need)s 5340(for)s 5682(the)s 6034(object)s
+6682(breaking)s 7576(transformations)s 0 2369(within)m 700(this)s 1128(algorithm)s
+2149(that)s 2599(are)s 2978(the)s 3359(principal)s 4295(obstacles)s
+5254(in)s 5529(the)s 5909(w)s 2(ay)k 6393(of)s
+6696(the)s 7076(mer)s 4(ging)k 7954(of)s 8257(passes)s
+8952(2)s 0 2081(and)m 404(3.)s 240 fnt84 0 1337(5.)m
+291(Galleys)s 240 fnt82 480 860(W)m 9(ith)k 1022(objects)s
+1767(and)s 2188(de\207nitions)s 3266(under)s 3888(control,)s 4689(the)s
+5053(author)s 5741(f)s 2(aced)k 6331(the)s 6696(problem)s
+7570(of)s 7858(getting)s 8592(body)s 0 572(te)m 3(xt,)k
+478(footnotes,)s 1491(\210oating)s 2291(\207gures)s 3009(and)s 3429(tables,)s
+4109(references,)s 5213(inde)s 3(x)k 5813(entries,)s 6572(and)s
+6992(entries)s 7695(in)s 7954(the)s 8318(table)s 8855(of)s
+0 284(contents)m 844(into)s 1264(their)s 1757(places.)s 2513(The)s
+2937(resulting)s 3821(in)s 9(v)k 3(estig)k 1(ation)k
+5095(occupied)s 6013(three)s 6541(months)s 7293(of)s 7559(full-time)s
+8444(design)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 23 24
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4293 13844(-)m 4421(23)s 4705(-)s 1659 13218(1.)m 2163(Initialization)s
+7172(200)s 1659 12930(2.)m 2163(Memory)s 3041(allocation,)s 4090(ordered)s
+4878(dag)s 5277(operations)s 7172(400)s 1659 12642(3.)m 2163(Le)s 3(xical)k
+2931(analysis,)s 3808(macros,)s 4605(\207le)s 4966(handling)s 6992(1,350)s
+1659 12354(4.)m 2163(P)s 3(arsing)k 2930(of)s 3201(objects)s
+3929(and)s 4333(de\207nitions)s 6992(1,150)s 1659 12066(5.)m 2163(Symbol)s
+2963(table)s 3483(and)s 3887(call)s 4286(graph)s 7172(600)s
+1659 11778(6.)m 2163(Ev)s 6(aluation)k 3250(of)s 3521(pure)s
+4002(parse)s 4562(trees)s 6992(1,650)s 1659 11490(7.)m 2163(Reading,)s
+3068(storing,)s 3839(and)s 4243(scaling)s 4973(of)s 5244(fonts)s
+7172(600)s 1659 11202(8.)m 2163(Cross)s 2759(references)s 3790(and)s
+4194(databases)s 6992(1,000)s 1659 10914(9.)m 2163(W)s 9(idth)k
+2809(and)s 3213(height)s 3871(calculations,)s 5119(and)s 5523(breaking)s
+7172(700)s 1539 10626(10.)m 240 fnt83 2163 10628(Constr)m 3(ained)k
+240 fnt82 3410 10626(and)m 240 fnt83 3814 10628(AdjustSize)m 240 fnt82
+7172 10626(700)m 1539 10338(11.)m 2163(T)s 8(ransfer)k 3023(of)s
+3294(sized)s 3843(objects)s 4571(into)s 4996(g)s 1(alle)k 3(y)k
+5630(tree)s 7172(450)s 1539 10050(12.)m 2163(Galle)s 3(y)k
+2851(\210ushing)s 3676(algorithm)s 6992(1,500)s 1539 9762(13.)m 2163(Coordinate)s
+3282(calculations)s 4474(and)s 4878(PostScript)s 5920(output)s 7172(700)s
+1539 9474(14.)m 2163(Deb)s 4(ugging)k 3277(and)s 3681(error)s
+4204(handling)s 6992(1,200)s 655 0 0 0 240 288 60 6872 9328 LoutGr2
+0.5 pt ltabhs
+grestore
+
+grestore
+6872 9074(12,200)m 240 fnt84 0 8394(Figur)m 4(e)k
+761(3.)s 1084(Major)s 1825(components)s 3134(of)s 3438(the)s
+3844(Basser)s 4612(Lout)s 5197(inter)s 2(pr)k 4(eter)k 22(,)k
+6441(sho)s 2(wing)k 7365(the)s 7772(appr)s 4(oximate)k
+0 8106(number)m 868(of)s 1140(lines)s 1658(of)s 1930(C)s
+2155(code.)s 240 fnt82 0 7512(w)m 2(ork,)k 612(and)s
+1031(proceeded)s 2088(approximately)s 3538(as)s 3803(described)s 4793(in)s
+5051(Section)s 5840(5.1;)s 6268(the)s 6631(implementation)s 8204(occupied)s
+0 7224(the)m 348(years)s 903(1987-89.)s 240 fnt84 0 6575(5.1.)m
+471(The)s 926(galley)s 1580(abstraction)s 240 fnt82 480 6098(Let)m
+870(us)s 1147(tak)s 2(e)k 1611(the)s 1972(footnote)s
+2838(as)s 3100(a)s 3279(representati)s 6(v)k 3(e)k
+4677(e)s 3(xample.)k 5661(At)s 5973(some)s 6546(point)s
+7111(in)s 7366(the)s 7727(document,)s 8791(we)s 0 5810(wish)m
+509(to)s 748(write)s 220 fnt35 480 5362(preceding te)m 6(xt)k
+480 5074(@F)m 6(ootNote { f)k 6(ootnote te)k 6(xt })k 480 4786(f)m 6(ollo)k 3(wing te)k 6(xt)k
+240 fnt82 0 4287(and)m 406(we)s 744(e)s 3(xpect)k
+1428(the)s 1779(formatter)s 2729(to)s 2971(remo)s 3(v)k 3(e)k
+3741(the)s 4092(footnote)s 4947(from)s 5474(this)s 5873(conte)s 3(xt)k
+6637(and)s 7044(place)s 7607(it)s 7802(at)s 8037(the)s
+8388(bottom)s 0 3999(of)m 281(the)s 639(current)s 1386(page,)s
+1955(possibly)s 2817(splitting)s 3664(some)s 4235(or)s 4504(all)s
+4808(of)s 5089(it)s 5291(onto)s 5781(a)s 5957(follo)s 6(wing)k
+6944(page)s 7463(if)s 7690(space)s 8287(is)s 8508(insuf)s
+8998(-)s 0 3711(\207cient.)m 480 3337(An)m 844(object)s 1503(appears)s
+2298(in)s 2556(the)s 2918(\207nal)s 3413(document)s 4431(at)s
+4678(the)s 5040(point)s 5607(it)s 5813(is)s 6038(in)s 9(v)k 4(ok)k 2(ed,)k
+6916(b)s 4(ut)k 7293(this)s 7703(basic)s 8262(property)s
+0 3049(does)m 503(not)s 882(hold)s 1379(for)s 1730(footnotes:)s
+2799(the)s 3160(point)s 3725(of)s 4009(in)s 9(v)k 4(ocation)k
+5076(and)s 5493(the)s 5854(point)s 6419(of)s 6703(appearance)s
+7847(are)s 8207(dif)s 6(ferent.)k 0 2761(In)m 254(some)s
+813(w)s 2(ay)k 15(,)k 1299(the)s 1645(footnote)s
+2496(is)s 2703(attached)s 3555(to)s 3791(the)s 4137(document)s
+5139(at)s 5368(both)s 5849(points,)s 6539(introducing)s 7692(a)s
+7856(cross)s 8395(linking)s 0 2473(\(Section)m 853(2.1\))s 1281(that)s
+1699(cannot)s 2397(be)s 2679(described)s 3653(in)s 3896(purely)s
+4561(functional)s 5585(terms.)s 480 2099(Since)m 1069(the)s 1420(interpretation)s
+2766(of)s 3040(an)s 3(y)k 3440(object)s 4087(depends)s
+4926(on)s 5226(an)s 5512(en)s 9(vironment)k 6775(and)s
+7182(style)s 7692(inherited)s 8602(from)s 0 1811(the)m 347(conte)s 3(xt,)k
+1153(the)s 1499(\207rst)s 1929(question)s 2795(must)s 3318(be)s
+3598(whether)s 4427(the)s 4773(footnote)s 5624(inherits)s 6390(them)s
+6926(through)s 7726(the)s 8072(in)s 9(v)k 4(ocation)k
+0 1523(point)m 552(or)s 811(through)s 1613(the)s 1961(point\(s\))s
+2753(of)s 3024(appearance.)s 480 1149(If)m 697(symbols)s 1533(are)s
+1867(to)s 2092(be)s 2361(interpreted)s 3440(statically)s 4341(as)s
+4578(heretofore,)s 5653(then)s 6108(en)s 9(vironments)k 7439(must)s
+7951(be)s 8219(inherited)s 0 861(through)m 829(the)s 1204(in)s 9(v)k 4(ocation)k
+2285(point)s 2865(alone.)s 3574(Dynamic)s 4531(inheritance)s 5675(through)s
+6505(the)s 6880(point)s 7459(of)s 7757(appearance)s 8916(is)s
+0 573(enticing)m 836(in)s 1092(some)s 1666(w)s 2(ays:)k
+2335(it)s 2541(might)s 3172(replace)s 3930(the)s 4291(body)s
+4838(parameter)s 9(,)k 5904(and)s 6321(it)s 6526(might)s
+7157(help)s 7635(with)s 8131(automatic)s 0 285(numbering,)m 1163(since)s
+1730(the)s 2097(number)s 2908(of)s 3198(a)s 3384(footnote)s
+4256(is)s 4486(kno)s 6(wn)k 5209(only)s 5709(at)s
+5960(the)s 6328(point)s 6899(of)s 7190(appearance;)s 8396(b)s 4(ut)k
+8778(the)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 24 25
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4288 13844(-)m 4416(24)s 4710(-)s 0 13256(implementation)m 1606(problems)s
+2597(are)s 2993(se)s 6(v)k 3(ere,)k 3751(and)s
+4204(static)s 4810(inheritance)s 5976(seems)s 6661(much)s 7299(simpler)s
+8125(and)s 8579(more)s 0 12968(comprehensible)m 1572(to)s 1814(the)s
+2165(user)s 13(.)k 2716(Style,)s 3317(at)s 3552(least)s
+4052(its)s 4330(a)s 4(v)k 6(ailable)k 5241(width)s
+5846(and)s 6253(height)s 6913(part,)s 7394(must)s 7922(of)s
+8196(necessity)s 0 12680(be)m 268(inherited)s 1160(through)s 1947(the)s
+2280(point)s 2817(of)s 3073(appearance.)s 4297(F)s 3(or)k
+4671(consistenc)s 3(y)k 15(,)k 5861(the)s 6194(entire)s
+6778(style)s 7270(should)s 7952(be)s 8219(inherited)s 0 12392(in)m
+256(this)s 666(w)s 2(ay)k 15(.)k 1226(There)s
+1853(is)s 2077(a)s 2257(suggesti)s 6(v)k 3(e)k
+3328(analogy)s 4154(here)s 4635(with)s 5131(actual)s 5770(parameters,)s
+6938(which)s 7594(ha)s 4(v)k 3(e)k 8109(a)s
+8289(point)s 8855(of)s 0 12104(in)m 9(v)k 4(ocation)k
+1060(from)s 1591(which)s 2240(the)s 3(y)k 2710(inherit)s
+3400(an)s 3690(en)s 9(vironment,)k 5004(and)s 5414(a)s
+5587(point)s 6146(of)s 6424(appearance)s 7562(within)s 8237(the)s
+8592(body)s 0 11816(of)m 265(the)s 606(enclosing)s 1569(de\207nition,)s
+2587(from)s 3104(which)s 3739(the)s 3(y)k 4196(inherit)s
+4872(a)s 5031(style.)s 5639(It)s 5838(may)s 6297(be)s
+6572(possible)s 7406(to)s 7638(treat)s 8114(a)s 8273(footnote)s
+0 11528(as)m 250(the)s 598(actual)s 1223(parameter)s 2237(of)s
+2508(some)s 3069(symbol,)s 3881(therefore,)s 4849(although)s 5744(the)s
+6092(details)s 6766(seem)s 7317(v)s 3(ery)k 7793(obscure.)s
+480 11154(But)m 881(the)s 1224(most)s 1744(profound)s 2674(consequence)s
+3948(of)s 4214(ha)s 4(ving)k 4910(tw)s 2(o)k
+5314(types)s 5865(of)s 6131(attachment)s 7234(point)s 7780(is)s
+7985(that)s 8398(it)s 8584(leads)s 0 10866(to)m 261(tw)s 2(o)k
+693(distincti)s 6(v)k 3(e)k 1757(tree)s 2192(structures.)s
+3306(Considering)s 4551(in)s 9(v)k 4(ocation)k 5627(points)s
+6285(only)s 6787(leads)s 7351(to)s 7612(static)s 8190(trees)s
+8714(lik)s 2(e)k 0 10578(this)m 396(one:)s gsave
+480 8292 translate
+240 fnt83 3666 1996 170 1715 240 288 60 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1117 1273 170 993 240 288 60 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1117 1273 170 993 240 288 60 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1117 551 170 272 240 288 60 0 721 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+170 220(footnote)m
+
+grestore
+(T) lfigpromotelabels
+grestore
+(L) lfigpromotelabels
+grestore
+1206 553 170 272 240 288 60 1230 1443 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1206 553 170 272 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+170 220(body)m 692(te)s 4(xt)k 
+grestore
+(T) lfigpromotelabels
+grestore
+0 0 0 0 240 288 60 2436 1715 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ L@T@CTR L@T@CTR T@CTR lfigangle L@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR L@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+1117 1273 0 993 240 288 60 2549 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1001 552 170 272 240 288 60 116 721 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+884 552 170 272 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+170 220(\207gur)m 8(e)k
+
+grestore
+(T) lfigpromotelabels
+grestore
+1117 551 170 272 240 288 60 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1117 551 170 272 240 288 60 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1117 551 170 272 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+170 220(footnote)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 60 1117 272 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+(R) lfigpromotelabels
+grestore
+0 0 0 0 240 288 60 3666 1715 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ R@T@CTR R@T@CTR T@CTR lfigangle R@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR R@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+0 7841(which)m 663(sho)s 6(ws)k 1329(that)s
+1769(the)s 2139(body)s 2695(te)s 3(xt)k 3131(contains)s
+4001(a)s 4189(footnote)s 5064(and)s 5490(a)s 5677(\207gure,)s
+6364(the)s 6734(latter)s 7305(itself)s 7875(containing)s 8960(a)s
+0 7553(footnote.)m 961(Considering)s 2184(points)s 2820(of)s 3091(appearance)s
+4222(only)s 4702(gi)s 6(v)k 3(es)k 5249(a)s
+5415(completely)s 6531(dif)s 6(ferent,)k 7453(dynamic)s 8330(tree:)s
+gsave
+480 5939 translate
+240 fnt83 4663 1274 0 995 240 288 60 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+3382 551 170 272 240 288 60 1281 723 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+2101 551 170 272 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+170 220(sequence)m 1100(of)s 1381(pa)s 2(g)k 2(es)k
+
+grestore
+(T) lfigpromotelabels
+grestore
+1206 553 170 272 240 288 60 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1206 553 170 272 240 288 60 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1206 553 170 272 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+170 220(body)m 692(te)s 4(xt)k 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 60 1206 272 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+1117 553 170 272 240 288 60 1319 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1117 553 170 272 240 288 60 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1117 551 170 272 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+170 220(footnote)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 60 2436 272 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+884 553 170 272 240 288 60 2549 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+884 553 170 272 240 288 60 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+884 552 170 272 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+170 220(\207gur)m 8(e)k
+
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 60 3433 272 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+1117 553 170 272 240 288 60 3546 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1117 553 170 272 240 288 60 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1117 551 170 272 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+170 220(footnote)m 
+grestore
+(T) lfigpromotelabels
+grestore
+(S) lfigpromotelabels
+grestore
+0 0 0 0 240 288 60 4663 272 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ S@T@CTR S@T@CTR T@CTR lfigangle S@T@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+T@CTR T@CTR S@T@CTR lfigangle T@CIRCUM lfigpadd lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+0 5488(The)m 468(tree)s 921(can)s 1351(be)s
+1673(deeper)s 9(,)k 2448(for)s 2827(e)s 3(xample)k
+3730(with)s 4253(sections)s 5114(appearing)s 6150(within)s 6859(chapters)s
+7746(which)s 8429(appear)s 0 5200(within)m 680(the)s 1041(body)s
+1587(te)s 3(xt,)k 2062(which)s 2717(appears)s 3510(within)s
+4191(the)s 4551(\207nal)s 5044(sequence)s 5990(of)s 6273(pages.)s
+6995(Document)s 8065(formatting)s 0 4912(languages)m 1024(generally)s 1984(shirk)s
+2540(the)s 2905(issues)s 3544(raised)s 4189(by)s 4500(this)s
+4912(dual)s 5396(tree)s 5826(structure,)s 6785(by)s 7096(making)s
+7884(the)s 8249(dynamic)s 0 4624(tree)m 421(b)s 4(uilt-in,)k
+1235(by)s 1537(limiting)s 2354(one)s 2764(or)s 3032(both)s
+3523(trees)s 4032(to)s 4279(tw)s 2(o)k 4697(le)s 6(v)k 3(els,)k
+5360(and)s 5773(so)s 6047(on,)s 6402(pro)s 3(viding)k
+7391(a)s 7565(classic)s 8263(e)s 3(xample)k 0 4336(of)m
+295(the)s 667(impo)s 3(v)k 3(erishing)k 2120(ef)s 6(fect)k
+2740(of)s 3035(f)s 2(ailing)k 3733(to)s 3997(permit)s
+4704(language)s 5648(features)s 6478(to)s 6741(attain)s 7352(their)s
+7873(natural)s 8616(le)s 6(v)k 3(el)k 0 4048(of)m
+271(generality)s 15(.)k 480 3674(W)m 19(e)k 854(are)s
+1206(thus)s 1662(led)s 2017(to)s 2261(propose)s 3081(a)s
+3252(second)s 3980(abstraction)s 5091(for)s 5434(document)s 6443(formatting,)s
+7564(which)s 8211(we)s 8552(name)s 0 3386(the)m 240 fnt83
+371 3388(galle)m 7(y)k 240 fnt82 1028 3386(in)m 1294(recognition)s
+2464(of)s 2759(its)s 3058(similarity)s 4050(to)s 4312(the)s
+4684(g)s 1(alle)k 3(ys)k 5432(used)s 5952(in)s
+6219(manual)s 7001(typesetting.)s 8238(A)s 8492(g)s 1(alle)k 3(y)k
+0 3098(consists)m 817(of)s 1098(an)s 1391(object)s 2045(\(such)s
+2630(as)s 2890(a)s 3066(footnote\))s 4001(together)s 4854(with)s
+5346(a)s 5522(sequence)s 6465(of)s 6746(places)s 7404(where)s
+8054(that)s 8482(object)s 0 2810(may)m 491(appear)s 1214(\(such)s
+1814(as)s 2090(the)s 2464(bottoms)s 3311(of)s 3608(the)s
+3982(current)s 4743(and)s 5173(follo)s 6(wing)k 6176(pages\).)s
+6989(Splitting)s 7891(occurs)s 8592(quite)s 0 2522(naturally)m 903(when)s
+1479(space)s 2066(at)s 2298(an)s 3(y)k 2695(place)s
+3255(is)s 3465(insuf\207cient)s 4600(to)s 4839(hold)s 5323(the)s
+5671(entire)s 6270(object.)s 480 2148(In)m 736(Lout,)s 1295(a)s
+1461(footnote)s 2314(g)s 1(alle)k 3(y)k 2948(and)s
+3352(its)s 3628(place)s 4188(of)s 4459(appearance)s 5590(are)s
+5937(de\207ned)s 6700(as)s 6950(follo)s 6(ws:)k 220 fnt35
+480 1647(def @F)m 6(ootPlace { @Galle)k 4(y })k 480 1071(def @F)m 6(ootNote into { @F)k 6(ootPlace&&f)k 6(ollo)k 3(wing })k
+480 783(    r)m -3(ight x)k 480 495({ x })m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 25 26
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4292 13841(-)m 4420(25)s 4706(-)s 0 13250(The)m 220 fnt35
+445 13247(@F)m 6(ootPlace)k 240 fnt82 1719 13250(symbol)m 2496(contains)s
+3362(the)s 3727(special)s 4463(symbol)s 220 fnt35 5240 13247(@Galle)m 4(y)k
+240 fnt82 6078 13250(,)m 6203(indicating)s 7229(that)s 7665(it)s
+7874(is)s 8102(a)s 8285(point)s 8855(of)s 0 12962(appearance)m
+1143(for)s 1493(a)s 1672(g)s 1(alle)k 3(y)k 15(.)k
+2413(By)s 2759(placing)s 3529(in)s 9(v)k 4(ocations)k
+4682(of)s 220 fnt35 4965 12959(@F)m 6(ootPlace)k 240 fnt82
+6234 12962(at)m 6478(the)s 6838(bottoms)s 7673(of)s 7956(pages,)s
+8620(as)s 8883(in)s 0 12674(Section)m 801(3.2,)s 1235(we)s
+1597(de\207ne)s 2265(the)s 2640(desired)s 3415(points)s 4078(of)s
+4376(appearance)s 5534(for)s 5899(footnotes.)s 6980(Symbols)s 7896(whose)s
+8592(body)s 0 12386(contains)m 220 fnt35 863 12383(@Galle)m 4(y)k
+240 fnt82 1776 12386(either)m 2394(directly)s 3192(or)s 3466(indirectly)s
+4450(are)s 4812(called)s 5455(recepti)s 6(v)k 3(e)k
+6392(symbols,)s 7312(meaning)s 8204(recepti)s 6(v)k 3(e)k
+0 12098(to)m 239(g)s 1(alle)k 3(ys,)k 1019(and)s
+1423(the)s 3(y)k 1886(are)s 2233(e)s 3(xpanded)k
+3207(only)s 3687(on)s 3984(demand.)s 4906(The)s 5334(ef)s 6(fect)k
+5930(of)s 6202(the)s 220 fnt35 6550 12095(into)m 240 fnt82
+6956 12098(clause)m 7609(is)s 7819(to)s 8058(mak)s 2(e)k
+8631(each)s 0 11810(in)m 9(v)k 4(ocation)k 1057(of)s
+220 fnt35 1332 11807(@F)m 6(ootNote)k 240 fnt82 2506 11810(a)m
+2676(g)s 1(alle)k 3(y)k 3313(whose)s 3985(object)s
+4632(is)s 4846(the)s 5198(result)s 5791(of)s 6066(the)s
+6417(in)s 9(v)k 4(ocation)k 7475(in)s 7721(the)s
+8073(usual)s 8637(w)s 2(ay)k 15(,)k 0 11522(and)m
+406(whose)s 1076(sequence)s 2011(of)s 2285(points)s 2923(of)s
+3196(appearance)s 4329(is)s 4542(speci\207ed)s 5452(by)s 5748(the)s
+220 fnt35 6098 11519(into)m 240 fnt82 6507 11522(clause;)m 7218(in)s
+7463(this)s 7861(e)s 3(xample,)k 8778(the)s 0 11234(sequence)m
+933(of)s 1204(all)s 220 fnt35 1497 11231(@F)m 6(ootPlace)k
+240 fnt82 2753 11234(symbols)m 3602(follo)s 6(wing)k 4579(the)s
+4927(in)s 9(v)k 4(ocation)k 5981(point.)s 480 10860(Lout)m
+995(permits)s 1766(g)s 1(alle)k 3(ys)k 2494(to)s
+2737(be)s 3023(in)s 9(v)k 4(ok)k 2(ed)k
+3842(within)s 4514(other)s 5069(g)s 1(alle)k 3(ys)k
+5797(to)s 6040(arbitrary)s 6919(depth,)s 7562(so)s 7832(that)s
+8254(one)s 8660(may)s 0 10572(ha)m 4(v)k 3(e)k
+514(footnotes)s 1468(within)s 2149(\207gures)s 2864(within)s 3546(the)s
+3907(body)s 4454(te)s 3(xt)k 4882(g)s 1(alle)k 3(y)k 15(,)k
+5568(for)s 5919(e)s 3(xample,)k 6846(creating)s 7681(arbitrary)s
+8570(static)s 0 10284(trees.)m 649(Recepti)s 6(v)k 3(e)k
+1688(symbols)s 2573(lik)s 2(e)k 220 fnt35 3021 10281(@F)m 6(ootPlace)k
+240 fnt82 4313 10284(may)m 4815(appear)s 5548(within)s 6252(an)s 3(y)k
+6685(g)s 1(alle)k 3(y)k 15(,)k 7393(creating)s
+8251(arbitrary)s 0 9996(dynamic)m 912(trees)s 1449(as)s 1734(well.)s
+2345(The)s 2808(root)s 3289(of)s 3595(the)s 3979(dynamic)s
+4891(tree,)s 5391(which)s 6068(w)s 2(ould)k 6759(normally)s
+7711(consist)s 8471(of)s 8778(the)s 0 9708(sequence)m 959(of)s
+1257(pages)s 1880(of)s 2178(the)s 2553(complete)s 3512(assembled)s
+4593(document,)s 5671(is)s 5908(considered)s 7029(to)s 7295(be)s
+7604(a)s 7797(g)s 1(alle)k 3(y)k 8458(whose)s
+0 9420(point)m 563(of)s 845(appearance)s 1987(is)s 2208(the)s
+2567(output)s 3250(\207le.)s 3730(Points)s 4390(of)s 4672(appearance)s
+5814(may)s 6291(be)s 220 fnt35 6584 9417(preceding)m 240 fnt82
+7606 9420(or)m 220 fnt35 7876 9417(f)m 6(ollo)k 3(wing)k
+240 fnt82 8778 9420(the)m 0 9132(in)m 9(v)k 4(ocation)k
+1054(point;)s 1658(entries)s 2345(in)s 2588(tables)s 3196(of)s
+3467(contents)s 4315(are)s 4662(the)s 5010(main)s 5545(users)s
+6087(of)s 220 fnt35 6358 9129(preceding)m 240 fnt82 7309 9132(.)m
+480 8758(The)m 913(g)s 1(alle)k 3(y)k 1552(abstraction)s
+2662(is)s 2877(adequate)s 3788(for)s 4131(all)s 4429(of)s
+4706(the)s 5059(applications)s 6270(listed)s 6850(at)s 7087(the)s
+7440(be)s 3(ginning)k 8453(of)s 8730(this)s 0 8470(section,)m
+808(e)s 3(xcept)k 1514(that)s 1957(there)s 2515(is)s
+2749(no)s 3067(pro)s 3(vision)k 4050(for)s 4413(sorting)s
+5155(inde)s 3(x)k 5763(entries)s 6475(and)s 6904(references.)s
+8073(Sorting)s 8855(of)s 0 8182(g)m 1(alle)k 3(ys)k
+715(has)s 1075(been)s 1574(added)s 2194(to)s 2423(Lout)s
+2925(as)s 3165(a)s 3321(b)s 4(uilt-in)k 4068(feature,)s
+4827(in)s 9(v)k 4(ok)k 2(ed)k 5632(by)s
+5916(adding)s 6611(a)s 6767(special)s 220 fnt35 7475 8179(@K)m 8(e)k 4(y)k
+240 fnt82 8112 8182(parameter)m 0 7894(to)m 227(the)s 563(g)s 1(alle)k 3(ys,)k
+1330(and)s 1722(using)s 2281(its)s 2545(v)s 6(alue)k
+3100(as)s 3338(the)s 3673(sort)s 4079(k)s 2(e)k 3(y)k 15(.)k
+4556(The)s 4972(author)s 5631(w)s 2(as)k 6039(at)s
+6259(a)s 6412(loss)s 6823(to)s 7049(\207nd)s 7468(an)s 3(y)k
+7852(other)s 8391(w)s 2(ay)k 15(,)k 8867(or)s
+0 7606(an)m 3(y)k 397(useful)s 1036(generalization)s 2446(of)s
+2717(this)s 3113(feature.)s 3939(Its)s 4228(implementation)s 5785(will)s
+6211(be)s 6493(discussed)s 7468(in)s 7711(Section)s 8485(6.2.)s
+240 fnt84 0 6957(5.2.)m 471(The)s 926(galley)s 1580(\210ushing)s
+2447(algorithm)s 240 fnt82 480 6480(Galle)m 3(y)k 1177(components)s
+2395(are)s 2751(promoted)s 3736(one)s 4148(by)s 4451(one)s
+4863(into)s 5298(the)s 5655(point)s 6217(of)s 6498(appearance)s
+7638(in)s 7891(the)s 8249(dynamic)s 0 6192(parent)m 672(g)s 1(alle)k 3(y)k 15(,)k
+1359(then)s 1843(carried)s 2579(along)s 3179(with)s 3676(it,)s
+3931(ultimately)s 4968(to)s 5222(the)s 5586(root)s 6046(g)s 1(alle)k 3(y)k
+6695(and)s 7115(the)s 7478(output)s 8165(\207le.)s 8650(This)s
+0 5904(process)m 800(is)s 1042(called)s 240 fnt83 1703 5906(galle)m 7(y)k
+2368(\210ushing)s 240 fnt82 3121 5904(:)m 3259(the)s 3640(g)s 1(alle)k 3(ys)k
+4396(are)s 4775(ri)s 6(v)k 3(ers)k 5393(running)s
+6223(together)s 7098(to)s 7370(the)s 7750(sea,)s 8194(and)s
+8631(each)s 0 5616(component)m 1124(is)s 1334(a)s 1500(drop)s
+1992(of)s 2263(w)s 2(ater)k 13(.)k 480 5242(Here)m
+1057(is)s 1324(a)s 1547(snapshot)s 2502(of)s 2830(a)s
+3053(small)s 3682(dynamic)s 4616(tree,)s 5137(based)s 5797(on)s
+6151(the)s 220 fnt35 6556 5239(@P)m 8(ageList)k 240 fnt82
+7737 5242(de\207nitions)m 8855(of)s 0 4954(Section)m 774(3.2:)s 6982 3257 0 3257 240 288 60 480 1406 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+200 fnt83
+0 3121(output)m 563(\207le)s gsave
+860 0 translate
+240 fnt82 0 3257 0 3165 240 288 60 LoutGraphic
+gsave
+currentdict end 200 dict begin begin
+grestore
+0 0 0 0 240 288 60 0 3165 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(A) lfigpromotelabels
+grestore
+1994(r)s 9(oot)k 2370(galle)s 6(y)k
+gsave
+1994 2967 translate
+240 fnt82 1927 0 0 0 240 288 60 LoutGraphic
+gsave
+currentdict end 200 dict begin begin
+grestore
+0 0 0 0 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(B) lfigpromotelabels
+grestore
+gsave
+1994 473 translate
+240 fnt82 1927 2494 0 2494 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt82 845 2216(-)m 931(1)s 1035(-)s 410 2000(A)m
+563(small)s 140 fnt35 170 1784(@Galle)m 2(y)k 160 fnt82
+743(*)s 904 1617 5 1545 160 180 40 853 275 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+10 10 5 5 160 180 40 0 1540 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(C) lfigpromotelabels
+grestore
+140 fnt35 170 173(@F)m 4(ootSect)k 
+grestore
+gsave
+1994 0 translate
+240 fnt82 1927 473 170 237 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+140 fnt35
+170 201(@P)m 5(ageList 2)k 
+grestore
+5055 2611(body)m 5490(te)s 4(xt)k
+gsave
+5055 1974 translate
+240 fnt82 1927 483 170 240 240 288 60 LoutGraphic
+gsave
+currentdict end 200 dict begin begin
+grestore
+1927 483 170 240 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+160 fnt82 170 204(paragraph)m 
+grestore
+(D) lfigpromotelabels
+grestore
+gsave
+5055 1524 translate
+240 fnt82 1927 450 170 207 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+160 fnt82 170 171(of)m 351(te)s 2(xt.)k
+
+grestore
+gsave
+5055 1034 translate
+240 fnt82 1927 490 170 244 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+160 fnt35 170 203(@Input)m 
+grestore
+gsave
+0 0 translate
+240 fnt82 0 0 0 0 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ B@W lfigprevious /FROM lfigpointdef
+A@E lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+gsave
+0 0 translate
+240 fnt82 0 0 0 0 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ D@W lfigprevious /FROM lfigpointdef
+C@E lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+end end restore
+grestore
+0 955(The)m 472(components)s 1724(of)s
+2039(the)s 2431(body)s 3009(te)s 3(xt)k 3468(g)s 1(alle)k 3(y)k
+4146(are)s 4537(lines,)s 5139(e)s 3(xcept)k 5864(for)s
+6246(the)s 6638(special)s 7400(recepti)s 6(v)k 3(e)k
+8366(symbol)s 220 fnt35 0 664(@Input)m 240 fnt82 759 667(which)m
+1393(is)s 1595(a)s 1753(placeholder)s 2920(for)s 3249(as)s
+3491(yet)s 3835(unread)s 4536(input)s 5080(\(Section)s 5924(5.4\).)s
+6459(The)s 6879(components)s 8079(of)s 8342(the)s 8681(root)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 26 27
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4288 13842(-)m 4416(26)s 4709(-)s 0 13251(g)m 1(alle)k 3(y)k
+646(are)s 1006(pages,)s 1671(e)s 3(xcept)k 2364(for)s
+2715(the)s 3076(concluding)s 4205(une)s 3(xpanded)k 5431(in)s 9(v)k 4(ocation)k
+6498(of)s 220 fnt35 6781 13248(@P)m 8(ageList)k 240 fnt82
+7845 13251(,)m 7965(which)s 8620(is)s 8843(an)s 0 12963(ine)m 3(xhaustible)k
+1328(source)s 2008(of)s 2279(more)s 2826(pages,)s 3478(e)s 3(xpanded)k
+4451(on)s 4748(demand.)s 480 12589(The)m 923(concrete)s 1804(data)s
+2277(structure)s 3184(used)s 3696(by)s 4006(Basser)s 4718(Lout)s
+5246(permits)s 6028(the)s 6392(g)s 1(alle)k 3(y)k
+7041(\210ushing)s 7882(algorithm)s 8887(to)s 0 12301(na)m 4(vig)k 1(ate)k
+861(the)s 1209(dynamic)s 2086(tree)s 2499(and)s 2903(\207nd)s
+3334(signi\207cant)s 4390(features)s 5196(quickly:)s gsave
+480 4942 translate
+200 fnt82 8081 7019 226 7019 200 288 50 LoutGraphic
+gsave
+grestore save gsave 100 dict begin lfigdict begin
+grestore
+980 7019 226 6704 200 288 50 0 0 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+980 585 226 270 200 288 50 0 6434 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+200 fnt83 226 226(HEAD)m
+
+grestore
+(A) lfigpromotelabels
+grestore
+1927 588 226 273 200 288 50 1830 6431 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+1631 588 226 273 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+200 fnt83 226 229(RECEIVING)m 1306(*)s 
+grestore
+(B) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 1830 6431 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR B@W lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+B@W lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 588 226 273 200 288 50 1830 5503 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+1498 588 226 273 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+200 fnt83 226 229(RECEPTIVE)m
+
+grestore
+(C) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 1830 5503 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR C@W lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+C@W lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 0 0 0 200 288 50 1830 5163 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+0 0 0 0 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(D) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 1830 5163 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR D@NW lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+D@NW lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 2494 0 2494 200 288 50 1830 2669 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt82 845 2216(-)m 931(1)s 1035(-)s 410 2000(A)m
+563(small)s 1587 1611 0 1545 160 180 40 170 275 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+572 132 0 66 160 180 40 0 1479 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+140 fnt35 0 30(@Galle)m 2(y )k 
+grestore
+(E) lfigpromotelabels
+grestore
+1587 105 0 39 160 180 40 170 170 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+731 105 0 39 160 180 40 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+140 fnt35
+0 3(@F)m 4(ootSect )k 
+grestore
+(F) lfigpromotelabels
+grestore
+
+grestore
+0 0 0 0 200 288 50 1830 2669 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ B@E B@E 0 B@E E@E lfigydistance lfigpadd E@E ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+0 0 0 0 200 288 50 1830 2669 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ C@E C@E 0 C@E F@E lfigydistance lfigpadd F@E ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 588 226 273 200 288 50 1830 1741 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+839 588 226 273 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+200 fnt83 226 229(GAP)m 
+grestore
+(C) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 1830 1741 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR C@W lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+C@W lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 588 226 273 200 288 50 1830 813 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+1498 588 226 273 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+200 fnt83
+226 229(RECEPTIVE)m 
+grestore
+(C) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 1830 813 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR C@W lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+C@W lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 473 170 237 200 288 50 1830 0 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+1927 473 170 237 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+140 fnt35 170 201(@P)m 5(ageList 2)k 
+grestore
+(D) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 1830 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR D@NW lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+D@NW lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+0 0 0 0 200 288 50 1830 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ C@E C@E 0 C@E D@W 1.8 cm 0 lfigpadd lfigydistance lfigpadd D@W 1.8 cm 0 lfigpadd ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+980 7019 226 6704 200 288 50 4324 0 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+980 585 226 270 200 288 50 0 6434 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+200 fnt83
+226 226(HEAD)m 
+grestore
+(A) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 5304 6704 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ B@E lfigprevious /FROM lfigpointdef
+A@W lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 483 170 240 200 288 50 6154 6536 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+1927 483 170 240 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+160 fnt82 170 204(paragraph)m 
+grestore
+(B) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 6154 6536 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR B@W lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+B@W lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 588 226 273 200 288 50 6154 5608 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+839 588 226 273 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+200 fnt83 226 229(GAP)m
+
+grestore
+(B) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 6154 5608 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR B@W lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+B@W lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 450 170 207 200 288 50 6154 4818 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+1927 450 170 207 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+160 fnt82 170 171(of)m 351(te)s 2(xt.)k 
+grestore
+(B) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 6154 4818 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR B@NW lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+B@NW lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 588 226 273 200 288 50 6154 3890 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+839 588 226 273 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+200 fnt83
+226 229(GAP)m 
+grestore
+(B) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 6154 3890 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR B@W lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+B@W lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 588 226 273 200 288 50 6154 2962 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+1498 588 226 273 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+200 fnt83 226 229(RECEPTIVE)m 
+grestore
+(B) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 6154 2962 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR B@W lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+B@W lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+1927 471 170 235 200 288 50 6154 2151 LoutGr2
+currentdict end 100 dict begin begin
+grestore
+1927 471 170 235 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+140 fnt35 170 199(@Input)m
+
+grestore
+(C) lfigpromotelabels
+grestore
+0 0 0 0 200 288 50 6154 2151 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@CTR A@CTR C@NW lfigangle A@CIRCUM lfigpadd lfigprevious /FROM lfigpointdef
+C@NW lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+0 0 0 0 200 288 50 6154 2151 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ B@E B@E 0 B@E C@W 1.2 cm 0 lfigpadd lfigydistance lfigpadd C@W 1.2 cm 0 lfigpadd ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+end end restore
+grestore
+0 4491(Each)m 521(g)s 1(alle)k 3(y)k 1140(has)s
+1495(a)s 240 fnt83 1647 4493(HEAD)m 240 fnt82 2325 4491(node)m
+2832(whose)s 3485(children)s 4311(are)s 4643(its)s 4904(component)s
+6013(objects,)s 6783(separated)s 7728(by)s 240 fnt83 8007 4493(GAP)m
+240 fnt82 8516 4491(nodes)m 0 4203(recording)m 969(the)s 1317(inter)s 4(-component)k
+2953(g)s 1(aps.)k 480 3829(Each)m 1026(component)s 2161(is)s
+2383(preceded)s 3315(by)s 3621(zero)s 4096(or)s 4367(more)s
+240 fnt83 4925 3831(galle)m 7(y)k 5569(inde)s 4(x)k
+6155(nodes)s 240 fnt82 6780 3829(of)m 7063(v)s 6(arious)k
+7823(types.)s 8504(Ev)s 3(ery)k 0 3541(recepti)m 6(v)k 3(e)k
+922(symbol)s 1681(has)s 2051(a)s 240 fnt83 2216 3543(RECEPTIVE)m
+240 fnt82 3529 3541(inde)m 3(x)k 4112(pointing)s 4963(to)s
+5201(it,)s 5440(so)s 5705(that)s 6123(it)s 6314(can)s
+6703(be)s 6984(found)s 7601(without)s 8391(search)s 8998(-)s
+0 3253(ing)m 355(through)s 1152(its)s 1423(component.)s 2646(If)s
+2871(the)s 3215(symbol)s 3970(is)s 4175(currently)s 5086(the)s
+5429(tar)s 4(get)k 6023(of)s 6290(a)s 6451(g)s 1(alle)k 3(y)k 15(,)k
+7118(it)s 7305(has)s 7670(a)s 240 fnt83 7831 3255(RECEIVING)m
+240 fnt82 0 2965(inde)m 3(x)k 595(instead)s 1342(which)s
+1995(is)s 2217(also)s 2667(link)s 2(ed)k 3332(to)s
+3583(the)s 3942(incoming)s 4911(g)s 1(alle)k 3(y)k 15(.)k
+5652(Galle)s 3(ys)k 6441(that)s 6871(are)s 7229(currently)s
+8157(without)s 8960(a)s 0 2677(tar)m 4(get)k 586(are)s
+920(link)s 2(ed)k 1560(to)s 1786(the)s 2120(dynamic)s
+2984(tree)s 3383(by)s 240 fnt83 3664 2679(UN)m 6(A)k 8(TT)k 12(A)k 7(CHED)k
+240 fnt82 5215 2677(g)m 1(alle)k 3(y)k 5836(inde)s 3(x)k 3(es,)k
+6654(either)s 7244(just)s 7635(after)s 8118(their)s 8601(most)s
+0 2389(recent)m 643(tar)s 4(get)k 1242(if)s 1459(there)s
+1992(has)s 2362(been)s 2871(one,)s 3324(or)s 3583(else)s
+4010(at)s 4242(their)s 4739(point)s 5291(of)s 5562(in)s 9(v)k 4(ocation.)k
+480 2015(Each)m 1041(g)s 1(alle)k 3(y)k 1701(should)s
+2424(be)s 2732(thought)s 3550(of)s 3847(as)s 4123(a)s
+4315(concurrent)s 5423(process,)s 6273(although)s 7194(the)s 7569(implementation)s
+0 1727(in)m 268(C)s 506(uses)s 995(coroutines)s 2067(implemented)s
+3399(by)s 3719(procedures.)s 4957(A)s 5213(g)s 1(alle)k 3(y)k
+5873(may)s 6364(promote)s 7243(its)s 7545(\207rst)s 8002(component)s
+0 1439(only)m 499(if)s 735(it)s 946(has)s 1335(a)s
+1520(tar)s 4(get,)k 2185(suf\207cient)s 3153(space)s 3759(is)s
+3988(a)s 4(v)k 6(ailable)k 4915(at)s 5166(the)s
+5533(tar)s 4(get)k 6151(to)s 6409(recei)s 6(v)k 3(e)k
+7164(the)s 7531(component,)s 8722(and)s 0 1151(the)m 349(component)s
+1475(contains)s 2325(no)s 2620(recepti)s 6(v)k 3(e)k
+3544(symbols.)s 4508(This)s 4986(last)s 5379(condition)s 6342(seems)s
+6979(to)s 7220(be)s 7504(the)s 7854(k)s 2(e)k 3(y)k
+8251(to)s 8492(g)s 1(alle)k 3(y)k 0 863(synchronization:)m
+1722(it)s 1943(forces)s 2606(a)s 2801(bottom-up)s 3880(promotion)s
+4963(re)s 3(gime,)k 5759(pre)s 6(v)k 3(enting)k
+6855(pages)s 7480(from)s 8033(\210ushing)s 8887(to)s 0 575(output)m
+672(before)s 1338(te)s 3(xt)k 1753(\210ushes)s 2469(into)s
+2894(them,)s 3479(for)s 3817(e)s 3(xample.)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 27 28
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4291 13844(-)m 4419(27)s 4707(-)s 480 13255(Each)m 1022(g)s 1(alle)k 3(y)k
+1663(contains)s 2519(a)s 2692(number)s 3490(of)s 3769(binary)s
+4441(semaphores,)s 5685(sho)s 6(wn)k 6369(as)s 6626(asterisks)s
+7507(in)s 7757(our)s 8144(snapshots)s 0 12967(when)m 583(set.)s
+1019(At)s 1325(an)s 3(y)k 1730(gi)s 6(v)k 3(en)k
+2317(moment,)s 3215(a)s 3389(g)s 1(alle)k 3(y)k
+4030(process)s 4805(is)s 5022(either)s 5633(running)s 6438(or)s
+6704(else)s 7139(is)s 7356(suspended)s 8419(on)s 8724(one)s
+0 12679(of)m 269(its)s 543(o)s 6(wn)k 1005(semaphores.)s
+2296(The)s 240 fnt83 2722 12681(HEAD)m 240 fnt82 3413 12679(node)m
+3933(contains)s 4779(a)s 4943(semaphore)s 6033(which)s 6673(is)s
+6881(set)s 7204(when)s 7778(the)s 8124(g)s 1(alle)k 3(y)k
+8756(has)s 0 12391(tried)m 499(to)s 742(\207nd)s 1177(a)s
+1347(tar)s 4(get)k 1950(and)s 2359(f)s 2(ailed.)k
+3068(Each)s 3607(recepti)s 6(v)k 3(e)k 4533(symbol)s
+5297(has)s 5671(a)s 5842(semaphore)s 6938(which)s 7584(is)s
+7798(set)s 8127(when)s 8708(that)s 0 12103(symbol)m 760(is)s
+970(pre)s 6(v)k 3(enting)k 2037(the)s 2385(\207rst)s
+2816(component)s 3940(from)s 4464(being)s 5049(promoted.)s 480 11729(F)m 3(or)k
+859(e)s 3(xample,)k 1762(in)s 1994(the)s 2331(snapshot)s
+3218(at)s 3439(the)s 3776(be)s 3(ginning)k 4773(of)s
+5033(this)s 5418(section,)s 6191(the)s 6528(root)s 6962(g)s 1(alle)k 3(y)k
+7585(is)s 7784(suspended)s 8829(on)s 0 11441(the)m 220 fnt35
+351 11438(@Galle)m 4(y)k 240 fnt82 1253 11441(symbol,)m 2069(b)s 4(ut)k
+2435(the)s 2787(te)s 3(xt)k 3205(g)s 1(alle)k 3(y)k
+3843(is)s 4057(running.)s 4970(It)s 5179(will)s 5608(suspend)s
+6442(on)s 6743(the)s 220 fnt35 7095 11438(@Input)m 240 fnt82
+7866 11441(symbol)m 8630(after)s 0 11153(the)m 348(\207rst)s 779(tw)s 2(o)k
+1189(components)s 2397(are)s 2744(promoted.)s 480 10779(Ev)m 3(ery)k
+1145(g)s 1(alle)k 3(y)k 240 fnt83 1822 10781(G)m
+240 fnt82 1995 10779(,)m 2145(be)s 2470(it)s 2705(a)s
+2914(list)s 3308(of)s 3623(pages,)s 4318(body)s 4895(te)s 3(xt,)k
+5400(a)s 5609(footnote,)s 6556(or)s 6858(whate)s 6(v)k 3(er)k 9(,)k
+7866(e)s 3(x)k 3(ecutes)k 8778(the)s 0 10491(follo)m 6(wing)k
+977(algorithm)s 1966(in)s 2209(parallel)s 2979(with)s 3461(e)s 6(v)k 3(ery)k
+4037(other)s 4588(g)s 1(alle)k 3(y:)k 0 9988(1.)m
+303(Initially)s 240 fnt83 1132 9990(G)m 240 fnt82 1384 9988(is)m
+1614(unattached.)s 2834(Search)s 3560(forw)s 2(ards)k 4478(or)s
+4756(backw)s 2(ards)k 5848(from)s 6392(its)s 240 fnt83
+6687 9990(UN)m 6(A)k 8(TT)k 12(A)k 7(CHED)k
+240 fnt82 8272 9988(inde)m 3(x)k 8876(as)s 0 9700(required,)m
+903(to)s 1142(\207nd)s 1573(a)s 1739(recepti)s 6(v)k 3(e)k
+2661(symbol)s 240 fnt83 3421 9702(S)m 240 fnt82 3602 9700(which)m
+4244(can)s 4633(e)s 3(xpand)k 5380(to)s 5619(re)s 6(v)k 3(eal)k
+6248(a)s 6414(tar)s 4(get)k 7013(for)s 240 fnt83
+7351 9702(G)m 240 fnt82 7524 9700(.)m 0 9197(2.)m 284(If)s
+514(no)s 240 fnt83 807 9199(S)m 240 fnt82 988 9197(can)m
+1377(be)s 1659(found,)s 2325(suspend)s 3155(on)s 3452(the)s
+3800(attachment)s 4908(semaphore.)s 6108(Resume)s 6935(later)s 7418(from)s
+7942(step)s 8380(1.)s 0 8694(3.)m 281(Expand)s 240 fnt83
+1068 8696(S)m 240 fnt82 1246 8694(to)m 1482(re)s 6(v)k 3(eal)k
+2107(the)s 2452(tar)s 4(get)k 3048(of)s 240 fnt83
+3316 8696(G)m 240 fnt82 3489 8694(.)m 3649(Preserv)s 3(e)k
+240 fnt83 4521 8696(S)m 240 fnt82 4642 8694(')m 13(s)k
+4849(semaphore)s 5938(by)s 6229(mo)s 3(ving)k 7007(it)s
+7196(to)s 7432(the)s 7777(\207rst)s 8204(recepti)s 6(v)k 3(e)k
+0 8406(symbol)m 760(within)s 1428(the)s 1776(e)s 3(xpansion)k
+2801(of)s 240 fnt83 3072 8408(S)m 240 fnt82 3193 8406(.)m
+0 7903(4.)m 295(Calculate)s 1264(the)s 1624(a)s 4(v)k 6(ailable)k
+2543(width)s 3156(and)s 3572(height)s 4241(at)s 4484(the)s
+4844(tar)s 4(get,)k 5501(and)s 5917(if)s 240 fnt83
+6145 7905(G)m 240 fnt82 6389 7903(is)m 6611(still)s 7034(a)s
+7211(pure)s 7704(parse)s 8275(tree,)s 8751(use)s 0 7615(the)m
+377(en)s 9(vironment)k 1667(attached)s 2550(to)s 240 fnt83
+2819 7617(G)m 240 fnt82 3081 7615(and)m 3515(the)s 3892(style)s
+4429(information)s 5643(from)s 6197(the)s 6574(tar)s 4(get)k
+7203(to)s 7471(e)s 6(v)k 6(aluate)k 240 fnt83
+8341 7617(G)m 240 fnt82 8603 7615(as)m 8883(in)s 0 7327(Section)m
+774(4.)s 0 6871(5.)m 284(Examine)s 1190(the)s 1538(components)s
+2746(of)s 240 fnt83 3017 6873(G)m 240 fnt82 3250 6871(one)m
+3652(by)s 3946(one.)s 4456(F)s 3(or)k 4845(each)s
+5340(component)s 6464(there)s 6997(are)s 7344(three)s 7877(possibilities:)s
+240 fnt83 480 6499(A)m 7(CCEPT)k 17(.)k 240 fnt82
+1513 6497(If)m 1756(the)s 2116(component)s 3253(\207ts)s 3609(into)s
+4046(the)s 4407(a)s 4(v)k 6(ailable)k 5328(space,)s
+5978(and)s 6395(has)s 6778(no)s 7083(other)s 7647(problems,)s
+8657(then)s 0 6209(promote)m 875(it)s 1090(into)s 1538(the)s
+1909(tar)s 4(get.)k 2635(If)s 2888(this)s 3306(is)s
+3539(the)s 3910(\207rst)s 4364(component)s 5511(promoted)s 6509(into)s
+6956(this)s 7375(tar)s 4(get,)k 8044(and)s 240 fnt83
+8471 6211(G)m 240 fnt82 8727 6209(is)m 8960(a)s 0 5921(forcing)m
+768(g)s 1(alle)k 3(y)k 1428(\(Section)s 2307(5.4\),)s
+2819(delete)s 3470(e)s 6(v)k 3(ery)k 4072(recepti)s 6(v)k 3(e)k
+5020(symbol)s 5806(preceding)s 6827(the)s 7201(tar)s 4(get)k
+7826(in)s 8095(the)s 8469(parent)s 0 5633(g)m 1(alle)k 3(y)k 15(.)k
+729(If)s 240 fnt83 959 5635(G)m 240 fnt82 1192 5633(is)m
+1402(the)s 1750(root)s 2195(g)s 1(alle)k 3(y)k 15(,)k
+2867(render)s 3537(the)s 3885(component)s 5009(on)s 5306(the)s
+5654(output)s 6326(\207le)s 6687(and)s 7091(dispose)s 7865(it;)s
+240 fnt83 480 5261(REJECT)m 17(.)k 240 fnt82 1490 5259(If)m
+1756(the)s 2140(component)s 3300(is)s 3546(too)s 3941(lar)s 4(ge)k
+4506(for)s 4880(the)s 5264(a)s 4(v)k 6(ailable)k
+6208(space,)s 6882(or)s 7177(a)s 240 fnt83 7379 5261(FOLLO)m 12(WS)k
+240 fnt82 8542 5259(inde)m 3(x)k 0 4971(\(described)m 1043(belo)s 6(w\))k
+1740(forbids)s 2458(its)s 2723(promotion)s 3767(into)s 4182(this)s
+4568(tar)s 4(get,)k 5203(then)s 5662(detach)s 240 fnt83
+6333 4973(G)m 240 fnt82 6556 4971(from)m 7069(the)s 7407(tar)s 4(get.)k
+8100(If)s 8320(this)s 8705(w)s 2(as)k 0 4683(the)m
+338(\207rst)s 758(component)s 1872(at)s 2093(this)s 2479(tar)s 4(get,)k
+240 fnt83 3114 4685(S)m 240 fnt82 3284 4683(has)m 3644(been)s
+4142(a)s 4298(complete)s 5219(f)s 2(ailure,)k 5936(so)s
+6191(undo)s 6713(step)s 7141(3)s 7294(\(Basser)s 8060(Lout)s
+8561(is)s 8760(not)s 0 4395(able)m 454(to)s 693(undo)s
+1226(step)s 1664(4\);)s 1975(otherwise)s 2960(delete)s 3586(the)s
+3934(tar)s 4(get.)k 4637(Return)s 5345(to)s 5584(step)s
+6022(1)s 6177(and)s 6581(continue)s 7461(immediately;)s 240 fnt83
+480 4023(SUSPEND.)m 240 fnt82 1685 4021(If)m 1928(the)s 2289(component)s
+3426(contains)s 4287(a)s 4466(recepti)s 6(v)k 3(e)k
+5402(symbol,)s 6227(it)s 6432(cannot)s 7143(be)s 7438(promoted)s
+8426(yet.)s 8896(If)s 0 3733(this)m 392(symbol)s 1148(is)s
+1354(the)s 1697(tar)s 4(get)k 2292(of)s 2559(a)s
+2720(g)s 1(alle)k 3(y)k 3350(that)s 3764(w)s 2(as)k
+4180(written)s 4909(to)s 5144(an)s 5423(auxiliary)s 6321(\207le)s
+6678(on)s 6971(a)s 7132(pre)s 6(vious)k 7997(run,)s
+8419(read)s 8883(in)s 0 3445(that)m 427(g)s 1(alle)k 3(y)k
+1071(and)s 1484(\210ush)s 2017(it.)s 2322(Otherwise)s 3370(suspend)s
+4209(on)s 4516(the)s 4873(recepti)s 6(v)k 3(e)k
+5805(symbol')s 13(s)k 6729(semaphore;)s 7887(resume)s 8643(later)s
+0 3157(from)m 524(step)s 962(4.)s 0 2653(6.)m 284(T)s 16(erminate)k
+1305(when)s 1881(the)s 2229(g)s 1(alle)k 3(y)k
+2863(is)s 3073(empty)s 15(.)k 0 2150(At)m 354(v)s 6(arious)k
+1158(points)s 1850(in)s 2148(this)s 2599(algorithm,)s 3691(recepti)s 6(v)k 3(e)k
+4668(symbols)s 5572(\(and)s 6111(their)s 6663(semaphores\))s 7975(are)s
+8378(deleted)s 0 1862(in)m 273(the)s 652(dynamic)s 1560(parent)s
+2247(g)s 1(alle)k 3(y)k 15(,)k 2950(possibly)s
+3833(permitting)s 4911(it)s 5134(to)s 5404(resume)s 6180(\210ushing.)s
+7147(When)s 7807(this)s 8234(happens,)s 0 1574(Basser)m 701(Lout)s
+1218(resumes)s 2057(the)s 2410(parent)s 3071(immediately)s 4324(after)s
+240 fnt83 4825 1576(G)m 240 fnt82 5063 1574(suspends)m 5983(or)s
+6247(terminates.)s 7410(Also,)s 7974(whene)s 6(v)k 3(er)k
+8960(a)s 0 1286(component)m 1140(is)s 1366(promoted,)s 2406(an)s 3(y)k
+2819(child)s 3371(g)s 1(alle)k 3(ys)k 4111(connected)s
+5156(to)s 5411(it)s 5619(by)s 240 fnt83 5929 1288(UN)m 6(A)k 8(TT)k 12(A)k 7(CHED)k
+240 fnt82 7510 1286(inde)m 3(x)k 3(es)k 8302(must)s
+8844(be)s 0 998(resumed,)m 918(since)s 1466(these)s 2014(g)s 1(alle)k 3(ys)k
+2739(may)s 3206(be)s 3490(able)s 3945(to)s 4185(\207nd)s
+4617(a)s 4784(tar)s 4(get)k 5384(no)s 6(w)k 15(.)k
+5942(A)s 6173(good)s 6712(e)s 3(xample)k 7576(of)s
+7848(this)s 8246(situation)s 0 710(occurs)m 664(when)s 1228(a)s
+1382(line)s 1785(of)s 2044(body)s 2566(te)s 3(xt)k
+2969(with)s 3440(one)s 3830(or)s 4077(more)s 4613(footnotes)s
+5542(is)s 5740(promoted)s 6703(onto)s 7171(a)s 7325(page.)s
+7929(Basser)s 8614(Lout)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 28 29
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4291 13844(-)m 4419(28)s 4706(-)s 0 13253(gi)m 6(v)k 3(es)k
+547(priority)s 1317(to)s 1556(such)s 2052(children,)s 2942(suspending)s
+240 fnt83 4073 13255(G)m 240 fnt82 4306 13253(while)m 4893(each)s
+5388(is)s 5598(gi)s 6(v)k 3(en)k 6178(a)s
+6344(chance)s 7064(to)s 7303(\210ush.)s 480 12879(Basser)m 1211(Lout)s
+1758(searches)s 2653(for)s 3025(the)s 3408(\207rst)s 3874(tar)s 4(get)k
+4507(of)s 240 fnt83 4813 12881(G)m 240 fnt82 5081 12879(only)m
+5595(in)s 5873(re)s 3(gions)k 6660(of)s 6965(the)s
+7348(dynamic)s 8260(tree)s 8708(that)s 0 12591(will)m 437(clearly)s
+1152(precede)s 1963(or)s 2233(follo)s 6(w)k 240 fnt83
+2917 12593(G)m 240 fnt82 3090 12591(')m 13(s)k 3312(in)s 9(v)k 4(ocation)k
+4378(point)s 4941(in)s 5196(the)s 5556(\207nal)s 6047(printed)s
+6794(document,)s 7857(whiche)s 6(v)k 3(er)k 8916(is)s
+0 12303(speci\207ed)m 904(in)s 1142(the)s 220 fnt35 1486 12300(into)m
+240 fnt82 1887 12303(clause;)m 2591(subsequent)s 3711(tar)s 4(gets)k
+4389(are)s 4731(sought)s 5426(later)s 5904(in)s 6142(the)s
+6486(same)s 7028(g)s 1(alle)k 3(y)k 7657(as)s
+7903(the)s 8246(\207rst.)s 8776(An)s 0 12015(e)m 3(xception)k
+982(to)s 1219(this)s 1613(rule,)s 2089(whose)s 2755(necessity)s
+3683(will)s 4107(be)s 4387(made)s 4959(clear)s 5480(later)s 9(,)k
+5999(is)s 6207(that)s 6623(a)s 6787(\207rst)s 220 fnt35
+7216 12012(f)m 6(ollo)k 3(wing)k 240 fnt82 8104 12015(tar)m 4(get)k
+8700(will)s 0 11727(be)m 282(sought)s 981(within)s 1649(a)s
+1815(dynamic)s 2692(sibling)s 3396(g)s 1(alle)k 3(y)k
+4030(preceding)s 240 fnt83 5026 11729(G)m 240 fnt82 5199 11727(')m 13(s)k
+5409(in)s 9(v)k 4(ocation)k 6463(point:)s gsave
+480 6741 translate
+200 fnt82 5379 4646 0 4646 200 288 50 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+200 fnt83
+0 4510(dynamic)m 722(par)s 7(ent)k gsave
+0 1353 translate
+200 fnt82 2039 3003 226 2777 200 288 50 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1587 171 0 86 200 288 50 226 2323 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+796 171 0 86 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+180 fnt35 0 40(@XT)m 21(arget)k
+
+grestore
+(A) lfigpromotelabels
+grestore
+1587 136 0 47 200 288 50 226 1620 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+1254 136 0 47 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+200 fnt83 0 3(UN)m 5(A)k 7(TT)k 10(A)k 6(CHED)k
+
+grestore
+(C) lfigpromotelabels
+grestore
+180 fnt35 226 752(@XT)m 21(arget)k 
+grestore
+gsave
+2889 4135 translate
+200 fnt82 2490 171 0 86 200 288 50 LoutGraphic
+gsave
+currentdict end 200 dict begin begin
+grestore
+2450 171 0 86 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+180 fnt35 0 40(X into { @XT)m 21(arget&&f)k 5(ollo)k 2(wing })k
+
+grestore
+(B) lfigpromotelabels
+grestore
+gsave
+2889 2720 translate
+200 fnt82 2039 1302 226 1076 200 288 50 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+180 fnt35 226 492(@GT)m 21(arget)k 
+grestore
+gsave
+2889 1982 translate
+200 fnt82 2490 171 0 86 200 288 50 LoutGraphic
+gsave
+currentdict end 200 dict begin begin
+grestore
+2490 171 0 86 200 288 50 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+180 fnt35 0 40(G into { @GT)m 21(arget&&f)k 5(ollo)k 2(wing })k
+
+grestore
+(D) lfigpromotelabels
+grestore
+gsave
+2889 0 translate
+200 fnt82 2039 1869 226 1643 200 288 50 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+gsave
+0 0 translate
+200 fnt82 0 0 0 0 200 288 50 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@E 0.2 cm 0 lfigpadd lfigprevious /FROM lfigpointdef
+0.2 cm 0 B@W lfigpsub lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+gsave
+0 0 translate
+200 fnt82 0 0 0 0 200 288 50 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ C@E 0.2 cm 0 lfigpadd lfigprevious /FROM lfigpointdef
+0.2 cm 0 D@W lfigpsub lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+end end restore
+grestore
+0 6290(Here)m 240 fnt83 524 6292(G)m 240 fnt82 762 6290(will)m
+1193(\207nd)s 1629(the)s 220 fnt35 1982 6287(@GT)m 26(arget)k
+240 fnt82 3045 6290(tar)m 4(get)k 3649(within)s 240 fnt83
+4322 6292(X)m 240 fnt82 4478 6290(.)m 4647(This)s 5128(is)s
+5343(dangerous,)s 6439(since)s 6991(if)s 7213(the)s 7566(\207rst)s
+8002(component)s 0 6002(of)m 240 fnt83 303 6004(G)m 240 fnt82
+568 6002(is)m 811(then)s 1312(promoted)s 2320(via)s 240 fnt83
+2704 6004(X)m 240 fnt82 2952 6002(into)m 3410(the)s 3790(\207rst)s
+220 fnt35 4254 5999(@XT)m 26(arget)k 240 fnt82 5319 6002(rather)m
+5967(than)s 6469(into)s 6926(the)s 7307(second,)s 240 fnt83
+8111 6004(G)m 240 fnt82 8284 6002(')m 13(s)k 8527(tar)s 4(get)k
+0 5714(will)m 438(not)s 817(appear)s 1526(later)s 2022(in)s
+2277(the)s 2638(\207nal)s 3130(printed)s 3878(document)s 4894(than)s
+5376(its)s 5664(in)s 9(v)k 4(ocation)k 6731(point,)s
+7342(as)s 7605(required)s 8471(by)s 8778(the)s 220 fnt35
+0 5423(into)m 240 fnt82 406 5426(clause.)m 480 5052(Accordingly)m 15(,)k
+1753(when)s 2313(such)s 2794(a)s 2944(tar)s 4(get)k
+3528(is)s 3722(chosen,)s 4478(tw)s 2(o)k 4873(special)s
+5575(g)s 1(alle)k 3(y)k 6194(inde)s 3(x)k 3(es)k
+6954(are)s 7286(inserted)s 8084(and)s 8472(link)s 2(ed)k
+0 4764(together:)m 898(a)s 240 fnt83 1074 4766(PRECEDES)m 240 fnt82
+2327 4764(inde)m 3(x)k 2921(at)s 240 fnt83 3163 4766(G)m
+240 fnt82 3336 4764(')m 13(s)k 3555(in)s 9(v)k 4(ocation)k
+4619(point,)s 5227(and)s 5641(a)s 240 fnt83 5817 4766(FOLLO)m 12(WS)k
+240 fnt82 6952 4764(inde)m 3(x)k 7546(at)s 7787(the)s
+8145(\207rst)s 8586(com)s 8998(-)s 0 4476(ponent)m 720(of)s
+240 fnt83 1000 4478(G)m 240 fnt82 1173 4476(.)m 1346(The)s
+1783(algorithm)s 2781(checks)s 3492(before)s 4167(promoting)s 5226(an)s 3(y)k
+240 fnt83 5632 4478(FOLLO)m 12(WS)k 240 fnt82 6767 4476(inde)m 3(x)k
+7360(that)s 7787(its)s 8072(promotion)s 0 4188(w)m 2(ould)k
+661(not)s 1033(place)s 1600(it)s 1798(earlier)s 2472(than)s
+2948(the)s 3302(corresponding)s 240 fnt83 4730 4190(PRECEDES)m 240 fnt82
+5981 4188(inde)m 3(x)k 6571(in)s 6820(the)s 7175(same)s
+7728(g)s 1(alle)k 3(y)k 15(,)k 8406(and)s
+8817(re)s 8998(-)s 0 3900(jects)m 486(the)s 831(component)s
+1952(if)s 2166(it)s 2355(w)s 2(ould.)k 3113(Since)s
+240 fnt83 3697 3902(PRECEDES)m 240 fnt82 4939 3900(and)m 240 fnt83
+5340 3902(FOLLO)m 12(WS)k 240 fnt82 6463 3900(inde)m 3(x)k 3(es)k
+7236(are)s 7580(rarely)s 8187(used,)s 8730(this)s 0 3612(check)m
+619(can)s 1008(be)s 1290(implemented)s 2596(by)s 2890(linear)s
+3493(search.)s 480 3238(When)m 1114(tw)s 2(o)k 1529(components)s
+2742(are)s 3094(separated)s 4060(by)s 220 fnt35 4359 3235(/)m
+240 fnt82 4423 3238(,)m 4535(as)s 4790(opposed)s 5652(to)s
+5897(the)s 6250(more)s 6802(usual)s 220 fnt35 7367 3235(//)m
+240 fnt82 7492 3238(,)m 7604(each)s 8105(in\210uences)s 0 2950(the)m
+358(horizontal)s 1393(position)s 2232(of)s 2514(the)s 2872(other)s 13(.)k
+3525(Because)s 4389(of)s 4671(this,)s 5133(the)s 240 fnt83
+5492 2952(SUSPEND)m 240 fnt82 6596 2950(action)m 7248(is)s 7468(in)s
+7722(f)s 2(act)k 8148(tak)s 2(en)k 8732(if)s
+8960(a)s 0 2662(recepti)m 6(v)k 3(e)k 930(symbol)s
+1698(occurs)s 2382(in)s 2633(an)s 3(y)k 3039(component)s
+4171(separated)s 5140(from)s 5672(the)s 6028(\207rst)s 6468(by)s
+220 fnt35 6770 2659(/)m 240 fnt82 6903 2662(operators)m 7851(only)s 15(.)k
+8435(Ag)s 1(ain,)k 0 2374(linear)m 603(search)s 1270(forw)s 2(ards)k
+2168(to)s 2407(the)s 2755(\207rst)s 220 fnt35 3186 2371(//)m
+240 fnt82 3371 2374(suf\207ces)m 4152(for)s 4490(this)s 4886(check.)s
+480 2000(A)m 740(good)s 1308(illustration)s 2430(of)s 2731(these)s
+3308(unusual)s 4139(cases)s 4724(is)s 4964(af)s 6(forded)k
+5856(by)s 6180(the)s 220 fnt35 6558 1997(@Align)m 240 fnt82
+7344 2000(symbols)m 8223(from)s 8778(the)s 0 1712(standard)m 867(DocumentLayout)s
+2600(package.)s 3546(These)s 4171(are)s 4516(used)s 5012(to)s
+5249(produce)s 6074(displayed)s 7047(equations,)s 8069(aligned)s 8829(on)s
+0 1424(their)m 497(equals)s 1159(signs)s 1702(despite)s 2435(being)s
+3020(separated)s 3980(by)s 4274(arbitrary)s 5149(body)s 5683(te)s 3(xt.)k
+480 1050(The)m 220 fnt35 921 1047(@Align)m 240 fnt82 1689 1050(symbols)m
+2551(are)s 2911(packaged)s 3886(neatly)s 4537(for)s 4889(the)s
+5250(con)s 9(v)k 3(enience)k 6503(of)s 6787(the)s
+7148(non-e)s 3(xpert)k 8254(user)s 9(,)k 8764(b)s 4(ut)k
+0 762(we)m 335(will)s 761(sho)s 6(w)k 1315(just)s
+1720(the)s 2067(essence)s 2853(of)s 3124(the)s 3472(implementation)s
+5029(here.)s 5603(First,)s 6147(an)s 220 fnt35 6430 759(@AlignList)m
+240 fnt82 7536 762(g)m 1(alle)k 3(y)k 8170(is)s
+8379(created)s 0 474(which)m 642(contains)s 1490(an)s 1773(in\207nite)s
+2506(supply)s 3199(of)s 220 fnt35 3470 471(@AlignPlace)m 240 fnt82
+4779 474(recepti)m 6(v)k 3(e)k 5701(symbols)s 6550(separated)s
+7510(by)s 220 fnt35 7804 471(/)m 240 fnt82 7928 474(operators:)m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 29 30
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Helvetica
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4289 13844(-)m 4417(29)s 4708(-)s 4777 3207 0 3207 240 288 60 480 10207 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+240 fnt83 0 3044(body)m
+522(te)s 4(xt)k 926(galle)s 7(y)k gsave
+0 161 translate
+240 fnt82 2039 2720 226 2494 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1587 1418 0 1314 240 288 60 226 226 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+838 208 0 104 240 288 60 0 1210 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+220 fnt35
+0 47(@Galle)m 4(y)k 
+grestore
+(A) lfigpromotelabels
+grestore
+
+grestore
+gsave
+2889 1638 translate
+240 fnt82 1888 209 0 105 240 288 60 LoutGraphic
+gsave
+currentdict end 200 dict begin begin
+grestore
+1046 209 0 105 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+220 fnt35 0 48(@AlignList)m 
+grestore
+(B) lfigpromotelabels
+grestore
+gsave
+2889 0 translate
+240 fnt82 1888 1525 226 1195 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+220 fnt35
+226 1138(@AlignPlace)m 226 850(@AlignPlace)m 226 562(...)m 226 274(@EndAlignList)m 
+grestore
+gsave
+0 0 translate
+240 fnt82 0 0 0 0 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@E 0.2 cm 0 lfigpadd lfigprevious /FROM lfigpointdef
+0.2 cm 0 B@W lfigpsub lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+end end restore
+grestore
+0 9756(Then)m
+549(equations)s 1517(lik)s 2(e)k 1471 214 393 105 240 288 60 480 9202 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1471 214 393 105 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1471 214 393 105 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark xsize ymark 0.3 cm 0 lfigpadd
+[]
+xmark -0.3 cm xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+240 fnt83 0 53(f)m
+240 fnt78 113 45(\()m 240 fnt83 197 53(x)m 240 fnt78
+315 45(\))m 477(=)s 240 fnt83 690 53(g)m 240 fnt78
+816 45(\()m 240 fnt83 900 53(x)m 240 fnt78 1018 45(\))m
+1156(+)s 1357(2)s 
+grestore
+
+grestore
+end end restore
+grestore
+0 8751(are)m 358(created)s 1117(and)s
+1532(sent)s 1989(to)s 220 fnt35 2239 8748(@AlignPlace&&f)m 6(ollo)k 3(wing)k
+240 fnt82 4690 8751(tar)m 4(gets.)k 5498(The)s 3(y)k
+6052(collect)s 6760(in)s 7014(the)s 220 fnt35 7374 8748(@AlignList)m
+240 fnt82 8492 8751(g)m 1(alle)k 3(y)k 0 8463(and)m
+404(are)s 751(aligned)s 1513(there:)s 5836 3212 0 3212 240 288 60 480 4911 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+240 fnt83 0 3049(body)m
+522(te)s 4(xt)k 926(galle)s 7(y)k gsave
+0 166 translate
+240 fnt82 2039 2720 226 2494 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1587 1418 0 1314 240 288 60 226 226 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+838 208 0 104 240 288 60 0 1210 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+220 fnt35
+0 47(@Galle)m 4(y)k 
+grestore
+(A) lfigpromotelabels
+grestore
+
+grestore
+gsave
+2889 1643 translate
+240 fnt82 2947 209 0 105 240 288 60 LoutGraphic
+gsave
+currentdict end 200 dict begin begin
+grestore
+1046 209 0 105 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigbox ] lfigdopath
+pop pop
+grestore
+220 fnt35 0 48(@AlignList)m 
+grestore
+(B) lfigpromotelabels
+grestore
+gsave
+2889 0 translate
+240 fnt82 2947 1530 1285 1195 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+2495 1078 1059 969 240 288 60 226 226 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ xmark ysize lfigprevious /FROM lfigpointdef
+xmark 0 lfigprevious /TO lfigpointdef ] lfigdopath
+pop pop
+grestore
+240 fnt83
+666 917(f)m 240 fnt78 779 909(\()m 240 fnt83 863 917(x)m
+240 fnt78 981 909(\))m 1143(=)s 240 fnt83 1356 917(g)m
+240 fnt78 1482 909(\()m 240 fnt83 1566 917(x)m 240 fnt78
+1684 909(\))m 1822(+)s 2023(2)s 240 fnt83 0 629(f)m
+240 fnt78 113 621(\()m 240 fnt83 197 629(x)m 240 fnt78
+315 621(\))m 453(-)s 240 fnt83 653 629(g)m 240 fnt78
+779 621(\()m 240 fnt83 863 629(x)m 240 fnt78 981 621(\))m
+1143(=)s 1356(2)s 220 fnt35 1059 336(...)m 1059 48(@EndAlignList)m
+
+grestore
+
+grestore
+gsave
+0 0 translate
+240 fnt82 0 0 0 0 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ A@E 0.2 cm 0 lfigpadd lfigprevious /FROM lfigpointdef
+0.2 cm 0 B@W lfigpsub lfigprevious /TO lfigpointdef ] lfigdopath
+0.15 cm /lfigsolid /lfigblack
+lfigopen
+0.15 cm 0.05 cm lfigforward
+grestore
+
+grestore
+end end restore
+grestore
+0 4460(The)m 220 fnt35 450 4457(@AlignList)m 240 fnt82 1579 4460(g)m 1(alle)k 3(y)k
+2236(does)s 2749(not)s 3138(\210ush,)s 3734(because)s 4570(its)s
+4868(\207rst)s 5322(component)s 6469(is)s 6702(connected)s 7753(to)s
+8015(a)s 8204(recepti)s 6(v)k 3(e)k 0 4172(symbol)m
+760(by)s 220 fnt35 1054 4169(/)m 240 fnt82 1178 4172(operators.)m
+480 3798(After)m 1048(the)s 1402(last)s 1799(equation,)s 2736(an)s
+3025(empty)s 3683(forcing)s 4432(g)s 1(alle)k 3(y)k
+5072(is)s 5288(sent)s 5739(to)s 220 fnt35 5984 3795(@EndAlignList)m
+240 fnt82 7420 3798(,)m 7533(deleting)s 8362(the)s 8716(tw)s 2(o)k
+0 3510(remaining)m 1028(recepti)s 6(v)k 3(e)k 1957(symbols)s
+2813(from)s 3344(the)s 220 fnt35 3699 3507(@AlignList)m 240 fnt82
+4812 3510(g)m 1(alle)k 3(y)k 5452(and)s 5863(permitting)s
+6918(it)s 7117(to)s 7363(\210ush.)s 240 fnt83 8000 3512(FOLLO)m 12(WS)k
+240 fnt82 0 3222(inde)m 3(x)k 3(es)k 797(ensure)s
+1499(that)s 1939(each)s 2456(equation)s 3359(\207nds)s 3898(a)s
+4086(tar)s 4(get)k 4707(placed)s 5410(in)s 5675(the)s
+6045(body)s 6601(te)s 3(xt)k 7038(just)s 7465(after)s
+7983(its)s 8281(point)s 8855(of)s 0 2934(in)m 9(v)k 4(ocation,)k
+1090(so)s 1341(the)s 1675(equations)s 2628(return,)s 3290(aligned,)s
+4087(to)s 4311(approximately)s 5732(the)s 6065(points)s 6686(where)s
+7312(the)s 3(y)k 7760(were)s 8265(in)s 9(v)k 4(ok)k 2(ed.)k
+0 2646(Notice)m 703(that)s 1131(the)s 1489(\210ushing)s 2324(of)s
+2605(body)s 3149(te)s 3(xt)k 3574(is)s 3794(suspended)s
+4860(until)s 5363(the)s 5721(list)s 6082(of)s 6363(equations)s
+7341(is)s 7561(completed,)s 8674(as)s 8934(it)s 0 2358(must)m
+513(be,)s 833(since)s 1367(the)s 1702(horizontal)s 2713(position)s
+3528(of)s 3786(the)s 4121(\207rst)s 4539(equation)s 5407(cannot)s
+6092(be)s 6361(kno)s 6(wn)k 7052(until)s 7532(the)s
+7867(last)s 8245(equation)s 0 2070(is)m 210(added)s 840(to)s
+1079(the)s 1427(list.)s 480 1696(Layout)m 1262(quality)s 2025(can)s
+2459(occasionally)s 3753(be)s 4080(impro)s 3(v)k 3(ed)k
+5094(by)s 5433(rejecting)s 6366(a)s 6577(component)s 7746(that)s
+8209(could)s 8844(be)s 0 1408(promoted)m 978(\211)s 1161(for)s
+1502(e)s 3(xample,)k 2419(a)s 2588(component)s 3715(of)s
+3989(body)s 4526(te)s 3(xt)k 4944(that)s 5365(carries)s
+6054(a)s 6223(footnote)s 7079(too)s 7441(lar)s 4(ge)k
+7973(to)s 8215(\207t)s 8477(on)s 8778(the)s 0 1120(current)m
+747(page.)s 1374(Since)s 1972(Lout)s 2496(does)s 2997(not)s
+3374(specify)s 4130(ho)s 6(w)k 4602(breaking)s 5503(decisions)s
+6455(are)s 6814(made,)s 7450(be)s 3(yond)k 8222(the)s
+8582(basic)s 0 832(constraints)m 1089(imposed)s 1961(by)s 2258(a)s 4(v)k 6(ailable)k
+3169(space)s 3759(and)s 220 fnt35 4166 829(into)m 240 fnt82
+4575 832(clauses,)m 5375(in)s 5621(principle)s 6529(such)s 7028(high)s
+7514(quality)s 8236(breaking)s 0 544(could)m 592(be)s 877(added)s
+1510(to)s 1752(the)s 2102(implementation)s 3662(with)s 4147(no)s
+4443(change)s 5180(to)s 5421(the)s 5772(language.)s 6803(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+7766(the)s 8117(generality)s 0 256(of)m 280(the)s 637(g)s 1(alle)k 3(y)k
+1280(\210ushing)s 2115(algorithm,)s 3160(and)s 3573(its)s 3859(already)s
+4625(considerable)s 5898(comple)s 3(xity)k 15(,)k 7073(mak)s 2(e)k
+7654(this)s 8059(a)s 8235(daunting)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 30 31
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+%%+ font Symbol
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4287 13844(-)m 4415(30)s 4710(-)s 0 13253(problem)m 890(in)s
+1167(practice,)s 2062(although)s 2991(a)s 3190(f)s 2(ascinating)k
+4323(one.)s 4866(T)s 5008 13205(E)m 5151 13253(X)m 5414([9],)s
+5832(with)s 6348(its)s 6657(unnested)s 7600(set)s 7958(of)s
+8263(`\210oating)s 0 12965(insertions')m 1041(clearly)s 1744(identi\207able)s 2875(as)s
+3125(each)s 3620(page)s 4128(is)s 4338(be)s 3(gun,)k
+5028(has)s 5398(the)s 5746(adv)s 6(antage)k 6766(in)s
+7009(this)s 7405(respect.)s 240 fnt84 0 12316(5.3.)m 471(Size)s
+938(constraints)s 2120(and)s 2561(size)s 2988(adjustments)s 240 fnt82
+480 11840(The)m 893(g)s 1(alle)k 3(y)k 1512(\210ushing)s
+2321(algorithm)s 3295(needs)s 3876(to)s 4099(kno)s 6(w)k
+4665(the)s 4998(a)s 4(v)k 6(ailable)k 5890(width)s
+6477(and)s 6866(height)s 7508(at)s 7725(each)s 8204(recepti)s 6(v)k 3(e)k
+0 11552(symbol.)m 869(These)s 1496(symbols)s 2346(may)s 2812(lie)s
+3106(within)s 3775(arbitrarily)s 4782(comple)s 3(x)k 5659(objects,)s
+6443(and)s 6847(the)s 3(y)k 7311(may)s 7777(compete)s
+8644(with)s 0 11264(each)m 492(other)s 1040(for)s 1375(a)s 4(v)k 6(ailable)k
+2280(space)s 2864(\(as)s 3189(body)s 3720(te)s 3(xt)k
+4132(and)s 4533(footnote)s 5383(tar)s 4(gets)k 6062(do\),)s
+6485(so)s 6748(this)s 7141(information)s 8323(must)s 8844(be)s
+0 10976(e)m 3(xtracted)k 930(from)s 1454(the)s 1802(tree)s
+2215(structure)s 3106(when)s 3682(required.)s 480 10602(F)m 3(or)k
+869(e)s 3(xample,)k 1783(consider)s 2653(the)s 3001(object)s
+220 fnt35 480 10101(5i  @Wide  {  a  /  b  })m 240 fnt82 0 9607(and)m 406(suppose)s
+1236(that)s 1656(the)s 2006(width)s 2610(of)s 220 fnt35
+2883 9604(a)m 240 fnt82 3062 9607(is)m 240 fnt78 3274 9601(1)m
+240 fnt83 3382 9609(i)m 240 fnt78 3459 9601(,)m 3572(2)s
+240 fnt83 3700 9609(i)m 240 fnt82 3825 9607(\()m 240 fnt78
+3898 9601(1)m 240 fnt83 4006 9609(i)m 240 fnt82 4131 9607(to)m
+4372(the)s 4722(left)s 5101(of)s 5374(the)s 5724(mark,)s
+240 fnt78 6324 9601(2)m 240 fnt83 6452 9609(i)m 240 fnt82
+6577 9607(to)m 6818(the)s 7168(right\).)s 7864(What)s 8444(then)s
+8916(is)s 0 9319(the)m 348(a)s 4(v)k 6(ailable)k
+1256(width)s 1858(at)s 220 fnt35 2090 9316(b)m 240 fnt82
+2204 9319(?)m 2423(If)s 2653(we)s 2988(let)s 3286(the)s
+3634(width)s 4236(of)s 220 fnt35 4507 9316(b)m 240 fnt82
+4681 9319(be)m 240 fnt83 4963 9321(l)m 240 fnt78 5041 9313(,)m
+240 fnt83 5148 9321(r)m 240 fnt82 5246 9319(,)m 5353(we)s
+5688(must)s 6213(ha)s 4(v)k 3(e)k 240 fnt78
+480 8771(\()m 564(1)s 240 fnt83 670 8779(i)m 240 fnt78
+817 8771(\255)m 240 fnt83 1038 8779(l)m 240 fnt78 1116 8771(\))m
+1254(+)s 1455(\()s 1539(2)s 240 fnt83 1665 8779(i)m
+240 fnt78 1812 8771(\255)m 240 fnt83 2033 8779(r)m 240 fnt78
+2143 8771(\))m 2293(\243)s 2503(5)s 240 fnt83 2622 8779(i)m
+240 fnt82 0 8226(with)m 482(the)s 240 fnt78 842 8220(\255)m
+240 fnt82 1051 8226(\(i.e.)m 1466(max\))s 2006(operations)s 3053(arising)s
+3756(from)s 4280(mark)s 4832(alignment.)s 5952(Eliminating)s 7133(them)s
+7671(gi)s 6(v)k 3(es)k 240 fnt78 480 7674(1)m
+240 fnt83 586 7682(i)m 240 fnt78 721 7674(+)m 922(2)s
+240 fnt83 1048 7682(i)m 240 fnt78 1207 7674(\243)m 1417(5)s
+240 fnt83 1536 7682(i)m 583 7387(l)m 240 fnt78 721 7379(+)m
+922(2)s 240 fnt83 1048 7387(i)m 240 fnt78 1207 7379(\243)m
+1417(5)s 240 fnt83 1536 7387(i)m 240 fnt78 571 7091(1)m
+240 fnt83 677 7099(i)m 240 fnt78 812 7091(+)m 240 fnt83
+1013 7099(r)m 240 fnt78 1207 7091(\243)m 1417(5)s 240 fnt83
+1536 7099(i)m 674 6804(l)m 240 fnt78 812 6796(+)m 240 fnt83
+1013 6804(r)m 240 fnt78 1207 6796(\243)m 1417(5)s 240 fnt83
+1536 6804(i)m 240 fnt82 0 6293(and)m 428(since)s 1000(we)s
+1359(assume)s 2144(that)s 220 fnt35 2587 6290(a)m 240 fnt82
+2788 6293(\207ts)m 3156(into)s 3606(the)s 3978(a)s 4(v)k 6(ailable)k
+4911(space,)s 5573(the)s 5946(\207rst)s 6402(inequality)s 7436(may)s
+7927(be)s 8234(dropped,)s 0 6005(lea)m 4(ving)k 240 fnt83
+851 5454(l)m 240 fnt78 1013 5446(\243)m 1223(3)s 240 fnt83
+1340 5454(i)m 480 5159(l)m 240 fnt78 618 5151(+)m 240 fnt83
+819 5159(r)m 240 fnt78 1013 5151(\243)m 1223(5)s 240 fnt83
+1342 5159(i)m 819 4871(r)m 240 fnt78 1013 4863(\243)m 1223(4)s
+240 fnt83 1348 4871(i)m 240 fnt82 0 4362(Object)m 220 fnt35
+697 4359(b)m 240 fnt82 871 4362(may)m 1337(ha)s 4(v)k 3(e)k
+1838(width)s 240 fnt83 2440 4364(l)m 240 fnt78 2518 4356(,)m
+240 fnt83 2625 4364(r)m 240 fnt82 2783 4362(for)m 3121(an)s 3(y)k
+240 fnt83 3518 4364(l)m 240 fnt82 3644 4362(and)m 240 fnt83
+4048 4364(r)m 240 fnt82 4206 4362(satisfying)m 5188(these)s 5735(inequalities,)s
+6943(and)s 7347(no)s 7640(others.)s 480 3988(Here)m 1000(is)s
+1210(another)s 1987(e)s 3(xample:)k 220 fnt35 480 3487(5i  @High  {  a  /2ix  b  })m
+240 fnt82 0 2986(Assuming)m 1024(that)s 220 fnt35 1442 2983(a)m
+240 fnt82 1619 2986(has)m 1989(height)s 240 fnt78 2647 2980(1)m
+240 fnt83 2753 2988(i)m 240 fnt78 2828 2980(,)m 2935(1)s
+240 fnt83 3041 2988(i)m 240 fnt82 3104 2986(,)m 3211(the)s
+3559(height)s 240 fnt83 4217 2988(l)m 240 fnt78 4295 2980(,)m
+240 fnt83 4402 2988(r)m 240 fnt82 4560 2986(of)m 220 fnt35
+4831 2983(b)m 240 fnt82 5005 2986(must)m 5530(satisfy)s 240 fnt78
+480 2428(1)m 240 fnt83 586 2436(i)m 240 fnt78 721 2428(+)m
+922(\()s 1006(\()s 1090(1)s 240 fnt83 1196 2436(i)m
+240 fnt78 1331 2428(+)m 240 fnt83 1532 2436(l)m 240 fnt78
+1610 2428(\))m 1760(\255)s 1981(2)s 240 fnt83 2107 2436(i)m
+240 fnt78 2182 2428(\))m 2320(+)s 240 fnt83 2521 2436(r)m
+240 fnt78 2703 2428(\243)m 2913(5)s 240 fnt83 3032 2436(i)m
+240 fnt82 0 1883(This)m 478(time)s 960(the)s 240 fnt78
+1325 1877(\255)m 240 fnt82 1539 1883(operation)m 2501(arises)s 3098(from)s
+3624(the)s 3975(mark-to-mark)s 5364(g)s 1(ap)k 5765(mode,)s
+6406(which)s 7050(will)s 7479(widen)s 8123(the)s 240 fnt78
+8474 1877(2)m 240 fnt83 8602 1885(i)m 240 fnt82 8728 1883(g)m 1(ap)k
+0 1595(if)m 217(necessary)s 1200(to)s 1439(pre)s 6(v)k 3(ent)k
+220 fnt35 2207 1592(a)m 240 fnt82 2384 1595(and)m 220 fnt35
+2788 1592(b)m 240 fnt82 2962 1595(from)m 3486(o)s 3(v)k 3(erlapping.)k
+4787(This)s 5263(inequality)s 6273(can)s 6662(be)s 6944(re)s 6(written)k
+7856(as)s 240 fnt83 851 1044(l)m 240 fnt78 1013 1036(\243)m
+288 fnt78 1223 1024(\245)m 240 fnt83 480 753(l)m 240 fnt78
+618 745(+)m 240 fnt83 819 753(r)m 240 fnt78 1013 745(\243)m
+1223(3)s 240 fnt83 1340 753(i)m 819 465(r)m 240 fnt78
+1013 457(\243)m 1223(2)s 240 fnt83 1349 465(i)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 31 32
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Symbol
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4297 13844(-)m 4425(31)s 4700(-)s 0 13253(In)m 263(general,)s
+1080(Lout)s 1599(is)s 1816(designed)s 2732(so)s 3005(that)s
+3430(the)s 3785(a)s 4(v)k 6(ailable)k 4700(width)s
+5309(or)s 5575(height)s 6240(at)s 6479(an)s 3(y)k
+6883(point)s 7442(can)s 7838(be)s 8128(e)s 3(xpressed)k
+0 12965(by)m 294(three)s 827(inequalities)s 1979(of)s 2250(the)s
+2598(form)s 240 fnt83 851 12414(l)m 240 fnt78 1013 12406(\243)m
+240 fnt83 1223 12414(x)m 480 12123(l)m 240 fnt78 618 12115(+)m
+240 fnt83 819 12123(r)m 240 fnt78 1013 12115(\243)m 240 fnt83
+1223 12123(y)m 819 11808(r)m 240 fnt78 1013 11800(\243)m 240 fnt83
+1223 11808(z)m 240 fnt82 0 11287(where)m 240 fnt83 641 11289(x)m
+240 fnt82 747 11287(,)m 240 fnt83 855 11289(y)m 240 fnt82
+1018 11287(and)m 240 fnt83 1423 11289(z)m 240 fnt82 1575 11287(may)m
+2042(be)s 288 fnt78 2325 11269(\245)m 240 fnt82 2523 11287(.)m
+2688(W)s 19(e)k 3058(abbre)s 6(viate)k 4104(these)s
+4652(three)s 5186(inequalities)s 6339(to)s 240 fnt83 6579 11289(l)m
+240 fnt78 6658 11281(,)m 240 fnt83 6768 11289(r)m 240 fnt78
+6953 11281(\243)m 240 fnt83 7166 11289(x)m 240 fnt78 7285 11281(,)m
+240 fnt83 7395 11289(y)m 240 fnt78 7510 11281(,)m 240 fnt83
+7620 11289(z)m 240 fnt82 7711 11287(,)m 7819(and)s 8224(we)s
+8560(call)s 240 fnt83 8960 11289(x)m 240 fnt78 0 10993(,)m
+240 fnt83 107 11001(y)m 240 fnt78 221 10993(,)m 240 fnt83
+328 11001(z)m 240 fnt82 479 10999(a)m 240 fnt83 645 11001(size)m
+1056(constr)s 3(aint)k 240 fnt82 2027 10999(.)m 480 10625(The)m
+920(tw)s 2(o)k 1343(e)s 3(xamples)k 2307(abo)s 3(v)k 3(e)k
+2942(sho)s 6(wed)k 3739(ho)s 6(w)k 4213(to)s
+4465(propag)s 1(ate)k 5475(the)s 5836(size)s 6276(constraint)s
+288 fnt78 7291 10607(\245)m 240 fnt78 7514 10619(,)m 7659(5)s
+240 fnt83 7791 10627(i)m 240 fnt78 7879 10619(,)m 288 fnt78
+8025 10607(\245)m 240 fnt82 8296 10625(for)m 220 fnt35 8647 10622(a / b)m
+240 fnt82 0 10337(do)m 6(wn)k 586(one)s 991(le)s 6(v)k 3(el)k
+1504(to)s 1746(the)s 2097(child)s 220 fnt35 2636 10334(b)m
+240 fnt82 2750 10337(.)m 2917(Basser)s 3617(Lout)s 4132(contains)s
+4982(a)s 5151(complete)s 6086(set)s 6414(of)s 6688(general)s
+7449(rules)s 7967(for)s 8308(all)s 8604(node)s 0 10049(types,)m
+627(too)s 1002(complicated)s 2244(to)s 2499(gi)s 6(v)k 3(e)k
+2974(here.)s 3565(Instead,)s 4378(we)s 4729(gi)s 6(v)k 3(e)k
+5203(just)s 5624(one)s 6042(e)s 3(xample)k 6921(of)s
+7208(ho)s 6(w)k 7685(these)s 8248(rules)s 8779(are)s
+0 9761(deri)m 6(v)k 3(ed,)k 815(using)s 1387(the)s
+1735(object)s 240 fnt83 480 9265(x)m 168 fnt78 586 9172(1)m
+220 fnt35 772 9260(/)m 240 fnt83 956 9265(x)m 168 fnt78
+1062 9172(2)m 220 fnt35 1262 9260(/)m 240 fnt83 1446 9265(.)m
+1552(.)s 1658(.)s 220 fnt35 1812 9260(/)m 240 fnt83
+1996 9265(x)m 168 fnt83 2102 9178(n)m 240 fnt82 0 8719(where)m
+240 fnt83 640 8721(x)m 168 fnt83 746 8634(j)m 240 fnt82
+852 8719(has)m 1222(width)s 240 fnt83 1824 8721(l)m 168 fnt83
+1890 8634(j)m 240 fnt78 1948 8713(,)m 240 fnt83 2055 8721(r)m
+168 fnt83 2127 8634(j)m 240 fnt82 2233 8719(for)m 2571(all)s
+240 fnt83 2864 8721(j)m 240 fnt82 2930 8719(.)m 480 8345(Suppose)m
+1345(the)s 1689(whole)s 2326(object)s 2966(has)s 3333(width)s
+3931(constraint)s 240 fnt83 4929 8347(X)m 240 fnt78 5097 8339(,)m
+240 fnt83 5204 8347(Y)m 240 fnt78 5367 8339(,)m 240 fnt83
+5474 8347(Z)m 240 fnt82 5619 8345(,)m 5722(and)s 6123(we)s
+6454(require)s 7182(the)s 7526(width)s 8124(constraint)s 0 8057(of)m
+240 fnt83 271 8059(x)m 168 fnt83 377 7972(i)m 240 fnt82
+421 8057(.)m 586(Let)s 240 fnt83 965 8059(L)m 240 fnt78
+1185 8051(=)m 240 fnt82 1401 8057(max)m 168 fnt83 1808 7972(j)m
+240 fnt83 1917 8059(l)m 168 fnt83 1983 7972(j)m 240 fnt82
+2090 8057(and)m 240 fnt83 2495 8059(R)m 240 fnt78 2723 8051(=)m
+240 fnt82 2939 8057(max)m 168 fnt83 3346 7972(j)m 240 fnt83
+3455 8059(r)m 168 fnt83 3527 7972(j)m 240 fnt82 3573 8057(,)m
+3681(so)s 3948(that)s 240 fnt83 4367 8059(L)m 240 fnt78
+4512 8051(,)m 240 fnt83 4619 8059(R)m 240 fnt82 4821 8057(is)m
+5032(the)s 5381(width)s 5984(of)s 6256(the)s 6605(whole)s
+7247(object.)s 7996(W)s 19(e)k 8366(assume)s 240 fnt83
+0 7746(L)m 240 fnt78 145 7738(,)m 240 fnt83 252 7746(R)m
+240 fnt78 477 7738(\243)m 240 fnt83 687 7746(X)m 240 fnt78
+855 7738(,)m 240 fnt83 962 7746(Y)m 240 fnt78 1125 7738(,)m
+240 fnt83 1232 7746(Z)m 240 fnt82 1377 7744(.)m 1541(Then)s
+240 fnt83 2090 7746(x)m 168 fnt83 2196 7659(i)m 240 fnt82
+2300 7744(can)m 2689(be)s 2971(enlar)s 4(ged)k 3848(to)s
+4087(an)s 3(y)k 4484(size)s 240 fnt83 4911 7746(l)m
+168 fnt83 4977 7659(i)m 240 fnt78 5081 7738(,)m 240 fnt83
+5188 7746(r)m 168 fnt83 5260 7659(i)m 240 fnt82 5364 7744(satisfying)m
+240 fnt78 480 7151(\()m 240 fnt83 564 7159(l)m 168 fnt83
+630 7072(i)m 240 fnt78 758 7151(\255)m 240 fnt83 979 7159(L)m
+240 fnt78 1124 7151(\))m 1202(,)s 1309(\()s 240 fnt83
+1393 7159(r)m 168 fnt83 1465 7072(i)m 240 fnt78 1593 7151(\255)m
+240 fnt83 1814 7159(R)m 240 fnt78 1967 7151(\))m 2117(\243)s
+240 fnt83 2327 7159(X)m 240 fnt78 2495 7151(,)m 240 fnt83
+2602 7159(Y)m 240 fnt78 2765 7151(,)m 240 fnt83 2872 7159(Z)m
+240 fnt82 0 6619(which)m 642(e)s 3(xpands)k 1475(to)s
+1714(eight)s 2252(inequalities:)s 240 fnt83 917 6068(l)m 168 fnt83
+983 5981(i)m 240 fnt78 1123 6060(\243)m 240 fnt83 1333 6068(X)m
+894 5704(L)m 240 fnt78 1123 5696(\243)m 240 fnt83 1333 5704(X)m
+528 5413(l)m 168 fnt83 594 5326(i)m 240 fnt78 710 5405(+)m
+240 fnt83 911 5413(r)m 168 fnt83 983 5326(i)m 240 fnt78
+1123 5405(\243)m 240 fnt83 1333 5413(Y)m 503 5041(l)m 168 fnt83
+569 4954(i)m 240 fnt78 685 5033(+)m 240 fnt83 886 5041(R)m
+240 fnt78 1123 5033(\243)m 240 fnt83 1333 5041(Y)m 505 4677(L)m
+240 fnt78 710 4669(+)m 240 fnt83 911 4677(r)m 168 fnt83
+983 4590(i)m 240 fnt78 1123 4669(\243)m 240 fnt83 1333 4677(Y)m
+480 4313(L)m 240 fnt78 685 4305(+)m 240 fnt83 886 4313(R)m
+240 fnt78 1123 4305(\243)m 240 fnt83 1333 4313(Y)m 911 4030(r)m
+168 fnt83 983 3943(i)m 240 fnt78 1123 4022(\243)m 240 fnt83
+1333 4030(Z)m 886 3666(R)m 240 fnt78 1123 3658(\243)m 240 fnt83
+1333 3666(Z)m 240 fnt82 0 3159(Three)m 613(are)s 960(already)s
+1717(kno)s 6(wn,)k 2471(and)s 2875(slightly)s 3646(rearranging)s
+4800(the)s 5148(others)s 5783(gi)s 6(v)k 3(es)k
+240 fnt83 869 2608(l)m 168 fnt83 935 2521(i)m 240 fnt78
+1075 2600(\243)m 240 fnt83 1285 2608(X)m 869 2236(l)m 168 fnt83
+935 2149(i)m 240 fnt78 1075 2228(\243)m 240 fnt83 1285 2236(Y)m
+240 fnt78 1508 2228(-)m 240 fnt83 1708 2236(R)m 480 1864(l)m
+168 fnt83 546 1777(i)m 240 fnt78 662 1856(+)m 240 fnt83
+863 1864(r)m 168 fnt83 935 1777(i)m 240 fnt78 1075 1856(\243)m
+240 fnt83 1285 1864(Y)m 863 1500(r)m 168 fnt83 935 1413(i)m
+240 fnt78 1075 1492(\243)m 240 fnt83 1285 1500(Z)m 863 1136(r)m
+168 fnt83 935 1049(i)m 240 fnt78 1075 1128(\243)m 240 fnt83
+1285 1136(Y)m 240 fnt78 1508 1128(-)m 240 fnt83 1708 1136(L)m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 32 33
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Symbol
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4288 13844(-)m 4416(32)s 4710(-)s 0 13253(Therefore)m 997(the)s
+1345(width)s 1947(constraint)s 2949(of)s 240 fnt83 3220 13255(x)m
+168 fnt83 3326 13168(i)m 240 fnt82 3430 13253(is)m 480 12715(min)m
+240 fnt78 861 12709(\()m 240 fnt83 945 12717(X)m 240 fnt78
+1113 12709(,)m 240 fnt83 1220 12717(Y)m 240 fnt78 1443 12709(-)m
+240 fnt83 1643 12717(R)m 240 fnt78 1796 12709(\))m 1874(,)s
+240 fnt83 1981 12717(Y)m 240 fnt78 2144 12709(,)m 240 fnt82
+2251 12715(min)m 240 fnt78 2632 12709(\()m 240 fnt83 2716 12717(Z)m
+240 fnt78 2873 12709(,)m 240 fnt83 2980 12717(Y)m 240 fnt78
+3203 12709(-)m 240 fnt83 3403 12717(L)m 240 fnt78 3548 12709(\))m
+240 fnt82 0 12213(The)m 445(size)s 890(constraint)s 1909(of)s
+2198(an)s 3(y)k 2613(node)s 3152(can)s 3559(be)s
+3858(found)s 4493(by)s 4805(climbing)s 5725(the)s 6091(tree)s
+6521(to)s 6778(a)s 240 fnt83 6962 12215(WIDE)m 240 fnt82
+7641 12213(or)m 240 fnt83 7918 12215(HIGH)m 240 fnt82 8604 12213(node)m
+0 11925(where)m 636(the)s 980(constraint)s 1978(is)s 2184(tri)s 6(vial,)k
+2850(then)s 3315(propag)s 1(ating)k 4506(it)s 4694(back)s
+5203(do)s 6(wn)k 5783(to)s 6018(the)s 6362(node,)s
+6931(and)s 7331(this)s 7723(is)s 7929(the)s 8272(function)s
+0 11637(of)m 271(procedure)s 240 fnt83 1283 11639(Constr)m 3(ained)k
+240 fnt82 2530 11637(in)m 2773(Basser)s 3470(Lout.)s 480 11263(After)m
+1043(some)s 1604(components)s 2813(ha)s 4(v)k 3(e)k
+3314(been)s 3824(promoted)s 4799(into)s 5225(a)s 5391(tar)s 4(get,)k
+6038(the)s 6386(sizes)s 6902(stored)s 7544(in)s 7788(its)s
+8064(parent)s 8722(and)s 0 10975(higher)m 665(ancestors)s 1598(must)s
+2117(be)s 2392(adjusted)s 3241(to)s 3473(re\210ect)s 4122(the)s
+4464(increased)s 5417(size.)s 5946(This)s 6415(is)s 6618(done)s
+7134(by)s 7421(yet)s 7767(another)s 8537(set)s 8855(of)s
+0 10687(recursi)m 6(v)k 3(e)k 925(rules,)s 1500(upw)s 2(ard-mo)k 3(ving)k
+3081(this)s 3481(time,)s 4016(which)s 4662(cease)s 5239(as)s
+5492(soon)s 6006(as)s 6260(some)s 6825(ancestor')s 13(s)k
+7835(size)s 8266(does)s 8760(not)s 0 10399(change.)m 830(These)s
+1445(rules)s 1948(are)s 2283(embodied)s 3273(in)s 3504(procedure)s
+240 fnt83 4504 10401(AdjustSize)m 240 fnt82 5541 10399(of)m 5800(Basser)s
+6485(Lout.)s 7089(The)s 7505(adjustment)s 8601(must)s 0 10111(be)m
+282(done)s 804(before)s 1470(relinquishing)s 2785(control)s 3517(to)s
+3756(an)s 3(y)k 4153(other)s 4704(g)s 1(alle)k 3(y)k 15(,)k
+5376(b)s 4(ut)k 5738(not)s 6104(after)s 6600(e)s 6(v)k 3(ery)k
+7176(component.)s 240 fnt84 0 9462(5.4.)m 471(The)s 926(limited)s
+1696(lookahead)s 2802(pr)s 4(oblem)k 240 fnt82 480 8985(Basser)m
+1189(Lout)s 1714(assumes)s 2575(that)s 3006(there)s 3552(will)s
+3991(be)s 4286(enough)s 5062(internal)s 5859(memory)s 6723(to)s
+6975(hold)s 7472(the)s 7833(symbol)s 8606(table)s 0 8697(plus)m
+461(a)s 638(fe)s 6(w)k 1055(pages,)s 1719(b)s 4(ut)k
+2092(not)s 2469(an)s 2764(entire)s 3374(document.)s 4493(This)s
+4980(section)s 5726(describes)s 6677(the)s 7036(consequent)s 8185(problems)s
+0 8409(and)m 441(ho)s 6(w)k 940(the)s 3(y)k
+1441(were)s 1999(solv)s 3(ed.)k 2763(Other)s 3405(interpreters,)s
+4636(notably)s 5446(interacti)s 6(v)k 3(e)k 6538(editors)s
+7277(running)s 8113(on)s 8448(virtual)s 0 8121(memory)m 851(systems,)s
+1715(w)s 2(ould)k 2370(not)s 2736(necessarily)s 3851(need)s
+4361(this)s 4757(assumption.)s 480 7747(Although)m 1434(Basser)s 2122(Lout)s
+2625(can)s 3005(read)s 3466(and)s 3861(format)s 4548(an)s 3(y)k
+4936(le)s 3(g)k 1(al)k 5442(input,)s 6033(its)s
+6300(memory)s 7142(consumption)s 8427(will)s 8844(be)s 0 7459(optimized)m
+1004(when)s 1570(the)s 1908(b)s 4(ulk)k 2381(of)s
+2642(the)s 2980(document)s 3974(resides)s 4677(in)s 4910(g)s 1(alle)k 3(ys)k
+5624(whose)s 6282(tar)s 4(gets)k 6955(can)s 7334(be)s
+7606(identi\207ed)s 8557(at)s 8778(the)s 0 7171(moment)m 843(the)s 3(y)k
+1304(are)s 1650(encountered.)s 2981(Let)s 3358(us)s 3620(tak)s 2(e)k
+4071(the)s 4417(typical)s 5121(e)s 3(xample)k 5982(of)s
+6252(a)s 6416(root)s 6860(g)s 1(alle)k 3(y)k
+7492(which)s 8133(is)s 8341(a)s 8506(list)s 8855(of)s
+0 6883(pages,)m 652(a)s 220 fnt35 818 6880(@BodyT)m 26(e)k 6(xt)k
+240 fnt82 1991 6883(g)m 1(alle)k 3(y)k 2625(tar)s 4(geted)k
+3448(into)s 3872(the)s 4220(pages,)s 220 fnt35 4872 6880(@Chapter)m
+240 fnt82 5934 6883(g)m 1(alle)k 3(ys)k 6658(tar)s 4(geted)k
+7481(into)s 220 fnt35 7905 6880(@BodyT)m 26(e)k 6(xt)k
+240 fnt82 9019 6883(,)m 0 6595(and)m 220 fnt35 404 6592(@Section)m
+240 fnt82 1404 6595(g)m 1(alle)k 3(ys)k 2128(tar)s 4(geted)k
+2951(into)s 3376(the)s 220 fnt35 3724 6592(@Chapter)m 240 fnt82
+4787 6595(g)m 1(alle)k 3(ys:)k 220 fnt35 480 6094(@P)m 8(ageList)k
+480 5806(//)m 480 5518(@BodyT)m 26(e)k 6(xt)k 480 5230(//)m
+480 4942(@Chapter {)m 480 4654(    @Section { ...)m 13( })k 480 4366(    @Section { ...)m 13( })k
+480 4078(    ...)m 480 3790(    @Section { ...)m 13( })k 480 3502(})m 480 3214(@Chapter {)m
+480 2926(    ...)m 480 2638(})m 240 fnt82 0 2144(Basser)m 702(Lout)s
+1220(is)s 1436(able)s 1896(to)s 2141(read)s 2616(and)s
+3026(process)s 3800(such)s 4302(g)s 1(alle)k 3(ys)k
+5032(one)s 5440(paragraph)s 6459(at)s 6697(a)s 6869(time)s
+7355(\(strictly)s 15(,)k 8194(from)s 8724(one)s 220 fnt35
+0 1853(//)m 240 fnt82 185 1856(at)m 417(the)s 765(outer)s
+1316(le)s 6(v)k 3(el)k 1826(of)s 2097(a)s
+2263(g)s 1(alle)k 3(y)k 2897(to)s 3136(the)s
+3484(ne)s 3(xt\),)k 4079(as)s 4329(we)s 4664(no)s 6(w)k
+5125(describe.)s 480 1482(When)m 1147(the)s 1534(parser)s 2215(encounters)s
+3341(the)s 3727(be)s 3(ginning)k 4774(of)s 5083(a)s
+5288(g)s 1(alle)k 3(y)k 15(,)k 5998(lik)s 2(e)k
+220 fnt35 6449 1479(@Chapter)m 240 fnt82 7550 1482(or)m 220 fnt35
+7848 1479(@Section)m 240 fnt82 8788 1482(,)m 8934(it)s 0 1194(initiates)m
+831(a)s 1023(ne)s 6(w)k 1495(g)s 1(alle)k 3(y)k
+2155(process.)s 3061(The)s 3515(special)s 4258(recepti)s 6(v)k 3(e)k
+5206(symbol)s 220 fnt35 5991 1191(@Input)m 240 fnt82 6784 1194(is)m
+7019(substituted)s 8139(for)s 8502(the)s 8876(as)s 0 906(yet)m
+357(unread)s 1071(right)s 1588(parameter)s 2607(of)s 2884(the)s
+3237(g)s 1(alle)k 3(y)k 15(.)k 3972(As)s
+4294(each)s 4795(paragraph)s 5813(of)s 6090(the)s 6443(right)s
+6960(parameter)s 7979(is)s 8195(read,)s 8718(it)s 8916(is)s
+0 618(deleted)m 763(from)s 1302(the)s 1665(parse)s 2240(tree)s
+2668(and)s 3087(injected)s 3916(into)s 4356(the)s 4719(g)s 1(alle)k 3(y')k 13(s)k
+220 fnt35 5524 615(@Input)m 240 fnt82 6231 618(.)m 6410(The)s
+6853(g)s 1(alle)k 3(y)k 7502(is)s 7727(then)s
+8212(resumed.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 33 34
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Italic
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4293 13844(-)m 4421(33)s 4705(-)s 0 13253(The)m 429(parser)s
+1074(thus)s 1526(acts)s 1950(as)s 2202(an)s 2487(e)s 3(xtra)k
+3022(concurrent)s 4106(process;)s 4937(it)s 5131(has)s 5503(lo)s 6(w)k
+5912(priority)s 15(,)k 6721(so)s 6989(that)s 7409(input)s
+7963(is)s 8175(read)s 8646(only)s 0 12965(when)m 597(there)s
+1151(is)s 1382(nothing)s 2188(else)s 2636(to)s 2897(do.)s
+3322(Since)s 3930(g)s 1(alle)k 3(ys)k 4675(may)s
+5162(be)s 5465(nested,)s 6205(a)s 6392(stack)s 6965(of)s
+220 fnt35 7257 12962(@Input)m 240 fnt82 8045 12965(symbols)m 8916(is)s
+0 12677(needed,)m 781(each)s 1271(with)s 1749(its)s 2020(o)s 6(wn)k
+2480(en)s 9(vironment)k 3735(and)s 4135(style.)s 4745(If)s
+4971(a)s 5132(g)s 1(alle)k 3(y)k 5762(is)s
+5967(encountered)s 7190(for)s 7523(which)s 8161(a)s 8322(tar)s 4(get)k
+8916(is)s 0 12389(not)m 370(immediately)s 1622(identi\207able)s 2757(\(a)s
+3006(footnote,)s 3914(for)s 4257(e)s 3(xample\),)k 5254(it)s
+5450(is)s 5664(read)s 6137(in)s 6385(its)s 6665(entirety)s
+7452(and)s 7860(hung)s 8397(in)s 8645(pure)s 0 12101(parse)m
+551(tree)s 954(form)s 1468(from)s 1983(an)s 240 fnt83
+2256 12103(UN)m 6(A)k 8(TT)k 12(A)k 7(CHED)k
+240 fnt82 3811 12101(inde)m 3(x)k 4386(in)s 4619(the)s
+4957(usual)s 5508(w)s 2(ay)k 15(,)k 5987(with)s
+6459(an)s 6733(en)s 9(vironment)k 7983(b)s 4(ut)k
+8335(without)s 0 11813(a)m 166(style.)s 781(It)s 986(will)s
+1412(be)s 1694(\210ushed)s 2444(later)s 2927(when)s 3503(its)s
+3779(component)s 4903(is)s 5113(promoted.)s 480 11439(In)m 735(addition)s
+1575(to)s 1813(producing)s 2836(a)s 3001(steady)s 3665(\210o)s 6(w)k
+4138(of)s 4407(components)s 5614(from)s 6137(input,)s 6735(we)s
+7069(must)s 7593(also)s 8030(ensure)s 8708(that)s 0 11151(recepti)m 6(v)k 3(e)k
+928(symbols)s 1783(do)s 2083(not)s 2455(unduly)s 3182(block)s
+3781(their)s 4285(promotion.)s 5452(The)s 220 fnt35 5886 11148(@F)m 6(ootSect)k
+240 fnt82 7044 11151(symbol)m 7810(at)s 8049(the)s 8403(foot)s
+8855(of)s 0 10863(each)m 495(page)s 1003(is)s 1213(a)s
+1379(typical)s 2084(e)s 3(xample:)k 3057(until)s 3550(it)s
+3742(is)s 3952(deleted)s 4700(the)s 5048(page)s 5556(cannot)s
+6254(be)s 6536(printed.)s 480 10489(Recepti)m 6(v)k 3(e)k
+1501(symbols)s 2368(are)s 2733(e)s 3(xpanded)k 3724(only)s
+4222(on)s 4537(demand,)s 5421(so)s 220 fnt35 5705 10486(@F)m 6(ootSect)k
+240 fnt82 6874 10489(can)m 7281(be)s 7581(deleted)s 8347(as)s
+8616(soon)s 0 10201(as)m 250(we)s 585(can)s 974(pro)s 3(v)k 3(e)k
+1570(that)s 1988(it)s 2180(is)s 2390(not)s 2757(w)s 2(anted.)k
+3610(The)s 4038(symbol)s 4799(table)s 5319(can)s 5708(tell)s
+6067(us)s 6332(that)s 6750(only)s 220 fnt35 7230 10198(@F)m 6(ootNote)k
+240 fnt82 8402 10201(g)m 1(alle)k 3(ys)k 0 9913(\(with)m
+220 fnt35 555 9910(@F)m 6(ootPlace&&f)k 6(ollo)k 3(wing)k
+240 fnt82 2935 9913(tar)m 4(gets\))k 3688(w)s 2(ant)k
+4205(it,)s 4438(so)s 4697(it)s 4883(might)s 5494(be)s
+5770(possible)s 6604(to)s 6836(deduce)s 7564(that)s 220 fnt35
+7975 9910(@F)m 6(ootSect)k 240 fnt82 0 9625(may)m 466(be)s
+748(deleted)s 1496(as)s 1746(soon)s 2256(as)s 2506(body)s
+3040(te)s 3(xt)k 3455(enters)s 4076(the)s 4424(follo)s 6(wing)k
+5401(page.)s 480 9251(The)m 904(author)s 1571(w)s 2(as)k
+1987(unable)s 2677(to)s 2912(mak)s 2(e)k 3479(this)s
+3871(w)s 2(ork,)k 4463(so)s 4725(Basser)s 5418(Lout)s
+5925(requires)s 6741(the)s 7085(user)s 7538(to)s 7773(identify)s
+8565(those)s 0 8963(g)m 1(alle)k 3(ys)k 715(which)s
+1348(will)s 1764(carry)s 2299(the)s 2637(b)s 4(ulk)k
+3111(of)s 3372(the)s 3711(document)s 4705(\()s 220 fnt35
+4778 8960(@Chapter)m 240 fnt82 5781 8963(,)m 220 fnt35 5879 8960(@Section)m
+240 fnt82 6819 8963(,)m 220 fnt35 6916 8960(@BodyT)m 26(e)k 6(xt)k
+240 fnt82 8030 8963(\))m 8149(as)s 240 fnt83 8389 8965(for)m 8(cing)k
+0 8677(galle)m 7(ys)k 240 fnt82 665 8675(,)m 792(by)s
+1107(writing)s 220 fnt35 1871 8672(f)m 6(orce into)k 240 fnt82
+2841 8675(instead)m 3596(of)s 220 fnt35 3888 8672(into)m 240 fnt82
+4315 8675(in)m 4579(their)s 5097(de\207nitions.)s 6291(As)s 6629(described)s
+7624(in)s 7888(the)s 8257(pre)s 6(vious)k 0 8387(section,)m
+790(when)s 1373(a)s 1546(forcing)s 2296(g)s 1(alle)k 3(y)k
+2937(attaches)s 3763(to)s 4009(a)s 4182(tar)s 4(get,)k
+4835(all)s 5135(recepti)s 6(v)k 3(e)k 6063(symbols)s
+6919(preceding)s 7922(the)s 8277(tar)s 4(get)k 8883(in)s
+0 8099(its)m 278(g)s 1(alle)k 3(y)k 914(are)s
+1263(deleted,)s 2062(remo)s 3(ving)k 3031(all)s 3326(impediments)s
+4614(to)s 4855(\210ushing.)s 5793(F)s 3(or)k 6184(e)s 3(xample,)k
+7100(when)s 7678(a)s 7846(forcing)s 8592(body)s 0 7811(te)m 3(xt)k
+421(g)s 1(alle)k 3(y)k 1062(enters)s 1690(a)s
+1863(ne)s 6(w)k 2317(page,)s 2882(the)s 220 fnt35
+3237 7808(@F)m 6(ootSect)k 240 fnt82 4395 7811(symbol)m 5162(on)s
+5466(the)s 5820(preceding)s 6823(page)s 7338(will)s 7771(be)s
+8060(deleted.)s 8921(It)s 0 7523(seems)m 629(lik)s 2(ely)k
+1219(that)s 1631(a)s 1791(system)s 2509(which)s 3145(could)s
+3729(af)s 6(ford)k 4358(to)s 4591(w)s 2(ait)k
+5054(until)s 5541(all)s 5828(input)s 6374(w)s 2(as)k
+6789(read)s 7252(before)s 7912(deleting)s 8729(an)s 3(y)k
+0 7235(recepti)m 6(v)k 3(e)k 922(symbols)s 1771(w)s 2(ould)k
+2426(not)s 2792(need)s 3302(forcing)s 4045(g)s 1(alle)k 3(ys.)k
+480 6861(Galle)m 3(ys)k 1258(whose)s 1925(tar)s 4(gets)k
+2607(are)s 2953(a)s 3118(long)s 3597(w)s 2(ay)k
+4047(from)s 4570(their)s 5066(in)s 9(v)k 4(ocation)k
+6119(points)s 6755(can)s 7143(be)s 7424(a)s 7589(problem.)s
+8549(If)s 8778(the)s 0 6573(direction)m 917(is)s 220 fnt35
+1139 6570(f)m 6(ollo)k 3(wing)k 240 fnt82 1969 6573(,)m
+2087(such)s 2595(g)s 1(alle)k 3(ys)k 3330(are)s
+3689(held)s 4170(in)s 4425(internal)s 5221(memory)s 6083(for)s
+6433(a)s 6610(long)s 7101(time,)s 7643(unless)s 8304(the)s 3(y)k
+8779(are)s 0 6285(to)m 248(be)s 539(sorted.)s 1296(If)s
+1535(the)s 1892(direction)s 2807(is)s 220 fnt35 3026 6282(preceding)m
+240 fnt82 3977 6285(,)m 4093(then)s 4571(either)s 5183(the)s
+5540(entire)s 6148(interv)s 3(ening)k 7296(document)s 8309(must)s
+8844(be)s 0 5997(held)m 466(in)s 704(memory)s 1551(\(pre)s 6(v)k 3(ented)k
+2617(by)s 2907(the)s 3250(tar)s 4(get)k 3844(from)s
+4364(\210ushing\),)s 5317(or)s 5572(else)s 5994(some)s 6551(forcing)s
+7289(g)s 1(alle)k 3(y)k 7918(prematurely)s 0 5709(deletes)m
+714(the)s 1062(tar)s 4(get,)k 1708(lea)s 4(ving)k
+2461(the)s 2809(g)s 1(alle)k 3(y)k 3443(bereft.)s
+480 5335(The)m 929(typical)s 1655(e)s 3(xample)k 2539(of)s
+2832(the)s 3201(latter)s 3771(case)s 4260(occurs)s 4956(when)s
+5553(the)s 5922(g)s 1(alle)k 3(y)k 6578(is)s
+6809(an)s 7113(entry)s 7680(in)s 7944(the)s 8313(table)s
+8855(of)s 0 5047(contents,)m 907(launched)s 1832(backw)s 2(ards)k
+2907(from)s 3435(the)s 3786(be)s 3(ginning)k 4797(of)s
+5071(a)s 5241(chapter)s 6007(or)s 6269(section.)s 7113(Its)s
+7406(tar)s 4(get)k 8008(in)s 8254(the)s 8606(table)s
+0 4759(of)m 286(contents)s 1150(will)s 1592(ha)s 4(v)k 3(e)k
+2108(been)s 2633(deleted)s 3397(long)s 3891(before,)s 4624(to)s
+4879(permit)s 5578(the)s 5941(rest)s 6361(of)s 6648(the)s
+7011(document)s 8031(to)s 8286(print,)s 8860(so)s 0 4471(the)m
+349(g)s 1(alle)k 3(y)k 985(ultimately)s 2009(emer)s 4(ges)k
+2854(as)s 3106(an)s 3391(unattached)s 4487(g)s 1(alle)k 3(y)k
+5122(promoted)s 6099(out)s 6467(of)s 6740(the)s 7090(root)s
+7537(g)s 1(alle)k 3(y)k 15(.)k 8268(All)s
+8630(such)s 0 4183(g)m 1(alle)k 3(ys)k 717(are)s
+1056(written)s 1781(to)s 2013(an)s 2288(auxiliary)s 3183(\207le,)s
+3588(inde)s 3(x)k 3(ed)k 4390(by)s 4676(the)s
+5016(missing)s 5806(tar)s 4(get.)k 6501(On)s 6843(the)s
+7184(ne)s 3(xt)k 7645(run,)s 8063(just)s 8460(before)s
+0 3895(that)m 418(tar)s 4(get)k 1017(is)s 1227(deleted,)s
+2024(the)s 2372(auxiliary)s 3275(\207le)s 3636(is)s 3846(check)s 2(ed)k
+4686(and)s 5090(an)s 3(y)k 5487(g)s 1(alle)k 3(ys)k
+6211(for)s 6549(it)s 6741(are)s 7088(read)s 7557(in)s
+7800(and)s 8204(\210ushed.)s 240 fnt84 0 3246(5.5.)m 471(Horizontal)s
+1628(galleys)s 240 fnt82 480 2769(There)m 1108(is)s 1333(a)s
+1514(strong)s 2180(analogy)s 3007(between)s 3876(breaking)s 4781(a)s
+4962(column)s 5752(of)s 6038(te)s 3(xt)k 6468(into)s
+6908(page-sized)s 8003(pieces,)s 8722(and)s 0 2481(breaking)m 912(a)s
+1101(paragraph)s 2137(into)s 2585(line-sized)s 3594(pieces.)s 4378(In)s
+4657(f)s 2(act,)k 5142(the)s 5513(tw)s 2(o)k
+5946(dif)s 6(fer)k 6552(only)s 7055(in)s 7321(direction:)s
+8359(v)s 3(ertical)k 0 2193(for)m 343(body)s 883(te)s 3(xt,)k
+1351(horizontal)s 2381(for)s 2724(paragraphs.)s 3943(In)s 4205(this)s
+4607(section)s 5347(we)s 5687(de\207ne)s 240 fnt83 6334 2195(horizontal)m
+7384(galle)s 7(ys)k 240 fnt82 8049 2193(,)m 8162(and)s
+8572(sho)s 6(w)k 0 1905(ho)m 6(w)k 493(the)s 3(y)k
+989(pro)s 3(vide)k 1806(an)s 2122(unlimited)s 3129(number)s
+3953(of)s 4257(paragraph)s 5302(breaking)s 6225(styles,)s 6909(as)s
+7192(well)s 7691(as)s 7974(solv)s 3(e)k 8565(some)s
+0 1617(other)m 587(problems.)s 1677(Re)s 3(grettably)k 15(,)k
+2917(lack)s 3412(of)s 3719(time)s 4235(has)s 4641(pre)s 6(v)k 3(ented)k
+5669(their)s 6202(incorporation)s 7583(into)s 8044(the)s 8429(Basser)s
+0 1329(Lout)m 512(interpreter)s 13(.)k 480 955(Imagine)m 1337(a)s
+1521(g)s 1(alle)k 3(y)k 2173(whose)s 2859(components)s
+4085(are)s 4450(separated)s 5428(by)s 5740(horizontal)s 6782(concatenation)s
+8186(operators)s 0 667(instead)m 725(of)s 986(v)s 3(ertical)k
+1742(ones,)s 2278(perhaps)s 3062(indicated)s 3986(by)s 4269(a)s
+220 fnt35 4425 664(hor)m -3(iz)k 3(ontally)k 5582(into)s
+240 fnt82 5977 667(clause.)m 6728(Then)s 7266(all)s 7549(object)s
+8182(breaking,)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 34 35
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4288 13844(-)m 4416(34)s 4710(-)s 0 13253(including)m 957(paragraph)s
+1970(breaking,)s 2914(could)s 3504(be)s 3786(replaced)s 4653(by)s
+4947(g)s 1(alle)k 3(y)k 5581(component)s 6705(promotion)s
+7759(lik)s 2(e)k 8171(this:)s 220 fnt35 480 12752(def @P)m 8(ar)k 2(ag)k 2(r)k 2(aph r)k -3(ight x)k
+480 12464({)m 480 12176(    def @LinePlace { @Galle)m 4(y })k 480 11600(    def @LineList)m 480 11312(    {)m
+480 11024(        @HExpand @LinePlace)m 480 10736(        //1vx  @LineList)m 480 10448(    })m 480 9872(    def @P)m 8(ar hor)k -3(iz)k 3(ontally into { @LinePlace&&preceding })k
+480 9584(        r)m -3(ight x)k 480 9296(    { x })m 480 8720(    @LineList  //  @P)m 8(ar { 0.2i @Wide {}  &0i  x  &1r)k -8(t })k
+480 8432(})m 240 fnt82 0 7938(The)m 220 fnt35 431 7935(@HExpand)m
+240 fnt82 1607 7938(operator)m 9(,)k 2504(which)s 3149(is)s
+3362(a)s 3531(primiti)s 6(v)k 3(e)k 4456(of)s
+4730(Basser)s 5430(Lout,)s 5992(horizontally)s 7204(e)s 3(xpands)k
+8040(the)s 8391(g)s 1(aps)k 8883(in)s 0 7650(its)m
+290(right)s 816(parameter)s 1844(until)s 2352(the)s 2715(result)s
+3319(\207lls)s 3743(the)s 4105(a)s 4(v)k 6(ailable)k
+5028(space,)s 5681(thus)s 6145(implementing)s 7541(line)s 7970(adjustment,)s
+0 7362(e)m 3(xcept)k 689(when)s 1274(the)s 1631(parameter)s
+2654(contains)s 3511(tab)s 4(ulation)k 4529(g)s 1(aps)k
+5027(lik)s 2(e)k 220 fnt35 5447 7359(&1r)m -8(t)k
+240 fnt82 5853 7362(,)m 5969(which)s 6620(cause)s 7216(the)s
+7573(parameter)s 8596(to)s 8844(be)s 0 7074(already)m 757(e)s 3(xpanded.)k
+1836(The)s 2264(result)s 2854(of)s 220 fnt35 480 6573(@P)m 8(ar)k 2(ag)k 2(r)k 2(aph { A shor)k -8(t par)k 2(ag)k 2(r)k 2(aph of te)k 6(xt.)k 13( })k
+240 fnt82 0 6074(w)m 2(ould)k 655(then)s 1124(be)s
+1406(something)s 2456(lik)s 2(e)k 768 5571(A)m 1073(short)s
+1687(paragraph)s 480 5283(of)m 751(te)s 3(xt.)k 0 4830(depending)m
+1061(on)s 1368(the)s 1726(a)s 4(v)k 6(ailable)k
+2645(horizontal)s 3679(space.)s 4384(An)s 4744(unlimited)s 5729(range)s
+6326(of)s 6607(paragraph)s 7630(breaking)s 8531(styles)s 0 4542(could)m
+590(be)s 872(de\207ned,)s 1684(including)s 2641(ragged)s 3350(right,)s
+3908(ragged)s 4617(left,)s 5041(break-and-center)s 9(,)k 6757(and)s
+7161(so)s 7427(on.)s 480 4168(In)m 765(Basser)s 1492(Lout,)s
+2081(indented)s 2992(paragraphs)s 4122(are)s 4499(produced)s 5477(by)s
+5801(preceding)s 6827(them)s 7394(with)s 7906(a)s 8102(horizontal)s
+0 3880(concatenation)m 1380(operator)s 9(,)k 2269(for)s 2602(e)s 3(xample)k
+220 fnt35 3459 3877(|0.5i)m 240 fnt82 3855 3880(.)m 4014(This)s
+4485(has)s 4849(the)s 5192(unfortunate)s 6345(ef)s 6(fect)k
+6935(of)s 7201(making)s 7967(an)s 8244(indented)s 0 3592(paragraph)m
+1007(into)s 1426(a)s 1586(single)s 2207(component)s 3325(of)s
+3590(the)s 3932(enclosing)s 4895(g)s 1(alle)k 3(y)k 15(,)k
+5561(so)s 5821(that)s 6233(it)s 6419(will)s 6839(al)s 2(w)k 2(ays)k
+7544(be)s 7820(k)s 2(ept)k 8283(together)s 0 3304(on)m
+297(one)s 699(page.)s 1315(Horizontal)s 2392(g)s 1(alle)k 3(ys)k
+3116(solv)s 3(e)k 3674(this)s 4070(problem)s 4927(with)s
+5409(a)s 5575(simple)s 6268(change)s 7002(to)s 220 fnt35
+7241 3301(@LineList)m 240 fnt82 8215 3304(:)m 220 fnt35 480 2803(def @LineList)m
+480 2515({)m 480 2227(    |0.5i  @HExpand @LinePlace)m 480 1939(    //1vx  @LineList)m 480 1651(})m 240 fnt82
+0 1157(sho)m 6(wing)k 860(the)s 1210(\210e)s 3(xibility)k
+2192(that)s 2611(comes)s 3275(from)s 3801(bringing)s 4666(the)s
+5016(full)s 5404(po)s 6(wer)k 6057(of)s 6330(the)s
+6680(Lout)s 7193(language)s 8115(to)s 8356(bear)s 8829(on)s
+0 869(paragraph)m 1013(layout.)s 1775(It)s 1980(is)s 2190(easy)s
+2669(to)s 2908(mak)s 2(e)k 3480(pro)s 3(vision)k
+4438(for)s 4776(a)s 4942(tag)s 5287(on)s 5584(the)s
+5932(\207rst)s 6363(line.)s 480 495(Although)m 1451(Basser)s 2158(Lout)s
+2679(permits)s 3456(recepti)s 6(v)k 3(e)k 4387(symbols)s
+5246(within)s 5923(paragraphs,)s 7089(the)s 3(y)k 7561(are)s
+7918(of)s 8198(little)s 8700(use,)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 35 36
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Helvetica
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4292 13841(-)m 4420(35)s 4706(-)s 0 13250(because)m 835(their)s
+1355(a)s 4(v)k 6(ailable)k 2286(width)s 2911(is)s
+3144(calculated)s 4193(after)s 4711(paragraph)s 5747(breaking,)s 6714(and)s
+7141(the)s 7512(incoming)s 8492(g)s 1(alle)k 3(y)k
+0 12962(cannot)m 736(spread)s 1456(o)s 3(v)k 3(er)k
+1973(more)s 2558(than)s 3065(one)s 3505(line.)s 4066(W)s 9(ith)k
+4630(horizontal)s 5692(g)s 1(alle)k 3(ys,)k 6510(such)s
+7044(symbols)s 7931(w)s 2(ould)k 8625(ha)s 4(v)k 3(e)k
+0 12674(in\207nite)m 733(a)s 4(v)k 6(ailable)k 1641(width,)s
+2293(and)s 2697(we)s 3032(could)s 3622(easily)s 4233(produce)s
+5060(a)s 5226(\207lled)s 5775(paragraph)s 6788(of)s 7059(footnotes)s
+8000(lik)s 2(e)k 8412(this:)s 200 fnt82 480 12199(1)m
+240 fnt82 559 12104(See)m 987(Jones)s 1597(and)s 2028(Saunders)s
+2983(\(1982\).)s 200 fnt82 3932 12199(2)m 240 fnt82 4027 12104(Or)m
+4366(so)s 4659(Jacobsen)s 480 11804(\(1973\))m 1167(asserts.)s 200 fnt82
+2087 11899(3)m 240 fnt83 2174 11806(ibid)m 240 fnt82 2552 11804(,)m
+2659(p.)s 2883(327.)s 0 11301(based)m 603(on)s 900(an)s
+1183(in\207nite)s 1916(horizontal)s 2940(sequence)s 3873(of)s 220 fnt35
+4144 11298(@F)m 6(ootPlace)k 240 fnt82 5400 11301(symbols)m 6249(inside)s
+6876(a)s 7042(horizontal)s 8066(g)s 1(alle)k 3(y)k 15(.)k
+480 10927(When)m 1133(body)s 1692(te)s 3(xt)k 2132(is)s
+2367(placed)s 3074(on)s 3395(pages,)s 4072(the)s 4445(length)s
+5125(of)s 5421(each)s 5940(column)s 6740(v)s 6(aries)k
+7380(depending)s 8456(on)s 8778(the)s 0 10639(a)m 4(v)k 6(ailable)k
+914(v)s 3(ertical)k 1687(space.)s 2389(Horizontal)s 3472(g)s 1(alle)k 3(ys)k
+4203(could)s 4799(analogously)s 6017(produce)s 6850(lines)s 7359(of)s
+7636(v)s 6(arying)k 8421(length,)s 0 10351(and)m 404(so)s
+670(could)s 1260(\207ll)s 1580(non-rectangular)s 3153(shapes.)s 480 9977(An)m
+835(important)s 1829(theoretical)s 2896(bene\207t)s 3612(of)s 3888(horizontal)s
+4918(g)s 1(alle)k 3(ys)k 5647(is)s 5862(that)s
+6285(the)s 3(y)k 6753(w)s 2(ould)k 7413(permit)s
+8102(horizontal)s 0 9689(and)m 403(v)s 3(ertical)k 1168(to)s
+1405(be)s 1685(treated)s 2390(in)s 2631(a)s 2795(perfectly)s
+3695(symmetrical)s 4928(w)s 2(ay)k 15(,)k 5415(whereas)s
+6247(at)s 6477(present)s 7225(paragraph)s 8236(breaking)s 0 9401(is)m
+243(horizontal)s 1300(only)s 15(,)k 1851(and)s 2288(g)s 1(alle)k 3(y)k
+2955(breaking)s 3878(is)s 4121(v)s 3(ertical)k 4921(only)s 15(.)k
+5529(This)s 6038(must)s 6596(simplify)s 7479(the)s 7860(treatment)s
+8855(of)s 0 9113(non-European)m 1432(languages)s 2459(which)s 3121(\207ll)s
+3460(in)s 3722(unusual)s 4542(directions,)s 5610(although)s 6525(it)s
+6736(is)s 6965(not)s 7351(itself)s 7918(suf\207cient)s 8887(to)s
+0 8825(implement)m 1082(them.)s 480 8451(There)m 1132(are)s 1519(a)s
+1725(fe)s 6(w)k 2170(minor)s 2841(problems)s 3822(with)s
+4343(horizontal)s 5407(g)s 1(alle)k 3(ys.)k 6284(First,)s
+6867(the)s 7255(syntactic)s 8197(o)s 3(v)k 3(erhead)k
+0 8163(of)m 319(enclosing)s 1337(each)s 1880(paragraph)s 2941(in)s
+220 fnt35 3233 8160(@P)m 8(ar)k 2(ag)k 2(r)k 2(aph { ...)k 13( })k
+240 fnt82 5064 8163(or)m 5371(whate)s 6(v)k 3(er)k
+6346(is)s 6604(unacceptable.)s 8065(Permitting)s 0 7875(user)m 4(-de\207ned)k
+1234(operators)s 2172(to)s 2409(ha)s 4(v)k 3(e)k
+2908(lo)s 6(wer)k 3504(precedence)s 4633(than)s 5100(the)s
+5446(white)s 6031(space)s 6616(between)s 7468(tw)s 2(o)k
+7876(w)s 2(ords)k 8508(might)s 0 7587(help)m 450(here.)s
+1009(Second,)s 1805(the)s 2137(b)s 4(uilt-in)k 2877(paragraph)s
+3874(break)s 2(er)k 4632(includes)s 5464(h)s 1(yphenation,)k
+6738(and)s 7126(it)s 7302(permits)s 8053(line)s 8451(breaks)s
+0 7299(in)m 246(the)s 598(input)s 1153(to)s 1396(determine)s
+2410(line)s 2828(breaks)s 3506(in)s 3753(the)s 4105(output,)s
+4827(if)s 5048(desired.)s 5905(These)s 6536(features)s 7345(must)s
+7874(someho)s 6(w)k 8844(be)s 0 7011(preserv)m 3(ed.)k
+1081(Finally)s 15(,)k 1841(we)s 2167(ha)s 4(v)k 3(e)k
+2659(e)s 3(xplained)k 3634(ho)s 6(w)k 4086(the)s
+4425(Basser)s 5113(Lout)s 5616(interpreter)s 6659(assigns)s 7392(equal)s
+7956(width)s 8549(to)s 8778(the)s 0 6723(wider)m 607(columns)s
+1473(of)s 1748(tables)s 2359(\(Section)s 3216(2.5\).)s 3763(The)s
+4194(equi)s 6(v)k 6(alent)k 5242(situation)s 6126(in)s
+6372(v)s 3(ertical)k 7143(g)s 1(alle)k 3(ys)k
+7871(occurs)s 8550(when)s 0 6435(tw)m 2(o)k 416(recepti)s 6(v)k 3(e)k
+1345(symbols)s 2201(compete)s 3074(for)s 3419(v)s 3(ertical)k
+4193(space)s 4786(\(e.g.)s 220 fnt35 5262 6432(@T)m 26(e)k 6(xtPlace)k
+240 fnt82 6487 6435(and)m 220 fnt35 6898 6432(@F)m 6(ootSect)k
+240 fnt82 7989 6435(\),)m 8182(and)s 8593(there)s 0 6147(it)m
+187(is)s 392(con)s 9(v)k 3(entional)k 1666(to)s
+1900(grant)s 2446(as)s 2691(much)s 3274(as)s 3519(required)s
+4368(to)s 4602(the)s 4945(\207rst)s 5371(arri)s 6(v)k 6(al.)k
+6140(It)s 6339(is)s 6544(not)s 6905(clear)s 7423(to)s
+7657(the)s 8000(author)s 8665(ho)s 6(w)k 0 5859(these)m
+547(dif)s 6(ferent)k 1422(approaches)s 2549(can)s 2938(be)s
+3220(reconciled.)s 240 fnt84 0 5066(6.)m 291(Cr)s 4(oss)k
+926(r)s 4(efer)k 4(ences)k 240 fnt82 480 4634(Cross)m
+1064(references,)s 2138(such)s 2622(as)s 2859(`see)s 3286(page)s
+3782(57')s 4121(and)s 4512(`see)s 4940(Figure)s 5607(5,)s 16(')k
+5871(are)s 6205(a)s 6358(useful)s 6985(b)s 4(ut)k
+7334(highly)s 7987(error)s 4(-prone)k 0 4346(feature)m 716(of)s
+985(documents.)s 2184(Scribe)s 2848([7])s 3163(introduced)s 4242(a)s
+4406(method)s 5180(of)s 5449(k)s 2(eeping)k 6256(them)s
+6792(up)s 7083(to)s 7320(date)s 7772(automatically)s 0 4058(as)m
+245(the)s 587(document)s 1585(changes:)s 2517(the)s 2859(user)s
+3311(gi)s 6(v)k 3(es)k 3852(each)s 4342(referenced)s
+5401(entity)s 5993(a)s 6153(tag,)s 6547(and)s 6945(operators)s
+7879(are)s 8220(pro)s 3(vided)k 0 3770(that)m 418(return)s
+1045(the)s 1393(page)s 1901(or)s 2160(sequence)s 3093(number)s
+3884(of)s 4155(the)s 4503(entity)s 5101(with)s 5583(a)s
+5749(gi)s 6(v)k 3(en)k 6329(tag.)s 480 3396(A)m
+712(cross)s 1256(reference)s 2201(tak)s 2(es)k 2743(an)s
+3028(object)s 3674(\(such)s 4251(as)s 4503(a)s 4671(page)s
+5181(number\))s 6042(from)s 6568(one)s 6972(point)s 7526(in)s
+7771(the)s 8122(document)s 0 3108(and)m 435(copies)s 1128(it)s
+1351(to)s 1621(another)s 9(,)k 2467(and)s 2902(this)s
+3329(generalization)s 4770(suggests)s 5663(other)s 6245(applications.)s 7595(F)s 3(or)k
+8015(e)s 3(xample,)k 8960(a)s 0 2820(running)m 831(header)s
+1562(is)s 1806(copied)s 2536(from)s 3094(the)s 3475(title)s
+3935(of)s 4240(a)s 4440(nearby)s 5179(chapter)s 9(,)k
+6013(and)s 6451(a)s 6651(reference)s 7628(is)s 7872(copied)s
+8602(from)s 0 2532(a)m 207(bibliographic)s 1576(database.)s 2604(Making)s
+3443(the)s 3832(unity)s 4419(of)s 4731(these)s 5319(applications)s
+6566(manifest)s 7489(is)s 7740(an)s 8065(interesting)s 0 2244(language)m
+920(design)s 1602(problem.)s 240 fnt84 0 1595(6.1.)m 471(The)s
+926(cr)s 4(oss)k 1494(r)s 4(efer)k 4(ence)k
+2496(abstraction)s 240 fnt82 480 1164(In)m 736(de)s 6(v)k 3(eloping)k
+1844(the)s 2192(cross)s 2734(reference)s 3677(abstraction,)s 4832(it)s
+5024(seemed)s 5799(best)s 6244(to)s 6483(be)s 3(gin)k
+7069(with)s 7551(the)s 7899(database)s 8779(ap)s 8998(-)s
+0 876(plication,)m 943(since)s 1490(it)s 1682(is)s 1892(the)s
+2240(simplest.)s 3200(Database)s 4132(relations)s 5005(are)s 5352(naturally)s
+6255(mapped)s 7071(into)s 7496(Lout)s 8008(de\207nitions:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 36 37
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4288 13842(-)m 4416(36)s 4709(-)s 220 fnt35 480 13253(def @Ref)m 6(erence)k
+480 12965(    named @T)m 26(ag {})k 480 12677(    named @A)m 6(uthor {})k 480 12389(    named @Title {})m
+480 12101(    named @Jour)m -5(nal {})k 480 11813({})m 240 fnt82 0 11319(The)m
+434(set)s 766(of)s 1043(all)s 1343(in)s 9(v)k 4(ocations)k
+2490(of)s 220 fnt35 2768 11316(@Ref)m 6(erence)k 240 fnt82
+4055 11319(is)m 4272(a)s 4444(relation)s 5237(whose)s 5911(attrib)s 4(utes)k
+6853(are)s 7206(the)s 7561(parameters,)s 8722(and)s 0 11031(whose)m
+659(tuples)s 1271(are)s 1608(the)s 1946(in)s 9(v)k 4(ocations.)k
+3191(T)s 19(o)k 3481(complete)s 4403(the)s 4741(correspondence,)s
+6339(we)s 6665(need)s 7165(only)s 7635(declare)s 8370(that)s
+8778(the)s 220 fnt35 0 10740(@T)m 26(ag)k 240 fnt82
+623 10743(parameter)m 1637(is)s 1847(special,)s 2617(serving)s 3374(as)s
+3624(the)s 3972(k)s 2(e)k 3(y)k 4367(attrib)s 4(ute.)k
+480 10369(F)m 3(ollo)k 6(wing)k 1508(the)s 1856(database)s
+2735(model,)s 3440(we)s 3775(ne)s 3(xt)k 4244(need)s
+4755(a)s 4921(notation)s 5762(for)s 6100(retrie)s 6(ving)k
+7075(the)s 7423(in)s 9(v)k 4(ocation)k 8477(with)s
+8960(a)s 0 10081(gi)m 6(v)k 3(en)k 580(tag:)s
+220 fnt35 480 9580(@Ref)m 6(erence&&kingston91)k 240 fnt82 0 9081(This)m
+240 fnt83 534 9083(cr)m 10(oss)k 1143(r)s 8(efer)k 8(ence)k
+240 fnt82 2141 9081(is)m 2410(lik)s 2(e)k 2881(an)s
+3223(arro)s 6(w)k 3887(pointing)s 4796(to)s 5094(the)s
+5501(in)s 9(v)k 4(ocation.)k 6721(T)s 19(o)k
+7080(access)s 7800(its)s 8135(attrib)s 4(utes,)k 0 8793(we)m
+335(write)s 220 fnt35 480 8341(@Ref)m 6(erence&&kingston91 @Open { @A)k 6(uthor)k 11(, @Title })k
+240 fnt82 0 7842(The)m 220 fnt35 484 7839(@Open)m 240 fnt82
+1347 7842(operator)m 2260(e)s 6(v)k 6(aluates)k 3245(its)s
+3578(right)s 4146(parameter)s 5217(in)s 5517(an)s 5857(en)s 9(vironment)k
+7174(which)s 7873(includes)s 8778(the)s 0 7554(e)m 3(xported)k
+892(parameters)s 1990(of)s 2261(its)s 2537(left.)s 480 7180(An)m
+829(in)s 9(v)k 4(ocation)k 1882(is)s 2091(chosen)s
+2812(to)s 3050(be)s 3331(a)s 3496(running)s 4293(header)s
+4989(because)s 5801(of)s 6071(its)s 6346(proximity)s 7342(to)s
+7580(the)s 7927(place)s 8486(where)s 0 6892(it)m 223(is)s
+465(used,)s 1043(rather)s 1691(than)s 2192(by)s 2517(its)s
+2825(tag.)s 3313(Such)s 3881(proximity)s 4910(is)s 5151(naturally)s
+6086(e)s 3(xpressed)k 7116(by)s 7442(tw)s 2(o)k
+7884(special)s 8634(tags,)s 220 fnt35 0 6601(preceding)m 240 fnt82
+1049 6604(and)m 220 fnt35 1491 6601(f)m 6(ollo)k 3(wing)k
+240 fnt82 2321 6604(;)m 2471(for)s 2848(e)s 3(xample,)k
+220 fnt35 3800 6601(@Sym&&f)m 6(ollo)k 3(wing)k 240 fnt82
+5682 6604(will)m 6146(point)s 6737(to)s 7014(the)s 7400(closest)s
+8149(follo)s 6(wing)k 0 6316(in)m 9(v)k 4(ocation)k
+1083(of)s 220 fnt35 1383 6313(@Sym)m 240 fnt82 2121 6316(in)m
+2393(the)s 2771(\207nal)s 3280(printed)s 4045(document.)s 5182(This)s
+5688(is)s 5927(much)s 6546(simpler)s 7351(conceptually)s 8657(than)s
+0 6028(reference)m 937(to)s 1169(the)s 1511(internal)s 2288(state)s
+2775(of)s 3039(the)s 3381(document)s 4378(formatter)s 5319(at)s
+5544(a)s 5704(critical)s 6413(moment,)s 7298(the)s 7639(usual)s
+8192(approach)s 0 5740(to)m 239(running)s 1037(headers.)s 480 5366(It)m
+691(turns)s 1227(out)s 1600(that)s 2025(the)s 2380(abo)s 3(v)k 3(e)k
+3009(design)s 3698(solv)s 3(es)k 4350(all)s 4650(the)s
+5005(cross)s 5554(referencing)s 6701(problems)s 7649(encountered)s 8883(in)s
+0 5078(practice)m 825(e)s 3(xcept)k 1521(one,)s 1988(which)s
+2645(may)s 3126(be)s 3422(typi\207ed)s 4226(by)s 4535(the)s
+4897(problem)s 5769(of)s 6054(\207nding)s 6801(the)s 7164(number)s
+7969(of)s 8255(the)s 8618(page)s 0 4790(on)m 303(which)s
+952(the)s 1306(chapter)s 2076(whose)s 2750(tag)s 3102(is)s
+220 fnt35 3318 4787(intro)m 240 fnt82 3804 4790(be)m 3(gins.)k
+4596(T)s 19(w)k 2(o)k 5074(cross)s 5622(referencing)s
+6769(steps)s 7304(are)s 7658(needed,)s 8449(\207rst)s 8887(to)s
+220 fnt35 0 4499(@Chapter&&intro)m 240 fnt82 1714 4502(,)m 1821(then)s
+2290(from)s 2814(there)s 3347(to)s 220 fnt35 3586 4499(@P)m 8(age&&preceding)k
+240 fnt82 5556 4502(,)m 5663(where)s 6303(the)s 6651(page)s
+7159(number)s 7950(is)s 8160(kno)s 6(wn.)k 480 4128(Gi)m 6(v)k 3(en)k
+1113(our)s 1492(success)s 2260(so)s 2526(f)s 2(ar)k 9(,)k
+2886(this)s 3282(last)s 3673(problem)s 4530(pro)s 3(v)k 3(es)k
+5213(to)s 5452(be)s 5734(surprisingly)s 6930(dif\207cult.)s 7850(W)s 19(e)k
+8219(\207rst)s 8650(try)s 220 fnt35 480 3627(@Chapter&&intro @Open {)m 480 3339(    @P)m 8(age&&preceding @Open { @P)k 8(ageNum })k
+480 3051(})m 240 fnt82 0 2557(b)m 4(ut)k 363(this)s
+761(f)s 2(ails)k 1222(because)s 220 fnt35 2037 2554(@P)m 8(age&&preceding)k
+240 fnt82 4069 2557(is)m 4281(e)s 6(v)k 6(aluated)k
+5245(in)s 5490(the)s 5840(present)s 6592(conte)s 3(xt,)k
+7402(not)s 7770(in)s 8015(the)s 8365(conte)s 3(xt)k
+0 2269(of)m 220 fnt35 271 2266(@Chapter&&intro)m 240 fnt82 2045 2269(as)m
+2295(required.)s 3255(So)s 3561(our)s 3940(ne)s 3(xt)k
+4409(attempt)s 5185(is)s 220 fnt35 480 1768(def @Chapter)m 480 1480(    named @P)m 8(ageNum { @P)k 8(age&&preceding @Open { @P)k 8(ageNum } })k
+480 1192(    ...)m 240 fnt82 0 741(with)m 482(the)s 220 fnt35
+830 738(@P)m 8(age&&preceding)k 240 fnt82 2860 741(cross)m 3402(reference)s
+4345(attached)s 5199(to)s 5438(the)s 5786(chapter;)s 6601(we)s
+6936(write)s 220 fnt35 480 240(@Chapter&&intro @Open { @P)m 8(ageNum })k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 37 38
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4291 13844(-)m 4419(37)s 4707(-)s 0 13253(This)m 604(also)s
+1170(f)s 2(ails,)k 1813(because)s 2754(parameters)s 3980(are)s
+4456(e)s 6(v)k 6(aluated)k 5546(after)s 6170(substitution,)s
+7521(so)s 7915(once)s 8552(ag)s 1(ain)k 220 fnt35
+0 12962(@P)m 8(age&&preceding)k 240 fnt82 2015 12965(is)m 2209(e)s 6(v)k 6(aluated)k
+3156(in)s 3383(the)s 3716(wrong)s 4365(conte)s 3(xt.)k
+5215(W)s 19(e)k 5568(could)s 6143(of)s 6398(course)s
+7063(de\207ne)s 7688(a)s 7839(ne)s 6(w)k 8270(operator)s
+0 12677(speci\207cally)m 1142(for)s 1480(this)s 1876(case:)s 220 fnt35
+480 12176(@P)m 8(age&&{ @Preceding @Chapter&&intro })k 240 fnt82 0 11677(or)m 267(some)s
+836(such.)s 1448(This)s 1932(is)s 2151(free)s 2585(of)s
+2864(the)s 3221(anno)s 2(ying)k 4172(conte)s 3(xt-sensiti)k 6(vity)k 15(,)k
+6029(b)s 4(ut)k 6399(it)s 6599(seems)s 7243(quite)s
+7785(comple)s 3(x,)k 8722(and)s 0 11389(the)m 348(e)s 3(xpected)k
+1253(cross)s 1795(reference)s 220 fnt35 2738 11386(@P)m 8(age&&preceding)k
+240 fnt82 4768 11389(does)m 5258(not)s 5624(appear)s 13(.)k
+480 11015(The)m 939(author)s 1642(w)s 2(as)k 2095(lost)s
+2532(in)s 2806(these)s 3385(obscurities)s 4503(for)s 4873(some)s
+5465(time,)s 6028(and)s 6464(ultimately)s 7518(rescued)s 8338(himself)s
+0 10727(by)m 306(looking)s 1103(ahead)s 1731(to)s 1982(the)s
+2342(implementation)s 3912(of)s 4195(the)s 220 fnt35 4555 10724(preceding)m
+240 fnt82 5578 10727(and)m 220 fnt35 5994 10724(f)m 6(ollo)k 3(wing)k
+240 fnt82 6897 10727(tags,)m 7401(to)s 7652(see)s 8025(if)s
+8254(a)s 8433(simple)s 0 10439(e)m 3(xtension)k 971(of)s
+1242(it)s 1434(w)s 2(ould)k 2089(solv)s 3(e)k
+2647(the)s 2995(problem.)s 3956(This)s 4432(led)s 4782(to)s
+5021(the)s 220 fnt35 5369 10436(@T)m 26(agged)k 240 fnt82
+6358 10439(operator:)m 220 fnt35 480 9938(@P)m 8(age&&preceding @T)k 26(agged intro)k
+240 fnt82 0 9439(placed)m 686(at)s 922(the)s 1274(be)s 3(ginning)k
+2286(of)s 2562(the)s 2914(body)s 3452(of)s 3727(the)s
+4079(chapter)s 4847(will)s 5277(attach)s 220 fnt35 5908 9436(intro)m
+240 fnt82 6391 9439(as)m 6645(an)s 6933(e)s 3(xtra)k
+7471(tag)s 7820(to)s 8063(the)s 8416(closest)s 0 9151(preceding)m
+996(in)s 9(v)k 4(ocation)k 2050(of)s 220 fnt35
+2321 9148(@P)m 8(age)k 240 fnt82 3040 9151(,)m 3147(so)s
+3413(that)s 220 fnt35 480 8650(@P)m 8(age&&intro @Open { @P)k 8(ageNum })k
+240 fnt82 0 8151(yields)m 635(the)s 996(desired)s 1758(page)s
+2279(number)s 13(.)k 3174(There)s 3801(is)s 4024(something)s
+5087(lo)s 6(w-le)k 6(v)k 3(el)k 6043(and)s
+6460(ad)s 6757(hoc)s 7170(about)s 7775(the)s 220 fnt35
+8137 8148(@T)m 26(agged)k 240 fnt82 0 7863(operator)m 9(,)k
+894(b)s 4(ut)k 1256(the)s 1604(tw)s 2(o)k
+2014(cross)s 2556(references)s 3587(do)s 3880(appear)s 4577(naturally)s 15(,)k
+5518(and)s 5922(it)s 6114(w)s 2(orks.)k 240 fnt84
+0 7214(6.2.)m 471(Implementation)s 2159(of)s 2431(cr)s 4(oss)k
+2999(r)s 4(efer)k 4(ences)k 240 fnt82 480 6737(Before)m
+1185(an)s 1466(object)s 2109(can)s 2496(be)s 2777(sized)s
+3324(and)s 3727(printed,)s 4509(the)s 4855(v)s 6(alues)k
+5510(of)s 5779(an)s 3(y)k 6175(cross)s 6715(references)s
+7745(within)s 8411(it)s 8601(must)s 0 6449(be)m 279(kno)s 6(wn.)k
+1086(If)s 1312(the)s 3(y)k 1772(refer)s 2277(to)s
+2512(in)s 9(v)k 4(ocations)k 3650(that)s 4064(ha)s 4(v)k 3(e)k
+4561(not)s 4924(yet)s 5272(been)s 5777(read,)s 6292(there)s
+6821(is)s 7027(a)s 7190(problem.)s 8147(Scribe)s 8809([7])s
+0 6161(solv)m 3(es)k 649(it)s 844(by)s 1141(capitalizing)s
+2311(on)s 2611(the)s 2962(f)s 2(act)k 3381(that)s
+3802(documents)s 4893(are)s 5243(formatted)s 6232(repeatedly)s 7284(during)s
+7965(the)s 8317(drafting)s 0 5873(process.)m 868(All)s 1214(tagged)s
+1897(in)s 9(v)k 4(ocations)k 3024(are)s 3358(copied)s
+4040(to)s 4266(an)s 4535(auxiliary)s 5425(\207le)s 5772(during)s
+6437(the)s 6771(\207rst)s 7189(run,)s 7601(and)s 7992(inde)s 3(x)k 3(ed)k
+8788(for)s 0 5585(quick)m 593(retrie)s 6(v)k 6(al)k
+1429(on)s 1725(the)s 2072(second.)s 2901(A)s 3130(ne)s 6(w)k
+3576(auxiliary)s 4478(\207le)s 4839(is)s 5048(written)s 5780(during)s
+6457(the)s 6805(second)s 7527(run,)s 7952(for)s 8289(retrie)s 6(v)k 6(al)k
+0 5297(on)m 301(the)s 654(third,)s 1217(and)s 1625(so)s
+1896(on.)s 2305(Cross)s 2906(references)s 3941(al)s 2(w)k 2(ays)k
+4657(lag)s 5007(one)s 5413(run)s 5794(behind)s 6509(the)s
+6862(rest)s 7270(of)s 7546(the)s 7899(document;)s 8960(a)s
+0 5009(perfect)m 711(cop)s 2(y)k 1217(may)s 1671(be)s
+1942(produced)s 2879(by)s 3161(formatting)s 4210(the)s 4547(same)s
+5082(v)s 3(ersion)k 5828(twice,)s 6440(e)s 3(xcept)k
+7110(in)s 7341(a)s 7495(fe)s 6(w)k 7889(pathological)s
+0 4721(cases)m 555(that)s 973(f)s 2(ail)k 1343(to)s
+1582(con)s 9(v)k 3(er)k 4(ge.)k 480 4347(Cross)m
+1123(referencing)s 2310(in)s 2600(Lout)s 3159(is)s 3416(implemented)s
+4769(on)s 5113(top)s 5519(of)s 5837(a)s 6050(simple)s
+6790(database)s 7716(system.)s 8591(Each)s 0 4059(database)m 879(is)s
+1089(either)s 1692(writable)s 2530(or)s 2790(readable)s 3655(b)s 4(ut)k
+4017(not)s 4383(both)s 4867(at)s 5099(once,)s 5658(and)s
+6062(holds)s 6633(a)s 6799(set)s 7124(of)s 7395(k)s 2(e)k 3(y-v)k 6(alue)k
+8384(entries:)s 0 3771(the)m 348(k)s 2(e)k 3(ys)k
+833(are)s 1180(ASCII)s 1861(strings,)s 2605(and)s 3009(the)s
+3358(v)s 6(alues)k 4014(are)s 4361(Lout)s 4873(objects,)s
+5658(possibly)s 6510(with)s 6992(en)s 9(vironments,)k 8393(written)s
+0 3483(in)m 290(Lout)s 850(source.)s 1685(Operations)s 2833(are)s
+3227(pro)s 3(vided)k 4181(for)s 4566(writing)s 5357(an)s
+5687(entry)s 15(,)k 6318(con)s 9(v)k 3(erting)k
+7429(from)s 8001(writable)s 8887(to)s 0 3195(readable,)m 916(retrie)s 6(v)k 6(al)k
+1753(by)s 2047(k)s 2(e)k 3(y)k 15(,)k
+2480(and)s 2884(sequential)s 3908(retrie)s 6(v)k 6(al)k
+4745(in)s 4988(k)s 2(e)k 3(y)k 5383(order)s 13(.)k
+480 2821(The)m 905(implementation,)s 2509(which)s 3148(is)s 3354(quite)s
+3885(unsophisticated,)s 5477(emplo)s 2(ys)k 6334(one)s 6732(or)s
+6988(more)s 7532(ASCII)s 240 fnt83 8208 2823(database)m 0 2535(\207les)m
+240 fnt82 380 2533(,)m 485(containing)s 1545(the)s 1891(v)s 6(alues,)k
+2600(and)s 3001(one)s 3401(ASCII)s 240 fnt83 4078 2535(inde)m 4(x)k
+4650(\207le)s 240 fnt82 4992 2533(per)m 5354(database,)s 6282(containing)s
+7342(the)s 7688(k)s 2(e)k 3(ys.)k 8283(T)s 19(o)k
+8580(write)s 0 2245(an)m 283(entry)s 15(,)k 866(the)s
+1214(v)s 6(alue)k 1782(is)s 1992(\207rst)s 2423(appended)s
+3399(to)s 3638(a)s 3804(database)s 4683(\207le,)s 5095(then)s
+5564(a)s 5730(line)s 6144(lik)s 2(e)k 220 fnt35
+480 1744(@Chapter&&intro  ch1.ld  57)m 240 fnt82 0 1248(is)m 204(appended)s 1174(to)s
+1406(the)s 1748(inde)s 3(x)k 2326(\207le,)s 2731(gi)s 6(ving)k
+3384(the)s 3725(\207le)s 4080(and)s 4478(of)s 6(fset)k
+5068(where)s 5702(the)s 6043(v)s 6(alue)k 6605(is)s
+6809(stored.)s 7550(T)s 19(o)k 7844(con)s 9(v)k 3(ert)k
+8602(from)s 0 960(writable)m 831(to)s 1062(readable,)s 1971(the)s
+2311(inde)s 3(x)k 2887(\207le)s 3241(is)s 3443(sorted.)s
+4183(Then)s 4725(retrie)s 6(v)k 6(al)k 5554(by)s
+5840(k)s 2(e)k 3(y)k 6228(requires)s 7040(a)s
+7198(binary)s 7856(search)s 8515(of)s 8778(the)s 0 672(inde)m 3(x)k
+584(\207le)s 945(and)s 1349(one)s 1751(seek)s 2237(into)s
+2662(a)s 2828(database)s 3707(\207le,)s 4119(and)s 4523(sequential)s
+5547(retrie)s 6(v)k 6(al)k 6384(by)s 6678(k)s 2(e)k 3(y)k
+7073(is)s 7283(tri)s 6(vial.)k 480 298(This)m 945(database)s
+1813(system)s 2526(is)s 2725(used)s 3211(in)s 3443(se)s 6(v)k 3(eral)k
+4154(w)s 2(ays.)k 4797(F)s 3(or)k 5175(an)s
+5447(e)s 3(xternal)k 6257(database,)s 7176(say)s 7538(of)s
+7798(bibliographic)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 38 39
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Times-Italic
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4291 13844(-)m 4419(38)s 4706(-)s 0 13253(references,)m 1093(the)s
+1447(user)s 1912(creates)s 2631(the)s 2985(database)s 3871(\207le)s
+4238(of)s 4516(v)s 6(alues)k 5178(\(without)s 6054(en)s 9(vironments\),)k
+7540(Lout)s 8058(creates)s 8778(the)s 0 12965(inde)m 3(x)k
+587(\207le)s 951(whene)s 6(v)k 3(er)k 1935(it)s
+2130(cannot)s 2831(\207nd)s 3265(one,)s 3721(and)s 4128(retrie)s 6(v)k 6(als)k
+5057(by)s 5354(k)s 2(e)k 3(y)k 5752(proceed)s
+6570(as)s 6823(usual.)s 7495(Cross)s 8095(references)s 0 12677(with)m
+476(tags)s 906(other)s 1451(than)s 220 fnt35 1913 12674(preceding)m
+240 fnt82 2918 12677(and)m 220 fnt35 3316 12674(f)m 6(ollo)k 3(wing)k
+240 fnt82 4200 12677(are)m 4540(treated)s 5241(as)s 5485(described)s
+6453(abo)s 3(v)k 3(e,)k 7119(by)s 7407(writing)s
+8144(all)s 8430(tagged)s 0 12389(in)m 9(v)k 4(ocations)k
+1131(\(with)s 1681(en)s 9(vironments\))k 3092(to)s 3320(a)s
+3475(single)s 4092(database,)s 5011(which)s 5643(is)s 5842(con)s 9(v)k 3(erted)k
+6820(to)s 7049(readable)s 7903(at)s 8125(the)s 8462(end)s
+8855(of)s 0 12101(the)m 334(run)s 695(for)s 1018(retrie)s 6(v)k 6(als)k
+1930(on)s 2212(the)s 2545(ne)s 3(xt)k 3000(run.)s
+3468(Sorted)s 4135(g)s 1(alle)k 3(ys,)k 4900(such)s
+5382(as)s 5617(inde)s 3(x)k 6186(entries,)s 6915(are)s
+7247(written)s 7965(out)s 8316(inde)s 3(x)k 3(ed)k
+0 11813(by)m 307(tar)s 4(get)k 920(and)s 1337(k)s 2(e)k 3(y)k
+1746(and)s 2163(retrie)s 6(v)k 3(ed)k 3074(sequentially)s
+4297(on)s 4607(the)s 4969(ne)s 3(xt)k 5451(run.)s
+5948(Unsorted)s 6896(g)s 1(alle)k 3(ys)k 7634(with)s
+8130(preceding)s 0 11525(tar)m 4(gets)k 684(which)s 1327(pop)s
+1741(of)s 6(f)k 2086(the)s 2435(top)s 2795(of)s
+3067(the)s 3416(root)s 3863(g)s 1(alle)k 3(y)k
+4498(without)s 5290(\207nding)s 6023(a)s 6190(tar)s 4(get,)k
+6837(such)s 7334(as)s 7585(entries)s 8273(in)s 8518(tables)s
+0 11237(of)m 274(contents,)s 1181(are)s 1532(treated)s 2242(similarly)s 15(,)k
+3186(e)s 3(xcept)k 3870(that)s 4291(the)s 3(y)k
+4758(are)s 5108(inde)s 3(x)k 3(ed)k 5922(by)s
+6219(tar)s 4(get)k 6821(and)s 7229(a)s 7398(sequence)s
+8335(number)s 0 10949(that)m 418(preserv)s 3(es)k 1368(their)s
+1865(relati)s 6(v)k 3(e)k 2627(order)s 3191(during)s
+3869(the)s 4217(sort.)s 480 10575(When)m 1107(Lout)s 1617(processes)s
+2581(a)s 2745(multi-\207le)s 3687(document,)s 4735(one)s 5135(cross)s
+5674(reference)s 6615(database)s 7492(\207le)s 7850(is)s 8058(written)s
+8788(for)s 0 10287(each)m 504(input)s 1065(\207le,)s 1486(b)s 4(ut)k
+1858(the)s 3(y)k 2330(share)s 2899(a)s 3074(common)s
+3979(inde)s 3(x)k 4572(\207le.)s 5050(At)s 5358(end)s
+5772(of)s 6052(run,)s 6487(the)s 6844(ne)s 6(w)k
+7301(inde)s 3(x)k 7894(\207le)s 8264(is)s 8484(sorted)s
+0 9999(and)m 404(mer)s 4(ged)k 1176(with)s 1658(the)s
+2007(old)s 2371(one)s 2774(in)s 3017(such)s 3514(a)s
+3680(w)s 2(ay)k 4132(as)s 4383(to)s 4622(preserv)s 3(e)k
+5485(entries)s 6172(relating)s 6955(to)s 7194(\207les)s 7644(not)s
+8010(read)s 8480(on)s 8778(the)s 0 9711(current)m 737(run.)s
+1221(This)s 1699(pro)s 3(vides)k 2572(some)s 3135(support)s
+3914(for)s 4254(piecemeal)s 5278(formatting,)s 6395(b)s 4(ut)k
+6758(e)s 6(v)k 3(entually)k 7801(the)s 8150(\207les)s
+8601(must)s 0 9423(all)m 293(be)s 575(formatted)s 1561(together)s 13(.)k
+480 9049(When)m 1120(a)s 220 fnt35 1297 9046(preceding)m 240 fnt82
+2319 9049(or)m 220 fnt35 2590 9046(f)m 6(ollo)k 3(wing)k
+240 fnt82 3491 9049(cross)m 4044(reference)s 4998(is)s 5220(found,)s
+5897(it)s 6100(is)s 6321(attached)s 7187(to)s 7437(a)s
+7614(g)s 1(alle)k 3(y)k 8259(inde)s 3(x)k
+8855(of)s 0 8761(type)m 240 fnt83 474 8763(CR)m 9(OSS_PREC)k
+240 fnt82 1973 8761(or)m 240 fnt83 2238 8763(CR)m 9(OSS_FOLL)k
+240 fnt82 3653 8761(,)m 3766(together)s 4615(with)s 5103(an)s
+5392(automatically)s 6752(generated)s 7745(tag)s 8097(composed)s 0 8473(of)m
+258(the)s 593(current)s 1316(\207le)s 1663(name)s 2224(and)s
+2615(a)s 2767(sequence)s 3687(number)s 13(.)k 4556(When)s
+5172(a)s 5324(tagged)s 6007(in)s 9(v)k 4(ocation)k
+7048(is)s 7244(found,)s 7897(it)s 8076(is)s 8272(attached)s
+0 8185(to)m 237(a)s 240 fnt83 401 8187(CR)m 9(OSS_T)k 12(ARG)k
+240 fnt82 1875 8185(inde)m 3(x.)k 2565(These)s 3190(g)s 1(alle)k 3(y)k
+3822(inde)s 3(x)k 3(es)k 4595(are)s 4940(carried)s
+5658(along)s 6241(through)s 7040(the)s 7386(dynamic)s 8261(tree,)s
+8722(and)s 0 7897(e)m 6(v)k 3(entually)k 1049(pop)s
+1470(of)s 6(f)k 1822(the)s 2178(top)s 2545(of)s
+2824(the)s 3180(root)s 3633(g)s 1(alle)k 3(y)k 15(,)k
+4313(at)s 4553(which)s 5203(point)s 5763(it)s 5963(is)s
+6181(easy)s 6668(to)s 6915(determine)s 7934(which)s 8584(cross)s
+0 7609(references)m 1029(refer)s 1536(to)s 1773(which)s 2413(in)s 9(v)k 4(ocations,)k
+3608(since)s 4153(the)s 4499(inde)s 3(x)k 3(es)k
+5273(are)s 5618(no)s 6(w)k 6077(in)s 6318(\207nal)s
+6796(printed)s 7529(document)s 8531(order)s 13(.)k 0 7321(Each)m
+541(referenced)s 1613(in)s 9(v)k 4(ocation)k 2674(is)s
+2891(then)s 3367(written)s 4107(to)s 4353(the)s 4708(cross)s
+5257(reference)s 6207(database,)s 7144(multiply)s 8015(inde)s 3(x)k 3(ed)k
+8832(by)s 0 7033(the)m 344(generated)s 1327(tags)s 1758(of)s
+2025(the)s 2369(associated)s 3404(cross)s 3942(references.)s 5082(On)s
+5427(the)s 5771(ne)s 3(xt)k 6236(run,)s 6657(when)s
+7229(the)s 7573(same)s 220 fnt35 8115 7030(preceding)m 240 fnt82
+0 6745(and)m 220 fnt35 408 6742(f)m 6(ollo)k 3(wing)k
+240 fnt82 1302 6745(cross)m 1848(references)s 2883(are)s 3234(found,)s
+3904(chances)s 4716(are)s 5067(good)s 5609(that)s 6031(the)s
+6383(same)s 6934(tags)s 7374(will)s 7804(be)s 8090(generated,)s
+0 6457(and)m 404(the)s 752(appropriate)s 1896(v)s 6(alues)k
+2552(can)s 2941(be)s 3223(retrie)s 6(v)k 3(ed)k
+4120(from)s 4644(the)s 4992(database)s 5871(immediately)s 15(.)k
+480 6083(This)m 982(approach)s 1942(w)s 2(as)k 2389(the)s
+2763(genesis)s 3544(of)s 3842(the)s 220 fnt35 4216 6080(@T)m 26(agged)k
+240 fnt82 5231 6083(operator)m 9(,)k 6151(whose)s 6845(implementation)s
+8428(is)s 8665(no)s 6(w)k 0 5795(immediate:)m 1106(for)s
+1436(each)s 220 fnt35 1923 5792(@T)m 26(agged)k 240 fnt82
+2903 5795(operator)m 3751(we)s 4078(produce)s 4897(one)s 240 fnt83
+5290 5797(CR)m 9(OSS_PREC)k 240 fnt82 6775 5795(or)m 240 fnt83
+7026 5797(CR)m 9(OSS_FOLL)k 240 fnt82 8492 5795(g)m 1(alle)k 3(y)k
+0 5507(inde)m 3(x,)k 645(replacing)s 1596(the)s 1953(generated)s
+2949(tag)s 3304(with)s 3795(the)s 4152(right)s 4672(parameter)s
+5696(of)s 5976(the)s 220 fnt35 6333 5504(@T)m 26(agged)k
+240 fnt82 7331 5507(operator)m 13(.)k 8288(Nothing)s 0 5219(more)m
+547(is)s 757(required.)s 240 fnt84 0 4426(7.)m 291(Conclusion)s
+240 fnt82 480 3994(Since)m 1054(its)s 1316(public)s 1953(release)s
+2657(in)s 2886(October)s 3702(1991,)s 4275(the)s 4609(Basser)s
+5292(Lout)s 5790(interpreter)s 6829(has)s 7185(been)s 7680(ported)s
+8335(without)s 0 3706(incident)m 819(to)s 1047(a)s 1202(wide)s
+1712(v)s 6(ariety)k 2412(of)s 2672(Unix)s 3195(systems)s
+3992(and)s 4385(hardw)s 2(are.)k 5425(It)s 5619(w)s 2(as)k
+6029(tested)s 6633(e)s 3(xtensi)k 6(v)k 3(ely)k
+7753(before)s 8408(release)s 0 3418(on)m 293(its)s 565(o)s 6(wn)k
+1025(documentation,)s 2549(and)s 2949(the)s 3293(fe)s 6(w)k
+3695(minor)s 4321(b)s 4(ugs)k 4817(which)s 5455(ha)s 4(v)k 3(e)k
+5952(emer)s 4(ged)k 6824(since)s 7367(then)s 7832(ha)s 4(v)k 3(e)k
+8329(all)s 8617(been)s 0 3130(\207x)m 3(ed)k 534(in)s
+777(the)s 1125(second)s 1848(release,)s 2617(scheduled)s 3632(to)s
+3871(appear)s 4568(in)s 4811(mid-1992.)s 480 2756(Se)m 6(v)k 3(en)k
+1105(substantial)s 2173(packages)s 3093(of)s 3355(de\207nitions)s 4407(are)s
+4746(distrib)s 4(uted)k 5813(with)s 6286(Basser)s 6975(Lout.)s
+7582(The)s 8001(Document)s 8998(-)s 0 2468(Layout)m 748(package,)s
+1649(and)s 2063(its)s 2349(v)s 6(ariants)k 3160(ReportLayout)s
+4560(and)s 4974(BookLayout,)s 6289(pro)s 3(vide)k 7083(the)s
+7441(standard)s 8320(features)s 0 2180(that)m 411(all)s 696(documents)s
+1776(require:)s 2610(pages,)s 3254(columns,)s 4165(paragraphs,)s 5313(headings,)s
+6263(footnotes,)s 7252(\210oating)s 8028(\207gures)s 8722(and)s 0 1892(tables,)m
+683(chapters)s 1550(and)s 1973(sections,)s 2870(displays)s 3724(and)s
+4148(lists,)s 4658(access)s 5339(to)s 5597(bibliographic)s 6945(databases,)s
+7987(cross)s 8549(refer)s 8998(-)s 0 1604(ences,)m 623(and)s
+1012(so)s 1263(on)s 1545([11].)s 2092(The)s 2505(BookLayout)s
+3748(package)s 4572(has)s 4927(e)s 3(xtra)k 5446(features)s
+6237(needed)s 6958(by)s 7237(books,)s 7902(including)s 8843(an)s
+0 1316(automatically)m 1355(generated)s 2343(table)s 2864(of)s 3136(contents,)s
+4041(Roman)s 4791(page)s 5300(numbers)s 6176(for)s 6515(the)s
+6864(pref)s 2(atory)k 7792(material,)s 8682(run)s 8998(-)s
+0 1028(ning)m 468(page)s 965(headers,)s 1790(odd)s 2197(and)s
+2589(e)s 6(v)k 3(en)k 3078(page)s 3574(layouts,)s
+4361(and)s 4754(a)s 4908(sorted)s 5539(inde)s 3(x.)k
+6220(The)s 6637(Eq)s 6949(package)s 7778(formats)s 8546(equa)s
+8998(-)s 0 740(tions,)m 572(and)s 976(P)s 3(as)k
+1356(formats)s 2136(P)s 3(ascal)k 2798(programs)s 3752([10];)s
+4262(T)s 19(ab)k 4668(formats)s 5448(tables)s 6056([12];)s
+6566(and)s 6970(Fig)s 7342(dra)s 3(ws)k 7961(\207gures)s
+8663([6].)s 480 366(The)m 899(non-e)s 3(xpert)k 1983(user)s
+2431(who)s 2888(uses)s 3341(these)s 3879(packages)s 4797(percei)s 6(v)k 3(es)k
+5732(a)s 5889(system)s 6603(of)s 6865(a)s 7021(standard)s
+7880(quite)s 8404(similar)s 0 78(to)m 246(other)s 804(fully)s
+1317(de)s 6(v)k 3(eloped)k 2357(batch)s 2940(formatters,)s
+4034(although)s 4936(the)s 5292(interf)s 2(ace)k 6187(is)s
+6405(considerably)s 7688(more)s 8243(coherent)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 39 40
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+4289 13844(-)m 4417(39)s 4708(-)s 0 13251(than,)m 525(say)s 15(,)k
+942(the)s 1297(trof)s 6(f)k 1792(f)s 2(amily')k 13(s)k
+2630([8].)s 3078(The)s 3512(e)s 3(xpert)k 4173(user)s
+4637(percei)s 6(v)k 3(es)k 5588(a)s 5760(system)s
+6490(which)s 7139(is)s 7355(radically)s 8251(dif)s 6(ferent)k
+0 12963(from)m 547(pre)s 6(vious)k 1440(ones,)s 2009(in)s
+2276(which)s 2941(a)s 3131(great)s 3691(deal)s 4168(can)s
+4580(be)s 4886(achie)s 6(v)k 3(ed)k 5808(v)s 3(ery)k
+6308(quickly)s 15(.)k 7198(T)s 19(o)k 7522(tak)s 2(e)k
+7997(an)s 8304(e)s 3(xtreme)k 0 12675(e)m 3(xample,)k
+936(P)s 3(as)k 1338(w)s 2(as)k 1781(designed,)s
+2761(implemented,)s 4138(tested,)s 4825(and)s 5251(documented)s 6501(in)s
+6766(one)s 7190(afternoon.)s 8292(Eq)s 8639(took)s 0 12387(about)m
+587(a)s 747(week,)s 1353(b)s 4(ut)k 1709(most)s
+2229(of)s 2494(that)s 2906(time)s 3380(w)s 2(as)k
+3796(spent)s 4355(in)s 4592(marshalling)s 5767(the)s 6110(v)s 6(ast)k
+6543(repertoire)s 7520(of)s 7785(mathematical)s 0 12099(symbols,)m 934(and)s
+1367(\207ne-tuning)s 2499(the)s 2876(spacing.)s 3800(Most)s 4381(of)s
+4681(the)s 5059(ef)s 6(fort)k 5671(seems)s 6335(to)s
+6603(go)s 6925(into)s 7379(designing)s 8392(a)s 8588(good)s
+0 11811(interf)m 2(ace;)k 944(most)s 1469(symbols)s 2318(are)s
+2665(implemented)s 3971(in)s 4214(just)s 4619(one)s 5021(or)s
+5280(a)s 5446(fe)s 6(w)k 5852(lines)s 6354(of)s
+6625(Lout.)s 480 11437(A)m 698(group)s 1297(of)s 1556(about)s
+2135(20)s 2418(satis\207ed)s 3246(non-e)s 3(xpert)k 4327(users)s
+4856(has)s 5214(gro)s 6(wn)k 5864(up)s 6145(within)s
+6800(the)s 7136(author')s 13(s)k 7944(department,)s 0 11149(mainly)m
+703(Honours)s 1563(students)s 2383(with)s 2849(no)s 3127(in)s 9(v)k 3(estment)k
+4208(in)s 4436(older)s 4971(systems)s 5764(to)s 5987(hold)s
+6456(them)s 6978(back.)s 7579(Basser)s 8260(Lout)s 8756(has)s
+0 10861(been)m 511(adv)s 3(ertised)k 1550(on)s 1849(the)s
+2199(Internet)s 3003(ne)s 6(ws)k 3542(as)s 3794(a)s 4(v)k 6(ailable)k
+4704(via)s 5058(anon)s 3(ymous)k 240 fnt83 6213 10863(ftp)m
+240 fnt82 6458 10861(,)m 6567(so)s 6835(the)s 7185(e)s 3(xtent)k
+7828(of)s 8101(its)s 8379(outside)s 0 10573(user)m 469(community)s
+1624(is)s 1845(hard)s 2339(to)s 2589(g)s 1(auge.)k
+3335(About)s 4005(50)s 4311(people)s 5016(ha)s 4(v)k 3(e)k
+5528(mailed)s 6247(comments)s 7292(or)s 7562(questions)s 8528(to)s
+8778(the)s 0 10285(author;)m 733(man)s 3(y)k 1327(of)s
+1608(these)s 2166(people)s 2871(ha)s 4(v)k 3(e)k
+3382(ported)s 4062(the)s 4420(program,)s 5348(written)s 6092(small)s
+6674(de\207nitions,)s 7802(and)s 8217(modi\207ed)s 0 9997(the)m 348(standard)s
+1216(packages.)s 480 9623(Future)m 1160(w)s 2(ork)k 1711(could)s
+2301(usefully)s 3125(be)s 3(gin)k 3711(with)s 4194(the)s
+4542(impro)s 3(v)k 3(ements)k 5955(suggested)s 6957(in)s
+7200(this)s 7596(paper:)s 8294(o)s 3(v)k 3(erlap)k
+8998(-)s 0 9335(ping)m 489(spanning)s 1418(columns,)s 2346(better)s
+2960(semantics)s 3964(for)s 4312(a)s 4(v)k 6(ailable)k
+5231(space,)s 5880(and)s 6294(especially)s 7314(horizontal)s 8349(g)s 1(alle)k 3(ys.)k
+0 9047(Support)m 814(for)s 1147(non-)s 1575(European)s 2544(languages)s
+3547(is)s 3752(also)s 4185(needed.)s 5022(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+5977(the)s 6320(main)s 6850(task)s 7291(is)s 7496(the)s
+7839(de)s 6(v)k 3(elopment)k 0 8759(of)m 271(an)s
+553(interacti)s 6(v)k 3(e)k 1607(document)s 2610(editor)s
+3227(based)s 3829(on)s 4126(Lout.)s 4741(A)s 4971(structure)s
+5861(editor)s 6478(similar)s 7199(to)s 7438(Lilac)s 7980([13],)s
+8484(which)s 0 8471(already)m 753(has)s 1119(objects)s 1843(and)s
+2243(user)s 4(-)k 2705(de\207ned)s 3463(symbols,)s 4364(is)s
+4570(en)s 9(visaged;)k 5626(since)s 6168(cross)s 6706(references)s
+7733(are)s 8076(easy)s 8550(when)s 0 8183(the)m 343(whole)s
+979(document)s 1978(is)s 2182(a)s 4(v)k 6(ailable,)k
+3136(the)s 3479(only)s 3954(major)s 4565(ne)s 6(w)k
+5007(problem)s 5859(is)s 6064(the)s 6406(treatment)s 7362(of)s
+7628(g)s 1(alle)k 3(ys,)k 8402(includ)s 8998(-)s
+0 7895(ing)m 359(the)s 707(e)s 3(xpansion)k 1732(and)s
+2136(retraction)s 3107(of)s 3378(recepti)s 6(v)k 3(e)k
+4300(symbols.)s 240 fnt84 0 7146(Note.)m 240 fnt82 657 7147(Since)m
+1253(the)s 1610(abo)s 3(v)k 3(e)k 2240(w)s 2(as)k
+2670(written)s 3412(the)s 3768(author)s 4448(has)s 4827(completed)s
+5889(a)s 6064(re)s 6(vised)k 6815(v)s 3(ersion)k
+7581(of)s 7861(Basser)s 8567(Lout,)s 0 6859(in)m 243(which)s
+885(the)s 1233(problem)s 2090(concerning)s 3206(a)s 4(v)k 6(ailable)k
+4114(space)s 4701(mentioned)s 5769(in)s 6012(Section)s 6786(2.5)s
+7132(has)s 7502(been)s 8011(resolv)s 3(ed.)k 240 fnt84
+0 6110(Ackno)m 2(wledgment.)k 240 fnt82 2027 6111(The)m 2534(author)s
+3283(gratefully)s 4344(ackno)s 6(wledges)k 5824(man)s 3(y)k
+6485(v)s 6(aluable)k 7424(discussions)s 8644(with)s 0 5823(Douglas)m
+862(W)s 22(.)k 1183(Jones,)s 1835(especially)s 2857(during)s
+3548(the)s 3909(de)s 6(v)k 3(elopment)k 5209(of)s
+5493(the)s 5854(g)s 1(alle)k 3(y)k 6501(abstraction;)s
+7674(and)s 8091(also)s 8543(man)s 3(y)k 0 5535(helpful)m
+732(comments)s 1766(on)s 2063(presentation)s 3288(by)s 3582(the)s
+3930(anon)s 3(ymous)k 5083(referee.)s 240 fnt84 0 4742(Refer)m 4(ences)k
+240 fnt82 0 4288(1.)m 480(Kingston,)s 1501(Jef)s 6(fre)k 3(y)k
+2244(H..)s 2677(Document)s 3770(F)s 3(ormatting)k 4918(with)s
+5436(Lout)s 5888(.)s 6088(T)s 16(ech.)k 6690(Rep.)s
+7216(408)s 7659(\(1991\))s 8286(,)s 8429(Basser)s 480 4000(Department)m
+1668(of)s 1939(Computer)s 2956(Science,)s 3806(The)s 4234(Uni)s 6(v)k 3(ersity)k
+5288(of)s 5559(Sydne)s 3(y)k 15(,)k 6367(Australia)s
+7242(.)s 0 3497(2.)m 480(Kingston,)s 1492(Jef)s 6(fre)k 3(y)k
+2227(H..)s 2652(A)s 2910(ne)s 6(w)k 3385(approach)s
+4347(to)s 4613(document)s 5645(formatting)s 6646(.)s 6838(T)s 16(ech.)k
+7432(Rep.)s 7950(412)s 8392(\(1991\))s 9019(,)s 480 3209(Basser)m
+1177(Department)s 2365(of)s 2636(Computer)s 3653(Science,)s 4503(The)s
+4931(Uni)s 6(v)k 3(ersity)k 5985(of)s 6256(Sydne)s 3(y)k 15(,)k
+7064(Australia)s 7939(.)s 0 2706(3.)m 480(Kingston,)s 1491(Jef)s 6(fre)k 3(y)k
+2224(H..)s 2647(The)s 3101(Basser)s 3824(Lout)s 4362(Document)s
+5445(F)s 3(ormatter)k 6383(,)s 6516(1991)s 6971(.)s
+7161(Computer)s 8204(program;)s 480 2418(V)m 26(ersion)k 1287(2)s
+1480(publicly)s 2337(a)s 4(v)k 6(ailable)k 3264(in)s
+3526(the)s 240 fnt83 3893 2420(pub)m 240 fnt82 4326 2418(subdirectory)m
+5595(of)s 5885(the)s 6252(home)s 6859(directory)s 7794(of)s
+240 fnt83 8084 2420(ftp)m 240 fnt82 8408 2418(to)m 8667(host)s
+240 fnt83 480 2132(ftp.cs.su.oz.au)m 240 fnt82 1924 2130(with)m 2439(login)s
+3021(name)s 240 fnt83 3628 2132(anonymous)m 240 fnt82 4808 2130(and)m
+5246(no)s 5572(passw)s 2(ord.)k 6671(Distrib)s 4(ution)k
+7912(via)s 8297(email)s 8916(is)s 480 1842(a)m 4(v)k 6(ailable)k
+1388(for)s 1726(non-)s 240 fnt83 2154 1844(ftp)m 240 fnt82
+2459 1842(sites.)m 3047(All)s 3407(enquiries)s 4334(to)s 4573(jef)s 6(f@cs.su.oz.au.)k
+0 1339(4.)m 480(Furuta,)s 1211(Richard,)s 2075(Sco\207eld,)s 2965(Jef)s 6(fre)k 3(y)k 15(,)k
+3710(and)s 4113(Sha)s 3(w)k 15(,)k 4734(Alan.)s
+5363(Document)s 6419(formatting)s 7480(systems:)s 8402(surv)s 3(e)k 3(y)k 15(,)k
+480 1051(concepts,)m 1424(and)s 1828(issues)s 2390(.)s 240 fnt83
+2554 1053(Computing)m 3673(Surve)s 7(ys)k 240 fnt84 4465 1050(14)m
+240 fnt82 4699 1051(,)m 4806(417\211472)s 5700(\(1982\))s 6327(.)s
+0 546(5.)m 480(K)s 6(ernighan,)k 1645(Brian)s 2287(W)s 22(.)k
+2649(and)s 3107(Cherry)s 15(,)k 3917(Lorinda)s 4789(L..)s
+5213(A)s 5497(system)s 6275(for)s 6667(typesetting)s 7824(mathematics)s
+9022(.)s 240 fnt83 480 260(Communications)m 2158(of)s 2439(the)s
+2784(A)s 7(CM)k 240 fnt84 3351 257(18)m 240 fnt82
+3585 258(,)m 3692(182\211193)s 4576(\(1975\))s 5203(.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 40 41
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+4287 13844(-)m 4415(40)s 4710(-)s 0 13252(6.)m 480(Kingston,)s
+1488(Jef)s 6(fre)k 3(y)k 2218(H..)s 2638(Fig)s
+3033(\211)s 3236(a)s 3425(Lout)s 3961(package)s 4824(for)s
+5185(dra)s 3(wing)k 6042(\207gures)s 6684(.)s 6871(T)s 16(ech.)k
+7460(Rep.)s 7973(411)s 8392(\(1991\))s 9019(,)s 480 12964(Basser)m
+1177(Department)s 2365(of)s 2636(Computer)s 3653(Science,)s 4503(The)s
+4931(Uni)s 6(v)k 3(ersity)k 5985(of)s 6256(Sydne)s 3(y)k 15(,)k
+7064(Australia)s 7939(.)s 0 12459(7.)m 480(Reid,)s 1042(Brian)s
+1633(K..)s 2033(A)s 2266(High-)s 2813(Le)s 6(v)k 3(el)k
+3406(Approach)s 4410(to)s 4652(Computer)s 5672(Document)s 6732(Production)s
+7779(.)s 7946(In)s 240 fnt83 8205 12461(Pr)m 10(oceed)k
+240 fnt82 8998 12459(-)m 240 fnt83 480 12173(ings)m 935(of)s
+1217(the)s 1564(7th)s 1926(Symposium)s 3074(on)s 3370(the)s
+3716(Principles)s 4755(of)s 5037(Pr)s 10(o)k 2(gr)k 3(amming)k
+6421(Langua)s 2(g)k 2(es)k 7526(\(POPL\),)s 8376(Las)s
+8779(V)s 26(e)k 240 fnt82 8998 12171(-)m 240 fnt83
+480 11885(gas)m 868(NV)s 240 fnt82 1192 11883(,)m 1299(pages)s
+1895(24\21131)s 2470(,)s 2577(1980)s 3052(.)s 0 11378(8.)m
+480(Joseph)s 1207(F)s 19(.)k 1443(Ossanna.)s 2436(Nrof)s 6(f/T)k 8(rof)k 6(f)k
+3605(User')s 13(s)k 4284(Manual)s 5010(.)s 5193(T)s 16(ech.)k
+5777(Rep.)s 6285(54)s 6597(\(1976\))s 7224(,)s 7349(Bell)s
+7821(Laboratories)s 9019(,)s 480 11090(Murray)m 1251(Hill,)s 1729(NJ)s
+2051(07974)s 2645(.)s 0 10585(9.)m 480(Knuth,)s 1186(Donald)s
+1949(E..)s 240 fnt83 2319 10587(The)m 2731(T)s 2882 10539(E)m
+3033 10587(XBook)m 240 fnt82 3675 10585(.)m 3839(Addison-W)s 19(esle)k 3(y)k
+5419(,)s 5526(1984)s 6000(.)s 0 10082(10.)m 480(Kingston,)s
+1485(Jef)s 6(fre)k 3(y)k 2212(H..)s 2629(Eq)s
+2973(\211)s 3173(a)s 3359(Lout)s 3892(package)s 4752(for)s
+5110(typesetting)s 6232(mathematics)s 7430(.)s 7614(T)s 16(ech.)k
+8200(Rep.)s 8711(410)s 480 9794(\(1991\))m 1107(,)s 1248(Basser)s
+1980(Department)s 3203(of)s 3509(Computer)s 4561(Science,)s 5446(The)s
+5909(Uni)s 6(v)k 3(ersity)k 6998(of)s 7304(Sydne)s 3(y)k 15(,)k
+8147(Australia)s 9022(.)s 480 9506(\(Contains)m 1461(an)s 1744(appendix)s
+2677(describing)s 3726(the)s 4074(P)s 3(as)k 4454(P)s 3(ascal)k
+5116(formatter)s 13(.\))k 0 9003(11.)m 480(Kingston,)s 1478(Jef)s 6(fre)k 3(y)k
+2198(H..)s 2608(A)s 2851(be)s 3(ginners')k 3903(guide)s
+4504(to)s 4756(Lout)s 5208(.)s 5385(T)s 16(ech.)k
+5964(Rep.)s 6467(409)s 6891(\(1991\))s 7518(,)s 7638(Basser)s
+8348(Depart)s 8998(-)s 480 8715(ment)m 1018(of)s 1289(Computer)s
+2306(Science,)s 3156(The)s 3584(Uni)s 6(v)k 3(ersity)k
+4638(of)s 4909(Sydne)s 3(y)k 15(,)k 5717(Australia)s
+6592(.)s 0 8212(12.)m 480(Kingston,)s 1475(Jef)s 6(fre)k 3(y)k
+2193(H..)s 2600(T)s 19(ab)k 3017(\211)s 3207(a)s
+3384(Lout)s 3907(package)s 4757(for)s 5106(formatting)s 6177(tables)s
+6725(.)s 6900(T)s 16(ech.)k 7476(Rep.)s 7977(413)s
+8392(\(1991\))s 9019(,)s 480 7924(Basser)m 1177(Department)s 2365(of)s
+2636(Computer)s 3653(Science,)s 4503(The)s 4931(Uni)s 6(v)k 3(ersity)k
+5985(of)s 6256(Sydne)s 3(y)k 15(,)k 7064(Australia)s
+7939(.)s 0 7421(13.)m 480(Brooks,)s 1279(K)s 6(enneth)k
+2141(P)s 26(..)k 2472(Lilac:)s 3068(a)s 3234(tw)s 2(o-vie)k 6(w)k
+4183(document)s 5187(editor)s 5744(.)s 240 fnt83 5908 7423(IEEE)m
+6490(Computer)s 240 fnt82 7453 7421(,)m 7560(7\21119)s 8091(\(1991\))s
+8718(.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Trailer
+%%DocumentNeededResources: font Helvetica
+%%+ font Symbol
+%%+ font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%DocumentSuppliedResources: procset LoutStartUp
+%%+  procset LoutTabPrependGraphic
+%%+  procset LoutFigPrependGraphic
+%%+  procset LoutBasicSetup
+%%+ encoding vec2
+%%Pages: 41
+%%EOF
diff --git a/doc/design/s1_0 b/doc/design/s1_0
new file mode 100644
index 0000000..ca487ba
--- /dev/null
+++ b/doc/design/s1_0
@@ -0,0 +1,45 @@
+@Section
+    @Title { Introduction }
+@Begin
+@PP
+Lout [1, 2] is a high-level language
+for document formatting, designed and implemented by the author.  The
+implementation, known as Basser Lout, is a fully operational production
+version written in C for the Unix operating system,
+@FootNote { Unix is a trademark of "AT&T" Bell Laboratories. }
+which translates Lout source code into PostScript,
+@FootNote { PostScript is a trademark of Adobe Systems, Incorporated. }
+a device-independent graphics rendering language accepted by many
+high-resolution output devices, including most laser printers.  Basser
+Lout is available free of charge [3].  It includes
+installation instructions, C source, seven standard packages, and complete
+documentation in the form of six technical reports and a manual page.
+@PP
+The Lout project arose out of the author's desire to bring to document
+formatting languages the elegance of expression found in programming
+languages like Algol-60 and Pascal.  This emphasis on expressiveness
+has produced an order of magnitude reduction in the cost of developing
+document formatting applications.  For example, an equation formatting
+application, which may be difficult or impossible to add to other
+systems, can be written in Lout in a few days.
+@PP
+When expert users can implement such applications quickly, non-experts
+benefit.  Although Lout itself provides only a small kernel of carefully
+chosen primitives, packages written in Lout and distributed with Basser
+Lout provide an unprecedented array of advanced features in a form
+accessible to non-expert users.  The features include rotation and scaling,
+fonts, paragraph and page breaking, displays and lists, floating figures
+and tables, footnotes, chapters and sections (automatically numbered),
+running page headers and footers, odd-even page layouts, automatically
+generated tables of contents, sorted indexes and reference lists,
+bibliographic and other databases (including databases of formats for
+printing references), equations, tables, diagrams, formatting of
+Pascal programs, and automatically maintained cross references.
+@PP
+This paper charts the evolution of Lout from conception in mid-1984 to the
+public release of Basser Lout in October 1991.  Lout is organized around
+four key concepts -- objects, definitions, galleys, and cross references --
+and they were developed in the order listed, so this paper will treat each
+in turn, discussing its design, implementation, problems, and
+prospects for further improvement.
+@End @Section
diff --git a/doc/design/s2_0 b/doc/design/s2_0
new file mode 100644
index 0000000..ef4bea7
--- /dev/null
+++ b/doc/design/s2_0
@@ -0,0 +1,14 @@
+@Section
+    @Title { Objects }
+@Begin
+@PP
+The essence of any move to a higher level is the introduction of some
+abstraction which serves to organize the low-level operations,
+resulting in a more succinct expression of their
+common combinations at the cost of some loss of detailed control.  The
+early part of the Lout project was spent in the development of such an
+abstraction for the building blocks of documents, one which could
+explain, not just the simple phenomena of words, lines, and paragraphs,
+but also the alignment of columns in tables, and the complex nested
+structures of equations.
+@BeginSubSections
diff --git a/doc/design/s2_1 b/doc/design/s2_1
new file mode 100644
index 0000000..4ee4c31
--- /dev/null
+++ b/doc/design/s2_1
@@ -0,0 +1,87 @@
+@SubSection
+    @Tag { genesis }
+    @Title { The genesis of the object abstraction }
+@Begin
+@PP
+When one examines previous document formatting systems [4]
+looking for ideas for abstractions, as the author did in 1984, the Eqn
+formatting language [5] stands out like a beacon.  In
+Eqn, a mathematical formula such as 
+@ID @Eq { { x sup 2 + 1 } over 4 }
+is produced by typing
+@ID @Code "{ x sup 2 + 1 } over 4"
+in the input file; @Code sup and @Code over are binary operators, and
+braces are used for grouping.  This is document formatting at a very
+high level, close to the language of mathematics itself, with all
+reference to font changes and spacing suppressed.
+@PP
+Eqn provides a single data type (let us call it the {@I expression}),
+built up recursively in context-free style:  where one expression may appear,
+any expression may appear.  This approach is common in algebra and
+programming languages, where its simplicity and expressiveness have long
+been appreciated; but Eqn was the first language to demonstrate its
+utility in document formatting.
+@PP
+Each expression is treated by Eqn as a rectangle with a
+{@I {horizontal axis}}, used for alignment with adjacent expressions:
+@ID @ShowMarks marks { horizontal } @Eq { { x sup 2 + 1 } over 4 }
+The size and rendering of the expression on the printed page are
+known only to the implementation, never explicitly calculated or
+accessed by the user.  This prohibition is
+crucial to the maintenance of the context-free property in practice.  In
+Lout, for example, equations, figures, tables, and arbitrary objects may
+be mixed together freely.  This would be impossible if size information
+was hidden from the implementation in user calculations.
+@PP
+The object abstraction of Lout is a direct descendant of the Eqn
+expression.  It employs the same context-free recursive style of construction,
+and each object is treated by Lout as a rectangle:
+@ID @Fig {
+@ShowMarks { 1c @Wide ^| 2c @Wide 0.45c @High ^/ 0.35c @High }
+}
+The horizontal axis, called a @I { row mark } in Lout, has a
+vertical analogue called a {@I {column mark}}, creating a valuable
+symmetry between horizontal and vertical.  Multiple column and row marks
+are permitted:
+@ID @OneRow @Fig {
+A:: @Box margin { 0c } paint { grey } { 1.2c @Wide 0.8c @High }
+|1c
+B:: @Box margin { 0c } paint { grey } { 1c @Wide 0.8c @High }
+/0.5c
+C:: @Box margin { 0c } paint { grey } { 0.7c @Wide 0.8c @High }
+|1c
+D:: @Box margin { 0c } paint { grey } { 1.3c @Wide 0.8c @High }
+// @Line linestyle { dashed }
+     from { A@W -- { 0.3 cm 0 } }
+     to   { B@W ++ { 1.6 cm 0 } }
+// @Line linestyle { dashed }
+     from { C@W -- { 0.3 cm 0 } }
+     to   { D@W ++ { 1.6 cm 0 } }
+// @Line linestyle { dashed }
+     from { A@NW ++ { 0 0.3 cm } }
+     to   { C@SW -- { 0 0.3 cm } }
+// @Line linestyle { dashed }
+     from { B@NW ++ { 0.3 cm 0.3 cm } }
+     to   { D@SW ++ { 0.3 cm -0.3 cm } }
+}
+so that objects are able to represent tables.
+@PP
+This abstraction has some limitations, the most obvious being the restriction
+of size calculations to rectangular bounding boxes.  Non-rectangular and
+disconnected shapes arise naturally in figures and in the characters of
+fonts; the extension to them is conceptually straightforward and might
+help to explain some fine points of layout such as kerning.  However,
+there are implementation and language design problems, particularly
+when filling non-rectangular shapes with text, and so the author chose
+to keep to Eqn's rectangles.
+@PP
+A more fundamental limitation of the object abstraction arises from the
+inability of recursive data types to describe cross-linked structures,
+which seem to require some means of naming the multiply referenced
+parts.  Lout is obliged to introduce additional abstractions to cope
+with cross linking:  galleys for inserting text into pages
+(Section {@NumberOf galleys}), cross references (Section {@NumberOf cross}),
+and labelled points in figure drawing [6].  An
+abstraction closer to hypertext might form a more unified basis for
+these features.
+@End @SubSection
diff --git a/doc/design/s2_2 b/doc/design/s2_2
new file mode 100644
index 0000000..f4a3818
--- /dev/null
+++ b/doc/design/s2_2
@@ -0,0 +1,79 @@
+@SubSection
+    @Tag { lexical }
+    @Title { Grammatical and lexical structure }
+@Begin
+@PP
+If objects are to be constructed like mathematical expressions, the
+natural notation is a functional language based on operators, as in
+Eqn.  The grammar of Lout objects is accordingly
+@ID @OneRow @Eq {
+matrix {
+object
+nextcol
+--> above --> above --> above --> above --> above --> above --> above -->
+nextcol
+{ object ``` infixop ``` object }
+labove gap { "1fx" }
+{ prefixop ``` object }
+labove gap { "1fx" }
+{ object ``` postfixop }
+labove gap { "1fx" }
+{ noparsop }
+labove gap { "1fx" }
+{ literalword }
+labove gap { "1fx" }
+{ @Code "{" ``` object ``` @Code "}" }
+labove gap { "1fx" }
+{ object ``` object }
+labove gap { "1fx" }
+}
+}
+where {@Eq {infixop}}, {@Eq {prefixop}}, {@Eq {postfixop}}, and
+{@Eq {noparsop}} are identifiers naming operators which take 0, 1
+or 2 parameters, as shown, and @Eq {literalword} is a sequence of
+non-space characters, or an arbitrary sequence of characters
+enclosed in double quotes.  Ambiguities are resolved by precedence
+and associativity.
+@PP
+The last production allows a meaning for expressions such as
+{@Code "{}"}, in which an object is missing.  The value of this
+@I {empty object} is a rectangle of size 0 by 0, with one column
+mark and one row mark, that prints as nothing.
+@PP
+The second-last production generates sequences of arbitrary objects
+separated by white space, called {@I paragraphs}.  Ignoring
+paragraph breaking for now, the natural meaning is that the two
+objects should appear side by side, and Lout's parser accordingly
+interpolates an infix horizontal concatenation operator (see below)
+between them.  This operator is associative, so the grammatical
+ambiguity does no harm.  However, the Algol-60 rule that white space
+should be significant only as a separator is necessarily broken by
+Lout in just this one place.
+@PP
+Algol-like languages distinguish literal strings from identifiers by
+enclosing them in quotes, but literals are far too frequent in document
+formatting for this to be viable.  The conventional solution is to
+begin identifiers with a special character, and Lout follows Scribe
+[7] in using "`@'" rather than the "`\\'" of troff
+[8] and @TeX [9].
+@PP
+However, Lout takes the unusual step of making an initial "`@'"
+optional.  The designers of Eqn apparently considered such
+characters disfiguring in fine-grained input like equations, and
+this author agrees.  The implementation is straightforward:  "`@'" is
+classed as just another letter, and every word is searched for in
+the symbol table.  If it is found, it is an identifier, otherwise it
+is a literal.  A warning message is printed when a literal beginning
+with "`@'" is found, since it is probably a mis-spelt identifier.  No
+such safety net is possible for identifiers without "`@'".
+@PP
+Equation formatting also demands symbols made from punctuation
+characters, such as @Code "+" and {@Code "<="}.  It is traditional to
+allow such symbols to be juxtaposed, which means that the input
+@ID @Code "<=++"
+for example must be interpreted within the lexical analyser by searching
+the symbol table for its prefixes in the order {@Code "<=++"},
+{@Code "<=+"}, {@Code "<="}.  Although this takes quadratic time, in
+practice such sequences are too short to make a more sophisticated
+linear method like tries worthwhile.
+@End @SubSection
diff --git a/doc/design/s2_3 b/doc/design/s2_3
new file mode 100644
index 0000000..341ea74
--- /dev/null
+++ b/doc/design/s2_3
@@ -0,0 +1,326 @@
+@SubSection
+    @Tag { objects }
+    @Title { Basic structural operators }
+@Begin
+@PP
+A programming language may be considered complete when it attains the
+power of a Turing machine, but no such criterion seems relevant to
+document formatting.  Instead, as the language develops and new
+applications are attempted, deficiencies are exposed and the operator set is
+revised to overcome them.
+@PP
+Lout has a repertoire of 23 primitive operators
+(Figure {@NumberOf primitives}),
+
+@Figure
+   @Caption { The 23 primitive operators of Lout, in order of
+increasing precedence. }
+   @Tag { primitives }
+@Tab
+   vmargin { 0.5vx }
+   @Fmta { @Col @I A ! @Col B }
+{
+@Rowa
+   A { object  {@Code "/"}gap  object }
+   B { Vertical concatenation with mark alignment }
+@Rowa
+   A { object  {@Code "//"}gap  object }
+   B { Vertical concatenation with left justification }
+@Rowa
+   A { object  {@Code "|"}gap  object }
+   B { Horizontal concatenation with mark alignment }
+@Rowa
+   A { object  {@Code "||"}gap  object }
+   B { Horizontal concatenation with top-justification }
+@Rowa
+   A { object  {@Code "&"}gap  object }
+   B { Horizontal concatenation within paragraphs }
+@Rowa
+   A { {@Code "@OneCol"}  object }
+   B { Hide all but one column mark of @I object }
+@Rowa
+   A { {@Code "@OneRow"}  object }
+   B { Hide all but one row mark of @I object }
+@Rowa
+   A { font  @Code "@Font"  object }
+   B { Render @I object in nominated font }
+@Rowa
+   A { breakstyle  @Code "@Break"  object}
+   B { Break paragraphs of @I object in nominated style }
+@Rowa
+   A { spacestyle  @Code "@Space"  object }
+   B { Render spaces between words in nominated style }
+@Rowa
+   A { length  {@Code "@Wide"}  object }
+   B { Render @I object to width @I length }
+@Rowa
+   A { length  {@Code "@High"}  object }
+   B { Render @I object to height @I length }
+@Rowa
+   A { {@Code "@HExpand"}  object}
+   B { Expand horizontal gaps to fill available space }
+@Rowa
+   A { {@Code "@VExpand"}  object}
+   B { Expand vertical gaps to fill available space }
+@Rowa
+   A { {@Code "@HScale"}  object }
+   B { Horizontal geometrical scaling to fill available space }
+@Rowa
+   A { {@Code "@VScale"}  object }
+   B { Vertical geometrical scaling to fill available space }
+@Rowa
+   A { angle  {@Code "@Rotate"}  object }
+   B { Rotate @I object by @I angle }
+@Rowa
+   A { PostScript  {@Code "@Graphic"}  object }
+   B { Escape to graphics language }
+@Rowa
+   A { @Code "@Next"  object }
+   B { Add 1 to an object denoting a number }
+@Rowa
+   A { object  @Code "@Case"  alternatives }
+   B { Select from a set of alternative objects }
+@Rowa
+   A { identifier  @Code "&&"  object }
+   B { Cross reference }
+@Rowa
+   A { cross-reference  @Code "@Open"  object }
+   B { Retrieve value from cross reference }
+@Rowa
+   A { cross-reference  @Code "@Tagged"  object}
+   B { Attach cross referencing tag to object }
+}
+
+which has proven adequate for a wide variety of features, including equations,
+tables, and page layout, and so seems to be reasonably complete in this
+pragmatic sense.  In this section we introduce the eight concatenation and
+mark-hiding operators.  To them falls the basic task of assembling complex
+objects from simple ones, and they were the first
+to be designed and implemented.
+@PP
+Many of the operators of Eqn can be viewed as building small tables.  A
+built-up fraction, for example, has one column and three rows
+(numerator, line, and denominator).  Numerous investigations of this
+kind convinced the author that operators capable of assembling the rows
+and columns of tables would suffice for building all kinds of objects.
+@PP
+The simplest objects are empty objects and literal words like
+{@Code metempsychosis}, which have one column mark and one row mark:
+@ID {
+@ShowMarks metempsychosis
+}
+To place two arbitrary objects side by side, we use the infix
+operator {@Code "|"}, denoting horizontal concatenation.  For
+example,
+@ID {
+@Code "USA  |0.2i  Australia"
+}
+produces the object
+@ID {
+@ShowMarks USA |0.2i @ShowMarks Australia
+}
+The row marks are merged into one, fixing the vertical position of
+the objects relative to each other; their horizontal separation is
+determined by the @I gap attached to the operator, in this case 0.2
+inches.  We think of the gap as part of the operator, although
+strictly it is a third parameter.  It may be omitted, defaulting to
+{@Code "0i"}.
+@PP
+@I {Vertical concatenation} & , denoted by the infix operator {@Code "/"},
+is the same apart from the change of direction:
+@ID {
+@Code "Australia  /0.1i  USA"
+}
+produces the object
+@ID {
+@ShowMarks Australia /0.1i
+@ShowMarks USA
+}
+with column marks merged and a 0.1 inch gap.
+@PP
+Consider now what happens when horizontal and vertical are combined:
+@ID @OneRow @Code {
+             |1m  "{"  USA         |1m  "|0.2i" |1m   Australia  "}"
+/1vx "/0.1i" |    "{"  Washington  |    "|"     |     Canberra  "}"
+}
+The two parameters of @Code "/" now have two column marks each, and
+they will be merged with the corresponding marks in the other
+parameter, yielding the object
+
+@ID @OneRow {
+  @BackEnd @Case {
+    PostScript @Yield {
+      @ShowMarks USA &
+      { 0 ymark moveto xsize 10 pt add ymark lineto [ 3 pt ] 0 setdash stroke }
+      @Graphic {1c @Wide }
+      |0.2i @ShowMarks Australia
+/0.1i @ShowMarks Washington  |     @ShowMarks Canberra
+    }
+    PDF @Yield {
+      @ShowMarks USA &
+      { [ __mul(3, __pt) ] 0 d 0 __ymark m __add(__xsize, __mul(10, __pt)) __ymark l S }
+      @Graphic {1c @Wide }
+      |0.2i @ShowMarks Australia
+/0.1i @ShowMarks Washington  |     @ShowMarks Canberra
+    }
+  }
+}
+The @Code "0.2i" gap separates columns, not individual items in
+columns, so a gap attached to the second @Code "|" would serve no
+purpose; any such gap is ignored.  If the number of marks to be merged
+differs, empty columns are added at the right to equalize the number.  The
+four marks protruding from the result are all available for merging
+with neighbouring marks by other concatenation operators.  The precedence
+of @Code "|" is higher than the precedence of {@Code "/"}, so the braces
+could be omitted.
+@PP
+When lines of text are concatenated, it is conventional to measure
+their separation from baseline to baseline (mark to mark in Lout),
+rather than from edge to edge as above.  This idea of different
+reference points for measurement evolved over the years into a
+system of six @I {gap modes} (Figure {@NumberOf gapmodes}), expressed
+by appending a letter to the length.  For example, @Code "|0.2i" is
+an abbreviation for {@Code "|0.2ie"}, meaning 0.2 inches measured
+from edge to edge; @Code "|0.3ix"
+produces a 0.3 inch gap measured from mark to mark and widened if
+necessary to prevent overstriking; and @Code "|2.5it" places its right
+parameter 2.5 inches from the current left margin, irrespective of
+the position of the left parameter.  There is also a choice of
+eleven units of measurement (inches, centimetres, multiples of the
+current font size, etc.), the most interesting being
+the @Code r unit:  one @Code r is the column width minus the width of
+the following object, so that @Code "|1rt" produces sufficient space
+to right justify the following object, and @Code "|0.5rt" to center
+it.  These features implement spacings needed in practice rather
+than suggested by theory.  They work with all five concatenation
+operators, horizontal and vertical.
+
+@Figure
+   @Tag { gapmodes }
+   @Caption { The six gap modes (@I length is any length).  Hyphenation
+mode has an extra property not shown here. }
+@Fig {
+{ /2.5vx Edge-to-edge |0.3i   {@Code "|"} &1p {@I length} &1p {@Code e}
+  /4.2vx Hyphenation    |0.3i   {@Code "|"} &1p {@I length} &1p {@Code h}
+  /4.2vx Overstrike     |0.3i   {@Code "|"} &1p {@I length} &1p {@Code o}
+  /4.2vx Mark-to-mark   |0.3i   {@Code "|"} &1p {@I length} &1p {@Code x}
+  /4.2vx Kerning        |0.3i   {@Code "|"} &1p {@I length} &1p {@Code k}
+  /4.2vx Tabulation     |0.3i   {@Code "|"} &1p {@I length} &1p {@Code t}
+}
+||0.5i
+@Box margin { 0c } 6c @Wide 14.5c @High 9p @Font
+{
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 2.2c @Wide 1.4c @High } @Put { @DoubleArrow 1.8c }
+     @At { 2.2c @Wide 1.6c @High } @Put { 1.8c @Wide { &0.5rt @I length } }
+  }
+  //4vx
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 2.2c @Wide 1.4c @High } @Put { @DoubleArrow 1.8c }
+     @At { 2.2c @Wide 1.6c @High } @Put { 1.8c @Wide { &0.5rt @I length } }
+  }
+  //4vx
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 1.2c @Wide 1.5c @High } @Put { @DoubleArrow 3.3c }
+     @At { 1.2c @Wide 1.7c @High } @Put { 3.3c @Wide { &0.5rt @I length } }
+  }
+  //4vx
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 1.2c @Wide 1.5c @High } @Put { @DoubleArrow 3.3c }
+     @At { 1.2c @Wide 1.7c @High }
+	@Put 3.3c @Wide { |0.5rt @Eq { max(length, a+b) } }
+     @At { 1.2c @Wide 0.4c @High } @Put { @DoubleArrow 1.0c }
+     @At { 1.2c @Wide 0.2c @High } @Put { 1.0c @Wide { &0.5rt @I a } }
+     @At { 4c   @Wide 0.4c @High } @Put { @DoubleArrow 0.5c }
+     @At { 4c   @Wide 0.2c @High } @Put { 0.5c @Wide { &0.5rt @I b } }
+  }
+  //4.5vx
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 1.2c @Wide 1.5c @High } @Put { @DoubleArrow 3.3c }
+     @At { 1.2c @Wide 1.7c @High }
+	@Put { 3.3c @Wide { |0.5rt @Eq { max(length, a, b) } } }
+     @At { 1.2c @Wide 0.4c @High } @Put { @DoubleArrow 1.0c }
+     @At { 1.2c @Wide 0.2c @High } @Put { 1.0c @Wide { &0.5rt @I a } }
+     @At { 4c   @Wide 0.4c @High } @Put { @DoubleArrow 0.5c }
+     @At { 4c   @Wide 0.2c @High } @Put { 0.5c @Wide { &0.5rt @I b } }
+  }
+  //4vx
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 0.0c @Wide 1.6c @High } @Put { @DoubleArrow 4.0c }
+     @At { 2.8c @Wide 1.8c @High } @Put { @I length }
+  }
+  //5vx
+  @DoubleArrow 6c
+  //0.1c |0.5rt @I { current bound }
+}
+}
+
+@PP
+When we construct a built-up fraction, the result has three row marks, but
+only the second should be visible outside the object:
+@ID @Eq { @ShowMarks { X over Y } }
+This is a common problem, and accordingly a @Code "@OneRow" operator was
+introduced for hiding all but one of the row marks of its
+parameter.  Normally, the first mark is the survivor, but a later mark can
+be chosen by prefixing @Code "^" to the preceding concatenation operator:
+@ID @Code "@OneRow { X  ^/2p  @HLine  /2p  Y }"
+has the desired result, where {@Code "2p"} is two points and @Code "@HLine"
+is an easy combination of Lout's graphics operators.  A similar operator,
+{@Code "@OneCol"}, hides column marks.
+@PP
+A variant of @Code "/" called @Code "//" is provided which performs
+vertical concatenation but ignores all column marks and simply
+left-justifies its two parameters:
+@ID @OneRow @Code {
+"Heading  //0.1i"
+"A  |0.2i  B  /0.1i"
+"C  |  D"
+}
+has result
+@ID { Heading //0.1i  A  |0.2i  B  /0.1i  C  |  D }
+showing that spanning columns in tables motivate the inclusion of this
+operator.  There is an analogous @Code "||" operator.  The author
+would have preferred to leave out these operators, since they
+complicate the implementation, and it is interesting to examine the
+prospects of doing so.
+@PP
+The @Code "//" operator is formally redundant, because in general
+the expression @Code "x // y" can be replaced by
+@ID @OneRow @Code {
+"@OneCol {  |  x  }   /"
+"@OneCol {  |  y  }"
+}
+for any objects {@Code x} and {@Code y}.  By concatenating an empty
+object at the left of @Code x and hiding all but that empty object's
+column mark, we effectively shift {@Code x}'s column mark to its left
+edge.  The same goes for {@Code y}, so the @Code "/" operator has just
+one column mark to merge, at the extreme left, and its effect is
+indistinguishable from {@Code "//"}.
+@PP
+Unfortunately, if @Code y consists of two rows separated by {@Code "/"},
+as in the example above, both rows must be placed inside the
+{@Code "@OneCol"}, and the table cannot be entered in the simple
+row-by-row manner that non-expert users naturally expect.  Another
+advantage of @Code "//" is that its left parameter can be printed
+before its right parameter is known; this is important when the left
+parameter is an entire page.
+@PP
+The fifth and final concatenation operator, {@Code "&"}, is an explicit
+version of the horizontal concatenation operator interpolated when
+objects are separated by white space.  It is formally identical to
+@Code "|" except for taking higher precedence and being subject to
+replacement by @Code "//1vx" during paragraph breaking
+(Section {@NumberOf style}).
+@End @SubSection
diff --git a/doc/design/s2_4 b/doc/design/s2_4
new file mode 100644
index 0000000..38d25e7
--- /dev/null
+++ b/doc/design/s2_4
@@ -0,0 +1,345 @@
+@SubSection
+    @Tag { objects.impl }
+    @Title { Implementation of objects and concatenation }
+@Begin
+@PP
+In this section we discuss the implementation of objects and concatenation,
+and especially mark alignment.  The first step is to use an operator
+precedence parser to convert input such as
+@ID @Code "a  |0.5i  b  /0.2i  c  |  d"
+into parse trees such as
+@ID @Eq {
+@Fig {
+@Tree {
+@Node @FCircle fraction
+@FirstSub {
+   @Node @FCircle bar
+   @FirstSub { @Node @FCircle a }
+   @NextSub  { @Node @FEllipse 0.5i }
+   @NextSub  { @Node @FCircle b }
+}
+@NextSub { @Node @FEllipse 0.2i }
+@NextSub {
+   @Node @FCircle bar
+   @FirstSub { @Node @FCircle c }
+   @NextSub  { @Node @FCircle   }
+   @NextSub  { @Node @FCircle d }
+}
+}
+}
+}
+Missing objects are replaced by empty objects, and sequences of
+concatenation operators are consolidated:
+@ID @Eq {
+@Fig {
+@Tree {
+@Node @FCircle bar
+@FirstSub { @Node @FCircle a }
+@NextSub { @Node @FEllipse 0.2i }
+@NextSub {
+   @Node @FCircle bar
+   @FirstSub { @Node @FCircle c     }
+   @NextSub  { @Node @FEllipse 0.3i }
+   @NextSub  { @Node @FCircle d     }
+}
+}
+}
+&2m ==> &2m
+@Fig {
+@Tree {
+@Node @FCircle bar
+@FirstSub { @Node @FCircle a     }
+@NextSub  { @Node @FEllipse 0.2i }
+@NextSub  { @Node @FCircle c     }
+@NextSub  { @Node @FEllipse 0.3i }
+@NextSub  { @Node @FCircle d     }
+}
+}
+}
+to make manifest their associativity and reduce the depth of the tree
+for efficiency later.
+@PP
+The required semantic information is the size of each subobject,
+consisting of four integers:  width to left and right of the
+distinguished column mark, and height above and below the distinguished
+row mark.  These numbers are always non-negative in Basser Lout, but
+this restriction is unnecessary and should be dropped.
+@PP
+For the leaves, which are simple words, the numbers are obtained from
+font tables.  For the higher levels we apply recursive rules.  Suppose
+that @Eq { hgap(x, g, y) } returns the desired distance between the
+column marks of objects @Eq { x } and @Eq { y } when they are separated by
+gap @Eq { g }:  @Eq { right(x) + length(g) + left(y) } when the gap mode is
+edge-to-edge, the larger of @Eq { length(g) } and
+@Eq { right(x) + left(y) } when the mode is mark-to-mark, and so on.  Given
+an object
+@ID @Eq {
+X = x sub 1 ````` bar g sub 1 ````` ... ````` { "-2p" @Font "^"}bar g sub i-1
+````` x sub i ````` ... ````` bar g sub n-1 ````` x sub n
+}
+we may calculate its size as follows:
+@ID @Eq {
+left(X) ^= left( x sub 1 ) + hgap( x sub 1 , g sub 1 , x sub 2 )
++ ... + hgap( x sub i-1 , g sub i-1 , x sub i )
+/1.4vx
+right(X) ^= hgap( x sub i , g sub i , x sub i+1 )
++ ... + hgap( x sub n-1 , g sub n-1 , x sub n ) + right( x sub n )
+/1.4vx
+"above"(X) ^= "above"(x sub 1 ) up ... up "above"(x sub n )
+/1.4vx
+"below"(X) ^= "below"(x sub 1 ) up ... up "below"(x sub n )
+}
+where @Eq { non up } returns the larger of its two parameters.  Similar
+formulas are easily derived for the other operators.
+@PP
+For purposes of exposition we will now make the simplifying
+assumptions that all gaps are {@Code "0i"}, all column marks lie at
+the left edge, and all row marks lie at the top edge.  Then the size
+of each object can be expressed by just two numbers, width and
+height, and the four formulas reduce to
+@ID @Eq {
+width( x sub 1 rel bar ... rel bar x sub n ) ^=
+width( x sub 1 ) + ... + width( x sub n )
+/1.4vx
+height( x sub 1 rel bar ... rel bar x sub n ) ^=
+height( x sub 1 ) up ... up height( x sub n )
+}
+The corresponding formulas for vertical concatenation are
+@ID @Eq {
+width( x sub 1 rel "/" ... rel "/" x sub n ) ^=
+width( x sub 1 ) up ... up width( x sub n )
+/1.4vx
+height( x sub 1 rel "/" ... rel "/" x sub n ) ^=
+height( x sub 1 ) + ... + height( x sub n )
+}
+According to these formulas, the height of
+@ID @Eq { @Fig { @Tree {
+@Node @FCircle fraction
+@LeftSub {
+   @Node @FCircle bar
+   @LeftSub  { @Node @FCircle a }
+   @RightSub { @Node @FCircle b }
+}
+@RightSub {
+   @Node @FCircle bar
+   @LeftSub  { @Node @FCircle c }
+   @RightSub { @Node @FCircle d }
+}
+}}}
+is
+@ID @Eq {
+[ height(a) up height(b)] + [ height(c) up height(d)]
+}
+which is correct, but for width they yield
+@ID @Eq {
+[ width(a) + width(b)] up [ width(c) + width(d)]
+}
+which is not, since it does not take the merging of column marks into
+account.  The asymmetry between horizontal and vertical has come
+about because the row entries, such as @Eq {a} and {@Eq {b}}, are
+adjacent in the tree, but the column entries, such as @Eq {a} and
+{@Eq {c}}, are not.  It would be possible to solve this cross-linking
+problem by augmenting the size information stored in each node to
+record the number of marks and the size of each, but the author has
+preferred the following method which makes structural changes to the
+tree instead.
+@PP
+If @Eq { a } and @Eq { c } share a column mark, they each might as well
+have width { @Eq {width(a) up width(c) }}, since all width calculations
+apply to entire columns.  Accordingly, we introduce a new operator,
+@Eq {COL}, defined by
+@ID @Eq { width( x sub 1 bin COL ... bin COL x sub n ) =
+width( x sub 1 ) up ... up width( x sub n )
+}
+and replace both @Eq { a } and @Eq { c } by {@Eq { a bin COL c }}.  To
+prevent @Eq { COL } operators from disturbing height calculations, we
+define a binary operator called @Eq { SPLIT } by
+@ID @Eq { width( x bin SPLIT y) ^= width(x)
+/1.4vx
+height( x bin SPLIT y) ^= height(y) }
+which switches height and width calculations onto different
+subtrees.  Then the transformation
+@ID @Eq {
+@Fig { @Tree {
+   @Node @FCircle a
+}}
+&2m ==> &2m
+@Fig { @Tree {
+   @Node @FEllipse SPLIT
+   @LeftSub {
+      @Node @FEllipse COL
+      @LeftSub  { @Node @FCircle a }
+      @RightSub { @Node @FCircle c }
+   }
+   @RightSub { @Node @FCircle a }
+}}
+}
+# where @Eq { S } denotes a @Eq { SPLIT } node and @Eq { C } denotes a
+# @Eq { COL } node,
+widens @Eq { a } to @Eq {width(a) up width(c) } without affecting its height;
+it is applied to every object that shares its column mark with at least
+one other object.  A similar transformation involving a @Eq { ROW } operator
+deals with shared row marks.  The effect on our little table is to replace
+@ID @Eq { @Fig { @Tree {
+@Node @FCircle fraction
+@LeftSub {
+   @Node @FCircle bar
+   @LeftSub  { @Node @FCircle a }
+   @RightSub { @Node @FCircle b }
+}
+@RightSub {
+   @Node @FCircle bar
+   @LeftSub  { @Node @FCircle c }
+   @RightSub { @Node @FCircle d }
+}
+}}}
+by
+@ID @Eq { @Fig maxlabels { "70" } { @Tree hmargin { "0.1c" } {
+@Node @FCircle fraction
+@FirstSub {
+   @Node @FCircle bar
+   @FirstSub  {
+      @Node @FEllipse SPLIT
+      @FirstSub {
+         @Node @FEllipse COL
+         @FirstSub  { @Node @FCircle a }
+         @NextSub { @Node @FCircle c }
+      }
+      @NextSub {
+         @Node @FEllipse ROW
+         @FirstSub  { @Node @FCircle a }
+         @NextSub { @Node @FCircle b }
+      }
+   }
+   @NextSub {
+      @Node @FEllipse SPLIT
+      @FirstSub {
+         @Node @FEllipse COL
+         @FirstSub  { @Node @FCircle b }
+         @NextSub { @Node @FCircle d }
+      }
+      @NextSub {
+         @Node @FEllipse ROW
+         @FirstSub  { @Node @FCircle a }
+         @NextSub { @Node @FCircle b }
+      }
+   }
+}
+@NextSub {
+   @Node @FCircle bar
+   @FirstSub  {
+      @Node @FEllipse SPLIT
+      @FirstSub {
+         @Node @FEllipse COL
+         @FirstSub  { @Node @FCircle a }
+         @NextSub { @Node @FCircle c }
+      }
+      @NextSub {
+         @Node @FEllipse ROW
+         @FirstSub  { @Node @FCircle c }
+         @NextSub { @Node @FCircle d }
+      }
+   }
+   @NextSub {
+      @Node @FEllipse SPLIT
+      @FirstSub {
+         @Node @FEllipse COL
+         @FirstSub  { @Node @FCircle b }
+         @NextSub { @Node @FCircle d }
+      }
+      @NextSub {
+         @Node @FEllipse ROW
+         @FirstSub  { @Node @FCircle c }
+         @NextSub { @Node @FCircle d }
+      }
+   }
+}
+}}}
+In fact, common subexpressions are identified (trivially) and the result
+is a directed acyclic graph; each affected leaf has two parents, one for
+width and one for height; and each @Eq { COL } or @Eq { ROW } node has
+one parent and one child for each object lying on the corresponding
+mark.  The data structure roughly doubles in size, and this occurs only
+rarely in practice.
+@PP
+This method can cope with any legal input, including
+@ID @OneRow @Code {
+"{  a  //  c  |  d  }  |  {  b  /  e  }"
+"/  {  f  /  i  }  |  {  g  |  h  //  j  }"
+}
+which produces overlapping spanning columns:
+@ID @I @Fig {
+    @FBox margin { 0.2c } width { 1.6c } 1.2f @Font a |
+    @FBox margin { 0.2c } width { 0.6c } 1.2f @Font b |
+//  @FBox margin { 0.2c } width { 0.6c } 1.2f @Font c |
+    @FBox margin { 0.2c } width { 0.6c } 1.2f @Font d |
+    @FBox margin { 0.2c } width { 0.6c } 1.2f @Font e |
+//  @FBox margin { 0.2c } width { 0.6c } 1.2f @Font f |
+    @FBox margin { 0.2c } width { 0.6c } 1.2f @Font g |
+    @FBox margin { 0.2c } width { 0.6c } 1.2f @Font h |
+//  @FBox margin { 0.2c } width { 0.6c } 1.2f @Font i |
+    @FBox margin { 0.2c } width { 1.6c } 1.2f @Font j |
+}
+The boxes have been added to clarify the structure.  The width of this
+object is formally
+@ID @Eq { ((width(a) up (x + y)) + z) up (x + ((y + z) up width(j))) }
+where
+@IL
+@ListItem @Eq { x = width(c) up width(`f`) up width(i) }
+@ListItem @Eq { y = width(d`) up width(g) }
+@ListItem @Eq { z = width(b) up width(e) up width(h) }
+@EL
+It seems clear that @Eq { y } at least must appear twice in any
+expression for the width of this object made out of simple addition
+and maxing operations, showing that an ordinary tree
+structure is insufficient for overlapping spanning columns.  The Basser
+Lout interpreter actually rejects such structures, owing to the author's
+doubts about the implementability of @I Constrained and @I AdjustSize
+(Section {@NumberOf constraints}) on them; but with hindsight this caution
+was unnecessary.
+@PP
+The directed acyclic graph is ordered in the sense that the order of
+the edges entering and leaving each node matters.  The structure is
+highly dynamic, and traversals both with and against the arrows are
+required.  After a few ad-hoc attempts to extend the usual tree
+representation had failed, the author developed a representation based
+on doubly linked lists of records denoting links, whose flexibility more
+than compensated for the somewhat excessive memory consumption.  For example,
+@ID @Eq { @Fig {
+       A:: @FCircle a   |2c                  |2c  B:: @FCircle b
+/1.5c  C:: @FCircle c   |    D:: @FCircle d
+// A @JoinFigures arrow { forward } C
+// A @JoinFigures arrow { forward } D
+// B @JoinFigures arrow { forward } D
+}}
+is represented by
+@CD @Eq { @Fig maxlabels { "300" } {
+A:: @DagBox mid { @BlackDot } base { a } |2c |2c |2c |2c
+B:: @DagBox mid { @BlackDot } base { b }
+/1c L:: @DagBox top { @BlackDot } mid { @BlackDot } base { LK }
+|   M:: @DagBox top { @BlackDot } mid { @BlackDot } base { LK }
+| | N:: @DagBox top { @BlackDot } mid { @BlackDot } base { LK }
+/1c
+C:: @DagBox top { @BlackDot } base { c } | |
+D:: @DagBox top { @BlackDot } base { d }
+// @TVShape nw { A@MID@CTR } ne { A@MID@CTR } sw {L@MID@CTR } se { M@MID@CTR }
+// @TVShape nw { L@TOP@CTR } ne { L@TOP@CTR } sw {C@TOP@CTR } se { C@TOP@CTR }
+// @TVShape nw { M@TOP@CTR } ne { N@TOP@CTR } sw {D@TOP@CTR } se { D@TOP@CTR }
+// @TVShape nw { B@MID@CTR } ne { B@MID@CTR } sw {N@MID@CTR } se { N@MID@CTR }
+}}
+where @Eq { LK } tags a record representing a link.  The first list
+in any node contains all the incoming links, the second contains the
+outgoing ones.  The node serves as the header for both lists.  The
+required operations reduce to simple appends, deletes, and traversals
+of doubly linked lists, all having small constant cost.  There is a
+highly tuned memory allocator, and care is taken to dispose of each node
+when the last incoming link is deleted, so that there is no need for
+garbage collection.
+@PP
+In normal use the number of nodes at higher levels of the dag is small
+in comparison with the leaves and their incoming links, so we may
+estimate the space complexity at about 60 bytes per input word (20 bytes
+per link, 40 per leaf node).  Careful optimization could easily halve
+this, but since memory is reclaimed after printing each page there is
+little need.
+@End @SubSection
diff --git a/doc/design/s2_5 b/doc/design/s2_5
new file mode 100644
index 0000000..87d826b
--- /dev/null
+++ b/doc/design/s2_5
@@ -0,0 +1,90 @@
+@SubSection
+    @Tag { style }
+    @Title { Context-sensitive attributes of objects }
+@Begin
+@PP
+Although we are free to place any object in any context, the context
+must influence the appearance of the object, since otherwise
+@ID @Code "A short paragraph of text."
+could not appear in a variety of fonts, column widths, etc.  This
+influence cannot take the purely static form that block-structured
+languages use to associate values with identifiers, for then an operator
+could not influence the appearance of its parameters; and a state
+variable solution is not compatible with the overall functional design.
+@PP
+The information needed from the context seems quite limited, comprising
+the font family, face, and size to use, the style of paragraph breaking
+required, how much space to substitute between the words of paragraphs,
+and how much horizontal and vertical space is available to receive the
+object.  These four items constitute the so-called `style information'
+of Lout.  As graphics rendering hardware improves, the style information
+will probably grow to include colour and texture information.
+@PP
+The way to deal with fonts at least is very clear:
+@ID @Code "{ Times Slope 12p } @Font { Hello, world }"
+should have result
+@ID { { Times Slope 12p } @Font { Hello, world } }
+Lout also provides @Code "@Break" and @Code "@Space" symbols for
+controlling the paragraph breaking and space styles mentioned
+above.  These work in the same way, returning their right
+parameters in the style of their left.  The implementation is very
+simple:  one merely broadcasts the style information down into the parse
+tree of the right parameter.  A font, for example, is converted to an
+8-bit internal name and stored in each leaf, while a breaking style is
+stored in the root node of each paragraph.
+@PP
+The same language design can be used for available width and height,
+only here the implementation is much more demanding:
+@ID @Code {
+"2i @Wide {"
+"(1)  |0.1i  An example"
+"containing a small"
+"paragraph of filled text."
+"}"
+}
+is guaranteed to be two inches wide:
+@ID {
+2i @Wide {
+(1)  |0.1i  An example
+containing a small
+paragraph of filled text.
+}
+}
+One must calculate that 1.9 inches minus the width of @Code "(1)" is
+available
+to the paragraph, and break it accordingly; Basser Lout does this in two
+stages.  In the first, upward-moving stage, widths are calculated using the
+formulae of Section {@NumberOf objects}, which assume that available
+space is infinite.  If the upward movement reaches a @Eq { WIDE }
+node, corresponding to a @Code "@Wide" operator, and
+the calculated width exceeds that allowed, a second, downward-moving stage
+is initiated which attempts to reduce the width by finding and breaking
+paragraphs.  This second stage is quite routine except at @Code "|" nodes,
+whose children are the columns of a table.  It is necessary to apportion
+the available width (minus inter-column gaps) among the columns.  Basser
+Lout leaves narrow columns unbroken and breaks the remaining columns to
+equal width, using up all of the available space.
+@PP
+The size of an object is not clearly determined when the upward-moving
+size is less than the downward-moving available space, and the object
+contains constructs that depend on available space (e.g. right
+justification).  For example, in
+@ID @Code "2i @Wide { Heading // a |1rt b }"
+it seems natural to assign a width of two inches to the subobject
+@Code "a |1rt b" because of the right justification, but it would be
+equally plausible if the width of @Code Heading was assigned to the
+subobject instead.  The author is conscious of having failed to resolve
+this matter properly; an extra operator for controlling available space
+is probably necessary.
+@PP
+The actual paragraph breaking is just a simple transformation on the
+parse tree; the real issue is how to describe the various styles:  ragged
+right, adjusted, outdented, and so on.  Their diversity suggests that
+they should somehow be defined using more basic features; but then there
+are algorithms for high-quality paragraph breaking, which presumably
+must be built-in.  This dilemma was not clearly grasped by the author in
+1985, and he included a built-in paragraph breaker, with the @Code
+"@Break" operator selecting from a fixed set of styles.  A much better
+solution based on galleys will be given in Section {@NumberOf horizontal},
+but, regrettably, it is not implemented.
+@End @SubSection
diff --git a/doc/design/s2_9 b/doc/design/s2_9
new file mode 100644
index 0000000..648a1b6
--- /dev/null
+++ b/doc/design/s2_9
@@ -0,0 +1,2 @@
+@EndSubSections
+@End @Section
diff --git a/doc/design/s3_0 b/doc/design/s3_0
new file mode 100644
index 0000000..3f42ff5
--- /dev/null
+++ b/doc/design/s3_0
@@ -0,0 +1,10 @@
+@Section
+    @Title { Definitions }
+@Begin
+@PP
+The need to provide a means of packaging useful pieces of code for easy
+repeated use was recognised in the very earliest programming
+languages.  This need is even more acute in document formatting, if that
+is possible, because the majority of users are not programmers and do
+not understand the code they invoke.
+@BeginSubSections
diff --git a/doc/design/s3_1 b/doc/design/s3_1
new file mode 100644
index 0000000..2fb44c6
--- /dev/null
+++ b/doc/design/s3_1
@@ -0,0 +1,76 @@
+@SubSection
+    @Tag { operators }
+    @Title { Operators }
+@Begin
+@PP
+It is evident from the example of Eqn that user-defined operators are
+needed that mimic the primitive ones in taking objects as parameters
+and returning objects as results.  For example, to define a superscript
+operator so that
+@ID @Code "2 sup n"
+appears as {@Eq {2 sup @R n}}, the following operator definition may
+be used:
+@ID @OneRow @Code {
+"def sup"
+"    precedence 50"
+"    associativity right"
+"    left x"
+"    right y"
+"{"
+"    @OneRow {  |  {-2p @Font y}  ^/0.5fk  x  }"
+"}"
+}
+The @Code "sup" operator has precedence 50, is right associative, takes
+two objects as parameters passed on the left and right, and returns the
+object between braces as result.  This object has the structure
+@ID @I +2p @Font {
+| @ShowMarks @Code y / @ShowMarks @Code x
+}
+but with the first row mark hidden by the @Code "@OneRow" operator,
+and @Code y two points smaller than it would otherwise have been.  The
+length @Code "0.5f" specifies half the current font size;  Figure
+{@NumberOf gapmodes} describes the @Code k gap mode.  In the Eq equation
+formatting package [10] the equation as a whole is
+set in italic font, and @Code 2 is an identifier whose body contains
+a font change back to Roman.  The digits @Code 0 to @Code 9 are classed
+as punctuation characters, permitting @Code 234 for example to be
+interpreted as a sequence of three identifiers.
+@PP
+These definitions are easily implemented by a standard symbol table
+and an operator precedence parser.  Algol block structure with the
+usual scope rules was adopted as a matter of course.
+@PP
+Operators are limited to at most two parameters, left and
+right, and the parameters cannot be given default values.  @I Named
+parameters solve both problems:
+@ID @OneRow @Code {
+"def @Preface"
+"    named @Tag {}"
+"    named @Title { Preface }"
+"    right @Body"
+"{"
+"    Bold @Font @Title"
+"    //0.3v  @Body"
+"}"
+}
+The default value appears just after the parameter's declaration,
+between braces.  Invocations have a natural syntax:
+@ID @OneRow @Code {
+"@Preface"
+"    @Title { About this book }"
+"{"
+"    Few observers would have supposed in 1984, that ..."
+"}"
+}
+with the actual named parameters following directly after the
+operator, before any right parameter.  In this example, @Code "@Tag"
+will receive its default value, and a less expert user could safely
+omit the @Code "@Title" parameter as well.
+@PP
+Lout permits named parameters to have parameters, a feature with
+applications to bibliographic databases, running headers, and other
+places where a format has to be supplied before content is
+known.  One could go further and provide a complete lambda calculus,
+with functions as first-class objects, provided care was taken not
+to intimidate the non-expert user.
+@End @SubSection
diff --git a/doc/design/s3_2 b/doc/design/s3_2
new file mode 100644
index 0000000..0c5fd70
--- /dev/null
+++ b/doc/design/s3_2
@@ -0,0 +1,113 @@
+@SubSection
+    @Tag { recursion }
+    @Title { Recursion and page layout }
+@Begin
+@PP
+Design and implementation should proceed together in exploratory projects,
+since otherwise the design too easily becomes unrealistic.  Sometimes the
+implementation does more than its designer intended.  The author wrote the
+following purely as a testing scaffold:
+@ID @OneRow @Code {
+"def @Page right x"
+"{"
+"    8i @Wide 11i @High"
+"    {"
+"        //1i  ||1i  x  ||1i"
+"        //1i"
+"    }"
+"}"
+}
+Only afterwards did he realize its significance:  the concept of a page
+had been defined outside the implementation, removing the need for
+commands for setting page width and height, margins, and so on.
+@PP
+Defining a sequence of pages is harder, since their number is not known
+in advance.  A simple version of this same problem is afforded by the
+leaders found in tables of contents:
+@ID {
+4i @Wide { Chapter 7  @Leaders  53 }
+}
+This seemed to require recursion, specifically the definition
+@ID @Code {
+"def @Leaders { ..   @Leaders }"
+}
+Note that both @Code ".." and @Code "@Leaders" are objects, so the two
+spaces separating them are significant.  No base case is given, and indeed
+we have no boolean or conditional operators with which to express it;
+but we can adopt the implicit base `if space is not sufficient, delete
+{@Code "@Leaders"} and any preceding space'.  Then the expression
+@ID @Code "4i @Wide { Chapter 7  @Leaders  53 }"
+will produce the object shown above.  It is hard to see how this base
+could be made explicit, without violating the general principle of
+keeping all size information internal.  In the implementation,
+@Code "@Leaders" remains unexpanded while sizes are being
+calculated; then it is treated similarly to a receptive symbol, with
+its body as an incoming galley (Section {@NumberOf flushing}).
+@PP
+With this settled, it is now clear how to define a document which is a
+numbered sequence of pages.  Let @Code "@Next" be a prefix operator
+which returns its parameter plus one.  Then
+@ID @OneRow @Code {
+"def @PageList"
+"    right @PageNum"
+"{"
+"    @Page {"
+"          |0.5rt - @PageNum -"
+"          //1v   @TextPlace"
+"          //1rt  @FootSect"
+"    }"
+"    //"
+"    @PageList @Next @PageNum"
+"}"
+}
+when invoked in the expression {@Code "@PageList 1"}, has for its result
+the potentially infinite object
+@ID @OneRow {
+@LittlePage {
+|0.5rt - 1 -
+//1.2vx @Code "@TextPlace"
+//1rt @Code "@FootSect"
+}
+//
+@LittlePage {
+|0.5rt - 2 -
+//1.2vx @Code "@TextPlace"
+//1rt @Code "@FootSect"
+}
+//0.2c
+8p @Font @Code "@PageList 3"
+}
+Similarly, we may define @Code "@FootSect" like this:
+@ID @OneRow @Code {
+"def @FootSect"
+"{"
+"    def @FootList"
+"        right @Num"
+"    {"
+"        @FootPlace"
+"        //1v"
+"        @FootList @Next @Num"
+"    }"
+""
+"    1i @Wide @HLine"
+"    //1v"
+"    @FootList 1"
+"}"
+}
+so that an invocation of @Code "@FootSect" produces
+@ID @OneRow @Code {
+1i @Wide @HLine
+"@FootPlace"
+"@FootPlace"
+"@FootPlace"
+"..."
+}
+The expansion process is very similar to a BNF derivation, and would be
+attempted only on demand.
+@PP
+Clearly, deciding which expansions to take and replacing @Code "@TextPlace"
+and {@Code "@FootPlace"} by the appropriate actual text will not be easy;
+this is the subject of Section {@NumberOf galleys}.  The important point
+for now is that we have here a very simple and flexible method of specifying
+the layout of pages, which requires no specialized language features.
+@End @SubSection
diff --git a/doc/design/s3_3 b/doc/design/s3_3
new file mode 100644
index 0000000..d04a8db
--- /dev/null
+++ b/doc/design/s3_3
@@ -0,0 +1,143 @@
+@SubSection
+    @Tag { modules }
+    @Title { Modules }
+@Begin
+@PP
+It is well accepted that the visibility of symbols is not adequately
+controlled by Algol block structure.  The author is aware of several
+major problems of this kind in document formatting.
+@PP
+One problem is that some symbols should be visible only within
+restricted parts of a document.  For example, we naturally expect
+equation formatting to be accomplished like this:
+@ID @OneRow @Code {
+"surrounding text"
+"@Eq { {x sup 2  +  1} over 4 }"
+"surrounding text"
+}
+with the symbols {@Code "sup"}, {@Code "over"}, etc., visible only within
+the equation, not in the surrounding text.
+@PP
+It seems natural to define these symbols within {@Code "@Eq"}, since
+they are local to equations.  It only remains then to decree that
+symbols local to @Code "@Eq" are to be visible within its actual right
+parameter, and this is done by replacing the right formal parameter with a
+@I body parameter:
+@ID @OneRow @Code {
+"export sup over"
+"def @Eq"
+"    body @Body"
+"{"
+"    def sup ..."
+"    def over ..."
+""
+"    Slope @Font @Body"
+"}"
+}
+The @Code export clause lists the identifiers which are permitted to be
+visible outside their usual range, the body of {@Code "@Eq"}; and the
+@Code body declaration imports them into (makes them visible within)
+the actual right parameter of each invocation of {@Code "@Eq"}.  This
+arrangement has proven very convenient for defining a variety of
+special-purpose packages.
+@PP
+Another problem arises when global symbols, such as the ones used for
+headings and paragraph separators, call on values that the non-expert
+user will need to modify, such as the initial font or paragraph
+indent.  These values are like parameters of the document as a whole, so
+it is natural to try this:
+@ID @OneRow @Code {
+"export @Heading @PP ..."
+"def @BookLayout"
+"    named @InitialFont { Times Base 12p }"
+"    named @InitialBreak { adjust 14p }"
+"    named @ColumnWidth { 6i }"
+"    ..."
+"{"
+"    def @Heading ..."
+"    def @PP ..."
+"}"
+}
+Now @Code "@Heading" and @Code "@PP" may invoke @Code "@InitialFont"
+and the other parameters.  To make @Code "@Heading" and @Code "@PP"
+visible throughout the document, we need only add a body parameter to
+@Code "@BookLayout" and present the entire document as
+@ID @OneRow @Code {
+"@BookLayout"
+"    @InitialFont { Helvetica Base 10p }"
+"    @InitialBreak { adjust 12p }"
+"{"
+"    The document."
+"}"
+}
+but for practical reasons given below we prefer not to enclose the
+entire document in braces.  Instead, we write
+@ID @OneRow @Code {
+"@Use { @BookLayout"
+"    @InitialFont { Helvetica Base 10p }"
+"    @InitialBreak { adjust 12p }"
+"}"
+"The document."
+}
+which has the same effect:  @Code "@Use" makes the exported symbols of
+@Code "@BookLayout" visible for the remainder of the document, and is
+permitted only at the beginning.
+@PP
+The third feature that affects visibility, and which will prove useful
+for cross referencing (Section {@NumberOf cross}), is the @Code "@Open"
+symbol.  It makes the exported symbols of its left parameter visible
+within its right parameter, and is therefore similar to the Pascal @Code
+with statement.
+@PP
+It could be argued that Lout is over-supplied with these visibility modifying
+features: the body parameter, @Code "@Use" and @Code "@Open" do not seem
+sufficiently different from each another.  The @Code "@Open" symbol is
+the most general, being capable of replacing the other two.  For
+example,
+@ID @OneRow @Code {
+"@Use { x }"
+"@Use { y }"
+"Body of document"
+}
+can be replaced by
+@ID @OneRow @Code {
+"x @Open {"
+"y @Open {"
+"Body of document"
+"}}"
+}
+and, taking the @Code "@Eq" symbol above as example, we could eliminate
+its body parameter, add
+@ID @Code "def @Body right x { Slope @Font x }"
+to the exported definitions of {@Code "@Eq"}, and replace
+@ID @Code "@Eq { object }"
+by
+@ID @Code "@Eq @Open { @Body { object } }"
+If @Code "@Eq" is a galley (Section {@NumberOf galleys}), @Code "@Body"
+must take over that function.  But one would not want to write these
+clumsy expressions in practice, and the enclosure of large quantities
+of input in extra braces could cause Basser Lout to run out of memory
+(Section {@NumberOf lookahead}).
+@PP
+A quite separate kind of visibility problem arises when expert
+users wish to define an object or operator for repeated use within, say,
+equations:
+@ID @Code "def isum { sum from i=1 to n }"
+As it stands this can only be placed within the @Code "@Eq" package itself, 
+where @Code "sum" and the other symbols are visible, but it is not desirable
+to modify the source code of a standard package.  Lout provides an
+@Code "import" clause to solve this problem:
+@ID @OneRow @Code {
+"import @Eq"
+"def isum { sum from i=1 to n }"
+}
+may appear after @Code "@Eq" is defined, and it will make the exported symbols
+of @Code "@Eq" visible within the body of {@Code "isum"}.  This feature
+complicates the treatment of environments (Section {@NumberOf defs.impl}),
+and even introduces an insecurity, when @Code isum is invoked outside an
+equation.  A simpler approach would be to allow only one symbol in an
+@Code import clause, and treat the following definition exactly like a
+local definition of that symbol; but then it would not be possible
+to define symbols using the resources of more than one of the standard
+packages.
+@End @SubSection
diff --git a/doc/design/s3_4 b/doc/design/s3_4
new file mode 100644
index 0000000..7b0f5bc
--- /dev/null
+++ b/doc/design/s3_4
@@ -0,0 +1,51 @@
+@SubSection
+    @Tag { defs.impl }
+    @Title { Implementation of definitions }
+@Begin
+@PP
+Input is processed by a hybrid parser which employs operator precedence
+for objects and simple recursive descent for the headers of
+definitions.  A symbol table stores the body of each definition as a
+parse tree, except for macros which are lists of tokens, and manages the
+usual stack of static scopes, accepting @I PushScope and @I PopScope
+operations as the parser enters and leaves scope regions, including
+actual body parameters and the right parameter of the @Code "@Open"
+operator.
+@PP
+As the parse proceeds, a complete call graph is constructed, recording,
+for each symbol, which symbols are invoked within its body.  Immediately
+after the last definition is read, the transitive closure of the call
+graph is computed, and used to determine whether each non-parameter
+symbol is recursive or receptive (Section {@NumberOf galleys}), and
+whether each parameter is invoked exactly once or not.
+@PP
+Purely functional systems may evaluate symbol invocations in applicative
+order (where parameters are evaluated before substitution into bodies),
+or in normal order (substitution before evaluation), and they may also
+share the value of a parameter among all uses of it.  But in Basser
+Lout, the presence of context-sensitive style information (Section
+{@NumberOf style}) forces normal order evaluation and prevents sharing
+of parameter values.
+@PP
+To evaluate an unsized object (pure parse tree), its {@I environment},
+the equivalent of the stack frames in Algol-like languages, must be
+available, containing the actual values of all formal parameters
+that are visible within the unsized object.  Environment handling is
+a well-known implementation technique, so it will be discussed
+only briefly here.
+@PP
+Environments are extra subtrees hung from the objects they refer
+to.  This organization makes excellent use of the ordered dag to
+permit environments to be shared, and deleted when the last
+reference to them is removed.  Several optimizations have been
+implemented.  Actual parameters known to be invoked only once are moved
+in from the environment, not copied; copying could lead to quadratic time
+complexity.  Actual parameters of the form @Code "@Next" @I object
+receive an applicative pre-evaluation which prevents long chains of
+@Code "@Next" symbols from forming during the generation of large page
+numbers.  Some environments which provably contribute nothing are
+deleted, most notably when a symbol invocation has no symbols within its
+actual parameters and no import list, so that only the environment of its
+body need be kept; this saves a great deal of space when objects with
+environments are written to auxiliary files (Section {@NumberOf cross}).
+@End @SubSection
diff --git a/doc/design/s3_9 b/doc/design/s3_9
new file mode 100644
index 0000000..648a1b6
--- /dev/null
+++ b/doc/design/s3_9
@@ -0,0 +1,2 @@
+@EndSubSections
+@End @Section
diff --git a/doc/design/s4_0 b/doc/design/s4_0
new file mode 100644
index 0000000..5f89426
--- /dev/null
+++ b/doc/design/s4_0
@@ -0,0 +1,88 @@
+@Section
+    @Tag { functional }
+    @Title { Implementation of the functional subset }
+@Begin
+@PP
+The objects and definitions of Lout are very similar to those found in
+other functional languages, and they form a natural subset of the
+language.  So we pause here and present an overview of the Basser Lout
+object evaluation algorithm.
+@PP
+The problem is to take an unsized object (pure parse tree), its
+environment (Section {@NumberOf defs.impl}), and its style
+(Section {@NumberOf style}), and to produce a PostScript file for
+rendering the object on an output device.  This file is essentially a
+sequence of instructions to print a given string of characters in a
+given font at a given point.
+@PP
+Before the algorithm begins, the parse tree must be obtained, either by
+parsing input or by copying from the symbol table.  Afterwards the data
+structure must be disposed.  The algorithm proper consists of five
+passes, each a recursive traversal of the structure from the root down
+to the leaves and back.
+@DP
+@I {1.  Evaluation of unsized objects.}  On the way down, calculate
+environments and replace non-recursive, non-receptive symbols by their
+bodies (Section {@NumberOf defs.impl}); broadcast fonts to the leaves,
+and paragraph breaking and spacing styles to the paragraph nodes.  On the
+way back up, delete @Eq { FONT }, @Eq { BREAK }, and @Eq { SPACE } nodes,
+and insert @Eq { SPLIT }, @Eq { COL }, and @Eq { ROW } nodes
+(Section {@NumberOf objects}).
+@DP
+@I {2.  Width calculations and breaking.}  Calculate the width of every
+subobject from the bottom up.  As described in Section {@NumberOf objects},
+@Eq { WIDE } nodes may trigger object breaking sub-traversals during this pass.
+@DP
+@I {3.  Height calculations.}  Calculate the height of every subobject,
+from the bottom up.
+@DP
+@I {4.  Horizontal coordinates.}  Calculate the horizontal coordinate of
+each subobject from the top down, and store each leaf's coordinate in
+the leaf.
+@DP
+@I {5.  Vertical coordinates and PostScript generation.}  Calculate the
+vertical coordinate of every subobject from the top down, and at each
+leaf, retrieve the character string, font, and horizontal coordinate,
+and print the PostScript instruction for rendering that leaf.
+@DP
+Figure {@NumberOf components} gives the amount of code required for each
+
+@Figure
+    @Tag { components }
+    @Caption { Major components of the Basser Lout interpreter, showing
+the approximate number of lines of C code.  }
+@Begin
+@Tab
+   vmargin { 0.5vx }
+   @Fmta { @Col @RR A ! @Col B ! @Col @RR C }
+   @Fmtb { @Col @RR A ! @Col B ! @Col     C }
+{
+   @Rowa A { 1. } B { Initialization } C { 200 }
+   @Rowa A { 2. } B { Memory allocation, ordered dag operations } C { 400 }
+   @Rowa A { 3. } B { Lexical analysis, macros, file handling } C { 1,350 }
+   @Rowa A { 4. } B { Parsing of objects and definitions } C { 1,150 }
+   @Rowa A { 5. } B { Symbol table and call graph } C { 600 }
+   @Rowa A { 6. } B { Evaluation of pure parse trees } C { 1,650 }
+   @Rowa A { 7. } B { Reading, storing, and scaling of fonts } C { 600 }
+   @Rowa A { 8. } B { Cross references and databases } C { 1,000 }
+   @Rowa A { 9. } B { Width and height calculations, and breaking } C { 700 }
+   @Rowa A { 10. } B { @I Constrained and @I AdjustSize } C { 700 }
+   @Rowa A { 11. } B { Transfer of sized objects into galley tree } C { 450 }
+   @Rowa A { 12. } B { Galley flushing algorithm } C { 1,500 }
+   @Rowa A { 13. } B { Coordinate calculations and PostScript output } C { 700 }
+   @Rowa A { 14. } B { Debugging and error handling } C { 1,200 }
+   @Rowb vmargin { 0.1c } C { @Line }
+   @Rowa C { 12,200 }
+}
+@End @Figure
+
+pass.  Symmetry between horizontal and vertical is exploited throughout
+Basser Lout, and passes 2 and 3, as well as 4 and 5, are executed on
+shared code.
+@PP
+The author can see no simple way to reduce the number of passes.  The
+introduction of horizontal galleys (Section {@NumberOf horizontal})
+would remove the need for the object breaking transformations within this
+algorithm that are the principal obstacles in the way of the merging of
+passes 2 and 3.
+@End @Section
diff --git a/doc/design/s5_0 b/doc/design/s5_0
new file mode 100644
index 0000000..d176f77
--- /dev/null
+++ b/doc/design/s5_0
@@ -0,0 +1,11 @@
+@Section
+    @Title { Galleys }
+@Begin
+@PP
+With objects and definitions under control, the author faced the problem
+of getting body text, footnotes, floating figures and tables,
+references, index entries, and entries in the table of contents into
+their places.  The resulting investigation occupied three months of
+full-time design work, and proceeded approximately as described in
+Section {@NumberOf galleys}; the implementation occupied the years 1987-89.
+@BeginSubSections
diff --git a/doc/design/s5_1 b/doc/design/s5_1
new file mode 100644
index 0000000..ab65bb9
--- /dev/null
+++ b/doc/design/s5_1
@@ -0,0 +1,123 @@
+@SubSection
+    @Tag { galleys }
+    @Title { The galley abstraction }
+@Begin
+@PP
+Let us take the footnote as a representative example.  At some point in
+the document, we wish to write
+@ID @OneRow @Code {
+"preceding text"
+"@FootNote { footnote text }"
+"following text"
+}
+and we expect the formatter to remove the footnote from this context and
+place it at the bottom of the current page, possibly splitting some or
+all of it onto a following page if space is insufficient.
+@PP
+An object appears in the final document at the point it is invoked, but
+this basic property does not hold for footnotes:  the point of
+invocation and the point of appearance are different.  In some way, the
+footnote is attached to the document at both points, introducing a cross
+linking (Section {@NumberOf genesis}) that cannot be described in purely
+functional terms.
+@PP
+Since the interpretation of any object depends on an environment and
+style inherited from the context, the first question must be whether
+the footnote inherits them through the invocation point or through
+the point(s) of appearance.
+@PP
+If symbols are to be interpreted statically as heretofore, then environments
+must be inherited through the invocation point alone.  Dynamic inheritance
+through the point of appearance is enticing in some ways:  it might
+replace the body parameter, and it might help with automatic numbering,
+since the number of a footnote is known only at the point of appearance;
+but the implementation problems are severe, and static inheritance seems
+much simpler and more comprehensible to the user.  Style, at least its
+available width and height part, must of necessity be inherited through
+the point of appearance.  For consistency, the entire style should be
+inherited in this way.  There is a suggestive analogy here with actual
+parameters, which have a point of invocation from which they inherit an
+environment, and a point of appearance within the body of the enclosing
+definition, from which they inherit a style.  It may be possible to treat
+a footnote as the actual parameter of some symbol, therefore, although
+the details seem very obscure.
+@PP
+But the most profound consequence of having two types of attachment
+point is that it leads to two distinctive tree structures.  Considering
+invocation points only leads to static trees like this one:
+@ID @I @Fig margin { 0.3c } { @Tree {
+@Node @Ellipse { body text }
+@LeftSub { @Node @Ellipse footnote }
+@RightSub {
+   @Node @Ellipse figure
+   @FirstSub { @Node @Ellipse footnote }
+}
+}}
+which shows that the body text contains a footnote and a figure, the
+latter itself containing a footnote.  Considering points of appearance
+only gives a completely different, dynamic tree:
+@ID @I @Fig margin { 0.3c } { @Tree {
+@Node @Ellipse { sequence of pages }
+@FirstSub { @Node @Ellipse { body text } }
+@NextSub  { @Node @Ellipse { footnote  } }
+@NextSub  { @Node @Ellipse { figure    } }
+@NextSub  { @Node @Ellipse { footnote  } }
+}}
+The tree can be deeper, for example with sections appearing within
+chapters which appear within the body text, which appears within the
+final sequence of pages.  Document formatting languages generally shirk
+the issues raised by this dual tree structure, by making the dynamic
+tree built-in, by limiting one or both trees to two levels, and so on,
+providing a classic example of the impoverishing effect of failing to
+permit language features to attain their natural level of generality.
+@PP
+We are thus led to propose a second abstraction for document formatting,
+which we name the @I galley in recognition of its similarity to the
+galleys used in manual typesetting.  A galley consists of an object (such
+as a footnote) together with a sequence of places where that object may
+appear (such as the bottoms of the current and following pages).  Splitting
+occurs quite naturally when space at any place is insufficient to hold
+the entire object.
+@PP
+In Lout, a footnote galley and its place of appearance are defined
+as follows:
+@ID @OneRow @Code {
+"def @FootPlace { @Galley }"
+""
+"def @FootNote into { @FootPlace&&following }"
+"    right x"
+"{ x }"
+}
+The @Code "@FootPlace" symbol contains the special symbol {@Code "@Galley"},
+indicating that it is a point of appearance for a galley.  By placing
+invocations of @Code "@FootPlace" at the bottoms of pages, as in Section
+{@NumberOf recursion}, we define the desired points of appearance for
+footnotes.  Symbols whose body contains @Code "@Galley" either directly
+or indirectly are called receptive symbols, meaning receptive to
+galleys, and they are expanded only on demand.  The effect of the
+@Code "into" clause is to make each invocation of @Code "@FootNote" a
+galley whose object is the result of the invocation in the usual way,
+and whose sequence of points of appearance is specified by the @Code "into"
+clause; in this example, the sequence of all @Code "@FootPlace" symbols
+following the invocation point.
+@PP
+Lout permits galleys to be invoked within other galleys to arbitrary
+depth, so that one may have footnotes within figures within the body
+text galley, for example, creating arbitrary static trees.  Receptive
+symbols like @Code "@FootPlace" may appear within any galley, creating
+arbitrary dynamic trees as well.  The root of the dynamic tree, which
+would normally consist of the sequence of pages of the complete assembled
+document, is considered to be a galley whose point of appearance is the 
+output file.  Points of appearance may be @Code preceding or @Code following
+the invocation point; entries in tables of contents are the main users
+of {@Code preceding}.
+@PP
+The galley abstraction is adequate for all of the applications listed at
+the beginning of this section, except that there is no provision for
+sorting index entries and references.  Sorting of galleys has been added
+to Lout as a built-in feature, invoked by adding a special @Code "@Key"
+parameter to the galleys, and using its value as the sort key.  The author
+was at a loss to find any other way, or any useful generalization of this
+feature.  Its implementation will be discussed in Section
+{@NumberOf cross.impl}.
+@End @SubSection
diff --git a/doc/design/s5_2 b/doc/design/s5_2
new file mode 100644
index 0000000..a81630d
--- /dev/null
+++ b/doc/design/s5_2
@@ -0,0 +1,372 @@
+@SubSection
+    @Tag { flushing }
+    @Title { The galley flushing algorithm }
+@Begin
+@PP
+Galley components are promoted one by one into the point of appearance in
+the dynamic parent galley, then carried along with it, ultimately to the
+root galley and the output file.  This process is called @I galley
+{@I flushing}: the galleys are rivers running together to the sea, and
+each component is a drop of water.
+@PP
+Here is a snapshot of a small dynamic tree, based on the @Code "@PageList"
+definitions of Section {@NumberOf recursion}:
+@ID @Fig {
+
+@I 10p @Font { output file } A:: @Box linestyle { noline } margin { 0c }
+
+||2c
+
+{
+@I 10p @Font { root galley }
+//0.2c
+B:: @Box margin { 0c } linestyle { noline }
+//
+@LittlePage {
+|0.5rt - 1 -
+//1.2vx &2m A small
+//1.2vx @Code "@Galley" * C:: @Box margin { 0.01c } linestyle { noline }
+//1rt @Code "@FootSect"
+}
+//
+@Box margin { 0.3c } 2.8c @Wide 8p @Font @Code "@PageList 2"
+}
+
+||2c
+
+{
+//0.9c  @I 10p @Font { body text }
+//0.2c  D:: @Box margin { 0.3c } 2.8c @Wide 8p @Font paragraph
+//      @Box margin { 0.3c } 2.8c @Wide 8p @Font { of text. }
+//      @Box margin { 0.3c } 2.8c @Wide @Code 8p @Font "@Input"
+}
+
+// @Arrow from { B@W } to { A@E }
+// @Arrow from { D@W } to { C@E }
+
+}
+The components of the body text galley are lines, except for the special
+receptive symbol @Code "@Input" which is a placeholder for as yet unread
+input (Section {@NumberOf lookahead}).  The components of the root galley are
+pages, except for the concluding unexpanded invocation of {@Code "@PageList"},
+which is an inexhaustible source of more pages, expanded on demand.
+@PP
+The concrete data structure used by Basser Lout permits the galley
+flushing algorithm to navigate the dynamic tree and find significant
+features quickly:
+@ID 10p @Font @Fig maxlabels { 100 } {
+
+A:: @Ellipse @I { HEAD }
+
+||1.5c
+
+@OneCol @OneRow {
+B:: @Ellipse @I { RECEIVING * }
+// @Arrow from { A@CTR ++ {A@CTR @Angle B@W  A@CIRCUM} } to { B@W  }
+//0.6c
+C:: @Ellipse @I { RECEPTIVE }
+// @Arrow from { A@CTR ++ {A@CTR @Angle C@W  A@CIRCUM} } to { C@W  }
+//0.6c
+D:: @Box margin { 0c } linestyle { noline }
+// @Arrow from { A@CTR ++ {A@CTR @Angle D@NW  A@CIRCUM} } to { D@NW  }
+//
+@LittlePage {
+|0.5rt - 1 -
+//1.2vx &2m A small
+//1.2vx  E:: @Box margin { 0c } linestyle { noline } @Code "@Galley "
+//1rt    F:: @Box margin { 0c } linestyle { noline } @Code "@FootSect "
+}
+// @FunnyArrow arrow { forward } from { B@E } to { E@E }
+// @FunnyArrow arrow { forward } from { C@E } to { F@E }
+//0.6c
+C:: @Ellipse @I { GAP }
+// @Arrow from { A@CTR ++ {A@CTR @Angle C@W  A@CIRCUM} } to { C@W  }
+//0.6c
+C:: @Ellipse @I { RECEPTIVE }
+// @Arrow from { A@CTR ++ {A@CTR @Angle C@W  A@CIRCUM} } to { C@W  }
+//0.6c
+D:: @Box margin { 0.3c } 2.8c @Wide 8p @Font @Code "@PageList 2"
+//  @Arrow from { A@CTR ++ {A@CTR @Angle D@NW  A@CIRCUM} } to { D@NW  }
+//  @FunnyArrow from { C@E } to { D@W ++ { 1.8 cm 0 } }
+}
+
+||1.0c
+
+A:: @Ellipse @I { HEAD }
+& @Arrow from { B@E } to { A@W }
+
+||1.5c
+
+@OneCol @OneRow {
+B:: @Box margin { 0.3c } 2.8c @Wide 8p @Font paragraph
+// @Arrow from { A@CTR ++ {A@CTR @Angle B@W A@CIRCUM} } to { B@W }
+//0.6c
+B:: @Ellipse @I { GAP }
+// @Arrow from { A@CTR ++ {A@CTR @Angle B@W A@CIRCUM} } to { B@W }
+//0.6c
+B:: @Box margin { 0.3c } 2.8c @Wide 8p @Font { of text. }
+// @Arrow from { A@CTR ++ {A@CTR @Angle B@NW A@CIRCUM} } to { B@NW }
+//0.6c
+B:: @Ellipse @I { GAP }
+// @Arrow from { A@CTR ++ {A@CTR @Angle B@W A@CIRCUM} } to { B@W }
+//0.6c
+B:: @Ellipse @I { RECEPTIVE }
+// @Arrow from { A@CTR ++ {A@CTR @Angle B@W A@CIRCUM} } to { B@W }
+//0.6c
+C:: @Box margin { 0.3c } 2.8c @Wide 8p @Font @Code "@Input"
+// @Arrow from { A@CTR ++ {A@CTR @Angle C@NW A@CIRCUM} } to { C@NW }
+// @FunnyArrow from { B@E } to { C@W ++ { 1.2 cm 0 } }
+}
+
+}
+Each galley has a @Eq { HEAD } node whose children are its component
+objects, separated by @Eq { GAP } nodes recording the inter-component
+gaps.
+@PP
+Each component is preceded by zero or more @I {galley index nodes} of
+various types.  Every receptive symbol has a @Eq { RECEPTIVE } index pointing
+to it, so that it can be found without searching through its
+component.  If the symbol is currently the target of a galley, it has a
+@Eq { RECEIVING } index instead which is also linked to the incoming
+galley.  Galleys that are currently without a target are linked to the
+dynamic tree by @Eq { UNATTACHED } galley indexes, either just after their
+most recent target if there has been one, or else at their point of
+invocation.
+@PP
+Each galley should be thought of as a concurrent process, although the
+implementation in C uses coroutines implemented by procedures.  A galley
+may promote its first component only if it has a target, sufficient space
+is available at the target to receive the component, and the component
+contains no receptive symbols.  This last condition seems to be the key
+to galley synchronization:  it forces a bottom-up promotion regime,
+preventing pages from flushing to output before text flushes into them,
+for example.
+@PP
+Each galley contains a number of binary semaphores, shown as asterisks
+in our snapshots when set.  At any given moment, a galley process is
+either running or else is suspended on one of its own semaphores.  The
+@Eq { HEAD } node contains a semaphore which is set when the galley has tried
+to find a target and failed.  Each receptive symbol has a semaphore
+which is set when that symbol is preventing the first component from
+being promoted.
+@PP
+For example, in the snapshot at the beginning of this section, the root
+galley is suspended on the @Code "@Galley" symbol, but the text galley
+is running.  It will suspend on the @Code "@Input" symbol after the
+first two components are promoted.
+@PP
+Every galley {@I G}, be it a list of pages, body text, a footnote, or
+whatever, executes the following algorithm in parallel with every other
+galley:
+@DP
+1.  Initially @I G is unattached.  Search forwards or backwards from its
+@Eq { UNATTACHED } index as required, to find a receptive symbol @I S which
+can expand to reveal a target for {@I G}.
+@DP
+2.  If no @I S can be found, suspend on the attachment semaphore.  Resume
+later from step 1.
+@DP
+3.  Expand @I S to reveal the target of {@I G}.  Preserve {@I S}'s
+semaphore by moving it to the first receptive symbol within the
+expansion of {@I S}.
+@DP
+4.  Calculate the available width and height at the target, and if
+@I G is still a pure parse tree, use the environment attached to @I G
+and the style information from the target to evaluate @I G as in
+Section {@NumberOf functional}.
+@DP
+5.  Examine the components of @I G one by one.  For each component there
+are three possibilities:
+@PP
+@I ACCEPT.  If the component fits into the available space, and has
+no other problems, then promote it into the target.  If this is the
+first component promoted into this target, and @I G is a forcing
+galley (Section {@NumberOf lookahead}), delete every receptive symbol
+preceding the target in the parent galley.  If @I G is the root galley,
+render the component on the output file and dispose it;
+@PP
+@I REJECT.  If the component is too large for the available space, or a
+@Eq { FOLLOWS } index (described below) forbids its promotion into this
+target, then detach @I G from the target.  If this was the first component
+at this target, @I S has been a complete failure, so undo step 3 (Basser
+Lout is not able to undo step 4); otherwise delete the target.  Return to
+step 1 and continue immediately;
+@PP
+@I SUSPEND.  If the component contains a receptive symbol, it cannot be
+promoted yet.  If this symbol is the target of a galley that was written
+to an auxiliary file on a previous run, read in that galley and flush
+it.  Otherwise suspend on the receptive symbol's semaphore; resume later
+from step 4.
+@DP
+6.  Terminate when the galley is empty.
+@DP
+At various points in this algorithm, receptive symbols (and their
+semaphores) are deleted in the dynamic parent galley, possibly
+permitting it to resume flushing.  When this happens, Basser Lout resumes
+the parent immediately after @I G suspends or terminates.  Also,
+whenever a component is promoted, any child galleys connected to
+it by @Eq { UNATTACHED } indexes must be resumed, since these
+galleys may be able to find a target now.  A good example of this
+situation occurs when a line of body text with one or more footnotes
+is promoted onto a page.  Basser Lout gives priority to such children,
+suspending @I G while each is given a chance to flush.
+@PP
+Basser Lout searches for the first target of @I G only in regions of the
+dynamic tree that will clearly precede or follow {@I G}'s invocation
+point in the final printed document, whichever is specified in the
+@Code into clause; subsequent targets are sought later in the same
+galley as the first.  An exception to this rule, whose necessity will
+be made clear later, is that a first @Code following target will be
+sought within a dynamic sibling galley preceding {@I G}'s invocation
+point:
+@ID 10p @Font @Fig {
+
+{
+@I { dynamic parent }
+//0.2c
+@Box 2.8c @Wide 4.5c @High
+{
+   //0.5c A:: @Box margin { 0c } linestyle { noline } @Code "@XTarget"
+   //1.0c C:: @Box margin { 0c } linestyle { noline } @Eq { UNATTACHED }
+   //1.3c @Code "@XTarget"
+}
+}
+
+||1.5c
+
+{
+//0.6c
+B:: @Box margin {0c} linestyle {noline} @Code "X into { @XTarget&&following }"
+//0.2c
+@Box 2.8c @Wide 1.5c @High { //0.8c @Code "@GTarget" }
+//1.0c
+D:: @Box margin {0c} linestyle {noline} @Code "G into { @GTarget&&following }"
+//0.2c
+@Box 2.8c @Wide 2.5c @High {}
+}
+
+// @Arrow from { A@E ++ {0.2 cm 0} } to { B@W -- {0.2 cm 0} }
+// @Arrow from { C@E ++ {0.2 cm 0} } to { D@W -- {0.2 cm 0} }
+
+}
+Here @I G will find the @Code "@GTarget" target within {@I X}.  This is
+dangerous, since if the first component of @I G is then promoted via
+@I X into the first {@Code "@XTarget"} rather than into the second,
+{@I G}'s target will not appear later in the final printed document than
+its invocation point, as required by the @Code into clause.
+@PP
+Accordingly, when such a target is chosen, two special galley indexes
+are inserted and linked together: a @Eq { PRECEDES } index at {@I G}'s
+invocation point, and a @Eq { FOLLOWS } index at the first component of
+{@I G}.  The algorithm checks before promoting any @Eq { FOLLOWS } index
+that its promotion would not place it earlier than the corresponding
+@Eq { PRECEDES } index in the same galley, and rejects the component if
+it would.  Since @Eq { PRECEDES } and @Eq { FOLLOWS } indexes are rarely used,
+this check can be implemented by linear search.
+@PP
+When two components are separated by {@Code "/"}, as opposed to the more
+usual {@Code "//"}, each influences the horizontal position of the
+other.  Because of this, the @I SUSPEND action is in fact taken if a
+receptive symbol occurs in any component separated from the first by
+{@Code "/"} operators only.  Again, linear search forwards to the first
+{@Code "//"} suffices for this check.
+@PP
+A good illustration of these unusual cases is afforded by the
+@Code "@Align" symbols from the standard DocumentLayout package.  These
+are used to produce displayed equations, aligned on their equals signs
+despite being separated by arbitrary body text.
+@PP
+The @Code "@Align" symbols are packaged neatly for the convenience of
+the non-expert user, but we will show just the essence of the
+implementation here.  First, an @Code "@AlignList" galley is created
+which contains an infinite supply of @Code "@AlignPlace" receptive
+symbols separated by @Code "/" operators:
+@ID @Fig {
+
+{
+@I { body text galley }
+//0.2c
+@Box 2.8c @Wide 4.0c @High
+{ //1.5c
+  A:: @Box margin { 0c } linestyle { noline } @Code "@Galley"
+}
+}
+
+||1.5c
+
+{
+//2.4c
+B:: @Box margin { 0c } linestyle { noline } @Code "@AlignList"
+//0.2c
+@Box {
+      @Code "@AlignPlace"
+//1vx @Code "@AlignPlace"
+//1vx @Code "..."
+//1vx @Code "@EndAlignList"
+}
+
+}
+
+// @Arrow from { A@E ++ {0.2 cm 0} } to { B@W -- {0.2 cm 0} }
+}
+Then equations like
+@ID @ShowMarks @Eq { f(x) ^= g(x) + 2 }
+are created and sent to @Code "@AlignPlace&&following" targets.  They
+collect in the @Code "@AlignList" galley and are aligned there:
+@ID @Fig {
+
+{
+@I { body text galley }
+//0.2c
+@Box 2.8c @Wide 4.0c @High
+{ //1.5c
+  A:: @Box margin { 0c } linestyle { noline } @Code "@Galley"
+}
+}
+
+||1.5c
+
+{
+//2.4c
+B:: @Box margin { 0c } linestyle { noline } @Code "@AlignList"
+//0.2c
+@Box {
+   @Line linestyle { dashed } from { xmark ysize } to { xmark 0 }
+   {
+	     @Eq { f(x) ^= g(x) + 2 }
+	/1vx @Eq { f(x) - g(x) ^= 2 }
+	/1vx @Code "..."
+	/1vx @Code "@EndAlignList"
+   }
+}
+
+}
+
+// @Arrow from { A@E ++ {0.2 cm 0} } to { B@W -- {0.2 cm 0} }
+}
+The @Code "@AlignList" galley does not flush, because its first
+component is connected to a receptive symbol by @Code "/" operators.
+@PP
+After the last equation, an empty forcing galley is sent to
+{@Code "@EndAlignList"}, deleting the two remaining receptive symbols from
+the @Code "@AlignList" galley and permitting it to flush.  @Eq { FOLLOWS }
+indexes ensure that each equation finds a target placed in the body text
+just after its point of invocation, so the equations return, aligned, to
+approximately the points where they were invoked.  Notice that the flushing
+of body text is suspended until the list of equations is completed, as it
+must be, since the horizontal position of the first equation cannot
+be known until the last equation is added to the list.
+@PP
+Layout quality can occasionally be improved by rejecting a component
+that could be promoted -- for example, a component of body text that
+carries a footnote too large to fit on the current page.  Since Lout
+does not specify how breaking decisions are made, beyond the basic
+constraints imposed by available space and @Code into clauses, in
+principle such high quality breaking could be added to the
+implementation with no change to the language.  However, the
+generality of the galley flushing algorithm, and its already
+considerable complexity, make this a daunting problem in practice,
+although a fascinating one.  @TeX [9], with its unnested
+set of `floating insertions' clearly identifiable as each page is begun,
+has the advantage in this respect.
+@End @SubSection
diff --git a/doc/design/s5_3 b/doc/design/s5_3
new file mode 100644
index 0000000..3ff9881
--- /dev/null
+++ b/doc/design/s5_3
@@ -0,0 +1,125 @@
+@SubSection
+    @Tag { constraints }
+    @Title { Size constraints and size adjustments }
+@Begin
+@PP
+The galley flushing algorithm needs to know the available width and
+height at each receptive symbol.  These symbols may lie within
+arbitrarily complex objects, and they may compete with each other for
+available space (as body text and footnote targets do), so this
+information must be extracted from the tree structure when required.
+@PP
+For example, consider the object
+@ID @Code "5i  @Wide  {  a  /  b  }"
+and suppose that the width of @Code { a } is @Eq { 1i, 2i } (@Eq {1i} to
+the left of the mark, @Eq { 2i } to the right).  What then is the
+available width at {@Code { b }}?  If we let the width of @Code b be
+@Eq {l,r}, we must have
+@ID @Eq { (1i up l) + (2i up r) <= 5i }
+with the @Eq {non up } (i.e. max) operations arising from mark
+alignment.  Eliminating them gives
+@ID @OneRow @Eq {
+matrix {
+	{ 1i + 2i ^<= 5i }
+mabove	{ l  + 2i ^<= 5i }
+mabove	{ 1i + r  ^<= 5i }
+mabove	{ l  + r  ^<= 5i }
+}
+}
+and since we assume that @Code a fits into the available space, the
+first inequality may be dropped, leaving
+@ID @OneRow @Eq {
+matrix {
+	{ l     ^<= 3i }
+mabove	{ l + r ^<= 5i }
+mabove	{ r     ^<= 4i }
+}
+}
+Object @Code b may have width @Eq {l, r} for any @Eq { l } and
+@Eq { r } satisfying these inequalities, and no others.
+@PP
+Here is another example:
+@ID @Code "5i  @High  {  a  /2ix  b  }"
+Assuming that @Code a has height @Eq {1i,1i}, the height @Eq {l, r} of
+@Code b must satisfy
+@ID @Eq { 1i + ((1i + l) up 2i) + r <= 5i }
+This time the @Eq { non up } operation arises from the mark-to-mark gap
+mode, which will widen the @Eq { 2i } gap if necessary to prevent
+@Code a and @Code b from overlapping.  This inequality can be rewritten as
+@ID @OneRow @Eq {
+matrix {
+	{ l     ^<= infinity }
+mabove	{ l + r ^<= 3i       }
+mabove	{ r     ^<= 2i       }
+}
+}
+In general, Lout is designed so that the available width or height at
+any point can be expressed by three inequalities of the form
+@ID @OneRow @Eq {
+matrix {
+	{ l     ^<= x }
+mabove	{ l + r ^<= y }
+mabove	{ r     ^<= z }
+}
+}
+where @Eq {x }, @Eq {y} and @Eq {z} may be @Eq { infinity }.  We
+abbreviate these three inequalities to @Eq { l, r <= x, y, z }, and we
+call @Eq {x, y, z} a {@I{size constraint}}.
+@PP
+The two examples above showed how to propagate the size constraint
+@Eq { infinity, 5i, infinity } for
+@Code "a / b" down one level to the child {@Code b}.  Basser Lout
+contains a complete set of general rules for all node types, too
+complicated to give here.  Instead, we give just one example of how
+these rules are derived, using the object
+@ID @OneRow {
+@Eq {x sub 1}  @Code "/"  @Eq {x sub 2}  @Code "/"  @Eq {ldots}  @Code
+"/"  @Eq {x sub n}
+}
+where @Eq { x sub j } has width @Eq { l sub j , r sub j } for all @Eq {j}.
+@PP
+Suppose the whole object has width constraint @OneCol @Eq {X,Y,Z}, and we
+require the width constraint of {@Eq { x sub i }}.  Let
+@Eq { L = max sub j ` l sub j } and @Eq { R = max sub j ` r sub j },
+so that @OneCol @Eq {L, R} is the width of the whole object.  We assume
+@Eq {L, R <= X,Y,Z}.  Then @Eq { x sub i } can be enlarged to any size
+@Eq { l sub i ` , r sub i } satisfying
+@ID @Eq { ( l sub i up L), ( r sub i up R) <= X, Y, Z }
+which expands to eight inequalities:
+@ID @OneRow @Eq {
+matrix {
+         { l sub i           ^<= X }
+mabove   { L                 ^<= X }
+mabove   { l sub i + r sub i ^<= Y }
+mabove   { l sub i + R       ^<= Y }
+mabove   { L + r sub i       ^<= Y }
+mabove   { L + R             ^<= Y }
+mabove   { r sub i           ^<= Z }
+mabove   { R                 ^<= Z }
+}
+}
+Three are already known, and slightly rearranging the others gives
+@ID @OneRow @Eq {
+matrix {
+         { l sub i           ^<= X     }
+mabove   { l sub i           ^<= Y - R }
+mabove   { l sub i + r sub i ^<= Y     }
+mabove   { r sub i           ^<= Z     }
+mabove   { r sub i           ^<= Y - L }
+}
+}
+Therefore the width constraint of @Eq { x sub i } is
+@ID @Eq { min(X, Y-R), Y, min(Z, Y-L) }
+The size constraint of any node can be found by climbing the tree to a
+@I WIDE or @I HIGH node where the constraint is trivial, then propagating
+it back down to the node, and this is the function of procedure
+{@I Constrained} in Basser Lout.
+@PP
+After some components have been promoted into a target, the sizes stored
+in its parent and higher ancestors must be adjusted to reflect the
+increased size.  This is done by yet another set of recursive rules,
+upward-moving this time, which cease as soon as some ancestor's size
+does not change.  These rules are embodied in procedure @I AdjustSize
+of Basser Lout.  The adjustment must be done before relinquishing
+control to any other galley, but not after every component.
+@End @SubSection
diff --git a/doc/design/s5_4 b/doc/design/s5_4
new file mode 100644
index 0000000..b91d7ce
--- /dev/null
+++ b/doc/design/s5_4
@@ -0,0 +1,97 @@
+@SubSection
+    @Tag { lookahead }
+    @Title { The limited lookahead problem }
+@Begin
+@PP
+Basser Lout assumes that there will be enough internal memory to hold
+the symbol table plus a few pages, but not an entire document.  This
+section describes the consequent problems and how they were solved.
+Other interpreters, notably interactive editors running on virtual
+memory systems, would not necessarily need this assumption.
+@PP
+Although Basser Lout can read and format any legal input, its memory
+consumption will be optimized when the bulk of the document resides in
+galleys whose targets can be identified at the moment they are
+encountered.  Let us take the typical example of a root galley which
+is a list of pages, a @Code "@BodyText" galley targeted into the
+pages, @Code "@Chapter" galleys targeted into {@Code "@BodyText"},
+and @Code "@Section" galleys targeted into the @Code "@Chapter"
+galleys:
+@ID @OneRow @Code {
+"@PageList"
+"//"
+"@BodyText"
+"//"
+"@Chapter {"
+"    @Section { ... }"
+"    @Section { ... }"
+"    ..."
+"    @Section { ... }"
+"}"
+"@Chapter {"
+"    ..."
+"}"
+}
+Basser Lout is able to read and process such galleys one paragraph at
+a time (strictly, from one @Code "//" at the outer level of a galley
+to the next), as we now describe.
+@PP
+When the parser encounters the beginning of a galley, like @Code "@Chapter"
+or {@Code "@Section"}, it initiates a new galley process.  The special
+receptive symbol @Code "@Input" is substituted for the as yet
+unread right parameter of the galley.  As each paragraph of the right
+parameter is read, it is deleted from the parse tree and injected into
+the galley's {@Code "@Input"}.  The galley is then resumed.  The parser
+thus acts as an extra
+concurrent process; it has low priority, so that input is read only when
+there is nothing else to do.  Since galleys may be nested, a stack of
+@Code "@Input" symbols is needed, each with its own environment and
+style.  If a galley is encountered for which a target is not immediately
+identifiable (a footnote, for example), it is read in its entirety and
+hung in pure parse tree form from an @I UNATTACHED index in the usual way,
+with an environment but without a style.  It will be flushed later
+when its component is promoted.
+@PP
+In addition to producing a steady flow of components from input, we must
+also ensure that receptive symbols do not unduly block their
+promotion.  The @Code "@FootSect" symbol at the foot of each page is a
+typical example:  until it is deleted the page cannot be printed.
+@PP
+Receptive symbols are expanded only on demand, so @Code "@FootSect" can
+be deleted as soon as we can prove that it is not wanted.  The symbol
+table can tell us that only @Code "@FootNote" galleys (with
+@Code "@FootPlace&&following" targets) want it, so it might be possible
+to deduce that @Code "@FootSect" may be deleted as soon as body text
+enters the following page.
+@PP
+The author was unable to make this work, so Basser Lout requires the
+user to identify those galleys which will carry the bulk of the document
+({@Code "@Chapter"}, {@Code "@Section"}, {@Code "@BodyText"}) as
+{@I {forcing galleys}}, by writing @Code "force into" instead of
+@Code "into" in their definitions.  As described in the previous
+section, when a forcing galley attaches to a target, all receptive
+symbols preceding the target in its galley are deleted, removing all
+impediments to flushing.  For example, when a forcing body text galley
+enters a new page, the @Code "@FootSect" symbol on the preceding page
+will be deleted.  It seems likely that a system which could afford to
+wait until all input was read before deleting any receptive symbols
+would not need forcing galleys.
+@PP
+Galleys whose targets are a long way from their invocation points can be
+a problem.  If the direction is {@Code "following"}, such galleys are
+held in internal memory for a long time, unless they are to be
+sorted.  If the direction is
+{@Code "preceding"}, then either the entire intervening document must be
+held in memory (prevented by the target from flushing), or else some
+forcing galley prematurely deletes the target, leaving the galley bereft.
+@PP
+The typical example of the latter case occurs when the galley is an
+entry in the table of contents, launched backwards from the beginning of
+a chapter or section.  Its target in the table of contents will have
+been deleted long before, to permit the rest of the document to print,
+so the galley ultimately emerges as an unattached galley promoted out of
+the root galley.  All such galleys are written to an auxiliary file,
+indexed by the missing target.  On the next run, just before that target
+is deleted, the auxiliary file is checked and any galleys for it are
+read in and flushed.
+@End @SubSection
diff --git a/doc/design/s5_5 b/doc/design/s5_5
new file mode 100644
index 0000000..af4d88b
--- /dev/null
+++ b/doc/design/s5_5
@@ -0,0 +1,109 @@
+@SubSection
+    @Tag { horizontal }
+    @Title { Horizontal galleys }
+@Begin
+@PP
+There is a strong analogy between breaking a column of text into
+page-sized pieces, and breaking a paragraph into line-sized pieces.  In
+fact, the two differ only in direction:  vertical for body text,
+horizontal for paragraphs.  In this section we define {@I{horizontal
+galleys}}, and show how they provide an unlimited number of paragraph
+breaking styles, as well as solve some other problems.  Regrettably,
+lack of time has prevented their incorporation into the Basser Lout
+interpreter.
+@PP
+Imagine a galley whose components are separated by horizontal
+concatenation operators instead of vertical ones, perhaps indicated by a
+@Code { horizontally into } clause.  Then all object breaking, including
+paragraph breaking, could be replaced by galley component promotion like
+this:
+@ID @OneRow @Code {
+"def @Paragraph right x"
+"{"
+"    def @LinePlace { @Galley }"
+""
+"    def @LineList"
+"    {"
+"        @HExpand @LinePlace"
+"        //1vx  @LineList"
+"    }"
+""
+"    def @Par horizontally into { @LinePlace&&preceding }"
+"        right x"
+"    { x }"
+""
+"    @LineList  //  @Par { 0.2i @Wide {}  &0i  x  &1rt }"
+"}"
+}
+The @Code "@HExpand" operator, which is a primitive of Basser Lout,
+horizontally expands the gaps in its right parameter until the result
+fills the available space, thus implementing line adjustment, except
+when the parameter contains tabulation gaps like {@Code "&1rt"}, which
+cause the parameter to be already expanded.  The result of
+@ID @Code "@Paragraph { A short paragraph of text. }"
+would then be something like
+@ID 1.5i @Wide {
+0.2i @Wide {} & A short paragraph of text.
+}
+depending on the available horizontal space.  An unlimited range of
+paragraph breaking styles could be defined, including ragged right, ragged
+left, break-and-center, and so on.
+@PP
+In Basser Lout, indented paragraphs are produced by preceding them with
+a horizontal concatenation operator, for example {@Code "|0.5i"}.  This
+has the unfortunate effect of making an indented paragraph into a single
+component of the enclosing galley, so that it will always be kept
+together on one page.  Horizontal galleys solve this problem with a
+simple change to {@Code "@LineList"}:
+@ID @OneRow @Code {
+"def @LineList"
+"{"
+"    |0.5i  @HExpand @LinePlace"
+"    //1vx  @LineList"
+"}"
+}
+showing the flexibility that comes from bringing the full power of the
+Lout language to bear on paragraph layout.  It is easy to make provision
+for a tag on the first line.
+@PP
+Although Basser Lout permits receptive symbols within paragraphs, they
+are of little use, because their available width is calculated after
+paragraph breaking, and the incoming galley cannot spread over more than
+one line.  With horizontal galleys, such symbols would have infinite
+available width, and we could easily produce a filled paragraph of
+footnotes like this:
+@ID 3.5i @Wide {
+@OneRow { -2p @Font 1 ^/0.3vo } & See Jones and Saunders (1982). &2m
+@OneRow { -2p @Font 2 ^/0.3vo } & Or so Jacobsen (1973) asserts. &2m
+@OneRow { -2p @Font 3 ^/0.3vo } & {@I ibid}, p. 327.
+}
+based on an infinite horizontal sequence of @Code "@FootPlace" symbols
+inside a horizontal galley.
+@PP
+When body text is placed on pages, the length of each column varies
+depending on the available vertical space.  Horizontal galleys could
+analogously produce lines of varying length, and so could fill
+non-rectangular shapes.
+@PP
+An important theoretical benefit of horizontal galleys is that they
+would permit horizontal and vertical to be treated in a perfectly
+symmetrical way, whereas at present paragraph breaking is horizontal
+only, and galley breaking is vertical only.  This must simplify the
+treatment of non-European languages which fill in unusual directions,
+although it is not itself sufficient to implement them.
+@PP
+There are a few minor problems with horizontal galleys.  First, the
+syntactic overhead of enclosing each paragraph in @Code "@Paragraph { ... }"
+or whatever is unacceptable.  Permitting user-defined operators to have lower
+precedence than the white space between two words might help here.  Second,
+the built-in paragraph breaker includes hyphenation, and it permits line
+breaks in the input to determine line breaks in the output, if
+desired.  These features must somehow be preserved.  Finally, we have
+explained how the Basser Lout interpreter assigns equal width to the
+wider columns of tables (Section {@NumberOf style}).  The equivalent
+situation in vertical galleys occurs when two receptive symbols compete
+for vertical space (e.g. @Code "@TextPlace" and {@Code "@FootSect"}),
+and there it is conventional to grant as much as required to the first
+arrival.  It is not clear to the author how these different approaches
+can be reconciled.
+@End @SubSection
diff --git a/doc/design/s5_9 b/doc/design/s5_9
new file mode 100644
index 0000000..648a1b6
--- /dev/null
+++ b/doc/design/s5_9
@@ -0,0 +1,2 @@
+@EndSubSections
+@End @Section
diff --git a/doc/design/s6_0 b/doc/design/s6_0
new file mode 100644
index 0000000..07fb62e
--- /dev/null
+++ b/doc/design/s6_0
@@ -0,0 +1,18 @@
+@Section
+    @Title { Cross references }
+@Begin
+@PP
+Cross references, such as `see page 57' and `see Figure 5,' are a useful
+but highly error-prone feature of documents.  Scribe [7]
+introduced a method of keeping them up to date automatically as the
+document changes:  the user gives each referenced entity a tag, and
+operators are provided that return the page or sequence number of the
+entity with a given tag.
+@PP
+A cross reference takes an object (such as a page number) from one point
+in the document and copies it to another, and this generalization
+suggests other applications.  For example, a running header is copied
+from the title of a nearby chapter, and a reference is copied from a
+bibliographic database.  Making the unity of these applications manifest
+is an interesting language design problem.
+@BeginSubSections
diff --git a/doc/design/s6_1 b/doc/design/s6_1
new file mode 100644
index 0000000..0ffc70d
--- /dev/null
+++ b/doc/design/s6_1
@@ -0,0 +1,85 @@
+@SubSection
+    @Tag { cross }
+    @Title { The cross reference abstraction }
+@Begin
+@PP
+In developing the cross reference abstraction, it seemed best to begin
+with the database application, since it is the simplest.  Database
+relations are naturally mapped into Lout definitions:
+@ID @OneRow @Code {
+"def @Reference"
+"    named @Tag {}"
+"    named @Author {}"
+"    named @Title {}"
+"    named @Journal {}"
+"{}"
+}
+The set of all invocations of @Code "@Reference" is a relation whose
+attributes are the parameters, and whose tuples are the invocations.  To
+complete the correspondence, we need only declare that the @Code "@Tag"
+parameter is special, serving as the key attribute.
+@PP
+Following the database model, we next need a notation for retrieving the
+invocation with a given tag:
+@ID @Code "@Reference&&kingston91"
+This @I {cross reference} is like an arrow pointing to the invocation.  To
+access its attributes, we write
+@ID @Code "@Reference&&kingston91 @Open { @Author, @Title }"
+The @Code "@Open" operator evaluates its right parameter in an
+environment which includes the exported parameters of its left.
+@PP
+An invocation is chosen to be a running header because of its proximity
+to the place where it is used, rather than by its tag.  Such proximity
+is naturally expressed by two special tags, {@Code preceding} and
+{@Code following}; for example, @Code "@Sym&&following" will point to
+the closest following invocation of @Code "@Sym" in the final printed
+document.  This is much simpler conceptually than reference to the
+internal state of the document formatter at a critical moment, the usual
+approach to running headers.
+@PP
+It turns out that the above design solves all the cross referencing
+problems encountered in practice except one, which may be typified by
+the problem of finding the number of the page on which the chapter whose
+tag is @Code "intro" begins.  Two cross referencing steps are needed,
+first to {@Code "@Chapter&&intro"}, then from there to
+{@Code "@Page&&preceding"}, where the page number is known.
+@PP
+Given our success so far, this last problem proves to be
+surprisingly difficult.  We first try
+@ID @OneRow @Code {
+"@Chapter&&intro @Open {"
+"    @Page&&preceding @Open { @PageNum }"
+"}"
+}
+but this fails because @Code "@Page&&preceding" is evaluated in the
+present context, not in the context of @Code "@Chapter&&intro" as
+required.  So our next attempt is
+@ID @OneRow @Code {
+"def @Chapter"
+"    named @PageNum { @Page&&preceding @Open { @PageNum } }"
+"    ..."
+}
+with the @Code "@Page&&preceding" cross reference attached to the
+chapter; we write
+@ID @Code "@Chapter&&intro @Open { @PageNum }"
+This also fails, because parameters are evaluated after substitution, so
+once again @Code "@Page&&preceding" is evaluated in the wrong context.  We
+could of course define a new operator specifically for this case:
+@ID @Code "@Page&&{ @Preceding @Chapter&&intro }"
+or some such.  This is free of the annoying context-sensitivity, but it
+seems quite complex, and the expected cross reference @Code "@Page&&preceding"
+does not appear.
+@PP
+The author was lost in these obscurities for some time, and ultimately
+rescued himself by looking ahead to the implementation of the
+@Code preceding and @Code following tags, to see if a simple extension
+of it would solve the problem.  This led to the @Code "@Tagged" operator:
+@ID @Code "@Page&&preceding @Tagged intro"
+placed at the beginning of the body of the chapter will attach @Code intro
+as an extra tag to the closest preceding invocation of {@Code "@Page"},
+so that
+@ID @Code "@Page&&intro @Open { @PageNum }"
+yields the desired page number.  There is something low-level and ad hoc
+about the @Code "@Tagged" operator, but the two cross references do
+appear naturally, and it works.
+@End @SubSection
diff --git a/doc/design/s6_2 b/doc/design/s6_2
new file mode 100644
index 0000000..2df5478
--- /dev/null
+++ b/doc/design/s6_2
@@ -0,0 +1,79 @@
+@SubSection
+    @Tag { cross.impl }
+    @Title { Implementation of cross references }
+@Begin
+@PP
+Before an object can be sized and printed, the values of any cross
+references within it must be known.  If they refer to invocations that
+have not yet been read, there is a problem.  Scribe [7]
+solves it by capitalizing on the fact that documents are formatted
+repeatedly during the drafting process.  All tagged invocations are
+copied to an auxiliary file during the first run, and indexed for quick
+retrieval on the second.  A new auxiliary file is written during the second
+run, for retrieval on the third, and so on.  Cross references always lag
+one run behind the rest of the document; a perfect copy may be produced
+by formatting the same version twice, except in a few pathological cases
+that fail to converge.
+@PP
+Cross referencing in Lout is implemented on top of a simple database
+system.  Each database is either writable or readable but not both at
+once, and holds a set of key-value entries:  the keys are @S ASCII
+strings, and the values are Lout objects, possibly with environments,
+written in Lout source.  Operations are provided for writing an entry,
+converting from writable to readable, retrieval by key, and sequential
+retrieval in key order.
+@PP
+The implementation, which is quite unsophisticated, employs one or more
+@S ASCII {@I{ database files}}, containing the values, and one @S ASCII
+{@I{ index file}} per database, containing the keys.  To write an entry,
+the value is first appended to a database file, then a line like
+@ID @Code "@Chapter&&intro  ch1.ld  57"
+is appended to the index file, giving the file and offset where the value
+is stored.  To convert from writable to readable, the index file is
+sorted.  Then retrieval by key requires a binary search of the index
+file and one seek into a database file, and sequential retrieval by key
+is trivial.
+@PP
+This database system is used in several ways.  For an external database,
+say of bibliographic references, the user creates the database file of
+values (without environments), Lout creates the index file whenever it
+cannot find one, and retrievals by key proceed as usual.  Cross
+references with tags other than @Code preceding and @Code following are
+treated as described above, by writing all tagged invocations (with
+environments) to a single database, which is converted to readable at
+the end of the run for retrievals on the next run.  Sorted galleys, such
+as index entries, are written out indexed by target and key and retrieved
+sequentially on the next run.  Unsorted galleys with preceding targets
+which pop off the top of the root galley without finding a target, such
+as entries in tables of contents, are treated similarly, except that they
+are indexed by target and a sequence number that preserves their relative
+order during the sort.
+@PP
+When Lout processes a multi-file document, one cross reference database
+file is written for each input file, but they share a common index
+file.  At end of run, the new index file is sorted and merged with the
+old one in such a way as to preserve entries relating to files not read
+on the current run.  This provides some support for piecemeal
+formatting, but eventually the files must all be formatted together.
+@PP
+When a @Code preceding or @Code following cross reference is found,
+it is attached to a galley index of type @Eq { CROSS_PREC } or
+{@Eq { CROSS_FOLL }}, together with an automatically generated tag composed
+of the current file name and a sequence number.  When a tagged
+invocation is found, it is attached to a @Eq { CROSS_TARG } index.  These
+galley indexes are carried along through the dynamic tree, and
+eventually pop off the top of the root galley, at which point it is easy
+to determine which cross references refer to which invocations, since
+the indexes are now in final printed document order.  Each referenced
+invocation is then written to the cross reference database, multiply indexed 
+by the generated tags of the associated cross references.  On the next
+run, when the same @Code preceding and @Code following cross references
+are found, chances are good that the same tags will be generated, and
+the appropriate values can be retrieved from the database immediately.
+@PP
+This approach was the genesis of the @Code "@Tagged" operator, whose
+implementation is now immediate: for each @Code "@Tagged" operator we
+produce one @Eq { CROSS_PREC } or @Eq { CROSS_FOLL } galley index,
+replacing the generated tag with the right parameter of the @Code "@Tagged"
+operator.  Nothing more is required.
+@End @SubSection
diff --git a/doc/design/s6_9 b/doc/design/s6_9
new file mode 100644
index 0000000..648a1b6
--- /dev/null
+++ b/doc/design/s6_9
@@ -0,0 +1,2 @@
+@EndSubSections
+@End @Section
diff --git a/doc/design/s7_0 b/doc/design/s7_0
new file mode 100644
index 0000000..2cb4245
--- /dev/null
+++ b/doc/design/s7_0
@@ -0,0 +1,84 @@
+@Section
+    @Title { Conclusion }
+@Begin
+@PP
+Since its public release in October 1991, the Basser Lout interpreter
+has been ported without incident to a wide variety of Unix systems and
+hardware.  It was tested extensively before release on its own
+documentation, and the few minor bugs which have emerged since then have
+all been fixed in the second release, scheduled to appear in mid-1992.
+@PP
+Seven substantial packages of definitions are distributed with Basser
+Lout.  The DocumentLayout package, and its variants ReportLayout and
+BookLayout, provide the standard features that all documents
+require:  pages, columns, paragraphs, headings, footnotes, floating
+figures and tables, chapters and sections, displays and lists, access
+to bibliographic databases, cross references, and so on
+[11].  The BookLayout package has extra features
+needed by books, including an automatically generated table of contents,
+Roman page numbers for the prefatory material, running page headers,
+odd and even page layouts, and a sorted index.  The Eq package formats
+equations, and Pas formats Pascal programs [10]; Tab
+formats tables [12]; and Fig draws figures
+[6].
+@PP
+The non-expert user who uses these packages perceives a system of a
+standard quite similar to other fully developed batch formatters,
+although the interface is considerably more coherent than, say, the troff
+family's [8].  The expert user perceives a system which
+is radically different from previous ones, in which a great deal can be
+achieved very quickly.  To take an extreme example, Pas was designed,
+implemented, tested, and documented in one afternoon.  Eq took about
+a week, but most of that time was spent in marshalling the vast
+repertoire of mathematical symbols, and fine-tuning the spacing.  Most
+of the effort seems to go into designing a good interface; most symbols
+are implemented in just one or a few lines of Lout.
+@PP
+A group of about 20 satisfied non-expert users has grown up within
+the author's department, mainly Honours students with no investment
+in older systems to hold them back.  Basser Lout has been advertised
+on the Internet news as available via anonymous {@I ftp}, so the
+extent of its outside user community is hard to gauge.  About 50
+people have mailed comments or questions to the author; many
+of these people have ported the program, written small definitions,
+and modified the standard packages.
+@PP
+Future work could usefully begin with the improvements suggested in this
+paper:  overlapping spanning columns, better semantics for available
+space, and especially horizontal galleys.  Support for non-European
+languages is also needed.  However, the main task is the development of
+an interactive document editor based on Lout.  A structure editor similar
+to Lilac [13], which already has objects and user-defined
+symbols, is envisaged; since cross references are easy when the whole
+document is available, the only major new problem is the treatment of
+galleys, including the expansion and retraction of receptive symbols.
+@LP
+@LP
+@B { Note. }  Since the above was written the author has completed a
+revised version of Basser Lout, in which the problem concerning
+available space mentioned in Section {@NumberOf style} has been resolved.
+@LP
+@LP
+@B { Acknowledgment. }  The author gratefully acknowledges many
+valuable discussions with Douglas W. Jones, especially during the
+development of the galley abstraction; and also many helpful comments on
+presentation by the anonymous referee.
+@DP
+@DP
+@Heading { References }
+@NumberedList
+@LI @RefPrint kingston91
+@LI @RefPrint kingston91over
+@LI @RefPrint kingston91basser
+@LI @RefPrint furuta82
+@LI @RefPrint kernighan75
+@LI @RefPrint kingston91fig
+@LI @RefPrint reid80
+@LI @RefPrint ossanna76
+@LI @RefPrint knuth84
+@LI @RefPrint kingston91eq
+@LI @RefPrint kingston91begin
+@LI @RefPrint kingston91tab
+@LI @RefPrint brooks91
+@EndList
+@End @Section
diff --git a/doc/expert/README b/doc/expert/README
new file mode 100644
index 0000000..9b9c3e0
--- /dev/null
+++ b/doc/expert/README
@@ -0,0 +1,19 @@
+Directory lout/doc/expert
+
+This directory contains the Lout source files
+for the Expert's Guide to the Lout Document
+Formatting System.  To produce the Guide, type
+the command
+
+	lout all > outfile.ps
+
+in this directory.  This must be done five times to
+completely resolve all cross references, although
+the PostScript file outfile.ps is printable after
+the first run.  Auxiliary files with .li and .ld
+suffixes will be created in this directory.  A
+copy of the final outfile.ps is included.  There
+should be no warning messages on the fifth run.
+
+Jeffrey H. Kingston
+!7 September 1999
diff --git a/doc/expert/all b/doc/expert/all
new file mode 100644
index 0000000..46471c0
--- /dev/null
+++ b/doc/expert/all
@@ -0,0 +1,26 @@
+@SysInclude { eq }
+@SysInclude { tab }
+@SysInclude { fig }
+@SysInclude { book }
+@SysDatabase @Reference { loutrefs }
+@Book
+   @Title { An Expert's Guide to the
+
+Lout
+
+Document Formatting System  }
+   @Author { Jeffrey H. Kingston }
+   @Edition { Version 3.17
+September, 1999 }
+   @Publisher { @I { @CopyRight Copyright 1991, 1999, Jeffrey
+H. Kingston, Basser Department of Computer Science, The University
+of Sydney 2006, Australia.} }
+   @InitialLanguage { English }
+   @OptimizePages { Yes }
+//
+
+@Include { preface }
+@Include { pri }
+@Include { det }
+@Include { pre }
+@Include { exa }
diff --git a/doc/expert/det b/doc/expert/det
new file mode 100644
index 0000000..0018d91
--- /dev/null
+++ b/doc/expert/det
@@ -0,0 +1,17 @@
+@Chapter
+   @Title { Details }
+   @Tag { details }
+@Begin
+@BeginSections
+@Include { det_lexi }
+@Include { det_name }
+@Include { det_visi }
+@Include { det_filt }
+@Include { det_prec }
+@Include { det_size }
+@Include { det_gall }
+@Include { det_sort }
+@Include { det_hori }
+@Include { det_opti }
+@EndSections
+@End @Chapter
diff --git a/doc/expert/det_filt b/doc/expert/det_filt
new file mode 100644
index 0000000..0d5405d
--- /dev/null
+++ b/doc/expert/det_filt
@@ -0,0 +1,109 @@
+@Section
+   @Title { Filtered right and body parameters }
+   @Tag { filters }
+@Begin
+@PP
+A right or body parameter may be filtered by some other computer
+program before being included by Lout.  As an example of such a program
+we will use the Unix @Code sort command:
+@ID @Code "sort  -o outfile  infile"
+This causes file @Code outfile to contain a sorted copy of file
+{@Code infile}.  We incorporate this into a Lout definition as follows:
+@ID @OneRow @Code {
+"def @Sort"
+"    named @Options {}"
+"    right x"
+"{"
+"    def @Filter { sort @Options  -o @FilterOut  @FilterIn }"
+""
+"    lines @Break x"
+"}"
+}
+The presence within @Code "@Sort" of a definition of a symbol called
+@Code "@Filter" tells Lout that the right parameter of @Code "@Sort"
+is to be filtered before inclusion.  When @Code "@Sort" is invoked,
+@Code "@Filter" is evaluated and its value executed as a system
+command.  In addition to the symbols ordinarily available within the
+body of {@Code "@Filter"}, there are three others:
+@VeryWideTaggedList
+@TI { @Code "@FilterIn" } {
+the name of a file which will, at the time the system command is
+executed, contain the actual right or body parameter of the
+symbol, exactly as it appears in the input file;
+}
+@TI { @Code "@FilterOut" } {
+the name of a file of Lout text whose contents Lout will read after
+the system command has finished, as a replacement for what was put
+into file {@Code "@FilterIn"};
+}
+@TI { @Code "@FilterErr" } {
+the name of a file that Lout will attempt to read after the system
+command has finished, containing error messages produced by the
+command that Lout will pass on to the user as non-fatal errors.  Use
+of this file is optional.
+}
+@EndList
+It is a fatal error for the system command to return a non-zero status.
+@PP
+Now the @Code sort command has options @Code -u for deleting duplicate
+lines, and @Code -r for reversing the sorting order.  So the result of
+@ID @OneRow @Code {
+"@Sort"
+"    @Options { -r -u }"
+"{"
+"Austen, Jane"
+"Dickens, Charles"
+"Eliot, George"
+"Hardy, Thomas"
+"Bront{@Char edieresis}, Charlotte"
+"}"
+}
+is
+@ID @OneRow lines @Break
+{
+Hardy, Thomas
+Eliot, George
+Dickens, Charles
+Bront{@Char edieresis}, Charlotte
+Austen, Jane
+}
+Unlike all the other examples in this manual, this output
+is simulated.  This was done so that the ability to format this
+manual is not dependent on the existence of the Unix {@Code "sort"}
+command, and it highlights the fact that filtered actual parameters
+are by their nature of uncertain portability.
+@PP
+There is no need for an actual filtered parameter to obey the lexical
+rules of Lout, since it is passed directly to the other program.  However,
+Lout must be able to work out where the parameter ends, which gives
+rise to the following rules.  As with a body parameter, a symbol
+@Code "@Sym" with a filtered parameter must be invoked in either the
+form @Code "@Sym { ... }" or the form {@Code "@Sym @Begin ... @End @Sym"},
+plus options as usual.  In the former case, braces within the
+actual parameter must match; in the latter case, the actual parameter
+may not contain {@Code "@End"}.
+@PP
+If an actual filtered parameter contains @@Include, this is taken to
+begin a Lout @@Include directive in the usual form (Section
+{@NumberOf include}):
+@ID @OneRow @Code {
+"@Sort {"
+"Austen, Jane"
+"@Include { authors }"
+"Hardy, Thomas"
+"}"
+}
+The included file becomes part of {@Code "@FilterIn"}, but any braces,
+@@Include, or @@End within it are not noticed by Lout.
+@PP
+The first character of file @Code "@FilterIn" will be the first
+non-white space character following the opening @Code "{" or @@Begin,
+or the first character of an included file if @@Include comes first.  The
+second-last character of file @Code "@FilterIn" will be the last non-white
+space character preceding the closing @Code "}" or {@Code "@End @Sym"},
+or the last character of an included file if @@Include comes last.  One
+newline character is always appended and is the last character of file
+{@Code "@FilterIn"}.  This effects a compromise between the Lout convention,
+that spaces following @Code "{" or preceding @Code "}" are not significant,
+with the Unix convention that all text files end with a newline character.
+@End @Section
diff --git a/doc/expert/det_gall b/doc/expert/det_gall
new file mode 100644
index 0000000..e68d58f
--- /dev/null
+++ b/doc/expert/det_gall
@@ -0,0 +1,370 @@
+@Section
+   @Title { Galleys and targets }
+   @Tag { targets }
+@Begin
+@PP
+The behaviour of galleys and their targets, as described in Section
+galley.feature.in.detail @SubIndex { in detail }
+targets.in.detail @SubIndex { in detail }
+{@NumberOf galleys}, can be summarized in three laws:
+@DP
+{@I {First Law}}:  The first target is the closest invocation of the
+target symbol, either preceding or following the invocation point of the
+galley as required, which has sufficient space to receive the first
+component;
+@DP
+{@I {Second Law}}:  Each subsequent target is the closest invocation of
+the target symbol, following the previous target and lying within the same
+galley, which has sufficient space to receive the first remaining component;
+@DP
+{@I {Third Law}}:  A receptive symbol that does not receive at least one
+component of any galley is replaced by @@Null.
+@DP
+The terms `closest,' `preceding,' and `following' refer to position in
+the final printed document.  This section explains the operation of
+these laws in Basser Lout.
+@PP
+When a galley cannot be fitted into just one target, Lout must find
+points in the galley where it can be split in two.  The object lying
+between two neighbouring potential split points is called a @I component
+component @Index { Components of a galley }
+of the galley.  By definition, a component cannot be split.
+@PP
+To determine the components of a galley, expand all symbols other than
+recursive and receptive ones, discard all @@Font, @@Break, @@Space,
+@@SetColor, @@SetColour, and @@Language symbols, perform paragraph
+breaking as required, and discard all redundant braces.  Then view the
+galley as a sequence of one or more objects separated by vertical
+concatenation symbols; these are the components and split points,
+except that concatenation symbols whose gaps are unbreakable
+(Section {@NumberOf concatenation}) are not eligible to be split
+points.  For example, given the definition
+@ID @OneRow @Code {
+"def @Section into { @SectionPlace&&preceding }"
+"    named @Title {}"
+"    right @Body"
+"{"
+"    15p @Font { @Title //0.7f }"
+"    //"
+"    @Body"
+"}"
+}
+the galley
+@ID @OneRow @Code {
+"@Section"
+"    @Title { Introduction }"
+"{ This is a subject that really"
+"needs no introduction. }"
+}
+becomes
+@ID @OneRow @Code {
+"Introduction"
+"//0.7f"
+"{}"
+"//"
+"This is a subject that really needs"
+"//1vx"
+"no introduction."
+}
+with four components.  If @Code "@Body" had been preceded by @Code "|1.0c" in
+the definition, the result would have been
+@ID @OneRow @Code {
+"Introduction"
+"//0.7f"
+"{}"
+"//"
+"|1.0c { This is a subject that really needs //1vx no introduction. }"
+}
+with @Code "//1vx" buried within one component and hence not a
+potential split point.  If @Code "0.7f" had been {@Code "0.7fu"},
+the gap would have been unbreakable and @Code "//0.7fu" would not
+have been a potential split point.
+@PP
+Version 3.03 has liberalized this somewhat in the following way.  When
+a component consists of a horizontal sequence of two or more objects
+@Eq { A sub 1 ,..., A sub n } separated by @Code "|" (not {@Code "||"},
+not {@Code "&"}), Lout will investigate the component to see whether
+it can be broken up.  It looks at each @Eq { A sub i } to see whether it
+is a vertical concatenation of objects @Eq { A sub i1 ,..., A sub im }; if
+two or more of the @Eq { A sub i } satisfy this condition, the component
+will not be broken up.  So now suppose we have just one @Eq { A sub i }
+which is a vertical concatenation.  Lout will break the component into
+one component for each of the @Eq { A sub i1 ,..., A sub im }, provided
+that they are separated by @Code "//" symbols (not {@Code "/"}), and
+provided this can be done without introducing any apparent change into
+the appearance of the component (this second rule will be satisfied if
+the other @Eq { A sub j } are not very large).  The example above
+satisfies all these rules and will be broken up into two components,
+so the @Code "//1vx" becomes a potential split point after all.
+@PP
+The lines of a paragraph become separate components if the paragraph
+occupies an entire component before breaking; otherwise they are
+enclosed in a @@OneRow symbol within one component.  The same is true of
+incoming components of other galleys.  If a @@Galley symbol occupies an
+entire component by the rules above, then the incoming components that
+replace it become components of their new home:
+@ID @Tab
+  @Fmta { @Col @Code A ! @Col lines @Break B ! @Col @Code C }
+{
+@Rowa
+   A {
+"An example"
+"//0.5c"
+"@Galley"
+"//0.5c"
+"@SomethingList"
+}
+  B {
+""
+@Eq { ==> }
+}
+   C {
+"An example"
+"//0.5c"
+"Incoming components"
+"//0.2c"
+"from some other galley"
+"//0.5c"
+"@SomethingList"
+}
+}
+Otherwise the incoming components are grouped within a @@OneRow symbol
+and lie within one component.
+@PP
+This distinction has a marked effect on the vertical concatenation
+b.unit.use @SubIndex { use in @Code "//1.1b" }
+symbol {@Code "//1.1b"}, which calls for more space than is available
+(Section {@NumberOf concatenation}).  There is no room for this symbol
+within any component, so it will force a split and be discarded in that
+case.  But it can be promoted to between two components.
+@PP
+Components may be separated by @Code "/" as well as by {@Code "//"},
+giving rise to column mark alignment between adjacent components:
+@ID @ShowVMark {
+@HContract @GreyBox { 1c @Wide ^| 1c @Wide 0.6c @High }
+/0.3c
+@HContract @GreyBox { 2c @Wide 0.6c @High }
+/0.3c
+@HContract @GreyBox { 0.5c @Wide ^| 0.8c @Wide 0.6c @High }
+}
+When aligned components are promoted into different targets, the meaning
+of alignment becomes very doubtful.  For example, what if the targets
+mark.alignment.in.detail @SubIndex { in detail }
+are in different columns of one page, or what if one lies within
+{@Code "90d @Rotate"}?
+@PP
+The truth is that @Code "/" causes all the objects that share a mark to
+have equal width:
+@ID @ShowVMark {
+@TightBox @HContract @GreyBox { 1c @Wide ^| 1c @Wide 0.6c @High }
+/0.3c
+@TightBox @HContract @GreyBox { 2c @Wide 0.6c @High }
+/0.3c
+@TightBox @HContract @GreyBox { 0.5c @Wide ^| 0.8c @Wide 0.6c @High }
+}
+This is a consequence of the `as wide as possible' rule (Section
+{@NumberOf size}).  Mark alignment occurs {@I incidentally}, whenever
+the fragments are placed into similar contexts.
+@PP
+In this connection we must also consider the special case of a @@Galley
+symbol which shares its column mark with some other object:
+@ID @OneRow @Code {
+"@Galley"
+"/0.2c"
+"@SomethingList"
+}
+(The @@Galley may or may not occupy an entire component; that doesn't
+matter here.)  If incoming components are separated by @Code "//" rather
+than by {@Code "/"}, the meaning is so doubtful that this is forbidden.  In
+fact, a galley whose components replace such a @@Galley must have a
+single column mark running its full length; that is, its components must
+all share a single column mark.  This mark will be merged with the
+column mark passing through each @@Galley that these components replace;
+all the objects on the resulting merged mark will have equal width.
+@PP
+The root galley, where everything collects immediately prior to output,
+root.galley.in.detail @SubIndex { in detail }
+is created automatically, not by a definition.  Its target is the output
+file, and its object is the entire input, which typically looks like this:
+@ID @OneRow @Code {
+"@PageList"
+"//"
+"@Text {"
+"  Body text of the document ..."
+"}"
+}
+where @Code "@PageList" expands to a sequence of pages containing
+@Code "@TextPlace" symbols (see Section {@NumberOf definitions}), and
+@Code "@Text" is a galley:
+@ID @OneRow @Code {
+"def @TextPlace { @Galley }"
+""
+"def @Text into { @TextPlace&&preceding }"
+"    right x"
+"{"
+"    x"
+"}"
+}
+The spot vacated by a galley -- its invocation point -- becomes a @@Null
+object, so this root galley is effectively @Code "@PageList" alone, as
+required.  The @Code "@Text" galley will find its first target preceding
+its invocation point, within {@Code "@PageList"}.
+@PP
+Printing {@PageMark rootg} the root galley on the output file is
+somewhat problematical,
+root.galley.printing @SubIndex { printing of }
+because Lout has no way of knowing how large the paper is.  Basser Lout
+simply prints one root galley component per page (except it skips
+components of height zero), and the user is responsible for ensuring
+that each component is page-sized.  Gaps between root galley
+components, even unbreakable ones, have no effect on the result.
+@PP
+Basser Lout will promote a component only after any receptive symbols
+components.promotion @SubIndex { promotion of }
+promotion @Index { Promotion of components }
+within it have been replaced, either by galleys or by @@Null, since
+until then the component is not complete.  A component which shares a
+mark with following components is held up until they are all complete,
+since until then their width is uncertain.
+@PP
+Consider a page with @Code "@TextPlace" and @Code "@FootSect" receptive
+symbols.  The rule just given will prevent the page from being printed
+until @Code "@TextPlace" is replaced by body text, quite rightly; but
+@Code "@FootSect" will also prevent its printing, even when there are no
+footnotes.
+@PP
+Basser Lout is keen to write out pages as soon as possible, to save memory,
+and it cannot afford to wait forever for non-existent footnotes.  A variant
+of the galley concept, called a @I {forcing galley},
+forcing.galley @Index { Forcing galley } {@PageMark forcing}
+is introduced to solve this problem.  A forcing galley is defined like this:
+@ID @OneRow @Code {
+"def @Text force into { @TextPlace&&preceding }"
+"   ..."
+}
+and so on.  When such a galley replaces a @@Galley symbol, Lout replaces
+every receptive symbol preceding the @@Galley by @@Null, thus ensuring that
+as soon as text enters a page, for example, everything up to and including
+the preceding page can be printed.  This does not take care of the very last
+page, but Basser Lout replaces all receptive symbols by @@Null when it realizes
+that its input has all been read, thus allowing the last page to print.
+@PP
+A forcing galley causes the Third Law to be applied earlier than
+expected, and this creates two problems.  First, the replacement by
+@@Null may be premature:  a galley may turn up later wanting one of the
+defunct targets.  Such galleys (entries in tables of contents are
+typical examples) are copied into the cross reference database and read
+in during the next run just before their targets are closed, and so they
+find their targets in the end.  Care must be taken to ensure that
+large galleys such as chapters and sections do not have defunct targets,
+since the cost of copying them to and from the database is unacceptably high.
+@PP
+It is actually an over-simplification to say that these replacements
+occur when the forcing galley replaces its @@Galley.  What really happens
+is that from this moment on Lout understands that it has the right to make
+these replacements, and it will do each one at the first moment when not
+doing it would hold things up.  So there is a short period of grace when
+galleys, such as the entries in tables of contents just alluded to,
+can sneak into these receptive symbols.
+@PP
+The @Code "into" and @Code "force into" forms are actually just abbreviations
+for the true way that galleys are defined, which
+is by giving the symbol that is to be a galley a parameter or nested
+target.sym @Index { @Code "@Target" symbol }
+definition with the special name {@Code "@Target"}:
+@ID @Code {
+"def @Text"
+"    right x"
+"{"
+"    def @Target { @TextPlace&&preceding }"
+""
+"    x"
+"}"
+}
+A forcing galley is obtained by using @Code "&&&" instead of
+{@Code "&&"}.  @Code "@Target" may be an arbitrary object,
+provided that it yields such a cross reference when evaluated.  In
+this way, different invocations may have different targets.
+@PP
+The forcing galley effect can be obtained in another way, by replacing
+the @Code "@Galley" symbol to which the galley is attached by
+{@Code "@ForceGalley"}.  The advantage of this form is that the galley
+can then be forcing at some places and not at others, using the formula
+@ID @OneRow @Code {
+"def @SomePlace right x"
+"{"
+"    x @Case {"
+"        noforce  @Yield @Galley"
+"        force    @Yield @ForceGalley"
+"    }"
+"}"
+}
+Now a galley may have @Code "@SomePlace" for its target, and if it
+happens to attach to
+@ID @Code "@SomePlace force"
+it will have the effect of a forcing galley, while if it happens to
+attach to
+@ID @Code "@SomePlace noforce"
+it will not.
+@PP
+Although it doesn't matter whether a galley is declared as a forcing
+galley or merely arrives at a {@Code "@ForceGalley"} symbol from the
+point of view of the effect on nearby targets, there is one way in
+which Lout treats the two cases differently.  If a forcing galley's
+first component does not fit into the available space, that component
+will be scaled vertically until it does.  The rationale for this is
+that forcing galleys are meant to carry the bulk of the document and
+cannot afford to be held up because the user has inadvertently included
+an over-high component, which for all Lout knows to the contrary may
+not fit on any page.  If this scaling is not wanted but forcing is,
+the galley may be declared not forcing but all its targets may be set
+to contain {@Code "@ForceGalley"}.
+@PP
+Within a galley, a symbol whose name is @@Enclose has a special
+enclose.sym @Index @@Enclose
+meaning:  when components of the galley replace a @@Galley or @@ForceGalley
+symbol, that symbol is first replaced by @@Enclose @@Galley or
+@@Enclose @@ForceGalley.  For example,
+@ID @Code {
+"def @Enclose"
+"    right x"
+"{"
+"    @Box x"
+"}"
+}
+within some galley definition causes each @@Galley or @@ForceGalley
+symbol that receives components of the galley to be replaced by
+{@Code "@Box @Galley"} or {@Code "@Box @ForceGalley"}, assuming an
+appropriate definition of @Code "@Box".  This is useful, for example,
+when producing multi-page boxed displays, figures, and tables.
+@PP
+An @@Enclose symbol may have only one parameter, which must be a
+right parameter.  It would not make sense to allow more parameters,
+since there is no suitable value to assign to them.  However, the
+@@Enclose symbol may contain inner definitions, and it may make use
+of any symbol that is available at that point, in the usual way.
+@PP
+A @Code "following" galley may fail to find a first target lying in a
+following component of the same galley as its invocation point.  This is
+a deficiency of Basser Lout, which occurs if the target has not been
+read from input at the time the galley tries to find it.  A workaround
+is to use a @Code "preceding" galley instead, defined like this:
+@ID @OneRow @Code {
+"def @AGalley into { @AGalleyPlace&&preceding }"
+"    right @Body"
+"{"
+"    //1.1b"
+"    @Body"
+"}"
+}
+and invoked like this:
+@ID @OneRow @Code {
+"@AGalleyPlace | @AGalley { content of galley }"
+"//"
+"..."
+"@AGalleyPlace"
+}
+The first @Code "@AGalleyPlace" receives only the initial empty object,
+since the @Code "//1.1b" forces a split; and the Second Law puts Basser
+Lout on the right track thereafter.
+@End @Section
diff --git a/doc/expert/det_hori b/doc/expert/det_hori
new file mode 100644
index 0000000..ad81dc4
--- /dev/null
+++ b/doc/expert/det_hori
@@ -0,0 +1,91 @@
+@Section
+   @Title { Horizontal galleys }
+   @Tag { horizontal }
+@Begin
+@PP
+All the galleys so far have been @I { vertical galleys }:  galleys
+whose components are separated by vertical concatenation symbols.  There
+are also horizontal galleys, whose components are separated by the
+horizontal concatenation operator @Code "&" (or equivalently, by
+spaces).  These work in the same way as vertical galleys, except for
+the change of direction.  For example, the following defines the
+equivalent of an ordinary outdented paragraph, except that an option
+is provided for varying the size of the outdent:
+@ID @Code {
+"def @OutdentPar"
+"    named outdent { 2f }"
+"    right x"
+"{"
+"    def @ParPlace { @Galley }"
+""
+"    def @LineList"
+"    {"
+"        outdent @Wide {} | @PAdjust @ParPlace"
+"        //1vx @LineList"
+"    }"
+""
+"    def @ParGalley force horizontally into { @ParPlace&&preceding }"
+"        right x"
+"    {"
+"        x"
+"    }"
+""
+"        @PAdjust @ParPlace"
+"    //  @ParGalley { x &1rt }"
+"    //1vx  @LineList"
+"}"
+}
+Notice the use of @Code "&1rt" to cancel the effect of @Code "@PAdjust"
+on the last line of the paragraph.  This definition has a problem in
+that there will be a concluding unexpanded @Code "@LineList" symbol
+which will hold up promotion of the enclosing galley; this problem
+may be fixed by the same method used to end a list.
+@PP
+In an ideal world, there would be nothing further to say about horizontal
+galleys.  However there are a few differences which arise from various
+practical considerations and limitations.  Perhaps some day a more
+perfect symmetry will be implemented.
+@PP
+Each vertical galley has a fixed finite width, and every component is
+broken to that width.  This is needed basically to trigger paragraph
+breaking.  However, there is no equivalent of paragraph breaking in
+the vertical direction, so horizontal galleys do not have any particular
+fixed height.  Instead, each component has its own individual height.
+@PP
+When two objects are separated by {@Code "/"}, they
+are assigned the same width (Section {@NumberOf targets}), and
+this holds true even if the two objects are subsequently separated
+by being promoted into different targets.  For example, two aligned
+equations will have the same width, and hence their alignment will be
+preserved, even if they appear in different columns or pages.  However,
+even though @Code "&" aligns the marks of its two parameters, it does
+not assign them a common height.  This means that the height of any
+component of a horizontal galley promoted into one target does not
+affect the height consumed by the components promoted into any other
+target.  The other horizontal concatenation operator, {@Code "|"},
+does assign a common height to its two parameters; but sequences of
+objects separated by this operator cannot be the components of a
+horizontal galley.
+@PP
+Lout is able to read vertical galleys one paragraph at a time; in this
+way it processes the document in small chunks, never holding more than
+a few pages in memory at any time.  However, horizontal galleys are
+always read in completely, so they should not be extremely long.
+@PP
+In principle Lout should be able to hyphenate the components of
+horizontal galleys when they are simple words, but this is not
+implemented at present.
+@PP
+In an ideal world, every paragraph would be treated as a horizontal
+galley.  However, to do so in practice would be too slow and would
+lead to excessive clumsiness in notation, so at present Lout has
+two competing mechanisms in this area:  the built-in paragraph
+breaker with its limited set of options as given under the @Code
+"@Break" operator, and horizontal galleys.  As the example above
+shows, horizontal galleys are in principle capable of implementing
+many more paragraph styles than the built-in paragraph breaker
+could ever hope to do.  The recommended practical strategy is to use
+the built-in paragraph breaker most of the time, and switch to
+horizontal galleys only for occasional tricks, such as paragraphs
+with drop capitals, circular outlines, etc.
+@End @Section
diff --git a/doc/expert/det_lexi b/doc/expert/det_lexi
new file mode 100644
index 0000000..e0ad9f1
--- /dev/null
+++ b/doc/expert/det_lexi
@@ -0,0 +1,253 @@
+@Section
+  @Tag { lexical }
+  @Title { Lexical structure (words, spaces, symbols) and macros }
+@Begin
+@PP
+The input to Lout consists of a sequence of @I {textual units},
+textual.unit @Index {Textual unit }
+which may be
+either {@I{white spaces}},
+@I identifiers,
+@I delimiters,
+or
+@I {literal words}.  Each
+is a sequence of @I characters chosen from:
+letter @Index { Letter character }
+other @Index { Other character }
+quote @Index { Quote character }
+escape @Index { Escape character }
+comment.char @Index { Comment character }
+underscore.char @Index { Underscore character }
+@ID @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col A ! @Col B }
+{
+@Rowa A { letter      } B { @Code "@ab-zAB-Z_" }
+@Rowa A { white space } B { @I { space  formfeed  tab  newline } }
+@Rowa A { quote       } B { @Code "\"" }
+@Rowa A { escape      } B { @Code "\\" }
+@Rowa A { comment     } B { @Code "#" }
+@Rowa A { other       } B { @Code "!$%&'()*+,-./0123456789:;<=>?[]^`{|}~" }
+}
+Notice that @Code "@" and @Code "_" are classed as letters.  Basser
+Lout accepts the accented letters of the ISO-LATIN-1 character set
+(depending on how it is installed), and these are also classed as
+letters.  The ten digits are classed as `other' characters, and in
+fact the `other' class contains all 8-bit characters (except octal 0)
+not assigned to previous classes.
+@PP
+A @I {white space} is a sequence of one or more white space characters.
+white.space @Index { White space }
+formfeed @Index { Formfeed }
+space.f @Index { Space }
+ Lout treats the formfeed character exactly like the space character;
+it is useful for getting page breaks when printing Lout source code.
+@PP
+A @I delimiter is a sequence of one or more `other' characters which
+delimiter @Index { Delimiter }
+is the name of a symbol.  For example, @Code "{" and @Code "//" are
+delimiters.  When defining a delimiter, the name must be enclosed
+in quotes:
+@ID @Code {
+"def  \"^\"  { {}  ^&  {} }"
+}
+but quotes are not used when the delimiter is invoked.  A delimiter may
+have delimiters and any other characters adjacent, whereas identifiers
+may not be adjacent to letters or other identifiers.  The complete list
+of predefined delimiters is
+@ID @OneRow @Code {
+{
+      "/"
+  @JL "//"
+  @JL "^/"
+  @JL "^//"
+} |2.2cx {
+      "|"
+  @JL "||"
+  @JL "^|"
+  @JL "^||"
+} |2.2cx {
+      "&"
+  @JL "^&"
+} |2.2cx {
+      "&&"
+  @JL "{"
+  @JL "}"
+}
+}
+A longer delimiter like @Code "<=" will be recognised in
+preference to a shorter one like {@Code "<"}.
+@PP
+An @I identifier is a sequence of one or more letters which is the name of a
+identifier @Index { Identifier }
+symbol.  It is conventional but not essential to begin identifiers with
+{@Code "@"};  Basser Lout will print a warning message if it finds an
+unquoted literal word (see below) beginning with {@Code "@"}, since such
+words are usually misspelt identifiers.  The ten digits are not letters
+and may not appear in identifiers; and although the underscore character
+is a letter and may be used in identifiers, it is not conventional to
+do so.  The complete list of predefined identifiers is
+@ID @OneRow @Code {
+{     "@BackEnd"
+  @JL "@Background"
+  @JL "@Begin"
+  @JL "@Break"
+  @JL "@Case"
+  @JL "@Common"
+  @JL "@Char"
+  @JL "@CurrFace"
+  @JL "@CurrFamily"
+  @JL "@CurrLang"
+  @JL "@Database"
+  @JL "@End"
+  @JL "@Enclose"
+  @JL "@Filter"
+  @JL "@FilterErr"
+  @JL "@FilterIn"
+  @JL "@FilterOut"
+  @JL "@Font"
+  @JL "@ForceGalley"
+  @JL "@Galley"
+  @JL "@Graphic"
+  @JL "@HAdjust"
+  @JL "@HContract"
+  @JL "@HCover"
+  @JL "@HExpand"
+  @JL "@High"
+  @JL "@HLimited"
+  @JL "@HScale"
+  @JL "@HShift"
+  @JL "@HSpan"
+} |4.4cx {
+      "@Include"
+  @JL "@IncludeGraphic"
+  @JL "@Insert"
+  @JL "@KernShrink"
+  @JL "@Key"
+  @JL "@Language"
+  @JL "@LClos"
+  @JL "@LEnv"
+  @JL "@LInput"
+  @JL "@LVis"
+  @JL "@LUse"
+  @JL "@Meld"
+  @JL "@Merge"
+  @JL "@Minus"
+  @JL "@Moment"
+  @JL "@Next"
+  @JL "@NotRevealed"
+  @JL "@Null"
+  @JL "@OneCol"
+  @JL "@OneOf"
+  @JL "@OneRow"
+  @JL "@Open"
+  @JL "@Optimize"
+  @JL "@PAdjust"
+  @JL "@PageLabel"
+  @JL "@PlainGraphic"
+  @JL "@Plus"
+  @JL "@PrependGraphic"
+  @JL "@RawVerbatim"
+  @JL "@Rotate"
+} |4.4cx {
+      "@Rump"
+  @JL "@Scale"
+  @JL "@SetColor"
+  @JL "@SetColour"
+  @JL "@Space"
+  @JL "@StartHSpan"
+  @JL "@StartHVSpan"
+  @JL "@StartVSpan"
+  @JL "@SysDatabase"
+  @JL "@SysInclude"
+  @JL "@SysIncludeGraphic"
+  @JL "@SysPrependGraphic"
+  @JL "@Tag"
+  @JL "@Tagged"
+  @JL "@Target"
+  @JL "@Underline"
+  @JL "@Use"
+  @JL "@VAdjust"
+  @JL "@VContract"
+  @JL "@VCover"
+  @JL "@Verbatim"
+  @JL "@VExpand"
+  @JL "@VLimited"
+  @JL "@VScale"
+  @JL "@VShift"
+  @JL "@VSpan"
+  @JL "@Wide"
+  @JL "@Yield"
+  @JL "@YUnit"
+  @JL "@ZUnit"
+}
+}
+plus the names of the parameters of @@Moment.  The symbols @@LClos, @@LEnv,
+lclos @Index { @@LClos symbol }
+lenv @Index { @@LEnv symbol }
+linput @Index { @@LInput symbol }
+lvis @Index { @@LVis symbol }
+luse @Index { @@LUse symbol }
+@@LInput, @@LVis and @@LUse appear in cross reference databases generated
+by Lout and are not for use elsewhere.
+@PP
+A sequence of characters which is neither a white space, an identifier, nor a
+delimiter, is by default a @I {literal word}, which means that it will
+word @Index { Word }
+literal.word @Index { Literal word }
+quoted.word @Index { Quoted word }
+pass through Lout unchanged.  An arbitrary sequence of characters
+enclosed in double quotes, for example @Code "\"{  }\"", is also a
+literal word.  Space characters may be included, but not tabs or
+newlines.  There are special character sequences, used only between
+quotes, for obtaining otherwise inaccessible characters:
+@ID @Tab
+   vmargin { 0.5vx }
+   @Fmta { @Col A ! @Col B }
+{
+@Rowa A { @Code "\\\""   } B { produces @Code "\"" }
+@Rowa A { @Code "\\\\"   } B { "\\" }
+@Rowa A { @Code "\\ddd"  } B { the character whose ASCII code is }
+@Rowa A {                } B { the up to three digit octal number {@Code ddd} }
+}
+So, for example, @Code "\"\\\"@PP\\\"\"" produces {@Code "\"@PP\""}.
+@PP
+When the comment character
+comment @Index { Comment }
+@Code "#" is encountered, everything from
+that point to the end of the line is ignored.  This is useful for
+including reminders to oneself, like this:
+@ID @OneRow @Code {
+"# Lout user manual"
+"# J. Kingston, June 1989"
+}
+for temporarily deleting parts of the document, and so on.
+@PP
+@I Macros
+macro @Index { Macro }
+provide a means of defining symbols which stand for a
+sequence of textual units rather than an object.  For example, the macro
+definition
+@ID @Code {
+"macro  @PP  {  //1.3vx  2.0f @Wide  &0i }"
+}
+makes Lout replace the symbol @Code "@PP" by the given textual units
+before assembling its input into objects.  A similar macro to this
+one is used to separate the paragraphs of the present document.  The
+enclosing braces and any spaces adjacent to them are dropped, which can
+be a problem:  @Code "@PP2i" has result {@Code "//1.3vx 2.0f @Wide &0i2i"}
+which is erroneous.
+@PP
+The meaning of symbols used within the body of a macro is determined by
+where the macro is defined, not by where it is used.  Due to implementation
+problems, @@Open symbols will not work within macros.  Named and body
+parameters will work if the symbol that they are parameters of is also
+present.  There is no way to get a left or right brace into the body of
+a macro without the matching brace.
+@PP
+Macros may be nested within other definitions and exported, but they may
+not be parameters.  They may not have parameters or nested definitions
+of their own, and consequently a preceding @Code export clause (Section
+{@NumberOf visibility}) would be pointless; however, an @Code import
+clause is permitted.
+@End @Section
diff --git a/doc/expert/det_name b/doc/expert/det_name
new file mode 100644
index 0000000..ae3dac2
--- /dev/null
+++ b/doc/expert/det_name
@@ -0,0 +1,90 @@
+@Section
+  @Tag { named }
+  @Title { Named parameters }
+@Begin
+@PP
+In addition to left and right (or body) parameters, a symbol may have
+any number of {@I {named parameters}}:
+parameter.named @SubIndex { @Code named parameter }
+named.par @Index { @Code named parameter }
+@ID @OneRow @Code  {
+"def @Chapter"
+"    named @Tag {}"
+"    named @Title {}"
+"    right x"
+"{"
+"    ..."
+"}"
+}
+Their definitions appear in between those of any left and right
+parameters, and each is followed by a @I {default value} between
+default @Index { Default value of parameter }
+braces.  When @Code "@Chapter" is invoked, its named parameters are
+given values in the following way:
+@ID @OneRow @Code  {
+"@Chapter"
+"    @Tag { intro }"
+"    @Title { Introduction }"
+"{"
+"    ..."
+"}"
+}
+That is, a list of named parameters appears immediately following the
+symbol, each with its value enclosed in braces.  Any right parameter
+follows after them.  They do not have to appear in the order they were
+defined, and they can even be omitted altogether, in which case the
+default value from the definition is used instead.
+@PP
+If the keyword @Code "compulsory" appears after @Code "named" and
+before the parameter's name, Lout will print a warning message whenever
+this parameter is missing.  However it will still use the default value
+as just described.
+@PP
+A named @Code "@Tag" parameter
+tag.par @Index { @Code "@Tag" parameter, default value of }
+does not take its default value from the definition; instead, if a default
+value is needed, Lout invents a simple word which differs from every other
+tag.  This is important, for example, in the production of numbered
+chapters and sections (Section {@NumberOf chapters}).  The same thing occurs
+if there is a @Code "@Tag" parameter but its value is the empty object:  the
+value will be replaced by an invented one.
+@PP
+Named parameters may have parameters, {@PageMark strange} as in the
+following definition:
+@ID @OneRow @Code {
+"def @Strange"
+"    named @Format right @Val { [@Val] }"
+"    right x"
+"{"
+"    @Format x"
+"}"
+}
+The named parameter @Code "@Format" has right parameter {@Code "@Val"},
+and the default value of @Code "@Format" is this parameter enclosed in
+brackets.  When @Code "@Format" is invoked it must be supplied with
+a right parameter, which will replace {@Code "@Val"}.  Thus,
+@ID @Code {
+"@Strange 27"
+}
+equals @Code "@Format 27" and so has result
+@ID {
+@Strange 27
+}
+The @Code "@Format" symbol is like a definition with parameters whose
+body can be changed:
+@ID @OneRow @Code {
+"@Strange"
+"    @Format { Slope @Font @Val. }"
+"27"
+}
+still equals {@Code "@Format 27"}, but this time the result is
+@ID {
+@Strange
+    @Format { Slope @Font @Val. }
+27
+}
+In practice, examples of named parameters with parameters all have this
+flavour of format being separated from content; running headers (Section
+{@NumberOf pagelayout}) and printing styles for bibliographies
+(Section {@NumberOf biblio}) are two major ones.
+@End @Section
diff --git a/doc/expert/det_opti b/doc/expert/det_opti
new file mode 100644
index 0000000..981b468
--- /dev/null
+++ b/doc/expert/det_opti
@@ -0,0 +1,39 @@
+@Section
+   @Title { Optimal galley breaking }
+   @Tag { optimal }
+@Begin
+@PP
+As explained in Section {@NumberOf targets}, the components of a galley
+optimal.gall @Index { Optimal galley breaking }
+are promoted one by one into a target.  When space runs out there, the
+galley searches for a new target and promotion resumes.
+@PP
+This process is exactly analogous to placing words onto a line until
+space runs out, then moving to another line.  But, as we know, that
+simple method is inferior to the optimal paragraph breaking used by
+Lout (copied from the @TeX system), which examines the entire paragraph
+and determines the most even assignment of words to lines.
+@PP
+Lout offers @I { optimal galley breaking }, the equivalent for galleys
+of optimal paragraph breaking.  Optimal galley breaking can reduce the
+size of ugly blank spaces at the bottom of pages preceding large
+unbreakable displays, sometimes quite dramatically.
+@PP
+Optimal galley breaking is applied to each galley, horizontal or
+vertical, that possesses a parameter or nested symbol called
+@Code "@Optimize" whose value is {@Code Yes}.  Like cross referencing,
+optimize.sym @Index { @Code "@Optimize" symbol }
+it takes two runs to have effect.  On the first run, Lout records the
+sizes of the galley's components and gaps, and also the space available
+at each of its targets.  At end of run this information is used to find
+an optimal break, which is written to the cross-reference database.  On
+the second run, the optimal break is retrieved and used.
+@PP
+Considering that this process must cope with floating figures,
+new page and conditional new page symbols, breaks for new chapters, and
+evolving documents, it is surprisingly robust.  If it does go badly
+wrong, removing file @Code "lout.li" then running Lout twice without
+changing the document may solve the problem.  However, cases are known
+where the optimization never converges.  These are usually related to
+figures and footnotes whose anchor points fall near page boundaries.
+@End @Section
diff --git a/doc/expert/det_prec b/doc/expert/det_prec
new file mode 100644
index 0000000..c2dd72d
--- /dev/null
+++ b/doc/expert/det_prec
@@ -0,0 +1,103 @@
+@Section
+   @Title { Precedence and associativity of symbols }
+   @Tag { precedence }
+@Begin
+@PP
+Every symbol in Lout has a {@I precedence},
+preceden @Index { Precedence }
+which is a positive whole number.  When two symbols compete for an object,
+the one with the higher precedence wins it.  For example,
+@ID @Code {
+"a  |  b  /  c"
+}
+is equivalent to @OneCol @Code { "{" a "|" b "}" "/" c } rather than
+{@OneCol @Code { a "|" "{" b "/" c "}"} }, because @Code "|" has higher
+precedence than @Code "/" and thus wins the {@Code b}.
+@PP
+When the two competing symbols have equal precedence, Lout applies a
+second rule.  Each symbol is either @I left-associative or
+associativity @Index { Associativity }
+{@I right-associative}.  The value of @OneCol @Code { a op1 b op2 c} is taken
+to be @OneCol @Code { "{" a op1 b "}" op2 c } if the symbols are both
+left-associative, and @OneCol @Code "a op1 { b op2 c }" if they are
+right-associative.  In cases not covered by these two rules, use braces.
+@PP
+It sometimes happens that the result is the same regardless of how the
+expression is grouped.  For example, @OneCol @Code { "{" a "|" b "}" "|" c }
+and @OneCol @Code { a "|" "{" b "|" c "}" } are always the same, for any
+combination of objects, gaps, and variants of {@Code "|"}.  In such cases
+the symbols are said to be {@I associative}, and we can confidently omit
+the braces.
+@PP
+User-defined symbols may be given a precedence and associativity:
+@ID @OneRow @Code {
+"def @Super"
+"   precedence 50"
+"   associativity right"
+"   left x"
+"   right y"
+"{"
+"   @OneRow { | -2p @Font y ^/0.5fk x }"
+"}"
+}
+They come just after any @Code into clause and before any parameter
+definitions.  The precedence may be
+any whole number between 10 and 100, and if omitted is assigned the
+value 100.  The higher the number, the higher the precedence.  The
+associativity may be @Code left or {@Code right}, and if omitted
+defaults to {@Code right}.  Lout's symbols have the following
+precedences and associativities:
+@ID @Tab
+   vmargin { 0.5vx }
+   @Fmta { @Col @CC A ! @Col @CC B ! @Col C }
+{
+@Rowa
+   A { Precedence }
+   B { Associativity }
+   C { Symbols }
+@Rowa
+@Rowa
+   A { 5 }
+   B { associative }
+   C { @Code "/  ^/  //  ^//" }
+@Rowa
+   A { 6 }
+   B { associative }
+   C { @Code "|  ^|  ||  ^||" }
+@Rowa
+   A { 7 }
+   B { associative }
+   C { @Code "&  ^&" }
+@Rowa
+   A { 7 }
+   B { associative }
+   C { @Code "&" in the form of one or more white space characters }
+@Rowa
+   A { 10-100 }
+   B { @Code left or @Code right }
+   C { user-defined symbols }
+@Rowa
+   A { 100 }
+   B { @Code right }
+   C { @@Wide, @@High, @@Graphic, etc. }
+@Rowa
+   A { 101 }
+   B { - }
+   C { @Code "&&" }
+@Rowa
+   A { 102 }
+   B { associative }
+   C { @Code "&" in the form of 0 spaces }
+@Rowa
+   A { 103 }
+   B { - }
+   C { Body parameters and right parameters of @@Open }
+}
+Actually the precedence of juxtaposition (two objects separated
+by zero spaces) is a little more complicated.  If either of the
+two objects is enclosed in braces, the precedence is 7 as for
+one or more spaces.  If neither object is enclosed in braces,
+the precedence is 102 as shown above.  This complicated rule
+seems to accord better with what people expect and need in
+practice than a pure precedence rule can do.
+@End @Section
diff --git a/doc/expert/det_size b/doc/expert/det_size
new file mode 100644
index 0000000..aea894b
--- /dev/null
+++ b/doc/expert/det_size
@@ -0,0 +1,145 @@
+@Section
+   @Title { The style and size of objects }
+   @Tag { size }
+@Begin
+@PP
+This section explains how Lout determines the style and size of each
+object.  Together, these attributes determine the object's final
+appearance in the output.
+style @Index { Style of an object }
+@PP
+The style of an object comprises the following:
+@BulletList
+@ListItem { Which font family, face and size to use (also defining the
+@Code f unit); }
+@ListItem { Whether small capitals are in effect or not; }
+@ListItem { What gap to replace a single space between two objects by (also
+defining the @Code s unit); }
+@ListItem { The interpretation to place on white space separating
+two objects ({@Code lout}, {@Code compress}, {@Code separate}, {@Code troff},
+or {@Code tex} as in Section {@NumberOf space}); }
+@ListItem { The current value of the @Code y and @Code z units of
+measurement (Section {@NumberOf yunit}); }
+@ListItem { The kind of paragraph breaking to employ ({@Code adjust},
+{@Code ragged}, etc.) }
+@ListItem { What gap to insert between the lines of paragraphs
+(also defining the @Code v unit); }
+@ListItem { Whether to permit hyphenation or not; }
+@ListItem { What colour the object is to appear in; }
+@ListItem { The language of the object; }
+@ListItem { Whether @@VAdjust, @@HAdjust and @@PAdjust are in effect. }
+@EndList
+The style of an object depends on where it appears in the final
+document.  For example, the style of a parameter depends on where it is
+used; the style of a galley is the style of the first target that it
+attempts to attach itself to.  Of course, the style of any object can be
+changed by using the @@Font, @@Break, @@Space, @@SetColour or
+@@SetColor, and @@Language symbols.
+@PP
+There are no standard default values for style, except that small capitals
+are initially off, the interpretation of white space is initially {@Code
+lout}, and the values of the @Code y and @Code z units are zero.  Therefore
+one must ensure that the root galley or each of its components is enclosed
+in @@Font, @@Break, @@SetColour or @@SetColor, and @@Language symbols.  From
+there the style is passed to incoming galleys and the objects within
+them.  Enclosure in @@Space is not required because the @Code "s" unit
+is also set by @@Font (Section {@NumberOf space}).
+@PP
+width. @Index { Width of an object }
+height. @Index { Height of an object }
+size. @Index { Size of an object }
+The remainder of this section explains how the size of each object (its
+width and height on the printed page) is determined.  We will treat width
+only, since height is determined in exactly the same way, except that the
+complications introduced by paragraph breaking are absent.
+@PP
+With three exceptions (see below), the width of an object is as large as
+it possibly could be without violating a @@Wide symbol or intruding into
+the space occupied by neighbouring gaps or objects.  As an aid to
+investigating this rule, we will use the definition
+@ID @OneRow @Code {
+"def @TightBox right x"
+"{"
+"  \"0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke\""
+"  @Graphic x"
+"}"
+}
+which draws a box around the boundary of its right parameter (Section
+{@NumberOf graphic}) with no margin.  The result of
+@ID @Code {
+"5c @Wide @TightBox metempsychosis"
+}
+is
+@ID {
+5c @Wide @TightBox metempsychosis
+}
+The widest that @Code "@TightBox metempsychosis" could possibly be is five
+centimetres, and accordingly that is its width.  The same applies to
+{@Code metempsychosis}, which is five centimetres wide as well.  Note
+carefully that there is no object in this example whose width is equal
+to the sum of the widths of the letters of {@Code metempsychosis}.
+@PP
+The first of the three exceptions to the `as wide as possible' rule is the
+@@HContract symbol, which causes the width of its right parameter to be
+reduced to a reasonable minimum (a formal definition will not be attempted):
+@ID @OneRow @Code {
+"5c @Wide @HContract @TightBox metempsychosis"
+}
+produces
+@ID {
+5c @Wide @HContract @TightBox metempsychosis
+}
+The object @Code "@HContract @TightBox metempsychosis" is still five centimetres
+wide, but the object @Code "@TightBox metempsychosis" has been reduced.
+@PP
+The second of the three exceptions is the horizontal concatenation symbol
+@Code "|" (and also {@Code "&"}).  Consider this example:
+@ID @OneRow @Code {
+"5c @Wide @TightBox { A  |1c  B  |1c  C }"
+}
+As usual, the right parameter of @@Wide is five centimetres wide, and
+the result looks like this:
+@ID {
+5c @Wide @TightBox { A  |1c  B  |1c  C }
+}
+Lout has to apportion the size minus inter-column gaps among the three
+columns.
+@PP
+If the columns are wide enough to require paragraph breaking, Lout will
+assign sizes to the columns in such a way as to leave narrow columns
+unbroken and break wider columns to equal width, occupying the full
+size.  Otherwise, paragraph breaking is not required, and each column
+will be assigned a reasonable minimum size in the manner of @@HContract,
+except that the last column receives all the leftover width.  For example,
+@ID @OneRow @Code {
+"5c @Wide { @TightBox A  |1c  @TightBox B  |1c  @TightBox C }"
+}
+has result
+@ID {
+5c @Wide { @TightBox A  |1c  @TightBox B  |1c  @TightBox C }
+}
+If it is desired that the leftover width remain unused, rather than
+going into the last column, an empty column can be appended, or the last
+column can be enclosed in @@HContract.  Two other ways to apportion the
+leftover width are provided by the @@HExpand and @@HAdjust symbols
+(Sections {@NumberOf hexpand} and {@NumberOf hadjust}).
+@PP
+The third and final exception to the `as wide as possible' rule concerns
+the components of the root galley.  Each is considered to be enclosed
+root.galley.size @SubIndex { size of components of }
+in @@HContract and @@VContract symbols.
+@PP
+Up to this point we have treated width as a single quantity, but of
+course it has two parts:  width to left and right of the mark.  The
+`as wide as possible' rule applies to both directions:
+@ID @Code {
+"@HContract { @TightBox 953^.05 /0.5c @TightBox 2^.8286 }"
+}
+has result
+@ID {
+@HContract { @TightBox 953^.05 /0.5c @TightBox 2^.8286 }
+}
+Leftover width usually goes to the right, as we have seen, but here some
+width was available only to the left of {@Code "2.8286"} owing to the
+column mark alignment.
+@End @Section
diff --git a/doc/expert/det_sort b/doc/expert/det_sort
new file mode 100644
index 0000000..ab3ebeb
--- /dev/null
+++ b/doc/expert/det_sort
@@ -0,0 +1,83 @@
+@Section
+   @Title { Sorted galleys }
+   @Tag { sorted }
+@Begin
+@PP
+When footnotes are placed at the bottom of a page, they appear there in
+first come, first served order.  To make galleys appear in sorted order, as
+sorted.galley @Index { Sorted galleys }
+is needed in bibliographies and indexes, a parameter or nested definition
+with the special name @@Key
+key. @Index { @@Key parameter }
+is added to the galley definition, like this:
+@ID @OneRow @Code {
+"def @IndexEntry into { @IndexPlace&&following }"
+"   left @Key"
+"   right x"
+"{ x }"
+}
+@@Key must be set to a simple word, or several words with nothing more
+complex than font changes within them, when the galley is invoked:
+@ID @Code {
+"{ cities compare } @IndexEntry { cities, comparison of, 27 }"
+}
+and this key is used to sort the galleys.
+@PP
+If several sorted galleys with the same key are sent to the same place,
+the default behaviour is to print only the first of them; the assumption
+is that the others are probably unwanted duplicates.  This holds good
+for sorted reference lists, for example:  we don't want two copies of
+a reference just because we happen to cite it twice.  However, the
+other common example of sorted galleys, index entries, requires something
+different:  @I merged galleys.
+@PP
+Suppose that at some point of the document we insert the index entry
+@ID @Code "aardvarks @IndexEntry { Aardvarks, 23 }"
+while at another point we insert
+@ID @Code "aardvarks @IndexEntry { Aardvarks, 359 }"
+How the page numbers are worked out is not relevant here.  Clearly we
+would like to merge these two entries into one entry that comes out as
+@ID "Aardvarks, 23, 359"
+The following definition will merge two objects in this way:
+@ID @OneRow @Code {
+"def @Merge left x right y"
+"{"
+"    {x @Rump y} @Case"
+"    {"
+"        \"\"      @Yield x"
+"        else   @Yield { x, x @Rump y }"
+"    }"
+"}"
+}
+The @@Rump symbol is the subject of Section {@NumberOf rump}; this
+says `if the two things to be merged are equal, the result is one
+of them; otherwise it is the first followed by a comma and space
+and then the rump of the second.'  Our only problem is that this
+symbol has to be applied to two galleys from widely separated
+parts of the document.
+@PP
+Lout makes this possible by the following special rule:  if a
+sorted galley contains a nested definition of a symbol whose name
+is @@Merge (@@Merge must have just two parameters, left and right),
+merge. @Index { @@Merge symbol }
+and if that sorted galley is preceded in the list of
+sorted galleys destined for some target by another sorted galley
+with the same key, then rather than being discarded, the second
+galley is merged into the first using the @@Merge symbol.
+@PP
+The natural thing to do when more than two galleys have the same
+key is to merge the first two, then merge the third with the
+result of that, then the fourth with the result of that, and
+so on.  For efficiency reasons beyond our scope here, Lout does
+the merging in a different order:  it merges @Eq { n } galleys
+by merging the first @Eq { lfloor n slash 2 rfloor } together,
+then the last @Eq { lceil n slash 2 rceil } together, then
+merging the result.  Of course, if the @@Merge symbol is
+associative this has the same effect.  The @@Merge symbol above
+is not strictly associative, but it is close enough in practice.  The
+total time it takes to merge @Eq { n } galleys with equal keys
+is @Eq { O ( n sup 2 ) } or somewhat higher (but always polynomial
+in @Eq { n }) depending on how many times the parameters occur
+within the body of @@Merge; to do it in the natural linear order
+would take Lout exponential time.
+@End @Section
diff --git a/doc/expert/det_visi b/doc/expert/det_visi
new file mode 100644
index 0000000..870f781
--- /dev/null
+++ b/doc/expert/det_visi
@@ -0,0 +1,181 @@
+@Section
+  @Tag { visibility }
+  @Title { Nested definitions, body parameters, extend, import, and export }
+@Begin
+@PP
+A definition may contain
+nested.def @Index { Nested definitions }
+other definitions at the beginning of its body:
+@ID @OneRow @Code {
+"def @NineSquare"
+"   right x"
+"{"
+"   def @Three { x |0.2i x |0.2i x }"
+""
+"   @Three /0.2i @Three /0.2i @Three"
+"}"
+}
+A parameter like @Code x may be invoked anywhere within the body of the
+symbol it is a parameter of, including within nested definitions.  A
+nested symbol like @Code "@Three" may be invoked anywhere from the
+beginning of its own body to the end of the body of the symbol it is
+defined within.  So, assuming an appropriate definition of
+{@Code "@Box"},
+@ID @Code {
+"@NineSquare @Box"
+}
+has result
+@ID @Fig {
+@NineSquare @Box { 0.2i @Wide 0.2i @High }
+}
+Nested definitions may themselves contain nested definitions, to
+arbitrary depth.
+@PP
+There are three special features which permit a nested symbol or
+parameter to be invoked outside its normal range; that is, outside the
+body of the enclosing symbol.  The first and simplest of these features
+is the {@I {body parameter}},
+parameter.body @SubIndex { @Code body parameter }
+body.par @Index { @Code body parameter }
+an alternative form of right parameter.  The Eq equation formatting
+package @Cite { $kingston1995lout.user, Chapter 7 } is a classic example
+of the use of a body parameter.  In outline, it looks like this:
+@ID @OneRow @Code {
+"export \"+\" sup over"
+""
+"def @Eq"
+"    body x"
+"{"
+"    def \"+\" ..."
+"    def sup ..."
+"    def over ..."
+"    ..."
+""
+"    Slope @Font x"
+"}"
+}
+First we list those nested symbols and parameters that we intend to
+refer to outside the body of @Code "@Eq" in an @Code export clause,
+export @Index { @Code export clause }
+preceding the definition as shown.  Only exported symbols may be
+invoked outside the body of {@Code "@Eq"}.  The body parameter is like a
+right parameter except that the exported symbols are visible within it:
+@ID @Code {
+"@Eq { {x sup 2 + y sup 2} over 2 }"
+}
+calls on the nested definitions of @Code "@Eq" to produce the result
+@ID {
+@Eq { {x sup 2 + y sup 2} over 2 }
+}
+The body parameter's value must be enclosed in braces.  The term `body
+parameter' is a reminder that the value is interpreted as if it was
+within the body of the symbol.
+@PP
+A body parameter may not be exported, and in fact a body parameter may
+be invoked only within the body of the enclosing symbol, not within
+any nested definitions.  For example, @Code "x" above may not be invoked
+within {@Code "sup"}.  This restriction is needed to avoid the
+possibility of recursion, when the actual body parameter invokes an
+exported nested definition which invokes the body parameter, etc.
+@PP
+The second place where exported symbols may be used is in the right
+parameter of the @@Open symbol, and following its alternative form,
+@@Use (Section {@NumberOf open}).
+@PP
+Exported nested symbols and parameters may be made visible within
+a subsequent definition or macro by preceding it with an @Code import
+import @Index { @Code import clause }
+clause, like this:
+@ID @OneRow @Code {
+"import @Eq"
+"def pythag { sqrt { x sup 2 + y sup 2 } }"
+}
+Note however that @Code pythag can only be used with some invocation of
+{@Code "@Eq"}:  within the body parameter of an invocation of {@Code "@Eq"},
+within the right parameter of an {@Code "@Eq&&tag @Open"}, or following
+a {@Code "@Use { @Eq ... }"}.  There may be several symbols in the
+@Code import clause.
+@PP
+In a similar way to {@Code "import"}, a definition may be preceded
+by {@Code "extend"} followed by a symbol name:
+@ID @OneRow @Code {
+"extend @Eq"
+"def pythag { sqrt { x sup 2 + y sup 2 } }"
+}
+The effect of this is just as though the definition of @Code "pythag"
+had occurred directly after the existing definitions within
+{@Code "@Eq"}, with {@Code "pythag"} added to {@Code "@Eq"}'s
+export list.  This is useful for extending the capabilities of a
+package of definitions like @Code "@Eq" without modifying its source
+file.  The essential differences to @Code "import" are that all the
+symbols of @Code "@Eq" become visible within {@Code "pythag"}, not
+just the exported ones, and only one symbol may follow the
+@Code "extend" keyword.
+@PP
+Actually, more than one symbol may follow {@Code extend}, but this
+usage indicates a `path name' of the symbol.  For example,
+@ID @OneRow @Code {
+"extend @DocumentLayout @ReportLayout"
+"def @Keywords ..."
+}
+causes the definition of @Code "@Keywords" to occur directly after
+the existing definitions of {@Code "@ReportLayout"}, which itself
+lies within {@Code "@DocumentLayout"}.
+@PP
+A named parameter may also be preceded by an @Code "import" clause.
+As usual, the meaning is that the visible local definitions of
+the import symbol(s) are visible within the body (the default
+value) of the named parameter.  But furthermore, those symbols
+will be visible within all invocations of the parameter.  For
+example, suppose we define
+@ID @OneRow @Code {
+"def @Diag"
+"    import @Algebra named linewidth { 1p }"
+"    import @Algebra named dashlength { 2p }"
+"    ..."
+}
+Then, if @Code "@Algebra" exports symbols {@Code "+"},
+{@Code "-"}, and so on, we may write
+@ID @OneRow @Code {
+"@Diag"
+"    linewidth { 1f - 2p }"
+"    dashlength { 1f + 2p }"
+}
+using the symbols from {@Code "@Algebra"}.  There may be several
+symbols after the @Code "import" keyword.  All these symbols
+share an important restriction:  they may not have parameters.
+This is necessary because Lout would be unable to determine
+suitable values for any such parameters, if they did exist.
+@PP
+As an exception to the rule just given, a named parameter may
+import the symbol it is a parameter of:
+@ID @OneRow @Code {
+"export @Cell"
+"def @Tbl"
+"    import @Tbl named @Format { ... }"
+}
+In this example the exported definitions of @Code "@Tbl" (i.e.
+{@Code "@Cell"}) will be visible within {@Code "@Format"}.  However,
+they may only be used in actual parameters, not in the default
+value of the named parameter.  This is owing to implementation
+problems:  at the time the default value of {@Code "@Format"} is
+read, the exported symbols have not been read and are consequently
+not known.
+@PP
+Since @Code "@Cell" is nested within {@Code "@Tbl"}, the
+value of an invocation of @Code "@Cell" may depend on the value
+of parameters of {@Code "@Tbl"}.  If @Code "@Cell" is used within
+an actual {@Code "@Format"} parameter, its value depends on the
+value of parameters of the invocation of {@Code "@Tbl"} of which
+the {@Code "@Format"} parameter is a part.
+@PP
+A definition, macro, or named parameter may have several alternative
+names, like this:
+@ID @Code "macro @CD @CentredDisplay @CenteredDisplay { ... }"
+This is useful for abbreviated and alternative spellings, as shown.  The
+names appear together, and they may subsequently be used interchangeably.
+@PP
+If one name of a symbol appears in an export or import list, its other
+names are automaticaly included as well, and should not also appear
+in the list.
+@End @Section
diff --git a/doc/expert/exa b/doc/expert/exa
new file mode 100644
index 0000000..ade9d20
--- /dev/null
+++ b/doc/expert/exa
@@ -0,0 +1,18 @@
+@Chapter
+   @Title { Examples }
+   @Tag { examples }
+@Begin
+@LP
+This chapter presents some examples taken from the various
+packages available with Basser Lout.  The reader who masters these
+examples will be well prepared to read the packages themselves.  The
+examples have not been simplified in any way, since an important part of
+their purpose is to show Lout in actual practice.
+@BeginSections
+@Include { exa_equa }
+@Include { exa_para }
+@Include { exa_page }
+@Include { exa_chap }
+@Include { exa_bibl }
+@EndSections
+@End @Chapter
diff --git a/doc/expert/exa_bibl b/doc/expert/exa_bibl
new file mode 100644
index 0000000..f1e1930
--- /dev/null
+++ b/doc/expert/exa_bibl
@@ -0,0 +1,238 @@
+@Section
+   @Title { Bibliographies }
+   @Tag { biblio }
+@Begin
+@PP
+bibliographies @Index { Bibliographies }
+The first step in the production of a bibliography is to create a
+database of references based on the definition
+reference.example @Index { @Code "@Reference" example }
+@ID @Code {
+      "export @Type @Author @Title @Institution @Number @Publisher"
+//1vx "       @Year @Proceedings @Journal @Volume @Pages @Comment"
+//1vx ""
+//1vx "def @Reference"
+//1vx "   named @Tag"         |2f  "{ TAG? }"
+ /1vx "   named @Type"        |    "{ TYPE? }"
+ /1vx "   named @Author"      |    "{ AUTHOR? }"
+ /1vx "   named @Title"       |    "{ TITLE? }"
+ /1vx "   named @Institution" |    "{ INSTITUTION? }"
+ /1vx "   named @Number"      |    "{ NUMBER? }"
+ /1vx "   named @Publisher"   |    "{ PUBLISHER? }"
+ /1vx "   named @Year"        |    "{ YEAR? }"
+ /1vx "   named @Proceedings" |    "{ PROCEEDINGS? }"
+ /1vx "   named @Journal"     |    "{ JOURNAL? }"
+ /1vx "   named @Volume"      |    "{ VOLUME? }"
+ /1vx "   named @Pages"       |    "{ PAGES? }"
+ /1vx "   named @Comment"     |    "{ @Null }"
+//1vx "{ @Null }"
+}
+For example, the database might contain
+@IL
+@LI @Code {
+"{ @Reference"
+"     @Tag { strunk1979style }"
+"     @Type { Book }"
+"     @Author { Strunk, William and White, E. B. }"
+"     @Title { The Elements of Style }"
+"     @Publisher { MacMillan, third edition }"
+"     @Year { 1979 }"
+"}"
+}
+
+@LI @Code {
+"{ @Reference"
+"     @Tag { kingston92 }"
+"     @Type { TechReport }"
+"     @Author { Kingston, Jeffrey H. }"
+"     @Title { Document Formatting with Lout (Second Edition) }"
+"     @Number { 449 }"
+"     @Institution { Basser Department of Computer"
+"Science F09, University of Sydney 2006, Australia }"
+"     @Year { 1992 }"
+"}"
+}
+@EL
+Since named parameters are optional, we have one for every conceivable
+type of attribute, and simply leave out those that do not apply in any
+particular reference.  We can print a reference by using the @@Open
+symbol to get at its attributes:
+@ID @Code {
+"@Reference&&strunk1979style @Open"
+"{  @Author,  {Slope @Font @Title}.  @Publisher, @Year.  }"
+}
+The right parameter of @@Open may use the exported parameters of the
+left, and so the result is
+@ID {
+@Reference&&strunk1979style @Open
+{  @Author,  {Slope @Font @Title}.  @Publisher, @Year.  } &0io
+}
+Incidentally, we are not limited to just one database of references;
+several @@Database symbols can nominate the same symbol, and invocations of
+that symbol can appear in the document itself as well if we wish.
+@PP
+The second step is to create a database of print styles for the various
+types of reference (Book, TechReport, etc.), based on the following
+definition:
+@ID @Code {
+"export @Style"
+"def @RefStyle"
+"   left @Tag"
+"   named @Style right reftag {}"
+"{}"
+}
+Notice that the named parameter @Code "@Style" has a right parameter
+{@Code "reftag"}.  The style database has one entry for each type of
+reference:
+@ID @Code {
+"{ Book @RefStyle @Style"
+"  {  @Reference&&reftag @Open"
+"     { @Author,  {Slope @Font @Title}.  @Publisher, @Year.  @Comment }"
+"  }"
+"}"
+""
+"{ TechReport @RefStyle @Style"
+"  {  @Reference&&reftag @Open"
+"     { @Author,  {Slope @Font @Title}.  Tech. Rep. @Number (@Year),"
+"@Institution.  @Comment }"
+"  }"
+"}"
+}
+and so on.  The following prints the reference whose tag is
+@Code strunk1979style in the Book style:
+@ID @Code {
+"@RefStyle&&Book @Open { @Style strunk1979style }"
+}
+It has result
+@ID {
+@RefStyle&&Book @Open { @Style strunk1979style } &0io
+}
+Notice how the @Code "@Style" parameter of @Code "@RefStyle" is given the
+parameter {@Code strunk1979style}, which it uses to open the appropriate
+reference.
+@PP
+We can consult the @Code "@Type" attribute of a reference to find out
+its style, which brings us to the following definition for printing out
+a reference in the style appropriate to it:
+@ID @Code {
+"def @RefPrint"
+"   right reftag"
+"{  @RefStyle&&{ @Reference&&reftag @Open { @Type } }"
+"   @Open { @Style reftag }"
+"}"
+}
+For example, to evaluate {@Code "@RefPrint strunk1979style"}, Lout first
+evaluates
+@ID @Code {
+"@Reference&&strunk1979style  @Open  { @Type }"
+}
+whose result is {@Code { @Reference&&strunk1979style  @Open  { @Type } }},
+and then evaluates
+@ID @Code {
+"@RefStyle&&Book @Open { @Style strunk1979style }"
+}
+as before.  Complicated as this is, with its two databases and clever
+passing about of tags, the advantages of separating references from
+printing styles are considerable:  printing styles may be changed
+easily, and non-expert users need never see them.
+@PP
+Finally, we come to the problem of printing out a numbered list of
+references, and referring to them by number in the body of the
+document.  The first step is to create a numbered list of places that
+galleys containing references may attach to:
+referencesection.example @Index { @Code "@ReferenceSection" example }
+@ID @Code {
+"def @ReferenceSection"
+"    named @Tag {}"
+"    named @Title { References }"
+"    named @RunningTitle { dft }"
+"    named style right tag { tag. }"
+"    named headstyle right @Title { @Heading @Title }"
+"    named indent { @DispIndent }"
+"    named gap { @DispGap }"
+"    named start { 1 }"
+"{"
+"    def @RefList right num"
+"    {"
+"        @NumberMarker num  &  indent @Wide {style num}  |  @RefPlace"
+"        //gap @RefList @Next num"
+"    }"
+""
+"        @Protect headstyle @Title"
+"    //  @PageMarker&&preceding @Tagged @Tag"
+"    //  @Title @MajorContentsEntry {@PageOf @Tag}"
+"    //  @Runner"
+"            @FootEven { |0.5rt 0.8f @Font @B @PageNum }"
+"            @FootOdd  { |0.5rt 0.8f @Font @B @PageNum }"
+"    //@DispGap  @RefList start"
+"    //  @Runner"
+"            @TopEven { @B @PageNum }"
+"            @TopOdd  { @I {@RunningTitle @OrElse @Title} |1rt @B @PageNum }"
+"}"
+}
+We place the expression @Code "@ReferenceSection" at the point where we
+want the list of references to appear; its value is something like
+@ID @Code {
+"1.   @RefPlace"
+"2.   @RefPlace"
+"3.   @RefPlace"
+"..."
+}
+where @Code "@RefPlace" is @Code "@Galley" as usual.  We can scatter
+multiple lists of references through the document if we wish (at the end
+of each chapter, for example), simply by placing @Code "@ReferenceSection"
+at each point.
+@PP
+Our task is completed by the following definition:
+ref.example @Index { @Code "@Ref" example }
+@ID @Code {
+"def @Ref right x"
+"{"
+"    def sendref into { @RefPlace&&following }"
+"        right @Key"
+"    {"
+"        @NumberMarker&&preceding @Tagged x  &"
+"        @PageMarker&&preceding @Tagged x  &"
+"        @RefPrint x"
+"    }"
+""
+"    @NumberMarker&&x @Open { @Tag } sendref x"
+"}"
+}
+Given this definition, the invocation {@Code "@Ref strunk1979style"} has result
+@ID @Code "@NumberMarker&&strunk1979style @Open { @Tag }"
+plus the galley {@Code "sendref strunk1979style"}.  We first
+follow what happens to the galley.
+@PP
+According to its @Code into clause, the galley will replace a
+@Code "@RefPlace" in the nearest following {@Code "@ReferenceSection"}.  If
+every such galley is a sorted galley whose key is the reference's tag, as
+this one is, they will appear sorted by tag.  The galley's object is
+@ID @Code {
+"@NumberMarker&&preceding @Tagged strunk1979style  &"
+"@PageMarker&&preceding @Tagged strunk1979style  &"
+"@RefPrint strunk1979style"
+}
+The result of the @@Tagged symbol is always @@Null, so this prints the
+@Code strunk1979style reference in the appropriate style at the
+{@Code "@RefPlace"}, as desired.
+@PP
+Now @Code "@NumberMarker&&preceding" is the nearest preceding invocation of
+@Code "@NumberMarker" in the final document.  This must be the invocation of
+@Code "@NumberMarker" just before the @Code "@RefPlace" that received
+the galley, and so this invocation of @Code "@NumberMarker" is given @Code
+strunk1979style as an additional tag by the @@Tagged symbol.  Its original tag
+was the number of the reference place, which means that
+@ID @Code {
+"@NumberMarker&&strunk1979style @Open { @Tag }"
+}
+has for its result the number of the reference place that received the
+@Code strunk1979style galley, and this is the desired result of
+{@Code "@Ref strunk1979style"}.
+@PP
+It might seem that if we refer to the @Code strunk1979style reference twice,
+two copies will be sent to the reference list and it will appear
+twice.  However, when more than one sorted galley with the same key is sent
+to the same place, only one of them is printed (Section {@NumberOf galleys});
+so provided that sorted galleys are used there is no problem.
+@End @Section
diff --git a/doc/expert/exa_chap b/doc/expert/exa_chap
new file mode 100644
index 0000000..51926c0
--- /dev/null
+++ b/doc/expert/exa_chap
@@ -0,0 +1,273 @@
+@Section
+   @Title { Chapters and sections }
+   @Tag { chapters }
+@Begin
+@PP
+The definitions of chapters and sections from the DocumentSetup package
+chapters. @Index { Chapters and sections }
+of Version 2 (in Version 3, the BookSetup extension of DocumentSetup)
+form the subject of this section.  They allow a chapter to be entered
+like this:
+document.layout.chapters @SubIndex { chapters and sections }
+@ID @Code {
+"@Chapter"
+"    @Title { ... }"
+"    @Tag { ... }"
+"@Begin"
+"    ..."
+"@End @Chapter"
+}
+Within the chapter a sequence of sections may be included by writing
+@ID @Code {
+"@BeginSections"
+"@Section { ... }"
+"..."
+"@Section { ... }"
+"@EndSections"
+}
+These are numbered automatically, and an entry is made for each in a
+table of contents.
+@PP
+The user of the DocumentSetup package can find the number of the chapter or
+section with a given tag by writing @Code "@NumberOf tag" at any point
+in the document.  This feature is based on the following definitions:
+numberof.example @Index { @Code "@NumberOf" example }
+@ID @Code {
+"export @Tag"
+"def @NumberMarker right @Tag { @Null }"
+""
+"def @NumberOf right x"
+"{  @NumberMarker&&x @Open { @Tag }  }"
+}
+Each chapter and section will contain one invocation of
+{@Code "@NumberMarker"}; a full explanation will be given later.
+@PP
+A sequence of places for receiving chapters is easily defined:
+@ID @Code {
+"export @Tag"
+"def @ChapterList right @Tag"
+"{"
+"    @Galley"
+"    //@ChapterGap  @ChapterList @Next @Tag"
+"}"
+}
+@Code "@ChapterGap" will usually be {@Code "1.1b"}, ensuring that each
+chapter begins on a new page.  The @Code "@Chapter" galley itself is
+defined as follows:
+chapter.example @Index { @Code "@Chapter" example }
+@IndentedList
+@LI @Code {
+"export @FootNote @BeginSections @EndSections @Section"
+"def @Chapter force into { @ChapterList&&preceding }"
+"    named @Tag {}"
+"    named @Title {}"
+"    named @RunningTitle { dft }"
+"    body @Body"
+"{"
+"    def @FootNote right x { @ColFootNote x }"
+""
+"    def @BeginSections ..."
+"    def @EndSections ..."
+"    def @Section ..."
+}
+@LI @Code {
+"    def @ChapterTitle"
+"    {"
+"        @ChapterNumbers @Case {"
+"            {Yes yes}  @Yield  { Chapter {@NumberOf @Tag}.  |2s  @Title }"
+"            else  @Yield  @Title"
+"        }"
+"    }"
+""
+"    def @ChapterNum"
+"    {"
+"        @ChapterNumbers @Case {"
+"            {Yes yes}  @Yield  { Chapter {@NumberOf @Tag} }"
+"            else  @Yield @Null"
+"        }"
+"    }"
+}
+@LI @Code {
+"        ragged @Break @BookTitleFormat @ChapterTitle"
+"    //  @NumberMarker {"
+"            @ChapterList&&@Tag @Open { @Tag }"
+"        }"
+"    //  @ChapterList&&preceding  @Tagged @Tag"
+"    //  @NumberMarker&&preceding @Tagged @Tag"
+"    //  @PageMarker&&preceding   @Tagged @Tag"
+"    //  { @ChapterTitle } @MajorContentsEntry {@PageOf @Tag}"
+"    //  @Runner"
+"            @FootEven { |0.5rt 0.8f @Font @B @PageNum }"
+"            @FootOdd  { |0.5rt 0.8f @Font @B @PageNum }"
+"    //  @Body"
+"    //@SectionGap @ChapRefSection"
+"    //  @Runner"
+"            @TopEven { @B @PageNum |1rt @I @ChapterNum }"
+"            @TopOdd  { @I {@RunningTitle @OrElse @Title} |1rt @B @PageNum }"
+"}"
+}
+@EndList
+We will see the symbols for sections shortly.  Notice how their use has
+been restricted to within the right parameter of {@Code "@Chapter"}, by
+nesting them and using a body parameter.
+@PP
+The meaning of @Code "@FootNote" within @Code "@Chapter" has been set
+to {@Code "@ColFootNote"}, which produces a footnote targeted to
+{@Code "@ColFootList"} (see Section {@NumberOf pagelayout}).  In other
+words, footnotes within chapters go at the foot of the column, not at
+the foot of the page.  (Of course, in single-column books this
+distinction is insignificant.)  @Code "@ChapterTitle" and
+@Code "@ChapterNum" are trivial definitions which vary depending on
+whether the user has requested numbered chapters or not.
+@PP
+Each invocation of @Code "@Chapter" has its own unique {@Code "@Tag"},
+either supplied by the user or else inserted automatically by Lout.  We
+now trace the cross referencing of chapter numbers on a hypothetical
+third chapter whose tag is {@Code "euclid"}.
+@PP
+@Code "@ChapterList&&preceding @Tagged euclid" attaches @Code "euclid"
+as an extra tag to the first invocation of @Code "@ChapterList"
+preceding itself in the final printed document.  But this
+@Code "@ChapterList" must be the target of the chapter, and so
+@ID @Code "@ChapterList&&euclid @Open { @Tag }"
+is 3, the number of the chapter ({@Code "@Tag"} refers to the parameter
+of {@Code "@ChapterList"}, not the parameter of {@Code "@Chapter"}).
+ Consequently the invocation of
+@Code "@NumberMarker" within the chapter is equal to
+{@Code "@NumberMarker 3"}.
+@PP
+@Code "@NumberMarker&&preceding @Tagged euclid" attaches @Code "euclid"
+to {@Code "@NumberMarker 3"} as an extra tag, and so
+{@Code "@NumberOf euclid"}, which expands to
+@ID @Code "@NumberMarker&&euclid @Open { @Tag }"
+must be equal to 3, as required.  This scheme could be simplified by
+placing the invocation of @Code "@NumberMarker" within
+@Code "@ChapterList" rather than within {@Code "@Chapter"}, but it turns
+out that that scheme does not generalize well to sections and subsections.
+@PP
+There is a trap for the unwary in the use of @Code preceding and
+{@Code following}.  Suppose that the invocation of @Code "@NumberMarker"
+within @Code "@Chapter" is replaced by the seemingly equivalent
+@ID @Code "@NumberMarker { @ChapterList&&preceding @Open { @Tag } }"
+Now suppose that @Code "@NumberOf euclid" appears somewhere within
+Chapter 7.  It will expand to
+@ID @Code "@NumberMarker&&euclid @Open { @Tag }"
+which would now be equal to
+@ID @Code "@ChapterList&&preceding @Open { @Tag }"
+whose value, evaluated as it is within Chapter 7, is 7, not 3.  Use of
+@Code preceding or @Code following within the parameter
+of a symbol, rather than within the body, is likely to be erroneous.
+@PP
+Much of the remainder of the definition of @Code "@Chapter" is fairly
+self-explanatory:  there is a heading, a tag sent to mark the page on
+which the chapter begins, a @Code "@ContentsEntry" galley sent to the
+table of contents, galleys for the figures and tables of the chapter to
+collect in, @Code "@Body" where the body of the chapter goes, and
+@Code "@ChapRefSection" to hold a concluding list of references.  This
+leaves only the two invocations of @Code "@Runner" to explain.
+@PP
+The first @Code "@Runner" is just below the heading.  It will be the target
+of the @Code "@Runner&&following" cross reference at the beginning of the
+first page of the chapter (see Section {@NumberOf pagelayout}), which
+consequently will have null running headers and the given footers.
+@PP
+The second @Code "@Runner" appears at the very end of the chapter, hence
+on its last page.  Since no invocations of @Code "@Runner" lie between
+it and the first {@Code "@Runner"}, it will be the target of
+@Code "@Runner&&following" on every page from the second page of the
+chapter to the last, inclusive, and will supply the format of their
+headers and footers.
+@PP
+The interested reader might care to predict the outcome in unusual
+cases, such as when the heading occupies two pages, or when a chapter
+occupies only one, or (assuming a change to the gap between chapters)
+when a chapter starts halfway down a page.  Such predictions can be made
+with great confidence.
+@PP
+The expression @Code "@RunningTitle @OrElse @Title" appearing in the second
+@Code "@Runner" returns the value of the @Code "@RunningTitle" parameter
+of @Code "@Chapter" if this is not equal to the default value
+{@Code "dft"}, or @Code "@Title" otherwise:
+orelse.example @Index { @Code "@OrElse" example }
+@ID @Code {
+"def @OrElse"
+"    left x"
+"    right y"
+"{"
+"    x @Case {"
+"        dft  @Yield  y"
+"        else  @Yield  x"
+"    }"
+"}"
+}
+This produces the effect of
+@ID @Code {
+"named  @RunningTitle  {  @Title  }"
+}
+which unfortunately is not permissible as it stands, because @Code "@Title"
+is not visible within the default value of {@Code "@RunningTitle"}.
+@PP
+Finally, the definitions for sections omitted earlier are as follows:
+section.example @Index { @Code "@Section" example }
+@IndentedList
+@LI @Code {
+"def @EndSectionsPlace { @Galley }"
+"def @EndSections force into { @EndSectionsPlace&&preceding } {}"
+"macro @BeginSections { //@SectionGap @SectionList 1 // @EndSectionsPlace // }"
+}
+@LI @Code {
+"def @Section force into { @SectionList&&preceding }"
+"    named @Tag {}"
+"    named @Title {}"
+"    named @RunningTitle { dft }"
+"    body @Body"
+"{"
+"    def @SectionTitle"
+"    {"
+"        @SectionNumbers @Case {"
+"            {Yes yes} @Yield { {@NumberOf @Tag}.  |2s  @Title }"
+"            else      @Yield @Title"
+"        }"
+"    }"
+""
+"        @Heading @Protect @SectionTitle"
+"    //  @NumberMarker {"
+"            {@ChapterList&&@Tag @Open { @Tag }}.{"
+"             @SectionList&&@Tag @Open { @Tag }}"
+"        }"
+"    //  @ChapterList&&preceding  @Tagged @Tag"
+"    //  @SectionList&&preceding  @Tagged @Tag"
+"    //  @NumberMarker&&preceding @Tagged @Tag"
+"    //  @PageMarker&&preceding   @Tagged @Tag"
+"    //  { &3f @SectionTitle } @ContentsEntry {@PageOf @Tag}"
+"    //0io @Body"
+"}"
+}
+@EndList
+The @Code "@BeginSections" macro invokes {@Code "@SectionList"},
+preceded by the appropriate gap and followed by an @Code "@EndSectsPlace"
+for closing the list of sections when the @Code "@EndSections" symbol is
+found.  @Code "@Section" itself is just a copy of @Code "@Chapter" with
+slight changes to the format.  The parameter of @Code "@NumberMarker" is
+a simple generalization of the one within {@Code "@Chapter"}.  Notice
+that we have taken care that the value of this parameter be
+a juxtaposition of simple words:  although
+@ID @Code {
+"{@ChapterList&&@Tag @Open { @Tag }}. &"
+"{@SectionList&&@Tag @Open { @Tag }}"
+}
+is formally equivalent, @Code "&" was not permitted within a
+@Code "@Tag" parameter until recently.
+@PP
+The DocumentSetup package also contains definitions for subsections in the
+same style.  They raise the question of whether Lout is capable of
+producing subsections should the user place {@Code "@BeginSections"},
+{@Code "@Section"}, and {@Code "@EndSections"} within a {@I section},
+and whether such nesting could proceed to arbitrary depth.  Arbitrary
+nesting of sections within sections is available now, although the
+numbering would of course be wrong.  The author has worked out
+definitions which provide correct numbering to arbitrary depth, with an
+arbitrary format for each level.  These were not incorporated into
+DocumentSetup because the author considers sub-subsections to be poor
+style, and he prefers separate names for the symbols at each level.
+@End @Section
diff --git a/doc/expert/exa_equa b/doc/expert/exa_equa
new file mode 100644
index 0000000..67852b8
--- /dev/null
+++ b/doc/expert/exa_equa
@@ -0,0 +1,149 @@
+@Section
+   @Title { An equation formatting package }
+   @Tag { eq }
+@Begin
+@PP
+In this section we describe the design and implementation of the Eq
+eq. @Index { Eq equation formatting package }
+equation formatting package.  Equation formatting makes a natural first
+example, partly because its requirements have strongly influenced the
+design of Lout, and partly because no cross references or galleys are
+required.
+@PP
+To the author's knowledge, Eq is the first equation formatter to be
+implemented as a collection of high-level definitions.  This approach
+has significant advantages:  the basics of language and layout are
+trivial, so the implementor can concentrate on fine-tuning; and the
+definitions, being readily available, can be improved, extended, or even
+replaced.
+@PP
+As described in the User's Guide @Cite { $kingston1995lout.user }, an
+equation is entered in a format based on the one introduced by the eqn
+language of Kernighan and Cherry @Cite { $kernighan1975eqn }:
+kernighan.b @Index { Kernighan, B. }
+cherry.l @Index { Cherry, L. }
+@ID @Code {
+"@Eq { { x sup 2  +  y sup 2 }  over  2 }"
+}
+The result is
+@ID @Eq { { x sup 2  +  y sup 2 }  over  2 }
+In outline, the definition of the @Code "@Eq" symbol is
+eq.example @Index { @Code "@Eq" example }
+@ID @Code {
+"export  sup  over \"+\"  \"2\"  \"<=\""
+"def @Eq"
+"   body @Body"
+"{"
+"   def sup precedence 60 left x right y { ... }"
+"   def over precedence 54 left x right y { ... }"
+"   def \"2\" { Base @Font \"2\" }"
+"   def \"+\" { {Symbol Base} @Font \"+\" }"
+"   def \"<=\" { {Symbol Base} @Font \"\\243\" }"
+"   ..."
+""
+"   Slope @Font 1.2f @Break 0c @Space @Body"
+"}"
+}
+A body parameter is used to restrict the visibility of the equation
+formatting symbols (there are hundreds of them).  The equation as a whole
+is set in Slope (i.e. Italic) font, and symbols such as @Code "\"2\"" and
+@Code "\"+\"" are defined when other fonts are needed.  Precedences are
+used to resolve ambiguities such as {@Code "a sup b over c"}.  Eq takes
+all spacing decisions on itself, so to prevent white space
+typed by the user from interfering, the equation is enclosed in
+{@Code "0c @Space"}.  We will discuss the {@Code "1.2f @Break"} later.
+@PP
+Thus have we disposed of the language design part of the equation
+formatting problem; it remains now to define the twenty or so symbols
+with parameters, and get the layout right.
+@PP
+Every equation has an {@I axis}:  an imaginary horizontal line through
+the centre of variables, through the bar of built-up fractions, and so
+on.  We can satisfy this requirement by ensuring that the result of each
+symbol has a single row mark, on the axis.  For example, the
+superscripting symbol is defined as follows:
+sup.example @Index { @Code "sup" example }
+@ID @Code {
+"def sup"
+"    precedence 60"
+"    associativity left"
+"    left x"
+"    named gap { @SupGap }"
+"    right y"
+"{"
+"    @HContract @VContract {"
+"        |  @Smaller y"
+"        ^/gap  x"
+"    }"
+"}"
+}
+The @Code "@VContract" and @Code "^/" symbols together ensure that the axis
+of the result is the axis of the left parameter.  A @Code "gap"
+parameter has been provided for varying the height of the superscript,
+with default value @Code "@SupGap"  defined elsewhere as
+{@Code "0.40fk"}.  It is important that such gaps be expressed in units
+that vary with the font size, so that they remain correct when the size
+changes.  Collecting the default values into symbols like @Code
+"@SupGap" ensures consistency and assists when tuning the values.  Here
+is another characteristic definition:
+over.example @Index { @Code "over" example }
+@ID @Code {
+"def over"
+"    precedence 54"
+"    associativity left"
+"    left x"
+"    named gap { 0.2f }"
+"    right y"
+"{"
+"    @HContract @VContract {"
+"        |0.5rt  @OneCol x"
+"        ^//gap  @HLine"
+"        //gap  |0.5rt @OneCol y"
+"    }"
+"}"
+}
+Both parameters are centred, since we do not know which will be the
+wider; we use @@OneCol to make sure that the entire parameter is
+centred, not just its first column, and @@HContract ensures that the
+fraction will never expand to fill all the available space, as Lout objects
+have a natural tendency to do (Section {@NumberOf size}).  @Code "@HLine"
+is a horizontal line of the width of the column:
+hline.example @Index { @Code "@Hline" example }
+@ID @Code {
+"def @HLine"
+"    named line { \"0.05 ft setlinewidth\" }"
+"{  "
+"    { \"0 0 moveto xsize 0 lineto\" line \"stroke\" } @Graphic {}"
+"}"
+}
+Here we are relying on the expanding tendency just mentioned.
+@PP
+The remaining symbols are quite similar to these ones.  We conclude with
+a few fine points of mathematical typesetting mentioned by a leading
+authority, D. E. Knuth @Cite { $knuth1984tex }.
+knuth.d @Index { Knuth, D. }
+@PP
+Some symbols, such as @Eq {lessequal} and @Eq { notequal }, should have a
+thick space on each side; others, such as @Eq {plus} and @Eq {minus},
+have a medium space; others have a thin space on the right only.  This
+would be easy to do except that these spaces are not wanted in
+superscripts and subscripts:
+@ID @Eq { r sup n+1 - 1 }
+In effect, the definition of such symbols changes depending on the
+context; but Lout does not permit such a change.  Luckily, the so-called
+`style' information set by the @@Font, @@Break, and @@Space symbols can
+change in this way.  Accordingly, Eq uses the @Code y unit, which is
+part of style, for these spaces:
+@ID @Code {
+"def @MedGap { 0.20y }"
+""
+"def \"+\" { &@MedGap plus &@MedGap }"
+""
+"def @HSqueeze right x { 0.2f @YUnit x }"
+}
+In the equation as a whole, the y unit is initially set to
+{@Code 1f}, and so @Code "@MedGap" ordinarily supplies 20% of this
+amount.  But superscripts and subscripts are enclosed in the
+@Code "@HSqueeze" symbol, which, by changing the y unit, ensures that
+any @Code "@MedGap" within them is much smaller than usual.
+@End @Section
diff --git a/doc/expert/exa_page b/doc/expert/exa_page
new file mode 100644
index 0000000..31ab1d7
--- /dev/null
+++ b/doc/expert/exa_page
@@ -0,0 +1,267 @@
+@Section
+   @Title { Page layout }
+   @Tag { pagelayout }
+@Begin
+@PP
+The page layout
+page.layout.inpractice @SubIndex { in practice }
+document.layout.page.layout. @SubIndex { page layout }
+definitions given in Section {@NumberOf definitions},
+although correct, are very basic.  In this section we present the
+definitions used by the DocumentLayout package for laying out the pages
+of books, including running page headers and footers, different formats
+for odd and even pages, and so on.  The present document is produced with
+these definitions.
+@PP
+We begin with a few definitions which permit the user to create cross
+references of the `see page 27' variety which will be kept up to date
+automatically.  The user marks the target page by placing
+@Code {"@PageMark intro"}, for example, at the point of interest, and
+refers to the marked page as @Code "@PageOf intro" elsewhere:
+pageof.example @Index { @Code "@PageOf" example }
+@IndentedList
+@LI @Code {
+"export @Tag"
+"def @PageMarker right @Tag { @Null }"
+}
+@LI @Code {
+"def @PageMark right x"
+"{"
+"    @PageMarker&&preceding @Tagged x"
+"}"
+}
+@LI @Code {
+"def @PageOf right x"
+"{"
+"    @PageMarker&&x @Open { @Tag }"
+"}"
+}
+@EndList
+We will see below that an invocation of @Code "@PageMarker" appears before
+each page, with @Code "@Tag" parameter equal to the
+page number.  Suppose that {@Code "@PageMark intro"}, which expands to
+@ID @Code "@PageMarker&&preceding @Tagged intro"
+happens to fall on page 27 of the final printed document (of course, its
+value is @@Null which makes it invisible).  Then the effect of @@Tagged
+is to attach @Code "intro" as an extra tag to the first invocation of
+{@Code "@PageMarker"} preceding that final point, and this must be
+{@Code "@PageMarker 27"}.  Therefore the expression
+@ID @Code "@PageMarker&&intro @Open { @Tag }"
+will open the invocation {@Code "@PageMarker 27"} and yield the value of
+its @Code "@Tag" parameter, 27.  Thus, {@Code "@PageOf intro"} appearing
+anywhere in the document yields 27.
+@PP
+Next we have some little definitions for various parts of the
+page.  {@Code "@FullPlace"} will be the target of full-width body text:
+@ID @Code {
+"def @FullPlace { @Galley }"
+}
+{@Code "@ColPlace"} will be the target of body text within one column:
+@ID @Code {
+"def @ColPlace { @Galley }"
+}
+{@Code "@TopList"} will be the target of figures and tables:
+@ID @Code {
+"export @Tag"
+"def @TopList right @Tag"
+"{"
+"    @Galley"
+"    //@TopGap @TopList @Next @Tag"
+"}"
+}
+We have taken a shortcut here, avoiding an unnecessary @Code "@TopPlace"
+symbol.  @Code "@FootList" and {@Code "@FootSect"} define a sequence of
+full-width targets at the foot of the page for footnotes,
+preceded by a short horizontal line:
+footsect.example @Index { @Code "@FootSect" example }
+@IndentedList
+@LI @Code {
+"export @Tag"
+"def @FootList right @Tag"
+"{"
+"    @Galley"
+"    //@FootGap  @FootList @Next @Tag"
+"}"
+}
+@LI @Code {
+"def @FootSect"
+"{"
+"    @FootLen @Wide @HLine"
+"    //@FootGap  @FootList 1  ||@FootLen"
+"}"
+}
+@EndList
+Similarly, @Code "@ColFootList" and @Code "@ColFootSect" provide a
+sequence of targets for footnotes within one column:
+@ID @Code {
+"export @Tag"
+"def @ColFootList right @Tag"
+"{"
+"    @Galley"
+"    //@FootGap  @ColFootList @Next @Tag"
+"}"
+""
+"def @ColFootSect"
+"{"
+"    @ColFootLen @Wide @HLine"
+"    //@FootGap  @ColFootList 1  ||@ColFootLen"
+"}"
+}
+The next definition provides a horizontal sequence of one or more columns:
+collist.example @Index { @Code "@ColList" example }
+@ID @Code {
+"def @ColList right col"
+"{"
+"    def @Column"
+"    {  @VExpand { @ColPlace //1rt @OneRow { //@MidGap @ColFootSect } }  }"
+""
+"    col @Case {"
+"        Single @Yield @Column"
+"        Double @Yield { @DoubleColWidth @Wide @Column  ||@ColGap  @ColList col }"
+"        Multi  @Yield { @MultiColWidth @Wide @Column  ||@ColGap  @ColList col }"
+"    }"
+"}"
+}
+Each column consists of a @Code "@ColPlace" at the top and a
+@Code "@FootSect" at the foot.  The @@VExpand symbol ensures that
+whenever a column comes into existence, it will expand vertically so
+that the bottom-justification @Code "//1rt" has as much space as
+possible to work within.  The @Code "col" parameter determines whether
+the result has a single column, double columns, or multiple columns.
+@PP
+The {@Code "@Page"} symbol places its parameter in a page of fixed width,
+height, and margins:
+page.example @Index { @Code "@Page" example }
+@ID @Code {
+"def @Page right x"
+"{"
+"    @PageWidth @Wide @PageHeight @High {"
+"        //@PageMargin  ||@PageMargin"
+"        @HExpand @VExpand x"
+"        ||@PageMargin  //@PageMargin"
+"    }"
+"}"
+}
+@@HExpand and @@VExpand ensure that the right parameter occupies all the
+available space; this is important when the right parameter is unusually
+small.  The @@High symbol gives the page a single row mark, ensuring that
+it will be printed on a single sheet of paper (page {@PageOf rootg}).
+@PP
+Next we have {@Code "@OnePage"}, defining a typical page of a book or
+other document:
+onepage.example @Index { @Code "@OnePage" example }
+@ID @Code {
+"def @OnePage"
+"    named @Columns {}"
+"    named @PageTop {}"
+"    named @PageFoot {}"
+"{"
+"    @Page {"
+"        @PageTop"
+"        //@MidGap  @TopList"
+"        //@MidGap  @FullPlace"
+"        //@MidGap  @ColList @Columns"
+"        // //1rt   @OneRow { //@MidGap @FootSect //@MidGap @PageFoot }"
+"    }"
+"}"
+}
+The page top and page foot, and the number of columns, are parameters
+that will be given later when @Code "@OnePage" is invoked.  The body of
+the page is a straightforward combination of previous definitions.  The
+@Code "//" symbol protects the following @Code "//1rt" from deletion in
+the unlikely event that all the preceding symbols are replaced by
+@@Null.  The following object is enclosed in @@OneRow to ensure that
+all of it is bottom-justified, not just its first component.
+@PP
+Before presenting the definition of a sequence of pages, we must detour
+to describe how running page headers and footers (like those in the
+present document) are produced.  These are based on the
+@Code "@Runner" symbol:
+runner.example @Index { @Code "@Runner" example }
+@ID @Code {
+"export @TopOdd @TopEven @FootOdd @FootEven"
+"def @Runner"
+"    named @TopOdd right @PageNum { @Null }"
+"    named @TopEven right @PageNum { @Null }"
+"    named @FootOdd right @PageNum { @Null }"
+"    named @FootEven right @PageNum { @Null }"
+"    named @Tag {}"
+"{ @Null }"
+}
+The four parameters control the format of running headers and footers on
+odd and even pages respectively.  Invocations of {@Code "@Runner"}, for
+example
+@ID @Code {
+"@Runner"
+"    @TopEven { @B @PageNum |1rt @I { Chapter 4 } }"
+"    @TopOdd  { @I { Examples }   |1rt @B @PageNum }"
+}
+will be embedded in the body text of the document, and, as we will see
+in a moment, are accessed by @Code "@Runner&&following" cross references
+on the pages.  Notice how the @Code "@PageNum" parameter of each
+parameter allows the format of the running header to be specified while
+leaving the page number to be substituted later.
+@PP
+We may now define {@Code "@OddPageList"}, whose result is a sequence of
+pages beginning with an odd-numbered page:
+oddpagelist.example @Index { @Code "@OddPageList" example }
+@ID @Code {
+"def @OddPageList"
+"    named @Columns {}"
+"    right @PageNum"
+"{"
+"    def @EvenPageList ..."
+""
+"        @PageMarker @PageNum"
+"    //  @Runner&&following @Open {"
+"            @OnePage"
+"                @Columns { @Columns }"
+"                @PageTop { @TopOdd @PageNum }"
+"                @PageFoot { @FootOdd @PageNum }"
+"        }"
+"    //  @EvenPageList"
+"            @Columns { @Columns }"
+"            @Next @PageNum"
+"}"
+}
+Ignoring @Code "@EvenPageList" for the moment, notice first that the
+invocation of @Code "@OnePage" is enclosed in
+{@Code "@Runner&&following @Open"}.  Since {@Code "@Runner&&following"}
+refers to the first invocation of @Code "@Runner" appearing after itself
+in the final printed document, the symbols @Code "@TopOdd" and
+@Code "@FootOdd" will take their value from the first invocation of
+@Code "@Runner" following the top of the page, even though @Code "@FootOdd"
+appears at the foot of the page.  Their @Code "@PageNum" parameters are
+replaced by {@Code "@PageNum"}, the actual page number parameter of
+{@Code "@OddPageList"}.
+@PP
+After producing the odd-numbered page, @Code "@OddPageList" invokes
+{@Code "@EvenPageList"}:
+evenpagelist.example @Index { @Code "@EvenPageList" example }
+@ID @Code {
+"def @EvenPageList"
+"    named @Columns {}"
+"    right @PageNum"
+"{"
+"        @PageMarker @PageNum"
+"    //  @Runner&&following @Open {"
+"            @OnePage"
+"                @Columns { @Columns }"
+"                @PageTop { @TopEven @PageNum }"
+"                @PageFoot { @FootEven @PageNum }"
+"        }"
+"    //  @OddPageList"
+"            @Columns { @Columns }"
+"            @Next @PageNum"
+"}"
+}
+This produces an even-numbered page, then passes the ball back to
+@Code "@OddPageList" -- a delightful example of what computer
+scientists call mutual recursion.  The two page types differ only in
+their running headers and footers, but other changes could easily be made.
+@PP
+It was foreshadowed earlier that an invocation of @Code "@PageMarker"
+would precede each page, and this has been done.  Although this @Code
+"@PageMarker" is a component of the root galley, it will not cause a
+page to be printed, because Basser Lout skips components of height zero.
+@End @Section
diff --git a/doc/expert/exa_para b/doc/expert/exa_para
new file mode 100644
index 0000000..6b9f60f
--- /dev/null
+++ b/doc/expert/exa_para
@@ -0,0 +1,236 @@
+@Section
+   @Title { Paragraphs, displays, and lists }
+   @Tag { paras }
+@Begin
+@PP
+The remaining sections of this chapter are all based on Version 2 of
+the DocumentLayout package.  Version 3, which is similar but more elaborate,
+is described from the user's perspective in the
+document.layout @Index { DocumentLayout package }
+User's Guide @Cite { $kingston1995lout.user }.  In 26 pages of Lout, the
+DocumentLaytout package defines many features required in the formatting
+of simple documents, technical reports, and books, including displays,
+lists, page layout, cross references, tables of contents, footnotes,
+figures, tables, references, chapters, sections, and sorted indexes.
+@PP
+The symbols used for separating paragraphs and producing displays and
+document.layout.paras @SubIndex { paragraphs }
+lists may lack the excitement of more exotic features, but they can
+teach some important lessons about robust design.  The following macro
+for separating paragraphs produces a 0.3 cm vertical space and a 1 cm
+indent on the following line, and is clearly on the right track:
+@ID @Code "macro  @PP  { //0.3c &1c }"
+Nevertheless it has several major problems.
+@PP
+The @Code "&" symbol is subject to widening during line adjustment, so
+it should be replaced by {@Code "1c @Wide {}"}.  But then white space
+following the symbol will affect the result, so an extra @Code "&0i" must
+be added.  If the document is printed double spaced, this paragraph gap
+will fail to widen:  it should be expressed in terms of the @Code "v" unit,
+with mark-to-mark spacing mode.  Similarly, the paragraph indent should
+probably be made proportional to the font size.
+@PP
+`Magic numbers' like @Code "0.3c" should not be buried in definitions
+where they cannot be changed easily, or kept consistent with similar
+definitions during tuning.  They are much better placed as symbols,
+possibly parameters of the enclosing package:
+@ID @Code {
+"def @DocumentLayout" pp.example @Index { @Code "@PP" example }
+"    named @ParaGap { 1.3vx }"
+"    named @ParaIndent { 2f }"
+"    ..."
+"@Begin"
+""
+"    macro @PP { //@ParaGap @ParaIndent @Wide &0i }"
+"    macro @LP { //@ParaGap }"
+"    ..."
+"@End @DocumentLayout"
+}
+and we have arrived at the definition of @Code "@PP" as it appears in
+the DocumentLayout package.
+@PP
+A display is a table in which the first column is blank:
+document.layout.displays @SubIndex { displays }
+@ID lines @Break {
+@I { preceding text }
+@Code "//@DispGap |@DispIndent"  @I display
+@Code "//@DispGap"
+@I { following text }
+}
+Edge-to-edge is the appropriate spacing mode before and after displays,
+since the display could be a table or figure whose mark does not
+correspond to a baseline.  Thus, @Code "1v" is a reasonable value for
+{@Code "@DispGap"}.
+@PP
+The ordinary user cannot be expected to type the Lout source shown
+above; a more appropriate syntax is
+indented.display.example @Index { @Code "@IndentedDisplay" example }
+@ID lines @Break {
+@I { preceding text }
+@Code "@IndentedDisplay {"  @I display  @Code "}"
+@I { following text }
+}
+This presents a problem:  if @Code "@IndentedDisplay" is made a definition
+with a right parameter, its result will be an object separated from the
+surrounding text only by white space, hence part of the paragraph; while
+if it is a macro, the final @Code "//@DispGap" cannot be included in it.
+ The solution adopted in the DocumentLayout package uses a galley and a macro:
+@ID @Code {
+"    def @DispPlace { @Galley }"
+"    def @Disp into { @DispPlace&&preceding }"
+"        right x"
+"    {"
+"        @OneRow x"
+"    }"
+""
+"    macro @IndentedDisplay"
+"    {"
+"        //@DispGap  |@DispIndent  @DispPlace  |"
+"        //@DispGap  //  @Disp"
+"    }"
+}
+@Code "@DispPlace" and @Code "@Disp" are not exported, so there is
+no danger of a name clash with some other symbol.  The ordinary user's
+syntax expands to
+@ID lines @Break {
+@I { preceding text }
+@Code "//@DispGap  |@DispIndent  @DispPlace  |"
+@Code "//@DispGap  //  @Disp {" @I display @Code "}"
+@I { following text }
+}
+and the @Code "@Disp" galley appears at the preceding
+{@Code "@DispPlace"}, being itself replaced by @@Null.  The @Code "//"
+symbol protects the preceding @Code "//@DispGap" from being deleted by
+this @@Null when there is no following text.
+@PP
+An automatically numbered list
+document.layout.lists @SubIndex { lists }
+numbered @Index { Numbered list }
+could have an arbitrarily large number of
+items, so, by analogy with sequences of pages, we see immmediately that
+recursion must be involved:
+@ID @Code {
+"def @List right num"
+"{"
+"    @DispIndent @Wide num.  |  @ItemPlace"
+"    //@DispGap @List @Next num"
+"}"
+}
+Notice how the @@Next symbol works in conjunction with the recursion to
+produce an ascending sequence of numbers; the result of @Code "@List 1"
+will be
+@ID @Code {
+"1.   @ItemPlace"
+"2.   @ItemPlace"
+"3.   @ItemPlace"
+"..."
+}
+We can follow this with items which are galleys targeted to
+{@Code "@ItemPlace&&preceding"}, and @Code "@List" will expand just
+enough to accommodate them.
+@PP
+The usual problem with recursive-receptive symbols now arises:  there is
+always one unexpanded {@Code "@List"}, and until it can be removed the
+galley containing it will appear to be incomplete and will be prevented at
+that point from flushing into its parent (see page {@PageOf forcing}).  We
+adopt the usual solution:  a forcing galley into a later target will
+replace the last @Code "@List" by @@Null.  This brings us to the
+definitions as they appear in DocumentLayout:
+indented.list.example @Index { @Code "@IndentedList" example }
+@IndentedList
+@LI @Code {
+"def @ItemPlace { @Galley }"
+"def @ListItem into { @ItemPlace&&preceding }"
+"    right x"
+"{ x }"
+}
+@LI @Code {
+"def @EndListPlace { @Galley }"
+"def @EndList force into { @EndListPlace&&preceding }"
+"{}"
+}
+@LI @Code {
+"def @RawIndentedList"
+"   named style right tag {}"
+"   named indent { @DispIndent }"
+"   named gap { @DispGap }"
+"   named start { 1 }"
+"{"
+"    def @IList right num"
+"    {"
+"        indent @Wide {style num} | @ItemPlace"
+"        //gap @IList @Next num"
+"    }"
+""
+"    @IList start  //  @EndListPlace"
+"}"
+}
+@EndList
+Now given the input
+@ID @Code {
+"@RawIndentedList"
+"@ListItem { first item }"
+"@ListItem { second item }"
+"..."
+"@ListItem { last item }"
+"@EndList"
+}
+@Code "@RawIndentedList" will expand to receive the items, and will be
+closed off by {@Code "@EndList"}.
+@PP
+The {@Code indent}, {@Code gap}, and {@Code start} parameters are
+straightforward (note that the burden of typing @Code 1 has been lifted
+from the ordinary user), but the @Code style parameter has a parameter
+of its own (see page {@PageOf strange}).  It is used like this:
+@ID @Code {
+"def @RawNumberedList { @RawIndentedList style { tag. } }"
+"def @RawParenNumberedList { @RawIndentedList style { (tag) } }"
+}
+In {@Code "@RawNumberedList"}, @Code "style" is given the value
+{@Code "tag."}, where @Code tag is its own right parameter, so the value
+of @Code "{style num}" within @Code "@IList" is {@Code "num."}; while in
+{@Code "@RawParenNumberedList"}, @Code "{style num}" is {@Code "(num)"}.  In
+this way we achieve an unlimited variety of numbering formats without
+having to rewrite @Code "@RawIndentedList" over and over.
+@PP
+These list symbols are objects without surrounding space, so macros
+similar to those used for displays are needed:
+@ID @Code {
+"macro @NumberedList { //@DispGap @RawNumberedList //@DispGap }"
+"macro @ParenNumberedList { //@DispGap @RawParenNumberedList //@DispGap }"
+}
+and so on.
+@PP
+Lists numbered by Roman numerals
+roman @Index { Roman numerals }
+present a problem, because @@Next will
+not increment Roman numerals.  Instead, they must be stored in a
+database:
+@ID @Code {
+"def @Roman"
+"    left @Tag"
+"    right @Val"
+"{ @Val }"
+""
+"@SysDatabase @Roman { standard }"
+}
+@Code "@SysDatabase" is preferred over @Code "@Database" here because
+this database should be kept in a standard place and shared by
+everyone.  The database itself, a file called @Code "standard.ld" in
+Basser Lout, contains invocations of {@Code "@Roman"}, each enclosed in
+braces:
+@ID @Code {
+"{ 1 @Roman i }"
+"{ 2 @Roman ii }"
+"..."
+"{ 100 @Roman c }"
+}
+Then @Code "@Roman&&12" for example has value {@Roman&&12}, and
+@ID @Code {
+"def @RawRomanList { @RawIndentedList style { {@Roman&&tag}. } }"
+}
+produces a list numbered by Roman numerals.  The counting still
+proceeds in Arabic, but each Arabic numeral is converted to Roman by the
+cross reference.  Since arbitrary objects may be stored in databases,
+arbitrary finite sequences of objects may be `counted' in this way.
+@End @Section
diff --git a/doc/expert/mydefs b/doc/expert/mydefs
new file mode 100644
index 0000000..e7f0d15
--- /dev/null
+++ b/doc/expert/mydefs
@@ -0,0 +1,442 @@
+
+   def "->" { {Symbol Base} @Font "\256" } #174 decimal
+   def "=>" { {Symbol Base} @Font "\336" } #222 decimal
+   macro @JP	{ /0.5v  }
+
+   def @Code right x
+   { { Helvetica Base -1p } @Font lines @Break x }
+
+   macro @JL { //1vx }
+
+   ###################################################
+   #                                                 #
+   #  Lout keywords.                                 #
+   #                                                 #
+   ###################################################
+
+   def @@BackEnd           { @Code "@BackEnd"           }
+   def @@Background        { @Code "@Background"        }
+   def @@Begin             { @Code "@Begin"             }
+   def @@Break             { @Code "@Break"             }
+   def @@Case              { @Code "@Case"              }
+   def @@Char              { @Code "@Char"              }
+   def @@Common            { @Code "@Common"            }
+   def @@CurrLang          { @Code "@CurrLang"          }
+   def @@CurrFamily        { @Code "@CurrFamily"        }
+   def @@CurrFace          { @Code "@CurrFace"          }
+   def @@Database          { @Code "@Database"          }
+   def @@End               { @Code "@End"               }
+   def @@Enclose           { @Code "@Enclose"           }
+   def @@Font              { @Code "@Font"              }
+   def @@ForceGalley       { @Code "@ForceGalley"       }
+   def @@Galley            { @Code "@Galley"            }
+   def @@Graphic           { @Code "@Graphic"           }
+   def @@HAdjust           { @Code "@HAdjust"           }
+   def @@HCover            { @Code "@HCover"            }
+   def @@HContract         { @Code "@HContract"         }
+   def @@HExpand           { @Code "@HExpand"           }
+   def @@HLimited          { @Code "@HLimited"          }
+   def @@High              { @Code "@High"              }
+   def @@HScale            { @Code "@HScale"            }
+   def @@HShift            { @Code "@HShift"            }
+   def @@HSpan             { @Code "@HSpan"             }
+   def @@Include           { @Code "@Include"           }
+   def @@IncludeGraphic    { @Code "@IncludeGraphic"    }
+   def @@KernShrink        { @Code "@KernShrink"        }
+   def @@Key               { @Code "@Key"               }
+   def @@Language          { @Code "@Language"          }
+   def @@LClos             { @Code "@LClos"             }
+   def @@LEnv              { @Code "@LEnv"              }
+   def @@LInput            { @Code "@LInput"            }
+   def @@LUse              { @Code "@LUse"              }
+   def @@LVis              { @Code "@LVis"              }
+   def @@Meld              { @Code "@Meld"              }
+   def @@Merge             { @Code "@Merge"             }
+   def @@Moment            { @Code "@Moment"            }
+   def @@Next              { @Code "@Next"              }
+   def @@NotRevealed       { @Code "@NotRevealed"       }
+   def @@Null              { @Code "@Null"              }
+   def @@OneCol            { @Code "@OneCol"            }
+   def @@OneOf             { @Code "@OneOf"             }
+   def @@OneRow            { @Code "@OneRow"            }
+   def @@Open              { @Code "@Open"              }
+   def @@PAdjust           { @Code "@PAdjust"           }
+   def @@PageLabel         { @Code "@PageLabel"         }
+   def @@PlainGraphic      { @Code "@PlainGraphic"    }
+   def @@PrependGraphic    { @Code "@PrependGraphic"    }
+   def @@RawVerbatim       { @Code "@RawVerbatim"       }
+   def @@Rotate            { @Code "@Rotate"            }
+   def @@Rump              { @Code "@Rump"              }
+   def @@Insert            { @Code "@Insert"            }
+   def @@Scale             { @Code "@Scale"             }
+   def @@SetColor          { @Code "@SetColor"          }
+   def @@SetColour         { @Code "@SetColour"         }
+   def @@Space             { @Code "@Space"             }
+   def @@StartHSpan        { @Code "@StartHSpan"        }
+   def @@StartVSpan        { @Code "@StartVSpan"        }
+   def @@StartHVSpan       { @Code "@StartHVSpan"       }
+   def @@SysDatabase       { @Code "@SysDatabase"       }
+   def @@SysInclude        { @Code "@SysInclude"        }
+   def @@SysIncludeGraphic { @Code "@SysIncludeGraphic" }
+   def @@SysPrependGraphic { @Code "@SysPrependGraphic" }
+   def @@Tag               { @Code "@Tag"               }
+   def @@Tagged            { @Code "@Tagged"            }
+   def @@Underline         { @Code "@Underline"         }
+   def @@Use               { @Code "@Use"               }
+   def @@VAdjust           { @Code "@VAdjust"           }
+   def @@VContract         { @Code "@VContract"         }
+   def @@VCover            { @Code "@VCover"            }
+   def @@VExpand           { @Code "@VExpand"           }
+   def @@Verbatim          { @Code "@Verbatim"          }
+   def @@VLimited          { @Code "@VLimited"          }
+   def @@VScale            { @Code "@VScale"            }
+   def @@VShift            { @Code "@VShift"            }
+   def @@VSpan             { @Code "@VSpan"             }
+   def @@Wide              { @Code "@Wide"              }
+   def @@Yield             { @Code "@Yield"             }
+   def @@YUnit             { @Code "@YUnit"             }
+   def @@ZUnit             { @Code "@ZUnit"             }
+
+
+   ###################################################
+   #                                                 #
+   #  Miscellaneous, mostly graphical definitions.   #
+   #                                                 #
+   ###################################################
+
+
+   def @TeX
+   { @OneCol { T &0.4fo {-0.2f @VShift E} &0.45fo X }
+   }
+
+   export sp sb
+   def @Equation
+      body x
+   @Begin
+
+      def sp left x right y { @OneRow { | "-2p" @Font y ^/0.5fk x } }
+      def sb left x right y { @OneRow { x ^/0.5fk | "-2p" @Font y } }
+
+      Slope @Font x
+
+   @End @Equation
+
+   def @Super
+      left x
+      right y
+   { @OneRow { | -2p @Font y ^/0.5fk x }
+   }
+
+   def @NineSquare
+      right x
+   {
+      def @Three { x |0.2i x |0.2i x }
+
+      @Three /0.2i @Three /0.2i @Three
+   }
+
+   def @Leaders
+   { ..   @Leaders
+   }
+
+   def @HLine
+   {
+      @BackEnd @Case {
+      PostScript @Yield { {0 0 moveto xsize 0 lineto stroke} @Graphic {} }
+             PDF @Yield { {0 0 m __xsize 0 l s} @Graphic {} }
+      }
+#	{ 0 0 moveto xsize 0 lineto stroke } @Graphic {}
+   }
+
+   def @VDashLine
+      right length
+   {
+      length @High {
+         @BackEnd @Case {
+         PostScript @Yield { { 0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke } @Graphic {} }
+
+# VT: double quotes required:
+                PDF @Yield { { "__pt 3 0 d    0 0 m   0 __ysize l   s" } @Graphic {} }
+         }
+#	{ 0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke } @Graphic {}
+      }
+   }
+
+   def @LBox
+      right offset
+   {  @HContract @VContract
+      {
+        {  //0.2c
+           0.6c @High 1.2c @Wide
+
+           @BackEnd @Case {
+              PostScript @Yield {
+                 { 0 0 moveto xsize 0 lineto
+                   xsize ysize lineto 0 ysize lineto closepath
+                   gsave 0.9 setgray fill grestore stroke } @Graphic {}
+              }
+              PDF @Yield {
+                 { 0 0 m   __xsize 0 l
+                   __xsize __ysize l   0 __ysize l   h
+                   q 0.9 g f Q s } @Graphic {}
+              }
+           }
+
+#           { 0 0 moveto xsize 0 lineto
+#	     xsize ysize lineto 0 ysize lineto closepath
+#	     gsave 0.9 setgray fill grestore stroke }
+#           @Graphic {}
+        }
+        ||offset @VDashLine 1c
+      }
+   }
+
+   def @Arrow
+      right length
+   {  @OneCol @OneRow
+      {
+	   30d @Rotate {0.12c @Wide @HLine}
+	   //
+	   length @Wide @HLine
+	   //
+	   "-30d" @Rotate {0.12c @Wide @HLine}
+      }
+   }
+
+   def @DoubleArrow
+      right length
+   {  @OneCol @OneRow
+      { 
+         & 180d @Rotate @Arrow length
+         |0io @Arrow length
+      }
+   }
+
+   def @Put
+     left coord
+     right x
+   { @OneCol @OneRow
+     { coord / | @OneCol @OneRow x
+     }
+   }
+   
+   macro @At { //0io }
+
+
+   ###################################################
+   #                                                 #
+   #  Interpolated example documents.                #
+   #                                                 #
+   ###################################################
+
+   def @LittleEndRunPlace { @Galley }
+   def @LittleEndRun
+      force into { @LittleEndRunPlace&&preceding }
+   {}
+
+   def @LittleTextPlace { @Galley }
+   def @LittleText into { @LittleTextPlace&&preceding }
+      right x
+   { x
+   }
+
+   def @LittleFootPlace { @Galley }
+   def @LittleFootNote into { @LittleFootPlace&&following }
+      right x
+   { x
+   }
+
+   def @LittlePageColumn
+      right x
+   {
+        9px @Break 8p @Font
+        2.8c @Wide x
+   }
+
+   def @LittlePage
+      right x
+   {
+      @HContract @VContract {
+         @BackEnd @Case {
+            PostScript @Yield {
+               { 0 0 moveto xsize 0 lineto xsize ysize lineto
+                 0 ysize lineto closepath stroke } @Graphic
+               {  //0.3c ||0.3c
+                  9px @Break 8p @Font
+                  2.8c @Wide 3.8c @High x
+                  ||0.3c //0.3c
+               }
+            }
+            PDF        @Yield {
+               { 0 0 m __xsize 0 l __xsize __ysize l
+                 0 __ysize l h s } @Graphic
+               {  //0.3c ||0.3c
+                  9px @Break 8p @Font
+                  2.8c @Wide 3.8c @High x
+                  ||0.3c //0.3c
+               }
+            }
+         }
+#        { 0 0 moveto xsize 0 lineto xsize ysize lineto
+#    	  0 ysize lineto closepath stroke } @Graphic
+#        {  //0.3c ||0.3c
+#           9px @Break 8p @Font
+#           2.8c @Wide 3.8c @High x
+#           ||0.3c //0.3c
+#        }
+      }
+   }
+
+   def @LittleFootSect
+   {  1c @Wide @HLine
+      //0.3v @LittleFootPlace ||0.5c
+   }
+
+   def @LittlePageList
+     right @PageNum
+   {
+      @LittlePage { # |0.5rt @PageNum //0.8v
+		//0.3v @LittleTextPlace
+		//1rt @LittleFootSect
+	     }
+      //
+      @LittlePageList @Next @PageNum
+   }
+
+   def @LittleDocument
+   {  @LittlePage
+      {  @LittleTextPlace
+         //1rt @LittleFootSect
+      }
+      // @LittlePageList 2
+      // @LittleEndRunPlace
+   }
+		
+   def @ShowMarks
+      named linewidth  {
+      	@BackEnd @Case {
+      	  PostScript @Yield { 0.015 cm }
+      	  PDF        @Yield { __mul(0.015, __cm) }
+      	}
+      }
+      named linestyle  { dashed   }
+      named dashlength {
+      	@BackEnd @Case {
+      	  PostScript @Yield { 0.15 cm }
+      	  PDF        @Yield { __mul(0.15, __cm) }
+      	}
+      }
+      named paint      { lightgrey}
+      right x
+   {
+      @HContract @VContract @Fig
+      {   @Box margin { 0c } linewidth { linewidth } paint { paint }
+	  {   @Figure
+		 shape {
+		   @BackEnd @Case {
+		     PostScript @Yield {
+		       -0.3 cm ymark
+			   {xsize ymark} ++ {0.3 cm 0}  []
+			   xmark -0.3 cm
+			   {xmark ysize} ++ {0 0.3 cm}
+		     }
+		     PDF @Yield { ""	#	VT: PDF currently has no output
+		     }
+		   }
+		 }
+		 linewidth { linewidth }
+		 linestyle { linestyle }
+		 dashlength { dashlength }
+	      x
+	  }
+
+      }
+   }
+
+   def @ShowVMark
+      named linewidth  { 0.015 cm }
+      named linestyle  { dashed   }
+      named dashlength { 0.15 cm  }
+      named paint      { light    }
+      right x
+   {
+      @Fig
+      {   
+	 @Figure
+		 shape {
+		   @BackEnd @Case {
+		     PostScript @Yield {
+			   xmark -0.3 cm
+			   {xmark ysize} ++ {0 0.3 cm}
+		     }
+		     PDF @Yield { ""	#	VT: PDF currently has no output
+		     }
+		   }
+		 }
+		 linewidth { linewidth }
+		 linestyle { linestyle }
+		 dashlength { dashlength }
+	 x
+      }
+   }
+
+   def @ShowHMark
+      named linewidth  { 0.015 cm }
+      named linestyle  { dashed   }
+      named dashlength { 0.15 cm  }
+      named paint      { light    }
+      right x
+   {
+      @Fig
+      {   
+	 @Figure
+		 shape {
+		   @BackEnd @Case {
+		     PostScript @Yield {
+			 -0.3 cm ymark
+			 {xsize ymark} ++ {0.3 cm 0}
+		     }
+		     PDF @Yield { ""	#	VT: PDF currently has no output
+		     }
+		   }
+		 }
+		 linewidth { linewidth }
+		 linestyle { linestyle }
+		 dashlength { dashlength }
+	 x
+      }
+   }
+
+   def @Strange
+       named @Format right @Val { [@Val] }
+       right x
+   {   @Format x
+   }
+
+   def @TightBox right x
+   {
+      @BackEnd @Case {
+         PostScript @Yield {
+            "0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke"
+            @Graphic x
+         }
+         PDF @Yield {
+            "0 0 m __xsize 0 l __xsize __ysize l 0 __ysize l h s"
+            @Graphic x
+         }
+      }
+   }
+
+   def @GreyBox right x
+   {
+      @BackEnd @Case {
+         PostScript @Yield {
+            "0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath 0.8 setgray fill"
+            @Graphic x
+         }
+         PDF @Yield {
+            "0 0 m __xsize 0 l __xsize __ysize l 0 __ysize l h 0.8 g f"
+            @Graphic x
+         }
+      }
+   }
diff --git a/doc/expert/outfile.ps b/doc/expert/outfile.ps
new file mode 100644
index 0000000..477b7da
--- /dev/null
+++ b/doc/expert/outfile.ps
@@ -0,0 +1,15746 @@
+%!PS-Adobe-3.0
+%%Creator: Basser Lout Version 3.17 (September 1999)
+%%CreationDate: Fri Sep 17 12:08:04 1999
+%%DocumentData: Binary
+%%DocumentNeededResources: (atend)
+%%DocumentMedia: Plain 595 842 0 white ()
+%%DocumentSuppliedResources: (atend)
+%%Pages: (atend)
+%%BoundingBox: 0 0 595 842
+%%EndComments
+
+%%BeginProlog
+%%BeginResource: procset LoutStartUp
+/m  { 3 1 roll moveto show } bind def
+/s  { exch currentpoint exch pop moveto show } bind def
+/k  { exch neg 0 rmoveto show } bind def
+/ul { gsave setlinewidth dup 3 1 roll
+      moveto lineto stroke grestore } bind def
+/in { 1440 mul } def
+/cm { 567 mul } def
+/pt { 20 mul } def
+/em { 120 mul } def
+/sp { louts mul } def
+/vs { loutv mul } def
+/ft { loutf mul } def
+/dg {           } def
+
+/LoutGraphic {
+  /louts exch def
+  /loutv exch def
+  /loutf exch def
+  /ymark exch def
+  /xmark exch def
+  /ysize exch def
+  /xsize exch def
+} def
+
+/LoutGr2 { gsave translate LoutGraphic gsave } def
+
+/LoutFont
+{ findfont exch scalefont setfont
+} bind def
+
+/LoutRecode {
+  { findfont dup length dict begin
+    {1 index /FID ne {def} {pop pop} ifelse} forall
+    /Encoding exch def
+    currentdict end definefont pop
+  }
+  stopped pop
+} bind def
+
+/BeginEPSF {
+  /LoutEPSFState save def
+  /dict_count countdictstack def
+  /op_count count 1 sub def
+  userdict begin
+  /showpage { } def
+  0 setgray 0 setlinecap
+  1 setlinewidth 0 setlinejoin
+  10 setmiterlimit [] 0 setdash newpath
+  /languagelevel where
+  { pop languagelevel
+    1 ne
+    { false setstrokeadjust false setoverprint
+    } if
+  } if
+} bind def
+
+/EndEPSF {
+  count op_count sub { pop } repeat
+  countdictstack dict_count sub { end } repeat
+  LoutEPSFState restore
+} bind def
+%%EndResource
+
+%%BeginResource encoding vec2
+/vec2 [
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright
+/parenleft /parenright /asterisk /plus /comma /hyphen /period /slash
+/zero /one /two /three /four /five /six /seven
+/eight /nine /colon /semicolon /less /equal /greater /question
+/at /A /B /C /D /E /F /G
+/H /I /J /K /L /M /N /O
+/P /Q /R /S /T /U /V /W
+/X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore
+/quoteleft /a /b /c /d /e /f /g
+/h /i /j /k /l /m /n /o
+/p /q /r /s /t /u /v /w
+/x /y /z /braceleft /bar /braceright /asciitilde /.notdef
+/quotesinglbase /quotedblbase /ellipsis /OE /oe /quotedblleft /quotedblright /fi
+/fl /endash /emdash /bullet /dagger /daggerdbl /florin /fraction
+/dotlessi /grave /acute /circumflex /tilde /macron /breve /dotaccent
+/dieresis /.notdef /ring /cedilla /.notdef /hungarumlaut /ogonek /caron
+/space /exclamdown /cent /sterling /currency /yen /brokenbar /section
+/dieresis /copyright /ordfeminine /guillemotleft /logicalnot /hyphen /registered /macron
+/degree /plusminus /twosuperior /threesuperior /acute /mu /paragraph /periodcentered
+/cedilla /onesuperior /ordmasculine /guillemotright /onequarter /onehalf /threequarters /questiondown
+/Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla
+/Egrave /Eacute /Ecircumflex /Edieresis /Igrave /Iacute /Icircumflex /Idieresis
+/Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply
+/Oslash /Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn /germandbls
+/agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla
+/egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex /idieresis
+/eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis /divide
+/oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn /ydieresis
+] def
+%%EndResource
+
+%%BeginResource: procset LoutTabPrependGraphic
+% @PrependGraphic file /usr/staff/jeff/lout.lib/include/tabf.lpg
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                  %
+%  PostScript @SysPrependGraphic file for @Tab     %
+%                                                  %
+%  To assist in avoiding name clashes, the names   %
+%  of all these symbols begin with "ltab".         %
+%                                                  %
+%  Jeffrey H. Kingston                             %
+%  24 September 1991                               %
+%  22 December 1992                                %
+%                                                  %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% linewidth ltabhs -
+% horizontal single line
+/ltabhs
+{  0 0 moveto xsize 0 lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhsp -
+% horizontal single line with projecting ends
+/ltabhsp
+{  0 0 moveto xsize 0 lineto
+   setlinewidth 2 setlinecap stroke
+} def
+
+% linewidth ltabhd -
+% horizontal double line
+/ltabhd
+{  dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch 3 mul moveto xsize exch 3 mul lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhdb -
+% horizontal double line below mark
+/ltabhdb
+{  dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch -3 mul moveto xsize exch -3 mul lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhdnw -
+% horizontal double line with northwest corner
+/ltabhdnw
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   xsize exch 3 mul moveto
+   -3 mul exch 3 mul lineto
+   -3 mul 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdne -
+% horizontal double line with northeast corner
+/ltabhdne
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch 3 mul moveto
+   3 mul xsize add exch 3 mul lineto
+   3 mul xsize add 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdsw -
+% horizontal double line with southwest corner
+/ltabhdsw
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   xsize exch -3 mul moveto
+   -3 mul exch -3 mul lineto
+   -3 mul 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdse -
+% horizontal double line with southeast corner
+/ltabhdse
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch -3 mul moveto
+   3 mul xsize add exch -3 mul lineto
+   3 mul xsize add 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabvs -
+% vertical single line
+/ltabvs
+{  0 0 moveto 0 ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabvd -
+% vertical double line
+/ltabvd
+{  dup dup
+   0 0 moveto 0 ysize lineto
+   -3 mul 0 moveto -3 mul ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabvdr -
+% vertical double line to right of mark
+/ltabvdr
+{  dup dup
+   0 0 moveto 0 ysize lineto
+   3 mul 0 moveto 3 mul ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+%%EndResource
+
+%%BeginResource: procset LoutFigPrependGraphic
+% @PrependGraphic file /usr/staff/jeff/lout.lib/include/figf.lpg
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                                    %
+%  PostScript @SysPrependGraphic file for @Fig  Jeffrey H. Kingston  %
+%  Version 2.0 (includes CIRCUM label)                 January 1992  %
+%                                                                    %
+%  To assist in avoiding name clashes, the names of all symbols      %
+%  defined here begin with "lfig".  However, this is not feasible    %
+%  with user-defined labels and some labels used by users.           %
+%                                                                    %
+%  <point>      is two numbers, a point.                             %
+%  <length>     is one number, a length                              %
+%  <angle>      is one number, an angle in degrees                   %
+%  <dashlength> is one number, the preferred length of a dash        %
+%                                                                    %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+errordict begin
+   /handleerror
+   {
+      {  /Times-Roman findfont 8 pt scalefont setfont
+	 0 setgray 4 pt 4 pt moveto
+	 $error /errorname get
+	 dup lfigdict exch known
+	 { lfigdict exch get }
+	 { 30 string cvs } ifelse
+	 show
+	 (  Command: ) show
+	 $error /command get 30 string cvs show
+      } stopped {} if
+      showpage stop
+   } def
+end
+
+% concat strings: <string> <string> lfigconcat <string>
+% must be defined outside lfigdict since used in lfigpromotelabels
+/lfigconcat
+{ 2 copy length exch length add string
+  dup 0 4 index putinterval
+  dup 3 index length 3 index putinterval
+  3 1 roll pop pop
+} def
+
+% <string> lfigdebugprint -
+% must be defined outside lfigdict since used in arbitrary places
+% /lfigdebugprint
+% { print
+%   (;  operand stack:\n) print
+%   count copy
+%   count 2 idiv
+%   { ==
+%     (\n) print
+%   } repeat
+%   (\n) print
+% } def
+
+/lfigdict 120 dict def
+lfigdict begin
+
+% error messages
+/dictfull (dictfull error:  too many labels?) def
+/dictstackoverflow (dictstackoverflow error:  labels nested too deeply?) def
+/execstackoverflow (execstackoverflow error:  figure nested too deeply?) def
+/limitcheck (limitcheck error:  figure nested too deeply or too large?) def
+/syntaxerror (syntaxerror error:  syntax error in text of figure?) def
+/typecheck (typecheck error:  syntax error in text of figure?) def
+/undefined (undefined error:  unknown or misspelt label?) def
+/VMError (VMError error:  run out of memory?) def
+
+% push pi onto stack:  - lfigpi <num>
+/lfigpi 3.14159 def
+
+% arc directions
+/clockwise     false def
+/anticlockwise true  def
+
+% maximum of two numbers:  <num> <num> lfigmax <num>
+/lfigmax { 2 copy gt { pop } { exch pop } ifelse } def
+
+% minimum of two numbers:  <num> <num> lfigmin <num>
+/lfigmin { 2 copy lt { pop } { exch pop } ifelse } def
+
+% add two points:  <point> <point> lfigpadd <point>
+/lfigpadd { exch 3 1 roll add 3 1 roll add exch } def
+
+% subtract first point from second:  <point> <point> lfigpsub <point>
+/lfigpsub { 3 2 roll sub 3 1 roll exch sub exch } def
+
+% max two points:  <point> <point> lfigpmax <point>
+/lfigpmax { exch 3 1 roll lfigmax 3 1 roll lfigmax exch } def
+
+% min two points:  <point> <point> lfigpmin <point>
+/lfigpmin { exch 3 1 roll lfigmin 3 1 roll lfigmin exch } def
+
+% scalar multiplication: <point> <num> lfigpmul <point>
+/lfigpmul { dup 3 1 roll mul 3 1 roll mul exch } def
+
+% point at angle and distance:  <point> <length> <angle> lfigatangle <point>
+/lfigatangle { 2 copy cos mul 3 1 roll sin mul lfigpadd } def
+
+% angle from one point to another:  <point> <point> lfigangle <angle>
+/lfigangle { lfigpsub 2 copy 0 eq exch 0 eq and {pop} {exch atan} ifelse } def
+
+% distance between two points:  <point> <point> lfigdistance <length>
+/lfigdistance { lfigpsub dup mul exch dup mul add sqrt } def
+
+% difference in x coords: <point> <point> lfigxdistance <length>
+/lfigxdistance { pop 3 1 roll pop sub } def
+
+%difference in y coords: <point> <point> lfigydistance <length>
+/lfigydistance { 3 1 roll pop sub exch pop } def
+
+% stroke a solid line:  <length> <dashlength> lfigsolid -
+/lfigsolid
+{  pop pop [] 0 setdash stroke
+} def
+
+% stroke a lfigdashed line:   <length> <dashlength> lfigdashed -
+/lfigdashed
+{  2 copy div 2 le 1 index 0 le or
+   {  exch pop 1 pt lfigmax [ exch dup ] 0 setdash }
+   {  dup [ exch 4 2 roll 2 copy div
+      1 sub 2 div ceiling dup 4 1 roll
+      1 add mul sub exch div ] 0 setdash
+   } ifelse stroke
+} def
+
+% stroke a lfigcdashed line:  <length> <dashlength> lfigcdashed -
+/lfigcdashed
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt lfigmax [ exch dup ] dup 0 get 2 div setdash }
+   { dup [ 4 2 roll exch 2 copy exch div
+     2 div ceiling div 1 index sub
+     ] exch 2 div setdash
+   } ifelse stroke
+} def
+
+% stroke a dotted line:  <length> <dashlength> lfigdotted -
+/lfigdotted
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt lfigmax [ exch 0 exch ] 0 setdash }
+   { 1 index exch div ceiling div
+     [ 0 3 2 roll ] 0 setdash
+   } ifelse stroke
+} def
+
+% stroke a noline line:  <length> <dashlength> lfignoline -
+/lfignoline
+{ pop pop
+} def
+
+% painting (i.e. filling): - lfigwhite - (etc.)
+/lfignopaint		{			       } def
+/lfignochange		{ 			  fill } def
+/lfigdarkblue		{ 0.0 0.0 0.5 setrgbcolor fill } def
+/lfigblue		{ 0.0 0.0 1.0 setrgbcolor fill } def
+/lfiglightblue		{ 0.5 0.5 1.0 setrgbcolor fill } def
+/lfigdarkgreen		{ 0.0 0.5 0.0 setrgbcolor fill } def
+/lfiggreen		{ 0.0 1.0 0.0 setrgbcolor fill } def
+/lfiglightgreen		{ 0.5 1.0 0.5 setrgbcolor fill } def
+/lfigdarkred		{ 0.5 0.0 0.0 setrgbcolor fill } def
+/lfigred		{ 1.0 0.0 0.0 setrgbcolor fill } def
+/lfiglightred		{ 1.0 0.5 0.5 setrgbcolor fill } def
+/lfigdarkcyan		{ 0.0 0.5 0.5 setrgbcolor fill } def
+/lfigcyan		{ 0.0 1.0 1.0 setrgbcolor fill } def
+/lfiglightcyan		{ 0.5 1.0 1.0 setrgbcolor fill } def
+/lfigdarkmagenta	{ 0.5 0.0 0.5 setrgbcolor fill } def
+/lfigmagenta		{ 1.0 0.0 1.0 setrgbcolor fill } def
+/lfiglightmagenta	{ 1.0 0.5 1.0 setrgbcolor fill } def
+/lfigdarkyellow		{ 0.5 0.5 0.0 setrgbcolor fill } def
+/lfigyellow		{ 1.0 1.0 0.0 setrgbcolor fill } def
+/lfiglightyellow	{ 1.0 1.0 0.5 setrgbcolor fill } def
+/lfigdarkgray		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/lfiggray		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/lfiglightgray		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/lfigdarkgrey		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/lfiggrey		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/lfiglightgrey		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/lfigblack		{ 0.0 0.0 0.0 setrgbcolor fill } def
+/lfigwhite		{ 1.0 1.0 1.0 setrgbcolor fill } def
+
+% line caps (and joins, not currently used)
+/lfigbutt       0 def
+/lfiground      1 def
+/lfigprojecting 2 def
+/lfigmiter      0 def
+/lfigbevel      2 def
+
+% shape and labels of the @Box symbol
+/lfigbox
+{
+   0     0     /SW  lfigpointdef
+   xsize 0     /SE  lfigpointdef
+   xsize ysize /NE  lfigpointdef
+   0     ysize /NW  lfigpointdef
+   SE 0.5 lfigpmul /S   lfigpointdef
+   NW 0.5 lfigpmul /W   lfigpointdef
+   W SE lfigpadd   /E   lfigpointdef
+   S NW lfigpadd   /N   lfigpointdef
+   NE 0.5 lfigpmul /CTR lfigpointdef
+   [ CTR NE lfigpsub /lfigboxcircum cvx ] lfigcircumdef
+   SW SE NE NW SW
+} def
+
+% shape and labels of the @CurveBox symbol
+/lfigcurvebox
+{
+
+   xsize 0.5 mul	ysize 0.5 mul	/CTR lfigpointdef
+   xsize 0.5 mul	0		/S   lfigpointdef
+   xsize		ysize 0.5 mul	/E   lfigpointdef
+   xsize 0.5 mul	ysize		/N   lfigpointdef
+   0			ysize 0.5 mul	/W   lfigpointdef
+
+   xmark 0.293 mul		xmark 0.293 mul		  /SW  lfigpointdef
+   xsize xmark 0.293 mul sub	xmark 0.293 mul		  /SE  lfigpointdef
+   xsize xmark 0.293 mul sub	ysize xmark 0.293 mul sub /NE  lfigpointdef
+   xmark 0.293 mul		ysize xmark 0.293 mul sub /NW  lfigpointdef
+
+   [ xsize ysize 0.5 lfigpmul xmark /lfigcurveboxcircum cvx ] lfigcircumdef
+
+   xmark		0
+   xsize xmark sub	0
+   [ xsize xmark sub	xmark		]
+   xsize		xmark
+   xsize		ysize xmark sub
+   [ xsize xmark sub	ysize xmark sub	]
+   xsize xmark sub	ysize
+   xmark		ysize
+   [ xmark		ysize xmark sub	]
+   0			ysize xmark sub
+   0			xmark
+   [ xmark		xmark		]
+   xmark		0
+} def
+
+% shadow of the @ShadowBox symbol
+% its shape and labels are done, somewhat inaccurately, with lfigbox
+/lfigshadow
+{ xmark 2 mul 0 moveto xsize 0 lineto
+  xsize ysize xmark 2 mul sub lineto
+  xsize xmark sub ysize xmark 2 mul sub lineto
+  xsize xmark sub xmark lineto
+  xmark 2 mul xmark lineto closepath fill
+} def
+
+% shape and labels of the @Square symbol
+/lfigsquare
+{
+   xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   CTR xsize xsize ysize ysize lfigpmax 0.5 lfigpmul lfigpadd /NE lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 135 lfigatangle lfigpadd /NW lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 225 lfigatangle lfigpadd /SW lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 315 lfigatangle lfigpadd /SE lfigpointdef
+   SW 0.5 lfigpmul SE 0.5 lfigpmul lfigpadd /S lfigpointdef
+   NW 0.5 lfigpmul NE 0.5 lfigpmul lfigpadd /N lfigpointdef
+   SW 0.5 lfigpmul NW 0.5 lfigpmul lfigpadd /W lfigpointdef
+   SE 0.5 lfigpmul NE 0.5 lfigpmul lfigpadd /E lfigpointdef
+   [ CTR NE lfigpsub /lfigboxcircum cvx ] lfigcircumdef
+   SW SE NE NW SW
+} def
+
+% shape and labels of the @Diamond symbol
+/lfigdiamond
+{
+   xsize 0 0.5 lfigpmul /S   lfigpointdef
+   0 ysize 0.5 lfigpmul /W   lfigpointdef
+   S W         lfigpadd /CTR lfigpointdef
+   CTR W       lfigpadd /N   lfigpointdef
+   CTR S       lfigpadd /E   lfigpointdef
+   [ xsize ysize 0.5 lfigpmul /lfigdiamondcircum cvx ] lfigcircumdef
+   S E N W S
+} def
+
+% shape and labels of the @Ellipse symbol
+/lfigellipse
+{
+   xsize 0 0.5 lfigpmul /S   lfigpointdef
+   0 ysize 0.5 lfigpmul /W   lfigpointdef
+   S W         lfigpadd /CTR lfigpointdef
+   CTR W       lfigpadd /N   lfigpointdef
+   CTR S       lfigpadd /E   lfigpointdef
+   CTR xsize 0 0.3536 lfigpmul lfigpadd 0 ysize 0.3536 lfigpmul lfigpadd /NE lfigpointdef
+   0 ysize 0.3536 lfigpmul CTR xsize 0 0.3536 lfigpmul lfigpadd lfigpsub /SE lfigpointdef
+   xsize 0 0.3536 lfigpmul CTR lfigpsub 0 ysize 0.3536 lfigpmul lfigpadd /NW lfigpointdef
+   0 ysize 0.3536 lfigpmul xsize 0 0.3536 lfigpmul CTR lfigpsub lfigpsub /SW lfigpointdef
+   [ xsize ysize 0.5 lfigpmul /lfigellipsecircum cvx ] lfigcircumdef
+   S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+} def
+
+% shape and labels of the @Circle symbol
+/lfigcircle
+{
+   xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   CTR xsize 0 ysize 0 lfigpmax 0.5 lfigpmul lfigpadd /E lfigpointdef
+   CTR 0 0 CTR E lfigdistance 45 lfigatangle lfigpadd /NE lfigpointdef
+   CTR 0 0 CTR E lfigdistance 90 lfigatangle lfigpadd /N lfigpointdef
+   CTR 0 0 CTR E lfigdistance 135 lfigatangle lfigpadd /NW lfigpointdef
+   CTR 0 0 CTR E lfigdistance 180 lfigatangle lfigpadd /W lfigpointdef
+   CTR 0 0 CTR E lfigdistance 225 lfigatangle lfigpadd /SW lfigpointdef
+   CTR 0 0 CTR E lfigdistance 270 lfigatangle lfigpadd /S lfigpointdef
+   CTR 0 0 CTR E lfigdistance 315 lfigatangle lfigpadd /SE lfigpointdef
+   [ S E lfigpsub /lfigellipsecircum cvx ] lfigcircumdef
+   S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+} def
+
+% shape and labels of the @HLine and @HArrow symbols
+/lfighline
+{
+   0 ymark lfigprevious /FROM lfigpointdef
+   xsize ymark lfigprevious /TO lfigpointdef
+} def
+
+% shape and labels of the @VLine and @VArrow symbols
+/lfigvline
+{
+   xmark ysize lfigprevious /FROM lfigpointdef
+   xmark 0 lfigprevious /TO lfigpointdef
+} def
+
+% points of a polygon around base with given no of sides, vert init angle:
+% <sides> <angle> figpolygon <point> ... <point>
+/lfigpolygon
+{  xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   90 sub CTR 2 copy lfigmax 5 3 roll
+   [ 4 copy pop /lfigpolycircum cvx ] lfigcircumdef
+   exch dup 360 exch div exch
+   1 1  3 2 roll
+   {  4 string cvs (P) exch lfigconcat cvn
+      6 copy pop pop lfigatangle 2 copy 10 2 roll
+      3 2 roll lfigpointdef
+      dup 3 1 roll add exch
+   }  for
+   pop lfigatangle
+} def
+
+% next array element:  <array> <index> lfiggetnext <array> <index> <any> true
+%                                               or <array> <index> false
+/lfiggetnext
+{  2 copy exch length ge
+   { false }
+   { 2 copy get exch 1 add exch true } ifelse
+} def
+
+% check whether thing is number:  <any> lfigisnumbertype <any> <bool>
+/lfigisnumbertype
+{  dup type dup
+   /integertype eq exch /realtype eq or
+} def
+
+% check whether thing is an array:  <any> lfigisarraytype <any> <bool>
+/lfigisarraytype { dup type /arraytype eq } def
+
+% get next item:  <array> <index> lfiggetnextitem <array> <index> 0
+%                                              or <array> <index> <array> 1
+%                                              or <array> <index> <point> 2
+/lfiggetnextitem
+{   lfiggetnext
+    {	lfigisarraytype
+	{   1
+	}
+	{   lfigisnumbertype
+	    {	3 1 roll
+		lfiggetnext
+		{   lfigisnumbertype
+		    {	4 3 roll exch  2
+		    }
+		    {	pop 3 2 roll pop  0
+		    } ifelse
+		}
+		{   3 2 roll pop  0
+		} ifelse
+	    }
+	    {	pop 0
+	    } ifelse
+	} ifelse
+    }
+    {	0
+    } ifelse
+} def
+
+% set arc path:  bool x1 y1  x2 y2  x0 y0  lfigsetarc  <angle> <angle> <dist>
+% the path goes from x1 y1 to x2 y2 about centre x0 y0,
+% anticlockwise if bool is true else clockwise.
+% The orientations of backwards pointing and forwards pointing
+% arrowheads are returned in the two angles, and
+% the length of the arc is returned in <dist>.
+/lfigsetarc
+{
+  20 dict begin
+     matrix currentmatrix 8 1 roll
+     2 copy translate 2 copy 8 2 roll
+     4 2 roll lfigpsub 6 2 roll lfigpsub
+     dup /y1 exch def dup mul /y1s exch def
+     dup /x1 exch def dup mul /x1s exch def
+     dup /y2 exch def dup mul /y2s exch def
+     dup /x2 exch def dup mul /x2s exch def
+
+     y1s y2s eq
+     {	-1
+     }
+     {	y1s x2s mul y2s x1s mul sub y1s y2s sub div
+     } ifelse
+     /da exch def
+
+     x1s x2s eq
+     {	-1
+     }
+     {	x1s y2s mul x2s y1s mul sub x1s x2s sub div
+     } ifelse
+     /db exch def
+
+     da 0 gt db 0 gt and
+     {	/LMax da sqrt db sqrt lfigmax def
+	/scalex da sqrt LMax div def
+	/scaley db sqrt LMax div def
+	scalex scaley scale
+	0 0 LMax
+	0 0 x1 scalex mul y1 scaley mul lfigangle
+	0 0 x2 scalex mul y2 scaley mul lfigangle
+	2 copy eq { 360 add } if
+	2 copy 8 2 roll
+	5 index { arc } { arcn } ifelse
+	2 index 1 index
+	{ 90 sub } { 90 add } ifelse
+	dup sin scaley mul exch cos scalex mul atan
+	2 index 2 index
+	{ 90 add } { 90 sub } ifelse
+	dup sin scaley mul exch cos scalex mul atan
+	5 2 roll  % res1 res2 ang1 ang2 anticlockwise
+	{ exch sub } { sub } ifelse
+	dup 0 le { 360 add } if  lfigpi mul LMax mul 180 div
+     }
+     {	0 0 x1 y1 lfigdistance 0 0 x2 y2 lfigdistance eq
+	0 0 x1 y1 lfigdistance 0 gt and
+	{	0 0
+		0 0 x1 y1 lfigdistance
+		0 0 x1 y1 lfigangle
+		0 0 x2 y2 lfigangle
+		2 copy eq { 360 add } if
+		2 copy 8 2 roll
+		5 index { arc } { arcn } ifelse
+		2 index 1 index
+		{ 90 sub } { 90 add } ifelse
+		2 index 2 index
+		{ 90 add } { 90 sub } ifelse
+		5 2 roll % res1 res2 ang1 ang2 clockwise
+		{ exch sub } { sub } ifelse
+		dup 0 le { 360 add } if lfigpi mul 0 0 x1 y1 lfigdistance mul 180 div
+	}
+	{	x2 y2 lineto pop
+		x2 y2 x1 y1 lfigangle
+		x1 y1 x2 y2 lfigangle
+		x1 y1 x2 y2 lfigdistance
+	} ifelse
+     } ifelse
+     4 -1 roll setmatrix
+   end
+} def
+
+% lfigsetcurve: set up a Bezier curve from x0 y0 to x3 y3
+% and return arrowhead angles and length of curve (actually 0)
+% x0 y0 x1 y1 x2 y2 x3 y3 lfigsetcurve <angle> <angle> <length>
+/lfigsetcurve
+{ 8 copy curveto pop pop
+  lfigangle
+  5 1 roll
+  4 2 roll lfigangle
+  exch
+  0
+} def
+
+% lfigpaintpath: paint a path of the given shape
+% /paint [ shape ] lfigpaintpath -
+/lfigpaintpath
+{
+  10 dict begin
+    0 newpath
+    /prevseen false def
+    /curveseen false def
+    { lfiggetnextitem
+      dup 0 eq { pop exit }
+      { 1 eq
+        { /curveseen true def
+	  /curve exch def
+	  curve length 0 eq { /curveseen false def } if
+        }
+        { /ycurr exch def
+	  /xcurr exch def
+	  prevseen
+	  { curveseen
+	    { curve length 4 eq
+	      { xprev yprev
+		curve 0 get curve 1 get
+		curve 2 get curve 3 get
+		xcurr ycurr
+		lfigsetcurve pop pop pop
+	      }
+	      { xprev yprev xcurr ycurr
+	        curve length 1 ge { curve 0 get } { 0 } ifelse
+	        curve length 2 ge { curve 1 get } { 0 } ifelse
+	        curve length 3 ge { curve 2 get } { true } ifelse
+	        7 1 roll
+	        lfigsetarc pop pop pop
+	      } ifelse
+	    }
+	    { xcurr ycurr lineto
+	    } ifelse
+	  }
+	  { xcurr ycurr moveto
+	  } ifelse
+	  /xprev xcurr def
+	  /yprev ycurr def
+	  /prevseen true def
+	  /curveseen false def
+        } ifelse
+      } ifelse
+    } loop pop pop cvx exec
+  end
+} def
+
+% stroke a path of the given shape in the given linestyle and dash length.
+% Return the origin and angle of the backward and forward arrow heads.
+% dashlength /linestyle [shape] lfigdopath  [<point> <angle>] [<point> <angle>] 
+/lfigdopath
+{
+  10 dict begin
+    0
+    /prevseen  false def
+    /curveseen false def
+    /backarrow []    def
+    /fwdarrow  []    def
+    {
+	lfiggetnextitem
+	dup 0 eq { pop exit }
+	{
+	    1 eq
+	    {	/curveseen true def
+		/curve exch def
+		curve length 0 eq { /prevseen false def } if
+	    }
+	    {	/ycurr exch def
+		/xcurr exch def
+		prevseen
+		{   newpath xprev yprev moveto
+		    curveseen
+		    {	curve length 4 eq
+			{   xprev yprev
+			    curve 0 get curve 1 get
+			    curve 2 get curve 3 get
+			    xcurr ycurr lfigsetcurve
+			}
+			{   xprev yprev xcurr ycurr
+			    curve length 1 ge { curve 0 get } { 0 } ifelse
+			    curve length 2 ge { curve 1 get } { 0 } ifelse
+			    curve length 3 ge { curve 2 get } { true } ifelse
+			    7 1 roll
+			    lfigsetarc
+			} ifelse
+		    }
+		    {	xcurr ycurr lineto
+			xcurr ycurr xprev yprev lfigangle dup 180 sub
+			xprev yprev xcurr ycurr lfigdistance
+		    } ifelse
+		    6 index 6 index cvx exec
+		    [ xprev yprev 5 -1 roll ]
+		    backarrow length 0 eq
+		    { /backarrow exch def }
+		    { pop } ifelse
+		    [ xcurr ycurr 4 -1 roll ] /fwdarrow exch def
+		} if
+		/xprev xcurr def
+		/yprev ycurr def
+		/prevseen true def
+		/curveseen false def
+	    } ifelse
+	} ifelse
+    } loop
+    pop pop pop pop
+    backarrow length 0 eq { [ 0 0 0 ] } { backarrow } ifelse
+    fwdarrow  length 0 eq { [ 0 0 0 ] } { fwdarrow  } ifelse
+  end
+} def
+
+% lfigdoarrow: draw an arrow head of given form
+% dashlength /lstyle /pstyle hfrac height width [ <point> <angle> ] lfigdoarrow -
+/lfigdoarrow
+{  matrix currentmatrix 8 1 roll
+   dup 0 get 1 index 1 get translate
+   2 get rotate
+   [ 2 index neg 2 index 0 0
+     3 index 3 index neg
+     1 index 10 index mul 0
+     7 index 7 index ]
+   4 1 roll pop pop pop
+   dup 3 1 roll
+   gsave lfigpaintpath grestore lfigdopath pop pop
+   setmatrix
+} def
+
+% arrow head styles
+/lfigopen     0.0 def
+/lfighalfopen 0.5 def
+/lfigclosed   1.0 def
+
+% stroke no arrows, forward, back, and both
+/lfignoarrow { pop pop pop pop pop pop pop pop                        } def
+/lfigforward { 7 -1 roll lfigdoarrow pop                              } def
+/lfigback    { 8 -2 roll pop lfigdoarrow                              } def
+/lfigboth    { 8 -1 roll 7 copy lfigdoarrow pop 7 -1 roll lfigdoarrow } def
+
+% lfigprevious: return previous point on path
+/lfigprevious
+{ lfigisnumbertype
+  { 2 copy }
+  { lfigisarraytype
+    { 2 index 2 index }
+    { 0 0 }
+    ifelse
+  } ifelse
+} def
+
+% label a point in 2nd top dictionary:  <point> /name lfigpointdef -
+/lfigpointdef
+{
+  % (Entering lfigpointdef) lfigdebugprint
+  [ 4 2 roll transform
+    /itransform cvx ] cvx
+    currentdict end
+    3 1 roll
+    % currentdict length currentdict maxlength lt
+    % { def }
+    % { exec moveto (too many labels) show stop }
+    % ifelse
+    def
+    begin
+  % (Leaving lfigpointdef) lfigdebugprint
+} def
+
+% promote labels from second top to third top dictionary
+% <string> lfigpromotelabels -
+/lfigpromotelabels
+{
+  % (Entering lfigpromotelabels) lfigdebugprint
+  currentdict end exch currentdict end
+  { exch 20 string cvs 2 index
+    (@) lfigconcat exch lfigconcat cvn exch def
+  } forall pop begin
+  % (Leaving lfigpromotelabels) lfigdebugprint
+} def
+
+% show labels (except CIRCUM): - lfigshowlabels -
+/lfigshowlabels
+{
+  % (Entering lfigshowlabels) lfigdebugprint
+  currentdict end
+    currentdict
+    { 1 index 20 string cvs (CIRCUM) search % if CIRCUM in key
+      { pop pop pop pop pop }
+      { pop cvx exec 2 copy
+        newpath 1.5 pt 0 360 arc
+        0 setgray fill
+        /Times-Roman findfont 8 pt scalefont setfont
+        moveto 0.2 cm 0.1 cm rmoveto 20 string cvs show
+      }
+      ifelse
+    } forall
+  begin
+  % (Leaving lfigshowlabels) lfigdebugprint
+} def
+
+% fix an angle to 0 <= res < 360:  <angle> lfigfixangle <angle>
+/lfigfixangle
+{
+  % (Entering lfigfixangle) lfigdebugprint
+  { dup 0 ge { exit } if
+    360 add
+  } loop
+  { dup 360 lt { exit } if
+    360 sub
+  } loop
+  % (Leaving lfigfixangle) lfigdebugprint
+} def
+
+% find point on circumference of box:  alpha a b lfigboxcircum x y
+/lfigboxcircum
+{
+  % (Entering lfigboxcircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    0 0 a b lfigangle /theta exch def
+
+    % if alpha <= theta, return (a, a*tan(alpha))
+    alpha theta le
+    { a  a alpha sin mul alpha cos div }
+    {
+      % else if alpha <= 180 - theta, return (b*cot(alpha), b)
+      alpha 180 theta sub le
+      { b alpha cos mul alpha sin div  b }
+      {
+        % else if alpha <= 180 + theta, return (-a, -a*tan(alpha))
+        alpha 180 theta add le
+        { a neg  a neg alpha sin mul alpha cos div }
+        {
+	  % else if alpha <= 360 - theta, return (-b*cot(alpha), -b)
+	  alpha 360 theta sub le
+          { b neg alpha cos mul alpha sin div  b neg }
+	  {
+	    % else 360 - theta <= alpha, return (a, a*tan(alpha))
+	    a  a alpha sin mul alpha cos div
+	  } ifelse
+        } ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigboxcircum) lfigdebugprint
+} def
+
+% find quadratic roots (assume a != 0): a b c lfigqroots x1 x2 2
+%                                                     or    x2 1
+%                                                     or       0
+/lfigqroots
+{
+  4 dict begin
+    /c exch def
+    /b exch def
+    /a exch def
+    /disc b b mul 4 a c mul mul sub def
+    disc 0 lt
+    { 0
+    }
+    { disc 0 eq
+      { b neg 2 a mul div
+	1
+      }
+      { b neg disc sqrt add 2 a mul div
+        b neg disc sqrt sub 2 a mul div
+	2
+      }
+      ifelse
+    }
+    ifelse
+  end
+} def
+
+% work our which quadrant: <angle> lfigquadrant <0-3>
+/lfigquadrant
+{ dup 90 lt
+  { pop 0
+  }
+  { dup 180 lt
+    { pop 1
+    }
+    { 270 lt
+      { 2
+      }
+      { 3
+      } ifelse
+    } ifelse
+  } ifelse
+} def
+
+% find curvebox circum, assuming upper right quadrant: alpha a b xmk lfigcb x y
+/lfigcb
+{
+  6 dict begin
+    /xmk exch def
+    /b exch def
+    /a exch def
+    /alpha exch def
+    /theta1 0 0 a b xmk sub lfigangle def
+    /theta2 0 0 a xmk sub b lfigangle def
+    alpha theta1 le
+    { % if alpha <= theta1, return (a, a*tan(alpha))
+      a  a alpha sin mul alpha cos div
+    }
+    { alpha theta2 ge
+      { % else if alpha > theta2, return (b*cot(alpha), b)
+	b alpha cos mul alpha sin div  b
+      }
+      {
+	% else, return the intersection of line and circle
+	a xmk sub b xmk sub xmk  0 0 alpha lfigcircleintersect
+	dup 0 eq
+	{ % should never happen, just return any reasonable point
+	  pop
+	  a b 0.5 lfigpmul
+	}
+	{ 1 eq
+	  { % should never happen, just return the point on top of stack
+	  }
+	  { % the usual case, two points on stack, return the larger
+	    lfigpmax
+	  } ifelse
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+} def
+
+% find point on circumference of curvebox: alpha a b xmk lfigcurveboxcircum x y
+/lfigcurveboxcircum
+{
+  % (Entering lfigcurveboxcircum) lfigdebugprint
+  5 dict begin
+    /xmk exch def
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+
+    % work out which quadrant we are in, and reflect accordingly
+    /quad alpha lfigquadrant def
+    quad 0 eq
+    { alpha a b xmk lfigcb
+    }
+    { quad 1 eq
+      { 180 alpha sub a b xmk lfigcb exch neg exch
+      }
+      { quad 2 eq
+	{ alpha 180 sub a b xmk lfigcb neg exch neg exch
+	}
+	{ 360 alpha sub a b xmk lfigcb neg
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigcurveboxcircum) lfigdebugprint
+} def
+
+% find point on circumference of diamond:  alpha a b lfigdiamondcircum x y
+/lfigdiamondcircum
+{
+  % (Entering lfigdiamondcircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    b alpha cos abs mul  a alpha sin abs mul  add  /denom exch def
+    a b mul alpha cos mul denom div
+    a b mul alpha sin mul denom div
+  end
+  % (Leaving lfigdiamondcircum) lfigdebugprint
+} def
+
+% find point on circumference of ellipse:  alpha a b lfigellipsecircum x y
+/lfigellipsecircum
+{
+  % (Entering lfigellipsecircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    b alpha cos mul dup mul  a alpha sin mul dup mul  add sqrt /denom exch def
+    a b mul alpha cos mul denom div
+    a b mul alpha sin mul denom div
+  end
+  % (Leaving lfigellipsecircum) lfigdebugprint
+} def
+
+% find point of intersection of two lines each defined by two points
+% x1 y1 x2 y2  x3 y3 x4 y4  lfiglineintersect x y
+/lfiglineintersect
+{
+  % (Entering lfiglineintersect) lfigdebugprint
+  13 dict begin
+    /y4 exch def
+    /x4 exch def
+    /y3 exch def
+    /x3 exch def
+    /y2 exch def
+    /x2 exch def
+    /y1 exch def
+    /x1 exch def
+    x2 x1 sub /x21 exch def
+    x4 x3 sub /x43 exch def
+    y2 y1 sub /y21 exch def
+    y4 y3 sub /y43 exch def
+    y21 x43 mul y43 x21 mul sub /det exch def
+  
+    % calculate x 
+    y21 x43 mul x1 mul
+    y43 x21 mul x3 mul sub
+    y3 y1 sub x21 mul x43 mul add
+    det div
+
+    % calculate y
+    x21 y43 mul y1 mul
+    x43 y21 mul y3 mul sub
+    x3 x1 sub y21 mul y43 mul add
+    det neg div
+
+  end
+  % (Leaving lfiglineintersect) lfigdebugprint
+} def
+
+% find point on circumference of polygon
+% alpha radius num theta lfigpolycircum x y
+/lfigpolycircum
+{
+  % (Entering lfigpolycircum) lfigdebugprint
+  13 dict begin
+    /theta exch def
+    /num exch def
+    /radius exch def
+    /alpha exch def
+
+    % calculate delta, the angle from theta to alpha
+    alpha theta sub lfigfixangle
+
+    % calculate the angle which is the multiple of 360/num closest to delta
+    360 num div div truncate 360 num div mul theta add /anglea exch def
+
+    % calculate the next multiple of 360/num after anglea
+    anglea 360 num div add /angleb exch def
+
+    % intersect the line through these two points with the alpha line
+    anglea cos anglea sin  angleb cos angleb sin
+    0 0  alpha cos 2 mul alpha sin 2 mul
+    lfiglineintersect radius lfigpmul
+
+  end
+  % (Leaving lfigpolycircum) lfigdebugprint
+} def
+
+% find point of intersection of a point and a circle
+% x0 y0 r  x1 y1 theta  lfigcircleintersect xa ya xb yb 2
+%                                        or       xb yb 1
+%                                        or             0
+/lfigcircleintersect
+{
+  % (Entering lfigcircleintersect) lfigdebugprint
+  15 dict begin
+    /theta exch def
+    /y1    exch def
+    /x1    exch def
+    /r     exch def
+    /y0    exch def
+    /x0    exch def
+
+    % if sin(theta) = 0 then line is horizontal and y must be y1
+    theta sin abs 0.00001 lt
+    { 
+      /a 1 def
+      /b -2 x0 mul def
+      /c x0 dup mul y1 y0 sub dup mul add r dup mul sub def
+      a b c lfigqroots dup
+      0 eq
+      { pop
+	0
+      }
+      { 1 eq
+	{ y1 1
+	}
+	{ y1 exch y1 2
+	} ifelse
+      } ifelse
+    }
+    {
+      /ct theta cos theta sin div def
+      /a ct ct mul 1 add def
+      /b ct x1 x0 sub mul y1 add y0 sub 2 mul def
+      /c x1 x0 sub dup mul y1 y0 sub dup mul add r dup mul sub def
+      a b c lfigqroots dup
+      0 eq
+      { pop
+	0
+      }
+      { 1 eq
+	{ y1 add /yb exch def
+	  yb y1 sub ct mul x1 add /xb exch def
+	  xb yb 1
+	}
+	{ y1 add /ya exch def
+	  ya y1 sub ct mul x1 add /xa exch def
+	  y1 add /yb exch def
+	  yb y1 sub ct mul x1 add /xb exch def
+	  xa ya xb yb 2
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigcircleintersect) lfigdebugprint
+} def
+
+% add CIRCUM operator with this body:  <array> lfigcircumdef -
+/lfigcircumdef
+{   % (Entering lfigcircumdef) lfigdebugprint
+    /CIRCUM exch cvx
+    currentdict end
+    3 1 roll
+    % currentdict length currentdict maxlength lt
+    % { def }
+    % { exec moveto (too many labels) show stop }
+    % ifelse
+    def
+    begin
+    % (Leaving lfigcircumdef) lfigdebugprint
+} def
+
+end
+%%EndResource
+
+%%BeginResource: procset LoutBasicSetup
+% @PrependGraphic file /usr/staff/jeff/lout.lib/include/bsf.lpg
+
+% width height linethickness louteuro -
+% draw a Euro symbol of this width and height with this line thickness
+% Author: Jeff Kingston, based on code from Andrew Beardsley
+/louteuro {
+  20 dict begin
+    /eurothick exch def
+    /euroheight exch def
+    /eurowidth exch def
+    /eurostrokewidth euroheight 0.8 mul def
+    /eurostep eurothick 60 cos mul 60 sin div def
+    /eurotheta 40 def
+
+    % llx lly width thickness louteurobox -
+    % draw angled box starting at (llx, lly) with given width and thickness
+    /louteurobox
+    {
+      /euroboxthick exch def
+      /euroboxwidth exch def
+      newpath moveto euroboxwidth 0 rlineto
+      eurostep euroboxthick rlineto
+      euroboxwidth neg 0 rlineto closepath fill
+    } def
+
+    % lower cross stroke
+    0 euroheight 2 div eurothick 1.5 mul sub
+    eurostrokewidth eurothick louteurobox
+
+    % upper cross stroke
+    0 euroheight 2 div eurothick 0.5 mul add
+    eurostrokewidth eurostep 2 mul add eurothick louteurobox
+
+    % circular part
+    /eurohctr eurowidth euroheight 2 div eurotheta cos mul sub def
+    /eurovctr euroheight 2 div def
+    newpath
+    eurohctr eurovctr eurovctr eurotheta 350 eurotheta sub arc
+    eurohctr eurovctr eurovctr eurothick sub 365 eurotheta sub eurotheta arcn
+    closepath fill
+  end
+} def
+
+% path for @FullWidthRule symbol
+/LoutRule
+{ 0 0 moveto xsize 0 lineto
+} def
+
+% path for @Box symbol
+/LoutBox
+{ 0 0 moveto xsize 0 lineto
+  xsize ysize lineto 0 ysize lineto
+  closepath
+} def
+
+% path for @CurveBox symbol
+/LoutCurveBox
+{ xmark 0 moveto
+  xsize xmark sub xmark xmark 270 360 arc
+  xsize xmark sub ysize xmark sub xmark 0 90 arc
+  xmark ysize xmark sub xmark 90 180 arc
+  xmark xmark xmark 180 270 arc
+  closepath
+} def
+
+% path for @ShadowBox symbol
+/LoutShadowBox
+{ xmark 2 mul 0 moveto xsize 0 lineto
+  xsize ysize xmark 2 mul sub lineto
+  xsize xmark sub ysize xmark 2 mul sub lineto
+  xsize xmark sub xmark lineto
+  xmark 2 mul xmark lineto
+  closepath
+} def
+
+% set up dictionary containing margin note data: parity LoutMargSet -
+/LoutMargSet
+{ /LoutMargDict 12 dict def
+  LoutMargDict begin
+    /parity exch def
+    /matr matrix currentmatrix def
+    /rightx xsize def
+    /lefty ysize def   % highest allowable point for top of next left note
+    /righty ysize def  % highest allowable point for top of next right note
+    /max { 2 copy gt { pop } { exch pop } ifelse } def
+    /min { 2 copy lt { pop } { exch pop } ifelse } def
+  end
+} def
+
+%translate coordinate system for marginal notes:  type LoutMargShift -
+% where type 0 is left margin, 1 is right margin, 2 is outer, 3 is inner
+/LoutMargShift
+{ LoutMargDict begin
+
+    % y coordinate of top of note, in margin coords, before vertical adjust
+    0 ysize transform matr itransform exch pop
+
+    % decide whether left or right margin based on type and parity
+    exch [ 0 1 parity 1 parity sub ] exch get 0 eq
+    {
+      % left margin: adjust top of note downwards if overlaps previous note
+      lefty min
+
+      % bottom of note is new lefty position and also translate position
+      ysize sub dup /lefty exch def
+
+      % want right edge of note at coordinate zero
+      xsize neg exch
+    }
+    {
+      % right margin: adjust top of note downwards if overlaps previous note
+      righty min
+
+      % bottom of note is new righty position and also translate position
+      ysize sub dup /righty exch def
+
+      % want left edge of note at coordinate rightx
+      rightx exch
+    } ifelse
+
+    % stack now contains coord of bottom left corner in margin coordinates
+    matr setmatrix translate
+  end
+} def
+
+% create LoutPageDict with left, right, foot, top for @Place symbol users
+/LoutPageSet
+{
+  /LoutPageDict 5 dict def
+  LoutPageDict begin
+    /matr matrix currentmatrix def
+    /left 0 def
+    /right xsize def
+    /foot 0 def
+    /top ysize def
+  end
+
+} def
+
+%%EndResource
+
+%%EndProlog
+
+%%BeginSetup
+%%IncludeResource: font Times-Roman
+/Times-Romanfnt82 vec2 /Times-Roman LoutRecode
+/fnt82 { /Times-Romanfnt82 LoutFont } def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+%%IncludeResource: font Helvetica-Oblique
+/Helvetica-Obliquefnt36 vec2 /Helvetica-Oblique LoutRecode
+/fnt36 { /Helvetica-Obliquefnt36 LoutFont } def
+%%EndSetup
+
+%%Page: i 1
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Symbol
+%%+ font Helvetica-Oblique
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+600 fnt35 1355 12125(An)m 2215(Exper)s -24(t')k 30(s)k
+4518(Guide)s 6258(to)s 6902(the)s 3956 10685(Lout)m 616 9245(Document)m
+3500(F)s 18(or)k -15(matting)k 6490(System)s 240 fnt35
+3544 6059(Jeffre)m 4(y)k 4321(H.)s 4606(Kingston)s 3882 4395(V)m 19(ersion)k
+4725(3.17)s 3637 4107(September)m 12(,)k 4906(1999)s 240 fnt78
+0 342(\343)m 240 fnt36 315 340(Cop)m 7(yr)k -3(ight)k
+1493(1991,)s 2214(1999,)s 2935(Jeffre)s 4(y)k 3811(H.)s
+4173(Kingston,)s 5293(Basser)s 6203(Depar)s -9(tment)k 7619(of)s
+7990(Computer)s 0 52(Science)m 3(,)k 966(The)s 1449(Univ)s 6(ersity)k
+2583(of)s 2881(Sydne)s 4(y)k 3766(2006,)s 4415(A)s 7(ustr)k 2(alia.)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: ii 2
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+480 fnt84 0 12955(Pr)m 8(eface)k 240 fnt82 540 12095(This)m
+1016(manual)s 1775(is)s 1984(addressed)s 2985(to)s 3224(those)s
+3784(who)s 4250(wish)s 4759(to)s 4997(become)s 5797(e)s 3(xpert)k
+6451(users)s 6992(of)s 7263(the)s 7611(Lout)s 8122(document)s
+0 11807(formatting)m 1092(system.)s 1952(An)s 2334(e)s 3(xpert)k
+3020(user)s 3510(is)s 3752(someone)s 4690(who)s 5188(understands)s
+6414(the)s 6794(principles)s 7819(of)s 8122(document)s 0 11519(formatting)m
+1083(that)s 1524(Lout)s 2059(embodies,)s 3105(and)s 3532(is)s
+3765(able)s 4242(to)s 4503(apply)s 5112(them,)s 5720(for)s
+6081(e)s 3(xample)k 6966(to)s 7228(design)s 7933(a)s
+8122(document)s 0 11231(format)m 690(or)s 943(a)s 1103(special-purpose)s
+2653(package.)s 3595(In)s 3845(contrast,)s 4701(a)s 4861(non-e)s 3(xpert)k
+5948(user)s 6400(is)s 6604(someone)s 7505(who)s 7965(simply)s
+8663(uses)s 0 10943(Lout)m 512(to)s 751(format)s 1447(documents.)s
+480 10569(Chapter)m 1295(1)s 1448(e)s 3(xplains)k 2291(these)s
+2836(principles,)s 3883(and)s 4285(it)s 4475(should)s 5170(be)s
+5450(read)s 5917(carefully)s 6817(and)s 7219(in)s 7460(sequence.)s
+8499(Chap)s 8998(-)s 0 10281(ters)m 412(2)s 604(and)s
+1025(3)s 1207(are)s 1571(for)s 1927(reference;)s 2943(respecti)s 6(v)k 3(ely)k 15(,)k
+4198(the)s 3(y)k 4678(contain)s 5457(descriptions)s 6680(of)s
+6969(the)s 7334(detailed)s 8166(operation)s 0 9993(of)m 277(Lout')s 13(s)k
+945(major)s 1568(components,)s 2838(and)s 3248(a)s 3420(complete)s
+4359(description)s 5484(of)s 5761(each)s 6262(prede\207ned)s 7336(symbol.)s
+8211(The)s 8646(\207nal)s 0 9705(chapter)m 763(presents)s 1597(a)s
+1763(collection)s 2762(of)s 3033(adv)s 6(anced)k 3989(e)s 3(xamples.)k
+480 9331(This)m 971(manual)s 1745(presents)s 2594(V)s 26(ersion)k
+3397(3)s 3576(of)s 3862(Basser)s 4574(Lout,)s 5148(publicly)s
+6001(released)s 6856(in)s 7114(September)s 8211(1994)s 8760([3)s
+8943(].)s 0 9043(This)m 480(manual)s 1244(w)s 2(as)k
+1670(rendered)s 2569(into)s 2999(PostScript)s 4046(by)s 4345(V)s 26(ersion)k
+5137(3.17)s 5610(of)s 5886(the)s 6239(Basser)s 6941(Lout)s
+7458(interpreter)s 9(,)k 8554(using)s 0 8755(the)m 348(symbols)s
+1197(described)s 2171(in)s 2414(the)s 2762(User')s 13(s)k
+3423(Guide)s 4064([4)s 4257(].)s 240 fnt84 0 8250(Ackno)m 2(wledgment.)k
+240 fnt82 1986 8251(V)m 26(ersion)k 2811(3)s 3012(has)s
+3419(bene\207ted)s 4391(from)s 4953(hundreds)s 5919(of)s 6227(comments)s
+7298(recei)s 6(v)k 3(ed)k 8193(since)s 8778(the)s
+0 7963(release)m 726(of)s 1006(V)s 26(ersion)k 1803(1)s
+1967(in)s 2219(October)s 3057(1991.)s 3710(Not)s 4138(e)s 6(v)k 3(ery)k
+4723(suggestion)s 5813(could)s 6411(be)s 6702(follo)s 6(wed,)k
+7662(b)s 4(ut)k 8033(man)s 3(y)k 8625(ha)s 4(v)k 3(e)k
+0 7675(been,)m 559(and)s 963(the)s 1311(encouragement)s 2832(w)s 2(as)k
+3253(greatly)s 3970(appreciated.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: iii 3
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+480 fnt84 0 12955(Contents)m 240 fnt84 0 11982(Chapter)m 908(1)s
+240 fnt82 1015 11983(.)m 240 fnt84 1179 11982(Principles)m 240 fnt82
+2738 11983(..)m 3082(..)s 3426(..)s 3770(..)s 4114(..)s
+4458(..)s 4802(..)s 5146(..)s 5490(..)s 5834(..)s
+6178(..)s 6522(..)s 6866(..)s 7210(..)s 7554(..)s
+7898(..)s 8242(..)s 8971(1)s 720 11638(1.1.)m 1184(Objects)s
+2394(..)s 2738(..)s 3082(..)s 3426(..)s 3770(..)s
+4114(..)s 4458(..)s 4802(..)s 5146(..)s 5490(..)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8971(1)s 720 11293(1.2.)m
+1184(De\207nitions)s 2738(..)s 3082(..)s 3426(..)s 3770(..)s
+4114(..)s 4458(..)s 4802(..)s 5146(..)s 5490(..)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8962(3)s 720 10948(1.3.)m
+1184(Cross)s 1780(references)s 3082(..)s 3426(..)s 3770(..)s
+4114(..)s 4458(..)s 4802(..)s 5146(..)s 5490(..)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8958(7)s 720 10603(1.4.)m
+1184(Galle)s 3(ys)k 2394(..)s 2738(..)s 3082(..)s
+3426(..)s 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8955(9)s 240 fnt84 0 9974(Chapter)m 908(2)s 240 fnt82
+1023 9975(.)m 240 fnt84 1187 9974(Details)m 240 fnt82 2394 9975(..)m
+2738(..)s 3082(..)s 3426(..)s 3770(..)s 4114(..)s
+4458(..)s 4802(..)s 5146(..)s 5490(..)s 5834(..)s
+6178(..)s 6522(..)s 6866(..)s 7210(..)s 7554(..)s
+7898(..)s 8242(..)s 8842(13)s 720 9630(2.1.)m 1184(Le)s 3(xical)k
+1952(structure)s 2843(\(w)s 2(ords,)k 3612(spaces,)s 4343(symbols\))s
+5269(and)s 5673(macros)s 6866(..)s 7210(..)s 7554(..)s
+7898(..)s 8242(..)s 8842(13)s 720 9285(2.2.)m 1184(Named)s
+1933(parameters)s 3426(..)s 3770(..)s 4114(..)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8840(15)s 720 8940(2.3.)m 1184(Nested)s 1906(de\207nitions,)s
+3023(body)s 3557(parameters,)s 4711(e)s 3(xtend,)k 5453(import,)s
+6197(and)s 6601(e)s 3(xport)k 7554(..)s 7898(..)s
+8242(..)s 8838(17)s 720 8595(2.4.)m 1184(Filtered)s 1984(right)s
+2495(and)s 2899(body)s 3433(parameters)s 4802(..)s 5146(..)s
+5490(..)s 5834(..)s 6178(..)s 6522(..)s 6866(..)s
+7210(..)s 7554(..)s 7898(..)s 8242(..)s 8831(20)s
+720 8250(2.5.)m 1184(Precedence)s 2328(and)s 2732(associati)s 6(vity)k
+3974(of)s 4245(symbols)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8832(22)s 720 7905(2.6.)m 1184(The)s 1612(style)s
+2119(and)s 2523(size)s 2950(of)s 3221(objects)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8842(23)s 720 7560(2.7.)m 1184(Galle)s 3(ys)k
+1962(and)s 2366(tar)s 4(gets)k 3426(..)s 3770(..)s
+4114(..)s 4458(..)s 4802(..)s 5146(..)s 5490(..)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8840(25)s 720 7215(2.8.)m
+1184(Sorted)s 1866(g)s 1(alle)k 3(ys)k 3082(..)s
+3426(..)s 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8851(31)s 720 6870(2.9.)m 1184(Horizontal)s 2261(g)s 1(alle)k 3(ys)k
+3426(..)s 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8842(33)s 720 6525(2.10.)m 1304(Optimal)s 2142(g)s 1(alle)k 3(y)k
+2776(breaking)s 4114(..)s 4458(..)s 4802(..)s 5146(..)s
+5490(..)s 5834(..)s 6178(..)s 6522(..)s 6866(..)s
+7210(..)s 7554(..)s 7898(..)s 8242(..)s 8832(34)s
+240 fnt84 0 5896(Chapter)m 908(3)s 240 fnt82 1021 5897(.)m
+240 fnt84 1185 5896(Pr)m 4(ede\207ned)k 2338(symbols)s 240 fnt82
+3426 5897(..)m 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8833(36)s 720 5552(3.1.)m 1184(@Be)s 3(gin)k 2031(and)s
+2435(@End)s 3426(..)s 3770(..)s 4114(..)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8833(36)s 720 5207(3.2.)m 1184(Concatenation)s 2623(symbols)s
+3472(and)s 3876(paragraphs)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8833(36)s 720 4862(3.3.)m 1184(@F)s 3(ont)k
+1901(and)s 2305(@Char)s 3426(..)s 3770(..)s 4114(..)s
+4458(..)s 4802(..)s 5146(..)s 5490(..)s 5834(..)s
+6178(..)s 6522(..)s 6866(..)s 7210(..)s 7554(..)s
+7898(..)s 8242(..)s 8831(40)s 720 4517(3.4.)m 1184(@Break)s
+2394(..)s 2738(..)s 3082(..)s 3426(..)s 3770(..)s
+4114(..)s 4458(..)s 4802(..)s 5146(..)s 5490(..)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8832(42)s 720 4172(3.5.)m
+1184(@Space)s 2394(..)s 2738(..)s 3082(..)s 3426(..)s
+3770(..)s 4114(..)s 4458(..)s 4802(..)s 5146(..)s
+5490(..)s 5834(..)s 6178(..)s 6522(..)s 6866(..)s
+7210(..)s 7554(..)s 7898(..)s 8242(..)s 8842(43)s
+720 3827(3.6.)m 1184(@YUnit)s 2063(and)s 2467(@ZUnit)s 3770(..)s
+4114(..)s 4458(..)s 4802(..)s 5146(..)s 5490(..)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8832(44)s 720 3482(3.7.)m
+1184(@SetColour)s 2435(and)s 2839(@SetColor)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8832(44)s 720 3137(3.8.)m 1184(@Language)s 2405(and)s 2809(@CurrLang)s
+4458(..)s 4802(..)s 5146(..)s 5490(..)s 5834(..)s
+6178(..)s 6522(..)s 6866(..)s 7210(..)s 7554(..)s
+7898(..)s 8242(..)s 8840(45)s 720 2792(3.9.)m 1184(@OneCol)s
+2205(and)s 2609(@OneRo)s 6(w)k 4114(..)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8833(46)s 720 2447(3.10.)m 1304(@W)s 9(ide)k
+2090(and)s 2494(@High)s 3770(..)s 4114(..)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8838(47)s 720 2102(3.11.)m 1304(@HShift)s 2222(and)s
+2626(@VShift)s 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8838(47)s 720 1757(3.12.)m 1304(@HExpand)s 2488(and)s 2892(@VExpand)s
+4458(..)s 4802(..)s 5146(..)s 5490(..)s 5834(..)s
+6178(..)s 6522(..)s 6866(..)s 7210(..)s 7554(..)s
+7898(..)s 8242(..)s 8839(48)s 720 1412(3.13.)m 1304(@HContract)s
+2581(and)s 2985(@VContract)s 4458(..)s 4802(..)s 5146(..)s
+5490(..)s 5834(..)s 6178(..)s 6522(..)s 6866(..)s
+7210(..)s 7554(..)s 7898(..)s 8242(..)s 8839(48)s
+720 1067(3.14.)m 1304(@HLimited)s 2512(and)s 2916(@VLimited)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8839(48)s 720 722(3.15.)m 1304(@HAdjust,)s 2443(@V)s 32(Adjust,)k
+3550(and)s 3954(@P)s 22(Adjust)k 5490(..)s 5834(..)s
+6178(..)s 6522(..)s 6866(..)s 7210(..)s 7554(..)s
+7898(..)s 8242(..)s 8835(49)s 720 377(3.16.)m 1304(@HScale)s
+2271(and)s 2675(@VScale)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8835(49)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: iv 4
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+720 13808(3.17.)m 1304(@HCo)s 3(v)k 3(er)k 2337(and)s
+2741(@VCo)s 3(v)k 3(er)k 4114(..)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8831(50)s 720 13463(3.18.)m 1304(@StartHSpan,@StartVSpan,)s 4117(@StartHVSpan,)s
+5720(@HSpan,)s 6700(and)s 7104(@VSpan)s 8242(..)s 8831(50)s
+720 13118(3.19.)m 1304(@Scale)s 2394(..)s 2738(..)s 3082(..)s
+3426(..)s 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8851(51)s 720 12773(3.20.)m 1304(@Rotate)s 2394(..)s 2738(..)s
+3082(..)s 3426(..)s 3770(..)s 4114(..)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8832(52)s 720 12428(3.21.)m 1304(@Background)s 3082(..)s
+3426(..)s 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8842(53)s 720 12083(3.22.)m 1304(@K)s 6(ernShrink)k 3082(..)s
+3426(..)s 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8842(53)s 720 11738(3.23.)m 1304(@Common,)s 2524(@Rump,)s 3438(and)s
+3842(@Meld)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8842(53)s 720 11393(3.24.)m 1304(@Insert)s 2394(..)s
+2738(..)s 3082(..)s 3426(..)s 3770(..)s 4114(..)s
+4458(..)s 4802(..)s 5146(..)s 5490(..)s 5834(..)s
+6178(..)s 6522(..)s 6866(..)s 7210(..)s 7554(..)s
+7898(..)s 8242(..)s 8832(54)s 720 11048(3.25.)m 1304(@OneOf)s
+2738(..)s 3082(..)s 3426(..)s 3770(..)s 4114(..)s
+4458(..)s 4802(..)s 5146(..)s 5490(..)s 5834(..)s
+6178(..)s 6522(..)s 6866(..)s 7210(..)s 7554(..)s
+7898(..)s 8242(..)s 8832(54)s 720 10703(3.26.)m 1304(@Ne)s 3(xt)k
+2394(..)s 2738(..)s 3082(..)s 3426(..)s 3770(..)s
+4114(..)s 4458(..)s 4802(..)s 5146(..)s 5490(..)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8833(56)s 720 10358(3.27.)m
+1304(@Case)s 2394(..)s 2738(..)s 3082(..)s 3426(..)s
+3770(..)s 4114(..)s 4458(..)s 4802(..)s 5146(..)s
+5490(..)s 5834(..)s 6178(..)s 6522(..)s 6866(..)s
+7210(..)s 7554(..)s 7898(..)s 8242(..)s 8833(56)s
+720 10013(3.28.)m 1304(@Moment)s 2738(..)s 3082(..)s 3426(..)s
+3770(..)s 4114(..)s 4458(..)s 4802(..)s 5146(..)s
+5490(..)s 5834(..)s 6178(..)s 6522(..)s 6866(..)s
+7210(..)s 7554(..)s 7898(..)s 8242(..)s 8838(57)s
+720 9668(3.29.)m 1304(@Null)s 2394(..)s 2738(..)s 3082(..)s
+3426(..)s 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8838(57)s 720 9323(3.30.)m 1304(@Galle)s 3(y)k 2213(and)s
+2617(@F)s 3(orceGalle)k 3(y)k 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8839(58)s 720 8978(3.31.)m 1304(@NotRe)s 6(v)k 3(ealed)k
+3082(..)s 3426(..)s 3770(..)s 4114(..)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8839(58)s 720 8633(3.32.)m 1304(The)s 1732(cross)s
+2274(reference)s 3217(symbols)s 4066(&&)s 4492(and)s 4896(&&&)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8835(59)s 720 8288(3.33.)m
+1304(@T)s 19(agged)k 2738(..)s 3082(..)s 3426(..)s
+3770(..)s 4114(..)s 4458(..)s 4802(..)s 5146(..)s
+5490(..)s 5834(..)s 6178(..)s 6522(..)s 6866(..)s
+7210(..)s 7554(..)s 7898(..)s 8242(..)s 8835(59)s
+720 7943(3.34.)m 1304(@Open and @Use)s 3426(..)s 3770(..)s 4114(..)s
+4458(..)s 4802(..)s 5146(..)s 5490(..)s 5834(..)s
+6178(..)s 6522(..)s 6866(..)s 7210(..)s 7554(..)s
+7898(..)s 8242(..)s 8831(60)s 720 7598(3.35.)m 1304(@Database and @SysDatabase)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8831(60)s 720 7253(3.36.)m 1304(@Graphic)s 2738(..)s
+3082(..)s 3426(..)s 3770(..)s 4114(..)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8851(61)s 720 6908(3.37.)m 1304(@PlainGraphic)s 3082(..)s
+3426(..)s 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8840(65)s 720 6563(3.38.)m 1304(@IncludeGraphic)s 3065(and)s 3469(@SysIncludeGraphic)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8840(65)s 720 6218(3.39.)m
+1304(@PrependGraphic and @SysPrependGraphic)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8840(65)s 720 5873(3.40.)m
+1304(@Include and @SysInclude)s 4458(..)s 4802(..)s 5146(..)s 5490(..)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8833(66)s 720 5528(3.41.)m
+1304(@BackEnd)s 2461(and)s 2865(the)s 3213(PlainT)s 16(e)k 3(xt)k
+4183(and)s 4587(PDF)s 5084(back)s 5597(ends)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8833(66)s 720 5183(3.42.)m 1304(@V)s 26(erbatim and @Ra)k 3(wV)k 26(erbatim)k
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8838(67)s 720 4838(3.43.)m 1304(@Underline)s 2738(..)s
+3082(..)s 3426(..)s 3770(..)s 4114(..)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8838(67)s 720 4493(3.44.)m 1304(@P)s 3(ageLabel)k
+3082(..)s 3426(..)s 3770(..)s 4114(..)s 4458(..)s
+4802(..)s 5146(..)s 5490(..)s 5834(..)s 6178(..)s
+6522(..)s 6866(..)s 7210(..)s 7554(..)s 7898(..)s
+8242(..)s 8839(68)s 240 fnt84 0 3864(Chapter)m 908(4)s
+240 fnt82 1022 3865(.)m 240 fnt84 1186 3864(Examples)m 240 fnt82
+2738 3865(..)m 3082(..)s 3426(..)s 3770(..)s 4114(..)s
+4458(..)s 4802(..)s 5146(..)s 5490(..)s 5834(..)s
+6178(..)s 6522(..)s 6866(..)s 7210(..)s 7554(..)s
+7898(..)s 8242(..)s 8835(69)s 720 3520(4.1.)m 1184(An)s
+1534(equation)s 2415(formatting)s 3476(package)s 4802(..)s 5146(..)s
+5490(..)s 5834(..)s 6178(..)s 6522(..)s 6866(..)s
+7210(..)s 7554(..)s 7898(..)s 8242(..)s 8835(69)s
+720 3175(4.2.)m 1184(P)s 3(aragraphs,)k 2350(displays,)s 3241(and)s
+3645(lists)s 4458(..)s 4802(..)s 5146(..)s 5490(..)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8851(71)s 720 2830(4.3.)m
+1184(P)s 3(age)k 1702(layout)s 2738(..)s 3082(..)s
+3426(..)s 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8840(75)s 720 2485(4.4.)m 1184(Chapters)s 2085(and)s 2489(sections)s
+3770(..)s 4114(..)s 4458(..)s 4802(..)s 5146(..)s
+5490(..)s 5834(..)s 6178(..)s 6522(..)s 6866(..)s
+7210(..)s 7554(..)s 7898(..)s 8242(..)s 8831(80)s
+720 2140(4.5.)m 1184(Bibliographies)s 3082(..)s 3426(..)s 3770(..)s
+4114(..)s 4458(..)s 4802(..)s 5146(..)s 5490(..)s
+5834(..)s 6178(..)s 6522(..)s 6866(..)s 7210(..)s
+7554(..)s 7898(..)s 8242(..)s 8840(85)s 240 fnt84
+0 1511(Refer)m 4(ences)k 240 fnt82 1362 1512(..)m 1706(..)s
+2050(..)s 2394(..)s 2738(..)s 3082(..)s 3426(..)s
+3770(..)s 4114(..)s 4458(..)s 4802(..)s 5146(..)s
+5490(..)s 5834(..)s 6178(..)s 6522(..)s 6866(..)s
+7210(..)s 7554(..)s 7898(..)s 8242(..)s 8831(90)s
+0 3(i)m 6(v)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: v 5
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt84 0 13843(Index)m 240 fnt82 1018 13844(..)m 1362(..)s
+1706(..)s 2050(..)s 2394(..)s 2738(..)s 3082(..)s
+3426(..)s 3770(..)s 4114(..)s 4458(..)s 4802(..)s
+5146(..)s 5490(..)s 5834(..)s 6178(..)s 6522(..)s
+6866(..)s 7210(..)s 7554(..)s 7898(..)s 8242(..)s
+8851(91)s 8951 3(v)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: vi 6
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+0 3(vi)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 1 7
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+480 fnt84 0 12955(Chapter)m 1819(1.)s 2400(Principles)s 240 fnt82
+0 12004(The)m 414(Lout)s 911(document)s 1900(formatting)s 2946(language)s
+3852(is)s 4047(based)s 4635(on)s 4917(just)s 5307(four)s
+5751(k)s 2(e)k 3(y)k 6131(ideas:)s 6713(objects,)s
+7482(de\207nitions,)s 8584(cross)s 0 11716(references,)m 1087(and)s 1491(g)s 1(alle)k 3(ys.)k
+2328(This)s 2804(chapter)s 3567(concentrates)s 4812(on)s 5109(them,)s
+5694(postponing)s 6812(the)s 7160(ine)s 6(vitable)k 8152(details.)s
+240 fnt84 0 10923(1.1.)m 471(Objects)s 240 fnt82 480 10447(Since)m
+1075(our)s 1462(aim)s 1888(is)s 2106(to)s 2354(produce)s
+3189(neatly)s 3835(formatted)s 4829(documents,)s 5981(we)s 6325(should)s
+7030(be)s 3(gin)k 7624(by)s 7926(looking)s 8719(at)s
+8960(a)s 0 10159(typical)m 705(e)s 3(xample)k 1568(of)s
+1839(such)s 2335(a)s 2501(document:)s 1927 2494 0 2494 240 288 60 480 7325 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt84 560 1987(PURCELL)m
+128 fnt82 1316 2059(1)m 160 fnt82 170 1695(In)m 395(the)s
+681(w)s 1(orld)k 1145(of)s 1381(music)s 170 1515(England)m
+882(is)s 1163(supposed)s 170 1335(to)m 376(be)s 611(a)s
+768(mere)s 1171(pro)s 2(vince.)k 170 1155(If)m 465(she)s
+856(produces)s 1608(an)s 170 975(indif)m 4(ferent)k 1136(composer)s
+567 0 0 0 160 180 40 170 763 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+128 fnt82 170 624(1)m 160 fnt82 221 552(Blom,)m 703(Eric.)s
+160 fnt83 1133 553(Some)m 170 373(Gr)m 5(eat)k 734(Composer)s 1(s.)k
+160 fnt82 170 192(Oxford,)m 703(1944.)s 
+grestore
+1927 2494 0 2494 240 288 60 480 4831 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt82 170 2161(or)m
+453(performer)s 6(,)k 1267(that)s 1657(is)s 170 1981(re)m 2(garded)k
+862(else)s 4(where)k 1630(as)s 170 1801(perfectly)m 905(normal)s
+1527(and)s 170 1621(natural;)m 762(b)s 3(ut)k 1078(if)s
+1298(foreign)s 170 1441(students)m 905(of)s 1264(musical)s 170 1261(history)m
+976(ha)s 3(v)k 2(e)k 1637(to)s 170 1081(ackno)m 4(wledge)k
+1130(a)s 1326(British)s 170 901(musical)m 795(genius,)s 1376(he)s
+1657(is)s 170 721(considered)m 901(a)s 1012(freak.)s 490 488(Such)m
+957(a)s 1178(freak)s 1657(is)s 170 308(Henry)m 607(Purcell.)s
+1170(Y)s 16(et)k 1426(if)s 1574(we)s 
+grestore
+1927 2494 0 2494 240 288 60 480 2337 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt82
+170 2161(mak)m 1(e)k 565(a)s 690(choice)s 1157(of)s
+1352(\207fteen)s 170 1981(of)m 407(the)s 695(w)s 1(orld')k 8(s)k
+1264(musical)s 170 1801(classics,)m 740(as)s 918(here,)s 1276(we)s
+1510(\207nd)s 170 1621(that)m 464(we)s 703(cannot)s 1185(omit)s
+1533(this)s 170 1441(English)m 695(master)s 8(.)k 
+grestore
+0 1886(It)m
+229(is)s 463(a)s 653(lar)s 4(ge)k 1206(rectangle)s
+2161(made)s 2759(from)s 3307(three)s 3864(smaller)s 4651(rectangles)s
+5694(\211)s 5898(its)s 6198(pages.)s 6931(Each)s 7490(page)s
+8022(is)s 8256(made)s 8855(of)s 0 1598(lines;)m 578(each)s
+1088(line)s 1517(is)s 1743(made)s 2332(of)s 2618(w)s 2(ords,)k
+3324(although)s 4234(it)s 4441(mak)s 2(es)k 5117(sense)s
+5706(for)s 6059(an)s 3(y)k 6472(rectangle)s 7418(\(e)s 6(v)k 3(en)k
+8012(a)s 8194(complete)s 0 1310(document\))m 1072(to)s 1311(be)s
+1593(part)s 2024(of)s 2295(a)s 2461(line,)s 2926(pro)s 3(vided)k
+3832(it)s 4024(is)s 4234(not)s 4600(too)s 4959(lar)s 4(ge.)k
+480 936(Lout)m 995(deals)s 1541(with)s 2027(something)s 3081(a)s
+3251(little)s 3747(more)s 4298(complicated)s 5528(than)s 6001(rectangles:)s
+240 fnt83 7079 938(objects.)m 240 fnt82 7914 936(An)m 8268(object)s
+8916(is)s 0 648(a)m 176(rectangle)s 1118(with)s 1611(at)s
+1854(least)s 2362(one)s 240 fnt83 2775 650(column)m 3545(mark)s
+240 fnt82 4112 648(protruding)m 5186(abo)s 3(v)k 3(e)k
+5819(and)s 6234(belo)s 6(w)k 6878(it,)s 7128(and)s
+7543(at)s 7786(least)s 8294(one)s 240 fnt83 8707 650(r)m 10(ow)k
+192 fnt84 4490 0(1)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 2 8
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(2)m 240 fnt83 6965 13843(Chapter)m 7815(1.)s
+8089(Principles)s 0 13205(mark)m 240 fnt82 557 13203(protruding)m 1621(to)s
+1861(the)s 2211(left)s 2589(and)s 2994(right.)s 3611(The)s
+4040(simplest)s 4897(objects)s 5627(contain)s 6389(w)s 2(ords)k
+7024(lik)s 2(e)k 7438(metempsychosis,)s 0 12915(and)m 404(ha)s 4(v)k 3(e)k
+905(one)s 1307(mark)s 1859(of)s 2130(each)s 2625(type:)s
+1572 215 0 106 240 288 60 480 12360 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1572 215 0 106 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1572 215 0 106 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 52(metempsychosis)m 
+grestore
+
+grestore
+end end restore
+grestore
+0 11909(The)m 441(rectangle)s 1386(e)s 3(xactly)k
+2141(encloses)s 3016(the)s 3377(w)s 2(ord;)k 3993(its)s
+4283(column)s 5072(mark)s 5637(is)s 5861(at)s 6107(the)s
+6469(left)s 6859(edge,)s 7432(and)s 7850(its)s 8140(ro)s 6(w)k
+8574(mark)s 0 11621(passes)m 668(through)s 1477(the)s 1831(middle)s
+2558(of)s 2835(the)s 3190(lo)s 6(wer)k 4(-case)k
+4276(letters.)s 5029(The)s 5463(rectangle)s 6401(and)s 6811(marks)s
+7453(do)s 7752(not)s 8125(appear)s 8829(on)s 0 11333(the)m
+348(printed)s 1083(page,)s 1642(b)s 4(ut)k 2004(to)s
+2243(understand)s 3351(what)s 3876(Lout)s 4388(is)s 4598(doing)s
+5197(you)s 5612(ha)s 4(v)k 3(e)k 6113(to)s
+6352(imagine)s 7178(them.)s 480 10959(T)m 19(o)k 782(place)s
+1344(tw)s 2(o)k 1756(objects)s 2487(side)s 2930(by)s
+3226(side,)s 3721(we)s 4058(separate)s 4898(them)s 5438(by)s
+5735(the)s 6085(symbol)s 220 fnt35 6847 10956(|,)m 240 fnt82
+7009 10959(which)m 7653(denotes)s 8437(the)s 8788(act)s 0 10671(of)m
+240 fnt83 271 10673(horizontal)m 1315(concatenation)s 240 fnt82 2665 10671(.)m
+2829(So,)s 3189(if)s 3406(we)s 3741(write)s 220 fnt35
+480 10189(USA  |  A)m 6(ustr)k 2(alia)k 240 fnt82 0 9734(the)m
+348(result)s 938(will)s 1364(be)s 1646(the)s 1994(object)s
+476 165 0 57 240 288 60 480 9228 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 3(USA)m 
+grestore
+
+grestore
+end end restore
+grestore
+875 165 0 56 240 288 60 956 9229 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+875 165 0 56 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+875 165 0 56 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 2(Australia)m 
+grestore
+
+grestore
+end end restore
+grestore
+0 8777(Notice)m 718(that)s 1162(this)s
+1583(object)s 2253(has)s 2648(tw)s 2(o)k 3084(column)s
+3884(marks,)s 4601(b)s 4(ut)k 4988(still)s 5426(only)s
+5931(one)s 6359(ro)s 6(w)k 6804(mark,)s 7428(because)s
+220 fnt35 8266 8774(|)m 240 fnt82 8389 8777(mer)m 4(ges)k
+0 8489(the)m 382(tw)s 2(o)k 827(ro)s 6(w)k
+1282(marks)s 1952(together)s 13(.)k 2921(This)s 3431(mer)s 4(ging)k
+4312(of)s 4618(ro)s 6(w)k 5073(marks)s 5743(\207x)s 3(es)k
+6277(the)s 6660(v)s 3(ertical)k 7462(position)s 8325(of)s
+8631(each)s 0 8201(object)m 647(with)s 1133(respect)s 1873(to)s
+2115(the)s 2467(other)s 9(,)k 3060(b)s 4(ut)k
+3425(it)s 3621(does)s 4115(not)s 4485(determine)s 5499(ho)s 6(w)k
+5964(f)s 2(ar)k 6290(apart)s 6830(the)s 3(y)k
+7297(are.)s 7756(This)s 8236(distance,)s 0 7913(or)m 240 fnt83
+276 7915(gap)m 240 fnt82 629 7913(,)m 753(may)s 1236(be)s
+1536(gi)s 6(v)k 3(en)k 2133(just)s 2555(after)s
+3069(the)s 3434(symbol,)s 4263(as)s 4531(in)s 220 fnt35
+4791 7910(|0.5i)m 240 fnt82 5264 7913(for)m 5620(e)s 3(xample,)k
+6551(which)s 7210(speci\207es)s 8102(horizontal)s 0 7625(concatenation)m 1385(with)s
+1867(a)s 2033(g)s 1(ap)k 2431(of)s 2702(half)s
+3145(an)s 3428(inch.)s 4004(If)s 4234(no)s 4527(g)s 1(ap)k
+4925(is)s 5135(gi)s 6(v)k 3(en,)k 5765(it)s
+5957(is)s 6167(assumed)s 7049(to)s 7288(be)s 220 fnt35
+7570 7622(0i)m 240 fnt82 7726 7625(.)m 240 fnt83 480 7253(V)m 26(ertical)k
+1283(concatenation)s 240 fnt82 2633 7251(,)m 2740(denoted)s 3556(by)s
+220 fnt35 3850 7248(/)m 240 fnt82 3914 7251(,)m 4021(is)s
+4231(the)s 4579(same)s 5126(apart)s 5663(from)s 6187(the)s
+6535(change)s 7269(of)s 7540(direction:)s 220 fnt35 480 6750(A)m 6(ustr)k 2(alia  /0.1i  USA)k
+240 fnt82 0 6295(has)m 370(result)s 875 165 0 56 240 288 60 480 5840 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+875 165 0 56 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+875 165 0 56 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 2(Australia)m 
+grestore
+
+grestore
+end end restore
+grestore
+476 165 0 57 240 288 60 480 5531 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 3(USA)m
+
+grestore
+
+grestore
+end end restore
+grestore
+0 5080(The)m 485(usual)s 1102(mer)s 4(ging)k 2005(of)s
+2333(marks)s 3026(occurs,)s 3814(and)s 4275(no)s 6(w)k
+4793(the)s 5199(g)s 1(ap)k 5654(determines)s 6810(the)s
+7215(v)s 3(ertical)k 8040(separation.)s 0 4792(Horizontal)m 1077(and)s
+1481(v)s 3(ertical)k 2248(can)s 2637(be)s 2919(combined:)s
+220 fnt35 1000 4340(USA)m 2256(|0.2i)s 2772(A)s 6(ustr)k 2(alia)k
+480 4052(/0.1i)m 1000(W)s 8(ashington)k 2256(|)s 2772(Canberr)s 2(a)k
+240 fnt82 0 3553(has)m 370(result)s 476 165 0 57 240 288 60 480 3097 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+476 165 0 57 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 3(USA)m 
+grestore
+
+grestore
+end end restore
+grestore
+659 166 0 57 240 288 60 956 3097 LoutGr2
+0 ymark moveto xsize 10 pt add ymark lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+875 165 0 56 240 288 60 1903 3098 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+875 165 0 56 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+875 165 0 56 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 2(Australia)m
+
+grestore
+
+grestore
+end end restore
+grestore
+1135 215 0 106 240 288 60 480 2738 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1135 215 0 106 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1135 215 0 106 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 52(W)m 19(ashington)k 
+grestore
+
+grestore
+end end restore
+grestore
+876 166 0 57 240 288 60 1903 2787 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+876 166 0 57 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+876 166 0 57 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+0 3(Canberra)m 
+grestore
+
+grestore
+end end restore
+grestore
+0 2287(There)m 655(are)s
+1044(se)s 6(v)k 3(eral)k 1808(things)s 2486(to)s
+2768(note)s 3278(carefully)s 4222(here.)s 4839(White)s 5522(space)s
+6151(\(including)s 7229(tabs)s 7707(and)s 8154(ne)s 6(wlines\))k
+0 1999(adjacent)m 848(to)s 1078(a)s 1236(concatenation)s 2612(symbol)s
+3364(is)s 3565(ignored,)s 4395(so)s 4652(it)s 4836(may)s
+5293(be)s 5567(used)s 6055(to)s 6286(lay)s 6623(out)s
+6981(the)s 7320(e)s 3(xpression)k 8388(clearly)s 15(.)k
+0 1711(The)m 425(symbol)s 220 fnt35 1182 1708(|)m 240 fnt82
+1275 1711(tak)m 2(es)k 1812(precedence)s 2940(o)s 3(v)k 3(er)k
+220 fnt35 3415 1708(/)m 240 fnt82 3479 1711(,)m 3583(which)s
+4221(means)s 4880(that)s 5295(the)s 5639(ro)s 6(ws)k
+6146(are)s 6490(formed)s 7234(\207rst,)s 7709(then)s 8174(v)s 3(ertically)k
+0 1423(concatenated.)m 1420(The)s 1856(symbol)s 220 fnt35 2625 1420(/)m
+240 fnt82 2757 1423(will)m 3191(mer)s 4(ge)k 3849(tw)s 2(o)k
+4267(or)s 4535(more)s 5090(column)s 5873(marks,)s 6573(creating)s
+7403(multiple)s 8264(columns)s 0 1135(\(and)m 220 fnt35 484 1132(|)m
+240 fnt82 583 1135(will)m 1011(mer)s 4(ge)k 1662(tw)s 2(o)k
+2073(or)s 2334(more)s 2883(ro)s 6(w)k 3305(marks\).)s
+4134(This)s 4611(implies)s 5367(that)s 5787(the)s 6137(g)s 1(ap)k
+220 fnt35 6536 1132(0.2i)m 240 fnt82 6937 1135(used)m 7436(abo)s 3(v)k 3(e)k
+8060(is)s 8272(between)s 0 847(columns,)m 910(not)s 1268(indi)s 6(vidual)k
+2278(items)s 2838(in)s 3072(columns;)s 3987(a)s 4144(g)s 1(ap)k
+4534(in)s 4768(the)s 5108(second)s 5822(ro)s 6(w)k
+6234(w)s 2(ould)k 6880(therefore)s 7789(be)s 8062(redundant,)s
+0 559(and)m 404(so)s 670(is)s 880(omitted.)s 480 185(A)m
+710(v)s 6(ariant)k 1427(of)s 220 fnt35 1698 182(/)m
+240 fnt82 1822 185(called)m 220 fnt35 2450 182(//)m 240 fnt82
+2635 185(left-justi\207es)m 3825(tw)s 2(o)k 4235(objects)s 4963(instead)s
+5698(of)s 5969(mer)s 4(ging)k 6815(their)s 7312(marks.)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 3 9
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(1.1.)m 454(Objects)s 240 fnt84 8953 13840(3)m
+240 fnt82 480 13205(By)m 840(enclosing)s 1836(an)s 2145(object)s
+2815(in)s 3085(braces,)s 3828(it)s 4046(is)s 4282(possible)s
+5148(to)s 5414(o)s 3(v)k 3(erride)k 6286(the)s
+6660(set)s 7011(precedences.)s 8369(Here)s 8916(is)s 0 12917(another)m
+777(e)s 3(xpression)k 1854(for)s 2192(the)s 2540(table)s
+3060(abo)s 3(v)k 3(e,)k 3733(in)s 3976(which)s
+4618(the)s 4966(columns)s 5828(are)s 6175(formed)s 6923(\207rst:)s
+220 fnt35 996 12416({ USA)m 2089(/0.1i)s 2609(W)s 8(ashington })k
+480 12128(|0.2i)m 996({ A)s 6(ustr)k 2(alia)k 2089(/)s
+2609(Canberr)s 2(a })k 240 fnt82 0 11634(Braces)m 701(ha)s 4(v)k 3(e)k
+1202(no)s 1495(ef)s 6(fect)k 2091(other)s 2642(than)s
+3111(to)s 3350(alter)s 3833(the)s 4181(grouping.)s 240 fnt83
+480 11262(P)m 19(ar)k 3(a)k 2(gr)k 3(aph)k
+1569(br)s 8(eaking)k 240 fnt82 2476 11260(occurs)m 3160(when)s
+3746(an)s 4038(object)s 4692(is)s 4911(too)s 5280(wide)s
+5810(to)s 6059(\207t)s 6327(into)s 6762(the)s 7119(space)s
+7716(a)s 4(v)k 6(ailable)k 8633(to)s 8882(it;)s
+0 10972(by)m 286(breaking)s 1168(its)s 1436(paragraphs)s 2527(into)s
+2944(lines,)s 3494(its)s 3762(width)s 4355(is)s 4557(reduced)s
+5364(to)s 5595(an)s 5869(acceptable)s 6925(amount.)s 7799(The)s
+8218(a)s 4(v)k 6(ailable)k 0 10684(space)m 587(is)s
+797(determined)s 1930(by)s 2224(the)s 220 fnt35 2572 10681(@Wide)m
+240 fnt82 3346 10684(symbol,)m 4158(whose)s 4826(form)s 5350(is)s
+240 fnt83 480 10181(length)m 220 fnt35 1193 10176(@Wide)m 240 fnt83
+2027 10181(object)m 240 fnt82 0 9680(and)m 404(whose)s 1072(result)s
+1662(is)s 1872(the)s 2220(gi)s 6(v)k 3(en)k
+2800(object)s 3444(modi\207ed)s 4353(to)s 4592(ha)s 4(v)k 3(e)k
+5093(e)s 3(xactly)k 5834(the)s 6182(gi)s 6(v)k 3(en)k
+6762(length.)s 7524(F)s 3(or)k 7913(e)s 3(xample,)k
+220 fnt35 480 9179(5i @Wide {)m 480 8891(Macbeth w)m 3(as v)k 5(er)k -6(y ambitious)k 3(.)k 13(  )k 11(This led him to wish to become king of)k
+480 8603(Scotland.)m 13(  )k 11(The witches told him that this wish of his w)k 2(ould come tr)k -3(ue)k 3(.)k 13(  )k 11(The)k
+480 8315(king of Scotland at this time w)m 3(as Duncan.)k 13(  Encour)k 2(aged b)k 4(y his wif)k 6(e)k 3(, Macbeth)k
+480 8027(m)m 2(urdered Duncan.)k 13(  He w)k 3(as thus enab)k 4(led to succeed Duncan as king.)k 13(  \(51 w)k 2(ords\))k
+480 7739(|0.5i)m 480 7451(Encour)m 2(aged b)k 4(y his wif)k 6(e)k 3(, Macbeth achie)k 6(v)k 5(ed his ambition and realiz)k 3(ed the)k
+480 7163(prediction of the witches b)m 4(y m)k 2(urder)k -3(ing Duncan and becoming king of Scotland)k 480 6875(in his place)m 3(.)k 13(  \(26 w)k 2(ords\))k
+480 6587(})m 240 fnt82 0 6093(has)m 370(for)s 708(its)s
+984(result)s 1574(the)s 1922(follo)s 6(wing)k 2899(\207v)s 3(e)k
+3311(inch)s 3780(wide)s 4301(object)s 4945([7)s 5132(]:)s
+480 5590(Macbeth)m 1356(w)s 2(as)k 1758(v)s 3(ery)k
+2216(ambitious.)s 3304(This)s 480 5302(led)m 828(him)s 1257(to)s
+1493(wish)s 2000(to)s 2236(become)s 3033(king)s 3509(of)s
+480 5014(Scotland.)m 1538(The)s 2023(witches)s 2861(told)s 3348(him)s
+480 4726(that)m 922(this)s 1343(wish)s 1876(of)s 2172(his)s
+2526(w)s 2(ould)k 3206(come)s 480 4438(true.)m 1025(The)s
+1464(king)s 1954(of)s 2235(Scotland)s 3141(at)s 3384(this)s
+480 4150(time)m 959(w)s 2(as)k 1379(Duncan.)s 2287(Encouraged)s
+3486(by)s 480 3862(his)m 818(wife,)s 1357(Macbeth)s 2259(murdered)s
+3242(Dun)s 3652(-)s 480 3574(can.)m 995(He)s 1350(w)s 2(as)k
+1790(thus)s 2260(enabled)s 3081(to)s 3340(suc)s 3652(-)s
+480 3286(ceed)m 976(Duncan)s 1778(as)s 2028(king.)s 2618(\(51)s
+2972(w)s 2(ords\))k 4440 5590(Encouraged)m 5653(by)s 5960(his)s
+6302(wife,)s 6846(Macbeth)s 4440 5302(achie)m 6(v)k 3(ed)k
+5409(his)s 5809(ambition)s 6786(and)s 7260(real)s 7612(-)s
+4440 5014(ized)m 4910(the)s 5272(prediction)s 6312(of)s 6597(the)s
+6959(witches)s 4440 4726(by)m 4731(murdering)s 5776(Duncan)s 6574(and)s
+6974(becom)s 7612(-)s 4440 4438(ing)m 4818(king)s 5316(of)s
+5606(Scotland)s 6520(in)s 6782(his)s 7132(place.)s 4440 4150(\(26)m
+4812(w)s 2(ords\))k 0 2783(A)m 232(paragraph)s 1247(of)s
+1520(te)s 3(xt)k 1937(can)s 2328(be)s 2612(included)s
+3496(an)s 3(ywhere,)k 4533(and)s 4939(it)s 5133(will)s
+5561(be)s 5845(brok)s 2(en)k 6567(automatically)s 7923(if)s
+8143(necessary)s 0 2495(to)m 239(\207t)s 498(the)s 846(a)s 4(v)k 6(ailable)k
+1754(space.)s 2449(The)s 2877(spaces)s 3552(between)s 4406(w)s 2(ords)k
+5040(are)s 5387(con)s 9(v)k 3(erted)k 6376(into)s
+6801(concatenation)s 8186(symbols.)s 480 2121(These)m 1136(are)s 1512(the)s
+1889(most)s 2443(signi\207cant)s 3528(of)s 3828(Lout')s 13(s)k
+4519(object-b)s 4(uilding)k 6058(symbols.)s 7049(There)s 7691(are)s
+8067(others,)s 8788(for)s 0 1833(changing)m 924(fonts,)s 1501(controlling)s
+2596(paragraph)s 3601(breaking,)s 4538(printing)s 5340(graphical)s 6277(objects)s
+6997(lik)s 2(e)k 7402(box)s 3(es)k 8001(and)s
+8397(circles,)s 0 1545(and)m 404(so)s 670(on,)s 1017(b)s 4(ut)k
+1379(the)s 3(y)k 1842(do)s 2135(not)s 2501(add)s
+2905(an)s 3(ything)k 3793(ne)s 6(w)k 4240(in)s
+4483(principle.)s 240 fnt84 0 752(1.2.)m 471(De\207nitions)s 240 fnt82
+480 321(The)m 897(features)s 1691(of)s 1950(Lout)s 2451(are)s
+2786(v)s 3(ery)k 3250(general.)s 4105(The)s 3(y)k
+4637(do)s 4918(not)s 5272(assume)s 6020(that)s 6427(documents)s
+7503(are)s 7838(composed)s 8855(of)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 4 10
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(4)m 240 fnt83 6965 13843(Chapter)m 7815(1.)s
+8089(Principles)s 240 fnt82 0 13204(pages,)m 637(nor)s 1001(that)s
+1403(there)s 1921(are)s 2252(such)s 2733(things)s 3353(as)s
+3588(mar)s 4(gins)k 4389(and)s 4778(footnotes,)s 5759(for)s
+6082(e)s 3(xample.)k 240 fnt83 7037 13206(De\207nitions)m 240 fnt82
+8127 13204(bridge)m 8778(the)s 0 12916(g)m 1(ap)k 397(between)s
+1249(Lout')s 13(s)k 1910(general)s 2666(features)s 3470(and)s
+3873(the)s 4219(special)s 4935(features)s 5740(\211)s 5918(footnotes,)s
+6913(equations,)s 7936(pages)s 8530(\211)s 8708(that)s 0 12628(particular)m
+991(documents)s 2097(require.)s 2954(The)s 3(y)k 3515(hold)s
+4017(the)s 4382(instr)s 4806(uct)s 5098(ions)s 5566(for)s
+5922(producing)s 6963(these)s 7528(special)s 8264(features,)s 0 12340(con)m 9(v)k 3(eniently)k
+1278(packaged)s 2240(ready)s 2825(for)s 3163(use.)s 480 11966(F)m 3(or)k
+885(e)s 3(xample,)k 1815(consider)s 2701(the)s 3065(challenge)s
+4053(posed)s 4686(by)s 4996(`)s 5057(T)s 5153 11918(E)m
+5261 11966(X)m 5430(',)s 5633(which)s 6291(is)s 6517(the)s
+6881(name)s 7471(of)s 7758(one)s 8176(of)s 8464(Lout')s 13(s)k
+0 11678(most)m 525(illustrious)s 1531(ri)s 6(v)k 6(als)k
+2100([5)s 2285(].)s 2528(Lout)s 3040(solv)s 3(es)k
+3686(it)s 3878(easily)s 4489(enough,)s 5302(lik)s 2(e)k
+5714(this:)s 220 fnt35 480 11177(T{ /0.2f)m 6(o E }X)k 240 fnt82
+0 10683(b)m 4(ut)k 373(to)s 624(type)s 1103(this)s
+1511(e)s 6(v)k 3(ery)k 2098(time)s 2590(T)s
+2686 10635(E)m 2794 10683(X)m 3035(is)s 3256(mentioned)s 4336(w)s 2(ould)k
+5002(be)s 5296(tedious)s 6050(and)s 6465(error)s 4(-prone.)k
+7724(So)s 8041(we)s 8388(place)s 8960(a)s 0 10395(de\207nition)m
+974(at)s 1206(the)s 1554(be)s 3(ginning)k 2562(of)s
+2833(the)s 3181(document:)s 220 fnt35 480 9894(def  @T)m 26(eX  {  )k 11(T{ /0.2f)k 6(o E }X  })k
+240 fnt82 0 9400(No)m 6(w)k 220 fnt35 514 9397(@T)m 26(eX)k
+240 fnt82 1169 9400(stands)m 1818(for)s 2156(the)s 2504(object)s
+3148(follo)s 6(wing)k 4125(it)s 4317(between)s 5171(braces,)s
+5888(and)s 6292(we)s 6627(may)s 7093(write)s 220 fnt35
+480 8899(consider)m 1370(the)s 1728(challenge)s 2719(posed)s 3366(b)s 4(y)k
+3653(`@T)s 26(eX',)k 4451(\202)s 240 fnt82 0 8400(as)m
+250(the)s 598(author)s 1269(did)s 1633(earlier)s 2301(in)s
+2544(this)s 2940(paragraph.)s 480 8026(A)m 240 fnt83 706 8028(symbol)m
+240 fnt82 1440 8026(is)m 1646(a)s 1808(name,)s 2429(lik)s 2(e)k
+220 fnt35 2837 8023(@T)m 26(eX)k 240 fnt82 3432 8026(,)m
+3535(which)s 4172(stands)s 4817(for)s 5151(something)s 6197(other)s
+6744(than)s 7209(itself.)s 7845(The)s 8269(initial)s 220 fnt35
+8875 8023(@)m 240 fnt82 0 7738(is)m 201(not)s 558(compulsory)s 15(,)k
+1771(b)s 4(ut)k 2124(it)s 2307(does)s 2788(mak)s 2(e)k
+3351(the)s 3690(name)s 4254(stand)s 4808(out)s 5165(clearly)s 15(.)k
+5954(A)s 240 fnt83 6175 7740(de\207nition)m 240 fnt82 7124 7738(of)m
+7386(a)s 7543(symbol)s 8293(declares)s 0 7450(a)m 164(name)s
+736(to)s 973(be)s 1253(a)s 1417(symbol,)s 2227(and)s
+2629(says)s 3090(what)s 3613(the)s 3959(symbol)s 4717(stands)s
+5364(for)s 13(.)k 5791(The)s 240 fnt83 6217 7452(body)m
+240 fnt82 6737 7450(of)m 7006(a)s 7170(de\207nition)s 8142(is)s
+8350(the)s 8695(part)s 0 7162(follo)m 6(wing)k 977(the)s
+1325(name,)s 1950(between)s 2804(the)s 3152(braces.)s 3926(T)s 19(o)k
+240 fnt83 4226 7164(in)m 9(vok)k 2(e)k 240 fnt82
+4892 7162(a)m 5058(symbol)s 5818(is)s 6028(to)s 6267(mak)s 2(e)k
+6839(use)s 7214(of)s 7485(it.)s 480 6788(Another)m 1324(e)s 3(xpression)k
+2401(ripe)s 2828(for)s 3166(packaging)s 4203(in)s 4446(a)s
+4612(de\207nition)s 5586(is)s 220 fnt35 480 6287(@OneRo)m 3(w {  |  -2p @F)k 6(ont n  ^/0.5fk  2  })k
+240 fnt82 0 5745(which)m 642(produces)s 200 fnt82 1671 5862(n)m
+240 fnt82 1557 5745(2)m 1828(\(see)s 2268(Chapter)s 3085(2\).)s
+3448(But)s 3854(this)s 4250(time)s 4730(we)s 5065(w)s 2(ould)k
+5720(lik)s 2(e)k 6132(to)s 6371(be)s 6653(able)s
+7107(to)s 7346(write)s 240 fnt83 480 5242(object)m 220 fnt35
+1188 5237(@Super)m 240 fnt83 2116 5242(object)m 240 fnt82 0 4640(so)m
+296(that)s 220 fnt35 745 4637(a)m 953(@Super)s 1853(2)s
+240 fnt82 2055 4640(w)m 2(ould)k 2741(come)s 3345(out)s
+3742(as)s 200 fnt82 4128 4769(2)m 240 fnt82 4022 4640(a)m
+4223(,)s 4361(and)s 4796(so)s 5092(on,)s 5470(for)s
+5838(in)s 6112(this)s 6538(w)s 2(ay)k 7020(the)s
+7398(usefulness)s 8476(of)s 8778(the)s 0 4352(de\207nition)m 974(is)s
+1184(greatly)s 1901(increased.)s 2967(Here)s 3487(is)s 3697(ho)s 6(w)k
+4158(it)s 4350(is)s 4560(done:)s 220 fnt35 480 3851(def @Super)m
+480 3563(   left x)m 480 3275(   r)m -3(ight y)k 480 2987({ @OneRo)m 3(w {  |  -2p @F)k 6(ont y  ^/0.5fk  x  })k
+480 2699(})m 240 fnt82 0 2205(This)m 492(de\207nition)s 1483(says)s
+1963(that)s 220 fnt35 2398 2202(@Super)m 240 fnt82 3283 2205(has)m
+3669(tw)s 2(o)k 240 fnt83 4096 2207(par)m 3(ameter)k 2(s)k
+240 fnt82 5176 2205(,)m 220 fnt35 5300 2202(x)m 240 fnt82
+5485 2205(and)m 220 fnt35 5906 2202(y)m 240 fnt82 6014 2205(.)m
+6194(When)s 220 fnt35 6840 2202(@Super)m 240 fnt82 7725 2205(is)m
+7952(in)s 9(v)k 4(ok)k 2(ed,)k 8833(all)s
+0 1917(occurrences)m 1205(of)s 220 fnt35 1490 1914(x)m 240 fnt82
+1671 1917(in)m 1928(the)s 2289(body)s 2837(will)s 3276(be)s
+3572(replaced)s 4452(by)s 4760(the)s 5121(object)s 5779(just)s
+6197(to)s 6450(the)s 6811(left)s 7202(of)s 220 fnt35
+7486 1914(@Super)m 240 fnt82 8294 1917(,)m 8415(and)s 8833(all)s
+0 1629(occurrences)m 1192(of)s 220 fnt35 1462 1626(y)m 240 fnt82
+1630 1629(will)m 2055(be)s 2337(replaced)s 3203(by)s 3496(the)s
+3844(object)s 4487(just)s 4892(to)s 5130(the)s 5477(right.)s
+6092(So,)s 6451(for)s 6789(e)s 3(xample,)k 7702(the)s
+8049(e)s 3(xpression)k 220 fnt35 480 1128(2  @Super  { Slope @F)m 6(ont n })k
+240 fnt82 0 632(is)m 210(equal)s 783(to)s 220 fnt35
+480 131(@OneRo)m 3(w {  |  -2p @F)k 6(ont { Slope @F)k 6(ont n }  ^/0.5fk  2  })k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 5 11
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13844(1.2.)m 454(De\207nitions)s 240 fnt84 8953 13841(5)m
+240 fnt82 0 13151(and)m 404(so)s 670(comes)s 1332(out)s
+1698(as)s 200 fnt83 2062 13281(n)m 240 fnt82 1948 13151(2)m
+2157(.)s 480 12777(Lout)m 994(permits)s 1764(de\207nitions)s 2828(to)s
+3070(in)s 9(v)k 4(ok)k 2(e)k 3765(themselv)s 3(es,)k
+4934(a)s 5103(peculiarly)s 6115(circular)s 6905(thing)s 7453(to)s
+7695(do)s 7991(which)s 8636(goes)s 0 12489(by)m 294(the)s
+642(name)s 1216(of)s 240 fnt83 1487 12491(r)m 8(ecur)k 2(sion.)k
+240 fnt82 2548 12489(Here)m 3068(is)s 3278(an)s 3561(e)s 3(xample)k
+4424(of)s 4695(a)s 4861(recursi)s 6(v)k 3(e)k
+5783(de\207nition:)s 220 fnt35 480 11988(def  @Leaders  {  ..)m 13(   @Leaders  })k 240 fnt82
+0 11494(The)m 418(usual)s 968(rule)s 1384(is)s 1584(that)s
+1991(the)s 2329(v)s 6(alue)k 2886(of)s 3147(an)s
+3420(in)s 9(v)k 4(ocation)k 4463(of)s 4724(a)s
+4879(symbol)s 5629(is)s 5828(a)s 5984(cop)s 2(y)k
+6492(of)s 6752(the)s 7090(body)s 7613(of)s 7874(the)s
+8211(symbol')s 13(s)k 0 11206(de\207nition,)m 1024(so)s 1290(the)s
+1638(v)s 6(alue)k 2206(of)s 220 fnt35 2477 11203(@Leaders)m
+240 fnt82 3546 11206(must)m 4071(be)s 220 fnt35 480 10724(..)m 13(   @Leaders)k
+240 fnt82 0 10269(But)m 406(no)s 6(w)k 867(this)s
+1263(rule)s 1690(applies)s 2418(to)s 2657(this)s 3053(ne)s 6(w)k
+3500(in)s 9(v)k 4(ocation)k 4554(of)s 220 fnt35
+4825 10266(@Leaders)m 240 fnt82 5834 10269(;)m 5946(substituting)s 7115(its)s
+7391(body)s 7925(gi)s 6(v)k 3(es)k 220 fnt35
+480 9768(..)m 13(   ..)k 13(   @Leaders)k 240 fnt82 0 9313(and)m
+408(so)s 679(on)s 980(fore)s 6(v)k 3(er)k 13(.)k
+1816(In)s 2076(order)s 2645(to)s 2888(mak)s 2(e)k
+3465(this)s 3865(useful,)s 4561(an)s 4848(in)s 9(v)k 4(ocation)k
+5907(of)s 6182(a)s 6353(recursi)s 6(v)k 3(e)k
+7279(symbol)s 8044(is)s 8259(replaced)s 0 9025(by)m 294(its)s
+570(body)s 1104(only)s 1584(if)s 1801(suf\207cient)s 2750(space)s
+3337(is)s 3547(a)s 4(v)k 6(ailable.)k 4563(So,)s
+4923(for)s 5261(e)s 3(xample,)k 220 fnt35 480 8524(4i @Wide { Chapter 7  @Leaders   62 })m
+240 fnt82 0 8028(has)m 370(for)s 708(its)s 984(result)s
+1574(the)s 1922(object)s 480 7524(Chapter)m 1297(7)s 1525(..)s
+1809(..)s 2093(..)s 2377(..)s 2661(..)s 2945(..)s
+3229(..)s 3513(..)s 3797(..)s 4081(..)s 4365(..)s
+4649(..)s 4933(..)s 5217(..)s 5501(..)s 5785(62)s
+0 7021(with)m 478(Lout)s 985(checking)s 1897(before)s 2558(each)s
+3049(replacement)s 4271(of)s 220 fnt35 4537 7018(@Leaders)m 240 fnt82
+5601 7021(by)m 220 fnt35 5891 7018(..)m 6177(@Leaders)s 240 fnt82
+7241 7021(that)m 7654(the)s 7997(total)s 8471(length)s 0 6733(afterw)m 2(ards,)k
+1112(including)s 2069(the)s 2417(other)s 2968(w)s 2(ords,)k
+3658(w)s 2(ould)k 4313(not)s 4679(e)s 3(xceed)k
+5398(four)s 5856(inches.)s 480 6359(The)m 902(remaining)s 1918(issue)s
+2445(is)s 2649(what)s 3168(happens)s 3997(when)s 4567(Lout)s
+5072(decides)s 5834(that)s 6246(it)s 6431(is)s 6635(time)s
+7109(to)s 7341(stop.)s 7898(The)s 8319(ob)s 3(vious)k
+0 6071(thing)m 545(to)s 784(do)s 1077(is)s 1287(to)s
+1526(replace)s 2271(the)s 2619(last)s 3010(in)s 9(v)k 4(ocation)k
+4064(by)s 4358(an)s 4641(empty)s 5293(object:)s 220 fnt35
+480 5573(..)m 13(    ..)k 13(    ..)k 13(    ..)k 13(    ..)k 13(    ..)k 13(    ..)k 13(    ..)k 13(    {})k
+240 fnt82 0 5079(As)m 316(the)s 662(e)s 3(xample)k
+1524(sho)s 6(ws,)k 2222(this)s 2617(w)s 2(ould)k
+3270(lea)s 4(v)k 3(e)k 3822(a)s 3986(small)s
+4556(trailing)s 5297(space,)s 5933(which)s 6574(is)s 6782(a)s
+6947(major)s 7562(headache.)s 8614(Lout)s 0 4791(\207x)m 3(es)k
+517(this)s 930(by)s 1242(replacing)s 2201(the)s 2566(last)s
+2975(in)s 9(v)k 4(ocation)k 4046(with)s 4545(a)s
+4729(dif)s 6(ferent)k 5621(kind)s 6122(of)s 6411(empty)s
+7080(object,)s 7788(called)s 220 fnt35 8434 4788(@Null)m 240 fnt82
+9019 4791(,)m 0 4503(whose)m 677(ef)s 6(fect)k 1282(is)s
+1501(to)s 1749(mak)s 2(e)k 2330(an)s 2623(adjacent)s
+3488(concatenation)s 4882(symbol)s 5651(disappear)s 9(,)k 6674(preferably)s
+7718(one)s 8130(preceding)s 0 4215(the)m 220 fnt35 348 4212(@Null)m
+240 fnt82 933 4215(.)m 1097(Thus,)s 1683(when)s 2259(Lout)s
+2771(replaces)s 220 fnt35 3604 4212(@Leaders)m 240 fnt82 4673 4215(by)m
+220 fnt35 4967 4212(@Null)m 240 fnt82 5612 4215(in)m 5855(the)s
+6203(e)s 3(xpression)k 220 fnt35 480 3714(..)m 13(    ..)k 13(    ..)k 13(    ..)k 13(    ..)k 13(    ..)k 13(    ..)k 13(    ..)k 13(    @Leaders)k
+240 fnt82 0 3259(the)m 348(trailing)s 1089(space,)s 1727(which)s
+2368(is)s 2577(really)s 3174(a)s 3339(horizontal)s 4362(concatenation)s
+5747(symbol,)s 6558(disappears)s 7617(as)s 7867(well.)s 8441(This)s
+8916(is)s 0 2971(tak)m 2(en)k 573(into)s 998(account)s
+1802(when)s 2378(deciding)s 3255(whether)s 4085(there)s 4618(is)s
+4828(room)s 5393(to)s 5632(replace)s 220 fnt35 6377 2968(@Leaders)m
+240 fnt82 7446 2971(by)m 7740(its)s 8016(body)s 15(.)k
+480 2597(The)m 903(remainder)s 1926(of)s 2192(this)s 2583(section)s
+3312(is)s 3517(de)s 6(v)k 4(oted)k 4318(to)s
+4552(sho)s 6(wing)k 5406(ho)s 6(w)k 5862(de\207nitions)s
+6918(may)s 7379(be)s 7656(used)s 8148(to)s 8382(specify)s
+0 2309(the)m 240 fnt83 348 2311(pa)m 2(g)k 2(e)k
+863(layout)s 240 fnt82 1525 2309(of)m 1796(a)s 1962(document.)s
+3070(T)s 19(o)k 3370(be)s 3(gin)k 3956(with,)s
+4488(we)s 4823(can)s 5212(de\207ne)s 5853(a)s 6019(page)s
+6527(lik)s 2(e)k 6939(this:)s 220 fnt35 480 1808(def @P)m 8(age)k
+480 1520({)m 480 1232(    //1i  ||1i)m 480 944(    6i @Wide 9.5i @High)m 480 656(    { @T)m 26(e)k 6(xtPlace  //1r)k -8(t  @F)k 6(ootSect })k
+480 368(    ||1i  //1i)m 480 80(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 6 12
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(6)m 240 fnt83 6965 13843(Chapter)m 7815(1.)s
+8089(Principles)s 240 fnt82 0 13205(No)m 6(w)k 220 fnt35
+520 13202(@P)m 8(age)k 240 fnt82 1306 13205(is)m 1523(an)s
+1813(eight)s 2358(by)s 2659(ele)s 6(v)k 3(en)k
+3338(and)s 3749(a)s 3922(half)s 4371(inch)s 4847(object,)s
+5545(with)s 6034(one)s 6443(inch)s 6919(mar)s 4(gins,)k
+7799(a)s 7972(place)s 8539(at)s 8778(the)s 0 12917(top)m
+367(for)s 713(te)s 3(xt,)k 1183(and)s 1595(a)s
+1769(section)s 2511(at)s 2751(the)s 3108(bottom)s 3854(for)s
+4200(footnotes)s 5149(\(since)s 220 fnt35 5783 12914(//1r)m -8(t)k
+240 fnt82 6233 12917(bottom-justi\207es)m 7792(the)s 8149(follo)s 6(wing)k
+0 12629(object\).)m 827(It)s 1032(will)s 1458(be)s 1740(con)s 9(v)k 3(enient)k
+2838(for)s 3176(us)s 3440(to)s 3679(sho)s 6(w)k
+4233(the)s 4581(ef)s 6(fect)k 5177(of)s 5448(in)s 9(v)k 4(oking)k
+220 fnt35 6340 12626(@P)m 8(age)k 240 fnt82 7119 12629(lik)m 2(e)k
+7531(this:)s 160 fnt35 480 11528(@P)m 6(age)k 220 fnt78
+1240 11514(\336)m gsave
+1690 9795 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k
+170 173(@F)m 4(ootSect)k 
+grestore
+240 fnt82 0 9344(with)m 482(the)s
+830(in)s 9(v)k 4(ok)k 2(ed)k 1645(symbol)s
+2405(appearing)s 3401(to)s 3640(the)s 3988(left)s 4365(of)s
+4636(the)s 4984(arro)s 6(w)k 15(,)k 5627(and)s
+6031(its)s 6307(body)s 6841(to)s 7080(the)s 7428(right.)s
+480 8970(The)m 908(de\207nition)s 1882(of)s 2153(a)s 2319(v)s 3(ertical)k
+3086(list)s 3437(of)s 3708(pages)s 4304(should)s 5001(come)s
+5575(as)s 5825(no)s 6118(surprise:)s 220 fnt35 480 8469(def @P)m 8(ageList)k
+480 8181({)m 480 7893(    @P)m 8(age  //  @P)k 8(ageList)k 480 7605(})m
+240 fnt82 0 7111(This)m 476(allo)s 6(ws)k 1145(in)s 9(v)k 4(ocations)k
+2286(lik)s 2(e)k 2698(the)s 3046(follo)s 6(wing:)k
+gsave
+480 0 translate
+1.0867 1.0000 scale
+160 fnt35 0 6010(@P)m 6(ageList)k 220 fnt78 890 5996(\336)m
+gsave
+1220 4277 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k 170 173(@F)m 4(ootSect)k
+
+grestore
+160 fnt35 1220 4047(@P)m 6(ageList)k 220 fnt78 3267 5996(\336)m
+gsave
+3597 4277 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k 170 173(@F)m 4(ootSect)k
+
+grestore
+gsave
+3597 1783 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k 170 173(@F)m 4(ootSect)k
+
+grestore
+160 fnt35 3597 1553(@P)m 6(ageList)k 220 fnt78 5644 5996(\336)m
+gsave
+5974 4277 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k 170 173(@F)m 4(ootSect)k
+
+grestore
+gsave
+5974 1783 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k 170 173(@F)m 4(ootSect)k
+
+grestore
+
+grestore
+0 1067(setting)m 220 fnt35 750 1064(@P)m 8(ageList)k 240 fnt82
+1874 1067(to)m 200 fnt35 2113 1069(@Null)m 240 fnt82 2706 1067(on)m
+3003(the)s 3351(last)s 3742(step.)s 4291(An)s 3(y)k
+4755(number)s 5546(of)s 5817(pages)s 6413(can)s 6802(be)s
+7084(generated.)s 480 693(A)m 703(de\207nition)s 1669(for)s 220 fnt35
+1999 690(@T)m 26(e)k 6(xtPlace)k 240 fnt82 3209 693(is)m
+3411(be)s 3(yond)k 4164(us)s 4420(at)s 4644(present,)s
+5433(since)s 220 fnt35 5972 690(@T)m 26(e)k 6(xtPlace)k
+240 fnt82 7182 693(must)m 7699(be)s 7973(replaced)s 8832(by)s
+0 405(dif)m 6(ferent)k 877(parts)s 1394(of)s 1667(the)s
+2018(te)s 3(xt)k 2435(of)s 2708(the)s 3059(document)s
+4065(on)s 4364(dif)s 6(ferent)k 5242(pages.)s 5953(But)s
+6361(we)s 6699(can)s 7090(de\207ne)s 220 fnt35 7733 402(@F)m 6(ootSect)k
+240 fnt82 8887 405(to)m 0 117(be)m 282(a)s 448(small)s
+1020(space)s 1607(follo)s 6(wed)k 2509(by)s 2803(a)s
+2969(horizontal)s 3993(line)s 4407(follo)s 6(wed)k 5309(by)s
+5603(a)s 5769(list)s 6120(of)s 6391(places)s 7039(where)s
+7679(footnotes)s 8620(go:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 7 13
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13844(1.2.)m 454(De\207nitions)s 240 fnt84 8951 13841(7)m
+220 fnt35 480 13208(def @F)m 6(ootList         )k 480 12920({                     )m 480 12632(   @F)m 6(ootPlace  //0.3v  @F)k 6(ootList)k
+480 12344(}                     )m 480 12056(                      )m 480 11768(def @F)m 6(ootSect)k 480 11480({                        )m
+480 11192(   //0.3v 1i @Wide @HLine)m 480 10904(   //0.3v @F)m 6(ootList      )k 480 10616(}                        )m 240 fnt82
+0 10122(assuming)m 950(that)s 220 fnt35 1360 10119(@HLine)m 240 fnt82
+2199 10122(will)m 2617(produce)s 3436(a)s 3594(horizontal)s 4610(line)s
+5016(of)s 5279(the)s 5619(indicated)s 6545(width.)s 7246(W)s 9(ith)k
+7764(this)s 8152(de\207nition)s 0 9834(we)m 335(can)s 724(generate)s
+1589(pages)s 2185(lik)s 2(e)k 2597(this:)s gsave
+480 7000 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35
+170 2207(@T)m 19(e)k 4(xtPlace)k 170 173(@F)m 4(ootSect)k
+
+grestore
+220 fnt78 2647 8719(\336)m gsave
+3097 7000 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k
+567 0 0 0 160 180 44 170 346 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+170 173(@F)m 4(ootList)k 
+grestore
+5264(\336)s gsave
+5714 7000 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k
+567 0 0 0 160 180 44 170 522 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+170 349(@F)m 4(ootPlace)k 170 173(@F)m 4(ootList)k 
+grestore
+240 fnt82
+0 6549(and)m 404(so)s 670(on)s 967(for)s 1305(arbitrarily)s
+2312(man)s 3(y)k 2895(footnotes.)s 480 6175(W)m 19(e)k
+852(will)s 1281(see)s 1646(in)s 1892(the)s 2244(ne)s 3(xt)k
+2716(section)s 3454(ho)s 6(w)k 3918(in)s 9(v)k 4(ocations)k
+5063(of)s 220 fnt35 5337 6172(@P)m 8(ageList,)k 6511(@F)s 6(ootSect)k
+240 fnt82 7665 6175(and)m 220 fnt35 8073 6172(@F)m 6(ootList)k
+240 fnt82 0 5887(are)m 356(replaced)s 1232(by)s 1535(their)s
+2041(bodies)s 2726(only)s 3216(when)s 3801(the)s 4158(need)s
+4677(to)s 4925(insert)s 5524(te)s 3(xt)k 5949(and)s
+6362(footnotes)s 7312(obliges)s 8063(Lout)s 8584(to)s 8833(do)s
+0 5599(so;)m 352(otherwise)s 1364(the)s 1740(in)s 9(v)k 4(ocations)k
+2908(are)s 3283(replaced)s 4177(by)s 220 fnt35 4499 5596(@Null)m
+240 fnt82 5084 5599(.)m 5275(In)s 5559(this)s 5982(w)s 2(ay)k 15(,)k
+6499(the)s 6874(right)s 7413(number)s 8231(of)s 8530(pages)s
+0 5311(is)m 223(made,)s 862(the)s 1224(small)s 1810(line)s
+2238(appears)s 3033(only)s 3527(on)s 3838(pages)s 4447(that)s
+4879(ha)s 4(v)k 3(e)k 5394(at)s 5640(least)s
+6151(one)s 6567(footnote,)s 7485(and)s 7903(unnecessary)s 0 5023(concatenation)m
+1385(symbols)s 2234(disappear)s 13(.)k 480 4649(This)m 958(approach)s
+1894(to)s 2135(page)s 2645(layout)s 3305(is)s 3517(the)s
+3867(most)s 4394(original)s 5194(contrib)s 4(ution)k 6418(Lout)s
+6932(has)s 7304(made)s 7880(to)s 8122(document)s 0 4361(formatting.)m
+1172(It)s 1377(is)s 1587(e)s 3(xtraordinarily)k 3057(\210e)s 3(xible.)k
+3935(T)s 19(w)k 2(o-column)k 5207(pages?)s 5971(Use)s
+220 fnt35 480 3860({2.8i @Wide @T)m 26(e)k 6(xtPlace}  ||0.4i  {2.8i @Wide @T)k 26(e)k 6(xtPlace})k
+240 fnt82 0 3366(instead)m 768(of)s 220 fnt35 1072 3363(@T)m 26(e)k 6(xtPlace)k
+240 fnt82 2230 3366(.)m 2427(F)s 3(ootnotes)k 3452(in)s
+3728(smaller)s 4523(type?)s 5187(Use)s 220 fnt35 5648 3363(-2p)m
+6051(@F)s 6(ont)k 6797(@F)s 6(ootPlace)k 240 fnt82
+8086 3366(instead)m 8855(of)s 220 fnt35 0 3075(@F)m 6(ootPlace)k
+240 fnt82 1196 3078(.)m 1360(And)s 1831(on)s 2128(and)s
+2532(on.)s 240 fnt84 0 2330(1.3.)m 471(Cr)s 4(oss)k
+1106(r)s 4(efer)k 4(ences)k 240 fnt82 480 1898(A)m
+705(cross)s 1241(reference)s 2178(in)s 2415(common)s 3304(terminology)s
+4521(is)s 4725(something)s 5769(lik)s 2(e)k 6176(`see)s
+6610(T)s 19(able)k 7185(6')s 7411(or)s 7664(`see)s
+8098(page)s 8600(57')s 8946(\211)s 0 1610(a)m 168(reference)s
+1114(within)s 1785(a)s 1954(document)s 2961(to)s 3202(some)s
+3766(other)s 4320(part)s 4754(of)s 5028(it.)s 5327(Readers)s
+6150(\207nd)s 6584(them)s 7125(v)s 3(ery)k 7604(useful,)s
+8298(b)s 4(ut)k 8663(the)s 3(y)k 0 1322(are)m
+343(a)s 504(major)s 1116(problem)s 1969(for)s 2302(authors.)s
+3165(As)s 3478(the)s 3821(document)s 4820(is)s 5025(re)s 6(vised,)k
+5812(T)s 19(able)k 6388(6)s 6556(becomes)s 7440(T)s 19(able)k
+8016(7,)s 8238(the)s 8581(thing)s 0 1034(on)m 297(page)s
+805(57)s 1093(mo)s 3(v)k 3(es)k 1763(to)s
+2002(page)s 2510(63,)s 2857(and)s 3261(all)s 3554(the)s
+3902(cross)s 4444(references)s 5475(must)s 6000(be)s 6282(changed.)s
+480 660(The)m 917(Scribe)s 1593(document)s 2606(formatter)s 9(,)k
+3601(de)s 6(v)k 3(eloped)k 4644(by)s 4947(Brian)s
+5545(K.)s 5831(Reid)s 6351([6)s 6543(],)s 6739(introduced)s
+7829(a)s 8005(scheme)s 8788(for)s 0 372(k)m 2(eeping)k
+804(track)s 1337(of)s 1603(cross)s 2140(references.)s 3279(It)s
+3479(allo)s 6(ws)k 4143(you)s 4553(to)s 4787(gi)s 6(v)k 3(e)k
+5241(names)s 5898(to)s 6132(tables,)s 6791(\207gures,)s 7544(etc.,)s
+7984(and)s 8383(to)s 8617(refer)s 0 84(to)m 233(them)s
+764(by)s 1051(name.)s 1726(The)s 2147(formatter)s 3087(inserts)s
+3754(the)s 4095(appropriate)s 5233(numbers)s 6101(in)s 6337(place)s
+6890(of)s 7154(the)s 7495(names,)s 8206(so)s 8465(that)s
+8876(as)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 8 14
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(8)m 240 fnt83 6965 13843(Chapter)m 7815(1.)s
+8089(Principles)s 240 fnt82 0 13205(the)m 342(document)s 1339(is)s
+1543(re)s 6(vised,)k 2327(the)s 2669(cross)s 3204(references)s
+4229(are)s 4569(k)s 2(ept)k 5033(up)s 5319(to)s
+5552(date)s 5999(automatically)s 15(.)k 7442(Lout)s 7947(has)s
+8310(adopted)s 0 12917(and)m 404(e)s 3(xtended)k 1323(this)s
+1719(scheme.)s 480 12543(In)m 726(Lout,)s 1275(automatic)s 2260(cross)s
+2792(referencing)s 3922(w)s 2(orks)k 4546(in)s 4779(the)s
+5117(follo)s 6(wing)k 6084(w)s 2(ay)k 15(.)k
+6620(First)s 7107(de\207ne)s 7738(a)s 7894(symbol)s 8644(with)s
+0 12255(a)m 166(parameter)s 1180(with)s 1662(the)s 2010(special)s
+2728(name)s 220 fnt35 3302 12252(@T)m 26(ag:)k 480 11754(def @T)m 26(ab)k 4(le)k
+480 11466(   left @T)m 26(ag)k 480 11178(   r)m -3(ight @V)k 15(alue)k
+480 10890({)m 480 10602(   ||1i  @V)m 15(alue)k 480 10314(})m 240 fnt82
+0 9820(When)m 643(this)s 1054(symbol)s 1829(is)s 2054(in)s 9(v)k 4(ok)k 2(ed,)k
+2933(the)s 3296(v)s 6(alue)k 3879(gi)s 6(v)k 3(en)k
+4474(to)s 220 fnt35 4727 9817(@T)m 26(ag)k 240 fnt82
+5365 9820(should)m 6077(be)s 6374(a)s 6555(simple)s 7263(w)s 2(ord)k
+7826(lik)s 2(e)k 220 fnt35 8253 9817(cities)m 240 fnt82
+8745 9820(,)m 8867(or)s 0 9532(se)m 6(v)k 3(eral)k
+722(simple)s 1415(w)s 2(ords)k 2049(juxtaposed)s 3144(lik)s 2(e)k
+220 fnt35 3556 9529(cities compare)m 240 fnt82 4962 9532(;)m 5074(it)s
+5266(serv)s 3(es)k 5911(to)s 6150(name)s 6724(the)s
+7072(in)s 9(v)k 4(ocation:)k 220 fnt35 480 9031({ cities compare } @T)m 26(ab)k 4(le)k
+480 8743({)m 480 8455(    )m 8(W)k 8(ashington  |0.5i  Canberr)k 2(a)k
+480 8167(})m 240 fnt82 0 7673(W)m 19(e)k 410(may)s
+917(no)s 6(w)k 1419(refer)s 1969(to)s 2249(this)s
+2686(in)s 9(v)k 4(ocation)k 3782(else)s 6(where)k
+4828(in)s 5112(the)s 5501(document,)s 6593(using)s 7206(the)s
+240 fnt83 7595 7675(cr)m 10(oss)k 8187(r)s 8(efer)k 8(ence)k
+220 fnt35 0 7382(@T)m 26(ab)k 4(le&&{ cities compare }.)k 240 fnt82
+2918 7385(Here)m 220 fnt35 3480 7382(&&)m 240 fnt82 3870 7385(is)m
+4122(the)s 240 fnt83 4511 7387(cr)m 10(oss)k 5103(r)s 8(efer)k 8(ence)k
+6084(symbol)s 240 fnt82 6762 7385(;)m 6916(its)s 7233(left)s
+7652(parameter)s 8708(is)s 8960(a)s 0 7097(symbol)m 772(and)s
+1189(its)s 1478(right)s 2002(parameter)s 3028(is)s 3251(the)s
+3612(v)s 6(alue)k 4193(of)s 4476(the)s 220 fnt35
+4837 7094(@T)m 26(ag)k 240 fnt82 5473 7097(parameter)m 6500(of)s
+6783(some)s 7357(in)s 9(v)k 4(ocation)k 8424(of)s
+8708(that)s 0 6809(symbol.)m 869(Of)s 1193(course)s 1873(it')s 13(s)k
+2215(simplest)s 3071(if)s 3288(you)s 3703(use)s 4078(just)s
+4483(a)s 4649(one-w)s 2(ord)k 5622(tag;)s 6026(then)s
+6495(no)s 6788(braces)s 7449(are)s 7796(needed.)s 480 6435(A)m
+695(cross)s 1222(reference)s 2150(is)s 2345(not)s 2696(an)s
+2964(object;)s 3645(the)s 3978(reader)s 4619(should)s 5301(think)s
+5839(of)s 6095(it)s 6272(as)s 6507(an)s 6775(arro)s 6(w)k
+7365(in)s 7593(the)s 7926(\207nal)s 8391(printed)s 0 6147(document,)m
+1049(be)s 3(ginning)k 2054(at)s 2284(the)s 2629(cross)s
+3169(reference)s 4109(and)s 4511(ending)s 5213(at)s 5443(the)s
+5788(top)s 6145(of)s 6413(the)s 6759(tar)s 4(get)k
+7355(in)s 9(v)k 4(ocation.)k 8513(Three)s 0 5859(special)m
+715(v)s 6(alues)k 1367(may)s 1830(be)s 2108(gi)s 6(v)k 3(en)k
+2685(to)s 2920(the)s 3264(right)s 3772(parameter)s 4782(of)s
+220 fnt35 5050 5856(&&)m 240 fnt82 5338 5859(:)m 220 fnt35
+5500 5856(preceding)m 240 fnt82 6451 5859(,)m 220 fnt35 6555 5856(f)m 6(ollo)k 3(wing)k
+240 fnt82 7385 5859(,)m 7488(and)s 220 fnt35 7888 5856(f)m 6(oll_or_prec)k
+240 fnt82 9022 5859(.)m 0 5571(The)m 467(cross)s 1049(reference)s
+220 fnt35 2032 5568(@T)m 26(ab)k 4(le&&preceding)k 240 fnt82
+4116 5571(points)m 4792(to)s 5071(some)s 5671(table)s 6231(appearing)s
+7267(earlier)s 7975(in)s 8258(the)s 8646(\207nal)s 0 5283(printed)m
+760(document)s 1790(than)s 2285(itself;)s 2899(that)s 3343(is,)s
+3635(the)s 4009(arro)s 6(w)k 4640(is)s 4876(guaranteed)s
+6009(to)s 6274(point)s 6852(backw)s 2(ards)k 7950(through)s
+8778(the)s 0 4995(document.)m 1108(Usually)s 1907(it)s 2100(points)s
+2737(to)s 2977(the)s 3326(nearest)s 4063(preceding)s 5060(in)s 9(v)k 4(ocation.)k
+6222(Similarly)s 15(,)k 220 fnt35 7203 4992(@T)m 26(ab)k 4(le&&f)k 6(ollo)k 3(wing)k
+240 fnt82 0 4707(points)m 636(forw)s 2(ards,)k 1590(usually)s
+2335(to)s 2574(the)s 2922(nearest)s 3657(follo)s 6(wing)k
+4634(in)s 9(v)k 4(ocation.)k 220 fnt35 5795 4704(@T)m 26(ab)k 4(le&&f)k 6(oll_or_prec)k
+240 fnt82 8022 4707(is)m 8232(the)s 8579(same)s 0 4419(as)m
+220 fnt35 250 4416(@T)m 26(ab)k 4(le&&f)k 6(ollo)k 3(wing)k
+240 fnt82 2173 4419(if)m 2390(it)s 2582(e)s 3(xists,)k
+3230(otherwise)s 4215(it)s 4407(is)s 4617(the)s 4965(same)s
+5512(as)s 220 fnt35 5762 4416(@T)m 26(ab)k 4(le&&preceding)k
+240 fnt82 7746 4419(.)m 480 4045(This)m 962(section)s 1702(has)s
+2079(been)s 2594(concerned)s 3641(with)s 4130(what)s 4661(a)s
+4834(cross)s 5382(reference)s 6331(is)s 6548(\211)s 6734(an)s
+7023(arro)s 6(w)k 7635(from)s 8165(one)s 8574(point)s
+0 3757(in)m 242(a)s 407(document)s 1410(to)s 1648(another)s
+2424(\211)s 2603(b)s 4(ut)k 2963(not)s 3328(with)s
+3809(ho)s 6(w)k 4269(it)s 4460(is)s 4669(used.)s
+5271(One)s 5724(simple)s 6416(w)s 2(ay)k 6866(to)s
+7104(use)s 7478(a)s 7643(cross)s 8183(reference)s 0 3469(is)m
+210(to)s 449(put)s 815(it)s 1007(where)s 1647(an)s
+1930(object)s 2574(is)s 2784(e)s 3(xpected,)k 3738(lik)s 2(e)k
+4150(this:)s 220 fnt35 480 2968(a  |  @T)m 26(ab)k 4(le&&cities  |  c)k
+240 fnt82 0 2513(In)m 265(this)s 670(case)s 1146(the)s
+1504(cross)s 2055(reference)s 3007(will)s 3443(be)s 3734(replaced)s
+4610(by)s 4914(a)s 5089(cop)s 2(y)k 5616(of)s
+5897(the)s 6254(in)s 9(v)k 4(ocation)k 7317(it)s
+7519(points)s 8164(to:)s 8525(in)s 8778(the)s 0 2225(e)m 3(xample)k
+866(just)s 1275(gi)s 6(v)k 3(en,)k 1909(a)s
+2079(table)s 2603(will)s 3033(appear)s 3734(between)s 220 fnt35
+4591 2222(a)m 240 fnt82 4772 2225(and)m 220 fnt35 5180 2222(c.)m
+240 fnt82 5456 2225(Other)m 6064(applications)s 7274(of)s 7549(cross)s
+8095(references)s 0 1937(may)m 466(be)s 747(found)s 1364(in)s
+1606(Chapter)s 2423(4,)s 2649(including)s 3606(\207nding)s 4337(the)s
+4685(number)s 5475(of)s 5746(the)s 6093(page)s 6601(where)s
+7240(something)s 8289(appears,)s 0 1649(producing)m 1018(running)s 1809(page)s
+2311(headers)s 3085(and)s 3483(footers,)s 4246(and)s 4643(accessing)s
+5606(databases)s 6566(of)s 6831(Roman)s 7573(numerals,)s 8549(refer)s
+8998(-)s 0 1361(ences,)m 638(etc.)s 1080(Cross)s 1676(references)s
+2707(are)s 3054(also)s 3492(used)s 3989(by)s 4283(g)s 1(alle)k 3(ys,)k
+5063(as)s 5313(will)s 5739(be)s 6021(e)s 3(xplained)k
+7006(in)s 7249(the)s 7597(ne)s 3(xt)k 8066(section.)s
+480 987(The)m 943(implementation)s 2535(of)s 2841(cross)s 3418(referencing)s
+4593(copies)s 5290(e)s 6(v)k 3(ery)k 5901(symbol)s
+6696(in)s 9(v)k 4(ocation)k 7785(with)s 8302(a)s
+220 fnt35 8503 984(@T)m 26(ag)k 240 fnt82 0 699(parameter)m
+1008(into)s 1427(the)s 240 fnt83 1768 701(cr)m 10(oss-r)k 8(efer)k 8(ence)k
+3275(database)s 240 fnt82 4133 699(,)m 4233(a)s 4393(collection)s
+5385(of)s 5650(\207les)s 6093(whose)s 6754(names)s 7410(end)s
+7807(in)s 220 fnt35 8044 696(.ld)m 240 fnt82 8316 699(inde)m 3(x)k 3(ed)k
+0 411(by)m 286(one)s 679(\207le)s 1032(whose)s 1691(name)s
+2256(is)s 220 fnt35 2458 408(lout.li)m 240 fnt82 2954 411(.)m
+3109(It)s 3306(is)s 3507(generally)s 4441(the)s 4781(case)s
+5239(that)s 5649(the)s 5988(b)s 4(ulk)k 6462(content)s
+7218(of)s 7480(a)s 7638(symbol)s 8389(such)s 8876(as)s
+0 123(the)m 337(table)s 845(abo)s 3(v)k 3(e)k
+1455(is)s 1653(contained)s 2629(in)s 2860(its)s 3124(right)s
+3623(or)s 3870(body)s 4393(parameter)s 9(,)k 5433(and)s
+5825(that)s 6231(this)s 6615(b)s 4(ulk)k 7086(content)s
+7838(is)s 8036(not)s 8390(needed)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 9 15
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13845(1.3.)m 454(Cr)s 10(oss)k 1058(r)s 8(efer)k 8(ences)k
+240 fnt84 8952 13842(9)m 240 fnt82 0 13207(by)m 297(cross)s
+843(references)s 1878(to)s 2121(the)s 2472(symbol.)s 3345(Hence,)s
+4067(to)s 4310(sa)s 4(v)k 3(e)k 4787(space)s
+5378(in)s 5625(the)s 5977(database,)s 6910(Lout)s 7426(replaces)s
+8263(the)s 8615(right)s 0 12919(parameter)m 1011(of)s 1279(each)s
+1771(symbol)s 2527(it)s 2716(writes)s 3347(into)s 3768(it)s
+3957(by)s 4248(the)s 4592(w)s 2(ord)k 5137(???)s
+5505(whene)s 6(v)k 3(er)k 6482(the)s 6827(right)s
+7335(parameter)s 8345(appears)s 0 12631(to)m 249(be)s 542(lar)s 4(ge.)k
+1190(The)s 1629(table)s 2160(abo)s 3(v)k 3(e)k
+2792(w)s 2(ould)k 3458(appear)s 4166(as)s 4427(???)s
+4809(because)s 5632(of)s 5914(this)s 6321(optimization,)s 7647(and)s
+8062(in)s 8316(general,)s 0 12343(the)m 367(user)s 845(must)s
+1390(ensure)s 2089(that)s 2527(an)s 3(y)k 2944(content)s
+3728(required)s 4601(by)s 4915(cross)s 5477(references)s 6527(is)s
+6757(contained)s 7765(in)s 8028(parameters)s 0 12055(other)m 545(than)s
+1007(the)s 1348(right)s 1852(or)s 2104(body)s 2631(parameter)s 13(.)k
+3729(This)s 4199(optimization)s 5457(does)s 5940(not)s 6299(apply)s
+6878(when)s 7447(the)s 7788(symbol)s 8541(being)s 0 11767(written)m
+733(into)s 1158(the)s 1506(cross-reference)s 3019(database)s 3898(is)s
+4108(a)s 4274(g)s 1(alle)k 3(y)k 15(.)k
+240 fnt84 0 10974(1.4.)m 471(Galleys)s 240 fnt82 480 10497(It)m
+695(is)s 915(time)s 1406(to)s 1655(pause)s 2267(and)s
+2681(ask)s 3072(ourselv)s 3(es)k 4033(ho)s 6(w)k
+4505(close)s 5062(we)s 5408(are)s 5765(to)s 6015(achie)s 6(ving)k
+7002(our)s 7392(aim)s 7820(of)s 8102(producing)s 0 10209(neatly)m
+638(formatted)s 1624(documents.)s 2825(W)s 19(e)k 3194(can)s
+3583(certainly)s 4472(produce)s 5299(the)s 5647(pieces)s 6295(of)s
+6566(a)s 6732(document:)s 160 fnt84 870 9532(PURCELL)m 128 fnt82
+1626 9604(1)m 160 fnt82 480 9240(In)m 705(the)s 991(w)s 1(orld)k
+1455(of)s 1691(music)s 480 9060(England)m 1192(is)s 1473(supposed)s
+480 8880(to)m 686(be)s 921(a)s 1078(mere)s 1481(pro)s 2(vince.)k
+480 8700(If)m 775(she)s 1166(produces)s 1918(an)s 480 8520(indif)m 4(ferent)k
+1446(composer)s 480 8340(or)m 763(performer)s 6(,)k 1577(that)s
+1967(is)s 480 8160(re)m 2(garded)k 1172(else)s 4(where)k
+1940(as)s 480 7980(perfectly)m 1215(normal)s 1837(and)s 480 7800(natural;)m
+1072(b)s 3(ut)k 1388(if)s 1608(foreign)s 480 7620(students)m
+1215(of)s 1574(musical)s 480 7440(history)m 1286(ha)s 3(v)k 2(e)k
+1947(to)s 480 7260(ackno)m 4(wledge)k 1440(a)s 1636(British)s
+480 7080(musical)m 1105(genius,)s 1686(he)s 1967(is)s 480 6900(considered)m
+1211(a)s 1322(freak.)s 800 6667(Such)m 1267(a)s 1488(freak)s
+1967(is)s 480 6487(Henry)m 917(Purcell.)s 1480(Y)s 16(et)k
+1736(if)s 1884(we)s 480 6307(mak)m 1(e)k 875(a)s
+1000(choice)s 1467(of)s 1662(\207fteen)s 480 6127(of)m 717(the)s
+1005(w)s 1(orld')k 8(s)k 1574(musical)s 480 5947(classics,)m
+1050(as)s 1228(here,)s 1586(we)s 1820(\207nd)s 480 5767(that)m
+774(we)s 1013(cannot)s 1495(omit)s 1843(this)s 480 5587(English)m
+1005(master)s 8(.)k 128 fnt82 2634 9784(1)m 160 fnt82
+2685 9712(Blom,)m 3107(Eric.)s 160 fnt83 3476 9713(Some)m 3852(Gr)s 5(eat)k
+2634 9533(Composer)m 1(s.)k 160 fnt82 3728 9532(Oxford,)m 2634 9352(1944.)m
+gsave
+4788 7375 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k 170 173(@F)m 4(ootSect)k
+
+grestore
+gsave
+4788 4881 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k 170 173(@F)m 4(ootSect)k
+
+grestore
+gsave
+4788 2387 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k 170 173(@F)m 4(ootSect)k
+
+grestore
+160 fnt35 4788 2157(@P)m 6(ageList)k 240 fnt82 0 1671(b)m 4(ut)k
+362(when)s 938(we)s 1273(try)s 1592(to)s 1831(mer)s 4(ge)k
+2480(them)s 3018(together)s 9(,)k 3899(we)s 4234(encounter)s
+5237(tw)s 2(o)k 5647(obstacles.)s 480 1297(First,)m 1029(when)s
+1610(an)s 1899(object)s 2548(is)s 2763(entered)s 3530(at)s
+3767(a)s 3938(certain)s 4650(place)s 5215(in)s 5463(the)s
+5817(document,)s 6873(it)s 7070(appears)s 7857(at)s 8094(that)s
+8518(place.)s 0 1009(But)m 393(a)s 546(footnote)s 1385(is)s
+1582(naturally)s 2472(entered)s 3219(immediately)s 4454(after)s 4936(the)s
+5271(point)s 5810(it)s 5988(refers)s 6568(to)s 6794(\(`)s
+200 fnt82 6934 1018(PURCELL)m 240 fnt82 7819 1009(')m 7917(in)s
+8147(this)s 8529(case\),)s 0 721(yet)m 352(it)s 544(appears)s
+1325(some)s 6(where)k 2464(else:)s 2941(at)s 3173(the)s
+3521(bottom)s 4259(of)s 4530(a)s 4696(page.)s 480 347(Second,)m
+1285(all)s 1570(our)s 1942(features)s 2740(b)s 4(uild)k
+3278(up)s 3564(lar)s 4(ger)k 4168(objects)s 4889(out)s
+5247(of)s 5510(smaller)s 6265(ones,)s 6803(b)s 4(ut)k
+7158(the)s 200 fnt82 7498 356(PURCELL)m 240 fnt82 8435 347(object,)m
+0 59(for)m 333(e)s 3(xample,)k 1242(must)s 1762(be)s
+2039(brok)s 2(en)k 2753(do)s 6(wn)k 3332(into)s
+3752(page-sized)s 4827(pieces.)s 5583(This)s 6053(occurs)s 6723(when)s
+7294(the)s 7637(a)s 4(v)k 6(ailable)k 8539(space)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 10 16
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(10)m 240 fnt83 6965 13843(Chapter)m 7815(1.)s
+8089(Principles)s 240 fnt82 0 13205(at)m 230(the)s 575(`some)s 6(where)k
+1790(else')s 2270(is)s 2477(insuf\207cient)s 3610(to)s 3846(hold)s
+4327(the)s 4672(entire)s 5268(object,)s 5957(so)s 6220(this)s
+6613(second)s 7333(obstacle)s 8169(arises)s 8760(out)s 0 12917(of)m
+271(the)s 619(\207rst.)s 480 12543(Lout')m 13(s)k 1135(last)s
+1518(major)s 2127(feature,)s 2888(which)s 3523(we)s 3850(introduce)s
+4801(to)s 5032(o)s 3(v)k 3(ercome)k 6017(these)s
+6557(obstacles,)s 7532(is)s 7734(the)s 240 fnt83 8074 12545(galle)m 7(y)k
+240 fnt82 8699 12543(\(the)m 0 12255(name)m 564(is)s 764(borro)s 6(wed)k
+1723(from)s 2237(the)s 2575(g)s 1(alle)k 3(ys)k
+3288(used)s 3775(in)s 4008(manual)s 4757(typesetting\).)s 6039(A)s
+6259(g)s 1(alle)k 3(y)k 6882(is)s 7082(an)s
+7355(object)s 7989(plus)s 8429(a)s 8584(cross)s 0 11967(reference)m
+943(which)s 1585(points)s 2221(to)s 2460(where)s 3100(the)s
+3448(object)s 4092(is)s 4302(to)s 4541(appear)s 13(.)k
+5329(The)s 5757(e)s 3(xample)k 6620(abo)s 3(v)k 3(e)k
+7242(has)s 7612(three)s 8145(g)s 1(alle)k 3(ys:)k
+160 fnt84 870 11234(PURCELL)m 128 fnt82 1626 11306(1)m 160 fnt82
+480 10942(In)m 705(the)s 991(w)s 1(orld)k 1455(of)s
+1691(music)s 480 10762(England)m 1192(is)s 1473(supposed)s 480 10582(to)m
+686(be)s 921(a)s 1078(mere)s 1481(pro)s 2(vince.)k
+480 10402(If)m 775(she)s 1166(produces)s 1918(an)s 480 10222(indif)m 4(ferent)k
+1446(composer)s 480 10042(or)m 763(performer)s 6(,)k 1577(that)s
+1967(is)s 480 9862(re)m 2(garded)k 1172(else)s 4(where)k
+1940(as)s 480 9682(perfectly)m 1215(normal)s 1837(and)s 480 9502(natural;)m
+1072(b)s 3(ut)k 1388(if)s 1608(foreign)s 480 9322(students)m
+1215(of)s 1574(musical)s 480 9142(history)m 1286(ha)s 3(v)k 2(e)k
+1947(to)s 480 8962(ackno)m 4(wledge)k 1440(a)s 1636(British)s
+480 8782(musical)m 1105(genius,)s 1686(he)s 1967(is)s 480 8602(considered)m
+1211(a)s 1322(freak.)s 800 8369(Such)m 1267(a)s 1488(freak)s
+1967(is)s 480 8189(Henry)m 917(Purcell.)s 1480(Y)s 16(et)k
+1736(if)s 1884(we)s 480 8009(mak)m 1(e)k 875(a)s
+1000(choice)s 1467(of)s 1662(\207fteen)s 480 7829(of)m 717(the)s
+1005(w)s 1(orld')k 8(s)k 1574(musical)s 480 7649(classics,)m
+1050(as)s 1228(here,)s 1586(we)s 1820(\207nd)s 480 7469(that)m
+774(we)s 1013(cannot)s 1495(omit)s 1843(this)s 480 7289(English)m
+1005(master)s 8(.)k gsave
+3321 11312 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+240 fnt82 1134 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+3201 9047 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k
+170 173(@F)m 4(ootSect)k 
+grestore
+gsave
+3201 6553 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k
+170 173(@F)m 4(ootSect)k 
+grestore
+gsave
+3201 4059 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35 170 2207(@T)m 19(e)k 4(xtPlace)k
+170 173(@F)m 4(ootSect)k 
+grestore
+160 fnt35 3201 3829(@P)m 6(ageList)k
+gsave
+6688 11541 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+240 fnt82 1440 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+200 fnt83 6748 11497(to)m 6947(printer)s gsave
+4335 9295 translate
+30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+4335 9295 translate
+240 fnt82 963 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+4335 9295 translate
+-30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+128 fnt82 5418 9331(1)m
+160 fnt82 5469 9259(Blom,)m 5891(Eric.)s 160 fnt83 6260 9260(Some)m
+6636(Gr)s 5(eat)k 5418 9080(Composer)m 1(s.)k 160 fnt82
+6512 9079(Oxford,)m 5418 8899(1944.)m 240 fnt82 0 3343(A)m 229(g)s 1(alle)k 3(y)k
+861(replaces)s 1693(the)s 2039(in)s 9(v)k 4(ocation)k
+3091(pointed)s 3866(to)s 4103(by)s 4395(its)s 4670(cross)s
+5210(reference.)s 6260(If)s 6488(space)s 7073(is)s 7282(not)s
+7646(suf\207cient)s 8593(there)s 0 3055(to)m 232(hold)s 708(it)s
+892(all,)s 1230(the)s 1570(remainder)s 2590(of)s 2854(the)s
+3194(g)s 1(alle)k 3(y)k 3820(is)s 4023(split)s
+4486(of)s 6(f)k 4822(\(the)s 5242(v)s 3(ertical)k
+6001(concatenation)s 7378(symbol)s 8130(preceding)s 0 2767(it)m 199(being)s
+791(discarded\))s 1842(and)s 2253(it)s 2452(replaces)s 3293(later)s
+3783(in)s 9(v)k 4(ocations)k 4931(of)s 5209(the)s
+5564(same)s 6119(symbol.)s 6935(This)s 7418(is)s 7635(e)s 3(xactly)k
+8383(what)s 8916(is)s 0 2479(required)m 854(to)s 1093(get)s
+1445(te)s 3(xt)k 1860(and)s 2264(footnotes)s 3205(onto)s
+3684(pages.)s 480 2105(T)m 19(o)k 780(create)s 1405(a)s
+1571(g)s 1(alle)k 3(y)k 15(,)k 2243(\207rst)s
+2674(de\207ne)s 3315(a)s 3481(symbol)s 4241(with)s 4723(a)s
+4889(special)s 220 fnt35 5607 2102(into)m 240 fnt82 6013 2105(clause,)m
+6717(lik)s 2(e)k 7129(this:)s 220 fnt35 480 1604(def @F)m 6(ootNote into { @F)k 6(ootPlace&&f)k 6(ollo)k 3(wing })k
+480 1316(   r)m -3(ight x)k 480 1028({)m 480 740(   8p @F)m 6(ont x)k
+480 452(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 11 17
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(1.4.)m 454(Galle)s 7(ys)k 240 fnt84
+8839 13840(11)m 240 fnt82 0 13205(An)m 343(in)s 9(v)k 4(ocation)k
+1390(of)s 1654(such)s 2142(a)s 2301(symbol)s 3054(will)s
+3473(then)s 3934(be)s 4209(a)s 4368(g)s 1(alle)k 3(y)k
+4994(whose)s 5655(object)s 6292(is)s 6495(the)s 6835(result)s
+7418(of)s 7682(the)s 8022(in)s 9(v)k 4(ocation,)k
+0 12917(and)m 399(whose)s 1062(cross)s 1598(reference)s 2536(is)s
+2740(gi)s 6(v)k 3(en)k 3315(by)s 3603(the)s
+220 fnt35 3946 12914(into)m 240 fnt82 4347 12917(clause.)m 5102(The)s
+5525(right)s 6030(parameter)s 7039(of)s 7304(the)s 7647(cross)s
+8183(reference)s 0 12629(must)m 525(be)s 807(one)s 1209(of)s
+220 fnt35 1480 12626(preceding)m 240 fnt82 2431 12629(,)m 220 fnt35
+2538 12626(f)m 6(ollo)k 3(wing)k 240 fnt82 3368 12629(,)m
+3475(and)s 220 fnt35 3879 12626(f)m 6(oll_or_prec)k 240 fnt82
+5013 12629(.)m 480 12255(A)m 700(symbol,)s 1502(lik)s 2(e)k
+220 fnt35 1903 12252(@F)m 6(ootPlace)k 3(,)k 240 fnt82
+3196 12255(which)m 3827(is)s 4027(the)s 240 fnt83 4364 12257(tar)m 8(g)k 2(et)k
+240 fnt82 4979 12255(of)m 5239(a)s 5395(g)s 1(alle)k 3(y)k 15(,)k
+6056(must)s 6571(contain)s 7321(the)s 7659(special)s 8366(symbol)s
+220 fnt35 0 11964(@Galle)m 4(y)k 240 fnt82 898 11967(e)m 3(xactly)k
+1639(once)s 2147(in)s 2390(its)s 2666(body;)s 3258(often)s
+3806(this)s 4202(is)s 4412(all)s 4705(that)s 5123(the)s
+5471(body)s 6005(contains:)s 220 fnt35 480 11466(def  @F)m 6(ootPlace  {  @Galle)k 4(y  })k
+240 fnt82 0 10968(It)m 229(is)s 464(this)s 885(special)s
+1628(symbol)s 2412(that)s 2855(is)s 3090(replaced)s 3982(by)s
+4300(the)s 4673(incoming)s 5655(g)s 1(alle)k 3(y)k 15(,)k
+6352(in)s 6619(f)s 2(act,)k 7106(not)s 7497(the)s
+220 fnt35 7870 10965(@F)m 6(ootPlace)k 240 fnt82 0 10680(symbol)m
+760(as)s 1010(a)s 1176(whole.)s 480 10306(A)m 718(symbol)s
+1487(which)s 2138(contains)s 220 fnt35 2994 10303(@Galle)m 4(y)k
+240 fnt82 3832 10306(,)m 3948(either)s 4560(directly)s 5351(within)s
+6028(its)s 6313(body)s 6855(or)s 7123(indirectly)s 8101(within)s
+8778(the)s 0 10018(body)m 533(of)s 802(a)s 966(symbol)s
+1725(it)s 1915(in)s 9(v)k 4(ok)k 2(es,)k
+2750(is)s 2959(called)s 3585(a)s 240 fnt83 3749 10020(r)m 8(eceptive)k
+240 fnt82 4668 10018(symbol,)m 5478(meaning)s 6353(recepti)s 6(v)k 3(e)k
+7274(to)s 7511(g)s 1(alle)k 3(ys.)k 220 fnt35
+8346 10015(@F)m 6(oot)k 240 fnt82 8998 10018(-)m 220 fnt35
+0 9727(Place)m 240 fnt82 630 9730(is)m 870(recepti)s 6(v)k 3(e,)k
+1873(which)s 2545(mak)s 2(es)k 220 fnt35 3235 9727(@F)m 6(ootList,)k
+4364(@F)s 6(ootSect)k 240 fnt82 5545 9730(and)m 220 fnt35
+5979 9727(@P)m 8(ageList)k 240 fnt82 7133 9730(recepti)m 6(v)k 3(e)k
+8085(since)s 8663(the)s 3(y)k 0 9442(in)m 9(v)k 4(ok)k 2(e)k
+220 fnt35 704 9439(@F)m 6(ootPlace)k 3(.)k 240 fnt82
+2078 9442(If)m 2319(no)s 2623(g)s 1(alle)k 3(y)k
+3268(replaces)s 4112(an)s 3(y)k 220 fnt35 4520 9439(@Galle)m 4(y)k
+240 fnt82 5429 9442(within)m 6108(some)s 6680(in)s 9(v)k 4(ocation)k
+7745(of)s 8027(a)s 8204(recepti)s 6(v)k 3(e)k
+0 9154(symbol,)m 816(that)s 1239(in)s 9(v)k 4(ocation)k
+2297(is)s 2512(replaced)s 3383(by)s 220 fnt35 3682 9151(@Null)m
+240 fnt82 4267 9154(.)m 4435(The)s 4868(adv)s 6(antages)k
+5980(of)s 6256(this)s 6656(rule)s 7088(for)s 7430(page)s
+7943(layout)s 8606(were)s 0 8866(e)m 3(xplained)k 985(at)s
+1217(the)s 1565(end)s 1969(of)s 2240(Section)s 3014(1.2.)s
+480 8492(Let)m 852(us)s 1109(no)s 6(w)k 1563(follo)s 6(w)k
+2228(through)s 3023(the)s 3364(construction)s 4596(of)s 4861(our)s
+5233(e)s 3(xample)k 6089(document.)s 7190(Initially)s 7992(there)s
+8518(is)s 8721(just)s 0 8204(the)m 348(one)s 240 fnt83
+750 8206(r)m 10(oot)k 240 fnt82 1203 8204(g)m 1(alle)k 3(y)k 15(,)k
+1875(containing)s 2938(an)s 3221(une)s 3(xpanded)k 4434(in)s 9(v)k 4(ocation)k
+5488(of)s 220 fnt35 5759 8201(@P)m 8(ageList:)k 180 fnt35
+3315 7732(@P)m 7(ageList)k gsave
+5746 7778 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+240 fnt82 1440 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+200 fnt83 5806 7734(to)m 6005(printer)s
+240 fnt82 0 7241(Then)m 602(the)s 200 fnt82 1004 7250(PURCELL)m
+240 fnt82 2002 7241(g)m 1(alle)k 3(y)k 2690(appears,)s
+3580(tar)s 4(geted)k 4457(to)s 4750(a)s 220 fnt35
+4969 7238(@T)m 26(e)k 6(xtPlace)k 3(.)k 240 fnt82
+6348 7241(Lout)m 6913(kno)s 6(ws)k 7638(that)s 8109(there)s
+8696(is)s 8960(a)s 220 fnt35 0 6950(@T)m 26(e)k 6(xtPlace)k
+240 fnt82 1218 6953(hidden)m 1927(inside)s 220 fnt35 2554 6950(@P)m 8(ageList,)k
+240 fnt82 3724 6953(so)m 3990(it)s 4182(e)s 3(xpands)k
+220 fnt35 5015 6950(@P)m 8(ageList:)k 160 fnt84 870 6220(PURCELL)m
+128 fnt82 1626 6292(1)m 160 fnt82 480 5928(In)m 705(the)s
+991(w)s 1(orld)k 1455(of)s 1691(music)s 480 5748(England)m
+1192(is)s 1473(supposed)s 480 5568(to)m 686(be)s 921(a)s
+1078(mere)s 1481(pro)s 2(vince.)k 480 5388(If)m 775(she)s
+1166(produces)s 1918(an)s 480 5208(indif)m 4(ferent)k 1446(composer)s
+480 5028(or)m 763(performer)s 6(,)k 1577(that)s 1967(is)s
+480 4848(re)m 2(garded)k 1172(else)s 4(where)k 1940(as)s
+480 4668(perfectly)m 1215(normal)s 1837(and)s 480 4488(natural;)m 1072(b)s 3(ut)k
+1388(if)s 1608(foreign)s 480 4308(students)m 1215(of)s 1574(musical)s
+480 4128(history)m 1286(ha)s 3(v)k 2(e)k 1947(to)s
+480 3948(ackno)m 4(wledge)k 1440(a)s 1636(British)s 480 3768(musical)m
+1105(genius,)s 1686(he)s 1967(is)s 480 3588(considered)m 1211(a)s
+1322(freak.)s 800 3355(Such)m 1267(a)s 1488(freak)s 1967(is)s
+480 3175(Henry)m 917(Purcell.)s 1480(Y)s 16(et)k 1736(if)s
+1884(we)s 480 2995(mak)m 1(e)k 875(a)s 1000(choice)s
+1467(of)s 1662(\207fteen)s 480 2815(of)m 717(the)s 1005(w)s 1(orld')k 8(s)k
+1574(musical)s 480 2635(classics,)m 1050(as)s 1228(here,)s 1586(we)s
+1820(\207nd)s 480 2455(that)m 774(we)s 1013(cannot)s 1495(omit)s
+1843(this)s 480 2275(English)m 1005(master)s 8(.)k gsave
+3434 6298 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+240 fnt82 1247 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+3315 4033 translate
+220 fnt35 1927 2494 0 2494 220 288 61 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt35
+170 2207(@T)m 19(e)k 4(xtPlace)k 170 173(@F)m 4(ootSect)k
+
+grestore
+160 fnt35 3315 3803(@P)m 6(ageList)k gsave
+6802 6527 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+240 fnt82 1440 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+200 fnt83 6862 6483(to)m
+7061(printer)s 240 fnt82 0 1790(After)m 586(promoting)s 1659(the)s
+2030(\207rst)s 2484(line)s 2922(into)s 220 fnt35 3370 1787(@T)m 26(e)k 6(xtPlace)k 3(,)k
+240 fnt82 4658 1790(the)m 5029(footnote)s 5905(g)s 1(alle)k 3(y)k
+6563(attached)s 7440(to)s 7702(it)s 7917(appears)s 8722(and)s
+0 1502(demands)m 938(an)s 1257(in)s 9(v)k 4(ocation)k
+2347(of)s 220 fnt35 2654 1499(@F)m 6(ootPlace)k 240 fnt82
+3946 1502(follo)m 6(wing)k 4960(its)s 5272(attachment)s 6416(point)s
+7004(\(`)s 200 fnt82 7144 1511(PURCELL)m 240 fnt82 8029 1502('\).)m
+8387(Such)s 8960(a)s 220 fnt35 0 1211(@F)m 6(ootPlace)k
+240 fnt82 1274 1214(is)m 1502(found)s 2138(at)s 2388(the)s
+2754(bottom)s 3511(of)s 3800(the)s 4166(\207rst)s 4616(page,)s
+5193(inside)s 220 fnt35 5838 1211(@F)m 6(ootSect,)k 240 fnt82
+7054 1214(which)m 7714(is)s 7943(accordingly)s 0 926(e)m 3(xpanded,)k
+1022(and)s 1426(the)s 1774(footnote)s 2627(is)s 2837(promoted)s
+3812(onto)s 4291(the)s 4639(page:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 12 18
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(12)m 240 fnt83 6965 13843(Chapter)m 7815(1.)s
+8089(Principles)s 160 fnt82 480 12579(In)m 705(the)s 991(w)s 1(orld)k
+1455(of)s 1691(music)s 480 12399(England)m 1192(is)s 1473(supposed)s
+480 12219(to)m 686(be)s 921(a)s 1078(mere)s 1481(pro)s 2(vince.)k
+480 12039(If)m 775(she)s 1166(produces)s 1918(an)s 480 11859(indif)m 4(ferent)k
+1446(composer)s 480 11679(or)m 763(performer)s 6(,)k 1577(that)s
+1967(is)s 480 11499(re)m 2(garded)k 1172(else)s 4(where)k
+1940(as)s 480 11319(perfectly)m 1215(normal)s 1837(and)s 480 11139(natural;)m
+1072(b)s 3(ut)k 1388(if)s 1608(foreign)s 480 10959(students)m
+1215(of)s 1574(musical)s 480 10779(history)m 1286(ha)s 3(v)k 2(e)k
+1947(to)s 480 10599(ackno)m 4(wledge)k 1440(a)s 1636(British)s
+480 10419(musical)m 1105(genius,)s 1686(he)s 1967(is)s 480 10239(considered)m
+1211(a)s 1322(freak.)s 800 10006(Such)m 1267(a)s 1488(freak)s
+1967(is)s 480 9826(Henry)m 917(Purcell.)s 1480(Y)s 16(et)k
+1736(if)s 1884(we)s 480 9646(mak)m 1(e)k 875(a)s
+1000(choice)s 1467(of)s 1662(\207fteen)s 480 9466(of)m 717(the)s
+1005(w)s 1(orld')k 8(s)k 1574(musical)s 480 9286(classics,)m
+1050(as)s 1228(here,)s 1586(we)s 1820(\207nd)s 480 9106(that)m
+774(we)s 1013(cannot)s 1495(omit)s 1843(this)s 480 8926(English)m
+1005(master)s 8(.)k gsave
+3434 12615 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+240 fnt82 1247 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+3315 10788 translate
+240 fnt82 1927 2494 0 2494 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt84 560 1987(PURCELL)m 128 fnt82
+1316 2059(1)m 140 fnt35 170 1807(@T)m 16(e)k 4(xtPlace)k
+gsave
+170 924 translate
+160 fnt82 567 0 0 0 160 180 40 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+128 fnt82 170 785(1)m 160 fnt82 221 713(Blom,)m 703(Eric.)s
+160 fnt83 1133 714(Some)m 170 534(Gr)m 5(eat)k 734(Composer)s 1(s.)k
+160 fnt82 170 353(Oxford,)m 703(1944.)s 140 fnt35 170 173(@F)m 4(ootList)k
+
+grestore
+140 fnt35 3315 10573(@P)m 5(ageList)k gsave
+6802 13282 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+240 fnt82 1440 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+200 fnt83 6862 13238(to)m
+7061(printer)s 240 fnt82 0 8441(No)m 6(w)k 512(the)s
+858(promotion)s 1910(of)s 2179(the)s 200 fnt82 2525 8450(PURCELL)m
+240 fnt82 3468 8441(g)m 1(alle)k 3(y)k 4100(resumes.)s
+5045(When)s 5672(the)s 6018(\207rst)s 6447(page)s 6953(is)s
+7161(\207lled,)s 7757(Lout)s 8266(searches)s 0 8153(forw)m 2(ards)k
+898(for)s 1236(another)s 220 fnt35 2013 8150(@T)m 26(e)k 6(xtPlace)k
+240 fnt82 3231 8153(to)m 3470(recei)s 6(v)k 3(e)k
+4206(the)s 4554(remainder)s 9(,)k 5620(once)s 6128(ag)s 1(ain)k
+6702(e)s 3(xpanding)k 7750(a)s 220 fnt35 7916 8150(@P)m 8(ageList:)k
+160 fnt82 480 4955(performer)m 6(,)k 1436(that)s 1967(is)s
+480 4775(re)m 2(garded)k 1172(else)s 4(where)k 1940(as)s
+480 4595(perfectly)m 1215(normal)s 1837(and)s 480 4415(natural;)m 1072(b)s 3(ut)k
+1388(if)s 1608(foreign)s 480 4235(students)m 1215(of)s 1574(musical)s
+480 4055(history)m 1286(ha)s 3(v)k 2(e)k 1947(to)s
+480 3875(ackno)m 4(wledge)k 1440(a)s 1636(British)s 480 3695(musical)m
+1105(genius,)s 1686(he)s 1967(is)s 480 3515(considered)m 1211(a)s
+1322(freak.)s 800 3282(Such)m 1267(a)s 1488(freak)s 1967(is)s
+480 3102(Henry)m 917(Purcell.)s 1480(Y)s 16(et)k 1736(if)s
+1884(we)s 480 2922(mak)m 1(e)k 875(a)s 1000(choice)s
+1467(of)s 1662(\207fteen)s 480 2742(of)m 717(the)s 1005(w)s 1(orld')k 8(s)k
+1574(musical)s 480 2562(classics,)m 1050(as)s 1228(here,)s 1586(we)s
+1820(\207nd)s 480 2382(that)m 774(we)s 1013(cannot)s 1495(omit)s
+1843(this)s 480 2202(English)m 1005(master)s 8(.)k gsave
+3434 4991 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+240 fnt82 1247 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+3315 5233 translate
+240 fnt82 1927 2494 0 2494 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+160 fnt84
+560 1987(PURCELL)m 128 fnt82 1316 2059(1)m 160 fnt82 170 1695(In)m
+341(the)s 573(w)s 1(orld)k 983(of)s 1164(music)s
+170 1515(England)m 741(is)s 881(supposed)s 1515(to)s 170 1335(be)m
+358(a)s 469(mere)s 825(pro)s 2(vince.)k 1491(If)s
+170 1155(she)m 708(produces)s 1608(an)s 170 975(indif)m 4(ferent)k
+879(composer)s 1540(or)s 567 0 0 0 160 180 40 170 763 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+128 fnt82 170 624(1)m 160 fnt82
+221 552(Blom,)m 703(Eric.)s 160 fnt83 1133 553(Some)m 170 373(Gr)m 5(eat)k
+734(Composer)s 1(s.)k 160 fnt82 170 192(Oxford,)m 703(1944.)s
+
+grestore
+gsave
+3315 2739 translate
+240 fnt82 1927 2494 0 2494 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto xsize ysize lineto
+0 ysize lineto closepath stroke
+grestore
+140 fnt35 170 2222(@T)m 16(e)k 4(xtPlace)k 170 173(@F)m 4(ootSect)k
+
+grestore
+140 fnt35 3315 2524(@P)m 5(ageList)k gsave
+6802 7727 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+240 fnt82 1440 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+240 fnt82 68 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+200 fnt83 6862 7683(to)m
+7061(printer)s 240 fnt82 0 1717(and)m 404(so)s 671(on.)s
+1076(All)s 1437(these)s 1985(e)s 3(xpansions)k 3098(and)s
+3503(replacements)s 4814(are)s 5162(done)s 5685(with)s 6168(total)s
+6648(inte)s 3(grity)k 15(.)k 7604(F)s 3(or)k
+7994(e)s 3(xample,)k 8909(if)s 0 1429(Lout)m 510(\207nds)s
+1024(after)s 1517(e)s 3(xpanding)k 220 fnt35 2563 1426(@F)m 6(ootSect)k
+240 fnt82 3711 1429(that)m 4126(the)s 4472(page)s 4977(is)s
+5184(too)s 5541(full)s 5924(to)s 6160(accept)s 6828(e)s 6(v)k 3(en)k
+7325(the)s 7670(\207rst)s 8099(line)s 8510(of)s 8778(the)s
+0 1141(footnote,)m 220 fnt35 915 1138(@F)m 6(ootSect)k 240 fnt82
+2077 1141(is)m 2298(reset)s 2819(to)s 3070(une)s 3(xpanded)k
+4294(and)s 4709(the)s 5068(search)s 5746(for)s 6096(a)s
+6273(tar)s 4(get)k 6883(for)s 7232(the)s 7591(footnote)s
+8456(mo)s 3(v)k 3(es)k 0 853(on.)m 396(And)s
+858(the)s 1197(cross)s 1730(reference)s 2664(direction,)s 220 fnt35
+3611 850(preceding)m 240 fnt82 4613 853(or)m 220 fnt35 4864 850(f)m 6(ollo)k 3(wing,)k
+240 fnt82 5799 853(is)m 6000(al)s 2(w)k 2(ays)k
+6702(obe)s 3(yed)k 7440(\(although)s 8405(lack)s 8855(of)s
+0 565(space)m 586(sometimes)s 1658(pre)s 6(v)k 3(ents)k
+2509(Lout)s 3020(from)s 3543(choosing)s 4460(the)s 4807(nearest)s
+5542(tar)s 4(get\).)k 6323(Only)s 6855(the)s 7202(root)s
+7646(g)s 1(alle)k 3(y)k 8278(contains)s 0 277(recepti)m 6(v)k 3(e)k
+922(symbols)s 1771(in)s 2014(our)s 2393(running)s 3191(e)s 3(xample,)k
+4105(b)s 4(ut)k 4467(an)s 3(y)k 4864(g)s 1(alle)k 3(y)k
+5498(may)s 5964(contain)s 6725(them.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 13 19
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+480 fnt84 0 12955(Chapter)m 1819(2.)s 2400(Details)s 240 fnt84
+0 11690(2.1.)m 471(Lexical)s 1270(structur)s 4(e)k 2263(\(w)s 2(ords,)k
+3079(spaces,)s 3844(symbols\))s 4796(and)s 5237(macr)s 4(os)k
+240 fnt82 480 11213(The)m 902(input)s 1447(to)s 1679(Lout)s
+2184(consists)s 2985(of)s 3249(a)s 3408(sequence)s 4334(of)s
+240 fnt83 4598 11215(te)m 4(xtual)k 5297(units)s 240 fnt82
+5757 11213(,)m 5857(which)s 6492(may)s 6951(be)s 7226(either)s
+240 fnt83 7822 11215(white)m 8386(spaces)s 240 fnt82 9019 11213(,)m
+240 fnt83 0 10927(identi\207er)m 2(s,)k 1047(delimiter)s 2(s,)k
+240 fnt82 2093 10925(or)m 240 fnt83 2352 10927(liter)m 3(al)k
+2992(wor)s 8(ds)k 240 fnt82 3565 10925(.)m 3729(Each)s
+4264(is)s 4474(a)s 4640(sequence)s 5573(of)s 240 fnt83
+5844 10927(c)m 3(har)k 3(acter)k 2(s)k 240 fnt82
+6914 10925(chosen)m 7636(from:)s 480 10387(letter)m 220 fnt35 1934 10384(@ab-zAB-Z_)m
+240 fnt82 480 10099(white)m 1067(space)s 240 fnt83 1934 10101(space)m
+2592(formfeed)s 3568(tab)s 3988(ne)s 3(wline)k 240 fnt82
+480 9811(quote)m 220 fnt35 1934 9808(")m 240 fnt82 480 9523(escape)m
+220 fnt35 1934 9520(\\)m 240 fnt82 480 9235(comment)m 220 fnt35
+1934 9232(#)m 240 fnt82 480 8947(other)m 220 fnt35 1934 8944(!$%&'\(\)*+,-./0123456789:;<=>?[]^`{|}~)m
+240 fnt82 0 8406(Notice)m 732(that)s 220 fnt35 1189 8403(@)m
+240 fnt82 1480 8406(and)m 220 fnt35 1923 8403(_)m 240 fnt82
+2144 8406(are)m 2531(classed)s 3318(as)s 3608(letters.)s 4393(Basser)s
+5129(Lout)s 5681(accepts)s 6474(the)s 6861(accented)s 7795(letters)s
+8467(of)s 8778(the)s 0 8118(ISO-LA)m 26(TIN-1)k 1421(character)s
+2388(set)s 2746(\(depending)s 3909(on)s 4238(ho)s 6(w)k
+4732(it)s 4957(is)s 5200(installed\),)s 6228(and)s 6664(these)s
+7244(are)s 7624(also)s 8095(classed)s 8876(as)s 0 7830(letters.)m
+756(The)s 1195(ten)s 1555(digits)s 2148(are)s 2505(classed)s
+3264(as)s 3525(`other')s 4218(characters,)s 5302(and)s 5717(in)s
+5971(f)s 2(act)k 6397(the)s 6755(`other')s 7448(class)s
+7974(contains)s 8833(all)s 0 7542(8-bit)m 511(characters)s 1529(\(e)s 3(xcept)k
+2289(octal)s 2808(0\))s 3056(not)s 3422(assigned)s 4304(to)s
+4543(pre)s 6(vious)k 5412(classes.)s 480 7168(A)m 240 fnt83
+698 7170(white)m 1256(space)s 240 fnt82 1841 7168(is)m 2038(a)s
+2191(sequence)s 3111(of)s 3369(one)s 3758(or)s 4005(more)s
+4539(white)s 5113(space)s 5687(characters.)s 6805(Lout)s 7304(treats)s
+7858(the)s 8193(formfeed)s 0 6880(character)m 931(e)s 3(xactly)k
+1668(lik)s 2(e)k 2076(the)s 2420(space)s 3003(character;)s
+3985(it)s 4173(is)s 4379(useful)s 5014(for)s 5348(getting)s
+6061(page)s 6565(breaks)s 7236(when)s 7808(printing)s 8614(Lout)s
+0 6592(source)m 680(code.)s 480 6218(A)m 240 fnt83 709 6220(delimiter)m
+240 fnt82 1635 6218(is)m 1844(a)s 2009(sequence)s 2941(of)s
+3211(one)s 3612(or)s 3870(more)s 4415(`other')s 5096(characters)s
+6113(which)s 6754(is)s 6963(the)s 7310(name)s 7883(of)s
+8153(a)s 8317(symbol.)s 0 5930(F)m 3(or)k 417(e)s 3(xample,)k
+220 fnt35 1360 5927({)m 240 fnt82 1512 5930(and)m 220 fnt35
+1945 5927(//)m 240 fnt82 2159 5930(are)m 2534(delimiters.)s 3681(When)s
+4338(de\207ning)s 5205(a)s 5400(delimiter)s 9(,)k 6387(the)s
+6764(name)s 7366(must)s 7920(be)s 8231(enclosed)s 0 5642(in)m
+243(quotes:)s 220 fnt35 480 5143(def  "^"  { {}  ^&  {} })m 240 fnt82 0 4649(b)m 4(ut)k
+361(quotes)s 1036(are)s 1381(not)s 1746(used)s 2242(when)s
+2816(the)s 3163(delimiter)s 4082(is)s 4291(in)s 9(v)k 4(ok)k 2(ed.)k
+5211(A)s 5439(delimiter)s 6359(may)s 6824(ha)s 4(v)k 3(e)k
+7323(delimiters)s 8327(and)s 8729(an)s 3(y)k 0 4361(other)m
+558(characters)s 1584(adjacent,)s 2495(whereas)s 3337(identi\207ers)s 4351(may)s
+4825(not)s 5199(be)s 5489(adjacent)s 6353(to)s 6600(letters)s
+7241(or)s 7508(other)s 8067(identi\207ers.)s 0 4073(The)m 428(complete)s
+1360(list)s 1711(of)s 1982(prede\207ned)s 3050(delimiters)s 4055(is)s
+220 fnt35 480 3572(/)m 480 3284(//)m 480 2996(^/)m 480 2708(^//)m
+1727 3572(|)m 1727 3284(||)m 1727 2996(^|)m 1727 2708(^||)m 2974 3572(&)m
+2974 3284(^&)m 4221 3572(&&)m 4221 3284({)m 4221 2996(})m 240 fnt82
+0 2253(A)m 230(longer)s 901(delimiter)s 1822(lik)s 2(e)k
+220 fnt35 2234 2250(<=)m 240 fnt82 2542 2253(will)m 2968(be)s
+3250(recognised)s 4344(in)s 4587(preference)s 5650(to)s 5889(a)s
+6055(shorter)s 6778(one)s 7180(lik)s 2(e)k 220 fnt35
+7592 2250(<)m 240 fnt82 7710 2253(.)m 480 1879(An)m 240 fnt83
+855 1881(identi\207er)m 240 fnt82 1808 1879(is)m 2043(a)s 2234(sequence)s
+3192(of)s 3488(one)s 3915(or)s 4199(more)s 4772(letters)s
+5430(which)s 6097(is)s 6332(the)s 6705(name)s 7304(of)s
+7600(a)s 7791(symbol.)s 8685(It)s 8916(is)s 0 1591(con)m 9(v)k 3(entional)k
+1308(b)s 4(ut)k 1700(not)s 2096(essential)s 3003(to)s
+3272(be)s 3(gin)k 3888(identi\207ers)s 4924(with)s 220 fnt35
+5436 1588(@)m 240 fnt82 5627 1591(;)m 5829(Basser)s 6556(Lout)s
+7098(will)s 7554(print)s 8095(a)s 8291(w)s 2(arning)k
+0 1303(message)m 865(if)s 1081(it)s 1272(\207nds)s 1788(an)s
+2070(unquoted)s 3019(literal)s 3628(w)s 2(ord)k 4175(\(see)s
+4614(belo)s 6(w\))k 5320(be)s 3(ginning)k 6327(with)s
+220 fnt35 6808 1300(@)m 240 fnt82 6999 1303(,)m 7105(since)s
+7651(such)s 8146(w)s 2(ords)k 8779(are)s 192 fnt84
+4440 2(13)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 14 20
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(14)m 240 fnt83 7257 13843(Chapter)m 8107(2.)s
+8381(Details)s 240 fnt82 0 13205(usually)m 748(misspelt)s 1608(identi\207ers.)s
+2730(The)s 3162(ten)s 3515(digits)s 4100(are)s 4451(not)s
+4820(letters)s 5457(and)s 5865(may)s 6334(not)s 6704(appear)s
+7404(in)s 7651(identi\207ers;)s 8722(and)s 0 12917(although)m 890(the)s
+1233(underscore)s 2333(character)s 3262(is)s 3467(a)s 3628(letter)s
+4172(and)s 4570(may)s 5031(be)s 5308(used)s 5800(in)s
+6038(identi\207ers,)s 7095(it)s 7282(is)s 7487(not)s 7847(con)s 9(v)k 3(entional)k
+0 12629(to)m 239(do)s 532(so.)s 909(The)s 1337(complete)s
+2269(list)s 2620(of)s 2891(prede\207ned)s 3959(identi\207ers)s 4965(is)s
+220 fnt35 480 12128(@Bac)m 4(kEnd)k 480 11840(@Bac)m 4(kg)k 2(round)k
+480 11552(@Begin)m 480 11264(@Break)m 480 10976(@Case)m 480 10688(@Common)m 480 10400(@Char)m
+480 10112(@CurrF)m 11(ace)k 480 9824(@CurrF)m 11(amily)k 480 9536(@CurrLang)m
+480 9248(@Database)m 480 8960(@End)m 480 8672(@Enclose)m 480 8384(@Filter)m 480 8096(@FilterErr)m
+480 7808(@FilterIn)m 480 7520(@FilterOut)m 480 7232(@F)m 6(ont)k 480 6944(@F)m 6(orceGalle)k 4(y)k
+480 6656(@Galle)m 4(y)k 480 6368(@Gr)m 2(aphic)k 480 6080(@HAdjust)m
+480 5792(@HContr)m 2(act)k 480 5504(@HCo)m 3(v)k 5(er)k
+480 5216(@HExpand)m 480 4928(@High)m 480 4640(@HLimited)m 480 4352(@HScale)m 480 4064(@HShift)m
+480 3776(@HSpan)m 2974 12128(@Include)m 2974 11840(@IncludeGr)m 2(aphic)k 2974 11552(@Inser)m -8(t)k
+2974 11264(@K)m 8(er)k -5(nShr)k -3(ink)k 2974 10976(@K)m 8(e)k 4(y)k
+2974 10688(@Language)m 2974 10400(@LClos)m 2974 10112(@LEn)m 4(v)k 2974 9824(@LInput)m
+2974 9536(@L)m 24(Vis)k 2974 9248(@LUse)m 2974 8960(@Meld)m 2974 8672(@Merge)m
+2974 8384(@Min)m 2(us)k 2974 8096(@Moment)m 2974 7808(@Ne)m 6(xt)k
+2974 7520(@NotRe)m 6(v)k 5(ealed)k 2974 7232(@Null)m 2974 6944(@OneCol)m
+2974 6656(@OneOf)m 2974 6368(@OneRo)m 3(w)k 2974 6080(@Open)m 2974 5792(@Optimiz)m 3(e)k
+2974 5504(@P)m 26(Adjust)k 2974 5216(@P)m 8(ageLabel)k 2974 4928(@PlainGr)m 2(aphic)k
+2974 4640(@Plus)m 2974 4352(@PrependGr)m 2(aphic)k 2974 4064(@Ra)m 4(wV)k 17(erbatim)k
+2974 3776(@Rotate)m 5468 12128(@Rump)m 5468 11840(@Scale)m 5468 11552(@SetColor)m 5468 11264(@SetColour)m
+5468 10976(@Space)m 5468 10688(@Star)m -8(tHSpan)k 5468 10400(@Star)m -8(tHVSpan)k
+5468 10112(@Star)m -8(tVSpan)k 5468 9824(@SysDatabase)m 5468 9536(@SysInclude)m 5468 9248(@SysIncludeGr)m 2(aphic)k
+5468 8960(@SysPrependGr)m 2(aphic)k 5468 8672(@T)m 26(ag)k 5468 8384(@T)m 26(agged)k
+5468 8096(@T)m 26(arget)k 5468 7808(@Under)m -3(line)k 5468 7520(@Use)m
+5468 7232(@V)m 17(Adjust)k 5468 6944(@VContr)m 2(act)k 5468 6656(@VCo)m 3(v)k 5(er)k
+5468 6368(@V)m 17(erbatim)k 5468 6080(@VExpand)m 5468 5792(@VLimited)m 5468 5504(@VScale)m
+5468 5216(@VShift)m 5468 4928(@VSpan)m 5468 4640(@Wide)m 5468 4352(@Y)m 4(ield)k
+5468 4064(@YUnit)m 5468 3776(@ZUnit)m 240 fnt82 0 3280(plus)m 498(the)s
+894(names)s 1605(of)s 1924(the)s 2321(parameters)s 3467(of)s
+220 fnt35 3786 3277(@Moment)m 240 fnt82 4798 3280(.)m 5011(The)s
+5487(symbols)s 220 fnt35 6385 3277(@LClos)m 240 fnt82 7161 3280(,)m
+220 fnt35 7316 3277(@LEn)m 4(v)k 240 fnt82 8034 3280(,)m
+220 fnt35 8190 3277(@LInput)m 240 fnt82 9019 3280(,)m 220 fnt35
+0 2989(@L)m 24(Vis)k 240 fnt82 722 2992(and)m 220 fnt35
+1170 2989(@LUse)m 240 fnt82 2001 2992(appear)m 2742(in)s 3029(cross)s
+3615(reference)s 4602(databases)s 5613(generated)s 6644(by)s 6982(Lout)s
+7538(and)s 7986(are)s 8377(not)s 8788(for)s 0 2704(use)m
+375(else)s 6(where.)k 480 2330(A)m 728(sequence)s 1679(of)s
+1968(characters)s 3004(which)s 3664(is)s 3892(neither)s 4633(a)s
+4817(white)s 5422(space,)s 6078(an)s 6379(identi\207er)s 9(,)k
+7357(nor)s 7754(a)s 7938(delimiter)s 9(,)k 8916(is)s
+0 2042(by)m 304(def)s 2(ault)k 1036(a)s 240 fnt83
+1213 2044(liter)m 3(al)k 1864(wor)s 8(d)k 240 fnt82
+2355 2042(,)m 2473(which)s 3126(means)s 3799(that)s 4227(it)s
+4430(will)s 4867(pass)s 5341(through)s 6154(Lout)s 6677(unchanged.)s
+7890(An)s 8251(arbitrary)s 0 1754(sequence)m 926(of)s 1190(characters)s
+2201(enclosed)s 3089(in)s 3325(double)s 4026(quotes,)s 4751(for)s
+5082(e)s 3(xample)k 220 fnt35 5938 1751("{  }",)m 240 fnt82
+6457 1754(is)m 6660(also)s 7091(a)s 7250(literal)s 7853(w)s 2(ord.)k
+8499(Space)s 0 1466(characters)m 1005(may)s 1458(be)s 1726(included,)s
+2644(b)s 4(ut)k 2992(not)s 3345(tabs)s 3767(or)s
+4013(ne)s 6(wlines.)k 5008(There)s 5607(are)s 5941(special)s
+6645(character)s 7566(sequences,)s 8629(used)s 0 1178(only)m 480(between)s
+1334(quotes,)s 2066(for)s 2404(obtaining)s 3361(otherwise)s 4346(inaccessible)s
+5556(characters:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 15 21
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(2.1.)m 454(Le)s 4(xical)k 1213(structur)s 8(e)k
+2121(\(wor)s 8(ds,)k 2871(spaces,)s 3602(symbols\))s 4502(and)s
+4928(macr)s 10(os)k 240 fnt84 8833 13840(15)m 220 fnt35
+480 13167(\\")m 240 fnt82 1235 13170(produces)m 220 fnt35 2150 13167(")m
+480 12879(\\\\)m 240 fnt82 1235 12882(\\)m 220 fnt35 480 12591(\\ddd)m
+240 fnt82 1235 12594(the)m 1583(character)s 2517(whose)s 3185(ASCII)s
+3865(code)s 4373(is)s 1235 12306(the)m 1583(up)s 1876(to)s
+2115(three)s 2648(digit)s 3146(octal)s 3665(number)s 220 fnt35
+4456 12303(ddd)m 240 fnt82 0 11765(So,)m 360(for)s 698(e)s 3(xample,)k
+220 fnt35 1612 11762("\\"@PP\\"")m 240 fnt82 2606 11765(produces)m 220 fnt35
+3521 11762("@PP")m 240 fnt82 4177 11765(.)m 480 11391(When)m 1106(the)s
+1451(comment)s 2398(character)s 220 fnt35 3328 11388(#)m 240 fnt82
+3502 11391(is)m 3709(encountered,)s 4982(e)s 6(v)k 3(erything)k
+6045(from)s 6566(that)s 6981(point)s 7530(to)s 7765(the)s
+8110(end)s 8511(of)s 8778(the)s 0 11103(line)m 414(is)s
+624(ignored.)s 1519(This)s 1995(is)s 2205(useful)s 2844(for)s
+3182(including)s 4139(reminders)s 5145(to)s 5384(oneself,)s 6181(lik)s 2(e)k
+6593(this:)s 220 fnt35 480 10606(# Lout user man)m 2(ual)k 480 10318(# J)m 6(.)k 13( Kingston, J)k 4(une 1989)k
+240 fnt82 0 9819(for)m 338(temporarily)s 1506(deleting)s 2329(parts)s
+2844(of)s 3115(the)s 3463(document,)s 4514(and)s 4918(so)s
+5184(on.)s 240 fnt83 480 9447(Macr)m 10(os)k 240 fnt82
+1268 9445(pro)m 3(vide)k 2064(a)s 2242(means)s 2916(of)s
+3199(de\207ning)s 4049(symbols)s 4910(which)s 5564(stand)s 6139(for)s
+6489(a)s 6667(sequence)s 7612(of)s 7895(te)s 3(xtual)k
+8610(units)s 0 9157(rather)m 616(than)s 1085(an)s 1368(object.)s
+2116(F)s 3(or)k 2505(e)s 3(xample,)k 3419(the)s
+3767(macro)s 4417(de\207nition)s 220 fnt35 480 8656(macro  @PP  {  //1.3vx  2.0f @Wide  &0i })m 240 fnt82
+0 8162(mak)m 2(es)k 663(Lout)s 1178(replace)s 1926(the)s
+2277(symbol)s 220 fnt35 3040 8159(@PP)m 240 fnt82 3609 8162(by)m
+3906(the)s 4258(gi)s 6(v)k 3(en)k 4841(te)s 3(xtual)k
+5546(units)s 6065(before)s 6734(assembling)s 7866(its)s 8145(input)s
+8701(into)s 0 7874(objects.)m 841(A)s 1071(similar)s 1793(macro)s
+2443(to)s 2682(this)s 3077(one)s 3479(is)s 3689(used)s
+4186(to)s 4425(separate)s 5262(the)s 5610(paragraphs)s 6710(of)s
+6981(the)s 7329(present)s 8078(document.)s 0 7586(The)m 450(enclosing)s
+1442(braces)s 2126(and)s 2552(an)s 3(y)k 2972(spaces)s
+3669(adjacent)s 4548(to)s 4809(them)s 5370(are)s 5739(dropped,)s
+6654(which)s 7318(can)s 7730(be)s 8034(a)s 8223(problem:)s
+220 fnt35 0 7295(@PP2i)m 240 fnt82 731 7298(has)m 1101(result)s
+220 fnt35 1691 7295(//1.3vx 2.0f @Wide &0i2i)m 240 fnt82 4141 7298(which)m 4783(is)s
+4993(erroneous.)s 480 6924(The)m 938(meaning)s 1846(of)s 2148(symbols)s
+3028(used)s 3556(within)s 4254(the)s 4633(body)s 5198(of)s
+5500(a)s 5697(macro)s 6377(is)s 6618(determined)s 7782(by)s
+8107(where)s 8778(the)s 0 6636(macro)m 667(is)s 895(de\207ned,)s
+1724(not)s 2108(by)s 2419(where)s 3077(it)s 3287(is)s
+3514(used.)s 4135(Due)s 4607(to)s 4864(implementation)s 6438(problems,)s
+220 fnt35 7453 6633(@Open)m 240 fnt82 8277 6636(symbols)m 0 6348(will)m
+423(not)s 786(w)s 2(ork)k 1333(within)s 1998(macros.)s
+2849(Named)s 3594(and)s 3995(body)s 4525(parameters)s 5620(will)s
+6043(w)s 2(ork)k 6590(if)s 6804(the)s 7149(symbol)s
+7905(that)s 8320(the)s 3(y)k 8779(are)s 0 6060(parameters)m
+1090(of)s 1352(is)s 1553(also)s 1983(present.)s 2828(There)s
+3432(is)s 3633(no)s 3918(w)s 2(ay)k 4360(to)s
+4590(get)s 4934(a)s 5091(left)s 5459(or)s 5709(right)s
+6212(brace)s 6776(into)s 7192(the)s 7532(body)s 8057(of)s
+8319(a)s 8476(macro)s 0 5772(without)m 791(the)s 1139(matching)s
+2082(brace.)s 480 5398(Macros)m 1253(may)s 1724(be)s 2011(nested)s
+2685(within)s 3358(other)s 3914(de\207nitions)s 4980(and)s 5389(e)s 3(xported,)k
+6335(b)s 4(ut)k 6702(the)s 3(y)k 7170(may)s
+7641(not)s 8012(be)s 8299(parame)s 8998(-)s 0 5110(ters.)m
+511(The)s 3(y)k 1058(may)s 1528(not)s 1898(ha)s 4(v)k 3(e)k
+2403(parameters)s 3504(or)s 3767(nested)s 4440(de\207nitions)s 5505(of)s
+5780(their)s 6280(o)s 6(wn,)k 6798(and)s 7206(consequently)s
+8527(a)s 8697(pre)s 8998(-)s 0 4822(ceding)m 220 fnt35
+691 4819(e)m 6(xpor)k -8(t)k 240 fnt82 1359 4822(clause)m
+2012(\(Section)s 2865(2.3\))s 3293(w)s 2(ould)k 3948(be)s
+4230(pointless;)s 5192(ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+6099(an)s 220 fnt35 6382 4819(impor)m -8(t)k 240 fnt82
+7055 4822(clause)m 7708(is)s 7918(permitted.)s 240 fnt84 0 4030(2.2.)m
+471(Named)s 1257(parameters)s 240 fnt82 480 3553(In)m 728(addition)s
+1560(to)s 1790(left)s 2159(and)s 2554(right)s 3056(\(or)s
+3386(body\))s 3985(parameters,)s 5130(a)s 5288(symbol)s 6039(may)s
+6496(ha)s 4(v)k 3(e)k 6989(an)s 3(y)k
+7377(number)s 8159(of)s 240 fnt83 8421 3555(named)m 0 3267(par)m 3(ameter)k 2(s)k
+240 fnt82 1080 3265(:)m 220 fnt35 480 2768(def @Chapter)m 480 2480(    named @T)m 26(ag {})k
+480 2192(    named @Title {})m 480 1904(    r)m -3(ight x)k 480 1616({)m 480 1328(    ...)m
+480 1040(})m 240 fnt82 0 546(Their)m 577(de\207nitions)s 1639(appear)s
+2336(in)s 2580(between)s 3434(those)s 3996(of)s 4267(an)s 3(y)k
+4665(left)s 5042(and)s 5447(right)s 5958(parameters,)s 7113(and)s
+7517(each)s 8013(is)s 8224(follo)s 6(wed)k 0 258(by)m
+293(a)s 240 fnt83 457 260(default)m 1183(value)s 240 fnt82
+1753 258(between)m 2605(braces.)s 3377(When)s 220 fnt35 4004 255(@Chapter)m
+240 fnt82 5066 258(is)m 5274(in)s 9(v)k 4(ok)k 2(ed,)k
+6136(its)s 6411(named)s 7105(parameters)s 8201(are)s 8546(gi)s 6(v)k 3(en)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 16 22
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(16)m 240 fnt83 7257 13843(Chapter)m 8107(2.)s
+8381(Details)s 240 fnt82 0 13205(v)m 6(alues)k 656(in)s
+899(the)s 1247(follo)s 6(wing)k 2224(w)s 2(ay:)k
+220 fnt35 480 12704(@Chapter)m 480 12416(    @T)m 26(ag { intro })k 480 12128(    @Title { Introduction })m
+480 11840({)m 480 11552(    ...)m 480 11264(})m 240 fnt82 0 10770(That)m
+485(is,)s 737(a)s 889(list)s 1226(of)s 1483(named)s
+2166(parameters)s 3250(appears)s 4017(immediately)s 5251(follo)s 6(wing)k
+6214(the)s 6549(symbol,)s 7347(each)s 7828(with)s 8296(its)s
+8558(v)s 6(alue)k 0 10482(enclosed)m 900(in)s 1149(braces.)s
+1929(An)s 3(y)k 2399(right)s 2916(parameter)s 3936(follo)s 6(ws)k
+4704(after)s 5206(them.)s 5854(The)s 3(y)k 6403(do)s
+6702(not)s 7074(ha)s 4(v)k 3(e)k 7581(to)s
+7826(appear)s 8529(in)s 8778(the)s 0 10194(order)m 558(the)s 3(y)k
+1015(were)s 1529(de\207ned,)s 2334(and)s 2732(the)s 3(y)k
+3189(can)s 3571(e)s 6(v)k 3(en)k 4065(be)s
+4341(omitted)s 5122(altogether)s 9(,)k 6169(in)s 6406(which)s
+7041(case)s 7502(the)s 7844(def)s 2(ault)k 8558(v)s 6(alue)k
+0 9906(from)m 524(the)s 872(de\207nition)s 1846(is)s 2056(used)s
+2553(instead.)s 480 9532(If)m 699(the)s 1036(k)s 2(e)k 3(yw)k 2(ord)k
+220 fnt35 1913 9529(compulsor)m -6(y)k 240 fnt82 3088 9532(appears)m
+3858(after)s 220 fnt35 4342 9529(named)m 240 fnt82 5050 9532(and)m
+5442(before)s 6097(the)s 6434(parameter')s 13(s)k 7586(name,)s
+8200(Lout)s 8700(will)s 0 9244(print)m 501(a)s 657(w)s 2(arning)k
+1481(message)s 2337(whene)s 6(v)k 3(er)k 3307(this)s
+3693(parameter)s 4696(is)s 4896(missing.)s 5793(Ho)s 6(we)k 6(v)k 3(er)k
+6705(it)s 6886(will)s 7302(still)s 7703(use)s 8068(the)s
+8405(def)s 2(ault)k 0 8956(v)m 6(alue)k 568(as)s
+818(just)s 1223(described.)s 480 8582(A)m 719(named)s 220 fnt35
+1424 8579(@T)m 26(ag)k 240 fnt82 2057 8582(parameter)m 3080(does)s
+3580(not)s 3955(tak)s 2(e)k 4417(its)s 4702(def)s 2(ault)k
+5433(v)s 6(alue)k 6010(from)s 6544(the)s 6901(de\207nition;)s
+7940(instead,)s 8733(if)s 8960(a)s 0 8294(def)m 2(ault)k
+726(v)s 6(alue)k 1300(is)s 1516(needed,)s 2306(Lout)s
+2824(in)s 9(v)k 3(ents)k 3560(a)s 3731(simple)s
+4430(w)s 2(ord)k 4984(which)s 5631(dif)s 6(fers)k
+6304(from)s 6834(e)s 6(v)k 3(ery)k 7415(other)s
+7972(tag.)s 8434(This)s 8916(is)s 0 8006(important,)m 1034(for)s
+1370(e)s 3(xample,)k 2282(in)s 2523(the)s 2868(production)s
+3960(of)s 4229(numbered)s 5242(chapters)s 6086(and)s 6488(sections)s
+7307(\(Section)s 8158(4.4\).)s 8698(The)s 0 7718(same)m 551(thing)s
+1101(occurs)s 1781(if)s 2003(there)s 2541(is)s 2756(a)s
+220 fnt35 2927 7715(@T)m 26(ag)k 240 fnt82 3555 7718(parameter)m
+4574(b)s 4(ut)k 4940(its)s 5221(v)s 6(alue)k
+5794(is)s 6009(the)s 6362(empty)s 7019(object:)s 7774(the)s
+8127(v)s 6(alue)k 8700(will)s 0 7430(be)m 282(replaced)s
+1149(by)s 1443(an)s 1726(in)s 9(v)k 3(ented)k
+2596(one.)s 480 7056(Named)m 1229(parameters)s 2327(may)s 2793(ha)s 4(v)k 3(e)k
+3294(parameters,)s 4448(as)s 4698(in)s 4941(the)s 5289(follo)s 6(wing)k
+6266(de\207nition:)s 220 fnt35 480 6555(def @Str)m 2(ange)k 480 6267(    named @F)m 6(or)k -5(mat r)k -3(ight @V)k 15(al { [@V)k 15(al] })k
+480 5979(    r)m -3(ight x)k 480 5691({)m 480 5403(    @F)m 6(or)k -5(mat x)k
+480 5115(})m 240 fnt82 0 4621(The)m 428(named)s 1125(parameter)s
+220 fnt35 2139 4618(@F)m 6(or)k -5(mat)k 240 fnt82
+3113 4621(has)m 3483(right)s 3995(parameter)s 220 fnt35 5010 4618(@V)m 15(al)k
+240 fnt82 5520 4621(,)m 5627(and)s 6032(the)s 6380(def)s 2(ault)k
+7102(v)s 6(alue)k 7670(of)s 220 fnt35 7942 4618(@F)m 6(or)k -5(mat)k
+240 fnt82 8916 4621(is)m 0 4333(this)m 394(parameter)s 1406(enclosed)s
+2299(in)s 2539(brack)s 2(ets.)k 3495(When)s 220 fnt35
+4122 4330(@F)m 6(or)k -5(mat)k 240 fnt82 5093 4333(is)m
+5300(in)s 9(v)k 4(ok)k 2(ed)k 6113(it)s
+6303(must)s 6826(be)s 7105(supplied)s 7972(with)s 8452(a)s
+8615(right)s 0 4045(parameter)m 9(,)k 1052(which)s 1694(will)s
+2120(replace)s 220 fnt35 2865 4042(@V)m 15(al)k 240 fnt82
+3375 4045(.)m 3539(Thus,)s 220 fnt35 480 3544(@Str)m 2(ange 27)k
+240 fnt82 0 3045(equals)m 220 fnt35 662 3042(@F)m 6(or)k -5(mat 27)k
+240 fnt82 1937 3045(and)m 2341(so)s 2607(has)s 2977(result)s
+480 2543([27])m 0 2055(The)m 220 fnt35 428 2052(@F)m 6(or)k -5(mat)k
+240 fnt82 1401 2055(symbol)m 2161(is)s 2371(lik)s 2(e)k
+2783(a)s 2949(de\207nition)s 3923(with)s 4405(parameters)s 5503(whose)s
+6171(body)s 6705(can)s 7094(be)s 7376(changed:)s 220 fnt35
+480 1554(@Str)m 2(ange)k 480 1266(    @F)m 6(or)k -5(mat { Slope @F)k 6(ont @V)k 15(al.)k 13( })k
+480 978(27)m 240 fnt82 0 527(still)m 412(equals)s 220 fnt35
+1074 524(@F)m 6(or)k -5(mat 27)k 240 fnt82 2289 527(,)m
+2396(b)s 4(ut)k 2758(this)s 3154(time)s 3634(the)s
+3982(result)s 4572(is)s 240 fnt83 480 26(27.)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 17 23
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(2.2.)m 454(Named)s 1199(par)s 3(ameter)k 2(s)k
+240 fnt84 8831 13840(17)m 240 fnt82 0 13205(In)m 252(practice,)s
+1110(e)s 3(xamples)k 2057(of)s 2323(named)s 3015(parameters)s
+4109(with)s 4586(parameters)s 5680(all)s 5969(ha)s 4(v)k 3(e)k
+6466(this)s 6857(\210a)s 4(v)k 4(our)k 7583(of)s
+7850(format)s 8541(being)s 0 12917(separated)m 996(from)s 1556(content;)s
+2409(running)s 3243(headers)s 4060(\(Section)s 4950(4.3\))s 5414(and)s
+5854(printing)s 6701(styles)s 7332(for)s 7707(bibliographies)s 0 12629(\(Section)m
+853(4.5\))s 1281(are)s 1628(tw)s 2(o)k 2038(major)s
+2655(ones.)s 240 fnt84 0 11836(2.3.)m 471(Nested)s 1216(de\207nitions,)s
+2392(body)s 2954(parameters,)s 4236(extend,)s 5027(import,)s 5844(and)s
+6285(export)s 240 fnt82 480 11359(A)m 710(de\207nition)s 1684(may)s
+2150(contain)s 2911(other)s 3462(de\207nitions)s 4523(at)s 4755(the)s
+5103(be)s 3(ginning)k 6111(of)s 6382(its)s 6658(body:)s
+220 fnt35 480 10858(def @NineSquare)m 480 10570(   r)m -3(ight x)k 480 10282({)m
+480 9994(   def @Three { x |0.2i x |0.2i x })m 480 9418(   @Three /0.2i @Three /0.2i @Three)m 480 9130(})m 240 fnt82 0 8636(A)m
+227(parameter)s 1238(lik)s 2(e)k 220 fnt35 1646 8633(x)m
+240 fnt82 1811 8636(may)m 2274(be)s 2552(in)s 9(v)k 4(ok)k 2(ed)k
+3364(an)s 3(ywhere)k 4343(within)s 5008(the)s 5353(body)s
+5883(of)s 6151(the)s 6495(symbol)s 7252(it)s 7441(is)s
+7647(a)s 7810(parameter)s 8820(of,)s 0 8348(including)m 973(within)s
+1657(nested)s 2342(de\207nitions.)s 3532(A)s 3778(nested)s 4463(symbol)s
+5239(lik)s 2(e)k 220 fnt35 5667 8345(@Three)m 240 fnt82
+6531 8348(may)m 7013(be)s 7311(in)s 9(v)k 4(ok)k 2(ed)k
+8143(an)s 3(ywhere)k 0 8060(from)m 518(the)s 860(be)s 3(ginning)k
+1862(of)s 2127(its)s 2397(o)s 6(wn)k 2855(body)s
+3383(to)s 3616(the)s 3958(end)s 4355(of)s 4620(the)s
+4962(body)s 5490(of)s 5755(the)s 6097(symbol)s 6851(it)s
+7037(is)s 7241(de\207ned)s 7998(within.)s 8766(So,)s 0 7772(assuming)m
+957(an)s 1240(appropriate)s 2384(de\207nition)s 3358(of)s 220 fnt35
+3629 7769(@Bo)m 6(x)k 240 fnt82 4222 7772(,)m 220 fnt35
+480 7271(@NineSquare @Bo)m 6(x)k 240 fnt82 0 6775(has)m 370(result)s
+2796 2796 226 2570 240 288 60 480 3689 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+740 740 226 514 240 288 60 0 2056 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+740 740 226 514 240 288 60 1028 2056 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+740 740 226 514 240 288 60 2056 2056 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+740 740 226 514 240 288 60 0 1028 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+740 740 226 514 240 288 60 1028 1028 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+740 740 226 514 240 288 60 2056 1028 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+740 740 226 514 240 288 60 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+740 740 226 514 240 288 60 1028 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+740 740 226 514 240 288 60 2056 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+end end restore
+grestore
+0 3238(Nested)m 722(de\207nitions)s 1783(may)s 2249(themselv)s 3(es)k
+3359(contain)s 4120(nested)s 4789(de\207nitions,)s 5906(to)s 6145(arbitrary)s
+7020(depth.)s 480 2864(There)m 1100(are)s 1454(three)s 1994(special)s
+2719(features)s 3532(which)s 4181(permit)s 4872(a)s 5045(nested)s
+5721(symbol)s 6488(or)s 6754(parameter)s 7775(to)s 8021(be)s
+8311(in)s 9(v)k 4(ok)k 2(ed)k 0 2576(outside)m
+737(its)s 1003(normal)s 1725(range;)s 2358(that)s 2766(is,)s
+3022(outside)s 3759(the)s 4096(body)s 4620(of)s 4881(the)s
+5219(enclosing)s 6179(symbol.)s 7038(The)s 7456(\207rst)s 7877(and)s
+8270(simplest)s 0 2288(of)m 267(these)s 810(features)s 1611(is)s
+1817(the)s 240 fnt83 2161 2290(body)m 2678(par)s 3(ameter)k
+240 fnt82 3677 2288(,)m 3780(an)s 4059(alternati)s 6(v)k 3(e)k
+5108(form)s 5628(of)s 5895(right)s 6401(parameter)s 13(.)k
+7502(The)s 7926(Eq)s 8245(equation)s 0 2000(formatting)m 1052(package)s
+1883([4)s 2076(,)s 2174(Chapter)s 2982(7])s 3211(is)s
+3412(a)s 3569(classic)s 4249(e)s 3(xample)k 5102(of)s
+5364(the)s 5703(use)s 6069(of)s 6331(a)s 6488(body)s
+7013(parameter)s 13(.)k 8109(In)s 8355(outline,)s 0 1712(it)m
+192(looks)s 762(lik)s 2(e)k 1174(this:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 18 24
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(18)m 240 fnt83 7257 13843(Chapter)m 8107(2.)s
+8381(Details)s 220 fnt35 480 13211(e)m 6(xpor)k -8(t "+" sup o)k 3(v)k 5(er)k
+480 12635(def @Eq)m 480 12347(    body x)m 480 12059({)m 480 11771(    def "+" ...)m 480 11483(    def sup ...)m
+480 11195(    def o)m 3(v)k 5(er ...)k 480 10907(    ...)m 480 10331(    Slope @F)m 6(ont x)k
+480 10043(})m 240 fnt82 0 9549(First)m 518(we)s 874(list)s
+1246(those)s 1828(nested)s 2518(symbols)s 3388(and)s 3813(parameters)s
+4932(that)s 5371(we)s 5727(intend)s 6404(to)s 6664(refer)s
+7194(to)s 7454(outside)s 8222(the)s 8592(body)s 0 9261(of)m
+220 fnt35 274 9258(@Eq)m 240 fnt82 815 9261(in)m 1061(an)s
+220 fnt35 1347 9258(e)m 6(xpor)k -8(t)k 240 fnt82
+2018 9261(clause,)m 2725(preceding)s 3724(the)s 4075(de\207nition)s 5052(as)s
+5305(sho)s 6(wn.)k 6092(Only)s 6628(e)s 3(xported)k
+7523(symbols)s 8375(may)s 8844(be)s 0 8973(in)m 9(v)k 4(ok)k 2(ed)k
+817(outside)s 1566(the)s 1916(body)s 2452(of)s 220 fnt35
+2725 8970(@Eq)m 240 fnt82 3203 8973(.)m 3369(The)s 3799(body)s
+4335(parameter)s 5351(is)s 5563(lik)s 2(e)k 5977(a)s
+6145(right)s 6658(parameter)s 7674(e)s 3(xcept)k 8357(that)s
+8778(the)s 0 8685(e)m 3(xported)k 892(symbols)s 1741(are)s
+2088(visible)s 2781(within)s 3449(it:)s 220 fnt35 480 8184(@Eq { {x sup 2 + y sup 2} o)m 3(v)k 5(er 2 })k
+240 fnt82 0 7686(calls)m 488(on)s 785(the)s 1133(nested)s
+1802(de\207nitions)s 2863(of)s 220 fnt35 3134 7683(@Eq)m 240 fnt82
+3672 7686(to)m 3911(produce)s 4738(the)s 5086(result)s 168 fnt78
+586 7231(2)m 240 fnt83 480 7171(x)m 240 fnt78 738 7163(+)m
+168 fnt78 1041 7231(2)m 240 fnt83 939 7171(y)m 641 0 0 0 240 288 12 480 7073 LoutGr2
+0 0 moveto xsize 0 lineto 0.05 ft setlinewidth stroke
+grestore
+
+grestore
+240 fnt78
+743 6845(2)m 240 fnt82 0 6334(The)m 416(body)s 937(parameter')s 13(s)k
+2089(v)s 6(alue)k 2644(must)s 3156(be)s 3426(enclosed)s
+4308(in)s 4539(braces.)s 5300(The)s 5715(term)s 6200(`body)s
+6800(parameter')s 7854(is)s 8051(a)s 8204(reminder)s 0 6046(that)m
+418(the)s 766(v)s 6(alue)k 1334(is)s 1544(interpreted)s
+2636(as)s 2886(if)s 3103(it)s 3295(w)s 2(as)k
+3716(within)s 4384(the)s 4732(body)s 5266(of)s 5537(the)s
+5885(symbol.)s 480 5672(A)m 710(body)s 1244(parameter)s 2257(may)s
+2723(not)s 3089(be)s 3370(e)s 3(xported,)k 4311(and)s
+4714(in)s 4957(f)s 2(act)k 5372(a)s 5537(body)s
+6071(parameter)s 7085(may)s 7550(be)s 7832(in)s 9(v)k 4(ok)k 2(ed)k
+8646(only)s 0 5384(within)m 656(the)s 991(body)s 1512(of)s
+1770(the)s 2105(enclosing)s 3063(symbol,)s 3862(not)s 4215(within)s
+4870(an)s 3(y)k 5254(nested)s 5911(de\207nitions.)s 7072(F)s 3(or)k
+7448(e)s 3(xample,)k 220 fnt35 8349 5381(x)m 240 fnt82
+8504 5384(abo)m 3(v)k 3(e)k 0 5096(may)m 471(not)s
+843(be)s 1131(in)s 9(v)k 4(ok)k 2(ed)k
+1952(within)s 220 fnt35 2626 5093(sup)m 240 fnt82 2972 5096(.)m
+3141(This)s 3623(restriction)s 4653(is)s 4869(needed)s 5611(to)s
+5855(a)s 4(v)k 4(oid)k 6443(the)s 6797(possibility)s
+7853(of)s 8130(recursion,)s 0 4808(when)m 585(the)s 943(actual)s
+1577(body)s 2121(parameter)s 3145(in)s 9(v)k 4(ok)k 2(es)k
+3935(an)s 4228(e)s 3(xported)k 5129(nested)s 5808(de\207nition)s
+6792(which)s 7443(in)s 9(v)k 4(ok)k 2(es)k
+8234(the)s 8592(body)s 0 4520(parameter)m 9(,)k 1052(etc.)s
+480 4146(The)m 932(second)s 1679(place)s 2263(where)s 2928(e)s 3(xported)k
+3844(symbols)s 4717(may)s 5207(be)s 5514(used)s 6035(is)s
+6269(in)s 6536(the)s 6909(right)s 7444(parameter)s 8482(of)s
+8778(the)s 220 fnt35 0 3855(@Open)m 240 fnt82 806 3858(symbol,)m
+1618(and)s 2022(follo)s 6(wing)k 2999(its)s 3275(alternati)s 6(v)k 3(e)k
+4329(form,)s 220 fnt35 4900 3855(@Use)m 240 fnt82 5565 3858(\(Section)m
+6418(3.34\).)s 480 3484(Exported)m 1480(nested)s 2214(symbols)s 3128(and)s
+3598(parameters)s 4761(may)s 5292(be)s 5639(made)s 6279(visible)s
+7037(within)s 7770(a)s 8002(subsequent)s 0 3196(de\207nition)m 974(or)s
+1233(macro)s 1883(by)s 2177(preceding)s 3173(it)s 3365(with)s
+3847(an)s 220 fnt35 4130 3193(impor)m -8(t)k 240 fnt82
+4803 3196(clause,)m 5507(lik)s 2(e)k 5919(this:)s 220 fnt35
+480 2695(impor)m -8(t @Eq)k 480 2407(def p)m 6(ythag { sqr)k -8(t { x sup 2 + y sup 2 } })k
+240 fnt82 0 1908(Note)m 548(ho)s 6(we)k 6(v)k 3(er)k
+1444(that)s 220 fnt35 1889 1905(p)m 6(ythag)k 240 fnt82
+2617 1908(can)m 3033(only)s 3540(be)s 3849(used)s 4374(with)s
+4883(some)s 5471(in)s 9(v)k 4(ocation)k 6552(of)s
+220 fnt35 6850 1905(@Eq)m 240 fnt82 7328 1908(:)m 7521(within)s
+8216(the)s 8592(body)s 0 1620(parameter)m 1036(of)s 1329(an)s
+1635(in)s 9(v)k 4(ocation)k 2711(of)s 220 fnt35
+3005 1617(@Eq)m 240 fnt82 3483 1620(,)m 3612(within)s 4303(the)s
+4673(right)s 5207(parameter)s 6243(of)s 6537(an)s 220 fnt35
+6842 1617(@Eq&&tag @Open)m 240 fnt82 8737 1620(,)m 8867(or)s 0 1332(follo)m 6(wing)k
+977(a)s 220 fnt35 1143 1329(@Use { @Eq ...)m 13( })k 240 fnt82
+2798 1332(.)m 2962(There)s 3575(may)s 4041(be)s 4323(se)s 6(v)k 3(eral)k
+5045(symbols)s 5894(in)s 6137(the)s 220 fnt35 6485 1329(impor)m -8(t)k
+240 fnt82 7158 1332(clause.)m 480 958(In)m 760(a)s 951(similar)s
+1698(w)s 2(ay)k 2174(to)s 220 fnt35 2438 955(impor)m -8(t)k
+240 fnt82 3051 958(,)m 3183(a)s 3374(de\207nition)s 4373(may)s
+4864(be)s 5171(preceded)s 6117(by)s 220 fnt35 6436 955(e)m 6(xtend)k
+240 fnt82 7162 958(follo)m 6(wed)k 8089(by)s 8408(a)s
+8599(sym)s 8998(-)s 0 670(bol)m 361(name:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 19 25
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(2.3.)m 454(Nested)s 1171(de\207nitions,)s 2261(body)s
+2783(par)s 3(ameter)k 2(s,)k 3961(e)s 4(xtend,)k
+4674(import,)s 5405(and)s 5831(e)s 4(xport)k 240 fnt84
+8832 13840(19)m 220 fnt35 480 13207(e)m 6(xtend @Eq)k 480 12919(def p)m 6(ythag { sqr)k -8(t { x sup 2 + y sup 2 } })k
+240 fnt82 0 12420(The)m 418(ef)s 6(fect)k 1003(of)s
+1264(this)s 1649(is)s 1849(just)s 2243(as)s 2483(though)s
+3195(the)s 3533(de\207nition)s 4496(of)s 220 fnt35 4757 12417(p)m 6(ythag)k
+240 fnt82 5447 12420(had)m 5841(occurred)s 6724(directly)s 7497(after)s
+7982(the)s 8319(e)s 3(xisting)k 0 12132(de\207nitions)m 1058(within)s
+220 fnt35 1722 12129(@Eq)m 240 fnt82 2200 12132(,)m 2303(with)s
+220 fnt35 2782 12129(p)m 6(ythag)k 240 fnt82 3479 12132(added)m
+4105(to)s 220 fnt35 4340 12129(@Eq)m 240 fnt82 4818 12132(')m 13(s)k
+5025(e)s 3(xport)k 5689(list.)s 6140(This)s 6612(is)s
+6819(useful)s 7454(for)s 7788(e)s 3(xtending)k 8778(the)s
+0 11844(capabilities)m 1128(of)s 1389(a)s 1545(package)s 2375(of)s
+2636(de\207nitions)s 3687(lik)s 2(e)k 220 fnt35 4088 11841(@Eq)m
+240 fnt82 4616 11844(without)m 5397(modifying)s 6437(its)s 6703(source)s
+7373(\207le.)s 7832(The)s 8249(essential)s 0 11556(dif)m 6(ferences)k
+1106(to)s 220 fnt35 1346 11553(impor)m -8(t)k 240 fnt82
+2020 11556(are)m 2368(that)s 2787(all)s 3081(the)s 3430(symbols)s
+4280(of)s 220 fnt35 4552 11553(@Eq)m 240 fnt82 5091 11556(become)m
+5892(visible)s 6586(within)s 220 fnt35 7255 11553(p)m 6(ythag)k
+240 fnt82 7896 11556(,)m 8004(not)s 8371(just)s 8778(the)s
+0 11268(e)m 3(xported)k 892(ones,)s 1438(and)s 1842(only)s
+2322(one)s 2724(symbol)s 3484(may)s 3950(follo)s 6(w)k
+4622(the)s 220 fnt35 4970 11265(e)m 6(xtend)k 240 fnt82
+5671 11268(k)m 2(e)k 3(yw)k 2(ord.)k 480 10894(Actually)m 15(,)k
+1399(more)s 1951(than)s 2424(one)s 2831(symbol)s 3595(may)s
+4066(follo)s 6(w)k 220 fnt35 4743 10891(e)m 6(xtend)k
+240 fnt82 5384 10894(,)m 5495(b)s 4(ut)k 5862(this)s
+6262(usage)s 6868(indicates)s 7772(a)s 7943(`path)s 8496(name')s
+0 10606(of)m 271(the)s 619(symbol.)s 1488(F)s 3(or)k
+1877(e)s 3(xample,)k 220 fnt35 480 10105(e)m 6(xtend @DocumentLa)k 6(y)k 4(out @Repor)k -8(tLa)k 6(y)k 4(out)k
+480 9817(def @K)m 8(e)k 4(yw)k 2(ords ...)k 240 fnt82
+0 9319(causes)m 676(the)s 1026(de\207nition)s 2002(of)s 220 fnt35
+2275 9316(@K)m 8(e)k 4(yw)k 2(ords)k 240 fnt82
+3502 9319(to)m 3743(occur)s 4335(directly)s 5120(after)s 5618(the)s
+5968(e)s 3(xisting)k 6777(de\207nitions)s 7840(of)s 220 fnt35
+8113 9316(@Repor)m -8(t)k 240 fnt82 8998 9319(-)m 220 fnt35
+0 9028(La)m 6(y)k 4(out)k 240 fnt82 645 9031(,)m
+752(which)s 1394(itself)s 1942(lies)s 2324(within)s 220 fnt35
+2992 9028(@DocumentLa)m 6(y)k 4(out)k 240 fnt82 4860 9031(.)m
+480 8657(A)m 702(named)s 1390(parameter)s 2395(may)s 2853(also)s
+3283(be)s 3556(preceded)s 4469(by)s 4754(an)s 220 fnt35
+5029 8654(impor)m -8(t)k 240 fnt82 5694 8657(clause.)m 6386(As)s
+6695(usual,)s 7299(the)s 7638(meaning)s 8507(is)s 8708(that)s
+0 8369(the)m 336(visible)s 1016(local)s 1522(de\207nitions)s 2570(of)s
+2828(the)s 3163(import)s 3847(symbol\(s\))s 4839(are)s 5173(visible)s
+5853(within)s 6508(the)s 6843(body)s 7364(\(the)s 7778(def)s 2(ault)k
+8486(v)s 6(alue\))k 0 8081(of)m 281(the)s 640(named)s
+1347(parameter)s 13(.)k 2463(But)s 2879(furthermore,)s 4137(those)s
+4709(symbols)s 5569(will)s 6005(be)s 6298(visible)s 7002(within)s
+7681(all)s 7985(in)s 9(v)k 4(ocations)k 0 7793(of)m
+271(the)s 619(parameter)s 13(.)k 1724(F)s 3(or)k
+2113(e)s 3(xample,)k 3027(suppose)s 3855(we)s 4190(de\207ne)s
+220 fnt35 480 7292(def @Diag)m 480 7004(    impor)m -8(t @Algebr)k 2(a named line)k 4(width { 1p })k
+480 6716(    impor)m -8(t @Algebr)k 2(a named dashlength { 2p })k 480 6428(    ...)m 240 fnt82
+0 5977(Then,)m 599(if)s 220 fnt35 816 5974(@Algebr)m 2(a)k
+240 fnt82 1847 5977(e)m 3(xports)k 2599(symbols)s 220 fnt35
+3448 5974(+)m 240 fnt82 3568 5977(,)m 220 fnt35 3675 5974(-)m
+240 fnt82 3739 5977(,)m 3846(and)s 4250(so)s 4516(on,)s
+4863(we)s 5198(may)s 5664(write)s 220 fnt35 480 5476(@Diag)m
+480 5188(    line)m 4(width { 1f - 2p })k 480 4900(    dashlength { 1f + 2p })m 240 fnt82 0 4401(using)m
+565(the)s 905(symbols)s 1747(from)s 220 fnt35 2263 4398(@Algebr)m 2(a)k
+240 fnt82 3234 4401(.)m 3391(There)s 3996(may)s 4454(be)s
+4729(se)s 6(v)k 3(eral)k 5443(symbols)s 6285(after)s
+6773(the)s 220 fnt35 7114 4398(impor)m -8(t)k 240 fnt82
+7779 4401(k)m 2(e)k 3(yw)k 2(ord.)k 8766(All)s
+0 4113(these)m 558(symbols)s 1418(share)s 1990(an)s 2284(important)s
+3285(restriction:)s 4429(the)s 3(y)k 4904(may)s 5381(not)s
+5759(ha)s 4(v)k 3(e)k 6271(parameters.)s 7434(This)s
+7921(is)s 8143(necessary)s 0 3825(because)m 841(Lout)s 1382(w)s 2(ould)k
+2065(be)s 2376(unable)s 3098(to)s 3366(determine)s 4406(suitable)s
+5233(v)s 6(alues)k 5918(for)s 6284(an)s 3(y)k
+6710(such)s 7234(parameters,)s 8417(if)s 8663(the)s 3(y)k
+0 3537(did)m 364(e)s 3(xist.)k 480 3163(As)m 814(an)s
+1115(e)s 3(xception)k 2116(to)s 2373(the)s 2738(rule)s
+3183(just)s 3605(gi)s 6(v)k 3(en,)k 4253(a)s
+4436(named)s 5150(parameter)s 6181(may)s 6665(import)s 7379(the)s
+7745(symbol)s 8522(it)s 8732(is)s 8960(a)s 0 2875(parameter)m
+1014(of:)s 220 fnt35 480 2374(e)m 6(xpor)k -8(t @Cell)k
+480 2086(def @Tb)m 4(l)k 480 1798(    impor)m -8(t @Tb)k 4(l named @F)k 6(or)k -5(mat { ...)k 13( })k
+240 fnt82 0 1302(In)m 274(this)s 688(e)s 3(xample)k
+1569(the)s 1936(e)s 3(xported)k 2846(de\207nitions)s 3925(of)s
+220 fnt35 4215 1299(@Tb)m 4(l)k 240 fnt82 4802 1302(\(i.e.)m
+220 fnt35 5235 1299(@Cell)m 240 fnt82 5820 1302(\))m 5966(will)s
+6411(be)s 6711(visible)s 7422(within)s 220 fnt35 8109 1299(@F)m 6(or)k -5(mat)k
+240 fnt82 9022 1302(.)m 0 1014(Ho)m 6(we)k 6(v)k 3(er)k 9(,)k
+984(the)s 3(y)k 1472(may)s 1963(only)s 2467(be)s
+2774(used)s 3296(in)s 3563(actual)s 4213(parameters,)s 5392(not)s
+5782(in)s 6050(the)s 6423(def)s 2(ault)k 7168(v)s 6(alue)k
+7761(of)s 8057(the)s 8430(named)s 0 726(parameter)m 13(.)k
+1098(This)s 1567(is)s 1769(o)s 6(wing)k 2408(to)s
+2639(implementation)s 4189(problems:)s 5237(at)s 5462(the)s 5803(time)s
+6275(the)s 6616(def)s 2(ault)k 7329(v)s 6(alue)k
+7890(of)s 220 fnt35 8153 723(@F)m 6(or)k -5(mat)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 20 26
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(20)m 240 fnt83 7257 13843(Chapter)m 8107(2.)s
+8381(Details)s 240 fnt82 0 13205(is)m 210(read,)s 728(the)s
+1076(e)s 3(xported)k 1968(symbols)s 2817(ha)s 4(v)k 3(e)k
+3318(not)s 3684(been)s 4193(read)s 4662(and)s 5066(are)s
+5413(consequently)s 6730(not)s 7096(kno)s 6(wn.)k 480 12831(Since)m
+220 fnt35 1064 12828(@Cell)m 240 fnt82 1706 12831(is)m 1913(nested)s
+2579(within)s 220 fnt35 3244 12828(@Tb)m 4(l)k 240 fnt82
+3753 12831(,)m 3857(the)s 4202(v)s 6(alue)k 4766(of)s
+5034(an)s 5314(in)s 9(v)k 4(ocation)k 6365(of)s
+220 fnt35 6633 12828(@Cell)m 240 fnt82 7275 12831(may)m 7738(depend)s
+8485(on)s 8778(the)s 0 12543(v)m 6(alue)k 582(of)s
+868(parameters)s 1980(of)s 220 fnt35 2266 12540(@Tb)m 4(l)k
+240 fnt82 2775 12543(.)m 2953(If)s 220 fnt35 3198 12540(@Cell)m
+240 fnt82 3857 12543(is)m 4082(used)s 4593(within)s 5276(an)s
+5573(actual)s 220 fnt35 6213 12540(@F)m 6(or)k -5(mat)k
+240 fnt82 7200 12543(parameter)m 9(,)k 8267(its)s 8558(v)s 6(alue)k
+0 12255(depends)m 833(on)s 1126(the)s 1471(v)s 6(alue)k
+2035(of)s 2303(parameters)s 3397(of)s 3665(the)s 4009(in)s 9(v)k 4(ocation)k
+5060(of)s 220 fnt35 5327 12252(@Tb)m 4(l)k 240 fnt82
+5893 12255(of)m 6160(which)s 6799(the)s 220 fnt35 7143 12252(@F)m 6(or)k -5(mat)k
+240 fnt82 8112 12255(parameter)m 0 11967(is)m 210(a)s 376(part.)s
+480 11593(A)m 710(de\207nition,)s 1734(macro,)s 2438(or)s 2697(named)s
+3393(parameter)s 4407(may)s 4873(ha)s 4(v)k 3(e)k
+5374(se)s 6(v)k 3(eral)k 6096(alternati)s 6(v)k 3(e)k
+7150(names,)s 7868(lik)s 2(e)k 8280(this:)s 220 fnt35
+480 11092(macro @CD @CentredDispla)m 6(y @CenteredDispla)k 6(y { ...)k 13( })k 240 fnt82
+0 10594(This)m 489(is)s 713(useful)s 1366(for)s 1718(abbre)s 6(viated)k
+2898(and)s 3316(alternati)s 6(v)k 3(e)k 4384(spellings,)s
+5355(as)s 5618(sho)s 6(wn.)k 6416(The)s 6858(names)s
+7534(appear)s 8245(together)s 9(,)k 0 10306(and)m 404(the)s 3(y)k
+867(may)s 1333(subsequently)s 2637(be)s 2919(used)s 3416(interchangeably)s 15(.)k
+480 9932(If)m 698(one)s 1088(name)s 1649(of)s 1908(a)s
+2062(symbol)s 2809(appears)s 3578(in)s 3809(an)s 4079(e)s 3(xport)k
+4735(or)s 4982(import)s 5666(list,)s 6052(its)s 6316(other)s
+6854(names)s 7504(are)s 7838(automaticaly)s 0 9644(included)m 882(as)s
+1132(well,)s 1650(and)s 2054(should)s 2751(not)s 3117(also)s
+3555(appear)s 4252(in)s 4495(the)s 4843(list.)s 240 fnt84
+0 8851(2.4.)m 471(Filter)s 4(ed)k 1330(right)s 1894(and)s
+2335(body)s 2897(parameters)s 240 fnt82 480 8374(A)m 719(right)s
+1239(or)s 1507(body)s 2050(parameter)s 3073(may)s 3548(be)s
+3839(\207ltered)s 4582(by)s 4885(some)s 5455(other)s 6015(computer)s
+6987(program)s 7866(before)s 8541(being)s 0 8086(included)m 882(by)s
+1176(Lout.)s 1792(As)s 2109(an)s 2392(e)s 3(xample)k
+3255(of)s 3526(such)s 4022(a)s 4188(program)s 5058(we)s
+5393(will)s 5819(use)s 6194(the)s 6542(Unix)s 220 fnt35
+7076 8083(sor)m -8(t)k 240 fnt82 7506 8086(command:)m 220 fnt35
+480 7587(sor)m -8(t  -o out\207le  in\207le)k 240 fnt82 0 7133(This)m 499(causes)s
+1198(\207le)s 220 fnt35 1582 7130(out\207le)m 240 fnt82 2243 7133(to)m
+2505(contain)s 3290(a)s 3480(sorted)s 4145(cop)s 2(y)k
+4687(of)s 4981(\207le)s 220 fnt35 5366 7130(in\207le)m 240 fnt82
+5808 7133(.)m 5996(W)s 19(e)k 6388(incorporate)s 7556(this)s
+7975(into)s 8424(a)s 8614(Lout)s 0 6845(de\207nition)m 974(as)s
+1224(follo)s 6(ws:)k 220 fnt35 480 6393(def @Sor)m -8(t)k
+480 6105(    named @Options {})m 480 5817(    r)m -3(ight x)k 480 5529({)m 480 5241(    def @Filter { sor)m -8(t @Options  -o @FilterOut  @FilterIn })k
+480 4665(    lines @Break x)m 480 4377(})m 240 fnt82 0 3883(The)m 440(presence)s
+1345(within)s 220 fnt35 2026 3880(@Sor)m -8(t)k 240 fnt82
+2728 3883(of)m 3012(a)s 3191(de\207nition)s 4178(of)s 4462(a)s
+4641(symbol)s 5414(called)s 220 fnt35 6055 3880(@Filter)m 240 fnt82
+6837 3883(tells)m 7298(Lout)s 7823(that)s 8254(the)s 8615(right)s
+0 3595(parameter)m 1057(of)s 220 fnt35 1372 3592(@Sor)m -8(t)k
+240 fnt82 2104 3595(is)m 2358(to)s 2640(be)s 2966(\207ltered)s
+3743(before)s 4453(inclusion.)s 5537(When)s 220 fnt35 6210 3592(@Sor)m -8(t)k
+240 fnt82 6942 3595(is)m 7196(in)s 9(v)k 4(ok)k 2(ed,)k
+220 fnt35 8103 3592(@Filter)m 240 fnt82 8916 3595(is)m 0 3307(e)m 6(v)k 6(aluated)k
+978(and)s 1399(its)s 1692(v)s 6(alue)k 2277(e)s 3(x)k 3(ecuted)k
+3196(as)s 3463(a)s 3646(system)s 4387(command.)s 5512(In)s
+5785(addition)s 6643(to)s 6899(the)s 7264(symbols)s 8130(ordinarily)s
+0 3019(a)m 4(v)k 6(ailable)k 908(within)s 1576(the)s
+1924(body)s 2458(of)s 220 fnt35 2729 3016(@Filter)m 240 fnt82
+3438 3019(,)m 3545(there)s 4078(are)s 4425(three)s 4958(others:)s
+220 fnt35 0 2513(@FilterIn)m 240 fnt82 1920 2516(the)m 2273(name)s
+2852(of)s 3128(a)s 3299(\207le)s 3665(which)s 4312(will,)s
+4795(at)s 5032(the)s 5385(time)s 5870(the)s 6223(system)s
+6952(command)s 7959(is)s 8175(e)s 3(x)k 3(ecuted,)k
+1920 2228(contain)m 2726(the)s 3119(actual)s 3789(right)s 4345(or)s
+4649(body)s 5228(parameter)s 6287(of)s 6603(the)s 6996(symbol,)s
+7853(e)s 3(xactly)k 8639(as)s 8934(it)s 1920 1940(appears)m
+2701(in)s 2944(the)s 3292(input)s 3844(\207le;)s 220 fnt35
+0 1434(@FilterOut)m 240 fnt82 1920 1437(the)m 2305(name)s 2916(of)s
+3224(a)s 3427(\207le)s 3826(of)s 4134(Lout)s 4683(te)s 3(xt)k
+5135(whose)s 5840(contents)s 6726(Lout)s 7275(will)s 7738(read)s
+8244(after)s 8778(the)s 1920 1149(system)m 2657(command)s 3673(has)s
+4057(\207nished,)s 4936(as)s 5200(a)s 5380(replacement)s 6620(for)s
+6972(what)s 7511(w)s 2(as)k 7946(put)s 8326(into)s
+8765(\207le)s 220 fnt35 1920 858(@FilterIn)m 240 fnt82 2798 861(;)m
+220 fnt35 0 374(@FilterErr)m 240 fnt82 1920 377(the)m 2273(name)s
+2852(of)s 3129(a)s 3300(\207le)s 3667(that)s 4090(Lout)s
+4608(will)s 5039(attempt)s 5820(to)s 6065(read)s 6539(after)s
+7041(the)s 7394(system)s 8124(command)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 21 27
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(2.4.)m 454(F)s 10(ilter)k 8(ed)k
+1271(right)s 1800(and)s 2226(body)s 2748(par)s 3(ameter)k 2(s)k
+240 fnt84 8839 13840(21)m 240 fnt82 1920 13205(has)m 2281(\207nished,)s
+3137(containing)s 4191(error)s 4705(messages)s 5649(produced)s 6589(by)s
+6874(the)s 7213(command)s 8206(that)s 8614(Lout)s 1920 12917(will)m
+2346(pass)s 2809(on)s 3106(to)s 3345(the)s 3693(user)s
+4151(as)s 4401(non-f)s 2(atal)k 5316(errors.)s 6036(Use)s
+6464(of)s 6735(this)s 7131(\207le)s 7492(is)s 7702(optional.)s
+0 12414(It)m 205(is)s 415(a)s 581(f)s 2(atal)k
+1057(error)s 1580(for)s 1918(the)s 2266(system)s 2990(command)s
+3992(to)s 4231(return)s 4858(a)s 5024(non-zero)s 5927(status.)s
+480 12040(No)m 6(w)k 1001(the)s 220 fnt35 1356 12037(sor)m -8(t)k
+240 fnt82 1793 12040(command)m 2802(has)s 3179(options)s 220 fnt35
+3942 12037(-u)m 240 fnt82 4190 12040(for)m 4535(deleting)s 5365(duplicate)s
+6304(lines,)s 6869(and)s 220 fnt35 7280 12037(-r)m 240 fnt82
+7493 12040(for)m 7838(re)s 6(v)k 3(ersing)k 8778(the)s
+0 11752(sorting)m 717(order)s 13(.)k 1372(So)s 1678(the)s
+2026(result)s 2616(of)s 220 fnt35 480 11251(@Sor)m -8(t)k
+480 10963(    @Options { -r -u })m 480 10675({)m 480 10387(A)m 6(usten, J)k 4(ane)k
+480 10099(Dic)m 4(k)k 4(ens)k 3(, Char)k -3(les)k
+480 9811(Eliot, George)m 480 9523(Hardy)m 22(, )k 11(Thomas)k 480 9235(Bront{@Char edieresis}, Char)m -3(lotte)k
+480 8947(})m 240 fnt82 0 8453(is)m 480 8000(Hardy)m 15(,)k
+1170(Thomas)s 480 7712(Eliot,)m 1051(Geor)s 4(ge)k 480 7424(Dick)m 2(ens,)k
+1369(Charles)s 480 7136(Bront\353,)m 1238(Charlotte)s 480 6848(Austen,)m 1265(Jane)s
+0 6364(Unlik)m 2(e)k 705(all)s 998(the)s 1347(other)s
+1898(e)s 3(xamples)k 2849(in)s 3093(this)s 3489(manual,)s
+4300(this)s 4697(output)s 5369(is)s 5579(simulated.)s 6673(This)s
+7149(w)s 2(as)k 7570(done)s 8093(so)s 8359(that)s
+8778(the)s 0 6076(ability)m 661(to)s 896(format)s 1588(this)s
+1980(manual)s 2735(is)s 2942(not)s 3304(dependent)s 4344(on)s
+4637(the)s 4981(e)s 3(xistence)k 5919(of)s 6187(the)s
+6531(Unix)s 220 fnt35 7061 6073(sor)m -8(t)k 240 fnt82
+7487 6076(command,)m 8534(and)s 8934(it)s 0 5788(highlights)m 1008(the)s
+1356(f)s 2(act)k 1771(that)s 2189(\207ltered)s 2923(actual)s
+3548(parameters)s 4646(are)s 4993(by)s 5287(their)s 5784(nature)s
+6437(of)s 6708(uncertain)s 7654(portability)s 15(.)k 480 5414(There)m
+1114(is)s 1345(no)s 1660(need)s 2191(for)s 2550(an)s
+2855(actual)s 3501(\207ltered)s 4257(parameter)s 5292(to)s 5552(obe)s 3(y)k
+6091(the)s 6460(le)s 3(xical)k 7169(rules)s 7706(of)s
+7998(Lout,)s 8579(since)s 0 5126(it)m 207(is)s 432(passed)s
+1143(directly)s 1941(to)s 2195(the)s 2558(other)s 3124(program.)s
+4113(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+5088(Lout)s 5615(must)s 6155(be)s 6452(able)s 6921(to)s
+7175(w)s 2(ork)k 7741(out)s 8122(where)s 8778(the)s
+0 4838(parameter)m 1034(ends,)s 1601(which)s 2263(gi)s 6(v)k 3(es)k
+2831(rise)s 3251(to)s 3511(the)s 3879(follo)s 6(wing)k
+4877(rules.)s 5525(As)s 5863(with)s 6365(a)s 6552(body)s
+7106(parameter)s 9(,)k 8179(a)s 8366(symbol)s 220 fnt35
+0 4547(@Sym)m 240 fnt82 730 4550(with)m 1235(a)s 1423(\207ltered)s
+2180(parameter)s 3217(must)s 3764(be)s 4069(in)s 9(v)k 4(ok)k 2(ed)k
+4906(in)s 5172(either)s 5798(the)s 6168(form)s 220 fnt35
+6715 4547(@Sym { ...)m 13( })k 240 fnt82 7949 4550(or)m 8231(the)s
+8602(form)s 220 fnt35 0 4259(@Sym @Begin ...)m 13( @End @Sym)k 240 fnt82
+3120 4262(,)m 3251(plus)s 3725(options)s 4505(as)s 4779(usual.)s
+5472(In)s 5753(the)s 6125(former)s 6858(case,)s 7400(braces)s
+8085(within)s 8778(the)s 0 3974(actual)m 625(parameter)s 1639(must)s
+2164(match;)s 2860(in)s 3103(the)s 3451(latter)s 4000(case,)s
+4518(the)s 4866(actual)s 5491(parameter)s 6505(may)s 6971(not)s
+7337(contain)s 220 fnt35 8098 3971(@End)m 240 fnt82 8699 3974(.)m
+480 3600(If)m 725(an)s 1024(actual)s 1664(\207ltered)s 2414(parameter)s
+3444(contains)s 220 fnt35 4307 3597(@Include)m 240 fnt82 5229 3600(,)m
+5352(this)s 5764(is)s 5989(tak)s 2(en)k 6578(to)s
+6833(be)s 3(gin)k 7434(a)s 7616(Lout)s 220 fnt35
+8144 3597(@Include)m 240 fnt82 0 3312(directi)m 6(v)k 3(e)k
+882(in)s 1125(the)s 1473(usual)s 2033(form)s 2557(\(Section)s
+3410(3.40\):)s 220 fnt35 480 2821(@Sor)m -8(t {)k 480 2533(A)m 6(usten, J)k 4(ane)k
+480 2245(@Include { authors })m 480 1957(Hardy)m 22(, )k 11(Thomas)k 480 1669(})m
+240 fnt82 0 1175(The)m 421(included)s 1296(\207le)s 1649(becomes)s
+2530(part)s 2954(of)s 220 fnt35 3217 1172(@FilterIn)m 240 fnt82
+4095 1175(,)m 4195(b)s 4(ut)k 4549(an)s 3(y)k
+4939(braces,)s 220 fnt35 5649 1172(@Include)m 240 fnt82 6571 1175(,)m
+6670(or)s 220 fnt35 6922 1172(@End)m 240 fnt82 7576 1175(within)m
+8236(it)s 8421(are)s 8760(not)s 0 887(noticed)m 762(by)s
+1056(Lout.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 22 28
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(22)m 240 fnt83 7257 13843(Chapter)m 8107(2.)s
+8381(Details)s 240 fnt82 480 13205(The)m 928(\207rst)s 1380(character)s
+2335(of)s 2627(\207le)s 220 fnt35 3009 13202(@FilterIn)m 240 fnt82
+3968 13205(will)m 4415(be)s 4718(the)s 5087(\207rst)s 5539(non-white)s
+6586(space)s 7194(character)s 8149(follo)s 6(wing)k 0 12917(the)m
+353(opening)s 220 fnt35 1184 12914({)m 240 fnt82 1314 12917(or)m
+220 fnt35 1579 12914(@Begin)m 240 fnt82 2348 12917(,)m 2461(or)s
+2726(the)s 3080(\207rst)s 3517(character)s 4457(of)s 4734(an)s
+5023(included)s 5911(\207le)s 6278(if)s 220 fnt35 6501 12914(@Include)m
+240 fnt82 7489 12917(comes)m 8157(\207rst.)s 8698(The)s 0 12629(second-last)m
+1146(character)s 2091(of)s 2374(\207le)s 220 fnt35 2746 12626(@FilterIn)m
+240 fnt82 3696 12629(will)m 4133(be)s 4427(the)s 4786(last)s
+5189(non-white)s 6226(space)s 6825(character)s 7770(preceding)s 8778(the)s
+0 12341(closing)m 220 fnt35 745 12338(})m 240 fnt82 871 12341(or)m
+220 fnt35 1132 12338(@End @Sym)m 240 fnt82 2454 12341(,)m 2563(or)s
+2824(the)s 3174(last)s 3567(character)s 4503(of)s 4775(an)s
+5060(included)s 5944(\207le)s 6307(if)s 220 fnt35 6526 12338(@Include)m
+240 fnt82 7510 12341(comes)m 8174(last.)s 8671(One)s 0 12053(ne)m 6(wline)k
+833(character)s 1794(is)s 2030(al)s 2(w)k 2(ays)k
+2768(appended)s 3770(and)s 4201(is)s 4437(the)s 4812(last)s
+5229(character)s 6190(of)s 6487(\207le)s 220 fnt35 6875 12050(@FilterIn)m
+240 fnt82 7753 12053(.)m 7943(This)s 8446(ef)s 6(fects)k
+0 11765(a)m 206(compromise)s 1484(between)s 2378(the)s 2766(Lout)s
+3319(con)s 9(v)k 3(ention,)k 4518(that)s 4976(spaces)s
+5691(follo)s 6(wing)k 220 fnt35 6708 11762({)m 240 fnt82
+6873 11765(or)m 7172(preceding)s 220 fnt35 8208 11762(})m 240 fnt82
+8372 11765(are)m 8760(not)s 0 11477(signi\207cant,)m 1103(with)s 1585(the)s
+1933(Unix)s 2467(con)s 9(v)k 3(ention)k 3576(that)s
+3994(all)s 4287(te)s 3(xt)k 4702(\207les)s 5151(end)s
+5555(with)s 6037(a)s 6203(ne)s 6(wline)k 7010(character)s 13(.)k
+240 fnt84 0 10684(2.5.)m 471(Pr)s 4(ecedence)k 1677(and)s
+2118(associati)s 2(vity)k 3420(of)s 3692(symbols)s 240 fnt82
+480 10207(Ev)m 3(ery)k 1131(symbol)s 1920(in)s 2192(Lout)s
+2733(has)s 3132(a)s 240 fnt83 3327 10209(pr)m 8(ecedence)k
+240 fnt82 4401 10207(,)m 4538(which)s 5209(is)s 5448(a)s
+5643(positi)s 6(v)k 3(e)k 6476(whole)s 7146(number)s 13(.)k
+8057(When)s 8716(tw)s 2(o)k 0 9919(symbols)m 849(compete)s
+1715(for)s 2053(an)s 2336(object,)s 3027(the)s 3375(one)s
+3777(with)s 4259(the)s 4607(higher)s 5278(precedence)s 6409(wins)s
+6912(it.)s 7208(F)s 3(or)k 7597(e)s 3(xample,)k
+220 fnt35 480 9418(a  |  b  /  c)m 240 fnt82 0 8963(is)m 210(equi)s 6(v)k 6(alent)k
+1253(to)s 220 fnt35 1491 8960({)m 1616(a)s 1794(|)s
+1892(b)s 2067(})s 2192(/)s 2317(c)s 240 fnt82
+2482 8963(rather)m 3097(than)s 220 fnt35 3565 8960(a)m 3743(|)s
+3841({)s 3966(b)s 4141(/)s 4266(c)s 4432(})s
+240 fnt82 4496 8963(,)m 4603(because)s 220 fnt35 5415 8960(|)m
+240 fnt82 5511 8963(has)m 5881(higher)s 6551(precedence)s 7681(than)s
+220 fnt35 8150 8960(/)m 240 fnt82 8273 8963(and)m 8676(thus)s
+0 8675(wins)m 503(the)s 220 fnt35 851 8672(b)m 240 fnt82
+965 8675(.)m 480 8301(When)m 1149(the)s 1538(tw)s 2(o)k
+1988(competing)s 3092(symbols)s 3981(ha)s 4(v)k 3(e)k
+4523(equal)s 5137(precedence,)s 6359(Lout)s 6912(applies)s 7680(a)s
+7887(second)s 8651(rule.)s 0 8013(Each)m 545(symbol)s 1316(is)s
+1537(either)s 240 fnt83 2151 8015(left-associative)m 240 fnt82 3659 8013(or)m
+240 fnt83 3929 8015(right-associative)m 240 fnt82 5528 8013(.)m 5703(The)s
+6142(v)s 6(alue)k 6720(of)s 220 fnt35 7002 8010(a)m
+7180(op1)s 7564(b)s 7739(op2)s 8156(c)s 240 fnt82
+8332 8013(is)m 8553(tak)s 2(en)k 0 7725(to)m 252(be)s
+220 fnt35 547 7722({)m 672(a)s 850(op1)s 1234(b)s
+1409(})s 1534(op2)s 1951(c)s 240 fnt82 2129 7725(if)m
+2359(the)s 2720(symbols)s 3582(are)s 3942(both)s 4438(left-associati)s 6(v)k 3(e,)k
+5993(and)s 220 fnt35 6410 7722(a op1 { b op2 c })m 240 fnt82 8072 7725(if)m
+8302(the)s 3(y)k 8779(are)s 0 7437(right-associati)m 6(v)k 3(e.)k
+1733(In)s 1989(cases)s 2544(not)s 2910(co)s 3(v)k 3(ered)k
+3719(by)s 4013(these)s 4560(tw)s 2(o)k 4970(rules,)s
+5541(use)s 5916(braces.)s 480 7063(It)m 672(sometimes)s 1732(happens)s
+2554(that)s 2959(the)s 3294(result)s 3870(is)s 4067(the)s
+4402(same)s 4935(re)s 3(g)k 1(ardless)k 5937(of)s
+6195(ho)s 6(w)k 6642(the)s 6977(e)s 3(xpression)k
+8041(is)s 8237(grouped.)s 0 6775(F)m 3(or)k 382(e)s 3(xample,)k
+220 fnt35 1289 6772({)m 1414(a)s 1592(|)s 1690(b)s
+1865(})s 1990(|)s 2088(c)s 240 fnt82 2246 6775(and)m
+220 fnt35 2643 6772(a)m 2821(|)s 2919({)s 3044(b)s
+3219(|)s 3317(c)s 3483(})s 240 fnt82 3599 6775(are)m
+3939(al)s 2(w)k 2(ays)k 4643(the)s 4984(same,)s
+5575(for)s 5905(an)s 3(y)k 6295(combination)s 7541(of)s
+7805(objects,)s 8581(g)s 1(aps,)k 0 6487(and)m 416(v)s 6(ariants)k
+1230(of)s 220 fnt35 1513 6484(|)m 240 fnt82 1550 6487(.)m
+1727(In)s 1995(such)s 2504(cases)s 3071(the)s 3432(symbols)s
+4293(are)s 4653(said)s 5108(to)s 5360(be)s 240 fnt83
+5654 6489(associative)m 240 fnt82 6709 6487(,)m 6829(and)s 7245(we)s
+7593(can)s 7995(con\207dently)s 0 6199(omit)m 498(the)s 846(braces.)s
+480 5825(User)m 4(-de\207ned)k 1769(symbols)s 2618(may)s 3084(be)s
+3366(gi)s 6(v)k 3(en)k 3946(a)s 4112(precedence)s
+5243(and)s 5647(associati)s 6(vity:)k 220 fnt35 480 5324(def @Super)m
+480 5036(   precedence 50)m 480 4748(   associativity r)m -3(ight)k 480 4460(   left x)m 480 4172(   r)m -3(ight y)k
+480 3884({)m 480 3596(   @OneRo)m 3(w { | -2p @F)k 6(ont y ^/0.5fk x })k 480 3308(})m
+240 fnt82 0 2814(The)m 3(y)k 541(come)s 1113(just)s
+1516(after)s 2010(an)s 3(y)k 220 fnt35 2405 2811(into)m
+240 fnt82 2809 2814(clause)m 3460(and)s 3862(before)s 4526(an)s 3(y)k
+4921(parameter)s 5933(de\207nitions.)s 7105(The)s 7531(precedence)s 8660(may)s
+0 2526(be)m 280(an)s 3(y)k 674(whole)s 1313(number)s
+2101(between)s 2952(10)s 3245(and)s 3646(100,)s 4110(and)s
+4512(if)s 4726(omitted)s 5511(is)s 5719(assigned)s 6598(the)s
+6943(v)s 6(alue)k 7509(100.)s 8030(The)s 8455(higher)s
+0 2238(the)m 373(number)s 9(,)k 1227(the)s 1600(higher)s
+2296(the)s 2669(precedence.)s 3933(The)s 4386(associati)s 6(vity)k
+5654(may)s 6145(be)s 220 fnt35 6452 2235(left)m 240 fnt82
+6825 2238(or)m 220 fnt35 7109 2235(r)m -3(ight)k 240 fnt82
+7534 2238(,)m 7666(and)s 8095(if)s 8338(omitted)s 0 1950(def)m 2(aults)k
+805(to)s 220 fnt35 1044 1947(r)m -3(ight)k 240 fnt82
+1469 1950(.)m 1633(Lout')s 13(s)k 2295(symbols)s 3144(ha)s 4(v)k 3(e)k
+3645(the)s 3993(follo)s 6(wing)k 4970(precedences)s 6189(and)s
+6593(associati)s 6(vities:)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 23 29
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(2.5.)m 454(Pr)s 8(ecedence)k 1614(and)s
+2040(associativity)s 3290(of)s 3571(symbols)s 240 fnt84 8833 13840(23)m
+240 fnt82 480 13170(Precedence)m 1904(Associati)s 6(vity)k 3493(Symbols)s
+969 12594(5)m 2011(associati)s 6(v)k 3(e)k 220 fnt35
+3493 12591(/  ^/  //  ^//)m 240 fnt82 965 12306(6)m 2011(associati)s 6(v)k 3(e)k
+220 fnt35 3493 12303(|  ^|  ||  ^||)m 240 fnt82 968 12018(7)m 2011(associati)s 6(v)k 3(e)k
+220 fnt35 3493 12015(&  ^&)m 240 fnt82 968 11730(7)m 2011(associati)s 6(v)k 3(e)k
+220 fnt35 3493 11727(&)m 240 fnt82 3695 11730(in)m 3938(the)s
+4286(form)s 4810(of)s 5081(one)s 5483(or)s 5742(more)s
+6289(white)s 6876(space)s 7463(characters)s 685 11442(10-100)m 220 fnt35
+2012 11439(left)m 240 fnt82 2360 11442(or)m 220 fnt35 2619 11439(r)m -3(ight)k
+240 fnt82 3493 11442(user)m 4(-de\207ned)k 4729(symbols)s 844 11154(100)m
+220 fnt35 2316 11151(r)m -3(ight)k 3493(@Wide)s 240 fnt82
+4207 11154(,)m 220 fnt35 4314 11151(@High)m 240 fnt82 4973 11154(,)m
+220 fnt35 5080 11151(@Gr)m 2(aphic)k 240 fnt82 6064 11154(,)m
+6171(etc.)s 854 10866(101)m 2494(-)s 220 fnt35 3493 10863(&&)m
+240 fnt82 845 10578(102)m 2011(associati)s 6(v)k 3(e)k
+220 fnt35 3493 10575(&)m 240 fnt82 3695 10578(in)m 3938(the)s
+4286(form)s 4810(of)s 5081(0)s 5256(spaces)s 850 10290(103)m
+2494(-)s 3493(Body)s 4067(parameters)s 5165(and)s 5569(right)s
+6080(parameters)s 7178(of)s 220 fnt35 7449 10287(@Open)m 240 fnt82
+0 9749(Actually)m 883(the)s 1238(precedence)s 2375(of)s 2653(juxtaposition)s
+3965(\(tw)s 2(o)k 4461(objects)s 5195(separated)s 6162(by)s
+6462(zero)s 6933(spaces\))s 7691(is)s 7908(a)s 8080(little)s
+8579(more)s 0 9461(complicated.)m 1333(If)s 1565(either)s 2170(of)s
+2443(the)s 2793(tw)s 2(o)k 3205(objects)s 3934(is)s
+4146(enclosed)s 5043(in)s 5288(braces,)s 6007(the)s 6357(precedence)s
+7489(is)s 7701(7)s 7871(as)s 8123(for)s 8463(one)s
+8867(or)s 0 9173(more)m 541(spaces.)s 1322(If)s 1545(neither)s
+2262(object)s 2899(is)s 3102(enclosed)s 3991(in)s 4227(braces,)s
+4937(the)s 5279(precedence)s 6403(is)s 6606(102)s 7014(as)s
+7257(sho)s 6(wn)k 7927(abo)s 3(v)k 3(e.)k
+8650(This)s 0 8885(complicated)m 1216(rule)s 1633(seems)s 2258(to)s
+2486(accord)s 3171(better)s 3764(with)s 4235(what)s 4750(people)s
+5434(e)s 3(xpect)k 6104(and)s 6498(need)s 6998(in)s
+7230(practice)s 8031(than)s 8490(a)s 8645(pure)s 0 8597(precedence)m
+1131(rule)s 1558(can)s 1947(do.)s 240 fnt84 0 7804(2.6.)m
+471(The)s 926(style)s 1446(and)s 1887(size)s 2314(of)s
+2586(objects)s 240 fnt82 480 7327(This)m 944(section)s 1666(e)s 3(xplains)k
+2499(ho)s 6(w)k 2948(Lout)s 3448(determines)s 4535(the)s
+4870(style)s 5365(and)s 5757(size)s 6172(of)s 6431(each)s
+6914(object.)s 7650(T)s 19(ogether)k 9(,)k 8579(these)s
+0 7039(attrib)m 4(utes)k 935(determine)s 1946(the)s 2294(object')s 13(s)k
+3088(\207nal)s 3568(appearance)s 4699(in)s 4942(the)s 5290(output.)s
+480 6665(The)m 908(style)s 1415(of)s 1686(an)s 1969(object)s
+2613(comprises)s 3633(the)s 3981(follo)s 6(wing:)k 0 6162(\213)m
+480(Which)s 1175(font)s 1620(f)s 2(amily)k 15(,)k
+2333(f)s 2(ace)k 2784(and)s 3188(size)s 3615(to)s
+3854(use)s 4229(\(also)s 4746(de\207ning)s 5584(the)s 220 fnt35
+5932 6159(f)m 240 fnt82 6050 6162(unit\);)m 0 5659(\213)m 480(Whether)s
+1363(small)s 1935(capitals)s 2715(are)s 3062(in)s 3305(ef)s 6(fect)k
+3901(or)s 4160(not;)s 0 5156(\213)m 480(What)s 1058(g)s 1(ap)k
+1456(to)s 1695(replace)s 2440(a)s 2606(single)s 3233(space)s
+3820(between)s 4674(tw)s 2(o)k 5084(objects)s 5812(by)s
+6106(\(also)s 6623(de\207ning)s 7461(the)s 220 fnt35 7809 5153(s)m
+240 fnt82 7972 5156(unit\);)m 0 4653(\213)m 480(The)s 900(interpretation)s
+2235(to)s 2465(place)s 3017(on)s 3306(white)s 3884(space)s
+4463(separating)s 5490(tw)s 2(o)k 5891(objects)s 6611(\()s
+220 fnt35 6684 4650(lout)m 240 fnt82 7033 4653(,)m 220 fnt35
+7132 4650(compress)m 240 fnt82 8077 4653(,)m 220 fnt35 8175 4650(separ)m 2(ate)k
+240 fnt82 9019 4653(,)m 220 fnt35 480 4362(troff)m 240 fnt82
+855 4365(,)m 962(or)s 220 fnt35 1221 4362(te)m 6(x)k
+240 fnt82 1566 4365(as)m 1816(in)s 2059(Section)s 2833(3.5\);)s
+0 3871(\213)m 480(The)s 908(current)s 1644(v)s 6(alue)k
+2212(of)s 2483(the)s 220 fnt35 2831 3868(y)m 240 fnt82
+2999 3871(and)m 220 fnt35 3403 3868(z)m 240 fnt82 3567 3871(units)m
+4083(of)s 4354(measurement)s 5688(\(Section)s 6541(3.6\);)s 0 3370(\213)m
+480(The)s 908(kind)s 1392(of)s 1663(paragraph)s 2676(breaking)s
+3566(to)s 3805(emplo)s 2(y)k 4575(\()s 220 fnt35
+4648 3367(adjust)m 240 fnt82 5229 3370(,)m 220 fnt35 5336 3367(r)m 2(agged)k
+240 fnt82 6005 3370(,)m 6112(etc.\))s 0 2867(\213)m 480(What)s
+1058(g)s 1(ap)k 1456(to)s 1695(insert)s 2285(between)s
+3139(the)s 3487(lines)s 3989(of)s 4260(paragraphs)s 5360(\(also)s
+5877(de\207ning)s 6715(the)s 220 fnt35 7063 2864(v)m 240 fnt82
+7232 2867(unit\);)m 0 2364(\213)m 480(Whether)s 1363(to)s 1602(permit)s
+2285(h)s 1(yphenation)k 3525(or)s 3784(not;)s 0 1861(\213)m
+480(What)s 1058(colour)s 1729(the)s 2077(object)s 2721(is)s
+2931(to)s 3170(appear)s 3867(in;)s 0 1358(\213)m 480(The)s
+908(language)s 1828(of)s 2099(the)s 2447(object;)s 0 855(\213)m
+480(Whether)s 220 fnt35 1363 852(@V)m 17(Adjust)k 240 fnt82
+2320 855(,)m 220 fnt35 2427 852(@HAdjust)m 240 fnt82 3473 855(and)m
+220 fnt35 3877 852(@P)m 26(Adjust)k 240 fnt82 4885 855(are)m
+5232(in)s 5475(ef)s 6(fect.)k 0 355(The)m 423(style)s
+925(of)s 1191(an)s 1468(object)s 2107(depends)s 2938(on)s
+3229(where)s 3864(it)s 4051(appears)s 4827(in)s 5064(the)s
+5407(\207nal)s 5882(document.)s 6984(F)s 3(or)k 7368(e)s 3(xample,)k
+8277(the)s 8619(style)s 0 67(of)m 286(a)s 467(parameter)s
+1497(depends)s 2348(on)s 2661(where)s 3316(it)s 3524(is)s
+3749(used;)s 4316(the)s 4679(style)s 5201(of)s 5488(a)s
+5669(g)s 1(alle)k 3(y)k 6319(is)s 6544(the)s
+6908(style)s 7430(of)s 7717(the)s 8080(\207rst)s 8527(tar)s 4(get)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 24 30
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(24)m 240 fnt83 7257 13843(Chapter)m 8107(2.)s
+8381(Details)s 240 fnt82 0 13205(that)m 415(it)s 603(attempts)s
+1459(to)s 1695(attach)s 2318(itself)s 2862(to.)s 3208(Of)s
+3529(course,)s 4256(the)s 4600(style)s 5103(of)s 5371(an)s 3(y)k
+5764(object)s 6404(can)s 6789(be)s 7068(changed)s 7920(by)s
+8210(using)s 8778(the)s 220 fnt35 0 12914(@F)m 6(ont)k
+240 fnt82 652 12917(,)m 220 fnt35 759 12914(@Break)m 240 fnt82
+1555 12917(,)m 220 fnt35 1662 12914(@Space)m 240 fnt82 2499 12917(,)m
+220 fnt35 2606 12914(@SetColour)m 240 fnt82 3863 12917(or)m 220 fnt35
+4122 12914(@SetColor)m 240 fnt82 5197 12917(,)m 5304(and)s 220 fnt35
+5708 12914(@Language)m 240 fnt82 6959 12917(symbols.)m 480 12543(There)m 1112(are)s
+1479(no)s 1792(standard)s 2680(def)s 2(ault)k 3421(v)s 6(alues)k
+4097(for)s 4455(style,)s 5033(e)s 3(xcept)k 5734(that)s
+6172(small)s 6764(capitals)s 7564(are)s 7931(initially)s 8747(of)s 6(f,)k
+0 12255(the)m 369(interpretation)s 1734(of)s 2026(white)s 2635(space)s
+3243(is)s 3475(initially)s 220 fnt35 4292 12252(lout)m 240 fnt82
+4641 12255(,)m 4770(and)s 5195(the)s 5565(v)s 6(alues)k
+6242(of)s 6535(the)s 220 fnt35 6904 12252(y)m 240 fnt82
+7094 12255(and)m 220 fnt35 7519 12252(z)m 240 fnt82 7705 12255(units)m
+8242(are)s 8611(zero.)s 0 11967(Therefore)m 1000(one)s 1406(must)s
+1935(ensure)s 2619(that)s 3041(the)s 3392(root)s 3841(g)s 1(alle)k 3(y)k
+4479(or)s 4742(each)s 5241(of)s 5515(its)s 5795(components)s
+7007(is)s 7221(enclosed)s 8120(in)s 220 fnt35 8367 11964(@F)m 6(ont)k
+240 fnt82 9019 11967(,)m 220 fnt35 0 11676(@Break)m 240 fnt82
+796 11679(,)m 220 fnt35 906 11676(@SetColour)m 240 fnt82 2166 11679(or)m
+220 fnt35 2428 11676(@SetColor)m 240 fnt82 3503 11679(,)m 3613(and)s
+220 fnt35 4020 11676(@Language)m 240 fnt82 5274 11679(symbols.)m 6239(From)s
+6820(there)s 7356(the)s 7707(style)s 8217(is)s 8430(passed)s
+0 11391(to)m 240(incoming)s 1199(g)s 1(alle)k 3(ys)k
+1924(and)s 2330(the)s 2679(objects)s 3409(within)s 4078(them.)s
+4722(Enclosure)s 5735(in)s 220 fnt35 5980 11388(@Space)m 240 fnt82
+6878 11391(is)m 7090(not)s 7457(required)s 8313(because)s 0 11103(the)m
+220 fnt35 348 11100(s)m 240 fnt82 511 11103(unit)m 943(is)s
+1153(also)s 1591(set)s 1916(by)s 220 fnt35 2210 11100(@F)m 6(ont)k
+240 fnt82 2922 11103(\(Section)m 3775(3.5\).)s 536 10729(The)m 959(remainder)s
+1983(of)s 2249(this)s 2641(section)s 3370(e)s 3(xplains)k
+4210(ho)s 6(w)k 4667(the)s 5010(size)s 5433(of)s
+5699(each)s 6189(object)s 6829(\(its)s 7179(width)s 7777(and)s
+8176(height)s 8829(on)s 0 10441(the)m 353(printed)s 1094(page\))s
+1679(is)s 1895(determined.)s 3140(W)s 19(e)k 3514(will)s
+3946(treat)s 4434(width)s 5042(only)s 15(,)k 5566(since)s
+6118(height)s 6782(is)s 6997(determined)s 8136(in)s 8385(e)s 3(xactly)k
+0 10153(the)m 348(same)s 895(w)s 2(ay)k 15(,)k
+1384(e)s 3(xcept)k 2065(that)s 2483(the)s 2831(complications)s
+4223(introduced)s 5304(by)s 5598(paragraph)s 6611(breaking)s 7501(are)s
+7848(absent.)s 480 9779(W)m 9(ith)k 1006(three)s 1539(e)s 3(xceptions)k
+2611(\(see)s 3051(belo)s 6(w\),)k 3817(the)s 4165(width)s
+4768(of)s 5039(an)s 5323(object)s 5967(is)s 6178(as)s
+6428(lar)s 4(ge)k 6958(as)s 7208(it)s 7401(possibly)s
+8253(could)s 8844(be)s 0 9491(without)m 784(violating)s 1679(a)s
+220 fnt35 1837 9488(@Wide)m 240 fnt82 2603 9491(symbol)m 3355(or)s
+3606(intruding)s 4528(into)s 4945(the)s 5285(space)s 5864(occupied)s
+6778(by)s 7064(neighbouring)s 8386(g)s 1(aps)k 8867(or)s
+0 9203(objects.)m 841(As)s 1158(an)s 1441(aid)s 1791(to)s
+2030(in)s 9(v)k 3(estig)k 1(ating)k 3305(this)s
+3701(rule,)s 4179(we)s 4514(will)s 4940(use)s 5315(the)s
+5663(de\207nition)s 220 fnt35 480 8702(def @TightBo)m 6(x r)k -3(ight x)k
+480 8414({)m 480 8126(  "0 0 mo)m 3(v)k 5(eto xsiz)k 3(e 0 lineto xsiz)k 3(e ysiz)k 3(e lineto 0 ysiz)k 3(e lineto closepath strok)k 4(e")k
+480 7838(  @Gr)m 2(aphic x)k 480 7550(})m 240 fnt82 0 7055(which)m
+657(dra)s 3(ws)k 1291(a)s 1472(box)s 1903(around)s
+2641(the)s 3004(boundary)s 3978(of)s 4265(its)s 4556(right)s
+5082(parameter)s 6111(\(Section)s 6980(3.36\))s 7543(with)s 8040(no)s
+8349(mar)s 4(gin.)k 0 6767(The)m 428(result)s 1018(of)s
+220 fnt35 480 6316(5c @Wide @TightBo)m 6(x metempsychosis)k 240 fnt82 0 5817(is)m
+2835 215 0 106 240 288 60 480 5312 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke
+grestore
+0 52(metempsychosis)m 
+grestore
+0 4861(The)m 432(widest)s 1120(that)s 220 fnt35
+1542 4858(@TightBo)m 6(x metempsychosis)k 240 fnt82 4377 4861(could)m 4971(possibly)s
+5827(be)s 6113(is)s 6327(\207v)s 3(e)k 6743(centimetres,)s
+7954(and)s 8363(accord)s 8998(-)s 0 4573(ingly)m 552(that)s
+977(is)s 1194(its)s 1477(width.)s 2193(The)s 2628(same)s
+3182(applies)s 3917(to)s 220 fnt35 4163 4570(metempsychosis)m 240 fnt82
+5791 4573(,)m 5905(which)s 6554(is)s 6771(\207v)s 3(e)k
+7190(centimetres)s 8348(wide)s 8876(as)s 0 4285(well.)m 583(Note)s
+1113(carefully)s 2024(that)s 2451(there)s 2992(is)s 3211(no)s
+3513(object)s 4166(in)s 4418(this)s 4822(e)s 3(xample)k
+5694(whose)s 6371(width)s 6982(is)s 7200(equal)s 7782(to)s
+8030(the)s 8387(sum)s 8855(of)s 0 3997(the)m 348(widths)s
+1037(of)s 1308(the)s 1656(letters)s 2289(of)s 220 fnt35
+2560 3994(metempsychosis)m 240 fnt82 4188 3997(.)m 480 3623(The)m 903(\207rst)s
+1329(of)s 1595(the)s 1938(three)s 2466(e)s 3(xceptions)k
+3532(to)s 3766(the)s 4109(`as)s 4433(wide)s 4949(as)s
+5194(possible')s 6085(rule)s 6507(is)s 6712(the)s 220 fnt35
+7055 3620(@HContr)m 2(act)k 240 fnt82 8314 3623(symbol,)m 0 3335(which)m
+644(causes)s 1322(the)s 1672(width)s 2277(of)s 2551(its)s
+2829(right)s 3343(parameter)s 4360(to)s 4601(be)s 4886(reduced)s
+5703(to)s 5945(a)s 6114(reasonable)s 7194(minimum)s 8187(\(a)s
+8435(formal)s 0 3047(de\207nition)m 974(will)s 1400(not)s 1766(be)s
+2048(attempted\):)s 220 fnt35 480 2546(5c @Wide @HContr)m 2(act @TightBo)k 6(x metempsychosis)k
+240 fnt82 0 2047(produces)m 1572 215 0 106 240 288 60 480 1492 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke
+grestore
+0 52(metempsychosis)m 
+grestore
+0 1041(The)m 482(object)s
+220 fnt35 1180 1038(@HContr)m 2(act @TightBo)k 6(x metempsychosis)k 240 fnt82
+5334 1041(is)m 5598(still)s 6064(\207v)s 3(e)k 6530(centimetres)s
+7735(wide,)s 8361(b)s 4(ut)k 8778(the)s 0 753(object)m
+220 fnt35 644 750(@TightBo)m 6(x metempsychosis)k 240 fnt82 3475 753(has)m
+3845(been)s 4354(reduced.)s 480 379(The)m 922(second)s 1659(of)s
+1945(the)s 2307(three)s 2855(e)s 3(xceptions)k 3940(is)s
+4165(the)s 4527(horizontal)s 5565(concatenation)s 6965(symbol)s 220 fnt35
+7739 376(|)m 240 fnt82 7851 379(\(and)m 8348(also)s 220 fnt35
+8801 376(&)m 240 fnt82 8943 379(\).)m 0 91(Consider)m 924(this)s
+1320(e)s 3(xample:)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 25 31
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(2.6.)m 454(The)s 866(style)s 1356(and)s
+1782(size)s 2193(of)s 2474(objects)s 240 fnt84 8833 13840(25)m
+220 fnt35 480 13207(5c @Wide @TightBo)m 6(x { A  |1c  B  |1c  C })k 240 fnt82 0 12708(As)m
+317(usual,)s 929(the)s 1277(right)s 1788(parameter)s 2802(of)s
+220 fnt35 3073 12705(@Wide)m 240 fnt82 3847 12708(is)m 4057(\207v)s 3(e)k
+4469(centimetres)s 5620(wide,)s 6192(and)s 6596(the)s 6944(result)s
+7534(looks)s 8104(lik)s 2(e)k 8516(this:)s 2835 165 0 57 240 288 60 480 12203 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke
+grestore
+0 3(A)m
+737(B)s 1447(C)s 
+grestore
+0 11752(Lout)m 512(has)s 882(to)s
+1121(apportion)s 2095(the)s 2443(size)s 2870(minus)s 3506(inter)s 4(-column)k
+4793(g)s 1(aps)k 5282(among)s 5987(the)s 6335(three)s
+6868(columns.)s 480 11378(If)m 707(the)s 1052(columns)s 1911(are)s
+2255(wide)s 2772(enough)s 3532(to)s 3768(require)s 4497(paragraph)s
+5507(breaking,)s 6447(Lout)s 6956(will)s 7379(assign)s 8031(sizes)s
+8543(to)s 8778(the)s 0 11090(columns)m 864(in)s 1110(such)s
+1609(a)s 1778(w)s 2(ay)k 2232(as)s 2484(to)s
+2726(lea)s 4(v)k 3(e)k 3282(narro)s 6(w)k
+4010(columns)s 4875(unbrok)s 2(en)k 5837(and)s 6244(break)s
+6839(wider)s 7446(columns)s 8311(to)s 8553(equal)s 0 10802(width,)m
+652(occup)s 2(ying)k 1702(the)s 2051(full)s 2438(size.)s
+2974(Otherwise,)s 4064(paragraph)s 5077(breaking)s 5968(is)s 6179(not)s
+6546(required,)s 7450(and)s 7855(each)s 8351(column)s 0 10514(will)m
+431(be)s 719(assigned)s 1607(a)s 1779(reasonable)s 2863(minimum)s
+3858(size)s 4291(in)s 4540(the)s 4894(manner)s 5677(of)s
+220 fnt35 5953 10511(@HContr)m 2(act)k 240 fnt82 7157 10514(,)m
+7270(e)s 3(xcept)k 7957(that)s 8381(the)s 8735(last)s
+0 10226(column)m 775(recei)s 6(v)k 3(es)k 1599(all)s
+1892(the)s 2240(lefto)s 3(v)k 3(er)k 3036(width.)s
+3745(F)s 3(or)k 4134(e)s 3(xample,)k 220 fnt35
+480 9725(5c @Wide { @TightBo)m 6(x A  |1c  @TightBo)k 6(x B  |1c  @TightBo)k 6(x C })k 240 fnt82
+0 9226(has)m 370(result)s 170 165 0 57 240 288 60 480 8771 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke
+grestore
+0 3(A)m 
+grestore
+143 165 0 57 240 288 60 1217 8771 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke
+grestore
+0 3(B)m 
+grestore
+1388 165 0 57 240 288 60 1927 8771 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke
+grestore
+0 3(C)m
+
+grestore
+0 8320(If)m 237(it)s 436(is)s 653(desired)s 1408(that)s
+1833(the)s 2188(lefto)s 3(v)k 3(er)k 2991(width)s
+3600(remain)s 4327(unused,)s 5120(rather)s 5743(than)s 6219(going)s
+6825(into)s 7257(the)s 7612(last)s 8010(column,)s 8843(an)s
+0 8032(empty)m 654(column)s 1431(can)s 1822(be)s 2106(appended,)s
+3133(or)s 3394(the)s 3744(last)s 4137(column)s 4914(can)s
+5305(be)s 5589(enclosed)s 6486(in)s 220 fnt35 6731 8029(@HContr)m 2(act)k
+240 fnt82 7935 8032(.)m 8101(T)s 19(w)k 2(o)k
+8575(other)s 0 7744(w)m 2(ays)k 560(to)s 819(apportion)s
+1813(the)s 2181(lefto)s 3(v)k 3(er)k 2997(width)s
+3619(are)s 3986(pro)s 3(vided)k 4912(by)s 5226(the)s
+220 fnt35 5594 7741(@HExpand)m 240 fnt82 6787 7744(and)m 220 fnt35
+7211 7741(@HAdjust)m 240 fnt82 8277 7744(symbols)m 0 7456(\(Sections)m 940(3.12)s
+1414(and)s 1818(3.15\).)s 480 7082(The)m 914(third)s 1430(and)s
+1841(\207nal)s 2328(e)s 3(xception)k 3319(to)s 3565(the)s
+3920(`as)s 4255(wide)s 4783(as)s 5040(possible')s 5943(rule)s
+6377(concerns)s 7285(the)s 7640(components)s 8855(of)s 0 6794(the)m
+348(root)s 793(g)s 1(alle)k 3(y)k 15(.)k
+1522(Each)s 2057(is)s 2267(considered)s 3361(to)s 3600(be)s
+3882(enclosed)s 4777(in)s 220 fnt35 5020 6791(@HContr)m 2(act)k
+240 fnt82 6284 6794(and)m 220 fnt35 6688 6791(@VContr)m 2(act)k
+240 fnt82 7940 6794(symbols.)m 480 6420(Up)m 836(to)s 1086(this)s
+1493(point)s 2056(we)s 2401(ha)s 4(v)k 3(e)k
+2913(treated)s 3631(width)s 4244(as)s 4505(a)s 4681(single)s
+5319(quantity)s 15(,)k 6206(b)s 4(ut)k 6579(of)s
+6860(course)s 7551(it)s 7754(has)s 8135(tw)s 2(o)k
+8556(parts:)s 0 6132(width)m 602(to)s 841(left)s 1218(and)s
+1622(right)s 2133(of)s 2404(the)s 2752(mark.)s 3407(The)s
+3835(`as)s 4164(wide)s 4685(as)s 4935(possible')s 5831(rule)s
+6258(applies)s 6986(to)s 7225(both)s 7708(directions:)s 220 fnt35
+480 5631(@HContr)m 2(act { @TightBo)k 6(x 953^.05 /0.5c @TightBo)k 6(x 2^.8286 })k 240 fnt82
+0 5132(has)m 370(result)s 877 170 344 59 240 288 60 480 4672 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke
+grestore
+0 5(953)m 344(.05)s 
+grestore
+877 167 344 57 240 288 60 480 4222 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke
+grestore
+230 3(2)m
+344(.8286)s 
+grestore
+0 3771(Lefto)m 3(v)k 3(er)k 868(width)s
+1461(usually)s 2197(goes)s 2678(to)s 2908(the)s 3247(right,)s
+3796(as)s 4037(we)s 4364(ha)s 4(v)k 3(e)k
+4856(seen,)s 5379(b)s 4(ut)k 5732(here)s 6190(some)s
+6742(width)s 7335(w)s 2(as)k 7747(a)s 4(v)k 6(ailable)k
+8646(only)s 0 3483(to)m 239(the)s 587(left)s 964(of)s
+220 fnt35 1235 3480(2.8286)m 240 fnt82 1958 3483(o)m 6(wing)k
+2604(to)s 2843(the)s 3191(column)s 3966(mark)s 4518(alignment.)s
+240 fnt84 0 2690(2.7.)m 471(Galleys)s 1282(and)s 1723(tar)s 2(gets)k
+240 fnt82 480 2213(The)m 909(beha)s 4(viour)k 1924(of)s
+2197(g)s 1(alle)k 3(ys)k 2923(and)s 3328(their)s
+3827(tar)s 4(gets,)k 4568(as)s 4820(described)s 5796(in)s
+6040(Section)s 6816(1.4,)s 7225(can)s 7616(be)s 7900(summarized)s
+0 1925(in)m 243(three)s 776(la)s 3(ws:)k 240 fnt83
+0 1473(F)m 10(ir)k 2(st)k 540(Law)s 240 fnt82
+949 1471(:)m 1139(The)s 1592(\207rst)s 2047(tar)s 4(get)k
+2671(is)s 2905(the)s 3278(closest)s 4012(in)s 9(v)k 4(ocation)k
+5091(of)s 5386(the)s 5759(tar)s 4(get)k 6382(symbol,)s
+7219(either)s 7846(preceding)s 8867(or)s 0 1183(follo)m 6(wing)k
+972(the)s 1315(in)s 9(v)k 4(ocation)k 2363(point)s
+2910(of)s 3175(the)s 3518(g)s 1(alle)k 3(y)k
+4146(as)s 4391(required,)s 5288(which)s 5925(has)s 6289(suf\207cient)s
+7233(space)s 7814(to)s 8048(recei)s 6(v)k 3(e)k
+8778(the)s 0 895(\207rst)m 431(component;)s 240 fnt83 0 392(Second)m
+773(Law)s 240 fnt82 1182 390(:)m 1364(Each)s 1915(subsequent)s
+3055(tar)s 4(get)k 3670(is)s 3896(the)s 4259(closest)s
+4985(in)s 9(v)k 4(ocation)k 6055(of)s 6342(the)s
+6706(tar)s 4(get)k 7321(symbol,)s 8149(follo)s 6(wing)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 26 32
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(26)m 240 fnt83 7257 13843(Chapter)m 8107(2.)s
+8381(Details)s 240 fnt82 0 13205(the)m 337(pre)s 6(vious)k
+1195(tar)s 4(get)k 1783(and)s 2176(lying)s 2710(within)s
+3367(the)s 3704(same)s 4240(g)s 1(alle)k 3(y)k 15(,)k
+4901(which)s 5532(has)s 5891(suf\207cient)s 6829(space)s 7405(to)s
+7633(recei)s 6(v)k 3(e)k 8358(the)s 8695(\207rst)s
+0 12917(remaining)m 1022(component;)s 240 fnt83 0 12414(Thir)m 8(d)k
+607(Law)s 240 fnt82 1016 12412(:)m 1199(A)s 1446(recepti)s 6(v)k 3(e)k
+2385(symbol)s 3162(that)s 3597(does)s 4104(not)s 4487(recei)s 6(v)k 3(e)k
+5240(at)s 5489(least)s 6003(one)s 6422(component)s 7563(of)s
+7851(an)s 3(y)k 8265(g)s 1(alle)k 3(y)k
+8916(is)s 0 12124(replaced)m 867(by)s 220 fnt35 1161 12121(@Null)m
+240 fnt82 1746 12124(.)m 0 11621(The)m 436(terms)s 1025(`closest,)s 16(')k
+1918(`preceding,)s 16(')k 3104(and)s 3516(`follo)s 6(wing')k
+4639(refer)s 5156(to)s 5403(position)s 6239(in)s 6490(the)s
+6846(\207nal)s 7334(printed)s 8078(document.)s 0 11333(This)m 476(section)s
+1210(e)s 3(xplains)k 2055(the)s 2403(operation)s 3363(of)s
+3634(these)s 4181(la)s 3(ws)k 4667(in)s 4910(Basser)s
+5607(Lout.)s 480 10959(When)m 1100(a)s 1257(g)s 1(alle)k 3(y)k
+1881(cannot)s 2570(be)s 2843(\207tted)s 3382(into)s 3798(just)s
+4194(one)s 4586(tar)s 4(get,)k 5223(Lout)s 5726(must)s
+6241(\207nd)s 6663(points)s 7290(in)s 7523(the)s 7862(g)s 1(alle)k 3(y)k
+8486(where)s 0 10671(it)m 191(can)s 579(be)s 860(split)s
+1330(in)s 1572(tw)s 2(o.)k 2091(The)s 2518(object)s
+3161(lying)s 3705(between)s 4558(tw)s 2(o)k 4966(neighbouring)s
+6295(potential)s 7185(split)s 7655(points)s 8290(is)s 8498(called)s
+0 10383(a)m 240 fnt83 166 10385(component)m 240 fnt82 1281 10383(of)m
+1552(the)s 1900(g)s 1(alle)k 3(y)k 15(.)k
+2629(By)s 2963(de\207nition,)s 3987(a)s 4153(component)s 5277(cannot)s
+5975(be)s 6257(split.)s 480 10009(T)m 19(o)k 813(determine)s
+1857(the)s 2239(components)s 3480(of)s 3785(a)s 3984(g)s 1(alle)k 3(y)k 15(,)k
+4690(e)s 3(xpand)k 5470(all)s 5797(symbols)s 6679(other)s
+7264(than)s 7766(recursi)s 6(v)k 3(e)k 8722(and)s
+0 9721(recepti)m 6(v)k 3(e)k 909(ones,)s 1442(discard)s
+2177(all)s 220 fnt35 2457 9718(@F)m 6(ont)k 240 fnt82
+3109 9721(,)m 220 fnt35 3203 9718(@Break)m 240 fnt82 3999 9721(,)m
+220 fnt35 4093 9718(@Space)m 240 fnt82 4930 9721(,)m 220 fnt35
+5024 9718(@SetColor)m 240 fnt82 6099 9721(,)m 220 fnt35 6193 9718(@SetColour)m
+240 fnt82 7390 9721(,)m 7484(and)s 220 fnt35 7875 9718(@Language)m
+240 fnt82 0 9433(symbols,)m 908(perform)s 1740(paragraph)s 2756(breaking)s
+3649(as)s 3902(required,)s 4809(and)s 5216(discard)s 5967(all)s
+6263(redundant)s 7283(braces.)s 8060(Then)s 8613(vie)s 6(w)k
+0 9145(the)m 367(g)s 1(alle)k 3(y)k 1020(as)s
+1290(a)s 1475(sequence)s 2428(of)s 2718(one)s 3140(or)s
+3418(more)s 3984(objects)s 4732(separated)s 5711(by)s 6025(v)s 3(ertical)k
+6811(concatenation)s 8216(symbols;)s 0 8857(these)m 567(are)s 935(the)s
+1304(components)s 2533(and)s 2958(split)s 3450(points,)s 4163(e)s 3(xcept)k
+4865(that)s 5304(concatenation)s 6710(symbols)s 7580(whose)s 8269(g)s 1(aps)k
+8779(are)s 0 8569(unbreakable)m 1225(\(Section)s 2078(3.2\))s 2506(are)s
+2853(not)s 3219(eligible)s 3991(to)s 4230(be)s 4512(split)s
+4983(points.)s 5732(F)s 3(or)k 6121(e)s 3(xample,)k
+7035(gi)s 6(v)k 3(en)k 7615(the)s 7963(de\207nition)s
+220 fnt35 480 8068(def @Section into { @SectionPlace&&preceding })m 480 7780(    named @Title {})m 480 7492(    r)m -3(ight @Body)k
+480 7204({)m 480 6916(    15p @F)m 6(ont { @Title //0.7f })k 480 6628(    //)m 480 6340(    @Body)m
+480 6052(})m 240 fnt82 0 5558(the)m 348(g)s 1(alle)k 3(y)k
+220 fnt35 480 5057(@Section)m 480 4769(    @Title { Introduction })m 480 4481({ )m 11(This is a subject that really)k
+480 4193(needs no introduction.)m 13( })k 240 fnt82 0 3699(becomes)m 220 fnt35
+480 3252(Introduction)m 480 2964(//0.7f)m 480 2676({})m 480 2388(//)m 480 2100(This is a subject that really needs)m
+480 1812(//1vx)m 480 1524(no introduction.)m 240 fnt82 0 1070(with)m 482(four)s
+939(components.)s 2260(If)s 220 fnt35 2489 1067(@Body)m 240 fnt82
+3269 1070(had)m 3673(been)s 4181(preceded)s 5102(by)s 220 fnt35
+5395 1067(|1.0c)m 240 fnt82 5921 1070(in)m 6164(the)s 6511(de\207nition,)s
+7535(the)s 7882(result)s 8471(w)s 2(ould)k 0 782(ha)m 4(v)k 3(e)k
+501(been)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 27 33
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(2.7.)m 454(Galle)s 7(ys)k 1232(and)s
+1658(tar)s 8(g)k 2(ets)k 240 fnt84 8831 13840(27)m
+220 fnt35 480 13211(Introduction)m 480 12923(//0.7f)m 480 12635({})m 480 12347(//)m
+480 12059(|1.0c { )m 11(This is a subject that really needs //1vx no introduction.)k 13( })k 240 fnt82 0 11561(with)m
+220 fnt35 524 11558(//1vx)m 240 fnt82 1089 11561(b)m 4(uried)k
+1796(within)s 2507(one)s 2951(component)s 4118(and)s 4564(hence)s
+5221(not)s 5629(a)s 5838(potential)s 6771(split)s 7285(point.)s
+7983(If)s 220 fnt35 8256 11558(0.7f)m 240 fnt82 8722 11561(had)m
+0 11273(been)m 220 fnt35 525 11270(0.7fu)m 240 fnt82 999 11273(,)m
+1123(the)s 1488(g)s 1(ap)k 1903(w)s 2(ould)k
+2575(ha)s 4(v)k 3(e)k 3092(been)s 3618(unbreakable)s
+4860(and)s 220 fnt35 5281 11270(//0.7fu)m 240 fnt82 5954 11273(w)m 2(ould)k
+6625(not)s 7008(ha)s 4(v)k 3(e)k 7526(been)s
+8052(a)s 8235(potential)s 0 10985(split)m 471(point.)s 480 10611(V)m 26(ersion)k
+1310(3.03)s 1816(has)s 2228(liberalized)s 3335(this)s 3773(some)s 6(what)k
+4840(in)s 5125(the)s 5515(follo)s 6(wing)k 6534(w)s 2(ay)k 15(.)k
+7122(When)s 7793(a)s 8002(component)s 0 10323(consists)m 808(of)s
+1080(a)s 1247(horizontal)s 2271(sequence)s 3205(of)s 3477(tw)s 2(o)k
+3887(or)s 4147(more)s 4695(objects)s 240 fnt83 5423 10325(A)m
+168 fnt78 5558 10232(1)m 240 fnt78 5637 10317(,)m 5746(\274)s
+6046(,)s 240 fnt83 6155 10325(A)m 168 fnt83 6290 10238(n)m
+240 fnt82 6431 10323(separated)m 7391(by)s 220 fnt35 7686 10320(|)m
+240 fnt82 7784 10323(\(not)m 220 fnt35 8229 10320(||)m 240 fnt82
+8323 10323(,)m 8431(not)s 220 fnt35 8798 10320(&)m 240 fnt82
+8940 10323(\),)m 0 10035(Lout)m 506(will)s 926(in)s 9(v)k 3(estig)k 1(ate)k
+1998(the)s 2339(component)s 3457(to)s 3690(see)s 4044(whether)s
+4868(it)s 5054(can)s 5436(be)s 5712(brok)s 2(en)k
+6426(up.)s 6823(It)s 7022(looks)s 7586(at)s 7811(each)s
+240 fnt83 8300 10037(A)m 168 fnt83 8435 9950(i)m 240 fnt82
+8533 10035(to)m 8765(see)s 0 9747(whether)m 830(it)s 1023(is)s
+1234(a)s 1401(v)s 3(ertical)k 2169(concatenation)s 3555(of)s
+3827(objects)s 240 fnt83 4556 9749(A)m 168 fnt83 4691 9662(i)m
+168 fnt78 4743 9656(1)m 240 fnt78 4822 9741(,)m 4932(\274)s
+5232(,)s 240 fnt83 5342 9749(A)m 168 fnt83 5477 9662(im)m
+240 fnt82 5641 9747(;)m 5754(if)s 5972(tw)s 2(o)k
+6383(or)s 6643(more)s 7191(of)s 7463(the)s 240 fnt83
+7812 9749(A)m 168 fnt83 7947 9662(i)m 240 fnt82 8052 9747(satisfy)m
+8730(this)s 0 9459(condition,)m 1009(the)s 1354(component)s 2475(will)s
+2898(not)s 3262(be)s 3541(brok)s 2(en)k 4258(up.)s
+4659(So)s 4962(no)s 6(w)k 5421(suppose)s 6246(we)s
+6578(ha)s 4(v)k 3(e)k 7076(just)s 7479(one)s
+240 fnt83 7878 9461(A)m 168 fnt83 8013 9374(i)m 240 fnt82
+8114 9459(which)m 8753(is)s 8960(a)s 0 9171(v)m 3(ertical)k
+757(concatenation.)s 2239(Lout)s 2741(will)s 3156(break)s 3738(the)s
+4076(component)s 5189(into)s 5604(one)s 5996(component)s 7109(for)s
+7437(each)s 7922(of)s 8182(the)s 240 fnt83 8520 9173(A)m
+168 fnt83 8655 9086(i)m 168 fnt78 8707 9080(1)m 240 fnt78
+8775 9165(,)m 8851(\274)s 3 8877(,)m 240 fnt83 80 8885(A)m
+168 fnt83 215 8798(im)m 240 fnt82 379 8883(,)m 476(pro)s 3(vided)k
+1373(that)s 1781(the)s 3(y)k 2234(are)s 2571(separated)s
+3521(by)s 220 fnt35 3806 8880(//)m 240 fnt82 3981 8883(symbols)m
+4820(\(not)s 220 fnt35 5255 8880(/)m 240 fnt82 5319 8883(\),)m
+5495(and)s 5890(pro)s 3(vided)k 6786(this)s 7172(can)s
+7551(be)s 7823(done)s 8335(without)s 0 8595(introducing)m 1155(an)s 3(y)k
+1550(apparent)s 2431(change)s 3164(into)s 3587(the)s 3933(appearance)s
+5062(of)s 5332(the)s 5678(component)s 6800(\(this)s 7274(second)s
+7995(rule)s 8420(will)s 8844(be)s 0 8307(satis\207ed)m 847(if)s
+1071(the)s 1426(other)s 240 fnt83 1984 8309(A)m 168 fnt83
+2119 8222(j)m 240 fnt82 2232 8307(are)m 2586(not)s 2959(v)s 3(ery)k
+3442(lar)s 4(ge\).)k 4165(The)s 4600(e)s 3(xample)k
+5470(abo)s 3(v)k 3(e)k 6099(satis\207es)s 6913(all)s
+7213(these)s 7767(rules)s 8289(and)s 8700(will)s 0 7996(be)m
+282(brok)s 2(en)k 1002(up)s 1295(into)s 1720(tw)s 2(o)k
+2130(components,)s 3394(so)s 3660(the)s 220 fnt35 4008 7993(//1vx)m
+240 fnt82 4530 7996(becomes)m 5418(a)s 5584(potential)s 6475(split)s
+6946(point)s 7498(after)s 7994(all.)s 480 7622(The)m 913(lines)s
+1421(of)s 1697(a)s 1869(paragraph)s 2887(become)s 3693(separate)s
+4536(components)s 5750(if)s 5972(the)s 6326(paragraph)s 7344(occupies)s
+8238(an)s 8527(entire)s 0 7334(component)m 1151(before)s 1844(breaking;)s
+2820(otherwise)s 3833(the)s 3(y)k 4323(are)s 4697(enclosed)s
+5619(in)s 5890(a)s 220 fnt35 6083 7331(@OneRo)m 3(w)k
+240 fnt82 7241 7334(symbol)m 8028(within)s 8724(one)s 0 7046(component.)m
+1237(The)s 1675(same)s 2232(is)s 2452(true)s 2888(of)s
+3169(incoming)s 4136(components)s 5354(of)s 5635(other)s 6195(g)s 1(alle)k 3(ys.)k
+7042(If)s 7282(a)s 220 fnt35 7458 7043(@Galle)m 4(y)k
+240 fnt82 8366 7046(symbol)m 0 6758(occupies)m 892(an)s 1180(entire)s
+1783(component)s 2912(by)s 3211(the)s 3563(rules)s 4083(abo)s 3(v)k 3(e,)k
+4761(then)s 5234(the)s 5587(incoming)s 6549(components)s 7761(that)s
+8184(replace)s 8934(it)s 0 6470(become)m 800(components)s 2008(of)s
+2279(their)s 2776(ne)s 6(w)k 3223(home:)s 220 fnt35
+480 5916(An e)m 6(xample)k 480 5628(//0.5c)m 480 5340(@Galle)m 4(y)k
+480 5052(//0.5c)m 480 4764(@SomethingList)m 240 fnt78 2500 5625(\336)m 220 fnt35
+3141 5916(An e)m 6(xample)k 3141 5628(//0.5c)m 3141 5340(Incoming components)m 3141 5052(//0.2c)m
+3141 4764(from some other galle)m 4(y)k 3141 4476(//0.5c)m 3141 4188(@SomethingList)m 240 fnt82
+0 3632(Otherwise)m 1062(the)s 1435(incoming)s 2416(components)s 3649(are)s
+4020(grouped)s 4888(within)s 5580(a)s 220 fnt35 5771 3629(@OneRo)m 3(w)k
+240 fnt82 6926 3632(symbol)m 7711(and)s 8139(lie)s 8458(within)s
+0 3344(one)m 402(component.)s 480 2970(This)m 985(distinction)s 2080(has)s
+2480(a)s 2675(mark)s 2(ed)k 3477(ef)s 6(fect)k
+4103(on)s 4429(the)s 4806(v)s 3(ertical)k 5603(concatenation)s
+7017(symbol)s 220 fnt35 7806 2967(//1.1b)m 240 fnt82 8347 2970(,)m
+8484(which)s 0 2682(calls)m 509(for)s 868(more)s 1436(space)s
+2045(than)s 2535(is)s 2766(a)s 4(v)k 6(ailable)k
+3695(\(Section)s 4570(3.2\).)s 5134(There)s 5768(is)s 5999(no)s
+6314(room)s 6900(for)s 7259(this)s 7676(symbol)s 8458(within)s
+0 2394(an)m 3(y)k 402(component,)s 1579(so)s 1851(it)s
+2049(will)s 2481(force)s 3033(a)s 3205(split)s 3682(and)s
+4092(be)s 4379(discarded)s 5359(in)s 5608(that)s 6032(case.)s
+6613(But)s 7025(it)s 7223(can)s 7618(be)s 7906(promoted)s
+8887(to)s 0 2106(between)m 854(tw)s 2(o)k 1264(components.)s
+480 1732(Components)m 1749(may)s 2223(be)s 2513(separated)s 3481(by)s
+220 fnt35 3783 1729(/)m 240 fnt82 3914 1732(as)m 4172(well)s
+4646(as)s 4904(by)s 220 fnt35 5206 1729(//)m 240 fnt82
+5331 1732(,)m 5445(gi)s 6(ving)k 6112(rise)s 6520(to)s
+6767(column)s 7550(mark)s 8110(alignment)s 0 1444(between)m 854(adjacent)s
+1710(components:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 28 34
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(28)m 240 fnt83 7257 13843(Chapter)m 8107(2.)s
+8381(Details)s gsave
+480 12008 translate
+240 fnt82 1701 1360 567 1360 240 288 60 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1701 1360 567 1360 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+1134 340 567 340 240 288 60 0 1020 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath 0.8 setgray fill
+grestore
+
+grestore
+1134 340 0 340 240 288 60 567 510 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath 0.8 setgray fill
+grestore
+
+grestore
+736 340 283 340 240 288 60 284 0 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath 0.8 setgray fill
+grestore
+
+grestore
+
+grestore
+end end restore
+grestore
+240 fnt82 0 11557(When)m 688(aligned)s 1509(components)s
+2777(are)s 3183(promoted)s 4218(into)s 4702(dif)s 6(ferent)k
+5637(tar)s 4(gets,)k 6435(the)s 6843(meaning)s 7779(of)s
+8110(alignment)s 0 11269(becomes)m 882(v)s 3(ery)k 1351(doubtful.)s
+2319(F)s 3(or)k 2702(e)s 3(xample,)k 3609(what)s
+4127(if)s 4338(the)s 4679(tar)s 4(gets)k 5355(are)s
+5696(in)s 5932(dif)s 6(ferent)k 6800(columns)s 7656(of)s
+7920(one)s 8315(page,)s 8867(or)s 0 10981(what)m 525(if)s
+742(one)s 1144(lies)s 1526(within)s 220 fnt35 2194 10978(90d @Rotate)m
+240 fnt82 3482 10981(?)m 480 10607(The)m 908(truth)s 1416(is)s
+1626(that)s 220 fnt35 2044 10604(/)m 240 fnt82 2168 10607(causes)m
+2843(all)s 3136(the)s 3484(objects)s 4212(that)s 4630(share)s
+5190(a)s 5356(mark)s 5908(to)s 6147(ha)s 4(v)k 3(e)k
+6648(equal)s 7221(width:)s 1701 1360 567 1360 240 288 60 480 8907 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1701 1360 567 1360 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+1701 340 567 340 240 288 60 0 1020 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke
+grestore
+1134 340 567 340 240 288 60 0 0 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath 0.8 setgray fill
+grestore
+
+grestore
+
+grestore
+1701 340 567 340 240 288 60 0 510 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke
+grestore
+1134 340 0 340 240 288 60 567 0 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath 0.8 setgray fill
+grestore
+
+grestore
+
+grestore
+1701 340 567 340 240 288 60 0 0 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath stroke
+grestore
+736 340 283 340 240 288 60 284 0 LoutGr2
+0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto closepath 0.8 setgray fill
+grestore
+
+grestore
+
+grestore
+
+grestore
+end end restore
+grestore
+0 8455(This)m 495(is)s 724(a)s
+909(consequence)s 2207(of)s 2497(the)s 2864(`as)s 3212(wide)s
+3753(as)s 4022(possible')s 4937(rule)s 5383(\(Section)s 6255(2.6\).)s
+6817(Mark)s 7415(alignment)s 8451(occurs)s 240 fnt83 0 8169(incidentally)m
+240 fnt82 1124 8167(,)m 1231(whene)s 6(v)k 3(er)k
+2212(the)s 2560(fragments)s 3566(are)s 3913(placed)s 4595(into)s
+5020(similar)s 5742(conte)s 3(xts.)k 480 7793(In)m 723(this)s
+1106(connection)s 2200(we)s 2521(must)s 3033(also)s 3458(consider)s
+4315(the)s 4649(special)s 5354(case)s 5808(of)s 6066(a)s
+220 fnt35 6218 7790(@Galle)m 4(y)k 240 fnt82 7103 7793(symbol)m
+7850(which)s 8478(shares)s 0 7505(its)m 276(column)s 1051(mark)s
+1603(with)s 2085(some)s 2646(other)s 3197(object:)s 220 fnt35
+480 7004(@Galle)m 4(y)k 480 6716(/0.2c)m 480 6428(@SomethingList)m 240 fnt82
+0 5929(\(The)m 220 fnt35 501 5926(@Galle)m 4(y)k 240 fnt82
+1392 5929(may)m 1851(or)s 2104(may)s 2563(not)s 2922(occup)s 2(y)k
+3660(an)s 3936(entire)s 4528(component;)s 5698(that)s 6109(doesn')s 4(t)k
+6862(matter)s 7525(here.\))s 8177(If)s 8400(incom)s 8998(-)s
+0 5641(ing)m 355(components)s 1559(are)s 1901(separated)s 2857(by)s
+220 fnt35 3147 5638(//)m 240 fnt82 3327 5641(rather)m 3939(than)s
+4404(by)s 220 fnt35 4693 5638(/)m 240 fnt82 4757 5641(,)m
+4860(the)s 5204(meaning)s 6076(is)s 6282(so)s 6544(doubtful)s
+7405(that)s 7819(this)s 8211(is)s 8416(forbid)s 8998(-)s
+0 5353(den.)m 496(In)s 738(f)s 2(act,)k 1186(a)s
+1337(g)s 1(alle)k 3(y)k 1957(whose)s 2611(components)s
+3804(replace)s 4535(such)s 5017(a)s 220 fnt35 5168 5350(@Galle)m 4(y)k
+240 fnt82 6052 5353(must)m 6563(ha)s 4(v)k 3(e)k
+7049(a)s 7201(single)s 7814(column)s 8574(mark)s 0 5065(running)m
+783(its)s 1043(full)s 1413(length;)s 2108(that)s 2510(is,)s
+2760(its)s 3021(components)s 4213(must)s 4722(all)s 4999(share)s
+5544(a)s 5694(single)s 6305(column)s 7065(mark.)s 7704(This)s
+8164(mark)s 8700(will)s 0 4777(be)m 281(mer)s 4(ged)k
+1050(with)s 1530(the)s 1876(column)s 2649(mark)s 3199(passing)s
+3969(through)s 4769(each)s 220 fnt35 5262 4774(@Galle)m 4(y)k
+240 fnt82 6158 4777(that)m 6574(these)s 7119(components)s 8325(replace;)s
+0 4489(all)m 293(the)s 641(objects)s 1369(on)s 1666(the)s
+2014(resulting)s 2903(mer)s 4(ged)k 3674(mark)s 4226(will)s
+4652(ha)s 4(v)k 3(e)k 5153(equal)s 5726(width.)s
+480 4115(The)m 906(root)s 1348(g)s 1(alle)k 3(y)k 15(,)k
+2018(where)s 2655(e)s 6(v)k 3(erything)k 3720(collects)s
+4497(immediately)s 5742(prior)s 6264(to)s 6500(output,)s 7217(is)s
+7424(created)s 8168(automati)s 8998(-)s 0 3827(cally)m 15(,)k
+556(not)s 921(by)s 1214(a)s 1379(de\207nition.)s 2459(Its)s
+2747(tar)s 4(get)k 3346(is)s 3555(the)s 3902(output)s
+4573(\207le,)s 4984(and)s 5387(its)s 5663(object)s 6306(is)s
+6515(the)s 6862(entire)s 7460(input,)s 8058(which)s 8699(typ)s
+8998(-)s 0 3539(ically)m 584(looks)s 1154(lik)s 2(e)k
+1566(this:)s 220 fnt35 480 3038(@P)m 8(ageList)k 480 2750(//)m
+480 2462(@T)m 26(e)k 6(xt {)k 480 2174(  Body te)m 6(xt of the document ...)k
+480 1886(})m 240 fnt82 0 1392(where)m 220 fnt35 639 1389(@P)m 8(ageList)k
+240 fnt82 1761 1392(e)m 3(xpands)k 2592(to)s 2830(a)s
+2994(sequence)s 3925(of)s 4195(pages)s 4789(containing)s 220 fnt35
+5850 1389(@T)m 26(e)k 6(xtPlace)k 240 fnt82 7067 1392(symbols)m
+7914(\(see)s 8352(Section)s 0 1104(1.2\),)m 486(and)s 220 fnt35
+890 1101(@T)m 26(e)k 6(xt)k 240 fnt82 1564 1104(is)m
+1774(a)s 1940(g)s 1(alle)k 3(y:)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 29 35
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(2.7.)m 454(Galle)s 7(ys)k 1232(and)s
+1658(tar)s 8(g)k 2(ets)k 240 fnt84 8832 13840(29)m
+220 fnt35 480 13207(def @T)m 26(e)k 6(xtPlace { @Galle)k 4(y })k
+480 12631(def @T)m 26(e)k 6(xt into { @T)k 26(e)k 6(xtPlace&&preceding })k
+480 12343(    r)m -3(ight x)k 480 12055({)m 480 11767(    x)m 480 11479(})m
+240 fnt82 0 10985(The)m 428(spot)s 886(v)s 6(acated)k
+1668(by)s 1961(a)s 2127(g)s 1(alle)k 3(y)k
+2760(\211)s 2940(its)s 3215(in)s 9(v)k 4(ocation)k
+4268(point)s 4820(\211)s 4999(becomes)s 5887(a)s 220 fnt35
+6052 10982(@Null)m 240 fnt82 6697 10985(object,)m 7387(so)s 7653(this)s
+8048(root)s 8492(g)s 1(alle)k 3(y)k 0 10697(is)m
+210(ef)s 6(fecti)k 6(v)k 3(ely)k 220 fnt35
+1269 10694(@P)m 8(ageList)k 240 fnt82 2393 10697(alone,)m 3018(as)s
+3269(required.)s 4229(The)s 220 fnt35 4657 10694(@T)m 26(e)k 6(xt)k
+240 fnt82 5331 10697(g)m 1(alle)k 3(y)k 5965(will)s
+6392(\207nd)s 6823(its)s 7099(\207rst)s 7530(tar)s 4(get)k
+8130(preceding)s 0 10409(its)m 276(in)s 9(v)k 4(ocation)k
+1330(point,)s 1929(within)s 220 fnt35 2597 10406(@P)m 8(ageList)k
+240 fnt82 3661 10409(.)m 480 10035(Printing)m 1308(the)s 1661(root)s
+2112(g)s 1(alle)k 3(y)k 2751(on)s 3054(the)s
+3407(output)s 4085(\207le)s 4451(is)s 4666(some)s 6(what)k
+5696(problematical,)s 7121(because)s 7940(Lout)s 8457(has)s 8833(no)s
+0 9747(w)m 2(ay)k 461(of)s 742(kno)s 6(wing)k
+1638(ho)s 6(w)k 2109(lar)s 4(ge)k 2648(the)s
+3006(paper)s 3607(is.)s 3941(Basser)s 4648(Lout)s 5170(simply)s
+5885(prints)s 6490(one)s 6902(root)s 7357(g)s 1(alle)k 3(y)k
+8002(component)s 0 9459(per)m 355(page)s 852(\(e)s 3(xcept)k
+1601(it)s 1782(skips)s 2314(components)s 3511(of)s 3771(height)s
+4418(zero\),)s 5005(and)s 5398(the)s 5735(user)s 6182(is)s
+6381(responsible)s 7515(for)s 7842(ensuring)s 8708(that)s 0 9171(each)m
+504(component)s 1637(is)s 1856(page-sized.)s 3051(Gaps)s 3603(between)s
+4466(root)s 4920(g)s 1(alle)k 3(y)k 5563(components,)s
+6836(e)s 6(v)k 3(en)k 7345(unbreakable)s 8580(ones,)s
+0 8883(ha)m 4(v)k 3(e)k 501(no)s 794(ef)s 6(fect)k
+1390(on)s 1687(the)s 2035(result.)s 480 8509(Basser)m 1204(Lout)s
+1744(will)s 2198(promote)s 3079(a)s 3273(component)s 4425(only)s
+4933(after)s 5457(an)s 3(y)k 5882(recepti)s 6(v)k 3(e)k
+6832(symbols)s 7709(within)s 8405(it)s 8625(ha)s 4(v)k 3(e)k
+0 8221(been)m 509(replaced,)s 1426(either)s 2029(by)s 2324(g)s 1(alle)k 3(ys)k
+3048(or)s 3308(by)s 220 fnt35 3602 8218(@Null)m 240 fnt82
+4187 8221(,)m 4295(since)s 4842(until)s 5336(then)s 5805(the)s
+6154(component)s 7278(is)s 7489(not)s 7855(complete.)s 8896(A)s
+0 7933(component)m 1109(which)s 1736(shares)s 2369(a)s 2520(mark)s
+3057(with)s 3524(follo)s 6(wing)k 4486(components)s 5679(is)s
+5874(held)s 6329(up)s 6607(until)s 7085(the)s 3(y)k
+7533(are)s 7865(all)s 8143(complete,)s 0 7645(since)m 547(until)s
+1040(then)s 1509(their)s 2006(width)s 2608(is)s 2818(uncertain.)s
+480 7271(Consider)m 1409(a)s 1581(page)s 2095(with)s 220 fnt35
+2583 7268(@T)m 26(e)k 6(xtPlace)k 240 fnt82 3806 7271(and)m
+220 fnt35 4216 7268(@F)m 6(ootSect)k 240 fnt82 5373 7271(recepti)m 6(v)k 3(e)k
+6301(symbols.)s 7268(The)s 7702(rule)s 8135(just)s 8546(gi)s 6(v)k 3(en)k
+0 6983(will)m 418(pre)s 6(v)k 3(ent)k 1177(the)s
+1517(page)s 2016(from)s 2531(being)s 3108(printed)s 3834(until)s
+220 fnt35 4319 6980(@T)m 26(e)k 6(xtPlace)k 240 fnt82
+5528 6983(is)m 5729(replaced)s 6588(by)s 6873(body)s 7399(te)s 3(xt,)k
+7852(quite)s 8377(rightly;)s 0 6695(b)m 4(ut)k 220 fnt35
+362 6692(@F)m 6(ootSect)k 240 fnt82 1513 6695(will)m 1939(also)s
+2377(pre)s 6(v)k 3(ent)k 3145(its)s 3421(printing,)s
+4285(e)s 6(v)k 3(en)k 4785(when)s 5361(there)s
+5894(are)s 6241(no)s 6534(footnotes.)s 480 6321(Basser)m 1187(Lout)s
+1709(is)s 1930(k)s 2(een)k 2447(to)s 2696(write)s
+3253(out)s 3629(pages)s 4235(as)s 4496(soon)s 5016(as)s
+5276(possible,)s 6178(to)s 6427(sa)s 4(v)k 3(e)k
+6911(memory)s 15(,)k 7811(and)s 8225(it)s 8428(cannot)s
+0 6033(af)m 6(ford)k 624(to)s 852(w)s 2(ait)k
+1309(fore)s 6(v)k 3(er)k 2038(for)s 2365(non-e)s 3(xistent)k
+3592(footnotes.)s 4635(A)s 4854(v)s 6(ariant)k 5559(of)s
+5819(the)s 6156(g)s 1(alle)k 3(y)k 6778(concept,)s
+7618(called)s 8235(a)s 240 fnt83 8389 6035(for)m 8(cing)k
+0 5747(galle)m 7(y)k 240 fnt82 573 5745(,)m 680(is)s
+890(introduced)s 1971(to)s 2210(solv)s 3(e)k 2768(this)s
+3164(problem.)s 4125(A)s 4355(forcing)s 5098(g)s 1(alle)k 3(y)k
+5732(is)s 5942(de\207ned)s 6705(lik)s 2(e)k 7117(this:)s
+220 fnt35 480 5244(def @T)m 26(e)k 6(xt f)k 6(orce into { @T)k 26(e)k 6(xtPlace&&preceding })k
+480 4956(   ...)m 240 fnt82 0 4505(and)m 392(so)s 646(on.)s
+1037(When)s 1654(such)s 2138(a)s 2291(g)s 1(alle)k 3(y)k
+2913(replaces)s 3734(a)s 220 fnt35 3887 4502(@Galle)m 4(y)k
+240 fnt82 4773 4505(symbol,)m 5573(Lout)s 6072(replaces)s 6893(e)s 6(v)k 3(ery)k
+7457(recepti)s 6(v)k 3(e)k 8366(symbol)s 0 4217(preceding)m
+1004(the)s 220 fnt35 1360 4214(@Galle)m 4(y)k 240 fnt82
+2266 4217(by)m 220 fnt35 2568 4214(@Null)m 240 fnt82 3153 4217(,)m
+3268(thus)s 3726(ensuring)s 4611(that)s 5038(as)s 5296(soon)s
+5814(as)s 6072(te)s 3(xt)k 6495(enters)s 7124(a)s
+7298(page,)s 7865(for)s 8212(e)s 3(xample,)k 0 3929(e)m 6(v)k 3(erything)k
+1064(up)s 1354(to)s 1590(and)s 1991(including)s 2945(the)s
+3289(preceding)s 4282(page)s 4787(can)s 5173(be)s 5452(printed.)s
+6290(This)s 6762(does)s 7249(not)s 7612(tak)s 2(e)k
+8061(care)s 8511(of)s 8778(the)s 0 3641(v)m 3(ery)k
+479(last)s 873(page,)s 1435(b)s 4(ut)k 1801(Basser)s
+2501(Lout)s 3016(replaces)s 3852(all)s 4149(recepti)s 6(v)k 3(e)k
+5074(symbols)s 5926(by)s 220 fnt35 6223 3638(@Null)m 240 fnt82
+6872 3641(when)m 7451(it)s 7646(realizes)s 8428(that)s 8850(its)s
+0 3353(input)m 552(has)s 922(all)s 1215(been)s 1724(read,)s
+2242(thus)s 2692(allo)s 6(wing)k 3576(the)s 3924(last)s
+4315(page)s 4823(to)s 5062(print.)s 480 2979(A)m 714(forcing)s
+1461(g)s 1(alle)k 3(y)k 2099(causes)s 2779(the)s
+3131(Third)s 3724(La)s 3(w)k 4204(to)s 4448(be)s
+4734(applied)s 5500(earlier)s 6172(than)s 6646(e)s 3(xpected,)k
+7604(and)s 8012(this)s 8413(creates)s 0 2691(tw)m 2(o)k
+425(problems.)s 1495(First,)s 2055(the)s 2419(replacement)s 3662(by)s
+220 fnt35 3972 2688(@Null)m 240 fnt82 4633 2691(may)m 5114(be)s
+5412(premature:)s 6562(a)s 6744(g)s 1(alle)k 3(y)k
+7394(may)s 7876(turn)s 8334(up)s 8643(later)s 0 2403(w)m 2(anting)k
+869(one)s 1318(of)s 1636(the)s 2032(defunct)s 2856(tar)s 4(gets.)k
+3699(Such)s 4283(g)s 1(alle)k 3(ys)k 5054(\(entries)s
+5867(in)s 6157(tables)s 6813(of)s 7131(contents)s 8026(are)s
+8421(typical)s 0 2115(e)m 3(xamples\))k 1020(are)s 1358(copied)s
+2045(into)s 2461(the)s 2801(cross)s 3334(reference)s 4268(database)s
+5138(and)s 5534(read)s 5994(in)s 6228(during)s 6897(the)s
+7237(ne)s 3(xt)k 7697(run)s 8064(just)s 8460(before)s
+0 1827(their)m 488(tar)s 4(gets)k 1161(are)s 1498(closed,)s
+2206(and)s 2600(so)s 2856(the)s 3(y)k 3309(\207nd)s
+3730(their)s 4217(tar)s 4(gets)k 4891(in)s 5124(the)s
+5462(end.)s 5962(Care)s 6459(must)s 6974(be)s 7246(tak)s 2(en)k
+7809(to)s 8038(ensure)s 8708(that)s 0 1539(lar)m 4(ge)k
+526(g)s 1(alle)k 3(ys)k 1247(such)s 1739(as)s
+1986(chapters)s 2829(and)s 3230(sections)s 4047(do)s 4337(not)s
+4700(ha)s 4(v)k 3(e)k 5197(defunct)s 5971(tar)s 4(gets,)k
+6706(since)s 7250(the)s 7594(cost)s 8036(of)s 8303(cop)s 2(ying)k
+0 1251(them)m 538(to)s 777(and)s 1181(from)s 1705(the)s
+2053(database)s 2932(is)s 3142(unacceptably)s 4458(high.)s 480 877(It)m
+694(is)s 914(actually)s 1734(an)s 2027(o)s 3(v)k 3(er)k 4(-simpli\207cation)k
+3901(to)s 4150(say)s 4533(that)s 4961(these)s 5517(replacements)s
+6838(occur)s 7439(when)s 8025(the)s 8383(forcing)s 0 589(g)m 1(alle)k 3(y)k
+633(replaces)s 1464(its)s 220 fnt35 1738 586(@Galle)m 4(y)k
+240 fnt82 2576 589(.)m 2738(What)s 3315(really)s 3910(happens)s
+4744(is)s 4952(that)s 5368(from)s 5891(this)s 6285(moment)s
+7127(on)s 7422(Lout)s 7932(understands)s 0 301(that)m 414(it)s
+602(has)s 968(the)s 1311(right)s 1818(to)s 2053(mak)s 2(e)k
+2621(these)s 3163(replacements,)s 4526(and)s 4926(it)s 5114(will)s
+5535(do)s 5824(each)s 6315(one)s 6713(at)s 6940(the)s
+7284(\207rst)s 7711(moment)s 8550(when)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 30 36
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(30)m 240 fnt83 7257 13843(Chapter)m 8107(2.)s
+8381(Details)s 240 fnt82 0 13205(not)m 369(doing)s 972(it)s
+1168(w)s 2(ould)k 1827(hold)s 2315(things)s 2955(up.)s
+3363(So)s 3673(there)s 4210(is)s 4423(a)s 4593(short)s
+5135(period)s 5808(of)s 6083(grace)s 6660(when)s 7240(g)s 1(alle)k 3(ys,)k
+8024(such)s 8524(as)s 8778(the)s 0 12917(entries)m 687(in)s
+930(tables)s 1538(of)s 1809(contents)s 2657(just)s 3062(alluded)s
+3824(to,)s 4117(can)s 4506(sneak)s 5112(into)s 5537(these)s
+6084(recepti)s 6(v)k 3(e)k 7006(symbols.)s 480 12543(The)m
+220 fnt35 902 12540(into)m 240 fnt82 1302 12543(and)m 220 fnt35
+1699 12540(f)m 6(orce into)k 240 fnt82 2642 12543(forms)m 3243(are)s
+3584(actually)s 4387(just)s 4786(abbre)s 6(viations)k 6112(for)s
+6444(the)s 6785(true)s 7206(w)s 2(ay)k 7650(that)s
+8062(g)s 1(alle)k 3(ys)k 8779(are)s 0 12255(de\207ned,)m
+806(which)s 1442(is)s 1646(by)s 1934(gi)s 6(ving)k
+2586(the)s 2928(symbol)s 3682(that)s 4094(is)s 4297(to)s
+4530(be)s 4806(a)s 4966(g)s 1(alle)k 3(y)k
+5594(a)s 5753(parameter)s 6761(or)s 7014(nested)s 7677(de\207nition)s
+8644(with)s 0 11967(the)m 348(special)s 1066(name)s 220 fnt35
+1640 11964(@T)m 26(arget)k 240 fnt82 2467 11967(:)m 220 fnt35
+480 11466(def @T)m 26(e)k 6(xt)k 480 11178(    r)m -3(ight x)k
+480 10890({)m 480 10602(    def @T)m 26(arget { @T)k 26(e)k 6(xtPlace&&preceding })k
+480 10026(    x)m 480 9738(})m 240 fnt82 0 9244(A)m 237(forcing)s
+988(g)s 1(alle)k 3(y)k 1630(is)s 1848(obtained)s
+2738(by)s 3039(using)s 220 fnt35 3619 9241(&&&)m 240 fnt82
+4121 9244(instead)m 4864(of)s 220 fnt35 5143 9241(&&)m 240 fnt82
+5431 9244(.)m 220 fnt35 5602 9241(@T)m 26(arget)k 240 fnt82
+6497 9244(may)m 6971(be)s 7261(an)s 7552(arbitrary)s 8435(object,)s
+0 8956(pro)m 3(vided)k 908(that)s 1329(it)s 1524(yields)s
+2149(such)s 2648(a)s 2817(cross)s 3362(reference)s 4307(when)s
+4886(e)s 6(v)k 6(aluated.)k 5957(In)s 6216(this)s
+6615(w)s 2(ay)k 15(,)k 7107(dif)s 6(ferent)k
+7985(in)s 9(v)k 4(ocations)k 0 8668(may)m 466(ha)s 4(v)k 3(e)k
+967(dif)s 6(ferent)k 1842(tar)s 4(gets.)k 480 8294(The)m
+904(forcing)s 1643(g)s 1(alle)k 3(y)k 2273(ef)s 6(fect)k
+2865(can)s 3249(be)s 3527(obtained)s 4405(in)s 4644(another)s
+5417(w)s 2(ay)k 15(,)k 5901(by)s 6191(replacing)s
+7129(the)s 220 fnt35 7473 8291(@Galle)m 4(y)k 240 fnt82
+8366 8294(symbol)m 0 8006(to)m 245(which)s 893(the)s 1247(g)s 1(alle)k 3(y)k
+1887(is)s 2103(attached)s 2964(by)s 220 fnt35 3264 8003(@F)m 6(orceGalle)k 4(y)k
+240 fnt82 4657 8006(.)m 4827(The)s 5261(adv)s 6(antage)k
+6287(of)s 6565(this)s 6967(form)s 7497(is)s 7713(that)s
+8137(the)s 8492(g)s 1(alle)k 3(y)k 0 7718(can)m
+389(then)s 858(be)s 1140(forcing)s 1883(at)s 2115(some)s
+2676(places)s 3324(and)s 3728(not)s 4094(at)s 4326(others,)s
+5017(using)s 5589(the)s 5937(formula)s 220 fnt35 480 7217(def @SomePlace r)m -3(ight x)k
+480 6929({)m 480 6641(    x @Case {)m 480 6353(        nof)m 6(orce  @Y)k 4(ield @Galle)k 4(y)k
+480 6065(        f)m 6(orce    @Y)k 4(ield @F)k 6(orceGalle)k 4(y)k
+480 5777(    })m 480 5489(})m 240 fnt82 0 4995(No)m 6(w)k
+514(a)s 680(g)s 1(alle)k 3(y)k 1314(may)s
+1780(ha)s 4(v)k 3(e)k 220 fnt35 2281 4992(@SomePlace)m
+240 fnt82 3677 4995(for)m 4015(its)s 4291(tar)s 4(get,)k
+4937(and)s 5341(if)s 5558(it)s 5750(happens)s 6586(to)s
+6825(attach)s 7452(to)s 220 fnt35 480 4494(@SomePlace f)m 6(orce)k
+240 fnt82 0 4039(it)m 192(will)s 618(ha)s 4(v)k 3(e)k
+1119(the)s 1467(ef)s 6(fect)k 2063(of)s 2334(a)s
+2500(forcing)s 3243(g)s 1(alle)k 3(y)k 15(,)k
+3915(while)s 4502(if)s 4719(it)s 4911(happens)s 5747(to)s
+5986(attach)s 6613(to)s 220 fnt35 480 3538(@SomePlace nof)m 6(orce)k
+240 fnt82 0 3083(it)m 192(will)s 618(not.)s 480 2709(Although)m
+1436(it)s 1621(doesn')s 4(t)k 2374(matter)s 3036(whether)s
+3859(a)s 4018(g)s 1(alle)k 3(y)k 4645(is)s
+4848(declared)s 5708(as)s 5951(a)s 6110(forcing)s 6846(g)s 1(alle)k 3(y)k
+7473(or)s 7725(merely)s 8435(arri)s 6(v)k 3(es)k
+0 2421(at)m 244(a)s 220 fnt35 422 2418(@F)m 6(orceGalle)k 4(y)k
+240 fnt82 1887 2421(symbol)m 2659(from)s 3195(the)s 3555(point)s
+4119(of)s 4402(vie)s 6(w)k 4928(of)s 5211(the)s
+5571(ef)s 6(fect)k 6179(on)s 6488(nearby)s 7205(tar)s 4(gets,)k
+7956(there)s 8501(is)s 8724(one)s 0 2133(w)m 2(ay)k
+446(in)s 683(which)s 1319(Lout)s 1825(treats)s 2387(the)s
+2729(tw)s 2(o)k 3133(cases)s 3682(dif)s 6(ferently)k 15(.)k
+4827(If)s 5051(a)s 5211(forcing)s 5948(g)s 1(alle)k 3(y')k 13(s)k
+6733(\207rst)s 7158(component)s 8276(does)s 8760(not)s 0 1845(\207t)m
+264(into)s 695(the)s 1048(a)s 4(v)k 6(ailable)k
+1962(space,)s 2606(that)s 3029(component)s 4159(will)s 4590(be)s
+4878(scaled)s 5539(v)s 3(ertically)k 6496(until)s 6995(it)s
+7192(does.)s 7801(The)s 8235(rationale)s 0 1557(for)m 343(this)s
+744(is)s 959(that)s 1382(forcing)s 2130(g)s 1(alle)k 3(ys)k
+2860(are)s 3212(meant)s 3861(to)s 4105(carry)s 4654(the)s
+5007(b)s 4(ulk)k 5496(of)s 5772(the)s 6125(document)s
+7134(and)s 7543(cannot)s 8246(af)s 6(ford)k 8887(to)s
+0 1269(be)m 295(held)s 779(up)s 1086(because)s 1913(the)s
+2275(user)s 2747(has)s 3131(inadv)s 3(ertently)k 4456(included)s
+5352(an)s 5649(o)s 3(v)k 3(er)k 4(-high)k
+6640(component,)s 7825(which)s 8481(for)s 8833(all)s 0 981(Lout)m
+514(kno)s 6(ws)k 1188(to)s 1430(the)s 1781(contrary)s
+2634(may)s 3103(not)s 3472(\207t)s 3734(on)s 4034(an)s 3(y)k
+4433(page.)s 5052(If)s 5285(this)s 5684(scaling)s 6417(is)s
+6630(not)s 6999(w)s 2(anted)k 7749(b)s 4(ut)k
+8114(forcing)s 8860(is,)s 0 693(the)m 348(g)s 1(alle)k 3(y)k
+982(may)s 1448(be)s 1730(declared)s 2597(not)s 2963(forcing)s
+3706(b)s 4(ut)k 4068(all)s 4361(its)s 4637(tar)s 4(gets)k
+5320(may)s 5786(be)s 6068(set)s 6393(to)s 6632(contain)s
+220 fnt35 7393 690(@F)m 6(orceGalle)k 4(y)k 240 fnt82
+8786 693(.)m 480 319(W)m 9(ithin)k 1197(a)s 1368(g)s 1(alle)k 3(y)k 15(,)k
+2045(a)s 2216(symbol)s 2981(whose)s 3654(name)s 4233(is)s
+220 fnt35 4448 316(@Enclose)m 240 fnt82 5508 319(has)m 5883(a)s
+6054(special)s 6777(meaning:)s 7772(when)s 8353(compo)s 8998(-)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 31 37
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(2.7.)m 454(Galle)s 7(ys)k 1232(and)s
+1658(tar)s 8(g)k 2(ets)k 240 fnt84 8839 13840(31)m
+240 fnt82 0 13205(nents)m 556(of)s 827(the)s 1175(g)s 1(alle)k 3(y)k
+1810(replace)s 2555(a)s 220 fnt35 2721 13202(@Galle)m 4(y)k
+240 fnt82 3619 13205(or)m 220 fnt35 3879 13202(@F)m 6(orceGalle)k 4(y)k
+240 fnt82 5332 13205(symbol,)m 6144(that)s 6562(symbol)s 7323(is)s
+7533(\207rst)s 7964(replaced)s 8832(by)s 220 fnt35 0 12914(@Enclose)m
+1055(@Galle)s 4(y)k 240 fnt82 1953 12917(or)m 220 fnt35
+2212 12914(@Enclose)m 3267(@F)s 6(orceGalle)k 4(y)k 240 fnt82
+4660 12917(.)m 4824(F)s 3(or)k 5213(e)s 3(xample,)k
+220 fnt35 480 12416(def @Enclose)m 480 12128(    r)m -3(ight x)k 480 11840({)m
+480 11552(    @Bo)m 6(x x)k 480 11264(})m 240 fnt82 0 10770(within)m
+714(some)s 1321(g)s 1(alle)k 3(y)k 2001(de\207nition)s
+3021(causes)s 3742(each)s 220 fnt35 4283 10767(@Galle)m 4(y)k
+240 fnt82 5227 10770(or)m 220 fnt35 5532 10767(@F)m 6(orceGalle)k 4(y)k
+240 fnt82 7031 10770(symbol)m 7837(that)s 8302(recei)s 6(v)k 3(es)k
+0 10482(components)m 1213(of)s 1489(the)s 1842(g)s 1(alle)k 3(y)k
+2481(to)s 2725(be)s 3013(replaced)s 3885(by)s 220 fnt35
+4184 10479(@Bo)m 6(x @Galle)k 4(y)k 240 fnt82 5743 10482(or)m
+220 fnt35 6007 10479(@Bo)m 6(x @F)k 6(orceGalle)k 4(y)k
+240 fnt82 8056 10482(,)m 8169(assuming)s 0 10194(an)m 314(appropriate)s
+1489(de\207nition)s 2495(of)s 220 fnt35 2797 10191(@Bo)m 6(x.)k
+240 fnt82 3586 10194(This)m 4093(is)s 4334(useful,)s 5057(for)s
+5426(e)s 3(xample,)k 6372(when)s 6979(producing)s 8035(multi-page)s
+0 9906(box)m 3(ed)k 641(displays,)s 1532(\207gures,)s 2290(and)s
+2694(tables.)s 480 9532(An)m 220 fnt35 861 9529(@Enclose)m 240 fnt82
+1947 9532(symbol)m 2739(may)s 3236(ha)s 4(v)k 3(e)k
+3769(only)s 4280(one)s 4714(parameter)s 9(,)k 5797(which)s
+6471(must)s 7027(be)s 7341(a)s 7538(right)s 8081(parameter)s 13(.)k
+0 9244(It)m 213(w)s 2(ould)k 877(not)s 1252(mak)s 2(e)k
+1833(sense)s 2416(to)s 2664(allo)s 6(w)k 3252(more)s
+3808(parameters,)s 4971(since)s 5527(there)s 6069(is)s 6288(no)s
+6590(suitable)s 7398(v)s 6(alue)k 7975(to)s 8223(assign)s
+8887(to)s 0 8956(them.)m 655(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+1628(the)s 220 fnt35 1989 8953(@Enclose)m 240 fnt82 3058 8956(symbol)m
+3831(may)s 4310(contain)s 5085(inner)s 5649(de\207nitions,)s 6779(and)s
+7196(it)s 7402(may)s 7881(mak)s 2(e)k 8466(use)s
+8855(of)s 0 8668(an)m 3(y)k 397(symbol)s 1157(that)s
+1575(is)s 1785(a)s 4(v)k 6(ailable)k 2693(at)s
+2925(that)s 3343(point,)s 3942(in)s 4185(the)s 4533(usual)s
+5093(w)s 2(ay)k 15(.)k 480 8294(A)m 220 fnt35
+709 8291(f)m 6(ollo)k 3(wing)k 240 fnt82 1597 8294(g)m 1(alle)k 3(y)k
+2229(may)s 2693(f)s 2(ail)k 3061(to)s 3299(\207nd)s
+3728(a)s 3892(\207rst)s 4321(tar)s 4(get)k 4918(lying)s
+5461(in)s 5703(a)s 5867(follo)s 6(wing)k 6842(component)s
+7964(of)s 8233(the)s 8579(same)s 0 8006(g)m 1(alle)k 3(y)k
+634(as)s 884(its)s 1159(in)s 9(v)k 4(ocation)k
+2213(point.)s 2868(This)s 3344(is)s 3553(a)s 3719(de\207cienc)s 3(y)k
+4752(of)s 5023(Basser)s 5719(Lout,)s 6278(which)s 6919(occurs)s
+7594(if)s 7810(the)s 8158(tar)s 4(get)k 8756(has)s
+0 7718(not)m 356(been)s 855(read)s 1313(from)s 1827(input)s
+2369(at)s 2590(the)s 2928(time)s 3398(the)s 3735(g)s 1(alle)k 3(y)k
+4359(tries)s 4810(to)s 5038(\207nd)s 5459(it.)s 5745(A)s
+5964(w)s 2(orkaround)k 7167(is)s 7367(to)s 7595(use)s
+7960(a)s 220 fnt35 8115 7715(preceding)m 240 fnt82 0 7430(g)m 1(alle)k 3(y)k
+634(instead,)s 1418(de\207ned)s 2181(lik)s 2(e)k 2593(this:)s
+220 fnt35 480 6929(def @A)m 6(Galle)k 4(y into { @A)k 6(Galle)k 4(yPlace&&preceding })k
+480 6641(    r)m -3(ight @Body)k 480 6353({)m 480 6065(    //1.1b)m 480 5777(    @Body)m
+480 5489(})m 240 fnt82 0 4995(and)m 404(in)s 9(v)k 4(ok)k 2(ed)k
+1219(lik)s 2(e)k 1631(this:)s 220 fnt35 480 4543(@A)m 6(Galle)k 4(yPlace | @A)k 6(Galle)k 4(y { content of galle)k 4(y })k
+480 4255(//)m 480 3967(...)m 480 3679(@A)m 6(Galle)k 4(yPlace)k
+240 fnt82 0 3181(The)m 419(\207rst)s 220 fnt35 841 3178(@A)m 6(Galle)k 4(yPlace)k
+240 fnt82 2411 3181(recei)m 6(v)k 3(es)k 3226(only)s
+3696(the)s 4035(initial)s 4636(empty)s 5279(object,)s 5960(since)s
+6498(the)s 220 fnt35 6836 3178(//1.1b)m 240 fnt82 7428 3181(forces)m
+8052(a)s 8209(split;)s 8722(and)s 0 2893(the)m 348(Second)s
+1111(La)s 3(w)k 1587(puts)s 2037(Basser)s 2734(Lout)s
+3246(on)s 3543(the)s 3891(right)s 4402(track)s 4940(thereafter)s 13(.)k
+240 fnt84 0 2100(2.8.)m 471(Sorted)s 1203(galleys)s 240 fnt82
+480 1623(When)m 1128(footnotes)s 2088(are)s 2455(placed)s 3156(at)s
+3407(the)s 3775(bottom)s 4532(of)s 4823(a)s 5008(page,)s
+5586(the)s 3(y)k 6069(appear)s 6785(there)s 7337(in)s
+7600(\207rst)s 8050(come,)s 8695(\207rst)s 0 1335(serv)m 3(ed)k
+674(order)s 13(.)k 1324(T)s 19(o)k 1618(mak)s 2(e)k
+2185(g)s 1(alle)k 3(ys)k 2903(appear)s 3595(in)s
+3832(sorted)s 4469(order)s 9(,)k 5065(as)s 5310(is)s
+5514(needed)s 6245(in)s 6482(bibliographies)s 7896(and)s 8294(inde)s 3(x)k 3(es,)k
+0 1047(a)m 178(parameter)s 1205(or)s 1477(nested)s 2158(de\207nition)s
+3145(with)s 3640(the)s 4000(special)s 4731(name)s 220 fnt35
+5318 1044(@K)m 8(e)k 4(y)k 240 fnt82 5977 1047(is)m
+6200(added)s 6843(to)s 7094(the)s 7455(g)s 1(alle)k 3(y)k
+8102(de\207nition,)s 0 759(lik)m 2(e)k 412(this:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 32 38
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(32)m 240 fnt83 7257 13843(Chapter)m 8107(2.)s
+8381(Details)s 220 fnt35 480 13207(def @Inde)m 6(xEntr)k -6(y into { @Inde)k 6(xPlace&&f)k 6(ollo)k 3(wing })k
+480 12919(   left @K)m 8(e)k 4(y)k 480 12631(   r)m -3(ight x)k
+480 12343({ x })m 0 11846(@K)m 8(e)k 4(y)k 240 fnt82
+674 11849(must)m 1226(be)s 1535(set)s 1887(to)s 2153(a)s
+2346(simple)s 3066(w)s 2(ord,)k 3690(or)s 3976(se)s 6(v)k 3(eral)k
+4725(w)s 2(ords)k 5386(with)s 5895(nothing)s 6707(more)s
+7281(comple)s 3(x)k 8184(than)s 8681(font)s 0 11561(changes)m
+822(within)s 1490(them,)s 2075(when)s 2651(the)s 2999(g)s 1(alle)k 3(y)k
+3633(is)s 3843(in)s 9(v)k 4(ok)k 2(ed:)k
+220 fnt35 480 11060({ cities compare } @Inde)m 6(xEntr)k -6(y { cities)k 3(, compar)k -3(ison of)k 6(, 27 })k
+240 fnt82 0 10562(and)m 404(this)s 800(k)s 2(e)k 3(y)k
+1195(is)s 1405(used)s 1902(to)s 2141(sort)s 2559(the)s
+2907(g)s 1(alle)k 3(ys.)k 480 10188(If)m 707(se)s 6(v)k 3(eral)k
+1425(sorted)s 2063(g)s 1(alle)k 3(ys)k 2783(with)s
+3261(the)s 3605(same)s 4148(k)s 2(e)k 3(y)k
+4539(are)s 4882(sent)s 5323(to)s 5558(the)s 5902(same)s
+6445(place,)s 7052(the)s 7396(def)s 2(ault)k 8113(beha)s 4(viour)k
+0 9900(is)m 253(to)s 536(print)s 1091(only)s 1615(the)s
+2007(\207rst)s 2481(of)s 2796(them;)s 3430(the)s 3822(assumption)s
+5013(is)s 5266(that)s 5728(the)s 6120(others)s 6799(are)s
+7190(probably)s 8139(unw)s 2(anted)k 0 9612(duplicates.)m 1146(This)s
+1636(holds)s 2220(good)s 2772(for)s 3123(sorted)s 3779(reference)s
+4736(lists,)s 5241(for)s 5593(e)s 3(xample:)k 6579(we)s
+6928(don')s 4(t)k 7503(w)s 2(ant)k 8040(tw)s 2(o)k
+8464(copies)s 0 9324(of)m 273(a)s 442(reference)s 1388(just)s
+1796(because)s 2611(we)s 2949(happen)s 3701(to)s 3943(cite)s
+4345(it)s 4540(twice.)s 5224(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+6187(the)s 6537(other)s 7091(common)s 7989(e)s 3(xample)k
+8855(of)s 0 9036(sorted)m 642(g)s 1(alle)k 3(ys,)k
+1422(inde)s 3(x)k 2006(entries,)s 2749(requires)s 3569(something)s
+4619(dif)s 6(ferent:)k 240 fnt83 5600 9038(mer)m 8(g)k 2(ed)k
+240 fnt82 6374 9036(g)m 1(alle)k 3(ys.)k 480 8662(Suppose)m
+1348(that)s 1766(at)s 1998(some)s 2559(point)s 3111(of)s
+3382(the)s 3730(document)s 4734(we)s 5069(insert)s 5659(the)s
+6007(inde)s 3(x)k 6591(entry)s 220 fnt35 480 8161(aardv)m 5(ar)k -3(ks @Inde)k 6(xEntr)k -6(y { Aardv)k 5(ar)k -3(ks)k 3(, 23 })k
+240 fnt82 0 7663(while)m 587(at)s 819(another)s 1596(point)s
+2148(we)s 2483(insert)s 220 fnt35 480 7162(aardv)m 5(ar)k -3(ks @Inde)k 6(xEntr)k -6(y { Aardv)k 5(ar)k -3(ks)k 3(, 359 })k
+240 fnt82 0 6664(Ho)m 6(w)k 505(the)s 843(page)s
+1341(numbers)s 2206(are)s 2544(w)s 2(ork)k 2(ed)k
+3306(out)s 3662(is)s 3862(not)s 4219(rele)s 6(v)k 6(ant)k
+5026(here.)s 5591(Clearly)s 6338(we)s 6664(w)s 2(ould)k
+7309(lik)s 2(e)k 7711(to)s 7940(mer)s 4(ge)k
+8579(these)s 0 6376(tw)m 2(o)k 410(entries)s 1097(into)s
+1522(one)s 1924(entry)s 2469(that)s 2887(comes)s 3549(out)s
+3915(as)s 480 5871(Aardv)m 6(arks, 23, 359)k 0 5387(The)m 428(follo)s 6(wing)k
+1405(de\207nition)s 2379(will)s 2805(mer)s 4(ge)k 3454(tw)s 2(o)k
+3864(objects)s 4592(in)s 4835(this)s 5231(w)s 2(ay:)k
+220 fnt35 480 4886(def @Merge left x r)m -3(ight y)k 480 4598({)m 480 4310(    {x @Rump y} @Case)m
+480 4022(    {)m 480 3734(        ""      @Y)m 4(ield x)k 480 3446(        else   @Y)m 4(ield { x, x @Rump y })k
+480 3158(    })m 480 2870(})m 240 fnt82 0 2376(The)m 220 fnt35
+429 2373(@Rump)m 240 fnt82 1290 2376(symbol)m 2051(is)s 2262(the)s
+2611(subject)s 3349(of)s 3621(Section)s 4396(3.23;)s 4929(this)s
+5326(says)s 5790(`if)s 6087(the)s 6436(tw)s 2(o)k
+6847(things)s 7484(to)s 7724(be)s 8007(mer)s 4(ged)k
+8779(are)s 0 2088(equal,)m 622(the)s 967(result)s 1553(is)s
+1760(one)s 2158(of)s 2426(them;)s 3012(otherwise)s 3994(it)s
+4182(is)s 4389(the)s 4733(\207rst)s 5161(follo)s 6(wed)k
+6059(by)s 6350(a)s 6512(comma)s 7273(and)s 7673(space)s
+8257(and)s 8657(then)s 0 1800(the)m 355(rump)s 921(of)s
+1200(the)s 1556(second.)s 16(')k 2445(Our)s 2885(only)s
+3372(problem)s 4237(is)s 4455(that)s 4881(this)s 5285(symbol)s
+6053(has)s 6430(to)s 6677(be)s 6967(applied)s 7737(to)s
+7984(tw)s 2(o)k 8402(g)s 1(alle)k 3(ys)k
+0 1512(from)m 524(widely)s 1229(separated)s 2189(parts)s 2704(of)s
+2975(the)s 3323(document.)s 480 1138(Lout)m 993(mak)s 2(es)k
+1654(this)s 2052(possible)s 2893(by)s 3189(the)s 3538(follo)s 6(wing)k
+4517(special)s 5236(rule:)s 5775(if)s 5993(a)s 6161(sorted)s
+6804(g)s 1(alle)k 3(y)k 7440(contains)s 8289(a)s
+8457(nested)s 0 850(de\207nition)m 965(of)s 1227(a)s 1383(symbol)s
+2134(whose)s 2793(name)s 3357(is)s 220 fnt35 3558 847(@Merge)m
+240 fnt82 4446 850(\()m 220 fnt35 4519 847(@Merge)m 240 fnt82
+5406 850(must)m 5922(ha)s 4(v)k 3(e)k 6414(just)s
+6809(tw)s 2(o)k 7210(parameters,)s 8355(left)s 8722(and)s
+0 562(right\),)m 643(and)s 1054(if)s 1277(that)s 1702(sorted)s
+2350(g)s 1(alle)k 3(y)k 2991(is)s 3207(preceded)s
+4135(in)s 4384(the)s 4739(list)s 5096(of)s 5374(sorted)s
+6022(g)s 1(alle)k 3(ys)k 6753(destined)s 7614(for)s
+7959(some)s 8527(tar)s 4(get)k 0 274(by)m 300(another)s
+1084(sorted)s 1733(g)s 1(alle)k 3(y)k 2374(with)s
+2863(the)s 3217(same)s 3771(k)s 2(e)k 3(y)k 15(,)k
+4211(then)s 4687(rather)s 5310(than)s 5785(being)s 6377(discarded,)s
+7407(the)s 7762(second)s 8492(g)s 1(alle)k 3(y)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 33 39
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(2.8.)m 454(Sorted)s 1145(galle)s 7(ys)k
+240 fnt84 8833 13840(33)m 240 fnt82 0 13205(is)m 210(mer)s 4(ged)k
+981(into)s 1406(the)s 1754(\207rst)s 2185(using)s 2757(the)s
+220 fnt35 3105 13202(@Merge)m 240 fnt82 4002 13205(symbol.)m 480 12831(The)m
+909(natural)s 1629(thing)s 2175(to)s 2416(do)s 2711(when)s
+3288(more)s 3837(than)s 4307(tw)s 2(o)k 4719(g)s 1(alle)k 3(ys)k
+5445(ha)s 4(v)k 3(e)k 5947(the)s 6297(same)s
+6845(k)s 2(e)k 3(y)k 7242(is)s 7454(to)s
+7694(mer)s 4(ge)k 8345(the)s 8695(\207rst)s 0 12543(tw)m 2(o,)k
+477(then)s 959(mer)s 4(ge)k 1621(the)s 1982(third)s
+2504(with)s 2999(the)s 3360(result)s 3963(of)s 4247(that,)s
+4725(then)s 5207(the)s 5568(fourth)s 6222(with)s 6717(the)s
+7078(result)s 7681(of)s 7965(that,)s 8443(and)s 8860(so)s
+0 12255(on.)m 403(F)s 3(or)k 790(ef\207cienc)s 3(y)k
+1781(reasons)s 2547(be)s 3(yond)k 3306(our)s 3684(scope)s
+4283(here,)s 4799(Lout)s 5309(does)s 5797(the)s 6144(mer)s 4(ging)k
+6988(in)s 7229(a)s 7393(dif)s 6(ferent)k 8266(order:)s
+8934(it)s 0 11967(mer)m 4(ges)k 240 fnt83 736 11969(n)m
+240 fnt82 909 11967(g)m 1(alle)k 3(ys)k 1632(by)s
+1925(mer)s 4(ging)k 2770(the)s 3116(\207rst)s 240 fnt78
+3592 11925(\353)m 240 fnt83 3685 11969(n)m 240 fnt78 3809 11961(/)m
+3881(2)s 4006 11925(\373)m 240 fnt82 4197 11967(together)m 9(,)k
+5077(then)s 5545(the)s 5892(last)s 240 fnt78 6327 11937(\351)m
+240 fnt83 6420 11969(n)m 240 fnt78 6545 11961(/)m 6617(2)s
+6741 11937(\371)m 240 fnt82 6933 11967(together)m 9(,)k 7813(then)s
+8280(mer)s 4(ging)k 0 11679(the)m 337(result.)s 1019(Of)s
+1332(course,)s 2051(if)s 2257(the)s 220 fnt35 2593 11676(@Merge)m
+240 fnt82 3479 11679(symbol)m 4227(is)s 4426(associati)s 6(v)k 3(e)k
+5509(this)s 5894(has)s 6252(the)s 6589(same)s 7124(ef)s 6(fect.)k
+7813(The)s 220 fnt35 8229 11676(@Merge)m 240 fnt82 0 11391(symbol)m
+758(abo)s 3(v)k 3(e)k 1377(is)s 1584(not)s
+1947(strictly)s 2660(associati)s 6(v)k 3(e,)k 3803(b)s 4(ut)k
+4162(it)s 4351(is)s 4559(close)s 5103(enough)s 5863(in)s
+6103(practice.)s 7019(The)s 7444(total)s 7920(time)s 8397(it)s
+8586(tak)s 2(es)k 0 11103(to)m 252(mer)s 4(ge)k
+240 fnt83 915 11105(n)m 240 fnt82 1102 11103(g)m 1(alle)k 3(ys)k
+1840(with)s 2335(equal)s 2922(k)s 2(e)k 3(ys)k
+3421(is)s 240 fnt83 3644 11105(O)m 240 fnt78 3838 11097(\()m
+168 fnt78 4049 11196(2)m 240 fnt83 3935 11105(n)m 240 fnt78
+4155 11097(\))m 240 fnt82 4294 11103(or)m 4567(some)s 6(what)k
+5605(higher)s 6289(\(b)s 4(ut)k 6744(al)s 2(w)k 2(ays)k
+7468(polynomial)s 8627(in)s 240 fnt83 8884 11105(n)m 240 fnt82
+8998 11103(\))m 0 10815(depending)m 1053(on)s 1353(ho)s 6(w)k
+1816(man)s 3(y)k 2402(times)s 2972(the)s 3323(parameters)s
+4424(occur)s 5017(within)s 5688(the)s 6038(body)s 6575(of)s
+220 fnt35 6849 10812(@Merge)m 240 fnt82 7686 10815(;)m 7800(to)s
+8042(do)s 8337(it)s 8532(in)s 8778(the)s 0 10527(natural)m
+718(linear)s 1321(order)s 1885(w)s 2(ould)k 2540(tak)s 2(e)k
+2992(Lout)s 3504(e)s 3(xponential)k 4672(time.)s 240 fnt84
+0 9734(2.9.)m 471(Horizontal)s 1628(galleys)s 240 fnt82 480 9257(All)m
+846(the)s 1201(g)s 1(alle)k 3(ys)k 1932(so)s
+2205(f)s 2(ar)k 2534(ha)s 4(v)k 3(e)k
+3042(been)s 240 fnt83 3557 9259(vertical)m 4353(galle)s 7(ys)k
+240 fnt82 5018 9257(:)m 5191(g)s 1(alle)k 3(ys)k
+5922(whose)s 6597(components)s 7812(are)s 8166(separated)s 0 8969(by)m
+320(v)s 3(ertical)k 1114(concatenation)s 2525(symbols.)s 3514(There)s
+4154(are)s 4527(also)s 4992(horizontal)s 6043(g)s 1(alle)k 3(ys,)k
+6849(whose)s 7544(components)s 8779(are)s 0 8681(separated)m 951(by)s
+1235(the)s 1574(horizontal)s 2588(concatenation)s 3963(operator)s 220 fnt35
+4810 8678(&)m 240 fnt82 5002 8681(\(or)m 5331(equi)s 6(v)k 6(alently)k 15(,)k
+6583(by)s 6867(spaces\).)s 7725(These)s 8342(w)s 2(ork)k
+8883(in)s 0 8393(the)m 346(same)s 891(w)s 2(ay)k
+1340(as)s 1588(v)s 3(ertical)k 2353(g)s 1(alle)k 3(ys,)k
+3131(e)s 3(xcept)k 3810(for)s 4146(the)s 4492(change)s
+5224(of)s 5493(direction.)s 6504(F)s 3(or)k 6891(e)s 3(xample,)k
+7803(the)s 8149(follo)s 6(wing)k 0 8105(de\207nes)m 730(the)s
+1079(equi)s 6(v)k 6(alent)k 2124(of)s 2396(an)s
+2681(ordinary)s 3546(outdented)s 4549(paragraph,)s 5613(e)s 3(xcept)k
+6295(that)s 6715(an)s 6999(option)s 7669(is)s 7880(pro)s 3(vided)k
+8788(for)s 0 7817(v)m 6(arying)k 778(the)s 1126(size)s
+1553(of)s 1824(the)s 2172(outdent:)s 220 fnt35 480 7316(def @OutdentP)m 8(ar)k
+480 7028(    named outdent { 2f })m 480 6740(    r)m -3(ight x)k 480 6452({)m 480 6164(    def @P)m 8(arPlace { @Galle)k 4(y })k
+480 5588(    def @LineList)m 480 5300(    {)m 480 5012(        outdent @Wide {} | @P)m 26(Adjust @P)k 8(arPlace)k
+480 4724(        //1vx @LineList)m 480 4436(    })m 480 3860(    def @P)m 8(arGalle)k 4(y f)k 6(orce hor)k -3(iz)k 3(ontally into { @P)k 8(arPlace&&preceding })k
+480 3572(        r)m -3(ight x)k 480 3284(    {)m 480 2996(        x)m 480 2708(    })m
+480 2132(        @P)m 26(Adjust @P)k 8(arPlace)k 480 1844(    //  @P)m 8(arGalle)k 4(y { x &1r)k -8(t })k
+480 1556(    //1vx  @LineList)m 480 1268(})m 240 fnt82 0 774(Notice)m 703(the)s
+1061(use)s 1446(of)s 220 fnt35 1727 771(&1r)m -8(t)k
+240 fnt82 2203 774(to)m 2452(cancel)s 3127(the)s 3485(ef)s 6(fect)k
+4091(of)s 220 fnt35 4372 771(@P)m 26(Adjust)k 240 fnt82
+5390 774(on)m 5697(the)s 6055(last)s 6456(line)s 6880(of)s
+7161(the)s 7519(paragraph.)s 8650(This)s 0 486(de\207nition)m 969(has)s
+1334(a)s 1494(problem)s 2346(in)s 2584(that)s 2996(there)s
+3524(will)s 3945(be)s 4221(a)s 4382(concluding)s 5494(une)s 3(xpanded)k
+220 fnt35 6701 483(@LineList)m 240 fnt82 7730 486(symbol)m 8484(which)s
+0 198(will)m 431(hold)s 921(up)s 1219(promotion)s 2279(of)s
+2555(the)s 2909(enclosing)s 3884(g)s 1(alle)k 3(y;)k
+4582(this)s 4983(problem)s 5846(may)s 6317(be)s 6605(\207x)s 3(ed)k
+7144(by)s 7444(the)s 7797(same)s 8350(method)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 34 40
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(34)m 240 fnt83 7257 13843(Chapter)m 8107(2.)s
+8381(Details)s 240 fnt82 0 13205(used)m 497(to)s 736(end)s
+1140(a)s 1306(list.)s 480 12831(In)m 735(an)s 1016(ideal)s
+1533(w)s 2(orld,)k 2194(there)s 2725(w)s 2(ould)k
+3378(be)s 3658(nothing)s 4442(further)s 5149(to)s 5386(say)s
+5757(about)s 6347(horizontal)s 7369(g)s 1(alle)k 3(ys.)k
+8204(Ho)s 6(we)k 6(v)k 3(er)k 0 12543(there)m
+558(are)s 931(a)s 1123(fe)s 6(w)k 1555(dif)s 6(ferences)k
+2686(which)s 3354(arise)s 3886(from)s 4436(v)s 6(arious)k
+5211(practical)s 6113(considerations)s 7571(and)s 8001(limitations.)s 0 12255(Perhaps)m
+808(some)s 1369(day)s 1769(a)s 1935(more)s 2482(perfect)s
+3204(symmetry)s 4214(will)s 4640(be)s 4922(implemented.)s 480 11881(Each)m
+1021(v)s 3(ertical)k 1795(g)s 1(alle)k 3(y)k
+2436(has)s 2812(a)s 2985(\207x)s 3(ed)k 3526(\207nite)s
+4080(width,)s 4738(and)s 5149(e)s 6(v)k 3(ery)k
+5732(component)s 6863(is)s 7079(brok)s 2(en)k 7806(to)s
+8052(that)s 8477(width.)s 0 11593(This)m 517(is)s 769(needed)s
+1546(basically)s 2491(to)s 2772(trigger)s 3509(paragraph)s 4564(breaking.)s
+5606(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+6608(there)s 7183(is)s 7434(no)s 7769(equi)s 6(v)k 6(alent)k
+8855(of)s 0 11305(paragraph)m 1001(breaking)s 1879(in)s 2110(the)s
+2446(v)s 3(ertical)k 3201(direction,)s 4145(so)s 4398(horizontal)s
+5410(g)s 1(alle)k 3(ys)k 6122(do)s 6403(not)s
+6757(ha)s 4(v)k 3(e)k 7246(an)s 3(y)k
+7631(particular)s 8592(\207x)s 3(ed)k 0 11017(height.)m 762(Instead,)s
+1559(each)s 2054(component)s 3178(has)s 3548(its)s 3824(o)s 6(wn)k
+4288(indi)s 6(vidual)k 5307(height.)s 480 10643(When)m 1096(tw)s 2(o)k
+1492(objects)s 2206(are)s 2539(separated)s 3485(by)s 220 fnt35
+3766 10640(/)m 240 fnt82 3830 10643(,)m 3923(the)s 3(y)k
+4372(are)s 4705(assigned)s 5573(the)s 5908(same)s 6441(width)s
+7029(\(Section)s 7868(2.7\),)s 8340(and)s 8730(this)s 0 10355(holds)m
+581(true)s 1020(e)s 6(v)k 3(en)k 1531(if)s
+1760(the)s 2119(tw)s 2(o)k 2541(objects)s 3280(are)s
+3639(subsequently)s 4954(separated)s 5926(by)s 6231(being)s 6828(promoted)s
+7814(into)s 8251(dif)s 6(ferent)k 0 10067(tar)m 4(gets.)k
+788(F)s 3(or)k 1169(e)s 3(xample,)k 2074(tw)s 2(o)k
+2476(aligned)s 3229(equations)s 4189(will)s 4606(ha)s 4(v)k 3(e)k
+5099(the)s 5439(same)s 5977(width,)s 6621(and)s 7016(hence)s
+7622(their)s 8110(alignment)s 0 9779(will)m 437(be)s 731(preserv)s 3(ed,)k
+1776(e)s 6(v)k 3(en)k 2287(if)s 2516(the)s 3(y)k
+2991(appear)s 3699(in)s 3954(dif)s 6(ferent)k 4841(columns)s
+5714(or)s 5985(pages.)s 6706(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+7677(e)s 6(v)k 3(en)k 8189(though)s 220 fnt35
+8924 9776(&)m 240 fnt82 0 9491(aligns)m 635(the)s 996(marks)s
+1644(of)s 1928(its)s 2217(tw)s 2(o)k 2640(parameters,)s
+3807(it)s 4012(does)s 4515(not)s 4894(assign)s 5562(them)s
+6113(a)s 6292(common)s 7200(height.)s 7975(This)s 8464(means)s
+0 9203(that)m 416(the)s 762(height)s 1417(of)s 1686(an)s 3(y)k
+2081(component)s 3202(of)s 3471(a)s 3634(horizontal)s 4656(g)s 1(alle)k 3(y)k
+5288(promoted)s 6260(into)s 6683(one)s 7083(tar)s 4(get)k
+7679(does)s 8167(not)s 8530(af)s 6(fect)k 0 8915(the)m
+362(height)s 1034(consumed)s 2078(by)s 2386(the)s 2748(components)s
+3971(promoted)s 4960(into)s 5400(an)s 3(y)k 5811(other)s
+6376(tar)s 4(get.)k 7094(The)s 7536(other)s 8102(horizontal)s
+0 8627(concatenation)m 1392(operator)s 9(,)k 220 fnt35 2293 8624(|)m
+240 fnt82 2330 8627(,)m 2444(does)s 2941(assign)s 3604(a)s
+3777(common)s 4679(height)s 5344(to)s 5590(its)s 5874(tw)s 2(o)k
+6291(parameters;)s 7457(b)s 4(ut)k 7826(sequences)s 8855(of)s
+0 8339(objects)m 728(separated)s 1688(by)s 1982(this)s 2378(operator)s
+3234(cannot)s 3932(be)s 4214(the)s 4562(components)s 5770(of)s
+6041(a)s 6207(horizontal)s 7231(g)s 1(alle)k 3(y)k 15(.)k
+480 7965(Lout)m 985(is)s 1187(able)s 1633(to)s 1864(read)s
+2325(v)s 3(ertical)k 3084(g)s 1(alle)k 3(ys)k
+3800(one)s 4194(paragraph)s 5199(at)s 5424(a)s 5582(time;)s
+6110(in)s 6345(this)s 6733(w)s 2(ay)k 7176(it)s
+7360(processes)s 8319(the)s 8659(doc)s 8998(-)s 0 7677(ument)m
+660(in)s 906(small)s 1481(chunks,)s 2270(ne)s 6(v)k 3(er)k
+2855(holding)s 3642(more)s 4192(than)s 4664(a)s 4833(fe)s 6(w)k
+5242(pages)s 5840(in)s 6086(memory)s 6940(at)s 7175(an)s 3(y)k
+7575(time.)s 8166(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+0 7389(horizontal)m 1024(g)s 1(alle)k 3(ys)k 1748(are)s
+2095(al)s 2(w)k 2(ays)k 2806(read)s 3275(in)s
+3518(completely)s 15(,)k 4672(so)s 4938(the)s 3(y)k
+5401(should)s 6098(not)s 6464(be)s 6746(e)s 3(xtremely)k
+7752(long.)s 480 7015(In)m 744(principle)s 1658(Lout)s 2178(should)s
+2884(be)s 3174(able)s 3637(to)s 3884(h)s 1(yphenate)k
+4932(the)s 5288(components)s 6505(of)s 6784(horizontal)s 7817(g)s 1(alle)k 3(ys)k
+8550(when)s 0 6727(the)m 3(y)k 463(are)s 810(simple)s
+1503(w)s 2(ords,)k 2193(b)s 4(ut)k 2555(this)s
+2951(is)s 3161(not)s 3527(implemented)s 4833(at)s 5065(present.)s
+480 6353(In)m 738(an)s 1023(ideal)s 1544(w)s 2(orld,)k
+2209(e)s 6(v)k 3(ery)k 2787(paragraph)s 3802(w)s 2(ould)k
+4459(be)s 4743(treated)s 5452(as)s 5704(a)s 5872(horizontal)s
+6898(g)s 1(alle)k 3(y)k 15(.)k 7629(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+8591(to)s 8833(do)s 0 6065(so)m 256(in)s 488(practice)s
+1288(w)s 2(ould)k 1932(be)s 2203(too)s 2551(slo)s 6(w)k
+3040(and)s 3433(w)s 2(ould)k 4077(lead)s 4522(to)s
+4750(e)s 3(xcessi)k 6(v)k 3(e)k 5699(clumsiness)s
+6788(in)s 7020(notation,)s 7900(so)s 8155(at)s 8376(present)s
+0 5777(Lout)m 509(has)s 876(tw)s 2(o)k 1282(competing)s
+2342(mechanisms)s 3572(in)s 3811(this)s 4204(area:)s 4764(the)s
+5108(b)s 4(uilt-in)k 5861(paragraph)s 6871(break)s 2(er)k
+7641(with)s 8120(its)s 8392(limited)s 0 5489(set)m 314(of)s
+573(options)s 1318(as)s 1556(gi)s 6(v)k 3(en)k
+2124(under)s 2718(the)s 220 fnt35 3054 5486(@Break)m 240 fnt82
+3899 5489(operator)m 9(,)k 4781(and)s 5173(horizontal)s 6186(g)s 1(alle)k 3(ys.)k
+7011(As)s 7317(the)s 7653(e)s 3(xample)k 8504(abo)s 3(v)k 3(e)k
+0 5201(sho)m 6(ws,)k 700(horizontal)s 1725(g)s 1(alle)k 3(ys)k
+2449(are)s 2797(in)s 3040(principle)s 3946(capable)s 4733(of)s
+5004(implementing)s 6386(man)s 3(y)k 6969(more)s 7517(paragraph)s
+8531(styles)s 0 4913(than)m 470(the)s 820(b)s 4(uilt-in)k
+1578(paragraph)s 2593(break)s 2(er)k 3369(could)s 3961(e)s 6(v)k 3(er)k
+4425(hope)s 4949(to)s 5190(do.)s 5596(The)s 6026(recommended)s
+7441(practical)s 8319(strate)s 3(gy)k 0 4625(is)m 221(to)s
+472(use)s 858(the)s 1218(b)s 4(uilt-in)k 1985(paragraph)s
+3010(break)s 2(er)k 3795(most)s 4332(of)s 4614(the)s
+4974(time,)s 5516(and)s 5932(switch)s 6624(to)s 6875(horizontal)s
+7910(g)s 1(alle)k 3(ys)k 8646(only)s 0 4337(for)m
+338(occasional)s 1402(tricks,)s 2039(such)s 2535(as)s 2785(paragraphs)s
+3885(with)s 4367(drop)s 4859(capitals,)s 5695(circular)s 6483(outlines,)s
+7347(etc.)s 240 fnt84 0 3544(2.10.)m 591(Optimal)s 1495(galley)s
+2149(br)s 4(eaking)k 240 fnt82 480 3067(As)m 814(e)s 3(xplained)k
+1817(in)s 2077(Section)s 2869(2.7,)s 3294(the)s 3659(components)s
+4885(of)s 5174(a)s 5357(g)s 1(alle)k 3(y)k
+6009(are)s 6373(promoted)s 7366(one)s 7786(by)s 8097(one)s
+8517(into)s 8960(a)s 0 2779(tar)m 4(get.)k 703(When)s
+1332(space)s 1919(runs)s 2382(out)s 2748(there,)s 3332(the)s
+3680(g)s 1(alle)k 3(y)k 4314(searches)s 5174(for)s
+5512(a)s 5678(ne)s 6(w)k 6125(tar)s 4(get)k
+6724(and)s 7128(promotion)s 8182(resumes.)s 480 2405(This)m 977(process)s
+1766(is)s 1997(e)s 3(xactly)k 2759(analogous)s 3802(to)s
+4062(placing)s 4840(w)s 2(ords)k 5495(onto)s 5995(a)s
+6182(line)s 6617(until)s 7131(space)s 7739(runs)s 8223(out,)s
+8657(then)s 0 2117(mo)m 3(ving)k 776(to)s 1008(another)s
+1778(line.)s 2293(But,)s 2740(as)s 2983(we)s 3311(kno)s 6(w)k 15(,)k
+3923(that)s 4335(simple)s 5021(method)s 5790(is)s 5993(inferior)s
+6762(to)s 6994(the)s 7335(optimal)s 8113(paragraph)s 0 1829(breaking)m
+893(used)s 1393(by)s 1690(Lout)s 2206(\(copied)s 2984(from)s
+3511(the)s 3863(T)s 3959 1781(E)m 4067 1829(X)m 4299(system\),)s
+5152(which)s 5797(e)s 3(xamines)k 6752(the)s 7103(entire)s
+7705(paragraph)s 8722(and)s 0 1541(determines)m 1099(the)s 1447(most)s
+1972(e)s 6(v)k 3(en)k 2472(assignment)s 3608(of)s
+3879(w)s 2(ords)k 4513(to)s 4752(lines.)s 480 1167(Lout)m
+1050(of)s 6(fers)k 240 fnt83 1709 1169(optimal)m 2559(galle)s 7(y)k
+3250(br)s 8(eaking)k 240 fnt82 4087 1167(,)m 4252(the)s
+4659(equi)s 6(v)k 6(alent)k 5761(for)s 6157(g)s 1(alle)k 3(ys)k
+6940(of)s 7269(optimal)s 8113(paragraph)s 0 879(breaking.)m 1020(Optimal)s
+1878(g)s 1(alle)k 3(y)k 2532(breaking)s 3442(can)s
+3851(reduce)s 4564(the)s 4932(size)s 5378(of)s 5669(ugly)s
+6169(blank)s 6782(spaces)s 7477(at)s 7729(the)s 8097(bottom)s
+8855(of)s 0 591(pages)m 596(preceding)s 1592(lar)s 4(ge)k
+2121(unbreakable)s 3346(displays,)s 4237(sometimes)s 5310(quite)s 5844(dramatically)s 15(.)k
+480 217(Optimal)m 1337(g)s 1(alle)k 3(y)k 1990(breaking)s
+2900(is)s 3129(applied)s 3910(to)s 4169(each)s 4683(g)s 1(alle)k 3(y)k 15(,)k
+5375(horizontal)s 6418(or)s 6696(v)s 3(ertical,)k 7535(that)s
+7972(possesses)s 8960(a)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 35 41
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(2.10.)m 574(Optimal)s 1418(galle)s 7(y)k
+2051(br)s 8(eaking)k 240 fnt84 8833 13840(35)m 240 fnt82
+0 13205(parameter)m 1036(or)s 1317(nested)s 2008(symbol)s 2790(called)s
+220 fnt35 3440 13202(@Optimiz)m 3(e)k 240 fnt82 4599 13205(whose)m
+5290(v)s 6(alue)k 5880(is)s 220 fnt35 6112 13202(Y)m 30(es)k
+240 fnt82 6453 13205(.)m 6639(Lik)s 2(e)k 7153(cross)s
+7717(referencing,)s 8934(it)s 0 12917(tak)m 2(es)k 539(tw)s 2(o)k
+947(runs)s 1409(to)s 1646(ha)s 4(v)k 3(e)k
+2145(ef)s 6(fect.)k 2844(On)s 3192(the)s 3538(\207rst)s
+3968(run,)s 4392(Lout)s 4902(records)s 5655(the)s 6001(sizes)s
+6514(of)s 6784(the)s 7130(g)s 1(alle)k 3(y')k 13(s)k
+7918(components)s 0 12629(and)m 393(g)s 1(aps,)k 927(and)s
+1319(also)s 1746(the)s 2083(space)s 2658(a)s 4(v)k 6(ailable)k
+3555(at)s 3776(each)s 4259(of)s 4519(its)s 4783(tar)s 4(gets.)k
+5568(At)s 5856(end)s 6248(of)s 6508(run)s 6873(this)s
+7257(information)s 8431(is)s 8629(used)s 0 12341(to)m 232(\207nd)s
+656(an)s 932(optimal)s 1709(break,)s 2340(which)s 2975(is)s
+3177(written)s 3903(to)s 4135(the)s 4475(cross-reference)s 5981(database.)s
+6961(On)s 7303(the)s 7644(second)s 8360(run,)s 8778(the)s
+0 12053(optimal)m 785(break)s 1377(is)s 1587(retrie)s 6(v)k 3(ed)k
+2484(and)s 2888(used.)s 480 11679(Considering)m 1727(that)s 2170(this)s
+2590(process)s 3383(must)s 3932(cope)s 4465(with)s 4971(\210oating)s
+5780(\207gures,)s 6562(ne)s 6(w)k 7034(page)s 7566(and)s
+7995(conditional)s 0 11391(ne)m 6(w)k 460(page)s 982(symbols,)s
+1901(breaks)s 2589(for)s 2941(ne)s 6(w)k 3402(chapters,)s
+4318(and)s 4736(e)s 6(v)k 4(olving)k 5631(documents,)s
+6788(it)s 6994(is)s 7218(surprisingly)s 8428(rob)s 4(ust.)k
+0 11103(If)m 250(it)s 463(does)s 974(go)s 1287(badly)s
+1894(wrong,)s 2634(remo)s 3(ving)k 3621(\207le)s 220 fnt35
+4003 11100(lout.li)m 240 fnt82 4580 11103(then)m 5069(running)s 5888(Lout)s
+6421(twice)s 7014(without)s 7826(changing)s 8778(the)s 0 10815(document)m
+1036(may)s 1534(solv)s 3(e)k 2125(the)s 2505(problem.)s
+3498(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+4491(cases)s 5078(are)s 5457(kno)s 6(wn)k 6194(where)s
+6866(the)s 7246(optimization)s 8544(ne)s 6(v)k 3(er)k
+0 10527(con)m 9(v)k 3(er)k 4(ges.)k 1151(These)s
+1812(are)s 2193(usually)s 2972(related)s 3713(to)s 3986(\207gures)s
+4721(and)s 5159(footnotes)s 6134(whose)s 6836(anchor)s 7581(points)s
+8251(f)s 2(all)k 8655(near)s 0 10239(page)m 508(boundaries.)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 36 42
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+480 fnt84 0 12955(Chapter)m 1819(3.)s 2400(Pr)s 8(ede\207ned)k
+4711(symbols)s 240 fnt84 0 11691(3.1.)m 471(@Begin)s 1335(and)s
+1776(@End)s 240 fnt82 480 11214(The)m 905(body)s 1435(of)s
+1702(a)s 1864(symbol)s 220 fnt35 2620 11211(@Sym)m 240 fnt82
+3324 11214(may)m 3786(be)s 4064(enclosed)s 4955(in)s 220 fnt35
+5194 11211(@Begin)m 240 fnt82 6019 11214(and)m 220 fnt35 6419 11211(@End)m
+7076(@Sym)s 240 fnt82 7780 11214(instead)m 8511(of)s 8778(the)s
+0 10926(more)m 547(usual)s 1107(braces:)s 220 fnt35 480 10475(def @Section)m
+480 10187(    named @Title {})m 480 9899(    r)m -3(ight @Body)k 480 9611(@Begin)m 480 9323(    @Title //2v @Body)m
+480 9035(@End @Section)m 240 fnt82 0 8580(The)m 3(y)k 543(may)s
+1009(also)s 1447(enclose)s 2220(the)s 2568(right)s 3079(or)s
+3338(body)s 3872(parameter)s 4886(of)s 5157(a)s 5323(symbol)s
+6083(in)s 9(v)k 4(ocation:)k 220 fnt35 480 8079(@Chapter)m
+480 7791(    @Title { Introduction })m 480 7503(@Begin)m 480 7215(This subject needs no introduction.)m 480 6927(@End @Chapter)m 240 fnt82
+0 6431(Apart)m 651(from)s 1222(their)s 1767(utility)s 2438(as)s
+2735(documentation)s 4262(aids,)s 4801(these)s 5396(forms)s 6051(allo)s 6(w)k
+6677(Basser)s 7422(Lout)s 7981(to)s 8268(pinpoint)s 0 6143(mismatched)m
+1206(braces,)s 1915(which)s 2549(can)s 2930(otherwise)s 3908(create)s
+4525(total)s 4996(ha)s 4(v)k 4(oc.)k 5716(F)s 3(or)k
+6098(this)s 6486(reason,)s 7209(the)s 3(y)k 7664(should)s
+8353(enclose)s 0 5855(the)m 339(major)s 946(parts)s 1451(of)s
+1712(documents,)s 2846(such)s 3333(as)s 3573(chapters)s 4410(and)s
+4804(sections.)s 5728(Note)s 6240(that)s 6648(braces)s 7299(cannot)s
+7987(be)s 8259(replaced)s 0 5567(by)m 220 fnt35 294 5564(@Begin)m
+240 fnt82 1123 5567(and)m 220 fnt35 1527 5564(@End)m 240 fnt82
+2188 5567(in)m 2431(general.)s 240 fnt84 0 4774(3.2.)m 471(Concatenation)s
+2015(symbols)s 2893(and)s 3334(paragraphs)s 240 fnt82 480 4297(There)m
+1093(are)s 1440(ten)s 1789(concatenation)s 3174(symbols,)s 4079(in)s
+4322(three)s 4855(f)s 2(amilies:)k 220 fnt35 480 3756(/)m
+962(^/)s 1547(//)s 2012(^//)s 240 fnt82 2580 3759(V)m 26(ertical)k
+3377(concatenation)s 220 fnt35 480 3468(|)m 962(^|)s 1547(||)s
+2012(^||)s 240 fnt82 2580 3471(Horizontal)m 3657(concatenation)s 220 fnt35
+480 3180(&)m 962(^&)s 240 fnt82 2580 3183(In-paragraph)m 3871(concatenation)s
+0 2642(Each)m 587(symbol)s 1399(produces)s 2367(an)s 2702(object)s
+3398(which)s 4093(combines)s 5113(together)s 6008(the)s 6409(tw)s 2(o)k
+6871(parameters.)s 8134(The)s 8615(right)s 0 2354(parameter)m 1014(must)s
+1539(be)s 1821(separated)s 2781(from)s 3305(the)s 3653(symbol)s
+4413(by)s 4707(at)s 4939(least)s 5436(one)s 5838(white)s
+6425(space)s 7012(character)s 13(.)k 480 1980(The)m 906(v)s 3(ertical)k
+1670(concatenation)s 3052(symbol)s 220 fnt35 3809 1977(/)m 240 fnt82
+3930 1980(places)m 4575(its)s 4848(left)s 5222(parameter)s 6233(abo)s 3(v)k 3(e)k
+6852(its)s 7125(right)s 7633(parameter)s 8644(with)s 0 1692(their)m
+519(column)s 1317(marks)s 1975(aligned.)s 2866(If)s 3119(one)s
+3544(parameter)s 4581(has)s 4973(more)s 5543(column)s 6341(marks)s
+6999(than)s 7491(the)s 7862(other)s 9(,)k 8474(empty)s
+0 1404(columns)m 868(are)s 1221(inserted)s 2041(at)s 2279(the)s
+2633(right)s 3150(to)s 3395(equalize)s 4253(the)s 4607(numbers.)s
+5601(The)s 6035(v)s 6(ariant)k 220 fnt35 6758 1401(//)m
+240 fnt82 6949 1404(ignores)m 7710(column)s 8491(marks)s 0 1116(and)m
+404(left-justi\207es)s 1594(the)s 1942(objects.)s 480 742(The)m 896(horizontal)s
+1908(concatenation)s 3280(symbols)s 220 fnt35 4117 739(|)m 240 fnt82
+4201 742(and)m 220 fnt35 4593 739(||)m 240 fnt82 4734 742(are)m
+5069(horizontal)s 6080(analogues)s 7076(of)s 220 fnt35 7334 739(/)m
+240 fnt82 7446 742(and)m 220 fnt35 7837 739(//)m 240 fnt82
+7962 742(:)m 8116(the)s 3(y)k 8566(place)s 192 fnt84
+4439 2(36)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 37 43
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.2.)m 454(Concatenation)s 1918(symbols)s 2744(and)s
+3170(par)s 3(a)k 2(gr)k 3(aphs)k 240 fnt84
+8831 13840(37)m 240 fnt82 0 13205(their)m 488(tw)s 2(o)k
+888(parameters)s 1976(side)s 2407(by)s 2692(side,)s 3174(with)s
+3646(ro)s 6(w)k 4056(mark)s 4599(alignment)s 5605(or)s
+5854(top-justi\207cation)s 7414(respecti)s 6(v)k 3(ely)k 15(.)k
+8698(The)s 0 12917(in-paragraph)m 1278(concatenation)s 2663(symbol)s 220 fnt35
+3423 12914(&)m 240 fnt82 3625 12917(produces)m 4540(horizontal)s 5564(concatenation)s
+6949(within)s 7617(a)s 7783(paragraph;)s 8850(its)s 0 12629(special)m
+718(properties)s 1724(are)s 2071(treated)s 2778(in)s 3021(detail)s
+3606(at)s 3838(the)s 4186(end)s 4590(of)s 4861(this)s
+5257(section.)s 480 12255(The)m 908(concatenation)s 2293(symbols)s 3142(in)s
+3385(an)s 3(y)k 3782(one)s 4184(f)s 2(amily)k
+4859(are)s 240 fnt83 5206 12257(mutually)m 6099(associative)s 240 fnt82
+7154 12255(,)m 7261(which)s 7903(means)s 8565(that)s 220 fnt35
+480 11754({)m 240 fnt83 664 11759(x)m 220 fnt35 890 11754(|)m
+240 fnt83 927 11759(p)m 1160(y)s 220 fnt35 1382 11754(})m
+1566(|)s 240 fnt83 1603 11759(q)m 1839(z)s 240 fnt82
+0 11258(is)m 210(al)s 2(w)k 2(ays)k 921(the)s
+1269(same)s 1816(as)s 240 fnt83 480 10762(x)m 220 fnt35
+706 10757(|)m 240 fnt83 743 10762(p)m 220 fnt35 976 10757({)m
+240 fnt83 1160 10762(y)m 220 fnt35 1382 10757(|)m 240 fnt83
+1419 10762(q)m 1655(z)s 220 fnt35 1866 10757(})m 240 fnt82
+0 10261(for)m 339(an)s 3(y)k 737(objects)s 240 fnt83
+1466 10263(x)m 240 fnt82 1572 10261(,)m 240 fnt83 1680 10263(y)m
+240 fnt82 1782 10261(,)m 1891(and)s 240 fnt83 2296 10263(z)m
+240 fnt82 2387 10261(,)m 2495(an)s 3(y)k 2893(g)s 1(aps)k
+240 fnt83 3383 10263(p)m 240 fnt82 3558 10261(and)m 240 fnt83
+3963 10263(q)m 240 fnt82 4140 10261(\(de\207ned)m 4983(belo)s 6(w\),)k
+5750(and)s 6155(an)s 3(y)k 6553(choice)s 7234(of)s
+220 fnt35 7506 10258(|)m 240 fnt82 7543 10261(,)m 220 fnt35
+7652 10258(^|)m 240 fnt82 7792 10261(,)m 220 fnt35 7900 10258(||)m
+240 fnt82 7994 10261(,)m 8102(and)s 220 fnt35 8507 10258(^||)m
+240 fnt82 8704 10261(.)m 8870(In)s 0 9973(practice)m 803(we)s
+1130(al)s 2(w)k 2(ays)k 1833(omit)s 2323(such)s
+2811(braces,)s 3520(since)s 4059(the)s 3(y)k 4513(are)s
+4852(redundant)s 5861(and)s 6257(can)s 6638(be)s 6912(misleading.)s
+8117(The)s 8536(result)s 0 9685(of)m 277(the)s 631(complete)s
+1569(sequence)s 2508(of)s 2786(concatenations)s 4264(will)s 4696(be)s
+4984(called)s 5619(the)s 240 fnt83 5973 9687(whole)m 6604(concatenation)s
+8020(object)s 240 fnt82 8608 9685(,)m 8722(and)s 0 9397(the)m
+348(objects)s 1076(which)s 1718(mak)s 2(e)k 2290(it)s
+2482(up)s 2775(will)s 3201(be)s 3483(called)s 4111(the)s
+240 fnt83 4459 9399(components)m 240 fnt82 5598 9397(.)m 480 9023(One)m
+938(mark)s 1494(is)s 1708(designated)s 2793(as)s 3047(the)s
+240 fnt83 3398 9025(principal)m 4339(mark)s 240 fnt82 4835 9023(,)m
+4946(usually)s 5695(the)s 6047(mark)s 6602(of)s 6877(the)s
+7229(\207rst)s 7664(component.)s 8896(A)s 0 8735(later)m 486(mark)s
+1042(can)s 1435(be)s 1721(chosen)s 2447(for)s 2789(this)s
+3189(honour)s 3932(by)s 4230(attaching)s 220 fnt35 5163 8732(^)m
+240 fnt82 5333 8735(to)m 5576(the)s 5928(preceding)s 6928(concatenation)s
+8317(symbol.)s 0 8447(See)m 401(Section)s 1175(3.9)s 1526(for)s
+1864(e)s 3(xamples.)k 480 8073(A)m 240 fnt83 712 8075(gap)m
+240 fnt82 1065 8073(,)m 1175(specifying)s 2227(the)s 2578(distance)s
+3420(between)s 4277(the)s 4627(tw)s 2(o)k 5040(parameters,)s
+6197(may)s 6666(follo)s 6(w)k 7341(an)s 3(y)k
+7741(concatenation)s 0 7785(symbol.)m 866(There)s 1475(may)s 1937(be)s
+2215(no)s 2504(spaces)s 3176(between)s 4026(a)s 4188(concatenation)s
+5569(symbol)s 6325(and)s 6726(its)s 6998(g)s 1(ap.)k
+7503(A)s 7729(missing)s 8522(g)s 1(ap)k 8916(is)s
+0 7497(tak)m 2(en)k 569(to)s 803(be)s 220 fnt35
+1081 7494(0ie)m 240 fnt82 1365 7497(.)m 1524(The)s 1948(g)s 1(ap)k
+2341(is)s 2546(ef)s 6(fecti)k 6(v)k 3(ely)k
+3601(a)s 3762(third)s 4267(parameter)s 5276(of)s 5542(the)s
+5886(concatenation)s 7266(symbol,)s 8074(and)s 8473(it)s 8660(may)s
+0 7209(be)m 289(an)s 579(arbitrary)s 1462(object)s 2113(pro)s 3(vided)k
+3026(that)s 3452(it)s 3651(e)s 6(v)k 6(aluates)k
+4586(to)s 4833(a)s 5006(juxtaposition)s 6319(of)s 6598(simple)s
+7298(w)s 2(ords.)k 8052(In)s 8316(general,)s 0 6921(the)m
+348(g)s 1(ap)k 746(must)s 1271(be)s 1553(enclosed)s
+2448(in)s 2691(braces,)s 3408(lik)s 2(e)k 3820(this:)s
+220 fnt35 480 6420(//{  @Style&&m)m 3(ystyle @Open { @T)k 26(opMargin }  })k 240 fnt82
+0 5921(b)m 4(ut)k 349(the)s 684(braces)s 1332(may)s
+1785(be)s 2053(omitted)s 2828(when)s 3391(the)s 3726(object)s
+4356(is)s 4553(a)s 4706(juxtaposition)s 5999(of)s 6256(simple)s
+6936(w)s 2(ords)k 7557(or)s 7803(an)s 8072(in)s 9(v)k 4(ocation)k
+0 5633(of)m 271(a)s 437(symbol)s 1197(without)s 1988(parameters,)s
+3142(as)s 3392(in)s 220 fnt35 3635 5630(//0.3vx)m 240 fnt82
+4340 5633(and)m 220 fnt35 4744 5630(||@Indent)m 240 fnt82 5687 5633(.)m
+480 5259(A)m 704(g)s 1(ap)k 1096(consists)s 1898(of)s
+2162(a)s 2322(length)s 2971(plus)s 3415(a)s 3574(g)s 1(ap)k
+3966(mode)s 4548(plus)s 4992(an)s 5268(optional)s 6101(indication)s
+7108(of)s 7373(unbreakability)s 15(.)k 8896(A)s 240 fnt83
+0 4973(length)m 240 fnt82 659 4971(is)m 875(represented)s 2040(by)s
+2341(an)s 2630(decimal)s 3447(number)s 4244(\(which)s 4972(may)s
+5444(not)s 5816(be)s 6104(ne)s 3(g)k 1(ati)k 6(v)k 3(e\))k
+7036(follo)s 6(wed)k 7944(by)s 8244(a)s 8416(unit)s
+8855(of)s 0 4683(measurement.)m 1437(F)s 3(or)k 1825(e)s 3(xample,)k
+220 fnt35 2738 4680(2.5c)m 240 fnt82 3207 4683(represents)m 4225(the)s
+4572(length)s 5226(2.5)s 5571(centimetres.)s 6834(Figure)s 7513(3.1)s
+7847(gi)s 6(v)k 3(es)k 8393(the)s 8740(full)s
+0 4395(selection)m 906(of)s 1177(units)s 1693(of)s 1964(measurement.)s
+480 4021(After)m 1045(the)s 1396(length)s 2054(comes)s 2718(an)s
+3004(optional)s 240 fnt83 3846 4023(gap)m 4261(mode)s 240 fnt82
+4773 4021(,)m 4883(which)s 5528(is)s 5740(a)s 5909(single)s
+6539(letter)s 7090(follo)s 6(wing)k 8070(the)s 8421(length,)s
+0 3733(indicating)m 1031(ho)s 6(w)k 1514(the)s 1884(length)s
+2562(is)s 2794(to)s 3055(be)s 3359(measured.)s 4462(As)s
+4801(sho)s 6(wn)k 5500(in)s 5765(Figure)s 6468(3.2,)s
+6897(with)s 7401(edge-to-edge)s 8728(g)s 1(ap)k 0 3445(mode)m
+603(the)s 967(length)s 240 fnt83 1638 3447(l)m 240 fnt82
+1780 3445(is)m 2006(measured)s 2996(from)s 3536(the)s 3900(trailing)s
+4658(edge)s 5181(of)s 5468(the)s 5832(\207rst)s 6279(object)s
+6939(to)s 7194(the)s 7558(leading)s 8331(edge)s 8855(of)s
+0 3157(the)m 347(second.)s 1174(Edge-to-edge)s 2516(is)s 2725(the)s
+3071(def)s 2(ault)k 3790(mode:)s 4486(the)s 220 fnt35
+4833 3154(e)m 240 fnt82 5005 3157(may)m 5469(be)s 5749(omitted.)s
+6642(Hyphenation)s 7934(g)s 1(ap)k 8330(mode)s 8916(is)s
+0 2869(similar)m 9(,)k 760(e)s 3(xcept)k 1441(as)s
+1691(e)s 3(xplained)k 2676(at)s 2908(the)s 3256(end)s
+3660(of)s 3931(this)s 4327(section.)s 480 2495(Mark-to-mark,)m 1957(o)s 3(v)k 3(erstrik)k 2(e,)k
+3028(and)s 3450(k)s 2(erning)k 4249(measure)s 5118(the)s
+5484(length)s 6156(from)s 6698(the)s 7063(last)s 7471(mark)s
+8041(of)s 8329(the)s 8695(\207rst)s 0 2207(object)m 648(to)s
+892(the)s 1245(\207rst)s 1680(mark)s 2237(of)s 2513(the)s
+2865(second.)s 3699(In)s 3960(the)s 4312(case)s 4784(of)s
+5060(mark-to-mark,)s 6497(if)s 6719(the)s 7072(length)s 7731(is)s
+7946(too)s 8310(small)s 8887(to)s 0 1919(pre)m 6(v)k 3(ent)k
+771(the)s 1123(objects)s 1855(almost)s 2556(o)s 3(v)k 3(erlapping,)k
+3804(it)s 4000(is)s 4214(widened)s 5087(until)s 5584(the)s 3(y)k
+6051(no)s 6348(longer)s 7023(do.)s 7431(\(The)s 7942(e)s 3(xtra)k
+240 fnt83 8480 1921(l/10)m 240 fnt82 8916 1919(is)m 0 1631(not)m
+362(applied)s 1119(when)s 1690(plain)s 2220(te)s 3(xt)k
+2630(output)s 3298(is)s 3503(in)s 3741(ef)s 6(fect.\))k
+4520(K)s 6(erning)k 5346(also)s 5780(widens,)s 6560(with)s
+7037(the)s 7380(aim)s 7793(of)s 8059(pre)s 6(v)k 3(enting)k
+0 1343(the)m 372(mark)s 948(of)s 1243(either)s 1870(object)s
+2539(from)s 3087(o)s 3(v)k 3(erlapping)k 4301(the)s
+4673(other)s 5248(object;)s 5969(this)s 6389(mode)s 7001(is)s
+7235(used)s 7756(for)s 8119(subscripts)s 0 1055(and)m 404(superscripts.)s
+558 681(T)m 19(ab)k 4(ulation)k 1646(ignores)s 2419(the)s
+2785(\207rst)s 3234(object)s 3896(and)s 4318(places)s 4984(the)s
+5350(leading)s 6125(edge)s 6651(of)s 6940(the)s 7306(second)s
+8047(object)s 8709(at)s 8960(a)s 0 393(distance)m 240 fnt83
+842 395(l)m 240 fnt82 971 393(from)m 1498(the)s 1849(left)s
+2229(edge)s 2740(of)s 3014(the)s 3365(whole)s 4009(concatenation)s
+5397(object.)s 6148(It)s 6356(is)s 6569(the)s 6920(main)s
+7458(user)s 7919(of)s 8193(the)s 220 fnt35 8544 390(b)m
+240 fnt82 8722 393(and)m 220 fnt35 0 102(r)m 240 fnt82
+141 105(units)m 666(of)s 945(measurement;)s 2340(for)s 2686(e)s 3(xample,)k
+220 fnt35 3609 102(|1r)m -8(t)k 240 fnt82 3994 105(will)m
+4429(right-justify)s 5631(the)s 5988(follo)s 6(wing)k 6973(component,)s
+8153(and)s 220 fnt35 8566 102(|0.5r)m -8(t)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 38 44
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(38)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s gsave
+0 13282 translate
+240 fnt82 0 86 0 86 240 288 60 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+0 13368 translate
+240 fnt82 170 0 0 0 240 288 60 LoutGraphic
+gsave
+0.5 pt ltabhsp
+grestore
+
+grestore
+gsave
+0 13113 translate
+240 fnt82 0 169 0 60 240 288 60 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+0 13027 translate
+240 fnt82 0 86 0 0 240 288 60 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+170 13368 translate
+240 fnt82 169 0 0 0 240 288 60 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+220 fnt35 170 13116(c)m
+gsave
+339 13368 translate
+240 fnt82 170 0 0 0 240 288 60 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+gsave
+509 13368 translate
+240 fnt82 170 0 0 0 240 288 60 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+gsave
+679 13368 translate
+240 fnt82 8217 0 0 0 240 288 60 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+240 fnt82 679 13119(Centimetres.)m 170 0 0 0 240 288 60 8896 13368 LoutGr2
+0.5 pt ltabhsp
+grestore
+
+grestore
+0 86 0 86 240 288 60 9066 13282 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 169 0 60 240 288 60 9066 13113 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 13027 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 12941 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 166 0 57 240 288 60 0 12775 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 12689 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+220 fnt35 170 12775(i)m 240 fnt82
+679 12778(Inches.)m 0 86 0 86 240 288 60 9066 12941 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 166 0 57 240 288 60 9066 12775 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 12689 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 12603 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 211 0 102 240 288 60 0 12392 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 12306 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+220 fnt35 170 12437(p)m 240 fnt82 679 12440(Points)m
+1328(\()s 220 fnt35 1401 12437(72p)m 240 fnt82 1819 12440(=)m
+220 fnt35 2007 12437(1i)m 240 fnt82 2163 12440(\).)m 0 86 0 86 240 288 60 9066 12603 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 211 0 102 240 288 60 9066 12392 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 12306 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 12220 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 204 0 96 240 288 60 0 12016 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 11930 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+220 fnt35
+170 12055(m)m 240 fnt82 679 12058(Ems)m 1155(\()s 220 fnt35
+1228 12055(12m)m 240 fnt82 1701 12058(=)m 220 fnt35 1889 12055(1i)m
+240 fnt82 2045 12058(\).)m 0 86 0 86 240 288 60 9066 12220 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 204 0 96 240 288 60 9066 12016 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 11930 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 11844 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 503 0 394 240 288 60 0 11341 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 11255 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+220 fnt35 170 11678(f)m 240 fnt82
+679 11681(One)m 220 fnt35 1123 11678(f)m 240 fnt82 1229 11681(equals)m
+1879(the)s 2215(size)s 2631(of)s 2890(the)s 3226(current)s
+3950(font,)s 4431(as)s 4669(speci\207ed)s 5565(by)s 5847(the)s
+220 fnt35 6184 11678(@F)m 6(ont)k 240 fnt82 6884 11681(symbol)m
+7632(\(Section)s 8473(3.3\).)s 679 11393(This)m 1155(unit)s 1587(is)s
+1797(appropriate)s 2941(for)s 3279(lengths)s 4021(that)s 4439(should)s
+5136(change)s 5870(with)s 6352(the)s 6700(font)s 7145(size.)s
+0 86 0 86 240 288 60 9066 11844 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 503 0 394 240 288 60 9066 11341 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 11255 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 11169 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 503 0 394 240 288 60 0 10666 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 10580 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+220 fnt35 170 11003(s)m 240 fnt82 679 11006(One)m 220 fnt35
+1125 11003(s)m 240 fnt82 1279 11006(equals)m 1932(the)s 2271(preferred)s
+3194(g)s 1(ap)k 3582(between)s 4427(tw)s 2(o)k
+4828(w)s 2(ords)k 5453(in)s 5687(the)s 6025(current)s
+6752(font,)s 7235(as)s 7476(speci\207ed)s 8375(in)s 8608(the)s
+679 10718(de\207nition)m 1653(of)s 1924(the)s 2272(font,)s 2764(or)s
+3023(by)s 3317(the)s 220 fnt35 3665 10715(@Space)m 240 fnt82
+4562 10718(symbol)m 5322(\(Section)s 6175(3.4\).)s 0 86 0 86 240 288 60 9066 11169 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 503 0 394 240 288 60 9066 10666 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 10580 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 10494 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 791 0 682 240 288 60 0 9703 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 9617 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+220 fnt35 170 10328(v)m
+240 fnt82 679 10331(One)m 220 fnt35 1149 10328(v)m 240 fnt82
+1334 10331(equals)m 2011(the)s 2375(current)s 3126(g)s 1(ap)k
+3540(between)s 4410(lines)s 4927(introduced)s 6024(during)s 6717(paragraph)s
+7746(breaking,)s 8706(as)s 679 10043(speci\207ed)m 1574(by)s 1854(the)s
+220 fnt35 2188 10040(@Break)m 240 fnt82 3030 10043(symbol)m 3777(\(Section)s
+4616(3.4\).)s 5145(This)s 5607(unit)s 6026(is)s 6222(appropriate)s
+7352(for)s 7676(lengths,)s 8460(such)s 679 9755(as)m 929(the)s
+1277(spaces)s 1952(between)s 2806(paragraphs,)s 3962(which)s 4604(should)s
+5301(change)s 6035(with)s 6517(the)s 6865(inter)s 4(-line)k
+7791(g)s 1(ap.)k 0 86 0 86 240 288 60 9066 10494 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 791 0 682 240 288 60 9066 9703 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 9617 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 9531 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 454 0 345 240 288 60 0 9077 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 8991 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+220 fnt35 170 9365(w)m 240 fnt82
+679 9368(One)m 220 fnt35 1167 9365(w)m 240 fnt82 1416 9368(equals)m
+2111(the)s 2493(width)s 3128(of)s 3432(the)s 3813(follo)s 6(wing)k
+4824(component,)s 6028(or)s 6320(its)s 6629(height)s 7321(if)s
+7571(the)s 7952(symbol)s 8746(is)s 679 9080(v)m 3(ertical)k
+1446(concatenation.)s 0 86 0 86 240 288 60 9066 9531 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 454 0 345 240 288 60 9066 9077 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 8991 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 8905 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 454 0 345 240 288 60 0 8451 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 8365 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+220 fnt35 170 8739(b)m 240 fnt82 679 8742(One)m
+220 fnt35 1133 8739(b)m 240 fnt82 1305 8742(equals)m 1965(the)s
+2311(width)s 2912(of)s 3181(the)s 3527(whole)s 4166(concatenation)s
+5550(object,)s 6239(or)s 6496(its)s 6770(height)s 7427(if)s
+7642(the)s 7988(symbol)s 8746(is)s 679 8454(v)m 3(ertical)k
+1446(concatenation.)s 0 86 0 86 240 288 60 9066 8905 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 454 0 345 240 288 60 9066 8451 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 8365 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 8279 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 503 0 394 240 288 60 0 7776 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 7690 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+220 fnt35 170 8113(r)m 240 fnt82 679 8116(One)m
+220 fnt35 1176 8113(r)m 240 fnt82 1352 8116(equals)m 2057(one)s
+220 fnt35 2502 8113(b)m 240 fnt82 2718 8116(minus)m 3397(one)s
+220 fnt35 3842 8113(w)m 240 fnt82 3998 8116(.)m 4205(This)s
+4723(unit)s 5198(is)s 5451(used)s 5991(for)s 6371(centring,)s
+7304(and)s 7751(for)s 8132(left)s 8552(and)s 679 7828(right)m
+1190(justi\207cation.)s 0 86 0 86 240 288 60 9066 8279 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 503 0 394 240 288 60 9066 7776 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 7690 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 7604 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 215 0 106 240 288 60 0 7389 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 7303 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+220 fnt35 170 7438(d)m 240 fnt82 679 7441(De)m 3(grees.)k
+1623(This)s 2099(unit)s 2531(may)s 2997(only)s 3477(be)s
+3759(used)s 4256(with)s 4738(the)s 220 fnt35 5086 7438(@Rotate)m
+240 fnt82 6007 7441(symbol.)m 0 86 0 86 240 288 60 9066 7604 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 215 0 106 240 288 60 9066 7389 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 7303 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 7217 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 504 0 394 240 288 60 0 6713 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 6627 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+220 fnt35 170 7050(y)m 240 fnt82
+679 7053(One)m 220 fnt35 1129 7050(y)m 240 fnt82 1292 7053(equals)m
+1949(the)s 2292(current)s 3023(v)s 6(alue)k 3586(set)s
+3906(by)s 4195(the)s 220 fnt35 4538 7050(@YUnit)m 240 fnt82
+5347 7053(symbol)m 6102(\(Section)s 6950(3.6\).)s 7488(This)s 7959(unit)s
+8386(is)s 8590(not)s 679 6765(used)m 1176(internally)s 2145(by)s
+2439(Lout;)s 3003(it)s 3195(is)s 3405(included)s 4287(for)s
+4625(the)s 4973(con)s 9(v)k 3(enience)k 6213(of)s
+6484(application)s 7603(packages.)s 0 86 0 86 240 288 60 9066 7217 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 504 0 394 240 288 60 9066 6713 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 6627 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 86 240 288 60 0 6541 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 504 0 394 240 288 60 0 6037 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 0 5951 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+170 0 0 0 240 288 60 0 5951 LoutGr2
+0.5 pt ltabhsp
+grestore
+
+grestore
+220 fnt35 170 6374(z)m gsave
+170 5951 translate
+240 fnt82 169 0 0 0 240 288 60 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+gsave
+339 5951 translate
+240 fnt82 170 0 0 0 240 288 60 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+gsave
+509 5951 translate
+240 fnt82 170 0 0 0 240 288 60 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+240 fnt82
+679 6377(One)m 220 fnt35 1130 6374(z)m 240 fnt82 1290 6377(equals)m
+1948(the)s 2292(current)s 3024(v)s 6(alue)k 3588(set)s
+3909(by)s 4199(the)s 220 fnt35 4543 6374(@ZUnit)m 240 fnt82
+5341 6377(symbol)m 6097(\(Section)s 6946(3.6\).)s 7485(This)s 7957(unit)s
+8385(is)s 8590(not)s 679 6089(used)m 1176(internally)s 2145(by)s
+2439(Lout;)s 3003(it)s 3195(is)s 3405(included)s 4287(for)s
+4625(the)s 4973(con)s 9(v)k 3(enience)k 6213(of)s
+6484(application)s 7603(packages.)s 8217 0 0 0 240 288 60 679 5951 LoutGr2
+0.5 pt ltabhs
+grestore
+
+grestore
+170 0 0 0 240 288 60 8896 5951 LoutGr2
+0.5 pt ltabhsp
+grestore
+
+grestore
+0 86 0 86 240 288 60 9066 6541 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 504 0 394 240 288 60 9066 6037 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 86 0 0 240 288 60 9066 5951 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+240 fnt84 1231 5361(Figur)m 4(e)k
+1960(3.1.)s 2431(The)s 2886(thirteen)s 3750(units)s 4308(of)s
+4580(measur)s 4(ement)k 6016(pr)s 4(o)k 2(vided)k
+6982(by)s 7291(Lout.)s 240 fnt82 0 4724(will)m 426(centre)s
+1065(it.)s 480 4350(The)m 914(v)s 6(alue)k 220 fnt35
+1488 4347(|0r)m -8(t)k 240 fnt82 1871 4350(separating)m 2913(the)s
+3267(\207rst)s 3704(and)s 4115(second)s 4844(items)s 5418(in)s
+5667(a)s 5840(sequence)s 6779(of)s 7056(horizontally)s 8272(concate)s
+8998(-)s 0 4062(nated)m 572(objects)s 1296(is)s 1502(some)s 6(what)k
+2522(special)s 3236(in)s 3475(that)s 3889(it)s 4077(denotes)s
+4855(left)s 5228(justi\207cation)s 6409(of)s 6676(the)s 7020(object)s
+7660(to)s 7895(its)s 8167(left)s 8540(in)s 8778(the)s
+0 3774(a)m 4(v)k 6(ailable)k 902(space.)s 1590(This)s
+2059(is)s 2262(identical)s 3132(with)s 220 fnt35 3607 3771(|0ie)m
+240 fnt82 4001 3774(when)m 4570(the)s 4911(object)s 5548(to)s
+5780(the)s 6121(left)s 6491(also)s 6922(has)s 7285(the)s
+7626(principal)s 8523(mark;)s 0 3486(b)m 4(ut)k 354(when)s
+922(it)s 1105(does)s 1587(not,)s 220 fnt35 1991 3483(|0r)m -8(t)k
+240 fnt82 2360 3486(will)m 2777(cause)s 3356(the)s 3695(object)s
+4331(to)s 4561(the)s 4901(left)s 5269(to)s 5500(appear)s
+6188(further)s 6889(to)s 7119(the)s 7459(left)s 7827(than)s
+8288(it)s 8471(w)s 2(ould)k 0 3198(otherwise)m 985(ha)s 4(v)k 3(e)k
+1486(done,)s 2059(if)s 2276(space)s 2863(to)s 3102(do)s
+3395(so)s 3661(is)s 3871(a)s 4(v)k 6(ailable.)k
+480 2824(A)m 744(g)s 1(ap)k 1177(is)s 1421(optionally)s
+2480(concluded)s 3557(with)s 4073(an)s 4391(indication)s 5439(of)s
+5744(unbreakability)s 15(,)k 7252(which)s 7929(is)s 8173(a)s
+8374(letter)s 220 fnt35 8958 2821(u)m 240 fnt82 0 2536(appended)m
+976(to)s 1215(the)s 1563(g)s 1(ap.)k 2072(A)s
+2303(paragraph)s 3316(will)s 3742(ne)s 6(v)k 3(er)k
+4324(be)s 4607(brok)s 2(en)k 5327(at)s 5559(an)s
+5842(unbreakable)s 7068(g)s 1(ap,)k 7520(nor)s 7899(will)s
+8325(a)s 8492(g)s 1(alle)k 3(y)k 0 2248(be)m
+293(brok)s 2(en)k 1025(across)s 1684(tw)s 2(o)k
+2106(tar)s 4(gets)k 2800(at)s 3044(such)s 3551(a)s
+3729(g)s 1(ap.)k 4249(Basser)s 4958(Lout')s 13(s)k
+5631(implementation)s 7200(is)s 7421(slightly)s 8204(defecti)s 6(v)k 3(e)k
+0 1960(in)m 242(that)s 659(it)s 849(ignores)s 1603(an)s 3(y)k
+1999(unbreakable)s 3222(indication)s 4234(in)s 4476(the)s 4822(g)s 1(ap)k
+5219(separating)s 6253(the)s 6599(\207rst)s 7029(component)s 8151(promoted)s
+0 1672(into)m 425(an)s 3(y)k 822(tar)s 4(get)k
+1421(from)s 1945(the)s 2293(second.)s 480 1298(When)m 1111(tw)s 2(o)k
+1523(objects)s 2254(are)s 2603(separated)s 3566(only)s 4048(by)s
+4345(zero)s 4811(or)s 5072(more)s 5622(white)s 6211(space)s
+6801(characters)s 7821(\(spaces,)s 8634(tabs,)s 0 1010(ne)m 6(wlines,)k
+983(and)s 1420(formfeeds\),)s 2607(Lout)s 3152(inserts)s 220 fnt35
+3859 1007(&)m 240 fnt83 4001 1012(k)m 220 fnt35 4111 1007(s)m
+240 fnt82 4307 1010(between)m 5194(the)s 5575(tw)s 2(o)k
+6018(objects,)s 6835(where)s 240 fnt83 7508 1012(k)m 240 fnt82
+7711 1010(is)m 7954(the)s 8335(number)s 0 722(of)m 291(spaces.)s
+1100(Precisely)s 15(,)k 240 fnt83 2087 724(k)m 240 fnt82
+2278 722(is)m 2509(determined)s 3662(by)s 3977(discarding)s 5047(all)s
+5360(space)s 5968(characters)s 7007(and)s 7431(tabs)s 7888(that)s
+8327(precede)s 0 434(ne)m 6(wlines)k 903(\(these)s 1537(are)s
+1892(in)s 9(visible)k 2771(so)s 3045(are)s 3400(better)s
+4012(ignored\),)s 4937(then)s 5414(counting)s 6313(1)s 6477(for)s
+6823(each)s 7326(ne)s 6(wline,)k 8193(formfeed)s 0 146(or)m
+259(space,)s 897(and)s 1301(8)s 1468(for)s 1806(each)s
+2301(tab)s 2646(character)s 13(.)k 3671(The)s 4099(g)s 1(ap)k
+4497(will)s 4923(be)s 5205(unbreakable)s 6430(if)s 240 fnt83
+6647 148(k)m 240 fnt82 6817 146(is)m 7027(zero.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 39 45
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.2.)m 454(Concatenation)s 1918(symbols)s 2744(and)s
+3170(par)s 3(a)k 2(gr)k 3(aphs)k 240 fnt84
+8832 13840(39)m gsave
+1450 5884 translate
+240 fnt82 6166 7484 0 7484 240 288 60 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+0 6710(Edge-to-edge)m 220 fnt35 1786 6707(|)m 240 fnt83
+1843 6712(l)m 220 fnt35 1929 6707(e)m 240 fnt82 0 5558(Hyphenation)m
+220 fnt35 1786 5555(|)m 240 fnt83 1843 5560(l)m 220 fnt35
+1929 5555(h)m 240 fnt82 0 4406(Ov)m 3(erstrik)k 2(e)k
+220 fnt35 1786 4403(|)m 240 fnt83 1843 4408(l)m 220 fnt35
+1929 4403(o)m 240 fnt82 0 3254(Mark-to-mark)m 220 fnt35 1786 3251(|)m
+240 fnt83 1843 3256(l)m 220 fnt35 1929 3251(x)m 240 fnt82
+0 2102(K)m 6(erning)k 220 fnt35 1786 2099(|)m 240 fnt83
+1843 2104(l)m 220 fnt35 1929 2099(k)m 240 fnt82 0 950(T)m 19(ab)k 4(ulation)k
+220 fnt35 1786 947(|)m 240 fnt83 1843 952(l)m 220 fnt35
+1929 947(t)m gsave
+2764 0 translate
+240 fnt82 3402 7484 0 7484 240 288 60 LoutGraphic
+gsave
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+gsave
+567 6748 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 6634 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 6748 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 6634 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2267 6658 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 1020 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+1247 6658 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+1247 6658 translate
+180 fnt82 1020 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+1247 6658 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+180 fnt83 1732 6455(l)m gsave
+567 5596 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 5482 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 5596 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 5482 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2267 5506 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 1020 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+1247 5506 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+1247 5506 translate
+180 fnt82 1020 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+1247 5506 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+1732 5303(l)m gsave
+567 4444 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 4330 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 4444 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 4330 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2551 4297 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+680 4297 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+680 4297 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+680 4297 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+1590 4095(l)m
+gsave
+567 3242 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 3128 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 3242 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 3128 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2551 3095 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+680 3095 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+680 3095 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+680 3095 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+180 fnt82 975 2892(max\()m 180 fnt83 1383 2893(l,)m 1503(a+b+l/10)s
+180 fnt82 2205 2892(\))m gsave
+1247 3719 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+68 0 0 0 180 288 45 0 0 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+567 0 0 0 180 288 45 0 0 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+68 0 0 0 180 288 45 0 0 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+680 3719 translate
+30.0000 rotate
+68 0 0 0 180 288 45 0 0 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+567 0 0 0 180 288 45 680 3719 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+680 3719 translate
+-30.0000 rotate
+68 0 0 0 180 288 45 0 0 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+180 fnt83 920 3787(a)m gsave
+2551 3719 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 283 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+2268 3719 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+2268 3719 translate
+180 fnt82 283 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+2268 3719 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+2366 3743(b)m
+gsave
+567 2090 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 1976 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 2090 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 1976 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2551 1943 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+680 1943 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+680 1943 translate
+180 fnt82 1871 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+680 1943 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+180 fnt82 1203 1740(max\()m 180 fnt83 1611 1741(l,)m 1731(a,)s
+1891(b)s 180 fnt82 1977 1740(\))m gsave
+1247 2567 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+68 0 0 0 180 288 45 0 0 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+567 0 0 0 180 288 45 0 0 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+68 0 0 0 180 288 45 0 0 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+680 2567 translate
+30.0000 rotate
+68 0 0 0 180 288 45 0 0 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+567 0 0 0 180 288 45 680 2567 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+680 2567 translate
+-30.0000 rotate
+68 0 0 0 180 288 45 0 0 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+180 fnt83 920 2635(a)m
+gsave
+2551 2567 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 283 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+2268 2567 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+2268 2567 translate
+180 fnt82 283 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+2268 2567 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+2366 2591(b)m gsave
+567 938 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+680 824 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 938 translate
+180 fnt82 680 340 0 340 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto
+xsize ysize lineto 0 ysize lineto closepath
+gsave 0.9 setgray fill grestore stroke
+grestore
+
+grestore
+gsave
+2551 824 translate
+180 fnt82 0 567 0 567 180 288 45 LoutGraphic
+gsave
+0 0 moveto 0 ysize lineto [ 3 pt ] 0 setdash stroke
+grestore
+
+grestore
+gsave
+2268 734 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 2268 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+0 734 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 734 translate
+180 fnt82 2268 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 734 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+1587 532(l)m gsave
+3402 234 translate
+180.0000 rotate
+gsave
+0 0 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 0 translate
+180 fnt82 3402 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 0 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+gsave
+0 234 translate
+30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+gsave
+0 234 translate
+180 fnt82 3402 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+gsave
+0 234 translate
+-30.0000 rotate
+gsave
+0 0 translate
+180 fnt82 68 0 0 0 180 288 45 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+
+grestore
+1189 23(curr)m 6(ent)k 1759(bound)s
+
+grestore
+end end restore
+grestore
+2063 5294(Figur)m 4(e)k 2792(3.2.)s 3263(The)s 3718(six)s
+4054(gap)s 4480(modes)s 5185(pr)s 4(o)k 2(vided)k
+6151(by)s 6460(Lout.)s 240 fnt82 480 4655(A)m 724(sequence)s
+1672(of)s 1958(tw)s 2(o)k 2383(or)s 2657(more)s
+3219(objects)s 3962(separated)s 4936(by)s 220 fnt35 5245 4652(&)m
+240 fnt82 5462 4655(symbols)m 6326(is)s 6551(a)s 240 fnt83
+6732 4657(par)m 3(a)k 2(gr)k 3(aph)k 240 fnt82
+7745 4655(.)m 7924(Lout)s 8451(breaks)s 0 4367(paragraphs)m 1100(into)s
+1526(lines)s 2029(automatically)s 3384(as)s 3635(required,)s 4539(by)s
+4834(con)s 9(v)k 3(erting)k 5898(some)s 6460(of)s
+6732(the)s 220 fnt35 7081 4364(&)m 240 fnt82 7284 4367(symbols)m
+8134(into)s 220 fnt35 8560 4364(//1vx)m 240 fnt82 9022 4367(.)m
+0 4079(Unbreakable)m 1279(g)s 1(aps)k 1769(are)s 2117(not)s
+2485(eligible)s 3258(for)s 3597(this)s 3995(con)s 9(v)k 3(ersion.)k
+5198(`Optimal')s 6173(line)s 6588(breaks)s 7265(are)s 7613(chosen,)s
+8386(using)s 8960(a)s 0 3791(method)m 776(adapted)s 1578(from)s
+2102(T)s 2198 3743(E)m 2306 3791(X)m 2535([5)s 2720(].)s
+480 3417(If)m 735(an)s 220 fnt35 1043 3414(&)m 240 fnt82
+1271 3417(symbol)m 2056(whose)s 2750(g)s 1(ap)k 3173(has)s
+3568(h)s 1(yphenation)k 4834(mode)s 5447(is)s 5683(chosen)s
+6430(for)s 6793(replacement)s 8046(by)s 220 fnt35 8365 3414(//1vx)m
+240 fnt82 8827 3417(,)m 8960(a)s 0 3129(h)m 1(yphen)k
+755(will)s 1174(be)s 1448(appended)s 2417(to)s 2649(the)s
+2989(preceding)s 3978(object,)s 4661(unless)s 5303(that)s 5714(object)s
+6350(is)s 6553(a)s 6712(w)s 2(ord)k 7252(which)s
+7887(already)s 8636(ends)s 0 2841(with)m 482(a)s 648(h)s 1(yphen.)k
+1517(F)s 3(or)k 1906(e)s 3(xample,)k 220 fnt35
+480 2344(Long)m 1017(w)s 2(ords)k 1654(ma)s 6(y)k
+2122(be)s 2419(h)s 6(yph &0ih enat &0ih ed.)k 240 fnt82 0 1845(could)m
+590(ha)s 4(v)k 3(e)k 1091(the)s 1439(follo)s 6(wing)k
+2416(result,)s 3053(depending)s 4104(where)s 4744(the)s 5092(line)s
+5506(breaks)s 6181(f)s 2(all:)k 480 1342(Long)m 1038(w)s 2(ords)k
+1670(may)s 2135(be)s 2415(h)s 1(yphenat)k 3292(-)s
+480 1054(ed.)m 0 601(Basser)m 702(Lout)s 1219(inserts)s 1898(h)s 1(yphenation)k
+3143(g)s 1(aps)k 3637(automatically)s 4996(as)s 5251(required,)s
+6159(ag)s 1(ain)k 6738(follo)s 6(wing)k 7720(the)s
+8073(method)s 8855(of)s 0 313(T)m 96 265(E)m 204 313(X)m
+373(,)s 479(which)s 1120(approximates)s 2458(the)s 2804(h)s 1(yphenations)k
+4130(in)s 4372(W)s 19(ebster')k 13(s)k 5358(dictionary)s 15(.)k
+6474(T)s 19(o)k 6773(pre)s 6(v)k 3(ent)k
+7540(the)s 7886(h)s 1(yphenation)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 40 46
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+%%+ font Times-BoldItalic
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-BoldItalic
+/Times-BoldItalicfnt85 vec2 /Times-BoldItalic LoutRecode
+/fnt85 { /Times-BoldItalicfnt85 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(40)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt82 0 13205(of)m
+268(a)s 430(single)s 1053(w)s 2(ord,)k 1646(enclose)s
+2416(it)s 2604(in)s 2843(quotes.)s 3628(Further)s 4387(control)s
+5116(o)s 3(v)k 3(er)k 5591(paragraph)s 6600(breaking)s
+7486(and)s 7886(h)s 1(yphenation)k 0 12917(is)m 210(pro)s 3(vided)k
+1116(by)s 1410(the)s 220 fnt35 1758 12914(@Break)m 240 fnt82
+2614 12917(and)m 220 fnt35 3018 12914(@Space)m 240 fnt82 3915 12917(symbols)m
+4764(\(Sections)s 5704(3.4)s 6058(and)s 6462(3.5\).)s 240 fnt84
+0 12124(3.3.)m 471(@F)s 6(ont)k 1226(and)s 1667(@Char)s
+240 fnt82 480 11692(A)m 240 fnt83 728 11694(font)m 240 fnt82
+1182 11692(is)m 1410(a)s 1594(collection)s 2611(of)s 2900(characters)s
+3936(which)s 4596(may)s 5080(be)s 5380(printed.)s 6239(Man)s 3(y)k
+6867(fonts)s 7414(come)s 8006(in)s 240 fnt83 8268 11694(families)m
+240 fnt82 9019 11692(,)m 0 11404(which)m 634(are)s 973(groups)s
+1667(of)s 1930(fonts)s 2450(that)s 2860(ha)s 4(v)k 3(e)k
+3352(been)s 3853(designed)s 4754(to)s 4984(go)s 5269(together)s 13(.)k
+6194(F)s 3(or)k 6575(e)s 3(xample,)k 7480(the)s
+7820(T)s 8(imes)k 8451(f)s 2(amily)k 0 11116(includes)m
+848(the)s 1196(follo)s 6(wing)k 2173(fonts:)s 480 10613(T)m 8(imes)k
+1120(Base)s 240 fnt83 480 10327(T)m 13(imes)k 1093(Slope)s
+240 fnt84 480 10036(T)m 4(imes)k 1154(Bold)s 240 fnt85
+480 9748(T)m 8(imes)k 1116(BoldSlope)s 240 fnt82 0 9246(Thus,)m
+586(each)s 1080(font)s 1524(has)s 1893(tw)s 2(o)k
+2303(names:)s 3019(its)s 240 fnt83 3294 9248(family)m 3946(name)s
+240 fnt82 4518 9246(\(T)m 8(imes,)k 5292(Helv)s 3(etica,)k
+6310(etc.\))s 6775(and)s 7179(its)s 240 fnt83 7454 9248(face)m
+7904(name)s 240 fnt82 8475 9246(\(Base,)m 0 8958(Slope,)m 682(etc.\).)s
+1294(T)s 8(imes)k 1964(Base)s 2516(is)s 2756(more)s
+3334(commonly)s 4443(called)s 5101(T)s 8(imes)k 5772(Roman,)s
+6601(and)s 7036(T)s 8(imes)k 7706(Slope)s 8338(is)s
+8579(more)s 0 8670(commonly)m 1085(called)s 1720(T)s 8(imes)k
+2367(Italic.)s 3027(Lout)s 3547(a)s 4(v)k 4(oids)k
+4222(these)s 4776(names)s 5445(in)s 5695(f)s 2(a)k 4(v)k 4(our)k
+6377(of)s 6655(generic)s 7418(names)s 8087(which)s 8737(can)s
+0 8382(be)m 282(applied)s 1044(to)s 1283(man)s 3(y)k
+1866(font)s 2311(f)s 2(amilies.)k 480 8008(Lig)m 1(atures,)k
+1488(such)s 1984(as)s 2234(\210)s 2420(for)s 2758(f)s
+2849(l)s 2970(and)s 3375(\207)s 3560(for)s 3898(f)s
+3989(i,)s 4163(are)s 4510(considered)s 5604(by)s 5899(Basser)s
+6596(Lout)s 7108(to)s 7348(be)s 7630(an)s 7913(inte)s 3(gral)k
+8695(part)s 0 7720(of)m 257(the)s 591(font:)s 1128(if)s
+1331(the)s 1665(font)s 2096(de\207nition)s 3056(\(see)s 3482(belo)s 6(w\))k
+4175(mentions)s 5089(them,)s 5660(the)s 3(y)k 6109(will)s
+6521(be)s 6789(used.)s 7378(Similarly)s 15(,)k 8344(k)s 2(erning)k
+0 7432(\(\207ne)m 510(adjustment)s 1636(of)s 1924(the)s 2289(space)s
+2893(between)s 3764(adjacent)s 4637(characters)s 5672(to)s 5928(impro)s 3(v)k 3(e)k
+6792(the)s 7157(appearance\))s 8377(is)s 8604(done)s 0 7144(whene)m 6(v)k 3(er)k
+988(indicated)s 1929(in)s 2179(the)s 2535(font)s 2987(de\207nition.)s
+4075(Enclosing)s 5092(one)s 5502(of)s 5780(the)s 6135(letters)s
+6775(in)s 220 fnt35 7026 7141(@OneCol)m 240 fnt82 8045 7144(is)m
+8262(one)s 8672(sure)s 0 6856(w)m 2(ay)k 451(to)s
+690(disable)s 1423(a)s 1589(lig)s 1(ature)k 2373(or)s
+2632(k)s 2(ern.)k 480 6482(The)m 220 fnt35 908 6479(@F)m 6(ont)k
+240 fnt82 1620 6482(symbol)m 2380(returns)s 3094(its)s 3370(right)s
+3881(parameter)s 4895(in)s 5138(a)s 5304(font)s 5749(and)s
+6153(size)s 6580(speci\207ed)s 7488(by)s 7782(its)s 8058(left:)s
+220 fnt35 480 5974({ )m 11(Times Base 12p } @F)k 6(ont)k 240 fnt83
+3155 5979(object)m 240 fnt82 0 5478(The)m 417(f)s 2(amily)k
+1080(and)s 1473(f)s 2(ace)k 1912(names)s 2563(must)s
+3076(ha)s 4(v)k 3(e)k 3565(appeared)s 4475(together)s
+5306(in)s 5538(a)s 220 fnt35 5692 5475(f)m 6(ontdef)k
+240 fnt82 6354 5478(;)m 6454(the)s 6791(size)s 7206(is)s
+7405(arbitrary)s 8268(and)s 8660(may)s 0 5190(be)m 283(gi)s 6(v)k 3(en)k
+865(in)s 1109(an)s 3(y)k 1508(one)s 1911(of)s
+2184(the)s 220 fnt35 2533 5187(c)m 240 fnt82 2638 5190(,)m
+220 fnt35 2747 5187(i)m 240 fnt82 2781 5190(,)m 220 fnt35
+2889 5187(p)m 240 fnt82 3003 5190(,)m 220 fnt35 3112 5187(m)m
+240 fnt82 3281 5190(,)m 220 fnt35 3389 5187(f)m 240 fnt82
+3447 5190(,)m 220 fnt35 3556 5187(s)m 240 fnt82 3659 5190(,)m
+3767(and)s 220 fnt35 4173 5187(v)m 240 fnt82 4343 5190(units)m
+4861(of)s 5133(measurement)s 6469(\(Section)s 7323(3.2\),)s 7811(although)s
+220 fnt35 8708 5187(10p)m 240 fnt82 0 4902(and)m 220 fnt35
+407 4899(12p)m 240 fnt82 828 4902(are)m 1178(the)s 1530(most)s
+2058(common)s 2956(sizes)s 3475(for)s 3816(te)s 3(xt.)k
+4338(There)s 4954(may)s 5424(be)s 5709(empty)s 6364(objects)s
+7096(and)s 220 fnt35 7503 4899(@Null)m 240 fnt82 8151 4902(objects)m
+8883(in)s 0 4614(the)m 348(left)s 725(parameter)s 1739(of)s
+220 fnt35 2010 4611(@F)m 6(ont)k 240 fnt82 2662 4614(;)m
+2774(these)s 3321(are)s 3668(ignored.)s 480 4240(When)m 1114(a)s
+220 fnt35 1286 4237(@F)m 6(ont)k 240 fnt82 2004 4240(symbol)m
+2769(is)s 2985(nested)s 3660(inside)s 4293(the)s 4646(right)s
+5163(parameter)s 6183(of)s 6459(another)s 220 fnt35 7242 4237(@F)m 6(ont)k
+240 fnt82 7960 4240(symbol,)m 8778(the)s 0 3952(inner)m 555(one)s
+961(determines)s 2065(the)s 2417(font)s 2867(of)s 3142(its)s
+3423(o)s 6(wn)k 3891(right)s 4406(parameter)s 13(.)k
+5516(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+6480(it)s 6677(may)s 7147(be)s 7434(abbre)s 6(viated)k
+8605(so)s 8876(as)s 0 3664(to)m 239(inherit)s 922(part)s
+1353(of)s 1624(the)s 1972(outer)s 2523(symbol:)s 220 fnt35
+480 3163({ )m 11(Times Base 12p } @F)k 6(ont)k 480 2875({ hello)m 8(, Slope @F)k 6(ont hello)k 8(, 15p @F)k 6(ont hello })k
+240 fnt82 0 2379(has)m 370(result)s 480 1898(hello,)m 240 fnt83
+1065 1900(hello,)m 300 fnt82 1636 1885(hello)m 240 fnt82 0 1414(The)m
+457(\207rst)s 918(inner)s 220 fnt35 1498 1411(@F)m 6(ont)k
+240 fnt82 2240 1414(inherits)m 3037(the)s 3414(outer)s 3995(f)s 2(amily)k
+4699(and)s 5133(size,)s 5641(changing)s 6601(only)s 7111(the)s
+7488(f)s 2(ace;)k 8025(the)s 8403(second)s 0 1126(inherits)m
+754(the)s 1089(outer)s 1627(f)s 2(amily)k 2289(and)s
+2680(f)s 2(ace.)k 3225(When)s 3841(a)s 3994(f)s 2(amily)k
+4656(name)s 5217(is)s 5413(gi)s 6(v)k 3(en,)k
+6030(it)s 6209(must)s 6721(be)s 6990(follo)s 6(wed)k
+7878(immediately)s 0 838(by)m 294(a)s 460(f)s 2(ace)k
+911(name.)s 1593(A)s 1823(size)s 2250(change)s 2984(may)s
+3450(appear)s 4147(\207rst)s 4578(or)s 4837(last.)s 480 464(Sizes)m
+1035(of)s 1307(the)s 1656(form)s 2180(+)s 240 fnt83
+2308 466(length)m 240 fnt82 2962 464(and)m 3367(\211)s 240 fnt83
+3487 466(length)m 240 fnt82 4140 464(may)m 4607(also)s 5046(be)s
+5328(used,)s 5875(meaning)s 6753(that)s 7171(the)s 7520(font)s
+7966(size)s 8393(is)s 8604(to)s 8844(be)s 240 fnt83
+0 178(length)m 240 fnt82 649 176(lar)m 4(ger)k 1257(or)s
+1512(smaller)s 2269(than)s 2734(the)s 3078(inherited)s 3981(v)s 6(alue.)k
+4652(F)s 3(or)k 5037(e)s 3(xample,)k 5947(\211)s
+220 fnt35 6067 173(2p)m 240 fnt82 6359 176(is)m 6564(often)s
+7108(used)s 7601(for)s 7934(superscripts)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 41 47
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.3.)m 454(@F)s 25(ont)k 1165(and)s
+1591(@Char)s 240 fnt84 8839 13840(41)m 240 fnt82 0 13250(and)m
+407(subscripts.)s 1530(These)s 2161(forms)s 2772(are)s 3123(highly)s
+3792(recommended,)s 5257(since)s 5808(the)s 3(y)k 6274(don')s 4(t)k
+6839(need)s 7352(to)s 7594(be)s 7880(changed)s 8739(if)s
+8960(a)s 0 12962(decision)m 854(is)s 1064(made)s 1638(to)s
+1877(alter)s 2360(the)s 2708(font)s 3153(size)s 3580(of)s
+3851(the)s 4199(document)s 5203(as)s 5453(a)s 5619(whole.)s
+480 12588(The)m 220 fnt35 908 12585(@F)m 6(ont)k 240 fnt82
+1620 12588(symbol)m 2380(also)s 2818(switches)s 3692(to)s 3931(and)s
+4335(from)s 4859(small)s 5431(capitals:)s 220 fnt35 480 12087(smallcaps @F)m 6(ont ...)k
+480 11799(nosmallcaps @F)m 6(ont ...)k 240 fnt82 0 11303(These)m 639(may)s
+1118(be)s 1412(nested,)s 2143(and)s 2559(the)s 3(y)k
+3035(cooperate)s 4033(with)s 4527(other)s 5091(font)s 5548(changes.)s
+6496(The)s 6936(precise)s 7681(ef)s 6(fect)k 8290(depends)s
+0 11015(on)m 293(the)s 637(font)s 1078(\(see)s 1514(belo)s 6(w\).)k
+2331(There)s 2940(is)s 3146(a)s 3308(def)s 2(ault)k
+4024(v)s 6(alue)k 4588(\()s 220 fnt35 4661 11012(nosmallcaps)m
+240 fnt82 5873 11015(\),)m 6055(so)s 6317(it)s 6504(is)s
+6710(not)s 7072(necessary)s 8051(to)s 8285(mention)s 0 10727(this)m
+396(attrib)s 4(ute)k 1243(when)s 1819(gi)s 6(ving)k
+2478(an)s 2761(initial)s 3372(font.)s 480 10353(There)m 1080(are)s
+1413(tw)s 2(o)k 1810(prede\207ned)s 2864(symbols,)s 220 fnt35
+3756 10350(@CurrF)m 11(amily)k 240 fnt82 5083 10353(and)m 220 fnt35
+5474 10350(@CurrF)m 11(ace)k 240 fnt82 6592 10353(,)m 6685(which)s
+7314(respecti)s 6(v)k 3(ely)k 8499(return)s 0 10065(the)m
+337(f)s 2(amily)k 1000(and)s 1392(f)s 2(ace)k
+1831(names)s 2482(of)s 2741(the)s 3077(current)s 3801(font.)s
+4339(F)s 3(or)k 4716(e)s 3(xample,)k 5618(right)s
+6117(no)s 6(w)k 220 fnt35 6567 10062(@CurrF)m 11(amily)k
+240 fnt82 7896 10065(is)m 8094(T)s 8(imes)k 8722(and)s
+220 fnt35 0 9774(@CurrF)m 11(ace)k 240 fnt82 1178 9777(is)m
+1388(Base.)s 480 9403(When)m 1109(Lout)s 1621(runs,)s 2140(the)s
+2488(\207rst)s 2919(thing)s 3464(it)s 3656(reads)s 4211(is)s
+4421(a)s 4587(list)s 4938(of)s 5209(font)s 5654(de\207nitions,)s
+6771(lik)s 2(e)k 7183(these:)s 220 fnt35 480 8895(f)m 6(ontdef  )k 11(Times  Base   {)k
+240 fnt83 2842 8900(implementation-dependent)m 220 fnt35 5517 8895(})m 480 8607(f)m 6(ontdef  )k 11(Times  Slope  {)k
+240 fnt83 2841 8612(implementation-dependent)m 220 fnt35 5516 8607(})m 240 fnt82
+0 8111(Each)m 552(line)s 983(tells)s 1449(Lout)s 1978(of)s
+2267(the)s 2632(e)s 3(xistence)k 3591(of)s 3880(a)s
+4063(font,)s 4573(and)s 4994(assigns)s 5754(it)s 5963(a)s
+6146(f)s 2(amily)k 6839(name)s 7430(and)s 7852(a)s
+8035(f)s 2(ace)k 8504(name.)s 0 7823(There)m 617(are)s
+969(a)s 1140(fe)s 6(w)k 1551(fonts)s 2085(which)s
+2732(are)s 3084(the)s 3437(only)s 3921(members)s 4853(of)s
+5129(their)s 5631(f)s 2(amilies;)k 6514(e)s 6(v)k 3(en)k
+7019(though)s 7747(these)s 8299(fonts)s 8833(do)s 0 7535(not)m
+357(need)s 857(a)s 1013(f)s 2(ace)k 1455(name,)s
+2070(the)s 3(y)k 2523(must)s 3039(be)s 3311(gi)s 6(v)k 3(en)k
+3881(one)s 4274(by)s 4558(their)s 220 fnt35 5045 7532(f)m 6(ontdef)k
+240 fnt82 5707 7535(.)m 5862(The)s 6280(part)s 6701(between)s
+7546(braces)s 8197(may)s 8653(v)s 6(ary)k 0 7247(with)m
+486(dif)s 6(ferent)k 1365(implementations)s 3013(of)s 3288(Lout;)s
+3856(it)s 4052(is)s 4267(supposed)s 5221(to)s 5464(contain)s
+6229(the)s 6581(information)s 7770(Lout)s 8286(needs)s 8887(to)s
+0 6959(w)m 2(ork)k 551(with)s 1033(the)s 1381(font.)s
+480 6585(In)m 735(Basser)s 1431(Lout)s 1941(V)s 26(ersion)k
+2728(3,)s 2954(this)s 3348(implementation-dependent)s 5970(part)s 6400(consists)s
+7206(of)s 7476(a)s 7641(PostScript)s 8681(font)s 0 6297(name,)m
+635(an)s 928(Adobe)s 1634(font)s 2089(metrics)s 2852(\(formerly)s
+3831(AFM\))s 4488(\207le)s 4859(whose)s 5538(F)s 3(ontName)k
+6611(entry)s 7166(must)s 7702(agree)s 8285(with)s 8778(the)s
+0 6009(PostScript)m 1034(font)s 1471(name)s 2037(just)s 2433(mentioned,)s
+3542(the)s 3882(name)s 4448(of)s 4710(a)s 4868(Lout)s
+5372(Character)s 6352(Mapping)s 7261(\(LCM\))s 7979(\207le,)s 8383(and)s
+8778(the)s 0 5721(w)m 2(ord)k 220 fnt35 548 5718(Recode)m
+240 fnt82 1356 5721(or)m 220 fnt35 1615 5718(NoRecode)m 240 fnt82
+2643 5721(:)m 220 fnt35 480 5266(f)m 6(ontdef  )k 11(Times  Base  {  )k 11(Times-Roman  )k 11(Ti-Ro  LtLatin1.LCM  Recode })k
+240 fnt82 0 4772(It)m 226(seems)s 883(to)s 1143(ha)s 4(v)k 3(e)k
+1666(become)s 2487(an)s 2792(in)s 9(v)k 6(ariable)k
+3810(rule)s 4258(at)s 4512(Adobe)s 5228(Systems)s 6098(that)s
+6538(the)s 6907(font)s 7374(name)s 7969(and)s 8395(the)s
+8765(\207le)s 0 4484(name)m 591(should)s 1305(be)s 1605(the)s
+1970(same,)s 2585(b)s 4(ut)k 2965(some)s 3543(operating)s
+4517(systems)s 5342(do)s 5652(not)s 6036(permit)s 6736(such)s
+7249(long)s 7746(\207le)s 8124(names,)s 8860(so)s 0 4196(Lout)m
+526(does)s 1031(not)s 1411(use)s 1801(them.)s 2457(The)s
+2900(\207les)s 3363(are)s 3725(searched)s 4633(for)s 4986(in)s
+5243(standard)s 6126(places.)s 6901(Consult)s 7721(the)s 8084(PostScript)s
+0 3908(Reference)m 1064(Manual)s 1891([1)s 2065(])s 2224(for)s
+2603(general)s 3401(information)s 4627(about)s 5260(fonts)s 5830(and)s
+6274(encoding)s 7246(v)s 3(ectors;)k 8086(brie\210y)s 15(,)k
+8843(an)s 0 3620(8-bit)m 520(character)s 1464(code)s 240 fnt83
+1981 3622(c)m 240 fnt82 2153 3620(in)m 2405(Lout')s 13(s)k
+3077(input)s 3638(is)s 3858(mapped)s 4683(to)s 4932(the)s
+5289(character)s 6233(in)s 6485(the)s 6843(Adobe)s 7547(font)s
+8002(metrics)s 8765(\207le)s 0 3332(whose)m 677(name)s 1260(appears)s
+2050(on)s 2356(the)s 2714(line)s 3137(labelled)s 240 fnt83
+3960 3334(c)m 240 fnt82 4131 3332(in)m 4384(the)s 4741(LCM)s
+5323(\207le.)s 5801(The)s 6239(LCM)s 6821(\207le)s 7191(also)s
+7638(de\207nes)s 8377(v)s 6(arious)k 0 3044(character)m 4(-to-character)k
+2162(mappings,)s 3215(such)s 3726(as)s 3991(upper)s 4(-case)k
+5093(to)s 5347(lo)s 6(wer)k 4(-case,)k 6493(which)s
+7150(are)s 7512(used)s 8024(for)s 8377(v)s 6(arious)k
+0 2756(purposes,)m 947(such)s 1431(as)s 1669(the)s 2005(production)s
+3087(of)s 3346(small)s 3906(capitals.)s 4787(If)s 5005(the)s
+5341(w)s 2(ord)k 220 fnt35 5877 2753(NoRecode)m 240 fnt82
+6953 2756(appears,)m 7778(Lout)s 8278(assumes)s 0 2468(that)m 428(the)s
+786(gi)s 6(v)k 3(en)k 1376(encoding)s 2317(v)s 3(ector)k
+2981(is)s 3201(already)s 3968(associated)s 5018(with)s 5510(this)s
+5916(font)s 6371(in)s 6624(the)s 6982(PostScript)s 8035(interpreter)s 9(,)k
+0 2180(and)m 404(optimizes)s 1384(its)s 1660(output)s 2332(accordingly)s 15(.)k
+480 1806(If)m 723(there)s 1270(are)s 1630(tw)s 2(o)k
+2054(font)s 2512(de\207nitions)s 3587(with)s 4083(the)s 4444(same)s
+5005(f)s 2(amily)k 5693(and)s 6111(f)s 2(ace)k
+6576(name,)s 7214(it)s 7420(is)s 7643(an)s 7940(error)s
+8477(unless)s 0 1518(the)m 371(second)s 1117(one)s 1542(has)s
+1936(the)s 2307(same)s 2877(font)s 3346(name)s 3943(and)s
+4370(\207le)s 4755(name)s 5352(as)s 5625(the)s 5997(\207rst,)s
+6498(in)s 6764(which)s 7430(case)s 7920(it)s 8135(is)s
+8369(silently)s 0 1230(ignored.)m 902(A)s 1139(PostScript)s 2188(font)s
+2640(name)s 3221(and)s 3632(\207le)s 4000(may)s 4474(appear)s
+5178(in)s 5428(tw)s 2(o)k 5845(or)s 6111(more)s
+6665(font)s 7117(de\207nitions,)s 8242(allo)s 6(wing)k 0 942(one)m
+402(PostScript)s 1444(font)s 1889(to)s 2128(ha)s 4(v)k 3(e)k
+2629(tw)s 2(o)k 3039(or)s 3298(more)s 3845(equally)s
+4603(v)s 6(alid)k 5133(Lout)s 5645(names,)s 6363(and)s
+6767(dif)s 6(ferent)k 7642(LCM)s 8215(\207les.)s 480 568(The)m
+220 fnt35 917 565(@Char)m 240 fnt82 1685 568(symbol)m 2454(allo)s 6(ws)k
+3133(a)s 3309(character)s 4252(to)s 4501(be)s 4792(speci\207ed)s
+5710(by)s 6014(its)s 6299(name)s 6883(\(its)s 7247(PostScript)s
+8299(name)s 8883(in)s 0 280(Basser)m 697(Lout\))s 1277(rather)s
+1893(than)s 2362(by)s 2656(its)s 2932(code:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 42 48
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(42)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 220 fnt35 480 13207(@Char  nine)m
+240 fnt82 0 12752(is)m 215(equi)s 6(v)k 6(alent)k
+1265(to)s 220 fnt35 1510 12749(9)m 240 fnt82 1689 12752(in)m
+1938(most)s 2469(fonts.)s 3117(This)s 3599(is)s 3815(useful)s
+4460(as)s 4716(a)s 4888(documentation)s 6373(aid)s 6729(and)s
+7139(to)s 7384(be)s 7672(sure)s 8132(of)s 8409(getting)s
+0 12464(the)m 347(right)s 856(character)s 1788(e)s 6(v)k 3(en)k
+2286(if)s 2501(the)s 2848(encoding)s 3777(v)s 3(ector)k
+4429(of)s 4698(the)s 5044(font)s 5488(is)s 5696(changed.)s
+6656(Ho)s 6(we)k 6(v)k 3(er)k 220 fnt35
+7576 12461(@Char)m 240 fnt82 8332 12464(will)m 8756(f)s 2(ail)k
+0 12176(if)m 217(the)s 565(character)s 1499(named)s 2195(is)s
+2405(not)s 2771(in)s 3014(the)s 3362(encoding)s 4293(v)s 3(ector)k
+4947(of)s 5218(the)s 5566(current)s 6302(font.)s 240 fnt84
+0 11383(3.4.)m 471(@Br)s 4(eak)k 240 fnt82 480 10951(The)m
+220 fnt35 898 10948(@Break)m 240 fnt82 1744 10951(symbol)m 2493(in\210uences)s
+3504(the)s 3842(appearance)s 4962(of)s 5223(paragraphs)s 6313(\(Section)s
+7155(3.2\),)s 7631(of)s 6(fering)k 8437(a)s 8592(\207x)s 3(ed)k
+0 10663(set)m 325(of)s 596(nine)s 1064(styles:)s 220 fnt35
+1275 10155(adjust)m 1916(@Break)s 240 fnt83 2772 10160(object)m 240 fnt82
+3600 10158(Break)m 4301(the)s 4718(paragraphs)s 5887(of)s 240 fnt83
+6228 10160(object)m 240 fnt82 6945 10158(into)m 7439(lines,)s 8066(and)s
+8540(apply)s 220 fnt35 3600 9867(@P)m 26(Adjust)k 240 fnt82
+4633 9870(\(Section)m 5511(3.15\))s 6084(to)s 6348(e)s 6(v)k 3(ery)k
+6949(line)s 7388(e)s 3(xcept)k 8094(the)s 8467(last)s
+8883(in)s 3600 9582(each)m 4095(paragraph;)s 220 fnt35 1128 9074(outdent)m
+1916(@Break)s 240 fnt83 2772 9079(object)m 240 fnt82 3600 9077(Lik)m 2(e)k
+220 fnt35 4122 9074(adjust)m 240 fnt82 4703 9077(,)m 4840(e)s 3(xcept)k
+5551(that)s 220 fnt35 6000 9074(2.0f @Wide {} &0i)m 240 fnt82 7809 9077(is)m
+8049(inserted)s 8894(at)s 3600 8789(the)m 3981(be)s 3(ginning)k
+5022(of)s 5326(e)s 6(v)k 3(ery)k 5935(line)s
+6382(e)s 3(xcept)k 7096(the)s 7477(\207rst,)s 7988(creating)s
+8843(an)s 3600 8501(outdented)m 4602(paragraph;)s 220 fnt35 1187 7993(r)m 2(agged)k
+1916(@Break)s 240 fnt83 2772 7998(object)m 240 fnt82 3600 7996(Break)m
+4222(the)s 4559(paragraphs)s 5648(of)s 240 fnt83 5908 7998(object)m
+240 fnt82 6545 7996(into)m 6960(lines,)s 7507(b)s 4(ut)k
+7858(do)s 8140(not)s 8495(adjust)s 3600 7708(the)m 3948(lines)s
+4450(\(`ragged)s 5317(right'\);)s 220 fnt35 1077 7200(cr)m 2(agged)k
+1916(@Break)s 240 fnt83 2772 7205(object)m 240 fnt82 3600 7203(Lik)m 2(e)k
+220 fnt35 4125 7200(r)m 2(agged)k 240 fnt82 4794 7203(,)m
+4934(e)s 3(xcept)k 5648(that)s 6099(each)s 6628(line)s
+7075(will)s 7534(be)s 7849(centred)s 8644(with)s 3600 6915(respect)m
+4336(to)s 4575(the)s 4923(others;)s 220 fnt35 1114 6407(rr)m 2(agged)k
+1916(@Break)s 240 fnt83 2772 6412(object)m 240 fnt82 3600 6410(Lik)m 2(e)k
+220 fnt35 4115 6407(r)m 2(agged)k 240 fnt82 4784 6410(,)m
+4914(e)s 3(xcept)k 5618(that)s 6059(each)s 6577(line)s
+7014(will)s 7463(be)s 7768(right-justi\207ed)s 3600 6122(with)m 4082(respect)s
+4818(to)s 5057(the)s 5405(others)s 6040(\(`ragged)s 6907(left'\);)s
+220 fnt35 1065 5614(or)m 2(agged)k 1916(@Break)s 240 fnt83
+2772 5619(object)m 240 fnt82 3600 5617(The)m 4028(ob)s 3(vious)k
+4835(combination)s 6088(of)s 220 fnt35 6359 5614(r)m 2(agged)k
+240 fnt82 7088 5617(and)m 220 fnt35 7492 5614(outdent)m 240 fnt82
+8220 5617(;)m 220 fnt35 1413 5110(lines)m 1916(@Break)s 240 fnt83
+2772 5115(object)m 240 fnt82 3600 5113(Break)m 4284(the)s 4685(paragraphs)s
+5837(of)s 240 fnt83 6161 5115(object)m 240 fnt82 6861 5113(into)m
+7339(lines)s 7893(at)s 8178(the)s 8579(same)s 3600 4825(points)m
+4235(that)s 4651(the)s 3(y)k 5113(are)s 5458(brok)s 2(en)k
+6177(into)s 6600(lines)s 7101(in)s 7342(the)s 7689(input,)s
+8286(and)s 8688(also)s 3600 4537(at)m 3819(concatenation)s 5190(symbols)s
+6026(of)s 6283(the)s 6617(form)s 220 fnt35 7128 4534(&)m
+240 fnt83 7270 4539(k)m 220 fnt35 7380 4534(b)m 240 fnt82
+7540 4537(for)m 7865(an)s 3(y)k 240 fnt83 8248 4539(k)m
+240 fnt82 8404 4537(greater)m 3600 4249(than)m 4069(1.)s 4354(Do)s
+4700(not)s 5067(adjust)s 5698(the)s 6047(lines.)s 6663(An)s 3(y)k
+7127(spaces)s 7803(at)s 8035(the)s 8384(start)s 8855(of)s
+3600 3961(a)m 3766(line)s 4180(other)s 4731(than)s 5200(the)s
+5548(\207rst)s 5979(line)s 6393(will)s 6819(appear)s 7516(in)s
+7759(the)s 8107(output;)s 220 fnt35 1303 3453(clines)m 1916(@Break)s
+240 fnt83 2772 3458(object)m 240 fnt82 3600 3456(Break)m 4288(the)s
+4693(paragraphs)s 5849(of)s 240 fnt83 6177 3458(object)m 240 fnt82
+6881 3456(into)m 7363(lines)s 7921(as)s 8228(for)s 220 fnt35
+8623 3453(lines)m 3600 3165(@Break)m 240 fnt82 4396 3168(,)m 4503(then)s
+4972(centre)s 5611(each)s 6106(line)s 6520(with)s 7002(respect)s
+7738(to)s 7977(the)s 8325(others;)s 220 fnt35 1337 2660(r)m -3(lines)k
+1916(@Break)s 240 fnt83 2772 2665(object)m 240 fnt82 3600 2663(Break)m
+4288(the)s 4693(paragraphs)s 5849(of)s 240 fnt83 6177 2665(object)m
+240 fnt82 6881 2663(into)m 7363(lines)s 7921(as)s 8228(for)s
+220 fnt35 8623 2660(lines)m 3600 2372(@Break)m 240 fnt82 4396 2375(,)m
+4535(then)s 5036(right-)s 5555(justify)s 6251(each)s 6778(line)s
+7224(with)s 7738(respect)s 8506(to)s 8778(the)s 3600 2087(others.)m
+0 1634(If)m 235(the)s 588(paragraph)s 1606(w)s 2(as)k
+2032(an)s 2320(entire)s 2924(component)s 4053(of)s 4329(a)s
+4501(g)s 1(alle)k 3(y)k 15(,)k 5178(so)s
+5449(will)s 5880(each)s 6380(of)s 6656(its)s 6937(lines)s
+7444(be;)s 7787(otherwise)s 8778(the)s 0 1346(lines)m 502(are)s
+849(enclosed)s 1744(in)s 1987(a)s 220 fnt35 2153 1343(@OneRo)m 3(w)k
+240 fnt82 3284 1346(symbol)m 4044(after)s 4540(breaking.)s 480 972(The)m
+911(length)s 1570(of)s 1845(the)s 2196(g)s 1(ap)k
+2598(used)s 3099(to)s 3341(separate)s 4183(the)s 4535(lines)s
+5040(produced)s 5993(by)s 6291(paragraph)s 7307(breaking)s 8201(is)s
+8415(al)s 2(w)k 2(ays)k 220 fnt35 0 681(1v)m
+240 fnt82 231 684(.)m 395(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+1355(the)s 220 fnt35 1703 681(v)m 240 fnt82 1872 684(unit)m
+2304(itself)s 2852(and)s 3256(the)s 3604(g)s 1(ap)k
+4002(mode)s 4590(may)s 5056(be)s 5338(changed:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 43 49
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.4.)m 454(@Br)s 8(eak)k 240 fnt84
+8833 13840(43)m 240 fnt83 1503 13249(gap)m 220 fnt35 1916 13244(@Break)m
+240 fnt83 2772 13249(object)m 240 fnt82 3600 13247(W)m 9(ithin)k
+240 fnt83 4312 13249(object)m 240 fnt82 4900 13247(,)m 5008(tak)s 2(e)k
+5460(the)s 5809(v)s 6(alue)k 6377(of)s 6649(the)s
+220 fnt35 6998 13244(v)m 240 fnt82 7167 13247(unit)m 7600(to)s
+7839(be)s 8122(the)s 8471(length)s 3600 12959(of)m 240 fnt83
+3871 12961(gap)m 240 fnt82 4224 12959(;)m 1375 12458(+)m 240 fnt83
+1503 12460(gap)m 220 fnt35 1916 12455(@Break)m 240 fnt83 2772 12460(object)m
+240 fnt82 3600 12458(W)m 9(ithin)k 240 fnt83 4320 12460(object)m
+240 fnt82 4908 12458(,)m 5024(tak)s 2(e)k 5485(the)s
+5841(v)s 6(alue)k 6418(of)s 6698(the)s 220 fnt35
+7054 12455(v)m 240 fnt82 7232 12458(unit)m 7673(to)s 7920(be)s
+8211(lar)s 4(ger)k 8832(by)s 3600 12170(the)m 3948(length)s
+4603(of)s 240 fnt83 4874 12172(gap)m 240 fnt82 5287 12170(than)m
+5756(it)s 5948(w)s 2(ould)k 6603(otherwise)s 7588(ha)s 4(v)k 3(e)k
+8089(been;)s 1383 11665(\211)m 240 fnt83 1503 11667(gap)m 220 fnt35
+1916 11662(@Break)m 240 fnt83 2772 11667(object)m 240 fnt82 3600 11665(W)m 9(ithin)k
+240 fnt83 4309 11667(object)m 240 fnt82 4897 11665(,)m 5000(tak)s 2(e)k
+5448(the)s 5792(v)s 6(alue)k 6356(of)s 6623(the)s
+220 fnt35 6968 11662(v)m 240 fnt82 7133 11665(unit)m 7561(to)s
+7796(be)s 8074(smaller)s 8832(by)s 3600 11377(the)m 3948(length)s
+4603(of)s 240 fnt83 4874 11379(gap)m 240 fnt82 5287 11377(than)m
+5756(it)s 5948(w)s 2(ould)k 6603(otherwise)s 7588(ha)s 4(v)k 3(e)k
+8089(been.)s 0 10872(In)m 256(each)s 751(case,)s 1269(the)s
+1617(mode)s 2205(of)s 240 fnt83 2476 10874(gap)m 240 fnt82
+2889 10872(is)m 3099(adopted)s 3915(within)s 240 fnt83 4583 10874(object)m
+240 fnt82 5171 10872(.)m 480 10498(The)m 220 fnt35 908 10495(@Break)m
+240 fnt82 1764 10498(symbol)m 2524(also)s 2962(controls)s 3783(h)s 1(yphenation:)k
+220 fnt35 1141 9990(h)m 6(yphen @Break)k 240 fnt83 2772 9995(object)m
+240 fnt82 3600 9993(Permit)m 4296(h)s 1(yphenation)k 5536(within)s
+6204(the)s 6552(paragraphs)s 7652(of)s 240 fnt83 7923 9995(object)m
+240 fnt82 8511 9993(;)m 220 fnt35 897 9485(noh)m 6(yphen @Break)k
+240 fnt83 2772 9490(object)m 240 fnt82 3600 9488(Prohibit)m 4440(h)s 1(yphenation)k
+5691(within)s 6370(the)s 6729(paragraphs)s 7840(of)s 240 fnt83
+8122 9490(object)m 240 fnt82 8710 9488(;)m 8833(all)s 3600 9200(h)m 1(yphenation)k
+4897(g)s 1(aps)k 5443(without)s 6291(e)s 3(xception)k
+7332(re)s 6(v)k 3(ert)k 7996(to)s 8292(edge-)s
+8812(to-)s 3600 8912(edge)m 4108(mode.)s 0 8409(The)m 220 fnt35
+428 8406(@Break)m 240 fnt82 1284 8409(also)m 1722(has)s 2092(options)s
+2848(which)s 3490(control)s 4222(wido)s 6(w)k 4922(and)s
+5326(orphan)s 6048(lines:)s 220 fnt35 480 7901(unbreakab)m 4(le\207rst @Break)k
+240 fnt83 3058 7906(ob)m 240 fnt82 3292 7904(-)m 240 fnt83
+480 7618(ject)m 240 fnt82 3600 7904(Pre)m 6(v)k 3(ent)k
+4431(column)s 5256(and)s 5710(page)s 6268(breaks)s 6993(\(i.e.)s
+7458(pre)s 6(v)k 3(ent)k 8276(a)s 8492(g)s 1(alle)k 3(y)k
+3600 7616(from)m 4147(splitting\))s 5081(between)s 5959(the)s 6330(\207rst)s
+6784(and)s 7212(second)s 7958(lines)s 8483(of)s 8778(the)s
+3600 7328(paragraphs)m 4700(of)s 240 fnt83 4971 7330(object)m 240 fnt82
+5559 7328(;)m 220 fnt35 480 6820(unbreakab)m 4(lelast @Break)k 240 fnt83
+3058 6825(ob)m 240 fnt82 3292 6823(-)m 240 fnt83 480 6537(ject)m
+240 fnt82 3600 6823(Pre)m 6(v)k 3(ent)k 4429(column)s
+5252(and)s 5704(page)s 6261(breaks)s 6984(between)s 7886(the)s
+8282(last)s 8722(and)s 3600 6535(second)m 4323(last)s 4714(lines)s
+5216(of)s 5487(the)s 5835(paragraphs)s 6935(of)s 240 fnt83
+7206 6537(object)m 240 fnt82 7794 6535(.)m 0 6032(These)m 688(options)s
+1506(w)s 2(ork)k 2119(by)s 2475(adding)s 3241(the)s
+220 fnt35 3651 6029(u)m 240 fnt82 3881 6032(\(unbreakable\))m 5319(suf\207x)s
+5980(to)s 6281(the)s 6691(appropriate)s 7897(g)s 1(aps)k
+8448(during)s 0 5744(paragraph)m 1017(breaking,)s 1966(so)s 2237(their)s
+2738(precise)s 3475(ef)s 6(fect)k 4076(is)s 4290(as)s
+4545(described)s 5524(for)s 5866(this)s 6267(suf\207x.)s 6981(These)s
+7612(options)s 8373(may)s 8844(be)s 0 5456(countermanded)m 1533(by)s
+220 fnt35 1827 5453(breakab)m 4(le\207rst @Break)k 240 fnt82 4057 5456(and)m
+220 fnt35 4461 5453(breakab)m 4(lelast @Break.)k 240 fnt82 480 5082(Se)m 6(v)k 3(eral)k
+1310(options)s 2135(may)s 2669(be)s 3020(gi)s 6(v)k 3(en)k
+3668(to)s 3976(the)s 220 fnt35 4392 5079(@Break)m 240 fnt82
+5317 5082(symbol)m 6145(simultaneously)s 15(,)k 7754(in)s 8065(an)s 3(y)k
+8531(order)s 13(.)k 0 4794(F)m 3(or)k 389(e)s 3(xample,)k
+220 fnt35 480 4293({ adjust 1.2fx h)m 6(yphen }  @Break  ...)k 240 fnt82 0 3795(is)m
+210(a)s 375(typical)s 1079(initial)s 1689(v)s 6(alue.)k
+2365(There)s 2977(may)s 3442(be)s 3723(empty)s 4375(objects)s
+5102(and)s 220 fnt35 5505 3792(@Null)m 240 fnt82 6149 3795(objects)m
+6877(in)s 7119(the)s 7466(left)s 7842(parameter)s 8855(of)s
+220 fnt35 0 3504(@Break)m 240 fnt82 796 3507(;)m 908(these)s
+1455(are)s 1802(ignored.)s 240 fnt84 0 2714(3.5.)m 471(@Space)s
+240 fnt82 480 2237(The)m 220 fnt35 911 2234(@Space)m 240 fnt82
+1812 2237(symbol)m 2576(changes)s 3402(the)s 3754(v)s 6(alue)k
+4326(of)s 4601(the)s 220 fnt35 4953 2234(s)m 240 fnt82
+5120 2237(unit)m 5556(of)s 5831(measurement)s 7169(\(Section)s 8026(3.2\))s
+8458(within)s 0 1949(its)m 276(right)s 787(parameter)s 1801(to)s
+2040(the)s 2388(v)s 6(alue)k 2956(gi)s 6(v)k 3(en)k
+3536(by)s 3830(the)s 4178(left)s 4555(parameter:)s 220 fnt35
+480 1448(1c @Space { a b c d })m 240 fnt82 0 952(has)m 370(result)s 480 499(a)m
+1153(b)s 1833(c)s 2499(d)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 44 50
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(44)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt82 0 13205(As)m
+311(for)s 643(the)s 220 fnt35 985 13202(@Break)m 240 fnt82
+1835 13205(symbol,)m 2641(the)s 2982(left)s 3353(parameter)s 4361(of)s
+220 fnt35 4626 13202(@Space)m 240 fnt82 5517 13205(may)m 5976(be)s
+6252(gi)s 6(v)k 3(en)k 6826(relati)s 6(v)k 3(e)k
+7582(to)s 7815(the)s 8156(enclosing)s 220 fnt35 0 12914(s)m
+240 fnt82 163 12917(unit,)m 642(and)s 1046(it)s 1238(may)s
+1704(include)s 2464(a)s 2630(g)s 1(ap)k 3028(mode.)s
+3724(Note)s 4245(that)s 4663(the)s 220 fnt35 5011 12914(@F)m 6(ont)k
+240 fnt82 5723 12917(symbol)m 6483(also)s 6921(sets)s 7330(the)s
+220 fnt35 7678 12914(s)m 240 fnt82 7841 12917(unit.)m 480 12543(The)m
+906(left)s 1280(parameter)s 2292(of)s 2560(the)s 220 fnt35
+2906 12540(@Space)m 240 fnt82 3800 12543(symbol)m 4558(may)s 5021(also)s
+5456(hold)s 5938(an)s 3(y)k 6332(one)s 6732(of)s
+7000(the)s 7346(\207v)s 3(e)k 7755(special)s 8470(v)s 6(alues)k
+220 fnt35 0 12252(lout)m 240 fnt82 349 12255(,)m 220 fnt35
+461 12252(compress)m 240 fnt82 1406 12255(,)m 220 fnt35 1518 12252(separ)m 2(ate)k
+240 fnt82 2362 12255(,)m 220 fnt35 2474 12252(troff)m 240 fnt82
+2849 12255(,)m 2961(and)s 220 fnt35 3371 12252(te)m 6(x)k
+240 fnt82 3656 12255(,)m 3768(which)s 4415(control)s 5152(the)s
+5505(w)s 2(ay)k 5962(in)s 6210(which)s 6857(Lout)s
+7374(treats)s 7946(white)s 8539(space)s 0 11967(separating)m 1047(tw)s 2(o)k
+1470(objects.)s 2324(The)s 2764(names)s 220 fnt35 3439 11964(troff)m
+240 fnt82 3887 11967(and)m 220 fnt35 4304 11964(te)m 6(x)k
+240 fnt82 4661 11967(indicate)m 5486(that)s 5917(the)s 6278(beha)s 4(viour)k
+7303(of)s 7587(these)s 8147(options)s 8916(is)s 0 11679(inspired)m
+828(by)s 1122(these)s 1669(other)s 2220(document)s 3224(formatting)s
+4285(systems.)s 480 11305(The)m 897(def)s 2(ault)k 1607(setting,)s
+220 fnt35 2339 11302(lout)m 240 fnt82 2688 11305(,)m 2784(produces)s
+3687(as)s 3926(man)s 3(y)k 4498(spaces)s 5161(in)s
+5393(the)s 5729(output)s 6390(as)s 6629(there)s 7150(are)s
+7486(in)s 7717(the)s 8054(input.)s 8698(The)s 220 fnt35
+0 11014(compress)m 240 fnt82 1017 11017(setting)m 1719(causes)s 2407(all)s
+2712(sequences)s 3746(of)s 4029(tw)s 2(o)k 4452(or)s
+4723(more)s 5283(white)s 5882(space)s 6482(characters)s 7512(to)s
+7764(be)s 8058(treated)s 8778(the)s 0 10729(same)m 556(as)s
+815(one)s 1227(white)s 1823(space)s 2419(character)s 13(.)k
+3454(The)s 220 fnt35 3891 10726(separ)m 2(ate)k 240 fnt82
+4804 10729(setting)m 5504(is)s 5723(lik)s 2(e)k 220 fnt35
+6144 10726(compress)m 240 fnt82 7159 10729(b)m 4(ut)k 7530(also)s
+7977(causes)s 8662(zero)s 0 10441(white)m 587(spaces)s 1263(between)s
+2118(tw)s 2(o)k 2529(objects)s 3258(\(b)s 4(ut)k
+3700(not)s 4067(within)s 4736(one)s 5138(w)s 2(ord\))k
+5757(to)s 5997(be)s 6280(treated)s 6988(the)s 7337(same)s
+7885(as)s 8136(one)s 8539(white)s 0 10153(space)m 587(character)s 13(.)k
+480 9779(The)m 220 fnt35 902 9776(troff)m 240 fnt82 1330 9779(setting)m
+2013(is)s 2216(the)s 2557(same)s 3097(as)s 220 fnt35
+3340 9776(lout)m 240 fnt82 3742 9779(e)m 3(xcept)k 4416(that)s
+4828(where)s 6(v)k 3(er)k 5761(a)s 5920(sentence)s
+6792(ends)s 7275(at)s 7500(the)s 7841(end)s 8238(of)s
+8502(a)s 8661(line,)s 0 9491(one)m 415(e)s 3(xtra)k
+962(space)s 1562(is)s 1785(added.)s 2535(F)s 3(ormally)k 15(,)k
+3513(when)s 4102(tw)s 2(o)k 4525(objects)s 5266(are)s
+5627(separated)s 6600(by)s 6907(white)s 7507(space)s 8108(characters)s
+0 9203(which)m 660(include)s 1439(at)s 1689(least)s 2205(one)s
+2625(ne)s 6(wline)k 3451(character)s 9(,)k 4442(and)s
+4864(the)s 5231(\207rst)s 5680(object)s 6343(is)s 6572(a)s
+6756(w)s 2(ord)k 7323(ending)s 8046(in)s 8308(an)s 3(y)k
+8724(one)s 0 8915(of)m 288(a)s 471(certain)s 1194(set)s
+1536(of)s 1824(sequences)s 2862(of)s 3150(characters,)s 4241(the)s
+4606(e)s 3(xtra)k 5157(space)s 5761(is)s 5988(added.)s
+6741(The)s 7186(set)s 7528(of)s 7816(sequences)s 8855(of)s
+0 8627(characters)m 1025(depends)s 1868(on)s 2173(the)s 2528(current)s
+3272(language)s 4199(and)s 4610(is)s 4828(de\207ned)s 5598(in)s
+5849(the)s 220 fnt35 6204 8624(langdef)m 240 fnt82 6987 8627(for)m
+7333(that)s 7758(language)s 8686(\(see)s 0 8339(Section)m 774(3.8\).)s
+480 7965(The)m 220 fnt35 930 7962(te)m 6(x)k 240 fnt82
+1297 7965(option)m 1989(is)s 2221(the)s 2592(most)s 3139(complicated.)s
+4494(First,)s 5060(the)s 220 fnt35 5430 7962(compress)m 240 fnt82
+6458 7965(option)m 7149(is)s 7382(applied.)s 8272(Then,)s 8894(at)s
+0 7677(e)m 6(v)k 3(ery)k 576(sentence)s 1455(ending,)s
+2213(whether)s 3043(or)s 3302(not)s 3667(at)s 3899(the)s
+4246(end)s 4650(of)s 4921(a)s 5086(line,)s 5551(one)s
+5952(e)s 3(xtra)k 6486(space)s 7073(is)s 7282(added.)s
+8018(A)s 8247(sentence)s 0 7389(ending)m 709(is)s 923(de\207ned)s
+1690(as)s 1944(for)s 220 fnt35 2286 7386(troff)m 240 fnt82
+2726 7389(e)m 3(xcept)k 3411(that,)s 3880(in)s 4127(addition)s
+4972(to)s 5215(the)s 5568(preceding)s 6568(w)s 2(ord)k
+7120(ha)s 4(ving)k 7825(to)s 8068(end)s 8476(in)s
+8724(one)s 0 7101(of)m 268(a)s 431(certain)s 1134(set)s
+1456(of)s 1724(sequences)s 2742(of)s 3010(characters,)s 4081(the)s
+4426(character)s 5357(preceding)s 6350(that)s 6765(sequence)s 7695(must)s
+8217(e)s 3(xist)k 8722(and)s 0 6813(must)m 525(be)s
+807(a)s 973(lo)s 6(wer)k 4(-case)k 2053(letter)s 13(.)k
+2693(A)s 2924(character)s 3858(is)s 4068(a)s 4234(lo)s 6(wer)k 4(-case)k
+5314(letter)s 5864(if,)s 6116(in)s 6359(the)s 6707(Lout)s
+7219(Character)s 8208(Mapping)s 0 6525(\207le)m 393(\(Section)s 1278(3.3\))s
+1738(associated)s 2810(with)s 3325(the)s 3705(current)s 4473(font,)s
+4997(an)s 5313(upper)s 4(-case)k 6432(equi)s 6(v)k 6(alent)k
+7508(of)s 7811(the)s 8192(character)s 0 6237(is)m 210(de\207ned.)s
+240 fnt84 0 5494(3.6.)m 471(@YUnit)s 1378(and)s 1819(@ZUnit)s
+240 fnt82 480 5062(The)m 220 fnt35 917 5059(@YUnit)m 240 fnt82
+1741 5062(symbol)m 2510(changes)s 3342(the)s 3699(v)s 6(alue)k
+4277(of)s 4557(the)s 220 fnt35 4915 5059(y)m 240 fnt82
+5092 5062(unit)m 5534(of)s 5814(measurement)s 7158(\(Section)s 8020(3.2\))s
+8458(within)s 0 4774(its)m 276(right)s 787(parameter)s 1801(to)s
+2040(the)s 2388(v)s 6(alue)k 2956(gi)s 6(v)k 3(en)k
+3536(by)s 3830(the)s 4178(left)s 4555(parameter:)s 220 fnt35
+480 4273(1c @YUnit { ...)m 13( })k 240 fnt82 0 3779(ensures)m 760(that)s
+1170(the)s 1510(v)s 6(alue)k 2070(of)s 220 fnt35
+2333 3776(1y)m 240 fnt82 2615 3779(within)m 3275(the)s 3615(right)s
+4118(parameter)s 5124(will)s 5542(be)s 220 fnt35 5816 3776(1c)m
+240 fnt82 6043 3779(.)m 6199(The)s 220 fnt35 6619 3776(@ZUnit)m
+240 fnt82 7413 3779(symbol)m 8165(is)s 8366(similar)s 9(,)k
+0 3491(setting)m 688(the)s 1034(v)s 6(alue)k 1600(of)s
+1869(the)s 220 fnt35 2215 3488(z)m 240 fnt82 2376 3491(unit)m
+2806(in)s 3047(its)s 3321(right)s 3830(parameter)s 13(.)k
+4933(Both)s 5453(units)s 5967(ha)s 4(v)k 3(e)k
+6466(def)s 2(ault)k 7185(v)s 6(alue)k 7751(zero.)s
+8324(The)s 8749(left)s 0 3203(parameter)m 1011(may)s 1473(not)s
+1836(include)s 2592(a)s 2755(g)s 1(ap)k 3149(mode,)s
+3784(nor)s 4160(may)s 4622(it)s 4811(use)s 5182(the)s
+220 fnt35 5526 3200(w)m 240 fnt82 5682 3203(,)m 220 fnt35
+5786 3200(b)m 240 fnt82 5900 3203(,)m 220 fnt35 6003 3200(r)m
+240 fnt82 6076 3203(,)m 6180(or)s 6435(of)s 6702(course)s
+220 fnt35 7379 3200(d)m 240 fnt82 7545 3203(units,)m 8114(b)s 4(ut)k
+8472(it)s 8660(may)s 0 2915(be)m 3(gin)k 577(with)s
+220 fnt35 1050 2912(+)m 240 fnt82 1220 2915(or)m 220 fnt35
+1470 2912(-)m 240 fnt82 1584 2915(to)m 1814(indicate)s 2616(that)s
+3025(v)s 6(alue)k 3583(is)s 3784(to)s 4014(be)s
+4286(added)s 4907(to)s 5136(or)s 5386(subtracted)s 6416(from)s
+6931(the)s 7269(current)s 7996(v)s 6(alue.)k 8662(An)s 3(y)k
+0 2627(ne)m 3(g)k 1(ati)k 6(v)k 3(e)k
+853(result)s 1443(of)s 1714(using)s 220 fnt35 2286 2624(-)m
+240 fnt82 2410 2627(will)m 2836(be)s 3118(silently)s 3875(replaced)s
+4742(by)s 5036(zero.)s 480 2253(These)m 1123(units)s 1655(are)s
+2018(not)s 2400(used)s 2913(internally)s 3898(by)s 4208(Lout.)s
+4840(The)s 3(y)k 5399(are)s 5762(supplied)s 6647(as)s
+6913(part)s 7360(of)s 7647(the)s 8011(style)s 8534(infor)s
+8998(-)s 0 1965(mation)m 731(for)s 1080(the)s 1439(con)s 9(v)k 3(enience)k
+2690(of)s 2972(application)s 4102(packages.)s 5154(F)s 3(or)k
+5554(e)s 3(xample,)k 6479(the)s 6838(Eq)s 7173(equation)s
+8065(formatting)s 0 1677(package)m 840(uses)s 1303(them)s 1841(to)s
+2080(\207ne-)s 2507(tune)s 2975(the)s 3323(appearance)s 4454(of)s
+4725(equations.)s 240 fnt84 0 884(3.7.)m 471(@SetColour)s 1788(and)s
+2229(@SetColor)s 240 fnt82 480 452(The)m 220 fnt35 927 449(@SetColour)m
+240 fnt82 2204 452(and)m 220 fnt35 2628 449(@SetColor)m 240 fnt82
+3783 452(symbols,)m 4708(which)s 5370(ha)s 4(v)k 3(e)k
+5891(identical)s 6788(ef)s 6(fect,)k 7451(return)s 8098(their)s
+8615(right)s 0 164(parameter)m 1047(in)s 1323(the)s 1704(colour)s
+2408(speci\207ed)s 3349(by)s 3676(their)s 4206(left)s 4617(parameter)s 13(.)k
+5755(The)s 6216(form)s 6773(of)s 7077(the)s 7458(left)s
+7868(parameter)s 8916(is)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 45 51
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.7.)m 454(@SetColour)s 1710(and)s 2136(@SetColor)s
+240 fnt84 8833 13840(45)m 240 fnt82 0 13250(implementation-dependent;)m 2693(in)s
+2954(Basser)s 3670(Lout)s 4200(it)s 4410(must)s 4954(be)s
+5254(an)s 5555(object)s 6218(whose)s 6904(v)s 6(alue)k
+7490(is)s 7719(a)s 7903(sequence)s 8855(of)s 0 12962(w)m 2(ords)k
+634(comprising)s 1763(a)s 1929(PostScript)s 2971(command)s 3973(for)s
+4311(setting)s 5001(colour)s 13(.)k 5763(F)s 3(or)k
+6152(e)s 3(xample,)k 220 fnt35 480 12461({ 1.0 0.0 0.0 setrgbcolor } @SetColour { hello)m 8(, w)k 2(or)k -3(ld })k
+240 fnt82 0 11962(produces)m 915(the)s 1263(red)s 1626(result)s
+1.0 0.0 0.0 setrgbcolor 480 11459(hello,)m 1065(w)s 2(orld)k 0.0 0.0 0.0 setrgbcolor
+0 10975(Of)m 322(course,)s 1050(a)s 1213(colour)s 1881(output)s
+2550(de)s 6(vice)k 3222(is)s 3429(needed)s 4162(to)s
+4398(see)s 4756(the)s 5101(ef)s 6(fect;)k 5747(on)s
+6041(a)s 6204(monochrome)s 7520(de)s 6(vice)k 8191(the)s
+8536(result)s 0 10687(will)m 422(be)s 700(some)s 1257(shade)s
+1854(of)s 2121(gre)s 3(y)k 15(.)k 2688(The)s
+220 fnt35 3112 10684(@SetColour)m 240 fnt82 4365 10687(command)m 5363(will)s
+5785(not)s 6147(accept)s 6813(an)s 7092(empty)s 7740(left)s
+8112(parameter)s 0 10399(\(it)m 273(refuses)s 1002(to)s 1243(belie)s 6(v)k 3(e)k
+1983(that)s 2403(this)s 2801(could)s 3393(cause)s 3983(a)s
+4151(change)s 4887(of)s 5161(colour\),)s 5960(b)s 4(ut)k
+6324(otherwise)s 7311(it)s 7506(trusts)s 8076(the)s 8426(user)s
+8887(to)s 0 10111(supply)m 693(something)s 1743(sensible.)s 480 9737(The)m
+220 fnt35 901 9734(@SetColour)m 240 fnt82 2151 9737(command)m 3145(accepts)s
+3892(the)s 4232(special)s 4943(v)s 6(alue)k 220 fnt35
+5504 9734(nochange)m 240 fnt82 6512 9737(for)m 6843(the)s 7183(left)s
+7553(parameter)s 13(.)k 8650(This)s 0 9449(v)m 6(alue)k
+574(causes)s 1256(the)s 1611(right)s 2129(parameter)s 3150(to)s
+3396(ha)s 4(v)k 3(e)k 3904(the)s 4258(colour)s
+4936(it)s 5135(w)s 2(ould)k 5797(ha)s 4(v)k 3(e)k
+6305(had)s 6716(without)s 7514(the)s 220 fnt35 7869 9446(@SetColour)m
+240 fnt82 0 9161(command.)m 480 8787(There)m 1132(is)s 1382(no)s
+1715(def)s 2(ault)k 2476(colour)s 9(,)k 3225(so)s
+3530(the)s 3918(user)s 4416(must)s 4981(ensure)s 5701(that)s
+6159(the)s 6546(root)s 7031(g)s 1(alle)k 3(y)k
+7705(or)s 8004(each)s 8539(of)s 8850(its)s 0 8499(components)m
+1208(is)s 1418(enclosed)s 2313(in)s 2556(a)s 220 fnt35
+2722 8496(@SetColour)m 240 fnt82 3979 8499(symbol)m 4739(whose)s 5407(left)s
+5784(parameter)s 6798(is)s 7008(not)s 220 fnt35 7374 8496(nochange)m
+240 fnt82 8330 8499(.)m 480 8125(Lout)m 1023(mak)s 2(es)k
+1715(no)s 2039(attempt)s 2847(to)s 3117(understand)s 4257(colour)s 9(,)k
+4998(it)s 5221(simply)s 5958(prints)s 6584(the)s 6964(PostScript)s
+8038(commands)s 0 7837(when)m 601(appropriate.)s 1879(This)s 2381(has)s
+2776(the)s 3150(adv)s 6(antage)k 4196(of)s 4492(permitting)s
+5566(access)s 6253(to)s 6517(an)s 3(y)k 6940(of)s
+7237(PostScript')s 13(s)k 8455(colour)s 0 7549(models)m 768(\(some)s
+1434(require)s 2192(initialization)s 3481(which)s 4149(can)s 4564(be)s
+4872(supplied)s 5767(using)s 220 fnt35 6365 7546(@PrependGr)m 2(aphic)k
+240 fnt82 8178 7549(\),)m 8390(b)s 4(ut)k 8778(the)s
+0 7261(disadv)m 6(antage)k 1299(of)s 1570(of)s 6(fering)k
+2386(no)s 2679(w)s 2(ay)k 3130(to)s 3369(mak)s 2(e)k
+3941(relati)s 6(v)k 3(e)k 4703(changes)s 5525(\(`as)s
+5933(before)s 6599(only)s 7079(redder)s 9(,)k 16(')k
+7836(and)s 8240(so)s 8506(on\).)s 480 6887(F)m 3(or)k
+870(those)s 1432(who)s 1899(wish)s 2409(to)s 2649(obtain)s
+3305(colour)s 3977(without)s 4769(w)s 2(orking)k 5619(v)s 3(ery)k
+6096(hard,)s 6629(the)s 220 fnt35 6978 6884(setrgbcolor)m 240 fnt82
+8124 6887(command)m 0 6599(used)m 496(abo)s 3(v)k 3(e)k
+1117(is)s 1325(a)s 4(v)k 6(ailable)k 2232(in)s
+2474(e)s 6(v)k 3(ery)k 3048(v)s 3(ersion)k
+3805(of)s 4075(PostScript,)s 5162(requires)s 5981(no)s 6273(initialization,)s
+7584(and)s 7987(is)s 8196(simple)s 8887(to)s 0 6311(use.)m
+485(The)s 915(three)s 1450(numbers,)s 2384(which)s 3028(range)s
+3617(from)s 4143(0.0)s 4501(to)s 4742(1.0,)s 5151(determine)s
+6164(the)s 6515(intensity)s 7394(of)s 7667(red,)s 8081(green,)s
+8722(and)s 0 6023(blue)m 468(respecti)s 6(v)k 3(ely)k 15(.)k
+1762(Some)s 2363(useful)s 3002(v)s 6(alues)k 3658(for)s
+3996(the)s 4344(left)s 4721(parameter)s 5735(are)s 220 fnt35
+480 5458(1.0)m 838(0.0)s 1196(0.0)s 1554(setrgbcolor)s 240 fnt83
+2979 5463(r)m 8(ed)k 220 fnt35 480 5139(0.0)m 838(1.0)s
+1196(0.0)s 1554(setrgbcolor)s 240 fnt83 2979 5144(gr)m 8(een)k
+220 fnt35 480 4809(0.0)m 838(0.0)s 1196(1.0)s 1554(setrgbcolor)s
+240 fnt83 2979 4814(blue)m 220 fnt35 480 4479(1.0)m 838(1.0)s
+1196(1.0)s 1554(setrgbcolor)s 240 fnt83 2979 4484(white)m 220 fnt35
+480 4160(0.5)m 837(0.5)s 1194(0.5)s 1551(setrgbcolor)s 240 fnt83
+2979 4165(gr)m 8(e)k 7(y)k 220 fnt35 480 3830(0.0)m
+838(0.0)s 1196(0.0)s 1554(setrgbcolor)s 240 fnt83 2979 3835(blac)m 4(k)k
+240 fnt82 0 3274(Colouring)m 1042(an)s 1344(object)s 2007(white)s
+2613(is)s 2841(useful)s 3499(for)s 3856(producing)s 4899(an)s
+5200(empty)s 5871(space)s 6477(whose)s 7164(size)s 7609(is)s
+7838(that)s 8275(of)s 8565(some)s 0 2986(object.)m 240 fnt84
+0 2193(3.8.)m 471(@Language)s 1762(and)s 2203(@CurrLang)s 240 fnt82
+480 1716(The)m 220 fnt35 905 1713(@Language)m 240 fnt82 2153 1716(symbol)m
+2910(informs)s 3701(Lout)s 4210(that)s 4625(its)s 4898(right)s
+5406(parameter)s 6417(is)s 6624(written)s 7354(in)s 7594(the)s
+7939(language)s 8855(of)s 0 1428(its)m 276(left)s 653(parameter:)s
+220 fnt35 480 927(Danish  @Language  { ...)m 13( })k 240 fnt82 0 428(Basser)m
+706(Lout)s 1228(V)s 26(ersion)k 2025(3)s 2199(uses)s
+2671(this)s 3077(information)s 4271(in)s 4524(tw)s 2(o)k
+4943(w)s 2(ays:)k 5609(to)s 5857(h)s 1(yphenate)k
+6906(w)s 2(ords)k 7549(appropriately)s 8887(to)s 0 140(that)m
+418(language,)s 1389(and)s 1793(to)s 2032(change)s 2766(the)s
+3114(v)s 6(alue)k 3682(of)s 3953(the)s 220 fnt35
+4301 137(@CurrLang)m 240 fnt82 5486 140(symbol)m 6246(\(see)s 6686(belo)s 6(w\).)k
+7508(Other)s 8112(uses,)s 8630(such)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 46 52
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(46)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt82 0 13205(as)m
+250(right-to-left)s 1422(formatting)s 2483(of)s 2754(certain)s 3460(languages,)s
+4524(may)s 4990(be)s 5272(added)s 5902(in)s 6145(the)s
+6493(future.)s 480 12831(The)m 953(left)s 1375(parameter)s 2434(must)s
+3004(either)s 3652(be)s 3979(empty)s 4676(\(which)s 5442(means)s
+6149(to)s 6433(lea)s 4(v)k 3(e)k 7031(the)s
+7424(current)s 8206(language)s 0 12543(unchanged\))m 1167(or)s 1428(else)s
+1857(it)s 2051(must)s 2578(ha)s 4(v)k 3(e)k
+3080(been)s 3591(gi)s 6(v)k 3(en)k 4173(in)s
+4418(a)s 220 fnt35 4586 12540(langdef)m 240 fnt82 5363 12543(language)m
+6285(de\207nition)s 7261(at)s 7495(the)s 7845(be)s 3(ginning)k
+8855(of)s 0 12255(the)m 348(input:)s 220 fnt35 480 11747(langdef  Danish  Dansk  {)m
+240 fnt83 2993 11752(implementation-dependent)m 220 fnt35 5608 11747(})m 240 fnt82
+0 11248(After)m 220 fnt35 571 11245(langdef)m 240 fnt82 1355 11248(comes)m
+2025(a)s 2199(sequence)s 3140(of)s 3419(one)s 3829(or)s
+4096(more)s 4651(simple)s 5352(w)s 2(ords,)k 6050(which)s
+6700(are)s 7055(alternati)s 6(v)k 3(e)k 8117(names)s
+8788(for)s 0 10960(the)m 347(language)s 1265(being)s 1849(de\207ned.)s
+2716(F)s 3(ollo)k 6(wing)k 3743(them)s 4279(comes)s
+4940(an)s 5221(implementation-dependent)s 7843(part)s 8272(between)s 0 10672(braces.)m
+760(In)s 1001(Basser)s 1684(Lout)s 2181(V)s 26(ersion)k
+2955(3)s 3104(this)s 3486(part)s 3902(contains)s 4736(the)s
+5069(name)s 5629(of)s 5885(the)s 6219(Lout)s 6716(h)s 1(yphenation)k
+7941(information)s 0 10384(\207le)m 383(\(minus)s 1121(its)s 1419(.lh)s
+1745(suf\207x\))s 2441(to)s 2702(be)s 3007(used)s 3527(when)s
+4125(h)s 1(yphenating)k 5384(w)s 2(ords)k 6040(in)s
+6306(this)s 6725(language,)s 7718(follo)s 6(wed)k 8643(by)s
+8960(a)s 0 10096(sequence)m 933(of)s 1204(w)s 2(ords)k
+1838(which)s 2480(de\207ne)s 3121(the)s 3469(ends)s 3959(of)s
+4230(sentences.)s 5310(F)s 3(or)k 5699(e)s 3(xample:)k
+220 fnt35 480 9596(langdef English { english  .)m 13(  :)k 11(  ?  !  .\)  ?\)  !\)  })k 240 fnt82
+0 9097(de\207nes)m 748(a)s 934(language)s 1874(called)s 2522(English)s
+3329(with)s 3831(h)s 1(yphenation)k 5091(patterns)s 5918(\207le)s
+220 fnt35 6298 9094(english.lh)m 240 fnt82 7289 9097(and)m 7713(se)s 6(v)k 3(en)k
+8326(w)s 2(ays)k 8887(to)s 0 8809(end)m 424(a)s
+610(sentence.)s 1617(The)s 2065(use)s 2460(of)s 2751(these)s
+3318(sentence)s 4217(endings)s 5034(is)s 5264(described)s 6258(in)s
+6521(Section)s 7315(3.5.)s 7799(If)s 8049(there)s 8602(is)s
+8833(no)s 0 8521(h)m 1(yphenation)k 1236(\207le)s 1592(a)s 4(v)k 6(ailable,)k
+2546(this)s 2937(is)s 3143(indicated)s 4072(by)s 4361(writing)s
+220 fnt35 5099 8518(-)m 240 fnt82 5219 8521(for)m 5552(the)s
+5895(\207le)s 6251(name;)s 6877(if)s 7089(there)s 7617(are)s
+7959(no)s 8247(sentence)s 0 8233(ends,)m 546(the)s 3(y)k
+1009(are)s 1356(simply)s 2061(omitted.)s 480 7859(The)m 220 fnt35
+913 7856(@CurrLang)m 240 fnt82 2103 7859(symbol,)m 2920(which)s 3567(has)s
+3942(no)s 4240(parameters,)s 5399(e)s 6(v)k 6(aluates)k
+6332(to)s 6576(the)s 6929(\207rst)s 7365(name)s 7944(gi)s 6(v)k 3(en)k
+8529(in)s 8778(the)s 220 fnt35 0 7568(langdef)m 240 fnt82
+776 7571(of)m 1047(the)s 1395(language)s 2315(in)s 2558(force)s
+3104(at)s 3336(the)s 3684(point)s 4236(where)s 4876(it)s
+5068(is)s 5278(in)s 9(v)k 4(ok)k 2(ed:)k
+220 fnt35 480 7070(Dansk  @Language  { )m 11(This is @CurrLang.)k 13( })k 240 fnt82
+0 6571(has)m 370(result)s 480 6118(This)m 956(is)s 1166(Danish.)s
+0 5665(It)m 205(is)s 415(typically)s 1305(used)s 1802(with)s
+2284(the)s 220 fnt35 2632 5662(@Case)m 240 fnt82 3419 5665(symbol)m
+4179(lik)s 2(e)k 4591(this:)s 220 fnt35 480 5164(@CurrLang  @Case  {)m
+480 4876(    Danish  @Y)m 4(ield  tirsdag)k 480 4588(    English  @Y)m 4(ield  )k 11(T)k 26(uesda)k 6(y)k
+480 4300(    F)m 9(rench  @Y)k 4(ield  Mardi)k 480 4012(})m 240 fnt82
+0 3518(This)m 476(e)s 3(xample)k 1339(e)s 6(v)k 6(aluates)k
+2267(to)s 2506(the)s 2854(name)s 3428(of)s 3699(the)s
+4047(third)s 4556(day)s 4956(of)s 5227(the)s 5575(week)s
+6141(in)s 6384(the)s 6732(current)s 7468(language.)s 480 3144(The)m
+908(current)s 1644(language)s 2563(is)s 2773(part)s 3204(of)s
+3474(the)s 3822(style)s 4329(of)s 4599(an)s 4882(object,)s
+5573(lik)s 2(e)k 5984(its)s 6260(font.)s 6809(As)s
+7125(e)s 3(xplained)k 8110(in)s 8352(Section)s 0 2856(2.6,)m
+419(style)s 939(is)s 1162(inherited)s 2081(through)s 2896(the)s
+3257(point)s 3822(of)s 4105(appearance,)s 5300(which)s 5955(for)s
+6305(language)s 7238(can)s 7640(be)s 7935(une)s 3(xpected.)k
+0 2568(F)m 3(or)k 380(e)s 3(xample,)k 1284(an)s
+1557(inde)s 3(x)k 2131(entry)s 2666(which)s 3298(originates)s
+4281(in)s 4514(a)s 4671(French)s 5382(chapter)s 6135(b)s 4(ut)k
+6487(appears)s 7258(in)s 7491(an)s 7764(English)s 8542(inde)s 3(x)k
+0 2280(will)m 426(ha)s 4(v)k 3(e)k 927(English)s
+1715(for)s 2053(its)s 2329(language,)s 3300(so)s 3566(must)s
+4091(be)s 4373(e)s 3(xplicitly)k 5326(set)s 5651(to)s
+5890(French)s 6611(using)s 220 fnt35 7183 2277(@Language)m 240 fnt82
+8374 2280(.)m 240 fnt84 0 1487(3.9.)m 471(@OneCol)s 1533(and)s
+1974(@OneRo)s 2(w)k 240 fnt82 480 1055(The)m 220 fnt35
+913 1052(@OneRo)m 3(w)k 240 fnt82 2049 1055(symbol)m 2814(returns)s
+3533(its)s 3814(right)s 4330(parameter)s 5350(modi\207ed)s 6264(so)s
+6535(that)s 6958(only)s 7443(the)s 7796(principal)s 8706(ro)s 6(w)k
+0 767(mark)m 540(protrudes.)s 1595(This)s 2059(is)s 2257(normally)s
+3162(the)s 3498(\207rst)s 3917(ro)s 6(w)k 4324(mark,)s
+4910(b)s 4(ut)k 5260(another)s 6025(one)s 6415(may)s
+6869(be)s 7139(chosen)s 7849(by)s 8130(preceding)s 0 479(it)m
+192(with)s 220 fnt35 674 476(^/)m 240 fnt82 901 479(or)m
+220 fnt35 1160 476(^//)m 240 fnt82 1388 479(.)m 1552(F)s 3(or)k
+1941(e)s 3(xample,)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 47 53
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.9.)m 454(@OneCol)s 1479(and)s 1905(@OneRow)s
+240 fnt84 8831 13840(47)m 220 fnt35 480 13252(@OneRo)m 3(w {  |0.5r)k -8(t  Slope @F)k 6(ont x + 2  ^//1p  @HLine  //1p  |0.5r)k -8(t  5 })k
+240 fnt82 0 12756(has)m 370(result)s 468 371 0 188 240 288 60 480 11777 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+468 371 0 188 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+468 371 0 188 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+240 fnt83 0 211(x)m
+240 fnt82 166 209(+)m 354(2)s 468 0 0 0 240 288 60 0 188 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+181 3(5)m 
+grestore
+
+grestore
+end end restore
+grestore
+0 11061(with)m
+482(one)s 884(ro)s 6(w)k 1304(mark)s 1856(protruding)s
+2919(from)s 3443(the)s 3791(bar)s 4156(as)s 4406(sho)s 6(wn.)k
+5190(Compare)s 6123(this)s 6519(with)s 220 fnt35 480 10560(@OneRo)m 3(w {  |0.5r)k -8(t  Slope @F)k 6(ont x + 2  //1p  @HLine  //1p  |0.5r)k -8(t  5 })k
+240 fnt82 0 10064(where)m 640(the)s 988(mark)s 1540(protrudes)s
+2494(from)s 3018(the)s 3366(numerator:)s 468 371 0 263 240 288 60 480 9085 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+468 371 0 263 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+468 371 0 263 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+240 fnt83 0 211(x)m
+240 fnt82 166 209(+)m 354(2)s 468 0 0 0 240 288 60 0 188 LoutGr2
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+181 3(5)m 
+grestore
+
+grestore
+end end restore
+grestore
+220 fnt35
+0 8631(@OneCol)m 240 fnt82 1016 8634(has)m 1391(the)s 1744(same)s
+2296(ef)s 6(fect)k 2897(on)s 3198(columns)s 4065(as)s
+220 fnt35 4320 8631(@OneRo)m 3(w)k 240 fnt82 5456 8634(does)m
+5951(on)s 6252(ro)s 6(ws,)k 6823(with)s 7310(the)s
+7663(symbols)s 220 fnt35 8517 8631(^|)m 240 fnt82 8722 8634(and)m
+220 fnt35 0 8343(^||)m 240 fnt82 257 8346(\(or)m 220 fnt35
+595 8343(^&)m 240 fnt82 840 8346(\))m 968(determining)s 2176(which)s
+2818(mark)s 3370(is)s 3580(chosen.)s 240 fnt84 0 7553(3.10.)m
+591(@W)s 4(ide)k 1411(and)s 1852(@High)s 240 fnt82
+480 7076(The)m 220 fnt35 910 7073(@Wide)m 240 fnt82 1687 7076(symbol)m
+2450(returns)s 3167(its)s 3446(right)s 3960(parameter)s 4977(modi\207ed)s
+5888(to)s 6130(ha)s 4(v)k 3(e)k 6634(the)s
+6985(width)s 7590(gi)s 6(v)k 3(en)k 8173(by)s
+8470(its)s 8749(left)s 0 6788(parameter)m 9(,)k 1058(which)s
+1707(must)s 2238(be)s 2527(a)s 2699(length)s 3361(\(Section)s
+4220(3.2\))s 4655(whose)s 5329(unit)s 5768(of)s 6045(measurement)s
+7386(is)s 220 fnt35 7602 6785(c)m 240 fnt82 7707 6788(,)m
+220 fnt35 7821 6785(i)m 240 fnt82 7855 6788(,)m 220 fnt35
+7968 6785(p)m 240 fnt82 8082 6788(,)m 220 fnt35 8196 6785(m)m
+240 fnt82 8365 6788(,)m 220 fnt35 8478 6785(f)m 240 fnt82
+8536 6788(,)m 220 fnt35 8650 6785(s)m 240 fnt82 8753 6788(,)m
+8867(or)s 220 fnt35 0 6497(v)m 240 fnt82 109 6500(.)m
+278(If)s 513(the)s 867(right)s 1383(parameter)s 2403(is)s
+2618(not)s 2990(as)s 3245(wide)s 3772(as)s 4027(required,)s
+4936(white)s 5528(space)s 6121(is)s 6336(added)s 6972(at)s
+7209(the)s 7563(right;)s 8131(if)s 8354(it)s 8551(is)s
+8767(too)s 0 6212(wide,)m 585(its)s 875(paragraphs)s 1988(are)s
+2349(brok)s 2(en)k 3083(\(Section)s 3949(3.4\))s 4391(so)s
+4670(that)s 5102(it)s 5308(\207ts.)s 5777(A)s 220 fnt35
+6021 6209(@OneCol)m 240 fnt82 7046 6212(operation)m 8020(is)s 8244(included)s
+0 5924(in)m 257(the)s 620(ef)s 6(fect)k 1231(of)s
+220 fnt35 1517 5921(@Wide)m 240 fnt82 2231 5924(,)m 2353(since)s
+2915(it)s 3122(does)s 3627(not)s 4008(mak)s 2(e)k
+4595(sense)s 5184(for)s 5537(an)s 5835(object)s 6494(of)s
+6780(\207x)s 3(ed)k 7329(width)s 7946(to)s 8200(ha)s 4(v)k 3(e)k
+8716(tw)s 2(o)k 0 5636(column)m 775(marks.)s 552 5262(The)m
+220 fnt35 993 5259(@High)m 240 fnt82 1725 5262(symbol)m 2498(similarly)s
+3413(ensures)s 4194(that)s 4625(its)s 4914(result)s 5517(is)s
+5740(of)s 6024(a)s 6203(gi)s 6(v)k 3(en)k
+6796(height,)s 7514(by)s 7821(adding)s 8539(white)s 0 4974(space)m
+573(at)s 790(the)s 1123(bottom.)s 1950(In)s 2191(this)s
+2572(case)s 3024(it)s 3201(is)s 3396(an)s 3664(error)s
+4172(for)s 4495(the)s 4828(right)s 5324(parameter)s 6323(to)s
+6547(be)s 6814(too)s 7158(lar)s 4(ge.)k 7780(A)s
+220 fnt35 7995 4971(@OneRo)m 3(w)k 240 fnt82 0 4686(operation)m
+960(is)s 1170(included.)s 240 fnt84 0 3893(3.11.)m 591(@HShift)s
+1550(and)s 1991(@VShift)s 240 fnt82 480 3461(The)m 220 fnt35
+917 3458(@HShift)m 240 fnt82 1802 3461(symbol)m 2572(returns)s 3296(its)s
+3582(right)s 4103(parameter)s 5127(with)s 5619(principal)s 6533(mark)s
+7095(shifted)s 7813(as)s 8073(prescribed)s 0 3173(by)m 294(its)s
+570(left)s 947(parameter:)s 220 fnt35 1124 2665(+)m 240 fnt83
+1244 2670(length)m 220 fnt35 1897 2665(@HShift)m 240 fnt83 2772 2670(object)m
+240 fnt82 3600 2668(Principal)m 4517(mark)s 5069(shifted)s 5777(to)s
+6016(the)s 6364(right)s 6875(by)s 240 fnt83 7169 2670(length)m
+240 fnt82 7762 2668(;)m 220 fnt35 1180 2160(-)m 240 fnt83
+1244 2165(length)m 220 fnt35 1897 2160(@HShift)m 240 fnt83 2772 2165(object)m
+240 fnt82 3600 2163(Principal)m 4517(mark)s 5069(shifted)s 5777(to)s
+6016(the)s 6364(left)s 6741(by)s 240 fnt83 7035 2165(length)m
+240 fnt82 7628 2163(;)m 240 fnt83 1244 1660(length)m 220 fnt35
+1897 1655(@HShift)m 240 fnt83 2772 1660(object)m 240 fnt82 3600 1658(Principal)m
+4512(mark)s 5058(shifted)s 5760(so)s 6020(as)s 6264(to)s
+6497(lie)s 240 fnt83 6786 1660(length)m 240 fnt82 7433 1658(to)m
+7666(the)s 8008(right)s 8513(of)s 8778(the)s 3600 1370(left)m
+3977(edge)s 4485(of)s 240 fnt83 4756 1372(object)m 240 fnt82
+5344 1370(;)m 0 867(In)m 256(each)s 751(chase)s 220 fnt35
+1338 864(@HShift)m 240 fnt82 2213 867(includes)m 3061(a)s 220 fnt35
+3227 864(@OneCol)m 240 fnt82 4239 867(ef)m 6(fect.)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 48 54
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(48)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt82 480 13203(The)m
+916(units)s 1440(of)s 1720(measurement)s 3062(of)s 240 fnt83
+3342 13205(length)m 240 fnt82 4003 13203(may)m 4478(be)s 220 fnt35
+4768 13200(c)m 240 fnt82 4873 13203(,)m 220 fnt35 4989 13200(i)m
+240 fnt82 5023 13203(,)m 220 fnt35 5138 13200(p)m 240 fnt82
+5252 13203(,)m 220 fnt35 5368 13200(m)m 240 fnt82 5537 13203(,)m
+220 fnt35 5652 13200(f)m 240 fnt82 5710 13203(,)m 220 fnt35
+5825 13200(s)m 240 fnt82 5928 13203(,)m 220 fnt35 6044 13200(v)m
+240 fnt82 6153 13203(,)m 6268(or)s 220 fnt35 6536 13200(w)m
+240 fnt82 6692 13203(.)m 6864(In)s 7129(the)s 7485(latter)s
+8043(case,)s 220 fnt35 8569 13200(1w)m 240 fnt82 8916 13203(is)m
+0 12915(tak)m 2(en)k 579(to)s 825(be)s 1113(the)s
+1468(width)s 2076(of)s 2354(the)s 2708(right)s 3226(parameter)s 9(,)k
+4285(so)s 4557(that,)s 5029(for)s 5373(e)s 3(xample,)k
+220 fnt35 6294 12912(0.5w @HShift)m 240 fnt82 7699 12915(will)m 8132(centre)s
+8778(the)s 0 12627(principal)m 904(column)s 1679(mark)s 2231(within)s
+2899(the)s 3247(right)s 3758(parameter)s 13(.)k 548 12253(The)m
+220 fnt35 984 12250(@VShift)m 240 fnt82 1855 12253(symbol)m 2624(is)s
+2842(similar)s 3572(e)s 3(xcept)k 4261(that)s 4688(it)s
+4888(applies)s 5624(v)s 3(ertically)k 6584(to)s 6832(the)s
+7188(principal)s 8100(ro)s 6(w)k 8529(mark:)s 220 fnt35
+0 11962(+)m 240 fnt83 120 11967(length)m 240 fnt82 771 11965(shifts)m
+1337(it)s 1527(do)s 6(wn,)k 220 fnt35 2159 11962(-)m
+240 fnt83 2223 11967(length)m 240 fnt82 2874 11965(shifts)m 3440(it)s
+3629(up,)s 3974(and)s 240 fnt83 4376 11967(length)m 240 fnt82
+5027 11965(shifts)m 5593(it)s 5783(to)s 240 fnt83 6019 11967(length)m
+240 fnt82 6670 11965(belo)m 6(w)k 7301(the)s 7647(top)s
+8004(edge)s 8510(of)s 8778(the)s 0 11677(object.)m 748(W)s 9(ith)k
+220 fnt35 1274 11674(@VShift)m 240 fnt82 2077 11677(,)m 220 fnt35
+2184 11674(1w)m 240 fnt82 2522 11677(is)m 2732(tak)s 2(en)k
+3305(to)s 3544(be)s 3826(the)s 4174(height)s 4832(of)s
+5103(the)s 5451(right)s 5962(parameter)s 13(.)k 240 fnt84
+0 10884(3.12.)m 591(@HExpand)s 1854(and)s 2295(@VExpand)s 240 fnt82
+558 10407(The)m 220 fnt35 1004 10404(@HExpand)m 240 fnt82 2195 10407(symbol)m
+2973(causes)s 3666(its)s 3961(right)s 4490(parameter)s 5522(to)s
+5779(be)s 6079(as)s 6348(wide)s 6887(as)s 7155(it)s
+7365(possibly)s 8235(could)s 8844(be)s 0 10119(without)m 784(violating)s
+1679(a)s 220 fnt35 1837 10116(@Wide)m 240 fnt82 2603 10119(symbol)m
+3355(or)s 3606(intruding)s 4528(into)s 4945(the)s 5285(space)s
+5864(occupied)s 6778(by)s 7064(neighbouring)s 8386(g)s 1(aps)k
+8867(or)s 0 9831(objects.)m 841(The)s 220 fnt35 1269 9828(@VExpand)m
+240 fnt82 2430 9831(symbol)m 3190(is)s 3400(similar)s 9(,)k
+4160(b)s 4(ut)k 4522(it)s 4714(af)s 6(fects)k
+5394(height.)s 6156(F)s 3(or)k 6545(e)s 3(xample,)k
+7459(in)s 7702(the)s 8050(object)s 220 fnt35 480 9330(8i @Wide 11i @High {)m
+480 9042(    //1i  ||1i @HExpand @VExpand x ||1i)m 480 8754(    //1i)m 480 8466(})m 240 fnt82 0 7972(object)m
+220 fnt35 655 7969(x)m 240 fnt82 834 7972(could)m 1435(ha)s 4(v)k 3(e)k
+1947(an)s 3(y)k 2356(size)s 2794(up)s 3098(to)s
+3348(six)s 3694(inches)s 4367(wide)s 4899(by)s 5204(nine)s
+5683(inches)s 6357(high,)s 6901(so)s 7178(the)s 220 fnt35
+7537 7969(@HExpand)m 240 fnt82 8722 7972(and)m 220 fnt35 0 7681(@VExpand)m
+240 fnt82 1166 7684(symbols)m 2021(cause)s 2614(it)s 2812(to)s
+3057(ha)s 4(v)k 3(e)k 3564(e)s 3(xactly)k
+4311(this)s 4713(size.)s 5254(This)s 5736(is)s 5952(important,)s
+6994(for)s 7338(e)s 3(xample,)k 8258(if)s 220 fnt35
+8481 7681(x)m 240 fnt82 8655 7684(con)m 8998(-)s 0 7396(tains)m
+220 fnt35 502 7393(|1r)m -8(t)k 240 fnt82 879 7396(or)m
+220 fnt35 1138 7393(/1r)m -8(t)k 240 fnt82 1459 7396(;)m
+1571(without)s 2362(the)s 2710(e)s 3(xpansion)k 3735(these)s
+4282(might)s 4900(not)s 5266(mo)s 3(v)k 3(e)k
+5848(as)s 6098(f)s 2(ar)k 6420(across)s 7068(or)s
+7327(do)s 6(wn)k 7911(as)s 8161(e)s 3(xpected.)k
+480 7022(As)m 809(Section)s 1595(2.6)s 1961(e)s 3(xplains)k
+2818(in)s 3074(detail,)s 3723(most)s 4260(objects)s 5001(are)s
+5360(already)s 6130(as)s 6392(lar)s 4(ge)k 6933(as)s
+7196(the)s 3(y)k 7671(possibly)s 8536(could)s 0 6734(be.)m
+379(Consequently)s 1738(these)s 2273(symbols)s 3110(are)s 3446(needed)s
+4170(only)s 4638(rarely)s 15(.)k 220 fnt35 5331 6731(@HExpand)m
+240 fnt82 6493 6734(includes)m 7329(a)s 220 fnt35 7483 6731(@OneCol)m
+240 fnt82 8483 6734(ef)m 6(fect,)k 0 6446(and)m 220 fnt35
+404 6443(@VExpand)m 240 fnt82 1565 6446(includes)m 2413(a)s 220 fnt35
+2579 6443(@OneRo)m 3(w)k 240 fnt82 3710 6446(ef)m 6(fect.)k
+240 fnt84 0 5657(3.13.)m 591(@HContract)s 1976(and)s 2417(@VContract)s
+240 fnt82 542 5225(The)m 220 fnt35 972 5222(@HContr)m 2(act)k
+240 fnt82 2239 5225(symbol)m 3001(reduces)s 3784(the)s 4135(size)s
+4564(of)s 4837(its)s 5116(right)s 5629(parameter)s 6645(to)s
+6887(a)s 7055(reasonable)s 8136(minimum)s 0 4937(\(after)m 575(paragraph)s
+1588(breaking\).)s 2668(F)s 3(or)k 3057(e)s 3(xample,)k
+220 fnt35 480 4436(5i @Wide @HContr)m 2(act { A |1r)k -8(t B })k 240 fnt82
+0 3942(has)m 370(result)s 480 3491(A)m 650(B)s 0 3040(in)m
+233(which)s 864(the)s 1201(B)s 1393(is)s 1592(much)s
+2170(closer)s 2789(to)s 3017(the)s 3354(A)s 3574(than)s
+4032(it)s 4213(w)s 2(ould)k 4857(otherwise)s 5831(ha)s 4(v)k 3(e)k
+6321(been.)s 220 fnt35 6926 3037(@VContr)m 2(act)k 240 fnt82
+8167 3040(is)m 8366(similar)s 9(,)k 0 2752(b)m 4(ut)k
+362(in)s 605(a)s 771(v)s 3(ertical)k 1538(direction.)s
+2551(See)s 2952(Section)s 3726(2.6)s 4079(for)s 4417(a)s
+4583(more)s 5130(e)s 3(xtensi)k 6(v)k 3(e)k
+6077(discussion.)s 240 fnt84 0 2008(3.14.)m 591(@HLimited)s 1864(and)s
+2305(@VLimited)s 240 fnt82 579 1576(The)m 220 fnt35 1047 1573(@HLimited)m
+240 fnt82 2221 1576(symbol)m 3021(limits)s 3654(the)s 4042(width)s
+4684(a)s 4(v)k 6(ailable)k 5631(to)s 5910(recursi)s 6(v)k 3(e)k
+6871(and)s 7315(recepti)s 6(v)k 3(e)k 8277(symbols)s
+0 1288(within)m 692(its)s 993(right)s 1529(parameter)s 2567(to)s
+2831(whate)s 6(v)k 3(er)k 3783(is)s 4018(a)s 4(v)k 6(ailable)k
+4950(without)s 5766(increasing)s 6826(the)s 7198(e)s 3(xisting)k
+8030(size)s 8482(of)s 8778(the)s 220 fnt35 0 997(@HLimited)m
+240 fnt82 1138 1000(object.)m 1890(So)s 2199(this)s 2599(symbol)s
+3362(acts)s 3788(lik)s 2(e)k 220 fnt35 4204 997(@Wide)m
+240 fnt82 4981 1000(with)m 5467(respect)s 6206(to)s 6449(limiting)s
+7261(the)s 7613(space)s 8204(occupied)s 0 712(by)m 315(recursi)s 6(v)k 3(e)k
+1258(and)s 1684(recepti)s 6(v)k 3(e)k 2627(symbols,)s
+3553(e)s 3(xcept)k 4256(that)s 4695(instead)s 5451(of)s
+5744(enforcing)s 6734(a)s 6921(\207x)s 3(ed)k 7477(constant)s
+8355(limit,)s 8934(it)s 0 424(enforces)m 860(whate)s 6(v)k 3(er)k
+1787(size)s 2214(is)s 2424(already)s 3181(in)s 3424(place.)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 49 55
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.14.)m 574(@HLimited)s 1763(and)s 2189(@VLimited)s
+240 fnt84 8832 13840(49)m 240 fnt82 480 13249(The)m 220 fnt35
+904 13246(@VLimited)m 240 fnt82 2022 13249(symbol)m 2778(is)s 2983(e)s 3(xactly)k
+3719(the)s 4063(same,)s 4656(e)s 3(xcept)k 5332(that)s
+5746(it)s 5933(applies)s 6656(v)s 3(ertically)k 7604(rather)s
+8215(than)s 8679(hor)s 8998(-)s 0 12961(izontally)m 15(.)k
+240 fnt84 0 12168(3.15.)m 591(@HAdjust,)s 1804(@V)s 32(Adjust,)k
+2972(and)s 3413(@P)s 17(Adjust)k 240 fnt82 551 11692(These)m
+1189(symbols)s 2050(spread)s 2743(their)s 3252(right)s 3774(parameter)s
+4800(apart)s 5348(until)s 5852(it)s 6056(occupies)s 6955(all)s
+7260(the)s 7619(space)s 8218(a)s 4(v)k 6(ailable)k
+0 11404(to)m 268(it;)s 220 fnt35 602 11401(@HAdjust)m 240 fnt82
+1678 11404(adjusts)m 220 fnt35 2422 11401(|)m 240 fnt82 2549 11404(sequences,)m
+220 fnt35 3656 11401(@V)m 17(Adjust)k 240 fnt82 4702 11404(adjusts)m
+220 fnt35 5447 11401(/)m 240 fnt82 5601 11404(sequences,)m 6707(and)s
+220 fnt35 7141 11401(@P)m 26(Adjust)k 240 fnt82 8179 11404(adjusts)m
+220 fnt35 8924 11401(&)m 240 fnt82 0 11116(sequences.)m 1134(F)s 3(or)k
+1523(e)s 3(xample,)k 220 fnt35 480 10615(4i @Wide @P)m 26(Adjust { 1 2 3 4 5 6 7 8 })k
+240 fnt82 0 10118(has)m 370(result)s 480 9663(1)m 1274(2)s
+2088(3)s 2892(4)s 3706(5)s 4512(6)s 5325(7)s
+6133(8)s 0 9209(More)m 571(precisely)s 15(,)k 1521(the)s
+1865(widening)s 2806(is)s 3012(ef)s 6(fected)k 3828(by)s
+4119(enlar)s 4(ging)k 5067(the)s 5411(size)s 5835(of)s
+6102(each)s 6593(component)s 7714(e)s 3(xcept)k 8391(the)s
+8735(last)s 0 8921(by)m 284(an)s 556(equal)s 1118(fraction)s
+1907(of)s 2167(the)s 2504(space)s 3080(that)s 3488(w)s 2(ould)k
+4132(otherwise)s 5106(be)s 5377(left)s 5744(o)s 3(v)k 3(er)k
+6212(\211)s 6381(just)s 6775(the)s 7113(opposite)s 7969(of)s
+8229(the)s 8566(usual)s 0 8633(procedure,)m 1063(which)s 1705(assigns)s
+2447(all)s 2740(the)s 3088(lefto)s 3(v)k 3(er)k
+3884(space)s 4471(to)s 4710(the)s 5058(last)s 5449(component)s
+6573(\(Section)s 7426(2.6\).)s 220 fnt35 480 8256(@P)m 26(Adjust)k
+240 fnt82 1497 8259(is)m 1716(used)s 2222(by)s 2525(the)s
+220 fnt35 2883 8256(adjust)m 240 fnt82 3533 8259(and)m 220 fnt35
+3946 8256(outdent)m 240 fnt82 4743 8259(options)m 5508(of)s 5789(the)s
+220 fnt35 6146 8256(@Break)m 240 fnt82 7011 8259(symbol)m 7780(\(Section)s
+8643(3.4\).)s 0 7971(It)m 213(has)s 591(a)s 765(slight)s
+1364(peculiarity:)s 2559(it)s 2759(will)s 3193(not)s 3567(enlar)s 4(ge)k
+4330(components)s 5546(when)s 6130(the)s 6486(immediately)s 7742(follo)s 6(wing)k
+8728(g)s 1(ap)k 0 7683(has)m 398(width)s 1029(0.)s
+1342(This)s 1847(is)s 2086(to)s 2354(pre)s 6(v)k 3(ent)k
+3151(space)s 3767(from)s 4320(appearing)s 5345(\(for)s 5791(e)s 3(xample\))k
+6755(between)s 7638(a)s 7833(w)s 2(ord)k 8410(and)s
+8843(an)s 0 7395(immediately)m 1248(follo)s 6(wing)k 2225(comma.)s
+3093(The)s 3521(other)s 4072(tw)s 2(o)k 4482(symbols)s
+5331(will)s 5757(enlar)s 4(ge)k 6512(such)s 7008(components.)s
+240 fnt84 0 6602(3.16.)m 591(@HScale)s 1587(and)s 2028(@VScale)s
+220 fnt35 538 6167(@HScale)m 240 fnt82 1516 6170(causes)m 2189(its)s
+2462(right)s 2970(parameter)s 3982(to)s 4218(e)s 3(xpand)k
+4962(to)s 5199(\207ll)s 5516(the)s 5861(space)s 6446(a)s 4(v)k 6(ailable,)k
+7402(by)s 7693(geometricallly)s 0 5882(scaling)m 730(it:)s 220 fnt35
+480 5381(4i @Wide @HScale { 1 2 3 4 5 6 7 8 })m 240 fnt82 0 4887(has)m 370(result)s gsave
+480 0 translate
+4.4965 1.0000 scale
+0 4432(1)m
+155(2)s 329(3)s 493(4)s 667(5)s 833(6)s
+1006(7)s 1174(8)s 
+grestore
+0 3978(and)m 220 fnt35 480 3527(0.5i @Wide @HScale { 1 2 3 4 5 6 7 8 })m
+240 fnt82 0 3033(has)m 370(result)s gsave
+480 0 translate
+0.5621 1.0000 scale
+0 2578(1)m 155(2)s
+329(3)s 493(4)s 667(5)s 833(6)s 1006(7)s
+1174(8)s 
+grestore
+220 fnt35 0 2121(@HScale)m 240 fnt82 980 2124(\207rst)m
+1409(applies)s 220 fnt35 2136 2121(@HContr)m 2(act)k 240 fnt82
+3398 2124(to)m 3635(its)s 3910(parameter)s 9(,)k 4960(then)s
+5427(horizontally)s 6635(scales)s 7254(it)s 7444(to)s 7682(the)s
+8028(actual)s 8651(size.)s 0 1836(The)m 433(principal)s 1342(mark)s
+1899(of)s 2175(the)s 2528(right)s 3044(parameter)s 4063(has)s
+4438(no)s 4736(ef)s 6(fect)k 5337(on)s 5639(the)s
+5992(result;)s 6639(the)s 6992(parameter)s 8011(is)s 8226(scaled)s
+8887(to)s 0 1548(the)m 365(actual)s 1007(size)s 1451(and)s
+1872(positioned)s 2944(to)s 3200(\207ll)s 3537(the)s 3902(space)s
+4506(a)s 4(v)k 6(ailable.)k 5539(\(T)s 19(aking)k
+6347(account)s 7168(of)s 7456(alignment)s 8489(of)s 8778(the)s
+0 1260(principal)m 904(mark)s 1456(only)s 1936(causes)s 2611(trouble)s
+3344(in)s 3587(practice.\))s 220 fnt35 480 883(@VScale)m 240 fnt82
+1460 886(is)m 1681(similar)s 9(,)k 2452(b)s 4(ut)k
+2825(in)s 3080(a)s 3257(v)s 3(ertical)k 4035(direction.)s
+220 fnt35 5059 883(@HScale)m 240 fnt82 6051 886(and)m 220 fnt35
+6467 883(@VScale)m 240 fnt82 7447 886(each)m 7953(ha)s 4(v)k 3(e)k
+8465(both)s 8960(a)s 220 fnt35 0 595(@OneCol)m 240 fnt82
+1012 598(and)m 1416(a)s 220 fnt35 1582 595(@OneRo)m 3(w)k
+240 fnt82 2713 598(ef)m 6(fect.)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 50 56
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(50)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt84 0 13203(3.17.)m
+591(@HCo)s 2(v)k 2(er)k 1679(and)s 2120(@VCo)s 2(v)k 2(er)k
+240 fnt82 529 12771(The)m 220 fnt35 946 12768(@VCo)m 3(v)k 5(er)k
+240 fnt82 1941 12771(symbol)m 2690(v)s 3(ertically)k 3631(scales)s
+4241(its)s 4506(right)s 5006(parameter)s 6009(so)s 6264(that)s
+6671(it)s 6852(co)s 3(v)k 3(ers)k 7510(e)s 6(v)k 3(ery)k
+8075(object)s 8708(that)s 0 12483(shares)m 648(its)s 924(ro)s 6(w)k
+1344(mark.)s 1999(F)s 3(or)k 2388(e)s 3(xample,)k
+220 fnt35 480 11982(@VCo)m 3(v)k 5(er \( 45d @Rotate Hello @VCo)k 3(v)k 5(er \))k
+240 fnt82 0 11486(produces)m 748 843 0 396 240 288 60 480 10303 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+748 843 0 396 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd ] lfigdopath
+pop pop
+grestore
+gsave
+0 396 translate
+1.0000 4.1328 scale
+0 -54(\()m 
+grestore
+gsave
+210 396 translate
+45.0000 rotate
+0 -54(Hello)m 
+grestore
+gsave
+680 396 translate
+1.0000 4.1328 scale
+0 -54(\))m
+
+grestore
+
+grestore
+end end restore
+grestore
+0 9852(The)m 428(ro)s 6(w)k 848(mark)s 1400(has)s
+1770(been)s 2279(added)s 2909(to)s 3148(sho)s 6(w)k
+3702(clearly)s 4405(where)s 5045(it)s 5237(lies.)s 5732(This)s
+6208(should)s 6905(be)s 7187(compared)s 8188(with)s 220 fnt35
+480 9351(@VScale \( 45d @Rotate Hello @VScale \))m 240 fnt82 0 8855(which)m 642(produces)s 748 486 0 39 240 288 60 480 8029 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+748 486 0 39 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd ] lfigdopath
+pop pop
+grestore
+gsave
+0 229 translate
+1.0000 2.3824 scale
+0 -54(\()m
+
+grestore
+gsave
+210 39 translate
+45.0000 rotate
+0 -54(Hello)m 
+grestore
+gsave
+0 229 translate
+1.0000 2.3824 scale
+680 -54(\))m 
+grestore
+
+grestore
+end end restore
+grestore
+0 7578(Scaling)m 786(abandons)s 1759(mark)s
+2328(alignment)s 3361(and)s 3782(so)s 4065(is)s 4292(able)s
+4763(to)s 5018(e)s 3(xactly)k 5776(co)s 3(v)k 3(er)k
+6378(the)s 6743(rest)s 7164(of)s 7452(the)s 7817(ro)s 6(w)k 15(,)k
+8292(whereas)s 0 7290(co)m 3(v)k 3(ering)k 896(preserv)s 3(es)k
+1859(mark)s 2424(alignment)s 3453(and)s 3869(so)s 4148(is)s
+4371(obliged)s 5160(in)s 5415(general)s 6186(to)s 6438(more)s
+6998(than)s 7479(co)s 3(v)k 3(er)k 8077(the)s
+8438(rest)s 8855(of)s 0 7002(the)m 348(ro)s 6(w)k 15(.)k
+480 6628(If)m 700(the)s 1038(parameter)s 2042(of)s 220 fnt35
+2303 6625(@VCo)m 3(v)k 5(er)k 240 fnt82 3299 6628(has)m
+3658(zero)s 4112(v)s 3(ertical)k 4869(size,)s 5337(this)s
+5723(is)s 5923(tak)s 2(en)k 6485(to)s 6714(mean)s
+7279(that)s 7687(co)s 3(v)k 3(ering)k 8561(is)s
+8760(not)s 0 6340(required)m 863(after)s 1368(all)s 1670(and)s
+2083(the)s 220 fnt35 2441 6337(@VCo)m 3(v)k 5(er)k
+240 fnt82 3456 6340(is)m 3675(silently)s 4441(ignored.)s 5345(If)s
+5585(ho)s 6(we)k 6(v)k 3(er)k 6463(the)s
+6820(parameter)s 7843(has)s 8223(non-zero)s 0 6052(size)m 434(abo)s 3(v)k 3(e)k
+1064(the)s 1420(mark)s 1980(b)s 4(ut)k 2350(zero)s
+2822(size)s 3256(belo)s 6(w)k 15(,)k 3935(or)s
+4202(vice)s 4664(v)s 3(ersa,)k 5280(this)s 5684(is)s
+5901(tak)s 2(en)k 6482(to)s 6729(be)s 7019(an)s
+7310(error)s 7841(since)s 8396(scaling)s 0 5764(cannot)m 698(mak)s 2(e)k
+1270(the)s 1618(parameter)s 2632(co)s 3(v)k 3(er)k
+3217(the)s 3565(rest)s 3969(of)s 4240(the)s 4588(ro)s 6(w)k 15(.)k
+220 fnt35 480 5387(@HCo)m 3(v)k 5(er)k 240 fnt82
+1505 5390(is)m 1722(similar)s 9(,)k 2489(horizontally)s 3705(co)s 3(v)k 3(ering)k
+4596(all)s 4896(objects)s 5631(that)s 6056(share)s 6623(its)s
+6906(column)s 7688(mark.)s 8350(Neither)s 0 5102(symbol)m 753(w)s 2(orks)k
+1379(well)s 1837(near)s 2300(g)s 1(alle)k 3(y)k
+2926(tar)s 4(gets,)k 3658(because)s 4463(the)s 4803(scale)s
+5328(f)s 2(actor)k 5934(to)s 6166(apply)s 6744(is)s
+6946(determined)s 8071(before)s 8729(an)s 3(y)k 0 4814(g)m 1(alle)k 3(y)k
+634(\210ushing)s 1459(tak)s 2(es)k 1999(place.)s 240 fnt84
+0 4021(3.18.)m 591(@StartHSpan,@StartVSpan,)s 3642(@StartHVSpan,)s 5374(@HSpan,)s 6416(and)s
+6857(@VSpan)s 240 fnt82 556 3544(These)m 1199(symbols)s 2065(w)s 2(ork)k
+2632(together)s 3492(to)s 3747(produce)s 4591(spanning)s 5525(columns)s
+6403(and)s 6824(ro)s 6(ws)k 7350(in)s 7610(a)s
+7792(more)s 8356(\210e)s 3(xible)k 0 3256(w)m 2(ay)k
+451(than)s 920(is)s 1130(possible)s 1970(in)s 2213(practice)s
+3024(with)s 220 fnt35 3506 3253(//)m 240 fnt82 3691 3256(and)m
+220 fnt35 4095 3253(||)m 240 fnt82 4189 3256(.)m 4353(An)s
+4703(object)s 220 fnt35 480 2755(@Star)m -8(tHSpan object)k 240 fnt82
+0 2258(causes)m 220 fnt35 682 2255(object)m 240 fnt82 1330 2258(to)m
+1577(be)s 1866(printed,)s 2658(b)s 4(ut)k 3027(occup)s 2(ying)k
+4084(all)s 4384(the)s 4740(horizontal)s 5771(space)s 6366(to)s
+6612(the)s 6968(right)s 7486(on)s 7791(the)s 8146(ro)s 6(w)k
+8574(mark)s 0 1970(on)m 289(which)s 922(it)s 1105(lies)s
+1478(up)s 1762(to)s 1992(and)s 2387(including)s 3335(the)s
+3675(rightmost)s 220 fnt35 4642 1967(@HSpan)m 240 fnt82 5572 1970(symbol)m
+6323(on)s 6611(that)s 7020(mark)s 7563(not)s 7920(preceded)s
+8832(by)s 220 fnt35 0 1679(@Star)m -8(tHVSpan)k 240 fnt82
+1496 1682(,)m 220 fnt35 1603 1679(@Star)m -8(tHSpan)k 240 fnt82
+2953 1682(,)m 220 fnt35 3059 1679(@Star)m -8(tVSpan)k 240 fnt82
+4397 1682(,)m 4503(or)s 220 fnt35 4761 1679(@VSpan)m 240 fnt82
+5628 1682(.)m 5791(The)s 6218(column)s 6992(mark)s 7543(of)s
+7813(this)s 8208(spanning)s 0 1394(object)m 644(is)s 854(not)s
+1220(constrained)s 2380(to)s 2619(align)s 3154(with)s 3636(an)s 3(y)k
+4033(of)s 4304(the)s 4652(column)s 5427(marks)s 6062(of)s
+6333(the)s 6681(columns)s 7543(it)s 7735(spans.)s 480 1020(If)m
+739(there)s 1301(is)s 1541(no)s 220 fnt35 1863 1017(@HSpan)m
+240 fnt82 2831 1020(symbol)m 3621(an)s 3(ywhere)k 4633(to)s
+4901(the)s 5279(right)s 5819(of)s 220 fnt35 6119 1017(@Star)m -8(tHSpan)k
+240 fnt82 7469 1020(,)m 7606(then)s 8104(the)s 8482(object)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 51 57
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.18.)m 574(@StartHSpan,@StartVSpan,)s 3376(@StartHVSpan,)s 4953(@HSpan,)s
+5919(and)s 6345(@VSpan)s 240 fnt84 8839 13840(51)m 240 fnt82
+0 13205(spans)m 585(only)s 1067(its)s 1345(o)s 6(wn)k
+1811(column.)s 2695(This)s 3173(means)s 3837(that)s 4257(it)s
+4451(occupies)s 5341(that)s 5761(column)s 6538(as)s 6790(usual)s
+7352(b)s 4(ut)k 7716(its)s 7994(mark)s 8548(is)s
+8760(not)s 0 12917(constrained)m 1160(to)s 1399(align)s 1934(with)s
+2416(those)s 2977(of)s 3248(the)s 3596(other)s 4147(objects)s
+4875(in)s 5118(the)s 5466(column.)s 480 12543(Similarly)m 15(,)k
+1457(the)s 220 fnt35 1801 12540(@Star)m -8(tVSpan)k 240 fnt82
+3196 12543(symbol)m 3952(causes)s 4624(its)s 4896(object)s 5537(to)s
+5772(occup)s 2(y)k 6513(all)s 6802(the)s 7147(v)s 3(ertical)k
+7910(space)s 8493(belo)s 6(w)k 0 12255(it)m 191(on)s
+486(the)s 832(column)s 1605(mark)s 2155(on)s 2451(which)s
+3091(it)s 3281(lies,)s 3717(do)s 6(wn)k 4299(to)s
+4537(and)s 4939(including)s 5894(the)s 6240(bottommost)s 220 fnt35
+7441 12252(@VSpan)m 240 fnt82 8366 12255(symbol)m 0 11967(on)m 294(that)s
+708(mark)s 1256(not)s 1618(preceded)s 2535(by)s 2825(a)s
+220 fnt35 2987 11964(@Star)m -8(tHVSpan)k 240 fnt82 4483 11967(,)m
+220 fnt35 4586 11964(@Star)m -8(tHSpan)k 240 fnt82 5936 11967(,)m
+220 fnt35 6039 11964(@Star)m -8(tVSpan)k 240 fnt82 7377 11967(,)m
+7480(or)s 220 fnt35 7735 11964(@HSpan)m 240 fnt82 8614 11967(;)m
+8722(and)s 0 11679(if)m 206(there)s 728(is)s 927(no)s
+220 fnt35 1209 11676(@VSpan)m 240 fnt82 2125 11679(symbol)m 2874(an)s 3(ywhere)k
+3846(belo)s 6(w)k 4468(it)s 4649(on)s 4935(that)s
+5342(mark,)s 5929(then)s 6387(the)s 6724(object)s 7357(spans)s
+7929(only)s 8398(its)s 8662(o)s 6(wn)k 0 11391(ro)m 6(w)k 15(,)k
+458(occup)s 2(ying)k 1507(its)s 1783(ro)s 6(w)k
+2203(b)s 4(ut)k 2565(with)s 3047(its)s 3323(mark)s
+3875(not)s 4241(constrained)s 5401(to)s 5640(align)s 6175(with)s
+6657(the)s 7005(ro)s 6(w)k 7425(mark.)s 480 11017(The)m
+220 fnt35 949 11014(@Star)m -8(tHVSpan)k 240 fnt82 2547 11017(symbol)m
+3349(combines)s 4359(the)s 4748(ef)s 6(fects)k 5470(of)s
+220 fnt35 5783 11014(@Star)m -8(tHSpan)k 240 fnt82 7235 11017(and)m
+220 fnt35 7681 11014(@Star)m -8(tVSpan)k 240 fnt82 9019 11017(,)m
+0 10729(allo)m 6(wing)k 884(an)s 1167(object)s 1811(to)s
+2050(span)s 2546(both)s 3029(columns)s 3891(and)s 4295(ro)s 6(ws)k
+4805(simultaneously)s 15(.)k 6402(F)s 3(or)k 6791(e)s 3(xample,)k
+7705(in)s 220 fnt35 480 10228(@Star)m -8(tHVSpan x  |  | @HSpan)k 480 9940(/)m
+480 9652(@VSpan   |  |)m 240 fnt82 0 9156(the)m 378(object)s 220 fnt35
+1052 9153(x)m 240 fnt82 1250 9156(will)m 1706(occup)s 2(y)k
+2481(a)s 2677(rectangular)s 3841(area)s 4328(spanning)s 5276(three)s
+5840(columns,)s 6788(tw)s 2(o)k 7228(ro)s 6(ws,)k
+7824(and)s 8258(the)s 8637(g)s 1(aps)k 0 8868(between)m
+854(them.)s 480 8494(The)m 908(objects)s 1636(lying)s 2182(in)s
+2425(the)s 2774(re)s 3(gion)k 3439(spanned)s 4283(should)s
+4980(all)s 5274(be)s 5556(empty)s 15(,)k 6247(or)s
+6506(the)s 220 fnt35 6855 8491(@HSpan)m 240 fnt82 7794 8494(and)m
+220 fnt35 8199 8491(@VSpan)m 240 fnt82 0 8206(symbols)m 865(can)s
+1271(be)s 1570(used)s 2084(to)s 2340(document)s 3360(the)s
+3725(spanning)s 4660(that)s 5095(is)s 5322(occurring.)s 6418(At)s
+6734(present)s 7501(there)s 8051(may)s 8534(be)s 8833(no)s
+0 7918(g)m 1(alle)k 3(y)k 639(tar)s 4(gets)k
+1328(or)s 1593(recursi)s 6(v)k 3(e)k 2521(symbols)s
+3376(within)s 4050(the)s 4404(right)s 4921(parameter)s 5941(of)s
+220 fnt35 6218 7915(@Star)m -8(tHSpan)k 240 fnt82 7568 7918(,)m
+220 fnt35 7681 7915(@Star)m -8(tVSpan)k 240 fnt82 9019 7918(,)m
+0 7630(or)m 220 fnt35 246 7627(@Star)m -8(tHVSpan)k 240 fnt82
+1742 7630(.)m 1892(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+2838(the)s 3172(right)s 3670(parameter)s 4670(may)s 5122(otherwise)s
+6093(be)s 6362(an)s 6631(arbitrary)s 7492(object,)s 8169(including)s
+0 7342(paragraphs)m 1100(of)s 1371(te)s 3(xt)k 1786(that)s
+2204(require)s 2936(breaking.)s 480 6968(If)m 722(the)s 1082(right)s
+1605(parameter)s 2631(of)s 220 fnt35 2914 6965(@Star)m -8(tHSpan)k
+240 fnt82 4264 6968(,)m 220 fnt35 4383 6965(@Star)m -8(tVSpan)k
+240 fnt82 5721 6968(,)m 5840(or)s 220 fnt35 6111 6965(@Star)m -8(tHVSpan)k
+240 fnt82 7679 6968(occupies)m 8579(more)s 0 6680(horizontal)m 1022(or)s
+1279(v)s 3(ertical)k 2044(space)s 2629(than)s 3095(all)s
+3386(of)s 3655(the)s 4001(spanned)s 4842(columns)s 5701(or)s
+5958(ro)s 6(ws)k 6466(combined)s 7466(require,)s 8247(the)s
+8592(e)s 3(xtra)k 0 6392(space)m 601(goes)s 1106(into)s
+1546(the)s 1908(last)s 2314(spanned)s 3172(column)s 3962(or)s
+4235(ro)s 6(w)k 15(.)k 4765(Ov)s 3(erlapping)k
+6026(spanning)s 6958(ro)s 6(ws)k 7483(and)s 7902(columns)s
+8779(are)s 0 6104(permitted.)m 1081(Gaps)s 1626(spanned)s 2471(by)s
+2767(span)s 3266(objects)s 3996(are)s 4345(unbreakable)s 5572(\(their)s
+220 fnt35 6151 6101(u)m 240 fnt82 6321 6104(indicator)m 7232(is)s
+7444(set)s 7772(automatically)s 0 5816(and)m 404(cannot)s 1102(be)s
+1384(re)s 6(v)k 4(ok)k 2(ed\).)k 240 fnt84
+0 5033(3.19.)m 591(@Scale)s 240 fnt82 588 4601(This)m 1112(symbol)s
+1920(geometrically)s 3335(scales)s 4004(its)s 4328(right)s 4887(parameter)s
+5949(by)s 6291(the)s 6687(scale)s 7268(f)s 2(actor)k
+7930(gi)s 6(v)k 3(en)k 8558(in)s 8850(its)s
+0 4313(left)m 377(parameter:)s 220 fnt35 480 3812(1.0 @Scale Hello  2.0 @Scale Hello  0.5 @Scale Hello)m 240 fnt82
+0 3357(has)m 370(result)s gsave
+480 2849 translate
+1.0000 1.0000 scale
+0 -54(Hello)m 
+grestore
+gsave
+1124 2849 translate
+2.0000 2.0000 scale
+0 -54(Hello)m 
+grestore
+gsave
+2292 2849 translate
+0.5000 0.5000 scale
+0 -54(Hello)m
+
+grestore
+0 2286(The)m 433(left)s 815(parameter)s 1834(can)s 2228(be)s
+2515(tw)s 2(o)k 2930(scale)s 3468(f)s 2(actors,)k
+4227(in)s 4475(which)s 5122(case)s 5594(the)s 5947(\207rst)s
+6383(applies)s 7116(horizontally)s 15(,)k 8368(and)s 8778(the)s
+0 1998(second)m 723(v)s 3(ertically:)k 220 fnt35 480 1497({0.5 2.0} @Scale Hello)m
+240 fnt82 0 1003(has)m 370(result)s gsave
+480 495 translate
+0.5000 2.0000 scale
+0 -54(Hello)m 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 52 58
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(52)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt82 0 13205(The)m
+433(left)s 815(parameter)s 1834(may)s 2305(be)s 2592(empty)s 15(,)k
+3287(in)s 3535(which)s 4182(case)s 4654(Lout)s 5171(will)s
+5602(scale)s 6140(the)s 6493(object)s 7142(by)s 7441(a)s
+7612(common)s 8512(f)s 2(actor)k 0 12917(horizontally)m 1209(and)s
+1613(v)s 3(ertically)k 2565(so)s 2831(as)s 3081(to)s
+3320(occup)s 2(y)k 4064(all)s 4357(a)s 4(v)k 6(ailable)k
+5265(horizontal)s 6289(space:)s 220 fnt35 480 12416({} @Scale { Hello w)m 2(or)k -3(ld })k
+240 fnt82 0 11922(has)m 370(result)s gsave
+0 10765 translate
+7.9609 7.9609 scale
+0 -54(Hello)m 583(w)s 2(orld)k
+
+grestore
+0 9861(The)m 433(right)s 949(parameter)s 1969(may)s 2440(be)s
+2728(an)s 3(y)k 3130(object.)s 220 fnt35 3884 9858(@Scale)m
+240 fnt82 4712 9861(has)m 5088(both)s 5576(a)s 220 fnt35
+5748 9858(@OneCol)m 240 fnt82 6765 9861(and)m 7175(a)s 220 fnt35
+7346 9858(@OneRo)m 3(w)k 240 fnt82 8483 9861(ef)m 6(fect,)k
+0 9573(and)m 404(the)s 752(marks)s 1387(of)s 1658(the)s
+2006(result)s 2596(coincide)s 3462(with)s 3944(the)s 4292(principal)s
+5196(marks)s 5831(of)s 6102(the)s 6450(right)s 6961(parameter)s 13(.)k
+240 fnt84 0 8780(3.20.)m 591(@Rotate)s 240 fnt82 542 8348(The)m
+220 fnt35 973 8345(@Rotate)m 240 fnt82 1897 8348(symbol)m 2660(will)s
+3089(rotate)s 3691(its)s 3970(right)s 4484(parameter)s 5501(counterclockwise)s
+7233(an)s 7519(amount)s 8300(gi)s 6(v)k 3(en)k
+8883(in)s 0 8060(de)m 3(grees)k 778(\(positi)s 6(v)k 3(e)k
+1661(or)s 1920(ne)s 3(g)k 1(ati)k 6(v)k 3(e\))k
+2845(by)s 3139(its)s 3415(left)s 3792(parameter)s 13(.)k
+4897(F)s 3(or)k 5286(e)s 3(xample,)k 220 fnt35
+480 7559(30d  @Rotate  { hello)m 8(, w)k 2(or)k -3(ld })k 240 fnt82
+0 7065(has)m 370(result)s gsave
+534 6112 translate
+30.0000 rotate
+0 -54(hello,)m 583(w)s 2(orld)k
+
+grestore
+0 5586(Before)m 710(rotating)s 1511(the)s 1863(object,)s 220 fnt35
+2559 5583(@OneCol)m 240 fnt82 3576 5586(and)m 220 fnt35 3984 5583(@OneRo)m 3(w)k
+240 fnt82 5120 5586(are)m 5471(applied)s 6238(to)s 6482(it.)s
+6782(The)s 7215(result)s 7809(is)s 8024(a)s 8195(rectangle)s
+0 5298(whose)m 668(marks)s 1303(pass)s 1766(through)s 2568(the)s
+2916(point)s 3468(where)s 4108(the)s 4456(original)s 5254(marks)s
+5889(crossed:)s 1587 283 340 113 240 288 60 480 4075 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1587 283 340 113 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1587 283 340 113 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+end end restore
+grestore
+240 fnt78 2547 4128(\336)m gsave
+3256 3921 translate
+240 fnt82 1515 1037 379 267 240 288 60 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1515 1037 379 267 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1515 1037 379 267 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+gsave
+379 267 translate
+30.0000 rotate
+1587 283 340 113 240 288 60 -340 -113 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+1587 283 340 113 240 288 60 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+1587 283 340 113 240 288 60 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+end end restore
+grestore
+
+grestore
+
+grestore
+
+grestore
+end end restore
+grestore
+240 fnt82 0 3470(As)m
+324(this)s 728(e)s 3(xample)k 1598(sho)s 6(ws,)k
+2306(rotation)s 3113(by)s 3415(an)s 3705(angle)s 4287(other)s
+4845(than)s 5322(a)s 5495(multiple)s 6355(of)s 6633(ninety)s
+7293(de)s 3(grees)k 8079(introduces)s 0 3182(quite)m 534(a)s
+700(lot)s 1012(of)s 1283(white)s 1870(space.)s 2565(So,)s
+2925(for)s 3263(e)s 3(xample,)k 4177(the)s 4525(result)s
+5115(of)s 220 fnt35 480 2674(-30d)m 968(@Rotate)s 1890(30d)s
+2305(@Rotate)s 240 fnt83 3286 2679(object)m 240 fnt82 0 2176(is)m
+210(a)s 376(much)s 965(lar)s 4(ger)k 1577(object)s
+2221(than)s 240 fnt83 2690 2178(object)m 240 fnt82 3278 2176(,)m
+3385(despite)s 4118(the)s 4466(f)s 2(act)k 4881(that)s
+5299(one)s 5701(rotation)s 6501(cancels)s 7255(the)s 7603(other)s 13(.)k
+480 1802(Rotation)m 1362(of)s 1634(objects)s 2363(containing)s 3427(recepti)s 6(v)k 3(e)k
+4350(and)s 4755(recursi)s 6(v)k 3(e)k 5678(symbols)s
+6528(is)s 6739(permitted,)s 7762(b)s 4(ut)k 8125(for)s
+8464(angles)s 0 1514(other)m 553(than)s 1024(multiples)s 1967(of)s
+2240(ninety)s 2894(de)s 3(grees)k 3675(it)s 3869(is)s
+4082(best)s 4529(to)s 4770(mak)s 2(e)k 5345(the)s
+5695(size)s 6125(of)s 6398(the)s 6748(rotated)s 7472(object)s
+8118(clear)s 8644(with)s 220 fnt35 0 1223(@Wide)m 240 fnt82
+774 1226(and)m 220 fnt35 1178 1223(@High)m 240 fnt82 1897 1226(symbols:)m
+220 fnt35 480 725(30d @Rotate 5i @Wide 4i @High)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 53 59
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13845(3.20.)m 574(@Rotate)s 240 fnt84 8833 13842(53)m
+220 fnt35 480 13253({   //1i @T)m 26(e)k 6(xtPlace)k 480 12965(    //1i)m
+480 12677(})m 240 fnt82 0 12183(This)m 532(is)s 798(because)s
+1667(for)s 2061(angles)s 2779(other)s 3386(than)s 3911(multiples)s
+4907(of)s 5234(ninety)s 5942(de)s 3(grees)k 6776(the)s
+7180(space)s 7823(a)s 4(v)k 6(ailable)k 8788(for)s
+220 fnt35 0 11892(@T)m 26(e)k 6(xtPlace)k 240 fnt82
+1218 11895(to)m 1457(occup)s 2(y)k 2201(is)s 2411(indeterminate,)s
+3831(and)s 4235(the)s 4583(result)s 5173(is)s 5383(poor)s 13(.)k
+240 fnt84 0 11102(3.21.)m 591(@Backgr)s 4(ound)k 240 fnt82
+577 10625(The)m 220 fnt35 1042 10622(@Bac)m 4(kg)k 2(round)k
+240 fnt82 2515 10625(symbol)m 3312(will)s 3775(print)s 4323(its)s
+4637(left)s 5051(parameter)s 6102(in)s 6382(the)s 6767(background)s
+7993(of)s 8301(its)s 8615(right)s 0 10337(parameter)m 13(.)k
+1115(That)s 1624(is,)s 1901(the)s 2260(result)s 2860(has)s
+3241(the)s 3600(size)s 4038(of)s 4319(the)s 4678(right)s
+5200(parameter)s 9(,)k 6263(b)s 4(ut)k 6635(the)s
+6994(left)s 7382(parameter)s 8407(will)s 8844(be)s 0 10049(printed)m
+735(\207rst)s 1166(in)s 1409(the)s 1757(same)s 2304(space,)s
+2942(with)s 3424(its)s 3700(marks)s 4335(aligned)s 5097(with)s
+5579(the)s 5927(marks)s 6562(of)s 6833(the)s 7181(right)s
+7692(parameter)s 13(.)k 240 fnt84 0 9256(3.22.)m 591(@K)s 6(er)k 3(nShrink)k
+240 fnt82 541 8824(This)m 1018(symbol)s 1779(returns)s 2495(its)s
+2772(right)s 3284(parameter)s 4300(unchanged)s 5397(in)s 5641(appearance)s
+6774(b)s 4(ut)k 7137(occup)s 2(ying)k 8187(a)s
+8355(slightly)s 0 8536(smaller)m 770(bounding)s 1737(box.)s 2269(The)s
+2705(reduction)s 3673(is)s 3891(by)s 4193(the)s 4549(amount)s
+5335(of)s 5614(k)s 2(erning)k 6404(that)s 6830(w)s 2(ould)k
+7493(be)s 7783(applied)s 8553(if)s 8778(the)s 0 8248(right)m
+511(parameter)s 1525(w)s 2(as)k 1946(immediately)s 240 fnt83
+3194 8250(followed)m 240 fnt82 4084 8248(by)m 4378(the)s 4726(left)s
+5103(parameter)s 13(.)k 6208(F)s 3(or)k 6597(e)s 3(xample,)k
+220 fnt35 480 7747(.)m 13( @K)k 8(er)k -5(nShr)k -3(ink P)k
+240 fnt82 0 7292(has)m 370(result)s 104 158 0 54 240 288 60 480 6844 LoutGr2
+LoutBox   stroke
+grestore
+0 0(P)m 
+grestore
+0 6393(where)m
+649(a)s 824(box)s 1249(of)s 1529(size)s 1965(0)s
+2150(has)s 2529(been)s 3048(dra)s 3(wn)k 3709(around)s
+4441(the)s 4799(result)s 5398(to)s 5647(mak)s 2(e)k
+6228(its)s 6513(e)s 3(xtent)k 7164(clear)s 13(.)k
+7787(Compare)s 8730(this)s 0 6105(with)m 482(`P')s 806(alone:)s
+130 158 0 54 240 288 60 480 5656 LoutGr2
+LoutBox   stroke
+grestore
+0 0(P)m 
+grestore
+0 5205(in)m 243(which)s 885(the)s 1232(bounding)s
+2191(box)s 2605(e)s 3(xactly)k 3346(encloses)s 4206(the)s
+4554(object,)s 5245(or)s 5503(at)s 5735(least)s 6231(is)s
+6441(supposed)s 7390(to.)s 7740(The)s 8167(bounding)s 0 4917(box)m
+415(is)s 625(smaller)s 1387(on)s 1684(the)s 2032(right)s
+2543(by)s 2837(the)s 3185(amount)s 3963(of)s 4234(k)s 2(erning)k
+5016(that)s 5434(w)s 2(ould)k 6089(be)s 6371(applied)s
+7133(between)s 7987(`P')s 8311(and)s 8715(`.)s 16('.)k
+480 4543(The)m 916(only)s 1405(kno)s 6(wn)k 2117(use)s
+2501(for)s 2847(this)s 3252(symbol)s 4020(is)s 4239(to)s
+4486(produce)s 5322(tuck)s 2(ed-in)k 6288(subscripts)s 7304(in)s
+7555(the)s 7912(Eq)s 8245(equation)s 0 4255(formatting)m 1061(package.)s
+240 fnt84 0 3462(3.23.)m 591(@Common,)s 1872(@Rump,)s 2847(and)s
+3288(@Meld)s 240 fnt82 540 2985(The)m 220 fnt35 968 2982(@Common)m
+240 fnt82 2127 2985(and)m 220 fnt35 2531 2982(@Rump)m 240 fnt82
+3391 2985(symbols)m 4240(compare)s 5119(tw)s 2(o)k 5529(paragraph)s
+6542(objects:)s 220 fnt35 480 2484({ Aardv)m 5(ar)k -3(k, 29 } @Common { Aardv)k 5(ar)k -3(k, 359 })k
+240 fnt82 0 1990(If)m 234(either)s 842(parameter)s 1860(is)s
+2075(not)s 2446(a)s 2616(paragraph)s 3634(object,)s 4329(it)s
+4526(is)s 4741(con)s 9(v)k 3(erted)k 5734(into)s
+6164(a)s 6334(single-object)s 7633(paragraph)s 8651(\207rst.)s 0 1702(The)m
+418(result)s 998(of)s 220 fnt35 1259 1699(@Common)m 240 fnt82
+2408 1702(is)m 2608(the)s 2946(common)s 3831(pre\207x)s 4433(of)s
+4694(the)s 5032(tw)s 2(o)k 5432(paragraphs;)s 6583(that)s
+6991(is,)s 7247(those)s 7798(initial)s 8398(objects)s 0 1414(which)m
+640(are)s 985(equal)s 1555(in)s 1796(the)s 2142(tw)s 2(o)k
+2549(paragraphs.)s 3760(In)s 4013(the)s 4359(e)s 3(xample)k
+5220(abo)s 3(v)k 3(e,)k 5890(the)s 6236(result)s
+6824(is)s 220 fnt35 7031 1411(Aardv)m 5(ar)k -3(k,)k
+240 fnt82 7949 1414(.)m 8111(The)s 8536(result)s 0 1126(of)m
+220 fnt35 271 1123(@Rump)m 240 fnt82 1131 1126(is)m 1341(that)s
+1759(part)s 2190(of)s 2461(the)s 2809(second)s 3532(object)s
+4176(which)s 4818(is)s 5028(not)s 5394(included)s 6276(in)s
+220 fnt35 6519 1123(@Common)m 240 fnt82 7618 1126(;)m 7730(the)s
+8078(result)s 8668(of)s 220 fnt35 480 625({ Aardv)m 5(ar)k -3(k, 29 } @Rump { Aardv)k 5(ar)k -3(k, 359 })k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 54 60
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(54)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt82 0 13205(is)m
+220 fnt35 210 13202(359)m 240 fnt82 567 13205(.)m 480 12831(If)m
+698(the)s 1034(tw)s 2(o)k 1431(objects)s 2147(ha)s 4(v)k 3(e)k
+2635(nothing)s 3408(in)s 3638(common,)s 4571(the)s 4907(result)s
+5484(of)s 220 fnt35 5743 12828(@Common)m 240 fnt82 6889 12831(will)m
+7303(be)s 7572(an)s 7843(empty)s 8482(object)s 0 12543(and)m
+400(the)s 744(result)s 1330(of)s 220 fnt35 1597 12540(@Rump)m
+240 fnt82 2453 12543(will)m 2874(be)s 3152(the)s 3496(second)s
+4215(object.)s 4959(If)s 5185(the)s 5528(tw)s 2(o)k
+5934(objects)s 6658(are)s 7001(identical,)s 7926(the)s 8270(result)s
+8855(of)s 220 fnt35 0 12252(@Common)m 240 fnt82 1159 12255(will)m
+1585(be)s 1867(the)s 2215(\207rst)s 2646(object,)s 3337(and)s
+3741(the)s 4089(result)s 4679(of)s 220 fnt35 4950 12252(@Rump)m
+240 fnt82 5810 12255(will)m 6236(be)s 6518(an)s 6801(empty)s
+7453(object.)s 480 11881(The)m 933(only)s 1438(kno)s 6(wn)k
+2167(use)s 2567(for)s 220 fnt35 2930 11878(@Rump)m 240 fnt82
+3815 11881(and)m 220 fnt35 4244 11878(@Common)m 240 fnt82 5428 11881(is)m
+5663(to)s 5927(implement)s 7034(mer)s 4(ged)k 7830(inde)s 3(x)k
+8439(entries)s 0 11593(\(Section)m 853(2.8\).)s 480 11219(The)m 220 fnt35
+947 11216(@Meld)m 240 fnt82 1732 11219(symbol)m 2531(returns)s 3284(the)s
+3671(minimum)s 4700(meld)s 5275(of)s 5585(tw)s 2(o)k
+6034(paragraphs,)s 7229(that)s 7686(is)s 7935(the)s 8323(shortest)s
+0 10931(paragraph)m 1013(that)s 1431(contains)s 2279(the)s 2627(tw)s 2(o)k
+3037(original)s 3835(paragraphs)s 4935(as)s 5185(subsequences.)s 6652(F)s 3(or)k
+7041(e)s 3(xample,)k 220 fnt35 480 10430({ Aardv)m 5(ar)k -3(k , 1 , 2 } @Meld { Aardv)k 5(ar)k -3(k , 2 , 3 })k
+240 fnt82 0 9936(produces)m 480 9433(Aardv)m 6(ark)k 1438(,)s
+1545(1)s 1700(,)s 1807(2)s 1981(,)s 2088(3)s
+0 8949(The)m 455(result)s 1073(is)s 1310(related)s 2045(to)s
+2312(the)s 2687(well-kno)s 6(wn)k 3909(longest)s 4688(common)s
+5610(substring,)s 6622(in)s 6893(that)s 7338(the)s 7714(meld)s
+8278(contains)s 0 8661(e)m 6(v)k 3(erything)k 1076(not)s
+1451(in)s 1704(the)s 2061(lcs)s 2387(plus)s 2846(one)s
+3257(cop)s 2(y)k 3785(of)s 4065(e)s 6(v)k 3(erything)k
+5142(in)s 5394(the)s 5751(lcs.)s 6190(This)s 6675(function)s
+7539(is)s 7758(well-suited)s 8887(to)s 0 8373(melding)m 830(comple)s 3(x)k
+1698(inde)s 3(x)k 2274(entries.)s 3067(Note)s 3580(that)s
+3990(there)s 4515(must)s 5033(be)s 5307(a)s 5465(non-zero)s
+6360(amount)s 7131(of)s 7394(space)s 7973(before)s 8631(each)s
+0 8085(comma,)m 805(otherwise)s 1783(each)s 2271(will)s 2690(become)s
+3484(part)s 3908(of)s 4172(the)s 4513(preceding)s 5502(w)s 2(ord,)k
+6093(and,)s 6539(since)s 220 fnt35 7079 8082(@Meld)m 240 fnt82
+7818 8085(compares)m 8778(the)s 0 7797(tw)m 2(o)k 410(paragraphs)s
+1510(w)s 2(ord)k 2058(by)s 2352(w)s 2(ord,)k
+2949(the)s 3297(result)s 3887(will)s 4313(be)s 4595(dif)s 6(ferent)k
+5470(and)s 5874(less)s 6283(satisf)s 2(actory)k 15(.)k
+240 fnt84 0 7004(3.24.)m 591(@Insert)s 240 fnt82 541 6572(The)m
+220 fnt35 970 6569(@Inser)m -8(t)k 240 fnt82 1808 6572(symbol)m
+2569(inserts)s 3245(its)s 3522(left)s 3901(parameter)s 4916(at)s
+5149(the)s 5499(be)s 3(ginning)k 6508(of)s 6781(the)s
+7130(\207rst)s 7563(paragraph)s 8577(of)s 8850(its)s 0 6284(right)m
+511(parameter:)s 220 fnt35 480 5783(X @Inser)m -8(t { A B // C // D })k 240 fnt82
+0 5289(is)m 210(equi)s 6(v)k 6(alent)k 1254(to)s
+220 fnt35 480 4788({ XA B // C // D })m 240 fnt82 0 4294(Notice)m 707(that)s
+1139(a)s 1320(zero-width)s 2426(space)s 3028(separates)s 220 fnt35
+3968 4291(X)m 240 fnt82 4185 4294(from)m 4723(the)s 5085(\207rst)s
+5531(paragraph,)s 6608(so)s 6889(if)s 7120(some)s 7696(wider)s
+8314(space)s 8916(is)s 0 4006(required)m 857(it)s 1052(must)s
+1580(be)s 1865(placed)s 2550(at)s 2785(the)s 3137(end)s
+3544(of)s 220 fnt35 3818 4003(X)m 240 fnt82 3960 4006(.)m
+4127(The)s 220 fnt35 4558 4003(@Inser)m -8(t)k 240 fnt82
+5397 4006(operation)m 6361(is)s 6574(applied)s 7339(to)s 7581(the)s
+7932(v)s 6(alue)k 8503(of)s 8778(the)s 0 3718(right)m
+511(parameter)s 1525(after)s 2021(e)s 6(v)k 6(aluation.)k
+480 3344(The)m 917(only)s 1407(kno)s 6(wn)k 2121(use)s
+2506(for)s 2853(this)s 3259(symbol)s 4029(is)s 4249(to)s
+4498(attach)s 5134(something)s 6194(lik)s 2(e)k 240 fnt84
+6616 3343(Figur)m 4(e)k 7355(6)s 240 fnt82 7538 3344(to)m
+7787(the)s 8145(front)s 8679(of)s 8960(a)s 0 3056(multi-paragraph)m
+1596(caption.)s 240 fnt84 0 2263(3.25.)m 591(@OneOf)s 240 fnt82
+534 1831(The)m 220 fnt35 956 1828(@OneOf)m 240 fnt82 1877 1831(symbol)m
+2631(returns)s 3339(one)s 3734(of)s 3999(the)s 4341(sequence)s
+5268(of)s 5533(objects)s 6254(which)s 6890(is)s 7094(its)s
+7364(right)s 7869(parameter)s 8876(as)s 0 1543(its)m 276(result:)s
+220 fnt35 480 1092(@OneOf {)m 480 804(    @ResultA)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 55 61
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13845(3.25.)m 574(@OneOf)s 240 fnt84 8833 13842(55)m
+220 fnt35 480 13209(    @ResultB)m 480 12921(    @ResultC)m 480 12633(})m 240 fnt82
+0 12139(The)m 451(choice)s 1155(is)s 1388(made)s 1986(to)s
+2248(ensure)s 2952(that)s 3393(whate)s 6(v)k 3(er)k
+4344(g)s 1(alle)k 3(y)k 5001(tar)s 4(get)k
+5624(is)s 5857(required)s 6735(at)s 6990(the)s 7362(moment)s
+8229(is)s 8463(found.)s 0 11851(F)m 3(or)k 389(e)s 3(xample,)k
+1304(if)s 1522(we)s 1858(are)s 2206(e)s 6(v)k 6(aluating)k
+220 fnt35 3244 11848(@OneOf)m 240 fnt82 4172 11851(as)m 4423(part)s
+4855(of)s 5127(an)s 5411(attempt)s 6188(to)s 6428(attach)s
+7056(a)s 7223(g)s 1(alle)k 3(y)k 7858(whose)s
+8527(tar)s 4(get)k 0 11563(is)m 220 fnt35 222 11560(@SomeT)m 26(arget)k
+240 fnt82 1622 11563(,)m 1741(then)s 2223(the)s 2583(result)s
+3186(abo)s 3(v)k 3(e)k 3820(will)s 4259(be)s
+220 fnt35 4553 11560(@ResultA)m 240 fnt82 5613 11563(if)m 5843(it)s
+6047(contains)s 220 fnt35 6908 11560(@SomeT)m 26(arget)k 240 fnt82
+8308 11563(,)m 8427(or)s 8699(else)s 220 fnt35 0 11272(@ResultB)m
+240 fnt82 1042 11275(if)m 1260(it)s 1453(contains)s 220 fnt35
+2302 11272(@SomeT)m 26(arget)k 240 fnt82 3702 11275(,)m 3810(or)s
+4070(else)s 220 fnt35 4498 11272(@ResultC)m 240 fnt82 5552 11275(\(whether)m
+6462(or)s 6722(not)s 7089(it)s 7282(contains)s 8131(the)s
+8480(tar)s 4(get,)k 0 10987(or)m 259(if)s 476(there)s
+1009(is)s 1219(no)s 1512(tar)s 4(get\).)k 480 10613(Use)m
+930(of)s 220 fnt35 1224 10610(@OneOf)m 240 fnt82 2174 10613(in)m
+2440(conjunction)s 3650(with)s 4155(recursi)s 6(v)k 3(e)k
+5100(symbols)s 5972(can)s 6384(lead)s 6863(to)s 7125(problems.)s
+8202(Consider)s 0 10325(this)m 396(e)s 3(xample:)k 220 fnt35
+480 9824(def @Recursiv)m 5(e {)k 480 9248(    def @ChoiceA { @APlace // @Recursiv)m 5(e })k 480 8672(    def @ChoiceB { @BPlace // @Recursiv)m 5(e })k
+480 8096(    @OneOf {)m 480 7808(        @ChoiceA)m 480 7520(        @ChoiceB)m 480 7232(    })m 480 6944(})m
+240 fnt82 0 6450(Lout)m 523(belie)s 6(v)k 3(es)k
+1360(that)s 1790(e)s 3(xpanding)k 220 fnt35 2849 6447(@Recursiv)m 5(e)k
+240 fnt82 4106 6450(is)m 4328(the)s 4687(right)s 5210(thing)s
+5767(to)s 6017(do)s 6322(when)s 6910(searching)s 7890(for)s
+8240(either)s 8855(of)s 0 6162(the)m 380(g)s 1(alle)k 3(y)k
+1046(tar)s 4(gets)k 220 fnt35 1762 6159(@APlace)m 240 fnt82
+2763 6162(and)m 220 fnt35 3199 6159(@BPlace)m 240 fnt82 4108 6162(.)m
+4305(When)s 4966(searching)s 5968(for)s 220 fnt35 6338 6159(@BPlace)m
+240 fnt82 7339 6162(this)m 7768(leads)s 8342(Lout)s 8887(to)s
+0 5874(e)m 3(xpand)k 220 fnt35 760 5871(@Recursiv)m 5(e)k
+240 fnt82 1945 5874(,)m 2065(then)s 220 fnt35 2547 5871(@ChoiceA)m
+240 fnt82 3596 5874(,)m 3717(then)s 4199(the)s 220 fnt35
+4560 5871(@Recursiv)m 5(e)k 240 fnt82 5818 5874(symbol)m 6592(within)s
+220 fnt35 7273 5871(@ChoiceA)m 240 fnt82 8322 5874(,)m 8442(and)s
+8860(so)s 0 5586(on)m 320(in\207nitely)s 15(.)k 1355(This)s
+1854(problem)s 2734(can)s 3146(be)s 3451(a)s 4(v)k 4(oided)k
+4283(by)s 4600(attaching)s 5552(a)s 220 fnt35 5741 5583(@NotRe)m 6(v)k 5(ealed)k
+240 fnt82 7291 5586(symbol)m 8074(to)s 8336(each)s 8855(of)s
+0 5298(the)m 357(inner)s 220 fnt35 918 5295(@Recursiv)m 5(e)k
+240 fnt82 2172 5298(symbols:)m 3146(these)s 3703(are)s 4059(then)s
+4538(not)s 4914(a)s 4(v)k 6(ailable)k 5831(for)s
+6179(e)s 3(xpansion)k 7214(until)s 7716(a)s 7892(decision)s
+8756(has)s 0 5010(been)m 510(made)s 1085(to)s 1326(e)s 3(xpand)k
+2074(the)s 2424(symbol)s 3185(the)s 3(y)k 3650(lie)s
+3945(within.)s 4721(In)s 4979(this)s 5376(particular)s 6352(e)s 3(xample)k
+7216(it)s 7410(w)s 2(ould)k 8066(be)s 8350(simpler)s
+0 4722(to)m 239(write)s 220 fnt35 480 4270(def @Recursiv)m 5(e {)k
+480 3694(    @OneOf {)m 480 3406(        @APlace)m 480 3118(        @BPlace)m 480 2830(    })m 480 2542(    // @Recursiv)m 5(e)k
+480 2254(})m 240 fnt82 0 1760(b)m 4(ut)k 378(this)s
+791(f)s 2(actoring)k 1720(is)s 1947(not)s 2329(possible)s
+3186(when)s 3778(the)s 4143(recursi)s 6(v)k 3(e)k
+5081(calls)s 5586(ha)s 4(v)k 3(e)k 6103(parameters)s
+7218(that)s 7652(are)s 8016(required)s 8887(to)s 0 1472(dif)m 6(fer)k
+583(in)s 826(the)s 1174(tw)s 2(o)k 1584(cases.)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 56 62
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(56)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt84 0 13203(3.26.)m
+591(@Next)s 240 fnt82 535 12771(The)m 220 fnt35 957 12768(@Ne)m 6(xt)k
+240 fnt82 1676 12771(symbol)m 2430(returns)s 3138(its)s 3409(parameter)s
+4417(plus)s 4861(one.)s 5366(It)s 5565(is)s 5769(rather)s
+6380(cle)s 6(v)k 3(er)k 7008(at)s 7234(w)s 2(orking)k
+8078(this)s 8468(out:)s 8934(it)s 0 12483(hunts)m 570(through)s
+1372(the)s 1720(parameter)s 2734(from)s 3258(right)s 3769(to)s
+4008(left,)s 4432(looking)s 5217(for)s 5555(a)s 5721(number)s
+6512(to)s 6751(increment:)s 220 fnt35 480 11982(@Ne)m 6(xt \(3.99\))k
+240 fnt82 0 11486(has)m 404(result)s 1029(\(3.100\).)s 1925(If)s
+220 fnt35 2190 11483(@Ne)m 6(xt)k 240 fnt82 2949 11486(cannot)m
+3681(\207nd)s 4147(a)s 4348(digit)s 4880(inside)s 5542(its)s
+5852(parameter)s 9(,)k 6939(it)s 7166(is)s 7410(an)s
+7728(error)s 13(.)k 8377(Roman)s 0 11198(numerals)m 925(are)s
+1270(handled)s 2084(by)s 2376(storing)s 3091(them)s 3627(in)s
+3868(a)s 4032(database,)s 4960(as)s 5208(e)s 3(xplained)k
+6191(in)s 6432(Section)s 7204(4.2;)s 220 fnt35 7614 11195(@Ne)m 6(xt)k
+240 fnt82 8336 11198(will)m 8760(not)s 0 10910(increment)m 1015(a)s
+1181(Roman)s 1930(numeral.)s 240 fnt84 0 10167(3.27.)m 591(@Case)s
+240 fnt82 540 9735(The)m 220 fnt35 968 9732(@Case)m 240 fnt82
+1755 9735(symbol)m 2515(selects)s 3202(its)s 3478(result)s 4068(from)s
+4592(a)s 4758(list)s 5109(of)s 5380(alternati)s 6(v)k 3(es,)k
+6578(depending)s 7629(on)s 7926(a)s 8092(tag:)s 220 fnt35
+480 9234(@Da)m 6(y @Case {)k 480 8946(    { 1 21 31 }  @Y)m 4(ield  st)k 480 8658(    { 2 22 }  @Y)m 4(ield  nd)k
+480 8370(    { 3 23 }  @Y)m 4(ield  rd)k 480 8082(    else  @Y)m 4(ield th)k 480 7794(})m
+240 fnt82 0 7300(In)m 257(this)s 654(e)s 3(xample)k
+1518(the)s 1868(result)s 2459(will)s 2886(be)s 3169(st)s
+3390(if)s 220 fnt35 3608 7297(@Da)m 6(y)k 240 fnt82
+4274 7300(is)m 4485(1,)s 4714(21,)s 5062(or)s 5322(31,)s
+5670(and)s 6076(nd)s 6375(if)s 220 fnt35 6593 7297(@Da)m 6(y)k
+240 fnt82 7259 7300(is)m 7471(2)s 7646(or)s 7906(22,)s
+8254(etc.)s 8698(The)s 0 7012(ef)m 6(fect)k 594(is)s
+801(similar)s 1520(to)s 1756(accessing)s 2722(a)s 2885(database,)s
+3812(though)s 4532(in)s 4773(a)s 4936(more)s 5480(compact)s
+6347(form.)s 6972(The)s 7397(right)s 7905(parameter)s 8916(is)s
+0 6724(a)m 171(sequence)s 1109(of)s 220 fnt35 1385 6721(@Y)m 4(ield)k
+240 fnt82 2143 6724(symbols,)m 3053(each)s 3553(with)s 4040(a)s
+4211(left)s 4594(parameter)s 5613(whose)s 6286(v)s 6(alue)k
+6859(is)s 7074(a)s 7245(sequence)s 8183(of)s 8459(one)s
+8867(or)s 0 6436(more)m 547(juxtapositions)s 1940(of)s 2211(simple)s
+2904(w)s 2(ords,)k 3594(and)s 3998(a)s 4164(right)s
+4675(parameter)s 5689(which)s 6331(may)s 6797(be)s 7079(an)s 3(y)k
+7476(object.)s 480 6062(W)m 19(e)k 895(\207rst)s 1372(describe)s
+2271(the)s 2665(beha)s 4(viour)k 3725(when)s 4347(the)s
+4742(v)s 6(alue)k 5356(of)s 5674(the)s 6068(left)s
+6492(parameter)s 7552(of)s 220 fnt35 7870 6059(@Case)m 240 fnt82
+8703 6062(is)m 8960(a)s 0 5774(juxtaposition)m 1302(of)s 1568(one)s
+1965(or)s 2220(more)s 2762(simple)s 3450(w)s 2(ords.)k
+4193(Then)s 4737(the)s 5080(result)s 5666(of)s 5932(the)s
+220 fnt35 6275 5771(@Case)m 240 fnt82 7058 5774(is)m 7263(the)s
+7606(right)s 8112(parameter)s 0 5486(of)m 287(the)s 652(\207rst)s
+220 fnt35 1100 5483(@Y)m 4(ield)k 240 fnt82 1870 5486(whose)m
+2554(left)s 2948(parameter)s 3979(contains)s 4844(either)s 5463(the)s
+5828(v)s 6(alue)k 6413(of)s 6701(the)s 7065(left)s
+7459(parameter)s 8490(of)s 8778(the)s 220 fnt35 0 5195(@Case)m
+240 fnt82 727 5198(,)m 834(or)s 1093(the)s 1441(special)s
+2159(v)s 6(alue)k 220 fnt35 2727 5195(else)m 240 fnt82
+3121 5198(.)m 3285(If)s 3515(there)s 4048(is)s 4258(no)s
+4551(such)s 220 fnt35 5047 5195(@Y)m 4(ield)k 240 fnt82
+5800 5198(it)m 5992(is)s 6202(an)s 6485(error)s 13(.)k
+480 4824(When)m 1133(the)s 1506(left)s 1908(parameter)s 2946(of)s
+220 fnt35 3242 4821(@Case)m 240 fnt82 4054 4824(is)m 4288(not)s
+4679(a)s 4870(juxtaposition)s 6200(of)s 6496(simple)s 7214(w)s 2(ords,)k
+7928(the)s 8301(result)s 8916(is)s 0 4536(the)m 350(right)s
+864(parameter)s 1881(of)s 2155(the)s 2506(\207rst)s 220 fnt35
+2940 4533(@Y)m 4(ield)k 240 fnt82 3696 4536(whose)m 4367(left)s
+4746(parameter)s 5763(is)s 220 fnt35 5976 4533(else)m 240 fnt82
+6370 4536(,)m 6480(or)s 6742(an)s 7028(error)s 7554(otherwise.)s
+8650(This)s 0 4248(permits)m 767(e)s 3(xamples)k 1718(lik)s 2(e)k
+220 fnt35 480 3747(@RunningTitle @Case {)m 480 3459(    dft @Y)m 4(ield @Title)k 480 3171(    else @Y)m 4(ield @RunningTitle)k
+480 2883(})m 240 fnt82 0 2389(where)m 661(a)s 848(running)s
+1667(title)s 2115(is)s 2346(returned)s 3221(unless)s 3892(it)s
+4105(has)s 4496(the)s 4866(v)s 6(alue)k 220 fnt35
+5455 2386(dft)m 240 fnt82 5776 2389(\(which)m 6519(presumably)s 7710(means)s
+8393(that)s 8833(no)s 0 2101(running)m 798(title)s 1224(w)s 2(as)k
+1645(supplied\),)s 2642(in)s 2885(which)s 3527(case)s 3994(an)s
+4277(ordinary)s 5141(title)s 5567(is)s 5777(returned)s 6631(instead.)s
+480 1727(When)m 1126(a)s 1310(recepti)s 6(v)k 3(e)k
+2250(symbol)s 3028(is)s 3256(placed)s 3955(within)s 4641(a)s
+220 fnt35 4825 1724(@Case)m 240 fnt82 5552 1727(,)m 5677(it)s
+5887(should)s 6601(be)s 6901(included)s 7801(in)s 8062(each)s
+8575(alter)s 8998(-)s 0 1439(nati)m 6(v)k 3(e,)k
+695(since)s 1255(otherwise)s 2254(Basser)s 2964(Lout)s 3490(may)s
+3969(become)s 4783(confused)s 5718(when)s 6308(trying)s 6945(to)s
+7198(predict)s 7934(whether)s 8778(the)s 0 1151(symbol)m 755(will)s
+1176(be)s 1453(a)s 1613(part)s 2039(of)s 2305(the)s
+2648(result)s 3232(or)s 3486(not.)s 3951(Alternati)s 6(v)k 3(ely)k 15(,)k
+5288(if)s 5500(it)s 5687(can)s 6071(be)s 6347(guaranteed)s
+7449(that)s 7862(the)s 8204(recepti)s 6(v)k 3(e)k
+0 863(symbol)m 764(will)s 1195(ne)s 6(v)k 3(er)k
+1782(be)s 2069(searched)s 2967(for)s 3310(when)s 3891(the)s
+4244(cases)s 4804(that)s 5226(it)s 5423(does)s 5918(not)s
+6289(lie)s 6587(within)s 7260(are)s 7612(selected,)s 8493(that)s
+8916(is)s 0 575(all)m 293(right)s 804(too.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 57 63
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13845(3.28.)m 574(@Moment)s 240 fnt84 8831 13842(57)m
+0 13250(3.28.)m 591(@Moment)s 240 fnt82 480 12818(The)m 908(prede\207ned)s
+1976(symbol)s 220 fnt35 2736 12815(@Moment)m 240 fnt82 3808 12818(has)m
+4178(the)s 4526(follo)s 6(wing)k 5503(de\207nition:)s 220 fnt35
+480 12317(def @Moment)m 480 12029(   named @T)m 26(ag {})k 480 11741(   named @Second {})m 480 11453(   named @Min)m 2(ute {})k
+480 11165(   named @Hour {})m 480 10877(   named @Da)m 6(y {})k 480 10589(   named @Month {})m 480 10301(   named @Y)m 30(ear {})k
+480 10013(   named @Centur)m -6(y {})k 480 9725(   named @W)m 6(eekDa)k 6(y {})k
+480 9437(   named @Y)m 30(earDa)k 6(y {})k 480 9149(   named @Da)m 6(ylightSa)k 4(ving {})k
+480 8861({})m 240 fnt82 0 8367(It)m 208(may)s 677(be)s
+962(used)s 1463(lik)s 2(e)k 1878(an)s 3(y)k
+2278(other)s 2832(symbol.)s 3705(Lout)s 4220(pro)s 3(vides)k
+5095(an)s 5381(in)s 9(v)k 4(ocation)k 6439(of)s
+220 fnt35 6713 8364(@Moment)m 240 fnt82 7788 8367(with)m 8273(tag)s
+220 fnt35 8622 8364(no)m 3(w)k 240 fnt82 9019 8367(,)m
+0 8079(whose)m 668(other)s 1219(parameters)s 2317(are)s 2664(numbers)s
+3539(encoding)s 4470(the)s 4818(current)s 5554(date)s 6008(and)s
+6412(time:)s 220 fnt35 480 7514(@Second)m 240 fnt82 2482 7517(the)m
+2830(current)s 3566(second,)s 4338(usually)s 5083(between)s 5937(00)s
+6232(and)s 6636(59)s 220 fnt35 480 7183(@Min)m 2(ute)k
+240 fnt82 2482 7186(the)m 2830(current)s 3566(minute,)s 4337(between)s
+5191(00)s 5486(and)s 5890(59)s 220 fnt35 480 6873(@Hour)m
+240 fnt82 2482 6876(the)m 2830(current)s 3566(hour)s 9(,)k
+4103(between)s 4957(00)s 5252(and)s 5656(23)s 220 fnt35
+480 6563(@Da)m 6(y)k 240 fnt82 2482 6566(the)m 2830(current)s
+3566(day)s 3966(of)s 4237(the)s 4585(month,)s 5304(between)s
+6158(1)s 6313(and)s 6717(31)s 220 fnt35 480 6234(@Month)m
+240 fnt82 2482 6237(the)m 2830(current)s 3566(month,)s 4285(between)s
+5139(1)s 5294(\(January\))s 6245(and)s 6649(12)s 6943(\(December\))s
+220 fnt35 480 5905(@Y)m 30(ear)k 240 fnt82 2482 5908(the)m
+2830(current)s 3566(year)s 4037(of)s 4308(the)s 4656(century)s 15(,)k
+5465(between)s 6319(00)s 6614(and)s 7018(99)s 220 fnt35
+480 5576(@Centur)m -6(y)k 240 fnt82 2482 5579(the)m 2830(current)s
+3566(century)s 15(,)k 4375(e.g.)s 4765(19)s 5056(or)s
+5315(20)s 220 fnt35 480 5247(@W)m 6(eekDa)k 6(y)k
+240 fnt82 2482 5250(the)m 2830(current)s 3566(day)s 3966(of)s
+4237(the)s 4585(week,)s 5197(between)s 6051(1)s 6206(\(Sunday\))s
+7132(and)s 7536(7)s 7704(\(Saturday\))s 220 fnt35 480 4916(@Y)m 30(earDa)k 6(y)k
+240 fnt82 2482 4919(the)m 2830(current)s 3566(day)s 3966(of)s
+4237(the)s 4585(year)s 9(,)k 5094(between)s 5948(0)s
+6123(and)s 6527(365)s 220 fnt35 480 4587(@Da)m 6(ylightSa)k 4(ving)k
+240 fnt82 2482 4590(an)m 2784(implementation-dependent)s 5427(number)s 6237(that)s
+6675(may)s 7160(encode)s 7914(the)s 8282(daylight)s 2482 4302(sa)m 4(ving)k
+3156(currently)s 4072(in)s 4315(ef)s 6(fect)k 0 3741(Unix)m
+519(manual)s 1262(entries)s 1934(state)s 2411(that)s 220 fnt35
+2814 3738(@Second)m 240 fnt82 3813 3741(can)m 4186(be)s 4453(as)s
+4687(high)s 5155(as)s 5389(61,)s 5720(to)s 5944(allo)s 6(w)k
+6507(for)s 6830(leap)s 7265(seconds.)s 8171(Judicious)s 0 3453(use)m
+375(of)s 646(databases)s 1613(can)s 2002(con)s 9(v)k 3(ert)k
+2767(these)s 3314(numbers)s 4189(into)s 4614(useful)s 5253(dates.)s
+5908(F)s 3(or)k 6297(e)s 3(xample,)k 220 fnt35
+480 2952(@Moment&&no)m 3(w @Open { @Da)k 6(y {@Months&&@Month}, @Centur)k -6(y{@Y)k 30(ear} })k
+240 fnt82 0 2454(produces)m 915(something)s 1965(lik)s 2(e)k
+2377(17)s 2665(September)s 9(,)k 3785(1999)s 4316(gi)s 6(v)k 3(en)k
+4896(a)s 5062(suitable)s 5861(database)s 6740(of)s 7011(months.)s
+240 fnt84 0 1661(3.29.)m 591(@Null)s 240 fnt82 480 1229(This)m
+979(symbol)s 1762(pro)s 3(vides)k 2657(a)s 2846(con)s 9(v)k 3(enient)k
+3967(w)s 2(ay)k 4441(to)s 4703(remo)s 3(v)k 3(e)k
+5493(unw)s 2(anted)k 6503(concatenation)s 7911(symbols.)s 8896(If)s
+0 941(there)m 544(is)s 765(a)s 942(concatenation)s 2339(symbol)s
+3110(preceding)s 220 fnt35 4117 938(@Null)m 240 fnt82 4702 941(,)m
+4821(the)s 220 fnt35 5180 938(@Null)m 240 fnt82 5836 941(and)m
+6252(the)s 6611(concatenation)s 8007(symbol)s 8779(are)s 0 653(both)m
+482(deleted.)s 1335(Otherwise,)s 2423(if)s 2638(there)s 3170(is)s
+3379(a)s 3544(follo)s 6(wing)k 4519(concatenation)s 5903(symbol,)s
+6714(it)s 6905(and)s 7307(the)s 220 fnt35 7654 650(@Null)m
+240 fnt82 8298 653(are)m 8643(both)s 0 365(deleted.)m 794(Otherwise,)s
+220 fnt35 1883 362(@Null)m 240 fnt82 2528 365(becomes)m 3416(an)s
+3699(empty)s 4351(object.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 58 64
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(58)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt82 480 13205(These)m
+1107(rules)s 1622(apply)s 2208(to)s 2447(a)s 2613(fully)s
+3118(parenthesized)s 4490(v)s 3(ersion)k 5248(of)s 5519(the)s
+5867(e)s 3(xpression.)k 7051(F)s 3(or)k 7440(e)s 3(xample,)k
+8354(in)s 220 fnt35 480 12704(...)m 13(  //1vx @Null |0.5i ...)k 240 fnt82
+0 12249(it)m 202(is)s 423(the)s 782(horizontal)s 1817(concatenation)s
+3213(symbol)s 3984(follo)s 6(wing)k 220 fnt35 4972 12246(@Null)m
+240 fnt82 5628 12249(that)m 6057(disappears,)s 7184(because)s 8008(in)s
+8262(the)s 8621(fully)s 0 11961(parenthesized)m 1372(v)s 3(ersion)k
+220 fnt35 480 11460(...)m 13(  //1vx { @Null |0.5i ...)k 13( })k 240 fnt82
+0 10966(there)m 533(is)s 743(no)s 1036(concatenation)s 2421(symbol)s
+3181(preceding)s 4177(the)s 220 fnt35 4525 10963(@Null)m 240 fnt82
+5110 10966(.)m 240 fnt84 0 10173(3.30.)m 591(@Galley)s 1534(and)s
+1975(@F)s 6(or)k 4(ceGalley)k 240 fnt82 480 9696(These)m
+1131(symbols)s 2004(both)s 2511(act)s 2874(as)s 3148(a)s
+3338(placeholder)s 4538(for)s 4900(a)s 5090(g)s 1(alle)k 3(y)k 15(.)k
+5844(That)s 6366(is,)s 6656(the)s 3(y)k 7144(may)s
+7634(be)s 7940(replaced)s 8832(by)s 0 9408(components)m 1210(of)s
+1483(a)s 1651(g)s 1(alle)k 3(y)k 15(.)k
+2383(In)s 2641(the)s 2991(case)s 3460(of)s 220 fnt35
+3734 9405(@F)m 6(orceGalle)k 4(y)k 240 fnt82 5189 9408(the)m
+5539(g)s 1(alle)k 3(y)k 6175(will)s 6604(then)s
+7075(ha)s 4(v)k 3(e)k 7578(a)s 7746(forcing)s
+8492(g)s 1(alle)k 3(y)k 0 9120(ef)m 6(fect)k
+583(at)s 802(this)s 1184(point)s 1723(although)s 2604(it)s
+2783(need)s 3280(not)s 3632(be)s 3901(declared)s 4754(using)s
+220 fnt35 5313 9117(f)m 6(orce into)k 240 fnt82 6202 9120(.)m
+6353(See)s 6740(Section)s 7501(2.7)s 7835(for)s 8160(a)s
+8312(detailed)s 0 8832(discussion)m 1054(of)s 1325(g)s 1(alle)k 3(ys,)k
+2105(forcing)s 2848(g)s 1(alle)k 3(ys,)k 3628(and)s
+4032(tar)s 4(gets.)k 240 fnt84 0 8039(3.31.)m 591(@NotRe)s 3(v)k 2(ealed)k
+240 fnt82 480 7607(The)m 220 fnt35 938 7604(@NotRe)m 6(v)k 5(ealed)k
+240 fnt82 2495 7607(symbol)m 3285(e)s 3(x)k 3(erts)k
+3931(\207ne)s 4376(control)s 5138(o)s 3(v)k 3(er)k
+5647(the)s 6026(process)s 6824(of)s 7125(e)s 3(xpanding)k
+8204(recepti)s 6(v)k 3(e)k 0 7319(symbols.)m 955(It)s
+1152(may)s 1611(appear)s 2300(only)s 2773(within)s 3433(the)s
+3774(body)s 4300(of)s 4564(a)s 4722(de\207nition,)s 5739(immediately)s
+6979(follo)s 6(wing)k 7949(the)s 8289(name)s 8855(of)s
+0 7031(a)m 166(recepti)s 6(v)k 3(e)k 1088(symbol.)s
+1957(F)s 3(or)k 2346(e)s 3(xample:)k 220 fnt35
+480 6530(def A { @Galle)m 4(y })k 480 5954(def B { @Galle)m 4(y })k 480 5378(def ABList)m
+480 5090({)m 480 4802(    A)m 480 4514(    //  B @NotRe)m 6(v)k 5(ealed)k
+480 4226(    //  ABList)m 480 3938(})m 240 fnt82 0 3444(The)m 424(meaning)s
+1297(is)s 1503(that)s 1916(the)s 2260(symbol)s 3016(immediately)s
+4259(preceding)s 220 fnt35 5251 3441(@NotRe)m 6(v)k 5(ealed)k
+240 fnt82 6718 3444(,)m 220 fnt35 6821 3441(B)m 240 fnt82
+7015 3444(in)m 7253(this)s 7645(e)s 3(xample,)k 8555(is)s
+8760(not)s 0 3156(re)m 6(v)k 3(ealed)k 851(to)s
+1083(g)s 1(alle)k 3(ys)k 1800(which)s 2435(encounter)s
+220 fnt35 3431 3153(ABList)m 240 fnt82 4113 3156(while)m 4693(searching)s
+5655(for)s 5986(tar)s 4(gets;)k 6723(to)s 6955(such)s
+7444(g)s 1(alle)k 3(ys)k 8161(it)s 8345(appears)s
+0 2868(that)m 220 fnt35 408 2865(ABList)m 240 fnt82 1086 2868(contains)m
+220 fnt35 1923 2865(A)m 240 fnt82 2116 2868(only)m 15(,)k
+2624(not)s 220 fnt35 2979 2865(B)m 240 fnt82 3117 2868(,)m
+3213(hence)s 3816(only)s 4286(g)s 1(alle)k 3(ys)k
+4999(tar)s 4(geted)k 5811(to)s 220 fnt35 6039 2865(A)m
+240 fnt82 6233 2868(will)m 6648(e)s 3(xpand)k 220 fnt35
+7384 2865(ABList)m 240 fnt82 8013 2868(.)m 8166(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+0 2580(after)m 220 fnt35 496 2577(ABList)m 240 fnt82 1185 2580(is)m
+1395(e)s 3(xpanded)k 2368(by)s 2662(such)s 3158(a)s
+3324(g)s 1(alle)k 3(y)k 15(,)k 220 fnt35
+3996 2577(B)m 240 fnt82 4194 2580(will)m 4620(be)s 4902(a)s 4(v)k 6(ailable)k
+5810(as)s 6060(a)s 6226(tar)s 4(get)k 6825(in)s
+7068(the)s 7416(usual)s 7976(w)s 2(ay)k 15(.)k
+480 2206(Apart)m 1081(from)s 1602(this)s 1994(meaning,)s 220 fnt35
+2922 2203(@NotRe)m 6(v)k 5(ealed)k 240 fnt82 4445 2206(has)m
+4812(no)s 5102(ef)s 6(fect)k 5694(at)s 5923(all,)s
+6264(and)s 6665(the)s 7010(body)s 7540(of)s 7808(the)s
+8152(de\207nition)s 0 1918(may)m 501(be)s 819(understood)s 1976(by)s
+2306(deleting)s 220 fnt35 3164 1915(@NotRe)m 6(v)k 5(ealed)k
+240 fnt82 4727 1918(and)m 5166(an)s 3(y)k 5599(preceding)s
+6630(space.)s 7361(Thus,)s 7982(the)s 8366(symbol)s 0 1630(preceding)m
+220 fnt35 1001 1627(@NotRe)m 6(v)k 5(ealed)k 240 fnt82
+2533 1630(may)m 3004(ha)s 4(v)k 3(e)k 3510(named)s
+4211(and)s 4620(right)s 5136(parameters)s 6239(in)s 6487(the)s
+6840(usual)s 7405(w)s 2(ay;)k 7919(these)s 8471(w)s 2(ould)k
+0 1342(follo)m 6(w)k 672(after)s 1168(the)s 220 fnt35
+1516 1339(@NotRe)m 6(v)k 5(ealed)k 240 fnt82 3043 1342(symbol.)m
+480 968(This)m 944(symbol)s 1692(w)s 2(as)k 2101(introduced)s
+3169(to)s 3396(o)s 3(v)k 3(ercome)k 4377(a)s
+4530(problem)s 5375(with)s 5845(\210oating)s 6616(\207gures)s 7306(treated)s
+8001(as)s 8238(displays.)s 0 680(It)m 205(turned)s 874(out)s
+1240(to)s 1479(be)s 1761(essential)s 2638(to)s 2877(specify)s
+3621(the)s 3969(layout)s 4627(of)s 4898(a)s 5064(column)s
+5839(\(in)s 6161(part\))s 6660(as)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 59 65
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.31.)m 574(@NotRe)s 3(vealed)k 240 fnt84
+8832 13840(59)m 220 fnt35 480 13251(@BodyT)m 26(e)k 6(xtPlace)k
+480 12963(//  @FigurePlace)m 480 12675(//  @BodyT)m 26(e)k 6(xtPlace)k 480 12387(//  @FigurePlace)m
+480 12099(//  @BodyT)m 26(e)k 6(xtPlace)k 480 11811(...)m 240 fnt82
+0 11360(so)m 256(that)s 664(\207gures)s 1356(could)s 1935(alternate)s
+2802(with)s 3274(body)s 3798(te)s 3(xt)k 4202(do)s 6(wn)k
+4776(the)s 5114(column.)s 5986(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+6935(some)s 7486(means)s 8138(w)s 2(as)k 8548(need)s
+8998(-)s 0 11072(ed)m 291(to)s 538(ensure)s 1226(that)s
+1652(in)s 1903(the)s 2259(absence)s 3080(of)s 3359(an)s 3(y)k
+3764(\207gures)s 4474(there)s 5015(could)s 5613(only)s 6101(be)s
+6391(one)s 220 fnt35 6801 11069(@BodyT)m 26(e)k 6(xtPlace)k
+240 fnt82 8527 11072(in)m 8778(the)s 0 10784(column,)m 831(since)s
+1385(otherwise)s 2377(v)s 6(arious)k 3132(problems)s 4080(arose,)s
+4698(for)s 5042(e)s 3(xample)k 5912(the)s 220 fnt35
+6267 10781(@NP)m 240 fnt82 6851 10784(symbol)m 7618(merely)s 8342(causing)s
+0 10496(a)m 174(skip)s 634(from)s 1167(one)s 220 fnt35
+1577 10493(@BodyT)m 26(e)k 6(xtPlace)k 240 fnt82 3303 10496(to)m
+3551(the)s 3907(ne)s 3(xt)k 4385(in)s 4636(the)s
+4992(same)s 5548(column,)s 6381(rather)s 7006(than)s 7483(to)s
+7730(the)s 8087(\207rst)s 8526(in)s 8778(the)s 0 10208(ne)m 3(xt)k
+490(column.)s 1394(Also,)s 1974(without)s 2787(this)s 3204(feature)s
+3944(the)s 4314(optimal)s 5120(page)s 5650(break)s 2(er')k 13(s)k
+6595(attempts)s 7477(to)s 7737(end)s 8163(a)s 8351(column)s
+0 9920(early)m 545(w)s 2(ould)k 1214(be)s 1510(frustrated)s
+2496(by)s 2805(Lout)s 3331(then)s 3814(disco)s 3(v)k 3(ering)k
+4991(that)s 5423(plenty)s 6090(of)s 6375(space)s 6976(e)s 3(xisted)k
+7722(at)s 7968(a)s 8149(follo)s 6(wing)k 220 fnt35
+0 9629(@BodyT)m 26(e)k 6(xtPlace)k 240 fnt82 1703 9632(in)m
+1931(the)s 2263(same)s 2795(column.)s 3662(The)s 4074(solution)s
+4887(is)s 5082(based)s 5669(on)s 220 fnt35 5951 9629(ABList)m
+240 fnt82 6625 9632(abo)m 3(v)k 3(e;)k 7287(each)s
+7767(occurrence)s 8855(of)s 220 fnt35 0 9341(@BodyT)m 26(e)k 6(xtPlace)k
+240 fnt82 1712 9344(after)m 2201(a)s 220 fnt35 2361 9341(@FigurePlace)m
+240 fnt82 3798 9344(is)m 4002(not)s 4361(re)s 6(v)k 3(ealed)k
+5213(in)s 5449(the)s 5791(enclosing)s 6754(de\207nition,)s 7772(and)s
+8169(so)s 8428(cannot)s 0 9056(be)m 282(found)s 899(by)s
+1193(body)s 1727(te)s 3(xt)k 2142(g)s 1(alle)k 3(ys)k
+2866(unless)s 3515(a)s 3682(\207gure)s 4296(has)s 4666(pre)s 6(viously)k
+5724(attached)s 6578(to)s 6817(the)s 7165(preceding)s 220 fnt35
+8162 9053(@Figure)m 240 fnt82 8998 9056(-)m 220 fnt35 0 8765(Place)m
+240 fnt82 540 8768(.)m 240 fnt84 0 8021(3.32.)m 591(The)s
+1046(cr)s 4(oss)k 1614(r)s 4(efer)k 4(ence)k
+2616(symbols)s 3494(&&)s 3941(and)s 4382(&&&)s 240 fnt82
+480 7544(The)m 941(cross)s 1516(reference)s 2493(symbol)s 220 fnt35
+3286 7541(&&)m 240 fnt82 3668 7544(tak)m 2(es)k 4241(the)s
+4623(name)s 5230(of)s 5534(a)s 5734(symbol)s 6527(\(not)s
+7006(an)s 7322(object\))s 8068(for)s 8439(its)s 8749(left)s
+0 7256(parameter)m 9(,)k 1068(and)s 1489(an)s 1788(object)s
+2449(whose)s 3134(v)s 6(alue)k 3718(must)s 4260(be)s
+4559(a)s 4741(simple)s 5451(w)s 2(ord,)k 6064(or)s
+6340(se)s 6(v)k 3(eral)k 7079(simple)s 7788(w)s 2(ords,)k
+8495(for)s 8850(its)s 0 6968(right)m 519(parameter)s 13(.)k
+1633(The)s 2069(result)s 2668(is)s 2887(a)s 3061(cross)s
+3612(reference,)s 4615(which)s 5265(may)s 5740(be)s 6030(thought)s
+6831(of)s 7111(as)s 7369(an)s 7661(arro)s 6(w)k
+8275(pointing)s 0 6680(from)m 524(the)s 872(cross)s 1414(reference)s
+2357(symbol)s 3117(to)s 3356(the)s 3704(be)s 3(ginning)k
+4712(of)s 4983(an)s 5266(in)s 9(v)k 4(ocation)k
+6320(of)s 6591(the)s 6939(named)s 7635(symbol.)s 480 6306(The)m
+894(in)s 9(v)k 4(ocation)k 1934(pointed)s 2696(to,)s
+2975(kno)s 6(wn)k 3665(as)s 3901(the)s 240 fnt83
+4235 6308(tar)m 8(g)k 2(et)k 240 fnt82 4846 6306(of)m
+5103(the)s 5437(cross)s 5965(reference,)s 6945(is)s 7141(generally)s
+8070(one)s 8458(whose)s 220 fnt35 0 6015(@T)m 26(ag)k
+240 fnt82 643 6018(parameter)m 1677(has)s 2067(v)s 6(alue)k
+2655(equal)s 3248(to)s 3507(the)s 3875(right)s 4406(parameter)s
+5440(of)s 5731(the)s 6099(cross)s 6661(reference)s 7624(symbol.)s
+8513(Three)s 0 5730(special)m 759(tags,)s 220 fnt35 1292 5727(preceding)m
+240 fnt82 2243 5730(,)m 220 fnt35 2391 5727(f)m 6(ollo)k 3(wing)k
+240 fnt82 3221 5730(,)m 3369(and)s 220 fnt35 3814 5727(f)m 6(oll_or_prec)k
+240 fnt82 4948 5730(,)m 5097(point)s 5690(respecti)s 6(v)k 3(ely)k
+6930(to)s 7210(the)s 7599(\207rst)s 8072(in)s 9(v)k 4(ocation)k
+0 5442(preceding)m 1006(the)s 1365(cross)s 1918(reference)s 2872(in)s
+3126(the)s 3485(\207nal)s 3976(printed)s 4721(document,)s 5783(to)s
+6033(the)s 6392(\207rst)s 6834(in)s 9(v)k 4(ocation)k
+7899(follo)s 6(wing)k 8887(it,)s 0 5154(and)m 404(to)s
+643(the)s 991(\207rst)s 1422(follo)s 6(wing)k 2399(it)s
+2591(if)s 2808(such)s 3304(e)s 3(xists)k 3896(else)s
+4323(to)s 4562(the)s 4910(\207rst)s 5341(preceding)s 6337(it.)s
+480 4780(A)m 709(cross)s 1249(reference)s 2190(may)s 2654(be)s
+2935(used)s 3430(in)s 3671(four)s 4127(w)s 2(ays:)k
+4782(where)s 5420(an)s 5701(object)s 6343(is)s 6552(e)s 3(xpected,)k
+7504(in)s 7745(which)s 8385(case)s 8850(its)s 0 4492(v)m 6(alue)k
+576(is)s 795(a)s 970(cop)s 2(y)k 1497(of)s
+1777(the)s 2134(tar)s 4(get;)k 2794(with)s 3285(the)s
+220 fnt35 3642 4489(@Open)m 240 fnt82 4457 4492(and)m 220 fnt35
+4870 4489(@Use)m 240 fnt82 5544 4492(symbols;)m 6463(with)s 6954(the)s
+220 fnt35 7311 4489(@T)m 26(agged)k 240 fnt82 8309 4492(symbol;)m
+0 4204(and)m 414(in)s 667(the)s 220 fnt35 1025 4201(into)m
+240 fnt82 1441 4204(clause)m 2105(or)s 220 fnt35 2374 4201(@T)m 26(arget)k
+240 fnt82 3271 4204(symbol)m 4041(of)s 4323(a)s 4499(g)s 1(alle)k 3(y)k
+5143(de\207nition,)s 6177(in)s 6430(which)s 7083(case)s 7560(the)s
+7918(v)s 6(alue)k 8496(of)s 8778(the)s 0 3916(tag)m
+345(must)s 870(be)s 220 fnt35 1152 3913(preceding)m 240 fnt82
+2103 3916(,)m 220 fnt35 2210 3913(f)m 6(ollo)k 3(wing)k
+240 fnt82 3040 3916(,)m 3147(or)s 220 fnt35 3406 3913(f)m 6(oll_or_prec)k
+240 fnt82 4540 3916(.)m 480 3542(W)m 9(ithin)k 1233(an)s
+220 fnt35 1557 3539(into)m 240 fnt82 2004 3542(clause)m 2698(or)s
+220 fnt35 2999 3539(@T)m 26(arget)k 240 fnt82 3927 3542(symbol,)m
+4780(the)s 5169(alternati)s 6(v)k 3(e)k 6265(form)s
+220 fnt35 6830 3539(&&&)m 240 fnt82 7365 3542(is)m 7616(acceptable)s
+8722(and)s 0 3254(indicates)m 900(a)s 1066(forcing)s 1809(g)s 1(alle)k 3(y)k
+2443(\(Section)s 3296(2.7\).)s 480 2880(Except)m 1203(within)s 1870(an)s
+220 fnt35 2151 2877(into)m 240 fnt82 2556 2880(clause)m 3208(or)s
+220 fnt35 3465 2877(@T)m 26(arget)k 240 fnt82 4351 2880(symbol,)m
+5162(the)s 5508(symbol)s 6267(referred)s 7078(to)s 7315(must)s
+7839(ha)s 4(v)k 3(e)k 8339(a)s 220 fnt35
+8503 2877(@T)m 26(ag)k 240 fnt82 0 2592(parameter)m 13(.)k
+1100(This)s 1570(is)s 1775(so)s 2035(e)s 6(v)k 3(en)k
+2530(if)s 2741(the)s 3084(right)s 3589(parameter)s 4597(of)s
+4863(the)s 5205(cross)s 5742(reference)s 6679(is)s 220 fnt35
+6884 2589(preceding)m 240 fnt82 7835 2592(,)m 220 fnt35 7936 2589(f)m 6(ollo)k 3(wing)k
+240 fnt82 8766 2592(,)m 8867(or)s 220 fnt35 0 2301(f)m 6(oll_or_prec)k
+240 fnt82 1134 2304(.)m 240 fnt84 0 1515(3.33.)m 591(@T)s 22(agged)k
+240 fnt82 480 1038(The)m 220 fnt35 924 1035(@T)m 26(agged)k
+240 fnt82 1929 1038(symbol)m 2705(tak)s 2(es)k 3261(a)s
+3444(cross)s 4002(reference)s 4961(for)s 5315(its)s 5607(left)s
+6001(parameter)s 7031(and)s 7451(an)s 7750(object,)s 8458(whose)s
+0 750(v)m 6(alue)k 565(must)s 1087(be)s 1366(a)s
+1528(juxtaposition)s 2831(of)s 3099(simple)s 3788(w)s 2(ords,)k
+4475(or)s 4731(se)s 6(v)k 3(eral)k 5450(w)s 2(ords,)k
+6136(or)s 6392(an)s 6672(empty)s 7320(object,)s 8008(for)s
+8343(its)s 8615(right)s 0 462(parameter)m 13(.)k 1104(It)s
+1307(has)s 1675(the)s 2021(ef)s 6(fect)k 2615(of)s
+2885(attaching)s 3812(its)s 4086(right)s 4595(parameter)s 5607(as)s
+5856(an)s 6137(additional)s 7146(tag)s 7489(to)s 7726(the)s
+8072(in)s 9(v)k 4(ocation)k 0 174(denoted)m 819(by)s
+1117(its)s 1397(left)s 1778(parameter)s 9(,)k 2834(unless)s
+3487(the)s 3839(right)s 4353(parameter)s 5371(is)s 5585(empty)s 15(,)k
+6279(in)s 6526(which)s 7172(case)s 220 fnt35 7643 171(@T)m 26(agged)k
+240 fnt82 8636 174(does)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 60 66
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(60)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt82 0 13205(nothing.)m
+896(The)s 1324(result)s 1914(of)s 220 fnt35 2185 13202(@T)m 26(agged)k
+240 fnt82 3174 13205(is)m 3384(al)s 2(w)k 2(ays)k
+220 fnt35 4095 13202(@Null)m 240 fnt82 4680 13205(,)m 4787(which)s
+5429(mak)s 2(es)k 6089(it)s 6281(ef)s 6(fecti)k 6(v)k 3(ely)k
+7340(in)s 9(visible.)k 240 fnt84 0 12412(3.34.)m 591(@Open and @Use)s
+240 fnt82 480 11935(The)m 220 fnt35 904 11932(@Open)m 240 fnt82
+1706 11935(symbol)m 2462(tak)s 2(es)k 2998(a)s 3159(cross)s
+3697(reference)s 4636(or)s 4891(symbol)s 5647(in)s 9(v)k 4(ocation)k
+6696(for)s 7030(its)s 7302(left)s 7675(parameter)s 9(,)k
+8722(and)s 0 11647(an)m 269(arbitrary)s 1130(object,)s 1807(which)s
+2435(must)s 2946(be)s 3214(enclosed)s 4095(in)s 4324(braces,)s
+5027(for)s 5351(its)s 5613(right)s 6110(parameter)s 13(.)k
+7201(The)s 7615(right)s 8112(parameter)s 0 11359(may)m 462(refer)s
+966(to)s 1201(the)s 1544(e)s 3(xported)k 2432(parameters)s
+3525(and)s 3925(nested)s 4589(de\207nitions)s 5646(of)s 5912(the)s
+6256(in)s 9(v)k 4(ocation)k 7305(denoted)s 8117(by)s
+8406(the)s 8749(left)s 0 11071(parameter)m 9(,)k 1050(and)s
+1452(its)s 1725(v)s 6(alue)k 2291(is)s 2499(the)s
+220 fnt35 2844 11068(@Open)m 240 fnt82 3648 11071(symbol')m 13(s)k
+4560(result.)s 5252(The)s 5678(tar)s 4(get)k 6274(of)s
+6543(the)s 6889(cross)s 7428(reference)s 8369(may)s 8832(lie)s
+0 10783(in)m 234(an)s 507(e)s 3(xternal)k 1318(database)s
+2187(\(Section)s 3031(3.35\).)s 3684(An)s 3(y)k 4138(symbol)s
+4888(a)s 4(v)k 6(ailable)k 5787(outside)s 6524(the)s
+220 fnt35 6862 10780(@Open)m 240 fnt82 7658 10783(which)m 8290(happens)s
+0 10495(to)m 239(ha)s 4(v)k 3(e)k 741(the)s
+1089(same)s 1637(name)s 2212(as)s 2462(one)s 2865(of)s
+3137(the)s 3485(symbols)s 4335(made)s 4910(a)s 4(v)k 6(ailable)k
+5818(by)s 6113(the)s 220 fnt35 6462 10492(@Open)m 240 fnt82
+7268 10495(will)m 7695(be)s 7978(una)s 4(v)k 6(ailable)k
+0 10207(within)m 668(the)s 220 fnt35 1016 10204(@Open)m 240 fnt82
+1762 10207(.)m 538 9833(The)m 220 fnt35 963 9830(@Use)m 240 fnt82
+1625 9833(symbol)m 2382(is)s 2589(an)s 220 fnt35 2869 9830(@Open)m
+240 fnt82 3672 9833(symbol)m 4429(in)s 4669(a)s 4832(dif)s 6(ferent)k
+5704(form.)s 6329(It)s 6531(may)s 6994(only)s 7471(appear)s
+8165(among)s 8867(or)s 0 9545(after)m 502(the)s 857(de\207nitions)s
+1925(in)s 2175(Lout')s 13(s)k 2844(input,)s 3450(and)s
+3861(it)s 4060(is)s 4277(equi)s 6(v)k 6(alent)k
+5328(to)s 5574(enclosing)s 6551(the)s 6906(remainder)s 7941(of)s
+8219(the)s 8574(input)s 0 9257(in)m 243(an)s 220 fnt35
+526 9254(@Open)m 240 fnt82 1332 9257(symbol.)m 2201(F)s 3(or)k
+2590(e)s 3(xample,)k 240 fnt83 480 8754(de\207nitions)m 220 fnt35
+480 8461(@Use)m 1145({)s 240 fnt83 1269 8466(x)m 220 fnt35
+1435 8461(})m 480 8173(@Use)m 1145({)s 240 fnt83 1269 8178(y)m
+220 fnt35 1431 8173(})m 240 fnt83 480 7890(r)m 8(est)k
+894(of)s 1175(input)s 240 fnt82 0 7389(is)m 210(equi)s 6(v)k 6(alent)k
+1254(to)s 240 fnt83 480 6886(de\207nitions)m 480 6598(x)m 220 fnt35
+646 6593(@Open)m 480 6305({)m 240 fnt83 960 6310(y)m 220 fnt35
+1122 6305(@Open)m 960 6017({)m 240 fnt83 1084 6022(r)m 8(est)k
+1498(of)s 1779(input)s 220 fnt35 960 5729(})m 480 5441(})m
+240 fnt82 0 4947(The)m 220 fnt35 424 4944(@Use)m 240 fnt82
+1085 4947(symbol)m 1841(allo)s 6(ws)k 2506(a)s 2668(set)s
+2989(of)s 3256(standard)s 4120(packages)s 5044(to)s 5279(be)s
+5557(opened)s 6303(without)s 7090(the)s 7434(incon)s 9(v)k 3(enience)k
+8855(of)s 0 4659(enclosing)m 974(the)s 1327(entire)s 1931(document)s
+2939(in)s 220 fnt35 3187 4656(@Open)m 240 fnt82 3998 4659(symbols.)m
+4964(Such)s 5505(enclosure)s 6482(could)s 7076(cause)s 7668(Basser)s
+8370(Lout)s 8887(to)s 0 4371(run)m 376(out)s 742(of)s
+1013(memory)s 15(.)k 240 fnt84 0 3578(3.35.)m 591(@Database and @SysDatabase)s
+240 fnt82 529 3101(The)m 220 fnt35 945 3098(@Database)m 240 fnt82
+2148 3101(symbol)m 2896(is)s 3095(used)s 3580(to)s 3808(declare)s
+4541(the)s 4877(e)s 3(xistence)k 5808(of)s 6067(a)s
+6222(\207le)s 6571(of)s 6831(symbol)s 7579(in)s 9(v)k 4(ocations)k
+8708(that)s 0 2813(Lout)m 512(may)s 978(refer)s 1487(to)s
+1726(when)s 2302(e)s 6(v)k 6(aluating)k 3339(cross)s
+3881(references.)s 5025(In)s 5281(Basser)s 5978(Lout,)s 6537(for)s
+6875(e)s 3(xample,)k 220 fnt35 480 2312(@Database @Months @W)m 6(eekDa)k 6(ys { standard })k
+240 fnt82 0 1814(means)m 690(that)s 1137(there)s 1698(is)s
+1937(a)s 2131(\207le)s 2521(called)s 220 fnt35 3177 1811(standard.ld)m
+240 fnt82 4339 1814(containing)m 5430(in)s 9(v)k 4(ocations)k
+6600(of)s 6899(the)s 7276(pre)s 6(viously)k 8363(de\207ned)s
+0 1526(symbols)m 220 fnt35 846 1523(@Months)m 240 fnt82 1838 1526(and)m
+220 fnt35 2238 1523(@W)m 6(eekDa)k 6(ys)k 240 fnt82
+3503 1526(.)m 3663(A)s 220 fnt35 3889 1523(@Database)m 240 fnt82
+5100 1526(symbol)m 5856(may)s 6318(appear)s 7011(an)s 3(ywhere)k
+7990(a)s 8152(de\207nition)s 0 1238(or)m 252(a)s 220 fnt35
+411 1235(@Use)m 240 fnt82 1069 1238(symbol)m 1822(may)s 2281(appear)s 13(.)k
+3062(Dif)s 6(ferent)k 3982(de\207nitions)s 5036(packages)s 5957(may)s
+6416(refer)s 6918(to)s 7150(a)s 7309(common)s 8196(database,)s
+0 950(pro)m 3(vided)k 935(the)s 1312(de\207nitions)s 2402(the)s 3(y)k
+2894(gi)s 6(v)k 3(e)k 3382(for)s 3749(its)s
+4054(symbols)s 4932(are)s 5308(compatible.)s 6563(An)s 6942(entry)s
+7516(is)s 7755(interpreted)s 8876(as)s 0 662(though)m 756(it)s
+981(appears)s 1795(at)s 2060(the)s 2441(point)s 3026(where)s
+3699(the)s 4080(cross)s 4655(reference)s 5631(that)s 6082(retrie)s 6(v)k 3(es)k
+6978(it)s 7203(does,)s 7782(which)s 8457(allo)s 6(ws)k
+0 374(symbols)m 866(lik)s 2(e)k 220 fnt35 1296 371(@I)m
+240 fnt82 1639 374(for)m 220 fnt35 1995 371(Slope @F)m 6(ont)k
+240 fnt82 3346 374(to)m 3602(be)s 3902(used)s 4417(in)s
+4678(databases.)s 5776(The)s 6221(database)s 7118(\207le)s 7497(may)s
+7981(not)s 8365(contain)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 61 67
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.35.)m 574(@Database and @SysDatabase)s 240 fnt84 8839 13840(61)m
+220 fnt35 0 13202(@Database)m 240 fnt82 1214 13205(or)m 220 fnt35
+1473 13202(@Include)m 240 fnt82 2455 13205(symbols,)m 3360(and)s 3764(each)s
+4259(in)s 9(v)k 4(ocation)k 5313(within)s 5981(it)s
+6173(must)s 6698(be)s 6980(enclosed)s 7875(in)s 8118(braces.)s
+480 12831(Basser)m 1198(Lout)s 1732(constructs)s 2773(an)s 240 fnt83
+3078 12833(inde)m 4(x)k 3674(\207le)s 240 fnt82 3959 12831(,)m
+4087(which)s 4751(in)s 5016(this)s 5433(e)s 3(xample)k
+6318(is)s 6550(called)s 220 fnt35 7199 12828(standard.li)m 240 fnt82
+8196 12831(,)m 8325(the)s 8695(\207rst)s 0 12543(time)m 481(it)s
+675(e)s 6(v)k 3(er)k 1139(encounters)s 2227(the)s
+2577(database,)s 3509(as)s 3761(an)s 4045(aid)s 4397(to)s
+4638(searching)s 5608(it.)s 5906(If)s 6138(the)s 6488(database)s
+7368(\207le)s 7731(is)s 7943(changed,)s 8850(its)s 0 12255(inde)m 3(x)k
+586(\207le)s 950(must)s 1477(be)s 1762(deleted)s 2512(by)s
+2809(the)s 3159(user)s 3620(so)s 3888(that)s 4309(Basser)s
+5008(Lout)s 5523(kno)s 6(ws)k 6196(to)s 6438(reconstruct)s
+7561(it.)s 7860(There)s 8475(is)s 8688(also)s 0 11967(an)m
+300(installation)s 1435(option)s 2121(which)s 2780(allo)s 6(ws)k
+3466(this)s 3879(deletion)s 4723(to)s 4979(be)s 5278(done)s
+5817(automatically)s 7188(on)s 7502(suitable)s 8318(systems)s 0 11679(\(including)m
+1036(Unix\).)s 480 11305(Basser)m 1210(Lout)s 1756(searches)s 2649(for)s
+3021(databases)s 4021(in)s 4298(the)s 4679(current)s 5449(directory)s
+6398(\207rst,)s 6910(then)s 7412(in)s 7689(a)s 7888(sequence)s
+8855(of)s 0 11017(standard)m 868(places.)s 1629(T)s 19(o)k
+1929(search)s 2596(the)s 2944(standard)s 3812(places)s 4460(only)s 15(,)k
+4978(use)s 220 fnt35 5353 11014(@SysDatabase)m 240 fnt82 6873 11017(.)m
+240 fnt84 0 10224(3.36.)m 591(@Graphic)s 240 fnt82 556 9747(Lout)m
+1084(does)s 1590(not)s 1972(pro)s 3(vide)k 2772(the)s
+3136(v)s 6(ast)k 3592(repertoire)s 4591(of)s 4878(graphical)s
+5838(objects)s 6582(\(lines,)s 7235(circles,)s 7980(box)s 3(es,)k
+8660(etc.\))s 0 9459(required)m 846(by)s 1132(diagrams.)s 2163(Instead,)s
+2952(it)s 3135(pro)s 3(vides)k 3999(an)s 4274(escape)s
+4958(route)s 5497(to)s 5727(some)s 6280(other)s 6823(language)s
+7734(that)s 8144(does)s 8625(ha)s 4(v)k 3(e)k
+0 9171(these)m 547(features,)s 1409(via)s 1761(its)s 220 fnt35
+2037 9168(@Gr)m 2(aphic)k 240 fnt82 3081 9171(symbol:)m 220 fnt35
+480 8673({ 0 0 mo)m 3(v)k 5(eto)k 480 8385(  0 ysiz)m 3(e lineto)k
+480 8097(  xsiz)m 3(e ysiz)k 3(e lineto)k 480 7809(  xsiz)m 3(e 0 lineto)k
+480 7521(  closepath)m 480 7233(  strok)m 4(e)k 480 6945(})m 480 6657(@Gr)m 2(aphic)k
+480 6369({ //0.2c)m 480 6081(  ||0.2c hello)m 8(, w)k 2(or)k -3(ld ||0.2c)k
+480 5793(  //0.2c)m 480 5505(})m 240 fnt82 0 5011(The)m 428(result)s
+1018(of)s 1289(the)s 1637(abo)s 3(v)k 3(e)k
+2259(in)s 9(v)k 4(ocation)k 3313(of)s 3584(the)s
+3932(symbol)s 220 fnt35 4692 5008(@Gr)m 2(aphic)k 240 fnt82
+5736 5011(is)m 1365 422 0 422 240 288 60 480 4249 LoutGr2
+0 0 moveto
+0 ysize lineto
+xsize ysize lineto
+xsize 0 lineto
+closepath
+stroke
+grestore
+113 146(hello,)m 698(w)s 2(orld)k 
+grestore
+480 3533(The)m
+909(right)s 1421(parameter)s 2437(al)s 2(w)k 2(ays)k
+3149(appears)s 3931(as)s 4183(part)s 4615(of)s 4888(the)s
+5237(result,)s 5875(and)s 6281(indeed)s 6978(the)s 7327(result)s
+7919(is)s 8130(al)s 2(w)k 2(ays)k 8843(an)s
+0 3245(object)m 651(whose)s 1327(size)s 1761(is)s 1979(identical)s
+2863(to)s 3110(the)s 3465(size)s 3900(of)s 4178(the)s
+4534(right)s 5052(parameter)s 6074(with)s 220 fnt35 6563 3242(@OneCol)m
+240 fnt82 7583 3245(and)m 220 fnt35 7995 3242(@OneRo)m 3(w)k
+240 fnt82 0 2957(applied)m 762(to)s 1001(it.)s 1297(From)s
+1875(no)s 6(w)k 2336(on)s 2633(we)s 2968(refer)s
+3477(to)s 3716(this)s 4112(part)s 4543(of)s 4814(the)s
+5162(result)s 5752(as)s 6002(the)s 240 fnt83 6350 2959(base)m
+240 fnt82 6782 2957(.)m 480 2583(The)m 898(left)s 1264(parameter)s
+2267(is)s 2466(implementation-dependent:)s 5184(that)s 5591(is,)s 5847(its)s
+6112(meaning)s 6978(is)s 7177(not)s 7532(de\207ned)s 8284(by)s
+8567(Lout,)s 0 2295(and)m 421(dif)s 6(ferent)k 1313(implementations)s
+2975(could)s 3582(require)s 4332(dif)s 6(ferent)k 5224(v)s 6(alues)k
+5898(for)s 6253(it.)s 6567(The)s 7012(follo)s 6(wing)k
+8007(description)s 0 2007(applies)m 752(to)s 1016(Basser)s 1737(Lout,)s
+2321(which)s 2988(uses)s 3475(the)s 3848(PostScript)s 4914(page)s
+5447(description)s 6591(language)s 7535([1)s 7709(].)s 7977(Similar)s
+8764(b)s 4(ut)k 0 1719(more)m 559(restricted)s 1517(possibilities)s
+2722(e)s 3(xist)k 3243(with)s 3737(the)s 4098(PDF)s
+4608(back)s 5134(end)s 5550(\(see)s 6003(a)s 6182(separate)s
+7033(document)s 8050(distrib)s 4(uted)k 0 1431(with)m 482(Lout\);)s
+1125(to)s 1364(include)s 2124(both,)s 2657(use)s 3032(the)s
+220 fnt35 3380 1428(@Bac)m 4(kEnd)k 240 fnt82 4525 1431(symbol)m
+5285(lik)s 2(e)k 5697(this:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 62 68
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(62)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 220 fnt35 480 13207({ @Bac)m 4(kEnd @Case {)k
+480 12919(      P)m 11(ostScr)k -3(ipt @Y)k 4(ield)k 480 12631(      {)m
+480 12343(          ...)m 480 12055(      })m 480 11767(      PDF @Y)m 4(ield)k 480 11479(      {)m
+480 11191(          ...)m 480 10903(      })m 480 10615(  })m 480 10327(  @Gr)m 2(aphic)k
+480 10039(  {)m 480 9751(      ...)m 480 9463(  })m 480 9175(})m 240 fnt82
+0 8681(Returning)m 1039(to)s 1307(PostScript,)s 2425(the)s 2802(left)s
+3208(parameter)s 4251(refers)s 4874(to)s 5142(a)s 5337(coordinate)s
+6431(system)s 7184(whose)s 7881(origin)s 8538(is)s 8778(the)s
+0 8393(bottom)m 773(left-hand)s 1728(corner)s 2433(of)s 2740(the)s
+3123(base.)s 3747(It)s 3987(may)s 4489(use)s 4899(the)s
+5282(symbols)s 220 fnt35 6166 8390(xsiz)m 3(e)k 240 fnt82
+6751 8393(and)m 220 fnt35 7190 8390(ysiz)m 3(e)k 240 fnt82
+7774 8393(to)m 8048(denote)s 8778(the)s 0 8105(horizontal)m 1031(and)s
+1442(v)s 3(ertical)k 2216(size)s 2650(of)s 2928(the)s
+3283(base;)s 3827(similarly)s 15(,)k 220 fnt35 4774 8102(xmar)m -3(k)k
+240 fnt82 5442 8105(and)m 220 fnt35 5853 8102(ymar)m -3(k)k
+240 fnt82 6521 8105(denote)m 7222(the)s 7577(positions)s 8499(of)s
+8778(the)s 0 7817(base')m 13(s)k 635(column)s 1410(and)s
+1814(ro)s 6(w)k 2234(marks:)s gsave
+480 5454 translate
+180 fnt82 3570 2072 0 1994 180 288 45 LoutGraphic
+gsave
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+180 fnt83 107 1955(ysize)m
+0 1388(ymark)m 180 fnt82 364 253(0)m 2551 1701 850 1134 180 288 45 676 293 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+2551 1701 850 1134 180 288 45 0 0 LoutGr2
+/lfiglightgrey [ lfigbox ] gsave lfigpaintpath grestore
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+2551 1701 850 1134 180 288 45 0 0 LoutGr2
+
+0.015 cm setlinewidth lfiground setlinecap
+0.15 cm /lfigdashed [ -0.3 cm ymark
+xsize ymark 0.3 cm 0 lfigpadd []
+xmark -0.3 cm
+xmark ysize 0 0.3 cm lfigpadd ] lfigdopath
+pop pop
+grestore
+
+grestore
+
+grestore
+end end restore
+grestore
+676 14(0)m 180 fnt83
+1526 15(xmark)m 3227(xsize)s end end restore
+grestore
+0 5003(In)m 265(addition)s 1115(to)s
+1363(these)s 1920(four)s 2387(symbols)s 3245(and)s 3658(0,)s
+3895(lengths)s 4646(may)s 5121(be)s 5412(denoted)s 6238(in)s
+6490(centimetres,)s 7706(inches,)s 8434(points,)s 0 4715(ems,)m 492(f)s -13(')k 13(s,)k
+850(v')s 13(s)k 1180(and)s 1584(s')s 13(s)k
+1887(using)s 2459(the)s 2807(notation)s 240 fnt83 480 4179(l)m
+220 fnt35 666 4174(cm)m 240 fnt82 1197 4177(instead)m 1932(of)s
+2203(Lout')s 13(s)k 240 fnt83 3045 4179(l)m 240 fnt82
+3111 4177(c)m 240 fnt83 480 3891(l)m 220 fnt35 666 3886(in)m
+240 fnt82 1197 3889(instead)m 1932(of)s 2203(Lout')s 13(s)k
+240 fnt83 3045 3891(l)m 240 fnt82 3111 3889(i)m 240 fnt83
+480 3603(l)m 220 fnt35 666 3598(pt)m 240 fnt82 1197 3601(instead)m
+1932(of)s 2203(Lout')s 13(s)k 240 fnt83 3045 3603(l)m
+240 fnt82 3111 3601(p)m 240 fnt83 480 3315(l)m 220 fnt35
+666 3310(em)m 240 fnt82 1197 3313(instead)m 1932(of)s 2203(Lout')s 13(s)k
+240 fnt83 3045 3315(l)m 240 fnt82 3111 3313(m)m 240 fnt83
+480 3027(l)m 220 fnt35 666 3022(ft)m 240 fnt82 1197 3025(instead)m
+1932(of)s 2203(Lout')s 13(s)k 240 fnt83 3045 3027(l)m
+240 fnt82 3111 3025(f)m 240 fnt83 480 2739(l)m 220 fnt35
+666 2734(vs)m 240 fnt82 1197 2737(instead)m 1932(of)s 2203(Lout')s 13(s)k
+240 fnt83 3045 2739(l)m 240 fnt82 3111 2737(v)m 240 fnt83
+480 2451(l)m 220 fnt35 666 2446(sp)m 240 fnt82 1197 2449(instead)m
+1932(of)s 2203(Lout')s 13(s)k 240 fnt83 3045 2451(l)m
+240 fnt82 3111 2449(s)m 0 1908(Note)m 521(that)s 939(there)s
+1472(must)s 1997(be)s 2279(a)s 2445(space)s 3032(between)s
+3886(the)s 4234(number)s 5025(and)s 5429(its)s 5705(unit,)s
+6184(unlik)s 2(e)k 6836(Lout)s 7348(proper)s 13(.)k
+480 1534(A)m 732(point)s 1306(within)s 1996(the)s 2366(base)s
+2869(\(and,)s 3423(with)s 3927(care,)s 4453(a)s 4642(point)s
+5216(outside)s 5985(it\))s 6267(may)s 6755(be)s 7059(denoted)s
+7897(by)s 8213(a)s 8401(pair)s 8855(of)s 0 1246(lengths.)m
+855(F)s 3(or)k 1244(e)s 3(xample,)k 220 fnt35
+480 749(xmar)m -3(k  ymar)k -3(k)k 240 fnt82 0 251(is)m
+210(the)s 558(point)s 1110(where)s 1750(the)s 2098(marks)s
+2733(cross,)s 3331(and)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 63 69
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.36.)m 574(@Gr)s 3(aphic)k 240 fnt84
+8833 13840(63)m 220 fnt35 480 13214(0   2 cm)m 240 fnt82 0 12759(is)m
+195(a)s 346(point)s 883(on)s 1164(the)s 1497(left)s
+1859(edge,)s 2402(tw)s 2(o)k 2797(centimetres)s 3933(abo)s 3(v)k 3(e)k
+4539(the)s 4872(bottom)s 5595(left-hand)s 6499(corner)s 13(.)k
+7245(These)s 7857(tw)s 2(o)k 8251(numbers)s 0 12471(are)m
+347(called)s 975(the)s 240 fnt83 1323 12473(x)m 1489(coor)s 8(dinate)k
+240 fnt82 2571 12471(and)m 2975(the)s 240 fnt83 3323 12473(y)m
+3485(coor)s 8(dinate)k 240 fnt82 4567 12471(of)m 4838(the)s
+5186(point.)s 480 12097(The)m 906(\207rst)s 1335(step)s 1770(in)s
+2011(specifying)s 3057(a)s 3221(graphic)s 3988(object)s 4630(is)s
+4837(to)s 5074(de\207ne)s 5712(a)s 240 fnt83 5876 12099(path)m
+240 fnt82 6297 12097(.)m 6458(A)s 6686(path)s 7152(can)s
+7539(be)s 7818(thought)s 8608(of)s 8876(as)s 0 11809(the)m
+349(track)s 888(of)s 1161(a)s 1328(pen)s 1733(mo)s 3(ving)k
+2516(o)s 3(v)k 3(er)k 2996(the)s 3346(page.)s
+3963(The)s 4393(pen)s 4797(may)s 5265(be)s 5548(up)s
+5842(\(not)s 6289(dra)s 3(wing\))k 7199(or)s 7460(do)s 6(wn)k
+8045(\(dra)s 3(wing)k 8960(a)s 0 11521(line)m 414(or)s
+673(curv)s 3(e\))k 1329(as)s 1579(it)s 1771(mo)s 3(v)k 3(es.)k
+2554(The)s 2982(entire)s 3581(path)s 4050(is)s 4260(a)s
+4426(sequence)s 5359(of)s 5630(the)s 5978(follo)s 6(wing)k
+6955(items:)s 240 fnt83 1847 11149(x)m 2013(y)s 220 fnt35
+2175 11144(mo)m 3(v)k 5(eto)k 240 fnt82 3120 11147(Lift)m
+3537(the)s 3885(pen)s 4288(and)s 4692(mo)s 3(v)k 3(e)k
+5274(it)s 5466(to)s 5705(the)s 6053(indicated)s 6987(point.)s
+240 fnt83 2036 10790(x)m 2202(y)s 220 fnt35 2364 10785(lineto)m
+240 fnt82 3120 10788(Put)m 3557(the)s 3963(pen)s 4424(do)s 6(wn)k
+5066(and)s 5528(dra)s 3(w)k 6115(a)s 6339(straight)s
+7173(line)s 7645(to)s 7942(the)s 8348(indicat)s 8998(-)s
+3120 10500(ed)m 3404(point.)s 240 fnt83 702 10141(x)m 868(y)s
+1030(r)s 1188(angle1)s 1879(angle2)s 220 fnt35 2580 10136(arc)m
+240 fnt82 3120 10139(Put)m 3502(the)s 3853(pen)s 4259(do)s 6(wn)k
+4846(and)s 5253(dra)s 3(w)k 5785(a)s 5954(circular)s
+6745(arc)s 7092(whose)s 7763(centre)s 8405(has)s 8779(co)s
+8998(-)s 3120 9851(ordinates)m 240 fnt83 4058 9853(x)m 240 fnt82
+4235 9851(and)m 240 fnt83 4650 9853(y)m 240 fnt82 4823 9851(and)m
+5238(whose)s 5917(radius)s 6563(is)s 240 fnt83 6784 9853(r)m
+240 fnt82 6882 9851(.)m 7057(The)s 7496(arc)s 7851(be)s 3(gins)k
+8535(at)s 8778(the)s 3120 9563(angle)m 240 fnt83 3727 9565(angle1)m
+240 fnt82 4451 9563(measuring)m 5533(counterclockwise)s 7295(from)s 7852(the)s
+8233(point)s 8818(di)s 8998(-)s 3120 9275(rectly)m 3714(to)s
+3949(the)s 4294(right)s 4801(of)s 5069(the)s 5413(centre,)s
+6100(and)s 6500(proceeds)s 7397(counterclockwise)s 3120 8987(to)m 240 fnt83
+3361 8989(angle2)m 240 fnt82 4002 8987(.)m 4168(If)s 4401(the)s
+4751(arc)s 5098(is)s 5310(not)s 5679(the)s 6029(\207rst)s
+6462(thing)s 7010(on)s 7309(the)s 7660(path,)s 8181(a)s
+8350(straight)s 3120 8699(line)m 3549(will)s 3990(be)s 4287(dra)s 3(wn)k
+4954(connecting)s 6072(the)s 6435(current)s 7186(point)s 7753(to)s
+8007(the)s 8370(start)s 8855(of)s 3120 8411(the)m 3468(arc.)s
+240 fnt83 589 8102(x)m 755(y)s 917(r)s 1075(angle1)s
+1766(angle2)s 220 fnt35 2467 8097(arcn)m 240 fnt82 3120 8100(As)m
+3437(for)s 3775(arc,)s 4173(b)s 4(ut)k 4535(the)s
+4883(arc)s 5227(goes)s 5717(clockwise)s 6729(from)s 240 fnt83
+7253 8102(angle1)m 240 fnt82 7944 8100(to)m 240 fnt83 8183 8102(angle2)m
+240 fnt82 8824 8100(.)m 220 fnt35 1955 7738(closepath)m 240 fnt82
+3120 7741(Dra)m 3(w)k 3702(a)s 3868(straight)s 4644(line)s
+5058(back)s 5571(to)s 5810(the)s 6158(point)s 6710(most)s
+7235(recently)s 8058(mo)s 3(v)k 3(ed)k 8762(to.)s
+0 7367(The)m 428(\207rst)s 860(item)s 1344(should)s 2042(al)s 2(w)k 2(ays)k
+2753(be)s 3036(a)s 220 fnt35 3202 7364(mo)m 3(v)k 5(eto)k
+240 fnt82 3907 7367(,)m 220 fnt35 4015 7364(arc)m 240 fnt82
+4315 7367(,)m 4422(or)s 220 fnt35 4682 7364(arcn)m 240 fnt82
+5095 7367(.)m 5259(It)s 5465(should)s 6162(be)s 6445(clear)s
+6968(from)s 7493(this)s 7889(that)s 8308(the)s 8657(path)s
+0 7079(gi)m 6(v)k 3(en)k 580(earlier:)s 220 fnt35
+480 6585(0 0 mo)m 3(v)k 5(eto)k 480 6297(0 ysiz)m 3(e lineto)k
+480 6009(xsiz)m 3(e ysiz)k 3(e lineto)k 480 5721(xsiz)m 3(e 0 lineto)k
+480 5433(closepath)m 240 fnt82 0 4937(traces)m 607(around)s 1330(the)s
+1678(boundary)s 2637(of)s 2908(the)s 3256(base)s 3737(with)s
+4219(the)s 4567(pen)s 4970(do)s 6(wn.)k 480 4563(Once)m
+1039(a)s 1203(path)s 1670(is)s 1877(set)s 2200(up,)s
+2545(we)s 2877(are)s 3222(ready)s 3805(to)s 240 fnt83
+4041 4565(paint)m 240 fnt82 4595 4563(it)m 4785(onto)s 5262(the)s
+5607(page.)s 6221(There)s 6832(are)s 7176(tw)s 2(o)k
+7584(choices:)s 8405(we)s 8737(can)s 0 4275(either)m 240 fnt83
+618 4277(str)m 10(ok)k 2(e)k 240 fnt82 1259 4275(it,)m
+1514(which)s 2172(means)s 2850(to)s 3105(display)s 3866(it)s
+4074(as)s 4340(described;)s 5383(or)s 5658(we)s 6009(can)s
+240 fnt83 6414 4277(\207ll)m 240 fnt82 6742 4275(it,)m 6997(which)s
+7655(means)s 8333(to)s 8588(paint)s 0 3987(e)m 6(v)k 3(erything)k
+1067(inside)s 1694(it)s 1886(gre)s 3(y)k 2362(or)s
+2621(black.)s 3303(F)s 3(or)k 3692(stroking)s 4529(the)s
+4877(tw)s 2(o)k 5287(main)s 5822(options)s 6578(are)s
+240 fnt83 1581 3484(length)m 220 fnt35 2234 3479(setline)m 4(width)k
+240 fnt82 3600 3482(The)m 4028(pen)s 4431(will)s 4857(dra)s 3(w)k
+5386(lines)s 5888(of)s 6159(the)s 6507(gi)s 6(v)k 3(en)k
+7087(width.)s 220 fnt35 1553 2974([)m 240 fnt83 1668 2979(length)m
+220 fnt35 2321 2974(])m 2430(0)s 2605(setdash)s 240 fnt82
+3600 2977(The)m 4034(pen)s 4444(will)s 4876(dra)s 3(w)k
+5412(dashed)s 6142(lines)s 6650(when)s 7233(it)s 7432(is)s
+7648(do)s 6(wn,)k 8289(with)s 8778(the)s 3600 2689(dashes)m
+4289(each)s 4784(of)s 5055(the)s 5403(gi)s 6(v)k 3(en)k
+5983(length.)s 0 2186(These)m 627(options)s 1383(are)s 1730(follo)s 6(wed)k
+2632(by)s 2926(the)s 3274(w)s 2(ord)k 220 fnt35
+3822 2183(strok)m 4(e)k 240 fnt82 4408 2186(.)m 4572(So,)s
+4932(for)s 5270(e)s 3(xample,)k 220 fnt35 480 1688({ 0 0 mo)m 3(v)k 5(eto xsiz)k 3(e 0 lineto)k
+480 1400(  2 pt setline)m 4(width [ 5 pt ] 0 setdash strok)k 4(e)k 480 1112(})m 480 824(@Gr)m 2(aphic { 3i @Wide })k
+240 fnt82 0 328(has)m 370(result)s 4320 0 0 0 240 288 60 480 38 LoutGr2
+0 0 moveto xsize 0 lineto
+2 pt setlinewidth [ 5 pt ] 0 setdash stroke
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 64 70
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(64)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt82 480 12940(When)m
+1106(\207lling)s 1726(in)s 1965(the)s 2310(re)s 3(gion)k
+2971(enclosed)s 3862(by)s 4153(a)s 4315(path,)s 4830(the)s
+5175(main)s 5706(option)s 6371(is)s 220 fnt35 6578 12937(setg)m 2(r)k 2(a)k 6(y)k
+240 fnt82 7286 12940(,)m 7389(which)s 8027(determines)s 0 12652(the)m
+348(shade)s 949(of)s 1220(gre)s 3(y)k 1696(to)s
+1935(use,)s 2361(on)s 2658(a)s 2824(scale)s 3357(from)s
+3881(0)s 4056(\(black\))s 4781(to)s 5020(1)s 5175(\(white\).)s
+6028(So,)s 6388(for)s 6726(e)s 3(xample,)k 220 fnt35
+480 12154({ 0 0 mo)m 3(v)k 5(eto xsiz)k 3(e 0 lineto 0 ysiz)k 3(e lineto closepath)k
+480 11866(  0.8 setg)m 2(r)k 2(a)k 6(y \207ll)k 480 11578(})m
+480 11290(@Gr)m 2(aphic)k 480 11002({ 2c @Wide  2c @High })m 240 fnt82 0 10503(has)m
+370(result)s 1134 1134 0 1134 240 288 60 480 9079 LoutGr2
+0 0 moveto xsize 0 lineto 0 ysize lineto closepath
+0.8 setgray fill
+grestore
+
+grestore
+480 8363(There)m 1107(are)s 1468(man)s 3(y)k
+2066(other)s 2631(options.)s 3515(The)s 3957(v)s 6(alue)k
+4540(of)s 4825(the)s 5188(left)s 5579(parameter)s 6608(of)s
+220 fnt35 6893 8360(@Gr)m 2(aphic)k 240 fnt82 7952 8363(may)m
+8432(be)s 8729(an)s 3(y)k 0 8075(fragment)m 922(of)s
+1193(the)s 1541(PostScript)s 2583(page)s 3091(description)s 4210(language)s
+5130([1)s 5304(].)s 5547(Here)s 6067(are)s 6414(tw)s 2(o)k
+6824(other)s 7375(e)s 3(xamples:)k 220 fnt35 480 7578(xsiz)m 3(e)k
+1030(2)s 1203(div)s 240 fnt82 0 7124(denoting)m 891(a)s
+1057(length)s 1712(equal)s 2285(to)s 2524(half)s 2967(the)s
+3315(horizontal)s 4339(size)s 4766(of)s 5037(the)s 5385(base,)s
+5917(and)s 220 fnt35 480 6625(gsa)m 4(v)k 5(e)k
+1110(\207ll)s 1363(g)s 2(restore)k 2219(strok)s 4(e)k
+240 fnt82 0 6126(which)m 648(both)s 1138(\207lls)s 1554(and)s
+1965(strok)s 2(es)k 2698(the)s 3053(path.)s 3636(Since)s
+4230(Basser)s 4933(Lout)s 5452(does)s 5949(not)s 6322(check)s
+6948(that)s 7373(the)s 7728(left)s 8112(parameter)s 0 5838(is)m
+209(v)s 6(alid)k 737(PostScript,)s 1824(it)s 2014(is)s
+2222(possible)s 3061(to)s 3298(cause)s 3883(mysterious)s 4981(errors)s
+5586(in)s 5828(the)s 6174(printing)s 6982(de)s 6(vice,)k
+7705(resulting)s 8592(in)s 8833(no)s 0 5550(output,)m 708(if)s
+914(an)s 1186(incorrect)s 2083(v)s 6(alue)k 2640(is)s
+2839(gi)s 6(v)k 3(en.)k 3515(It)s 3709(is)s
+3908(a)s 4063(good)s 4590(idea)s 5037(to)s 5265(encapsulate)s
+6425(graphics)s 7275(objects)s 7992(in)s 8224(carefully)s 0 5262(tested)m
+635(de\207nitions,)s 1772(lik)s 2(e)k 2205(those)s 2786(of)s
+3078(the)s 3446(Diag)s 3985(\207gure)s 4619(dra)s 3(wing)k
+5473(package)s 6334([4)s 6527(,)s 6654(Chapter)s 7492(9],)s
+7818(to)s 8078(be)s 8380(sure)s 8855(of)s 0 4974(a)m 4(v)k 4(oiding)k
+883(these)s 1430(errors.)s 480 4600(PostScript)m 1543(e)s 3(xperts)k
+2302(may)s 2789(\207nd)s 3241(the)s 3610(follo)s 6(wing)k
+4608(information)s 5814(helpful)s 6567(when)s 7164(designing)s 8170(adv)s 6(anced)k
+0 4312(graphics)m 861(features.)s 1780(The)s 2208(left)s 2585(parameter)s
+3599(of)s 220 fnt35 3870 4309(@Gr)m 2(aphic)k 240 fnt82
+4914 4312(may)m 5380(ha)s 4(v)k 3(e)k 5881(tw)s 2(o)k
+6291(parts,)s 6862(separated)s 7822(by)s 220 fnt35 8116 4309(//)m
+240 fnt82 8241 4312(:)m 220 fnt35 480 3804({)m 240 fnt83
+604 3809(\207r)m 2(st)k 1038(part)s 220 fnt35 1501 3804(//)m
+240 fnt83 1686 3809(second)m 2417(part)s 220 fnt35 2880 3804(} @Gr)m 2(aphic)k
+240 fnt83 4058 3809(object)m 240 fnt82 0 3308(If)m 230(there)s
+763(is)s 973(no)s 220 fnt35 1266 3305(//)m 240 fnt82
+1391 3308(,)m 1498(the)s 1846(second)s 2569(part)s 3000(is)s
+3210(tak)s 2(en)k 3783(to)s 4022(be)s 4304(empty)s 15(.)k
+5051(The)s 5479(PostScript)s 6521(output)s 7193(has)s 7563(the)s
+7911(form)s 220 fnt35 480 2851(gsa)m 4(v)k 5(e)k
+240 fnt83 480 2568(x)m 646(y)s 220 fnt35 808 2563(tr)m 2(anslate)k
+240 fnt83 480 2280(Code)m 1039(whic)s 3(h)k 1663(de\207nes)s
+220 fnt35 2383 2275(xsiz)m 3(e)k 240 fnt83 2872 2280(,)m
+220 fnt35 2965 2275(ysiz)m 3(e)k 240 fnt83 3454 2280(,)m
+220 fnt35 3547 2275(xmar)m -3(k)k 240 fnt83 4148 2280(,)m
+220 fnt35 4241 2275(ymar)m -3(k)k 240 fnt83 4842 2280(,)m
+220 fnt35 4935 2275(ft)m 240 fnt83 5053 2280(,)m 220 fnt35
+5146 2275(vs)m 240 fnt83 5359 2280(,)m 5452(and)s 220 fnt35
+5878 2275(sp)m 480 1987(gsa)m 4(v)k 5(e)k 240 fnt83
+480 1704(\207r)m 2(st)k 914(part)s 220 fnt35 480 1411(g)m 2(restore)k
+240 fnt83 480 1128(Code)m 1039(whic)s 3(h)k 1663(r)s 8(ender)k 2(s)k
+2439(the)s 2784(right)s 3313(par)s 3(ameter)k 4372(in)s
+4612(tr)s 3(anslated)k 5645(coor)s 8(dinates)k 480 840(second)m
+1211(part)s 220 fnt35 480 547(g)m 2(restore)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 65 71
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Symbol
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.36.)m 574(@Gr)s 3(aphic)k 240 fnt84
+8833 13840(65)m 240 fnt82 0 13205(where)m 240 fnt83 628 13207(x)m
+240 fnt78 733 13199(,)m 240 fnt83 802 13207(y)m 240 fnt82
+952 13205(is)m 1149(the)s 1485(position)s 2300(of)s 2558(the)s
+2894(lo)s 6(wer)k 3479(left)s 3843(corner)s 4501(of)s
+4759(the)s 5095(base.)s 5671(Ha)s 4(ving)k 6412(tw)s 2(o)k
+6810(parts)s 7312(permits)s 8066(brack)s 2(eting)k 0 12917(operations,)m
+1112(lik)s 2(e)k 220 fnt35 1533 12914(sa)m 4(v)k 5(e)k
+240 fnt82 2049 12917(and)m 220 fnt35 2462 12914(restore)m 240 fnt82
+3206 12917(or)m 220 fnt35 3474 12914(begin)m 240 fnt82 4065 12917(and)m
+220 fnt35 4478 12914(end)m 240 fnt82 4832 12917(,)m 4949(to)s
+5197(enclose)s 5979(an)s 6271(object.)s 7028(See)s 7438(the)s
+7795(source)s 8484(\207le)s 8855(of)s 0 12629(the)m 348(Diag)s
+866(package)s 1706(for)s 2044(e)s 3(xamples.)k 240 fnt84
+0 11836(3.37.)m 591(@PlainGraphic)s 240 fnt82 567 11359(The)m 220 fnt35
+1023 11356(@PlainGr)m 2(aphic)k 240 fnt82 2580 11359(symbol)m 3368(is)s
+3606(a)s 4(v)k 3(ery)k 4211(rudimentary)s 5461(analogue)s
+6408(for)s 6774(plain)s 7337(te)s 3(xt)k 7779(output)s
+8479(of)s 8778(the)s 220 fnt35 0 11068(@Gr)m 2(aphic)k
+240 fnt82 1037 11071(symbol)m 1789(for)s 2119(PostScript)s 3153(output.)s
+3921(Its)s 4202(result)s 4784(is)s 4986(its)s 5254(right)s
+5757(parameter)s 6763(printed)s 7490(on)s 7779(a)s 7937(background)s
+0 10783(created)m 747(by)s 1041(repeated)s 1908(printings)s 2809(of)s
+3080(its)s 3356(left)s 3733(parameter)s 9(,)k 4785(which)s
+5427(must)s 5952(be)s 6234(a)s 6400(simple)s 7093(w)s 2(ord.)k
+7747(F)s 3(or)k 8136(e)s 3(xample,)k 480 10278("." @PlainGraphic 5s @W)m 9(ide)k
+0 9775(w)m 2(ould)k 676(produce)s 1525(\207v)s 3(e)k
+1959(dots.)s 220 fnt35 2544 9772(@PlainGr)m 2(aphic)k 240 fnt82
+4096 9775(is)m 4328(used)s 4847(in)s 5112(the)s 220 fnt35
+5482 9772(tb)m 4(l)k 240 fnt82 5777 9775(table-dra)m 3(wing)k
+7176(package)s 8038(to)s 8299(produce)s 0 9487(plain-te)m 3(xt)k
+972(rules.)s 240 fnt84 0 8694(3.38.)m 591(@IncludeGraphic)s 2491(and)s
+2932(@SysIncludeGraphic)s 240 fnt82 540 8217(These)m 1167(symbols)s 2016(instruct)s
+2792(Lout)s 3304(to)s 3543(incorporate)s 4687(a)s 4853(separately)s
+5875(created)s 6622(illustration:)s 220 fnt35 480 7716(@IncludeGr)m 2(aphic  "m)k 3(ypor)k -8(tr)k 2(ait.eps")k
+240 fnt82 0 7218(The)m 457(parameter)s 1500(is)s 1739(implementation-dependent;)s
+4443(in)s 4715(Basser)s 5441(Lout)s 5982(it)s 6203(is)s
+6442(an)s 6754(object)s 7427(whose)s 8124(v)s 6(alue)k
+8721(is)s 8960(a)s 0 6930(simple)m 705(w)s 2(ord)k
+1265(denoting)s 2168(the)s 2528(name)s 3114(of)s 3397(a)s
+3575(\207le.)s 4056(This)s 4544(\207le)s 4917(should)s 5626(ideally)s
+6342(be)s 6636(a)s 6814(PostScript)s 7868(EPS)s 8338(V)s 26(ersion)k
+0 6642(3.0)m 345(\207le)s 696([1)s 870(],)s 1045(since)s
+1582(then)s 2040(Lout)s 2542(will)s 2957(k)s 2(eep)k
+3450(careful)s 4156(track)s 4684(of)s 4944(what)s 5459(resources)s
+6401(are)s 6738(required)s 7581(for)s 7909(printing)s 8708(that)s
+0 6354(\207le.)m 473(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+1437(an)s 3(y)k 1838(PostScript)s 2885(\207le)s 3250(containing)s
+4317(the)s 220 fnt35 4669 6351(%%BoundingBo)m 6(x:)k 240 fnt82
+6464 6354(comment)m 7418(and)s 7826(not)s 8197(requiring)s 0 6066(unusual)m
+800(resources)s 1753(is)s 1963(lik)s 2(ely)k 2559(to)s
+2798(w)s 2(ork.)k 480 5692(The)m 924(result)s 1530(of)s
+220 fnt35 1817 5689(@IncludeGr)m 2(aphic)k 240 fnt82 3584 5692(is)m
+3811(an)s 4110(ordinary)s 4990(Lout)s 5518(object)s 6179(with)s
+6677(marks)s 7328(through)s 8146(its)s 8439(centre.)s 0 5404(It)m
+202(may)s 665(be)s 944(rotated,)s 1711(scaled,)s 2412(and)s
+2813(generally)s 3753(treated)s 4456(lik)s 2(e)k 4865(an)s 3(y)k
+5259(other)s 5807(object.)s 6552(Basser)s 7246(Lout)s 7755(determines)s
+8850(its)s 0 5116(size)m 434(by)s 735(consulting)s 1792(the)s
+2147(bounding)s 3113(box)s 3536(information)s 4728(in)s 4978(the)s
+5333(\207le.)s 5809(If)s 6047(this)s 6450(cannot)s 7155(be)s
+7444(found,)s 8117(a)s 8291(w)s 2(arning)k 0 4828(message)m
+866(is)s 1076(printed)s 1811(and)s 2215(the)s 2563(result)s
+3153(object)s 3797(has)s 4167(zero)s 4631(size.)s 220 fnt35
+480 4451(@IncludeGr)m 2(aphic)k 240 fnt82 2228 4454(searches)m 3085(the)s
+3429(same)s 3973(directories)s 5027(that)s 220 fnt35 5442 4451(@Include)m
+240 fnt82 6421 4454(does)m 6907(\(Section)s 7757(3.40\).)s 220 fnt35
+8416 4451(@Sys)m 240 fnt82 8998 4454(-)m 220 fnt35 0 4163(IncludeGr)m 2(aphic)k
+240 fnt82 1562 4166(is)m 1806(the)s 2188(same)s 2769(as)s
+220 fnt35 3053 4163(@IncludeGr)m 2(aphic)k 240 fnt82 4744 4166(,)m
+4885(e)s 3(xcept)k 5600(that)s 6052(it)s 6278(searches)s
+7172(only)s 7686(the)s 8068(directories)s 0 3878(searched)m 894(by)s
+220 fnt35 1188 3875(@SysInclude)m 240 fnt82 2476 3878(.)m 480 3504(If)m
+720(the)s 1079(\207le)s 1450(name)s 2035(ends)s 2536(in)s
+2789(an)s 3(y)k 3197(of)s 220 fnt35 3478 3501(.gz)m
+240 fnt82 3765 3504(,)m 220 fnt35 3883 3501(-gz)m 240 fnt82
+4182 3504(,)m 220 fnt35 4300 3501(.z)m 240 fnt82 4465 3504(,)m
+220 fnt35 4582 3501(-z)m 240 fnt82 4759 3504(,)m 220 fnt35
+4877 3501(_z)m 240 fnt82 5103 3504(,)m 5220(or)s 220 fnt35
+5490 3501(.Z)m 240 fnt82 5680 3504(,)m 5798(the)s 6156(\207le)s
+6528(will)s 6964(\207rst)s 7406(be)s 7699(uncompressed)s 0 3216(using)m
+565(the)s 220 fnt35 906 3213(gunzip)m 240 fnt82 1597 3216(command)m
+2592(into)s 3010(a)s 3169(temporary)s 4198(\207le)s 4552(called)s
+220 fnt35 5173 3213(lout.eps)m 240 fnt82 5987 3216(in)m 6223(the)s
+6564(current)s 7293(directory)s 15(.)k 8297(This)s 8765(\207le)s
+0 2928(is)m 210(remo)s 3(v)k 3(ed)k 1099(immediately)s
+2347(after)s 2843(it)s 3035(is)s 3245(copied)s 3941(into)s
+4366(the)s 4714(output)s 5386(\207le.)s 240 fnt84 0 2135(3.39.)m
+591(@Pr)s 4(ependGraphic and @SysPr)k 4(ependGraphic)k 240 fnt82 582 1658(These)m
+1252(symbols,)s 2200(which)s 2885(may)s 3394(appear)s 4134(an)s 3(ywhere)k
+5160(that)s 5621(a)s 5830(de\207nition)s 6847(or)s 220 fnt35
+7149 1655(@Use)m 240 fnt82 7857 1658(symbol)m 8660(may)s 0 1370(appear)m 9(,)k
+738(tell)s 1101(Lout)s 1617(to)s 1860(include)s 2624(the)s
+2976(contents)s 3828(of)s 4103(a)s 4273(\207le)s 4637(in)s
+4884(the)s 5236(preamble)s 6185(of)s 6460(its)s 6740(output.)s
+7520(F)s 3(or)k 7913(Basser)s 8614(Lout)s 0 1082(this)m
+418(means)s 1102(that)s 1542(the)s 1912(\207le)s 2295(must)s
+2843(contain)s 3626(PostScript)s 4690(\(and)s 5195(ideally)s 5921(it)s
+6136(w)s 2(ould)k 6813(be)s 3(gin)k 7421(and)s
+7847(end)s 8273(with)s 8778(the)s 220 fnt35 0 791(%%BeginResource)m
+240 fnt82 1941 794(and)m 220 fnt35 2345 791(%%EndResource)m 240 fnt82
+4116 794(comments)m 5150(of)s 5421(DSC)s 5939(3.0\).)s 6482(F)s 3(or)k
+6871(e)s 3(xample,)k 220 fnt35 480 293(@SysPrependGr)m 2(aphic { diagf)k 6(.lpg })k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 66 72
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(66)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt82 0 13205(appears)m
+818(at)s 1088(the)s 1474(start)s 1981(of)s 2290(the)s
+2676(Diag)s 3231(package;)s 4165(the)s 4551(\207le)s 220 fnt35
+4949 13202(diagf)m 6(.lpg)k 240 fnt82 5857 13205(contains)m 6743(a)s
+6946(number)s 7775(of)s 8084(PostScript)s 0 12917(de\207nitions)m 1048(used)s
+1532(by)s 1812(Diag)s 2317(for)s 2642(dra)s 3(wing)k
+3462(diagrams.)s 4489(It)s 4680(sa)s 4(v)k 3(es)k
+5229(a)s 5382(lot)s 5680(of)s 5938(space)s 6511(to)s
+6737(include)s 7484(them)s 8008(just)s 8400(once)s 8894(at)s
+0 12629(the)m 334(start)s 789(lik)s 2(e)k 1186(this,)s
+1624(rather)s 2225(than)s 2679(with)s 3146(e)s 6(v)k 3(ery)k
+3708(diagram.)s 220 fnt35 4640 12626(@PrependGr)m 2(aphic)k 240 fnt82
+6498 12629(and)m 220 fnt35 6887 12626(@SysPrependGr)m 2(aphic)k 240 fnt82
+0 12341(search)m 667(for)s 1005(the)s 1353(\207le)s 1714(in)s
+1957(the)s 2305(same)s 2852(places)s 3500(as)s 220 fnt35
+3750 12338(@Include)m 240 fnt82 4732 12341(and)m 220 fnt35 5136 12338(@SysInclude)m
+240 fnt82 6484 12341(respecti)m 6(v)k 3(ely)k 15(.)k
+240 fnt84 0 11548(3.40.)m 591(@Include and @SysInclude)s 240 fnt82 562 11071(These)m
+1212(symbols)s 2083(instruct)s 2882(Lout)s 3417(to)s 3678(temporarily)s
+4869(switch)s 5572(to)s 5834(reading)s 6627(another)s 7426(\207le,)s
+7861(whose)s 8552(name)s 0 10783(appears)m 781(in)s 1024(braces)s
+1685(follo)s 6(wing)k 2662(the)s 3010(symbol.)s 3879(F)s 3(or)k
+4268(e)s 3(xample,)k 220 fnt35 480 10282(@Include { "/usr/lout/f)m 6(ontdefs" })k
+240 fnt82 0 9788(will)m 434(cause)s 1030(the)s 1386(contents)s
+2243(of)s 2522(\207le)s 2892(/usr/lout/fontdefs)s 4596(to)s 4844(be)s
+5134(read)s 5612(at)s 5852(the)s 6209(point)s 6769(it)s
+6970(occurs.)s 7766(After)s 8338(that)s 8765(\207le)s 0 9500(is)m
+214(read,)s 736(the)s 1089(current)s 1829(\207le)s 2194(is)s
+2409(resumed.)s 3387(The)s 3819(included)s 4706(\207le)s 5071(may)s
+5541(contain)s 6307(arbitrary)s 7186(Lout)s 7702(te)s 3(xt,)k
+8169(including)s 0 9212(other)m 220 fnt35 566 9209(@Include)m 240 fnt82
+1564 9212(commands.)m 2780(The)s 3224(\207le)s 3600(is)s 3826(searched)s
+4735(for)s 5089(\207rst)s 5535(in)s 5794(the)s 6157(current)s
+6909(directory)s 15(,)k 7878(then)s 8363(in)s 8621(a)s
+8803(se)s 8998(-)s 0 8924(quence)m 732(of)s 1001(standard)s
+1866(places)s 2512(which)s 3151(are)s 3496(not)s 3859(necessarily)s
+4972(the)s 5318(same)s 5862(places)s 6508(that)s 6923(databases)s
+7888(are)s 8232(searched)s 0 8636(for)m 13(.)k 220 fnt35
+429 8633(@SysInclude)m 240 fnt82 1777 8636(searches)m 2637(the)s 2985(standard)s
+3853(places)s 4501(only)s 15(.)k 240 fnt84 0 7843(3.41.)m
+591(@BackEnd)s 1814(and)s 2255(the)s 2629(PlainT)s 22(ext)k
+3663(and)s 4104(PDF)s 4623(back)s 5172(ends)s 240 fnt82
+547 7411(The)m 220 fnt35 983 7408(@Bac)m 4(kEnd)k 240 fnt82
+2136 7411(symbol,)m 2955(which)s 3605(tak)s 2(es)k 4153(no)s
+4454(parameters,)s 5615(has)s 5993(for)s 6339(its)s 6623(result)s
+7220(a)s 7394(string)s 7999(naming)s 8778(the)s 0 7123(back)m
+523(end)s 938(currently)s 1865(in)s 2119(use.)s 2613(Three)s
+3237(back)s 3761(ends)s 4262(are)s 4620(a)s 4(v)k 6(ailable,)k
+5590(PostScript,)s 6690(PDF)s 7198(and)s 7613(PlainT)s 16(e)k 3(xt.)k
+8698(The)s 0 6835(symbol)m 760(is)s 970(generally)s 1913(used)s
+2410(lik)s 2(e)k 2822(this:)s 220 fnt35 480 6334(@Bac)m 4(kEnd @Case {)k
+480 6046(    PlainT)m 26(e)k 6(xt @Y)k 4(ield { ...)k 13( })k
+480 5758(    P)m 11(ostScr)k -3(ipt @Y)k 4(ield { ...)k 13( })k
+480 5470(    PDF @Y)m 4(ield { ...)k 13( })k 480 5182(})m 240 fnt82
+0 4688(to)m 255(obtain)s 926(dif)s 6(ferent)k 1817(objects)s
+2561(depending)s 3628(on)s 3941(the)s 4305(back)s 4834(end.)s
+5360(No)s 220 fnt35 5722 4685(else)m 240 fnt82 6192 4688(is)m
+6418(required)s 7288(since)s 7851(these)s 8414(are)s 8778(the)s
+0 4400(only)m 480(possible)s 1320(v)s 6(alues.)k 480 4026(When)m
+1101(a)s 220 fnt35 1259 4023(@Case)m 240 fnt82 2037 4026(symbol)m
+2789(has)s 220 fnt35 3151 4023(@Bac)m 4(kEnd)k 240 fnt82
+4287 4026(for)m 4617(its)s 4885(left)s 5253(parameter)s 6259(and)s
+6655(the)s 6994(left)s 7363(parameter)s 8369(of)s 8631(each)s
+220 fnt35 0 3735(@Y)m 4(ield)k 240 fnt82 768 3738(symbol)m
+1544(within)s 2228(it)s 2435(consists)s 3259(of)s 3546(a)s
+3728(sequence)s 4676(of)s 4963(one)s 5381(or)s 5656(more)s
+6218(literal)s 6844(w)s 2(ords)k 7494(\(including)s 220 fnt35
+8546 3735(else)m 240 fnt82 8940 3738(\),)m 0 3450(Lout)m 531(will)s
+976(optimize)s 1888(by)s 2201(e)s 6(v)k 6(aluating)k
+3258(the)s 220 fnt35 3625 3447(@Case)m 240 fnt82 4432 3450(symbol)m
+5211(at)s 5463(the)s 5830(time)s 6330(it)s 6541(is)s
+6771(read.)s 7365(This)s 7861(optimization)s 0 3162(ensures)m 789(that)s
+1228(there)s 1782(is)s 2013(only)s 2514(a)s 2701(small)s
+3294(once-only)s 4326(performance)s 5610(penalty)s 6389(for)s 6748(multiple)s
+7621(back)s 8155(ends,)s 8722(and)s 0 2874(it)m 206(permits)s
+987(these)s 220 fnt35 1548 2871(@Case)m 240 fnt82 2350 2874(symbols)m
+3213(\(b)s 4(ut)k 3668(no)s 3976(other)s 4541(symbols\))s
+5481(to)s 5734(appear)s 6446(within)s 7128(the)s 7490(object)s
+8149(follo)s 6(wing)k 220 fnt35 0 2583(@Include)m 240 fnt82
+982 2586(and)m 220 fnt35 1386 2583(@PrependGr)m 2(aphic)k 240 fnt82
+3259 2586(symbols.)m 480 2212(The)m 918(PlainT)s 16(e)k 3(xt)k
+1899(back)s 2423(end)s 2837(dif)s 6(fers)k 3515(from)s
+4050(the)s 4409(PostScript)s 5461(one)s 5874(in)s 6128(tw)s 2(o)k
+6548(main)s 7094(respects.)s 8038(First,)s 8593(there)s 0 1924(is)m
+226(ef)s 6(fecti)k 6(v)k 3(ely)k 1302(just)s
+1724(one)s 2143(font:)s 2711(although)s 3622(all)s 3932(the)s
+4297(font)s 4759(commands)s 5864(w)s 2(ork)k 6431(e)s 3(xactly)k
+7189(as)s 7456(usual,)s 8085(the)s 3(y)k 8565(don')s 4(t)k
+0 1636(actually)m 817(change)s 1558(an)s 3(ything.)k 2565(Each)s
+3107(character)s 4049(in)s 4299(this)s 4702(font)s 5155(is)s
+5372(tak)s 2(en)k 5953(to)s 6199(be)s 6488(one)s
+6898(tenth)s 7440(of)s 7719(one)s 8128(inch)s 8605(wide)s
+0 1348(and)m 404(20)s 699(points)s 1335(high.)s 1925(Second,)s
+2737(the)s 3085(output)s 3757(is)s 3967(an)s 4250(ordinary)s
+5114(te)s 3(xt)k 5529(\207le,)s 5941(not)s 6307(a)s
+6473(PostScript)s 7515(\207le.)s 480 974(Clearly)m 15(,)k 1306(with)s
+1820(ordinary)s 2716(te)s 3(xt)k 3162(output)s 3866(the)s
+4246(possibility)s 5327(of)s 5630(adv)s 6(anced)k 6618(graphics)s
+7510(features)s 8348(such)s 8876(as)s 0 686(rotation)m 829(and)s
+1262(scaling)s 2022(is)s 2261(curtailed.)s 3290(Ne)s 6(v)k 3(ertheless,)k
+4651(all)s 4974(symbols)s 5852(ha)s 4(v)k 3(e)k
+6383(well-de\207ned)s 7665(\(possibly)s 8626(null\))s 0 398(ef)m 6(fects)k
+706(in)s 976(the)s 1351(PlainT)s 16(e)k 3(xt)k
+2348(back)s 2888(end,)s 3368(so)s 3661(there)s 4221(is)s
+4457(no)s 4777(additional)s 5815(danger)s 6553(of)s 6851(crashing)s
+7741(the)s 8116(system)s 8867(or)s 0 110(obtaining)m 957(grossly)s
+1702(unreasonable)s 3020(output)s 3692(by)s 3986(a)s 4152(change)s
+4886(to)s 5125(PlainT)s 16(e)k 3(xt.)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 67 73
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(3.41.)m 574(@Bac)s 4(kEnd)k 1720(and)s
+2146(the)s 2491(PlainT)s 22(e)k 4(xt)k 3458(and)s
+3884(PDF)s 4417(bac)s 4(k)k 4929(ends)s 240 fnt84
+8831 13840(67)m 240 fnt82 480 13249(The)m 905(PlainT)s 16(e)k 3(xt)k
+1872(back)s 2382(end)s 2783(is)s 2990(obtained)s 3869(by)s
+4160(the)s 220 fnt35 4505 13246(-p)m 240 fnt82 4749 13249(option)m
+5415(to)s 5651(Basser)s 6345(Lout.)s 6958(The)s 7383(character)s
+8314(size)s 8737(can)s 0 12961(be)m 282(changed)s 1138(by)s
+1432(adding)s 2137(tw)s 2(o)k 2547(lengths)s 3289(to)s
+3528(the)s 220 fnt35 3876 12958(-p)m 240 fnt82 4123 12961(option,)m
+4842(lik)s 2(e)k 5254(this:)s 220 fnt35 480 12464(lout -p0.1i12p ...)m
+240 fnt82 0 11968(which)m 650(in)s 9(v)k 4(ok)k 2(es)k
+1439(the)s 1795(PlainT)s 16(e)k 3(xt)k 2773(back)s
+3294(end)s 3706(with)s 4196(each)s 4699(character)s 5641(being)s
+6234(0.1)s 6577(inches)s 7247(wide)s 7776(and)s 8188(12)s
+8490(points)s 0 11680(high.)m 595(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+1561(e)s 3(xperience)k 2655(suggests)s 3523(that)s 3947(the)s
+4301(best)s 4752(approach)s 5691(is)s 5907(to)s 6152(de\207ne)s
+6799(all)s 7098(horizontal)s 8128(lengths)s 8876(as)s 0 11392(multiples)m
+943(of)s 1218(the)s 220 fnt35 1569 11389(s)m 240 fnt82
+1736 11392(unit)m 2171(\(the)s 2602(width)s 3208(of)s 3482(a)s
+3652(space,)s 4293(hence)s 4911(the)s 5262(width)s 5868(of)s
+6143(all)s 6439(characters\))s 7538(and)s 7945(to)s 8188(de\207ne)s
+8833(all)s 0 11104(v)m 3(ertical)k 777(lengths)s 1530(as)s
+1791(multiples)s 2742(of)s 3023(the)s 220 fnt35 3382 11101(f)m
+240 fnt82 3511 11104(unit)m 3954(\(the)s 4391(font)s 4847(size,)s
+5336(equal)s 5920(to)s 6169(the)s 6528(height)s 7197(of)s
+7479(e)s 6(v)k 3(ery)k 8066(character\),)s 0 10816(and)m
+404(not)s 770(to)s 1009(change)s 1743(the)s 2091(character)s
+3025(size)s 3452(in)s 3695(the)s 4043(command)s 5045(line.)s
+480 10442(There)m 1098(is)s 1314(a)s 220 fnt35 1486 10439(-P)m
+240 fnt82 1762 10442(option)m 2437(which)s 3085(is)s 3301(identical)s
+4184(with)s 4671(the)s 220 fnt35 5025 10439(-p)m 240 fnt82
+5278 10442(option)m 5953(e)s 3(xcept)k 6640(that)s 7064(it)s
+7262(inserts)s 7942(a)s 8114(form-feed)s 0 10154(character)m 934(between)s
+1788(each)s 2283(tw)s 2(o)k 2693(components)s 3901(of)s
+4172(the)s 4520(output,)s 5239(b)s 4(ut)k 5601(not)s
+5967(before)s 6633(the)s 6981(\207rst)s 7412(or)s 7671(after)s
+8167(the)s 8515(last.)s 480 9780(The)m 911(PDF)s 1412(back)s
+1928(end)s 2336(is)s 2549(obtained)s 3435(by)s 3732(typing)s
+220 fnt35 4401 9777(lout -Z)m 240 fnt82 5017 9780(.)m 5185(It)s
+5393(is)s 5607(similar)s 6332(to)s 6575(PostScript)s 7620(b)s 4(ut)k
+7986(much)s 8579(more)s 0 9492(limited)m 755(in)s 1019(functionality)s 15(.)k
+2411(Consult)s 3237(a)s 3425(separate)s 4284(document)s 5309(distrib)s 4(uted)k
+6407(with)s 6910(Lout)s 7444(for)s 7803(further)s 8534(infor)s
+8998(-)s 0 9204(mation.)m 240 fnt84 0 8461(3.42.)m 591(@V)s 24(erbatim and @RawV)k 24(erbatim)k
+240 fnt82 543 8029(These)m 1173(symbols)s 2026(instruct)s 2805(Lout)s
+3321(to)s 3563(read)s 4036(the)s 4387(follo)s 6(wing)k
+5367(te)s 3(xt)k 5786(\(enclosed)s 6763(in)s 7010(braces\))s
+7751(v)s 3(erbatim,)k 8708(that)s 0 7741(is,)m 266(turning)s
+1010(of)s 6(f)k 1354(all)s 1647(special)s 2365(character)s
+3299(meanings.)s 4380(F)s 3(or)k 4769(e)s 3(xample,)k
+220 fnt35 480 7240(@V)m 17(erbatim { "hello" })k 240 fnt82 0 6746(produces)m
+480 6243("hello")m 220 fnt35 0 5787(@V)m 17(erbatim)k 240 fnt82
+1178 5790(ignores)m 1983(all)s 2325(characters)s 3393(after)s 3938(the)s
+4336(opening)s 5210(brace)s 5833(up)s 6175(to)s 6464(b)s 4(ut)k
+6875(not)s 7291(including)s 8297(the)s 8695(\207rst)s 0 5502(non-white-space)m
+1654(character)s 13(.)k 220 fnt35 2697 5499(@Ra)m 4(wV)k 17(erbatim)k
+240 fnt82 4278 5502(dif)m 6(fers)k 4964(from)s 220 fnt35
+5506 5499(@V)m 17(erbatim)k 240 fnt82 6653 5502(only)m 7151(in)s
+7413(that)s 7849(it)s 8059(ignores)s 8833(all)s 0 5214(characters)m
+1018(after)s 1514(the)s 1862(opening)s 2687(brace)s 3261(up)s
+3554(to)s 3793(b)s 4(ut)k 4155(not)s 4521(including)s
+5479(the)s 5827(\207rst)s 6258(non-white-space)s 7894(character)s 9(,)k
+8867(or)s 0 4926(up)m 302(to)s 551(and)s 965(including)s
+1931(the)s 2289(\207rst)s 2730(ne)s 6(wline)k 3547(character)s 9(,)k
+4528(whiche)s 6(v)k 3(er)k 5585(comes)s 6257(\207rst.)s
+6802(This)s 7287(v)s 6(ariant)k 8014(is)s 8234(useful)s
+8883(in)s 0 4638(cases)m 555(such)s 1051(as)s 220 fnt35
+480 4187(@Ra)m 4(wV)k 17(erbatim {)k 480 3899(     v)m 5(ar x:)k 11( Real)k
+480 3611(begin)m 480 3323(})m 240 fnt82 0 2829(where)m 662(the)s
+1033(\207rst)s 1486(line)s 1923(of)s 2217(the)s 2587(v)s 3(erbatim)k
+3516(te)s 3(xt)k 3954(be)s 3(gins)k 4649(with)s
+5154(white)s 5763(space)s 6373(which)s 7038(w)s 2(ould)k
+7715(be)s 8020(ignored)s 8832(by)s 220 fnt35 0 2538(@V)m 17(erbatim)k
+240 fnt82 1069 2541(.)m 1232(Both)s 1754(symbols)s 2602(ignore)s
+3268(all)s 3560(white)s 4146(spaces)s 4820(at)s 5051(the)s
+5398(end)s 5801(of)s 6071(the)s 6418(v)s 3(erbatim)k
+7323(te)s 3(xt,)k 7784(preceding)s 8778(the)s 0 2253(closing)m
+744(brace.)s 240 fnt84 0 1460(3.43.)m 591(@Underline)s 240 fnt82
+533 1028(The)m 220 fnt35 953 1025(@Under)m -3(line)k 240 fnt82
+2160 1028(symbol)m 2912(underlines)s 3951(its)s 4219(right)s 4722(parameter)s 9(,)k
+5767(b)s 4(ut)k 6121(only)s 6593(if)s 6802(that)s
+7212(parameter)s 8218(is)s 8420(a)s 8578(w)s 2(ord)k
+0 740(or)m 259(a)s 425(paragraph:)s 220 fnt35 480 239(W)m 6(e @Under)k -3(line { really do } mean this)k 3(.)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 68 74
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(68)m 240 fnt83 6081 13843(Chapter)m 6931(3.)s
+7205(Pr)s 8(ede\207ned)k 8300(symbols)s 240 fnt82 0 13205(produces)m
+480 12702(W)m 19(e)k 849(really)s 849 1679 12678 12 ul
+1446(do)s 1739(mean)s
+2314(this.)s 0 12199(It)m 204(is)s 412(not)s 776(possible)s
+1614(to)s 1851(underline)s 2808(an)s 3089(arbitrary)s 3962(object)s
+4604(using)s 5174(this)s 5568(symbol;)s 6383(the)s 220 fnt35
+6729 12196(@Under)m -3(line)k 240 fnt82 7942 12199(symbol)m 8700(will)s
+0 11911(be)m 282(ignored)s 1071(if)s 1288(this)s 1684(is)s
+1894(attempted.)s 480 11537(It)m 731(is)s 987(v)s 3(ery)k
+1509(easy)s 2034(to)s 240 fnt83 2319 11539(de\207ne)m 240 fnt82
+2990 11537(a)m 3202(symbol)s 4008(which)s 4696(will)s 5168(underline)s
+6173(an)s 6502(arbitrary)s 7423(object,)s 8160(using)s 8778(the)s
+220 fnt35 0 11246(@Gr)m 2(aphic)k 240 fnt82 1045 11249(symbol.)m
+1915(This)s 2393(raises)s 2988(the)s 3337(question)s 4207(of)s
+4479(wh)s 1(y)k 220 fnt35 4946 11246(@Under)m -3(line)k
+240 fnt82 6163 11249(is)m 6374(needed)s 7111(at)s 7345(all.)s
+7748(The)s 8177(answer)s 8916(is)s 0 10961(that)m 220 fnt35
+418 10958(@Under)m -3(line)k 240 fnt82 1633 10961(has)m 2003(tw)s 2(o)k
+2413(properties)s 3419(that)s 3837(distinguish)s 4944(it)s 5136(from)s
+5660(symbols)s 6509(based)s 7112(on)s 220 fnt35 7409 10958(@Gr)m 2(aphic)k
+240 fnt82 8393 10961(.)m 480 10587(First,)m 1021(when)s 220 fnt35
+1594 10584(@Under)m -3(line)k 240 fnt82 2806 10587(both)m 3286(contains)s
+4130(a)s 4293(paragraph)s 5303(and)s 5704(is)s 5911(used)s
+6404(within)s 7069(a)s 7232(paragraph,)s 8292(as)s 8539(in)s
+8778(the)s 0 10299(e)m 3(xample)k 875(abo)s 3(v)k 3(e,)k
+1561(the)s 1921(inner)s 2485(and)s 2901(outer)s 3465(paragraphs)s
+4577(are)s 4937(mer)s 4(ged)k 5720(into)s 6158(one,)s
+6623(permitting)s 7684(the)s 8045(underlined)s 0 10011(te)m 3(xt)k
+412(to)s 647(break)s 1236(o)s 3(v)k 3(er)k
+1711(se)s 6(v)k 3(eral)k 2430(lines.)s 3041(This)s
+3513(is)s 3720(ho)s 6(w)k 4177(the)s 220 fnt35
+4522 10008(@F)m 6(ont)k 240 fnt82 5230 10011(symbol)m 5986(w)s 2(orks)k
+6617(too,)s 7026(b)s 4(ut)k 7385(symbols)s 8230(based)s
+8829(on)s 220 fnt35 0 9720(@Gr)m 2(aphic)k 240 fnt82
+1044 9723(do)m 1337(not)s 1703(permit)s 2386(this)s 2782(mer)s 4(ging.)k
+480 9349(Second,)m 1292(Adobe)s 1987(font)s 2432(\207les)s 2881(specify)s
+3625(the)s 3973(correct)s 4694(position)s 5522(and)s 5926(thickness)s
+6867(of)s 7138(underlining)s 8294(for)s 8631(each)s 0 9061(font,)m
+501(and)s 914(the)s 220 fnt35 1272 9058(@Under)m -3(line)k
+240 fnt82 2496 9061(symbol)m 3266(follo)s 6(ws)k 4037(these)s
+4593(speci\207cations.)s 6068(The)s 6505(font)s 6960(used)s 7466(is)s
+7685(the)s 8043(font)s 8497(of)s 8778(the)s 0 8773(\207rst)m
+431(object)s 1075(underlined,)s 2205(if)s 2422(it)s 2614(is)s
+2824(a)s 2990(simple)s 3683(w)s 2(ord,)k 4280(or)s
+4539(else)s 4966(the)s 5314(font)s 5759(of)s 6030(the)s
+6378(enclosing)s 7348(paragraph.)s 240 fnt84 0 7980(3.44.)m 591(@P)s 2(ageLabel)k
+240 fnt82 533 7503(The)m 220 fnt35 953 7500(@P)m 8(ageLabel)k
+240 fnt82 2255 7503(symbol)m 3007(associates)s 4005(a)s 4164(page)s
+4664(label)s 5176(in)s 5411(the)s 5751(PostScript)s 6786(output)s
+7450(\207le)s 7804(with)s 8278(the)s 8618(page)s 0 7215(within)m
+688(which)s 1350(\(or)s 1708(just)s 2133(before)s 2819(which\))s
+3552(the)s 3920(symbol)s 4700(occurs,)s 5451(so)s 5737(that)s
+6175(PostScript)s 7237(vie)s 6(wers)k 8045(are)s 8412(able)s
+8887(to)s 0 6927(inde)m 3(x)k 587(the)s 939(page)s
+1450(by)s 1748(this)s 2148(label.)s 2779(\(The)s 3290(label)s
+3813(is)s 4026(printed)s 4765(in)s 5011(the)s 220 fnt35
+5363 6924(%%P)m 8(age)k 240 fnt82 6313 6927(comment)m 7266(preceding)s
+8266(the)s 8618(page)s 0 6639(in)m 243(the)s 591(PostScript)s
+1633(output)s 2305(\207le.\))s 2858(F)s 3(or)k 3247(e)s 3(xample,)k
+220 fnt35 480 6138(@P)m 8(ageLabel iv)k 240 fnt82 0 5639(associates)m
+1018(the)s 1379(label)s 220 fnt35 1910 5636(iv)m 240 fnt82
+2140 5639(with)m 2634(the)s 2995(page.)s 3623(The)s 4064(label)s
+4595(may)s 5074(be)s 5368(an)s 5664(arbitrary)s 6551(object;)s
+7260(if)s 7489(its)s 7778(v)s 6(alue)k 8358(is)s
+8581(not)s 8960(a)s 0 5351(simple)m 693(w)s 2(ord,)k
+1290(it)s 1482(will)s 1908(be)s 2190(replaced)s 3057(by)s
+220 fnt35 3351 5348(?)m 240 fnt82 3459 5351(.)m 220 fnt35
+480 4974(@P)m 8(ageLabel)k 240 fnt82 1799 4977(is)m 2019(unrelated)s
+2977(to)s 3226(Lout')s 13(s)k 3899(cross)s 4451(referencing)s
+5602(mechanism;)s 6813(it)s 7016(is)s 7236(for)s 7585(communicating)s
+0 4689(a)m 176(label)s 706(to)s 956(the)s 1315(PostScript)s
+2368(output)s 3051(\207le,)s 3474(not)s 3851(to)s 4101(other)s
+4662(parts)s 5188(of)s 5470(Lout.)s 6097(The)s 6536(result)s
+7137(of)s 220 fnt35 7419 4686(@P)m 8(ageLabel)k 240 fnt82
+8739 4689(is)m 8960(a)s 0 4401(null)m 427(object.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 69 75
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+%%+ font Symbol
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+480 fnt84 0 12955(Chapter)m 1819(4.)s 2400(Examples)s 240 fnt82
+0 12004(This)m 503(chapter)s 1294(presents)s 2156(some)s 2744(e)s 3(xamples)k
+3723(tak)s 2(en)k 4324(from)s 4875(the)s 5251(v)s 6(arious)k
+6028(packages)s 6983(a)s 4(v)k 6(ailable)k 7919(with)s
+8429(Basser)s 0 11716(Lout.)m 661(The)s 1134(reader)s 1835(who)s
+2346(masters)s 3171(these)s 3763(e)s 3(xamples)k 4759(will)s
+5230(be)s 5557(well)s 6068(prepared)s 7007(to)s 7291(read)s
+7805(the)s 8198(packages)s 0 11428(themselv)m 3(es.)k 1223(The)s
+1650(e)s 3(xamples)k 2600(ha)s 4(v)k 3(e)k
+3100(not)s 3465(been)s 3973(simpli\207ed)s 4986(in)s 5229(an)s 3(y)k
+5625(w)s 2(ay)k 15(,)k 6113(since)s 6659(an)s
+6941(important)s 7929(part)s 8359(of)s 8629(their)s 0 11140(purpose)m
+814(is)s 1024(to)s 1263(sho)s 6(w)k 1817(Lout)s
+2329(in)s 2572(actual)s 3197(practice.)s 240 fnt84 0 10347(4.1.)m
+471(An)s 833(equation)s 1779(f)s 6(ormatting)k 2930(package)s
+240 fnt82 480 9870(In)m 751(this)s 1162(section)s 1911(we)s
+2261(describe)s 3128(the)s 3491(design)s 4189(and)s 4608(implementation)s
+6180(of)s 6466(the)s 6829(Eq)s 7168(equation)s 8065(formatting)s
+0 9582(package.)m 976(Equation)s 1925(formatting)s 3014(mak)s 2(es)k
+3702(a)s 3896(natural)s 4642(\207rst)s 5101(e)s 3(xample,)k
+6043(partly)s 6682(because)s 7523(its)s 7828(requirements)s 0 9294(ha)m 4(v)k 3(e)k
+514(strongly)s 1366(in\210uenced)s 2435(the)s 2797(design)s 3493(of)s
+3778(Lout,)s 4351(and)s 4769(partly)s 5394(because)s 6221(no)s
+6528(cross)s 7084(references)s 8129(or)s 8402(g)s 1(alle)k 3(ys)k
+0 9006(are)m 347(required.)s 480 8632(T)m 19(o)k 777(the)s
+1122(author')s 13(s)k 1939(kno)s 6(wledge,)k 3088(Eq)s
+3409(is)s 3615(the)s 3960(\207rst)s 4388(equation)s 5265(formatter)s
+6209(to)s 6445(be)s 6723(implemented)s 8026(as)s 8273(a)s
+8435(collec)s 8998(-)s 0 8344(tion)m 430(of)s 702(high-)s
+1196(le)s 6(v)k 3(el)k 1707(de\207nitions.)s 2883(This)s
+3360(approach)s 4295(has)s 4666(signi\207cant)s 5724(adv)s 6(antages:)k
+6948(the)s 7297(basics)s 7933(of)s 8206(language)s 0 8056(and)m
+426(layout)s 1106(are)s 1475(tri)s 6(vial,)k 2167(so)s
+2456(the)s 2826(implementor)s 4129(can)s 4540(concentrate)s 5720(on)s
+6039(\207ne-)s 6466(tuning;)s 7212(and)s 7638(the)s 8009(de\207nitions,)s
+0 7768(being)m 585(readily)s 1302(a)s 4(v)k 6(ailable,)k
+2261(can)s 2650(be)s 2932(impro)s 3(v)k 3(ed,)k
+3950(e)s 3(xtended,)k 4918(or)s 5177(e)s 6(v)k 3(en)k
+5677(replaced.)s 480 7394(As)m 808(described)s 1793(in)s 2048(the)s
+2407(User')s 13(s)k 3079(Guide)s 3732([4)s 3925(],)s
+4122(an)s 4416(equation)s 5309(is)s 5530(entered)s 6302(in)s
+6557(a)s 6734(format)s 7441(based)s 8056(on)s 8364(the)s
+8724(one)s 0 7106(introduced)m 1081(by)s 1375(the)s 1723(eqn)s
+2126(language)s 3046(of)s 3317(K)s 6(ernighan)k 4378(and)s
+4782(Cherry)s 5500([2)s 5693(]:)s 220 fnt35 480 6605(@Eq { { x sup 2  +  y sup 2 }  o)m 3(v)k 5(er  2 })k
+240 fnt82 0 6107(The)m 428(result)s 1018(is)s 168 fnt78
+586 5702(2)m 240 fnt83 480 5642(x)m 240 fnt78 738 5634(+)m
+168 fnt78 1041 5702(2)m 240 fnt83 939 5642(y)m 641 0 0 0 240 288 12 480 5544 LoutGr2
+0 0 moveto xsize 0 lineto 0.05 ft setlinewidth stroke
+grestore
+
+grestore
+240 fnt78
+743 5316(2)m 240 fnt82 0 4805(In)m 256(outline,)s 1027(the)s
+1375(de\207nition)s 2349(of)s 2620(the)s 220 fnt35 2968 4802(@Eq)m
+240 fnt82 3506 4805(symbol)m 4266(is)s 220 fnt35 480 4308(e)m 6(xpor)k -8(t  sup  o)k 3(v)k 5(er "+"  "2"  "<=")k
+480 4020(def @Eq)m 480 3732(   body @Body)m 480 3444({)m 480 3156(   def sup precedence 60 left x r)m -3(ight y { ...)k 13( })k
+480 2868(   def o)m 3(v)k 5(er precedence 54 left x r)k -3(ight y { ...)k 13( })k
+480 2580(   def "2" { Base @F)m 6(ont "2" })k 480 2292(   def "+" { {Symbol Base} @F)m 6(ont "+" })k 480 2004(   def "<=" { {Symbol Base} @F)m 6(ont "\\243" })k
+480 1716(   ...)m 480 1140(   Slope @F)m 6(ont 1.2f @Break 0c @Space @Body)k 480 852(})m 192 fnt84
+4439 2(69)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 70 76
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(70)m 240 fnt83 7017 13843(Chapter)m 7867(4.)s
+8141(Examples)s 240 fnt82 0 13205(A)m 259(body)s 822(parameter)s
+1865(is)s 2104(used)s 2630(to)s 2898(restrict)s 3649(the)s
+4026(visibility)s 4958(of)s 5258(the)s 5635(equation)s 6545(formatting)s
+7635(symbols)s 8514(\(there)s 0 12917(are)m 366(hundreds)s 1315(of)s
+1606(them\).)s 2347(The)s 2794(equation)s 3695(as)s 3965(a)s
+4151(whole)s 4811(is)s 5041(set)s 5386(in)s 5649(Slope)s
+6269(\(i.e.)s 6704(Italic\))s 7341(font,)s 7853(and)s 8277(symbols)s
+0 12629(such)m 515(as)s 220 fnt35 784 12626("2")m 240 fnt82
+1127 12629(and)m 220 fnt35 1550 12626("+")m 240 fnt82 1899 12629(are)m
+2265(de\207ned)s 3048(when)s 3643(other)s 4213(fonts)s 4762(are)s
+5128(needed.)s 5990(Precedences)s 7241(are)s 7608(used)s 8124(to)s
+8383(resolv)s 3(e)k 0 12341(ambiguities)m 1170(such)s 1670(as)s
+220 fnt35 1925 12338(a sup b o)m 3(v)k 5(er c)k 240 fnt82
+3291 12341(.)m 3459(Eq)s 3788(tak)s 2(es)k 4332(all)s
+4630(spacing)s 5418(decisions)s 6363(on)s 6665(itself,)s 7252(so)s
+7523(to)s 7766(pre)s 6(v)k 3(ent)k 8539(white)s
+0 12053(space)m 574(typed)s 1151(by)s 1432(the)s 1767(user)s
+2212(from)s 2723(interfering,)s 3824(the)s 4158(equation)s 5026(is)s
+5223(enclosed)s 6105(in)s 220 fnt35 6335 12050(0c @Space)m 240 fnt82
+7465 12053(.)m 7616(W)s 19(e)k 7972(will)s 8384(discuss)s
+0 11765(the)m 220 fnt35 348 11762(1.2f @Break)m 240 fnt82 1631 11765(later)m 13(.)k
+480 11391(Thus)m 1015(ha)s 4(v)k 3(e)k 1521(we)s
+1861(disposed)s 2762(of)s 3038(the)s 3391(language)s 4316(design)s
+5003(part)s 5439(of)s 5715(the)s 6068(equation)s 6954(formatting)s
+8020(problem;)s 8934(it)s 0 11103(remains)m 807(no)s 6(w)k
+1268(to)s 1507(de\207ne)s 2148(the)s 2496(twenty)s 3201(or)s
+3460(so)s 3726(symbols)s 4575(with)s 5057(parameters,)s 6211(and)s
+6615(get)s 6967(the)s 7315(layout)s 7973(right.)s 480 10729(Ev)m 3(ery)k
+1115(equation)s 2010(has)s 2393(an)s 240 fnt83 2690 10731(axis)m
+240 fnt82 3070 10729(:)m 3250(an)s 3546(imaginary)s 4583(horizontal)s
+5620(line)s 6048(through)s 6864(the)s 7225(centre)s 7878(of)s
+8163(v)s 6(ariables,)k 0 10441(through)m 795(the)s 1136(bar)s
+1494(of)s 1757(b)s 4(uilt-up)k 2556(fractions,)s 3491(and)s
+3888(so)s 4146(on.)s 4543(W)s 19(e)k 4905(can)s
+5287(satisfy)s 5956(this)s 6345(requirement)s 7552(by)s 7839(ensuring)s
+8708(that)s 0 10153(the)m 362(result)s 966(of)s 1251(each)s
+1761(symbol)s 2535(has)s 2919(a)s 3100(single)s 3741(ro)s 6(w)k
+4175(mark,)s 4788(on)s 5099(the)s 5461(axis.)s 6025(F)s 3(or)k
+6428(e)s 3(xample,)k 7356(the)s 7719(superscripting)s 0 9865(symbol)m
+760(is)s 970(de\207ned)s 1733(as)s 1983(follo)s 6(ws:)k
+220 fnt35 480 9366(def sup)m 480 9078(    precedence 60)m 480 8790(    associativity left)m 480 8502(    left x)m
+480 8214(    named gap { @SupGap })m 480 7926(    r)m -3(ight y)k 480 7638({)m 480 7350(    @HContr)m 2(act @VContr)k 2(act {)k
+480 7062(        |  @Smaller y)m 480 6774(        ^/gap  x)m 480 6486(    })m 480 6198(})m 240 fnt82
+0 5704(The)m 220 fnt35 430 5701(@VContr)m 2(act)k 240 fnt82
+1684 5704(and)m 220 fnt35 2091 5701(^/)m 240 fnt82 2320 5704(symbols)m
+3171(together)s 4017(ensure)s 4699(that)s 5119(the)s 5470(axis)s
+5908(of)s 6181(the)s 6532(result)s 7124(is)s 7336(the)s
+7687(axis)s 8125(of)s 8398(the)s 8749(left)s 0 5416(parameter)m 13(.)k
+1119(A)s 220 fnt35 1363 5413(gap)m 240 fnt82 1795 5416(parameter)m
+2823(has)s 3207(been)s 3730(pro)s 3(vided)k 4650(for)s
+5002(v)s 6(arying)k 5794(the)s 6156(height)s 6828(of)s
+7113(the)s 7475(superscript,)s 8644(with)s 0 5128(def)m 2(ault)k
+709(v)s 6(alue)k 220 fnt35 1265 5125(@SupGap)m 240 fnt82
+2393 5128(de\207ned)m 3144(else)s 6(where)k 4137(as)s 220 fnt35
+4375 5125(0.40fk)m 240 fnt82 4973 5128(.)m 5124(It)s 5317(is)s
+5515(important)s 6492(that)s 6898(such)s 7382(g)s 1(aps)k
+7859(be)s 8128(e)s 3(xpressed)k 0 4840(in)m 232(units)s
+736(that)s 1142(v)s 6(ary)k 1603(with)s 2073(the)s
+2410(font)s 2843(size,)s 3309(so)s 3563(that)s 3969(the)s 3(y)k
+4420(remain)s 5129(correct)s 5839(when)s 6403(the)s 6739(size)s
+7154(changes.)s 8077(Collecting)s 0 4552(the)m 351(def)s 2(ault)k
+1076(v)s 6(alues)k 1735(into)s 2164(symbols)s 3016(lik)s 2(e)k
+220 fnt35 3432 4549(@SupGap)m 240 fnt82 4515 4552(ensures)m 5287(consistenc)s 3(y)k
+6457(and)s 6865(assists)s 7529(when)s 8109(tuning)s 8778(the)s
+0 4264(v)m 6(alues.)k 769(Here)s 1289(is)s 1499(another)s
+2276(characteristic)s 3600(de\207nition:)s 220 fnt35 480 3814(def o)m 3(v)k 5(er)k
+480 3526(    precedence 54)m 480 3238(    associativity left)m 480 2950(    left x)m 480 2662(    named gap { 0.2f })m 480 2374(    r)m -3(ight y)k
+480 2086({)m 480 1798(    @HContr)m 2(act @VContr)k 2(act {)k 480 1510(        |0.5r)m -8(t  @OneCol x)k
+480 1222(        ^//gap  @HLine)m 480 934(        //gap  |0.5r)m -8(t @OneCol y)k 480 646(    })m 480 358(})m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 71 77
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(4.1.)m 454(An)s 774(equation)s 1666(formatting)s
+2730(pac)s 4(ka)k 2(g)k 2(e)k 240 fnt84
+8839 13840(71)m 240 fnt82 0 13205(Both)m 518(parameters)s 1611(are)s
+1953(centred,)s 2758(since)s 3299(we)s 3629(do)s 3917(not)s
+4278(kno)s 6(w)k 4853(which)s 5490(will)s 5911(be)s
+6188(the)s 6530(wider;)s 7181(we)s 7511(use)s 220 fnt35
+7881 13202(@OneCol)m 240 fnt82 8887 13205(to)m 0 12917(mak)m 2(e)k
+570(sure)s 1021(that)s 1437(the)s 1782(entire)s 2379(parameter)s
+3390(is)s 3598(centred,)s 4405(not)s 4769(just)s 5171(its)s
+5445(\207rst)s 5873(column,)s 6696(and)s 220 fnt35 7097 12914(@HContr)m 2(act)k
+240 fnt82 8358 12917(ensures)m 0 12629(that)m 428(the)s 787(fraction)s
+1597(will)s 2034(ne)s 6(v)k 3(er)k 2627(e)s 3(xpand)k
+3385(to)s 3635(\207ll)s 3966(all)s 4269(the)s 4628(a)s 4(v)k 6(ailable)k
+5547(space,)s 6196(as)s 6457(Lout)s 6980(objects)s 7719(ha)s 4(v)k 3(e)k
+8231(a)s 8408(natural)s 0 12341(tendenc)m 3(y)k 915(to)s
+1154(do)s 1447(\(Section)s 2300(2.6\).)s 220 fnt35 2843 12338(@HLine)m
+240 fnt82 3690 12341(is)m 3900(a)s 4066(horizontal)s 5090(line)s
+5504(of)s 5775(the)s 6123(width)s 6725(of)s 6996(the)s
+7344(column:)s 220 fnt35 480 11840(def @HLine)m 480 11552(    named line { "0.05 ft setline)m 4(width" })k
+480 11264({  )m 480 10976(    { "0 0 mo)m 3(v)k 5(eto xsiz)k 3(e 0 lineto" line "strok)k 4(e" } @Gr)k 2(aphic {})k
+480 10688(})m 240 fnt82 0 10194(Here)m 520(we)s 855(are)s
+1202(relying)s 1932(on)s 2229(the)s 2577(e)s 3(xpanding)k
+3625(tendenc)s 3(y)k 4540(just)s 4945(mentioned.)s 480 9820(The)m
+906(remaining)s 1925(symbols)s 2772(are)s 3116(quite)s 3647(similar)s
+4367(to)s 4603(these)s 5148(ones.)s 5748(W)s 19(e)k
+6114(conclude)s 7032(with)s 7511(a)s 7675(fe)s 6(w)k
+8078(\207ne)s 8490(points)s 0 9532(of)m 271(mathematical)s 1612(typesetting)s
+2714(mentioned)s 3782(by)s 4076(a)s 4242(leading)s 4999(authority)s 15(,)k
+5954(D.)s 6231(E.)s 6481(Knuth)s 7137([5)s 7322(].)s
+480 9158(Some)m 1090(symbols,)s 2004(such)s 2509(as)s 240 fnt78
+2768 9152(\243)m 240 fnt82 2963 9158(and)m 240 fnt78 3376 9152(\271)m
+240 fnt82 3505 9158(,)m 3621(should)s 4327(ha)s 4(v)k 3(e)k
+4837(a)s 5012(thick)s 5560(space)s 6156(on)s 6462(each)s
+6966(side;)s 7472(others,)s 8172(such)s 8677(as)s 240 fnt78
+8937 9152(+)m 240 fnt82 0 8870(and)m 240 fnt78 397 8864(-)m
+240 fnt82 525 8870(,)m 625(ha)s 4(v)k 3(e)k
+1119(a)s 1278(medium)s 2115(space;)s 2751(others)s 3379(ha)s 4(v)k 3(e)k
+3873(a)s 4032(thin)s 4454(space)s 5034(on)s 5324(the)s
+5665(right)s 6169(only)s 15(.)k 6737(This)s 7206(w)s 2(ould)k
+7854(be)s 8129(easy)s 8601(to)s 8833(do)s 0 8582(e)m 3(xcept)k
+681(that)s 1099(these)s 1646(spaces)s 2321(are)s 2668(not)s
+3034(w)s 2(anted)k 3781(in)s 4024(superscripts)s 5216(and)s
+5620(subscripts:)s 168 fnt83 578 8135(n)m 168 fnt78 680 8129(+)m
+793(1)s 240 fnt83 480 8037(r)m 240 fnt78 931 8029(-)m
+1131(1)s 240 fnt82 0 7578(In)m 271(ef)s 6(fect,)k
+929(the)s 1292(de\207nition)s 2281(of)s 2568(such)s 3079(symbols)s
+3943(changes)s 4780(depending)s 5846(on)s 6159(the)s 6522(conte)s 3(xt;)k
+7350(b)s 4(ut)k 7727(Lout)s 8254(does)s 8760(not)s
+0 7290(permit)m 682(such)s 1176(a)s 1340(change.)s 2180(Luckily)s 15(,)k
+3015(the)s 3361(so-called)s 4279(`style')s 4919(information)s 6102(set)s
+6426(by)s 6718(the)s 220 fnt35 7064 7287(@F)m 6(ont)k
+240 fnt82 7716 7290(,)m 220 fnt35 7821 7287(@Break)m 240 fnt82
+8617 7290(,)m 8722(and)s 220 fnt35 0 6999(@Space)m 240 fnt82
+891 7002(symbols)m 1734(can)s 2116(change)s 2844(in)s 3080(this)s
+3470(w)s 2(ay)k 15(.)k 4009(Accordingly)s 15(,)k
+5291(Eq)s 5608(uses)s 6065(the)s 220 fnt35 6406 6999(y)m
+240 fnt82 6568 7002(unit,)m 7040(which)s 7676(is)s 7879(part)s
+8304(of)s 8568(style,)s 0 6714(for)m 338(these)s 885(spaces:)s
+220 fnt35 480 6213(def @MedGap { 0.20y })m 480 5637(def "+" { &@MedGap plus &@MedGap })m 480 5061(def @HSqueez)m 3(e r)k -3(ight x { 0.2f @YUnit x })k
+240 fnt82 0 4562(In)m 261(the)s 615(equation)s 1502(as)s
+1758(a)s 1929(whole,)s 2627(the)s 2981(y)s 3161(unit)s
+3599(is)s 3814(initially)s 4616(set)s 4947(to)s 220 fnt35
+5192 4559(1f)m 240 fnt82 5372 4562(,)m 5484(and)s 5894(so)s
+220 fnt35 6166 4559(@MedGap)m 240 fnt82 7289 4562(ordinarily)m 8291(supplies)s
+0 4274(20%)m 495(of)s 777(this)s 1184(amount.)s 2077(But)s
+2494(superscripts)s 3697(and)s 4112(subscripts)s 5130(are)s 5488(enclosed)s
+6394(in)s 6648(the)s 220 fnt35 7007 4271(@HSqueez)m 3(e)k
+240 fnt82 8314 4274(symbol,)m 0 3986(which,)m 744(by)s 1091(changing)s
+2075(the)s 2476(y)s 2703(unit,)s 3235(ensures)s 4056(that)s
+4527(an)s 3(y)k 220 fnt35 4977 3983(@MedGap)m 240 fnt82
+6147 3986(within)m 6868(them)s 7459(is)s 7722(much)s 8364(smaller)s
+0 3698(than)m 469(usual.)s 240 fnt84 0 2955(4.2.)m 471(P)s 2(aragraphs,)k
+1780(displays,)s 2718(and)s 3159(lists)s 240 fnt82 480 2478(The)m
+914(remaining)s 1942(sections)s 2770(of)s 3047(this)s 3449(chapter)s
+4219(are)s 4572(all)s 4871(based)s 5481(on)s 5784(V)s 26(ersion)k
+6578(2)s 6759(of)s 7036(the)s 7391(DocumentLayout)s 0 2190(package.)m
+941(V)s 26(ersion)k 1722(3,)s 1942(which)s 2577(is)s
+2779(similar)s 3494(b)s 4(ut)k 3849(more)s 4389(elaborate,)s
+5364(is)s 5566(described)s 6533(from)s 7050(the)s 7391(user')s 13(s)k
+7991(perspecti)s 6(v)k 3(e)k 0 1902(in)m 249(the)s
+604(User')s 13(s)k 1272(Guide)s 1920([4)s 2113(].)s
+2363(In)s 2625(26)s 2925(pages)s 3528(of)s 3806(Lout,)s
+4372(the)s 4726(DocumentLaytout)s 6534(package)s 7381(de\207nes)s 8117(man)s 3(y)k
+8707(fea)s 8998(-)s 0 1614(tures)m 506(required)s 1350(in)s
+1583(the)s 1921(formatting)s 2972(of)s 3233(simple)s 3916(documents,)s
+5050(technical)s 5957(reports,)s 6717(and)s 7111(books,)s 7781(including)s
+8728(dis)s 8998(-)s 0 1326(plays,)m 603(lists,)s 1085(page)s
+1584(layout,)s 2280(cross)s 2813(references,)s 3891(tables)s 4490(of)s
+4752(contents,)s 5647(footnotes,)s 6635(\207gures,)s 7384(tables,)s 8039(references,)s
+0 1038(chapters,)m 903(sections,)s 1780(and)s 2184(sorted)s 2826(inde)s 3(x)k 3(es.)k
+480 664(The)m 939(symbols)s 1819(used)s 2347(for)s 2716(separating)s
+3782(paragraphs)s 4913(and)s 5348(producing)s 6403(displays)s 7269(and)s
+7704(lists)s 8170(may)s 8667(lack)s 0 376(the)m 351(e)s 3(xcitement)k
+1459(of)s 1733(more)s 2284(e)s 3(xotic)k 2921(features,)s
+3786(b)s 4(ut)k 4152(the)s 3(y)k 4618(can)s
+5010(teach)s 5574(some)s 6139(important)s 7131(lessons)s 7876(about)s
+8472(rob)s 4(ust)k 0 88(design.)m 786(The)s 1211(follo)s 6(wing)k
+2185(macro)s 2832(for)s 3167(separating)s 4199(paragraphs)s 5296(produces)s
+6207(a)s 6370(0.3)s 6711(cm)s 7060(v)s 3(ertical)k
+7824(space)s 8408(and)s 8809(a)s 8971(1)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 72 78
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(72)m 240 fnt83 7017 13843(Chapter)m 7867(4.)s
+8141(Examples)s 240 fnt82 0 13205(cm)m 352(indent)s 1010(on)s
+1307(the)s 1655(follo)s 6(wing)k 2632(line,)s 3097(and)s
+3501(is)s 3711(clearly)s 4414(on)s 4711(the)s 5059(right)s
+5570(track:)s 220 fnt35 480 12704(macro  @PP  { //0.3c &1c })m 240 fnt82 0 12210(Ne)m 6(v)k 3(ertheless)k
+1276(it)s 1468(has)s 1838(se)s 6(v)k 3(eral)k
+2560(major)s 3177(problems.)s 480 11836(The)m 220 fnt35 926 11833(&)m
+240 fnt82 1147 11836(symbol)m 1926(is)s 2154(subject)s 2910(to)s
+3168(widening)s 4130(during)s 4827(line)s 5260(adjustment,)s 6434(so)s
+6719(it)s 6930(should)s 7645(be)s 7946(replaced)s 8832(by)s
+220 fnt35 0 11545(1c @Wide {})m 240 fnt82 1213 11548(.)m 1387(But)s
+1804(then)s 2284(white)s 2882(space)s 3480(follo)s 6(wing)k
+4468(the)s 4827(symbol)s 5597(will)s 6034(af)s 6(fect)k
+6641(the)s 7000(result,)s 7648(so)s 7925(an)s 8219(e)s 3(xtra)k
+220 fnt35 8764 11545(&0i)m 240 fnt82 0 11260(must)m 528(be)s
+814(added.)s 1553(If)s 1787(the)s 2138(document)s 3146(is)s
+3359(printed)s 4098(double)s 4810(spaced,)s 5571(this)s 5971(paragraph)s
+6987(g)s 1(ap)k 7389(will)s 7818(f)s 2(ail)k
+8192(to)s 8435(widen:)s 0 10972(it)m 204(should)s 914(be)s
+1208(e)s 3(xpressed)k 2219(in)s 2475(terms)s 3068(of)s
+3352(the)s 220 fnt35 3712 10969(v)m 240 fnt82 3894 10972(unit,)m
+4386(with)s 4880(mark-to-mark)s 6280(spacing)s 7076(mode.)s 7785(Similarly)s 15(,)k
+8778(the)s 0 10684(paragraph)m 1013(indent)s 1671(should)s 2368(probably)s
+3273(be)s 3555(made)s 4129(proportional)s 5366(to)s 5605(the)s
+5953(font)s 6398(size.)s 480 10310(`Magic)m 1211(numbers')s 2135(lik)s 2(e)k
+220 fnt35 2535 10307(0.3c)m 240 fnt82 2993 10310(should)m 3678(not)s
+4032(be)s 4302(b)s 4(uried)k 4955(in)s 5186(de\207nitions)s
+6235(where)s 6863(the)s 3(y)k 7314(cannot)s 8000(be)s
+8270(changed)s 0 10022(easily)m 15(,)k 649(or)s 908(k)s 2(ept)k
+1378(consistent)s 2394(with)s 2876(similar)s 3598(de\207nitions)s 4659(during)s
+5337(tuning.)s 6113(The)s 3(y)k 6656(are)s 7003(much)s
+7592(better)s 8195(placed)s 8876(as)s 0 9734(symbols,)m 905(possibly)s
+1757(parameters)s 2855(of)s 3126(the)s 3474(enclosing)s 4444(package:)s
+220 fnt35 480 9233(def @DocumentLa)m 6(y)k 4(out)k 480 8945(    named @P)m 8(ar)k 2(aGap { 1.3vx })k
+480 8657(    named @P)m 8(ar)k 2(aIndent { 2f })k 480 8369(    ...)m 480 8081(@Begin)m
+480 7505(    macro @PP { //@P)m 8(ar)k 2(aGap @P)k 8(ar)k 2(aIndent @Wide &0i })k
+480 7217(    macro @LP { //@P)m 8(ar)k 2(aGap })k 480 6929(    ...)m 480 6641(@End @DocumentLa)m 6(y)k 4(out)k
+240 fnt82 0 6143(and)m 404(we)s 739(ha)s 4(v)k 3(e)k
+1240(arri)s 6(v)k 3(ed)k 1965(at)s 2197(the)s
+2545(de\207nition)s 3519(of)s 220 fnt35 3790 6140(@PP)m 240 fnt82
+4356 6143(as)m 4606(it)s 4798(appears)s 5579(in)s 5822(the)s
+6170(DocumentLayout)s 7905(package.)s 480 5769(A)m 710(display)s 1455(is)s
+1665(a)s 1831(table)s 2351(in)s 2594(which)s 3236(the)s
+3584(\207rst)s 4015(column)s 4790(is)s 5000(blank:)s 240 fnt83
+480 5266(pr)m 8(eceding)k 1483(te)s 4(xt)k 220 fnt35
+480 4973(//@DispGap |@DispIndent)m 240 fnt83 3183 4978(display)m 220 fnt35 480 4685(//@DispGap)m
+240 fnt83 480 4402(following)m 1438(te)s 4(xt)k 240 fnt82
+0 3901(Edge-to-edge)m 1345(is)s 1557(the)s 1906(appropriate)s 3052(spacing)s
+3838(mode)s 4427(before)s 5095(and)s 5500(after)s 5998(displays,)s
+6891(since)s 7439(the)s 7789(display)s 8536(could)s 0 3613(be)m
+273(a)s 430(table)s 941(or)s 1191(\207gure)s 1796(whose)s
+2455(mark)s 2998(does)s 3479(not)s 3836(correspond)s 4948(to)s
+5178(a)s 5335(baseline.)s 6273(Thus,)s 220 fnt35 6850 3610(1v)m
+240 fnt82 7132 3613(is)m 7333(a)s 7490(reasonable)s 8558(v)s 6(alue)k
+0 3325(for)m 220 fnt35 338 3322(@DispGap)m 240 fnt82 1406 3325(.)m
+480 2951(The)m 957(ordinary)s 1871(user)s 2379(cannot)s 3126(be)s
+3458(e)s 3(xpected)k 4413(to)s 4702(type)s 5219(the)s
+5617(Lout)s 6179(source)s 6908(sho)s 6(wn)k 7635(abo)s 3(v)k 3(e;)k
+8363(a)s 8579(more)s 0 2663(appropriate)m 1144(syntax)s 1824(is)s
+240 fnt83 480 2160(pr)m 8(eceding)k 1483(te)s 4(xt)k
+220 fnt35 480 1867(@IndentedDispla)m 6(y {)k 240 fnt83 2514 1872(display)m
+220 fnt35 3321 1867(})m 240 fnt83 480 1584(following)m 1438(te)s 4(xt)k
+240 fnt82 0 1083(This)m 491(presents)s 1340(a)s 1521(problem:)s
+2499(if)s 220 fnt35 2731 1080(@IndentedDispla)m 6(y)k 240 fnt82
+4593 1083(is)m 4819(made)s 5408(a)s 5589(de\207nition)s 6578(with)s
+7075(a)s 7256(right)s 7782(parameter)s 9(,)k 8850(its)s
+0 795(result)m 598(will)s 1032(be)s 1322(an)s 1613(object)s
+2265(separated)s 3233(from)s 3765(the)s 4121(surrounding)s 5339(te)s 3(xt)k
+5762(only)s 6250(by)s 6552(white)s 7147(space,)s 7793(hence)s
+8415(part)s 8855(of)s 0 507(the)m 343(paragraph;)s 1405(while)s
+1986(if)s 2197(it)s 2383(is)s 2587(a)s 2747(macro,)s
+3445(the)s 3787(\207nal)s 220 fnt35 4261 504(//@DispGap)m 240 fnt82
+5505 507(cannot)m 6197(be)s 6473(included)s 7349(in)s 7586(it.)s
+7876(The)s 8298(solution)s 0 219(adopted)m 816(in)s 1059(the)s
+1407(DocumentLayout)s 3142(package)s 3982(uses)s 4445(a)s 4611(g)s 1(alle)k 3(y)k
+5245(and)s 5649(a)s 5815(macro:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 73 79
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(4.2.)m 454(P)s 19(ar)k 3(a)k 2(gr)k 3(aphs,)k
+1665(displays,)s 2542(and)s 2968(lists)s 240 fnt84 8833 13840(73)m
+220 fnt35 480 13207(    def @DispPlace { @Galle)m 4(y })k 480 12919(    def @Disp into { @DispPlace&&preceding })m 480 12631(        r)m -3(ight x)k
+480 12343(    {)m 480 12055(        @OneRo)m 3(w x)k 480 11767(    })m 480 11191(    macro @IndentedDispla)m 6(y)k
+480 10903(    {)m 480 10615(        //@DispGap  |@DispIndent  @DispPlace  |)m 480 10327(        //@DispGap  //  @Disp)m 480 10039(    })m 0 9542(@DispPlace)m
+240 fnt82 1257 9545(and)m 220 fnt35 1657 9542(@Disp)m 240 fnt82
+2366 9545(are)m 2709(not)s 3070(e)s 3(xported,)k 4007(so)s
+4269(there)s 4798(is)s 5003(no)s 5292(danger)s 5999(of)s
+6266(a)s 6427(name)s 6997(clash)s 7541(with)s 8019(some)s
+8575(other)s 0 9257(symbol.)m 869(The)s 1297(ordinary)s 2161(user')s 13(s)k
+2769(syntax)s 3449(e)s 3(xpands)k 4282(to)s 240 fnt83
+480 8754(pr)m 8(eceding)k 1483(te)s 4(xt)k 220 fnt35
+480 8461(//@DispGap  |@DispIndent  @DispPlace  |)m 480 8173(//@DispGap  //  @Disp {)m 240 fnt83 2890 8178(display)m 220 fnt35
+3637 8173(})m 240 fnt83 480 7890(following)m 1438(te)s 4(xt)k
+240 fnt82 0 7389(and)m 397(the)s 220 fnt35 737 7386(@Disp)m
+240 fnt82 1442 7389(g)m 1(alle)k 3(y)k 2068(appears)s
+2842(at)s 3066(the)s 3406(preceding)s 220 fnt35 4394 7386(@DispPlace)m
+240 fnt82 5595 7389(,)m 5694(being)s 6272(itself)s 6812(replaced)s
+7671(by)s 220 fnt35 7957 7386(@Null)m 240 fnt82 8542 7389(.)m
+8698(The)s 220 fnt35 0 7098(//)m 240 fnt82 184 7101(symbol)m
+942(protects)s 1748(the)s 2094(preceding)s 220 fnt35 3088 7098(//@DispGap)m
+240 fnt82 4337 7101(from)m 4859(being)s 5443(deleted)s 6189(by)s
+6481(this)s 220 fnt35 6876 7098(@Null)m 240 fnt82 7519 7101(when)m
+8094(there)s 8625(is)s 8833(no)s 0 6813(follo)m 6(wing)k
+977(te)s 3(xt.)k 480 6439(An)m 858(automatically)s 2240(numbered)s
+3283(list)s 3662(could)s 4280(ha)s 4(v)k 3(e)k
+4809(an)s 5121(arbitrarily)s 6156(lar)s 4(ge)k 6713(number)s
+7532(of)s 7831(items,)s 8483(so,)s 8832(by)s 0 6151(analogy)m
+812(with)s 1294(sequences)s 2315(of)s 2586(pages,)s 3238(we)s
+3573(see)s 3934(immmediately)s 5368(that)s 5786(recursion)s 6732(must)s
+7257(be)s 7539(in)s 9(v)k 4(olv)k 3(ed:)k
+220 fnt35 480 5650(def @List r)m -3(ight n)k 2(um)k 480 5362({)m
+480 5074(    @DispIndent @Wide n)m 2(um.)k 13(  |  @ItemPlace)k 480 4786(    //@DispGap @List @Ne)m 6(xt n)k 2(um)k
+480 4498(})m 240 fnt82 0 4004(Notice)m 689(ho)s 6(w)k
+1146(the)s 220 fnt35 1490 4001(@Ne)m 6(xt)k 240 fnt82
+2210 4004(symbol)m 2965(w)s 2(orks)k 3595(in)s 3834(conjunction)s
+5017(with)s 5495(the)s 5838(recursion)s 6780(to)s 7015(produce)s
+7838(an)s 8116(ascending)s 0 3716(sequence)m 933(of)s 1204(numbers;)s
+2140(the)s 2488(result)s 3078(of)s 220 fnt35 3349 3713(@List 1)m
+240 fnt82 4113 3716(will)m 4539(be)s 220 fnt35 480 3215(1.)m 13(   @ItemPlace)k
+480 2927(2.)m 13(   @ItemPlace)k 480 2639(3.)m 13(   @ItemPlace)k 480 2351(...)m
+240 fnt82 0 1900(W)m 19(e)k 362(can)s 744(follo)s 6(w)k
+1408(this)s 1797(with)s 2271(items)s 2832(which)s 3466(are)s
+3806(g)s 1(alle)k 3(ys)k 4522(tar)s 4(geted)k
+5338(to)s 220 fnt35 5569 1897(@ItemPlace&&preceding)m 240 fnt82 8010 1900(,)m
+8110(and)s 220 fnt35 8506 1897(@List)m 240 fnt82 0 1612(will)m
+426(e)s 3(xpand)k 1173(just)s 1578(enough)s 2341(to)s
+2580(accommodate)s 3964(them.)s 480 1238(The)m 908(usual)s 1468(problem)s
+2325(with)s 2807(recursi)s 6(v)k 3(e-)k 3741(recepti)s 6(v)k 3(e)k
+4663(symbols)s 5513(no)s 6(w)k 5974(arises:)s 6683(there)s
+7216(is)s 7426(al)s 2(w)k 2(ays)k 8137(one)s
+8540(une)s 3(x)k 8998(-)s 0 950(panded)m 220 fnt35
+753 947(@List)m 240 fnt82 1313 950(,)m 1424(and)s 1832(until)s
+2329(it)s 2525(can)s 2917(be)s 3203(remo)s 3(v)k 3(ed)k
+4096(the)s 4448(g)s 1(alle)k 3(y)k 5086(containing)s
+6152(it)s 6348(will)s 6778(appear)s 7479(to)s 7722(be)s
+8008(incomplete)s 0 662(and)m 394(will)s 810(be)s 1081(pre)s 6(v)k 3(ented)k
+2063(at)s 2285(that)s 2692(point)s 3234(from)s 3747(\210ushing)s
+4562(into)s 4977(its)s 5242(parent)s 5889(\(see)s 6318(page)s
+6816(29\).)s 7289(W)s 19(e)k 7647(adopt)s 8229(the)s
+8566(usual)s 0 374(solution:)m 937(a)s 1104(forcing)s 1847(g)s 1(alle)k 3(y)k
+2482(into)s 2908(a)s 3074(later)s 3558(tar)s 4(get)k
+4158(will)s 4584(replace)s 5330(the)s 5679(last)s 220 fnt35
+6070 371(@List)m 240 fnt82 6691 374(by)m 220 fnt35 6986 371(@Null)m
+240 fnt82 7571 374(.)m 7735(This)s 8212(brings)s 8862(us)s
+0 86(to)m 239(the)s 587(de\207nitions)s 1648(as)s 1898(the)s 3(y)k
+2361(appear)s 3058(in)s 3301(DocumentLayout:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 74 80
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(74)m 240 fnt83 7017 13843(Chapter)m 7867(4.)s
+8141(Examples)s 220 fnt35 480 13207(def @ItemPlace { @Galle)m 4(y })k 480 12919(def @ListItem into { @ItemPlace&&preceding })m
+480 12631(    r)m -3(ight x)k 480 12343({ x })m 480 11851(def @EndListPlace { @Galle)m 4(y })k
+480 11563(def @EndList f)m 6(orce into { @EndListPlace&&preceding })k 480 11275({})m 480 10783(def @Ra)m 4(wIndentedList)k
+480 10495(   named style r)m -3(ight tag {})k 480 10207(   named indent { @DispIndent })m 480 9919(   named gap { @DispGap })m 480 9631(   named star)m -8(t { 1 })k
+480 9343({)m 480 9055(    def @IList r)m -3(ight n)k 2(um)k 480 8767(    {)m
+480 8479(        indent @Wide {style n)m 2(um} | @ItemPlace)k 480 8191(        //gap @IList @Ne)m 6(xt n)k 2(um)k
+480 7903(    })m 480 7327(    @IList star)m -8(t  //  @EndListPlace)k 480 7039(})m 240 fnt82
+0 6545(No)m 6(w)k 514(gi)s 6(v)k 3(en)k
+1094(the)s 1442(input)s 220 fnt35 480 6044(@Ra)m 4(wIndentedList)k
+480 5756(@ListItem { \207rst item })m 480 5468(@ListItem { second item })m 480 5180(...)m 480 4892(@ListItem { last item })m 480 4604(@EndList)m
+0 4146(@Ra)m 4(wIndentedList)k 240 fnt82 1908 4149(will)m 2334(e)s 3(xpand)k
+3081(to)s 3320(recei)s 6(v)k 3(e)k 4056(the)s
+4404(items,)s 5028(and)s 5432(will)s 5858(be)s 6140(closed)s
+6809(of)s 6(f)k 7153(by)s 220 fnt35 7447 4146(@EndList)m
+240 fnt82 8397 4149(.)m 480 3775(The)m 220 fnt35 913 3772(indent)m
+240 fnt82 1506 3775(,)m 220 fnt35 1619 3772(gap)m 240 fnt82
+1977 3775(,)m 2089(and)s 220 fnt35 2499 3772(star)m -8(t)k
+240 fnt82 2996 3775(parameters)m 4099(are)s 4452(straightforw)s 2(ard)k
+5986(\(note)s 6538(that)s 6962(the)s 7316(b)s 4(urden)k
+8039(of)s 8316(typing)s 220 fnt35 8987 3772(1)m 240 fnt82
+0 3487(has)m 378(been)s 895(lifted)s 1464(from)s 1996(the)s
+2352(ordinary)s 3224(user\),)s 3816(b)s 4(ut)k 4186(the)s
+220 fnt35 4543 3484(style)m 240 fnt82 5054 3487(parameter)m 6076(has)s
+6454(a)s 6628(parameter)s 7650(of)s 7929(its)s 8213(o)s 6(wn)k
+8686(\(see)s 0 3199(page)m 508(16\).)s 991(It)s 1196(is)s
+1406(used)s 1903(lik)s 2(e)k 2315(this:)s 220 fnt35
+480 2698(def @Ra)m 4(wNumberedList { @Ra)k 4(wIndentedList style { tag.)k 13( } })k 480 2410(def @Ra)m 4(wP)k 8(arenNumberedList { @Ra)k 4(wIndentedList style { \(tag\) } })k
+240 fnt82 0 1911(In)m 220 fnt35 276 1908(@Ra)m 4(wNumberedList)k
+240 fnt82 2294 1911(,)m 220 fnt35 2422 1908(style)m 240 fnt82
+2946 1911(is)m 3176(gi)s 6(v)k 3(en)k 3777(the)s
+4146(v)s 6(alue)k 220 fnt35 4734 1908(tag.)m 240 fnt82
+5081 1911(,)m 5209(where)s 220 fnt35 5870 1908(tag)m 240 fnt82
+6243 1911(is)m 6474(its)s 6771(o)s 6(wn)k 7255(right)s
+7787(parameter)s 9(,)k 8860(so)s 0 1623(the)m 348(v)s 6(alue)k
+916(of)s 220 fnt35 1187 1620({style n)m 2(um})k 240 fnt82
+2321 1623(within)m 220 fnt35 2989 1620(@IList)m 240 fnt82 3670 1623(is)m
+220 fnt35 3880 1620(n)m 2(um.)k 240 fnt82 4347 1623(;)m
+4459(while)s 5046(in)s 220 fnt35 5289 1620(@Ra)m 4(wP)k 8(arenNumberedList)k
+240 fnt82 7884 1623(,)m 220 fnt35 7992 1620({style n)m 2(um})k
+240 fnt82 0 1335(is)m 220 fnt35 219 1332(\(n)m 2(um\))k
+240 fnt82 776 1335(.)m 949(In)s 1215(this)s 1620(w)s 2(ay)k
+2080(we)s 2425(achie)s 6(v)k 3(e)k 3211(an)s
+3503(unlimited)s 4487(v)s 6(ariety)k 5207(of)s 5487(numbering)s
+6587(formats)s 7376(without)s 8176(ha)s 4(ving)k 8887(to)s
+0 1047(re)m 6(write)k 220 fnt35 725 1044(@Ra)m 4(wIndentedList)k
+240 fnt82 2633 1047(o)m 3(v)k 3(er)k 3112(and)s
+3516(o)s 3(v)k 3(er)k 13(.)k 480 673(These)m
+1113(list)s 1470(symbols)s 2325(are)s 2678(objects)s 3412(without)s
+4209(surrounding)s 5425(space,)s 6069(so)s 6341(macros)s 7088(similar)s
+7816(to)s 8061(those)s 8629(used)s 0 385(for)m 338(displays)s
+1173(are)s 1520(needed:)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 75 81
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(4.2.)m 454(P)s 19(ar)k 3(a)k 2(gr)k 3(aphs,)k
+1665(displays,)s 2542(and)s 2968(lists)s 240 fnt84 8833 13840(75)m
+220 fnt35 480 13207(macro @NumberedList { //@DispGap @Ra)m 4(wNumberedList //@DispGap })k 480 12919(macro @P)m 8(arenNumberedList { //@DispGap @Ra)k 4(wP)k 8(arenNumberedList //@DispGap })k
+240 fnt82 0 12423(and)m 404(so)s 670(on.)s 480 12049(Lists)m
+994(numbered)s 2007(by)s 2300(Roman)s 3047(numerals)s 3973(present)s
+4721(a)s 4886(problem,)s 5788(because)s 220 fnt35 6600 12046(@Ne)m 6(xt)k
+240 fnt82 7322 12049(will)m 7747(not)s 8111(increment)s 0 11761(Roman)m
+749(numerals.)s 1789(Instead,)s 2586(the)s 3(y)k 3049(must)s
+3574(be)s 3856(stored)s 4498(in)s 4741(a)s 4907(database:)s
+220 fnt35 480 11260(def @Roman)m 480 10972(    left @T)m 26(ag)k 480 10684(    r)m -3(ight @V)k 15(al)k
+480 10396({ @V)m 15(al })k 480 9820(@SysDatabase @Roman { standard })m 0 9319(@SysDatabase)m 240 fnt82
+1602 9322(is)m 1835(preferred)s 2790(o)s 3(v)k 3(er)k
+220 fnt35 3292 9319(@Database)m 240 fnt82 4529 9322(here)m 5019(because)s
+5855(this)s 6274(database)s 7176(should)s 7896(be)s 8201(k)s 2(ept)k
+8694(in)s 8960(a)s 0 9034(standard)m 880(place)s 1452(and)s
+1868(shared)s 2562(by)s 2868(e)s 6(v)k 3(eryone.)k
+3912(The)s 4352(database)s 5243(itself,)s 5838(a)s 6016(\207le)s
+6389(called)s 220 fnt35 7029 9031(standard.ld)m 240 fnt82 8174 9034(in)m
+8429(Basser)s 0 8746(Lout,)m 559(contains)s 1407(in)s 9(v)k 4(ocations)k
+2548(of)s 220 fnt35 2819 8743(@Roman)m 240 fnt82 3735 8746(,)m
+3842(each)s 4337(enclosed)s 5232(in)s 5475(braces:)s 220 fnt35
+480 8264({ 1 @Roman i })m 480 7976({ 2 @Roman ii })m 480 7688(...)m 480 7400({ 100 @Roman c })m 240 fnt82
+0 6906(Then)m 220 fnt35 549 6903(@Roman&&12)m 240 fnt82 2065 6906(for)m
+2403(e)s 3(xample)k 3266(has)s 3636(v)s 6(alue)k
+4204(xii,)s 4563(and)s 220 fnt35 480 6405(def @Ra)m 4(wRomanList { @Ra)k 4(wIndentedList style { {@Roman&&tag}.)k 13( } })k
+240 fnt82 0 5906(produces)m 922(a)s 1096(list)s 1454(numbered)s
+2477(by)s 2779(Roman)s 3535(numerals.)s 4583(The)s 5019(counting)s
+5917(still)s 6337(proceeds)s 7246(in)s 7496(Arabic,)s 8261(b)s 4(ut)k
+8631(each)s 0 5618(Arabic)m 719(numeral)s 1573(is)s 1799(con)s 9(v)k 3(erted)k
+2804(to)s 3059(Roman)s 3824(by)s 4134(the)s 4498(cross)s
+5056(reference.)s 6123(Since)s 6726(arbitrary)s 7617(objects)s 8361(may)s
+8844(be)s 0 5330(stored)m 642(in)s 885(databases,)s 1908(arbitrary)s
+2783(\207nite)s 3330(sequences)s 4351(of)s 4622(objects)s 5350(may)s
+5816(be)s 6098(`counted')s 7047(in)s 7290(this)s 7686(w)s 2(ay)k 15(.)k
+240 fnt84 0 4538(4.3.)m 471(P)s 2(age)k 1017(lay)s 6(out)k
+240 fnt82 480 4061(The)m 921(page)s 1443(layout)s 2115(de\207nitions)s
+3190(gi)s 6(v)k 3(en)k 3783(in)s 4040(Section)s
+4828(1.2,)s 5249(although)s 6158(correct,)s 6940(are)s 7301(v)s 3(ery)k
+7791(basic.)s 8460(In)s 8730(this)s 0 3773(section)m 726(we)s
+1053(present)s 1795(the)s 2135(de\207nitions)s 3187(used)s 3676(by)s
+3962(the)s 4302(DocumentLayout)s 6029(package)s 6860(for)s 7190(laying)s
+7833(out)s 8191(the)s 8530(pages)s 0 3485(of)m 271(books,)s
+950(including)s 1906(running)s 2704(page)s 3211(headers)s 3991(and)s
+4394(footers,)s 5164(dif)s 6(ferent)k 6038(formats)s 6817(for)s
+7155(odd)s 7572(and)s 7975(e)s 6(v)k 3(en)k
+8474(pages,)s 0 3197(and)m 404(so)s 670(on.)s 1074(The)s
+1502(present)s 2252(document)s 3256(is)s 3466(produced)s 4415(with)s
+4897(these)s 5444(de\207nitions.)s 480 2823(W)m 19(e)k 846(be)s 3(gin)k
+1429(with)s 1908(a)s 2071(fe)s 6(w)k 2474(de\207nitions)s
+3531(which)s 4170(permit)s 4850(the)s 5195(user)s 5650(to)s
+5885(create)s 6507(cross)s 7046(references)s 8074(of)s 8342(the)s
+8686(`see)s 0 2535(page)m 509(27')s 863(v)s 6(ariety)k
+1576(which)s 2220(will)s 2647(be)s 2931(k)s 2(ept)k
+3403(up)s 3698(to)s 3938(date)s 4394(automatically)s 15(.)k
+5845(The)s 6275(user)s 6734(marks)s 7371(the)s 7721(tar)s 4(get)k
+8322(page)s 8832(by)s 0 2247(placing)m 220 fnt35 756 2244(@P)m 8(ageMar)k -3(k intro)k
+240 fnt82 2454 2247(,)m 2560(for)s 2897(e)s 3(xample,)k
+3810(at)s 4041(the)s 4388(point)s 4939(of)s 5209(interest,)s
+6017(and)s 6420(refers)s 7012(to)s 7250(the)s 7597(mark)s 2(ed)k
+8369(page)s 8876(as)s 220 fnt35 0 1956(@P)m 8(ageOf intro)k
+240 fnt82 1499 1959(else)m 6(where:)k 220 fnt35 480 1459(e)m 6(xpor)k -8(t @T)k 26(ag)k
+480 1171(def @P)m 8(ageMar)k -3(k)k 4(er r)k -3(ight @T)k 26(ag { @Null })k
+480 674(def @P)m 8(ageMar)k -3(k r)k -3(ight x)k 480 386({)m
+480 98(    @P)m 8(ageMar)k -3(k)k 4(er&&preceding @T)k 26(agged x)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 76 82
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(76)m 240 fnt83 7017 13843(Chapter)m 7867(4.)s
+8141(Examples)s 220 fnt35 480 13210(})m 480 12718(def @P)m 8(ageOf r)k -3(ight x)k
+480 12430({)m 480 12142(    @P)m 8(ageMar)k -3(k)k 4(er&&x @Open { @T)k 26(ag })k
+480 11854(})m 240 fnt82 0 11360(W)m 19(e)k 385(will)s
+828(see)s 1206(belo)s 6(w)k 1856(that)s 2291(an)s
+2591(in)s 9(v)k 4(ocation)k 3662(of)s 220 fnt35
+3949 11357(@P)m 8(ageMar)k -3(k)k 4(er)k 240 fnt82
+5435 11360(appears)m 6233(before)s 6916(each)s 7428(page,)s 8004(with)s
+220 fnt35 8503 11357(@T)m 26(ag)k 240 fnt82 0 11072(parameter)m
+1014(equal)s 1587(to)s 1826(the)s 2174(page)s 2682(number)s 13(.)k
+3564(Suppose)s 4432(that)s 220 fnt35 4850 11069(@P)m 8(ageMar)k -3(k intro)k
+240 fnt82 6548 11072(,)m 6655(which)s 7297(e)s 3(xpands)k
+8130(to)s 220 fnt35 480 10571(@P)m 8(ageMar)k -3(k)k 4(er&&preceding @T)k 26(agged intro)k
+240 fnt82 0 10072(happens)m 855(to)s 1113(f)s 2(all)k
+1502(on)s 1819(page)s 2346(27)s 2653(of)s 2944(the)s
+3311(\207nal)s 3810(printed)s 4564(document)s 5588(\(of)s 5957(course,)s
+6707(its)s 7003(v)s 6(alue)k 7590(is)s 220 fnt35
+7819 10069(@Null)m 240 fnt82 8484 10072(which)m 0 9784(mak)m 2(es)k
+686(it)s 905(in)s 9(visible\).)k 1988(Then)s 2564(the)s
+2939(ef)s 6(fect)k 3561(of)s 220 fnt35 3859 9781(@T)m 26(agged)k
+240 fnt82 4874 9784(is)m 5111(to)s 5377(attach)s 220 fnt35
+6030 9781(intro)m 240 fnt82 6536 9784(as)m 6812(an)s 7122(e)s 3(xtra)k
+7683(tag)s 8054(to)s 8320(the)s 8695(\207rst)s 0 9496(in)m 9(v)k 4(ocation)k
+1092(of)s 220 fnt35 1401 9493(@P)m 8(ageMar)k -3(k)k 4(er)k
+240 fnt82 2908 9496(preceding)m 3943(that)s 4399(\207nal)s 4917(point,)s
+5554(and)s 5997(this)s 6431(must)s 6994(be)s 220 fnt35
+7315 9493(@P)m 8(ageMar)k -3(k)k 4(er 27)k 240 fnt82
+9022 9496(.)m 0 9208(Therefore)m 997(the)s 1345(e)s 3(xpression)k
+220 fnt35 480 8707(@P)m 8(ageMar)k -3(k)k 4(er&&intro @Open { @T)k 26(ag })k
+240 fnt82 0 8208(will)m 422(open)s 941(the)s 1285(in)s 9(v)k 4(ocation)k
+220 fnt35 2334 8205(@P)m 8(ageMar)k -3(k)k 4(er 27)k
+240 fnt82 4097 8208(and)m 4497(yield)s 5028(the)s 5372(v)s 6(alue)k
+5936(of)s 6203(its)s 220 fnt35 6474 8205(@T)m 26(ag)k
+240 fnt82 7093 8208(parameter)m 9(,)k 8141(27.)s 8540(Thus,)s
+220 fnt35 0 7917(@P)m 8(ageOf intro)k 240 fnt82 1499 7920(appearing)m
+2495(an)s 3(ywhere)k 3478(in)s 3721(the)s 4069(document)s
+5073(yields)s 5695(27.)s 480 7546(Ne)m 3(xt)k 1009(we)s
+1351(ha)s 4(v)k 3(e)k 1859(some)s 2427(little)s
+2926(de\207nitions)s 3994(for)s 4339(v)s 6(arious)k 5095(parts)s
+5617(of)s 5895(the)s 6250(page.)s 220 fnt35 6873 7543(@FullPlace)m
+240 fnt82 8055 7546(will)m 8488(be)s 8778(the)s 0 7258(tar)m 4(get)k
+599(of)s 870(full-width)s 1882(body)s 2416(te)s 3(xt:)k
+220 fnt35 480 6757(def @FullPlace { @Galle)m 4(y })k 0 6256(@ColPlace)m 240 fnt82
+1151 6259(will)m 1577(be)s 1859(the)s 2207(tar)s 4(get)k
+2806(of)s 3077(body)s 3611(te)s 3(xt)k 4026(within)s
+4694(one)s 5096(column:)s 220 fnt35 480 5758(def @ColPlace { @Galle)m 4(y })k
+0 5257(@T)m 26(opList)k 240 fnt82 972 5260(will)m 1398(be)s
+1680(the)s 2028(tar)s 4(get)k 2627(of)s 2898(\207gures)s
+3600(and)s 4004(tables:)s 220 fnt35 480 4759(e)m 6(xpor)k -8(t @T)k 26(ag)k
+480 4471(def @T)m 26(opList r)k -3(ight @T)k 26(ag)k 480 4183({)m
+480 3895(    @Galle)m 4(y)k 480 3607(    //@T)m 26(opGap @T)k 26(opList @Ne)k 6(xt @T)k 26(ag)k
+480 3319(})m 240 fnt82 0 2825(W)m 19(e)k 392(ha)s 4(v)k 3(e)k
+916(tak)s 2(en)k 1512(a)s 1702(shortcut)s 2555(here,)s
+3096(a)s 4(v)k 4(oiding)k 4002(an)s 4309(unnecessary)s
+220 fnt35 5555 2822(@T)m 26(opPlace)k 240 fnt82 6753 2825(symbol.)m
+220 fnt35 7645 2822(@F)m 6(ootList)k 240 fnt82 8722 2825(and)m
+220 fnt35 0 2534(@F)m 6(ootSect)k 240 fnt82 1142 2537(de\207ne)m
+1774(a)s 1931(sequence)s 2854(of)s 3116(full-width)s 4119(tar)s 4(gets)k
+4793(at)s 5015(the)s 5354(foot)s 5790(of)s 6052(the)s
+6390(page)s 6889(for)s 7218(footnotes,)s 8205(preceded)s 0 2249(by)m
+294(a)s 460(short)s 998(horizontal)s 2022(line:)s 220 fnt35
+480 1748(e)m 6(xpor)k -8(t @T)k 26(ag)k 480 1460(def @F)m 6(ootList r)k -3(ight @T)k 26(ag)k
+480 1172({)m 480 884(    @Galle)m 4(y)k 480 596(    //@F)m 6(ootGap  @F)k 6(ootList @Ne)k 6(xt @T)k 26(ag)k
+480 308(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 77 83
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(4.3.)m 454(P)s 19(a)k 2(g)k 2(e)k
+976(layout)s 240 fnt84 8831 13840(77)m 220 fnt35 480 13207(def @F)m 6(ootSect)k
+480 12919({)m 480 12631(    @F)m 6(ootLen @Wide @HLine)k 480 12343(    //@F)m 6(ootGap  @F)k 6(ootList 1  ||@F)k 6(ootLen)k
+480 12055(})m 240 fnt82 0 11561(Similarly)m 15(,)k 220 fnt35
+988 11558(@ColF)m 6(ootList)k 240 fnt82 2378 11561(and)m 220 fnt35
+2791 11558(@ColF)m 6(ootSect)k 240 fnt82 4279 11561(pro)m 3(vide)k
+5072(a)s 5247(sequence)s 6189(of)s 6469(tar)s 4(gets)k
+7161(for)s 7508(footnotes)s 8458(within)s 0 11273(one)m 402(column:)s
+220 fnt35 480 10822(e)m 6(xpor)k -8(t @T)k 26(ag)k
+480 10534(def @ColF)m 6(ootList r)k -3(ight @T)k 26(ag)k 480 10246({)m
+480 9958(    @Galle)m 4(y)k 480 9670(    //@F)m 6(ootGap  @ColF)k 6(ootList @Ne)k 6(xt @T)k 26(ag)k
+480 9382(})m 480 8806(def @ColF)m 6(ootSect)k 480 8518({)m 480 8230(    @ColF)m 6(ootLen @Wide @HLine)k
+480 7942(    //@F)m 6(ootGap  @ColF)k 6(ootList 1  ||@ColF)k 6(ootLen)k 480 7654(})m
+240 fnt82 0 7160(The)m 428(ne)s 3(xt)k 897(de\207nition)s
+1871(pro)s 3(vides)k 2743(a)s 2909(horizontal)s 3933(sequence)s
+4866(of)s 5137(one)s 5539(or)s 5798(more)s 6345(columns:)s
+220 fnt35 480 6659(def @ColList r)m -3(ight col)k 480 6371({)m 480 6083(    def @Column)m
+480 5795(    {  @VExpand { @ColPlace //1r)m -8(t @OneRo)k 3(w { //@MidGap @ColF)k 6(ootSect } }  })k 480 5219(    col @Case {)m
+480 4931(        Single @Y)m 4(ield @Column)k 480 4643(        Doub)m 4(le @Y)k 4(ield { @Doub)k 4(leColWidth @Wide @Column  ||@ColGap  @ColList col })k
+480 4355(        Multi  @Y)m 4(ield { @MultiColWidth @Wide @Column  ||@ColGap  @ColList col })k 480 4067(    })m 480 3779(})m 240 fnt82
+0 3285(Each)m 537(column)s 1315(consists)s 2125(of)s 2399(a)s
+220 fnt35 2568 3282(@ColPlace)m 240 fnt82 3721 3285(at)m 3956(the)s
+4307(top)s 4668(and)s 5075(a)s 220 fnt35 5243 3282(@F)m 6(ootSect)k
+240 fnt82 6397 3285(at)m 6632(the)s 6982(foot.)s 7534(The)s
+220 fnt35 7965 3282(@VExpand)m 240 fnt82 0 2997(symbol)m 772(ensures)s
+1553(that)s 1983(whene)s 6(v)k 3(er)k 2977(a)s
+3156(column)s 3943(comes)s 4618(into)s 5056(e)s 3(xistence,)k
+6061(it)s 6266(will)s 6705(e)s 3(xpand)k 7464(v)s 3(ertically)k
+8429(so)s 8708(that)s 0 2709(the)m 360(bottom-justi\207cation)s 220 fnt35
+2315 2706(//1r)m -8(t)k 240 fnt82 2769 2709(has)m 3152(as)s
+3414(much)s 4016(space)s 4615(as)s 4878(possible)s 5730(to)s
+5982(w)s 2(ork)k 6545(within.)s 7333(The)s 220 fnt35
+7773 2706(col)m 240 fnt82 8112 2709(parameter)m 0 2421(determines)m 1099(whether)s
+1929(the)s 2277(result)s 2867(has)s 3237(a)s 3403(single)s
+4030(column,)s 4855(double)s 5563(columns,)s 6481(or)s 6740(multiple)s
+7592(columns.)s 480 2047(The)m 220 fnt35 908 2044(@P)m 8(age)k
+240 fnt82 1687 2047(symbol)m 2447(places)s 3095(its)s 3371(parameter)s
+4385(in)s 4628(a)s 4794(page)s 5302(of)s 5573(\207x)s 3(ed)k
+6107(width,)s 6759(height,)s 7464(and)s 7868(mar)s 4(gins:)k
+220 fnt35 480 1546(def @P)m 8(age r)k -3(ight x)k 480 1258({)m
+480 970(    @P)m 8(ageWidth @Wide @P)k 8(ageHeight @High {)k 480 682(        //@P)m 8(ageMargin  ||@P)k 8(ageMargin)k
+480 394(        @HExpand @VExpand x)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 78 84
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(78)m 240 fnt83 7017 13843(Chapter)m 7867(4.)s
+8141(Examples)s 220 fnt35 480 13207(        ||@P)m 8(ageMargin  //@P)k 8(ageMargin)k
+480 12919(    })m 480 12631(})m 0 12134(@HExpand)m 240 fnt82 1169 12137(and)m
+220 fnt35 1568 12134(@VExpand)m 240 fnt82 2725 12137(ensure)m 3400(that)s
+3814(the)s 4157(right)s 4664(parameter)s 5673(occupies)s 6557(all)s
+6845(the)s 7189(a)s 4(v)k 6(ailable)k 8092(space;)s
+8730(this)s 0 11849(is)m 218(important)s 1215(when)s 1800(the)s
+2156(right)s 2676(parameter)s 3698(is)s 3916(unusually)s 4910(small.)s
+5599(The)s 220 fnt35 6036 11846(@High)m 240 fnt82 6763 11849(symbol)m
+7531(gi)s 6(v)k 3(es)k 8087(the)s 8443(page)s
+8960(a)s 0 11561(single)m 627(ro)s 6(w)k 1047(mark,)s
+1645(ensuring)s 2522(that)s 2940(it)s 3132(will)s 3558(be)s
+3840(printed)s 4575(on)s 4872(a)s 5038(single)s 5665(sheet)s
+6216(of)s 6487(paper)s 7078(\(page)s 7665(29\).)s 480 11187(Ne)m 3(xt)k
+1002(we)s 1337(ha)s 4(v)k 3(e)k 220 fnt35
+1838 11184(@OneP)m 8(age)k 240 fnt82 2972 11187(,)m 3079(de\207ning)s
+3917(a)s 4083(typical)s 4788(page)s 5296(of)s 5567(a)s
+5733(book)s 6274(or)s 6533(other)s 7084(document:)s 220 fnt35
+480 10686(def @OneP)m 8(age)k 480 10398(    named @Columns {})m 480 10110(    named @P)m 8(ageT)k 26(op {})k
+480 9822(    named @P)m 8(ageF)k 6(oot {})k 480 9534({)m 480 9246(    @P)m 8(age {)k
+480 8958(        @P)m 8(ageT)k 26(op)k 480 8670(        //@MidGap  @T)m 26(opList)k
+480 8382(        //@MidGap  @FullPlace)m 480 8094(        //@MidGap  @ColList @Columns)m 480 7806(        // //1r)m -8(t   @OneRo)k 3(w { //@MidGap @F)k 6(ootSect //@MidGap @P)k 8(ageF)k 6(oot })k
+480 7518(    })m 480 7230(})m 240 fnt82 0 6736(The)m 431(page)s
+943(top)s 1305(and)s 1713(page)s 2224(foot,)s 2720(and)s
+3128(the)s 3479(number)s 4274(of)s 4548(columns,)s 5470(are)s
+5821(parameters)s 6922(that)s 7344(will)s 7773(be)s 8059(gi)s 6(v)k 3(en)k
+8643(later)s 0 6448(when)m 220 fnt35 565 6445(@OneP)m 8(age)k
+240 fnt82 1747 6448(is)m 1946(in)s 9(v)k 4(ok)k 2(ed.)k
+2855(The)s 3272(body)s 3794(of)s 4054(the)s 4390(page)s
+4887(is)s 5085(a)s 5240(straightforw)s 2(ard)k 6756(combination)s
+7998(of)s 8257(pre)s 6(vious)k 0 6160(de\207nitions.)m 1171(The)s
+220 fnt35 1595 6157(//)m 240 fnt82 1777 6160(symbol)m 2533(protects)s
+3337(the)s 3681(follo)s 6(wing)k 220 fnt35 4655 6157(//1r)m -8(t)k
+240 fnt82 5093 6160(from)m 5614(deletion)s 6437(in)s 6677(the)s
+7021(unlik)s 2(ely)k 7854(e)s 6(v)k 3(ent)k
+8419(that)s 8833(all)s 0 5872(the)m 342(preceding)s 1331(symbols)s
+2174(are)s 2514(replaced)s 3375(by)s 220 fnt35 3662 5869(@Null)m
+240 fnt82 4247 5872(.)m 4405(The)s 4826(follo)s 6(wing)k
+5797(object)s 6434(is)s 6638(enclosed)s 7526(in)s 220 fnt35
+7763 5869(@OneRo)m 3(w)k 240 fnt82 8887 5872(to)m 0 5584(ensure)m
+680(that)s 1098(all)s 1391(of)s 1662(it)s 1854(is)s
+2064(bottom-justi\207ed,)s 3698(not)s 4064(just)s 4469(its)s 4745(\207rst)s
+5176(component.)s 480 5210(Before)m 1199(presenting)s 2262(the)s 2624(de\207nition)s
+3612(of)s 3896(a)s 4076(sequence)s 5023(of)s 5308(pages,)s
+5974(we)s 6322(must)s 6861(detour)s 7546(to)s 7799(describe)s
+8665(ho)s 6(w)k 0 4922(running)m 803(page)s 1317(headers)s
+2104(and)s 2513(footers)s 3233(\(lik)s 2(e)k 3730(those)s
+4297(in)s 4545(the)s 4899(present)s 5655(document\))s 6732(are)s
+7085(produced.)s 8146(These)s 8779(are)s 0 4634(based)m 603(on)s
+900(the)s 220 fnt35 1248 4631(@Runner)m 240 fnt82 2250 4634(symbol:)m
+220 fnt35 480 4133(e)m 6(xpor)k -8(t @T)k 26(opOdd @T)k 26(opEv)k 5(en @F)k 6(ootOdd @F)k 6(ootEv)k 5(en)k
+480 3845(def @Runner)m 480 3557(    named @T)m 26(opOdd r)k -3(ight @P)k 8(ageNum { @Null })k
+480 3269(    named @T)m 26(opEv)k 5(en r)k -3(ight @P)k 8(ageNum { @Null })k
+480 2981(    named @F)m 6(ootOdd r)k -3(ight @P)k 8(ageNum { @Null })k 480 2693(    named @F)m 6(ootEv)k 5(en r)k -3(ight @P)k 8(ageNum { @Null })k
+480 2405(    named @T)m 26(ag {})k 480 2117({ @Null })m 240 fnt82 0 1623(The)m
+440(four)s 910(parameters)s 2020(control)s 2764(the)s 3125(format)s
+3833(of)s 4116(running)s 4926(headers)s 5719(and)s 6136(footers)s
+6862(on)s 7171(odd)s 7601(and)s 8017(e)s 6(v)k 3(en)k
+8530(pages)s 0 1335(respecti)m 6(v)k 3(ely)k 15(.)k
+1294(In)s 9(v)k 4(ocations)k 2448(of)s 220 fnt35
+2719 1332(@Runner)m 240 fnt82 3661 1335(,)m 3768(for)s 4106(e)s 3(xample)k
+220 fnt35 480 834(@Runner)m 480 546(    @T)m 26(opEv)k 5(en { @B @P)k 8(ageNum |1r)k -8(t @I { Chapter 4 } })k
+480 258(    @T)m 26(opOdd  { @I { Examples }   |1r)k -8(t @B @P)k 8(ageNum })k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 79 85
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(4.3.)m 454(P)s 19(a)k 2(g)k 2(e)k
+976(layout)s 240 fnt84 8832 13840(79)m 240 fnt82 0 13205(will)m
+416(be)s 687(embedded)s 1719(in)s 1951(the)s 2289(body)s
+2812(te)s 3(xt)k 3217(of)s 3477(the)s 3815(document,)s
+4855(and,)s 5298(as)s 5537(we)s 5862(will)s 6277(see)s
+6628(in)s 6860(a)s 7016(moment,)s 7896(are)s 8232(accessed)s
+0 12917(by)m 220 fnt35 296 12914(@Runner&&f)m 6(ollo)k 3(wing)k
+240 fnt82 2423 12917(cross)m 2967(references)s 4001(on)s 4301(the)s
+4651(pages.)s 5363(Notice)s 6059(ho)s 6(w)k 6522(the)s
+220 fnt35 6873 12914(@P)m 8(ageNum)k 240 fnt82 8112 12917(parameter)m
+0 12629(of)m 265(each)s 753(parameter)s 1761(allo)s 6(ws)k
+2423(the)s 2764(format)s 3454(of)s 3718(the)s 4059(running)s
+4851(header)s 5541(to)s 5774(be)s 6049(speci\207ed)s 6950(while)s
+7531(lea)s 4(ving)k 8277(the)s 8618(page)s 0 12341(number)m
+791(to)s 1030(be)s 1312(substituted)s 2406(later)s 13(.)k
+480 11967(W)m 19(e)k 843(may)s 1303(no)s 6(w)k
+1758(de\207ne)s 220 fnt35 2393 11964(@OddP)m 8(ageList)k 240 fnt82
+3872 11967(,)m 3973(whose)s 4635(result)s 5219(is)s 5423(a)s
+5583(sequence)s 6510(of)s 6775(pages)s 7365(be)s 3(ginning)k
+8367(with)s 8843(an)s 0 11679(odd-numbered)m 1454(page:)s 220 fnt35
+480 11178(def @OddP)m 8(ageList)k 480 10890(    named @Columns {})m 480 10602(    r)m -3(ight @P)k 8(ageNum)k
+480 10314({)m 480 10026(    def @Ev)m 5(enP)k 8(ageList ...)k 480 9450(        @P)m 8(ageMar)k -3(k)k 4(er @P)k 8(ageNum)k
+480 9162(    //  @Runner&&f)m 6(ollo)k 3(wing @Open {)k 480 8874(            @OneP)m 8(age)k
+480 8586(                @Columns { @Columns })m 480 8298(                @P)m 8(ageT)k 26(op { @T)k 26(opOdd @P)k 8(ageNum })k
+480 8010(                @P)m 8(ageF)k 6(oot { @F)k 6(ootOdd @P)k 8(ageNum })k
+480 7722(        })m 480 7434(    //  @Ev)m 5(enP)k 8(ageList)k 480 7146(            @Columns { @Columns })m
+480 6858(            @Ne)m 6(xt @P)k 8(ageNum)k 480 6570(})m 240 fnt82
+0 6076(Ignoring)m 220 fnt35 887 6073(@Ev)m 5(enP)k 8(ageList)k
+240 fnt82 2516 6076(for)m 2865(the)s 3223(moment,)s 4125(notice)s
+4775(\207rst)s 5217(that)s 5645(the)s 6004(in)s 9(v)k 4(ocation)k
+7068(of)s 220 fnt35 7350 6073(@OneP)m 8(age)k 240 fnt82
+8554 6076(is)m 8775(en)s 8998(-)s 0 5788(closed)m 679(in)s
+220 fnt35 932 5785(@Runner&&f)m 6(ollo)k 3(wing @Open)k 240 fnt82
+3815 5788(.)m 3989(Since)s 220 fnt35 4586 5785(@Runner&&f)m 6(ollo)k 3(wing)k
+240 fnt82 6721 5788(refers)m 7324(to)s 7573(the)s 7931(\207rst)s
+8373(in)s 9(v)k 4(oca)k 8998(-)s 0 5500(tion)m
+421(of)s 220 fnt35 684 5497(@Runner)m 240 fnt82 1678 5500(appearing)m
+2666(after)s 3154(itself)s 3694(in)s 3929(the)s 4269(\207nal)s
+4741(printed)s 5468(document,)s 6511(the)s 6851(symbols)s 220 fnt35
+7692 5497(@T)m 26(opOdd)k 240 fnt82 8722 5500(and)m 220 fnt35
+0 5209(@F)m 6(ootOdd)k 240 fnt82 1127 5212(will)m 1562(tak)s 2(e)k
+2023(their)s 2528(v)s 6(alue)k 3105(from)s 3638(the)s
+3995(\207rst)s 4434(in)s 9(v)k 4(ocation)k 5497(of)s
+220 fnt35 5777 5209(@Runner)m 240 fnt82 6788 5212(follo)m 6(wing)k
+7773(the)s 8130(top)s 8498(of)s 8778(the)s 0 4924(page,)m
+554(e)s 6(v)k 3(en)k 1049(though)s 220 fnt35
+1767 4921(@F)m 6(ootOdd)k 240 fnt82 2880 4924(appears)m 3656(at)s
+3883(the)s 4225(foot)s 4665(of)s 4931(the)s 5274(page.)s
+5884(Their)s 220 fnt35 6456 4921(@P)m 8(ageNum)k 240 fnt82
+7687 4924(parameters)m 8779(are)s 0 4636(replaced)m 867(by)s 220 fnt35
+1161 4633(@P)m 8(ageNum)k 240 fnt82 2337 4636(,)m 2444(the)s
+2792(actual)s 3417(page)s 3925(number)s 4716(parameter)s 5730(of)s
+220 fnt35 6001 4633(@OddP)m 8(ageList)k 240 fnt82 7480 4636(.)m
+480 4262(After)m 1043(producing)s 2067(the)s 2415(odd-numbered)s 3869(page,)s
+220 fnt35 4428 4259(@OddP)m 8(ageList)k 240 fnt82 5967 4262(in)m 9(v)k 4(ok)k 2(es)k
+220 fnt35 6748 4259(@Ev)m 5(enP)k 8(ageList)k 240 fnt82
+8307 4262(:)m 220 fnt35 480 3761(def @Ev)m 5(enP)k 8(ageList)k
+480 3473(    named @Columns {})m 480 3185(    r)m -3(ight @P)k 8(ageNum)k 480 2897({)m
+480 2609(        @P)m 8(ageMar)k -3(k)k 4(er @P)k 8(ageNum)k
+480 2321(    //  @Runner&&f)m 6(ollo)k 3(wing @Open {)k 480 2033(            @OneP)m 8(age)k
+480 1745(                @Columns { @Columns })m 480 1457(                @P)m 8(ageT)k 26(op { @T)k 26(opEv)k 5(en @P)k 8(ageNum })k
+480 1169(                @P)m 8(ageF)k 6(oot { @F)k 6(ootEv)k 5(en @P)k 8(ageNum })k
+480 881(        })m 480 593(    //  @OddP)m 8(ageList)k 480 305(            @Columns { @Columns })m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 80 86
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(80)m 240 fnt83 7017 13843(Chapter)m 7867(4.)s
+8141(Examples)s 220 fnt35 480 13207(            @Ne)m 6(xt @P)k 8(ageNum)k
+480 12919(})m 240 fnt82 0 12425(This)m 465(produces)s 1369(an)s
+1641(e)s 6(v)k 3(en-numbered)k 3167(page,)s 3714(then)s
+4172(passes)s 4823(the)s 5160(ball)s 5562(back)s 6063(to)s
+220 fnt35 6291 12422(@OddP)m 8(ageList)k 240 fnt82 7819 12425(\211)m
+7988(a)s 8142(delightful)s 0 12137(e)m 3(xample)k 877(of)s
+1162(what)s 1701(computer)s 2678(scientists)s 3619(call)s 4032(mutual)s
+4765(recursion.)s 5832(The)s 6274(tw)s 2(o)k 6699(page)s
+7221(types)s 7791(dif)s 6(fer)k 8388(only)s 8883(in)s
+0 11849(their)m 497(running)s 1295(headers)s 2076(and)s 2480(footers,)s
+3250(b)s 4(ut)k 3612(other)s 4163(changes)s 4985(could)s
+5575(easily)s 6186(be)s 6468(made.)s 480 11475(It)m 682(w)s 2(as)k
+1099(foreshado)s 6(wed)k 2489(earlier)s 3153(that)s 3568(an)s
+3847(in)s 9(v)k 4(ocation)k 4897(of)s 220 fnt35
+5164 11472(@P)m 8(ageMar)k -3(k)k 4(er)k 240 fnt82
+6630 11475(w)m 2(ould)k 7281(precede)s 8076(each)s 8567(page,)s
+0 11187(and)m 412(this)s 817(has)s 1195(been)s 1713(done.)s
+2351(Although)s 3322(this)s 220 fnt35 3726 11184(@P)m 8(ageMar)k -3(k)k 4(er)k
+240 fnt82 5204 11187(is)m 5422(a)s 5597(component)s 6729(of)s
+7009(the)s 7365(root)s 7819(g)s 1(alle)k 3(y)k 15(,)k
+8499(it)s 8700(will)s 0 10899(not)m 366(cause)s 953(a)s
+1119(page)s 1627(to)s 1866(be)s 2148(printed,)s 2932(because)s
+3745(Basser)s 4442(Lout)s 4954(skips)s 5497(components)s 6705(of)s
+6976(height)s 7634(zero.)s 240 fnt84 0 10106(4.4.)m 471(Chapters)s
+1468(and)s 1909(sections)s 240 fnt82 480 9629(The)m 905(de\207nitions)s
+1962(of)s 2229(chapters)s 3073(and)s 3473(sections)s 4290(from)s
+4811(the)s 5155(DocumentSetup)s 6746(package)s 7583(of)s 7850(V)s 26(ersion)k
+8634(2)s 8804(\(in)s 0 9341(V)m 26(ersion)k 793(3,)s
+1026(the)s 1379(BookSetup)s 2503(e)s 3(xtension)k 3480(of)s
+3756(DocumentSetup\))s 5432(form)s 5961(the)s 6315(subject)s 7058(of)s
+7334(this)s 7736(section.)s 8583(The)s 3(y)k 0 9053(allo)m 6(w)k
+579(a)s 745(chapter)s 1508(to)s 1747(be)s 2029(entered)s
+2790(lik)s 2(e)k 3202(this:)s 220 fnt35 480 8552(@Chapter)m
+480 8264(    @Title { ...)m 13( })k 480 7976(    @T)m 26(ag { ...)k 13( })k
+480 7688(@Begin)m 480 7400(    ...)m 480 7112(@End @Chapter)m 240 fnt82 0 6616(W)m 9(ithin)k
+712(the)s 1060(chapter)s 1823(a)s 1989(sequence)s 2922(of)s
+3193(sections)s 4014(may)s 4480(be)s 4762(included)s 5644(by)s
+5938(writing)s 220 fnt35 480 6115(@BeginSections)m 480 5827(@Section { ...)m 13( })k
+480 5539(...)m 480 5251(@Section { ...)m 13( })k 480 4963(@EndSections)m 240 fnt82
+0 4508(These)m 627(are)s 974(numbered)s 1989(automatically)s 15(,)k
+3381(and)s 3785(an)s 4068(entry)s 4613(is)s 4823(made)s
+5397(for)s 5735(each)s 6230(in)s 6473(a)s 6639(table)s
+7159(of)s 7430(contents.)s 480 4134(The)m 901(user)s 1352(of)s
+1615(the)s 1956(DocumentSetup)s 3544(package)s 4376(can)s 4758(\207nd)s
+5182(the)s 5522(number)s 6306(of)s 6570(the)s 6910(chapter)s
+7666(or)s 7918(section)s 8644(with)s 0 3846(a)m 176(gi)s 6(v)k 3(en)k
+766(tag)s 1121(by)s 1426(writing)s 220 fnt35 2179 3843(@NumberOf tag)m
+240 fnt82 3838 3846(at)m 4081(an)s 3(y)k 4488(point)s
+5050(in)s 5304(the)s 5662(document.)s 6780(This)s 7267(feature)s
+7995(is)s 8215(based)s 8829(on)s 0 3558(the)m 348(follo)s 6(wing)k
+1325(de\207nitions:)s 220 fnt35 480 3057(e)m 6(xpor)k -8(t @T)k 26(ag)k
+480 2769(def @NumberMar)m -3(k)k 4(er r)k -3(ight @T)k 26(ag { @Null })k
+480 2193(def @NumberOf r)m -3(ight x)k 480 1905({  @NumberMar)m -3(k)k 4(er&&x @Open { @T)k 26(ag }  })k
+240 fnt82 0 1406(Each)m 522(chapter)s 1272(and)s 1663(section)s
+2384(will)s 2797(contain)s 3545(one)s 3934(in)s 9(v)k 4(ocation)k
+4975(of)s 220 fnt35 5233 1403(@NumberMar)m -3(k)k 4(er)k
+240 fnt82 6918 1406(;)m 7017(a)s 7170(full)s 7543(e)s 3(xplanation)k
+8700(will)s 0 1118(be)m 282(gi)s 6(v)k 3(en)k
+862(later)s 13(.)k 480 744(A)m 710(sequence)s 1643(of)s
+1914(places)s 2562(for)s 2900(recei)s 6(ving)k 3836(chapters)s
+4683(is)s 4893(easily)s 5504(de\207ned:)s 220 fnt35 480 243(e)m 6(xpor)k -8(t @T)k 26(ag)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 81 87
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(4.4.)m 454(Chapter)s 2(s)k 1385(and)s
+1811(sections)s 240 fnt84 8839 13840(81)m 220 fnt35 480 13207(def @ChapterList r)m -3(ight @T)k 26(ag)k
+480 12919({)m 480 12631(    @Galle)m 4(y)k 480 12343(    //@ChapterGap  @ChapterList @Ne)m 6(xt @T)k 26(ag)k
+480 12055(})m 0 11558(@ChapterGap)m 240 fnt82 1505 11561(will)m 1967(usually)s
+2747(be)s 220 fnt35 3065 11558(1.1b)m 240 fnt82 3484 11561(,)m
+3626(ensuring)s 4539(that)s 4992(each)s 5523(chapter)s 6321(be)s 3(gins)k
+7030(on)s 7362(a)s 7564(ne)s 6(w)k 8046(page.)s
+8698(The)s 220 fnt35 0 11270(@Chapter)m 240 fnt82 1063 11273(g)m 1(alle)k 3(y)k
+1697(itself)s 2245(is)s 2455(de\207ned)s 3218(as)s 3468(follo)s 6(ws:)k
+220 fnt35 480 10772(e)m 6(xpor)k -8(t @F)k 6(ootNote @BeginSections @EndSections @Section)k
+480 10484(def @Chapter f)m 6(orce into { @ChapterList&&preceding })k 480 10196(    named @T)m 26(ag {})k 480 9908(    named @Title {})m
+480 9620(    named @RunningTitle { dft })m 480 9332(    body @Body)m 480 9044({)m 480 8756(    def @F)m 6(ootNote r)k -3(ight x { @ColF)k 6(ootNote x })k
+480 8180(    def @BeginSections ...)m 480 7892(    def @EndSections ...)m 480 7604(    def @Section ...)m 480 7151(    def @ChapterTitle)m 480 6863(    {)m
+480 6575(        @ChapterNumbers @Case {)m 480 6287(            {Y)m 30(es y)k 4(es}  @Y)k 4(ield  { Chapter {@NumberOf @T)k 26(ag}.)k 13(  |2s  @Title })k
+480 5999(            else  @Y)m 4(ield  @Title)k 480 5711(        })m 480 5423(    })m 480 4847(    def @ChapterNum)m
+480 4559(    {)m 480 4271(        @ChapterNumbers @Case {)m 480 3983(            {Y)m 30(es y)k 4(es}  @Y)k 4(ield  { Chapter {@NumberOf @T)k 26(ag} })k
+480 3695(            else  @Y)m 4(ield @Null)k 480 3407(        })m 480 3119(    })m 480 2627(        r)m 2(agged @Break @BookTitleF)k 6(or)k -5(mat @ChapterTitle)k
+480 2339(    //  @NumberMar)m -3(k)k 4(er {)k 480 2051(            @ChapterList&&@T)m 26(ag @Open { @T)k 26(ag })k
+480 1763(        })m 480 1475(    //  @ChapterList&&preceding  @T)m 26(agged @T)k 26(ag)k 480 1187(    //  @NumberMar)m -3(k)k 4(er&&preceding @T)k 26(agged @T)k 26(ag)k
+480 899(    //  @P)m 8(ageMar)k -3(k)k 4(er&&preceding   @T)k 26(agged @T)k 26(ag)k
+480 611(    //  { @ChapterTitle } @MajorContentsEntr)m -6(y {@P)k 8(ageOf @T)k 26(ag})k 480 323(    //  @Runner)m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 82 88
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(82)m 240 fnt83 7017 13843(Chapter)m 7867(4.)s
+8141(Examples)s 220 fnt35 480 13207(            @F)m 6(ootEv)k 5(en { |0.5r)k -8(t 0.8f @F)k 6(ont @B @P)k 8(ageNum })k
+480 12919(            @F)m 6(ootOdd  { |0.5r)k -8(t 0.8f @F)k 6(ont @B @P)k 8(ageNum })k
+480 12631(    //  @Body)m 480 12343(    //@SectionGap @ChapRefSection)m 480 12055(    //  @Runner)m 480 11767(            @T)m 26(opEv)k 5(en { @B @P)k 8(ageNum |1r)k -8(t @I @ChapterNum })k
+480 11479(            @T)m 26(opOdd  { @I {@RunningTitle @OrElse @Title} |1r)k -8(t @B @P)k 8(ageNum })k 480 11191(})m
+240 fnt82 0 10697(W)m 19(e)k 371(will)s 800(see)s
+1164(the)s 1515(symbols)s 2366(for)s 2707(sections)s 3531(shortly)s 15(.)k
+4347(Notice)s 5042(ho)s 6(w)k 5506(their)s 6006(use)s
+6384(has)s 6756(been)s 7268(restricted)s 8216(to)s 8458(within)s
+0 10409(the)m 348(right)s 859(parameter)s 1873(of)s 220 fnt35
+2144 10406(@Chapter)m 240 fnt82 3147 10409(,)m 3254(by)s 3548(nesting)s
+4292(them)s 4830(and)s 5234(using)s 5806(a)s 5972(body)s
+6506(parameter)s 13(.)k 480 10035(The)m 956(meaning)s 1882(of)s
+220 fnt35 2202 10032(@F)m 6(ootNote)k 240 fnt82 3422 10035(within)m
+220 fnt35 4139 10032(@Chapter)m 240 fnt82 5250 10035(has)m 5669(been)s
+6227(set)s 6601(to)s 220 fnt35 6889 10032(@ColF)m 6(ootNote)k
+240 fnt82 8328 10035(,)m 8484(which)s 0 9747(produces)m 907(a)s
+1064(footnote)s 1908(tar)s 4(geted)k 2722(to)s 220 fnt35
+2953 9744(@ColF)m 6(ootList)k 240 fnt82 4325 9747(\(see)m 4756(Section)s
+5521(4.3\).)s 6056(In)s 6303(other)s 6845(w)s 2(ords,)k
+7526(footnotes)s 8458(within)s 0 9459(chapters)m 851(go)s 1149(at)s
+1386(the)s 1739(foot)s 2189(of)s 2465(the)s 2818(column,)s
+3648(not)s 4019(at)s 4256(the)s 4609(foot)s 5059(of)s
+5335(the)s 5688(page.)s 6309(\(Of)s 6717(course,)s 7453(in)s
+7701(single-column)s 0 9171(books)m 623(this)s 1018(distinction)s 2083(is)s
+2292(insigni\207cant.\))s 220 fnt35 3721 9168(@ChapterTitle)m 240 fnt82 5188 9171(and)m
+220 fnt35 5591 9168(@ChapterNum)m 240 fnt82 7102 9171(are)m 7448(tri)s 6(vial)k
+8065(de\207nitions)s 0 8883(which)m 642(v)s 6(ary)k 1115(depending)s
+2166(on)s 2463(whether)s 3293(the)s 3641(user)s 4099(has)s
+4469(requested)s 5443(numbered)s 6458(chapters)s 7305(or)s 7564(not.)s
+480 8509(Each)m 1014(in)s 9(v)k 4(ocation)k 2066(of)s
+220 fnt35 2336 8506(@Chapter)m 240 fnt82 3397 8509(has)m 3766(its)s
+4040(o)s 6(wn)k 4503(unique)s 220 fnt35 5209 8506(@T)m 26(ag)k
+240 fnt82 5772 8509(,)m 5878(either)s 6479(supplied)s 7347(by)s
+7639(the)s 7986(user)s 8442(or)s 8699(else)s 0 8221(inserted)m
+835(automatically)s 2210(by)s 2525(Lout.)s 3162(W)s 19(e)k
+3553(no)s 6(w)k 4035(trace)s 4575(the)s 4944(cross)s
+5507(referencing)s 6669(of)s 6961(chapter)s 7745(numbers)s 8641(on)s
+8960(a)s 0 7933(h)m 1(ypothetical)k 1236(third)s 1745(chapter)s
+2508(whose)s 3176(tag)s 3521(is)s 220 fnt35 3731 7930(euclid)m
+240 fnt82 4291 7933(.)m 220 fnt35 480 7556(@ChapterList&&preceding @T)m 26(agged euclid)k
+240 fnt82 4758 7559(attaches)m 220 fnt35 5574 7556(euclid)m 240 fnt82
+6190 7559(as)m 6436(an)s 6715(e)s 3(xtra)k 7245(tag)s
+7586(to)s 7821(the)s 8165(\207rst)s 8592(in)s 9(v)k 4(o)k
+8998(-)s 0 7271(cation)m 653(of)s 220 fnt35 937 7268(@ChapterList)m
+240 fnt82 2350 7271(preceding)m 3359(itself)s 3920(in)s 4176(the)s
+4536(\207nal)s 5029(printed)s 5777(document.)s 6898(But)s 7317(this)s
+220 fnt35 7726 7268(@ChapterList)m 240 fnt82 0 6983(must)m 525(be)s
+807(the)s 1155(tar)s 4(get)k 1754(of)s 2025(the)s
+2373(chapter)s 9(,)k 3174(and)s 3578(so)s 220 fnt35
+480 6482(@ChapterList&&euclid @Open { @T)m 26(ag })k 240 fnt82 0 5983(is)m 200(3,)s
+416(the)s 754(number)s 1534(of)s 1795(the)s 2132(chapter)s
+2885(\()s 220 fnt35 2958 5980(@T)m 26(ag)k 240 fnt82
+3570 5983(refers)m 4153(to)s 4381(the)s 4719(parameter)s 5722(of)s
+220 fnt35 5983 5980(@ChapterList)m 240 fnt82 7323 5983(,)m 7419(not)s
+7775(the)s 8112(parameter)s 0 5695(of)m 220 fnt35 272 5692(@Chapter)m
+240 fnt82 1275 5695(\).)m 1520(Consequently)s 2892(the)s 3242(in)s 9(v)k 4(ocation)k
+4297(of)s 220 fnt35 4570 5692(@NumberMar)m -3(k)k 4(er)k
+240 fnt82 6317 5695(within)m 6986(the)s 7336(chapter)s 8100(is)s
+8312(equal)s 8887(to)s 220 fnt35 0 5404(@NumberMar)m -3(k)k 4(er 3)k
+240 fnt82 1861 5407(.)m 220 fnt35 480 5030(@NumberMar)m -3(k)k 4(er&&preceding @T)k 26(agged euclid)k
+240 fnt82 5137 5033(attaches)m 220 fnt35 5992 5030(euclid)m 240 fnt82
+6646 5033(to)m 220 fnt35 6920 5030(@NumberMar)m -3(k)k 4(er 3)k
+240 fnt82 8876 5033(as)m 0 4745(an)m 283(e)s 3(xtra)k
+817(tag,)s 1216(and)s 1620(so)s 220 fnt35 1886 4742(@NumberOf euclid)m
+240 fnt82 3742 4745(,)m 3849(which)s 4491(e)s 3(xpands)k
+5324(to)s 220 fnt35 480 4244(@NumberMar)m -3(k)k 4(er&&euclid @Open { @T)k 26(ag })k
+240 fnt82 0 3745(must)m 538(be)s 833(equal)s 1419(to)s
+1671(3,)s 1911(as)s 2175(required.)s 3148(This)s 3637(scheme)s
+4423(could)s 5026(be)s 5322(simpli\207ed)s 6349(by)s 6656(placing)s
+7426(the)s 7787(in)s 9(v)k 4(ocation)k 8855(of)s
+220 fnt35 0 3454(@NumberMar)m -3(k)k 4(er)k 240 fnt82
+1758 3457(within)m 220 fnt35 2440 3454(@ChapterList)m 240 fnt82 3854 3457(rather)m
+4484(than)s 4966(within)s 220 fnt35 5648 3454(@Chapter)m 240 fnt82
+6651 3457(,)m 6772(b)s 4(ut)k 7148(it)s 7353(turns)s
+7896(out)s 8276(that)s 8708(that)s 0 3169(scheme)m 773(does)s
+1263(not)s 1629(generalize)s 2666(well)s 3132(to)s 3371(sections)s
+4192(and)s 4596(subsections.)s 480 2795(There)m 1124(is)s 1365(a)s
+1562(trap)s 2017(for)s 2386(the)s 2765(unw)s 2(ary)k
+3566(in)s 3840(the)s 4219(use)s 4625(of)s 220 fnt35
+4927 2792(preceding)m 240 fnt82 5969 2795(and)m 220 fnt35 6404 2792(f)m 6(ollo)k 3(wing)k
+240 fnt82 7234 2795(.)m 7429(Suppose)s 8328(that)s 8778(the)s
+0 2507(in)m 9(v)k 4(ocation)k 1054(of)s 220 fnt35
+1325 2504(@NumberMar)m -3(k)k 4(er)k 240 fnt82 3070 2507(within)m
+220 fnt35 3738 2504(@Chapter)m 240 fnt82 4801 2507(is)m 5011(replaced)s
+5878(by)s 6172(the)s 6520(seemingly)s 7557(equi)s 6(v)k 6(alent)k
+220 fnt35 480 2006(@NumberMar)m -3(k)k 4(er { @ChapterList&&preceding @Open { @T)k 26(ag } })k
+240 fnt82 0 1507(No)m 6(w)k 514(suppose)s 1342(that)s
+220 fnt35 1760 1504(@NumberOf euclid)m 240 fnt82 3676 1507(appears)m 4457(some)s 6(where)k
+5596(within)s 6264(Chapter)s 7081(7.)s 7365(It)s 7570(will)s
+7996(e)s 3(xpand)k 8743(to)s 220 fnt35 480 1006(@NumberMar)m -3(k)k 4(er&&euclid @Open { @T)k 26(ag })k
+240 fnt82 0 507(which)m 642(w)s 2(ould)k 1297(no)s 6(w)k
+1758(be)s 2040(equal)s 2613(to)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 83 89
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(4.4.)m 454(Chapter)s 2(s)k 1385(and)s
+1811(sections)s 240 fnt84 8833 13840(83)m 220 fnt35 480 13207(@ChapterList&&preceding @Open { @T)m 26(ag })k
+240 fnt82 0 12708(whose)m 663(v)s 6(alue,)k 1276(e)s 6(v)k 6(aluated)k
+2233(as)s 2477(it)s 2663(is)s 2868(within)s 3530(Chapter)s
+4342(7,)s 4563(is)s 4767(7,)s 4989(not)s 5349(3.)s
+5628(Use)s 6050(of)s 220 fnt35 6315 12705(preceding)m 240 fnt82
+7321 12708(or)m 220 fnt35 7574 12705(f)m 6(ollo)k 3(wing)k
+240 fnt82 8458 12708(within)m 0 12420(the)m 348(parameter)s 1362(of)s
+1633(a)s 1799(symbol,)s 2611(rather)s 3227(than)s 3696(within)s
+4364(the)s 4712(body)s 15(,)k 5284(is)s 5494(lik)s 2(ely)k
+6090(to)s 6329(be)s 6611(erroneous.)s 480 12046(Much)m 1112(of)s
+1400(the)s 1765(remainder)s 2810(of)s 3098(the)s 3463(de\207nition)s
+4454(of)s 220 fnt35 4742 12043(@Chapter)m 240 fnt82 5822 12046(is)m
+6049(f)s 2(airly)k 6634(self-e)s 3(xplanatory:)k 8366(there)s
+8916(is)s 0 11758(a)m 180(heading,)s 1060(a)s 1241(tag)s
+1601(sent)s 2060(to)s 2314(mark)s 2881(the)s 3244(page)s
+3766(on)s 4078(which)s 4735(the)s 5098(chapter)s 5875(be)s 3(gins,)k
+6619(a)s 220 fnt35 6800 11755(@ContentsEntr)m -6(y)k 240 fnt82
+8492 11758(g)m 1(alle)k 3(y)k 0 11470(sent)m 484(to)s
+762(the)s 1149(table)s 1708(of)s 2018(contents,)s 2961(g)s 1(alle)k 3(ys)k
+3724(for)s 4101(the)s 4489(\207gures)s 5230(and)s 5673(tables)s
+6320(of)s 6630(the)s 7017(chapter)s 7819(to)s 8097(collect)s
+8833(in,)s 220 fnt35 0 11179(@Body)m 240 fnt82 781 11182(where)m
+1421(the)s 1769(body)s 2303(of)s 2574(the)s 2922(chapter)s
+3685(goes,)s 4230(and)s 220 fnt35 4634 11179(@ChapRefSection)m 240 fnt82
+6499 11182(to)m 6738(hold)s 7222(a)s 7388(concluding)s 8505(list)s
+8855(of)s 0 10894(references.)m 1144(This)s 1620(lea)s 4(v)k 3(es)k
+2261(only)s 2741(the)s 3089(tw)s 2(o)k 3499(in)s 9(v)k 4(ocations)k
+4640(of)s 220 fnt35 4911 10891(@Runner)m 240 fnt82 5913 10894(to)m
+6152(e)s 3(xplain.)k 480 10520(The)m 977(\207rst)s 220 fnt35
+1478 10517(@Runner)m 240 fnt82 2550 10520(is)m 2830(just)s 3305(belo)s 6(w)k
+4008(the)s 4426(heading.)s 5418(It)s 5693(will)s 6189(be)s
+6541(the)s 6959(tar)s 4(get)k 7628(of)s 7969(the)s
+220 fnt35 8387 10517(@Run)m 240 fnt82 8998 10520(-)m 220 fnt35
+0 10229(ner&&f)m 6(ollo)k 3(wing)k 240 fnt82 1494 10232(cross)m
+2030(reference)s 2967(at)s 3194(the)s 3536(be)s 3(ginning)k
+4538(of)s 4803(the)s 5146(\207rst)s 5571(page)s 6073(of)s
+6338(the)s 6681(chapter)s 7438(\(see)s 7872(Section)s 8640(4.3\),)s
+0 9944(which)m 642(consequently)s 1959(will)s 2385(ha)s 4(v)k 3(e)k
+2886(null)s 3313(running)s 4111(headers)s 4892(and)s 5296(the)s
+5644(gi)s 6(v)k 3(en)k 6224(footers.)s 480 9570(The)m
+954(second)s 220 fnt35 1724 9567(@Runner)m 240 fnt82 2772 9570(appears)m
+3600(at)s 3878(the)s 4273(v)s 3(ery)k 4795(end)s
+5246(of)s 5563(the)s 5958(chapter)s 9(,)k 6805(hence)s
+7466(on)s 7809(its)s 8132(last)s 8570(page.)s 0 9282(Since)m
+595(no)s 896(in)s 9(v)k 4(ocations)k 2046(of)s
+220 fnt35 2325 9279(@Runner)m 240 fnt82 3335 9282(lie)m 3638(between)s
+4500(it)s 4700(and)s 5113(the)s 5469(\207rst)s 220 fnt35
+5908 9279(@Runner)m 240 fnt82 6850 9282(,)m 6966(it)s 7166(will)s
+7600(be)s 7891(the)s 8247(tar)s 4(get)k 8855(of)s
+220 fnt35 0 8991(@Runner&&f)m 6(ollo)k 3(wing)k 240 fnt82
+2134 8994(on)m 2442(e)s 6(v)k 3(ery)k 3029(page)s
+3547(from)s 4082(the)s 4441(second)s 5175(page)s 5693(of)s
+5975(the)s 6334(chapter)s 7107(to)s 7357(the)s 7716(last,)s
+8165(inclusi)s 6(v)k 3(e,)k 0 8706(and)m 404(will)s
+830(supply)s 1523(the)s 1871(format)s 2567(of)s 2838(their)s
+3335(headers)s 4116(and)s 4520(footers.)s 480 8332(The)m 908(interested)s
+1893(reader)s 2549(might)s 3166(care)s 3618(to)s 3857(predict)s
+4579(the)s 4927(outcome)s 5806(in)s 6048(unusual)s 6848(cases,)s
+7458(such)s 7954(as)s 8203(when)s 8778(the)s 0 8044(heading)m
+811(occupies)s 1699(tw)s 2(o)k 2109(pages,)s 2761(or)s
+3020(when)s 3596(a)s 3762(chapter)s 4524(occupies)s 5412(only)s
+5892(one,)s 6345(or)s 6604(\(assuming)s 7640(a)s 7806(change)s
+8540(to)s 8778(the)s 0 7756(g)m 1(ap)k 386(between)s
+1227(chapters\))s 2138(when)s 2702(a)s 2855(chapter)s 3605(starts)s
+4146(halfw)s 2(ay)k 4956(do)s 6(wn)k 5527(a)s
+5680(page.)s 6283(Such)s 6807(predictions)s 7907(can)s 8283(be)s
+8552(made)s 0 7468(with)m 482(great)s 1019(con\207dence.)s 480 7094(The)m
+903(e)s 3(xpression)k 220 fnt35 1975 7091(@RunningTitle @OrElse @Title)m 240 fnt82
+5125 7094(appearing)m 6116(in)s 6354(the)s 6697(second)s 220 fnt35
+7415 7091(@Runner)m 240 fnt82 8412 7094(returns)m 0 6806(the)m 354(v)s 6(alue)k
+928(of)s 1205(the)s 220 fnt35 1560 6803(@RunningTitle)m 240 fnt82
+3070 6806(parameter)m 4090(of)s 220 fnt35 4368 6803(@Chapter)m 240 fnt82
+5437 6806(if)m 5660(this)s 6063(is)s 6279(not)s 6651(equal)s
+7231(to)s 7476(the)s 7830(def)s 2(ault)k 8558(v)s 6(alue)k
+220 fnt35 0 6515(dft)m 240 fnt82 240 6518(,)m 347(or)s
+220 fnt35 606 6515(@Title)m 240 fnt82 1294 6518(otherwise:)m 220 fnt35
+480 6036(def @OrElse)m 480 5748(    left x)m 480 5460(    r)m -3(ight y)k 480 5172({)m
+480 4884(    x @Case {)m 480 4596(        dft  @Y)m 4(ield  y)k 480 4308(        else  @Y)m 4(ield  x)k
+480 4020(    })m 480 3732(})m 240 fnt82 0 3238(This)m 476(produces)s
+1391(the)s 1739(ef)s 6(fect)k 2335(of)s 220 fnt35
+480 2737(named  @RunningTitle  {  @Title  })m 240 fnt82 0 2238(which)m 676(unfortunately)s 2052(is)s
+2296(not)s 2696(permissible)s 3887(as)s 4171(it)s 4397(stands,)s
+5136(because)s 220 fnt35 5983 2235(@Title)m 240 fnt82 6705 2238(is)m
+6949(not)s 7349(visible)s 8076(within)s 8778(the)s 0 1950(def)m 2(ault)k
+721(v)s 6(alue)k 1289(of)s 220 fnt35 1560 1947(@RunningTitle)m
+240 fnt82 3004 1950(.)m 480 1576(Finally)m 15(,)k 1249(the)s
+1597(de\207nitions)s 2658(for)s 2996(sections)s 3817(omitted)s 4605(earlier)s
+5273(are)s 5620(as)s 5870(follo)s 6(ws:)k 220 fnt35
+480 1075(def @EndSectionsPlace { @Galle)m 4(y })k 480 787(def @EndSections f)m 6(orce into { @EndSectionsPlace&&preceding } {})k 480 499(macro @BeginSections { //@SectionGap @SectionList 1 // @EndSectionsPlace // })m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 84 90
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(84)m 240 fnt83 7017 13843(Chapter)m 7867(4.)s
+8141(Examples)s 220 fnt35 480 13207(def @Section f)m 6(orce into { @SectionList&&preceding })k 480 12919(    named @T)m 26(ag {})k
+480 12631(    named @Title {})m 480 12343(    named @RunningTitle { dft })m 480 12055(    body @Body)m 480 11767({)m 480 11479(    def @SectionTitle)m
+480 11191(    {)m 480 10903(        @SectionNumbers @Case {)m 480 10615(            {Y)m 30(es y)k 4(es} @Y)k 4(ield { {@NumberOf @T)k 26(ag}.)k 13(  |2s  @Title })k
+480 10327(            else      @Y)m 4(ield @Title)k 480 10039(        })m 480 9751(    })m 480 9175(        @Heading @Protect @SectionTitle)m
+480 8887(    //  @NumberMar)m -3(k)k 4(er {)k 480 8599(            {@ChapterList&&@T)m 26(ag @Open { @T)k 26(ag }}.{)k
+480 8311(             @SectionList&&@T)m 26(ag @Open { @T)k 26(ag }})k 480 8023(        })m 480 7735(    //  @ChapterList&&preceding  @T)m 26(agged @T)k 26(ag)k
+480 7447(    //  @SectionList&&preceding  @T)m 26(agged @T)k 26(ag)k 480 7159(    //  @NumberMar)m -3(k)k 4(er&&preceding @T)k 26(agged @T)k 26(ag)k
+480 6871(    //  @P)m 8(ageMar)k -3(k)k 4(er&&preceding   @T)k 26(agged @T)k 26(ag)k
+480 6583(    //  { &3f @SectionTitle } @ContentsEntr)m -6(y {@P)k 8(ageOf @T)k 26(ag})k 480 6295(    //0io @Body)m
+480 6007(})m 240 fnt82 0 5513(The)m 220 fnt35 409 5510(@BeginSections)m
+240 fnt82 2066 5513(macro)m 2696(in)s 9(v)k 4(ok)k 2(es)k
+220 fnt35 3457 5510(@SectionList)m 240 fnt82 4748 5513(,)m 4835(preceded)s
+5736(by)s 6010(the)s 6338(appropriate)s 7462(g)s 1(ap)k
+7840(and)s 8224(follo)s 6(wed)k 0 5225(by)m 284(an)s
+220 fnt35 556 5222(@EndSectsPlace)m 240 fnt82 2307 5225(for)m 2635(closing)s
+3368(the)s 3705(list)s 4045(of)s 4306(sections)s 5116(when)s
+5681(the)s 220 fnt35 6019 5222(@EndSections)m 240 fnt82 7515 5225(symbol)m
+8264(is)s 8463(found.)s 220 fnt35 0 4934(@Section)m 240 fnt82
+997 4937(itself)m 1542(is)s 1749(just)s 2151(a)s 2314(cop)s 2(y)k
+2829(of)s 220 fnt35 3097 4934(@Chapter)m 240 fnt82 4156 4937(with)m
+4635(slight)s 5223(changes)s 6042(to)s 6278(the)s 6623(format.)s
+7420(The)s 7845(parameter)s 8855(of)s 220 fnt35 0 4646(@NumberMar)m -3(k)k 4(er)k
+240 fnt82 1752 4649(is)m 1970(a)s 2143(simple)s 2844(generalization)s
+4262(of)s 4540(the)s 4896(one)s 5305(within)s 220 fnt35
+5981 4646(@Chapter)m 240 fnt82 6984 4649(.)m 7156(Notice)s 7856(that)s
+8282(we)s 8625(ha)s 4(v)k 3(e)k 0 4361(tak)m 2(en)k
+573(care)s 1026(that)s 1444(the)s 1792(v)s 6(alue)k
+2360(of)s 2631(this)s 3027(parameter)s 4041(be)s 4323(a)s
+4489(juxtaposition)s 5795(of)s 6066(simple)s 6759(w)s 2(ords:)k
+7508(although)s 220 fnt35 480 3860({@ChapterList&&@T)m 26(ag @Open { @T)k 26(ag }}.)k 13( &)k
+480 3572({@SectionList&&@T)m 26(ag @Open { @T)k 26(ag }})k 240 fnt82 0 3073(is)m
+210(formally)s 1086(equi)s 6(v)k 6(alent,)k 220 fnt35
+2177 3070(&)m 240 fnt82 2379 3073(w)m 2(as)k 2800(not)s
+3166(permitted)s 4139(within)s 4807(a)s 220 fnt35 4973 3070(@T)m 26(ag)k
+240 fnt82 5596 3073(parameter)m 6610(until)s 7103(recently)s 15(.)k
+480 2699(The)m 930(DocumentSetup)s 2548(package)s 3411(also)s 3872(contains)s
+4743(de\207nitions)s 5826(for)s 6187(subsections)s 7364(in)s 7630(the)s
+8001(same)s 8571(style.)s 0 2411(The)m 3(y)k 564(raise)s
+1091(the)s 1461(question)s 2350(of)s 2643(whether)s 3494(Lout)s
+4028(is)s 4259(capable)s 5066(of)s 5359(producing)s 6404(subsections)s
+7580(should)s 8298(the)s 8668(user)s 0 2123(place)m 220 fnt35
+542 2120(@BeginSections)m 240 fnt82 2159 2123(,)m 220 fnt35 2248 2120(@Section)m
+240 fnt82 3188 2123(,)m 3276(and)s 220 fnt35 3662 2120(@EndSections)m
+240 fnt82 5151 2123(within)m 5800(a)s 240 fnt83 5948 2125(section)m
+240 fnt82 6619 2123(,)m 6708(and)s 7093(whether)s 7905(such)s
+8382(nesting)s 0 1835(could)m 592(proceed)s 1409(to)s 1650(arbitrary)s
+2527(depth.)s 3225(Arbitrary)s 4169(nesting)s 4915(of)s 5188(sections)s
+6011(within)s 6681(sections)s 7504(is)s 7716(a)s 4(v)k 6(ailable)k
+8627(no)s 6(w)k 15(,)k 0 1547(although)m 883(the)s
+1218(numbering)s 2295(w)s 2(ould)k 2937(of)s 3195(course)s
+3862(be)s 4131(wrong.)s 4894(The)s 5309(author)s 5967(has)s
+6324(w)s 2(ork)k 2(ed)k 7083(out)s 7436(de\207nitions)s
+8484(which)s 0 1259(pro)m 3(vide)k 773(correct)s 1484(numbering)s
+2563(to)s 2790(arbitrary)s 3654(depth,)s 4282(with)s 4752(an)s
+5024(arbitrary)s 5888(format)s 6573(for)s 6899(each)s 7383(le)s 6(v)k 3(el.)k
+7991(These)s 8606(were)s 0 971(not)m 376(incorporated)s 1652(into)s
+2087(DocumentSetup)s 3693(because)s 4516(the)s 4874(author)s 5555(considers)s
+6520(sub-)s 6921(subsections)s 8085(to)s 8334(be)s 8627(poor)s
+0 683(style,)m 558(and)s 962(he)s 1244(prefers)s 1957(separate)s
+2795(names)s 3457(for)s 3795(the)s 4143(symbols)s 4992(at)s
+5224(each)s 5719(le)s 6(v)k 3(el.)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 85 91
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(4.5.)m 454(Biblio)s 2(gr)k 3(aphies)k
+240 fnt84 8833 13840(85)m 0 13203(4.5.)m 471(Bibliographies)s 240 fnt82
+533 12726(The)m 953(\207rst)s 1376(step)s 1806(in)s 2041(the)s
+2382(production)s 3468(of)s 3731(a)s 3889(bibliograph)s 1(y)k
+5157(is)s 5359(to)s 5591(create)s 6208(a)s 6366(database)s
+7237(of)s 7500(references)s 8523(based)s 0 12438(on)m 297(the)s
+645(de\207nition)s 220 fnt35 480 11987(e)m 6(xpor)k -8(t @T)k 26(ype @A)k 6(uthor @Title @Institution @Number @Pub)k 4(lisher)k
+480 11699(       @Y)m 30(ear @Proceedings @Jour)k -5(nal @V)k 17(olume @P)k 8(ages @Comment)k
+480 11123(def @Ref)m 6(erence)k 480 10835(   named @T)m 26(ag)k 3270({ )s 11(T)k 26(A)k 6(G? })k
+480 10547(   named @T)m 26(ype)k 3270({ )s 11(TYPE? })k 480 10259(   named @A)m 6(uthor)k
+3270({ A)s 11(UTHOR? })k 480 9971(   named @Title)m 3270({ )s 11(TITLE? })k
+480 9683(   named @Institution)m 3270({ INSTITUTION? })s 480 9395(   named @Number)m 3270({ NUMBER? })s 480 9107(   named @Pub)m 4(lisher)k
+3270({ PUBLISHER? })s 480 8819(   named @Y)m 30(ear)k 3270({ )s 19(YEAR? })k
+480 8531(   named @Proceedings)m 3270({ PR)s 4(OCEEDINGS? })k 480 8243(   named @Jour)m -5(nal)k
+3270({ JOURNAL? })s 480 7955(   named @V)m 17(olume)k 3270({ )s 11(V)k 8(OLUME? })k
+480 7667(   named @P)m 8(ages)k 3270({ P)s 26(A)k 6(GES? })k
+480 7379(   named @Comment)m 3270({ @Null })s 480 7091({ @Null })m 240 fnt82 0 6597(F)m 3(or)k
+389(e)s 3(xample,)k 1303(the)s 1651(database)s 2530(might)s
+3148(contain)s 220 fnt35 480 6096({ @Ref)m 6(erence)k 480 5808(     @T)m 26(ag { str)k -3(unk1979style })k
+480 5520(     @T)m 26(ype { Book })k 480 5232(     @A)m 6(uthor { Str)k -3(unk, )k 8(William and )k 8(White)k 3(, E.)k 13( B)k 4(.)k 13( })k
+480 4944(     @Title { )m 11(The Elements of Style })k 480 4656(     @Pub)m 4(lisher { MacMillan, third edition })k 480 4368(     @Y)m 30(ear { 1979 })k
+480 4080(})m 480 3588({ @Ref)m 6(erence)k 480 3300(     @T)m 26(ag { kingston92 })k
+480 3012(     @T)m 26(ype { )k 11(T)k 26(echRepor)k -8(t })k
+480 2724(     @A)m 6(uthor { Kingston, Jeffre)k 4(y H.)k 13( })k 480 2436(     @Title { Document F)m 6(or)k -5(matting with Lout \(Second Edition\) })k
+480 2148(     @Number { 449 })m 480 1860(     @Institution { Basser Depar)m -8(tment of Computer)k 480 1572(Science F09, Univ)m 5(ersity of Sydne)k 4(y 2006, A)k 6(ustr)k 2(alia })k
+480 1284(     @Y)m 30(ear { 1992 })k 480 996(})m 240 fnt82 0 502(Since)m
+596(named)s 1301(parameters)s 2408(are)s 2764(optional,)s 3664(we)s
+4008(ha)s 4(v)k 3(e)k 4519(one)s 4930(for)s
+5277(e)s 6(v)k 3(ery)k 5862(concei)s 6(v)k 6(able)k
+7057(type)s 7534(of)s 7814(attrib)s 4(ute,)k 8722(and)s
+0 214(simply)m 702(lea)s 4(v)k 3(e)k 1252(out)s
+1614(those)s 2172(that)s 2586(do)s 2876(not)s 3238(apply)s
+3821(in)s 4060(an)s 3(y)k 4454(particular)s 5424(reference.)s
+6472(W)s 19(e)k 6837(can)s 7223(print)s 7730(a)s
+7893(reference)s 8832(by)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 86 92
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(86)m 240 fnt83 7017 13843(Chapter)m 7867(4.)s
+8141(Examples)s 240 fnt82 0 13205(using)m 572(the)s 220 fnt35
+920 13202(@Open)m 240 fnt82 1726 13205(symbol)m 2486(to)s 2725(get)s
+3077(at)s 3309(its)s 3585(attrib)s 4(utes:)k 220 fnt35
+480 12704(@Ref)m 6(erence&&str)k -3(unk1979style @Open)k 480 12416({  @A)m 6(uthor)k 11(,  {Slope @F)k 6(ont @Title}.)k 13(  @Pub)k 4(lisher)k 11(, @Y)k 30(ear)k 11(.)k 13(  })k
+240 fnt82 0 11920(The)m 428(right)s 939(parameter)s 1953(of)s
+220 fnt35 2224 11917(@Open)m 240 fnt82 3030 11920(may)m 3496(use)s
+3871(the)s 4219(e)s 3(xported)k 5111(parameters)s 6209(of)s
+6480(the)s 6828(left,)s 7252(and)s 7656(so)s 7922(the)s
+8270(result)s 8860(is)s 480 11415(W)m 9(illiam)k 1313(Strunk)s
+2012(and)s 2416(E.)s 2666(B.)s 2930(White,)s 240 fnt83
+3681 11417(The)m 4093(Elements)s 5024(of)s 5305(Style)s 240 fnt82
+5762 11415(.)m 5926(Macmillan,)s 7068(1979.)s 0 10916(Incidentally)m 15(,)k
+1235(we)s 1573(are)s 1923(not)s 2292(limited)s 3029(to)s
+3271(just)s 3679(one)s 4084(database)s 4966(of)s 5240(references;)s
+6335(se)s 6(v)k 3(eral)k 220 fnt35 7060 10913(@Database)m
+240 fnt82 8277 10916(symbols)m 0 10628(can)m 380(nominate)s 1317(the)s
+1656(same)s 2193(symbol,)s 2996(and)s 3391(in)s 9(v)k 4(ocations)k
+4523(of)s 4784(that)s 5193(symbol)s 5944(can)s 6324(appear)s
+7011(in)s 7245(the)s 7584(document)s 8578(itself)s 0 10340(as)m
+250(well)s 716(if)s 933(we)s 1268(wish.)s 480 9966(The)m
+930(second)s 1675(step)s 2135(is)s 2368(to)s 2629(create)s
+3276(a)s 3464(database)s 4366(of)s 4659(print)s 5192(styles)s
+5809(for)s 6170(the)s 6540(v)s 6(arious)k 7311(types)s
+7889(of)s 8183(reference)s 0 9678(\(Book,)m 706(T)s 16(echReport,)k
+1926(etc.\),)s 2450(based)s 3053(on)s 3350(the)s 3698(follo)s 6(wing)k
+4675(de\207nition:)s 220 fnt35 480 9177(e)m 6(xpor)k -8(t @Style)k
+480 8889(def @RefStyle)m 480 8601(   left @T)m 26(ag)k 480 8313(   named @Style r)m -3(ight reftag {})k
+480 8025({})m 240 fnt82 0 7531(Notice)m 682(that)s 1089(the)s
+1426(named)s 2111(parameter)s 220 fnt35 3114 7528(@Style)m 240 fnt82
+3865 7531(has)m 4224(a)s 4379(right)s 4879(parameter)s 220 fnt35
+5882 7528(reftag)m 240 fnt82 6431 7531(.)m 6584(The)s 7001(style)s
+7497(database)s 8365(has)s 8724(one)s 0 7243(entry)m 545(for)s
+883(each)s 1378(type)s 1846(of)s 2117(reference:)s 220 fnt35
+480 6742({ Book @RefStyle @Style)m 480 6454(  {  @Ref)m 6(erence&&reftag @Open)k 480 6166(     { @A)m 6(uthor)k 11(,  {Slope @F)k 6(ont @Title}.)k 13(  @Pub)k 4(lisher)k 11(, @Y)k 30(ear)k 11(.)k 13(  @Comment })k
+480 5878(  })m 480 5590(})m 480 5014({ )m 11(T)k 26(echRepor)k -8(t @RefStyle @Style)k
+480 4726(  {  @Ref)m 6(erence&&reftag @Open)k 480 4438(     { @A)m 6(uthor)k 11(,  {Slope @F)k 6(ont @Title}.)k 13(  )k 11(T)k 26(ech.)k 13( Rep)k 7(.)k 13( @Number \(@Y)k 30(ear\),)k
+480 4150(@Institution.)m 13(  @Comment })k 480 3862(  })m 480 3574(})m 240 fnt82
+0 3080(and)m 404(so)s 670(on.)s 1074(The)s 1502(follo)s 6(wing)k
+2479(prints)s 3074(the)s 3422(reference)s 4365(whose)s 5033(tag)s
+5378(is)s 220 fnt35 5588 3077(str)m -3(unk1979style)k 240 fnt82
+7180 3080(in)m 7423(the)s 7771(Book)s 8352(style:)s 220 fnt35
+480 2579(@RefStyle&&Book @Open { @Style str)m -3(unk1979style })k 240 fnt82 0 2081(It)m 205(has)s
+575(result)s 480 1626(W)m 9(illiam)k 1313(Strunk)s 2012(and)s
+2416(E.)s 2666(B.)s 2930(White.)s 240 fnt83 3678 1628(The)m
+4090(Elements)s 5021(of)s 5302(Style)s 240 fnt82 5759 1626(.)m
+5923(Macmillan)s 6955(.)s 7119(Third)s 7708(Edition)s 8409(,)s
+8516(1979)s 8987(.)s 0 1127(Notice)m 696(ho)s 6(w)k
+1160(the)s 220 fnt35 1512 1124(@Style)m 240 fnt82 2277 1127(parameter)m
+3295(of)s 220 fnt35 3569 1124(@RefStyle)m 240 fnt82 4675 1127(is)m
+4889(gi)s 6(v)k 3(en)k 5472(the)s 5824(parameter)s
+220 fnt35 6841 1124(str)m -3(unk1979style)k 240 fnt82 8373 1127(,)m
+8484(which)s 0 839(it)m 192(uses)s 655(to)s 894(open)s
+1417(the)s 1765(appropriate)s 2909(reference.)s 480 465(W)m 19(e)k
+858(can)s 1256(consult)s 2017(the)s 220 fnt35 2374 462(@T)m 26(ype)k
+240 fnt82 3121 465(attrib)m 4(ute)k 3977(of)s 4258(a)s
+4433(reference)s 5386(to)s 5634(\207nd)s 6075(out)s 6450(its)s
+6736(style,)s 7303(which)s 7955(brings)s 8613(us)s 8887(to)s
+0 177(the)m 348(follo)s 6(wing)k 1325(de\207nition)s 2299(for)s
+2637(printing)s 3447(out)s 3813(a)s 3979(reference)s 4922(in)s
+5165(the)s 5513(style)s 6020(appropriate)s 7164(to)s 7403(it:)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 87 93
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(4.5.)m 454(Biblio)s 2(gr)k 3(aphies)k
+240 fnt84 8831 13840(87)m 220 fnt35 480 13207(def @RefPr)m -3(int)k
+480 12919(   r)m -3(ight reftag)k 480 12631({  @RefStyle&&{ @Ref)m 6(erence&&reftag @Open { @T)k 26(ype } })k
+480 12343(   @Open { @Style reftag })m 480 12055(})m 240 fnt82 0 11561(F)m 3(or)k
+389(e)s 3(xample,)k 1303(to)s 1542(e)s 6(v)k 6(aluate)k
+220 fnt35 2382 11558(@RefPr)m -3(int str)k -3(unk1979style)k 240 fnt82
+4992 11561(,)m 5099(Lout)s 5611(\207rst)s 6042(e)s 6(v)k 6(aluates)k
+220 fnt35 480 11060(@Ref)m 6(erence&&str)k -3(unk1979style  @Open  { @T)k 26(ype })k
+240 fnt82 0 10562(whose)m 668(result)s 1258(is)s 220 fnt35
+1468 10559(Book)m 240 fnt82 1968 10562(,)m 2075(and)s 2479(then)s
+2948(e)s 6(v)k 6(aluates)k 220 fnt35 480 10080(@RefStyle&&Book @Open { @Style str)m -3(unk1979style })k
+240 fnt82 0 9582(as)m 266(before.)s 1056(Complicated)s 2353(as)s
+2619(this)s 3032(is,)s 3314(with)s 3813(its)s 4105(tw)s 2(o)k
+4531(databases)s 5515(and)s 5935(cle)s 6(v)k 3(er)k
+6586(passing)s 7373(about)s 7982(of)s 8269(tags,)s 8778(the)s
+0 9294(adv)m 6(antages)k 1098(of)s 1359(separating)s 2384(references)s
+3405(from)s 3919(printing)s 4718(styles)s 5303(are)s 5640(considerable:)s
+7004(printing)s 7804(styles)s 8389(may)s 8844(be)s 0 9006(changed)m
+856(easily)s 15(,)k 1505(and)s 1909(non-e)s 3(xpert)k
+3002(users)s 3544(need)s 4054(ne)s 6(v)k 3(er)k
+4636(see)s 4997(them.)s 480 8632(Finally)m 15(,)k 1243(we)s
+1571(come)s 2138(to)s 2370(the)s 2711(problem)s 3561(of)s
+3825(printing)s 4628(out)s 4987(a)s 5146(numbered)s 6154(list)s
+6498(of)s 6762(references,)s 7842(and)s 8239(referring)s 0 8344(to)m
+251(them)s 802(by)s 1108(number)s 1912(in)s 2167(the)s
+2528(body)s 3074(of)s 3358(the)s 3718(document.)s 4839(The)s
+5279(\207rst)s 5723(step)s 6173(is)s 6396(to)s 6647(create)s
+7285(a)s 7463(numbered)s 8491(list)s 8855(of)s 0 8056(places)m
+648(that)s 1066(g)s 1(alle)k 3(ys)k 1790(containing)s
+2853(references)s 3884(may)s 4350(attach)s 4977(to:)s 220 fnt35
+480 7555(def @Ref)m 6(erenceSection)k 480 7267(    named @T)m 26(ag {})k 480 6979(    named @Title { Ref)m 6(erences })k
+480 6691(    named @RunningTitle { dft })m 480 6403(    named style r)m -3(ight tag { tag.)k 13( })k 480 6115(    named headstyle r)m -3(ight @Title { @Heading @Title })k
+480 5827(    named indent { @DispIndent })m 480 5539(    named gap { @DispGap })m 480 5251(    named star)m -8(t { 1 })k 480 4963({)m
+480 4675(    def @RefList r)m -3(ight n)k 2(um)k 480 4387(    {)m 480 4099(        @NumberMar)m -3(k)k 4(er n)k 2(um  &  indent @Wide {style n)k 2(um}  |  @RefPlace)k
+480 3811(        //gap @RefList @Ne)m 6(xt n)k 2(um)k 480 3523(    })m 480 2947(        @Protect headstyle @Title)m
+480 2659(    //  @P)m 8(ageMar)k -3(k)k 4(er&&preceding @T)k 26(agged @T)k 26(ag)k
+480 2371(    //  @Title @MajorContentsEntr)m -6(y {@P)k 8(ageOf @T)k 26(ag})k 480 2083(    //  @Runner)m
+480 1795(            @F)m 6(ootEv)k 5(en { |0.5r)k -8(t 0.8f @F)k 6(ont @B @P)k 8(ageNum })k
+480 1507(            @F)m 6(ootOdd  { |0.5r)k -8(t 0.8f @F)k 6(ont @B @P)k 8(ageNum })k
+480 1219(    //@DispGap  @RefList star)m -8(t)k 480 931(    //  @Runner)m 480 643(            @T)m 26(opEv)k 5(en { @B @P)k 8(ageNum })k
+480 355(            @T)m 26(opOdd  { @I {@RunningTitle @OrElse @Title} |1r)k -8(t @B @P)k 8(ageNum })k 480 67(})m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 88 94
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(88)m 240 fnt83 7017 13843(Chapter)m 7867(4.)s
+8141(Examples)s 240 fnt82 0 13205(W)m 19(e)k 378(place)s
+948(the)s 1305(e)s 3(xpression)k 220 fnt35 2392 13202(@Ref)m 6(erenceSection)k
+240 fnt82 4408 13205(at)m 4649(the)s 5007(point)s 5569(where)s
+6218(we)s 6563(w)s 2(ant)k 7096(the)s 7453(list)s
+7814(of)s 8095(references)s 0 12917(to)m 239(appear;)s 988(its)s
+1264(v)s 6(alue)k 1832(is)s 2042(something)s 3092(lik)s 2(e)k
+220 fnt35 480 12416(1.)m 13(   @RefPlace)k 480 12128(2.)m 13(   @RefPlace)k
+480 11840(3.)m 13(   @RefPlace)k 480 11552(...)m 240 fnt82 0 11101(where)m
+220 fnt35 648 11098(@RefPlace)m 240 fnt82 1820 11101(is)m 220 fnt35
+2038 11098(@Galle)m 4(y)k 240 fnt82 2945 11101(as)m 3203(usual.)s
+3880(W)s 19(e)k 4258(can)s 4655(scatter)s 5345(multiple)s
+6205(lists)s 6649(of)s 6928(references)s 7967(through)s 8778(the)s
+0 10813(document)m 1004(if)s 1221(we)s 1555(wish)s 2064(\(at)s
+2375(the)s 2722(end)s 3126(of)s 3397(each)s 3891(chapter)s 9(,)k
+4692(for)s 5030(e)s 3(xample\),)k 6022(simply)s 6727(by)s
+7021(placing)s 220 fnt35 7777 10810(@Ref)m 6(erence)k 240 fnt82
+8998 10813(-)m 220 fnt35 0 10522(Section)m 240 fnt82 777 10525(at)m
+1009(each)s 1504(point.)s 480 10151(Our)m 912(task)s 1358(is)s
+1568(completed)s 2622(by)s 2916(the)s 3264(follo)s 6(wing)k
+4241(de\207nition:)s 220 fnt35 480 9650(def @Ref r)m -3(ight x)k 480 9362({)m
+480 9074(    def sendref into { @RefPlace&&f)m 6(ollo)k 3(wing })k 480 8786(        r)m -3(ight @K)k 8(e)k 4(y)k
+480 8498(    {)m 480 8210(        @NumberMar)m -3(k)k 4(er&&preceding @T)k 26(agged x  &)k
+480 7922(        @P)m 8(ageMar)k -3(k)k 4(er&&preceding @T)k 26(agged x  &)k
+480 7634(        @RefPr)m -3(int x)k 480 7346(    })m 480 6770(    @NumberMar)m -3(k)k 4(er&&x @Open { @T)k 26(ag } sendref x)k
+480 6482(})m 240 fnt82 0 5988(Gi)m 6(v)k 3(en)k
+633(this)s 1029(de\207nition,)s 2053(the)s 2401(in)s 9(v)k 4(ocation)k
+220 fnt35 3455 5985(@Ref str)m -3(unk1979style)k 240 fnt82 5672 5988(has)m
+6042(result)s 220 fnt35 480 5489(@NumberMar)m -3(k)k 4(er&&str)k -3(unk1979style @Open { @T)k 26(ag })k
+240 fnt82 0 4990(plus)m 450(the)s 798(g)s 1(alle)k 3(y)k
+220 fnt35 1432 4987(sendref str)m -3(unk1979style)k 240 fnt82 3757 4990(.)m
+3921(W)s 19(e)k 4290(\207rst)s 4721(follo)s 6(w)k
+5393(what)s 5918(happens)s 6754(to)s 6993(the)s 7341(g)s 1(alle)k 3(y)k 15(.)k
+480 4616(According)m 1555(to)s 1806(its)s 220 fnt35 2094 4613(into)m
+240 fnt82 2512 4616(clause,)m 3229(the)s 3589(g)s 1(alle)k 3(y)k
+4235(will)s 4673(replace)s 5430(a)s 220 fnt35 5609 4613(@RefPlace)m
+240 fnt82 6785 4616(in)m 7040(the)s 7400(nearest)s 8149(follo)s 6(wing)k
+220 fnt35 0 4325(@Ref)m 6(erenceSection)k 240 fnt82 1946 4328(.)m
+2114(If)s 2348(e)s 6(v)k 3(ery)k 2928(such)s
+3428(g)s 1(alle)k 3(y)k 4066(is)s 4280(a)s
+4450(sorted)s 5096(g)s 1(alle)k 3(y)k 5734(whose)s
+6406(k)s 2(e)k 3(y)k 6805(is)s 7019(the)s
+7371(reference')s 13(s)k 8472(tag,)s 8876(as)s 0 4040(this)m
+396(one)s 798(is,)s 1064(the)s 3(y)k 1527(will)s
+1953(appear)s 2650(sorted)s 3292(by)s 3586(tag.)s 4042(The)s
+4470(g)s 1(alle)k 3(y')k 13(s)k 5260(object)s
+5904(is)s 220 fnt35 480 3539(@NumberMar)m -3(k)k 4(er&&preceding @T)k 26(agged str)k -3(unk1979style  &)k
+480 3251(@P)m 8(ageMar)k -3(k)k 4(er&&preceding @T)k 26(agged str)k -3(unk1979style  &)k
+480 2963(@RefPr)m -3(int str)k -3(unk1979style)k 240 fnt82 0 2465(The)m
+428(result)s 1017(of)s 1287(the)s 220 fnt35 1634 2462(@T)m 26(agged)k
+240 fnt82 2622 2465(symbol)m 3381(is)s 3590(al)s 2(w)k 2(ays)k
+220 fnt35 4300 2462(@Null)m 240 fnt82 4885 2465(,)m 4991(so)s
+5256(this)s 5651(prints)s 6245(the)s 220 fnt35 6592 2462(str)m -3(unk1979style)k
+240 fnt82 8183 2465(reference)m 0 2177(in)m 243(the)s 591(appropriate)s
+1735(style)s 2242(at)s 2474(the)s 220 fnt35 2822 2174(@RefPlace)m
+240 fnt82 3926 2177(,)m 4033(as)s 4283(desired.)s 480 1803(No)m 6(w)k
+220 fnt35 1043 1800(@NumberMar)m -3(k)k 4(er&&preceding)k 240 fnt82
+4081 1803(is)m 4341(the)s 4739(nearest)s 5524(preceding)s 6570(in)s 9(v)k 4(ocation)k
+7674(of)s 220 fnt35 7995 1800(@Number)m 240 fnt82 8998 1803(-)m
+220 fnt35 0 1512(Mar)m -3(k)k 4(er)k 240 fnt82
+775 1515(in)m 1051(the)s 1432(\207nal)s 1946(document.)s 3087(This)s
+3596(must)s 4155(be)s 4470(the)s 4851(in)s 9(v)k 4(ocation)k
+5939(of)s 220 fnt35 6243 1512(@NumberMar)m -3(k)k 4(er)k
+240 fnt82 8021 1515(just)m 8460(before)s 0 1227(the)m 220 fnt35
+378 1224(@RefPlace)m 240 fnt82 1572 1227(that)m 2020(recei)s 6(v)k 3(ed)k
+2908(the)s 3286(g)s 1(alle)k 3(y)k 15(,)k
+3988(and)s 4423(so)s 4719(this)s 5145(in)s 9(v)k 4(ocation)k
+6229(of)s 220 fnt35 6530 1224(@NumberMar)m -3(k)k 4(er)k
+240 fnt82 8305 1227(is)m 8546(gi)s 6(v)k 3(en)k
+220 fnt35 0 936(str)m -3(unk1979style)k 240 fnt82 1585 939(as)m
+1827(an)s 2102(additional)s 3105(tag)s 3442(by)s 3728(the)s
+220 fnt35 4068 936(@T)m 26(agged)k 240 fnt82 5050 939(symbol.)m
+5911(Its)s 6192(original)s 6982(tag)s 7319(w)s 2(as)k
+7732(the)s 8072(number)s 8855(of)s 0 651(the)m 348(reference)s
+1291(place,)s 1902(which)s 2544(means)s 3206(that)s 220 fnt35
+480 150(@NumberMar)m -3(k)k 4(er&&str)k -3(unk1979style @Open { @T)k 26(ag })k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 89 95
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(4.5.)m 454(Biblio)s 2(gr)k 3(aphies)k
+240 fnt84 8832 13840(89)m 240 fnt82 0 13205(has)m 370(for)s
+708(its)s 984(result)s 1574(the)s 1922(number)s 2713(of)s
+2984(the)s 3332(reference)s 4275(place)s 4835(that)s 5253(recei)s 6(v)k 3(ed)k
+6111(the)s 220 fnt35 6459 13202(str)m -3(unk1979style)k 240 fnt82
+8051 13205(g)m 1(alle)k 3(y)k 15(,)k 8722(and)s
+0 12917(this)m 396(is)s 606(the)s 954(desired)s 1702(result)s
+2292(of)s 220 fnt35 2563 12914(@Ref str)m -3(unk1979style)k 240 fnt82
+4720 12917(.)m 480 12543(It)m 674(might)s 1281(seem)s 1821(that)s
+2228(if)s 2434(we)s 2758(refer)s 3256(to)s 3483(the)s
+220 fnt35 3820 12540(str)m -3(unk1979style)k 240 fnt82 5401 12543(reference)m
+6333(twice,)s 6946(tw)s 2(o)k 7345(copies)s 7996(will)s
+8411(be)s 8681(sent)s 0 12255(to)m 247(the)s 603(reference)s
+1554(list)s 1914(and)s 2326(it)s 2526(will)s 2961(appear)s
+3666(twice.)s 4355(Ho)s 6(we)k 6(v)k 3(er)k 9(,)k
+5324(when)s 5908(more)s 6463(than)s 6941(one)s 7351(sorted)s
+8001(g)s 1(alle)k 3(y)k 8644(with)s 0 11967(the)m
+341(same)s 881(k)s 2(e)k 3(y)k 1269(is)s
+1472(sent)s 1910(to)s 2142(the)s 2483(same)s 3023(place,)s
+3627(only)s 4100(one)s 4495(of)s 4759(them)s 5290(is)s
+5493(printed)s 6221(\(Section)s 7067(1.4\);)s 7551(so)s 7810(pro)s 3(vided)k
+8708(that)s 0 11679(sorted)m 642(g)s 1(alle)k 3(ys)k
+1366(are)s 1713(used)s 2210(there)s 2743(is)s 2953(no)s
+3246(problem.)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 90 96
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+480 fnt84 0 12955(Refer)m 8(ences)k 240 fnt82 0 12358([1])m
+480(Adobe)s 1182(Systems,)s 2094(Inc..)s 240 fnt83 2631 12360(P)m 19(ostScript)k
+3680(Langua)s 2(g)k 2(e)k 4696(Refer)s 8(ence)k
+5704(Manual,)s 6550(Second)s 7316(Edition)s 240 fnt82 8014 12358(.)m
+8186(Addison-)s 480 12070(W)m 19(esle)k 3(y)k 1169(,)s
+1276(1990)s 1751(.)s 0 11567([2])m 480(Brian)s 1132(W)s 22(.)k
+1504(K)s 6(ernighan)k 2630(and)s 3098(Lorinda)s 3980(L.)s
+4294(Cherry)s 15(.)k 5172(A)s 5466(system)s 6255(for)s
+6657(typesetting)s 7824(mathematics)s 9022(.)s 240 fnt83 480 11281(Communications)m
+2158(of)s 2439(the)s 2784(A)s 7(CM)k 240 fnt84
+3351 11278(18)m 240 fnt82 3585 11279(,)m 3692(182\211193)s 4576(\(1975\))s
+5203(.)s 0 10778([3])m 480(Jef)s 6(fre)k 3(y)k
+1177(H.)s 1443(Kingston.)s 240 fnt83 2475 10780(The)m 2876(Basser)s
+3581(Lout)s 4074(Document)s 5111(F)s 25(ormatting)k 6219(System)s
+6929(\(V)s 26(er)k 2(sion)k 7767(3\))s 240 fnt82
+7956 10778(.)m 8109(Computer)s 480 10490(program)m 1290(,)s 1408(1995)s
+1874(.)s 2050(Publicly)s 2913(a)s 4(v)k 6(ailable)k
+3833(in)s 4088(the)s 240 fnt83 4448 10492(jef)m 4(f)k
+240 fnt82 4855 10490(subdirectory)m 6116(of)s 6399(the)s 6759(home)s
+7359(directory)s 8287(of)s 240 fnt83 8570 10492(ftp)m 240 fnt82
+8887 10490(to)m 480 10202(host)m 240 fnt83 950 10204(ftp.cs.su.oz.au)m 240 fnt82
+2373 10202(with)m 2866(login)s 3427(name)s 240 fnt83 4012 10204(anonymous)m
+240 fnt82 5171 10202(or)m 240 fnt83 5442 10204(ftp)m 240 fnt82
+5758 10202(and)m 6174(an)s 3(y)k 6582(non-empty)s 7685(passw)s 2(ord)k
+8657(\(e.g.)s 240 fnt83 480 9916(none)m 240 fnt82 939 9914(\).)m
+1175(Lout)s 1680(distrib)s 4(utions)k 2914(are)s 3254(also)s
+3685(a)s 4(v)k 6(ailable)k 4585(from)s 5102(the)s
+240 fnt83 5443 9916(comp.sour)m 8(ces.misc)k 240 fnt82 7291 9914(ne)m 6(wsgroup,)k
+8436(and)s 8832(by)s 480 9626(electronic)m 1474(mail)s 1953(from)s
+2477(the)s 2825(author)s 13(.)k 3587(All)s 3947(enquiries)s
+4874(to)s 240 fnt83 5113 9628(jef)m 4(f@cs.su.oz.au)k 240 fnt82
+6672 9626(.)m 0 9121([4])m 480(Jef)s 6(fre)k 3(y)k
+1187(H.)s 1463(Kingston.)s 240 fnt83 2504 9123(A)m 2698(User')s 9(s)k
+3380(Guide)s 4017(to)s 4255(the)s 4599(Lout)s 5101(Document)s
+6148(F)s 25(ormatting)k 7266(System)s 7985(\(V)s 26(er)k 2(sion)k
+8833(3\))s 240 fnt82 9022 9121(.)m 480 8833(Basser)m 1177(Department)s
+2365(of)s 2636(Computer)s 3653(Science)s 4392(,)s 4499(Uni)s 6(v)k 3(ersity)k
+5553(of)s 5824(Sydne)s 3(y)k 6534(,)s 6641(1995)s
+7107(.)s 0 8328([5])m 480(Donald)s 1243(E.)s 1493(Knuth.)s
+240 fnt83 2256 8330(The)m 2668(T)s 2764 8282(E)m 2872 8330(X)m
+3028(Book)s 240 fnt82 3524 8328(.)m 3688(Addison-W)s 19(esle)k 3(y)k
+5268(,)s 5375(1984)s 5849(.)s 0 7823([6])m 480(Brian)s
+1048(K.)s 1305(Reid.)s 1900(A)s 2110(High-)s 2657(Le)s 6(v)k 3(el)k
+3227(Approach)s 4207(to)s 4426(Computer)s 5423(Document)s 6459(Production)s
+7506(.)s 7650(In)s 240 fnt83 7885 7825(Pr)m 10(oceedings)k
+480 7537(of)m 745(the)s 1073(7th)s 1417(Symposium)s 2548(on)s
+2825(the)s 3153(Principles)s 4174(of)s 4438(Pr)s 10(o)k 2(gr)k 3(amming)k
+5804(Langua)s 2(g)k 2(es)k 6891(\(POPL\),)s 7723(Las)s
+8107(V)s 26(e)k 9(gas)k 8695(NV)s 240 fnt82
+9019 7535(,)m 480 7247(pages)m 1076(24\21131)s 1651(,)s 1758(1980)s
+2233(.)s 0 6742([7])m 480(W)s 9(illiam)k 1313(Strunk)s
+2012(and)s 2416(E.)s 2666(B.)s 2930(White.)s 240 fnt83
+3678 6744(The)m 4090(Elements)s 5021(of)s 5302(Style)s 240 fnt82
+5759 6742(.)m 5923(Macmillan)s 6955(.)s 7119(Third)s 7708(Edition)s
+8409(,)s 8516(1979)s 8987(.)s 192 fnt84 4439 2(90)m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 91 97
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+480 fnt84 0 12962(Index)m 220 fnt35 0 12365(adjust)m 641(@Break)s
+240 fnt82 1444 12368(,)m 1551(42)s 0 12080(Adjustment)m 1176(of)s
+1447(object)s 2038(,)s 2145(49)s 0 11792(Adobe)m 695(Systems,)s
+1599(Inc.)s 1955(,)s 2062(41)s 0 11504(Alignment)m 240 fnt83
+1083 11506(see)m 240 fnt82 1441 11504(mark)m 1993(alignment)s 0 11216(Associati)m 6(vity)k
+1256(,)s 1363(22)s 220 fnt35 0 10637(b)m 240 fnt82
+174 10640(unit)m 553(,)s 660(37)s 240 10352(use)m 615(in)s
+220 fnt35 858 10349(//1.1b)m 240 fnt82 1406 10352(,)m 1513(27)s
+220 fnt35 0 10061(@Bac)m 4(kEnd)k 240 fnt82 1145 10064(symbol)m
+1852(,)s 1959(66)s 220 fnt35 0 9773(@Bac)m 4(kg)k 2(round)k
+240 fnt82 1436 9776(symbol)m 2143(,)s 2250(53)s 220 fnt35
+0 9485(@Begin)m 240 fnt82 829 9488(symbol)m 1536(,)s 1643(36)s
+0 9200(Bibliographies)m 1406(,)s 1513(85)s 0 8912(Body)m 574(of)s
+845(a)s 1011(de\207nition)s 1932(,)s 2039(4)s 220 fnt35
+0 8621(body)m 240 fnt82 534 8624(parameter)m 1495(,)s 1602(17)s
+0 8336(Braces)m 648(,)s 755(3)s 220 fnt35 0 7757(c)m
+240 fnt82 165 7760(unit)m 544(,)s 651(37)s 220 fnt35
+0 7469(@Case)m 240 fnt82 787 7472(symbol)m 1494(,)s 1601(56)s
+0 7184(Centring)m 837(,)s 944(37)s 220 fnt35 0 6893(@Chapter)m
+240 fnt82 1063 6896(e)m 3(xample)k 1873(,)s 1980(81)s
+0 6608(Chapters)m 901(and)s 1305(sections)s 2073(,)s 2180(80)s
+220 fnt35 0 6317(@Char)m 240 fnt82 758 6320(symbol)m 1465(,)s
+1572(41)s 0 6032(Cherry)m 15(,)k 756(L.)s 953(,)s
+1060(69)s 220 fnt35 0 5741(clines)m 613(@Break)s 240 fnt82
+1416 5744(,)m 1523(42)s 220 fnt35 0 5453(@ColList)m 240 fnt82
+948 5456(e)m 3(xample)k 1758(,)s 1865(77)s 0 5168(Column)m
+829(mark)s 1328(,)s 1435(1)s 0 4880(Comment)m 951(,)s
+1058(15)s 0 4592(Comment)m 1004(character)s 1885(,)s 1992(13)s
+220 fnt35 0 4301(@Common)m 240 fnt82 1159 4304(symbol)m 1866(,)s
+1973(53)s 0 4016(Components)m 1262(of)s 1533(a)s 1699(g)s 1(alle)k 3(y)k
+2280(,)s 2387(26)s 240 3728(promotion)m 1294(of)s 1512(,)s
+1619(29)s 0 3440(Concatenation)m 1439(symbols)s 2235(,)s 2342(36)s
+0 3152(Contraction)m 1186(of)s 1457(object)s 2048(,)s 2155(48)s
+220 fnt35 0 2861(cr)m 2(agged)k 839(@Break)s 240 fnt82
+1642 2864(,)m 1749(42)s 0 2576(Cross)m 596(reference)s 1486(,)s
+1593(7)s 220 fnt35 0 2285(@CurrLang)m 240 fnt82 1185 2288(symbol)m
+1892(,)s 1999(46)s 220 fnt35 0 1709(d)m 240 fnt82
+170 1712(unit)m 549(,)s 656(37)s 220 fnt35 0 1421(@Database)m
+240 fnt82 1214 1424(symbol)m 1921(,)s 2028(60)s 0 1136(Date,)m
+558(printing)s 1368(of)s 1639(current)s 2322(,)s 2429(57)s
+0 848(Def)m 2(ault)k 774(v)s 6(alue)k 1342(of)s
+1613(parameter)s 2574(,)s 2681(15)s 4816 12367(De\207nitions)m 5877(,)s
+5984(4)s 4816 12079(Delimiter)m 5737(,)s 5844(13)s 4816 11791(Diag)m
+5334(diagram-dra)s 3(wing)k 7030(package)s 7817(,)s 7924(64)s
+4816 11503(Diagrams)m 5743(,)s 5850(61)s 4816 11215(DocumentLayout)m 6551(package)s
+7338(,)s 7445(71)s 5056 10927(chapters)m 5903(and)s 6307(sections)s
+7075(,)s 7182(80)s 5056 10639(displays)m 5838(,)s 5945(72)s
+5056 10351(lists)m 5438(,)s 5545(73)s 5056 10063(page)m 5564(layout)s
+6169(,)s 6276(75)s 5056 9775(paragraphs)m 6103(,)s 6210(71)s
+220 fnt35 4816 9196(e)m 240 fnt82 4990 9199(g)m 1(ap)k
+5388(mode)s 5923(,)s 6030(37)s 4816 8911(Edge-to-edge)m 6160(g)s 1(ap)k
+6558(mode)s 7093(,)s 7200(37)s 220 fnt35 4816 8620(@Enclose)m
+240 fnt82 5818 8623(,)m 5925(30)s 220 fnt35 4816 8332(@End)m
+240 fnt82 5477 8335(symbol)m 6184(,)s 6291(36)s 4816 8047(Eq)m
+5140(equation)s 6021(formatting)s 7082(package)s 7869(,)s 7976(69)s
+220 fnt35 4816 7756(@Eq)m 240 fnt82 5354 7759(e)m 3(xample)k
+6164(,)s 6271(69)s 4816 7471(Escape)m 5549(character)s 6430(,)s
+6537(13)s 220 fnt35 4816 7180(@Ev)m 5(enP)k 8(ageList)k
+240 fnt82 6435 7183(e)m 3(xample)k 7245(,)s 7352(79)s
+4816 6895(Expansion)m 5884(of)s 6155(object)s 6746(,)s 6853(48)s
+220 fnt35 4816 6604(e)m 6(xpor)k -8(t)k 240 fnt82
+5484 6607(clause)m 6084(,)s 6191(18)s 220 fnt35 4816 6028(f)m
+240 fnt82 4934 6031(unit)m 5313(,)s 5420(37)s 4816 5743(F)m 3(ace)k
+5320(of)s 5591(a)s 5757(font)s 6149(,)s 6256(40)s
+4816 5455(F)m 3(amily)k 5544(of)s 5815(a)s 5981(font)s
+6373(,)s 6480(40)s 220 fnt35 4816 5164(f)m 6(ollo)k 3(wing)k
+240 fnt82 5653 5167(,)m 5760(8)s 220 fnt35 4816 4876(f)m 6(ollo)k 3(wing)k
+240 fnt82 5653 4879(,)m 5760(8)s 4816 4591(F)m 3(onts)k
+5343(,)s 5450(40)s 220 fnt35 4816 4300(f)m 6(ontdef)k
+240 fnt82 5485 4303(,)m 5592(41)s 220 fnt35 4816 4012(@F)m 6(ont)k
+240 fnt82 5528 4015(symbol)m 6235(,)s 6342(40)s 220 fnt35
+4816 3724(@F)m 6(ootSect)k 240 fnt82 5967 3727(e)m 3(xample)k
+6777(,)s 6884(76)s 4816 3439(F)m 3(orcing)k 5610(g)s 1(alle)k 3(y)k
+6191(,)s 6298(29)s 4816 3151(F)m 3(ormfeed)k 5747(,)s
+5854(13)s 4816 2575(Galle)m 3(ys)k 5541(,)s 5648(10)s
+5056 2287(in)m 5299(detail)s 5831(,)s 5938(25)s 220 fnt35
+4816 1996(@Galle)m 4(y)k 5654(@F)s 6(orceGalle)k 4(y)k
+240 fnt82 7107 1999(symbol)m 7814(,)s 7921(58)s 8155(,)s
+4816 1711(Gap)m 5215(,)s 5322(37)s 4816 1423(Gap)m 5268(mode)s
+5803(,)s 5910(37)s 220 fnt35 4816 1132(@Gr)m 2(aphic)k
+240 fnt82 5860 1135(symbol)m 6567(,)s 6674(61)s 192 fnt84
+4442 2(91)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 92 98
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(92)m 240 fnt83 8539 13843(Inde)m 4(x)k
+220 fnt35 0 13246(h)m 240 fnt82 168 13249(g)m 1(ap)k
+566(mode)s 1101(,)s 1208(37)s 220 fnt35 0 12958(@HAdjust)m
+240 fnt82 1046 12961(symbol)m 1753(,)s 1860(49)s 220 fnt35
+0 12670(@HContr)m 2(act)k 240 fnt82 1264 12673(symbol)m 1971(,)s
+2078(48)s 220 fnt35 0 12382(@HCo)m 3(v)k 5(er)k
+240 fnt82 1018 12385(symbol)m 1725(,)s 1832(50)s 0 12097(Height)m
+711(of)s 982(an)s 1265(object)s 1856(,)s 1963(24)s
+220 fnt35 0 11806(@HExpand)m 240 fnt82 1173 11809(symbol)m 1880(,)s
+1987(48)s 220 fnt35 0 11518(@High)m 240 fnt82 719 11521(symbol)m
+1426(,)s 1533(47)s 220 fnt35 0 11230(@HLimited)m 240 fnt82
+1135 11233(symbol)m 1842(,)s 1949(48)s 220 fnt35 0 10942(@Hline)m
+240 fnt82 773 10945(e)m 3(xample)k 1583(,)s 1690(71)s
+0 10657(Horizontal)m 1077(concatenation)s 2409(,)s 2516(36)s 220 fnt35
+0 10366(@HScale)m 240 fnt82 981 10369(symbol)m 1688(,)s 1795(49)s
+220 fnt35 0 10078(@HShift)m 240 fnt82 875 10081(symbol)m 1582(,)s
+1689(47)s 220 fnt35 0 9790(@HSpan)m 240 fnt82 939 9793(symbol)m
+1646(,)s 1753(50)s 220 fnt35 0 9502(h)m 6(yphen)k
+760(@Break)s 240 fnt82 1563 9505(,)m 1670(43)s 0 9217(Hyphenation)m
+1294(g)s 1(ap)k 1692(mode)s 2227(,)s 2334(39)s
+0 8929(Hyphenation)m 1294(g)s 1(ap)k 1692(mode)s 2227(,)s
+2334(37)s 0 8353(Identi\207er)m 882(,)s 989(13)s 220 fnt35
+0 8062(impor)m -8(t)k 240 fnt82 673 8065(clause)m 1273(,)s
+1380(18)s 0 7777(In-paragraph)m 1291(concatenation)s 2623(,)s 2730(37)s
+220 fnt35 0 7486(@Include)m 240 fnt82 982 7489(symbol)m 1689(,)s
+1796(66)s 220 fnt35 0 7198(@IncludeGr)m 2(aphic)k 240 fnt82
+1751 7201(symbol)m 2458(,)s 2565(65)s 220 fnt35 0 6910(@IndentedDispla)m 6(y)k
+240 fnt82 1847 6913(e)m 3(xample)k 2657(,)s 2764(72)s
+220 fnt35 0 6622(@IndentedList)m 240 fnt82 1474 6625(e)m 3(xample)k
+2284(,)s 2391(73)s 0 6337(Inde)m 3(x)k 597(\207le)s
+958(\(for)s 1375(databases\))s 2366(,)s 2473(61)s 220 fnt35
+0 6046(@Inser)m -8(t)k 240 fnt82 836 6049(symbol)m 1543(,)s
+1650(54)s 220 fnt35 0 5758(into)m 240 fnt82 406 5761(clause)m
+1006(,)s 1113(10)s 0 5473(In)m 9(v)k 4(ocation)k
+1067(of)s 1338(a)s 1504(symbol)s 2211(,)s 2318(4)s
+220 fnt35 0 4606(k)m 240 fnt82 170 4609(g)m 1(ap)k
+568(mode)s 1103(,)s 1210(37)s 0 4321(K)m 6(ernighan,)k
+1111(B.)s 1322(,)s 1429(69)s 0 4033(K)m 6(erning)k
+778(,)s 885(40)s 0 3745(K)m 6(erning)k 831(g)s 1(ap)k
+1229(mode)s 1764(,)s 1871(37)s 220 fnt35 0 3454(@K)m 8(er)k -5(nShr)k -3(ink)k
+240 fnt82 1367 3457(symbol)m 2074(,)s 2181(53)s 220 fnt35
+0 3166(@K)m 8(e)k 4(y)k 240 fnt82 647 3169(parameter)m
+1608(,)s 1715(31)s 0 2881(Knuth,)m 706(D.)s 930(,)s
+1037(71)s 220 fnt35 0 2302(langdef)m 240 fnt82 776 2305(language)m
+1696(de\207nition)s 2617(,)s 2724(46)s 220 fnt35 0 2014(@Language)m
+240 fnt82 1251 2017(symbol)m 1958(,)s 2065(45)s 220 fnt35
+0 1726(@LClos)m 240 fnt82 836 1729(symbol)m 1543(,)s 1650(14)s
+0 1441(LCM)m 573(\207le)s 881(,)s 988(41)s 0 1153(Length)m
+682(,)s 789(37)s 220 fnt35 0 862(@LEn)m 4(v)k
+240 fnt82 778 865(symbol)m 1485(,)s 1592(14)s 0 577(Letter)m
+629(character)s 1510(,)s 1617(13)s 0 289(Lig)m 1(atures)k
+899(,)s 1006(40)s 220 fnt35 4816 13247(lines)m 5319(@Break)s
+240 fnt82 6122 13250(,)m 6229(42)s 220 fnt35 4816 12959(@LInput)m
+240 fnt82 5705 12962(symbol)m 6412(,)s 6519(14)s 4816 12674(Literal)m
+5506(w)s 2(ord)k 6001(,)s 6108(14)s 220 fnt35
+4816 12383(@LUse)m 240 fnt82 5603 12386(symbol)m 6310(,)s 6417(14)s
+220 fnt35 4816 12095(@L)m 24(Vis)k 240 fnt82 5494 12098(symbol)m
+6201(,)s 6308(14)s 220 fnt35 4816 11519(m)m 240 fnt82
+5045 11522(unit)m 5424(,)s 5531(37)s 4816 11234(Macro)m 5440(,)s
+5547(15)s 4816 10946(Mark)m 5395(alignment)s 6358(,)s 6465(1)s
+5056 10658(in)m 5299(detail)s 5831(,)s 5938(28)s 4816 10370(Mark-to-mark)m
+6230(g)s 1(ap)k 6628(mode)s 7163(,)s 7270(37)s
+220 fnt35 4816 10079(@Meld)m 240 fnt82 5562 10082(symbol)m 6269(,)s
+6376(53)s 220 fnt35 4816 9791(@Merge)m 240 fnt82 5713 9794(symbol)m
+6420(,)s 6527(32)s 220 fnt35 4816 9503(@Moment)m 240 fnt82
+5888 9506(symbol)m 6595(,)s 6702(57)s 220 fnt35 4816 8927(named)m
+240 fnt82 5535 8930(parameter)m 6496(,)s 6603(15)s 4816 8642(Nested)m
+5538(de\207nitions)s 6546(,)s 6653(17)s 220 fnt35 4816 8351(@Ne)m 6(xt)k
+240 fnt82 5540 8354(symbol)m 6247(,)s 6354(56)s 220 fnt35
+4816 8063(noh)m 6(yphen)k 5820(@Break)s 240 fnt82 6623 8066(,)m
+6730(43)s 220 fnt35 4816 7775(@NotRe)m 6(v)k 5(ealed)k
+240 fnt82 6343 7778(symbol)m 7050(,)s 7157(58)s 220 fnt35
+4816 7487(@Null)m 240 fnt82 5461 7490(symbol)m 6168(,)s 6275(57)s
+4816 7202(Numbered)m 5884(list)s 6182(,)s 6289(73)s 220 fnt35
+4816 6911(@NumberOf)m 240 fnt82 6108 6914(e)m 3(xample)k 6918(,)s
+7025(80)s 220 fnt35 4816 6335(o)m 240 fnt82 4991 6338(g)m 1(ap)k
+5389(mode)s 5924(,)s 6031(37)s 4816 6050(Object)m 5460(,)s
+5567(1)s 220 fnt35 4816 5759(@OddP)m 8(ageList)k 240 fnt82
+6355 5762(e)m 3(xample)k 7165(,)s 7272(79)s 220 fnt35
+4816 5471(@OneCol)m 240 fnt82 5828 5474(symbol)m 6535(,)s 6642(47)s
+220 fnt35 4816 5183(@OneOf)m 240 fnt82 5743 5186(symbol)m 6450(,)s
+6557(54)s 220 fnt35 4816 4895(@OneP)m 8(age)k 240 fnt82
+6010 4898(e)m 3(xample)k 6820(,)s 6927(78)s 220 fnt35
+4816 4607(@OneRo)m 3(w)k 240 fnt82 5947 4610(symbol)m 6654(,)s
+6761(46)s 220 fnt35 4816 4319(@Open)m 240 fnt82 5622 4322(symbol)m
+6329(,)s 6436(60)s 4816 4034(Optimal)m 5654(g)s 1(alle)k 3(y)k
+6288(breaking)s 7125(,)s 7232(34)s 220 fnt35 4816 3743(@Optimiz)m 3(e)k
+240 fnt82 5953 3746(symbol)m 6660(,)s 6767(35)s 220 fnt35
+4816 3455(or)m 2(agged)k 5667(@Break)s 240 fnt82 6470 3458(,)m
+6577(42)s 220 fnt35 4816 3167(@OrElse)m 240 fnt82 5761 3170(e)m 3(xample)k
+6571(,)s 6678(83)s 4816 2882(Other)m 5420(character)s 6301(,)s
+6408(13)s 220 fnt35 4816 2591(outdent)m 5604(@Break)s 240 fnt82
+6407 2594(,)m 6514(42)s 220 fnt35 4816 2303(o)m 3(v)k 5(er)k
+240 fnt82 5295 2306(e)m 3(xample)k 6105(,)s 6212(70)s
+4816 2018(Ov)m 3(erstrik)k 2(e)k 5875(g)s 1(ap)k
+6273(mode)s 6808(,)s 6915(37)s 220 fnt35 4816 1439(p)m
+240 fnt82 4990 1442(unit)m 5369(,)s 5476(37)s 220 fnt35
+4816 1151(@P)m 26(Adjust)k 240 fnt82 5824 1154(symbol)m 6531(,)s
+6638(49)s 220 fnt35 4816 863(@P)m 8(age)k 240 fnt82
+5595 866(e)m 3(xample)k 6405(,)s 6512(77)s 4816 578(P)m 3(age)k
+5334(layout)s 5056 290(principles)m 6049(of)s 6267(,)s 6374(5)s
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 93 99
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+1 LoutMargSet
+grestore
+240 fnt83 0 13843(Inde)m 4(x)k 240 fnt84 8833 13840(93)m
+240 fnt82 240 13247(in)m 483(practice)s 1241(,)s 1348(75)s
+220 fnt35 0 12956(@P)m 8(ageLabel)k 240 fnt82 1309 12959(symbol)m
+2016(,)s 2123(68)s 220 fnt35 0 12668(@P)m 8(ageOf)k
+240 fnt82 1016 12671(e)m 3(xample)k 1826(,)s 1933(75)s
+0 12383(P)m 3(aragraph)k 1023(breaking)s 1860(,)s 1967(3)s
+240 12095(in)m 483(detail)s 1015(,)s 1122(39)s 0 11807(P)m 3(arameter)k
+971(,)s 1078(4)s 220 fnt35 240 11516(body)m 240 fnt82
+774 11519(parameter)m 1735(,)s 1842(17)s 220 fnt35 240 11228(named)m
+240 fnt82 959 11231(parameter)m 1920(,)s 2027(15)s 220 fnt35
+0 10940(@PlainGr)m 2(aphic)k 240 fnt82 1530 10943(symbol)m 2237(,)s
+2344(65)s 0 10655(PostScript)m 989(,)s 1096(ii)s 240 10367(used)m
+737(by)s 220 fnt35 1031 10364(@Gr)m 2(aphic)k 240 fnt82
+2022 10367(,)m 2129(61)s 240 10079(used)m 737(by)s 220 fnt35
+1031 10076(@IncludeGr)m 2(aphic)k 240 fnt82 2729 10079(,)m 2836(65)s
+240 9791(used)m 737(by)s 220 fnt35 1031 9788(@PrependGr)m 2(aphic)k
+240 fnt82 2851 9791(,)m 2958(65)s 220 fnt35 0 9500(@PP)m
+240 fnt82 566 9503(e)m 3(xample)k 1376(,)s 1483(72)s
+0 9215(Precedence)m 1091(,)s 1198(22)s 220 fnt35 0 8924(preceding)m
+240 fnt82 958 8927(,)m 1065(8)s 220 fnt35 0 8636(@PrependGr)m 2(aphic)k
+240 fnt82 1873 8639(symbol)m 2580(,)s 2687(65)s 0 8351(Principal)m
+917(mark)s 1416(,)s 1523(37)s 240 8063(ef)m 6(fect)k
+836(on)s 220 fnt35 1133 8060(@OneCol)m 240 fnt82 2145 8063(and)m
+220 fnt35 2549 8060(@OneRo)m 3(w)k 240 fnt82 3627 8063(,)m
+3734(46)s 0 7775(Promotion)m 1067(of)s 1338(components)s 2493(,)s
+2600(29)s 0 7199(Quote)m 641(character)s 1522(,)s 1629(13)s
+0 6911(Quoted)m 763(w)s 2(ord)k 1258(,)s 1365(14)s
+220 fnt35 0 6332(r)m 240 fnt82 133 6335(unit)m 512(,)s
+619(37)s 220 fnt35 0 6044(r)m 2(agged)k 729(@Break)s
+240 fnt82 1532 6047(,)m 1639(42)s 220 fnt35 0 5756(@Ra)m 4(wV)k 17(erbatim)k
+240 fnt82 1563 5759(symbol)m 2270(,)s 2377(67)s 0 5471(Recepti)m 6(v)k 3(e)k
+1003(symbol)s 1710(,)s 1817(11)s 0 5183(Recursion)m 974(,)s
+1081(5)s 220 fnt35 0 4892(@Ref)m 240 fnt82 621 4895(e)m 3(xample)k
+1431(,)s 1538(88)s 220 fnt35 0 4604(@Ref)m 6(erence)k
+240 fnt82 1281 4607(e)m 3(xample)k 2091(,)s 2198(85)s
+220 fnt35 0 4316(@Ref)m 6(erenceSection)k 240 fnt82 2006 4319(e)m 3(xample)k
+2816(,)s 2923(87)s 0 4031(Reid,)m 559(Brian)s 1147(K.)s
+1371(,)s 1478(7)s 0 3743(Right)m 592(justi\207cation)s 1724(,)s
+1831(37)s 220 fnt35 0 3452(r)m -3(lines)k 579(@Break)s
+240 fnt82 1382 3455(,)m 1489(42)s 0 3167(Roman)m 749(numerals)s
+1623(,)s 1730(75)s 0 2879(Root)m 526(g)s 1(alle)k 3(y)k
+1107(,)s 1214(11)s 240 2591(in)m 483(detail)s 1015(,)s
+1122(28)s 240 2303(printing)m 1050(of)s 1268(,)s 1375(29)s
+240 2015(size)m 667(of)s 938(components)s 2146(of)s 2364(,)s
+2471(25)s 220 fnt35 0 1724(@Rotate)m 240 fnt82 921 1727(symbol)m
+1628(,)s 1735(52)s 0 1439(Rotation)m 881(of)s 1152(object)s
+1743(,)s 1850(52)s 0 1151(Ro)m 6(w)k 501(mark)s
+1000(,)s 1107(2)s 220 fnt35 0 860(rr)m 2(agged)k
+802(@Break)s 240 fnt82 1605 863(,)m 1712(42)s 220 fnt35
+0 572(@Rump)m 240 fnt82 860 575(symbol)m 1567(,)s 1674(53)s
+220 fnt35 0 284(@Runner)m 240 fnt82 1002 287(e)m 3(xample)k
+1812(,)s 1919(78)s 220 fnt35 4816 13246(s)m 240 fnt82
+4979 13249(unit)m 5358(,)s 5465(37)s 5056 12961(and)m 220 fnt35
+5460 12958(@Space)m 240 fnt82 6357 12961(symbol)m 7064(,)s 7171(43)s
+220 fnt35 4816 12670(@Scale)m 240 fnt82 5639 12673(symbol)m 6346(,)s
+6453(51)s 4816 12385(Scaling)m 5586(of)s 5857(object)s 6448(,)s
+6555(49)s 4816 12097(Scribe)m 5429(,)s 5536(7)s 220 fnt35
+4816 11806(@Section)m 240 fnt82 5816 11809(e)m 3(xample)k 6626(,)s
+6733(83)s 220 fnt35 4816 11518(@SetColor)m 240 fnt82 5951 11521(symbol)m
+6658(,)s 6765(44)s 220 fnt35 4816 11230(@SetColour)m 240 fnt82
+6073 11233(symbol)m 6780(,)s 6887(44)s 4816 10945(Size)m 5283(of)s
+5554(an)s 5837(object)s 6428(,)s 6535(24)s 4816 10657(small)m
+5388(capitals)s 6115(,)s 6222(41)s 4816 10369(Sorted)m 5498(g)s 1(alle)k 3(ys)k
+6169(,)s 6276(31)s 4816 10081(Space)m 5390(,)s 5497(13)s
+5056 9793(when)m 5632(signi\207cant)s 6635(,)s 6742(38)s 220 fnt35
+4816 9502(@Space)m 240 fnt82 5713 9505(symbol)m 6420(,)s 6527(43)s
+220 fnt35 4816 9214(@Star)m -8(tHSpan)k 240 fnt82 6226 9217(symbol)m
+6933(,)s 7040(50)s 220 fnt35 4816 8926(@Star)m -8(tHVSpan)k
+240 fnt82 6372 8929(symbol)m 7079(,)s 7186(50)s 220 fnt35
+4816 8638(@Star)m -8(tVSpan)k 240 fnt82 6214 8641(symbol)m 6921(,)s
+7028(50)s 4816 8353(Style)m 5363(of)s 5634(an)s 5917(object)s
+6508(,)s 6615(23)s 220 fnt35 4816 8062(sup)m 240 fnt82
+5222 8065(e)m 3(xample)k 6032(,)s 6139(70)s 4816 7777(Symbol)m
+5563(,)s 5670(4)s 220 fnt35 4816 7486(@SysDatabase)m 240 fnt82
+6396 7489(symbol)m 7103(,)s 7210(61)s 220 fnt35 4816 7198(@SysInclude)m
+240 fnt82 6164 7201(symbol)m 6871(,)s 6978(66)s 220 fnt35
+4816 6910(@SysIncludeGr)m 2(aphic)k 240 fnt82 6933 6913(symbol)m 7640(,)s
+7747(65)s 220 fnt35 4816 6622(@SysPrependGr)m 2(aphic)k 240 fnt82
+7055 6625(symbol)m 7762(,)s 7869(65)s 220 fnt35 4816 6046(t)m
+240 fnt82 4933 6049(g)m 1(ap)k 5331(mode)s 5866(,)s
+5973(37)s 4816 5761(T)m 19(ables)k 5432(,)s 5539(2)s
+4816 5473(T)m 19(ab)k 4(ulation)k 5886(g)s 1(ap)k
+6284(mode)s 6819(,)s 6926(37)s 220 fnt35 4816 5182(@T)m 26(ag)k
+240 fnt82 5439 5185(parameter)m 9(,)k 6491(def)s 2(ault)k
+7212(v)s 6(alue)k 7780(of)s 7998(,)s 8105(16)s
+220 fnt35 4816 4894(@T)m 26(agged)k 240 fnt82 5805 4897(symbol)m
+6512(,)s 6619(59)s 4816 4609(T)m 19(ar)k 4(get)k
+5476(of)s 5747(cross)s 6289(reference)s 7179(,)s 7286(8)s
+4816 4321(T)m 19(ar)k 4(get)k 5476(of)s 5747(a)s
+5913(g)s 1(alle)k 3(y)k 6494(,)s 6601(11)s
+220 fnt35 4816 4030(@T)m 26(arget)k 240 fnt82 5703 4033(symbol)m
+6410(,)s 6517(30)s 5056 3745(in)m 5299(detail)s 5831(,)s
+5938(25)s 4816 3457(T)m 4912 3409(E)m 5020 3457(X)m 5056 3169(h)m 1(yphenation)k
+6243(,)s 6350(39)s 5056 2881(optimal)m 5841(paragraph)s 6854(breaking)s
+7691(,)s 7798(39)s 4816 2593(T)m 16(e)k 3(xtual)k
+5582(unit)s 5961(,)s 6068(13)s 220 fnt35 4816 2014(@Under)m -3(line)k
+240 fnt82 6031 2017(symbol)m 6738(,)s 6845(67)s 4816 1729(Underscore)m
+5974(character)s 6855(,)s 6962(13)s 220 fnt35 4816 1438(@Use)m
+240 fnt82 5481 1441(symbol)m 6188(,)s 6295(60)s 220 fnt35
+4816 862(v)m 240 fnt82 4985 865(unit)m 5364(,)s 5471(37)s
+5056 577(ef)m 6(fect)k 5652(on)s 5949(paragraph)s 6962(breaking)s
+7799(,)s 7906(42)s 220 fnt35 4816 286(@V)m 17(Adjust)k
+240 fnt82 5833 289(symbol)m 6540(,)s 6647(49)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 94 100
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+240 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 240 288 60 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 14006 0 14006 240 288 60 1417 -15423 LoutGr2
+0 LoutMargSet
+grestore
+240 fnt84 0 13840(94)m 240 fnt83 8539 13843(Inde)m 4(x)k
+220 fnt35 0 13246(@VContr)m 2(act)k 240 fnt82 1252 13249(symbol)m
+1959(,)s 2066(48)s 220 fnt35 0 12958(@VCo)m 3(v)k 5(er)k
+240 fnt82 1006 12961(symbol)m 1713(,)s 1820(50)s 220 fnt35
+0 12670(@V)m 17(erbatim)k 240 fnt82 1129 12673(symbol)m 1836(,)s
+1943(67)s 0 12385(V)m 26(ertical)k 797(concatenation)s 2129(,)s
+2236(36)s 220 fnt35 0 12094(@VExpand)m 240 fnt82 1161 12097(symbol)m
+1868(,)s 1975(48)s 220 fnt35 0 11806(@VLimited)m 240 fnt82
+1123 11809(symbol)m 1830(,)s 1937(48)s 220 fnt35 0 11518(@VScale)m
+240 fnt82 969 11521(symbol)m 1676(,)s 1783(49)s 220 fnt35
+0 11230(@VShift)m 240 fnt82 863 11233(symbol)m 1570(,)s 1677(48)s
+220 fnt35 0 10942(@VSpan)m 240 fnt82 927 10945(symbol)m 1634(,)s
+1741(50)s 220 fnt35 0 10366(w)m 240 fnt82 216 10369(unit)m
+595(,)s 702(37)s 0 10081(White)m 640(space)s 1174(,)s
+1281(13)s 240 9793(when)m 816(signi\207cant)s 1819(,)s 1926(38)s
+220 fnt35 0 9502(@Wide)m 240 fnt82 774 9505(symbol)m 1481(,)s
+1588(47)s 0 9217(W)m 9(idth)k 646(of)s 917(an)s
+1200(object)s 1791(,)s 1898(24)s 0 8929(W)m 19(ord)k
+531(,)s 638(14)s 220 fnt35 0 8350(x)m 240 fnt82
+168 8353(g)m 1(ap)k 566(mode)s 1101(,)s 1208(37)s
+220 fnt35 0 7774(@Y)m 4(ield)k 240 fnt82 753 7777(symbol)m
+1460(,)s 1567(56)s 220 fnt35 0 7486(@YUnit)m 240 fnt82
+814 7489(symbol)m 1521(,)s 1628(44)s 220 fnt35 0 6910(@ZUnit)m
+240 fnt82 802 6913(symbol)m 1509(,)s 1616(44)s 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Trailer
+%%DocumentNeededResources: font Helvetica
+%%+ font Helvetica-Oblique
+%%+ font Symbol
+%%+ font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%+ font Times-BoldItalic
+%%DocumentSuppliedResources: procset LoutStartUp
+%%+  procset LoutTabPrependGraphic
+%%+  procset LoutFigPrependGraphic
+%%+  procset LoutBasicSetup
+%%+ encoding vec2
+%%Pages: 100
+%%EOF
diff --git a/doc/expert/pre b/doc/expert/pre
new file mode 100644
index 0000000..72a4fa3
--- /dev/null
+++ b/doc/expert/pre
@@ -0,0 +1,51 @@
+@Chapter
+   @Title { Predefined symbols }
+   @Tag { symbols }
+@Begin
+@BeginSections
+@Include { pre_begi }
+@Include { pre_conc }
+@Include { pre_font }
+@Include { pre_brea }
+@Include { pre_spac }
+@Include { pre_yuni }
+@Include { pre_colo }
+@Include { pre_lang }
+@Include { pre_oner }
+@Include { pre_wide }
+@Include { pre_hshi }
+@Include { pre_hexp }
+@Include { pre_hcon }
+@Include { pre_hlim }
+@Include { pre_hadj }
+@Include { pre_hsca }
+@Include { pre_cove }
+@Include { pre_span }
+@Include { pre_scal }
+@Include { pre_rota }
+@Include { pre_back }
+@Include { pre_kshr }
+@Include { pre_rump }
+@Include { pre_inse }
+@Include { pre_oneo }
+@Include { pre_next }
+@Include { pre_case }
+@Include { pre_mome }
+@Include { pre_null }
+@Include { pre_gall }
+@Include { pre_notr }
+@Include { pre_cros }
+@Include { pre_tagg }
+@Include { pre_open }
+@Include { pre_data }
+@Include { pre_grap }
+@Include { pre_plai }
+@Include { pre_incg }
+@Include { pre_prep }
+@Include { pre_incl }
+@Include { pre_bend }
+@Include { pre_verb }
+@Include { pre_unde }
+@Include { pre_page }
+@EndSections
+@End @Chapter
diff --git a/doc/expert/pre_back b/doc/expert/pre_back
new file mode 100644
index 0000000..37de5c5
--- /dev/null
+++ b/doc/expert/pre_back
@@ -0,0 +1,12 @@
+@Section
+   @Title { "@Background" }
+   @Tag { background }
+@Begin
+@PP
+background.sym @Index { @@Background symbol }
+The @@Background symbol will print its left parameter in the
+background of its right parameter.  That is, the result has
+the size of the right parameter, but the left parameter will
+be printed first in the same space, with its marks aligned with
+the marks of the right parameter.
+@End @Section
diff --git a/doc/expert/pre_begi b/doc/expert/pre_begi
new file mode 100644
index 0000000..e9adbb1
--- /dev/null
+++ b/doc/expert/pre_begi
@@ -0,0 +1,31 @@
+@Section
+   @Title { "@Begin" and "@End" }
+   @Tag { begin }
+@Begin
+@PP
+The body of a symbol @Code "@Sym" may be enclosed in @@Begin and
+begin. @Index { @@Begin symbol }
+end. @Index { @@End symbol }
+@@End @Code "@Sym" instead of the more usual braces:
+@ID @Code {
+"def @Section"
+"    named @Title {}"
+"    right @Body"
+"@Begin"
+"    @Title //2v @Body"
+"@End @Section"
+}
+They may also enclose the right or body parameter of a symbol invocation:
+@ID @Code {
+"@Chapter"
+"    @Title { Introduction }"
+"@Begin"
+"This subject needs no introduction."
+"@End @Chapter"
+}
+Apart from their utility as documentation aids, these forms allow Basser
+Lout to pinpoint mismatched braces, which can otherwise create total
+havoc.  For this reason, they should enclose the major parts of documents,
+such as chapters and sections.  Note that braces cannot be
+replaced by @@Begin and @@End in general.
+@End @Section
diff --git a/doc/expert/pre_bend b/doc/expert/pre_bend
new file mode 100644
index 0000000..8f742a9
--- /dev/null
+++ b/doc/expert/pre_bend
@@ -0,0 +1,61 @@
+@Section
+   @Tag { backend }
+   @Title { "@BackEnd" and the PlainText and PDF back ends }
+@Begin
+@PP
+backend.sym @Index { @@BackEnd symbol }
+The @@BackEnd symbol, which takes no parameters, has for its result a
+string naming the back end currently in use.  Three back ends are available,
+PostScript, PDF and PlainText.  The symbol is generally used like this:
+@ID @Code {
+"@BackEnd @Case {"
+"    PlainText @Yield { ... }"
+"    PostScript @Yield { ... }"
+"    PDF @Yield { ... }"
+"}"
+}
+to obtain different objects depending on the back end.  No @Code else
+is required since these are the only possible values.
+@PP
+When a @Code "@Case" symbol has @Code "@BackEnd" for its left parameter
+and the left parameter of each @Code "@Yield" symbol within it consists
+of a sequence of one or more literal words (including {@Code else}), Lout
+will optimize by evaluating the @Code "@Case" symbol at the time it is
+read.  This optimization ensures that there is only a small once-only
+performance penalty for multiple back ends, and it permits these
+@Code "@Case" symbols (but no other symbols) to appear within the object
+following @Code "@Include" and @Code "@PrependGraphic" symbols.
+@PP
+The PlainText back end differs from the PostScript one in two main
+respects.  First, there is effectively just one font:  although all
+the font commands work exactly as usual, they don't actually change
+anything.  Each character in this font is taken to be one tenth
+of one inch wide and 20 points high.  Second, the output is an
+ordinary text file, not a PostScript file.
+@PP
+Clearly, with ordinary text output the possibility of advanced graphics
+features such as rotation and scaling is curtailed.  Nevertheless, all
+symbols have well-defined (possibly null) effects in the PlainText
+back end, so there is no additional danger of crashing the system or
+obtaining grossly unreasonable output by a change to PlainText.
+@PP
+The PlainText back end is obtained by the @Code "-p" option to Basser
+Lout.  The character size can be changed by adding two lengths to
+the @Code "-p" option, like this:
+@ID @Code "lout -p0.1i12p ..."
+which invokes the PlainText back end with each character being 0.1
+inches wide and 12 points high.  However, experience suggests that
+the best approach is to define all horizontal lengths as multiples of
+the @Code "s" unit (the width of a space, hence the width of all
+characters) and to define all vertical lengths as multiples of the
+@Code "f" unit (the font size, equal to the height of every character),
+and not to change the character size in the command line.
+@PP
+There is a @Code "-P" option which is identical with the @Code "-p"
+option except that it inserts a form-feed character between each two
+components of the output, but not before the first or after the last.
+@PP
+The PDF back end is obtained by typing {@Code "lout -Z"}.  It is similar
+to PostScript but much more limited in functionality.  Consult a separate
+document distributed with Lout for further information.
+@End @Section
diff --git a/doc/expert/pre_brea b/doc/expert/pre_brea
new file mode 100644
index 0000000..b91b2d9
--- /dev/null
+++ b/doc/expert/pre_brea
@@ -0,0 +1,154 @@
+@Section
+   @Title { "@Break" }
+   @Tag { break }
+@Begin
+@PP
+The @@Break symbol influences the appearance of paragraphs (Section
+{@NumberOf concatenation}), offering a fixed set of nine styles:
+@IL
+
+@LI {
+2i @Wide { |1rt @Code adjust @@Break @I object }
+adjust.break @Index { @Code adjust @@Break }
+|2m Break the paragraphs of {@I object} into lines, and apply @@PAdjust
+(Section {@NumberOf hadjust}) to every line except the last in
+each paragraph;
+}
+
+@LI {
+2i @Wide { |1rt @Code outdent @@Break @I object }
+outdent.break @Index { @Code outdent @@Break }
+|2m Like {@Code adjust}, except that @Code "2.0f @Wide {} &0i" is
+inserted at the beginning of every line except the first, creating
+an outdented paragraph;
+}
+
+@LI {
+2i @Wide { |1rt @Code ragged @@Break @I object }
+ragged.break @Index { @Code ragged @@Break }
+|2m Break the paragraphs of {@I object} into lines, but do not adjust
+the lines (`ragged right');
+}
+
+@LI {
+2i @Wide { |1rt @Code cragged @@Break @I object }
+cragged.break @Index { @Code cragged @@Break }
+|2m Like {@Code ragged}, except that each line will be centred with
+respect to the others;
+}
+
+@LI {
+2i @Wide { |1rt @Code rragged @@Break @I object }
+rragged.break @Index { @Code rragged @@Break }
+|2m Like {@Code ragged}, except that each line will be right-justified with
+respect to the others (`ragged left');
+}
+
+@LI {
+2i @Wide { |1rt @Code oragged @@Break @I object }
+oragged.break @Index { @Code oragged @@Break }
+|2m The obvious combination of {@Code ragged} and {@Code outdent};
+}
+
+@LI {
+2i @Wide { |1rt @Code lines @@Break @I object }
+lines.break @Index { @Code lines @@Break }
+|2m Break the paragraphs of {@I object} into lines at the same points
+that they are broken into lines in the input, and also at concatenation
+symbols of the form {@Code "&"}{@I k}{@Code "b"} for any {@I k} greater
+than 1.  Do not adjust the lines.  Any spaces at the start of a line
+other than the first line will appear in the output;
+}
+
+@LI {
+2i @Wide { |1rt @Code clines @@Break @I object }
+clines.break @Index { @Code clines @@Break }
+|2m Break the paragraphs of {@I object} into lines as for @Code "lines"
+@@Break, then centre each line with respect to the others;
+}
+
+@LI {
+2i @Wide { |1rt @Code rlines @@Break @I object }
+rlines.break @Index { @Code rlines @@Break }
+|2m Break the paragraphs of {@I object} into lines as for @Code "lines"
+@@Break, then right-justify each line with respect to the others.
+}
+
+@EL
+If the paragraph was an entire component of a galley, so will each of
+its lines be; otherwise the lines are enclosed in a {@Code "@OneRow"}
+symbol after breaking.
+@PP
+The length of the gap used to separate the lines produced by paragraph
+breaking is always {@Code 1v}.  However, the @Code v unit itself and the
+v.unit.effect @SubIndex { effect on paragraph breaking }
+gap mode may be changed:
+@IL
+
+@LI {
+2i @Wide { |1rt @I gap @Code "@Break" @I object }
+|2m Within {@I object}, take the value of the @Code "v" unit to be the
+length of {@I gap};
+}
+
+@LI {
+2i @Wide { |1rt + & @I gap @Code "@Break" @I object }
+|2m Within {@I object}, take the value of the @Code "v" unit to be
+larger by the length of @I gap than it would otherwise have been;
+}
+
+@LI {
+2i @Wide { |1rt -- & @I gap @Code "@Break" @I object }
+|2m Within {@I object}, take the value of the @Code "v" unit to be
+smaller by the length of @I gap than it would otherwise have been.
+}
+
+@EL
+In each case, the mode of @I gap is adopted within {@I object}.
+@PP
+The @@Break symbol also controls hyphenation:
+@IL
+
+@LI {
+2i @Wide { |1rt @Code "hyphen @Break" @I object }
+hyphen.break @Index { @Code hyphen @@Break }
+|2m Permit hyphenation within the paragraphs of {@I object};
+}
+
+@LI {
+2i @Wide { |1rt @Code "nohyphen @Break" @I object }
+nohyphen.break @Index { @Code nohyphen @@Break }
+|2m Prohibit hyphenation within the paragraphs of {@I object}; all
+hyphenation gaps without exception revert to edge-to-edge mode.
+}
+
+@EL
+The @@Break also has options which control widow and orphan lines:
+@IL
+
+@LI {
+2i @Wide { |1rt @Code "unbreakablefirst @Break" @I object }
+hyphen.break @Index { @Code hyphen @@Break }
+|2m Prevent column and page breaks (i.e. prevent a galley from splitting)
+between the first and second lines of the paragraphs of {@I object};
+}
+
+@LI {
+2i @Wide { |1rt @Code "unbreakablelast @Break" @I object }
+nohyphen.break @Index { @Code nohyphen @@Break }
+|2m Prevent column and page breaks between the last and second
+last lines of the paragraphs of {@I object}.
+}
+
+@EL
+These options work by adding the @Code "u" (unbreakable) suffix to the
+appropriate gaps during paragraph breaking, so their precise effect is
+as described for this suffix.  These options may be countermanded by
+@Code "breakablefirst @Break" and @Code "breakablelast @Break".
+@PP
+Several options may be given to the @@Break symbol simultaneously, in
+any order.  For example,
+@ID @Code "{ adjust 1.2fx hyphen }  @Break  ..."
+is a typical initial value.  There may be empty objects and @@Null objects
+in the left parameter of @@Break; these are ignored.
+@End @Section
diff --git a/doc/expert/pre_case b/doc/expert/pre_case
new file mode 100644
index 0000000..f0f22e1
--- /dev/null
+++ b/doc/expert/pre_case
@@ -0,0 +1,51 @@
+@Section
+   @Title { "@Case" }
+   @Tag { case }
+@Begin
+@PP
+case.sym @Index { @@Case symbol }
+yield.sym @Index { @@Yield symbol }
+The @@Case symbol selects its result from a list of alternatives,
+depending on a tag:
+@ID @Code {
+"@Day @Case {"
+"    { 1 21 31 }  @Yield  st"
+"    { 2 22 }  @Yield  nd"
+"    { 3 23 }  @Yield  rd"
+"    else  @Yield th"
+"}"
+}
+In this example the result will be st if @Code "@Day" is 1, 21, or 31,
+and nd if @Code "@Day" is 2 or 22, etc.  The effect is similar to
+accessing a database, though in a more compact form.  The right parameter
+is a sequence of @@Yield symbols, each with a left parameter whose value is
+a sequence of one or more juxtapositions of simple words, and a right
+parameter which may be any object.
+@PP
+We first describe the behaviour when the value of the left parameter of
+@@Case is a juxtaposition of one or more simple words.  Then the result of
+the @@Case is the right parameter of the first @@Yield whose left parameter
+contains either the value of the left parameter of the @@Case, or the special
+value {@Code else}.  If there is no such @@Yield it is an error.
+@PP
+When the left parameter of @@Case is not a juxtaposition of simple
+words, the result is the right parameter of the first @@Yield whose
+left parameter is {@Code else}, or an error otherwise.  This permits
+examples like
+@ID @Code {
+"@RunningTitle @Case {"
+"    dft @Yield @Title"
+"    else @Yield @RunningTitle"
+"}"
+}
+where a running title is returned unless it has the value {@Code dft}
+(which presumably means that no running title was supplied), in which
+case an ordinary title is returned instead.
+@PP
+When a receptive symbol is placed within a @@Case, it should be included
+in each alternative, since otherwise Basser Lout may become confused when
+trying to predict whether the symbol will be a part of the result or
+not.  Alternatively, if it can be guaranteed that the receptive symbol
+will never be searched for when the cases that it does not lie within
+are selected, that is all right too.
+@End @Section
diff --git a/doc/expert/pre_colo b/doc/expert/pre_colo
new file mode 100644
index 0000000..21ae85b
--- /dev/null
+++ b/doc/expert/pre_colo
@@ -0,0 +1,65 @@
+@Section
+   @Title { "@SetColour" and "@SetColor" }
+   @Tag { colour }
+@Begin
+@PP
+The @@SetColour and @@SetColor symbols,
+setcolour.sym @Index { @@SetColour symbol }
+setcolor.sym @Index { @@SetColor symbol }
+which have identical effect, return their right parameter in
+the colour specified by their left parameter.  The form of
+the left parameter is implementation-dependent; in Basser Lout
+it must be an object whose value is a sequence of words comprising
+a PostScript command for setting colour.  For example,
+@ID @Code "{ 1.0 0.0 0.0 setrgbcolor } @SetColour { hello, world }"
+produces the red result
+@ID {
+  @BackEnd @Case {
+    PostScript @Yield {
+      { 1.0 0.0 0.0 setrgbcolor } @SetColour { hello, world }
+    }
+    PDF @Yield {
+      { 1.0 0.0 0.0 rg 1.0 0.0 0.0 RG } @SetColour { hello, world }
+    }
+  }
+}
+Of course, a colour output device is needed to see the effect; on
+a monochrome device the result will be some shade of grey.  The
+@@SetColour command will not accept an empty left parameter
+(it refuses to believe that this could cause a change of colour),
+but otherwise it trusts the user to supply something sensible.
+@PP
+The @@SetColour command accepts the special value {@Code "nochange"}
+for the left parameter.  This value causes the right parameter to have
+the colour it would have had without the @@SetColour command.
+@PP
+There is no default colour, so the user must ensure that the root galley
+or each of its components is enclosed in a @@SetColour symbol whose
+left parameter is not {@Code "nochange"}.
+@PP
+Lout makes no attempt to understand colour, it simply prints
+the PostScript commands when appropriate.  This has the advantage
+of permitting access to any of PostScript's colour models (some
+require initialization which can be supplied using @@PrependGraphic),
+but the disadvantage of offering no way to make relative changes
+(`as before only redder,' and so on).
+@PP
+For those who wish to obtain colour without working very hard,
+the @Code setrgbcolor command used above is available in every
+version of PostScript, requires no initialization, and is simple
+to use.  The three numbers, which range from 0.0 to 1.0, determine
+the intensity of red, green, and blue respectively.  Some useful
+values for the left parameter are
+@ID @Tab
+    @Fmta { @Col @Code A ! @Col @I B }
+{
+@Rowa A { 1.0 0.0 0.0 setrgbcolor } B { red }
+@Rowa A { 0.0 1.0 0.0 setrgbcolor } B { green }
+@Rowa A { 0.0 0.0 1.0 setrgbcolor } B { blue }
+@Rowa A { 1.0 1.0 1.0 setrgbcolor } B { white }
+@Rowa A { 0.5 0.5 0.5 setrgbcolor } B { grey }
+@Rowa A { 0.0 0.0 0.0 setrgbcolor } B { black }
+}
+Colouring an object white is useful for producing an empty space
+whose size is that of some object.
+@End @Section
diff --git a/doc/expert/pre_conc b/doc/expert/pre_conc
new file mode 100644
index 0000000..4ce6e2b
--- /dev/null
+++ b/doc/expert/pre_conc
@@ -0,0 +1,325 @@
+@Section
+   @Title { Concatenation symbols and paragraphs }
+   @Tag { concatenation }
+@Begin
+@PP
+There are ten concatenation symbols, in three families:
+concatenation. @Index { Concatenation symbols }
+@ID @Tab
+   vmargin { 0.5vx }
+   @Fmta { @Col @Code A ! @Col @Code B ! @Col @Code C ! @Col @Code D ! @Col E }
+{
+@Rowa A { "/" } B { "^/" } C { "//" } D { "^//" } E { Vertical concatenation }
+@Rowa A { "|" } B { "^|" } C { "||" } D { "^||" } E { Horizontal concatenation }
+@Rowa A { "&" } B { "^&" } C {      } D {       } E {In-paragraph concatenation}
+}
+Each symbol produces an object which combines together the two
+parameters.  The right parameter must be separated from the symbol by at
+least one white space character.
+@PP
+The vertical concatenation symbol @Code "/" places its left parameter
+vertical.concatenation @Index { Vertical concatenation }
+above its right parameter with their column marks aligned.  If one
+parameter has more column marks than the other, empty columns are
+inserted at the right to equalize the numbers.  The variant @Code "//"
+ignores column marks and left-justifies the objects.
+@PP
+The horizontal concatenation symbols @Code "|" and @Code "||" are horizontal
+horizontal.concatenation @Index { Horizontal concatenation }
+analogues of @Code "/" and {@Code "//"}:  they place their two parameters side
+by side, with row mark alignment or top-justification respectively.  The
+in.paragraph.concatenation @Index { In-paragraph concatenation }
+in-paragraph concatenation symbol @Code "&" produces horizontal concatenation
+within a paragraph; its special properties are treated in detail at the
+end of this section.
+@PP
+The concatenation symbols in any one family are @I { mutually associative },
+which means that
+@ID {
+@Code "{"  @I x  {@Code "|"}{@I p}  @I y  @Code "}"  {@Code "|"}{@I q}  @I z
+}
+is always the same as
+@ID {
+@I x  {@Code "|"}{@I p}  @Code "{"  @I y  {@Code "|"}{@I q}  @I z  @Code "}"
+}
+for any objects {@I x}, {@I y}, and {@I z}, any gaps @I p and @I q (defined
+below), and any choice of {@Code "|"}, {@Code "^|"}, {@Code "||"}, and
+{@Code "^||"}.  In practice we always omit such braces, since they are
+redundant and can be misleading.  The result of the complete sequence of
+concatenations will be called the {@I{whole concatenation object}}, and
+the objects which make it up will be called the {@I components}.
+@PP
+One mark is designated as the @I { principal mark }, usually the mark of
+principal.mark @Index { Principal mark }
+the first component.  A later mark can be chosen for this honour by
+attaching {@Code "^"} to the preceding concatenation symbol.  See Section
+{@NumberOf onerow} for examples.
+@PP
+A {@I gap},
+gap @Index Gap
+specifying the distance between the two
+parameters, may follow any concatenation symbol.  There may be no spaces
+between a concatenation symbol and its gap.  A missing gap is taken
+to be {@Code 0ie}.  The gap is effectively a third parameter of the
+concatenation symbol, and it may be an arbitrary object provided that it
+evaluates to a juxtaposition of simple words.  In general, the gap must
+be enclosed in braces, like this:
+@ID @Code {
+"//{  @Style&&mystyle @Open { @TopMargin }  }"
+}
+but the braces may be omitted when the object is a juxtaposition of
+simple words or an invocation of a symbol without parameters, as in
+@Code "//0.3vx" and {@Code "||@Indent"}.
+@PP
+A gap consists of a length plus a gap mode plus an optional indication
+of unbreakability.  A @I length
+length @Index { Length }
+is represented by an decimal number (which may not be negative) followed
+by a unit of measurement.  For example, @Code "2.5c" represents the
+length 2.5 centimetres.  Figure {@NumberOf units} gives the full selection
+of units of measurement.
+c.unit @Index { @Code c unit }
+p.unit @Index { @Code p unit }
+m.unit @Index { @Code m unit }
+f.unit @Index { @Code f unit }
+s.unit @Index { @Code s unit }
+v.unit @Index { @Code v unit }
+w.unit @Index { @Code w unit }
+b.unit @Index { @Code b unit }
+r.unit @Index { @Code r unit }
+d.unit @Index { @Code d unit }
+
+@Figure
+   @Caption { The thirteen units of measurement provided by Lout. }
+   @Tag { units }
+@Begin
+   @Tab
+      vmargin { 0.3v }
+      side { yes }
+      @Fmta { @Col @Code A ! @Col B }
+   {
+      @Rowa above { yes } A { c } B { Centimetres. }
+      @Rowa A { i } B { Inches.
+}
+      @Rowa A { p } B { Points ({@Code 72p} = {@Code 1i}).
+}
+      @Rowa A { m } B { Ems ({@Code 12m} = {@Code 1i}).
+}
+      @Rowa A { f } B {
+One @Code f equals the size of the current font, as specified by
+the @@Font symbol (Section {@NumberOf font}).  This unit is
+appropriate for lengths that should change with the font size.
+}
+      @Rowa A { s } B {
+One @Code s equals the preferred gap between two words in the
+current font, as specified in the definition of the font, or by the
+@@Space symbol (Section {@NumberOf break}).
+}
+      @Rowa A { v } B {
+One @Code v equals the current gap between lines introduced during
+paragraph breaking, as specified by the @@Break symbol (Section
+{@NumberOf break}).  This unit is appropriate for lengths, such as the
+spaces between paragraphs, which should change with the inter-line gap.
+}
+      @Rowa A { w } B {
+One @Code w equals the width of the following component, or its height if the
+symbol is vertical concatenation.
+}
+      @Rowa A { b } B {
+One @Code b equals the width of the whole concatenation object,
+or its height if the symbol is vertical concatenation.
+}
+      @Rowa A { r } B {
+One @Code r equals one @Code b minus one {@Code w}.  This unit is used
+for centring, and for left and right justification.
+}
+      @Rowa A { d } B {
+Degrees.  This unit may only be used with the @Code "@Rotate" symbol.
+}
+      @Rowa A { y } B {
+One @Code y equals the current value set by the @Code "@YUnit"
+symbol (Section {@NumberOf yunit}).  This unit is not used internally
+by Lout; it is included for the convenience of application packages.
+}
+      @Rowa below { yes } A { z } B {
+One @Code z equals the current value set by the @Code "@ZUnit"
+symbol (Section {@NumberOf yunit}).  This unit is not used internally
+by Lout; it is included for the convenience of application packages.
+}
+   }
+@End @Figure
+
+@PP
+After the length comes an optional @I {gap mode},
+gap.mode @Index { Gap mode }
+which is a single letter following the length, indicating how the length
+is to be measured.  As shown in Figure {@NumberOf gapmodes},
+
+@Figure
+   @Tag { gapmodes }
+   @Caption { The six gap modes provided by Lout. }
+@Begin
+@Fig {
+{ /2.5vx Edge-to-edge |0.3i   {@Code "|"} &1p {@I l} &1p {@Code e}
+  /4vx Hyphenation    |0.3i   {@Code "|"} &1p {@I l} &1p {@Code h}
+  /4vx Overstrike     |0.3i   {@Code "|"} &1p {@I l} &1p {@Code o}
+  /4vx Mark-to-mark   |0.3i   {@Code "|"} &1p {@I l} &1p {@Code x}
+  /4vx Kerning        |0.3i   {@Code "|"} &1p {@I l} &1p {@Code k}
+  /4vx Tabulation     |0.3i   {@Code "|"} &1p {@I l} &1p {@Code t}
+}
+||0.5i
+@Box margin { 0c } 6c @Wide 13.2c @High 9p @Font
+{
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 2.2c @Wide 1.4c @High } @Put { @DoubleArrow 1.8c }
+     @At { 2.2c @Wide 1.6c @High } @Put { 1.8c @Wide { &0.5rt @I l } }
+  }
+  //4vx
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 2.2c @Wide 1.4c @High } @Put { @DoubleArrow 1.8c }
+     @At { 2.2c @Wide 1.6c @High } @Put { 1.8c @Wide { &0.5rt @I l } }
+  }
+  //4vx
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 1.2c @Wide 1.5c @High } @Put { @DoubleArrow 3.3c }
+     @At { 1.2c @Wide 1.7c @High } @Put { 3.3c @Wide { &0.5rt @I l } }
+  }
+  //4vx
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 1.2c @Wide 1.5c @High } @Put { @DoubleArrow 3.3c }
+     @At { 1.2c @Wide 1.7c @High }
+	@Put 3.3c @Wide { |0.5rt { max( {@I {l, a+b+l"/10"}}) } }
+     @At { 1.2c @Wide 0.4c @High } @Put { @DoubleArrow 1.0c }
+     @At { 1.2c @Wide 0.2c @High } @Put { 1.0c @Wide { &0.5rt @I a } }
+     @At { 4c   @Wide 0.4c @High } @Put { @DoubleArrow 0.5c }
+     @At { 4c   @Wide 0.2c @High } @Put { 0.5c @Wide { &0.5rt @I b } }
+  }
+  //4vx
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 1.2c @Wide 1.5c @High } @Put { @DoubleArrow 3.3c }
+     @At { 1.2c @Wide 1.7c @High }
+	@Put { 3.3c @Wide { |0.5rt max( {@I {l, a, b}})}}
+     @At { 1.2c @Wide 0.4c @High } @Put { @DoubleArrow 1.0c }
+     @At { 1.2c @Wide 0.2c @High } @Put { 1.0c @Wide { &0.5rt @I a } }
+     @At { 4c   @Wide 0.4c @High } @Put { @DoubleArrow 0.5c }
+     @At { 4c   @Wide 0.2c @High } @Put { 0.5c @Wide { &0.5rt @I b } }
+  }
+  //4vx
+  @OneRow {
+     @At { 1c   @Wide 0.5c @High } @Put { @LBox 0.2co }
+     @At { 4c   @Wide 0.5c @High } @Put { @LBox 0.5co }
+     @At { 0.0c @Wide 1.6c @High } @Put { @DoubleArrow 4.0c }
+     @At { 2.8c @Wide 1.8c @High } @Put { @I l }
+  }
+  //5vx
+  @DoubleArrow 6c
+  //0.1c |0.5rt @I { current bound }
+}
+
+}
+@End @Figure
+with edge-to-edge gap mode
+edge.to.edge @Index { Edge-to-edge gap mode }
+e.gap.mode @Index { @Code e gap mode }
+the length @I l is measured from the trailing edge
+of the first object to the leading edge of the second.  Edge-to-edge is the
+default mode:  the @Code e may be omitted.  Hyphenation gap mode is
+hyphenation.gap @Index { Hyphenation gap mode }
+h.gap.mode @Index { @Code h gap mode }
+similar, except as explained at the end of this section.
+@PP
+Mark-to-mark,
+mark.to.mark @Index { Mark-to-mark gap mode }
+x.gap.mode @Index { @Code x gap mode }
+overstrike,
+overstrike @Index { Overstrike gap mode }
+o.gap.mode @Index { @Code o gap mode }
+and kerning
+kerning.mode @Index { Kerning gap mode }
+k.gap.mode @Index { @Code k gap mode }
+measure the length from the last mark
+of the first object to the first mark of the second.  In the case of
+mark-to-mark, if the length is too small to prevent the objects
+almost overlapping, it is widened until they no longer do.  (The extra
+@I { "l/10" } is not applied when plain text output is in effect.)  Kerning
+also widens, with the aim of preventing the mark of either object from
+overlapping the other object; this mode is used for subscripts and
+superscripts.
+@PP
+tabulation @Index { Tabulation gap mode }
+t.gap.mode @Index { @Code t gap mode }
+centring @Index { Centring }
+right.justif @Index { Right justification }
+Tabulation ignores the first object and places the leading edge of the
+second object at a distance @I l from the left edge of the whole
+concatenation object.  It is the main user of the @Code b and @Code r
+units of measurement; for example, @Code "|1rt" will right-justify the
+following component, and @Code "|0.5rt" will centre it.
+@PP
+The value @Code "|0rt" separating the first and second items in a
+sequence of horizontally concatenated objects is somewhat special in
+that it denotes left justification of the object to its left in the
+available space.  This is identical with @Code "|0ie" when the object to
+the left also has the principal mark; but when it does not, @Code "|0rt"
+will cause the object to the left to appear further to the left than it
+would otherwise have done, if space to do so is available.
+@PP
+A gap is optionally concluded with an indication of unbreakability,
+which is a letter @Code "u" appended to the gap.  A paragraph will
+never be broken at an unbreakable gap, nor will a galley be broken
+across two targets at such a gap.  Basser Lout's implementation is
+slightly defective in that it ignores any unbreakable indication
+in the gap separating the first component promoted into any target
+from the second.
+@PP
+When two objects are separated only by zero or more white space
+white.space.when @SubIndex { when significant }
+space.f.when @SubIndex { when significant }
+characters (spaces, tabs, newlines, and formfeeds), Lout inserts
+{@Code "&"}{@I k}{@Code "s"} between the two objects, where @I k is the
+number of spaces.  Precisely, @I k is determined by discarding all space
+characters and tabs that precede newlines (these are invisible so are
+better ignored), then counting 1 for each newline, formfeed or space,
+and 8 for each tab character.  The gap will be unbreakable if @I k
+is zero.
+@PP
+A sequence of two or more objects separated by @Code "&" symbols is a
+paragraph.breaking.in.detail @SubIndex { in detail }
+{@I paragraph}.  Lout breaks paragraphs into lines automatically as
+required, by converting some of the @Code "&" symbols into
+{@Code "//1vx"}.  Unbreakable gaps are not eligible for this
+conversion.  `Optimal' line breaks are chosen, using a
+method adapted from @TeX @Cite { $knuth1984tex }.
+tex @RawIndex { @TeX }
+tex.optimal @SubIndex { optimal paragraph breaking }
+@PP
+If an @Code "&" symbol whose gap has hyphenation mode
+hyphenation @Index { Hyphenation gap mode }
+tex.hyphenation @SubIndex { hyphenation }
+is chosen for replacement by {@Code "//1vx"}, a hyphen will be appended to
+the preceding object, unless that object is a word which already ends with
+a hyphen.  For example,
+@ID @Code {
+Long words may be "hyph &0ih enat &0ih ed."
+}
+could have the following result, depending where the line breaks fall:
+@ID 2i @Wide {
+Long words may be hyph &0ih enat &0ih ed.
+}
+Basser Lout inserts hyphenation gaps automatically as required, again
+following the method of @TeX, which approximates the hyphenations in
+Webster's dictionary.  To prevent the hyphenation of a single word,
+enclose it in quotes.  Further control over paragraph breaking and
+hyphenation is provided by the @@Break and @@Space symbols (Sections
+{@NumberOf break} and {@NumberOf space}).
+@End @Section
diff --git a/doc/expert/pre_cove b/doc/expert/pre_cove
new file mode 100644
index 0000000..c5cf45e
--- /dev/null
+++ b/doc/expert/pre_cove
@@ -0,0 +1,32 @@
+@Section
+   @Title { "@HCover" and "@VCover" }
+   @Tag { hcover }
+@Begin
+@PP
+hcover. @Index { @@HCover symbol }
+vcover. @Index { @@VCover symbol }
+The @@VCover symbol vertically scales its right parameter so that it
+covers every object that shares its row mark.  For example,
+@ID @Code "@VCover ( 45d @Rotate Hello @VCover )"
+produces
+@ID @ShowHMark { @VCover ( 45d @Rotate Hello @VCover ) }
+The row mark has been added to show clearly where it lies.  This should be
+compared with
+@ID @Code "@VScale ( 45d @Rotate Hello @VScale )"
+which produces
+@ID @ShowHMark { @VScale ( 45d @Rotate Hello @VScale ) }
+Scaling abandons mark alignment and so is able to exactly cover the
+rest of the row, whereas covering preserves mark alignment and so
+is obliged in general to more than cover the rest of the row.
+@PP
+If the parameter of @@VCover has zero vertical size, this is taken
+to mean that covering is not required after all and the @@VCover is
+silently ignored.  If however the parameter has non-zero size above
+the mark but zero size below, or vice versa, this is taken to be an error
+since scaling cannot make the parameter cover the rest of the row.
+@PP
+@@HCover is similar, horizontally covering all objects that share
+its column mark.  Neither symbol works well near galley targets,
+because the scale factor to apply is determined before any galley
+flushing takes place.
+@End @Section
diff --git a/doc/expert/pre_cros b/doc/expert/pre_cros
new file mode 100644
index 0000000..d300e86
--- /dev/null
+++ b/doc/expert/pre_cros
@@ -0,0 +1,36 @@
+@Section
+   @Title { The cross reference symbols "&&" and "&&&" }
+   @Tag { crossref }
+@Begin
+@PP
+The cross reference symbol @Code "&&" takes the name of a symbol (not an
+object) for its left parameter, and an object whose value must be a
+simple word, or several simple words, for its right parameter.  The
+result is a cross reference, which may be thought of as an arrow pointing
+from the cross reference symbol to the beginning of an invocation of the
+named symbol.
+@PP
+The invocation pointed to, known as the @I target of the cross
+reference, is generally one whose @@Tag parameter has value equal
+to the right parameter of the cross reference symbol.  Three special tags,
+{@Code preceding}, {@Code following}, and {@Code foll_or_prec}, point
+respectively to the first invocation preceding the cross reference in
+the final printed document, to the first invocation following it, and
+to the first following it if such exists else to the first preceding it.
+@PP
+A cross reference may be used in four ways:  where an object is
+expected, in which case its value is a copy of the target; with the
+@@Open and @@Use symbols; with the @@Tagged symbol; and in the
+@Code into clause or @Code "@Target" symbol of a galley definition, in
+which case the value of the tag must be {@Code preceding},
+{@Code following}, or {@Code foll_or_prec}.
+@PP
+Within an @Code "into" clause or @Code "@Target" symbol, the alternative
+form @Code "&&&" is acceptable and indicates a forcing galley (Section
+{@NumberOf targets}).
+@PP
+Except within an @Code into clause or @Code "@Target" symbol, the symbol
+referred to must have a @@Tag parameter.  This is so even if the right
+parameter of the cross reference is {@Code preceding}, {@Code following},
+or {@Code foll_or_prec}.
+@End @Section
diff --git a/doc/expert/pre_data b/doc/expert/pre_data
new file mode 100644
index 0000000..e7bb643
--- /dev/null
+++ b/doc/expert/pre_data
@@ -0,0 +1,37 @@
+@Section
+   @Title { "@Database and @SysDatabase" }
+   @Tag { database }
+@Begin
+@PP
+database.sym @Index { @@Database symbol }
+The @@Database symbol is used to declare the existence of a file
+of symbol invocations that Lout may refer to when evaluating cross
+references.  In Basser Lout, for example,
+@ID @Code {
+"@Database @Months @WeekDays { standard }"
+}
+means that there is a file called @Code "standard.ld" containing
+invocations of the previously defined symbols @Code "@Months" and
+{@Code "@WeekDays"}.  A @@Database symbol may appear anywhere a definition
+or a @@Use symbol may appear.  Different definitions packages may refer to a
+common database, provided the definitions they give for its symbols are
+compatible.  An entry is interpreted as though it appears at the point
+where the cross reference that retrieves it does, which allows symbols
+like @Code "@I" for @Code "Slope @Font" to be used in databases.  The
+database file may not contain @@Database or @@Include symbols, and each
+invocation within it must be enclosed in braces.
+@PP
+Basser Lout constructs an {@I {index file}},
+index.file @Index { Index file (for databases) }
+which in this example is called {@Code "standard.li"}, the first time it
+ever encounters the database, as an aid to searching it.  If the database
+file is changed, its index file must be deleted by the user so that
+Basser Lout knows to reconstruct it.  There is also an installation
+option which allows this deletion to be done automatically on suitable
+systems (including Unix).
+@PP
+Basser Lout searches for databases in the current directory first, then
+in a sequence of standard places.  To search the standard places only, use
+sysdatabase.sym @Index { @@SysDatabase symbol }
+@@SysDatabase.
+@End @Section
diff --git a/doc/expert/pre_font b/doc/expert/pre_font
new file mode 100644
index 0000000..f014e73
--- /dev/null
+++ b/doc/expert/pre_font
@@ -0,0 +1,146 @@
+@Section
+   @Title { "@Font" and "@Char" }
+   @Tag { font }
+@Begin
+@PP
+A @I font
+font. @Index { Fonts }
+is a collection of characters which may be
+printed.  Many fonts come in {@I families},
+family @Index { Family of a font }
+face @Index { Face of a font }
+which are groups of fonts that
+have been designed to go together.  For example, the Times family
+includes the following fonts:
+@ID { Times Base } @Font {
+    Base      @Font { Times Base }
+//1vx Slope     @Font { Times Slope }
+//1vx Bold       @Font { Times Bold }
+//1vx BoldSlope @Font { Times BoldSlope }
+}
+Thus, each font has two names: its @I { family name } (Times,
+Helvetica, etc.) and its @I { face name } (Base, Slope, etc.).  Times
+Base is more commonly called Times Roman, and Times Slope is more
+commonly called Times Italic.  Lout avoids these names in favour of
+generic names which can be applied to many font families.
+@PP
+Ligatures,
+ligatures @Index Ligatures
+kerning @Index Kerning
+such as fl for {@OneCol f}l and fi for {@OneCol f}i, are considered by
+Basser Lout to be an integral part of the font:  if the font definition
+(see below) mentions them, they will be used.  Similarly, kerning (fine
+adjustment of the space between adjacent characters to improve the
+appearance) is done whenever indicated in the font definition.  Enclosing
+one of the letters in @@OneCol is one sure way to disable a ligature or kern.
+@PP
+The @@Font symbol
+font.sym @Index { @@Font symbol }
+returns its right parameter in a font and size specified by its left:
+@ID {
+@Code "{ Times Base 12p } @Font"  @I object
+}
+The family and face names must have appeared together in a {@Code fontdef};
+the size is arbitrary and may be given in any one of the {@Code "c"},
+{@Code "i"}, {@Code "p"}, {@Code "m"}, {@Code "f"}, {@Code "s"}, and
+{@Code "v"} units of measurement (Section {@NumberOf concatenation}),
+although @Code 10p and @Code 12p are the most common sizes for text.  There
+may be empty objects and @@Null objects in the left parameter of @@Font;
+these are ignored.
+@PP
+When a @@Font symbol is nested inside the right parameter of
+another @@Font symbol, the inner one determines the font of its
+own right parameter.  However, it may be abbreviated so as to inherit
+part of the outer symbol:
+@ID @Code {
+"{ Times Base 12p } @Font"
+"{ hello, Slope @Font hello, 15p @Font hello }"
+}
+has result
+@ID {
+{ Times Base 12p } @Font
+{ hello, Slope @Font hello, 15p @Font hello }
+}
+The first inner @@Font inherits the outer family and size, changing only
+the face; the second inherits the outer family and face.  When a family
+name is given, it must be followed immediately by a face name.  A size
+change may appear first or last.
+@PP
+Sizes of the form +{@I length} and --{@I length} may also be used,
+meaning that the font size is to be @I length larger or smaller than
+the inherited value.  For example, --{@Code "2p"} is often used for
+superscripts and subscripts.  These forms are highly recommended, since
+they don't need to be changed if a decision is made to alter the font
+size of the document as a whole.
+@PP
+The @@Font symbol also switches to and from small capitals:
+"smallcaps" @Index { small capitals }
+@ID @Code {
+"smallcaps @Font ..."
+"nosmallcaps @Font ..."
+}
+These may be nested, and they cooperate with other font changes.  The
+precise effect depends on the font (see below).  There is a default
+value (@Code {"nosmallcaps"}), so it is not necessary to mention this
+attribute when giving an initial font.
+@PP
+There are two predefined symbols, @@CurrFamily and @@CurrFace, which
+respectively return the family and face names of the current font.  For
+example, right now @@CurrFamily is @CurrFamily and @@CurrFace is
+@CurrFace.
+@PP
+When Lout runs, the first thing it reads is a list of font definitions,
+font.def @Index { @Code fontdef }
+like these:
+@ID {
+    @Code "fontdef  Times  Base   {"  @I implementation-dependent  @Code "}"
+//1vx @Code "fontdef  Times  Slope  {"  @I implementation-dependent  @Code "}"
+}
+Each line tells Lout of the existence of a font, and assigns it a family
+name and a face name.  There are a few fonts which are the only members
+of their families; even though these fonts do not need a face name, they
+must be given one by their {@Code fontdef}.  The part between braces may
+vary with different implementations of Lout; it is supposed to contain
+the information Lout needs to work with the font.
+@PP
+In Basser Lout Version 3, this implementation-dependent part consists of
+a PostScript font name, an
+adobe @Index { Adobe Systems, Inc. }
+Adobe font metrics (formerly AFM) file whose FontName entry must agree
+with the PostScript font name just mentioned, the name of a Lout
+Character Mapping (LCM) file, and the word @Code Recode or {@Code NoRecode}:
+@ID @Code
+"fontdef  Times  Base  {  Times-Roman  Ti-Ro  LtLatin1.LCM  Recode }"
+It seems to have become an invariable rule at Adobe Systems that the font
+name and the file name should be the same, but some operating systems do
+not permit such long file names, so Lout does not use them.  The files are
+searched for in standard places.  Consult the PostScript Reference Manual
+@Cite { $adobe1990ps } for general information about fonts and encoding
+vectors; briefly, an 8-bit
+lcm. @Index { LCM file }
+character code @I c in Lout's input is mapped to the character in the
+Adobe font metrics file whose name appears on the line labelled @I c in the
+LCM file.  The LCM file also defines various character-to-character
+mappings, such as upper-case to lower-case, which are used for various
+purposes, such as the production of small capitals.  If the word
+@Code NoRecode appears, Lout assumes that the given encoding vector is
+already associated with this font in the PostScript interpreter, and
+optimizes its output accordingly.
+@PP
+If there are two font definitions with the same family and face name,
+it is an error unless the second one has the same font name and file name
+as the first, in which case it is silently ignored.  A PostScript font
+name and file may appear in two or more font definitions, allowing one
+PostScript font to have two or more equally valid Lout names, and
+different LCM files.
+@PP
+The @@Char symbol
+char @Index { @@Char symbol }
+allows a character to be specified by its name (its PostScript name in
+Basser Lout) rather than by its code:
+@ID @Code "@Char  nine"
+is equivalent to @Code "9" in most fonts.  This is useful as a
+documentation aid and to be sure of getting the right character even if the
+encoding vector of the font is changed.  However @@Char will fail if the
+character named is not in the encoding vector of the current font.
+@End @Section
diff --git a/doc/expert/pre_gall b/doc/expert/pre_gall
new file mode 100644
index 0000000..a13aab9
--- /dev/null
+++ b/doc/expert/pre_gall
@@ -0,0 +1,14 @@
+@Section
+   @Title { "@Galley" and "@ForceGalley" }
+   @Tag { galley }
+@Begin
+@PP
+These symbols
+galley.sym @Index { @@Galley symbol }
+galley.sym @Index { @@ForceGalley symbol }
+both act as a placeholder for a galley.  That is, they may be replaced
+by components of a galley.  In the case of @@ForceGalley the galley will
+then have a forcing galley effect at this point although it need not be
+declared using {@Code "force into"}.  See Section {@NumberOf targets}
+for a detailed discussion of galleys, forcing galleys, and targets.
+@End @Section
diff --git a/doc/expert/pre_grap b/doc/expert/pre_grap
new file mode 100644
index 0000000..e75dd21
--- /dev/null
+++ b/doc/expert/pre_grap
@@ -0,0 +1,284 @@
+@Section
+   @Title { "@Graphic" }
+   @Tag { graphic }
+@Begin
+@PP
+graphic.sym @Index { @@Graphic symbol }
+diagrams @Index { Diagrams }
+Lout does not provide the vast repertoire of graphical objects (lines,
+circles, boxes, etc.) required by diagrams.  Instead, it provides an
+escape route to some other language that does have these features, via
+its @@Graphic symbol:
+postscript.graphic @SubIndex { used by @@Graphic }
+@ID @OneRow @OneRow @Code {
+"{ 0 0 moveto"
+"  0 ysize lineto"
+"  xsize ysize lineto"
+"  xsize 0 lineto"
+"  closepath"
+"  stroke"
+"}"
+"@Graphic"
+"{ //0.2c"
+"  ||0.2c hello, world ||0.2c"
+"  //0.2c"
+"}"
+}
+The result of the above invocation of the symbol @@Graphic is
+@ID @OneRow @OneRow {
+  @BackEnd @Case {
+    PostScript @Yield {
+      { 0     0     moveto
+        0     ysize lineto
+        xsize ysize lineto
+        xsize 0     lineto
+        closepath
+        stroke
+      }
+      @Graphic
+      { //0.2c
+        ||0.2c hello, world ||0.2c
+        //0.2c
+      }
+    }
+    PDF @Yield {
+      { 0       0       m
+        0       __ysize l
+        __xsize __ysize l
+        __xsize 0       l
+        s
+      }
+      @Graphic
+      { //0.2c
+        ||0.2c hello, world ||0.2c
+        //0.2c
+      }
+    }
+  }
+}
+@PP
+The right parameter always appears as part of the result, and indeed the
+result is always an object whose size is identical to the size of the
+right parameter with @@OneCol and @@OneRow applied to
+it.  From now on we refer to this part of the result as the {@I base}.
+@PP
+The left parameter is implementation-dependent:  that is, its
+meaning is not defined by Lout, and different implementations could
+require different values for it.  The following description applies to
+Basser Lout, which uses the PostScript page description language
+@Cite { $adobe1990ps }.  Similar but more restricted possibilities exist
+with the PDF back end (see a separate document distributed with Lout);
+to include both, use the @@BackEnd symbol like this:
+@ID @OneRow @Code {
+"{ @BackEnd @Case {"
+"      PostScript @Yield"
+"      {"
+"          ..."
+"      }"
+"      PDF @Yield"
+"      {"
+"          ..."
+"      }"
+"  }"
+"  @Graphic"
+"  {"
+"      ..."
+"  }"
+"}"
+}
+Returning to PostScript, the left parameter refers to a coordinate system
+whose origin is the bottom left-hand corner of the base.  It may use the symbols
+@Code xsize and @Code ysize to denote the horizontal and vertical size
+of the base; similarly, @Code xmark and @Code ymark denote the positions
+of the base's column and row marks:
+@ID @OneRow 9p @Font @Fig {
+   { &1rt @I ysize /0ik &1rt @I ymark /0ik &1rt 0 } |0.4c
+   {  /
+      |0ik @ShowMarks { 1c @High 1.5c @Wide ^| 3c @Wide ^/ 2c @High }
+      |0ik /
+   }
+   /0.2c
+   | 0 | @I xmark | @I xsize
+}
+In addition to these four symbols and 0, lengths may be denoted in
+centimetres, inches, points, ems, f's, v's and s's using the notation
+@ID @OneRow @Tab
+    vmargin { 0.5vx }
+    hmargin { 1m }
+    @Fmta { @Col {@I l  @Code A} ! @Col {instead of Lout's} ! @Col {{@I l}B} }
+{
+@Rowa A { cm } B { c }
+@Rowa A { in } B { i }
+@Rowa A { pt } B { p }
+@Rowa A { em } B { m }
+@Rowa A { ft } B { f }
+@Rowa A { vs } B { v }
+@Rowa A { sp } B { s }
+}
+Note that there must be a space between the number and its unit,
+unlike Lout proper.
+@PP
+A point within the base (and, with care, a point outside it) may
+be denoted by a pair of lengths.  For example,
+@ID @OneRow @Code {
+"xmark  ymark"
+}
+is the point where the marks cross, and
+@ID @OneRow @Code {
+"0   2 cm"
+}
+is a point on the left edge, two centimetres above the bottom left-hand
+corner.  These two numbers are called the @I {x coordinate} and the
+@I {y coordinate} of the point.
+@PP
+The first step in specifying a graphic object is to define a
+{@I path}.  A path can be thought of as the track of a pen moving over
+the page.  The pen may be up (not drawing) or down (drawing a line or
+curve) as it moves.  The entire path is a sequence of the following
+items:
+@LP
+2i @Wide { |1rt @I {x y} @Code moveto }
+|2m Lift the pen and move it to the indicated point.
+@JP
+2i @Wide { |1rt @I {x y} @Code lineto }
+|2m Put the pen down and draw a straight line to the indicated point.
+@JP
+2i @Wide { |1rt @I {x y r angle1 angle2} @Code arc }
+|2m Put the pen down and draw a circular arc whose centre has
+coordinates @I x and @I y and whose radius is {@I r}.  The arc begins
+at the angle @I angle1 measuring counterclockwise from the point
+directly to the right of the centre, and proceeds counterclockwise to
+{@I angle2}.  If the arc is not the first thing on the path, a straight
+line will be drawn connecting the current point to the start of the arc.
+@JP
+2i @Wide { |1rt @I {x y r angle1 angle2} @Code arcn }
+|2m As for arc, but the arc goes clockwise from @I angle1 to
+{@I angle2 }.
+@JP
+2i @Wide @Code { |1rt closepath }
+|2m Draw a straight line back to the point most recently moved to.
+@LP
+The first item should always be a {@Code moveto}, {@Code arc}, or
+{@Code arcn}.  It should be clear from this that the path given earlier:
+@ID @OneRow @Code {
+"0 0 moveto"
+"0 ysize lineto"
+"xsize ysize lineto"
+"xsize 0 lineto"
+"closepath"
+}
+traces around the boundary of the base with the pen down.
+@PP
+Once a path is set up, we are ready to @I paint it onto the page.  There 
+are two choices: we can either @I stroke it, which means to display it
+as described; or we can @I fill it, which means to paint everything
+inside it grey or black.  For stroking the two main options are
+@IL
+@LI {
+2i @Wide { |1rt @I length @Code setlinewidth }
+|2m The pen will draw lines of the given width.
+}
+@LI {
+2i @Wide { |1rt @Code "[" @I length @Code {"]" 0 setdash} }
+|2m The pen will draw dashed lines when it is down, with the dashes each
+of the given length.
+}
+@EL
+These options are followed by the word {@Code "stroke"}.  So, for example,
+@ID @OneRow @Code {
+"{ 0 0 moveto xsize 0 lineto"
+"  2 pt setlinewidth [ 5 pt ] 0 setdash stroke"
+"}"
+"@Graphic { 3i @Wide }"
+}
+has result
+@ID @OneRow {
+  @BackEnd @Case {
+    PostScript @Yield {
+      { 0 0 moveto xsize 0 lineto
+        2 pt setlinewidth [ 5 pt ] 0 setdash stroke
+      }
+      @Graphic { 3i @Wide }
+    }
+    PDF @Yield {
+      { [ __mul(5, __pt) ] 0 d __mul(2, __pt) w 0 0 m __xsize 0 l S
+      }
+      @Graphic { 3i @Wide }
+    }
+  }
+}
+@PP
+When filling in the region enclosed by a path, the main option is
+{@Code setgray}, which determines the shade of grey to use, on a scale
+from 0 (black) to 1 (white).  So, for example,
+@ID @OneRow @Code {
+"{ 0 0 moveto xsize 0 lineto 0 ysize lineto closepath"
+"  0.8 setgray fill"
+"}"
+"@Graphic"
+"{ 2c @Wide  2c @High }"
+}
+has result
+@ID @OneRow {
+  @BackEnd @Case {
+    PostScript @Yield {
+      { 0 0 moveto xsize 0 lineto 0 ysize lineto closepath
+        0.8 setgray fill
+      }
+      @Graphic
+      { 2c @Wide  2c @High }
+    }
+    PDF @Yield {
+      { 0 0 m __xsize 0 l 0 __ysize l h
+        0.8 g f
+      }
+      @Graphic
+      { 2c @Wide  2c @High }
+    }
+  }
+}
+@PP
+There are many other options.  The value of the left parameter of
+@@Graphic may be any fragment of the PostScript page description language
+@Cite { $adobe1990ps }.  Here are two other examples:
+@ID @OneRow @Code {
+xsize 2 div
+}
+denoting a length equal to half the horizontal size of the base, and
+@ID @OneRow @Code {
+gsave fill grestore stroke
+}
+which both fills and strokes the path.  Since Basser Lout does not check
+that the left parameter is valid PostScript, it is possible to cause
+mysterious errors in the printing device, resulting in no output, if an
+incorrect value is given.  It is a good idea to encapsulate graphics
+objects in carefully tested definitions, like those of the Diag figure
+drawing package @Cite { $kingston1995lout.user, Chapter 9 },
+diag @Index { Diag diagram-drawing package }
+to be sure of avoiding these errors.
+@PP
+PostScript experts may find the following information helpful when
+designing advanced graphics features.  The left parameter of @@Graphic
+may have two parts, separated by {@Code "//"}:
+@ID @OneRow {
+@Code "{" @I {first part} @Code "//" @I {second part} @Code "} @Graphic"
+@I object
+}
+If there is no {@Code "//"}, the second part is taken to be empty.  The
+PostScript output has the form
+@ID @OneRow lines @Break {
+@Code gsave
+@I x @I y @Code translate
+@I {Code which defines {@Code xsize}, {@Code ysize}, {@Code xmark}, {@Code ymark}, {@Code ft}, {@Code vs}, and {@Code sp} }
+@Code gsave
+@I {first part}
+@Code grestore
+@I {Code which renders the right parameter in translated coordinates}
+@I {second part}
+@Code grestore
+}
+where @Eq {x, y} is the position of the lower left corner of the
+base.  Having two parts permits bracketing operations, like @Code save
+and @Code restore or @Code begin and {@Code end}, to enclose an
+object.  See the source file of the Diag package for examples.
+@End @Section
diff --git a/doc/expert/pre_hadj b/doc/expert/pre_hadj
new file mode 100644
index 0000000..4ca9fe0
--- /dev/null
+++ b/doc/expert/pre_hadj
@@ -0,0 +1,33 @@
+@Section
+   @Title { "@HAdjust", "@VAdjust", and "@PAdjust" }
+   @Tag { hadjust }
+@Begin
+@PP
+padjust. @Index { @@PAdjust symbol }
+hadjust. @Index { @@HAdjust symbol }
+vadjust. @Index { @@VAdjust symbol }
+adjustment @Index { Adjustment of object }
+These symbols spread their right parameter apart until it occupies
+all the space available to it;  @@HAdjust adjusts @Code "|" sequences,
+@@VAdjust adjusts @Code "/" sequences, and @@PAdjust adjusts @Code "&"
+sequences.  For example,
+@ID @Code {
+"4i @Wide @PAdjust { 1 2 3 4 5 6 7 8 }"
+}
+has result
+@ID {
+4i @Wide @PAdjust { 1 2 3 4 5 6 7 8 }
+}
+More precisely, the widening is effected by enlarging the size of each
+component except the last by an equal fraction of the space that would
+otherwise be left over -- just the opposite of the usual procedure,
+which assigns all the leftover space to the last component (Section
+{@NumberOf size}).
+@PP
+@@PAdjust is used by the @Code adjust and @Code outdent options of
+the @@Break symbol (Section {@NumberOf break}).  It has a slight
+peculiarity:  it will not enlarge components when the immediately
+following gap has width 0.  This is to prevent space from appearing
+(for example) between a word and an immediately following comma.  The
+other two symbols will enlarge such components.
+@End @Section
diff --git a/doc/expert/pre_hcon b/doc/expert/pre_hcon
new file mode 100644
index 0000000..0d409c0
--- /dev/null
+++ b/doc/expert/pre_hcon
@@ -0,0 +1,17 @@
+@Section
+   @Title { "@HContract" and "@VContract" }
+   @Tag { hcontract }
+@Begin
+@PP
+hcontract. @Index { @@HContract symbol }
+vcontract. @Index { @@VContract symbol }
+contraction @Index { Contraction of object }
+The @@HContract symbol reduces the size of its right parameter to a
+reasonable minimum (after paragraph breaking).  For example,
+@ID @Code "5i @Wide @HContract { A |1rt B }"
+has result
+@ID { 5i @Wide @HContract { A |1rt B } }
+in which the B is much closer to the A than it would otherwise have
+been.  @@VContract is similar, but in a vertical direction.  See
+Section {@NumberOf size} for a more extensive discussion.
+@End @Section
diff --git a/doc/expert/pre_hexp b/doc/expert/pre_hexp
new file mode 100644
index 0000000..937e746
--- /dev/null
+++ b/doc/expert/pre_hexp
@@ -0,0 +1,29 @@
+@Section
+   @Title { "@HExpand" and "@VExpand" }
+   @Tag { hexpand }
+@Begin
+@PP
+hexpand. @Index { @@HExpand symbol }
+vexpand. @Index { @@VExpand symbol }
+expansion @Index { Expansion of object }
+The @@HExpand symbol causes its right parameter to be as wide as it
+possibly could be without violating a @@Wide symbol or intruding into
+the space occupied by neighbouring gaps or objects.  The @@VExpand
+symbol is similar, but it affects height.  For example, in the object
+@ID @Code {
+"8i @Wide 11i @High {"
+"    //1i  ||1i @HExpand @VExpand x ||1i"
+"    //1i"
+"}"
+}
+object @Code x could have any size up to six inches wide by nine inches
+high, so the @@HExpand and @@VExpand symbols cause it to have exactly
+this size.  This is important, for example, if @Code x contains
+@Code "|1rt" or {@Code "/1rt"}; without the expansion these might not
+move as far across or down as expected.
+@PP
+As Section {@NumberOf size} explains in detail, most objects are
+already as large as they possibly could be.  Consequently these symbols
+are needed only rarely.  @@HExpand includes a @@OneCol effect, and
+@@VExpand includes a @@OneRow effect.
+@End @Section
diff --git a/doc/expert/pre_hlim b/doc/expert/pre_hlim
new file mode 100644
index 0000000..ccf9548
--- /dev/null
+++ b/doc/expert/pre_hlim
@@ -0,0 +1,18 @@
+@Section
+   @Title { "@HLimited" and "@VLimited" }
+   @Tag { hlimited }
+@Begin
+@PP
+hlimited. @Index { @@HLimited symbol }
+vlimited. @Index { @@VLimited symbol }
+The @@HLimited symbol limits the width available to recursive
+and receptive symbols within its right parameter to whatever
+is available without increasing the existing size of the
+@@HLimited object.  So this symbol acts like @@Wide with
+respect to limiting the space occupied by recursive and receptive
+symbols, except that instead of enforcing a fixed constant limit,
+it enforces whatever size is already in place.
+@PP
+The @@VLimited symbol is exactly the same, except that it
+applies vertically rather than horizontally.
+@End @Section
diff --git a/doc/expert/pre_hsca b/doc/expert/pre_hsca
new file mode 100644
index 0000000..e224685
--- /dev/null
+++ b/doc/expert/pre_hsca
@@ -0,0 +1,34 @@
+@Section
+   @Title { "@HScale" and "@VScale" }
+   @Tag { hscale }
+@Begin
+@PP
+hscale. @Index { @@HScale symbol }
+vscale. @Index { @@VScale symbol }
+scaling @Index { Scaling of object }
+@@HScale causes its right parameter to expand to fill the space available,
+by geometricallly scaling it:
+@ID @Code {
+"4i @Wide @HScale { 1 2 3 4 5 6 7 8 }"
+}
+has result
+@ID {
+4i @Wide @HScale { 1 2 3 4 5 6 7 8 }
+}
+and
+@ID @Code {
+"0.5i @Wide @HScale { 1 2 3 4 5 6 7 8 }"
+}
+has result
+@ID {
+0.5i @Wide @HScale { 1 2 3 4 5 6 7 8 }
+}
+@@HScale first applies @@HContract to its parameter, then horizontally
+scales it to the actual size.  The principal mark of the right parameter
+has no effect on the result; the parameter is scaled to the actual size
+and positioned to fill the space available.  (Taking account of alignment
+of the principal mark only causes trouble in practice.)
+@PP
+@@VScale is similar, but in a vertical direction.  @@HScale and @@VScale
+each have both a @@OneCol and a @@OneRow effect.
+@End @Section
diff --git a/doc/expert/pre_hshi b/doc/expert/pre_hshi
new file mode 100644
index 0000000..6d28222
--- /dev/null
+++ b/doc/expert/pre_hshi
@@ -0,0 +1,43 @@
+@Section
+   @Title { "@HShift" and "@VShift" }
+   @Tag { hshift }
+@Begin
+@PP
+The @@HShift symbol
+hshift.sym @Index { @@HShift symbol }
+returns its right parameter with principal mark shifted as prescribed
+by its left parameter:
+@IL
+
+@LI {
+2i @Wide { |1rt @Code + & @I length @@HShift @I object }
+|2m Principal mark shifted to the right by {@I length};
+}
+
+@LI {
+2i @Wide { |1rt @Code - & @I length @@HShift @I object }
+|2m Principal mark shifted to the left by {@I length};
+}
+
+@LI {
+2i @Wide { |1rt @I length @@HShift @I object }
+|2m Principal mark shifted so as to lie @I length to the right
+of the left edge of {@I object};
+}
+
+@EL
+In each chase @@HShift includes a @@OneCol effect.
+@PP
+The units of measurement of @I length may be {@Code "c"}, {@Code "i"},
+{@Code "p"}, {@Code "m"}, {@Code "f"}, {@Code "s"}, {@Code "v"}, or
+{@Code "w"}.  In the latter case, @Code "1w" is taken to be the width
+of the right parameter, so that, for example, @Code "0.5w @HShift" will
+centre the principal column mark within the right parameter.
+@PP
+vshift.sym @Index { @@VShift symbol }
+The @@VShift symbol is similar except that it applies vertically to the
+principal row mark:  @Code + & @I length shifts it down, @Code - & @I
+length shifts it up, and @I length shifts it to @I length below the top
+edge of the object.  With @@VShift, @Code "1w" is taken to be the height
+of the right parameter.
+@End @Section
diff --git a/doc/expert/pre_incg b/doc/expert/pre_incg
new file mode 100644
index 0000000..a370c5c
--- /dev/null
+++ b/doc/expert/pre_incg
@@ -0,0 +1,36 @@
+@Section
+   @Title { "@IncludeGraphic" and "@SysIncludeGraphic" }
+   @Tag { includegraphic }
+@Begin
+@PP
+includegraphic.sym @Index { @@IncludeGraphic symbol }
+sysincludegraphic.sym @Index { @@SysIncludeGraphic symbol }
+postscript.includegraphic @SubIndex { used by @@IncludeGraphic }
+These symbols instruct Lout to incorporate a separately created
+illustration:
+@ID @Code "@IncludeGraphic  \"myportrait.eps\""
+The parameter is implementation-dependent; in Basser Lout it is an
+object whose value is a simple word denoting the name of a file.  This
+file should ideally be a PostScript EPS Version 3.0 file
+@Cite { $adobe1990ps }, since then Lout will keep careful track of what
+resources are required for printing that file.  However, any PostScript
+file containing the @Code "%%BoundingBox:" comment and not requiring
+unusual resources is likely to work.
+@PP
+The result of @@IncludeGraphic is an ordinary Lout object with marks
+through its centre.  It may be rotated, scaled, and generally
+treated like any other object.  Basser Lout determines its size by
+consulting the bounding box information in the file.  If this cannot be
+found, a warning message is printed and the result object has zero size.
+@PP
+@@IncludeGraphic searches the same directories that @@Include does
+(Section {@NumberOf include}).  @@SysIncludeGraphic is the same as
+@@IncludeGraphic, except that it searches only the directories searched
+by @@SysInclude.
+@PP
+If the file name ends in any of {@Code ".gz"}, {@Code "-gz"}, {@Code ".z"},
+{@Code "-z"}, {@Code "_z"}, or {@Code ".Z"}, the file will first be
+uncompressed using the @Code "gunzip" command into a temporary file
+called @Code "lout.eps" in the current directory.  This file is removed
+immediately after it is copied into the output file.
+@End @Section
diff --git a/doc/expert/pre_incl b/doc/expert/pre_incl
new file mode 100644
index 0000000..c531096
--- /dev/null
+++ b/doc/expert/pre_incl
@@ -0,0 +1,20 @@
+@Section
+   @Tag { include }
+   @Title { "@Include and @SysInclude" }
+@Begin
+@PP
+include.sym @Index { @@Include symbol }
+sysinclude.sym @Index { @@SysInclude symbol }
+These symbols instruct Lout to temporarily switch to reading another
+file, whose name appears in braces following the symbol.  For example,
+@ID @Code {
+"@Include { \"/usr/lout/fontdefs\" }"
+}
+will cause the contents of file "/usr/lout/fontdefs" to be read at the
+point it occurs.  After that file is read, the current file is resumed.  The
+included file may contain arbitrary Lout text, including other
+@@Include commands.  The file is searched for first in the current
+directory, then in a sequence of standard places which are not necessarily the
+same places that databases are searched for.  @@SysInclude searches the
+standard places only.
+@End @Section
diff --git a/doc/expert/pre_inse b/doc/expert/pre_inse
new file mode 100644
index 0000000..e981359
--- /dev/null
+++ b/doc/expert/pre_inse
@@ -0,0 +1,19 @@
+@Section
+   @Title { "@Insert" }
+   @Tag { insert }
+@Begin
+@PP
+insert.sym @Index { @@Insert symbol }
+The @@Insert symbol inserts its left parameter at the beginning of the
+first paragraph of its right parameter:
+@ID @Code "X @Insert { A B // C // D }"
+is equivalent to
+@ID @Code "{ XA B // C // D }"
+Notice that a zero-width space separates @Code { X } from the first
+paragraph, so if some wider space is required it must be placed at the
+end of @Code { X }.  The @Code "@Insert" operation is applied to the
+value of the right parameter after evaluation.
+@PP
+The only known use for this symbol is to attach something like
+@B { Figure 6 } to the front of a multi-paragraph caption.
+@End @Section
diff --git a/doc/expert/pre_kshr b/doc/expert/pre_kshr
new file mode 100644
index 0000000..517cb89
--- /dev/null
+++ b/doc/expert/pre_kshr
@@ -0,0 +1,23 @@
+@Section
+   @Title { "@KernShrink" }
+   @Tag { kernshrink }
+@Begin
+@PP
+kernshrink. @Index { @@KernShrink symbol }
+This symbol returns its right parameter unchanged in appearance but
+occupying a slightly smaller bounding box.  The reduction is by the
+amount of kerning that would be applied if the right parameter was
+immediately @I followed by the left parameter.  For example,
+@ID @Code ". @KernShrink P"
+has result
+@ID @Box margin { 0c } { . @KernShrink P }
+where a box of size 0 has been drawn around the result to make its
+extent clear.  Compare this with `P' alone:
+@ID @Box margin { 0c } { P }
+in which the bounding box exactly encloses the object, or at least
+is supposed to.  The bounding box is smaller on the right by the
+amount of kerning that would be applied between `P' and `.'.
+@PP
+The only known use for this symbol is to produce tucked-in subscripts
+in the Eq equation formatting package.
+@End @Section
diff --git a/doc/expert/pre_lang b/doc/expert/pre_lang
new file mode 100644
index 0000000..50d3539
--- /dev/null
+++ b/doc/expert/pre_lang
@@ -0,0 +1,61 @@
+@Section
+   @Title { "@Language" and "@CurrLang" }
+   @Tag { language }
+@Begin
+@PP
+The @@Language symbol informs Lout that its right parameter is written
+language.sym @Index { @@Language symbol }
+in the language of its left parameter:
+@ID @Code "Danish  @Language  { ... }"
+Basser Lout Version 3 uses this information in two ways:  to hyphenate
+words appropriately to that language, and to change the value of the
+@@CurrLang symbol (see below).  Other uses, such as right-to-left
+formatting of certain languages, may be added in the future.
+@PP
+The left parameter must either be empty (which means to leave the current
+language unchanged) or else it must have been given in a @Code "langdef"
+langdef.sym @Index { @Code langdef language definition }
+language definition at the beginning of the input:
+@ID {
+@Code "langdef  Danish  Dansk  {" @I implementation-dependent @Code "}"
+}
+After @Code "langdef" comes a sequence of one or more simple words,
+which are alternative names for the language being defined.  Following
+them comes an implementation-dependent part between braces.  In Basser
+Lout Version 3 this part contains the name of the Lout hyphenation
+information file (minus its .lh suffix) to be used when hyphenating
+words in this language, followed by a sequence of words which define
+the ends of sentences.  For example:
+@ID @Code "langdef English { english  .  :  ?  !  .)  ?)  !)  }"
+defines a language called English with hyphenation patterns file
+{@Code english.lh} and seven ways to end a sentence.  The use of
+these sentence endings is described in Section {@NumberOf space}.  If
+there is no hyphenation file available, this is indicated by writing
+@Code "-" for the file name; if there are no sentence ends, they are
+simply omitted.
+@PP
+The @@CurrLang symbol, which has no parameters, evaluates to the first
+currlang.sym @Index { @@CurrLang symbol }
+name given in the @Code "langdef" of the language in force at the point
+where it is invoked:
+@ID @Code "Dansk  @Language  { This is @CurrLang. }"
+has result
+@ID { Dansk  @Language  { This is @CurrLang. } }
+It is typically used with the @@Case symbol like this:
+@ID @Code {
+"@CurrLang  @Case  {"
+"    Danish  @Yield  tirsdag"
+"    English  @Yield  Tuesday"
+"    French  @Yield  Mardi"
+"}"
+}
+This example evaluates to the name of the third day of the week in the
+current language.
+@PP
+The current language is part of the style of an object, like its
+font.  As explained in Section {@NumberOf size}, style is inherited
+through the point of appearance, which for language can be
+unexpected.  For example, an index entry which originates in a French
+chapter but appears in an English index will have English for its
+language, so must be explicitly set to French using @@Language.
+@End @Section
diff --git a/doc/expert/pre_mome b/doc/expert/pre_mome
new file mode 100644
index 0000000..d4d377c
--- /dev/null
+++ b/doc/expert/pre_mome
@@ -0,0 +1,72 @@
+@Section
+   @Title { "@Moment" }
+   @Tag { moment }
+@Begin
+@PP
+The predefined symbol @@Moment
+moment.sym @Index { @@Moment symbol }
+has the following definition:
+@ID @OneRow @Code {
+"def @Moment"
+"   named @Tag {}"
+"   named @Second {}"
+"   named @Minute {}"
+"   named @Hour {}"
+"   named @Day {}"
+"   named @Month {}"
+"   named @Year {}"
+"   named @Century {}"
+"   named @WeekDay {}"
+"   named @YearDay {}"
+"   named @DaylightSaving {}"
+"{}"
+}
+It may be used like any other symbol.  Lout provides an invocation of
+@@Moment with tag {@Code now}, whose other parameters are numbers
+encoding the current date and time:
+@ID @OneRow @Tab 
+    @Fmta { @Col @Code A ! @Col B }
+{
+@Rowa
+    A { "@Second" }
+    B { the current second, usually between 00 and 59 }
+@Rowa
+    A { "@Minute" }
+    B { the current minute, between 00 and 59 }
+@Rowa
+    A { "@Hour" }
+    B { the current hour, between 00 and 23 }
+@Rowa
+    A { "@Day" }
+    B { the current day of the month, between 1 and 31 }
+@Rowa
+    A { "@Month" }
+    B { the current month, between 1 (January) and 12 (December) }
+@Rowa
+    A { "@Year" }
+    B { the current year of the century, between 00 and 99 }
+@Rowa
+    A { "@Century" }
+    B { the current century, e.g. 19 or 20 }
+@Rowa
+    A { "@WeekDay" }
+    B { the current day of the week, between 1 (Sunday) and 7 (Saturday) }
+@Rowa
+    A { "@YearDay" }
+    B { the current day of the year, between 0 and 365 }
+@Rowa
+    A { "@DaylightSaving" }
+    B { an implementation-dependent number that may encode the
+daylight saving currently in effect }
+}
+date @Index { Date, printing of current }
+Unix manual entries state that @Code "@Second" can be as high as 61, to
+allow for leap seconds.  Judicious use of databases can convert these
+numbers into useful dates.  For example,
+@ID @Code {
+"@Moment&&now @Open { @Day {@Months&&@Month}, @Century{@Year} }"
+}
+produces something like
+@Moment&&now @Open { @Day {@Months&&@Month}, @Century{@Year} }
+given a suitable database of months.
+@End @Section
diff --git a/doc/expert/pre_next b/doc/expert/pre_next
new file mode 100644
index 0000000..c65d7db
--- /dev/null
+++ b/doc/expert/pre_next
@@ -0,0 +1,17 @@
+@Section
+   @Title { "@Next" }
+   @Tag { next }
+@Begin
+@PP
+next.sym @Index { @@Next symbol }
+The @@Next symbol returns its parameter
+plus one.  It is rather clever at working this out:  it hunts through
+the parameter from right to left, looking for a number to increment:
+@ID @Code {
+"@Next (3.99)"
+}
+has result {@Next (3.99)}.  If @@Next cannot find a digit inside
+its parameter, it is an error.  Roman numerals are handled by storing
+them in a database, as explained in Section {@NumberOf paras};
+@@Next will not increment a Roman numeral.
+@End @Section
diff --git a/doc/expert/pre_notr b/doc/expert/pre_notr
new file mode 100644
index 0000000..169faeb
--- /dev/null
+++ b/doc/expert/pre_notr
@@ -0,0 +1,61 @@
+@Section
+   @Title { "@NotRevealed" }
+   @Tag { notrevealed }
+@Begin
+@PP
+The @@NotRevealed symbol
+notrevealed.sym @Index { @@NotRevealed symbol }
+exerts fine control over the process of expanding receptive symbols.  It
+may appear only within the body of a definition, immediately following
+the name of a receptive symbol.  For example:
+@ID @OneRow @Code {
+"def A { @Galley }"
+""
+"def B { @Galley }"
+""
+"def ABList"
+"{"
+"    A"
+"    //  B @NotRevealed"
+"    //  ABList"
+"}"
+}
+The meaning is that the symbol immediately preceding @@NotRevealed, @Code B
+in this example, is not revealed to galleys which encounter @Code "ABList"
+while searching for targets; to such galleys it appears that @Code "ABList"
+contains @Code A only, not {@Code B}, hence only galleys targeted to
+@Code A will expand {@Code "ABList"}.  However, after @Code "ABList"
+is expanded by such a galley, @Code B will be available as a target in
+the usual way.
+@PP
+Apart from this meaning, @@NotRevealed has no effect at all, and the
+body of the definition may be understood by deleting @@NotRevealed and
+any preceding space.  Thus, the symbol preceding @@NotRevealed may have
+named and right parameters in the usual way; these would follow after
+the @@NotRevealed symbol.
+@PP
+This symbol was introduced to overcome a problem with floating figures
+treated as displays.  It turned out to be essential to specify the
+layout of a column (in part) as
+@ID @OneRow @Code {
+"@BodyTextPlace"
+"//  @FigurePlace"
+"//  @BodyTextPlace"
+"//  @FigurePlace"
+"//  @BodyTextPlace"
+"..."
+}
+so that figures could alternate with body text down the column.  However,
+some means was needed to ensure that in the absence of any figures there
+could only be one @Code "@BodyTextPlace" in the column, since otherwise
+various problems arose, for example the @Code "@NP" symbol merely causing
+a skip from one @Code "@BodyTextPlace" to the next in the same column,
+rather than to the first in the next column.  Also, without this feature
+the optimal page breaker's attempts to end a column early would be
+frustrated by Lout then discovering that plenty of space existed at a
+following @Code "@BodyTextPlace" in the same column.  The solution is
+based on @Code "ABList" above; each occurrence of @Code "@BodyTextPlace"
+after a @Code "@FigurePlace" is not revealed in the enclosing definition,
+and so cannot be found by body text galleys unless a figure has
+previously attached to the preceding {@Code "@FigurePlace"}.
+@End @Section
diff --git a/doc/expert/pre_null b/doc/expert/pre_null
new file mode 100644
index 0000000..7b97081
--- /dev/null
+++ b/doc/expert/pre_null
@@ -0,0 +1,26 @@
+@Section
+   @Title { "@Null" }
+   @Tag { null }
+@Begin
+@PP
+This symbol
+null.sym @Index { @@Null symbol }
+provides a convenient way to remove unwanted
+concatenation symbols.  If there is a concatenation symbol
+preceding @@Null, the @@Null and the
+concatenation symbol are both deleted.  Otherwise, if there is a
+following concatenation symbol, it and the @@Null are both deleted.
+Otherwise, @@Null becomes an empty object.
+@PP
+These rules apply to a fully parenthesized version of the expression.  For
+example, in
+@ID @Code {
+"...  //1vx @Null |0.5i ..."
+}
+it is the horizontal concatenation symbol following @@Null that
+disappears, because in the fully parenthesized version
+@ID @Code {
+"...  //1vx { @Null |0.5i ... }"
+}
+there is no concatenation symbol preceding the @@Null.
+@End @Section
diff --git a/doc/expert/pre_oneo b/doc/expert/pre_oneo
new file mode 100644
index 0000000..bc662cb
--- /dev/null
+++ b/doc/expert/pre_oneo
@@ -0,0 +1,62 @@
+@Section
+   @Title { "@OneOf" }
+   @Tag { oneof }
+@Begin
+@PP
+oneof.sym @Index { @@OneOf symbol }
+The @@OneOf symbol returns one of the sequence of objects which is
+its right parameter as its result:
+@ID @Code @Verbatim {
+@OneOf {
+    @ResultA
+    @ResultB
+    @ResultC
+}
+}
+The choice is made to ensure that whatever galley target is required
+at the moment is found.  For example, if we are evaluating @@OneOf
+as part of an attempt to attach a galley whose target is
+{@Code "@SomeTarget"}, then the result above will be
+{@Code "@ResultA"} if it contains {@Code "@SomeTarget"}, or else
+{@Code "@ResultB"} if it contains {@Code "@SomeTarget"}, or else
+{@Code "@ResultC"} (whether or not it contains the target, or
+if there is no target).
+@PP
+Use of @@OneOf in conjunction with recursive symbols can lead
+to problems.  Consider this example:
+@ID @Code {
+"def @Recursive {"
+""
+"    def @ChoiceA { @APlace // @Recursive }"
+""
+"    def @ChoiceB { @BPlace // @Recursive }"
+""
+"    @OneOf {"
+"        @ChoiceA"
+"        @ChoiceB"
+"    }"
+"}"
+}
+Lout believes that expanding @Code "@Recursive" is the right thing
+to do when searching for either of the galley targets {@Code "@APlace"}
+and {@Code "@BPlace"}.  When searching for @Code "@BPlace" this leads
+Lout to expand {@Code "@Recursive"}, then {@Code "@ChoiceA"}, then
+the {@Code "@Recursive"} symbol within {@Code "@ChoiceA"}, and so on
+infinitely.  This problem can be avoided by attaching a
+@Code "@NotRevealed" symbol to each of the inner @Code "@Recursive"
+symbols:  these are then not available for expansion until a
+decision has been made to expand the symbol they lie within.  In
+this particular example it would be simpler to write
+@ID @Code {
+"def @Recursive {"
+""
+"    @OneOf {"
+"        @APlace"
+"        @BPlace"
+"    }"
+"    // @Recursive"
+"}"
+}
+but this factoring is not possible when the recursive calls have
+parameters that are required to differ in the two cases.
+@End @Section
diff --git a/doc/expert/pre_oner b/doc/expert/pre_oner
new file mode 100644
index 0000000..7e0dbce
--- /dev/null
+++ b/doc/expert/pre_oner
@@ -0,0 +1,36 @@
+@Section
+   @Title { "@OneCol" and "@OneRow" }
+   @Tag { onerow }
+@Begin
+@PP
+The @@OneRow symbol
+onerow.sym @Index { @@OneRow symbol }
+principal.mark.effect @SubIndex { effect on @@OneCol and @@OneRow }
+returns its right parameter modified so that only the principal row mark
+protrudes.  This is normally the first row mark, but another one may be
+chosen by preceding it with @Code "^/" or {@Code "^//"}.  For example,
+@ID @Code {
+"@OneRow {  |0.5rt  Slope @Font x + 2  ^//1p  @HLine  //1p  |0.5rt  5 }"
+}
+has result
+@LP
+@ID {
+@ShowMarks
+@OneRow { |0.5rt Slope @Font x + 2 ^//1p @HLine //1p |0.5rt 5 }
+}
+@LP
+with one row mark protruding from the bar as shown.  Compare this with
+@ID @Code {
+"@OneRow {  |0.5rt  Slope @Font x + 2  //1p  @HLine  //1p  |0.5rt  5 }"
+}
+where the mark protrudes from the numerator:
+@LP
+@ID {
+@ShowMarks
+@OneRow { |0.5rt Slope @Font x + 2 //1p @HLine //1p |0.5rt 5 }
+}
+onecol.sym @Index { @@OneCol symbol }
+@@OneCol has the same effect on columns as @@OneRow does on rows, with
+the symbols @Code "^|" and @Code "^||" (or {@Code "^&"}) determining
+which mark is chosen.
+@End @Section
diff --git a/doc/expert/pre_open b/doc/expert/pre_open
new file mode 100644
index 0000000..d332570
--- /dev/null
+++ b/doc/expert/pre_open
@@ -0,0 +1,41 @@
+@Section
+   @Title { "@Open and @Use" }
+   @Tag { open }
+@Begin
+@PP
+The @@Open symbol
+open.sym @Index { @@Open symbol }
+takes a cross reference or symbol
+invocation for its left parameter, and an arbitrary object, which must
+be enclosed in braces, for its right parameter.  The right parameter
+may refer to the exported parameters and nested definitions of the invocation
+denoted by the left parameter, and its value is the @@Open
+symbol's result.  The target of the cross reference may lie in an
+external database (Section {@NumberOf database}).  Any symbol available
+outside the @@Open which happens to have the same name as one of the
+symbols made available by the @@Open will be unavailable within the @@Open.
+@PP
+use.sym @Index { @@Use symbol }
+The @@Use symbol is an @@Open symbol in a
+different form.  It may only appear among or after the definitions
+in Lout's input, and it is equivalent to enclosing the remainder of the
+input in an @@Open symbol.  For example,
+@ID @OneRow {
+      @I definitions
+//1vx @Code "@Use" @Code "{" @I x @Code "}"
+//1vx @Code "@Use" @Code "{" @I y @Code "}"
+//1vx @I { rest of input }
+}
+is equivalent to
+@ID @OneRow {
+      @I definitions
+//1vx @I x @Code "@Open"
+//1vx @Code "{" &4mt @I y @Code "@Open"
+//1vx   &4mt @Code "{" @I { rest of input }
+//1vx   &4mt @Code "}"
+//1vx @Code "}"
+}
+The @@Use symbol allows a set of standard packages to be opened without
+the inconvenience of enclosing the entire document in @@Open symbols.  Such
+enclosure could cause Basser Lout to run out of memory.
+@End @Section
diff --git a/doc/expert/pre_page b/doc/expert/pre_page
new file mode 100644
index 0000000..cccff13
--- /dev/null
+++ b/doc/expert/pre_page
@@ -0,0 +1,20 @@
+@Section
+   @Tag { pagelabel }
+   @Title { "@PageLabel" }
+@Begin
+@PP
+pagelabel.sym @Index { @@PageLabel symbol }
+The @@PageLabel symbol associates a page label in the PostScript
+output file with the page within which (or just before which) the symbol
+occurs, so that PostScript viewers are able to index the page
+by this label.  (The label is printed in the @Code "%%Page" comment
+preceding the page in the PostScript output file.)  For example,
+@ID @Code "@PageLabel iv"
+associates the label @Code "iv" with the page.  The label may be
+an arbitrary object; if its value is not a simple word, it will
+be replaced by {@Code "?"}.
+@PP
+@@PageLabel is unrelated to Lout's cross referencing mechanism;
+it is for communicating a label to the PostScript output file, not to
+other parts of Lout.  The result of @@PageLabel is a null object.
+@End @Section
diff --git a/doc/expert/pre_plai b/doc/expert/pre_plai
new file mode 100644
index 0000000..1f0319e
--- /dev/null
+++ b/doc/expert/pre_plai
@@ -0,0 +1,15 @@
+@Section
+   @Title { "@PlainGraphic" }
+   @Tag { plaingraphic }
+@Begin
+@PP
+plaingraphic.sym @Index { @@PlainGraphic symbol }
+The @@PlainGraphic symbol is avery rudimentary analogue for plain text
+output of the @@Graphic symbol for PostScript output.  Its result is
+its right parameter printed on a background created by repeated
+printings of its left parameter, which must be a simple word.  For
+example,
+@ID @Verbatim { "." @PlainGraphic 5s @Wide }
+would produce five dots.  @@PlainGraphic is used in the @Code tbl
+table-drawing package to produce plain-text rules.
+@End @Section
diff --git a/doc/expert/pre_prep b/doc/expert/pre_prep
new file mode 100644
index 0000000..d53845b
--- /dev/null
+++ b/doc/expert/pre_prep
@@ -0,0 +1,24 @@
+@Section
+   @Tag { prependgraphic }
+   @Title { "@PrependGraphic and @SysPrependGraphic" }
+@Begin
+@PP
+prependgraphic.sym @Index { @@PrependGraphic symbol }
+sysprependgraphic.sym @Index { @@SysPrependGraphic symbol }
+postscript.prependgraphic @SubIndex { used by @@PrependGraphic }
+These symbols, which may appear anywhere that a definition or @@Use
+symbol may appear, tell Lout to include the contents of a file in the
+preamble of its output.  For Basser Lout this means that the file must
+contain PostScript (and ideally it would begin and end with the
+@Code "%%BeginResource" and @Code "%%EndResource" comments of
+DSC 3.0).  For example,
+@ID @Code {
+"@SysPrependGraphic { diagf.lpg }"
+}
+appears at the start of the Diag package; the file @Code diagf.lpg
+contains a number of PostScript definitions used by Diag for drawing
+diagrams.  It saves a lot of space to include them just once at the
+start like this, rather than with every diagram.  @@PrependGraphic and
+@@SysPrependGraphic search for the file in the same places as @@Include and
+@@SysInclude respectively.
+@End @Section
diff --git a/doc/expert/pre_rota b/doc/expert/pre_rota
new file mode 100644
index 0000000..00e28ff
--- /dev/null
+++ b/doc/expert/pre_rota
@@ -0,0 +1,57 @@
+@Section
+   @Title { "@Rotate" }
+   @Tag { rotate }
+@Begin
+@PP
+rotate.sym @Index { @@Rotate symbol }
+rotation @Index { Rotation of object }
+The @@Rotate symbol will rotate its
+right parameter counterclockwise an amount given in degrees (positive or
+negative) by its left parameter.  For example,
+@ID @Code {
+"30d  @Rotate  { hello, world }"
+}
+has result
+@ID {
+30d  @Rotate  { hello, world }
+}
+Before rotating the object, @@OneCol and @@OneRow are applied to it.  The
+result is a rectangle whose marks pass through the point where the
+original marks crossed:
+@ID {
+   @ShowMarks
+   { 0.6c @Wide 0.3c @High ^| 2.2c @Wide ^/ 0.2c @High }
+
+&4m => &4m
+
+   @ShowMarks
+   {
+	30d @Rotate
+	{	@ShowMarks
+		{ 0.6c @Wide 0.3c @High ^| 2.2c @Wide ^/ 0.2c @High }
+	}
+   }
+}
+As this example shows, rotation by an angle other than a multiple of
+ninety degrees introduces quite a lot of white space.  So, for example, the
+result of
+@ID {
+@Code { "-30d" "@Rotate" 30d "@Rotate" }  @I object
+}
+is a much larger object than {@I object}, despite the fact that one
+rotation cancels the other.
+@PP
+Rotation of objects containing receptive and recursive symbols is
+permitted, but for angles other than multiples of ninety degrees it is
+best to make the size of the rotated object clear with @@Wide and
+@@High symbols:
+@ID @Code {
+"30d @Rotate 5i @Wide 4i @High"
+"{   //1i @TextPlace"
+"    //1i"
+"}"
+}
+This is because for angles other than multiples of ninety degrees the
+space available for @Code "@TextPlace" to occupy is indeterminate, and
+the result is poor.
+@End @Section
diff --git a/doc/expert/pre_rump b/doc/expert/pre_rump
new file mode 100644
index 0000000..0270202
--- /dev/null
+++ b/doc/expert/pre_rump
@@ -0,0 +1,41 @@
+@Section
+   @Title { {"@Common"}, {"@Rump"}, and "@Meld" }
+   @Tag { rump }
+@Begin
+@PP
+common.sym @Index { @@Common symbol }
+rump.sym @Index { @@Rump symbol }
+meld.sym @Index { @@Meld symbol }
+The @@Common and @@Rump symbols compare two paragraph objects:
+@ID @Code "{ Aardvark, 29 } @Common { Aardvark, 359 }"
+If either parameter is not a paragraph object, it is converted into
+a single-object paragraph first.  The result of @@Common is the
+common prefix of the two paragraphs; that is, those initial objects
+which are equal in the two paragraphs.  In the example above, the
+result is {@Code "Aardvark,"}.  The result of @@Rump is that part of
+the second object which is not included in @@Common; the result of
+@ID @Code "{ Aardvark, 29 } @Rump { Aardvark, 359 }"
+is {@Code "359"}.
+@PP
+If the two objects have nothing in common, the result of @@Common will
+be an empty object and the result of @@Rump will be the second
+object.  If the two objects are identical, the result of @@Common will
+be the first object, and the result of @@Rump will be an empty object.
+@PP
+The only known use for @@Rump and @@Common is to implement merged index
+entries (Section {@NumberOf sorted}).
+@PP
+The @@Meld symbol returns the minimum meld of two paragraphs, that
+is the shortest paragraph that contains the two original paragraphs
+as subsequences.  For example,
+@ID @Code "{ Aardvark , 1 , 2 } @Meld { Aardvark , 2 , 3 }"
+produces
+@ID { Aardvark , 1 , 2 } @Meld { Aardvark , 2 , 3 }
+The result is related to the well-known
+longest common substring, in that the meld contains everything not in
+the lcs plus one copy of everything in the lcs.  This function is
+well-suited to melding complex index entries.  Note that there must be
+a non-zero amount of space before each comma, otherwise each will become
+part of the preceding word, and, since @@Meld compares the two paragraphs
+word by word, the result will be different and less satisfactory.
+@End @Section
diff --git a/doc/expert/pre_scal b/doc/expert/pre_scal
new file mode 100644
index 0000000..1e1b1a3
--- /dev/null
+++ b/doc/expert/pre_scal
@@ -0,0 +1,26 @@
+@Section
+   @Title { "@Scale" }
+   @Tag { scale }
+@Begin
+@PP
+scale. @Index { @@Scale symbol }
+This symbol geometrically scales its right parameter by the scale factor
+given in its left parameter:
+@ID @Code "1.0 @Scale Hello  2.0 @Scale Hello  0.5 @Scale Hello"
+has result
+@ID { 1.0 @Scale Hello  2.0 @Scale Hello  0.5 @Scale Hello }
+The left parameter can be two scale factors, in which case the first
+applies horizontally, and the second vertically:
+@ID @Code "{0.5 2.0} @Scale Hello"
+has result
+@ID { {0.5 2.0} @Scale Hello }
+The left parameter may be empty, in which case Lout will scale the
+object by a common factor horizontally and vertically so as to occupy
+all available horizontal space:
+@ID @Code "{} @Scale { Hello world }"
+has result
+@LD {} @Scale { Hello world }
+The right parameter may be any object.  @@Scale has both a @@OneCol and
+a @@OneRow effect, and the marks of the result coincide with the principal
+marks of the right parameter.
+@End @Section
diff --git a/doc/expert/pre_spac b/doc/expert/pre_spac
new file mode 100644
index 0000000..f44d840
--- /dev/null
+++ b/doc/expert/pre_spac
@@ -0,0 +1,55 @@
+@Section
+   @Title { "@Space" }
+   @Tag { space }
+@Begin
+@PP
+The @@Space symbol
+space.sym @Index { @@Space symbol }
+changes the value of the @Code s unit of measurement (Section
+s.unit.space @SubIndex { and @@Space symbol }
+{@NumberOf concatenation}) within its right parameter to the value
+given by the left parameter:
+@ID {
+@Code "1c @Space { a b c d }"
+}
+has result
+@ID {
+1c @Space { a b c d }
+}
+As for the @@Break symbol, the left parameter of @@Space may be given
+relative to the enclosing @Code s unit, and it may include a gap
+mode.  Note that the @@Font symbol also sets the @Code s unit.
+@PP
+The left parameter of the @@Space symbol may also hold any one of the
+five special values {@Code lout}, {@Code compress}, {@Code separate},
+{@Code troff}, and {@Code tex}, which control the way in which Lout
+treats white space separating two objects.  The names {@Code troff}
+and {@Code tex} indicate that the behaviour of these options is
+inspired by these other document formatting systems.
+@PP
+The default setting, {@Code lout}, produces as many spaces in the output as
+there are in the input.  The {@Code compress} setting causes all sequences
+of two or more white space characters to be treated the same as one white
+space character.  The {@Code separate} setting is like {@Code compress}
+but also causes zero white spaces between two objects (but not within
+one word) to be treated the same as one white space character.
+@PP
+The {@Code troff} setting is the same as {@Code lout} except that
+wherever a sentence ends at the end of a line, one extra space is
+added.  Formally, when two objects are separated by white space
+characters which include at least one newline character, and the
+first object is a word ending in any one of a certain set of
+sequences of characters, the extra space is added.  The set of
+sequences of characters depends on the current language and is defined
+in the @Code langdef for that language (see Section {@NumberOf language}).
+@PP
+The {@Code tex} option is the most complicated.  First, the
+{@Code compress} option is applied.  Then, at every sentence ending,
+whether or not at the end of a line, one extra space is added.  A
+sentence ending is defined as for {@Code troff} except that, in addition
+to the preceding word having to end in one of a certain set of sequences of
+characters, the character preceding that sequence must exist and must
+be a lower-case letter.  A character is a lower-case letter if, in the
+Lout Character Mapping file (Section {@NumberOf font}) associated with
+the current font, an upper-case equivalent of the character is defined.
+@End @Section
diff --git a/doc/expert/pre_span b/doc/expert/pre_span
new file mode 100644
index 0000000..e527652
--- /dev/null
+++ b/doc/expert/pre_span
@@ -0,0 +1,58 @@
+@Section
+   @Title { "@StartHSpan","@StartVSpan", "@StartHVSpan", "@HSpan", and "@VSpan" }
+   @Tag { hspan }
+@Begin
+@PP
+starthspan.  @Index { @@StartHSpan symbol }
+startvspan.  @Index { @@StartVSpan symbol }
+starthvspan.  @Index { @@StartHVSpan symbol }
+hspan. @Index { @@HSpan symbol }
+vspan. @Index { @@VSpan symbol }
+These symbols work together to produce spanning columns and rows in
+a more flexible way than is possible in practice with @Code "//" and
+{@Code "||"}.  An object
+@ID @Code "@StartHSpan object"
+causes @Code object to be printed, but occupying all the horizontal space
+to the right on the row mark on which it lies up to and including the rightmost
+@@HSpan symbol on that mark not preceded by @@StartHVSpan, @@StartHSpan,
+@@StartVSpan, or @@VSpan.  The column mark of this spanning object is not
+constrained to align with any of the column marks of the columns it spans.
+@PP
+If there is no @@HSpan symbol anywhere to the right of @@StartHSpan, then
+the object spans only its own column.  This means that it occupies that
+column as usual but its mark is not constrained to align with those of the
+other objects in the column.
+@PP
+Similarly, the @@StartVSpan symbol causes its object to occupy all
+the vertical space below it on the column mark on which it lies, down to and
+including the bottommost @@VSpan symbol on that mark not preceded by a
+@@StartHVSpan, @@StartHSpan, @@StartVSpan, or @@HSpan; and if there 
+is no @@VSpan symbol anywhere below it on that mark, then the object
+spans only its own row, occupying its row but with its mark not constrained
+to align with the row mark.
+@PP
+The @@StartHVSpan symbol combines the effects of @@StartHSpan and
+@@StartVSpan, allowing an object to span both columns and rows
+simultaneously.  For example, in
+@ID @Code {
+"@StartHVSpan x  |  | @HSpan"
+"/"
+"@VSpan   |  |"
+}
+the object @Code x will occupy a rectangular area spanning three columns,
+two rows, and the gaps between them.
+@PP
+The objects lying in the region spanned should all be empty, or the
+@@HSpan and @@VSpan symbols can be used to document the spanning that
+is occurring.  At present there may be no galley targets or recursive symbols
+within the right parameter of @@StartHSpan, @@StartVSpan, or
+@@StartHVSpan.  However, the right parameter may otherwise be an
+arbitrary object, including paragraphs of text that require breaking.
+@PP
+If the right parameter of @@StartHSpan, @@StartVSpan, or @@StartHVSpan
+occupies more horizontal or vertical space than all of the spanned columns
+or rows combined require, the extra space goes into the last spanned column
+or row.  Overlapping spanning rows and columns are permitted.  Gaps spanned
+by span objects are unbreakable (their @Code "u" indicator is set
+automatically and cannot be revoked).
+@End @Section
diff --git a/doc/expert/pre_tagg b/doc/expert/pre_tagg
new file mode 100644
index 0000000..df6cdc3
--- /dev/null
+++ b/doc/expert/pre_tagg
@@ -0,0 +1,15 @@
+@Section
+   @Title { "@Tagged" }
+   @Tag { tagged }
+@Begin
+@PP
+The @@Tagged
+tagged.sym @Index { @@Tagged symbol }
+symbol takes a cross reference for its left parameter and an object, whose
+value must be a juxtaposition of simple words, or several words, or an empty
+object, for its right parameter.  It has the effect of attaching its
+right parameter as an additional tag to the invocation denoted by its
+left parameter, unless the right parameter is empty, in which case @@Tagged
+does nothing.  The result of @@Tagged is always @@Null, which makes it
+effectively invisible.
+@End @Section
diff --git a/doc/expert/pre_unde b/doc/expert/pre_unde
new file mode 100644
index 0000000..1261449
--- /dev/null
+++ b/doc/expert/pre_unde
@@ -0,0 +1,30 @@
+@Section
+   @Tag { underline }
+   @Title { "@Underline" }
+@Begin
+@PP
+underline.sym @Index { @@Underline symbol }
+The @@Underline symbol underlines its right parameter, but only if that
+parameter is a word or a paragraph:
+@ID @Code "We @Underline { really do } mean this."
+produces
+@ID { We @Underline { really do } mean this. }
+It is not possible to underline an arbitrary object using this symbol;
+the @@Underline symbol will be ignored if this is attempted.
+@PP
+It is very easy to @I define a symbol which will underline an arbitrary
+object, using the @@Graphic symbol.  This raises the question of why
+@@Underline is needed at all.  The answer is that @@Underline has two
+properties that distinguish it from symbols based on @@Graphic.
+@PP
+First, when @@Underline both contains a paragraph and is used within a
+paragraph, as in the example above, the inner and outer paragraphs are
+merged into one, permitting the underlined text to break over several
+lines.  This is how the @@Font symbol works too, but symbols based on
+@@Graphic do not permit this merging.
+@PP
+Second, Adobe font files specify the correct position and thickness of
+underlining for each font, and the @@Underline symbol follows these
+specifications.  The font used is the font of the first object underlined,
+if it is a simple word, or else the font of the enclosing paragraph.
+@End @Section
diff --git a/doc/expert/pre_verb b/doc/expert/pre_verb
new file mode 100644
index 0000000..725df85
--- /dev/null
+++ b/doc/expert/pre_verb
@@ -0,0 +1,30 @@
+@Section
+   @Tag { verbatim }
+   @Title { "@Verbatim and @RawVerbatim" }
+@Begin
+@PP
+verbatim.sym @Index { @@Verbatim symbol }
+rawverbatim.sym @Index { @@RawVerbatim symbol }
+These symbols instruct Lout to read the following text (enclosed in braces)
+verbatim, that is, turning off all special character meanings.  For example,
+@ID @Code @Verbatim {
+@Verbatim { "hello" }
+}
+produces
+@ID @Verbatim { "hello" }
+@@Verbatim ignores all characters after the opening brace up to but not
+including the first non-white-space character.  @@RawVerbatim differs from
+@@Verbatim only in that it ignores all characters after the opening brace
+up to but not including the first non-white-space character, or up to and
+including the first newline character, whichever comes first.  This
+variant is useful in cases such as
+@ID @Code @Verbatim {
+@RawVerbatim {
+     var x: Real
+begin
+}
+}
+where the first line of the verbatim text begins with white space which
+would be ignored by @@Verbatim.  Both symbols ignore all white spaces
+at the end of the verbatim text, preceding the closing brace.
+@End @Section
diff --git a/doc/expert/pre_wide b/doc/expert/pre_wide
new file mode 100644
index 0000000..6526957
--- /dev/null
+++ b/doc/expert/pre_wide
@@ -0,0 +1,22 @@
+@Section
+   @Title { "@Wide" and "@High" }
+   @Tag { wide }
+@Begin
+@PP
+The @@Wide symbol
+wide.sym @Index { @@Wide symbol }
+returns its right parameter modified to have the width given by its left
+parameter, which must be a length (Section {@NumberOf concatenation})
+whose unit of measurement is {@Code "c"}, {@Code "i"}, {@Code "p"},
+{@Code "m"}, {@Code "f"}, {@Code "s"}, or {@Code "v"}.  If the right
+parameter is not as wide as required, white space is added at the right;
+if it is too wide, its paragraphs are broken (Section {@NumberOf break})
+so that it fits.  A @@OneCol operation is included in the effect of @@Wide,
+since it does not make sense for an object of fixed width to have two column
+marks.
+@PP
+high.sym @Index { @@High symbol }
+The @@High symbol similarly ensures that its result is of a given height,
+by adding white space at the bottom.  In this case it is an error for the
+right parameter to be too large.  A @@OneRow operation is included.
+@End @Section
diff --git a/doc/expert/pre_yuni b/doc/expert/pre_yuni
new file mode 100644
index 0000000..7b06b5d
--- /dev/null
+++ b/doc/expert/pre_yuni
@@ -0,0 +1,28 @@
+@Section
+   @Title { "@YUnit" and "@ZUnit" }
+   @Tag { yunit }
+@Begin
+@PP
+The @@YUnit symbol
+yunit.sym @Index { @@YUnit symbol }
+zunit.sym @Index { @@ZUnit symbol }
+changes the value of the @Code y unit of measurement (Section
+{@NumberOf concatenation}) within its right parameter to the value
+given by the left parameter:
+@ID {
+@Code "1c @YUnit { ... }"
+}
+ensures that the value of @Code "1y" within the right parameter will
+be {@Code "1c"}.  The @@ZUnit symbol is similar, setting the value
+of the @Code z unit in its right parameter.  Both units have default
+value zero.  The left parameter may not include a gap mode, nor may it
+use the {@Code w}, {@Code b}, {@Code r}, or of course {@Code d} units,
+but it may begin with @Code "+" or @Code "-" to indicate that value is
+to be added to or subtracted from the current value.  Any negative result
+of using @Code "-" will be silently replaced by zero.
+@PP
+These units are not used internally by Lout.  They are supplied as
+part of the style information for the convenience of application
+packages.  For example, the Eq equation formatting package uses them
+to fine-tune the appearance of equations.
+@End @Section
diff --git a/doc/expert/preface b/doc/expert/preface
new file mode 100644
index 0000000..1150929
--- /dev/null
+++ b/doc/expert/preface
@@ -0,0 +1,31 @@
+@Preface
+   @Tag { preface }
+@Begin
+@PP
+@IndexBlanks
+This manual is addressed to those who wish to become
+expert users of the Lout document formatting system.  An expert user
+is someone who understands the principles of document formatting
+that Lout embodies, and is able to apply them, for example to design
+a document format or a special-purpose package.  In contrast, a non-expert
+user is someone who simply uses Lout to format documents.
+@PP
+Chapter {@NumberOf principles} explains these principles, and it
+should be read carefully and in sequence.  Chapters {@NumberOf details}
+and {@NumberOf symbols} are for reference; respectively, they
+contain descriptions of the detailed operation of Lout's major
+components, and a complete description of each predefined symbol.  The
+final chapter presents a collection of advanced examples.
+@PP
+This manual presents Version 3 of Basser Lout, publicly released in
+September 1994 @Cite { $kingston1995lout.program }.  This manual was
+rendered into PostScript
+postscript @Index { PostScript }
+by Version 3.17 of the Basser Lout interpreter, using the symbols
+described in the User's Guide @Cite { $kingston1995lout.user }.
+@DP
+@Heading { Acknowledgment. }  Version 3 has benefited from hundreds of
+comments received since the release of Version 1 in October 1991.  Not
+every suggestion could be followed, but many have been, and the
+encouragement was greatly appreciated.
+@End @Preface
diff --git a/doc/expert/pri b/doc/expert/pri
new file mode 100644
index 0000000..f24cb02
--- /dev/null
+++ b/doc/expert/pri
@@ -0,0 +1,15 @@
+@Chapter
+   @Title { Principles }
+   @Tag { principles }
+@Begin
+@LP
+The Lout document formatting language is based on just four key ideas:
+objects, definitions, cross references, and galleys.  This chapter
+concentrates on them, postponing the inevitable details.
+@BeginSections
+@Include { pri_obje }
+@Include { pri_defi }
+@Include { pri_cros }
+@Include { pri_gall }
+@EndSections
+@End @Chapter
diff --git a/doc/expert/pri_cros b/doc/expert/pri_cros
new file mode 100644
index 0000000..677794e
--- /dev/null
+++ b/doc/expert/pri_cros
@@ -0,0 +1,112 @@
+@Section
+   @Tag { cross }
+   @Title { Cross references }
+@Begin
+@PP
+A cross reference
+cross.ref @Index { Cross reference }
+in common terminology is something like `see Table 6'
+or `see page 57' -- a reference within a document to some other part of
+it.  Readers find them very useful, but they are a major
+problem for authors.  As the document is revised, Table 6
+becomes Table 7, the thing on page 57 moves to page 63, and all the
+cross references must be changed.
+@PP
+The Scribe
+scribe @Index { Scribe }
+document formatter, developed by Brian K. Reid @Cite { $reid1980scribe },
+reid.brian @Index { Reid, Brian K. }
+introduced a scheme for keeping track of cross
+references.  It allows you to give names to tables, figures, etc., and to
+refer to them by name.  The formatter inserts the appropriate numbers in
+place of the names, so that as the document is revised, the
+cross references are kept up to date automatically.  Lout has adopted
+and extended this scheme.
+@PP
+In Lout, automatic cross referencing works in the following way.  First
+define a symbol with a parameter with the special name @Code "@Tag":
+@ID @OneRow @Code {
+"def @Table"
+"   left @Tag"
+"   right @Value"
+"{"
+"   ||1i  @Value"
+"}"
+}
+When this symbol is invoked, the value given to @Code "@Tag" should be a
+simple word like {@Code "cities"}, or several simple words juxtaposed
+like {@Code "cities compare"}; it serves to name the invocation:
+@ID @OneRow @Code {
+"{ cities compare } @Table"
+"{"
+"    Washington  |0.5i  Canberra"
+"}"
+}
+We may now refer to this invocation elsewhere in the document, using the
+@I {cross reference} @Code "@Table&&{ cities compare }".  Here @Code "&&"
+is the {@I {cross reference symbol}}; its left parameter is a symbol and
+its right parameter is the value of the @Code "@Tag" parameter of some
+invocation of that symbol.  Of course it's simplest if you use just a
+one-word tag; then no braces are needed.
+@PP
+A cross reference is not an object; the reader should think of it as
+an arrow in the final printed document, beginning at the cross reference
+and ending at the top of the target
+target.cr @Index { Target of cross reference }
+#@ID 8p @Font {
+#  { @LittlePage // @LittlePage }
+#  ||0io ||0.7c
+#  { //2c 
+#    { @Code "@Table&&cities" }
+#    //0.1c
+#    ||0.5c 90d @Rotate @Arrow 2.5c
+#    //0.05c
+#    @HContract @VContract
+#      @Fig { @Box margin { 0c } paint { grey } { 1.5c @Wide 1c @High } }
+#  }
+#}
+#@PP
+invocation.  Three special values may be given to the right parameter of
+{@Code "&&"}:  {@Code preceding}, {@Code following}, and
+preceding. @Index { @Code preceding }
+following. @Index { @Code following }
+foll_or_prec. @Index { @Code following }
+{@Code foll_or_prec}.  The cross
+reference @Code "@Table&&preceding" points to some table
+appearing earlier in the final printed document than itself; that is, the
+arrow is guaranteed to point backwards through the document.  Usually it
+points to the nearest preceding invocation.  Similarly, 
+@Code "@Table&&following" points forwards, usually to the
+nearest following invocation.  @Code "@Table&&foll_or_prec" is the same as
+@Code "@Table&&following" if it exists, otherwise it is the same as
+{@Code "@Table&&preceding"}.
+@PP
+This section has been concerned with what a cross reference is -- an
+arrow from one point in a document to another -- but not with how it is
+used.  One simple way to use a cross reference is to put it where an
+object is expected, like this:
+@ID @Code {
+"a  |  @Table&&cities  |  c"
+}
+In this case the cross reference will be replaced by a copy of the
+invocation it points to:  in the example just given, a table will appear
+between @Code a and @Code c.  Other applications of cross references may be
+found in Chapter {@NumberOf examples}, including finding the number of
+the page where something appears, producing running page headers and footers,
+and accessing databases of Roman numerals, references, etc.  Cross
+references are also used by galleys, as will be explained in the next section.
+@PP
+The implementation of cross referencing copies every symbol invocation with
+a @Code "@Tag" parameter into the @I { cross-reference database },
+a collection of files whose names end in {@Code ".ld"} indexed by one file
+whose name is {@Code "lout.li"}.  It is generally the case that the bulk
+content of a symbol such as the table above is contained in its right or
+body parameter, and that this bulk content is not needed by cross references
+to the symbol.  Hence, to save space in the database, Lout replaces the
+right parameter of each symbol it writes into it by the word "???" whenever
+the right parameter appears to be large.  The table above would appear as
+"???" because of this optimization, and in general, the user must ensure
+that any content required by cross references is contained in parameters
+other than the right or body parameter.  This optimization does not apply
+when the symbol being written into the cross-reference database is a galley.
+@End @Section
diff --git a/doc/expert/pri_defi b/doc/expert/pri_defi
new file mode 100644
index 0000000..002db15
--- /dev/null
+++ b/doc/expert/pri_defi
@@ -0,0 +1,246 @@
+@Section
+   @Title { Definitions }
+   @Tag { definitions }
+@Begin
+@PP
+The features of Lout are very general.  They do not assume that documents
+are composed of pages, nor that there are such things as margins and
+footnotes, for example.  @I Definitions
+definitions. @Index { Definitions }
+bridge the gap between Lout's general features and the
+special features -- footnotes, equations, pages -- that particular
+documents require.  They hold the instr&-uct&-ions for producing these
+special features, conveniently packaged ready for use.
+@PP
+For example, consider the challenge posed by `@TeX', which is the name of
+one of Lout's most illustrious rivals @Cite { $knuth1984tex }.  Lout solves it
+easily enough, like this:
+@ID @Code {
+"T{ /0.2fo E }X"
+}
+but to type this every time @TeX is mentioned would be tedious and
+error-prone.  So we place a definition at the beginning of the document:
+@ID @Code {
+"def  @TeX  {  T{ /0.2fo E }X  }"
+}
+Now @Code "@TeX" stands for the object following it between
+braces, and we may write
+@ID @Code {
+consider the challenge posed by "`@TeX'", ...
+}
+as the author did earlier in this paragraph.
+@PP
+A @I symbol
+symbol. @Index Symbol
+is a name, like {@Code "@TeX"}, which stands for
+something other than itself.  The initial @Code "@" is not compulsory,
+but it does make the name stand out clearly.  A @I definition of a symbol
+declares a name to be a symbol, and says what the symbol stands for.  The
+@I body of a definition
+body.of @Index { Body of a definition }
+is the part following the name, between the braces.  To @I invoke
+invocation @Index { Invocation of a symbol }
+a symbol is to make use of it.
+@PP
+Another expression ripe for packaging in a definition is
+@ID @Code {
+"@OneRow {  |  -2p @Font n  ^/0.5fk  2  }"
+}
+which produces @OneRow { | -2p @Font n ^/0.5sk 2 } (see
+Chapter {@NumberOf details}).  But this time we would like to be able to write
+@ID {
+@I object  @Code "@Super"  @I object
+}
+so that @Code { a "@Super" 2 } would come out as {a @Super 2}, and so
+on, for in this way the usefulness of the definition is greatly
+increased.  Here is how it is done:
+@ID @OneRow @Code {
+"def @Super"
+"   left x"
+"   right y"
+"{ @OneRow {  |  -2p @Font y  ^/0.5fk  x  }"
+"}"
+}
+This definition says that @Code "@Super" has two {@I parameters},
+parameter @Index Parameter
+@Code x and {@Code y}.  When @Code "@Super" is invoked, all occurrences
+of @Code x in the body will be replaced by the object just to the left
+of {@Code "@Super"}, and all occurrences of @Code y will be replaced by
+the object just to the right.  So, for example, the expression
+@ID @Code {
+"2  @Super  { Slope @Font n }"
+}
+is equal to
+@ID @Code {
+"@OneRow {  |  -2p @Font { Slope @Font n }  ^/0.5fk  2  }"
+}
+and so comes out as {2 @Super {Slope @Font n}}.
+@PP
+Lout permits definitions to invoke themselves, a peculiarly circular
+thing to do which goes by the name of
+recursion @Index Recursion
+@I recursion.  Here is an example
+of a recursive definition:
+@ID @Code {
+"def  @Leaders  {  ..   @Leaders  }"
+}
+The usual rule is that the value of an invocation of a symbol is a copy of
+the body of the symbol's definition, so the value of @Code "@Leaders" must be
+@ID @Code {
+"..   @Leaders"
+}
+But now this rule applies to this new invocation of {@Code "@Leaders"};
+substituting its body gives
+@ID @Code {
+"..   ..   @Leaders"
+}
+and so on forever.  In order to make this useful,
+an invocation of a recursive symbol is replaced by its body only if
+sufficient space is available.  So, for example,
+@ID @Code {
+"4i @Wide { Chapter 7  @Leaders   62 }"
+}
+has for its result the object
+@ID {
+4i @Wide { Chapter 7  @Leaders   62 }
+}
+with Lout checking before each replacement of @Code "@Leaders" by
+@OneCol @Code { ".."   "@Leaders" } that the total length afterwards,
+including the other words, would not exceed four inches.
+@PP
+The remaining issue is what happens when Lout decides that it is time to
+stop.  The obvious thing to do is to replace the last invocation by an
+empty object:
+@ID @Code {
+"..    ..    ..    ..    ..    ..    ..    ..    {}"
+}
+As the example shows, this would leave a small trailing space, which
+is a major headache.  Lout fixes this
+by replacing the last invocation with a different kind of empty object,
+called @@Null, whose effect is to make an adjacent concatenation symbol
+disappear, preferably one preceding the @@Null.  Thus, when Lout
+replaces @Code "@Leaders" by @@Null in the expression
+@ID @Code {
+"..    ..    ..    ..    ..    ..    ..    ..    @Leaders"
+}
+the trailing space, which is really a horizontal concatenation symbol,
+disappears as well.  This is taken into account when deciding
+whether there is room to replace @Code "@Leaders" by its body.
+@PP
+The remainder of this section is devoted to showing how definitions may
+be used to specify the @I {page layout}
+page.layout @RawIndex { Page layout }
+page.layout.basic @SubIndex { principles of }
+of a document.  To begin with,
+we can define a page like this:
+@ID @OneRow @Code {
+"def @Page"
+"{"
+"    //1i  ||1i"
+"    6i @Wide 9.5i @High"
+"    { @TextPlace  //1rt  @FootSect }"
+"    ||1i  //1i"
+"}"
+}
+Now @Code "@Page" is an eight by
+eleven and a half inch object, with one inch margins, a place at the top for
+text, and a section at the bottom for footnotes (since @Code "//1rt"
+bottom-justifies the following object).  It will be
+convenient for us to show the effect of invoking @Code "@Page" like this:
+@ID @Code
+{ { //0.5ix 8p @Font "@Page" &2m => } &2m
+@LittlePage { "@TextPlace" //1rt "@FootSect" }
+}
+with the invoked symbol appearing to the left of the arrow, and its body to
+the right.
+@PP
+The definition of a vertical list of pages should come as no surprise:
+@ID @OneRow @Code {
+"def @PageList"
+"{"
+"    @Page  //  @PageList"
+"}"
+}
+This allows invocations like the following:
+@ID @Code @HExpand @HScale {
+{ //0.5ix 8p @Font "@PageList" }
+||1m { //0.5ix => } ||1m
+{        @LittlePage { "@TextPlace" //1rt "@FootSect" }
+  //0.2c 8p @Font "@PageList"
+}
+||1m { //0.5ix => } ||1m
+{        @LittlePage { "@TextPlace" //1rt "@FootSect" }
+  //     @LittlePage { "@TextPlace" //1rt "@FootSect" }
+  //0.2c 8p @Font "@PageList"
+}
+||1m { //0.5ix => } ||1m
+{        @LittlePage { "@TextPlace" //1rt "@FootSect" }
+  //     @LittlePage { "@TextPlace" //1rt "@FootSect" }
+}
+}
+setting  @Code "@PageList" to @Code @@Null on the last step.  Any
+number of pages can be generated.
+@PP
+A definition for @Code "@TextPlace" is beyond us at present, since
+@Code "@TextPlace" must be replaced by different parts of the text
+of the document on different pages.  But we can
+define @Code "@FootSect" to be a small space followed by a
+horizontal line followed by a list of places where footnotes go:
+@ID @OneRow @Code {
+"def @FootList         "
+"{                     "
+"   @FootPlace  //0.3v  @FootList"
+"}                     "
+"                      "
+"def @FootSect"
+"{                        "
+"   //0.3v 1i @Wide @HLine"
+"   //0.3v @FootList      "
+"}                        "
+}
+assuming that @Code "@HLine" will produce a horizontal line of the
+indicated width.  With this definition we can generate pages like this:
+@ID @Code {
+@LittlePage { "@TextPlace"
+               //1rt
+               "@FootSect"
+             }
+||2m { //0.5ix => } ||2m
+@LittlePage { "@TextPlace"
+               //1rt
+               @OneRow { 1c @Wide @HLine
+                         //0.1c
+                         "@FootList"
+                       }
+             }
+||2m { //0.5ix => } ||2m
+@LittlePage { "@TextPlace"
+               //1rt
+               @OneRow { 1c @Wide @HLine
+                         //0.1c
+                         "@FootPlace"
+                         //0.1c
+                         "@FootList"
+                       }
+             }
+}
+and so on for arbitrarily many footnotes.
+@PP
+We will see in the next section how invocations of @Code "@PageList",
+@Code "@FootSect" and @Code "@FootList" are replaced by their bodies only
+when the need to insert text and footnotes obliges Lout to do so;
+otherwise the invocations are replaced by @@Null.  In this way, the
+right number of pages is made, the small line appears only on pages that
+have at least one footnote, and unnecessary concatenation symbols
+disappear.
+@PP
+This approach to page layout is the most original contribution Lout has
+made to document formatting.  It is extraordinarily flexible.  Two-column
+pages?  Use
+@ID @Code {
+"{2.8i @Wide @TextPlace}  ||0.4i  {2.8i @Wide @TextPlace}"
+}
+instead of {@Code "@TextPlace"}.  Footnotes in smaller type?  Use
+@Code { -2p "@Font" "@FootPlace" } instead of {@Code "@FootPlace"}.  And
+on and on.
+@End @Section
diff --git a/doc/expert/pri_gall b/doc/expert/pri_gall
new file mode 100644
index 0000000..9efb3c1
--- /dev/null
+++ b/doc/expert/pri_gall
@@ -0,0 +1,279 @@
+@Section
+   @Title { Galleys }
+   @Tag { galleys }
+@Begin
+@PP
+It is time to pause and ask ourselves how close we are to achieving our
+aim of producing neatly formatted documents.  We can certainly produce
+the pieces of a document:
+@ID {
+
+nohyphen @Break @LittlePageColumn {
+@DP
+|0.5rt {@B PURCELL}{ 0.8f @Font 1 ^//0.2v}
+@DP
+In the world of music England is supposed to be a mere province.  If she
+produces an indifferent composer or performer, that is regarded
+elsewhere as perfectly normal and natural; but if foreign students of
+musical history have to acknowledge a British musical genius, he is
+considered a freak.
+@PP
+Such a freak is Henry Purcell.  Yet if we make a choice of fifteen of
+the world's musical classics, as here, we find that we cannot omit this
+English master.
+}
+
+||1c
+
+@LittlePageColumn
+{ { 0.8f @Font 1 ^//0.2v}Blom, Eric.  @I {Some Great Composers.}  Oxford, 1944.
+}
+
+||1c
+
+@Code {
+       @LittlePage { "@TextPlace" //1rt "@FootSect" }
+//     @LittlePage { "@TextPlace" //1rt "@FootSect" }
+//     @LittlePage { "@TextPlace" //1rt "@FootSect" }
+//0.2c 8p @Font "@PageList"
+}
+
+}
+but when we try to merge them together, we encounter two obstacles.
+@PP
+First, when an object is entered at a certain place in the document, it
+appears at that place.  But a footnote is naturally entered immediately
+after the point it refers to (`{-2p @Font PURCELL}' in this case), yet it
+appears somewhere else: at the bottom of a page.
+@PP
+Second, all our features build up larger objects out of smaller ones,
+but the -2p @Font PURCELL object, for example, must be broken down into
+page-sized pieces.  This occurs when the available space at the
+`somewhere else' is insufficient to hold the entire object, so this
+second obstacle arises out of the first.
+@PP
+Lout's last major feature, which we introduce to overcome these
+obstacles, is the @I galley
+galley.feature @Index { Galleys }
+(the name is borrowed from the galleys
+used in manual typesetting).  A galley is an object plus a cross
+reference which points to where the object is to appear.  The example
+above has three galleys:
+@ID {
+
+{
+//0.1c
+
+nohyphen @Break @LittlePageColumn {
+@DP
+|0.5rt {@B PURCELL}{ 0.8f @Font 1 ^//0.2v}
+@DP
+In the world of music England is supposed to be a mere province.  If she
+produces an indifferent composer or performer, that is regarded
+elsewhere as perfectly normal and natural; but if foreign students of
+musical history have to acknowledge a British musical genius, he is
+considered a freak.
+@PP
+Such a freak is Henry Purcell.  Yet if we make a choice of fifteen of
+the world's musical classics, as here, we find that we cannot omit this
+English master.
+}  { //0.4c 180d @Rotate @Arrow 2.0c }
+
+}
+
+||0io ||4.8c
+
+@Code {
+       @LittlePage { "@TextPlace" //1rt "@FootSect" }
+//     @LittlePage { "@TextPlace" //1rt "@FootSect" }
+//     @LittlePage { "@TextPlace" //1rt "@FootSect" }
+//0.2c 8p @Font "@PageList"
+}  180d @Rotate @Arrow 1i @I -2p @Font {to printer}
+
+||0io ||2.0c
+{
+//3.9c
+
+{ @Arrow 1.7c }  nohyphen @Break @LittlePageColumn
+{ { 0.8f @Font 1 ^//0.2v}Blom, Eric.  @I {Some Great Composers.}  Oxford, 1944.
+}
+}
+}
+A galley replaces the invocation pointed to by its cross reference.  If
+space is not sufficient there to hold it all, the remainder of the
+galley is split off (the vertical concatenation symbol preceding it
+being discarded) and it replaces later invocations of the same symbol.
+This is exactly what is required to get text and footnotes onto pages.
+@PP
+To create a galley, first define a symbol with a
+special @Code into
+into @Index { @Code into clause }
+clause, like this:
+@ID @OneRow @Code {
+"def @FootNote into { @FootPlace&&following }"
+"   right x"
+"{"
+"   8p @Font x"
+"}"
+}
+An invocation of such a symbol will then be a galley whose object is the
+result of the invocation, and whose cross reference is given by the
+@Code into clause.  The right parameter of the cross reference must be
+one of {@Code preceding}, {@Code following}, and {@Code foll_or_prec}.
+@PP
+A symbol, like @Code "@FootPlace", which is the @I target of a galley,
+target.g @Index { Target of a galley }
+must contain the special symbol @@Galley exactly once in its body; often
+this is all that the body contains:
+@ID @Code {
+"def  @FootPlace  {  @Galley  }"
+}
+It is this special symbol that is replaced by the incoming galley, in
+fact, not the @Code "@FootPlace" symbol as a whole.
+@PP
+A symbol which contains @@Galley, either directly within its body or
+indirectly within the body of a symbol it invokes, is called a @I receptive
+receptive @Index { Receptive symbol }
+symbol, meaning receptive to galleys.  @Code "@FootPlace" is receptive, which
+makes @Code "@FootList", @Code "@FootSect" and @Code "@PageList"
+receptive since they invoke @Code "@FootPlace".  If no galley replaces
+any @@Galley within some invocation of a receptive symbol, that
+invocation is replaced by @@Null.  The advantages of this rule for page
+layout were explained at the end of Section {@NumberOf definitions}.
+@PP
+Let us now follow through the construction of our example
+document.  Initially there is just the one @I root
+root.galley @Index { Root galley }
+galley, containing an unexpanded invocation of @Code "@PageList":
+@ID { ||5c
+10p @Font @Code "@PageList"  180d @Rotate @Arrow 1i @I -2p @Font {to printer}
+}
+Then the -2p @Font PURCELL galley appears, targeted to a @Code
+"@TextPlace".  Lout knows that there is a @Code "@TextPlace" hidden
+inside @Code "@PageList", so it expands @Code "@PageList":
+@ID {
+
+{
+//0.1c
+
+nohyphen @Break @LittlePageColumn {
+@DP
+|0.5rt {@B PURCELL}{ 0.8f @Font 1 ^//0.2v}
+@DP
+In the world of music England is supposed to be a mere province.  If she
+produces an indifferent composer or performer, that is regarded
+elsewhere as perfectly normal and natural; but if foreign students of
+musical history have to acknowledge a British musical genius, he is
+considered a freak.
+@PP
+Such a freak is Henry Purcell.  Yet if we make a choice of fifteen of
+the world's musical classics, as here, we find that we cannot omit this
+English master.
+}  { //0.4c 180d @Rotate @Arrow 2.2c }
+}
+
+||0io ||5c
+
+@Code {
+       @LittlePage { "@TextPlace" //1rt "@FootSect" }
+//0.2c 8p @Font "@PageList"
+}  180d @Rotate @Arrow 1i @I -2p @Font {to printer}
+
+}
+After promoting the first line into @Code "@TextPlace", the footnote
+galley attached to it appears and demands an invocation of
+@Code "@FootPlace" following its attachment point
+(`{-2p @Font PURCELL}').  Such a @Code "@FootPlace" is found at
+the bottom of the first page, inside @Code "@FootSect", which is
+accordingly expanded, and the footnote is promoted onto the page:
+@ID {
+
+{
+//1.2c
+
+nohyphen @Break @LittlePageColumn {
+In the world of music England is supposed to be a mere province.  If she
+produces an indifferent composer or performer, that is regarded
+elsewhere as perfectly normal and natural; but if foreign
+students of musical history have to acknowledge a British musical genius,
+he is considered a freak.
+@PP
+Such a freak is Henry Purcell.  Yet if we make a choice of fifteen of
+the world's musical classics, as here, we find that we cannot omit this
+English master.
+}  180d @Rotate @Arrow 2.2c
+}
+
+||0io ||5c
+
+{
+nohyphen @Break @LittleDocument
+//
+@LittleText {
+@DP
+|0.5rt {@B PURCELL}{ 0.8f @Font 1 ^//0.2v}
+@LittleFootNote
+{ { 0.8f @Font 1 ^//0.2v}Blom, Eric.  @I {Some Great Composers.}  Oxford, 1944.
+//1vx @Code "@FootList"
+}
+//1vx @Code "@TextPlace" }
+//
+@LittleEndRun
+//0.2c 8p @Font @Code "@PageList"
+}  180d @Rotate @Arrow 1i -2p @Font @I {to printer}
+
+}
+Now the promotion of the -2p @Font PURCELL galley resumes.  When the
+first page is filled, Lout searches forwards for another @Code "@TextPlace"
+to receive the remainder, once again expanding a @Code "@PageList":
+@ID {
+
+{
+//4.85c
+
+nohyphen @Break @LittlePageColumn {
+performer, that is regarded
+elsewhere as perfectly normal and natural; but if foreign
+students of musical history have to acknowledge a British musical genius,
+he is considered a freak.
+@PP
+Such a freak is Henry Purcell.  Yet if we make a choice of fifteen of
+the world's musical classics, as here, we find that we cannot omit this
+English master.
+}  180d @Rotate @Arrow 2.2c
+}
+
+||0io ||5c
+
+{
+nohyphen @Break @LittleDocument
+//
+@LittleText {
+@DP
+|0.5rt {@B PURCELL}{ 0.8f @Font 1 ^//0.2v}
+@LittleFootNote
+{ { 0.8f @Font 1 ^//0.2v}Blom, Eric.  @I {Some Great Composers.}  Oxford, 1944.
+}
+@DP
+      @HExpand {In the world of music}
+//1vx @HExpand {England is supposed to}
+//1vx @HExpand {be a mere province.  If}
+//1vx @HExpand {she produces an indifferent composer or}
+}
+//
+@LittleEndRun
+//     @LittlePage { @Code "@TextPlace" //1rt @Code "@FootSect" }
+//0.2c 8p @Font @Code "@PageList"
+}  180d @Rotate @Arrow 1i -2p @Font @I {to printer}
+
+}
+and so on.  All these expansions and replacements are done with total
+integrity.  For example, if Lout finds after expanding @Code "@FootSect"
+that the page is too full to accept even the first line of the footnote,
+@Code "@FootSect" is reset to unexpanded and the search for a target for
+the footnote moves on.  And the cross reference direction, @Code
+preceding or @Code following, is always obeyed (although lack of space
+sometimes prevents Lout from choosing the nearest target).  Only the
+root galley contains receptive symbols in our running example, but
+any galley may contain them.
+@End @Section
diff --git a/doc/expert/pri_obje b/doc/expert/pri_obje
new file mode 100644
index 0000000..fcb9177
--- /dev/null
+++ b/doc/expert/pri_obje
@@ -0,0 +1,178 @@
+@Section
+  @Title { Objects }
+  @Tag { objects }
+@Begin
+@PP
+Since our aim is to produce neatly formatted documents, we should begin by
+looking at a typical example of such a document:
+@ID {
+nohyphen @Break @LittleDocument
+//
+@LittleText {
+@DP
+|0.5rt {@B PURCELL}{ 0.8f @Font 1 ^//0.2v}
+@LittleFootNote
+{ { 0.8f @Font 1 ^//0.2v}Blom, Eric.  @I {Some Great Composers.}  Oxford, 1944.
+}
+@DP
+In the world of music England is supposed to be a mere province.  If she
+produces an indifferent composer or performer, that is regarded
+elsewhere as perfectly normal and natural; but if foreign students of
+musical history have to acknowledge a British musical genius, he is
+considered a freak.
+@PP
+Such a freak is Henry Purcell.  Yet if we make a choice of fifteen of
+the world's musical classics, as here, we find that we cannot omit this
+English master.
+}
+//
+@LittleEndRun
+}
+It is a large rectangle made from three smaller rectangles -- its
+pages.  Each page is made of lines; each line is made of words,
+although it makes sense for any rectangle (even a complete document) to
+be part of a line, provided it is not too large.
+@PP
+Lout deals with something a little more complicated than rectangles:
+@I objects.  An object
+objec @Index { Object }
+is a rectangle with at least one @I {column mark}
+column.mark @Index { Column mark }
+mark.alignment @Index { Mark alignment }
+alignment @RawIndex { Alignment @I see mark alignment }
+protruding above and below it, and at least one @I {row mark}
+row.mark @Index { Row mark }
+protruding to the left and right.  The simplest objects contain words like
+metempsychosis, and have one mark of each type:
+@ID {
+@ShowMarks metempsychosis
+}
+The rectangle exactly encloses the word; its column mark is at the left
+edge, and its row mark passes through the middle of the lower-case
+letters.  The rectangle and marks do not appear on the printed page, but
+to understand what Lout is doing you have to imagine them.
+@PP
+To place two objects side by side, we separate them by the
+symbol @Code "|", which denotes the act of @I {horizontal
+concatenation}.  So, if we write
+@ID {
+@Code "USA  |  Australia"
+}
+the result will be the object
+@ID {
+@ShowMarks USA | @ShowMarks Australia
+}
+Notice that this object has two column marks, but still only one row mark,
+because @Code "|" merges the two row marks
+together.  This merging of row marks fixes the vertical
+position of each object with respect to the other, but it does not
+determine how far apart they are.  This distance, or {@I gap},
+may be given just after the symbol, as in @Code "|0.5i" for example,
+which specifies horizontal concatenation with a gap of half an inch.  If
+no gap is given, it is assumed to be {@Code "0i"}.
+@PP
+@I {Vertical concatenation} & , denoted by {@Code "/"},
+is the same apart from the change of direction:
+@ID {
+@Code "Australia  /0.1i  USA"
+}
+has result
+@ID {
+@ShowMarks Australia /0.1i
+@ShowMarks USA
+}
+The usual merging of marks occurs, and now the gap determines the
+vertical separation.  Horizontal and vertical can be combined:
+@ID  @Code {
+             |1m  USA         |1m  "|0.2i" |1m   Australia
+/1vx "/0.1i" |    Washington  |    "|"     |     Canberra
+}
+has result
+@ID {
+  @BackEnd @Case {
+    PostScript @Yield {
+      @ShowMarks USA &
+      { 0 ymark moveto xsize 10 pt add ymark lineto [ 3 pt ] 0 setdash stroke }
+      @Graphic {1c @Wide }
+      |0.2i @ShowMarks Australia
+/0.1i @ShowMarks Washington  |     @ShowMarks Canberra
+    }
+    PDF @Yield {
+      @ShowMarks USA &
+      { [ __mul(3, __pt) ] 0 d 0 __ymark m __add(__xsize, __mul(10, __pt)) __ymark l S }
+      @Graphic {1c @Wide }
+      |0.2i @ShowMarks Australia
+/0.1i @ShowMarks Washington  |     @ShowMarks Canberra
+    }
+  }
+}
+tables @Index { Tables }
+There are several things to note carefully here.  White space (including
+tabs and newlines) adjacent to a concatenation symbol is ignored, so
+it may be used to lay out the expression clearly.  The symbol
+@Code "|" takes precedence over {@Code "/"}, which means that the rows
+are formed first, then vertically concatenated.  The symbol @Code "/" will
+merge two or more column marks, creating multiple
+columns (and @Code "|" will merge two or more row marks).  This
+implies that the gap @Code "0.2i" used above is between
+columns, not individual items in columns; a gap in the second row
+would therefore be redundant, and so is omitted.
+@PP
+A variant of @Code "/" called @Code "//" left-justifies
+two objects instead of merging their marks.
+@PP
+By enclosing an object in braces, it is possible to override the
+braces @Index { Braces }
+set precedences.  Here is another expression for the table
+above, in which the columns are formed first:
+@ID  @Code {
+             |1m "{ USA"       |1m "/0.1i" |1m "Washington }"
+/1vx "|0.2i" |   "{ Australia" |   "/"     |   "Canberra }"
+}
+Braces have no effect other than to alter the grouping.
+@PP
+@I {Paragraph breaking} occurs when an object is too wide to fit
+paragraph.breaking @Index { Paragraph breaking }
+into the space available to it; by breaking its paragraphs into lines,
+its width is reduced to an acceptable amount.  The available
+space is determined by the @@Wide symbol, whose form is
+@ID  {
+@I length  @@Wide  @I object
+}
+and whose result is the given object modified to have exactly the given
+length.  For example,
+@ID @OneRow @Code {
+"5i @Wide {"
+"Macbeth was very ambitious.  This led him to wish to become king of"
+"Scotland.  The witches told him that this wish of his would come true.  The"
+"king of Scotland at this time was Duncan.  Encouraged by his wife, Macbeth"
+"murdered Duncan.  He was thus enabled to succeed Duncan as king.  (51 words)"
+"|0.5i"
+"Encouraged by his wife, Macbeth achieved his ambition and realized the"
+"prediction of the witches by murdering Duncan and becoming king of Scotland"
+"in his place.  (26 words)"
+"}"
+}
+has for its result the following five inch wide object
+@Cite { $strunk1979style }:
+@ID {
+5i @Wide {
+Macbeth was very ambitious.  This led him to wish to become king of
+Scotland.  The witches told him that this wish of his would come true.  The
+king of Scotland at this time was Duncan.  Encouraged by his wife, Macbeth
+murdered Duncan.  He was thus enabled to succeed Duncan as king.  (51 words)
+|0.5i
+Encouraged by his wife, Macbeth achieved his ambition and realized the
+prediction of the witches by murdering Duncan and becoming king of Scotland
+in his place.  (26 words)
+}
+}
+A paragraph of text can be included anywhere, and it will be broken
+automatically if necessary to fit the available space.  The spaces
+between words are converted into concatenation symbols.
+@PP
+These are the most significant of Lout's object-building symbols.  There
+are others, for changing fonts, controlling paragraph breaking, printing
+graphical objects like boxes and circles, and so on, but
+they do not add anything new in principle.
+@End @Section
diff --git a/doc/slides/README b/doc/slides/README
new file mode 100644
index 0000000..a494b7c
--- /dev/null
+++ b/doc/slides/README
@@ -0,0 +1,18 @@
+Directory lout/doc/slides
+
+This directory contains the Lout source of
+a set of overhead transparencies entitled
+`A Practical Introduction to the Lout
+Document Formatting System.'  To format
+the transparencies, type
+
+	lout all > outfile.ps
+
+in this directory.  This needs to be done
+twice to resolve all cross references.
+There should be no error messages at all
+after the second run.  A copy of the final
+outfile.ps is included.
+
+Jeff Kingston
+17 September 1999
diff --git a/doc/slides/all b/doc/slides/all
new file mode 100644
index 0000000..98c7d6c
--- /dev/null
+++ b/doc/slides/all
@@ -0,0 +1,680 @@
+@SysInclude { eq }
+@SysInclude { tab }
+@SysInclude { fig }
+@SysInclude { pas }
+@SysInclude { graph }
+@SysInclude { cprint }
+@SysInclude { slides }
+@SysDatabase @Reference { loutrefs }
+@OverheadTransparencies
+    @Title { A Practical Introduction to the
+
+Lout
+
+Document Formatting System
+}
+    @RunningTitle { lout }
+    @Author { Jeffrey H. Kingston }
+    @Institution {
+Basser Dept. of Computer Science
+The University of Sydney
+}
+    @InitialLanguage { English }
+//
+
+@Overhead
+    @Title { A simple input file }
+@Begin
+@ID @Code {
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"Hello, world"
+"@End @Text"
+}
+@LP
+@LP
+@Heading { How to format it }
+@ID @Code {
+"lout filename > out.ps"
+"ghostview out.ps"
+"mpr out.ps"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+Hello, world
+}
+@End @Overhead
+
+@Overhead
+    @Title { Headings and paragraphs }
+@Begin
+@ID @Code {
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"@Heading { Introduction }"
+"@PP"
+"The design of the Lout formatting"
+"system was undertaken with the"
+"needs of the @I { ordinary user }"
+"very much in mind."
+"@End @Text"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+@Heading { Introduction }
+@PP
+The design of the Lout formatting
+system was undertaken with the
+needs of the @I { ordinary user }
+very much in mind.
+}
+@End @Overhead
+
+@Overhead
+    @Title { Displays }
+@Begin
+@ID @Code {
+"You certainly don't want to return to"
+"his office and report:"
+"@IndentedDisplay @I {"
+"`I can't find an efficient algorithm, I"
+"guess I'm just too dumb.'"
+"}"
+"To avoid serious damage to your"
+"position in the company, it would"
+"be better if ..."
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+You certainly don't want to return to
+his office and report:
+@IndentedDisplay @I {
+`I can't find an efficient algorithm, I
+guess I'm just too dumb.'
+}
+To avoid serious damage to your
+position in the company, it would
+be better if ...
+}
+@End @Overhead
+
+@Overhead
+    @Title { Paragraph breaking styles }
+@Begin
+@ID @Code {
+"You certainly don't want to return to"
+"his office and report:"
+"@ID { ragged nohyphen } @Break @I {"
+"`I can't find an efficient algorithm, I"
+"guess I'm just too dumb.'"
+"}"
+"To avoid serious damage to your"
+"position in the company, it would"
+"be better if ..."
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+You certainly don't want to return to
+his office and report:
+@ID { ragged nohyphen } @Break @I {
+`I can't find an efficient algorithm, I
+guess I'm just too dumb.'
+}
+To avoid serious damage to your
+position in the company, it would
+be better if ...
+}
+@End @Overhead
+
+@Overhead
+    @Title { Lists }
+@Begin
+@ID @Code {
+"@Heading { Operating Instructions }"
+"@NumberedList"
+"@ListItem { Press small green lever. }"
+"@ListItem { Wait approximately 10 seconds"
+"until red light flashes. }"
+"@ListItem { If smoke emerges from rear of unit,"
+"call Service Department. }"
+"@EndList"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+@Heading { Operating Instructions }
+@NumberedList
+@ListItem { Press small green lever. }
+@ListItem { Wait approximately 10 seconds
+until red light flashes. }
+@ListItem { If smoke emerges from rear of unit,
+call Service Department. }
+@EndList
+}
+@End @Overhead
+
+@Overhead
+    @Title { Technical reports }
+@Begin
+@ID @Code {
+"@SysInclude { report }"
+"@Report"
+"    @Title { ... }"
+"    @Author { ... }"
+"    @Institution { ... }"
+"    @DateLine { ... }"
+"//"
+"@Abstract { ... }"
+"@Section { ... }"
+"@Section { ... }"
+"@Section { ... }"
+"@Appendix { ... }"
+"@Appendix { ... }"
+}
+@End @Overhead
+
+@Overhead
+    @Title { Sections }
+@Begin
+@ID @Code {
+"@Section"
+"    @Tag { dfs }"
+"    @Title { Depth-first search }"
+"@Begin"
+"@PP"
+"We turn now to our first algorithm"
+"on general graphs ..."
+"@End @Section"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+@Heading { 10.6.  Depth-first search }
+@PP
+We turn now to our first algorithm
+on general graphs ...
+}
+@End @Overhead
+
+@Overhead
+    @Title { Cross references }
+@Begin
+@ID @Code {
+"For further information, consult"
+"Section @NumberOf dfs on page"
+"@PageOf { dfs }."
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+For further information, consult
+Section 10.6 on page 245.
+}
+@End @Overhead
+
+@Overhead
+    @Title { References }
+@Begin
+@ID @Code {
+"@Database @Reference { myrefs }"
+"..."
+"For the details, consult the User's"
+"Guide @Cite { $kingston1995lout.user }."
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+For the details, consult the User's
+Guide [1].
+@LP
+...
+@LP
+@Heading { References }
+@NumberedList
+@LI @RefPrint kingston1995lout.user
+@LI ...
+@EndList
+}
+@End @Overhead
+
+@Overhead
+    @Title { Database file myrefs.ld }
+@Begin
+@ID @Code {
+"{ @Reference"
+"     @Tag { kingston1995lout.user }"
+"     @Type { Book }"
+"     @Author { Jeffrey H. Kingston }"
+"     @Title { A User's Guide to the Lout"
+"Document Formatting System (Version 3) }"
+"     @Institution { Basser Department of"
+"Computer Science }"
+"     @Address { University of Sydney"
+"2006, Australia }"
+"     @Year { 1994 }"
+"}"
+}
+@End @Overhead
+
+@Overhead
+    @Title { Books (and theses) }
+@Begin
+@BulletList
+@LI { Title page, preface, introduction }
+@LI { Automatic table of contents }
+@LI { Prefatory pages numbered in Roman numerals }
+@LI { Chapters, sections, subsections, appendices }
+@LI { References at end of chapters or book }
+@LI { Running page headers }
+@LI { Odd-even page formats }
+@LI { Sorted index }
+@EndList
+@End @Overhead
+
+@Overhead
+    @Title { Making a sorted index }
+@Begin
+@ID @Code {
+"@PP"
+"There are several possible ways to implement the"
+"@I Partition procedure,"
+"partition @Index { @I Partition (in {@I Quicksort}) }"
+"but the following seems to be the best.  Starting ..."
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+@Heading { Index }
+@LD lines @Break {
+...
+partial order, 227
+@I Partition (in {@I Quicksort}), 189
+postorder traversal
+    of binary tree, 19
+    topological ordering, 229
+...
+}
+}
+@End @Overhead
+
+@Overhead
+    @Title { Equation formatting }
+@Begin
+@ID @Code {
+"@SysInclude { eq }"
+"..."
+"Since @Eq { T(n-i) = T(0) = 0 } we have"
+"@IndentedDisplay @Eq {"
+"T(n) = big sum from i=0 to n-1 2 sup i = 2 sup n - 1"
+"}"
+"for the number of disk moves made by the Towers"
+"of Hanoi algorithm, given @Eq { n } disks."
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+Since @Eq { T(n-i) = T(0) = 0 } we have
+@IndentedDisplay @Eq {
+T(n) = big sum from i=0 to n-1 2 sup i = 2 sup n - 1
+}
+for the number of disk moves made by the Towers of Hanoi
+algorithm, given @Eq { n } disks.
+}
+@End @Overhead
+
+@Overhead
+    @Title { Another equation }
+@Begin
+@ID @Code {
+"@CenteredDisplay @Eq {"
+"big int supp 1 on 0 `"
+"dx over sqrt { 1 - x sup 2 }"
+"= pi over 2"
+"}"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+@CenteredDisplay @Eq {
+big int supp 1 on 0 `
+dx over sqrt { 1 - x sup 2 }
+= pi over 2
+}
+}
+@End @Overhead
+
+@Overhead
+    @Title { Tables }
+@Begin
+@ID @Code {
+"@SysInclude { tab }"
+"..."
+"@Tab"
+"    @Fmta { @Col @I A ! @Col B }"
+"{"
+"@Rowa"
+"   A { Fortran }"
+"   B { The first ... language }"
+"@Rowa"
+"   A { Algol-60 }"
+"   B { Said to be ... successors }"
+"@Rowa"
+"   A { Pascal }"
+"   B { The famous ... successors }"
+"}"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+@Tab
+    vmargin { 0.4v }
+    @Fmta { @Col @I A ! @Col B }
+{
+@Rowa
+   A { Fortran }
+   B { The first high-level
+programming language }
+@Rowa
+   A { Algol-60 }
+   B { Said to be a better
+language than most of its successors }
+@Rowa
+   A { Pascal }
+   B { The most famous of
+Algol-60's successors }
+}
+}
+@End @Overhead
+
+@Overhead
+    @Title { Another table }
+@Begin
+@RID @Code {
+"@Tab"
+"   hmargin { 0.4c }"
+"   vmargin { 0.3v }"
+"   side { single }"
+"   @Fmta { @Col @B @CC X @Over A,B,C }"
+"   @Fmtb { @Col @I A ! @Col B !! @Col C }"
+"{"
+""
+"@Rowa  above { single }"
+"   X { Value of mathematical ... dollars) }"
+""
+"@Rowb  above { double }"
+"   A { Quadratic formula }"
+"   B { @Eq { x ^= { ... } over 2a } }"
+"   C { 3^.5 }"
+""
+"@Rowb  below { single }"
+"   A { Binomial theorem }"
+"   B { @Eq { ( a + b ) sup n ^= ... b sup n-k } }"
+"   C { 12^ }"
+"}"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+0.6 @Scale @Tab
+   hmargin { 0.4c }
+   vmargin { 0.3v }
+   side { single }
+   @Fmta { @Col @B @CC X @Over A,B,C }
+   @Fmtb { @Col @I A ! @Col B !! @Col C }
+{
+@Rowa
+   above { single }
+   X { Value of mathematical formulae (millions of dollars) }
+@Rowb
+   above { double }
+   A { Quadratic formula }
+   B { @Eq { x ^= { minus b +- sqrt { b sup 2 - 4ac } } over 2a } }
+   C { 3^.5 }
+@Rowb
+   below { single }
+   A { Binomial theorem }
+   B { @Eq { ( a + b ) sup n ^= big sum from k=0 to infty 
+matrix atleft { ( } atright { ) } { n above k } a sup k b sup n-k
+} }
+   C { 12^ }
+}
+}
+@End @Overhead
+
+@Overhead
+    @Title { Pascal programs }
+@Begin
+@ID @Code {
+"@SysInclude { pas }"
+"..."
+"@ID @Pas {"
+"procedure DoPriAbstract(root: PriEntry);"
+"begin"
+"    if root^.leftchild <> nil then begin"
+"        DoPriAbstract(root^.leftchild);"
+"        write(', ');"
+"    end;"
+"    PriKeyAbstract(root^.key);"
+"    write(':');"
+"    PriValueAbstract(root^.value);"
+"    if root^.rightchild <> nil then begin"
+"        write(', ');"
+"        DoPriAbstract(root^.rightchild);"
+"    end;"
+"end;"
+"}"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+@Pas {
+procedure DoPriAbstract(root: PriEntry);
+begin
+    if root^.leftchild <> nil then begin
+        DoPriAbstract(root^.leftchild);
+        write(', ');
+    end;
+    PriKeyAbstract(root^.key);
+    write(':');
+    PriValueAbstract(root^.value);
+    if root^.rightchild <> nil then begin
+        write(', ');
+        DoPriAbstract(root^.rightchild);
+    end;
+end;
+} &0io
+}
+@End @Overhead
+
+@Overhead
+    @Title { Basic graphics }
+@Begin
+@ID @Code {
+"45d @Rotate 1.5 @Scale @Box {"
+"    Hello, world"
+"}"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+@ID @Code {
+45d @Rotate 1.5 @Scale @Box {
+    Hello, world
+}
+}
+}
+@End @Overhead
+
+@Overhead
+    @Title { Advanced graphics }
+@Begin
+@ID @Code {
+"@SysInclude { fig }"
+"..."
+"@Fig {"
+"@Box"
+"    margin { 0c }"
+"    paint { black }"
+"@Ellipse"
+"    linestyle { noline }"
+"    paint { white }"
+"{ Hello, world }"
+"}"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+@Fig {
+@Box
+    margin { 0c }
+    paint { black }
+@Ellipse
+    linestyle { noline }
+    paint { white }
+{ Hello, world }
+}
+}
+@End @Overhead
+
+@Overhead
+    @Title { Point labelling }
+@Begin
+@ID @Code {
+"@Fig {"
+"A::"
+"{"
+"    1:: @Ellipse { 3c @Wide 2c @High }"
+"    //3c"
+"    2:: @Box { 3c @Wide 2c @High }"
+"}"
+"@ShowLabels"
+"}"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage {
+@Fig {
+A::
+{
+    1:: @Ellipse { 3c @Wide 2c @High }
+    //3c
+    2:: @Box { 3c @Wide 2c @High }
+}
+@ShowLabels
+}
+}
+@End @Overhead
+
+@Overhead
+    @Title { Graphs }
+@Begin
+@LP
+@ID -1p @Font @Code {
+"@Graph"
+"    abovecaption { New South Wales road deaths"
+"(per 100 million vehicle km) }"
+"{"
+"    @Data  points { plus }  pairs { dashed }"
+"    { 1963 5.6  1971 4.3  1976 3.7  1979 3.4"
+"    1982 2.9  1985 2.3  1988 2.0 }"
+"}"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage @Graph
+    width { 9 cm }
+    height { 6 cm }
+    abovecaption { New South Wales road deaths
+(per 100 million vehicle km) }
+{
+    @Data
+        points { plus }
+        pairs { dashed }
+    {
+        1963 5.6  1971 4.3  1976 3.7  1979 3.4  1982 2.9  1985 2.3  1988 2.0
+    }
+}
+@End @Overhead
+
+@Overhead @Begin
+@RID @Code {
+"-2p @Font @Graph"
+"    style { axes }"
+"    xorigin { 0 }  yorigin { 0 }"
+"    xticks { 10@ 50@ 100@ 200@ 500@ }"
+"    objects {  @NE at { 300 2 } @I { Exponential }"
+"      @SE at { ... } @I { Uniform } }"
+"    belowcaption { @I n }"
+"{"
+"    @Data points { filledcircle } { ... }"
+"    @Data points { filledcircle } { ... }"
+""
+"    @Data pairs { dashed }"
+"    { 10 2  500 2 }"
+""
+"    @Data pairs { dashed }"
+"    {"
+"        xloop from { 10 } to { 500 } by { 20 } do"
+"        {"
+"            x  sqrt { pi*x / 4 } + 1"
+"        }"
+"    }"
+"}"
+}
+@End @Overhead
+
+@Overhead @Begin
+@ShowPage -2p @Font @Graph
+    style { axes }
+    xorigin { 0 }
+    yorigin { 0 }
+    width { 10 cm }
+    height { 7 cm }
+    xticks { 10@ 50@ 100@ 200@ 500@ }
+    objects {
+       @NE at { 300 2 } @I { Exponential }
+       @SE at { 300 sqrt { pi*300/4 } + 1 } @I { Uniform }
+    }
+    belowcaption { @I n }
+    belowgap { 0 cm }
+{
+    @Data points { filledcircle }
+    { 10 1.97  50 2.01  100 2.00  200 2.0  500 2.00 }
+
+    @Data points { filledcircle }
+    { 10 3.53  50 7.45  100 9.32  200 13.41  500 21.63 }
+
+    @Data pairs { dashed }
+    { 10 2  500 2 }
+
+    @Data pairs { dashed }
+    {
+        xloop from { 10 } to { 500 } by { 20 } do
+        {
+            x  sqrt { pi*x / 4 } + 1
+        }
+    }
+}
+@End @Overhead
diff --git a/doc/slides/mydefs b/doc/slides/mydefs
new file mode 100644
index 0000000..69417f5
--- /dev/null
+++ b/doc/slides/mydefs
@@ -0,0 +1,8 @@
+
+def @Code right x { { Helvetica Base -2p } @Font lines @Break x }
+
+import @BasicSetup
+def @ShowPage right x
+{
+    @Box margin { 1i } 4i @Wide 5i @High { x // }
+}
diff --git a/doc/slides/outfile.ps b/doc/slides/outfile.ps
new file mode 100644
index 0000000..ed978e9
--- /dev/null
+++ b/doc/slides/outfile.ps
@@ -0,0 +1,4470 @@
+%!PS-Adobe-3.0
+%%Creator: Basser Lout Version 3.17 (September 1999)
+%%CreationDate: Fri Sep 17 11:58:48 1999
+%%DocumentData: Binary
+%%DocumentNeededResources: (atend)
+%%DocumentMedia: Plain 595 842 0 white ()
+%%DocumentSuppliedResources: (atend)
+%%Pages: (atend)
+%%BoundingBox: 0 0 595 842
+%%EndComments
+
+%%BeginProlog
+%%BeginResource: procset LoutStartUp
+/m  { 3 1 roll moveto show } bind def
+/s  { exch currentpoint exch pop moveto show } bind def
+/k  { exch neg 0 rmoveto show } bind def
+/ul { gsave setlinewidth dup 3 1 roll
+      moveto lineto stroke grestore } bind def
+/in { 1440 mul } def
+/cm { 567 mul } def
+/pt { 20 mul } def
+/em { 120 mul } def
+/sp { louts mul } def
+/vs { loutv mul } def
+/ft { loutf mul } def
+/dg {           } def
+
+/LoutGraphic {
+  /louts exch def
+  /loutv exch def
+  /loutf exch def
+  /ymark exch def
+  /xmark exch def
+  /ysize exch def
+  /xsize exch def
+} def
+
+/LoutGr2 { gsave translate LoutGraphic gsave } def
+
+/LoutFont
+{ findfont exch scalefont setfont
+} bind def
+
+/LoutRecode {
+  { findfont dup length dict begin
+    {1 index /FID ne {def} {pop pop} ifelse} forall
+    /Encoding exch def
+    currentdict end definefont pop
+  }
+  stopped pop
+} bind def
+
+/BeginEPSF {
+  /LoutEPSFState save def
+  /dict_count countdictstack def
+  /op_count count 1 sub def
+  userdict begin
+  /showpage { } def
+  0 setgray 0 setlinecap
+  1 setlinewidth 0 setlinejoin
+  10 setmiterlimit [] 0 setdash newpath
+  /languagelevel where
+  { pop languagelevel
+    1 ne
+    { false setstrokeadjust false setoverprint
+    } if
+  } if
+} bind def
+
+/EndEPSF {
+  count op_count sub { pop } repeat
+  countdictstack dict_count sub { end } repeat
+  LoutEPSFState restore
+} bind def
+%%EndResource
+
+%%BeginResource encoding vec2
+/vec2 [
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright
+/parenleft /parenright /asterisk /plus /comma /hyphen /period /slash
+/zero /one /two /three /four /five /six /seven
+/eight /nine /colon /semicolon /less /equal /greater /question
+/at /A /B /C /D /E /F /G
+/H /I /J /K /L /M /N /O
+/P /Q /R /S /T /U /V /W
+/X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore
+/quoteleft /a /b /c /d /e /f /g
+/h /i /j /k /l /m /n /o
+/p /q /r /s /t /u /v /w
+/x /y /z /braceleft /bar /braceright /asciitilde /.notdef
+/quotesinglbase /quotedblbase /ellipsis /OE /oe /quotedblleft /quotedblright /fi
+/fl /endash /emdash /bullet /dagger /daggerdbl /florin /fraction
+/dotlessi /grave /acute /circumflex /tilde /macron /breve /dotaccent
+/dieresis /.notdef /ring /cedilla /.notdef /hungarumlaut /ogonek /caron
+/space /exclamdown /cent /sterling /currency /yen /brokenbar /section
+/dieresis /copyright /ordfeminine /guillemotleft /logicalnot /hyphen /registered /macron
+/degree /plusminus /twosuperior /threesuperior /acute /mu /paragraph /periodcentered
+/cedilla /onesuperior /ordmasculine /guillemotright /onequarter /onehalf /threequarters /questiondown
+/Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla
+/Egrave /Eacute /Ecircumflex /Edieresis /Igrave /Iacute /Icircumflex /Idieresis
+/Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply
+/Oslash /Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn /germandbls
+/agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla
+/egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex /idieresis
+/eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis /divide
+/oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn /ydieresis
+] def
+%%EndResource
+
+%%BeginResource: procset LoutTabPrependGraphic
+% @PrependGraphic file /usr/staff/jeff/lout.lib/include/tabf.lpg
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                  %
+%  PostScript @SysPrependGraphic file for @Tab     %
+%                                                  %
+%  To assist in avoiding name clashes, the names   %
+%  of all these symbols begin with "ltab".         %
+%                                                  %
+%  Jeffrey H. Kingston                             %
+%  24 September 1991                               %
+%  22 December 1992                                %
+%                                                  %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% linewidth ltabhs -
+% horizontal single line
+/ltabhs
+{  0 0 moveto xsize 0 lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhsp -
+% horizontal single line with projecting ends
+/ltabhsp
+{  0 0 moveto xsize 0 lineto
+   setlinewidth 2 setlinecap stroke
+} def
+
+% linewidth ltabhd -
+% horizontal double line
+/ltabhd
+{  dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch 3 mul moveto xsize exch 3 mul lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhdb -
+% horizontal double line below mark
+/ltabhdb
+{  dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch -3 mul moveto xsize exch -3 mul lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhdnw -
+% horizontal double line with northwest corner
+/ltabhdnw
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   xsize exch 3 mul moveto
+   -3 mul exch 3 mul lineto
+   -3 mul 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdne -
+% horizontal double line with northeast corner
+/ltabhdne
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch 3 mul moveto
+   3 mul xsize add exch 3 mul lineto
+   3 mul xsize add 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdsw -
+% horizontal double line with southwest corner
+/ltabhdsw
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   xsize exch -3 mul moveto
+   -3 mul exch -3 mul lineto
+   -3 mul 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdse -
+% horizontal double line with southeast corner
+/ltabhdse
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch -3 mul moveto
+   3 mul xsize add exch -3 mul lineto
+   3 mul xsize add 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabvs -
+% vertical single line
+/ltabvs
+{  0 0 moveto 0 ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabvd -
+% vertical double line
+/ltabvd
+{  dup dup
+   0 0 moveto 0 ysize lineto
+   -3 mul 0 moveto -3 mul ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabvdr -
+% vertical double line to right of mark
+/ltabvdr
+{  dup dup
+   0 0 moveto 0 ysize lineto
+   3 mul 0 moveto 3 mul ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+%%EndResource
+
+%%BeginResource: procset LoutFigPrependGraphic
+% @PrependGraphic file /usr/staff/jeff/lout.lib/include/figf.lpg
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                                    %
+%  PostScript @SysPrependGraphic file for @Fig  Jeffrey H. Kingston  %
+%  Version 2.0 (includes CIRCUM label)                 January 1992  %
+%                                                                    %
+%  To assist in avoiding name clashes, the names of all symbols      %
+%  defined here begin with "lfig".  However, this is not feasible    %
+%  with user-defined labels and some labels used by users.           %
+%                                                                    %
+%  <point>      is two numbers, a point.                             %
+%  <length>     is one number, a length                              %
+%  <angle>      is one number, an angle in degrees                   %
+%  <dashlength> is one number, the preferred length of a dash        %
+%                                                                    %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+errordict begin
+   /handleerror
+   {
+      {  /Times-Roman findfont 8 pt scalefont setfont
+	 0 setgray 4 pt 4 pt moveto
+	 $error /errorname get
+	 dup lfigdict exch known
+	 { lfigdict exch get }
+	 { 30 string cvs } ifelse
+	 show
+	 (  Command: ) show
+	 $error /command get 30 string cvs show
+      } stopped {} if
+      showpage stop
+   } def
+end
+
+% concat strings: <string> <string> lfigconcat <string>
+% must be defined outside lfigdict since used in lfigpromotelabels
+/lfigconcat
+{ 2 copy length exch length add string
+  dup 0 4 index putinterval
+  dup 3 index length 3 index putinterval
+  3 1 roll pop pop
+} def
+
+% <string> lfigdebugprint -
+% must be defined outside lfigdict since used in arbitrary places
+% /lfigdebugprint
+% { print
+%   (;  operand stack:\n) print
+%   count copy
+%   count 2 idiv
+%   { ==
+%     (\n) print
+%   } repeat
+%   (\n) print
+% } def
+
+/lfigdict 120 dict def
+lfigdict begin
+
+% error messages
+/dictfull (dictfull error:  too many labels?) def
+/dictstackoverflow (dictstackoverflow error:  labels nested too deeply?) def
+/execstackoverflow (execstackoverflow error:  figure nested too deeply?) def
+/limitcheck (limitcheck error:  figure nested too deeply or too large?) def
+/syntaxerror (syntaxerror error:  syntax error in text of figure?) def
+/typecheck (typecheck error:  syntax error in text of figure?) def
+/undefined (undefined error:  unknown or misspelt label?) def
+/VMError (VMError error:  run out of memory?) def
+
+% push pi onto stack:  - lfigpi <num>
+/lfigpi 3.14159 def
+
+% arc directions
+/clockwise     false def
+/anticlockwise true  def
+
+% maximum of two numbers:  <num> <num> lfigmax <num>
+/lfigmax { 2 copy gt { pop } { exch pop } ifelse } def
+
+% minimum of two numbers:  <num> <num> lfigmin <num>
+/lfigmin { 2 copy lt { pop } { exch pop } ifelse } def
+
+% add two points:  <point> <point> lfigpadd <point>
+/lfigpadd { exch 3 1 roll add 3 1 roll add exch } def
+
+% subtract first point from second:  <point> <point> lfigpsub <point>
+/lfigpsub { 3 2 roll sub 3 1 roll exch sub exch } def
+
+% max two points:  <point> <point> lfigpmax <point>
+/lfigpmax { exch 3 1 roll lfigmax 3 1 roll lfigmax exch } def
+
+% min two points:  <point> <point> lfigpmin <point>
+/lfigpmin { exch 3 1 roll lfigmin 3 1 roll lfigmin exch } def
+
+% scalar multiplication: <point> <num> lfigpmul <point>
+/lfigpmul { dup 3 1 roll mul 3 1 roll mul exch } def
+
+% point at angle and distance:  <point> <length> <angle> lfigatangle <point>
+/lfigatangle { 2 copy cos mul 3 1 roll sin mul lfigpadd } def
+
+% angle from one point to another:  <point> <point> lfigangle <angle>
+/lfigangle { lfigpsub 2 copy 0 eq exch 0 eq and {pop} {exch atan} ifelse } def
+
+% distance between two points:  <point> <point> lfigdistance <length>
+/lfigdistance { lfigpsub dup mul exch dup mul add sqrt } def
+
+% difference in x coords: <point> <point> lfigxdistance <length>
+/lfigxdistance { pop 3 1 roll pop sub } def
+
+%difference in y coords: <point> <point> lfigydistance <length>
+/lfigydistance { 3 1 roll pop sub exch pop } def
+
+% stroke a solid line:  <length> <dashlength> lfigsolid -
+/lfigsolid
+{  pop pop [] 0 setdash stroke
+} def
+
+% stroke a lfigdashed line:   <length> <dashlength> lfigdashed -
+/lfigdashed
+{  2 copy div 2 le 1 index 0 le or
+   {  exch pop 1 pt lfigmax [ exch dup ] 0 setdash }
+   {  dup [ exch 4 2 roll 2 copy div
+      1 sub 2 div ceiling dup 4 1 roll
+      1 add mul sub exch div ] 0 setdash
+   } ifelse stroke
+} def
+
+% stroke a lfigcdashed line:  <length> <dashlength> lfigcdashed -
+/lfigcdashed
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt lfigmax [ exch dup ] dup 0 get 2 div setdash }
+   { dup [ 4 2 roll exch 2 copy exch div
+     2 div ceiling div 1 index sub
+     ] exch 2 div setdash
+   } ifelse stroke
+} def
+
+% stroke a dotted line:  <length> <dashlength> lfigdotted -
+/lfigdotted
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt lfigmax [ exch 0 exch ] 0 setdash }
+   { 1 index exch div ceiling div
+     [ 0 3 2 roll ] 0 setdash
+   } ifelse stroke
+} def
+
+% stroke a noline line:  <length> <dashlength> lfignoline -
+/lfignoline
+{ pop pop
+} def
+
+% painting (i.e. filling): - lfigwhite - (etc.)
+/lfignopaint		{			       } def
+/lfignochange		{ 			  fill } def
+/lfigdarkblue		{ 0.0 0.0 0.5 setrgbcolor fill } def
+/lfigblue		{ 0.0 0.0 1.0 setrgbcolor fill } def
+/lfiglightblue		{ 0.5 0.5 1.0 setrgbcolor fill } def
+/lfigdarkgreen		{ 0.0 0.5 0.0 setrgbcolor fill } def
+/lfiggreen		{ 0.0 1.0 0.0 setrgbcolor fill } def
+/lfiglightgreen		{ 0.5 1.0 0.5 setrgbcolor fill } def
+/lfigdarkred		{ 0.5 0.0 0.0 setrgbcolor fill } def
+/lfigred		{ 1.0 0.0 0.0 setrgbcolor fill } def
+/lfiglightred		{ 1.0 0.5 0.5 setrgbcolor fill } def
+/lfigdarkcyan		{ 0.0 0.5 0.5 setrgbcolor fill } def
+/lfigcyan		{ 0.0 1.0 1.0 setrgbcolor fill } def
+/lfiglightcyan		{ 0.5 1.0 1.0 setrgbcolor fill } def
+/lfigdarkmagenta	{ 0.5 0.0 0.5 setrgbcolor fill } def
+/lfigmagenta		{ 1.0 0.0 1.0 setrgbcolor fill } def
+/lfiglightmagenta	{ 1.0 0.5 1.0 setrgbcolor fill } def
+/lfigdarkyellow		{ 0.5 0.5 0.0 setrgbcolor fill } def
+/lfigyellow		{ 1.0 1.0 0.0 setrgbcolor fill } def
+/lfiglightyellow	{ 1.0 1.0 0.5 setrgbcolor fill } def
+/lfigdarkgray		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/lfiggray		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/lfiglightgray		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/lfigdarkgrey		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/lfiggrey		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/lfiglightgrey		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/lfigblack		{ 0.0 0.0 0.0 setrgbcolor fill } def
+/lfigwhite		{ 1.0 1.0 1.0 setrgbcolor fill } def
+
+% line caps (and joins, not currently used)
+/lfigbutt       0 def
+/lfiground      1 def
+/lfigprojecting 2 def
+/lfigmiter      0 def
+/lfigbevel      2 def
+
+% shape and labels of the @Box symbol
+/lfigbox
+{
+   0     0     /SW  lfigpointdef
+   xsize 0     /SE  lfigpointdef
+   xsize ysize /NE  lfigpointdef
+   0     ysize /NW  lfigpointdef
+   SE 0.5 lfigpmul /S   lfigpointdef
+   NW 0.5 lfigpmul /W   lfigpointdef
+   W SE lfigpadd   /E   lfigpointdef
+   S NW lfigpadd   /N   lfigpointdef
+   NE 0.5 lfigpmul /CTR lfigpointdef
+   [ CTR NE lfigpsub /lfigboxcircum cvx ] lfigcircumdef
+   SW SE NE NW SW
+} def
+
+% shape and labels of the @CurveBox symbol
+/lfigcurvebox
+{
+
+   xsize 0.5 mul	ysize 0.5 mul	/CTR lfigpointdef
+   xsize 0.5 mul	0		/S   lfigpointdef
+   xsize		ysize 0.5 mul	/E   lfigpointdef
+   xsize 0.5 mul	ysize		/N   lfigpointdef
+   0			ysize 0.5 mul	/W   lfigpointdef
+
+   xmark 0.293 mul		xmark 0.293 mul		  /SW  lfigpointdef
+   xsize xmark 0.293 mul sub	xmark 0.293 mul		  /SE  lfigpointdef
+   xsize xmark 0.293 mul sub	ysize xmark 0.293 mul sub /NE  lfigpointdef
+   xmark 0.293 mul		ysize xmark 0.293 mul sub /NW  lfigpointdef
+
+   [ xsize ysize 0.5 lfigpmul xmark /lfigcurveboxcircum cvx ] lfigcircumdef
+
+   xmark		0
+   xsize xmark sub	0
+   [ xsize xmark sub	xmark		]
+   xsize		xmark
+   xsize		ysize xmark sub
+   [ xsize xmark sub	ysize xmark sub	]
+   xsize xmark sub	ysize
+   xmark		ysize
+   [ xmark		ysize xmark sub	]
+   0			ysize xmark sub
+   0			xmark
+   [ xmark		xmark		]
+   xmark		0
+} def
+
+% shadow of the @ShadowBox symbol
+% its shape and labels are done, somewhat inaccurately, with lfigbox
+/lfigshadow
+{ xmark 2 mul 0 moveto xsize 0 lineto
+  xsize ysize xmark 2 mul sub lineto
+  xsize xmark sub ysize xmark 2 mul sub lineto
+  xsize xmark sub xmark lineto
+  xmark 2 mul xmark lineto closepath fill
+} def
+
+% shape and labels of the @Square symbol
+/lfigsquare
+{
+   xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   CTR xsize xsize ysize ysize lfigpmax 0.5 lfigpmul lfigpadd /NE lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 135 lfigatangle lfigpadd /NW lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 225 lfigatangle lfigpadd /SW lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 315 lfigatangle lfigpadd /SE lfigpointdef
+   SW 0.5 lfigpmul SE 0.5 lfigpmul lfigpadd /S lfigpointdef
+   NW 0.5 lfigpmul NE 0.5 lfigpmul lfigpadd /N lfigpointdef
+   SW 0.5 lfigpmul NW 0.5 lfigpmul lfigpadd /W lfigpointdef
+   SE 0.5 lfigpmul NE 0.5 lfigpmul lfigpadd /E lfigpointdef
+   [ CTR NE lfigpsub /lfigboxcircum cvx ] lfigcircumdef
+   SW SE NE NW SW
+} def
+
+% shape and labels of the @Diamond symbol
+/lfigdiamond
+{
+   xsize 0 0.5 lfigpmul /S   lfigpointdef
+   0 ysize 0.5 lfigpmul /W   lfigpointdef
+   S W         lfigpadd /CTR lfigpointdef
+   CTR W       lfigpadd /N   lfigpointdef
+   CTR S       lfigpadd /E   lfigpointdef
+   [ xsize ysize 0.5 lfigpmul /lfigdiamondcircum cvx ] lfigcircumdef
+   S E N W S
+} def
+
+% shape and labels of the @Ellipse symbol
+/lfigellipse
+{
+   xsize 0 0.5 lfigpmul /S   lfigpointdef
+   0 ysize 0.5 lfigpmul /W   lfigpointdef
+   S W         lfigpadd /CTR lfigpointdef
+   CTR W       lfigpadd /N   lfigpointdef
+   CTR S       lfigpadd /E   lfigpointdef
+   CTR xsize 0 0.3536 lfigpmul lfigpadd 0 ysize 0.3536 lfigpmul lfigpadd /NE lfigpointdef
+   0 ysize 0.3536 lfigpmul CTR xsize 0 0.3536 lfigpmul lfigpadd lfigpsub /SE lfigpointdef
+   xsize 0 0.3536 lfigpmul CTR lfigpsub 0 ysize 0.3536 lfigpmul lfigpadd /NW lfigpointdef
+   0 ysize 0.3536 lfigpmul xsize 0 0.3536 lfigpmul CTR lfigpsub lfigpsub /SW lfigpointdef
+   [ xsize ysize 0.5 lfigpmul /lfigellipsecircum cvx ] lfigcircumdef
+   S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+} def
+
+% shape and labels of the @Circle symbol
+/lfigcircle
+{
+   xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   CTR xsize 0 ysize 0 lfigpmax 0.5 lfigpmul lfigpadd /E lfigpointdef
+   CTR 0 0 CTR E lfigdistance 45 lfigatangle lfigpadd /NE lfigpointdef
+   CTR 0 0 CTR E lfigdistance 90 lfigatangle lfigpadd /N lfigpointdef
+   CTR 0 0 CTR E lfigdistance 135 lfigatangle lfigpadd /NW lfigpointdef
+   CTR 0 0 CTR E lfigdistance 180 lfigatangle lfigpadd /W lfigpointdef
+   CTR 0 0 CTR E lfigdistance 225 lfigatangle lfigpadd /SW lfigpointdef
+   CTR 0 0 CTR E lfigdistance 270 lfigatangle lfigpadd /S lfigpointdef
+   CTR 0 0 CTR E lfigdistance 315 lfigatangle lfigpadd /SE lfigpointdef
+   [ S E lfigpsub /lfigellipsecircum cvx ] lfigcircumdef
+   S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+} def
+
+% shape and labels of the @HLine and @HArrow symbols
+/lfighline
+{
+   0 ymark lfigprevious /FROM lfigpointdef
+   xsize ymark lfigprevious /TO lfigpointdef
+} def
+
+% shape and labels of the @VLine and @VArrow symbols
+/lfigvline
+{
+   xmark ysize lfigprevious /FROM lfigpointdef
+   xmark 0 lfigprevious /TO lfigpointdef
+} def
+
+% points of a polygon around base with given no of sides, vert init angle:
+% <sides> <angle> figpolygon <point> ... <point>
+/lfigpolygon
+{  xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   90 sub CTR 2 copy lfigmax 5 3 roll
+   [ 4 copy pop /lfigpolycircum cvx ] lfigcircumdef
+   exch dup 360 exch div exch
+   1 1  3 2 roll
+   {  4 string cvs (P) exch lfigconcat cvn
+      6 copy pop pop lfigatangle 2 copy 10 2 roll
+      3 2 roll lfigpointdef
+      dup 3 1 roll add exch
+   }  for
+   pop lfigatangle
+} def
+
+% next array element:  <array> <index> lfiggetnext <array> <index> <any> true
+%                                               or <array> <index> false
+/lfiggetnext
+{  2 copy exch length ge
+   { false }
+   { 2 copy get exch 1 add exch true } ifelse
+} def
+
+% check whether thing is number:  <any> lfigisnumbertype <any> <bool>
+/lfigisnumbertype
+{  dup type dup
+   /integertype eq exch /realtype eq or
+} def
+
+% check whether thing is an array:  <any> lfigisarraytype <any> <bool>
+/lfigisarraytype { dup type /arraytype eq } def
+
+% get next item:  <array> <index> lfiggetnextitem <array> <index> 0
+%                                              or <array> <index> <array> 1
+%                                              or <array> <index> <point> 2
+/lfiggetnextitem
+{   lfiggetnext
+    {	lfigisarraytype
+	{   1
+	}
+	{   lfigisnumbertype
+	    {	3 1 roll
+		lfiggetnext
+		{   lfigisnumbertype
+		    {	4 3 roll exch  2
+		    }
+		    {	pop 3 2 roll pop  0
+		    } ifelse
+		}
+		{   3 2 roll pop  0
+		} ifelse
+	    }
+	    {	pop 0
+	    } ifelse
+	} ifelse
+    }
+    {	0
+    } ifelse
+} def
+
+% set arc path:  bool x1 y1  x2 y2  x0 y0  lfigsetarc  <angle> <angle> <dist>
+% the path goes from x1 y1 to x2 y2 about centre x0 y0,
+% anticlockwise if bool is true else clockwise.
+% The orientations of backwards pointing and forwards pointing
+% arrowheads are returned in the two angles, and
+% the length of the arc is returned in <dist>.
+/lfigsetarc
+{
+  20 dict begin
+     matrix currentmatrix 8 1 roll
+     2 copy translate 2 copy 8 2 roll
+     4 2 roll lfigpsub 6 2 roll lfigpsub
+     dup /y1 exch def dup mul /y1s exch def
+     dup /x1 exch def dup mul /x1s exch def
+     dup /y2 exch def dup mul /y2s exch def
+     dup /x2 exch def dup mul /x2s exch def
+
+     y1s y2s eq
+     {	-1
+     }
+     {	y1s x2s mul y2s x1s mul sub y1s y2s sub div
+     } ifelse
+     /da exch def
+
+     x1s x2s eq
+     {	-1
+     }
+     {	x1s y2s mul x2s y1s mul sub x1s x2s sub div
+     } ifelse
+     /db exch def
+
+     da 0 gt db 0 gt and
+     {	/LMax da sqrt db sqrt lfigmax def
+	/scalex da sqrt LMax div def
+	/scaley db sqrt LMax div def
+	scalex scaley scale
+	0 0 LMax
+	0 0 x1 scalex mul y1 scaley mul lfigangle
+	0 0 x2 scalex mul y2 scaley mul lfigangle
+	2 copy eq { 360 add } if
+	2 copy 8 2 roll
+	5 index { arc } { arcn } ifelse
+	2 index 1 index
+	{ 90 sub } { 90 add } ifelse
+	dup sin scaley mul exch cos scalex mul atan
+	2 index 2 index
+	{ 90 add } { 90 sub } ifelse
+	dup sin scaley mul exch cos scalex mul atan
+	5 2 roll  % res1 res2 ang1 ang2 anticlockwise
+	{ exch sub } { sub } ifelse
+	dup 0 le { 360 add } if  lfigpi mul LMax mul 180 div
+     }
+     {	0 0 x1 y1 lfigdistance 0 0 x2 y2 lfigdistance eq
+	0 0 x1 y1 lfigdistance 0 gt and
+	{	0 0
+		0 0 x1 y1 lfigdistance
+		0 0 x1 y1 lfigangle
+		0 0 x2 y2 lfigangle
+		2 copy eq { 360 add } if
+		2 copy 8 2 roll
+		5 index { arc } { arcn } ifelse
+		2 index 1 index
+		{ 90 sub } { 90 add } ifelse
+		2 index 2 index
+		{ 90 add } { 90 sub } ifelse
+		5 2 roll % res1 res2 ang1 ang2 clockwise
+		{ exch sub } { sub } ifelse
+		dup 0 le { 360 add } if lfigpi mul 0 0 x1 y1 lfigdistance mul 180 div
+	}
+	{	x2 y2 lineto pop
+		x2 y2 x1 y1 lfigangle
+		x1 y1 x2 y2 lfigangle
+		x1 y1 x2 y2 lfigdistance
+	} ifelse
+     } ifelse
+     4 -1 roll setmatrix
+   end
+} def
+
+% lfigsetcurve: set up a Bezier curve from x0 y0 to x3 y3
+% and return arrowhead angles and length of curve (actually 0)
+% x0 y0 x1 y1 x2 y2 x3 y3 lfigsetcurve <angle> <angle> <length>
+/lfigsetcurve
+{ 8 copy curveto pop pop
+  lfigangle
+  5 1 roll
+  4 2 roll lfigangle
+  exch
+  0
+} def
+
+% lfigpaintpath: paint a path of the given shape
+% /paint [ shape ] lfigpaintpath -
+/lfigpaintpath
+{
+  10 dict begin
+    0 newpath
+    /prevseen false def
+    /curveseen false def
+    { lfiggetnextitem
+      dup 0 eq { pop exit }
+      { 1 eq
+        { /curveseen true def
+	  /curve exch def
+	  curve length 0 eq { /curveseen false def } if
+        }
+        { /ycurr exch def
+	  /xcurr exch def
+	  prevseen
+	  { curveseen
+	    { curve length 4 eq
+	      { xprev yprev
+		curve 0 get curve 1 get
+		curve 2 get curve 3 get
+		xcurr ycurr
+		lfigsetcurve pop pop pop
+	      }
+	      { xprev yprev xcurr ycurr
+	        curve length 1 ge { curve 0 get } { 0 } ifelse
+	        curve length 2 ge { curve 1 get } { 0 } ifelse
+	        curve length 3 ge { curve 2 get } { true } ifelse
+	        7 1 roll
+	        lfigsetarc pop pop pop
+	      } ifelse
+	    }
+	    { xcurr ycurr lineto
+	    } ifelse
+	  }
+	  { xcurr ycurr moveto
+	  } ifelse
+	  /xprev xcurr def
+	  /yprev ycurr def
+	  /prevseen true def
+	  /curveseen false def
+        } ifelse
+      } ifelse
+    } loop pop pop cvx exec
+  end
+} def
+
+% stroke a path of the given shape in the given linestyle and dash length.
+% Return the origin and angle of the backward and forward arrow heads.
+% dashlength /linestyle [shape] lfigdopath  [<point> <angle>] [<point> <angle>] 
+/lfigdopath
+{
+  10 dict begin
+    0
+    /prevseen  false def
+    /curveseen false def
+    /backarrow []    def
+    /fwdarrow  []    def
+    {
+	lfiggetnextitem
+	dup 0 eq { pop exit }
+	{
+	    1 eq
+	    {	/curveseen true def
+		/curve exch def
+		curve length 0 eq { /prevseen false def } if
+	    }
+	    {	/ycurr exch def
+		/xcurr exch def
+		prevseen
+		{   newpath xprev yprev moveto
+		    curveseen
+		    {	curve length 4 eq
+			{   xprev yprev
+			    curve 0 get curve 1 get
+			    curve 2 get curve 3 get
+			    xcurr ycurr lfigsetcurve
+			}
+			{   xprev yprev xcurr ycurr
+			    curve length 1 ge { curve 0 get } { 0 } ifelse
+			    curve length 2 ge { curve 1 get } { 0 } ifelse
+			    curve length 3 ge { curve 2 get } { true } ifelse
+			    7 1 roll
+			    lfigsetarc
+			} ifelse
+		    }
+		    {	xcurr ycurr lineto
+			xcurr ycurr xprev yprev lfigangle dup 180 sub
+			xprev yprev xcurr ycurr lfigdistance
+		    } ifelse
+		    6 index 6 index cvx exec
+		    [ xprev yprev 5 -1 roll ]
+		    backarrow length 0 eq
+		    { /backarrow exch def }
+		    { pop } ifelse
+		    [ xcurr ycurr 4 -1 roll ] /fwdarrow exch def
+		} if
+		/xprev xcurr def
+		/yprev ycurr def
+		/prevseen true def
+		/curveseen false def
+	    } ifelse
+	} ifelse
+    } loop
+    pop pop pop pop
+    backarrow length 0 eq { [ 0 0 0 ] } { backarrow } ifelse
+    fwdarrow  length 0 eq { [ 0 0 0 ] } { fwdarrow  } ifelse
+  end
+} def
+
+% lfigdoarrow: draw an arrow head of given form
+% dashlength /lstyle /pstyle hfrac height width [ <point> <angle> ] lfigdoarrow -
+/lfigdoarrow
+{  matrix currentmatrix 8 1 roll
+   dup 0 get 1 index 1 get translate
+   2 get rotate
+   [ 2 index neg 2 index 0 0
+     3 index 3 index neg
+     1 index 10 index mul 0
+     7 index 7 index ]
+   4 1 roll pop pop pop
+   dup 3 1 roll
+   gsave lfigpaintpath grestore lfigdopath pop pop
+   setmatrix
+} def
+
+% arrow head styles
+/lfigopen     0.0 def
+/lfighalfopen 0.5 def
+/lfigclosed   1.0 def
+
+% stroke no arrows, forward, back, and both
+/lfignoarrow { pop pop pop pop pop pop pop pop                        } def
+/lfigforward { 7 -1 roll lfigdoarrow pop                              } def
+/lfigback    { 8 -2 roll pop lfigdoarrow                              } def
+/lfigboth    { 8 -1 roll 7 copy lfigdoarrow pop 7 -1 roll lfigdoarrow } def
+
+% lfigprevious: return previous point on path
+/lfigprevious
+{ lfigisnumbertype
+  { 2 copy }
+  { lfigisarraytype
+    { 2 index 2 index }
+    { 0 0 }
+    ifelse
+  } ifelse
+} def
+
+% label a point in 2nd top dictionary:  <point> /name lfigpointdef -
+/lfigpointdef
+{
+  % (Entering lfigpointdef) lfigdebugprint
+  [ 4 2 roll transform
+    /itransform cvx ] cvx
+    currentdict end
+    3 1 roll
+    % currentdict length currentdict maxlength lt
+    % { def }
+    % { exec moveto (too many labels) show stop }
+    % ifelse
+    def
+    begin
+  % (Leaving lfigpointdef) lfigdebugprint
+} def
+
+% promote labels from second top to third top dictionary
+% <string> lfigpromotelabels -
+/lfigpromotelabels
+{
+  % (Entering lfigpromotelabels) lfigdebugprint
+  currentdict end exch currentdict end
+  { exch 20 string cvs 2 index
+    (@) lfigconcat exch lfigconcat cvn exch def
+  } forall pop begin
+  % (Leaving lfigpromotelabels) lfigdebugprint
+} def
+
+% show labels (except CIRCUM): - lfigshowlabels -
+/lfigshowlabels
+{
+  % (Entering lfigshowlabels) lfigdebugprint
+  currentdict end
+    currentdict
+    { 1 index 20 string cvs (CIRCUM) search % if CIRCUM in key
+      { pop pop pop pop pop }
+      { pop cvx exec 2 copy
+        newpath 1.5 pt 0 360 arc
+        0 setgray fill
+        /Times-Roman findfont 8 pt scalefont setfont
+        moveto 0.2 cm 0.1 cm rmoveto 20 string cvs show
+      }
+      ifelse
+    } forall
+  begin
+  % (Leaving lfigshowlabels) lfigdebugprint
+} def
+
+% fix an angle to 0 <= res < 360:  <angle> lfigfixangle <angle>
+/lfigfixangle
+{
+  % (Entering lfigfixangle) lfigdebugprint
+  { dup 0 ge { exit } if
+    360 add
+  } loop
+  { dup 360 lt { exit } if
+    360 sub
+  } loop
+  % (Leaving lfigfixangle) lfigdebugprint
+} def
+
+% find point on circumference of box:  alpha a b lfigboxcircum x y
+/lfigboxcircum
+{
+  % (Entering lfigboxcircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    0 0 a b lfigangle /theta exch def
+
+    % if alpha <= theta, return (a, a*tan(alpha))
+    alpha theta le
+    { a  a alpha sin mul alpha cos div }
+    {
+      % else if alpha <= 180 - theta, return (b*cot(alpha), b)
+      alpha 180 theta sub le
+      { b alpha cos mul alpha sin div  b }
+      {
+        % else if alpha <= 180 + theta, return (-a, -a*tan(alpha))
+        alpha 180 theta add le
+        { a neg  a neg alpha sin mul alpha cos div }
+        {
+	  % else if alpha <= 360 - theta, return (-b*cot(alpha), -b)
+	  alpha 360 theta sub le
+          { b neg alpha cos mul alpha sin div  b neg }
+	  {
+	    % else 360 - theta <= alpha, return (a, a*tan(alpha))
+	    a  a alpha sin mul alpha cos div
+	  } ifelse
+        } ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigboxcircum) lfigdebugprint
+} def
+
+% find quadratic roots (assume a != 0): a b c lfigqroots x1 x2 2
+%                                                     or    x2 1
+%                                                     or       0
+/lfigqroots
+{
+  4 dict begin
+    /c exch def
+    /b exch def
+    /a exch def
+    /disc b b mul 4 a c mul mul sub def
+    disc 0 lt
+    { 0
+    }
+    { disc 0 eq
+      { b neg 2 a mul div
+	1
+      }
+      { b neg disc sqrt add 2 a mul div
+        b neg disc sqrt sub 2 a mul div
+	2
+      }
+      ifelse
+    }
+    ifelse
+  end
+} def
+
+% work our which quadrant: <angle> lfigquadrant <0-3>
+/lfigquadrant
+{ dup 90 lt
+  { pop 0
+  }
+  { dup 180 lt
+    { pop 1
+    }
+    { 270 lt
+      { 2
+      }
+      { 3
+      } ifelse
+    } ifelse
+  } ifelse
+} def
+
+% find curvebox circum, assuming upper right quadrant: alpha a b xmk lfigcb x y
+/lfigcb
+{
+  6 dict begin
+    /xmk exch def
+    /b exch def
+    /a exch def
+    /alpha exch def
+    /theta1 0 0 a b xmk sub lfigangle def
+    /theta2 0 0 a xmk sub b lfigangle def
+    alpha theta1 le
+    { % if alpha <= theta1, return (a, a*tan(alpha))
+      a  a alpha sin mul alpha cos div
+    }
+    { alpha theta2 ge
+      { % else if alpha > theta2, return (b*cot(alpha), b)
+	b alpha cos mul alpha sin div  b
+      }
+      {
+	% else, return the intersection of line and circle
+	a xmk sub b xmk sub xmk  0 0 alpha lfigcircleintersect
+	dup 0 eq
+	{ % should never happen, just return any reasonable point
+	  pop
+	  a b 0.5 lfigpmul
+	}
+	{ 1 eq
+	  { % should never happen, just return the point on top of stack
+	  }
+	  { % the usual case, two points on stack, return the larger
+	    lfigpmax
+	  } ifelse
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+} def
+
+% find point on circumference of curvebox: alpha a b xmk lfigcurveboxcircum x y
+/lfigcurveboxcircum
+{
+  % (Entering lfigcurveboxcircum) lfigdebugprint
+  5 dict begin
+    /xmk exch def
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+
+    % work out which quadrant we are in, and reflect accordingly
+    /quad alpha lfigquadrant def
+    quad 0 eq
+    { alpha a b xmk lfigcb
+    }
+    { quad 1 eq
+      { 180 alpha sub a b xmk lfigcb exch neg exch
+      }
+      { quad 2 eq
+	{ alpha 180 sub a b xmk lfigcb neg exch neg exch
+	}
+	{ 360 alpha sub a b xmk lfigcb neg
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigcurveboxcircum) lfigdebugprint
+} def
+
+% find point on circumference of diamond:  alpha a b lfigdiamondcircum x y
+/lfigdiamondcircum
+{
+  % (Entering lfigdiamondcircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    b alpha cos abs mul  a alpha sin abs mul  add  /denom exch def
+    a b mul alpha cos mul denom div
+    a b mul alpha sin mul denom div
+  end
+  % (Leaving lfigdiamondcircum) lfigdebugprint
+} def
+
+% find point on circumference of ellipse:  alpha a b lfigellipsecircum x y
+/lfigellipsecircum
+{
+  % (Entering lfigellipsecircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    b alpha cos mul dup mul  a alpha sin mul dup mul  add sqrt /denom exch def
+    a b mul alpha cos mul denom div
+    a b mul alpha sin mul denom div
+  end
+  % (Leaving lfigellipsecircum) lfigdebugprint
+} def
+
+% find point of intersection of two lines each defined by two points
+% x1 y1 x2 y2  x3 y3 x4 y4  lfiglineintersect x y
+/lfiglineintersect
+{
+  % (Entering lfiglineintersect) lfigdebugprint
+  13 dict begin
+    /y4 exch def
+    /x4 exch def
+    /y3 exch def
+    /x3 exch def
+    /y2 exch def
+    /x2 exch def
+    /y1 exch def
+    /x1 exch def
+    x2 x1 sub /x21 exch def
+    x4 x3 sub /x43 exch def
+    y2 y1 sub /y21 exch def
+    y4 y3 sub /y43 exch def
+    y21 x43 mul y43 x21 mul sub /det exch def
+  
+    % calculate x 
+    y21 x43 mul x1 mul
+    y43 x21 mul x3 mul sub
+    y3 y1 sub x21 mul x43 mul add
+    det div
+
+    % calculate y
+    x21 y43 mul y1 mul
+    x43 y21 mul y3 mul sub
+    x3 x1 sub y21 mul y43 mul add
+    det neg div
+
+  end
+  % (Leaving lfiglineintersect) lfigdebugprint
+} def
+
+% find point on circumference of polygon
+% alpha radius num theta lfigpolycircum x y
+/lfigpolycircum
+{
+  % (Entering lfigpolycircum) lfigdebugprint
+  13 dict begin
+    /theta exch def
+    /num exch def
+    /radius exch def
+    /alpha exch def
+
+    % calculate delta, the angle from theta to alpha
+    alpha theta sub lfigfixangle
+
+    % calculate the angle which is the multiple of 360/num closest to delta
+    360 num div div truncate 360 num div mul theta add /anglea exch def
+
+    % calculate the next multiple of 360/num after anglea
+    anglea 360 num div add /angleb exch def
+
+    % intersect the line through these two points with the alpha line
+    anglea cos anglea sin  angleb cos angleb sin
+    0 0  alpha cos 2 mul alpha sin 2 mul
+    lfiglineintersect radius lfigpmul
+
+  end
+  % (Leaving lfigpolycircum) lfigdebugprint
+} def
+
+% find point of intersection of a point and a circle
+% x0 y0 r  x1 y1 theta  lfigcircleintersect xa ya xb yb 2
+%                                        or       xb yb 1
+%                                        or             0
+/lfigcircleintersect
+{
+  % (Entering lfigcircleintersect) lfigdebugprint
+  15 dict begin
+    /theta exch def
+    /y1    exch def
+    /x1    exch def
+    /r     exch def
+    /y0    exch def
+    /x0    exch def
+
+    % if sin(theta) = 0 then line is horizontal and y must be y1
+    theta sin abs 0.00001 lt
+    { 
+      /a 1 def
+      /b -2 x0 mul def
+      /c x0 dup mul y1 y0 sub dup mul add r dup mul sub def
+      a b c lfigqroots dup
+      0 eq
+      { pop
+	0
+      }
+      { 1 eq
+	{ y1 1
+	}
+	{ y1 exch y1 2
+	} ifelse
+      } ifelse
+    }
+    {
+      /ct theta cos theta sin div def
+      /a ct ct mul 1 add def
+      /b ct x1 x0 sub mul y1 add y0 sub 2 mul def
+      /c x1 x0 sub dup mul y1 y0 sub dup mul add r dup mul sub def
+      a b c lfigqroots dup
+      0 eq
+      { pop
+	0
+      }
+      { 1 eq
+	{ y1 add /yb exch def
+	  yb y1 sub ct mul x1 add /xb exch def
+	  xb yb 1
+	}
+	{ y1 add /ya exch def
+	  ya y1 sub ct mul x1 add /xa exch def
+	  y1 add /yb exch def
+	  yb y1 sub ct mul x1 add /xb exch def
+	  xa ya xb yb 2
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigcircleintersect) lfigdebugprint
+} def
+
+% add CIRCUM operator with this body:  <array> lfigcircumdef -
+/lfigcircumdef
+{   % (Entering lfigcircumdef) lfigdebugprint
+    /CIRCUM exch cvx
+    currentdict end
+    3 1 roll
+    % currentdict length currentdict maxlength lt
+    % { def }
+    % { exec moveto (too many labels) show stop }
+    % ifelse
+    def
+    begin
+    % (Leaving lfigcircumdef) lfigdebugprint
+} def
+
+end
+%%EndResource
+
+%%BeginResource: procset LoutGraphPrependGraphic
+% @PrependGraphic file /usr/staff/jeff/lout.lib/include/graphf.lpg
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                                    %
+%  PostScript @SysPrependGraphic file for @Graph (Version 1.0)       %
+%                                                                    %
+%  Version 1.0 by Jeffrey H. Kingston, December 1993.                %
+%                                                                    %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+errordict begin
+   /handleerror
+   {
+      {  /Times-Roman findfont 8 pt scalefont setfont
+	 0 setgray 4 pt 4 pt moveto
+	 $error /errorname get
+	 dup lgraphdict exch known
+	 { lgraphdict exch get }
+	 { 30 string cvs } ifelse
+	 show
+	 (  Command: ) show
+	 $error /command get 30 string cvs show
+      } stopped {} if
+      showpage stop
+   } def
+end
+
+/lgraphdict 200 dict def
+lgraphdict begin
+
+% error messages
+/dictfull (dictfull error) def
+/dictstackoverflow (dictstackoverflow error) def
+/execstackoverflow (execstackoverflow error:  expression too complex?) def
+/limitcheck (limitcheck error:  graph too complex or too large?) def
+/syntaxerror (syntaxerror error:  syntax error in text of graph?) def
+/typecheck (typecheck error:  syntax error in text of graph?) def
+/undefined (undefined error:  unknown or misspelt symbol?) def
+/rangecheck (rangecheck error:  undefined expression (e.g. divide by zero)?) def
+/VMError (VMError error:  run out of memory?) def
+
+% random number between x and y inclusive: x y dorand num
+/dorand { 1 index sub 1 add rand exch mod add } def
+
+% log to given base: base num dolog num
+/dolog { ln exch ln div } def
+
+% maximum of two numbers:  <num> <num> max <num>
+/max { 2 copy gt { pop } { exch pop } ifelse } def
+
+% add two points:  <point> <point> padd <point>
+/padd { exch 3 1 roll add 3 1 roll add exch } def
+
+% subtract first point from second:  <point> <point> psub <point>
+/psub { 3 2 roll sub 3 1 roll exch sub exch } def
+
+% distance between two points:  <point> <point> distance <length>
+/distance { psub dup mul exch dup mul add sqrt } def
+
+% point at angle and distance:  <point> <length> <angle> atangle <point>
+/atangle { 2 copy cos mul 3 1 roll sin mul padd } def
+
+% angle from one point to another:  <point> <point> angle <angle>
+/angle { psub 2 copy 0 eq exch 0 eq and {pop} {exch atan} ifelse } def
+
+
+% set up for line
+% - linesetup <length> <dashlength>
+/linesetup
+{ newpath
+  xcurr ycurr trpoint xprev yprev trpoint
+  4 copy moveto lineto distance dashlength
+} def
+
+% set up for icon-avoiding line
+% - ilinesetup <length> <dashlength>
+/ilinesetup
+{ newpath
+  xprev yprev trpoint xcurr ycurr trpoint 4 copy
+  4 copy angle symbolsize 1.5 mul exch 4 2 roll pop pop atangle
+  6 2 roll 4 2 roll
+  4 copy angle symbolsize 1.5 mul exch 4 2 roll pop pop atangle 
+  4 copy moveto lineto distance dashlength
+} def
+
+
+% stroke a solid line:  <length> <dashlength> solid -
+/solid
+{ pop pop [] 0 setdash linewidth setlinewidth stroke
+} def
+  
+% stroke a dashed line:   <length> <dashlength> dashed -
+/dashed
+{  2 copy 2 mul le 1 index 0 le or
+   {  exch pop 1 pt max [ exch dup ] 0 setdash }
+   {  dup [ exch 4 2 roll 2 copy div
+      1 sub 2 div ceiling dup 4 1 roll
+      1 add mul sub exch div ] 0 setdash
+   } ifelse linewidth setlinewidth stroke
+} def
+
+% stroke a cdashed line:  <length> <dashlength> cdashed -
+/cdashed
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt max [ exch dup ] dup 0 get 2 div setdash }
+   { dup [ 4 2 roll exch 2 copy exch div
+     2 div ceiling div 1 index sub
+     ] exch 2 div setdash
+   } ifelse linewidth setlinewidth stroke
+} def
+
+% stroke a dotted line:  <length> <dashlength> dotted -
+/dotted
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt max [ exch 0 exch ] 0 setdash }
+   { 1 index exch div ceiling div 0.99999 mul
+     [ 0 3 2 roll ] 0 setdash
+   } ifelse gsave 1 setlinecap linewidth setlinewidth stroke grestore newpath
+} def
+
+% stroke a noline line:  <length> <dashlength> noline -
+/noline
+{ pop pop
+} def
+
+% stroke a y histogram: - yhisto -
+/yhisto
+{ xprev yleft trpoint yextra sub moveto
+  xprev yprev trpoint lineto
+  xcurr yprev trpoint lineto
+  xcurr yleft trpoint yextra sub lineto 
+  linewidth setlinewidth stroke
+} def
+
+% stroke an x histogram: - xhisto -
+/xhisto
+{ xleft yprev trpoint exch xextra sub exch moveto
+  xcurr yprev trpoint lineto
+  xcurr ycurr trpoint lineto
+  xleft ycurr trpoint exch xextra sub exch lineto 
+  linewidth setlinewidth stroke
+} def
+
+% stroke a surface y histogram: - surfaceyhisto -
+/surfaceyhisto
+{ firstpair
+  { xprev yleft trpoint yextra sub moveto
+    xprev yprev trpoint lineto
+  }
+  { xprev yprev trpoint moveto
+  } ifelse
+  xcurr yprev trpoint lineto
+  lastpair
+  { xcurr yleft trpoint yextra sub lineto 
+  }
+  { xcurr ycurr trpoint lineto
+  } ifelse
+  linewidth setlinewidth stroke
+} def
+
+% stroke a surface x histogram: - surfacexhisto -
+/surfacexhisto
+{ firstpair
+  { xleft yprev trpoint exch xextra sub exch moveto
+  }
+  { xprev yprev trpoint moveto
+  } ifelse
+  xcurr yprev trpoint lineto
+  xcurr ycurr trpoint lineto
+  lastpair
+  { xleft ycurr trpoint exch xextra sub exch lineto 
+  } if
+  linewidth setlinewidth stroke
+} def
+
+% stroke a filled y histogram: - filledyhisto -
+/filledyhisto
+{
+  linewidth setlinewidth
+  xprev yleft trpoint exch currentlinewidth 2 div add exch yextra sub moveto
+  xprev yprev trpoint exch currentlinewidth 2 div add exch lineto
+  xcurr yprev trpoint exch currentlinewidth 2 div sub exch lineto
+  xcurr yleft trpoint exch currentlinewidth 2 div sub exch yextra sub lineto 
+  closepath fill
+} def
+
+% stroke a filled x histogram: - filledxhisto -
+/filledxhisto
+{
+  linewidth setlinewidth
+  xleft yprev trpoint currentlinewidth 2 div add exch xextra sub exch moveto
+  xcurr yprev trpoint currentlinewidth 2 div add lineto
+  xcurr ycurr trpoint currentlinewidth 2 div sub lineto
+  xleft ycurr trpoint currentlinewidth 2 div sub exch xextra sub exch lineto 
+  closepath fill
+} def
+
+
+% cross: show a small cross
+/cross
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg symbolsize neg rmoveto
+  symbolsize 2 mul symbolsize 2 mul rlineto
+  0 symbolsize -2 mul rmoveto
+  symbolsize -2 mul symbolsize 2 mul rlineto
+  [] 0 setdash stroke
+} def
+
+% plus: show a small plus
+/plus
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg 0 rmoveto
+  symbolsize 2 mul 0 rlineto
+  symbolsize neg symbolsize neg rmoveto
+  0 symbolsize 2 mul rlineto
+  [] 0 setdash stroke
+} def
+
+% square: show a small square
+/square
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg symbolsize neg rmoveto
+  symbolsize 2 mul 0 rlineto
+  0 symbolsize 2 mul rlineto
+  symbolsize -2 mul 0 rlineto
+  closepath [] 0 setdash stroke
+} def
+
+% filledsquare: show a small filled square
+/filledsquare
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg symbolsize neg rmoveto
+  symbolsize 2 mul 0 rlineto
+  0 symbolsize 2 mul rlineto
+  symbolsize -2 mul 0 rlineto
+  closepath gsave [] 0 setdash stroke grestore fill
+} def
+
+% diamond: show a small diamond
+/diamond
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg 0 rmoveto
+  symbolsize symbolsize neg rlineto
+  symbolsize symbolsize rlineto
+  symbolsize neg symbolsize rlineto
+  closepath [] 0 setdash stroke
+} def
+
+% filleddiamond: show a small filled diamond
+/filleddiamond
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg 0 rmoveto
+  symbolsize symbolsize neg rlineto
+  symbolsize symbolsize rlineto
+  symbolsize neg symbolsize rlineto
+  closepath gsave [] 0 setdash stroke grestore fill
+} def
+
+% circle: show a small circle
+/circle
+{ newpath
+  xcurr ycurr trpoint symbolsize 0 360 arc [] 0 setdash stroke
+} def
+
+% filledcircle: show a small filled circle
+/filledcircle
+{ newpath
+  xcurr ycurr trpoint symbolsize 0 360 arc gsave [] 0 setdash stroke grestore fill
+} def
+
+% triangle: show a small triangle
+/triangle
+{ newpath
+  xcurr ycurr trpoint moveto
+  0 symbolsize 1.5 mul rmoveto
+  symbolsize neg symbolsize -2.5 mul rlineto
+  symbolsize 2 mul 0 rlineto
+  closepath [] 0 setdash stroke
+} def
+
+% filledtriangle: show a small filled triangle
+/filledtriangle
+{ newpath
+  xcurr ycurr trpoint moveto
+  0 symbolsize 1.5 mul rmoveto
+  symbolsize neg symbolsize -2.5 mul rlineto
+  symbolsize 2 mul 0 rlineto
+  closepath gsave [] 0 setdash stroke grestore fill
+} def
+
+
+%plog: like log only with a base, and protected from failing if <= 0
+% base x plog res
+/plog { dup 0 le { pop pop 0 } { ln exch ln div } ifelse } def
+
+% xtr: transform one x value logarithmically if xlog > 1
+% <num> xtr <num>
+/xtr
+{ xlog 1 gt
+  { xlog exch plog
+  } if
+} def
+
+% ytr: transform one y value logarithmically if ylog > 1
+% <num> ytr <num>
+/ytr
+{ ylog 1 gt
+  { ylog exch plog
+  } if
+} def
+
+% % trpoint: transform (x, y) in graph space into (x', y') in print space
+% % x y trpoint x' y'
+% /trpoint
+% { exch xtr trxmin sub trxmax trxmin sub div xwidth mul xextra add
+%   exch ytr trymin sub trymax trymin sub div ywidth mul yextra add
+% } def
+
+
+% trpoint: transform (x, y) in graph space into (x', y') in print space
+% x y trpoint x' y'
+/trpoint
+{ exch xtr xdecr { trxmax exch sub } { trxmin sub } ifelse
+  trxmax trxmin sub div xwidth mul xextra add
+
+  exch ytr ydecr { trymax exch sub } { trymin sub } ifelse
+  trymax trymin sub div ywidth mul yextra add
+} def
+
+
+% yonly: interpolate x values 1, 2, ... into data
+% [ data ] yonly [ newdata ]
+/yonly
+{ dup /tmp exch def
+  length [ exch 1 exch 1 exch
+  { dup tmp exch 1 sub get
+  } for
+  ]
+} def
+
+% xonly: interpolate y values 1, 2, ... into data
+% [ data ] yonly [ newdata ]
+/xonly
+{ dup /tmp exch def
+  length [ exch 1 exch 1 exch
+  { dup tmp exch 1 sub get exch
+  } for
+  ]
+} def
+
+% xandy: no interpolation of x or y values
+% [ data ] xandy [ data ]
+/xandy {} def
+
+
+% expstringwidth: calculate width of string containing optional exponent
+% <string> expstringwidth <width>
+/expstringwidth
+{ (^) search
+  { exch pop stringwidth pop exch stringwidth pop 0.7 mul add }
+  { stringwidth pop }
+  ifelse
+} def
+
+% expstringshow: show string containing optional exponent
+% <string> expstringshow -
+/expstringshow
+{ (^) search
+  { exch pop show 0 0.5 ft rmoveto
+    gsave currentfont 0.7 scalefont setfont show grestore
+  }
+  { show
+  }
+  ifelse
+} def
+
+% concatenate two strings: <string> <string> strconcat <string>
+/strconcat
+{ 2 copy length exch length add string
+  dup 0 4 index putinterval
+  dup 3 index length 3 index putinterval
+  3 1 roll pop pop
+} def
+
+% lgen: generate one label automatically
+% num lgen num string
+/lgen { dup 20 string cvs } def
+
+% loglgen: generate one logarithmic label (with exponent)
+% <base> <exponent> loglgen <string>
+/loglgen
+{ 20 string cvs exch 20 string cvs
+  (^) strconcat exch strconcat
+} def
+
+
+% printxtick: print one x tick
+% xpos printxtick -
+/printxtick
+{ newpath
+  yleft trpoint moveto 0 yextra neg rmoveto
+  0 xticklength neg rlineto [] 0 setdash stroke
+} def
+
+% printxlabel: print one x label
+% (xlabel) xpos printxlabel -
+/printxlabel
+{ yleft trpoint moveto 0 yextra neg rmoveto
+  0 xticklength neg rmoveto 0 0.9 ft neg rmoveto
+  xlog 1 gt { 0 0.3 ft neg rmoveto } if
+  dup expstringwidth -2 div 0 rmoveto expstringshow
+} def
+
+% printytick: print one y tick
+% ypos printytick -
+/printytick
+{ newpath
+  xleft exch trpoint moveto xextra neg 0 rmoveto
+  yticklength neg 0 rlineto [] 0 setdash stroke
+} def
+
+% printylabel: print one y label
+% (ylabel) ypos printylabel -
+/printylabel
+{ xleft exch trpoint moveto xextra neg 0 rmoveto
+  yticklength neg 0 rmoveto -0.3 ft -0.3 ft rmoveto
+  dup expstringwidth neg 0 rmoveto expstringshow
+} def
+
+% printrtick: print one r tick
+% ypos printrtick -
+/printrtick
+{ newpath
+  xright exch trpoint moveto xextra 0 rmoveto
+  rticklength 0 rlineto [] 0 setdash stroke
+} def
+
+% printrlabel: print one r label
+% (rlabel) ypos printrlabel -
+/printrlabel
+{ xright exch trpoint moveto xextra 0 rmoveto
+  rticklength 0 rmoveto  0.3 ft -0.3 ft rmoveto
+  expstringshow
+} def
+
+% printticks: print ticks and labels
+% /tickproc /labelproc [ tickandlabeldata ] min printticks -
+/printticks
+{ /prev exch def
+  { dup type dup dup /integertype eq exch /realtype eq or
+    { pop dup /prev exch def 2 index cvx exec
+    }
+    { /stringtype eq
+      { prev 2 index cvx exec
+      }
+      { pop
+      } ifelse
+    } ifelse
+  } forall
+  pop pop
+} def
+
+
+% printxaxistick: print one x axis tick
+% xpos printxaxistick -
+/printxaxistick
+{ newpath
+  yaxis trpoint moveto 0 xticklength -2 div rmoveto
+  0 xticklength rlineto [] 0 setdash stroke
+} def
+
+% printxaxislabel: print one x axis label
+% (xlabel) xpos printxaxislabel -
+/printxaxislabel
+{ yaxis trpoint moveto
+  0 xticklength -2 div rmoveto 0 0.9 ft neg rmoveto
+  xlog 1 gt { 0 0.3 ft neg rmoveto } if
+  dup expstringwidth -2 div 0 rmoveto expstringshow
+} def
+
+% printyaxistick: print one y axis tick
+% ypos printyaxistick -
+/printyaxistick
+{ newpath
+  xaxis exch trpoint moveto
+  yticklength -2 div 0 rmoveto
+  yticklength 0 rlineto [] 0 setdash stroke
+} def
+
+% printyaxislabel: print one y axis label
+% (ylabel) ypos printyaxislabel -
+/printyaxislabel
+{ xaxis exch trpoint moveto
+  yticklength -2 div 0 rmoveto -0.3 ft -0.3 ft rmoveto
+  dup expstringwidth neg 0 rmoveto expstringshow
+} def
+
+
+% <val> minmax -
+% perform minv := min(minv, val); maxv := max(maxv, val)
+% allowing for the possibility of minv, maxv, val being false (undefined)
+/minmax
+{ dup false eq
+  { pop }
+  { minv false eq
+    { dup /minv exch def /maxv exch def }
+    { dup minv lt
+      { /minv exch def }
+      { dup maxv gt
+	{ /maxv exch def }
+	{ pop }
+	ifelse
+      } ifelse
+    } ifelse
+  } ifelse
+} def
+
+% <ticks> ticksundef <ticks> <bool>
+% returns true iff the ticks array is undefined (one false entry)
+/ticksundef
+{ dup length 1 eq
+  { dup 0 get false eq
+  }
+  { false }
+  ifelse
+} def
+
+% <number> integral <boolean>
+% true if the number has an integral value
+/integral { dup round eq } def
+
+% ticksep ticks xory alldata minval maxval axis base ticksandlimits ticks min max base
+% ticksandlimits: sort out value of x or y ticks and limits and log base
+/ticksandlimits
+{ /base exch def
+  /minv false def
+  /maxv false def
+
+  % min and max of user-supplied minval, maxval, and axis
+  minmax minmax minmax
+
+  % min and max of data points
+  { 0 get dup dup length 1 sub 3 index exch 2 exch
+    { get minmax dup
+    } for pop pop
+  } forall
+  pop dup
+
+  % min and max of tick values
+  { dup type /stringtype eq
+    { pop } { minmax } ifelse
+  } forall
+
+  % fix minv and maxv if undefined (false) or equal
+  minv false eq
+  { /minv -1 def /maxv 1 def }
+  { minv maxv eq
+    { minv 0 lt
+      { /minv 2 minv mul def /maxv 0 def
+      }
+      { minv 0 eq
+	{ /minv -1 def /maxv 1 def
+	}
+	{ /minv 0 def /maxv 2 maxv mul def
+	} ifelse
+      } ifelse
+    } if
+  } ifelse
+
+  % invent ticks if undefined
+  ticksundef
+  { pop /ticksep exch def
+
+    % if base is reasonable and minv is positive, logarithmic ticks
+    base 1 gt minv 0 gt and
+    {
+      % get integral log of minv and maxv
+      /logminv base minv plog floor   cvi def
+      /logmaxv base maxv plog ceiling cvi def
+
+      % if minv close to base, make it 1; reset minv and maxv
+      logminv 1 eq logmaxv 4 ge and { /logminv 0 def } if
+      /minv base logminv exp def
+      /maxv base logmaxv exp def
+
+      % ticks := [ base**logminv, ... , base**logmaxv ]
+      [ logminv 1 logmaxv
+	{ dup base exch exp
+	  exch base exch loglgen
+	} for
+      ]
+    }
+    { % non-logarithmic ticks
+      {
+        % fix tick separation if undefined (0) or too small
+	/base 0 def
+        /delta maxv minv sub def
+        ticksep delta 30 div le
+        { /ticksep 10 delta log 1 sub ceiling exp def
+	  ticksep delta 2 div ge
+	  { /ticksep ticksep 2 div def }
+	  { ticksep delta 5 div lt
+	    { /ticksep 2 ticksep mul def
+	    } if
+	  } ifelse
+        } if
+
+        % adjust minv and maxv to be multiples of ticksep
+        /minv minv ticksep div floor   ticksep mul def
+        /maxv maxv ticksep div ceiling ticksep mul def
+        /delta maxv minv sub def
+
+        % if minv or maxv near zero, move to zero and redo
+        minv ticksep eq
+        { /minv 0 def }
+        { maxv ticksep neg eq { /maxv 0 def } { exit } ifelse
+        } ifelse
+      } loop
+
+      % if minv, maxv, and ticksep are all integral, set "makeint" to true
+      /makeint minv integral maxv integral ticksep integral and and def
+
+      % ticks := [ minv, minv+ticksep, ... , maxv ]
+      [ 0 1 delta ticksep div round
+	{ ticksep mul minv add makeint { cvi } if lgen }
+	for
+      ]
+    } ifelse
+  }
+  { exch pop
+  } ifelse
+  minv maxv base
+} def
+
+% xset: set up all data for x axis, including limits and ticks
+% xticksep xticks 0 alldata xmin xmax xlog xextra xdecr xaxis xticklength xset -
+/xset
+{ /xticklength exch def
+  /xaxis exch def
+  /xdecr exch def
+  /xextra exch def
+  xaxis exch ticksandlimits
+  /xlog exch def /xmax exch def /xmin exch def /xticks exch def
+  /xleft xdecr { xmax } { xmin } ifelse def
+  /xright xdecr { xmin } { xmax } ifelse def
+  /xwidth xsize xextra 2 mul sub def
+  /trxmin xmin xtr def /trxmax xmax xtr def
+} def
+
+% yset: set up all data for y axis, including limits and yticks
+% yticksep yticks 0 alldata ymin ymax ylog yextra ydecr yaxis yticklength yset -
+/yset
+{ /yticklength exch def
+  /yaxis exch def
+  /ydecr exch def
+  /yextra exch def
+  yaxis exch ticksandlimits
+  /ylog exch def /ymax exch def /ymin exch def /yticks exch def
+  /yleft ydecr { ymax } { ymin } ifelse def
+  /yright ydecr { ymin } { ymax } ifelse def
+  /ywidth ysize yextra 2 mul sub def
+  /trymin ymin ytr def /trymax ymax ytr def
+} def
+
+% rset: set up all data for y axis (again), but including limits and rticks
+% rticksep rticks 0 alldata ymin ymax ylog yextra ydecr yaxis rticklength rset -
+/rset
+{ /rticklength exch def
+  /yaxis exch def
+  /ydecr exch def
+  /yextra exch def
+  yaxis exch ticksandlimits
+  /ylog exch def /ymax exch def /ymin exch def /rticks exch def
+  /yleft ydecr { ymax } { ymin } ifelse def
+  /yright ydecr { ymin } { ymax } ifelse def
+  /ywidth ysize yextra 2 mul sub def
+  /trymin ymin ytr def /trymax ymax ytr def
+} def
+
+% norset: set up data for no rticks
+% - norset -
+/norset
+{ /rticklength 0 def
+  /rticks [] def
+} def
+
+% framestyle: print a frame around the graph
+/framestyle
+{ 0 0 moveto xsize 0 lineto xsize ysize lineto
+  0 ysize lineto closepath stroke
+  /printxtick /printxlabel xticks xleft printticks
+  /printytick /printylabel yticks ymin printticks
+  /printrtick /printrlabel rticks ymin printticks
+} def
+
+% nonestyle: print nothing around the graph
+/nonestyle
+{
+} def
+
+% axesstyle: print axes for the graph (unless axis values missing)
+/axesstyle
+{
+  xaxis false eq yaxis false eq or
+  { framestyle }
+  { xaxis yaxis trpoint dup 0 exch moveto xsize exch lineto
+    dup 0 moveto ysize lineto stroke
+    /printxaxistick /printxaxislabel xticks xleft printticks
+    /printyaxistick /printyaxislabel yticks ymin printticks
+  } ifelse
+} def
+
+% rundata: run all data sets
+/rundata
+{ alldata
+  { gsave
+    dup dup dup dup
+    4 get /dopaint exch def
+    3 get /initrun exch def
+    2 get /pairs exch def
+    1 get /points exch def
+    0 get /data exch def
+    dopaint
+    { data length 4 ge
+      { initrun
+	newpath
+	data 0 get ymin trpoint yextra sub moveto
+	0 2 data length 2 sub
+	{ dup 1 add
+	  data exch get /ycurr exch def
+	  data exch get /xcurr exch def
+	  xcurr ycurr trpoint lineto
+	} for
+	data dup length 2 sub get ymin trpoint yextra sub lineto
+	closepath fill
+      } if
+    } if
+    initrun
+    data length 2 ge
+    {
+      /xcurr data 0 get def
+      /ycurr data 1 get def
+      points
+      data length 4 ge
+      { 2 2 data length 2 sub
+	{ /xprev xcurr def
+          /yprev ycurr def
+	  dup dup 2 eq /firstpair exch def
+	  data length 2 sub eq /lastpair exch def
+	  dup 1 add
+          data exch get /ycurr exch def
+          data exch get /xcurr exch def
+	  pairs
+	  points
+	} for
+      } if
+    } if
+    grestore
+  } forall
+} def
+
+end
+%%EndResource
+
+%%BeginResource: procset LoutBasicSetup
+% @PrependGraphic file /usr/staff/jeff/lout.lib/include/bsf.lpg
+
+% width height linethickness louteuro -
+% draw a Euro symbol of this width and height with this line thickness
+% Author: Jeff Kingston, based on code from Andrew Beardsley
+/louteuro {
+  20 dict begin
+    /eurothick exch def
+    /euroheight exch def
+    /eurowidth exch def
+    /eurostrokewidth euroheight 0.8 mul def
+    /eurostep eurothick 60 cos mul 60 sin div def
+    /eurotheta 40 def
+
+    % llx lly width thickness louteurobox -
+    % draw angled box starting at (llx, lly) with given width and thickness
+    /louteurobox
+    {
+      /euroboxthick exch def
+      /euroboxwidth exch def
+      newpath moveto euroboxwidth 0 rlineto
+      eurostep euroboxthick rlineto
+      euroboxwidth neg 0 rlineto closepath fill
+    } def
+
+    % lower cross stroke
+    0 euroheight 2 div eurothick 1.5 mul sub
+    eurostrokewidth eurothick louteurobox
+
+    % upper cross stroke
+    0 euroheight 2 div eurothick 0.5 mul add
+    eurostrokewidth eurostep 2 mul add eurothick louteurobox
+
+    % circular part
+    /eurohctr eurowidth euroheight 2 div eurotheta cos mul sub def
+    /eurovctr euroheight 2 div def
+    newpath
+    eurohctr eurovctr eurovctr eurotheta 350 eurotheta sub arc
+    eurohctr eurovctr eurovctr eurothick sub 365 eurotheta sub eurotheta arcn
+    closepath fill
+  end
+} def
+
+% path for @FullWidthRule symbol
+/LoutRule
+{ 0 0 moveto xsize 0 lineto
+} def
+
+% path for @Box symbol
+/LoutBox
+{ 0 0 moveto xsize 0 lineto
+  xsize ysize lineto 0 ysize lineto
+  closepath
+} def
+
+% path for @CurveBox symbol
+/LoutCurveBox
+{ xmark 0 moveto
+  xsize xmark sub xmark xmark 270 360 arc
+  xsize xmark sub ysize xmark sub xmark 0 90 arc
+  xmark ysize xmark sub xmark 90 180 arc
+  xmark xmark xmark 180 270 arc
+  closepath
+} def
+
+% path for @ShadowBox symbol
+/LoutShadowBox
+{ xmark 2 mul 0 moveto xsize 0 lineto
+  xsize ysize xmark 2 mul sub lineto
+  xsize xmark sub ysize xmark 2 mul sub lineto
+  xsize xmark sub xmark lineto
+  xmark 2 mul xmark lineto
+  closepath
+} def
+
+% set up dictionary containing margin note data: parity LoutMargSet -
+/LoutMargSet
+{ /LoutMargDict 12 dict def
+  LoutMargDict begin
+    /parity exch def
+    /matr matrix currentmatrix def
+    /rightx xsize def
+    /lefty ysize def   % highest allowable point for top of next left note
+    /righty ysize def  % highest allowable point for top of next right note
+    /max { 2 copy gt { pop } { exch pop } ifelse } def
+    /min { 2 copy lt { pop } { exch pop } ifelse } def
+  end
+} def
+
+%translate coordinate system for marginal notes:  type LoutMargShift -
+% where type 0 is left margin, 1 is right margin, 2 is outer, 3 is inner
+/LoutMargShift
+{ LoutMargDict begin
+
+    % y coordinate of top of note, in margin coords, before vertical adjust
+    0 ysize transform matr itransform exch pop
+
+    % decide whether left or right margin based on type and parity
+    exch [ 0 1 parity 1 parity sub ] exch get 0 eq
+    {
+      % left margin: adjust top of note downwards if overlaps previous note
+      lefty min
+
+      % bottom of note is new lefty position and also translate position
+      ysize sub dup /lefty exch def
+
+      % want right edge of note at coordinate zero
+      xsize neg exch
+    }
+    {
+      % right margin: adjust top of note downwards if overlaps previous note
+      righty min
+
+      % bottom of note is new righty position and also translate position
+      ysize sub dup /righty exch def
+
+      % want left edge of note at coordinate rightx
+      rightx exch
+    } ifelse
+
+    % stack now contains coord of bottom left corner in margin coordinates
+    matr setmatrix translate
+  end
+} def
+
+% create LoutPageDict with left, right, foot, top for @Place symbol users
+/LoutPageSet
+{
+  /LoutPageDict 5 dict def
+  LoutPageDict begin
+    /matr matrix currentmatrix def
+    /left 0 def
+    /right xsize def
+    /foot 0 def
+    /top ysize def
+  end
+
+} def
+
+%%EndResource
+
+%%EndProlog
+
+%%BeginSetup
+%%IncludeResource: font Times-Roman
+/Times-Romanfnt82 vec2 /Times-Roman LoutRecode
+/fnt82 { /Times-Romanfnt82 LoutFont } def
+%%IncludeResource: font Helvetica
+/Helveticafnt35 vec2 /Helvetica LoutRecode
+/fnt35 { /Helveticafnt35 LoutFont } def
+%%IncludeResource: font Helvetica-Oblique
+/Helvetica-Obliquefnt36 vec2 /Helvetica-Oblique LoutRecode
+/fnt36 { /Helvetica-Obliquefnt36 LoutFont } def
+%%EndSetup
+
+%%Page: 1 1
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+%%+ font Helvetica-Oblique
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 9002(1)s 600 fnt35 691 11623(A)m
+1250(Pr)s 6(actical)k 3667(Introduction)s 6922(to)s 7566(the)s
+3956 10183(Lout)m 616 8743(Document)m 3500(F)s 18(or)k -15(matting)k
+6490(System)s 400 fnt35 2882 6881(Jeffre)m 8(y)k 4180(H.)s
+4656(Kingston)s 400 fnt36 1395 5779(Basser)m 2794(Dept.)s 3834(of)s
+4333(Computer)s 6242(Science)s 2251 5299(The)m 3058(Univ)s 10(ersity)k
+4951(of)s 5450(Sydne)s 8(y)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 2 2
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8990(2)s 400 fnt84 2988 11377(A)m
+3363(simple)s 4565(input)s 5575(\207le)s 360 fnt35 800 9646(@SysInclude { doc })m
+800 9166(@Doc @T)m 43(e)k 10(xt @Begin)k 800 8686(Hello)m 14(, w)k 3(or)k -5(ld)k
+800 8206(@End @T)m 43(e)k 10(xt)k 400 fnt84 0 6379(Ho)m 4(w)k
+889(to)s 1313(f)s 10(ormat)k 2579(it)s 360 fnt35
+800 5633(lout \207lename > out.ps)m 800 5153(ghostvie)m 7(w out.ps)k 800 4673(mpr out.ps)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 3 3
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8997(3)s gsave
+0 667 translate
+400 fnt82 8640 10080 1440 8457 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+1440 8367(Hello,)m 2505(w)s 4(orld)k
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 4 4
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8990(4)s 400 fnt84 2339 11377(Headings)m
+4026(and)s 4762(paragraphs)s 360 fnt35 800 9646(@SysInclude { doc })m 800 9166(@Doc @T)m 43(e)k 10(xt @Begin)k
+800 8686(@Heading { Introduction })m 800 8206(@PP)m 800 7726(The design of the Lout f)m 10(or)k -9(matting)k
+800 7246(system w)m 5(as under)k -14(tak)k 7(en with the)k 800 6766(needs of the @I { ordinar)m -10(y user })k
+800 6286(v)m 9(er)k -10(y m)k 3(uch in mind.)k 800 5806(@End @T)m 43(e)k 10(xt)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 5 5
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12478(lout)m 8995(5)s gsave
+0 666 translate
+400 fnt82 8640 10080 1440 8456 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+400 fnt84 1440 8364(Intr)m 7(oduction)k
+400 fnt82 2240 7742(The)m 2953(design)s 4090(of)s 4543(the)s
+5123(Lout)s 1440 7262(formatting)m 3215(system)s 4423(w)s 4(as)k
+5123(undertak)s 4(en)k 1440 6782(with)m 2245(the)s 2825(needs)s
+3818(of)s 4271(the)s 400 fnt83 4851 6784(or)m 14(dinary)k
+6328(user)s 400 fnt82 1440 6302(v)m 6(ery)k 2234(much)s
+3217(in)s 3622(mind.)s 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 6 6
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8991(6)s 400 fnt84 3817 11376(Displays)m
+360 fnt35 800 9652(Y)m 50(ou cer)k -14(tainly don't w)k 5(ant to retur)k -9(n to)k
+800 9172(his of\207ce and repor)m -14(t:)k 800 8692(@IndentedDispla)m 10(y @I {)k 800 8212(`I can't \207nd an ef\207cient algor)m -5(ithm, I)k
+800 7732(guess I'm just too dumb)m 14(.)k 36(')k 800 7252(})m 800 6772(T)m 43(o a)k 7(v)k 9(oid ser)k -5(ious damage to y)k 7(our)k
+800 6292(position in the compan)m 5(y)k 36(, it w)k 3(ould)k 800 5812(be better if ...)m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 7 7
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8994(7)s gsave
+0 668 translate
+400 fnt82 8640 10080 1440 8457 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+1440 8367(Y)m 44(ou)k
+2173(certainly)s 3657(don')s 7(t)k 4591(w)s 4(ant)k
+5460(to)s 5856(return)s 6901(to)s 1440 7887(his)m 1990(of\207ce)s
+2991(and)s 3665(report:)s 400 fnt83 2240 7048(`I)m 2626(can')s 12(t)k
+3542(\207nd)s 4252(an)s 4742(ef\207cient)s 2240 6568(algorithm,)m 3970(I)s
+4223(guess)s 5201(I'm)s 5848(just)s 6532(too)s 2240 6088(dumb)m 16(.)k 56(')k
+400 fnt82 1440 5330(T)m 32(o)k 1940(a)s 8(v)k 8(oid)k
+2909(serious)s 4124(damage)s 5458(to)s 5857(your)s 1440 4850(position)m
+2822(in)s 3227(the)s 3807(compan)s 6(y)k 26(,)k
+5418(it)s 5740(w)s 4(ould)k 6831(be)s 1440 4370(better)m
+2449(if)s 2813(\202)s 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 8 8
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8994(8)s 400 fnt84 2299 11376(P)m 4(aragraph)k
+4229(br)s 7(eaking)k 5847(styles)s 360 fnt35 800 9652(Y)m 50(ou cer)k -14(tainly don't w)k 5(ant to retur)k -9(n to)k
+800 9172(his of\207ce and repor)m -14(t:)k 800 8692(@ID { r)m 3(agged noh)k 10(yphen } @Break @I {)k
+800 8212(`I can't \207nd an ef\207cient algor)m -5(ithm, I)k 800 7732(guess I'm just too dumb)m 14(.)k 36(')k
+800 7252(})m 800 6772(T)m 43(o a)k 7(v)k 9(oid ser)k -5(ious damage to y)k 7(our)k
+800 6292(position in the compan)m 5(y)k 36(, it w)k 3(ould)k 800 5812(be better if ...)m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 9 9
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8992(9)s gsave
+0 666 translate
+400 fnt82 8640 10080 1440 8457 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+1440 8367(Y)m 44(ou)k
+2173(certainly)s 3657(don')s 7(t)k 4591(w)s 4(ant)k
+5460(to)s 5856(return)s 6901(to)s 1440 7887(his)m 1990(of\207ce)s
+2991(and)s 3665(report:)s 400 fnt83 2240 7048(`I)m 2626(can')s 12(t)k
+3542(\207nd)s 4252(an)s 4742(ef\207cient)s 2240 6568(algorithm,)m 3970(I)s
+4223(guess)s 5201(I'm)s 5848(just)s 6532(too)s 2240 6088(dumb)m 16(.)k 56(')k
+400 fnt82 1440 5330(T)m 32(o)k 1940(a)s 8(v)k 8(oid)k
+2909(serious)s 4124(damage)s 5458(to)s 5857(your)s 1440 4850(position)m
+2822(in)s 3227(the)s 3807(compan)s 6(y)k 26(,)k
+5418(it)s 5740(w)s 4(ould)k 6831(be)s 1440 4370(better)m
+2449(if)s 2813(\202)s 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 10 10
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8909(10)s 400 fnt84 4128 11376(Lists)m
+360 fnt35 800 9722(@Heading { Oper)m 3(ating Instr)k -5(uctions })k 800 9242(@NumberedList)m
+800 8762(@ListItem { Press small g)m 3(reen le)k 10(v)k 9(er)k 18(.)k 21( })k
+800 8282(@ListItem { )m 14(W)k 14(ait appro)k 10(ximately 10 seconds)k 800 7802(until red light \210ashes)m 5(.)k 21( })k
+800 7322(@ListItem { If smok)m 7(e emerges from rear of unit,)k 800 6842(call Ser)m -10(vice Depar)k -14(tment.)k 21( })k
+800 6362(@EndList)m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 11 11
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8922(11)s gsave
+0 668 translate
+400 fnt82 8640 10080 1440 8456 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+400 fnt84 1440 8364(Operating)m
+3287(Instructions)s 400 fnt82 1440 7529(1.)m 2240(Press)s 3166(small)s
+4123(green)s 5104(le)s 10(v)k 6(er)k 22(.)k
+1440 6689(2.)m 2240(W)s 32(ait)k 3077(approximately)s 5468(10)s
+5952(seconds)s 2240 6209(until)m 3065(red)s 3672(light)s 4505(\210ashes.)s
+1440 5369(3.)m 2240(If)s 2626(smok)s 4(e)k 3757(emer)s 7(ges)k
+5164(from)s 6040(rear)s 6760(of)s 2240 4889(unit,)m 3040(call)s
+3708(Service)s 4997(Department.)s 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 12 12
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8910(12)s 400 fnt84 3062 11377(T)m 36(echnical)k
+4780(r)s 7(eports)k 360 fnt35 800 9646(@SysInclude { repor)m -14(t })k
+800 9166(@Repor)m -14(t)k 800 8686(    @Title { ...)m 21( })k 800 8206(    @A)m 10(uthor { ...)k 21( })k
+800 7726(    @Institution { ...)m 21( })k 800 7246(    @DateLine { ...)m 21( })k 800 6766(//)m
+800 6286(@Abstr)m 3(act { ...)k 21( })k 800 5806(@Section { ...)m 21( })k
+800 5326(@Section { ...)m 21( })k 800 4846(@Section { ...)m 21( })k 800 4366(@Appendix { ...)m 21( })k
+800 3886(@Appendix { ...)m 21( })k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 13 13
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8917(13)s 400 fnt84 3840 11376(Sections)m
+360 fnt35 800 9720(@Section)m 800 9240(    @T)m 43(ag { dfs })k 800 8760(    @Title { Depth-\207rst search })m
+800 8280(@Begin)m 800 7800(@PP)m 800 7320(W)m 10(e tur)k -9(n no)k 5(w to our \207rst algor)k -5(ithm)k
+800 6840(on gener)m 3(al g)k 3(r)k 3(aphs ...)k 800 6360(@End @Section)m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 14 14
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8910(14)s gsave
+0 668 translate
+400 fnt82 8640 10080 1440 8456 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+400 fnt84 1440 8364(10.6.)m
+2424(Depth-\207rst)s 4386(sear)s 7(ch)k 400 fnt82 2240 7742(W)m 32(e)k
+2854(turn)s 3592(no)s 10(w)k 4359(to)s 4758(our)s
+5391(\207rst)s 1440 7262(algorithm)m 3093(on)s 3587(general)s 4854(graphs)s
+6003(\202)s 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 15 15
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12478(lout)m 8915(15)s 400 fnt84 3142 11375(Cr)m 7(oss)k
+4199(r)s 7(efer)k 7(ences)k 360 fnt35 800 9722(F)m 10(or fur)k -14(ther inf)k 10(or)k -9(mation, consult)k
+800 9242(Section @NumberOf dfs on page)m 800 8762(@P)m 14(ageOf { dfs }.)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 16 16
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8911(16)s gsave
+0 667 translate
+400 fnt82 8640 10080 1440 8457 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+1440 8367(F)m 6(or)k
+2089(further)s 3276(information,)s 5341(consult)s 1440 7887(Section)m 2732(10.6)s
+3520(on)s 4014(page)s 4860(245.)s 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 17 17
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8914(17)s 400 fnt84 3612 11377(Refer)m 7(ences)k
+360 fnt35 800 9723(@Database @Ref)m 10(erence { m)k 5(yrefs })k 800 9243(...)m
+800 8763(F)m 10(or the details)k 5(, consult the User')k 18(s)k 800 8283(Guide @Cite { $kingston1995lout.user }.)m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 18 18
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8914(18)s gsave
+0 667 translate
+400 fnt82 8640 10080 1440 8457 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+1440 8367(F)m 6(or)k
+2089(the)s 2669(details,)s 3889(consult)s 5143(the)s 5723(User')s 22(s)k
+1440 7887(Guide)m 2508([1].)s 1440 7263(\202)m 400 fnt84 1440 6637(Refer)m 7(ences)k
+400 fnt82 1440 5879(1.)m 2240(Jef)s 10(fre)k 6(y)k
+3422(H.)s 3883(Kingston.)s 400 fnt83 5621 5881(A)m 5947(User')s 16(s)k
+2240 5401(Guide)m 3304(to)s 3703(the)s 4279(Lout)s 5119(Document)s
+2240 4921(F)m 42(ormatting)k 4107(System)s 5308(\(V)s 44(er)k 4(sion)k
+2240 4441(3\))m 400 fnt82 2556 4439(.)m 2829(Basser)s 3992(Department)s
+5977(of)s 2240 3959(Computer)m 3938(Science)s 5171(,)s 5349(Uni)s 10(v)k 6(ersity)k
+2240 3479(of)m 2693(Sydne)s 6(y)k 3876(,)s 4054(1995)s
+4830(.)s 1440 2642(2.)m 2240(\202)s 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 19 19
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8912(19)s 400 fnt84 2601 11375(Database)m
+4269(\207le)s 4872(myr)s 7(efs.ld)k 360 fnt35 800 9644({ @Ref)m 10(erence)k
+800 9164(     @T)m 43(ag { kingston1995lout.user })k 800 8684(     @T)m 43(ype { Book })k 800 8204(     @A)m 10(uthor { Jeffre)k 7(y H.)k 21( Kingston })k
+800 7724(     @Title { A User')m 18(s Guide to the Lout)k 800 7244(Document F)m 10(or)k -9(matting System \(V)k 28(ersion 3\) })k
+800 6764(     @Institution { Basser Depar)m -14(tment of)k 800 6284(Computer Science })m 800 5804(     @Address { Univ)m 9(ersity of Sydne)k 7(y)k
+800 5324(2006, A)m 10(ustr)k 3(alia })k 800 4844(     @Y)m 50(ear { 1994 })k
+800 4364(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 20 20
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8909(20)s 400 fnt84 2965 11375(Books)m
+4097(\(and)s 4966(theses\))s 400 fnt82 0 9650(\213)m 800(T)s 14(itle)k
+1632(page,)s 2564(pref)s 4(ace,)k 3912(introduction)s 0 8810(\213)m
+800(Automatic)s 2574(table)s 3442(of)s 3895(contents)s 0 8053(\213)m
+800(Pref)s 4(atory)k 2372(pages)s 3365(numbered)s 5060(in)s
+5465(Roman)s 6713(numerals)s 0 7213(\213)m 800(Chapters,)s 2397(sections,)s
+3861(subsections,)s 5880(appendices)s 0 6374(\213)m 800(References)s 2656(at)s
+3044(end)s 3718(of)s 4171(chapters)s 5585(or)s 6018(book)s
+0 5535(\213)m 800(Running)s 2265(page)s 3111(headers)s 0 4695(\213)m
+800(Odd-e)s 10(v)k 6(en)k 2453(page)s 3299(formats)s
+0 3855(\213)m 800(Sorted)s 1940(inde)s 6(x)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 21 21
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8922(21)s 400 fnt84 2631 11377(Making)m
+4057(a)s 4353(sorted)s 5509(index)s 360 fnt35 800 9646(@PP)m
+800 9166(There are se)m 10(v)k 9(er)k 3(al possib)k 7(le w)k 5(a)k 10(ys to implement the)k
+800 8686(@I P)m 14(ar)k -14(tition procedure)k 5(,)k 800 8206(par)m -14(tition @Inde)k 10(x { @I P)k 14(ar)k -14(tition \(in {@I Quic)k 7(ksor)k -14(t}\) })k
+800 7726(b)m 7(ut the f)k 10(ollo)k 5(wing seems to be the best.)k 21(  Star)k -14(ting ...)k
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 22 22
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8910(22)s gsave
+0 668 translate
+400 fnt82 8640 10080 1440 8462 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+400 fnt84 1440 8370(Index)m
+400 fnt82 1440 7795(\202)m 1440 7315(partial)m 2552(order)s 16(,)k
+3557(227)s 400 fnt83 1440 6837(P)m 32(artition)k 400 fnt82
+2941 6835(\(in)m 400 fnt83 3479 6837(Quic)m 8(ksort)k 400 fnt82
+5052 6835(\),)m 5363(189)s 1440 6355(postorder)m 3049(tra)s 8(v)k 6(ersal)k
+1840 5875(of)m 2293(binary)s 3404(tree,)s 4180(19)s 1840 5395(topological)m
+3730(ordering,)s 5262(229)s 1440 4915(\202)m 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 23 23
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8917(23)s 400 fnt84 2785 11376(Equation)m
+4455(f)s 10(ormatting)k 360 fnt35 800 9645(@SysInclude { eq })m 800 9165(...)m
+800 8685(Since @Eq { )m 18(T\(n-i\) = )k 18(T\(0\) = 0 } w)k 3(e ha)k 7(v)k 9(e)k
+800 8205(@IndentedDispla)m 10(y @Eq {)k 800 7725(T\(n\) = big sum from i=0 to n-1 2 sup i = 2 sup n - 1)m 800 7245(})m 800 6765(f)m 10(or the n)k 3(umber of disk mo)k 5(v)k 9(es made b)k 7(y the )k 18(T)k 43(o)k 5(w)k 3(ers)k
+800 6285(of Hanoi algor)m -5(ithm, giv)k 9(en @Eq { n } disks)k 5(.)k 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 24 24
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8910(24)s gsave
+0 668 translate
+400 fnt82 8640 10080 1440 8457 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+1440 8367(Since)m 400 fnt83
+2419 8369(T)m 400 fnt78 2691 8357(\()m 400 fnt83 2831 8369(n)m
+400 fnt78 3141 8357(-)m 400 fnt83 3475 8369(i)m 400 fnt78
+3601 8357(\))m 3852(=)s 400 fnt83 4207 8369(T)m 400 fnt78
+4479 8357(\()m 4619(0)s 4828(\))s 5079(=)s 5434(0)s
+400 fnt82 5723 8367(we)m 6280(ha)s 8(v)k 6(e)k
+400 fnt83 2240 7204(T)m 400 fnt78 2512 7192(\()m 400 fnt83
+2652 7204(n)m 400 fnt78 2862 7192(\))m 3113(=)s 280 fnt83
+3468 7622(n)m 280 fnt78 3640 7613(-)m 3829(1)s 520 fnt78
+3522 7162(\345)m 280 fnt83 3483 6864(i)m 280 fnt78 3599 6855(=)m
+3791(0)s 280 fnt83 4149 7367(i)m 400 fnt78 3959 7192(2)m
+4363(=)s 280 fnt83 4908 7400(n)m 400 fnt78 4718 7192(2)m
+5161(-)s 5495(1)s 400 fnt82 1440 6098(for)m 2006(the)s
+2586(number)s 3907(of)s 4360(disk)s 5128(mo)s 6(v)k 6(es)k
+6243(made)s 1440 5618(by)m 1930(the)s 2510(T)s 32(o)k 10(wers)k
+3749(of)s 4202(Hanoi)s 5268(algorithm,)s 1440 5138(gi)m 10(v)k 6(en)k
+400 fnt83 2406 5140(n)m 400 fnt82 2696 5138(disks.)m 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 25 25
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12478(lout)m 8915(25)s 400 fnt84 3035 11375(Another)m
+4550(equation)s 360 fnt35 800 9644(@CenteredDispla)m 10(y @Eq {)k 800 9164(big int supp 1 on 0 )m 21(`)k
+800 8684(dx o)m 5(v)k 9(er sqr)k -14(t { 1 - x sup 2 })k 800 8204(= pi o)m 5(v)k 9(er 2)k
+800 7724(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 26 26
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Symbol
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8911(26)s gsave
+0 667 translate
+400 fnt82 8640 10080 1440 8640 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+676 fnt78 3159 7423(\362)m
+280 fnt78 3355 7972(1)m 3355 7281(0)m 400 fnt83 3991 7782(dx)m
+1187 0 0 0 400 480 20 3587 7697 LoutGr2
+0 0 moveto xsize 0 lineto 0.05 ft setlinewidth stroke
+grestore
+
+grestore
+gsave
+0 7292 translate
+1.0000 1.2231 scale
+400 fnt78 3587 -100(\326)m 
+grestore
+981 0 0 0 400 480 20 3793 7617 LoutGr2
+0 0 moveto xsize 0 lineto 0.03 ft setlinewidth 2 setlinecap stroke
+grestore
+
+grestore
+400 fnt78 3853 7251(1)m 4129(-)s
+280 fnt78 4641 7365(2)m 400 fnt83 4463 7263(x)m 400 fnt78
+4914 7597(=)m 5269 7784(p)m gsave
+5269 7697 translate
+400 fnt83 212 0 0 0 400 480 20 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto 0.05 ft setlinewidth stroke
+grestore
+
+grestore
+5280 7317(2)m 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 27 27
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8914(27)s 400 fnt84 3991 11383(T)m 36(ables)k
+360 fnt35 800 9729(@SysInclude { tab })m 800 9249(...)m 800 8769(@T)m 43(ab)k
+800 8289(    @Fmta { @Col @I A ! @Col B })m 800 7809({)m 800 7329(@Ro)m 5(w)k 5(a)k
+800 6849(   A { F)m 10(or)k -14(tr)k 3(an })k 800 6369(   B { )m 18(The \207rst ...)k 21( language })k
+800 5889(@Ro)m 5(w)k 5(a)k 800 5409(   A { Algol-60 })m 800 4929(   B { Said to be ...)m 21( successors })k
+800 4449(@Ro)m 5(w)k 5(a)k 800 3969(   A { P)m 14(ascal })k
+800 3489(   B { )m 18(The f)k 10(amous ...)k 21( successors })k 800 3009(})m
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 28 28
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8914(28)s gsave
+0 667 translate
+400 fnt82 8640 10080 1440 8640 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+400 fnt83 1440 8177(F)m 42(ortr)k 6(an)k
+400 fnt82 3178 8175(The)m 3891(\207rst)s 4612(high-le)s 10(v)k 6(el)k
+3178 7695(programming)m 5442(language)s 400 fnt83 1440 6950(Algol-60)m 400 fnt82
+3178 6948(Said)m 3985(to)s 4384(be)s 4853(a)s 5130(better)s
+3178 6468(language)m 4712(than)s 5494(most)s 6371(of)s 6824(its)s
+3178 5988(successors)m 400 fnt83 1440 5327(P)m 32(ascal)k 400 fnt82
+3178 5325(The)m 3891(most)s 4768(f)s 4(amous)k 6024(of)s
+3178 4845(Algol-60')m 22(s)k 4971(successors)s 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 29 29
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8912(29)s 400 fnt84 3357 11375(Another)m
+4872(table)s 360 fnt35 800 10201(@T)m 43(ab)k 800 9721(   hmargin { 0.4c })m
+800 9241(   vmargin { 0.3v })m 800 8761(   side { single })m 800 8281(   @Fmta { @Col @B @CC X @Ov)m 9(er A,B)k 7(,C })k
+800 7801(   @Fmtb { @Col @I A ! @Col B !! @Col C })m 800 7321({)m 800 6361(@Ro)m 5(w)k 5(a  abo)k 5(v)k 9(e { single })k
+800 5881(   X { )m 18(V)k 25(alue of mathematical ...)k 21( dollars\) })k 800 4921(@Ro)m 5(wb  abo)k 5(v)k 9(e { doub)k 7(le })k
+800 4441(   A { Quadr)m 3(atic f)k 10(or)k -9(m)k 3(ula })k
+800 3961(   B { @Eq { x ^= { ...)m 21( } o)k 5(v)k 9(er 2a } })k 800 3481(   C { 3^.5 })m
+800 2521(@Ro)m 5(wb  belo)k 5(w { single })k 800 2041(   A { Binomial theorem })m 800 1561(   B { @Eq { \( a + b \) sup n ^= ...)m 21( b sup n-k } })k
+800 1081(   C { 12^ })m 800 601(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 30 30
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8909(30)s gsave
+0 667 translate
+400 fnt82 8640 10080 1440 8640 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+gsave
+1440 8640 translate
+0.5938 0.5938 scale
+0 144 0 144 400 480 100 0 -144 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+226 0 0 0 400 480 100 0 0 LoutGr2
+0.5 pt ltabhsp
+grestore
+
+grestore
+0 344 0 159 400 480 100 0 -488 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 144 0 0 400 480 100 0 -632 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+8889 0 0 0 400 480 100 226 0 LoutGr2
+0.5 pt ltabhs
+grestore
+
+grestore
+400 fnt84 226 -421(V)m 36(alue)k
+1281(of)s 1736(mathematical)s 4157(f)s 10(ormulae)k 5793(\(millions)s
+7369(of)s 7824(dollars\))s gsave
+9115 0 translate
+400 fnt82 226 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhsp
+grestore
+
+grestore
+gsave
+9341 -144 translate
+400 fnt82 360 144 0 144 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+9341 -488 translate
+400 fnt82 360 344 0 159 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+9341 -632 translate
+400 fnt82 360 144 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+0 -776 translate
+400 fnt82 0 144 0 144 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+0 -632 translate
+400 fnt82 226 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhd
+grestore
+
+grestore
+gsave
+0 -1867 translate
+400 fnt82 0 1091 0 480 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+0 -2011 translate
+400 fnt82 0 144 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+226 -632 translate
+400 fnt82 2985 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhd
+grestore
+
+grestore
+400 fnt83 226 -1475(Quadr)m 6(atic)k
+1955(formula)s gsave
+3211 -632 translate
+400 fnt82 226 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhd
+grestore
+
+grestore
+gsave
+3437 -632 translate
+400 fnt82 226 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhd
+grestore
+
+grestore
+gsave
+3663 -632 translate
+400 fnt82 4255 0 1260 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhd
+grestore
+
+grestore
+4725(x)s 400 fnt78 5063 -1487(=)m 5418 -1207(-)m
+400 fnt83 5652 -1195(b)m 400 fnt78 5962 -1207(\261)m gsave
+0 -1146 translate
+1.0000 1.3937 scale
+6297 -100(\326)m
+
+grestore
+gsave
+6503 -776 translate
+400 fnt83 1415 0 0 0 400 480 20 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto 0.03 ft setlinewidth 2 setlinecap stroke
+grestore
+
+grestore
+280 fnt78 6753 -1028(2)m 400 fnt83 6563 -1195(b)m 400 fnt78
+7006 -1207(-)m 7340(4)s 400 fnt83 7548 -1195(ac)m 2500 0 0 0 400 480 20 5418 -1387 LoutGr2
+0 0 moveto xsize 0 lineto 0.05 ft setlinewidth stroke
+grestore
+
+grestore
+400 fnt78
+6467 -1767(2)m 400 fnt83 6677 -1755(a)m gsave
+7918 -632 translate
+400 fnt82 226 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhd
+grestore
+
+grestore
+gsave
+8144 -776 translate
+400 fnt82 0 144 0 144 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+8144 -632 translate
+400 fnt82 226 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhd
+grestore
+
+grestore
+gsave
+8144 -1867 translate
+400 fnt82 0 1091 0 480 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+8144 -2011 translate
+400 fnt82 0 144 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+8370 -632 translate
+400 fnt82 745 0 390 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhd
+grestore
+
+grestore
+400 fnt82 8587 -1477(3)m
+8760(.5)s 226 0 0 0 400 480 100 9115 -632 LoutGr2
+0.5 pt ltabhd
+grestore
+
+grestore
+360 144 0 144 400 480 100 9341 -776 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+360 1091 0 480 400 480 100 9341 -1867 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+360 144 0 0 400 480 100 9341 -2011 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 144 0 144 400 480 100 0 -2155 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 863 0 449 400 480 100 0 -3018 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+0 144 0 0 400 480 100 0 -3162 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+226 0 0 0 400 480 100 0 -3162 LoutGr2
+0.5 pt ltabhsp
+grestore
+
+grestore
+400 fnt83 226 -2657(Binomial)m 1791(theor)s 14(em)k
+gsave
+226 -3162 translate
+400 fnt82 2985 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+gsave
+3211 -3162 translate
+400 fnt82 226 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+gsave
+3437 -3162 translate
+400 fnt82 226 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+400 fnt78 3663 -2669(\()m 400 fnt83 3803 -2657(a)m 400 fnt78
+4114 -2669(+)m 400 fnt83 4449 -2657(b)m 280 fnt83 4770 -2463(n)m
+400 fnt78 4659 -2669(\))m 5063(=)s 336 fnt78 5549 -2290(\245)m
+520 fnt78 5484 -2699(\345)m 280 fnt83 5418 -3005(k)m 280 fnt78
+5588 -3014(=)m 5780(0)s gsave
+0 -2560 translate
+1.0000 2.3652 scale
+400 fnt78 5932 -100(\()m 
+grestore
+400 fnt83
+6112 -2417(n)m 6115 -2893(k)m gsave
+0 -2560 translate
+1.0000 2.3652 scale
+400 fnt78 6362 -100(\))m 
+grestore
+280 fnt83
+6684 -2501(k)m 400 fnt83 6493 -2657(a)m 280 fnt83 7022 -2488(n)m
+280 fnt78 7194 -2497(-)m 280 fnt83 7383 -2488(k)m 400 fnt83
+6832 -2657(b)m gsave
+3663 -3162 translate
+400 fnt82 4255 0 1260 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+gsave
+7918 -3162 translate
+400 fnt82 226 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+gsave
+8144 -2155 translate
+400 fnt82 0 144 0 144 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+8144 -3018 translate
+400 fnt82 0 863 0 449 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+8144 -3162 translate
+400 fnt82 0 144 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabvs
+grestore
+
+grestore
+gsave
+8144 -3162 translate
+400 fnt82 226 0 0 0 400 480 100 LoutGraphic
+gsave
+0.5 pt ltabhs
+grestore
+
+grestore
+400 fnt82 8370 -2659(12)m 745 0 390 0 400 480 100 8370 -3162 LoutGr2
+0.5 pt ltabhs
+grestore
+
+grestore
+226 0 0 0 400 480 100 9115 -3162 LoutGr2
+0.5 pt ltabhsp
+grestore
+
+grestore
+360 144 0 144 400 480 100 9341 -2155 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+360 863 0 449 400 480 100 9341 -3018 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+360 144 0 0 400 480 100 9341 -3162 LoutGr2
+0.5 pt ltabvs
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 31 31
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8922(31)s 400 fnt84 3123 11382(P)m 4(ascal)k
+4297(pr)s 7(ograms)k 360 fnt35 800 9651(@SysInclude { pas })m 800 9171(...)m
+800 8691(@ID @P)m 14(as {)k 800 8211(procedure DoPr)m -5(iAbstr)k 3(act\(root:)k 18( Pr)k -5(iEntr)k -10(y\);)k
+800 7731(begin)m 800 7251(    if root^.leftchild <> nil then begin)m 800 6771(        DoPr)m -5(iAbstr)k 3(act\(root^.leftchild\);)k
+800 6291(        wr)m -5(ite\(', '\);)k 800 5811(    end;)m 800 5331(    Pr)m -5(iK)k 14(e)k 7(yAbstr)k 3(act\(root^.k)k 7(e)k 7(y\);)k
+800 4851(    wr)m -5(ite\(':'\);)k 800 4371(    Pr)m -5(iV)k 25(alueAbstr)k 3(act\(root^.v)k 9(alue\);)k
+800 3891(    if root^.r)m -5(ightchild <> nil then begin)k 800 3411(        wr)m -5(ite\(', '\);)k 800 2931(        DoPr)m -5(iAbstr)k 3(act\(root^.r)k -5(ightchild\);)k
+800 2451(    end;)m 800 1971(end;)m 800 1491(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 32 32
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+%%+ font Symbol
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+%%IncludeResource: font Symbol
+/fnt78 { /Symbol LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8910(32)s gsave
+0 667 translate
+400 fnt82 8640 10080 1440 8455 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+400 fnt84 1440 8363(pr)m 7(ocedur)k 7(e)k
+400 fnt83 3270 8367(DoPriAbstr)m 6(act)k 400 fnt82 5622 8365(\()m
+400 fnt83 5744 8367(r)m 18(oot)k 400 fnt82 6399 8365(:)m
+400 fnt83 6576 8367(PriEntry)m 400 fnt82 7966 8365(\);)m 400 fnt84
+1440 7883(begin)m 1840 7403(if)m 400 fnt83 2206 7407(r)m 18(oot)k
+320 fnt78 2861 7415(\255)m 400 fnt82 3043 7405(.)m 400 fnt83
+3116 7407(leftc)m 6(hild)k 400 fnt78 4529 7395(\271)m 400 fnt84
+4845 7403(nil)m 5380(then)s 6228(begin)s 400 fnt83 2240 6927(DoPriAbstr)m 6(act)k
+400 fnt82 4592 6925(\()m 400 fnt83 4714 6927(r)m 18(oot)k
+320 fnt78 5369 6935(\255)m 400 fnt82 5551 6925(.)m 400 fnt83
+5624 6927(leftc)m 6(hild)k 400 fnt82 6937 6925(\);)m 400 fnt83
+2240 6447(write)m 400 fnt82 3048 6445(\(',)m 3492('\);)s 400 fnt84
+1840 5963(end)m 400 fnt82 2453 5965(;)m 400 fnt83 1840 5487(PriK)m 14(e)k 12(yAbstr)k 6(act)k
+400 fnt82 4298 5485(\()m 400 fnt83 4420 5487(r)m 18(oot)k
+320 fnt78 5075 5495(\255)m 400 fnt82 5257 5485(.)m 400 fnt83
+5330 5487(k)m 4(e)k 12(y)k 400 fnt82 5838 5485(\);)m
+400 fnt83 1840 5007(write)m 400 fnt82 2648 5005(\(':'\);)m 400 fnt83
+1840 4527(PriV)m 44(alueAbstr)k 6(act)k 400 fnt82 4592 4525(\()m
+400 fnt83 4714 4527(r)m 18(oot)k 320 fnt78 5369 4535(\255)m
+400 fnt82 5551 4525(.)m 400 fnt83 5624 4527(value)m 400 fnt82
+6477 4525(\);)m 400 fnt84 1840 4043(if)m 400 fnt83 2206 4047(r)m 18(oot)k
+320 fnt78 2861 4055(\255)m 400 fnt82 3043 4045(.)m 400 fnt83
+3116 4047(rightc)m 6(hild)k 400 fnt78 4796 4035(\271)m 400 fnt84
+5112 4043(nil)m 5647(then)s 6495(begin)s 400 fnt83 2240 3567(write)m
+400 fnt82 3048 3565(\(',)m 3492('\);)s 400 fnt83 2240 3087(DoPriAbstr)m 6(act)k
+400 fnt82 4592 3085(\()m 400 fnt83 4714 3087(r)m 18(oot)k
+320 fnt78 5369 3095(\255)m 400 fnt82 5551 3085(.)m 400 fnt83
+5624 3087(rightc)m 6(hild)k 400 fnt82 7204 3085(\);)m 400 fnt84
+1840 2603(end)m 400 fnt82 2453 2605(;)m 400 fnt84 1440 2123(end)m
+400 fnt82 2053 2125(;)m 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 33 33
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8917(33)s 400 fnt84 3304 11376(Basic)m
+4308(graphics)s 360 fnt35 800 9645(45d @Rotate 1.5 @Scale @Bo)m 10(x {)k 800 9165(    Hello)m 14(, w)k 3(or)k -5(ld)k
+800 8685(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 34 34
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8910(34)s gsave
+0 667 translate
+400 fnt82 8640 10080 1440 8640 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+gsave
+2528 5722 translate
+45.0000 rotate
+gsave
+0 0 translate
+1.5000 1.5000 scale
+gsave
+0 -254 translate
+360 fnt35 2027 526 108 254 360 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+108 161(Hello)m 14(,)k
+1080(w)s 3(or)k -5(ld)k 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 35 35
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12478(lout)m 8915(35)s 400 fnt84 2908 11375(Adv)m 4(anced)k
+4704(graphics)s 360 fnt35 800 9644(@SysInclude { \207g })m 800 9164(...)m 800 8684(@Fig {)m
+800 8204(@Bo)m 10(x)k 800 7724(    margin { 0c })m 800 7244(    paint { b)m 7(lac)k 7(k })k
+800 6764(@Ellipse)m 800 6284(    linestyle { noline })m 800 5804(    paint { white })m 800 5324({ Hello)m 14(, w)k 3(or)k -5(ld })k
+800 4844(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 36 36
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8911(36)s gsave
+0 667 translate
+400 fnt82 8640 10080 1440 8231 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+5760 781 226 372 400 480 100 1440 7859 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+2442 781 226 372 400 480 100 0 0 LoutGr2
+/lfigblack [ lfigbox ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+2442 781 226 372 400 480 100 0 0 LoutGr2
+/lfigwhite [ lfigellipse ] gsave lfigpaintpath grestore
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfignoline [ lfigellipse ] lfigdopath
+pop pop
+grestore
+226 282(Hello,)m 1291(w)s 4(orld)k
+
+grestore
+
+grestore
+end end restore
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 37 37
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8914(37)s 400 fnt84 3302 11376(P)m 8(oint)k
+4304(labelling)s 360 fnt35 800 9645(@Fig {)m 800 9165(A::)m 800 8685({)m
+800 8205(    1::)m 18( @Ellipse { 3c @Wide 2c @High })k 800 7725(    //3c)m 800 7245(    2::)m 18( @Bo)k 10(x { 3c @Wide 2c @High })k
+800 6765(})m 800 6285(@Sho)m 5(wLabels)k 800 5805(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 38 38
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8914(38)s gsave
+0 667 translate
+400 fnt82 8640 10080 1440 8414 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+5760 4873 0 4647 400 480 100 1440 3767 LoutGr2
+grestore save gsave 200 dict begin lfigdict begin
+grestore
+2153 4873 0 4647 400 480 100 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+2153 1586 226 1360 400 480 100 0 3287 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+2153 1586 226 1360 400 480 100 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigellipse ] lfigdopath
+pop pop
+grestore
+
+grestore
+(1) lfigpromotelabels
+grestore
+2153 1586 226 1360 400 480 100 0 0 LoutGr2
+currentdict end 200 dict begin begin
+grestore
+2153 1586 226 1360 400 480 100 0 0 LoutGr2
+
+0.5 pt setlinewidth lfiground setlinecap
+0.15 cm /lfigsolid [ lfigbox ] lfigdopath
+pop pop
+grestore
+
+grestore
+(2) lfigpromotelabels
+grestore
+(A) lfigpromotelabels
+grestore
+3507 4873 0 4647 400 480 100 2253 0 LoutGr2
+lfigshowlabels
+grestore
+
+grestore
+end end restore
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 39 39
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Helvetica
+/pgsave save def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt84 vec2 /Times-Bold LoutRecode
+/fnt84 { /Times-Boldfnt84 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8912(39)s 400 fnt84 3895 11375(Graphs)m
+340 fnt35 800 9035(@Gr)m 3(aph)k 800 8555(    abo)m 5(v)k 8(ecaption { Ne)k 6(w South )k 13(W)k 13(ales road deaths)k
+800 8075(\(per 100 million v)m 8(ehicle km\) })k 800 7595({)m 800 7115(    @Data  points { plus }  pairs { dashed })m 800 6635(    { 1963 5.6  1971 4.3  1976 3.7  1979 3.4)m
+800 6155(    1982 2.9  1985 2.3  1988 2.0 })m 800 5675(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 40 40
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8909(40)s gsave
+0 667 translate
+400 fnt82 8640 10080 1440 8640 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+1631 8367(Ne)m 10(w)k
+2463(South)s 3491(W)s 32(ales)k 4540(road)s 5347(deaths)s
+1717 7887(\(per)m 2460(100)s 3151(million)s 4400(v)s 6(ehicle)k
+5639(km\))s 5103 3402 0 3402 400 480 100 1440 4116 LoutGr2
+grestore
+
+gsave xsize ysize lgraphdict begin /ysize exch def /xsize exch def
+/alldata [ [ [ 1963 5.6 1971 4.3 1976 3.7 1979 3.4 1982 2.9 1985 2.3 1988 2.0 ] xandy
+{ plus }
+{ ilinesetup dashed }
+{ /dashlength 0.2 ft def
+  /linewidth currentlinewidth def 
+  /symbolsize 0.15 ft def }
+{ false }
+] ] def
+0 [ false ] 0 alldata false false 0
+0.5 cm false false 0.5 ft xset
+0 [ false ] 1 alldata false false 0
+0.5 cm false false 0.5 ft yset
+norset
+rundata framestyle
+grestore
+end
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 41 41
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Helvetica
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+1 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8922(41)s 360 fnt35 800 10484(-2p @F)m 10(ont @Gr)k 3(aph)k
+800 10004(    style { ax)m 10(es })k 800 9524(    xor)m -5(igin { 0 }  y)k 7(or)k -5(igin { 0 })k
+800 9044(    xtic)m 7(ks { 10@ 50@ 100@ 200@ 500@ })k 800 8564(    objects {  @NE at { 300 2 } @I { Exponential })m 800 8084(      @SE at { ...)m 21( } @I { Unif)k 10(or)k -9(m } })k
+800 7604(    belo)m 5(wcaption { @I n })k 800 7124({)m 800 6644(    @Data points { \207lledcircle } { ...)m 21( })k
+800 6164(    @Data points { \207lledcircle } { ...)m 21( })k 800 5204(    @Data pairs { dashed })m 800 4724(    { 10 2  500 2 })m 800 3764(    @Data pairs { dashed })m
+800 3284(    {)m 800 2804(        xloop from { 10 } to { 500 } b)m 7(y { 20 } do)k 800 2324(        {)m 800 1844(            x  sqr)m -14(t { pi*x / 4 } + 1)k
+800 1364(        })m 800 884(    })m 800 404(})m 
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Page: 42 42
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Italic
+/pgsave save def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt83 vec2 /Times-Italic LoutRecode
+/fnt83 { /Times-Italicfnt83 LoutFont } def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+gsave
+0 0 translate
+400 fnt82 0.0 0.0 0.0 setrgbcolor 11900 16840 0 16840 400 480 100 LoutGraphic
+gsave
+LoutPageSet
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+9066 12588 0 12588 400 480 100 1417 -14005 LoutGr2
+0 LoutMargSet
+grestore
+160 fnt82 0 12479(lout)m 8910(42)s gsave
+0 668 translate
+400 fnt82 8640 10080 1440 8640 400 480 100 LoutGraphic
+gsave
+LoutBox   stroke
+grestore
+gsave
+1440 4671 translate
+360 fnt82 5670 3969 0 3969 360 480 90 LoutGraphic
+gsave
+grestore
+
+gsave xsize ysize lgraphdict begin /ysize exch def /xsize exch def
+/alldata [ [ [ 10 1.97 50 2.01 100 2.00 200 2.0 500 2.00 ] xandy
+{ filledcircle }
+{  }
+{ /dashlength 0.2 ft def
+  /linewidth currentlinewidth def 
+  /symbolsize 0.15 ft def }
+{ false }
+]
+[ [ 10 3.53 50 7.45 100 9.32 200 13.41 500 21.63 ] xandy
+{ filledcircle }
+{  }
+{ /dashlength 0.2 ft def
+  /linewidth currentlinewidth def 
+  /symbolsize 0.15 ft def }
+{ false }
+]
+[ [ 10 2 500 2 ] xandy
+{  }
+{ linesetup cdashed }
+{ /dashlength 0.2 ft def
+  /linewidth currentlinewidth def 
+  /symbolsize 0.15 ft def }
+{ false }
+]
+[ [ 10 20 500 { /xval exch def xval 3.14159 xval mul 4 div sqrt 1 add } for ] xandy
+{  }
+{ linesetup cdashed }
+{ /dashlength 0.2 ft def
+  /linewidth currentlinewidth def 
+  /symbolsize 0.15 ft def }
+{ false }
+] ] def
+0 [ 10 lgen 50 lgen 100 lgen 200 lgen 500 lgen ] 0 alldata false false 0
+0 false 0 0.5 ft xset
+0 [ false ] 1 alldata false false 0
+0 false 0 0.5 ft yset
+norset
+rundata axesstyle
+grestore
+1953 535 0 535 360 480 90 0 -535 LoutGr2
+300 2 trpoint translate 0 ysize translate gsave
+grestore
+360 fnt83 108 182(Exponential)m
+grestore
+grestore
+1428 533 0 533 360 480 90 0 -533 LoutGr2
+300 3.14159 300 4 div mul sqrt 1 add trpoint translate 0 0 translate gsave
+grestore
+360 fnt83 108 182(Uniform)m grestore
+grestore
+end
+
+grestore
+360 fnt83 4189 3901(n)m 
+grestore
+
+grestore
+
+grestore
+
+grestore
+
+pgsave restore
+showpage
+
+%%Trailer
+%%DocumentNeededResources: font Helvetica
+%%+ font Helvetica-Oblique
+%%+ font Symbol
+%%+ font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%DocumentSuppliedResources: procset LoutStartUp
+%%+  procset LoutTabPrependGraphic
+%%+  procset LoutFigPrependGraphic
+%%+  procset LoutGraphPrependGraphic
+%%+  procset LoutBasicSetup
+%%+ encoding vec2
+%%Pages: 42
+%%EOF
diff --git a/doc/user/README b/doc/user/README
new file mode 100644
index 0000000..fd69ccb
--- /dev/null
+++ b/doc/user/README
@@ -0,0 +1,37 @@
+Directory lout/doc/user
+
+This directory contains the Lout source files for the User's Guide
+to the Lout Document Formatting System.  To produce the Guide,
+type the command
+
+	lout all > op
+
+in this directory.  This must be done five times to completely
+resolve all cross references, although the PostScript file op is
+printable after the first run.  Auxiliary files with .li and .ld
+suffixes will be created in this directory.
+
+The first run will produce a large number of error messages,
+nearly all beginning with "unresolved cross reference".  These
+should gradually go away on later runs.  The following shows the
+error message output on the fifth run for A4 size printing:
+
+lout file "cpp_tabs" (from "cpp" line 24, from "all" line 38):
+   53,23: c2lout: C text ended inside a comment
+   55,35: c2lout: C text ended inside a comment
+
+These two warnings point to two places where a C program text ended
+inside a comment, which in these cases was deliberate so is no problem.
+If you set the document in Letter size paper, you will also get a
+couple of other warning messages pointing to places where Lout had
+to slightly scale a display to fit the smaller page.
+
+Optimal page breaking has been turned off for this document owing to
+repeated failure to converge, caused by footnotes and floating figures
+close to large unbreakable displays.
+
+A copy of the final PostScript output file (A4 paper size) is
+stored at "ftp://ftp.cs.su.oz.au/jeff/lout/lout.3.17.user.ps.gz".
+
+Jeffrey H. Kingston
+17 September 1999
diff --git a/doc/user/all b/doc/user/all
new file mode 100644
index 0000000..1b131f6
--- /dev/null
+++ b/doc/user/all
@@ -0,0 +1,47 @@
+@SysInclude { tab }
+@SysInclude { tbl }
+@SysInclude { eq }
+@SysInclude { fig }
+@SysInclude { graph }
+@SysInclude { pas }
+@SysInclude { diag }
+@SysInclude { cprint }
+@SysInclude { book }
+# @Include { letterbook } # for testing Letter size formatting
+
+@SysDatabase @Reference { loutrefs }
+
+@Book
+    @Title { A User's Guide to the
+
+Lout
+
+Document Formatting System
+}
+    @Author { Jeffrey H. Kingston }
+    @Edition { Version 3.17
+September, 1999 }
+    @Publisher {
+Copyright @CopyRight 1991, 1999 Jeffrey H. Kingston,
+Basser Department of Computer Science,
+The University of Sydney 2006, Australia.  ISBN 0 86758 951 5.
+}
+    @InitialLanguage { English }
+    # @OptimizePages { Yes }
+//
+
+@Include { preface }
+@Include { bas     }
+@Include { str     }
+@Include { typ     }
+@Include { fmt     }
+@Include { ref     }
+@Include { tbl     }
+@Include { equ     }
+@Include { bgr     }
+@Include { dia     }
+@Include { gra     }
+@Include { cpp     }
+@Include { pascal  }
+@Include { ap_qck  }
+@Include { ap_byp  }
diff --git a/doc/user/ap_byp b/doc/user/ap_byp
new file mode 100644
index 0000000..a1c1bd7
--- /dev/null
+++ b/doc/user/ap_byp
@@ -0,0 +1,98 @@
+@Appendix
+    @Title { Bypass Symbols }
+    @Tag { bypass }
+@Begin
+@PP
+The `bypass' symbols described in this appendix are intended to be
+used only in Lout which is generated by computer programs.  Their
+purpose is to bypass the Lout cross reference database, and so reduce
+the number of passes needed to finalise a document.  These symbols
+should not be used by people, because that would only lead back to the
+consistency problems that prompted the introduction of cross references
+in the first place.
+@PP
+To produce a bypass table of contents, set the @Code "@MakeContents"
+setup file option to @Code "Bypass" and use @Code "@BypassContentsEntry"
+symbols at the outermost level just before the introduction or first
+chapter:
+@ID @Tab
+    @Fmta { @Col @Code A ! @Col ! @Col B }
+    vmargin { 0.5vx }
+{
+@Rowa
+    A { "@BypassContentsEntry" }
+@Rowa
+    A { "    indent { 0f }" }
+    B { the indent, e.g. {@Code "0f"}, {@Code "2f"}, {@Code "4f"} ... }
+@Rowa
+    A { "    number {}" }
+    B { the section (etc.) number e.g. {@Code "5.2"} }
+@Rowa
+    A { "    title {}" }
+    B { the section (etc.) title e.g. @Code "Azaleas" }
+@Rowa
+    A { "    pagenum {}" }
+    B { the page number e.g. @Code "@PageOf azaleas" }
+}
+For major entries such as chapters, use @Code "@BypassMajorContentsEntry"
+with the same options.  This increases the vertical spacing and uses
+bold font.  When @Code "@MakeContents" is {@Code "Bypass"}, no contents
+entries will be produced automatically.
+@PP
+To bypass Lout's automatic numbering of large-scale structure symbols,
+use the @Code "@BypassNumber" option:
+@ID @Code {
+"@Section"
+"    @Title { Azaleas }"
+"    @Tag { azaleas }"
+"    @BypassNumber { 5.2 }"
+"..."
+}
+Give the full `path number' (5.2, B.3 or whatever) of the symbol.  There is
+a @Code "@BypassNumber" option for every symbol that has a @Code "@Title"
+option and is usually assigned a number automatically by Lout, plus
+@Code "@Figure" and {@Code "@Table"}.  No changes to the setup file are
+required in order to use {@Code "@BypassNumber"}, and it is permitted
+for some large-scale structure symbols to have this option and others not.
+@PP
+To produce a bypass reference list, set the @Code "@MakeReferences"
+setup file option to @Code "Bypass" and place reference entries at the
+end of the document, after the last chapter or other large-scale structure
+symbol but before any bypass index entries (see below), like this:
+@ID @Code {
+"@BypassReference"
+"    label { [Kin94a] }"
+"    value { @RefPrint kingston1995lout.expert }"
+}
+The two options are objects which become the label and value of the
+reference entry.  The @Code "value" option can be any object, including
+an explicit reference; but @Code "@RefPrint" does not introduce any
+cross-referencing delay if the @Code "@Reference" symbols lie in a
+separate database file.  No sorting or removal of duplicate entries
+will be done by Lout.  When @Code "@MakeReferences" is {@Code "Bypass"},
+@Code "@Cite" and related symbols are ignored.
+@PP
+There is also @Code "@BypassChapReference" with the same options for
+producing bypass chapter reference lists; these symbols should be
+placed at the outer level immediately after the preface, introduction,
+chapter or appendix that they refer to.
+@PP
+To produce bypass indexes, set the @Code "@MakeIndex" setup file
+option to {@Code Bypass} and use the @Code "@BypassRawIndex" symbol
+repeatedly at the very end of the document, enclosed in
+@Code "@BypassBeginIndex" and @Code "@BypassEndIndex" symbols:
+@ID @Code {
+"@BypassBeginIndex"
+"@BypassRawIndex  indent { 0f }  { Azaleas, @PageOf azaleas }"
+"..."
+"@BypassEndIndex"
+}
+The @Code "indent" option gives the indent ({@Code "0f"}, @Code {"1f"},
+@Code {2f}, etc.), and the right parameter is as for @Code "@RawIndex".  No
+@Code "@PageMark" operations, sorting, merging, or attachment of page
+numbers will be done by Lout.  When @Code "@MakeIndex" is {@Code Bypass},
+@Code "@Index" and related symbols are ignored.  At present, bypass
+index symbols work only in books, not with ordinary documents or
+technical reports.  There are corresponding symbols for creating
+bypass indexes A and B.
+@End @Appendix
diff --git a/doc/user/ap_qck b/doc/user/ap_qck
new file mode 100644
index 0000000..92ea7ad
--- /dev/null
+++ b/doc/user/ap_qck
@@ -0,0 +1,369 @@
+@Appendix
+    @Title { Lout Quick Reference Guide }
+@Begin
+10p @Font 1.15fx @Break @OneCol
+@Tab @Fmta { @Col 20c @Wide A ! @Col 20c @Wide B }
+{
+@Rowa A {
+@Heading { 1.  Running Lout }
+@LD @Code {
+"lout filename > postscript.ps"
+}
+
+@LP
+@Heading { 2.  Ordinary documents (simple form) }
+@LD @Code {
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"..."
+"@End @Text"
+}
+
+@LP
+@Heading { 3.  Ordinary documents (full form) }
+@LD @Code {
+"@SysInclude { doc }"
+"@Document"
+"    @InitialFont { Times Base 12p }"
+"    @InitialBreak { adjust 1.2fx hyphen }"
+"    @InitialLanguage { English }"
+"    @PageHeaders { Simple }"
+"    @FirstPageNumber { 1 }"
+"    @ColumnNumber { 1 }"
+"    @PageOrientation { Portrait }"
+"//"
+"@Text @Begin"
+"..."
+"@BeginSections"
+"@Section ... @End @Section"
+"@EndSections"
+"@End @Text"
+}
+
+@LP
+@Heading { 4.  Technical reports }
+@LD @Code {
+"@SysInclude { report }"
+"@Report"
+"    @Title { ... }"
+"    @Author { ... }"
+"    @Institution { ... }"
+"    @DateLine { No }"
+"    @CoverSheet { Yes }"
+"    @InitialFont { Times Base 12p }"
+"    @InitialBreak { adjust 1.2fx hyphen }"
+"    @InitialLanguage { English }"
+"    @PageHeaders { Simple }"
+"    @FirstPageNumber { 1 }"
+"    @ColumnNumber { 1 }"
+"//"
+"@Abstract ... @End @Abstract"
+"@Section ... @End @Section"
+"@Appendix ... @End @Appendix"
+}
+}
+
+B {
+@Heading { 5.  Large-scale structure symbols }
+@LL
+@LI @Code {
+"@Section"
+"    @Title { ... }"
+"    @RunningTitle { ... }"
+"    @Tag { ... }"
+"@Begin"
+"@PP"
+"..."
+"@End @Section"
+}
+@LI lines @Break {
+@Code "@Section / @SubSection / @SubSubSection"
+@Code "@Appendix / @SubAppendix / @SubSubAppendix"
+@Code "@BeginSubSections" ... @Code "@EndSubSections" if inner.
+}
+@EndList
+
+@LP
+@Heading { 6.  Cross references }
+@LD @Tab
+    @Fmta { @Col @Code A ! @Col ! @Col @Code B }
+{
+@Rowa
+    A { "@Tag { foo }" }
+    B { "@PageOf foo" }
+@Rowa
+    A { "@PageMark foo" }
+    B { "@NumberOf foo" }
+}
+
+@LP
+@Heading { 7.  Font changes }
+@LL
+@LI @Tab 
+    @Fmta { @Col @Code A ! @Col @Code B }
+    vmargin { 0.5vx }
+{
+@Rowa
+    A { "@B { bold font }" }
+    B { "@I { italic font }" }
+@Rowa
+    A { "@BI { bold-italic font }" }
+    B { "@R { Roman font }" }
+@Rowa
+    A { "@S { small-caps font}" }
+    B { "@F { fixed-width font }" }
+@Rowa
+    B { "@II { italic bold or Roman }" }
+}
+@LI @Code {
+"{ family face size } @Font { ... }"
+}
+@LI @Code {
+"Times  Helvetica  Courier  ..."
+"Base  Slope  Bold  BoldSlope  ..."
+"10p  12p  +2p  -2p  2.0f  ..."
+}
+@EndList
+
+@LP
+@Heading { 8.  Paragraph breaking styles }
+@LL
+@LI @Code {
+"{ breakstyle linesep hyphen } @Break { ... }"
+}
+@LI @Code {
+"adjust  ragged  lines  clines  ..."
+"1.2fx  2vx  0.9vx  ..."
+"hyphen  nohyphen"
+}
+@EndList
+
+@LP
+@Heading { 9.  New paragraph and new page }
+@LD @Tab
+    @Fmta { @Col @Code A ! @Col B }
+    vmargin { 0.5vx }
+{
+@Rowa A { "@PP"  } B { Plain paragraph }
+@Rowa A { "@LP"  } B { Left paragraph }
+@Rowa A { "@LLP" } B { New line }
+@Rowa A { "@DP"  } B { Display paragraph }
+@Rowa A { "@NP"  } B { New page }
+@Rowa A { "@CNP" } B { Conditional new page }
+}
+}
+
+} # end first table
+@LP
+10p @Font 1.15fx @Break @OneCol
+@Tab @Fmta { @Col 20c @Wide A ! @Col 20c @Wide B }
+{
+@Rowa A {
+@Heading { 10.  Displays and headings }
+@LL
+@LI @Code {
+"@CD @Heading { A centred heading }"
+"@ID { An indented display }"
+}
+@LI @Tab
+    @Fmta { @Col @Code A ! @Col @Code B }
+    vmargin { 0.5vx }
+{
+@Rowa A { "@D"  } B { "@Display" }
+@Rowa A { "@LD" } B { "@LeftDisplay" }
+@Rowa A { "@ID" } B { "@IndentedDisplay" }
+@Rowa A { "@QD" } B { "@QuotedDisplay" }
+@Rowa A { "@CD" } B { "@CentredDisplay" }
+@Rowa             B { "@CenteredDisplay" }
+@Rowa             B { "@RightDisplay" }
+}
+@EndList
+
+@LP
+@Heading { 11. Lists}
+@LL
+@LI @Code {
+"@List"
+"@ListItem { A list item }"
+"@ListItem { Another list item }"
+"@EndList"
+}
+@LI @Tab
+    @Fmta { @Col @Code A ! @Col @Code B }
+    vmargin { 0.5vx }
+{
+@Rowa
+    A { "@L" }
+    B { "@List" }
+@Rowa
+    A { "@LL" }
+    B { "@LeftList" }
+@Rowa
+    A { "@IL" }
+    B { "@IndentedList" }
+@Rowa
+    A { "@QL" }
+    B { "@QuotedList" }
+@Rowa
+    A { "@CL" }
+    B { "@CentredList" }
+@Rowa
+    B { "@CenteredList" }
+@Rowa
+    A { "@NL" }
+    B { "@NumberedList" }
+@Rowa
+    A { "@RL" }
+    B { "@RomanList" }
+@Rowa
+    A { "@UCRL" }
+    B { "@UCRomanList" }
+@Rowa
+    A { "@AL" }
+    B { "@AlphaList" }
+@Rowa
+    A { "@UCAL" }
+    B { "@UCAlphaList" }
+@Rowa
+    A { "@PNL" }
+    B { "@ParenNumberedList" }
+@Rowa
+    A { "@PRL" }
+    B { "@ParenRomanList" }
+@Rowa
+    A { "@PUCRL" }
+    B { "@ParenUCRomanList" }
+@Rowa
+    A { "@PAL" }
+    B { "@ParenAlphaList" }
+@Rowa
+    A { "@PUCAL" }
+    B { "@ParenUCAlphaList" }
+@Rowa
+    A { "@BL" }
+    B { "@BulletList" }
+@Rowa
+    A { "@SL" }
+    B { "@StarList" }
+@Rowa
+    A { "@DL" }
+    B { "@DashList" }
+}
+@LI @Code {
+"@TaggedList"
+"@TagItem { label } { A list item }"
+"@TagItem { label } { Another list item }"
+"@EndList"
+}
+@LI @Tab
+    @Fmta { @Col @Code A ! @Col @Code B }
+    vmargin { 0.5vx }
+{
+@Rowa
+    A { "@TL" }
+    B { "@TaggedList" }
+@Rowa
+    A { "@WTL" }
+    B { "@WideTaggedList" }
+@Rowa
+    A { "@VWTL" }
+    B { "@VeryWideTaggedList" }
+}
+@EndList
+
+@LP
+@Heading { 12.  Footnotes, endnotes, margin notes }
+@LD @Tab
+    @Fmta { @Col @Code A ! @Col @Code B }
+    vmargin { 0.5vx }
+{
+@Rowa
+    A { "@FootNote { ... }"  }
+    B { "@EndNote { ... }"   }
+@Rowa
+    A { "@LeftNote { ... }"  }
+    B { "@RightNote { ... }" }
+@Rowa
+    A { "@OuterNote { ... }" }
+    B { "@InnerNote { ... }" }
+}
+}
+
+B {
+@Heading { 13.  Floating figures and tables }
+@LD @Tab
+    @Fmta { @Col @Code A ! @Col ! @Col ! @Col @Code B }
+{
+@Rowa
+    A {
+"@Figure"
+"    @Caption { ... }"
+"    @Tag { ... }"
+"@Begin"
+"..."
+"@End @Figure"
+}
+    B {
+"@Table"
+"    @Caption { ... }"
+"    @Tag { ... }"
+"@Begin"
+"..."
+"@End @Table"
+}
+}
+
+@LP
+@Heading { 14.  Tables }
+@LD @Code {
+"@SysInclude { tbl }"
+"@SysInclude { doc }"
+"..."
+"@Tbl"
+"    aformat { @Cell A | @Cell B }"
+"    marginvertical { 0.5vx }"
+"{"
+"@Rowa"
+"    A { ... }"
+"    B { ... }"
+"@Rowa"
+"    ..."
+"}"
+}
+
+@LP
+@Heading { 15.  Equations }
+@LD @Code {
+"@SysInclude { eq }"
+"@SysInclude { doc }"
+"..."
+"@Eq { sum from i=0 to n { r sup i over sqrt pi } }"
+}
+
+@LP
+@Heading { 16.  Basic graphics }
+@LD @Code {
+"grey @Colour { ... }"
+"gray @Color { ... }"
+"@Box { ... }"
+"@CurveBox { ... }"
+"@ShadowBox { ... }"
+"60d @Rotate { ... }"
+"0.71 @Scale { ... }"
+"@QuotedDisplay @Scale { ... }"
+"@IncludeGraphic filename.eps"
+}
+
+@LP
+@Heading { 17.  Miscellaneous }
+@LD lines @Break {
+@Code "@Underline { will be underlined }"
+@Code "@Date"
+@Code "@Time"
+@Code "German @Language { ... }"
+@Code "\# comment to end of line"
+@Code "\"#&/@^{}|~\""   (enclose these characters in quotes)
+}
+}
+} # end second table
+@End @Appendix
diff --git a/doc/user/bas b/doc/user/bas
new file mode 100644
index 0000000..239d35a
--- /dev/null
+++ b/doc/user/bas
@@ -0,0 +1,31 @@
+@Chapter
+    @Title { The Basics }
+    @Tag { basics }
+@Begin
+@LP
+The Lout document formatting system has been designed with the needs of
+the ordinary user very much in mind.  Although the features of Lout are
+virtually endless, and include mathematical equations, diagrams made from
+lines and shapes, bibliographic databases, and so on, the system is very
+simple to use.
+@BeginSections
+@Include { bas_star }
+@Include { bas_objs }
+@Include { bas_spac }
+@Include { bas_char }
+@Include { bas_empt }
+@Include { bas_font }
+@Include { bas_head }
+@Include { bas_par1 }
+@Include { bas_par2 }
+@Include { bas_line }
+@Include { bas_hyph }
+@Include { bas_unde }
+@Include { bas_date }
+@Include { bas_lang }
+@Include { bas_supe }
+@Include { bas_verb }
+@Include { bas_drop }
+@Include { bas_conv }
+@EndSections
+@End @Chapter
diff --git a/doc/user/bas_char b/doc/user/bas_char
new file mode 100644
index 0000000..7efa566
--- /dev/null
+++ b/doc/user/bas_char
@@ -0,0 +1,325 @@
+@Section
+   @Title { Characters }
+   @Tag { characters }
+@Begin
+@PP
+The usual way to get characters into a document is simply to type them as
+characters. @Index characters
+we have been doing all along.  However, for some characters this is not
+possible, either because they have some special meaning, as @Code "{"
+and @Code "}" do, or because the keyboard has no button for them.  This
+section explains how to get every possible character:  every printable
+character in the ISO-LATIN-1 character set, every character in the Adobe
+Systems Symbol font, plus the characters {@Char quotesinglbase},
+{@Char quotedblbase}, {@Char ellipsis}, {@Char OE}, {@Char oe},
+{@Char quotedblleft}, {@Char quotedblright}, {@Char fi},
+{@Char fl}, {@Char endash}, {@Char emdash}, {@Char bullet}, {@Char dagger},
+{@Char daggerdbl}, {@Char florin}, {@Char fraction}, and @Euro.  If it
+exists at all, you will find it here.  ISO-LATIN-2 and Russian characters
+are available separately.  In principle, there is no limit to the characters
+available, but to go beyond those given in this section requires expertise
+in defining encoding vectors and fonts @Cite { $kingston1995lout.expert}.
+@PP
+First up we have the characters that you get simply by typing
+them.  The characters themselves are shown at the left, and what you
+type to get them at the right:
+@ID @OneRow @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col @CC A ! @Col @Code A ! @Col ! @Col @CC B ! @Col @Code B !
+     @Col ! @Col @CC C ! @Col @Code C ! @Col ! @Col @CC D ! @Col @Code D !
+     @Col ! @Col @CC E ! @Col @Code E ! @Col ! @Col @CC F ! @Col @Code F }
+{
+@Rowa A { ! } B { $ } C { % } D { ' } E { ( } F { ) }
+@Rowa A { * } B { + } C { , } D { - } E { 0 } F { 1 }
+@Rowa A { 2 } B { 3 } C { 4 } D { 5 } E { 6 } F { 7 }
+@Rowa A { 8 } B { 9 } C { : } D { ; } E { < } F { = }
+@Rowa A { > } B { ? } C { A } D { B } E { C } F { D }
+@Rowa A { E } B { F } C { G } D { H } E { I } F { J }
+@Rowa A { K } B { L } C { M } D { N } E { O } F { P }
+@Rowa A { Q } B { R } C { S } D { T } E { U } F { V }
+@Rowa A { W } B { X } C { Y } D { Z } E { [ } F { ] }
+@Rowa A { _ } B { ` } C { a } D { b } E { c } F { d }
+@Rowa A { e } B { f } C { g } D { h } E { i } F { j }
+@Rowa A { k } B { l } C { m } D { n } E { o } F { p }
+@Rowa A { q } B { r } C { s } D { t } E { u } F { v }
+@Rowa A { w } B { x } C { y } D { z } E {   } F {   }
+}
+Next come characters that have buttons but have a special meaning if
+they are typed directly, and consequently have to be enclosed in double
+quotes to turn off this meaning:
+quote.chars @Index { quote characters }
+@ID @OneRow @Tab
+    @Fmta { @Col @CC A ! @Col @Code B ! @Col !
+	    @Col @CC C ! @Col @Code D ! @Col !
+	    @Col @CC E ! @Col @Code F ! @Col !
+	    @Col @CC G ! @Col @Code H ! @Col I
+	    }
+{
+@Rowa
+  A { "\"" } B { "\"\\\"\"" }
+  C { "#"  } D { "\"#\"" }
+  E { "&"  } F { "\"&\"" }
+  G { "/"  } H { "\"/\"" }
+@Rowa
+  A { "@"  } B { "\"@\"" }
+  C { "\\" } D { "\"\\\\\"" }
+  E { "^"  } F { "\"^\"" }
+  G { "{"  } H { "\"{\"" }
+@Rowa
+  A { "|"  } B { "\"|\"" }
+  C { "}"  } D { "\"}\"" }
+  E { "~"  } F { "\"~\"" }
+  G {      } H { "\" \"" }
+  I { (space character) }
+}
+If you think you want {@Code "\""}, you probably really want `` and '',
+for which see below.  You can place whole sequences of characters, special
+or not, inside one pair of double quotes:
+@ID @OneRow @Tab
+    @Fmta { @Col A ! @Col ! @Col @Code B }
+{
+@Rowa
+    A { "jeff/includes/su_crest.eps" }
+    B { "\"jeff/includes/su_crest.eps\"" }
+@Rowa
+    A { "\"@PP\"" }
+    B { "\"\\\"@PP\\\"\"" }
+}
+Next we have some miscellaneous characters which have been deemed
+sufficiently important to deserve their own symbols:
+@ID @OneRow @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col A ! @Col @Code B ! @Col ! @Col C ! @Col @Code D !
+		                    @Col ! @Col E ! @Col @Code F }
+{
+    @Rowa
+	A { ``		}
+	B { "``"	}
+	C { ,,		}
+	D { ",,"	}
+	E { --		}
+	F { "--"	}
+    @Rowa
+	A { ''		}
+	B { "''"	}
+	C { ...		}
+	D { "..."	}
+	E { ---		}
+	F { "---"	}
+    @Rowa
+	A { @Bullet	bullet @Index @Code "@Bullet"	}
+	B { "@Bullet"	}
+	C { @Star	star @Index @Code "@Star" }
+	D { "@Star"	}
+	E { @ParSym	parsym @Index @Code "@ParSym"	}
+	F { "@ParSym"	}
+    @Rowa
+	A { @SectSym	sectsym @Index @Code "@SectSym" }
+	B { "@SectSym"	}
+	C { @Dagger	dagger @Index @Code "@Dagger"	}
+	D { "@Dagger"	}
+	E { @DaggerDbl	daggerdbl @Index @Code "@DaggerDbl" }
+	F { "@DaggerDbl"}
+    @Rowa
+	A { @CDot	cdot @Index @Code "@CDot"	}
+	B { "@CDot"	}
+	C { @Sterling	sterling @Index @Code "@Sterling" }
+	D { "@Sterling"	}
+	E { @Yen	yen @Index @Code "@Yen"		}
+	F { "@Yen"	}
+    @Rowa
+	A { @Florin	florin @Index @Code "@Florin" }
+	B { "@Florin"	}
+	C { @Degree	degree @Index @Code "@Degree"	}
+	D { "@Degree"	}
+	E { @Minute	minute @Index @Code "@Minute" }
+	F { "@Minute"	}
+    @Rowa
+	A { @Second	second @Index @Code "@Second"	}
+	B { "@Second"	}
+	C { @Lozenge	lozenge @Index @Code "@Lozenge" }
+	D { "@Lozenge"	}
+	E { @Multiply	multiply @Index @Code "@Multiply"}
+	F { "@Multiply"	}
+    @Rowa
+	A { @Divide	divide @Index @Code "@Divide" }
+	B { "@Divide"	}
+	C { @CopyRight	copyright @Index @Code "@CopyRight" }
+	D { "@CopyRight"}
+	E { @Register	register @Index @Code "@Register" }
+	F { "@Register"	}
+    @Rowa
+	A { @TradeMark	trademark @Index @Code "@TradeMark" }
+	B { "@TradeMark"}
+	C { @Euro	euro @Index @Code "@Euro" }
+	D { "@Euro"}
+}
+Next we have the complete ISO-LATIN-1 character set, whose members you
+iso.latin.1 @Index { ISO-LATIN-1 character set }
+char. @Index { @Code "@Char" symbol }
+get with the @Code "@Char" symbol followed by the name of the character
+you want:
+@ID @OneRow -3p @Font @Tab
+    hmargin { 0.1c }
+    vmargin { 0.4vo }
+    @Fmta { @Col @CC @Char A ! @Col @Code { "@Char" A } ! @Col !
+            @Col @CC @Char B ! @Col @Code { "@Char" B } ! @Col !
+            @Col @CC @Char C ! @Col @Code { "@Char" C } ! @Col !
+            @Col @CC @Char D ! @Col @Code { "@Char" D } }
+    @Fmtb { @Col @CC @Char A ! @Col @Code { "@Char" A } ! @Col !
+            @Col ! @Col ! @Col ! @Col ! @Col  ! @Col ! @Col ! @Col  }
+{
+@Rowa A { space } B { exclam } C { quotedbl } D { numbersign }
+@Rowa A { dollar } B { percent } C { ampersand } D { quoteright }
+@Rowa A { parenleft } B { parenright } C { asterisk } D { plus }
+@Rowa A { comma } B { hyphen } C { period } D { slash }
+@Rowa A { zero } B { one } C { two } D { three }
+@Rowa A { four } B { five } C { six } D { seven }
+@Rowa A { eight } B { nine } C { colon } D { semicolon }
+@Rowa A { less } B { equal } C { greater } D { question }
+@Rowa A { at } B { A } C { B } D { C }
+@Rowa A { D } B { E } C { F } D { G }
+@Rowa A { H } B { I } C { J } D { K }
+@Rowa A { L } B { M } C { N } D { O }
+@Rowa A { P } B { Q } C { R } D { S }
+@Rowa A { T } B { U } C { V } D { W }
+@Rowa A { X } B { Y } C { Z } D { bracketleft }
+@Rowa A { backslash } B { bracketright } C { asciicircum } D { underscore }
+@Rowa A { quoteleft } B { a } C { b } D { c }
+@Rowa A { d } B { e } C { f } D { g }
+@Rowa A { h } B { i } C { j } D { k }
+@Rowa A { l } B { m } C { n } D { o }
+@Rowa A { p } B { q } C { r } D { s }
+@Rowa A { t } B { u } C { v } D { w }
+@Rowa A { x } B { y } C { z } D { braceleft }
+@Rowa A { bar } B { braceright } C { asciitilde } D { dotlessi }
+@Rowa A { grave } B { acute } C { circumflex } D { tilde }
+@Rowa A { macron } B { breve } C { dotaccent } D { dieresis }
+@Rowa A { ring } B { cedilla } C { hungarumlaut } D { ogonek }
+@Rowa A { caron } B { space } C { exclamdown } D { cent }
+@Rowa A { sterling } B { currency } C { yen } D { brokenbar }
+@Rowa A { section } B { dieresis } C { copyright } D { ordfeminine }
+@Rowa A { guillemotleft } B { logicalnot } C { hyphen } D { registered }
+@Rowa A { macron } B { degree } C { plusminus } D { twosuperior }
+@Rowa A { threesuperior } B { acute } C { mu } D { paragraph }
+@Rowa A { periodcentered } B { cedilla } C { onesuperior } D { ordmasculine }
+@Rowa A { guillemotright } B { onequarter } C { onehalf } D { threequarters }
+@Rowa A { questiondown } B { Agrave } C { Aacute } D { Acircumflex }
+@Rowa A { Atilde } B { Adieresis } C { Aring } D { AE }
+@Rowa A { Ccedilla } B { Egrave } C { Eacute } D { Ecircumflex }
+@Rowa A { Edieresis } B { Igrave } C { Iacute } D { Icircumflex }
+@Rowa A { Idieresis } B { Eth } C { Ntilde } D { Ograve }
+@Rowa A { Oacute } B { Ocircumflex } C { Otilde } D { Odieresis }
+@Rowa A { multiply } B { Oslash } C { Ugrave } D { Uacute }
+@Rowa A { Ucircumflex } B { Udieresis } C { Yacute } D { Thorn }
+@Rowa A { germandbls } B { agrave } C { aacute } D { acircumflex }
+@Rowa A { atilde } B { adieresis } C { aring } D { ae }
+@Rowa A { ccedilla } B { egrave } C { eacute } D { ecircumflex }
+@Rowa A { edieresis } B { igrave } C { iacute } D { icircumflex }
+@Rowa A { idieresis } B { eth } C { ntilde } D { ograve }
+@Rowa A { oacute } B { ocircumflex } C { otilde } D { odieresis }
+@Rowa A { divide } B { oslash } C { ugrave } D { uacute }
+@Rowa A { ucircumflex } B { udieresis } C { yacute } D { thorn }
+@Rowb A { ydieresis }
+}
+Of course, many of these characters can also be typed directly, or with the
+aid of double quotes, as we have seen.  If your keyboard has accented
+accented @Index { accented characters }
+characters on it, you can type them directly too; if not, you need to
+use the @Code "@Char" symbol, in which case you will probably need
+braces as well:
+@ID @Code "gar{@Char ccedilla}on"
+to distinguish the @Code "@Char" symbol and the character name from
+adjacent letters.
+@PP
+Next we have the Adobe Systems Symbol font, a treasure trove of
+symbol. @Index { Symbol font }
+sym. @Index { @Code "@Sym" symbol }
+exotic characters obtained with the @Code "@Sym" symbol:
+@ID @OneRow -3p @Font @Tab
+    hmargin { 0.1c }
+    vmargin { 0.4vo }
+    @Fmta { @Col @CC @Sym A ! @Col @Code { "@Sym" A } ! @Col !
+            @Col @CC @Sym B ! @Col @Code { "@Sym" B } ! @Col !
+            @Col @CC @Sym C ! @Col @Code { "@Sym" C } ! @Col !
+            @Col @CC @Sym D ! @Col @Code { "@Sym" D } }
+{
+@Rowa A { space } B { exclam } C { universal } D { numbersign }
+@Rowa A { existential } B { percent } C { ampersand } D { suchthat }
+@Rowa A { parenleft } B { parenright } C { asteriskmath } D { plus }
+@Rowa A { comma } B { minus } C { period } D { slash }
+@Rowa A { zero } B { one } C { two } D { three }
+@Rowa A { four } B { five } C { six } D { seven }
+@Rowa A { eight } B { nine } C { colon } D { semicolon }
+@Rowa A { less } B { equal } C { greater } D { question }
+@Rowa A { congruent } B { Alpha } C { Beta } D { Chi }
+@Rowa A { Delta } B { Epsilon } C { Phi } D { Gamma }
+@Rowa A { Eta } B { Iota } C { theta1 } D { Kappa }
+@Rowa A { Lambda } B { Mu } C { Nu } D { Omicron }
+@Rowa A { Pi } B { Theta } C { Rho } D { Sigma }
+@Rowa A { Tau } B { Upsilon } C { sigma1 } D { Omega }
+@Rowa A { Xi } B { Psi } C { Zeta } D { bracketleft }
+@Rowa A { therefore } B { bracketright } C { perpendicular } D { underscore }
+@Rowa A { radicalex } B { alpha } C { beta } D { chi }
+@Rowa A { delta } B { epsilon } C { phi } D { gamma }
+@Rowa A { eta } B { iota } C { phi1 } D { kappa }
+@Rowa A { lambda } B { mu } C { nu } D { omicron }
+@Rowa A { pi } B { theta } C { rho } D { sigma }
+@Rowa A { tau } B { upsilon } C { omega1 } D { omega }
+@Rowa A { xi } B { psi } C { zeta } D { braceleft }
+@Rowa A { bar } B { braceright } C { similar } D { Upsilon1 }
+@Rowa A { minute } B { lessequal } C { fraction } D { infinity }
+@Rowa A { florin } B { club } C { diamond } D { heart }
+@Rowa A { spade } B { arrowboth } C { arrowleft } D { arrowup }
+@Rowa A { arrowright } B { arrowdown } C { degree } D { plusminus }
+@Rowa A { second } B { greaterequal } C { multiply } D { proportional }
+@Rowa A { partialdiff } B { bullet } C { divide } D { notequal }
+@Rowa A { equivalence } B { approxequal } C { ellipsis } D { arrowvertex }
+@Rowa A { arrowhorizex } B { carriagereturn } C { aleph } D { Ifraktur }
+@Rowa A { Rfraktur } B { weierstrass } C { circlemultiply } D { circleplus }
+@Rowa A { emptyset } B { intersection } C { union } D { propersuperset }
+@Rowa A { reflexsuperset } B { notsubset } C {propersubset} D {reflexsubset}
+@Rowa A { element } B { notelement } C { angle } D { gradient }
+@Rowa A { registerserif } B { copyrightserif } C {trademarkserif} D {product}
+@Rowa A { radical } B { dotmath } C { logicalnot } D { logicaland }
+@Rowa A { logicalor } B { arrowdblboth } C { arrowdblleft } D { arrowdblup }
+@Rowa A { arrowdblright } B { arrowdbldown } C { lozenge } D { angleleft }
+@Rowa A { registersans } B { copyrightsans } C {trademarksans} D {summation}
+@Rowa A { parenlefttp } B { parenleftex } C { parenleftbt } D {bracketlefttp}
+    vmargin { 0.5vx }
+@Rowa A { bracketleftex } B { bracketleftbt } C {bracelefttp} D {braceleftmid}
+    vmargin { 0.5vx }
+@Rowa A { braceleftbt } B { braceex } C { angleright } D { integral }
+    vmargin { 0.5vx }
+@Rowa A { integraltp } B { integralex } C { integralbt } D { parenrighttp }
+    vmargin { 0.5vx }
+@Rowa A {parenrightex} B {parenrightbt} C {bracketrighttp} D {bracketrightex}
+    vmargin { 0.5vx }
+@Rowa A { bracketrightbt } B {bracerighttp} C {bracerightmid} D {bracerightbt}
+    vmargin { 0.5vx }
+}
+There is only one Symbol font; it does not come in bold or italic faces
+like the other fonts.  Typing @Code "@B @Sym alpha" is therefore useless,
+and anyway there is no bold @Sym alpha character in any font distributed
+with Lout (except see Section {@NumberOf teq}).
+@PP
+Finally we have a few more characters that you get with the @Code "@Char"
+symbol, although they aren't ISO-LATIN-1 characters.
+@ID @OneRow -3p @Font @Tab
+    hmargin { 0.1c }
+    vmargin { 0.4vo }
+    @Fmta { @Col @CC @Char A ! @Col @Code { "@Char" A } ! @Col !
+            @Col @CC @Char B ! @Col @Code { "@Char" B } ! @Col !
+            @Col @CC @Char C ! @Col @Code { "@Char" C } ! @Col !
+            @Col @CC @Char D ! @Col @Code { "@Char" D } }
+    @Fmtb { @Col @CC @Char A ! @Col @Code { "@Char" A } ! @Col !
+            @Col ! @Col ! @Col ! @Col ! @Col  ! @Col ! @Col ! @Col  }
+{
+@Rowa A { quotesinglbase } B { quotedblbase } C { ellipsis } D { OE }
+@Rowa A { oe } B { quotedblleft } C { quotedblright } D { fi }
+@Rowa A { fl } B { endash } C { emdash } D { bullet }
+@Rowa A { dagger } B { daggerdbl } C { florin } D { fraction }
+}
+Most of these characters are also in the list of `characters important
+enough to deserve their own symbols' given above.
+@End @Section
diff --git a/doc/user/bas_conv b/doc/user/bas_conv
new file mode 100644
index 0000000..cd971b0
--- /dev/null
+++ b/doc/user/bas_conv
@@ -0,0 +1,75 @@
+@Section
+   @Title { Alternative conventions for white space }
+   @Tag { white }
+@Begin
+@PP
+As Section {@NumberOf spaces} explains, when two objects are separated
+by one or more white space characters (spaces, tabs, and newlines), this
+same amount of white space will separate the two objects in the output.
+@PP
+Two other conventions for interpreting these white spaces have been
+used in other document formatting systems.  Roughly, they are:
+@ID @Tab
+    @Fmta { @Col A ! @Col B }
+{
+@Rowa
+    A { troff }
+    B { Like Lout, except that at every point where a sentence ends at
+the end of an input line, add one extra space in the output. }
+@Rowa
+    A { @TeX }
+    B { Replace all sequences of two or more white spaces by one.  Then,
+at every point where a sentence ends, whether or not it is at the end
+of a line, add one extra space in the output. }
+}
+Lout offers these two alternative conventions by means of the
+initialspace. @Index { @Code "@InitialSpace" option }
+@Code "@InitialSpace" option.  This is similar to the
+@Code "@InitialFont" option described at the end of Section
+{@NumberOf fonts}, in that you can set it at the beginning of your
+document, like this:
+@ID @Code {
+"@SysInclude { doc }"
+"@Document"
+"    @InitialSpace { lout }"
+"//"
+"@Text @Begin"
+"..."
+"@End @Text"
+}
+or you can set it in the setup file.  The above example shows the
+default value, {@Code lout}, which produces Lout's usual spacing;
+lout.space @Index { @Code lout spacing }
+troff.space @Index { @Code troff spacing }
+tex.space @Index { @Code tex (@LaTeX) spacing }
+the alternative values are @Code "troff" and {@Code "tex"}.
+@PP
+How to tell whether a sentence has ended is a vexed question.  For
+the @Code "troff" method, Lout looks for a word at the end of a line
+ending in one of `.', `:', `?', or `!' optionally followed by either
+a right quote character or a right parenthesis.  Actually, this depends
+on the current language (Section {@NumberOf languages}); the rule just
+given is for English, and other languages may differ.
+@PP
+The @Code "tex" rule for where a sentence ends is slightly more
+complicated.  Lout looks for a word, not necessarily at the end
+of an input line, which ends as described for @Code "troff" but
+in addition has a lower-case letter preceding that.
+@PP
+In all cases you must use a paragraph symbol, such as @Code "@PP" or
+{@Code "@LP"}, to separate your paragraphs.  The common convention of
+other systems, that a blank line marks a paragraph, is never true of Lout.
+@PP
+Whatever rule is adopted, there are occasional exceptions where you
+will have to indicate explicitly whether you want an ordinary space
+or a between-sentences space.  For this there are two symbols,
+@Code "~" (ordinary space) and {@Code "~~"} (between-sentences
+space).  For example,
+@ID @Code "Dr.~Kingston"
+will produce an ordinary space between the two words, even with
+@Code "tex" which would otherwise consider that spot to be the end
+of a sentence.  Spaces adjacent to these two symbols have no effect on
+the result.  Please note however that @Code "~" produces an
+unbreakable space (that is, one that will never be replaced by the end of
+a line) in contrast to just leaving a space, which is breakable.
+@End @Section
diff --git a/doc/user/bas_date b/doc/user/bas_date
new file mode 100644
index 0000000..16ee433
--- /dev/null
+++ b/doc/user/bas_date
@@ -0,0 +1,84 @@
+@Section
+   @Title { The current date and time }
+   @Tag { date }
+@Begin
+@PP
+The @Code "@Date" and @Code "@Time" symbols produce the current date
+date. @Index @Code "@Date"
+time. @Index @Code "@Time"
+and time:
+@ID @Code "It is now @Time on @Date."
+produces something like
+@ID { It is now @Time on @Date. }
+The result depends on the current language.
+@PP
+Both symbols have a @Code "@Format" option that changes the format of
+the result:
+@ID @Code "@Date @Format { @DayNum\"/\"@MonthNum\"/\"@ShortYear }"
+The result is the @Code "@Format" option with the symbols replaced by
+the appropriate values:
+@ID { @Date @Format { @DayNum"/"@MonthNum"/"@ShortYear } }
+The @Code "/" characters have been enclosed in double quotes for the
+usual reason (Section {@NumberOf characters}).
+@PP
+Here is the full list of symbols that you can use within both
+@Code "@Format" options:
+@ID @OneRow @Tab
+    @Fmta { @Col @Code A ! @Col B }
+    vmargin { 0.5vx }
+{
+@Rowa
+    A { "@Year" }
+    B { The year, e.g. @Code "1994" }
+@Rowa
+    A { "@ShortYear" }
+    B { The last two digits of the year, e.g. @Code "94" }
+@Rowa
+    A { "@Month" }
+    B { The month, e.g. @Code "December" }
+@Rowa
+    A { "@ShortMonth" }
+    B { The month abbreviated, e.g. @Code "Dec" }
+@Rowa
+    A { "@MonthNum" }
+    B { The number of the month, between @Code "1" and @Code "12" }
+@Rowa
+    A { "@Day" }
+    B { The day of the week, e.g. @Code "Saturday" }
+@Rowa
+    A { "@ShortDay" }
+    B { The day abbreviated, e.g. @Code "Sat" }
+@Rowa
+    A { "@DayNum" }
+    B { The day of the month, between @Code "1" and @Code "31" }
+@Rowa
+    A { "@MeriDiem" }
+    B { @Code "a.m." or @Code "p.m." }
+@Rowa
+    A { "@ShortMeriDiem" }
+    B { @Code "am" or @Code "pm" }
+@Rowa
+    A { "@Hour" }
+    B { The hour, between @Code "00" and @Code "23" }
+@Rowa
+    A { "@ShortHour" }
+    B { The hour, between @Code "0" and @Code "23" }
+@Rowa
+    A { "@TwelveHour" }
+    B { The hour, between @Code "1" and @Code "12" }
+@Rowa
+    A { "@Minute" }
+    B { The minute, between @Code "00" and @Code "59" }
+@Rowa
+    A { "@Second" }
+    B { The second, almost always between @Code "00" and @Code "59" }
+}
+The default format for @Code "@Date" in English is
+@ID @Code "@Date @Format { @DayNum @Month, @Year }"
+and the default format for @Code "@Time" in English is
+@ID @Code "@Time @Format { @TwelveHour.@Minute @MeriDiem }"
+Both default formats depend on the current language, and
+so do {@Code "@Month"}, {@Code "@ShortMonth"},
+{@Code "@Day"}, and {@Code "@ShortDay"},{@Code "@MeriDiem" }
+and {@Code "@ShortMeriDiem" }.
+@End @Section
diff --git a/doc/user/bas_drop b/doc/user/bas_drop
new file mode 100644
index 0000000..0978123
--- /dev/null
+++ b/doc/user/bas_drop
@@ -0,0 +1,44 @@
+@Section
+   @Title { Drop capitals }
+   @Tag { dropcaps }
+@Begin
+@PP
+There are two symbols for producing drop capitals, {@Code "@DropCapTwo"}
+drop.cap.two.sym @Index @Code "@DropCapTwo"
+drop.cap.three.sym @Index @Code "@DropCapThree"
+and {@Code "@DropCapThree"}.  Place the capital to be dropped just
+before the symbol, and the rest of the paragraph after it:
+@ID @OneRow @Code {
+"I @DropCapTwo {"
+"t is a truth universally acknowledged, that a single man"
+"in possession of a good fortune, must be in want of a wife."
+"}"
+}
+produces the object
+@ID 3i @Wide {
+I @DropCapTwo {
+t is a truth universally acknowledged, that a single man
+in possession of a good fortune, must be in want of a wife.
+}
+}
+@Code "@DropCapThree" is the same except that the capital is larger
+and spreads over three lines.
+@PP
+Because Lout occasionally gets the height of the enlarged capital
+slightly wrong, there is a @Code "height" option which allows you
+to change the height if you need to:
+@ID @OneRow @Code {
+"H @DropCapTwo height { 1.5v }"
+"{"
+"   ..."
+"}"
+}
+This shows the default value for the height of the capital in
+{@Code "@DropCapTwo"}:  1.5 times the current inter-line
+spacing.  The default height in @Code "@DropCapThree" is {@Code "2.5v"}.
+@PP
+These symbols produce an object which may appear anywhere in the
+usual way.  A paragraph symbol will be needed after the paragraph.  The
+paragraph breaking style of the body of the paragraph will be
+{@Code "adjust nohyphen"}; this cannot be changed at present.
+@End @Section
diff --git a/doc/user/bas_empt b/doc/user/bas_empt
new file mode 100644
index 0000000..c9f615d
--- /dev/null
+++ b/doc/user/bas_empt
@@ -0,0 +1,26 @@
+@Section
+   @Title { The empty object }
+   @Tag { empty }
+@Begin
+@PP
+It is possible to produce examples in which an object is clearly
+empty. @Index { empty object }
+missing:
+@ID @Code "{ @I   }"
+The @Code "@I" symbol is supposed to italicize the following object,
+but in this example there isn't one.  A more plausible example is
+@ID @OneRow @Code {
+"@PP"
+"@PP"
+}
+There are supposed to be paragraph objects between paragraph symbols,
+but here there aren't.
+@PP
+Wherever an object is clearly missing, Lout inserts an @I { empty object },
+which is a rectangle of size zero by zero that prints as nothing.  Here
+are two other ways to get an empty object:
+@ID @Code "{}     \"\""
+Braces always enclose an object, so Lout is obliged to insert an empty
+object between them; the two double quotes make a word with no characters
+in it, which is taken to be an empty object.
+@End @Section
diff --git a/doc/user/bas_font b/doc/user/bas_font
new file mode 100644
index 0000000..65d711e
--- /dev/null
+++ b/doc/user/bas_font
@@ -0,0 +1,629 @@
+@Section
+   @Title { Fonts and font sizes }
+   @Tag { fonts }
+@Begin
+@PP
+A @I font is a collection of characters that may be printed.  For
+font. @Index { font }
+example, here is the Times Roman font:
+@ID @OneRow { Times Base } @Font 0.05c @Space {
+{ @Char space }
+{ @Char exclam }
+{ @Char quotedbl }
+{ @Char numbersign }
+{ @Char dollar }
+{ @Char percent }
+{ @Char ampersand }
+{ @Char quoteright }
+{ @Char parenleft }
+{ @Char parenright }
+{ @Char asterisk }
+{ @Char plus }
+{ @Char comma }
+{ @Char hyphen }
+{ @Char period }
+{ @Char slash }
+{ @Char zero }
+{ @Char one }
+{ @Char two }
+{ @Char three }
+{ @Char four }
+{ @Char five }
+{ @Char six }
+{ @Char seven }
+{ @Char eight }
+{ @Char nine }
+{ @Char colon }
+{ @Char semicolon }
+{ @Char less }
+{ @Char equal }
+{ @Char greater }
+{ @Char question }
+{ @Char at }
+{ @Char bracketleft }
+{ @Char backslash }
+{ @Char bracketright }
+{ @Char asciicircum }
+{ @Char underscore }
+{ @Char quoteleft }
+//1vx
+{ @Char A }
+{ @Char B }
+{ @Char C }
+{ @Char D }
+{ @Char E }
+{ @Char F }
+{ @Char G }
+{ @Char H }
+{ @Char I }
+{ @Char J }
+{ @Char K }
+{ @Char L }
+{ @Char M }
+{ @Char N }
+{ @Char O }
+{ @Char P }
+{ @Char Q }
+{ @Char R }
+{ @Char S }
+{ @Char T }
+{ @Char U }
+{ @Char V }
+{ @Char W }
+{ @Char X }
+{ @Char Y }
+{ @Char Z }
+//1vx
+{ @Char a }
+{ @Char b }
+{ @Char c }
+{ @Char d }
+{ @Char e }
+{ @Char f }
+{ @Char g }
+{ @Char h }
+{ @Char i }
+{ @Char j }
+{ @Char k }
+{ @Char l }
+{ @Char m }
+{ @Char n }
+{ @Char o }
+{ @Char p }
+{ @Char q }
+{ @Char r }
+{ @Char s }
+{ @Char t }
+{ @Char u }
+{ @Char v }
+{ @Char w }
+{ @Char x }
+{ @Char y }
+{ @Char z }
+//1vx
+{ @Char braceleft }
+{ @Char bar }
+{ @Char braceright }
+{ @Char asciitilde }
+{ @Char dotlessi }
+{ @Char grave }
+{ @Char acute }
+{ @Char circumflex }
+{ @Char tilde }
+{ @Char macron }
+{ @Char breve }
+{ @Char dotaccent }
+{ @Char dieresis }
+{ @Char ring }
+{ @Char cedilla }
+{ @Char hungarumlaut }
+{ @Char ogonek }
+{ @Char caron }
+{ @Char space }
+{ @Char exclamdown }
+{ @Char cent }
+{ @Char sterling }
+{ @Char currency }
+{ @Char yen }
+{ @Char brokenbar }
+{ @Char section }
+{ @Char dieresis }
+{ @Char copyright }
+{ @Char ordfeminine }
+{ @Char guillemotleft }
+{ @Char logicalnot }
+{ @Char hyphen }
+{ @Char registered }
+{ @Char macron }
+{ @Char degree }
+{ @Char plusminus }
+{ @Char twosuperior }
+{ @Char threesuperior }
+{ @Char acute }
+{ @Char mu }
+{ @Char paragraph }
+{ @Char periodcentered }
+{ @Char cedilla }
+{ @Char onesuperior }
+{ @Char ordmasculine }
+{ @Char guillemotright }
+{ @Char onequarter }
+{ @Char onehalf }
+{ @Char threequarters }
+{ @Char questiondown }
+//1vx
+{ @Char Agrave }
+{ @Char Aacute }
+{ @Char Acircumflex }
+{ @Char Atilde }
+{ @Char Adieresis }
+{ @Char Aring }
+{ @Char AE }
+{ @Char Ccedilla }
+{ @Char Egrave }
+{ @Char Eacute }
+{ @Char Ecircumflex }
+{ @Char Edieresis }
+{ @Char Igrave }
+{ @Char Iacute }
+{ @Char Icircumflex }
+{ @Char Idieresis }
+{ @Char Eth }
+{ @Char Ntilde }
+{ @Char Ograve }
+{ @Char Oacute }
+{ @Char Ocircumflex }
+{ @Char Otilde }
+{ @Char Odieresis }
+{ @Char multiply }
+{ @Char Oslash }
+{ @Char Ugrave }
+{ @Char Uacute }
+{ @Char Ucircumflex }
+{ @Char Udieresis }
+{ @Char Yacute }
+{ @Char Thorn }
+//1vx
+{ @Char germandbls }
+{ @Char agrave }
+{ @Char aacute }
+{ @Char acircumflex }
+{ @Char atilde }
+{ @Char adieresis }
+{ @Char aring }
+{ @Char ae }
+{ @Char ccedilla }
+{ @Char egrave }
+{ @Char eacute }
+{ @Char ecircumflex }
+{ @Char edieresis }
+{ @Char igrave }
+{ @Char iacute }
+{ @Char icircumflex }
+{ @Char idieresis }
+{ @Char eth }
+{ @Char ntilde }
+{ @Char ograve }
+{ @Char oacute }
+{ @Char ocircumflex }
+{ @Char otilde }
+{ @Char odieresis }
+{ @Char divide }
+{ @Char oslash }
+{ @Char ugrave }
+{ @Char uacute }
+{ @Char ucircumflex }
+{ @Char udieresis }
+{ @Char yacute }
+{ @Char thorn }
+{ @Char ydieresis }
+}
+and here is the Times Italic font:
+@ID @OneRow { Times Slope } @Font 0.05c @Space {
+{ @Char space }
+{ @Char exclam }
+{ @Char quotedbl }
+{ @Char numbersign }
+{ @Char dollar }
+{ @Char percent }
+{ @Char ampersand }
+{ @Char quoteright }
+{ @Char parenleft }
+{ @Char parenright }
+{ @Char asterisk }
+{ @Char plus }
+{ @Char comma }
+{ @Char hyphen }
+{ @Char period }
+{ @Char slash }
+{ @Char zero }
+{ @Char one }
+{ @Char two }
+{ @Char three }
+{ @Char four }
+{ @Char five }
+{ @Char six }
+{ @Char seven }
+{ @Char eight }
+{ @Char nine }
+{ @Char colon }
+{ @Char semicolon }
+{ @Char less }
+{ @Char equal }
+{ @Char greater }
+{ @Char question }
+{ @Char at }
+{ @Char bracketleft }
+{ @Char backslash }
+{ @Char bracketright }
+{ @Char asciicircum }
+{ @Char underscore }
+{ @Char quoteleft }
+//1vx
+{ @Char A }
+{ @Char B }
+{ @Char C }
+{ @Char D }
+{ @Char E }
+{ @Char F }
+{ @Char G }
+{ @Char H }
+{ @Char I }
+{ @Char J }
+{ @Char K }
+{ @Char L }
+{ @Char M }
+{ @Char N }
+{ @Char O }
+{ @Char P }
+{ @Char Q }
+{ @Char R }
+{ @Char S }
+{ @Char T }
+{ @Char U }
+{ @Char V }
+{ @Char W }
+{ @Char X }
+{ @Char Y }
+{ @Char Z }
+//1vx
+{ @Char a }
+{ @Char b }
+{ @Char c }
+{ @Char d }
+{ @Char e }
+{ @Char f }
+{ @Char g }
+{ @Char h }
+{ @Char i }
+{ @Char j }
+{ @Char k }
+{ @Char l }
+{ @Char m }
+{ @Char n }
+{ @Char o }
+{ @Char p }
+{ @Char q }
+{ @Char r }
+{ @Char s }
+{ @Char t }
+{ @Char u }
+{ @Char v }
+{ @Char w }
+{ @Char x }
+{ @Char y }
+{ @Char z }
+//1vx
+{ @Char braceleft }
+{ @Char bar }
+{ @Char braceright }
+{ @Char asciitilde }
+{ @Char dotlessi }
+{ @Char grave }
+{ @Char acute }
+{ @Char circumflex }
+{ @Char tilde }
+{ @Char macron }
+{ @Char breve }
+{ @Char dotaccent }
+{ @Char dieresis }
+{ @Char ring }
+{ @Char cedilla }
+{ @Char hungarumlaut }
+{ @Char ogonek }
+{ @Char caron }
+{ @Char space }
+{ @Char exclamdown }
+{ @Char cent }
+{ @Char sterling }
+{ @Char currency }
+{ @Char yen }
+{ @Char brokenbar }
+{ @Char section }
+{ @Char dieresis }
+{ @Char copyright }
+{ @Char ordfeminine }
+{ @Char guillemotleft }
+{ @Char logicalnot }
+{ @Char hyphen }
+{ @Char registered }
+{ @Char macron }
+{ @Char degree }
+{ @Char plusminus }
+{ @Char twosuperior }
+{ @Char threesuperior }
+{ @Char acute }
+{ @Char mu }
+{ @Char paragraph }
+{ @Char periodcentered }
+{ @Char cedilla }
+{ @Char onesuperior }
+{ @Char ordmasculine }
+{ @Char guillemotright }
+{ @Char onequarter }
+{ @Char onehalf }
+{ @Char threequarters }
+{ @Char questiondown }
+//1vx
+{ @Char Agrave }
+{ @Char Aacute }
+{ @Char Acircumflex }
+{ @Char Atilde }
+{ @Char Adieresis }
+{ @Char Aring }
+{ @Char AE }
+{ @Char Ccedilla }
+{ @Char Egrave }
+{ @Char Eacute }
+{ @Char Ecircumflex }
+{ @Char Edieresis }
+{ @Char Igrave }
+{ @Char Iacute }
+{ @Char Icircumflex }
+{ @Char Idieresis }
+{ @Char Eth }
+{ @Char Ntilde }
+{ @Char Ograve }
+{ @Char Oacute }
+{ @Char Ocircumflex }
+{ @Char Otilde }
+{ @Char Odieresis }
+{ @Char multiply }
+{ @Char Oslash }
+{ @Char Ugrave }
+{ @Char Uacute }
+{ @Char Ucircumflex }
+{ @Char Udieresis }
+{ @Char Yacute }
+{ @Char Thorn }
+//1vx
+{ @Char germandbls }
+{ @Char agrave }
+{ @Char aacute }
+{ @Char acircumflex }
+{ @Char atilde }
+{ @Char adieresis }
+{ @Char aring }
+{ @Char ae }
+{ @Char ccedilla }
+{ @Char egrave }
+{ @Char eacute }
+{ @Char ecircumflex }
+{ @Char edieresis }
+{ @Char igrave }
+{ @Char iacute }
+{ @Char icircumflex }
+{ @Char idieresis }
+{ @Char eth }
+{ @Char ntilde }
+{ @Char ograve }
+{ @Char oacute }
+{ @Char ocircumflex }
+{ @Char otilde }
+{ @Char odieresis }
+{ @Char divide }
+{ @Char oslash }
+{ @Char ugrave }
+{ @Char uacute }
+{ @Char ucircumflex }
+{ @Char udieresis }
+{ @Char yacute }
+{ @Char thorn }
+{ @Char ydieresis }
+}
+As their names imply, these two fonts belong to the @I { Times family },
+a collection of fonts designed to go well together.  Every font has a
+@I { family name }, such as Times, Helvetica, or Courier, and a
+family.name @Index { family name of font }
+face.name @Index { face name of font }
+@I { face name }, such as Roman or Italic.  To find out how to
+get the unusual characters, see Section {@NumberOf characters}.
+@PP
+Documents look best when they use just one font family, so the most
+common need is to change to a different face within the current
+family.  We have already seen {@Code "@I"}, which changes to the Italic
+face of the current family; there are six such symbols:
+b. @Index @Code "@B"
+i. @Index @Code "@I"
+bi. @Index @Code "@BI"
+ii. @Index @Code "@II"
+s. @Index @Code "@S"
+r. @Index @Code "@R"
+@ID @OneRow @Tab
+    @Fmta { @Col @Code A ! @Col B }
+{
+@Rowa
+    A { "@B { Hello World }" }
+    B {  @B { Hello World }  }
+@Rowa
+    A { "@I { Hello World }" }
+    B {  @I { Hello World }  }
+@Rowa
+    A { "@BI { Hello World }" }
+    B {  @BI { Hello World }  }
+@Rowa
+    A { "@II { Hello World }" }
+    B {  @II { Hello World }  }
+@Rowa
+    A { "@S { Hello World }" }
+    B {  @S { Hello World }  }
+@Rowa
+    A { "@R { Hello World }" }
+    B {  @R { Hello World }  }
+}
+The symbols' names stand for Bold, Italic, Bold-Italic, Italic-Italic
+(see below), Small capitals, and Roman.  It is conventional to use Bold
+for headings; Italic for emphasis, terms being defined, and subsidiary
+headings; and Roman for the rest.  Small capitals are not really a
+different font; they are
+small.caps @Index { small capitals }
+made on demand from the current font.  So you can write, for example,
+@ID @Code "@I @S { Hello World }"
+and get @I @S { Hello World }.
+@PP
+The @Code "@R" symbol is almost unnecessary, since the document as a
+whole is set in a Roman face; but it is occasionally useful:
+@ID @Code "@I { An Italic sentence with one @R Roman word }"
+produces
+@ID @I { An Italic sentence with one @R Roman word }
+This illustrates the general principle that the effect of a font symbol
+on the following object is subject to font symbols within that object.
+@PP
+When part of a title is to be set in italic font, neither @Code "@I"
+nor @Code "@BI" is suitable because the part should appear in bold
+italics in the title itself, but in ordinary italics in running headers
+and the table of contents.  The @Code "@II" symbol is the one for this
+situation:  it produces bold italics when the current font is bold,
+and ordinary italics otherwise.
+@PP
+Changing families is a little more complicated.  Here is the complete
+list of font families and their faces available with Basser Lout Version 3:
+@ID @OneRow @Tab
+    @Fmta { @Col @Code A ! @Col { ragged nohyphen } @Break @Code B }
+{
+@Rowa
+    A { AvantGarde }
+    B { Base Slope Bold BoldSlope BoldObl Book BookOblique
+CondBold CondBook CondDemi CondMedium Demi DemiOblique
+ExtraLight ExtraLightObl Medium MediumObl }
+@Rowa
+    A { Bookman }
+    B { Base Slope Bold BoldSlope BoldItalic Demi DemiItalic
+Light LightItalic Medium MediumItalic }
+@Rowa
+    A { Chancery }
+    B { Base Slope Bold BoldSlope
+Roman Bold Italic Light Demi LightItalic MediumItalic
+}
+@Rowa
+    A { Courier }
+    B { Base Slope Bold BoldSlope BoldOblique Oblique }
+@Rowa
+    A { Helvetica }
+    B { Base Slope Bold BoldSlope Black BlackOblique
+BoldOblique Compressed Cond CondBlack CondBlackObl
+CondBold CondBoldObl CondLight CondLightObl
+CondOblique ExtraCompressed
+Light LightOblique Narrow NarrowBold NarrowBoldObl
+NarrowObl Oblique UltraCompressed }
+@Rowa
+    A { Schoolbook }
+    B { Base Slope Bold BoldSlope BoldItalic Italic Roman }
+@Rowa
+    A { Palatino }
+    B { Base Slope Bold BoldSlope BoldItalic
+BoldItalicOsF BoldOsF Italic ItalicOsF Roman SC }
+@Rowa
+    A { Symbol }
+    B { Base Slope Bold BoldSlope }
+@Rowa
+    A { Times }
+    B { Base Slope Bold BoldSlope BoldItalic
+BoldItalicOsF BoldSC ExtraBold Italic ItalicOsF
+Roman RomanSC Semibold SemiboldItalic }
+@Rowa
+    A { Dingbats }
+    B { Base Slope Bold BoldSlope }
+}
+Lout understands all these fonts, but your printing device may not.  Times,
+Helvetica, Courier, and Symbol at least seem to be ubiquitous, although
+not in every face.  These fonts work only with languages that use the
+Latin1 character set; consult Section {@NumberOf languages} for more
+information about this.  It is not difficult for a Lout expert to extend this
+list @Cite { $kingston1995lout.expert }.
+@PP
+It is a convention in Lout that every font family should at least
+base. @Index { @Code Base font }
+slope. @Index { @Code Slope font }
+bold. @Index { @Code Bold font }
+boldslope. @Index { @Code BoldSlope font }
+contain faces called @Code { Base }, @Code { Slope }, @Code { Bold },
+and @Code { BoldSlope }, and these faces are what the @Code { "@R" },
+@Code { "@I" }, @Code { "@B" }, and @Code { "@BI" } symbols give you.  But
+this convention is something of a fiction for two reasons.  First,
+some font families don't have faces that could reasonably be described as
+bold or whatever.  In particular, the @Code Symbol family contains just
+one face, and all four conventional face names produce that face.  Second,
+the four conventional face names are not names that typographers actually
+use, @Code { Bold } excepted.  @Code { Slope } produces an italic face
+in some families and an oblique one in others.  As the table shows, the
+true names are available if you want to use them, but it is very convenient
+to have a @Code { Slope } face that is guaranteed to exist no matter which
+family is used.
+@PP
+The @Code "@Font" symbol changes the font of the following object.  For
+font.sym @Index @Code "@Font"
+example,
+@ID @Code "{ Helvetica Slope } @Font { Hello World }"
+produces
+@ID { Helvetica Slope } @Font { Hello World }
+When changing to a different family, a face name must follow the family
+name; but when changing face within a family, just the face name is
+sufficient.
+@PP
+To make the characters larger or smaller, you need to change the
+font.size @Index { font size }
+@I { font size }, which can also be done with the @Code "@Font"
+symbol.  Font sizes are traditionally measured in {@I points}:  there
+are 72 points to one inch, and the most common font sizes are 12 point
+and 10 point.  However, as Section {@NumberOf objects} explains in
+detail, any length including fractional lengths is acceptable:
+@ID @Code "24p @Font { Hello World }"
+changes to 24 point size, producing
+@ID 24p @Font { Hello World }
+It is also possible to specify a font size relative to the current
+size:  @Code "+2p" means two points larger, @Code "-2p" means two
+points smaller, and @Code "1.5f" means 1.5 times the current font
+size.
+@PP
+For the convenience of people who use fixed width fonts such as
+Courier, there is an @Code "@F" symbol which switches to a
+fixed width font family:
+@ID @Code "@F { Hello world }"
+produces
+@ID @F { Hello world }
+It is the same as writing @Code "{ Courier Base -1p } @Font ..."
+with the @Code "-1p" included to compensate for the relatively
+large appearance of the Courier font.
+@PP
+The document as a whole will be set in @Code { Times Base 12p }.  To
+change this you need to change the @Code "@InitialFont" option, for
+initialfont. @Index @Code "@InitialFont"
+example to
+@ID @Code "@InitialFont { Helvetica Base 10p }"
+to get Helvetica 10 point.  You must give all three parts in
+{@Code "@InitialFont"}:  family, face, size.  If you are using your own
+setup file, as explained in Section {@NumberOf setup}, you can find the
+@Code "@InitialFont" option there.  If not, you can set it at the
+beginning of your document as explained in Section {@NumberOf ordinary}.
+@PP
+There are two features that make fonts look better on the
+page.  @I Ligatures are pairs of letters run together; the most
+ligatures. @Index { ligatures }
+common ligatures are `fi' and `fl.'  @I Kerning is moving adjacent
+kerning. @Index { kerning }
+letters closer together, for example in `VA.'  Lout considers
+ligatures and kerning to be integral parts of each font; you can prevent
+them from happening only by enclosing one of the letters in a
+@Code "@OneCol" symbol, as in {@Code "@OneCol { V }A" }.
+@End @Section
diff --git a/doc/user/bas_head b/doc/user/bas_head
new file mode 100644
index 0000000..4410c08
--- /dev/null
+++ b/doc/user/bas_head
@@ -0,0 +1,32 @@
+@Section
+   @Title { Headings }
+   @Tag { headings }
+@Begin
+@PP
+The @Code "@Heading" symbol makes the following object into a
+heading. @Index @Code "@Heading"
+heading.  Actually, all it does is change the font, so if you want a
+centred heading you have to display it as well:
+@ID @OneRow @Code {
+"@Display @Heading { A Centred Heading }"
+"Following text"
+}
+If you want a left-justified heading, use @Code "@LeftDisplay" instead
+of @Code {"@Display"}.  Alternatively, you can use no display symbol at
+all, but then you will need paragraph symbols before and after:
+@ID @OneRow @Code {
+"@DP"
+"@Heading { A Left-Justified Heading }"
+"@PP"
+"Following text"
+}
+The font used is @Code Bold in the current family, although you can
+change this by changing the @Code "@HeadingFont" option in the setup
+headingfont. @Index @Code "@HeadingFont"
+file (Section {@NumberOf setup}).
+@PP
+The @Code "@Heading" symbol may be used with any type of document, but it
+is really intended only for simple ones.  In complex documents, large-scale
+structure symbols (Section {@NumberOf largescale}) are usually more
+appropriate.
+@End @Section
diff --git a/doc/user/bas_hyph b/doc/user/bas_hyph
new file mode 100644
index 0000000..6997f41
--- /dev/null
+++ b/doc/user/bas_hyph
@@ -0,0 +1,37 @@
+@Section
+   @Title { Hyphenation }
+   @Tag { hyph }
+@Begin
+@PP
+The @Code "@Break" symbol also controls hyphenation:  @Code "hyphen"
+hyphenation. @Index hyphenation
+@Code "@Break" turns it on, @Code "nohyphen" @Code "@Break" turns it
+off.  For example, ragged breaking is often done without hyphenation:
+@ID @OneRow @Code {
+"@IndentedDisplay { ragged nohyphen } @Break {"
+"This little paragraph will appear with"
+"ragged ends to its lines."
+"}"
+}
+Lout's method of choosing hyphenation points is copied from the @TeX
+tex.hyph @SubIndex { hyphenation }
+system, except that Lout will never place a hyphen within a sequence
+of characters that form a ligature (fl and
+ligatures.hyph @SubIndex { and hyphenation }
+fi are the most common ligatures).
+@PP
+Hyphenation usually works well by itself; you should never need to
+interfere with its ideas of what to do.  However, if you do want
+to tell Lout where you think a hyphen could be inserted, you can
+use the @Code "&-" symbol:
+@IndentedDisplay @Code {
+"after&-math"
+}
+If @Code "&-" occurs directly after a hyphen character, hyphenation
+will be permitted but no extra hyphen will be inserted.  To prevent
+hyphenation of a word, enclose the word in a @Code "@OneCol" symbol.
+@PP
+To turn hyphenation off throughout the document, you need to set the
+@Code "@InitialBreak" option to {@Code "nohyphen"}, as described at the
+end of Section {@NumberOf linespace}.
+@End @Section
diff --git a/doc/user/bas_lang b/doc/user/bas_lang
new file mode 100644
index 0000000..3b32a94
--- /dev/null
+++ b/doc/user/bas_lang
@@ -0,0 +1,85 @@
+@Section
+   @Title { Languages other than English }
+   @Tag { languages }
+@Begin
+@PP
+When part of a document is written in a language other than English,
+languages. @Index { languages other than English }
+Lout should be informed of this using the @Code "@Language" symbol:
+language. @Index @Code "@Language"
+@ID @OneRow @Code {
+"... the garter, he said:  French @Language { `Honi soit qui mal y"
+"pense' }, and this saying ..."
+}
+Changing language is quite analogous to changing font using the
+@Code "@Font" symbol.
+@PP
+Since accented characters (Section {@NumberOf characters}) are always
+available irrespective of the language, at first sight it might seem
+that there is no need to bother informing Lout what language you are
+writing in.  However, words are hyphenated differently depending on the
+hyphenation.languages @SubIndex { in languages other than English }
+language, and some symbols have different results in different
+languages.  For example,
+@ID @Code "Danish @Language @Date"
+produces
+@ID { Danish @Language @Date }
+date.languages @SubIndex { in languages other than English }
+time.languages @SubIndex { in languages other than English }
+lists.languages @SubIndex { in languages other than English }
+and the alphabetic list symbols of Section {@NumberOf lists} also
+vary with the current language.  So it's worth doing for the sake of
+knowing that non-English parts will appear as they should.
+@PP
+At the time of writing, the following languages were available:
+@ID @OneRow @Code {
+Czech Cesky Cestina
+Danish Dansk
+Dutch Nederlands
+English
+EnglishUK
+Finnish Suomi
+French Francais Fran{@Char ccedilla}ais
+German Deutsch
+Hungarian Magyar
+Italian Italiano
+Norwegian Norsk
+Polish Polski
+Russian
+Slovenian Slovenia Slovenija
+Spanish Espa{@Char ntilde}ol
+Swedish Svenska
+}
+As shown, most languages have alternative names, all equally acceptable
+to the @Code "@Language" symbol.  @Code "EnglishUK" differs from
+@Code "English" only by applying hyphenation rules said to be more
+appropriate for British English.  Hungarian does not yet allow
+hyphenation.
+@PP
+If your entire document is in a language other than English, you need
+to change the @Code "@InitialLanguage" option:
+initiallanguage. @Index @Code "@InitialLanguage"
+@ID @Code "@InitialLanguage { Deutsch }"
+If you are using your own setup file (Section {@NumberOf setup}), you
+can change it there.  If not, you can change it at the start of your
+document, as explained in Section {@NumberOf ordinary}.
+@PP
+Czech, Polish, and Slovenian use the ISO-LATIN-2 character set, and
+users of these languages have to place
+@ID @Code "@SysInclude { latin2 }"
+at the very start of their documents in order to get access to the
+ISO-LATIN-2 versions of the fonts.  These have family names such as
+TimesCE, CourierCE, HelveticaCE, and so on, to distinguish them
+from the same fonts encoded in ISO-LATIN-1.  The face names are
+unchanged.  Consult file @Code "latin2.fd" in the standard include
+directory for a complete list of these fonts.
+@PP
+Russian uses Cyrillic characters.  In principle, users of Russian
+have to place
+@ID @Code "@SysInclude { russian }"
+at the very start of their documents in order to get access to
+Cyrillic fonts.  However no such fonts are distributed
+with the current version of Lout, so this line does nothing at
+present.  Other left-to-right languages are easily added, so
+consult the author if your language is not listed.
+@End @Section
diff --git a/doc/user/bas_line b/doc/user/bas_line
new file mode 100644
index 0000000..3210cdc
--- /dev/null
+++ b/doc/user/bas_line
@@ -0,0 +1,43 @@
+@Section
+   @Title { Line spacing }
+   @Tag { linespace }
+@Begin
+@PP
+The @Code "@Break" symbol also controls the amount of space placed
+line.spacing @Index { line spacing }
+between the lines of paragraphs.  This distance is best given using the
+@Code "v" unit of measurement:  @Code "1v" is the current line
+separation (see Section {@NumberOf objects} for a description of
+lengths in general).  For example,
+@ID @Code "2vx @Break ..."
+produces double spacing in the paragraphs of the following object, and
+double.spacing @Index { double spacing }
+@ID @Code "0.9vx @Break ..."
+produces cramped spacing, which can be useful in large tables that don't
+quite fit on one page.  The @Code "x" following the @Code "v" is required,
+but its meaning is beyond our scope @Cite { $kingston1995lout.expert }.
+@PP
+To set the entire document in a different line spacing from the
+initialbreak @Index @Code "@InitialBreak"
+default, you need to change the @Code "@InitialBreak" option.  If you
+are using your own setup file (Section {@NumberOf setup}),
+change it there.  If not, you can change it at the beginning of your
+document, as described in Section {@NumberOf ordinary}.
+@PP
+The default value of the @Code "@InitialBreak" option produces the
+@Code "adjust" paragraph breaking style with a line spacing of 1.20
+times the current (that is, the initial) font size, and hyphenation
+on:
+@ID @Code "@InitialBreak { adjust 1.20fx hyphen }"
+To get double spacing, change it to
+@ID @Code "@InitialBreak { adjust 2.40fx hyphen }"
+To get ragged paragraphs with hyphenation off, change it to
+@ID @Code "@InitialBreak { ragged 1.20fx nohyphen }"
+and so on.  It is a good idea to define the initial line spacing using
+the @Code "f" unit, since then if you change the initial font size the
+line spacing will change with it.  However, any length (Section
+{@NumberOf objects}) with an @Code "x" appended will do:  @Code "14px"
+for 14 point, @Code "0.5cx" for 0.5 centimetres, etc.  Don't use the
+@Code "v" unit though, because it refers to some @I previous line
+spacing, whereas here we are defining the line spacing for the first time.
+@End @Section
diff --git a/doc/user/bas_objs b/doc/user/bas_objs
new file mode 100644
index 0000000..f6a2f78
--- /dev/null
+++ b/doc/user/bas_objs
@@ -0,0 +1,141 @@
+@Section
+   @Title { Objects, symbols, options, and lengths }
+   @Tag { objects }
+@Begin
+@PP
+Lout is not concerned with the exact shapes of individual characters,
+only with the rectangular areas they occupy:
+@ID {
+@Box margin { 0c } B &
+@Box margin { 0c } i &
+@Box margin { 0c } o &
+@Box margin { 0c } l &
+@Box margin { 0c } o &
+@Box margin { 0c } g &
+@Box margin { 0c } y
+}
+When letters join together into a word, the result is a larger rectangle
+enclosing them all:
+@ID @Box margin { 0c } Biology
+When words join into lines we get even larger rectangles:
+@ID @Box margin { 0c } { Biology is the study of living things. }
+and so on up through paragraphs and columns to the largest rectangles,
+which are pages.  We call any such rectangle, whether made up of one
+character, one word, one line, one paragraph, one page, or anything
+object. @Index { object }
+else, an @I { object }.
+@PP
+We also often say, for example, `the object
+{@Code "@I { Hello world }"},' referring to a piece of Lout's input as
+an object.  This makes sense because we are anticipating the result
+produced, in this case the object @I { Hello world }.  It's true that if
+a line break happens to fall between @I Hello and @I { world }, the
+result of @Code "@I { Hello world }" is not a single rectangle.  We
+answer this by thinking of objects as existing before paragraph breaking
+rearranges them.
+@PP
+Not everything is an object, however.  @Code "@I" alone is not an object,
+merely a symbol with the potential of producing an object when given an
+object to work on.  To understand this, ask yourself what rectangle
+@Code "@I" alone could possibly represent:  there is no such rectangle.
+@PP
+It helps to imagine the assembly of objects taking place before your
+eyes.  Look at @Code Hello and imagine the objects H, e, l, l, o being
+assembled into the larger object Hello; look at @Code "Hello world"
+and imagine Hello and world being assembled into Hello world.  When
+looking at
+@ID @Code "@I { Hello world }"
+you need to imagine the @Code "@I" symbol consuming the following object,
+Hello world, and replacing it with the object @I { Hello world }.  Here
+is another example:
+@ID @Code "@CurveBox { Hello world }"
+The @Code "@CurveBox" symbol (Section {@NumberOf boxes}) consumes
+Hello world and replaces it with the object
+@ID @CurveBox { Hello world }
+This brings us to a basic principle of Lout:  @I { Where you can put
+one object, you can put any object }.  A few examples will show the
+vast range of possibilities opened up by this:
+@ID @Code "@CurveBox { @I Hello world }"
+produces
+@ID @CurveBox { @I Hello world }
+It doesn't bother @Code "@CurveBox" if one of the words inside
+it is in italics.  Next:
+@ID @Code "@I @CurveBox { Hello world }"
+produces
+@ID @I @CurveBox { Hello world }
+The object following @Code "@I" cannot be just @Code {"@CurveBox"},
+since that is not an object by itself (it needs to be applied to some
+object first).  So the object following @Code "@I" is
+@Code {"@CurveBox { Hello world }"}, and it is this that is consumed by
+@Code "@I" and modified.  The @Code "@I" symbol is happy to hunt
+through the object looking for words to italicize.  We could go on
+indefinitely in this way, producing
+@ID @CurveBox { @CurveBox Hello @CurveBox world }
+for example by {@Code "@CurveBox { @CurveBox Hello @CurveBox world }"}.
+@PP
+Symbols like @Code "@CurveBox" often have @I { options }, which are
+option. @Index { option }
+subsidiary symbols that modify the result.  For example, @Code "@CurveBox"
+has @Code "margin" and @Code "paint" options:
+@ID @OneRow @Code {
+"@CurveBox"
+"    margin { 0.5c }"
+"    paint { lightgrey }"
+"{ Hello world }"
+}
+Options come immediately after the main symbol, before any following
+object.  Each consists of the option name followed by the value we want
+the option to have, always enclosed in braces.  Setting out options on
+separate lines as we have done above makes them easy to see but is not
+compulsory (end of line and space are the same to Lout).  The result,
+naturally enough, is a curved box with a 0.5 centimetre margin around
+its contents, painted light grey:
+@ID @CurveBox
+    margin { 0.5c }
+    paint { lightgrey }
+{ Hello world }
+Options are optional:  if you leave out an option, Lout supplies a
+sensible @I default value for it.  Options may be given in any
+order.  They are a very useful way of adding flexibility to symbols
+without cluttering things up when they aren't needed.  They also help
+with learning:  you can learn the basic symbol first and worry about
+the options later.
+@PP
+Whenever a length is required, as in the @Code margin option above, it
+length. @Index { length }
+centimetres. @Index { centimetres }
+inches. @Index { inches }
+point.unit @Index { point (unit of measurement) }
+em.unit @Index { em (unit of measurement) }
+f.unit @Index { @Code f unit of measurement }
+s.unit @Index { @Code s unit of measurement }
+v.unit @Index { @Code v unit of measurement }
+units.of @Index { units of measurement }
+may be given using any one of the following seven units of measurement:
+@ID @OneRow @Tab
+    @Fmta { @Col @Code A ! @Col B }
+    vmargin { 0.5vx }
+{
+@Rowa A { c } B { Centimetres }
+@Rowa A { i } B { Inches ({@Code "1i"} = {@Code "2.54c"}) }
+@Rowa A { p } B { Points ({@Code "72p"} = {@Code "1i"}) }
+@Rowa A { m } B { Ems ({@Code "12m"} = {@Code "1i"}) }
+@Rowa A { f } B { @Code "1f" is the current font size }
+@Rowa A { s } B { @Code "1s" is the current width of a space character }
+@Rowa A { v } B { @Code "1v" is the current inter-line spacing }
+}
+The first four all define absolute distances and are strictly
+interchangeable.  It is traditional to measure font sizes in points; typical
+sizes are @Code "12p" and {@Code "10p"}, but fractional sizes are allowed.
+@PP
+If you use the @Code "f" unit, the length will depend on the current
+font size.  This can be very useful.  For example, the default value of
+the @Code "margin" option of @Code "@CurveBox" is @Code "0.3f" (0.3
+times the current font size).  If you use a large font, for example in
+an overhead transparency, you get a correspondingly large margin without
+having to ask for it.
+@PP
+The @Code "s" and @Code "v" units are less useful.  The @Code "v" unit
+is used within paragraph symbols (Section {@NumberOf paragraphs}) to
+ensure that the space between paragraphs widens with the inter-line spacing.
+@End @Section
diff --git a/doc/user/bas_par1 b/doc/user/bas_par1
new file mode 100644
index 0000000..de3da37
--- /dev/null
+++ b/doc/user/bas_par1
@@ -0,0 +1,105 @@
+@Section
+   @Title { Starting a new line, paragraph, or page }
+   @Tag { paragraphs }
+@Begin
+@PP
+The usual way to start a new paragraph is with the @Code "@PP" `plain
+pp. @Index @Code "@PP"
+paragraphs. @Index { paragraph symbols }
+paragraph' symbol.  It produces a small vertical space and indents the
+first line of the new paragraph.  Some document formatting systems
+interpret a blank line as a request to start a new paragraph.  This is
+not the case with Lout:  a blank line is two line-endings, equivalent to
+two spaces.
+@PP
+The @Code "@LP" `left paragraph' symbol produces the same
+lp. @Index @Code "@LP"
+vertical space as {@Code "@PP"}, but omits the indent.  The @Code "@LLP"
+`left line paragraph' symbol starts a new paragraph using
+llp. @Index @Code "@LLP"
+the usual inter-line spacing and no indent, or in other words it starts a
+new line.  If you are using it to create single lines, you need the
+@Code "lines" paragraph breaking style instead (Section {@NumberOf paras}).
+@PP
+The @Code "@DP" `display paragraph' symbol produces a somewhat larger
+dp. @Index @Code "@DP"
+vertical space, equal to the amount used before and after displays
+(Section {@NumberOf displays}), with no indent.  To get even larger
+vertical spaces, use @Code "@DP" repeatedly.  Another symbol,
+{@Code "@LOP"}, leaves a paragraph break the size of the gap left
+lop. @Index @Code "@LOP"
+outside (that is, before and after) lists (Section {@NumberOf lists}).  This
+is usually equal to {@Code "@DP"}.
+@PP
+The {@Code "@NP"} `new page' symbol causes the following paragraph to
+page. @Index { page, skipping to next }
+new.page @Index { new page }
+np. @Index @Code "@NP"
+begin on a new page or column.  Of course, Lout starts a new page or
+column automatically when the old one is full, so @Code "@NP" is needed
+only rarely.
+@PP
+To make each section begin on a new page you must set the @Code "@SectionGap"
+sectiongap. @Index @Code "@SectionGap"
+setup file option (Section {@NumberOf largescale}).  To make one particular
+section start on a new page or column, place @Code "@NP" within the previous
+section, at the end.  Placing @Code "@NP" between sections will not work.
+@PP
+Occasionally Lout will start a new page or column directly after a heading,
+which looks very poor.  The obvious answer is to place an @Code "@NP"
+just before the heading, but when the document is later revised and the
+heading no longer falls near the page or column ending, this @Code "@NP"
+will have to be taken away again.
+A better answer is to precede the heading with a @Code "@CNP" `conditional
+cnp. @Index @Code "@CNP"
+new page' symbol, which checks whether enough space remains in the page or
+column for a heading and at least two lines of text.  If so, @Code "@CNP"
+does nothing; if not, @Code "@CNP" causes a new page or column to be begun,
+like {@Code "@NP"}.  The recommended arrangement is
+@ID @OneRow @Code {
+"end of previous part."
+"@DP"
+"@CNP"
+"@Heading { A Heading }"
+"@PP"
+"First paragraph of next part ..."
+}
+The @Code "@CNP" symbol should be preceded by either @Code "@DP" or
+@Code "@LP", preferably {@Code "@DP"}, and this determines the amount of
+space when the @Code "@NP" action does not occur.
+@PP
+The ultimate answer to the conditional new page problem is to recognise
+that the heading is the beginning of a new section of the document, and
+to use a large-scale structure symbol like @Code "@Section" (Section
+{@NumberOf largescale}).  Conditional new page is just one of many
+services provided automatically by these symbols.
+@PP
+Some people do not like to see the first line of a paragraph alone at
+the bottom of a page, or the last line of a paragraph alone at the
+top (these blemishes are sometimes called widows and orphans).  You
+can instruct Lout not to allow these; see the next section for details.
+@PP
+You can modify the effect of the paragraph symbols by changing options
+in the setup file.  For general information about setup files and their
+options, consult Section {@NumberOf setup}; here we just explain how
+the relevant options work.  The options and their default values are
+paragap @Index @Code "@ParaGap"
+paraindent @Index @Code "@ParaIndent"
+@ID @OneRow @Code {
+"@ParaGap { 1.30vx }"
+"@ParaIndent { 2.00f }"
+"@DisplayGap { 1.00v }"
+}
+The values are lengths (Section {@NumberOf objects}), except that
+for reasons beyond our scope @Code "@ParaGap" must be a length with
+an @Code "x" appended, as shown.  The @Code "@ParaGap" option determines
+how much vertical space will be
+inserted by @Code "@PP" and {@Code "@LP"}.  The default value,
+{@Code "1.30vx"}, is 30% more than the normal inter-line spacing;
+to get no extra spacing, change it to {@Code "1.00vx"}.  The
+@Code "@ParaIndent" option determines the width of the indent produced
+by {@Code "@PP"}, and its default value is twice the current font
+size.  The @Code "@DisplayGap" option determines the amount of vertical
+space inserted by {@Code "@DP"}, as well as the vertical space before
+and after displays.
+@End @Section
diff --git a/doc/user/bas_par2 b/doc/user/bas_par2
new file mode 100644
index 0000000..51f674c
--- /dev/null
+++ b/doc/user/bas_par2
@@ -0,0 +1,261 @@
+@Section
+   @Title { Paragraph breaking }
+   @Tag { paras }
+@Begin
+@PP
+@I { Paragraph breaking } is the process of
+paragraph.breaking @Index { paragraph breaking }
+inserting line breaks into praragraphs at places appropriate to the column
+width.  Lout works out suitable column widths and performs paragraph
+breaking automatically, finding an `optimal' break with the method
+used by the @TeX
+tex.paragraph @SubIndex { paragraph breaking }
+system.  It offers nine styles of paragraph breaking,
+which we will explore with the aid of this example:
+@ID @OneRow @Code {
+It is a truth universally
+acknowledged, that a single man
+in possession of a good fortune,
+must be in want of a wife.
+}
+Changing the paragraph breaking style is similar to changing the font,
+colour, or language, and is done using the @Code "@Break" symbol:
+break. @Index @Code "@Break"
+@ID @Code "ragged @Break ..."
+This example causes every paragraph in the following object to be
+broken using the @Code ragged style, of which more below.
+@PP
+The first two of the nine styles perform @I { line adjustment }, which
+line.adjustment @Index { line adjustment }
+means that they enlarge the spaces between the objects making up each
+line so as to fill the lines completely:
+@IndentedList
+@LI @Tab
+    @Fmta { @Col 6c @Wide @Code A ! @Col 7c @Wide B }
+{
+@Rowa
+    A { "adjust @Break ..." }
+    B { adjust @Break {
+It is a truth universally
+acknowledged, that a single man
+in possession of a good fortune,
+must be in want of a wife.
+}}
+}
+@LI @Tab
+    @Fmta { @Col 6c @Wide @Code A ! @Col 7c @Wide B }
+{
+@Rowa
+    A { "outdent @Break ..." }
+    B { outdent @Break {
+It is a truth universally
+acknowledged, that a single man
+in possession of a good fortune,
+must be in want of a wife.
+}}
+}
+@EndList
+The @Code adjust style is frequently used, so it has been chosen as the
+default style.  Outdenting adds a small space at the start of each line
+outdent. @Index { outdented paragraphs }
+except the first, and is much less common.
+@PP
+The next four styles do not adjust lines, leaving the paragraph
+ragged. @Index { @Code ragged paragraph breaking style }
+cragged. @Index { @Code cragged paragraph breaking style }
+rragged. @Index { @Code rragged paragraph breaking style }
+oragged. @Index { @Code oragged paragraph breaking style }
+{@I ragged}:
+@IndentedList
+@LI @Tab
+    @Fmta { @Col 6c @Wide @Code A ! @Col 7c @Wide B }
+{
+@Rowa
+    A { "ragged @Break ..." }
+    B { ragged @Break {
+It is a truth universally
+acknowledged, that a single man
+in possession of a good fortune,
+must be in want of a wife.
+}}
+}
+@LI @Tab
+    @Fmta { @Col 6c @Wide @Code A ! @Col 7c @Wide B }
+{
+@Rowa
+    A { "cragged @Break ..." }
+    B { cragged @Break {
+It is a truth universally
+acknowledged, that a single man
+in possession of a good fortune,
+must be in want of a wife.
+}}
+}
+@LI @Tab
+    @Fmta { @Col 6c @Wide @Code A ! @Col 7c @Wide B }
+{
+@Rowa
+    A { "rragged @Break ..." }
+    B { rragged @Break {
+It is a truth universally
+acknowledged, that a single man
+in possession of a good fortune,
+must be in want of a wife.
+}}
+}
+@LI @Tab
+    @Fmta { @Col 6c @Wide @Code A ! @Col 7c @Wide B }
+{
+@Rowa
+    A { "oragged @Break ..." }
+    B { oragged @Break {
+It is a truth universally
+acknowledged, that a single man
+in possession of a good fortune,
+must be in want of a wife.
+}}
+}
+@EndList
+The paragraph is broken in the same places as @Code adjust breaks it,
+but the resulting lines are left-justified, centred, or right-justified
+with respect to each other, rather than adjusted; @Code "oragged"
+is like @Code "outdent" except the resulting lines are not adjusted.
+@PP
+If you have a few words that must be kept together on one line, the
+preventing. @Index { preventing line breaks }
+keeping. @Index { keeping things on one line }
+recommended way is to separate them by an @Code "~" symbol:
+@ID @Code "According to Prof.~Jones, the effect of ..."
+It's best not to bother about this until you actually get a bad line
+break, since chances are good that the words will fall on one line anyway.
+@PP
+The last three styles differ from the first five in breaking the
+paragraph at the points where it is broken in the original input:
+lines. @Index { @Code lines paragraph breaking style }
+clines. @Index { @Code clines paragraph breaking style }
+rlines. @Index { @Code rlines paragraph breaking style }
+@IndentedList
+@LI @Tab
+    @Fmta { @Col 6c @Wide @Code A ! @Col 7c @Wide B }
+{
+@Rowa
+    A { "lines @Break ..." }
+    B { lines @Break {
+It is a truth universally
+acknowledged, that a single man
+in possession of a good fortune,
+must be in want of a wife.
+}}
+}
+@LI @Tab
+    @Fmta { @Col 6c @Wide @Code A ! @Col 7c @Wide B }
+{
+@Rowa
+    A { "clines @Break ..." }
+    B { clines @Break {
+It @PageMark clines is a truth universally
+acknowledged, that a single man
+in possession of a good fortune,
+must be in want of a wife.
+}}
+}
+@LI @Tab
+    @Fmta { @Col 6c @Wide @Code A ! @Col 7c @Wide B }
+{
+@Rowa
+    A { "rlines @Break ..." }
+    B { rlines @Break {
+It is a truth universally
+acknowledged, that a single man
+in possession of a good fortune,
+must be in want of a wife.
+}}
+}
+@EndList
+The lines are left-justified, centred, or right-justified with respect
+to each other in the same way as for the ragged styles.
+@PP
+When using the @Code lines style, there are some fine points concerning
+the proper use of white space.  Consider this example:
+@ID @OneRow @Code {
+"@IndentedDisplay lines @Break @I {"
+"Teach me to hear Mermaides singing,"
+"Or to keep off envies stinging,"
+"     And finde"
+"     What winde"
+"Serves to'advance an honest minde."
+"}"
+}
+The result is the indented display
+@IndentedDisplay lines @Break @I {
+Teach me to hear Mermaides singing,
+Or to keep off envies stinging,
+     And finde
+     What winde
+Serves to'advance an honest minde.
+}
+This style is the only one for which it is useful to indent individual
+lines in the input; as the result shows, such indents will be
+respected, as will blank lines.  However, Lout's rule that only white
+space separating objects affects the result (Section {@NumberOf spaces})
+still holds, which means that indenting the first line is not
+effective:
+@ID @OneRow @Code {
+"@IndentedDisplay lines @Break @I {"
+"     And finde"
+"     What winde"
+"Serves to'advance an honest minde."
+"}"
+}
+produces
+@IndentedDisplay lines @Break @I {
+     And finde
+     What winde
+Serves to'advance an honest minde.
+}
+This may seem awkward at first, but actually it is extremely convenient
+because you don't have to worry about whether the first line of the
+paragraph should appear on a new line as above, or immediately after
+the opening brace:  space at that point does not separate two objects,
+so it has no effect.  The indent can be obtained by
+starting the first line with an empty object (Section {@NumberOf empty}):
+@ID @OneRow @Code {
+"@IndentedDisplay lines @Break @I {"
+"{}     And finde"
+"     What winde"
+"Serves to'advance an honest minde."
+"}"
+}
+The result is
+@IndentedDisplay lines @Break @I {
+{}     And finde
+     What winde
+Serves to'advance an honest minde.
+}
+as desired.  To set the entire document in a paragraph breaking style other
+than {@Code "adjust"}, you need to change the @Code "@InitialBreak" option,
+as explained at the end of Section {@NumberOf linespace}.
+@PP
+Some people don't like to see the first line of a paragraph alone at the
+widows @Index { widow lines }
+orphans @Index { orphan lines }
+unbreakablefirst. @Index { @Code unbreakablefirst }
+unbreakablelast. @Index { @Code unbreakablelast }
+foot of a page or column (the rest appearing on the next page).  You can
+instruct Lout not to allow this with
+@ID @Code "unbreakablefirst @Break ..."
+meaning that the first line cannot be broken off from the rest of the
+paragraph.  Similarly,
+@ID @Code "unbreakablelast @Break ..."
+instructs Lout to prevent the last line of a paragraph from appearing
+alone at the top of a page or column.  These features would probably be
+invoked in the @Code "@InitialBreak" option, like this:
+@ID
+@Code "@InitialBreak { unbreakablefirst unbreakablelast hyphen adjust 1.2fx }"
+You can turn them off with @Code "breakablefirst @Break"
+and @Code "breakablelast @Break".  In both cases Lout makes it happen by
+breaking at the previous place, either between paragraphs or two lines from
+the end of a paragraph.  Alternatively, both features are compatible with
+Lout's @Code "@OptimizePages" option, which will optimize the overall page
+layout of the document subject to these requirements.
+@End @Section
diff --git a/doc/user/bas_spac b/doc/user/bas_spac
new file mode 100644
index 0000000..b7546c2
--- /dev/null
+++ b/doc/user/bas_spac
@@ -0,0 +1,103 @@
+@Section
+   @Title { Spaces and braces }
+   @Tag { spaces }
+@Begin
+@PP
+Every symbol in Lout either consists entirely of letters ({@Code "@"}
+symbols. @Index { symbols, makeup of }
+is considered to be a letter) or entirely of punctuation characters.  Here
+are some examples of each type:
+@ID @OneRow @Tab
+    @Fmta { @Col @I    @CC A ! @Col @I    @CC B }
+    @Fmtb { @Col @Code @CC A ! @Col @Code @CC B }
+{
+@Rowa A { From letters } B { From punctuation }
+@Rowb A { "@PP" } B { "{" }
+@Rowb A { "margin" } B { "}" }
+}
+Now if two symbols made from letters are run together like this:
+@ID {
+@Code "@CurveBox@I  Hello" &8ct @I (wrong!)
+}
+Lout will take this to mean one word or symbol called {@Code "@CurveBox@I"},
+which is wrong.  In the same way, a letter-type symbol cannot be run
+together with a word.  However, punctuation-type symbols can be run together
+with anything.  For example, in
+@ID @Code "@CurveBox{ Hello @I { world }}."
+Lout understands that @Code "@CurveBox" and @Code "{"
+# }
+are separate, and it also sorts out
+# {{
+@Code "}}." into two right brace symbols and a full stop.  It might
+seem strange to treat punctuation and letters so differently,
+but computer programming languages have done it like this for
+many years, and it works well.  This is the first use for
+spaces. @Index { spaces, significance of }
+spaces:  to separate letter-type symbols from each other and from words.
+@PP
+To see the second use for spaces, consider two words side by side:
+@ID @Code "Hello world"
+We want this to produce Hello world, so a space between two words in
+the input must mean a space between them in the result.  Apply the
+golden rule (where you can put one object, you can put any object) and
+you get this:  @I { a space between two objects in the input produces
+a space between them in the result }.  For example,
+@ID @Code "@CurveBox Hello @CurveBox world"
+produces
+@ID { @CurveBox Hello @CurveBox world }
+The space between the two objects @Code "@CurveBox Hello" and
+@Code "@CurveBox world" appears between them in the result; the other
+two spaces do not separate objects so do not appear in the result.
+@PP
+Two objects may be separated by a number of spaces other than one.  If
+they are separated by no spaces, they will appear immediately adjacent
+in the result; if separated by two spaces, they will appear two spaces
+apart; and so on.  In English it is correct to leave two spaces between
+the end of one sentence and the beginning of the next, for example.  See
+Section {@NumberOf white} for two alternative ways to interpret white
+space in Lout.
+@PP
+Occasionally the two uses for spaces conflict.  For example, to produce
+@ID { { @CurveBox Hello }{ @CurveBox world } }
+we need to have no spaces between the two objects, but then @Code "Hello"
+and the following @Code "@CurveBox" would be run together, which will
+not work.  The solution is to use braces:
+@ID @Code "{ @CurveBox Hello }{ @CurveBox world }"
+None of the six spaces in this example lie between two objects.
+@PP
+However, the main use of braces is to inform Lout that the object
+within them is to be kept together, so that any nearby symbols are to
+apply to all of it.  For example, leaving the braces out of
+@Code "@I { Hello world }" would mean that @Code "@I" applies only to
+{@Code "Hello"}.
+@PP
+When an object-consuming symbol like @Code "@I" is followed by an
+braces. @Index { braces, effect of }
+object enclosed in braces, that is the object consumed.  For example,
+@ID @Code "This is @I { absolutely necessary }, since otherwise ..."
+produces
+@ID { This is @I { absolutely necessary }, since otherwise ... }
+with the object @Code "absolutely necessary" italicized, but not the
+following comma.  If there are no braces, the object consumed is
+everything up to the next object-separating space:
+@ID @Code "This is @I necessary, since otherwise ..."
+produces
+@ID { This is @I necessary, since otherwise ... }
+with an undesirable italic comma.  In practice, this means you can
+avoid braces only when italicizing a single word with no punctuation
+attached.
+@PP
+One common pitfall is to use unnecessary braces, like this:
+@ID {
+@Code "@I { @CurveBox { Hello world } }" &8ct @I (bad!)
+}
+Another is to think that all spaces produce space in the result, and so
+write
+@ID {
+@Code "@I{@CurveBox{Hello world}}" &8ct @I (worse!)
+}
+Use braces only when necessary, and add extra spaces where they do not
+separate objects, and your documents will be far easier to read while
+you are working on them.  Don't be fooled by the argument that says it
+doesn't matter because it doesn't affect the final printed result.
+@End @Section
diff --git a/doc/user/bas_star b/doc/user/bas_star
new file mode 100644
index 0000000..ef65eb6
--- /dev/null
+++ b/doc/user/bas_star
@@ -0,0 +1,129 @@
+@Section
+   @Title { Getting started }
+   @Tag { start }
+@Begin
+@PP
+Suppose you want to produce the following little document:
+@CD @Box margin { 1.3c } 7.0c @Wide 9c @High {
+@Display @Heading { Introduction by W. J. Harvey }
+harvey.w.j @Index { Harvey, W. J. }
+For Virginia Woolf, @I Middlemarch was `the magnificent book
+which for all its imperfections is one of the few English novels
+written for grown-up people.'
+@PP
+She was, no doubt, thinking of George Eliot's unblinking but
+eliot.g @Index { Eliot, George }
+compassionate delineation of her characters, of the subtlety of
+psychological analysis and the maturity of moral comment which
+underlie this complex and varied novel of English provincial
+life in the early nineteenth century.
+}
+Unlike word processing and desktop publishing systems, with Lout you
+cannot see and edit your document on the screen in this finished
+form.  Instead, you edit an ordinary text file, in which your text is
+augmented with symbols that mark out the headings, paragraphs, and so
+on.  Although it would be nice to be able to see and edit the finished
+form, working with a text file and symbols does have some compensating
+advantages.
+@PP
+The first step in producing your introduction to @I Middlemarch is to
+use the text editor of your choice to construct this text file:
+@ID @OneRow @Code {
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"@Display @Heading { Introduction by W. J. Harvey }"
+"For Virginia Woolf, @I Middlemarch was `the magnificent book which for all its"
+"imperfections is one of the few English novels written for grown-up people.'"
+"@PP"
+"She was, no doubt, thinking of George Eliot's unblinking but compassionate"
+"delineation of her characters, of the subtlety of psychological analysis and"
+"the maturity of moral comment which underlie this complex and varied novel"
+"of English provincial life in the early nineteenth century."
+"@End @Text"
+}
+Comparing this with the finished form, it's easy to guess that
+@Code "@I" is a symbol that causes the following thing to be printed
+in italics, and that @Code "@PP" starts a new paragraph.  The other
+symbols are not much harder.
+@PP
+@Code "@SysInclude { doc }" instructs Lout to read a @I { setup file }
+called {@Code "doc"}, in which the symbols are defined.  Setup files
+are the subject of Chapter {@NumberOf changes}, but you can go a long
+way without worrying about them.  @Code "@Doc @Text @Begin" and
+@Code "@End @Text" have no visible effect, but they must bracket the
+document as a whole.  Again, you don't have to know what they are for.
+@PP
+That explains everything except the part that produces the heading.  It's
+an interesting glimpse of the way that Lout's symbols cooperate with
+each other:
+@ID @Code "@Display @Heading { Introduction by W. J. Harvey }"
+The @Code "@Display" symbol does the centring and leaves space above
+and below, while @Code "@Heading" switches to a bold font.  The braces
+group the words of the heading together so that these symbols apply to
+all of it; without them they would apply to just the first word.  All
+this is explained in detail in Sections {@NumberOf objects}
+and {@NumberOf spaces}.
+@PP
+Once the file is ready, the next step is to get it processed by the
+Basser Lout interpreter.  If the file's name is {@Code "intro"},
+the command for this on the Unix
+@FootNote { Unix is a trademark. }
+operating system is
+@ID @Code "lout intro > intro.ps"
+The output is the PostScript
+@FootNote { PostScript is a trademark of Adobe Systems, Inc. }
+file {@Code "intro.ps"}, which is suitable for printing on many laser
+printers and other devices.  There are programs that show you the
+result on your screen as well, although you won't be able to edit it
+there.  You can also get plain text output (Section {@NumberOf plain})
+and PDF output.
+@PP
+There are a few points that often confuse people as they begin, so we'll
+treat them briefly now with pointers to later sections where they are
+done properly.
+@PP
+Some characters are symbols that produce special effects -- for
+example, @Code "{" and @Code "}" produce grouping -- and to turn off
+these effects the characters must be enclosed in double quotes:  @Code
+"\"{\"" produces "{".  The complete set of these special characters is
+@ID @Code "/    |    &    {    }    #    @    ^   ~   \\   \""
+Section {@NumberOf characters} treats unusual characters in full detail.
+@PP
+Symbols like @Code "@Doc" and @Code "@Text" must be separated from
+each other by one or more spaces, otherwise Lout will think they are part
+of one symbol.  See Section {@NumberOf spaces} for the details.
+@PP
+People familiar with other systems might expect that leaving a blank line would
+cause Lout to start a new paragraph; but this is not so, you must use a
+paragraph symbol.  Lout will ordinarily take notice of how many spaces you type
+between words (Section {@NumberOf spaces}), but it will mimic the spacing rules
+of two other systems, troff and @TeX, if you prefer (Section {@NumberOf white}).
+@PP
+When Lout runs, you might see some error messages beginning with
+error.messages @Index { error messages }
+`unresolved cross reference' -- not on file @Code "intro" above, but on
+more complicated ones (anything with a footnote, for example).  These
+just mean that you have to run the @Code "lout" command again to finish off
+the complicated things (Section {@NumberOf cross}), and they will gradually
+go away.  Of course, if you see error messages about missing braces, unknown
+symbols, and so on, you need to revise your file.  Lout will tell you the
+line number of the problem, and how far along the line it is.
+@PP
+@BI { WARNING: }  Lout allows documents to cause arbitrary system commands
+to be executed.  These typically do useful things such as format computer
+programs and uncompress graphics files, but it is possible for a
+malicious person to send you a document which includes a command to delete
+all your files, send abusive mail to the President of the United States in
+your name, etc.  You can protect yourself against this possibility by using
+the `safe execution' flag:
+@ID @Code "lout -S suspect.document > out.ps"
+Then no system commands will be executed; instead, Lout will print them so
+that you can confirm for yourself that they are safe before running again
+without the flag.  These system commands are Lout's only potentially unsafe
+features, but you also need to worry about whether the resulting PostScript
+file contains malicious code, since the document may direct Lout to include
+arbitrary PostScript code in the output.  The safe execution of PostScript
+programs is a matter for PostScript interpreters, not for Lout.  For example,
+the popular Ghostview program has a @Code "-safer" command line option,
+which is rumoured to disable unsafe PostScript features.
+@End @Section
diff --git a/doc/user/bas_supe b/doc/user/bas_supe
new file mode 100644
index 0000000..40faf92
--- /dev/null
+++ b/doc/user/bas_supe
@@ -0,0 +1,17 @@
+@Section
+   @Title { Superscripts and subscripts }
+   @Tag { super }
+@Begin
+@PP
+There are @Code "@Sup" and @Code "@Sub" symbols for producing
+superscripts and subscripts:
+@ID @Code "2 @Sup nd"
+produces
+@ID { 2 @Sup nd }
+and the @Code "@Sub" symbol works in a similar way.  These symbols
+are probably never required in English language text, since the
+only uses for them are in footnotes, which produce the superscript
+automatically, and equations, which have their own versions of these
+symbols.  Both symbols have a @Code "gap" option which determines the
+vertical spacing.
+@End @Section
diff --git a/doc/user/bas_unde b/doc/user/bas_unde
new file mode 100644
index 0000000..9f7ea94
--- /dev/null
+++ b/doc/user/bas_unde
@@ -0,0 +1,27 @@
+@Section
+   @Title { Underlining }
+   @Tag { underlining }
+@Begin
+@PP
+The @Code "@Underline" symbol underlines the following object:
+underline.sym @Index @Code "@Underline"
+@ID @OneRow @Code {
+"This little paragraph of text will have"
+"@Underline { three underlined words } in it."
+}
+produces
+@ID @OneRow 1.6i @Wide {
+This little paragraph of text will have
+@Underline { three underlined words } in it.
+}
+The underlining is continuous unless a line break intervenes.  You
+can't use this symbol to underline an arbitrary object:  it is carefully
+designed to produce high-quality underlining of single words and
+parts of paragraphs, and it works only for those objects.
+@PP
+Each font contains information about how words in that font should be
+underlined:  how far below the baseline the line should be drawn, and how
+thick.  The @Code "@Underline" symbol uses this information; the font
+it bases its underlining on is the font of the first object underlined
+if it is a word, or else the font of the enclosing paragraph.
+@End @Section
diff --git a/doc/user/bas_verb b/doc/user/bas_verb
new file mode 100644
index 0000000..6da835a
--- /dev/null
+++ b/doc/user/bas_verb
@@ -0,0 +1,49 @@
+@Section
+   @Title { Verbatim text }
+   @Tag { verbatim }
+@Begin
+@PP
+The @Code "@Verbatim" symbol
+@FootNote { Prior to Version 3.13 the @Code "@Verbatim" symbol was
+implemented in a way that restricted its availability to Unix
+systems only.  This restriction no longer applies. }
+prints the following object exactly as
+verbatim.sym @Index @Code "@Verbatim"
+it appears in the input file.  All special meanings for characters,
+symbols, etc. are turned off; there is one result line for
+each input line.  For example,
+@ID @Code @Verbatim {
+@IndentedDisplay @Verbatim {
+A line of "verbatim" text
+Another line, with a \ character
+}
+}
+has result
+@IndentedDisplay @Verbatim {
+A line of "verbatim" text
+Another line, with a \ character
+}
+Use @Code "@F @Verbatim { ... }" to get the result in a fixed-width font.
+@PP
+If the verbatim text contains @Code "{" or @Code "}" characters, then
+they should either be balanced or else you need to use the alternative
+form
+@ID @Code {
+"@Verbatim @Begin"
+"..."
+"@End @Verbatim"
+}
+so that there is no doubt about where the verbatim text ends.  Although
+we have said that there are no special meanings, there is one exception
+to this rule:  @Code "@Include" and @Code "@SysInclude" commands are
+recognized, allowing all or part of the verbatim text to come from some
+other file.
+@PP
+Occasionally the first line of some verbatim text begins with some
+spaces that have to be preserved.  This is a problem for @Code "@Verbatim"
+because it ignores all white spaces following the opening brace and
+all white spaces preceding the closing brace.  However, the alternative
+@Code "@RawVerbatim" symbol stops ignoring white spaces at the opening
+as soon as a newline character is reached; in other words, it will
+preserve all white spaces following the first newline.
+@End @Section
diff --git a/doc/user/bgr b/doc/user/bgr
new file mode 100644
index 0000000..9452ff0
--- /dev/null
+++ b/doc/user/bgr
@@ -0,0 +1,17 @@
+@Chapter
+    @Title { Basic Graphics }
+    @Tag { graphics }
+@Begin
+@LP
+This chapter introduces some basic graphics symbols for colour, rotation,
+scaling, and included illustrations.  These are all from the standard
+BasicLayout package, so no @Code "@SysInclude" line is needed to
+get them.
+@BeginSections
+@Include { bgr_colo }
+@Include { bgr_boxs }
+@Include { bgr_rota }
+@Include { bgr_scal }
+@Include { bgr_incl }
+@EndSections
+@End @Chapter
diff --git a/doc/user/bgr_boxs b/doc/user/bgr_boxs
new file mode 100644
index 0000000..39c6460
--- /dev/null
+++ b/doc/user/bgr_boxs
@@ -0,0 +1,121 @@
+@Section
+    @Title { Boxes and rules }
+    @Tag { boxes }
+@Begin
+@PP
+The @Code "@Box" symbol causes the following object to be enclosed in a
+box. @Index @Code "@Box"
+box:
+@ID @OneRow @Code {
+"@QuotedDisplay @Box {"
+"@CentredDisplay @Heading Cheating"
+"The Department uses assignments ... of that student alone."
+"}"
+}
+The result of this is
+@QuotedDisplay @Box {
+@CentredDisplay @Heading Cheating
+The Department uses assignments both as a teaching device and as a
+major component of its assessment of each student.  It therefore
+requires that all programs, exercises etc. handed in bearing an
+individual student's name be the work of that student alone.
+}
+showing that a box may enclose an arbitrarily complicated object.
+@PP
+The @Code "@Box" symbol has a @Code margin option which determines the
+margin between the box and what it encloses.  For example,
+@ID @OneRow @Code {
+"@Box"
+"    margin { 0.1c }"
+"{}"
+}
+requests a box with a 0.1 centimetre margin enclosing an empty object,
+so the result is a square whose width and height are 0.2 centimetres:
+@ID @Box margin { 0.1c } {}
+If the @Code "margin" option is omitted, it is assigned the default
+value {@Code "0.3f"}, which means 0.3 times the current font size.  It
+is very useful to tie the margin to the font size in this way, because
+large headings (in overhead transparencies, say) need large margins.
+@PP
+There is a @Code "linewidth" option which determines the width
+(thickness) of the line drawn around the boundary of the box:
+@ID @OneRow @Code {
+"@Box"
+"    linewidth { 0.1c }"
+"{ Hello world }"
+}
+produces
+@ID @Code {
+@Box
+    linewidth { 0.1c }
+{ Hello world }
+}
+Lout does not take the line width into account when working out how
+large everything is:  as far as Lout is concerned, the line always
+has width zero.  If you draw really thick lines you might need a larger
+margin and more space near the box.  The default value of @Code linewidth
+is empty, which means to use whatever width the PostScript interpreter
+in your output device thinks is a good default value.
+@PP
+There is also a @Code "paint" option which paints a background of the
+nominated colour:
+@ID @Code "@Box paint { grey } WARNING!"
+has result
+@ID @Box paint { grey } WARNING!
+This is quite different from {@Code "grey @Colour @Box WARNING!"},
+which produces
+@ID grey @Colour @Box WARNING!
+The @Code "paint" option may be given any colour from the list in
+Section {@NumberOf colour}; its default value is {@Code "none"}, which
+is a special value (not a colour) which means no painting.  White paint
+comes into its own inside painted boxes:
+@ID @Code "@Box paint { nochange } white @Colour { Hello world }"
+produces a box painted in whatever colour we happen to be using at
+the moment, with white text inside:
+@ID @Box paint { nochange } white @Colour { Hello world }
+This works because the box is painted before the object it encloses
+is drawn on the page.
+@PP
+There are @Code "@CurveBox" and @Code "@ShadowBox" symbols that
+curvebox. @Index @Code "@CurveBox"
+shadowbox. @Index @Code "@ShadowBox"
+produce other kinds of boxes:
+@CD @Tab
+    @Fmta { @Col A ! @Col ! @Col B }
+{
+@Rowa
+    A { @CurveBox { A curve box } }
+    B { @ShadowBox { A shadow box } }
+}
+These also have @Code "margin" and @Code "paint" options, and
+@Code "@ShadowBox" has a @Code "shadow" option which determines
+the thickness of the shadow (its default value is {@Code "0.2f"}).
+@PP
+Boxes are quite at home inside paragraphs, as @Box { a box },
+@CurveBox { a curve box }, and @ShadowBox { a shadow box }
+show.  Simply proceed as usual:
+@ID @Code "... paragraphs, as @Box { a box }, @CurveBox { a curve box }, ..."
+Boxes within paragraphs are never broken across two lines.
+@PP
+There are two symbols for producing horizontal rules.  @Code "@FullWidthRule"
+fullwidthrule. @Index @Code "@FullWidthRule"
+rules. @Index rules
+produces a rule which occupies the full page (or column) width:
+@DP @FullWidthRule @DP
+More precisely, the rule occupies as much horizontal space as it
+legally can.  @Code "@FullWidthRule" produces an object in the usual
+way, so you will need paragraph or display symbols to separate it from
+preceding and following things.
+@PP
+A variant called @Code "@LocalWidthRule" is more timid about zooming
+localwidthrule. @Index @Code "@LocalWidthRule"
+across the whole page:
+@ID @Code {
+"@OddPageTop { { My lovely document @LP @LocalWidthRule } @Right @PageNum }"
+}
+will draw a rule under just the three words.  Of course, underlining using
+the @Code "@Underline" symbol might be a better way to do this.  Both
+symbols have a @Code "linewidth" option which works like the one for
+boxes described above.  In particular, Lout leaves zero space for the
+line, no matter how wide you make it.
+@End @Section
diff --git a/doc/user/bgr_colo b/doc/user/bgr_colo
new file mode 100644
index 0000000..4a48fb9
--- /dev/null
+++ b/doc/user/bgr_colo
@@ -0,0 +1,48 @@
+@Section
+   @Title { Colour }
+   @Tag { colour }
+@Begin
+@PP
+Colour is obtained in much the same way that fonts and language changes
+colour. @Index @Code "@Colour"
+color. @Index @Code "@Color"
+are, using the @Code "@Colour" (or equivalently {@Code "@Color"}) symbol:
+@ID @Code "grey  @Colour  { Hello, world }"
+produces
+@ID grey @Colour { Hello, world }
+The @Code "@Colour" symbol will accept any of the following colours:
+@QD @HAdjust @Tab
+    vmargin { 0.7vx }
+    hmargin { 0.2c }
+    @Fmta { @Col A @Colour @FilledBox ! @Col @Code A ! @Col !
+            @Col B @Colour @FilledBox ! @Col @Code B ! @Col !
+            @Col C @Colour @FilledBox ! @Col @Code C        }
+    @Fmtb { @Col A @Colour @FilledBox ! @Col @Code A ! @Col !
+            @Col B @Colour @FilledBox ! @Col @Code B ! @Col !
+            @Col                      ! @Col                }
+{
+@Rowa A { darkred	} B { red		} C { lightred		}
+@Rowa A { darkgreen	} B { green		} C { lightgreen	}
+@Rowa A { darkblue	} B { blue		} C { lightblue		}
+@Rowa A { darkcyan	} B { cyan		} C { lightcyan		}
+@Rowa A { darkmagenta	} B { magenta		} C { lightmagenta	}
+@Rowa A { darkyellow	} B { yellow		} C { lightyellow	}
+@Rowa A { darkgrey	} B { grey		} C { lightgrey		}
+@Rowa A { darkgray	} B { gray		} C { lightgray		}
+@Rowb A { black    	} B { white		}
+}
+Monochrome output devices will render them as shades of grey.  Colouring
+something @Code white makes it invisible, which is sometimes useful.
+@PP
+In addition to the list of colours given above, there is a special
+colour called {@Code nochange} which produces the colour you already
+happen to be using.
+@PP
+Whether or not the colours produced by @Code "@Colour" actually
+correspond with the names depends on the output device; the same
+nominal colour can look quite different on screen and on paper.  The
+standard Lout @Code "@SetColour" symbol can provide many more colours
+setcolour. @Index @Code "@SetColour"
+@Cite { $kingston1995lout.expert}, although they must be specified
+using numbers rather than names.
+@End @Section
diff --git a/doc/user/bgr_incl b/doc/user/bgr_incl
new file mode 100644
index 0000000..57ac4a1
--- /dev/null
+++ b/doc/user/bgr_incl
@@ -0,0 +1,47 @@
+@Section
+   @Title { Including an illustration }
+   @Tag { include }
+@Begin
+@PP
+The @Code "@IncludeGraphic" symbol incorporates into a Lout document an
+include.graphic @Index @Code "@IncludeGraphic"
+include.illus @Index { including an illustration }
+illustration (that is, an encapsulated PostScript or EPS file)
+produced by other means.  For the opposite process, using Lout to produce
+an illustration for inclusion in some other document, see
+Section {@NumberOf illustrations}.
+@PP
+For example, suppose the encapsulated PostScript file @Code "su_crest.eps"
+contains the University of Sydney crest.  Then
+@ID @Code "@IncludeGraphic su_crest.eps"
+produces
+@ID @IncludeGraphic su_crest.eps
+In general, the result produced by @Code "@IncludeGraphic" is an object
+that may be scaled, rotated, made into a display or placed within a
+paragraph, just like any other object.  Accolades for this remarkable
+flexibility should go to the PostScript page description language,
+whose extraordinary power makes the provision of this feature in Lout
+almost trivial.
+@PP
+The @Code "@IncludeGraphic" command understands that files ending
+with any of the suffixes {@Code ".gz"}, {@Code "-gz"}, {@Code ".z"},
+{@Code "-z"}, {@Code "_z"}, and {@Code ".Z"} are compressed files,
+and it will uncompress such files using the @Code "gunzip" command
+before including them.  The uncompressed version is stored in a file
+called @Code "lout.eps" in the current directory, and removed after
+being copied into the output file.
+@PP
+If you place an included illustration in a line of text, or anywhere
+where you care about its alignment with things on either side of it,
+it will be positioned with its centre at the same height as the
+centre of the letter x.  If this is not where you want it, use the
+@Code "@VShift" symbol:
+vshift. @Index @Code "@VShift"
+@ID @Code "... +0.5f @VShift @IncludeGraphic ..."
+prints the illustration half of the current font size higher on the
+page than would otherwise have been the case, and
+@ID @Code "... -0.5f @VShift @IncludeGraphic ..."
+prints it half the current font size lower.  Any length (Section
+{@NumberOf objects}) is allowed, and the object following @Code "@VShift"
+may in fact be arbitrary as usual.
+@End @Section
diff --git a/doc/user/bgr_rota b/doc/user/bgr_rota
new file mode 100644
index 0000000..e4bcc72
--- /dev/null
+++ b/doc/user/bgr_rota
@@ -0,0 +1,35 @@
+@Section
+   @Title { Rotation }
+   @Tag { rotation }
+@Begin
+@PP
+The @Code "@Rotate" symbol rotates the following object by any positive
+rotate. @Index @Code "@Rotate"
+or negative angle, measured in degrees:
+@ID @Code "45d @Rotate @Box WARNING!"
+has result
+@ID { 45d @Rotate @Box WARNING! }
+As usual, the object to be rotated may be arbitrary.  However, it is
+difficult for Lout to choose appropriate column widths for paragraphs
+inside rotated objects, so if a rotated object contains paragraphs that
+should be broken it is best to define the object's width explicitly,
+using the @Code "@Wide" symbol:
+wide @RawIndex { @Code "@Wide" }
+wide.rotate @SubIndex { with @Code "@Rotate" }
+@ID @OneRow @Code {
+"-90d @Rotate 4.5c @Wide {"
+"Papal initiatives and influence from the crowning of"
+"Charlemagne to the First Crusade"
+"}"
+}
+The result here is
+@ID {
+-90d @Rotate 4.5c @Wide {
+Papal initiatives and influence from the crowning of
+Charlemagne to the First Crusade
+}
+}
+The @Code "@Wide" symbol fixes the width of the following object, in
+this example to the length 4.5 centimetres, which is all Lout needs to
+decide the column widths of any paragraphs within it.
+@End @Section
diff --git a/doc/user/bgr_scal b/doc/user/bgr_scal
new file mode 100644
index 0000000..ad73f4c
--- /dev/null
+++ b/doc/user/bgr_scal
@@ -0,0 +1,53 @@
+@Section
+   @Title { Scaling }
+   @Tag { scaling }
+@Begin
+@PP
+The @Code "@Scale" symbol performs a geometrical scaling of the
+scale. @Index @Code "@Scale"
+following object:
+@ID @Code {
+"0.5 @Scale @Box WARNING!"
+}
+produces
+@ID {
+0.5 @Scale @Box WARNING!
+}
+A scale factor of 0.5 means half the original size, 2.0 means double size,
+and so on.  No unit of measurement appears in the scale factor, because
+it makes no sense to have one.  As usual, the object to be scaled may be
+arbitrary.
+@PP
+It is also possible to supply two scale factors, in which case the
+first is applied horizontally and the second vertically:
+@ID @Code "{0.5 2.0} @Scale @Box WARNING!"
+has result
+@ID {0.5 2.0} @Scale @Box WARNING!
+Practical uses for this kind of scaling are rare.
+@PP
+If an empty object is given instead of a scale factor, like this:
+@ID @Code "{} @Scale @Box WARNING!"
+the @Code "@Scale" symbol will choose the largest scale factor that
+does not overrun the available horizontal space.  It is often possible
+to omit the {@Code "{}"}, since Lout inserts an empty object
+automatically whenever an object is clearly missing (see Section
+{@NumberOf objects}).  For example,
+@ID @Code "@QuotedDisplay @Scale @Box WARNING!"
+produces
+@QuotedDisplay @Scale @Box WARNING!
+@Code "@QuotedDisplay" and @Code "@LeftDisplay" go well with this form
+of {@Code "@Scale"}.  However, some care is needed because Lout foolishly
+takes no account of the available @I vertical space when choosing the
+scale factor.  The chosen scale factor could enlarge the vertical size so
+much that the object no longer fits on the page, with disastrous results.
+@PP
+By using a @Code "@Wide" symbol to restrict the available horizontal
+space, this form of scaling can also be used to scale to a nominated
+width.  For example,
+wide @RawIndex { @Code "@Wide" }
+wide.scale @SubIndex { with @Code "@Scale" }
+@ID @Code "5c @Wide @Scale @Box WARNING!"
+produces
+@ID { 5c @Wide @Scale @Box WARNING! }
+which is 5 centimetres wide.
+@End @Section
diff --git a/doc/user/cpp b/doc/user/cpp
new file mode 100644
index 0000000..9b413ed
--- /dev/null
+++ b/doc/user/cpp
@@ -0,0 +1,27 @@
+@Chapter
+  @Title { C and C++ Programs }
+  @Tag { cprint }
+@Begin
+@LP
+This chapter describes how to typeset C and C++ program text using the
+cp. @Index @Code "@CP"
+c. @Index { C++ }
+@Code "@CP" symbol in conjunction with the @Code c2lout filter.  The
+@Code "@CP" symbol looks after printing keywords in bold, variables
+in italic, and so on, depending on a style you choose.  It does not lay
+out programs in the sense of choosing indenting, it preserves the layout
+you give to the program.  From now on, `C' means `C or C++' wherever
+it occurs.
+@PP
+It is possible to simply print out one or more C files; we call this
+@I { stand-alone mode }.  Alternatively, the C program text may be printed
+as part of a larger Lout document; we call this @I { embedded mode }.
+@BeginSections
+@Include { cpp_lone }
+@Include { cpp_embe }
+@Include { cpp_chan }
+@Include { cpp_comm }
+@Include { cpp_tabs }
+@Include { cpp_eiff }
+@EndSections
+@End @Chapter
diff --git a/doc/user/cpp_chan b/doc/user/cpp_chan
new file mode 100644
index 0000000..ddedd51
--- /dev/null
+++ b/doc/user/cpp_chan
@@ -0,0 +1,83 @@
+@Section
+   @Title { Changing the default values }
+   @Tag { cpsetup }
+@Begin
+@PP
+We have just seen that the @Code "@CP" symbol has many options for
+changing the appearance of the C text.  However, most people would
+not want to have a different style for every C text in their document;
+they want to define the style once at the start, and have all their
+C texts come out in that style without laboriously setting options
+on every @Code "@CP" symbol.  This is done by copying the setup file
+and changing it.
+@PP
+For general information about how to make your own setup file, consult
+Section {@NumberOf setup}.  The options that determine the default
+values are in the @Code "@CPSetup" @Code "@Use" clause near the end of
+cprint. @Index @Code "@CPSetup"
+the @Code "cpsetup." setup file:
+@ID @Code @Tab
+   vmargin { 0.5vx }
+   @Fmta { @Col A ! @Col B ! @Col C}
+   @Fmtb { @Col { "    #" A } ! @Col { "{" B } ! @Col "}" }
+{
+@Rowa A { "@Use {  @CPSetup" }
+@Rowb A { "style" } B { fixed         }
+
+@Rowa 
+@Rowb A { "fixedfont" }			B { Courier  }
+@Rowb A { "fixedstrings" }		B { Base  }
+@Rowb A { "fixedidentifiers" }		B { Base  }
+@Rowb A { "fixedcomments" }		B { Base  }
+@Rowb A { "fixedkeywords" }		B { Base  }
+@Rowb A { "fixednumbers" }		B { Base  }
+@Rowb A { "fixedoperators" }		B { Base  }
+@Rowb A { "fixedsize" }			B { -1.0p         }
+@Rowb A { "fixedline" }			B { 1.0vx         }
+@Rowb A { "fixedtabin" }		B { 8		  }
+@Rowb A { "fixedtabout" }		B { 8s		  }
+
+@Rowa 
+@Rowb A { "varyingfont" }		B {               }
+@Rowb A { "varyingstrings" }		B { Slope         }
+@Rowb A { "varyingidentifiers" }	B { Slope         }
+@Rowb A { "varyingcomments" }		B { Base          }
+@Rowb A { "varyingkeywords" }		B { Bold          }
+@Rowb A { "varyingnumbers" }		B { Base          }
+@Rowb A { "varyingoperators" }		B { Base          }
+@Rowb A { "varyingsize" }		B { 1.0f          }
+@Rowb A { "varyingline" }		B { 1.0vx         }
+@Rowb A { "varyingtabin" }		B { 8		  }
+@Rowb A { "varyingtabout" }		B { 3f		  }
+
+@Rowa 
+@Rowb A { "symbolfont" }		B {               }
+@Rowb A { "symbolstrings" }		B { Slope         }
+@Rowb A { "symbolidentifiers" }		B { Slope         }
+@Rowb A { "symbolcomments" }		B { Base          }
+@Rowb A { "symbolkeywords" }		B { Bold          }
+@Rowb A { "symbolnumbers" }		B { Base          }
+@Rowb A { "symboloperators" }		B { Base          }
+@Rowb A { "symbolsize" }		B { 1.0f          }
+@Rowb A { "symbolline" }		B { 1.0vx         }
+@Rowb A { "symboltabin" }		B { 8		  }
+@Rowb A { "symboltabout" }		B { 3f		  }
+
+@Rowa A { "}" }
+}
+These show the default font families, font faces, font sizes, line
+spacings, and tab settings in force for the three styles, and also that
+the default style is {@Code "fixed"}.  Notice that the font family name
+for @Code "fixed" style is {@Code "Courier"}, but for the other styles is
+empty.  This causes the @Code "fixed" style to always switch to Courier,
+and the other styles to use the same font family as in the surrounding
+document.
+@PP
+To change a default value, delete the preceding @Code "#" and change the
+part between braces.  For example, suppose you are happy with @Code "fixed"
+except that you want bold keywords.  Then one line needs to be changed, to
+@ID @Code "fixedkeywords { Bold }"
+Or suppose you like @Code "varying" as it stands, but would like it to be
+the default style rather than {@Code "fixed"}.  Again, only one line needs
+to be changed, to {@Code "style { varying }"}.
+@End @Section
diff --git a/doc/user/cpp_comm b/doc/user/cpp_comm
new file mode 100644
index 0000000..f877c06
--- /dev/null
+++ b/doc/user/cpp_comm
@@ -0,0 +1,20 @@
+@Section
+   @Title { Lout inside C comments }
+   @Tag { cpcomm }
+@Begin
+@PP
+It is possible to embed Lout text inside C and C++ comments, by
+starting off the comment with an @Code "@" character.  The entire
+comment after the @Code "@" character should be Lout text.  For
+example, to force Lout to start a new page at some point within a C
+program, place
+@ID @Code "/*@ @NP */"
+at that point.  Or you could make a heading like this:
+@ID @Code "/*@ @Display @Heading { treeprint() } */"
+Other possible uses for this feature include index entries and margin
+notes.  Incredible as it may seem, you can even write
+@ID @Code "/*@ @CD @Heading { Function @CP { treeprint() } } */"
+with a @Code "@CP" symbol and some C code inside the Lout code
+inside the C code.  You probably can't go further, however, since
+that would require a C comment inside a C comment.
+@End @Section
diff --git a/doc/user/cpp_eiff b/doc/user/cpp_eiff
new file mode 100644
index 0000000..d0ec6df
--- /dev/null
+++ b/doc/user/cpp_eiff
@@ -0,0 +1,42 @@
+@Section
+   @Title { Eiffel program printing }
+   @Tag { eiffel }
+@Begin
+@PP
+There is an @Code "@Eiffel" symbol for typesetting Eiffel programs
+in conjuction with a filter called {@Code "eif2lout"}.  Apart from
+the change of language, everything is identical to C printing.  The
+file and symbol names are different, of course:
+@ID @OneRow @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col A ! @Col B }
+{
+@Rowa
+    A { @Code cprint }
+    B { @Code eiffel }
+@Rowa
+    A { @Code c2lout }
+    B { @Code eif2lout }
+@Rowa
+    A { @Code "@CP" }
+    B { @Code "@Eiffel" }
+@Rowa
+    A { @Code "@CPSetup" }
+    B { @Code "@EiffelSetup" }
+}
+but everything works in an exactly analogous way:  you place
+@ID @Code "@SysInclude { eiffel }"
+at the top of your document, enclose Eiffel program texts in
+@Code "@Eiffel { ... }", embed Lout into Eiffel using comments
+beginning with {@Code "--@"}, and so on.  The default style has been
+changed to {@Code varying}, so as to conform to the style guidelines
+in the standard Eiffel reference @Cite { $meyer1992eiffel }.  Some care
+has gone into making this conformance strict; in particular, if you
+enclose identifiers within comments in ` and ', as the style guidelines
+say you should, they will come out in italics; in fact, arbitrary text
+between ` and ' within comments will be set as Eiffel code.
+@PP
+The files needed for Eiffel printing are distributed separately from
+Basser Lout.  You can get them from the author's @Code ftp directory
+(see the preface of this guide).
+@End @Section
diff --git a/doc/user/cpp_embe b/doc/user/cpp_embe
new file mode 100644
index 0000000..8ca2dfc
--- /dev/null
+++ b/doc/user/cpp_embe
@@ -0,0 +1,152 @@
+@Section
+   @Title { Embedded mode }
+   @Tag { embedded }
+@Begin
+@PP
+When the C program texts are to be embedded in a larger Lout document,
+the procedure is somewhat different.  You need to include the
+@Code "cprint" setup file, like this:
+@ID @OneRow @Code {
+"@SysInclude { cprint }"
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"..."
+"@End @Text"
+}
+This file includes everything needed to set up for C program formatting.
+@PP
+The C parts of the document are enclosed in @Code "@CP { ... }" like this:
+@ID @OneRow @Code {
+"@IndentedDisplay @CP {"
+"#include <stdio.h>"
+""
+"treeprint(p)        /* print tree p recursively */"
+"struct tnode *p;"
+"{"
+"        if (p != NULL) {"
+"                treeprint(p->left);"
+"                printf(\"%4d %s\\n\", p->count, p->word);"
+"                treeprint(p->right);"
+"        }"
+"}"
+"}"
+}
+Although C programs violate the rules of legal Lout input in many ways,
+these rules are suspended by the @Code "@CP" symbol, allowing the C
+text to be incorporated with absolutely no modifications.  The result is
+@ID @OneRow @CP {
+#include <stdio.h>
+
+treeprint(p)        /* print tree p recursively */
+struct tnode *p;
+{
+        if (p != NULL) {
+                treeprint(p->left);
+                printf("%4d %s\n", p->count, p->word);
+                treeprint(p->right);
+        }
+}
+}
+We have chosen to use the @Code "@IndentedDisplay" symbol from Section
+{@NumberOf displays} to obtain an indented display, but in fact
+@Code "@CP" may appear anywhere at all.  When including a C text within
+a paragraph, use @Code "@OneCol @CP { ... }" to prevent it being broken
+across two lines, if desired.
+@PP
+In cases where the C text has unbalanced braces, it is necessary to
+use the alternative form @Code "@CP @Begin ... @End @CP" so that
+Lout does not confuse C braces with Lout braces.
+@PP
+The @Code "@CP" symbol has a @Code "style" option for changing the
+printing style.  The default value of @Code "style" is {@Code "fixed"},
+which produces the style shown above.  To obtain a varying-width font
+style, use @Code "style { varying }" like this:
+@ID @OneRow @Code {
+"@CP"
+"    style { varying }"
+"{"
+"#include <stdio.h>"
+""
+"treeprint(p)        /* print tree p recursively */"
+"struct tnode *p;"
+"{"
+"        if (p != NULL) {"
+"                treeprint(p->left);"
+"                printf(\"%4d %s\\n\", p->count, p->word);"
+"                treeprint(p->right);"
+"        }"
+"}"
+"}"
+}
+The result in this case will be
+@ID @OneRow @CP style { varying }
+{
+#include <stdio.h>
+
+treeprint(p)        /* print tree p recursively */
+struct tnode *p;
+{
+        if (p != NULL) {
+                treeprint(p->left);
+                printf("%4d %s\n", p->count, p->word);
+                treeprint(p->right);
+        }
+}
+}
+There is also a third style called @Code "style { symbol }" which is
+similar to @Code "varying" except that it uses characters from the
+Adobe Symbol font to produce a more mathematical-looking result:
+@ID @OneRow @CP style { symbol }
+{
+#include <stdio.h>
+
+treeprint(p)        /* print tree p recursively */
+struct tnode *p;
+{
+        if (p != NULL) {
+                treeprint(p->left);
+                printf("%4d %s\n", p->count, p->word);
+                treeprint(p->right);
+        }
+}
+}
+The @Code "@CP" symbol has additional options which allow a finer
+control over the style.  Here they all are, with their default values:
+@ID @OneRow @Code {
+"@CP"
+"    style { fixed }"
+"    font { Courier }"
+"    strings { Base }"
+"    identifiers { Base }"
+"    comments { Base }"
+"    keywords { Base }"
+"    numbers { Base }"
+"    operators { Base }"
+"    size { -1.0p }"
+"    line { 1.0vx }"
+"    tabin { 8 }"
+"    tabout { 8s }"
+"{"
+"    ..."
+"}"
+}
+We are already familiar with {@Code "style"}.  After that comes
+{@Code "font"}, which determines the font family to use, followed
+by six options giving the particular faces within that family in which to
+print C strings, identifiers, comments, keywords, numbers, and
+operators.  {@Code "Base"} means the basic face; other commonly available
+choices are {@Code "Slope"} and {@Code "Bold"}.  These options may all be
+set to different faces if desired.  The default values shown are correct
+for @Code "style { fixed }" only; the other styles have other defaults
+(Section {@NumberOf cpsetup}).
+@PP
+The @Code "size" option is the font size to use, and @Code "line" is the
+inter-line spacing.  The default values specify that @Code "size" is
+to be one point smaller than in the surrounding document; this was done
+to compensate for Courier's relatively large appearance compared
+to other fonts of the same nominal size.  Again, these defaults are
+different for different values of {@Code "style"}.
+@PP
+The @Code "tabin" and @Code "tabout" options are the subject of
+Section {@NumberOf tabs}.
+@End @Section
diff --git a/doc/user/cpp_lone b/doc/user/cpp_lone
new file mode 100644
index 0000000..8d8e367
--- /dev/null
+++ b/doc/user/cpp_lone
@@ -0,0 +1,36 @@
+@Section
+   @Title { Stand-alone mode }
+   @Tag { alone }
+@Begin
+@PP
+Printing of C files in stand-alone mode is accomplished by the following
+c2lout @Index { @Code "c2lout" filter }
+Unix pipeline:
+@ID @Code "c2lout  options  C-files  |  lout  -s  >  out.ps"
+As usual with Lout, the output will be a PostScript file.  Each input
+file will begin on a new page of the output, starting with its name
+in bold type.  The options provide control over the final appearance,
+as follows:
+@WideTaggedList
+@TI { {@Code-p}{@I style} } {
+Select a printing style.  Your choices are {@Code -pfixed},
+{@Code -pvarying}, and {@Code -psymbol}, with the default being
+{@Code -pfixed}.  Consult Section {@NumberOf embedded} for examples
+of these styles.
+}
+@TI { @Code -n } {
+Do not print file names.
+}
+@TI { {@Code -f}{@I font} } {
+Select a Lout font family.  The default is @Code "-fCourier" for
+{@Code -pfixed}, and @Code "-fTimes" for @Code -pvarying and {@Code -psymbol}.
+}
+@TI { {@Code -v}{@I vsize} } {
+Select an inter-line spacing size in Lout units.  The default is
+@Code -v1.1fx meaning 1.1 times the font size measured from baseline
+to baseline.
+}
+@EndList
+There are also {@Code -t} and {@Code -T} options for dealing with tab
+characters (Section {@NumberOf tabs}).
+@End @Section
diff --git a/doc/user/cpp_tabs b/doc/user/cpp_tabs
new file mode 100644
index 0000000..1157a51
--- /dev/null
+++ b/doc/user/cpp_tabs
@@ -0,0 +1,62 @@
+@Section
+   @Title { Tab characters }
+   @Tag { tabs }
+@Begin
+@PP
+Tab characters provide a convenient way to indent and align parts of C
+tab.c @Index { tab characters in C programs }
+programs.  With care, this alignment can be preserved in the final
+print even with varying-width fonts.
+@PP
+The distance between two tab stops in the input file is by default taken
+to be 8 characters, which is standard for Unix.  This can be changed with
+the @Code "tabin" option.  For example,
+@ID @Code "@CP tabin { 4 }"
+informs Lout that tab stops occur every 4 characters in the input file.
+@PP
+The distance between two tab stops in the output file (on the printed
+page) is quite a different thing, and it is determined by the value of
+the @Code "tabout" option, which must be a Lout length.  For example,
+@ID @Code "@CP tabout { 0.5i }"
+requests that tab stops be placed at half-inch intervals.  In other
+words, a distance of one tab stop in the input will be equivalent to a
+distance of half an inch in the output.  For example,
+@ID @Code "@CP style { varying } tabout { 3f }"
+might produce the following, where tab characters in the input file
+have been used for indenting and also to align the comments:
+@ID @OneRow @CP style { varying } tabout { 3f } {
+struct tnode {			/* the basic node */
+	char *word;		/* points to the text */
+	int count;		/* number of occurrences */
+	struct tnode *left;	/* left child */
+	struct tnode *right;	/* right child */
+};
+}
+The value {@Code "3f"} means three times the current font size, and
+it is the default value of @Code "tabout" for the @Code { varying }
+and @Code { symbol } styles (Section {@NumberOf cpsetup}).  In a
+12 point font this is 36 points, or half an inch.
+@PP
+If @Code "tabout" is made too small, there is a danger that the
+alignment might fail.  For example,
+@ID @Code "@CP style { varying } tabout { 0.2i }"
+produces
+@ID @OneRow @CP style { varying } tabout { 0.2i } {
+struct tnode {			/* the basic node */
+	char *word;		/* points to the text */
+	int count;		/* number of occurrences */
+	struct tnode *left;	/* left child */
+	struct tnode *right;	/* right child */
+};
+}
+given the same C text as the previous example.  The problem here is that
+we are asking for @CP { /* } to appear four tab stops or 0.8 inches
+from the left edge, and yet the material to its left on the line is
+wider than this.  This causes @CP { /* } to be shifted further to the
+right than expected, and the alignment is lost.  The only solution is
+to increase {@Code "tabout"}.
+@PP
+In stand-alone mode there are @Code "-t" and @Code "-T" options
+equivalent to @Code "tabin" and @Code "tabout" respectively.  For
+example, @Code "-T0.5i" produces a half-inch tab width.
+@End @Section
diff --git a/doc/user/dia b/doc/user/dia
new file mode 100644
index 0000000..4029cec
--- /dev/null
+++ b/doc/user/dia
@@ -0,0 +1,46 @@
+@Chapter
+   @Title { Diagrams }
+   @Tag { diagrams }
+@Begin
+@LP
+This chapter describes how to use the @@Diag symbol
+diag. @Index { @@Diag }
+@FootNote {
+Prior to Version 3.09 of Lout, this chapter described a symbol called
+fig. @Index @Code "@Fig"
+{@Code "@Fig"} which was similar to but more primitive than
+{@Code "@Diag"}.  For backward compatibility the @Code "@Fig" symbol
+is still available and still works exactly as described in the old
+documentation, but there is no reason to use it in new documents.
+}
+to make diagrams like this one:
+diag. @Index @Code "@Diag"
+@CD @Diag
+    margin { 0.2c }
+{
+-2p @Font
+{ A:: @Ellipse { 25, 39 }
+/0.3c |0.2c B:: @Ellipse { 43 } |0.1c |0.8c E:: @Box outlinestyle {noline} {Problem node}
+/0.3c C:: @Ellipse { 40, 41 } | | D:: @Ellipse paint { lightgrey } {44, 45, 46}
+}
+// @Link from { A } to { B }
+// @Link from { B } to { C }
+// @Link from { B } to { D }
+// @Arrow from { E } to { D }
+}
+@@Diag offers nodes and links, arrows, labels, positioning using coordinates,
+and tree diagrams.
+@BeginSections
+@Include { dia_intr }
+@Include { dia_node }
+@Include { dia_link }
+@Include { dia_tags }
+@Include { dia_labe }
+@Include { dia_posi }
+@Include { dia_tree }
+@Include { dia_erro }
+@Include { dia_defi }
+@Include { dia_geom }
+@Include { dia_summ }
+@EndSections
+@End @Chapter
diff --git a/doc/user/dia_cons b/doc/user/dia_cons
new file mode 100644
index 0000000..569b756
--- /dev/null
+++ b/doc/user/dia_cons
@@ -0,0 +1,7 @@
+@Section
+    @Tag { dia_cons }
+    @Title { Consistency within and between diagrams }
+@Begin
+@PP
+@I { still to do }
+@End @Section
diff --git a/doc/user/dia_defi b/doc/user/dia_defi
new file mode 100644
index 0000000..ed27887
--- /dev/null
+++ b/doc/user/dia_defi
@@ -0,0 +1,361 @@
+@Section
+    @Tag { dia_defi }
+    @Title { Expert usage:  defining new shapes }
+@Begin
+@PP
+@@Diag permits you to create your own node outlines and link paths, by
+giving non-standard values to the @Code outline and @Code path
+options.  This section shows how to do this for very simple shapes
+only; the following section introduces the large repertoire of geometrical
+symbols that @@Diag offers for helping you create complex shapes.
+@PP
+As explained earlier, a node outline is drawn over its {@I base}, which
+is a rectangle containing the following object plus margins.  The base
+defines a coordinate system with the point (0, 0) at the bottom left
+corner, and @Eq { (xsize, ysize) } at the top right:
+@CD @OneRow @Diag {
+@Box
+    nodelabelmargin { 0.3f }
+    blabel { @Eq { ysize } }
+    blabelprox { E }
+    clabel { @Eq { 0 } }
+    clabelprox { E }
+    dlabel { @Eq { xsize } }
+    dlabelprox { N }
+    alabel { @Eq { 0 } }
+    alabelpos { SW }
+    alabelprox { N }
+    paint { lightgrey }
+    outlinestyle { noline }
+    margin { 0c }
+{ 3c @Wide 2c @High }
+//0.5c
+}
+The value of the @Code outline option is a sequence of points defined in
+this coordinate system:
+@ID {
+@Code {
+"@Node"
+"    outline {"
+"        0 0"
+"        xsize 0"
+"        0 ysize"
+"        0 0"
+"    }"
+}
+||7ct
+@Diag {
+@Box
+    margin { 0c }
+    outlinestyle { noline }
+    paint { lightgrey }
+@Node
+    outline {
+        0 0
+        xsize 0
+        0 ysize
+        0 0
+    }
+    margin { 0c }
+{ 3c @Wide 2c @High }
+}
+}
+As shown, the resulting outline is created by joining each point to the
+next with a straight line.  It is conventional to proceed anticlockwise
+around the outline, but you may start anywhere.
+@PP
+The {@Code paint}, {@Code outlinestyle}, {@Code outlinedashlength},
+and {@Code outlinewidth} options of @Code "@Node" work for user-defined
+outlines exactly as they do for the standard ones:
+@ID {
+@Code {
+"@Node"
+"    outline {"
+"        0 0"
+"        xsize 0"
+"        0 ysize"
+"        0 0"
+"    }"
+"    paint { lightgrey }"
+"    outlinestyle { solid dashed }"
+}
+||7ct
+@Diag {
+@Node
+    outline {
+        0 0
+        xsize 0
+        0 ysize
+        0 0
+    }
+    paint { lightgrey }
+    outlinestyle { solid dashed }
+    margin { 0c }
+{ 3c @Wide 2c @High }
+}
+}
+Each line in the outline is one segment for {@Code outlinestyle}.
+@PP
+If two points in an outline are separated by {@Code "[]"}, no line is
+drawn between them, and the outline is treated as two separate,
+disconnected regions when painting.
+@PP
+Two points may also be separated by {@Code "["}{@I point}{@Code "]"},
+where @I point stands for any point.  This causes the two points to be
+joined by an arc whose centre is at the given point:
+@ID {
+@Code {
+"@Node"
+"    outline {"
+"        0 0"
+"        ysize 0"
+"        [ 0 0 ]"
+"        0 ysize"
+"        0 0"
+"    }"
+}
+||7ct
+@Diag {
+@Box
+    margin { 0c }
+    outlinestyle { noline }
+    paint { lightgrey }
+@Node
+    outline {
+        0 0
+        ysize 0
+        [ 0 0 ]
+        0 ysize
+        0 0
+    }
+    margin { 0c }
+{ 3c @Wide 2c @High }
+}
+}
+The arc will be circular if possible, otherwise it will be part of
+elliptical. @Index { elliptical arcs }
+an ellipse whose axes are oriented horizontally and vertically.  The
+arc goes anticlockwise; to get a clockwise arc, use
+{@Code "["}{@I point}{@Code " clockwise]"}.
+@PP
+Two points may be separated by
+@Eq { [x sub 1 ``` y sub 1 ```  x sub 2 ``` y sub 2 & ] }, which requests
+that a Bezier curve be drawn between them with control points
+bezier.curve @Index { Bezier curve }
+@Eq { (x sub 1 & , y sub 1 & ) } and
+@Eq { (x sub 2 & , y sub 2 & ) }:
+@CD @Diag {
+@Node
+    outline {
+        A:: { xsize*0.2 ysize*0.5 }
+        B:: { xsize*0.4 ysize*0.9 }
+        C:: { xsize*0.9 ysize*0.4 }
+        D:: { xsize*0.3 ysize*0.1 }
+        A B C D A
+    }
+    alabelpos { A }
+    blabelpos { B }
+    clabelpos { C }
+    dlabelpos { D }
+    alabelprox { SE }
+    blabelprox { SW }
+    clabelprox { SW }
+    dlabelprox { NW }
+    outlinestyle { cdashed cdashed cdashed noline }
+    alabel { @Eq { ( x sub 0 , y sub 0 ) } }
+    blabel { @Eq { ( x sub 1 , y sub 1 ) } }
+    clabel { @Eq { ( x sub 2 , y sub 2 ) } }
+    dlabel { @Eq { ( x sub 3 , y sub 3 ) } }
+{ 6c @Wide 2c @High }
+//
+@Link
+    path { A [B C] D }
+}
+The curve is attracted toward the control points, without reaching
+them; it is tangent to the straight line from the start point to the
+first control point, and from the second control point to the finishing
+point, and it lies wholly inside the quadrilateral formed by the four
+points.  Owing to the author's laziness, dashes and dots do not fit as
+neatly onto Bezier curves as they do onto lines and arcs.
+@PP
+Tags (Section {@NumberOf dia_tags}) may be assigned to points within
+the outline option, like this:
+@ID {
+@Code {
+"@Node"
+"    outline {"
+"        LR:: { xsize 0 }"
+"        UL:: { 0 ysize }"
+"        0 0  LR  UL  0 0"
+"    }"
+}
+||7ct
+@Diag {
+//0.5f
+@ShowTags @Node
+    outline {
+        LR:: { xsize 0 }
+        UL:: { 0 ysize }
+        0 0  LR  UL  0 0
+    }
+    { 2c @High 3c @Wide }
+}
+}
+The tagged point does not have to lie on the outline, and it
+is not automatically added to the outline.  Once defined, a
+tag stands for a point in the usual way; it may be used later in the
+outline, as was done above, relabelled, and so on, exactly like the tags
+of the standard nodes.
+@PP
+Once a point has been tagged, a @I direction may be associated
+with it, to inform @@Diag which way the outline or
+link path is going at that point.  The standard outlines have directions:
+@ID {
+@Code {
+"@Ellipse { 3c @Wide 1c @High }"
+}
+||7ct
+@Diag {
+//0.5f
+@ShowTags @ShowDirections @Ellipse { 3c @Wide 1c @High }
+}
+}
+@Code CTR has no direction.  If available, direction information
+is used when placing labels, in the proximity step (by {@Code above}, for
+example) and in the angle step if the label is aligned, perpendicular,
+parallel, or antiparallel.  A direction is given using the
+@Code ":<" symbol within an outline:
+@ID {
+@Code {
+"@Node"
+"    outline {"
+"        LR:: { xsize 0 }"
+"        LR:< 0d"
+"        UL:: { 0 ysize }"
+"        UL:< 270d"
+"        0 0 LR UL 0 0"
+"    }"
+}
+||7ct
+@Diag {
+//0.5f
+@ShowTags @ShowDirections @Node
+    outline {
+        LR:: { xsize 0 }
+        LR:< 0d
+        UL:: { 0 ysize }
+        UL:< 270d
+        0 0 LR UL 0 0
+    }
+    { 2c @High 3c @Wide }
+}
+}
+It is often helpful when creating outlines to check where the tagged
+points and directions really are, by printing them out as is done
+above.  For this there is a @Code "@ShowTags" symbol whose result is
+the following (arbitrary) object with its tagged points visible, and
+a @Code "@ShowDirections" symbol which works similarly and shows the
+directions.  The diagram above was printed using
+{@Code "@ShowTags @ShowDirections @Node ..."}.  There is also a
+@Code "@ShowPoints" symbol which is like @Code "@ShowTags" except
+that it omits the tags, just placing circles on the points.
+@PP
+Link paths are similar to node outlines, created
+using the @Code path option of @Code "@Link" instead of the
+@Code outline option of {@Code "@Node"}.  The major difference is that
+links have no base, so @Code xsize and @Code ysize cannot be
+used.  Indeed, even @Code "0 0" does not have any useful
+meaning inside a link path.
+@PP
+Within a link path, the symbols @Code from and @Code to denote the
+values of the link's @Code from and @Code to options, and these
+form the basis of constructing the link path:
+@ID {
+@Code {
+"@Link"
+"    path {"
+"        FROM:: from"
+"        TO:: to"
+"        FROM TO"
+"    }"
+}
+||7ct
+{
+//1.0c
+@VContract @Diag {
+3c @Wide 1c @High
+//
+@ShowTags @Link
+    path {
+        FROM:: from
+        TO:: to
+        FROM TO
+    }
+    from { 0,1 }
+    to { 1,0 }
+}
+}
+}
+This simple example creates two tagged points and joins them with
+a straight line.  If you want a link that can carry arrowheads, it is
+best to ensure that it creates @Code FROM and @Code TO tags, with
+directions pointing along the link from @Code FROM to @Code TO at
+both points, since then the default values of the various arrow
+options will do the rest.  Similarly, if you want labels you need to
+define {@Code LFROM}, {@Code LMID}, and {@Code LTO} labels, ideally
+also with directions.
+@PP
+Once the outline or path is complete, unless it is really a one-off
+production the best thing to do with it is to add it to your
+extend. @Index { @Code extend keyword }
+@Code "mydefs" file in the following form:
+@ID @OneRow @Code {
+"extend @DiagSetup @Diag"
+"macro @MyNode {"
+"    @Node"
+"        outline {"
+"            LR:: { xsize 0 }"
+"            LR:< 0d"
+"            UL:: { 0 ysize }"
+"            UL:< 270d"
+"            0 0 LR UL 0 0"
+"        }"
+"}"
+}
+This says that we are `extending' the @@Diag symbol by adding a new
+symbol, {@Code "@MyNode"}, which stands for what follows it between
+braces.  @Code "@MyNode" will then behave exactly like @Code "@Circle"
+and the other standard node symbols.  The same pattern works for links:
+@ID @OneRow @Code {
+"extend @DiagSetup @Diag"
+"macro @MyLink {"
+"    @Link"
+"        path {"
+"            FROM:: from"
+"            TO:: to"
+"            FROM TO"
+"        }"
+"}"
+}
+If it is worth the effort to construct a new outline or link path, it
+is worth packaging it like this and thinking up a good name for it,
+for then it will be available, easily, forever.
+@PP
+This same approach is also useful to define common combinations of
+options, even when there is no new outline or path:
+@ID @OneRow @Code {
+"extend @DiagSetup @Diag"
+"macro @BigOctagon {"
+"    @Polygon"
+"        sides { 8 }"
+"        hsize { 5c }"
+"        vsize { 5c }"
+"        font { Bold }"
+"}"
+}
+Such definitions are very useful if the combinations occur
+frequently.  Any options not mentioned have their usual default values,
+and may be set in the usual way:
+@ID @Code "@BigOctagon outlinestyle { dashed } ..."
+Attempts to reset an already set option will elicit a warning message.
+@End @Section
diff --git a/doc/user/dia_erro b/doc/user/dia_erro
new file mode 100644
index 0000000..2ad02d5
--- /dev/null
+++ b/doc/user/dia_erro
@@ -0,0 +1,45 @@
+@Section
+    @Tag { dia_erro }
+    @Title { Errors }
+@Begin
+@PP
+Lout normally produces an output file that will print without mishap on
+any PostScript device.  However, some of the options of {@Code "@Diag"}'s
+symbols are passed through Lout to the output file without checking,
+including anything containing @Code "@Diag" lengths, angles, points, and
+tags.  Any errors in these options will not be detected until the file
+is printed.
+@PP
+The most likely errors are {@I syntax @I errors}, as in
+@Code "outline { 0 0 [ 0 xsize }" for example, in which a @Code "]" is
+missing; @I { type errors }, as in @Code "SE:: 45d" where the
+following object should have been a point; and @I { undefined errors },
+arising from labels misspelt or used before being defined.  Less commonly,
+the options may all be correct but the figure is too large in some way:  too
+many labels, too deeply nested, and so on.
+@PP
+When an error is detected, @@Diag arranges for the offending page to
+be printed up to the point where the error occurred, with a message nearby
+describing the error.  Printing of the document is then aborted.  It is
+often quite easy to find the problem, because it lies in whatever should
+have been printed next.
+@PP
+If you see {@Code VMerror} in an error message, it means that the printer
+vmerror. @Index { @Code VMerror PostScript error }
+is running out of memory.  In that case, one thing you can try is
+@ID @Code {
+"@Diag"
+"    save { yes }"
+"..."
+}
+This causes the memory used by @@Diag to be reclaimed as soon
+as the diagram is printed, rather than at the end of the current page
+as is usual.  However, if the diagram is nested inside some other
+major Lout package, such as {@Code "@Graph"}, use of this option may
+cause other PostScript errors.
+@PP
+If you see @Code "dictfull" in an error message, it means that you are
+dictfull. @Index { @Code dictfull PostScript error }
+using an old version of PostScript.  Increasing the @Code "maxlabels"
+option of @@Diag (Section {@NumberOf dia_summ}) might fix the problem.
+@End @Section
diff --git a/doc/user/dia_geom b/doc/user/dia_geom
new file mode 100644
index 0000000..bfc9c02
--- /dev/null
+++ b/doc/user/dia_geom
@@ -0,0 +1,208 @@
+@Section
+    @Tag { dia_geom }
+    @Title { Expert usage:  numbers, lengths, angles, and points }
+@Begin
+@PP
+@@Diag has many options whose values contain lengths, angles, and
+points.  Options such as @Code margin and {@Code vsize}, which affect the
+size or appearance of the base of a node, may contain only the kinds of
+lengths described in Section {@NumberOf objects}; but in all other cases
+arbitrarily complex algebraic expressions may be used to specify the
+values.
+@PP
+The usual mathematical operations may be applied to numbers, angles, and
+lengths:
+@ID @Code "2.0f + 3.0f * sin { 30d }"
+is a valid length.  Since this is just ordinary algebra on real numbers,
+the unsurprising details are deferred to the summary
+(Section {@NumberOf dia_summ}).  Grouping is always done with braces,
+never parentheses.
+@PP
+More interesting are the geometrical symbols that @@Diag provides.  The
+most fundamental is not a symbol at all:  two lengths side by side define
+a point.  For example,
+@ID @Code "xsize  ysize * 0.5"
+within an outline is the point at the far right of the base, halfway
+up.
+@PP
+There are @Code "++" and @Code "--" symbols for vector addition and
+subtraction of two points, and @Code "**" for multiplication by a
+scalar.  For example,
+@ID @Code "A@CTR ++ { 1.0f 0 }"
+is the point @Code 1f to the right of {@Code "A@CTR"}.  It is a good idea
+to distinguish between @I { absolute points }, like {@Code "A@CTR"}
+and @Code "0.5,1", which denote fixed positions on the page, and
+@I { relative points }, like {@Code "1.0f 0"}, which serve as offsets
+from absolute points.  The difference of two absolute points is a relative
+point; adding two absolute points gives an unpredictable result because
+it depends on the origin of the coordinate system.  However, the expression
+@ID @Code "P1 ** x ++ P2 ** {1 - x}"
+is safe for any two absolute points {@Code P1} and {@Code P2} and any
+number {@Code x}; it produces a point on the line through the two
+points.
+@PP
+These remarks on safety do not apply within the @Code outline option of
+{@Code "@Node"}, because there the coordinate system is clearly
+specified.  Vector operations, with the aid of a few well-chosen tags,
+can greatly simplify the production of outlines:
+@ID {
+@Code {
+"@Node"
+"   outline {"
+"      SB:: {0 ysize} ** 0.4"
+"      ST:: {0 ysize} ** 0.6"
+"      HB:: {xsize 0} ** 0.7"
+"      SB"
+"      SB ++ HB"
+"      HB"
+"      xsize  ysize * 0.5"
+"      HB ++ {0 ysize}"
+"      HB ++ ST"
+"      ST"
+"      SB"
+"   }"
+"   paint { grey }"
+"{ 6c @Wide 2c @High }"
+}
+||7ct
+@Diag {
+@ShowTags @Node
+   outline {
+      SB:: {0 ysize} ** 0.4
+      ST:: {0 ysize} ** 0.6
+      HB:: {xsize 0} ** 0.7
+      SB
+      SB ++ HB
+      HB
+      xsize  ysize * 0.5
+      HB ++ {0 ysize}
+      HB ++ ST
+      ST
+      SB
+   }
+   paint { grey }
+{ 6c @Wide 2c @High }
+}
+}
+But absolute sums like @Code "SB ++ HB" are not safe
+in link paths and stray options like {@Code "alabelpos"}.
+@PP
+Sometimes it is useful to define tags
+which are not wanted afterwards and are better forgotten.  For
+this there is the @Code ":=" symbol, which works in much the same
+way as @Code "::" except that the tag is forgotten after the outline
+or path option ends.  The value assigned does not have to be a point, it
+can be a length or angle, or even a sequence of values.  It is
+permissible to change the value assigned to a tag by reassigning.
+@PP
+Two very useful symbols, {@Code angleto} and {@Code atangle}, bring
+angleto. @Index { @Code angleto symbol in @Code "@Diag" }
+atangle. @Index { @Code atangle symbol in @Code "@Diag" }
+angles into the algebra.  The {@Code angleto} symbol finds the angle
+from one point to another.  For example,
+@ID @Code "SB angleto ST"
+in the outline above would produce {@Code 90d}.  The @Code atangle symbol
+finds the point at a given length and angle from the origin.  For example,
+@ID @Code "1.4142f atangle 45d"
+is the point {@Code "1f 1f"}, and
+@ID @Code "B@NE  ++ 2f atangle 115d"
+is the point @Code 2f from {@Code "B@NE"} to its northwest.
+@PP
+There is a @Code prev symbol, used only within {@Code outline} and
+prev. @Index { @Code prev symbol in @Code "@Diag" }
+{@Code path}, which returns the previous point on the outline or
+path, ignoring points within {@Code "[]"}.  It makes relative movements
+very easy:
+@ID {
+@Code {
+"   outline {"
+"      0 0"
+"      { 2c atangle 30d }"
+"      prev ++ { 2c atangle 90d }"
+"      prev ++ { 2c atangle 150d }"
+"      prev ++ { 2c atangle 210d }"
+"      prev ++ { 2c atangle 270d }"
+"      0 0"
+"   }"
+}
+||7ct
+@Diag { ||2.5c
+@Node
+   outline {
+      0 0
+      { 2c atangle 30d }
+      prev ++ { 2c atangle 90d }
+      prev ++ { 2c atangle 150d }
+      prev ++ { 2c atangle 210d }
+      prev ++ { 2c atangle 270d }
+      0 0
+   }
+{ 4c @Wide 4c @High }
+}
+}
+This example is rather naughty because the outline does not grow and
+shrink with the base as it should.  Such outlines, while tempting, are
+always regretted later.
+@PP
+There are {@Code xcoord} and {@Code ycoord} symbols for finding the
+xcoord. @Index { @Code xcoord symbol in @Code "@Diag" }
+ycoord. @Index { @Code ycoord symbol in @Code "@Diag" }
+@I x and @I y coordinates of a point:
+@ID @Code {
+"{xcoord P1} min {xcoord P2}"   "{ycoord P1} max {ycoord P2}"
+}
+is the point at the top left-hand corner of the smallest rectangle
+containing points {@Code P1} and {@Code P2}.  And there is a
+@Code distance symbol which produces the (non-negative) distance between
+two points:
+@ID @Code "CTR  ++  { CTR distance NW } atangle { CTR angleto NW }"
+equals {@Code NW}.
+@PP
+The rest of this section is concerned with how the `special virtue'
+of the @Code from and @Code to options, their ability to accept a node
+tag as well as a point, is implemented behind the scenes.  A good
+user-defined link should also have this virtue, because it is extremely
+useful.
+@PP
+The solution is based on a symbol called {@Code boundaryatangle},
+whose preceding object should be either a point or else the tag
+of a node with one of the standard shapes, and whose following object
+is an angle:
+@ID @Code {
+"{ xsize ysize*0.5 } boundaryatangle 45d"
+"A boundaryatangle 45d"
+}
+In the first case the result is the point, regardless of the
+angle.  In the second case, the result is the point on the boundary of
+the node whose tag is given, at the given angle from the centre.
+@PP
+There is a second symbol with a similar adaptive ability, called
+{@Code "??"}, which is defined to be @Code "@" whenever that would
+make sense, and otherwise to produce the preceding object for its
+result.  For example, @Code "A??CTR" will equal @Code "A@CTR" if there
+is such a thing; but
+@ID @Code "{ xsize ysize*0.5 }??CTR"
+will have result {@Code "{ xsize ysize*0.5 }"} since replacing
+@Code "??" by @Code "@" does not produce anything sensible.
+@PP
+Now suppose we want a link path that connects @Code "from" and
+@Code "to" by a straight line, where @Code "from" and @Code "to" may be
+either node tags or points.  In either case a suitable direction for the
+line to take is
+@ID @Code "from??CTR angleto to??CTR"
+and so the desired path is
+@ID @Code {
+"path {"
+"    FROM:: from boundaryatangle { from??CTR angleto to??CTR }"
+"    TO:: to boundaryatangle { to??CTR angleto from??CTR }"
+"    FROM"
+"    TO"
+"}"
+}
+The first line defines point @Code FROM to be on the boundary of
+@Code from at the appropriate angle, if @Code "from" is a node tag;
+otherwise @Code "FROM" is just the point {@Code from}.  The second
+line defines point @Code TO similarly, and then the last two lines
+join these two points.  The @Code line standard link type is exactly
+this plus a few additional tags and directions.
+@End @Section
diff --git a/doc/user/dia_intr b/doc/user/dia_intr
new file mode 100644
index 0000000..52a9d49
--- /dev/null
+++ b/doc/user/dia_intr
@@ -0,0 +1,108 @@
+@Section
+    @Tag { dia_intr }
+    @Title { Introduction }
+@Begin
+@PP
+To use the @@Diag symbol you first need to include its setup file.  For
+example, suppose you have an ordinary document with tables:
+@ID @OneRow @Code {
+"@SysInclude { tbl }"
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"..."
+"@End @Text"
+}
+Change this to
+@ID @OneRow @Code {
+"@SysInclude { tbl }"
+"@SysInclude { diag }"
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"..."
+"@End @Text"
+}
+This provides everything you need for making diagrams.
+@PP
+The result of the @@Diag symbol is an object in the usual way.  A diagram
+is commonly made into a centred display, like this:
+@ID @OneRow @Code {
+"@CentredDisplay @Diag {"
+"    ..."
+"}"
+}
+or into a floating figure, like this:
+@ID @OneRow @Code {
+"@Figure"
+"    @Caption { ... }"
+"@Diag {"
+"    ..."
+"}"
+}
+but it could be an entry in a table, a word in a paragraph, or anything
+else.
+@PP
+Most uses of @@Diag contain a @I { nodes part } and a @I { links part }:
+@ID @OneRow lines @Break {
+@Code "@Diag {"
+    @I { nodes part }
+    @Code "//"
+    @I { links part }
+@Code "}"
+}
+This reflects @@Diag's view of the world as consisting of {@I nodes}
+(circles, squares, and so on), which have to be put in their right
+places and then joined with @I links (lines, arrows).  The technical
+meaning of the {@Code "//"} symbol does not concern us here; it
+simply serves to divide the two parts.
+@PP
+For example, here is a nodes part containing two nodes separated by
+a @Code "@DP" symbol that (as usual) leaves some vertical space
+between them:
+@ID @OneRow @Tab
+  @Fmta { @Col 7c @Wide A ! @Col B }
+{
+@Rowa
+    A { @Code {
+"@Ellipse { Hello, world }"
+"@DP"
+"@Square @I x"
+} }
+    B { @Diag {
+@Ellipse { Hello, world }
+@DP
+@Square @I x 
+} }
+}
+Node symbols like @Code "@Ellipse" and @Code "@Square" follow a familiar
+pattern:  they consume the following object, which may be arbitrary, draw
+a shape around it, and give back the resulting object.  To insert links, the
+nodes must first be given names, called {@I tags}, using the @Code "::" symbol:
+@ID @OneRow @Code {
+"A:: @Ellipse { Hello, world }"
+"@DP"
+"B:: @Square @I x"
+}
+Then a link from @Code A to @Code B may be added to the links part:
+@ID @OneRow @Tab
+  @Fmta { @Col 7c @Wide A ! @Col B }
+{
+@Rowa
+    A { @Code {
+"@Diag {"
+"    A:: @Ellipse { Hello, world }"
+"    @DP"
+"    B:: @Square @I x"
+"    //"
+"    @Link from { A } to { B }"
+"}"
+} }
+    B { @Diag {
+A:: @Ellipse { Hello, world }
+@DP
+B:: @Square @I x 
+//
+@Link from { A } to { B }
+} }
+}
+Subsequent examples will often omit the enclosing {@Code "@Diag { }"}.
+@End @Section
diff --git a/doc/user/dia_labe b/doc/user/dia_labe
new file mode 100644
index 0000000..c449367
--- /dev/null
+++ b/doc/user/dia_labe
@@ -0,0 +1,433 @@
+@Section
+    @Tag { dia_labe }
+    @Title { Labels }
+@Begin
+@PP
+Diagrams often contain small @I labels adjacent to their nodes and links:
+@CD @Diag
+    nodelabelformat { @I @Body }
+{
+@Tab
+    @Fmta { @Col A ! @Col ! @Col ! @Col B ! @Col ! @Col ! @Col C }
+{
+@Rowa
+    B { B:: @Circle alabel { b } }
+@Rowa
+    A { A:: @Circle alabel { a } }
+@Rowa
+    C { C:: @Circle dlabel { c } }
+}
+//
+@Arrow from { A } to { B } ylabel { 10 }
+@Arrow from { A } to { C } ylabel { 15 }
+@Arrow from { B } to { C } ylabel { 20 }
+}
+Each node may have up to four labels, called {@Code alabel}, {@Code blabel},
+label.  @Index { label options in @Code "@Diag" }
+alabel. @Index { @Code alabel option in @Code "@Diag" }
+blabel. @Index { @Code blabel option in @Code "@Diag" }
+clabel. @Index { @Code clabel option in @Code "@Diag" }
+dlabel. @Index { @Code dlabel option in @Code "@Diag" }
+{@Code clabel}, and {@Code dlabel}:
+@ID {
+@Code {
+"@Ellipse"
+"    alabel { a }"
+"    blabel { b }"
+"    clabel { c }"
+"    dlabel { d }"
+"{ Hello, world }"
+}
+||7ct
+@VContract @Diag {
+@Ellipse
+    alabel { a }
+    blabel { b }
+    clabel { c }
+    dlabel { d }
+{ Hello, world }
+}
+}
+Links also have labels, five in fact:
+@ID {
+@Code {
+"@Link"
+"    fromlabel { f }"
+"    xlabel { x }"
+"    ylabel { y }"
+"    zlabel { z }"
+"    tolabel { t }"
+}
+||7ct
+@VContract @Diag {
+3c @Wide 1c @High
+//
+@Link
+    from { 0 0 }
+    to { 1,1 }
+    fromlabel { f }
+    xlabel { x }
+    ylabel { y }
+    zlabel { z }
+    tolabel { t }
+}
+}
+The {@Code fromlabel} and {@Code tolabel} options are positioned directly
+over the endpoints of the link, and {@Code fromlabel} is by default printed
+at a funny angle, because these labels are the means of attaching
+arrowheads to links:
+@ID {
+@Code {
+"@Link"
+"    tolabel { @SolidArrowHead }"
+}
+||7ct
+@VContract @Diag {
+3c @Wide 1c @High
+//
+@Link
+    from { 0 0 }
+    to { 1,1 }
+    tolabel { @SolidArrowHead }
+}
+}
+@Code "@SolidArrowHead" is a symbol available for use anywhere whose value
+is an object in the shape of a small solid arrowhead.  The arrowhead
+options of Section {@NumberOf dia_link} work by setting {@Code fromlabel}
+and {@Code tolabel} in exactly this way.  Usually it is best to forget
+about {@Code fromlabel} and {@Code tolabel}, and think of links as having
+three labels:  {@Code xlabel} near the start, {@Code ylabel} in the
+middle, and {@Code zlabel} near the end.
+@PP
+Adding a label will not change the size of the diagram or the position
+of any node, link, or other label.  Although a label may be an arbitrary
+object, it is treated as having zero size and will overstrike anything
+that happens to be where it wants to go.
+@PP
+There are options for controlling the appearance and position of
+labels.  These are described below mainly for {@Code alabel}, but there
+are corresponding options for all nine labels.
+@PP
+The {@Code alabelfont} and {@Code alabelbreak} options determine the
+font and paragraph breaking style of the label:
+@ID {
+@Code {
+"@Ellipse"
+"    alabel { a }"
+"    alabelfont { -2p }"
+"    alabelbreak { ragged nohyphen }"
+"{ Hello, world }"
+}
+||7ct
+@VContract @Diag {
+@Ellipse
+    alabel { a }
+    alabelfont { -2p }
+    alabelbreak { ragged nohyphen }
+{ Hello, world }
+}
+}
+This example shows the default values of these two options; @Code "-2p"
+explains why the labels in earlier examples were printed in a smaller
+font size.  There is also an {@Code alabelformat} option which allows
+for more radical changes in appearance:
+@ID {
+@Code {
+"@Ellipse"
+"    alabel { a }"
+"    alabelformat { @Box @I @Body }"
+"{ Hello, world }"
+}
+||7ct
+@Diag {
+//0.5c
+@Ellipse
+    alabel { a }
+    alabelformat { @Box @I @Body }
+{ Hello, world }
+}
+}
+The value attached to the ellipse will be the value of {@Code alabelformat},
+with any @Code "@Body" symbol within it replaced by the value of the
+{@Code alabel} option.  This example produces boxed italic labels.
+@PP
+Nodes also have {@Code nodelabelfont}, {@Code nodelabelbreak}, and
+{@Code nodelabelformat} options which work in the same way but affect all
+of the node labels, not just one:
+@ID {
+@Code {
+"@Ellipse"
+"    nodelabelformat"
+"        { @Box @I @Body }"
+"    alabel { a }"
+"    blabel { b }"
+"{ Hello, world }"
+}
+||7ct
+@Diag {
+//0.5c
+@Ellipse
+    nodelabelformat { @Box @I @Body }
+    alabel { a }
+    blabel { b }
+{ Hello, world }
+}
+}
+Links similarly have {@Code linklabelfont}, {@Code linklabelbreak}, and
+{@Code linklabelformat} options which affect all the link labels
+(except {@Code fromlabel} and {@Code tolabel}, since that would produce
+results that people do not expect.)  The @Code "@Diag" symbol also has
+these options, in the usual way, and they are extremely useful there:
+@ID {
+@Code {
+"@Diag"
+"    nodelabelfont { Slope -2p }"
+"    linklabelformat { \"/\"@Body\"/\" }"
+"    hsize { 1.8c }"
+"{"
+"    A:: @Ellipse alabel { a } { OK }"
+"    @DP"
+"    @DP"
+"    B:: @Ellipse alabel { b } { FAULT }"
+"    //"
+"    @Arrow from { A } to { B } ylabel { sig }"
+"}"
+}
+||7ct
+@VContract @Diag
+    nodelabelfont { Slope -2p }
+    linklabelformat { "/"@Body"/" }
+    hsize { 1.8c }
+{
+    A:: @Ellipse alabel { a } { OK }
+    @DP
+    @DP
+    B:: @Ellipse alabel { b } { FAULT }
+    //
+    @Arrow  from { A } to { B } ylabel { sig }
+}
+}
+These settings specify that every node label will be set in italics,
+two points smaller than the surrounding text, and that every link label
+will appear between two @Code "/" characters, also two points smaller
+because the default value of @Code "linklabelfont" still applies.  Of
+course, it remains open to any node or link to override these settings
+by supplying its own label options.
+@PP
+The remaining five label options, {@Code alabelpos}, {@Code alabelangle},
+{@Code alabelprox}, {@Code alabelmargin}, {@Code alabelctr}, and
+{@Code alabeladjust},
+affect the position of the label.  Don't be daunted by the number of
+options.  As previous examples have shown, they all have sensible
+default values and thus need to be set only rarely.
+@PP
+Each label inhabits its own characteristic region of the node or
+link:  {@Code alabel} in the north-east corner of the node,
+{@Code ylabel} halfway along the link, and so on.  This general
+location of the label is defined by the {@Code alabelpos} option.  Here
+are the default values for all nine labels:
+@IL
+@LI {
+@Code {
+"@Node"
+"    alabelpos { NE }"
+"    blabelpos { NW }"
+"    clabelpos { SW }"
+"    dlabelpos { SE }"
+}
+||7ct
+@VContract @Diag {
+//0.5f
+@ShowTags @Ellipse { 3c @Wide 2c @High }
+}
+}
+@LI {
+@Code {
+"@Link"
+"    fromlabelpos { FROM }"
+"    xlabelpos { LFROM }"
+"    ylabelpos { LMID }"
+"    zlabelpos { LTO }"
+"    tolabelpos { TO }"
+}
+||7ct
+@VContract @Diag {
+//1.0f
+2c @Wide 2.2c @High
+//
+@ShowTags @Link
+    from { 0,0.7 }
+    to { 1,0 }
+    # tolabel { @SolidArrowHead }
+}
+}
+@EL
+Thus, by changing @Code clabelpos to @Code S you can move the position
+of the @Code clabel label to beneath the node.  You can do this for every
+node by setting this option in the @Code "@Diag" symbol, as was done for
+the formatting options above.
+@PP
+In a similar vein, there is an @Code { xindent } option which controls how
+far from the start of the link the @Code "LFROM" tag, and hence the
+{@Code xlabel}, will appear.  A similar option, @Code { zindent }, determines
+how far from the end of the link the @Code "LTO" tag and hence the
+{@Code zlabel} will appear:
+@ID {
+@Code {
+"@Link"
+"    xindent { 1f }"
+"    zindent { 2f }"
+}
+||7ct
+@VContract @Diag {
+//1f
+2c @Wide 1.2c @High
+//
+@ShowTags @Link
+    xindent { 1f }
+    zindent { 2f }
+    from { 0,0.7 }
+    to { 1,0 }
+}
+}
+Both options have default value {@Code 0.8f}.
+@PP
+The @Code alabelangle option determines the angle at which the label is
+printed:
+@ID @Tab
+    @Fmta { @Col @Code A ! @Col B }
+{
+@Rowa
+    A { "alabelangle { horizontal }" }
+    B { Horizontal (the default) }
+@Rowa
+    A { "alabelangle { aligned }" }
+    B { Aligned with the node outline or link path }
+@Rowa
+    A { "alabelangle { perpendicular }" }
+    B { Perpendicular to the outline or link path }
+}
+The @Code "alabelprox" option determines where in the proximity of
+@Code alabelpos the label is printed:
+@ID @Tab
+    @Fmta { @Col @Code A ! @Col B }
+{
+@Rowa
+    A { "alabelprox { above }" }
+    B { Above the node outline or link path (the default for link labels) }
+@Rowa
+    A { "alabelprox { below }" }
+    B { Below the node outline or link path }
+@Rowa
+    A { "alabelprox { left }" }
+    B { To the left of the node outline or link path }
+@Rowa
+    A { "alabelprox { right }" }
+    B { To the right of the node outline or link path }
+@Rowa
+    A { "alabelprox { inside }" }
+    B { Inside the node outline or on the left of the link path
+going from @Code from to @Code to }
+@Rowa
+    A { "alabelprox { outside }" }
+    B { Outside the node outline or on the right of the link path
+going from @Code from to @Code to (the default for node labels) }
+}
+The {@Code alabelmargin} option adds a margin around all four sides of
+the label, thereby moving it away from {@Code alabelpos} irrespective of
+which direction it happens to lie in:
+@ID {
+@Code {
+"@Ellipse"
+"    alabel { a }"
+"    alabelmargin { 0f }"
+"{ Hello, world }"
+}
+||7ct
+@VContract @Diag {
+@Ellipse
+    alabel { a }
+    alabelmargin { 0f }
+{ Hello, world }
+}
+}
+The default value is {@Code 0.2f}, and so there is scope for some
+reduction as well as increase.
+@PP
+@@Diag takes careful account of the @Code alabelangle option, the
+@Code alabelprox option, the direction that the node outline or link
+path is heading, and which label it is, and places the label in a way
+that looks good nearly always.  When it doesn't, the remainder of this
+section should help.
+@PP
+The @Code alabelangle option may be given an arbitrary angle, and then
+the label will be printed at that angle.  There are also the special
+values @Code parallel and {@Code antiparallel}, which give the direction
+that the node outline or link path is going at that point and its
+opposite.  These are the default values for @Code tolabelangle and
+@Code fromlabelangle respectively, which explains why arrowheads point the
+right way.  The @Code aligned value above is one of these two angles,
+the one closest to {@Code 0d}.
+@PP
+The @Code alabelprox option may be {@Code N},
+{@Code S}, {@Code E}, {@Code W}, {@Code NE}, {@Code SE}, {@Code NW},
+{@Code SW}, or {@Code CTR}:
+@CD @Diag {
+//1f
+@ShowTags @Box margin { 0.5c } { 24p @Font grey @Colour @I label }
+}
+meaning that the indicated point of the label will coincide with
+{@Code alabelpos}.  These points lie on the outside of the margins
+added by {@Code alabelmargin}.
+@PP
+The six values of @Code alabelprox given earlier (@Code { above },
+@Code { below }, etc.) all produce one of {@Code N}, {@Code S} etc. for
+their ultimate result; which one they produce depends on the direction
+the outline or link is going at that point.  For example, @Code { above }
+produces @Code { SE } when the outline or link is going from northeast
+to southwest or vice versa, @Code { SW } when the outline or link is
+going from northwest to southeast and vice versa, and @Code { S } when
+it happens to be exactly horizontal.  There is also a dependence
+on which label it is:  for example, if it is @Code "xlabel" and the
+direction happens to be vertical, the result is {@Code "NW"}.
+@PP
+The preceding discussion is all under the assumption that the
+@Code "alabelctr" option is {@Code no}.  When it is {@Code "yes"},
+a small adjustment is made to the position of the label.  The selected
+corner or side midpoint of the label will no longer coincide with
+{@Code alabelpos}, although it will still lie on the straight line passing
+through {@Code alabelpos} at the angle of {@Code alabelpos}.  The corner
+or side midpoint slides up or down this line to the point which
+minimises the distance from {@Code alabelpos} to the centre of the
+label.  Only @Code ylabelctr has @Code "yes" for its default value; the
+@Code y label often looks better centred when this adjustment is made,
+particularly on lines with shallow but non-zero slope:
+@CD @Tab
+    @Fmta { @Col @CC A ! @Col ! @Col @CC B }
+{
+@Rowa
+    A { @Code "ylabelctr { no }" }
+    B { @Code "ylabelctr { yes }" }
+@Rowa
+@Rowa
+@Rowa
+    A { @Diag ylabelctr { no } {
+        A:: @Square //0.5c &3c B:: @Square
+        //
+        @Link from { A } to { B } ylabel { @I { ylabel } }
+      } }
+    B { @Diag ylabelctr { yes } {
+        A:: @Square //0.5c &3c B:: @Square
+        //
+        @Link from { A } to { B } ylabel { @I { ylabel } }
+      } }
+}
+since it is then the centre of the label which is centred on the link,
+rather than one of its corners.
+@PP
+Finally, when all else fails there is an {@Code alabeladjust} option
+which translates the label by an arbitrary amount:
+@ID @Code "alabeladjust { -0.5c 1.5c }"
+causes the label to appear 0.5 centimetres to the left of and 1.5 centimetres
+above the point where it otherwise would have done.
+@End @Section
diff --git a/doc/user/dia_link b/doc/user/dia_link
new file mode 100644
index 0000000..b71f9d5
--- /dev/null
+++ b/doc/user/dia_link
@@ -0,0 +1,261 @@
+@Section
+    @Tag { dia_link }
+    @Title { Links }
+@Begin
+@PP
+@Code "@Diag" has one basic symbol for creating links, called
+link. @Index { @Code "@Link" symbol from @Code "@Diag" }
+{@Code "@Link"}.  It draws a link between two points or nodes
+given by {@Code from} and {@Code to} options, along a path
+given by a {@Code path} option:
+@ID @Code {
+"@Link"
+"    path { ... }"
+"    from { ... }"
+"    to { ... }"
+}
+Unlike {@Code "@Node"}, {@Code "@Link"} has no following object.
+@PP
+The @Code "path" option may be used to produce a link of any shape, as
+Section {@NumberOf dia_defi} explains.  There are also values
+that produce standard paths.  These are listed in full in the summary
+(Section {@NumberOf dia_summ}); here is a sample:
+@ID @Tab
+    @Fmta { @Col @Code { path "{" A "}" } ! @Col ! @Col B }
+{
+
+@Rowa
+    A { line }
+    B {
+@Diag {
+A:: @Circle //1c ||2c B:: @Circle
+// @Link from { A } to { B } path { line } arrow { yes }
+}
+}
+
+@Rowa
+    A { acurve }
+    B {
+@Diag {
+A:: @Circle //1c ||2c B:: @Circle
+// @Link from { A } to { B } path { acurve } arrow { yes }
+}
+}
+
+@Rowa
+    A { ccurve }
+    B {
+@Diag {
+A:: @Circle //1c ||2c B:: @Circle
+// @Link from { A } to { B } path { ccurve } arrow { yes }
+}
+}
+
+@Rowa
+    A { rvlcurve }
+    B {
+@Diag {
+A:: @Circle //1c ||2c B:: @Circle
+// @Link from { A } to { B } path { rvlcurve } arrow { yes }
+}
+}
+
+}
+The name of the last one is a reminder that it goes right, then vertically,
+then left, with curved corners.  The @Code acurve and @Code ccurve values
+produce circular arcs, anticlockwise and clockwise respectively, lying on
+the circle passing through the endpoints, or through the centres of the
+endpoints when they are tags denoting nodes.  There is also @Code "curve"
+which is an abbreviation for {@Code "acurve"}.  All these standard paths
+are defined in a way that makes sense no matter where the two nodes are
+relative to each other, except that no promise of a sensible result is
+made for two nodes very close together.
+@PP
+@Code "@Link" has two options, @Code bias and {@Code radius}, that may be
+used to fine-tune the path.  The @Code "bias" option determines the
+maximum distance that a curve is permitted to stray:
+@CD @Tab
+    @Fmta { @Col A ! @Col ! @Col B }
+{
+
+@Rowa
+
+    A { @Diag vstrut { no } margin { 0.5c } {
+A:: @Circle //1.5c ||2c B:: @Circle
+//
+LA:: @Line pathstyle { cdashed } from { A } to { B }
+LB:: @Curve from { A } to { B }
+@Line arrow { both } from { LA@LMID } to { LB@LMID }
+    ylabel { @I bias } # ylabeladjust { 0.15c 0 }
+} }
+
+    B { @Diag vstrut { no } margin { 0.5c } {
+A:: @Circle //1.5c ||2c B:: @Circle
+//
+LA:: @RVLCurve from { A } to { B }
+LB:: @Line pathstyle { cdashed } from { B@E } to { B@E ++ {0 2.5c} }
+@Line arrow { both } from { LB@LMID } to { LA@LMID }
+     ylabel { @I bias } ylabeladjust { 0 0.05c }
+} }
+
+}
+The @Code radius option does @I not apply to @Code acurve and
+{@Code ccurve}; rather, it determines the radius of the arcs at
+the corners of @Code rvlcurve and its kin.  A very large radius will be
+reduced to the largest reasonable value, which provides a way to get
+a semicircle at the right in an {@Code rvlcurve}.
+@PP
+Lout has no idea where the path is wandering, and cannot take it into
+account when placing a diagram on the page:
+@ID {
+@Code {
+"@Link"
+"    path { ccurve }"
+"    bias { 2c }"
+}
+||7ct
+@Diag vstrut { no } {
+A:: @Circle &3c B:: @Circle
+//
+@Link path { ccurve } bias { 2c } from { A } to { B }
+}
+}
+In such cases you have to arrange for the extra space yourself, by adding
+an extra paragraph symbol, blank row or column in a table, or whatever.
+@PP
+As with the options of {@Code "@Node"}, the options of {@Code "@Link"}
+may all be given to {@Code "@Diag"} as well, where they apply to every
+link in the diagram, unless overridden in the usual way.  They also appear
+in the setup file, where they apply to every link in every diagram of the
+document, unless overridden.
+@PP
+There are {@Code pathstyle}, {@Code pathdashlength} and {@Code pathwidth}
+options which affect the appearance of the path in the same way as the
+{@Code outlinestyle}, {@Code outlinedashlength} and {@Code outlinewidth}
+options of {@Code "@Node"} affect the outline.  When {@Code pathstyle}
+contains just one value (as opposed to a sequence of values) @Code "@Diag"
+tries to divide the path into fewer segments than it would otherwise, to
+make dashed and dotted paths look as good as possible.  There is also
+a {@Code pathgap} option which affects only @Code doubleline paths; it
+determines the gap between the centres of the two lines.
+@PP
+The @Code "@Link" symbol has an @Code arrow option, which adds an
+arrow. @Index { arrows }
+arrowhead to the end of the link:
+@ID {
+@Code {
+"@Link"
+"    arrow { yes }"
+}
+||7ct
+@Diag {
+1c @High 3c @Wide
+//
+@Link
+    from { 0,0 }
+    to { 1,1 }
+    arrow { yes }
+}
+}
+Its value may be {@Code no} (the default), {@Code yes}, {@Code forward}
+(which is the same as {@Code yes}), {@Code back}, or {@Code both}:
+@ID {
+@Code {
+"@Link"
+"    arrow { both }"
+}
+||7ct
+@Diag {
+1c @High 3c @Wide
+//
+@Link
+    from { 0,0 }
+    to { 1,1 }
+    arrow { both }
+}
+}
+@Code "@Link" has three options for controlling the appearance of
+arrowheads:  {@Code arrowstyle}, {@Code arrowwidth}, and
+{@Code arrowlength}.  Although every link symbol has these options, for
+consistency it is almost always better to set the corresponding options
+to the @Code "@Diag" symbol, which applies them to every arrow in the
+diagram:
+@ID @Code {
+"@Diag"
+"    arrowstyle { solid }"
+"    arrowwidth { 0.3f }"
+"    arrowlength { 0.5f }"
+"{"
+"    ..."
+"}"
+}
+This shows the default values:  a solid arrowhead like the ones above,
+@Code "0.3f" wide (across) and @Code "0.5f" long.  The @Code "arrowwidth"
+and @Code "arrowlength" options may be any length; it may be necessary to
+decrease @Code "arrowwidth" when many arrows enter one node.  The full list
+of possible values for @Code "arrowstyle" is
+@ID @Tab
+    @Fmta { @Col @Code { "arrowstyle {" A "}" } ! @Col B  }
+    vmargin { 1.0vx }
+{
+@Rowa
+    A { solid }
+    B { @Diag vstrut { no } { A:: @Circle  |2c B:: @Circle 
+	// @Link from { A } to { B } arrow { yes } arrowstyle { solid } } }
+@Rowa
+    A { halfopen }
+    B { @Diag vstrut { no } { A:: @Circle  |2c B:: @Circle 
+	// @Link from { A } to { B } arrow { yes } arrowstyle { halfopen } } }
+@Rowa
+    A { open }
+    B { @Diag vstrut { no } { A:: @Circle  |2c B:: @Circle 
+	// @Link from { A } to { B } arrow { yes } arrowstyle { open } } }
+@Rowa
+    A { curvedsolid }
+    B { @Diag vstrut { no } { A:: @Circle  |2c B:: @Circle 
+	// @Link from { A } to { B } arrow { yes } arrowstyle { curvedsolid } } }
+@Rowa
+    A { curvedhalfopen }
+    B { @Diag vstrut { no } { A:: @Circle  |2c B:: @Circle 
+	// @Link from { A } to { B } arrow { yes } arrowstyle { curvedhalfopen } } }
+@Rowa
+    A { curvedopen }
+    B { @Diag vstrut { no } { A:: @Circle  |2c B:: @Circle 
+	// @Link from { A } to { B } arrow { yes } arrowstyle { curvedopen } } }
+@Rowa
+    A { circle }
+    B { @Diag vstrut { no } { A:: @Circle  |2c B:: @Circle 
+	// @Link from { A } to { B } arrow { yes } arrowstyle { circle } } }
+@Rowa
+    A { box }
+    B { @Diag vstrut { no } { A:: @Circle  |2c B:: @Circle 
+	// @Link from { A } to { B } arrow { yes } arrowstyle { box } } }
+}
+The reader is invited to admire the beautifully sharp points on these
+arrowheads.
+@FootNote {
+The outlines of all nodes and arrowheads are drawn on the inside of the
+geometrical curve defining them, not centred over the curve as is common in
+PostScript documents.  Hence, the arrowheads and node outlines intersect at
+a true geometrical point; they do not overlap by one line width.  Furthermore,
+the standard link paths terminate at the base of the arrowhead, not at
+the point; the arrowhead itself is responsible for continuing the link
+path, at the appropriate width (although never dashed or dotted), from its
+base to its point, and hence can and does ensure that the link path does
+not overstrike and thicken the point of the arrow.
+}
+@PP
+It is possible to place an arbitrary object at the beginning or
+end of a link, using the @Code "fromlabel" and @Code "tolabel" options
+of Section {@NumberOf dia_labe}.
+@PP
+To save time in common cases, @Code "@Diag" provides link symbols,
+each of which is just @Code "@Link" with one of the standard paths
+already set:  {@Code "@Line"}, {@Code "@Curve"}, {@Code "@CCurve"},
+{@Code "@RVLCurve"}, and so on.  There are also symbols in which
+the @Code "arrow" option is set to @Code yes in addition:  {@Code "@Arrow"},
+{@Code "@CurveArrow"}, {@Code "@CCurveArrow"}, {@Code "@RVLCurveArrow"},
+and so on.  See the summary (Section {@NumberOf dia_summ}) for the
+full list of these symbols.  You will still need the @Code "arrow" option
+to get backward arrows and double-ended arrows.
+@End @Section
diff --git a/doc/user/dia_node b/doc/user/dia_node
new file mode 100644
index 0000000..b72c6e2
--- /dev/null
+++ b/doc/user/dia_node
@@ -0,0 +1,512 @@
+@Section
+    @Tag { dia_node }
+    @Title { Nodes }
+@Begin
+@PP
+@Code "@Diag" has one basic symbol for creating nodes.  It is called
+node. @Index { @Code "@Node" }
+{@Code "@Node"}, and it takes the following object and encloses it in an
+outline whose shape is determined by the {@Code "outline"} option:
+@ID {
+@Code {
+"@Node"
+"    outline { curvebox }"
+"{ Hello, world }"
+}
+||7ct
+@Diag {
+@Node
+    outline { curvebox }
+{ Hello, world }
+}
+}
+As Section {@NumberOf dia_defi} explains, the @Code outline option may be
+used to produce an outline of any shape.  There are also nine values that
+produce standard shapes:  {@Code box}, {@Code curvebox}, {@Code shadowbox},
+{@Code square}, {@Code diamond}, {@Code polygon}, {@Code isosceles},
+{@Code ellipse}, and {@Code circle}.
+@PP
+The shape of the outline is determined by the @Code outline option, but
+its size and position depend on the size and position of its
+{@I base}:  the following object with a small margin around it.  For
+example, this is how a circle is positioned over its base (shown in
+grey):
+@ID @OneRow {
+@Code {
+"@Node"
+"    outline { circle }"
+"{ Hello, world }"
+}
+||7ct
+@Diag {
+@Box paint { lightgrey } outlinestyle { noline } margin { 0c }
+@Node
+    outline { circle }
+{ Hello, world }
+}
+}
+Lout works only with the base, having no idea where the outline is, which
+explains why this circle is too high for the space allowed
+it.  Section {@NumberOf dia_summ} shows how each of the standard
+outlines is positioned over its base.
+@PP
+The @Code "@Node" symbol has many options, but all of them without
+exception share the following very useful property:  they may be given
+to the @Code "@Diag" symbol as well, where they apply to every node in
+the diagram:
+@ID @OneRow {
+@Code {
+"@Diag"
+"    outline { circle }"
+"{"
+"    @Node @I a"
+"    @DP"
+"    @Node @I b"
+"}"
+}
+||7ct
+@Diag
+    outline { circle }
+{
+    @Node @I a
+    @DP
+    @Node @I b
+}
+}
+These options also appear in the setup file ({@Code diag});
+if set there, they apply to every node in every diagram of the
+document.  As the number of nodes increases, it becomes very tedious and
+error-prone to duplicate options at all the nodes.  Giving each option
+just once, at the @Code "@Diag" symbol or in the setup file, saves time
+and makes it easy to change all the nodes into squares or any other shape
+later on.  Any setup file option may be overridden in a diagram by
+giving the option to its @Code "@Diag" symbol; any @Code "@Diag" option
+or setup file option may be overridden at any node by giving the option
+again there.
+@PP
+To save time in simple cases, @Code "@Diag" provides nine other
+node symbols called
+{@Code "@Box"},
+box.fig @Index { @Code "@Box" in @Code "@Diag" }
+{@Code "@CurveBox"},
+curvebox.fig @Index { @Code "@CurveBox" in @Code "@Diag" }
+{@Code "@ShadowBox"},
+shadowbox.fig @Index { @Code "@ShadowBox" in @Code "@Diag" }
+{@Code "@Square"},
+square. @Index @Code "@Square"
+{@Code "@Diamond"},
+diamond. @Index @Code "@Diamond"
+{@Code "@Polygon"},
+{@Code "@Isosceles"},
+isosceles. @Index @Code "@Isosceles"
+{@Code "@Ellipse"},
+ellipse. @Index @Code "@Ellipse"
+and {@Code "@Circle"}.  These are just abbreviations for @Code "@Node"
+with the appropriate value of {@Code outline}, nothing more.  They take
+the same options as {@Code "@Node"} (except that @Code outline is
+already fixed), and everything works in the same way.
+@PP
+There is a @Code shadow option which determines the depth of the shadow
+in shadow boxes:
+@ID {
+@Code {
+"@Node"
+"    outline { shadowbox }"
+"    shadow { 0.4f }"
+"{ WARNING }"
+}
+||7ct
+@Diag {
+@Node
+    outline { shadowbox }
+    shadow { 0.4f }
+{ WARNING }
+}
+}
+This example shows the default value, 0.4 times the current font
+size.  For polygons there is a @Code sides option for specifying the number
+polygon. @Index @Code "@Polygon"
+of sides, and an @Code angle option for rotating the outline:
+@IL
+@LI {
+@Code {
+"@Polygon"
+"   sides { 5 }"
+}
+||7ct
+@Diag {
+@Polygon
+   sides { 5 }
+{ 1c @High 1c @Wide }
+}
+}
+
+@LI {
+@Code {
+"@Polygon"
+"   sides { 5 }"
+"   angle { 0d }"
+}
+||7ct
+@Diag {
+@Polygon
+   sides { 5 }
+   angle { 0d }
+{ 1c @High 1c @Wide }
+}
+}
+@EL
+Setting @Code angle to @Code 0d causes the first vertex to be placed
+directly underneath the centre, and as the angle increases, the
+position of the first vertex rotates anticlockwise.  The defaults are
+3 sides and the angle that gives the polygon a
+horizontal base (i.e. 180 degrees divided by the number of sides).  Thus
+the two cases with symmetry about a vertical axis are obtained by the
+default angle and @Code "0d" respectively, which is convenient.  The
+{@Code "shadow"}, {@Code "sides"}, and {@Code "angle"} options may be
+given to any node, and also to {@Code "@Diag"} and in the setup file,
+where they apply to every node as usual.  However, they only affect the
+appearance of shadow boxes and polygons, respectively.
+@PP
+The {@Code outlinestyle}, {@Code outlinedashlength}, and {@Code outlinewidth}
+options apply to any node and affect the appearance of the outline:
+@ID @OneRow {
+@Code {
+"@CurveBox"
+"   outlinestyle { solid }"
+"   outlinedashlength { 0.2f }"
+"   outlinewidth { thin }"
+"{ Hello, world }"
+}
+||7ct
+@Diag {
+@CurveBox
+   outlinestyle { solid }
+   outlinedashlength { 0.2f }
+   outlinewidth { thin }
+{ Hello, world }
+}
+}
+This example shows the default values of these options.  The
+{@Code outlinestyle} option may be {@Code solid}, {@Code dashed},
+dashed. @Index { dashed lines }
+dotted. @Index { dotted lines }
+{@Code cdashed}, {@Code dotted}, or {@Code noline}:
+@ID @OneRow {
+@Code {
+"@CurveBox"
+"   outlinestyle { cdashed }"
+"{ Hello, world }"
+}
+||7ct
+@Diag {
+@CurveBox
+   outlinestyle { cdashed }
+{ Hello, world }
+}
+}
+The @Code dashed option makes all dashes the same length, whereas
+@Code cdashed halves the length of the first and last dash on each segment,
+which usually looks better.  The length of dashes is {@Code outlinedashlength},
+and the distance between dashes or dots is at most {@Code outlinedashlength},
+reduced to make the dashes or dots fit evenly.  The @Code outlinewidth
+option determines the width of the line, dashes, or dots, and may be
+{@Code thin}, {@Code medium}, {@Code thick}, or any length.  The values
+used for {@Code thin}, {@Code medium}, and {@Code thick} are
+{@Code 0.04f}, {@Code 0.08f}, and {@Code 0.12f}.
+@PP
+The {@Code outlinestyle} option may contain a sequence of the values
+mentioned above, meaning that they are to be applied in turn to each
+segment of the outline:
+@ID @OneRow {
+@Code {
+"@CurveBox"
+"   outlinestyle { solid cdashed }"
+"{ Hello, world }"
+}
+||7ct
+@Diag {
+@CurveBox
+   outlinestyle { solid cdashed }
+{ Hello, world }
+}
+}
+If there are more segments than values, {@Code outlinestyle} cycles back
+to the first value again; this is why a single value is applied to all
+segments.  Section {@NumberOf dia_summ} shows how each of the
+standard shapes is divided into segments.
+@PP
+Nodes may be painted any of the colours listed in Section
+{@NumberOf colour}, using the @Code "paint" option:
+@ID @OneRow {
+@Code {
+"@Box"
+"   paint { grey }"
+"@Diamond"
+"   outlinestyle { noline }"
+"   paint { white }"
+"{ Hello, world }"
+}
+||7ct
+@Diag {
+@Box
+   paint { grey }
+@Diamond
+   outlinestyle { noline }
+   paint { white }
+{ Hello, world }
+}
+}
+In this example the object following @Code "@Box" is a diamond containing
+{@Code "Hello, world"}.  The default value of @Code "paint" is
+{@Code nopaint}, a special value (not a colour) meaning don't use any paint.
+@PP
+When painting it is important to know what order things are done in, because
+anything put down earlier will disappear under the paint.  This is why
+@Code nopaint and @Code white are different.  Painting is done first, then
+boundaries, and finally the following object.
+@PP
+Each node symbol has 
+@Code "font" and @Code "break" options which may be used to
+set the font and paragraph breaking style of the following object:
+@ID @OneRow {
+@Code {
+"@Box"
+"    font { Helvetica Base }"
+"    break { clines }"
+"{"
+"WARNING"
+"DANGEROUS"
+"PENGUINS"
+"}"
+}
+||7ct
+@Diag {
+@Box
+    font { Helvetica Base }
+    break { clines }
+{
+WARNING
+DANGEROUS
+PENGUINS
+}
+}
+}
+Both options have empty default values, which leave the font and break
+style unchanged.  There is also a @Code "format" option for making more
+radical changes to the appearance of the following object:
+@ID @OneRow {
+@Code {
+"@Box"
+"    format {"
+"        {0.8 1.5} @Scale @S @Body"
+"    }"
+"{"
+"Dangerous Penguins"
+"}"
+}
+||7ct
+@Diag {
+@Box
+    format { { 0.8 1.5 } @Scale @S @Body }
+{
+Dangerous Penguins
+}
+}
+}
+The result is the @Code "format" option with any @Code "@Body" symbol
+within it replaced by the following object.  These are very useful when
+attached to the @Code "@Diag" symbol:
+@ID @OneRow @Code {
+"@Diag"
+"    font { Helvetica Base }"
+"    break { clines }"
+"    format { { 0.8 1.5 } @Scale @S @Body }"
+"{"
+"    ..."
+"}"
+}
+since then they apply to every node, as usual, thereby eliminating
+a lot of tedious, error-prone duplication of formatting information
+at each node.
+@PP
+The @Code margin option determines the size of the margin added to
+the following object:
+@ID @OneRow {
+@Code {
+"@Box"
+"    margin { 0c }"
+"{ Hello, world }"
+}
+||7ct
+@Diag {
+@Box
+    margin { 0c }
+{ Hello, world }
+}
+}
+These margins are included in the node's base (described above), so a
+larger margin enlarges the base and hence the outline as well.  The
+default value of @Code margin is {@Code 0.6f} (six-tenths of the current
+font size), and so the margin will automatically increase when the font size
+does, for example in overhead transparencies.
+@PP
+The @Code margin option adds the same margin to all four sides.  For
+finer control, the @Code hmargin option determines the horizontal (left
+and right) margins only, overriding {@Code margin}.  Similarly, the
+@Code vmargin option determines the vertical (top and foot) margins.  There
+are also {@Code leftmargin}, {@Code rightmargin},
+{@Code topmargin}, and {@Code footmargin} options which override
+{@Code margin}, {@Code hmargin}, and {@Code vmargin}.
+@PP
+When nodes appear side by side, the {@Code valign} option is
+useful for controlling their vertical position with respect to each
+other.  For example,
+@ID @OneRow {
+@Code {
+"@Diag"
+"    valign { foot }"
+"{"
+"@Box font { 24p } Big"
+"@Box font { 8p } Small"
+"}"
+}
+||7ct
+@Diag
+    valign { foot }
+{
+@Box font { 24p } Big
+@Box font { 8p } Small
+}
+}
+causes the feet of the boxes to be aligned.  In this example it is
+applied to all nodes at once, but of course it can be applied
+to individual nodes as well.  The value of {@Code valign} can be a
+length, which means that the point of alignment is
+to be that far down from the top of the base (including margins); or
+it may be {@Code top}, {@Code ctr}, or {@Code foot}, meaning alignment
+through the top, centre (the default value), or foot.
+@PP
+The {@Code vsize} option specifies a particular
+height for a node (not including margins):
+@ID @OneRow {
+@Code {
+"@Diag"
+"    vsize { 2f }"
+"{"
+"@Box font { 24p } Big"
+"@Box font { 8p } Small"
+"}"
+}
+||7ct
+@Diag
+    vsize { 2f }
+{
+@Box font { 24p } Big
+@Box font { 8p } Small
+}
+}
+The font size used when calculating @Code vsize is not affected by
+the value of any @Code font option.  If the following object is too
+tall for the chosen height, Lout will print a warning message (`forced
+to enlarge {@Code "@High"}', probably) and enlarge the base.
+@PP
+There is a @Code vindent option which is effective only when @Code vsize
+is used.  It controls where in the vertical space the following object
+is to appear:
+@ID @OneRow {
+@Code {
+"@Diag"
+"    vsize { 3f }"
+"{"
+"@Box vindent { top } Top"
+"@Box Centre"
+"@Box vindent { foot } Foot"
+"}"
+}
+||7ct
+@Diag
+    vsize { 3f }
+    vindent { ctr }
+{
+@Box vindent { top } Top
+@Box Centre
+@Box vindent { foot } Foot
+}
+}
+The value may be {@Code top} for at the top, {@Code ctr} (the default
+value) for in the centre, {@Code foot} for at the foot, or a length,
+meaning that distance down from the top.  These values are the same as
+for the @Code valign option.
+@PP
+Small discrepancies in the size of nodes can be very annoying,
+particularly when the nodes appear side by side:
+@ID @OneRow {
+@Code {
+"@Diag"
+"{"
+"@Box Hole @Box in"
+"@Box my @Box pocket"
+"}"
+}
+||7ct
+@Diag
+{
+@Box Hole @Box in
+@Box my @Box pocket
+}
+}
+These are caused by the slightly different heights of the objects within
+the nodes.  Selecting a fixed vertical size for all nodes goes some way
+towards solving this problem:
+@ID @OneRow {
+@Code {
+"@Diag"
+"    vsize { 1f }"
+"{"
+"@Box Hole @Box in"
+"@Box my @Box pocket"
+"}"
+}
+||7ct
+@Diag
+    vsize { 1f }
+{
+@Box Hole @Box in
+@Box my @Box pocket
+}
+}
+The size @Code "1f" is a good choice because most fonts are designed to
+be @Code "1f" high from the top of the tallest character to the foot of the
+deepest.  However, there is still a problem with the baselines of the words
+being misaligned.  A better solution is to insert a @I { vertical strut }
+into each node:  an invisible object with zero width and height equal to
+{@Code 1f}.  This is done using the @Code vstrut option:
+@ID @OneRow {
+@Code {
+"@Diag"
+"    vstrut { yes }"
+"{"
+"@Box Hole @Box in"
+"@Box my @Box pocket"
+"}"
+}
+||7ct
+@Diag
+    vstrut { yes }
+{
+@Box Hole @Box in
+@Box my @Box pocket
+}
+}
+The @Code vstrut option may be {@Code yes}, {@Code no} (the default value), or
+a length, meaning to insert a strut of this height.  So @Code "vstrut { yes }"
+is equivalent to {@Code "vstrut { 1.0f }"}.
+@PP
+There are {@Code halign}, {@Code hsize}, {@Code hindent}, and {@Code hstrut}
+options which work horizontally exactly as {@Code valign}, {@Code vsize},
+{@Code vindent}, and {@Code vstrut} work vertically, except that they
+use {@Code left} and {@Code right} where the vertical ones use
+{@Code top} and {@Code foot}.  The best way to fix horizontal size
+discrepancies is with {@Code hsize}, not {@Code hstrut}.
+@End @Section
diff --git a/doc/user/dia_posi b/doc/user/dia_posi
new file mode 100644
index 0000000..727d3be
--- /dev/null
+++ b/doc/user/dia_posi
@@ -0,0 +1,224 @@
+@Section
+    @Tag { dia_posi }
+    @Title { Positioning }
+@Begin
+@PP
+Once the nodes of the diagram are in place, @@Diag can be trusted to look
+after the rest:  links to standard outlines will terminate neatly on their
+boundaries, labels will not overstrike links no matter what direction they
+are heading, and so on.  The great weakness of @@Diag is in positioning
+the nodes.  This is partly because `what pleases the eye' is the
+positioning rule in many diagrams, and an interactive system is really
+needed in such cases; and partly because, even when the rule is more formal
+(for example, when the nodes are to be laid out in a grid), @@Diag does not
+have symbols to produce it anyway.
+@PP
+Previous examples have used @Code "@DP" for getting nodes one under
+another, and white space between nodes for getting them side by side, but
+this is very primitive.  This section suggests three better ways:  using
+{@Code "@Tbl"}, using {@Code "@Graph"}, and using coordinates; and the
+following section adds a fourth, using @@Diag's tree-drawing symbols.  It's
+a bit of a jumble.
+@PP
+The {@Code "@Tbl"} symbol (Chapter {@NumberOf tables}) is a good choice when
+the nodes have any kind of grid-like arrangement:
+@ID @OneRow {
+@Code {
+"@Diag {"
+"@Tbl"
+"    aformat { @Cell A | @Cell B | @Cell C }"
+"    marginhorizontal { 0.5c }"
+"    marginvertical { 0.25c }"
+"{"
+"@Rowa"
+"    B { A:: @Square }"
+"@Rowa"
+"    A { B:: @Square }"
+"    C { C:: @Square }"
+"@Rowa"
+"    B { D:: @Square }"
+"}"
+"//"
+"@Arrow from { A } to { B }"
+"@Arrow from { A } to { C }"
+"@Arrow from { B } to { D }"
+"@Arrow from { C } to { D }"
+"@Arrow from { A } to { D }"
+"}"
+}
+||9ct
+@Diag {
+@Tbl
+    aformat { @Cell A | @Cell B | @Cell C }
+    marginhorizontal { 0.5c }
+    marginvertical { 0.25c }
+{
+@Rowa
+    B { A:: @Square }
+@Rowa
+    A { B:: @Square }
+    C { C:: @Square }
+@Rowa
+    B { D:: @Square }
+}
+//
+@Arrow from { A } to { B }
+@Arrow from { A } to { C }
+@Arrow from { B } to { D }
+@Arrow from { C } to { D }
+@Arrow from { A } to { D }
+}
+}
+The table occupies the nodes part.  Tags may have the same name
+as columns; the two can never conflict.
+@PP
+Similarly, the @Code "@Graph" symbol from Chapter {@NumberOf graphs}
+has an @Code "objects" option which can place arbitrary objects,
+including labelled nodes, anywhere on a graph:
+@ID @OneRow {
+@Code {
+"@Diag {"
+"@Graph"
+"    xmin { 0 }"
+"    xmax { 100 }"
+"    ymin { 0 }"
+"    ymax { 100 }"
+"    objects {"
+"        @CTR at { 20 30 } { A:: @Square }"
+"        @CTR at { 60 70 } { B:: @Square }"
+"    }"
+"{}"
+"//"
+"@Link from { A } to { B }"
+"}"
+}
+||8.5ct
+@Diag {
+@Graph
+    xmin { 0 }
+    xmax { 100 }
+    ymin { 0 }
+    ymax { 100 }
+    objects {
+        @CTR at { 20 30 } { A:: @Square }
+        @CTR at { 60 70 } { B:: @Square }
+    }
+{}
+//
+@Link from { A } to { B }
+}
+}
+Once again the @Code "@Graph" symbol occupies the nodes part.  You can
+get rid of the axes by setting the @Code "style" option of @Code "@Graph"
+to {@Code none}, and then it won't look like a graph at all.
+@PP
+@@Diag has a system of node positioning based on coordinates which is
+somewhat similar to the @Code "@Graph" one.  It is often the easiest way
+to scatter nodes about a diagram at random.  The first step is to create
+a nodes part that is just an empty space of whatever size you want the
+final diagram to be:
+@ID @OneRow @Code {
+"@Diag {"
+"    4c @High 6c @Wide"
+"    //"
+"    ..."
+"}"
+}
+As shown, this is done with the @Code "@Wide" and @Code "@High" symbols
+from basic Lout; the above diagram will be four centimetres high by
+six centimetres wide.
+@PP
+@@Diag has a @Code "," symbol that allows you to specify a point by
+its coordinates in the diagram's base.  For example,
+@Code "0,0" denotes the bottom left-hand corner of the base,
+@Code "1,0" denotes the bottom right-hand corner, and
+@Code "0.5,0.5" denotes the centre of the base.  Coordinates should
+usually be between 0 and 1, since otherwise they denote points
+outside the base (which is allowed but seldom useful).
+@PP
+Every node symbol has a @Code "translate" option which allows you
+to move the node about on the diagram's base (or off it if you use
+coordinates less than 0 or greater than 1).  If you use this option,
+the node effectively has zero size and overstrikes anything else
+in the area you put it (like labels do).  It is best to put these
+nodes in the links part:
+@ID @OneRow {
+@Code {
+"@Diag {"
+"@Box margin { 0c } 4c @Wide 5c @High"
+"//"
+"A:: @Square"
+"      translate { CTR to 0.5, 0.67 }"
+"    { @I A }"
+"B:: @Circle"
+"      translate { CTR to 0.8, 0.25 }"
+"    { @I B }"
+"}"
+}
+||9ct
+@Diag {
+@Box margin { 0c } 4c @Wide 5c @High
+//
+A:: @Square
+      translate { CTR to 0.5, 0.67 }
+    { @I A }
+B:: @Circle
+      translate { CTR to 0.8, 0.25 }
+    { @I B }
+}
+}
+A box with margin zero has been drawn around the empty space to
+show its extent.  The value of @Code "translate" should always
+be {@I point} @Code to {@I point}; the first point lies within
+the node, the second lies within the nodes part, and the translation
+makes these two points coincide.
+@PP
+You are free to have nodes in the nodes part as well, or any object
+at all.  Here is an example which shows what a little ingenuity
+can accomplish:
+@ID @OneRow {
+@Code {
+"@Diag {"
+"@Polygon"
+"    sides { 5 }"
+"    outlinestyle { noline }"
+"    hsize { 4c }"
+"    vsize { 4c }"
+"//"
+"A:: @Circle translate { N to P1 } {}"
+"B:: @Circle translate { N to P2 } {}"
+"C:: @Circle translate { N to P3 } {}"
+"D:: @Circle translate { N to P4 } {}"
+"E:: @Circle translate { N to P5 } {}"
+"@Link arrow { both } from { A } to { B }"
+"@Link arrow { both } from { B } to { C }"
+"@Link arrow { both } from { C } to { D }"
+"@Link arrow { both } from { D } to { E }"
+"@Link arrow { both } from { E } to { A }"
+"}"
+}
+||9ct
+@Diag {
+@Polygon
+    sides { 5 }
+    outlinestyle { noline }
+    hsize { 4c }
+    vsize { 4c }
+//
+A:: @Circle translate { N to P1 } {}
+B:: @Circle translate { N to P2 } {}
+C:: @Circle translate { N to P3 } {}
+D:: @Circle translate { N to P4 } {}
+E:: @Circle translate { N to P5 } {}
+@Link arrow { both } from { A } to { B }
+@Link arrow { both } from { B } to { C }
+@Link arrow { both } from { C } to { D }
+@Link arrow { both } from { D } to { E }
+@Link arrow { both } from { E } to { A }
+}
+}
+This uses the tags of a phantom polygon to position the
+real nodes.  It would be a rare interactive system that could
+position nodes with this precision; @@Diag shines whenever there
+is a formal positioning rule to follow.
+@End @Section
diff --git a/doc/user/dia_summ b/doc/user/dia_summ
new file mode 100644
index 0000000..b9dc9e9
--- /dev/null
+++ b/doc/user/dia_summ
@@ -0,0 +1,1680 @@
+@Section
+    @Tag { dia_summ }
+    @Title { Summary }
+@Begin
+@PP
+Here is the complete list of standard node outlines that may be given
+to the @Code "@Node" symbol.  Each shows the outline name, any extra
+options relevant to this outline, base (shown as a grey
+box), segments (shown using {@Code "outlinestyle { solid dashed }"}),
+tags, and directions (shown as a thick arrowhead wherever defined):
+@IndentedList gap { 3v }
+
+@LI {
+@Code {
+"@Node"
+"    outline { box }"
+}
+||7ct
+@Diag {
+//0.5f
+@Box paint { lightgrey } outlinestyle { noline } margin { 0c }
+@ShowTags @ShowDirections @Node
+    outline { box }
+    outlinestyle { solid dashed }
+    outlinewidth { 0.03f }
+    vsize { 1.0c } hsize { 2.0c }
+}
+}
+
+@LI {
+@Code {
+"@Node"
+"    outline { curvebox }"
+}
+||7ct
+@Diag {
+@Box paint { lightgrey } outlinestyle { noline } margin { 0c }
+@ShowTags @ShowDirections @Node
+    outline { curvebox }
+    outlinestyle { solid dashed }
+    outlinewidth { 0.03f }
+    vsize { 1.0c } hsize { 2.0c }
+}
+}
+
+@LI {
+@Code {
+"@Node"
+"    outline { shadowbox }"
+"    shadow { 0.4f }"
+}
+||7ct
+@Diag {
+@Box paint { lightgrey } outlinestyle { noline } margin { 0c }
+@ShowTags @ShowDirections @Node
+    outline { shadowbox }
+    outlinestyle { solid dashed }
+    outlinewidth { 0.03f }
+    vsize { 1.0c } hsize { 2.0c }
+}
+}
+
+@LI {
+@Code {
+"@Node"
+"    outline { square }"
+}
+||7ct
+@Diag {
+//1.5f
+@Box paint { lightgrey } outlinestyle { noline } margin { 0c }
+@ShowTags @ShowDirections @Node
+    outline { square }
+    outlinestyle { solid dashed }
+    outlinewidth { 0.03f }
+    vsize { 1.0c } hsize { 2.0c }
+}
+}
+
+@LI {
+@Code {
+"@Node"
+"    outline { diamond }"
+}
+||7ct
+@Diag {
+@Box paint { lightgrey } outlinestyle { noline } margin { 0c }
+@ShowTags @ShowDirections @Node
+    outline { diamond }
+    outlinestyle { solid dashed }
+    outlinewidth { 0.03f }
+    vsize { 1.0c } hsize { 2.0c }
+}
+}
+
+@LI {
+@Code {
+"@Node"
+"    outline { polygon }"
+"    sides { 3 }"
+"    angle { 180d / sides }"
+}
+||7ct
+@Diag {
+//0.5f
+@Box paint { lightgrey } outlinestyle { noline } margin { 0c }
+@ShowTags @ShowDirections @Node
+    outline { polygon }
+    outlinestyle { solid dashed }
+    outlinewidth { 0.03f }
+    vsize { 1.0c } hsize { 2.0c }
+&0.5c ... &0.5c
+@Box paint { lightgrey } outlinestyle { noline } margin { 0c }
+@ShowTags @ShowDirections @Node
+    outline { polygon }
+    sides { 10 }
+    outlinestyle { solid dashed }
+    outlinewidth { 0.03f }
+    vsize { 1.0c } hsize { 2.0c }
+&0.5c ...
+}
+}
+
+@LI {
+@Code {
+"@Node"
+"    outline { isosceles }"
+}
+||7ct
+@Diag {
+@Box paint { lightgrey } outlinestyle { noline } margin { 0c }
+@ShowTags @ShowDirections @Node
+    outline { isosceles }
+    outlinestyle { solid dashed }
+    outlinewidth { 0.03f }
+    vsize { 1.0c } hsize { 2.0c }
+}
+}
+
+@LI {
+@Code {
+"@Node"
+"    outline { ellipse }"
+}
+||7ct
+@Diag {
+@Box paint { lightgrey } outlinestyle { noline } margin { 0c }
+@ShowTags @ShowDirections @Node
+    outline { ellipse }
+    outlinestyle { solid dashed }
+    outlinewidth { 0.03f }
+    vsize { 1.0c } hsize { 2.0c }
+}
+}
+
+@LI {
+@Code {
+"@Node"
+"    outline { circle }"
+}
+||7ct
+@Diag {
+@Box paint { lightgrey } outlinestyle { noline } margin { 0c }
+@ShowTags @ShowDirections @Node
+    outline { circle }
+    outlinestyle { solid dashed }
+    outlinewidth { 0.03f }
+    vsize { 1.0c } hsize { 2.0c }
+}
+}
+
+@EndList
+@DP
+Here are the abbreviations for the standard shapes:
+@ID @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col @Code { outline "{" A "}" } ! @Col @Code { "@"B } }
+{
+@Rowa
+    A { box }
+    B { Box }
+@Rowa
+    A { curvebox }
+    B { CurveBox }
+@Rowa
+    A { shadowbox }
+    B { ShadowBox }
+@Rowa
+    A { square }
+    B { Square }
+@Rowa
+    A { diamond }
+    B { Diamond }
+@Rowa
+    A { polygon }
+    B { Polygon }
+@Rowa
+    A { isosceles }
+    B { Isosceles }
+@Rowa
+    A { ellipse }
+    B { Ellipse }
+@Rowa
+    A { circle }
+    B { Circle }
+}
+Here are all the options to the @Code "@Node" symbol, their default
+values, and their ranges of allowed values.  Definitions of {@I number},
+{@I length}, {@I angle}, and {@I point} appear later in this summary.  The
+options related to {@Code alabel}, {@Code blabel}, {@Code clabel}, and
+{@Code dlabel} have mostly been omitted since they are the same as
+the {@Code nodelabel} options except for {@Code nodelabelpos}.
+@DP
+1fx @Break @Tab
+  hmargin { 1s }
+  # vmargin { 0.6vx }
+  @Fmth { @Col @Code A ! @Col @Code " " ! @Col @Code B ! @Col @Code " " !
+	  @Col 1.0c @Wide ! @Col C }
+  @Fmta { @Col @Code A ! @Col @Code "{" ! @Col @Code B ! @Col @Code "}" !
+	  @Col 1.0c @Wide ! @Col C }
+{
+@FirstRowh
+  A { "@Node" }
+@Rowa
+  A { "   outline" }
+  B { box }
+  C { {@Code box}, {@Code curvebox}, {@Code shadowbox}, {@Code square},
+{@Code diamond}, {@Code polygon}, {@Code ellipse}, {@Code circle}, or
+any outline }
+@Rowa
+  A { "   margin"    }
+  B { 0.6f }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   shadow"    }
+  B { 0.4f }
+  C { any @I length }
+@Rowa
+  A { "   sides"    }
+  B { 3 }
+  C { any @I number (it will be rounded to the nearest integer) }
+@Rowa
+  A { "   angle"    }
+  B { 180d "/" sides }
+  C { any @I angle }
+@Rowa
+  A { "   translate"    }
+  B { }
+  C { empty, or @I point @Code to @I point }
+@Rowa
+  A { "   outlinestyle" }
+  B { solid }
+  C { {@Code solid}, {@Code dashed}, {@Code cdashed}, {@Code dotted},
+{@Code noline}, or any sequence of one or more of these values }
+@Rowa
+  A { "   outlinedashlength"}
+  B { 0.2f }
+  C { any @I length }
+@Rowa
+  A { "   outlinewidth" }
+  B { thin }
+  C { {@Code thin}, {@Code medium}, {@Code thick}, or any @I length }
+@Rowa
+  A { "   paint"     }
+  B { nopaint }
+  C { @Code nopaint or any colour from Section {@NumberOf colour} }
+@Rowa
+  A { "   font"     }
+  B { }
+  C { any value suitable for the @Code "@Font" symbol }
+@Rowa
+  A { "   break"     }
+  B { }
+  C { any value suitable for the @Code "@Break" symbol }
+@Rowa
+  A { "   format"     }
+  B { "@Body" }
+  C { any object, usually containing {@Code "@Body"} }
+@Rowa
+  A { "   valign"}
+  B { ctr }
+  C { {@Code "top"}, {@Code "ctr"}, {@Code "foot"}, or any length
+from Section {@NumberOf objects} }
+@Rowa
+  A { "   vsize"}
+  B { }
+  C { empty, or any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   vindent"}
+  B { ctr }
+  C { {@Code "top"}, {@Code "ctr"}, {@Code "mctr"}, {@Code "foot"}, or any
+length from Section {@NumberOf objects} }
+@Rowa
+  A { "   vstrut"}
+  B { no }
+  C { {@Code no}, {@Code yes}, or any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   vmargin"    }
+  B { margin }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   topmargin"    }
+  B { vmargin }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   footmargin"    }
+  B { vmargin }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   halign"}
+  B { ctr }
+  C { {@Code "left"}, {@Code "ctr"}, {@Code "right"}, or any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   hsize"}
+  B { }
+  C { empty, or any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   hindent"}
+  B { ctr }
+  C { {@Code "left"}, {@Code "ctr"}, {@Code "mctr"}, {@Code "right"}, or any
+length from Section {@NumberOf objects} }
+@Rowa
+  A { "   hmargin"    }
+  B { margin }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   leftmargin"    }
+  B { hmargin }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   rightmargin"    }
+  B { hmargin }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   hstrut"}
+  B { no }
+  C { {@Code no}, {@Code yes}, or any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   nodelabel"}
+  B {  }
+  C { any object }
+@Rowa
+  A { "   nodelabelmargin"}
+  B { 0.2f }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   nodelabelfont"}
+  B { -2p }
+  C { any value suitable for the @Code "@Font" symbol }
+@Rowa
+  A { "   nodelabelbreak"}
+  B { ragged nohyphen }
+  C { any value suitable for the @Code "@Break" symbol }
+@Rowa
+  A { "   nodelabelformat"}
+  B { "@Body" }
+  C { any object, usually containing @Code "@Body" }
+@Rowa
+  A { "   nodelabelpos"}
+  B { }
+  C { any @I point }
+@Rowa
+  A { "   nodelabelangle"}
+  B { horizontal }
+  C { {@Code horizontal}, {@Code aligned}, or {@Code perpendicular};
+{@Code parallel}, {@Code antiparallel}, or any @I angle }
+@Rowa
+  A { "   nodelabelprox"}
+  B { outside }
+  C { {@Code above}, {@Code below}, {@Code left}, {@Code right},
+{@Code inside}, or {@Code outside}; {@Code CTR}, {@Code N}, {@Code S},
+{@Code E}, {@Code W}, {@Code NE}, {@Code NW}, {@Code SW}, or {@Code SE}
+}
+@Rowa
+  A { "   nodelabelctr"}
+  B { no }
+  C { @Code yes or @Code no }
+@Rowa
+  A { "   nodelabeladjust"}
+  B { 0 0 }
+  C { any @I point }
+@Rowa
+  A { "   alabelpos"}
+  B { NE }
+  C { any @I point }
+@Rowa
+  A { "   blabelpos"}
+  B { NW }
+  C { any @I point }
+@Rowa
+  A { "   clabelpos"}
+  B { SW }
+  C { any @I point }
+@Rowa
+  A { "   dlabelpos"}
+  B { SE }
+  C { any @I point }
+}
+@DP
+Here is the complete list of standard link paths that may be given
+to the @Code "@Link" symbol.  Each entry shows the link path name,
+any extra options relevant to this path, segments (shown using
+{@Code "outlinestyle { solid dashed }"}, and tags.  All tags
+have directions pointing along the link from @Code FROM to
+{@Code TO}; these have been omitted for clarity.  The @Code frompt
+and @Code topt options of @Code bezier are compulsory and denote the
+two control points (Section {@NumberOf dia_defi}).
+@IndentedList gap { 2v }
+
+@LI {
+@Code {
+"@Link"
+"    path { line }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { line } from { A } to { B }
+}
+&2.5c
+#@Diag {
+#|1.5c B:: @Circle /0.8c A:: @Circle 
+#//
+#@ShowTags @Link
+#    pathstyle { solid dashed }
+#    path { line } from { A } to { B }
+#}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { doubleline }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { doubleline } from { A } to { B }
+}
+&2.5c
+#@Diag {
+#|1.5c B:: @Circle /0.8c A:: @Circle 
+#//
+#@ShowTags @Link
+#    pathstyle { solid dashed }
+#    path { line } from { A } to { B }
+#}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { curve }"
+"    bias { 2.0f }"
+}
+||6ct
+@Diag {
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { curve } from { A } to { B }
+}
+&2.5c
+@Diag {
+|1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { curve } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { ccurve }"
+"    bias { 2.0f }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { ccurve } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { ccurve } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { bezier }"
+"    frompt { A@CTR ++ { 3f 0 } }"
+"    topt { B@CTR ++ { 3f 0 } }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { bezier } from { A } to { B }
+    frompt { A@CTR ++ { 3f 0 } }
+    topt { B@CTR ++ { 3f 0 } }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { bezier } from { A } to { B }
+    frompt { A@CTR ++ { 3f 0 } }
+    topt { B@CTR ++ { 3f 0 } }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { vhline }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { vhline } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { vhline } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { hvline }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { hvline } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { hvline } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { vhcurve }"
+"    radius { 1.0f }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { vhcurve } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { vhcurve } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { hvcurve }"
+"    radius { 1.0f }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { hvcurve } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { hvcurve } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { lvrline }"
+"    bias { 2.0f }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { lvrline } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { lvrline } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { rvlline }"
+"    bias { 2.0f }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { rvlline } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { rvlline } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { lvrcurve }"
+"    bias { 2.0f }"
+"    radius { 1.0f }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { lvrcurve } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { lvrcurve } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { rvlcurve }"
+"    bias { 2.0f }"
+"    radius { 1.0f }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { rvlcurve } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { rvlcurve } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { dwrapline }"
+"    tbias { 2.0f }"
+"    bias { 2.0f }"
+"    fbias { 2.0f }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle /2f
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { dwrapline } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle /2f
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { dwrapline } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { uwrapline }"
+"    tbias { 2.0f }"
+"    bias { 2.0f }"
+"    fbias { 2.0f }"
+}
+||6ct
+@Diag {
+//0.5f
+/2f A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { uwrapline } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+/2f |1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { uwrapline } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { dwrapcurve }"
+"    tbias { 2.0f }"
+"    bias { 2.0f }"
+"    fbias { 2.0f }"
+"    radius { 1.0f }"
+}
+||6ct
+@Diag {
+//0.5f
+A:: @Circle /0.8c |1.5c B:: @Circle /2f
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { dwrapcurve } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+|1.5c B:: @Circle /0.8c A:: @Circle /2f
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { dwrapcurve } from { A } to { B }
+}
+}
+
+@LI {
+@Code {
+"@Link"
+"    path { uwrapcurve }"
+"    tbias { 2.0f }"
+"    bias { 2.0f }"
+"    fbias { 2.0f }"
+"    radius { 1.0f }"
+}
+||6ct
+@Diag {
+//0.5f
+/2f A:: @Circle /0.8c |1.5c B:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { uwrapcurve } from { A } to { B }
+}
+&2.5c
+@Diag {
+//0.5f
+/2f |1.5c B:: @Circle /0.8c A:: @Circle 
+//
+@ShowTags @Link
+    pathstyle { solid dashed }
+    path { uwrapcurve } from { A } to { B }
+}
+}
+
+@EndList
+Here is the list of abbreviations for the standard paths (note
+that @Code curve and @Code acurve are the same).  Each
+path also has an abbreviation which adds a forward arrow:
+@ID @Tab
+    @Fmta { @Col @Code { path "{" A "}" } ! @Col @Code "@"B ! @Col @Code "@"C }
+{
+@Rowa
+    A { line }
+    B { Line }
+    C { Arrow }
+@Rowa
+    A { doubleline }
+    B { DoubleLine }
+    C { DoubleArrow }
+@Rowa
+    A { curve }
+    B { Curve }
+    C { CurveArrow }
+@Rowa
+    A { acurve }
+    B { ACurve }
+    C { ACurveArrow }
+@Rowa
+    A { ccurve }
+    B { CCurve }
+    C { CCurveArrow }
+
+@Rowa
+    A { bezier }
+    B { Bezier }
+    C { BezierArrow }
+
+@Rowa
+    A { hvline }
+    B { HVLine }
+    C { HVArrow }
+@Rowa
+    A { vhline }
+    B { VHLine }
+    C { VHArrow }
+@Rowa
+    A { hvcurve }
+    B { HVCurve }
+    C { HVCurveArrow }
+@Rowa
+    A { vhcurve }
+    B { VHCurve }
+    C { VHCurveArrow }
+
+@Rowa
+    A { lvrline }
+    B { LVRLine }
+    C { LVRArrow }
+@Rowa
+    A { rvlline }
+    B { RVLLine }
+    C { RVLArrow }
+@Rowa
+    A { lvrcurve }
+    B { LVRCurve }
+    C { LVRCurveArrow }
+@Rowa
+    A { rvlcurve }
+    B { RVLCurve }
+    C { RVLCurveArrow }
+
+@Rowa
+    A { dwrapline }
+    B { DWrapLine }
+    C { DWrapArrow }
+@Rowa
+    A { uwrapline }
+    B { UWrapLine }
+    C { UWrapArrow }
+@Rowa
+    A { dwrapcurve }
+    B { DWrapCurve }
+    C { DWrapCurveArrow }
+@Rowa
+    A { uwrapcurve }
+    B { UWrapCurve }
+    C { UWrapCurveArrow }
+}
+Here is the complete list of options to the @Code "@Link" symbol.  The
+options related to {@Code xlabel}, {@Code ylabel}, and {@Code zlabel}
+have been omitted where they are the same as the {@Code linklabel} options.
+@DP
+1fx @Break @Tab
+  hmargin { 1s }
+  # vmargin { 0.6vx }
+  @Fmth { @Col @Code A ! @Col @Code " " ! @Col @Code B ! @Col @Code " " !
+	  @Col 1.0c @Wide ! @Col C }
+  @Fmta { @Col @Code A ! @Col @Code "{" ! @Col @Code B ! @Col @Code "}" !
+	  @Col 1.0c @Wide ! @Col C }
+{
+@Rowh
+  A { "@Link" }
+@Rowa
+  A { "   path" }
+  B { line }
+  C { {@Code "line"}, {@Code "doubleline"}, {@Code "curve"}, {@Code "acurve"},
+{@Code "ccurve"}, {@Code "bezier"},
+{@Code "vhline"}, {@Code "hvline"}, {@Code "vhcurve"}, {@Code "hvcurve"},
+{@Code "lvrline"}, {@Code "rvlline"}, {@Code "lvrcurve"}, {@Code "rvlcurve"},
+{@Code "dwrapline"}, {@Code "uwrapline"}, {@Code "dwrapcurve"},
+{@Code "uwrapcurve"}, or any path }
+@Rowa
+  A { "   from"}
+  B { 0,0 }
+  C { any @I point or node label }
+@Rowa
+  A { "   to"}
+  B { 1,1 }
+  C { any @I point or node label }
+@Rowa
+  A { "   bias"}
+  B { 2.0f }
+  C { any @I length }
+@Rowa
+  A { "   fbias"}
+  B { 2.0f }
+  C { any @I length }
+@Rowa
+  A { "   tbias"}
+  B { 2.0f }
+  C { any @I length }
+@Rowa
+  A { "   radius"}
+  B { 1.0f }
+  C { any @I length }
+@Rowa
+  A { "   xindent"}
+  B { 0.8f }
+  C { any @I length }
+@Rowa
+  A { "   zindent"}
+  B { 0.8f }
+  C { any @I length }
+@Rowa
+  A { "   frompt"}
+  B { 0 0 }
+  C { any @I point }
+@Rowa
+  A { "   topt"}
+  B { 0 0 }
+  C { any @I point }
+@Rowa
+  A { "   pathstyle" }
+  B { solid }
+  C { {@Code solid}, {@Code dashed}, {@Code cdashed}, {@Code dotted},
+{@Code noline}, or any sequence of one or more of these values }
+@Rowa
+  A { "   pathdashlength"}
+  B { 0.2f }
+  C { any @I length }
+@Rowa
+  A { "   pathwidth" }
+  B { thin }
+  C { {@Code thin}, {@Code medium}, {@Code thick}, or any @I length }
+@Rowa
+  A { "   pathgap" }
+  B { thin }
+  C { {@Code thin}, {@Code medium}, {@Code thick}, or any @I length }
+@Rowa
+  A { "   arrow"}
+  B { no }
+  C { {@Code no}, {@Code yes}, {@Code forward}, {@Code back},
+or {@Code both} }
+@Rowa
+  A { "   arrowstyle"}
+  B { solid }
+  C { {@Code solid}, {@Code halfopen}, {@Code open}, {@Code curvedsolid},
+{@Code curvedhalfopen}, or {@Code curvedopen} }
+@Rowa
+  A { "   arrowwidth"}
+  B { 0.3f }
+  C { any @I length }
+@Rowa
+  A { "   arrowlength"}
+  B { 0.5f }
+  C { any @I length }
+@Rowa
+  A { "   linklabel"}
+  B {  }
+  C { any object }
+@Rowa
+  A { "   linklabelmargin"}
+  B { 0.2f }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   linklabelfont"}
+  B { -2p }
+  C { any value suitable for the @Code "@Font" symbol }
+@Rowa
+  A { "   linklabelbreak"}
+  B { ragged nohyphen }
+  C { any value suitable for the @Code "@Break" symbol }
+@Rowa
+  A { "   linklabelformat"}
+  B { "@Body" }
+  C { any object, usually containing @Code "@Body" }
+@Rowa
+  A { "   linklabelpos"}
+  B { }
+  C { any @I point }
+@Rowa
+  A { "   linklabelangle"}
+  B { horizontal }
+  C { {@Code horizontal}, {@Code aligned}, or {@Code perpendicular};
+{@Code parallel}, {@Code antiparallel}, or any @I angle }
+@Rowa
+  A { "   linklabelprox"}
+  B { above }
+  C { {@Code above}, {@Code below}, {@Code left}, {@Code right},
+{@Code inside}, or {@Code outside}; {@Code CTR}, {@Code N}, {@Code S},
+{@Code E}, {@Code W}, {@Code NE}, {@Code NW}, {@Code SW}, or {@Code SE}
+}
+@Rowa
+  A { "   linklabelctr"}
+  B { no }
+  C { @Code yes or @Code no }
+@Rowa
+  A { "   linklabeladjust"}
+  B { 0 0 }
+  C { any @I point }
+@Rowa
+  A { "   xlabelpos"}
+  B { LFROM }
+  C { any @I point }
+@Rowa
+  A { "   ylabelpos"}
+  B { LMID }
+  C { any @I point }
+@Rowa
+  A { "   ylabelctr"}
+  B { yes }
+  C { @Code yes or @Code no }
+@Rowa
+  A { "   zlabelpos"}
+  B { LTO }
+  C { any @I point }
+@Rowa
+  A { "   fromlabel"}
+  B {  }
+  C { any object }
+@Rowa
+  A { "   fromlabelmargin"}
+  B { 0f }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   fromlabelfont"}
+  B {     }
+  C { Any value suitable for the @Code "@Font" symbol }
+@Rowa
+  A { "   fromlabelbreak"}
+  B { ragged nohyphen }
+  C { Any value suitable for the @Code "@Break" symbol }
+@Rowa
+  A { "   fromlabelformat"}
+  B { "@Body" }
+  C { any object, usually containing @Code "@Body" }
+@Rowa
+  A { "   fromlabelpos"}
+  B { FROM }
+  C { any @I point }
+@Rowa
+  A { "   fromlabelangle"}
+  B { antiparallel }
+  C { {@Code horizontal}, {@Code aligned}, or {@Code perpendicular};
+{@Code parallel}, {@Code antiparallel}, or any @I angle }
+@Rowa
+  A { "   fromlabelprox"}
+  B { W }
+  C { {@Code above}, {@Code below}, {@Code left}, {@Code right},
+{@Code inside}, or {@Code outside}; {@Code CTR}, {@Code N}, {@Code S},
+{@Code E}, {@Code W}, {@Code NE}, {@Code NW}, {@Code SW}, or {@Code SE}
+}
+@Rowa
+  A { "   fromlabelctr"}
+  B { no }
+  C { @Code yes or @Code no }
+@Rowa
+  A { "   fromlabeladjust"}
+  B { 0 0 }
+  C { any @I point }
+@Rowa
+  A { "   tolabel"}
+  B {  }
+  C { any object }
+@Rowa
+  A { "   tolabelmargin"}
+  B { 0f }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   tolabelfont"}
+  B {     }
+  C { Any value suitable for the @Code "@Font" symbol }
+@Rowa
+  A { "   tolabelbreak"}
+  B { ragged nohyphen }
+  C { Any value suitable for the @Code "@Break" symbol }
+@Rowa
+  A { "   tolabelformat"}
+  B { "@Body" }
+  C { any object, usually containing @Code "@Body" }
+@Rowa
+  A { "   tolabelpos"}
+  B { TO }
+  C { any @I point }
+@Rowa
+  A { "   tolabelangle"}
+  B { parallel }
+  C { {@Code horizontal}, {@Code aligned}, or {@Code perpendicular};
+{@Code parallel}, {@Code antiparallel}, or any @I angle }
+@Rowa
+  A { "   tolabelprox"}
+  B { W }
+  C { {@Code above}, {@Code below}, {@Code left}, {@Code right},
+{@Code inside}, or {@Code outside}; {@Code CTR}, {@Code N}, {@Code S},
+{@Code E}, {@Code W}, {@Code NE}, {@Code NW}, {@Code SW}, or {@Code SE}
+}
+@Rowa
+  A { "   tolabelctr"}
+  B { no }
+  C { @Code yes or @Code no }
+@Rowa
+  A { "   tolabeladjust"}
+  B { 0 0 }
+  C { any @I point }
+}
+@DP
+Here is the complete list of options to the @Code "@Tree" symbol:
+@DP @OneRow 1fx @Break @Tab
+  hmargin { 1s }
+  # vmargin { 0.6vx }
+  @Fmth { @Col @Code A ! @Col @Code " " ! @Col @Code B ! @Col @Code " " !
+	  @Col 1.0c @Wide ! @Col C }
+  @Fmta { @Col @Code A ! @Col @Code "{" ! @Col @Code B ! @Col @Code "}" !
+	  @Col 1.0c @Wide ! @Col C }
+{
+@Rowh
+  A { "@Tree" }
+@Rowa
+  A { "   treehindent" }
+  B { ctr }
+  C { {@Code left}, {@Code ctr}, {@Code right}, or any length from
+Section {@NumberOf objects} }
+}
+@DP
+The @Code "@HTree" option has a similar @Code "treevindent" option,
+which may be {@Code "top"}, {@Code ctr}, {@Code foot}, or any length
+from Section {@NumberOf objects}.
+@PP
+The @Code "@Diag" symbol and to the {@Code "@DiagSetup"} setup
+file symbol have all of the options of {@Code "@Node"}, {@Code "@Link"},
+{@Code "@Tree"}, and {@Code "@HTree"}.  They also have the following
+options:
+@DP
+1fx @Break @Tab
+  hmargin { 1s }
+  # vmargin { 0.6vx }
+  @Fmth { @Col @Code A ! @Col @Code " " ! @Col @Code B ! @Col @Code " " !
+	  @Col 1.0c @Wide ! @Col C }
+  @Fmta { @Col @Code A ! @Col @Code "{" ! @Col @Code B ! @Col @Code "}" !
+	  @Col 1.0c @Wide ! @Col C }
+{
+@Rowh
+  A { "@Diag" }
+@Rowa
+  A { "   maxlabels" }
+  B { 200 }
+  C { any whole number }
+@Rowa
+  A { "   save" }
+  B { no }
+  C { @Code no or @Code yes }
+@Rowa
+  A { "   treehsep" }
+  B { 0.5f }
+  C { any length from Section {@NumberOf objects} }
+@Rowa
+  A { "   treevsep" }
+  B { 0.5f }
+  C { any length from Section {@NumberOf objects} }
+}
+@DP
+The following lists define all the ways to specify numbers, lengths,
+angles, points, and booleans.  Brief explanations appear to the right,
+with the symbols' precedences in parentheses.
+@DP
+1fx @Break @Tab
+  # vmargin { 0.6vx }
+  @Fmth { @Col { &@DisplayIndent     A } ! @Col   }
+  @Fmta { @Col { &@DisplayIndent &2s A } ! @Col B }
+{
+
+@Rowh A { @I number } vmargin { 0.2vx }
+@Rowh
+@Rowa
+  A { {@Sym minus}27.56 }
+  B { or any literal number }
+@Rowa
+  A { @Code sqrt @I number }
+  B { square root (99) }
+@Rowa
+  A { @Code abs @I number }
+  B { absolute value (99) }
+@Rowa
+  A { @Code ceiling @I number }
+  B { least integer greater than or equal to (99) }
+@Rowa
+  A { @Code floor @I number }
+  B { greatest integer less than or equal to (99) }
+@Rowa
+  A { @Code truncate @I number }
+  B { delete fractional part (99) }
+@Rowa
+  A { @Code round @I number }
+  B { round to nearest integer (99) }
+@Rowa
+  A { @Code sin @I angle }
+  B { sine of angle measured in degrees (99) }
+@Rowa
+  A { @Code cos @I angle }
+  B { cosine of angle measured in degrees (99) }
+@Rowa
+  A { @I number @Code atan @I number }
+  B { arc tangent of first over second (98) }
+@Rowa
+  A { @I number @Code exp @I number }
+  B { first number raised to second number (98) }
+@Rowa
+  A { @I number @Code log @I number }
+  B { logarithm of second number to base first (98) }
+@Rowa
+  A { @I number @Code rand @I number }
+  B { random real number in this range inclusive (98) }
+@Rowa
+  A { @I number @Code max @I number }
+  B { the larger of two numbers (98) }
+@Rowa
+  A { @I number @Code min @I number }
+  B { the smaller of two numbers (98) }
+@Rowa
+  A { @I number @Code "*" @I number }
+  B { the product of two numbers (97) }
+@Rowa
+  A { @I number @Code "/" @I number }
+  B { real-valued division (96, left associative) }
+@Rowa
+  A { @I length @Code "/" @I length }
+  B { the ratio of two lengths (96, left associative) }
+@Rowa
+  A { @I angle @Code "/" @I angle }
+  B { the ratio of two angles (96, left associative) }
+@Rowa
+  A { @I number @Code idiv @I number }
+  B { integer division of two numbers (96, left associative) }
+@Rowa
+  A { @I number @Code mod @I number }
+  B { integer remainder when first divided by second (96) }
+@Rowa
+  A { @I number @Code "+" @I number }
+  B { sum of two numbers (96, left associative) }
+@Rowa
+  A { @Code "+" @I number }
+  B { identity operation (96) }
+@Rowa
+  A { @I number @Sym minus @I number }
+  B { difference of two numbers (96, left associative) }
+@Rowa
+  A { @Sym minus @I number }
+  B { negation (96) }
+@Rowa
+  A { @Code sides }
+  B { ({@Code outline} only) value of the node's @Code sides option }
+
+@Rowh
+@Rowh
+@Rowh
+@Rowh
+@Rowh A { @I length } vmargin { 0.2vx }
+@Rowh
+@Rowa
+  A { 0 }
+  B { zero }
+@Rowa
+  A { @Code xsize }
+  B { ({@Code outline} only) distance to right boundary }
+@Rowa
+  A { @Code ysize }
+  B { ({@Code outline} only) distance to top boundary }
+@Rowa
+  A { @Code xmark }
+  B { ({@Code outline} only) distance to column mark }
+@Rowa
+  A { @Code ymark }
+  B { ({@Code outline} only) distance to row mark }
+@Rowa
+  A { @Code margin }
+  B { ({@Code outline} only) value of the node's @Code margin option }
+@Rowa
+  A { @Code shadow }
+  B { ({@Code outline} only) value of the node's @Code shadow option }
+@Rowa
+  A { @I number @Code i }
+  B { @I number inches (100) }
+@Rowa
+  A { @I number @Code c }
+  B { @I number centimetres (100) }
+@Rowa
+  A { @I number @Code p }
+  B { @I number points (100) }
+@Rowa
+  A { @I number @Code m }
+  B { @I number ems (100) }
+@Rowa
+  A { @I number @Code s }
+  B { @Code 1s is the current width of a space (100) }
+@Rowa
+  A { @I number @Code v }
+  B { @Code 1v is the current inter-line space (100) }
+@Rowa
+  A { @I number @Code f }
+  B { @Code 1f is the size of the current font (100) }
+@Rowa
+  A { @Code "xcoord" @I point }
+  B { the @I x coordinate of the point (99) }
+@Rowa
+  A { @Code "ycoord" @I point }
+  B { the @I y coordinate of the point (99) }
+@Rowa
+  A { @Code abs @I length }
+  B { absolute value (99) }
+@Rowa
+  A { @I length @Code rand @I length }
+  B { random real length in this range inclusive (98) }
+@Rowa
+  A { @I length @Code max @I length }
+  B { the larger of two lengths (98) }
+@Rowa
+  A { @I length @Code min @I length }
+  B { the smaller of two lengths (98) }
+@Rowa
+  A { @I point @Code "distance" @I point }
+  B { (non-negative) distance between two points (98) }
+@Rowa
+  A { @I length @Code "*" @I number }
+  B { length multiplied by number (97) }
+@Rowa
+  A { @I number @Code "*" @I length }
+  B { length multiplied by number (97) }
+@Rowa
+  A { @I length @Code "/" @I number }
+  B { length divided by number (96, left associative) }
+@Rowa
+  A { @I length @Code "+" @I length }
+  B { sum of two lengths (96, left associative) }
+@Rowa
+  A { @Code "+" @I length }
+  B { identity operation (96) }
+@Rowa
+  A { @I length @Sym minus @I length }
+  B { difference of two lengths (96, left associative) }
+@Rowa
+  A { @Sym minus @I length }
+  B { negation (96) }
+
+@Rowh
+@Rowh
+@Rowh
+@Rowh
+@Rowh A { @I angle } vmargin { 0.2vx }
+@Rowh
+@Rowa
+  A { @I number @Code d }
+  B { @I number degrees (100) }
+@Rowa
+  A { @I number }
+  B { @I number degrees (@Code d is optional) (100) }
+@Rowa
+  A { @Code parallel }
+  B { ({@Code labelangle} options only) angle parallel to curve at label point }
+@Rowa
+  A { @Code antiparallel }
+  B { ({@Code labelangle} options only) angle antiparallel to curve at label point }
+@Rowa
+  A { @Code perpendicular }
+  B { ({@Code labelangle} options only) angle perpendicular to curve at label point }
+@Rowa
+  A { @Code antiperpendicular }
+  B { ({@Code labelangle} options only) angle antiperpendicular to curve at label point }
+@Rowa
+  A { {@I label}{@Code "??ANGLE"} }
+  B { angle parallel to curve at {@I label} if known, else @Code "0d" (99) }
+@Rowa
+  A { @Code anglefix @I angle }
+  B { @I angle normalized to between @Code 0d inclusive and @Code 360d exclusive (99) }
+@Rowa
+  A { @Code abs @I angle }
+  B { absolute value (99) }
+@Rowa
+  A { @I length @Code atan @I length }
+  B { arc tangent of first over second (98) }
+@Rowa
+  A { @I point @Code "angleto" @I point }
+  B { angle from first point to second (98) }
+@Rowa
+  A { @I angle @Code rand @I angle }
+  B { random angle in this range inclusive (98) }
+@Rowa
+  A { @I angle @Code max @I angle }
+  B { the larger of two angles (98) }
+@Rowa
+  A { @I angle @Code min @I angle }
+  B { the smaller of two angles (98) }
+@Rowa
+  A { @I angle @Code "*" @I number }
+  B { angle multiplied by number (97) }
+@Rowa
+  A { @I number @Code "*" @I angle }
+  B { angle multiplied by number (97) }
+@Rowa
+  A { @I angle @Code "/" @I number }
+  B { division of angle by number (96, left associative) }
+@Rowa
+  A { @I angle @Code "+" @I angle }
+  B { sum of two angles (96, left associative) }
+@Rowa
+  A { @Code "+" @I angle }
+  B { identity operation (96) }
+@Rowa
+  A { @I angle @Sym minus @I angle }
+  B { difference of two angles (96, left associative) }
+@Rowa
+  A { @Sym minus @I angle }
+  B { negation (96) }
+@Rowa
+  A { @Code angle }
+  B { ({@Code outline} only) value of the node's @Code angle option }
+
+
+@Rowh
+@Rowh
+@Rowh
+@Rowh
+@Rowh A { @I point } vmargin { 0.2vx }
+@Rowh
+@Rowa
+  A { @I label }
+  B { a previously defined label }
+@Rowa
+  A { {@I any}{@Code "??"}{@I label} }
+  B { {@I any}{@Code "@"}{@I label} if sensible, else {@I any} (99) }
+@Rowa
+  A { @Code "prev" }
+  B { the previous point in a shape }
+@Rowa
+  A { @I length  @Code "atangle"  @I angle }
+  B { point at distance and angle from origin (89) }
+@Rowa
+  A { @I "point/tag" @Code "boundaryatangle" @I angle }
+  B { @I {point}, or point on boundary of @I tag at @I angle (89) }
+@Rowa
+  A { @I point  @Code "**"  @I number }
+  B { multiplication of point by number (88) }
+@Rowa
+  A { @I point  @Code "++"  @I point }
+  B { vector sum of two points (87) }
+@Rowa
+  A { @I point  {@Sym minus}{@Sym minus}  @I point }
+  B { vector difference of two points (87) }
+@Rowa
+  A { @I {number, number} }
+  B { @I x and @I y coordinates with respect to base (70) }
+@Rowa
+  A { @I {length  length} }
+  B { @I x and @I y distance from origin (5) }
+@Rowa
+  A { @Code from }
+  B { ({@Code path} only) the value of the link's @Code from option }
+@Rowa
+  A { @Code to }
+  B { ({@Code path} only) the value of the link's @Code to option }
+
+@Rowh
+@Rowh
+@Rowh
+@Rowh
+@Rowh A { @I boolean } vmargin { 0.2vx }
+@Rowh
+@Rowa
+  A { @I number @Code "=" @I number }
+  B { @Eq { non = }; also between lengths (79) }
+@Rowa
+  A { @I number @Code "!=" @I number }
+  B { @Eq { non != }; also between lengths (79) }
+@Rowa
+  A { @I number @Code "==" @I number }
+  B { @Eq { non = } between angles (79) }
+@Rowa
+  A { @I number @Code "!==" @I number }
+  B { @Eq { non != } between angles (79) }
+@Rowa
+  A { @I number @Code "<=" @I number }
+  B { @Eq { non <= }; also between lengths (79) }
+@Rowa
+  A { @I number @Code "<" @I number }
+  B { @Eq { non < }; also between lengths (79) }
+@Rowa
+  A { @I number @Code ">=" @I number }
+  B { @Eq { non >= }; also between lengths (79) }
+@Rowa
+  A { @I number @Code ">" @I number }
+  B { @Eq { non > }; also between lengths (79) }
+@Rowa
+  A { @Code "not" @I boolean }
+  B { Logical not (78) }
+@Rowa
+  A { @I boolean @Code "and" @I boolean }
+  B { Logical and (77) }
+@Rowa
+  A { @I boolean @Code "or" @I boolean }
+  B { Logical or (76) }
+@Rowa
+  A { @I boolean @Code "xor" @I boolean }
+  B { Logical exclusive or (76) }
+
+}
+@DP
+A length is represented in PostScript by a single number on the operand
+stack; so is an angle.  Therefore all number operations can be applied
+to lengths and angles as well, but the results will not always be
+useful.  For example, rounding a length to the nearest integer is
+not a useful thing to do because the result depends on the basic unit
+(what does 1 equal as a length?) which is implementation-dependent and
+genuinely subject to change.  Rounding the @I ratio of two lengths does
+make sense.  The above is an attempt to list only the useful operations;
+but if you really need the logarithm of an angle, you can have it.
+@PP
+Angles are a little more amenable to this kind of thing because they are
+always measured in degrees.  However, angles suffer from the problem that
+{@Code 0d} is really the same angle as {@Code 360d}.  For this reason,
+separate equality and inequality operators for angles are provided which
+ignore multiples of {@Code 360d}, and less than and similar relations
+are not defined for angles, because they inherently are not well
+defined.  See also the @Code anglefix symbol above.
+@PP
+A point is represented by two lengths (which are numbers) on the
+stack.  Those familiar with PostScript and willing to sacrifice portability
+and increase their risk of error can therefore write, for example,
+@OneCol { @I point @Code "exch" } to obtain the reflection of a point about
+the main diagonal, and so on.
+@PP
+The following may have a result of any type, depending on
+their options.  The options and result may be a
+sequence of things as required in shapes, including @Code "[]" and
+so forth.
+@IndentedList
+@LI @OneRow lines @Break {
+@Code if
+    @Code "cond {" @I boolean @Code "}"
+    @Code "then {" @I anything @Code "}"
+    @Code "else {" @I anything @Code "}"
+}
+@LI @OneRow lines @Break {
+@I angle @Code quadcase
+    @Code "0 {" @I anything @Code "}"
+    @Code "0-90 {" @I anything @Code "}"
+    @Code "90 {" @I anything @Code "}"
+    @Code "90-180 {" @I anything @Code "}"
+    @Code "180 {" @I anything @Code "}"
+    @Code "180-270 {" @I anything @Code "}"
+    @Code "270 {" @I anything @Code "}"
+    @Code "270-360 {" @I anything @Code "}"
+}
+@LI @OneRow lines @Break {
+@I number @Code signcase
+    @Code "neg {" @I anything @Code "}"
+    @Code "zero {" @I anything @Code "}"
+    @Code "pos {" @I anything @Code "}"
+}
+@LI @OneRow lines @Break {
+@Code "xloop from {" @I number "} to {" @I number "} by {" @I number "} do {"
+    @I anything
+@Code "}"
+}
+@LI @OneRow lines @Break {
+@Code "yloop from {" @I number "} to {" @I number "} by {" @I number "} do {"
+    @I anything
+@Code "}"
+}
+@LI @OneRow lines @Break {
+@Code "zloop from {" @I number "} to {" @I number "} by {" @I number "} do {"
+    @I anything
+@Code "}"
+}
+@EndList
+The @Code "if" symbol returns @Code "then" or @Code "else" depending on
+the value of {@Code "cond"}, and @Code "signcase" returns {@Code "neg"},
+{@Code zero}, or {@Code pos} depending on whether @I number (which
+may also be an angle or a length) is negative, zero, or positive.  The
+@Code "quadcase" symbol decides whether the given angle points in
+one of the four horizontal or vertical directions, or into the quadrants
+between them, and returns the appropriate option.  Don't be misled by
+the unorthodox option names; it is not possible to give your own
+ranges, only these ones.
+@PP
+The loops return a sequence of
+repetitions of {@I anything}; any occurrences of {@Code x} in
+{@Code xloop} will be replaced by the current value of the loop counter,
+and similarly for the other loops.
+@PP
+Symbols not covered in this summary are the retagging symbol @Code "::"
+(Section {@NumberOf dia_tags}); the symbols available within the
+{@Code "@Tree"} symbol (Section {@NumberOf dia_posi}); and {@Code ":<"},
+{@Code ":="}, {@Code "@ShowPoints"}, {@Code "@ShowTags"}, and
+{@Code "@ShowDirections"} from Section {@NumberOf dia_defi}.
+@End @Section
diff --git a/doc/user/dia_tags b/doc/user/dia_tags
new file mode 100644
index 0000000..91cd7a1
--- /dev/null
+++ b/doc/user/dia_tags
@@ -0,0 +1,168 @@
+@Section
+    @Tag { dia_tags }
+    @Title { Tags }
+@Begin
+@PP
+In addition to drawing the outline, each of the standard node
+types also attaches names, called {@I tags}, to certain points.  For
+example, the @Code "@Ellipse" symbol creates nine tags:
+@ID {
+@Code {
+"@Ellipse"
+}
+||7ct
+@Diag {
+//1.0f
+@ShowTags @Ellipse
+    vsize { 1.5c }
+    hsize { 3.0c }
+}
+}
+The standard link symbols also create tags:
+@ID {
+@Code {
+"@Link"
+}
+||7ct
+@Diag {
+2.5c @High 2c @Wide
+//
+@ShowTags @Arrow
+    from { 0,0.8 }
+    to { 1,0 }
+}
+}
+The names and positions of all standard tags may be found in the summary
+(Section {@NumberOf dia_summ}) at the end of this chapter.  Each tag
+stands for a point, and may be used wherever a point is required:
+@ID {
+@Code {
+"@Ellipse { Hello, world }"
+"//"
+"@Link from { SW } to { SE }"
+}
+||7ct
+@Diag {
+@Ellipse { Hello, world }
+//
+@Link from { SW } to { SE }
+}
+}
+A tag may only be used later in the text of the diagram than the place
+where it is defined.
+@PP
+Standard tags like @Code N and @Code S are not much use as they are,
+since in general there will be many nodes and hence many @Code N and
+@Code S tags.  The retagging symbol, {@Code "::"}, solves this problem:
+@ID {
+@Code {
+"A:: @Ellipse"
+}
+||7ct
+@Diag {
+//1.5f
+@ShowTags {
+A:: @Ellipse
+    vsize { 1.5c }
+    hsize { 3.0c }
+}
+}
+}
+Within the following object, the points have their original tags, but
+afterwards the names are changed by prefixing the word preceding
+{@Code "::"}, plus a @Code "@" character, to each one.  These longer
+tags may be used exactly like the others:
+@ID {
+@Code {
+"A:: @Ellipse { Hello, world }"
+"//"
+"@Link from { A@SW } to { A@SE }"
+}
+||7ct
+@Diag {
+A:: @Ellipse { Hello, world }
+//
+@Link from { A@SW } to { A@SE }
+}
+}
+The retagging symbol may be applied to links, and indeed to arbitrary
+objects; it will retag every tag within the following object, even
+tags that have already been retagged:
+@ID {
+@Code {
+"A:: {"
+"    1:: @Ellipse"
+"        vsize { 1.0c }"
+"        hsize { 2.5c }"
+"    @DP"
+"    @DP"
+"    2:: @Ellipse"
+"        vsize { 1.0c }"
+"        hsize { 2.5c }"
+"}"
+}
+||7ct
+@Diag {
+//1.0f
+@ShowTags {
+A:: {
+    1:: @Ellipse
+        vsize { 1.0c }
+        hsize { 2.5c }
+    @DP
+    @DP
+    2:: @Ellipse
+        vsize { 1.0c }
+        hsize { 2.5c }
+}
+}
+}
+}
+In practice one usually only retags individual nodes.  It is best to
+use only upper-case letters and digits in tags, because Lout and
+PostScript have tags of their own containing lower-case letters, and
+any mixup causes total disaster.
+@PP
+When a tag lies within the object following some node, it is
+automatically retagged in this way with tag {@Code IN}.  For example, in
+@ID @Code {
+"@Square"
+"@Circle Hello"
+}
+the circle lies within the square, and what you get in effect is
+@ID @Code {
+"@Square"
+"IN:: @Circle Hello"
+}
+This prevents confusion between the tags of the inner and outer nodes.  This
+retagging cannot be left to the user's discretion, owing to unexpected
+effects on the positioning of labels of the outer node if inner tags are
+not retagged.
+@PP
+Although @Code from and @Code to are just two of several options within
+@Code "@Diag" where a point is expected, and hence where a tag may be
+given, they have a special virtue not shared by any other options.  It is
+possible to give the name of an entire node, not just a tag denoting one
+point, to them:
+@ID {
+@Code {
+"A:: @Circle"
+"@DP"
+"B:: @Ellipse { Hello, world }"
+"//"
+"@Link from { A } to { B }"
+}
+||7ct
+@Diag {
+A:: @Circle
+@DP
+B:: @Ellipse { Hello, world }
+//
+@Link from { A } to { B }
+}
+}
+This will select a point on the outline of the named node, appropriate
+to the type of link being drawn.  It is extremely useful, of course, but
+potentially confusing:  @Code A and @Code B do not denote points and are
+not tags, strictly speaking, at all.
+@End @Section
diff --git a/doc/user/dia_tree b/doc/user/dia_tree
new file mode 100644
index 0000000..d16f2bc
--- /dev/null
+++ b/doc/user/dia_tree
@@ -0,0 +1,379 @@
+@Section
+    @Tag { dia_tree }
+    @Title { Trees }
+@Begin
+@PP
+@@Diag offers some symbols for producing tree diagrams, using the
+tree. @Index { @Code "@Tree" symbol in @@Diag }
+@Code "@Tree" symbol, which may appear anywhere within the nodes part:
+@ID @OneRow @Code {
+"@Diag {"
+"    ..."
+"    @Tree { ... }"
+"    ..."
+"}"
+}
+Within this symbol, new symbols {@Code "@LeftSub"}, {@Code "@RightSub"},
+{@Code "@FirstSub"}, {@Code "@NextSub"}, and {@Code "@StubSub"} become
+available.  The first two are used to get a (non-empty) binary tree:
+@ID @OneRow {
+@Code {
+"@Tree {"
+"    @Circle A"
+"    @LeftSub {"
+"        @Circle B"
+"        @LeftSub @Square C"
+"        @RightSub @Square D"
+"    }"
+"    @RightSub @Circle E"
+"}"
+}
+||7ct
+@Diag {
+@Tree {
+    @Circle A
+    @LeftSub {
+        @Circle B
+        @LeftSub @Square C
+        @RightSub @Square D
+    }
+    @RightSub @Circle E
+}
+}
+}
+The root of the tree, which must be a single node but may have any
+outline, comes first.  After that comes the @Code "@LeftSub" symbol
+followed by the left subtree, which must be enclosed in braces unless
+it consists of a single node.  After that comes the @Code "@RightSub"
+symbol followed by the right subtree, again enclosed in braces unless it
+consists of a single node.  These rules apply recursively and will
+produce a binary tree of arbitrary size and depth.  If a node has no
+left or right subtree, leave out the corresponding @Code "@LeftSub" or
+@Code "@RightSub" symbol.
+@PP
+A similar system using @Code "@FirstSub" and @Code "@NextSub" produces
+trees in which each node may have arbitrarily many children:
+@ID @OneRow {
+@Code {
+"@Tree {"
+"    @Circle A"
+"    @FirstSub {"
+"        @Circle B"
+"        @FirstSub @Square C"
+"        @NextSub @Square D"
+"    }"
+"    @NextSub @Circle E"
+"    @NextSub @Circle F"
+"}"
+}
+||7ct
+@Diag {
+@Tree {
+    @Circle A
+    @FirstSub {
+        @Circle B
+        @FirstSub @Square C
+        @NextSub @Square D
+    }
+    @NextSub @Circle E
+    @NextSub @Circle F
+}
+}
+}
+The first subtree is preceded by {@Code "@FirstSub"}, and subsequent
+trees are preceded by {@Code "@NextSub"}.  The subtrees are spaced
+at equal separations from each other, with the root centred over
+them, in contrast to the binary tree arrangement in which the two
+subtrees are positioned to the left and right of the root, never
+intruding into the space beneath it.
+@PP
+Although each subtree must contain a node for its root, it is not hard
+to get around this:
+@ID @OneRow {
+@Code {
+"@Tree"
+"{"
+"@Circle"
+"@FirstSub @Circle"
+"@NextSub pathstyle { noline }"
+"    @Circle outlinestyle { noline }"
+"       ..."
+"@NextSub @Circle"
+"}"
+}
+||7ct
+@Diag {
+@Tree
+{
+@Circle
+@FirstSub @Circle
+@NextSub pathstyle { noline }
+    @Circle outlinestyle { noline }
+       ...
+@NextSub @Circle
+}
+}
+}
+Clumsy as this is, it often assists in placing the unenclosed object
+in a way consistent with the surrounding nodes, and offers margins
+and so forth which help with fine-tuning its position.
+@PP
+The fifth subtree symbol, {@Code "@StubSub"}, produces a stub subtree:
+@ID @OneRow {
+@Code {
+"@Tree {"
+"@Circle @Eq { a }"
+"@StubSub @Eq { T tsub a }"
+"}"
+}
+||7ct
+@Diag {
+@Tree {
+@Circle @Eq { a }
+@StubSub @Eq { T tsub a }
+}
+}
+}
+Unlike the other subtree symbols, {@Code "@StubSub"} is not followed
+by a subtree with a node for its root; rather, it is followed by an
+arbitrary object, and the path is drawn around this stub object, which
+is placed directly underneath the parent node with zero vertical
+separation.  In practice, it is usually necessary to attach margins to
+the following object; the easiest way to do that is to enclose it in
+{@Code "@Box outlinestyle { noline }"}.  An example appears below.
+@PP
+It is possible to mix the three subtree types, by having binary tree
+symbols following some nodes, non-binary tree symbols following
+others, and a single {@Code "@StubSub"} following others.  However,
+at any one node the subtrees must be all either binary, non-binary,
+or stub.
+@PP
+The subtree symbols have all of the options of {@Code "@Link"}, and
+these apply to the link drawn from the parent of the root of the subtree
+to the root of the subtree (or anticlockwise around the stub object):
+@ID @OneRow {
+@Code {
+"@Tree {"
+"    @Circle A"
+"    @LeftSub"
+"        arrow { yes }"
+"        xlabel { 1 }"
+"    @Circle B"
+"    @RightSub"
+"        arrow { yes }"
+"        xlabel { 2 }"
+"    @Circle C"
+"}"
+}
+||7ct
+@Diag {
+@Tree {
+    @Circle A
+    @LeftSub
+        arrow { yes }
+        xlabel { 1 }
+    @Circle B
+    @RightSub
+        arrow { yes }
+        xlabel { 2 }
+    @Circle C
+}
+}
+}
+To get reverse arrows use @Code "arrow { back }" as usual.
+@PP
+The subtree symbols do not need @Code from and @Code to options,
+because they already know which nodes they are linking together.  However,
+you may use @Code from or @Code to to give a tag specifying a particular
+point within the node:
+@ID @OneRow {
+@Code {
+"@Tree {"
+"@Circle"
+"@LeftSub from { S } to { N }"
+"    @Isosceles vsize { 2f }"
+"@RightSub from { S } to { N }"
+"    @Isosceles vsize { 2f }"
+"}"
+}
+||7ct
+@Diag
+{
+@Tree {
+@Circle
+@LeftSub from { S } to { N }
+    @Isosceles vsize { 2f }
+@RightSub from { S } to { N }
+    @Isosceles vsize { 2f }
+}
+}
+}
+In this example both links go from the @Code S tag of the parent node to the
+@Code N tag of the child node (at the apex of the iscosceles triangle).  These
+options also work for {@Code "@StubSub"}, where they refer to the start and
+end of the stub path:
+@ID @OneRow {
+@Code {
+"@Tree {"
+"@Circle @Eq { a }"
+"@StubSub"
+"    from { SW }"
+"    to { SE }"
+"@Box outlinestyle { noline }"
+"    @Eq { T tsub a }"
+"}"
+}
+||7ct
+@Diag {
+@Tree {
+@Circle @Eq { a }
+@StubSub
+    from { SW }
+    to { SE }
+@Box outlinestyle { noline }
+    @Eq { T tsub a }
+}
+}
+}
+and so the tags both refer to points in the parent node in this case.
+@PP
+The @Code "@LeftSub" and @Code "@RightSub" symbols have variants called
+@Code "@ZeroWidthLeftSub" and @Code "@ZeroWidthRightSub" which are the
+same except that the resulting subtrees consume no width:
+@ID @OneRow {
+@Code {
+"@Tree {"
+"@Circle"
+"@LeftSub {"
+"    @Circle"
+"    @LeftSub @Square"
+"    @RightSub @Square"
+"}"
+"@RightSub {"
+"    @Circle"
+"    @LeftSub {"
+"        @Circle"
+"        @ZeroWidthLeftSub @Square"
+"        @ZeroWidthRightSub @Square"
+"    }"
+"    @RightSub @Square"
+"} }"
+}
+||7ct
+@Diag {
+@Tree
+{
+@Circle
+@LeftSub {
+    @Circle
+    @LeftSub @Square
+    @RightSub @Square
+}
+@RightSub {
+    @Circle
+    @LeftSub {
+        @Circle
+        @ZeroWidthLeftSub @Square
+        @ZeroWidthRightSub @Square
+    }
+    @RightSub @Square
+}
+}
+}
+}
+There is nothing analogous for the other subtree symbols.
+@PP
+The @Code "@Diag" symbol has a few options for adjusting the appearance
+of the tree.  The @Code "treehsep" option determines the horizontal space left
+between a root and its left subtree, between a root and its right subtree,
+and between one subtree and the next when @Code "@NextSub" is used.  The
+@Code "treevsep" option determines the vertical space left between a root
+and its subtrees:
+@ID @OneRow {
+@Code {
+"@Diag"
+"    treehsep { 0c }"
+"    treevsep { 0c }"
+"{"
+"@Tree"
+"{"
+"    @Circle A"
+"    @LeftSub @Square B"
+"    @RightSub @Square C"
+"}"
+"}"
+}
+||7ct
+@Diag
+    treehsep { 0c }
+    treevsep { 0c }
+{
+@Tree
+{
+    @Circle A
+    @LeftSub @Square B
+    @RightSub @Square C
+}
+}
+}
+These options may also be given to individual subtree symbols, although
+@Code "treevsep" works as expected only with @Code "@LeftSub" and
+{@Code "@FirstSub"}, since these determine the vertical separation of
+all children of their parent.
+@PP
+The @Code "treehindent" option determines where the root of a non-binary
+tree is positioned over its subtrees; the value may be @Code "left"
+for at left, @Code "ctr" for centred over them (the default),
+@Code "right" for at the right, or any length, meaning that far from
+the left.  Owing to problems behind the scenes, this option may not be
+given to individual subtree symbols; so as a consolation, it is permitted
+as an option to the @Code "@Tree" symbol.
+@PP
+It is not possible to attach tags to nodes within a tree, because
+tags are attached automatically by the tree symbols and any extra
+tags would disrupt the linking.  However, you can use @Code "@ShowTags"
+to find out what these automatic tags are, and use them in a subsequent
+links part.  For example, the tag attached to the right child of the left
+child of the root of a binary tree is {@Code "L@R@T"}, and in general the
+tag records the path from the root to the node, with @Code "T" added to
+the end.  The root always has tag {@Code "T"}.  The tree as a whole may
+be retagged in the usual way.
+@PP
+There is an @Code "@HTree" symbol which is the same as
+htree. @Index { @Code "@HTree" symbol in @@Diag }
+@Code "@Tree" except that the tree grows horizontally (from left to
+right) instead of vertically.  The same symbols are available within
+@Code "@HTree" as within {@Code "@Tree"}; @Code "@LeftSub" and
+@Code "@FirstSub" produce what might be called the top subtree, and
+@Code "@RightSub" and @Code "@NextSub" produce lower trees.  @Code "@HTree"
+has no @Code "treehindent" option; instead, it has an exactly analogous
+@Code "treevindent" option.
+@PP
+@Code "@HTree" may be used to get horizontal lists:
+@ID @OneRow {
+@Code {
+"@I @Diag"
+"    arrow { yes } treehsep { 1c } {"
+"@HTree {"
+"    @Node A"
+"    @FirstSub {"
+"        @Node B"
+"        @FirstSub @Node C"
+"    }"
+"}"
+"}"
+}
+||7ct
+@I @Diag arrow { yes } treehsep { 1c } {
+@HTree {
+@Node A
+@FirstSub {
+    @Node B
+    @FirstSub @Node C 
+}
+}
+}
+}
+The braces are clumsy but necessary.  The first node has tag {@Code "T"}, the
+second has tag {@Code "S@T"}, the third has tag {@Code "S@S@T"}, and so on.
+@End @Section
diff --git a/doc/user/draft.eps b/doc/user/draft.eps
new file mode 100644
index 0000000..bfc6e9a
--- /dev/null
+++ b/doc/user/draft.eps
@@ -0,0 +1,289 @@
+%!PS-Adobe-3.0
+%%Creator: Basser Lout Version 3.00 (July 1994)
+%%CreationDate: Fri Sep  9 10:46:13 1994
+%%DocumentData: Binary
+%%DocumentNeededResources: (atend)
+%%DocumentSuppliedResources: (atend)
+%%Pages: (atend)
+%%BoundingBox: 0 0 595 842
+%%EndComments
+
+%%BeginProlog
+%%BeginResource: procset LoutStartUp
+/m { 3 1 roll moveto show } bind def
+/s { exch currentpoint exch pop moveto show } bind def
+/k { exch neg 0 rmoveto show } bind def
+/in { 1440 mul } def
+/cm { 567 mul } def
+/pt { 20 mul } def
+/em { 120 mul } def
+/sp { louts mul } def
+/vs { loutv mul } def
+/ft { loutf mul } def
+/dg {           } def
+
+/LoutGraphic {
+  /louts exch def
+  /loutv exch def
+  /loutf exch def
+  /ymark exch def
+  /xmark exch def
+  /ysize exch def
+  /xsize exch def
+} def
+
+/LoutFont
+{ findfont exch scalefont setfont
+} bind def
+
+/LoutRecode {
+  { findfont dup length dict begin
+    {1 index /FID ne {def} {pop pop} ifelse} forall
+    /Encoding exch def
+    currentdict end definefont pop
+  }
+  stopped {}
+} bind def
+
+/BeginEPSF {
+  /LoutEPSFState save def
+  /dict_count countdictstack def
+  /op_count count 1 sub def
+  userdict begin
+  /showpage { } def
+  0 setgray 0 setlinecap
+  1 setlinewidth 0 setlinejoin
+  10 setmiterlimit [] 0 setdash newpath
+  /languagelevel where
+  { pop languagelevel
+    1 ne
+    { false setstrokeadjust false setoverprint
+    } if
+  } if
+} bind def
+
+/EndEPSF {
+  count op_count sub { pop } repeat
+  countdictstack dict_count sub { end } repeat
+  LoutEPSFState restore
+} bind def
+%%EndResource
+
+%%BeginResource encoding vec1
+/vec1 [
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+/space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright
+/parenleft /parenright /asterisk /plus /comma /hyphen /period /slash
+/zero /one /two /three /four /five /six /seven
+/eight /nine /colon /semicolon /less /equal /greater /question
+/at /A /B /C /D /E /F /G
+/H /I /J /K /L /M /N /O
+/P /Q /R /S /T /U /V /W
+/X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore
+/quoteleft /a /b /c /d /e /f /g
+/h /i /j /k /l /m /n /o
+/p /q /r /s /t /u /v /w
+/x /y /z /braceleft /bar /braceright /asciitilde /.notdef
+/.notdef /.notdef /.notdef /.notdef /.notdef /quotedblleft /quotedblright /fi
+/fl /endash /emdash /bullet /dagger /daggerdbl /florin /fraction
+/dotlessi /grave /acute /circumflex /tilde /macron /breve /dotaccent
+/dieresis /.notdef /ring /cedilla /.notdef /hungarumlaut /ogonek /caron
+/space /exclamdown /cent /sterling /currency /yen /brokenbar /section
+/dieresis /copyright /ordfeminine /guillemotleft /logicalnot /hyphen /registered /macron
+/degree /plusminus /twosuperior /threesuperior /acute /mu /paragraph /periodcentered
+/cedilla /onesuperior /ordmasculine /guillemotright /onequarter /onehalf /threequarters /questiondown
+/Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla
+/Egrave /Eacute /Ecircumflex /Edieresis /Igrave /Iacute /Icircumflex /Idieresis
+/Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply
+/Oslash /Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn /germandbls
+/agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla
+/egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex /idieresis
+/eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis /divide
+/oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn /ydieresis
+] def
+%%EndResource
+
+%%EndProlog
+
+%%BeginSetup
+%%IncludeResource: font Times-Roman
+/Times-Romanfnt86 vec1 /Times-Roman LoutRecode
+/fnt86 { /Times-Romanfnt86 LoutFont } def
+%%IncludeResource: font Times-Bold
+/Times-Boldfnt88 vec1 /Times-Bold LoutRecode
+/fnt88 { /Times-Boldfnt88 LoutFont } def
+%%IncludeResource: font Times-Italic
+/Times-Italicfnt87 vec1 /Times-Italic LoutRecode
+/fnt87 { /Times-Italicfnt87 LoutFont } def
+/LoutExtColour [ currentrgbcolor ] cvx def
+%%EndSetup
+
+%%Page: ? 1
+%%BeginPageSetup
+%%PageResources: font Times-Roman
+%%+ font Times-Bold
+%%+ font Times-Italic
+/pgsave save def
+0.0500 dup scale 10 setlinewidth
+%%EndPageSetup
+
+gsave
+0 16840 translate
+0.0000 rotate
+gsave
+3087 -14622 translate
+17.7734 17.7734 scale
+gsave
+0 0 translate
+62.0000 rotate
+240 fnt86 0.8 0.8 0.8 setrgbcolor 0 -54(DRAFT)m 
+grestore
+
+grestore
+
+grestore
+gsave
+0 16840 translate
+0.0000 rotate
+240 fnt88 LoutExtColour setrgbcolor
+5143 -3022(A)m 5376(T)s 22(est)k 5852(Example)s 240 fnt87
+5029 -3520(J)m 6(ef)k 4(fr)k 8(e)k 7(y)k
+5713(H.)s 6006(Kingston)s 240 fnt86 3998 -4021(Basser)m 4695(Department)s
+5883(of)s 6142(Computer)s 7159(Science)s 4446 -4309(The)m 4878(Uni)s 6(v)k 3(ersity)k
+5938(of)s 6197(Sydne)s 3(y)k 6973(2006)s 5512 -4597(Australia)m
+5053 -5050(9)m 5233(September)s 9(,)k 6366(1994)s 240 fnt88
+3097 -5692(Abstract)m 240 fnt86 1897 -6123(This)m 2403(is)s 2643(the)s
+3016(abstract.)s 3959(It')s 13(s)k 4344(v)s 3(ery)k
+4847(short,)s 5466(as)s 1417 -6411(be\207ts)m 2036(a)s 2243(tin)s 3(y)k
+2713(test)s 3145(document.)s 4310(Ho)s 6(we)k 6(v)k 3(er)k
+5273(it)s 5506(is)s 1417 -6699(long)m 1892(enough)s 2647(to)s
+2882(check)s 3489(that)s 3896(things)s 4530(are)s 4870(w)s 2(orking)k
+1417 -6987(as)m 1676(e)s 3(xpected.)k 240 fnt88 1417 -7780(1.)m
+1717(The)s 2176(\207rst)s 2647(section)s 240 fnt86 1897 -8211(This)m
+2408(is)s 2653(the)s 3031(\207rst)s 3488(section.)s 4371(It)s
+4602(too)s 4994(is)s 5239(v)s 3(ery)k 1417 -8499(short,)m
+2045(just)s 2480(a)s 2676(test)s 3097(section,)s 3924(nothing)s
+4746(more)s 5327([)s 5406(1)s 5526(])s 5605(.)s
+1417 -8787(This)m 1912(is)s 2141(the)s 2503(\207rst)s 2944(section.)s
+3811(It)s 4026(too)s 4402(is)s 4631(v)s 3(ery)k
+5123(short,)s 1417 -9075(just)m 1885(a)s 2114(test)s 2568(section,)s
+3428(nothing)s 4283(more.)s 4957(This)s 5505(is)s 1417 -9363(the)m
+1794(\207rst)s 2250(section.)s 3132(It)s 3362(too)s 3753(is)s
+3997(v)s 3(ery)k 4504(short,)s 5127(just)s 5557(a)s
+1417 -9651(test)m 1841(section,)s 2671(nothing)s 3496(more.)s 4140(This)s
+4658(is)s 4910(the)s 5295(\207rst)s 1417 -9939(section.)m 2255(It)s
+2441(too)s 2788(is)s 2988(v)s 3(ery)k 3451(short,)s
+4030(just)s 4416(a)s 4563(test)s 4935(section,)s 1417 -10227(nothing)m
+2254(more.)s 153 fnt86 2805 -10121(i)m 240 fnt86 2952 -10227(This)m
+3482(is)s 3746(the)s 4143(\207rst)s 4619(section.)s 5521(It)s
+1417 -10515(too)m 1794(is)s 2024(v)s 3(ery)k 2517(short,)s
+3126(just)s 3542(a)s 3719(test)s 4121(section,)s 4929(nothing)s
+1417 -10803(more.)m 2037(This)s 2531(is)s 2759(the)s 3120(\207rst)s
+3560(section.)s 4426(It)s 4640(too)s 5015(is)s 5243(v)s 3(ery)k
+1417 -11091(short,)m 2024(just)s 2438(a)s 2613(test)s 3013(section,)s
+3819(nothing)s 4620(more.)s 5240(This)s 1417 -11379(is)m 1655(the)s
+2026(\207rst)s 2476(section.)s 3352(It)s 3576(too)s 3961(is)s
+4199(v)s 3(ery)k 4700(short,)s 5317(just)s 1417 -11667(a)m
+1591(test)s 1990(section,)s 2795(nothing)s 3595(more.)s 4214(This)s
+4707(is)s 4934(the)s 5294(\207rst)s 1417 -11955(section.)m 2255(It)s
+2441(too)s 2788(is)s 2988(v)s 3(ery)k 3451(short,)s
+4030(just)s 4416(a)s 4563(test)s 4935(section,)s 1417 -12243(nothing)m
+2260(more.)s 2922(This)s 3458(is)s 3728(the)s 4131(\207rst)s
+4613(section.)s 5521(It)s 1417 -12531(too)m 1794(is)s 2024(v)s 3(ery)k
+2517(short,)s 3126(just)s 3542(a)s 3719(test)s 4121(section,)s
+4929(nothing)s 1417 -12819(more.)m 2037(This)s 2531(is)s 2759(the)s
+3120(\207rst)s 3560(section.)s 4426(It)s 4640(too)s 5015(is)s
+5243(v)s 3(ery)k 1417 -13107(short,)m 2024(just)s 2438(a)s
+2613(test)s 3013(section,)s 3819(nothing)s 4620(more.)s 5240(This)s
+1417 -13395(is)m 1655(the)s 2026(\207rst)s 2476(section.)s 3352(It)s
+3576(too)s 3961(is)s 4199(v)s 3(ery)k 4700(short,)s
+5317(just)s 1417 -13683(a)m 1591(test)s 1990(section,)s 2795(nothing)s
+3595(more.)s 4214(This)s 4707(is)s 4934(the)s 5294(\207rst)s
+1417 -13971(section.)m 2255(It)s 2441(too)s 2788(is)s 2988(v)s 3(ery)k
+3451(short,)s 4030(just)s 4416(a)s 4563(test)s 4935(section,)s
+1417 -14259(nothing)m 2260(more.)s 2922(This)s 3458(is)s 3728(the)s
+4131(\207rst)s 4613(section.)s 5521(It)s 1417 -14547(too)m 1794(is)s
+2024(v)s 3(ery)k 2517(short,)s 3126(just)s 3542(a)s
+3719(test)s 4121(section,)s 4929(nothing)s 1417 -14835(more.)m 2037(This)s
+2531(is)s 2759(the)s 3120(\207rst)s 3560(section.)s 4426(It)s
+4640(too)s 5015(is)s 5243(v)s 3(ery)k 1417 -15123(short,)m
+2024(just)s 2438(a)s 2613(test)s 3013(section,)s 3819(nothing)s
+4620(more.)s 5240(This)s 6233 -5690(is)m 6471(the)s 6842(\207rst)s
+7292(section.)s 8168(It)s 8392(too)s 8777(is)s 9015(v)s 3(ery)k
+9516(short,)s 10133(just)s 6233 -5978(a)m 6407(test)s 6806(section,)s
+7611(nothing)s 8411(more.)s 9030(This)s 9523(is)s 9750(the)s
+10110(\207rst)s 6233 -6266(section.)m 7071(It)s 7257(too)s 7604(is)s
+7804(v)s 3(ery)k 8267(short,)s 8846(just)s 9232(a)s
+9379(test)s 9751(section,)s 6233 -6554(nothing)m 7076(more.)s 7738(This)s
+8274(is)s 8544(the)s 8947(\207rst)s 9429(section.)s 10337(It)s
+6233 -6842(too)m 6610(is)s 6840(v)s 3(ery)k 7333(short,)s
+7942(just)s 8358(a)s 8535(test)s 8937(section,)s 9745(nothing)s
+6233 -7130(more.)m 6853(This)s 7347(is)s 7575(the)s 7936(\207rst)s
+8376(section.)s 9242(It)s 9456(too)s 9831(is)s 10059(v)s 3(ery)k
+6233 -7418(short,)m 6829(just)s 7232(a)s 7396(test)s 7785(section,)s
+8580(nothing)s 9370(more.)s 153 fnt86 9921 -7312(ii)m 240 fnt86
+10063 -7418(This)m 6233 -7706(is)m 6471(the)s 6842(\207rst)s 7292(section.)s
+8168(It)s 8392(too)s 8777(is)s 9015(v)s 3(ery)k
+9516(short,)s 10133(just)s 6233 -7994(a)m 6407(test)s 6806(section,)s
+7611(nothing)s 8411(more.)s 9030(This)s 9523(is)s 9750(the)s
+10110(\207rst)s 6233 -8282(section.)m 7071(It)s 7257(too)s 7604(is)s
+7804(v)s 3(ery)k 8267(short,)s 8846(just)s 9232(a)s
+9379(test)s 9751(section,)s 6233 -8570(nothing)m 7066(more.)s 153 fnt86
+7617 -8464(a)m 240 fnt86 7785 -8570(This)m 8311(is)s 8571(the)s
+8964(\207rst)s 9436(section.)s 10334(It)s 6233 -8858(too)m 6610(is)s
+6840(v)s 3(ery)k 7333(short,)s 7942(just)s 8358(a)s
+8535(test)s 8937(section,)s 9745(nothing)s 6233 -9146(more.)m 6853(This)s
+7347(is)s 7575(the)s 7936(\207rst)s 8376(section.)s 9242(It)s
+9456(too)s 9831(is)s 10059(v)s 3(ery)k 6233 -9434(short,)m
+6840(just)s 7254(a)s 7429(test)s 7829(section,)s 8635(nothing)s
+9436(more.)s 10056(This)s 6233 -9722(is)m 6471(the)s 6842(\207rst)s
+7292(section.)s 8168(It)s 8392(too)s 8777(is)s 9015(v)s 3(ery)k
+9516(short,)s 10133(just)s 6233 -10010(a)m 6407(test)s 6806(section,)s
+7611(nothing)s 8411(more.)s 9030(This)s 9523(is)s 9750(the)s
+10110(\207rst)s 6233 -10298(section.)m 7071(It)s 7257(too)s 7604(is)s
+7804(v)s 3(ery)k 8267(short,)s 8846(just)s 9232(a)s
+9379(test)s 9751(section,)s 6233 -10586(nothing)m 7076(more.)s 7738(This)s
+8274(is)s 8544(the)s 8947(\207rst)s 9429(section.)s 10337(It)s
+6233 -10874(too)m 6610(is)s 6840(v)s 3(ery)k 7333(short,)s
+7942(just)s 8358(a)s 8535(test)s 8937(section,)s 9745(nothing)s
+6233 -11162(more.)m 240 fnt88 6233 -11761(1.1)m 6533(.)s 6713(The)s
+7172(\207rst)s 7643(subsection)s 240 fnt86 6713 -12192(This)m 7244(is)s
+7509(the)s 7907(\207rst)s 8384(subsection,)s 9560(and)s 10012(what)s
+6233 -12480(is)m 6518(more)s 7135(it)s 7393(has)s 7838(sub-subsections)s
+9479(which)s 10190(are)s 6233 -12768(starting)m 7009(no)s 6(w)k 15(.)k
+240 fnt87 6233 -13415(The)m 6652(\207r)s 2(st)k 7082(sub-subsection)s
+240 fnt86 6713 -13893(This)m 7222(is)s 7465(the)s 7841(\207rst)s
+8296(sub-subsection.)s 9922(There)s 6233 -14181(will)m 6664(be)s 6950(a)s
+7116(second)s 7841(one)s 8247(in)s 8493(a)s 8659(minute.)s
+gsave
+6233 -14668 translate
+240 fnt86 LoutExtColour setrgbcolor 1134 0 0 0 240 288 60 LoutGraphic
+gsave
+0 0 moveto xsize 0 lineto stroke
+grestore
+
+grestore
+122 fnt86 LoutExtColour setrgbcolor 6233 -14836(a)m 192 fnt86 6287 -14921(This)m
+6687(is)s 6874(the)s 7168(\207rst)s 7524(footnote,)s 8270(anchored)s
+9032(to)s 4(w)k 1(ards)k 9692(the)s 9986(end)s
+10323(of)s 6233 -15151(the)m 6530(\207rst)s 6889(section.)s 7590(It)s
+7769(should)s 8343(appear)s 8916(at)s 9117(the)s 9414(bottom)s
+10020(of)s 10242(the)s 6233 -15381(page.)m 6739(Let')s 10(s)k
+7169(hope)s 7590(it)s 7744(comes)s 8281(out)s 8574(right.)s
+
+grestore
+
+pgsave restore
+showpage
+
+%%Trailer
+%%DocumentNeededResources: font Times-Roman
+%%+ font Times-Italic
+%%+ font Times-Bold
+%%DocumentSuppliedResources: procset LoutStartUp
+%%+ encoding vec1
+%%Pages: 1
+%%EOF
diff --git a/doc/user/equ b/doc/user/equ
new file mode 100644
index 0000000..7a87fdb
--- /dev/null
+++ b/doc/user/equ
@@ -0,0 +1,28 @@
+@Chapter
+   @Title { Equations }
+   @Tag { equations }
+@Begin
+@LP
+This chapter explains how to produce mathematical formulas in Lout,
+equations. @Index { equations }
+mathematics. @Index mathematics
+eq. @Index @Code "@Eq"
+using the @Code "@Eq" symbol like this:
+@ID @Code {
+"@Eq { big int supp 1 on 0 ` dx over sqrt {1 - x sup 2} = pi over 2 }"
+}
+This example produces
+@ID @Eq { big int supp 1 on 0 ` dx over sqrt {1 - x sup 2} = pi over 2 }
+The @Code "@Eq" symbol looks after all the details of spacing for
+you, and it provides several hundred mathematical symbols.
+@BeginSections
+@Include { equ_intr }
+@Include { equ_symb }
+@Include { equ_vert }
+@Include { equ_spac }
+@Include { equ_disp }
+@Include { equ_defs }
+@Include { equ_summ }
+@Include { equ_tequ }
+@EndSections
+@End @Chapter
diff --git a/doc/user/equ_defs b/doc/user/equ_defs
new file mode 100644
index 0000000..0e38da7
--- /dev/null
+++ b/doc/user/equ_defs
@@ -0,0 +1,53 @@
+@Section
+   @Title { Defining new equation formatting symbols }
+@Begin
+@PP
+Whenever you type particular equations or parts of equations repeatedly,
+you can save time by using definitions.  Definitions are the subject of
+Section {@NumberOf definitions}, so here we will just give a few examples
+of their use in equation formatting.
+@PP
+Suppose for example that @OneCol @Eq { p sub i ` log sub 2 ` p sub i }
+occurs frequently in your document.  Then
+@ID @Code "def epi { p sub i ` log sub 2 ` p sub i }"
+makes the symbol @Code "epi" stand for the object between the braces:
+@ID {
+@Code "big sum from i=1 to n ` epi"
+|7ct
+@Eq { big sum from i=1 to n ` epi }
+}
+Parameters are very useful when parts of the symbol vary:
+@ID @OneRow @Code {
+"def ep"
+"   right x"
+"{ p sub x ` log sub 2 ` p sub x"
+"}"
+}
+The parameter @Code x will be replaced by the object just to the right
+of {@Code "ep"}:
+@ID {
+@Code {
+"big sum from i=1 to k ` ep i +"
+"big sum from j=k+1 to n ep j"
+}
+||7ct
+@Eq {
+big sum from i=1 to k ` ep i +
+big sum from j=k+1 to n ep j
+}
+}
+The precedence of the symbols you define will be 100 by default.
+@PP
+To make the symbols of @Code "@Eq" available within such definitions,
+each must be preceded by {@Code "import @Eq"}.  As explained in Section
+{@NumberOf definitions}, the definitions go into a file called
+{@Code "mydefs"}, which might then look like this:
+@ID @OneRow @Code {
+"import @Eq"
+"def epi { p sub i ` log sub 2 ` p sub i }"
+""
+"import @Eq"
+"def ep right x { p sub x ` log sub 2 ` p sub x }"
+}
+Use of @Code "epi" and @Code "ep" outside @Code "@Eq" will cause an error.
+@End @Section
diff --git a/doc/user/equ_disp b/doc/user/equ_disp
new file mode 100644
index 0000000..0167b8d
--- /dev/null
+++ b/doc/user/equ_disp
@@ -0,0 +1,126 @@
+@Section
+   @Title { Displaying equations }
+   @Tag { mathdisplays }
+@Begin
+@PP
+The result of the @Code "@Eq" symbol is an object which, according to the
+displayed.equations @Index { displayed equations }
+golden rule (Section {@NumberOf objects}), may appear anywhere:  inside
+a paragraph, inside a table, and so on.  In particular, equations are
+often displayed using the @Code "@CentredDisplay" or @Code "@IndentedDisplay"
+symbols from Section {@NumberOf displays}:
+@ID @Code "@IndentedDisplay @Eq { ... }"
+Now displayed equations are often numbered, and often aligned with one
+another on their equals signs.  For this there are special display
+symbols which are the the subject of this section.  These symbols can
+align and number any display at all, but since in practice they seem to
+be used only with equations, we discuss them here rather than in
+Section {@NumberOf displays} where they really belong.
+@PP
+Let's begin by looking at a first example of a numbered display:
+aligned.displays @Index { aligned displays }
+aligned.equations @Index { aligned equations }
+numbered.displays @Index { numbered displays }
+numbered.equations @Index { numbered equations }
+@BeginAlignedDisplays
+@CentredAlignedNumberedDisplay
+  @Tag { fibeq }
+@Eq { F sub n ^= F sub {n-1} + F sub {n-2} }
+After the display we might have some more text for a while, and then
+we might want a second display, aligned on its equals sign with the
+first, and also numbered in sequence with it:
+@CentredAlignedNumberedDisplay
+@Eq { F sub n - F sub {n-1} ^= F sub {n-2} }
+@EndAlignedDisplays
+Notice that the two displays are centred as a block as well as
+aligned.  Altogether there are four ways in which displays vary:
+@BL
+@LI { A display can be raw or not raw (see below); }
+@LI { It can be a {@Code "@Display"}, {@Code "@LeftDisplay"},
+{@Code "@IndentedDisplay"}, {@Code "@QuotedDisplay"},
+{@Code "@CentredDisplay"}, {@Code "@CenteredDisplay"},
+or {@Code "@RightDisplay"}; }
+@LI { It can be aligned or not aligned; }
+@LI { It can be numbered or not numbered. }
+@EL
+All possible combinations are allowed.  The display that has everything
+is called
+@ID @Code "@RawCentredAlignedNumberedDisplay"
+By leaving out some or all of {@Code Raw}, {@Code Aligned}, and
+{@Code Numbered}, and by changing or leaving out {@Code Centred},
+we get all these combinations.  Here
+numbereddisplay. @Index @Code "@NumberedDisplay"
+aligneddisplay. @Index @Code "@AlignedDisplay"
+then is how the two displays given earlier were made:
+@ID @OneRow @Code {
+"... a first example of a numbered display:"
+"@BeginAlignedDisplays"
+"@CentredAlignedNumberedDisplay"
+"  @Tag { fibeq }"
+"@Eq { F sub n ^= F sub { n-1 } + F sub { n-2 } }"
+"After the display we might ... numbered in sequence with it:"
+"@CentredAlignedNumberedDisplay @Eq { F sub n - F sub { n-1 } ^= F sub { n-2 } }"
+"@EndAlignedDisplays"
+"Notice that the two displays are centred ..."
+}
+All numbered displays have an optional @Code "@Tag" option which is
+used for cross referencing (see Section {@NumberOf cross}).  Alignment
+and numbering work quite independently; they don't have to start or end
+together, and there can be non-aligned and non-numbered displays among
+the others.
+@PP
+When aligned displays are used, it is necessary to indicate where the
+aligned group begins and ends, by placing @Code "@BeginAlignedDisplays"
+beginaligneddisplays @Index @Code "@BeginAlignedDisplays"
+endaligneddisplays @Index @Code "@EndAlignedDisplays"
+just before the first, and @Code "@EndAlignedDisplays" just after the
+last.  The alignment points are indicated by preceding them by the
+symbol {@Code "^"}, so you aren't restricted to aligning at equals
+signs.  @Code "@BeginAlignedDisplays" and @Code "@EndAlignedDisplays"
+cannot span across several sections or subsections:  the equations
+aligned by them must lie within a single large-scale structure symbol.
+@PP
+In our example of aligned and numbered displays, the two displays
+were separated by some ordinary text.  Very often, though, aligned
+displays follow directly after each other.  This is a problem, because
+if you have one display directly following another there will be too
+much vertical space between them.  This problem was mentioned in
+Section {@NumberOf displays}, and the recommended solution was to
+use a list.  However, there are no aligned or numbered (in this sense)
+lists.
+@PP
+To solve this problem, each display symbol has a `raw' version, which
+means that no space is inserted above or below the display.  Instead,
+raw.displays @Index { raw displays }
+you must insert it yourself using paragraph symbols:
+@ID @OneRow @Code {
+"preceding text"
+"@DP"
+"@RawAlignedDisplay @Eq { ... }"
+"@DP"
+"@RawAlignedNumberedDisplay @Eq { ... }"
+"@DP"
+"following text"
+}
+You get the right spacing by placing {@Code "@DP"} symbols before,
+between, and after each display; and you get to use the specialized
+displays that you need.  Raw and non-raw displays may be numbered and
+aligned together.
+@PP
+Numbered displays are numbered automatically.  Depending on where in
+the document they appear, the number might include a chapter number
+or section number, etc.  This is controlled by options in the setup
+file; for example, setting @Code "@ChapterNumInDisplays" to @Code Yes
+ensures that numbered displays will be numbered afresh at the beginning
+of each chapter, and that the number will include a chapter number.  There
+is also a @Code "@DisplayNumStyle" option which controls the style of
+displays; the default value, {@Code "(num)"}, encloses the number in
+parentheses as is conventional when numbering equations.
+@PP
+Every display symbol has an abbreviated form consisting of @Code "@"
+followed by its capital letters only.  For example,
+@Code "@BeginAlignedDisplays" may be abbreviated to {@Code "@BAD"}, and
+the display that has everything to {@Code "@RCAND"}.  Owing to an
+unfortunate clash between the initial letters of `raw' and `right',
+@Code "@RightDisplay" and the other right displays have no abbreviations.
+@End @Section
diff --git a/doc/user/equ_intr b/doc/user/equ_intr
new file mode 100644
index 0000000..882aaff
--- /dev/null
+++ b/doc/user/equ_intr
@@ -0,0 +1,61 @@
+@Section
+   @Title { Introduction }
+@Begin
+@PP
+The Lout definitions for the @Code "@Eq" symbol are accessed via a setup
+file called {@Code "eq"}, which you must include at the start of your
+document if
+eq.file @Index { @Code "eq" file }
+you want equations, like this:
+@ID @OneRow @Code {
+"@SysInclude { tbl }"
+"@SysInclude { eq }"
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"..."
+"@End @Text"
+}
+This shows what to do if you want both tables and equations, but you
+may leave out the line for tables if you don't want them.  Setup files
+for specialized packages, such as like {@Code "tab"} and {@Code "eq"},
+are best included before the main setup file, but may be included in
+any order.
+@PP
+With the @Code "eq" file included, you may write
+eq. @Index { @Code "@Eq" }
+@ID @Code "@Eq { ... }"
+at any point in your document, and the symbols of @Code "@Eq" will be
+available between the braces.  Any symbols available outside continue
+to be available inside, which means that equations may be freely mixed
+with other symbols, without restriction.
+@PP
+Equations may appear within a paragraph of text, or they may be
+displayed.  {@Code "@Eq"}'s job is to produce an object containing the
+equation; it neither knows nor cares where this equation goes.
+@PP
+To get an equation within a paragraph, simply place @Code "@Eq { ... }"
+at the desired point.  To make the optimal paragraph breaker work hard to
+arrange the paragraph so that the equation does not spread over two
+lines, use {@Code "@OneCol @Eq { ... }"}.  This is needed so frequently
+that a symbol @Code "@E" is defined in @Code "eq" along with @Code "@Eq"
+e. @Index { @Code "@E" }
+which is an abbreviation for {@Code "@OneCol @Eq"}.
+@PP
+To display an equation, use a display symbol like @Code "@IndentedDisplay"
+or @Code "@CentredDisplay" (Section {@NumberOf displays}).  For example,
+@ID @Code "@CentredDisplay @Eq { int supp pi on 0 sin ` x = 0 }"
+produces
+@CentredDisplay @Eq { int supp pi on 0 sin ` x = 0 }
+There are also symbols for aligned and numbered displays, which are
+very commonly used with equations.  These symbols are the subject of
+Section {@NumberOf mathdisplays}.
+@PP
+In this chapter we show the Lout input at the left, and its
+result at the right:
+@ID {
+@Code "@Eq { {x sup 2 + y sup 2} over 2 }"
+|7ct
+@Eq { {x sup 2 + y sup 2} over 2 }
+}
+Subsequent examples will omit the enclosing {@Code "@Eq { ... }"}.
+@End @Section
diff --git a/doc/user/equ_spac b/doc/user/equ_spac
new file mode 100644
index 0000000..2a79fb1
--- /dev/null
+++ b/doc/user/equ_spac
@@ -0,0 +1,81 @@
+@Section
+   @Title { Spacing }
+@Begin
+@PP
+There is a basic rule governing the use of white space characters (space,
+tab, and newline) in the input to Lout:  white space between two objects
+affects the result; white space between a symbol and its parameter does
+not.  This is explained at length in Section {@NumberOf spaces}.
+@PP
+Although this rule is just right most of the time, it is not adequate
+for equation formatting.  Getting the horizontal spacing right in
+equations is a very fiddly business, involving four different sizes of
+space (zero, thin, medium, and thick), and different rules for spacing
+within superscripts and subscripts to those applying outside, according
+to a leading authority @Cite { $knuth1984tex }.  {@Code "@Eq"} therefore
+takes the spacing decisions upon itself, and consequently chooses to
+ignore all white space in its input, even between two objects.  (The
+simplest way to restore the effect of white space to part of an equation
+is to enclose that part in a @Code "@Font" symbol.)
+@PP
+Every symbol provided by {@Code "@Eq"} has a @I {full name}, which
+full.name @Index { full name of equation symbol }
+denotes the symbol without any space attached.  Many symbols also
+have a @I {short name}, which denotes the same symbol with what
+short.name @Index { short name of equation symbol }
+{@Code "@Eq"} considers to be an appropriate amount of space for that
+symbol attached to it.  For example, @Eq { lessequal } has full name
+@Code lessequal and short name {@Code "<="}:
+@IL
+@LI {
+@Code "a lessequal b"
+|7ct
+@Eq { a lessequal b }
+}
+@LI {
+@Code "a <= b"
+|7ct
+@Eq { a <= b }
+}
+@EL
+{@Code "@Eq"} puts a thick space around relation symbols like {@Code "<="},
+relations @Index { relation symbols in equations }
+a medium space around binary operator symbols like {@Code "+"}, and a thin
+binary.op @Index { binary operators in equations }
+space after punctuation symbols (@Code ";" and {@Code ","}); except that
+punctuation @Index { punctuation in equations }
+in places where the symbols appear in a smaller size (superscripts,
+subscripts, etc.), these spaces are omitted.  No other horizontal space
+is ever inserted.
+@PP
+The short names have been carefully designed to produce good-looking
+mathematics most of the time.  It is best to rely on them in the first
+instance and only think about spacing when the result is not pleasing.  In
+that case, {@Code "@Eq"}'s space can be removed by using the full names,
+and thin, medium and thick space can be added using the following symbols:
+@ID @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col A ! @Col B }
+{
+@Rowa
+  A { @Code "`" }
+  B { {@Code "0.18f"}  ({@Code "0.018f"} in subscripts, etc.) }
+@Rowa
+  A { @Code "``" }
+  B { {@Code "0.24f"}  ({@Code "0.024f"} in subscripts, etc.) }
+@Rowa
+  A { @Code "```" }
+  B { {@Code "0.30f"}  ({@Code "0.030f"} in subscripts, etc.) }
+}
+where @Code "1f" is the current font size.  These symbols have low
+precedence.  The @Code "&" symbol from raw Lout is also available;
+the @Code "s" unit has value 0 and so is not very useful, but one can
+write @Code "&2m" for example for a two em space.  The full names are
+tedious to remember, so {@Code "@Eq"} provides a @Code "non" symbol
+non. @Index { @Code "non" in equations }
+which removes spaces from its right parameter; thus @Code "non <=" is
+equivalent to {@Code "lessequal"}.  There are also {@Code "rel"},
+{@Code "bin"}, and {@Code "punct"} symbols for telling {@Code "@Eq"}
+to add space to the following symbol as though it was a relation symbol,
+binary operator, or punctuation symbol.
+@End @Section
diff --git a/doc/user/equ_summ b/doc/user/equ_summ
new file mode 100644
index 0000000..bcfbeb3
--- /dev/null
+++ b/doc/user/equ_summ
@@ -0,0 +1,721 @@
+@Section
+   @Title { Summary }
+@Begin
+@PP
+This section is a complete list of the symbols provided by
+{@Code "@Eq"}.  We divide them into auxiliary, parameterized, short names
+(further divided into relations, binary operators, and punctuation),
+and full names.  The auxiliary symbols are:
+@ID @Tab
+     vmargin { 0.5vx }
+     @Fmta { @Col A ! @Col B }
+{
+@Rowa
+    A { @Code "`" }
+    B { Thin space }
+@Rowa
+    A { @Code "``" }
+    B { Medium space }
+@Rowa
+    A { @Code "```" }
+    B { Thick space }
+@Rowa
+    A { @Code "bin x" }
+    B { Treat @Code x as a binary operator }
+@Rowa
+    A { @Code "rel x" }
+    B { Treat @Code x as a relation }
+@Rowa
+    A { @Code "punct x" }
+    B { Treat @Code x as a punctuation symbol }
+@Rowa
+    A { @Code "non x" }
+    B { Remove spaces normally put into @Code x }
+@Rowa
+    A { @Code "vctr x" }
+    B { Centre @Code x vertically }
+@Rowa
+    A { @Code "big x" }
+    B { Make @Code x larger }
+}
+Here are all the parameterized symbols, shown in groups of equal
+precedence, with the precedence itself at right:
+@ID @OneRow lines @Break {
+@Code "matrix pmatrix bmatrix brmatrix fmatrix cmatrix amatrix not" (100)
+@Code "dot dotdot hat tilde vec dyad overbar underbar" (62)
+@Code "sup sub tsub supp" (60)   @Code "on ton" (61)
+@Code "from to widefrom wideto" (58)
+@Code "sqrt root" (56)
+@Code "over frac" (54)
+@Code "col lcol ccol rcol mcol" (52)
+@Code "row axisrow" (50)
+# @Code "above labove cabove rabove mabove" (52)
+# @Code "nextcol" (50)
+}
+See Section {@NumberOf symbols} for examples of matrices.  Here are some
+examples of the other symbols:
+@IL
+
+@LI {
+@Code "x dot"
+|7ct
+@Eq { x dot }
+}
+
+@LI {
+@Code "x dotdot"
+|7ct
+@Eq { x dotdot }
+}
+
+@LI {
+@Code "x hat"
+|7ct
+@Eq { x hat }
+}
+
+@LI {
+@Code "x tilde"
+|7ct
+@Eq { x tilde }
+}
+
+@LI {
+@Code "x vec"
+|7ct
+@Eq { x vec }
+}
+
+@LI {
+@Code "x dyad"
+|7ct
+@Eq { x dyad }
+}
+
+@LI {
+@Code "x+y overbar"
+|7ct
+@Eq { x+y overbar }
+}
+
+@LI {
+@Code "x+y underbar"
+|7ct
+@Eq { x+y underbar }
+}
+
+@EL
+These marks are centred over the preceding object, except the last two
+which are extended to the width of the object.
+@IL
+
+@LI {
+@Code "a sup b"
+|7ct
+@Eq {a sup b}
+}
+
+@LI {
+@Code "a sub b"
+|7ct
+@Eq {a sub b}
+}
+
+@LI {
+@Code "W tsub b"
+|7ct
+@Eq {W tsub b}
+}
+
+@LI {
+@Code "a supp b on c"
+|7ct
+@Eq {a supp b on c}
+}
+
+@LI {
+@Code "W supp b ton c"
+|7ct
+@Eq {W supp b ton c}
+}
+
+@EL
+Note that @Code "supp" and @Code "on" (or {@Code "ton"}) must be used
+together as shown; @Code "tsub" and @Code "ton" are exactly like
+@Code "sub" and @Code "on" except that the subscript is tucked in.
+@IL
+
+@LI {
+@Code "big sum from i"
+|7ct
+@Eq {big sum from i}
+}
+
+@LI {
+@Code "big prod to j"
+|7ct
+@Eq {big prod to j}
+}
+
+@LI {
+@Code { "{a, ... , z} widefrom"
+"{90d @Rotate blbrace}" }
+|7ct
+@Eq { {a, ... , z} widefrom {90d @Rotate blbrace} }
+}
+
+@LI {
+@Code "{a, ... , z} wideto minus"
+|7ct
+@Eq { {a, ... , z} wideto minus }
+}
+
+@EL
+@Code "widefrom" and @Code "wideto" are like @Code "from" and
+@Code "to" except that they horizontally scale the right parameter
+to the width of the left.
+@IL
+
+@LI {
+@Code "sqrt {x over y}"
+|7ct
+@Eq { sqrt {x over y} }
+}
+
+@LI {
+@Code "3 root {x over y}"
+|7ct
+@Eq { 3 root {x over y} }
+}
+
+@EL
+The left parameter of @Code "root" may be any object.  Here are
+four ways to denote division:
+@IL
+
+@LI {
+@Code "2 over 3"
+|7ct
+@Eq { 2 over 3 }
+}
+
+@LI {
+@Code "2 frac 3"
+|7ct
+@Eq { 2 frac 3 }
+}
+
+@LI {
+@Code "2 div 3"
+|7ct
+@Eq { 2 div 3 }
+}
+
+@LI {
+@Code "2 slash 3"
+|7ct
+@Eq { 2 slash 3 }
+}
+
+@EL
+The @Code "div" symbol is a binary operator (see below), and
+@Code "slash" is the full name for the @Code "/" character from
+the Adobe Symbol font.  You can't use @Code "/" itself, because
+it is one of Lout's special symbols.
+@PP
+The following short names define relations (that is, they have a thick
+space on each side):
+@DP
+ragged @Break {
+"<"		@Dbl @Eq {  <			}
+">"		@Dbl @Eq {  >			}
+"="		@Dbl @Eq {  =			}
+"<="		@Dbl @Eq {  <=			}
+"prec"		@Dbl @Eq {  prec		}
+"preceq"	@Dbl @Eq {  preceq		}
+"<<"		@Dbl @Eq {  <<			}
+"subset"	@Dbl @Eq {  subset		}
+"subseteq"	@Dbl @Eq {  subseteq		}
+"sqsubseteq"	@Dbl @Eq {  sqsubseteq		}
+"in"		@Dbl @Eq {  in			}
+"vdash"		@Dbl @Eq {  vdash		}
+"smile"		@Dbl @Eq {  smile		}
+"frown"		@Dbl @Eq {  frown		}
+">="		@Dbl @Eq {  >=			}
+"succ"		@Dbl @Eq {  succ		}
+"succeq"	@Dbl @Eq {  succeq		}
+">>"		@Dbl @Eq {  >>			}
+"supset"	@Dbl @Eq {  supset		}
+"supseteq"	@Dbl @Eq {  supseteq		}
+"sqsupseteq"	@Dbl @Eq {  sqsupseteq		}
+"ni"		@Dbl @Eq {  ni			}
+"dashv"		@Dbl @Eq {  dashv		}
+"mid"		@Dbl @Eq {  mid			}
+"parallel"	@Dbl @Eq {  parallel		}
+"=="		@Dbl @Eq {  ==			}
+"~"		@Dbl @Eq {  ~			}
+"-~"		@Dbl @Eq {  -~			}
+"asymp"		@Dbl @Eq {  asymp		}
+"~~"		@Dbl @Eq {  ~~			}
+"=~"		@Dbl @Eq {  =~			}
+"bowtie"	@Dbl @Eq {  bowtie		}
+"propto"	@Dbl @Eq {  propto		}
+"models"	@Dbl @Eq {  models		}
+"doteq"		@Dbl @Eq {  doteq		}
+"perp"		@Dbl @Eq {  perp		}
+"notsub"	@Dbl @Eq {  notsub		}
+"notin"		@Dbl @Eq {  notin		}
+"!="		@Dbl @Eq {  !=			}
+"<->"		@Dbl @Eq {  <->			}
+"<--"		@Dbl @Eq {  <--			}
+"-->"		@Dbl @Eq {  -->			}
+"up"		@Dbl @Eq {  up			}
+"down"		@Dbl @Eq {  down		}
+"<=>"		@Dbl @Eq {  <=>			}
+"<=="		@Dbl @Eq {  <==			}
+"==>"		@Dbl @Eq {  ==>			}
+"dblup"		@Dbl @Eq {  dblup		}
+"dbldown"	@Dbl @Eq {  dbldown		}
+":"		@Dbl @Eq {  :			}
+"::"		@Dbl @Eq {  ::			}
+":="		@Dbl @Eq {  :=			}
+}
+@DP
+These can be negated by preceding them with {@Code "not"}, as in
+negation. @Index { negation of equation symbols }
+{@Code "not =="}, for example, which yields {@Eq { not == }}.  The
+following short names define binary operators (medium space on each side):
+@DP
+ragged @Break {
+"+"		@Dbl @Eq {  +			}
+"-"		@Dbl @Eq {  -			}
+"+-"		@Dbl @Eq {  +-			}
+"-+"		@Dbl @Eq {  -+			}
+"setminus"	@Dbl @Eq {  setminus		}
+"cdot"		@Dbl @Eq {  cdot		}
+"times"		@Dbl @Eq {  times		}
+"*"		@Dbl @Eq {  *			}
+"circ"		@Dbl @Eq {  circ		}
+"div"		@Dbl @Eq {  div			}
+"cap"		@Dbl @Eq {  cap			}
+"cup"		@Dbl @Eq {  cup			}
+"uplus"		@Dbl @Eq {  uplus		}
+"sqcap"		@Dbl @Eq {  sqcap		}
+"sqcup"		@Dbl @Eq {  sqcup		}
+"triangleleft"	@Dbl @Eq {  triangleleft	}
+"triangleright"	@Dbl @Eq {  triangleright	}
+"wr"		@Dbl @Eq {  wr			}
+"bigcirc"	@Dbl @Eq {  bigcirc		}
+"bigtriangleup"	@Dbl @Eq {  bigtriangleup	}
+"bigtriangledown"@Dbl @Eq {  bigtriangledown	}
+"vee"		@Dbl @Eq {  vee			}
+"wedge"		@Dbl @Eq {  wedge		}
+"oplus"		@Dbl @Eq {  oplus		}
+"ominus"	@Dbl @Eq {  ominus		}
+"otimes"	@Dbl @Eq {  otimes		}
+"oslash"	@Dbl @Eq {  oslash		}
+"odot"		@Dbl @Eq {  odot		}
+"dagger"	@Dbl @Eq {  dagger		}
+"daggerdbl"	@Dbl @Eq {  daggerdbl		}
+"amalg"		@Dbl @Eq {  amalg		}
+}
+@DP
+The following names define arrow symbols (no extra space):
+@DP
+ragged @Break {
+"leftarrow"		@Dbl @Eq {  leftarrow			}
+"longleftarrow"		@Dbl @Eq {  longleftarrow		}
+"dblleftarrow"		@Dbl @Eq {  dblleftarrow		}
+"dbllongleftarrow"	@Dbl @Eq {  dbllongleftarrow		}
+"rightarrow"		@Dbl @Eq {  rightarrow			}
+"longrightarrow"	@Dbl @Eq {  longrightarrow		}
+"dblrightarrow"		@Dbl @Eq {  dblrightarrow		}
+"dbllongrightarrow"	@Dbl @Eq {  dbllongrightarrow		}
+"leftrightarrow"	@Dbl @Eq {  leftrightarrow		}
+"longleftrightarrow"	@Dbl @Eq {  longleftrightarrow		}
+"dblleftrightarrow"	@Dbl @Eq {  dblleftrightarrow		}
+{ 1.15i @Wide @HScale "dbllongleftrightarrow" } @Dbl @Eq {  dbllongleftrightarrow	}
+"mapsto"		@Dbl @Eq {  mapsto			}
+"longmapsto"		@Dbl @Eq {  longmapsto			}
+"hookleftarrow"		@Dbl @Eq {  hookleftarrow		}
+"hookrightarrow"	@Dbl @Eq {  hookrightarrow		}
+"leadsto"		@Dbl @Eq {  leadsto			}
+"leftharpoonup"		@Dbl @Eq {  leftharpoonup		}
+"rightharpoonup"	@Dbl @Eq {  rightharpoonup		}
+"leftharpoondown"	@Dbl @Eq {  leftharpoondown		}
+"rightharpoondown"	@Dbl @Eq {  rightharpoondown		}
+"rightleftharpoons"	@Dbl @Eq {  rightleftharpoons		}
+"uparrow"		@Dbl @Eq {  uparrow			}
+"dbluparrow"		@Dbl @Eq {  dbluparrow			}
+"downarrow"		@Dbl @Eq {  downarrow			}
+"dbldownarrow"		@Dbl @Eq {  dbldownarrow		}
+"updownarrow"		@Dbl @Eq {  updownarrow			}
+"dblupdownarrow"	@Dbl @Eq {  dblupdownarrow		}
+"nearrow"		@Dbl @Eq {  nearrow			}
+"searrow"		@Dbl @Eq {  searrow			}
+"swarrow"		@Dbl @Eq {  swarrow			}
+"nwarrow"		@Dbl @Eq {  nwarrow			}
+}
+@DP
+The following names define punctuation symbols (thin space on the
+right-hand side):
+@DP
+ragged @Break {
+";"		@Dbl @Eq {  ;			}
+","		@Dbl @Eq {  ,			}
+"col"		@Dbl @Eq {  col			}
+}
+@DP
+The following symbols are used in ways typified by the large sum and
+product symbols.  In display equations they should be preceded by the
+@Code "big" symbol:
+@DP
+ragged @Break {
+"sum"		@Dbl @Eq {  sum			}
+"prod"		@Dbl @Eq {  prod		}
+"coprod"	@Dbl @Eq {  coprod		}
+@LP
+"int"		@Dbl @Eq {  int			}
+"oint"		@Dbl @Eq {  oint		}
+"bcap"		@Dbl @Eq {  bcap		}
+@LP
+"bcup"		@Dbl @Eq {  bcup		}
+"bvee"		@Dbl @Eq {  bvee		}
+"bwedge"	@Dbl @Eq {  bwedge		}
+@LP
+"bodot"		@Dbl @Eq {  bodot		}
+"botimes"	@Dbl @Eq {  botimes		}
+"boplus"	@Dbl @Eq {  boplus		}
+@LP
+"buplus"	@Dbl @Eq {  buplus		}
+}
+@DP
+The following symbols are defined so that they will appear in Roman,
+as is conventional for them in equations:
+@DP
+ragged @Break {
+"arccos"	@Dbl @Eq {  arccos		}
+"arcsin"	@Dbl @Eq {  arcsin		}
+"arctan"	@Dbl @Eq {  arctan		}
+"arg"		@Dbl @Eq {  arg			}
+"cos"		@Dbl @Eq {  cos			}
+"cosh"		@Dbl @Eq {  cosh		}
+"cot"		@Dbl @Eq {  cot			}
+"coth"		@Dbl @Eq {  coth		}
+"csc"		@Dbl @Eq {  csc			}
+"deg"		@Dbl @Eq {  deg			}
+"det"		@Dbl @Eq {  det			}
+"dim"		@Dbl @Eq {  dim			}
+"exp"		@Dbl @Eq {  exp			}
+"gcd"		@Dbl @Eq {  gcd			}
+"hom"		@Dbl @Eq {  hom			}
+"inf"		@Dbl @Eq {  inf			}
+"ker"		@Dbl @Eq {  ker			}
+"lg"		@Dbl @Eq {  lg			}
+"lim"		@Dbl @Eq {  lim			}
+"liminf"	@Dbl @Eq {  liminf		}
+"limsup"	@Dbl @Eq {  limsup		}
+"ln"		@Dbl @Eq {  ln			}
+"log"		@Dbl @Eq {  log			}
+"max"		@Dbl @Eq {  max			}
+"min"		@Dbl @Eq {  min			}
+"Pr"		@Dbl @Eq {  Pr			}
+"sec"		@Dbl @Eq {  sec			}
+"sin"		@Dbl @Eq {  sin			}
+"sinh"		@Dbl @Eq {  sinh		}
+"supr"		@Dbl @Eq {  supr		}
+"tan"		@Dbl @Eq {  tan			}
+"tanh"		@Dbl @Eq {  tanh		}
+"mod"		@Dbl @Eq {  mod			}
+}
+@DP
+The following symbols are also defined to ensure that they will appear
+in Roman:
+@DP
+ragged @Break {
+"0"		@Dbl @Eq {  0			}
+"1"		@Dbl @Eq {  1			}
+"2"		@Dbl @Eq {  2			}
+"3"		@Dbl @Eq {  3			}
+"4"		@Dbl @Eq {  4			}
+"5"		@Dbl @Eq {  5			}
+"6"		@Dbl @Eq {  6			}
+"7"		@Dbl @Eq {  7			}
+"8"		@Dbl @Eq {  8			}
+"9"		@Dbl @Eq {  9			}
+"!"		@Dbl @Eq {  !			}
+"?"		@Dbl @Eq {  ?			}
+"%"		@Dbl @Eq {  %			}
+"("		@Dbl @Eq {  (			}
+")"		@Dbl @Eq {  )			}
+"["		@Dbl @Eq {  [			}
+"]"		@Dbl @Eq {  ]			}
+}
+@DP
+The following symbols make good @Code atleft and @Code atright parameters
+of the @Code matrix symbol:
+@LP
+@LP
+ragged @Break {
+"lpar"		@Dbl @Eq {  lpar		}
+"blpar"		@Dbl @Eq {  blpar		}
+"rpar"		@Dbl @Eq {  rpar		}
+"brpar"		@Dbl @Eq {  brpar		}
+"lbrack"	@Dbl @Eq {  lbrack		}
+"blbrack"	@Dbl @Eq {  blbrack		}
+"rbrack"	@Dbl @Eq {  rbrack		}
+"brbrack"	@Dbl @Eq {  brbrack		}
+"lbrace"	@Dbl @Eq {  lbrace		}
+"blbrace"	@Dbl @Eq {  blbrace		}
+"rbrace"	@Dbl @Eq {  rbrace		}
+"brbrace"	@Dbl @Eq {  brbrace		}
+"lfloor"	@Dbl @Eq {  lfloor		}
+"blfloor"	@Dbl @Eq {  blfloor		}
+"rfloor"	@Dbl @Eq {  rfloor		}
+"brfloor"	@Dbl @Eq {  brfloor		}
+"lceil"		@Dbl @Eq {  lceil		}
+"blceil"	@Dbl @Eq {  blceil		}
+"rceil"		@Dbl @Eq {  rceil		}
+"brceil"	@Dbl @Eq {  brceil		}
+"langle"	@Dbl @Eq {  langle		}
+"blangle"	@Dbl @Eq {  blangle		}
+"rangle"	@Dbl @Eq {  rangle		}
+"brangle"	@Dbl @Eq {  brangle		}
+}
+@LP
+@LP
+Here are some miscellaneous symbols:
+@DP
+ragged @Break {
+"hbar"		@Dbl @Eq {  hbar		}
+"Re"		@Dbl @Eq {  Re			}
+"Im"		@Dbl @Eq {  Im			}
+"partial"	@Dbl @Eq {  partial		}
+"infty"		@Dbl @Eq {  infty		}
+"prime"		@Dbl @Eq {  prime		}
+"nabla"		@Dbl @Eq {  nabla		}
+"surd"		@Dbl @Eq {  surd		}
+"top"		@Dbl @Eq {  top			}
+"bot"		@Dbl @Eq {  bot			}
+"dbar"		@Dbl @Eq {  dbar		}
+"triangle"	@Dbl @Eq {  triangle		}
+"backslash"	@Dbl @Eq {  backslash		}
+"forall"	@Dbl @Eq {  forall		}
+"exists"	@Dbl @Eq {  exists		}
+"neg"		@Dbl @Eq {  neg			}
+"circle"	@Dbl @Eq {  circle		}
+"square"	@Dbl @Eq {  square		}
+"ldots"		@Dbl @Eq {  ldots		}
+"cdots"		@Dbl @Eq {  cdots		}
+"vdots"		@Dbl @Eq {  vdots		}
+"ddots"		@Dbl @Eq {  ddots		}
+"del"		@Dbl @Eq {  del			}
+"grad"		@Dbl @Eq {  grad		}
+"..."		@Dbl @Eq {  ...			}
+",...,"		@Dbl @Eq {  ,...,		}
+"half"		@Dbl @Eq {  half		}
+"third"		@Dbl @Eq {  third		}
+"'"		@Dbl @Eq {  '			}
+"empty"		@Dbl @Eq {  empty		}
+}
+@DP
+Finally, here is the long list of full names from the Adobe Symbol font;
+these are the same characters as you get with the @Code "@Sym" symbol
+of Section {@NumberOf characters}, but within equations you don't need
+to type {@Code "@Sym"}:
+@DP
+ragged @Break {
+"space"		@Dbl @Eq {  space		}
+"exclam"	@Dbl @Eq {  exclam		}
+"universal"	@Dbl @Eq {  universal		}
+"numbersign"	@Dbl @Eq {  numbersign		}
+"existential"	@Dbl @Eq {  existential		}
+"percent"	@Dbl @Eq {  percent		}
+"ampersand"	@Dbl @Eq {  ampersand		}
+"suchthat"	@Dbl @Eq {  suchthat		}
+"parenleft"	@Dbl @Eq {  parenleft		}
+"parenright"	@Dbl @Eq {  parenright		}
+"asteriskmath"	@Dbl @Eq {  asteriskmath	}
+"plus"		@Dbl @Eq {  plus		}
+"comma"		@Dbl @Eq {  comma		}
+"minus"		@Dbl @Eq {  minus		}
+"period"	@Dbl @Eq {  period		}
+"slash"		@Dbl @Eq {  slash		}
+"zero"		@Dbl @Eq {  zero		}
+"one"		@Dbl @Eq {  one			}
+"two"		@Dbl @Eq {  two			}
+"three"		@Dbl @Eq {  three		}
+"four"		@Dbl @Eq {  four		}
+"five"		@Dbl @Eq {  five		}
+"six"		@Dbl @Eq {  six			}
+"seven"		@Dbl @Eq {  seven		}
+"eight"		@Dbl @Eq {  eight		}
+"nine"		@Dbl @Eq {  nine		}
+"colon"		@Dbl @Eq {  colon		}
+"semicolon"	@Dbl @Eq {  semicolon		}
+"less"		@Dbl @Eq {  less		}
+"equal"		@Dbl @Eq {  equal		}
+"greater"	@Dbl @Eq {  greater		}
+"question"	@Dbl @Eq {  question		}
+"congruent"	@Dbl @Eq {  congruent		}
+"Alpha"		@Dbl @Eq {  Alpha		}
+"Beta"		@Dbl @Eq {  Beta		}
+"Chi"		@Dbl @Eq {  Chi			}
+"Delta"		@Dbl @Eq {  Delta		}
+"Epsilon"	@Dbl @Eq {  Epsilon		}
+"Phi"		@Dbl @Eq {  Phi			}
+"Gamma"		@Dbl @Eq {  Gamma		}
+"Eta"		@Dbl @Eq {  Eta			}
+"Iota"		@Dbl @Eq {  Iota		}
+"thetaone"	@Dbl @Eq {  thetaone		}
+"Kappa"		@Dbl @Eq {  Kappa		}
+"Lambda"	@Dbl @Eq {  Lambda		}
+"Mu"		@Dbl @Eq {  Mu			}
+"Nu"		@Dbl @Eq {  Nu			}
+"Omicron"	@Dbl @Eq {  Omicron		}
+"Pi"		@Dbl @Eq {  Pi			}
+"Theta"		@Dbl @Eq {  Theta		}
+"Rho"		@Dbl @Eq {  Rho			}
+"Sigma"		@Dbl @Eq {  Sigma		}
+"Tau"		@Dbl @Eq {  Tau			}
+"Upsilon"	@Dbl @Eq {  Upsilon		}
+"sigmaone"	@Dbl @Eq {  sigmaone		}
+"Omega"		@Dbl @Eq {  Omega		}
+"Xi"		@Dbl @Eq {  Xi			}
+"Psi"		@Dbl @Eq {  Psi			}
+"Zeta"		@Dbl @Eq {  Zeta		}
+"bracketleft"	@Dbl @Eq {  bracketleft		}
+"therefore"	@Dbl @Eq {  therefore		}
+"bracketright"	@Dbl @Eq {  bracketright	}
+"perpendicular"	@Dbl @Eq {  perpendicular	}
+"underscore"	@Dbl @Eq {  underscore		}
+"radicalex"	@Dbl @Eq {  radicalex		}
+"alpha"		@Dbl @Eq {  alpha		}
+"beta"		@Dbl @Eq {  beta		}
+"chi"		@Dbl @Eq {  chi			}
+"delta"		@Dbl @Eq {  delta		}
+"epsilon"	@Dbl @Eq {  epsilon		}
+"phi"		@Dbl @Eq {  phi			}
+"gamma"		@Dbl @Eq {  gamma		}
+"eta"		@Dbl @Eq {  eta			}
+"iota"		@Dbl @Eq {  iota		}
+"phione"	@Dbl @Eq {  phione		}
+"kappa"		@Dbl @Eq {  kappa		}
+"lambda"	@Dbl @Eq {  lambda		}
+"mu"		@Dbl @Eq {  mu			}
+"nu"		@Dbl @Eq {  nu			}
+"omicron"	@Dbl @Eq {  omicron		}
+"pi"		@Dbl @Eq {  pi			}
+"theta"		@Dbl @Eq {  theta		}
+"rho"		@Dbl @Eq {  rho			}
+"sigma"		@Dbl @Eq {  sigma		}
+"tau"		@Dbl @Eq {  tau			}
+"upsilon"	@Dbl @Eq {  upsilon		}
+"omegaone"	@Dbl @Eq {  omegaone		}
+"omega"		@Dbl @Eq {  omega		}
+"xi"		@Dbl @Eq {  xi			}
+"psi"		@Dbl @Eq {  psi			}
+"zeta"		@Dbl @Eq {  zeta		}
+"braceleft"	@Dbl @Eq {  braceleft		}
+"bar"		@Dbl @Eq {  bar			}
+"braceright"	@Dbl @Eq {  braceright		}
+"similar"	@Dbl @Eq {  similar		}
+"Upsilonone"	@Dbl @Eq {  Upsilonone		}
+"minute"	@Dbl @Eq {  minute		}
+"lessequal"	@Dbl @Eq {  lessequal		}
+"fraction"	@Dbl @Eq {  fraction		}
+"infinity"	@Dbl @Eq {  infinity		}
+"florin"	@Dbl @Eq {  florin		}
+"club"		@Dbl @Eq {  club		}
+"diamond"	@Dbl @Eq {  diamond		}
+"heart"		@Dbl @Eq {  heart		}
+"spade"		@Dbl @Eq {  spade		}
+"arrowboth"	@Dbl @Eq {  arrowboth		}
+"arrowleft"	@Dbl @Eq {  arrowleft		}
+"arrowup"	@Dbl @Eq {  arrowup		}
+"arrowright"	@Dbl @Eq {  arrowright		}
+"arrowdown"	@Dbl @Eq {  arrowdown		}
+"degree"	@Dbl @Eq {  degree		}
+"plusminus"	@Dbl @Eq {  plusminus		}
+"second"	@Dbl @Eq {  second		}
+"greaterequal"	@Dbl @Eq {  greaterequal	}
+"multiply"	@Dbl @Eq {  multiply		}
+"proportional"	@Dbl @Eq {  proportional	}
+"partialdiff"	@Dbl @Eq {  partialdiff		}
+"bullet"	@Dbl @Eq {  bullet		}
+"divide"	@Dbl @Eq {  divide		}
+"notequal"	@Dbl @Eq {  notequal		}
+"equivalence"	@Dbl @Eq {  equivalence		}
+"approxequal"	@Dbl @Eq {  approxequal		}
+"ellipsis"	@Dbl @Eq {  ellipsis		}
+"arrowvertex"	@Dbl @Eq {  arrowvertex		}
+"arrowhorizex"	@Dbl @Eq {  arrowhorizex	}
+"carriagereturn"@Dbl @Eq {  carriagereturn	}
+"aleph"		@Dbl @Eq {  aleph		}
+"Ifraktur"	@Dbl @Eq {  Ifraktur		}
+"Rfraktur"	@Dbl @Eq {  Rfraktur		}
+"weierstrass"	@Dbl @Eq {  weierstrass		}
+"circlemultiply"@Dbl @Eq {  circlemultiply	}
+"circleplus"	@Dbl @Eq {  circleplus		}
+"emptyset"	@Dbl @Eq {  emptyset		}
+"intersection"	@Dbl @Eq {  intersection	}
+"union"		@Dbl @Eq {  union		}
+"propersuperset"@Dbl @Eq {  propersuperset	}
+"reflexsuperset"@Dbl @Eq {  reflexsuperset	}
+"notsubset"	@Dbl @Eq {  notsubset		}
+"propersubset"	@Dbl @Eq {  propersubset	}
+"reflexsubset"	@Dbl @Eq {  reflexsubset	}
+"element"	@Dbl @Eq {  element		}
+"notelement"	@Dbl @Eq {  notelement		}
+"angle"		@Dbl @Eq {  angle		}
+"gradient"	@Dbl @Eq {  gradient		}
+"registerserif"	@Dbl @Eq {  registerserif	}
+"copyrightserif"@Dbl @Eq {  copyrightserif	}
+"trademarkserif"@Dbl @Eq {  trademarkserif	}
+"product"	@Dbl @Eq {  product		}
+"radical"	@Dbl @Eq {  radical		}
+"dotmath"	@Dbl @Eq {  dotmath		}
+"logicalnot"	@Dbl @Eq {  logicalnot		}
+"logicaland"	@Dbl @Eq {  logicaland		}
+"logicalor"	@Dbl @Eq {  logicalor		}
+"arrowdblboth"	@Dbl @Eq {  arrowdblboth	}
+"arrowdblleft"	@Dbl @Eq {  arrowdblleft	}
+"arrowdblup"	@Dbl @Eq {  arrowdblup		}
+"arrowdblright"	@Dbl @Eq {  arrowdblright	}
+"arrowdbldown"	@Dbl @Eq {  arrowdbldown	}
+"lozenge"	@Dbl @Eq {  lozenge		}
+"angleleft"	@Dbl @Eq {  angleleft		}
+"registersans"	@Dbl @Eq {  registersans	}
+"copyrightsans"	@Dbl @Eq {  copyrightsans	}
+"trademarksans"	@Dbl @Eq {  trademarksans	}
+"summation"	@Dbl @Eq {  summation		}
+"parenlefttp"	@Dbl @Eq {  parenlefttp		}
+"parenleftex"	@Dbl @Eq {  parenleftex		}
+"parenleftbt"	@Dbl @Eq {  parenleftbt		}
+"bracketlefttp"	@Dbl @Eq {  bracketlefttp	}
+"bracketleftex"	@Dbl @Eq {  bracketleftex	}
+"bracketleftbt"	@Dbl @Eq {  bracketleftbt	}
+"bracelefttp"	@Dbl @Eq {  bracelefttp		}
+"braceleftmid"	@Dbl @Eq {  braceleftmid	}
+"braceleftbt"	@Dbl @Eq {  braceleftbt		}
+"braceex"	@Dbl @Eq {  braceex		}
+"angleright"	@Dbl @Eq {  angleright		}
+"integral"	@Dbl @Eq {  integral		}
+"integraltp"	@Dbl @Eq {  integraltp		}
+"integralex"	@Dbl @Eq {  integralex		}
+"integralbt"	@Dbl @Eq {  integralbt		}
+"parenrighttp"	@Dbl @Eq {  parenrighttp	}
+"parenrightex"	@Dbl @Eq {  parenrightex	}
+"parenrightbt"	@Dbl @Eq {  parenrightbt	}
+"bracketrighttp"@Dbl @Eq {  bracketrighttp	}
+"bracketrightex"@Dbl @Eq {  bracketrightex	}
+"bracketrightbt"@Dbl @Eq {  bracketrightbt	}
+"bracerighttp"	@Dbl @Eq {  bracerighttp	}
+"bracerightmid"	@Dbl @Eq {  bracerightmid	}
+"bracerightbt"	@Dbl @Eq {  bracerightbt	}
+}
+@DP
+The names given are the same as Adobe's, as used by the @Code "@Sym"
+symbol, except in a few places where the Adobe name contains a digit,
+which is not possible for a symbol name in Lout.
+@End @Section
diff --git a/doc/user/equ_symb b/doc/user/equ_symb
new file mode 100644
index 0000000..f56eca2
--- /dev/null
+++ b/doc/user/equ_symb
@@ -0,0 +1,357 @@
+@Section
+   @Title { Symbols }
+   @Tag { symbols }
+@Begin
+@PP
+@Code "@Eq" prints characters in the fonts appropriate for mathematics:
+@ID {
+@Code "x - 2"
+|7ct
+@Eq { x-2 }
+}
+Here @Eq { x } is in Italic, @Eq { 2 } is in Roman, and @Eq { minus } is
+from the Symbol font.  The character @Code "-" is a @I symbol which
+stands for @Eq {minus}, and @Code "2" is also a symbol, standing for
+@Eq { 2 }.  @Code "@Eq" includes a vast number of symbols:
+@ID {
+@Code "Omega delta int partial club"
+|7ct
+@Eq { Omega delta int partial club }
+}
+The summary at the end of this chapter has the complete list.
+@PP
+Symbols whose names are made from letters should be separated from each
+other by at least one space or end of line, as was done above, or else
+@Code "@Eq" will become confused:
+@ID {
+@Code "Omegadelta"
+|7ct
+@Eq { Omegadelta }
+}
+Symbols whose names are made from digits and punctuation characters can,
+however, be run together with each other and with symbols made from
+letters:
+@ID {
+@Code "Omega-delta<=2"
+|7ct
+@Eq { Omega-delta<=2 }
+}
+This rule applies throughout Lout (Section {@NumberOf spaces}).
+@PP
+Some symbols join objects together in mathematical ways:
+@ID {
+@Code "x sub 2"
+|7ct
+@Eq { x sub 2 }
+}
+Here the @Code "sub" symbol has taken the object just to its left, and
+sub. @Index { @Code "sub" in equations }
+the object just to its right, and joined them into one object in the
+form of a subscript.  The two objects are called the left and right
+parameters of {@Code "sub"}, and they may be arbitrary Lout objects.
+@PP
+Other symbols of a similar kind include {@Code "sup"} for
+sup. @Index { @Code "sup" in equations }
+superscripting, @Code "over" for built-up fractions, and @Code "from"
+over.eq. @Index { @Code "over" in equations }
+from. @Index { @Code "from" in equations }
+to. @Index { @Code "to" in equations }
+and @Code "to" for the lower and upper limits of sums, products,
+etc.  These symbols may be used together to produce complicated
+equations very easily:
+@ID {
+@Code {
+"big sum from i=0 to n r sup i"
+"= {r sup n+1 - 1} over r-1"
+}
+||7ct
+@Eq { big sum from i=0 to n r sup i
+= {r sup n+1 - 1} over r-1
+}
+}
+Here @Code "sum" is just the @Eq { summation } symbol; @Code "from" and
+@Code "to" do all the work of placing the limits.  They are quite
+independent, so either or both may be omitted.  To get a superscript
+directly over a subscript, use the @Code "supp" and @Code "on" symbols:
+supp. @Index { @Code "supp" in equations }
+on. @Index { @Code "on" in equations }
+@ID {
+@Code "A supp b on a"
+|7ct
+@Eq { A supp b on a }
+}
+These two symbols should always be used together as shown.
+@PP
+Sometimes a subscript appears to be too far to the right, owing to
+the slope of italic letters: in @Eq { W sub n }, for example.  You
+can fix this by using `tucked' subscripts, like this:
+@IndentedList
+@LI {
+@Code "W tsub n"
+|7ct
+@Eq { W tsub n }
+}
+@LI {
+@Code "W supp b ton a"
+|7ct
+@Eq { W supp b ton a }
+}
+@EndList
+The @Code "tsub" and @Code "ton" symbols are exactly like @Code "sub"
+and @Code "on" except for this tucking-in effect.  However, the
+@Code "sub" symbol itself does a certain amount of tucking in; the
+amount is determined by kerning information in the font files and
+so is sensitive to the shape of the letters.
+@PP
+As usual in Lout, braces are used to group something into an indivisible
+object.  Leaving them out creates ambiguities:
+@ID @Code "a  sup  b  over  c"
+There are two possible interpretations for this:
+@IndentedList
+@LI {
+@Code "{a  sup  b}  over  c"
+|7ct
+@Eq {  {a  sup  b}  over  c }
+}
+@LI {
+@Code "a  sup  {b  over  c}"
+|7ct
+@Eq {  a  sup  {b  over  c} }
+}
+@EndList
+@Code "@Eq" chooses between them in the following way.  Every symbol that
+takes a parameter also has a {@I precedence}, which is a number.  For
+example, @Code "sup" has precedence 60 and @Code "over" has precedence
+54.  The symbol with the highest precedence wins the object lying between
+them, so in the above case the first interpretation is chosen.  If two
+symbols of equal precedence compete for an object, the association is
+towards the left:
+@ID {
+@Code "a sup b sub 2"
+|7ct
+@Eq { a sup b sub 2 }
+}
+In this case it is more probable that the following right association
+was actually wanted:
+@ID {
+@Code "a sup { b sub 2 }"
+|7ct
+@Eq { a sup { b sub 2 } }
+}
+When in doubt, use braces to make the grouping clear.
+@PP
+White space between two objects is considered to be a symbol with
+precedence 7, which is lower than the precedence of any @Code "@Eq"
+symbol; but if the two objects are immediately adjacent and neither is
+enclosed in braces the precedence is 102, which is higher than the
+precedence of any @Code "@Eq" symbol.  Compare these three examples:
+@IL
+@LI {
+@Code "big sum from i=0 to n"
+|7ct
+@Eq {  big sum from i=0 to n }
+}
+@LI {
+@Code "big sum from {i = 0} to n"
+|7ct
+@Eq {  big sum from {i = 0} to n }
+}
+@LI {
+@Code "big sum from i = 0 to n"
+|7ct
+@Eq {  big sum from i = 0 to n }
+}
+@EL
+and you will see that some care is needed on this point.  Braces can
+always be used to override precedence and associativity, and when in
+doubt the easiest course is to insert them.  Although Lout allows
+symbols to associate towards the left or right, @Code "@Eq" chooses
+to have only left associative symbols.  The summary at the end of this
+chapter gives the precedence of every symbol.
+@PP
+The @Code matrix symbol {@PageMark matrix} builds an array of objects:
+matrix. @Index { @Code "matrix" in equations }
+@ID {
+@Code {
+"matrix"
+"   atleft { blpar }"
+"   atright { brpar }"
+"{"
+"  row col x sup 2 col y sup 2 col z sup 2"
+"  row col x col y col z"
+"  row col 1 col 1 col 1"
+"}"
+}
+||9ct
+@Eq {
+matrix
+   atleft { blpar }
+   atright { brpar }
+{
+  row col x sup 2 col y sup 2 col z sup 2
+  row col x col y col z
+  row col 1 col 1 col 1
+}
+}
+}
+The @Code atleft and @Code atright options place vertically scaled
+versions of their values at each side; if either is omitted the value
+is taken to be an empty object of zero width by default.  Although
+we have used @Code blpar and @Code brpar here, since the options are
+vertically scaled to the correct size some people prefer simply
+@ID @OneRow @Code {
+"matrix"
+"   atleft { ( }"
+"   atright { ) }"
+}
+The right parameter of @Code matrix is the array itself.  It must be
+enclosed in braces, and it is a sequence of rows introduced by
+@Code row symbols; each row is a sequence of objects introduced by
+@Code col symbols.
+@FootNote {
+Older versions of Lout use different symbols, {@Code "above"} and
+{@Code "nextcol"}, at this point.  For backward compatibility these
+symbols are still available, but they are obsolete and no longer documented.
+}
+The @Code row and @Code col symbols have low precedence, but not
+as low as white space between two objects.  Therefore, unless the
+entries in the array are very simple, it is safest to enclose each of
+them in braces.
+@PP
+Entries built with the @Code col symbol have their objects centred in
+the column.  Also available are @Code lcol for left-justified entries,
+@Code ccol meaning the same as {@Code col}, @Code rcol for
+right-justified entries, and @Code mcol for alignment along column
+marks.  Each column may contain entries of different kinds, except
+that @Code mcol does not work well with any other sort.
+@PP
+When several matrices appear side by side, slight differences in height
+can cause an unsightly appearance:
+@ID @Eq {
+matrix
+   atleft { ( }
+   atright { ) }
+{
+   row col a sub 11 col a sub 12
+   row col a sub 21 col a sub 22
+}
+matrix
+   atleft { ( }
+   atright { ) }
+{
+   row col b sub 11 col b sub 12
+   row col b sub 21 col b sub 22
+}
+=
+matrix
+   atleft { ( }
+   atright { ) }
+{
+   row col c sub 11 col c sub 12
+   row col c sub 21 col c sub 22
+}
+}
+To assist in resolving this problem, the @Code "matrix" symbol has
+a @Code "strut" option, which causes a strut to be inserted into
+every row, guaranteeing that every row has height at least equal
+to the height of the strut.  By using
+@ID @Code {
+"matrix"
+"    strut { Yes }"
+"..."
+}
+in each of the three matrices above, the result is improved to
+@ID @Eq {
+matrix
+   atleft { ( }
+   atright { ) }
+   strut { Yes }
+{
+   row col a sub 11 col a sub 12
+   row col a sub 21 col a sub 22
+}
+matrix
+   atleft { ( }
+   atright { ) }
+   strut { Yes }
+{
+   row col b sub 11 col b sub 12
+   row col b sub 21 col b sub 22
+}
+=
+matrix
+   atleft { ( }
+   atright { ) }
+   strut { Yes }
+{
+   row col c sub 11 col c sub 12
+   row col c sub 21 col c sub 22
+}
+}
+By default, the strut has height @Code "0.5f" (half the current font
+size) both above and below the axis of the row.  This can be changed
+by giving any length as the value of the @Code "strut" option:
+@Code "strut { 2.0c }" for two centimetres above and below
+the axis, and so on.
+@PP
+Some symbols have been added which produce `matrices' with commonly needed
+@Code atleft and @Code atright options already set for you.  Here are
+these symbols, on the left, with the equivalent @Code matrix symbol
+and, on the right, the result produced:
+@ID @Tab
+    @Fmta { @Col @Code A ! @Col ! @Col @Code B ! @Col ! @Col C }
+{
+@Rowa
+    A { "pmatrix" }
+    B { "matrix atleft { ( } atright { ) } { M }" }
+    C { @Eq { pmatrix { M } } }
+@Rowa
+    A { "bmatrix" }
+    B { "matrix atleft { blbrack } atright { brbrack } { M }" }
+    C { @Eq { bmatrix { M } } }
+@Rowa
+    A { "brmatrix" }
+    B { "matrix atleft { blbrace } atright { brbrace } { M }" }
+    C { @Eq { brmatrix { M } } }
+@Rowa
+    A { "fmatrix" }
+    B { "matrix atleft { blfloor } atright { brfloor } { M }" }
+    C { @Eq { fmatrix { M } } }
+@Rowa
+    A { "cmatrix" }
+    B { "matrix atleft { blceil } atright { brceil } { M }" }
+    C { @Eq { cmatrix { M } } }
+@Rowa
+    A { "amatrix" }
+    B { "matrix atleft { blangle } atright { brangle } { M }" }
+    C { @Eq { amatrix { M } } }
+}
+For example:
+@ID {
+@Code {
+"fmatrix { (n+1) over 2 }"
+}
+|7ct
+@Eq {
+fmatrix { (n+1) over 2 }
+}
+}
+As this example shows, these symbols are very useful for getting large
+scaled delimiters around things that aren't necessarily matrices at all.
+@PP
+Each of the @Code "@Eq" symbols that takes parameters also has a @Code gap
+option, which controls the amount of space inserted by the symbol:
+@IL
+@LI {
+@Code "x over y"
+|7ct
+@Eq { x over y }
+}
+@LI {
+6c @Wide @Code "x over gap { 3p } y"
+|7ct
+@Eq { x over gap { 3p } y }
+}
+@EL
+@Code "@Eq" usually gets the spacing right without help.
+@End @Section
diff --git a/doc/user/equ_tequ b/doc/user/equ_tequ
new file mode 100644
index 0000000..bbb1d20
--- /dev/null
+++ b/doc/user/equ_tequ
@@ -0,0 +1,41 @@
+@Section
+   @Title { An alternative version that uses @TeX's fonts }
+   @Tag { teq }
+@Begin
+@PP
+There is an alternative version of the @Code "@Eq" symbol that
+tex.mathfonts @SubIndex { mathematical fonts }
+uses fonts taken from the @TeX document formatting
+system.  These fonts are said to produce better-looking
+mathematics than the Adobe Systems Symbol font used by the
+standard @Code "@Eq" symbol.
+@PP
+The fonts were converted from @TeX form to PostScript form by
+Basil K. Malyshev, who has attached a license to them permitting
+non-commercial use only.  This is a much more stringent license
+than the one attached to Lout itself.  For this reason, the files
+needed to use these @TeX fonts are distributed separately from the
+rest of Lout, although you can get them from the same place (see the
+preface of this guide).
+@PP
+Once these files are installed, you change from the standard
+@Code "@Eq" symbol to the @TeX version by changing the initial
+@Code "@SysInclude { eq }" to {@Code "@SysInclude { teq }"}.  Do
+absolutely nothing else.
+@PP
+Unfortunately, the @TeX fonts are not usually resident on PostScript
+printing devices, which means that Lout is obliged to include them in its
+PostScript output file.  You don't have to do anything to make this
+happen, but the cost is fairly large:  changing to @Code "@SysInclude { teq }"
+increases the size of the PostScript output file by 252 kilobytes.
+@PP
+It is possible to gain access to characters in the @TeX
+fonts that are not accessible directly from {@Code "@Eq"}, mainly
+script capitals and bold-italic Greek letters.  For example, you can
+use @Code "{cmsy Base} @Font @Char \"A\"" to get a script A, and
+@Code "{cmmi Bold} @Font @Char \"pi\"" to get a bold-italic
+{@Sym pi}.  For the full story, consult file @Code "teq" in the
+Lout system include directory for the names of these fonts, and then
+look in Lout's font directory for their font metrics files, which
+show the names and encodings of all the characters.
+@End @Section
diff --git a/doc/user/equ_vert b/doc/user/equ_vert
new file mode 100644
index 0000000..1595ed8
--- /dev/null
+++ b/doc/user/equ_vert
@@ -0,0 +1,164 @@
+@Section
+    @Tag { vpos }
+    @Title { Vertical positioning }
+@Begin
+@PP
+Every equation and every object within every equation has an
+@I axis running through it which is used to position it vertically
+axis @Index { axis of equation }
+with respect to nearby objects.  In the Expert's Guide to Lout
+@Cite { $kingston1995lout.expert } this is called a @I { row mark },
+but we'll stick with axis.  Here are some examples with the axis
+shown as a dashed line:
+@ID {
+@ShowHMark @Eq { x sup 2 }
+||2c
+@ShowHMark @Eq { non + }
+||2c
+@ShowHMark @Eq { @ExA }
+}
+When these objects are placed adjacent to one another, their
+axes are merged, giving the correct vertical positioning:
+@ID @ShowHMark @Eq { x sup 2 + @ExA }
+Most of the time you do not need to think about vertical
+positioning, because for most objects there is just one
+sensible place for the axis to go, and Lout puts it there.
+@PP
+Matrices and the delimiters that enclose them are the two
+exceptions.  Lout makes the axis of a matrix pass through
+its exact centre, and it shifts the axes of delimiters
+so that they exactly enclose the thing delimited.  These
+choices are never disastrous, but there are other possibilities
+that might be better sometimes.
+@PP
+The axis of a matrix could reasonably be set to the axis
+of any of its rows:
+@ID {
+@ShowHMark @Eq {
+matrix userow { yes } {
+  axisrow col { x sup 3 } col { y sup 3 } col { z sup 3 }
+  row     col { x sup 2 } col { y sup 2 } col { z sup 2 }
+  row     col { x } col { y } col { z }
+}
+}
+||2c
+@ShowHMark @Eq {
+matrix userow { yes } {
+  row     col { x sup 3 } col { y sup 3 } col { z sup 3 }
+  axisrow col { x sup 2 } col { y sup 2 } col { z sup 2 }
+  row     col { x } col { y } col { z }
+}
+}
+||2c
+@ShowHMark @Eq {
+matrix userow { yes } {
+  row     col { x sup 3 } col { y sup 3 } col { z sup 3 }
+  row     col { x sup 2 } col { y sup 2 } col { z sup 2 }
+  axisrow col { x } col { y } col { z }
+}
+}
+}
+Alternatively, it could be set to where Lout usually places it,
+through the exact centre:
+@ID {
+@ShowHMark @Eq {
+matrix {
+  row     col { x sup 3 } col { y sup 3 } col { z sup 3 }
+  row     col { x sup 2 } col { y sup 2 } col { z sup 2 }
+  row     col { x } col { y } col { z }
+}
+}
+}
+Delimiters could reasonably keep the axes that they naturally
+have (approximately through their centres, but not exactly):
+@ID {
+@ShowHMark @Eq { pmatrix userow { yes } shiftdelim { no } { @ExA } }
+}
+or they could have their axes moved in the way that Lout usually does,
+to the point which allows them to evenly cover the thing delimited:
+@ID {
+@ShowHMark @Eq { pmatrix userow { yes } { @ExA } }
+}
+Altogether then there are four possibilities when these two alternatives
+interact:
+@CD lines @Break @Tab
+  @Fmta { @Col 0.5w @VShift A ! @Col ! @Col B ! @Col ! @Col C }
+{
+@Rowa
+  A { }
+  B { Matrix axis
+uses row axis }
+  C { Matrix axis passes
+through centre }
+@Rowa
+@Rowa
+  A { Delimiter
+keeps its axis }
+  B { @ShowHMark @Eq { pmatrix userow {yes} shiftdelim {no } { @ExA } } }
+  C { @ShowHMark @Eq { pmatrix userow {no } shiftdelim {no } { @ExA } } }
+@Rowa
+@Rowa
+  A { Delimiter
+axis shifted }
+  B { @ShowHMark @Eq { pmatrix userow {yes} shiftdelim {yes} { @ExA } } }
+  C { @ShowHMark @Eq { pmatrix userow {no } shiftdelim {yes} { @ExA } } }
+}
+To supply these possibilities, the @Code "matrix" symbol and all
+its variants (@Code "pmatrix" etc.) have two options whose
+values may be {@Code "yes"} or {@Code "no"}:
+@ID @Code {
+"matrix"
+"    userow { no }"
+"    shiftdelim { yes }"
+"{"
+"    ..."
+"}"
+}
+The @Code "userow" option determines whether the axis of the
+matrix will use a row axis; the default is not to, i.e. to
+centre the axis instead.  The @Code "shiftdelim" option
+determines whether the axis of the delimiter will be shifted
+so that the delimiter evenly covers the thing delimited; the
+default is to do this.
+@PP
+If @Code "userow" is {@Code "yes"}, the next question is
+which row's axis to use to make the overall axis.  If you
+do nothing, the first (or only) row's axis becomes the
+overall axis.  To select some other row instead, replace
+the @Code "row" symbol that precedes the row by {@Code "axisrow"}:
+@ID @Code @Tab
+  vmargin { 0.5vx }
+  hmargin { 1s }
+  @Fmta { @Col A ! @Col ! @Col B ! @Col ! @Col C ! @Col ! @Col D ! @Col }
+  @Fmtb { @Col A ! @Col " col {" ! @Col B ! @Col "}  col {" ! @Col C ! @Col "}  col {" ! @Col D ! @Col "}" }
+{
+@Rowa
+  A { "matrix userow { yes } {" &0io }
+@Rowb
+  A { "    row" }
+  B { "x sup 3" }
+  C { "y sup 3" }
+  D { "z sup 3" }
+@Rowb
+  A { "    axisrow" }
+  B { "x sup 2" }
+  C { "y sup 2" }
+  D { "z sup 2" }
+@Rowb
+  A { "    row" }
+  B { "x" }
+  C { "y" }
+  D { "z" }
+@Rowa
+  A { "}" }
+}
+The result of this is
+@ID @ShowHMark @Eq {
+matrix userow { yes } {
+  row     col { x sup 3 } col { y sup 3 } col { z sup 3 }
+  axisrow col { x sup 2 } col { y sup 2 } col { z sup 2 }
+  row     col { x } col { y } col { z }
+}
+}
+with the axis through the second row as desired.
+@End @Section
diff --git a/doc/user/fmt b/doc/user/fmt
new file mode 100644
index 0000000..ffd5e7f
--- /dev/null
+++ b/doc/user/fmt
@@ -0,0 +1,16 @@
+@Chapter
+    @Title { Changing the Overall Format }
+    @Tag { changes }
+@Begin
+@LP
+The symbols of Lout make many decisions behind the scenes.  Even the
+humble @Code "@PP" symbol has to decide how much vertical space to
+leave, and how far to indent the first line of the paragraph.  How to
+change these decisions is the subject of this chapter.
+@BeginSections
+@Include { fmt_setu }
+@Include { fmt_size }
+@Include { fmt_marg }
+@Include { fmt_head }
+@EndSections
+@End @Chapter
diff --git a/doc/user/fmt_head b/doc/user/fmt_head
new file mode 100644
index 0000000..77cbada
--- /dev/null
+++ b/doc/user/fmt_head
@@ -0,0 +1,313 @@
+@Section
+    @Title { Page numbers and running headers }
+    @Tag { headers }
+@Begin
+@PP
+A @I { page header } is a line at the top of a page containing a page
+page.header @Index { page header }
+running.header @Index { running header }
+number or running title.  A @I { page footer } is a similar line at
+page.footer @Index { page footer }
+the bottom of a page.  This section describes the setup file options
+that control the appearance of page headers and footers.
+@PP
+There are four basic styles, selected by the @Code "@PageHeaders" option:
+page.headers @Index @Code "@PageHeaders"
+@ID @Tab
+    @Fmta { @Col @Code { "@PageHeaders {" A "}" } ! @Col B }
+{
+@Rowa
+    A { None }
+    B { No page headers, no page footers. }
+@Rowa
+    A { Simple }
+    B { No footers, and a centred page number between hyphens for
+header on every page whose number is not 0 or 1. }
+@Rowa
+    A { Titles }
+    B { Full running titles as in the present document. }
+@Rowa
+    A { NoTitles }
+    B { Page numbers placed as for @Code { Titles }, but with the
+titles themselves blanked out. }
+}
+@Code Titles and @Code NoTitles use Lout's cross-referencing machinery,
+so will require a few runs to settle down.  @Code None and @Code Simple
+do not, so they work first time and may be used with the @Code "-s"
+command line flag.  Section {@NumberOf cross} has a fuller discussion
+of these ramifications of cross referencing.
+@PP
+The next step is to set the page numbers, using
+the @Code "@PageNumbers" and @Code "@FirstPageNumber" options.  There
+page.numbers @Index @Code "@PageNumbers"
+are two useful values for {@Code "@PageNumbers"}:
+@ID @Tab
+    @Fmta { @Col @Code { "@PageNumbers {" A "}" } ! @Col B }
+{
+@Rowa
+    A { Arabic }
+    B { Arabic page numbers }
+@Rowa
+    A { Roman }
+    B { Lower-case Roman page numbers }
+}
+although the full range of choices is {@Code "None"}, {@Code "Arabic"},
+{@Code "Roman"}, {@Code "UCRoman"}, {@Code "Alpha"}, and
+{@Code "UCAlpha"}.  @Code "@FirstPageNumber" is the number of the
+first.page.number @Index @Code "@FirstPageNumber"
+first page.  Its default value is of course {@Code 1}, although
+@ID @Code "@FirstPageNumber { 0 }"
+might be useful if the first page is really an unnumbered cover
+sheet.  @Code "@FirstPageNumber" must be an Arabic number even if
+@Code "@PageNumbers" is set to something other than {@Code "Arabic"}.
+@PP
+Some document types, such as books and technical reports with cover
+sheets, have a separate introductory
+sequence of pages preceding the main sequence.  For the page numbers on
+introductory pages there are two options, @Code "@IntroPageNumbers"
+intro.page.numbers @Index @Code "@IntroPageNumbers"
+intro.first.page.number @Index @Code "@IntroFirstPageNumber"
+and {@Code "@IntroFirstPageNumber"}, which are exactly analogous to
+@Code "@PageNumbers" and {@Code "@FirstPageNumber"}.  It is traditional
+to number introductory pages using Roman numerals, so @Code Roman is
+the default value of {@Code "@IntroPageNumbers"}.
+@PP
+Let's summarize the five options so far by looking at their values in
+the @Code book setup file, which was used to produce the present document:
+@ID @OneRow @Code {
+"@PageHeaders { Titles }"
+"@PageNumbers { Arabic }"
+"@FirstPageNumber { 1 }"
+"@IntroPageNumbers { Roman }"
+"@IntroFirstPageNumber { 1 }"
+}
+The remainder of this section goes beyond these basic choices to explain
+how to change the detailed appearance of page headers
+and footers.  Inevitably it gets quite a lot harder.
+@PP
+Pages are classified by the page header options in three ways:
+@NumberedList
+@LI { @I { Odd vs. even }.  The first page is odd, the second is even,
+odd.pages @Index { odd and even pages }
+the third is odd, and so on.  If @Code "@FirstPageNumber" is set to
+an even number, the first page will have that number, but it will still
+be classified as odd. }
+@LI { @I { Start vs. non-start }.  A start page is the first page of
+start.pages @Index { start and non-start pages }
+some major part of the document (a chapter, say); other pages are
+non-start.  The @Code { Simple } header type uses a simpler
+definition:  a page whose number is 0 or 1 is a start page, all others
+are non-start. }
+@LI { @I { Intro vs. non-intro }.  Intro pages form a separate sequence of
+intro.pages @Index { intro and non-intro pages }
+pages that precede the main (non-intro) sequence.  They typically contain
+prefatory material such as a title page, preface, and table of contents.
+In a book there will always be an even number of Intro pages, even if
+it means that the last one is empty. }
+@EndList
+These classifications are quite independent of each other:  a page
+could be a non-intro start odd page, or an intro non-start even page,
+and so on.  This makes eight (@Eq { 2 times 2 times 2 }) possibilities
+altogether.  Depending on the type of document there may also be pages
+that Lout will never place a page header or footer on.  For example, no page
+headers or footers will appear on pages containing part titles in books.
+@PP
+If you choose {@Code "@PageHeaders { None }"}, there are no page headers
+or footers, so there is nothing more to say.  If you choose
+{@Code "@PageHeaders { Simple }"}, then eight options become relevant
+for controlling the page headers on each of the eight kinds of
+pages.  Here they are with their default values:
+@ID @OneRow @Code {
+"@OddTop { @Centre { - @PageNum - } }"
+"@EvenTop { @Centre { - @PageNum - } }"
+"@StartOddTop { @Null }"
+"@StartEvenTop { @Null }"
+"@IntroOddTop { @Null }"
+"@IntroEvenTop { @Null }"
+"@IntroStartOddTop { @Null }"
+"@IntroStartEvenTop { @Null }"
+}
+If the word @Code Start is missing from an option name, the option
+applies to non-start pages; if @Code Intro is missing, it applies to
+non-intro pages.  Another eight options control footers in the same way:
+@ID @OneRow @Code {
+"@OddFoot { @Null }"
+"@EvenFoot { @Null }"
+"@StartOddFoot { @Null }"
+"@StartEvenFoot { @Null }"
+"@IntroOddFoot { @Centre @PageNum }"
+"@IntroEvenFoot { @Null }"
+"@IntroStartOddFoot { @Centre @PageNum }"
+"@IntroStartEvenFoot { @Null }"
+}
+The value of the option is an object which becomes the header or
+footer.  It may be any object, but there are some peculiarities that
+will be explained now.
+@PP
+The full set of symbols of the BasicSetup package can be used
+when setting page header options (and indeed any of the options
+of the @Code "@BasicSetup" @Code "@Use" clause package), as well as
+symbols from special-purpose
+packages that have been included before this setup file.  This means
+you can use any symbol you might reasonably expect to.  But footnotes and
+floating figures and tables, for example, are not from BasicSetup so
+cannot be used.
+@PP
+There are five symbols of special relevance to page headers and
+footers: {@Code "@Null"}, {@Code "@Centre"}, {@Code "@Center"},
+{@Code "@Right"}, and {@Code "@PageNum"}.
+@PP
+The @Code "@Null" symbol is similar to the empty object in printing as
+null. @Index @Code "@Null"
+nothing, but in addition it removes the vertical space that ordinarily
+separates the header line from the page body.  If there is no header
+there should be no vertical space either, so always use @Code "@Null"
+rather than the empty object in header and footer options.
+@PP
+@Code "@Centre" and @Code "@Center" centre the following object, and
+centre. @Index @Code "@Centre"
+center. @Index @Code "@Center"
+right. @Index @Code "@Right"
+@Code "@Right" right-justifies it:
+@ID @Code "at left  @Centre { - 27 - }  @Right { at right }"
+produces
+@QD @HExpand { at left  @Centre { - 27 - }  @Right { at right } }
+The objects should be enclosed in braces if they contain spaces.
+@PP
+The @Code "@PageNum" symbol produces the number of the current page, in
+page.num. @Index @Code "@PageNum"
+Arabic, Roman, etc. as specified by the @Code "@PageNumbers" or
+@Code "@IntroPageNumbers" option.  @Code "@PageNum" is available only
+within page header and footer options.
+@PP
+At this point you might like to pause and verify that the default
+values of the sixteen options given above produce what we said they
+would:  no footers, and a centred page number between hyphens on every
+page whose number is not 0 or 1.  It should be clear now what to do if
+you want to remove the hyphens, move the numbers to the page footer,
+make them bold, have them at the left on even pages and at the right on
+odd pages, and so on.
+@PP
+A different set of sixteen options applies when @Code "@PageHeaders"
+is set to @Code Titles or {@Code "NoTitles"}.  Here are the eight
+options for headers, with their default values:
+@ID @OneRow @Code {
+"@RunningOddTop { @I { @MinorNum @DotSep @MinorTitle }"
+"       @Right @B @PageNum }"
+"@RunningEvenTop { @B @PageNum"
+"       @Right @I { @MajorNum @DotSep @MajorTitle } }"
+"@RunningStartOddTop { @Null }"
+"@RunningStartEvenTop { @Null }"
+"@RunningIntroOddTop { @Null }"
+"@RunningIntroEvenTop { @Null }"
+"@RunningIntroStartOddTop { @Null }"
+"@RunningIntroStartEvenTop { @Null }"
+}
+Some options occupy two lines, but only because they are long:  as
+usual, the end of a line is the same as one space.  Here are the
+options for footers:
+@ID @OneRow @Code {
+"@RunningOddFoot { @Null }"
+"@RunningEvenFoot { @Null }"
+"@RunningStartOddFoot { @Centre { Bold 0.8f } @Font @PageNum }"
+"@RunningStartEvenFoot { @Centre { Bold 0.8f } @Font @PageNum }"
+"@RunningIntroOddFoot { @Right @PageNum  }"
+"@RunningIntroEvenFoot { @PageNum }"
+"@RunningIntroStartOddFoot { @Null }"
+"@RunningIntroStartEvenFoot { @Null }"
+}
+All these options are similar to the earlier ones, in providing one
+option for each of the eight kinds of pages.  The names are the same
+except that @Code Running is added to each.  Remember that a start
+page is now one that begins a major part of the document.
+@PP
+In addition to the symbols described earlier for simple page headers
+and footers, these running header options may contain the symbols
+{@Code "@MajorNum"}, {@Code "@MajorTitle"}, {@Code "@MinorNum"},
+{@Code "@MinorTitle"}, {@Code "@DotSep"}, {@Code "@NoDotSep"},
+{@Code "@DotJoin"}, {@Code "@NoDotJoin"}, {@Code "@DashJoin"},
+and {@Code "@NumSep"} described below.
+major.num @Index @Code "@MajorNum"
+major.title @Index @Code "@MajorTitle"
+minor.num @Index @Code "@MinorNum"
+minor.title @Index @Code "@MinorTitle"
+@PP
+The exact values of {@Code "@MajorNum"}, {@Code "@MajorTitle"},
+{@Code "@MinorNum"}, and {@Code "@MinorTitle"} depend on the document
+type, but they are intended to describe what is on the current page.  Here
+are some values typical of books:
+@ID @Tab
+    @Fmta { @Col @Code A ! @Col @Code B }
+    vmargin { 0.5vx }
+{
+@Rowa
+    A { "@MajorNum" }
+    B { Chapter 2 }
+@Rowa
+    A { "@MajorTitle" }
+    B { Adding Structure to Documents }
+@Rowa
+    A { "@MinorNum" }
+    B { 2.7 }
+@Rowa
+    A { "@MinorTitle" }
+    B { Tables of contents }
+}
+It is not possible to change the values assigned to these symbols, but
+the sixteen options allow you to choose whether to use them and how to
+arrange them, in the usual way.
+@PP
+The @Code "@DotSep" symbol consumes the objects to its left and right
+dot.sep @Index @Code "@DotSep"
+and produces them separated by a dot and two spaces:
+@ID @Code "@MinorNum @DotSep @MinorTitle"
+is the same as
+@ID @Code "@MinorNum.  @MinorTitle"
+However, if either object is empty, the dot and two spaces are
+omitted.  It's a fine point, needed mainly for unnumbered chapters
+and sections.  @Code "@DotJoin" is the same as @Code "@DotSep" but
+dot.join @Index @Code "@DotJoin"
+without the two spaces.  @Code "NoDotSep" is the same as
+nodot.sep @Index @Code "@NoDotSep"
+@Code "@DotSep" but leaving out the dot, @Code "@NoDotJoin" is the same
+nodot.join @Index @Code "@NoDotJoin"
+as @Code "@DotJoin" but again leaving out the dot, and @Code "@DashJoin"
+dash.join @Index @Code "@DashJoin"
+is the same as @Code "@DotJoin" except that `--' replaces the dot.
+@PP
+Lout uses @Code "@DotSep" between numbers and titles by default.  To
+get rid of all dots between numbers and titles it is necessary to
+change all occurrences of @Code "@DotSep" in the setup file to
+{@Code "@NoDotSep"}.  There are about ten occurrences, depending
+on the setup file.
+@PP
+@Code "@NumSep" {@PageMark numsep} is similar to @Code "@NoDotSep"
+except that one space
+num.sep @Index @Code "@NumSep"
+hungarian @Index { Hungarian and @Code "@NumSep" }
+is used, not two, and also the order of the two parts is reversed and
+a dot is added if the current language is Hungarian (apparently
+Hungarians write `3. Table' where other people write `Table 3').
+@Code "@NumSep" is used behind the scenes in a variety of places.
+@PP
+The present document was produced using @Code "@PageHeaders { Titles }"
+with the default values of the sixteen options unchanged, as you might
+like to verify.  @Code "@PageHeaders { NoTitles }" is identical to
+@Code "@PageHeaders { Titles }" except that {@Code "@MajorNum"},
+{@Code "@MajorTitle"}, {@Code "@MinorNum"}, and {@Code "@MinorTitle"}
+are always replaced by empty objects.  The description given at the
+beginning of this section, `like @Code "Titles" but with the titles
+blanked out,' is therefore accurate.
+@PP
+There is a @Code "@StructPageNums" setup file option that produces
+structpagenums. @Index @Code "@StructPageNums"
+structured page numbers when it is changed to {@Code Yes}; that is,
+page numbers that include a section number, subsection number, and so
+on.  Precisely which structure numbers are included is determined by the
+@Code "@SectionNumInRunners" option and its relatives.  @Code "@PageHeaders"
+must be @Code Titles when structured page numbers are used, and it is
+probably best to set @Code "@SectionGap" and some similar options to
+{@Code "2b"} (meaning new page) as well.  The @Code "@NumberSeparator"
+setup file option (Section {@NumberOf largescale}) affects the format
+of the structured page numbers.
+@End @Section
diff --git a/doc/user/fmt_marg b/doc/user/fmt_marg
new file mode 100644
index 0000000..1b82d41
--- /dev/null
+++ b/doc/user/fmt_marg
@@ -0,0 +1,121 @@
+@Section
+    @Title { Page margins, page boxes, and page backgrounds }
+    @Tag { margins }
+@Begin
+@PP
+There are six options for setting the top and bottom margins on each
+margins. @RawIndex { margins }
+margins.in.pages @SubIndex { in pages }
+top.margin @Index @Code "@TopMargin"
+foot.margin @Index @Code "@FootMargin"
+odd.left.margin @Index @Code "@OddLeftMargin"
+odd.right.margin @Index @Code "@OddRightMargin"
+even.left.margin @Index @Code "@EvenLeftMargin"
+even.right.margin @Index @Code "@EvenRightMargin"
+page, and the left and right margins on odd and even pages.  Here they
+are with their default values:
+@ID @OneRow @Code {
+"@TopMargin { 2.50c }"
+"@FootMargin { 2.50c }"
+"@OddLeftMargin { 2.50c }"
+"@OddRightMargin { 2.50c }"
+"@EvenLeftMargin { 2.50c }"
+"@EvenRightMargin { 2.50c }"
+}
+When setting these options you must ensure that
+@ID @Eq { @Code "@OddLeftMargin" + @Code "@OddRightMargin" =
+@Code "@EvenLeftMargin" + @Code "@EvenRightMargin" }
+In other words, the total margin on odd pages must be the same as on
+even pages.
+@PP
+You can have a box drawn around each page if you wish.  Here are the
+relevant options and their default values:
+@ID @OneRow @Code {
+"@PageBoxType { None }"
+"@PageBoxMargin { 1.00c }"
+"@PageBoxLineWidth {}"
+"@PageBoxPaint { None }"
+"@PageBoxShadow { 0.06c }"
+}
+You get boxes by changing the @Code "@PageBoxType" option:
+page.box.type @Index @Code "@PageBoxType"
+@ID @OneRow @Tab
+    @Fmta { @Col @Code A ! @Col @CC B }
+{
+@Rowa
+    A { "@PageBoxType { None }" }
+    B { (no box) }
+@Rowa
+@Rowa
+    A { "@PageBoxType { Box }" }
+    B { @Box 1.0c @Wide 1.4c @High }
+@Rowa
+@Rowa
+    A { "@PageBoxType { CurveBox }" }
+    B { @CurveBox 1.0c @Wide 1.4c @High }
+@Rowa
+@Rowa
+    A { "@PageBoxType { ShadowBox }" }
+    B { @ShadowBox 1.0c @Wide 1.4c @High }
+}
+Page boxes reduce the amount of space available to the page contents,
+so your columns will become somewhat narrower and shorter when you
+introduce them.
+@PP
+The {@Code "@PageBoxMargin"}, {@Code "@PageBoxLineWidth"},
+{@Code "@PageBoxPaint"}, and {@Code "@PageBoxShadow"} options affect
+the page box exactly as the {@Code margin}, {@Code linewidth},
+{@Code paint}, and {@Code shadow} options described
+for other boxes in Section {@NumberOf boxes} do.  For example,
+@ID @OneRow @Code {
+"@PageBoxType { CurveBox }"
+"@PageBoxMargin { 1.0c }"
+"@PageBoxPaint { grey }"
+}
+draws a curved box, painted grey, around each page, with a one
+centimetre margin between its boundary and the page contents.  If the
+left margin is 2.5 centimetres, say, this gives a total left margin
+from the page edge to the page contents of 3.5 centimetres.
+@PP
+Finally, it is possible to have something other than the usual white
+background on the page, using the @Code "@PageBackground" option:
+page.background @Index @Code "@PageBackground"
+@ID @Code {
+"@PageBackground { @Scale 60d @Rotate lightgrey @Colour DRAFT }"
+}
+The value of the option is an object which is drawn on each page,
+within the margins, before the page contents are drawn.  This
+example draws a large word DRAFT in light grey diagonally across each
+page:
+@ID @Box margin { 0c } 0.2 @Scale @IncludeGraphic draft.eps
+You have to find a suitable angle by experiment.  As Section
+{@NumberOf scaling} explains, @Code "@Scale" with no scale factor
+only takes account of the available horizontal space, not the
+available vertical space, so if your angle is too steep the result
+will be too tall for the page and you will get a regrettably obscure
+warning message about a `broken size constraint.'  The solution is
+to try a smaller angle.
+@PP
+Another useful page background draws marks to show where the margins
+boundarymarks @Index @Code "@BoundaryMarks"
+cut.marks @Index { cut marks }
+lie:
+@ID @Code "@PageBackground { @BoundaryMarks }"
+produces something like this around each page:
+@DP @DP
+@ID { |@DisplayIndent 3c @High 2c @Wide @HExpand @VExpand @BoundaryMarks }
+@DP @DP
+The @Code "@BoundaryMarks" symbol has options for controlling the
+line width (thickness), the line length, and the gap between the
+ends of the lines and the corner of the text area:
+@ID @OneRow @Code {
+"@PageBackground {"
+"    @BoundaryMarks"
+"        linewidth { 0.2p }"
+"        length { 0.5c }"
+"        gap { 0.5c }"
+"}"
+}
+This shows the default values:  0.2 points for line width,
+0.5 centimetres for the others.
+@End @Section
diff --git a/doc/user/fmt_setu b/doc/user/fmt_setu
new file mode 100644
index 0000000..6e1bb05
--- /dev/null
+++ b/doc/user/fmt_setu
@@ -0,0 +1,210 @@
+@Section
+    @Title { Setup files }
+    @Tag { setup }
+@Begin
+@PP
+As mentioned briefly in Section {@NumberOf start}, each Lout document
+begins with an instruction to include (i.e. to read) a @I { setup file }:
+setup.file @Index { setup file }
+sysinclude. @Index @Code "@SysInclude"
+system.include @Index { system include directory }
+doc.file @Index { @Code "doc" file }
+@ID @Code "@SysInclude { doc }"
+The setup file's name in this example is @Code { doc }, and the @Code Sys
+in @Code "@SysInclude" means that @Code doc is stored in the @I { Lout
+system include directory }, which is where all the standard setup files
+are kept.  Each document type (Chapter {@NumberOf types}) has its own
+setup file, and each specialized package (for equations, tables, and
+so on) has a setup file too.
+@PP
+To change the overall format of a document, you need to create your own
+setup file by copying and modifying one of the standard ones.  We will
+assume that you are making an ordinary document, with the @Code doc
+setup file, but a similar procedure works for any setup file.
+@PP
+You first need to find out the name of the Lout system include
+directory, by typing
+@ID @Code "lout  -V"
+in Unix.  This causes Lout to print out various facts about itself.  Then,
+supposing that this tells you that the Lout system include directory
+is @Code { "/usr/lout/include" }, type the Unix command
+@ID @Code "cp  /usr/lout/include/doc  mydoc"
+to place a copy of the @Code doc setup file in your directory,
+mydoc.file @Index { @Code "mydoc" file }
+renaming it @Code {mydoc}.  Since @Code "doc" is read-only, you may
+also need to change the mode of @Code mydoc to be writable (by
+@Code "chmod +w mydoc" in Unix).  Now replace
+@ID @Code "@SysInclude { doc }"
+at the beginning of your document by
+@ID @Code "@Include { mydoc }"
+and Lout will read @Code mydoc as the setup file instead of
+@Code { doc }.  Since the two files are at present identical, this has
+changed nothing so far; but now any changes you make to @Code mydoc
+will affect your document.  Notice the use of @Code "@Include"
+rather than @Code { "@SysInclude" }; @Code "@Include" will search your
+current directory for @Code { mydoc }, whereas @Code "@SysInclude"
+searches only the system directory.
+@PP
+The remainder of this section is a tour through @Code {doc},
+explaining the various parts and how to modify them.  The first lines
+that actually do anything are these:
+@ID @OneRow @Code {
+"@SysInclude { fontdefs }"
+"@SysInclude { langdefs }"
+"@SysInclude { bsf }"
+"@SysInclude { dsf }"
+"@SysInclude { docf }"
+}
+We already know that @Code "@SysInclude" causes Lout to read a file from
+the Lout system include directory.  Files @Code fontdefs and @Code langdefs
+fontdefs.file @Index { @Code "fontdefs" file }
+langdefs.file @Index { @Code "langdefs" file }
+tell Lout what fonts and languages there are.  Files @Code "bsf" and
+@Code "dsf" contain
+bsf.file @Index { @Code "bsf" file }
+dsf.file @Index { @Code "dsf" file }
+the definitions of the BasicSetup and DocumentSetup packages, in which
+all the symbols of the first two chapters of this guide are defined.  File
+@Code "docf" contains extra definitions specific to
+docf.file @Index { @Code "docf" file }
+ordinary documents (as distinct from technical reports, books, or the
+other document types of Chapter {@NumberOf types}).  So this line
+will be different in the setup files for those other types.
+@PP
+The next line is
+@ID @Code {
+"@Include { mydefs }"
+}
+This searches your current directory for a file called @Code { mydefs },
+which (as Section {@NumberOf definitions} explains) is intended to hold
+your own personal set of definitions of new symbols.  It does no harm
+if there is no @Code "mydefs" file in your current directory, because
+@Code "@Include" then searches the Lout system include directory for
+it, and there is an empty @Code mydefs file there.  When using your own
+setup file, you might prefer to delete @Code "@Include { mydefs }" and
+put your definitions in its place, so that you have one file of setup
+material rather than two.
+@PP
+Next we come to the BasicSetup @Code "@Use" clause.  It looks like this:
+use. @Index @Code "@Use"
+@ID @OneRow @Code @Verbatim {
+@Use { @BasicSetup
+  # @InitialFont { Times Base 12p }
+  # @InitialBreak { {adjust 1.20fx hyphen} @OrIfPlain {ragged 1fx nohyphen} }
+  # @InitialSpace { lout }
+  # @InitialLanguage { English }
+  # @InitialColour { black }
+  # @OptimizePages { No }
+  # @HeadingFont { Bold }
+  # @ParaGap { 1.3vx @OrIfPlain 1f }
+  # @ParaIndent { 2.00f @OrIfPlain 5s }
+}
+}
+@Code "@BasicSetup" is a symbol, and @Code { "@InitialFont" },
+basic.layout @Index @Code "@BasicSetup"
+@Code { "@InitialBreak" }, etc. are its options.  There are more options
+than we've shown; the display above just shows the first
+few.  You change the overall format of your document by changing
+these options.
+@PP
+As it stands, the options are all hidden within comments, so the
+default values (shown within braces) are in force.  To change an
+option, delete the @Code "#" and change the value between
+braces.  For example, to set the document in Helvetica 10 point
+font, change the @Code { "@InitialFont" } line to
+@ID @Code "@InitialFont { Helvetica Base 10p }"
+We won't go through all the options now, since they are the subject of
+following sections.
+@PP
+The @Code "@OrIfPlain" symbol that appears within some setup file
+options is used to set the value of the option differently when
+plain text output (Section {@NumberOf plain}) is being produced.  For
+example, the default value of @Code "@InitialBreak" is usually
+{@Code "adjust 1.20fx hyphen"}, but when plain text is being produced
+it switches to {@Code "ragged 1fx nohyphen"}.  When changing such
+options you can leave the @Code "@OrIfPlain" symbol there and change
+one or both of the alternative values as you wish.
+@PP
+Next comes a similar @Code "@Use" clause, for the DocumentSetup package:
+@ID @OneRow @Code {
+"@Use { @DocumentSetup"
+"  # @PageType { A4 @OrIfPlain Other }"
+"  # @PageWidth { 80s }"
+"  # @PageHeight { 66f }"
+"  # @PageOrientation { Portrait }"
+"  # @PageBackground {}"
+"  # @TopMargin { 2.5c @OrIfPlain 6f }"
+"}"
+}
+This one has many options, starting with options for page
+layout as shown, then going on to figures and tables, tables of
+contents, etc.
+@PP
+The standard setup files are all much the same up to this point; the
+main variation is that in some files, some options are already set.  The
+@Code "slides" setup file, for example, contains
+@ID @Code "@InitialFont { Times Base 20p }"
+so that overhead transparencies will have a large font size.  However,
+now comes a third @Code "@Use" clause whose symbol and options depend
+on the document type.  For ordinary documents (i.e. in the @Code "doc"
+setup file) this clause is
+@ID @OneRow @Code {
+"@Use { @OrdinarySetup"
+"  # @IndexWord { index }"
+"  # @AppendixWord { appendix }"
+"  # @SectionNumbers { Arabic }"
+"  # @AppendixNumbers { UCAlpha }"
+"  # @SectionHeadingFont { Bold }"
+"}"
+}
+Once again this is just some of the options.  In the @Code slides
+setup file for overhead transparencies, we find this:
+@ID @OneRow @Code {
+"@Use { @OverheadSetup"
+"  # @DateLine { No }"
+"  # @ContentsWord { contents }"
+"  # @FirstOverheadNumber { 1 }"
+"  # @OverheadNumbers { Arabic }"
+"  # @TitlePageFont { Helvetica Base 1.5f }"
+"  # @OverheadHeadingFont { Bold }"
+"  # @OverheadInContents { No }"
+"}"
+}
+In general this third @Code "@Use" clause assigns values to options
+specific to the document type we are using, whereas the first and
+second @Code "@Use" clauses assign values to options that are relevant to many
+or all document types.
+@PP
+The setup file ends with a comment identifying a spot where database
+declarations may
+database.dec @Index { database declarations, where to put }
+be put, and one such declaration, for reference printing styles.
+@PP
+The setup files used with other packages, such as C and C++ program printing,
+diagrams, and graphs, are similar to the @Code { doc } setup file we
+have just gone through.  They contain a @@SysInclude line analogous to
+@Code "@SysInclude { dsf }" for reading the package's definition, followed
+by a @@Use clause for setting the package's options.  The same procedure
+is followed for changing these options.  For example, to change the
+options of the @Code "diag" package, copy file @Code "diag" from the
+Lout system include directory to your directory, replace the
+@ID @Code "@SysInclude { diag }"
+line at the top of your document by {@Code "@Include { mydiag }"}, then
+edit @Code "mydiag" and change the options as you wish.
+@PP
+If you are using several packages and you would like a single setup file,
+that is quite easy to arrange.  For example, suppose you have
+@ID @Code {
+"@Include { mydoc }"
+"@Include { mydiag }"
+"@Include { mycprint }"
+}
+To create a single setup file, just concatenate these three files into
+one file (call it @Code { mysetup }, say), and replace the three lines by
+@ID @Code {
+"@Include { mysetup }"
+}
+As explained earlier, you can even replace the @Code "@Include { mydefs }"
+line within the setup file by the actual definitions, giving just one
+file of setup material for the entire document.
+@End @Section
diff --git a/doc/user/fmt_size b/doc/user/fmt_size
new file mode 100644
index 0000000..8e4a258
--- /dev/null
+++ b/doc/user/fmt_size
@@ -0,0 +1,91 @@
+@Section
+    @Title { Page size and page orientation }
+    @Tag { pagesize }
+@Begin
+@PP
+This section explains how to use the setup file options that determine
+page size and page orientation.  Here they are with their default values:
+page.type @Index @Code "@PageType"
+@ID @OneRow @Code {
+"@PageType { A4 }"
+"@PageWidth {}"
+"@PageHeight {}"
+"@PageOrientation { Portrait }"
+}
+The usual way to determine the page size is to set the @Code "@PageType"
+option to the name of the paper you use:
+@ID @Tab
+    vmargin { 0.5vx }
+    @Fmtb { @Col ! @Col ! @Col @I @RR B ! @Col @I @RR C }
+    @Fmta { @Col @Code { "@PageType {" A "}" } ! @Col ! @Col @Code @CC B !
+            @Col @Code @CC C }
+{
+@Rowb B { width in points }          C { height in points }
+@Rowa A { Letter }	B {  612p }  C {  792p }
+@Rowa A { Tabloid }	B {  792p }  C { 1224p }
+@Rowa A { Ledger }	B { 1224p }  C {  792p }
+@Rowa A { Legal  }	B {  612p }  C { 1008p }
+@Rowa A { Statement }	B {  396p }  C {  612p }
+@Rowa A { Executive }	B {  540p }  C {  720p }
+@Rowa A { A3 }		B {  842p }  C { 1190p }
+@Rowa A { A4 }		B {  595p }  C {  842p }
+@Rowa A { A5 }		B {  420p }  C {  595p }
+@Rowa A { B4 }		B {  729p }  C { 1032p }
+@Rowa A { B5 }		B {  516p }  C {  729p }
+@Rowa A { Folio }	B {  612p }  C {  936p }
+@Rowa A { Quarto }	B {  610p }  C {  780p }
+@Rowa A { 10x14 }	B {  720p }  C { 1008p }
+}
+This will automatically assign the widths and heights shown above to
+the @Code "@PageWidth" and @Code "@PageHeight" options, so you don't
+have to worry about those options.  If your paper size is not on this
+list, set @Code "@PageType" to @Code Other and supply your own width
+and height:
+page.width @Index @Code "@PageWidth"
+page.height @Index @Code "@PageHeight"
+@ID @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col @Code A }
+{
+@Rowa A { "@PageType { Other }" }
+@Rowa A { "@PageWidth { 12.0c }" }
+@Rowa A { "@PageHeight { 18.0c }" }
+}
+The width and height may each be any length (Section {@NumberOf objects}),
+and do not have to be in points.
+@PP
+The basic page orientations are @I portrait and @I landscape:
+page.orientation @Index @Code "@PageOrientation"
+@ID @Tab
+    @Fmta { @Col 8c @Wide @Code A ! @Col B }
+{
+@Rowa
+    A { "@PageOrientation { Portrait }" }
+    B { @Box 1.0c @Wide 1.4c @High { Hello } }
+@Rowa
+@Rowa
+    A { "@PageOrientation { Landscape }" }
+    B { @Box 1.4c @Wide 1.0c @High { Hello } }
+}
+When changing to {@Code Landscape}, do not change the page type, page
+width, or page height, and do not change the way you feed your paper
+into the printer.  Lout knows what to do.
+@PP
+Two other orientations are provided which are 180@Degree rotations of
+the basic ones:
+@ID @Tab
+    @Fmta { @Col 8c @Wide @Code A ! @Col B }
+{
+@Rowa
+    A { "@PageOrientation { ReversePortrait }" }
+    B { @Box 1.0c @Wide 1.4c @High { //1rt &1rt 180d @Rotate Hello } }
+@Rowa
+@Rowa
+    A { "@PageOrientation { ReverseLandscape }" }
+    B { @Box 1.4c @Wide 1.0c @High { //1rt &1rt 180d @Rotate Hello } }
+}
+@Code ReverseLandscape might be useful when post-processing the PostScript output
+to print two landscape pages per sheet.  The @Code "@PageOrientation" symbol is
+available at the start of a document, as well as in the setup file, like
+{@Code "@InitialFont"} and {@Code "@PageHeaders"}.
+@End @Section
diff --git a/doc/user/gra b/doc/user/gra
new file mode 100644
index 0000000..58c73ac
--- /dev/null
+++ b/doc/user/gra
@@ -0,0 +1,46 @@
+@Chapter
+  @Title { Graphs }
+  @Tag { graphs }
+@Begin
+@LP
+This chapter describes how to draw graphs, using the @Code "@Graph"
+graphs. @Index { graphs (statistical) }
+graph. @Index @Code "@Graph"
+symbol.  For example,
+@ID @OneRow @Code {
+"@Graph"
+"    abovecaption { New South Wales road deaths, 1960--1990"
+"(fatalities per 100 million vehicle km) }"
+"{"
+"    @Data  points { plus }  pairs { dashed }"
+"    { 1963 5.6  1971 4.3  1976 3.7  1979 3.4  1982 2.9  1985 2.3  1988 2.0 }"
+"}"
+}
+produces the graph
+@CD @Graph
+    abovecaption { New South Wales road deaths, 1960--1990
+(fatalities per 100 million vehicle km) }
+{
+    @Data
+        points { plus }
+        pairs { dashed }
+    {
+        1963 5.6  1971 4.3  1976 3.7  1979 3.4  1982 2.9  1985 2.3  1988 2.0
+    }
+}
+The features of @Code "@Graph" include captions, automatic and manual
+ticks and labels, logarithmic axes, histograms, and plotting of
+mathematical functions.
+@BeginSections
+@Include { gra_intr }
+@Include { gra_over }
+@Include { gra_capt }
+@Include { gra_tick }
+@Include { gra_data }
+@Include { gra_plac }
+@Include { gra_func }
+@Include { gra_keys }
+@Include { gra_erro }
+@Include { gra_summ }
+@EndSections
+@End @Chapter
diff --git a/doc/user/gra_capt b/doc/user/gra_capt
new file mode 100644
index 0000000..089e6e5
--- /dev/null
+++ b/doc/user/gra_capt
@@ -0,0 +1,72 @@
+@Section
+   @Title { Captions }
+   @Tag { captions }
+@Begin
+@PP
+There are options for placing captions above, below, left, and right of
+captions.graphs @SubIndex { in graphs }
+the frame:
+@ID @OneRow @Code {
+"@Graph"
+"    abovecaption { This appears above }"
+"    belowcaption { This appears below }"
+"    leftcaption { At left }"
+"    rightcaption { At right }"
+"{"
+"}"
+}
+produces
+@CD @Graph
+    abovecaption { This appears above }
+    belowcaption { This appears below }
+    leftcaption { At left }
+    rightcaption { At right }
+{
+}
+The captions may be arbitrary Lout objects, so may include
+equations, {@Code "@Rotate"}, and so on.  Each caption except
+@Code rightcaption is printed in the
+@Code "clines @Break" style, which means that multiple lines in one
+caption will be centred beneath each other.  The @Code rightcaption
+option uses the @Code "lines @Break" style, in which the lines are
+left justified beneath each other.  Incidentally, this example shows
+what happens if there is no data.
+@PP
+There are options for controlling the amount of space between each
+caption (when non-empty) and the frame.  Here they are with their
+default values:
+@ID @OneRow @Code {
+"@Graph"
+"    abovegap { 0.5 cm }"
+"    belowgap { 0.5 cm }"
+"    leftgap { 1.5 cm }"
+"    rightgap { 0.5 cm }"
+"{"
+"    ..."
+"}"
+}
+This is particularly important in the case of {@Code "leftgap"} (and
+@Code "rightgap" if @Code rticks is used), because
+Lout has no idea how wide the ticks and labels attached to the y axis
+are; 1.5 cm is just a wild guess and often needs adjustment.  On the
+other hand, Lout does know how high the ticks and labels on the x axis
+are; it allows 1.7 times the current font size for them, and
+@Code "belowgap" is additional to this.
+@PP
+When a graph is to be presented as a centred display, it is generally
+best if the centring is done with respect to the frame alone, not the
+captions, ticks, and labels.  The @Code "hidecaptions" option does this by
+making the left and right captions and gaps seem to Lout to have zero width:
+@ID @OneRow @Code {
+"@Graph"
+"    hidecaptions { yes }"
+"{"
+"    ..."
+"}"
+}
+Actually @Code "yes" has been made the default value, since the vast
+majority of graphs are centred displays.  In the rare cases where
+this feature is not wanted (for example, if a graph appears as an entry
+in a table), use {@Code "hidecaptions { no }"}.  The y and r ticks and labels
+seem to Lout to have zero width already, so do not need to be hidden.
+@End @Section
diff --git a/doc/user/gra_data b/doc/user/gra_data
new file mode 100644
index 0000000..323f155
--- /dev/null
+++ b/doc/user/gra_data
@@ -0,0 +1,267 @@
+@Section
+   @Title { Changing the appearance of the data }
+   @Tag { data }
+@Begin
+@PP
+The @Code "@Data" symbol has options for controlling the
+data. @Index @Code "@Data"
+appearance of its data.  We have already seen the
+@Code "points" option, which controls what is printed at each data
+point:
+points.graphs @Index { @Code "points" option in graphs }
+@CD @Tab
+   vmargin { 0.5vx }
+   @Fmta { @Col @Code A ! @Col B ! @Col ! @Col @Code C ! @Col D }
+{
+@Rowa
+    A { cross }
+    B { @GraphCross }
+    C { plus }
+    D { @GraphPlus }
+@Rowa
+    A { square }
+    B { @GraphSquare }
+    C { filledsquare }
+    D { @GraphFilledSquare }
+@Rowa
+    A { diamond }
+    B { @GraphDiamond }
+    C { filleddiamond }
+    D { @GraphFilledDiamond }
+@Rowa
+    A { circle }
+    B { @GraphCircle }
+    C { filledcircle }
+    D { @GraphFilledCircle }
+@Rowa
+    A { triangle }
+    B { @GraphTriangle }
+    C { filledtriangle }
+    D { @GraphFilledTriangle }
+}
+If the @Code "points" option is omitted or empty, nothing is printed.  The
+symbols are centred over the data point.  There is a @Code "symbolsize"
+option which controls the size (radius) of all these symbols:
+symbolsize. @Index { @Code "symbolsize" option in graphs }
+@ID @OneRow @Code {
+"@Data"
+"    symbolsize { 0.15 ft }"
+}
+shows the default, 0.15 times the current font size.  More
+precisely, the default value is taken from an option
+to the @Code "@Graph" symbol, also called {@Code "symbolsize"}.  By
+setting that option you can therefore set the symbol size of all data
+points in the graph at once; its default value is {@Code "0.15 ft"}.
+@PP
+The @Code "@Data" symbol also has a @Code "pairs" option which
+pairs. @Index { @Code "pairs" option in graphs }
+determines how each pair of points is connected.  The choices are
+@Code none (not connected, the default), @Code solid (a solid line),
+@Code dashed (a dashed line), or @Code dotted (a dotted line).  For
+example,
+@ID @OneRow @Code {
+"@Graph"
+"    abovecaption { Estimated population of Boston, New York, and Philadelphia }"
+"{"
+"    @Data  points { plus }  pairs { solid }"
+"    { 1720 12000  1730 13000  1740 15601  1760 15631  1770 15877 }"
+""
+"    @Data  points { plus }  pairs { dashed }"
+"    { 1720 7000  1730 8622  1740 10451  1750 14255  1760 18000  1770 22667 }"
+""
+"    @Data  points { plus }  pairs { dotted }"
+"    { 1720 10000  1730 11500  1740 12654  1750 18202  1760 23750  1770 34583 }"
+"}"
+}
+produces
+@CD @Graph
+    abovecaption { Estimated population of Boston, New York, and Philadelphia
+}
+{
+    @Data  points { plus }  pairs { solid }
+    { 1720 12000  1730 13000  1740 15601  1760 15631  1770 15877 }
+
+    @Data  points { plus }  pairs { dashed }
+    { 1720 7000  1730 8622  1740 10451  1750 14255  1760 18000  1770 22667 }
+
+    @Data  points { plus }  pairs { dotted }
+    { 1720 10000  1730 11500  1740 12654  1750 18202  1760 23750  1770 34583 }
+
+}
+(R. C. Simmons, @I { The American Colonies }, W. W. Norton, New York,
+1981.)  We will see in Section {@NumberOf key} how to add an explanatory key to
+this graph.  If the points have symbols, these connecting lines will stop 1.5
+symbolsizes away from the data points, so as not to overstrike them.  If
+the points have no symbols and @Code "pairs" is {@Code "dashed"}, the
+first and last dash in each segment will have half the length of the
+others.
+@PP
+A @Code "dashlength" option controls the length of dashes and also the
+separation between dots, and a @Code "linewidth" option controls the
+width (thickness) of the lines and dots:
+@ID @OneRow @Code {
+"@Data"
+"    dashlength { 0.2 ft }"
+"    linewidth { 0.5 pt }"
+"{"
+"    ..."
+"}"
+}
+This shows the default values, {@Code "0.2 ft"} for @Code "dashlength"
+and {@Code "0.5 pt"} (half a point) for {@Code "linewidth"}.  Actually
+the default value for @Code "linewidth" is whatever happens to be
+already in use, but Lout sets line widths to half a point initially.
+This option also controls the separation between bars in histograms.
+@PP
+The @Code "pairs" option is also used for producing histograms, like
+histograms. @Index { histograms }
+this:
+@ID @OneRow @Code {
+"@Graph"
+"    hidecaptions { yes }"
+"    abovecaption { Computer Science 3 Results (1993) }"
+"    leftcaption { Number of"
+"students }"
+"    belowcaption { Final mark (%) }"
+"    yextra { 0 cm }"
+"    ymax { 80 }"
+"{"
+"    @Data pairs { yhisto }"
+"    { 0 1 10 3 20 2 30 4 40 15 50 60 60 58 70 28 80 15 90 7 100 0 }"
+"}"
+}
+which has result
+@CD @Graph
+    hidecaptions { yes }
+    abovecaption { Computer Science 3 Results (1993) }
+    leftcaption { Number of
+students }
+    belowcaption { Final mark (%) }
+    yextra { 0 cm }
+    ymax { 80 }
+{
+    @Data
+        pairs { yhisto }
+    { 0 1 10 3 20 2 30 4 40 15 50 60 60 58 70 28 80 15 90 7 100 0 }
+}
+Note carefully that one y histogram rectangle occupies the space from
+one x value to the next, with height equal to the y value lying between
+these two x values.  This means that the very last y value has no effect
+on the result (however, there must be a last y value anyway).
+@PP
+There is an alternative to @Code "yhisto" called {@Code "surfaceyhisto"}:
+@CD @Graph
+    hidecaptions { yes }
+    abovecaption { Computer Science 3 Results (1993) }
+    leftcaption { Number of
+students }
+    belowcaption { Final mark (%) }
+    yextra { 0 cm }
+    ymax { 80 }
+{
+    @Data
+        pairs { surfaceyhisto }
+    { 0 1 10 3 20 2 30 4 40 15 50 60 60 58 70 28 80 15 90 7 100 0 }
+}
+As you can see, @Code "surfaceyhisto" draws just the surface of the
+histogram, not the descending lines.
+@PP
+There are @Code "xhisto" and @Code "surfacexhisto" values of
+@Code "pairs" which produce a histogram whose bars are parallel to
+the x axis.  There are also {@Code "filledyhisto" } and
+{@Code "filledxhisto" } values which produce filled rectangles rather
+than outlined ones:
+@ID @OneRow @Code {
+"@Graph"
+"    abovecaption { Fertility rates in some developing countries }"
+"    xextra { 0 cm }"
+"    yextra { 0 cm }"
+"    xmax { 8 }"
+"    yticks {"
+"        1.5 (Turkey) 2.5 (Thailand)"
+"        3.5 (Indonesia) 4.5 (Costa Rica)"
+"        5.5 (Colombia) 6.5 (Cameroon)"
+"        7.5 (Botswana) 8.5 (Bangladesh)"
+"    }"
+"    yticklength { 0 cm }"
+"{"
+"    @Data"
+"        pairs { filledxhisto }"
+"    { 0 1 3.2 2 2.2 3 3.0 4 3.5 5 2.8 6 5.9 7 4.8 8 5.3 9 }"
+"}"
+}
+produces
+@CD @Graph
+    abovecaption { Fertility rates in some developing countries
+    }
+    xextra { 0 cm }
+    yextra { 0 cm }
+    xmax { 8 }
+    yticks { 1.5 (Turkey) 2.5 (Thailand) 3.5 (Indonesia) 4.5 (Costa Rica)
+             5.5 (Colombia) 6.5 (Cameroon) 7.5 (Botswana) 8.5 (Bangladesh) }
+    yticklength { 0 cm }
+{
+    @Data
+        pairs { filledxhisto }
+    { 0 1 3.2 2 2.2 3 3.0 4 3.5 5 2.8 6 5.9 7 4.8 8 5.3 9 }
+}
+(Bryant Robey, Shea O. Rutstein, and Leo Morros:  The fertility decline in
+developing countries, @I { Scientific American }, December 1993.)  Once
+again each bar goes from one y value to the next, with its x value
+equal to the x value lying between the two y values; this time the very
+first x value has no effect on the result.
+@PP
+The colour of one set of data can be changed with a @Code "colour"
+option:
+@ID @OneRow @Code {
+"@Data"
+"    colour { blue }"
+}
+For the complete list of acceptable colour names, see Section
+{@NumberOf colour}.  The @Code "colour" option's name may also be
+spelt @Code {"color"}.
+@PP
+It is also possible to paint the area between the data points and
+the x axis (or frame if @Code "style" is not {@Code "axes"}), using
+@ID @OneRow @Code {
+"@Data"
+"    paint { yes }"
+}
+The paint colour is determined by the @Code "colour" option just
+introduced; it will be @Code "black" if no colour is specified.  Paint
+(including white paint) hides paint, points, and lines drawn by previous
+data sets.  However the points and lines of each data set are drawn after
+painting that set, so they cannot be hidden under their own paint; and
+axes and frames are drawn last so that they too are never hidden.
+@PP
+A @Code "dataformat" option is provided for changing the interpretation
+dataformat. @Index { @Code "dataformat" option in graphs }
+of the data.  Ordinarily, as we know, the numbers are taken to be pairs of
+x and y coordinates, like this:
+@ID @OneRow @Code {
+"@Data"
+"{"
+"    x y  x y  ...  x y"
+"}"
+}
+However, by setting @Code "dataformat" to {@Code "yonly"}, the
+interpretation is changed to a sequence of y coordinates only:
+@ID @OneRow @Code {
+"@Data"
+"    dataformat { yonly }"
+"{"
+"    y y  ...  y"
+"}"
+}
+and x values 1, 2, and so on are inserted automatically, just as though
+the original input had been
+@ID @OneRow @Code {
+"@Data"
+"{"
+"    1 y  2 y  ..."
+"}"
+}
+There is also {@Code "xonly"}, which inserts y values 1, 2, and so on.  The
+default value, {@Code "xandy"}, gives the usual interpretation.  The
+layout of data on lines has no effect on the interpretation.
+@End @Section
diff --git a/doc/user/gra_erro b/doc/user/gra_erro
new file mode 100644
index 0000000..3c123a3
--- /dev/null
+++ b/doc/user/gra_erro
@@ -0,0 +1,40 @@
+@Section
+   @Title { Errors }
+   @Tag { grerrors }
+@Begin
+@PP
+Lout normally produces output that will print without mishap on
+any PostScript device.  However, some of the options of @Code "@Graph"
+and all of the data and labels are passed through Lout without
+checking.  Any errors in this material will not be detected
+until the file is printed.
+@PP
+The most likely errors are @I { rangecheck errors}, for example if
+an attempt is made to divide by zero or take the square root of a
+negative number, and @I { undefined errors }, arising from symbols
+misspelt, use of @Code "x" outside an {@Code "xloop"}, etc.  Less commonly,
+everything may be correct but the graph is too large in some
+way:  too much data, expression too deeply nested, and so on.
+@PP
+When an error is detected, @Code "@Graph" arranges for the offending page
+to be printed up to the point where the error occurred, with a message
+nearby describing the error.  Printing of the document is then
+aborted.  The problem is usually easy to locate since it lies in whatever
+should have been printed next.
+@PP
+If you see @Code VMerror in an error message, it means that the printer
+has run out of memory.  All the data is stored in the printer while the
+graph is being printed, and it remains there until the end of the current
+page, when it is discarded and all memory consumed by the graph is
+reclaimed.  If you do run out of memory, one option is to try
+@ID @Code {
+"@Graph"
+"    save { yes }"
+"..."
+}
+This causes the memory used by the graph to be reclaimed as soon as
+the graph is printed, which might well solve your problem if you have
+several graphs on one page.  However, if the graph is nested
+inside some other major Lout package, notably {@Code "@Diag"}, this
+option could cause PostScript errors in that package.
+@End @Section
diff --git a/doc/user/gra_func b/doc/user/gra_func
new file mode 100644
index 0000000..d30e82c
--- /dev/null
+++ b/doc/user/gra_func
@@ -0,0 +1,179 @@
+@Section
+   @Title { Mathematical functions, loops, and tests }
+   @Tag { functions }
+@Begin
+@PP
+@Code "@Graph" offers quite a large selection of mathematical functions,
+mathematical.functions @Index { mathematical functions in graphs }
+available everywhere that x and y coordinates are required:  within
+the @Code xticks and @Code yticks options, within the points within
+the @Code "objects" option, and within the right parameter of the
+@Code "@Data" symbol.  For example,
+@ID @OneRow @Code {
+"@Data"
+"    pairs { solid }"
+"{"
+"    0 0  pi sin { pi/2 }"
+"}"
+}
+draws a solid line from @Eq {(0, 0)} to @Eq {(pi, sin(pi "/" 2))}.  Section
+{@NumberOf grsummary} lists all the functions; they include the four
+arithmetical operators @Eq { non + }, @Eq { non - }, @Eq { non * }, and
+@Eq { "/" }, as well as {@Code "sin"}, {@Code "cos"}, {@Code "sqrt"}, and
+many others.  Braces are used for grouping, never parentheses.
+@PP
+For plotting functions there are three looping symbols, {@Code "xloop"},
+{@Code "yloop"}, and {@Code "zloop"}.  For example, the following plots
+the two functions @Eq { y = 2 } and @Eq { y = sqrt { pi x "/" 4 } + 1 }
+for @Eq { x } from 10 to 500:
+@ID @OneRow @Code {
+"-2p @Font @Graph"
+"    style { axes }"
+"    xorigin { 0 }"
+"    yorigin { 0 }"
+"    width { 8 cm }"
+"    xticks { 10@ 50@ 100@ 200@ 500@ }"
+"    objects {  @NE at { 300 2 } @I { Exponential }"
+"               @SE at { 300 sqrt { pi*300/4 } + 1 } @I { Uniform } }"
+"    belowcaption { @I n }"
+"    belowgap { 0 cm }"
+"    leftcaption { Right shell nodes }"
+"{"
+"    @Data points { filledcircle }"
+"    { 10 1.97  50 2.01  100 2.00  200 2.0  500 2.00 }"
+""
+"    @Data points { filledcircle }"
+"    { 10 3.53  50 7.45  100 9.32  200 13.41  500 21.63 }"
+""
+"    @Data pairs { dashed }"
+"    { 10 2  500 2 }"
+""
+"    @Data pairs { dashed }"
+"    {"
+"        xloop from { 10 } to { 500 } by { 20 } do"
+"        {"
+"            x  sqrt { pi*x / 4 } + 1"
+"        }"
+"    }"
+"}"
+}
+The @Code "do" option of @Code xloop is replicated repeatedly with each
+occurrence of @Code x replaced by 10, 30, 50, ... up to 490.  The
+result is
+@FootNote { Source:  Jeffrey H. Kingston, Analysis of tree algorithms
+for the simulation event list.  @I { Acta Informatica } {@B 22},
+pp. 15--33 (1985). }
+@CD -2p @Font @Graph
+    style { axes }
+    xorigin { 0 }
+    yorigin { 0 }
+    width { 8 cm }
+    xticks { 10@ 50@ 100@ 200@ 500@ }
+    objects {
+       @NE at { 300 2 } @I { Exponential }
+       @SE at { 300 sqrt { pi*300/4 } + 1 } @I { Uniform }
+    }
+    belowcaption { @I n }
+    belowgap { 0 cm }
+    leftcaption { Right shell nodes }
+{
+    @Data points { filledcircle }
+    { 10 1.97  50 2.01  100 2.00  200 2.0  500 2.00 }
+
+    @Data points { filledcircle }
+    { 10 3.53  50 7.45  100 9.32  200 13.41  500 21.63 }
+
+    @Data pairs { dashed }
+    { 10 2  500 2 }
+
+    @Data pairs { dashed }
+    {
+        xloop from { 10 } to { 500 } by { 20 } do
+        {
+            x  sqrt { pi*x / 4 } + 1
+        }
+    }
+}
+The points are connected by straight line segments as usual, but a
+smallish @Code "by" option of about one-twentieth of the range creates
+the illusion of a smooth curve quite well.
+@PP
+There is also an @Code "if" symbol which produces alternative results,
+depending on whether a condition evaluates to @Code "true" or
+{@Code"false"}:
+@ID @OneRow @Code {
+"xloop from { -5 } to { +5 } by { 0.2 } do"
+"{"
+"    if cond { abs { x } > 0.1 } then { x 1/x } else {}"
+"}"
+}
+This plots the function @Eq { y = 1 "/" x }, skipping points near
+zero.  Actually the @Code "else" part could be omitted since its default
+value is empty.
+@PP
+Adventurous users might enjoy nesting a @Code "yloop" or @Code "zloop"
+within an {@Code "xloop"}, or using loops to generate ticks, like this:
+@ID @OneRow @Code {
+"xticks {"
+"    xloop from { 0 } to { 20 } do"
+"    {"
+"       x if cond { x mod 5 = 0 } then { @ }"
+"    }"
+"}"
+}
+The missing @Code "by" option defaults to 1, so this produces x ticks at
+0, 1, 2, ..., 20, with labels at 0, 5, 10, 15, and 20.  It is quite all
+right to mix @Code "@" and even labels in with numbers, as long as the
+final result obeys the rules of Section {@NumberOf ticks}.
+@PP
+You can define your own functions using Lout definitions, placed in your
+@Code "mydefs" file as explained in Section {@NumberOf definitions}.  Here
+is an example of a function definition:
+@ID @OneRow @Code {
+"import @Graph @Data"
+"def @Tan"
+"    precedence 40"
+"    right x"
+"{"
+"    sin x / cos x"
+"}"
+}
+This defines a function called @Code "@Tan" which implements the
+trigonometric tangent function.  It may then be used in expressions
+just like any other function:
+@ID @OneRow @Code {
+"@Data {"
+"    yloop from { 0 } to { 0.95 } by { 0.05 } do"
+"    {"
+"        y   @Tan { y / pi }"
+"    }"
+"}"
+}
+Following is a detailed explanation.
+@PP
+The first line, {@Code "import @Graph @Data"}, is the import clause.  Its
+function is to grant the definition access to the three previously defined
+functions (symbols) that it uses, namely {@Code "sin"}, {@Code "cos"},
+and {@Code "/"}.  These are found within the @Code "@Data" symbol within
+{@Code "@Graph"}.
+@PP
+After the import clause comes the @Code "def" keyword, meaning
+`define,' and then the name of the symbol being defined, in this case
+@Code "@Tan".  We have chosen @Code "@Tan" rather than @Code "tan"
+because symbols defined by the user in this way are visible throughout
+the document, and we do not want the literal word @Code "tan" to be
+taken as a symbol.
+@PP
+Next comes the symbol's precedence, in this case the same as @Code "sin" and
+@Code "cos" (see Section {@NumberOf dia_summ} for the precedence of
+each symbol).  Next is a list of the formal parameters, in this case
+just one, called {@Code "x"}, that is to be passed on the right.
+@PP
+Finally comes the body of the definition enclosed in braces.  When
+@Code "@Tan" is invoked, its value will be this body with each occurrence
+of the formal parameter @Code "x" replaced by the object following the
+@Code "@Tan" symbol.  For example, the @Code "do" option of the @Code
+"yloop" above becomes
+@ID @Code "y   sin { y / pi } / cos { y / pi }"
+as you would expect.
+@End @Section
diff --git a/doc/user/gra_intr b/doc/user/gra_intr
new file mode 100644
index 0000000..28dfd1b
--- /dev/null
+++ b/doc/user/gra_intr
@@ -0,0 +1,51 @@
+@Section
+   @Title { Introduction }
+   @Tag { grintro }
+@Begin
+@PP
+The Lout definitions for graph formatting are kept in a file called
+{@Code "graph"}, which you must include at the start of your document if
+graph.file @Index { @Code "graph" file }
+you want graphs, like this:
+@ID @OneRow @Code {
+"@SysInclude { graph }"
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"..."
+"@End @Text"
+}
+Setup files for specialized packages, such as {@Code "graph"}, should be
+included before the main setup file.  Once this is done, the @Code "@Graph"
+symbol used below will then be available for use anywhere within your document.
+@PP
+@Code "@Graph" distinguishes between the overall graph, produced by the
+@Code "@Graph" symbol itself, and the data sets to be placed within it,
+each of which is enclosed by a @Code "@Data" symbol:
+@ID @OneRow @Code {
+"@CentredDisplay @Graph"
+"{"
+"    @Data  points { plus }"
+"    { 1 1.10  2 1.21  3 1.33  4 1.46  5 1.61  6 1.77  7 1.95  8 2.14 }"
+""
+"    @Data  points { circle }"
+"    { 1 1.20  2 1.44  3 1.73  4 2.07  5 2.45  6 2.99  7 3.58  8 4.30 }"
+"}"
+}
+Although it is good practice to lay the input data out neatly, layout
+has no effect on the result.  It is not necessary to have one data point
+per line, for example.  The result of this example is
+@CentredDisplay @Graph
+{
+    @Data
+        points { plus }
+    { 1 1.10  2 1.21  3 1.33  4 1.46  5 1.61  6 1.77  7 1.95  8 2.14 }
+
+    @Data
+        points { circle }
+    { 1 1.20  2 1.44  3 1.73  4 2.07  5 2.45  6 2.99  7 3.58  8 4.30 }
+}
+We have used the @Code "@CentredDisplay" symbol from Section
+{@NumberOf displays} to produce a centred display, but the
+@Code "@Graph" symbol produces an object which may appear anywhere
+at all -- in a figure, for example, or as an entry in a table.
+@End @Section
diff --git a/doc/user/gra_keys b/doc/user/gra_keys
new file mode 100644
index 0000000..089139a
--- /dev/null
+++ b/doc/user/gra_keys
@@ -0,0 +1,104 @@
+@Section
+   @Title { Adding a key to the graph }
+   @Tag { key }
+@Begin
+@PP
+A @I key to a graph is an explanation of what each data set
+key. @Index { key in graph }
+represents.  To assist you in constructing a key, some extra symbols
+are provided in addition to {@Code "@Graph"}:
+graph.cross @Index @Code "@GraphCross"
+graph.plus @Index @Code "@GraphPlus"
+graph.square @Index @Code "@GraphSquare"
+graph.filled.square @Index @Code "@GraphFilledSquare"
+graph.diamond @Index @Code "@GraphDiamond"
+graph.filled.diamond @Index @Code "@GraphFilledDiamond"
+graph.circle @Index @Code "@GraphCircle"
+graph.filled.circle @Index @Code "@GraphFilledCircle"
+graph.triangle @Index @Code "@GraphTriangle"
+graph.filled.triangle @Index @Code "@GraphFilledTriangle"
+graph.noline @Index @Code "@GraphNoLine"
+graph.solid @Index @Code "@GraphSolid"
+graph.dashed @Index @Code "@GraphDashed"
+graph.dotted @Index @Code "@GraphDotted"
+@ID @Tab
+    @Fmta { @Col @Code A ! @Col B ! @Col @Code C ! @Col D }
+{
+@Rowa
+    A { "@GraphCross" }
+    B { @GraphCross }
+    C { "@GraphPlus" }
+    D { @GraphPlus }
+@Rowa
+    A { "@GraphSquare" }
+    B { @GraphSquare }
+    C { "@GraphFilledSquare" }
+    D { @GraphFilledSquare }
+@Rowa
+    A { "@GraphDiamond" }
+    B { @GraphDiamond }
+    C { "@GraphFilledDiamond" }
+    D { @GraphFilledDiamond }
+@Rowa
+    A { "@GraphCircle" }
+    B { @GraphCircle }
+    C { "@GraphFilledCircle" }
+    D { @GraphFilledCircle }
+@Rowa
+    A { "@GraphTriangle" }
+    B { @GraphTriangle }
+    C { "@GraphFilledTriangle" }
+    D { @GraphFilledTriangle }
+@Rowa
+@Rowa
+    A { "@GraphNoLine" }
+    B { @GraphNoLine }
+@Rowa
+    A { "@GraphSolid" }
+    B { @GraphSolid }
+@Rowa
+    A { "@GraphDashed" }
+    B { @GraphDashed }
+@Rowa
+    A { "@GraphDotted" }
+    B { @GraphDotted }
+}
+These extra symbols may be used anywhere in your document except within
+the right parameter of {@Code "@Graph"}; they are commonly used within
+the caption options of {@Code "@Graph"}:
+@ID @OneRow @Code {
+"@Graph"
+"    rightcaption {"
+"@GraphPlus @GraphSolid @GraphPlus  Boston"
+"@GraphPlus @GraphDashed @GraphPlus  New York"
+"@GraphPlus @GraphDotted @GraphPlus  Philadelphia"
+"}"
+}
+Recall that unlike the other captions, @Code rightcaption is set using
+the @Code "lines @Break" style rather than {@Code "clines @Break"}
+(Section {@NumberOf captions}).  Adding this caption to the graph
+from Section {@NumberOf data}, the complete result is
+@CD @Graph
+    rightcaption {
+@GraphPlus @GraphSolid @GraphPlus  Boston
+@GraphPlus @GraphDashed @GraphPlus  New York
+@GraphPlus @GraphDotted @GraphPlus  Philadelphia
+}
+{
+    @Data  points { plus }  pairs { solid }
+    { 1720 12000  1730 13000  1740 15601  1760 15631  1770 15877 }
+
+    @Data  points { plus }  pairs { dashed }
+    { 1720 7000  1730 8622  1740 10451  1750 14255  1760 18000  1770 22667 }
+
+    @Data  points { plus }  pairs { dotted }
+    { 1720 10000  1730 11500  1740 12654  1750 18202  1760 23750  1770 34583 }
+
+}
+The first eight symbols have a @Code "symbolsize" option with the
+usual meaning and the usual default value ({@Code "0.15 ft"}).  The
+last four symbols have @Code "dashlength" and @Code "linewidth" options
+with the usual default values, {@Code "0.2 ft"} and {@Code "0.5 pt"}
+respectively, and a @Code "length" option, which determines the length
+of the line drawn by each symbol; its default value is {@Code "1.0 ft"}.
+@End @Section
diff --git a/doc/user/gra_over b/doc/user/gra_over
new file mode 100644
index 0000000..1b9653a
--- /dev/null
+++ b/doc/user/gra_over
@@ -0,0 +1,179 @@
+@Section
+   @Title { Changing the overall appearance of the graph }
+   @Tag { overall }
+@Begin
+@PP
+The overall appearance of the graph is controlled by options to the
+@Code "@Graph" symbol.  As usual, these options follow the @Code "@Graph"
+symbol, with their values enclosed in braces; they may appear in any order,
+and if omitted are assigned some sensible default value.
+@PP
+There is a @Code "style" option for controlling the overall style of the
+style.graph @Index { @Code "style" option of @Code "@Graph" }
+axes. @Index { axes in graphs }
+graph, whose value may be either {@Code "frame"}, {@Code "none"},
+or {@Code "axes"}.  The default value is {@Code "frame"}, and it produces
+a frame around the graph with ticks and labels along its left and bottom
+edges, as in previous examples.  The {@Code "none"} style prints
+nothing (no frame, no ticks, no labels), which is useful for producing
+graphs that don't look like graphs, as it were.
+@PP
+If the other value, {@Code "axes"}, is chosen, two other options called
+{@Code xorigin} and {@Code yorigin} become compulsory:
+@ID @OneRow @Code {
+"-2p @Font @Graph"
+"    style { axes }"
+"    xorigin { 0 }"
+"    yorigin { 0 }"
+"    width { 12 cm }"
+"    height { 7 cm }"
+"    leftcaption { 90d @Rotate { counts (%) } }"
+"    leftgap { 1.0 cm }"
+"    belowcaption { time (min) }"
+"    belowgap { 0 cm }"
+"{"
+"    @Data"
+"        points { filledsquare }"
+"        pairs { solid }"
+"    { 0 0.0 1 4.8 2 7.0 3 15.2 4 19.8 5 20.0 6 21.0 7 25.0"
+"      10 29.5 15 31.2 20 35.0 30 40.0 60 50.8"
+"    }"
+""
+"    @Data"
+"        points { square }"
+"        pairs { solid }"
+"    {"
+"      0 0.0 1 3.7 1.5 43.1 2 99.1 3 85.6 4 69.1 5 47.0 6 44.1 7 40.8"
+"      10 35.0 15 29.4 20 25.0 30 21.1 60 15.5"
+"    }"
+"}"
+}
+We have requested a smaller font size for this graph as a whole by
+preceding it with {@Code "-2p @Font"}, meaning two points smaller, and
+we have used some other options which will be explained shortly.  The
+resulting graph has an x axis and a y axis instead of a frame, like this:
+@CD -2p @Font @Graph
+    style { axes }
+    xorigin { 0 }
+    yorigin { 0 }
+    width { 12 cm }
+    height { 7 cm }
+    leftcaption { 90d @Rotate { counts (%) } }
+    leftgap { 1.0 cm }
+    belowcaption { time (min) }
+    belowgap { 0 cm }
+{
+    @Data
+        points { filledsquare }
+        pairs { solid }
+    { 0 0.0 1 9.5 2 15.0 3 18.2 4 20.1 5 22.1 7 25.0
+      10 28.3 15 31.2 20 35.0 30 40.0 60 50.8
+    }
+
+    @Data
+        points { square }
+        pairs { solid }
+    {
+      0 0.0 1 3.7 1.5 43.1 2 99.1 3 85.6 4 69.1 5 47.0 6 44.1 7 40.8
+      10 35.0 15 29.4 20 25.0 30 21.1 60 15.5
+    }
+}
+The point where the axes cross is ({@Code xorigin}, {@Code yorigin}).
+@PP
+Although @Code "@Graph" does not provide explicit support for
+multiple axes, you can simulate them by overstriking two
+separate graphs of equal size.  There is an @Code "@OverStrike"
+overstrike. @Index @Code "@OverStrike"
+symbol which overstrikes two objects, so
+@ID @Code "@Graph { ... } @OverStrike @Graph { ... }"
+will do the job.  Typically one of the graphs would have y ticks,
+and the other would have r ticks (adjacent to the right-hand side of the
+frame).
+@PP
+There are @Code "xlog" and @Code "ylog" options which produce
+logarithmic.axes @Index { logarithmic axes in graphs }
+logarithmic x and y axes:
+@ID @OneRow @Code {
+"@Graph"
+"    xlog { 10 }"
+"    ylog { 10 }"
+"{"
+"    ..."
+"}"
+}
+The value is the base of the logarithm, usually 10 or 2, or
+{@Code none} (the default) meaning not logarithmic.  Logarithms
+to different bases differ only by a constant factor, so the main effect
+of different bases is on the choice of ticks and labels.  An @Code "xlog"
+option will be ignored if there are any negative or zero x data points,
+x ticks, or {@Code "xorigin"} or {@Code "xmin"} options; and similarly
+for {@Code "ylog"}.
+@PP
+There are @Code "width" and @Code "height" options for setting the size
+of the total area enclosed:
+@ID @OneRow @Code {
+"@Graph"
+"    width { 6.0 cm }"
+"    height { 4.0 cm }"
+"{"
+"    ..."
+"}"
+}
+This shows the default width and height, six centimetres and four
+centimetres.  These lengths and others discussed below can be specified
+using a variety of units of measurement (see Section {@NumberOf grsummary}
+for the details).
+@PP
+Within the frame or axes, a small margin is kept free of data points.  The
+size of this margin is controlled by @Code "xextra" and @Code "yextra"
+options:
+@ID @OneRow @Code {
+"@Graph"
+"    xextra { 0.5 cm }"
+"    yextra { 0.5 cm }"
+"{"
+"    ..."
+"}"
+}
+Setting @Code "xextra" to @Code "0.5 cm" (the default value if the
+@Code style option is {@Code frame}) means that the smallest x value
+will be placed 0.5 centimetres to the right of the left boundary, and
+the largest will be placed 0.5 centimetres to the left of the right
+boundary.  It is quite safe to set @Code "xextra" to @Code "0 cm" if
+desired, and indeed this is the default value when @Code style is
+{@Code axes} or {@Code none}.  The @Code "yextra" option works in
+exactly the same way for y values.
+@PP
+The @Code "xdecreasing" option plots the x values in decreasing order
+instead of increasing:
+@ID @Code {
+"@Graph"
+"    xdecreasing { yes }"
+"    abovecaption { New South Wales road deaths, 1960--1990"
+"(fatalities per 100 million vehicle km) }"
+"{"
+"    @Data"
+"        points { plus }"
+"        pairs { dashed }"
+"    {"
+"        1963 5.6  1971 4.3  1976 3.7  1979 3.4  1982 2.9  1985 2.3  1988 2.0"
+"    }"
+"}"
+}
+produces
+@CD @Graph
+    xdecreasing { yes }
+    abovecaption { New South Wales road deaths, 1960--1990
+(fatalities per 100 million vehicle km) }
+{
+    @Data
+        points { plus }
+        pairs { dashed }
+    {
+        1963 5.6  1971 4.3  1976 3.7  1979 3.4  1982 2.9  1985 2.3  1988 2.0
+    }
+}
+The value of @Code "xdecreasing" should be either @Code "no" (the default
+value) or {@Code "yes"}.  A similar @Code "ydecreasing" option does the same
+thing to the y axis.
+@End @Section
diff --git a/doc/user/gra_plac b/doc/user/gra_plac
new file mode 100644
index 0000000..7084eb2
--- /dev/null
+++ b/doc/user/gra_plac
@@ -0,0 +1,51 @@
+@Section
+   @Title { Placing arbitrary objects on the graph }
+   @Tag { arbobj }
+@Begin
+@PP
+As we have just seen, the repertoire of symbols that @Code "@Data" is
+able to place on the graph is quite limited.  However, there is a way
+to place any number of arbitrary Lout objects anywhere on the graph,
+using the @Code objects option to the @Code "@Graph" symbol:
+@ID @OneRow @Code {
+"@Graph"
+"    objects {"
+"        @CTR at {2.5  6.0}  @Eq { y = x sup 2 }"
+"        @CTR at {4.5  7.0}  @Eq { y = x sup 3 }"
+"    }"
+}
+where we have used the @Code "@Eq" symbol from Chapter {@NumberOf equations}
+twice to place two equations onto the graph at the points {@Code "2.5  6.0"}
+and {@Code "4.5 7.0"} respectively.  An example result appears in the next
+section.
+@PP
+In addition to {@Code "@CTR"}, there are eight other symbols which may
+be used within the @Code "objects" option in the same way:  {@Code "@NW"},
+{@Code "@SW"}, {@Code "@SE"}, {@Code "@NE"}, {@Code "@N"}, {@Code "@W"},
+{@Code "@S"}, and {@Code "@E"}.  These place the object just to the
+northwest of the point, to the southwest, and so on instead of centring
+it over the point.  By `to the northwest' we mean that the object's bottom
+right corner coincides with the point, and similarly for the other symbols.
+@PP
+Each of these symbols has a @Code "margin" option which enlarges the
+object by adding a margin around it before placing it:
+@ID @Code "@NW at {2.5  6.0} margin { 0.3 ft }  @Eq { y = x sup 2 }"
+shows the default value, 0.3 times the current font size.  As the margin
+is increased, the object moves further away from the point.
+@PP
+The major advantage of the @Code "objects" option over the @Code "@Data"
+symbol is that arbitrary Lout objects may be used.  The @Code "@Data"
+symbol however is able to place many copies of its symbols onto the graph,
+and also allow for them when connecting points together with lines.  Also,
+the points within the @Code "objects" option are not taken into account
+when deciding on the permissible range of x and y values, whereas the
+points within the @Code "@Data" symbol are.  Altogether it seems best
+to use the @Code "@Data" symbol for the bulk of the data points, and to
+use the @Code "objects" option for adding a small number of labels or
+other decorations.
+@PP
+The @Code "objects" option may contain @Code "@Graph" symbols, but in
+that case, owing to a deficiency in the implementation, those symbols
+will need to have their @Code save options (Section {@NumberOf grerrors})
+set to {@Code yes}.
+@End @Section
diff --git a/doc/user/gra_summ b/doc/user/gra_summ
new file mode 100644
index 0000000..ea074b9
--- /dev/null
+++ b/doc/user/gra_summ
@@ -0,0 +1,466 @@
+@Section
+   @Title { Summary }
+   @Tag { grsummary }
+@Begin
+@PP
+The options to the @Code "@Graph" symbol, their default values, and
+their possible values are:
+@ID -2.1px @Break -1p @Font @Tab
+   hmargin { 0.15c }
+   @Fmta { @Col @Code { "    "A } ! @Col @Code "{" ! @Col @Code B !
+	   @Col @Code "}" ! @Col ! @Col ! @Col C }
+   @Fmtb { @Col @Code A ! @Col ! @Col ! @Col ! @Col ! @Col ! @Col }
+{
+@Rowb
+    A { "@Graph" }
+@Rowa
+    A { style }
+    B { frame }
+    C { {@Code frame}, {@Code axes}, or {@Code none} }
+@Rowa
+    A { width }
+    B { 6.0 cm }
+    C { any @I distance }
+@Rowa
+    A { height }
+    B { 4.0 cm }
+    C { any @I distance }
+@Rowa
+    A { xextra }
+    B { 0.5 cm }
+    C { any @I distance ({@Code axes} and {@Code none} default is {@Code "0 cm"}) }
+@Rowa
+    A { yextra }
+    B { 0.5 cm }
+    C { any @I distance ({@Code axes} and {@Code none} default is {@Code "0 cm"}) }
+@Rowa
+    A { xdecreasing }
+    B { no }
+    C { @Code yes or @Code no }
+@Rowa
+    A { ydecreasing }
+    B { no }
+    C { @Code yes or @Code no }
+@Rowa
+    A { leftcaption }
+    B { }
+    C { any Lout object }
+@Rowa
+    A { rightcaption }
+    B { }
+    C { any Lout object }
+@Rowa
+    A { abovecaption }
+    B { }
+    C { any Lout object }
+@Rowa
+    A { belowcaption }
+    B { }
+    C { any Lout object }
+@Rowa
+    A { leftgap }
+    B { 1.5 cm }
+    C { any @I distance }
+@Rowa
+    A { rightgap }
+    B { 0.5 cm }
+    C { any @I distance }
+@Rowa
+    A { abovegap }
+    B { 0.5 cm }
+    C { any @I distance }
+@Rowa
+    A { belowgap }
+    B { 0.5 cm }
+    C { any @I distance }
+@Rowa
+    A { hidecaptions }
+    B { yes }
+    C { @Code yes or @Code no }
+@Rowa
+    A { xorigin }
+    B { none }
+    C { {@Code none} or any @I number }
+@Rowa
+    A { yorigin }
+    B { none }
+    C { {@Code none} or any @I number }
+@Rowa
+    A { xlog }
+    B { none }
+    C { {@Code none} or any @I number greater than 1 }
+@Rowa
+    A { ylog }
+    B { none }
+    C { {@Code none} or any @I number greater than 1 }
+@Rowa
+    A { xmin }
+    B { none }
+    C { @Code none or any {@I number} }
+@Rowa
+    A { xmax }
+    B { none }
+    C { @Code none or any {@I number} }
+@Rowa
+    A { ymin }
+    B { none }
+    C { @Code none or any {@I number} }
+@Rowa
+    A { ymax }
+    B { none }
+    C { @Code none or any {@I number} }
+@Rowa
+    A { xticksep }
+    B { none }
+    C { {@Code none} or any @I number greater than 0 }
+@Rowa
+    A { yticksep }
+    B { none }
+    C { {@Code none} or any @I number greater than 0 }
+@Rowa
+    A { rticksep }
+    B { none }
+    C { {@Code none} or any @I number greater than 0 }
+@Rowa
+    A { xticks }
+    B { auto  }
+    C { @I sequence (of numbers and strings), or @Code auto meaning
+automatic }
+@Rowa
+    A { yticks }
+    B { auto }
+    C { @I sequence (of numbers and strings), or @Code auto meaning
+automatic }
+@Rowa
+    A { rticks }
+    B { }
+    C { @I sequence (of numbers and strings), or @Code auto meaning
+automatic }
+@Rowa
+    A { xticklength }
+    B { 0.5 ft }
+    C { any @I distance }
+@Rowa
+    A { yticklength }
+    B { 0.5 ft }
+    C { any @I distance }
+@Rowa
+    A { rticklength }
+    B { 0.5 ft }
+    C { any @I distance }
+@Rowa
+    A { objects }
+    B { }
+    C { sequence of {@Code "@CTR"}, {@Code "@NW"}, {@Code "@SW"}, {@Code "@SE"},
+{@Code "@NE"}, {@Code "@N"}, {@Code "@W"}, {@Code "@S"}, {@Code "@E"} symbols }
+@Rowa
+    A { points }
+    B { none }
+    C { {@Code none}, {@Code plus}, {@Code cross}, {@Code square},
+{@Code filledsquare}, {@Code diamond}, {@Code filleddiamond},
+{@Code circle}, {@Code filledcircle}, {@Code triangle}, {@Code filledtriangle} }
+@Rowa
+    A { pairs }
+    B { none }
+    C { {@Code none}, {@Code solid}, {@Code dashed}, {@Code dotted},
+{@Code yhisto}, {@Code xhisto}, {@Code filledyhisto}, {@Code filledxhisto},
+{@Code surfaceyhisto}, {@Code surfacexhisto} }
+@Rowa
+    A { "colour/color" }
+    B { none }
+    C { {@Code none} or any colour name from Section {@NumberOf colour}}
+@Rowa
+    A { paint }
+    B { no }
+    C { {@Code no} or {@Code yes} }
+@Rowa
+    A { dataformat }
+    B { xandy }
+    C { {@Code xandy}, {@Code yonly}, {@Code xonly} }
+@Rowa
+    A { dashlength }
+    B { 0.2 ft }
+    C { any @I distance }
+@Rowa
+    A { linewidth }
+    B { 0.5 pt }
+    C { any @I distance }
+@Rowa
+    A { symbolsize }
+    B { 0.15 ft }
+    C { any @I distance }
+}
+@I Number means an ordinary decimal number; @I distance means a number
+followed by at least one space followed by any one of the following
+units of measurement:
+@ID @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col @Code A ! @Col B }
+{
+@Rowa
+    A { cm }
+    B { centimetres }
+@Rowa
+    A { in }
+    B { inches }
+@Rowa
+    A { em }
+    B { Ems (12 ems = 1 inch) }
+@Rowa
+    A { pt }
+    B { Points (72 points = 1 inch) }
+@Rowa
+    A { ft }
+    B { @Code "1 ft" is the size of the current font }
+@Rowa
+    A { sp }
+    B { @Code "1 sp" is the width of the space character in the current font }
+@Rowa
+    A { vs }
+    B { @Code "1 vs" is the current inter-line spacing }
+}
+In general, numbers denote x or y values while distances denote lengths
+on the printed result.
+@PP
+The minimum plottable x value is the minimum of all the x data,
+{@Code xticks}, {@Code xorigin}, {@Code xmin}, and {@Code xmax} whenever
+these are not {@Code none}.  If @Code xticks is {@Code none}, this
+minimum may be reduced further to a `round' number.  The maximum plottable
+x value is the maximum of the same values, and it may be increased further
+if {@Code xticks} is {@Code none}.  Similar remarks apply to y values.
+@PP
+The value of the @Code "objects" option is a sequence of zero or more of
+the following:
+@ID @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col A ! @Col { @Code "at {" @I expression @I expression
+@Code "}" } ! @Col @I object }
+{
+@Rowa A { @Code "@CTR" }
+@Rowa A { @Code "@NW"  }
+@Rowa A { @Code "@SW"  }
+@Rowa A { @Code "@SE"  }
+@Rowa A { @Code "@NE"  }
+@Rowa A { @Code "@N"   }
+@Rowa A { @Code "@W"   }
+@Rowa A { @Code "@S"   }
+@Rowa A { @Code "@E"   }
+}
+where @I object is an arbitrary Lout object.  Each of these nine symbols
+also has a @Code "margin" option whose value may be any non-negative
+distance, with default value {@Code "0.3 ft"}.
+@PP
+The options to the @Code "@Data" symbol, their default values, and
+their possible values are:
+@ID 0.85vx @Break @Tab
+   hmargin { 0.15c }
+   @Fmta { @Col @Code { "    "A } ! @Col @Code "{" ! @Col @I inherited !
+	   @Col @Code "}" ! @Col ! @Col ! @Col C }
+   @Fmtb { @Col A ! @Col ! @Col ! @Col ! @Col ! @Col ! @Col }
+{
+@Rowb
+    A { @Code "@Data" }
+@Rowa
+    A { points }
+    C { {@Code none}, {@Code plus}, {@Code cross}, {@Code square},
+{@Code filledsquare}, {@Code diamond}, {@Code filleddiamond},
+{@Code circle}, {@Code filledcircle},
+{@Code triangle}, {@Code filledtriangle} }
+@Rowa
+    A { pairs }
+    C { {@Code none}, {@Code solid}, {@Code dashed}, {@Code dotted},
+{@Code yhisto}, {@Code xhisto}, {@Code filledyhisto}, {@Code filledxhisto},
+{@Code surfaceyhisto}, {@Code surfacexhisto} }
+@Rowa
+    A { "colour/color" }
+    C { {@Code none}, or any colour name from Section {@NumberOf colour} }
+@Rowa
+    A { paint }
+    C { {@Code no} or {@Code yes} }
+@Rowa
+    A { dataformat }
+    C { {@Code xandy}, {@Code yonly}, {@Code xonly} }
+@Rowa
+    A { dashlength }
+    C { any @I distance }
+@Rowa
+    A { linewidth }
+    C { any @I distance }
+@Rowa
+    A { symbolsize }
+    C { any @I distance }
+@Rowb
+    A { @Code "{" @I sequence @Code "}" }
+    C { any @I sequence }
+}
+@I Inherited means that the default value is taken from the
+@Code "@Graph" option with the same name.
+@PP
+The right parameter of @Code "@Data" contains a @I sequence of zero
+or more {@I expressions}.  The {@Code xticks}, {@Code yticks}, and
+{@Code rticks} options also are sequences, which may contain @Code "@"
+and labels as well as expressions.  An @I expression is any of the
+following (operators are shown in decreasing precedence order, with
+the precedence, if relevant, at right):
+@ID @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col A ! @Col ! @Col B }
+{
+@Rowa
+    A { @I number }
+@Rowa
+    A { @Code x   (within @Code xloop only) }
+@Rowa
+    A { @Code y   (within @Code yloop only) }
+@Rowa
+    A { @Code z   (within @Code zloop only) }
+@Rowa
+    A { @Code pi }
+@Rowa
+    A { @Code e }
+@Rowa
+    A { @Code "{" @I expression @Code "}" }
+@Rowa
+    A { @Code "sqrt" @I expression }
+    B { 40 }
+@Rowa
+    A { @Code "abs" @I expression }
+    B { 40 }
+@Rowa
+    A { @Code "ceiling" @I expression }
+    B { 40 }
+@Rowa
+    A { @Code "floor" @I expression }
+    B { 40 }
+@Rowa
+    A { @Code "truncate" @I expression }
+    B { 40 }
+@Rowa
+    A { @Code "round" @I expression }
+    B { 40 }
+@Rowa
+    A { @Code "cos" @I expression }
+    B { 40 }
+@Rowa
+    A { @Code "sin" @I expression }
+    B { 40 }
+@Rowa
+    A { @I expression @Code "atan" @I expression }
+    B { 39 }
+@Rowa
+    A { @I expression @Code "exp" @I expression }
+    B { 38 }
+@Rowa
+    A { @I expression @Code "log" @I expression }
+    B { 37 }
+@Rowa
+    A { @I expression @Code "rand" @I expression }
+    B { 36 }
+@Rowa
+    A { @I expression @Eq { non * } @I expression }
+    B { 35 }
+@Rowa
+    A { @I expression @Code "/" @I expression }
+    B { 34 }
+@Rowa
+    A { @I expression @Code "idiv" @I expression }
+    B { 34 }
+@Rowa
+    A { @I expression @Code "mod" @I expression }
+    B { 34 }
+@Rowa
+    A { @I expression @Eq { non - } @I expression }
+    B { 33 }
+@Rowa
+    A { @Eq { non - } @I expression }
+    B { 33 }
+@Rowa
+    A { @I expression @Code "+" @I expression }
+    B { 32 }
+@Rowa
+    A { @Code "+" @I expression }
+    B { 32 }
+@Rowa
+   A { @Code "if cond {" @I boolean @Code "} then {" @I expression
+@Code "} else {" @I expression @Code "}" }
+}
+A @Eq { non - } immediately followed by a digit or decimal point is
+always taken to be a minus sign, never a subtraction.  The left
+parameter of @Code "exp" and @Code "log" is the base of the
+exponentiation and logarithm respectively; @Code "idiv" is integer
+division; and @Code "rand" returns a uniform random integer lying between
+its two parameters (inclusive).  Now a @I sequence is zero or more of
+the following:
+@ID @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col A }
+{
+@Rowa
+   A { 2c @Wide "@" (within {@Code xticks}, {@Code yticks}, and {@Code rticks} only) }
+@Rowa
+   A { 2c @Wide { ({@I label}) } (within {@Code xticks}, {@Code yticks}, and {@Code rticks} only) }
+@Rowa
+   A { @I expression }
+@Rowa
+   A { @Code "xloop from {" @I expression @Code "} to {" @I expression
+@Code "} by {" @I expression @Code "} do {" @I sequence @Code "}" }
+@Rowa
+   A { @Code "yloop from {" @I expression @Code "} to {" @I expression
+@Code "} by {" @I expression @Code "} do {" @I sequence @Code "}" }
+@Rowa
+   A { @Code "zloop from {" @I expression @Code "} to {" @I expression
+@Code "} by {" @I expression @Code "} do {" @I sequence @Code "}" }
+@Rowa
+   A { @Code "if cond {" @I boolean @Code "} then {" @I sequence
+@Code "} else {" @I sequence @Code "}" }
+}
+The @Code "by" part of the loop symbols is optional with default
+value 1; the @Code "else" part of @Code "if" is optional with
+default value equal to the empty sequence.  A @I boolean is any one of
+the following things, again shown in decreasing precedence order, with
+the precedence at right:
+@ID @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col A ! @Col ! @Col B }
+{
+@Rowa
+    A { @Code true }
+@Rowa
+    A { @Code false }
+@Rowa
+    A { @Code "{" @I boolean @Code "}" }
+@Rowa
+    A { @I expression @Code = @I expression }
+    B { 30 }
+@Rowa
+    A { @I expression @Code != @I expression }
+    B { 30 }
+@Rowa
+    A { @I expression @Code < @I expression }
+    B { 30 }
+@Rowa
+    A { @I expression @Code <= @I expression }
+    B { 30 }
+@Rowa
+    A { @I expression @Code > @I expression }
+    B { 30 }
+@Rowa
+    A { @I expression @Code >= @I expression }
+    B { 30 }
+@Rowa
+    A { @Code not @I boolean }
+    B { 25 }
+@Rowa
+    A { @I boolean @Code and @I boolean }
+    B { 24 }
+@Rowa
+    A { @I boolean @Code xor @I boolean }
+    B { 23 }
+@Rowa
+    A { @I boolean @Code or @I boolean }
+    B { 22 }
+@Rowa
+   A { @Code "if cond {" @I boolean @Code "} then {" @I boolean
+@Code "} else {" @I boolean @Code "}" }
+}
+@End @Section
diff --git a/doc/user/gra_tick b/doc/user/gra_tick
new file mode 100644
index 0000000..f6079cf
--- /dev/null
+++ b/doc/user/gra_tick
@@ -0,0 +1,205 @@
+@Section
+   @Title { Ticks and labels }
+   @Tag { ticks }
+@Begin
+@PP
+@I Ticks are the short lines that mark off intervals along the axes, and
+ticks.graph @Index { ticks in graphs }
+labels.graph @Index { labels in graphs }
+@I labels are the numbers appearing near the ticks (not to be confused
+with captions).  {@Code "@Graph"} produces ticks and labels automatically
+with some care, so it is probably best not to worry about them unless the
+result is not pleasing, in which case there are options for controlling them.
+@PP
+One simple way to control the production of x ticks is with the
+{@Code xmin}, {@Code xmax}, and {@Code xticksep} options to @Code
+"@Graph".  For example,
+@ID @OneRow @Code {
+"@Graph"
+"    xmin { 0 }"
+"    xmax { 5 }"
+"    xticksep { 0.5 }"
+}
+specifies that x values in the range 0 to 5 are to be expected, and that
+a tick and label is to appear every 0.5 units along the x axis.  One or
+both of @Code "xmin" and @Code "xmax" may be omitted, in which case
+suitable values will be inferred from the data as usual.
+@PP
+Alternatively, complete control over the appearance of x ticks and labels
+is provided by the @Code "xticks" option.  For example,
+xticks.graph @Index { @Code "xticks" option to @Code "@Graph" }
+@ID @OneRow @Code {
+"@Graph"
+"    xticks { 0@  5  10@  15  20@ }"
+}
+specifies that x ticks are to be drawn at 0, 5, 10, 15, and 20.  An
+@Code "@" following a number indicates that a label is to be printed as
+well, so the above example will produce labels at 0, 10, and 20.  For
+even finer control, @Code "@" may be replaced by a label enclosed
+in parentheses:
+@ID @OneRow @Code {
+"@Graph"
+"    xticks { 1 (Democrat)  2 (Republican)  3 (Other) }"
+}
+As this example shows, a label does not have to be a number; it can be
+any string of characters, including spaces and balanced parentheses;
+but it may not be an arbitrary Lout object.
+@PP
+The character @Code "^" in a label indicates that the
+remainder is to be treated as an exponent:
+@ID @OneRow @Code {
+"@Graph"
+"    xlog { 10 }"
+"    xticks { 1 (1)  10 (10)  100 (10^2)  1000 (10^3)  10000 (10^4)  100000 (10^5) }"
+"{"
+"    @Data points { plus }"
+"    { 1 2.1  10 3.4  100 4.9  1000 6.1  10000 7.2  100000 7.6 }"
+"}"
+}
+In fact, the labels inserted automatically when @Code xticks is omitted have
+exponents when the axis is logarithmic, so @Code xticks is hardly necessary
+in this example.  Anyway the result is
+@CD @Graph
+    height { 3 cm }
+    xlog { 10 }
+    xticks { 1 (1)  10 (10)  100 (10^2)  1000 (10^3)  10000 (10^4)  100000 (10^5) }
+{
+    @Data points { plus }
+    {
+        1 2.1  10 3.4  100 4.9  1000 6.1  10000 7.2  100000 7.6
+    }
+}
+Setting @Code "xticks" to empty produces no x ticks (this is not the
+same as omitting {@Code xticks}).
+@PP
+Similar options control ticks and labels on the y axis:  {@Code "ymin"},
+{@Code "ymax"}, {@Code "yticksep"}, and {@Code "yticks"}.  There are
+yticks.graph @Index { @Code "yticks" option to @Code "@Graph" }
+also @Code "xticklength" and @Code "yticklength" options which set
+the length of ticks:
+@ID @OneRow @Code {
+"@Graph"
+"    xticklength { 0.5 ft }"
+"    yticklength { 0.5 ft }"
+}
+shows the default values, half the current font size in both cases.
+@PP
+There is also an {@Code "rticks"} option which is similar to
+{@Code "yticks"} except that the ticks it controls appear on the
+right-hand side of the frame (this option is relevant only when
+the @Code style option is {@Code frame}).  Unlike @Code "xticks" and
+{@Code "yticks"}, {@Code "rticks"} has empty default value, which is
+why you don't usually see r ticks.  They are most useful when overstriking
+two graphs using @Code "@OverStrike" as explained earlier; one graph will
+have y ticks in the usual way, the other will have r ticks and empty
+y ticks:
+@CD {
+
+@Graph
+    style { frame }
+    width { 6c }
+    height { 8c }
+    xextra { 0 cm }
+    yextra { 0 cm }
+    rightcaption { -90d @Rotate { Precipitation mm } }
+    rightgap { 3.0f }
+    hidecaptions { no }
+    xmin { 0 }
+    xmax { 12 }
+    ymin { 0 }
+    ymax { 450 }
+    xticks { }
+    xticklength { 0 cm }
+    rticks { 0@ 50@ 100@ 150@ 200@ 250@ 300@ 350@ 400@ 450@ }
+    yticks {}
+{
+    @Data
+	pairs { filledyhisto }
+	colour { blue }
+	linewidth { 1 pt }
+    {
+	0 340
+	1 410
+	2 430
+	3 340
+	4 290
+	5 175
+	6 140
+	7 125
+	8 110
+	9 100
+	10 85
+	11 175
+	12 0
+    }
+}
+
+@OverStrike
+
+@Graph
+    style { frame }
+    width { 6c }
+    height { 8c }
+    xextra { 0 cm }
+    yextra { 0 cm }
+    leftcaption { 90d @Rotate { Temperature {@Degree}C } }
+    leftgap { 2.5f }
+    hidecaptions { no }
+    xmin { 0 }
+    xmax { 12 }
+    ymin { -30 }
+    ymax { 50 }
+    xticks {
+        0.5 (J)
+        1.5 (F)
+        2.5 (M)
+        3.5 (A)
+        4.5 (M)
+        5.5 (J)
+        6.5 (J)
+        7.5 (A)
+        8.5 (S)
+        9.5 (O)
+       10.5 (N)
+       11.5 (D)
+    }
+    xticklength { 0 cm }
+    yticks { -30@ -20@ -10@ 0@ 10@ 20@ 30@ 40@ }
+{
+    @Data
+	pairs { solid }
+	colour { red }
+	linewidth { 1 pt }
+    {
+        0.0 24
+        1.0 24
+        2.0 25
+        3.0 26
+        4.0 26
+        5.0 26
+        6.0 26
+        7.0 27
+        8.0 26
+        9.0 27
+       10.0 28
+       11.0 28
+       12.0 26
+    }
+}
+
+}
+Here the first graph has
+@ID @Code {
+"rticks { 0@ 50@ 100@ 150@ 200@ 250@ 300@ 350@ 400@ 450@ }"
+"yticks {}"
+}
+for its ticks.
+@PP
+Lout has only a hazy idea of how much space is occupied by ticks and
+labels.  Unless @Code "xticks" is empty, Lout allows 1.7 times the
+current font size below the graph for x ticks and labels, which is
+usually about right; but it does not allow any space for y and r ticks and
+labels since it has no idea how wide the labels will be.  The discussion
+of captions in Section {@NumberOf captions} explains how to use the
+@Code "leftgap" and @Code "rightgap" options to work around this deficiency.
+@End @Section
diff --git a/doc/user/letterbook b/doc/user/letterbook
new file mode 100644
index 0000000..269f073
--- /dev/null
+++ b/doc/user/letterbook
@@ -0,0 +1,356 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for books                                                 #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  @SysInclude commands for standard packages.                                #
+#                                                                             #
+###############################################################################
+
+  @SysInclude { fontdefs	} # font definitions
+  @SysInclude { langdefs	} # language definitions
+  @SysInclude { bsf		} # BasicSetup package
+  @SysInclude { dsf		} # DocumentSetup package
+  @SysInclude { bookf		} # BookSetup extension
+
+
+###############################################################################
+#                                                                             #
+#  @Include command for reading personal definitions from current directory.  #
+#                                                                             #
+###############################################################################
+
+  @Include { mydefs }
+
+###############################################################################
+#                                                                             #
+#  The @BasicSetup @Use clause - basics, lists, paragraphs, displays.         #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+ 
+@Use { @BasicSetup
+  # @InitialFont	{ Times Base 12p	} # initial font
+  # @InitialBreak	{{adjust 1.2fx hyphen} @OrIfPlain {ragged 1fx nohyphen}}
+  # @InitialSpace	{ lout			} # initial space style
+  # @InitialLanguage	{ English		} # initial language
+  # @InitialColour	{ black			} # initial colour
+  # @OptimizePages	{ No			} # optimize page breaks?
+  # @HeadingFont	{ Bold			} # font for @Heading
+  # @ParaGap		{ 1.3vx @OrIfPlain 1f	} # gap between paragraphs
+  # @ParaIndent		{ 2.00f	@OrIfPlain 5s	} # first-line indent for @PP
+  # @DisplayGap		{ 1.00v	@OrIfPlain 1f	} # gap above, below displays
+  # @DisplayIndent	{ 2.00f	@OrIfPlain 5s	} # @IndentedDisplay indent
+  # @DefaultIndent	{ 0.5rt			} # @Display indent
+  # @DisplayNumStyle	{ (num)			} # style of display numbers
+  # @WideIndent		{ 4.00f	@OrIfPlain 10s	} # @WideTaggedList indent
+  # @VeryWideIndent	{ 8.00f	@OrIfPlain 20s	} # @VeryWideTaggedList indent
+  # @ListGap		{ 1.00v	@OrIfPlain 1f	} # gap between list items
+  # @ListIndent		{ 0s			} # indent of list items
+  # @ListRightIndent	{ 0s			} # right indent of list items
+  # @ListLabelWidth	{ 2.00f	@OrIfPlain 5s	} # width allowed for list tags
+  # @NumberSeparator	{ .			} # separates nums like 2.3.7
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @DocumentSetup @Use clause - page layout plus figures, tables, etc.    #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+
+@Use { @DocumentSetup
+    @PageType		{ Letter @OrIfPlain Other} # page type (width, height)
+  # @PageWidth		{ 80s			} # page width if type Other
+  # @PageHeight		{ 66f			} # page height if type Other
+  # @PageOrientation	{ Portrait		} # Portrait, Landscape, etc.
+  # @PageBackground	{  			} # background of each page
+  # @TopMargin		{ 2.5c	@OrIfPlain 6f	} # top margin of all pages
+  # @FootMargin		{ 2.5c	@OrIfPlain 6f	} # bottom margin of all pages
+  # @OddLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of odd pages
+  # @OddRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of odd pages
+  # @EvenLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of even pages
+  # @EvenRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of even pages
+  # @PageBoxType	{ None			} # None Box CurveBox ShadowBox
+  # @PageBoxMargin	{ 1.00c			} # page box margin
+  # @PageBoxLineWidth	{			} # page box line thickness
+  # @PageBoxPaint	{ none			} # page box paint
+  # @PageBoxShadow	{ 0.60c			} # shadow margin if ShadowBox
+  # @ColumnNumber	{ 1			} # number of columns (1 to 10)
+  # @ColumnGap		{ 1.00c	@OrIfPlain 6s	} # column gap
+  # @FigureLocation	{ PageTop		} # default figure location
+  # @TableLocation	{ PageTop		} # default table location
+  # @FigureFormat	{ @CC @Body		} # default figure format
+  # @TableFormat	{ @CC @Body		} # default table format
+  # @FigureWord		{ figure		} # "Figure" word else anything
+  # @TableWord		{ table			} # "Table" word else anything
+  # @FigureNumbers	{ Arabic		} # method of numbering figures
+  # @TableNumbers	{ Arabic		} # method of numbering tables
+  # @FigureCaptionPos	{ Below 		} # Above or Below
+  # @TableCaptionPos	{ Below			} # Above or Below
+  # @CaptionFont        {                       } # figure, table caption font
+  # @CaptionBreak       {                       } # figure, table caption break
+  # @CaptionFormat      { @B { number @DotSep @OneCol }	} # figure, table caption format
+  # @MakeFigureContents { No                    } # list of figures at start
+  # @MakeTableContents  { No                    } # list of tables at start
+  # @MakeContents	{ No			} # make contents? Yes or No
+    @MakeContents	{ Yes			} # make contents? Yes or No
+  # @ContentsGap	{ 0.20v	@OrIfPlain 0f	} # extra gap above minor entry
+  # @ContentsGapAbove	{ 0.80v	@OrIfPlain 1f	} # extra gap above major entry
+  # @ContentsGapBelow	{ 0.00v	@OrIfPlain 0f	} # extra gap below major entry
+  # @ContentsPartGapAbove { 1.00v @OrIfPlain 1f	} # extra gap above `part' entry
+  # @ContentsPartGapBelow { 0.00v @OrIfPlain 0f	} # extra gap below `part' entry
+  # @ContentsFormat	{ number @DotSep title	} # contents entry format
+  # @ContentsLeader	{ ..			} # leader symbol in contents
+  # @ContentsLeaderGap	{ 4s	@OrIfPlain 2s	} # gap between leaders
+  # @ContentsRightWidth	{ 3f	@OrIfPlain 6s	} # page numbers column width
+  # @MakeReferences	{ Yes			} # make references? Yes or No
+  # @RefCiteStyle	{ [cite]		} # citation style
+  # @RefCiteLabels	{ @RefNum		} # citation items
+  # @RefNumbers		{ Arabic		} # reference numbers
+  # @RefListFormat	{ Labels		} # NoLabels, Labels, etc.
+  # @RefListLabels	{ [@RefNum]		} # ref list label format
+  # @RefListTitle	{ references		} # title of reference list
+  # @ChapRefListTitle	{ references		} # title of chapter ref list
+  # @RefListIndent	{ 0s			} # indent to left of labels
+  # @RefListRightIndent	{ 0s			} # indent to right of items
+  # @RefListGap		{ @ListGap		} # gap between ref list items
+  # @RefListFont	{        		} # font used in reference list
+  # @RefListBreak	{        		} # break style of ref list
+  # @RefListLabelWidth 	{ @ListLabelWidth	} # Labels column width
+  # @RefListSortKey	{ @Tag			} # sorting key
+  # @MakeIndex		{ No			} # make index? Yes or No
+    @MakeIndex		{ Yes			} # make index? Yes or No
+  # @IndexFont		{			} # index entries font
+  # @IndexBreak		{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexColumnNumber	{ 2			} # index columns (1 to 10)
+  # @IndexColumnGap	{ 1.00c	@OrIfPlain 6s	} # index column gap
+  # @MakeIndexA		{ No 			} # make index A? Yes or No
+  # @IndexAFont		{			} # index A entries font
+  # @IndexABreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexAColumnNumber	{ 2			} # index A columns (1 to 10)
+  # @IndexAColumnGap	{ 1.00c	@OrIfPlain 6s	} # index A column gap
+  # @MakeIndexB		{ No 			} # make index B? Yes or No
+  # @IndexBFont		{			} # index B entries font
+  # @IndexBBreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexBColumnNumber	{ 2			} # index B columns (1 to 10)
+  # @IndexBColumnGap	{ 1.00c	@OrIfPlain 6s	} # index B column gap
+  # @TopGap		{ 0.75c	@OrIfPlain 2f	} # gap between figures
+  # @MidGap		{ 0.75c	@OrIfPlain 2f	} # gap above/below body text
+  # @FootNoteNumbers	{ Arabic		} # footnote numbers
+  # @FootNoteThrough	{ No			} # numbered through chapter?
+  # @FootNoteLocation	{ ColFoot		} # where the footnote appears
+  # @FootNoteFont	{ 0.80f			} # font for footnotes
+  # @FootNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for footnotes
+  # @FootLen		{ 2.00c	@OrIfPlain 10s	} # length of footnote line
+  # @FootAboveGap	{ @DisplayGap		} # gap above footnote line
+  # @FootGap		{ 0.20c	@OrIfPlain 1fx	} # gap between footnotes
+  # @MarginNoteFont	{ 0.80f			} # font of margin notes
+  # @MarginNoteBreak	{ ragged 1.10fx		} # break style of margin notes
+  # @MarginNoteHGap	{ 0.5c   		} # horizontal gap to notes
+  # @MarginNoteVGap	{ @DisplayGap		} # min vertical gap between
+  # @MarginNoteWidth	{ 1.50c  		} # width of margin notes
+  # @EndNoteNumbers	{ Arabic		} # endnote numbers
+  # @EndNoteFont	{ 0.80f			} # font of endnotes
+  # @EndNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for endnotes
+  # @EndNoteGap		{ 0.20c	@OrIfPlain 1f	} # gap between endnotes
+  # @TheoremWord	{ theorem		} # "Theorem" word, etc.
+  # @DefinitionWord	{ definition		} # "Definition" word, etc.
+  # @ClaimWord		{ claim			} # "Claim" word, etc.
+  # @PropositionWord	{ proposition		} # "Proposition" word, etc.
+  # @LemmaWord		{ lemma			} # "Lemma" word, etc.
+  # @CorollaryWord	{ corollary		} # "Corollary" word, etc.
+  # @ExampleWord	{ example		} # "Example" word, etc.
+  # @ProofWord		{ proof			} # "Proof" word, etc.
+  # @PageHeaders	{ Simple		} # None Simple Titles NoTitles
+    @PageHeaders	{ Titles		} # None Simple Titles NoTitles
+  # @PageNumbers	{ Arabic		} # page numbers
+  # @FirstPageNumber	{ 1			} # number of first page 
+  # @IntroPageNumbers	{ Roman			} # intro page numbers
+  # @IntroFirstPageNumber{ 1			} # number of first intro page 
+  # @StructPageNums	{ No			} # make structured page numbers
+
+  # @OddTop		{ @Centre{- @PageNum -}	} # Simple page headers
+  # @OddFoot		{ @Null			}
+  # @EvenTop		{ @Centre{- @PageNum -}	}
+  # @EvenFoot		{ @Null			}
+  # @StartOddTop	{ @Null			}
+  # @StartOddFoot	{ @Null			}
+  # @StartEvenTop	{ @Null			}
+  # @StartEvenFoot	{ @Null			}
+  # @IntroOddTop	{ @Null			}
+  # @IntroOddFoot	{ @Centre @PageNum	}
+  # @IntroEvenTop	{ @Null			}
+  # @IntroEvenFoot	{ @Centre @PageNum	}
+  # @IntroStartOddTop	{ @Null			}
+  # @IntroStartOddFoot	{ @Null			}
+  # @IntroStartEvenTop	{ @Null			}
+  # @IntroStartEvenFoot	{ @Null			}
+
+						  # Titles, NoTitles headers
+  # @RunningOddTop  { @I {@MinorNum @DotSep @MinorTitle} @Right @B @PageNum }
+  # @RunningOddFoot		{ @Null					}
+  # @RunningEvenTop { @B @PageNum @Right @I {@MajorNum @DotSep @MajorTitle} }
+  # @RunningEvenFoot		{ @Null					}
+  # @RunningStartOddTop 	{ @Null					}
+  # @RunningStartOddFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+  # @RunningStartEvenTop	{ @Null					}
+  # @RunningStartEvenFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+  # @RunningIntroOddTop		{ @Null					}
+  # @RunningIntroOddFoot	{ @Right @PageNum			}
+  # @RunningIntroEvenTop	{ @Null					}
+  # @RunningIntroEvenFoot	{ @PageNum				}
+  # @RunningIntroStartOddTop	{ @Null					}
+  # @RunningIntroStartOddFoot	{ @Null					}
+  # @RunningIntroStartEvenTop	{ @Null					}
+  # @RunningIntroStartEvenFoot	{ @Null					}
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @BookSetup @Use clause - options specific to books.                    #
+#                                                                             #
+###############################################################################
+
+@Use { @BookSetup
+  # @TitlePageFont		{ Helvetica Base} # title page font (not size)
+  # @SeparateIntroNumbering	{ Yes		} # separate intro page numbers
+  # @PrefaceAfterContents  	{ No		} # Yes or No
+  # @ChapterStartPages		{ Any		} # Any, Odd, or Even
+  # @ReferencesBeforeAppendices	{ No		} # references before appendices
+  # @PrefaceWord		{ preface	} # word for "Preface"
+  # @ContentsWord		{ contents	} # word for "Contents"
+  # @FigureListWord		{ figurelist	} # word for "List of Figures"
+  # @TableListWord		{ tablelist	} # word for "List of Tables"
+  # @IntroductionWord		{ introduction	} # word for "Introduction"
+  # @ChapterWord		{ chapter	} # word for "Chapter"
+  # @AppendixWord		{ appendix	} # word for "Appendix"
+  # @IndexWord			{ index		} # word for "Index"
+  # @IndexAWord			{ index		} # word for "Index" (A)
+  # @IndexBWord			{ index		} # word for "Index" (B)
+  # @ChapterNumbers		{ Arabic	} # kind of chapter numbers
+  # @FirstChapterNumber		{ 1		} # first chapter number (Arabic)
+  # @SectionNumbers		{ Arabic	} # kind of section numbers
+  # @FirstSectionNumber		{ 1		} # first section number (Arabic)
+  # @SubSectionNumbers		{ Arabic	} # kind of subsection numbers
+  # @FirstSubSectionNumber	{ 1		} # first subsect number (Arabic)
+  # @SubSubSectionNumbers	{ Arabic	} # kind of sub-subs. numbers
+  # @FirstSubSubSectionNumber	{ 1		} # first sub-sub number (Arabic)
+  # @AppendixNumbers		{ UCAlpha	} # kind of appendix numbers
+  # @FirstAppendixNumber	{ 1		} # first appendix num (Arabic)
+  # @SubAppendixNumbers		{ Arabic	} # kind of subappendix numbers
+  # @FirstSubAppendixNumber	{ 1		} # first sub-app num (Arabic)
+  # @SubSubAppendixNumbers	{ Arabic	} # kind of sub-subapp. numbers
+  # @FirstSubSubAppendixNumber	{ 1		} # first sub-sub num (Arabic)
+  # @PartHeadingFont		{ Helvetica Base 2.50f	} # part head font
+  # @PartHeadingBreak		{ clines 1.2fx nohyphen	} # part head break
+  # @PartHeadingFormat          { @CD number @DP @CD title } # part head format
+  # @ChapterHeadingFont		{ Bold 2.00f		} # chapter head font
+  # @ChapterHeadingBreak	{ ragged 1.2fx nohyphen	} # chapter head break
+  # @ChapterHeadingFormat	{ number @DotSep title	} # format of chap. head
+  # @SectionHeadingFont		{ Bold			} # section head font
+  # @SectionHeadingBreak	{ ragged 1.2fx nohyphen	} # section head break
+  # @SectionHeadingFormat	{ number @DotSep title	} # section head fmt
+  # @SubSectionHeadingFont	{ Bold			} # subs. head font
+  # @SubSectionHeadingBreak	{ ragged 1.2fx nohyphen	} # subs. head break
+  # @SubSectionHeadingFormat	{ number @DotSep title	} # subs. head fmt
+  # @SubSubSectionHeadingFont	{ Slope			} # sub-subs. head font
+  # @SubSubSectionHeadingBreak	{ ragged 1.2fx nohyphen	} # sub-subs. head break
+  # @SubSubSectionHeadingFormat	{ number @DotSep title	} # sub-subs. head fmt
+  # @AppendixHeadingFont	{ Bold 2.00f		} # appendix head font
+  # @AppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # appendix head break
+  # @AppendixHeadingFormat	{ number @DotSep title	} # appendix head fmt
+  # @SubAppendixHeadingFont	{ Bold			} # subapp. head font
+  # @SubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # subapp. head break
+  # @SubAppendixHeadingFormat	{ number @DotSep title	} # subapp. head fmt
+  # @SubSubAppendixHeadingFont	{ Slope			} # sub-suba. head font
+  # @SubSubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # sub-suba. head break
+  # @SubSubAppendixHeadingFormat{ number @DotSep title	} # sub-suba. head fmt
+  # @AbovePartGap		{ 4.00f			} # gap above part title
+  # @AboveChapterGap		{ 3.00f			} # above major titles
+  # @SectionGap			{ 2.0v	@OrIfPlain 3f	} # between sections
+  # @SubSectionGap		{ 1.5v	@OrIfPlain 2f	} # between subsects
+  # @SubSubSectionGap		{ 1.5v	@OrIfPlain 2f	} # between sub-subs.
+  # @SubAppendixGap		{ 2.0v	@OrIfPlain 3f	} # between subappendices
+  # @SubSubAppendixGap		{ 1.5v	@OrIfPlain 2f	} # between sub-subapps
+  # @IntroductionInContents	{ Yes		} # add introduction to contents
+  # @PartInContents		{ Yes		} # add parts to contents
+  # @ChapterInContents		{ Yes		} # add chapters to contents
+  # @SectionInContents		{ Yes		} # add sections to contents
+  # @SubSectionInContents	{ Yes		} # add subsections to contents
+  # @SubSubSectionInContents	{ No		} # add sub-subsects to contents
+  # @AppendixInContents		{ Yes		} # add appendices to contents
+  # @SubAppendixInContents	{ Yes		} # add subappendices to contents
+  # @SubSubAppendixInContents	{ No		} # add sub-subapps to contents
+  # @ReferencesInContents	{ Yes		} # add ref. section to contents
+  # @IndexInContents		{ Yes		} # add index to contents
+  # @IndexAInContents		{ Yes		} # add index A to contents
+  # @IndexBInContents		{ Yes		} # add index B to contents
+  # @PartContentsIndent         { 0.5rt		} # indent of part contents entry
+  # @ChapterNumInTheorems	{ Yes		} # theorem num has chapter num
+  # @SectionNumInTheorems	{ No		} # theorem num has section num
+  # @SubSectionNumInTheorems	{ No		} # theorem num has subsect num
+  # @SubSubSectionNumInTheorems	{ No		} # theorem num has sub-ss. num
+  # @AppendixNumInTheorems	{ Yes		} # theorem num has appendix num
+  # @SubAppendixNumInTheorems	{ No		} # theorem num has sub-app num
+  # @SubSubAppendixNumInTheorems{ No		} # theorem num has sub-sa. num
+  # @ChapterNumInDisplays	{ Yes		} # display num has chapter num
+  # @SectionNumInDisplays	{ Yes		} # display num has section num
+  # @SubSectionNumInDisplays	{ No		} # display num has subsect num
+  # @SubSubSectionNumInDisplays	{ No		} # display num has sub-ss. num
+  # @AppendixNumInDisplays	{ Yes		} # display num has appendix num
+  # @SubAppendixNumInDisplays	{ Yes		} # display num has sub-app num
+  # @SubSubAppendixNumInDisplays{ No		} # display num has sub-sa. num
+  # @ChapterNumInFigures	{ Yes		} # figure num has chapter num
+  # @SectionNumInFigures	{ No		} # figure num has section num
+  # @SubSectionNumInFigures	{ No		} # figure num has subsect num
+  # @SubSubSectionNumInFigures	{ No		} # figure num has sub-ss. num
+  # @AppendixNumInFigures	{ Yes		} # figure num has appendix num
+  # @SubAppendixNumInFigures	{ No		} # figure num has sub-app num
+  # @SubSubAppendixNumInFigures	{ No		} # figure num has sub-sa. num
+  # @ChapterNumInTables		{ Yes		} # table num has chapter num
+  # @SectionNumInTables		{ No		} # table num has section num
+  # @SubSectionNumInTables	{ No		} # table num has subsect num
+  # @SubSubSectionNumInTables	{ No		} # table num has sub-ss. num
+  # @AppendixNumInTables	{ Yes		} # table num has appendix num
+  # @SubAppendixNumInTables	{ No		} # table num has sub-app num
+  # @SubSubAppendixNumInTables	{ No		} # table num has sub-sa. num
+  # @SectionNumInRunners 	{ Yes		} # runners have section num
+  # @SubSectionNumInRunners 	{ No		} # runners have subsect num
+  # @SubSubSectionNumInRunners 	{ No		} # runners have sub-ss. num
+  # @SubAppendixNumInRunners 	{ Yes		} # runners have sub-app num
+  # @SubSubAppendixNumInRunners { No		} # runners have sub-sa. num
+  # @PrefacePrefix		{		} # for structured page nums
+  # @ContentsPrefix		{		} # for structured page nums
+  # @FigureContentsPrefix	{		} # for structured page nums
+  # @TableContentsPrefix	{		} # for structured page nums
+  # @IntroductionPrefix		{		} # for structured page nums
+  # @ChapterPrefix		{		} # for structured page nums
+  # @AppendixPrefix		{		} # for structured page nums
+  # @ReferencesPrefix		{		} # for structured page nums
+  # @IndexPrefix		{		} # for structured page nums
+  # @IndexAPrefix		{		} # for structured page nums
+  # @IndexBPrefix		{		} # for structured page nums
+}
+
+
+###############################################################################
+#                                                                             #
+#  @Database (and @SysDatabase) clauses go here.                              #
+#                                                                             #
+###############################################################################
+
+@SysDatabase @RefStyle { refstyle }		  # reference printing styles
diff --git a/doc/user/mydefs b/doc/user/mydefs
new file mode 100644
index 0000000..2ef9639
--- /dev/null
+++ b/doc/user/mydefs
@@ -0,0 +1,203 @@
+
+   ###################################################
+   #                                                 #
+   #  Lout keywords and @Code symbol.                #
+   #                                                 #
+   ###################################################
+
+   def @Code right x
+   { { Helvetica Base -1p } @Font lines @Break x }
+
+   def @@BackEnd           { @Code "@BackEnd"           }
+   def @@Begin             { @Code "@Begin"             }
+   def @@Break             { @Code "@Break"             }
+   def @@Case              { @Code "@Case"              }
+   def @@Database          { @Code "@Database"          }
+   def @@End               { @Code "@End"               }
+   def @@Font              { @Code "@Font"              }
+   def @@Char              { @Code "@Char"              }
+   def @@Galley            { @Code "@Galley"            }
+   def @@Graphic           { @Code "@Graphic"           }
+   def @@HAdjust           { @Code "@HAdjust"           }
+   def @@HContract         { @Code "@HContract"         }
+   def @@HCover            { @Code "@HCover"            }
+   def @@HExpand           { @Code "@HExpand"           }
+   def @@HScale            { @Code "@HScale"            }
+   def @@High              { @Code "@High"              }
+   def @@HShift            { @Code "@HShift"            }
+   def @@Include           { @Code "@Include"           }
+   def @@Insert            { @Code "@Insert "           }
+   def @@IncludeGraphic    { @Code "@IncludeGraphic"    }
+   def @@Key               { @Code "@Key"               }
+   def @@LClos             { @Code "@LClos"             }
+   def @@LEnv              { @Code "@LEnv"              }
+   def @@LInput            { @Code "@LInput"            }
+   def @@LVis              { @Code "@LVis"              }
+   def @@Moment            { @Code "@Moment"            }
+   def @@Next              { @Code "@Next"              }
+   def @@Null              { @Code "@Null"              }
+   def @@OneCol            { @Code "@OneCol"            }
+   def @@OneRow            { @Code "@OneRow"            }
+   def @@Open              { @Code "@Open"              }
+   def @@PAdjust           { @Code "@PAdjust"           }
+   def @@PrependGraphic    { @Code "@PrependGraphic"    }
+   def @@Rotate            { @Code "@Rotate"            }
+   def @@Scale             { @Code "@Scale"             }
+   def @@SetColor          { @Code "@SetColor"          }
+   def @@SetColour         { @Code "@SetColour"         }
+   def @@Language          { @Code "@Language"          }
+   def @@CurrLang          { @Code "@CurrLang"          }
+   def @@Space             { @Code "@Space"             }
+   def @@SysDatabase       { @Code "@SysDatabase"       }
+   def @@SysInclude        { @Code "@SysInclude"        }
+   def @@SysIncludeGraphic { @Code "@SysIncludeGraphic" }
+   def @@SysPrependGraphic { @Code "@SysPrependGraphic" }
+   def @@Tag               { @Code "@Tag"               }
+   def @@Tagged            { @Code "@Tagged"            }
+   def @@Use               { @Code "@Use"               }
+   def @@VAdjust           { @Code "@VAdjust"           }
+   def @@VContract         { @Code "@VContract"         }
+   def @@VCover            { @Code "@VCover"            }
+   def @@VExpand           { @Code "@VExpand"           }
+   def @@VScale            { @Code "@VScale"            }
+   def @@VShift            { @Code "@VShift"            }
+   def @@Wide              { @Code "@Wide"              }
+   def @@Yield             { @Code "@Yield"             }
+
+
+   ###################################################
+   #                                                 #
+   #  Miscellaneous symbols used in the guide.       #
+   #                                                 #
+   ###################################################
+
+   def @TeX
+   { @OneCol { T &0.4fo {-0.2f @VShift E} &0.45fo X }
+   }
+
+   def @LaTeX
+   { @OneCol { L &0.3fo { +0.1f @VShift 0.8f @Font A } &0.4fo @TeX }
+   }
+
+   import @BasicSetup
+   def @Batlow { Batlow Food Distributors Pty. Ltd. }
+
+   import @BasicSetup
+   def @GreyBox right x { @Box paint { lightgrey } x }
+
+   import @BasicSetup
+   def @HeadingBox left x right y
+   {
+       @Box { @CentredDisplay @Heading x y }
+   }
+
+   def @FilledBox
+   {
+     @BackEnd @Case {
+       PostScript @Yield {
+         { "0 0 moveto xsize 0 lineto xsize ysize lineto 0 ysize lineto"
+           "closepath fill"
+         } @Graphic { 0.6f @High ^/ 0.4f @High 4f @Wide }
+       }
+       PDF @Yield {
+         { "0 0 m __xsize 0 l __xsize __ysize l 0 __ysize l h f"
+         } @Graphic { 0.6f @High ^/ 0.4f @High 4f @Wide }
+       }
+     }
+   }
+
+   import @Eq
+   def epi { p sub i ` log sub 2 ` p sub i }
+ 
+   import @Eq
+   def ep right x { p sub x ` log sub 2 ` p sub x }
+ 
+   def @Dbl left x right y
+   { 1.95i @Wide
+     { 1.25i @Wide { |1rt @Code x } |0.2i @Eq {non y} }
+   }
+ 
+   import @Eq
+   def @ExA { 1 over sqrt { 1 - 4 x sup 2 } }
+
+   def @@Diag { @Code "@Diag" }
+
+   extend @DiagSetup @Diag
+   macro @MyNode {
+    @Node
+	outline {
+	    LR:: { xsize 0 }
+	    LR:< 0d
+	    UL:: { 0 ysize }
+	    UL:< 270d
+	    0 0 LR UL 0 0
+	}
+   }
+
+   extend @DiagSetup @Diag
+   macro @MyLink {
+    @Link
+	path {
+	    FROM:: from
+	    TO:: to
+	    FROM TO
+	}
+   }
+
+   def @ShowHMark
+      named linewidth  { 0.015 cm }
+      named linestyle  { dashed   }
+      named dashlength { 0.15 cm  }
+      named paint      { light    }
+      right x
+   {
+      @Fig
+      {
+         @Figure
+                 shape {
+                   @BackEnd @Case {
+                     PostScript @Yield {
+                         -0.3 cm ymark
+                         {xsize ymark} ++ {0.3 cm 0}
+                     }
+                     PDF @Yield { ""    #       VT: PDF currently has no output
+                     }
+                   }
+                 }
+                 linewidth { linewidth }
+                 linestyle { linestyle }
+                 dashlength { dashlength }
+         x
+      }
+   }
+ 
+   def @ZeroWidth right x { @OneCol { |0io x |0io } }
+ 
+   def @SomeText
+   {
+Johnson suddenly uttered, in a strong determined tone, an apophegm, at
+which many will start:  `Patriotism is the last refuge of a scoundrel.'
+   }
+ 
+   import @DiagSetup
+   def @OpenCircle { @Diag { @Circle margin { 0.2f } } }
+ 
+   import @DiagSetup
+   def @ClosedCircle { @Diag { @Circle paint { black } margin { 0.2f } } }
+ 
+   import @TblSetup @BasicSetup
+   def @AmberLight
+   {
+       @OneRow @Tbl
+           aformat { @Cell A }
+           marginhorizontal { 0i }
+           marginvertical { 0i }
+           strut { no }
+           rule { no }
+           paint { no }
+        {
+            @Rowa A { @OpenCircle }
+            @MarkRowa A { @ClosedCircle }
+            @Rowa A { @OpenCircle }
+        }
+   }
diff --git a/doc/user/pascal b/doc/user/pascal
new file mode 100644
index 0000000..41376df
--- /dev/null
+++ b/doc/user/pascal
@@ -0,0 +1,162 @@
+@Chapter
+    @Title { Pascal and Modula-2 Programs }
+@Begin
+@LP
+There is a @Code "@Pas" symbol for printing Pascal programs
+pascal @Index { Pascal programs }
+pas. @Index @Code "@Pas"
+@Cite { $jensen1975pascal }.  No attempt is made to follow any
+particular printing standard; the design simply reflects this author's
+taste.  To use {@Code "@Pas"}, place @Code "@SysInclude { pas }" at the
+start of your document in the usual way.  A Pascal program or program
+fragment is entered like this:
+@ID @Code {
+"@ID @Pas {"
+"procedure PriDelete(x: PriEntry; var Q: PriorityQueue);"
+"    var i: integer;"
+"begin"
+"    with Q^ do begin"
+"        size := size - 1;"
+"        if x^.back <= size then"
+"        begin"
+"            i := x^.back;"
+"            A[i] := A[size + 1];"
+"            A[i]^.back := i;"
+"            PriAddRoot(i, Q);"
+"            PriAddLeaf(i, Q)"
+"        end"
+"    end"
+"end;"
+"}"
+}
+This produces
+@ID @Pas {
+procedure PriDelete(x: PriEntry; var Q: PriorityQueue);
+    var i: integer;
+begin
+    with Q^ do begin
+	size := size - 1;
+	if x^.back <= size then
+	begin
+	    i := x^.back;
+	    A[i] := A[size + 1];
+	    A[i]^.back := i;
+	    PriAddRoot(i, Q);
+	    PriAddLeaf(i, Q)
+	end
+    end
+end;
+}
+Blank lines, line breaks, indents and spaces in the input are respected,
+with a tab being considered equal to eight spaces.  @Code "@Pas" can also
+be used within a paragraph to produce a fragment like
+@OneCol @Pas { A[i..j] }.  Use @Code "@OneCol @Pas { ... }" to prevent the
+result from breaking over two lines.
+@PP
+@Code "@Pas" does not attempt to rearrange the program in any way.  Each
+item is simply printed according to the following plan:
+@ID {
+7c @Wide {
+      @Code and 	|2.5ct @Pas { and }
+//1vx @Code array 	|2.5ct @Pas { array }
+//1vx @Code begin 	|2.5ct @Pas { begin }
+//1vx @Code case 	|2.5ct @Pas { case }
+//1vx @Code const 	|2.5ct @Pas { const }
+//1vx @Code div 	|2.5ct @Pas { div }
+//1vx @Code do 		|2.5ct @Pas { do }
+//1vx @Code downto 	|2.5ct @Pas { downto }
+//1vx @Code else 	|2.5ct @Pas { else }
+//1vx @Code end 	|2.5ct @Pas { end }
+//1vx @Code file 	|2.5ct @Pas { file }
+//1vx @Code for 	|2.5ct @Pas { for }
+//1vx @Code forward	|2.5ct @Pas { forward }
+//1vx @Code function 	|2.5ct @Pas { function }
+//1vx @Code goto 	|2.5ct @Pas { goto }
+//1vx @Code if 		|2.5ct @Pas { if }
+//1vx @Code in 		|2.5ct @Pas { in }
+//1vx @Code label 	|2.5ct @Pas { label }
+//1vx @Code mod 	|2.5ct @Pas { mod }
+//1vx @Code nil 	|2.5ct @Pas { nil }
+//1vx @Code not 	|2.5ct @Pas { not }
+//1vx @Code of 		|2.5ct @Pas { of }
+//1vx @Code or 		|2.5ct @Pas { or }
+//1vx @Code otherwise 	|2.5ct @Pas { otherwise }
+//1vx @Code packed 	|2.5ct @Pas { packed }
+//1vx @Code procedure 	|2.5ct @Pas { procedure }
+//1vx @Code program 	|2.5ct @Pas { program }
+//1vx @Code record 	|2.5ct @Pas { record }
+//1vx @Code repeat 	|2.5ct @Pas { repeat }
+//1vx @Code set 	|2.5ct @Pas { set }
+//1vx @Code then 	|2.5ct @Pas { then }
+//1vx @Code to 		|2.5ct @Pas { to }
+//1vx @Code type 	|2.5ct @Pas { type }
+//1vx @Code until 	|2.5ct @Pas { until }
+//1vx @Code var 	|2.5ct @Pas { var }
+//1vx @Code while 	|2.5ct @Pas { while }
+//1vx @Code with 	|2.5ct @Pas { with }
+} | 7c @Wide {
+      @Code "0"		|2.5ct @Pas { 0 }
+//1vx @Code "1"		|2.5ct @Pas { 1 }
+//1vx @Code "2"		|2.5ct @Pas { 2 }
+//1vx @Code "3"		|2.5ct @Pas { 3 }
+//1vx @Code "4"		|2.5ct @Pas { 4 }
+//1vx @Code "5"		|2.5ct @Pas { 5 }
+//1vx @Code "6"		|2.5ct @Pas { 6 }
+//1vx @Code "7"		|2.5ct @Pas { 7 }
+//1vx @Code "8"		|2.5ct @Pas { 8 }
+//1vx @Code "9"		|2.5ct @Pas { 9 }
+//1vx @Code "."		|2.5ct @Pas { . }
+//1vx @Code ","		|2.5ct @Pas { , }
+//1vx @Code ":"		|2.5ct @Pas { : }
+//1vx @Code ";"		|2.5ct @Pas { ; }
+//1vx @Code "'"		|2.5ct @Pas { ' }
+//1vx @Code "`"		|2.5ct @Pas { ` }
+//1vx @Code "+"		|2.5ct @Pas { + }
+//1vx @Code "-"		|2.5ct @Pas { - }
+//1vx @Code "*"		|2.5ct @Pas { * }
+//1vx @Code "/"		|2.5ct @Pas { / }
+//1vx @Code "("		|2.5ct @Pas { ( }
+//1vx @Code ")"		|2.5ct @Pas { ) }
+//1vx @Code "["		|2.5ct @Pas { [ }
+//1vx @Code "]"		|2.5ct @Pas { ] }
+//1vx @Code "^"		|2.5ct @Pas { ^ }
+//1vx @Code ".."	|2.5ct @Pas { .. }
+//1vx @Code "="		|2.5ct @Pas { = }
+//1vx @Code "<"		|2.5ct @Pas { < }
+//1vx @Code ">"		|2.5ct @Pas { > }
+//1vx @Code "<>"	|2.5ct @Pas { <> }
+//1vx @Code "<="	|2.5ct @Pas { <= }
+//1vx @Code ">="	|2.5ct @Pas { >= }
+//1vx @Code ":="	|2.5ct @Pas { := }
+}
+}
+Anything not mentioned here will appear in italic font.
+@PP
+Unlike the @Code "@CP" symbol from the previous chapter, the @Code "@Pas"
+symbol is a quick-and-dirty production which does not offer you any options,
+or indeed attempt to solve every problem of Pascal formatting.  In
+particular, Pascal strings need attention before formatting by
+{@Code "@Pas"}.  Their interiors are best enclosed in double quotes to
+prevent the above transformations from occurring inside them.  Any
+@Code "\\" or @Code "\"" characters inside strings will need to be
+replaced by @Code "\\\\" and @Code "\\\"" respectively, and the opening
+quote should be replaced by {@Code "`"}.
+@PP
+Similar remarks apply to Pascal comments; don't forget that @Code "{"
+and @Code "}" must be enclosed in double quotes.  Alternatively, a
+@Code "@Com" symbol can be placed in front of a comment enclosed
+in braces.  It will add literal braces:
+@ID @Code {
+"@Com { A Pascal comment }"
+}
+has result
+@ID @Pas {
+@Com { A Pascal comment }
+}
+It may still be necessary to enclose the interior in double quotes.
+@PP
+There is a @Code "@Modula" symbol which allows you to format Modula-2
+programs in the same way as @Code "@Pas" does for Pascal.  You get it
+via {@Code "@SysInclude { modula }"}, and once again it is a quick-and-dirty
+production.
+@End @Chapter
diff --git a/doc/user/preface b/doc/user/preface
new file mode 100644
index 0000000..eada554
--- /dev/null
+++ b/doc/user/preface
@@ -0,0 +1,66 @@
+@Preface @Begin
+@LP
+This User's Guide brings together in one document everything needed
+for the day-to-day use of Version 3 of the Lout document formatting
+system.
+@IndexBlanks
+@PP
+There are three other documents describing Lout:  the Expert's Guide
+@Cite { $kingston1995lout.expert }, which you need if you want to add
+new features to Lout; a journal paper on the design and implementation
+of Lout @Cite { $kingston1993lout.design }; and a set of overhead
+transparencies @Cite { $kingston1994lout.overheads } that cover much
+the same ground as this Guide.  These documents are all distributed
+with the software.
+@PP
+Lout is distributed free of charge under the GNU Public License.  The
+gnu. @Index { GNU Public License }
+primary source is directory
+@ID @Code "ftp://ftp.cs.su.oz.au/jeff/lout"
+in which may be found a gzipped tar file containing the main distribution
+(currently {@Code "lout-3.17.tar.gz"}), and various other things including
+a PostScript version of this guide.  The distribution contains source code,
+libraries, documentation, license, and installation instructions.
+@PP
+A mailing list has been set up for discussion of all topics related to
+Lout.  To subscribe, send email to @Code "lout-request@ptc.spbu.ru"
+containing the word @Code "subscribe" in the Subject line.  To post an
+item, send email to {@Code "lout@ptc.spbu.ru"}; it will be forwarded to
+all subscribers via email.  To unsubscribe, send email to
+@Code "lout-request@ptc.spbu.ru" containing the word @Code "unsubscribe"
+in the Subject line.
+@PP
+Lout began in 1984 as a research project into the design of a high-level
+language for document formatting.  At that time my name for the subject
+was `document layout,' and this terminology survives in the name
+`Lout'.  The initial design
+was strongly influenced by Brian W. Kernighan and Lorinda L. Cherry's eqn
+kernighan @Index { Kernighan, Brian W. }
+cherry.l @Index { Cherry, Lorinda L.}
+eqn. @Index { @Code eqn equation formatter }
+equation formatter @Cite { $kernighan1975eqn }, and also by Brian K. Reid's
+Scribe system @Cite { $reid1980scribe }.  That
+scribe.influence @SubIndex { influence on Lout }
+reid.b @Index { Reid, Brian K. }
+research phase ended in October 1991 with the first public release of Lout.
+@PP
+Since then the system has been steadily improved and extended.  Optimal
+paragraph breaking and automatic hyphenation were copied from Donald
+knuth @Index { Knuth, D. E. }
+tex. @Index { @TeX }
+E. Knuth's @TeX system @Cite { $knuth1984tex }, and the optimal paragraph
+breaking algorithm was applied to the problem of producing optimal page
+breaks.  The first implementations of horizontal galleys and optimal
+page breaking were by my student Gabor Inokai.  Vincent Tan contributed
+the PDF back end.  The strongest influence during this period has come from
+Lout's users; indeed the number of people who have offered comments and
+suggestions is so great that it is quite out of my power to acknowledge them
+individually.  I hope that seeing their ideas adopted will be thanks enough.
+@DP
+@RLD lines @Break {
+Jeffrey H. Kingston
+Basser Department of Computer Science
+The University of Sydney 2006, Australia
+@Code "jeff@cs.usyd.edu.au"
+}
+@End @Preface
diff --git a/doc/user/ref b/doc/user/ref
new file mode 100644
index 0000000..6ea5782
--- /dev/null
+++ b/doc/user/ref
@@ -0,0 +1,31 @@
+@Chapter
+    @Title { References }
+    @Tag { biblio }
+@Begin
+@LP
+The simple way to make a list of references is to put them in a numbered
+references. @Index { references }
+or tagged list at the end of your document.  If you use references only
+rarely, that is probably the best way, but if you use them frequently this
+chapter will save you hours of work in the long run.
+@PP
+Some good general principles and many examples have been given by van Leunen
+van.leunen. @Index { van Leunen, Mary-Claire }
+@Cite { $vanleunen1992handbook }.  Broadly speaking Lout follows her
+recommendations, with some unification and scaling back as is inevitable
+with software.  Scribe @Cite { $reid1980scribe }
+latex. @Index @LaTeX
+scribe. @RawIndex Scribe
+scribe.reference @SubIndex { reference formatting }
+and @LaTeX @Cite { $lamport1986latex } followed the first edition of the
+same source, so translation from Scribe and @LaTeX references is
+fairly straightforward.
+@BeginSections
+@Include { ref_sett }
+@Include { ref_cite }
+@Include { ref_labe }
+@Include { ref_entr }
+@Include { ref_chan }
+@Include { ref_crea }
+@EndSections
+@End @Chapter
diff --git a/doc/user/ref_chan b/doc/user/ref_chan
new file mode 100644
index 0000000..f7114fb
--- /dev/null
+++ b/doc/user/ref_chan
@@ -0,0 +1,200 @@
+@Section
+    @Title { Changing the appearance of citations and the reference list }
+    @Tag { changeref }
+@Begin
+@PP
+By default, citations appear like this @Cite { $kingston1995lout.expert },
+and the reference list appears like the one at the end of this
+document, with the entries numbered, and sorted by their @Code "@Tag"
+options.  This section explains how to change all this, by setting
+options in the setup file.
+@PP
+For a general introduction to setup files and their options, see
+Section {@NumberOf setup}.  Here we just describe the setup
+file options that relate to references.  Here they are, with their
+default values:
+@ID @OneRow @Code {
+"@MakeReferences { Yes }"
+"@RefCiteStyle { [cite] }"
+"@RefCiteLabels { @RefNum }"
+"@RefNumbers { Arabic }"
+"@RefListFormat { Labels }"
+"@RefListLabels { [@RefNum] }"
+"@RefListTitle { references }"
+"@ChapRefListTitle { references }"
+"@RefListIndent { 0c }"
+"@RefListRightIndent { 0c }"
+"@RefListGap { 1.00v }"
+"@RefListFont { }"
+"@RefListBreak { }"
+"@RefListLabelWidth { 2.00f }"
+"@RefListSortKey { @Tag }"
+}
+makereferences.sym @Index { @Code "@MakeReferences" }
+Setting @Code "@MakeReferences" to @Code "No" will cause Lout to ignore
+all citation symbols and omit all reference lists.
+@PP
+@Code "@RefCiteStyle" and @Code "@RefCiteLabels" combine to
+refcitestyle.sym @Index { @Code "@RefCiteStyle" }
+determine the appearance of citations.  The result of each @Code "@Cite"
+symbol is the value of @Code "@RefCiteStyle" with the @Code "cite"
+symbol replaced by the object following the @Code "@Cite" symbol.  For
+example, the default value shown above encloses each citation in
+brackets.  The @Code "cite" symbol must appear exactly once within
+{@Code "@RefCiteStyle"}.
+@PP
+@Code "@RefCiteLabels" determines the appearance of each label within
+refcitelabels.sym @Index { @Code "@RefCiteLabels" }
+the citation.  Within it, the @Code "@RefNum" symbol will produce the
+number of the reference, and you may also use any of the options of the
+@Code "@Reference" symbol listed at the beginning of Section
+{@NumberOf entries}:
+@ID @OneRow @Tab
+    @Fmta { @Col @Code A ! @Col B }
+{
+@Rowa
+    A { "@RefCiteLabels { @RefNum }" }
+    B { [3] }
+@Rowa
+    A { "@RefCiteLabels { @Label }" }
+    B { [Kin93] }
+@Rowa
+    A { "@RefCiteLabels { @Author, @Year }" }
+    B { [Jeffrey H. Kingston, 1993] }
+}
+The value of @Code "@RefCiteLabels" may be any object.  The @Code "@Label"
+symbol will produce the @Code "label" option of @Code "$" or @Code "@Ref"
+if there is one, rather than the @Code "@Label" option of the reference;
+this @Code "label" option is explained in Section {@NumberOf labelled}.
+@PP
+@Code "@RefNumbers" determines the kind of numbering produced by the
+refnumbers.sym @Index { @Code "@RefNumbers" }
+@Code "@RefNum" symbol used within @Code "@RefCiteLabels" above and
+@Code "@RefListLabels" below.  Its value may be {@Code Arabic},
+{@Code Roman}, {@Code UCRoman}, {@Code Alpha}, or {@Code UCAlpha}, as
+usual for numbering in Lout.  If you don't use {@Code "@RefNum"},
+@Code "@RefNumbers" has no effect.
+@PP
+The remaining eleven setup file options are all concerned with the
+appearance of the reference list.  The first, {@Code "@RefListFormat"},
+reflistformat.sym @Index { @Code "@RefListFormat" }
+determines the overall format of the list.  Here is what its four
+@NoCite { $strunk1979style } possible values do:
+@ID @Tab
+    @Fmta { @Col @Code A ! @Col @OneCol B }
+    vmargin { 0.3v }
+{
+@Rowa
+    A { "@RefListFormat { NoLabels }" }
+    B {  @RefPrint strunk1979style }
+@Rowa
+@Rowa
+    A { "@RefListFormat { Labels }" }
+    B {  2f @Wide {{@NumberOf strunk1979style}.} | @RefPrint strunk1979style }
+@Rowa
+@Rowa
+    A { "@RefListFormat { DropLabels }" }
+    B {  {@NumberOf strunk1979style}. //1vx
+	 2f @Wide {} | @RefPrint strunk1979style
+      }
+@Rowa
+@Rowa
+    A { "@RefListFormat { InLabels }" }
+    B {  {@NumberOf strunk1979style}. &2s @RefPrint strunk1979style }
+}
+@Code "@RefListFormat" is not concerned with the appearance of the
+labels and references, only with where they appear.
+@PP
+@Code "@RefListLabels" determines the appearance of the labels in the
+reflistlabels.sym @Index { @Code "@RefListLabels" }
+reference list (and so has no effect if @Code "@RefListFormat" is
+{@Code "NoLabels"}).  It is a combination of @Code "@RefCiteStyle"
+and {@Code "@RefCiteLabels"}; you can use @Code "@RefNum" and all the
+options of @Code "@Reference" within it.  The default value,
+@ID @Code "@RefListLabels { @RefNum. }"
+produces a numbered reference list in the style of
+{@Code "@NumberedList"}.  Another useful value is
+@ID @Code "@RefListLabels { [@Label] }"
+which produces the @Code "@Label" option of the reference, or the
+@Code "label" option of the citation if there is one, enclosed in
+brackets.  If you do switch to non-numeric labels you will need to
+either use @Code "DropLabels" or else increase the
+@Code "@RefListLabelWidth" option described below.
+@PP
+@Code "@RefListTitle" determines the heading placed just before the
+reflisttitle.sym @Index { @Code "@RefListTitle" }
+reference list at the end of the document:
+@ID @Code "@RefListTitle { Further Reading }"
+Two special values, @Code "references" and {@Code "bibliography"},
+produce References and Bibliography in English and their equivalents
+in other languages.  @Code "@ChapRefListTitle" is the same as
+chapreflisttitle.sym @Index { @Code "@ChapRefListTitle" }
+{@Code "@RefListTitle"}, but applied to the reference list at the end
+of each chapter of a book when @Code "@ChapCite" is used.
+@PP
+{@Code "@RefListIndent"}, {@Code "@RefListRightIndent"}, and
+reflistindent.sym @Index { @Code "@RefListIndent" }
+reflistrightindent.sym @Index { @Code "@RefListRightIndent" }
+reflistgap.sym @Index { @Code "@RefListGap" }
+{@Code "@RefListGap"} determine the left indent, right indent, and gap
+between reference list items, analogously to the {@Code "indent"},
+{@Code "rightindent"}, and {@Code "gap"} options of the @Code "@List"
+symbol (Section {@NumberOf lists}).  @Code "@RefListFont" and
+@Code "@RefListBreak" determine the font and
+reflistfont.sym @Index { @Code "@RefListFont" }
+reflistbreak.sym @Index { @Code "@RefListBreak" }
+paragraph breaking style of the reference list.  For example,
+@ID @OneRow @Code {
+"@RefListFont { -2p }"
+"@RefListBreak { 1.2fx outdent }"
+}
+switches to a smaller size with outdented paragraphs (these work well
+with {@Code NoLabels}).  The empty default values produce the same
+font and break style as in the document as a whole.
+@PP
+@Code "@RefListLabelWidth" determines the distance from the left
+reflistlabelwidth.sym @Index { @Code "@RefListLabelWidth" }
+edge of the labels to the left edge of the references, when
+@Code "@RefListFormat" is @Code Labels or {@Code DropLabels} (it
+has no effect when @Code "@RefListFormat" is @Code NoLabels or
+{@Code "InLabels"}).  This is different to {@Code "@RefListIndent"},
+which determines the distance from the edge of the column to the
+left edge of the item.
+@PP
+Particular care is needed when @Code "@RefListFormat"
+is @Code Labels and the labels are non-numeric, for then if the
+labels are too wide they will overstrike the references.  The default
+value, {@Code 2.00f}, is twice the current font size.  It may be
+changed to any length (Section {@NumberOf objects}).  Regrettably,
+Lout is not clever enough to choose a good value by itself.
+@PP
+Finally, @Code "@RefListSortKey" determines the sorting key used when
+sort.ref @Index { sorting of reference lists }
+reflistsortkey.sym @Index { @Code "@RefListSortKey" }
+ordering the reference list.  The default value,
+@ID @Code "@RefListSortKey { @Tag }"
+sorts by tag; the other popular possibility is to sort by the
+@Code "@Label" option:
+@ID @Code "@RefListSortKey { @Label }"
+As usual @Code "@Label" will use the value of a @Code "label" option
+to the citation if there is one.  There is no way to sort by order of
+first appearance in the document.
+@PP
+@Code "@RefListSortKey" may be any sequence of words
+and options from the @Code "@Reference" symbol, but not @Code "@RefNum"
+for obvious reasons.  A possible more elaborate sorting key is
+@ID @Code "@RefListSortKey { @Author:@Year:@Tag }"
+sorting first by author, then by year within each author, and finally
+by tag.  However you
+are supposed to choose tags which have this effect, and that is more
+reliable since the modern practice is to put the authors' surnames
+after their given names.  There seems to be little practical use for
+sorting keys other than {@Code "@Tag"} and {@Code "@Label"}.
+@PP
+A colon within the @Code "@RefListSortKey" option is converted by Lout
+into a character smaller than any printable character, which ensures that
+the sorting is carried out separately on the three fields.  It is essential
+that the sort key uniquely identify the reference, because if two sort
+keys are equal only one of the references will be printed.  The easiest
+way to ensure this is to always include @Code "@Tag" in the sort key.
+@End @Section
diff --git a/doc/user/ref_cite b/doc/user/ref_cite
new file mode 100644
index 0000000..89958b9
--- /dev/null
+++ b/doc/user/ref_cite
@@ -0,0 +1,90 @@
+@Section
+    @Title { Citation }
+    @Tag { citation }
+@Begin
+@PP
+To cite one or more references, use the @Code "@Cite" symbol like this:
+citing @Index { citing references }
+cite. @Index @Code "@Cite"
+@ID @Code {
+"This feature is beyond our scope @Cite { $kingston1995lout.expert, page 97 }."
+}
+The following object must be enclosed in braces.  It may be an arbitrary
+object as usual.  Within it the @Code "$" character is a symbol with a
+special meaning:  it causes a citation to be made of the reference whose
+@Code "@Tag" option is the word following the @Code "$" symbol:
+@ID {
+This feature is beyond our scope @Cite { $kingston1995lout.expert, page 97 }.
+}
+The reference itself will appear automatically in a reference list at
+the end of the document, and the citation(s) will be enclosed in brackets
+as shown.  There is no need to write @Code "${kingston1995lout.expert},"
+as would normally be the case, because within @Code "@Cite" special
+arrangements are made to prevent commas and semicolons from being a
+nuisance.
+@PP
+A reference may be cited many times, but it will appear in the
+reference list only once.  The references will ordinarily be sorted by
+tag and labelled with Arabic numbers, although this can be changed by
+setting options in the setup file (Section {@NumberOf changeref}).
+@PP
+If you are making a book, there is a @Code "@ChapCite" symbol which is
+chap.cite @Index @Code "@ChapCite"
+the same as @Code "@Cite" except that its references come out at the
+end of the current preface, introduction, chapter, or appendix, rather
+than at the end of the document.
+@PP
+It is quite all right to cite a reference from within a footnote, figure,
+table, or index entry.  The reference will appear in the closest
+reference list following the citation point in the final printed document,
+or if there is no such list, the closest preceding reference list.  This
+is fine in documents with just one reference list; but when using
+@Code "@ChapCite" in books, if the citation point appears after the intended
+reference list (because the footnote or figure has floated past the reference
+list at the end of the chapter), the reference will come out in the wrong list.
+@PP
+Although it is frowned upon by the authorities, some people include
+references which are not cited anywhere in the body of their document.  For
+this there is {@Code "@NoCite"}:
+no.cite @Index @Code "@NoCite"
+@ID @Code {
+"... our scope @NoCite { $kingston1995lout.expert, $kingston1993lout.design }."
+}
+produces
+@ID {
+... our scope @NoCite { $kingston1995lout.expert, $kingston1993lout.design }.
+}
+with the @Code "@NoCite" symbol and any preceding space removed.  The
+references will nevertheless appear in the reference list as usual.  There
+is a @Code "@NoChapCite" symbol that combines @Code "@NoCite" and
+no.chap.cite @Index @Code "@NoChapCite"
+{@Code "@ChapCite"}.  For compatibility with previous versions of Lout,
+there is a @Code "@Ref" symbol:
+ref. @Index @Code "@Ref"
+@ID @Code "@Ref kingston1995lout.expert"
+is the same as @Code "@Cite { $kingston1995lout.expert }" without the
+brackets.  There are analogous {@Code "@ChapRef"}, {@Code "@NoRef"},
+and {@Code "@NoChapRef"}
+chap.ref @Index @Code "@ChapRef"
+no.ref @Index @Code "@NoRef"
+no.chap.ref @Index @Code "@NoChapRef"
+symbols, which are not recommended.
+@PP
+The @Code "@RefPrint" symbol will print a reference on the spot:
+ref.print @Index @Code "@RefPrint"
+resume. @Index { resumes }
+curriculum. @Index { curriculum vitae }
+@ID @Code "@RefPrint kingston1995lout.expert"
+has result
+@ID @RefPrint kingston1995lout.expert
+unrelated to any reference list.  For example,
+@ID @OneRow @Code {
+"@Heading { Journal Articles }"
+"@NumberedList"
+"@LI @RefPrint kingston1985tree"
+"..."
+"@LI @RefPrint kingston1993lout.design"
+"@EndList"
+}
+might appear in someone's resume.
+@End @Section
diff --git a/doc/user/ref_crea b/doc/user/ref_crea
new file mode 100644
index 0000000..994f8d3
--- /dev/null
+++ b/doc/user/ref_crea
@@ -0,0 +1,139 @@
+@Section
+    @Title { Creating your own entry types and formats }
+    @Tag { refstyles }
+@Begin
+@PP
+Although the set of options to the @Code "@Reference" symbol
+({@Code "@Tag"}, {@Code "@Type"}, {@Code "@Author"}, etc.) is fixed, you
+can add your own reference types and change the formatting of existing types.
+@PP
+To do this you must be using your own setup file, as explained in
+Section {@NumberOf setup}.  At the end of the setup file you will find
+this line:
+reference.print @Index { reference printing style }
+ref.style @Index @Code "@RefStyle"
+@ID @Code "@SysDatabase @RefStyle { refstyle }"
+This tells Lout to consult a database file of reference styles called
+{@Code "refstyle.ld"}.  These are not references, they are formatting
+styles, one for each reference type.  The @Code "Sys" in @Code "@SysDatabase"
+sys.database @Index @Code "@SysDatabase"
+means that this file is stored in the @I { Lout system database directory },
+system.database.dir @Index { system database directory }
+refstyle.ld.file @Index { @Code "refstyle.ld" file}
+which is where all the standard databases are kept.  To change the
+formatting of a reference type, or to add your own types, you need to
+create your own reference styles database file by copying and modifying
+{@Code "refstyle.ld"}.
+@PP
+To find out the name of the Lout system database directory, type the
+Unix command
+@ID @Code "lout -V"
+Then, supposing that the Lout system database directory is
+{@Code "/usr/lout/data"}, type
+@ID @Code "cp /usr/lout/data/refstyle.ld mystyle.ld"
+to place a copy of the @Code "refstyle.ld" database file in your
+mystyle.ld.file @Index { @Code "mystyle.ld" file}
+directory, renaming it {@Code "mystyle.ld"}.  Since @Code "refstyle.ld"
+is read-only, you may also need to change the mode of @Code "mystyle.ld"
+to be writable (by @Code "chmod +w mystyle.ld" in Unix).  Now replace
+@ID @Code "@SysDatabase @RefStyle { refstyle }"
+at the end of your setup file by
+@ID @Code "@Database @RefStyle { mystyle }"
+and Lout will read its reference styles from @Code "mystyle.ld" instead
+of {@Code "refstyle.ld"}.  Since the two are at
+present identical, this has changed nothing so far; but now any changes
+you make to @Code "mystyle.ld" will affect your document.  Changing
+@Code "@SysDatabase" to @Code "@Database" makes Lout search your
+current directory for {@Code "mystyle.ld"}, whereas @Code "@SysDatabase"
+searches only the system directory.
+@PP
+In practice you will probably want to store your database of reference
+styles in some library directory, so that it can be used by
+many documents.  A Unix pathname is appropriate for this:
+@ID @Code "@Database @RefStyle { \"/usr/jeff/lib/mystyle\" }"
+Quotes are needed because of the @Code "/" characters.
+@PP
+The database entries within @Code "refstyle.ld" and @Code "mystyle.ld"
+might look something like this:
+@ID @OneRow @Code {
+"{ Book @RefStyle @Style"
+"  {  @Reference&&reftag @Open"
+"     {"
+"        @Author.  @I @Title.  @Publisher, @Year."
+"     }"
+"  }"
+"}"
+}
+The meaning of the first two lines is beyond our scope, except that
+@Code "Book" on the first line means that this is the entry which
+defines how references of type @Code Book will be printed.  Fortunately,
+apart from this one word these two lines are the same in every
+reference style entry so you don't need to understand them.  The
+important part is in the middle:
+@ID @Code "@Author.  @I @Title.  @Publisher, @Year."
+The meaning should be clear:  first print the author option and a full
+stop, then the title option and another full stop in italics, and so
+on.  To change the formatting of books, change this object.  To create
+a new reference type, copy the entire database entry, change @Code Book
+to a new name of your choice, and change the middle part.  Don't forget
+to delete the index file @Code "mystyle.li" afterwards, if there is one,
+so that Lout knows to generate it afresh.
+@PP
+Although the entry shown above is perfectly viable, the real entry for
+@Code Book is much more complicated, in part because there are more
+options than those basic four, but mainly because the real entry goes
+to great lengths to do the right thing when options are omitted:
+@ID @Tab
+    vmargin { 0.45vx }
+    @Fmta { @Col @Code A ! @Col @Code B }
+{
+@Rowa A { "{ Book @RefStyle @Style" }
+@Rowa A { "  {  @Reference&&reftag @Open" }
+@Rowa A { "     {" }
+@Rowa A { "        {  @Author.  {}" }		B { "}  @If  @Author" }
+@Rowa A { "        {  @I @Title" }		B { "}  @If  @Title" }
+@Rowa A { "        {  @Word&&notitle" }		B { "}  @If  @Not @Title" }
+@Rowa A { "        {  , @Pinpoint" }		B { "}  @If  @Pinpoint" }
+@Rowa A { "        {  , @Word&&pages @NumSep @Pages" }	B { "}  @If  @Pages" }
+@Rowa A { "        {  , @Word&&page @NumSep @Page" }	B { "}  @If  @Page" }
+@Rowa A { "        {  .  @TitleNote" }		B { "}  @If  @TitleNote" }
+@Rowa A { "        {  .  @HowPublished" }	B { "}  @If  @HowPublished" }
+@Rowa A { "        {  .  @Publisher" }		B { "}  @If  @Publisher" }
+@Rowa A { "        {  .  @Organization" }	B { "}  @If  @Organization" }
+@Rowa A { "        {  .  @Institution" }	B { "}  @If  @Institution" }
+@Rowa A { "        {  , @Address" }		B { "}  @If  @Address" }
+@Rowa A { "        {  .  @Edition" }		B { "}  @If  @Edition" }
+@Rowa A { "        {  , @Month @Year" }	B { "}  @If  @Year @And @Month" }
+@Rowa A { "        {  , @Year " }	B { "}  @If  @Year @And @Not @Month" }
+@Rowa A { "        {  ." }		B { "}  @If  @True" }
+@Rowa A { "        {  {}  URL @URL." }	B { "}  @If  @URL" }
+@Rowa A { "        {  {}  @Note" }	B { "}  @If  @Note" }
+@Rowa A { "     }" }
+@Rowa A { "  }" }
+@Rowa A { "}" }
+}
+The meaning is that each object to the left of an @Code "@If" will be
+if. @Index @Code "@If"
+printed only if the condition to the right of the @Code "@If" is
+true.  The condition may contain options, which are considered to be
+true if they are not omitted (non-empty), and it may contain {@Code "@And"},
+and. @Index @Code "@And"
+or. @Index @Code "@Or"
+not. @Index @Code "@Not"
+true. @Index @Code "@True"
+{@Code "@Or"}, {@Code "@Not"}, and @Code "@True" with the usual precedence
+and meaning.  Sub-conditions may be enclosed in braces if desired, although
+it is best to keep the conditions as simple as possible given the
+complexity of the whole setup.
+@PP
+The objects subject to @Code "@If" are printed with no space preceding
+them; any space in the final print will be the result of space within
+them, not between them.  This is why @Code "@If @True" is not redundant.
+@PP
+The object @Code "@Word&&notitle" produces @Code "No title" in the
+current language; @Code "@Word&&pages" produces {@Code pages} in the
+current language, and so on.  Consult database @Code "standard.ld" for
+standard.ld.file @Index { @Code "standard.ld" file }
+other standard words and phrases, and page {@PageOf numsep} for
+{@Code "@NumSep"}.
+@End @Section
diff --git a/doc/user/ref_entr b/doc/user/ref_entr
new file mode 100644
index 0000000..63516b2
--- /dev/null
+++ b/doc/user/ref_entr
@@ -0,0 +1,293 @@
+@Section
+    @Title { Constructing database entries }
+    @Tag { entries }
+@Begin
+@PP
+Here is the complete, fixed list of options that you may give to the
+@Code "@Reference" symbol:
+@ID @Tab
+   vmargin { 0.5vx }
+   @Fmta { @Col @Code A ! @Col B }
+{
+@Rowa
+    A { "{ @Reference" }
+@Rowa
+    A { "    @Tag  {}" }
+    B { Used to cite this reference }
+@Rowa
+    A { "    @Type  {}" }
+    B { The type of reference, for example {@Code Book}, {@Code Article} }
+@Rowa
+    A { "    @Abstract  {}" }
+    B { Not used, intended to hold an abstract }
+@Rowa
+    A { "    @Address  {}" }
+    B { The address of a publisher, organization, or institution }
+@Rowa
+    A { "    @Annote  {}" }
+    B { Not used, intended for annotations }
+@Rowa
+    A { "    @Author  {}" }
+    B { The author(s) or editor(s) }
+@Rowa
+    A { "    @Day  {}" }
+    B { The day of the month, for newspaper articles }
+@Rowa
+    A { "    @Edition  {}" }
+    B { The edition, for example @Code "Second Edition" }
+@Rowa
+    A { "    @HowPublished  {}" }
+    B { How something strange has been published }
+@Rowa
+    A { "    @InAuthor  {}" }
+    B { The author of the work that the cited work appears within }
+@Rowa
+    A { "    @InTitle  {}" }
+    B { The title of the work that the cited work appears within }
+@Rowa
+    A { "    @Institution  {}" }
+    B { The institution or school }
+@Rowa
+    A { "    @Journal  {}" }
+    B { The journal name }
+@Rowa
+    A { "    @Keywords  {}" }
+    B { Not used, intended to hold keywords }
+@Rowa
+    A { "    @Label  {}" }
+    B { The label of a labelled reference }
+@Rowa
+    A { "    @Month  {}" }
+    B { The month of publication or writing  }
+@Rowa
+    A { "    @Note  {}" }
+    B { Any additional helpful information }
+@Rowa
+    A { "    @Number  {}" }
+    B { The number of a technical report }
+@Rowa
+    A { "    @Organization  {}" }
+    B { The organization sponsoring the work }
+@Rowa
+    A { "    @Page  {}" }
+    B { Page number if only one, for example @Code "23" }
+@Rowa
+    A { "    @Pages  {}" }
+    B { Page numbers if more than one, for example @Code "23--47" }
+@Rowa
+    A { "    @Pinpoint  {}" }
+    B { A point or part of the work, for example @Code "Chapter VI" }
+@Rowa
+    A { "    @Publisher  {}" }
+    B { The publisher of the work }
+@Rowa
+    A { "    @Title  {}" }
+    B { The title of the work }
+@Rowa
+    A { "    @TitleNote  {}" }
+    B { Additional title information (series, editor, etc.) }
+@Rowa
+    A { "    @TRType  {}" }
+    B { The type of a technical report, for example @Code "Research Note" }
+@Rowa
+    A { "    @URL  {}" }
+    B { The URL of the reference }
+@Rowa
+    A { "    @Volume  {}" }
+    B { The volume of a journal }
+@Rowa
+    A { "    @Year  {}" }
+    B { The year of publication or writing }
+@Rowa
+    A { "}" }
+}
+Every reference may contain any of these options, although, depending
+on the {@Code "@Type"} option, only some will be printed.  You can't give
+an option twice; in particular, multiple authors must be placed
+within one @Code "@Author" option, arranged as you want them to appear.  Here
+is the complete set of values that you may give to the @Code "@Type" option:
+@ID @Tab
+    vmargin { 0.5vx }
+    @Fmta { @Col @Code A ! @Col @Code B ! @Col @Code C ! @Col @Code D }
+{
+ @Rowa
+    A { Book }
+    B { TechReport }
+    C { Article }
+    D { InBook }
+ @Rowa
+    A { Proceedings }
+    B { MastersThesis }
+    C {}
+    D { InProceedings }
+ @Rowa
+    A { PhDThesis }
+    B { Misc }
+    C {}
+    D {}
+}
+Each column represents one broad category of reference type:  the first
+contains large works; the second contains small works not appearing
+within anything else (although possibly part of a series); the third
+contains small works appearing within an ongoing forum for such works;
+and the fourth contains small works appearing within large works.  In each
+case, the reference may be to the work as a whole, or to one point or part
+of it (known as pinpointing).
+@PP
+Some care is needed when choosing the @Code "@Tag" option, since references
+are both cited and sorted by tag.  It is best to choose a three-part
+tag consisting of the first author's surname and possibly initial, the
+year of publication, and a brief reminder of the contents:
+@ID @Code "@Tag { kingston1995lout.expert }"
+Keep to lower-case letters, since mixed cases confuse the sorting, and
+give the full four digits of the year to avoid trouble in the year
+2000.  Multi-word tags are possible but not recommended.
+@PP
+Unusually for Lout, you can have unquoted @Code "/" and @Code "~"
+characters inside the @Code "@URL" option:
+@ID @Code "@URL { ftp://ftp.cs.su.oz.au/jeff/lout }"
+In fact it is better not to use quotes because then Lout will
+be able to break lines at @Code "/" characters, which is very useful
+since URLs tend to be long and prone to causing bad line breaks.
+@PP
+Since the types within each broad category are similar, our plan is to
+give one example of each and briefly note how the others differ.  Here
+is a @Code Book entry showing all its options:
+book.ref.type @Index { @Code Book reference type }
+@ID @OneRow @Code {
+"{ @Reference"
+"     @Tag { homer.odyssey }"
+"     @Type { Book }"
+"     @Author { Homer }"
+"     @Title { The Odyssey }"
+"     @TitleNote { Translated by E. V. Rieu }"
+"     @Pinpoint { Chapter VI }"
+"     @Pages { 102--111 }"
+"     @Page { 102 }"
+"     @Publisher { Penguin Books }"
+"     @Address { Harmondsworth, Middlesex }"
+"     @Edition { Penguin Classics Edition }"
+"     @Month { August }"
+"     @Year { 1942 }"
+"     @Note { The date of composition is unknown,"
+"but is thought to be about the tenth century BC. }"
+"}"
+}
+And here is what it produces:
+@ID @RefPrint homer.odyssey
+The only compulsory options are {@Code "@Tag"}, {@Code "@Type"}, and
+{@Code "@Title"}, and Lout will carefully adjust the formatting to the
+right thing when you omit others.  A basic book would have just
+{@Code "@Tag"}, {@Code "@Type"}, {@Code "@Author"}, {@Code "@Title"},
+{@Code "@Publisher"}, and {@Code "@Year"} options.
+@PP
+@Code Proceedings is similar, except you
+proceedings.ref.type @Index { @Code Proceedings reference type }
+may have an @Code "@Organization" or @Code "@Institution" option for
+the sponsoring organization if you wish, and the author will either be
+absent or an editor:
+@ID @Code "@Author { P. W. Lamb, editor }"
+There is no option specifically for editors, translators, and so forth.
+@PP
+@Code PhDThesis is very similar again, with @Code "@Institution"
+phdthesis.ref.type @Index { @Code PhDThesis reference type }
+instead of {@Code "@Publisher"}, and the phrase `Ph.D. thesis'
+appearing by magic in the right spot.  Like all words and phrases
+introduced automatically by Lout, it will be translated into the current
+language if this is not English.
+@PP
+Moving now to the second broad category, here is a typical {@Code TechReport}:
+techreport.ref.type @Index { @Code TechReport reference type }
+@ID @OneRow @Code {
+"{ @Reference"
+"     @Tag { christofides1976tsp }"
+"     @Type { TechReport }"
+"     @Author { Christofides, N. }"
+"     @Title { Worst-case analysis of a new heuristic"
+"for the travelling salesman problem }"
+"     @Number { 388 }"
+"     @Institution { Graduate School of Industrial"
+"Administration, Carnegie-Mellon University }"
+"     @Address { Pittsburgh, PA }"
+"     @Year { 1976 }"
+"}"
+}
+Here is the result:
+@ID @RefPrint christofides1976tsp
+The two novelties here are the @Code "@Number" option, which is the
+number of the report, and the `Tech. Rep.' phrase.  If you
+need some other phrase instead, use the @Code "@TRType" option:
+@ID @Code "@TRType { Programmer's Manual }"
+or whatever.  The phrase will be `Master's Thesis' in the
+current language for type {@Code MastersThesis}, and absent in type
+mastersthesis.ref.type @Index { @Code MastersThesis reference type }
+misc.ref.type @Index { @Code Misc reference type }
+{@Code Misc}.  You may use the pinpointing options ({@Code "@Pinpoint"},
+{@Code "@Page"}, and {@Code "@Pages"}) and {@Code "@TitleNote"},
+{@Code "@Month"}, and {@Code "@Note"} in the same way as for books.
+@PP
+Journal articles are referenced by journal name, volume, number, and
+page(s):
+article.ref.type @Index { @Code Article reference type }
+@ID @OneRow @Code {
+"{ @Reference"
+"     @Tag { kingston1993lout.design }"
+"     @Type { Article }"
+"     @Author { Jeffrey H. Kingston }"
+"     @Title { The design and implementation of the"
+"Lout document formatting language }"
+"     @Journal { Software---Practice and Experience }"
+"     @Volume { 23 }"
+"     @Pages { 1001--1041 }"
+"     @Year { 1993 }"
+"}"
+}
+The result of this is
+@ID @RefPrint kingston1993lout.design
+All are optional, as usual.  Notice that @Code "@Pages" and @Code "@Page"
+refer to the whole article so are not available for pinpointing here,
+but you may still use {@Code "@Pinpoint"}.
+@PP
+Finally, small works that appear within large works have @Code "@Author"
+inbook.ref.type @Index { @Code InBook reference type }
+and @Code "@Title" options for the work itself, and @Code "@InAuthor" and
+@Code "@InTitle" for the work that it appears within:
+@ID @OneRow @Code {
+"{ @Reference"
+"     @Tag { rieu1942intro }"
+"     @Type { InBook }"
+"     @Author { E. V. Rieu }"
+"     @Title { Introduction to @I { The Odyssey } }"
+"     @InAuthor { Homer }"
+"     @InTitle { The Odyssey }"
+"     @Publisher { Penguin }"
+"     @Year { 1942 }"
+"}"
+}
+@Code "@InAuthor" would often be absent or an editor.  The result is
+@ID @RefPrint rieu1942intro
+The other options are as for large works.  Type @Code InProceedings is
+inproceedings.ref.type @Index { @Code InProceedings reference type }
+similar to {@Code InBook}.
+@PP
+A database usually has a long life, and some day it might find itself
+used in a document whose language is not the one its original compiler
+had in mind.  For this reason, a truly meticulous compiler of database
+entries would enclose @I all language-specific options in
+@Code "@Language" symbols:
+@ID @OneRow @Code {
+"{ @Reference"
+"    @Tag { zimand1986size.sets.strings }"
+"    @Type { Article }"
+"    @Author { French @Language { M. Zimand } }"
+"    @Title { English @Language { On the topological size of sets of random strings } }"
+"    @Journal { German @Language { Zeitschr. f. math. Logik und Grundlagen d. Math. } }"
+"    @Volume { 32 }"
+"    @Pages { 81--88 }"
+"    @Year { 1986 }"
+"}"
+}
+(My apologies to M. Zimand if he or she is not French.)  This ensures
+correct hyphenation whatever the language of the document in which the
+reference appears.
+@End @Section
diff --git a/doc/user/ref_labe b/doc/user/ref_labe
new file mode 100644
index 0000000..1b8cc54
--- /dev/null
+++ b/doc/user/ref_labe
@@ -0,0 +1,65 @@
+@Section
+    @Title { Labelled (as opposed to numbered) references }
+    @RunningTitle { Labelled references }
+    @Tag { labelled }
+@Begin
+@PP
+Lout ordinarily assigns a number to each reference, and prints this
+labelled.refs @Index { labelled references }
+number beside the reference in the reference list and at the point(s)
+of citation.  There is a way to make Lout use a label of your choice
+instead of a number for each reference.  First change the following
+setup file options to the values shown (these options are explained
+in Section {@NumberOf changeref}):
+@ID @OneRow @Code {
+"@RefCiteLabels { @Label }"
+"@RefListLabels { @Label. }"
+"@RefListLabelWidth { 4.00f }"
+"@RefListSortKey { @Label }"
+}
+Then make sure that every reference you cite has a {@Code "@Label"} option:
+@ID @OneRow @Code {
+"{ @Reference"
+"    @Tag { kingston1995lout.expert }"
+"    @Type { TechReport }"
+"    @Label { Kin94 }"
+"    ..."
+"}"
+}
+@Code "@Label" may contain several words, and even font changes, but not
+an arbitrary object.
+@PP
+The effect of these changes is that your references will now be labelled
+with their @Code "@Label" options instead of with numbers, and they will
+be sorted by label instead of by tag.  However, tags are still used when
+citing.
+@PP
+The big problem with labels is that they vary from document to
+document, either because of a change of style or because the usual
+first few letters of the authors' names plus year has to be augmented
+with {@Code a}, {@Code b}, {@Code c} etc. to distinguish publications
+by the same authors in the same year.  To help you overcome these
+problems, the @Code "$" symbol has a @Code "label" option:
+@ID @Code {
+"@Cite { $ label { Kin94a } kingston1995lout.expert, ... }"
+}
+The @Code "@Ref" and @Code "@ChapRef" symbols also have a @Code label
+option.  If you use this option, it will be used to label the reference
+instead of the @Code "@Label" option from the @Code "@Reference" symbol
+(indeed, the @Code "@Reference" symbol need have no @Code "@Label" option
+in this case).  But note that using @Code "label" does not itself give
+you labelled references; you get them with the setup file options as
+explained above.
+@PP
+If your labels turn out to be too wide for the space allowed for them
+in the reference list, you have two alternatives.  One is to increase
+the @Code "@RefListLabelWidth" setup file option shown above, since it
+determines this space.  The other is to change the @Code "@RefListFormat"
+setup file option to {@Code "DropLabels"}, which produces drop items:
+@ID @OneRow {
+@RawTaggedList
+@DTI { Kin94a. } @RefPrint kingston1995lout.expert
+@RawEndList
+}
+Then it won't matter how wide your labels are.
+@End @Section
diff --git a/doc/user/ref_sett b/doc/user/ref_sett
new file mode 100644
index 0000000..283cb11
--- /dev/null
+++ b/doc/user/ref_sett
@@ -0,0 +1,95 @@
+@Section
+    @Title { Setting up a bibliographic database }
+    @Tag { databases }
+@Begin
+@PP
+The basic idea is to store your references in a separate
+database.file @Index { database file }
+@I { database file }, in a form which does not include formatting
+details such as font changes.  This makes it easy to use the same
+references in many documents, and it leaves the formatting to Lout.  Here
+is an example of a reference as it would appear in a database file:
+@ID @OneRow @Code {
+"{ @Reference"
+"    @Tag { vanleunen1992 }"
+"    @Type { Book }"
+"    @Author { Mary-Claire van Leunen }"
+"    @Title { A Handbook for Scholars }"
+"    @Publisher { Oxford }"
+"    @Edition { Revised Edition }"
+"    @Year { 1992 }"
+"}"
+}
+reference. @Index @Code "@Reference"
+@Code "@Reference" is a symbol, and {@Code "@Tag"}, {@Code "@Type"},
+{@Code "@Author"}, and so on are its options.  The database file as
+a whole consists of a sequence of references, each enclosed in braces
+as shown.
+@PP
+The @Code "@Tag" option is compulsory:  since you cite a reference by
+giving its tag, there must be one.  The @Code "@Type" option is also
+type. @Index { @Code "@Type" option }
+compulsory, since it says whether the reference is to a book, a journal
+article, or whatever, and this determines what other options are
+required.  Section {@NumberOf entries} describes all the types provided
+by Lout, and Section {@NumberOf refstyles} explains how to add your own.
+@PP
+Lout database file names must end in {@Code ".ld"}, so now suppose that
+you have made one called
+ld.file @Index { @Code ".ld" file }
+refs.ld.file @Index { @Code "refs.ld" file }
+@Code "refs.ld" and put it in the same directory as your document.  Next,
+place
+@ID @Code "@Database @Reference { refs }"
+database. @Index @Code "@Database"
+at the start of your document, just before {@Code "@Doc"},
+{@Code "@Document"}, {@Code "@Report"}, or whatever.  Alternatively,
+you may place it at the end of your setup file.  It informs Lout that
+you might be referring to @Code "@Reference" symbols in database
+@Code "refs" (that is, in file {@Code "refs.ld"}).
+@PP
+If you want to maintain a central database, used by many documents, you
+won't want it in the same directory as any one of them.  A Unix
+pathname will be more appropriate:
+@ID @Code "@Database @Reference { \"/usr/jeff/lib/refs\" }"
+or whatever.  Quotes are needed because of the @Code "/" characters.
+@PP
+With the database file created and the @Code "@Database" line in place,
+you are ready to start citing references.  The first time that the
+database.index.file @Index { database index file }
+index.file @Index { index file }
+database is used, Lout will create an @I { index file } whose purpose
+is to speed up the retrieval of your references.  Thanks to this file
+you can have hundreds or even thousands of references in your database,
+without slowing Lout down very much.  However, whenever you change your
+database file @I { you must remove its corresponding index file }, so
+that Lout knows to create it afresh.
+@FootNote {
+Depending on how it was installed on your system, Lout may be able to
+use the time of last modification of the database file and its index
+file to determine automatically whether the index file needs to be
+created afresh, thus saving you the trouble of removing it.  You can
+find out whether this is true of your system by typing the command
+{@Code "lout -V"}.
+}
+ The index file is stored in the
+same directory as the database file, and it has the same name except
+that it ends in @Code ".li" rather than @Code ".ld" (e.g.
+li.file @Index { @Code ".li" file }
+{@Code "refs.li"}).
+@PP
+If a separate database file is not convenient for some reason, perhaps
+because you need a self-contained document in a single file, the
+@Code "@Reference" symbols may be incorporated into the document
+itself, anywhere that ordinary text may appear.  Nothing will appear
+where they are typed in, but Lout will notice them and treat them as if
+they had come from a database file.  In this case no @Code "@Database"
+symbol is needed unless you are referring to a database as well.
+@PP
+You may have multiple databases, like this:
+@ID @OneRow @Code {
+"@Database @Reference { myrefs }"
+"@Database @Reference { \"/usr/pub/refs/theoryrefs\" }"
+}
+Lout will search the databases in the order you list them.
+@End @Section
diff --git a/doc/user/str b/doc/user/str
new file mode 100644
index 0000000..0312dfb
--- /dev/null
+++ b/doc/user/str
@@ -0,0 +1,19 @@
+@Chapter
+    @Title { Adding Structure to Documents }
+    @Tag { structure }
+@Begin
+@BeginSections
+@Include { str_disp }
+@Include { str_list }
+@Include { str_foot }
+@Include { str_marg }
+@Include { str_theo }
+@Include { str_figs }
+@Include { str_larg }
+@Include { str_cros }
+@Include { str_cont }
+@Include { str_indx }
+@Include { str_colu }
+@Include { str_defs }
+@EndSections
+@End @Chapter
diff --git a/doc/user/str_colu b/doc/user/str_colu
new file mode 100644
index 0000000..b54a404
--- /dev/null
+++ b/doc/user/str_colu
@@ -0,0 +1,40 @@
+@Section
+   @Title { Multiple columns }
+   @Tag { columns }
+@Begin
+@PP
+You can change the number of columns of text per page, and the width of
+columns. @Index columns
+multiple.columns @Index { multiple columns }
+the gap between the columns, by changing these two setup file options:
+columnnumber. @Index @Code "@ColumnNumber"
+columngap. @Index @Code "@ColumnGap"
+@ID @OneRow @Code {
+"@ColumnNumber { 1 }"
+"@ColumnGap { 1.00c }"
+}
+If you are using your own setup file (Section {@NumberOf setup}), you can
+find and change them there.  If not, @Code "@ColumnNumber" may be changed
+at the beginning of your document (Section {@NumberOf ordinary}).
+@PP
+@Code "@ColumnNumber" may be any number between 1 and 10, with default
+value 1 as shown, and @Code "@ColumnGap" may be any length (Section
+{@NumberOf objects}).  The column width is derived from these options
+column.width @RawIndex { column width }
+column.width.pages @SubIndex { on pages }
+using the obvious formula
+@ID @Eq { columnwidth = { pagewidth - margins -
+({@Code "@ColumnNumber"} - 1) times {@Code "@ColumnGap"} }
+over @Code "@ColumnNumber"
+}
+You must ensure that this comes to something reasonable.
+@PP
+These two options do not apply to pages containing an index.  For them
+there are similar setup file options called @Code "@IndexColumnNumber"
+and @Code "@IndexColumnGap" (Section {@NumberOf indexes}).
+@PP
+Most document types permit you to have multiple columns, but certain
+things will be kept full width regardless of the @Code "@ColumnNumber"
+option:  figures and tables, chapter headings, and so on.  The details
+vary with the document type, so are deferred to Chapter {@NumberOf types}.
+@End @Section
diff --git a/doc/user/str_cont b/doc/user/str_cont
new file mode 100644
index 0000000..148447e
--- /dev/null
+++ b/doc/user/str_cont
@@ -0,0 +1,83 @@
+@Section
+   @Title { Tables of contents }
+   @Tag { contents }
+@Begin
+@PP
+Lout takes note of the titles of all your large-scale structure symbols
+contents. @Index { contents, tables of }
+tables.of.contents. @Index { tables of contents }
+(Section {@NumberOf largescale}) and what pages they begin on, and it
+uses this information to produce a table of contents like the one at
+the start of the present document.  It is totally automatic; you do
+nothing.
+@PP
+Some details of the appearance of the table of contents, including
+whether to make one or not, are controlled by options in the setup
+file.  The default setting is to make one in books but not to in
+other types of documents, but by changing the setup file you can have
+a table of contents in any type of document.
+@PP
+Section @NumberOf setup describes setup files in general and how to
+change the options within them.  The options relevant to tables of
+contents and their default values are:
+@ID @OneRow @Code {
+"@MakeContents { No }"
+"@ContentsGap { 0.20v }"
+"@ContentsGapAbove { 0.80v }"
+"@ContentsGapBelow { 0.00v }"
+"@ContentsLeader { .. }"
+"@ContentsLeaderGap { 4s }"
+"@ContentsRightWidth { 3f }"
+}
+The @Code "@MakeContents" option may be @Code Yes or {@Code No}, and
+makecontents. @Index @Code "@MakeContents"
+determines whether a table of contents is made or not.  Its default
+value is @Code No but it is set to @Code Yes in the @Code book setup
+file.
+@PP
+@Code "@ContentsGap" determines how much vertical space to leave
+contentsgap. @Index @Code "@ContentsGap"
+above each line of the table of contents, in addition to the usual
+single line spacing; its value may be any length (Section
+{@NumberOf objects}).  The default value, {@Code "0.20v"}, is twenty
+percent of the current inter-line spacing.
+@PP
+Some entries, such as those for chapters and appendices in books, are
+more important than others.  @Code "@ContentsGap" does not apply to these
+entries; instead, @Code "@ContentsGapAbove" and @Code "@ContentsGapBelow"
+contentsgapabove. @Index @Code "@ContentsGapAbove"
+contentsgapbelow. @Index @Code "@ContentsGapBelow"
+are used above and below each of them, again in addition to the usual
+single line spacing.
+@PP
+@Code "@ContentsLeader" is the object which is repeated across the page
+contentsleader. @Index @Code "@ContentsLeader"
+to connect each entry with its page number; popular values are @Code ".."
+and @Code "." and the empty object.  @Code "@ContentsLeaderGap" determines
+contentsleadergap. @Index @Code "@ContentsLeaderGap"
+how far apart these objects are; the default value, {@Code "4s"}, is
+four times the width of a space character.  @Code "@ContentsLeaderGap"
+may be {@Code "0s"}, but only if @Code "@ContentsLeader" is non-empty.
+@PP
+@Code "@ContentsRightWidth" reserves some
+contentsrightwidth. @Index @Code "@ContentsRightWidth"
+space at the far right for page numbers.  Any entry wide enough to
+intrude into this space is broken into two or more lines to keep it
+clear.
+@PP
+In addition to these options, each document type has options that
+determine which large-scale structure symbols will be listed in the
+table of contents.  For example, among the options to the
+@Code "@BookSetup" symbol in the @Code book setup file are these:
+@ID @OneRow @Code {
+"@ChapterInContents { Yes }"
+"@SectionInContents { Yes }"
+"@SubSectionInContents { Yes }"
+"@SubSubSectionInContents { No }"
+"@AppendixInContents { Yes }"
+"@SubAppendixInContents { Yes }"
+"@SubSubAppendixInContents { No }"
+}
+Each may be either {@Code "Yes"} or {@Code "No"}; these default values
+produce entries for everything except sub-subsections and sub-subappendices.
+@End @Section
diff --git a/doc/user/str_cros b/doc/user/str_cros
new file mode 100644
index 0000000..7eb74c3
--- /dev/null
+++ b/doc/user/str_cros
@@ -0,0 +1,112 @@
+@Section
+   @Title { Cross references }
+   @Tag { cross }
+@Begin
+@PP
+Cross references are a useful feature of documents, but they are a
+cross.ref @Index { cross references }
+problem for authors.  Suppose that at one point of your document
+you have
+@ID @OneRow @Code {
+"We hold these truths to be self-evident, that all men are created equal,"
+"that they are endowed by their Creator with certain inalienable Rights,"
+"that among these are Life, Liberty, and the pursuit of Happiness..."
+}
+and that at some other point, earlier or later, you have
+@ID @OneRow @Code {
+"The anti-slavery cause, founded as it was on the Declaration"
+"of Independence (page 181), could appeal to patriotic as"
+"well as moral sentiments..."
+}
+This is a @I { cross reference }, and the problem is that as the document
+is revised, the Declaration of Independence might move to page 185, and
+the cross reference must be found and changed.
+@PP
+Lout has a simple solution to this problem.  Instead of writing the
+pageof. @Index @Code "@PageOf"
+page number, write
+@ID @OneRow @Code {
+"The anti-slavery cause, founded as it was on the Declaration"
+"of Independence (page @PageOf { decl.of.ind }), could appeal to"
+"patriotic as well as moral sentiments..."
+}
+instead, and at the point referred to, write
+pagemark. @Index @Code "@PageMark"
+@ID @OneRow @Code {
+"We @PageMark decl.of.ind hold these truths to be self-evident, that..."
+}
+Inserting @Code "@PageMark decl.of.ind" will not affect the result,
+but Lout makes a note of the number of the page on which the word
+preceding it appears, and inserts that number in place of
+{@Code "@PageOf decl.of.ind"}.  The tag, {@Code "decl.of.ind"}, may be
+tag. @Index { tag }
+any simple word (actually Lout will accept a multi-word tag, but they
+are very inconvenient and better avoided).  The braces are there, as
+usual, to control grouping:  we don't want the following punctuation
+characters in the tag.
+@PP
+One tag called @Code "last.page" is created automatically
+"last.page.tag" @Index { @Code "last.page" tag }
+for you.  @Code "@PageOf last.page" gives the number of the last page
+of the document.  For example, the result for this document is
+{@PageOf last.page}.
+@PP
+Cross referencing also applies to large-scale structure symbols such as
+@Code "@Chapter" and @Code "@Section" (any symbol with a @Code "@Title"
+option), as well as @Code { "@FootNote" }, @Code { "@EndNote" },
+@Code { "@Figure" }, @Code { "@Table" }, the numbered display
+symbols, and @Code "@ListItem" and @Code "@DropListItem" (but not
+@Code "@TagItem" and {@Code "@DropTagItem"}).  Each of these symbols
+has a @Code "@Tag" option:
+tag.sym @Index @Code "@Tag"
+@ID @OneRow @Code {
+"@Section"
+"   @Title { Cross references }"
+"   @Tag { cross }"
+"@Begin"
+"@PP"
+"Cross references are a useful ..."
+}
+Now you can use the @Code "@PageOf" symbol to find the
+number of the page on which the symbol's result begins, and the
+@Code "@NumberOf" symbol to find its number:
+numberof. @Index @Code "@NumberOf"
+@ID @OneRow @Code {
+"For further information on this point, please consult"
+"Section @NumberOf cross (page @PageOf { cross })."
+}
+produces
+@QD {
+For further information on this point, please consult
+Section @NumberOf cross (page @PageOf { cross }).
+}
+Like all tags, the value of the @Code "@Tag" option should be a simple
+word (although Lout does accept multi-word tags).  Cross referencing of
+list items yields just the number of the item, in Arabic, Roman, or
+whatever; it does not include the surrounding parentheses or other
+decorations introducted by the list's @Code "style" option.
+@PP
+To work cross references out, Lout has to process your document more
+multiple.runs @Index { multiple runs, why needed }
+than once, storing information between runs in special files it
+creates whose names end in @Code ".li" and {@Code ".ld"}.  A complex
+document like this Guide requires five runs, but since every run
+produces a perfectly good PostScript file suitable for proof reading,
+in fact you need two runs to start with and one run per cycle of
+revision thereafter, only one more than would have been necessary
+in any case.
+@PP
+The cross referencing system assumes that each Unix directory contains
+directories @Index { directories, Lout files and }
+only one Lout document (possibly spread over many files).  If you keep
+several documents in one directory you can turn off the cross referencing
+with the @Code "-s" flag:
+@ID @Code "lout  -s  simple  >  simple.ps"
+Since this will cause question marks to replace footnote and section
+numbers, and other products of cross referencing, it is only feasible
+for simple documents.  Alternatively, you can reset cross referencing
+when switching from one document to another, by removing file
+lout.li @Index { @Code lout.li file }
+{@Code "lout.li"}.  You should also remove this file if your document
+changes radically -- from a report to a book, say.
+@End @Section
diff --git a/doc/user/str_defs b/doc/user/str_defs
new file mode 100644
index 0000000..71bd71e
--- /dev/null
+++ b/doc/user/str_defs
@@ -0,0 +1,134 @@
+@Section
+   @Title { Defining new symbols }
+   @Tag { definitions }
+@Begin
+@PP
+Whenever you find yourself typing the same thing repeatedly, you can
+definitions. @Index definitions
+save a lot of time by defining your own personal symbol to stand for that
+thing.  For example, suppose you type your company's name, @Batlow,
+frequently.  You can define your own symbol, {@Code "@Batlow"} say,
+so that
+@ID @Code {
+"Concerning your crate supply contract with @Batlow, @Batlow wishes to ..."
+}
+produces
+@ID {
+Concerning your crate supply contract with @Batlow, @Batlow wishes to ...
+}
+You will never have to type @Batlow again.
+@PP
+The method is to create a file called @Code "mydefs" in your current
+mydefs.file @Index { @Code mydefs file }
+directory, containing definitions like this:
+@ID @OneRow @Code {
+"import @BasicSetup"
+"def @Batlow { Batlow Food Distributors Pty. Ltd. }"
+}
+The meaning of the first line, {@Code "import @BasicSetup"}, will
+be explained shortly.  After that comes @Code "def" for `define,'
+then the name of the symbol being defined, then its value between
+braces.  So this example defines a symbol called @Code "@Batlow" to
+stand for the object following it between braces.  Lout will read this
+file during its setup phase (Section {@NumberOf setup}).
+@PP
+Your symbols may have any names you wish made from letters and
+{@Code "@"}.  However, it is good practice to have exactly one
+{@Code "@"}, at the start, and to choose distinctive names that
+have no chance of being the same as the name of any existing
+symbol.  @Code "@Batlow" is a good choice, for example.
+@PP
+The object between braces is quite arbitrary; in particular, it may
+contain symbols.  For example, suppose you frequently need a small grey box:
+@ID @OneRow @Code {
+"import @BasicSetup"
+"def @GreyBox { @Box paint { lightgrey } {} }"
+}
+This defines a @Code "@GreyBox" symbol that produces {@GreyBox}.  Most
+of the symbols in this guide are from the @I {BasicSetup package},
+import. @Index @Code import
+which is why @Code "import @BasicSetup" is required:  it makes
+these symbols available to the definition, and can actually be omitted
+before definitions like the one for @Code "@Batlow" which do not use
+any symbols.  However it does no harm, so we place it in front of every
+definition as a matter of course.
+@FootNote {
+Later chapters of this guide introduce specialized symbols for producing
+tables, equations, diagrams, graphs, and computer programs.  You need a
+different @Code "import" clause when using those symbols within a
+definition, because they are not from the BasicSetup package.  Examples
+may be found in the chapters concerned.
+}
+@PP
+Now suppose you frequently need a grey box, but enclosing different
+things:  @GreyBox ENTRY one moment, @GreyBox EXIT the next.  You could
+try omitting the @Code "{}" from the definition above, but that does
+not work, because Lout notices the missing object while reading the
+definition, and inserts an empty object in the usual way (Section
+{@NumberOf empty}).
+@PP
+However, there is a way to define a @Code "@GreyBox" symbol so that
+@Code "@GreyBox ENTRY" produces {@GreyBox ENTRY}, @Code "@GreyBox EXIT"
+produces {@GreyBox EXIT}, and so on:
+@ID @OneRow @Code {
+"import @BasicSetup"
+"def @GreyBox right x { @Box paint { lightgrey } x }"
+}
+The addition of @Code "right x" immediately after the symbol's name
+places @Code "@GreyBox" into that class of symbols, like {@Code "@I"}
+and @Code {"@Box"}, which consume and transform the object to their
+right.  The @Code "x" in @Code "right x" means that the object to the
+right will be referred to as @Code "x" within the definition.  So in
+@ID @Code "@GreyBox { Hello world }"
+@Code "@GreyBox" consumes the following object, which becomes
+{@Code "x"}, so that the value is
+@ID @Code "@Box paint { lightgrey } { Hello world }"
+which produces @GreyBox { Hello world }.
+@PP
+It is a good principle to choose symbol names that refer to what the symbol
+is for, rather than how it does what it does.  Here is a good example:
+@ID @OneRow @Code {
+"import @BasicSetup"
+"def @Poetry right x { lines @Break @I x }"
+}
+This kind of name is very pleasant to use, since it allows you to
+forget about what is going on behind the scenes:
+@ID @OneRow @Code {
+"@IndentedDisplay @Poetry {"
+"Teach me to hear Mermaides singing,"
+"Or to keep off envies stinging,"
+"     And finde"
+"     What winde"
+"Serves to'advance an honest minde."
+"}"
+}
+Most of Lout's symbols follow this principle.
+@PP
+You can define symbols that consume the object to their left as well
+as the object to their right, as the {@Code "@Font"}, {@Code "@Break"},
+and {@Code "@Colour"} symbols do:
+@ID @OneRow @Code {
+"import @BasicSetup"
+"def @HeadingBox left x right y"
+"{  @Box { @CentredDisplay @Heading x y }"
+"}"
+}
+This definition occupies several lines only because it is long; as
+usual, end of line is the same as one space.  Now
+@ID @OneRow @Code {
+"Cheating @HeadingBox {"
+"The Department uses assignments ... of that student alone."
+"}"
+}
+is much easier to type than the equivalent example in Section
+{@NumberOf boxes}.  The result is the same:
+@QD Cheating @HeadingBox {
+The Department uses assignments both as a teaching device and as a
+major component of its assessment of each student.  It therefore
+requires that all programs, exercises etc. handed in bearing an
+individual student's name be the work of that student alone.
+}
+Do not use a paragraph, display, or list symbol at the beginning or end
+of a definition, since the result is not what people who do it are
+hoping for.
+@End @Section
diff --git a/doc/user/str_disp b/doc/user/str_disp
new file mode 100644
index 0000000..4634103
--- /dev/null
+++ b/doc/user/str_disp
@@ -0,0 +1,94 @@
+@Section
+   @Title { Displays }
+   @Tag { displays }
+@Begin
+@PP
+The @Code "@Display" symbol displays the following object in the centre
+displays. @Index displays
+display. @Index @Code "@Display"
+of the page or column:
+@ID @Code "@Display @I { Invitation to Afternoon Tea }"
+has result
+@Display @I { Invitation to Afternoon Tea }
+Space is inserted automatically above and below the display; no
+paragraph symbols are needed.
+@PP
+To make the display appear at the left margin instead of centred, use
+leftdisplay. @Index @Code "@LeftDisplay"
+{@Code "@LeftDisplay"} instead of {@Code "@Display"}.  To make an indented
+display, use {@Code "@IndentedDisplay"} or {@Code "@QuotedDisplay"};
+indenteddisplay. @Index @Code "@IndentedDisplay"
+quoteddisplay. @Index @Code "@QuotedDisplay"
+the latter indents at the right margin as well as at the left. There are
+also @Code "@CentredDisplay" and @Code "@CenteredDisplay" symbols which
+centreddisplay. @Index @Code "@CentredDisplay"
+centereddisplay. @Index @Code "@CenteredDisplay"
+centre the display just like {@Code "@Display"} does, and
+rightdisplay. @Index @Code "@RightDisplay"
+@Code "@RightDisplay" which right-justifies the display.
+@PP
+If you use displays frequently you might prefer abbreviated forms of
+their names.  These are made from @Code "@" and the capital letters of
+d. @Index @Code "@D"
+ld. @Index @Code "@LD"
+id. @Index @Code "@ID"
+qd. @Index @Code "@QD"
+cd. @Index @Code "@CD"
+the full name:  {@Code "@D"}, {@Code "@LD"}, {@Code "@ID"}, {@Code "@QD"},
+and {@Code "@CD"}.  Owing to a clash with the name of another symbol,
+{@Code "@RightDisplay"} has no abbreviation.
+@PP
+Displays often need to be set using a different font, paragraph
+breaking style, and so on to the surrounding text.  It's best to set
+out such displays like this:
+@ID @OneRow @Code {
+"@CentredDisplay @I clines @Break {"
+"Invitation to Afternoon Tea"
+"with"
+"Mr. and Mrs. Gilbert Newington-Smith"
+"}"
+}
+You can have as many of these symbols as you like, including specialized
+ones like {@Code "@CurveBox"} and {@Code "@Tbl"}.  The only rule is that
+the display symbol must come first:  @Code "@I @Display ..." is wrong.
+@PP
+It's not a good idea to have one display immediately followed by
+another one, because there will be too much vertical space between
+them.  Use a list instead (Section {@NumberOf lists}).  Displays
+at the ends of paragraphs look awkward and are best avoided.
+@PP
+A display may come out partly on one page or column and partly on
+the next, if it has places where it obviously can be broken in two.  For
+example, a display which is an ordinary paragraph of text might be
+broken in two between any two lines.  To force a display to keep
+together on one page or column, use the @Code "@OneRow" symbol like
+this:  @Code "@Display @OneRow { ... }".
+@PP
+Other display symbols produce aligned and numbered displays, and raw
+displays (i.e.  without vertical space).  Although these can display any
+object as usual, in practice they are used for mathematics, so they are
+described in Section {@NumberOf mathdisplays}.
+@PP
+Three setup file options control the appearance of displays.  (For a
+general introduction to setup files and their options, consult
+Section {@NumberOf setup}.)  Here they are with their default values:
+@ID @OneRow @Code {
+"@DisplayGap { 1.00v }"
+"@DefaultIndent { 0.5rt }"
+"@DisplayIndent { 2.00f }"
+}
+@Code "@DisplayGap" is the amount of vertical space inserted before and
+display.gap. @Index @Code "@DisplayGap"
+after displays, and may be any length (Section {@NumberOf objects}).  The
+default value, @Code {"1.00v"}, is equal to the current inter-line spacing.
+@PP
+@Code "@DefaultIndent" is the indent produced by
+default.indent @Index @Code "@DefaultIndent"
+{@Code "@Display"}; {@Code "0.5rt"} produces centring, although why it does
+so is beyond our scope
+@Cite { $kingston1995lout.expert }.  @Code "@DisplayIndent" is the
+display.indent. @Index @Code "@DisplayIndent"
+indent for {@Code "@IndentedDisplay"}, and used at both margins by
+{@Code "@QuotedDisplay"}.  Its default value, {@Code "2.00f"}, is twice
+the current font size.
+@End @Section
diff --git a/doc/user/str_figs b/doc/user/str_figs
new file mode 100644
index 0000000..285e097
--- /dev/null
+++ b/doc/user/str_figs
@@ -0,0 +1,270 @@
+@Section
+   @Title { Figures and tables }
+   @Tag { figures }
+@Begin
+@PP
+Figures are created in a similar way to footnotes:
+figures. @Index { figures }
+@ID @OneRow @Code {
+"@Figure"
+"    @Caption { Basser Lout }"
+"@Diag vstrut { yes } treehsep { 1c } {"
+"    @HTree { @Box Lout @FirstSub arrow { yes } @Box PostScript }"
+"}"
+}
+The @Code "@Figure" symbol places the following object (which in this example is
+figure. @Index @Code "@Figure"
+created using the advanced graphics features of Chapter {@NumberOf diagrams})
+at the top of the following column or page,
+@Figure
+    @Tag { figex }
+    @Caption { Basser Lout }
+@Diag vstrut { yes } treehsep { 1c } {
+    @HTree { @Box Lout @FirstSub arrow { yes } @Box PostScript }
+}
+labelled by the @Code "@Caption" option and automatically numbered.  You
+captions. @RawIndex { captions }
+captions.figures @SubIndex { in @Code "@Figure" and @Code "@Table" }
+can see this example at the top of page {@PageOf figex}.  Tables are
+table. @Index @Code "@Table"
+obtained in the same way using {@Code "@Table"} instead of {@Code "@Figure"}.
+@PP
+@Code "@Figure" and @Code "@Table" each have an @Code "@InitialLanguage"
+option which determines the language of the figure or table.  If this is
+omitted, the language of the document as a whole will be used, not the
+language where the figure or table occurs.
+@PP
+The two symbols also have a @Code "@CaptionPos" option, which determines
+whether the caption appears above or below the figure or table.  The
+default is {@Code "Below"}, the alternative is {@Code "Above"}.
+@PP
+The question of what is a suitable running header to print on pages
+containing figures and tables (possibly from different sections) is a
+rather awkward one.  On any page with a figure or table at the top, Lout
+uses whatever running header was appropriate for the text on the previous
+page.  In practice it seems to work quite well.
+@PP
+If your document contains many figures, large figures, or multi-page
+figures, you are likely to encounter cases where Lout's assignment of
+figures to pages is not pleasing.  In that case, you can improve things
+by moving the figures around within the body text, and by using the
+@Code "@Location" option of the @Code "@Figure" symbol, which determines
+location. @Index @Code "@Location"
+where the figure will appear.  Its possible values are
+@DP @Tab
+    @Fmta { @Col @Code A ! @Col B }
+{
+@FirstRowa
+    A { PageTop }
+    B { The figure will appear at the top of the following page, occupying
+the full page width; or, if there is insufficient space there (owing to other
+figures already present), at the top of the first subsequent page with
+sufficient space. }
+@Rowa
+    A { EvenPageTop }
+    B { Like @Code PageTop except that the first page of the figure
+or table will be an even-numbered (left-hand or verso) page -- useful
+for double-pace spreads.  }
+@Rowa
+    A { FullPage }
+    B { Like {@Code PageTop} except that nothing else will appear on the
+same page as the figure except the usual running headers and footers, and
+possibly other @Code FullPage figures and tables.
+@FootNote { This location replaces the @Code "@FullPage" option of
+earlier versions of Lout, which has been withdrawn. }
+}
+@Rowa
+    A { EvenFullPage }
+    B { Like {@Code FullPage} except that the first page of the figure
+or table will be an even-numbered (left-hand or verso) page, like
+{@Code EvenPageTop}.
+}
+@Rowa
+    A { PageFoot }
+    B { The figure will appear at the foot of the current page, occupying
+the full page width; or, if there is insufficient space there, at the top
+of the following page and so on as for {@Code PageTop}. }
+@Rowa
+    A { ColTop }
+    B { The figure will appear at the top of the following column,
+occupying the column width; or, if there is insufficient space there,
+at the top of the first subsequent column with sufficient space.  This
+is different from @Code PageTop only in multi-column documents. }
+@Rowa
+    A { ColFoot }
+    B { The figure will appear at the foot of the current column,
+occupying the column width; or, if there is insufficient space there, at
+the top of the following column as for {@Code ColTop}.  This differs
+from @Code PageFoot only in multi-column documents. }
+@Rowa
+    A { ColEnd }
+    B { The figure will appear in a column at the end of the document
+(or chapter, appendix etc. in the case of books).  There is no
+@Code PageEnd value corresponding to {@Code ColEnd}. }
+@Rowa
+    A { AfterLine }
+    B { The figure will appear as a column-width display immediately after
+the line in the final printed document in which it occurs. }
+@Rowa
+    A { TryAfterLine }
+    B { The same as @Code {AfterLine} unless there is insufficient space
+in the current column to hold the displayed figure, in which case it
+switches to @Code {ColTop} instead. }
+@Rowa
+    A { Display }
+    B { The figure will appear as a display at the point it occurs.  There
+is no @Code TryDisplay value corresponding to {@Code Display}. }
+@Rowa
+    A { Raw }
+    B { The figure will appear as an object, with no extra spacing, at
+the point it occurs.  This is useful, for example, for getting two figures
+side by side in one display:  use a displayed table containing two raw
+figures. }
+}
+@DP
+The @Code "@Table" symbol also has this option.  The default location is
+{@Code "PageTop"}, but this can be changed by changing the
+figurelocation. @Index @Code "@FigureLocation"
+tablelocation. @Index @Code "@TableLocation"
+@Code "@FigureLocation" and @Code "@TableLocation" setup file options.
+@PP
+The numbers assigned to figures and tables, and their ordering in any list
+of figures or tables, is based on where they appear in the final printed
+document, not on where they appear in the source files.  This is better for
+the reader in the unusual case of a fixed figure being overtaken by a
+floating one.  If a section number is printed as part of a figure number,
+and the figure floats forward from one section into another, the figure
+number will reflect the later section, not the earlier one as it should.
+You can fix this problem by moving the figure to an earlier point in
+the section, or by not having section numbers in figures (see below).
+@PP
+@Code "@Figure" and @Code "@Table" each have a @Code "@OnePage" option,
+whose value may be @Code "Yes" or {@Code No}.  Setting @Code "@OnePage"
+to @Code Yes causes the figure or table and its caption to be kept
+together on one page or column (enclosing the body of the figure or table
+in @Code "@OneRow" would have the same effect except that it would not
+incorporate the caption, hence the need for this option).  You need to be
+certain that the whole assembly will fit on one page when setting
+@Code "@OnePage" to {@Code "Yes"}.
+@PP
+The @I default value of the @Code "@OnePage" option for each figure or
+table depends on the value of its @Code "@Location" option as follows:
+@ID @Tab
+    @Fmta { @Col @Code A ! @Col ! @Col @Code B }
+{
+@Rowa
+    A { No }
+    B { PageTop  ColTop  ColEnd  Raw }
+@Rowa
+    A { Yes }
+    B { PageFoot  ColFoot  Display  AfterLine  TryAfterLine }
+}
+These choices represent a guess that figures that the user is happy to
+see at the page foot or in a display are probably going to be small enough
+to keep on one page, but that other figures may not be.  In any case, these
+are only default values and you may set @Code "@OnePage" as you wish.
+@PP
+By default, the body of the figure will be centred, and this usually looks
+best, at least for small figures.  @Code "@Figure" and @Code "@Table" each
+have a @Code "@Format" option which controls this format:
+@ID @Code {
+"@Figure"
+"    @Format { @CurveBox @HExpand @CC @Body }"
+}
+Within the @Code "@Format" option, the @Code "@Body" symbol stands for the
+body of the figure or table; it must appear exactly once.  Display symbols
+such as @Code "@CentredDisplay" may not be applied to the {@Code "@Body"}
+symbol; instead, there are {@Code "@II"}, {@Code "@QQ"}, {@Code "@CC"}, and
+{@Code "@RR"}, which indent, quote, centre, or right-justify the following
+object.  The example just given centres the figure inside a @Code "@CurveBox"
+which is horizontally expanded (by the @Code "@HExpand" symbol, which is not
+specific to figures) to occupy the full width of the page or column, rather
+than fitting snugly around the figure.
+@PP
+The @Code "@Format" option applies to just the body of the figure, not to
+its caption.  It applies to each page or column of a multi-page or
+multi-column figure; for example, the above format will draw a box around
+each page of a multi-page figure, and each page will be separately centred.
+@Code "ColEnd" and @Code "Raw" figures are exceptions to this rule:  they
+always apply the format to the figure as a whole.  This means that you cannot
+box multi-page figures of these two types, since the result would be an
+unbreakable object too large to fit on one page.
+@PP
+There are setup file options for controlling the appearance of figures and
+tables.  Only those for figures will be given here, since the ones for tables
+are identical except that @Code Table replaces @Code Figure in their
+names.  Here they all are:
+@FootNote { These are as of Version 3.15 and above.  Prior to that
+there were {@Code "@CaptionFont"}, {@Code "@CaptionBreak"}, and
+{@Code "@CaptionFormat"} options, and {@Code "@CaptionFormat"}
+took values that did not include the @Code "caption" symbol. }
+@ID @OneCol @Code {
+"@FigureLocation { PageTop }"
+"@FigureFormat { @CC @Body }"
+"@FigureWord { figure }"
+"@FigureNumbers { Arabic }"
+"@FigureCaptionPos { Below }"
+"@FigureCaptionFont { }"
+"@FigureCaptionBreak { }"
+"@FigureCaptionFormat { @B { word @NumSep number. &2s } @Insert caption }"
+"@MakeFigureContents { No }"
+"@FigureListWord { figurelist }"
+}
+@Code "@FigureLocation" is the default value of the @Code "@Location"
+option of figures.  Changing it, for example to
+{@Code "FullPage"}, changes the location of all figures at
+once.  You may still override this location for any individual figure,
+however, by giving that figure a @Code "@Location" option.  In a similar way,
+figureformat. @Index @Code "@FigureFormat"
+tableformat. @Index @Code "@TableFormat"
+@Code "@FigureFormat" is the default value of the @Code "@Format"
+option (this shows why figures are centred by default) and
+figurecaptionpos. @Index @Code "@FigureCaptionPos"
+tablecaptionpos. @Index @Code "@TableCaptionPos"
+@Code "@FigureCaptionPos" is the default value of {@Code "@CaptionPos"}.
+@PP
+@Code "@FigureWord" determines the word that is part of the figure
+number.  The default value, {@Code figure}, produces `Figure' or its
+equivalent in the current language; any other value produces itself.
+@PP
+@Code "@FigureNumbers"
+figurenumbers. @Index @Code "@FigureNumbers"
+tablenumbers. @Index @Code "@TableNumbers"
+determines whether figures are
+numbered automatically or not; the choices are
+{@Code "None"}, {@Code "Arabic"}, {@Code "Roman"}, {@Code "UCRoman"},
+{@Code "Alpha"}, and {@Code "UCAlpha"}.  Depending on the document
+type and where the figure or table occurs, the number might include
+a chapter number as well.  This is determined by options in the
+setup file for your document type; for example, 
+@ID @Code "@SectionNumInFigures { No }"
+appears in the @Code "report" setup file, and means that a section
+number will not appear in the figure number (unless you change the
+option to {@Code Yes}).
+@PP
+@Code "@FigureCaptionFont" and @Code "@FigureCaptionBreak" determine the
+font and paragraph breaking style used in the captions of figures.  Their
+default values are empty, meaning to use the initial font and break styles;
+but, for example, you could have
+@ID @Code "@FigureCaptionFont { -2p }"
+in your setup file to get a smaller font size in your captions.
+@PP
+The @Code "@FigureCaptionFormat" option determines the format of the
+caption.  Within it, the symbol @Code word stands for the `Figure'
+word as defined by {@Code "@FigureWord"}); the @Code number
+symbol stands for the number of the figure; and @Code caption stands
+for the body of the caption.  The default value shown above prints
+the word and number and a period in bold, inserted together with a
+gap of two spaces into the first paragraph of the caption.  If you
+don't use the @Code "@Insert" symbol you'll run into problems with
+multi-paragraph captions.
+@PP
+You can get a list of figures at the start of your document by setting
+the @Code "@MakeFigureContents" setup file option to {@Code Yes}.  The
+format of these lists will follow the format of tables of contents.  These
+lists are only available in books (Section {@NumberOf books}).  The
+title printed above the list of figures is determined by the
+@Code "@FigureListWord" option; the default value, {@Code "figurelist"},
+produces `List of Figures' or its equivalent in the current language; any
+other value produces itself.
+@End @Section
diff --git a/doc/user/str_foot b/doc/user/str_foot
new file mode 100644
index 0000000..70e50a2
--- /dev/null
+++ b/doc/user/str_foot
@@ -0,0 +1,150 @@
+@Section
+   @Title { Footnotes and endnotes }
+   @Tag { footnotes }
+@Begin
+@PP
+A footnote is created by typing
+footnote. @Index @Code "@FootNote"
+@ID @Code "@FootNote { Like this. }"
+after the word that the footnote refers to.  It will be numbered
+automatically and placed at the foot of the page or column;
+@FootNote { Like this. }
+or, if space there is insufficient, it may start on or run onto the
+following page or column.  The footnote must be enclosed in braces.
+@PP
+The @Code "@FootNote" symbol has a @Code "@Location" option which
+determines where it goes:
+@ID @Code {
+"@FootNote"
+"    @Location { ColFoot }"
+"{ ... }"
+}
+places the footnote at the bottom of the column, and
+@ID @Code {
+"@FootNote"
+"    @Location { PageFoot }"
+"{ ... }"
+}
+places it at the bottom of the current page, occupying the full page
+width even in a multi-column document (this is occasionally
+useful for footnotes to headings).  Of course, in a single-column
+document there is no difference anyway.  The default value of the
+@Code "@Location" option is {@Code "ColFoot"}.
+@PP
+Endnotes work in exactly the same way as footnotes, except that the
+endnote. @Index @Code "@EndNote"
+symbol to use is @Code "@EndNote" and they appear either at the end
+of the document or at the end of some major part of it, depending on
+the type of document (Chapter {@NumberOf types}).  Endnotes are
+always column width and so have no @Code "@Location" option.
+@PP
+Footnotes are usually labelled with consecutive Arabic numberals, but
+you can tell Lout to label a footnote (not an endnote) with something
+else, like this:
+@ID @OneRow @Code @Verbatim {
+@FootNote
+    @Label { @Dagger }
+{ This footnote will be labelled with a dagger, not a number. }
+}
+whose result should appear at the bottom of this page.
+@FootNote
+    @Label { @Dagger }
+{ This footnote will be labelled with a dagger, not a number. }
+Symbols commonly used for footnote labels include @Code "@Dagger" (@Dagger),
+@Code "@DaggerDbl" (@DaggerDbl), @Code "@Star" (@Star),
+@Code "@SectSym" (@SectSym), and @Code "@ParSym" (@ParSym),
+but you can use any object.  If you want no label at all,
+use an empty object like this:
+@ID @OneRow @Code @Verbatim {
+@FootNote
+    @Label {}
+}
+Footnotes with a @Code "@Label" option are excluded from the automatic
+numbering that applies to other footnotes.
+@PP
+The language of a footnote or endnote will be the language of the
+document as a whole.  This is not necessarily the same as the
+current language at the point where the footnote or endnote occurs,
+or even the language of the enclosing large-scale structure symbol.  It
+may be necessary to enclose the body of the footnote in a language
+symbol, like this:
+@ID @Code "@FootNote { French @Language { ... } }"
+Doing it the other way ({@Code "French @Language @FootNote ..."}) is
+not effective.
+@PP
+A footnote attached to the very last line of a chapter or appendix of
+a book occasionally runs onto the first page of the following chapter
+or appendix, and this looks very poor.  If this happens, the solution
+is to place an @Code "@LP" after the last line (including the footnote).
+@PP
+In the rare case where more than one footnote is attached to one word,
+use @Code "@AnotherFootNote" for the second and subsequent footnotes:
+anotherfootnote. @Index @Code "@AnotherFootNote"
+@ID @Code {
+"something or other."
+"@FootNote { The first footnote. }"
+"@AnotherFootNote { The second footnote. }"
+}
+This ensures that the superscripts will be separated by
+commas, as convention demands.
+@PP
+The setup file contains a number of options for controlling the
+appearance of footnotes.  (See Section @NumberOf setup for a general
+introduction to setup files and their options.)  Here are all the
+options, with their default values:
+@ID @OneRow @Code {
+"@FootNoteThrough { No }"
+"@FootNoteLocation { ColFoot }"
+"@FootNoteNumbers { Arabic }"
+"@FootNoteFont { 0.80f }"
+"@FootNoteBreak { 1.20fx }"
+"@FootNoteFormat { { number &0.05f } @Insert body }"
+"@FootLen { 2.00c }"
+"@FootAboveGap { 1.00v }"
+"@FootGap { 0.20c }"
+}
+There are also setup file options for controlling endnotes.  Since
+they are quite similar to the ones for footnotes, we won't say any
+more about them here.
+@PP
+@Code "@FootNoteThrough" may be @Code "Yes" or @Code { "No" };
+footnotethrough. @Index @Code "@FootNoteThrough"
+@Code "Yes" means that the footnotes are numbered continuously
+through the document (or through each chapter in the case of books);
+@Code "No" means that the numbering begins afresh on each
+page.  @Code "@FootNoteLocation" determines the default value of
+footnotelocatin. @Index @Code "@FootNoteLocation"
+the @Code "@Location" option mentioned above; it may be either
+@Code "ColFoot" or {@Code "PageFoot"}.  @Code "@FootNoteNumbers"
+determines how the footnotes are numbered;
+footnotenumbers. @Index @Code "@FootNoteNumbers"
+it may be {@Code Arabic}, {@Code Roman}, {@Code UCRoman}, {@Code Alpha},
+or {@Code UCAlpha}.
+@PP
+@Code "@FootNoteFont" and @Code "@FootNoteBreak" determine the
+footnotefont. @Index @Code "@FootNoteFont"
+footnotebreak. @Index @Code "@FootNoteBreak"
+font and paragraph breaking style of footnotes.  The default value
+of @Code "@FootNoteFont" produces the same font family and face as the
+bulk of the document, but reduced to 0.8 times the original size.
+@PP
+@Code "@FootNoteFormat" determines the format of the footnote.  The
+@Code number symbol within it must appear exactly once, and is replaced
+by the number of the footnote (if numbered).  The @Code body symbol is
+replaced by the body (that is, the content) of the footnote.  The default
+value shown uses symbols from raw Lout to add a small space at the right of
+the number, then insert it at the beginning of the first paragraph of
+the body.  Another suitable value might be
+@ID @Code "@FootNoteFormat { number |1fx body }"
+which places the body in a separate column to the number, one
+font width to the right of the left edge of the number.
+@PP
+@Code "@FootLen" determines the length of the small horizontal line
+footlen. @Index @Code "@FootLen"
+drawn above the footnotes; 
+@Code "@FootAboveGap" determines the minimum space to be left clear
+footabovegap. @Index @Code "@FootAboveGap"
+above this line; and @Code "@FootGap" determines the
+footgap. @Index @Code "@FootGap"
+vertical separation between footnotes.  All three may be any length.
+@End @Section
diff --git a/doc/user/str_indx b/doc/user/str_indx
new file mode 100644
index 0000000..c9ea2de
--- /dev/null
+++ b/doc/user/str_indx
@@ -0,0 +1,314 @@
+@Section
+   @Title { Indexes }
+   @Tag { indexes }
+@Begin
+@PP
+Although Lout is not clever enough to guess what entries should go in
+indexes. @Index { indexes }
+your index, it will do almost everything else for you:  sort the
+entries and attach the correct page numbers automatically.  As for
+tables of contents, the default setting is to have an index in
+books but not in other types of documents.  This and a few aspects of
+the appearance of the index can be changed by changing the setup file,
+as explained at the end of this section.
+@PP
+Now, suppose you are discussing Galileo and you want his name in your
+index.  Let's be ambitious and say that you want the index to contain
+something like this:
+@ID @OneRow lines @Break {
+Galileo Galilei
+    life of, 201
+    telescope, his use of, 201--203
+    trial of, 205--211, 242, 395
+}
+Each line shows off one of Lout's four tricks:  the first is a
+@I { raw entry } (no page number attached); the second is a
+@I sub-entry (indented); the third has a @I { page number range }
+instead of a single page number; and the fourth is a @I { merged entry }
+(several page numbers or ranges within one entry).
+@PP
+We'll take each of them in turn in a moment, but first, let's see how
+to get a basic entry, like this one:
+@ID { Galileo Galilei, 201 }
+To get this into your index, type
+@ID @Code "galileo @Index { Galileo Galilei }"
+at the point where you mention Galileo.  Nothing will be printed there,
+but the object following the @Code "@Index" symbol will be placed in
+the index, with a comma and the correct page number appended
+automatically.
+@PP
+The object preceding the @Code "@Index" symbol is a compulsory key
+which is used for sorting the index entries,
+@FootNote {
+The collating sequence used to decide what comes after what is the
+collating sequence used by the @Code "memcmp()" library routine (just
+the underlying binary character codes).  Alternatively, the version
+of Lout installed on your system may use the @Code "strcoll()"
+collating sequence, which understands accented characters and whose
+effect depends on your locale.  To find out whether @Code "strcoll()"
+is in use or not, type @Code "lout -V" which prints out several lines
+of this and similar information.
+@PP
+If the sorting you get turns out to be not what you expected, the
+first thing to try is the replacement of all accented letters in index
+keys by unaccented ones.  Sorting is quite an intractable problem:  even
+if @Code "strcoll()" gets the sorting right for one language, there still
+remains the problem of sorting multilingual indexes.
+@PP
+Lout's database mechanism assumes that the @I tab character is collated
+before any character that could appear in a sorting key.  It seems that
+there are a few collating sequences in existence which do not satisfy this
+condition, and in these cases Lout will fail to produce the correct index.
+}
+but which is not itself printed anywhere.  It is best to construct these
+sorting keys from lower-case letters and the . character only, beginning
+with a letter, although multi-word keys are allowed.  These sorting keys
+do not have to be distinct from the tags used in cross referencing;
+however, they do have to be distinct from each other, unless you want
+merged entries (see below).
+@PP
+Our first trick, raw entries (no page number attached), is very
+easy:  just use @Code "@RawIndex" instead of {@Code "@Index"}.  So the
+first line of our ambitious example is obtained by
+@ID @Code "galileo @RawIndex { Galileo Galilei }"
+This could go anywhere, since no page numbers are involved.
+@PP
+Another use for @Code "@RawIndex" is to get blank lines into the index
+between the letters of the alphabet, by inserting phantom entries:
+@ID @OneRow @Code {
+"b @RawIndex {}"
+"c @RawIndex {}"
+"d @RawIndex {}"
+"..."
+"z @RawIndex {}"
+}
+In fact there is a symbol called @Code "@IndexBlanks" that makes
+indexblanks. @Index @Code "@IndexBlanks"
+exactly these 25 entries.  Unfortunately, these blanks will occasionally
+appear at the top of a column, and if there are no tags beginning with
+x, for example, there will be two blank lines between the w and y
+entries.  You can start off with @Code "@IndexBlanks" and replace it
+later by the appropriate subset, if necessary.
+@FootNote {
+For Lout to solve this problem automatically, it would need to be told
+which letter each index entry belongs under, perhaps by symbols
+{@Code "@AIndex"}, {@Code "@BIndex"}, etc.  The author felt that this
+would have been too tedious.
+}
+@PP
+Our second trick, sub-entries, is also very easy, since a sub-entry
+differs from an ordinary entry only by having an indent.  The symbol
+is {@Code "@SubIndex"}, so the second line of our ambitious example is
+produced by
+@ID @Code "galileo.life @SubIndex { life of }"
+You should always give sub-entries the same sorting key as their
+corresponding main entries, plus a . and another word, because then
+you can be certain that the sorting will place sub-entries directly
+after their main entries.  There is a @Code "@SubSubIndex" symbol that
+produces a double indent, and there are @Code "@RawSubIndex" and
+@Code "@RawSubSubIndex" symbols.
+@PP
+For our third trick, page number ranges, we use the @Code "to" option
+of the {@Code "@Index"}, {@Code "@SubIndex"}, and {@Code "@SubSubIndex"}
+symbols.  For example, to produce the sub-entry
+@ID { telescope, his use of, 201--203 }
+put
+@ID @Code {
+  "galileo.telescope @SubIndex to { gt.end } { telescope, his use of }"
+}
+at the beginning of the range, and
+@ID @Code "@PageMark { gt.end }"
+at the end.  You can use any tag you like inside the @Code "to" option,
+as long as it differs from every other tag (notice that sorting keys
+do not have to differ from tags, but @Code "to" options do:  this
+is because @Code "to" options go into @Code "@PageMark" like other
+tags do, and if two tags are the same we would have an ambiguous
+result of {@Code "@PageOf"}).  If both ends of the range fall on the
+same page, the @Code "to" option is ignored:  you will never get
+201--201.
+@PP
+Our fourth and final trick is the merged entry:
+@ID { trial of, 205--211, 242, 395 }
+The main thing to grasp is that this merged entry was originally three
+separate entries (sub-entries in this case):
+@ID @OneRow lines @Break {
+trial of, 205--211
+trial of, 242
+trial of, 395
+}
+We already know how to produce these three entries, using three
+@Code "@SubIndex" symbols, one with a @Code "to" option.  Now we have
+discovered that Lout is able to merge several entries into one
+entry.  This raises two questions:  how does Lout know which entries
+to merge? and given those entries, what does the merging produce?
+@PP
+The answer to the first question is that Lout merges entries whose
+sorting keys are equal.  The merged entry above is produced by these
+three entries, placed in the appropriate places:
+@ID @OneRow @Code {
+"galileo.trial @SubIndex to { gtrial.end } { trial of }"
+"galileo.trial @SubIndex { trial of }"
+"galileo.trial @SubIndex { trial of }"
+}
+The entries are merged because they have the same sorting key
+({@Code "galileo.trial"}), not because they happen to have the
+same content ({@Code "trial of"}).  In fact, once the page numbers are
+added the content is not the same at all.
+@PP
+Now, having decided that the three entries
+@ID @OneRow lines @Break {
+trial of, 205--211
+trial of, 242
+trial of, 395
+}
+must be merged, what does Lout do?  It takes the second entry, discards
+any initial part that is the same as the first entry ({@Code "trial of,"}
+in this case), and, if anything remains, it adds a comma, a space, and
+the remainder to the first entry, producing
+@ID { trial of, 205--211, 242 }
+in this case.  This process is repeated on this and the third entry,
+producing
+@ID { trial of, 205--211, 242, 395 }
+in this case, and so on.  The entries are merged in the order in which
+their points of origin appear in the final printed document.
+@PP
+If nothing remains after discarding the common initial part, nothing is
+added to the growing merged entry; in effect, the entry that could
+contribute nothing new is deleted.  With this in mind, let us return to
+our initial, ambitious example:
+@ID @OneRow lines @Break {
+Galileo Galilei
+    life of, 201
+    telescope, his use of, 201--203
+    trial of, 205--211, 242, 395
+}
+We now know how to produce all four of these entries, but one problem
+of some practical importance remains.  Suppose we delete the section on
+the life of Galileo.  If we had put the entry that produces `Galileo
+Galilei' in that section, we might inadvertently delete it, and the
+other two sub-entries will lose their main entry.  Before deleting
+anything, we must hunt through it for index entries and ponder their
+significance, an error-prone and time-wasting thing to do.
+@PP
+The solution is as follows.  When an index entry has sub-entries, make
+it raw, and repeat it just before each of its sub-entries:
+@ID @OneRow @Code {
+"galileo @RawIndex { Galileo Galilei }"
+"galileo.life @SubIndex { life of }"
+}
+at the first place,
+@ID @OneRow @Code {
+"galileo @RawIndex { Galileo Galilei }"
+"galileo.telescope @SubIndex { telescope, his use of }"
+}
+at the second, and so on.  Now it is easy to verify that every
+sub-entry has a main entry; and when deleting a sub-entry we can and
+should delete the adjacent main entry.  After sorting, our index
+entries will be
+@ID @Tab
+    @Fmta { @Col @Code A ! @Col B }
+{
+@Rowa
+    A { galileo }
+    B { Galileo Galilei }
+@Rowa
+    A { galileo }
+    B { Galileo Galilei }
+@Rowa
+    A { galileo }
+    B { Galileo Galilei }
+@Rowa
+    A { galileo }
+    B { Galileo Galilei }
+@Rowa
+    A { galileo }
+    B { Galileo Galilei }
+@Rowa
+    A { galileo.life }
+    B { {}    life of, 201 }
+@Rowa
+    A { galileo.telescope }
+    B { {}    telescope, his use of, 201--203 }
+@Rowa
+    A { galileo.trial }
+    B { {}    trial of, 205--211 }
+@Rowa
+    A { galileo.trial }
+    B { {}    trial of, 242 }
+@Rowa
+    A { galileo.trial }
+    B { {}    trial of, 395 }
+}
+The first five entries have the same sorting key, and will be merged
+as required.
+@PP
+The language of the index entry will be the initial language of the
+document as a whole, which is not necessarily the language at the point
+where the index entry occurs.  To get the correct language you will need a
+@Code "@Language" symbol following the @Code "@Index" symbol:
+@ID @Code "galileo. @Index French @Language { Galileo Galilei }"
+or whatever.  If you don't do this your index entry might be hyphenated
+incorrectly.
+@PP
+Although the page numbers in index entries will be kept up to date
+automatically as the document changes, as all cross references are, 
+it is best to refrain from inserting index entries until the document
+is complete and an overall plan of the structure of the index can
+be made.
+@PP
+The remainder of this section describes how to change the appearance of
+the index by setting options in the setup file.  For setup files and
+their options in general, consult Section {@NumberOf setup}.
+@PP
+There are five setup file options for the index.  Here they are with
+their default values:
+@ID @OneRow @Code {
+"@MakeIndex { No }"
+"@IndexFont { }"
+"@IndexBreak { oragged 1.2fx }"
+"@IndexColumnNumber { 2 }"
+"@IndexColumnGap { 1.00c }"
+}
+The @Code "@MakeIndex" option, which may be @Code Yes or {@Code No},
+makeindex. @Index @Code "@MakeIndex"
+determines whether to produce an index or not.  Although the default
+value is {@Code No}, any type of document may be given an index just
+by changing it to {@Code Yes}.  This has already been done in the
+@Code book setup file, but not in the others.
+@PP
+@Code "@IndexFont" determines the font and font size of index entries
+indexfont. @Index @Code "@IndexFont"
+(e.g. {@Code "Times Base 12p"}).  Leaving it empty as above produces
+the same font as the rest of the document.  @Code "@IndexBreak" is the
+indexbreak. @Index @Code "@IndexBreak"
+paragraph breaking style applied to index entries; @Code oragged is the
+traditional and best way.
+@PP
+@Code "@IndexColumnNumber" and @Code "@IndexColumnGap" determine the
+indexcolumnnumber. @Index @Code "@IndexColumnNumber"
+indexcolumngap. @Index @Code "@IndexColumnGap"
+number of index columns per page, and the gap between them, and are
+exactly analogous to the @Code "@ColumnNumber" and @Code "@ColumnGap"
+options described in Section {@NumberOf columns}.
+@PP
+Lout offers the possibility of having up to three independent indexes
+(useful for glossaries, author indexes, etc.).  The other two are called
+index A and index B, and they precede the main index in the
+output.  Just replace @Code Index by @Code IndexA to refer to index A,
+and by @Code IndexB to refer to index B.  For example,
+@ID @Code "smith.j @IndexA { Smith, John }"
+will insert an index entry to index A, and @Code "@IndexBBlanks"
+will insert the usual 25 blank entries into index B.
+@PP
+In large projects it might help to rename the @Code "@IndexA" symbol
+to something else, such as {@Code "@AuthorIndex"}.  This can
+be done by placing
+@ID @Code {
+"import @DocumentSetup"
+"macro @AuthorIndex { @IndexA }"
+}
+in the @Code mydefs file.  See Section {@NumberOf definitions} for
+an introduction to the @Code "mydefs" file; the word @Code macro
+is needed here instead of @Code "def" because we are introducing
+a new name for an existing symbol, not defining a new symbol.
+@End @Section
diff --git a/doc/user/str_larg b/doc/user/str_larg
new file mode 100644
index 0000000..618e69f
--- /dev/null
+++ b/doc/user/str_larg
@@ -0,0 +1,177 @@
+@Section
+    @Title { Large-scale structure:  chapters, sections, etc. }
+    @RunningTitle { Large-scale structure }
+    @Tag { largescale }
+@Begin
+@PP
+Lout's large-scale structure symbols vary with the type of document
+large.scale. @Index { large-scale structure }
+({@Code "@Chapter"} for books, @Code "@Overhead" for overhead
+transparencies, etc.), but they all work in the same way.  Here is a
+typical example, {@Code "@Section"}, as it would actually be used:
+@ID @OneRow @Code {
+"@Section"
+"    @Title { Allocation of teachers }"
+"@Begin"
+"@PP"
+"Apart from the usual need to avoid clashes, the allocation of teachers must"
+"ensure that no teacher teaches more than seven periods per day, or ..."
+"@End @Section"
+}
+First comes the symbol itself, then any options in the usual way, and
+then the following object, enclosed in @Code "@Begin" and
+{@Code "@End @Section"}.  The following object, also called the body
+of the section, may contain paragraphs, displays, and all the other
+features as usual.  The body should begin with a paragraph symbol,
+which may be @Code "@PP" or @Code "@LP" as you prefer.  The result is
+a section like the present one, automatically numbered, with the
+@Code "@Title" option for its heading, preceded by a conditional new
+title. @Index @Code "@Title"
+page symbol (Section {@NumberOf paragraphs}).
+@PP
+When @Code "@Section" symbols are used within an ordinary document, they
+must be bracketed by @Code "@BeginSections" and @Code "@EndSections"
+symbols, like this:
+@ID @OneRow @Code {
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"preceding text"
+"@BeginSections"
+"@Section ... @End @Section"
+"@Section ... @End @Section"
+"..."
+"@Section ... @End @Section"
+"@EndSections"
+"@End @Text"
+}
+This arrangement is reminiscent of the one for lists, and, as for
+lists, there may be no paragraph or new page symbols before, between,
+or after the sections.  To change the gap between sections, you need
+to change the @Code "@SectionGap" option in the setup file, as explained
+in Chapter {@NumberOf types}.
+@PP
+The @Code "@Begin ... @End @Section" that brackets the body of each
+section may be abbreviated to {@Code "{ ... }"}.  However, the long
+form is recommended because it helps Lout to detect missing or extra
+braces within the body of the section.
+@PP
+All large-scale structure symbols have a @Code "@Tag" option, whose
+use is explained in Section {@NumberOf cross}, and a @Code "@RunningTitle"
+runningtitle. @Index @Code "@RunningTitle"
+option.  If running page headers have been requested, @Code "@RunningTitle"
+will be used if it is given, otherwise @Code "@Title" will be used for the
+running header.  For example, the present section begins like this:
+@ID @OneRow @Code {
+"@Section"
+"    @Title { Large-scale structure:  chapters, sections, etc. }"
+"    @RunningTitle { Large-scale structure }"
+"    @Tag { largescale }"
+"@Begin"
+"..."
+}
+The point is that the section title is rather long for a running
+title, and so we use @Code "@RunningTitle" to get an abbreviated
+version of it.
+@PP
+Section titles typically appear in Bold face in the section heading,
+but in Roman face in tables of contents and running page headers.  So
+if part of your title is in italics, enclose it in @Code "@II" rather
+than just @Code "@I" to ensure that you get the right kind of italics
+in both contexts.
+@PP
+All large-scale structure symbols also have an @Code "@InitialLanguage"
+option which sets the current language for the duration of that
+symbol.  However, footnotes, endnotes, figures, tables, references,
+and index entries are set in the initial language of the document as
+a whole, unless you change their language explicitly using the
+@Code "@Language" symbol.
+@PP
+The remainder of this section describes the setup file options for
+controlling the appearance of large-scale structure symbols.  (For an
+introduction to setup files, consult Section {@NumberOf setup}.)  These
+options mainly appear in the third @Code "@Use" clause, since exactly which
+large-scale structure symbols exist depends on the type of document.  For
+example, here are the setup file options from the @Code "doc" setup file
+relating to appendices:
+@ID @OneRow @Code {
+"@AppendixWord { appendix }"
+"@AppendixNumbers { UCAlpha }"
+"@FirstAppendixNumber { 1 }"
+"@AppendixHeadingFont { Bold }"
+"@AppendixHeadingBreak { ragged 1.2fx nohyphen }"
+"@AppendixHeadingFormat { number @DotSep title }"
+"@AppendixGap { 2.0v @OrIfPlain 2f }"
+"@AppendixInContents { Yes }"
+"@AppendixNumInTheorems { No }"
+"@AppendixNumInDisplays { Yes }"
+"@AppendixNumInFigures { No }"
+"@AppendixNumInTables { No }"
+"@AppendixPrefix { }"
+}
+There are similar options for each large-scale structure symbol.  Here is
+a brief explanation.
+@PP
+@Code "@AppendixWord" contains the word that is to be prefixed to the
+appendix number in full headings.  The special value @Code appendix
+produces Appendix or its equivalent translated into the current
+language.  Any other value produces itself.
+@PP
+@Code "@AppendixNumbers" determines the style of numbering of appendices,
+and may be {@Code Arabic}, {@Code Roman}, {@Code UCRoman}, {@Code Alpha},
+{@Code UCAlpha}, or {@Code None} meaning unnumbered.  Most common is
+{@Code Arabic}, but appendices traditionally use upper-case
+letters, hence the value {@Code UCAlpha} given above.
+@PP
+@Code "@FirstAppendixNumber { 1 }" is the number (always in Arabic) to
+assign to the first appendix.  It is almost always 1, but a few people
+like to start their numbering from 0; this is only possible if the
+style of numbering specified by @Code "@AppendixNumbers" is {@Code Arabic}.
+@PP
+@Code "@AppendixHeadingFont" and @Code "@AppendixHeadingBreak" specify
+the font and paragraph breaking style to be applied to the appendix
+heading (relative to {@Code "@InitialFont"} and {@Code "@InitialBreak"});
+the default values shown above produce Bold in the current font family
+and size, and ragged breaking without hyphenation.
+@PP
+@Code "@AppendixHeadingFormat" defines the format of the appendix
+heading.  Within it, the symbols @Code number and @Code title stand for the
+appendix number (including the appendix word) and title respectively.  The
+@Code "@DotSep" symbol produces a dot and two spaces, except when there is
+no number, when it produces nothing.  For example, to draw a full-width
+rule under the heading, change this option to
+@ID @Code "@AppendixHeadingFormat { number @DotSep title @LP @FullWidthRule }"
+Arbitrary formats are acceptable.
+@PP
+@Code "@AppendixGap" determines the vertical space to leave between
+appendices; the default above leaves {@Code 2v}, except that when plain
+text output is in effect it leaves @Code 2f instead.  To get a new page
+between appendices, use the magic value {@Code 2b}, which is raw Lout for
+new page.  In books, the major components (preface, introduction, tables
+of contents, parts, chapters, appendices, and indexes) always start on a
+new page and there is nothing you can do to change that.
+@PP
+@Code "@AppendixInContents" determines whether the appendix will be listed
+in the table of contents, and may be @Code "Yes" or {@Code No}.  The
+next few options determine whether an appendix number will be included
+in the numbers assigned to theorems etc., numbered displays, figures,
+and tables.
+@PP
+There is a @Code "@StructPageNums" setup file option which determines
+whether page numbers will include the numbers of large-scale structure
+symbols.  If it is {@Code "Yes"}, @Code "@AppendixPrefix" is prefixed
+to all page numbers of pages containing appendices.  For example, setting
+@Code "@AppendixPrefix" to @Code { APP- } produces page
+numbers APP-A-1, APP-A-2, and so on.  The object separating each element
+of such compound numbers is determined by the @Code "@NumberSeparator"
+numberseparator. @Index @Code "@NumberSeparator"
+setup file option, which has default value @Code "." but which can easily
+be set to @Code "-" or @Code "--" if desired.
+@PP
+Running page headers above appendices always include the title of
+the appendix, so there is no option for specifying whether to do so or
+not.  But for subappendices and other such smaller units, the choice of
+whether to mention them in running headers is left to the user:
+@ID @Code "@SubAppendixNumInRunners { Yes }"
+Despite the misleading name, this option determines whether the entire
+subappendix @I title as well as number will be used as a running header.
+@End @Section
diff --git a/doc/user/str_list b/doc/user/str_list
new file mode 100644
index 0000000..0654ca6
--- /dev/null
+++ b/doc/user/str_list
@@ -0,0 +1,392 @@
+@Section
+   @Title { Lists }
+   @Tag { lists }
+@Begin
+@PP
+The @Code "@List" symbol introduces a sequence of items to be
+lists. @Index { lists }
+list. @Index @Code "@List"
+l. @Index @Code "@L"
+made into a displayed list:
+@ID @OneRow @Code {
+"preceding text"
+"@List"
+"@ListItem @I Emma"
+"@ListItem @I { Mansfield Park }"
+"@EndList"
+"following text"
+}
+After the initial @Code "@List" symbol, each item is introduced by
+list.item. @Index @Code "@ListItem"
+li. @Index @Code "@LI"
+{@Code "@ListItem"}, and the list ends with {@Code "@EndList"}.  The
+end.list. @Index @Code "@EndList"
+el. @Index @Code "@EL"
+result here is
+@ID @OneRow {
+preceding text
+@List
+@ListItem @I Emma
+@ListItem @I { Mansfield Park }
+@EndList
+following text
+}
+with space inserted automatically before, between, and after
+the items.
+@PP
+As the example shows, the @Code "@List" symbol causes the items to be
+indented.  Also available are {@Code "@LeftList"}, {@Code "@IndentedList"},
+leftlist. @Index @Code "@LeftList"
+ll. @Index @Code "@LL"
+indentedlist. @Index @Code "@IndentedList"
+il. @Index @Code "@IL"
+{@Code "@QuotedList"}, {@Code "@CentredList"}, and {@Code "@CenteredList"},
+quotedlist. @Index @Code "@QuotedList"
+ql. @Index @Code "@QL"
+centredlist. @Index @Code "@CentredList"
+centeredlist. @Index @Code "@CenteredList"
+cl. @Index @Code "@CL"
+which format the items like the corresponding display symbols do.
+Other list symbols generate a @I label for each item.  For example,
+@Code "@NumberedList" causes the items to be numbered:
+numberedlist. @Index @Code "@NumberedList"
+nl. @Index @Code "@NL"
+@ID @OneRow @Code {
+"@Heading { Quiz }"
+"@NumberedList"
+"@ListItem { Which American statesman owned a two-storey clock? }"
+"@ListItem { Which Yankee commander from the Civil War cut a"
+"swathe of destruction through the State of Georgia? }"
+"@EndList"
+}
+has result
+@ID @OneRow {
+@Heading { Quiz }
+@NumberedList
+@ListItem { Which American statesman owned a two-storey clock? }
+@ListItem { Which Yankee commander from the Civil War cut a
+swathe of destruction through the State of Georgia? }
+@RawEndList
+}
+The generated labels are added at the left margin.  Here is the full set
+of label-generating list symbols, showing the first label produced by each:
+parennumberedlist. @Index @Code "@ParenNumberedList"
+pnl. @Index @Code "@PNL"
+romanlist. @Index @Code "@RomanList"
+rl. @Index @Code "@RL"
+parenromanlist. @Index @Code "@ParenRomanList"
+prl. @Index @Code "@PRL"
+ucromanlist. @Index @Code "@UCRomanList"
+ucrl. @Index @Code "@UCRL"
+parenucromanlist. @Index @Code "@ParenUCRomanList"
+pucrl. @Index @Code "@PUCRL"
+alphalist. @Index @Code "@AlphaList"
+al. @Index @Code "@AL"
+parenalphalist. @Index @Code "@ParenAlphaList"
+pal. @Index @Code "@PAL"
+ucalphalist. @Index @Code "@UCAlphaList"
+ucal. @Index @Code "@UCAL"
+parenucalphalist. @Index @Code "@ParenUCAlphaList"
+pucal. @Index @Code "@PUCAL"
+bulletlist. @Index @Code "@BulletList"
+bl. @Index @Code "@BL"
+starlist. @Index @Code "@StarList"
+sl. @Index @Code "@SL"
+dashlist. @Index @Code "@DashList"
+dl. @Index @Code "@DL"
+@ID @Tab
+    @Fmta { @Col @CC A ! @Col @Code B ! @Col ! @Col @CC C ! @Col @Code D }
+{
+@Rowa
+    A { 1. }
+    B { "@NumberedList" }
+    C { (1) }
+    D { "@ParenNumberedList" }
+@Rowa
+    A { i. }
+    B { "@RomanList" }
+    C { (i) }
+    D { "@ParenRomanList" }
+@Rowa
+    A { I. }
+    B { "@UCRomanList" }
+    C { (I) }
+    D { "@ParenUCRomanList" }
+@Rowa
+    A { a. }
+    B { "@AlphaList" }
+    C { (a) }
+    D { "@ParenAlphaList" }
+@Rowa
+    A { A. }
+    B { "@UCAlphaList" }
+    C { (A) }
+    D { "@ParenUCAlphaList" }
+@Rowa
+    A { @Bullet }
+    B { "@BulletList" }
+@Rowa
+    A { @Star }
+    B { "@StarList" }
+@Rowa
+    A { -- }
+    B { "@DashList" }
+}
+roman @Index { Roman numerals }
+The Roman numerals end at cc (200), but ordinary decimal numbers have
+no limit.  The labels produced by the four alphabetical list symbols are
+determined by the current language; in English they start at @Code "a"
+and end at {@Code "z"}.
+@PP
+You may also supply your own labels using the @Code "@TaggedList"
+taggedlist @Index @Code "@TaggedList"
+tl. @Index @Code "@TL"
+symbol.  Each item is introduced by @Code "@TagItem" instead of
+tagitem. @Index @Code "@TagItem"
+ti. @Index @Code "@TI"
+{@Code "@ListItem"}.  Since such labels tend to be quite wide,
+there are @Code "@WideTaggedList" and @Code "@VeryWideTaggedList" symbols
+widetaggedlist @Index @Code "@WideTaggedList"
+wtl. @Index @Code "@WTL"
+verywidetaggedlist @Index @Code "@VeryWideTaggedList"
+vwtl. @Index @Code "@VWTL"
+which leave extra space for them:
+@ID @OneRow @Code {
+"@WideTaggedList"
+"@TagItem { 9 a.m. } { Breakfast in the Ipamena Lounge,"
+"served with Irish coffee and fresh croissants. }"
+"@TagItem { 10 a.m. } { Prof. A. Smith"
+"speaks on `The Wealth of Nations.' }"
+"@EndList"
+}
+Each @Code "@TagItem" symbol is followed by the desired label between
+braces, and then the item proper.  The label may be empty, but still its
+enclosing braces must be there.  The result here is
+@ID @OneRow {
+@RawWideTaggedList
+@TagItem { 9 a.m. } { Breakfast in
+the Ipamena Lounge, served with
+Irish coffee and fresh croissants. }
+@TagItem { 10 a.m. } { Prof. A. Smith
+speaks on `The Wealth of Nations.' }
+@RawEndList
+}
+An alternative way to accommodate wide labels is the `drop item,'
+drop.item @Index { drop items }
+which looks like this:
+@ID @OneRow {
+@RawTaggedList
+@DTI { 10 a.m. } { Prof. A. Smith speaks on `The Wealth of Nations.' }
+@RawEndList
+}
+Individual items are dropped in this way by using @Code "@DropTagItem"
+drop.tag.item @Index @Code "@DropTagItem"
+dti. @Index @Code "@DTI"
+instead of {@Code "@TagItem"}.  There is also a @Code "@DropListItem"
+drop.list.item @Index @Code "@DropListItem"
+dli. @Index @Code "@DLI"
+symbol corresponding to {@Code "@ListItem"}, but it is very rarely
+needed.  Lout is not able to decide for itself whether a label is wide
+enough to require a drop item.
+@PP
+Each list has a `raw' version which omits the preceding space, and
+raw.lists @Index { raw lists }
+raw.list. @Index @Code "@RawList"
+raw.end.list. @Index @Code "@RawEndList"
+@Code "@EndList" has a raw version which omits the following
+space.  These are mainly used when an item is itself a list:
+@ID @OneRow @Code {
+"@ParenNumberedList"
+"@ListItem {"
+"   @RawParenRomanList"
+"   @ListItem { MV Nominees,"
+"hereinafter called the vendor, ... }"
+"   @RawEndList"
+"}"
+"@EndList"
+}
+produces
+@ID @OneRow {
+@RawParenNumberedList
+@ListItem {
+   @RawParenRomanList
+   @ListItem { MV Nominees,
+hereinafter called the vendor, ... }
+   @RawEndList
+}
+@RawEndList
+}
+If @Code "@ParenRomanList" had been used instead of
+{@Code "@RawParenRomanList"}, (1) and (i) would have appeared on
+different lines; or if @Code "@EndList" had been used instead of
+{@Code "@RawEndList"}, there would have been too much space following
+the list.
+@PP
+A list item may come out partly on one page or column and partly on
+the next, if it has places where it obviously can be broken in two.  For
+example, a list item which is an ordinary paragraph of text might be
+broken in two between any two lines.  To force a list item to keep
+together on one page or column, use the @Code "@OneRow" symbol like
+this:  @Code "@ListItem @OneRow { ... }".
+@PP
+Occasionally it is desirable to start a new page or column between
+two list items.  This cannot be done by inserting @Code "@NP"
+between them, because the space between two list items is a kind
+of no-man's land where nothing is allowed to be.  Instead, the
+@Code "@ListNewPage" symbol is used:  it is permitted only between
+two list items, and its effect is to make the following list item
+appear at the top of the next page or column.  It may be used within
+any kind of list.
+@PP
+Another special list item is {@Code "@ListInterruptItem"}.  This
+prints its content without any numbering or formatting:
+@ID @OneRow @Code {
+"@NumberedList"
+"@ListItem { This is the first list item. }"
+"@ListInterruptItem { This is an interruption to the list. }"
+"@ListItem { This is the second list item. }"
+"@EndList"
+}
+produces
+@ID @OneRow {
+@RawNumberedList
+@ListItem { This is the first list item. }
+@ListInterruptItem { This is an interruption to the list. }
+@ListItem { This is the second list item. }
+@RawEndList
+}
+Although @Code "@ListInterruptItem" is written like a list item, the
+result appears to be an interruption to the list.  It may be used
+in any kind of list.
+@PP
+Every symbol introduced in this section has an abbreviated form
+consisting of @Code "@" followed by its capital letters only.  For
+example, @Code "@RawNumberedList" abbreviates to {@Code "@RNL"},
+and @Code "@ListItem" to {@Code "@LI"}.  The sole exception is
+{@Code "@RawList"}, which has no abbreviation because @Code "@RL"
+is the abbreviation for {@Code "@RomanList"}.
+@PP
+list.symbol.options @Index { list symbol options }
+Expert users will be interested to learn that all of the list symbols
+described in this section are derived from the two basic ones,
+@Code "@List" and {@Code "@RawList"}, merely by setting options.  Here
+are all the options, together with their default values:
+@ID @OneRow @Code {
+"@List"
+"    type { num }"
+"    style { num }"
+"    labelwidth { 2f }"
+"    indent { 0c }"
+"    rightindent { 0c }"
+"    gap { 1v }"
+"    start { 1 }"
+}
+These options may be used with all of the list and raw list symbols,
+except that some combinations don't make sense, for example @Code "indent"
+with {@Code "@CentredList"} or @Code "style" with {@Code "@BulletList"},
+since the list symbol has clearly already set the option.
+@PP
+The @Code "type" option determines the type of numbering (Arabic, Roman,
+etc.) and is not intended for ordinary use, since there are distinct
+symbols for each type, as we have seen.  The @Code "style" option
+determines the format of the label, any @Code "num" symbol within it
+being replaced by the number (in Arabic, Roman, etc. as determined by the
+@Code "type" option) of the item.  For example, @Code "@ParenNumberedList"
+is just
+@ID @OneRow @Code {
+"@List"
+"    style { (num) }"
+}
+and @Code "@BulletList" is just
+@ID @OneRow @Code {
+"@List"
+"    style { @Bullet }"
+}
+with @Code "num" not mentioned since no number is wanted.  The
+@Code "@TaggedList" symbol and its variants also have the
+@Code "style" option; in their case, the @Code "num" symbol within
+it must be mentioned exactly once, and its value is set to produce
+the label supplied by the author.
+@PP
+The @Code "labelwidth" option determines the width set aside for the labels;
+this is where @Code "@WideTaggedList" and @Code "@VeryWideTaggedList" differ
+from {@Code "@TaggedList"}.  The @Code "indent" and @Code "rightindent"
+options determine the space left blank at the left and right margins.  The
+value given to these three options may be any length, for example
+@Code "0.5i" (half an inch), or @Code "0.5f" (half the current font
+size).  Section {@NumberOf objects} describes lengths in general.  There
+are also three useful symbols denoting lengths:  @Code "@DisplayIndent"
+is the amount by which indented and quoted displays are indented;
+@Code "@WideIndent" and @Code "@VeryWideIndent" are the indents used by
+@Code "@WideTaggedList" and {@Code "@VeryWideTaggedList"}.  Using these
+symbols helps to keep documents consistent.
+@PP
+The @Code "gap" option determines the vertical space inserted between
+items.  Once again this must be a length, although since it is
+vertical rather than horizontal, somewhat different kinds of lengths
+are appropriate:  @Code "1.5v" for 1.5 times the current vertical space
+between lines, or the default value, {@Code "@DisplayGap"}, which produces
+the amount of vertical space used before and after displays.  Owing to
+problems behind the scenes, there is no list option for the space before or after
+the list as a whole.  To change this space in one list, use a raw list and
+insert your own paragraph symbols; to change it in every list there is a
+setup file option, described below.
+@PP
+The @Code "start" option is the number assigned to the first
+item.  It must be decimal:
+@ID @OneRow @Code {
+"@ParenRomanList"
+"    start { 25 }"
+}
+looks strange, but it is the correct way to number the first
+item (xxv).
+@PP
+Here is a larger example of these options in action.  Setting both
+@Code "indent" and @Code "rightindent" to @Code "@DisplayIndent"
+produces an effect similar to {@Code "@QuotedDisplay"}:
+@ID @OneRow @Code {
+"preceding text"
+"@List"
+"    style { @I {Item num}: }"
+"    indent { @DisplayIndent }"
+"    rightindent { @DisplayIndent }"
+"    labelwidth { @WideIndent }"
+"    start { 10 }"
+"@ListItem { The vendor ... in the case of accident.  }"
+"@ListItem { The vendor ... adjacent to the facility. }"
+"@EndList"
+"following text"
+}
+The result is
+@ID @OneRow {
+preceding text
+@List
+    style { @I {Item num}: }
+    indent { @DisplayIndent }
+    rightindent { @DisplayIndent }
+    labelwidth { @WideIndent }
+    start { 10 }
+@ListItem {
+The vendor will not be liable for any injury caused by the escape of
+radiation or radioactive materials from the facility, nor for the
+costs of repair of any property damaged by nuclear blast or fallout
+in the case of accident.
+}
+@ListItem {
+The vendor will not be liable for any injury caused by radioactive
+materials being transported to or from the facility, nor for injury
+caused by radioactive materials stored adjacent to the facility.
+}
+@EndList
+following text
+}
+You can change the @I default values of the {@Code "labelwidth"},
+{@Code "indent"}, {@Code "rightindent"}, and {@Code "gap"} options,
+by setting options called {@Code "@ListTagWidth"}, {@Code "@ListIndent"},
+{@Code "@ListRightIndent"}, and {@Code "@ListGap"} in the setup
+file (Section {@NumberOf setup}).  These default values will then apply
+automatically to every list in the document unless overridden by an option,
+just as the usual default values do.  The setup file also has a
+{@Code "@ListOuterGap"} option which determines the gap before the first
+and after the last list item in non-raw lists.
+@End @Section
diff --git a/doc/user/str_marg b/doc/user/str_marg
new file mode 100644
index 0000000..0f9f75d
--- /dev/null
+++ b/doc/user/str_marg
@@ -0,0 +1,156 @@
+@Section
+   @Title { Margin notes and arbitrary placement }
+   @Tag { marginnotes }
+@Begin
+@PP
+A note can be placed in the left margin by typing
+leftnote. @Index @Code "@LeftNote"
+marginnote. @Index { margin notes }
+@ID {
+@Code "@LeftNote { A left note. }"
+@LeftNote { A left note. }
+}
+after the word that the note refers to.  The note will appear in the
+margin at the same height on the page as that word, unless that would
+cause it to overlap a previous margin note, in which case it will be
+shifted downwards (but never onto the next page).  The note may be an
+arbitrary Lout object; for example, you might type
+@ID {
+@Code "@LeftNote @I { A left note. }"
+@LeftNote @I { A left note. }
+}
+to make your note come out in italics.
+@PP
+You can get a note in the right margin by using @Code "@RightNote"
+@RightNote { A right note. }
+rightnote. @Index @Code "@RightNote"
+instead of {@Code "@LeftNote"}.  To get a note in the outer margin
+(left on even pages, right on odd pages), use {@Code "@OuterNote"};
+@OuterNote { An outer note. }
+outernote. @Index @Code "@OuterNote"
+and for the opposite, use {@Code "@InnerNote"}.
+@InnerNote { An inner note. }
+@PP
+By default, Lout produces margins that are 2.5 centimetres wide, which
+is not really enough to accommodate reasonable margin notes.  To
+change these margins, you need to change options in the setup file, as
+explained in Section {@NumberOf margins}.
+@PP
+The appearance of the margin notes themselves is also determined by
+options in the setup file (for a general introduction to setup files
+and their options, consult Section {@NumberOf setup}).  Here are
+the options and their default values:
+@ID @OneRow @Code {
+"@MarginNoteFont { 0.80f }"
+"@MarginNoteBreak { ragged 1.10fx }"
+"@MarginNoteHGap { 0.5c }"
+"@MarginNoteVGap { 1.00v }"
+"@MarginNoteWidth { 1.50c }"
+}
+@Code "@MarginNoteFont" determines the font; the default value
+produces the current font scaled to 0.8 times the current size.
+@Code "Slope 0.80f" would yield italic notes, and so
+on.  @Code "@MarginNoteBreak" is the paragraph breaking style,
+similar to the @Code "@InitialBreak" setup file option.
+@PP
+@Code "@MarginNoteHGap" determines how far away from the
+adjacent text column the margin note will appear; the default
+value is 0.5 centimetres.  @Code "@MarginNoteVGap" is the minimum
+vertical separation between margin notes (i.e. it determines how
+far downwards a note will be shifted to avoid the previous
+one).  @Code "@MarginNoteWidth" determines the width of the column
+in which margin notes (both left and right) are set; the default
+value of 1.5 centimetres is suited to the 2.5 centimetre page margins
+that are the default, but if you widen the page margins you will be
+able to increase @Code "@MarginNoteWidth" too.
+@PP
+Left notes extend into the left margin a total distance of
+@Code "@MarginNoteHGap" plus {@Code "@MarginNoteWidth"}, and it is
+up to you to make sure that this does not put them off
+the page.  Similar remarks apply to right notes.  And since notes
+are never shifted to the next page, only downwards, there is also
+a risk that a note will be shifted off the bottom of the page, if
+it is very long or if preceding notes obstruct it.  Again, it is
+up to you to avoid this problem by keeping your notes small and not
+too close together.
+@PP
+Margin notes inside footnotes, figures and tables work well.  Margin
+notes in multi-column documents are disastrous unless used very
+sparingly.  Margin notes do not appear in plain text output
+(Section {@NumberOf plain}).
+@PP
+A more radical way to place objects at arbitrary points on the current
+place. @Index @Code "@Place"
+page is provided by the @Code "@Place" symbol:
+@ID @OneRow @Code {
+"@Place"
+"    x { right - 1 cm - xsize }"
+"    y { { foot + top } / 2 }"
+"{"
+"    @Box { Hello }"
+"}"
+}
+The placed object may be any object.  This particular example produces a
+box whose @I x (horizontal) position is such that its right edge is one
+centimetre from the right edge of the page, and whose @I y (vertical)
+position is halfway up &
+@Place
+    x { right - 1 cm - xsize }
+    y { { foot + top } / 2 }
+{
+    @Box { Hello }
+}
+the page.
+@PP
+In addition to numbers, Lout lengths (Section {@NumberOf objects}),
+and Diag lengths (Section {@NumberOf dia_summ}), the following symbols
+may be used inside the @Code "x" and @Code "y" options:
+@ID @Tab
+    @Fmta { @Col @Code A ! @Col B }
+{
+@Rowa
+    A { left }
+    B { The left edge of the page }
+@Rowa
+    A { right }
+    B { The right edge of the page }
+@Rowa
+    A { foot }
+    B { The foot edge of the page }
+@Rowa
+    A { top }
+    B { The top edge of the page }
+@Rowa
+    A { "+" }
+    B { Addition (positive is to the right and up) }
+@Rowa
+    A { "-" }
+    B { Subtraction (negative is to the left and down) }
+@Rowa
+    A { "*" }
+    B { Multiplication }
+@Rowa
+    A { "/" }
+    B { Division }
+@Rowa
+    A { "xsize" }
+    B { The width of the object being placed }
+@Rowa
+    A { "xmark" }
+    B { The column mark of the object being placed (for expert users) }
+@Rowa
+    A { "ysize" }
+    B { The height of the object being placed }
+@Rowa
+    A { "ymark" }
+    B { The row mark of the object being placed (for expert users) }
+}
+The usual precedences and associativities apply to the mathematical
+operators; braces (not parentheses) may be used for grouping.  It is
+best to give values to @Code "x" and @Code y that do not depend on
+any assumptions about where the coordinate system's origin is; this
+is true of the examples above.  At the point where @Code "@Place" occurs,
+the result is an empty object.  As with margin notes, Lout does not know
+what is happening and will not lay out the rest of the page around the
+placed object.
+@End @Section
diff --git a/doc/user/str_theo b/doc/user/str_theo
new file mode 100644
index 0000000..5d85c37
--- /dev/null
+++ b/doc/user/str_theo
@@ -0,0 +1,108 @@
+@Section
+   @Title { Theorems, lemmas, corollaries, definitions, propositions,
+examples, and claims }
+   @RunningTitle { Theorems, lemmas, etc. }
+   @Tag { theorems }
+@Begin
+@PP
+theorem. @Index @Code "@Theorem"
+A theorem is created like this:
+@ID @OneRow @Code {
+"@LD @Theorem"
+"    @Title { Fermat's Last Theorem }"
+"{"
+"@Eq { a sup n + b sup n != c sup n } for all positive integers @Eq { a },"
+"@Eq { b }, @Eq { c } and @Eq { n } when @Eq { n > 2 }."
+"@LP"
+"@Proof I have a proof of this theorem, but the margin"
+"is too small to contain it. @EndProof"
+"}"
+}
+where we have used the @Code "@LD" `left display' symbol from
+Section {@NumberOf displays} to get a left-justified display,
+and the @Code "@Eq" symbol from Chapter {@NumberOf equations}
+for the equations.  The result is
+@ID @Theorem
+    @Title { Fermat's Last Theorem }
+{
+@Eq { a sup n + b sup n != c sup n } for all positive integers @Eq { a },
+@Eq { b }, @Eq { c } and @Eq { n } when @Eq { n > 2 }.
+@LP
+@Proof I have a proof of this theorem, but the margin
+is too small to contain it. @EndProof
+}
+The @Code "@Theorem" symbol produces an object with no adjacent
+vertical space, hence it needs to be used in conjuction with
+display or paragraph symbols.  The theorem is numbered automatically,
+with the title and number inserted at the start of the first
+paragraph.  @Code "@Title" may be omitted.
+@PP
+@Code "@Proof" produces @Proof @Null
+proof. @Index @Code "@Proof"
+with the appropriate following space, and @Code "@EndProof" produces
+endproof. @Index @Code "@EndProof"
+a box at the end of the line.  They may be used anywhere, not
+just within theorems.
+@FootNote { Occasionally @Code "@EndProof" does not
+appear as far to the right as it should.  This problem can be fixed by using
+{@Code "@LD @HExpand @Theorem"}, which instructs Lout to make sure
+that as much horizontal space as possible is allocated to the theorem. }
+@PP
+There are seven symbols that produce independently numbered sequences
+in this way.  They are {@Code "@Theorem"}, {@Code "@Definition"},
+definition. @Index @Code "@Definition"
+claim. @Index @Code "@Claim"
+proposition. @Index @Code "@Proposition"
+lemma. @Index @Code "@Lemma"
+corollary. @Index @Code "@Corollary"
+example. @Index @Code "@Example"
+{@Code "@Claim"}, {@Code "@Proposition"}, {@Code "@Lemma"},
+{@Code "@Corollary"}, and {@Code "@Example"}.
+@PP
+The setup file contains options which determine whether the theorem
+numbers include a chapter number ({@Code "@ChapterNumInTheorems"}),
+or a section number ({@Code "@SectionNumInTheorems"}), and so on.  A
+section number automatically includes a chapter number, etc.  There
+are also options to change the word printed.  For example, if you
+need a sequence of conjectures, change the @Code "@ClaimWord" setup
+file option to
+@ID @Code "@ClaimWord { Conjecture }"
+and use the @Code "@Claim" symbol for your conjectures.  You can even put
+@ID @Code {
+"import @DocumentSetup"
+"macro @Conjecture { @Claim }"
+}
+into your @Code mydefs file (Section {@NumberOf definitions}) if you wish,
+so that you can write @Code "@Conjecture" in your documents instead of
+{@Code "@Claim"}.
+@PP
+The setup file also contains two options which control the format of
+the theorem (claims and so on have corresponding options).  Here they
+are with their default values:
+@ID @Code {
+"@TheoremTitleFormat { (title) }"
+"@TheoremFormat { { @B { word @NumSep number title: } &2s } @Insert body }"
+}
+The first option is used only when a @Code "@Title" is given to the
+theorem, and it determines how the title is formatted:  the @Code title
+symbol within the option stands for the @Code "@Title" option.  The default
+value shown places parentheses around the title.  The second option
+determines the format of the entire theorem.  Within it, @Code word
+stands for the value of {@Code "@TheoremWord"};
+@Code "number" is the number of the theorem; @Code "title" is the title
+of the theorem after formatting by {@Code "@TheoremFormat"} (if there
+is a title; otherwise @Code title is {@Code "@Null"}, which prints as
+nothing and even deletes the preceding space as required); and
+@Code body is the body of the theorem.  The default value prints the
+word, number and title with a colon in bold, and inserts them and two
+spaces into the first paragraph of the body; another value might be
+@ID @Code { "@TheoremFormat { @B { word @NumSep number title } @LP body }" }
+which places the header in bold on a line by itself, separated from the
+body by a paragraph break.  For @Code "@NumSep" see page {@PageOf numsep}.
+@PP
+Owing to problems behind the scenes, the @Code "@Theorem" symbol and its
+companions have a potential efficiency problem:  although all numbers are
+finalized on the second run, it takes Lout time proportional to the square
+of the highest theorem number to do this.  So large numbers of theorems
+numbered together might be slow.
+@End @Section
diff --git a/doc/user/su_crest.eps b/doc/user/su_crest.eps
new file mode 100644
index 0000000..95bc0f9
--- /dev/null
+++ b/doc/user/su_crest.eps
@@ -0,0 +1,1156 @@
+%!PS-Adobe-3.0 EPSF-3.0
+%%BoundingBox: 0 0 60 53
+%%Pages: 1
+%%Title: Crest for The University of Sydney
+%%Creator: jaa@cs.su.oz.au encapsulated by rex@cs.su.oz.au
+%%+ Converted for colour and bug fixes by Rex.
+%%CreationDate: Wed May 13 18:02:34 EST 1992
+%%+ Converted for colour: Tue Jul 7 20:06:30 EST 1992
+%%DocumentNeededResources: font Times-Bold
+%%EndComments
+%%BeginProlog
+%%EndProlog
+%%BeginSetup
+%%EndSetup
+
+% PMS colours
+% red  - 185
+% blue - 286
+% gold - 871
+gsave
+.01 dup scale
+-1988 -1050 translate
+/colour 1 def		% set to one if colour
+/pathtextdict 27 dict def
+
+/pathtext
+ { pathtextdict begin
+   /spacing exch def
+   /offset exch def
+   /str exch def
+   /pathdist 0 def
+   /offset offset str 0 1 getinterval stringwidth pop 2 div add def
+   /setdist offset def
+   /charcount 0 def
+   gsave flattenpath
+   {movetoproc} {linetoproc} {} {closepathproc} pathforall
+   grestore
+   newpath
+   end } def
+
+pathtextdict begin
+
+/movetoproc
+ { /newy exch def /newx exch def
+   /firstx newx def /firsty newy def
+   /ovr setdist pathdist sub def
+   newx newy transform
+   /cpy exch def /cpx exch def } def
+
+/linetoproc
+ { /oldx newx def /oldy newy def
+   /newy exch def /newx exch def
+   /dx newx oldx sub def
+   /dy newy oldy sub def
+   /dist dx dup mul dy dup mul add sqrt def
+   dist 0 ne
+    { /dsx dx dist div ovr mul def
+      /dsy dy dist div ovr mul def
+      oldx dsx add oldy dsy add transform
+      /cpy exch def /cpx exch def
+      /pathdist pathdist dist add def
+       { setdist pathdist le
+	 { charcount str length lt
+	    {setchar} {exit} ifelse }
+	 { /ovr setdist pathdist sub def
+	   exit }
+         ifelse } loop } if } def
+
+/closepathproc
+ { firstx firsty linetoproc
+   firstx firsty movetoproc } def
+
+/setchar
+ { /char str charcount 1 getinterval def
+   /charcount charcount 1 add def
+   /charwidth char stringwidth pop def
+   gsave
+      cpx cpy itransform translate
+      dy dx atan rotate
+      charwidth -2 div 0 moveto char show
+      /charwidth str length charcount gt
+	{ str charcount 1 getinterval stringwidth pop }
+	{ 0 } ifelse charwidth add 2 div def
+      charwidth 0 moveto
+      currentpoint transform
+      /cpy exch def /cpx exch def
+   grestore
+   /setdist setdist charwidth spacing add add def } def
+end
+/gold_colour {
+	colour 0 ne
+	{ 0.9453 0.6206 0.004 setrgbcolor }
+	{ 1 setgray }
+	ifelse
+} def
+/blue_colour {
+	colour 0 ne
+%	{ 0.0 0.0 0.0 setrgbcolor }
+%	{ 1.0 1.0 1.0 setrgbcolor }
+	{ 0.0599 0.0526 0.5493 setrgbcolor }
+	{ 1 setgray }
+	ifelse
+} def
+/red_colour {
+	colour 0 ne
+	{ 0.9375 0.0 0.0 setrgbcolor }
+	{ 1 setgray }
+	ifelse
+} def
+/c { curveto } def
+/m { moveto } def
+/l { lineto } def
+
+/sym1 { 5000 1939 m
+4974 2006 4971 2065 4924 2119 c
+4909 2137 4893 2152 4870 2153 c
+4845 2154 4824 2141 4811 2120 c
+4791 2089 4771 2068 4740 2047 c
+4722 2079 4713 2105 4706 2141 c
+4659 2111 4624 2091 4580 2057 c
+4555 2116 4561 2178 4597 2232 c
+4570 2236 4551 2242 4525 2242 c
+4543 2280 4564 2305 4598 2329 c
+4572 2345 4553 2358 4528 2375 c
+4432 2284 4332 2235 4201 2226 c
+3989 2210 3846 2323 3636 2356 c
+3596 2363 3565 2353 3525 2362 c
+3478 2372 3444 2415 3441 2463 c
+3358 2444 3304 2395 3250 2329 c
+3222 2365 3205 2402 3211 2447 c
+3179 2445 3148 2437 3135 2408 c
+3122 2378 3135 2351 3144 2320 c
+3092 2351 3046 2396 3050 2457 c
+3053 2509 3097 2544 3146 2563 c
+3104 2574 3073 2584 3030 2587 c
+3053 2628 3079 2655 3119 2679 c
+3070 2703 3031 2726 3003 2773 c
+3033 2798 3059 2811 3095 2827 c
+3062 2842 3035 2852 2999 2850 c
+2961 2846 2934 2826 2909 2798 c
+2897 2844 2904 2890 2936 2925 c
+2999 2992 3096 2968 3185 2949 c
+3143 3062 3116 3145 3080 3260 c
+3056 3248 3037 3240 3012 3228 c
+3009 3255 3008 3275 3004 3303 c
+2954 3263 2914 3228 2851 3218 c
+2792 3210 2733 3215 2694 3260 c
+2657 3302 2652 3361 2676 3411 c
+2698 3457 2745 3480 2796 3479 c
+2848 3478 2888 3433 2900 3382 c
+2976 3532 2884 3672 2865 3839 c
+2853 3951 2882 4059 2972 4127 c
+3035 4175 3120 4184 3186 4141 c
+3233 4110 3249 4047 3232 3993 c
+3306 4030 3338 4126 3312 4204 c
+3286 4278 3221 4333 3143 4334 c
+3082 4335 3030 4290 3012 4231 c
+2987 4270 2970 4307 2979 4352 c
+2991 4411 3040 4445 3096 4466 c
+3052 4496 3012 4518 2959 4515 c
+2915 4512 2887 4486 2857 4455 c
+2857 4526 2870 4594 2928 4636 c } def
+/sym2 { 3004 4693 3106 4680 3188 4630 c
+3195 4668 3210 4699 3241 4721 c
+3280 4749 3325 4751 3370 4734 c
+3324 4681 3347 4603 3386 4544 c
+3428 4480 3447 4422 3454 4346 c
+3491 4560 3479 4786 3309 4922 c
+3309 4871 3298 4821 3255 4794 c
+3200 4760 3143 4771 3080 4784 c
+2987 4804 2933 4885 2837 4880 c
+2806 4878 2771 4868 2762 4837 c
+2750 4800 2777 4768 2801 4737 c
+2736 4747 2662 4782 2659 4848 c
+2657 4904 2696 4947 2744 4976 c
+2706 4986 2676 4992 2637 4986 c
+2650 5022 2666 5051 2700 5067 c
+2751 5090 2798 5075 2851 5060 c
+2854 5126 2881 5190 2942 5213 c
+2997 5235 3049 5211 3099 5180 c
+3043 5175 2983 5150 2972 5095 c
+2960 5029 2985 4969 3033 4922 c
+3045 4972 3068 5004 3102 5043 c
+3175 5126 3245 5203 3235 5313 c
+3228 5402 3182 5463 3122 5528 c
+3096 5557 3073 5580 3067 5618 c
+3059 5671 3076 5722 3118 5756 c
+3174 5801 3245 5811 3313 5787 c
+3350 5775 3378 5745 3382 5707 c
+3387 5660 3355 5625 3320 5594 c
+3378 5596 3424 5615 3465 5657 c
+3488 5680 3500 5709 3492 5741 c
+3479 5789 3422 5808 3372 5807 c
+3398 5849 3436 5877 3485 5879 c
+3540 5881 3582 5851 3621 5812 c
+3626 5868 3617 5910 3633 5965 c
+3647 6015 3678 6046 3720 6077 c
+3728 6032 3736 5996 3761 5957 c
+3793 6007 3828 6041 3883 6062 c
+3939 6083 3991 6081 4047 6060 c
+3996 6024 3964 5988 3935 5934 c
+3967 5942 3991 5948 4021 5962 c
+4016 5935 4014 5915 4008 5889 c
+4103 5911 4184 5919 4273 5880 c
+4323 5858 4354 5820 4374 5768 c
+4396 5801 4407 5829 4419 5867 c
+4426 5890 4435 5908 4453 5924 c
+4487 5953 4511 5975 4544 6004 c
+4556 5978 4563 5960 4575 5935 c
+4629 5971 4670 5993 4721 6033 c
+4730 5997 4739 5972 4751 5937 c
+4775 5951 4795 5964 4806 5990 c
+4816 6013 4815 6039 4797 6057 c
+4771 6083 4733 6075 4696 6068 c
+4704 6112 4719 6149 4757 6172 c
+4799 6198 4847 6189 4892 6169 c
+4896 6198 4905 6220 4923 6243 c
+4942 6267 4969 6275 5000 6276 c
+closepath  0 setgray fill } def
+/sym3 { 5000 6214 m
+4943 6214 4937 6122 4950 6067 c
+4900 6113 4830 6146 4770 6114 c
+4809 6102 4847 6083 4855 6044 c
+4876 5953 4780 5890 4699 5844 c
+4690 5859 4685 5870 4676 5885 c
+4687 5894 4695 5900 4705 5908 c
+4700 5925 4697 5938 4692 5955 c
+4663 5938 4642 5927 4615 5910 c
+4588 5893 4579 5868 4565 5840 c
+4549 5838 4538 5837 4522 5836 c
+4531 5867 4536 5892 4530 5924 c
+4495 5894 4471 5865 4457 5821 c
+4444 5776 4425 5744 4391 5712 c
+4388 5697 4383 5687 4376 5673 c
+4469 5733 4547 5769 4656 5786 c
+4818 5811 4930 5924 5000 6072 c
+closepath gold_colour fill
+5000 2189 m
+4938 2287 4857 2343 4746 2376 c
+4678 2396 4629 2419 4570 2459 c
+4567 2441 4563 2427 4557 2410 c
+4614 2373 4657 2348 4717 2315 c
+4676 2303 4642 2301 4606 2277 c
+4637 2276 4659 2271 4688 2262 c
+4643 2233 4615 2195 4602 2143 c
+4652 2176 4692 2196 4748 2215 c
+4749 2183 4753 2160 4763 2130 c
+4787 2168 4816 2203 4861 2204 c
+4925 2205 4976 2156 5000 2096 c
+closepath gold_colour fill
+4392 2432 m
+4408 2444 4419 2476 4402 2484 c
+4390 2489 4373 2482 4371 2469 c
+4368 2450 4354 2439 4337 2430 c
+4322 2422 4305 2425 4292 2436 c
+4269 2456 4267 2491 4281 2518 c
+4302 2562 4346 2582 4395 2588 c
+4443 2593 4494 2578 4515 2534 c
+4533 2497 4520 2455 4494 2422 c
+4429 2336 4347 2292 4241 2272 c
+4078 2243 3955 2308 3798 2362 c
+3712 2391 3644 2402 3552 2403 c
+3526 2403 3502 2415 3489 2438 c } def
+/sym4 { 3478 2458 3480 2484 3496 2500 c
+3511 2515 3533 2519 3552 2510 c
+3577 2498 3586 2477 3603 2454 c
+3616 2466 3627 2472 3641 2482 c
+3611 2524 3575 2566 3524 2561 c
+3489 2558 3459 2538 3448 2505 c
+3371 2498 3317 2460 3262 2407 c
+3251 2431 3260 2453 3265 2479 c
+3203 2492 3143 2480 3097 2436 c
+3096 2455 3095 2471 3107 2487 c
+3142 2535 3198 2539 3256 2554 c
+3211 2591 3168 2607 3111 2619 c
+3127 2634 3139 2645 3158 2654 c
+3250 2647 3315 2628 3406 2609 c
+3408 2621 3408 2631 3410 2643 c
+3340 2669 3285 2680 3211 2689 c
+3152 2696 3112 2723 3063 2756 c
+3103 2781 3140 2795 3187 2788 c
+3134 2861 3054 2899 2965 2890 c
+3045 2966 3170 2921 3265 2864 c
+3251 2897 3248 2926 3254 2962 c
+3340 2893 3343 2793 3410 2707 c
+3422 2716 3431 2723 3443 2732 c
+3372 2844 3351 2965 3233 3026 c
+3227 3016 3223 3008 3218 2997 c
+3175 3107 3141 3187 3116 3302 c
+3124 3313 3128 3322 3135 3333 c
+3160 3280 3179 3241 3192 3184 c
+3252 3221 3277 3279 3291 3349 c
+3355 3062 3431 2842 3621 2618 c
+3809 2396 4163 2253 4392 2432 c
+closepath gold_colour fill
+3039 4863 m
+2983 4908 2943 4954 2927 5024 c
+2915 5080 2929 5128 2960 5175 c
+2899 5138 2888 5055 2909 4986 c
+2847 5018 2791 5045 2724 5028 c
+2766 5018 2795 4995 2820 4959 c
+2781 4942 2744 4934 2720 4898 c
+2705 4875 2705 4845 2720 4822 c
+2727 4875 2775 4915 2829 4920 c
+2912 4928 2966 4873 3045 4844 c
+3043 4851 3042 4856 3039 4863 c
+closepath gold_colour } def
+/sym5 { 3771 5716 m
+3765 5719 3760 5721 3754 5724 c
+3770 5759 3789 5787 3823 5803 c
+3878 5829 3926 5846 3959 5896 c
+3928 5887 3906 5879 3877 5866 c
+3878 5934 3908 5984 3952 6036 c
+3868 6021 3814 5962 3770 5888 c
+3735 5918 3714 5947 3698 5990 c
+3657 5925 3671 5860 3657 5785 c
+3646 5724 3605 5682 3549 5656 c
+3576 5689 3603 5723 3592 5765 c
+3578 5817 3517 5835 3463 5835 c
+3513 5807 3554 5753 3539 5697 c
+3504 5571 3311 5510 3202 5581 c
+3175 5599 3155 5628 3162 5659 c
+3170 5697 3216 5709 3255 5709 c
+3264 5709 3272 5699 3272 5690 c
+3272 5682 3266 5673 3258 5672 c
+3242 5672 3219 5667 3219 5650 c
+3219 5634 3234 5620 3250 5619 c
+3283 5618 3311 5638 3327 5667 c
+3340 5692 3331 5728 3306 5741 c
+3261 5764 3210 5761 3167 5733 c
+3130 5710 3107 5670 3114 5627 c
+3125 5558 3186 5514 3254 5498 c
+3369 5471 3464 5510 3568 5565 c
+3734 5651 3855 5715 4032 5775 c
+4106 5801 4192 5825 4246 5767 c
+4264 5748 4269 5713 4249 5695 c
+4238 5684 4222 5684 4207 5688 c
+4197 5690 4189 5710 4198 5714 c
+4205 5717 4213 5722 4212 5729 c
+4210 5738 4203 5742 4196 5747 c
+4180 5756 4160 5757 4145 5747 c
+4128 5736 4119 5718 4119 5698 c
+4119 5657 4151 5616 4192 5612 c
+4242 5608 4293 5626 4316 5670 c
+4339 5715 4335 5769 4301 5806 c
+4259 5852 4200 5860 4138 5854 c
+4067 5848 4018 5824 3948 5818 c
+3890 5771 3825 5768 3771 5716 c
+closepath gold_colour fill
+3351 3504 m
+3316 3561 3252 3571 3187 3584 c
+3110 3600 3060 3641 3004 3697 c
+3016 3707 3025 3713 3037 3724 c
+3101 3660 3167 3625 3257 3613 c
+3312 3606 3361 3640 3388 3688 c
+3411 3731 3408 3781 3382 3822 c
+3364 3849 3334 3858 3302 3859 c
+3271 3861 3242 3842 3231 3813 c
+3222 3791 3221 3763 3240 3749 c
+3253 3739 3284 3740 3285 3757 c
+3286 3768 3301 3773 3312 3771 c
+3322 3769 3329 3757 3326 3747 c
+3322 3727 3305 3714 3284 3708 c
+3256 3700 3230 3704 3203 3718 c
+3115 3764 3064 3837 3037 3933 c
+3113 3879 3205 3865 3289 3905 c
+3595 4053 3667 4488 3532 4801 c
+3477 4929 3390 5011 3265 5073 c
+3297 5102 3328 5121 3371 5123 c } def
+/sym6 { 3413 5125 3443 5105 3479 5084 c
+3476 5132 3466 5167 3451 5214 c
+3527 5188 3578 5153 3638 5100 c
+3632 5179 3602 5235 3556 5299 c
+3590 5327 3613 5351 3634 5389 c
+3530 5370 3412 5363 3351 5450 c
+3310 5451 3280 5452 3240 5461 c
+3287 5354 3297 5242 3236 5142 c
+3194 5074 3147 5036 3101 4970 c
+3075 4931 3081 4876 3115 4844 c
+3144 4817 3187 4810 3223 4827 c
+3260 4844 3270 4889 3265 4928 c
+3262 4944 3246 4954 3230 4952 c
+3215 4951 3195 4943 3196 4927 c
+3198 4910 3191 4886 3174 4887 c
+3140 4888 3147 4960 3174 4980 c
+3197 4996 3221 5002 3248 4995 c
+3457 4941 3527 4682 3509 4467 c
+3501 4375 3484 4302 3429 4228 c
+3414 4238 3403 4244 3389 4254 c
+3422 4339 3411 4425 3360 4500 c
+3318 4562 3278 4620 3293 4695 c
+3239 4664 3226 4599 3234 4538 c
+3175 4590 3117 4626 3039 4626 c
+2987 4625 2949 4593 2920 4550 c
+3017 4578 3119 4523 3169 4436 c
+3099 4425 3027 4388 3017 4318 c
+3072 4363 3134 4389 3203 4373 c
+3269 4357 3316 4315 3344 4253 c
+3384 4164 3381 4054 3308 3990 c
+3269 3956 3220 3939 3171 3956 c
+3138 3948 3102 3956 3083 3984 c
+3070 4003 3072 4027 3084 4047 c
+3094 4064 3113 4077 3132 4073 c
+3145 4070 3154 4057 3153 4044 c
+3152 4035 3146 4027 3137 4025 c
+3130 4024 3125 4024 3119 4026 c
+3114 4015 3122 4001 3134 3997 c
+3152 3992 3170 4004 3181 4019 c
+3192 4037 3190 4058 3182 4078 c
+3173 4098 3158 4113 3137 4118 c
+3063 4138 2984 4100 2947 4034 c
+2887 3928 2905 3819 2938 3702 c
+2978 3561 2993 3351 2852 3312 c
+2826 3305 2798 3300 2778 3318 c
+2760 3335 2756 3368 2774 3386 c
+2782 3395 2797 3400 2806 3392 c
+2813 3385 2815 3372 2808 3364 c
+2804 3358 2809 3347 2816 3347 c
+2833 3346 2851 3352 2857 3367 c
+2865 3390 2850 3414 2830 3427 c
+2803 3444 2768 3445 2742 3426 c
+2715 3406 2703 3372 2710 3338 c
+2719 3293 2759 3258 2805 3257 c
+2904 3254 2972 3321 3034 3397 c
+3040 3365 3047 3342 3053 3310 c
+3088 3343 3108 3375 3125 3420 c
+3173 3371 3193 3321 3214 3256 c
+3249 3322 3255 3386 3240 3459 c
+3283 3440 3321 3428 3368 3437 c
+3376 3438 3379 3449 3376 3457 c
+3370 3475 3361 3487 3351 3504 c
+closepath gold_colour fill } def
+
+/sym7 {
+%main interior
+5000 2313 m
+4955 2385 4880 2430 4730 2470 c
+4670 2490 4630 2538 4621 2553 c
+4641 2530 4630 2538 4621 2553 c
+4585 2613 4538 2650 4472 2670 c
+4397 2694 4326 2682 4259 2639 c
+4193 2598 4169 2523 4172 2445 c
+3789 2440 3543 2822 3392 3344 c
+3431 3350 3458 3359 3495 3371 c
+3490 3425 3475 3465 3415 3578 c
+3530 3685 3540 3805 3441 3896 c
+3632 4058 3686 4286 3678 4536 c
+3673 4730 3650 4830 3573 4935 c
+3573 5041 l
+3596 5023 3630 4992 3667 4942 c
+3740 5075 3732 5205 3670 5295 c
+3713 5352 3745 5410 3780 5495 c
+3692 5468 3608 5445 3533 5440 c
+4026 5680 l
+4040 5593 4125 5530 4250 5530 c
+4310 5530 4415 5580 4453 5616 c
+4514 5658 4607 5693 4661 5699 c
+4823 5717 4930 5780 5000 5890 c
+closepath  1 setgray fill } def
+/sym8 {
+% Banner outside
+5000 1556 m
+4862 1556 4759 1613 4651 1699 c
+4509 1814 4423 1918 4279 2033 c
+4149 2137 4015 2173 3848 2182 c
+3697 2189 3587 2175 3436 2165 c
+3273 2154 3136 2138 2993 2218 c
+2923 2257 2875 2297 2823 2359 c
+2818 2365 2826 2373 2832 2378 c
+2864 2398 2887 2412 2919 2433 c
+2954 2455 2947 2512 2922 2545 c
+2881 2600 2850 2641 2823 2703 c
+2793 2771 2795 2830 2758 2894 c
+2745 2916 2720 2935 2696 2927 c
+2647 2911 2610 2902 2561 2886 c
+2557 2885 2552 2889 2550 2894 c
+2530 2941 2515 2976 2502 3027 c
+2500 3032 2505 3038 2510 3040 c
+2546 3054 2573 3062 2609 3075 c
+2626 3081 2638 3091 2645 3108 c
+2652 3125 2651 3142 2643 3159 c
+2619 3213 2586 3244 2561 3297 c
+2538 3350 2530 3393 2511 3448 c
+2500 3481 2452 3494 2421 3478 c
+2291 3413 2194 3370 2064 3305 c
+2034 3289 2015 3267 2004 3236 c
+1988 3194 2014 3153 2048 3124 c
+2053 3119 2059 3111 2065 3115 c
+2075 3120 2082 3124 2092 3130 c
+2102 3135 2116 3133 2121 3123 c
+2134 3092 2150 3073 2169 3046 c
+2174 3040 2177 3030 2171 3026 c
+2144 3007 2124 2995 2097 2977 c
+2081 2966 2072 2948 2074 2928 c
+2078 2872 2082 2830 2101 2778 c
+2125 2717 2157 2677 2203 2631 c
+2210 2624 2219 2620 2228 2623 c
+2254 2631 2274 2637 2300 2646 c
+2307 2648 2315 2644 2318 2638 c
+2330 2616 2332 2597 2339 2574 c
+2340 2568 2336 2562 2330 2558 c
+2303 2539 2280 2531 2251 2515 c
+2240 2509 2234 2497 2237 2484 c
+2293 2264 2369 2102 2522 1934 c
+2640 1804 2769 1740 2940 1699 c
+3122 1655 3264 1689 3451 1705 c
+3631 1720 3776 1743 3942 1673 c
+4083 1613 4148 1508 4263 1408 c
+4485 1215 4706 1090 5000 1090 c
+closepath  0 setgray fill } def
+
+/sym9 { 5000 1502 m
+4722 1503 4558 1710 4353 1898 c
+4199 2039 4042 2129 3833 2132 c
+3632 2136 3486 2109 3286 2101 c
+3149 2096 3040 2122 2923 2194 c
+2745 2303 2674 2468 2599 2664 c
+2500 2600 2426 2557 2324 2497 c
+2385 2294 2456 2143 2606 1994 c
+2761 1838 2945 1768 3165 1777 c
+3357 1784 3497 1797 3689 1807 c
+3873 1817 4023 1758 4161 1638 c
+4301 1516 4393 1411 4554 1319 c
+4703 1234 4828 1178 5000 1177 c
+closepath  1 setgray fill
+2660 2661 m
+2695 2563 2727 2492 2784 2405 c
+2798 2413 2808 2420 2822 2430 c
+2771 2508 2758 2578 2721 2663 c
+2712 2683 2692 2706 2671 2697 c
+2658 2692 2655 2674 2660 2661 c
+closepath  1 setgray fill
+2608 2857 m
+2597 2853 2589 2851 2577 2847 c
+2586 2839 2592 2833 2602 2826 c
+2606 2837 2606 2846 2608 2857 c
+closepath  1 setgray fill
+2390 2680 m
+2403 2655 2407 2634 2412 2607 c
+2482 2651 2535 2679 2607 2721 c
+2633 2736 2659 2747 2688 2739 c
+2726 2728 2751 2702 2766 2665 c
+2795 2595 2806 2539 2845 2474 c
+2853 2460 2869 2447 2883 2454 c
+2901 2463 2894 2490 2885 2508 c
+2851 2572 2813 2612 2784 2679 c
+2758 2740 2752 2789 2729 2851 c
+2722 2870 2709 2890 2689 2888 c
+2670 2887 2663 2864 2662 2845 c
+2660 2803 2625 2773 2586 2757 c
+2514 2728 2462 2707 2390 2680 c
+closepath  1 setgray fill
+2481 3136 m
+2479 3113 2479 3094 2486 3072 c
+2500 3078 2510 3082 2524 3088 c
+2512 3108 2500 3121 2481 3136 c
+closepath  1 setgray fill } def
+/syma { 
+2429 3113 m
+2333 3058 2261 3021 2166 2965 c
+2173 2856 2202 2775 2261 2684 c
+2368 2725 2447 2754 2553 2799 c
+2482 2901 2455 2992 2429 3113 c
+closepath  1 setgray fill
+2472 3422 m
+2469 3434 2457 3445 2445 3441 c
+2434 3436 2427 3423 2430 3411 c
+2438 3381 2452 3362 2471 3338 c
+2373 3280 2300 3241 2200 3186 c
+2219 3144 2234 3114 2259 3077 c
+2326 3114 2374 3141 2441 3178 c
+2466 3191 2497 3200 2518 3182 c
+2549 3156 2567 3134 2593 3105 c
+2600 3136 2599 3166 2579 3190 c
+2552 3224 2532 3250 2514 3289 c
+2493 3336 2484 3372 2472 3422 c
+closepath  1 setgray fill
+2380 3392 m
+2379 3400 2368 3406 2361 3402 c
+2269 3354 2202 3321 2112 3270 c
+2093 3260 2096 3233 2102 3212 c
+2103 3210 2105 3206 2107 3208 c
+2210 3264 2288 3301 2391 3358 c
+2386 3370 2383 3380 2380 3392 c
+closepath  1 setgray fill } def
+/symb_colour {
+% cross in 'azure' blue
+blue_colour 
+5000 2313 m
+4955 2385 4880 2430 4730 2470 c
+4670 2490 l
+4670 3220 l
+3430 3220 l
+3392 3344 l
+3431 3350 3458 3359 3495 3371 c
+3490 3425 3475 3465 3415 3578 c
+3530 3685 3500 3805 3490 3813 c
+4670 3813 l
+4670 4582 l
+5000 4582 l
+closepath fill
+% Chief Gules
+red_colour 
+5000 4582 m
+3675 4582 l
+3673 4730 3650 4830 3573 4935 c
+3573 5041 l
+3596 5023 3630 4992 3667 4942 c
+3740 5075 3732 5205 3670 5295 c
+3713 5352 3745 5410 3780 5495 c
+3692 5468 3608 5445 3533 5440 c
+4026 5680 l
+4040 5593 4125 5530 4250 5530 c
+4310 5530 4415 5580 4453 5616 c
+4514 5658 4607 5693 4661 5699 c
+4823 5717 4930 5780 5000 5890 c
+closepath fill
+% and now some lines around the cross, and at the base of the lion field
+0 setgray
+16 setlinewidth
+3675 4582 m 5000 4582 l stroke
+3490 3813 m 4670 3813 l 4670 4582 l stroke
+3430 3220 m 4670 3220 l 4670 2490 l stroke
+} def
+/book_clasp {
+2 copy
+gold_colour 
+m
+50 0 rlineto
+0 50 rlineto
+-50 0 rlineto
+closepath fill
+2 copy
+0 setgray
+m
+50 0 rlineto
+stroke
+m
+0 50 rmoveto
+50 0 rlineto
+stroke
+} def
+/sym_book {
+% Book outline
+% First fill the outline
+1 setgray
+5000 3742 m
+4856 3798 4755 3804 4671 3700 c
+4671 3325 l
+5329 3325 l
+5329 3700 l
+5245 3804 5144 3798 5000 3742 c
+closepath fill
+% along the base of the book colour it gold
+gold_colour 
+5329 3315 m
+5227 3420 5114 3413 5000 3363 c
+4886 3413 4773 3420 4671 3315 c 
+closepath fill
+% Clasps for the book
+% Firstly colour the clasps gold
+gold_colour 
+8 setlinewidth
+4671 3355 m
+4611 3355 l
+4611 3700 l
+4671 3700 l
+closepath
+gsave
+fill
+grestore
+0 setgray
+stroke
+% and strokes on the clasp holder
+3412 58 3644 { dup 4611 exch m 4671 exch l stroke } for
+4671 3300 m 4671 3700 l stroke
+% Now do the three book clasps
+5329 3400 book_clasp
+5329 3500 book_clasp
+5329 3600 book_clasp
+% then actually draw the book in black
+16 setlinewidth
+0 setgray
+5000 3742 m
+5000 3363 l
+4886 3413 4773 3420 4671 3315 c 
+4671 3700 l
+4755 3804 4856 3798 5000 3742 c
+closepath stroke
+5329 3700 m
+5245 3804 5144 3798 5000 3742 c
+5000 3363 l
+5114 3413 5227 3420 5329 3315 c 
+5329 3700 l
+closepath stroke
+5337 3300 m
+4663 3300 l
+stroke
+% Stroke along the spine of the book
+5000 3300 m
+5000 3742 l
+stroke
+% Line to the sides of the book
+22 setlinewidth
+4716 3360 m
+4716 3750 l
+stroke
+5284 3360 m
+5284 3750 l
+stroke
+0 setgray
+% finally some fine text lines on the book
+4 setlinewidth
+3470 60 3710 { dup dup dup dup dup dup dup
+	4766 exch m 4840 exch l stroke
+	5234 exch m 5160 exch l stroke
+	4877 exch m 4953 exch l stroke
+	5123 exch m 5047 exch l stroke
+	} for
+} def
+/symb_mono {
+0 setgray 30 setlinewidth
+% bottom most horizontal stroke
+4860 2400 m 5000 2400 l stroke
+% Horizontal strokes to base of book
+2500 100 3200 { dup 4670 exch m 5000 exch l stroke } for
+% strokes to the sides of the book
+3300 100 3700 { dup 3400 exch m 5000 exch l stroke } for
+% horiz strokes above the book
+3800 100 4500 { dup 4670 exch m 5000 exch l stroke } for
+% Vertical strokes to the top of the figure
+3614 5450 m 3614 5520 l stroke
+5060 5580 5620 5680 5720 5590 5570 5580 5620 5690 5720 5740 5770 5860 5950
+5000 -99 3614 { dup 4620 m exch l stroke } for
+% bottom dark horizontal line for cross
+84 setlinewidth 3400 3220 m 4696 3220 l stroke
+% Top dark horizontal line for cross
+56 setlinewidth 3460 3813 m 4696 3813 l stroke
+% Bottom dark line for vertical strokes
+92 setlinewidth 3650 4582 m 5000 4582 l stroke
+} def
+
+/sym { sym1 sym2 sym3 sym4 sym5 sym6 sym7 sym8 sym9 syma
+	colour 0 ne
+	{ symb_colour }
+	{ symb_mono }
+	ifelse
+} def
+
+% Draw the main body of the crest..
+0 setlinecap
+5000 0 translate -1 1 scale -5000 0 translate sym
+5000 0 translate -1 1 scale -5000 0 translate sym
+sym_book
+colour 0 eq
+{
+	% draw the dark & light edges for the cross
+	30 setlinewidth
+	4681 3813 m 4681 4582 l stroke
+	4681 3220 m 4681 2400 l stroke
+	84 setlinewidth
+	5346 3813 m 5346 4582 l stroke
+	5346 3220 m 5346 2400 l stroke
+} if
+
+/star {
+-41 -82 rlineto
+-112 42 rlineto
+39 -90 rlineto
+-85 -52 rlineto
+87 -48 rlineto
+-28 -86 rlineto
+93 33 rlineto
+45 -89 rlineto
+44 83 rlineto
+90 -28 rlineto
+-27 106 rlineto
+75 45 rlineto
+-77 42 rlineto
+28 82 rlineto
+-90 -24 rlineto
+-41 66 rlineto closepath } def
+% Draw the lion in black
+0 setlinewidth
+5863 4715 m
+5825 4660 5740 4655 5695 4700 c
+5660 4670 5608 4670 5582 4700 c
+5553 4730 5555 4780 5588 4800 c
+5554 4852 5576 4902 5655 4895 c
+5668 4893 5678 4900 5678 4910 c
+5678 4970 l
+5607 4971 5546 4980 5481 5020 c
+5481 4875 l
+5363 4930 5323 4890 5364 4810 c
+5267 4842 5240 4830 5245 4735 c
+5174 4810 5112 4773 5146 4703 c
+5115 4655 5055 4640 5021 4678 c
+4972 4677 4934 4694 4923 4723 c
+4910 4757 4917 4798 4955 4822 c
+4932 4850 4952 4875 4983 4896 c
+5012 4918 5050 4911 5077 4892 c
+5190 4970 l
+5127 5061 l
+5010 4973 4928 4950 4870 4962 c
+4845 4910 4795 4875 4733 4858 c
+4659 4942 4610 4932 4602 4804 c
+4520 4855 4483 4842 4460 4757 c
+4422 4782 4393 4781 4367 4760 c
+4378 4710 4357 4672 4326 4659 c
+4285 4648 4240 4655 4223 4697 c
+4167 4693 4137 4720 4115 4752 c
+4112 4790 4130 4828 4183 4840 c
+4183 4875 4192 4901 4222 4920 c
+4248 4939 4272 4930 4313 4904 c
+4315 4980 4272 5010 4225 4994 c
+4233 5040 4231 5070 4195 5080 c
+4149 5060 4095 5062 4075 5090 c
+4050 5112 4045 5159 4074 5193 c
+4047 5238 4050 5270 4075 5301 c
+4108 5338 4162 5330 4196 5298 c
+4232 5320 4262 5315 4287 5285 c
+4304 5262 4312 5220 4275 5181 c
+4387 5072 l
+4430 5095 l
+4408 5132 4395 5145 4395 5175 c
+4375 5193 4355 5219 4347 5251 c
+4302 5293 4300 5330 4335 5367 c
+4283 5422 4314 5485 4393 5483 c
+4407 5531 4465 5552 4506 5530 c
+4545 5561 4615 5562 4655 5530 c
+4716 5543 4762 5522 4770 5472 c
+4835 5490 4855 5422 4813 5372 c
+4844 5313 l
+4960 5313 l
+4865 5422 4870 5514 5015 5575 c
+5035 5631 5067 5658 5114 5700 c
+5128 5713 5153 5702 5151 5672 c
+5150 5617 l
+5195 5656 5240 5660 5258 5628 c
+5267 5611 5259 5586 5204 5530 c
+5220 5511 5227 5470 5207 5423 c
+5255 5442 5300 5467 5334 5485 c
+5473 5565 5652 5553 5728 5450 c
+5771 5382 5770 5338 5708 5272 c
+5673 5245 5674 5200 5702 5173 c
+5745 5131 5802 5110 5865 5093 c
+5810 5033 5813 5010 5866 4968 c
+5795 4925 5795 4898 5863 4850 c
+5786 4791 5783 4760 5863 4715 c
+5539 5324 m
+5565 5327 5589 5328 5607 5348 c
+5620 5363 5615 5388 5601 5403 c
+5586 5421 5562 5419 5539 5418 c
+5470 5406 5386 5372 5332 5324 c
+5539 5324 l
+closepath 0 setgray fill
+% We firstly fix problems,
+% The hole in the tail
+red_colour
+5091 5462 m
+5083 5471 5073 5475 5062 5475 c
+5050 5475 5040 5471 5032 5462 c
+5023 5454 5019 5444 5019 5433 c
+5019 5421 5023 5411 5032 5403 c
+5040 5394 5050 5390 5062 5390 c
+5073 5390 5083 5394 5091 5403 c
+5100 5411 5104 5421 5104 5433 c
+5104 5444 5100 5454 5091 5462 c
+closepath  fill
+% Inside of right fore paw
+4294 5212 m
+4287 5200 4282 5191 4274 5180 c
+4280 5173 4287 5171 4294 5164 c
+4294 5182 4295 5195 4294 5212 c
+closepath  fill
+% Rest of the right fore paw
+4328 5261 m
+4328 5212 4328 5176 4328 5127 c
+4347 5110 4360 5098 4379 5080 c
+4386 5074 4401 5084 4400 5094 c
+4400 5120 4396 5138 4396 5164 c
+4395 5179 4386 5190 4375 5200 c
+4354 5219 4354 5250 4328 5261 c
+closepath  fill
+% and now in the rest in gold
+gold_colour
+% crotch
+5300 5162 m
+5326 5166 5354 5166 5371 5145 c
+5344 5139 5321 5146 5300 5162 c
+% Right hind leg
+closepath  fill
+5316 4855 m
+5271 4863 5221 4835 5211 4791 c
+5188 4803 5166 4806 5141 4798 c
+5107 4787 5107 4741 5109 4704 c
+5096 4692 5085 4679 5067 4680 c
+5044 4682 5030 4709 5033 4731 c
+5034 4740 5010 4743 5009 4734 c
+5007 4723 4998 4712 4987 4713 c
+4962 4716 4939 4737 4939 4762 c
+4939 4784 4964 4797 4986 4797 c
+4995 4797 5003 4816 4995 4821 c
+4979 4831 4973 4859 4987 4872 c
+5010 4893 5051 4883 5071 4860 c
+5123 4892 5160 4917 5211 4950 c
+5221 4956 5224 4970 5218 4979 c
+5200 5007 5187 5027 5171 5056 c
+5162 5072 5157 5096 5173 5104 c
+5207 5121 5231 5135 5264 5152 c
+5299 5125 5338 5112 5382 5120 c
+5405 5088 5425 5067 5451 5037 c
+5450 4993 5449 4961 5449 4916 c
+5416 4926 5386 4940 5356 4924 c
+5330 4910 5318 4884 5316 4855 c
+closepath  fill
+% Chest
+4631 5190 m
+4627 5148 4616 5095 4575 5091 c
+4535 5087 4514 5140 4511 5180 c
+4491 5152 4467 5122 4481 5091 c
+4494 5062 4515 5048 4537 5025 c
+4580 5046 4612 5060 4653 5085 c
+4673 5097 4681 5120 4680 5144 c
+4679 5168 4651 5175 4631 5190 c
+closepath  fill
+% Main Body
+4306 4871 m
+4291 4896 4249 4908 4229 4888 c
+4212 4871 4212 4841 4227 4824 c
+4224 4819 4220 4817 4217 4812 c
+4195 4813 4169 4805 4166 4784 c
+4163 4765 4171 4745 4188 4737 c
+4207 4728 4229 4738 4243 4753 c
+4249 4748 4255 4746 4261 4742 c
+4255 4722 4259 4695 4278 4688 c
+4297 4682 4319 4681 4332 4696 c
+4346 4713 4336 4734 4330 4755 c
+4328 4762 4327 4769 4332 4775 c
+4358 4805 4401 4817 4438 4801 c
+4464 4849 4526 4868 4577 4851 c
+4579 4891 4612 4926 4652 4932 c
+4687 4936 4722 4923 4740 4892 c
+4781 4908 4812 4928 4835 4965 c
+4843 4977 4841 4989 4839 5002 c
+4835 5027 4826 5043 4815 5065 c
+4810 5074 4836 5085 4841 5076 c
+4856 5048 4864 5026 4873 4996 c
+4939 4998 4995 5004 5047 5045 c
+5138 5116 5212 5185 5328 5191 c
+5357 5192 5384 5181 5399 5156 c
+5462 5050 5572 5010 5694 4995 c
+5703 4994 5707 4984 5707 4975 c
+5707 4912 5707 4866 5707 4802 c
+5697 4802 5689 4802 5678 4801 c
+5677 4822 5674 4837 5672 4858 c
+5669 4883 5613 4876 5605 4853 c
+5597 4833 5615 4813 5633 4800 c
+5631 4793 5628 4787 5626 4780 c
+5610 4780 5592 4778 5587 4764 c
+5581 4748 5584 4729 5598 4719 c
+5613 4708 5630 4703 5649 4709 c
+5668 4714 5679 4728 5690 4745 c
+5698 4744 5703 4743 5711 4742 c
+5718 4710 5767 4698 5797 4712 c
+5769 4752 5770 4807 5801 4845 c
+5773 4874 5770 4922 5794 4954 c
+5772 4992 5773 5033 5791 5072 c
+5745 5094 5709 5112 5675 5150 c
+5643 5186 5635 5231 5647 5277 c
+5688 5310 5718 5357 5707 5410 c
+5691 5483 5604 5514 5529 5511 c
+5385 5505 5298 5418 5159 5379 c
+5109 5365 5062 5347 5019 5374 c
+4997 5388 4981 5409 4982 5436 c
+4983 5465 5003 5488 5030 5500 c
+5052 5510 5077 5511 5097 5497 c
+5118 5482 5125 5460 5127 5435 c
+5128 5423 5147 5413 5157 5419 c
+5175 5430 5187 5447 5185 5468 c
+5182 5495 5172 5513 5161 5537 c
+5187 5554 5199 5574 5217 5599 c
+5222 5606 5204 5619 5198 5613 c
+5175 5593 5153 5586 5128 5568 c
+5122 5563 5107 5568 5107 5576 c
+5110 5608 5110 5631 5109 5663 c
+5072 5629 5045 5590 5050 5541 c
+4992 5542 4922 5509 4919 5451 c
+4916 5384 4969 5341 5021 5300 c
+4954 5296 4904 5297 4836 5293 c
+4833 5276 4821 5264 4806 5256 c
+4798 5223 4777 5202 4749 5185 c
+4742 5157 4725 5138 4701 5122 c
+4694 5093 4682 5069 4657 5054 c
+4531 4981 4435 4936 4306 4871 c
+5207 5299 l
+5319 5353 5395 5408 5515 5439 c
+5555 5450 5594 5453 5625 5426 c
+5643 5411 5654 5391 5650 5368 c
+5645 5330 5611 5298 5573 5297 c
+5207 5299 l
+closepath  fill
+% Mane below Left Ear
+4774 5350 m
+4765 5338 4761 5328 4755 5315 c
+4770 5303 4780 5293 4793 5279 c
+4800 5284 4804 5289 4810 5295 c
+4805 5296 4802 5296 4798 5296 c
+4798 5307 4798 5315 4797 5325 c
+4796 5338 4783 5342 4774 5350 c
+closepath  fill
+% Mane below Right Ear
+4378 5312 m
+4368 5324 4365 5337 4362 5352 c
+4344 5342 4322 5328 4326 5308 c
+4328 5296 4333 5287 4342 5278 c
+4354 5292 4362 5302 4378 5312 c
+closepath  fill
+% Mane below left Eye
+4690 5230 m
+4683 5217 4674 5209 4661 5200 c
+4677 5187 4687 5177 4700 5161 c
+4713 5173 4735 5196 4720 5207 c
+4709 5216 4701 5222 4690 5230 c
+closepath fill
+% Mane below right Eye
+4483 5195 m
+4466 5201 4452 5207 4443 5221 c
+4420 5208 4398 5174 4416 5155 c
+4425 5145 4432 5139 4442 5131 c
+4454 5156 4465 5173 4483 5195 c
+closepath  fill
+% Face
+4426 5435 m
+4418 5454 4400 5481 4417 5491 c
+4440 5505 4461 5512 4487 5509 c
+4496 5508 4505 5506 4510 5498 c
+4521 5479 4526 5464 4536 5444 c
+4545 5445 4552 5447 4561 5447 c
+4556 5473 4519 5512 4545 5518 c
+4571 5524 4606 5536 4619 5512 c
+4632 5489 4639 5471 4645 5445 c
+4655 5447 4662 5447 4673 5448 c
+4669 5471 4658 5508 4681 5511 c
+4701 5514 4721 5508 4733 5493 c
+4744 5479 4724 5463 4711 5452 c
+4717 5445 4722 5440 4729 5433 c
+4752 5447 4788 5465 4803 5441 c
+4818 5417 4783 5392 4758 5378 c
+4754 5375 4750 5372 4747 5367 c
+4739 5350 4733 5338 4724 5321 c
+4721 5315 4723 5307 4729 5303 c
+4747 5289 4758 5276 4777 5262 c
+4769 5246 4759 5235 4743 5228 c
+4725 5241 4711 5250 4693 5263 c
+4693 5269 4694 5273 4694 5278 c
+4685 5278 4679 5279 4670 5278 c
+4671 5247 4642 5218 4610 5218 c
+4597 5218 4585 5226 4581 5239 c
+4575 5260 4600 5274 4620 5283 c
+4632 5288 4643 5297 4643 5310 c
+4643 5325 4644 5336 4643 5350 c
+4643 5357 4648 5363 4654 5366 c
+4668 5373 4678 5377 4692 5384 c
+4690 5393 4689 5400 4687 5410 c
+4665 5402 4650 5396 4629 5387 c
+4622 5385 4616 5379 4616 5371 c
+4615 5351 4611 5336 4612 5315 c
+4613 5307 4605 5300 4597 5300 c
+4575 5299 4560 5301 4539 5301 c
+4529 5301 4524 5312 4523 5322 c
+4521 5339 4520 5351 4519 5369 c
+4518 5376 4516 5384 4509 5386 c
+4486 5397 4470 5405 4446 5414 c
+4443 5405 4440 5399 4437 5390 c
+4458 5382 4472 5371 4492 5361 c
+4494 5340 4494 5325 4496 5304 c
+4498 5288 4516 5279 4533 5278 c
+4545 5277 4551 5262 4551 5249 c
+4551 5235 4541 5217 4526 5218 c
+4509 5220 4496 5219 4478 5222 c
+4456 5227 4461 5258 4459 5281 c
+4450 5281 4443 5281 4434 5281 c
+4435 5257 4423 5236 4402 5223 c
+4388 5214 4371 5235 4366 5251 c
+4360 5273 4387 5291 4409 5295 c
+4410 5301 4411 5305 4412 5311 c
+4394 5328 4388 5350 4388 5375 c
+4361 5387 4321 5414 4338 5437 c
+4355 5460 4391 5441 4414 5425 c
+4418 5428 4421 5432 4426 5435 c
+closepath fill
+% Tongue
+4564 5204 m
+4556 5198 4549 5194 4540 5192 c
+4543 5167 4546 5129 4571 5130 c
+4597 5130 4596 5170 4595 5195 c
+4583 5197 4574 5198 4564 5204 c
+closepath  fill
+% Right Fore Paw
+4458 5072 m
+4429 5058 4408 5049 4379 5036 c
+4324 5086 4286 5124 4232 5174 c
+4255 5202 4277 5248 4249 5271 c
+4228 5288 4201 5264 4179 5248 c
+4158 5270 4127 5298 4103 5280 c
+4075 5260 4096 5216 4115 5188 c
+4094 5177 4077 5154 4084 5131 c
+4093 5101 4137 5086 4166 5100 c
+4186 5110 4208 5111 4227 5099 c
+4248 5084 4250 5059 4253 5034 c
+4304 5041 4346 4983 4351 4931 c
+4408 4961 4450 4983 4506 5014 c
+4487 5034 4471 5048 4458 5072 c
+closepath  fill
+% Draw the stars (outline in black)
+0 setgray 60 setlinewidth
+3943 3714 m star stroke
+6077 3714 m star stroke
+5010 2943 m star stroke
+5010 4379 m star stroke
+% and fill in gold
+gold_colour 
+3928 3725 m star fill
+6062 3725 m star fill
+4995 2958 m star fill
+4995 4394 m star fill
+
+0 setgray 
+%%IncludeResource: font Times-Bold
+
+/Times-Bold findfont [ 342 0 0 250 0 0 ] makefont setfont newpath
+
+2430 2395 m
+2460 2278 2514 2220 2555 2180 c
+2576 2140 2613 2090 2662 2053 c
+2730 1993 2812 1925 2910 1893 c
+2987 1870 3115 1851 3207 1855 c
+3290 1860 3400 1860 3495 1870 c
+3760 1890 3990 1834 4135 1732 c
+4195 1690 4273 1615 4320 1565 c
+4368 1513 4517 1435 4547 1390 c
+4666 1320 4847 1250 5000 1250 c
+5153 1250 5334 1320 5453 1390 c
+5483 1435 5632 1513 5680 1565 c
+5727 1615 5805 1690 5865 1732 c
+6010 1834 6240 1890 6505 1870 c
+6600 1860 6710 1860 6793 1855 c
+6885 1851 7013 1870 7090 1893 c
+7188 1925 7270 1993 7338 2053 c
+7387 2090 7424 2140 7445 2180 c
+7486 2220 7540 2278 7570 2395 c
+(SIDERE\264MENS\264EADEM\264MUTATO) 0 30 pathtext
+grestore
+showpage
+%%Trailer
diff --git a/doc/user/tbl b/doc/user/tbl
new file mode 100644
index 0000000..230c69e
--- /dev/null
+++ b/doc/user/tbl
@@ -0,0 +1,48 @@
+@Chapter
+    @Title { Tables }
+    @Tag { tables }
+@Begin
+@LP
+This chapter explains how to produce tables like this one:
+tables. @Index { tables }
+@CD @Tbl
+   aindent { ctr }
+   arulebelow { double }
+   aformat { @StartHSpan @Cell @B X | | @HSpan }
+   bformat { @Cell rr { no } @I A | @Cell rl { no } B | @Cell C }
+   rule { yes }
+{
+@Rowa
+   X { Value of mathematical formulae (millions of dollars) }
+@Rowb
+   A { Quadratic formula }
+   B { @Eq { x ^= { minus b +- sqrt { b sup 2 - 4ac } } over 2a } }
+   C { 3^.5 }
+@Rowb
+   A { Binomial theorem }
+   B { @Eq { ( a + b ) sup n ^= big sum from k=0 to infty
+matrix atleft { ( } atright { ) } { n above k } a sup k b sup n-k
+} }
+   C { 12^ }
+}
+As the example shows, the tables may contain spanning columns, aligned
+columns, and rules, and the cells may contain arbitrary objects.
+@BeginSections
+
+@Include { tbl_intr } # introduction
+@Include { tbl_cell } # basic cell formatting: font, break, width, paint
+@Include { tbl_rows } # row formats and the @Row symbol
+@Include { tbl_marg } # margins
+@Include { tbl_widt } # width and height
+@Include { tbl_inde } # indenting and struts
+@Include { tbl_rule } # rules
+@Include { tbl_span } # spanning columns and rows
+@Include { tbl_mult } # multi-page tables
+@Include { tbl_alig } # aligned columns and headings over them
+@Include { tbl_mark } # @MarkRow
+@Include { tbl_plai } # plain text tables
+@Include { tbl_setu } # setup file options
+@Include { tbl_summ } # summary
+
+@EndSections
+@End @Chapter
diff --git a/doc/user/tbl_alig b/doc/user/tbl_alig
new file mode 100644
index 0000000..24b6864
--- /dev/null
+++ b/doc/user/tbl_alig
@@ -0,0 +1,96 @@
+@Section
+    @Title { Aligned columns }
+    @Tag { tbl_alig }
+@Begin
+@PP
+Columns of numbers are often presented with decimal points aligned:
+aligned.columns @Index { aligned columns in tables }
+@CD @OneRow @Tbl
+    marginvertical { 0.5vx }
+    aformat { @Cell A }
+{
+@Rowa A { 5^.46 } marginabove { 0i }
+@Rowa A { 3^.4159 }
+@Rowa A { 5772^ } marginbelow { 0i }
+}
+You can produce this by placing a @Code "^" symbol, which is used
+generally throughout Lout for alignment, just before the alignment point in
+each entry:
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    marginvertical { 0.5vx }
+    aformat { @Cell A }
+{
+@Rowa A { 5^.46 }
+@Rowa A { 3^.4159 }
+@Rowa A { 5772^ }
+}
+}
+The equals signs of equations can be aligned in the same way (see the
+example at the start of this chapter).  Aligned cells should have no
+@Code indent option.
+@PP
+Owing to problems behind the scenes, getting a heading over the top
+of an aligned column is a problem with no ideal solution.  What most
+people want is for the heading to be centred in the column, and the
+aligned entries to be centred in the column as a block, but Lout cannot
+do this.  One approximation is to make the heading cell a spanning
+cell with centring, like this:
+@FootNote { Lout does not currently accept single-column tables
+with {@Code "@StartHSpan"}, so we've had to add
+an empty second column. }
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    marginvertical { 0.5vx }
+    aformat { @StartHSpan @Cell indent { ctr } @B A | }
+    bformat { @Cell A | }
+{
+@Rowa A { Heading }
+@Rowb A { 5^.46 }
+@Rowb A { 3^.4159 }
+@Rowb A { 5772^ }
+}
+}
+The spanning frees the heading from alignment, permitting
+@Code "indent { ctr }" to work:
+@CD @OneRow @Tbl
+    marginvertical { 0.5vx }
+    aformat { @StartHSpan @Cell indent { ctr } @B A | }
+    bformat { @Cell A | }
+{
+@Rowa A { Heading } marginabove { 0i }
+@Rowb A { 5^.46 }
+@Rowb A { 3^.4159 }
+@Rowb A { 5772^ } marginbelow { 0i }
+}
+But if the heading cell is wider than the aligned cells, you get this:
+@CD @OneRow @Tbl
+    marginvertical { 0.5vx }
+    aformat { @StartHSpan @Cell indent { ctr } @B A | }
+    bformat { @Cell A | }
+{
+@Rowa A { A Wider Heading } marginabove { 0i }
+@Rowb A { 5^.46 }
+@Rowb A { 3^.4159 }
+@Rowb A { 5772^ } marginbelow { 0i }
+}
+In other words, this will centre a heading with respect
+to aligned entries, but it will not centre aligned entries with
+respect to a heading.  In these cases you could forget about
+@Code "@StartHSpan" and treat the heading as an aligned entry,
+either by placing a @Code "^" within it or by using
+@ID @Code "@Cell 0.5w @HShift A"
+which places the alignment point in the centre of the entry.
+#@CD @OneRow @Tbl
+#    marginvertical { 0.5vx }
+#    aformat { @Cell 0.5w @HShift @B A }
+#    bformat { @Cell A }
+#{
+#@Rowa A { A Wider Heading } marginabove { 0i }
+#@Rowb A { 5^.46 }
+#@Rowb A { 3^.4159 }
+#@Rowb A { 5772^ } marginbelow { 0i }
+#}
+You can move the alignment point about by changing the 0.5.  Of course,
+all this is a poor substitute for the real thing.
+@End @Section
diff --git a/doc/user/tbl_cell b/doc/user/tbl_cell
new file mode 100644
index 0000000..159372e
--- /dev/null
+++ b/doc/user/tbl_cell
@@ -0,0 +1,97 @@
+@Section
+    @Title { Changing the appearance of cells }
+    @Tag { tbl_cell }
+@Begin
+@PP
+The @Code "@Cell" symbol offers a few options for changing the appearance
+cell.option @Index { cell options in tables }
+of entries placed in it.  Like all options, these
+appear immediately after the @Code "@Cell" symbol, with their values in braces:
+@ID @OneRow @Code @Verbatim {
+@Tbl
+   aformat { @Cell paint { lightgrey } font { Italic } break { clines } A }
+{
+@Rowa A {
+IMPORTANT
+Do not throw stones at this notice
+}
+}
+}
+The result here is
+@CD
+@Tbl
+   aformat { @Cell paint { lightgrey } font { Italic } break { clines } A | @Cell B }
+{
+@Rowa A {
+IMPORTANT
+Do not throw stones at this notice
+}
+}
+with a light grey background, Italic font, and
+@Code "clines" paragraph breaking style.  The paint colour
+may be any colour from Section {@NumberOf colour}.  Another option,
+{@Code background}, allows an arbitrary object to be placed in the
+background of the cell, in front of any paint but behind the entry.
+@PP
+Later sections introduce other @Code "@Cell" options, for
+fixed-width columns, indented entries, margins, and rules.  It is also
+possible to combine other symbols from Lout with cell formatting, by
+placing them between the @Code "@Cell" symbol and its following letter,
+rotated.entries @Index { rotated entries in tables }
+like this:
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    aformat { @Cell 90d @Rotate @S A | @Cell @B grey @Colour B }
+{
+@Rowa
+    A { Col A }
+    B { Col B }
+}
+}
+Think of the @Code "A" as standing for the value of the @Code "A"
+option of the @Code "@Rowa" symbol (which it does), and you'll see
+that this is just Lout's usual rule of symbols applying to the
+object that follows them.  The result here is
+@CD @Tbl
+    aformat { @Cell 90d @Rotate @S A | @Cell @B grey @Colour B }
+{
+@Rowa
+    A { Col A }
+    B { Col B }
+}
+In simple cases @Code "@B" is easier than {@Code "font { Bold }"};
+the latter is useful as a default value, as we will see in a moment.
+Note the difference between a coloured background, obtained with
+{@Code "paint"}, and a coloured entry, obtained using the @Code "@Colour"
+symbol.
+@PP
+@Code "@Tbl" offers many places where you can set cell options.  The meaning
+of the option is the same wherever you set it;
+what changes is the extent of its application.  Taking the @Code "paint"
+option as a representative example, the most specific place to set it
+is at a @Code "@Cell" symbol as above; then it affects only that cell
+in rows formatted using that format.  Alternatively,
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    apaint { lightgrey }
+    aformat { @Cell A | @Cell B }
+}
+will paint every cell in the {@Code "aformat"}.  And
+@ID @OneRow @Code @Verbatim {
+@Rowa
+    paint { lightgrey }
+    A { ... }
+}
+will paint every cell in a particular row.  To paint the entire table, use
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    paint { lightgrey }
+}
+And finally, there is a @Code "paint" option in the
+setup file (Section {@NumberOf tbl_setu}), which if set will paint every
+table in the document.  When a more general setting of an option is
+contradicted by a more specific setting (e.g. when @Code "@Tbl" has
+@Code "paint { lightgrey }" but some cell or row has
+{@Code "paint { nopaint }"}), the more specific setting applies.  For a
+precise description, see Section {@NumberOf tbl_summ}.
+@End @Section
diff --git a/doc/user/tbl_inde b/doc/user/tbl_inde
new file mode 100644
index 0000000..75a3471
--- /dev/null
+++ b/doc/user/tbl_inde
@@ -0,0 +1,58 @@
+@Section
+    @Title { Indenting and struts }
+    @Tag { tbl_inde }
+@Begin
+@PP
+By default, entries appear at the left within cells, not counting the
+cell margin.  The @Code indent option causes entries to be indented
+horizontally.  For example,
+@ID @OneRow @Code "@Cell indent { ctr }"
+horizontally centres the entry within the cell.  The other possible values
+centred.entries @Index { centred entries in tables }
+right.justified.entries @Index { right justified entries in tables }
+of this option are {@Code "left"}, {@Code "right"}, or any length (for
+example, {@Code 2f}) meaning that much indent.
+@PP
+There is a corresponding @Code "indentvertical" option for vertical indenting
+within the cell.  It takes the same values except that @Code "left" is
+renamed {@Code "top"}, and @Code "right" is renamed {@Code foot}.
+A common problem with vertical placement is that words that lack
+ascenders (parts of letters that rise up) or descenders (parts that
+sink down) can easily become misaligned with words that
+don't.  Looking at
+@CD @Tbl
+    aformat { @Cell A | @Cell B | @Cell C }
+    marginvertical { 0i }
+{
+@Rowa
+    A { resume }
+    B { poppy }
+    C { title }
+}
+which is the result of
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    aformat { @Cell A | @Cell B | @Cell C }
+{
+@Rowa
+    A { resume }
+    B { poppy }
+    C { title }
+}
+}
+we see that the words are aligned correctly despite the absence of
+ascenders from the first two words, and of descenders from the first
+and last; and this despite the fact that these words are vertically
+placed at the top of the cell.  This is because by default
+@Code "@Tbl" adds a @I { vertical strut } to each entry:  an invisible
+object of zero width and height {@Code "1f"}, which covers for any absent
+ascenders and descenders.  The option
+@ID @OneRow @Code "@Cell strut { no }"
+can be used to remove the strut; other acceptable values for this
+option are {@Code yes} (the default value), and any length, which will
+add a strut of that length.
+@PP
+For completeness there is a corresponding @Code "struthorizontal" option; it
+takes the same values, its default value is {@Code no}, and it unlikely
+ever to be used.
+@End @Section
diff --git a/doc/user/tbl_intr b/doc/user/tbl_intr
new file mode 100644
index 0000000..a46da18
--- /dev/null
+++ b/doc/user/tbl_intr
@@ -0,0 +1,119 @@
+@Section
+    @Title { Getting started }
+    @Tag { tbl_intr }
+@Begin
+@PP
+The Lout definitions for table formatting
+@FootNote {
+The @Code "tbl" package described here replaces the @Code "tab"
+package of Version 3.12 and earlier.  For backward compatibility
+the @Code "tab" package is still available and still works as
+described in older versions of this documentation.  Users of
+@Code "tab" will find simple uses of @Code "tbl" to be very similar,
+replacing @Code "@Tab" by {@Code "@Tbl"}, @Code "@Fmta" by
+{@Code "aformat"}, @Code "@Col" by {@Code "@Cell"}, and
+@Code "!" by {@Code "|"}.
+}
+are kept in a file called {@Code "tbl"}, which you must include at
+the start of your document if
+tbl.file @Index { @Code "tbl" file }
+you want tables, like this:
+@ID @OneRow @Code {
+"@SysInclude { tbl }"
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"..."
+"@End @Text"
+}
+Specialized setup files, like {@Code "tbl"}, are included before the main
+setup file (@Code "doc" in this case).  Alternatively, if you are using
+your own setup file, you may place the include commands within it, near the
+start.
+@PP
+To begin with a very simple example, the table
+tbl. @Index @Code "@Tbl"
+@CD
+@Tbl
+    aformat { @Cell A  |  @Cell B  |  @Cell C }
+{
+@Rowa
+    A { Austen }
+    B { Chaucer }
+    C { Donne }
+@Rowa
+    A { Balzac }
+    B { Darwin }
+    C { Goethe }
+@Rowa
+    A { Byron }
+    B { Dickens }
+    C { Homer }
+}
+is produced by the following input:
+@ID @OneRow @Code {
+"@Tbl"
+"    aformat { @Cell A  |  @Cell B  |  @Cell C }"
+"{"
+"@Rowa"
+"    A { Austen }"
+"    B { Chaucer }"
+"    C { Donne }"
+"@Rowa"
+"    A { Balzac }"
+"    B { Darwin }"
+"    C { Goethe }"
+"@Rowa"
+"    A { Byron }"
+"    B { Dickens }"
+"    C { Homer }"
+"}"
+}
+Immediately after the @Code "@Tbl" symbol, which introduces the table,
+comes a @I { format option }, {@Code "aformat"}, describing the format of
+each row.  It says that each row contains three cells:  {@Code "@Cell A"},
+{@Code "@Cell B"}, and {@Code "@Cell C"}.  The format option may have up
+to 26 cells, with names chosen freely from the upper-case letters from
+@Code A to {@Code Z}.  The symbol @Code "|" separates each cell from the next.
+@PP
+After the format option comes the body of the table, enclosed in
+braces.  It consists entirely of a sequence of rows, each introduced by
+a @Code "@Rowa" symbol and containing one entry for each cell of the
+format option, as shown (the row may occupy any number of lines of the
+input file).  The entries may be arbitrary Lout objects, such as words,
+paragraphs, equations, figures, and so on without restriction.  An entry
+may be omitted altogether if it is empty.  Lout will choose suitable widths
+for the cells, and break paragraphs in the entries to the right widths.
+@PP
+The result of the @Code "@Tbl" symbol is an object.  As usual with
+Lout, this object may appear at any point in the document,
+@FootNote {
+In rare cases, when the table occupies an entire paragraph but is not
+displayed, a bug in the current version of Basser Lout causes the second
+column to appear much too far to the right.  Until the problem is fixed,
+the first thing to try if this occurs is to replace the very first
+row symbol ({@Code "@Rowa"}, {@Code "@Rowb"}, etc.) by {@Code "@FirstRowa"},
+{@Code "@FirstRowb"}, etc.
+# That should work, but if it doesn't, replacing
+# @Code "@Tbl" by @Code "@OneCol @Tbl" certainly will, although it also
+# prevents the table from breaking across page boundaries.
+}
+even within a paragraph or another table.  Most commonly, though, tables
+are displayed using the @Code "@IndentedDisplay" and @Code "@CentredDisplay"
+symbols (Section {@NumberOf displays}):
+@ID @Code "@CentredDisplay @Tbl ..."
+or else they go into the @Code "@Table" symbol (Section {@NumberOf figures}):
+@ID @OneRow @Code {
+"@Table"
+"    @Caption { ... }"
+"@Tbl ..."
+}
+which centres them at the top of the following page and adds a
+caption.  Note the difference between {@Code "@Tbl"}, which builds a
+table, and {@Code "@Table"}, which places an arbitrary object in an
+appropriate place.  It's important to remember that the result
+is an object like any other, because from time to time one wants such
+things as rotated tables whose entire contents are to be italicised:
+@ID @Code "90d @Rotate @I @Tbl ..."
+and it helps to remember that the full power of Lout can be
+brought to bear on the @I entire table.
+@End @Section
diff --git a/doc/user/tbl_marg b/doc/user/tbl_marg
new file mode 100644
index 0000000..89e63cd
--- /dev/null
+++ b/doc/user/tbl_marg
@@ -0,0 +1,74 @@
+@Section
+    @Title { Margins }
+    @Tag { tbl_marg }
+@Begin
+@PP
+The @Code "@Cell" symbol offers a @Code margin option for changing the
+margins @RawIndex { margins }
+margins.in.tables @SubIndex { margins in tables }
+amount of margin left between the entry and the boundary of the cell:
+@ID @Code "@Cell margin { 0.3f }"
+The default values are different for horizontal and vertical margins,
+which brings us to the @Code marginhorizontal and @Code marginvertical
+options:
+@ID @OneRow @Code @Verbatim {
+@Cell
+    marginhorizontal { 0.6f }
+    marginvertical { 0.3f }
+}
+These are the default values, 0.6 and 0.3 times the current font size
+respectively.  Another useful value is {@Code "marginvertical { 0.5vx }"},
+which asks for a vertical margin of half the current line separation, but
+measured from baseline to baseline (this is what the @Code "x" means).
+This produces a separation equal to the separation of the surrounding lines:
+@CD @Tbl
+    marginvertical { 0.5vx }
+    aformat { @Cell A  |  @Cell B  |  @Cell C }
+{
+@Rowa
+    A { Austen }
+    B { Chaucer }
+    C { Donne }
+@Rowa
+    A { Balzac }
+    B { Darwin }
+    C { Goethe }
+@Rowa
+    A { Byron }
+    B { Dickens }
+    C { Homer }
+}
+This margin does not work so well when the cells contain paragraphs,
+diagrams or other things that could not be described as single lines.
+@PP
+There are {@Code "marginabove"}, {@Code "marginbelow"}, {@Code "marginleft"},
+and {@Code "marginright"} options for setting margins individually.  For
+example, sometimes you don't want the extreme left and right margins in
+a table, and they can be got rid of like this:
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    paint { lightgrey }
+    aformat { @Cell ml { 0i } A  |  @Cell B  |  @Cell mr { 0i } C }
+{
+@Rowa
+    A { Column A }
+    B { Column B }
+    C { Column C }
+}
+}
+We've used abbreviated versions of the options' names:  @Code "ml" for
+{@Code marginleft}, and @Code "mr" for {@Code marginright}.  Every option
+has such an abbreviated name, made from the first letters of the parts of
+its full name (Section {@NumberOf tbl_summ} lists all these names).  The
+result is
+@CD @Tbl
+    paint { lightgrey }
+    aformat { @Cell ml { 0i } A  |  @Cell B  |  @Cell mr { 0i } C }
+{
+@Rowa
+    A { Column A }
+    B { Column B }
+    C { Column C }
+}
+with the painting showing the reduced margins.
+@End @Section
diff --git a/doc/user/tbl_mark b/doc/user/tbl_mark
new file mode 100644
index 0000000..8761979
--- /dev/null
+++ b/doc/user/tbl_mark
@@ -0,0 +1,65 @@
+@Section
+    @Title { Vertical alignment of tables }
+    @Tag { tbl_mark }
+@Begin
+@PP
+Occasionally the vertical alignment of a table with objects to its left
+vertical.alignment @Index { vertical alignment of tables }
+and right becomes an issue.  Examples are hard to find, but let's say
+that we need to construct a symbol
+@ID @AmberLight
+and include it in running text.  The obvious first attempt at a table
+with three rows produces
+#@ID @OneRow @Code @Verbatim {
+#@Tbl
+#   aformat { @Cell A }
+#   margin { 0i }
+#   strut { no }
+#{
+#@Rowa A { @OpenCircle }
+#@Rowa A { @ClosedCircle }
+#@Rowa A { @OpenCircle }
+#}
+#}
+#where @Code "@OpenCircle" and @Code "@ClosedCircle" produce open and
+#closed circles (they may be defined using the @Code "@Diag" package);
+#but this produces
+@Tbl
+   aformat { @Cell A }
+   margin { 0i }
+   strut { no }
+{
+@Rowa A { @OpenCircle }
+@Rowa A { @ClosedCircle }
+@Rowa A { @OpenCircle }
+}
+in running text, because vertical alignment is by default through the
+top boundary of the table.  To make the alignment pass through one of
+the rows, replace its @Code "@Row" symbol by a corresponding
+@Code "@MarkRow" symbol.  Here is the revised table, enclosed in a
+definition for ease of use:
+amberlight @Index { @Code "@AmberLight" symbol }
+@ID @OneRow @Code @Verbatim {
+import @TblSetup
+def @AmberLight
+{
+    @OneRow @Tbl
+         aformat { @Cell A }
+         margin { 0i }
+         strut { no }
+         paint { no }  rule { no }
+     {
+         @Rowa A { @OpenCircle }
+         @MarkRowa A { @ClosedCircle }
+         @Rowa A { @OpenCircle }
+     }
+}
+}
+Now when we write
+@ID @Code "produces @AmberLight in running text"
+we find that this definition produces @AmberLight in running text, as
+desired.  We have enclosed the table in @Code "@OneRow" to ensure that
+its rows will never become separated, and added some options just in
+case the definition is ever used with a setup file (Section
+{@NumberOf tbl_setu}) that has default painting or rules.
+@End @Section
diff --git a/doc/user/tbl_mult b/doc/user/tbl_mult
new file mode 100644
index 0000000..84ce363
--- /dev/null
+++ b/doc/user/tbl_mult
@@ -0,0 +1,57 @@
+@Section
+    @Title { Multi-page tables }
+    @Tag { tbl_mult }
+@Begin
+@PP
+The tables produced by @Code "@Tbl" permit page breaks (including breaking
+multi.page.tables @Index { multi-page tables }
+to a new column) between every two rows, except rows that have a
+vertically spanning cell in common.  Page breaks cannot occur
+within rows.  The choice of page breaks can either be left to Lout,
+or it can be forced by placing the new page symbol @Code "@NP" between two
+np.tables @Index { @Code "@NP" (new page) in tables }
+rows.
+@PP
+Some care is needed over where to put multi-page tables.  They can't go
+within any of the display symbols, because display symbols are not clever
+enough to break tables between rows, even though they are sometimes able
+to break simpler displays.  (A display symbol will scale a very high table
+to fit on one page, and it will go wrong on a table containing
+{@Code "@NP"}.)  Multi-page tables can go inside @Code "@Figure" or
+@Code "@Table" symbols, because these symbols have been set up to accept
+multi-page objects.  Or they can go into the body text of the document
+at full width with a paragraph symbol before and after, like this:
+@ID @Code @Verbatim {
+@DP
+@Tbl ...
+@DP
+}
+An example of this kind of multi-page table appears in
+Section {@NumberOf tbl_summ}.  You can simulate an indent by means of an
+empty cell at the left of each row format, although in the author's opinion
+a multi-page table looks better at full width anyway.  Lout will expand the
+rightmost column to the full page width; one way to prevent this is to add
+a @Code "|" after the last cell within each {@Code format} option, creating
+an empty extra column.
+@PP
+The simplest way to get rules right in multi-page tables is to set
+@Code "rulehorizontal" to {@Code yes}.  This places a rule above every
+row including the first on each page, and a rule below every row including
+the last on each page.
+@PP
+To prevent page breaks within a table, precede the @Code "@Tbl"
+symbol by {@Code "@OneRow"}:
+@ID @Code "@CD @OneRow @Tbl ..."
+@Code "@OneRow" is a general Lout symbol which binds the following
+object into a single, unbreakable row.  Make sure your table is
+small enough to fit on one page when you do this, otherwise an error
+message will be printed and it will be scaled to fit.  Of course, we
+have just said that display symbols like @Code "@CD" do this anyway,
+but that might change some day.
+@PP
+To prevent a page break between two particular rows, but not in
+general, replace the @Code "@Row" symbol of the second row with
+the corresponding @Code "@NoBreakRow" symbol (@Code "@NoBreakRowa"
+instead of {@Code "@Rowa"}, @Code "@NoBreakRowb" instead of
+{@Code "@Rowb"}, and so on).
+@End @Section
diff --git a/doc/user/tbl_plai b/doc/user/tbl_plai
new file mode 100644
index 0000000..0813717
--- /dev/null
+++ b/doc/user/tbl_plai
@@ -0,0 +1,84 @@
+@Section
+    @Title { Plain text tables }
+    @Tag { tbl_plai }
+@Begin
+@PP
+Tables work well with plain text output (Section {@NumberOf plain}):
+plain.text.tables @Index { plain text tables }
+@CD @OneRow -1px @Break @F @Verbatim {
+...................................................
+.                 .                               .
+. Johnson         . Johnson suddenly uttered an   .
+. suddenly        . apophegm, at which many will  .
+. uttered an      . start:  `Patriotism is the    .
+. apophegm, at    . last refuge of a scoundrel.'  .
+. which many      .                               .
+. will start:     .                               .
+. `Patriotism     .................................
+. is the last     .               .               .
+. refuge of a     . Johnson       . Johnson       .
+. scoundrel.'     . suddenly      . suddenly      .
+.                 . uttered an    . uttered an    .
+.                 . apophegm, at  . apophegm, at  .
+.                 . which many    . which many    .
+.                 . will start:   . will start:   .
+.                 . `Patriotism   . `Patriotism   .
+.                 . is the last   . is the last   .
+.                 . refuge of a   . refuge of a   .
+.                 . scoundrel.'   . scoundrel.'   .
+.                 .               .               .
+.                 .               .               .
+...................................               .
+.                                 .               .
+. Johnson suddenly uttered an     .               .
+. apophegm, at which many will    .               .
+. start:  `Patriotism is the      .               .
+. last refuge of a scoundrel.'    .               .
+.                                 .               .
+.                                 .               .
+...................................................
+}
+This table was produced by a separate run of Lout and pasted into this
+document.
+@PP
+@Code "@Tbl" changes the default values of several options when used
+in a plain text document:
+@ID @Code @Verbatim {
+@Tbl
+    marginvertical { 2f }
+    marginhorizontal { 2s }
+    rulehorizontalwidth { 1f }
+    ruleverticalwidth { 1s }
+    rulehorizontalgap { 0f }
+    ruleverticalgap { 0s }
+}
+When using plain text it is advisable to make vertical distances whole
+multiples of {@Code "1f"}, and horizontal distances whole multiples of
+{@Code "1s"}, since this avoids fractional spacing which cannot be successful
+in plain text files and produces quite messy results.  There is also a
+@Code ruleplainchar option for changing the character used to
+draw rules.  For example,
+@ID @Code @Verbatim {
+@Tbl
+    ruleplainchar { - }
+}
+would be a good choice if you plan to draw only horizontal rules.  This
+option can be set anywhere as usual.
+@PP
+If you do use rules it is worth pondering the implications of the last
+part of Section {@NumberOf tbl_rule}.  Right and below rules are drawn
+outside the boundary of the cell, which is unimportant
+in ordinary output, but means that they will appear one space to the
+right and one line below the cell in plain text output.  This explains
+the slight asymmetry in the example above; you can correct it with
+@ID @Code @Verbatim {
+@Tbl
+    marginright { 1s }
+    marginbelow { 1f }
+}
+but you still have to worry about rules at the extreme right of the
+page going off the edge, and rules below the last line bumping into
+whatever follows the table.  The first can be fixed by not using
+full width tables with right rules; the second by inserting an extra
+@Code "@DP" after a table that ends with a below rule.
+@End @Section
diff --git a/doc/user/tbl_rows b/doc/user/tbl_rows
new file mode 100644
index 0000000..7d26b75
--- /dev/null
+++ b/doc/user/tbl_rows
@@ -0,0 +1,59 @@
+@Section
+    @Title { Changing the appearance of rows }
+    @Tag { tbl_rows }
+@Begin
+@PP
+We've seen that the @Code aformat option of @Code "@Tbl" determines the
+format of the rows introduced by the @Code "@Rowa" symbol.  There are
+eight of these row format options: {@Code aformat},
+row.formats @Index { row formats in tables }
+{@Code bformat}, and so on up to {@Code hformat}, and for each there
+is a corresponding {@Code "@Row"} symbol:  {@Code "@Rowa"}, {@Code "@Rowb"},
+and so on up to {@Code "@Rowh"}:
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    aformat { @Cell @I A  |  @Cell @I B }
+    bformat { @Cell A  |  @Cell B }
+{
+@Rowa
+    A { Name }
+    B { Nationality }
+@Rowb
+    A { Austen }
+    B { English }
+@Rowb
+    A { Balzac }
+    B { French }
+}
+}
+The result of this is
+@CD @OneRow @Tbl
+    aformat { @Cell @I A  |  @Cell @I B }
+    bformat { @Cell A  |  @Cell B }
+{
+@Rowa
+    A { Name }
+    B { Nationality }
+@Rowb
+    A { Austen }
+    B { English }
+@Rowb
+    A { Balzac }
+    B { French }
+}
+The first row, being a {@Code "@Rowa"}, is formatted using
+{@Code aformat}; the others, being {@Code "@Rowb"} symbols, are
+formatted using {@Code bformat}.
+@PP
+In addition to the eight @Code format options of {@Code "@Tbl"}, it is
+possible to specify the format of a row at the row itself, using the
+@Code "@Row" symbol like this:
+@ID @OneRow @Code @Verbatim {
+@Row
+    format { @Cell @B A | @Cell paint { lightgrey } B }
+    A { ... }
+    B { ... }
+}
+All formats must contain the same number of cells, otherwise the table
+will not be rectangular.
+@End @Section
diff --git a/doc/user/tbl_rule b/doc/user/tbl_rule
new file mode 100644
index 0000000..383ffab
--- /dev/null
+++ b/doc/user/tbl_rule
@@ -0,0 +1,192 @@
+@Section
+    @Title { Rules }
+    @Tag { tbl_rule }
+@Begin
+@PP
+There is a @Code "rule" option for drawing a rule around a cell:
+@ID @OneRow @Code "@Cell rule { yes }"
+The other possible values are {@Code no} (the default),
+{@Code single} (the same as {@Code yes}), and {@Code double}, which
+draws a double rule.
+@PP
+There are @Code "rulehorizontal" and @Code "rulevertical" options which
+draw only horizontal or vertical rules, and also {@Code "ruleabove"},
+{@Code "rulebelow"}, {@Code "ruleleft"}, and {@Code "ruleright"} options:
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    aformat { @Cell A | @Cell B }
+{
+@Rowa
+    ruleabove { yes }
+    A { Commercial property }
+    B { 10% }
+@Rowa
+    A { Stock market }
+    B { 15% }
+    rulebelow { yes }
+}
+}
+produces
+@CD @OneRow @Tbl
+    aformat { @Cell A | @Cell B }
+{
+@Rowa
+    ruleabove { yes }
+    A { Commercial property  }
+    B { 10% }
+@Rowa
+    A { Stock market }
+    B { 15% }
+    rulebelow { yes }
+}
+These options take the same values as {@Code "rule"}, but draw
+along only one or two of the four edges.
+@PP
+Other options control the appearance of rules.  Here they are with their
+default values:
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    rulewidth { 0.05f }
+    rulegap { 0.15f }
+    rulecolour { black }
+}
+These say that rules are to be @Code "0.05f" wide (thick), double rules
+are to appear @Code "0.15f" apart, and the colour of rules is to be black.
+Once again, more specific versions of these symbols exist for controlling
+above, below, left, and right rules:
+@ID @OneRow @Code @Tbl
+    aformat { @Cell ml { 0i } A | @Cell B | @Cell C }
+    marginvertical { 0.5vx }
+{
+@Rowa
+    A { rulehorizontalwidth }
+    B { rulehorizontalgap }
+    C { rulehorizontalcolour }
+@Rowa
+    A { ruleabovewidth }
+    B { ruleabovegap }
+    C { ruleabovecolour }
+@Rowa
+    A { rulebelowwidth }
+    B { rulebelowgap }
+    C { rulebelowcolour }
+@Rowa
+    A { ruleverticalwidth }
+    B { ruleverticalgap }
+    C { ruleverticalcolour }
+@Rowa
+    A { ruleleftwidth }
+    B { ruleleftgap }
+    C { ruleleftcolour }
+@Rowa
+    A { rulerightwidth }
+    B { rulerightgap }
+    C { rulerightcolour }
+}
+As usual, all these options have abbreviated names; and @Code { colour }
+may be spelt @Code { color } wherever it appears.  Section
+{@NumberOf tbl_summ} has a complete summary of all spellings of all
+options.
+@PP
+To clarify exactly where the rules are drawn, let's start with
+a cell with no rules at all:
+@CD @Tbl
+    aformat { @Cell width { 3c } height { 1.5c } paint { lightgrey } A }
+{
+@Rowa
+}
+Above rules and left rules are drawn within the cell boundary, just
+touching it, with any above rule overstriking any left rule:
+@CD { @Tbl
+    aformat { @Cell width { 3c } height { 1.5c } paint { lightgrey } A }
+{
+@Rowa
+}
+@Background @Tbl
+    aformat { @Cell width { 3c } height { 1.5c } A }
+    ruleleft { yes }
+    ruleabove { yes }
+    rulehorizontalwidth { 0.8v }
+    ruleverticalwidth { 0.5v }
+    ruleverticalcolour { grey }
+    rulehorizontalcolour { black }
+{
+@Rowa
+}
+}
+Below and right rules are drawn just outside the boundary of the
+cell, also touching it:
+@CD @Tbl aformat { @Cell A | @Cell | @Cell B }
+{
+@Rowa
+    A {
+        @Tbl
+            aformat { @Cell width { 3c } height { 1.5c } paint { lightgrey } A }
+        {
+        @Rowa
+        }
+        @Background
+        @Tbl
+            aformat { @Cell width { 3c } height { 1.5c } A }
+            rulebelow { yes }
+	    rulehorizontalwidth { 0.8v }
+	    ruleverticalwidth { 0.5v }
+	    ruleverticalcolour { grey }
+	    rulehorizontalcolour { black }
+        {
+        @Rowa
+        }
+      }
+    B {
+        @Tbl
+            aformat { @Cell width { 3c } height { 1.5c } paint { lightgrey } A }
+        {
+        @Rowa
+        }
+        @Background
+        @Tbl
+            aformat { @Cell width { 3c } height { 1.5c } A }
+            ruleright { yes }
+	    rulehorizontalwidth { 0.8v }
+	    ruleverticalwidth { 0.5v }
+	    ruleverticalcolour { grey }
+	    rulehorizontalcolour { black }
+        {
+        @Rowa
+        }
+      }
+}
+@DP
+When a right rule is present, any above and below rules are extended
+by the width of the right rule, and they overstrike it:
+@CD {
+@Tbl
+    aformat { @Cell width { 3c } height { 1.5c } paint { lightgrey } A }
+{
+@Rowa
+}
+@Background
+@Tbl
+    aformat { @Cell width { 3c } height { 1.5c } A }
+    ruleabove { yes }
+    ruleright { yes }
+    rulebelow { yes }
+    rulehorizontalwidth { 0.8v }
+    ruleverticalwidth { 0.5v }
+    ruleverticalcolour { grey }
+    rulehorizontalcolour { black }
+{
+@Rowa
+}
+}
+@DP
+(These diagrams were produced by @Code "@Tbl" itself, using horizontal
+rules of width @Code 0.8v drawn in black, and vertical rules of width
+@Code 0.5v drawn in grey.)  These arrangements ensure that even thick
+rules produce clean corners, and also that a right rule and a neighbouring
+left rule exactly overstrike each other, as do a below rule and its
+neighbouring above rule.
+@PP
+For information about rules in plain text tables, consult Section
+{@NumberOf tbl_plai}.
+@End @Section
diff --git a/doc/user/tbl_setu b/doc/user/tbl_setu
new file mode 100644
index 0000000..74bdb9a
--- /dev/null
+++ b/doc/user/tbl_setu
@@ -0,0 +1,65 @@
+@Section
+    @Title { Changing the overall format }
+    @Tag { tbl_setu }
+@Begin
+@PP
+All of the options apart from the @Code format options can be changed
+setup.files.tables @Index { setup files for tables }
+in the @Code { tbl } setup file, in which case the new values become
+the default values for every table in the document.  This section
+explains how to do it.  Changing options in the setup file can save a
+lot of time, but its more important purposes are to promote consistency
+and to allow document-wide formatting changes to be carried out easily.
+@PP
+The first step is to obtain your own copy of the setup file, @Code { tbl },
+from the Lout system include directory.  You can find out where that
+is by typing
+@ID @Code { lout -V }
+This prints out various things about Lout.  Supposing that it says
+that the Lout system include directory is @Code { "/usr/lout/include" }, for
+example, you can copy the setup file into your current directory,
+renaming it @Code { mytbl }, with the Unix command
+@ID @Code "cp  /usr/lout/include/tbl  mytbl"
+or its equivalent on your system.  You will also need to make
+@Code { mytbl } writable.
+@PP
+The next step is to replace the @Code "@SysInclude { tbl }" line at the
+start of your document with @Code { "@Include { mytbl }" }.  This causes
+Lout to read your copy of the setup file, not the one in the system
+include directory.  Since the two files are currently identical, this
+has changed nothing so far, but now you can change the options within
+@Code mytbl and the changes will affect your document.
+@PP
+Your copy of the setup file has some lines beginning with @Code "#"
+that are ignored by Lout, and then it has @Code { "@SysInclude { tblf }" }.
+This line tells Lout to read file @Code tblf which contains the definition
+of the @Code tbl package, so it should not be changed.  After it comes
+the @Code "@TblSetup" @Code "@Use" clause, which looks like this:
+@ID @OneRow @Code @Verbatim {
+@Use { @TblSetup
+    # paint { nopaint }
+    # font { }
+    # break { }
+}
+}
+Only a few of the options are shown here.  To change a setup file
+option, delete the @Code "#" in front of it and change the value.  For
+example, suppose you want all table entries two points smaller than the
+surrounding text:
+@ID @OneRow @Code @Verbatim {
+@Use { @TblSetup
+    # paint { nopaint }
+    font { -2p }
+    # break { }
+}
+}
+This relative specification of font size is available anywhere, not
+just in setup files (Section {@NumberOf fonts}).
+@PP
+Some setup file options contain values which use the @Code "@OrIfPlain"
+symbol:
+@ID @Code "marginvertical { 0.3f @OrIfPlain 1f }"
+This means that the value of @Code marginvertical is to be @Code "0.3f"
+usually, but @Code 1f in plain text documents.  Feel free to leave these
+symbols there when you change a value, or delete them if you prefer.
+@End @Section
diff --git a/doc/user/tbl_span b/doc/user/tbl_span
new file mode 100644
index 0000000..5621961
--- /dev/null
+++ b/doc/user/tbl_span
@@ -0,0 +1,195 @@
+@Section
+    @Title { Spanning columns and rows }
+    @Tag { tbl_span }
+@Begin
+@PP
+To make a cell span across several columns, precede the @Code "@Cell"
+spanning.columns @Index { spanning columns and rows in tables }
+symbol with @Code "@StartHSpan" and replace each spanned cell's
+@Code "@Cell" symbol with {@Code "@HSpan"}, like this:
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    rule { yes }
+    aformat { @StartHSpan @Cell indent { ctr } @B A | @HSpan | @HSpan }
+    bformat { @Cell A | @Cell B | @Cell C }
+{
+@Rowa
+    A { Some famous authors }
+@Rowb
+    A { Austen }
+    B { Chaucer }
+    C { Donne }
+@Rowb
+    A { Balzac }
+    B { Darwin }
+    C { Goethe }
+}
+}
+The result of this is
+@CD @OneRow @Tbl
+    rule { yes }
+    aformat { @StartHSpan @Cell indent { ctr } @B A | @HSpan | @HSpan }
+    bformat { @Cell A | @Cell B | @Cell C }
+{
+@Rowa
+    A { Some famous authors }
+@Rowb
+    A { Austen }
+    B { Chaucer }
+    C { Donne }
+@Rowb
+    A { Balzac }
+    B { Darwin }
+    C { Goethe }
+}
+We've used a sample of options to show how naturally these go with
+spanning cells:  they apply to the whole cell as usual, whatever
+its extent.  It is quite acceptable to span just some of the columns,
+not all of them; indeed, there may be no @Code "@HSpan" symbols at
+all, and then the cell just spans its own column, which sounds redundant
+but actually has a use (Section {@NumberOf tbl_alig}).
+@PP
+Spanning rows work in the same way; the spanning cell is preceded by
+{@Code "@StartVSpan"}, and the spanned cells are replaced by
+{@Code "@VSpan"}:
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    rule { yes }
+    aformat { @StartVSpan @Cell @I A | @Cell B | @Cell C }
+    bformat { @VSpan | @Cell B | @Cell C }
+{
+@Rowa
+    A { Mathematics }
+    B { MATH 1001 }
+    C { Differential Calculus }
+@Rowb
+    B { MATH 1002 }
+    C { Linear Algebra }
+@Rowa
+    A { Computer Science }
+    B { COMP 1001 }
+    C { Introductory Programming }
+@Rowb
+    B { COMP 1002 }
+    C { Introductory Computer Science }
+}
+}
+The result of this is
+@CD @OneRow @Tbl
+    rule { yes }
+    aformat { @StartVSpan @Cell @I A | @Cell B | @Cell C }
+    bformat { @VSpan | @Cell B | @Cell C }
+{
+@Rowa
+    A { Mathematics }
+    B { MATH 1001 }
+    C { Differential Calculus }
+@Rowb
+    B { MATH 1002 }
+    C { Linear Algebra }
+@Rowa
+    A { Computer Science }
+    B { COMP 1001 }
+    C { Introductory Programming }
+@Rowb
+    B { COMP 1002 }
+    C { Introductory Computer Science }
+}
+Here is a notorious larger example, the `spiral':
+@ID @OneRow @Code @Verbatim {
+@QuotedDisplay @Tbl
+    rule { yes }
+{
+@Row
+    format { @StartVSpan @Cell A | @StartHSpan @Cell B | @HSpan }
+    A { @SomeText }
+    B { @SomeText }
+@Row
+    format { @VSpan | @Cell B | @StartVSpan @Cell C }
+    B { @SomeText }
+    C { @SomeText }
+@Row
+    format { @StartHSpan @Cell A | @HSpan | @VSpan }
+    A { @SomeText }
+}
+}
+The @Code "@SomeText" symbol produces a short paragraph of text.  The
+result is
+@QD @Tbl
+    rule { yes }
+{
+@Row format { @StartVSpan @Cell A | @StartHSpan @Cell B | @HSpan }
+    A { @SomeText }
+    B { @SomeText }
+@Row format { @VSpan | @Cell B | @StartVSpan @Cell C }
+    B { @SomeText }
+    C { @SomeText }
+@Row format { @StartHSpan @Cell A | @HSpan | @VSpan }
+    A { @SomeText }
+}
+It is important when constructing mind-boggling tables like this one
+to ensure that every format has exactly the same number of @Code "|"
+symbols.  Otherwise the number of columns will differ from row to row.
+The names given to the entries ({@Code "A"}, {@Code "B"}, {@Code "C"},
+etc.) are quite irrelevant:  having a @Code "@Cell D" in one row and a
+@Code "@Cell D" in another does not mean that the cells will appear in
+the same column.
+@PP
+There is an asymmetry in the spiral above:  the first column
+occupies slightly more space than the other two.  This arises
+because the left margin of the leftmost column is excluded from the
+calculation of how much space is available.  This anomaly might be
+corrected some day.
+@PP
+There is a @Code "@StartHVSpan" symbol which combines the effects
+of @Code "@StartHSpan" and {@Code "@StartVSpan"}.  You need to
+use it in this arrangement:
+@ID @OneRow @Tbl
+    mv { 0.5vx }
+    aformat { @Cell @Code A | @Cell @Code B | @Cell @Code C }
+{
+@Rowa
+    A { "@StartHVSpan" }
+    B { "@HSpan" }
+    C { "@HSpan" }
+@Rowa
+    A { "@VSpan" }
+@Rowa
+    A { "@VSpan" }
+}
+The blank positions should be left empty.  For example:
+@ID @OneRow @Code @Verbatim {
+@Tbl
+    rule { yes }
+    aformat { @Cell A | @Cell B | @Cell C | @Cell D }
+    bformat { @Cell A | @StartHVSpan @Cell i { ctr } iv { ctr } B | @HSpan | @Cell D }
+    cformat { @Cell A | @VSpan |      | @Cell D }
+{
+@Rowa
+@Rowb
+    B { CPU }
+@Rowc
+@Rowa
+}
+}
+produces
+@CD @OneRow @Tbl
+    rule { yes }
+    strut { no }
+    aformat { @Cell A | @Cell B | @Cell C | @Cell D }
+    bformat { @Cell A | @StartHVSpan @Cell i { ctr } iv { ctr } B | @HSpan | @Cell D }
+    cformat { @Cell A | @VSpan | | @Cell D }
+{
+@Rowa
+@Rowb
+    B { CPU }
+@Rowc
+@Rowa
+}
+This example illustrates how Lout apportions space in the presence of
+spanning columns.  If the spanning cell is naturally narrower than the
+cells it spans, it is widened to their size.  If it is wider (as in
+the example above), then the last spanned cell is widened to take
+up the slack.  This is why the third cell is wider than the second in the
+first row of this example.
+@End @Section
diff --git a/doc/user/tbl_summ b/doc/user/tbl_summ
new file mode 100644
index 0000000..6fed734
--- /dev/null
+++ b/doc/user/tbl_summ
@@ -0,0 +1,255 @@
+@Section
+    @Title { Summary of options }
+    @Tag { tbl_summ }
+@Begin
+@PP
+This summary applies to all @Code "@Tbl" options except the @Code format
+options described in Section {@NumberOf tbl_rows}.  Here is the complete
+list of these options, one option per line, showing its alternative
+spellings, default values (PostScript and PDF, and plain text) from the setup
+file, and allowed range of values.  Where one option is indented below
+another, it means that the indented option is a specialized version of
+the other, which affects its default value.  For more on this see below.
+@DP
+@Tbl
+    marginvertical { 0.5vx }
+    aformat { @Cell ml { 0i }               @Code A |
+	      @Cell @Code B | @Cell @Code C | @Cell mr { 0i } D }
+    bformat { @Cell ml { 0i } indent { 1f } @Code A |
+	      @Cell @Code B | @Cell @Code C | @Cell mr { 0i } D }
+    cformat { @Cell ml { 0i } indent { 2f } @Code A |
+	      @Cell @Code B | @Cell @Code C | @Cell mr { 0i } D }
+    dfont { Italic }
+    dbreak { lines }
+    dformat { @Cell ml { 0i } A | @Cell B | @Cell C | @Cell mr { 0i } D }
+    fformat { @StartHSpan @Cell ml { 0i }               @Code A |
+	      @HSpan | @HSpan | @Cell mr { 0i } D }
+    gformat { @StartHSpan @Cell ml { 0i } indent { 1f } @Code A |
+	      @HSpan | @HSpan | @Cell mr { 0i } D }
+    hformat { @StartHSpan @Cell ml { 0i } indent { 2f } @Code A |
+	      @HSpan | @HSpan | @Cell mr { 0i } D }
+{
+@Rowd
+    A { Option names }
+    B { Default in
+PS, PDF }
+    C { Default in
+plain text }
+    D { Allowed values }
+    rulebelow { yes }
+@Rowa
+    A { paint  p }
+    B { nopaint }
+    D { any colour from Section {@NumberOf colour} }
+@Rowa
+    A { background  bg }
+    D { any object }
+@Rowa
+    A { font  f }
+    D { any font e.g. @Code "Helvetica Slope -2p" }
+@Rowa
+    A { break  b }
+    D { any break e.g. @Code "ragged nohyphen" }
+@Rowa
+    A { width  w }
+    D { @Code "expand" or any length e.g. @Code 5c }
+@Rowa
+    A { height  h }
+    D { any length e.g. @Code 3c }
+@Rowa
+    A { indent  i }
+    D { {@Code left}, {@Code ctr}, {@Code mctr}, {@Code right}, or any length }
+@Rowa
+    A { indentvertical  iv }
+    D { {@Code top}, {@Code ctr}, {@Code mctr}, {@Code foot}, or any length }
+@Rowa
+    A { strut  s }
+    B { yes }
+    C { yes }
+    D { {@Code no}, {@Code yes}, or any length }
+@Rowa
+    A { struthorizontal  sh }
+    B { no }
+    C { no }
+    D { {@Code no}, {@Code yes}, or any length }
+@Rowa
+@Rowa
+    A { margin  m }
+    B { }
+    C { }
+    D { any length }
+@Rowb
+    A { marginhorizontal  mh }
+    B { 0.6f }
+    C { 2s }
+    D { any length }
+@Rowc
+    A { marginleft  ml }
+    D { any length }
+@Rowc
+    A { marginright  mr }
+    D { any length }
+@Rowb
+    A { marginvertical  mv }
+    B { 0.3f }
+    C { 2f }
+    D { any length }
+@Rowc
+    A { marginabove  ma }
+    D { any length }
+@Rowc
+    A { marginbelow  mb }
+    D { any length }
+@Rowa
+@Rowa
+    A { rule  r }
+    B { no }
+    C { no }
+    D { {@Code no}, {@Code yes}, {@Code single}, or {@Code double} }
+@Rowb
+    A { rulehorizontal  rh }
+    D { {@Code no}, {@Code yes}, {@Code single}, or {@Code double} }
+@Rowc
+    A { ruleabove  ra }
+    D { {@Code no}, {@Code yes}, {@Code single}, or {@Code double} }
+@Rowc
+    A { rulebelow  rb }
+    D { {@Code no}, {@Code yes}, {@Code single}, or {@Code double} }
+@Rowb
+    A { rulevertical  rv }
+    D { {@Code no}, {@Code yes}, {@Code single}, or {@Code double} }
+@Rowc
+    A { ruleleft  rl }
+    D { {@Code no}, {@Code yes}, {@Code single}, or {@Code double} }
+@Rowc
+    A { ruleright  rr }
+    D { {@Code no}, {@Code yes}, {@Code single}, or {@Code double} }
+@Rowa
+@Rowa
+    A { rulewidth  rw }
+    B { 0.05f }
+    D { any length }
+@Rowb
+    A { rulehorizontalwidth  rhw }
+    C { 1f }
+    D { any length }
+@Rowc
+    A { ruleabovewidth  raw }
+    D { any length }
+@Rowc
+    A { rulebelowwidth  rbw }
+    D { any length }
+@Rowb
+    A { ruleverticalwidth  rvw }
+    C { 1s }
+    D { any length }
+@Rowc
+    A { ruleleftwidth  rlw }
+    D { any length }
+@Rowc
+    A { rulerightwidth  rrw }
+    D { any length }
+@Rowa
+@Rowa
+    A { rulegap  rg }
+    B { 0.15f }
+    D { any length }
+@Rowb
+    A { rulehorizontalgap  rhg }
+    C { 0f }
+    D { any length }
+@Rowc
+    A { ruleabovegap  rag }
+    D { any length }
+@Rowc
+    A { rulebelowgap  rbg }
+    D { any length }
+@Rowb
+    A { ruleverticalgap  rvg }
+    C { 0s }
+    D { any length }
+@Rowc
+    A { ruleleftgap  rlg }
+    D { any length }
+@Rowc
+    A { rulerightgap  rrg }
+    D { any length }
+@Rowa
+@Rowa
+    A { rulecolour  rulecolor  rc }
+    B { black }
+    D { any colour from Section {@NumberOf colour} }
+@Rowg
+    A { rulehorizontalcolour  rulehorizontalcolor  rhc }
+    D { any colour from Section {@NumberOf colour} }
+@Rowh
+    A { ruleabovecolour  ruleabovecolor  rac }
+    D { any colour from Section {@NumberOf colour} }
+@Rowh
+    A { rulebelowcolour  rulebelowcolor  rbc }
+    D { any colour from Section {@NumberOf colour} }
+@Rowg
+    A { ruleverticalcolour  ruleverticalcolor  rvc }
+    D { any colour from Section {@NumberOf colour} }
+@Rowh
+    A { ruleleftcolour  ruleleftcolor  rlc }
+    D { any colour from Section {@NumberOf colour} }
+@Rowh
+    A { rulerightcolour  rulerightcolor  rrc }
+    D { any colour from Section {@NumberOf colour} }
+@Rowa
+@Rowa
+    A { ruleplainchar  rpc }
+    C { . }
+    D { any simple word e.g. @Code + }
+    rulebelow { yes }
+}
+@DP
+There are seven places where these options may be given, counting the
+setup file (Section {@NumberOf tbl_setu}).  To make it clear that this
+summary applies to any of these options, we illustrate the seven places
+with a fictitious option called {@Code option}:
+@ID @OneRow @Code @Verbatim {
+@Use { @TblSetup
+    option { 1 }
+}
+
+@Tbl
+    option { 2 }
+    aoption { 3 }
+    aformat { @Cell option { 4 } A }
+{
+    @Rowa
+        option { 5 }
+    @Row
+        option { 6 }
+        format { @Cell option { 7 } A }
+}
+}
+Each occurrence of @Code option is of course optional.  If there are
+none, the default value given in the table above applies.  For any other
+combination of absent and present options, the value that applies is the
+present and relevant one with the largest number in the illustration
+just above.  But before applying this rule, any general options must be
+thought of as being replaced by their more specialized versions:
+@ID @Code "rulehorizontal { yes }"
+is equivalent to
+@ID @Code @Verbatim {
+ruleabove { yes }
+rulebelow { yes }
+}
+for example.  Conflicts are resolved in the logical way:
+@ID @Code @Verbatim {
+margin { 0.5f }
+marginleft { 0.0f }
+}
+is equivalent to the four specialized options
+@ID @Code @Verbatim {
+marginabove { 0.5f }
+marginbelow { 0.5f }
+marginleft { 0.0f }
+marginright { 0.5f }
+}
+General options are really just abbreviations for sets of specialized
+options.
+@End @Section
diff --git a/doc/user/tbl_widt b/doc/user/tbl_widt
new file mode 100644
index 0000000..b2e39ad
--- /dev/null
+++ b/doc/user/tbl_widt
@@ -0,0 +1,84 @@
+@Section
+    @Title { Cell width and height }
+    @Tag { tbl_widt }
+@Begin
+@PP
+Lout is quite good a choosing suitable widths for cells.  It leaves
+narrow cells at their natural width, then uses paragraph breaking to
+reduce the wider cells to a common width which is as large as
+the available space allows:
+@QD @OneRow @Tbl
+    aformat { @Cell @I A | @Cell B | @Cell C }
+{
+@Rowa
+    A { Acacia }
+    B {
+Shrub or small tree with grey-green foliage and brilliant
+yellow blossom in late winter.
+}
+    C {
+Distributed widely throughout Australia except in the most arid
+parts; many varieties.
+}
+}
+This usually looks good, but if you need something else, the @Code width
+option may be used to give a particular width to a cell:
+@ID @OneRow @Code "@Cell width { 3c }"
+Here we have asked for a cell width of three centimetres; this includes
+the cell margins.  When using @Code width to fine-tune the appearance of
+a table wide enough to require paragraph breaking, it is best to use
+@Code width to make cells narrower, not wider.
+@PP
+Regrettably, there is no way to request that several cells in a row be
+given a common width equal to the width of the widest.  One simple way to
+approximate this is to give these cells the same @Code width value.  The
+@Code width option also has a special value, {@Code "expand"}.  All
+cells with @Code "width { expand }" are assigned a common width
+expand.cell.width @Index { @Code expand cell width in tables }
+equal to the maximum amount permitted by the available space.  For example,
+@ID @OneRow @Code @Verbatim {
+@QuotedDisplay @Tbl
+    width { expand }
+    paint { lightgrey }
+    aformat { @Cell A  |  @Cell B  |  @Cell C }
+{
+@Rowa
+    A { 23.56 }
+    B { 98.76 }
+    C { 65.00 }
+}
+}
+has result
+@QuotedDisplay @Tbl
+    width { expand }
+    paint { lightgrey }
+    aformat { @Cell A  |  @Cell B  |  @Cell C }
+{
+@Rowa
+    A { 23.56 }
+    B { 98.76 }
+    C { 65.00 }
+}
+We have used our usual trick of making the option apply to several cells
+by moving it to a more general level, in this case to {@Code "@Tbl"}.
+The available space can be reduced using the @Code "@Wide" symbol; if
+we replace @Code "@QuotedDisplay @Tbl" in the example above with
+@ID @OneRow @Code "@CentredDisplay 4i @Wide @Tbl"
+the result will be
+@CentredDisplay 4i @Wide @Tbl
+    width { expand }
+    paint { lightgrey }
+    aformat { @Cell A  |  @Cell B  |  @Cell C }
+{
+@Rowa
+    A { 23.56 }
+    B { 98.76 }
+    C { 65.00 }
+}
+with the total table width reduced to four inches.
+@PP
+There is an analogous @Code height option which makes a cell take on
+a particular fixed height, again including margins.  Make sure there
+is enough height in the cell to hold its entry when you use this
+option.  The @Code "expand" value is not available for height.
+@End @Section
diff --git a/doc/user/typ b/doc/user/typ
new file mode 100644
index 0000000..7ebe52f
--- /dev/null
+++ b/doc/user/typ
@@ -0,0 +1,27 @@
+@Chapter
+    @Title { Types of Documents }
+    @Tag { types }
+@Begin
+@LP
+Particular types of documents have specialized formatting requirements:
+title pages in books, abstracts in technical reports, and so on.  Lout
+provides a range of @I { document types } with the appropriate
+specialized features for
+document.types @Index { document types }
+each type.
+@PP
+There are five types:  ordinary documents, technical reports,
+books, overhead transparencies, and stand-alone illustrations.  The
+features of all other chapters are available within each document type,
+but the features of one type are not available within other types.
+@BeginSections
+@Include { typ_ordi }
+@Include { typ_repo }
+@Include { typ_book }
+@Include { typ_over }
+@Include { typ_illu }
+@Include { typ_plai }
+@Include { typ_apdf }
+@Include { typ_orga }
+@EndSections
+@End @Chapter
diff --git a/doc/user/typ_apdf b/doc/user/typ_apdf
new file mode 100644
index 0000000..3203384
--- /dev/null
+++ b/doc/user/typ_apdf
@@ -0,0 +1,21 @@
+@Section
+   @Title { PDF (Adobe Portable Document Format) documents }
+   @Tag { pdf }
+@Begin
+@PP
+You can get Lout to produce PDF (Adobe Portable Document Format) output as
+an alternative to PostScript, by adding @Code "-PDF" to the command line
+like this:
+pdf. @Index { PDF documents }
+@ID @Code "lout -PDF simple > simple.pdf"
+No other changes are required.
+@PP
+The PDF output is superior to PostScript in providing links:  when viewed
+with a PDF viewer, entries in tables of contents and indexes can be
+clicked on and this transports the viewer to the part of the document
+referenced by the link.  (Recent versions of PostScript support this
+feature too, but Lout's PostScript doesn't.)  However, the PDF output
+produced by Lout is inferior at graphics:  the advanced features of the
+@Code "@Diag" and @Code "@Graph" packages do not produce any output.  One
+can still format documents that contain them, but the results are disappointing.
+@End @Section
diff --git a/doc/user/typ_book b/doc/user/typ_book
new file mode 100644
index 0000000..34abde2
--- /dev/null
+++ b/doc/user/typ_book
@@ -0,0 +1,420 @@
+@Section
+   @Title { Books }
+   @Tag { books }
+@Begin
+@PP
+To produce a book, start off with the @Code book setup file and the
+books. @Index { books }
+book. @Index @Code "@Book"
+@Code "@Book" symbol:
+@ID @OneRow @Code {
+"@SysInclude { book }"
+"@Book"
+"    @Title {}"
+"    @Author {}"
+"    @Edition {}"
+"    @Publisher {}"
+"    @BeforeTitlePage {}"
+"    @OnTitlePage {}"
+"    @AfterTitlePage {}"
+"    @AtEnd {}"
+"    @InitialFont { Times Base 12p }"
+"    @InitialBreak { adjust 1.2fx hyphen }"
+"    @InitialSpace { lout }"
+"    @InitialLanguage { English }"
+"    @PageOrientation { Portrait }"
+"    @PageHeaders { Titles }"
+"    @ColumnNumber { 1 }"
+"    @FirstPageNumber { 1 }"
+"    @IntroFirstPageNumber { 1 }"
+"    @OptimizePages { No }"
+"//"
+}
+This shows all the options of @Code "@Book" with their default values.  As
+usual, these options may be given in any order, and only those
+to be changed need be given at all.  The meaning of the
+@Code "//" symbol after the last option is beyond our scope, but total
+disaster will ensue if it is forgotten.
+@PP
+The {@Code "@Title"}, {@Code "@Author"}, and {@Code "@Edition"} options
+will appear on the title page, in the @Code "clines" paragraph breaking
+style which centres each line (Section {@NumberOf paras}).  The
+@Code "@Publisher" option will appear at the foot of the title page.
+@PP
+The {@Code "@BeforeTitlePage"} option will come out on the page (or
+pages) preceding the title page.  This is where publishers
+advertise other books of a similar kind, perhaps from a series.
+@PP
+If {@Code "@OnTitlePage"} is given it will replace the title page
+that usually appears, superseding the {@Code "@Title"}, {@Code "@Author"},
+{@Code "@Edition"}, and @Code "@Publisher" options in the process.
+@PP
+The {@Code "@AfterTitlePage"} option will come out on the page
+(or pages) following the title page.  This is where publishers
+traditionally put copyright notices, information about production,
+and cataloguing-in-publication data.  If this option is empty or
+omitted, there will be no such pages.
+@PP
+The {@Code "@AtEnd"} option will come out on a single unnumbered page
+with no page headers or footers, and using the same margins as for even
+pages, after the very last page of the book; even after the index if
+there is one.  It is intended to make it possible to include a back
+cover, so @Code "@PageOf last.page" (Section {@NumberOf cross}) does
+not take account of any @Code "@AtEnd" page.
+@PP
+The remaining options are a selection of setup file options (Section
+{@NumberOf setup}) that frequently need to be changed.  If your changes
+to the overall formatting are confined to these options, you can change
+them here and avoid having your own setup file.  If you already have
+your own setup file, change them in either place and omit them in
+the other.
+@PP
+@Code "@InitialFont" is the font of the bulk of the book,
+and should contain a family, a face, and a size.  The default
+value selects the Times family, the Base face, and the 12 point size.
+@PP
+@Code "@InitialBreak" controls the behaviour of paragraph breaking in
+the bulk of the book.  It should have three parts:  a paragraph
+breaking style ({@Code adjust}, {@Code ragged}, etc.), an inter-line
+spacing ({@Code "1.2fx"} for single spacing, {@Code "2.4fx"} for
+double spacing, and so on), and either @Code "hyphen" or
+@Code "nohyphen" for turning hyphenation on or off.  It may also
+have @Code "nobreakfirst" or @Code "nobreaklast" (or both), meaning
+to disallow a page break after the first line of a paragraph, or
+before the last, respectively.
+@PP
+@Code "@InitialSpace" determines how Lout treats white space
+between two objects, as described in Section
+{@NumberOf white}.  @Code "@InitialLanguage" determines the
+language of the bulk of the book.
+@PP
+@Code "@PageOrientation" determines the orientation of the page.  Its
+value may be {@Code Portrait} (the default), {@Code Landscape},
+{@Code ReversePortrait}, or {@Code ReverseLandscape}.  See
+Section {@NumberOf pagesize} for further details.
+@PP
+@Code "@PageHeaders" determines the appearance of page headers and
+footers.  Its value may be {@Code None},
+{@Code Simple}, {@Code Titles}, or {@Code NoTitles}.  Section
+{@NumberOf headers} has the details, but just briefly, {@Code None}
+and {@Code Simple} are not really suitable for books, @Code Titles
+produces full running titles as in the present document, and
+@Code "NoTitles" is like @Code "Titles" with the running titles
+omitted, leaving just the page numbers.
+@PP
+@Code "@ColumnNumber" is the number of columns per page in the bulk of
+the book, and may be anything from {@Code 1} (the default value) to
+{@Code 10}.  Irrespective of its value, all prefatory material, all
+chapter and appendix headings, and all figures and tables will be
+printed full width.  There is a separate @Code "@IndexColumnNumber"
+option in the setup file which determines the number of columns in
+the index (Section {@NumberOf indexes}).
+@PP
+@Code "@FirstPageNumber" is the page number to be given to the first
+non-introductory page.  @Code "@IntroFirstPageNumber" is the
+page number of the first introductory page; it will usually appear
+in Roman but must be given in Arabic.
+@PP
+Lout ordinarily places lines onto a page until space runs out, then moves
+to the next page and so on.  This often produces ugly empty spaces at
+the bottoms of pages preceding large unbreakable displays.  Setting the
+@Code "@OptimizePages" option to {@Code "Yes"} causes Lout to examine the
+overall situation and try to minimize the ugliness, using the @TeX
+optimal paragraph breaking algorithm.  It takes two runs to do this,
+with intermediate results stored in Lout's cross reference database
+(Section {@NumberOf cross}); so deleting file {@Code lout.li} will reset
+it, which might be wise after major changes.  It is possible for the
+optimizer to cycle, never settling on a single final best version; this
+is usually caused by footnotes or floating figures inserted at points
+which end up near page boundaries.
+@PP
+After the compulsory @Code "//" comes an optional preface:
+preface. @Index @Code "@Preface"
+@ID @OneRow @Code {
+"@Preface"
+"    @Title { About this book }"
+"@Begin"
+"@PP"
+"..."
+"@End @Preface"
+}
+Since the title of most prefaces is simply Preface, that is the default
+value in English of the @Code "@Title" option.  After the preface there
+will automatically appear a table of contents listing the introduction,
+chapters, sections, subsections, appendices, sub-appendices, bibliography,
+and index as appropriate.
+@PP
+The pages up to this point will be numbered in lower case Roman
+numerals; subsequent pages will be numbered in Arabic starting from
+the @Code "@FirstPageNumber" option of {@Code "@Book"}.  There is
+a setup file option for changing this to a single numbering sequence
+(see below).
+@PP
+Next comes an optional abbreviations sections, exactly like the
+preface except that its name is @Code "@Abbreviations" and the
+abbreviations. @Index @Code "@Abbreviations"
+default title in English is Abbreviation.  There is no support for
+what goes inside; you need to use a list or table to lay out the
+abbreviations, in the usual way.
+@PP
+Next comes an optional introduction, exactly like the preface except that
+its name is @Code "@Introduction" and the default title in English is
+introduction. @Index @Code "@Introduction"
+Introduction:
+@ID @OneRow @Code {
+"@Introduction"
+"@Begin"
+"@PP"
+"..."
+"@End @Introduction"
+}
+After that comes a sequence of chapters in the usual style:
+chapter. @Index @Code "@Chapter"
+@ID @OneRow @Code {
+"@Chapter"
+"    @Title { Australian Native Plants }"
+"@Begin"
+"@PP"
+"..."
+"@End @Chapter"
+}
+No @Code "@BeginChapters" or @Code "@EndChapters" symbols are
+beginchapters. @Index @Code "@BeginChapters"
+endchapters. @Index @Code "@EndChapters"
+needed, because these chapters are not inside any other large-scale
+structure symbol.  Within a chapter, there may be a sequence of sections,
+each introduced by {@Code "@Section"}, all bracketed
+section.books @SubIndex { in books }
+by @Code "@BeginSections" and {@Code "@EndSections"}:
+beginsections.books @SubIndex { in books }
+endsections.books @SubIndex { in books }
+@ID @OneRow @Code {
+"preceding text"
+"@BeginSections"
+"@Section ... @End @Section"
+"@Section ... @End @Section"
+"..."
+"@Section ... @End @Section"
+"@EndSections"
+}
+Within each section there may be subsections, each introduced by
+{@Code "@SubSection"}, and the sequence as a whole bracketed by
+@Code "@BeginSubSections" and {@Code "@EndSubSections"}:
+subsection.books @SubIndex { in books }
+beginsubsections.books @SubIndex { in books }
+endsubsections.books @SubIndex { in books }
+@ID @OneRow @Code {
+"preceding text"
+"@BeginSubSections"
+"@SubSection ... @End @SubSection"
+"@SubSection ... @End @SubSection"
+"..."
+"@SubSection ... @End @SubSection"
+"@EndSubSections"
+}
+The subsections may contain sub-subsections, but
+subsubsection.books @SubIndex { in books }
+beginsubsubsections.books @SubIndex { in books }
+endsubsubsections.books @SubIndex { in books }
+there are no sub-sub-subsections.
+@PP
+After the chapters comes an optional sequence of appendices.  Each
+is introduced by @Code "@Appendix" in the usual way:
+appendix.books @SubIndex { in books }
+@ID @OneRow @Code {
+"@Appendix"
+"    @Title { Climatic Regions of Australia }"
+"@Begin"
+"@PP"
+"..."
+"@End @Appendix"
+}
+No @Code "@BeginAppendices" or @Code "@EndAppendices" symbols are
+beginappendices.books @SubIndex { in books }
+endappendices.books @SubIndex { in books }
+needed, because (like chapters) these appendices do not lie inside
+any other large-scale structure symbol.  The appendices are numbered
+A, B, C, etc., as is conventional for them.  Within each appendix
+there may be a sequence of subappendices, obtained with the
+@Code "@SubAppendix" symbol and bracketed by
+subappendix.books @SubIndex { in books }
+@Code "@BeginSubAppendices" and {@Code "@EndSubAppendices"}:
+beginsubappendices.books @SubIndex { in books }
+endsubappendices.books @SubIndex { in books }
+@ID @OneRow @Code {
+"preceding text"
+"@BeginSubAppendices"
+"@SubAppendix ... @End @SubAppendix"
+"@SubAppendix ... @End @SubAppendix"
+"..."
+"@SubAppendix ... @End @SubAppendix"
+"@EndSubAppendices"
+}
+There are sub-subappendices following the same pattern, but no
+subsubappendix.books @SubIndex { in books }
+beginsubsubappendices.books @SubIndex { in books }
+endsubsubappendices.books @SubIndex { in books }
+sub-sub-subappendices.
+@PP
+The book ends with the last chapter or appendix; any reference list or
+index will be appended automatically.  Although we have described how to
+create books as though everything was in one large file, in practice it
+is much better to divide the book into multiple files, following the
+method given in Section {@NumberOf organizing}.
+@PP
+In addition to the {@Code "@Title"} option, each large-scale structure
+symbol (i.e. {@Code "@Preface"}, {@Code "@Introduction"}, {@Code "@Chapter"},
+{@Code "@Section"}, {@Code "@SubSection"}, {@Code "@SubSubSection"},
+{@Code "@Appendix"}, {@Code "@SubAppendix"}, and {@Code "@SubSubAppendix"})
+has a @Code "@Tag" option for cross referencing (Section {@NumberOf cross}),
+an @Code "@InitialLanguage" option for changing the language of that
+part of the document, and a @Code "@RunningTitle" option which will be
+used in place of @Code "@Title" in running headers if given.  This last
+is useful when the full title is rather long.
+@PP
+The @Code "@Chapter" symbol has three additional options for dividing
+parts. @Index { parts of books }
+the book into parts:
+part.number @Index @Code "@PartNumber"
+part.title @Index @Code "@PartTitle"
+part.text @Index @Code "@PartText"
+@ID @OneRow @Code {
+"@Chapter"
+"    @PartNumber { Part A }"
+"    @PartTitle { The Ancient World }"
+"    @PartText { ... }"
+}
+Any chapter with a non-empty @Code "@PartTitle" option will become the
+first chapter of a part.  It will be preceded by two pages containing the
+part number, title, and text, and there will also be an entry
+made in the table of contents.  @Code "@PartNumber" and @Code "@PartText"
+may be omitted.  Parts are @I not numbered automatically:  you
+have to supply your own numbers or letters as shown above.
+@PP
+The features described in other chapters are all available within
+books.  A table of contents and index will appear automatically, and
+you will need to change the setup file to avoid them.  Endnotes will
+appear at the end of the enclosing preface, introduction, chapter, or
+appendix.  The numbering of figures and tables includes a chapter or
+appendix number:  the first figure of Appendix C will be Figure C.1,
+and so on.  Figures and tables within the preface or introduction are
+numbered 1, 2, 3, etc.  A figure or table will never appear on the
+same page as the beginning of a chapter or appendix.  References work
+as described in Chapter {@NumberOf biblio}.  As explained there, it is
+possible to have a list of references at the end of each chapter as well
+as at the end of the book.
+@PP
+Within the @Code "book" setup file there is a @Code "@BookSetup"
+booksetup. @Index @Code "@BookSetup"
+symbol whose options control the appearance of features specific to books
+(in other words, the features described in this section).  Here is a
+representative sample of these options, showing their default values:
+@ID @OneRow @Code {
+"@Use { @BookSetup"
+"    # @TitlePageFont { Helvetica Base }"
+"    # @SeparateIntroNumbering { Yes }"
+"    # @PrefaceAfterContents { No }"
+"    # @ReferencesBeforeAppendices { No }"
+"    # @ChapterStartPages { Any }"
+"    # @ChapterWord { chapter }"
+"    # @ChapterNumbers { Arabic }"
+"    # @ChapterHeadingFont { Bold 2.00f }"
+"    # @ChapterHeadingBreak { ragged 1.2fx nohyphen }"
+"    # @ChapterHeadingFormat { number @DotSep title }"
+"    # @AboveChapterGap { 3.00f }"
+"    # @ChapterInContents { Yes }"
+"}"
+}
+Section {@NumberOf setup} explains how to make your own setup file and
+change its options.  @Code "@TitlePageFont" is the font used on the title
+title.page.font. @Index @Code "@TitlePageFont"
+page of the book, not including a size.  @Code "@ChapterStartPages"
+determines what kinds of pages chapters and other major components of the
+book may begin on, and may be {@Code Any}, {@Code Odd}, or {@Code Even},
+meaning any page, odd-numbered pages only, or even-numbered pages
+only.  @Code "@SeparateIntroNumbering"
+separate.intro.numbering @Index @Code "@SeparateIntroNumbering"
+determines whether the introductory part of the book is to have a
+separate numbering sequence or not.  @Code "@ReferencesBeforeAppendices"
+references.before.appendices @Index @Code "@ReferencesBeforeAppendices"
+determines whether any final list of references appears before or
+after any appendices.  @Code "@ChapterWord" determines
+the word used in chapter titles; its default value, {@Code "chapter"},
+produces `Chapter' in the current language.  The other six options control
+the appearance of chapters, and there are similar options for controlling
+the other large-scale structure symbols.
+@PP
+@Code "@ChapterNumbers" determines how chapters will be numbered, and may
+be @Code { None }, @Code { Arabic }, @Code { Roman }, @Code { UCRoman },
+@Code { Alpha }, or @Code { UCAlpha }.  The default value is @Code Arabic
+for chapters and also for all large-scale structure symbols except
+appendices, for which it is {@Code UCAlpha}.  This produces the appendices
+numbered in upper-case letters (A, B, C, etc.) that were mentioned earlier.
+@PP
+@Code "@ChapterHeadingFont" is the font used for chapter headings.  The
+default value shown above produces the bold face of the initial font
+family, at twice the initial size.  A family name is acceptable
+here as well.  @Code "@ChapterHeadingBreak" is the break style for
+chapter headings.
+@PP
+@Code "@ChapterHeadingFormat" allows you to change
+the format of the heading.  The symbol @Code "number" within it will
+be replaced by the number of the chapter (actually including the word
+Chapter as well in the current language, e.g. {@Code "Chapter 12"}); the
+symbol @Code "title" within it will be replaced by the title.  So you could
+write, say,
+@ID @Code
+"@ChapterHeadingFormat { @Box paint { lightgrey } { number @DP title } }"
+to get the title below the number, both enclosed in a box.  The default
+value uses the @Code "@DotSep" symbol from Section {@NumberOf headers}
+to produce the number and title separated by a dot and two spaces, roughly
+the same as
+@ID @Code "@ChapterHeadingFormat { number.  title }"
+except when there is no number.  This option is applied
+to other major headings, in the preface, introduction, table of
+contents, appendices, reference list, and index.  In all these other
+cases, @Code "number" is an empty object, except for appendices, when it
+contains @Code "Appendix A" or whatever.
+@PP
+There is a @Code "@PartHeadingFormat" option for determining the
+format of part headings.  It works in the same way as
+{@Code "@ChapterHeadingFormat"}, with @Code "number" and @Code "title"
+symbols standing for the relevant @Code "@PartNumber" and @Code "@PartTitle"
+options.  The default value is
+@ID @Code "@PartHeadingFormat { @CD number @DP @CD title }"
+which centres the number and title.  The default paragraph breaking
+style is {@Code "clines"}, but you may place a @Code "@Break" symbol
+within @Code "@PartHeadingFormat" to change this.
+@PP
+The example of boxed titles for chapters given above suffers from two
+practical deficiencies.  First, the box won't extend right across the
+page, and second, when there is no @Code "number" we don't want the
+@Code "@DP" either.  Here is a value for @Code "@ChapterHeadingFormat"
+that solves both of these problems and looks good in practice:
+@ID @OneCol @Code {
+"@ChapterHeadingFormat {"
+"    number @Case {"
+"        {} @Yield @Box paint { lightgrey } @HExpand { title }"
+"        else @Yield @Box paint { lightgrey } @HExpand { number @DP title }"
+"    }"
+"}"
+}
+The @Code "@Case" symbol (Expert's Guide @Cite { $kingston1995lout.expert })
+distinguishes between the cases where @Code "number" is empty and non-empty;
+the @Code "@HExpand" symbol expands the horizontal space occupied by the
+heading to the maximum possible, so that when the box is drawn around it
+it will occupy the full page width.  The format can be as
+complicated as you like, and there is no need to squeeze it all onto
+one line; as always, the end of a line is the same as one space.
+@PP
+Every chapter and appendix begins on a new page.  @Code "@AboveChapterGap"
+determines how much space is left blank above the chapter title; the
+default value is three times the initial font size.  There are similar
+options for other large-scale structure symbols, which determine how
+much space is left before each one.
+@PP
+@Code "@ChapterInContents" determines whether or not an entry is made in
+the table of contents for each chapter; it may be @Code Yes or {@Code No},
+but would always be {@Code Yes}.  The default value of the corresponding
+options for sub-subsections and sub-subappendices, however, is {@Code No}.
+@End @Section
diff --git a/doc/user/typ_illu b/doc/user/typ_illu
new file mode 100644
index 0000000..532b42b
--- /dev/null
+++ b/doc/user/typ_illu
@@ -0,0 +1,85 @@
+@Section
+   @Title { Stand-alone illustrations }
+   @Tag { illustrations }
+@Begin
+@PP
+This section describes how to use Lout to produce an illustration for
+stand.alone.illustrations. @Index { stand-alone illustrations }
+illustrations. @Index { illustrations }
+inclusion in some other document, which may itself be a Lout document
+but need not be.  The opposite process, the inclusion of an illustration
+in a Lout document, is the subject of Section {@NumberOf include}.
+@PP
+Suppose you want to produce the following logo
+for inclusion in some other document:
+@ID {
+45d @Rotate @CurveBox { ARMY @LP 180d @Rotate ARMY }
+}
+This is just an object, and it is not hard to make it using Lout's
+graphics features:
+@ID @Code "45d @Rotate @CurveBox { ARMY @LP 180d @Rotate ARMY }"
+The problem is that objects ordinarily come out on pages with margins,
+page numbers, and so forth, which we don't want here.  The solution
+is to use the illustration document type, whose setup file, curiously
+enough, is called {@Code "picture"}:
+illustration. @Index @Code "@Illustration"
+@ID @OneRow @Code {
+"@SysInclude { picture }"
+"@Illustration {"
+"    45d @Rotate @CurveBox { ARMY @LP 180d @Rotate ARMY }"
+"}"
+}
+After the usual @Code "@SysInclude" line comes one @Code "@Illustration"
+symbol.  Following it is an arbitrary object which becomes the entire
+result, with no pages and no margins, ready for inclusion in some other
+document as an illustration.
+@PP
+The @Code "@Illustration" symbol has options for setting the initial
+font, paragraph breaking style, colour, and language.  Here they are
+with their default values:
+@ID @OneRow @Code {
+"@Illustration"
+"    @InitialFont { Times Base 12p }"
+"    @InitialBreak { adjust 1.2fx hyphen }"
+"    @InitialSpace { lout }"
+"    @InitialLanguage { English }"
+"    @InitialColour { black }"
+"{"
+"    ..."
+"}"
+}
+You can specify any colour from the list in Section {@NumberOf colour},
+for example {@Code blue}, and then your illustration will have that
+colour wherever it is included.
+@PP
+Because there are no pages, the width and height of the result are
+indeterminate, depending on how large the object turns out to be.  This
+makes things very awkward for filled paragraphs and centring, which depend
+on knowing how much space is available to be occupied.  So you should either
+avoid filled paragraphs and all displays and lists altogether in
+illustrations, or else enclose your object in a @Code "@Wide" symbol:
+wide @RawIndex { @Code "@Wide" }
+wide.illustrations @SubIndex { with illustrations }
+@ID @OneRow @Code {
+"@Illustration 5c @Wide {"
+"    ..."
+"}"
+}
+to make clear how wide you want your illustration to be.
+@PP
+The technical name for a file containing a stand-alone illustration
+encapsulated.postscript @Index { encapsulated PostScript file }
+eps @Index { EPS file }
+is `encapsulated PostScript file' or `EPS file' for short.  To get
+Lout to produce an encapsulated PostScript file instead of an ordinary
+PostScript file, you have to use the @Code "-EPS" Unix command line
+flag.  For example, suppose the Lout file containing our example
+illustration is called {@Code "army"}; then the appropriate Unix
+command for formatting it is
+@ID @Code "lout -EPS army > army.eps"
+An EPS file is supposed to contain only one `page', so Lout will refuse
+to generate any second or subsequent pages when the @Code "-EPS" flag
+is given.  There is also a minor difference in format between ordinary
+and encapsulated PostScript files, which is why the @Code "-EPS" flag
+is needed at all.
+@End @Section
diff --git a/doc/user/typ_ordi b/doc/user/typ_ordi
new file mode 100644
index 0000000..9fbd07a
--- /dev/null
+++ b/doc/user/typ_ordi
@@ -0,0 +1,313 @@
+@Section
+   @Title { Ordinary documents }
+   @Tag { ordinary }
+@Begin
+@PP
+Ordinary documents are the simplest kind, consisting of a plain sequence
+ordinary. @Index { ordinary documents }
+of numbered pages.  To produce an ordinary document, use the @Code doc
+setup file and the @Code "@Doc" symbol:
+doc. @Index @Code "@Doc"
+@ID @OneRow @Code {
+"@SysInclude { doc }"
+"@Doc @Text @Begin"
+"..."
+"@End @Text"
+}
+where @Code ... stands for the body of your document.  This is the
+arrangement from Section {@NumberOf start} for getting
+started.  Alternatively, you can begin with
+@Code "@Document" instead of {@Code "@Doc"}:
+document. @Index @Code "@Document"
+@ID @OneRow @Code {
+"@SysInclude { doc }"
+"@Document"
+"    @InitialFont { Times Base 12p }"
+"    @InitialBreak { adjust 1.2fx hyphen }"
+"    @InitialSpace { lout }"
+"    @InitialLanguage { English }"
+"    @PageOrientation { Portrait }"
+"    @PageHeaders { Simple }"
+"    @FirstPageNumber { 1 }"
+"    @ColumnNumber { 1 }"
+"    @OptimizePages { No }"
+"    @Unpaginated { No }"
+"//"
+"@Text @Begin"
+"..."
+"@End @Text"
+}
+This shows all the options of {@Code "@Document"}, with their default
+values.  As usual with options, the options of {@Code "@Document"}
+may be given in any order, and only the ones that need to be changed
+need be given at all.  Notice the @Code "//" after the last option.  Its
+meaning is beyond our
+"//" @Index { @Code "//" symbol }
+scope, but total disaster will ensue if it is forgotten.  The @Code "@Doc"
+symbol is an abbreviation for {@Code "@Document //"}, which is why you don't
+need @Code "//" with {@Code "@Doc"}.
+@PP
+The eight options are a selection of setup file options (Section
+{@NumberOf setup}) that frequently need to be changed.  If your changes
+to the overall formatting are confined to these options, you can change
+them here and avoid having your own setup file.  If you already have
+your own setup file, change them in either place and omit them in
+the other.
+@PP
+@Code "@InitialFont" is the font of the bulk of the document,
+and should contain a family, a face, and a size.  The default
+value selects the Times family, the Base face, and the 12 point size.
+@PP
+@Code "@InitialBreak" controls the behaviour of paragraph breaking in
+the bulk of the document.  It should have three parts:  a paragraph
+breaking style ({@Code adjust}, {@Code ragged}, etc.), an inter-line
+spacing ({@Code "1.2fx"} for single spacing, {@Code "2.4fx"} for
+double spacing, and so on), and either @Code "hyphen" or @Code "nohyphen"
+for turning hyphenation on or off.  It may also have @Code "nobreakfirst"
+or @Code "nobreaklast" (or both), meaning to disallow a page break after
+the first line of a paragraph, or before the last, respectively.
+@PP
+@Code "@InitialSpace" determines how Lout treats white space between
+two objects, as described in Section
+{@NumberOf white}.  @Code "@InitialLanguage" determines the language
+of the bulk of the document.
+@PP
+@Code "@PageOrientation" determines the orientation of the page.  Its
+value may be {@Code Portrait} (the default), {@Code Landscape},
+{@Code ReversePortrait}, or {@Code ReverseLandscape}.  See
+Section {@NumberOf pagesize} for further details.
+@PP
+@Code "@PageHeaders" determines the appearance of page headers and
+footers throughout the document, and may be {@Code None},
+{@Code Simple}, {@Code Titles}, or {@Code NoTitles}.  Section
+{@NumberOf headers} has the details, but just briefly, {@Code None}
+means no page headers at all, {@Code Simple} means a
+page number between hyphens at the top of each page except the first,
+@Code Titles produces full running titles as in this guide,
+and @Code "NoTitles" is like @Code "Titles" with the running titles
+omitted, leaving just the page numbers.
+@PP
+@Code "@FirstPageNumber" is the page number given to the first page.
+@PP
+@Code "@ColumnNumber" is the number of columns per page in the bulk of
+the document, and may be anything from {@Code 1} (the default value) to
+{@Code 10}.  It is possible to produce full-width ordinary
+text in a multi-column document, using the @Code "@FullWidth"
+full.width. @Index @Code "@FullWidth"
+symbol:
+@ID @OneRow @Code {
+"@SysInclude { doc }"
+"@Document"
+"    @ColumnNumber { 2 }"
+"//"
+"@Text @Begin"
+"@FullWidth {"
+"@CentredDisplay @Heading { NOTICE TO TRESPASSERS }"
+"}Trespassers are hereby notified that, ..."
+"@End @Text"
+}
+This produces a full-width heading above a two-column body.  The word
+@Code Trespassers has been placed immediately after the closing brace
+of @Code "@FullWidth" because (regrettably) any space here will appear
+before @Code Trespassers in the output.  Alternatively you could use
+a paragraph symbol:
+@ID @OneRow @Code {
+"@FullWidth {"
+"@CentredDisplay @Heading { NOTICE TO TRESPASSERS }"
+"}"
+"@PP"
+"Trespassers are hereby notified that, ..."
+}
+You can have several @Code "@FullWidth" symbols,
+producing full-width text wherever you want.  Just be aware that
+@Code "@FullWidth" always causes a fresh page to be begun, it will never
+appear on the same page as a figure or table, and it is not able to hold
+a table of contents, a section, or an appendix.
+@PP
+Lout ordinarily places lines onto a page until space runs out, then moves
+to the next page and so on.  This often produces ugly empty spaces at
+the bottoms of pages preceding large unbreakable displays.  Setting the
+@Code "@OptimizePages" option to {@Code "Yes"} causes Lout to examine the
+overall situation and try to minimize the ugliness, using the @TeX
+tex.page @SubIndex { page optimization }
+optimal paragraph breaking algorithm.  It takes two runs to do this,
+with intermediate results stored in Lout's cross reference database
+(Section {@NumberOf cross}); so deleting file {@Code lout.li} will reset
+it, which might be wise after major changes.  It is possible for the
+optimizer to cycle, never settling on a single final best
+version; this is usually caused by footnotes or floating figures inserted
+at points that end up near page boundaries.
+@PP
+The @Code "@Unpaginated" option, whose value is ignored unless plain text
+output is in effect, produces unpaginated output when changed to
+{@Code Yes} (see Section {@NumberOf plain}).
+@PP
+Within the @Code "@Text" symbol, it is possible to have a sequence
+of sections:
+section. @RawIndex @Code "@Section"
+section.ordinary @SubIndex { in ordinary documents }
+beginsections. @RawIndex @Code "@BeginSections"
+beginsections.ordinary @SubIndex { in ordinary documents }
+endsections. @RawIndex @Code "@EndSections"
+endsections.ordinary @SubIndex { in ordinary documents }
+@ID @OneRow @Code {
+"preceding text"
+"@BeginSections"
+"@Section ... @End @Section"
+"@Section ... @End @Section"
+"..."
+"@Section ... @End @Section"
+"@EndSections"
+}
+as described in Section {@NumberOf largescale}.  Within any
+section, a similar arrangement produces subsections:
+subsection. @RawIndex @Code "@SubSection"
+subsection.ordinary @SubIndex { in ordinary documents }
+beginsubsections. @RawIndex @Code "@BeginSubSections"
+beginsubsections.ordinary @SubIndex { in ordinary documents }
+endsubsections. @RawIndex @Code "@EndSubSections"
+endsubsections.ordinary @SubIndex { in ordinary documents }
+@ID @OneRow @Code {
+"preceding text"
+"@BeginSubSections"
+"@SubSection ... @End @SubSection"
+"@SubSection ... @End @SubSection"
+"..."
+"@SubSection ... @End @SubSection"
+"@EndSubSections"
+}
+Within any subsection, there may be sub-subsections, obtained
+using {@Code "@BeginSubSubSections"}, {@Code "@SubSubSection"},
+subsubsection. @RawIndex @Code "@SubSubSection"
+subsubsection.ordinary @SubIndex { in ordinary documents }
+beginsubsubsections. @RawIndex @Code "@BeginSubSubSections"
+beginsubsubsections.ordinary @SubIndex { in ordinary documents }
+endsubsubsections. @RawIndex @Code "@EndSubSubSections"
+endsubsubsections.ordinary @SubIndex { in ordinary documents }
+and {@Code "@EndSubSubSections"}.  There are no sub-sub-subsections.
+@PP
+Also within the @Code "@Text" symbol only, there may be a sequence of
+appendices:
+appendix. @RawIndex @Code "@Appendix"
+appendix.ordinary @SubIndex { in ordinary documents }
+beginappendices. @RawIndex @Code "@BeginAppendices"
+beginappendices.ordinary @SubIndex { in ordinary documents }
+endappendices. @RawIndex @Code "@EndAppendices"
+endappendices.ordinary @SubIndex { in ordinary documents }
+@ID @OneRow @Code {
+"preceding text"
+"@BeginAppendices"
+"@Appendix ... @End @Appendix"
+"@Appendix ... @End @Appendix"
+"..."
+"@Appendix ... @End @Appendix"
+"@EndAppendices"
+}
+These will be `numbered' A, B, C etc. as is conventional.  Within any
+appendix there may be a sequence of subappendices, obtained in the
+usual way using  {@Code "@BeginSubAppendices"}, {@Code "@SubAppendix"},
+subappendix. @RawIndex @Code "@SubAppendix"
+subappendix.ordinary @SubIndex { in ordinary documents }
+beginsubappendices. @RawIndex @Code "@BeginSubAppendices"
+beginsubappendices.ordinary @SubIndex { in ordinary documents }
+endsubappendices. @RawIndex @Code "@EndSubAppendices"
+endsubappendices.ordinary @SubIndex { in ordinary documents }
+and {@Code "@EndSubAppendices"}.  There are sub-subappendices as well,
+following the same pattern, but no sub-sub-subappendices.
+subsubappendix. @RawIndex @Code "@SubSubAppendix"
+subsubappendix.ordinary @SubIndex { in ordinary documents }
+beginsubsubappendices. @RawIndex @Code "@BeginSubSubAppendices"
+beginsubsubappendices.ordinary @SubIndex { in ordinary documents }
+endsubsubappendices. @RawIndex @Code "@EndSubSubAppendices"
+endsubsubappendices.ordinary @SubIndex { in ordinary documents }
+@PP
+In addition to the {@Code "@Title"} option, each large-scale structure
+symbol ({@Code "@Section"}, {@Code "@SubSection"}, {@Code "@SubSubSection"},
+{@Code "@Appendix"}, {@Code "@SubAppendix"}, and {@Code "@SubSubAppendix"})
+has a @Code "@Tag" option for cross referencing (Section {@NumberOf cross}),
+an @Code "@InitialLanguage" option for changing the language of that part
+of the document, and a @Code "@RunningTitle" option which will be used in
+place of @Code "@Title" in running headers if given.  @Code "@RunningTitle"
+is useful when the full title is rather long.
+@PP
+The features described in other chapters are all available within
+ordinary documents.  Endnotes and references appear automatically at
+the end of the document.  Figures are labelled Figure 1, Figure 2,
+etc., and tables are labelled Table 1, Table 2, etc.
+@PP
+To get a table of contents, set the @Code "@MakeContents" option in
+the setup file to {@Code Yes}, and insert the symbol
+@Code "@ContentsGoesHere" at the point where you would like the
+contents.goes.here. @Index @Code "@ContentsGoesHere"
+table of contents to appear, anywhere before the first section:
+@ID @OneRow @Code {
+"@SysInclude { doc }"
+"@Text @Begin"
+"@CentredDisplay @Heading { Safety Procedures }"
+"@Heading { Contents }"
+"@DP"
+"@ContentsGoesHere"
+"@DP"
+"..."
+"@End @Text"
+}
+You must supply your own heading, as well as paragraph symbols
+before and after.  Regrettably, @Code "@ContentsGoesHere" may
+not be placed inside a display, nor inside {@Code "@FullWidth"}.
+@PP
+To get an index, set the @Code "@MakeIndex" option in the setup file
+to {@Code Yes}, and follow the instructions in Section
+{@NumberOf indexes}.  The index will appear automatically at the end
+of your document.
+@PP
+Within the @Code doc setup file there is an @Code "@OrdinarySetup"
+symbol whose options control the appearance of features specific to
+ordinary documents (in other words, the features described in this
+section).  Here is a representative sample of these options, showing
+their default values:
+ordinary.setup @Index @Code "@OrdinarySetup"
+@ID @OneRow @Code {
+"@Use { @OrdinarySetup"
+"  # @IndexWord { index }"
+"  # @AppendixWord { appendix }"
+"  # @SectionNumbers { Arabic }"
+"  # @SectionHeadingFont { Bold }"
+"  # @SectionGap { 2.00v }"
+"  # @SectionInContents { Yes }"
+"}"
+}
+Section {@NumberOf setup} explains how to make your own setup file and
+change its options.
+@PP
+The @Code "@IndexWord" option determines what the index is called, if
+there is one.  The default value, {@Code "index"}, produces the word
+`Index' in the current language.  Any other value produces itself.  The
+@Code "@AppendixWord" option is similar; its default value is `Appendix'
+in the current language.
+@PP
+@Code "@SectionNumbers" determines how sections will be numbered, and may
+be @Code { None }, @Code { Arabic }, @Code { Roman }, @Code { UCRoman },
+@Code { Alpha }, or @Code { UCAlpha }.  The default value is @Code Arabic
+for sections and also all other large-scale structure symbols except
+appendices, for which it is {@Code UCAlpha}.  This produces the appendices
+numbered in upper-case letters (A, B, C, etc.) that were mentioned earlier.
+@PP
+@Code "@SectionHeadingFont" is the font used for section headings.  The
+default value produces the bold face from the family of the
+initial font.  A family name or size is also acceptable:
+@ID @Code "@SectionHeadingFont { Helvetica Base +2p }"
+makes the section heading appear in the Helvetica font, two
+points larger than the initial size.
+@PP
+@Code "@SectionGap" determines how much space is left blank before each
+section title;  the default value shown above is twice the current
+inter-line spacing.  The special value @Code "2b" may be used to get a
+page break rather than a space.  There are similar options for other
+large-scale structure symbols, which determine how much space is left
+before each one.
+@PP
+@Code "@SectionInContents" determines whether or not an entry is made in
+the table of contents for each section; it may be @Code Yes or {@Code No},
+but would always be {@Code Yes}.  The default value of the corresponding
+options for sub-subsections and sub-subappendices, however, is {@Code No}.
+@End @Section
diff --git a/doc/user/typ_orga b/doc/user/typ_orga
new file mode 100644
index 0000000..8ba6ab7
--- /dev/null
+++ b/doc/user/typ_orga
@@ -0,0 +1,93 @@
+@Section
+   @Title { Organizing large documents }
+   @Tag { organizing }
+@Begin
+@PP
+It is not a good plan to store a large document in a single large
+organizing.large @Index { organizing large documents }
+file.  It takes too long to find things in it, and if some catastrophe
+occurs, you lose the lot.  Lout encourages you to break documents into
+pieces by its willingness to read a sequence of files
+({@Code "lout file1 file2 ..."}).  For large documents, the following
+plan is recommended.
+@PP
+Suppose you are making a book whose third chapter contains sections on
+banksias, grevilleas, acacias, and eucalypts.  Place each section, from
+@Code "@Section" to {@Code "@End @Section"}, in a separate file, making
+four files called, say, {@Code banksias}, {@Code grevilleas},
+{@Code acacias}, and {@Code eucalypts}.  Then make a single file for the
+chapter as a whole whose contents are as follows:
+@ID @OneRow @Code {
+"@Chapter"
+"    @Title { Australian Native Plants }"
+"@Begin"
+"Australian native plants provide a distinctive identity to the garden.  Although"
+"less colourful than their European alternatives, some banksias and grevilleas do"
+"flower strongly, and of course the acacias (wattles) are unsurpassable in late winter."
+"@BeginSections"
+"@Include { banksias }"
+"@Include { grevilleas }"
+"@Include { acacias }"
+"@Include { eucalypts }"
+"@EndSections"
+"@End @Chapter"
+}
+The @Code "@Include" symbol causes Lout to read the file whose name follows
+include. @Index @Code "@Include"
+it between braces, just as though the contents of that file had been included
+at that point.
+@PP
+With this arrangement you can easily rearrange the order of the
+sections:  just swap their @Code "@Include" lines.  You should be using
+Lout's automatic cross referencing features (Section {@NumberOf cross}),
+so you don't have to worry about keeping cross references up to date.  You
+can also temporarily delete a section by placing a @Code "#" character at
+the start of its line:
+@ID @Code "# @Include { acacias }"
+This works because @Code "#" is the @I { comment character }:  Lout will
+comment. @Index { comments }
+ignore this character (unless enclosed in double quotes) and everything
+following it up to the end of the line.  You can even temporarily delete
+every section except the one you are working on at the moment, using
+these comments.
+@PP
+Suppose now that this chapter file is called @Code { natives }, and you
+have others called @Code { preface }, @Code { flowers }, etc.  Then you
+can make one file (call it @Code { garden }) for the whole book like this:
+@ID @OneRow @Code {
+"@SysInclude { book }"
+"@Book"
+"    @Title { The Australian Garden }"
+"    @Author { Martha S. Vineyard }"
+"//"
+"@Include { preface }"
+"@Include { flowers }"
+"@Include { shrubs }"
+"@Include { natives }"
+"@Include { trees }"
+}
+You can play the same tricks here:  swap chapters around, or temporarily
+delete one or more with a {@Code "#"}.  When a chapter is finished
+you can temporarily delete it to save formatting time and paper, and
+bring it back at the end.  To format the book, use
+@Code "lout garden > out.ps"
+in Unix.  Lout will read each @Code "@Include" file as it comes to it,
+and if it finds an @Code "@Include" of a section while reading a chapter
+file, it will read the section too.
+@PP
+If the order of your chapters is fairly stable, it might be advantageous
+to use the @Code "@BypassNumber" option of @Code "@Chapter" (described
+in Appendix {@NumberOf bypass}) to fix the numbers of all your chapters,
+so that you get correct chapter numbers even when formatting one
+chapter at a time.
+@PP
+If you decide to store chapters in separate Unix directories, make sure
+that any @Code "/" characters in the file names are enclosed in double
+quotes:
+@ID @Code "@Include { \"natives.dir/acacias\" }"
+Be careful not to give the directory the same name as your chapter
+file.  You might also find it useful to construct your book
+@I { top-down }, as computer scientists call it, laying out all the
+chapters and sections as empty skeletons and filling their contents in
+later.
+@End @Section
diff --git a/doc/user/typ_over b/doc/user/typ_over
new file mode 100644
index 0000000..fd14e2a
--- /dev/null
+++ b/doc/user/typ_over
@@ -0,0 +1,314 @@
+@Section
+   @Title { Overhead transparencies }
+   @Tag { overheads }
+@Begin
+@PP
+To produce overhead transparencies
+@FootNote {
+In Version 3.15 overhead transparencies were updated and brought into line
+with the other document types.  Although existing source files do not need
+to be modified, their printed appearance may change (spacing, running
+headers).  There are some new setup file options, and some changes to
+existing setup file options.
+}
+(hereafter called overheads), start off
+overheads. @Index { overhead transparencies }
+slides. @RawIndex { slides @I see overhead transparencies }
+with the @Code slides setup file and the @Code "@OverheadTransparencies"
+overhead.transparencies. @Index @Code "@OverheadTransparencies"
+symbol:
+@ID @OneRow @Code {
+"@SysInclude { slides }"
+"@OverheadTransparencies"
+"    @Title {}"
+"    @RunningTitle {}"
+"    @Author {}"
+"    @Institution {}"
+"    @DateLine { No }"
+"    @InitialFont { Times Base 20p }"
+"    @InitialBreak { ragged 1.2fx nohyphen }"
+"    @InitialSpace { lout }"
+"    @InitialLanguage { English }"
+"    @PageOrientation { Portrait }"
+"    @PageHeaders { Titles }"
+"    @FirstPageNumber { 1 }"
+"    @FirstOverheadNumber { 1 }"
+"    @FirstLectureNumber { 1 }"
+"    @OptimizePages { No }"
+"//"
+}
+This shows all the options of @Code "@OverheadTransparencies" with their
+default values.  As usual with options, they may be given in any order, and
+only the ones whose values need to be changed need be given at all.  The
+meaning of the @Code "//" symbol after the last option is beyond our
+scope, but disaster will ensue if it is forgotten.
+@PP
+If @Code "@Title" is not empty, an initial overhead will be produced
+containing the {@Code "@Title"}, {@Code "@Author"}, {@Code "@Institution"},
+and {@Code "@DateLine"} options.  @Code "@DateLine" may be set to
+{@Code "No"}, meaning no dateline, {@Code "Yes"}, meaning print the current
+date, or anything else, which is taken to be a date and printed.
+@PP
+Each overhead has a running header printed in small type at the top
+left.  The @Code "@RunningTitle" option goes into this header, or, if
+there is no @Code "@RunningTitle" option, @Code "@Title" is used instead.
+@PP
+The remaining options are a selection of setup file options (Section
+{@NumberOf setup}) that frequently need to be changed.  If your changes
+to the overall formatting are confined to these options, you can change
+them here and avoid having your own setup file.  If you already have
+your own setup file, change them in either place and omit them in
+the other.
+@PP
+@Code "@InitialFont" is the font in which the overheads will be set, and
+should contain a family, a face, and a size.  A good font size for
+overheads is 20 points, so that is the default size.
+@PP
+@Code "@InitialBreak" controls the behaviour of paragraph breaking in
+the overheads.  It should have three parts:  a paragraph
+breaking style ({@Code adjust}, {@Code ragged}, etc.), an inter-line
+spacing ({@Code "1.2fx"} for single spacing, {@Code "2.4fx"} for
+double spacing, and so on), and either @Code "hyphen" or @Code "nohyphen"
+for turning hyphenation on or off.  Adjusted lines and hyphenated words
+are difficult to read from overheads, so the default is not to have them.
+@Code "@InitialSpace" determines how Lout treats white space between
+objects (Section {@NumberOf white}).  @Code "@InitialLanguage"
+determines the language of the overheads.
+@PP
+@Code "@PageOrientation" determines the orientation of the page.  Its
+value may be {@Code Portrait} (the default), {@Code Landscape},
+{@Code ReversePortrait}, or {@Code ReverseLandscape}.  See
+Section {@NumberOf pagesize} for further details.
+@PP
+@Code "@PageHeaders" determines the appearance of page headers and
+footers.  Its value may be {@Code None}, {@Code Simple}, {@Code Titles},
+or {@Code NoTitles}.  Section {@NumberOf headers} has the details, but
+just briefly, {@Code None} produces no page headers, {@Code Simple} produces
+page numbers only, @Code Titles produces full running titles, and
+@Code "NoTitles" is similar to @Code "Simple" in this context.
+@PP
+@Code "@FirstPageNumber" is the number given to the first page,
+@Code "@FirstOverheadNumber" is the number given to the first overhead,
+and @Code "@FirstLectureNumber" is the number given to the first lecture,
+of which more below.  See preceding sections for {@Code "@OptimizePages"}.
+# Lout ordinarily places lines onto a page until space runs out, then moves
+# to the next page and so on.  This often produces ugly empty spaces at
+# the bottoms of pages preceding large unbreakable displays.  Setting the
+# @Code "@OptimizePages" option to {@Code "Yes"} causes Lout to examine the
+# overall situation and try to minimize the ugliness, using the @TeX
+# optimal paragraph breaking algorithm.  It takes two runs to do this,
+# with intermediate results stored in Lout's cross reference database
+# (Section {@NumberOf cross}); so deleting file {@Code lout.li} will reset
+# it, which might be wise after major changes.  It is possible for the
+# optimizer to cycle, never settling on a single final best
+# version; this is usually caused by footnotes or floating figures inserted
+# at points which end up near page boundaries.
+@PP
+After the compulsory {@Code "//"} come the overheads themselves.  There
+are two alternatives:  a series of overheads, corresponding to a single
+lecture, or a series of series of overheads, corresponding to a series
+of lectures.  If the first is wanted, use this arrangement:
+overhead. @Index @Code "@Overhead"
+@ID @OneRow @Code {
+"@SysInclude { slides }"
+"@OverheadTransparencies"
+"    ..."
+"//"
+"@Overhead ... @End @Overhead"
+"@Overhead ... @End @Overhead"
+"..."
+"@Overhead ... @End @Overhead"
+}
+@Code "@Overhead" is a large-scale structure symbol, similar to
+{@Code "@Section"}, with the usual options:
+@ID @OneRow @Code {
+"@Overhead"
+"    @Title { Trends in investment since 1980 }"
+"    @RunningTitle { Investment }"
+"    @Tag { investment }"
+"    @InitialLanguage { English }"
+"@Begin"
+"..."
+"@End @Overhead"
+}
+If @Code "@Title" is given it will appear as a centred, bold display
+at the beginning of the overhead.  As usual, these options may be given
+in any order or omitted altogether.
+@PP
+The body of the overhead is quite arbitrary.  Typically one tends to
+use lists and displays more than paragraphs, but all the usual features
+are available.  Each overhead begins on a fresh page, but it may occupy
+more than one page.
+@PP
+@Code "@Overhead" also has a @Code "@Format" option which allows you to
+specify an arbitrary format for the body of the overhead (that is,
+everything except its title).  For example,
+@ID @Code "@Format { @CurveBox @HExpand @VExpand @Body }"
+encloses the body in a curvebox, with the box expanded to the full
+available width and height.  Unlike the similar option for figures
+and tables, however, this @Code "@Format" option unfortunately has
+not been set up to work with multi-page overheads, so if you use the
+format just given you have to make sure your overheads all fit on one
+page.  To draw boxes around the @I entire page, use the @Code "@PageBox"
+setup file options.
+@PP
+Lout does not provide any special support for overlays.  A good way to
+make them is to first produce one overhead containing all the layers
+simultaneously.  Once this is correct, enclose the entire body of the
+overhead in {@Code "white @Colour"}, make one copy of the text of the
+overhead for each layer, separating the copies with @Code "@NP"
+(new page) symbols, and, in each copy, enclose the parts that are
+to appear in that layer in {@Code "black @Colour"} (or any other
+colour).  This works because @Code "white @Colour" makes an object
+invisible without altering its size.
+@PP
+We turn now to the second major alternative, which is a series
+of lectures, like this:
+lecture. @Index @Code "@Lecture"
+@ID @OneRow @Code {
+"@SysInclude { slides }"
+"@OverheadTransparencies"
+"    ..."
+"//"
+"@Lecture ... @End @Lecture"
+"@Lecture ... @End @Lecture"
+"..."
+"@Lecture ... @End @Lecture"
+}
+@Code "@Lecture" is a large-scale structure symbol, again with
+the usual options:
+@ID @OneRow @Code {
+"@Lecture"
+"    @Title { Macro-Economic Policies for the Nineties }"
+"    @RunningTitle { Macro-economic policies }"
+"    @Tag { macro-economics }"
+"    @InitialLanguage { English }"
+"@Begin"
+"..."
+"@End @Lecture"
+}
+If @Code "@Title" is non-empty the series of overheads will begin with
+an overhead containing the title alone, centred on the page using the
+@Code "clines" paragraph breaking style.  This means that it makes
+sense to have a multi-line title.  Any text following the @Code "@Begin"
+will appear under the lecture title as you would expect.
+@PP
+Within the body of {@Code "@Lecture"}, place a series of overheads
+bracketed by @Code "@BeginOverheads" and {@Code "@EndOverheads"}:
+beginoverheads. @Index @Code "@BeginOverheads"
+endoverheads. @Index @Code "@EndOverheads"
+@ID @OneRow @Code {
+"@BeginOverheads"
+"@Overhead ... @End @Overhead"
+"@Overhead ... @End @Overhead"
+"..."
+"@Overhead ... @End @Overhead"
+"@EndOverheads"
+}
+The @Code "@Overhead" symbol is exactly as described earlier.
+@PP
+The features described in other chapters are available with
+overheads.  Endnotes and references appear automatically at the
+end of the overheads.  You can have a table of contents, by setting
+the @Code "@MakeContents" option of the setup file to {@Code Yes}.  It
+will appear automatically after any title overhead.  The setup file
+options have been set on the assumption that you want your lectures
+to appear in the table of contents, but not individual overheads.  It is not
+possible to have an index, and it is not possible to have multiple columns.
+@PP
+Within the @Code slides setup file there is an @Code "@OverheadSetup"
+symbol whose options control the appearance of features specific to
+overhead.setup. @Index @Code "@OverheadSetup"
+overheads (in other words, the features described in this section).  Here
+are some of these options and their default values:
+@ID @OneRow @Code {
+"@Use { @OverheadSetup"
+"  # @DateLine { No }"
+"  # @FirstOverheadNumber { 1 }"
+"  # @FirstLectureNumber { 1 }"
+"  # @ContentsWord { contents }"
+"  # @LectureNumbers { Arabic }"
+"  # @OverheadNumbers { Arabic }"
+"  # @TitlePageFont { Helvetica Base }"
+"  # @LectureHeadingFont { Bold 1.20f }"
+"  # @LectureHeadingFormat { @Centre number @DP @Centre title @DP }"
+"  # @OverheadHeadingFormat { @Centre title @DP }"
+"  # @OverheadHeadingFont { Bold }"
+"  # @LectureInContents { Yes }"
+"  # @OverheadInContents { No }"
+"  # @ReferencesInContents { Yes }"
+"}"
+}
+For an introduction to setup files and their options, consult
+Section {@NumberOf setup}.  The first four options are as for
+@Code "@OverheadTransparencies" as described above.  @Code "@ContentsWord"
+determines the table of contents heading; its default value, {@Code contents},
+produces `Contents' in the current language.  @Code "@LectureNumbers"
+and @Code "@OverheadNumbers" determine the style of numbering of lectures
+and overheads, and may be {@Code None}, {@Code Arabic}, {@Code Roman},
+{@Code UCRoman}, {@Code Alpha}, or {@Code UCAlpha} as usual.  Next come
+options for setting the font of the overall title page, the
+title page of each lecture, and so on, and finally options which
+determine which entries are made in any table of contents.
+@PP
+The @Code "@LectureHeadingFormat" option determines the
+format of the heading of each lecture.  Within it, the symbol @Code "number" 
+stands for the number of the lecture, including the `Lecture' word if
+there is one, and @Code "title" stands for the title of the lecture.  The
+default value centres the number and title, with display gaps below
+each one.  @Code "@OverheadHeadingFormat" is similar; it has the same
+symbols but the default value chooses not to use {@Code "number"}.
+@PP
+Other setup file options exist which permit you to have a box drawn
+around each overhead, and to change the page size, margins, and
+orientation.  These are described in Chapter {@NumberOf changes}.
+@PP
+Section {@NumberOf headers} describes the setup file options that
+control the appearance of page headers and footers.  With overheads,
+the values given to the {@Code "@MajorTitle"}, {@Code "@MinorTitle"},
+{@Code "@MajorNum"}, and {@Code "@MinorNum"} symbols within those
+options are as follows.  If @Code "@Lecture" is being used:
+@ID @Tab
+    @Fmta { @Col A ! @Col B }
+{
+@Rowa
+    A { @Code "@MajorTitle" }
+    B { The @Code "@RunningTitle" option of
+{@Code "@OverheadTransparencies"}, or its @Code "@Title" option
+if @Code "@RunningTitle" is absent; }
+@Rowa
+    A { @Code "@MinorTitle" }
+    B { The @Code "@RunningTitle" option of the current
+{@Code "@Lecture"}, or else its @Code "@Title" option if
+@Code "@RunningTitle" is absent; }
+@Rowa
+    A { @Code "@MajorNum" }
+    B { The number of the current {@Code "@Lecture"}; }
+@Rowa
+    A { @Code "@MinorNum" }
+    B { A two-part number, for example 5.2, containing the number of
+the current @Code "@Lecture" and the number within that lecture
+of the current overhead. }
+}
+If @Code "@Lecture" is not being used:
+@ID @Tab
+    @Fmta { @Col A ! @Col B }
+{
+@Rowa
+    A { @Code "@MajorTitle" }
+    B { The @Code "@RunningTitle" option of
+{@Code "@OverheadTransparencies"}, or its @Code "@Title" option
+if @Code "@RunningTitle" is absent; }
+@Rowa
+    A { @Code "@MinorTitle" }
+    B { Empty; }
+@Rowa
+    A { @Code "@MajorNum" }
+    B { Empty; }
+@Rowa
+    A { @Code "@MinorNum" }
+    B { The number of the current overhead. }
+}
+The first page occupied by any overhead is a @Code Start page; subsequent
+pages are @Code NonStart pages.  There are no @Code Intro pages.
+@End @Section
diff --git a/doc/user/typ_plai b/doc/user/typ_plai
new file mode 100644
index 0000000..a880ccb
--- /dev/null
+++ b/doc/user/typ_plai
@@ -0,0 +1,76 @@
+@Section
+   @Title { Plain text documents }
+   @Tag { plain }
+@Begin
+@PP
+Occasionally you may need to produce an output file containing plain text
+plain.text. @Index { plain text documents }
+rather than PostScript, for example for an online manual entry or to send
+as electronic mail.  Any document that can be produced by Lout in
+PostScript can be produced in plain text as well, by adding a @Code "-p"
+flag to the Unix command line:
+@ID @Code "lout -p simple"
+No other changes are required.  Here we are sending the output directly to
+the screen, but it can be redirected to a file, or piped through the
+@Code more command for viewing one page at a time, etc.
+@PP
+Of course, plain text is an extremely limited medium of communication
+compared with PostScript, and this forces Lout to make some rather
+drastic compromises:
+@BulletList gap { @ParaGap }
+@LI { Symbols like {@Code "@Bullet"}, which stand for unusual characters,
+produce printable characters which approximate the PostScript ones.  For
+example, {@Code "@Bullet"} produces {@Code "o"}.  However, the @Code "@Char"
+and @Code "@Sym" symbols often produce unprintable characters, and are best
+avoided; }
+@LI { All font and size changes are ignored, since plain text has only
+one font and size.  Every character is taken to be @Eq { 1 frac 10 } inch
+wide and @Eq { 1 frac 6 } inch high; }
+@LI { No underlines are printed; }
+@LI { No margin notes are printed; }
+@LI { Scaled objects are not printed unless the scale factor happens to be 1; }
+@LI { Rotated objects are not printed unless the angle happens to be zero
+degrees.  This means that page orientations (Section {@NumberOf pagesize})
+other than @Code Portrait do not work; }
+@LI { Ruled lines are not printed, and paint and colour options are
+ignored.  This spoils the graphics and graphs of Chapters
+{@NumberOf graphics}, {@NumberOf diagrams}, and {@NumberOf graphs}. }
+@EndList
+Despite the problems, many things work surprisingly well.  Tables, for example,
+look very good.  It does no harm to try things and see if they work out.
+@PP
+The worst problem with plain text is that characters cannot be placed at
+arbitrary points on the page.  A superscript, for example, is impossible to
+place correctly, so Lout uses a different layout for footnote labels (and
+makes a mess of equations, which are best avoided).  Because of this problem
+it's best to make all horizontal lengths multiples of @Eq {1 frac 10} inch
+(conveniently expressed as {@Code 1s}), and all vertical lengths multiples
+of @Eq { 1 frac 6 } inch (conveniently expressed as {@Code 1f}).  To help
+you do this, the setup files contain many entries that look like this
+example:
+@ID @Code "# @InitialBreak { {adjust 1.2fx hyphen} @OrIfPlain {ragged 1fx nohyphen} }"
+The meaning is that the value of @Code "@InitialBreak" will be
+@Code "adjust 1.2fx hyphen" usually, but will switch to
+{@Code "ragged 1fx nohyphen"}, which is better suited to plain text,
+if the @Code "-p" command line flag is used.  These setup file values
+allow you to switch from PostScript to plain text and back again without
+changing anything at all except the @Code "-p" command line flag.
+@PP
+If you use @Code "lout -P" instead of {@Code "lout -p"}, the plain text
+output will contain a form-feed character (control-L) after each page
+form.feed @Index { form-feed in plain text }
+except the last.  This character causes most printing devices to start
+a new page, which is very useful when your page height is not exactly
+right.
+@PP
+The @Code "@Document" symbol (Section {@NumberOf ordinary}) has an
+unpaginated. @Index @Code "@Unpaginated"
+@Code "@Unpaginated" option which, when set to {@Code "Yes"}, causes
+the plain text output to appear unpaginated, that is, in one long
+continous stream with no page breaks.  Its value is ignored if plain text
+output is not in effect, so it can be safely set to @Code "Yes" in
+documents intended for formatting both ways.  The usual margins apply;
+footnotes appear at the end; figures and tables do not work.  Lout
+stupidly reads the entire document before producing any output when
+this option is used, so if the document is long you might run out of memory.
+@End @Section
diff --git a/doc/user/typ_repo b/doc/user/typ_repo
new file mode 100644
index 0000000..b73671a
--- /dev/null
+++ b/doc/user/typ_repo
@@ -0,0 +1,359 @@
+@Section
+   @Title { Technical reports }
+   @Tag { reports }
+@Begin
+@PP
+To make a technical report,
+start off with the @Code "report" setup
+reports. @Index { reports }
+technical.reports. @Index { technical reports }
+report. @Index @Code "@Report"
+file and the @Code "@Report" symbol:
+@ID @OneRow @Code {
+"@SysInclude { report }"
+"@Report"
+"    @Title {}"
+"    @Author {}"
+"    @Institution {}"
+"    @DateLine { No }"
+"    @AtEnd {}"
+"    @CoverSheet { Yes }"
+"    @ContentsSeparate { No }"
+"    @InitialFont { Times Base 12p }"
+"    @InitialBreak { hyphen adjust 1.2fx }"
+"    @InitialSpace { lout }"
+"    @InitialLanguage { English }"
+"    @PageOrientation { Portrait }"
+"    @PageHeaders { Simple }"
+"    @ColumnNumber { 1 }"
+"    @FirstPageNumber { 1 }"
+"    @OptimizePages { No }"
+"    @AbstractDisplay { Yes }"
+"    @AbstractTitle { Abstract }"
+"    @Abstract {}"
+"//"
+}
+This shows all the options of {@Code "@Report"}
+@FootNote {
+Version 3.13 of Lout is not completely upwardly compatible with
+previous versions in its handling of technical reports.  The change
+concerns the abstract, and if you see the error message
+@ID @Code "symbol @Abstract unknown or misspelt"
+you probably need to convert your document.  To convert an older
+document to Version 3.13, move any @Code "@Abstract" from after the
+@Code "//" to before it, delete any options to the @Code "@Abstract"
+symbol, and delete any initial paragraph symbol within the abstract.
+You can use the @Code "@AbstractTitle" option described in this section
+to change the title of the abstract.
+}
+with their default values.  As usual with options, they may be given in
+any order, and only the ones whose values need to be changed need be
+given at all.  The meaning of the @Code "//" symbol is beyond our scope,
+but disaster will ensue if it is forgotten.
+@PP
+The @Code "@Title" option holds the title of the report.  It will be
+printed using the @Code clines paragraph breaking style (Section
+{@NumberOf paras}), which centres each line, so it makes sense
+to have multi-line titles:
+@ID @OneRow @Code {
+"@Report"
+"    @Title {"
+"The solution of real instances of"
+"the timetabling problem"
+"}"
+"    ..."
+}
+With a multi-line title, each line after the first should begin
+at the left margin, not indented.  It doesn't matter where the first
+line begins, because space following an open brace is ignored.
+@PP
+The @Code "@Author" and @Code "@Institution" options hold the author's
+name and institution or address, and will also be printed using the
+@Code clines style.  If there are several authors but only one
+institution, list all the authors in the @Code "@Author" option:
+@ID @Code "@Author { Tim B. Cooper and Jeffrey H. Kingston }"
+With more authors, or with more than one institution, it is best to
+ignore the @Code "@Institution" option and place all the information
+within the @Code "@Author" option, enclosing institution information
+in @Code "@I" symbols.  In extreme cases, a table with columns of
+authors might be necessary (Chapter {@NumberOf tables}).
+@PP
+@Code "@DateLine" may be set to {@Code No}, meaning no dateline,
+{@Code Yes}, meaning print the current date, or anything else, which is
+taken to be a date and printed:
+@ID @Code "@DateLine { 4 July, 1776 }"
+A good plan is to use @Code "@DateLine { Yes }" until
+the report is finalized.
+@PP
+The {@Code "@AtEnd"} option will come out on a single unnumbered
+page with no page headers or footers, and using the same margins as for
+even pages, after the very last page of the report; even after the
+index if there is one.  It is intended to make it possible to
+include a back cover, so @Code "@PageOf last.page" does not take
+account of any @Code "@AtEnd" page.
+@PP
+The remaining options (except {@Code "@Abstract"}) are setup file options
+(Section {@NumberOf setup}) that frequently need to be changed.  If your
+changes to the overall formatting are confined to these options, you can
+change them here and avoid having your own setup file.  If you already have
+your own setup file, change them in either place and omit them in
+the other.
+@PP
+If @Code "@CoverSheet" is {@Code Yes}, an unnumbered cover
+cover.sheet. @Index @Code "@CoverSheet"
+sheet will be produced containing the title, author, institution,
+abstract, and dateline.  Otherwise they will appear on the
+first page.  The `cover sheet' is in reality a sequence of Intro pages
+(Section {@NumberOf headers}), numbered by default with Roman numerals
+on pages after the first.
+@PP
+In order to get a table of contents, it is necessary to use your
+own setup file (Section {@NumberOf setup} explains how to do this)
+and to set the @Code "@MakeContents" option within it to
+{@Code Yes}.  The table of contents will ordinarily appear beginning
+on the first page, but if the @Code "@ContentsSeparate" option of
+@Code "@Report" is
+contents.separate @Index @Code "@ContentsSeparate"
+set to @Code "Yes" it will appear on separate pages.  This is only
+effective if @Code "@CoverSheet" is {@Code No}, since a separate cover
+sheet and separate pages for the table of contents would leave nothing on
+the first page.
+@PP
+@Code "@InitialFont" is the font of the bulk of the report,
+and should contain a family, a face, and a size.  The default
+value selects the Times family, the Base face, and the 12 point size.
+@PP
+@Code "@InitialBreak" controls the behaviour of paragraph breaking in
+the bulk of the report.  It should have three parts:  a paragraph
+breaking style ({@Code adjust}, {@Code ragged}, etc.), an inter-line
+spacing ({@Code "1.2fx"} for single spacing, {@Code "2.4fx"} for
+double spacing, and so on), and either @Code "hyphen" or
+@Code "nohyphen" for turning hyphenation on or off.  It may also
+have @Code "nobreakfirst" or @Code "nobreaklast" (or both), meaning
+to disallow a page break after the first line of a paragraph, or
+before the last, respectively.
+@PP
+@Code "@InitialSpace" determines how Lout treats white space between
+two objects, as described in Section
+{@NumberOf white}.  @Code "@InitialLanguage" determines the language
+of the bulk of the report.
+@PP
+@Code "@PageOrientation" determines the orientation of the page.  Its
+value may be {@Code Portrait} (the default), {@Code Landscape},
+{@Code ReversePortrait}, or {@Code ReverseLandscape}.  See
+Section {@NumberOf pagesize} for further details.
+@PP
+@Code "@PageHeaders" determines the appearance of page headers and
+footers.  Its value may be {@Code None},
+{@Code Simple}, {@Code Titles}, or {@Code NoTitles}.  Section
+{@NumberOf headers} has the details, but just briefly, {@Code None}
+produces no page headers, {@Code Simple} produces a centred page number
+between hyphens on every page except the cover sheet and the first
+page, @Code Titles produces full running titles as in the present
+document, and @Code "NoTitles" is like @Code "Titles" with the running
+titles omitted, leaving just the page numbers.
+@PP
+@Code "@ColumnNumber" is the number of columns per page in the bulk of
+the report, and may be anything from {@Code 1} (the default value) to
+{@Code 10}.  However, there is nothing analogous to the @Code "@FullWidth"
+symbol of ordinary documents.  Instead, the cover sheet, title material,
+and all figures and tables will be printed full width, and the rest will
+be set in columns.  There is a separate @Code "@IndexColumnNumber" option
+in the setup file which determines the number of columns in the index
+(Section {@NumberOf indexes}).
+@PP
+@Code "@FirstPageNumber" is the page number given to the first page.
+@PP
+Lout ordinarily places lines onto a page until space runs out, then moves
+to the next page and so on.  This often produces ugly empty spaces at
+the bottoms of pages preceding large unbreakable displays.  Setting the
+@Code "@OptimizePages" option to {@Code "Yes"} causes Lout to examine the
+overall situation and try to minimize the ugliness, using the @TeX
+optimal paragraph breaking algorithm.  It takes two runs to do this,
+with intermediate results stored in Lout's cross reference database
+(Section {@NumberOf cross}); so deleting file {@Code lout.li} will reset
+it, which might be wise after major changes.  It is possible for the
+optimizer to cycle, never settling on a single final best version; this
+is usually caused by footnotes or floating figures inserted at points
+which end up near page boundaries.
+@PP
+Finally we have three options that control the abstract.
+@Code "@AbstractDisplay" may be @Code { Yes } or {@Code No};
+it determines whether the abstract is displayed (occupying
+the full page width except for an indent at each side like a quoted
+display) or inline (occupying the column width).
+@Code "@AbstractTitle" is the title of the abstract; its default
+value is @Code Abstract or its equivalent in the current language.
+abstract. @Index @Code "@Abstract"
+Finally, @Code "@Abstract" contains the abstract itself; it may be
+empty or absent, in which case there will be no abstract.
+@PP
+The abstract may contain footnotes in the usual way.  Regrettably, each
+footnote in the abstract will generate one spurious `unresolved cross
+reference' error message that does not go away.  This slight problem
+might be fixed in the future.
+@PP
+After the compulsory {@Code "//"} comes the report body in the
+form of a sequence of sections:
+section.reports @SubIndex { in reports }
+@ID @OneRow @Code {
+"@Section"
+"    @Title { Introduction }"
+"@Begin"
+"@PP"
+"..."
+"@End @Section"
+}
+No @Code "@BeginSections" or @Code "@EndSections" symbols are needed.  The
+beginsections.reports @SubIndex { in reports }
+endsections.reports @SubIndex { in reports }
+general rule is that you need these bracketing symbols only when you are
+inside something else.  Sections lie inside
+@Code "@Text" in ordinary documents, but they don't lie inside anything
+else in technical reports.
+@PP
+A section may have subsections, between
+subsection.reports @SubIndex { in reports }
+beginsubsections.reports @SubIndex { in reports }
+endsubsections.reports @SubIndex { in reports }
+@Code "@BeginSubSections" and {@Code "@EndSubSections"}:
+@ID @OneRow @Code {
+"preceding text"
+"@BeginSubSections"
+"@SubSection ... @End @SubSection"
+"@SubSection ... @End @SubSection"
+"..."
+"@SubSection ... @End @SubSection"
+"@EndSubSections"
+}
+Within each subsection there may be sub-subsections, each introduced
+by {@Code "@SubSubSection"}, with the whole sequence bracketed by
+subsubsection.reports @SubIndex { in reports }
+beginsubsubsections.reports @SubIndex { in reports }
+endsubsubsections.reports @SubIndex { in reports }
+@Code "@BeginSubSubSections" and {@Code "@EndSubSubSections"}:
+@ID @OneRow @Code {
+"preceding text"
+"@BeginSubSubSections"
+"@SubSubSection ... @End @SubSubSection"
+"@SubSubSection ... @End @SubSubSection"
+"..."
+"@SubSubSection ... @End @SubSubSection"
+"@EndSubSubSections"
+}
+There are no sub-sub-subsections.
+@PP
+After the sections comes an optional sequence of appendices:
+appendix.reports @SubIndex { in technical reports }
+@ID @OneRow @Code {
+"@Appendix"
+"    @Title { Derivation of the renewal formula }"
+"@Begin"
+"@PP"
+"..."
+"@End @Appendix"
+}
+No @Code "@BeginAppendices" or @Code "@EndAppendices" symbols are needed,
+beginappendices.reports @SubIndex { in reports }
+endappendices.reports @SubIndex { in reports }
+because (like the sections above) these appendices do not lie inside
+any other large-scale structure symbol.  The appendices are numbered
+A, B, C, etc., as is conventional for them.  Within each appendix
+there may be a sequence of subappendices, obtained with the
+@Code "@SubAppendix" symbol and bracketed by @Code "@BeginSubAppendices"
+subappendix.reports @SubIndex { in reports }
+beginsubappendices.reports @SubIndex { in reports }
+endsubappendices.reports @SubIndex { in reports }
+and {@Code "@EndSubAppendices"}:
+@ID @OneRow @Code {
+"preceding text"
+"@BeginSubAppendices"
+"@SubAppendix ... @End @SubAppendix"
+"@SubAppendix ... @End @SubAppendix"
+"..."
+"@SubAppendix ... @End @SubAppendix"
+"@EndSubAppendices"
+}
+There are sub-subappendices following the same pattern, but no
+subsubappendix.reports @SubIndex { in reports }
+beginsubsubappendices.reports @SubIndex { in reports }
+endsubsubappendices.reports @SubIndex { in reports }
+sub-sub-subappendices.
+@PP
+The report ends with the last section or appendix; any reference list or
+index will be appended automatically.  Although we have described how to
+create reports as though everything was in one large file, in practice it
+is much better to divide the report into multiple files, following the
+method given in Section {@NumberOf organizing}.
+@PP
+In addition to the {@Code "@Title"} option, each large-scale structure
+symbol ({@Code "@Section"}, {@Code "@SubSection"}, {@Code "@SubSubSection"},
+{@Code "@Appendix"}, {@Code "@SubAppendix"},
+and {@Code "@SubSubAppendix"}) has a @Code "@Tag" option for cross
+referencing (Section {@NumberOf cross}), an @Code "@InitialLanguage"
+option for changing the language of that part of the document, and a
+@Code "@RunningTitle" option which will be used in place of @Code "@Title"
+in running headers if given.  @Code "@RunningTitle" is useful when the
+full title is rather long.
+@PP
+The features described in other chapters are all available within
+technical reports.  To get a table of contents, change the @Code
+"@MakeContents" option in the setup file to {@Code Yes}; the rest is
+automatic, and you don't need the @Code "@ContentsGoesHere" symbol from
+ordinary documents.  To get an index, again you need only change the
+@Code "@MakeIndex" setup file option to {@Code Yes}.  Endnotes and
+references appear at the end of the report.  Figures and tables are
+numbered 1, 2, 3, etc.
+@PP
+Within the @Code "report" setup file there is a @Code "@ReportSetup"
+symbol whose options control the appearance of features specific to
+report.setup @Index @Code "@ReportSetup"
+reports (in other words, the features described in this section).  Section
+{@NumberOf setup} explains setup files and their options in general; here
+is a representative sample of these options, showing their default values:
+@ID @OneRow @Code {
+"@Use { @ReportSetup"
+"    # @CoverSheet { Yes }"
+"    # @DateLine { No }"
+"    # @ReferencesBeforeAppendices { No }"
+"    # @AbstractWord { abstract }"
+"    # @ContentsWord { contents }"
+"    # @SectionNumbers { Arabic }"
+"    # @SectionHeadingFont { Bold }"
+"    # @SectionGap { 2.00v }"
+"    # @SectionInContents { Yes }"
+"}"
+}
+@Code "@CoverSheet" and @Code "@DateLine" are as for {@Code "@Report"};
+you can set them in either place as you prefer.  @Code
+"@ReferencesBeforeAppendices" determines whether the reference list is
+printed out before or after any appendices.  @Code "@AbstractWord"
+determines the value of the title of the abstract if none is given there;
+its default value, {@Code abstract}, produces `Abstract' in the current
+language.  @Code "@ContentsWord" is similar; its default value produces
+`Contents' in the current language.  The other four options
+control the appearance of sections, and there are similar options for
+controlling the other large-scale structure symbols.
+@PP
+@Code "@SectionNumbers" determines how sections will be numbered, and may
+be @Code { None }, @Code { Arabic }, @Code { Roman }, @Code { UCRoman },
+@Code { Alpha }, or @Code { UCAlpha }.  The default value is @Code Arabic
+for sections, and also for all large-scale structure symbols except
+appendices, for which it is {@Code UCAlpha}.  This produces the appendices
+numbered in upper-case letters (A, B, C, etc.) that were mentioned earlier.
+@PP
+@Code "@SectionHeadingFont" is the font used for section headings.  The
+default value shown above produces the bold face from the family of the
+initial font.  A family name and size is acceptable here as well:
+@ID @Code "@SectionHeadingFont { Helvetica Base +2p }"
+produces section headings in the Helvetica font, two points larger
+than the initial font size.
+@PP
+@Code "@SectionGap" determines how much space is left blank before each
+section title;  the default value shown above is twice the current
+inter-line spacing.  The special value @Code "2b" may be used to get a
+page break rather than a space.  @Code "@SectionInContents" determines
+whether or not an entry is made in the table of contents for each section;
+it may be @Code Yes or {@Code No}.  There are similar options for other
+large-scale structure symbols.
+@End @Section
diff --git a/doc/user/vbas b/doc/user/vbas
new file mode 100644
index 0000000..0004cfb
--- /dev/null
+++ b/doc/user/vbas
@@ -0,0 +1,3 @@
+vi bas bas_star bas_objs bas_spac bas_char bas_empt bas_font bas_head \
+       bas_par1 bas_par2 bas_line bas_hyph bas_unde bas_date bas_lang \
+       bas_supe bas_verb bas_drop bas_conv
diff --git a/doc/user/vfmt b/doc/user/vfmt
new file mode 100644
index 0000000..39d5efe
--- /dev/null
+++ b/doc/user/vfmt
@@ -0,0 +1 @@
+vi fmt fmt_setu fmt_size fmt_marg fmt_head
diff --git a/doc/user/vref b/doc/user/vref
new file mode 100644
index 0000000..55e3596
--- /dev/null
+++ b/doc/user/vref
@@ -0,0 +1 @@
+vi ref ref_sett ref_cite ref_labe ref_entr ref_chan ref_crea
diff --git a/doc/user/vstr b/doc/user/vstr
new file mode 100644
index 0000000..7f4e2d0
--- /dev/null
+++ b/doc/user/vstr
@@ -0,0 +1,2 @@
+vi str str_disp str_list str_foot str_marg str_theo str_figs str_larg \
+       str_cros str_cont str_indx str_colu str_defs
diff --git a/doc/user/vtbl b/doc/user/vtbl
new file mode 100644
index 0000000..24f6a4d
--- /dev/null
+++ b/doc/user/vtbl
@@ -0,0 +1,2 @@
+vi tbl tbl_intr tbl_cell tbl_rows tbl_marg tbl_widt tbl_inde tbl_rule \
+       tbl_span tbl_mult tbl_alig tbl_mark tbl_plai tbl_setu tbl_summ
diff --git a/doc/user/vtyp b/doc/user/vtyp
new file mode 100644
index 0000000..003ff0b
--- /dev/null
+++ b/doc/user/vtyp
@@ -0,0 +1,2 @@
+vi typ typ_ordi typ_repo typ_book typ_over typ_illu typ_plai \
+       typ_apdf typ_orga
diff --git a/externs.h b/externs.h
new file mode 100644
index 0000000..a68ff4c
--- /dev/null
+++ b/externs.h
@@ -0,0 +1,3407 @@
+/*@externs.h:External Declarations:Directories and file conventions@**********/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         externs.h                                                  */
+/*  MODULE:       External Declarations                                      */
+/*                                                                           */
+/*****************************************************************************/
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <stdarg.h>
+#include <locale.h>
+
+#if LOCALE_ON
+#include <nl_types.h>
+extern nl_catd MsgCat;
+#define condcatgets(cat, set, msg, s) catgets(cat, set, msg, s) 
+#else
+#define condcatgets(cat, set, msg, s) s
+#endif
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  Include, font and database directories, and the DEBUG_ON and ASSERT_ON   */
+/*  flags (defined by -D options on the cc command line in the makefile).    */
+/*                                                                           */
+/*  LATIN         Non-zero means compile for ISO-LATIN-1 char set.           */
+/*  LIB_DIR       The system directory where library files are kept          */
+/*  INCL_DIR      The subdirectory of LIB_DIR where @Include files are kept  */
+/*  FONT_DIR      The subdirectory of LIB_DIR where .AFM font files are kept */
+/*  MAPS_DIR      The subdirectory of LIB_DIR where .LCM files are kept      */
+/*  DATA_DIR      The subdirectory of LIB_DIR where database files are kept  */
+/*  HYPH_DIR      The subdirectory of LIB_DIR where hyphenation files kept   */
+/*  LOCALE_DIR    The subdirectory of LIB_DIR where locale files are kept    */
+/*  CHAR_IN       Determines assignment of input chars to lex classes        */
+/*  CHAR_OUT      Determines appearance of literal chars in output           */
+/*  DEBUG_ON      Non-zero means compile debug code (lout -d)                */
+/*  ASSERT_ON     Non-zero means test assertions                             */
+/*  LOCALE_ON     Non-zero means compile setlocale() etc. code               */
+/*                                                                           */
+/*  #define  LIB_DIR    "/usr/local/lib/lout"                                */
+/*  #define  INCL_DIR   "include"                                            */
+/*  #define  FONT_DIR   "font"                                               */
+/*  #define  MAPS_DIR   "maps"                                               */
+/*  #define  DATA_DIR   "data"                                               */
+/*  #define  HYPH_DIR   "hyph"                                               */
+/*  #define  LOCALE_DIR "locale"  (only used if LOCALE_ON)                   */
+/*  #define  CHAR_IN    0                                                    */
+/*  #define  CHAR_OUT   0                                                    */
+/*  #define  DEBUG_ON   0                                                    */
+/*  #define  ASSERT_ON  1                                                    */
+/*  #define  LOCALE_ON  1                                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+
+/*@::File naming conventions and version@*************************************/
+/*                                                                           */
+/*  File naming conventions and version                                      */
+/*                                                                           */
+/*  LOUT_VERSION        Version information                                  */
+/*  CROSS_DB            The default name of the cross reference database     */
+/*  SOURCE_SUFFIX       Optional suffix of source files and include files    */
+/*  INDEX_SUFFIX        The suffix of database index files                   */
+/*  NEW_INDEX_SUFFIX    The suffix of new database index files               */
+/*  DATA_SUFFIX         The suffix of database data files                    */
+/*  NEW_DATA_SUFFIX     The additional suffix of new database data files     */
+/*  HYPH_SUFFIX         The suffix of unpacked hyphenation files             */
+/*  HYPH_PACKED_SUFFIX  The suffix of packed hyphenation files               */
+/*  FILTER_IN           The prefix of the name of the input file to filters  */
+/*  FILTER_OUT          The prefix of the name of the output file to filters */
+/*  FILTER_ERR          The name of the error file to filters                */
+/*                                                                           */
+/*****************************************************************************/
+
+#define	LOUT_VERSION    AsciiToFull("Basser Lout Version 3.17 (September 1999)")
+#define	CROSS_DB	   AsciiToFull("lout")
+#define	SOURCE_SUFFIX	   AsciiToFull(".lt")
+#define	INDEX_SUFFIX	   AsciiToFull(".li")
+#define	NEW_INDEX_SUFFIX   AsciiToFull(".lix")
+#define	DATA_SUFFIX	   AsciiToFull(".ld")
+#define	NEW_DATA_SUFFIX	   AsciiToFull("x")
+#define	HYPH_SUFFIX	   AsciiToFull(".lh")
+#define	HYPH_PACKED_SUFFIX AsciiToFull(".lp")
+#define	FILTER_IN	   AsciiToFull("louti")
+#define	FILTER_OUT	   AsciiToFull("lout")
+#define	FILTER_ERR	   AsciiToFull("lout.err")
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  Operating system dependent things                                        */
+/*                                                                           */
+/*  (1) File read and write modes for binary files, and directory character  */
+/*                                                                           */
+/*  MS-DOS text file line endings differ from Unix line endings.  This is    */
+/*  usually ignorable but causes problems with binary files and files where  */
+/*  you do arithmetic on fseek() values.  In Lout the problematic files are  */
+/*  compressed trie and hyphenation files, and database index files.  So     */
+/*  we must read and write these files in "binary mode" in MS-DOS.  For      */
+/*  completeness we have included synonyms for all file modes used by Lout:  */
+/*                                                                           */
+/*  READ_BINARY       Mode passed to fopen() when reading a "binary file"    */
+/*  WRITE_BINARY      Mode passed to fopen() when writing a "binary file"    */
+/*  READ_TEXT         Mode passed to fopen() when reading a "text file"      */
+/*  APPEND_TEXT       Mode passed to fopen() when appending to "text file"   */
+/*  WRITE_TEXT        Mode passed to fopen() when writing a "text file"      */
+/*  STR_DIR           Directory character used in file path names            */
+/*                                                                           */
+/*  (2) System command and file name for uncompressing EPS files             */
+/*                                                                           */
+/*  UNCOMPRESS_COM    System command for uncompressing compressed EPS file   */
+/*  LOUT_EPS          Name of temporary uncompressed EPS file                */
+/*                                                                           */
+/*  There is one further call to system() in the Lout source code:  the one  */
+/*  that implements filtered parameters such as c2lout.  The strings passed  */
+/*  to this call to system() are the values of @Filter symbols within Lout   */
+/*  definitions.                                                             */
+/*                                                                           */
+/*****************************************************************************/
+
+#if OS_UNIX
+#define	READ_BINARY	"r"
+#define	WRITE_BINARY	"w"
+#define	READ_TEXT	"r"
+#define	APPEND_TEXT	"a"
+#define	WRITE_TEXT	"w"
+#define	STR_DIR		AsciiToFull("/")
+#define	UNCOMPRESS_COM	"gunzip -c %s > %s"
+#define	LOUT_EPS	"lout.eps"
+#else
+#if OS_DOS
+#define	READ_BINARY	"rb"
+#define	WRITE_BINARY	"wb"
+#define	READ_TEXT	"rt"
+#define	APPEND_TEXT	"at"
+#define	WRITE_TEXT	"wt"
+#define	STR_DIR		AsciiToFull("/")
+#define	UNCOMPRESS_COM	"gunzip -c %s > %s"
+#define	LOUT_EPS	"lout.eps"
+#else
+#if OS_MAC
+#define	READ_BINARY	"r"
+#define	WRITE_BINARY	"w"
+#define	READ_TEXT	"r"
+#define	APPEND_TEXT	"a"
+#define	WRITE_TEXT	"w"
+#define	STR_DIR		AsciiToFull(":")
+#define	UNCOMPRESS_COM	"gunzip -c %s > %s"
+#define	LOUT_EPS	"lout.eps"
+#else
+If you're compiling this, you've got the wrong settings in the makefile!
+#endif
+#endif
+#endif
+
+/*@::Significant limits@******************************************************/
+/*                                                                           */
+/*  Significant Limits (other insignificant ones appear in other files)      */
+/*                                                                           */
+/*  MAX_FULL_LENGTH     The maximum value storable in type FULL_LENGTH.      */
+/*                      NB this cannot be 2**31 - 1 because there are        */
+/*                      intermediate results that exceed MAX_FULL_LENGTH     */
+/*                      and are subsequently reduced to MAX_FULL_LENGTH.     */
+/*                      For example, some intermediate results may exceed    */
+/*                      MAX_FULL_LENGTH by a factor of SF, which is defined  */
+/*                      below to be 128 (2**7).  The value given is 2**23-1, */
+/*                      which is about 148 metres in Lout's precision.       */
+/*                                                                           */
+/*  MAX_SHORT_LENGTH    The maximum value storable in type SHORT_LENGTH.     */
+/*                                                                           */
+/*  MAX_FILES           The maximum number of files.  This could only be     */
+/*                      increased if the file_num() field of type FILE_POS   */
+/*                      is enlarged beyond its present 16 bits.              */
+/*                                                                           */
+/*  MAX_LINE            1 + the maximum length of an input line in source    */
+/*                      and database files.  This is used for the lexical    */
+/*                      analyser's input line buffer only, and could be      */
+/*                      increased immediately to 4096, and even further if   */
+/*                      more than the current 12 bits was assigned to the    */
+/*                      col_num() field of type FILE_POS.                    */
+/*                                                                           */
+/*  MAX_WORD            1 + the maximum length of a word storable in an      */
+/*                      object record, which includes all file path names    */
+/*                      too.  It is reasonable to make this MAX_LINE, since  */
+/*                      a word longer than MAX_LINE cannot be read in.       */
+/*                                                                           */
+/*  MAX_OBJECT_REC      1 + the maximum size of an object record, measured   */
+/*                      in ALIGNs.  The value chosen should exceed           */
+/*                      ceiling( (wr + MAX_WORD - 4) / sizeof(ALIGN) )       */
+/*                      where wr = sizeof(struct word_rec), so that words of */
+/*                      length MAX_WORD-1 can be stored in an object record. */
+/*                                                                           */
+/*  MAX_BUFF            1 + the maximum length of a "standard buffer"; these */
+/*                      buffers are used in a variety of places throughout   */
+/*                      the program for holding one line of a font file,     */
+/*                      one file path name, one symbol full name, etc.  This */
+/*                      may be increased immediately without limit.          */
+/*                                                                           */
+/*  MAX_FONT            The maximum number of sized fonts allowed.  This     */
+/*                      can be increased beyond 4096 only by setting aside   */
+/*                      a larger word_font() field.                          */
+/*                                                                           */
+/*  MAX_COLOUR          The maximum number of distinct left parameters of    */
+/*                      @SetColour and @SetColor symbols allowed (after      */
+/*                      evaluation).  This can be increased beyond 4096      */
+/*                      only by setting aside a larger word_colour() field.  */
+/*                                                                           */
+/*  MAX_LANGUAGE        The maximum number of distinct languages allowed.    */
+/*                      This can be increased beyond 256 only by setting     */
+/*                      aside a larger word_language() field.                */
+/*                                                                           */
+/*  MAX_LEX_STACK       The maximum depth of @Includes and @Databases.  This */
+/*                      can be increased immediately by any small amount.    */
+/*                                                                           */
+/*  MAX_CHARS		The maximimum number of characters in a font.  This  */
+/*                      cannot be increased easily.                          */
+/*                                                                           */
+/*****************************************************************************/
+
+#define	MAX_FULL_LENGTH	8388607	/* 2**23 - 1, about 148 metres */
+#define	MAX_SHORT_LENGTH 32767
+#define	MAX_FILES	65535
+#define MAX_LINE        2048
+#define MAX_WORD        2048
+#define	MAX_OBJECT_REC	ceiling(sizeof(struct word_type)+MAX_WORD,sizeof(ALIGN))
+#define MAX_BUFF        512
+#define MAX_FONT	4096
+#define MAX_COLOUR	4096
+#define	MAX_LANGUAGE	64
+#define	MAX_LEX_STACK	10
+#define	MAX_CHARS	256
+
+/*****************************************************************************/
+/*                                                                           */
+/*  Miscellaneous Macros                                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+#define	BOOLEAN		unsigned
+#define	FALSE		0
+#define	TRUE		1
+#define	bool(x)		(x ? AsciiToFull("TRUE") : AsciiToFull("FALSE") )
+#define	CHILD		0
+#define	PARENT		1
+#define	COLM		0
+#define	ROWM		1
+#define	dimen(x)	(x == COLM ? AsciiToFull("COLM") : AsciiToFull("ROWM") )
+#define	nilobj		( (OBJECT) NULL )
+#define	null		( (FILE *) NULL )
+
+#define find_max(a, b)	((a) < (b) ? (b) : (a))
+#define find_min(a, b)	((a) < (b) ? (a) : (b))
+#define	ceiling(a, b)	( ((a) - 1)/(b) + 1 )	/* ceiling(a/b)              */
+#define is_odd(x)	( (x) & 1 )		/* TRUE if x is odd number   */
+
+/*@::ALIGN, FULL_LENGTH, FONT_NUM, COLOUR_NUM, LANGUAGE_NUM, FULL_CHAR@*******/
+/*                                                                           */
+/*  typedef ALIGN - used for forcing record alignment.                       */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef char *ALIGN;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  typedef FULL_LENGTH - an integer physical distance.                      */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef int FULL_LENGTH;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  typedef SHORT_LENGTH - an short integer physical distance.               */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef short int SHORT_LENGTH;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FONT_NUM - internal name for a font.                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef unsigned FONT_NUM;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  COLOUR_NUM - internal name for a colour.                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef unsigned COLOUR_NUM;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  LANGUAGE_NUM - internal name for a language.                             */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef unsigned LANGUAGE_NUM;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  MAPPING - internal name for a character mapping vector.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef unsigned MAPPING;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  LINE - a line from a database index file.                                */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef char *LINE;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  typedef FULL_CHAR - one of the characters manipulated by Lout.           */
+/*                                                                           */
+/*  This program does not deal with 7-bit ASCII characters.  Instead, its    */
+/*  characters are defined by the FULL_CHAR typedef, and could be anything   */
+/*  from 7-bit ASCII to 8-bit ISO-LATIN-1 to 16-bit UNICODE and beyond.      */
+/*                                                                           */
+/*  Unfortunately C favours signed 8-bit characters: literal strings are     */
+/*  pointers to them, argv[] and the standard libraries assume them.  We get */
+/*  around these problems by using our own library, including AsciiToFull()  */
+/*  to convert an ASCII string (such as a C string) into a FULL_CHAR string. */
+/*                                                                           */
+/*  Formally this library appears in module z39.c; however since this        */
+/*  implementation uses 8-bit unsigned characters, most of the routines      */
+/*  can be implemented by macros containing type-cast calls to C standard    */
+/*  library routines.  These appear in the z39.c externs list below.         */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef unsigned char FULL_CHAR;
+
+/*****************************************************************************/
+/*                                                                           */
+/*  typedef POINTER- name for type of generic pointer                        */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef void *POINTER;
+
+
+/*@::Character literals@******************************************************/
+/*                                                                           */
+/*  Character Literals                                                       */
+/*                                                                           */
+/*  The following macros ensure that no Lout source is ever compared to a    */
+/*  literal character other than '\0':                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+#define	CH_FLAG_ALTERR		'a'	/* the -a command line flag          */
+#define	CH_FLAG_CROSS		'c'	/* the -c command line flag          */
+#define	CH_FLAG_ENCPATH		'C'	/* the -C command line flag          */
+#define	CH_FLAG_DEBUG		'd'	/* the -d command line flag          */
+#define	CH_FLAG_DIRPATH		'D'	/* the -D command line flag          */
+#define	CH_FLAG_ERRFILE		'e'	/* the -e command line flag          */
+#define	CH_FLAG_EPSFIRST	'E'	/* first letter of the -EPS flag     */
+#define	CH_FLAG_FNTPATH		'F'	/* the -F command line flag          */
+#define	CH_FLAG_HYPHEN		'h'	/* the -h command line flag          */
+#define	CH_FLAG_HYPPATH		'H'	/* the -H command line flag          */
+#define	CH_FLAG_INCLUDE		'i'	/* the -i command line flag          */
+#define	CH_FLAG_INCPATH		'I'	/* the -I command line flag          */
+#define	CH_FLAG_NOKERN		'k'	/* the -k command line flag          */
+#define CH_FLAG_NOCOLLATE       'l'     /* the -l command line flag          */
+#define CH_FLAG_COLLATE         'L'     /* the -L command line flag          */
+#define CH_FLAG_MEMCHECK        'm'     /* the -m command line flag          */
+#define	CH_FLAG_MEMCR		'M'	/* the -M command line flag	     */
+#define	CH_FLAG_OUTFILE		'o'	/* the -o command line flag          */
+#define	CH_FLAG_PLAIN		'p'	/* the -p command line flag          */
+#define	CH_FLAG_FFPLAIN		'P'	/* the -P command line flag          */
+#define	CH_FLAG_SUPPRESS	's'	/* the -s command line flag          */
+#define	CH_FLAG_SAFE		'S'	/* the -S command line flag          */
+#define	CH_FLAG_USAGE		'u'	/* the -u command line flag          */
+#define	CH_FLAG_UNSAFE		'U'	/* the -U command line flag          */
+#define	CH_FLAG_VERSION		'V'	/* the -V command line flag          */
+#define	CH_FLAG_INITALL		'x'	/* the -x command line flag          */
+#define	CH_FLAG_OPTION		'-'	/* the -- command line flag          */
+#define	CH_FLAG_WORDS		'w'	/* the -w command line flag          */
+#define	CH_FLAG_PDF		'Z'	/* the -Z command line flag	     */
+
+#define	CH_SPACE		' '	/* space character                   */
+#define	CH_NEWLINE		'\n'	/* the newline character             */
+#define	CH_SYMSTART		'@'	/* extra letter symbols may have     */
+#define	CH_UNDERSCORE		'_'	/* extra letter symbols may have     */
+#define	CH_QUOTE		'"'	/* the quote character		     */
+#define	CH_ZERO			'0'	/* the first digit character, zero   */
+#define	CH_EIGHT		'8'	/* the last even digit character     */
+#define	CH_NINE			'9'	/* the last odd digit character      */
+#define	CH_INCGAP		'+'	/* begins an incrementing gap	     */
+#define	CH_DECGAP		'-'	/* begins a decrementing gap	     */
+#define	CH_MINUS		'-'	/* minus sign                        */
+#define	CH_HYPHEN		'-'	/* the hyphen character		     */
+#define	CH_NOBREAK		'u'	/* `unbreakable' character for gaps  */
+
+#define	CH_UNIT_CM		'c'	/* unit of measurement: centimetres  */
+#define	CH_UNIT_IN		'i'	/* unit of measurement: inches       */
+#define	CH_UNIT_PT		'p'	/* unit of measurement: points       */
+#define	CH_UNIT_EM		'm'	/* unit of measurement: ems          */
+#define	CH_UNIT_FT		'f'	/* unit of measurement: fontsizes    */
+#define	CH_UNIT_SP		's'	/* unit of measurement: spacewidths  */
+#define	CH_UNIT_VS		'v'	/* unit of measurement: vspaces      */
+#define	CH_UNIT_WD		'w'	/* unit of measurement: follwidths   */
+#define	CH_UNIT_BD		'b'	/* unit of measurement: boundwidths  */
+#define	CH_UNIT_RL		'r'	/* unit of measurement: relwidths    */
+#define	CH_UNIT_DG		'd'	/* unit of measurement: degrees      */
+#define	CH_UNIT_YU		'y'	/* unit of measurement: y unit       */
+#define	CH_UNIT_ZU		'z'	/* unit of measurement: z unit       */
+
+#define	CH_MODE_EDGE		'e'	/* spacing mode: edge-to-edge        */
+#define	CH_MODE_HYPH		'h'	/* spacing mode: hyphenation         */
+#define	CH_MODE_MARK		'x'	/* spacing mode: mark-to-mark        */
+#define	CH_MODE_OVER		'o'	/* spacing mode: overstrike          */
+#define	CH_MODE_KERN		'k'	/* spacing mode: kerning             */
+#define	CH_MODE_TABL		't'	/* spacing mode: tabulation          */
+
+#define octaldigit(ch)		( (ch) >= '0' && (ch) <= '7' )
+#define decimaldigit(ch)	( (ch) >= '0' && (ch) <= '9' )
+#define	digitchartonum(ch)	( (ch) - '0' )
+#define	numtodigitchar(ch)	( (ch) + '0' )
+#define	beginsbreakstyle(ch)	( (ch) >= 'a' && (ch) <= 'z' )
+#define	numericchar(ch)		( decimaldigit(ch) || (ch) == '.' )
+
+
+/*@::String literals, FULL_CHAR type@*****************************************/
+/*                                                                           */
+/*  String Literals.                                                         */
+/*                                                                           */
+/*  All significant string literals are defined here.  The program has many  */
+/*  others, however: format strings, debug output, etc.                      */
+/*                                                                           */
+/*****************************************************************************/
+
+#define	STR_EMPTY		AsciiToFull("")
+#define	STR_QUOTE		AsciiToFull("\"")
+#define	STR_ESCAPE		AsciiToFull("\\")
+#define	STR_COMMENT		AsciiToFull("#")
+#define	STR_SPACE		AsciiToFull(" ")
+#define	STR_FORMFEED		AsciiToFull("\f")
+#define	STR_TAB			AsciiToFull("\t")
+#define	STR_NEWLINE		AsciiToFull("\n")
+#define	STR_LETTERS_LOWER	AsciiToFull("abcdefghijklmnopqrstuvwxyz")
+#define	STR_LETTERS_UPPER	AsciiToFull("ABCDEFGHIJKLMNOPQRSTUVWXYZ")
+#define	STR_LETTERS_SYMSTART	AsciiToFull("@")
+#define	STR_LETTERS_UNDERSCORE	AsciiToFull("_")
+
+#if CHAR_IN==0
+#define	STR_LETTERS_EXTRA0	AsciiToFull("")
+#define	STR_LETTERS_EXTRA1	AsciiToFull("")
+#define	STR_LETTERS_EXTRA2	AsciiToFull("")
+#define	STR_LETTERS_EXTRA3	AsciiToFull("")
+#define	STR_LETTERS_EXTRA4	AsciiToFull("")
+#define	STR_LETTERS_EXTRA5	AsciiToFull("")
+#define	STR_LETTERS_EXTRA6	AsciiToFull("")
+#define	STR_LETTERS_EXTRA7	AsciiToFull("")
+#else
+#define	STR_LETTERS_EXTRA0	AsciiToFull("\300\301\302\303\304\305\306\307")
+#define	STR_LETTERS_EXTRA1	AsciiToFull("\310\311\312\313\314\315\316\317")
+#define	STR_LETTERS_EXTRA2	AsciiToFull("\320\321\322\323\324\325\326")
+#define	STR_LETTERS_EXTRA3	AsciiToFull("\330\331\332\333\334\335\336\337")
+#define	STR_LETTERS_EXTRA4	AsciiToFull("\340\341\342\343\344\345\346\347")
+#define	STR_LETTERS_EXTRA5	AsciiToFull("\350\351\352\353\354\355\356\357")
+#define	STR_LETTERS_EXTRA6	AsciiToFull("\360\361\362\363\364\365\366")
+#define	STR_LETTERS_EXTRA7	AsciiToFull("\370\371\372\373\374\375\376\377")
+#endif
+
+#define	STR_STDIN		AsciiToFull("-")
+#define	STR_STDOUT		AsciiToFull("-")
+#define	STR_HYPHEN		AsciiToFull("-")
+#define	STR_EPS			AsciiToFull("EPS")
+#define	STR_POSTSCRIPT		AsciiToFull("PostScript")
+#define	STR_PLAINTEXT		AsciiToFull("PlainText")
+#define	STR_PDF			AsciiToFull("PDF")
+#define	STR_ELSE		AsciiToFull("else")
+#define	STR_NOCROSS		AsciiToFull("??")
+#define	STR_BADKEY		AsciiToFull("badkey")
+#define	STR_NONE		AsciiToFull("none")
+#define	STR_NOCHAR		AsciiToFull("-none-")
+#define	STR_ZERO		AsciiToFull("0")
+#define	STR_PS_SPACENAME	AsciiToFull("space")
+#define	STR_FONT_RECODE		AsciiToFull("Recode")
+#define	STR_FONT_NORECODE	AsciiToFull("NoRecode")
+#define	STR_COLOUR_NOCHANGE	AsciiToFull("nochange")
+
+#define	STR_BREAK_HYPHEN	AsciiToFull("hyphen")
+#define	STR_BREAK_NOHYPHEN	AsciiToFull("nohyphen")
+#define	STR_BREAK_ADJUST	AsciiToFull("adjust")
+#define	STR_BREAK_OUTDENT	AsciiToFull("outdent")
+#define	STR_BREAK_RAGGED	AsciiToFull("ragged")
+#define	STR_BREAK_CRAGGED	AsciiToFull("cragged")
+#define	STR_BREAK_RRAGGED	AsciiToFull("rragged")
+#define	STR_BREAK_ORAGGED	AsciiToFull("oragged")
+#define	STR_BREAK_LINES		AsciiToFull("lines")
+#define	STR_BREAK_CLINES	AsciiToFull("clines")
+#define	STR_BREAK_RLINES	AsciiToFull("rlines")
+#define	STR_BREAK_NOFIRST	AsciiToFull("unbreakablefirst")
+#define	STR_BREAK_FIRST		AsciiToFull("breakablefirst")
+#define	STR_BREAK_NOLAST	AsciiToFull("unbreakablelast")
+#define	STR_BREAK_LAST		AsciiToFull("breakablelast")
+
+#define STR_SPACE_LOUT		AsciiToFull("lout")
+#define STR_SPACE_COMPRESS	AsciiToFull("compress")
+#define STR_SPACE_SEPARATE	AsciiToFull("separate")
+#define STR_SPACE_TROFF		AsciiToFull("troff")
+#define STR_SPACE_TEX		AsciiToFull("tex")
+
+#define	STR_SMALL_CAPS_ON	AsciiToFull("smallcaps")
+#define	STR_SMALL_CAPS_OFF	AsciiToFull("nosmallcaps")
+
+#define	STR_GAP_RJUSTIFY	AsciiToFull("1rt")
+#define	STR_GAP_ZERO_HYPH	AsciiToFull("0ch")
+
+
+/*@::GAP, STYLE@**************************************************************/
+/*                                                                           */
+/*  typedef GAP - what separates one object from another.                    */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef struct
+{ unsigned	ospare	 : 7;		/* left for other things in STYLE    */
+  BOOLEAN	onobreak : 1;		/* TRUE if this gap is unbreakable   */
+  BOOLEAN	omark	 : 1;		/* TRUE if this gap is marked        */
+  BOOLEAN	ojoin	 : 1;		/* TRUE if joins exist across gap    */
+  unsigned	ounits	 : 3;		/* units of measurement: fixed, etc  */
+  unsigned	omode	 : 3;		/* spacing mode: edge-to-edge, etc   */
+  SHORT_LENGTH	owidth;			/* width of the gap                  */
+} GAP;
+
+#define	nobreak(x)	(x).onobreak
+#define	mark(x)		(x).omark
+#define	join(x)		(x).ojoin
+#define	units(x)	(x).ounits
+#define	mode(x)		(x).omode
+#define	width(x)	(x).owidth
+
+#define SetGap(x, xnobreak, xmark, xjoin, xunits, xmode, xwidth)	\
+( nobreak(x) = xnobreak, mark(x) = xmark, join(x) = xjoin,		\
+  units(x) = xunits, mode(x) = xmode, width(x) = xwidth			\
+)
+
+#define GapCopy(x, y)							\
+( nobreak(x) = nobreak(y), mark(x) = mark(y), join(x) = join(y),	\
+  units(x) = units(y), mode(x) = mode(y), width(x) = width(y)		\
+)
+
+#define ClearGap(x)	SetGap(x, FALSE, FALSE, TRUE, FIXED_UNIT, NO_MODE, 0)
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  typedef STYLE - information about how to break text, etc.                */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef struct
+{ union {
+    GAP		oline_gap;		/* separation between lines          */
+    struct {
+      BOOLEAN	ovadjust	: 1;	/* @VAdjust in effect                */
+      BOOLEAN	ohadjust	: 1;	/* @HAdjust in effect                */
+      BOOLEAN	opadjust	: 1;	/* @PAdjust in effect                */
+      unsigned	osmall_caps	: 1;	/* small capitals                    */
+      unsigned  ospace_style	: 3;	/* space style: lout, troff, tex, .. */
+    } oss1;
+  } osu1;
+  union {
+    GAP		ospace_gap;		/* separation induced by white space */
+    struct {
+      unsigned	ohyph_style	: 2;	/* hyphenation off or on             */
+      unsigned	ofill_style	: 2;	/* fill lines with text off/on       */
+      unsigned	odisplay_style	: 3;	/* display lines adjusted, ragged... */
+    } oss2;
+  } osu2;
+  SHORT_LENGTH	oyunit;			/* value of y unit of measurement    */
+  SHORT_LENGTH	ozunit;			/* value of z unit of measurement    */
+  FONT_NUM	ofont		: 12;	/* current font                      */
+  COLOUR_NUM	ocolour		: 12;	/* current colour		     */
+  LANGUAGE_NUM	olanguage	: 6;	/* current language		     */
+  BOOLEAN	onobreakfirst	: 1;	/* no break after first line of para */
+  BOOLEAN	onobreaklast	: 1;	/* no break after last line of para  */
+} STYLE;
+
+#define	line_gap(x)	(x).osu1.oline_gap
+#define	vadjust(x)	(x).osu1.oss1.ovadjust
+#define	hadjust(x)	(x).osu1.oss1.ohadjust
+#define	padjust(x)	(x).osu1.oss1.opadjust
+#define	small_caps(x)	(x).osu1.oss1.osmall_caps
+#define	space_style(x)	(x).osu1.oss1.ospace_style
+#define	space_gap(x)	(x).osu2.ospace_gap
+#define	hyph_style(x)	(x).osu2.oss2.ohyph_style
+#define	fill_style(x)	(x).osu2.oss2.ofill_style
+#define	display_style(x)(x).osu2.oss2.odisplay_style
+#define	font(x)		(x).ofont
+#define	colour(x)	(x).ocolour
+#define	language(x)	(x).olanguage
+#define	nobreakfirst(x)	(x).onobreaklast
+#define	nobreaklast(x)	(x).onobreakfirst
+#define	yunit(x)	(x).oyunit
+#define	zunit(x)	(x).ozunit
+
+#define StyleCopy(x, y)							\
+( GapCopy(line_gap(x), line_gap(y)),					\
+  hyph_style(x) = hyph_style(y),					\
+  fill_style(x) = fill_style(y),					\
+  display_style(x) = display_style(y),					\
+  small_caps(x) = small_caps(y),					\
+  GapCopy(space_gap(x), space_gap(y)),					\
+  font(x) = font(y),							\
+  colour(x) = colour(y),						\
+  language(x) = language(y), 						\
+  nobreakfirst(x) = nobreakfirst(y),					\
+  nobreaklast(x) = nobreaklast(y),					\
+  vadjust(x) = vadjust(y), 						\
+  hadjust(x) = hadjust(y), 						\
+  padjust(x) = padjust(y), 						\
+  space_style(x) = space_style(y),					\
+  yunit(x) = yunit(y),							\
+  zunit(x) = zunit(y)							\
+)
+
+
+/*@::CONSTRAINT, FILE_NUM, FILE_POS, LIST@************************************/
+/*                                                                           */
+/*  typedef CONSTRAINT - a size constraint.                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef struct
+{ FULL_LENGTH  obc;
+  FULL_LENGTH  obfc;
+  FULL_LENGTH  ofc;
+  FULL_LENGTH  osparec;
+} CONSTRAINT;
+
+#define	bc(x)		(x).obc
+#define	bfc(x)		(x).obfc
+#define	fc(x)		(x).ofc
+#define	sparec(x)	(x).osparec
+#define	constrained(x)	(bc(x) != MAX_FULL_LENGTH ||			\
+			 bfc(x) != MAX_FULL_LENGTH || fc(x) != MAX_FULL_LENGTH)
+
+#define	SetConstraint(c,x,y,z)	(bc(c) = (x),   bfc(c) = (y),    fc(c) = (z))
+#define	CopyConstraint(x, y)	(bc(x) = bc(y), bfc(x) = bfc(y), fc(x) = fc(y))
+#define FitsConstraint(b, f, c)	(b <= bc(c)  && b + f <= bfc(c) && f <= fc(c))
+
+#define	ig_fnum(x)	bc(constraint(x))
+#define	ig_xtrans(x)	bfc(constraint(x))
+#define	ig_ytrans(x)	fc(constraint(x))
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  typedef FILE_NUM - the internal representation of a file.                */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef unsigned short	FILE_NUM;
+#define	NO_FILE		0
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  typedef FILE_POS - a position in the set of input files.                 */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef	struct
+{ unsigned char	 otype;			/* space for object type field	     */
+  unsigned char	 orec_size;		/* space for object record size      */
+  FILE_NUM	 ofile_num;		/* no. of file this record is from   */
+  unsigned       oline_num  : 20;	/* the line number of this record    */
+  unsigned       ocol_num   : 12;	/* column number this is related to  */
+} FILE_POS;
+
+#define	file_num(x)	(x).ofile_num
+#define	col_num(x)	(x).ocol_num
+#define	line_num(x)	(x).oline_num
+
+#define FposCopy(x, y)							\
+( file_num(x) = file_num(y),						\
+  line_num(x) = line_num(y),						\
+  col_num(x)  = col_num(y)						\
+)
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  typedef LIST - two pointers used to make one doubly linked list          */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef struct { union rec *opred, *osucc; } LIST;
+
+
+/*@::FIRST_UNION@*************************************************************/
+/*                                                                           */
+/*  typedef FIRST_UNION - first eight bytes of object record (after LISTs).  */
+/*                                                                           */
+/*  The fpos is overwritten in WORDs and QWORDs during FixAndPrintObject by  */
+/*  the horizontal coordinate of the word, which has to be remembered.       */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef union
+{
+  FILE_POS	ofpos;
+  struct
+  {	unsigned char	otype, orec_size;
+	int		oword_save_mark;
+  } os11;
+
+} FIRST_UNION;
+
+
+/*@::SECOND_UNION, THIRD_UNION, FOURTH_UNION@*********************************/
+/*                                                                           */
+/*  typedef SECOND_UNION - four bytes holding various flags etc.             */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef union
+{
+  struct /* used by all tokens */
+  {	unsigned char	oprecedence;
+	unsigned char	ohspace, ovspace;
+  } os21;
+
+  struct /* used by WORD objects only, except underline used by all */
+	 /* objects, including GAP_OBJ                                  */
+  {	FONT_NUM	oword_font     : 12;
+	COLOUR_NUM	oword_colour   : 11;
+	LANGUAGE_NUM	oword_language : 6;
+	unsigned	ounderline     : 2;
+	unsigned	oword_hyph     : 1;
+  } os22;
+
+  struct /* used by non-WORD objects */
+  {	unsigned char	ofoll_or_prec;
+	unsigned char	ocross_type;	     /* CROSS objects only */
+	BOOLEAN		onon_blocking: 1;
+	BOOLEAN		osized       : 1;
+	BOOLEAN		othreaded    : 1;
+	BOOLEAN		oexternal_hor: 1;
+	BOOLEAN		oexternal_ver: 1;
+	BOOLEAN		oblocked     : 1;
+	BOOLEAN		otrigger_ext : 1;
+	BOOLEAN	        omust_expand : 1;
+	BOOLEAN		ogall_dir    : 1;
+	BOOLEAN		oopt_hyph    : 1;
+	BOOLEAN		oopt_gazumped: 1;
+	BOOLEAN		oadjust_cat  : 1;
+	BOOLEAN		oforce_gall  : 1;
+	unsigned	ounderline   : 2;
+	/* don't forget ounderline from os22 applies in this union! */
+  } os23;
+
+  struct /* used by WORD and QWORD when they are database nodes */
+  {	unsigned short	oleft_pos;
+	unsigned char	oreading;
+	unsigned char	oin_memory;
+  } os24;
+
+  struct /* used by WORD and QWORD when they are font records */
+  {	FONT_NUM	ofont_num : 12;
+	unsigned short	ofont_page;
+  } os25;
+
+  struct /* used by symbol table entries */
+  {	unsigned char	oprecedence;
+	BOOLEAN		ois_tag		     : 1;
+	BOOLEAN		ohas_tag             : 1;
+	BOOLEAN		ohas_lpar            : 1;
+	BOOLEAN		ohas_rpar            : 1;
+	BOOLEAN		oright_assoc         : 1;
+	BOOLEAN		ois_target           : 1;
+	BOOLEAN		ohas_target          : 1;
+	BOOLEAN		oforce_target	     : 1;
+	BOOLEAN		ohas_body            : 1;
+	BOOLEAN		oindefinite          : 1;
+	BOOLEAN		orecursive           : 1;
+	BOOLEAN		ouses_extern_target  : 1;
+	BOOLEAN		ois_extern_target    : 1;
+	BOOLEAN		ois_key		     : 1;
+	BOOLEAN		ohas_key	     : 1;
+	BOOLEAN		odirty               : 1;
+	BOOLEAN		ovisible	     : 1;
+	BOOLEAN		ohas_mark	     : 1;
+	BOOLEAN		ohas_join	     : 1;
+	BOOLEAN		ohas_par             : 1;
+	BOOLEAN		ouses_galley	     : 1;
+	BOOLEAN		ohoriz_galley	     : 1;
+	BOOLEAN		oimports_encl	     : 1;
+  } os26;
+
+} SECOND_UNION;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  typedef THIRD_UNION - eight bytes usually holding an object size.        */
+/*                                                                           */
+/*  In database records this space is used for a file pointer, or a pointer  */
+/*  to a LINE array if the database is in-memory; in certain                 */
+/*  WORD objects used privately in z10.c it is used for a galley-position.   */
+/*  In font records it holds the font size, space width, etc.  In filter     */
+/*  words it holds a pointer to the symbol being filtered.                   */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef union
+{
+  struct
+  {	FULL_LENGTH	oback[2];
+	FULL_LENGTH	ofwd[2];
+  } os31;
+
+  FILE *odb_filep;
+  LINE *odb_lines;
+
+  struct
+  {	FULL_LENGTH	ofont_size;
+	FULL_LENGTH	ofont_xheight2;
+	FULL_LENGTH	ofont_spacewidth;
+	MAPPING		ofont_mapping	: 7;
+	BOOLEAN		ofont_recoded	: 1;
+	BOOLEAN		ofont_firstpage	: 1;
+  } os32;
+
+  struct
+  {	unsigned char	ocs_type;
+	FILE_NUM	ocs_fnum;
+	int		ocs_pos;
+	int		ocs_lnum;
+  } os33;
+
+  union rec *ofilter_actual;
+
+} THIRD_UNION;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  typedef FOURTH_UNION - twelve bytes holding a STYLE or CONSTRAINT.       */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef union
+{
+  STYLE		osave_style;
+  CONSTRAINT	oconstraint;
+
+} FOURTH_UNION;
+
+
+/*@::OBJECT@******************************************************************/
+/*                                                                           */
+/*  typedef OBJECT - the general-purpose record used throughout Lout.        */
+/*                                                                           */
+/*  This record is a complex union type.  Which fields are defined in any    */
+/*  given record depends on its type() tag field, as follows.  But first     */
+/*  we define some collections of fields that are commonly defined together. */
+/*                                                                           */
+/*  ALL - these fields are defined in all objects.  They won't be mentioned  */
+/*        again, but they are always there.                                  */
+/*                                                                           */
+/*      type            Tag field for the record                             */
+/*      rec_size        Size of this record, in words (for memory allocator) */
+/*      succ            Next element on list of parents, children            */
+/*      pred            Previous element on list of parents, children        */
+/*      fpos            Position in input file which gave rise to this       */
+/*                      object (could be null; overwritten by word_save_mark */
+/*                      locally in FixAndPrintOjbect).  It sub-fields are:   */
+/*                                                                           */
+/*                          file_num   internal file number                  */
+/*                          line_num   line number in that file              */
+/*                          col_num    column number on that line            */
+/*                                                                           */
+/*                      Lout attempts to put a meaningful fpos into every    */
+/*                      object, so that error messages related to that       */
+/*                      object can have meaningful line numbers.  This has   */
+/*                      not been done in every case; it ought to be.         */
+/*                                                                           */
+/*  TOKEN - these fields are defined for all objects that are input tokens,  */
+/*          They may be overwritten after parsing is completed.              */
+/*                                                                           */
+/*      precedence      Precedence of this token (0 if has no parameters)    */
+/*      hspace          Horizontal space preceding this token                */
+/*      vspace          Vertical space preceding this token                  */
+/*                                                                           */
+/*  SIZED - these fields are defined for all objects that represent Lout     */
+/*          objects and hence have a horizontal and vertical size.  They     */
+/*          will be undefined until after MinSize() is called on the object, */
+/*          and defined thereafter.                                          */
+/*                                                                           */
+/*      back[COLM]      Horizontal size to left of object's mark             */
+/*      fwd[COLM]       Horizontal size to right of object's mark            */
+/*      back[ROWM]      Vertical size above object's mark                    */
+/*      fwd[ROWM]       Vertical size below object's mark                    */
+/*                                                                           */
+/*  GAP - a gap between two Lout objects.                                    */
+/*                                                                           */
+/*      nobreak         TRUE if gap is unbreakable (has u tag)               */
+/*      mark            TRUE if gap is marked (has ^ tag)                    */
+/*      join            TRUE if a mark-joining gap (e.g. | not ||)           */
+/*      units           units of measurement (fixed, or r or d etc)          */
+/*      mode            gap mode (mark-to-mark, etc.)                        */
+/*      width           width of gap in the given units                      */
+/*                                                                           */
+/*  STYLE - the style (attributes affecting the appearance) of an object.    */
+/*                                                                           */
+/*      line_gap        How much to separate lines by                        */
+/*      vadjust         TRUE when @VAdjust is in effect                      */
+/*      hadjust         TRUE when @HAdjust is in effect                      */
+/*      padjust         TRUE when @PAdjust is in effect                      */
+/*      small_caps      TRUE when small capitals wanted                      */
+/*      space_style     Spacing style (lout, troff etc. from @Space)         */
+/*      space_gap       Object separation given a white space, i.e. "1s"     */
+/*      hyph_style      Hyphenation (undefined, off, on)                     */
+/*      fill_style      Fill lines (undefined, off, on)                      */
+/*      display_style   Display style for lines (adjust, centre, etc.)       */
+/*      yunit           Value of y unit of measurement                       */
+/*      zunit           Value of z unit of measurement                       */
+/*      font            Which internal font (including size) to use          */
+/*      colour          Which internal colour to use                         */
+/*      language        Which internal language to use                       */
+/*      nobreakfirst    TRUE if break not allowed after first line of para   */
+/*      nobreaklastt    TRUE if break not allowed before last line of para   */
+/*                                                                           */
+/*  CONSTRAINT - a constraint on how large some object is allowed to be,     */
+/*               either horizontally or vertically                           */
+/*                                                                           */
+/*      bc              how large back may be (MAX_FULL_LEN if infinite)     */
+/*      fc              how large fwd may be (MAX_FULL_LEN if infinite)      */
+/*      bfc             how large back + fwd may be (MAX_FULL_LEN if inf.)   */
+/*                                                                           */
+/*                                                                           */
+/*  Here now is the list of all object types, what they represent, and       */
+/*  what fields they contain.  The list also indicates what children each    */
+/*  object of the given type can expect to have.                             */
+/*                                                                           */
+/*  LINK - one link in the directed acyclic graph which is Lout's universal  */
+/*         internal data structure.  All the other types below are various   */
+/*         types of nodes.  Has ALL only (and no fpos) except see CROSS_SYM  */
+/*                                                                           */
+/*  GAP_OBJ - a gap between two Lout objects                                 */
+/*                                                                           */
+/*      gap             The gap itself (type GAP)                            */
+/*      underline       TRUE if continuous underlining crosses this gap      */
+/*      save_*          These fields used by optimum paragraph breaker only  */
+/*      first child     If the gap is not just white space, the gap object   */
+/*                                                                           */
+/*  CLOSURE - an invocation of a user-defined symbol, not yet expanded       */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           After sizing if indefinite (the sizes will be zero)  */
+/*      save_style      Style to print this invocation in when expanded      */
+/*      actual          The symbol table record defining this symbol         */
+/*      threaded        TRUE if symbol lies on a vertical thread             */
+/*      external_ver    TRUE if symbol is external in a vertical galley      */
+/*      external_hor    TRUE if symbol is external in a horizontal galley    */
+/*      children        PAR objects whose children are the actual parameters */
+/*                                                                           */
+/*  UNDER_REC - a temporary object inserted by FixAndPrintObject to help     */
+/*              with working out continuous underlining                      */
+/*                                                                           */
+/*      back(COLM)      Horizontal position of start of underline            */
+/*      fwd(COLM)       Horizontal position of end of underline              */
+/*      back(ROWM)      [type clash] font determining underline appearance   */
+/*                                                                           */
+/*  PAGE_LABEL - a @PageLabel object                                         */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           Indefinite, so all sizes will be zero                */
+/*      first child     The parameter of the @PageLabel object               */
+/*                                                                           */
+/*  NULL_CLOS - a @Null object                                               */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           Indefinite, so all sizes will be zero                */
+/*                                                                           */
+/*  CROSS, FORCE_CROSS - a cross reference (or forcing cross reference) obj  */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           Indefinite, so all sizes will be zero                */
+/*      cross_type      Type of cross reference (preceding, following, etc.) */
+/*      children        The two parameters of the cross reference            */
+/*                                                                           */
+/*  HEAD - the header record for a galley invocation                         */
+/*                                                                           */
+/*      force_gall      TRUE if this is a forcing galley (i.e. "force into") */
+/*      actual          The symbol table record defining this galley         */
+/*      enclose_obj     If galley has @Enclose, the enclose object           */
+/*      limiter         Helps decide whether to break off or scale if stuck  */
+/*      opt_components  If optimizing, the sequence of components            */
+/*      opt_constraints If optimizing, the sequence of size constraints      */
+/*      opt_counts      If optimizing, the sequence of numbers of components */
+/*                      In each child of opt_counts, comp_count has the num  */
+/*      opt_comps_permitted number of components left before opt break       */
+/*      opt_hyph        If optimizing, whether to hyphenate the galley       */
+/*      opt_gazumped    If optimizing, galley has been gazumped recently     */
+/*      gall_dir        Promotion direction (COLM for horizontal galleys)    */
+/*      ready_galls     Galleys read in from cross reference database        */
+/*      must_expand     TRUE if must expand galley object even if indefinite */
+/*      sized           TRUE after galley object has been sized              */
+/*      foll_or_prec    Direction of search for target (forward, back, etc.) */
+/*      whereto         Symbol this galley is targeted at                    */
+/*      seen_nojoin     TRUE if // op found within galley anywhere           */
+/*                                                                           */
+/*  SPLIT - a split object, used for building tables                         */
+/*                                                                           */
+/*      SIZED           The size of the whole object                         */
+/*      first child     An object whose horizontal size is the overall size  */
+/*      second child    An object whose vertical size is the overall size    */
+/*                                                                           */
+/*  PAR - actual parameter of a symbol invocation (always child of CLOSURE)  */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      actual          The symbol table record defining this parameter      */
+/*      first child     A Lout object, the value of this parameter           */
+/*                                                                           */
+/*  WORD, QWORD - a literal word, or a literal word entered in quotes ""     */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           The size of the word                                 */
+/*      word_font       Font to print this word in (from style)              */
+/*      word_colour     Colour to print this word in (from style)            */
+/*      word_language   Language (for hyphenation) of this word (from style) */
+/*      underline       TRUE if continuous underlining goes under this word  */
+/*      word_hyph       Hyphenation wanted for this word (from style)        */
+/*      word_save_mark  Coord of column mark, temporarily in FixAndPrint     */
+/*      string[]        The characters of the word, null-terminated          */
+/*                                                                           */
+/*  WORD, QWORD when used as database header records                         */
+/*                                                                           */
+/*      string[]        Database index file name                             */
+/*      reading         TRUE if this database can be read from               */
+/*      in_memory       TRUE if this database's index is held in memory      */
+/*      db_filep        Pointer to database file (if not in_memory)          */
+/*      left_pos        Seek pos of 1st entry in db_filep (if not in_memory) */
+/*      db_lines        Pointer to database index lines (if in_memory)       */
+/*      db_lineslen     Number of database index lines (if in_memory)        */
+/*      first child     List of symbols held in this database                */
+/*      other children  CROSS_SYM symbols of symbols in this database        */
+/*                      The *links* to these have the following fields:      */
+/*                          number   An ID number for this sym in this db    */
+/*                          db_targ  TRUE if sym is a galley target          */
+/*                                                                           */
+/*  WORD, QWORD when used as font records                                    */
+/*                                                                           */
+/*      string[]        Font name                                            */
+/*      font_num        The number of this font                              */
+/*      font_page       Number of most recent page using this font           */
+/*      font_size       Size of this font                                    */
+/*      font_xheight2   Half-x height of this font                           */
+/*      font_spacewidth Preferred width of space between words in this font  */
+/*      font_mapping    The mapping to apply with this font                  */
+/*      font_recoded    TRUE if font needs recoding in PostScript output     */
+/*      font_firstpage  TRUE if this font is used on the very first page     */
+/*                                                                           */
+/*  WORD, QWORD when used in hash table to check whether crs defined twice   */
+/*                                                                           */
+/*      db_checksym     Symbol of the cross reference                        */
+/*      string[]        Tag of the cross reference                           */
+/*                                                                           */
+/*  HSPANNER (VSPANNER) - An object that spans columns (rows)                */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           The size of the object                               */
+/*      spanner_broken  TRUE after BreakObject() applied to this object      */
+/*      spanner_count   Number of columns (rows) spanned by this spanner     */
+/*      spanner_sized   Number of cols (rows) of this spanner sized so far   */
+/*      first child     The object that is doing the spanning                */
+/*                                                                           */
+/*  COL_THR (ROW_THR) - object representing all objects on a col (row) mark  */
+/*                                                                           */
+/*      SIZED           The horizontal (vertical) size only                  */
+/*      thr_state       Tells whether thread is sized or not yet             */
+/*      children        The objects on the mark                              */
+/*      parents         The parents of the children (one-to-one)             */
+/*                                                                           */
+/*  ACAT - a paragraph (sequence of objects separated by & or white space)   */
+/*                                                                           */
+/*      SIZED           The size of the object                               */
+/*      save_style      The style to print this paragraph in                 */
+/*      children        The paragraph's objects and gaps (obj-gap-obj...obj) */
+/*                                                                           */
+/*  HCAT (VCAT) - a horizontal (vertical) sequence of objects                */
+/*                                                                           */
+/*      SIZED           The size of the object                               */
+/*      save_style      The style to print this object in                    */
+/*      children        The objects and gaps (obj-gap-obj...obj)             */
+/*      adjust_cat      Whether to perform adjustment (@VAdjust, etc.)       */
+/*                                                                           */
+/*  WIDE (HIGH) - @Wide (@High) object                                       */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           The size of the object                               */
+/*      constraint      The horizontal (vertical) size constraint            */
+/*      first child     The right parameter of this symbol                   */
+/*                                                                           */
+/*  HSHIFT (VSHIFT) - @HShift (@VShift) object                               */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           The size of the object                               */
+/*      shift_type      left, right etc.                                     */
+/*      shift_gap       The amount to shift                                  */
+/*      first child     The right parameter of this symbol                   */
+/*                                                                           */
+/*  HSCALE (VSCALE) - @HScale (@VScale) object                               */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           The size of the object                               */
+/*      save_mark       used temporarily by FixAndPrintObject                */
+/*      constraint      used temporarily by FixAndPrintObject                */
+/*      first child     The right parameter of this symbol                   */
+/*                                                                           */
+/*  SCALE - @Scale object                                                    */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           The size of the object                               */
+/*      bc(constraint)  The horizontal scale factor                          */
+/*      fc(constraint)  The vertical scale factor                            */
+/*      save_mark       used temporarily by FixAndPrintObject                */
+/*      vert_sized      TRUE if vertical size of object is known             */
+/*      first child     The right parameter of this symbol                   */
+/*                                                                           */
+/*  ONE_COL (ONE_ROW) - @OneCol (@OneRow) object                             */
+/*  HCOVER (VCOVER) - @HCover (@VCover) object                               */
+/*  HCONTRACT (VCONTRACT) - @HContract (@VContract) object                   */
+/*  HEXPAND (VEXPAND) - @HExpand (@VExpand) object                           */
+/*  START_HSPAN, START_VSPAN - @StartHSpan, @StartVSpan                      */
+/*  START_HVSPAN - @StartHVSpan                                              */
+/*  HSPAN (VSPAN) - @HSpan (@VSpan) symbols                                  */
+/*  KERN_SHRINK - @KernShrink object                                         */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           The size of the object                               */
+/*      first child     The right parameter of this symbol                   */
+/*                                                                           */
+/*  PADJUST (HADJUST, VADJUST) - @PAdjust (@HAdjust, @VAdjust) symbols       */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      first child     The right parameter of this symbol                   */
+/*                                                                           */
+/*  ROTATE - @Rotate symbol                                                  */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           The size of the object                               */
+/*      save_mark       used temporarily by FixAndPrintObject                */
+/*      sparec(cons)    Amount to rotate by (after manifesting)              */
+/*      first child     Amount to rotate by (before manifesting)             */
+/*      last child      The right parameter of this symbol                   */
+/*                                                                           */
+/*  BACKGROUND - @Background symbol                                          */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           The size of the object                               */
+/*      children        The two parameters of this symbol                    */
+/*                                                                           */
+/*  GRAPHIC, PLAIN_GRAPHIC - @Graphic, @PlainGraphic symbols                 */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           The size of the object                               */
+/*      save_mark       used temporarily by FixAndPrintObject                */
+/*      children        The two parameters of this symbol                    */
+/*                                                                           */
+/*  CASE - @Case symbol                                                      */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      first child     The left parameter of @Case                          */
+/*      last child      The right parameter (sequence of @Yield objects)     */
+/*                                                                           */
+/*  VERBATIM (RAWVERBATIM) - @Verbatim (@RawVerbatim) symbol                 */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      first child     The right parameter of this symbol                   */
+/*                                                                           */
+/*  FILTERED - object recording filtered Lout object                         */
+/*                                                                           */
+/*      filter_use_begin TRUE if filter enclosed in @Begin ... @End          */
+/*      filter_actual   The symbol this is an invocation of                  */
+/*      first child     WORD containing file name of filter output           */
+/*                                                                           */
+/*  XCHAR - @Char symbol                                                     */
+/*  NEXT - @Next symbol                                                      */
+/*  ONE_OF - @OneOf symbol                                                   */
+/*  UNDERLINE - @Underline symbol                                            */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      last child      The right parameter of this symbol                   */
+/*                                                                           */
+/*  FONT, SPACE, BREAK - @Font, @Space, @Break symbols                       */
+/*  YUNIT, ZUNIT, COLOUR, LANGUAGE - @YUnit, @ZUnit, @Colour, @Language syms */
+/*  PLUS, MINUS, - @Plus, @Minus symbols                                     */
+/*  MELD, COMMON, RUMP, INSERT - @Meld, @Common, @Rump, @Insert symbols      */
+/*  OPEN, TAGGED - @Open, @Tagged symbols                                    */
+/*  YIELD - @Yield symbol                                                    */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      first child     The left parameter of this symbol                    */
+/*      last child      The right parameter of this symbol                   */
+/*                                                                           */
+/*  ENV_OBJ - a Lout object with environment attached                        */
+/*                                                                           */
+/*      first child     The Lout object                                      */
+/*      last child      Its environment (ENV object)                         */
+/*                                                                           */
+/*  ENV - environment of some Lout object                                    */
+/*                                                                           */
+/*      children        Components of the environment                        */
+/*                                                                           */
+/*  INCGRAPHIC, SINCGRAPHIC - @IncludeGraphic, @SysIncludeGraphic symbols    */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      SIZED           The size of the object                               */
+/*      save_mark       used temporarily by FixAndPrintObject                */
+/*      incgraphic_ok   TRUE if file name pans out OK                        */
+/*      last child      The right parameter of this symbol                   */
+/*                                                                           */
+/*  TSPACE, TJUXTA - tokens representing white space                         */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      mark(gap)       FALSE                                                */
+/*      join(gap)       TRUE                                                 */
+/*                                                                           */
+/*  BEGIN - @Begin symbol                                                    */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*      actual          Symbol this @Begin starts parameter of               */
+/*                                                                           */
+/*  END - @End symbol                                                        */
+/*  LBR, RBR - tokens representing left brace and right brace                */
+/*  USE, NOT_REVEALED - @Use, @NotRevealed symbols                           */
+/*  GSTUB_EXT, GSTUB_INT, GSTUB_NONE - stubs for transferred galleys         */
+/*  UNEXPECTED_EOF - unexpected end of file token                            */
+/*  INCLUDE, SYS_INCLUDE - @Include, @SysInclude symbols                     */
+/*  PREPEND, SYS_PREPEND - @PrependGraphic, @SysPrependGraphic symbols       */
+/*  ENVA, ENVB, ENVC, ENVD - @LEnvA, @LEnvB, @LEnvC, @LEnvD tokens only      */
+/*  CENV, CLOS, LVIS, LUSE, LEO - @LCEnv, @LClos, @LVis, @LUse, @LEO tokens  */
+/*  BACKEND - @BackEnd symbol                                                */
+/*  CURR_LANG, CURR_FAMILY, CURR_FACE - @CurrLang, @CurrFamily, @CurrFace    */
+/*                                                                           */
+/*      TOKEN           While still being parsed                             */
+/*                                                                           */
+/*  DEAD - an index of a dead galley                                         */
+/*                                                                           */
+/*  UNATTACHED - the index of an unattached galley                           */
+/*                                                                           */
+/*      actual          The galley referred to                               */
+/*      non_blocking    TRUE if this index should not block galley flushing  */
+/*      blocked         TRUE if this index is now blocking galley flushing   */
+/*      pinpoint        Exact anchor point of this index                     */
+/*                                                                           */
+/*  RECEPTIVE, RECEIVING - the index of a receptive or receiving object      */
+/*                                                                           */
+/*      actual          The object (symbol invocation) referred to           */
+/*      trigger_externs TRUE is this index's galley has external galleys     */
+/*      non_blocking    TRUE if this index should not block galley flushing  */
+/*      blocked         TRUE if this index is now blocking galley flushing   */
+/*                                                                           */
+/*  RECURSIVE - the index of a recursive but definite object                 */
+/*                                                                           */
+/*      actual          The recursive symbol invocation referred to          */
+/*                                                                           */
+/*  PRECEDES - an index recording a precedes/follows flushing constraint     */
+/*                                                                           */
+/*      first child     Other parent of this is the corresponding FOLLOWS    */
+/*                                                                           */
+/*  FOLLOWS - an index recording a precedes/follows flushing constraint      */
+/*                                                                           */
+/*      blocked         TRUE if this index is now blocking galley flushing   */
+/*      first child     Other parent of this is the corresponding PRECEDES   */
+/*                                                                           */
+/*  CROSS_LIT - not actually an object at all                                */
+/*                                                                           */
+/*  CROSS_PREC, CROSS_FOLL, CROSS_FOLL_OR_PREC - the index of a cross ref    */
+/*                                                                           */
+/*      actual          The cross reference referred to                      */
+/*      underline       TRUE if continuous underline goes through here       */
+/*      first child     Equal to actual                                      */
+/*                                                                           */
+/*  GALL_PREC, GALL_FOLL, GALL_FOLL_OR_PREC - index of a galley              */
+/*                                                                           */
+/*      actual          The galley referred to                               */
+/*      underline       TRUE if continuous underline goes through here       */
+/*      pinpoint        Exact anchor point of this index                     */
+/*                                                                           */
+/*  GALL_TARG - index of the target of a galley                              */
+/*                                                                           */
+/*      actual          The galley target (symbol invocation) referred to    */
+/*      underline       TRUE if continuous underline goes through here       */
+/*                                                                           */
+/*  PAGE_LABEL_IND - the index of a @PageLabel object                        */
+/*                                                                           */
+/*      actual          The @PageLabel object referred to                    */
+/*      underline       TRUE if continuous underline goes through here       */
+/*      first child     Equal to actual                                      */
+/*                                                                           */
+/*  SCALE_IND - the index of a @Scale symbol with empty left parameter       */
+/*  COVER_IND - the index of an @HCover or @VCover object                    */
+/*  EXPAND_IND - the index of an @HExpand or @VExpand object                 */
+/*                                                                           */
+/*      actual          The object referred to                               */
+/*      underline       TRUE if continuous underline goes through here       */
+/*                                                                           */
+/*  THREAD - a sequence of threads (basically local to Manifest)             */
+/*                                                                           */
+/*      children        The threads                                          */
+/*                                                                           */
+/*  CROSS_SYM - a record of the cross reference state of some symbol         */
+/*                                                                           */
+/*      target_state    Whether we currently have a preceding target         */
+/*      target_file     Which file target is written to                      */
+/*      target_val      Value of target (if target_state == SEEN_TARGET)     */
+/*      target_seq      A sequence number                                    */
+/*      target_pos      Seek position of target in target_file               */
+/*      target_lnum     Line number of target in target_file                 */
+/*      gall_seq        Sequence number for galleys targeted to here         */
+/*      symb            The symbol table record of the symbol this is for    */
+/*      gall_tag        I forget!                                            */
+/*      gall_tfile      The most recent cr database file for this sym        */
+/*      children        Cross references and galleys waiting for a target    */
+/*                      These children have the following fields:            */
+/*                                                                           */
+/*                          string[]   The sequence number                   */
+/*                          cs_type    The cross reference type              */
+/*                          cs_fnum    File number where value written       */
+/*                          cs_pos     File seek position                    */
+/*                          cs_lnum    File line number                      */
+/*                                                                           */
+/*  CR_ROOT - all CROSS_SYM objects are children of this singleton           */
+/*                                                                           */
+/*      children        All CROSS_SYM symbols                                */
+/*                                                                           */
+/*  MACRO - a symbol table entry for a symbol which is a macro               */
+/*  LOCAL - a symbol table entry for a symbol which is a local symbol        */
+/*  LPAR - a symbol table entry for a symbol which is a left parameter       */
+/*  RPAR - a symbol table entry for a symbol which is a right parameter      */
+/*  NPAR - a symbol table entry for a symbol which is a named parameter      */
+/*                                                                           */
+/*      enclosing       The symbol that this one is defined within, if any   */
+/*      sym_body        The symbol body (token sequence if MACRO)            */
+/*      base_uses       Local to symbol table, for calculating call graph    */
+/*      uses            Call graph info                                      */
+/*      marker          For call graph calculation                           */
+/*      imports         The import list preceding this symbol, if any        */
+/*      filter          Child @Filter symbol, if any                         */
+/*      use_invocation  A @Use clause containing this symbol, if any         */
+/*      predefined      If predefined symbol, its non-zero enum code         */
+/*      has_compulsory  Number of parameters with "compulsory" tag           */
+/*      uses_count      Number of times this symbol is used                  */
+/*      npar_code       One-letter abbreviation for this NPAR                */
+/*      cross_sym       The CROSS_SYM record for this symbol, if any         */
+/*      recursive       TRUE if symbol is recursive                          */
+/*      has_body        TRUE if symbol has a body parameter                  */
+/*      imports_encl    TRUE if symbol imports the symbol enclosing itself   */
+/*      right_assoc     TRUE if this symbol has "associativity right"        */
+/*      precedence      The precedence of this symbol                        */
+/*      indefinite      TRUE if this symbol is indefinite (e.g. receptive)   */
+/*      recursive       TRUE if symbol is recursive                          */
+/*      is_extern_target   TRUE if symbol is the target of external galley   */
+/*      uses_extern_target TRUE if symbol uses target of an external galley  */
+/*      visible         TRUE if symbol is exported                           */
+/*      uses_galley     TRUE if symbol uses a galley                         */
+/*      horiz_galley    if galley, ROWM if vertical, COLM if horizontal      */
+/*      is_compulsory   TRUE if this is a parameter with "compulsory" tag    */
+/*      dirty           TRUE if must copy this parameter, not link it        */
+/*      has_par         TRUE if this symbol has at least one parameter       */
+/*      has_lpar        TRUE if this symbol has a left parameter             */
+/*      has_rpar        TRUE if this symbol has a right or body parameter    */
+/*      has_target      TRUE if this symbol has a target (is a galley)       */
+/*      force_target    TRUE if this symbol has a forcing target             */
+/*      is_target       TRUE if this symbol is @Target, defining a target    */
+/*      has_tag         TRUE if this symbol has a @Tag parameter             */
+/*      is_tag          TRUE if this symbol is a @Tag parameter              */
+/*      has_key         TRUE if this symbol has a @Key parameter             */
+/*      is_key          TRUE if this symbol is a @Key parameter              */
+/*      has_optimize    TRUE if this symbol has an @Optimize parameter       */
+/*      is_optimize     TRUE if this symbol is an @Optimize parameter        */
+/*      has_merge       TRUE if this symbol has a @Merge parameter           */
+/*      is_merge        TRUE if this symbol is a @Merge parameter            */
+/*      has_enclose     TRUE if this symbol has an @Enclose parameter        */
+/*      is_enclose      TRUE if this symbol is an @Enclose parameter         */
+/*                                                                           */
+/*  EXT_GALL - a record of an external galley, not actually read in yet      */
+/*                                                                           */
+/*      eg_fnum         Number of file read from                             */
+/*      eg_fpos         Position in that file                                */
+/*      eg_lnum         Line number in that file                             */
+/*      eg_cont         Continuation (where to look for next galley)         */
+/*      eg_symbol       The symbol that is the target of this galley         */
+/*      first child     The galley tag                                       */
+/*      second child    The galley sequence string                           */
+/*                                                                           */
+/*  CR_LIST - a list of cross references                                     */
+/*                                                                           */
+/*      children        The cross-references                                 */
+/*                                                                           */
+/*  DISPOSED - a disposed object (available for reallocation)                */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef union rec
+{
+  struct word_type	/* all fields of WORD and QWORD, token and object */
+  {  LIST		olist[2];
+     FIRST_UNION	ou1;
+     SECOND_UNION	ou2;
+     THIRD_UNION	ou3;
+     FULL_CHAR		ostring[4];
+  } os1;
+
+  struct closure_type	/* all fields of CLOSURE, both as token and object */
+  {  LIST		olist[2];
+     FIRST_UNION	ou1;
+     SECOND_UNION	ou2;
+     THIRD_UNION	ou3;
+     FOURTH_UNION	ou4;
+     union rec		*oactual;
+     union
+     { union rec *owhereto;
+       union rec *opinpoint;
+       FULL_LENGTH    osave_mark;
+     } oux;
+     /* union rec *oready_galls; */
+  } os2;
+  
+  struct head_type	/* all fields of HEAD, both as token and object */
+  {  LIST		olist[2];
+     FIRST_UNION	ou1;
+     SECOND_UNION	ou2;
+     THIRD_UNION	ou3;
+     FOURTH_UNION	ou4;
+     union rec		*oactual;
+     union
+     { union rec *owhereto;
+       union rec *opinpoint;
+       FULL_LENGTH    osave_mark;
+     } oux;
+     union rec *oready_galls;
+     union rec *oopt_components;
+     union rec *oopt_constraints;
+     union rec *oopt_counts;
+     union rec *olimiter;
+     union rec *oenclose_obj;
+     int        oopt_comps_permitted;
+  } os2a;
+  
+  struct object_type	/* the general OBJECT */
+  {  LIST		olist[2];
+     FIRST_UNION	ou1;
+     SECOND_UNION	ou2;
+     THIRD_UNION	ou3;
+     FOURTH_UNION	ou4;
+  } os3;
+
+  struct link_type	/* LINK */
+  {  LIST		olist[2];
+     unsigned char	otype;
+     unsigned char	onumber;
+     unsigned char	odb_targ;
+  } os4;
+  
+  struct gapobj_type	/* GAP_OBJ */
+  {  LIST		olist[2];
+     FIRST_UNION	ou1;
+     SECOND_UNION	ou2;
+     GAP		ogap;
+     int		osave_badness;		/* optimum paragraph breaker */
+     SHORT_LENGTH	osave_space;		/* optimum paragraph breaker */
+     SHORT_LENGTH	osave_actual_gap;	/* optimum paragraph breaker */
+     union rec  	*osave_prev;		/* optimum paragraph breaker */
+     union rec  	*osave_cwid;		/* optimum paragraph breaker */
+  } os5;
+
+  struct symbol_type
+  {  LIST		olist[2];
+     FIRST_UNION	ou1;
+     SECOND_UNION	ou2;
+     union rec		*oenclosing;
+     union rec		*osym_body;
+     union rec		*obase_uses;
+     union rec		*ouses;
+     union rec		*omarker;
+     union rec		*ocross_sym;
+     union rec		*oimports;
+     union rec		*ofilter;
+     union rec		*ouse_invocation;
+     short unsigned 	opredefined;
+     short unsigned 	ohas_compulsory;
+     unsigned char	ouses_count;
+     unsigned char	onpar_code;
+     BOOLEAN		ois_optimize	     : 1;
+     BOOLEAN		ohas_optimize	     : 1;
+     BOOLEAN		ois_merge	     : 1;
+     BOOLEAN		ohas_merge	     : 1;
+     BOOLEAN		ois_enclose	     : 1;
+     BOOLEAN		ohas_enclose	     : 1;
+     BOOLEAN		ois_compulsory	     : 1;
+  } os6;
+
+  struct cr_type
+  {  LIST		olist[2];
+     unsigned char	otype;
+     unsigned char	otarget_state;
+     FILE_NUM		otarget_file;
+     /* FILE_NUM	ocr_file; unused */
+     union rec		*otarget_val;
+     int		otarget_seq;
+     int		otarget_pos;
+     int		otarget_lnum;
+     /* int		ocr_seq; unused */
+     int		ogall_seq;
+     union rec		*osymb;
+     union rec		*ogall_tag;
+     FILE_NUM		ogall_tfile;
+  } os7;
+
+  struct ext_gall_type
+  {  LIST		olist[2];
+     unsigned char	otype;
+     FILE_NUM		oeg_fnum;
+     int		oeg_lnum;
+     long		oeg_fpos;
+     long		oeg_cont;
+     union rec		*oeg_symbol;
+  } os8;
+
+  struct uses_type
+  {  union rec	*oitem;
+     union rec	*onext;
+  } os9;
+#define	USES_SIZE ceiling( sizeof(struct uses_type), sizeof(ALIGN) )
+
+  struct hash_entry_type
+  {  LIST	olist[1];
+  } os10;
+
+} *OBJECT;
+
+
+/*@::macros for fields of OBJECT@*********************************************/
+/*                                                                           */
+/*  Macros for fields of OBJECT.                                             */
+/*                                                                           */
+/*****************************************************************************/
+
+#define	succ(x, dim)		(x)->os1.olist[dim].osucc
+#define	pred(x, dim)		(x)->os1.olist[dim].opred
+
+#define type(x)			(x)->os1.ou1.os11.otype
+#define	rec_size(x)		(x)->os1.ou1.os11.orec_size
+#define	precedence(x)		(x)->os1.ou2.os21.oprecedence
+#define	hspace(x)		(x)->os1.ou2.os21.ohspace
+#define	vspace(x)		(x)->os1.ou2.os21.ovspace
+
+#define	word_font(x)		(x)->os1.ou2.os22.oword_font
+#define spanner_count(x)	word_font(x)
+#define	word_colour(x)		(x)->os1.ou2.os22.oword_colour
+#define spanner_sized(x)	word_colour(x)
+#define	word_language(x)	(x)->os1.ou2.os22.oword_language
+#define	spanner_broken(x)	word_language(x)
+#define	underline(x)		(x)->os1.ou2.os22.ounderline
+#define	word_hyph(x)		(x)->os1.ou2.os22.oword_hyph
+#define	filter_use_begin(x)	(x)->os1.ou2.os22.oword_colour
+
+#define	non_blocking(x)		(x)->os1.ou2.os23.onon_blocking
+#define	vert_sized(x)		non_blocking(x)
+#define	sized(x)		(x)->os1.ou2.os23.osized
+#define	threaded(x)		(x)->os1.ou2.os23.othreaded
+#define	external_ver(x)		(x)->os1.ou2.os23.oexternal_ver
+#define	external_hor(x)		(x)->os1.ou2.os23.oexternal_hor
+#define	blocked(x)		(x)->os1.ou2.os23.oblocked
+#define	seen_nojoin(x)		blocked(x)
+#define	trigger_externs(x)	(x)->os1.ou2.os23.otrigger_ext
+#define	must_expand(x)		(x)->os1.ou2.os23.omust_expand
+#define	gall_dir(x)		(x)->os1.ou2.os23.ogall_dir
+#define	opt_hyph(x)		(x)->os1.ou2.os23.oopt_hyph
+#define	opt_gazumped(x)		(x)->os1.ou2.os23.oopt_gazumped
+#define	adjust_cat(x)		(x)->os1.ou2.os23.oadjust_cat
+#define	force_gall(x)		(x)->os1.ou2.os23.oforce_gall
+#define	cross_type(x)		(x)->os1.ou2.os23.ocross_type
+#define	foll_or_prec(x)		(x)->os1.ou2.os23.ofoll_or_prec
+#define	thr_state(x)		cross_type(x)
+#define	incgraphic_ok(x)	cross_type(x)
+
+#define	left_pos(x)		(x)->os1.ou2.os24.oleft_pos
+#define	db_lineslen(x)		left_pos(x)
+#define	reading(x)		(x)->os1.ou2.os24.oreading
+#define	in_memory(x)		(x)->os1.ou2.os24.oin_memory
+
+#define	is_tag(x)		(x)->os1.ou2.os26.ois_tag
+#define	has_tag(x)		(x)->os1.ou2.os26.ohas_tag
+#define	has_lpar(x)		(x)->os1.ou2.os26.ohas_lpar
+#define	has_rpar(x)		(x)->os1.ou2.os26.ohas_rpar
+#define	right_assoc(x)		(x)->os1.ou2.os26.oright_assoc
+#define	is_target(x)		(x)->os1.ou2.os26.ois_target
+#define	has_target(x)		(x)->os1.ou2.os26.ohas_target
+#define	force_target(x)		(x)->os1.ou2.os26.oforce_target
+#define	has_body(x)		(x)->os1.ou2.os26.ohas_body
+#define	indefinite(x)		(x)->os1.ou2.os26.oindefinite
+#define	recursive(x)		(x)->os1.ou2.os26.orecursive
+#define	uses_extern_target(x)	(x)->os1.ou2.os26.ouses_extern_target
+#define	is_extern_target(x)	(x)->os1.ou2.os26.ois_extern_target
+#define	is_key(x)		(x)->os1.ou2.os26.ois_key
+#define	has_key(x)		(x)->os1.ou2.os26.ohas_key
+#define	dirty(x)		(x)->os1.ou2.os26.odirty
+#define	visible(x)		(x)->os1.ou2.os26.ovisible
+#define	has_mark(x)		(x)->os1.ou2.os26.ohas_mark
+#define	has_join(x)		(x)->os1.ou2.os26.ohas_join
+#define	has_par(x)		(x)->os1.ou2.os26.ohas_par
+#define	uses_galley(x)		(x)->os1.ou2.os26.ouses_galley
+#define	horiz_galley(x)		(x)->os1.ou2.os26.ohoriz_galley
+#define	imports_encl(x)		(x)->os1.ou2.os26.oimports_encl
+
+#define	fpos(x)			(x)->os1.ou1.ofpos
+#define word_save_mark(x)	(x)->os1.ou1.os11.oword_save_mark
+
+#define	back(x, dim)		(x)->os1.ou3.os31.oback[dim]
+#define	comp_count(x)		back(x, COLM)
+#define	fwd(x, dim)		(x)->os1.ou3.os31.ofwd[dim]
+#define	size(x, dim)		(back(x, dim) + fwd(x, dim))
+#define	db_filep(x)		(x)->os1.ou3.odb_filep
+#define	db_lines(x)		(x)->os1.ou3.odb_lines
+#define	filter_actual(x)	(x)->os1.ou3.ofilter_actual
+#define	db_checksym(x)		filter_actual(x)
+
+#define	cs_type(x)		(x)->os1.ou3.os33.ocs_type
+#define	cs_fnum(x)		(x)->os1.ou3.os33.ocs_fnum
+#define	cs_pos(x)		(x)->os1.ou3.os33.ocs_pos
+#define	cs_lnum(x)		(x)->os1.ou3.os33.ocs_lnum
+
+#define	gall_rec(x)		(x)->os1.ou3.os33.ogall_rec
+#define	gall_type(x)		(x)->os1.ou3.os33.ogall_type
+#define	gall_pos(x)		(x)->os1.ou3.os33.ogall_pos
+
+#define string(x)		(x)->os1.ostring
+
+#define	save_style(x)		(x)->os2.ou4.osave_style
+#define	constraint(x)		(x)->os2.ou4.oconstraint
+#define	shift_type(x)		width(space_gap(save_style(x)))
+#define	shift_gap(x)		line_gap(save_style(x))
+
+#define actual(x)		(x)->os2.oactual
+#define whereto(x)		(x)->os2.oux.owhereto
+#define pinpoint(x)		(x)->os2.oux.opinpoint
+#define save_mark(x)		(x)->os2.oux.osave_mark
+#define ready_galls(x)		(x)->os2a.oready_galls
+#define opt_components(x)	(x)->os2a.oopt_components
+#define opt_constraints(x)	(x)->os2a.oopt_constraints
+#define opt_counts(x)		(x)->os2a.oopt_counts
+#define limiter(x)		(x)->os2a.olimiter
+#define enclose_obj(x)		(x)->os2a.oenclose_obj
+#define opt_comps_permitted(x)	(x)->os2a.oopt_comps_permitted
+
+#define	number(x)		(x)->os4.onumber
+#define	db_targ(x)		(x)->os4.odb_targ
+
+#define	gap(x)			(x)->os5.ogap
+#define	save_badness(x)		(x)->os5.osave_badness
+#define	save_space(x)		(x)->os5.osave_space
+#define	save_actual_gap(x)	(x)->os5.osave_actual_gap
+#define	save_prev(x)		(x)->os5.osave_prev
+#define	save_cwid(x)		(x)->os5.osave_cwid
+
+#define	enclosing(x)		(x)->os6.oenclosing
+#define	sym_body(x)		(x)->os6.osym_body
+#define	base_uses(x)		(x)->os6.obase_uses
+#define	uses(x)			(x)->os6.ouses
+#define	marker(x)		(x)->os6.omarker
+#define	cross_sym(x)		(x)->os6.ocross_sym
+#define	imports(x)		(x)->os6.oimports
+#define	filter(x)		(x)->os6.ofilter
+#define	use_invocation(x)	(x)->os6.ouse_invocation
+#define	predefined(x)		(x)->os6.opredefined
+#define	has_compulsory(x)	(x)->os6.ohas_compulsory
+#define	uses_count(x)		(x)->os6.ouses_count
+#define	npar_code(x)		(x)->os6.onpar_code
+#define	is_optimize(x)		(x)->os6.ois_optimize
+#define	has_optimize(x)		(x)->os6.ohas_optimize
+#define	is_merge(x)		(x)->os6.ois_merge
+#define	has_merge(x)		(x)->os6.ohas_merge
+#define	is_enclose(x)		(x)->os6.ois_enclose
+#define	has_enclose(x)		(x)->os6.ohas_enclose
+#define	is_compulsory(x)	(x)->os6.ois_compulsory
+
+#define	target_state(x)		(x)->os7.otarget_state
+#define	target_file(x)		(x)->os7.otarget_file
+/* #define cr_file(x)		(x)->os7.ocr_file unused */
+#define	target_val(x)		(x)->os7.otarget_val
+#define	target_seq(x)		(x)->os7.otarget_seq
+#define	target_pos(x)		(x)->os7.otarget_pos
+#define	target_lnum(x)		(x)->os7.otarget_lnum
+/* #define cr_seq(x)		(x)->os7.ocr_seq unused */
+#define	gall_seq(x)		(x)->os7.ogall_seq
+#define	symb(x)			(x)->os7.osymb
+#define	gall_tag(x)		(x)->os7.ogall_tag
+#define	gall_tfile(x)		(x)->os7.ogall_tfile
+
+#define	eg_fnum(x)		(x)->os8.oeg_fnum
+#define	eg_fpos(x)		(x)->os8.oeg_fpos
+#define	eg_lnum(x)		(x)->os8.oeg_lnum
+#define	eg_cont(x)		(x)->os8.oeg_cont
+#define	eg_symbol(x)		(x)->os8.oeg_symbol
+
+#define	item(x)			(x)->os9.oitem
+#define	next(x)			(x)->os9.onext
+
+#define	font_num(x)		(x)->os1.ou2.os25.ofont_num
+#define	font_page(x)		(x)->os1.ou2.os25.ofont_page
+#define	font_size(x)		(x)->os1.ou3.os32.ofont_size
+#define	font_xheight2(x)	(x)->os1.ou3.os32.ofont_xheight2
+#define	font_spacewidth(x)	(x)->os1.ou3.os32.ofont_spacewidth
+#define	font_mapping(x)		(x)->os1.ou3.os32.ofont_mapping
+#define	font_recoded(x)		(x)->os1.ou3.os32.ofont_recoded
+#define	font_firstpage(x)	(x)->os1.ou3.os32.ofont_firstpage
+
+
+/*@::FONT_INFO@***************************************************************/
+/*                                                                           */
+/*  typedef FONT_INFO - information about font metrics etc.  Really private  */
+/*  but shared between z37.c and z24.c                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+struct metrics {
+  SHORT_LENGTH up;
+  SHORT_LENGTH down;
+  SHORT_LENGTH left;
+  SHORT_LENGTH right;
+  SHORT_LENGTH last_adjust;
+};
+
+typedef struct font_rec {
+  struct metrics	*size_table;		/* metrics of sized fonts    */
+  FULL_CHAR		*lig_table;		/* ligatures                 */
+  OBJECT		font_table;		/* record of sized fonts     */
+  OBJECT		original_font;		/* font rec before resizing  */
+  SHORT_LENGTH		underline_pos;		/* position of underline     */
+  SHORT_LENGTH		underline_thick;	/* thickness of underline    */
+  unsigned short	*kern_table;		/* first kerning chars       */
+  FULL_CHAR		*kern_chars;		/* second kerning chars      */
+  unsigned char		*kern_value;		/* points into kern_lengths  */
+  SHORT_LENGTH		*kern_sizes;		/* sizes of kernings         */
+} FONT_INFO;
+
+
+/*@::MAP_VEC@*****************************************************************/
+/*                                                                           */
+/*  typedef MAP_VEC - information about character mappings.  Really private  */
+/*  to z38.c but (for efficiency) shared with z37.c and z24.c                */
+/*                                                                           */
+/*****************************************************************************/
+
+#define MAX_CHASH       353             /* size of hash table                */
+#define MAP_UPPERCASE     0             /* the map to upper case             */
+#define MAP_LOWERCASE     1             /* the map to lower case             */
+#define MAP_UNACCENTED    2             /* the map to unaccented             */
+#define MAP_ACCENT        3             /* the map to the accent character   */
+#define MAPS              4             /* the number of maps in each file   */
+ 
+typedef struct mapvec {
+  OBJECT        file_name;              /* name of file containing the vec   */
+  FILE_NUM      fnum;                   /* the file number of this file      */
+  BOOLEAN       must_print;             /* TRUE if this vec must be printed  */
+  OBJECT        name;                   /* PostScript name of encoding vec   */
+  OBJECT        vector[MAX_CHARS];      /* character names                   */
+  FULL_CHAR     hash_table[MAX_CHASH];  /* character hash table for inverse  */
+  FULL_CHAR     map[MAPS][MAX_CHARS];   /* the mappings                      */
+} *MAP_VEC;
+
+
+/*@::object types@************************************************************/
+/*                                                                           */
+/*  OBJECT, TOKEN AND OTHER TYPES inhabiting type(x) and predefined(x)       */
+/*                                                                           */
+/*  Key letters in the adjacent comment indicate where the tag is legal:     */
+/*                                                                           */
+/*    t  a token type, pushed on token stack                                 */
+/*    o  an object type (returned by reduce(), inserted by Manifest)         */
+/*    i  an index type (a child of a galley header other than an object)     */
+/*    s  a predefined symbol (some symbol table entry has this predefined()) */
+/*    n  an indefinite object i.e. one which is ignored in catenation ops    */
+/*                                                                           */
+/*****************************************************************************/
+
+#define	LINK		     0		/*        a link between objects     */
+#define	GAP_OBJ		     1		/*  o     a gap object               */
+#define	CLOSURE		     2		/* to  n  a closure of a symbol      */
+#define	UNDER_REC	     3		/*  o  n  record of underlining      */
+#define	PAGE_LABEL	     4		/* to sn  @PageLabel                 */
+#define	NULL_CLOS	     5		/* to sn  @Null                      */
+#define	CROSS		     6		/* to sn  && (a cross reference obj) */
+#define	FORCE_CROSS	     7		/* to sn  &&& (a forcing cross ref.) */
+#define	HEAD		     8		/*  o  n  a galley header            */
+#define	SPLIT		     9		/*  o     @Split                     */
+#define	PAR		    10		/*  o     a parameter of a closure   */
+#define	WORD		    11		/*  o     a word                     */
+#define	QWORD		    12		/*  o     a word (was quoted in i/p) */
+#define	HSPANNER	    13		/*  o     a horizontal spanner       */
+#define	VSPANNER	    14		/*  o     a vertical spanner         */
+#define	ROW_THR		    15		/*  o     a row thread               */
+#define	COL_THR		    16		/*  o     a column thread            */
+#define	ACAT		    17		/* to s   a sequence of &-ed objs    */
+#define	HCAT		    18		/* to s   a sequence of |-ed objs    */
+#define	VCAT		    19		/* to s   a sequence of /-ed objs    */
+#define	ONE_COL		    20		/* to s   @OneCol                    */
+#define	ONE_ROW		    21		/* to s   @OneRow                    */
+#define	WIDE		    22		/* to s   @Wide                      */
+#define	HIGH		    23		/* to s   @High                      */
+#define	HSHIFT		    24		/* to s   @HShift                    */
+#define	VSHIFT		    25		/* to s   @VShift                    */
+#define	HSCALE		    26		/* to s   @HScale                    */
+#define	VSCALE		    27		/* to s   @VScale                    */
+#define	HCOVER		    28		/* to s   @HCover                    */
+#define	VCOVER		    29		/* to s   @VCover                    */
+#define	SCALE		    30		/* to s   @Scale                     */
+#define	KERN_SHRINK	    31		/* to s   @KernShrink                */
+#define	HCONTRACT	    32		/* to s   @HContract                 */
+#define	VCONTRACT	    33		/* to s   @VContract                 */
+#define	HLIMITED	    34		/* to s   @HLimited                  */
+#define	VLIMITED	    35		/* to s   @VLimited                  */
+#define	HEXPAND		    36		/* to s   @HExpand                   */
+#define	VEXPAND		    37		/* to s   @VExpand                   */
+#define	START_HSPAN	    38		/* to s   @StartHSpan                */
+#define	START_VSPAN 	    39		/* to s   @StartVSpan                */
+#define	START_HVSPAN 	    40		/* to s   @StartHVSpan               */
+#define	HSPAN  		    41		/* to s   @HSpan                     */
+#define	VSPAN  		    42		/* to s   @VSpan                     */
+#define	PADJUST		    43		/* to s   @PAdjust                   */
+#define	HADJUST		    44		/* to s   @HAdjust                   */
+#define	VADJUST		    45		/* to s   @VAdjust                   */
+#define	ROTATE		    46		/* to s   @Rotate                    */
+#define	BACKGROUND	    47		/* to s   @Background                */
+#define	CASE		    48		/* to s   @Case                      */
+#define	VERBATIM	    49		/* to s   @Verbatim                  */
+#define	RAW_VERBATIM	    50		/* to s   @RawVerbatim               */
+#define	YIELD		    51		/* to s   @Yield                     */
+#define	BACKEND		    52		/* to s   @BackEnd                   */
+#define	FILTERED	    53		/* to s   filtered object (no name)  */
+#define	XCHAR		    54		/* to s   @Char                      */
+#define	FONT		    55		/* to s   @Font                      */
+#define	SPACE		    56		/* to s   @Space                     */
+#define	YUNIT		    57		/* to s   @YUnit                     */
+#define	ZUNIT		    58		/* to s   @ZUnit                     */
+#define	BREAK		    59		/* to s   @Break                     */
+#define	UNDERLINE	    60		/* to s   @Underline                 */
+#define	COLOUR		    61		/* to s   @SetColour and @SetColor   */
+#define	LANGUAGE	    62		/* to s   @Language                  */
+#define	CURR_LANG	    63		/* to s   @CurrLang                  */
+#define	CURR_FAMILY	    64		/* to s   @CurrFamily                */
+#define	CURR_FACE	    65		/* to s   @CurrFace                  */
+#define	COMMON		    66		/* to s   @Common                    */
+#define	RUMP		    67		/* to s   @Rump                      */
+#define	MELD		    68		/* to s   @Meld                      */
+#define	INSERT		    69		/* to s   @Insert                    */
+#define	ONE_OF		    70		/* to s   @OneOf                      */
+#define	NEXT		    71		/* to s   @Next                      */
+#define	PLUS		    72		/* to s   @Plus                      */
+#define	MINUS		    73		/* to s   @Minus                     */
+#define	ENV_OBJ		    74		/* to s   object with envt (no name) */
+#define	ENV		    75		/* to s   @LEnv                      */
+#define	ENVA		    76		/* to s   @LEnvA                     */
+#define	ENVB		    77		/* to s   @LEnvB                     */
+#define	ENVC		    78		/* to s   @LEnvC                     */
+#define	ENVD		    79		/* to s   @LEnvD                     */
+#define	CENV		    80		/* to s   @LCEnv                     */
+#define	CLOS		    81		/* to s   @LClos                     */
+#define	LVIS		    82		/* to s   @LVis                      */
+#define	LUSE		    83		/* to s   @LUse                      */
+#define	LEO 		    84		/* to s   @LEO                       */
+#define	OPEN		    85		/* to s   @Open                      */
+#define	TAGGED		    86		/* to s   @Tagged                    */
+#define	INCGRAPHIC	    87		/* to s   @IncludeGraphic            */
+#define	SINCGRAPHIC	    88		/* to s   @SysIncludeGraphic         */
+#define	PLAIN_GRAPHIC	    89		/* to s   @PlainGraphic              */
+#define	GRAPHIC		    90		/* to s   @Graphic                   */
+#define	TSPACE		    91		/* t      a space token, parser only */
+#define	TJUXTA		    92		/* t      a juxta token, parser only */
+#define	LBR		    93		/* t  s   left brace token           */
+#define	RBR		    94		/* t  s   right brace token          */
+#define	BEGIN		    95		/* t  s   @Begin token               */
+#define	END		    96		/* t  s   @End token                 */
+#define	USE		    97		/* t  s   @Use                       */
+#define	NOT_REVEALED	    98		/* t  s   @NotRevealed               */
+#define	GSTUB_NONE	    99		/* t      a galley stub, no rpar     */
+#define	GSTUB_INT	   100		/* t      galley stub internal rpar  */
+#define	GSTUB_EXT	   101		/* t      galley stub external rpar  */
+#define	UNEXPECTED_EOF	   102		/* t      unexpected end of file     */
+#define	INCLUDE		   103		/*    s   @Include                   */
+#define	SYS_INCLUDE	   104		/*    s   @SysInclude                */
+#define	PREPEND		   105		/*    s   @Prepend                   */
+#define	SYS_PREPEND	   106		/*    s   @SysPrepend                */
+#define	DATABASE	   107		/*    s   @Database                  */
+#define	SYS_DATABASE	   108		/*    s   @SysDatabase               */
+/* #define	START		   109	*/	/*    s   \Start                     */
+#define	DEAD		   110		/*   i    a dead galley              */
+#define	UNATTACHED	   111		/*   i    an inner, unsized galley   */
+#define	RECEPTIVE	   112		/*   i    a receptive object index   */
+#define	RECEIVING	   113		/*   i    a receiving object index   */
+#define	RECURSIVE	   114		/*   i    a recursive definite obj.  */
+#define	PRECEDES	   115		/*   i    an ordering constraint     */
+#define	FOLLOWS		   116		/*   i    other end of ordering c.   */
+#define	CROSS_LIT	   117		/*   i    literal word cross-ref     */
+#define	CROSS_FOLL	   118		/*   i    following type cross-ref   */
+#define	CROSS_FOLL_OR_PREC 119		/*   i    follorprec type cross-ref  */
+#define	GALL_FOLL	   120		/*   i    galley with &&following    */
+#define	GALL_FOLL_OR_PREC  121		/*   i    galley with &&following    */
+#define	CROSS_TARG	   122		/*   i    value of cross-ref         */
+#define	GALL_TARG	   123		/*   i    target of these galleys    */
+#define	GALL_PREC	   124		/*   i    galley with &&preceding    */
+#define	CROSS_PREC	   125		/*   i    preceding type cross-ref   */
+#define	PAGE_LABEL_IND	   126		/*   i    index of PAGE_LABEL        */
+#define	SCALE_IND	   127		/*   i    index of auto SCALE        */
+#define	COVER_IND	   128		/*   i    index of HCOVER or VCOVER  */
+#define	EXPAND_IND	   129		/*   i    index of HEXPAND or VEXPD  */
+#define	THREAD		   130		/*        a sequence of threads      */
+#define	CROSS_SYM	   131		/*        cross-ref info             */
+#define	CR_ROOT		   132		/*        RootCross                  */
+#define	MACRO	           133		/*        a macro symbol             */
+#define	LOCAL	           134		/*        a local symbol             */
+#define	LPAR	           135		/*        a left parameter           */
+#define	NPAR	           136		/*        a named parameter          */
+#define	RPAR	           137		/*        a right parameter          */
+#define	EXT_GALL           138		/*        an external galley         */
+#define	CR_LIST	           139		/*        a list of cross references */
+#define	DISPOSED           140		/*        a disposed record          */
+
+#define is_indefinite(x)  ((x) >= CLOSURE && (x) <= HEAD)
+#define is_definite(x) 	 ((x) >= SPLIT && (x) <= GRAPHIC)
+#define	is_par(x)	((x) >= LPAR   && (x) <= RPAR)
+#define	is_index(x)	((x) >= DEAD && (x) <= EXPAND_IND)
+#define	is_type(x)	((x) >= LINK && (x) < DISPOSED)
+#define	is_word(x)	((x) == WORD || (x) == QWORD)
+#define	is_cross(x)	((x) == CROSS || (x) == FORCE_CROSS)
+#define is_cat_op(x)    (((x)>=ACAT && (x)<=VCAT) || (x)==TSPACE || (x)<=TJUXTA)
+
+
+/*@::miscellaneous constants@*************************************************/
+/*                                                                           */
+/*  Miscellaneous globally defined constants                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+/* gap modes occupying mode(x) */
+#define	NO_MODE		     0		/* for error detection: no mode      */
+#define	EDGE_MODE	     1		/* edge-to-edge spacing              */
+#define	HYPH_MODE	     2		/* edge-to-edge with hyphenation     */
+#define	MARK_MODE	     3		/* mark-to-mark spacing              */
+#define	OVER_MODE	     4		/* overstrike spacing                */
+#define	KERN_MODE	     5		/* kerning spacing                   */
+#define	TAB_MODE	     6		/* tabulation spacing                */
+#define	ADD_HYPH	     7		/* temp value used by FillObject     */
+
+/* hyph_style(style) options                                                 */
+#define	HYPH_UNDEF	     0		/* hyphenation option undefined      */
+#define	HYPH_OFF	     1		/* hyphenation off                   */
+#define	HYPH_ON		     2		/* hyphenation on                    */
+
+/* fill_style(style) options                                                 */
+#define	FILL_UNDEF	     0		/* fill option undefined             */
+#define	FILL_OFF	     1		/* no filling of lines               */
+#define	FILL_ON		     2		/* fill lines with text              */
+
+/* underline(obj) options                                                    */
+#define	UNDER_UNDEF	     0		/* underline undefined               */
+#define	UNDER_OFF	     1		/* no underlining	             */
+#define	UNDER_ON	     2		/* underline this                    */
+
+/* space_style(style) options                                                */
+#define	SPACE_LOUT	     0		/* interpret white space Lout's way  */
+#define	SPACE_COMPRESS	     1		/* compress multiple white spaces    */
+#define	SPACE_SEPARATE	     2		/* compress an separate              */
+#define	SPACE_TROFF	     3		/* interpret white space troff's way */
+#define	SPACE_TEX	     4		/* interpret white space TeX's way   */
+
+/* display_style(style) options                                              */
+#define	DISPLAY_UNDEF	     0		/* display option undefined          */
+#define	DISPLAY_ADJUST	     1		/* adjust lines (except last)        */
+#define	DISPLAY_OUTDENT	     2		/* outdent lines (except first)      */
+#define	DISPLAY_ORAGGED	     3		/* outdent but don't adjust          */
+#define	DISPLAY_LEFT	     4		/* left-justify lines, no adjust     */
+#define	DISPLAY_CENTRE	     5		/* centre lines, no adjust           */
+#define	DISPLAY_RIGHT	     6		/* right-justify lines, no adjust    */
+#define	DO_ADJUST	     7		/* placed in ACATs when adjust need  */
+
+/* small_caps(style) options                                                 */
+#define	SMALL_CAPS_OFF	     0		/* don't want small capitals         */
+#define	SMALL_CAPS_ON	     1		/* small capitals                    */
+
+/* sides of a mark */
+#define	BACK	           141		/* means lies to left of mark        */
+#define	ON	           142		/* means lies on mark                */
+#define	FWD	           143		/* means lies to right of mark       */
+
+/* statuses of thread objects */
+#define	NOTSIZED	 0		/* this thread object is not sized   */
+#define	SIZED		 1		/* thread is sized but not printed   */
+#define	FINALSIZE	 2		/* thread object size is now final   */
+
+/* constraint statuses */
+#define	PROMOTE	           144		/* this component may be promoted    */
+#define	CLOSE	           145		/* must close dest before promoting  */
+#define	BLOCK	           146		/* cannot promote this component     */
+#define	CLEAR	           147		/* this constraint is now satisfied  */
+
+/* gap increment types */
+#define	GAP_ABS	           148		/* absolute,  e.g.  3p               */
+#define	GAP_INC	           149		/* increment, e.g. +3p               */
+#define	GAP_DEC	           150		/* decrement, e.g. -3p               */
+
+/* file types */
+#define	SOURCE_FILE	 0		/* input file from command line      */
+#define	INCLUDE_FILE	 1		/* @Include file                     */
+#define	INCGRAPHIC_FILE	 2		/* @IncludeGraphic file              */
+#define	DATABASE_FILE	 3		/* database file                     */
+#define	INDEX_FILE	 4		/* database index file               */
+#define	FONT_FILE	 5		/* font file                         */
+#define	PREPEND_FILE	 6		/* PostScript prologue file          */
+#define	HYPH_FILE	 7		/* hyphenation file                  */
+#define	HYPH_PACKED_FILE 8		/* packed hyphenation file           */
+#define	MAPPING_FILE	 9		/* character mapping file            */
+#define	FILTER_FILE	10		/* filter output file                */
+#define	MAX_TYPES	11		/* number of file types              */
+
+/* path types (i.e. sequences of directories for file searching) */
+#define	SOURCE_PATH	 0		/* path to search for source files   */
+#define	INCLUDE_PATH	 1		/* path for @Include files           */
+#define	SYSINCLUDE_PATH	 2		/* path for @SysInclude files        */
+#define	DATABASE_PATH	 3		/* path for @Database files          */
+#define	SYSDATABASE_PATH 4		/* path for @SysDatabase files       */
+#define	FONT_PATH	 5		/* path for font metrics (AFM) files */
+#define	HYPH_PATH	 6		/* path for hyphenation files        */
+#define	MAPPING_PATH	 7		/* path for mapping (LCM) files      */
+#define	MAX_PATHS	 8		/* number of mapping paths           */
+
+/* units of measurement */
+#define	NO_UNIT		 0		/* no unit - for error detection     */
+#define	FIXED_UNIT	 1		/* inches, cm, points, ems, y, z     */
+#define	FRAME_UNIT	 2		/* b unit (frame widths)             */
+#define	AVAIL_UNIT	 3		/* r unit (available spaces)         */
+#define	DEG_UNIT	 4		/* d unit (degrees)                  */
+#define	NEXT_UNIT	 5		/* w unit (inners)                   */
+ 
+/* units of distance as multiples of the basic unit */
+#define	CM	       567		/* 1 centimetre                      */
+#define	IN	      1440		/* 1 inch                            */
+#define	EM	       120		/* 1 em (= 1/12 inch)                */
+#define	PT		20		/* 1 point (= 1/72 inch)             */
+#define	FR	      4096		/* virtual unit for frame units      */
+#define	DG	       128		/* virtual unit for degrees          */
+#define	SF	       128		/* virtual unit for @Scale factors   */
+
+/* default size of characters for the PLAINTEXT back end */
+#define	PLAIN_WIDTH    144		/* default char width, 10 per inch   */
+#define	PLAIN_HEIGHT   240		/* default char height, 6 per inch   */
+
+/* precedences */
+#define	NO_PREC		 0		/* lower than any precedence         */
+#define	BEGIN_PREC	 1		/* precedence of @Begin              */
+#define	END_PREC	 2		/* precedence of @End                */
+#define	LBR_PREC	 3		/* precedence of {                   */
+#define	RBR_PREC	 4		/* precedence of }                   */
+#define	VCAT_PREC	 5		/* precedence of /                   */
+#define	HCAT_PREC	 6		/* precedence of |                   */
+#define	ACAT_PREC	 7		/* precedence of & and white space   */
+#define	MIN_PREC        10		/* minimum precedence of user ops    */
+#define	MAX_PREC       100		/* maximim precedence of user ops    */
+#define	DEFAULT_PREC   100		/* default precedence of user ops    */
+#define CROSSOP_PREC   101		/* precedence of && and &&& ops      */
+#define GAP_PREC       102		/* precedence of gap op after cat op */
+#define JUXTA_PREC     103		/* precedence of juxtaposition &     */
+#define	FILTER_PREC    104		/* precedence of filter symbol ops   */
+#define	FORCE_PREC     105		/* higher than any precedence        */
+
+/* back ends */
+#define POSTSCRIPT       0		/* PostScript back end               */
+#define	PLAINTEXT	 1		/* plain text back end               */
+#define	PDF		 2
+
+/* error types */
+#define	INTERN	0			/* internal error (i.e. bug)         */
+#define	FATAL	1			/* fatal error, abort now            */
+#define	WARN	2			/* warning, non-fatal                */
+
+/* status values returned by AttachGalley() */
+#define	ATTACH_KILLED	 0
+#define	ATTACH_INPUT	 1
+#define	ATTACH_NOTARGET	 2
+#define	ATTACH_SUSPEND	 3
+#define	ATTACH_NULL	 4
+#define	ATTACH_ACCEPT	 5
+
+/* types of memory usage, used to debug memory consumption */
+#define	MEM_BINARY	 0		/* the executable binary	     */
+#define	MEM_OBJECTS	 1		/* objects currently in free list    */
+#define	MEM_FONTS	 2		/* fonts                             */
+#define	MEM_LEX		 3		/* lexical analyser file buffers     */
+#define	MEM_FILES	 4		/* table of file names               */
+#define	MEM_CROSSREF	 5		/* table of file names               */
+#define	MEM_PAGES	 6		/* page grids (-p only)              */
+#define	MEM_DBCHECK	 7		/* database checks                   */
+#define	MEM_DB	         8		/* in_memory database                */
+#define	MEM_HYPH_PATS	 9		/* hyphenation patterns              */
+#define	MEM_CMAPS	10		/* character maps                    */
+#define	MEM_COLOUR_TAB	11		/* colour table                      */
+#define	MEM_LANG_TAB	12		/* language table                    */
+#define	MEM_USAGE_MAX	13		/* number of memory usage types      */
+
+/*@::Keywords@****************************************************************/
+/*                                                                           */
+/*  Keywords.                                                                */
+/*                                                                           */
+/*****************************************************************************/
+
+#define	KW_START		AsciiToFull("\\Start")
+#define	KW_PRINT		AsciiToFull("\\Print")
+#define	KW_OPTGALL		AsciiToFull("@OptGall")
+#define	KW_DEF			AsciiToFull("def")
+#define	KW_FONTDEF		AsciiToFull("fontdef")
+#define	KW_LANGDEF		AsciiToFull("langdef")
+#define	KW_FORCE		AsciiToFull("force")
+#define	KW_HORIZ		AsciiToFull("horizontally")
+#define	KW_INTO			AsciiToFull("into")
+#define	KW_EXTEND		AsciiToFull("extend")
+#define	KW_IMPORT		AsciiToFull("import")
+#define	KW_EXPORT		AsciiToFull("export")
+#define	KW_PRECEDENCE		AsciiToFull("precedence")
+#define	KW_ASSOC		AsciiToFull("associativity")
+#define	KW_LEFT			AsciiToFull("left")
+#define	KW_RIGHT		AsciiToFull("right")
+#define	KW_BODY			AsciiToFull("body")
+#define	KW_FILTER		AsciiToFull("@Filter")
+#define	KW_FILTERIN		AsciiToFull("@FilterIn")
+#define	KW_FILTEROUT		AsciiToFull("@FilterOut")
+#define	KW_FILTERERR		AsciiToFull("@FilterErr")
+#define	KW_MACRO		AsciiToFull("macro")
+#define	KW_NAMED		AsciiToFull("named")
+#define	KW_COMPULSORY		AsciiToFull("compulsory")
+#define	KW_COMMON		AsciiToFull("@Common")
+#define	KW_RUMP			AsciiToFull("@Rump")
+#define	KW_MELD			AsciiToFull("@Meld")
+#define	KW_INSERT		AsciiToFull("@Insert")
+#define	KW_ONE_OF		AsciiToFull("@OneOf")
+#define	KW_NEXT			AsciiToFull("@Next")
+#define	KW_PLUS			AsciiToFull("@Plus")
+#define	KW_MINUS		AsciiToFull("@Minus")
+#define	KW_WIDE			AsciiToFull("@Wide")
+#define	KW_HIGH			AsciiToFull("@High")
+#define	KW_HSHIFT		AsciiToFull("@HShift")
+#define	KW_VSHIFT		AsciiToFull("@VShift")
+#define	KW_ONE_COL		AsciiToFull("@OneCol")
+#define	KW_ONE_ROW		AsciiToFull("@OneRow")
+#define	KW_HSCALE		AsciiToFull("@HScale")
+#define	KW_VSCALE		AsciiToFull("@VScale")
+#define	KW_HCOVER		AsciiToFull("@HCover")
+#define	KW_VCOVER		AsciiToFull("@VCover")
+#define	KW_SCALE		AsciiToFull("@Scale")
+#define	KW_KERN_SHRINK		AsciiToFull("@KernShrink")
+#define	KW_HCONTRACT		AsciiToFull("@HContract")
+#define	KW_VCONTRACT		AsciiToFull("@VContract")
+#define	KW_HLIMITED		AsciiToFull("@HLimited")
+#define	KW_VLIMITED		AsciiToFull("@VLimited")
+#define	KW_HEXPAND		AsciiToFull("@HExpand")
+#define	KW_VEXPAND		AsciiToFull("@VExpand")
+#define	KW_STARTHVSPAN		AsciiToFull("@StartHVSpan")
+#define	KW_STARTHSPAN		AsciiToFull("@StartHSpan")
+#define	KW_STARTVSPAN		AsciiToFull("@StartVSpan")
+#define	KW_HSPAN		AsciiToFull("@HSpan")
+#define	KW_VSPAN		AsciiToFull("@VSpan")
+#define	KW_PADJUST		AsciiToFull("@PAdjust")
+#define	KW_HADJUST		AsciiToFull("@HAdjust")
+#define	KW_VADJUST		AsciiToFull("@VAdjust")
+#define	KW_ROTATE		AsciiToFull("@Rotate")
+#define	KW_BACKGROUND		AsciiToFull("@Background")
+#define	KW_INCGRAPHIC		AsciiToFull("@IncludeGraphic")
+#define	KW_SINCGRAPHIC		AsciiToFull("@SysIncludeGraphic")
+#define	KW_GRAPHIC		AsciiToFull("@Graphic")
+#define	KW_PLAINGRAPHIC		AsciiToFull("@PlainGraphic")
+#define	KW_VERBATIM		AsciiToFull("@Verbatim")
+#define	KW_RAWVERBATIM		AsciiToFull("@RawVerbatim")
+#define	KW_CASE			AsciiToFull("@Case")
+#define	KW_YIELD		AsciiToFull("@Yield")
+#define	KW_BACKEND		AsciiToFull("@BackEnd")
+#define	KW_XCHAR		AsciiToFull("@Char")
+#define	KW_FONT			AsciiToFull("@Font")
+#define	KW_SPACE		AsciiToFull("@Space")
+#define	KW_YUNIT		AsciiToFull("@YUnit")
+#define	KW_ZUNIT		AsciiToFull("@ZUnit")
+#define	KW_BREAK		AsciiToFull("@Break")
+#define	KW_UNDERLINE		AsciiToFull("@Underline")
+#define	KW_COLOUR		AsciiToFull("@SetColour")
+#define	KW_COLOR		AsciiToFull("@SetColor")
+#define	KW_LANGUAGE		AsciiToFull("@Language")
+#define	KW_CURR_LANG		AsciiToFull("@CurrLang")
+#define	KW_CURR_FAMILY		AsciiToFull("@CurrFamily")
+#define	KW_CURR_FACE		AsciiToFull("@CurrFace")
+#define	KW_ENV			AsciiToFull("@LEnv")
+#define	KW_ENVA			AsciiToFull("@@A")
+#define	KW_ENVB			AsciiToFull("@@B")
+#define	KW_ENVC			AsciiToFull("@@C")
+#define	KW_ENVD			AsciiToFull("@@D")
+#define	KW_CENV			AsciiToFull("@@E")
+#define	KW_CLOS			AsciiToFull("@LClos")
+#define	KW_LVIS			AsciiToFull("@@V")
+#define	KW_LUSE			AsciiToFull("@LUse")
+#define	KW_LEO			AsciiToFull("@LEO")
+#define	KW_OPEN			AsciiToFull("@Open")
+#define	KW_USE			AsciiToFull("@Use")
+#define	KW_NOT_REVEALED		AsciiToFull("@NotRevealed")
+#define	KW_TAGGED		AsciiToFull("@Tagged")
+#define	KW_DATABASE		AsciiToFull("@Database")
+#define	KW_SYSDATABASE		AsciiToFull("@SysDatabase")
+#define	KW_INCLUDE		AsciiToFull("@Include")
+#define	KW_SYSINCLUDE		AsciiToFull("@SysInclude")
+#define	KW_PREPEND		AsciiToFull("@PrependGraphic")
+#define	KW_SYSPREPEND		AsciiToFull("@SysPrependGraphic")
+#define	KW_TARGET		AsciiToFull("@Target")
+#define	KW_FOLLOWING		AsciiToFull("following")
+#define	KW_PRECEDING		AsciiToFull("preceding")
+#define	KW_FOLL_OR_PREC		AsciiToFull("foll_or_prec")
+#define	KW_NOW			AsciiToFull("now")
+#define	KW_NULL			AsciiToFull("@Null")
+#define	KW_PAGE_LABEL		AsciiToFull("@PageLabel")
+#define	KW_GALLEY		AsciiToFull("@Galley")
+#define	KW_FORCE_GALLEY		AsciiToFull("@ForceGalley")
+#define	KW_INPUT		AsciiToFull("@LInput")
+#define	KW_SPLIT		AsciiToFull("@Split")
+#define	KW_TAG			AsciiToFull("@Tag")
+#define	KW_KEY			AsciiToFull("@Key")
+#define	KW_OPTIMIZE		AsciiToFull("@Optimize")
+#define	KW_MERGE		AsciiToFull("@Merge")
+#define	KW_ENCLOSE		AsciiToFull("@Enclose")
+#define	KW_CROSS		AsciiToFull("&&")
+#define	KW_FORCE_CROSS		AsciiToFull("&&&")
+#define	KW_LBR			AsciiToFull("{")
+#define	KW_RBR			AsciiToFull("}")
+#define	KW_BEGIN		AsciiToFull("@Begin")
+#define	KW_END			AsciiToFull("@End")
+#define	KW_VCAT_NN		AsciiToFull("//")
+#define	KW_VCAT_MN		AsciiToFull("^//")
+#define	KW_VCAT_NJ		AsciiToFull("/")
+#define	KW_VCAT_MJ		AsciiToFull("^/")
+#define	KW_HCAT_NN		AsciiToFull("||")
+#define	KW_HCAT_MN		AsciiToFull("^||")
+#define	KW_HCAT_NJ		AsciiToFull("|")
+#define	KW_HCAT_MJ		AsciiToFull("^|")
+#define	KW_ACAT_NJ		AsciiToFull("&")
+#define	KW_ACAT_MJ		AsciiToFull("^&")
+#define	KW_MOMENT		AsciiToFull("@Moment")
+#define	KW_SECOND		AsciiToFull("@Second")
+#define	KW_MINUTE		AsciiToFull("@Minute")
+#define	KW_HOUR			AsciiToFull("@Hour")
+#define	KW_DAY			AsciiToFull("@Day")
+#define	KW_MONTH		AsciiToFull("@Month")
+#define	KW_YEAR			AsciiToFull("@Year")
+#define	KW_CENTURY		AsciiToFull("@Century")
+#define	KW_WEEKDAY		AsciiToFull("@WeekDay")
+#define	KW_YEARDAY		AsciiToFull("@YearDay")
+#define	KW_DAYLIGHTSAVING	AsciiToFull("@DaylightSaving")
+
+/*@::GetMem(), New(), NewWord()@**********************************************/
+/*                                                                           */
+/*  GetMem(x, siz, pos)                                                      */
+/*  New(x, typ)                                                              */
+/*  NewWord(x, typ, len, pos)                                                */
+/*                                                                           */
+/*  Set x to point to a new record, of appropriate length (in ALIGNs).       */
+/*  The New and NewWord versions initialise LIST, type and rec_size fields.  */
+/*  NewWord must be used for WORD and QWORD objects.                         */
+/*                                                                           */
+/*****************************************************************************/
+
+#if DEBUG_ON
+#define newcount zz_newcount++
+#define freecount zz_listcount--
+
+#define checknew(typ)							\
+{ assert1( is_type(typ), "New: type", Image(typ) );			\
+  assert(  zz_lengths[typ] > 0, "New: zero length!" );			\
+}
+
+#define checkmem(z, typ)						\
+{ if( (MemCheck != 0) && ( (POINTER) z == MemCheck) )			\
+    fprintf(stderr, "%ld = New(%s)\n", (long) z, Image(type(z)));	\
+}
+
+#else
+#define newcount
+#define freecount
+#define checknew(typ)
+#define checkmem(z, typ)
+#endif
+
+#define	GetMem(x, siz, pos)						\
+{ newcount;								\
+  if( (zz_size=(siz)) >= MAX_OBJECT_REC )				\
+    Error(1, 1, "word is too long", FATAL, pos);			\
+  else if( zz_free[zz_size] == nilobj )					\
+    x = GetMemory(zz_size, pos);					\
+  else									\
+  { x = zz_hold = zz_free[zz_size];					\
+    freecount;								\
+    zz_free[zz_size] = pred(zz_hold, CHILD);				\
+  }									\
+}
+
+#define	New(x, typ)							\
+{ checknew(typ);							\
+  GetMem(zz_hold, zz_lengths[typ], no_fpos);				\
+  type(zz_hold) = typ;							\
+  checkmem(zz_hold, typ);						\
+  x = pred(zz_hold, CHILD) = succ(zz_hold, CHILD) =			\
+  pred(zz_hold, PARENT) = succ(zz_hold, PARENT) = zz_hold;		\
+}
+
+#define NewWord(x, typ, len, pos)					\
+{ zz_size = sizeof(struct word_type) - 4 + ((len)+1)*sizeof(FULL_CHAR);	\
+  /* NB the following line RESETS zz_size */				\
+  GetMem(zz_hold, ceiling(zz_size, sizeof(ALIGN)), pos);		\
+  checkmem(zz_hold, typ);						\
+  rec_size(zz_hold) = zz_size;						\
+  type(zz_hold) = typ;							\
+  x = pred(zz_hold, CHILD) = succ(zz_hold, CHILD) =			\
+  pred(zz_hold, PARENT) = succ(zz_hold, PARENT) = zz_hold;		\
+}
+
+/*@::PutMem(), Dispose()@*****************************************************/
+/*                                                                           */
+/*  PutMem(x, siz)                                                           */
+/*  Dispose(x)                                                               */
+/*                                                                           */
+/*  Dispose x, which is of size siz.  Dispose works out the size itself.     */
+/*                                                                           */
+/*****************************************************************************/
+#if DEBUG_ON
+#define disposecount zz_disposecount++; zz_listcount++;
+
+#define disposecheck							\
+{ assert( zz_size >= 0 && zz_size < MAX_OBJECT_REC, "Dispose: size" );	\
+}
+ 
+#define	setdisposed							\
+{ if( (MemCheck != 0) && ((POINTER) zz_hold == MemCheck) )		\
+    fprintf(stderr, "Dispose(%ld, %s)\n", (long) zz_hold,		\
+      Image(type(zz_hold)));						\
+  type(zz_hold) = DISPOSED;						\
+}
+
+#else
+#define disposecount
+#define disposecheck
+#define	setdisposed
+#endif
+
+#define PutMem(x, siz)							\
+{ disposecount;								\
+  zz_hold = (x);							\
+  zz_size = (siz);							\
+  disposecheck;								\
+  pred(zz_hold, CHILD) = zz_free[zz_size];				\
+  zz_free[zz_size] = zz_hold;						\
+}
+
+#define Dispose(x)							\
+{ zz_hold = (x);							\
+  PutMem(zz_hold, is_word(type(zz_hold)) ?				\
+    rec_size(zz_hold) : zz_lengths[type(zz_hold)]);			\
+  setdisposed;								\
+}
+
+/*@::Append(), Delete()@******************************************************/
+/*                                                                           */
+/*  OBJECT Append(x, y, dir)                                                 */
+/*                                                                           */
+/*  Return the append of lists x and y (dir is PARENT or CHILD).             */
+/*                                                                           */
+/*****************************************************************************/
+
+#define	Append(x, y, dir)						\
+( zz_res = (x),	zz_hold = (y),						\
+  zz_hold == nilobj ? zz_res  :						\
+  zz_res  == nilobj ? zz_hold :						\
+  ( zz_tmp = pred(zz_hold, dir),					\
+    pred(zz_hold, dir) = pred(zz_res, dir),				\
+    succ(pred(zz_res, dir), dir) = zz_hold,				\
+    pred(zz_res, dir) = zz_tmp,						\
+    succ(zz_tmp, dir) = zz_res						\
+  )									\
+)
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT Delete(x, dir)                                                    */
+/*                                                                           */
+/*  Delete x from its dir list, and return succ(x, dir) or nilobj if none.   */
+/*                                                                           */
+/*****************************************************************************/
+
+#define Delete(x, dir)							\
+( zz_hold = (x),							\
+  succ(zz_hold, dir) == zz_hold ? nilobj :				\
+  ( zz_res = succ(zz_hold, dir),					\
+    pred(zz_res, dir) = pred(zz_hold, dir),				\
+    succ(pred(zz_hold, dir), dir) = zz_res,				\
+    pred(zz_hold, dir) = succ(zz_hold, dir) = zz_hold,			\
+    zz_res								\
+  )									\
+)
+
+#define Down(x)		succ(x, CHILD)
+#define NextDown(x)	succ(x, CHILD)
+#define LastDown(x)	pred(x, CHILD)
+#define PrevDown(x)	pred(x, CHILD)
+#define	Up(x)		succ(x, PARENT)
+#define	NextUp(x)	succ(x, PARENT)
+#define	LastUp(x)	pred(x, PARENT)
+#define	PrevUp(x)	pred(x, PARENT)
+
+#define	Child(y, link)							\
+for( y = pred(link, PARENT);  type(y) == LINK;  y = pred(y, PARENT) )
+
+#define CountChild(y, link, i)                                          \
+for( y=pred(link, PARENT), i=1; type(y)==LINK;  y = pred(y, PARENT), i++ )
+
+#define	Parent(y, link)							\
+for( y = pred(link, CHILD);   type(y) == LINK;  y = pred(y, CHILD) )
+
+
+/*@::UpDim(), DownDim(), Link(), DeleteLink(), etc.@**************************/
+/*                                                                           */
+/*  UpDim(x, dim)                                                            */
+/*  DownDim(x, dim)                                                          */
+/*                                                                           */
+/*  Returns the dim child or parent link of node x (dim == COLM or ROWM).    */
+/*                                                                           */
+/*****************************************************************************/
+
+#define UpDim(x, dim)	( (dim) == COLM ? succ(x, PARENT) : pred(x, PARENT) )
+#define DownDim(x, dim)	( (dim) == COLM ? succ(x, CHILD) : pred(x, CHILD) )
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT Link(x, y)                                                        */
+/*                                                                           */
+/*  Make y a child of x in the directed graph, using a new link.             */
+/*  The link node is returned.                                               */
+/*                                                                           */
+/*****************************************************************************/
+
+#define Link(x, y)							\
+{ New(xx_link, LINK);							\
+  Append(xx_link, (x), CHILD);						\
+  Append(xx_link, (y), PARENT);						\
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DeleteLink(link)                                                         */
+/*                                                                           */
+/*  Cut the link between nodes x and y of the directed graph.                */
+/*  Returns the link node of the next child of x, or x if none.              */
+/*                                                                           */
+/*****************************************************************************/
+
+#define DeleteLink(link)						\
+{ xx_link = (link);							\
+  Delete(xx_link, PARENT);						\
+  Delete(xx_link, CHILD);						\
+  Dispose(xx_link);							\
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DisposeChild(link)                                                       */
+/*                                                                           */
+/*  Delete link, and if its child is thereby unattached, dispose it.         */
+/*                                                                           */
+/*****************************************************************************/
+
+#define DisposeChild(link)						\
+{ xx_link = (link);							\
+  xx_tmp = Delete(xx_link, PARENT);					\
+  Delete(xx_link, CHILD);						\
+  Dispose(xx_link);							\
+  if( succ(xx_tmp, PARENT) == xx_tmp )  DisposeObject(xx_tmp);		\
+} /* end DisposeChild */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  MoveLink(link, x, dir)                                                   */
+/*                                                                           */
+/*  Move the dir end of link from wherever it is now to node x.              */
+/*                                                                           */
+/*****************************************************************************/
+
+#define MoveLink(link, x, dir)						\
+( xx_link = (link),							\
+  Delete(xx_link, 1 - (dir) ),						\
+  Append(xx_link, (x), 1 - (dir) )					\
+) /* end MoveLink */
+
+
+/*@::TransferLinks(), DeleteNode(), etc.@*************************************/
+/*                                                                           */
+/*  TransferLinks(start_link, stop_link, dest_link)                          */
+/*                                                                           */
+/*  Move parent end of links start_link (inclusive) to stop_link (exclusive) */
+/*  to just before dest_link.                                                */
+/*                                                                           */
+/*****************************************************************************/
+
+#define TransferLinks(start_link, stop_link, dest_link)			\
+{ OBJECT xxstart = start_link, xxstop = stop_link, xxdest = dest_link;	\
+  if( xxstart != xxstop )						\
+  {	assert( type(xxstart) == LINK, "TransferLinks: start_link!" );	\
+	Append(xxstart, xxstop, CHILD); /* actually a split */		\
+	Append(xxstart, xxdest, CHILD);					\
+  }									\
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DeleteNode(x)                                                            */
+/*                                                                           */
+/*  Delete node x and every edge attaching to x.                             */
+/*                                                                           */
+/*****************************************************************************/
+
+#define DeleteNode(x)							\
+{ xx_hold = (x);							\
+  while( Up(xx_hold)   != xx_hold ) DeleteLink( Up(xx_hold) );		\
+  while( Down(xx_hold) != xx_hold ) DeleteLink( Down(xx_hold) );	\
+  Dispose(xx_hold);							\
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  MergeNode(x, y)                                                          */
+/*                                                                           */
+/*  Take all the children of y and make them children of x.                  */
+/*  Take all the parents of y and make them parents of x.  Dispose y.        */
+/*                                                                           */
+/*****************************************************************************/
+
+#define MergeNode(x, y)							\
+{ xx_res = (x); xx_hold = (y);						\
+  xx_tmp = Delete(xx_hold, PARENT);					\
+  Append(xx_res, xx_tmp, PARENT);					\
+  xx_tmp = Delete(xx_hold, CHILD);					\
+  Append(xx_res, xx_tmp, CHILD);					\
+  Dispose(xx_hold);							\
+}  /* end MergeNode */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  ReplaceNode(x, y)                                                        */
+/*                                                                           */
+/*  Move all the parent links of y to x.                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+#define ReplaceNode(x, y)						\
+( xx_tmp = Delete((y), PARENT),						\
+  Append((x), xx_tmp, PARENT)						\
+) /* end ReplaceNode */
+
+
+/*@::FirstDefinite(), NextDefinite(), etc.@***********************************/
+/*                                                                           */
+/*  FirstDefinite(x, link, y, jn)                                            */
+/*                                                                           */
+/*  On input, x is an object and link and y are undefined.  On output there  */
+/*  are two cases:                                                           */
+/*                                                                           */
+/*  link != x.  Then y is first definite child of x and link is its link;    */
+/*              jn is TRUE iff all gaps on the way to link were joined.      */
+/*                                                                           */
+/*  link == x.  Then x has no definite child and y is undefined.             */
+/*                                                                           */
+/*  A SPLIT object is considered to be definite if both its children are     */
+/*  definite.  This condition is returned by SplitIsDefinite.                */
+/*                                                                           */
+/*****************************************************************************/
+
+#define FirstDefinite(x, link, y, jn)					\
+{ jn = TRUE;								\
+  for( link = Down(x);  link != x;  link = NextDown(link) )		\
+  { Child(y, link);							\
+    if( type(y) == GAP_OBJ )  jn = jn && join(gap(y));			\
+    else if( type(y)==SPLIT ? SplitIsDefinite(y) : is_definite(type(y)))\
+      break;								\
+  }									\
+} /* end FirstDefinite */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  NextDefinite(x, link, y)                                                 */
+/*                                                                           */
+/*  On input, x is an object and link is a link to one of its children; y    */
+/*  is undefined.  On output there are two cases:                            */
+/*                                                                           */
+/*  link != x.  Then y is the first definite child of x following link, and  */
+/*              link is changed to be the link of y.                         */
+/*                                                                           */
+/*  link == x.  Then x has no definite child following link, and y remains   */
+/*              undefined.                                                   */
+/*                                                                           */
+/*****************************************************************************/
+
+#define NextDefinite(x, link, y)					\
+{ for( link = NextDown(link);  link != x;  link = NextDown(link) )	\
+  { Child(y, link);							\
+    if( type(y) == SPLIT ? SplitIsDefinite(y) : is_definite(type(y)) )	\
+	break;								\
+  }									\
+} /* end NextDefinite */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  NextDefiniteWithGap(x, link, y, g, jn)                                   */
+/*                                                                           */
+/*  On input, x is an object and link is a link to one of its children; y    */
+/*  and g are undefined.  On output there are two cases:                     */
+/*                                                                           */
+/*  link != x.  Then y is the first definite child of x following link, and  */
+/*              link is changed to be the link of y.  Also, g is defined     */
+/*              to be the gap just before y; this must exist and is tested   */
+/*              by an assert test; and jn is true iff all of the gaps on     */
+/*              the way from old link to new link are join gaps.             */
+/*                                                                           */
+/*  link == x.  Then x has no definite child following link, and y and g     */
+/*              remain undefined.                                            */
+/*                                                                           */
+/*****************************************************************************/
+
+#define NextDefiniteWithGap(x, link, y, g, jn)				\
+{ g = nilobj;  jn = TRUE;						\
+  for( link = NextDown(link);  link != x;  link = NextDown(link) )	\
+  { Child(y, link);							\
+    if( type(y) == GAP_OBJ )  g = y, jn = jn && join(gap(y));		\
+    else if( type(y)==SPLIT ? SplitIsDefinite(y):is_definite(type(y)) )	\
+    {									\
+      debug2(DFS, D, "  NextDefiniteWithGap at %s %s",			\
+	Image(type(y)), EchoObject(y));					\
+      assert( g != nilobj, "NextDefiniteWithGap: g == nilobj!" );	\
+      break;								\
+    }									\
+  }									\
+} /* end NextDefiniteWithGap */
+
+/*@@**************************************************************************/
+/*                                                                           */
+/*  LastDefinite(x, link, y)                                                 */
+/*                                                                           */
+/*  On input, x is an object and link and y are undefined.  On output there  */
+/*  are two cases:                                                           */
+/*                                                                           */
+/*  link != x.  Then y is the last definite child of x and link is its link. */
+/*                                                                           */
+/*  link == x.  Then x has no definite child and y is undefined.             */
+/*                                                                           */
+/*  A SPLIT object is considered to be definite if both its children are     */
+/*  definite.  This condition is returned by SplitIsDefinite.                */
+/*                                                                           */
+/*****************************************************************************/
+
+#define LastDefinite(x, link, y)					\
+{ for( link = LastDown(x);  link != x;  link = PrevDown(link) )		\
+  { Child(y, link);							\
+    if( type(y) == SPLIT ? SplitIsDefinite(y) : is_definite(type(y)) )	\
+	break;								\
+  }									\
+} /* end LastDefinite */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PrevDefinite(x, link, y)                                                 */
+/*                                                                           */
+/*  On input, x is an object and link is a link to one of its children; y    */
+/*  is undefined.  On output there are two cases:                            */
+/*                                                                           */
+/*  link != x.  Then y is the first definite child of x preceding link, and  */
+/*              link is changed to be the link of y.                         */
+/*                                                                           */
+/*  link == x.  Then x has no definite child preceding link, and y remains   */
+/*              undefined.                                                   */
+/*                                                                           */
+/*****************************************************************************/
+
+#define PrevDefinite(x, link, y)					\
+{ for( link = PrevDown(link);  link != x;  link = PrevDown(link) )	\
+  { Child(y, link);							\
+    if( type(y) == SPLIT ? SplitIsDefinite(y) : is_definite(type(y)) )	\
+	break;								\
+  }									\
+} /* end PrevDefinite */
+
+
+/*@::Module Declarations@*****************************************************/
+/*                                                                           */
+/*  MODULE DECLARATIONS                                                      */
+/*                                                                           */
+/*****************************************************************************/
+
+/*****  z01.c	  Supervise		**************************************/
+extern	int	  main(int argc, char *argv[]);
+extern	POINTER	  MemCheck;
+extern	OBJECT	  StartSym;
+extern	OBJECT	  GalleySym;
+extern	OBJECT	  ForceGalleySym;
+extern	OBJECT	  InputSym;
+extern	OBJECT	  PrintSym;
+extern	OBJECT	  FilterInSym;
+extern	OBJECT	  FilterOutSym;
+extern	OBJECT	  FilterErrSym;
+extern	OBJECT	  VerbatimSym;
+extern	OBJECT	  RawVerbatimSym;
+extern	OBJECT	  OptGallSym;
+extern	OBJECT	  CommandOptions;
+extern	BOOLEAN	  AllowCrossDb;
+extern	BOOLEAN	  UseCollate;
+extern	BOOLEAN	  InMemoryDbIndexes;
+extern	BOOLEAN	  Encapsulated;
+extern	BOOLEAN	  Kern;
+extern	BOOLEAN	  SafeExecution;
+extern	BOOLEAN   AltErrorFormat;
+extern	int	  BackEnd;
+extern	int	  TotalWordCount;
+extern	FULL_CHAR *BackEndWord;
+extern	FULL_LENGTH	  PlainCharWidth;
+extern	FULL_LENGTH	  PlainCharHeight;
+extern	BOOLEAN	  PlainFormFeed;
+extern	BOOLEAN	  InitializeAll;
+#if LOCALE_ON
+extern	nl_catd	  MsgCat;
+#endif
+
+/*****  z02.c	  Lexical Analyser	**************************************/
+extern	BOOLEAN	  LexLegalName(FULL_CHAR *str);
+extern	void	  LexInit(void);
+extern	void	  LexPush(FILE_NUM x, int offs, int ftyp, int lnum, BOOLEAN same);
+extern	void	  LexPop(void);
+extern	long	  LexNextTokenPos(void);
+extern	OBJECT	  LexGetToken(void);
+extern	OBJECT	  LexScanVerbatim(FILE *fp, BOOLEAN end_stop, FILE_POS *err_pos,
+		    BOOLEAN lessskip);
+
+/*****  z03.c	  File Service	        **************************************/
+extern	FILE_POS  *no_fpos;
+extern	void	  InitFiles(void);
+extern	void	  AddToPath(int fpath, OBJECT dirname);
+extern	FILE_NUM  DefineFile(FULL_CHAR *str, FULL_CHAR *suffix,
+		    FILE_POS *xfpos, int ftype, int fpath);
+extern	FILE_NUM  FirstFile(int ftype);
+extern	FILE_NUM  NextFile(FILE_NUM i);
+extern	FILE_NUM  FileNum(FULL_CHAR *str, FULL_CHAR *suffix);
+extern	FILE_NUM  DatabaseFileNum(FILE_POS *xfpos);
+extern	FULL_CHAR *FileName(FILE_NUM fnum);
+extern	FULL_CHAR *FullFileName(FILE_NUM fnum);
+extern	FULL_CHAR *EchoFilePos(FILE_POS *pos);
+extern	FULL_CHAR *EchoAltFilePos(FILE_POS *pos);
+extern	FULL_CHAR *EchoFileSource(FILE_NUM fnum);
+extern	FULL_CHAR *EchoFileLine(FILE_POS *pos);
+extern	FILE_POS  *PosOfFile(FILE_NUM fnum);
+extern	FILE	  *OpenFile(FILE_NUM fnum, BOOLEAN check_ld, BOOLEAN check_lt);
+extern	FILE	  *OpenIncGraphicFile(FULL_CHAR *str, unsigned char typ,
+		    OBJECT *full_name, FILE_POS *xfpos, BOOLEAN *compressed);
+extern	void	  FileSetUpdated(FILE_NUM fnum, int newlines);
+extern	int	  FileGetLineCount(FILE_NUM fnum);
+extern	BOOLEAN	  FileTestUpdated(FILE_NUM fnum);
+
+/*****  z04.c	  Token Service	        **************************************/
+extern	OBJECT	  NewToken(unsigned char xtype, FILE_POS *xfpos,
+		    unsigned char xvspace, unsigned char xhspace,
+		    unsigned char xprec, OBJECT xactual);
+extern	OBJECT	  CopyTokenList(OBJECT x, FILE_POS *pos);
+extern	FULL_CHAR *EchoCatOp(unsigned xtype, BOOLEAN xmark, BOOLEAN xjoin);
+extern	FULL_CHAR *EchoToken(OBJECT x);
+
+/*****  z05.c	  Read Definitions  	**************************************/
+extern	void	  ReadPrependDef(unsigned typ, OBJECT encl);
+extern	void	  ReadDatabaseDef(unsigned typ, OBJECT encl);
+extern	void	  ReadDefinitions(OBJECT *token, OBJECT encl,
+		    unsigned char res_type);
+
+/*****  z06.c	  Object Parser	        **************************************/
+extern	void	  SetScope(OBJECT env, int *count, BOOLEAN vis_only);
+extern	void	  InitParser(FULL_CHAR *cross_db);
+extern	OBJECT	  Parse(OBJECT *token, OBJECT encl, BOOLEAN defs_allowed,
+		    BOOLEAN transfer_allowed);
+
+/*****  z07.c	  Object Service	**************************************/
+extern	BOOLEAN	  SplitIsDefinite(OBJECT x);
+extern	int	  DisposeObject(OBJECT x);
+extern	OBJECT	  MakeWord(unsigned typ, FULL_CHAR *str, FILE_POS *pos);
+extern	OBJECT	  MakeWordTwo(unsigned typ, FULL_CHAR *str1, FULL_CHAR *str2,
+		    FILE_POS *pos);
+extern	OBJECT	  MakeWordThree(FULL_CHAR *s1, FULL_CHAR *s2, FULL_CHAR *s3);
+extern	OBJECT	  CopyObject(OBJECT x, FILE_POS *pos);
+extern	OBJECT	  InsertObject(OBJECT x, OBJECT *ins, STYLE *style);
+extern	OBJECT	  Meld(OBJECT x, OBJECT y);
+
+/*****  z08.c	  Object Manifest	**************************************/
+extern	OBJECT	  ReplaceWithTidy(OBJECT x, BOOLEAN one_word);
+extern	OBJECT	  Manifest(OBJECT x, OBJECT env, STYLE *style, OBJECT bthr[2],
+		    OBJECT fthr[2], OBJECT *target, OBJECT *crs, BOOLEAN ok,
+		    BOOLEAN need_expand, OBJECT *enclose, BOOLEAN fcr);
+
+/*****  z09.c	  Closure Expansion	**************************************/
+extern	OBJECT	  SearchEnv(OBJECT env, OBJECT sym);
+extern	OBJECT	  SetEnv(OBJECT x, OBJECT y);
+extern	void	  AttachEnv(OBJECT env, OBJECT x);
+extern	OBJECT	  GetEnv(OBJECT x);
+extern	OBJECT	  DetachEnv(OBJECT x);
+extern	OBJECT	  ClosureExpand(OBJECT x, OBJECT env, BOOLEAN crs_wanted,
+		    OBJECT *crs, OBJECT *res_env);
+extern	OBJECT	  ParameterCheck(OBJECT x, OBJECT env);
+
+/*****  z10.c	  Cross References	**************************************/
+extern	void	  CrossInit(OBJECT sym);
+extern	OBJECT	  CrossMake(OBJECT sym, OBJECT val, int ctype);
+extern	OBJECT	  GallTargEval(OBJECT sym, FILE_POS *dfpos);
+extern	void	  CrossAddTag(OBJECT x);
+extern	OBJECT	  CrossExpand(OBJECT x, OBJECT env, STYLE *style,
+		    OBJECT *crs, OBJECT *res_env);
+extern	void	  CrossSequence(OBJECT x);
+extern	void	  CrossClose(void);
+
+/*****  z11.c	  Style Service		**************************************/
+extern	FULL_CHAR *EchoStyle(STYLE *style);
+extern	void	  SpaceChange(STYLE *style, OBJECT x);
+extern	void	  BreakChange(STYLE *style, OBJECT x);
+extern	void	  YUnitChange(STYLE *style, OBJECT x);
+extern	void	  ZUnitChange(STYLE *style, OBJECT x);
+
+/*****  z12.c	  Size Finder		**************************************/
+extern	void	  SpannerAvailableSpace(OBJECT y, int dim, FULL_LENGTH *resb,
+		     FULL_LENGTH *resf);
+extern	OBJECT	  MinSize(OBJECT x, int dim, OBJECT *extras);
+
+/*****  z13.c	  Object Breaking	**************************************/
+extern	OBJECT	  BreakObject(OBJECT x, CONSTRAINT *c);
+
+/*****  z14.c	  Object Filling        **************************************/
+extern	OBJECT	  FillObject(OBJECT x, CONSTRAINT *c, OBJECT multi,
+		     BOOLEAN can_hyphenate, BOOLEAN allow_shrink,
+		     BOOLEAN extend_unbreakable, BOOLEAN *hyph_used);
+
+/*****  z15.c	  Size Constraints	**************************************/
+extern	void	  MinConstraint(CONSTRAINT *xc, CONSTRAINT *yc);
+extern	void	  SetSizeToMaxForwardConstraint(FULL_LENGTH *b, FULL_LENGTH *f,
+		    CONSTRAINT *c);
+extern	void	  EnlargeToConstraint(FULL_LENGTH *b, FULL_LENGTH *f,
+		    CONSTRAINT *c);
+extern	int	  ScaleToConstraint(FULL_LENGTH b, FULL_LENGTH f,
+		    CONSTRAINT *c);
+extern	void	  InvScaleConstraint(CONSTRAINT *yc, FULL_LENGTH sf,
+		    CONSTRAINT*xc);
+extern	void	  RotateConstraint(CONSTRAINT *c, OBJECT y, FULL_LENGTH angle,
+		    CONSTRAINT *hc, CONSTRAINT *vc, int dim);
+extern	BOOLEAN	  InsertScale(OBJECT x, CONSTRAINT *c);
+extern	void	  Constrained(OBJECT x, CONSTRAINT *xc, int dim, OBJECT *why);
+extern	FULL_CHAR *EchoConstraint(CONSTRAINT *c);
+extern	void	  DebugConstrained(OBJECT x);
+
+/*****  z16.c	  Size Adjustments	**************************************/
+extern	FULL_LENGTH	  FindShift(OBJECT x, OBJECT y, int dim);
+extern	void	  SetNeighbours(OBJECT link, BOOLEAN ratm, OBJECT *pg,
+		    OBJECT *pdef, OBJECT *sg, OBJECT *sdef, int *side);
+extern	void	  AdjustSize(OBJECT x, FULL_LENGTH b, FULL_LENGTH f, int dim);
+
+/*****  z17.c	  Gap Widths		**************************************/
+extern	void	  GetGap(OBJECT x, STYLE *style, GAP *res_gap,
+		    unsigned *res_inc);
+extern	FULL_LENGTH  MinGap(FULL_LENGTH a, FULL_LENGTH b, FULL_LENGTH c, GAP *xgap);
+extern	FULL_LENGTH  ExtraGap(FULL_LENGTH a, FULL_LENGTH b, GAP *xgap, int dir);
+extern	FULL_LENGTH  ActualGap(FULL_LENGTH a, FULL_LENGTH b, FULL_LENGTH c,
+		       GAP *xgap, FULL_LENGTH f, FULL_LENGTH mk);
+extern	FULL_CHAR *EchoGap(GAP *xgap);
+
+/*****  z18.c	  Galley Transfer	**************************************/
+extern	STYLE	  InitialStyle;
+extern	OBJECT	  InitialEnvironment;
+extern	void	  TransferInit(OBJECT InitEnv);
+extern	OBJECT	  TransferBegin(OBJECT x);
+extern	void	  TransferComponent(OBJECT x);
+extern	void	  TransferEnd(OBJECT x);
+extern	void	  TransferClose(void);
+
+/*****  z19.c	  Galley Attaching	**************************************/
+extern	void	  DetachGalley(OBJECT hd);
+extern	OBJECT	  SearchGalley(OBJECT start, OBJECT sym, BOOLEAN forwards,
+		    BOOLEAN subgalleys, BOOLEAN closures, BOOLEAN input);
+extern	int	  AttachGalley(OBJECT hd, OBJECT *inners, OBJECT *suspend_pt);
+
+/*****  z20.c	  Galley Flushing	**************************************/
+extern	FULL_CHAR *DebugInnersNames(OBJECT inners);
+extern	void	  FlushGalley(OBJECT hd);
+
+/***    z21.c	  Galley Maker		**************************************/
+extern	void	  SizeGalley(OBJECT hd, OBJECT env, BOOLEAN rows,
+		    BOOLEAN joined, BOOLEAN nonblock, BOOLEAN trig,
+		    STYLE *style, CONSTRAINT *c, OBJECT target,
+		    OBJECT *dest_index, OBJECT *recs, OBJECT *inners,
+		    OBJECT enclose);
+
+/***    z22.c	  Galley Service	**************************************/
+extern	void	  Interpose(OBJECT z, int typ, OBJECT x, OBJECT y);
+extern	void	  FlushInners(OBJECT inners, OBJECT hd);
+extern	void	  ExpandRecursives(OBJECT recs);
+extern	void	  Promote(OBJECT hd, OBJECT stop_link, OBJECT dest_index,
+		    BOOLEAN join_after);
+extern	void	  KillGalley(OBJECT hd, BOOLEAN optimize);
+extern	void	  FreeGalley(OBJECT hd, OBJECT stop_link, OBJECT *inners,
+		    OBJECT relocate_link, OBJECT sym);
+extern	void	  SetTarget(OBJECT hd);
+extern	int	  CheckComponentOrder(OBJECT preceder, OBJECT follower);
+
+/*****  z23.c	  Galley Printer	**************************************/
+extern	void	  FixAndPrintObject(OBJECT x, FULL_LENGTH xmk, FULL_LENGTH xb,
+		    FULL_LENGTH xf, int dim, BOOLEAN suppress, FULL_LENGTH pg,int count);
+
+/*****  z24.c	  Print Service         **************************************/
+extern	void	  PrintInit(FILE *file_ptr);
+extern	void	  PrintBeforeFirst(FULL_LENGTH h, FULL_LENGTH v, FULL_CHAR *label);
+extern	void	  PrintBetween(FULL_LENGTH h, FULL_LENGTH v, FULL_CHAR *label);
+extern	void	  PrintWord(OBJECT x, int hpos, int vpos);
+extern	void	  PrintPlainGraphicObject(OBJECT x, FULL_LENGTH xmk,
+		    FULL_LENGTH ymk, OBJECT z);
+extern	void	  PrintUnderline(FONT_NUM fnum, FULL_LENGTH xstart,
+		    FULL_LENGTH xstop, FULL_LENGTH ymk);
+extern	void	  PrintAfterLast(void);
+extern	void	  CoordTranslate(FULL_LENGTH xdist, FULL_LENGTH ydist);
+extern	void	  CoordRotate(FULL_LENGTH amount);
+extern	void	  CoordScale(float hfactor, float vfactor);
+extern	void	  SaveGraphicState(OBJECT x);
+extern	void	  RestoreGraphicState(void);
+extern	void	  PrintGraphicObject(OBJECT x);
+extern	void	  DefineGraphicNames(OBJECT x);
+extern	void	  SaveTranslateDefineSave(OBJECT x,
+		    FULL_LENGTH xdist, FULL_LENGTH ydist);
+extern	void	  PrintGraphicInclude(OBJECT x, FULL_LENGTH colmark,
+		    FULL_LENGTH rowmark);
+
+/*****  z25.c	  Object Echo	        **************************************/
+extern	FULL_CHAR *EchoObject(OBJECT x);
+extern	void	  DebugObject(OBJECT x);
+extern	FULL_CHAR *EchoIndex(OBJECT index);
+extern	void	  DebugGalley(OBJECT hd, OBJECT pinpt, int indent);
+
+/*****  z26.c	  Echo Service	        **************************************/
+extern	void	  BeginString(void);
+extern	void	  AppendString(FULL_CHAR *str);
+extern	FULL_CHAR *EndString(void);
+extern	FULL_CHAR *EchoLength(int len);
+extern	FULL_CHAR *Image(unsigned int c);
+extern	void	  SetLengthDim(int dim);
+
+/*****	z27.c	  Debug Service		**************************************/
+#if DEBUG_ON
+extern	void	  DebugInit(FULL_CHAR *str);
+extern	void	  Debug(int category, int urgency, char *str, ...);
+extern	void	  ProfileOn(char *str);
+extern	void	  ProfileOff(char *str);
+extern	void	  ProfilePrint(void);
+#endif
+
+/*****	z28.c	  Error Service		**************************************/
+extern	void	  ErrorInit(FULL_CHAR *str);
+extern	BOOLEAN	  ErrorSeen(void);
+extern	void	  EnterErrorBlock(BOOLEAN ok_to_print);
+extern	void	  LeaveErrorBlock(BOOLEAN commit);
+extern	void	  CheckErrorBlocks(void);
+extern	POINTER	  Error(int set_num, int msg_num, char *str, int etype,
+		    FILE_POS *pos, ...);
+
+/*****  z29.c	  Symbol Table		**************************************/
+extern	void	  InitSym(void);
+extern	void	  PushScope(OBJECT x, BOOLEAN npars, BOOLEAN vis);
+extern	void	  PopScope(void);
+extern	void	  SuppressVisible(void);
+extern	void	  UnSuppressVisible(void);
+extern	void	  SuppressScope(void);
+extern	void	  UnSuppressScope(void);
+extern	void	  SwitchScope(OBJECT sym);
+extern	void	  UnSwitchScope(OBJECT sym);
+extern	void	  BodyParAllowed(void);
+extern	void	  BodyParNotAllowed(void);
+extern	OBJECT	  InsertSym(FULL_CHAR *str, unsigned char xtype,
+		    FILE_POS *xfpos, unsigned char xprecedence,
+		    BOOLEAN xindefinite, BOOLEAN xrecursive,
+		    unsigned xpredefined, OBJECT xenclosing, OBJECT xbody);
+extern	void	  InsertAlternativeName(FULL_CHAR *str, OBJECT s,
+		    FILE_POS *xfpos);
+extern	OBJECT	  SearchSym(FULL_CHAR *str, int len);
+extern	FULL_CHAR *SymName(OBJECT s);
+extern	FULL_CHAR *FullSymName(OBJECT x, FULL_CHAR *str);
+extern	OBJECT	  ChildSym(OBJECT s, unsigned typ);
+extern	OBJECT	  ChildSymWithCode(OBJECT s, unsigned char code);
+extern	void	  CheckSymSpread(void);
+extern	void	  DeleteEverySym(void);
+extern	void	  DebugScope(void);
+
+/*****  z30.c	  Symbol Uses		**************************************/
+extern	void	  InsertUses(OBJECT x, OBJECT y);
+extern	void	  FlattenUses(void);
+extern	BOOLEAN	  SearchUses(OBJECT x, OBJECT y);
+extern	OBJECT	  FirstExternTarget(OBJECT sym, OBJECT *cont);
+extern	OBJECT	  NextExternTarget(OBJECT sym, OBJECT *cont);
+
+/*****  z31.c	  Memory Allocator	**************************************/
+extern	void	  DebugRegisterUsage(int typ, int delta_num, int delta_size);
+extern	void	  DebugMemory(void);
+extern	void	  MemInit(void);
+extern	OBJECT	  GetMemory(int siz, FILE_POS *pos);
+extern	OBJECT	  zz_free[];
+extern	unsigned char	zz_lengths[];
+extern	int	  zz_newcount;
+extern	int	  zz_disposecount;
+extern	int	  zz_listcount;
+extern	OBJECT	  zz_hold;
+extern	OBJECT	  zz_tmp;
+extern	OBJECT	  zz_res;
+extern	int	  zz_size;
+extern	OBJECT	  xx_link, xx_tmp;
+extern	OBJECT	  xx_hold, xx_res;
+
+/*****  z32.c	  Counter Service           **********************************/
+extern	OBJECT	  Next(OBJECT x, int inc, BOOLEAN *done);
+
+/*****  z33.c	  Database Service	**************************************/
+extern	OBJECT	  OldCrossDb;
+extern	OBJECT	  NewCrossDb;
+extern	OBJECT	  DbCreate(OBJECT x);
+extern	void	  DbInsert(OBJECT db, BOOLEAN gall, OBJECT sym, FULL_CHAR *tag,
+		    FILE_POS *tagfpos, FULL_CHAR *seq, FILE_NUM dfnum,
+		    long dfpos, int dlnum, BOOLEAN check);
+extern	void	  DbConvert(OBJECT db, BOOLEAN full_name);
+extern	void	  DbClose(OBJECT db);
+extern	OBJECT	  DbLoad(OBJECT stem, int fpath, BOOLEAN create, OBJECT symbs,
+		    BOOLEAN in_memory);
+extern	BOOLEAN	  DbRetrieve(OBJECT db, BOOLEAN gall, OBJECT sym,
+		    FULL_CHAR *tag, FULL_CHAR *seq, FILE_NUM *dfnum,
+		    long *dfpos, int *dlnum, long *cont);
+extern	BOOLEAN	  DbRetrieveNext(OBJECT db, BOOLEAN *gall, OBJECT *sym,
+		    FULL_CHAR *tag, FULL_CHAR *seq, FILE_NUM *dfnum,
+		    long *dfpos, int *dlnum, long *cont);
+
+/*****  z34.c	  Rotation Service    	**************************************/
+extern	void	  RotateSize(FULL_LENGTH *xcb, FULL_LENGTH *xcf,
+		    FULL_LENGTH *xrb, FULL_LENGTH *xrf, OBJECT y,
+		    FULL_LENGTH theta);
+
+/*****  z35.c	  Time Keeper     	**************************************/
+extern	FULL_CHAR *TimeString(void);
+extern	void	  InitTime(void);
+extern	OBJECT	  MomentSym;
+extern	OBJECT	  StartMoment(void);
+
+/*****  z36.c	  Hyphenation     	**************************************/
+extern	BOOLEAN	  ReadHyphTable(LANGUAGE_NUM lnum);
+extern	OBJECT	  Hyphenate(OBJECT x);
+
+/*****  z37.c	  Font Service           *************************************/
+extern	FONT_INFO *finfo;
+extern	int	  font_curr_page;
+extern	void	  FontInit(void);
+extern	void	  FontDefine(OBJECT family, OBJECT face, OBJECT inside);
+extern	void	  FontChange(STYLE *style, OBJECT x);
+extern	void	  FontWordSize(OBJECT x);
+extern	FULL_LENGTH  FontSize(FONT_NUM fnum, OBJECT x);
+extern	FULL_LENGTH  FontHalfXHeight(FONT_NUM fnum);
+extern	MAPPING	  FontMapping(FONT_NUM fnum, FILE_POS *xfpos);
+extern	FULL_CHAR *FontName(FONT_NUM fnum);
+extern	FULL_CHAR *FontFamily(FONT_NUM fnum);
+extern	FULL_CHAR *FontFace(FONT_NUM fnum);
+extern	FULL_CHAR *FontFamilyAndFace(FONT_NUM fnum);
+extern	void	  FontPrintAll(FILE *fp);
+extern	void	  FontPrintPageSetup(FILE *fp);
+extern	void	  FontPrintPageResources(FILE *fp);
+extern	void	  FontAdvanceCurrentPage(void);
+extern	void	  FontPageUsed(OBJECT face);
+extern	BOOLEAN	  FontNeeded(FILE *fp);
+
+/*****  z38.c	  Character Mappings    **************************************/
+extern	MAP_VEC	  MapTable[];
+extern	MAPPING	  MapLoad(OBJECT filename, BOOLEAN must_print);
+extern	FULL_CHAR MapCharEncoding(FULL_CHAR *str, MAPPING m);
+extern	FULL_CHAR *MapEncodingName(MAPPING m);
+extern	void	  MapPrintEncodings(FILE *fp);
+extern	void	  MapPrintResources(FILE *fp);
+extern	OBJECT	  MapSmallCaps(OBJECT x, STYLE *style);
+extern	BOOLEAN	  MapIsLowerCase(FULL_CHAR ch, MAPPING m);
+
+
+/*****  z39.c	  String Handler        **************************************/
+#define		  AsciiToFull(x)	( (FULL_CHAR *) (x) )
+#define		  StringEqual(a, b)	(strcmp((char *)(a), (char *)(b))==0)
+extern int	  strcollcmp(char *a, char *b);
+#define		  StringLessEqual(a, b) \
+		    ( UseCollate ? strcollcmp((char *)(a),(char *)(b)) <= 0 \
+				 : strcmp((char *)(a),(char *)(b)) <= 0 )
+#define		  StringCat(a, b)	strcat((char *)(a),(char *)(b))
+#define		  StringCopy(a, b)	strcpy((char *)(a),(char *)(b))
+#define		  StringLength(a)	strlen((char *)(a))
+#define		  StringFOpen(a, b)	fopen( (char *) (a), (b) )
+#define		  StringFPuts(a, b)	fputs( (char *) (a), (b) )
+#define		  StringFGets(a, b, c)	fgets( (char *) (a), (b), (c) )
+#define		  StringRemove(a)	remove((char *)(a))
+#define		  StringRename(a, b)	rename((char *)(a),(char *)(b))
+extern	BOOLEAN	  StringBeginsWith(FULL_CHAR *str, FULL_CHAR *pattern);
+extern	BOOLEAN	  StringEndsWith(FULL_CHAR *str, FULL_CHAR *pattern);
+extern	BOOLEAN	  StringContains(FULL_CHAR *str, FULL_CHAR *pattern);
+extern	FULL_CHAR *StringInt(int i);
+extern	FULL_CHAR *StringFiveInt(int i);
+extern	FULL_CHAR *StringQuotedWord(OBJECT x);
+
+/*****  z40.c	  Filter Handler        **************************************/
+extern	void	  FilterInit(void);
+extern	OBJECT	  FilterCreate(BOOLEAN use_begin, OBJECT act, FILE_POS *xfpos);
+extern	void	  FilterSetFileNames(OBJECT x);
+extern	OBJECT	  FilterExecute(OBJECT x, FULL_CHAR *command, OBJECT env);
+extern	void	  FilterWrite(OBJECT x, FILE *fp, int *linecount);
+extern	void	  FilterScavenge(BOOLEAN all);
+
+/*****  z41.c	  Object Input-Output   **************************************/
+extern	OBJECT	  ReadFromFile(FILE_NUM fnum, long pos, int lnum);
+extern	void	  AppendToFile(OBJECT x, FILE_NUM fnum, int *pos, int *lnum);
+extern	void	  CloseFiles(void);
+
+/*****  z42.c	  Colour Service        **************************************/
+extern	void	  ColourInit(void);
+extern	void	  ColourChange(STYLE *style, OBJECT x);
+extern	FULL_CHAR *ColourCommand(COLOUR_NUM cnum);
+
+/*****  z43.c	  Language Service      **************************************/
+extern	void	  LanguageInit(void);
+extern	BOOLEAN	  LanguageWordEndsSentence(OBJECT wd, BOOLEAN lc_prec);
+extern	void	  LanguageDefine(OBJECT names, OBJECT hyph_file);
+extern	void	  LanguageChange(STYLE *style, OBJECT x);
+extern	FULL_CHAR *LanguageString(LANGUAGE_NUM lnum);
+extern	OBJECT	  LanguageHyph(LANGUAGE_NUM lnum);
+extern	BOOLEAN	  LanguageSentenceEnds[];
+
+/*****  z44.c	  Vertical Hyphenation  **************************************/
+extern	BOOLEAN	  VerticalHyphenate(OBJECT y);
+extern	OBJECT	  ConvertGalleyList(OBJECT x);
+extern	OBJECT	  BuildEnclose(OBJECT hd);
+
+/*****  z45.c	  External Sort         **************************************/
+extern	LINE	  *ReadLines(FILE *fp, FULL_CHAR *fname, FULL_CHAR *first_line, int *len);
+extern	void	  WriteLines(FILE *fp, LINE *lines, int len);
+extern	void	  SortLines(LINE *lines, int lines_len);
+extern	void	  SortFile(FULL_CHAR *infile, FULL_CHAR *outfile);
+
+/*****  z46.c	  Optimal Galleys       **************************************/
+extern	BOOLEAN	  FindOptimize(OBJECT x, OBJECT env);
+extern	void	  SetOptimize(OBJECT hd, STYLE *style);
+extern	void	  GazumpOptimize(OBJECT hd, OBJECT dest);
+extern	void	  CalculateOptimize(OBJECT hd);
+extern	void	  DebugOptimize(OBJECT hd);
+
+/*****  z47.c	  Environment Table     **************************************/
+extern	void	  EnvInit(void);
+extern	BOOLEAN	  EnvWriteRetrieve(OBJECT env, FILE_NUM fnum, int *offset,
+		    int *lnum);
+extern	void	  EnvWriteInsert(OBJECT env, FILE_NUM fnum, int offset,int lnum);
+extern	BOOLEAN	  EnvReadRetrieve(FILE_NUM fnum, int offset, OBJECT *env);
+extern	void	  EnvReadInsert(FILE_NUM fnum, int offset, OBJECT env);
+extern	void	  EnvDebug(void);
+
+/*****  z48.c	  PDF back end          **************************************/
+extern	void      PDFFile_Init(FILE* in_fp, int in_h_bound, int in_v_bound,
+				int in_IN, int in_CM, int in_PT, int in_EM);
+extern	void      PDFFile_BeginFontEncoding(FILE* in_fp,
+				const char* in_encoding_name);
+extern	void      PDFFile_EndFontEncoding(FILE* in_fp);
+extern	void      PDFFile_Cleanup(FILE* in_fp);
+extern	void      PDFPage_Init(FILE* in_fp, float in_scale_factor,
+				int in_line_width);
+extern	void      PDFPage_Cleanup(FILE* in_fp);
+extern	void	  PDFPage_Write(FILE* in_fp, char* in_str);
+extern	void      PDFPage_Push(FILE* in_fp);
+extern	void      PDFPage_Pop(FILE* in_fp);
+extern	void	  PDFPage_Scale(FILE* in_fp, float in_h_scale_factor,
+				float in_v_scale_factor);
+extern	void	  PDFPage_Translate(FILE* in_fp, float in_delta_h,
+				float in_delta_v);
+extern	void	  PDFPage_Rotate(FILE* in_fp, float in_angle_in_radians);
+extern	void	  PDFPage_SetVars(int xsize, int ysize, int xmark, int ymark,
+				int loutf, int loutv, int louts);
+extern	void	  PDFPage_WriteGraphic(FILE* in_fp, FULL_CHAR* in_str);
+extern	void	  PDFPage_PrintUnderline(FILE* in_fp, int in_x1, int in_x2,
+				int in_y, int in_thickness);
+
+extern	void      PDFFont_AddFont(
+				FILE* in_fp,
+				const FULL_CHAR* in_short_font_name,
+				const FULL_CHAR* in_real_font_name,
+				const FULL_CHAR* in_font_encoding_name);
+extern	void      PDFFont_Set(FILE* in_fp, FULL_LENGTH in_font_size,
+				FULL_CHAR * in_short_font_name);
+extern	void    PDFText_OpenXY(FILE* in_fp, int hpos, int vpos);
+extern	void    PDFText_OpenX(FILE* in_fp, int hpos);
+extern	void    PDFText_Open(FILE* in_fp);
+extern	void    PDFText_Kern(FILE* in_fp, int in_kern);
+extern	void    PDFText_Close(FILE* in_fp);
+extern	BOOLEAN PDFHasValidTextMatrix(void);
+
+
+/*@::assert(), debug(), debug flags@******************************************/
+/*                                                                           */
+/*  ASSERT AND DEBUG CODE                                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+#if ASSERT_ON
+#define assert(c, m)							\
+   { if( !(c) )  Error(1, 2, "assert failed in %s", INTERN, no_fpos, m); }
+#define assert1(c, m, p1)						\
+   { if( !(c) )  Error(1, 3, "assert failed in %s %s", INTERN,no_fpos,m, p1); }
+#else
+#define assert(c, m)
+#define assert1(c, m, p1)
+#endif
+
+#if DEBUG_ON
+
+struct dbs
+{	char	*flag;			/* external names for debug flags    */
+	BOOLEAN	on[3];			/* the debug flags                   */
+};
+extern	struct dbs 	dbg[];
+
+/* debug routines */
+#define debug0(cat, urg, str)                				\
+    { if( dbg[cat].on[urg] ) Debug(cat, urg, str); }
+#define debug1(cat, urg, str, p1)					\
+    { if( dbg[cat].on[urg] ) Debug(cat, urg, str, p1); }
+#define debug2(cat, urg, str, p1, p2)					\
+    { if( dbg[cat].on[urg] ) Debug(cat, urg, str, p1, p2); }
+#define debug3(cat, urg, str, p1, p2, p3)				\
+    { if( dbg[cat].on[urg] ) Debug(cat, urg, str, p1, p2, p3); }
+#define debug4(cat, urg, str, p1, p2, p3, p4)				\
+    { if( dbg[cat].on[urg] ) Debug(cat, urg, str, p1, p2, p3, p4); }
+#define debug5(cat, urg, str, p1, p2, p3, p4, p5)			\
+    { if( dbg[cat].on[urg] ) Debug(cat, urg, str, p1, p2, p3, p4, p5); }
+#define debug6(cat, urg, str, p1, p2, p3, p4, p5, p6)			\
+    { if( dbg[cat].on[urg] ) Debug(cat, urg, str, p1, p2, p3, p4, p5, p6); }
+#define debug7(cat, urg, str, p1, p2, p3, p4, p5, p6, p7)		\
+    { if( dbg[cat].on[urg] ) Debug(cat, urg, str, p1, p2, p3, p4, p5,p6,p7); }
+#define debug8(cat, urg, str, p1, p2, p3, p4, p5, p6, p7, p8)		\
+    { if( dbg[cat].on[urg] ) Debug(cat, urg, str, p1, p2,p3,p4,p5,p6,p7,p8); }
+#define	ifdebug(cat, urg, x)						\
+    { if( dbg[cat].on[urg] ) { x; } }
+
+#define debugcond0(cat, urg, cond, str)                			\
+    { if( dbg[cat].on[urg] && cond ) Debug(cat, urg, str); }
+#define debugcond1(cat, urg, cond, str, p1)				\
+    { if( dbg[cat].on[urg] && cond ) Debug(cat, urg, str, p1); }
+#define debugcond2(cat, urg, cond, str, p1, p2)				\
+    { if( dbg[cat].on[urg] && cond ) Debug(cat, urg, str, p1, p2); }
+#define debugcond3(cat, urg, cond, str, p1, p2, p3)			\
+    { if( dbg[cat].on[urg] && cond ) Debug(cat, urg, str, p1, p2, p3); }
+#define debugcond4(cat, urg, cond, str, p1, p2, p3, p4)			\
+    { if( dbg[cat].on[urg] && cond ) Debug(cat, urg, str, p1, p2, p3, p4); }
+#define debugcond5(cat, urg, cond, str, p1, p2, p3, p4, p5)		\
+    { if( dbg[cat].on[urg] && cond ) Debug(cat, urg, str, p1, p2, p3, p4, p5);}
+#define debugcond6(cat, urg, cond, str, p1, p2, p3, p4, p5, p6)		\
+    { if( dbg[cat].on[urg] && cond ) Debug(cat, urg, str, p1, p2,p3,p4,p5,p6);}
+#define	ifdebugcond(cat, urg, cond, x)					\
+    { if( dbg[cat].on[urg] && cond ) { x; } }
+#define	debug_init(str)							\
+    DebugInit(str)
+
+/* debug styles */
+#define	D	 0
+#define	DD	 1
+#define	DDD	 2
+
+/* debug flags */
+#define	DSP	 1		/*  z01.c   -dsp   Supervise                 */
+#define	DLA	 2		/*  z02.c   -dla   Lexical Analyser          */
+#define	DFS	 3		/*  z03.c   -dfs   File Service              */
+#define	DTS	 4		/*  z04.c   -dts   Token Service             */
+#define	DRD	 5		/*  z05.c   -drd   Read Definitions          */
+#define	DOP	 6		/*  z06.c   -dop   Object Parser             */
+#define	DOS	 7		/*  z07.c   -dos   Object Service            */
+#define	DOM	 8		/*  z08.c   -dom   Object Manifest           */
+#define	DCE	 9		/*  z09.c   -dce   Closure Expansion         */
+#define	DCR	10		/*  z10.c   -dcr   Cross References	     */
+#define	DSS	11		/*  z11.c   -dss   Style Service	     */
+#define	DSF	12		/*  z12.c   -dsf   Size Finder               */
+#define	DOB	13		/*  z13.c   -dob   Object Breaking	     */
+#define	DOF	14		/*  z14.c   -dof   Object Filling	     */
+#define	DSC	15		/*  z15.c   -dsc   Size Constraints          */
+#define	DSA	16		/*  z16.c   -dsa   Size Adjustments	     */
+#define	DGW	17		/*  z17.c   -dgw   Gap Widths                */
+#define	DGT	18		/*  z18.c   -dgt   Galley Transfer           */
+#define	DGA	19		/*  z19.c   -dgf   Galley Attaching          */
+#define	DGF	20		/*  z20.c   -dgf   Galley Flushing           */
+#define	DGM	21		/*  z21.c   -dgm   Galley Maker              */
+#define	DGS	22		/*  z22.c   -dgs   Galley Service            */
+#define	DGP	23		/*  z23.c   -dgp   Galley Printer            */
+#define	DPS	24		/*  z24.c   -dps   Print Service             */
+#define	DOE	25		/*  z25.c   -doe   Object Echo               */
+#define	DES	26		/*  z26.c   -des   Echo Service		     */
+#define	DZZ	27		/*  z27.c   -dzz   Debug Service             */
+#define	DYY	28		/*  z28.c   -dyy   Error Service             */
+#define	DST	29		/*  z29.c   -dst   Symbol Table              */
+#define	DSU	30		/*  z30.c   -dsu   Symbol Uses               */
+#define	DMA	31		/*  z31.c   -dma   Memory Allocator          */
+#define	DCS	32		/*  z32.c   -dcs   Counter Service           */
+#define	DBS	33		/*  z33.c   -dbs   Database Service          */
+#define	DRS	34		/*  z34.c   -drs   Rotation Service          */
+#define	DTK	35		/*  z35.c   -dtk   Time Keeper               */
+#define	DHY	36		/*  z36.c   -dhy   Hyphenation               */
+#define	DFT	37		/*  z37.c   -dft   Font Service              */
+#define	DCM	38		/*  z38.c   -dcm   Character Mapping         */
+#define	DSH	39		/*  z39.c   -dsh   String Handler            */
+#define	DFH	40		/*  z40.c   -dsh   Filter Handler            */
+#define	DIO	41		/*  z41.c   -dio   Object Input-Output       */
+#define	DCO	42		/*  z42.c   -dco   Colour Service            */
+#define	DLS	43		/*  z43.c   -dls   Language Service          */
+#define	DVH	44		/*  z44.c   -dvh   Vertical Hyphenation      */
+#define	DEX	45		/*  z45.c   -dex   External Sort             */
+#define	DOG	46		/*  z46.c   -dex   Optimal Galleys           */
+#define	DET	47		/*  z47.c   -det   Environment Table         */
+#define	DPD	48		/*  z48.c   -dpd   PDF Back End              */
+#define	DPP	49		/*          -dpp   Profiling                 */
+#define	ANY	50		/*          -d     any                       */
+
+#else
+#define ifdebug(cat, urg, x)
+#define debug0(cat, urg, str)
+#define debug1(cat, urg, str, p1)
+#define debug2(cat, urg, str, p1, p2)
+#define debug3(cat, urg, str, p1, p2, p3)
+#define debug4(cat, urg, str, p1, p2, p3, p4)
+#define debug5(cat, urg, str, p1, p2, p3, p4, p5)
+#define debug6(cat, urg, str, p1, p2, p3, p4, p5, p6)
+#define debug7(cat, urg, str, p1, p2, p3, p4, p5, p6, p7)
+#define debug8(cat, urg, str, p1, p2, p3, p4, p5, p6, p7, p8)
+
+#define debugcond0(cat, urg, cond, str)
+#define debugcond1(cat, urg, cond, str, p1)
+#define debugcond2(cat, urg, cond, str, p1, p2)
+#define debugcond3(cat, urg, cond, str, p1, p2, p3)
+#define debugcond4(cat, urg, cond, str, p1, p2, p3, p4)
+#define debugcond5(cat, urg, cond, str, p1, p2, p3, p4, p5)
+#define debugcond6(cat, urg, cond, str, p1, p2, p3, p4, p5, p6)
+#define	ifdebugcond(cat, urg, cond, x)
+#define	debug_init(str)	Error(1, 4, "%s - debug flags not implemented", \
+	FATAL, no_fpos, str)
+#endif
diff --git a/font/00README b/font/00README
new file mode 100644
index 0000000..8742cef
--- /dev/null
+++ b/font/00README
@@ -0,0 +1,21 @@
+Directory lout/font - font metrics files
+
+This directory contains Adobe Systems font metrics (formerly .AFM)
+files for all the fonts mentioned in file lout/include/fontdefs.  These
+files are the source of Lout's information about the height and width
+of all characters.  The files are exactly as distributed publicly by
+Adobe Systems except that erroneous ligature information has been
+removed from the four Courier font files.
+
+Jeffrey H. Kingston
+3 July 1994
+
+
+All file names have now been reduced to a maximum of 8 characters,
+for portability to the DOS operating system.  Non-Latin1 fonts are
+no longer distributed with the basic Lout distribution.
+
+Jeffrey H. Kingston
+9 June 1995
+3 April 1996
+12 September 1999
diff --git a/font/AG-Bd b/font/AG-Bd
new file mode 100644
index 0000000..f0753fb
--- /dev/null
+++ b/font/AG-Bd
@@ -0,0 +1,571 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Mar  4 13:54:47 1991
+Comment UniqueID 34376
+Comment VMusage 26102 32994
+FontName AvantGarde-Bold
+FullName ITC Avant Garde Gothic Bold
+FamilyName ITC Avant Garde Gothic
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -118 -271 1222 1017
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.ITC Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 740
+XHeight 555
+Ascender 740
+Descender -185
+StartCharMetrics 228
+C 32 ; WX 309 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 81 0 252 740 ;
+C 34 ; WX 463 ; N quotedbl ; B 34 443 429 740 ;
+C 35 ; WX 618 ; N numbersign ; B 31 45 588 672 ;
+C 36 ; WX 618 ; N dollar ; B 80 -76 538 811 ;
+C 37 ; WX 858 ; N percent ; B 36 -15 822 755 ;
+C 38 ; WX 758 ; N ampersand ; B 49 -15 729 754 ;
+C 39 ; WX 314 ; N quoteright ; B 70 409 244 740 ;
+C 40 ; WX 473 ; N parenleft ; B 65 -264 430 754 ;
+C 41 ; WX 473 ; N parenright ; B 43 -264 408 754 ;
+C 42 ; WX 670 ; N asterisk ; B 115 318 555 740 ;
+C 43 ; WX 600 ; N plus ; B 48 0 552 506 ;
+C 44 ; WX 314 ; N comma ; B 71 -161 244 170 ;
+C 45 ; WX 281 ; N hyphen ; B 0 207 281 370 ;
+C 46 ; WX 314 ; N period ; B 71 0 244 170 ;
+C 47 ; WX 593 ; N slash ; B 72 -100 521 740 ;
+C 48 ; WX 618 ; N zero ; B 33 -14 585 754 ;
+C 49 ; WX 618 ; N one ; B 104 0 414 740 ;
+C 50 ; WX 618 ; N two ; B 44 0 573 754 ;
+C 51 ; WX 618 ; N three ; B 33 -14 579 754 ;
+C 52 ; WX 618 ; N four ; B 15 0 604 740 ;
+C 53 ; WX 618 ; N five ; B 26 -15 592 740 ;
+C 54 ; WX 618 ; N six ; B 21 -14 600 740 ;
+C 55 ; WX 618 ; N seven ; B 65 0 547 740 ;
+C 56 ; WX 618 ; N eight ; B 39 -14 579 754 ;
+C 57 ; WX 618 ; N nine ; B 20 0 602 754 ;
+C 58 ; WX 314 ; N colon ; B 71 0 244 555 ;
+C 59 ; WX 314 ; N semicolon ; B 71 -161 244 555 ;
+C 60 ; WX 600 ; N less ; B 46 -38 554 544 ;
+C 61 ; WX 600 ; N equal ; B 48 41 552 465 ;
+C 62 ; WX 600 ; N greater ; B 46 -38 554 544 ;
+C 63 ; WX 592 ; N question ; B 48 0 551 754 ;
+C 64 ; WX 748 ; N at ; B -3 -16 743 756 ;
+C 65 ; WX 758 ; N A ; B 9 0 749 740 ;
+C 66 ; WX 647 ; N B ; B 67 0 612 740 ;
+C 67 ; WX 832 ; N C ; B 37 -14 801 754 ;
+C 68 ; WX 742 ; N D ; B 57 0 697 740 ;
+C 69 ; WX 528 ; N E ; B 67 0 478 740 ;
+C 70 ; WX 506 ; N F ; B 67 0 471 740 ;
+C 71 ; WX 854 ; N G ; B 35 -15 823 754 ;
+C 72 ; WX 754 ; N H ; B 67 0 687 740 ;
+C 73 ; WX 323 ; N I ; B 67 0 256 740 ;
+C 74 ; WX 578 ; N J ; B 6 -14 510 740 ;
+C 75 ; WX 707 ; N K ; B 87 0 701 740 ;
+C 76 ; WX 487 ; N L ; B 72 0 480 740 ;
+C 77 ; WX 915 ; N M ; B 67 0 848 740 ;
+C 78 ; WX 759 ; N N ; B 67 0 691 740 ;
+C 79 ; WX 851 ; N O ; B 35 -14 816 754 ;
+C 80 ; WX 636 ; N P ; B 67 0 624 740 ;
+C 81 ; WX 866 ; N Q ; B 35 -15 855 754 ;
+C 82 ; WX 653 ; N R ; B 67 0 637 740 ;
+C 83 ; WX 573 ; N S ; B 25 -14 550 754 ;
+C 84 ; WX 499 ; N T ; B 10 0 490 740 ;
+C 85 ; WX 698 ; N U ; B 65 -14 633 740 ;
+C 86 ; WX 722 ; N V ; B 16 0 706 740 ;
+C 87 ; WX 981 ; N W ; B 16 0 964 740 ;
+C 88 ; WX 759 ; N X ; B 11 0 748 740 ;
+C 89 ; WX 647 ; N Y ; B 9 0 638 740 ;
+C 90 ; WX 499 ; N Z ; B 16 0 483 740 ;
+C 91 ; WX 473 ; N bracketleft ; B 104 -264 401 754 ;
+C 92 ; WX 593 ; N backslash ; B 72 -100 521 740 ;
+C 93 ; WX 473 ; N bracketright ; B 72 -264 369 754 ;
+C 94 ; WX 600 ; N asciicircum ; B 43 375 557 740 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 314 ; N quoteleft ; B 70 409 244 740 ;
+C 97 ; WX 704 ; N a ; B 34 -19 643 574 ;
+C 98 ; WX 693 ; N b ; B 60 -19 660 740 ;
+C 99 ; WX 652 ; N c ; B 33 -18 621 574 ;
+C 100 ; WX 698 ; N d ; B 34 -18 638 740 ;
+C 101 ; WX 646 ; N e ; B 30 -18 614 574 ;
+C 102 ; WX 314 ; N f ; B 4 0 302 754 ; L i fi ; L l fl ;
+C 103 ; WX 693 ; N g ; B 34 -247 635 573 ;
+C 104 ; WX 632 ; N h ; B 60 0 574 740 ;
+C 105 ; WX 286 ; N i ; B 60 0 226 740 ;
+C 106 ; WX 321 ; N j ; B 6 -204 253 740 ;
+C 107 ; WX 591 ; N k ; B 66 0 585 740 ;
+C 108 ; WX 286 ; N l ; B 60 0 226 740 ;
+C 109 ; WX 969 ; N m ; B 60 0 912 574 ;
+C 110 ; WX 632 ; N n ; B 60 0 574 574 ;
+C 111 ; WX 666 ; N o ; B 34 -17 632 573 ;
+C 112 ; WX 697 ; N p ; B 60 -185 663 574 ;
+C 113 ; WX 698 ; N q ; B 34 -185 638 574 ;
+C 114 ; WX 363 ; N r ; B 59 0 356 574 ;
+C 115 ; WX 499 ; N s ; B 24 -19 476 574 ;
+C 116 ; WX 351 ; N t ; B 11 0 339 740 ;
+C 117 ; WX 634 ; N u ; B 58 -18 574 555 ;
+C 118 ; WX 592 ; N v ; B 17 0 575 555 ;
+C 119 ; WX 850 ; N w ; B 7 0 843 555 ;
+C 120 ; WX 630 ; N x ; B 1 0 628 555 ;
+C 121 ; WX 574 ; N y ; B 1 -185 573 555 ;
+C 122 ; WX 444 ; N z ; B 15 0 428 555 ;
+C 123 ; WX 554 ; N braceleft ; B 105 -264 483 740 ;
+C 124 ; WX 555 ; N bar ; B 186 -100 369 740 ;
+C 125 ; WX 554 ; N braceright ; B 71 -264 449 740 ;
+C 126 ; WX 600 ; N asciitilde ; B 67 130 533 377 ;
+C 161 ; WX 333 ; N exclamdown ; B 81 -185 252 555 ;
+C 162 ; WX 618 ; N cent ; B 62 31 556 720 ;
+C 163 ; WX 618 ; N sterling ; B 14 0 618 755 ;
+C 164 ; WX 211 ; N fraction ; B -118 0 329 740 ;
+C 165 ; WX 618 ; N yen ; B 1 0 618 740 ;
+C 166 ; WX 618 ; N florin ; B 25 -152 547 818 ;
+C 167 ; WX 670 ; N section ; B 40 -271 630 754 ;
+C 168 ; WX 618 ; N currency ; B 0 38 618 651 ;
+C 169 ; WX 242 ; N quotesingle ; B 34 443 208 740 ;
+C 170 ; WX 555 ; N quotedblleft ; B 67 409 488 740 ;
+C 171 ; WX 422 ; N guillemotleft ; B 47 103 375 474 ;
+C 172 ; WX 222 ; N guilsinglleft ; B 47 103 175 474 ;
+C 173 ; WX 222 ; N guilsinglright ; B 47 103 175 474 ;
+C 174 ; WX 601 ; N fi ; B 4 0 541 754 ;
+C 175 ; WX 601 ; N fl ; B 4 0 541 754 ;
+C 177 ; WX 500 ; N endash ; B 35 207 465 370 ;
+C 178 ; WX 670 ; N dagger ; B 98 -244 572 740 ;
+C 179 ; WX 670 ; N daggerdbl ; B 98 -244 572 740 ;
+C 180 ; WX 314 ; N periodcentered ; B 71 168 244 338 ;
+C 182 ; WX 701 ; N paragraph ; B -7 -103 607 740 ;
+C 183 ; WX 739 ; N bullet ; B 217 222 522 532 ;
+C 184 ; WX 314 ; N quotesinglbase ; B 70 -161 244 170 ;
+C 185 ; WX 555 ; N quotedblbase ; B 67 -161 488 170 ;
+C 186 ; WX 555 ; N quotedblright ; B 67 409 488 740 ;
+C 187 ; WX 422 ; N guillemotright ; B 47 103 375 474 ;
+C 188 ; WX 1000 ; N ellipsis ; B 81 0 920 170 ;
+C 189 ; WX 1258 ; N perthousand ; B 36 -15 1222 755 ;
+C 191 ; WX 592 ; N questiondown ; B 41 -200 543 555 ;
+C 193 ; WX 555 ; N grave ; B 111 614 404 839 ;
+C 194 ; WX 555 ; N acute ; B 151 621 444 848 ;
+C 195 ; WX 555 ; N circumflex ; B 70 640 484 806 ;
+C 196 ; WX 555 ; N tilde ; B 75 651 480 781 ;
+C 197 ; WX 555 ; N macron ; B 98 658 457 784 ;
+C 198 ; WX 555 ; N breve ; B 71 644 483 788 ;
+C 199 ; WX 555 ; N dotaccent ; B 198 644 357 795 ;
+C 200 ; WX 555 ; N dieresis ; B 81 644 473 795 ;
+C 202 ; WX 555 ; N ring ; B 151 600 403 852 ;
+C 203 ; WX 555 ; N cedilla ; B 167 -245 388 0 ;
+C 205 ; WX 555 ; N hungarumlaut ; B 102 600 493 832 ;
+C 206 ; WX 555 ; N ogonek ; B 175 -206 380 0 ;
+C 207 ; WX 555 ; N caron ; B 70 633 484 799 ;
+C 208 ; WX 1000 ; N emdash ; B 35 207 965 370 ;
+C 225 ; WX 975 ; N AE ; B -10 0 925 740 ;
+C 227 ; WX 385 ; N ordfeminine ; B 19 448 333 754 ;
+C 232 ; WX 487 ; N Lslash ; B 7 0 480 740 ;
+C 233 ; WX 851 ; N Oslash ; B 35 -63 816 806 ;
+C 234 ; WX 1085 ; N OE ; B 35 -14 1035 754 ;
+C 235 ; WX 385 ; N ordmasculine ; B 37 448 347 754 ;
+C 241 ; WX 1091 ; N ae ; B 34 -18 1059 574 ;
+C 245 ; WX 286 ; N dotlessi ; B 60 0 226 555 ;
+C 248 ; WX 342 ; N lslash ; B 25 0 317 740 ;
+C 249 ; WX 666 ; N oslash ; B 34 -83 632 633 ;
+C 250 ; WX 1076 ; N oe ; B 34 -19 1045 574 ;
+C 251 ; WX 694 ; N germandbls ; B 58 -18 660 759 ;
+C -1 ; WX 646 ; N ecircumflex ; B 30 -18 614 806 ;
+C -1 ; WX 646 ; N edieresis ; B 30 -18 614 795 ;
+C -1 ; WX 704 ; N aacute ; B 34 -19 643 848 ;
+C -1 ; WX 800 ; N registered ; B 18 -14 783 754 ;
+C -1 ; WX 286 ; N icircumflex ; B -64 0 350 806 ;
+C -1 ; WX 634 ; N udieresis ; B 58 -18 574 795 ;
+C -1 ; WX 666 ; N ograve ; B 34 -17 632 839 ;
+C -1 ; WX 634 ; N uacute ; B 58 -18 574 848 ;
+C -1 ; WX 634 ; N ucircumflex ; B 58 -18 574 806 ;
+C -1 ; WX 758 ; N Aacute ; B 9 0 749 993 ;
+C -1 ; WX 286 ; N igrave ; B -48 0 245 839 ;
+C -1 ; WX 323 ; N Icircumflex ; B -46 0 368 971 ;
+C -1 ; WX 652 ; N ccedilla ; B 33 -245 621 574 ;
+C -1 ; WX 704 ; N adieresis ; B 34 -19 643 795 ;
+C -1 ; WX 528 ; N Ecircumflex ; B 57 0 478 971 ;
+C -1 ; WX 499 ; N scaron ; B 24 -19 476 799 ;
+C -1 ; WX 695 ; N thorn ; B 59 -185 663 740 ;
+C -1 ; WX 990 ; N trademark ; B 21 296 879 740 ;
+C -1 ; WX 646 ; N egrave ; B 30 -18 614 839 ;
+C -1 ; WX 407 ; N threesuperior ; B 22 287 379 749 ;
+C -1 ; WX 444 ; N zcaron ; B 15 0 454 799 ;
+C -1 ; WX 704 ; N atilde ; B 34 -19 643 781 ;
+C -1 ; WX 704 ; N aring ; B 34 -19 643 852 ;
+C -1 ; WX 666 ; N ocircumflex ; B 34 -17 632 806 ;
+C -1 ; WX 528 ; N Edieresis ; B 67 0 478 960 ;
+C -1 ; WX 1000 ; N threequarters ; B 41 0 959 749 ;
+C -1 ; WX 574 ; N ydieresis ; B 1 -185 573 795 ;
+C -1 ; WX 574 ; N yacute ; B 1 -185 573 848 ;
+C -1 ; WX 286 ; N iacute ; B 42 0 335 848 ;
+C -1 ; WX 758 ; N Acircumflex ; B 9 0 749 951 ;
+C -1 ; WX 698 ; N Uacute ; B 65 -14 633 1013 ;
+C -1 ; WX 646 ; N eacute ; B 30 -18 614 848 ;
+C -1 ; WX 851 ; N Ograve ; B 35 -14 816 1004 ;
+C -1 ; WX 704 ; N agrave ; B 34 -19 643 839 ;
+C -1 ; WX 698 ; N Udieresis ; B 65 -14 633 960 ;
+C -1 ; WX 704 ; N acircumflex ; B 34 -19 643 806 ;
+C -1 ; WX 323 ; N Igrave ; B -30 0 263 1004 ;
+C -1 ; WX 407 ; N twosuperior ; B 30 296 376 749 ;
+C -1 ; WX 698 ; N Ugrave ; B 65 -14 633 1004 ;
+C -1 ; WX 900 ; N onequarter ; B 48 0 851 740 ;
+C -1 ; WX 698 ; N Ucircumflex ; B 65 -14 633 971 ;
+C -1 ; WX 573 ; N Scaron ; B 25 -14 550 964 ;
+C -1 ; WX 323 ; N Idieresis ; B -35 0 357 960 ;
+C -1 ; WX 286 ; N idieresis ; B -53 0 339 795 ;
+C -1 ; WX 528 ; N Egrave ; B 67 0 478 1004 ;
+C -1 ; WX 851 ; N Oacute ; B 35 -14 816 1013 ;
+C -1 ; WX 600 ; N divide ; B 48 -57 552 563 ;
+C -1 ; WX 758 ; N Atilde ; B 9 0 749 946 ;
+C -1 ; WX 758 ; N Aring ; B 9 0 749 1017 ;
+C -1 ; WX 851 ; N Odieresis ; B 35 -14 816 960 ;
+C -1 ; WX 758 ; N Adieresis ; B 9 0 749 940 ;
+C -1 ; WX 759 ; N Ntilde ; B 67 0 691 946 ;
+C -1 ; WX 499 ; N Zcaron ; B 16 0 483 964 ;
+C -1 ; WX 636 ; N Thorn ; B 67 0 624 740 ;
+C -1 ; WX 323 ; N Iacute ; B 60 0 353 1013 ;
+C -1 ; WX 600 ; N plusminus ; B 48 -82 552 556 ;
+C -1 ; WX 600 ; N multiply ; B 56 0 544 487 ;
+C -1 ; WX 528 ; N Eacute ; B 67 0 478 1013 ;
+C -1 ; WX 647 ; N Ydieresis ; B 9 0 638 960 ;
+C -1 ; WX 407 ; N onesuperior ; B 69 296 270 740 ;
+C -1 ; WX 634 ; N ugrave ; B 58 -18 574 839 ;
+C -1 ; WX 600 ; N logicalnot ; B 33 108 557 445 ;
+C -1 ; WX 632 ; N ntilde ; B 60 0 574 781 ;
+C -1 ; WX 851 ; N Otilde ; B 35 -14 816 946 ;
+C -1 ; WX 666 ; N otilde ; B 34 -17 632 781 ;
+C -1 ; WX 832 ; N Ccedilla ; B 37 -245 801 754 ;
+C -1 ; WX 758 ; N Agrave ; B 9 0 749 984 ;
+C -1 ; WX 920 ; N onehalf ; B 48 0 872 740 ;
+C -1 ; WX 742 ; N Eth ; B 0 0 707 740 ;
+C -1 ; WX 400 ; N degree ; B 57 426 343 712 ;
+C -1 ; WX 647 ; N Yacute ; B 9 0 638 1013 ;
+C -1 ; WX 851 ; N Ocircumflex ; B 35 -14 816 971 ;
+C -1 ; WX 666 ; N oacute ; B 34 -17 632 848 ;
+C -1 ; WX 634 ; N mu ; B 52 -190 581 555 ;
+C -1 ; WX 600 ; N minus ; B 48 173 552 333 ;
+C -1 ; WX 666 ; N eth ; B 34 -17 632 756 ;
+C -1 ; WX 666 ; N odieresis ; B 34 -17 632 795 ;
+C -1 ; WX 800 ; N copyright ; B 18 -14 783 754 ;
+C -1 ; WX 555 ; N brokenbar ; B 186 -100 369 740 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 213
+
+KPX A y -68
+KPX A w -65
+KPX A v -70
+KPX A u -20
+KPX A quoteright -50
+KPX A quotedblright -50
+KPX A Y -80
+KPX A W -60
+KPX A V -102
+KPX A U -40
+KPX A T -25
+KPX A Q -50
+KPX A O -35
+KPX A G -40
+KPX A C -40
+
+KPX B A -10
+
+KPX C A -40
+
+KPX D period -20
+KPX D comma -20
+KPX D Y -45
+KPX D W -25
+KPX D V -50
+KPX D A -50
+
+KPX F period -129
+KPX F e -20
+KPX F comma -162
+KPX F a -20
+KPX F A -60
+
+KPX G period -20
+KPX G comma -20
+
+KPX J period -15
+KPX J a -20
+KPX J A -30
+
+KPX K y -40
+KPX K u -30
+KPX K o -45
+KPX K e -45
+KPX K O -30
+
+KPX L y -23
+KPX L quoteright -50
+KPX L quotedblright -50
+KPX L Y -80
+KPX L W -55
+KPX L V -85
+KPX L T -46
+
+KPX O period -30
+KPX O comma -30
+KPX O Y -30
+KPX O X -30
+KPX O W -20
+KPX O V -45
+KPX O T -15
+KPX O A -60
+
+KPX P period -200
+KPX P o -20
+KPX P e -20
+KPX P comma -220
+KPX P a -20
+KPX P A -85
+
+KPX Q comma 20
+
+KPX R W 10
+KPX R V -10
+KPX R U 10
+KPX R T 25
+KPX R O 10
+
+KPX S comma 20
+
+KPX T y -10
+KPX T w -55
+KPX T u -46
+KPX T semicolon -29
+KPX T r -30
+KPX T period -91
+KPX T o -49
+KPX T hyphen -75
+KPX T e -49
+KPX T comma -82
+KPX T colon -15
+KPX T a -70
+KPX T O -15
+KPX T A -25
+
+KPX U period -20
+KPX U comma -20
+KPX U A -40
+
+KPX V u -55
+KPX V semicolon -33
+KPX V period -145
+KPX V o -101
+KPX V i -30
+KPX V hyphen -75
+KPX V e -101
+KPX V comma -145
+KPX V colon -18
+KPX V a -95
+KPX V O -45
+KPX V G -20
+KPX V A -102
+
+KPX W y -32
+KPX W u -30
+KPX W semicolon -33
+KPX W period -106
+KPX W o -46
+KPX W i -10
+KPX W hyphen -35
+KPX W e -47
+KPX W comma -106
+KPX W colon -15
+KPX W a -50
+KPX W O -20
+KPX W A -58
+
+KPX Y u -70
+KPX Y semicolon -23
+KPX Y period -145
+KPX Y o -89
+KPX Y i -20
+KPX Y hyphen -100
+KPX Y e -89
+KPX Y comma -145
+KPX Y colon -10
+KPX Y a -93
+KPX Y O -30
+KPX Y A -80
+
+KPX a t 5
+KPX a p 20
+KPX a b 5
+
+KPX b y -20
+KPX b v -20
+KPX b b -10
+
+KPX c y -20
+KPX c k -15
+
+KPX comma space -50
+KPX comma quoteright -90
+KPX comma quotedblright -90
+
+KPX e y -20
+KPX e x -25
+KPX e w -20
+KPX e v -20
+
+KPX f period -50
+KPX f o -5
+KPX f comma -50
+KPX f a -5
+
+KPX g i 10
+
+KPX h y -30
+
+KPX k y -5
+KPX k o -30
+KPX k e -25
+
+KPX m y -20
+KPX m u -20
+
+KPX n y -15
+KPX n v -30
+
+KPX o y -20
+KPX o x -15
+KPX o w -20
+KPX o v -30
+
+KPX p y -20
+
+KPX period space -50
+KPX period quoteright -90
+KPX period quotedblright -90
+
+KPX quotedblleft A -50
+
+KPX quotedblright space -50
+
+KPX quoteleft quoteleft -80
+KPX quoteleft A -50
+
+KPX quoteright v -10
+KPX quoteright t 10
+KPX quoteright space -50
+KPX quoteright s -15
+KPX quoteright r -20
+KPX quoteright quoteright -80
+KPX quoteright d -45
+
+KPX r y 40
+KPX r v 40
+KPX r u 20
+KPX r t 20
+KPX r s 20
+KPX r q -8
+KPX r period -73
+KPX r p 20
+KPX r n 21
+KPX r m 28
+KPX r l 20
+KPX r k 20
+KPX r i 20
+KPX r hyphen -60
+KPX r g 1
+KPX r e -4
+KPX r d -6
+KPX r comma -75
+KPX r c -7
+
+KPX s period 20
+KPX s comma 20
+
+KPX space quoteleft -50
+KPX space quotedblleft -50
+KPX space Y -60
+KPX space W -25
+KPX space V -80
+KPX space T -25
+KPX space A -20
+
+KPX v period -90
+KPX v o -20
+KPX v e -20
+KPX v comma -90
+KPX v a -30
+
+KPX w period -90
+KPX w o -30
+KPX w h 15
+KPX w e -20
+KPX w comma -90
+KPX w a -30
+
+KPX x e -25
+
+KPX y period -60
+KPX y o -30
+KPX y e -20
+KPX y comma -90
+KPX y a -30
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 102 145 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 102 145 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 102 145 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 102 145 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 102 165 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 102 165 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute -13 165 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex -13 165 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis -13 165 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave -13 165 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -91 165 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -116 165 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -116 165 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -141 165 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 102 165 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 148 165 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 148 165 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 148 165 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 148 165 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 148 165 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 9 165 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 107 165 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 72 165 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 72 165 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 37 165 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 81 165 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 46 165 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron -3 165 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 75 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 75 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 75 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 75 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 75 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 75 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 46 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 46 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 46 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 46 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -109 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -134 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -134 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -159 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 39 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 56 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 56 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 56 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 56 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 56 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron -28 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 75 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 40 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 40 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 5 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 45 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 10 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron -30 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-BdO b/font/AG-BdO
new file mode 100644
index 0000000..25685aa
--- /dev/null
+++ b/font/AG-BdO
@@ -0,0 +1,571 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Mar  4 13:58:07 1991
+Comment UniqueID 34379
+Comment VMusage 7139 42168
+FontName AvantGarde-BoldObl
+FullName ITC Avant Garde Gothic Bold Oblique
+FamilyName ITC Avant Garde Gothic
+Weight Bold
+ItalicAngle -10.5
+IsFixedPitch false
+FontBBox -118 -271 1256 1017
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.ITC Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 740
+XHeight 555
+Ascender 740
+Descender -185
+StartCharMetrics 228
+C 32 ; WX 309 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 81 0 389 740 ;
+C 34 ; WX 463 ; N quotedbl ; B 149 443 566 740 ;
+C 35 ; WX 618 ; N numbersign ; B 72 45 683 672 ;
+C 36 ; WX 618 ; N dollar ; B 117 -76 621 811 ;
+C 37 ; WX 858 ; N percent ; B 139 -15 856 755 ;
+C 38 ; WX 758 ; N ampersand ; B 83 -15 810 754 ;
+C 39 ; WX 314 ; N quoteright ; B 146 409 381 740 ;
+C 40 ; WX 473 ; N parenleft ; B 101 -264 570 754 ;
+C 41 ; WX 473 ; N parenright ; B -6 -264 462 754 ;
+C 42 ; WX 670 ; N asterisk ; B 215 318 655 740 ;
+C 43 ; WX 600 ; N plus ; B 80 0 614 506 ;
+C 44 ; WX 314 ; N comma ; B 41 -161 276 170 ;
+C 45 ; WX 281 ; N hyphen ; B 38 207 350 370 ;
+C 46 ; WX 314 ; N period ; B 71 0 276 170 ;
+C 47 ; WX 593 ; N slash ; B 53 -100 658 740 ;
+C 48 ; WX 618 ; N zero ; B 77 -14 679 754 ;
+C 49 ; WX 618 ; N one ; B 212 0 551 740 ;
+C 50 ; WX 618 ; N two ; B 51 0 671 754 ;
+C 51 ; WX 618 ; N three ; B 72 -14 643 754 ;
+C 52 ; WX 618 ; N four ; B 39 0 659 740 ;
+C 53 ; WX 618 ; N five ; B 63 -15 662 740 ;
+C 54 ; WX 618 ; N six ; B 66 -14 655 740 ;
+C 55 ; WX 618 ; N seven ; B 79 0 684 740 ;
+C 56 ; WX 618 ; N eight ; B 76 -14 640 754 ;
+C 57 ; WX 618 ; N nine ; B 103 0 697 754 ;
+C 58 ; WX 314 ; N colon ; B 71 0 347 555 ;
+C 59 ; WX 314 ; N semicolon ; B 41 -161 347 555 ;
+C 60 ; WX 600 ; N less ; B 79 -38 655 544 ;
+C 61 ; WX 600 ; N equal ; B 56 41 638 465 ;
+C 62 ; WX 600 ; N greater ; B 39 -38 615 544 ;
+C 63 ; WX 592 ; N question ; B 139 0 654 754 ;
+C 64 ; WX 748 ; N at ; B 58 -16 828 756 ;
+C 65 ; WX 758 ; N A ; B 9 0 749 740 ;
+C 66 ; WX 647 ; N B ; B 67 0 681 740 ;
+C 67 ; WX 832 ; N C ; B 99 -14 886 754 ;
+C 68 ; WX 742 ; N D ; B 57 0 775 740 ;
+C 69 ; WX 528 ; N E ; B 67 0 615 740 ;
+C 70 ; WX 506 ; N F ; B 67 0 608 740 ;
+C 71 ; WX 854 ; N G ; B 97 -15 900 754 ;
+C 72 ; WX 754 ; N H ; B 67 0 824 740 ;
+C 73 ; WX 323 ; N I ; B 67 0 393 740 ;
+C 74 ; WX 578 ; N J ; B 45 -14 647 740 ;
+C 75 ; WX 707 ; N K ; B 87 0 822 740 ;
+C 76 ; WX 487 ; N L ; B 72 0 511 740 ;
+C 77 ; WX 915 ; N M ; B 67 0 985 740 ;
+C 78 ; WX 759 ; N N ; B 67 0 828 740 ;
+C 79 ; WX 851 ; N O ; B 96 -14 891 754 ;
+C 80 ; WX 636 ; N P ; B 67 0 720 740 ;
+C 81 ; WX 866 ; N Q ; B 97 -15 895 754 ;
+C 82 ; WX 653 ; N R ; B 67 0 715 740 ;
+C 83 ; WX 573 ; N S ; B 62 -14 645 754 ;
+C 84 ; WX 499 ; N T ; B 116 0 627 740 ;
+C 85 ; WX 698 ; N U ; B 108 -14 770 740 ;
+C 86 ; WX 722 ; N V ; B 153 0 843 740 ;
+C 87 ; WX 981 ; N W ; B 153 0 1101 740 ;
+C 88 ; WX 759 ; N X ; B 11 0 855 740 ;
+C 89 ; WX 647 ; N Y ; B 146 0 775 740 ;
+C 90 ; WX 499 ; N Z ; B 16 0 620 740 ;
+C 91 ; WX 473 ; N bracketleft ; B 104 -264 541 754 ;
+C 92 ; WX 593 ; N backslash ; B 209 -100 502 740 ;
+C 93 ; WX 473 ; N bracketright ; B 23 -264 460 754 ;
+C 94 ; WX 600 ; N asciicircum ; B 112 375 626 740 ;
+C 95 ; WX 500 ; N underscore ; B -23 -125 486 -75 ;
+C 96 ; WX 314 ; N quoteleft ; B 146 409 381 740 ;
+C 97 ; WX 704 ; N a ; B 79 -19 746 574 ;
+C 98 ; WX 693 ; N b ; B 60 -19 719 740 ;
+C 99 ; WX 652 ; N c ; B 79 -18 683 574 ;
+C 100 ; WX 698 ; N d ; B 80 -18 775 740 ;
+C 101 ; WX 646 ; N e ; B 76 -18 670 574 ;
+C 102 ; WX 314 ; N f ; B 66 0 442 754 ; L i fi ; L l fl ;
+C 103 ; WX 693 ; N g ; B 34 -247 738 573 ;
+C 104 ; WX 632 ; N h ; B 60 0 645 740 ;
+C 105 ; WX 286 ; N i ; B 60 0 363 740 ;
+C 106 ; WX 321 ; N j ; B -32 -204 390 740 ;
+C 107 ; WX 591 ; N k ; B 66 0 688 740 ;
+C 108 ; WX 286 ; N l ; B 60 0 363 740 ;
+C 109 ; WX 969 ; N m ; B 60 0 983 574 ;
+C 110 ; WX 632 ; N n ; B 60 0 646 574 ;
+C 111 ; WX 666 ; N o ; B 80 -17 689 573 ;
+C 112 ; WX 697 ; N p ; B 26 -185 719 574 ;
+C 113 ; WX 698 ; N q ; B 78 -185 741 574 ;
+C 114 ; WX 363 ; N r ; B 59 0 462 574 ;
+C 115 ; WX 499 ; N s ; B 54 -19 534 574 ;
+C 116 ; WX 351 ; N t ; B 91 0 442 740 ;
+C 117 ; WX 634 ; N u ; B 90 -18 677 555 ;
+C 118 ; WX 592 ; N v ; B 120 0 678 555 ;
+C 119 ; WX 850 ; N w ; B 110 0 946 555 ;
+C 120 ; WX 630 ; N x ; B 1 0 703 555 ;
+C 121 ; WX 574 ; N y ; B 85 -185 676 555 ;
+C 122 ; WX 444 ; N z ; B 15 0 531 555 ;
+C 123 ; WX 554 ; N braceleft ; B 132 -264 620 740 ;
+C 124 ; WX 555 ; N bar ; B 167 -100 506 740 ;
+C 125 ; WX 554 ; N braceright ; B 22 -264 508 740 ;
+C 126 ; WX 600 ; N asciitilde ; B 120 130 574 377 ;
+C 161 ; WX 333 ; N exclamdown ; B 47 -185 355 555 ;
+C 162 ; WX 618 ; N cent ; B 128 31 634 720 ;
+C 163 ; WX 618 ; N sterling ; B 44 0 658 755 ;
+C 164 ; WX 211 ; N fraction ; B -118 0 466 740 ;
+C 165 ; WX 618 ; N yen ; B 50 0 755 740 ;
+C 166 ; WX 618 ; N florin ; B -2 -152 698 818 ;
+C 167 ; WX 670 ; N section ; B 57 -271 688 754 ;
+C 168 ; WX 618 ; N currency ; B 22 38 719 651 ;
+C 169 ; WX 242 ; N quotesingle ; B 149 443 345 740 ;
+C 170 ; WX 555 ; N quotedblleft ; B 143 409 625 740 ;
+C 171 ; WX 422 ; N guillemotleft ; B 90 103 463 474 ;
+C 172 ; WX 222 ; N guilsinglleft ; B 90 103 263 474 ;
+C 173 ; WX 222 ; N guilsinglright ; B 66 103 239 474 ;
+C 174 ; WX 601 ; N fi ; B 66 0 678 754 ;
+C 175 ; WX 601 ; N fl ; B 66 0 678 754 ;
+C 177 ; WX 500 ; N endash ; B 73 207 534 370 ;
+C 178 ; WX 670 ; N dagger ; B 176 -244 676 740 ;
+C 179 ; WX 670 ; N daggerdbl ; B 96 -244 682 740 ;
+C 180 ; WX 314 ; N periodcentered ; B 102 168 307 338 ;
+C 182 ; WX 701 ; N paragraph ; B 90 -103 744 740 ;
+C 183 ; WX 739 ; N bullet ; B 284 222 595 532 ;
+C 184 ; WX 314 ; N quotesinglbase ; B 40 -161 276 170 ;
+C 185 ; WX 555 ; N quotedblbase ; B 37 -161 520 170 ;
+C 186 ; WX 555 ; N quotedblright ; B 143 409 625 740 ;
+C 187 ; WX 422 ; N guillemotright ; B 66 103 439 474 ;
+C 188 ; WX 1000 ; N ellipsis ; B 81 0 952 170 ;
+C 189 ; WX 1258 ; N perthousand ; B 139 -15 1256 755 ;
+C 191 ; WX 592 ; N questiondown ; B 40 -200 554 555 ;
+C 193 ; WX 555 ; N grave ; B 245 614 536 839 ;
+C 194 ; WX 555 ; N acute ; B 284 621 579 848 ;
+C 195 ; WX 555 ; N circumflex ; B 189 640 603 806 ;
+C 196 ; WX 555 ; N tilde ; B 213 651 608 781 ;
+C 197 ; WX 555 ; N macron ; B 220 658 602 784 ;
+C 198 ; WX 555 ; N breve ; B 216 644 629 788 ;
+C 199 ; WX 555 ; N dotaccent ; B 317 644 504 795 ;
+C 200 ; WX 555 ; N dieresis ; B 200 644 620 795 ;
+C 202 ; WX 555 ; N ring ; B 283 600 540 852 ;
+C 203 ; WX 555 ; N cedilla ; B 139 -245 364 0 ;
+C 205 ; WX 555 ; N hungarumlaut ; B 222 600 637 832 ;
+C 206 ; WX 555 ; N ogonek ; B 153 -206 361 0 ;
+C 207 ; WX 555 ; N caron ; B 218 633 632 799 ;
+C 208 ; WX 1000 ; N emdash ; B 73 207 1034 370 ;
+C 225 ; WX 975 ; N AE ; B -10 0 1062 740 ;
+C 227 ; WX 385 ; N ordfeminine ; B 127 448 471 754 ;
+C 232 ; WX 487 ; N Lslash ; B 36 0 511 740 ;
+C 233 ; WX 851 ; N Oslash ; B 80 -63 908 806 ;
+C 234 ; WX 1085 ; N OE ; B 97 -14 1172 754 ;
+C 235 ; WX 385 ; N ordmasculine ; B 146 448 461 754 ;
+C 241 ; WX 1091 ; N ae ; B 81 -18 1115 574 ;
+C 245 ; WX 286 ; N dotlessi ; B 60 0 329 555 ;
+C 248 ; WX 342 ; N lslash ; B 60 0 418 740 ;
+C 249 ; WX 666 ; N oslash ; B 42 -83 726 633 ;
+C 250 ; WX 1076 ; N oe ; B 80 -19 1101 574 ;
+C 251 ; WX 694 ; N germandbls ; B 58 -18 706 759 ;
+C -1 ; WX 646 ; N ecircumflex ; B 76 -18 670 806 ;
+C -1 ; WX 646 ; N edieresis ; B 76 -18 670 795 ;
+C -1 ; WX 704 ; N aacute ; B 79 -19 746 848 ;
+C -1 ; WX 800 ; N registered ; B 80 -14 858 754 ;
+C -1 ; WX 286 ; N icircumflex ; B 55 0 469 806 ;
+C -1 ; WX 634 ; N udieresis ; B 90 -18 677 795 ;
+C -1 ; WX 666 ; N ograve ; B 80 -17 689 839 ;
+C -1 ; WX 634 ; N uacute ; B 90 -18 677 848 ;
+C -1 ; WX 634 ; N ucircumflex ; B 90 -18 677 806 ;
+C -1 ; WX 758 ; N Aacute ; B 9 0 749 993 ;
+C -1 ; WX 286 ; N igrave ; B 60 0 377 839 ;
+C -1 ; WX 323 ; N Icircumflex ; B 67 0 517 971 ;
+C -1 ; WX 652 ; N ccedilla ; B 79 -245 683 574 ;
+C -1 ; WX 704 ; N adieresis ; B 79 -19 746 795 ;
+C -1 ; WX 528 ; N Ecircumflex ; B 67 0 620 971 ;
+C -1 ; WX 499 ; N scaron ; B 54 -19 604 799 ;
+C -1 ; WX 695 ; N thorn ; B 25 -185 719 740 ;
+C -1 ; WX 990 ; N trademark ; B 139 296 1016 740 ;
+C -1 ; WX 646 ; N egrave ; B 76 -18 670 839 ;
+C -1 ; WX 407 ; N threesuperior ; B 101 287 471 749 ;
+C -1 ; WX 444 ; N zcaron ; B 15 0 602 799 ;
+C -1 ; WX 704 ; N atilde ; B 79 -19 746 781 ;
+C -1 ; WX 704 ; N aring ; B 79 -19 746 852 ;
+C -1 ; WX 666 ; N ocircumflex ; B 80 -17 689 806 ;
+C -1 ; WX 528 ; N Edieresis ; B 67 0 638 960 ;
+C -1 ; WX 1000 ; N threequarters ; B 120 0 991 749 ;
+C -1 ; WX 574 ; N ydieresis ; B 85 -185 676 795 ;
+C -1 ; WX 574 ; N yacute ; B 85 -185 676 848 ;
+C -1 ; WX 286 ; N iacute ; B 60 0 470 848 ;
+C -1 ; WX 758 ; N Acircumflex ; B 9 0 749 951 ;
+C -1 ; WX 698 ; N Uacute ; B 108 -14 770 1013 ;
+C -1 ; WX 646 ; N eacute ; B 76 -18 670 848 ;
+C -1 ; WX 851 ; N Ograve ; B 96 -14 891 1004 ;
+C -1 ; WX 704 ; N agrave ; B 79 -19 746 839 ;
+C -1 ; WX 698 ; N Udieresis ; B 108 -14 770 960 ;
+C -1 ; WX 704 ; N acircumflex ; B 79 -19 746 806 ;
+C -1 ; WX 323 ; N Igrave ; B 67 0 425 1004 ;
+C -1 ; WX 407 ; N twosuperior ; B 90 296 490 749 ;
+C -1 ; WX 698 ; N Ugrave ; B 108 -14 770 1004 ;
+C -1 ; WX 900 ; N onequarter ; B 166 0 883 740 ;
+C -1 ; WX 698 ; N Ucircumflex ; B 108 -14 770 971 ;
+C -1 ; WX 573 ; N Scaron ; B 62 -14 672 964 ;
+C -1 ; WX 323 ; N Idieresis ; B 67 0 535 960 ;
+C -1 ; WX 286 ; N idieresis ; B 60 0 486 795 ;
+C -1 ; WX 528 ; N Egrave ; B 67 0 615 1004 ;
+C -1 ; WX 851 ; N Oacute ; B 96 -14 891 1013 ;
+C -1 ; WX 600 ; N divide ; B 80 -57 614 563 ;
+C -1 ; WX 758 ; N Atilde ; B 9 0 749 946 ;
+C -1 ; WX 758 ; N Aring ; B 9 0 749 1017 ;
+C -1 ; WX 851 ; N Odieresis ; B 96 -14 891 960 ;
+C -1 ; WX 758 ; N Adieresis ; B 9 0 749 940 ;
+C -1 ; WX 759 ; N Ntilde ; B 67 0 828 946 ;
+C -1 ; WX 499 ; N Zcaron ; B 16 0 660 964 ;
+C -1 ; WX 636 ; N Thorn ; B 67 0 702 740 ;
+C -1 ; WX 323 ; N Iacute ; B 67 0 519 1013 ;
+C -1 ; WX 600 ; N plusminus ; B 33 -82 630 556 ;
+C -1 ; WX 600 ; N multiply ; B 77 0 613 487 ;
+C -1 ; WX 528 ; N Eacute ; B 67 0 615 1013 ;
+C -1 ; WX 647 ; N Ydieresis ; B 146 0 775 960 ;
+C -1 ; WX 407 ; N onesuperior ; B 187 296 407 740 ;
+C -1 ; WX 634 ; N ugrave ; B 90 -18 677 839 ;
+C -1 ; WX 600 ; N logicalnot ; B 86 108 639 445 ;
+C -1 ; WX 632 ; N ntilde ; B 60 0 647 781 ;
+C -1 ; WX 851 ; N Otilde ; B 96 -14 891 946 ;
+C -1 ; WX 666 ; N otilde ; B 80 -17 689 781 ;
+C -1 ; WX 832 ; N Ccedilla ; B 99 -245 886 754 ;
+C -1 ; WX 758 ; N Agrave ; B 9 0 749 984 ;
+C -1 ; WX 920 ; N onehalf ; B 166 0 931 740 ;
+C -1 ; WX 742 ; N Eth ; B 55 0 785 740 ;
+C -1 ; WX 400 ; N degree ; B 160 426 451 712 ;
+C -1 ; WX 647 ; N Yacute ; B 146 0 775 1013 ;
+C -1 ; WX 851 ; N Ocircumflex ; B 96 -14 891 971 ;
+C -1 ; WX 666 ; N oacute ; B 80 -17 689 848 ;
+C -1 ; WX 634 ; N mu ; B 17 -190 684 555 ;
+C -1 ; WX 600 ; N minus ; B 80 173 614 333 ;
+C -1 ; WX 666 ; N eth ; B 80 -17 721 756 ;
+C -1 ; WX 666 ; N odieresis ; B 80 -17 689 795 ;
+C -1 ; WX 800 ; N copyright ; B 80 -14 858 754 ;
+C -1 ; WX 555 ; N brokenbar ; B 167 -100 506 740 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 213
+
+KPX A y -68
+KPX A w -65
+KPX A v -70
+KPX A u -20
+KPX A quoteright -50
+KPX A quotedblright -50
+KPX A Y -80
+KPX A W -60
+KPX A V -102
+KPX A U -40
+KPX A T -25
+KPX A Q -50
+KPX A O -35
+KPX A G -40
+KPX A C -40
+
+KPX B A -10
+
+KPX C A -40
+
+KPX D period -20
+KPX D comma -20
+KPX D Y -45
+KPX D W -25
+KPX D V -50
+KPX D A -50
+
+KPX F period -129
+KPX F e -20
+KPX F comma -162
+KPX F a -20
+KPX F A -60
+
+KPX G period -20
+KPX G comma -20
+
+KPX J period -15
+KPX J a -20
+KPX J A -30
+
+KPX K y -40
+KPX K u -30
+KPX K o -45
+KPX K e -45
+KPX K O -30
+
+KPX L y -23
+KPX L quoteright -50
+KPX L quotedblright -50
+KPX L Y -80
+KPX L W -55
+KPX L V -85
+KPX L T -46
+
+KPX O period -30
+KPX O comma -30
+KPX O Y -30
+KPX O X -30
+KPX O W -20
+KPX O V -45
+KPX O T -15
+KPX O A -60
+
+KPX P period -200
+KPX P o -20
+KPX P e -20
+KPX P comma -220
+KPX P a -20
+KPX P A -85
+
+KPX Q comma 20
+
+KPX R W 10
+KPX R V -10
+KPX R U 10
+KPX R T 25
+KPX R O 10
+
+KPX S comma 20
+
+KPX T y -10
+KPX T w -55
+KPX T u -46
+KPX T semicolon -29
+KPX T r -30
+KPX T period -91
+KPX T o -49
+KPX T hyphen -75
+KPX T e -49
+KPX T comma -82
+KPX T colon -15
+KPX T a -70
+KPX T O -15
+KPX T A -25
+
+KPX U period -20
+KPX U comma -20
+KPX U A -40
+
+KPX V u -55
+KPX V semicolon -33
+KPX V period -145
+KPX V o -101
+KPX V i -30
+KPX V hyphen -75
+KPX V e -101
+KPX V comma -145
+KPX V colon -18
+KPX V a -95
+KPX V O -45
+KPX V G -20
+KPX V A -102
+
+KPX W y -32
+KPX W u -30
+KPX W semicolon -33
+KPX W period -106
+KPX W o -46
+KPX W i -10
+KPX W hyphen -35
+KPX W e -47
+KPX W comma -106
+KPX W colon -15
+KPX W a -50
+KPX W O -20
+KPX W A -58
+
+KPX Y u -70
+KPX Y semicolon -23
+KPX Y period -145
+KPX Y o -89
+KPX Y i -20
+KPX Y hyphen -100
+KPX Y e -89
+KPX Y comma -145
+KPX Y colon -10
+KPX Y a -93
+KPX Y O -30
+KPX Y A -80
+
+KPX a t 5
+KPX a p 20
+KPX a b 5
+
+KPX b y -20
+KPX b v -20
+KPX b b -10
+
+KPX c y -20
+KPX c k -15
+
+KPX comma space -50
+KPX comma quoteright -90
+KPX comma quotedblright -90
+
+KPX e y -20
+KPX e x -25
+KPX e w -20
+KPX e v -20
+
+KPX f period -50
+KPX f o -5
+KPX f comma -50
+KPX f a -5
+
+KPX g i 10
+
+KPX h y -30
+
+KPX k y -5
+KPX k o -30
+KPX k e -25
+
+KPX m y -20
+KPX m u -20
+
+KPX n y -15
+KPX n v -30
+
+KPX o y -20
+KPX o x -15
+KPX o w -20
+KPX o v -30
+
+KPX p y -20
+
+KPX period space -50
+KPX period quoteright -90
+KPX period quotedblright -90
+
+KPX quotedblleft A -50
+
+KPX quotedblright space -50
+
+KPX quoteleft quoteleft -80
+KPX quoteleft A -50
+
+KPX quoteright v -10
+KPX quoteright t 10
+KPX quoteright space -50
+KPX quoteright s -15
+KPX quoteright r -20
+KPX quoteright quoteright -80
+KPX quoteright d -45
+
+KPX r y 40
+KPX r v 40
+KPX r u 20
+KPX r t 20
+KPX r s 20
+KPX r q -8
+KPX r period -73
+KPX r p 20
+KPX r n 21
+KPX r m 28
+KPX r l 20
+KPX r k 20
+KPX r i 20
+KPX r hyphen -60
+KPX r g 1
+KPX r e -4
+KPX r d -6
+KPX r comma -75
+KPX r c -7
+
+KPX s period 20
+KPX s comma 20
+
+KPX space quoteleft -50
+KPX space quotedblleft -50
+KPX space Y -60
+KPX space W -25
+KPX space V -80
+KPX space T -25
+KPX space A -20
+
+KPX v period -90
+KPX v o -20
+KPX v e -20
+KPX v comma -90
+KPX v a -30
+
+KPX w period -90
+KPX w o -30
+KPX w h 15
+KPX w e -20
+KPX w comma -90
+KPX w a -30
+
+KPX x e -25
+
+KPX y period -60
+KPX y o -30
+KPX y e -20
+KPX y comma -90
+KPX y a -30
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 129 145 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 129 145 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 129 145 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 129 145 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 133 165 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 133 165 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 18 165 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 18 165 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 18 165 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 18 165 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -60 165 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -85 165 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -85 165 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -110 165 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 133 165 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 179 165 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 179 165 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 179 165 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 179 165 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 179 165 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 40 165 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 138 165 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 103 165 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 103 165 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 68 165 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 112 165 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 77 165 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 28 165 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 75 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 75 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 75 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 75 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 75 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 75 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 46 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 46 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 46 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 46 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -109 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -134 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -134 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -159 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 39 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 56 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 56 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 56 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 56 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 56 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron -28 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 75 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 40 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 40 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 5 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 45 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 10 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron -30 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-Bk b/font/AG-Bk
new file mode 100644
index 0000000..53b03bb
--- /dev/null
+++ b/font/AG-Bk
@@ -0,0 +1,573 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Mar  4 13:37:31 1991
+Comment UniqueID 34364
+Comment VMusage 24225 31117
+FontName AvantGarde-Book
+FullName ITC Avant Garde Gothic Book
+FamilyName ITC Avant Garde Gothic
+Weight Book
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -113 -222 1148 955
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.006
+Notice Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.ITC Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 740
+XHeight 547
+Ascender 740
+Descender -192
+StartCharMetrics 228
+C 32 ; WX 277 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 295 ; N exclam ; B 111 0 185 740 ;
+C 34 ; WX 309 ; N quotedbl ; B 36 444 273 740 ;
+C 35 ; WX 554 ; N numbersign ; B 33 0 521 740 ;
+C 36 ; WX 554 ; N dollar ; B 70 -70 485 811 ;
+C 37 ; WX 775 ; N percent ; B 21 -13 753 751 ;
+C 38 ; WX 757 ; N ampersand ; B 56 -12 736 753 ;
+C 39 ; WX 351 ; N quoteright ; B 94 546 256 740 ;
+C 40 ; WX 369 ; N parenleft ; B 47 -205 355 757 ;
+C 41 ; WX 369 ; N parenright ; B 14 -205 322 757 ;
+C 42 ; WX 425 ; N asterisk ; B 58 446 367 740 ;
+C 43 ; WX 606 ; N plus ; B 51 0 555 506 ;
+C 44 ; WX 277 ; N comma ; B 14 -67 176 126 ;
+C 45 ; WX 332 ; N hyphen ; B 30 248 302 315 ;
+C 46 ; WX 277 ; N period ; B 102 0 176 126 ;
+C 47 ; WX 437 ; N slash ; B 44 -100 403 740 ;
+C 48 ; WX 554 ; N zero ; B 29 -13 525 753 ;
+C 49 ; WX 554 ; N one ; B 135 0 336 740 ;
+C 50 ; WX 554 ; N two ; B 40 0 514 753 ;
+C 51 ; WX 554 ; N three ; B 34 -13 506 753 ;
+C 52 ; WX 554 ; N four ; B 14 0 528 740 ;
+C 53 ; WX 554 ; N five ; B 26 -13 530 740 ;
+C 54 ; WX 554 ; N six ; B 24 -13 530 739 ;
+C 55 ; WX 554 ; N seven ; B 63 0 491 740 ;
+C 56 ; WX 554 ; N eight ; B 41 -13 513 753 ;
+C 57 ; WX 554 ; N nine ; B 24 0 530 752 ;
+C 58 ; WX 277 ; N colon ; B 102 0 176 548 ;
+C 59 ; WX 277 ; N semicolon ; B 14 -67 176 548 ;
+C 60 ; WX 606 ; N less ; B 46 -8 554 514 ;
+C 61 ; WX 606 ; N equal ; B 51 118 555 388 ;
+C 62 ; WX 606 ; N greater ; B 52 -8 560 514 ;
+C 63 ; WX 591 ; N question ; B 64 0 526 752 ;
+C 64 ; WX 867 ; N at ; B 65 -13 803 753 ;
+C 65 ; WX 740 ; N A ; B 12 0 729 740 ;
+C 66 ; WX 574 ; N B ; B 74 0 544 740 ;
+C 67 ; WX 813 ; N C ; B 43 -13 771 752 ;
+C 68 ; WX 744 ; N D ; B 74 0 699 740 ;
+C 69 ; WX 536 ; N E ; B 70 0 475 740 ;
+C 70 ; WX 485 ; N F ; B 70 0 444 740 ;
+C 71 ; WX 872 ; N G ; B 40 -13 828 753 ;
+C 72 ; WX 683 ; N H ; B 76 0 607 740 ;
+C 73 ; WX 226 ; N I ; B 76 0 150 740 ;
+C 74 ; WX 482 ; N J ; B 6 -13 402 740 ;
+C 75 ; WX 591 ; N K ; B 81 0 591 740 ;
+C 76 ; WX 462 ; N L ; B 82 0 462 740 ;
+C 77 ; WX 919 ; N M ; B 76 0 843 740 ;
+C 78 ; WX 740 ; N N ; B 75 0 664 740 ;
+C 79 ; WX 869 ; N O ; B 43 -13 826 753 ;
+C 80 ; WX 592 ; N P ; B 75 0 564 740 ;
+C 81 ; WX 871 ; N Q ; B 40 -13 837 753 ;
+C 82 ; WX 607 ; N R ; B 70 0 572 740 ;
+C 83 ; WX 498 ; N S ; B 22 -13 473 753 ;
+C 84 ; WX 426 ; N T ; B 6 0 419 740 ;
+C 85 ; WX 655 ; N U ; B 75 -13 579 740 ;
+C 86 ; WX 702 ; N V ; B 8 0 693 740 ;
+C 87 ; WX 960 ; N W ; B 11 0 950 740 ;
+C 88 ; WX 609 ; N X ; B 8 0 602 740 ;
+C 89 ; WX 592 ; N Y ; B 1 0 592 740 ;
+C 90 ; WX 480 ; N Z ; B 12 0 470 740 ;
+C 91 ; WX 351 ; N bracketleft ; B 133 -179 337 753 ;
+C 92 ; WX 605 ; N backslash ; B 118 -100 477 740 ;
+C 93 ; WX 351 ; N bracketright ; B 14 -179 218 753 ;
+C 94 ; WX 606 ; N asciicircum ; B 53 307 553 740 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 351 ; N quoteleft ; B 95 546 257 740 ;
+C 97 ; WX 683 ; N a ; B 42 -13 621 561 ;
+C 98 ; WX 682 ; N b ; B 68 -13 647 740 ;
+C 99 ; WX 647 ; N c ; B 41 -13 607 561 ;
+C 100 ; WX 685 ; N d ; B 39 -13 618 740 ;
+C 101 ; WX 650 ; N e ; B 38 -13 608 561 ;
+C 102 ; WX 314 ; N f ; B 19 0 314 753 ; L i fi ; L l fl ;
+C 103 ; WX 673 ; N g ; B 37 -215 606 561 ;
+C 104 ; WX 610 ; N h ; B 62 0 543 740 ;
+C 105 ; WX 200 ; N i ; B 65 0 135 740 ;
+C 106 ; WX 203 ; N j ; B -44 -192 137 740 ;
+C 107 ; WX 502 ; N k ; B 70 0 498 740 ;
+C 108 ; WX 200 ; N l ; B 65 0 135 740 ;
+C 109 ; WX 938 ; N m ; B 66 0 872 561 ;
+C 110 ; WX 610 ; N n ; B 65 0 546 561 ;
+C 111 ; WX 655 ; N o ; B 42 -13 614 561 ;
+C 112 ; WX 682 ; N p ; B 64 -192 643 561 ;
+C 113 ; WX 682 ; N q ; B 37 -192 616 561 ;
+C 114 ; WX 301 ; N r ; B 65 0 291 561 ;
+C 115 ; WX 388 ; N s ; B 24 -13 364 561 ;
+C 116 ; WX 339 ; N t ; B 14 0 330 740 ;
+C 117 ; WX 608 ; N u ; B 62 -13 541 547 ;
+C 118 ; WX 554 ; N v ; B 7 0 546 547 ;
+C 119 ; WX 831 ; N w ; B 13 0 820 547 ;
+C 120 ; WX 480 ; N x ; B 12 0 468 547 ;
+C 121 ; WX 536 ; N y ; B 15 -192 523 547 ;
+C 122 ; WX 425 ; N z ; B 10 0 415 547 ;
+C 123 ; WX 351 ; N braceleft ; B 70 -189 331 740 ;
+C 124 ; WX 672 ; N bar ; B 299 -100 373 740 ;
+C 125 ; WX 351 ; N braceright ; B 20 -189 281 740 ;
+C 126 ; WX 606 ; N asciitilde ; B 72 179 534 319 ;
+C 161 ; WX 295 ; N exclamdown ; B 110 -192 184 548 ;
+C 162 ; WX 554 ; N cent ; B 48 62 510 707 ;
+C 163 ; WX 554 ; N sterling ; B 4 0 552 753 ;
+C 164 ; WX 166 ; N fraction ; B -113 0 280 740 ;
+C 165 ; WX 554 ; N yen ; B 4 0 550 740 ;
+C 166 ; WX 554 ; N florin ; B -12 -153 518 818 ;
+C 167 ; WX 615 ; N section ; B 85 -141 529 753 ;
+C 168 ; WX 554 ; N currency ; B 8 42 546 580 ;
+C 169 ; WX 198 ; N quotesingle ; B 59 444 140 740 ;
+C 170 ; WX 502 ; N quotedblleft ; B 97 546 406 740 ;
+C 171 ; WX 425 ; N guillemotleft ; B 40 81 386 481 ;
+C 172 ; WX 251 ; N guilsinglleft ; B 40 81 212 481 ;
+C 173 ; WX 251 ; N guilsinglright ; B 39 81 211 481 ;
+C 174 ; WX 487 ; N fi ; B 19 0 422 753 ;
+C 175 ; WX 485 ; N fl ; B 19 0 420 753 ;
+C 177 ; WX 500 ; N endash ; B 35 248 465 315 ;
+C 178 ; WX 553 ; N dagger ; B 59 -133 493 740 ;
+C 179 ; WX 553 ; N daggerdbl ; B 59 -133 493 740 ;
+C 180 ; WX 277 ; N periodcentered ; B 102 190 176 316 ;
+C 182 ; WX 564 ; N paragraph ; B 22 -110 551 740 ;
+C 183 ; WX 606 ; N bullet ; B 150 222 455 532 ;
+C 184 ; WX 354 ; N quotesinglbase ; B 89 -68 251 126 ;
+C 185 ; WX 502 ; N quotedblbase ; B 89 -68 399 126 ;
+C 186 ; WX 484 ; N quotedblright ; B 96 546 405 740 ;
+C 187 ; WX 425 ; N guillemotright ; B 39 81 385 481 ;
+C 188 ; WX 1000 ; N ellipsis ; B 130 0 870 126 ;
+C 189 ; WX 1174 ; N perthousand ; B 25 -13 1148 751 ;
+C 191 ; WX 591 ; N questiondown ; B 65 -205 527 548 ;
+C 193 ; WX 378 ; N grave ; B 69 619 300 786 ;
+C 194 ; WX 375 ; N acute ; B 78 619 309 786 ;
+C 195 ; WX 502 ; N circumflex ; B 74 639 428 764 ;
+C 196 ; WX 439 ; N tilde ; B 47 651 392 754 ;
+C 197 ; WX 485 ; N macron ; B 73 669 411 736 ;
+C 198 ; WX 453 ; N breve ; B 52 651 401 754 ;
+C 199 ; WX 222 ; N dotaccent ; B 74 639 148 765 ;
+C 200 ; WX 369 ; N dieresis ; B 73 639 295 765 ;
+C 202 ; WX 332 ; N ring ; B 62 600 269 807 ;
+C 203 ; WX 324 ; N cedilla ; B 80 -222 254 0 ;
+C 205 ; WX 552 ; N hungarumlaut ; B 119 605 453 800 ;
+C 206 ; WX 302 ; N ogonek ; B 73 -191 228 0 ;
+C 207 ; WX 502 ; N caron ; B 68 639 423 764 ;
+C 208 ; WX 1000 ; N emdash ; B 35 248 965 315 ;
+C 225 ; WX 992 ; N AE ; B -20 0 907 740 ;
+C 227 ; WX 369 ; N ordfeminine ; B -3 407 356 753 ;
+C 232 ; WX 517 ; N Lslash ; B 59 0 517 740 ;
+C 233 ; WX 868 ; N Oslash ; B 43 -83 826 819 ;
+C 234 ; WX 1194 ; N OE ; B 45 -13 1142 753 ;
+C 235 ; WX 369 ; N ordmasculine ; B 12 407 356 753 ;
+C 241 ; WX 1157 ; N ae ; B 34 -13 1113 561 ;
+C 245 ; WX 200 ; N dotlessi ; B 65 0 135 547 ;
+C 248 ; WX 300 ; N lslash ; B 43 0 259 740 ;
+C 249 ; WX 653 ; N oslash ; B 41 -64 613 614 ;
+C 250 ; WX 1137 ; N oe ; B 34 -13 1104 561 ;
+C 251 ; WX 554 ; N germandbls ; B 61 -13 525 753 ;
+C -1 ; WX 650 ; N ecircumflex ; B 38 -13 608 764 ;
+C -1 ; WX 650 ; N edieresis ; B 38 -13 608 765 ;
+C -1 ; WX 683 ; N aacute ; B 42 -13 621 786 ;
+C -1 ; WX 747 ; N registered ; B -9 -12 755 752 ;
+C -1 ; WX 200 ; N icircumflex ; B -77 0 277 764 ;
+C -1 ; WX 608 ; N udieresis ; B 62 -13 541 765 ;
+C -1 ; WX 655 ; N ograve ; B 42 -13 614 786 ;
+C -1 ; WX 608 ; N uacute ; B 62 -13 541 786 ;
+C -1 ; WX 608 ; N ucircumflex ; B 62 -13 541 764 ;
+C -1 ; WX 740 ; N Aacute ; B 12 0 729 949 ;
+C -1 ; WX 200 ; N igrave ; B -60 0 171 786 ;
+C -1 ; WX 226 ; N Icircumflex ; B -64 0 290 927 ;
+C -1 ; WX 647 ; N ccedilla ; B 41 -222 607 561 ;
+C -1 ; WX 683 ; N adieresis ; B 42 -13 621 765 ;
+C -1 ; WX 536 ; N Ecircumflex ; B 70 0 475 927 ;
+C -1 ; WX 388 ; N scaron ; B 11 -13 366 764 ;
+C -1 ; WX 682 ; N thorn ; B 64 -192 643 740 ;
+C -1 ; WX 1000 ; N trademark ; B 9 296 816 740 ;
+C -1 ; WX 650 ; N egrave ; B 38 -13 608 786 ;
+C -1 ; WX 332 ; N threesuperior ; B 18 289 318 747 ;
+C -1 ; WX 425 ; N zcaron ; B 10 0 415 764 ;
+C -1 ; WX 683 ; N atilde ; B 42 -13 621 754 ;
+C -1 ; WX 683 ; N aring ; B 42 -13 621 807 ;
+C -1 ; WX 655 ; N ocircumflex ; B 42 -13 614 764 ;
+C -1 ; WX 536 ; N Edieresis ; B 70 0 475 928 ;
+C -1 ; WX 831 ; N threequarters ; B 46 0 784 747 ;
+C -1 ; WX 536 ; N ydieresis ; B 15 -192 523 765 ;
+C -1 ; WX 536 ; N yacute ; B 15 -192 523 786 ;
+C -1 ; WX 200 ; N iacute ; B 31 0 262 786 ;
+C -1 ; WX 740 ; N Acircumflex ; B 12 0 729 927 ;
+C -1 ; WX 655 ; N Uacute ; B 75 -13 579 949 ;
+C -1 ; WX 650 ; N eacute ; B 38 -13 608 786 ;
+C -1 ; WX 869 ; N Ograve ; B 43 -13 826 949 ;
+C -1 ; WX 683 ; N agrave ; B 42 -13 621 786 ;
+C -1 ; WX 655 ; N Udieresis ; B 75 -13 579 928 ;
+C -1 ; WX 683 ; N acircumflex ; B 42 -13 621 764 ;
+C -1 ; WX 226 ; N Igrave ; B -47 0 184 949 ;
+C -1 ; WX 332 ; N twosuperior ; B 19 296 318 747 ;
+C -1 ; WX 655 ; N Ugrave ; B 75 -13 579 949 ;
+C -1 ; WX 831 ; N onequarter ; B 100 0 729 740 ;
+C -1 ; WX 655 ; N Ucircumflex ; B 75 -13 579 927 ;
+C -1 ; WX 498 ; N Scaron ; B 22 -13 473 927 ;
+C -1 ; WX 226 ; N Idieresis ; B 2 0 224 928 ;
+C -1 ; WX 200 ; N idieresis ; B -11 0 211 765 ;
+C -1 ; WX 536 ; N Egrave ; B 70 0 475 949 ;
+C -1 ; WX 869 ; N Oacute ; B 43 -13 826 949 ;
+C -1 ; WX 606 ; N divide ; B 51 -13 555 519 ;
+C -1 ; WX 740 ; N Atilde ; B 12 0 729 917 ;
+C -1 ; WX 740 ; N Aring ; B 12 0 729 955 ;
+C -1 ; WX 869 ; N Odieresis ; B 43 -13 826 928 ;
+C -1 ; WX 740 ; N Adieresis ; B 12 0 729 928 ;
+C -1 ; WX 740 ; N Ntilde ; B 75 0 664 917 ;
+C -1 ; WX 480 ; N Zcaron ; B 12 0 470 927 ;
+C -1 ; WX 592 ; N Thorn ; B 60 0 549 740 ;
+C -1 ; WX 226 ; N Iacute ; B 44 0 275 949 ;
+C -1 ; WX 606 ; N plusminus ; B 51 -24 555 518 ;
+C -1 ; WX 606 ; N multiply ; B 74 24 533 482 ;
+C -1 ; WX 536 ; N Eacute ; B 70 0 475 949 ;
+C -1 ; WX 592 ; N Ydieresis ; B 1 0 592 928 ;
+C -1 ; WX 332 ; N onesuperior ; B 63 296 198 740 ;
+C -1 ; WX 608 ; N ugrave ; B 62 -13 541 786 ;
+C -1 ; WX 606 ; N logicalnot ; B 51 109 555 388 ;
+C -1 ; WX 610 ; N ntilde ; B 65 0 546 754 ;
+C -1 ; WX 869 ; N Otilde ; B 43 -13 826 917 ;
+C -1 ; WX 655 ; N otilde ; B 42 -13 614 754 ;
+C -1 ; WX 813 ; N Ccedilla ; B 43 -222 771 752 ;
+C -1 ; WX 740 ; N Agrave ; B 12 0 729 949 ;
+C -1 ; WX 831 ; N onehalf ; B 81 0 750 740 ;
+C -1 ; WX 790 ; N Eth ; B 40 0 739 740 ;
+C -1 ; WX 400 ; N degree ; B 56 421 344 709 ;
+C -1 ; WX 592 ; N Yacute ; B 1 0 592 949 ;
+C -1 ; WX 869 ; N Ocircumflex ; B 43 -13 826 927 ;
+C -1 ; WX 655 ; N oacute ; B 42 -13 614 786 ;
+C -1 ; WX 608 ; N mu ; B 80 -184 527 547 ;
+C -1 ; WX 606 ; N minus ; B 51 219 555 287 ;
+C -1 ; WX 655 ; N eth ; B 42 -12 614 753 ;
+C -1 ; WX 655 ; N odieresis ; B 42 -13 614 765 ;
+C -1 ; WX 747 ; N copyright ; B -9 -12 755 752 ;
+C -1 ; WX 672 ; N brokenbar ; B 299 -100 373 740 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 216
+
+KPX A y -62
+KPX A w -65
+KPX A v -70
+KPX A u -20
+KPX A quoteright -100
+KPX A quotedblright -100
+KPX A Y -92
+KPX A W -60
+KPX A V -102
+KPX A U -40
+KPX A T -45
+KPX A Q -40
+KPX A O -50
+KPX A G -40
+KPX A C -40
+
+KPX B A -10
+
+KPX C A -40
+
+KPX D period -20
+KPX D comma -20
+KPX D Y -30
+KPX D W -10
+KPX D V -50
+KPX D A -50
+
+KPX F period -160
+KPX F e -20
+KPX F comma -180
+KPX F a -20
+KPX F A -75
+
+KPX G period -20
+KPX G comma -20
+KPX G Y -20
+
+KPX J period -15
+KPX J a -20
+KPX J A -30
+
+KPX K o -15
+KPX K e -20
+KPX K O -20
+
+KPX L y -23
+KPX L quoteright -130
+KPX L quotedblright -130
+KPX L Y -91
+KPX L W -67
+KPX L V -113
+KPX L T -46
+
+KPX O period -30
+KPX O comma -30
+KPX O Y -30
+KPX O X -30
+KPX O W -20
+KPX O V -60
+KPX O T -30
+KPX O A -60
+
+KPX P period -300
+KPX P o -60
+KPX P e -20
+KPX P comma -280
+KPX P a -20
+KPX P A -114
+
+KPX Q comma 20
+
+KPX R Y -10
+KPX R W 10
+KPX R V -10
+KPX R T 6
+
+KPX S comma 20
+
+KPX T y -50
+KPX T w -55
+KPX T u -46
+KPX T semicolon -29
+KPX T r -30
+KPX T period -91
+KPX T o -70
+KPX T i 10
+KPX T hyphen -75
+KPX T e -49
+KPX T comma -82
+KPX T colon -15
+KPX T a -90
+KPX T O -30
+KPX T A -45
+
+KPX U period -20
+KPX U comma -20
+KPX U A -40
+
+KPX V u -40
+KPX V semicolon -33
+KPX V period -165
+KPX V o -101
+KPX V i -5
+KPX V hyphen -75
+KPX V e -101
+KPX V comma -145
+KPX V colon -18
+KPX V a -104
+KPX V O -60
+KPX V G -20
+KPX V A -102
+
+KPX W y -2
+KPX W u -30
+KPX W semicolon -33
+KPX W period -106
+KPX W o -46
+KPX W i 6
+KPX W hyphen -35
+KPX W e -47
+KPX W comma -106
+KPX W colon -15
+KPX W a -50
+KPX W O -20
+KPX W A -58
+
+KPX Y u -52
+KPX Y semicolon -23
+KPX Y period -175
+KPX Y o -89
+KPX Y hyphen -85
+KPX Y e -89
+KPX Y comma -145
+KPX Y colon -10
+KPX Y a -93
+KPX Y O -30
+KPX Y A -92
+
+KPX a p 20
+KPX a b 20
+
+KPX b y -20
+KPX b v -20
+
+KPX c y -20
+KPX c k -15
+
+KPX comma space -110
+KPX comma quoteright -120
+KPX comma quotedblright -120
+
+KPX e y -20
+KPX e w -20
+KPX e v -20
+
+KPX f period -50
+KPX f o -40
+KPX f l -30
+KPX f i -34
+KPX f f -60
+KPX f e -20
+KPX f dotlessi -34
+KPX f comma -50
+KPX f a -40
+
+KPX g a -15
+
+KPX h y -30
+
+KPX k y -5
+KPX k e -15
+
+KPX m y -20
+KPX m u -20
+KPX m a -20
+
+KPX n y -15
+KPX n v -20
+
+KPX o y -20
+KPX o x -15
+KPX o w -20
+KPX o v -30
+
+KPX p y -20
+
+KPX period space -110
+KPX period quoteright -120
+KPX period quotedblright -120
+
+KPX quotedblleft quoteleft -35
+KPX quotedblleft A -100
+
+KPX quotedblright space -110
+
+KPX quoteleft quoteleft -203
+KPX quoteleft A -100
+
+KPX quoteright v -30
+KPX quoteright t 10
+KPX quoteright space -110
+KPX quoteright s -15
+KPX quoteright r -20
+KPX quoteright quoteright -203
+KPX quoteright quotedblright -35
+KPX quoteright d -110
+
+KPX r y 40
+KPX r v 40
+KPX r u 20
+KPX r t 20
+KPX r s 20
+KPX r q -8
+KPX r period -73
+KPX r p 20
+KPX r o -20
+KPX r n 21
+KPX r m 28
+KPX r l 20
+KPX r k 20
+KPX r i 20
+KPX r hyphen -60
+KPX r g -15
+KPX r e -4
+KPX r d -6
+KPX r comma -75
+KPX r c -20
+KPX r a -20
+
+KPX s period 20
+KPX s comma 20
+
+KPX space quoteleft -110
+KPX space quotedblleft -110
+KPX space Y -60
+KPX space W -25
+KPX space V -50
+KPX space T -25
+KPX space A -20
+
+KPX v period -130
+KPX v o -30
+KPX v e -20
+KPX v comma -100
+KPX v a -30
+
+KPX w period -100
+KPX w o -30
+KPX w h 15
+KPX w e -20
+KPX w comma -90
+KPX w a -30
+
+KPX y period -125
+KPX y o -30
+KPX y e -20
+KPX y comma -110
+KPX y a -30
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 183 163 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 119 163 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 186 163 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 181 163 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 204 148 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 151 163 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 81 163 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 17 163 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 84 163 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 79 163 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -34 163 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -138 163 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -71 163 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -116 163 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 151 163 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 247 163 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 184 163 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 250 163 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 246 163 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 215 163 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron -2 163 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 160 163 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 77 163 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 143 163 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 119 163 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 129 163 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 112 163 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron -11 163 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 154 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 91 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 157 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 153 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 176 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 122 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 138 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 74 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 141 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 136 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -47 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -151 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -84 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -129 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 86 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 140 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 77 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 143 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 139 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 108 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron -57 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 137 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 53 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 120 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 95 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 101 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 84 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron -38 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-BkO b/font/AG-BkO
new file mode 100644
index 0000000..e0e75f3
--- /dev/null
+++ b/font/AG-BkO
@@ -0,0 +1,573 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Mar  4 13:41:11 1991
+Comment UniqueID 34367
+Comment VMusage 6555 39267
+FontName AvantGarde-BookOblique
+FullName ITC Avant Garde Gothic Book Oblique
+FamilyName ITC Avant Garde Gothic
+Weight Book
+ItalicAngle -10.5
+IsFixedPitch false
+FontBBox -113 -222 1279 955
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.006
+Notice Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.ITC Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 740
+XHeight 547
+Ascender 740
+Descender -192
+StartCharMetrics 228
+C 32 ; WX 277 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 295 ; N exclam ; B 111 0 322 740 ;
+C 34 ; WX 309 ; N quotedbl ; B 130 444 410 740 ;
+C 35 ; WX 554 ; N numbersign ; B 71 0 620 740 ;
+C 36 ; WX 554 ; N dollar ; B 107 -70 581 811 ;
+C 37 ; WX 775 ; N percent ; B 124 -13 787 751 ;
+C 38 ; WX 757 ; N ampersand ; B 92 -12 775 753 ;
+C 39 ; WX 351 ; N quoteright ; B 195 546 393 740 ;
+C 40 ; WX 369 ; N parenleft ; B 89 -205 495 757 ;
+C 41 ; WX 369 ; N parenright ; B -24 -205 382 757 ;
+C 42 ; WX 425 ; N asterisk ; B 170 446 479 740 ;
+C 43 ; WX 606 ; N plus ; B 92 0 608 506 ;
+C 44 ; WX 277 ; N comma ; B 2 -67 199 126 ;
+C 45 ; WX 332 ; N hyphen ; B 76 248 360 315 ;
+C 46 ; WX 277 ; N period ; B 102 0 199 126 ;
+C 47 ; WX 437 ; N slash ; B 25 -100 540 740 ;
+C 48 ; WX 554 ; N zero ; B 71 -13 622 753 ;
+C 49 ; WX 554 ; N one ; B 260 0 473 740 ;
+C 50 ; WX 554 ; N two ; B 40 0 615 753 ;
+C 51 ; WX 554 ; N three ; B 73 -13 565 753 ;
+C 52 ; WX 554 ; N four ; B 39 0 598 740 ;
+C 53 ; WX 554 ; N five ; B 69 -13 605 740 ;
+C 54 ; WX 554 ; N six ; B 65 -13 580 739 ;
+C 55 ; WX 554 ; N seven ; B 110 0 628 740 ;
+C 56 ; WX 554 ; N eight ; B 77 -13 580 753 ;
+C 57 ; WX 554 ; N nine ; B 111 0 626 752 ;
+C 58 ; WX 277 ; N colon ; B 102 0 278 548 ;
+C 59 ; WX 277 ; N semicolon ; B 2 -67 278 548 ;
+C 60 ; WX 606 ; N less ; B 87 -8 649 514 ;
+C 61 ; WX 606 ; N equal ; B 73 118 627 388 ;
+C 62 ; WX 606 ; N greater ; B 51 -8 613 514 ;
+C 63 ; WX 591 ; N question ; B 158 0 628 752 ;
+C 64 ; WX 867 ; N at ; B 126 -13 888 753 ;
+C 65 ; WX 740 ; N A ; B 12 0 729 740 ;
+C 66 ; WX 574 ; N B ; B 74 0 606 740 ;
+C 67 ; WX 813 ; N C ; B 105 -13 870 752 ;
+C 68 ; WX 744 ; N D ; B 74 0 773 740 ;
+C 69 ; WX 536 ; N E ; B 70 0 612 740 ;
+C 70 ; WX 485 ; N F ; B 70 0 581 740 ;
+C 71 ; WX 872 ; N G ; B 103 -13 891 753 ;
+C 72 ; WX 683 ; N H ; B 76 0 744 740 ;
+C 73 ; WX 226 ; N I ; B 76 0 287 740 ;
+C 74 ; WX 482 ; N J ; B 37 -13 539 740 ;
+C 75 ; WX 591 ; N K ; B 81 0 728 740 ;
+C 76 ; WX 462 ; N L ; B 82 0 474 740 ;
+C 77 ; WX 919 ; N M ; B 76 0 980 740 ;
+C 78 ; WX 740 ; N N ; B 75 0 801 740 ;
+C 79 ; WX 869 ; N O ; B 105 -13 901 753 ;
+C 80 ; WX 592 ; N P ; B 75 0 664 740 ;
+C 81 ; WX 871 ; N Q ; B 102 -13 912 753 ;
+C 82 ; WX 607 ; N R ; B 70 0 669 740 ;
+C 83 ; WX 498 ; N S ; B 57 -13 561 753 ;
+C 84 ; WX 426 ; N T ; B 131 0 556 740 ;
+C 85 ; WX 655 ; N U ; B 118 -13 716 740 ;
+C 86 ; WX 702 ; N V ; B 145 0 830 740 ;
+C 87 ; WX 960 ; N W ; B 148 0 1087 740 ;
+C 88 ; WX 609 ; N X ; B 8 0 724 740 ;
+C 89 ; WX 592 ; N Y ; B 138 0 729 740 ;
+C 90 ; WX 480 ; N Z ; B 12 0 596 740 ;
+C 91 ; WX 351 ; N bracketleft ; B 145 -179 477 753 ;
+C 92 ; WX 605 ; N backslash ; B 255 -100 458 740 ;
+C 93 ; WX 351 ; N bracketright ; B -19 -179 312 753 ;
+C 94 ; WX 606 ; N asciicircum ; B 110 307 610 740 ;
+C 95 ; WX 500 ; N underscore ; B -23 -125 486 -75 ;
+C 96 ; WX 351 ; N quoteleft ; B 232 546 358 740 ;
+C 97 ; WX 683 ; N a ; B 88 -13 722 561 ;
+C 98 ; WX 682 ; N b ; B 68 -13 703 740 ;
+C 99 ; WX 647 ; N c ; B 87 -13 678 561 ;
+C 100 ; WX 685 ; N d ; B 85 -13 755 740 ;
+C 101 ; WX 650 ; N e ; B 84 -13 664 561 ;
+C 102 ; WX 314 ; N f ; B 104 0 454 753 ; L i fi ; L l fl ;
+C 103 ; WX 673 ; N g ; B 56 -215 707 561 ;
+C 104 ; WX 610 ; N h ; B 62 0 606 740 ;
+C 105 ; WX 200 ; N i ; B 65 0 272 740 ;
+C 106 ; WX 203 ; N j ; B -80 -192 274 740 ;
+C 107 ; WX 502 ; N k ; B 70 0 588 740 ;
+C 108 ; WX 200 ; N l ; B 65 0 272 740 ;
+C 109 ; WX 938 ; N m ; B 66 0 938 561 ;
+C 110 ; WX 610 ; N n ; B 65 0 609 561 ;
+C 111 ; WX 655 ; N o ; B 88 -13 669 561 ;
+C 112 ; WX 682 ; N p ; B 28 -192 699 561 ;
+C 113 ; WX 682 ; N q ; B 83 -192 717 561 ;
+C 114 ; WX 301 ; N r ; B 65 0 395 561 ;
+C 115 ; WX 388 ; N s ; B 49 -13 424 561 ;
+C 116 ; WX 339 ; N t ; B 104 0 431 740 ;
+C 117 ; WX 608 ; N u ; B 100 -13 642 547 ;
+C 118 ; WX 554 ; N v ; B 108 0 647 547 ;
+C 119 ; WX 831 ; N w ; B 114 0 921 547 ;
+C 120 ; WX 480 ; N x ; B 12 0 569 547 ;
+C 121 ; WX 536 ; N y ; B 97 -192 624 547 ;
+C 122 ; WX 425 ; N z ; B 10 0 498 547 ;
+C 123 ; WX 351 ; N braceleft ; B 115 -189 468 740 ;
+C 124 ; WX 672 ; N bar ; B 280 -100 510 740 ;
+C 125 ; WX 351 ; N braceright ; B -15 -189 338 740 ;
+C 126 ; WX 606 ; N asciitilde ; B 114 179 584 319 ;
+C 161 ; WX 295 ; N exclamdown ; B 74 -192 286 548 ;
+C 162 ; WX 554 ; N cent ; B 115 62 596 707 ;
+C 163 ; WX 554 ; N sterling ; B 29 0 614 753 ;
+C 164 ; WX 166 ; N fraction ; B -113 0 417 740 ;
+C 165 ; WX 554 ; N yen ; B 75 0 687 740 ;
+C 166 ; WX 554 ; N florin ; B -39 -153 669 818 ;
+C 167 ; WX 615 ; N section ; B 118 -141 597 753 ;
+C 168 ; WX 554 ; N currency ; B 24 42 645 580 ;
+C 169 ; WX 198 ; N quotesingle ; B 153 444 277 740 ;
+C 170 ; WX 502 ; N quotedblleft ; B 234 546 507 740 ;
+C 171 ; WX 425 ; N guillemotleft ; B 92 81 469 481 ;
+C 172 ; WX 251 ; N guilsinglleft ; B 92 81 295 481 ;
+C 173 ; WX 251 ; N guilsinglright ; B 60 81 263 481 ;
+C 174 ; WX 487 ; N fi ; B 104 0 559 753 ;
+C 175 ; WX 485 ; N fl ; B 104 0 557 753 ;
+C 177 ; WX 500 ; N endash ; B 81 248 523 315 ;
+C 178 ; WX 553 ; N dagger ; B 146 -133 593 740 ;
+C 179 ; WX 553 ; N daggerdbl ; B 72 -133 593 740 ;
+C 180 ; WX 277 ; N periodcentered ; B 137 190 235 316 ;
+C 182 ; WX 564 ; N paragraph ; B 119 -110 688 740 ;
+C 183 ; WX 606 ; N bullet ; B 217 222 528 532 ;
+C 184 ; WX 354 ; N quotesinglbase ; B 76 -68 274 126 ;
+C 185 ; WX 502 ; N quotedblbase ; B 76 -68 422 126 ;
+C 186 ; WX 484 ; N quotedblright ; B 197 546 542 740 ;
+C 187 ; WX 425 ; N guillemotright ; B 60 81 437 481 ;
+C 188 ; WX 1000 ; N ellipsis ; B 130 0 893 126 ;
+C 189 ; WX 1174 ; N perthousand ; B 128 -13 1182 751 ;
+C 191 ; WX 591 ; N questiondown ; B 64 -205 534 548 ;
+C 193 ; WX 378 ; N grave ; B 204 619 425 786 ;
+C 194 ; WX 375 ; N acute ; B 203 619 444 786 ;
+C 195 ; WX 502 ; N circumflex ; B 192 639 546 764 ;
+C 196 ; WX 439 ; N tilde ; B 179 651 520 754 ;
+C 197 ; WX 485 ; N macron ; B 197 669 547 736 ;
+C 198 ; WX 453 ; N breve ; B 192 651 541 754 ;
+C 199 ; WX 222 ; N dotaccent ; B 192 639 290 765 ;
+C 200 ; WX 369 ; N dieresis ; B 191 639 437 765 ;
+C 202 ; WX 332 ; N ring ; B 191 600 401 807 ;
+C 203 ; WX 324 ; N cedilla ; B 52 -222 231 0 ;
+C 205 ; WX 552 ; N hungarumlaut ; B 239 605 594 800 ;
+C 206 ; WX 302 ; N ogonek ; B 53 -191 202 0 ;
+C 207 ; WX 502 ; N caron ; B 210 639 565 764 ;
+C 208 ; WX 1000 ; N emdash ; B 81 248 1023 315 ;
+C 225 ; WX 992 ; N AE ; B -20 0 1044 740 ;
+C 227 ; WX 369 ; N ordfeminine ; B 102 407 494 753 ;
+C 232 ; WX 517 ; N Lslash ; B 107 0 529 740 ;
+C 233 ; WX 868 ; N Oslash ; B 76 -83 929 819 ;
+C 234 ; WX 1194 ; N OE ; B 107 -13 1279 753 ;
+C 235 ; WX 369 ; N ordmasculine ; B 116 407 466 753 ;
+C 241 ; WX 1157 ; N ae ; B 80 -13 1169 561 ;
+C 245 ; WX 200 ; N dotlessi ; B 65 0 236 547 ;
+C 248 ; WX 300 ; N lslash ; B 95 0 354 740 ;
+C 249 ; WX 653 ; N oslash ; B 51 -64 703 614 ;
+C 250 ; WX 1137 ; N oe ; B 80 -13 1160 561 ;
+C 251 ; WX 554 ; N germandbls ; B 61 -13 578 753 ;
+C -1 ; WX 650 ; N ecircumflex ; B 84 -13 664 764 ;
+C -1 ; WX 650 ; N edieresis ; B 84 -13 664 765 ;
+C -1 ; WX 683 ; N aacute ; B 88 -13 722 786 ;
+C -1 ; WX 747 ; N registered ; B 53 -12 830 752 ;
+C -1 ; WX 200 ; N icircumflex ; B 41 0 395 764 ;
+C -1 ; WX 608 ; N udieresis ; B 100 -13 642 765 ;
+C -1 ; WX 655 ; N ograve ; B 88 -13 669 786 ;
+C -1 ; WX 608 ; N uacute ; B 100 -13 642 786 ;
+C -1 ; WX 608 ; N ucircumflex ; B 100 -13 642 764 ;
+C -1 ; WX 740 ; N Aacute ; B 12 0 729 949 ;
+C -1 ; WX 200 ; N igrave ; B 65 0 296 786 ;
+C -1 ; WX 226 ; N Icircumflex ; B 76 0 439 927 ;
+C -1 ; WX 647 ; N ccedilla ; B 87 -222 678 561 ;
+C -1 ; WX 683 ; N adieresis ; B 88 -13 722 765 ;
+C -1 ; WX 536 ; N Ecircumflex ; B 70 0 612 927 ;
+C -1 ; WX 388 ; N scaron ; B 49 -13 508 764 ;
+C -1 ; WX 682 ; N thorn ; B 28 -192 699 740 ;
+C -1 ; WX 1000 ; N trademark ; B 137 296 953 740 ;
+C -1 ; WX 650 ; N egrave ; B 84 -13 664 786 ;
+C -1 ; WX 332 ; N threesuperior ; B 98 289 408 747 ;
+C -1 ; WX 425 ; N zcaron ; B 10 0 527 764 ;
+C -1 ; WX 683 ; N atilde ; B 88 -13 722 754 ;
+C -1 ; WX 683 ; N aring ; B 88 -13 722 807 ;
+C -1 ; WX 655 ; N ocircumflex ; B 88 -13 669 764 ;
+C -1 ; WX 536 ; N Edieresis ; B 70 0 612 928 ;
+C -1 ; WX 831 ; N threequarters ; B 126 0 825 747 ;
+C -1 ; WX 536 ; N ydieresis ; B 97 -192 624 765 ;
+C -1 ; WX 536 ; N yacute ; B 97 -192 624 786 ;
+C -1 ; WX 200 ; N iacute ; B 65 0 397 786 ;
+C -1 ; WX 740 ; N Acircumflex ; B 12 0 729 927 ;
+C -1 ; WX 655 ; N Uacute ; B 118 -13 716 949 ;
+C -1 ; WX 650 ; N eacute ; B 84 -13 664 786 ;
+C -1 ; WX 869 ; N Ograve ; B 105 -13 901 949 ;
+C -1 ; WX 683 ; N agrave ; B 88 -13 722 786 ;
+C -1 ; WX 655 ; N Udieresis ; B 118 -13 716 928 ;
+C -1 ; WX 683 ; N acircumflex ; B 88 -13 722 764 ;
+C -1 ; WX 226 ; N Igrave ; B 76 0 340 949 ;
+C -1 ; WX 332 ; N twosuperior ; B 74 296 433 747 ;
+C -1 ; WX 655 ; N Ugrave ; B 118 -13 716 949 ;
+C -1 ; WX 831 ; N onequarter ; B 183 0 770 740 ;
+C -1 ; WX 655 ; N Ucircumflex ; B 118 -13 716 927 ;
+C -1 ; WX 498 ; N Scaron ; B 57 -13 593 927 ;
+C -1 ; WX 226 ; N Idieresis ; B 76 0 396 928 ;
+C -1 ; WX 200 ; N idieresis ; B 65 0 353 765 ;
+C -1 ; WX 536 ; N Egrave ; B 70 0 612 949 ;
+C -1 ; WX 869 ; N Oacute ; B 105 -13 901 949 ;
+C -1 ; WX 606 ; N divide ; B 92 -13 608 519 ;
+C -1 ; WX 740 ; N Atilde ; B 12 0 729 917 ;
+C -1 ; WX 740 ; N Aring ; B 12 0 729 955 ;
+C -1 ; WX 869 ; N Odieresis ; B 105 -13 901 928 ;
+C -1 ; WX 740 ; N Adieresis ; B 12 0 729 928 ;
+C -1 ; WX 740 ; N Ntilde ; B 75 0 801 917 ;
+C -1 ; WX 480 ; N Zcaron ; B 12 0 596 927 ;
+C -1 ; WX 592 ; N Thorn ; B 60 0 621 740 ;
+C -1 ; WX 226 ; N Iacute ; B 76 0 440 949 ;
+C -1 ; WX 606 ; N plusminus ; B 47 -24 618 518 ;
+C -1 ; WX 606 ; N multiply ; B 87 24 612 482 ;
+C -1 ; WX 536 ; N Eacute ; B 70 0 612 949 ;
+C -1 ; WX 592 ; N Ydieresis ; B 138 0 729 928 ;
+C -1 ; WX 332 ; N onesuperior ; B 190 296 335 740 ;
+C -1 ; WX 608 ; N ugrave ; B 100 -13 642 786 ;
+C -1 ; WX 606 ; N logicalnot ; B 110 109 627 388 ;
+C -1 ; WX 610 ; N ntilde ; B 65 0 609 754 ;
+C -1 ; WX 869 ; N Otilde ; B 105 -13 901 917 ;
+C -1 ; WX 655 ; N otilde ; B 88 -13 669 754 ;
+C -1 ; WX 813 ; N Ccedilla ; B 105 -222 870 752 ;
+C -1 ; WX 740 ; N Agrave ; B 12 0 729 949 ;
+C -1 ; WX 831 ; N onehalf ; B 164 0 810 740 ;
+C -1 ; WX 790 ; N Eth ; B 104 0 813 740 ;
+C -1 ; WX 400 ; N degree ; B 158 421 451 709 ;
+C -1 ; WX 592 ; N Yacute ; B 138 0 729 949 ;
+C -1 ; WX 869 ; N Ocircumflex ; B 105 -13 901 927 ;
+C -1 ; WX 655 ; N oacute ; B 88 -13 669 786 ;
+C -1 ; WX 608 ; N mu ; B 46 -184 628 547 ;
+C -1 ; WX 606 ; N minus ; B 92 219 608 287 ;
+C -1 ; WX 655 ; N eth ; B 88 -12 675 753 ;
+C -1 ; WX 655 ; N odieresis ; B 88 -13 669 765 ;
+C -1 ; WX 747 ; N copyright ; B 53 -12 830 752 ;
+C -1 ; WX 672 ; N brokenbar ; B 280 -100 510 740 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 216
+
+KPX A y -62
+KPX A w -65
+KPX A v -70
+KPX A u -20
+KPX A quoteright -100
+KPX A quotedblright -100
+KPX A Y -92
+KPX A W -60
+KPX A V -102
+KPX A U -40
+KPX A T -45
+KPX A Q -40
+KPX A O -50
+KPX A G -40
+KPX A C -40
+
+KPX B A -10
+
+KPX C A -40
+
+KPX D period -20
+KPX D comma -20
+KPX D Y -30
+KPX D W -10
+KPX D V -50
+KPX D A -50
+
+KPX F period -160
+KPX F e -20
+KPX F comma -180
+KPX F a -20
+KPX F A -75
+
+KPX G period -20
+KPX G comma -20
+KPX G Y -20
+
+KPX J period -15
+KPX J a -20
+KPX J A -30
+
+KPX K o -15
+KPX K e -20
+KPX K O -20
+
+KPX L y -23
+KPX L quoteright -130
+KPX L quotedblright -130
+KPX L Y -91
+KPX L W -67
+KPX L V -113
+KPX L T -46
+
+KPX O period -30
+KPX O comma -30
+KPX O Y -30
+KPX O X -30
+KPX O W -20
+KPX O V -60
+KPX O T -30
+KPX O A -60
+
+KPX P period -300
+KPX P o -60
+KPX P e -20
+KPX P comma -280
+KPX P a -20
+KPX P A -114
+
+KPX Q comma 20
+
+KPX R Y -10
+KPX R W 10
+KPX R V -10
+KPX R T 6
+
+KPX S comma 20
+
+KPX T y -50
+KPX T w -55
+KPX T u -46
+KPX T semicolon -29
+KPX T r -30
+KPX T period -91
+KPX T o -70
+KPX T i 10
+KPX T hyphen -75
+KPX T e -49
+KPX T comma -82
+KPX T colon -15
+KPX T a -90
+KPX T O -30
+KPX T A -45
+
+KPX U period -20
+KPX U comma -20
+KPX U A -40
+
+KPX V u -40
+KPX V semicolon -33
+KPX V period -165
+KPX V o -101
+KPX V i -5
+KPX V hyphen -75
+KPX V e -101
+KPX V comma -145
+KPX V colon -18
+KPX V a -104
+KPX V O -60
+KPX V G -20
+KPX V A -102
+
+KPX W y -2
+KPX W u -30
+KPX W semicolon -33
+KPX W period -106
+KPX W o -46
+KPX W i 6
+KPX W hyphen -35
+KPX W e -47
+KPX W comma -106
+KPX W colon -15
+KPX W a -50
+KPX W O -20
+KPX W A -58
+
+KPX Y u -52
+KPX Y semicolon -23
+KPX Y period -175
+KPX Y o -89
+KPX Y hyphen -85
+KPX Y e -89
+KPX Y comma -145
+KPX Y colon -10
+KPX Y a -93
+KPX Y O -30
+KPX Y A -92
+
+KPX a p 20
+KPX a b 20
+
+KPX b y -20
+KPX b v -20
+
+KPX c y -20
+KPX c k -15
+
+KPX comma space -110
+KPX comma quoteright -120
+KPX comma quotedblright -120
+
+KPX e y -20
+KPX e w -20
+KPX e v -20
+
+KPX f period -50
+KPX f o -40
+KPX f l -30
+KPX f i -34
+KPX f f -60
+KPX f e -20
+KPX f dotlessi -34
+KPX f comma -50
+KPX f a -40
+
+KPX g a -15
+
+KPX h y -30
+
+KPX k y -5
+KPX k e -15
+
+KPX m y -20
+KPX m u -20
+KPX m a -20
+
+KPX n y -15
+KPX n v -20
+
+KPX o y -20
+KPX o x -15
+KPX o w -20
+KPX o v -30
+
+KPX p y -20
+
+KPX period space -110
+KPX period quoteright -120
+KPX period quotedblright -120
+
+KPX quotedblleft quoteleft -35
+KPX quotedblleft A -100
+
+KPX quotedblright space -110
+
+KPX quoteleft quoteleft -203
+KPX quoteleft A -100
+
+KPX quoteright v -30
+KPX quoteright t 10
+KPX quoteright space -110
+KPX quoteright s -15
+KPX quoteright r -20
+KPX quoteright quoteright -203
+KPX quoteright quotedblright -35
+KPX quoteright d -110
+
+KPX r y 40
+KPX r v 40
+KPX r u 20
+KPX r t 20
+KPX r s 20
+KPX r q -8
+KPX r period -73
+KPX r p 20
+KPX r o -20
+KPX r n 21
+KPX r m 28
+KPX r l 20
+KPX r k 20
+KPX r i 20
+KPX r hyphen -60
+KPX r g -15
+KPX r e -4
+KPX r d -6
+KPX r comma -75
+KPX r c -20
+KPX r a -20
+
+KPX s period 20
+KPX s comma 20
+
+KPX space quoteleft -110
+KPX space quotedblleft -110
+KPX space Y -60
+KPX space W -25
+KPX space V -50
+KPX space T -25
+KPX space A -20
+
+KPX v period -130
+KPX v o -30
+KPX v e -20
+KPX v comma -100
+KPX v a -30
+
+KPX w period -100
+KPX w o -30
+KPX w h 15
+KPX w e -20
+KPX w comma -90
+KPX w a -30
+
+KPX y period -125
+KPX y o -30
+KPX y e -20
+KPX y comma -110
+KPX y a -30
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 213 163 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 149 163 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 216 163 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 211 163 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 231 148 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 181 163 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 111 163 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 47 163 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 114 163 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 109 163 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -4 163 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -108 163 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -41 163 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -86 163 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 181 163 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 277 163 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 214 163 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 280 163 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 276 163 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 245 163 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 28 163 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 190 163 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 107 163 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 173 163 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 149 163 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 159 163 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 142 163 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 19 163 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 154 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 91 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 157 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 153 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 176 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 122 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 138 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 74 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 141 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 136 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -47 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -151 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -84 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -129 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 86 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 140 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 77 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 143 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 139 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 108 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron -57 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 137 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 53 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 120 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 95 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 101 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 84 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron -38 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-CnBd b/font/AG-CnBd
new file mode 100644
index 0000000..429d72f
--- /dev/null
+++ b/font/AG-CnBd
@@ -0,0 +1,447 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Apr 12 12:20:42 1990
+Comment UniqueID 28708
+Comment VMusage 26256 33148
+FontName AvantGarde-CondBold
+FullName ITC Avant Garde Gothic Condensed Bold
+FamilyName ITC Avant Garde Gothic
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -167 -234 1000 1001
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.001
+Notice Copyright (c) 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 724
+XHeight 568
+Ascender 724
+Descender -180
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 65 0 213 724 ;
+C 34 ; WX 333 ; N quotedbl ; B 10 444 323 724 ;
+C 35 ; WX 556 ; N numbersign ; B 22 0 534 724 ;
+C 36 ; WX 556 ; N dollar ; B 48 -72 508 780 ;
+C 37 ; WX 889 ; N percent ; B 44 -12 845 736 ;
+C 38 ; WX 667 ; N ampersand ; B 34 -12 642 736 ;
+C 39 ; WX 222 ; N quoteright ; B 2 486 228 736 ;
+C 40 ; WX 389 ; N parenleft ; B 42 -210 345 742 ;
+C 41 ; WX 389 ; N parenright ; B 44 -210 347 742 ;
+C 42 ; WX 444 ; N asterisk ; B 30 344 414 724 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 278 ; N comma ; B 14 -102 212 148 ;
+C 45 ; WX 333 ; N hyphen ; B 42 221 291 347 ;
+C 46 ; WX 278 ; N period ; B 72 0 206 148 ;
+C 47 ; WX 278 ; N slash ; B -38 -12 315 736 ;
+C 48 ; WX 556 ; N zero ; B 36 -12 520 736 ;
+C 49 ; WX 556 ; N one ; B 114 0 366 724 ;
+C 50 ; WX 556 ; N two ; B 44 0 505 736 ;
+C 51 ; WX 556 ; N three ; B 32 -12 520 736 ;
+C 52 ; WX 556 ; N four ; B 34 0 510 724 ;
+C 53 ; WX 556 ; N five ; B 50 -12 518 724 ;
+C 54 ; WX 556 ; N six ; B 34 -12 520 736 ;
+C 55 ; WX 556 ; N seven ; B 56 0 500 724 ;
+C 56 ; WX 556 ; N eight ; B 31 -12 525 736 ;
+C 57 ; WX 556 ; N nine ; B 30 -12 522 736 ;
+C 58 ; WX 278 ; N colon ; B 72 0 206 490 ;
+C 59 ; WX 278 ; N semicolon ; B 14 -102 212 490 ;
+C 60 ; WX 600 ; N less ; B 47 -9 553 515 ;
+C 61 ; WX 600 ; N equal ; B 47 82 553 424 ;
+C 62 ; WX 600 ; N greater ; B 47 -9 553 515 ;
+C 63 ; WX 500 ; N question ; B 28 0 462 736 ;
+C 64 ; WX 800 ; N at ; B 44 -12 756 736 ;
+C 65 ; WX 556 ; N A ; B 2 0 554 724 ;
+C 66 ; WX 556 ; N B ; B 63 0 520 724 ;
+C 67 ; WX 611 ; N C ; B 33 -12 569 736 ;
+C 68 ; WX 611 ; N D ; B 62 0 577 724 ;
+C 69 ; WX 500 ; N E ; B 70 0 430 724 ;
+C 70 ; WX 444 ; N F ; B 58 0 400 724 ;
+C 71 ; WX 611 ; N G ; B 33 -12 569 736 ;
+C 72 ; WX 611 ; N H ; B 63 0 548 724 ;
+C 73 ; WX 278 ; N I ; B 63 0 215 724 ;
+C 74 ; WX 500 ; N J ; B 4 -12 430 724 ;
+C 75 ; WX 556 ; N K ; B 63 0 557 724 ;
+C 76 ; WX 444 ; N L ; B 70 0 416 724 ;
+C 77 ; WX 778 ; N M ; B 66 0 712 724 ;
+C 78 ; WX 611 ; N N ; B 66 0 544 724 ;
+C 79 ; WX 611 ; N O ; B 33 -12 577 736 ;
+C 80 ; WX 556 ; N P ; B 70 0 522 724 ;
+C 81 ; WX 611 ; N Q ; B 33 -12 577 736 ;
+C 82 ; WX 556 ; N R ; B 63 0 551 724 ;
+C 83 ; WX 556 ; N S ; B 34 -12 522 736 ;
+C 84 ; WX 444 ; N T ; B 22 0 422 724 ;
+C 85 ; WX 611 ; N U ; B 61 -12 549 724 ;
+C 86 ; WX 556 ; N V ; B 9 0 547 724 ;
+C 87 ; WX 833 ; N W ; B 4 0 828 724 ;
+C 88 ; WX 556 ; N X ; B 1 0 555 724 ;
+C 89 ; WX 500 ; N Y ; B -4 0 504 724 ;
+C 90 ; WX 500 ; N Z ; B 36 0 456 724 ;
+C 91 ; WX 389 ; N bracketleft ; B 62 -200 328 724 ;
+C 92 ; WX 278 ; N backslash ; B -37 -12 316 736 ;
+C 93 ; WX 389 ; N bracketright ; B 61 -200 327 724 ;
+C 94 ; WX 600 ; N asciicircum ; B 73 374 527 724 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B -6 486 220 736 ;
+C 97 ; WX 500 ; N a ; B 31 -12 442 580 ;
+C 98 ; WX 500 ; N b ; B 58 -12 469 724 ;
+C 99 ; WX 444 ; N c ; B 31 -12 439 580 ;
+C 100 ; WX 500 ; N d ; B 31 -12 442 724 ;
+C 101 ; WX 500 ; N e ; B 31 -12 457 580 ;
+C 102 ; WX 278 ; N f ; B 16 0 276 724 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 31 -192 442 580 ;
+C 104 ; WX 500 ; N h ; B 58 0 442 724 ;
+C 105 ; WX 278 ; N i ; B 72 0 206 724 ;
+C 106 ; WX 278 ; N j ; B 14 -192 206 724 ;
+C 107 ; WX 444 ; N k ; B 50 0 450 724 ;
+C 108 ; WX 278 ; N l ; B 72 0 206 724 ;
+C 109 ; WX 778 ; N m ; B 64 0 714 580 ;
+C 110 ; WX 500 ; N n ; B 58 0 442 580 ;
+C 111 ; WX 500 ; N o ; B 31 -12 469 580 ;
+C 112 ; WX 500 ; N p ; B 58 -180 469 580 ;
+C 113 ; WX 500 ; N q ; B 31 -180 442 580 ;
+C 114 ; WX 333 ; N r ; B 58 0 324 590 ;
+C 115 ; WX 444 ; N s ; B 12 -12 420 580 ;
+C 116 ; WX 278 ; N t ; B 12 0 266 676 ;
+C 117 ; WX 500 ; N u ; B 58 -12 442 568 ;
+C 118 ; WX 444 ; N v ; B 5 0 439 568 ;
+C 119 ; WX 667 ; N w ; B 1 0 665 568 ;
+C 120 ; WX 500 ; N x ; B 4 0 496 568 ;
+C 121 ; WX 444 ; N y ; B 3 -180 441 568 ;
+C 122 ; WX 444 ; N z ; B 28 0 396 568 ;
+C 123 ; WX 389 ; N braceleft ; B 22 -216 313 736 ;
+C 124 ; WX 222 ; N bar ; B 50 -12 172 736 ;
+C 125 ; WX 389 ; N braceright ; B 76 -216 367 736 ;
+C 126 ; WX 600 ; N asciitilde ; B 82 159 518 347 ;
+C 161 ; WX 278 ; N exclamdown ; B 65 -156 213 568 ;
+C 162 ; WX 556 ; N cent ; B 58 -20 488 724 ;
+C 163 ; WX 556 ; N sterling ; B 14 0 532 736 ;
+C 164 ; WX 167 ; N fraction ; B -167 -12 334 736 ;
+C 165 ; WX 556 ; N yen ; B 24 0 532 724 ;
+C 166 ; WX 556 ; N florin ; B 9 -192 547 736 ;
+C 167 ; WX 500 ; N section ; B 43 -86 457 736 ;
+C 168 ; WX 556 ; N currency ; B 18 102 538 622 ;
+C 169 ; WX 222 ; N quotesingle ; B 49 444 173 724 ;
+C 170 ; WX 444 ; N quotedblleft ; B 12 486 423 736 ;
+C 171 ; WX 444 ; N guillemotleft ; B 24 102 420 466 ;
+C 172 ; WX 278 ; N guilsinglleft ; B 32 102 246 466 ;
+C 173 ; WX 278 ; N guilsinglright ; B 32 102 246 466 ;
+C 174 ; WX 556 ; N fi ; B 26 0 484 724 ;
+C 175 ; WX 556 ; N fl ; B 26 0 484 724 ;
+C 177 ; WX 500 ; N endash ; B 0 239 500 329 ;
+C 178 ; WX 500 ; N dagger ; B 54 -80 446 724 ;
+C 179 ; WX 500 ; N daggerdbl ; B 54 -80 446 724 ;
+C 180 ; WX 278 ; N periodcentered ; B 63 177 215 329 ;
+C 182 ; WX 620 ; N paragraph ; B 30 -80 550 724 ;
+C 183 ; WX 500 ; N bullet ; B 69 181 431 543 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 2 -102 228 148 ;
+C 185 ; WX 444 ; N quotedblbase ; B 21 -102 432 148 ;
+C 186 ; WX 444 ; N quotedblright ; B 21 486 432 736 ;
+C 187 ; WX 444 ; N guillemotright ; B 24 102 420 466 ;
+C 188 ; WX 1000 ; N ellipsis ; B 100 0 900 148 ;
+C 189 ; WX 1000 ; N perthousand ; B 22 -12 978 736 ;
+C 191 ; WX 500 ; N questiondown ; B 38 -168 472 568 ;
+C 193 ; WX 278 ; N grave ; B -26 626 222 774 ;
+C 194 ; WX 278 ; N acute ; B 56 626 304 774 ;
+C 195 ; WX 278 ; N circumflex ; B -38 626 316 774 ;
+C 196 ; WX 278 ; N tilde ; B -44 636 322 764 ;
+C 197 ; WX 278 ; N macron ; B -28 662 306 736 ;
+C 198 ; WX 278 ; N breve ; B -28 630 306 774 ;
+C 199 ; WX 278 ; N dotaccent ; B 76 640 202 752 ;
+C 200 ; WX 278 ; N dieresis ; B -22 640 300 752 ;
+C 202 ; WX 278 ; N ring ; B 25 632 253 860 ;
+C 203 ; WX 278 ; N cedilla ; B 16 -234 252 0 ;
+C 205 ; WX 278 ; N hungarumlaut ; B -22 626 386 774 ;
+C 206 ; WX 278 ; N ogonek ; B 25 -216 281 22 ;
+C 207 ; WX 278 ; N caron ; B -38 626 316 774 ;
+C 208 ; WX 1000 ; N emdash ; B 0 239 1000 329 ;
+C 225 ; WX 889 ; N AE ; B -12 0 804 724 ;
+C 227 ; WX 300 ; N ordfeminine ; B 4 381 280 736 ;
+C 232 ; WX 444 ; N Lslash ; B 7 0 416 724 ;
+C 233 ; WX 611 ; N Oslash ; B 0 -42 610 766 ;
+C 234 ; WX 889 ; N OE ; B 33 -12 819 736 ;
+C 235 ; WX 300 ; N ordmasculine ; B 7 380 293 736 ;
+C 241 ; WX 778 ; N ae ; B 16 -12 754 580 ;
+C 245 ; WX 278 ; N dotlessi ; B 72 0 206 568 ;
+C 248 ; WX 278 ; N lslash ; B -4 0 282 724 ;
+C 249 ; WX 500 ; N oslash ; B 5 -82 495 646 ;
+C 250 ; WX 778 ; N oe ; B 28 -12 754 580 ;
+C 251 ; WX 556 ; N germandbls ; B 60 -12 522 716 ;
+C -1 ; WX 500 ; N Zcaron ; B 36 0 456 915 ;
+C -1 ; WX 444 ; N ccedilla ; B 31 -234 439 580 ;
+C -1 ; WX 444 ; N ydieresis ; B 3 -180 441 752 ;
+C -1 ; WX 500 ; N atilde ; B 31 -12 442 764 ;
+C -1 ; WX 278 ; N icircumflex ; B -38 0 316 774 ;
+C -1 ; WX 333 ; N threesuperior ; B 12 286 330 736 ;
+C -1 ; WX 500 ; N ecircumflex ; B 31 -12 457 774 ;
+C -1 ; WX 500 ; N thorn ; B 58 -180 469 724 ;
+C -1 ; WX 500 ; N egrave ; B 31 -12 457 774 ;
+C -1 ; WX 333 ; N twosuperior ; B 14 294 320 736 ;
+C -1 ; WX 500 ; N eacute ; B 31 -12 457 774 ;
+C -1 ; WX 500 ; N otilde ; B 31 -12 469 764 ;
+C -1 ; WX 556 ; N Aacute ; B 2 0 554 915 ;
+C -1 ; WX 500 ; N ocircumflex ; B 31 -12 469 774 ;
+C -1 ; WX 444 ; N yacute ; B 3 -180 441 774 ;
+C -1 ; WX 500 ; N udieresis ; B 58 -12 442 752 ;
+C -1 ; WX 834 ; N threequarters ; B 32 -12 801 736 ;
+C -1 ; WX 500 ; N acircumflex ; B 31 -12 442 774 ;
+C -1 ; WX 611 ; N Eth ; B 4 0 577 724 ;
+C -1 ; WX 500 ; N edieresis ; B 31 -12 457 752 ;
+C -1 ; WX 500 ; N ugrave ; B 58 -12 442 774 ;
+C -1 ; WX 1000 ; N trademark ; B 20 298 932 724 ;
+C -1 ; WX 500 ; N ograve ; B 31 -12 469 774 ;
+C -1 ; WX 444 ; N scaron ; B 12 -12 420 774 ;
+C -1 ; WX 278 ; N Idieresis ; B -22 0 300 893 ;
+C -1 ; WX 500 ; N uacute ; B 58 -12 442 774 ;
+C -1 ; WX 500 ; N agrave ; B 31 -12 442 774 ;
+C -1 ; WX 500 ; N ntilde ; B 58 0 442 764 ;
+C -1 ; WX 500 ; N aring ; B 31 -12 442 860 ;
+C -1 ; WX 444 ; N zcaron ; B 28 0 399 774 ;
+C -1 ; WX 278 ; N Icircumflex ; B -38 0 316 915 ;
+C -1 ; WX 611 ; N Ntilde ; B 66 0 544 905 ;
+C -1 ; WX 500 ; N ucircumflex ; B 58 -12 442 774 ;
+C -1 ; WX 500 ; N Ecircumflex ; B 70 0 430 915 ;
+C -1 ; WX 278 ; N Iacute ; B 56 0 304 915 ;
+C -1 ; WX 611 ; N Ccedilla ; B 33 -234 569 736 ;
+C -1 ; WX 611 ; N Odieresis ; B 33 -12 577 893 ;
+C -1 ; WX 556 ; N Scaron ; B 34 -12 522 915 ;
+C -1 ; WX 500 ; N Edieresis ; B 70 0 430 893 ;
+C -1 ; WX 278 ; N Igrave ; B -26 0 222 915 ;
+C -1 ; WX 500 ; N adieresis ; B 31 -12 442 752 ;
+C -1 ; WX 611 ; N Ograve ; B 33 -12 577 915 ;
+C -1 ; WX 500 ; N Egrave ; B 70 0 430 915 ;
+C -1 ; WX 500 ; N Ydieresis ; B -4 0 504 893 ;
+C -1 ; WX 800 ; N registered ; B 12 -12 788 736 ;
+C -1 ; WX 611 ; N Otilde ; B 33 -12 577 905 ;
+C -1 ; WX 834 ; N onequarter ; B 76 -12 801 736 ;
+C -1 ; WX 611 ; N Ugrave ; B 61 -12 549 915 ;
+C -1 ; WX 611 ; N Ucircumflex ; B 61 -12 549 915 ;
+C -1 ; WX 556 ; N Thorn ; B 70 0 522 724 ;
+C -1 ; WX 600 ; N divide ; B 47 -47 553 553 ;
+C -1 ; WX 556 ; N Atilde ; B 2 0 554 905 ;
+C -1 ; WX 611 ; N Uacute ; B 61 -12 549 915 ;
+C -1 ; WX 611 ; N Ocircumflex ; B 33 -12 577 915 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 82 553 424 ;
+C -1 ; WX 556 ; N Aring ; B 2 0 554 1001 ;
+C -1 ; WX 278 ; N idieresis ; B -22 0 300 752 ;
+C -1 ; WX 278 ; N iacute ; B 56 0 304 774 ;
+C -1 ; WX 500 ; N aacute ; B 31 -12 442 774 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 47 0 553 506 ;
+C -1 ; WX 611 ; N Udieresis ; B 61 -12 549 893 ;
+C -1 ; WX 600 ; N minus ; B 47 192 553 314 ;
+C -1 ; WX 333 ; N onesuperior ; B 56 294 232 728 ;
+C -1 ; WX 500 ; N Eacute ; B 70 0 430 915 ;
+C -1 ; WX 556 ; N Acircumflex ; B 2 0 554 915 ;
+C -1 ; WX 800 ; N copyright ; B 12 -12 788 736 ;
+C -1 ; WX 556 ; N Agrave ; B 2 0 554 915 ;
+C -1 ; WX 500 ; N odieresis ; B 31 -12 469 752 ;
+C -1 ; WX 500 ; N oacute ; B 31 -12 469 774 ;
+C -1 ; WX 400 ; N degree ; B 52 440 348 736 ;
+C -1 ; WX 278 ; N igrave ; B -26 0 222 774 ;
+C -1 ; WX 500 ; N mu ; B 58 -180 442 568 ;
+C -1 ; WX 611 ; N Oacute ; B 33 -12 577 915 ;
+C -1 ; WX 500 ; N eth ; B 31 -10 469 736 ;
+C -1 ; WX 556 ; N Adieresis ; B 2 0 554 893 ;
+C -1 ; WX 500 ; N Yacute ; B -4 0 504 915 ;
+C -1 ; WX 222 ; N brokenbar ; B 50 -12 172 736 ;
+C -1 ; WX 834 ; N onehalf ; B 76 -12 801 736 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -37
+KPX A W -37
+KPX A V -37
+KPX A T -37
+
+KPX F period -111
+KPX F comma -111
+KPX F A -18
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -55
+KPX L W -55
+KPX L V -55
+KPX L T -55
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -37
+KPX T w -55
+KPX T u -37
+KPX T semicolon -55
+KPX T s -55
+KPX T r -37
+KPX T period -74
+KPX T o -55
+KPX T i -37
+KPX T hyphen -55
+KPX T e -55
+KPX T comma -74
+KPX T colon -55
+KPX T c -55
+KPX T a -55
+KPX T A -37
+
+KPX V y -18
+KPX V u -18
+KPX V semicolon -37
+KPX V r -18
+KPX V period -92
+KPX V o -37
+KPX V i -18
+KPX V hyphen -55
+KPX V e -37
+KPX V comma -92
+KPX V colon -37
+KPX V a -37
+KPX V A -37
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon -18
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon -18
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -18
+KPX Y semicolon -37
+KPX Y q -37
+KPX Y period -74
+KPX Y p -18
+KPX Y o -37
+KPX Y i -18
+KPX Y hyphen -55
+KPX Y e -37
+KPX Y comma -74
+KPX Y colon -37
+KPX Y a -37
+KPX Y A -37
+
+KPX f quoteright 18
+KPX f f 0
+
+KPX quoteleft quoteleft -37
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -37
+
+KPX r z 0
+KPX r y 0
+KPX r x 0
+KPX r w 0
+KPX r v 0
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 18
+KPX r q 0
+KPX r period -55
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 0
+KPX r e 0
+KPX r d 0
+KPX r comma -55
+KPX r c 0
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 139 141 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 139 141 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 139 141 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 139 141 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 139 141 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 139 141 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 167 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 111 141 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 111 141 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 111 141 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 111 141 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 0 141 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 0 141 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 0 141 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 0 141 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 167 141 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 167 141 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 167 141 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 167 141 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 167 141 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 167 141 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 139 141 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 167 141 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 167 141 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 167 141 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 167 141 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 111 141 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 111 141 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 111 141 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 111 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 111 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 111 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 111 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 111 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 111 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 83 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 111 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 111 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 111 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 111 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 111 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 111 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 111 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 111 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 111 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 111 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 83 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 111 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 111 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 111 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 111 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 83 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 83 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 83 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-CnBk b/font/AG-CnBk
new file mode 100644
index 0000000..f23a09f
--- /dev/null
+++ b/font/AG-CnBk
@@ -0,0 +1,447 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Apr 12 12:58:00 1990
+Comment UniqueID 28712
+Comment VMusage 24087 30979
+FontName AvantGarde-CondBook
+FullName ITC Avant Garde Gothic Condensed Book
+FamilyName ITC Avant Garde Gothic
+Weight Book
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -167 -214 1000 977
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.001
+Notice Copyright (c) 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 724
+XHeight 550
+Ascender 724
+Descender -198
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 222 ; N exclam ; B 74 0 148 724 ;
+C 34 ; WX 333 ; N quotedbl ; B 78 453 255 724 ;
+C 35 ; WX 556 ; N numbersign ; B 25 0 531 724 ;
+C 36 ; WX 556 ; N dollar ; B 54 -121 492 816 ;
+C 37 ; WX 889 ; N percent ; B 58 -12 831 736 ;
+C 38 ; WX 611 ; N ampersand ; B 25 -12 595 736 ;
+C 39 ; WX 222 ; N quoteright ; B 22 514 200 736 ;
+C 40 ; WX 389 ; N parenleft ; B 74 -196 363 742 ;
+C 41 ; WX 389 ; N parenright ; B 26 -196 315 742 ;
+C 42 ; WX 444 ; N asterisk ; B 50 366 394 724 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 278 ; N comma ; B 4 -118 182 104 ;
+C 45 ; WX 333 ; N hyphen ; B 43 244 290 306 ;
+C 46 ; WX 278 ; N period ; B 104 0 174 100 ;
+C 47 ; WX 278 ; N slash ; B -20 -12 298 736 ;
+C 48 ; WX 556 ; N zero ; B 32 -12 524 736 ;
+C 49 ; WX 556 ; N one ; B 138 0 332 724 ;
+C 50 ; WX 556 ; N two ; B 49 0 486 736 ;
+C 51 ; WX 556 ; N three ; B 34 -12 501 736 ;
+C 52 ; WX 556 ; N four ; B 29 0 502 724 ;
+C 53 ; WX 556 ; N five ; B 49 -12 501 724 ;
+C 54 ; WX 556 ; N six ; B 40 -12 515 736 ;
+C 55 ; WX 556 ; N seven ; B 46 0 476 724 ;
+C 56 ; WX 556 ; N eight ; B 36 -12 520 736 ;
+C 57 ; WX 556 ; N nine ; B 41 -12 516 736 ;
+C 58 ; WX 278 ; N colon ; B 104 0 174 456 ;
+C 59 ; WX 278 ; N semicolon ; B 4 -118 182 456 ;
+C 60 ; WX 600 ; N less ; B 47 -8 553 514 ;
+C 61 ; WX 600 ; N equal ; B 47 121 553 385 ;
+C 62 ; WX 600 ; N greater ; B 47 -8 553 514 ;
+C 63 ; WX 444 ; N question ; B 20 0 409 736 ;
+C 64 ; WX 800 ; N at ; B 41 -12 759 736 ;
+C 65 ; WX 500 ; N A ; B -2 0 502 724 ;
+C 66 ; WX 556 ; N B ; B 72 0 524 724 ;
+C 67 ; WX 556 ; N C ; B 31 -12 524 736 ;
+C 68 ; WX 611 ; N D ; B 72 0 579 724 ;
+C 69 ; WX 500 ; N E ; B 72 0 436 724 ;
+C 70 ; WX 444 ; N F ; B 72 0 406 724 ;
+C 71 ; WX 611 ; N G ; B 31 -12 566 736 ;
+C 72 ; WX 611 ; N H ; B 72 0 539 724 ;
+C 73 ; WX 222 ; N I ; B 72 0 150 724 ;
+C 74 ; WX 444 ; N J ; B 10 -12 372 724 ;
+C 75 ; WX 556 ; N K ; B 72 0 551 724 ;
+C 76 ; WX 444 ; N L ; B 72 0 426 724 ;
+C 77 ; WX 722 ; N M ; B 72 0 650 724 ;
+C 78 ; WX 611 ; N N ; B 72 0 539 724 ;
+C 79 ; WX 611 ; N O ; B 31 -12 579 736 ;
+C 80 ; WX 556 ; N P ; B 72 0 524 724 ;
+C 81 ; WX 611 ; N Q ; B 31 -12 595 736 ;
+C 82 ; WX 556 ; N R ; B 72 0 536 724 ;
+C 83 ; WX 500 ; N S ; B 24 -12 475 736 ;
+C 84 ; WX 444 ; N T ; B 10 0 434 724 ;
+C 85 ; WX 556 ; N U ; B 59 -12 497 724 ;
+C 86 ; WX 500 ; N V ; B -3 0 503 724 ;
+C 87 ; WX 833 ; N W ; B 5 0 828 724 ;
+C 88 ; WX 500 ; N X ; B 2 0 497 724 ;
+C 89 ; WX 500 ; N Y ; B 4 0 496 724 ;
+C 90 ; WX 444 ; N Z ; B 16 0 418 724 ;
+C 91 ; WX 389 ; N bracketleft ; B 102 -190 351 724 ;
+C 92 ; WX 278 ; N backslash ; B -20 -12 298 736 ;
+C 93 ; WX 389 ; N bracketright ; B 38 -190 287 724 ;
+C 94 ; WX 600 ; N asciicircum ; B 49 282 551 724 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 22 514 200 736 ;
+C 97 ; WX 500 ; N a ; B 34 -10 440 560 ;
+C 98 ; WX 500 ; N b ; B 60 -10 466 724 ;
+C 99 ; WX 444 ; N c ; B 34 -10 416 560 ;
+C 100 ; WX 500 ; N d ; B 34 -10 440 724 ;
+C 101 ; WX 444 ; N e ; B 28 -10 416 560 ;
+C 102 ; WX 222 ; N f ; B 0 0 240 724 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 34 -214 436 560 ;
+C 104 ; WX 500 ; N h ; B 60 0 440 724 ;
+C 105 ; WX 222 ; N i ; B 74 0 148 720 ;
+C 106 ; WX 222 ; N j ; B -45 -214 148 720 ;
+C 107 ; WX 444 ; N k ; B 60 0 436 724 ;
+C 108 ; WX 222 ; N l ; B 74 0 148 724 ;
+C 109 ; WX 778 ; N m ; B 60 0 718 560 ;
+C 110 ; WX 500 ; N n ; B 60 0 440 560 ;
+C 111 ; WX 500 ; N o ; B 34 -10 466 560 ;
+C 112 ; WX 500 ; N p ; B 60 -198 466 560 ;
+C 113 ; WX 500 ; N q ; B 34 -198 440 560 ;
+C 114 ; WX 278 ; N r ; B 60 0 276 560 ;
+C 115 ; WX 444 ; N s ; B 28 -10 410 560 ;
+C 116 ; WX 222 ; N t ; B 5 0 233 720 ;
+C 117 ; WX 500 ; N u ; B 60 -10 440 550 ;
+C 118 ; WX 444 ; N v ; B 10 0 434 550 ;
+C 119 ; WX 667 ; N w ; B -5 0 671 550 ;
+C 120 ; WX 444 ; N x ; B 6 0 438 550 ;
+C 121 ; WX 444 ; N y ; B 8 -214 436 550 ;
+C 122 ; WX 444 ; N z ; B 22 0 404 550 ;
+C 123 ; WX 389 ; N braceleft ; B 44 -198 347 736 ;
+C 124 ; WX 222 ; N bar ; B 75 -12 147 736 ;
+C 125 ; WX 389 ; N braceright ; B 42 -198 345 736 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 179 531 327 ;
+C 161 ; WX 222 ; N exclamdown ; B 74 -174 148 550 ;
+C 162 ; WX 556 ; N cent ; B 75 -12 460 736 ;
+C 163 ; WX 556 ; N sterling ; B 21 0 527 736 ;
+C 164 ; WX 167 ; N fraction ; B -167 -12 334 736 ;
+C 165 ; WX 556 ; N yen ; B 32 0 524 724 ;
+C 166 ; WX 556 ; N florin ; B 10 -214 545 736 ;
+C 167 ; WX 444 ; N section ; B 35 -80 408 736 ;
+C 168 ; WX 556 ; N currency ; B 28 112 528 612 ;
+C 169 ; WX 222 ; N quotesingle ; B 82 453 140 724 ;
+C 170 ; WX 333 ; N quotedblleft ; B 22 514 311 736 ;
+C 171 ; WX 444 ; N guillemotleft ; B 44 95 400 455 ;
+C 172 ; WX 278 ; N guilsinglleft ; B 41 95 237 455 ;
+C 173 ; WX 278 ; N guilsinglright ; B 41 95 237 455 ;
+C 174 ; WX 444 ; N fi ; B 0 0 370 724 ;
+C 175 ; WX 444 ; N fl ; B 0 0 370 724 ;
+C 177 ; WX 500 ; N endash ; B 0 252 500 298 ;
+C 178 ; WX 444 ; N dagger ; B 48 -92 396 724 ;
+C 179 ; WX 444 ; N daggerdbl ; B 48 -92 396 724 ;
+C 180 ; WX 278 ; N periodcentered ; B 89 203 189 303 ;
+C 182 ; WX 600 ; N paragraph ; B 49 -92 502 724 ;
+C 183 ; WX 500 ; N bullet ; B 69 181 431 543 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 22 -118 200 104 ;
+C 185 ; WX 333 ; N quotedblbase ; B 22 -118 311 104 ;
+C 186 ; WX 333 ; N quotedblright ; B 22 514 311 736 ;
+C 187 ; WX 444 ; N guillemotright ; B 44 95 400 455 ;
+C 188 ; WX 1000 ; N ellipsis ; B 132 0 868 100 ;
+C 189 ; WX 1000 ; N perthousand ; B 22 -12 978 736 ;
+C 191 ; WX 444 ; N questiondown ; B 35 -186 424 550 ;
+C 193 ; WX 222 ; N grave ; B -14 608 174 748 ;
+C 194 ; WX 222 ; N acute ; B 48 608 236 748 ;
+C 195 ; WX 222 ; N circumflex ; B -36 608 258 748 ;
+C 196 ; WX 222 ; N tilde ; B -46 620 268 722 ;
+C 197 ; WX 222 ; N macron ; B -36 646 258 692 ;
+C 198 ; WX 222 ; N breve ; B -32 614 254 741 ;
+C 199 ; WX 222 ; N dotaccent ; B 79 619 143 721 ;
+C 200 ; WX 222 ; N dieresis ; B 0 619 222 721 ;
+C 202 ; WX 222 ; N ring ; B 5 610 217 822 ;
+C 203 ; WX 222 ; N cedilla ; B 10 -214 217 0 ;
+C 205 ; WX 222 ; N hungarumlaut ; B -12 608 296 748 ;
+C 206 ; WX 222 ; N ogonek ; B 1 -210 238 19 ;
+C 207 ; WX 222 ; N caron ; B -36 608 258 748 ;
+C 208 ; WX 1000 ; N emdash ; B 0 252 1000 298 ;
+C 225 ; WX 833 ; N AE ; B -14 0 769 724 ;
+C 227 ; WX 300 ; N ordfeminine ; B 10 394 274 736 ;
+C 232 ; WX 444 ; N Lslash ; B 0 0 426 724 ;
+C 233 ; WX 611 ; N Oslash ; B 12 -36 581 760 ;
+C 234 ; WX 944 ; N OE ; B 31 -12 880 736 ;
+C 235 ; WX 300 ; N ordmasculine ; B 9 394 291 736 ;
+C 241 ; WX 778 ; N ae ; B 23 -10 755 560 ;
+C 245 ; WX 222 ; N dotlessi ; B 74 0 148 550 ;
+C 248 ; WX 222 ; N lslash ; B -8 0 230 724 ;
+C 249 ; WX 500 ; N oslash ; B 23 -73 466 623 ;
+C 250 ; WX 778 ; N oe ; B 23 -10 755 560 ;
+C 251 ; WX 556 ; N germandbls ; B 65 -6 518 724 ;
+C -1 ; WX 444 ; N Zcaron ; B 16 0 418 903 ;
+C -1 ; WX 444 ; N ccedilla ; B 34 -214 416 560 ;
+C -1 ; WX 444 ; N ydieresis ; B 8 -214 436 721 ;
+C -1 ; WX 500 ; N atilde ; B 34 -10 440 722 ;
+C -1 ; WX 222 ; N icircumflex ; B -36 0 258 748 ;
+C -1 ; WX 333 ; N threesuperior ; B 13 286 320 736 ;
+C -1 ; WX 444 ; N ecircumflex ; B 28 -10 416 748 ;
+C -1 ; WX 500 ; N thorn ; B 60 -198 466 724 ;
+C -1 ; WX 444 ; N egrave ; B 28 -10 416 748 ;
+C -1 ; WX 333 ; N twosuperior ; B 20 294 314 736 ;
+C -1 ; WX 444 ; N eacute ; B 28 -10 416 748 ;
+C -1 ; WX 500 ; N otilde ; B 34 -10 466 722 ;
+C -1 ; WX 500 ; N Aacute ; B -2 0 502 903 ;
+C -1 ; WX 500 ; N ocircumflex ; B 34 -10 466 748 ;
+C -1 ; WX 444 ; N yacute ; B 8 -214 436 748 ;
+C -1 ; WX 500 ; N udieresis ; B 60 -10 440 721 ;
+C -1 ; WX 834 ; N threequarters ; B 33 -12 793 736 ;
+C -1 ; WX 500 ; N acircumflex ; B 34 -10 440 748 ;
+C -1 ; WX 611 ; N Eth ; B -12 0 579 724 ;
+C -1 ; WX 444 ; N edieresis ; B 28 -10 416 721 ;
+C -1 ; WX 500 ; N ugrave ; B 60 -10 440 748 ;
+C -1 ; WX 990 ; N trademark ; B 42 324 876 724 ;
+C -1 ; WX 500 ; N ograve ; B 34 -10 466 748 ;
+C -1 ; WX 444 ; N scaron ; B 28 -10 410 748 ;
+C -1 ; WX 222 ; N Idieresis ; B 0 0 222 876 ;
+C -1 ; WX 500 ; N uacute ; B 60 -10 440 748 ;
+C -1 ; WX 500 ; N agrave ; B 34 -10 440 748 ;
+C -1 ; WX 500 ; N ntilde ; B 60 0 440 722 ;
+C -1 ; WX 500 ; N aring ; B 34 -10 440 822 ;
+C -1 ; WX 444 ; N zcaron ; B 22 0 404 748 ;
+C -1 ; WX 222 ; N Icircumflex ; B -36 0 258 903 ;
+C -1 ; WX 611 ; N Ntilde ; B 72 0 539 877 ;
+C -1 ; WX 500 ; N ucircumflex ; B 60 -10 440 748 ;
+C -1 ; WX 500 ; N Ecircumflex ; B 72 0 436 903 ;
+C -1 ; WX 222 ; N Iacute ; B 48 0 236 903 ;
+C -1 ; WX 556 ; N Ccedilla ; B 31 -214 524 736 ;
+C -1 ; WX 611 ; N Odieresis ; B 31 -12 579 876 ;
+C -1 ; WX 500 ; N Scaron ; B 24 -12 475 903 ;
+C -1 ; WX 500 ; N Edieresis ; B 72 0 436 876 ;
+C -1 ; WX 222 ; N Igrave ; B -14 0 174 903 ;
+C -1 ; WX 500 ; N adieresis ; B 34 -10 440 721 ;
+C -1 ; WX 611 ; N Ograve ; B 31 -12 579 903 ;
+C -1 ; WX 500 ; N Egrave ; B 72 0 436 903 ;
+C -1 ; WX 500 ; N Ydieresis ; B 4 0 496 876 ;
+C -1 ; WX 800 ; N registered ; B 20 -12 780 736 ;
+C -1 ; WX 611 ; N Otilde ; B 31 -12 579 877 ;
+C -1 ; WX 834 ; N onequarter ; B 94 -12 793 736 ;
+C -1 ; WX 556 ; N Ugrave ; B 59 -12 497 903 ;
+C -1 ; WX 556 ; N Ucircumflex ; B 59 -12 497 903 ;
+C -1 ; WX 556 ; N Thorn ; B 72 0 524 723 ;
+C -1 ; WX 600 ; N divide ; B 47 -18 553 524 ;
+C -1 ; WX 500 ; N Atilde ; B -2 0 502 877 ;
+C -1 ; WX 556 ; N Uacute ; B 59 -12 497 903 ;
+C -1 ; WX 611 ; N Ocircumflex ; B 31 -12 579 903 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 121 553 385 ;
+C -1 ; WX 500 ; N Aring ; B -2 0 502 977 ;
+C -1 ; WX 222 ; N idieresis ; B 0 0 222 721 ;
+C -1 ; WX 222 ; N iacute ; B 48 0 236 748 ;
+C -1 ; WX 500 ; N aacute ; B 34 -10 440 748 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 47 0 553 506 ;
+C -1 ; WX 556 ; N Udieresis ; B 59 -12 497 876 ;
+C -1 ; WX 600 ; N minus ; B 47 217 553 289 ;
+C -1 ; WX 333 ; N onesuperior ; B 74 294 208 728 ;
+C -1 ; WX 500 ; N Eacute ; B 72 0 436 903 ;
+C -1 ; WX 500 ; N Acircumflex ; B -2 0 502 903 ;
+C -1 ; WX 800 ; N copyright ; B 20 -12 780 736 ;
+C -1 ; WX 500 ; N Agrave ; B -2 0 502 903 ;
+C -1 ; WX 500 ; N odieresis ; B 34 -10 466 721 ;
+C -1 ; WX 500 ; N oacute ; B 34 -10 466 748 ;
+C -1 ; WX 400 ; N degree ; B 57 450 343 736 ;
+C -1 ; WX 222 ; N igrave ; B -14 0 174 748 ;
+C -1 ; WX 500 ; N mu ; B 60 -198 440 550 ;
+C -1 ; WX 611 ; N Oacute ; B 31 -12 579 903 ;
+C -1 ; WX 500 ; N eth ; B 34 -10 466 736 ;
+C -1 ; WX 500 ; N Adieresis ; B -2 0 502 876 ;
+C -1 ; WX 500 ; N Yacute ; B 4 0 496 903 ;
+C -1 ; WX 222 ; N brokenbar ; B 75 -12 147 736 ;
+C -1 ; WX 834 ; N onehalf ; B 94 -12 795 736 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -37
+KPX A W -37
+KPX A V -37
+KPX A T -37
+
+KPX F period -111
+KPX F comma -111
+KPX F A -18
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -55
+KPX L W -55
+KPX L V -55
+KPX L T -55
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -37
+KPX T w -55
+KPX T u -37
+KPX T semicolon -55
+KPX T s -55
+KPX T r -37
+KPX T period -74
+KPX T o -55
+KPX T i -37
+KPX T hyphen -55
+KPX T e -55
+KPX T comma -74
+KPX T colon -55
+KPX T c -55
+KPX T a -55
+KPX T A -37
+
+KPX V y 0
+KPX V u 0
+KPX V semicolon -18
+KPX V r 0
+KPX V period -74
+KPX V o -18
+KPX V i 0
+KPX V hyphen -37
+KPX V e -18
+KPX V comma -74
+KPX V colon -18
+KPX V a -18
+KPX V A -18
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon -18
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon -18
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -18
+KPX Y semicolon -37
+KPX Y q -37
+KPX Y period -74
+KPX Y p -18
+KPX Y o -37
+KPX Y i -18
+KPX Y hyphen -55
+KPX Y e -37
+KPX Y comma -74
+KPX Y colon -37
+KPX Y a -37
+KPX Y A -37
+
+KPX f quoteright 18
+KPX f f 0
+
+KPX quoteleft quoteleft -111
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -111
+
+KPX r z 0
+KPX r y 0
+KPX r x 0
+KPX r w 0
+KPX r v 0
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 18
+KPX r q 0
+KPX r period -55
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 0
+KPX r e 0
+KPX r d 0
+KPX r comma -55
+KPX r c 0
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 139 155 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 139 155 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 139 155 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 139 155 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 139 155 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 139 155 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 167 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 155 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 155 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 155 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 155 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 0 155 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 0 155 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 0 155 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 0 155 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 195 155 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 195 155 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 195 155 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 195 155 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 195 155 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 195 155 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 133 155 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 167 155 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 167 155 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 167 155 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 167 155 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 133 155 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 133 155 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 105 155 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 131 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 131 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 131 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 131 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 131 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 131 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 111 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 111 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 111 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 111 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 111 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 139 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 139 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 139 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 139 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 139 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 139 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 111 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 139 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 139 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 111 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 111 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 111 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-CnDm b/font/AG-CnDm
new file mode 100644
index 0000000..dc911a4
--- /dev/null
+++ b/font/AG-CnDm
@@ -0,0 +1,447 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Apr 12 13:36:06 1990
+Comment UniqueID 28716
+Comment VMusage 25024 31916
+FontName AvantGarde-CondDemi
+FullName ITC Avant Garde Gothic Condensed Demi
+FamilyName ITC Avant Garde Gothic
+Weight Demi
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -167 -227 1000 971
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.001
+Notice Copyright (c) 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 724
+XHeight 572
+Ascender 724
+Descender -186
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 77 0 201 724 ;
+C 34 ; WX 333 ; N quotedbl ; B 30 468 303 724 ;
+C 35 ; WX 556 ; N numbersign ; B 22 0 534 724 ;
+C 36 ; WX 556 ; N dollar ; B 46 -74 498 788 ;
+C 37 ; WX 889 ; N percent ; B 50 -12 839 736 ;
+C 38 ; WX 611 ; N ampersand ; B 31 -12 590 736 ;
+C 39 ; WX 222 ; N quoteright ; B 10 508 200 736 ;
+C 40 ; WX 389 ; N parenleft ; B 64 -220 352 742 ;
+C 41 ; WX 389 ; N parenright ; B 37 -220 325 742 ;
+C 42 ; WX 444 ; N asterisk ; B 35 352 409 724 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 278 ; N comma ; B 21 -94 215 130 ;
+C 45 ; WX 333 ; N hyphen ; B 44 236 289 336 ;
+C 46 ; WX 278 ; N period ; B 81 0 197 130 ;
+C 47 ; WX 278 ; N slash ; B -40 -12 318 736 ;
+C 48 ; WX 556 ; N zero ; B 36 -12 520 736 ;
+C 49 ; WX 556 ; N one ; B 118 0 355 724 ;
+C 50 ; WX 556 ; N two ; B 39 0 496 736 ;
+C 51 ; WX 556 ; N three ; B 30 -12 506 736 ;
+C 52 ; WX 556 ; N four ; B 33 0 509 724 ;
+C 53 ; WX 556 ; N five ; B 35 -12 514 724 ;
+C 54 ; WX 556 ; N six ; B 42 -12 515 736 ;
+C 55 ; WX 556 ; N seven ; B 46 0 486 724 ;
+C 56 ; WX 556 ; N eight ; B 39 -12 517 736 ;
+C 57 ; WX 556 ; N nine ; B 35 -12 516 736 ;
+C 58 ; WX 278 ; N colon ; B 81 0 197 484 ;
+C 59 ; WX 278 ; N semicolon ; B 21 -94 215 484 ;
+C 60 ; WX 600 ; N less ; B 47 -8 553 514 ;
+C 61 ; WX 600 ; N equal ; B 47 88 553 418 ;
+C 62 ; WX 600 ; N greater ; B 47 -8 553 514 ;
+C 63 ; WX 500 ; N question ; B 30 0 448 736 ;
+C 64 ; WX 800 ; N at ; B 33 -12 766 736 ;
+C 65 ; WX 556 ; N A ; B 0 0 556 724 ;
+C 66 ; WX 556 ; N B ; B 66 0 513 724 ;
+C 67 ; WX 611 ; N C ; B 37 -12 558 736 ;
+C 68 ; WX 611 ; N D ; B 66 0 573 724 ;
+C 69 ; WX 500 ; N E ; B 66 0 444 724 ;
+C 70 ; WX 444 ; N F ; B 58 0 414 724 ;
+C 71 ; WX 611 ; N G ; B 37 -12 565 736 ;
+C 72 ; WX 611 ; N H ; B 66 0 545 724 ;
+C 73 ; WX 278 ; N I ; B 77 0 201 724 ;
+C 74 ; WX 500 ; N J ; B 10 -12 434 724 ;
+C 75 ; WX 556 ; N K ; B 66 0 557 724 ;
+C 76 ; WX 444 ; N L ; B 66 0 420 724 ;
+C 77 ; WX 722 ; N M ; B 66 0 656 724 ;
+C 78 ; WX 611 ; N N ; B 69 0 542 724 ;
+C 79 ; WX 611 ; N O ; B 37 -12 573 736 ;
+C 80 ; WX 556 ; N P ; B 72 0 521 724 ;
+C 81 ; WX 611 ; N Q ; B 37 -12 573 736 ;
+C 82 ; WX 556 ; N R ; B 66 0 544 724 ;
+C 83 ; WX 500 ; N S ; B 27 -12 465 736 ;
+C 84 ; WX 444 ; N T ; B 14 0 430 724 ;
+C 85 ; WX 611 ; N U ; B 64 -12 546 724 ;
+C 86 ; WX 556 ; N V ; B 9 0 547 724 ;
+C 87 ; WX 833 ; N W ; B 2 0 830 724 ;
+C 88 ; WX 500 ; N X ; B -6 0 506 724 ;
+C 89 ; WX 500 ; N Y ; B 0 0 500 724 ;
+C 90 ; WX 444 ; N Z ; B 21 0 419 724 ;
+C 91 ; WX 389 ; N bracketleft ; B 80 -208 335 724 ;
+C 92 ; WX 278 ; N backslash ; B -40 -12 318 736 ;
+C 93 ; WX 389 ; N bracketright ; B 54 -208 309 724 ;
+C 94 ; WX 600 ; N asciicircum ; B 52 326 548 724 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 22 508 212 736 ;
+C 97 ; WX 500 ; N a ; B 30 -10 432 582 ;
+C 98 ; WX 500 ; N b ; B 60 -10 470 724 ;
+C 99 ; WX 444 ; N c ; B 30 -10 420 582 ;
+C 100 ; WX 500 ; N d ; B 30 -10 440 724 ;
+C 101 ; WX 500 ; N e ; B 30 -10 456 582 ;
+C 102 ; WX 278 ; N f ; B 16 0 271 736 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 30 -198 440 582 ;
+C 104 ; WX 500 ; N h ; B 60 0 440 724 ;
+C 105 ; WX 222 ; N i ; B 53 0 169 736 ;
+C 106 ; WX 222 ; N j ; B -32 -186 169 736 ;
+C 107 ; WX 444 ; N k ; B 60 0 453 724 ;
+C 108 ; WX 222 ; N l ; B 53 0 169 724 ;
+C 109 ; WX 778 ; N m ; B 60 0 718 582 ;
+C 110 ; WX 500 ; N n ; B 60 0 440 582 ;
+C 111 ; WX 500 ; N o ; B 30 -10 470 582 ;
+C 112 ; WX 500 ; N p ; B 60 -186 470 582 ;
+C 113 ; WX 500 ; N q ; B 30 -186 440 582 ;
+C 114 ; WX 278 ; N r ; B 50 0 272 590 ;
+C 115 ; WX 444 ; N s ; B 28 -10 415 582 ;
+C 116 ; WX 278 ; N t ; B 12 0 271 693 ;
+C 117 ; WX 500 ; N u ; B 60 -10 440 572 ;
+C 118 ; WX 444 ; N v ; B 6 0 438 572 ;
+C 119 ; WX 667 ; N w ; B 5 0 661 572 ;
+C 120 ; WX 444 ; N x ; B -4 0 448 572 ;
+C 121 ; WX 444 ; N y ; B 6 -198 438 572 ;
+C 122 ; WX 444 ; N z ; B 22 0 414 572 ;
+C 123 ; WX 389 ; N braceleft ; B 12 -226 329 736 ;
+C 124 ; WX 222 ; N bar ; B 56 -12 166 736 ;
+C 125 ; WX 389 ; N braceright ; B 60 -226 377 736 ;
+C 126 ; WX 600 ; N asciitilde ; B 46 157 554 349 ;
+C 161 ; WX 278 ; N exclamdown ; B 77 -152 201 572 ;
+C 162 ; WX 556 ; N cent ; B 62 -20 472 736 ;
+C 163 ; WX 556 ; N sterling ; B 9 0 535 736 ;
+C 164 ; WX 167 ; N fraction ; B -167 -12 334 736 ;
+C 165 ; WX 556 ; N yen ; B 4 0 552 724 ;
+C 166 ; WX 556 ; N florin ; B 10 -198 546 736 ;
+C 167 ; WX 444 ; N section ; B 25 -78 418 736 ;
+C 168 ; WX 556 ; N currency ; B 18 100 538 624 ;
+C 169 ; WX 222 ; N quotesingle ; B 62 468 160 724 ;
+C 170 ; WX 389 ; N quotedblleft ; B 16 508 373 736 ;
+C 171 ; WX 444 ; N guillemotleft ; B 24 103 420 469 ;
+C 172 ; WX 278 ; N guilsinglleft ; B 24 103 254 469 ;
+C 173 ; WX 278 ; N guilsinglright ; B 24 103 254 469 ;
+C 174 ; WX 500 ; N fi ; B 16 0 447 736 ;
+C 175 ; WX 500 ; N fl ; B 16 0 447 736 ;
+C 177 ; WX 500 ; N endash ; B 0 244 500 328 ;
+C 178 ; WX 444 ; N dagger ; B 36 -90 408 724 ;
+C 179 ; WX 444 ; N daggerdbl ; B 36 -90 408 724 ;
+C 180 ; WX 278 ; N periodcentered ; B 73 187 205 319 ;
+C 182 ; WX 620 ; N paragraph ; B 8 -90 554 724 ;
+C 183 ; WX 500 ; N bullet ; B 69 181 431 543 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 10 -98 200 130 ;
+C 185 ; WX 389 ; N quotedblbase ; B 16 -98 373 130 ;
+C 186 ; WX 389 ; N quotedblright ; B 16 508 373 736 ;
+C 187 ; WX 444 ; N guillemotright ; B 24 103 420 469 ;
+C 188 ; WX 1000 ; N ellipsis ; B 109 0 891 130 ;
+C 189 ; WX 1000 ; N perthousand ; B 4 -12 996 736 ;
+C 191 ; WX 500 ; N questiondown ; B 52 -164 470 572 ;
+C 193 ; WX 222 ; N grave ; B -38 632 186 776 ;
+C 194 ; WX 222 ; N acute ; B 36 632 260 776 ;
+C 195 ; WX 222 ; N circumflex ; B -52 632 274 776 ;
+C 196 ; WX 222 ; N tilde ; B -66 640 288 762 ;
+C 197 ; WX 222 ; N macron ; B -52 670 274 734 ;
+C 198 ; WX 222 ; N breve ; B -50 638 272 779 ;
+C 199 ; WX 222 ; N dotaccent ; B 55 646 167 752 ;
+C 200 ; WX 222 ; N dieresis ; B -32 646 254 752 ;
+C 202 ; WX 222 ; N ring ; B 8 632 214 838 ;
+C 203 ; WX 222 ; N cedilla ; B -1 -227 222 0 ;
+C 205 ; WX 222 ; N hungarumlaut ; B -48 632 340 776 ;
+C 206 ; WX 222 ; N ogonek ; B -5 -219 250 21 ;
+C 207 ; WX 222 ; N caron ; B -52 632 274 776 ;
+C 208 ; WX 1000 ; N emdash ; B 0 244 1000 328 ;
+C 225 ; WX 833 ; N AE ; B -8 0 777 724 ;
+C 227 ; WX 300 ; N ordfeminine ; B 8 380 269 736 ;
+C 232 ; WX 444 ; N Lslash ; B -10 0 420 724 ;
+C 233 ; WX 611 ; N Oslash ; B 4 -42 607 766 ;
+C 234 ; WX 889 ; N OE ; B 37 -12 833 736 ;
+C 235 ; WX 300 ; N ordmasculine ; B 7 380 293 736 ;
+C 241 ; WX 778 ; N ae ; B 30 -10 744 582 ;
+C 245 ; WX 222 ; N dotlessi ; B 53 0 169 572 ;
+C 248 ; WX 222 ; N lslash ; B -3 0 225 724 ;
+C 249 ; WX 500 ; N oslash ; B 11 -70 489 642 ;
+C 250 ; WX 778 ; N oe ; B 30 -10 744 582 ;
+C 251 ; WX 556 ; N germandbls ; B 60 -10 521 736 ;
+C -1 ; WX 444 ; N Zcaron ; B 21 0 419 909 ;
+C -1 ; WX 444 ; N ccedilla ; B 30 -227 420 582 ;
+C -1 ; WX 444 ; N ydieresis ; B 6 -198 438 752 ;
+C -1 ; WX 500 ; N atilde ; B 30 -10 432 762 ;
+C -1 ; WX 222 ; N icircumflex ; B -52 0 274 776 ;
+C -1 ; WX 333 ; N threesuperior ; B 8 286 317 736 ;
+C -1 ; WX 500 ; N ecircumflex ; B 30 -10 456 776 ;
+C -1 ; WX 500 ; N thorn ; B 60 -186 470 724 ;
+C -1 ; WX 500 ; N egrave ; B 30 -10 456 776 ;
+C -1 ; WX 333 ; N twosuperior ; B 18 294 315 736 ;
+C -1 ; WX 500 ; N eacute ; B 30 -10 456 776 ;
+C -1 ; WX 500 ; N otilde ; B 30 -10 470 762 ;
+C -1 ; WX 556 ; N Aacute ; B 0 0 556 909 ;
+C -1 ; WX 500 ; N ocircumflex ; B 30 -10 470 776 ;
+C -1 ; WX 444 ; N yacute ; B 6 -198 438 776 ;
+C -1 ; WX 500 ; N udieresis ; B 60 -10 440 752 ;
+C -1 ; WX 834 ; N threequarters ; B 28 -12 796 736 ;
+C -1 ; WX 500 ; N acircumflex ; B 30 -10 432 776 ;
+C -1 ; WX 611 ; N Eth ; B 2 0 573 724 ;
+C -1 ; WX 500 ; N edieresis ; B 30 -10 456 752 ;
+C -1 ; WX 500 ; N ugrave ; B 60 -10 440 776 ;
+C -1 ; WX 1000 ; N trademark ; B 16 298 923 724 ;
+C -1 ; WX 500 ; N ograve ; B 30 -10 470 776 ;
+C -1 ; WX 444 ; N scaron ; B 28 -10 415 776 ;
+C -1 ; WX 278 ; N Idieresis ; B -4 0 282 885 ;
+C -1 ; WX 500 ; N uacute ; B 60 -10 440 776 ;
+C -1 ; WX 500 ; N agrave ; B 30 -10 432 776 ;
+C -1 ; WX 500 ; N ntilde ; B 60 0 440 762 ;
+C -1 ; WX 500 ; N aring ; B 30 -10 432 838 ;
+C -1 ; WX 444 ; N zcaron ; B 22 0 414 776 ;
+C -1 ; WX 278 ; N Icircumflex ; B -24 0 302 909 ;
+C -1 ; WX 611 ; N Ntilde ; B 69 0 542 895 ;
+C -1 ; WX 500 ; N ucircumflex ; B 60 -10 440 776 ;
+C -1 ; WX 500 ; N Ecircumflex ; B 66 0 444 909 ;
+C -1 ; WX 278 ; N Iacute ; B 64 0 288 909 ;
+C -1 ; WX 611 ; N Ccedilla ; B 37 -227 558 736 ;
+C -1 ; WX 611 ; N Odieresis ; B 37 -12 573 885 ;
+C -1 ; WX 500 ; N Scaron ; B 27 -12 465 909 ;
+C -1 ; WX 500 ; N Edieresis ; B 66 0 444 885 ;
+C -1 ; WX 278 ; N Igrave ; B -10 0 214 909 ;
+C -1 ; WX 500 ; N adieresis ; B 30 -10 432 752 ;
+C -1 ; WX 611 ; N Ograve ; B 37 -12 573 909 ;
+C -1 ; WX 500 ; N Egrave ; B 66 0 444 909 ;
+C -1 ; WX 500 ; N Ydieresis ; B 0 0 500 885 ;
+C -1 ; WX 800 ; N registered ; B 13 -12 787 736 ;
+C -1 ; WX 611 ; N Otilde ; B 37 -12 573 895 ;
+C -1 ; WX 834 ; N onequarter ; B 85 -12 796 736 ;
+C -1 ; WX 611 ; N Ugrave ; B 64 -12 546 909 ;
+C -1 ; WX 611 ; N Ucircumflex ; B 64 -12 546 909 ;
+C -1 ; WX 556 ; N Thorn ; B 72 0 521 724 ;
+C -1 ; WX 600 ; N divide ; B 47 -43 553 549 ;
+C -1 ; WX 556 ; N Atilde ; B 0 0 556 895 ;
+C -1 ; WX 611 ; N Uacute ; B 64 -12 546 909 ;
+C -1 ; WX 611 ; N Ocircumflex ; B 37 -12 573 909 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 88 553 418 ;
+C -1 ; WX 556 ; N Aring ; B 0 0 556 971 ;
+C -1 ; WX 222 ; N idieresis ; B -32 0 254 752 ;
+C -1 ; WX 222 ; N iacute ; B 36 0 260 776 ;
+C -1 ; WX 500 ; N aacute ; B 30 -10 432 776 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 47 0 553 506 ;
+C -1 ; WX 611 ; N Udieresis ; B 64 -12 546 885 ;
+C -1 ; WX 600 ; N minus ; B 47 198 553 308 ;
+C -1 ; WX 333 ; N onesuperior ; B 65 294 227 728 ;
+C -1 ; WX 500 ; N Eacute ; B 66 0 444 909 ;
+C -1 ; WX 556 ; N Acircumflex ; B 0 0 556 909 ;
+C -1 ; WX 800 ; N copyright ; B 13 -12 787 736 ;
+C -1 ; WX 556 ; N Agrave ; B 0 0 556 909 ;
+C -1 ; WX 500 ; N odieresis ; B 30 -10 470 752 ;
+C -1 ; WX 500 ; N oacute ; B 30 -10 470 776 ;
+C -1 ; WX 400 ; N degree ; B 57 450 343 736 ;
+C -1 ; WX 222 ; N igrave ; B -38 0 186 776 ;
+C -1 ; WX 500 ; N mu ; B 60 -186 440 572 ;
+C -1 ; WX 611 ; N Oacute ; B 37 -12 573 909 ;
+C -1 ; WX 500 ; N eth ; B 30 -10 470 736 ;
+C -1 ; WX 556 ; N Adieresis ; B 0 0 556 885 ;
+C -1 ; WX 500 ; N Yacute ; B 0 0 500 909 ;
+C -1 ; WX 222 ; N brokenbar ; B 56 -12 166 736 ;
+C -1 ; WX 834 ; N onehalf ; B 85 -12 796 736 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -37
+KPX A W -37
+KPX A V -37
+KPX A T -37
+
+KPX F period -111
+KPX F comma -111
+KPX F A -18
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -55
+KPX L W -55
+KPX L V -55
+KPX L T -55
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -37
+KPX T w -55
+KPX T u -37
+KPX T semicolon -55
+KPX T s -55
+KPX T r -37
+KPX T period -74
+KPX T o -55
+KPX T i -37
+KPX T hyphen -55
+KPX T e -55
+KPX T comma -74
+KPX T colon -55
+KPX T c -55
+KPX T a -55
+KPX T A -37
+
+KPX V y -18
+KPX V u -18
+KPX V semicolon -37
+KPX V r -18
+KPX V period -92
+KPX V o -37
+KPX V i -18
+KPX V hyphen -55
+KPX V e -37
+KPX V comma -92
+KPX V colon -37
+KPX V a -37
+KPX V A -37
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon -18
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon -18
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -18
+KPX Y semicolon -37
+KPX Y q -37
+KPX Y period -74
+KPX Y p -18
+KPX Y o -37
+KPX Y i -18
+KPX Y hyphen -55
+KPX Y e -37
+KPX Y comma -74
+KPX Y colon -37
+KPX Y a -37
+KPX Y A -37
+
+KPX f quoteright 18
+KPX f f 0
+
+KPX quoteleft quoteleft -55
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -55
+
+KPX r z 0
+KPX r y 0
+KPX r x 0
+KPX r w 0
+KPX r v 0
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 18
+KPX r q 0
+KPX r period -55
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 0
+KPX r e 0
+KPX r d 0
+KPX r comma -55
+KPX r c 0
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 167 133 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 167 133 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 167 133 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 167 133 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 167 133 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 167 133 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 201 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 133 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 133 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 133 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 133 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 28 133 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 28 133 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 28 133 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 133 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 195 133 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 195 133 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 195 133 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 195 133 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 195 133 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 195 133 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 145 133 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 195 133 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 195 133 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 195 133 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 195 133 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 145 133 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 145 133 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 117 133 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 131 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 131 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 131 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 131 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 131 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 131 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 111 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 139 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 139 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 139 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 139 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 139 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 139 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 139 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 139 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 139 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 139 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 111 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 139 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 139 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 111 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 111 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 111 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-CnMd b/font/AG-CnMd
new file mode 100644
index 0000000..f059153
--- /dev/null
+++ b/font/AG-CnMd
@@ -0,0 +1,447 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Apr 12 14:11:07 1990
+Comment UniqueID 28720
+Comment VMusage 23857 30749
+FontName AvantGarde-CondMedium
+FullName ITC Avant Garde Gothic Condensed Medium
+FamilyName ITC Avant Garde Gothic
+Weight Medium
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -167 -226 1001 980
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.001
+Notice Copyright (c) 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 724
+XHeight 560
+Ascender 724
+Descender -198
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 222 ; N exclam ; B 60 0 162 724 ;
+C 34 ; WX 333 ; N quotedbl ; B 55 476 278 724 ;
+C 35 ; WX 556 ; N numbersign ; B 24 0 537 724 ;
+C 36 ; WX 556 ; N dollar ; B 56 -88 488 802 ;
+C 37 ; WX 889 ; N percent ; B 44 -12 845 736 ;
+C 38 ; WX 611 ; N ampersand ; B 29 -12 594 736 ;
+C 39 ; WX 222 ; N quoteright ; B 27 516 195 736 ;
+C 40 ; WX 389 ; N parenleft ; B 62 -208 358 742 ;
+C 41 ; WX 389 ; N parenright ; B 31 -208 327 742 ;
+C 42 ; WX 444 ; N asterisk ; B 45 358 399 724 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 278 ; N comma ; B 6 -104 198 124 ;
+C 45 ; WX 333 ; N hyphen ; B 47 238 286 322 ;
+C 46 ; WX 278 ; N period ; B 91 0 187 124 ;
+C 47 ; WX 278 ; N slash ; B -15 -12 293 736 ;
+C 48 ; WX 556 ; N zero ; B 39 -12 517 736 ;
+C 49 ; WX 556 ; N one ; B 118 0 345 724 ;
+C 50 ; WX 556 ; N two ; B 44 0 486 736 ;
+C 51 ; WX 556 ; N three ; B 34 -12 509 736 ;
+C 52 ; WX 556 ; N four ; B 32 0 500 724 ;
+C 53 ; WX 556 ; N five ; B 42 -12 505 724 ;
+C 54 ; WX 556 ; N six ; B 45 -12 511 736 ;
+C 55 ; WX 556 ; N seven ; B 30 0 486 724 ;
+C 56 ; WX 556 ; N eight ; B 34 -12 522 736 ;
+C 57 ; WX 556 ; N nine ; B 45 -12 511 736 ;
+C 58 ; WX 278 ; N colon ; B 91 0 187 470 ;
+C 59 ; WX 278 ; N semicolon ; B 6 -104 198 470 ;
+C 60 ; WX 600 ; N less ; B 47 -8 553 514 ;
+C 61 ; WX 600 ; N equal ; B 47 106 553 400 ;
+C 62 ; WX 600 ; N greater ; B 47 -8 553 514 ;
+C 63 ; WX 444 ; N question ; B 22 0 421 736 ;
+C 64 ; WX 800 ; N at ; B 40 -12 760 736 ;
+C 65 ; WX 500 ; N A ; B -3 0 503 724 ;
+C 66 ; WX 556 ; N B ; B 70 0 517 724 ;
+C 67 ; WX 556 ; N C ; B 36 -12 525 736 ;
+C 68 ; WX 611 ; N D ; B 70 0 574 724 ;
+C 69 ; WX 500 ; N E ; B 70 0 434 724 ;
+C 70 ; WX 444 ; N F ; B 70 0 414 724 ;
+C 71 ; WX 611 ; N G ; B 36 -12 563 736 ;
+C 72 ; WX 611 ; N H ; B 70 0 541 724 ;
+C 73 ; WX 222 ; N I ; B 60 0 162 724 ;
+C 74 ; WX 444 ; N J ; B 8 -12 384 724 ;
+C 75 ; WX 556 ; N K ; B 70 0 556 724 ;
+C 76 ; WX 444 ; N L ; B 70 0 430 724 ;
+C 77 ; WX 722 ; N M ; B 70 0 652 724 ;
+C 78 ; WX 611 ; N N ; B 76 0 534 724 ;
+C 79 ; WX 611 ; N O ; B 36 -12 574 736 ;
+C 80 ; WX 556 ; N P ; B 70 0 513 724 ;
+C 81 ; WX 611 ; N Q ; B 36 -12 588 736 ;
+C 82 ; WX 556 ; N R ; B 70 0 550 724 ;
+C 83 ; WX 500 ; N S ; B 24 -12 475 736 ;
+C 84 ; WX 444 ; N T ; B 16 0 428 724 ;
+C 85 ; WX 556 ; N U ; B 56 -12 500 724 ;
+C 86 ; WX 500 ; N V ; B -1 0 501 724 ;
+C 87 ; WX 833 ; N W ; B 7 0 825 724 ;
+C 88 ; WX 500 ; N X ; B 1 0 498 724 ;
+C 89 ; WX 500 ; N Y ; B 0 0 500 724 ;
+C 90 ; WX 444 ; N Z ; B 17 0 427 724 ;
+C 91 ; WX 389 ; N bracketleft ; B 88 -210 344 724 ;
+C 92 ; WX 278 ; N backslash ; B -15 -12 293 736 ;
+C 93 ; WX 389 ; N bracketright ; B 45 -210 301 724 ;
+C 94 ; WX 600 ; N asciicircum ; B 76 346 524 724 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 27 516 195 736 ;
+C 97 ; WX 500 ; N a ; B 34 -10 440 570 ;
+C 98 ; WX 500 ; N b ; B 60 -10 466 724 ;
+C 99 ; WX 444 ; N c ; B 34 -10 422 570 ;
+C 100 ; WX 500 ; N d ; B 34 -10 440 724 ;
+C 101 ; WX 444 ; N e ; B 34 -10 414 570 ;
+C 102 ; WX 222 ; N f ; B 2 0 229 724 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 34 -198 440 570 ;
+C 104 ; WX 500 ; N h ; B 60 0 440 724 ;
+C 105 ; WX 222 ; N i ; B 63 0 159 724 ;
+C 106 ; WX 222 ; N j ; B -31 -204 162 724 ;
+C 107 ; WX 444 ; N k ; B 60 0 459 724 ;
+C 108 ; WX 222 ; N l ; B 63 0 159 724 ;
+C 109 ; WX 778 ; N m ; B 60 0 718 570 ;
+C 110 ; WX 500 ; N n ; B 60 0 440 570 ;
+C 111 ; WX 500 ; N o ; B 34 -10 466 570 ;
+C 112 ; WX 500 ; N p ; B 60 -198 466 570 ;
+C 113 ; WX 500 ; N q ; B 34 -198 440 570 ;
+C 114 ; WX 278 ; N r ; B 60 0 275 570 ;
+C 115 ; WX 389 ; N s ; B 17 -10 364 570 ;
+C 116 ; WX 222 ; N t ; B 0 0 222 694 ;
+C 117 ; WX 500 ; N u ; B 60 -10 440 560 ;
+C 118 ; WX 444 ; N v ; B 6 0 438 560 ;
+C 119 ; WX 667 ; N w ; B 11 0 655 560 ;
+C 120 ; WX 444 ; N x ; B 1 0 443 560 ;
+C 121 ; WX 444 ; N y ; B 6 -198 438 560 ;
+C 122 ; WX 444 ; N z ; B 34 0 410 560 ;
+C 123 ; WX 389 ; N braceleft ; B 43 -210 364 736 ;
+C 124 ; WX 222 ; N bar ; B 69 -12 153 736 ;
+C 125 ; WX 389 ; N braceright ; B 25 -210 346 736 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 169 531 337 ;
+C 161 ; WX 222 ; N exclamdown ; B 60 -164 162 560 ;
+C 162 ; WX 556 ; N cent ; B 74 -26 464 750 ;
+C 163 ; WX 556 ; N sterling ; B 9 0 536 734 ;
+C 164 ; WX 167 ; N fraction ; B -167 -12 334 736 ;
+C 165 ; WX 556 ; N yen ; B 40 0 516 724 ;
+C 166 ; WX 556 ; N florin ; B 15 -204 534 736 ;
+C 167 ; WX 444 ; N section ; B 28 -80 415 736 ;
+C 168 ; WX 556 ; N currency ; B 24 109 532 615 ;
+C 169 ; WX 222 ; N quotesingle ; B 70 476 152 724 ;
+C 170 ; WX 333 ; N quotedblleft ; B 17 516 315 736 ;
+C 171 ; WX 444 ; N guillemotleft ; B 22 99 422 461 ;
+C 172 ; WX 278 ; N guilsinglleft ; B 32 99 256 461 ;
+C 173 ; WX 278 ; N guilsinglright ; B 22 99 246 461 ;
+C 174 ; WX 444 ; N fi ; B 2 0 381 724 ;
+C 175 ; WX 444 ; N fl ; B 2 0 381 724 ;
+C 177 ; WX 500 ; N endash ; B 0 249 500 311 ;
+C 178 ; WX 444 ; N dagger ; B 40 -80 404 736 ;
+C 179 ; WX 444 ; N daggerdbl ; B 40 -80 404 736 ;
+C 180 ; WX 278 ; N periodcentered ; B 84 198 194 308 ;
+C 182 ; WX 600 ; N paragraph ; B 49 -80 488 724 ;
+C 183 ; WX 500 ; N bullet ; B 69 181 431 543 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 27 -96 195 124 ;
+C 185 ; WX 333 ; N quotedblbase ; B 18 -96 316 124 ;
+C 186 ; WX 333 ; N quotedblright ; B 18 516 316 736 ;
+C 187 ; WX 444 ; N guillemotright ; B 22 99 422 461 ;
+C 188 ; WX 1000 ; N ellipsis ; B 119 0 881 124 ;
+C 189 ; WX 1000 ; N perthousand ; B 0 -12 1001 736 ;
+C 191 ; WX 444 ; N questiondown ; B 23 -176 422 560 ;
+C 193 ; WX 222 ; N grave ; B -20 622 178 764 ;
+C 194 ; WX 222 ; N acute ; B 44 622 242 764 ;
+C 195 ; WX 222 ; N circumflex ; B -34 622 256 764 ;
+C 196 ; WX 222 ; N tilde ; B -59 633 281 749 ;
+C 197 ; WX 222 ; N macron ; B -44 657 266 715 ;
+C 198 ; WX 222 ; N breve ; B -43 628 265 764 ;
+C 199 ; WX 222 ; N dotaccent ; B 66 638 156 736 ;
+C 200 ; WX 222 ; N dieresis ; B -16 638 238 736 ;
+C 202 ; WX 222 ; N ring ; B 2 622 220 840 ;
+C 203 ; WX 222 ; N cedilla ; B 6 -226 221 0 ;
+C 205 ; WX 222 ; N hungarumlaut ; B -22 622 322 764 ;
+C 206 ; WX 222 ; N ogonek ; B 12 -212 259 20 ;
+C 207 ; WX 222 ; N caron ; B -34 622 256 764 ;
+C 208 ; WX 1000 ; N emdash ; B 0 249 1000 311 ;
+C 225 ; WX 833 ; N AE ; B -18 0 767 724 ;
+C 227 ; WX 300 ; N ordfeminine ; B 8 388 277 736 ;
+C 232 ; WX 444 ; N Lslash ; B 1 0 430 724 ;
+C 233 ; WX 611 ; N Oslash ; B 8 -42 602 766 ;
+C 234 ; WX 889 ; N OE ; B 30 -12 823 736 ;
+C 235 ; WX 300 ; N ordmasculine ; B 9 388 291 736 ;
+C 241 ; WX 778 ; N ae ; B 34 -10 744 570 ;
+C 245 ; WX 222 ; N dotlessi ; B 63 0 159 560 ;
+C 248 ; WX 222 ; N lslash ; B 3 0 219 724 ;
+C 249 ; WX 500 ; N oslash ; B 22 -76 478 636 ;
+C 250 ; WX 778 ; N oe ; B 34 -10 744 570 ;
+C 251 ; WX 556 ; N germandbls ; B 60 -10 522 724 ;
+C -1 ; WX 444 ; N Zcaron ; B 17 0 427 904 ;
+C -1 ; WX 444 ; N ccedilla ; B 34 -226 422 570 ;
+C -1 ; WX 444 ; N ydieresis ; B 6 -198 438 736 ;
+C -1 ; WX 500 ; N atilde ; B 34 -10 440 749 ;
+C -1 ; WX 222 ; N icircumflex ; B -34 0 256 764 ;
+C -1 ; WX 333 ; N threesuperior ; B 14 286 326 736 ;
+C -1 ; WX 444 ; N ecircumflex ; B 34 -10 414 764 ;
+C -1 ; WX 500 ; N thorn ; B 60 -198 466 724 ;
+C -1 ; WX 444 ; N egrave ; B 34 -10 414 764 ;
+C -1 ; WX 333 ; N twosuperior ; B 21 294 311 736 ;
+C -1 ; WX 444 ; N eacute ; B 34 -10 414 764 ;
+C -1 ; WX 500 ; N otilde ; B 34 -10 466 749 ;
+C -1 ; WX 500 ; N Aacute ; B -3 0 503 904 ;
+C -1 ; WX 500 ; N ocircumflex ; B 34 -10 466 764 ;
+C -1 ; WX 444 ; N yacute ; B 6 -198 438 764 ;
+C -1 ; WX 500 ; N udieresis ; B 60 -10 440 736 ;
+C -1 ; WX 834 ; N threequarters ; B 54 -12 785 736 ;
+C -1 ; WX 500 ; N acircumflex ; B 34 -10 440 764 ;
+C -1 ; WX 611 ; N Eth ; B -14 0 574 724 ;
+C -1 ; WX 444 ; N edieresis ; B 34 -10 414 736 ;
+C -1 ; WX 500 ; N ugrave ; B 60 -10 440 764 ;
+C -1 ; WX 990 ; N trademark ; B 82 312 908 724 ;
+C -1 ; WX 500 ; N ograve ; B 34 -10 466 764 ;
+C -1 ; WX 389 ; N scaron ; B 17 -10 364 764 ;
+C -1 ; WX 222 ; N Idieresis ; B -16 0 238 876 ;
+C -1 ; WX 500 ; N uacute ; B 60 -10 440 764 ;
+C -1 ; WX 500 ; N agrave ; B 34 -10 440 764 ;
+C -1 ; WX 500 ; N ntilde ; B 60 0 440 749 ;
+C -1 ; WX 500 ; N aring ; B 34 -10 440 840 ;
+C -1 ; WX 444 ; N zcaron ; B 34 0 410 764 ;
+C -1 ; WX 222 ; N Icircumflex ; B -34 0 256 904 ;
+C -1 ; WX 611 ; N Ntilde ; B 76 0 534 889 ;
+C -1 ; WX 500 ; N ucircumflex ; B 60 -10 440 764 ;
+C -1 ; WX 500 ; N Ecircumflex ; B 70 0 434 904 ;
+C -1 ; WX 222 ; N Iacute ; B 44 0 242 904 ;
+C -1 ; WX 556 ; N Ccedilla ; B 36 -226 525 736 ;
+C -1 ; WX 611 ; N Odieresis ; B 36 -12 574 876 ;
+C -1 ; WX 500 ; N Scaron ; B 24 -12 475 904 ;
+C -1 ; WX 500 ; N Edieresis ; B 70 0 434 876 ;
+C -1 ; WX 222 ; N Igrave ; B -20 0 178 904 ;
+C -1 ; WX 500 ; N adieresis ; B 34 -10 440 736 ;
+C -1 ; WX 611 ; N Ograve ; B 36 -12 574 904 ;
+C -1 ; WX 500 ; N Egrave ; B 70 0 434 904 ;
+C -1 ; WX 500 ; N Ydieresis ; B 0 0 500 876 ;
+C -1 ; WX 800 ; N registered ; B 20 -12 780 736 ;
+C -1 ; WX 611 ; N Otilde ; B 36 -12 574 889 ;
+C -1 ; WX 834 ; N onequarter ; B 94 -12 785 736 ;
+C -1 ; WX 556 ; N Ugrave ; B 56 -12 500 904 ;
+C -1 ; WX 556 ; N Ucircumflex ; B 56 -12 500 904 ;
+C -1 ; WX 556 ; N Thorn ; B 70 0 513 724 ;
+C -1 ; WX 600 ; N divide ; B 47 -26 553 532 ;
+C -1 ; WX 500 ; N Atilde ; B -3 0 503 889 ;
+C -1 ; WX 556 ; N Uacute ; B 56 -12 500 904 ;
+C -1 ; WX 611 ; N Ocircumflex ; B 36 -12 574 904 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 106 553 400 ;
+C -1 ; WX 500 ; N Aring ; B -3 0 503 980 ;
+C -1 ; WX 222 ; N idieresis ; B -16 0 238 736 ;
+C -1 ; WX 222 ; N iacute ; B 44 0 242 764 ;
+C -1 ; WX 500 ; N aacute ; B 34 -10 440 764 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 47 0 553 506 ;
+C -1 ; WX 556 ; N Udieresis ; B 56 -12 500 876 ;
+C -1 ; WX 600 ; N minus ; B 47 211 553 295 ;
+C -1 ; WX 333 ; N onesuperior ; B 66 294 221 728 ;
+C -1 ; WX 500 ; N Eacute ; B 70 0 434 904 ;
+C -1 ; WX 500 ; N Acircumflex ; B -3 0 503 904 ;
+C -1 ; WX 800 ; N copyright ; B 20 -12 780 736 ;
+C -1 ; WX 500 ; N Agrave ; B -3 0 503 904 ;
+C -1 ; WX 500 ; N odieresis ; B 34 -10 466 736 ;
+C -1 ; WX 500 ; N oacute ; B 34 -10 466 764 ;
+C -1 ; WX 400 ; N degree ; B 57 450 343 736 ;
+C -1 ; WX 222 ; N igrave ; B -20 0 178 764 ;
+C -1 ; WX 500 ; N mu ; B 60 -198 440 560 ;
+C -1 ; WX 611 ; N Oacute ; B 36 -12 574 904 ;
+C -1 ; WX 500 ; N eth ; B 34 -10 466 738 ;
+C -1 ; WX 500 ; N Adieresis ; B -3 0 503 876 ;
+C -1 ; WX 500 ; N Yacute ; B 0 0 500 904 ;
+C -1 ; WX 222 ; N brokenbar ; B 69 -12 153 736 ;
+C -1 ; WX 834 ; N onehalf ; B 94 -12 770 736 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -37
+KPX A W -37
+KPX A V -37
+KPX A T -37
+
+KPX F period -111
+KPX F comma -111
+KPX F A -18
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -55
+KPX L W -55
+KPX L V -55
+KPX L T -55
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -37
+KPX T w -55
+KPX T u -37
+KPX T semicolon -55
+KPX T s -55
+KPX T r -37
+KPX T period -74
+KPX T o -55
+KPX T i -37
+KPX T hyphen -55
+KPX T e -55
+KPX T comma -74
+KPX T colon -55
+KPX T c -55
+KPX T a -55
+KPX T A -37
+
+KPX V y -18
+KPX V u -18
+KPX V semicolon -37
+KPX V r -18
+KPX V period -92
+KPX V o -37
+KPX V i -18
+KPX V hyphen -55
+KPX V e -37
+KPX V comma -92
+KPX V colon -37
+KPX V a -37
+KPX V A -37
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon -18
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon -18
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -18
+KPX Y semicolon -37
+KPX Y q -37
+KPX Y period -74
+KPX Y p -18
+KPX Y o -37
+KPX Y i -18
+KPX Y hyphen -55
+KPX Y e -37
+KPX Y comma -74
+KPX Y colon -37
+KPX Y a -37
+KPX Y A -37
+
+KPX f quoteright 18
+KPX f f 0
+
+KPX quoteleft quoteleft -92
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -92
+
+KPX r z 0
+KPX r y 0
+KPX r x 0
+KPX r w 0
+KPX r v 0
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 18
+KPX r q 0
+KPX r period -55
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 0
+KPX r e 0
+KPX r d 0
+KPX r comma -55
+KPX r c 0
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 139 140 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 139 140 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 139 140 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 139 140 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 139 140 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 139 140 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 167 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 145 140 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 145 140 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 145 140 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 145 140 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 0 140 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 0 140 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 0 140 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 0 140 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 195 140 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 195 140 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 195 140 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 195 140 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 195 140 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 195 140 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 139 140 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 167 140 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 167 140 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 167 140 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 167 140 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 139 140 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 139 140 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 111 140 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 139 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 139 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 139 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 139 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 139 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 139 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 111 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 111 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 111 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 111 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 111 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 139 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 139 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 139 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 139 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 139 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 139 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 84 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 139 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 139 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 111 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 111 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 111 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-Dm b/font/AG-Dm
new file mode 100644
index 0000000..69eebba
--- /dev/null
+++ b/font/AG-Dm
@@ -0,0 +1,576 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Mar  4 13:46:34 1991
+Comment UniqueID 34370
+Comment VMusage 24954 31846
+FontName AvantGarde-Demi
+FullName ITC Avant Garde Gothic Demi
+FamilyName ITC Avant Garde Gothic
+Weight Demi
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -123 -251 1222 1021
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.ITC Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 740
+XHeight 555
+Ascender 740
+Descender -185
+StartCharMetrics 228
+C 32 ; WX 280 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 280 ; N exclam ; B 73 0 206 740 ;
+C 34 ; WX 360 ; N quotedbl ; B 19 444 341 740 ;
+C 35 ; WX 560 ; N numbersign ; B 29 0 525 700 ;
+C 36 ; WX 560 ; N dollar ; B 58 -86 501 857 ;
+C 37 ; WX 860 ; N percent ; B 36 -15 822 755 ;
+C 38 ; WX 680 ; N ampersand ; B 34 -15 665 755 ;
+C 39 ; WX 280 ; N quoteright ; B 72 466 205 740 ;
+C 40 ; WX 380 ; N parenleft ; B 74 -157 350 754 ;
+C 41 ; WX 380 ; N parenright ; B 37 -157 313 754 ;
+C 42 ; WX 440 ; N asterisk ; B 67 457 374 755 ;
+C 43 ; WX 600 ; N plus ; B 48 0 552 506 ;
+C 44 ; WX 280 ; N comma ; B 73 -141 206 133 ;
+C 45 ; WX 420 ; N hyphen ; B 71 230 349 348 ;
+C 46 ; WX 280 ; N period ; B 73 0 206 133 ;
+C 47 ; WX 460 ; N slash ; B 6 -100 454 740 ;
+C 48 ; WX 560 ; N zero ; B 32 -15 529 755 ;
+C 49 ; WX 560 ; N one ; B 137 0 363 740 ;
+C 50 ; WX 560 ; N two ; B 36 0 523 755 ;
+C 51 ; WX 560 ; N three ; B 28 -15 532 755 ;
+C 52 ; WX 560 ; N four ; B 15 0 545 740 ;
+C 53 ; WX 560 ; N five ; B 25 -15 535 740 ;
+C 54 ; WX 560 ; N six ; B 23 -15 536 739 ;
+C 55 ; WX 560 ; N seven ; B 62 0 498 740 ;
+C 56 ; WX 560 ; N eight ; B 33 -15 527 755 ;
+C 57 ; WX 560 ; N nine ; B 24 0 537 754 ;
+C 58 ; WX 280 ; N colon ; B 73 0 206 555 ;
+C 59 ; WX 280 ; N semicolon ; B 73 -141 206 555 ;
+C 60 ; WX 600 ; N less ; B 46 -8 554 514 ;
+C 61 ; WX 600 ; N equal ; B 48 81 552 425 ;
+C 62 ; WX 600 ; N greater ; B 46 -8 554 514 ;
+C 63 ; WX 560 ; N question ; B 38 0 491 755 ;
+C 64 ; WX 740 ; N at ; B 50 -12 750 712 ;
+C 65 ; WX 740 ; N A ; B 7 0 732 740 ;
+C 66 ; WX 580 ; N B ; B 70 0 551 740 ;
+C 67 ; WX 780 ; N C ; B 34 -15 766 755 ;
+C 68 ; WX 700 ; N D ; B 63 0 657 740 ;
+C 69 ; WX 520 ; N E ; B 61 0 459 740 ;
+C 70 ; WX 480 ; N F ; B 61 0 438 740 ;
+C 71 ; WX 840 ; N G ; B 27 -15 817 755 ;
+C 72 ; WX 680 ; N H ; B 71 0 610 740 ;
+C 73 ; WX 280 ; N I ; B 72 0 209 740 ;
+C 74 ; WX 480 ; N J ; B 2 -15 409 740 ;
+C 75 ; WX 620 ; N K ; B 89 0 620 740 ;
+C 76 ; WX 440 ; N L ; B 72 0 435 740 ;
+C 77 ; WX 900 ; N M ; B 63 0 837 740 ;
+C 78 ; WX 740 ; N N ; B 70 0 671 740 ;
+C 79 ; WX 840 ; N O ; B 33 -15 807 755 ;
+C 80 ; WX 560 ; N P ; B 72 0 545 740 ;
+C 81 ; WX 840 ; N Q ; B 32 -15 824 755 ;
+C 82 ; WX 580 ; N R ; B 64 0 565 740 ;
+C 83 ; WX 520 ; N S ; B 12 -15 493 755 ;
+C 84 ; WX 420 ; N T ; B 6 0 418 740 ;
+C 85 ; WX 640 ; N U ; B 55 -15 585 740 ;
+C 86 ; WX 700 ; N V ; B 8 0 695 740 ;
+C 87 ; WX 900 ; N W ; B 7 0 899 740 ;
+C 88 ; WX 680 ; N X ; B 4 0 676 740 ;
+C 89 ; WX 620 ; N Y ; B -2 0 622 740 ;
+C 90 ; WX 500 ; N Z ; B 19 0 481 740 ;
+C 91 ; WX 320 ; N bracketleft ; B 66 -157 284 754 ;
+C 92 ; WX 640 ; N backslash ; B 96 -100 544 740 ;
+C 93 ; WX 320 ; N bracketright ; B 36 -157 254 754 ;
+C 94 ; WX 600 ; N asciicircum ; B 73 375 527 740 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 280 ; N quoteleft ; B 72 466 205 740 ;
+C 97 ; WX 660 ; N a ; B 27 -18 613 574 ;
+C 98 ; WX 660 ; N b ; B 47 -18 632 740 ;
+C 99 ; WX 640 ; N c ; B 37 -18 610 574 ;
+C 100 ; WX 660 ; N d ; B 34 -18 618 740 ;
+C 101 ; WX 640 ; N e ; B 31 -18 610 577 ;
+C 102 ; WX 280 ; N f ; B 15 0 280 755 ; L i fi ; L l fl ;
+C 103 ; WX 660 ; N g ; B 32 -226 623 574 ;
+C 104 ; WX 600 ; N h ; B 54 0 546 740 ;
+C 105 ; WX 240 ; N i ; B 53 0 186 740 ;
+C 106 ; WX 260 ; N j ; B 16 -185 205 740 ;
+C 107 ; WX 580 ; N k ; B 80 0 571 740 ;
+C 108 ; WX 240 ; N l ; B 54 0 187 740 ;
+C 109 ; WX 940 ; N m ; B 54 0 887 574 ;
+C 110 ; WX 600 ; N n ; B 54 0 547 574 ;
+C 111 ; WX 640 ; N o ; B 25 -18 615 574 ;
+C 112 ; WX 660 ; N p ; B 47 -185 629 574 ;
+C 113 ; WX 660 ; N q ; B 31 -185 613 574 ;
+C 114 ; WX 320 ; N r ; B 63 0 317 574 ;
+C 115 ; WX 440 ; N s ; B 19 -18 421 574 ;
+C 116 ; WX 300 ; N t ; B 21 0 299 740 ;
+C 117 ; WX 600 ; N u ; B 50 -18 544 555 ;
+C 118 ; WX 560 ; N v ; B 3 0 556 555 ;
+C 119 ; WX 800 ; N w ; B 11 0 789 555 ;
+C 120 ; WX 560 ; N x ; B 3 0 556 555 ;
+C 121 ; WX 580 ; N y ; B 8 -185 571 555 ;
+C 122 ; WX 460 ; N z ; B 20 0 442 555 ;
+C 123 ; WX 340 ; N braceleft ; B -3 -191 317 747 ;
+C 124 ; WX 600 ; N bar ; B 233 -100 366 740 ;
+C 125 ; WX 340 ; N braceright ; B 23 -191 343 747 ;
+C 126 ; WX 600 ; N asciitilde ; B 67 160 533 347 ;
+C 161 ; WX 280 ; N exclamdown ; B 74 -185 207 555 ;
+C 162 ; WX 560 ; N cent ; B 43 39 517 715 ;
+C 163 ; WX 560 ; N sterling ; B -2 0 562 755 ;
+C 164 ; WX 160 ; N fraction ; B -123 0 282 740 ;
+C 165 ; WX 560 ; N yen ; B -10 0 570 740 ;
+C 166 ; WX 560 ; N florin ; B 0 -151 512 824 ;
+C 167 ; WX 560 ; N section ; B 28 -158 530 755 ;
+C 168 ; WX 560 ; N currency ; B 27 69 534 577 ;
+C 169 ; WX 220 ; N quotesingle ; B 44 444 177 740 ;
+C 170 ; WX 480 ; N quotedblleft ; B 70 466 410 740 ;
+C 171 ; WX 460 ; N guillemotleft ; B 61 108 400 469 ;
+C 172 ; WX 240 ; N guilsinglleft ; B 50 108 190 469 ;
+C 173 ; WX 240 ; N guilsinglright ; B 50 108 190 469 ;
+C 174 ; WX 520 ; N fi ; B 25 0 461 755 ;
+C 175 ; WX 520 ; N fl ; B 25 0 461 755 ;
+C 177 ; WX 500 ; N endash ; B 35 230 465 348 ;
+C 178 ; WX 560 ; N dagger ; B 51 -142 509 740 ;
+C 179 ; WX 560 ; N daggerdbl ; B 51 -142 509 740 ;
+C 180 ; WX 280 ; N periodcentered ; B 73 187 206 320 ;
+C 182 ; WX 600 ; N paragraph ; B -7 -103 607 740 ;
+C 183 ; WX 600 ; N bullet ; B 148 222 453 532 ;
+C 184 ; WX 280 ; N quotesinglbase ; B 72 -141 205 133 ;
+C 185 ; WX 480 ; N quotedblbase ; B 70 -141 410 133 ;
+C 186 ; WX 480 ; N quotedblright ; B 70 466 410 740 ;
+C 187 ; WX 460 ; N guillemotright ; B 61 108 400 469 ;
+C 188 ; WX 1000 ; N ellipsis ; B 100 0 899 133 ;
+C 189 ; WX 1280 ; N perthousand ; B 36 -15 1222 755 ;
+C 191 ; WX 560 ; N questiondown ; B 68 -200 521 555 ;
+C 193 ; WX 420 ; N grave ; B 50 624 329 851 ;
+C 194 ; WX 420 ; N acute ; B 91 624 370 849 ;
+C 195 ; WX 540 ; N circumflex ; B 71 636 470 774 ;
+C 196 ; WX 480 ; N tilde ; B 44 636 437 767 ;
+C 197 ; WX 420 ; N macron ; B 72 648 349 759 ;
+C 198 ; WX 480 ; N breve ; B 42 633 439 770 ;
+C 199 ; WX 280 ; N dotaccent ; B 74 636 207 769 ;
+C 200 ; WX 500 ; N dieresis ; B 78 636 422 769 ;
+C 202 ; WX 360 ; N ring ; B 73 619 288 834 ;
+C 203 ; WX 340 ; N cedilla ; B 98 -251 298 6 ;
+C 205 ; WX 700 ; N hungarumlaut ; B 132 610 609 862 ;
+C 206 ; WX 340 ; N ogonek ; B 79 -195 262 9 ;
+C 207 ; WX 540 ; N caron ; B 71 636 470 774 ;
+C 208 ; WX 1000 ; N emdash ; B 35 230 965 348 ;
+C 225 ; WX 900 ; N AE ; B -5 0 824 740 ;
+C 227 ; WX 360 ; N ordfeminine ; B 19 438 334 755 ;
+C 232 ; WX 480 ; N Lslash ; B 26 0 460 740 ;
+C 233 ; WX 840 ; N Oslash ; B 33 -71 807 814 ;
+C 234 ; WX 1060 ; N OE ; B 37 -15 1007 755 ;
+C 235 ; WX 360 ; N ordmasculine ; B 23 438 338 755 ;
+C 241 ; WX 1080 ; N ae ; B 29 -18 1048 574 ;
+C 245 ; WX 240 ; N dotlessi ; B 53 0 186 555 ;
+C 248 ; WX 320 ; N lslash ; B 34 0 305 740 ;
+C 249 ; WX 660 ; N oslash ; B 35 -50 625 608 ;
+C 250 ; WX 1080 ; N oe ; B 30 -18 1050 574 ;
+C 251 ; WX 600 ; N germandbls ; B 51 -18 585 755 ;
+C -1 ; WX 640 ; N ecircumflex ; B 31 -18 610 774 ;
+C -1 ; WX 640 ; N edieresis ; B 31 -18 610 769 ;
+C -1 ; WX 660 ; N aacute ; B 27 -18 613 849 ;
+C -1 ; WX 740 ; N registered ; B -12 -12 752 752 ;
+C -1 ; WX 240 ; N icircumflex ; B -79 0 320 774 ;
+C -1 ; WX 600 ; N udieresis ; B 50 -18 544 769 ;
+C -1 ; WX 640 ; N ograve ; B 25 -18 615 851 ;
+C -1 ; WX 600 ; N uacute ; B 50 -18 544 849 ;
+C -1 ; WX 600 ; N ucircumflex ; B 50 -18 544 774 ;
+C -1 ; WX 740 ; N Aacute ; B 7 0 732 1019 ;
+C -1 ; WX 240 ; N igrave ; B -65 0 214 851 ;
+C -1 ; WX 280 ; N Icircumflex ; B -59 0 340 944 ;
+C -1 ; WX 640 ; N ccedilla ; B 37 -251 610 574 ;
+C -1 ; WX 660 ; N adieresis ; B 27 -18 613 769 ;
+C -1 ; WX 520 ; N Ecircumflex ; B 61 0 460 944 ;
+C -1 ; WX 440 ; N scaron ; B 19 -18 421 774 ;
+C -1 ; WX 660 ; N thorn ; B 47 -185 629 740 ;
+C -1 ; WX 1000 ; N trademark ; B 9 296 821 740 ;
+C -1 ; WX 640 ; N egrave ; B 31 -18 610 851 ;
+C -1 ; WX 336 ; N threesuperior ; B 8 287 328 749 ;
+C -1 ; WX 460 ; N zcaron ; B 20 0 455 774 ;
+C -1 ; WX 660 ; N atilde ; B 27 -18 613 767 ;
+C -1 ; WX 660 ; N aring ; B 27 -18 613 834 ;
+C -1 ; WX 640 ; N ocircumflex ; B 25 -18 615 774 ;
+C -1 ; WX 520 ; N Edieresis ; B 61 0 459 939 ;
+C -1 ; WX 840 ; N threequarters ; B 18 0 803 749 ;
+C -1 ; WX 580 ; N ydieresis ; B 8 -185 571 769 ;
+C -1 ; WX 580 ; N yacute ; B 8 -185 571 849 ;
+C -1 ; WX 240 ; N iacute ; B 26 0 305 849 ;
+C -1 ; WX 740 ; N Acircumflex ; B 7 0 732 944 ;
+C -1 ; WX 640 ; N Uacute ; B 55 -15 585 1019 ;
+C -1 ; WX 640 ; N eacute ; B 31 -18 610 849 ;
+C -1 ; WX 840 ; N Ograve ; B 33 -15 807 1021 ;
+C -1 ; WX 660 ; N agrave ; B 27 -18 613 851 ;
+C -1 ; WX 640 ; N Udieresis ; B 55 -15 585 939 ;
+C -1 ; WX 660 ; N acircumflex ; B 27 -18 613 774 ;
+C -1 ; WX 280 ; N Igrave ; B -45 0 234 1021 ;
+C -1 ; WX 336 ; N twosuperior ; B 13 296 322 749 ;
+C -1 ; WX 640 ; N Ugrave ; B 55 -15 585 1021 ;
+C -1 ; WX 840 ; N onequarter ; B 92 0 746 740 ;
+C -1 ; WX 640 ; N Ucircumflex ; B 55 -15 585 944 ;
+C -1 ; WX 520 ; N Scaron ; B 12 -15 493 944 ;
+C -1 ; WX 280 ; N Idieresis ; B -32 0 312 939 ;
+C -1 ; WX 240 ; N idieresis ; B -52 0 292 769 ;
+C -1 ; WX 520 ; N Egrave ; B 61 0 459 1021 ;
+C -1 ; WX 840 ; N Oacute ; B 33 -15 807 1019 ;
+C -1 ; WX 600 ; N divide ; B 48 -20 552 526 ;
+C -1 ; WX 740 ; N Atilde ; B 7 0 732 937 ;
+C -1 ; WX 740 ; N Aring ; B 7 0 732 969 ;
+C -1 ; WX 840 ; N Odieresis ; B 33 -15 807 939 ;
+C -1 ; WX 740 ; N Adieresis ; B 7 0 732 939 ;
+C -1 ; WX 740 ; N Ntilde ; B 70 0 671 937 ;
+C -1 ; WX 500 ; N Zcaron ; B 19 0 481 944 ;
+C -1 ; WX 560 ; N Thorn ; B 72 0 545 740 ;
+C -1 ; WX 280 ; N Iacute ; B 46 0 325 1019 ;
+C -1 ; WX 600 ; N plusminus ; B 48 -62 552 556 ;
+C -1 ; WX 600 ; N multiply ; B 59 12 541 494 ;
+C -1 ; WX 520 ; N Eacute ; B 61 0 459 1019 ;
+C -1 ; WX 620 ; N Ydieresis ; B -2 0 622 939 ;
+C -1 ; WX 336 ; N onesuperior ; B 72 296 223 740 ;
+C -1 ; WX 600 ; N ugrave ; B 50 -18 544 851 ;
+C -1 ; WX 600 ; N logicalnot ; B 48 108 552 425 ;
+C -1 ; WX 600 ; N ntilde ; B 54 0 547 767 ;
+C -1 ; WX 840 ; N Otilde ; B 33 -15 807 937 ;
+C -1 ; WX 640 ; N otilde ; B 25 -18 615 767 ;
+C -1 ; WX 780 ; N Ccedilla ; B 34 -251 766 755 ;
+C -1 ; WX 740 ; N Agrave ; B 7 0 732 1021 ;
+C -1 ; WX 840 ; N onehalf ; B 62 0 771 740 ;
+C -1 ; WX 742 ; N Eth ; B 25 0 691 740 ;
+C -1 ; WX 400 ; N degree ; B 57 426 343 712 ;
+C -1 ; WX 620 ; N Yacute ; B -2 0 622 1019 ;
+C -1 ; WX 840 ; N Ocircumflex ; B 33 -15 807 944 ;
+C -1 ; WX 640 ; N oacute ; B 25 -18 615 849 ;
+C -1 ; WX 576 ; N mu ; B 38 -187 539 555 ;
+C -1 ; WX 600 ; N minus ; B 48 193 552 313 ;
+C -1 ; WX 640 ; N eth ; B 27 -18 616 754 ;
+C -1 ; WX 640 ; N odieresis ; B 25 -18 615 769 ;
+C -1 ; WX 740 ; N copyright ; B -12 -12 752 752 ;
+C -1 ; WX 600 ; N brokenbar ; B 233 -100 366 740 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 218
+
+KPX A y -50
+KPX A w -65
+KPX A v -70
+KPX A u -20
+KPX A quoteright -90
+KPX A Y -80
+KPX A W -60
+KPX A V -102
+KPX A U -40
+KPX A T -25
+KPX A Q -50
+KPX A O -50
+KPX A G -40
+KPX A C -40
+
+KPX B A -10
+
+KPX C A -40
+
+KPX D period -20
+KPX D comma -20
+KPX D Y -45
+KPX D W -25
+KPX D V -50
+KPX D A -50
+
+KPX F period -129
+KPX F e -20
+KPX F comma -162
+KPX F a -20
+KPX F A -75
+
+KPX G period -20
+KPX G comma -20
+KPX G Y -15
+
+KPX J period -15
+KPX J a -20
+KPX J A -30
+
+KPX K y -20
+KPX K u -15
+KPX K o -45
+KPX K e -40
+KPX K O -30
+
+KPX L y -23
+KPX L quoteright -30
+KPX L quotedblright -30
+KPX L Y -80
+KPX L W -55
+KPX L V -85
+KPX L T -46
+
+KPX O period -30
+KPX O comma -30
+KPX O Y -30
+KPX O X -30
+KPX O W -20
+KPX O V -45
+KPX O T -15
+KPX O A -60
+
+KPX P period -200
+KPX P o -20
+KPX P e -20
+KPX P comma -220
+KPX P a -20
+KPX P A -100
+
+KPX Q comma 20
+
+KPX R W 25
+KPX R V -10
+KPX R U 25
+KPX R T 40
+KPX R O 25
+
+KPX S comma 20
+
+KPX T y -10
+KPX T w -55
+KPX T u -46
+KPX T semicolon -29
+KPX T r -30
+KPX T period -91
+KPX T o -49
+KPX T hyphen -75
+KPX T e -49
+KPX T comma -82
+KPX T colon -15
+KPX T a -70
+KPX T O -15
+KPX T A -25
+
+KPX U period -20
+KPX U comma -20
+KPX U A -40
+
+KPX V u -55
+KPX V semicolon -33
+KPX V period -145
+KPX V o -101
+KPX V i -15
+KPX V hyphen -75
+KPX V e -101
+KPX V comma -145
+KPX V colon -18
+KPX V a -95
+KPX V O -45
+KPX V G -20
+KPX V A -102
+
+KPX W y -15
+KPX W u -30
+KPX W semicolon -33
+KPX W period -106
+KPX W o -46
+KPX W i -10
+KPX W hyphen -35
+KPX W e -47
+KPX W comma -106
+KPX W colon -15
+KPX W a -50
+KPX W O -20
+KPX W A -58
+
+KPX Y u -52
+KPX Y semicolon -23
+KPX Y period -145
+KPX Y o -89
+KPX Y hyphen -100
+KPX Y e -89
+KPX Y comma -145
+KPX Y colon -10
+KPX Y a -93
+KPX Y O -30
+KPX Y A -80
+
+KPX a t 5
+KPX a p 20
+KPX a b 5
+
+KPX b y -20
+KPX b v -20
+
+KPX c y -20
+KPX c l -15
+KPX c k -15
+
+KPX comma space -50
+KPX comma quoteright -70
+KPX comma quotedblright -70
+
+KPX e y -20
+KPX e x -20
+KPX e w -20
+KPX e v -20
+
+KPX f period -40
+KPX f o -20
+KPX f l -15
+KPX f i -15
+KPX f f -20
+KPX f dotlessi -15
+KPX f comma -40
+KPX f a -15
+
+KPX g i 25
+KPX g a 15
+
+KPX h y -30
+
+KPX k y -5
+KPX k o -30
+KPX k e -40
+
+KPX m y -20
+KPX m u -20
+
+KPX n y -15
+KPX n v -30
+
+KPX o y -20
+KPX o x -30
+KPX o w -20
+KPX o v -30
+
+KPX p y -20
+
+KPX period space -50
+KPX period quoteright -70
+KPX period quotedblright -70
+
+KPX quotedblleft A -50
+
+KPX quotedblright space -50
+
+KPX quoteleft quoteleft -80
+KPX quoteleft A -50
+
+KPX quoteright v -10
+KPX quoteright t 10
+KPX quoteright space -50
+KPX quoteright s -15
+KPX quoteright r -20
+KPX quoteright quoteright -80
+KPX quoteright d -50
+
+KPX r y 40
+KPX r v 40
+KPX r u 20
+KPX r t 20
+KPX r s 20
+KPX r q -8
+KPX r period -73
+KPX r p 20
+KPX r o -15
+KPX r n 21
+KPX r m 15
+KPX r l 20
+KPX r k 5
+KPX r i 20
+KPX r hyphen -60
+KPX r g 1
+KPX r e -4
+KPX r d -6
+KPX r comma -75
+KPX r c -7
+
+KPX s period 20
+KPX s comma 20
+
+KPX space quoteleft -50
+KPX space quotedblleft -50
+KPX space Y -60
+KPX space W -25
+KPX space V -80
+KPX space T -25
+KPX space A -20
+
+KPX v period -90
+KPX v o -20
+KPX v e -20
+KPX v comma -90
+KPX v a -30
+
+KPX w period -90
+KPX w o -30
+KPX w e -20
+KPX w comma -90
+KPX w a -30
+
+KPX x e -20
+
+KPX y period -100
+KPX y o -30
+KPX y e -20
+KPX y comma -100
+KPX y c -35
+KPX y a -30
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 160 170 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 100 170 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 120 170 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 160 170 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 190 135 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 130 170 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 50 170 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex -10 170 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 10 170 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 50 170 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -45 170 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -130 170 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -110 170 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -95 170 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 130 170 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 210 170 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 150 170 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 170 170 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 210 170 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 180 170 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron -10 170 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 145 170 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 50 170 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 70 170 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 75 170 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 135 170 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 60 170 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 5 170 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 120 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 60 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 80 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 120 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 150 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 90 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 110 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 50 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 70 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 110 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -65 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -150 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -130 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -115 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 60 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 110 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 50 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 70 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 110 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 80 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron -50 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 125 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 30 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 50 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 55 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 115 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 40 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron -15 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-DmO b/font/AG-DmO
new file mode 100644
index 0000000..c348b11
--- /dev/null
+++ b/font/AG-DmO
@@ -0,0 +1,576 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Mar  4 13:49:44 1991
+Comment UniqueID 34373
+Comment VMusage 6550 39938
+FontName AvantGarde-DemiOblique
+FullName ITC Avant Garde Gothic Demi Oblique
+FamilyName ITC Avant Garde Gothic
+Weight Demi
+ItalicAngle -10.5
+IsFixedPitch false
+FontBBox -123 -251 1256 1021
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.ITC Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 740
+XHeight 555
+Ascender 740
+Descender -185
+StartCharMetrics 228
+C 32 ; WX 280 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 280 ; N exclam ; B 73 0 343 740 ;
+C 34 ; WX 360 ; N quotedbl ; B 127 444 478 740 ;
+C 35 ; WX 560 ; N numbersign ; B 66 0 618 700 ;
+C 36 ; WX 560 ; N dollar ; B 99 -86 582 857 ;
+C 37 ; WX 860 ; N percent ; B 139 -15 856 755 ;
+C 38 ; WX 680 ; N ampersand ; B 71 -15 742 755 ;
+C 39 ; WX 280 ; N quoteright ; B 159 466 342 740 ;
+C 40 ; WX 380 ; N parenleft ; B 120 -157 490 754 ;
+C 41 ; WX 380 ; N parenright ; B 8 -157 378 754 ;
+C 42 ; WX 440 ; N asterisk ; B 174 457 492 755 ;
+C 43 ; WX 600 ; N plus ; B 84 0 610 506 ;
+C 44 ; WX 280 ; N comma ; B 48 -141 231 133 ;
+C 45 ; WX 420 ; N hyphen ; B 114 230 413 348 ;
+C 46 ; WX 280 ; N period ; B 73 0 231 133 ;
+C 47 ; WX 460 ; N slash ; B -13 -100 591 740 ;
+C 48 ; WX 560 ; N zero ; B 70 -15 628 755 ;
+C 49 ; WX 560 ; N one ; B 230 0 500 740 ;
+C 50 ; WX 560 ; N two ; B 44 0 622 755 ;
+C 51 ; WX 560 ; N three ; B 67 -15 585 755 ;
+C 52 ; WX 560 ; N four ; B 36 0 604 740 ;
+C 53 ; WX 560 ; N five ; B 64 -15 600 740 ;
+C 54 ; WX 560 ; N six ; B 64 -15 587 739 ;
+C 55 ; WX 560 ; N seven ; B 83 0 635 740 ;
+C 56 ; WX 560 ; N eight ; B 71 -15 590 755 ;
+C 57 ; WX 560 ; N nine ; B 110 0 633 754 ;
+C 58 ; WX 280 ; N colon ; B 73 0 309 555 ;
+C 59 ; WX 280 ; N semicolon ; B 48 -141 309 555 ;
+C 60 ; WX 600 ; N less ; B 84 -8 649 514 ;
+C 61 ; WX 600 ; N equal ; B 63 81 631 425 ;
+C 62 ; WX 600 ; N greater ; B 45 -8 610 514 ;
+C 63 ; WX 560 ; N question ; B 135 0 593 755 ;
+C 64 ; WX 740 ; N at ; B 109 -12 832 712 ;
+C 65 ; WX 740 ; N A ; B 7 0 732 740 ;
+C 66 ; WX 580 ; N B ; B 70 0 610 740 ;
+C 67 ; WX 780 ; N C ; B 97 -15 864 755 ;
+C 68 ; WX 700 ; N D ; B 63 0 732 740 ;
+C 69 ; WX 520 ; N E ; B 61 0 596 740 ;
+C 70 ; WX 480 ; N F ; B 61 0 575 740 ;
+C 71 ; WX 840 ; N G ; B 89 -15 887 755 ;
+C 72 ; WX 680 ; N H ; B 71 0 747 740 ;
+C 73 ; WX 280 ; N I ; B 72 0 346 740 ;
+C 74 ; WX 480 ; N J ; B 34 -15 546 740 ;
+C 75 ; WX 620 ; N K ; B 89 0 757 740 ;
+C 76 ; WX 440 ; N L ; B 72 0 459 740 ;
+C 77 ; WX 900 ; N M ; B 63 0 974 740 ;
+C 78 ; WX 740 ; N N ; B 70 0 808 740 ;
+C 79 ; WX 840 ; N O ; B 95 -15 882 755 ;
+C 80 ; WX 560 ; N P ; B 72 0 645 740 ;
+C 81 ; WX 840 ; N Q ; B 94 -15 882 755 ;
+C 82 ; WX 580 ; N R ; B 64 0 656 740 ;
+C 83 ; WX 520 ; N S ; B 49 -15 578 755 ;
+C 84 ; WX 420 ; N T ; B 119 0 555 740 ;
+C 85 ; WX 640 ; N U ; B 97 -15 722 740 ;
+C 86 ; WX 700 ; N V ; B 145 0 832 740 ;
+C 87 ; WX 900 ; N W ; B 144 0 1036 740 ;
+C 88 ; WX 680 ; N X ; B 4 0 813 740 ;
+C 89 ; WX 620 ; N Y ; B 135 0 759 740 ;
+C 90 ; WX 500 ; N Z ; B 19 0 599 740 ;
+C 91 ; WX 320 ; N bracketleft ; B 89 -157 424 754 ;
+C 92 ; WX 640 ; N backslash ; B 233 -100 525 740 ;
+C 93 ; WX 320 ; N bracketright ; B 7 -157 342 754 ;
+C 94 ; WX 600 ; N asciicircum ; B 142 375 596 740 ;
+C 95 ; WX 500 ; N underscore ; B -23 -125 486 -75 ;
+C 96 ; WX 280 ; N quoteleft ; B 158 466 341 740 ;
+C 97 ; WX 660 ; N a ; B 73 -18 716 574 ;
+C 98 ; WX 660 ; N b ; B 47 -18 689 740 ;
+C 99 ; WX 640 ; N c ; B 84 -18 679 574 ;
+C 100 ; WX 660 ; N d ; B 80 -18 755 740 ;
+C 101 ; WX 640 ; N e ; B 77 -18 667 577 ;
+C 102 ; WX 280 ; N f ; B 62 0 420 755 ; L i fi ; L l fl ;
+C 103 ; WX 660 ; N g ; B 33 -226 726 574 ;
+C 104 ; WX 600 ; N h ; B 54 0 614 740 ;
+C 105 ; WX 240 ; N i ; B 53 0 323 740 ;
+C 106 ; WX 260 ; N j ; B -18 -185 342 740 ;
+C 107 ; WX 580 ; N k ; B 80 0 648 740 ;
+C 108 ; WX 240 ; N l ; B 54 0 324 740 ;
+C 109 ; WX 940 ; N m ; B 54 0 954 574 ;
+C 110 ; WX 600 ; N n ; B 54 0 613 574 ;
+C 111 ; WX 640 ; N o ; B 71 -18 672 574 ;
+C 112 ; WX 660 ; N p ; B 13 -185 686 574 ;
+C 113 ; WX 660 ; N q ; B 78 -185 716 574 ;
+C 114 ; WX 320 ; N r ; B 63 0 423 574 ;
+C 115 ; WX 440 ; N s ; B 49 -18 483 574 ;
+C 116 ; WX 300 ; N t ; B 86 0 402 740 ;
+C 117 ; WX 600 ; N u ; B 87 -18 647 555 ;
+C 118 ; WX 560 ; N v ; B 106 0 659 555 ;
+C 119 ; WX 800 ; N w ; B 114 0 892 555 ;
+C 120 ; WX 560 ; N x ; B 3 0 632 555 ;
+C 121 ; WX 580 ; N y ; B 75 -185 674 555 ;
+C 122 ; WX 460 ; N z ; B 20 0 528 555 ;
+C 123 ; WX 340 ; N braceleft ; B 40 -191 455 747 ;
+C 124 ; WX 600 ; N bar ; B 214 -100 503 740 ;
+C 125 ; WX 340 ; N braceright ; B -12 -191 405 747 ;
+C 126 ; WX 600 ; N asciitilde ; B 114 160 579 347 ;
+C 161 ; WX 280 ; N exclamdown ; B 40 -185 310 555 ;
+C 162 ; WX 560 ; N cent ; B 110 39 599 715 ;
+C 163 ; WX 560 ; N sterling ; B 38 0 615 755 ;
+C 164 ; WX 160 ; N fraction ; B -123 0 419 740 ;
+C 165 ; WX 560 ; N yen ; B 83 0 707 740 ;
+C 166 ; WX 560 ; N florin ; B -27 -151 664 824 ;
+C 167 ; WX 560 ; N section ; B 65 -158 602 755 ;
+C 168 ; WX 560 ; N currency ; B 53 69 628 577 ;
+C 169 ; WX 220 ; N quotesingle ; B 152 444 314 740 ;
+C 170 ; WX 480 ; N quotedblleft ; B 156 466 546 740 ;
+C 171 ; WX 460 ; N guillemotleft ; B 105 108 487 469 ;
+C 172 ; WX 240 ; N guilsinglleft ; B 94 108 277 469 ;
+C 173 ; WX 240 ; N guilsinglright ; B 70 108 253 469 ;
+C 174 ; WX 520 ; N fi ; B 72 0 598 755 ;
+C 175 ; WX 520 ; N fl ; B 72 0 598 755 ;
+C 177 ; WX 500 ; N endash ; B 78 230 529 348 ;
+C 178 ; WX 560 ; N dagger ; B 133 -142 612 740 ;
+C 179 ; WX 560 ; N daggerdbl ; B 63 -142 618 740 ;
+C 180 ; WX 280 ; N periodcentered ; B 108 187 265 320 ;
+C 182 ; WX 600 ; N paragraph ; B 90 -103 744 740 ;
+C 183 ; WX 600 ; N bullet ; B 215 222 526 532 ;
+C 184 ; WX 280 ; N quotesinglbase ; B 47 -141 230 133 ;
+C 185 ; WX 480 ; N quotedblbase ; B 45 -141 435 133 ;
+C 186 ; WX 480 ; N quotedblright ; B 157 466 547 740 ;
+C 187 ; WX 460 ; N guillemotright ; B 81 108 463 469 ;
+C 188 ; WX 1000 ; N ellipsis ; B 100 0 924 133 ;
+C 189 ; WX 1280 ; N perthousand ; B 139 -15 1256 755 ;
+C 191 ; WX 560 ; N questiondown ; B 69 -200 527 555 ;
+C 193 ; WX 420 ; N grave ; B 189 624 462 851 ;
+C 194 ; WX 420 ; N acute ; B 224 624 508 849 ;
+C 195 ; WX 540 ; N circumflex ; B 189 636 588 774 ;
+C 196 ; WX 480 ; N tilde ; B 178 636 564 767 ;
+C 197 ; WX 420 ; N macron ; B 192 648 490 759 ;
+C 198 ; WX 480 ; N breve ; B 185 633 582 770 ;
+C 199 ; WX 280 ; N dotaccent ; B 192 636 350 769 ;
+C 200 ; WX 500 ; N dieresis ; B 196 636 565 769 ;
+C 202 ; WX 360 ; N ring ; B 206 619 424 834 ;
+C 203 ; WX 340 ; N cedilla ; B 67 -251 272 6 ;
+C 205 ; WX 700 ; N hungarumlaut ; B 258 610 754 862 ;
+C 206 ; WX 340 ; N ogonek ; B 59 -195 243 9 ;
+C 207 ; WX 540 ; N caron ; B 214 636 613 774 ;
+C 208 ; WX 1000 ; N emdash ; B 78 230 1029 348 ;
+C 225 ; WX 900 ; N AE ; B -5 0 961 740 ;
+C 227 ; WX 360 ; N ordfeminine ; B 127 438 472 755 ;
+C 232 ; WX 480 ; N Lslash ; B 68 0 484 740 ;
+C 233 ; WX 840 ; N Oslash ; B 94 -71 891 814 ;
+C 234 ; WX 1060 ; N OE ; B 98 -15 1144 755 ;
+C 235 ; WX 360 ; N ordmasculine ; B 131 438 451 755 ;
+C 241 ; WX 1080 ; N ae ; B 75 -18 1105 574 ;
+C 245 ; WX 240 ; N dotlessi ; B 53 0 289 555 ;
+C 248 ; WX 320 ; N lslash ; B 74 0 404 740 ;
+C 249 ; WX 660 ; N oslash ; B 81 -50 685 608 ;
+C 250 ; WX 1080 ; N oe ; B 76 -18 1108 574 ;
+C 251 ; WX 600 ; N germandbls ; B 51 -18 629 755 ;
+C -1 ; WX 640 ; N ecircumflex ; B 77 -18 667 774 ;
+C -1 ; WX 640 ; N edieresis ; B 77 -18 667 769 ;
+C -1 ; WX 660 ; N aacute ; B 73 -18 716 849 ;
+C -1 ; WX 740 ; N registered ; B 50 -12 827 752 ;
+C -1 ; WX 240 ; N icircumflex ; B 39 0 438 774 ;
+C -1 ; WX 600 ; N udieresis ; B 87 -18 647 769 ;
+C -1 ; WX 640 ; N ograve ; B 71 -18 672 851 ;
+C -1 ; WX 600 ; N uacute ; B 87 -18 647 849 ;
+C -1 ; WX 600 ; N ucircumflex ; B 87 -18 647 774 ;
+C -1 ; WX 740 ; N Aacute ; B 7 0 732 1019 ;
+C -1 ; WX 240 ; N igrave ; B 53 0 347 851 ;
+C -1 ; WX 280 ; N Icircumflex ; B 72 0 489 944 ;
+C -1 ; WX 640 ; N ccedilla ; B 83 -251 679 574 ;
+C -1 ; WX 660 ; N adieresis ; B 73 -18 716 769 ;
+C -1 ; WX 520 ; N Ecircumflex ; B 61 0 609 944 ;
+C -1 ; WX 440 ; N scaron ; B 49 -18 563 774 ;
+C -1 ; WX 660 ; N thorn ; B 13 -185 686 740 ;
+C -1 ; WX 1000 ; N trademark ; B 131 296 958 740 ;
+C -1 ; WX 640 ; N egrave ; B 77 -18 667 851 ;
+C -1 ; WX 336 ; N threesuperior ; B 87 287 413 749 ;
+C -1 ; WX 460 ; N zcaron ; B 20 0 598 774 ;
+C -1 ; WX 660 ; N atilde ; B 73 -18 716 767 ;
+C -1 ; WX 660 ; N aring ; B 73 -18 716 834 ;
+C -1 ; WX 640 ; N ocircumflex ; B 71 -18 672 774 ;
+C -1 ; WX 520 ; N Edieresis ; B 61 0 606 939 ;
+C -1 ; WX 840 ; N threequarters ; B 97 0 836 749 ;
+C -1 ; WX 580 ; N ydieresis ; B 75 -185 674 769 ;
+C -1 ; WX 580 ; N yacute ; B 75 -185 674 849 ;
+C -1 ; WX 240 ; N iacute ; B 53 0 443 849 ;
+C -1 ; WX 740 ; N Acircumflex ; B 7 0 732 944 ;
+C -1 ; WX 640 ; N Uacute ; B 97 -15 722 1019 ;
+C -1 ; WX 640 ; N eacute ; B 77 -18 667 849 ;
+C -1 ; WX 840 ; N Ograve ; B 95 -15 882 1021 ;
+C -1 ; WX 660 ; N agrave ; B 73 -18 716 851 ;
+C -1 ; WX 640 ; N Udieresis ; B 97 -15 722 939 ;
+C -1 ; WX 660 ; N acircumflex ; B 73 -18 716 774 ;
+C -1 ; WX 280 ; N Igrave ; B 72 0 398 1021 ;
+C -1 ; WX 336 ; N twosuperior ; B 73 296 436 749 ;
+C -1 ; WX 640 ; N Ugrave ; B 97 -15 722 1021 ;
+C -1 ; WX 840 ; N onequarter ; B 187 0 779 740 ;
+C -1 ; WX 640 ; N Ucircumflex ; B 97 -15 722 944 ;
+C -1 ; WX 520 ; N Scaron ; B 49 -15 635 944 ;
+C -1 ; WX 280 ; N Idieresis ; B 72 0 486 939 ;
+C -1 ; WX 240 ; N idieresis ; B 53 0 435 769 ;
+C -1 ; WX 520 ; N Egrave ; B 61 0 596 1021 ;
+C -1 ; WX 840 ; N Oacute ; B 95 -15 882 1019 ;
+C -1 ; WX 600 ; N divide ; B 84 -20 610 526 ;
+C -1 ; WX 740 ; N Atilde ; B 7 0 732 937 ;
+C -1 ; WX 740 ; N Aring ; B 7 0 732 969 ;
+C -1 ; WX 840 ; N Odieresis ; B 95 -15 882 939 ;
+C -1 ; WX 740 ; N Adieresis ; B 7 0 732 939 ;
+C -1 ; WX 740 ; N Ntilde ; B 70 0 808 937 ;
+C -1 ; WX 500 ; N Zcaron ; B 19 0 650 944 ;
+C -1 ; WX 560 ; N Thorn ; B 72 0 619 740 ;
+C -1 ; WX 280 ; N Iacute ; B 72 0 494 1019 ;
+C -1 ; WX 600 ; N plusminus ; B 37 -62 626 556 ;
+C -1 ; WX 600 ; N multiply ; B 76 12 617 494 ;
+C -1 ; WX 520 ; N Eacute ; B 61 0 596 1019 ;
+C -1 ; WX 620 ; N Ydieresis ; B 135 0 759 939 ;
+C -1 ; WX 336 ; N onesuperior ; B 182 296 360 740 ;
+C -1 ; WX 600 ; N ugrave ; B 87 -18 647 851 ;
+C -1 ; WX 600 ; N logicalnot ; B 105 108 631 425 ;
+C -1 ; WX 600 ; N ntilde ; B 54 0 624 767 ;
+C -1 ; WX 840 ; N Otilde ; B 95 -15 882 937 ;
+C -1 ; WX 640 ; N otilde ; B 71 -18 672 767 ;
+C -1 ; WX 780 ; N Ccedilla ; B 97 -251 864 755 ;
+C -1 ; WX 740 ; N Agrave ; B 7 0 732 1021 ;
+C -1 ; WX 840 ; N onehalf ; B 157 0 830 740 ;
+C -1 ; WX 742 ; N Eth ; B 83 0 766 740 ;
+C -1 ; WX 400 ; N degree ; B 160 426 451 712 ;
+C -1 ; WX 620 ; N Yacute ; B 135 0 759 1019 ;
+C -1 ; WX 840 ; N Ocircumflex ; B 95 -15 882 944 ;
+C -1 ; WX 640 ; N oacute ; B 71 -18 672 849 ;
+C -1 ; WX 576 ; N mu ; B 3 -187 642 555 ;
+C -1 ; WX 600 ; N minus ; B 84 193 610 313 ;
+C -1 ; WX 640 ; N eth ; B 73 -18 699 754 ;
+C -1 ; WX 640 ; N odieresis ; B 71 -18 672 769 ;
+C -1 ; WX 740 ; N copyright ; B 50 -12 827 752 ;
+C -1 ; WX 600 ; N brokenbar ; B 214 -100 503 740 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 218
+
+KPX A y -50
+KPX A w -65
+KPX A v -70
+KPX A u -20
+KPX A quoteright -90
+KPX A Y -80
+KPX A W -60
+KPX A V -102
+KPX A U -40
+KPX A T -25
+KPX A Q -50
+KPX A O -50
+KPX A G -40
+KPX A C -40
+
+KPX B A -10
+
+KPX C A -40
+
+KPX D period -20
+KPX D comma -20
+KPX D Y -45
+KPX D W -25
+KPX D V -50
+KPX D A -50
+
+KPX F period -129
+KPX F e -20
+KPX F comma -162
+KPX F a -20
+KPX F A -75
+
+KPX G period -20
+KPX G comma -20
+KPX G Y -15
+
+KPX J period -15
+KPX J a -20
+KPX J A -30
+
+KPX K y -20
+KPX K u -15
+KPX K o -45
+KPX K e -40
+KPX K O -30
+
+KPX L y -23
+KPX L quoteright -30
+KPX L quotedblright -30
+KPX L Y -80
+KPX L W -55
+KPX L V -85
+KPX L T -46
+
+KPX O period -30
+KPX O comma -30
+KPX O Y -30
+KPX O X -30
+KPX O W -20
+KPX O V -45
+KPX O T -15
+KPX O A -60
+
+KPX P period -200
+KPX P o -20
+KPX P e -20
+KPX P comma -220
+KPX P a -20
+KPX P A -100
+
+KPX Q comma 20
+
+KPX R W 25
+KPX R V -10
+KPX R U 25
+KPX R T 40
+KPX R O 25
+
+KPX S comma 20
+
+KPX T y -10
+KPX T w -55
+KPX T u -46
+KPX T semicolon -29
+KPX T r -30
+KPX T period -91
+KPX T o -49
+KPX T hyphen -75
+KPX T e -49
+KPX T comma -82
+KPX T colon -15
+KPX T a -70
+KPX T O -15
+KPX T A -25
+
+KPX U period -20
+KPX U comma -20
+KPX U A -40
+
+KPX V u -55
+KPX V semicolon -33
+KPX V period -145
+KPX V o -101
+KPX V i -15
+KPX V hyphen -75
+KPX V e -101
+KPX V comma -145
+KPX V colon -18
+KPX V a -95
+KPX V O -45
+KPX V G -20
+KPX V A -102
+
+KPX W y -15
+KPX W u -30
+KPX W semicolon -33
+KPX W period -106
+KPX W o -46
+KPX W i -10
+KPX W hyphen -35
+KPX W e -47
+KPX W comma -106
+KPX W colon -15
+KPX W a -50
+KPX W O -20
+KPX W A -58
+
+KPX Y u -52
+KPX Y semicolon -23
+KPX Y period -145
+KPX Y o -89
+KPX Y hyphen -100
+KPX Y e -89
+KPX Y comma -145
+KPX Y colon -10
+KPX Y a -93
+KPX Y O -30
+KPX Y A -80
+
+KPX a t 5
+KPX a p 20
+KPX a b 5
+
+KPX b y -20
+KPX b v -20
+
+KPX c y -20
+KPX c l -15
+KPX c k -15
+
+KPX comma space -50
+KPX comma quoteright -70
+KPX comma quotedblright -70
+
+KPX e y -20
+KPX e x -20
+KPX e w -20
+KPX e v -20
+
+KPX f period -40
+KPX f o -20
+KPX f l -15
+KPX f i -15
+KPX f f -20
+KPX f dotlessi -15
+KPX f comma -40
+KPX f a -15
+
+KPX g i 25
+KPX g a 15
+
+KPX h y -30
+
+KPX k y -5
+KPX k o -30
+KPX k e -40
+
+KPX m y -20
+KPX m u -20
+
+KPX n y -15
+KPX n v -30
+
+KPX o y -20
+KPX o x -30
+KPX o w -20
+KPX o v -30
+
+KPX p y -20
+
+KPX period space -50
+KPX period quoteright -70
+KPX period quotedblright -70
+
+KPX quotedblleft A -50
+
+KPX quotedblright space -50
+
+KPX quoteleft quoteleft -80
+KPX quoteleft A -50
+
+KPX quoteright v -10
+KPX quoteright t 10
+KPX quoteright space -50
+KPX quoteright s -15
+KPX quoteright r -20
+KPX quoteright quoteright -80
+KPX quoteright d -50
+
+KPX r y 40
+KPX r v 40
+KPX r u 20
+KPX r t 20
+KPX r s 20
+KPX r q -8
+KPX r period -73
+KPX r p 20
+KPX r o -15
+KPX r n 21
+KPX r m 15
+KPX r l 20
+KPX r k 5
+KPX r i 20
+KPX r hyphen -60
+KPX r g 1
+KPX r e -4
+KPX r d -6
+KPX r comma -75
+KPX r c -7
+
+KPX s period 20
+KPX s comma 20
+
+KPX space quoteleft -50
+KPX space quotedblleft -50
+KPX space Y -60
+KPX space W -25
+KPX space V -80
+KPX space T -25
+KPX space A -20
+
+KPX v period -90
+KPX v o -20
+KPX v e -20
+KPX v comma -90
+KPX v a -30
+
+KPX w period -90
+KPX w o -30
+KPX w e -20
+KPX w comma -90
+KPX w a -30
+
+KPX x e -20
+
+KPX y period -100
+KPX y o -30
+KPX y e -20
+KPX y comma -100
+KPX y c -35
+KPX y a -30
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 192 170 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 132 170 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 152 170 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 192 170 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 215 135 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 162 170 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 82 170 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 22 170 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 42 170 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 82 170 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -13 170 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -98 170 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -78 170 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -63 170 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 162 170 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 242 170 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 182 170 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 202 170 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 242 170 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 212 170 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 22 170 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 177 170 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 82 170 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 102 170 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 107 170 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 167 170 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 92 170 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 37 170 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 120 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 60 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 80 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 120 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 150 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 90 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 110 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 50 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 70 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 110 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -65 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -150 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -130 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -115 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 60 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 110 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 50 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 70 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 110 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 80 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron -50 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 125 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 30 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 50 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 55 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 115 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 40 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron -15 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-ExLt b/font/AG-ExLt
new file mode 100644
index 0000000..3532238
--- /dev/null
+++ b/font/AG-ExLt
@@ -0,0 +1,532 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Feb 19 17:51:09 1991
+Comment UniqueID 34220
+Comment VMusage 24528 31420
+FontName AvantGarde-ExtraLight
+FullName ITC Avant Garde Gothic Extra Light
+FamilyName ITC Avant Garde Gothic
+Weight ExtraLight
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -137 -274 1117 951
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.ITC Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 740
+XHeight 530
+Ascender 740
+Descender -213
+StartCharMetrics 228
+C 32 ; WX 277 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 259 ; N exclam ; B 115 0 145 740 ;
+C 34 ; WX 333 ; N quotedbl ; B 94 444 239 740 ;
+C 35 ; WX 555 ; N numbersign ; B 18 31 537 675 ;
+C 36 ; WX 555 ; N dollar ; B 83 -57 473 810 ;
+C 37 ; WX 719 ; N percent ; B 22 -13 697 753 ;
+C 38 ; WX 721 ; N ampersand ; B 55 -13 699 753 ;
+C 39 ; WX 277 ; N quoteright ; B 90 586 187 740 ;
+C 40 ; WX 425 ; N parenleft ; B 103 -274 393 753 ;
+C 41 ; WX 425 ; N parenright ; B 32 -274 322 753 ;
+C 42 ; WX 573 ; N asterisk ; B 151 444 423 740 ;
+C 43 ; WX 600 ; N plus ; B 50 0 550 501 ;
+C 44 ; WX 277 ; N comma ; B 61 -72 156 82 ;
+C 45 ; WX 266 ; N hyphen ; B 0 262 266 291 ;
+C 46 ; WX 277 ; N period ; B 124 0 154 81 ;
+C 47 ; WX 518 ; N slash ; B 67 -100 451 740 ;
+C 48 ; WX 555 ; N zero ; B 39 -13 515 753 ;
+C 49 ; WX 555 ; N one ; B 111 0 305 740 ;
+C 50 ; WX 555 ; N two ; B 57 0 504 753 ;
+C 51 ; WX 555 ; N three ; B 39 -13 492 753 ;
+C 52 ; WX 555 ; N four ; B 17 0 509 740 ;
+C 53 ; WX 555 ; N five ; B 21 -13 515 740 ;
+C 54 ; WX 555 ; N six ; B 33 -13 521 740 ;
+C 55 ; WX 555 ; N seven ; B 87 0 480 740 ;
+C 56 ; WX 555 ; N eight ; B 52 -13 502 753 ;
+C 57 ; WX 555 ; N nine ; B 34 0 522 753 ;
+C 58 ; WX 277 ; N colon ; B 124 0 154 530 ;
+C 59 ; WX 277 ; N semicolon ; B 61 -72 156 530 ;
+C 60 ; WX 600 ; N less ; B 50 0 550 502 ;
+C 61 ; WX 600 ; N equal ; B 50 139 550 361 ;
+C 62 ; WX 600 ; N greater ; B 50 0 550 502 ;
+C 63 ; WX 536 ; N question ; B 40 0 467 752 ;
+C 64 ; WX 796 ; N at ; B 41 -13 768 753 ;
+C 65 ; WX 687 ; N A ; B 7 0 680 740 ;
+C 66 ; WX 540 ; N B ; B 77 0 497 740 ;
+C 67 ; WX 786 ; N C ; B 41 -13 749 753 ;
+C 68 ; WX 701 ; N D ; B 77 0 659 740 ;
+C 69 ; WX 547 ; N E ; B 77 0 483 740 ;
+C 70 ; WX 477 ; N F ; B 77 0 440 740 ;
+C 71 ; WX 853 ; N G ; B 41 -13 819 753 ;
+C 72 ; WX 628 ; N H ; B 77 0 551 740 ;
+C 73 ; WX 185 ; N I ; B 77 0 107 740 ;
+C 74 ; WX 453 ; N J ; B 6 -13 377 740 ;
+C 75 ; WX 536 ; N K ; B 91 0 536 740 ;
+C 76 ; WX 423 ; N L ; B 77 0 420 740 ;
+C 77 ; WX 933 ; N M ; B 77 0 855 740 ;
+C 78 ; WX 738 ; N N ; B 77 0 661 740 ;
+C 79 ; WX 851 ; N O ; B 41 -13 809 753 ;
+C 80 ; WX 511 ; N P ; B 67 0 499 740 ;
+C 81 ; WX 882 ; N Q ; B 56 -13 885 753 ;
+C 82 ; WX 554 ; N R ; B 67 0 540 740 ;
+C 83 ; WX 518 ; N S ; B 45 -13 474 752 ;
+C 84 ; WX 443 ; N T ; B 5 0 437 740 ;
+C 85 ; WX 605 ; N U ; B 76 -13 529 740 ;
+C 86 ; WX 666 ; N V ; B 7 0 659 740 ;
+C 87 ; WX 888 ; N W ; B 12 0 876 740 ;
+C 88 ; WX 555 ; N X ; B 8 0 547 740 ;
+C 89 ; WX 554 ; N Y ; B 15 0 539 740 ;
+C 90 ; WX 499 ; N Z ; B 6 0 493 740 ;
+C 91 ; WX 425 ; N bracketleft ; B 178 -272 344 753 ;
+C 92 ; WX 518 ; N backslash ; B 67 -100 451 740 ;
+C 93 ; WX 425 ; N bracketright ; B 81 -272 247 753 ;
+C 94 ; WX 600 ; N asciicircum ; B 112 375 488 740 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 277 ; N quoteleft ; B 90 586 187 740 ;
+C 97 ; WX 674 ; N a ; B 41 -13 596 543 ;
+C 98 ; WX 674 ; N b ; B 78 -13 633 740 ;
+C 99 ; WX 619 ; N c ; B 41 -13 584 543 ;
+C 100 ; WX 677 ; N d ; B 41 -13 596 740 ;
+C 101 ; WX 619 ; N e ; B 31 -13 589 543 ;
+C 102 ; WX 263 ; N f ; B 7 0 260 753 ; L i fi ; L l fl ;
+C 103 ; WX 675 ; N g ; B 40 -226 598 543 ;
+C 104 ; WX 640 ; N h ; B 78 0 564 740 ;
+C 105 ; WX 184 ; N i ; B 78 0 106 740 ;
+C 106 ; WX 219 ; N j ; B -14 -213 123 740 ;
+C 107 ; WX 467 ; N k ; B 78 0 451 740 ;
+C 108 ; WX 183 ; N l ; B 78 0 106 740 ;
+C 109 ; WX 949 ; N m ; B 78 0 874 543 ;
+C 110 ; WX 641 ; N n ; B 78 0 564 543 ;
+C 111 ; WX 641 ; N o ; B 41 -13 599 543 ;
+C 112 ; WX 677 ; N p ; B 78 -213 633 543 ;
+C 113 ; WX 674 ; N q ; B 41 -213 596 543 ;
+C 114 ; WX 302 ; N r ; B 78 0 293 543 ;
+C 115 ; WX 426 ; N s ; B 48 -13 366 543 ;
+C 116 ; WX 296 ; N t ; B 7 0 288 740 ;
+C 117 ; WX 641 ; N u ; B 78 -13 564 530 ;
+C 118 ; WX 481 ; N v ; B 4 0 476 530 ;
+C 119 ; WX 758 ; N w ; B 10 0 749 530 ;
+C 120 ; WX 407 ; N x ; B 10 0 397 530 ;
+C 121 ; WX 481 ; N y ; B 11 -213 480 530 ;
+C 122 ; WX 407 ; N z ; B 12 0 394 530 ;
+C 123 ; WX 425 ; N braceleft ; B 115 -272 344 753 ;
+C 124 ; WX 555 ; N bar ; B 263 -100 293 740 ;
+C 125 ; WX 425 ; N braceright ; B 81 -272 310 753 ;
+C 126 ; WX 600 ; N asciitilde ; B 76 200 523 301 ;
+C 161 ; WX 259 ; N exclamdown ; B 115 -209 145 531 ;
+C 162 ; WX 555 ; N cent ; B 68 39 488 687 ;
+C 163 ; WX 555 ; N sterling ; B 6 0 545 752 ;
+C 164 ; WX 86 ; N fraction ; B -137 0 222 740 ;
+C 165 ; WX 555 ; N yen ; B 32 0 524 740 ;
+C 166 ; WX 555 ; N florin ; B 15 -152 542 813 ;
+C 167 ; WX 573 ; N section ; B 60 -223 513 753 ;
+C 168 ; WX 555 ; N currency ; B 39 105 515 579 ;
+C 169 ; WX 222 ; N quotesingle ; B 96 444 126 740 ;
+C 170 ; WX 370 ; N quotedblleft ; B 92 586 278 740 ;
+C 171 ; WX 351 ; N guillemotleft ; B 49 84 291 469 ;
+C 172 ; WX 248 ; N guilsinglleft ; B 53 84 184 469 ;
+C 173 ; WX 248 ; N guilsinglright ; B 64 84 195 469 ;
+C 174 ; WX 393 ; N fi ; B 7 0 315 753 ;
+C 175 ; WX 393 ; N fl ; B 7 0 315 753 ;
+C 177 ; WX 500 ; N endash ; B 35 262 465 291 ;
+C 178 ; WX 573 ; N dagger ; B 83 -100 491 740 ;
+C 179 ; WX 573 ; N daggerdbl ; B 83 -100 491 740 ;
+C 180 ; WX 277 ; N periodcentered ; B 124 215 154 296 ;
+C 182 ; WX 561 ; N paragraph ; B 12 -126 492 740 ;
+C 183 ; WX 375 ; N bullet ; B 35 222 340 532 ;
+C 184 ; WX 277 ; N quotesinglbase ; B 90 -72 187 82 ;
+C 185 ; WX 370 ; N quotedblbase ; B 92 -72 278 82 ;
+C 186 ; WX 370 ; N quotedblright ; B 92 586 278 740 ;
+C 187 ; WX 351 ; N guillemotright ; B 60 84 302 469 ;
+C 188 ; WX 1000 ; N ellipsis ; B 152 0 848 82 ;
+C 189 ; WX 1089 ; N perthousand ; B 20 -13 1070 753 ;
+C 191 ; WX 536 ; N questiondown ; B 69 -222 496 530 ;
+C 193 ; WX 555 ; N grave ; B 144 605 395 766 ;
+C 194 ; WX 555 ; N acute ; B 160 605 411 766 ;
+C 195 ; WX 555 ; N circumflex ; B 82 623 473 748 ;
+C 196 ; WX 555 ; N tilde ; B 96 633 458 714 ;
+C 197 ; WX 555 ; N macron ; B 99 660 455 690 ;
+C 198 ; WX 555 ; N breve ; B 86 634 469 716 ;
+C 199 ; WX 555 ; N dotaccent ; B 262 618 293 734 ;
+C 200 ; WX 555 ; N dieresis ; B 203 618 352 734 ;
+C 202 ; WX 555 ; N ring ; B 186 595 369 777 ;
+C 203 ; WX 555 ; N cedilla ; B 204 -201 351 0 ;
+C 205 ; WX 555 ; N hungarumlaut ; B 144 605 497 788 ;
+C 206 ; WX 555 ; N ogonek ; B 197 -206 357 0 ;
+C 207 ; WX 555 ; N caron ; B 82 623 473 748 ;
+C 208 ; WX 1000 ; N emdash ; B 35 262 965 291 ;
+C 225 ; WX 944 ; N AE ; B -8 0 870 740 ;
+C 227 ; WX 439 ; N ordfeminine ; B 26 404 388 753 ;
+C 232 ; WX 423 ; N Lslash ; B 0 0 424 740 ;
+C 233 ; WX 851 ; N Oslash ; B 41 -86 809 809 ;
+C 234 ; WX 1178 ; N OE ; B 41 -13 1117 753 ;
+C 235 ; WX 439 ; N ordmasculine ; B 44 404 395 753 ;
+C 241 ; WX 1154 ; N ae ; B 41 -13 1113 543 ;
+C 245 ; WX 184 ; N dotlessi ; B 78 0 106 530 ;
+C 248 ; WX 219 ; N lslash ; B 16 0 220 740 ;
+C 249 ; WX 641 ; N oslash ; B 41 -52 599 585 ;
+C 250 ; WX 1156 ; N oe ; B 41 -13 1116 543 ;
+C 251 ; WX 559 ; N germandbls ; B 76 -13 517 752 ;
+C -1 ; WX 619 ; N ecircumflex ; B 31 -13 589 748 ;
+C -1 ; WX 619 ; N edieresis ; B 31 -13 589 734 ;
+C -1 ; WX 674 ; N aacute ; B 41 -13 596 766 ;
+C -1 ; WX 800 ; N registered ; B 18 -11 781 751 ;
+C -1 ; WX 184 ; N icircumflex ; B -103 0 288 748 ;
+C -1 ; WX 641 ; N udieresis ; B 78 -13 564 734 ;
+C -1 ; WX 641 ; N ograve ; B 41 -13 599 766 ;
+C -1 ; WX 641 ; N uacute ; B 78 -13 564 766 ;
+C -1 ; WX 641 ; N ucircumflex ; B 78 -13 564 748 ;
+C -1 ; WX 687 ; N Aacute ; B 7 0 680 951 ;
+C -1 ; WX 184 ; N igrave ; B -61 0 190 766 ;
+C -1 ; WX 185 ; N Icircumflex ; B -103 0 288 933 ;
+C -1 ; WX 619 ; N ccedilla ; B 41 -201 584 543 ;
+C -1 ; WX 674 ; N adieresis ; B 41 -13 596 734 ;
+C -1 ; WX 547 ; N Ecircumflex ; B 77 0 483 933 ;
+C -1 ; WX 426 ; N scaron ; B 18 -13 409 748 ;
+C -1 ; WX 681 ; N thorn ; B 78 -213 639 740 ;
+C -1 ; WX 990 ; N trademark ; B 9 296 838 740 ;
+C -1 ; WX 619 ; N egrave ; B 31 -13 589 766 ;
+C -1 ; WX 351 ; N threesuperior ; B 33 288 311 748 ;
+C -1 ; WX 407 ; N zcaron ; B 8 0 399 748 ;
+C -1 ; WX 674 ; N atilde ; B 41 -13 596 714 ;
+C -1 ; WX 674 ; N aring ; B 41 -13 596 775 ;
+C -1 ; WX 641 ; N ocircumflex ; B 41 -13 599 748 ;
+C -1 ; WX 547 ; N Edieresis ; B 77 0 483 919 ;
+C -1 ; WX 807 ; N threequarters ; B 40 0 765 748 ;
+C -1 ; WX 481 ; N ydieresis ; B 11 -213 480 734 ;
+C -1 ; WX 481 ; N yacute ; B 11 -213 480 766 ;
+C -1 ; WX 184 ; N iacute ; B -5 0 246 766 ;
+C -1 ; WX 687 ; N Acircumflex ; B 7 0 680 933 ;
+C -1 ; WX 605 ; N Uacute ; B 76 -13 529 951 ;
+C -1 ; WX 619 ; N eacute ; B 31 -13 589 766 ;
+C -1 ; WX 851 ; N Ograve ; B 41 -13 809 951 ;
+C -1 ; WX 674 ; N agrave ; B 41 -13 596 766 ;
+C -1 ; WX 605 ; N Udieresis ; B 76 -13 529 919 ;
+C -1 ; WX 674 ; N acircumflex ; B 41 -13 596 748 ;
+C -1 ; WX 185 ; N Igrave ; B -61 0 190 951 ;
+C -1 ; WX 351 ; N twosuperior ; B 36 296 307 748 ;
+C -1 ; WX 605 ; N Ugrave ; B 76 -13 529 951 ;
+C -1 ; WX 700 ; N onequarter ; B 44 0 657 740 ;
+C -1 ; WX 605 ; N Ucircumflex ; B 76 -13 529 933 ;
+C -1 ; WX 518 ; N Scaron ; B 45 -13 474 933 ;
+C -1 ; WX 185 ; N Idieresis ; B 18 0 167 919 ;
+C -1 ; WX 184 ; N idieresis ; B 18 0 167 734 ;
+C -1 ; WX 547 ; N Egrave ; B 77 0 483 951 ;
+C -1 ; WX 851 ; N Oacute ; B 41 -13 809 951 ;
+C -1 ; WX 600 ; N divide ; B 50 0 550 500 ;
+C -1 ; WX 687 ; N Atilde ; B 7 0 680 909 ;
+C -1 ; WX 687 ; N Aring ; B 7 0 680 937 ;
+C -1 ; WX 851 ; N Odieresis ; B 41 -13 809 919 ;
+C -1 ; WX 687 ; N Adieresis ; B 7 0 680 919 ;
+C -1 ; WX 738 ; N Ntilde ; B 77 0 661 909 ;
+C -1 ; WX 499 ; N Zcaron ; B 6 0 493 933 ;
+C -1 ; WX 511 ; N Thorn ; B 67 0 499 740 ;
+C -1 ; WX 185 ; N Iacute ; B -5 0 246 951 ;
+C -1 ; WX 600 ; N plusminus ; B 48 0 552 506 ;
+C -1 ; WX 600 ; N multiply ; B 50 2 550 499 ;
+C -1 ; WX 547 ; N Eacute ; B 77 0 483 951 ;
+C -1 ; WX 554 ; N Ydieresis ; B 15 0 539 919 ;
+C -1 ; WX 351 ; N onesuperior ; B 74 296 197 740 ;
+C -1 ; WX 641 ; N ugrave ; B 78 -13 564 766 ;
+C -1 ; WX 600 ; N logicalnot ; B 50 139 550 361 ;
+C -1 ; WX 641 ; N ntilde ; B 78 0 564 714 ;
+C -1 ; WX 851 ; N Otilde ; B 41 -13 809 909 ;
+C -1 ; WX 641 ; N otilde ; B 41 -13 599 714 ;
+C -1 ; WX 786 ; N Ccedilla ; B 41 -201 749 753 ;
+C -1 ; WX 687 ; N Agrave ; B 7 0 680 951 ;
+C -1 ; WX 750 ; N onehalf ; B 44 0 707 740 ;
+C -1 ; WX 701 ; N Eth ; B 0 0 659 740 ;
+C -1 ; WX 400 ; N degree ; B 57 423 343 709 ;
+C -1 ; WX 554 ; N Yacute ; B 15 0 539 951 ;
+C -1 ; WX 851 ; N Ocircumflex ; B 41 -13 809 933 ;
+C -1 ; WX 641 ; N oacute ; B 41 -13 599 766 ;
+C -1 ; WX 561 ; N mu ; B 73 -181 484 530 ;
+C -1 ; WX 600 ; N minus ; B 50 236 550 264 ;
+C -1 ; WX 641 ; N eth ; B 41 -13 600 740 ;
+C -1 ; WX 641 ; N odieresis ; B 41 -13 599 734 ;
+C -1 ; WX 800 ; N copyright ; B 18 -11 781 751 ;
+C -1 ; WX 555 ; N brokenbar ; B 263 -100 293 740 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 181
+
+KPX A y -25
+KPX A w -30
+KPX A v -35
+KPX A quoteright -40
+KPX A quotedblright -40
+KPX A Y -92
+KPX A W -50
+KPX A V -90
+KPX A U -15
+KPX A T -71
+KPX A Q -15
+KPX A O -15
+KPX A G -18
+KPX A C -15
+
+KPX D period -70
+KPX D comma -80
+KPX D Y -30
+KPX D V -20
+KPX D A -35
+
+KPX F period -200
+KPX F o -15
+KPX F e -15
+KPX F comma -200
+KPX F a -15
+KPX F A -60
+
+KPX G period -30
+KPX G comma -40
+
+KPX J period -10
+KPX J comma -10
+
+KPX K y 5
+
+KPX L y -18
+KPX L quoteright -40
+KPX L quotedblright -40
+KPX L Y -91
+KPX L W -50
+KPX L V -113
+KPX L T -55
+
+KPX O period -40
+KPX O comma -30
+KPX O Y -30
+KPX O X -15
+KPX O V -30
+KPX O T -20
+KPX O A -30
+
+KPX P period -200
+KPX P comma -200
+KPX P A -74
+
+KPX R W 20
+KPX R V 10
+KPX R U 20
+KPX R T 6
+KPX R O 30
+
+KPX T y -10
+KPX T w -70
+KPX T u -100
+KPX T semicolon -100
+KPX T r -40
+KPX T period -122
+KPX T o -70
+KPX T hyphen -100
+KPX T h -10
+KPX T e -71
+KPX T comma -122
+KPX T colon -90
+KPX T a -85
+KPX T O -20
+KPX T A -81
+
+KPX U period -8
+KPX U comma -8
+KPX U A -10
+
+KPX V u -55
+KPX V semicolon -47
+KPX V period -160
+KPX V o -101
+KPX V i -10
+KPX V hyphen -85
+KPX V e -101
+KPX V comma -160
+KPX V colon -47
+KPX V a -104
+KPX V O -18
+KPX V G -15
+KPX V A -90
+
+KPX W y -2
+KPX W u -30
+KPX W semicolon -33
+KPX W period -106
+KPX W o -46
+KPX W hyphen -55
+KPX W e -47
+KPX W comma -106
+KPX W colon -1
+KPX W a -50
+KPX W A -50
+
+KPX Y u -79
+KPX Y semicolon -48
+KPX Y period -117
+KPX Y o -99
+KPX Y hyphen -135
+KPX Y e -99
+KPX Y comma -117
+KPX Y colon -24
+KPX Y a -100
+KPX Y O -30
+KPX Y A -92
+
+KPX a y 20
+KPX a b 6
+
+KPX b period -15
+KPX b comma -15
+
+KPX c y 15
+
+KPX comma space -30
+KPX comma quoteright -120
+KPX comma quotedblright -120
+
+KPX d y 15
+
+KPX f quoteright 10
+KPX f quotedblright 10
+KPX f period -30
+KPX f o -18
+KPX f l -50
+KPX f i -50
+KPX f f -50
+KPX f e -30
+KPX f dotlessi -50
+KPX f comma -30
+KPX f a -15
+
+KPX g period -10
+KPX g comma -10
+
+KPX m y -15
+KPX m u -20
+
+KPX n y -15
+KPX n u -20
+
+KPX o period -18
+KPX o comma -18
+
+KPX p period -18
+KPX p comma -18
+
+KPX period space -30
+KPX period quoteright -150
+KPX period quotedblright -120
+
+KPX quotedblleft A -40
+
+KPX quotedblright space -70
+
+KPX quoteleft quoteleft -188
+KPX quoteleft A -40
+
+KPX quoteright v -20
+KPX quoteright t 25
+KPX quoteright space -40
+KPX quoteright s -40
+KPX quoteright r -30
+KPX quoteright quoteright -188
+KPX quoteright d -60
+
+KPX r y 50
+KPX r v 20
+KPX r t 40
+KPX r q -15
+KPX r period -85
+KPX r o -55
+KPX r n 21
+KPX r l 10
+KPX r hyphen -45
+KPX r g -35
+KPX r e -50
+KPX r d -40
+KPX r comma -85
+KPX r c -55
+KPX r a -55
+
+KPX s w -12
+
+KPX space quoteleft -20
+KPX space quotedblleft -70
+KPX space Y -75
+KPX space W -40
+KPX space V -65
+KPX space T -50
+KPX space A -20
+
+KPX v period -75
+KPX v comma -75
+
+KPX w period -75
+KPX w comma -75
+
+KPX y period -75
+KPX y o -12
+KPX y e -12
+KPX y comma -75
+KPX y a -12
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 66 185 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 66 185 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 66 185 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 66 185 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 66 160 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 66 195 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute -4 185 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex -4 185 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis -4 185 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave -4 185 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -165 185 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -185 185 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -185 185 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -205 185 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 92 195 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 148 185 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 148 185 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 148 185 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 148 185 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 148 195 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron -18 185 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 25 185 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 25 185 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 25 185 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 25 185 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 0 185 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 0 185 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron -33 185 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 55 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 60 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 60 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 60 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 60 -2 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 60 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 27 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 32 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 27 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 32 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -165 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -185 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -185 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -205 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 43 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 38 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 43 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 43 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 43 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 43 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron -64 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 43 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 43 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 43 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 43 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute -37 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis -37 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron -74 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-ExLtO b/font/AG-ExLtO
new file mode 100644
index 0000000..bb4cd36
--- /dev/null
+++ b/font/AG-ExLtO
@@ -0,0 +1,532 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Feb 19 17:55:54 1991
+Comment UniqueID 34223
+Comment VMusage 6276 39140
+FontName AvantGarde-ExtraLightObl
+FullName ITC Avant Garde Gothic Extra Light Oblique
+FamilyName ITC Avant Garde Gothic
+Weight ExtraLight
+ItalicAngle -10.5
+IsFixedPitch false
+FontBBox -137 -274 1254 951
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.ITC Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 740
+XHeight 530
+Ascender 740
+Descender -213
+StartCharMetrics 228
+C 32 ; WX 277 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 259 ; N exclam ; B 115 0 282 740 ;
+C 34 ; WX 333 ; N quotedbl ; B 176 444 376 740 ;
+C 35 ; WX 555 ; N numbersign ; B 68 31 621 675 ;
+C 36 ; WX 555 ; N dollar ; B 123 -57 563 810 ;
+C 37 ; WX 719 ; N percent ; B 114 -13 740 753 ;
+C 38 ; WX 721 ; N ampersand ; B 88 -13 730 753 ;
+C 39 ; WX 277 ; N quoteright ; B 199 586 324 740 ;
+C 40 ; WX 425 ; N parenleft ; B 138 -274 533 753 ;
+C 41 ; WX 425 ; N parenright ; B -19 -274 376 753 ;
+C 42 ; WX 573 ; N asterisk ; B 249 444 542 740 ;
+C 43 ; WX 600 ; N plus ; B 94 0 599 501 ;
+C 44 ; WX 277 ; N comma ; B 48 -72 171 82 ;
+C 45 ; WX 266 ; N hyphen ; B 49 262 320 291 ;
+C 46 ; WX 277 ; N period ; B 124 0 169 81 ;
+C 47 ; WX 518 ; N slash ; B 48 -100 588 740 ;
+C 48 ; WX 555 ; N zero ; B 75 -13 615 753 ;
+C 49 ; WX 555 ; N one ; B 243 0 442 740 ;
+C 50 ; WX 555 ; N two ; B 57 0 607 753 ;
+C 51 ; WX 555 ; N three ; B 75 -13 554 753 ;
+C 52 ; WX 555 ; N four ; B 44 0 571 740 ;
+C 53 ; WX 555 ; N five ; B 60 -13 610 740 ;
+C 54 ; WX 555 ; N six ; B 71 -13 570 740 ;
+C 55 ; WX 555 ; N seven ; B 119 0 617 740 ;
+C 56 ; WX 555 ; N eight ; B 88 -13 565 753 ;
+C 57 ; WX 555 ; N nine ; B 122 0 621 753 ;
+C 58 ; WX 277 ; N colon ; B 124 0 252 530 ;
+C 59 ; WX 277 ; N semicolon ; B 48 -72 251 530 ;
+C 60 ; WX 600 ; N less ; B 94 0 643 502 ;
+C 61 ; WX 600 ; N equal ; B 76 139 617 361 ;
+C 62 ; WX 600 ; N greater ; B 50 0 599 502 ;
+C 63 ; WX 536 ; N question ; B 141 0 571 752 ;
+C 64 ; WX 796 ; N at ; B 102 -13 855 753 ;
+C 65 ; WX 687 ; N A ; B 7 0 680 740 ;
+C 66 ; WX 540 ; N B ; B 77 0 558 740 ;
+C 67 ; WX 786 ; N C ; B 103 -13 856 753 ;
+C 68 ; WX 701 ; N D ; B 77 0 736 740 ;
+C 69 ; WX 547 ; N E ; B 77 0 620 740 ;
+C 70 ; WX 477 ; N F ; B 77 0 577 740 ;
+C 71 ; WX 853 ; N G ; B 103 -13 877 753 ;
+C 72 ; WX 628 ; N H ; B 77 0 688 740 ;
+C 73 ; WX 185 ; N I ; B 77 0 244 740 ;
+C 74 ; WX 453 ; N J ; B 32 -13 514 740 ;
+C 75 ; WX 536 ; N K ; B 91 0 673 740 ;
+C 76 ; WX 423 ; N L ; B 77 0 425 740 ;
+C 77 ; WX 933 ; N M ; B 77 0 992 740 ;
+C 78 ; WX 738 ; N N ; B 77 0 798 740 ;
+C 79 ; WX 851 ; N O ; B 103 -13 885 753 ;
+C 80 ; WX 511 ; N P ; B 67 0 601 740 ;
+C 81 ; WX 882 ; N Q ; B 118 -13 900 753 ;
+C 82 ; WX 554 ; N R ; B 67 0 639 740 ;
+C 83 ; WX 518 ; N S ; B 78 -13 561 752 ;
+C 84 ; WX 443 ; N T ; B 137 0 574 740 ;
+C 85 ; WX 605 ; N U ; B 113 -13 666 740 ;
+C 86 ; WX 666 ; N V ; B 144 0 796 740 ;
+C 87 ; WX 888 ; N W ; B 149 0 1013 740 ;
+C 88 ; WX 555 ; N X ; B 8 0 673 740 ;
+C 89 ; WX 554 ; N Y ; B 152 0 676 740 ;
+C 90 ; WX 499 ; N Z ; B 20 0 609 740 ;
+C 91 ; WX 425 ; N bracketleft ; B 170 -272 484 753 ;
+C 92 ; WX 518 ; N backslash ; B 204 -100 432 740 ;
+C 93 ; WX 425 ; N bracketright ; B 31 -272 344 753 ;
+C 94 ; WX 600 ; N asciicircum ; B 181 375 557 740 ;
+C 95 ; WX 500 ; N underscore ; B -23 -125 486 -75 ;
+C 96 ; WX 277 ; N quoteleft ; B 227 586 296 740 ;
+C 97 ; WX 674 ; N a ; B 85 -13 694 543 ;
+C 98 ; WX 674 ; N b ; B 78 -13 687 740 ;
+C 99 ; WX 619 ; N c ; B 85 -13 650 543 ;
+C 100 ; WX 677 ; N d ; B 85 -13 733 740 ;
+C 101 ; WX 619 ; N e ; B 75 -13 643 543 ;
+C 102 ; WX 263 ; N f ; B 94 0 400 753 ; L i fi ; L l fl ;
+C 103 ; WX 675 ; N g ; B 56 -226 696 543 ;
+C 104 ; WX 640 ; N h ; B 78 0 624 740 ;
+C 105 ; WX 184 ; N i ; B 78 0 243 740 ;
+C 106 ; WX 219 ; N j ; B -53 -213 260 740 ;
+C 107 ; WX 467 ; N k ; B 78 0 532 740 ;
+C 108 ; WX 183 ; N l ; B 78 0 243 740 ;
+C 109 ; WX 949 ; N m ; B 78 0 937 543 ;
+C 110 ; WX 641 ; N n ; B 78 0 624 543 ;
+C 111 ; WX 641 ; N o ; B 85 -13 653 543 ;
+C 112 ; WX 677 ; N p ; B 39 -213 687 543 ;
+C 113 ; WX 674 ; N q ; B 85 -213 694 543 ;
+C 114 ; WX 302 ; N r ; B 78 0 394 543 ;
+C 115 ; WX 426 ; N s ; B 70 -13 429 543 ;
+C 116 ; WX 296 ; N t ; B 100 0 386 740 ;
+C 117 ; WX 641 ; N u ; B 117 -13 662 530 ;
+C 118 ; WX 481 ; N v ; B 102 0 574 530 ;
+C 119 ; WX 758 ; N w ; B 108 0 847 530 ;
+C 120 ; WX 407 ; N x ; B 10 0 495 530 ;
+C 121 ; WX 481 ; N y ; B 88 -213 578 530 ;
+C 122 ; WX 407 ; N z ; B 12 0 475 530 ;
+C 123 ; WX 425 ; N braceleft ; B 156 -272 484 753 ;
+C 124 ; WX 555 ; N bar ; B 244 -100 430 740 ;
+C 125 ; WX 425 ; N braceright ; B 31 -272 357 753 ;
+C 126 ; WX 600 ; N asciitilde ; B 118 200 573 301 ;
+C 161 ; WX 259 ; N exclamdown ; B 76 -209 243 531 ;
+C 162 ; WX 555 ; N cent ; B 133 39 574 687 ;
+C 163 ; WX 555 ; N sterling ; B 36 0 626 752 ;
+C 164 ; WX 86 ; N fraction ; B -137 0 359 740 ;
+C 165 ; WX 555 ; N yen ; B 93 0 661 740 ;
+C 166 ; WX 555 ; N florin ; B -12 -152 692 813 ;
+C 167 ; WX 573 ; N section ; B 67 -223 588 753 ;
+C 168 ; WX 555 ; N currency ; B 64 105 618 579 ;
+C 169 ; WX 222 ; N quotesingle ; B 178 444 263 740 ;
+C 170 ; WX 370 ; N quotedblleft ; B 229 586 387 740 ;
+C 171 ; WX 351 ; N guillemotleft ; B 100 84 373 469 ;
+C 172 ; WX 248 ; N guilsinglleft ; B 104 84 266 469 ;
+C 173 ; WX 248 ; N guilsinglright ; B 84 84 246 469 ;
+C 174 ; WX 393 ; N fi ; B 94 0 452 753 ;
+C 175 ; WX 393 ; N fl ; B 94 0 452 753 ;
+C 177 ; WX 500 ; N endash ; B 84 262 519 291 ;
+C 178 ; WX 573 ; N dagger ; B 175 -100 588 740 ;
+C 179 ; WX 573 ; N daggerdbl ; B 99 -100 594 740 ;
+C 180 ; WX 277 ; N periodcentered ; B 164 215 209 296 ;
+C 182 ; WX 561 ; N paragraph ; B 108 -126 629 740 ;
+C 183 ; WX 375 ; N bullet ; B 102 222 413 532 ;
+C 184 ; WX 277 ; N quotesinglbase ; B 77 -72 202 82 ;
+C 185 ; WX 370 ; N quotedblbase ; B 79 -72 293 82 ;
+C 186 ; WX 370 ; N quotedblright ; B 201 586 415 740 ;
+C 187 ; WX 351 ; N guillemotright ; B 80 84 353 469 ;
+C 188 ; WX 1000 ; N ellipsis ; B 152 0 863 82 ;
+C 189 ; WX 1089 ; N perthousand ; B 112 -13 1101 753 ;
+C 191 ; WX 536 ; N questiondown ; B 63 -222 494 530 ;
+C 193 ; WX 555 ; N grave ; B 282 605 511 766 ;
+C 194 ; WX 555 ; N acute ; B 276 605 549 766 ;
+C 195 ; WX 555 ; N circumflex ; B 200 623 591 748 ;
+C 196 ; WX 555 ; N tilde ; B 222 633 581 714 ;
+C 197 ; WX 555 ; N macron ; B 221 660 583 690 ;
+C 198 ; WX 555 ; N breve ; B 219 634 602 716 ;
+C 199 ; WX 555 ; N dotaccent ; B 377 618 429 734 ;
+C 200 ; WX 555 ; N dieresis ; B 318 618 488 734 ;
+C 202 ; WX 555 ; N ring ; B 312 595 498 777 ;
+C 203 ; WX 555 ; N cedilla ; B 178 -201 329 0 ;
+C 205 ; WX 555 ; N hungarumlaut ; B 260 605 639 788 ;
+C 206 ; WX 555 ; N ogonek ; B 175 -206 327 0 ;
+C 207 ; WX 555 ; N caron ; B 218 623 609 748 ;
+C 208 ; WX 1000 ; N emdash ; B 84 262 1019 291 ;
+C 225 ; WX 944 ; N AE ; B -8 0 1007 740 ;
+C 227 ; WX 439 ; N ordfeminine ; B 130 404 526 753 ;
+C 232 ; WX 423 ; N Lslash ; B 52 0 429 740 ;
+C 233 ; WX 851 ; N Oslash ; B 81 -86 903 809 ;
+C 234 ; WX 1178 ; N OE ; B 102 -13 1254 753 ;
+C 235 ; WX 439 ; N ordmasculine ; B 148 404 505 753 ;
+C 241 ; WX 1154 ; N ae ; B 85 -13 1166 543 ;
+C 245 ; WX 184 ; N dotlessi ; B 78 0 204 530 ;
+C 248 ; WX 219 ; N lslash ; B 76 0 312 740 ;
+C 249 ; WX 641 ; N oslash ; B 79 -52 661 585 ;
+C 250 ; WX 1156 ; N oe ; B 85 -13 1169 543 ;
+C 251 ; WX 559 ; N germandbls ; B 76 -13 570 752 ;
+C -1 ; WX 619 ; N ecircumflex ; B 75 -13 643 748 ;
+C -1 ; WX 619 ; N edieresis ; B 75 -13 643 734 ;
+C -1 ; WX 674 ; N aacute ; B 85 -13 694 766 ;
+C -1 ; WX 800 ; N registered ; B 80 -11 856 751 ;
+C -1 ; WX 184 ; N icircumflex ; B 15 0 406 748 ;
+C -1 ; WX 641 ; N udieresis ; B 117 -13 662 734 ;
+C -1 ; WX 641 ; N ograve ; B 85 -13 653 766 ;
+C -1 ; WX 641 ; N uacute ; B 117 -13 662 766 ;
+C -1 ; WX 641 ; N ucircumflex ; B 117 -13 662 748 ;
+C -1 ; WX 687 ; N Aacute ; B 7 0 680 951 ;
+C -1 ; WX 184 ; N igrave ; B 77 0 306 766 ;
+C -1 ; WX 185 ; N Icircumflex ; B 50 0 441 933 ;
+C -1 ; WX 619 ; N ccedilla ; B 85 -201 650 543 ;
+C -1 ; WX 674 ; N adieresis ; B 85 -13 694 734 ;
+C -1 ; WX 547 ; N Ecircumflex ; B 77 0 622 933 ;
+C -1 ; WX 426 ; N scaron ; B 70 -13 545 748 ;
+C -1 ; WX 681 ; N thorn ; B 39 -213 693 740 ;
+C -1 ; WX 990 ; N trademark ; B 142 296 975 740 ;
+C -1 ; WX 619 ; N egrave ; B 75 -13 643 766 ;
+C -1 ; WX 351 ; N threesuperior ; B 110 288 404 748 ;
+C -1 ; WX 407 ; N zcaron ; B 12 0 535 748 ;
+C -1 ; WX 674 ; N atilde ; B 85 -13 694 714 ;
+C -1 ; WX 674 ; N aring ; B 85 -13 694 775 ;
+C -1 ; WX 641 ; N ocircumflex ; B 85 -13 653 748 ;
+C -1 ; WX 547 ; N Edieresis ; B 77 0 620 919 ;
+C -1 ; WX 807 ; N threequarters ; B 117 0 805 748 ;
+C -1 ; WX 481 ; N ydieresis ; B 88 -213 578 734 ;
+C -1 ; WX 481 ; N yacute ; B 88 -213 578 766 ;
+C -1 ; WX 184 ; N iacute ; B 78 0 384 766 ;
+C -1 ; WX 687 ; N Acircumflex ; B 7 0 692 933 ;
+C -1 ; WX 605 ; N Uacute ; B 113 -13 666 951 ;
+C -1 ; WX 619 ; N eacute ; B 75 -13 643 766 ;
+C -1 ; WX 851 ; N Ograve ; B 103 -13 885 951 ;
+C -1 ; WX 674 ; N agrave ; B 85 -13 694 766 ;
+C -1 ; WX 605 ; N Udieresis ; B 113 -13 666 919 ;
+C -1 ; WX 674 ; N acircumflex ; B 85 -13 694 748 ;
+C -1 ; WX 185 ; N Igrave ; B 77 0 341 951 ;
+C -1 ; WX 351 ; N twosuperior ; B 91 296 421 748 ;
+C -1 ; WX 605 ; N Ugrave ; B 113 -13 666 951 ;
+C -1 ; WX 700 ; N onequarter ; B 143 0 697 740 ;
+C -1 ; WX 605 ; N Ucircumflex ; B 113 -13 666 933 ;
+C -1 ; WX 518 ; N Scaron ; B 78 -13 625 933 ;
+C -1 ; WX 185 ; N Idieresis ; B 77 0 337 919 ;
+C -1 ; WX 184 ; N idieresis ; B 78 0 303 734 ;
+C -1 ; WX 547 ; N Egrave ; B 77 0 620 951 ;
+C -1 ; WX 851 ; N Oacute ; B 103 -13 885 951 ;
+C -1 ; WX 600 ; N divide ; B 94 0 599 500 ;
+C -1 ; WX 687 ; N Atilde ; B 7 0 683 909 ;
+C -1 ; WX 687 ; N Aring ; B 7 0 680 937 ;
+C -1 ; WX 851 ; N Odieresis ; B 103 -13 885 919 ;
+C -1 ; WX 687 ; N Adieresis ; B 7 0 680 919 ;
+C -1 ; WX 738 ; N Ntilde ; B 77 0 798 909 ;
+C -1 ; WX 499 ; N Zcaron ; B 20 0 610 933 ;
+C -1 ; WX 511 ; N Thorn ; B 67 0 572 740 ;
+C -1 ; WX 185 ; N Iacute ; B 77 0 418 951 ;
+C -1 ; WX 600 ; N plusminus ; B 48 0 609 506 ;
+C -1 ; WX 600 ; N multiply ; B 54 2 638 499 ;
+C -1 ; WX 547 ; N Eacute ; B 77 0 620 951 ;
+C -1 ; WX 554 ; N Ydieresis ; B 152 0 676 919 ;
+C -1 ; WX 351 ; N onesuperior ; B 207 296 334 740 ;
+C -1 ; WX 641 ; N ugrave ; B 117 -13 662 766 ;
+C -1 ; WX 600 ; N logicalnot ; B 112 139 617 361 ;
+C -1 ; WX 641 ; N ntilde ; B 78 0 624 714 ;
+C -1 ; WX 851 ; N Otilde ; B 103 -13 885 909 ;
+C -1 ; WX 641 ; N otilde ; B 85 -13 653 714 ;
+C -1 ; WX 786 ; N Ccedilla ; B 102 -201 856 753 ;
+C -1 ; WX 687 ; N Agrave ; B 7 0 680 951 ;
+C -1 ; WX 750 ; N onehalf ; B 143 0 766 740 ;
+C -1 ; WX 701 ; N Eth ; B 67 0 736 740 ;
+C -1 ; WX 400 ; N degree ; B 159 423 450 709 ;
+C -1 ; WX 554 ; N Yacute ; B 152 0 676 951 ;
+C -1 ; WX 851 ; N Ocircumflex ; B 103 -13 885 933 ;
+C -1 ; WX 641 ; N oacute ; B 85 -13 653 766 ;
+C -1 ; WX 561 ; N mu ; B 39 -181 582 530 ;
+C -1 ; WX 600 ; N minus ; B 94 236 599 264 ;
+C -1 ; WX 641 ; N eth ; B 85 -13 657 740 ;
+C -1 ; WX 641 ; N odieresis ; B 85 -13 653 734 ;
+C -1 ; WX 800 ; N copyright ; B 80 -11 856 751 ;
+C -1 ; WX 555 ; N brokenbar ; B 244 -100 430 740 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 181
+
+KPX A y -25
+KPX A w -30
+KPX A v -35
+KPX A quoteright -40
+KPX A quotedblright -40
+KPX A Y -92
+KPX A W -50
+KPX A V -90
+KPX A U -15
+KPX A T -71
+KPX A Q -15
+KPX A O -15
+KPX A G -18
+KPX A C -15
+
+KPX D period -70
+KPX D comma -80
+KPX D Y -30
+KPX D V -20
+KPX D A -35
+
+KPX F period -200
+KPX F o -15
+KPX F e -15
+KPX F comma -200
+KPX F a -15
+KPX F A -60
+
+KPX G period -30
+KPX G comma -40
+
+KPX J period -10
+KPX J comma -10
+
+KPX K y 5
+
+KPX L y -18
+KPX L quoteright -40
+KPX L quotedblright -40
+KPX L Y -91
+KPX L W -50
+KPX L V -113
+KPX L T -55
+
+KPX O period -40
+KPX O comma -30
+KPX O Y -30
+KPX O X -15
+KPX O V -30
+KPX O T -20
+KPX O A -30
+
+KPX P period -200
+KPX P comma -200
+KPX P A -74
+
+KPX R W 20
+KPX R V 10
+KPX R U 20
+KPX R T 6
+KPX R O 30
+
+KPX T y -10
+KPX T w -70
+KPX T u -100
+KPX T semicolon -100
+KPX T r -40
+KPX T period -122
+KPX T o -70
+KPX T hyphen -100
+KPX T h -10
+KPX T e -71
+KPX T comma -122
+KPX T colon -90
+KPX T a -85
+KPX T O -20
+KPX T A -81
+
+KPX U period -8
+KPX U comma -8
+KPX U A -10
+
+KPX V u -55
+KPX V semicolon -47
+KPX V period -160
+KPX V o -101
+KPX V i -10
+KPX V hyphen -85
+KPX V e -101
+KPX V comma -160
+KPX V colon -47
+KPX V a -104
+KPX V O -18
+KPX V G -15
+KPX V A -90
+
+KPX W y -2
+KPX W u -30
+KPX W semicolon -33
+KPX W period -106
+KPX W o -46
+KPX W hyphen -55
+KPX W e -47
+KPX W comma -106
+KPX W colon -1
+KPX W a -50
+KPX W A -50
+
+KPX Y u -79
+KPX Y semicolon -48
+KPX Y period -117
+KPX Y o -99
+KPX Y hyphen -135
+KPX Y e -99
+KPX Y comma -117
+KPX Y colon -24
+KPX Y a -100
+KPX Y O -30
+KPX Y A -92
+
+KPX a y 20
+KPX a b 6
+
+KPX b period -15
+KPX b comma -15
+
+KPX c y 15
+
+KPX comma space -30
+KPX comma quoteright -120
+KPX comma quotedblright -120
+
+KPX d y 15
+
+KPX f quoteright 10
+KPX f quotedblright 10
+KPX f period -30
+KPX f o -18
+KPX f l -50
+KPX f i -50
+KPX f f -50
+KPX f e -30
+KPX f dotlessi -50
+KPX f comma -30
+KPX f a -15
+
+KPX g period -10
+KPX g comma -10
+
+KPX m y -15
+KPX m u -20
+
+KPX n y -15
+KPX n u -20
+
+KPX o period -18
+KPX o comma -18
+
+KPX p period -18
+KPX p comma -18
+
+KPX period space -30
+KPX period quoteright -150
+KPX period quotedblright -120
+
+KPX quotedblleft A -40
+
+KPX quotedblright space -70
+
+KPX quoteleft quoteleft -188
+KPX quoteleft A -40
+
+KPX quoteright v -20
+KPX quoteright t 25
+KPX quoteright space -40
+KPX quoteright s -40
+KPX quoteright r -30
+KPX quoteright quoteright -188
+KPX quoteright d -60
+
+KPX r y 50
+KPX r v 20
+KPX r t 40
+KPX r q -15
+KPX r period -85
+KPX r o -55
+KPX r n 21
+KPX r l 10
+KPX r hyphen -45
+KPX r g -35
+KPX r e -50
+KPX r d -40
+KPX r comma -85
+KPX r c -55
+KPX r a -55
+
+KPX s w -12
+
+KPX space quoteleft -20
+KPX space quotedblleft -70
+KPX space Y -75
+KPX space W -40
+KPX space V -65
+KPX space T -50
+KPX space A -20
+
+KPX v period -75
+KPX v comma -75
+
+KPX w period -75
+KPX w comma -75
+
+KPX y period -75
+KPX y o -12
+KPX y e -12
+KPX y comma -75
+KPX y a -12
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 100 185 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 100 185 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 100 185 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 100 185 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 96 160 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 102 195 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 30 185 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 30 185 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 30 185 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 30 185 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -131 185 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -151 185 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -151 185 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -171 185 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 128 195 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 182 185 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 182 185 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 182 185 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 182 185 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 184 195 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 16 185 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 59 185 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 59 185 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 59 185 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 59 185 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 34 185 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 34 185 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 1 185 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 55 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 60 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 60 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 60 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 60 -2 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 60 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 27 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 32 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 27 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 32 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -165 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -185 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -185 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -205 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 43 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 38 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 43 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 43 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 43 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 43 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron -64 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 43 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 43 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 43 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 43 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute -37 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis -37 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron -74 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-Md b/font/AG-Md
new file mode 100644
index 0000000..4307a80
--- /dev/null
+++ b/font/AG-Md
@@ -0,0 +1,581 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Feb 19 18:15:23 1991
+Comment UniqueID 34232
+Comment VMusage 24260 31152
+FontName AvantGarde-Medium
+FullName ITC Avant Garde Gothic Medium
+FamilyName ITC Avant Garde Gothic
+Weight Medium
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -98 -257 1175 982
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.ITC Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 740
+XHeight 554
+Ascender 740
+Descender -185
+StartCharMetrics 228
+C 32 ; WX 277 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 277 ; N exclam ; B 87 0 191 740 ;
+C 34 ; WX 325 ; N quotedbl ; B 20 444 306 740 ;
+C 35 ; WX 555 ; N numbersign ; B 30 0 524 700 ;
+C 36 ; WX 555 ; N dollar ; B 68 -82 487 823 ;
+C 37 ; WX 837 ; N percent ; B 52 -13 784 751 ;
+C 38 ; WX 684 ; N ampersand ; B 34 -14 676 754 ;
+C 39 ; WX 277 ; N quoteright ; B 87 490 191 740 ;
+C 40 ; WX 407 ; N parenleft ; B 55 -257 357 755 ;
+C 41 ; WX 407 ; N parenright ; B 50 -257 352 755 ;
+C 42 ; WX 573 ; N asterisk ; B 96 377 478 740 ;
+C 43 ; WX 600 ; N plus ; B 48 0 552 506 ;
+C 44 ; WX 277 ; N comma ; B 87 -127 191 122 ;
+C 45 ; WX 280 ; N hyphen ; B 0 237 280 341 ;
+C 46 ; WX 277 ; N period ; B 87 0 191 122 ;
+C 47 ; WX 499 ; N slash ; B 41 -100 443 740 ;
+C 48 ; WX 555 ; N zero ; B 38 -14 517 755 ;
+C 49 ; WX 555 ; N one ; B 148 0 361 740 ;
+C 50 ; WX 555 ; N two ; B 37 0 504 754 ;
+C 51 ; WX 555 ; N three ; B 22 -14 501 754 ;
+C 52 ; WX 555 ; N four ; B 12 0 532 740 ;
+C 53 ; WX 555 ; N five ; B 25 -14 530 740 ;
+C 54 ; WX 555 ; N six ; B 25 -14 537 740 ;
+C 55 ; WX 555 ; N seven ; B 71 0 500 740 ;
+C 56 ; WX 555 ; N eight ; B 43 -14 511 754 ;
+C 57 ; WX 555 ; N nine ; B 18 0 529 754 ;
+C 58 ; WX 277 ; N colon ; B 87 0 191 555 ;
+C 59 ; WX 277 ; N semicolon ; B 87 -127 191 555 ;
+C 60 ; WX 600 ; N less ; B 46 -8 554 514 ;
+C 61 ; WX 600 ; N equal ; B 48 92 552 414 ;
+C 62 ; WX 600 ; N greater ; B 46 -8 554 514 ;
+C 63 ; WX 518 ; N question ; B 32 0 478 754 ;
+C 64 ; WX 760 ; N at ; B 11 -13 749 753 ;
+C 65 ; WX 684 ; N A ; B 13 0 672 740 ;
+C 66 ; WX 580 ; N B ; B 75 0 542 740 ;
+C 67 ; WX 782 ; N C ; B 38 -14 759 754 ;
+C 68 ; WX 732 ; N D ; B 65 0 683 740 ;
+C 69 ; WX 520 ; N E ; B 65 0 464 740 ;
+C 70 ; WX 482 ; N F ; B 65 0 439 740 ;
+C 71 ; WX 831 ; N G ; B 38 -14 799 754 ;
+C 72 ; WX 670 ; N H ; B 75 0 596 740 ;
+C 73 ; WX 257 ; N I ; B 75 0 183 740 ;
+C 74 ; WX 487 ; N J ; B 0 -14 408 740 ;
+C 75 ; WX 618 ; N K ; B 90 0 614 740 ;
+C 76 ; WX 444 ; N L ; B 79 0 444 740 ;
+C 77 ; WX 934 ; N M ; B 75 0 860 740 ;
+C 78 ; WX 738 ; N N ; B 75 0 663 740 ;
+C 79 ; WX 846 ; N O ; B 38 -14 808 754 ;
+C 80 ; WX 559 ; N P ; B 65 0 540 740 ;
+C 81 ; WX 837 ; N Q ; B 38 -14 816 754 ;
+C 82 ; WX 594 ; N R ; B 65 0 559 740 ;
+C 83 ; WX 499 ; N S ; B 18 -14 473 754 ;
+C 84 ; WX 407 ; N T ; B 7 0 399 740 ;
+C 85 ; WX 643 ; N U ; B 73 -14 569 740 ;
+C 86 ; WX 684 ; N V ; B 12 0 672 740 ;
+C 87 ; WX 906 ; N W ; B 16 0 890 740 ;
+C 88 ; WX 648 ; N X ; B 11 0 636 740 ;
+C 89 ; WX 593 ; N Y ; B 13 0 579 740 ;
+C 90 ; WX 462 ; N Z ; B 4 0 459 740 ;
+C 91 ; WX 407 ; N bracketleft ; B 125 -257 329 755 ;
+C 92 ; WX 499 ; N backslash ; B 56 -100 458 740 ;
+C 93 ; WX 407 ; N bracketright ; B 78 -257 282 755 ;
+C 94 ; WX 600 ; N asciicircum ; B 66 355 534 740 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 277 ; N quoteleft ; B 86 490 190 740 ;
+C 97 ; WX 693 ; N a ; B 38 -14 626 569 ;
+C 98 ; WX 688 ; N b ; B 67 -14 650 740 ;
+C 99 ; WX 627 ; N c ; B 38 -14 595 569 ;
+C 100 ; WX 687 ; N d ; B 38 -14 620 740 ;
+C 101 ; WX 642 ; N e ; B 39 -14 605 569 ;
+C 102 ; WX 277 ; N f ; B 21 0 271 740 ; L i fi ; L l fl ;
+C 103 ; WX 697 ; N g ; B 38 -218 631 569 ;
+C 104 ; WX 622 ; N h ; B 66 0 558 740 ;
+C 105 ; WX 238 ; N i ; B 67 0 171 740 ;
+C 106 ; WX 249 ; N j ; B 11 -218 184 740 ;
+C 107 ; WX 546 ; N k ; B 77 0 535 740 ;
+C 108 ; WX 238 ; N l ; B 67 0 171 740 ;
+C 109 ; WX 971 ; N m ; B 67 0 905 569 ;
+C 110 ; WX 624 ; N n ; B 66 0 558 569 ;
+C 111 ; WX 675 ; N o ; B 38 -14 636 569 ;
+C 112 ; WX 686 ; N p ; B 67 -185 648 569 ;
+C 113 ; WX 687 ; N q ; B 39 -185 620 569 ;
+C 114 ; WX 320 ; N r ; B 67 0 307 569 ;
+C 115 ; WX 424 ; N s ; B 20 -14 402 569 ;
+C 116 ; WX 277 ; N t ; B 4 0 274 740 ;
+C 117 ; WX 624 ; N u ; B 66 -14 557 554 ;
+C 118 ; WX 537 ; N v ; B 13 0 524 554 ;
+C 119 ; WX 795 ; N w ; B 13 0 782 554 ;
+C 120 ; WX 518 ; N x ; B 2 0 516 554 ;
+C 121 ; WX 574 ; N y ; B 10 -185 564 554 ;
+C 122 ; WX 407 ; N z ; B 3 0 404 554 ;
+C 123 ; WX 333 ; N braceleft ; B 14 -198 308 740 ;
+C 124 ; WX 555 ; N bar ; B 221 -100 334 740 ;
+C 125 ; WX 333 ; N braceright ; B 25 -198 319 740 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 167 531 339 ;
+C 161 ; WX 277 ; N exclamdown ; B 86 -185 190 555 ;
+C 162 ; WX 555 ; N cent ; B 38 69 517 740 ;
+C 163 ; WX 555 ; N sterling ; B 9 0 546 754 ;
+C 164 ; WX 186 ; N fraction ; B -98 0 283 740 ;
+C 165 ; WX 555 ; N yen ; B 0 0 555 740 ;
+C 166 ; WX 555 ; N florin ; B 15 -157 520 829 ;
+C 167 ; WX 573 ; N section ; B 41 -222 534 754 ;
+C 168 ; WX 555 ; N currency ; B 27 72 529 574 ;
+C 169 ; WX 218 ; N quotesingle ; B 54 444 164 740 ;
+C 170 ; WX 425 ; N quotedblleft ; B 83 490 343 740 ;
+C 171 ; WX 370 ; N guillemotleft ; B 33 102 337 475 ;
+C 172 ; WX 205 ; N guilsinglleft ; B 34 102 171 475 ;
+C 173 ; WX 205 ; N guilsinglright ; B 34 102 171 475 ;
+C 174 ; WX 486 ; N fi ; B 21 0 419 740 ;
+C 175 ; WX 486 ; N fl ; B 21 0 419 740 ;
+C 177 ; WX 500 ; N endash ; B 35 237 465 341 ;
+C 178 ; WX 573 ; N dagger ; B 65 -222 509 740 ;
+C 179 ; WX 573 ; N daggerdbl ; B 65 -222 509 740 ;
+C 180 ; WX 277 ; N periodcentered ; B 93 200 184 308 ;
+C 182 ; WX 638 ; N paragraph ; B 2 -191 535 700 ;
+C 183 ; WX 606 ; N bullet ; B 150 222 455 532 ;
+C 184 ; WX 277 ; N quotesinglbase ; B 87 -128 191 122 ;
+C 185 ; WX 425 ; N quotedblbase ; B 82 -128 342 122 ;
+C 186 ; WX 425 ; N quotedblright ; B 82 490 342 740 ;
+C 187 ; WX 370 ; N guillemotright ; B 33 102 337 475 ;
+C 188 ; WX 1000 ; N ellipsis ; B 115 0 885 122 ;
+C 189 ; WX 1228 ; N perthousand ; B 52 -13 1175 751 ;
+C 191 ; WX 518 ; N questiondown ; B 40 -199 486 555 ;
+C 193 ; WX 555 ; N grave ; B 124 611 391 814 ;
+C 194 ; WX 555 ; N acute ; B 164 611 431 814 ;
+C 195 ; WX 555 ; N circumflex ; B 88 632 467 767 ;
+C 196 ; WX 555 ; N tilde ; B 94 636 461 745 ;
+C 197 ; WX 555 ; N macron ; B 100 659 455 734 ;
+C 198 ; WX 555 ; N breve ; B 88 636 467 756 ;
+C 199 ; WX 555 ; N dotaccent ; B 225 636 329 758 ;
+C 200 ; WX 555 ; N dieresis ; B 148 636 407 758 ;
+C 202 ; WX 555 ; N ring ; B 167 610 388 831 ;
+C 203 ; WX 555 ; N cedilla ; B 182 -246 373 0 ;
+C 205 ; WX 555 ; N hungarumlaut ; B 97 632 498 767 ;
+C 206 ; WX 555 ; N ogonek ; B 187 -202 368 0 ;
+C 207 ; WX 555 ; N caron ; B 88 632 467 774 ;
+C 208 ; WX 1000 ; N emdash ; B 35 237 965 341 ;
+C 225 ; WX 930 ; N AE ; B 0 0 866 740 ;
+C 227 ; WX 385 ; N ordfeminine ; B 13 430 346 754 ;
+C 232 ; WX 444 ; N Lslash ; B 4 0 444 740 ;
+C 233 ; WX 846 ; N Oslash ; B 38 -65 808 802 ;
+C 234 ; WX 1094 ; N OE ; B 38 -14 1048 754 ;
+C 235 ; WX 385 ; N ordmasculine ; B 26 430 358 754 ;
+C 241 ; WX 1131 ; N ae ; B 38 -14 1093 569 ;
+C 245 ; WX 238 ; N dotlessi ; B 67 0 171 554 ;
+C 248 ; WX 284 ; N lslash ; B 21 0 273 740 ;
+C 249 ; WX 675 ; N oslash ; B 38 -69 636 623 ;
+C 250 ; WX 1144 ; N oe ; B 38 -14 1107 569 ;
+C 251 ; WX 640 ; N germandbls ; B 66 -14 602 754 ;
+C -1 ; WX 642 ; N ecircumflex ; B 39 -14 605 767 ;
+C -1 ; WX 642 ; N edieresis ; B 39 -14 605 758 ;
+C -1 ; WX 693 ; N aacute ; B 38 -14 626 814 ;
+C -1 ; WX 800 ; N registered ; B 18 -12 782 752 ;
+C -1 ; WX 238 ; N icircumflex ; B -70 0 309 767 ;
+C -1 ; WX 624 ; N udieresis ; B 66 -14 557 758 ;
+C -1 ; WX 675 ; N ograve ; B 38 -14 636 814 ;
+C -1 ; WX 624 ; N uacute ; B 66 -14 557 814 ;
+C -1 ; WX 624 ; N ucircumflex ; B 66 -14 557 767 ;
+C -1 ; WX 684 ; N Aacute ; B 13 0 672 975 ;
+C -1 ; WX 238 ; N igrave ; B -74 0 193 814 ;
+C -1 ; WX 257 ; N Icircumflex ; B -61 0 318 933 ;
+C -1 ; WX 627 ; N ccedilla ; B 38 -246 595 569 ;
+C -1 ; WX 693 ; N adieresis ; B 38 -14 626 758 ;
+C -1 ; WX 520 ; N Ecircumflex ; B 65 0 464 933 ;
+C -1 ; WX 424 ; N scaron ; B 20 -14 402 774 ;
+C -1 ; WX 686 ; N thorn ; B 67 -185 648 740 ;
+C -1 ; WX 990 ; N trademark ; B 0 288 903 700 ;
+C -1 ; WX 642 ; N egrave ; B 39 -14 605 814 ;
+C -1 ; WX 351 ; N threesuperior ; B 16 286 316 750 ;
+C -1 ; WX 407 ; N zcaron ; B 3 0 413 774 ;
+C -1 ; WX 693 ; N atilde ; B 38 -14 626 745 ;
+C -1 ; WX 693 ; N aring ; B 38 -14 626 831 ;
+C -1 ; WX 675 ; N ocircumflex ; B 38 -14 636 767 ;
+C -1 ; WX 520 ; N Edieresis ; B 65 0 464 924 ;
+C -1 ; WX 781 ; N threequarters ; B 16 0 765 750 ;
+C -1 ; WX 574 ; N ydieresis ; B 10 -185 564 758 ;
+C -1 ; WX 574 ; N yacute ; B 10 -185 564 814 ;
+C -1 ; WX 238 ; N iacute ; B 46 0 313 814 ;
+C -1 ; WX 684 ; N Acircumflex ; B 13 0 672 928 ;
+C -1 ; WX 643 ; N Uacute ; B 73 -14 569 980 ;
+C -1 ; WX 642 ; N eacute ; B 39 -14 605 814 ;
+C -1 ; WX 846 ; N Ograve ; B 38 -14 808 980 ;
+C -1 ; WX 693 ; N agrave ; B 38 -14 626 814 ;
+C -1 ; WX 643 ; N Udieresis ; B 73 -14 569 924 ;
+C -1 ; WX 693 ; N acircumflex ; B 38 -14 626 767 ;
+C -1 ; WX 257 ; N Igrave ; B -65 0 202 980 ;
+C -1 ; WX 351 ; N twosuperior ; B 25 296 318 750 ;
+C -1 ; WX 643 ; N Ugrave ; B 73 -14 569 980 ;
+C -1 ; WX 700 ; N onequarter ; B 16 0 684 740 ;
+C -1 ; WX 643 ; N Ucircumflex ; B 73 -14 569 933 ;
+C -1 ; WX 499 ; N Scaron ; B 18 -14 473 940 ;
+C -1 ; WX 257 ; N Idieresis ; B -1 0 258 924 ;
+C -1 ; WX 238 ; N idieresis ; B -10 0 249 758 ;
+C -1 ; WX 520 ; N Egrave ; B 65 0 464 980 ;
+C -1 ; WX 846 ; N Oacute ; B 38 -14 808 980 ;
+C -1 ; WX 600 ; N divide ; B 48 0 552 506 ;
+C -1 ; WX 684 ; N Atilde ; B 13 0 672 911 ;
+C -1 ; WX 684 ; N Aring ; B 13 0 672 982 ;
+C -1 ; WX 846 ; N Odieresis ; B 38 -14 808 924 ;
+C -1 ; WX 684 ; N Adieresis ; B 13 0 672 919 ;
+C -1 ; WX 738 ; N Ntilde ; B 75 0 663 911 ;
+C -1 ; WX 462 ; N Zcaron ; B 4 0 459 940 ;
+C -1 ; WX 559 ; N Thorn ; B 65 0 540 740 ;
+C -1 ; WX 257 ; N Iacute ; B 55 0 322 980 ;
+C -1 ; WX 600 ; N plusminus ; B 48 -52 552 546 ;
+C -1 ; WX 600 ; N multiply ; B 61 14 539 492 ;
+C -1 ; WX 520 ; N Eacute ; B 65 0 464 980 ;
+C -1 ; WX 593 ; N Ydieresis ; B 13 0 579 924 ;
+C -1 ; WX 351 ; N onesuperior ; B 97 296 239 740 ;
+C -1 ; WX 624 ; N ugrave ; B 66 -14 557 814 ;
+C -1 ; WX 600 ; N logicalnot ; B 48 108 552 414 ;
+C -1 ; WX 624 ; N ntilde ; B 66 0 558 745 ;
+C -1 ; WX 846 ; N Otilde ; B 38 -14 808 911 ;
+C -1 ; WX 675 ; N otilde ; B 38 -14 636 745 ;
+C -1 ; WX 782 ; N Ccedilla ; B 38 -246 759 754 ;
+C -1 ; WX 684 ; N Agrave ; B 13 0 672 975 ;
+C -1 ; WX 714 ; N onehalf ; B 16 0 698 740 ;
+C -1 ; WX 732 ; N Eth ; B 2 0 683 740 ;
+C -1 ; WX 400 ; N degree ; B 57 426 343 712 ;
+C -1 ; WX 593 ; N Yacute ; B 13 0 579 980 ;
+C -1 ; WX 846 ; N Ocircumflex ; B 38 -14 808 933 ;
+C -1 ; WX 675 ; N oacute ; B 38 -14 636 814 ;
+C -1 ; WX 624 ; N mu ; B 74 -185 550 554 ;
+C -1 ; WX 600 ; N minus ; B 48 201 552 305 ;
+C -1 ; WX 675 ; N eth ; B 38 -14 636 754 ;
+C -1 ; WX 675 ; N odieresis ; B 38 -14 636 758 ;
+C -1 ; WX 800 ; N copyright ; B 18 -12 782 752 ;
+C -1 ; WX 555 ; N brokenbar ; B 221 -100 334 740 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 223
+
+KPX A y -50
+KPX A w -65
+KPX A v -70
+KPX A u -20
+KPX A quoteright -85
+KPX A quotedblright -85
+KPX A Y -80
+KPX A W -60
+KPX A V -102
+KPX A U -40
+KPX A T -25
+KPX A Q -40
+KPX A O -50
+KPX A G -40
+KPX A C -40
+
+KPX B A -10
+
+KPX C A -40
+
+KPX D period -50
+KPX D comma -50
+KPX D Y -45
+KPX D W -30
+KPX D V -50
+KPX D A -50
+
+KPX F period -175
+KPX F e -20
+KPX F comma -175
+KPX F a -20
+KPX F A -75
+
+KPX G period -40
+KPX G comma -40
+KPX G Y -15
+
+KPX J period -15
+KPX J a -20
+KPX J A -30
+
+KPX K y -25
+KPX K u -35
+KPX K o -45
+KPX K e -20
+KPX K O -30
+
+KPX L y -23
+KPX L quoteright -100
+KPX L quotedblright -100
+KPX L Y -80
+KPX L W -55
+KPX L V -113
+KPX L T -46
+
+KPX O period -50
+KPX O comma -50
+KPX O Y -40
+KPX O X -30
+KPX O W -20
+KPX O V -45
+KPX O T -15
+KPX O A -60
+
+KPX P period -240
+KPX P o -20
+KPX P e -20
+KPX P comma -240
+KPX P a -20
+KPX P A -100
+
+KPX R Y -10
+KPX R W 10
+KPX R V -10
+KPX R T 15
+
+KPX T y -30
+KPX T w -55
+KPX T u -46
+KPX T semicolon -29
+KPX T r -30
+KPX T period -91
+KPX T o -49
+KPX T hyphen -75
+KPX T e -49
+KPX T comma -82
+KPX T colon -15
+KPX T a -70
+KPX T O -15
+KPX T A -25
+
+KPX U period -20
+KPX U comma -20
+KPX U A -40
+
+KPX V u -55
+KPX V semicolon -33
+KPX V period -145
+KPX V o -101
+KPX V i -35
+KPX V hyphen -90
+KPX V e -101
+KPX V comma -145
+KPX V colon -18
+KPX V a -104
+KPX V O -45
+KPX V G -20
+KPX V A -102
+
+KPX W y -20
+KPX W u -30
+KPX W semicolon -33
+KPX W period -106
+KPX W o -46
+KPX W i -10
+KPX W hyphen -50
+KPX W e -47
+KPX W comma -106
+KPX W colon -15
+KPX W a -50
+KPX W O -20
+KPX W A -58
+
+KPX Y u -85
+KPX Y semicolon -23
+KPX Y period -145
+KPX Y o -89
+KPX Y i -15
+KPX Y hyphen -105
+KPX Y e -89
+KPX Y comma -145
+KPX Y colon -10
+KPX Y a -93
+KPX Y O -40
+KPX Y A -80
+
+KPX a t 5
+KPX a p 20
+KPX a b 5
+
+KPX b y -20
+KPX b v -20
+KPX b u -10
+
+KPX c y -20
+KPX c k -15
+
+KPX comma space -70
+KPX comma quoteright -100
+KPX comma quotedblright -100
+
+KPX e y -20
+KPX e w -20
+KPX e v -20
+
+KPX f period -50
+KPX f o -20
+KPX f l -30
+KPX f i -30
+KPX f f -15
+KPX f dotlessi -30
+KPX f comma -50
+KPX f a -20
+
+KPX g a -15
+
+KPX h y -30
+
+KPX k y -25
+KPX k o -45
+KPX k e -35
+
+KPX l w -20
+
+KPX m y -20
+KPX m u -20
+
+KPX n y -15
+KPX n v -30
+KPX n u -15
+
+KPX o y -20
+KPX o x -15
+KPX o w -20
+KPX o v -30
+KPX o period -25
+KPX o comma -25
+
+KPX p y -20
+KPX p period -25
+KPX p comma -25
+
+KPX period space -70
+KPX period quoteright -100
+KPX period quotedblright -100
+
+KPX quotedblleft A -85
+
+KPX quotedblright space -100
+
+KPX quoteleft quoteleft -121
+KPX quoteleft A -85
+
+KPX quoteright v -20
+KPX quoteright t 10
+KPX quoteright space -100
+KPX quoteright s -15
+KPX quoteright r -20
+KPX quoteright quoteright -121
+KPX quoteright d -70
+
+KPX r y 40
+KPX r v 40
+KPX r u 20
+KPX r t 40
+KPX r s 20
+KPX r q -8
+KPX r period -73
+KPX r p 20
+KPX r o -20
+KPX r n 21
+KPX r m 28
+KPX r l 20
+KPX r k 20
+KPX r i 20
+KPX r hyphen -60
+KPX r g 1
+KPX r e -4
+KPX r d -6
+KPX r comma -75
+KPX r c -7
+
+KPX s t 15
+KPX s period 20
+KPX s comma 20
+
+KPX space quoteleft -100
+KPX space quotedblleft -100
+KPX space Y -60
+KPX space W -25
+KPX space V -80
+KPX space T -25
+KPX space A -20
+
+KPX u z 15
+
+KPX v period -90
+KPX v o -20
+KPX v e -20
+KPX v comma -90
+KPX v a -30
+
+KPX w period -90
+KPX w o -30
+KPX w h 15
+KPX w e -20
+KPX w comma -90
+KPX w a -30
+
+KPX x i 15
+
+KPX y period -85
+KPX y o -30
+KPX y e -20
+KPX y comma -100
+KPX y a -30
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 65 161 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 65 161 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 65 161 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 65 161 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 65 151 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 65 166 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute -17 166 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex -17 166 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis -17 166 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave -17 166 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -109 166 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -149 166 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -149 166 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -189 166 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 92 166 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 146 166 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 146 166 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 146 166 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 146 166 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 146 166 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron -28 166 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 69 166 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 44 166 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 44 166 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 19 166 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 44 166 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 19 166 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron -26 166 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 69 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 69 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 69 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 69 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 69 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 69 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 44 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 44 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 44 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 44 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -118 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -158 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -158 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -198 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 35 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 60 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 60 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 60 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 60 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 60 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron -65 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 60 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 35 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 35 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 10 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 35 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 10 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron -54 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/AG-MdO b/font/AG-MdO
new file mode 100644
index 0000000..c2b0eb8
--- /dev/null
+++ b/font/AG-MdO
@@ -0,0 +1,581 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Feb 19 18:22:11 1991
+Comment UniqueID 34235
+Comment VMusage 6123 38590
+FontName AvantGarde-MediumObl
+FullName ITC Avant Garde Gothic Medium Oblique
+FamilyName ITC Avant Garde Gothic
+Weight Medium
+ItalicAngle -10.5
+IsFixedPitch false
+FontBBox -98 -257 1209 982
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1991 Adobe Systems Incorporated.  All Rights Reserved.ITC Avant Garde Gothic is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 740
+XHeight 554
+Ascender 740
+Descender -185
+StartCharMetrics 228
+C 32 ; WX 277 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 277 ; N exclam ; B 87 0 328 740 ;
+C 34 ; WX 325 ; N quotedbl ; B 121 444 443 740 ;
+C 35 ; WX 555 ; N numbersign ; B 68 0 616 700 ;
+C 36 ; WX 555 ; N dollar ; B 108 -82 579 823 ;
+C 37 ; WX 837 ; N percent ; B 155 -13 818 751 ;
+C 38 ; WX 684 ; N ampersand ; B 69 -14 732 754 ;
+C 39 ; WX 277 ; N quoteright ; B 178 490 328 740 ;
+C 40 ; WX 407 ; N parenleft ; B 92 -257 491 755 ;
+C 41 ; WX 407 ; N parenright ; B 8 -257 407 755 ;
+C 42 ; WX 573 ; N asterisk ; B 203 377 585 740 ;
+C 43 ; WX 600 ; N plus ; B 85 0 609 506 ;
+C 44 ; WX 277 ; N comma ; B 63 -127 214 122 ;
+C 45 ; WX 280 ; N hyphen ; B 44 237 343 341 ;
+C 46 ; WX 277 ; N period ; B 87 0 214 122 ;
+C 47 ; WX 499 ; N slash ; B 22 -100 580 740 ;
+C 48 ; WX 555 ; N zero ; B 76 -14 617 755 ;
+C 49 ; WX 555 ; N one ; B 257 0 498 740 ;
+C 50 ; WX 555 ; N two ; B 41 0 603 754 ;
+C 51 ; WX 555 ; N three ; B 59 -14 575 754 ;
+C 52 ; WX 555 ; N four ; B 33 0 591 740 ;
+C 53 ; WX 555 ; N five ; B 65 -14 596 740 ;
+C 54 ; WX 555 ; N six ; B 66 -14 588 740 ;
+C 55 ; WX 555 ; N seven ; B 113 0 637 740 ;
+C 56 ; WX 555 ; N eight ; B 79 -14 584 754 ;
+C 57 ; WX 555 ; N nine ; B 104 0 625 754 ;
+C 58 ; WX 277 ; N colon ; B 87 0 294 555 ;
+C 59 ; WX 277 ; N semicolon ; B 63 -127 294 555 ;
+C 60 ; WX 600 ; N less ; B 85 -8 649 514 ;
+C 61 ; WX 600 ; N equal ; B 65 92 629 414 ;
+C 62 ; WX 600 ; N greater ; B 45 -8 609 514 ;
+C 63 ; WX 518 ; N question ; B 130 0 580 754 ;
+C 64 ; WX 760 ; N at ; B 72 -13 834 753 ;
+C 65 ; WX 684 ; N A ; B 13 0 672 740 ;
+C 66 ; WX 580 ; N B ; B 75 0 600 740 ;
+C 67 ; WX 782 ; N C ; B 101 -14 861 754 ;
+C 68 ; WX 732 ; N D ; B 65 0 757 740 ;
+C 69 ; WX 520 ; N E ; B 65 0 601 740 ;
+C 70 ; WX 482 ; N F ; B 65 0 576 740 ;
+C 71 ; WX 831 ; N G ; B 100 -14 867 754 ;
+C 72 ; WX 670 ; N H ; B 75 0 733 740 ;
+C 73 ; WX 257 ; N I ; B 75 0 320 740 ;
+C 74 ; WX 487 ; N J ; B 27 -14 545 740 ;
+C 75 ; WX 618 ; N K ; B 90 0 751 740 ;
+C 76 ; WX 444 ; N L ; B 79 0 462 740 ;
+C 77 ; WX 934 ; N M ; B 75 0 997 740 ;
+C 78 ; WX 738 ; N N ; B 75 0 800 740 ;
+C 79 ; WX 846 ; N O ; B 100 -14 883 754 ;
+C 80 ; WX 559 ; N P ; B 65 0 640 740 ;
+C 81 ; WX 837 ; N Q ; B 100 -14 875 754 ;
+C 82 ; WX 594 ; N R ; B 65 0 657 740 ;
+C 83 ; WX 499 ; N S ; B 54 -14 564 754 ;
+C 84 ; WX 407 ; N T ; B 126 0 536 740 ;
+C 85 ; WX 643 ; N U ; B 112 -14 706 740 ;
+C 86 ; WX 684 ; N V ; B 149 0 809 740 ;
+C 87 ; WX 906 ; N W ; B 153 0 1027 740 ;
+C 88 ; WX 648 ; N X ; B 11 0 773 740 ;
+C 89 ; WX 593 ; N Y ; B 150 0 716 740 ;
+C 90 ; WX 462 ; N Z ; B 4 0 583 740 ;
+C 91 ; WX 407 ; N bracketleft ; B 124 -257 469 755 ;
+C 92 ; WX 499 ; N backslash ; B 193 -100 439 740 ;
+C 93 ; WX 407 ; N bracketright ; B 30 -257 374 755 ;
+C 94 ; WX 600 ; N asciicircum ; B 132 355 600 740 ;
+C 95 ; WX 500 ; N underscore ; B -23 -125 486 -75 ;
+C 96 ; WX 277 ; N quoteleft ; B 177 490 327 740 ;
+C 97 ; WX 693 ; N a ; B 84 -14 729 569 ;
+C 98 ; WX 688 ; N b ; B 67 -14 706 740 ;
+C 99 ; WX 627 ; N c ; B 84 -14 664 569 ;
+C 100 ; WX 687 ; N d ; B 84 -14 757 740 ;
+C 101 ; WX 642 ; N e ; B 86 -14 662 569 ;
+C 102 ; WX 277 ; N f ; B 70 0 408 740 ; L i fi ; L l fl ;
+C 103 ; WX 697 ; N g ; B 50 -218 734 569 ;
+C 104 ; WX 622 ; N h ; B 66 0 624 740 ;
+C 105 ; WX 238 ; N i ; B 67 0 308 740 ;
+C 106 ; WX 249 ; N j ; B -29 -218 321 740 ;
+C 107 ; WX 546 ; N k ; B 77 0 606 740 ;
+C 108 ; WX 238 ; N l ; B 67 0 308 740 ;
+C 109 ; WX 971 ; N m ; B 67 0 973 569 ;
+C 110 ; WX 624 ; N n ; B 66 0 624 569 ;
+C 111 ; WX 675 ; N o ; B 85 -14 692 569 ;
+C 112 ; WX 686 ; N p ; B 33 -185 704 569 ;
+C 113 ; WX 687 ; N q ; B 86 -185 723 569 ;
+C 114 ; WX 320 ; N r ; B 67 0 412 569 ;
+C 115 ; WX 424 ; N s ; B 50 -14 467 569 ;
+C 116 ; WX 277 ; N t ; B 79 0 377 740 ;
+C 117 ; WX 624 ; N u ; B 104 -14 660 554 ;
+C 118 ; WX 537 ; N v ; B 116 0 627 554 ;
+C 119 ; WX 795 ; N w ; B 116 0 885 554 ;
+C 120 ; WX 518 ; N x ; B 2 0 607 554 ;
+C 121 ; WX 574 ; N y ; B 113 -185 667 554 ;
+C 122 ; WX 407 ; N z ; B 3 0 486 554 ;
+C 123 ; WX 333 ; N braceleft ; B 57 -198 445 740 ;
+C 124 ; WX 555 ; N bar ; B 202 -100 471 740 ;
+C 125 ; WX 333 ; N braceright ; B -12 -198 377 740 ;
+C 126 ; WX 600 ; N asciitilde ; B 115 167 579 339 ;
+C 161 ; WX 277 ; N exclamdown ; B 52 -185 293 555 ;
+C 162 ; WX 555 ; N cent ; B 110 69 607 740 ;
+C 163 ; WX 555 ; N sterling ; B 42 0 617 754 ;
+C 164 ; WX 186 ; N fraction ; B -98 0 420 740 ;
+C 165 ; WX 555 ; N yen ; B 57 0 692 740 ;
+C 166 ; WX 555 ; N florin ; B -13 -157 673 829 ;
+C 167 ; WX 573 ; N section ; B 63 -222 596 754 ;
+C 168 ; WX 555 ; N currency ; B 52 72 624 574 ;
+C 169 ; WX 218 ; N quotesingle ; B 156 444 301 740 ;
+C 170 ; WX 425 ; N quotedblleft ; B 174 490 480 740 ;
+C 171 ; WX 370 ; N guillemotleft ; B 77 102 425 475 ;
+C 172 ; WX 205 ; N guilsinglleft ; B 78 102 259 475 ;
+C 173 ; WX 205 ; N guilsinglright ; B 53 102 234 475 ;
+C 174 ; WX 486 ; N fi ; B 70 0 556 740 ;
+C 175 ; WX 486 ; N fl ; B 70 0 556 740 ;
+C 177 ; WX 500 ; N endash ; B 79 237 528 341 ;
+C 178 ; WX 573 ; N dagger ; B 149 -222 610 740 ;
+C 179 ; WX 573 ; N daggerdbl ; B 71 -222 616 740 ;
+C 180 ; WX 277 ; N periodcentered ; B 130 200 241 308 ;
+C 182 ; WX 638 ; N paragraph ; B 95 -191 665 700 ;
+C 183 ; WX 606 ; N bullet ; B 217 222 528 532 ;
+C 184 ; WX 277 ; N quotesinglbase ; B 63 -128 214 122 ;
+C 185 ; WX 425 ; N quotedblbase ; B 58 -128 365 122 ;
+C 186 ; WX 425 ; N quotedblright ; B 173 490 479 740 ;
+C 187 ; WX 370 ; N guillemotright ; B 52 102 400 475 ;
+C 188 ; WX 1000 ; N ellipsis ; B 115 0 908 122 ;
+C 189 ; WX 1228 ; N perthousand ; B 155 -13 1209 751 ;
+C 191 ; WX 518 ; N questiondown ; B 41 -199 491 555 ;
+C 193 ; WX 555 ; N grave ; B 261 611 519 814 ;
+C 194 ; WX 555 ; N acute ; B 291 611 567 814 ;
+C 195 ; WX 555 ; N circumflex ; B 205 632 584 767 ;
+C 196 ; WX 555 ; N tilde ; B 225 636 587 745 ;
+C 197 ; WX 555 ; N macron ; B 222 659 591 734 ;
+C 198 ; WX 555 ; N breve ; B 228 636 607 756 ;
+C 199 ; WX 555 ; N dotaccent ; B 343 636 469 758 ;
+C 200 ; WX 555 ; N dieresis ; B 266 636 547 758 ;
+C 202 ; WX 555 ; N ring ; B 299 610 523 831 ;
+C 203 ; WX 555 ; N cedilla ; B 152 -246 347 0 ;
+C 205 ; WX 555 ; N hungarumlaut ; B 214 632 640 767 ;
+C 206 ; WX 555 ; N ogonek ; B 166 -202 345 0 ;
+C 207 ; WX 555 ; N caron ; B 231 632 610 774 ;
+C 208 ; WX 1000 ; N emdash ; B 79 237 1028 341 ;
+C 225 ; WX 930 ; N AE ; B 0 0 1003 740 ;
+C 227 ; WX 385 ; N ordfeminine ; B 120 430 484 754 ;
+C 232 ; WX 444 ; N Lslash ; B 50 0 462 740 ;
+C 233 ; WX 846 ; N Oslash ; B 88 -65 900 802 ;
+C 234 ; WX 1094 ; N OE ; B 99 -14 1185 754 ;
+C 235 ; WX 385 ; N ordmasculine ; B 134 430 471 754 ;
+C 241 ; WX 1131 ; N ae ; B 85 -14 1150 569 ;
+C 245 ; WX 238 ; N dotlessi ; B 67 0 274 554 ;
+C 248 ; WX 284 ; N lslash ; B 71 0 372 740 ;
+C 249 ; WX 675 ; N oslash ; B 84 -69 693 623 ;
+C 250 ; WX 1144 ; N oe ; B 85 -14 1164 569 ;
+C 251 ; WX 640 ; N germandbls ; B 66 -14 646 754 ;
+C -1 ; WX 642 ; N ecircumflex ; B 86 -14 662 767 ;
+C -1 ; WX 642 ; N edieresis ; B 86 -14 662 758 ;
+C -1 ; WX 693 ; N aacute ; B 84 -14 729 814 ;
+C -1 ; WX 800 ; N registered ; B 80 -12 857 752 ;
+C -1 ; WX 238 ; N icircumflex ; B 47 0 426 767 ;
+C -1 ; WX 624 ; N udieresis ; B 104 -14 660 758 ;
+C -1 ; WX 675 ; N ograve ; B 85 -14 692 814 ;
+C -1 ; WX 624 ; N uacute ; B 104 -14 660 814 ;
+C -1 ; WX 624 ; N ucircumflex ; B 104 -14 660 767 ;
+C -1 ; WX 684 ; N Aacute ; B 13 0 672 975 ;
+C -1 ; WX 238 ; N igrave ; B 63 0 321 814 ;
+C -1 ; WX 257 ; N Icircumflex ; B 75 0 466 933 ;
+C -1 ; WX 627 ; N ccedilla ; B 84 -246 664 569 ;
+C -1 ; WX 693 ; N adieresis ; B 84 -14 729 758 ;
+C -1 ; WX 520 ; N Ecircumflex ; B 65 0 601 933 ;
+C -1 ; WX 424 ; N scaron ; B 50 -14 545 774 ;
+C -1 ; WX 686 ; N thorn ; B 33 -185 704 740 ;
+C -1 ; WX 990 ; N trademark ; B 115 288 1033 700 ;
+C -1 ; WX 642 ; N egrave ; B 86 -14 662 814 ;
+C -1 ; WX 351 ; N threesuperior ; B 93 286 414 750 ;
+C -1 ; WX 407 ; N zcaron ; B 3 0 556 774 ;
+C -1 ; WX 693 ; N atilde ; B 84 -14 729 745 ;
+C -1 ; WX 693 ; N aring ; B 84 -14 729 831 ;
+C -1 ; WX 675 ; N ocircumflex ; B 85 -14 692 767 ;
+C -1 ; WX 520 ; N Edieresis ; B 65 0 601 924 ;
+C -1 ; WX 781 ; N threequarters ; B 93 0 799 750 ;
+C -1 ; WX 574 ; N ydieresis ; B 113 -185 667 758 ;
+C -1 ; WX 574 ; N yacute ; B 113 -185 667 814 ;
+C -1 ; WX 238 ; N iacute ; B 67 0 449 814 ;
+C -1 ; WX 684 ; N Acircumflex ; B 13 0 679 928 ;
+C -1 ; WX 643 ; N Uacute ; B 112 -14 706 980 ;
+C -1 ; WX 642 ; N eacute ; B 86 -14 662 814 ;
+C -1 ; WX 846 ; N Ograve ; B 100 -14 883 980 ;
+C -1 ; WX 693 ; N agrave ; B 84 -14 729 814 ;
+C -1 ; WX 643 ; N Udieresis ; B 112 -14 706 924 ;
+C -1 ; WX 693 ; N acircumflex ; B 84 -14 729 767 ;
+C -1 ; WX 257 ; N Igrave ; B 75 0 361 980 ;
+C -1 ; WX 351 ; N twosuperior ; B 83 296 431 750 ;
+C -1 ; WX 643 ; N Ugrave ; B 112 -14 706 980 ;
+C -1 ; WX 700 ; N onequarter ; B 127 0 718 740 ;
+C -1 ; WX 643 ; N Ucircumflex ; B 112 -14 706 933 ;
+C -1 ; WX 499 ; N Scaron ; B 54 -14 613 940 ;
+C -1 ; WX 257 ; N Idieresis ; B 75 0 429 924 ;
+C -1 ; WX 238 ; N idieresis ; B 67 0 389 758 ;
+C -1 ; WX 520 ; N Egrave ; B 65 0 601 980 ;
+C -1 ; WX 846 ; N Oacute ; B 100 -14 883 980 ;
+C -1 ; WX 600 ; N divide ; B 85 0 609 506 ;
+C -1 ; WX 684 ; N Atilde ; B 13 0 683 911 ;
+C -1 ; WX 684 ; N Aring ; B 13 0 672 982 ;
+C -1 ; WX 846 ; N Odieresis ; B 100 -14 883 924 ;
+C -1 ; WX 684 ; N Adieresis ; B 13 0 672 919 ;
+C -1 ; WX 738 ; N Ntilde ; B 75 0 800 911 ;
+C -1 ; WX 462 ; N Zcaron ; B 4 0 615 940 ;
+C -1 ; WX 559 ; N Thorn ; B 65 0 613 740 ;
+C -1 ; WX 257 ; N Iacute ; B 75 0 489 980 ;
+C -1 ; WX 600 ; N plusminus ; B 38 -52 623 546 ;
+C -1 ; WX 600 ; N multiply ; B 77 14 617 492 ;
+C -1 ; WX 520 ; N Eacute ; B 65 0 601 980 ;
+C -1 ; WX 593 ; N Ydieresis ; B 150 0 716 924 ;
+C -1 ; WX 351 ; N onesuperior ; B 214 296 376 740 ;
+C -1 ; WX 624 ; N ugrave ; B 104 -14 660 814 ;
+C -1 ; WX 600 ; N logicalnot ; B 105 108 629 414 ;
+C -1 ; WX 624 ; N ntilde ; B 66 0 624 745 ;
+C -1 ; WX 846 ; N Otilde ; B 100 -14 883 911 ;
+C -1 ; WX 675 ; N otilde ; B 85 -14 692 745 ;
+C -1 ; WX 782 ; N Ccedilla ; B 101 -246 861 754 ;
+C -1 ; WX 684 ; N Agrave ; B 13 0 672 975 ;
+C -1 ; WX 714 ; N onehalf ; B 101 0 757 740 ;
+C -1 ; WX 732 ; N Eth ; B 62 0 757 740 ;
+C -1 ; WX 400 ; N degree ; B 160 426 451 712 ;
+C -1 ; WX 593 ; N Yacute ; B 150 0 716 980 ;
+C -1 ; WX 846 ; N Ocircumflex ; B 100 -14 883 933 ;
+C -1 ; WX 675 ; N oacute ; B 85 -14 692 814 ;
+C -1 ; WX 624 ; N mu ; B 40 -185 653 554 ;
+C -1 ; WX 600 ; N minus ; B 85 201 609 305 ;
+C -1 ; WX 675 ; N eth ; B 85 -14 698 754 ;
+C -1 ; WX 675 ; N odieresis ; B 85 -14 692 758 ;
+C -1 ; WX 800 ; N copyright ; B 80 -12 857 752 ;
+C -1 ; WX 555 ; N brokenbar ; B 202 -100 471 740 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 223
+
+KPX A y -50
+KPX A w -65
+KPX A v -70
+KPX A u -20
+KPX A quoteright -85
+KPX A quotedblright -85
+KPX A Y -80
+KPX A W -60
+KPX A V -102
+KPX A U -40
+KPX A T -25
+KPX A Q -40
+KPX A O -50
+KPX A G -40
+KPX A C -40
+
+KPX B A -10
+
+KPX C A -40
+
+KPX D period -50
+KPX D comma -50
+KPX D Y -45
+KPX D W -30
+KPX D V -50
+KPX D A -50
+
+KPX F period -175
+KPX F e -20
+KPX F comma -175
+KPX F a -20
+KPX F A -75
+
+KPX G period -40
+KPX G comma -40
+KPX G Y -15
+
+KPX J period -15
+KPX J a -20
+KPX J A -30
+
+KPX K y -25
+KPX K u -35
+KPX K o -45
+KPX K e -20
+KPX K O -30
+
+KPX L y -23
+KPX L quoteright -100
+KPX L quotedblright -100
+KPX L Y -80
+KPX L W -55
+KPX L V -113
+KPX L T -46
+
+KPX O period -50
+KPX O comma -50
+KPX O Y -40
+KPX O X -30
+KPX O W -20
+KPX O V -45
+KPX O T -15
+KPX O A -60
+
+KPX P period -240
+KPX P o -20
+KPX P e -20
+KPX P comma -240
+KPX P a -20
+KPX P A -100
+
+KPX R Y -10
+KPX R W 10
+KPX R V -10
+KPX R T 15
+
+KPX T y -30
+KPX T w -55
+KPX T u -46
+KPX T semicolon -29
+KPX T r -30
+KPX T period -91
+KPX T o -49
+KPX T hyphen -75
+KPX T e -49
+KPX T comma -82
+KPX T colon -15
+KPX T a -70
+KPX T O -15
+KPX T A -25
+
+KPX U period -20
+KPX U comma -20
+KPX U A -40
+
+KPX V u -55
+KPX V semicolon -33
+KPX V period -145
+KPX V o -101
+KPX V i -35
+KPX V hyphen -90
+KPX V e -101
+KPX V comma -145
+KPX V colon -18
+KPX V a -104
+KPX V O -45
+KPX V G -20
+KPX V A -102
+
+KPX W y -20
+KPX W u -30
+KPX W semicolon -33
+KPX W period -106
+KPX W o -46
+KPX W i -10
+KPX W hyphen -50
+KPX W e -47
+KPX W comma -106
+KPX W colon -15
+KPX W a -50
+KPX W O -20
+KPX W A -58
+
+KPX Y u -85
+KPX Y semicolon -23
+KPX Y period -145
+KPX Y o -89
+KPX Y i -15
+KPX Y hyphen -105
+KPX Y e -89
+KPX Y comma -145
+KPX Y colon -10
+KPX Y a -93
+KPX Y O -40
+KPX Y A -80
+
+KPX a t 5
+KPX a p 20
+KPX a b 5
+
+KPX b y -20
+KPX b v -20
+KPX b u -10
+
+KPX c y -20
+KPX c k -15
+
+KPX comma space -70
+KPX comma quoteright -100
+KPX comma quotedblright -100
+
+KPX e y -20
+KPX e w -20
+KPX e v -20
+
+KPX f period -50
+KPX f o -20
+KPX f l -30
+KPX f i -30
+KPX f f -15
+KPX f dotlessi -30
+KPX f comma -50
+KPX f a -20
+
+KPX g a -15
+
+KPX h y -30
+
+KPX k y -25
+KPX k o -45
+KPX k e -35
+
+KPX l w -20
+
+KPX m y -20
+KPX m u -20
+
+KPX n y -15
+KPX n v -30
+KPX n u -15
+
+KPX o y -20
+KPX o x -15
+KPX o w -20
+KPX o v -30
+KPX o period -25
+KPX o comma -25
+
+KPX p y -20
+KPX p period -25
+KPX p comma -25
+
+KPX period space -70
+KPX period quoteright -100
+KPX period quotedblright -100
+
+KPX quotedblleft A -85
+
+KPX quotedblright space -100
+
+KPX quoteleft quoteleft -121
+KPX quoteleft A -85
+
+KPX quoteright v -20
+KPX quoteright t 10
+KPX quoteright space -100
+KPX quoteright s -15
+KPX quoteright r -20
+KPX quoteright quoteright -121
+KPX quoteright d -70
+
+KPX r y 40
+KPX r v 40
+KPX r u 20
+KPX r t 40
+KPX r s 20
+KPX r q -8
+KPX r period -73
+KPX r p 20
+KPX r o -20
+KPX r n 21
+KPX r m 28
+KPX r l 20
+KPX r k 20
+KPX r i 20
+KPX r hyphen -60
+KPX r g 1
+KPX r e -4
+KPX r d -6
+KPX r comma -75
+KPX r c -7
+
+KPX s t 15
+KPX s period 20
+KPX s comma 20
+
+KPX space quoteleft -100
+KPX space quotedblleft -100
+KPX space Y -60
+KPX space W -25
+KPX space V -80
+KPX space T -25
+KPX space A -20
+
+KPX u z 15
+
+KPX v period -90
+KPX v o -20
+KPX v e -20
+KPX v comma -90
+KPX v a -30
+
+KPX w period -90
+KPX w o -30
+KPX w h 15
+KPX w e -20
+KPX w comma -90
+KPX w a -30
+
+KPX x i 15
+
+KPX y period -85
+KPX y o -30
+KPX y e -20
+KPX y comma -100
+KPX y a -30
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 95 161 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 95 161 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 95 161 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 95 161 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 93 151 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 96 166 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 14 166 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 14 166 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 14 166 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 14 166 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -78 166 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -118 166 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -118 166 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -158 166 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 123 166 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 177 166 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 177 166 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 177 166 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 177 166 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 177 166 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 3 166 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 100 166 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 75 166 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 75 166 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 50 166 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 75 166 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 50 166 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 5 166 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 69 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 69 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 69 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 69 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 69 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 69 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 44 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 44 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 44 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 44 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -118 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -158 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -158 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -198 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 35 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 60 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 60 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 60 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 60 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 60 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron -65 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 60 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 35 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 35 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 10 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 35 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 10 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron -54 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Bk-Bd b/font/Bk-Bd
new file mode 100644
index 0000000..f79b0e3
--- /dev/null
+++ b/font/Bk-Bd
@@ -0,0 +1,510 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Jun 28 14:55:37 1990
+Comment UniqueID 31726
+Comment VMusage 31065 37957
+FontName Bookman-Bold
+FullName ITC Bookman Bold
+FamilyName ITC Bookman
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -169 -236 1221 968
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.ITC Bookman is a trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 490
+Ascender 706
+Descender -226
+StartCharMetrics 228
+C 32 ; WX 362 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 388 ; N exclam ; B 71 -13 317 681 ;
+C 34 ; WX 500 ; N quotedbl ; B 99 392 401 694 ;
+C 35 ; WX 724 ; N numbersign ; B 113 0 611 674 ;
+C 36 ; WX 724 ; N dollar ; B 71 -105 653 773 ;
+C 37 ; WX 870 ; N percent ; B 32 -16 838 690 ;
+C 38 ; WX 833 ; N ampersand ; B 30 -13 829 694 ;
+C 39 ; WX 278 ; N quoteright ; B 47 392 231 694 ;
+C 40 ; WX 332 ; N parenleft ; B 44 -214 270 688 ;
+C 41 ; WX 332 ; N parenright ; B 62 -214 288 688 ;
+C 42 ; WX 500 ; N asterisk ; B 55 254 445 694 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 362 ; N comma ; B 64 -127 298 195 ;
+C 45 ; WX 388 ; N hyphen ; B 31 185 357 343 ;
+C 46 ; WX 362 ; N period ; B 64 -13 298 195 ;
+C 47 ; WX 278 ; N slash ; B -21 -13 299 694 ;
+C 48 ; WX 724 ; N zero ; B 33 -16 691 690 ;
+C 49 ; WX 724 ; N one ; B 144 0 603 674 ;
+C 50 ; WX 724 ; N two ; B 37 0 678 690 ;
+C 51 ; WX 724 ; N three ; B 26 -16 683 690 ;
+C 52 ; WX 724 ; N four ; B 29 0 695 674 ;
+C 53 ; WX 724 ; N five ; B 38 -16 671 712 ;
+C 54 ; WX 724 ; N six ; B 35 -16 689 690 ;
+C 55 ; WX 724 ; N seven ; B 64 0 686 674 ;
+C 56 ; WX 724 ; N eight ; B 42 -16 682 690 ;
+C 57 ; WX 724 ; N nine ; B 35 -16 689 690 ;
+C 58 ; WX 362 ; N colon ; B 64 -13 298 503 ;
+C 59 ; WX 362 ; N semicolon ; B 64 -127 298 503 ;
+C 60 ; WX 600 ; N less ; B 47 -8 553 514 ;
+C 61 ; WX 600 ; N equal ; B 47 76 553 430 ;
+C 62 ; WX 600 ; N greater ; B 47 -8 553 514 ;
+C 63 ; WX 667 ; N question ; B 39 -13 619 694 ;
+C 64 ; WX 800 ; N at ; B 47 -13 753 694 ;
+C 65 ; WX 778 ; N A ; B -10 0 788 681 ;
+C 66 ; WX 778 ; N B ; B 20 0 741 681 ;
+C 67 ; WX 724 ; N C ; B 36 -13 711 694 ;
+C 68 ; WX 833 ; N D ; B 29 0 797 681 ;
+C 69 ; WX 778 ; N E ; B 20 0 764 681 ;
+C 70 ; WX 724 ; N F ; B 20 0 721 681 ;
+C 71 ; WX 833 ; N G ; B 36 -13 810 694 ;
+C 72 ; WX 833 ; N H ; B 20 0 813 681 ;
+C 73 ; WX 444 ; N I ; B 36 0 408 681 ;
+C 74 ; WX 667 ; N J ; B 2 -13 647 681 ;
+C 75 ; WX 833 ; N K ; B 20 0 829 681 ;
+C 76 ; WX 724 ; N L ; B 20 0 708 681 ;
+C 77 ; WX 944 ; N M ; B 24 0 920 681 ;
+C 78 ; WX 778 ; N N ; B 20 0 758 681 ;
+C 79 ; WX 833 ; N O ; B 36 -13 797 694 ;
+C 80 ; WX 724 ; N P ; B 20 0 704 681 ;
+C 81 ; WX 833 ; N Q ; B 36 -226 797 694 ;
+C 82 ; WX 778 ; N R ; B 20 0 772 681 ;
+C 83 ; WX 724 ; N S ; B 34 -13 690 694 ;
+C 84 ; WX 778 ; N T ; B 6 0 772 681 ;
+C 85 ; WX 778 ; N U ; B 17 -13 761 681 ;
+C 86 ; WX 724 ; N V ; B -7 -6 731 681 ;
+C 87 ; WX 944 ; N W ; B -7 -6 951 681 ;
+C 88 ; WX 778 ; N X ; B 2 0 776 681 ;
+C 89 ; WX 724 ; N Y ; B 0 0 734 681 ;
+C 90 ; WX 724 ; N Z ; B 20 0 704 681 ;
+C 91 ; WX 332 ; N bracketleft ; B 61 -207 271 681 ;
+C 92 ; WX 278 ; N backslash ; B -21 -13 299 694 ;
+C 93 ; WX 332 ; N bracketright ; B 61 -207 271 681 ;
+C 94 ; WX 600 ; N asciicircum ; B 43 309 557 674 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 278 ; N quoteleft ; B 47 392 231 694 ;
+C 97 ; WX 612 ; N a ; B 28 -13 629 503 ;
+C 98 ; WX 667 ; N b ; B 13 -13 639 706 ;
+C 99 ; WX 556 ; N c ; B 28 -13 542 503 ;
+C 100 ; WX 667 ; N d ; B 28 -13 654 706 ;
+C 101 ; WX 556 ; N e ; B 28 -13 528 503 ;
+C 102 ; WX 388 ; N f ; B 18 0 445 714 ; L i fi ; L l fl ;
+C 103 ; WX 612 ; N g ; B 20 -236 616 600 ;
+C 104 ; WX 667 ; N h ; B 18 0 649 706 ;
+C 105 ; WX 388 ; N i ; B 34 0 354 706 ;
+C 106 ; WX 332 ; N j ; B -127 -226 280 706 ;
+C 107 ; WX 667 ; N k ; B 6 0 661 706 ;
+C 108 ; WX 332 ; N l ; B 6 0 326 706 ;
+C 109 ; WX 944 ; N m ; B 18 0 926 503 ;
+C 110 ; WX 667 ; N n ; B 18 0 649 503 ;
+C 111 ; WX 612 ; N o ; B 28 -13 584 503 ;
+C 112 ; WX 667 ; N p ; B 13 -226 639 503 ;
+C 113 ; WX 667 ; N q ; B 28 -226 654 503 ;
+C 114 ; WX 500 ; N r ; B 18 0 501 503 ;
+C 115 ; WX 556 ; N s ; B 30 -13 526 503 ;
+C 116 ; WX 444 ; N t ; B -4 -13 454 637 ;
+C 117 ; WX 667 ; N u ; B 18 -13 649 490 ;
+C 118 ; WX 556 ; N v ; B -2 0 558 490 ;
+C 119 ; WX 778 ; N w ; B 5 0 773 490 ;
+C 120 ; WX 612 ; N x ; B 3 0 609 490 ;
+C 121 ; WX 556 ; N y ; B -15 -226 562 490 ;
+C 122 ; WX 612 ; N z ; B 32 0 580 490 ;
+C 123 ; WX 332 ; N braceleft ; B 31 -207 301 681 ;
+C 124 ; WX 222 ; N bar ; B 41 -13 181 694 ;
+C 125 ; WX 332 ; N braceright ; B 31 -207 301 681 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 148 531 358 ;
+C 161 ; WX 388 ; N exclamdown ; B 71 -191 317 503 ;
+C 162 ; WX 724 ; N cent ; B 111 -37 625 699 ;
+C 163 ; WX 724 ; N sterling ; B 16 -16 689 690 ;
+C 164 ; WX 167 ; N fraction ; B -169 -16 336 690 ;
+C 165 ; WX 724 ; N yen ; B 25 0 711 674 ;
+C 166 ; WX 724 ; N florin ; B 4 -236 701 690 ;
+C 167 ; WX 722 ; N section ; B 146 -13 576 694 ;
+C 168 ; WX 724 ; N currency ; B 81 58 643 616 ;
+C 169 ; WX 278 ; N quotesingle ; B 78 392 200 694 ;
+C 170 ; WX 500 ; N quotedblleft ; B 30 392 470 694 ;
+C 171 ; WX 556 ; N guillemotleft ; B 42 70 500 458 ;
+C 172 ; WX 332 ; N guilsinglleft ; B 36 70 288 458 ;
+C 173 ; WX 332 ; N guilsinglright ; B 44 70 296 458 ;
+C 174 ; WX 724 ; N fi ; B 18 0 690 714 ;
+C 175 ; WX 724 ; N fl ; B 18 0 690 714 ;
+C 177 ; WX 500 ; N endash ; B 0 191 500 337 ;
+C 178 ; WX 722 ; N dagger ; B 151 -13 571 694 ;
+C 179 ; WX 722 ; N daggerdbl ; B 165 -13 557 694 ;
+C 180 ; WX 362 ; N periodcentered ; B 73 151 289 367 ;
+C 182 ; WX 620 ; N paragraph ; B 38 0 567 681 ;
+C 183 ; WX 500 ; N bullet ; B 80 170 420 510 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 47 -126 231 176 ;
+C 185 ; WX 500 ; N quotedblbase ; B 30 -126 470 176 ;
+C 186 ; WX 500 ; N quotedblright ; B 30 392 470 694 ;
+C 187 ; WX 556 ; N guillemotright ; B 56 70 514 458 ;
+C 188 ; WX 1000 ; N ellipsis ; B 50 -13 950 195 ;
+C 189 ; WX 1167 ; N perthousand ; B 0 -16 1221 690 ;
+C 191 ; WX 667 ; N questiondown ; B 48 -203 628 503 ;
+C 193 ; WX 332 ; N grave ; B -1 556 251 754 ;
+C 194 ; WX 332 ; N acute ; B 81 556 333 754 ;
+C 195 ; WX 332 ; N circumflex ; B -21 556 353 740 ;
+C 196 ; WX 332 ; N tilde ; B -33 576 365 728 ;
+C 197 ; WX 332 ; N macron ; B -10 594 342 686 ;
+C 198 ; WX 332 ; N breve ; B 4 556 328 726 ;
+C 199 ; WX 332 ; N dotaccent ; B 87 562 245 720 ;
+C 200 ; WX 332 ; N dieresis ; B -23 562 355 720 ;
+C 202 ; WX 332 ; N ring ; B 44 548 288 792 ;
+C 203 ; WX 332 ; N cedilla ; B 43 -226 289 0 ;
+C 205 ; WX 332 ; N hungarumlaut ; B -30 558 442 756 ;
+C 206 ; WX 332 ; N ogonek ; B 83 -226 327 0 ;
+C 207 ; WX 332 ; N caron ; B -21 556 353 740 ;
+C 208 ; WX 1000 ; N emdash ; B 0 191 1000 337 ;
+C 225 ; WX 1000 ; N AE ; B -30 0 986 681 ;
+C 227 ; WX 398 ; N ordfeminine ; B 8 378 420 690 ;
+C 232 ; WX 724 ; N Lslash ; B 20 0 708 681 ;
+C 233 ; WX 833 ; N Oslash ; B 36 -75 797 756 ;
+C 234 ; WX 1000 ; N OE ; B 10 -13 1009 694 ;
+C 235 ; WX 398 ; N ordmasculine ; B 8 378 390 690 ;
+C 241 ; WX 889 ; N ae ; B 31 -13 858 503 ;
+C 245 ; WX 388 ; N dotlessi ; B 34 0 354 490 ;
+C 248 ; WX 332 ; N lslash ; B 6 0 326 706 ;
+C 249 ; WX 612 ; N oslash ; B 28 -111 584 601 ;
+C 250 ; WX 944 ; N oe ; B 31 -13 913 503 ;
+C 251 ; WX 667 ; N germandbls ; B 8 -13 639 690 ;
+C -1 ; WX 724 ; N Zcaron ; B 20 0 704 911 ;
+C -1 ; WX 556 ; N ccedilla ; B 28 -226 542 503 ;
+C -1 ; WX 556 ; N ydieresis ; B -15 -226 562 720 ;
+C -1 ; WX 612 ; N atilde ; B 28 -13 629 728 ;
+C -1 ; WX 388 ; N icircumflex ; B 7 0 381 740 ;
+C -1 ; WX 481 ; N threesuperior ; B 15 268 466 690 ;
+C -1 ; WX 556 ; N ecircumflex ; B 28 -13 528 740 ;
+C -1 ; WX 667 ; N thorn ; B 13 -226 639 706 ;
+C -1 ; WX 556 ; N egrave ; B 28 -13 528 754 ;
+C -1 ; WX 481 ; N twosuperior ; B 21 274 460 690 ;
+C -1 ; WX 556 ; N eacute ; B 28 -13 528 754 ;
+C -1 ; WX 612 ; N otilde ; B 28 -13 584 728 ;
+C -1 ; WX 778 ; N Aacute ; B -10 0 788 925 ;
+C -1 ; WX 612 ; N ocircumflex ; B 28 -13 584 740 ;
+C -1 ; WX 556 ; N yacute ; B -15 -226 562 754 ;
+C -1 ; WX 667 ; N udieresis ; B 18 -13 649 720 ;
+C -1 ; WX 1083 ; N threequarters ; B 29 -16 1080 690 ;
+C -1 ; WX 612 ; N acircumflex ; B 28 -13 629 740 ;
+C -1 ; WX 833 ; N Eth ; B 29 0 797 681 ;
+C -1 ; WX 556 ; N edieresis ; B 28 -13 528 720 ;
+C -1 ; WX 667 ; N ugrave ; B 18 -13 649 754 ;
+C -1 ; WX 1000 ; N trademark ; B -6 281 986 681 ;
+C -1 ; WX 612 ; N ograve ; B 28 -13 584 754 ;
+C -1 ; WX 556 ; N scaron ; B 30 -13 526 740 ;
+C -1 ; WX 444 ; N Idieresis ; B 33 0 411 891 ;
+C -1 ; WX 667 ; N uacute ; B 18 -13 649 754 ;
+C -1 ; WX 612 ; N agrave ; B 28 -13 629 754 ;
+C -1 ; WX 667 ; N ntilde ; B 18 0 649 728 ;
+C -1 ; WX 612 ; N aring ; B 28 -13 629 792 ;
+C -1 ; WX 612 ; N zcaron ; B 32 0 580 740 ;
+C -1 ; WX 444 ; N Icircumflex ; B 35 0 409 911 ;
+C -1 ; WX 778 ; N Ntilde ; B 20 0 758 899 ;
+C -1 ; WX 667 ; N ucircumflex ; B 18 -13 649 740 ;
+C -1 ; WX 778 ; N Ecircumflex ; B 20 0 764 911 ;
+C -1 ; WX 444 ; N Iacute ; B 36 0 408 925 ;
+C -1 ; WX 724 ; N Ccedilla ; B 36 -226 711 694 ;
+C -1 ; WX 833 ; N Odieresis ; B 36 -13 797 891 ;
+C -1 ; WX 724 ; N Scaron ; B 34 -13 690 911 ;
+C -1 ; WX 778 ; N Edieresis ; B 20 0 764 891 ;
+C -1 ; WX 444 ; N Igrave ; B 36 0 408 925 ;
+C -1 ; WX 612 ; N adieresis ; B 28 -13 629 720 ;
+C -1 ; WX 833 ; N Ograve ; B 36 -13 797 925 ;
+C -1 ; WX 778 ; N Egrave ; B 20 0 764 925 ;
+C -1 ; WX 724 ; N Ydieresis ; B 0 0 734 891 ;
+C -1 ; WX 800 ; N registered ; B 47 -13 753 694 ;
+C -1 ; WX 833 ; N Otilde ; B 36 -13 797 899 ;
+C -1 ; WX 1083 ; N onequarter ; B 88 -16 1060 690 ;
+C -1 ; WX 778 ; N Ugrave ; B 17 -13 761 925 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 17 -13 761 911 ;
+C -1 ; WX 724 ; N Thorn ; B 20 0 704 681 ;
+C -1 ; WX 600 ; N divide ; B 47 -62 553 568 ;
+C -1 ; WX 778 ; N Atilde ; B -10 0 788 899 ;
+C -1 ; WX 778 ; N Uacute ; B 17 -13 761 925 ;
+C -1 ; WX 833 ; N Ocircumflex ; B 36 -13 797 911 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 102 553 430 ;
+C -1 ; WX 778 ; N Aring ; B -10 0 788 968 ;
+C -1 ; WX 388 ; N idieresis ; B 5 0 383 720 ;
+C -1 ; WX 388 ; N iacute ; B 34 0 361 754 ;
+C -1 ; WX 612 ; N aacute ; B 28 -13 629 754 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 57 10 543 496 ;
+C -1 ; WX 778 ; N Udieresis ; B 17 -13 761 891 ;
+C -1 ; WX 600 ; N minus ; B 47 183 553 323 ;
+C -1 ; WX 481 ; N onesuperior ; B 93 274 405 684 ;
+C -1 ; WX 778 ; N Eacute ; B 20 0 764 925 ;
+C -1 ; WX 778 ; N Acircumflex ; B -10 0 788 911 ;
+C -1 ; WX 800 ; N copyright ; B 47 -13 753 694 ;
+C -1 ; WX 778 ; N Agrave ; B -10 0 788 925 ;
+C -1 ; WX 612 ; N odieresis ; B 28 -13 584 720 ;
+C -1 ; WX 612 ; N oacute ; B 28 -13 584 754 ;
+C -1 ; WX 400 ; N degree ; B 47 384 353 690 ;
+C -1 ; WX 388 ; N igrave ; B 27 0 354 754 ;
+C -1 ; WX 667 ; N mu ; B 18 -226 649 490 ;
+C -1 ; WX 833 ; N Oacute ; B 36 -13 797 925 ;
+C -1 ; WX 612 ; N eth ; B 28 -13 584 754 ;
+C -1 ; WX 778 ; N Adieresis ; B -10 0 788 891 ;
+C -1 ; WX 724 ; N Yacute ; B 0 0 734 925 ;
+C -1 ; WX 222 ; N brokenbar ; B 41 -13 181 694 ;
+C -1 ; WX 1083 ; N onehalf ; B 48 -16 1048 690 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 162
+
+KPX A y -37
+KPX A w -27
+KPX A v -37
+KPX A quoteright -92
+KPX A quotedblright -92
+KPX A Y -74
+KPX A W -55
+KPX A V -90
+KPX A U -37
+KPX A T -74
+KPX A Q -18
+KPX A O -18
+KPX A G -18
+KPX A C -18
+
+KPX B period -50
+KPX B comma -50
+KPX B U -18
+KPX B A -18
+
+KPX D period -70
+KPX D comma -70
+KPX D Y -70
+KPX D W -37
+KPX D V -37
+KPX D A -30
+
+KPX F r -30
+KPX F period -129
+KPX F o -70
+KPX F i -25
+KPX F e -70
+KPX F comma -129
+KPX F a -70
+KPX F A -120
+
+KPX G period -55
+KPX G comma -55
+
+KPX J u -18
+KPX J period -74
+KPX J o -18
+KPX J e -18
+KPX J comma -18
+KPX J a -18
+KPX J A -55
+
+KPX K y -40
+KPX K u -30
+KPX K o -18
+KPX K e -18
+KPX K O -37
+
+KPX L y -37
+KPX L quoteright -100
+KPX L quotedblright -74
+KPX L Y -120
+KPX L W -100
+KPX L V -120
+KPX L T -129
+
+KPX N period -70
+KPX N comma -70
+KPX N A -18
+
+KPX O period -70
+KPX O comma -70
+KPX O Y -37
+KPX O X -37
+KPX O W -18
+KPX O V -37
+KPX O T -37
+KPX O A -37
+
+KPX P period -129
+KPX P o -55
+KPX P e -55
+KPX P comma -129
+KPX P a -55
+KPX P A -74
+
+KPX Q period -18
+KPX Q comma -18
+
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R T -18
+KPX R O -18
+
+KPX S period -62
+KPX S comma -62
+
+KPX T y -55
+KPX T w -55
+KPX T u -55
+KPX T semicolon -60
+KPX T r -55
+KPX T period -111
+KPX T o -74
+KPX T i -37
+KPX T hyphen -92
+KPX T e -74
+KPX T comma -111
+KPX T colon -60
+KPX T a -74
+KPX T O -37
+KPX T A -55
+
+KPX U period -75
+KPX U comma -75
+
+KPX V u -37
+KPX V semicolon -74
+KPX V period -129
+KPX V o -55
+KPX V i -18
+KPX V hyphen -74
+KPX V e -55
+KPX V comma -129
+KPX V colon -74
+KPX V a -55
+KPX V A -55
+
+KPX W u -18
+KPX W semicolon -55
+KPX W period -111
+KPX W o -37
+KPX W hyphen -55
+KPX W e -37
+KPX W comma -111
+KPX W colon -55
+KPX W a -37
+KPX W A -37
+
+KPX Y u -37
+KPX Y semicolon -55
+KPX Y period -92
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -55
+KPX Y e -55
+KPX Y comma -92
+KPX Y colon -55
+KPX Y a -55
+KPX Y O -18
+KPX Y A -74
+
+KPX comma quoteright -55
+KPX comma quotedblright -55
+
+KPX e period -55
+KPX e comma -55
+
+KPX f quoteright 37
+KPX f quotedblright 45
+KPX f period -37
+KPX f comma -37
+
+KPX g period -37
+KPX g comma -37
+
+KPX period quoteright -55
+KPX period quotedblright -55
+
+KPX quotedblleft A -37
+
+KPX quoteleft quoteleft -22
+KPX quoteleft A -37
+
+KPX quoteright s -37
+KPX quoteright quoteright -22
+KPX quoteright d -55
+
+KPX r period -92
+KPX r hyphen -37
+KPX r comma -92
+
+KPX space quotedblleft -37
+KPX space Y -37
+KPX space W -37
+KPX space V -37
+KPX space T -37
+KPX space A -37
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -74
+KPX y comma -74
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 223 171 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 223 171 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 223 171 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 223 171 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 223 176 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 223 171 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 196 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 223 171 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 223 171 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 223 171 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 223 171 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 56 171 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 56 171 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 56 171 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 56 171 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 223 171 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 251 171 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 251 171 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 251 171 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 251 171 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 251 171 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 196 171 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 223 171 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 223 171 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 223 171 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 223 171 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 196 171 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 216 171 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 196 171 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 140 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 140 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 140 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 140 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 140 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 140 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 112 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 112 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 112 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 112 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 112 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 28 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 28 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 28 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 28 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 168 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 140 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 140 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 140 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 140 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 140 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 112 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 168 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 168 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 168 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 168 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 112 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 132 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 140 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Bk-BdIt b/font/Bk-BdIt
new file mode 100644
index 0000000..0c1c53d
--- /dev/null
+++ b/font/Bk-BdIt
@@ -0,0 +1,509 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Jun 28 15:13:31 1990
+Comment UniqueID 31732
+Comment VMusage 30421 37313
+FontName Bookman-BoldItalic
+FullName ITC Bookman Bold Italic
+FamilyName ITC Bookman
+Weight Bold
+ItalicAngle -12
+IsFixedPitch false
+FontBBox -254 -236 1186 950
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.ITC Bookman is a trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 503
+Ascender 706
+Descender -226
+StartCharMetrics 228
+C 32 ; WX 362 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 444 ; N exclam ; B 77 -13 413 694 ;
+C 34 ; WX 556 ; N quotedbl ; B 165 371 496 694 ;
+C 35 ; WX 724 ; N numbersign ; B 127 0 657 674 ;
+C 36 ; WX 724 ; N dollar ; B 64 -98 674 778 ;
+C 37 ; WX 870 ; N percent ; B 50 -16 851 690 ;
+C 38 ; WX 944 ; N ampersand ; B 23 -13 954 694 ;
+C 39 ; WX 278 ; N quoteright ; B 98 371 314 694 ;
+C 40 ; WX 389 ; N parenleft ; B 67 -235 440 697 ;
+C 41 ; WX 389 ; N parenright ; B -41 -235 332 697 ;
+C 42 ; WX 500 ; N asterisk ; B 97 254 495 694 ;
+C 43 ; WX 600 ; N plus ; B 72 0 578 506 ;
+C 44 ; WX 362 ; N comma ; B 79 -116 295 207 ;
+C 45 ; WX 333 ; N hyphen ; B 22 191 333 337 ;
+C 46 ; WX 362 ; N period ; B 73 -13 295 207 ;
+C 47 ; WX 278 ; N slash ; B -4 -13 335 694 ;
+C 48 ; WX 724 ; N zero ; B 55 -16 724 690 ;
+C 49 ; WX 724 ; N one ; B 106 0 587 674 ;
+C 50 ; WX 724 ; N two ; B 66 0 687 690 ;
+C 51 ; WX 724 ; N three ; B 52 -16 681 690 ;
+C 52 ; WX 724 ; N four ; B 37 0 722 674 ;
+C 53 ; WX 724 ; N five ; B 78 -16 671 674 ;
+C 54 ; WX 724 ; N six ; B 77 -16 706 690 ;
+C 55 ; WX 724 ; N seven ; B 76 0 725 674 ;
+C 56 ; WX 724 ; N eight ; B 65 -16 684 690 ;
+C 57 ; WX 724 ; N nine ; B 59 -16 706 690 ;
+C 58 ; WX 362 ; N colon ; B 73 -13 336 503 ;
+C 59 ; WX 362 ; N semicolon ; B 79 -116 336 503 ;
+C 60 ; WX 600 ; N less ; B 72 -8 578 514 ;
+C 61 ; WX 600 ; N equal ; B 72 76 578 430 ;
+C 62 ; WX 600 ; N greater ; B 72 -8 578 514 ;
+C 63 ; WX 667 ; N question ; B 74 -13 662 694 ;
+C 64 ; WX 800 ; N at ; B 77 -13 783 694 ;
+C 65 ; WX 778 ; N A ; B -34 0 770 681 ;
+C 66 ; WX 778 ; N B ; B 12 0 785 681 ;
+C 67 ; WX 778 ; N C ; B 56 -13 751 694 ;
+C 68 ; WX 833 ; N D ; B -5 0 833 681 ;
+C 69 ; WX 778 ; N E ; B -5 0 791 681 ;
+C 70 ; WX 722 ; N F ; B -5 0 761 681 ;
+C 71 ; WX 833 ; N G ; B 56 -13 849 694 ;
+C 72 ; WX 833 ; N H ; B -5 0 885 681 ;
+C 73 ; WX 444 ; N I ; B 3 0 488 681 ;
+C 74 ; WX 667 ; N J ; B 32 -13 732 681 ;
+C 75 ; WX 833 ; N K ; B -5 0 855 681 ;
+C 76 ; WX 667 ; N L ; B -5 0 698 681 ;
+C 77 ; WX 889 ; N M ; B -9 0 946 681 ;
+C 78 ; WX 778 ; N N ; B -5 0 829 681 ;
+C 79 ; WX 833 ; N O ; B 56 -13 833 694 ;
+C 80 ; WX 722 ; N P ; B -5 0 743 681 ;
+C 81 ; WX 833 ; N Q ; B -43 -226 833 694 ;
+C 82 ; WX 778 ; N R ; B -5 0 773 681 ;
+C 83 ; WX 722 ; N S ; B 40 -13 705 694 ;
+C 84 ; WX 722 ; N T ; B 52 0 764 681 ;
+C 85 ; WX 722 ; N U ; B 76 -13 806 681 ;
+C 86 ; WX 722 ; N V ; B 60 -6 812 681 ;
+C 87 ; WX 944 ; N W ; B 70 -6 1023 681 ;
+C 88 ; WX 722 ; N X ; B -36 0 782 681 ;
+C 89 ; WX 722 ; N Y ; B 72 0 801 681 ;
+C 90 ; WX 722 ; N Z ; B 0 0 740 681 ;
+C 91 ; WX 389 ; N bracketleft ; B 37 -219 382 681 ;
+C 92 ; WX 278 ; N backslash ; B -4 -13 335 694 ;
+C 93 ; WX 389 ; N bracketright ; B 22 -219 367 681 ;
+C 94 ; WX 600 ; N asciicircum ; B 76 309 590 674 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 278 ; N quoteleft ; B 81 371 297 694 ;
+C 97 ; WX 722 ; N a ; B 46 -13 737 503 ;
+C 98 ; WX 667 ; N b ; B 38 -13 655 706 ;
+C 99 ; WX 611 ; N c ; B 33 -13 600 503 ;
+C 100 ; WX 722 ; N d ; B 33 -13 725 706 ;
+C 101 ; WX 611 ; N e ; B 33 -13 606 503 ;
+C 102 ; WX 389 ; N f ; B -254 -236 556 714 ; L i fi ; L l fl ;
+C 103 ; WX 667 ; N g ; B -34 -236 667 503 ;
+C 104 ; WX 722 ; N h ; B 53 -13 749 706 ;
+C 105 ; WX 389 ; N i ; B 51 -13 425 706 ;
+C 106 ; WX 389 ; N j ; B -197 -226 381 706 ;
+C 107 ; WX 722 ; N k ; B 38 -13 734 706 ;
+C 108 ; WX 389 ; N l ; B 64 -13 416 706 ;
+C 109 ; WX 944 ; N m ; B 53 -13 963 503 ;
+C 110 ; WX 722 ; N n ; B 53 -13 749 503 ;
+C 111 ; WX 667 ; N o ; B 33 -13 647 503 ;
+C 112 ; WX 667 ; N p ; B -52 -226 655 503 ;
+C 113 ; WX 667 ; N q ; B 33 -226 632 503 ;
+C 114 ; WX 500 ; N r ; B 49 0 562 503 ;
+C 115 ; WX 611 ; N s ; B 10 -13 575 503 ;
+C 116 ; WX 444 ; N t ; B 54 -13 461 637 ;
+C 117 ; WX 722 ; N u ; B 69 -13 741 490 ;
+C 118 ; WX 611 ; N v ; B 53 -13 592 503 ;
+C 119 ; WX 889 ; N w ; B 53 -13 875 503 ;
+C 120 ; WX 611 ; N x ; B -33 -13 637 503 ;
+C 121 ; WX 667 ; N y ; B 5 -226 652 503 ;
+C 122 ; WX 611 ; N z ; B 29 -13 596 503 ;
+C 123 ; WX 389 ; N braceleft ; B 52 -219 419 681 ;
+C 124 ; WX 222 ; N bar ; B 67 -13 207 694 ;
+C 125 ; WX 389 ; N braceright ; B -14 -219 353 681 ;
+C 126 ; WX 600 ; N asciitilde ; B 94 148 556 358 ;
+C 161 ; WX 444 ; N exclamdown ; B 41 -204 377 503 ;
+C 162 ; WX 724 ; N cent ; B 113 -36 680 699 ;
+C 163 ; WX 724 ; N sterling ; B -26 -16 761 690 ;
+C 164 ; WX 167 ; N fraction ; B -137 -16 368 690 ;
+C 165 ; WX 724 ; N yen ; B 93 0 780 674 ;
+C 166 ; WX 724 ; N florin ; B -24 -236 739 690 ;
+C 167 ; WX 611 ; N section ; B 85 -13 551 694 ;
+C 168 ; WX 724 ; N currency ; B 111 58 673 616 ;
+C 169 ; WX 278 ; N quotesingle ; B 134 371 262 694 ;
+C 170 ; WX 556 ; N quotedblleft ; B 89 371 587 694 ;
+C 171 ; WX 556 ; N guillemotleft ; B 37 74 527 454 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 41 74 323 454 ;
+C 173 ; WX 333 ; N guilsinglright ; B 23 74 305 454 ;
+C 174 ; WX 667 ; N fi ; B -225 -236 703 714 ;
+C 175 ; WX 667 ; N fl ; B -225 -236 703 714 ;
+C 177 ; WX 500 ; N endash ; B -2 197 526 331 ;
+C 178 ; WX 611 ; N dagger ; B 137 -13 553 694 ;
+C 179 ; WX 611 ; N daggerdbl ; B 111 -13 539 694 ;
+C 180 ; WX 362 ; N periodcentered ; B 76 151 292 367 ;
+C 182 ; WX 620 ; N paragraph ; B 65 0 647 681 ;
+C 183 ; WX 500 ; N bullet ; B 105 170 445 510 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 13 -116 229 207 ;
+C 185 ; WX 556 ; N quotedblbase ; B 35 -116 530 207 ;
+C 186 ; WX 556 ; N quotedblright ; B 86 371 584 694 ;
+C 187 ; WX 556 ; N guillemotright ; B 52 74 535 454 ;
+C 188 ; WX 1000 ; N ellipsis ; B 73 -13 961 207 ;
+C 189 ; WX 1167 ; N perthousand ; B 33 -16 1186 690 ;
+C 191 ; WX 667 ; N questiondown ; B 15 -204 603 503 ;
+C 193 ; WX 333 ; N grave ; B 103 560 335 750 ;
+C 194 ; WX 333 ; N acute ; B 150 560 409 750 ;
+C 195 ; WX 333 ; N circumflex ; B 51 560 410 736 ;
+C 196 ; WX 333 ; N tilde ; B 55 580 444 714 ;
+C 197 ; WX 333 ; N macron ; B 60 604 431 690 ;
+C 198 ; WX 333 ; N breve ; B 94 560 425 727 ;
+C 199 ; WX 333 ; N dotaccent ; B 160 560 324 724 ;
+C 200 ; WX 333 ; N dieresis ; B 56 560 435 724 ;
+C 202 ; WX 333 ; N ring ; B 127 560 349 782 ;
+C 203 ; WX 333 ; N cedilla ; B 11 -226 269 2 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 45 560 514 750 ;
+C 206 ; WX 333 ; N ogonek ; B 55 -226 299 0 ;
+C 207 ; WX 333 ; N caron ; B 87 560 442 736 ;
+C 208 ; WX 1000 ; N emdash ; B -2 197 1026 331 ;
+C 225 ; WX 1074 ; N AE ; B -61 0 1087 681 ;
+C 227 ; WX 469 ; N ordfeminine ; B 74 378 523 690 ;
+C 232 ; WX 667 ; N Lslash ; B -5 0 698 681 ;
+C 233 ; WX 833 ; N Oslash ; B 51 -84 838 758 ;
+C 234 ; WX 1130 ; N OE ; B 67 -13 1143 694 ;
+C 235 ; WX 434 ; N ordmasculine ; B 74 378 473 690 ;
+C 241 ; WX 889 ; N ae ; B 27 -13 892 503 ;
+C 245 ; WX 389 ; N dotlessi ; B 51 -13 425 490 ;
+C 248 ; WX 389 ; N lslash ; B 27 -13 419 706 ;
+C 249 ; WX 667 ; N oslash ; B 33 -128 647 604 ;
+C 250 ; WX 944 ; N oe ; B 33 -13 947 503 ;
+C 251 ; WX 722 ; N germandbls ; B -225 -236 702 714 ;
+C -1 ; WX 722 ; N Zcaron ; B 0 0 740 904 ;
+C -1 ; WX 611 ; N ccedilla ; B 33 -226 600 503 ;
+C -1 ; WX 667 ; N ydieresis ; B 5 -226 652 724 ;
+C -1 ; WX 722 ; N atilde ; B 46 -13 737 714 ;
+C -1 ; WX 389 ; N icircumflex ; B 51 -13 438 736 ;
+C -1 ; WX 471 ; N threesuperior ; B 64 268 472 690 ;
+C -1 ; WX 611 ; N ecircumflex ; B 33 -13 606 736 ;
+C -1 ; WX 667 ; N thorn ; B -52 -226 655 706 ;
+C -1 ; WX 611 ; N egrave ; B 33 -13 606 750 ;
+C -1 ; WX 471 ; N twosuperior ; B 64 274 468 690 ;
+C -1 ; WX 611 ; N eacute ; B 33 -13 606 750 ;
+C -1 ; WX 667 ; N otilde ; B 33 -13 647 714 ;
+C -1 ; WX 778 ; N Aacute ; B -34 0 770 918 ;
+C -1 ; WX 667 ; N ocircumflex ; B 33 -13 647 736 ;
+C -1 ; WX 667 ; N yacute ; B 5 -226 652 750 ;
+C -1 ; WX 722 ; N udieresis ; B 69 -13 741 724 ;
+C -1 ; WX 1083 ; N threequarters ; B 104 -16 1047 690 ;
+C -1 ; WX 722 ; N acircumflex ; B 46 -13 737 736 ;
+C -1 ; WX 833 ; N Eth ; B -5 0 833 681 ;
+C -1 ; WX 611 ; N edieresis ; B 33 -13 606 724 ;
+C -1 ; WX 722 ; N ugrave ; B 69 -13 741 750 ;
+C -1 ; WX 1000 ; N trademark ; B 61 281 1053 681 ;
+C -1 ; WX 667 ; N ograve ; B 33 -13 647 750 ;
+C -1 ; WX 611 ; N scaron ; B 10 -13 581 736 ;
+C -1 ; WX 444 ; N Idieresis ; B 3 0 511 892 ;
+C -1 ; WX 722 ; N uacute ; B 69 -13 741 750 ;
+C -1 ; WX 722 ; N agrave ; B 46 -13 737 750 ;
+C -1 ; WX 722 ; N ntilde ; B 53 -13 749 714 ;
+C -1 ; WX 722 ; N aring ; B 46 -13 737 782 ;
+C -1 ; WX 611 ; N zcaron ; B 29 -13 596 736 ;
+C -1 ; WX 444 ; N Icircumflex ; B 3 0 488 904 ;
+C -1 ; WX 778 ; N Ntilde ; B -5 0 829 882 ;
+C -1 ; WX 722 ; N ucircumflex ; B 69 -13 741 736 ;
+C -1 ; WX 778 ; N Ecircumflex ; B -5 0 791 904 ;
+C -1 ; WX 444 ; N Iacute ; B 3 0 488 918 ;
+C -1 ; WX 778 ; N Ccedilla ; B 56 -226 751 694 ;
+C -1 ; WX 833 ; N Odieresis ; B 56 -13 833 892 ;
+C -1 ; WX 722 ; N Scaron ; B 40 -13 705 904 ;
+C -1 ; WX 778 ; N Edieresis ; B -5 0 791 892 ;
+C -1 ; WX 444 ; N Igrave ; B 3 0 488 918 ;
+C -1 ; WX 722 ; N adieresis ; B 46 -13 737 724 ;
+C -1 ; WX 833 ; N Ograve ; B 56 -13 833 918 ;
+C -1 ; WX 778 ; N Egrave ; B -5 0 791 918 ;
+C -1 ; WX 722 ; N Ydieresis ; B 72 0 801 892 ;
+C -1 ; WX 800 ; N registered ; B 77 -13 783 694 ;
+C -1 ; WX 833 ; N Otilde ; B 56 -13 833 882 ;
+C -1 ; WX 1083 ; N onequarter ; B 104 -16 1047 690 ;
+C -1 ; WX 722 ; N Ugrave ; B 76 -13 806 918 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 76 -13 806 904 ;
+C -1 ; WX 722 ; N Thorn ; B -5 0 725 681 ;
+C -1 ; WX 600 ; N divide ; B 72 -62 578 568 ;
+C -1 ; WX 778 ; N Atilde ; B -34 0 770 882 ;
+C -1 ; WX 722 ; N Uacute ; B 76 -13 806 918 ;
+C -1 ; WX 833 ; N Ocircumflex ; B 56 -13 833 904 ;
+C -1 ; WX 600 ; N logicalnot ; B 72 102 578 430 ;
+C -1 ; WX 778 ; N Aring ; B -34 0 770 950 ;
+C -1 ; WX 389 ; N idieresis ; B 51 -13 463 724 ;
+C -1 ; WX 389 ; N iacute ; B 51 -13 437 750 ;
+C -1 ; WX 722 ; N aacute ; B 46 -13 737 750 ;
+C -1 ; WX 600 ; N plusminus ; B 72 0 578 506 ;
+C -1 ; WX 600 ; N multiply ; B 82 10 568 496 ;
+C -1 ; WX 722 ; N Udieresis ; B 76 -13 806 892 ;
+C -1 ; WX 600 ; N minus ; B 72 183 578 323 ;
+C -1 ; WX 471 ; N onesuperior ; B 104 274 417 684 ;
+C -1 ; WX 778 ; N Eacute ; B -5 0 791 918 ;
+C -1 ; WX 778 ; N Acircumflex ; B -34 0 770 904 ;
+C -1 ; WX 800 ; N copyright ; B 77 -13 783 694 ;
+C -1 ; WX 778 ; N Agrave ; B -34 0 770 918 ;
+C -1 ; WX 667 ; N odieresis ; B 33 -13 647 724 ;
+C -1 ; WX 667 ; N oacute ; B 33 -13 647 750 ;
+C -1 ; WX 400 ; N degree ; B 107 384 413 690 ;
+C -1 ; WX 389 ; N igrave ; B 51 -13 425 750 ;
+C -1 ; WX 722 ; N mu ; B 6 -226 741 490 ;
+C -1 ; WX 833 ; N Oacute ; B 56 -13 833 918 ;
+C -1 ; WX 667 ; N eth ; B 33 -13 647 745 ;
+C -1 ; WX 778 ; N Adieresis ; B -34 0 770 892 ;
+C -1 ; WX 722 ; N Yacute ; B 72 0 801 918 ;
+C -1 ; WX 222 ; N brokenbar ; B 67 -13 207 694 ;
+C -1 ; WX 1083 ; N onehalf ; B 104 -16 1029 690 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 160
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A u -18
+KPX A quoteright -92
+KPX A quotedblright -92
+KPX A Y -55
+KPX A W -55
+KPX A V -74
+KPX A U -10
+KPX A T -55
+KPX A Q -10
+KPX A O -18
+KPX A G -18
+KPX A C -18
+
+KPX B period -74
+KPX B comma -74
+KPX B U 10
+
+KPX D period -74
+KPX D comma -74
+KPX D Y -18
+KPX D W -18
+KPX D V -18
+KPX D A -18
+
+KPX F r -15
+KPX F period -129
+KPX F o -54
+KPX F i -15
+KPX F e -54
+KPX F comma -129
+KPX F a -54
+KPX F A -55
+
+KPX G period -74
+KPX G comma -74
+
+KPX J period -100
+KPX J o -10
+KPX J e -10
+KPX J comma -100
+KPX J a -10
+
+KPX K u -25
+KPX K o -25
+KPX K e -25
+KPX K O -37
+
+KPX L y -18
+KPX L quoteright -111
+KPX L quotedblright -91
+KPX L Y -92
+KPX L W -92
+KPX L V -92
+KPX L T -92
+
+KPX N period -91
+KPX N comma -91
+
+KPX O period -74
+KPX O comma -74
+KPX O Y -37
+KPX O A -18
+
+KPX P period -129
+KPX P o -15
+KPX P e -15
+KPX P comma -129
+KPX P a -15
+KPX P A -55
+
+KPX Q period -37
+KPX Q comma -37
+
+KPX R Y -37
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -37
+KPX T w -55
+KPX T u -55
+KPX T semicolon -74
+KPX T r -55
+KPX T period -129
+KPX T o -74
+KPX T i -18
+KPX T hyphen -92
+KPX T e -74
+KPX T comma -129
+KPX T colon -74
+KPX T a -74
+KPX T A -55
+
+KPX U period -74
+KPX U comma -74
+
+KPX V u -37
+KPX V semicolon -74
+KPX V period -129
+KPX V o -55
+KPX V i -18
+KPX V hyphen -55
+KPX V e -55
+KPX V comma -129
+KPX V colon -74
+KPX V a -55
+KPX V A -37
+
+KPX W y -18
+KPX W u -18
+KPX W semicolon -74
+KPX W period -129
+KPX W o -37
+KPX W hyphen -55
+KPX W e -37
+KPX W comma -129
+KPX W colon -74
+KPX W a -37
+KPX W A -37
+
+KPX Y u -55
+KPX Y semicolon -92
+KPX Y period -129
+KPX Y o -74
+KPX Y i -37
+KPX Y hyphen -74
+KPX Y e -74
+KPX Y comma -129
+KPX Y colon -92
+KPX Y a -74
+KPX Y O -37
+KPX Y A -55
+
+KPX b period -37
+KPX b comma -37
+
+KPX c period -27
+KPX c comma -27
+
+KPX d w -10
+KPX d v -10
+KPX d period -18
+KPX d comma -18
+
+KPX e period -37
+KPX e comma -37
+
+KPX f quoteright 54
+KPX f quotedblright 54
+KPX f period -37
+KPX f comma -37
+
+KPX g period -74
+KPX g comma -74
+
+KPX period quoteright -37
+KPX period quotedblright -37
+
+KPX quoteleft quoteleft 4
+KPX quoteleft A -37
+
+KPX quoteright s -37
+KPX quoteright quoteright 4
+
+KPX r y 10
+KPX r period -129
+KPX r hyphen -37
+KPX r comma -129
+
+KPX s w -10
+
+KPX space quoteleft -37
+KPX space quotedblleft -37
+KPX space Y -37
+KPX space W -37
+KPX space V -37
+KPX space T -37
+KPX space A -37
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -74
+KPX w comma -74
+
+KPX y period -74
+KPX y o -18
+KPX y comma -74
+KPX y a -18
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 223 168 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 223 168 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 233 168 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 223 168 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 253 168 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 223 168 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 223 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 223 168 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 223 168 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 243 168 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 223 168 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 56 168 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 56 168 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 76 168 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 56 168 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 223 168 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 250 168 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 250 168 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 270 168 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 250 168 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 250 168 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 195 168 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 195 168 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 195 168 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 215 168 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 195 168 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 195 168 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 215 168 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 195 168 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 195 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 195 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 195 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 195 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 195 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 195 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 139 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 139 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 139 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 139 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 139 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 28 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 28 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 28 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 28 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 195 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 167 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 167 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 167 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 167 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 167 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 139 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 195 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 195 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 195 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 195 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 167 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 167 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 139 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Bk-Dm b/font/Bk-Dm
new file mode 100644
index 0000000..036be6d
--- /dev/null
+++ b/font/Bk-Dm
@@ -0,0 +1,415 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1992 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Jan 21 16:13:29 1992
+Comment UniqueID 37831
+Comment VMusage 31983 38875
+FontName Bookman-Demi
+FullName ITC Bookman Demi
+FamilyName ITC Bookman
+Weight Demi
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -194 -250 1346 934 
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.004
+Notice Copyright (c) 1985, 1987, 1989, 1992 Adobe Systems Incorporated.  All Rights Reserved.ITC Bookman is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 502
+Ascender 725
+Descender -212
+StartCharMetrics 228
+C 32 ; WX 340 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 360 ; N exclam ; B 82 -8 282 698 ;
+C 34 ; WX 420 ; N quotedbl ; B 11 379 369 698 ;
+C 35 ; WX 660 ; N numbersign ; B 84 0 576 681 ;
+C 36 ; WX 660 ; N dollar ; B 48 -119 620 805 ;
+C 37 ; WX 940 ; N percent ; B 12 -8 924 698 ;
+C 38 ; WX 800 ; N ampersand ; B 21 -17 772 698 ;
+C 39 ; WX 320 ; N quoteright ; B 82 440 242 698 ;
+C 40 ; WX 320 ; N parenleft ; B 48 -150 289 749 ;
+C 41 ; WX 320 ; N parenright ; B 20 -150 262 749 ;
+C 42 ; WX 460 ; N asterisk ; B 62 317 405 697 ;
+C 43 ; WX 600 ; N plus ; B 51 9 555 514 ;
+C 44 ; WX 340 ; N comma ; B 78 -124 257 162 ;
+C 45 ; WX 360 ; N hyphen ; B 20 210 340 318 ;
+C 46 ; WX 340 ; N period ; B 76 -8 258 172 ;
+C 47 ; WX 600 ; N slash ; B 50 -149 555 725 ;
+C 48 ; WX 660 ; N zero ; B 30 -17 639 698 ;
+C 49 ; WX 660 ; N one ; B 137 0 568 681 ;
+C 50 ; WX 660 ; N two ; B 41 0 628 698 ;
+C 51 ; WX 660 ; N three ; B 37 -17 631 698 ;
+C 52 ; WX 660 ; N four ; B 19 0 649 681 ;
+C 53 ; WX 660 ; N five ; B 44 -17 623 723 ;
+C 54 ; WX 660 ; N six ; B 34 -17 634 698 ;
+C 55 ; WX 660 ; N seven ; B 36 0 632 681 ;
+C 56 ; WX 660 ; N eight ; B 36 -17 633 698 ;
+C 57 ; WX 660 ; N nine ; B 33 -17 636 698 ;
+C 58 ; WX 340 ; N colon ; B 76 -8 258 515 ;
+C 59 ; WX 340 ; N semicolon ; B 75 -124 259 515 ;
+C 60 ; WX 600 ; N less ; B 49 -9 558 542 ;
+C 61 ; WX 600 ; N equal ; B 51 109 555 421 ;
+C 62 ; WX 600 ; N greater ; B 48 -9 557 542 ;
+C 63 ; WX 660 ; N question ; B 61 -8 608 698 ;
+C 64 ; WX 820 ; N at ; B 60 -17 758 698 ;
+C 65 ; WX 720 ; N A ; B -34 0 763 681 ;
+C 66 ; WX 720 ; N B ; B 20 0 693 681 ;
+C 67 ; WX 740 ; N C ; B 35 -17 724 698 ;
+C 68 ; WX 780 ; N D ; B 20 0 748 681 ;
+C 69 ; WX 720 ; N E ; B 20 0 724 681 ;
+C 70 ; WX 680 ; N F ; B 20 0 686 681 ;
+C 71 ; WX 780 ; N G ; B 35 -17 773 698 ;
+C 72 ; WX 820 ; N H ; B 20 0 800 681 ;
+C 73 ; WX 400 ; N I ; B 20 0 379 681 ;
+C 74 ; WX 640 ; N J ; B -12 -17 622 681 ;
+C 75 ; WX 800 ; N K ; B 20 0 796 681 ;
+C 76 ; WX 640 ; N L ; B 20 0 668 681 ;
+C 77 ; WX 940 ; N M ; B 20 0 924 681 ;
+C 78 ; WX 740 ; N N ; B 20 0 724 681 ;
+C 79 ; WX 800 ; N O ; B 35 -17 769 698 ;
+C 80 ; WX 660 ; N P ; B 20 0 658 681 ;
+C 81 ; WX 800 ; N Q ; B 35 -226 775 698 ;
+C 82 ; WX 780 ; N R ; B 20 0 783 681 ;
+C 83 ; WX 660 ; N S ; B 21 -17 639 698 ;
+C 84 ; WX 700 ; N T ; B -4 0 703 681 ;
+C 85 ; WX 740 ; N U ; B 15 -17 724 681 ;
+C 86 ; WX 720 ; N V ; B -20 0 730 681 ;
+C 87 ; WX 940 ; N W ; B -20 0 963 681 ;
+C 88 ; WX 780 ; N X ; B 1 0 770 681 ;
+C 89 ; WX 700 ; N Y ; B -20 0 718 681 ;
+C 90 ; WX 640 ; N Z ; B 6 0 635 681 ;
+C 91 ; WX 300 ; N bracketleft ; B 75 -138 285 725 ;
+C 92 ; WX 600 ; N backslash ; B 50 0 555 725 ;
+C 93 ; WX 300 ; N bracketright ; B 21 -138 231 725 ;
+C 94 ; WX 600 ; N asciicircum ; B 52 281 554 681 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 320 ; N quoteleft ; B 82 440 242 698 ;
+C 97 ; WX 580 ; N a ; B 28 -8 588 515 ;
+C 98 ; WX 600 ; N b ; B -20 -8 568 725 ;
+C 99 ; WX 580 ; N c ; B 31 -8 550 515 ;
+C 100 ; WX 640 ; N d ; B 31 -8 622 725 ;
+C 101 ; WX 580 ; N e ; B 31 -8 548 515 ;
+C 102 ; WX 380 ; N f ; B 22 0 461 741 ; L i fi ; L l fl ;
+C 103 ; WX 580 ; N g ; B 9 -243 583 595 ;
+C 104 ; WX 680 ; N h ; B 22 0 654 725 ;
+C 105 ; WX 360 ; N i ; B 22 0 335 729 ;
+C 106 ; WX 340 ; N j ; B -94 -221 278 729 ;
+C 107 ; WX 660 ; N k ; B 22 0 643 725 ;
+C 108 ; WX 340 ; N l ; B 9 0 322 725 ;
+C 109 ; WX 1000 ; N m ; B 22 0 980 515 ;
+C 110 ; WX 680 ; N n ; B 22 0 652 515 ;
+C 111 ; WX 620 ; N o ; B 31 -8 585 515 ;
+C 112 ; WX 640 ; N p ; B 22 -212 611 515 ;
+C 113 ; WX 620 ; N q ; B 31 -212 633 515 ;
+C 114 ; WX 460 ; N r ; B 22 0 462 502 ;
+C 115 ; WX 520 ; N s ; B 22 -8 492 515 ;
+C 116 ; WX 460 ; N t ; B 22 -8 445 660 ;
+C 117 ; WX 660 ; N u ; B 22 -8 653 502 ;
+C 118 ; WX 600 ; N v ; B -6 0 593 502 ;
+C 119 ; WX 800 ; N w ; B -6 0 810 502 ;
+C 120 ; WX 600 ; N x ; B 8 0 591 502 ;
+C 121 ; WX 620 ; N y ; B 6 -221 613 502 ;
+C 122 ; WX 560 ; N z ; B 22 0 547 502 ;
+C 123 ; WX 320 ; N braceleft ; B 14 -139 301 726 ;
+C 124 ; WX 600 ; N bar ; B 243 -250 362 750 ;
+C 125 ; WX 320 ; N braceright ; B 15 -140 302 725 ;
+C 126 ; WX 600 ; N asciitilde ; B 51 162 555 368 ;
+C 161 ; WX 360 ; N exclamdown ; B 84 -191 284 515 ;
+C 162 ; WX 660 ; N cent ; B 133 17 535 674 ;
+C 163 ; WX 660 ; N sterling ; B 10 -17 659 698 ;
+C 164 ; WX 120 ; N fraction ; B -194 0 312 681 ;
+C 165 ; WX 660 ; N yen ; B -28 0 696 681 ;
+C 166 ; WX 660 ; N florin ; B -46 -209 674 749 ;
+C 167 ; WX 600 ; N section ; B 36 -153 560 698 ;
+C 168 ; WX 660 ; N currency ; B 77 88 584 593 ;
+C 169 ; WX 240 ; N quotesingle ; B 42 379 178 698 ;
+C 170 ; WX 540 ; N quotedblleft ; B 82 439 449 698 ;
+C 171 ; WX 400 ; N guillemotleft ; B 34 101 360 457 ;
+C 172 ; WX 220 ; N guilsinglleft ; B 34 101 188 457 ;
+C 173 ; WX 220 ; N guilsinglright ; B 34 101 188 457 ;
+C 174 ; WX 740 ; N fi ; B 22 0 710 741 ;
+C 175 ; WX 740 ; N fl ; B 22 0 710 741 ;
+C 177 ; WX 500 ; N endash ; B -25 212 525 318 ;
+C 178 ; WX 440 ; N dagger ; B 33 -156 398 698 ;
+C 179 ; WX 380 ; N daggerdbl ; B 8 -156 380 698 ;
+C 180 ; WX 340 ; N periodcentered ; B 76 175 258 355 ;
+C 182 ; WX 800 ; N paragraph ; B 51 0 698 681 ;
+C 183 ; WX 460 ; N bullet ; B 60 170 404 511 ;
+C 184 ; WX 320 ; N quotesinglbase ; B 82 -114 242 144 ;
+C 185 ; WX 540 ; N quotedblbase ; B 82 -114 450 144 ;
+C 186 ; WX 540 ; N quotedblright ; B 82 440 449 698 ;
+C 187 ; WX 400 ; N guillemotright ; B 34 101 360 457 ;
+C 188 ; WX 1000 ; N ellipsis ; B 76 -8 924 172 ;
+C 189 ; WX 1360 ; N perthousand ; B 12 -8 1346 698 ;
+C 191 ; WX 660 ; N questiondown ; B 62 -191 609 515 ;
+C 193 ; WX 400 ; N grave ; B 68 547 327 730 ;
+C 194 ; WX 400 ; N acute ; B 68 547 327 731 ;
+C 195 ; WX 500 ; N circumflex ; B 68 555 430 731 ;
+C 196 ; WX 480 ; N tilde ; B 69 556 421 691 ;
+C 197 ; WX 460 ; N macron ; B 68 577 383 663 ;
+C 198 ; WX 500 ; N breve ; B 68 553 429 722 ;
+C 199 ; WX 320 ; N dotaccent ; B 68 536 259 730 ;
+C 200 ; WX 500 ; N dieresis ; B 68 560 441 698 ;
+C 202 ; WX 340 ; N ring ; B 68 552 275 755 ;
+C 203 ; WX 360 ; N cedilla ; B 68 -213 284 0 ;
+C 205 ; WX 440 ; N hungarumlaut ; B 68 554 365 741 ;
+C 206 ; WX 320 ; N ogonek ; B 68 -163 246 0 ;
+C 207 ; WX 500 ; N caron ; B 68 541 430 717 ;
+C 208 ; WX 1000 ; N emdash ; B -25 212 1025 318 ;
+C 225 ; WX 1140 ; N AE ; B -34 0 1149 681 ;
+C 227 ; WX 400 ; N ordfeminine ; B 27 383 396 698 ;
+C 232 ; WX 640 ; N Lslash ; B 20 0 668 681 ;
+C 233 ; WX 800 ; N Oslash ; B 35 -110 771 781 ;
+C 234 ; WX 1220 ; N OE ; B 35 -17 1219 698 ;
+C 235 ; WX 400 ; N ordmasculine ; B 17 383 383 698 ;
+C 241 ; WX 880 ; N ae ; B 28 -8 852 515 ;
+C 245 ; WX 360 ; N dotlessi ; B 22 0 335 502 ;
+C 248 ; WX 340 ; N lslash ; B 9 0 322 725 ;
+C 249 ; WX 620 ; N oslash ; B 31 -40 586 551 ;
+C 250 ; WX 940 ; N oe ; B 31 -8 908 515 ;
+C 251 ; WX 660 ; N germandbls ; B -61 -91 644 699 ;
+C -1 ; WX 580 ; N ecircumflex ; B 31 -8 548 731 ;
+C -1 ; WX 580 ; N edieresis ; B 31 -8 548 698 ;
+C -1 ; WX 580 ; N aacute ; B 28 -8 588 731 ;
+C -1 ; WX 740 ; N registered ; B 23 -17 723 698 ;
+C -1 ; WX 360 ; N icircumflex ; B -2 0 360 731 ;
+C -1 ; WX 660 ; N udieresis ; B 22 -8 653 698 ;
+C -1 ; WX 620 ; N ograve ; B 31 -8 585 730 ;
+C -1 ; WX 660 ; N uacute ; B 22 -8 653 731 ;
+C -1 ; WX 660 ; N ucircumflex ; B 22 -8 653 731 ;
+C -1 ; WX 720 ; N Aacute ; B -34 0 763 910 ;
+C -1 ; WX 360 ; N igrave ; B 22 0 335 730 ;
+C -1 ; WX 400 ; N Icircumflex ; B 18 0 380 910 ;
+C -1 ; WX 580 ; N ccedilla ; B 31 -213 550 515 ;
+C -1 ; WX 580 ; N adieresis ; B 28 -8 588 698 ;
+C -1 ; WX 720 ; N Ecircumflex ; B 20 0 724 910 ;
+C -1 ; WX 520 ; N scaron ; B 22 -8 492 717 ;
+C -1 ; WX 640 ; N thorn ; B 22 -212 611 725 ;
+C -1 ; WX 980 ; N trademark ; B 42 277 982 681 ;
+C -1 ; WX 580 ; N egrave ; B 31 -8 548 730 ;
+C -1 ; WX 396 ; N threesuperior ; B 5 269 391 698 ;
+C -1 ; WX 560 ; N zcaron ; B 22 0 547 717 ;
+C -1 ; WX 580 ; N atilde ; B 28 -8 588 691 ;
+C -1 ; WX 580 ; N aring ; B 28 -8 588 755 ;
+C -1 ; WX 620 ; N ocircumflex ; B 31 -8 585 731 ;
+C -1 ; WX 720 ; N Edieresis ; B 20 0 724 877 ;
+C -1 ; WX 990 ; N threequarters ; B 15 0 967 692 ;
+C -1 ; WX 620 ; N ydieresis ; B 6 -221 613 698 ;
+C -1 ; WX 620 ; N yacute ; B 6 -221 613 731 ;
+C -1 ; WX 360 ; N iacute ; B 22 0 335 731 ;
+C -1 ; WX 720 ; N Acircumflex ; B -34 0 763 910 ;
+C -1 ; WX 740 ; N Uacute ; B 15 -17 724 910 ;
+C -1 ; WX 580 ; N eacute ; B 31 -8 548 731 ;
+C -1 ; WX 800 ; N Ograve ; B 35 -17 769 909 ;
+C -1 ; WX 580 ; N agrave ; B 28 -8 588 730 ;
+C -1 ; WX 740 ; N Udieresis ; B 15 -17 724 877 ;
+C -1 ; WX 580 ; N acircumflex ; B 28 -8 588 731 ;
+C -1 ; WX 400 ; N Igrave ; B 20 0 379 909 ;
+C -1 ; WX 396 ; N twosuperior ; B 14 279 396 698 ;
+C -1 ; WX 740 ; N Ugrave ; B 15 -17 724 909 ;
+C -1 ; WX 990 ; N onequarter ; B 65 0 967 681 ;
+C -1 ; WX 740 ; N Ucircumflex ; B 15 -17 724 910 ;
+C -1 ; WX 660 ; N Scaron ; B 21 -17 639 896 ;
+C -1 ; WX 400 ; N Idieresis ; B 18 0 391 877 ;
+C -1 ; WX 360 ; N idieresis ; B -2 0 371 698 ;
+C -1 ; WX 720 ; N Egrave ; B 20 0 724 909 ;
+C -1 ; WX 800 ; N Oacute ; B 35 -17 769 910 ;
+C -1 ; WX 600 ; N divide ; B 51 9 555 521 ;
+C -1 ; WX 720 ; N Atilde ; B -34 0 763 870 ;
+C -1 ; WX 720 ; N Aring ; B -34 0 763 934 ;
+C -1 ; WX 800 ; N Odieresis ; B 35 -17 769 877 ;
+C -1 ; WX 720 ; N Adieresis ; B -34 0 763 877 ;
+C -1 ; WX 740 ; N Ntilde ; B 20 0 724 870 ;
+C -1 ; WX 640 ; N Zcaron ; B 6 0 635 896 ;
+C -1 ; WX 660 ; N Thorn ; B 20 0 658 681 ;
+C -1 ; WX 400 ; N Iacute ; B 20 0 379 910 ;
+C -1 ; WX 600 ; N plusminus ; B 51 0 555 514 ;
+C -1 ; WX 600 ; N multiply ; B 48 10 552 514 ;
+C -1 ; WX 720 ; N Eacute ; B 20 0 724 910 ;
+C -1 ; WX 700 ; N Ydieresis ; B -20 0 718 877 ;
+C -1 ; WX 396 ; N onesuperior ; B 65 279 345 687 ;
+C -1 ; WX 660 ; N ugrave ; B 22 -8 653 730 ;
+C -1 ; WX 600 ; N logicalnot ; B 51 129 555 421 ;
+C -1 ; WX 680 ; N ntilde ; B 22 0 652 691 ;
+C -1 ; WX 800 ; N Otilde ; B 35 -17 769 870 ;
+C -1 ; WX 620 ; N otilde ; B 31 -8 585 691 ;
+C -1 ; WX 740 ; N Ccedilla ; B 35 -213 724 698 ;
+C -1 ; WX 720 ; N Agrave ; B -34 0 763 909 ;
+C -1 ; WX 990 ; N onehalf ; B 65 0 980 681 ;
+C -1 ; WX 780 ; N Eth ; B 20 0 748 681 ;
+C -1 ; WX 400 ; N degree ; B 50 398 350 698 ;
+C -1 ; WX 700 ; N Yacute ; B -20 0 718 910 ;
+C -1 ; WX 800 ; N Ocircumflex ; B 35 -17 769 910 ;
+C -1 ; WX 620 ; N oacute ; B 31 -8 585 731 ;
+C -1 ; WX 660 ; N mu ; B 22 -221 653 502 ;
+C -1 ; WX 600 ; N minus ; B 51 207 555 323 ;
+C -1 ; WX 620 ; N eth ; B 31 -8 585 741 ;
+C -1 ; WX 620 ; N odieresis ; B 31 -8 585 698 ;
+C -1 ; WX 740 ; N copyright ; B 23 -17 723 698 ;
+C -1 ; WX 600 ; N brokenbar ; B 243 -175 362 675 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 90
+
+KPX A y -1
+KPX A w -9
+KPX A v -8
+KPX A Y -52
+KPX A W -20
+KPX A V -68
+KPX A T -40
+
+KPX F period -132
+KPX F comma -130
+KPX F A -59
+
+KPX L y 19
+KPX L Y -35
+KPX L W -41
+KPX L V -50
+KPX L T -4
+
+KPX P period -128
+KPX P comma -129
+KPX P A -46
+
+KPX R y -8
+KPX R Y -20
+KPX R W -24
+KPX R V -29
+KPX R T -4
+
+KPX T semicolon 5
+KPX T s -10
+KPX T r 27
+KPX T period -122
+KPX T o -28
+KPX T i 27
+KPX T hyphen -10
+KPX T e -29
+KPX T comma -122
+KPX T colon 7
+KPX T c -29
+KPX T a -24
+KPX T A -42
+
+KPX V y 12
+KPX V u -11
+KPX V semicolon -38
+KPX V r -15
+KPX V period -105
+KPX V o -79
+KPX V i 15
+KPX V hyphen -10
+KPX V e -80
+KPX V comma -103
+KPX V colon -37
+KPX V a -74
+KPX V A -88
+
+KPX W y 12
+KPX W u -11
+KPX W semicolon -38
+KPX W r -15
+KPX W period -105
+KPX W o -78
+KPX W i 15
+KPX W hyphen -10
+KPX W e -79
+KPX W comma -103
+KPX W colon -37
+KPX W a -73
+KPX W A -60
+
+KPX Y v 24
+KPX Y u -13
+KPX Y semicolon -34
+KPX Y q -66
+KPX Y period -105
+KPX Y p -23
+KPX Y o -66
+KPX Y i 2
+KPX Y hyphen -10
+KPX Y e -67
+KPX Y comma -103
+KPX Y colon -32
+KPX Y a -60
+KPX Y A -56
+
+KPX f f 21
+
+KPX r q -9
+KPX r period -102
+KPX r o -9
+KPX r n 20
+KPX r m 20
+KPX r hyphen -10
+KPX r h -23
+KPX r g -9
+KPX r f 20
+KPX r e -10
+KPX r d -10
+KPX r comma -101
+KPX r c -9
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 160 179 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 110 179 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 110 179 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 160 179 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 190 179 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 120 179 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 160 179 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 110 179 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 110 179 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 160 179 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 0 179 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -50 179 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -50 179 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 0 179 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 130 179 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 200 179 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 150 179 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 150 179 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 200 179 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 160 179 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 80 179 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 170 179 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 120 179 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 120 179 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 170 179 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 150 179 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 100 179 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 70 179 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 90 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 40 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 40 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 90 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 100 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 30 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 90 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 40 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 40 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 90 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -20 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -70 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -70 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -20 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 80 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 110 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 60 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 60 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 110 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 50 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 10 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 130 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 80 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 80 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 130 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 110 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 60 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 30 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Bk-DmIt b/font/Bk-DmIt
new file mode 100644
index 0000000..c2da47a
--- /dev/null
+++ b/font/Bk-DmIt
@@ -0,0 +1,417 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1992 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Jan 21 16:12:43 1992
+Comment UniqueID 37832
+Comment VMusage 32139 39031
+FontName Bookman-DemiItalic
+FullName ITC Bookman Demi Italic
+FamilyName ITC Bookman
+Weight Demi
+ItalicAngle -10
+IsFixedPitch false
+FontBBox -231 -250 1333 941 
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.004
+Notice Copyright (c) 1985, 1987, 1989, 1992 Adobe Systems Incorporated.  All Rights Reserved.ITC Bookman is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 515
+Ascender 732
+Descender -213
+StartCharMetrics 228
+C 32 ; WX 340 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 320 ; N exclam ; B 86 -8 366 698 ;
+C 34 ; WX 380 ; N quotedbl ; B 140 371 507 697 ;
+C 35 ; WX 680 ; N numbersign ; B 157 0 649 681 ;
+C 36 ; WX 680 ; N dollar ; B 45 -164 697 790 ;
+C 37 ; WX 880 ; N percent ; B 106 -17 899 698 ;
+C 38 ; WX 980 ; N ampersand ; B 48 -17 1016 698 ;
+C 39 ; WX 320 ; N quoteright ; B 171 420 349 698 ;
+C 40 ; WX 260 ; N parenleft ; B 31 -134 388 741 ;
+C 41 ; WX 260 ; N parenright ; B -35 -134 322 741 ;
+C 42 ; WX 460 ; N asterisk ; B 126 346 508 698 ;
+C 43 ; WX 600 ; N plus ; B 91 9 595 514 ;
+C 44 ; WX 340 ; N comma ; B 100 -124 298 185 ;
+C 45 ; WX 280 ; N hyphen ; B 59 218 319 313 ;
+C 46 ; WX 340 ; N period ; B 106 -8 296 177 ;
+C 47 ; WX 360 ; N slash ; B 9 -106 502 742 ;
+C 48 ; WX 680 ; N zero ; B 87 -17 703 698 ;
+C 49 ; WX 680 ; N one ; B 123 0 565 681 ;
+C 50 ; WX 680 ; N two ; B 67 0 674 698 ;
+C 51 ; WX 680 ; N three ; B 72 -17 683 698 ;
+C 52 ; WX 680 ; N four ; B 63 0 708 681 ;
+C 53 ; WX 680 ; N five ; B 78 -17 669 681 ;
+C 54 ; WX 680 ; N six ; B 88 -17 704 698 ;
+C 55 ; WX 680 ; N seven ; B 123 0 739 681 ;
+C 56 ; WX 680 ; N eight ; B 68 -17 686 698 ;
+C 57 ; WX 680 ; N nine ; B 71 -17 712 698 ;
+C 58 ; WX 340 ; N colon ; B 106 -8 356 515 ;
+C 59 ; WX 340 ; N semicolon ; B 100 -124 352 515 ;
+C 60 ; WX 620 ; N less ; B 79 -9 588 540 ;
+C 61 ; WX 600 ; N equal ; B 91 109 595 421 ;
+C 62 ; WX 620 ; N greater ; B 89 -9 598 540 ;
+C 63 ; WX 620 ; N question ; B 145 -8 668 698 ;
+C 64 ; WX 780 ; N at ; B 80 -17 790 698 ;
+C 65 ; WX 720 ; N A ; B -27 0 769 681 ;
+C 66 ; WX 720 ; N B ; B 14 0 762 681 ;
+C 67 ; WX 700 ; N C ; B 78 -17 754 698 ;
+C 68 ; WX 760 ; N D ; B 14 0 805 681 ;
+C 69 ; WX 720 ; N E ; B 14 0 777 681 ;
+C 70 ; WX 660 ; N F ; B 14 0 763 681 ;
+C 71 ; WX 760 ; N G ; B 77 -17 828 698 ;
+C 72 ; WX 800 ; N H ; B 14 0 910 681 ;
+C 73 ; WX 380 ; N I ; B 14 0 485 681 ;
+C 74 ; WX 620 ; N J ; B 8 -17 721 681 ;
+C 75 ; WX 780 ; N K ; B 14 0 879 681 ;
+C 76 ; WX 640 ; N L ; B 14 0 725 681 ;
+C 77 ; WX 860 ; N M ; B 14 0 970 681 ;
+C 78 ; WX 740 ; N N ; B 14 0 845 681 ;
+C 79 ; WX 760 ; N O ; B 78 -17 806 698 ;
+C 80 ; WX 640 ; N P ; B -6 0 724 681 ;
+C 81 ; WX 760 ; N Q ; B 37 -213 805 698 ;
+C 82 ; WX 740 ; N R ; B 14 0 765 681 ;
+C 83 ; WX 700 ; N S ; B 59 -17 731 698 ;
+C 84 ; WX 700 ; N T ; B 70 0 802 681 ;
+C 85 ; WX 740 ; N U ; B 112 -17 855 681 ;
+C 86 ; WX 660 ; N V ; B 72 0 819 681 ;
+C 87 ; WX 1000 ; N W ; B 72 0 1090 681 ;
+C 88 ; WX 740 ; N X ; B -7 0 835 681 ;
+C 89 ; WX 660 ; N Y ; B 72 0 817 681 ;
+C 90 ; WX 680 ; N Z ; B 23 0 740 681 ;
+C 91 ; WX 260 ; N bracketleft ; B 9 -118 374 741 ;
+C 92 ; WX 580 ; N backslash ; B 73 0 575 741 ;
+C 93 ; WX 260 ; N bracketright ; B -18 -118 347 741 ;
+C 94 ; WX 620 ; N asciicircum ; B 92 281 594 681 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 320 ; N quoteleft ; B 155 420 333 698 ;
+C 97 ; WX 680 ; N a ; B 84 -8 735 515 ;
+C 98 ; WX 600 ; N b ; B 57 -8 633 732 ;
+C 99 ; WX 560 ; N c ; B 58 -8 597 515 ;
+C 100 ; WX 680 ; N d ; B 60 -8 714 732 ;
+C 101 ; WX 560 ; N e ; B 59 -8 596 515 ;
+C 102 ; WX 420 ; N f ; B -192 -213 641 741 ; L i fi ; L l fl ;
+C 103 ; WX 620 ; N g ; B 21 -213 669 515 ;
+C 104 ; WX 700 ; N h ; B 93 -8 736 732 ;
+C 105 ; WX 380 ; N i ; B 83 -8 420 755 ;
+C 106 ; WX 320 ; N j ; B -160 -213 392 755 ;
+C 107 ; WX 700 ; N k ; B 97 -8 732 732 ;
+C 108 ; WX 380 ; N l ; B 109 -8 410 732 ;
+C 109 ; WX 960 ; N m ; B 83 -8 996 515 ;
+C 110 ; WX 680 ; N n ; B 83 -8 715 515 ;
+C 111 ; WX 600 ; N o ; B 59 -8 627 515 ;
+C 112 ; WX 660 ; N p ; B -24 -213 682 515 ;
+C 113 ; WX 620 ; N q ; B 60 -213 640 515 ;
+C 114 ; WX 500 ; N r ; B 84 0 582 515 ;
+C 115 ; WX 540 ; N s ; B 32 -8 573 515 ;
+C 116 ; WX 440 ; N t ; B 106 -8 488 658 ;
+C 117 ; WX 680 ; N u ; B 83 -8 720 507 ;
+C 118 ; WX 540 ; N v ; B 56 -8 572 515 ;
+C 119 ; WX 860 ; N w ; B 56 -8 891 515 ;
+C 120 ; WX 620 ; N x ; B 10 -8 654 515 ;
+C 121 ; WX 600 ; N y ; B 25 -213 642 507 ;
+C 122 ; WX 560 ; N z ; B 36 -8 586 515 ;
+C 123 ; WX 300 ; N braceleft ; B 49 -123 413 742 ;
+C 124 ; WX 620 ; N bar ; B 303 -250 422 750 ;
+C 125 ; WX 300 ; N braceright ; B -8 -114 356 751 ;
+C 126 ; WX 620 ; N asciitilde ; B 101 162 605 368 ;
+C 161 ; WX 320 ; N exclamdown ; B 64 -191 344 515 ;
+C 162 ; WX 680 ; N cent ; B 161 25 616 718 ;
+C 163 ; WX 680 ; N sterling ; B 0 -17 787 698 ;
+C 164 ; WX 120 ; N fraction ; B -144 0 382 681 ;
+C 165 ; WX 680 ; N yen ; B 92 0 782 681 ;
+C 166 ; WX 680 ; N florin ; B -28 -199 743 741 ;
+C 167 ; WX 620 ; N section ; B 46 -137 638 698 ;
+C 168 ; WX 680 ; N currency ; B 148 85 637 571 ;
+C 169 ; WX 180 ; N quotesingle ; B 126 370 295 696 ;
+C 170 ; WX 520 ; N quotedblleft ; B 156 420 545 698 ;
+C 171 ; WX 380 ; N guillemotleft ; B 62 84 406 503 ;
+C 172 ; WX 220 ; N guilsinglleft ; B 62 84 249 503 ;
+C 173 ; WX 220 ; N guilsinglright ; B 62 84 249 503 ;
+C 174 ; WX 820 ; N fi ; B -191 -213 850 741 ;
+C 175 ; WX 820 ; N fl ; B -191 -213 850 741 ;
+C 177 ; WX 500 ; N endash ; B 40 219 573 311 ;
+C 178 ; WX 420 ; N dagger ; B 89 -137 466 698 ;
+C 179 ; WX 420 ; N daggerdbl ; B 79 -137 486 698 ;
+C 180 ; WX 340 ; N periodcentered ; B 126 173 316 358 ;
+C 182 ; WX 680 ; N paragraph ; B 137 0 715 681 ;
+C 183 ; WX 360 ; N bullet ; B 60 170 404 511 ;
+C 184 ; WX 300 ; N quotesinglbase ; B 106 -112 284 166 ;
+C 185 ; WX 520 ; N quotedblbase ; B 106 -112 495 166 ;
+C 186 ; WX 520 ; N quotedblright ; B 171 420 560 698 ;
+C 187 ; WX 380 ; N guillemotright ; B 62 84 406 503 ;
+C 188 ; WX 1000 ; N ellipsis ; B 86 -8 942 177 ;
+C 189 ; WX 1360 ; N perthousand ; B 106 -17 1333 698 ;
+C 191 ; WX 620 ; N questiondown ; B 83 -189 606 515 ;
+C 193 ; WX 380 ; N grave ; B 193 566 424 771 ;
+C 194 ; WX 340 ; N acute ; B 176 566 407 771 ;
+C 195 ; WX 480 ; N circumflex ; B 183 582 523 749 ;
+C 196 ; WX 480 ; N tilde ; B 178 587 533 709 ;
+C 197 ; WX 480 ; N macron ; B 177 603 531 691 ;
+C 198 ; WX 460 ; N breve ; B 177 577 516 707 ;
+C 199 ; WX 380 ; N dotaccent ; B 180 570 345 734 ;
+C 200 ; WX 520 ; N dieresis ; B 180 570 569 734 ;
+C 202 ; WX 360 ; N ring ; B 185 558 406 775 ;
+C 203 ; WX 360 ; N cedilla ; B 68 -220 289 -8 ;
+C 205 ; WX 560 ; N hungarumlaut ; B 181 560 616 775 ;
+C 206 ; WX 320 ; N ogonek ; B 68 -182 253 0 ;
+C 207 ; WX 480 ; N caron ; B 183 582 523 749 ;
+C 208 ; WX 1000 ; N emdash ; B 40 219 1073 311 ;
+C 225 ; WX 1140 ; N AE ; B -27 0 1207 681 ;
+C 227 ; WX 440 ; N ordfeminine ; B 118 400 495 685 ;
+C 232 ; WX 640 ; N Lslash ; B 14 0 724 681 ;
+C 233 ; WX 760 ; N Oslash ; B 21 -29 847 725 ;
+C 234 ; WX 1180 ; N OE ; B 94 -17 1245 698 ;
+C 235 ; WX 440 ; N ordmasculine ; B 127 400 455 685 ;
+C 241 ; WX 880 ; N ae ; B 39 -8 913 515 ;
+C 245 ; WX 380 ; N dotlessi ; B 83 -8 420 507 ;
+C 248 ; WX 380 ; N lslash ; B 63 -8 412 732 ;
+C 249 ; WX 600 ; N oslash ; B 17 -54 661 571 ;
+C 250 ; WX 920 ; N oe ; B 48 -8 961 515 ;
+C 251 ; WX 660 ; N germandbls ; B -231 -213 702 741 ;
+C -1 ; WX 560 ; N ecircumflex ; B 59 -8 596 749 ;
+C -1 ; WX 560 ; N edieresis ; B 59 -8 596 734 ;
+C -1 ; WX 680 ; N aacute ; B 84 -8 735 771 ;
+C -1 ; WX 780 ; N registered ; B 83 -17 783 698 ;
+C -1 ; WX 380 ; N icircumflex ; B 83 -8 433 749 ;
+C -1 ; WX 680 ; N udieresis ; B 83 -8 720 734 ;
+C -1 ; WX 600 ; N ograve ; B 59 -8 627 771 ;
+C -1 ; WX 680 ; N uacute ; B 83 -8 720 771 ;
+C -1 ; WX 680 ; N ucircumflex ; B 83 -8 720 749 ;
+C -1 ; WX 720 ; N Aacute ; B -27 0 769 937 ;
+C -1 ; WX 380 ; N igrave ; B 83 -8 424 771 ;
+C -1 ; WX 380 ; N Icircumflex ; B 14 0 493 915 ;
+C -1 ; WX 560 ; N ccedilla ; B 58 -220 597 515 ;
+C -1 ; WX 680 ; N adieresis ; B 84 -8 735 734 ;
+C -1 ; WX 720 ; N Ecircumflex ; B 14 0 777 915 ;
+C -1 ; WX 540 ; N scaron ; B 32 -8 573 749 ;
+C -1 ; WX 660 ; N thorn ; B -24 -213 682 732 ;
+C -1 ; WX 940 ; N trademark ; B 42 277 982 681 ;
+C -1 ; WX 560 ; N egrave ; B 59 -8 596 771 ;
+C -1 ; WX 408 ; N threesuperior ; B 86 269 483 698 ;
+C -1 ; WX 560 ; N zcaron ; B 36 -8 586 749 ;
+C -1 ; WX 680 ; N atilde ; B 84 -8 735 709 ;
+C -1 ; WX 680 ; N aring ; B 84 -8 735 775 ;
+C -1 ; WX 600 ; N ocircumflex ; B 59 -8 627 749 ;
+C -1 ; WX 720 ; N Edieresis ; B 14 0 777 900 ;
+C -1 ; WX 1020 ; N threequarters ; B 86 0 1054 691 ;
+C -1 ; WX 600 ; N ydieresis ; B 25 -213 642 734 ;
+C -1 ; WX 600 ; N yacute ; B 25 -213 642 771 ;
+C -1 ; WX 380 ; N iacute ; B 83 -8 420 771 ;
+C -1 ; WX 720 ; N Acircumflex ; B -27 0 769 915 ;
+C -1 ; WX 740 ; N Uacute ; B 112 -17 855 937 ;
+C -1 ; WX 560 ; N eacute ; B 59 -8 596 771 ;
+C -1 ; WX 760 ; N Ograve ; B 78 -17 806 937 ;
+C -1 ; WX 680 ; N agrave ; B 84 -8 735 771 ;
+C -1 ; WX 740 ; N Udieresis ; B 112 -17 855 900 ;
+C -1 ; WX 680 ; N acircumflex ; B 84 -8 735 749 ;
+C -1 ; WX 380 ; N Igrave ; B 14 0 485 937 ;
+C -1 ; WX 408 ; N twosuperior ; B 91 279 485 698 ;
+C -1 ; WX 740 ; N Ugrave ; B 112 -17 855 937 ;
+C -1 ; WX 1020 ; N onequarter ; B 118 0 1054 681 ;
+C -1 ; WX 740 ; N Ucircumflex ; B 112 -17 855 915 ;
+C -1 ; WX 700 ; N Scaron ; B 59 -17 731 915 ;
+C -1 ; WX 380 ; N Idieresis ; B 14 0 499 900 ;
+C -1 ; WX 380 ; N idieresis ; B 83 -8 479 734 ;
+C -1 ; WX 720 ; N Egrave ; B 14 0 777 937 ;
+C -1 ; WX 760 ; N Oacute ; B 78 -17 806 937 ;
+C -1 ; WX 600 ; N divide ; B 91 9 595 521 ;
+C -1 ; WX 720 ; N Atilde ; B -27 0 769 875 ;
+C -1 ; WX 720 ; N Aring ; B -27 0 769 941 ;
+C -1 ; WX 760 ; N Odieresis ; B 78 -17 806 900 ;
+C -1 ; WX 720 ; N Adieresis ; B -27 0 769 900 ;
+C -1 ; WX 740 ; N Ntilde ; B 14 0 845 875 ;
+C -1 ; WX 680 ; N Zcaron ; B 23 0 740 915 ;
+C -1 ; WX 640 ; N Thorn ; B -6 0 701 681 ;
+C -1 ; WX 380 ; N Iacute ; B 14 0 485 937 ;
+C -1 ; WX 600 ; N plusminus ; B 91 0 595 514 ;
+C -1 ; WX 600 ; N multiply ; B 91 10 595 514 ;
+C -1 ; WX 720 ; N Eacute ; B 14 0 777 937 ;
+C -1 ; WX 660 ; N Ydieresis ; B 72 0 817 900 ;
+C -1 ; WX 408 ; N onesuperior ; B 118 279 406 688 ;
+C -1 ; WX 680 ; N ugrave ; B 83 -8 720 771 ;
+C -1 ; WX 620 ; N logicalnot ; B 81 129 585 421 ;
+C -1 ; WX 680 ; N ntilde ; B 83 -8 715 709 ;
+C -1 ; WX 760 ; N Otilde ; B 78 -17 806 875 ;
+C -1 ; WX 600 ; N otilde ; B 59 -8 627 709 ;
+C -1 ; WX 700 ; N Ccedilla ; B 78 -220 754 698 ;
+C -1 ; WX 720 ; N Agrave ; B -27 0 769 937 ;
+C -1 ; WX 1020 ; N onehalf ; B 118 0 1036 681 ;
+C -1 ; WX 760 ; N Eth ; B 14 0 805 681 ;
+C -1 ; WX 400 ; N degree ; B 130 398 430 698 ;
+C -1 ; WX 660 ; N Yacute ; B 72 0 817 937 ;
+C -1 ; WX 760 ; N Ocircumflex ; B 78 -17 806 915 ;
+C -1 ; WX 600 ; N oacute ; B 59 -8 627 771 ;
+C -1 ; WX 680 ; N mu ; B 54 -213 720 507 ;
+C -1 ; WX 600 ; N minus ; B 91 207 595 323 ;
+C -1 ; WX 600 ; N eth ; B 59 -8 662 741 ;
+C -1 ; WX 600 ; N odieresis ; B 59 -8 627 734 ;
+C -1 ; WX 780 ; N copyright ; B 83 -17 783 698 ;
+C -1 ; WX 620 ; N brokenbar ; B 303 -175 422 675 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 92
+
+KPX A y 20
+KPX A w 20
+KPX A v 20
+KPX A Y -25
+KPX A W -35
+KPX A V -40
+KPX A T -17
+
+KPX F period -105
+KPX F comma -98
+KPX F A -35
+
+KPX L y 62
+KPX L Y -5
+KPX L W -15
+KPX L V -19
+KPX L T -26
+
+KPX P period -105
+KPX P comma -98
+KPX P A -31
+
+KPX R y 27
+KPX R Y 4
+KPX R W -4
+KPX R V -8
+KPX R T -3
+
+KPX T y 56
+KPX T w 69
+KPX T u 42
+KPX T semicolon 31
+KPX T s -1
+KPX T r 41
+KPX T period -107
+KPX T o -5
+KPX T i 42
+KPX T hyphen -20
+KPX T e -10
+KPX T comma -100
+KPX T colon 26
+KPX T c -8
+KPX T a -8
+KPX T A -42
+
+KPX V y 17
+KPX V u -1
+KPX V semicolon -22
+KPX V r 2
+KPX V period -115
+KPX V o -50
+KPX V i 32
+KPX V hyphen -20
+KPX V e -50
+KPX V comma -137
+KPX V colon -28
+KPX V a -50
+KPX V A -50
+
+KPX W y -51
+KPX W u -69
+KPX W semicolon -81
+KPX W r -66
+KPX W period -183
+KPX W o -100
+KPX W i -36
+KPX W hyphen -22
+KPX W e -100
+KPX W comma -201
+KPX W colon -86
+KPX W a -100
+KPX W A -77
+
+KPX Y v 26
+KPX Y u -1
+KPX Y semicolon -4
+KPX Y q -43
+KPX Y period -113
+KPX Y o -41
+KPX Y i 20
+KPX Y hyphen -20
+KPX Y e -46
+KPX Y comma -106
+KPX Y colon -9
+KPX Y a -45
+KPX Y A -30
+
+KPX f f 10
+
+KPX r q -3
+KPX r period -120
+KPX r o -1
+KPX r n 39
+KPX r m 39
+KPX r hyphen -20
+KPX r h -35
+KPX r g -23
+KPX r f 42
+KPX r e -6
+KPX r d -3
+KPX r comma -113
+KPX r c -5
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 190 166 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 120 166 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 100 166 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 170 166 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 200 166 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 120 166 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 190 166 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 120 166 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 100 166 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 170 166 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 20 166 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -30 166 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -70 166 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 0 166 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 130 166 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 210 166 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 140 166 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 140 166 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 190 166 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 140 166 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 110 166 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 200 166 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 130 166 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 130 166 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 180 166 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 160 166 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 70 166 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 100 166 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 170 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 100 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 80 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 150 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 160 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 100 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 110 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 60 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 20 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 90 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -90 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -90 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 60 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 130 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 60 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 40 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 110 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 60 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 30 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 170 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 100 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 80 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 150 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 130 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 40 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 40 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Bk-Lt b/font/Bk-Lt
new file mode 100644
index 0000000..8b79ea7
--- /dev/null
+++ b/font/Bk-Lt
@@ -0,0 +1,407 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1992 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Jan 21 16:15:53 1992
+Comment UniqueID 37833
+Comment VMusage 32321 39213
+FontName Bookman-Light
+FullName ITC Bookman Light
+FamilyName ITC Bookman
+Weight Light
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -188 -251 1266 908 
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.004
+Notice Copyright (c) 1985, 1987, 1989, 1992 Adobe Systems Incorporated.  All Rights Reserved.ITC Bookman is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 484
+Ascender 717
+Descender -228
+StartCharMetrics 228
+C 32 ; WX 320 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 300 ; N exclam ; B 75 -8 219 698 ;
+C 34 ; WX 380 ; N quotedbl ; B 56 458 323 698 ;
+C 35 ; WX 620 ; N numbersign ; B 65 0 556 681 ;
+C 36 ; WX 620 ; N dollar ; B 34 -109 593 791 ;
+C 37 ; WX 900 ; N percent ; B 22 -8 873 698 ;
+C 38 ; WX 800 ; N ampersand ; B 45 -17 787 698 ;
+C 39 ; WX 220 ; N quoteright ; B 46 480 178 698 ;
+C 40 ; WX 300 ; N parenleft ; B 76 -145 278 727 ;
+C 41 ; WX 300 ; N parenright ; B 17 -146 219 727 ;
+C 42 ; WX 440 ; N asterisk ; B 54 325 391 698 ;
+C 43 ; WX 600 ; N plus ; B 51 8 555 513 ;
+C 44 ; WX 320 ; N comma ; B 90 -114 223 114 ;
+C 45 ; WX 400 ; N hyphen ; B 50 232 350 292 ;
+C 46 ; WX 320 ; N period ; B 92 -8 220 123 ;
+C 47 ; WX 600 ; N slash ; B 74 -149 532 717 ;
+C 48 ; WX 620 ; N zero ; B 40 -17 586 698 ;
+C 49 ; WX 620 ; N one ; B 160 0 501 681 ;
+C 50 ; WX 620 ; N two ; B 42 0 576 698 ;
+C 51 ; WX 620 ; N three ; B 40 -17 576 698 ;
+C 52 ; WX 620 ; N four ; B 25 0 600 681 ;
+C 53 ; WX 620 ; N five ; B 60 -17 584 717 ;
+C 54 ; WX 620 ; N six ; B 45 -17 590 698 ;
+C 55 ; WX 620 ; N seven ; B 60 0 586 681 ;
+C 56 ; WX 620 ; N eight ; B 44 -17 583 698 ;
+C 57 ; WX 620 ; N nine ; B 37 -17 576 698 ;
+C 58 ; WX 320 ; N colon ; B 92 -8 220 494 ;
+C 59 ; WX 320 ; N semicolon ; B 90 -114 223 494 ;
+C 60 ; WX 600 ; N less ; B 49 -2 558 526 ;
+C 61 ; WX 600 ; N equal ; B 51 126 555 398 ;
+C 62 ; WX 600 ; N greater ; B 48 -2 557 526 ;
+C 63 ; WX 540 ; N question ; B 27 -8 514 698 ;
+C 64 ; WX 820 ; N at ; B 55 -17 755 698 ;
+C 65 ; WX 680 ; N A ; B -37 0 714 681 ;
+C 66 ; WX 740 ; N B ; B 31 0 702 681 ;
+C 67 ; WX 740 ; N C ; B 44 -17 702 698 ;
+C 68 ; WX 800 ; N D ; B 31 0 752 681 ;
+C 69 ; WX 720 ; N E ; B 31 0 705 681 ;
+C 70 ; WX 640 ; N F ; B 31 0 654 681 ;
+C 71 ; WX 800 ; N G ; B 44 -17 778 698 ;
+C 72 ; WX 800 ; N H ; B 31 0 769 681 ;
+C 73 ; WX 340 ; N I ; B 31 0 301 681 ;
+C 74 ; WX 600 ; N J ; B -23 -17 567 681 ;
+C 75 ; WX 720 ; N K ; B 31 0 750 681 ;
+C 76 ; WX 600 ; N L ; B 31 0 629 681 ;
+C 77 ; WX 920 ; N M ; B 26 0 894 681 ;
+C 78 ; WX 740 ; N N ; B 26 0 722 681 ;
+C 79 ; WX 800 ; N O ; B 44 -17 758 698 ;
+C 80 ; WX 620 ; N P ; B 31 0 613 681 ;
+C 81 ; WX 820 ; N Q ; B 44 -189 769 698 ;
+C 82 ; WX 720 ; N R ; B 31 0 757 681 ;
+C 83 ; WX 660 ; N S ; B 28 -17 634 698 ;
+C 84 ; WX 620 ; N T ; B -37 0 656 681 ;
+C 85 ; WX 780 ; N U ; B 25 -17 754 681 ;
+C 86 ; WX 700 ; N V ; B -30 0 725 681 ;
+C 87 ; WX 960 ; N W ; B -30 0 984 681 ;
+C 88 ; WX 720 ; N X ; B -30 0 755 681 ;
+C 89 ; WX 640 ; N Y ; B -30 0 666 681 ;
+C 90 ; WX 640 ; N Z ; B 10 0 656 681 ;
+C 91 ; WX 300 ; N bracketleft ; B 92 -136 258 717 ;
+C 92 ; WX 600 ; N backslash ; B 74 0 532 717 ;
+C 93 ; WX 300 ; N bracketright ; B 41 -136 207 717 ;
+C 94 ; WX 600 ; N asciicircum ; B 52 276 554 681 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 220 ; N quoteleft ; B 46 479 178 698 ;
+C 97 ; WX 580 ; N a ; B 35 -8 587 494 ;
+C 98 ; WX 620 ; N b ; B -2 -8 582 717 ;
+C 99 ; WX 520 ; N c ; B 37 -8 498 494 ;
+C 100 ; WX 620 ; N d ; B 37 -8 591 717 ;
+C 101 ; WX 520 ; N e ; B 37 -8 491 494 ;
+C 102 ; WX 320 ; N f ; B 20 0 414 734 ; L i fi ; L l fl ;
+C 103 ; WX 540 ; N g ; B 17 -243 542 567 ;
+C 104 ; WX 660 ; N h ; B 20 0 643 717 ;
+C 105 ; WX 300 ; N i ; B 20 0 288 654 ;
+C 106 ; WX 300 ; N j ; B -109 -251 214 654 ;
+C 107 ; WX 620 ; N k ; B 20 0 628 717 ;
+C 108 ; WX 300 ; N l ; B 20 0 286 717 ;
+C 109 ; WX 940 ; N m ; B 17 0 928 494 ;
+C 110 ; WX 660 ; N n ; B 20 0 649 494 ;
+C 111 ; WX 560 ; N o ; B 37 -8 526 494 ;
+C 112 ; WX 620 ; N p ; B 20 -228 583 494 ;
+C 113 ; WX 580 ; N q ; B 37 -228 589 494 ;
+C 114 ; WX 440 ; N r ; B 20 0 447 494 ;
+C 115 ; WX 520 ; N s ; B 40 -8 487 494 ;
+C 116 ; WX 380 ; N t ; B 20 -8 388 667 ;
+C 117 ; WX 680 ; N u ; B 20 -8 653 484 ;
+C 118 ; WX 520 ; N v ; B -23 0 534 484 ;
+C 119 ; WX 780 ; N w ; B -19 0 804 484 ;
+C 120 ; WX 560 ; N x ; B -16 0 576 484 ;
+C 121 ; WX 540 ; N y ; B -23 -236 549 484 ;
+C 122 ; WX 480 ; N z ; B 7 0 476 484 ;
+C 123 ; WX 280 ; N braceleft ; B 21 -136 260 717 ;
+C 124 ; WX 600 ; N bar ; B 264 -250 342 750 ;
+C 125 ; WX 280 ; N braceright ; B 21 -136 260 717 ;
+C 126 ; WX 600 ; N asciitilde ; B 52 173 556 352 ;
+C 161 ; WX 300 ; N exclamdown ; B 75 -214 219 494 ;
+C 162 ; WX 620 ; N cent ; B 116 20 511 651 ;
+C 163 ; WX 620 ; N sterling ; B 8 -17 631 698 ;
+C 164 ; WX 140 ; N fraction ; B -188 0 335 681 ;
+C 165 ; WX 620 ; N yen ; B -22 0 647 681 ;
+C 166 ; WX 620 ; N florin ; B -29 -155 633 749 ;
+C 167 ; WX 520 ; N section ; B 33 -178 486 698 ;
+C 168 ; WX 620 ; N currency ; B 58 89 563 591 ;
+C 169 ; WX 220 ; N quotesingle ; B 67 458 153 698 ;
+C 170 ; WX 400 ; N quotedblleft ; B 46 479 348 698 ;
+C 171 ; WX 360 ; N guillemotleft ; B 51 89 312 437 ;
+C 172 ; WX 240 ; N guilsinglleft ; B 51 89 189 437 ;
+C 173 ; WX 240 ; N guilsinglright ; B 51 89 189 437 ;
+C 174 ; WX 620 ; N fi ; B 20 0 608 734 ;
+C 175 ; WX 620 ; N fl ; B 20 0 606 734 ;
+C 177 ; WX 500 ; N endash ; B -15 232 515 292 ;
+C 178 ; WX 540 ; N dagger ; B 79 -156 455 698 ;
+C 179 ; WX 540 ; N daggerdbl ; B 79 -156 455 698 ;
+C 180 ; WX 320 ; N periodcentered ; B 92 196 220 327 ;
+C 182 ; WX 600 ; N paragraph ; B 14 0 577 681 ;
+C 183 ; WX 460 ; N bullet ; B 60 170 404 511 ;
+C 184 ; WX 220 ; N quotesinglbase ; B 46 -108 178 110 ;
+C 185 ; WX 400 ; N quotedblbase ; B 46 -108 348 110 ;
+C 186 ; WX 400 ; N quotedblright ; B 46 480 348 698 ;
+C 187 ; WX 360 ; N guillemotright ; B 51 89 312 437 ;
+C 188 ; WX 1000 ; N ellipsis ; B 101 -8 898 123 ;
+C 189 ; WX 1280 ; N perthousand ; B 22 -8 1266 698 ;
+C 191 ; WX 540 ; N questiondown ; B 23 -217 510 494 ;
+C 193 ; WX 340 ; N grave ; B 68 571 274 689 ;
+C 194 ; WX 340 ; N acute ; B 68 571 274 689 ;
+C 195 ; WX 420 ; N circumflex ; B 68 567 352 685 ;
+C 196 ; WX 440 ; N tilde ; B 68 572 375 661 ;
+C 197 ; WX 440 ; N macron ; B 68 587 364 635 ;
+C 198 ; WX 460 ; N breve ; B 68 568 396 687 ;
+C 199 ; WX 260 ; N dotaccent ; B 68 552 186 672 ;
+C 200 ; WX 420 ; N dieresis ; B 68 552 349 674 ;
+C 202 ; WX 320 ; N ring ; B 68 546 252 731 ;
+C 203 ; WX 320 ; N cedilla ; B 68 -200 257 0 ;
+C 205 ; WX 380 ; N hungarumlaut ; B 68 538 311 698 ;
+C 206 ; WX 320 ; N ogonek ; B 68 -145 245 0 ;
+C 207 ; WX 420 ; N caron ; B 68 554 352 672 ;
+C 208 ; WX 1000 ; N emdash ; B -15 232 1015 292 ;
+C 225 ; WX 1260 ; N AE ; B -36 0 1250 681 ;
+C 227 ; WX 420 ; N ordfeminine ; B 49 395 393 698 ;
+C 232 ; WX 600 ; N Lslash ; B 31 0 629 681 ;
+C 233 ; WX 800 ; N Oslash ; B 44 -53 758 733 ;
+C 234 ; WX 1240 ; N OE ; B 44 -17 1214 698 ;
+C 235 ; WX 420 ; N ordmasculine ; B 56 394 361 698 ;
+C 241 ; WX 860 ; N ae ; B 35 -8 832 494 ;
+C 245 ; WX 300 ; N dotlessi ; B 20 0 288 484 ;
+C 248 ; WX 320 ; N lslash ; B 20 0 291 717 ;
+C 249 ; WX 560 ; N oslash ; B 37 -40 526 534 ;
+C 250 ; WX 900 ; N oe ; B 37 -8 876 494 ;
+C 251 ; WX 660 ; N germandbls ; B -109 -110 614 698 ;
+C -1 ; WX 520 ; N ecircumflex ; B 37 -8 491 685 ;
+C -1 ; WX 520 ; N edieresis ; B 37 -8 491 674 ;
+C -1 ; WX 580 ; N aacute ; B 35 -8 587 689 ;
+C -1 ; WX 740 ; N registered ; B 23 -17 723 698 ;
+C -1 ; WX 300 ; N icircumflex ; B 8 0 292 685 ;
+C -1 ; WX 680 ; N udieresis ; B 20 -8 653 674 ;
+C -1 ; WX 560 ; N ograve ; B 37 -8 526 689 ;
+C -1 ; WX 680 ; N uacute ; B 20 -8 653 689 ;
+C -1 ; WX 680 ; N ucircumflex ; B 20 -8 653 685 ;
+C -1 ; WX 680 ; N Aacute ; B -37 0 714 866 ;
+C -1 ; WX 300 ; N igrave ; B 20 0 288 689 ;
+C -1 ; WX 340 ; N Icircumflex ; B 28 0 312 862 ;
+C -1 ; WX 520 ; N ccedilla ; B 37 -200 498 494 ;
+C -1 ; WX 580 ; N adieresis ; B 35 -8 587 674 ;
+C -1 ; WX 720 ; N Ecircumflex ; B 31 0 705 862 ;
+C -1 ; WX 520 ; N scaron ; B 40 -8 487 672 ;
+C -1 ; WX 620 ; N thorn ; B 20 -228 583 717 ;
+C -1 ; WX 980 ; N trademark ; B 34 277 930 681 ;
+C -1 ; WX 520 ; N egrave ; B 37 -8 491 689 ;
+C -1 ; WX 372 ; N threesuperior ; B 12 269 360 698 ;
+C -1 ; WX 480 ; N zcaron ; B 7 0 476 672 ;
+C -1 ; WX 580 ; N atilde ; B 35 -8 587 661 ;
+C -1 ; WX 580 ; N aring ; B 35 -8 587 731 ;
+C -1 ; WX 560 ; N ocircumflex ; B 37 -8 526 685 ;
+C -1 ; WX 720 ; N Edieresis ; B 31 0 705 851 ;
+C -1 ; WX 930 ; N threequarters ; B 52 0 889 691 ;
+C -1 ; WX 540 ; N ydieresis ; B -23 -236 549 674 ;
+C -1 ; WX 540 ; N yacute ; B -23 -236 549 689 ;
+C -1 ; WX 300 ; N iacute ; B 20 0 288 689 ;
+C -1 ; WX 680 ; N Acircumflex ; B -37 0 714 862 ;
+C -1 ; WX 780 ; N Uacute ; B 25 -17 754 866 ;
+C -1 ; WX 520 ; N eacute ; B 37 -8 491 689 ;
+C -1 ; WX 800 ; N Ograve ; B 44 -17 758 866 ;
+C -1 ; WX 580 ; N agrave ; B 35 -8 587 689 ;
+C -1 ; WX 780 ; N Udieresis ; B 25 -17 754 851 ;
+C -1 ; WX 580 ; N acircumflex ; B 35 -8 587 685 ;
+C -1 ; WX 340 ; N Igrave ; B 31 0 301 866 ;
+C -1 ; WX 372 ; N twosuperior ; B 20 279 367 698 ;
+C -1 ; WX 780 ; N Ugrave ; B 25 -17 754 866 ;
+C -1 ; WX 930 ; N onequarter ; B 80 0 869 681 ;
+C -1 ; WX 780 ; N Ucircumflex ; B 25 -17 754 862 ;
+C -1 ; WX 660 ; N Scaron ; B 28 -17 634 849 ;
+C -1 ; WX 340 ; N Idieresis ; B 28 0 309 851 ;
+C -1 ; WX 300 ; N idieresis ; B 8 0 289 674 ;
+C -1 ; WX 720 ; N Egrave ; B 31 0 705 866 ;
+C -1 ; WX 800 ; N Oacute ; B 44 -17 758 866 ;
+C -1 ; WX 600 ; N divide ; B 51 10 555 514 ;
+C -1 ; WX 680 ; N Atilde ; B -37 0 714 838 ;
+C -1 ; WX 680 ; N Aring ; B -37 0 714 908 ;
+C -1 ; WX 800 ; N Odieresis ; B 44 -17 758 851 ;
+C -1 ; WX 680 ; N Adieresis ; B -37 0 714 851 ;
+C -1 ; WX 740 ; N Ntilde ; B 26 0 722 838 ;
+C -1 ; WX 640 ; N Zcaron ; B 10 0 656 849 ;
+C -1 ; WX 620 ; N Thorn ; B 31 0 613 681 ;
+C -1 ; WX 340 ; N Iacute ; B 31 0 301 866 ;
+C -1 ; WX 600 ; N plusminus ; B 51 0 555 513 ;
+C -1 ; WX 600 ; N multiply ; B 51 9 555 513 ;
+C -1 ; WX 720 ; N Eacute ; B 31 0 705 866 ;
+C -1 ; WX 640 ; N Ydieresis ; B -30 0 666 851 ;
+C -1 ; WX 372 ; N onesuperior ; B 80 279 302 688 ;
+C -1 ; WX 680 ; N ugrave ; B 20 -8 653 689 ;
+C -1 ; WX 600 ; N logicalnot ; B 51 128 555 398 ;
+C -1 ; WX 660 ; N ntilde ; B 20 0 649 661 ;
+C -1 ; WX 800 ; N Otilde ; B 44 -17 758 838 ;
+C -1 ; WX 560 ; N otilde ; B 37 -8 526 661 ;
+C -1 ; WX 740 ; N Ccedilla ; B 44 -200 702 698 ;
+C -1 ; WX 680 ; N Agrave ; B -37 0 714 866 ;
+C -1 ; WX 930 ; N onehalf ; B 80 0 885 681 ;
+C -1 ; WX 800 ; N Eth ; B 31 0 752 681 ;
+C -1 ; WX 400 ; N degree ; B 50 398 350 698 ;
+C -1 ; WX 640 ; N Yacute ; B -30 0 666 866 ;
+C -1 ; WX 800 ; N Ocircumflex ; B 44 -17 758 862 ;
+C -1 ; WX 560 ; N oacute ; B 37 -8 526 689 ;
+C -1 ; WX 680 ; N mu ; B 20 -251 653 484 ;
+C -1 ; WX 600 ; N minus ; B 51 224 555 300 ;
+C -1 ; WX 560 ; N eth ; B 37 -8 526 734 ;
+C -1 ; WX 560 ; N odieresis ; B 37 -8 526 674 ;
+C -1 ; WX 740 ; N copyright ; B 24 -17 724 698 ;
+C -1 ; WX 600 ; N brokenbar ; B 264 -175 342 675 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 82
+
+KPX A y 32
+KPX A w 4
+KPX A v 7
+KPX A Y -35
+KPX A W -40
+KPX A V -56
+KPX A T 1
+
+KPX F period -46
+KPX F comma -41
+KPX F A -21
+
+KPX L y 79
+KPX L Y 13
+KPX L W 1
+KPX L V -4
+KPX L T 28
+
+KPX P period -60
+KPX P comma -55
+KPX P A -8
+
+KPX R y 59
+KPX R Y 26
+KPX R W 13
+KPX R V 8
+KPX R T 71
+
+KPX T s 16
+KPX T r 38
+KPX T period -33
+KPX T o 15
+KPX T i 42
+KPX T hyphen 90
+KPX T e 13
+KPX T comma -28
+KPX T c 14
+KPX T a 17
+KPX T A 1
+
+KPX V y 15
+KPX V u -38
+KPX V r -41
+KPX V period -40
+KPX V o -71
+KPX V i -20
+KPX V hyphen 11
+KPX V e -72
+KPX V comma -34
+KPX V a -69
+KPX V A -66
+
+KPX W y 15
+KPX W u -38
+KPX W r -41
+KPX W period -40
+KPX W o -68
+KPX W i -20
+KPX W hyphen 11
+KPX W e -69
+KPX W comma -34
+KPX W a -66
+KPX W A -64
+
+KPX Y v 15
+KPX Y u -38
+KPX Y q -55
+KPX Y period -40
+KPX Y p -31
+KPX Y o -57
+KPX Y i -37
+KPX Y hyphen 11
+KPX Y e -58
+KPX Y comma -34
+KPX Y a -54
+KPX Y A -53
+
+KPX f f 29
+
+KPX r q 9
+KPX r period -64
+KPX r o 8
+KPX r n 31
+KPX r m 31
+KPX r hyphen 70
+KPX r h -21
+KPX r g -4
+KPX r f 33
+KPX r e 7
+KPX r d 7
+KPX r comma -58
+KPX r c 7
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 200 177 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 130 177 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 130 177 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 140 177 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 180 177 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 120 177 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 220 177 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 150 177 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 150 177 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 160 177 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 20 177 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -40 177 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -40 177 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -20 177 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 150 177 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 260 177 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 190 177 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 190 177 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 200 177 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 180 177 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 120 177 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 250 177 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 180 177 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 180 177 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 190 177 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 150 177 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 110 177 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 110 177 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 120 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 80 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 80 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 120 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 130 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 70 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 90 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 50 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 50 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 90 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -20 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -60 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -60 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -20 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 110 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 110 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 70 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 70 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 110 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 60 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 50 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 170 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 130 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 130 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 170 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 100 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 60 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 30 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Bk-LtIt b/font/Bk-LtIt
new file mode 100644
index 0000000..419c319
--- /dev/null
+++ b/font/Bk-LtIt
@@ -0,0 +1,410 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1992 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Jan 21 16:12:06 1992
+Comment UniqueID 37830
+Comment VMusage 33139 40031
+FontName Bookman-LightItalic
+FullName ITC Bookman Light Italic
+FamilyName ITC Bookman
+Weight Light
+ItalicAngle -10
+IsFixedPitch false
+FontBBox -228 -250 1269 883 
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.004
+Notice Copyright (c) 1985, 1987, 1989, 1992 Adobe Systems Incorporated.  All Rights Reserved.ITC Bookman is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 494
+Ascender 717
+Descender -212
+StartCharMetrics 228
+C 32 ; WX 300 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 320 ; N exclam ; B 103 -8 342 698 ;
+C 34 ; WX 360 ; N quotedbl ; B 107 468 402 698 ;
+C 35 ; WX 620 ; N numbersign ; B 107 0 598 681 ;
+C 36 ; WX 620 ; N dollar ; B 78 -85 619 762 ;
+C 37 ; WX 800 ; N percent ; B 56 -8 811 691 ;
+C 38 ; WX 820 ; N ampersand ; B 65 -18 848 698 ;
+C 39 ; WX 280 ; N quoteright ; B 148 470 288 698 ;
+C 40 ; WX 280 ; N parenleft ; B 96 -146 383 727 ;
+C 41 ; WX 280 ; N parenright ; B -8 -146 279 727 ;
+C 42 ; WX 440 ; N asterisk ; B 139 324 505 698 ;
+C 43 ; WX 600 ; N plus ; B 91 43 595 548 ;
+C 44 ; WX 300 ; N comma ; B 88 -115 227 112 ;
+C 45 ; WX 320 ; N hyphen ; B 78 269 336 325 ;
+C 46 ; WX 300 ; N period ; B 96 -8 231 127 ;
+C 47 ; WX 600 ; N slash ; B 104 -149 562 717 ;
+C 48 ; WX 620 ; N zero ; B 86 -17 646 698 ;
+C 49 ; WX 620 ; N one ; B 154 0 500 681 ;
+C 50 ; WX 620 ; N two ; B 66 0 636 698 ;
+C 51 ; WX 620 ; N three ; B 55 -17 622 698 ;
+C 52 ; WX 620 ; N four ; B 69 0 634 681 ;
+C 53 ; WX 620 ; N five ; B 70 -17 614 681 ;
+C 54 ; WX 620 ; N six ; B 89 -17 657 698 ;
+C 55 ; WX 620 ; N seven ; B 143 0 672 681 ;
+C 56 ; WX 620 ; N eight ; B 61 -17 655 698 ;
+C 57 ; WX 620 ; N nine ; B 77 -17 649 698 ;
+C 58 ; WX 300 ; N colon ; B 96 -8 292 494 ;
+C 59 ; WX 300 ; N semicolon ; B 88 -114 292 494 ;
+C 60 ; WX 600 ; N less ; B 79 33 588 561 ;
+C 61 ; WX 600 ; N equal ; B 91 161 595 433 ;
+C 62 ; WX 600 ; N greater ; B 93 33 602 561 ;
+C 63 ; WX 540 ; N question ; B 114 -8 604 698 ;
+C 64 ; WX 780 ; N at ; B 102 -17 802 698 ;
+C 65 ; WX 700 ; N A ; B -25 0 720 681 ;
+C 66 ; WX 720 ; N B ; B 21 0 746 681 ;
+C 67 ; WX 720 ; N C ; B 88 -17 746 698 ;
+C 68 ; WX 740 ; N D ; B 21 0 782 681 ;
+C 69 ; WX 680 ; N E ; B 21 0 736 681 ;
+C 70 ; WX 620 ; N F ; B 21 0 743 681 ;
+C 71 ; WX 760 ; N G ; B 88 -17 813 698 ;
+C 72 ; WX 800 ; N H ; B 21 0 888 681 ;
+C 73 ; WX 320 ; N I ; B 21 0 412 681 ;
+C 74 ; WX 560 ; N J ; B -2 -17 666 681 ;
+C 75 ; WX 720 ; N K ; B 21 0 804 681 ;
+C 76 ; WX 580 ; N L ; B 21 0 656 681 ;
+C 77 ; WX 860 ; N M ; B 18 0 956 681 ;
+C 78 ; WX 720 ; N N ; B 18 0 823 681 ;
+C 79 ; WX 760 ; N O ; B 88 -17 799 698 ;
+C 80 ; WX 600 ; N P ; B 21 0 681 681 ;
+C 81 ; WX 780 ; N Q ; B 61 -191 812 698 ;
+C 82 ; WX 700 ; N R ; B 21 0 736 681 ;
+C 83 ; WX 640 ; N S ; B 61 -17 668 698 ;
+C 84 ; WX 600 ; N T ; B 50 0 725 681 ;
+C 85 ; WX 720 ; N U ; B 118 -17 842 681 ;
+C 86 ; WX 680 ; N V ; B 87 0 815 681 ;
+C 87 ; WX 960 ; N W ; B 87 0 1095 681 ;
+C 88 ; WX 700 ; N X ; B -25 0 815 681 ;
+C 89 ; WX 660 ; N Y ; B 87 0 809 681 ;
+C 90 ; WX 580 ; N Z ; B 8 0 695 681 ;
+C 91 ; WX 260 ; N bracketleft ; B 56 -136 351 717 ;
+C 92 ; WX 600 ; N backslash ; B 84 0 542 717 ;
+C 93 ; WX 260 ; N bracketright ; B 15 -136 309 717 ;
+C 94 ; WX 600 ; N asciicircum ; B 97 276 599 681 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 280 ; N quoteleft ; B 191 470 330 698 ;
+C 97 ; WX 620 ; N a ; B 71 -8 686 494 ;
+C 98 ; WX 600 ; N b ; B 88 -8 621 717 ;
+C 99 ; WX 480 ; N c ; B 65 -8 522 494 ;
+C 100 ; WX 640 ; N d ; B 65 -8 695 717 ;
+C 101 ; WX 540 ; N e ; B 65 -8 575 494 ;
+C 102 ; WX 340 ; N f ; B -160 -218 557 725 ; L i fi ; L l fl ;
+C 103 ; WX 560 ; N g ; B 4 -221 581 494 ;
+C 104 ; WX 620 ; N h ; B 88 -8 689 717 ;
+C 105 ; WX 280 ; N i ; B 88 -8 351 663 ;
+C 106 ; WX 280 ; N j ; B -200 -221 308 663 ;
+C 107 ; WX 600 ; N k ; B 88 -8 657 717 ;
+C 108 ; WX 280 ; N l ; B 100 -8 342 717 ;
+C 109 ; WX 880 ; N m ; B 88 -8 952 494 ;
+C 110 ; WX 620 ; N n ; B 88 -8 673 494 ;
+C 111 ; WX 540 ; N o ; B 65 -8 572 494 ;
+C 112 ; WX 600 ; N p ; B -24 -212 620 494 ;
+C 113 ; WX 560 ; N q ; B 65 -212 584 494 ;
+C 114 ; WX 400 ; N r ; B 88 0 481 494 ;
+C 115 ; WX 540 ; N s ; B 65 -8 547 494 ;
+C 116 ; WX 340 ; N t ; B 88 -8 411 664 ;
+C 117 ; WX 620 ; N u ; B 88 -8 686 484 ;
+C 118 ; WX 540 ; N v ; B 88 -8 562 494 ;
+C 119 ; WX 880 ; N w ; B 88 -8 893 494 ;
+C 120 ; WX 540 ; N x ; B 9 -8 626 494 ;
+C 121 ; WX 600 ; N y ; B 60 -221 609 484 ;
+C 122 ; WX 520 ; N z ; B 38 -8 561 494 ;
+C 123 ; WX 360 ; N braceleft ; B 122 -191 442 717 ;
+C 124 ; WX 600 ; N bar ; B 294 -250 372 750 ;
+C 125 ; WX 380 ; N braceright ; B 13 -191 333 717 ;
+C 126 ; WX 600 ; N asciitilde ; B 91 207 595 386 ;
+C 161 ; WX 320 ; N exclamdown ; B 73 -213 301 494 ;
+C 162 ; WX 620 ; N cent ; B 148 -29 596 715 ;
+C 163 ; WX 620 ; N sterling ; B 4 -17 702 698 ;
+C 164 ; WX 20 ; N fraction ; B -228 0 323 681 ;
+C 165 ; WX 620 ; N yen ; B 71 0 735 681 ;
+C 166 ; WX 620 ; N florin ; B -26 -218 692 725 ;
+C 167 ; WX 620 ; N section ; B 38 -178 638 698 ;
+C 168 ; WX 620 ; N currency ; B 100 89 605 591 ;
+C 169 ; WX 200 ; N quotesingle ; B 99 473 247 698 ;
+C 170 ; WX 440 ; N quotedblleft ; B 191 470 493 698 ;
+C 171 ; WX 300 ; N guillemotleft ; B 70 129 313 434 ;
+C 172 ; WX 180 ; N guilsinglleft ; B 75 129 208 434 ;
+C 173 ; WX 180 ; N guilsinglright ; B 70 129 203 434 ;
+C 174 ; WX 640 ; N fi ; B -159 -222 709 725 ;
+C 175 ; WX 660 ; N fl ; B -159 -218 713 725 ;
+C 177 ; WX 500 ; N endash ; B 33 269 561 325 ;
+C 178 ; WX 620 ; N dagger ; B 192 -130 570 698 ;
+C 179 ; WX 620 ; N daggerdbl ; B 144 -122 566 698 ;
+C 180 ; WX 300 ; N periodcentered ; B 137 229 272 364 ;
+C 182 ; WX 620 ; N paragraph ; B 112 0 718 681 ;
+C 183 ; WX 460 ; N bullet ; B 100 170 444 511 ;
+C 184 ; WX 320 ; N quotesinglbase ; B 87 -114 226 113 ;
+C 185 ; WX 480 ; N quotedblbase ; B 87 -114 390 113 ;
+C 186 ; WX 440 ; N quotedblright ; B 148 470 451 698 ;
+C 187 ; WX 300 ; N guillemotright ; B 60 129 303 434 ;
+C 188 ; WX 1000 ; N ellipsis ; B 99 -8 900 127 ;
+C 189 ; WX 1180 ; N perthousand ; B 56 -8 1199 691 ;
+C 191 ; WX 540 ; N questiondown ; B 18 -212 508 494 ;
+C 193 ; WX 340 ; N grave ; B 182 551 377 706 ;
+C 194 ; WX 320 ; N acute ; B 178 551 373 706 ;
+C 195 ; WX 440 ; N circumflex ; B 176 571 479 685 ;
+C 196 ; WX 440 ; N tilde ; B 180 586 488 671 ;
+C 197 ; WX 440 ; N macron ; B 178 599 484 658 ;
+C 198 ; WX 440 ; N breve ; B 191 577 500 680 ;
+C 199 ; WX 260 ; N dotaccent ; B 169 543 290 664 ;
+C 200 ; WX 420 ; N dieresis ; B 185 569 467 688 ;
+C 202 ; WX 300 ; N ring ; B 178 551 334 706 ;
+C 203 ; WX 320 ; N cedilla ; B 45 -178 240 0 ;
+C 205 ; WX 340 ; N hungarumlaut ; B 167 547 402 738 ;
+C 206 ; WX 260 ; N ogonek ; B 51 -173 184 0 ;
+C 207 ; WX 440 ; N caron ; B 178 571 481 684 ;
+C 208 ; WX 1000 ; N emdash ; B 33 269 1061 325 ;
+C 225 ; WX 1220 ; N AE ; B -45 0 1269 681 ;
+C 227 ; WX 440 ; N ordfeminine ; B 130 396 513 698 ;
+C 232 ; WX 580 ; N Lslash ; B 21 0 656 681 ;
+C 233 ; WX 760 ; N Oslash ; B 88 -95 799 777 ;
+C 234 ; WX 1180 ; N OE ; B 88 -17 1237 698 ;
+C 235 ; WX 400 ; N ordmasculine ; B 139 396 455 698 ;
+C 241 ; WX 880 ; N ae ; B 71 -8 918 494 ;
+C 245 ; WX 280 ; N dotlessi ; B 88 -8 351 484 ;
+C 248 ; WX 340 ; N lslash ; B 50 -8 398 717 ;
+C 249 ; WX 540 ; N oslash ; B 65 -49 571 532 ;
+C 250 ; WX 900 ; N oe ; B 65 -8 948 494 ;
+C 251 ; WX 620 ; N germandbls ; B -121 -111 653 698 ;
+C -1 ; WX 540 ; N ecircumflex ; B 65 -8 575 685 ;
+C -1 ; WX 540 ; N edieresis ; B 65 -8 575 688 ;
+C -1 ; WX 620 ; N aacute ; B 71 -8 686 706 ;
+C -1 ; WX 740 ; N registered ; B 84 -17 784 698 ;
+C -1 ; WX 280 ; N icircumflex ; B 76 -8 379 685 ;
+C -1 ; WX 620 ; N udieresis ; B 88 -8 686 688 ;
+C -1 ; WX 540 ; N ograve ; B 65 -8 572 706 ;
+C -1 ; WX 620 ; N uacute ; B 88 -8 686 706 ;
+C -1 ; WX 620 ; N ucircumflex ; B 88 -8 686 685 ;
+C -1 ; WX 700 ; N Aacute ; B -25 0 720 883 ;
+C -1 ; WX 280 ; N igrave ; B 88 -8 351 706 ;
+C -1 ; WX 320 ; N Icircumflex ; B 21 0 449 862 ;
+C -1 ; WX 480 ; N ccedilla ; B 65 -178 522 494 ;
+C -1 ; WX 620 ; N adieresis ; B 71 -8 686 688 ;
+C -1 ; WX 680 ; N Ecircumflex ; B 21 0 736 862 ;
+C -1 ; WX 540 ; N scaron ; B 65 -8 547 684 ;
+C -1 ; WX 600 ; N thorn ; B -24 -212 620 717 ;
+C -1 ; WX 980 ; N trademark ; B 69 277 965 681 ;
+C -1 ; WX 540 ; N egrave ; B 65 -8 575 706 ;
+C -1 ; WX 372 ; N threesuperior ; B 70 269 439 698 ;
+C -1 ; WX 520 ; N zcaron ; B 38 -8 561 684 ;
+C -1 ; WX 620 ; N atilde ; B 71 -8 686 671 ;
+C -1 ; WX 620 ; N aring ; B 71 -8 686 706 ;
+C -1 ; WX 540 ; N ocircumflex ; B 65 -8 572 685 ;
+C -1 ; WX 680 ; N Edieresis ; B 21 0 736 865 ;
+C -1 ; WX 930 ; N threequarters ; B 99 0 913 691 ;
+C -1 ; WX 600 ; N ydieresis ; B 60 -221 609 688 ;
+C -1 ; WX 600 ; N yacute ; B 60 -221 609 706 ;
+C -1 ; WX 280 ; N iacute ; B 88 -8 351 706 ;
+C -1 ; WX 700 ; N Acircumflex ; B -25 0 720 862 ;
+C -1 ; WX 720 ; N Uacute ; B 118 -17 842 883 ;
+C -1 ; WX 540 ; N eacute ; B 65 -8 575 706 ;
+C -1 ; WX 760 ; N Ograve ; B 88 -17 799 883 ;
+C -1 ; WX 620 ; N agrave ; B 71 -8 686 706 ;
+C -1 ; WX 720 ; N Udieresis ; B 118 -17 842 865 ;
+C -1 ; WX 620 ; N acircumflex ; B 71 -8 686 685 ;
+C -1 ; WX 320 ; N Igrave ; B 21 0 412 883 ;
+C -1 ; WX 372 ; N twosuperior ; B 68 279 439 698 ;
+C -1 ; WX 720 ; N Ugrave ; B 118 -17 842 883 ;
+C -1 ; WX 930 ; N onequarter ; B 91 0 913 681 ;
+C -1 ; WX 720 ; N Ucircumflex ; B 118 -17 842 862 ;
+C -1 ; WX 640 ; N Scaron ; B 61 -17 668 861 ;
+C -1 ; WX 320 ; N Idieresis ; B 21 0 447 865 ;
+C -1 ; WX 280 ; N idieresis ; B 88 -8 377 688 ;
+C -1 ; WX 680 ; N Egrave ; B 21 0 736 883 ;
+C -1 ; WX 760 ; N Oacute ; B 88 -17 799 883 ;
+C -1 ; WX 600 ; N divide ; B 91 46 595 548 ;
+C -1 ; WX 700 ; N Atilde ; B -25 0 720 848 ;
+C -1 ; WX 700 ; N Aring ; B -25 0 720 883 ;
+C -1 ; WX 760 ; N Odieresis ; B 88 -17 799 865 ;
+C -1 ; WX 700 ; N Adieresis ; B -25 0 720 865 ;
+C -1 ; WX 720 ; N Ntilde ; B 18 0 823 848 ;
+C -1 ; WX 580 ; N Zcaron ; B 8 0 695 861 ;
+C -1 ; WX 600 ; N Thorn ; B 21 0 656 681 ;
+C -1 ; WX 320 ; N Iacute ; B 21 0 412 883 ;
+C -1 ; WX 600 ; N plusminus ; B 91 0 595 548 ;
+C -1 ; WX 600 ; N multiply ; B 91 44 595 548 ;
+C -1 ; WX 680 ; N Eacute ; B 21 0 736 883 ;
+C -1 ; WX 660 ; N Ydieresis ; B 87 0 809 865 ;
+C -1 ; WX 372 ; N onesuperior ; B 114 279 339 688 ;
+C -1 ; WX 620 ; N ugrave ; B 88 -8 686 706 ;
+C -1 ; WX 600 ; N logicalnot ; B 91 163 595 433 ;
+C -1 ; WX 620 ; N ntilde ; B 88 -8 673 671 ;
+C -1 ; WX 760 ; N Otilde ; B 88 -17 799 848 ;
+C -1 ; WX 540 ; N otilde ; B 65 -8 572 671 ;
+C -1 ; WX 720 ; N Ccedilla ; B 88 -178 746 698 ;
+C -1 ; WX 700 ; N Agrave ; B -25 0 720 883 ;
+C -1 ; WX 930 ; N onehalf ; B 91 0 925 681 ;
+C -1 ; WX 740 ; N Eth ; B 21 0 782 681 ;
+C -1 ; WX 400 ; N degree ; B 120 398 420 698 ;
+C -1 ; WX 660 ; N Yacute ; B 87 0 809 883 ;
+C -1 ; WX 760 ; N Ocircumflex ; B 88 -17 799 862 ;
+C -1 ; WX 540 ; N oacute ; B 65 -8 572 706 ;
+C -1 ; WX 620 ; N mu ; B 53 -221 686 484 ;
+C -1 ; WX 600 ; N minus ; B 91 259 595 335 ;
+C -1 ; WX 540 ; N eth ; B 65 -8 642 725 ;
+C -1 ; WX 540 ; N odieresis ; B 65 -8 572 688 ;
+C -1 ; WX 740 ; N copyright ; B 84 -17 784 698 ;
+C -1 ; WX 600 ; N brokenbar ; B 294 -175 372 675 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 85
+
+KPX A Y -62
+KPX A W -73
+KPX A V -78
+KPX A T -5
+
+KPX F period -97
+KPX F comma -98
+KPX F A -16
+
+KPX L y 20
+KPX L Y 7
+KPX L W 9
+KPX L V 4
+
+KPX P period -105
+KPX P comma -106
+KPX P A -30
+
+KPX R Y 11
+KPX R W 2
+KPX R V 2
+KPX R T 65
+
+KPX T semicolon 48
+KPX T s -7
+KPX T r 67
+KPX T period -78
+KPX T o 14
+KPX T i 71
+KPX T hyphen 20
+KPX T e 10
+KPX T comma -79
+KPX T colon 48
+KPX T c 16
+KPX T a 9
+KPX T A -14
+
+KPX V y -14
+KPX V u -10
+KPX V semicolon -44
+KPX V r -20
+KPX V period -100
+KPX V o -70
+KPX V i 3
+KPX V hyphen 20
+KPX V e -70
+KPX V comma -109
+KPX V colon -35
+KPX V a -70
+KPX V A -70
+
+KPX W y -14
+KPX W u -20
+KPX W semicolon -42
+KPX W r -30
+KPX W period -100
+KPX W o -60
+KPX W i 3
+KPX W hyphen 20
+KPX W e -60
+KPX W comma -109
+KPX W colon -35
+KPX W a -60
+KPX W A -60
+
+KPX Y v -19
+KPX Y u -31
+KPX Y semicolon -40
+KPX Y q -72
+KPX Y period -100
+KPX Y p -37
+KPX Y o -75
+KPX Y i -11
+KPX Y hyphen 20
+KPX Y e -78
+KPX Y comma -109
+KPX Y colon -35
+KPX Y a -79
+KPX Y A -82
+
+KPX f f -19
+
+KPX r q -14
+KPX r period -134
+KPX r o -10
+KPX r n 38
+KPX r m 37
+KPX r hyphen 20
+KPX r h -20
+KPX r g -3
+KPX r f -9
+KPX r e -15
+KPX r d -9
+KPX r comma -143
+KPX r c -8
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 200 177 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 130 177 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 140 177 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 160 177 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 220 177 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 130 177 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 210 177 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 140 177 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 150 177 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 150 177 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 30 177 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -30 177 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -20 177 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -30 177 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 130 177 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 250 177 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 190 177 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 200 177 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 210 177 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 190 177 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 100 177 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 230 177 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 170 177 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 180 177 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 170 177 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 200 177 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 140 177 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 70 177 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 120 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 70 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 80 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 110 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 140 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 60 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 90 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 30 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 40 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 80 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -40 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -100 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -90 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -60 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 60 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 80 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 20 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 40 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 80 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 30 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 30 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 120 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 60 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 70 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 110 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 140 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 70 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 20 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Bk-Md b/font/Bk-Md
new file mode 100644
index 0000000..be50ac5
--- /dev/null
+++ b/font/Bk-Md
@@ -0,0 +1,451 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Jun 28 14:46:06 1990
+Comment UniqueID 31723
+Comment VMusage 29459 36351
+FontName Bookman-Medium
+FullName ITC Bookman Medium
+FamilyName ITC Bookman
+Weight Medium
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -174 -236 1138 928
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.ITC Bookman is a trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 490
+Ascender 690
+Descender -226
+StartCharMetrics 228
+C 32 ; WX 306 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 334 ; N exclam ; B 82 -6 252 694 ;
+C 34 ; WX 500 ; N quotedbl ; B 118 423 382 694 ;
+C 35 ; WX 612 ; N numbersign ; B 56 0 556 674 ;
+C 36 ; WX 612 ; N dollar ; B 39 -91 573 750 ;
+C 37 ; WX 796 ; N percent ; B 35 -10 761 684 ;
+C 38 ; WX 833 ; N ampersand ; B 52 -13 781 688 ;
+C 39 ; WX 278 ; N quoteright ; B 60 423 218 694 ;
+C 40 ; WX 333 ; N parenleft ; B 83 -174 276 690 ;
+C 41 ; WX 333 ; N parenright ; B 57 -174 250 690 ;
+C 42 ; WX 556 ; N asterisk ; B 93 282 463 694 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 306 ; N comma ; B 77 -118 229 146 ;
+C 45 ; WX 333 ; N hyphen ; B 20 212 313 316 ;
+C 46 ; WX 306 ; N period ; B 77 -6 229 146 ;
+C 47 ; WX 278 ; N slash ; B -22 -13 300 694 ;
+C 48 ; WX 612 ; N zero ; B 39 -10 573 684 ;
+C 49 ; WX 612 ; N one ; B 111 0 515 684 ;
+C 50 ; WX 612 ; N two ; B 44 0 560 684 ;
+C 51 ; WX 612 ; N three ; B 53 -10 559 684 ;
+C 52 ; WX 612 ; N four ; B 24 0 588 674 ;
+C 53 ; WX 612 ; N five ; B 50 -10 562 716 ;
+C 54 ; WX 612 ; N six ; B 43 -10 569 684 ;
+C 55 ; WX 612 ; N seven ; B 35 0 565 674 ;
+C 56 ; WX 612 ; N eight ; B 34 -10 578 684 ;
+C 57 ; WX 612 ; N nine ; B 43 -10 569 684 ;
+C 58 ; WX 306 ; N colon ; B 77 -6 229 441 ;
+C 59 ; WX 306 ; N semicolon ; B 77 -118 229 441 ;
+C 60 ; WX 600 ; N less ; B 47 -8 553 514 ;
+C 61 ; WX 600 ; N equal ; B 47 107 553 399 ;
+C 62 ; WX 600 ; N greater ; B 47 -8 553 514 ;
+C 63 ; WX 611 ; N question ; B 48 -6 563 694 ;
+C 64 ; WX 800 ; N at ; B 47 -13 753 694 ;
+C 65 ; WX 722 ; N A ; B -17 0 739 690 ;
+C 66 ; WX 722 ; N B ; B 14 0 676 681 ;
+C 67 ; WX 722 ; N C ; B 41 -13 681 694 ;
+C 68 ; WX 778 ; N D ; B 26 0 737 681 ;
+C 69 ; WX 722 ; N E ; B 26 0 686 681 ;
+C 70 ; WX 611 ; N F ; B 26 0 632 681 ;
+C 71 ; WX 778 ; N G ; B 41 -13 759 694 ;
+C 72 ; WX 778 ; N H ; B 26 0 752 681 ;
+C 73 ; WX 334 ; N I ; B 14 0 320 681 ;
+C 74 ; WX 611 ; N J ; B -12 -13 589 681 ;
+C 75 ; WX 778 ; N K ; B 26 0 783 681 ;
+C 76 ; WX 667 ; N L ; B 26 0 662 681 ;
+C 77 ; WX 889 ; N M ; B 26 0 863 681 ;
+C 78 ; WX 722 ; N N ; B 26 0 696 681 ;
+C 79 ; WX 778 ; N O ; B 41 -13 737 694 ;
+C 80 ; WX 667 ; N P ; B 26 0 630 681 ;
+C 81 ; WX 778 ; N Q ; B 41 -212 737 694 ;
+C 82 ; WX 722 ; N R ; B 26 0 724 681 ;
+C 83 ; WX 667 ; N S ; B 35 -13 632 694 ;
+C 84 ; WX 668 ; N T ; B 5 0 663 681 ;
+C 85 ; WX 722 ; N U ; B 14 -13 708 681 ;
+C 86 ; WX 667 ; N V ; B -15 -6 682 681 ;
+C 87 ; WX 944 ; N W ; B -5 -6 949 681 ;
+C 88 ; WX 722 ; N X ; B -4 0 726 681 ;
+C 89 ; WX 667 ; N Y ; B -4 0 671 681 ;
+C 90 ; WX 667 ; N Z ; B 26 0 641 681 ;
+C 91 ; WX 333 ; N bracketleft ; B 89 -165 254 681 ;
+C 92 ; WX 278 ; N backslash ; B -22 -13 300 694 ;
+C 93 ; WX 333 ; N bracketright ; B 79 -165 244 681 ;
+C 94 ; WX 600 ; N asciicircum ; B 82 309 518 674 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 278 ; N quoteleft ; B 60 423 218 694 ;
+C 97 ; WX 556 ; N a ; B 29 -10 561 500 ;
+C 98 ; WX 611 ; N b ; B 30 -10 572 690 ;
+C 99 ; WX 556 ; N c ; B 39 -10 535 500 ;
+C 100 ; WX 611 ; N d ; B 30 -10 588 690 ;
+C 101 ; WX 556 ; N e ; B 39 -10 526 500 ;
+C 102 ; WX 333 ; N f ; B 30 0 399 680 ; L i fi ; L l fl ;
+C 103 ; WX 556 ; N g ; B 13 -236 535 576 ;
+C 104 ; WX 666 ; N h ; B 36 0 630 690 ;
+C 105 ; WX 334 ; N i ; B 30 0 304 700 ;
+C 106 ; WX 334 ; N j ; B -92 -236 254 700 ;
+C 107 ; WX 667 ; N k ; B 30 0 619 690 ;
+C 108 ; WX 334 ; N l ; B 30 0 304 690 ;
+C 109 ; WX 944 ; N m ; B 30 0 914 500 ;
+C 110 ; WX 666 ; N n ; B 36 0 630 500 ;
+C 111 ; WX 612 ; N o ; B 39 -10 573 500 ;
+C 112 ; WX 611 ; N p ; B 30 -226 572 500 ;
+C 113 ; WX 611 ; N q ; B 39 -226 588 500 ;
+C 114 ; WX 444 ; N r ; B 36 0 450 500 ;
+C 115 ; WX 556 ; N s ; B 47 -10 509 500 ;
+C 116 ; WX 389 ; N t ; B 30 -10 414 647 ;
+C 117 ; WX 667 ; N u ; B 36 -10 631 490 ;
+C 118 ; WX 500 ; N v ; B -15 -6 515 490 ;
+C 119 ; WX 778 ; N w ; B 12 -6 766 490 ;
+C 120 ; WX 556 ; N x ; B 0 0 556 490 ;
+C 121 ; WX 556 ; N y ; B -4 -236 560 490 ;
+C 122 ; WX 556 ; N z ; B 27 0 529 490 ;
+C 123 ; WX 333 ; N braceleft ; B 41 -165 280 681 ;
+C 124 ; WX 222 ; N bar ; B 67 -13 155 694 ;
+C 125 ; WX 333 ; N braceright ; B 53 -165 292 681 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 174 531 332 ;
+C 161 ; WX 334 ; N exclamdown ; B 82 -210 252 490 ;
+C 162 ; WX 612 ; N cent ; B 58 -37 554 698 ;
+C 163 ; WX 612 ; N sterling ; B 8 -10 590 690 ;
+C 164 ; WX 167 ; N fraction ; B -174 -10 341 684 ;
+C 165 ; WX 612 ; N yen ; B 2 0 610 674 ;
+C 166 ; WX 612 ; N florin ; B 10 -226 602 694 ;
+C 167 ; WX 556 ; N section ; B 52 -13 484 694 ;
+C 168 ; WX 612 ; N currency ; B 52 83 560 591 ;
+C 169 ; WX 278 ; N quotesingle ; B 92 423 186 694 ;
+C 170 ; WX 500 ; N quotedblleft ; B 66 423 434 694 ;
+C 171 ; WX 500 ; N guillemotleft ; B 42 77 458 451 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 51 77 282 451 ;
+C 173 ; WX 333 ; N guilsinglright ; B 51 77 282 451 ;
+C 174 ; WX 667 ; N fi ; B 30 0 637 680 ;
+C 175 ; WX 667 ; N fl ; B 30 0 637 680 ;
+C 177 ; WX 500 ; N endash ; B 0 226 500 302 ;
+C 178 ; WX 556 ; N dagger ; B 90 0 466 694 ;
+C 179 ; WX 556 ; N daggerdbl ; B 100 0 456 694 ;
+C 180 ; WX 306 ; N periodcentered ; B 77 223 229 375 ;
+C 182 ; WX 620 ; N paragraph ; B 64 0 556 681 ;
+C 183 ; WX 500 ; N bullet ; B 82 169 418 505 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 60 -125 218 146 ;
+C 185 ; WX 500 ; N quotedblbase ; B 65 -125 435 146 ;
+C 186 ; WX 500 ; N quotedblright ; B 66 423 434 694 ;
+C 187 ; WX 500 ; N guillemotright ; B 42 77 458 451 ;
+C 188 ; WX 1000 ; N ellipsis ; B 91 -6 909 146 ;
+C 189 ; WX 1167 ; N perthousand ; B 29 -10 1138 684 ;
+C 191 ; WX 611 ; N questiondown ; B 48 -210 563 490 ;
+C 193 ; WX 334 ; N grave ; B 8 547 246 733 ;
+C 194 ; WX 334 ; N acute ; B 88 547 326 733 ;
+C 195 ; WX 334 ; N circumflex ; B -2 547 336 723 ;
+C 196 ; WX 334 ; N tilde ; B -16 564 350 690 ;
+C 197 ; WX 334 ; N macron ; B 1 584 333 654 ;
+C 198 ; WX 334 ; N breve ; B 15 547 319 711 ;
+C 199 ; WX 334 ; N dotaccent ; B 103 557 231 685 ;
+C 200 ; WX 334 ; N dieresis ; B -2 557 336 685 ;
+C 202 ; WX 334 ; N ring ; B 60 547 274 761 ;
+C 203 ; WX 334 ; N cedilla ; B 67 -218 295 0 ;
+C 205 ; WX 334 ; N hungarumlaut ; B -16 547 430 733 ;
+C 206 ; WX 334 ; N ogonek ; B 46 -218 278 0 ;
+C 207 ; WX 334 ; N caron ; B -2 547 336 723 ;
+C 208 ; WX 1000 ; N emdash ; B 0 226 1000 302 ;
+C 225 ; WX 1000 ; N AE ; B -34 0 975 681 ;
+C 227 ; WX 361 ; N ordfeminine ; B 15 372 369 684 ;
+C 232 ; WX 667 ; N Lslash ; B 26 0 662 681 ;
+C 233 ; WX 778 ; N Oslash ; B 41 -60 737 740 ;
+C 234 ; WX 1000 ; N OE ; B 19 -13 991 694 ;
+C 235 ; WX 398 ; N ordmasculine ; B 22 372 376 684 ;
+C 241 ; WX 833 ; N ae ; B 26 -10 807 500 ;
+C 245 ; WX 334 ; N dotlessi ; B 30 0 304 490 ;
+C 248 ; WX 334 ; N lslash ; B 30 0 304 690 ;
+C 249 ; WX 612 ; N oslash ; B 39 -95 573 597 ;
+C 250 ; WX 889 ; N oe ; B 33 -10 856 500 ;
+C 251 ; WX 667 ; N germandbls ; B 33 -10 632 680 ;
+C -1 ; WX 667 ; N Zcaron ; B 26 0 641 894 ;
+C -1 ; WX 556 ; N ccedilla ; B 39 -218 535 500 ;
+C -1 ; WX 556 ; N ydieresis ; B -4 -236 560 685 ;
+C -1 ; WX 556 ; N atilde ; B 29 -10 561 690 ;
+C -1 ; WX 334 ; N icircumflex ; B -2 0 336 723 ;
+C -1 ; WX 398 ; N threesuperior ; B 29 262 372 684 ;
+C -1 ; WX 556 ; N ecircumflex ; B 39 -10 526 723 ;
+C -1 ; WX 611 ; N thorn ; B 30 -226 572 690 ;
+C -1 ; WX 556 ; N egrave ; B 39 -10 526 733 ;
+C -1 ; WX 398 ; N twosuperior ; B 24 268 374 684 ;
+C -1 ; WX 556 ; N eacute ; B 39 -10 526 733 ;
+C -1 ; WX 612 ; N otilde ; B 39 -10 573 690 ;
+C -1 ; WX 722 ; N Aacute ; B -17 0 739 904 ;
+C -1 ; WX 612 ; N ocircumflex ; B 39 -10 573 723 ;
+C -1 ; WX 556 ; N yacute ; B -4 -236 560 733 ;
+C -1 ; WX 667 ; N udieresis ; B 36 -10 631 685 ;
+C -1 ; WX 916 ; N threequarters ; B 29 -10 900 684 ;
+C -1 ; WX 556 ; N acircumflex ; B 29 -10 561 723 ;
+C -1 ; WX 778 ; N Eth ; B 26 0 737 681 ;
+C -1 ; WX 556 ; N edieresis ; B 39 -10 526 685 ;
+C -1 ; WX 667 ; N ugrave ; B 36 -10 631 733 ;
+C -1 ; WX 1000 ; N trademark ; B 23 276 977 681 ;
+C -1 ; WX 612 ; N ograve ; B 39 -10 573 733 ;
+C -1 ; WX 556 ; N scaron ; B 47 -10 509 723 ;
+C -1 ; WX 334 ; N Idieresis ; B -2 0 336 856 ;
+C -1 ; WX 667 ; N uacute ; B 36 -10 631 733 ;
+C -1 ; WX 556 ; N agrave ; B 29 -10 561 733 ;
+C -1 ; WX 666 ; N ntilde ; B 36 0 630 690 ;
+C -1 ; WX 556 ; N aring ; B 29 -10 561 761 ;
+C -1 ; WX 556 ; N zcaron ; B 27 0 529 723 ;
+C -1 ; WX 334 ; N Icircumflex ; B -2 0 336 894 ;
+C -1 ; WX 722 ; N Ntilde ; B 26 0 696 861 ;
+C -1 ; WX 667 ; N ucircumflex ; B 36 -10 631 723 ;
+C -1 ; WX 722 ; N Ecircumflex ; B 26 0 686 894 ;
+C -1 ; WX 334 ; N Iacute ; B 14 0 326 904 ;
+C -1 ; WX 722 ; N Ccedilla ; B 41 -218 681 694 ;
+C -1 ; WX 778 ; N Odieresis ; B 41 -13 737 856 ;
+C -1 ; WX 667 ; N Scaron ; B 35 -13 632 894 ;
+C -1 ; WX 722 ; N Edieresis ; B 26 0 686 856 ;
+C -1 ; WX 334 ; N Igrave ; B 8 0 320 904 ;
+C -1 ; WX 556 ; N adieresis ; B 29 -10 561 685 ;
+C -1 ; WX 778 ; N Ograve ; B 41 -13 737 904 ;
+C -1 ; WX 722 ; N Egrave ; B 26 0 686 904 ;
+C -1 ; WX 667 ; N Ydieresis ; B -4 0 671 856 ;
+C -1 ; WX 800 ; N registered ; B 47 -13 753 694 ;
+C -1 ; WX 778 ; N Otilde ; B 41 -13 737 861 ;
+C -1 ; WX 916 ; N onequarter ; B 61 -10 900 684 ;
+C -1 ; WX 722 ; N Ugrave ; B 14 -13 708 904 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 14 -13 708 894 ;
+C -1 ; WX 667 ; N Thorn ; B 26 0 630 681 ;
+C -1 ; WX 600 ; N divide ; B 47 -31 553 537 ;
+C -1 ; WX 722 ; N Atilde ; B -17 0 739 861 ;
+C -1 ; WX 722 ; N Uacute ; B 14 -13 708 904 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 41 -13 737 894 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 108 553 399 ;
+C -1 ; WX 722 ; N Aring ; B -17 0 739 928 ;
+C -1 ; WX 334 ; N idieresis ; B -2 0 336 685 ;
+C -1 ; WX 334 ; N iacute ; B 30 0 326 733 ;
+C -1 ; WX 556 ; N aacute ; B 29 -10 561 733 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 69 22 531 484 ;
+C -1 ; WX 722 ; N Udieresis ; B 14 -13 708 856 ;
+C -1 ; WX 600 ; N minus ; B 47 209 553 297 ;
+C -1 ; WX 398 ; N onesuperior ; B 61 268 337 684 ;
+C -1 ; WX 722 ; N Eacute ; B 26 0 686 904 ;
+C -1 ; WX 722 ; N Acircumflex ; B -17 0 739 894 ;
+C -1 ; WX 800 ; N copyright ; B 47 -13 753 694 ;
+C -1 ; WX 722 ; N Agrave ; B -17 0 739 904 ;
+C -1 ; WX 612 ; N odieresis ; B 39 -10 573 685 ;
+C -1 ; WX 612 ; N oacute ; B 39 -10 573 733 ;
+C -1 ; WX 400 ; N degree ; B 57 398 343 684 ;
+C -1 ; WX 334 ; N igrave ; B 8 0 304 733 ;
+C -1 ; WX 667 ; N mu ; B 36 -226 631 490 ;
+C -1 ; WX 778 ; N Oacute ; B 41 -13 737 904 ;
+C -1 ; WX 612 ; N eth ; B 39 -10 573 720 ;
+C -1 ; WX 722 ; N Adieresis ; B -17 0 739 856 ;
+C -1 ; WX 667 ; N Yacute ; B -4 0 671 904 ;
+C -1 ; WX 222 ; N brokenbar ; B 67 -13 155 694 ;
+C -1 ; WX 916 ; N onehalf ; B 61 -10 892 684 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 111
+
+KPX A y -37
+KPX A w -37
+KPX A v -18
+KPX A quoteright -92
+KPX A quotedblright -92
+KPX A Y -74
+KPX A W -74
+KPX A V -74
+KPX A T -55
+
+KPX F period -111
+KPX F comma -111
+KPX F A -55
+
+KPX J period -37
+KPX J comma -37
+
+KPX L y -55
+KPX L quoteright -129
+KPX L quotedblright -92
+KPX L Y -92
+KPX L W -92
+KPX L V -92
+KPX L T -92
+
+KPX O period -18
+KPX O comma -18
+KPX O Y -18
+KPX O T -18
+
+KPX P period -129
+KPX P comma -129
+KPX P A -55
+
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -92
+KPX T w -111
+KPX T u -92
+KPX T semicolon -92
+KPX T r -92
+KPX T period -92
+KPX T o -92
+KPX T i -55
+KPX T hyphen -92
+KPX T e -92
+KPX T comma -92
+KPX T colon -92
+KPX T a -92
+KPX T O -18
+KPX T A -55
+
+KPX U period -18
+KPX U comma -18
+
+KPX V u -18
+KPX V semicolon -74
+KPX V period -92
+KPX V o -55
+KPX V i -18
+KPX V hyphen -55
+KPX V e -37
+KPX V comma -92
+KPX V colon -74
+KPX V a -37
+KPX V A -74
+
+KPX W y -18
+KPX W u -18
+KPX W semicolon -55
+KPX W period -74
+KPX W o -37
+KPX W i -18
+KPX W hyphen -55
+KPX W e -37
+KPX W comma -74
+KPX W colon -55
+KPX W a -37
+KPX W A -74
+
+KPX Y u -37
+KPX Y semicolon -74
+KPX Y period -92
+KPX Y o -74
+KPX Y i -18
+KPX Y hyphen -74
+KPX Y e -55
+KPX Y comma -92
+KPX Y colon -74
+KPX Y a -55
+KPX Y A -37
+
+KPX a w -18
+
+KPX f quoteright 37
+KPX f l 18
+KPX f i 18
+KPX f f 18
+KPX f e 18
+KPX f dotlessi 18
+KPX f a 18
+
+KPX k y -18
+KPX k o -25
+KPX k e -25
+
+KPX m u -18
+
+KPX n u -18
+
+KPX quotedblleft A -25
+
+KPX quoteleft quoteleft -68
+KPX quoteleft A -25
+
+KPX quoteright s -55
+KPX quoteright quoteright -68
+
+KPX r period -74
+KPX r hyphen -55
+KPX r comma -74
+
+KPX v period -55
+KPX v o 18
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -55
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 194 171 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 194 171 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 194 171 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 194 171 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 194 167 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 194 171 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 214 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 174 171 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 174 171 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 174 171 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 174 171 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 0 171 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 0 171 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 0 171 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 0 171 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 194 171 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 222 171 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 222 171 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 222 171 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 222 171 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 222 171 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 167 171 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 194 171 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 194 171 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 194 171 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 194 171 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 167 171 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 167 171 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 167 171 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 101 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 101 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 101 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 101 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 101 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 101 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 111 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 121 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 121 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 121 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 121 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 166 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 139 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 139 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 139 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 139 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 139 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 111 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 167 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 167 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 167 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 167 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 111 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 111 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 111 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Bk-MdIt b/font/Bk-MdIt
new file mode 100644
index 0000000..1e5fd0b
--- /dev/null
+++ b/font/Bk-MdIt
@@ -0,0 +1,509 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Jun 28 15:04:32 1990
+Comment UniqueID 31729
+Comment VMusage 31120 38012
+FontName Bookman-MediumItalic
+FullName ITC Bookman Medium Italic
+FamilyName ITC Bookman
+Weight Medium
+ItalicAngle -12
+IsFixedPitch false
+FontBBox -240 -236 1147 934
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.ITC Bookman is a trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 500
+Ascender 690
+Descender -226
+StartCharMetrics 228
+C 32 ; WX 305 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 86 -6 325 694 ;
+C 34 ; WX 333 ; N quotedbl ; B 102 417 352 694 ;
+C 35 ; WX 612 ; N numbersign ; B 75 0 575 674 ;
+C 36 ; WX 612 ; N dollar ; B 35 -89 604 750 ;
+C 37 ; WX 796 ; N percent ; B 52 -10 776 684 ;
+C 38 ; WX 944 ; N ampersand ; B 80 -13 917 694 ;
+C 39 ; WX 222 ; N quoteright ; B 95 417 247 694 ;
+C 40 ; WX 333 ; N parenleft ; B 31 -174 329 690 ;
+C 41 ; WX 333 ; N parenright ; B 10 -174 308 690 ;
+C 42 ; WX 500 ; N asterisk ; B 100 285 468 694 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 306 ; N comma ; B 58 -125 210 152 ;
+C 45 ; WX 333 ; N hyphen ; B 32 217 322 311 ;
+C 46 ; WX 306 ; N period ; B 58 -6 210 152 ;
+C 47 ; WX 278 ; N slash ; B 7 -13 321 694 ;
+C 48 ; WX 612 ; N zero ; B 41 -10 602 684 ;
+C 49 ; WX 612 ; N one ; B 104 0 495 684 ;
+C 50 ; WX 612 ; N two ; B 37 0 584 684 ;
+C 51 ; WX 612 ; N three ; B 16 -10 583 684 ;
+C 52 ; WX 612 ; N four ; B 23 0 597 674 ;
+C 53 ; WX 612 ; N five ; B 35 -10 580 674 ;
+C 54 ; WX 612 ; N six ; B 48 -10 604 684 ;
+C 55 ; WX 612 ; N seven ; B 73 0 632 674 ;
+C 56 ; WX 612 ; N eight ; B 16 -10 590 684 ;
+C 57 ; WX 612 ; N nine ; B 44 -10 600 684 ;
+C 58 ; WX 306 ; N colon ; B 58 -6 261 429 ;
+C 59 ; WX 306 ; N semicolon ; B 58 -125 261 429 ;
+C 60 ; WX 600 ; N less ; B 47 -8 553 514 ;
+C 61 ; WX 600 ; N equal ; B 47 107 553 399 ;
+C 62 ; WX 600 ; N greater ; B 47 -8 553 514 ;
+C 63 ; WX 612 ; N question ; B 95 -6 590 694 ;
+C 64 ; WX 800 ; N at ; B 66 -13 772 694 ;
+C 65 ; WX 722 ; N A ; B -34 0 688 690 ;
+C 66 ; WX 722 ; N B ; B 2 0 701 681 ;
+C 67 ; WX 722 ; N C ; B 50 -13 714 694 ;
+C 68 ; WX 778 ; N D ; B 2 0 751 681 ;
+C 69 ; WX 722 ; N E ; B -6 0 709 681 ;
+C 70 ; WX 667 ; N F ; B -6 0 697 681 ;
+C 71 ; WX 778 ; N G ; B 38 -13 777 694 ;
+C 72 ; WX 778 ; N H ; B 2 0 820 681 ;
+C 73 ; WX 333 ; N I ; B -16 0 392 681 ;
+C 74 ; WX 611 ; N J ; B -2 -13 666 681 ;
+C 75 ; WX 722 ; N K ; B 2 0 802 681 ;
+C 76 ; WX 667 ; N L ; B 2 0 653 681 ;
+C 77 ; WX 889 ; N M ; B 2 0 920 681 ;
+C 78 ; WX 722 ; N N ; B 2 0 753 681 ;
+C 79 ; WX 778 ; N O ; B 50 -13 764 694 ;
+C 80 ; WX 667 ; N P ; B -6 0 688 681 ;
+C 81 ; WX 778 ; N Q ; B 8 -196 764 694 ;
+C 82 ; WX 722 ; N R ; B -6 0 704 681 ;
+C 83 ; WX 667 ; N S ; B 32 -13 625 694 ;
+C 84 ; WX 667 ; N T ; B 46 0 703 681 ;
+C 85 ; WX 778 ; N U ; B 105 -13 818 681 ;
+C 86 ; WX 667 ; N V ; B 35 -6 738 681 ;
+C 87 ; WX 944 ; N W ; B 56 -6 1023 681 ;
+C 88 ; WX 722 ; N X ; B -24 0 769 681 ;
+C 89 ; WX 611 ; N Y ; B 44 0 685 681 ;
+C 90 ; WX 667 ; N Z ; B 30 0 677 681 ;
+C 91 ; WX 333 ; N bracketleft ; B 21 -165 340 681 ;
+C 92 ; WX 278 ; N backslash ; B -4 -13 310 694 ;
+C 93 ; WX 333 ; N bracketright ; B 2 -165 321 681 ;
+C 94 ; WX 600 ; N asciicircum ; B 82 309 518 674 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 76 417 228 694 ;
+C 97 ; WX 667 ; N a ; B 41 -10 684 500 ;
+C 98 ; WX 611 ; N b ; B 57 -10 588 690 ;
+C 99 ; WX 556 ; N c ; B 41 -10 530 500 ;
+C 100 ; WX 611 ; N d ; B 41 -10 637 690 ;
+C 101 ; WX 556 ; N e ; B 41 -10 547 500 ;
+C 102 ; WX 333 ; N f ; B -222 -203 460 709 ; L i fi ; L l fl ;
+C 103 ; WX 611 ; N g ; B -20 -226 583 500 ;
+C 104 ; WX 667 ; N h ; B 57 -10 675 690 ;
+C 105 ; WX 333 ; N i ; B 51 -10 338 700 ;
+C 106 ; WX 333 ; N j ; B -181 -226 333 700 ;
+C 107 ; WX 611 ; N k ; B 41 -10 600 690 ;
+C 108 ; WX 333 ; N l ; B 74 -10 338 690 ;
+C 109 ; WX 944 ; N m ; B 78 -10 942 500 ;
+C 110 ; WX 667 ; N n ; B 68 -10 667 500 ;
+C 111 ; WX 611 ; N o ; B 41 -10 588 500 ;
+C 112 ; WX 611 ; N p ; B -42 -226 588 500 ;
+C 113 ; WX 611 ; N q ; B 41 -226 571 500 ;
+C 114 ; WX 444 ; N r ; B 67 0 466 500 ;
+C 115 ; WX 556 ; N s ; B 20 -10 527 500 ;
+C 116 ; WX 389 ; N t ; B 60 -10 387 648 ;
+C 117 ; WX 667 ; N u ; B 67 -10 671 490 ;
+C 118 ; WX 556 ; N v ; B 59 -10 543 500 ;
+C 119 ; WX 833 ; N w ; B 59 -10 800 500 ;
+C 120 ; WX 556 ; N x ; B -23 -10 583 500 ;
+C 121 ; WX 611 ; N y ; B 35 -236 575 490 ;
+C 122 ; WX 556 ; N z ; B 28 -10 536 500 ;
+C 123 ; WX 333 ; N braceleft ; B 53 -165 372 681 ;
+C 124 ; WX 222 ; N bar ; B 85 -13 173 694 ;
+C 125 ; WX 333 ; N braceright ; B -39 -165 280 681 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 174 531 332 ;
+C 161 ; WX 333 ; N exclamdown ; B 8 -210 247 490 ;
+C 162 ; WX 612 ; N cent ; B 72 -31 561 690 ;
+C 163 ; WX 612 ; N sterling ; B -24 -10 637 690 ;
+C 164 ; WX 167 ; N fraction ; B -156 -10 356 684 ;
+C 165 ; WX 612 ; N yen ; B 34 0 691 674 ;
+C 166 ; WX 612 ; N florin ; B -31 -226 635 694 ;
+C 167 ; WX 556 ; N section ; B 25 -13 532 694 ;
+C 168 ; WX 612 ; N currency ; B 67 83 575 591 ;
+C 169 ; WX 222 ; N quotesingle ; B 127 417 215 694 ;
+C 170 ; WX 444 ; N quotedblleft ; B 76 417 450 694 ;
+C 171 ; WX 500 ; N guillemotleft ; B 51 77 464 451 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 58 77 290 451 ;
+C 173 ; WX 333 ; N guilsinglright ; B 54 77 286 451 ;
+C 174 ; WX 667 ; N fi ; B -240 -203 660 709 ;
+C 175 ; WX 667 ; N fl ; B -240 -203 660 709 ;
+C 177 ; WX 500 ; N endash ; B 3 220 517 308 ;
+C 178 ; WX 556 ; N dagger ; B 110 0 492 694 ;
+C 179 ; WX 556 ; N daggerdbl ; B 96 0 486 694 ;
+C 180 ; WX 306 ; N periodcentered ; B 91 223 243 375 ;
+C 182 ; WX 620 ; N paragraph ; B 128 0 657 681 ;
+C 183 ; WX 500 ; N bullet ; B 96 169 432 505 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 28 -125 180 152 ;
+C 185 ; WX 444 ; N quotedblbase ; B 28 -125 403 152 ;
+C 186 ; WX 444 ; N quotedblright ; B 95 417 469 694 ;
+C 187 ; WX 500 ; N guillemotright ; B 47 77 460 451 ;
+C 188 ; WX 1000 ; N ellipsis ; B 71 -6 889 152 ;
+C 189 ; WX 1167 ; N perthousand ; B 52 -10 1147 684 ;
+C 191 ; WX 612 ; N questiondown ; B 22 -210 517 490 ;
+C 193 ; WX 333 ; N grave ; B 98 549 310 729 ;
+C 194 ; WX 333 ; N acute ; B 153 549 392 729 ;
+C 195 ; WX 333 ; N circumflex ; B 53 549 381 723 ;
+C 196 ; WX 333 ; N tilde ; B 61 570 420 690 ;
+C 197 ; WX 333 ; N macron ; B 65 586 406 656 ;
+C 198 ; WX 333 ; N breve ; B 84 549 400 711 ;
+C 199 ; WX 333 ; N dotaccent ; B 167 558 299 690 ;
+C 200 ; WX 333 ; N dieresis ; B 67 558 412 690 ;
+C 202 ; WX 333 ; N ring ; B 121 556 334 769 ;
+C 203 ; WX 333 ; N cedilla ; B -22 -218 213 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 42 549 501 729 ;
+C 206 ; WX 333 ; N ogonek ; B -16 -218 234 0 ;
+C 207 ; WX 333 ; N caron ; B 93 549 425 723 ;
+C 208 ; WX 1000 ; N emdash ; B 3 220 1017 308 ;
+C 225 ; WX 944 ; N AE ; B -59 0 931 681 ;
+C 227 ; WX 434 ; N ordfeminine ; B 60 372 478 684 ;
+C 232 ; WX 667 ; N Lslash ; B 2 0 653 681 ;
+C 233 ; WX 778 ; N Oslash ; B 50 -112 764 790 ;
+C 234 ; WX 963 ; N OE ; B 35 -13 956 694 ;
+C 235 ; WX 397 ; N ordmasculine ; B 74 372 429 684 ;
+C 241 ; WX 889 ; N ae ; B 34 -10 880 500 ;
+C 245 ; WX 333 ; N dotlessi ; B 51 -10 338 500 ;
+C 248 ; WX 333 ; N lslash ; B 30 -10 342 690 ;
+C 249 ; WX 611 ; N oslash ; B 41 -115 588 597 ;
+C 250 ; WX 944 ; N oe ; B 41 -10 935 500 ;
+C 251 ; WX 667 ; N germandbls ; B -198 -203 644 709 ;
+C -1 ; WX 667 ; N Zcaron ; B 30 0 677 898 ;
+C -1 ; WX 556 ; N ccedilla ; B 41 -218 530 500 ;
+C -1 ; WX 611 ; N ydieresis ; B 35 -236 575 690 ;
+C -1 ; WX 667 ; N atilde ; B 41 -10 684 690 ;
+C -1 ; WX 333 ; N icircumflex ; B 51 -10 381 723 ;
+C -1 ; WX 398 ; N threesuperior ; B 35 262 404 684 ;
+C -1 ; WX 556 ; N ecircumflex ; B 41 -10 547 723 ;
+C -1 ; WX 611 ; N thorn ; B -42 -226 588 690 ;
+C -1 ; WX 556 ; N egrave ; B 41 -10 547 729 ;
+C -1 ; WX 398 ; N twosuperior ; B 41 268 403 684 ;
+C -1 ; WX 556 ; N eacute ; B 41 -10 547 729 ;
+C -1 ; WX 611 ; N otilde ; B 41 -10 588 690 ;
+C -1 ; WX 722 ; N Aacute ; B -34 0 688 904 ;
+C -1 ; WX 611 ; N ocircumflex ; B 41 -10 588 723 ;
+C -1 ; WX 611 ; N yacute ; B 35 -236 575 729 ;
+C -1 ; WX 667 ; N udieresis ; B 67 -10 671 690 ;
+C -1 ; WX 916 ; N threequarters ; B 55 -10 894 684 ;
+C -1 ; WX 667 ; N acircumflex ; B 41 -10 684 723 ;
+C -1 ; WX 778 ; N Eth ; B 2 0 751 681 ;
+C -1 ; WX 556 ; N edieresis ; B 41 -10 547 690 ;
+C -1 ; WX 667 ; N ugrave ; B 67 -10 671 729 ;
+C -1 ; WX 1000 ; N trademark ; B 94 275 1048 681 ;
+C -1 ; WX 611 ; N ograve ; B 41 -10 588 729 ;
+C -1 ; WX 556 ; N scaron ; B 20 -10 537 723 ;
+C -1 ; WX 333 ; N Idieresis ; B -16 0 422 865 ;
+C -1 ; WX 667 ; N uacute ; B 67 -10 671 729 ;
+C -1 ; WX 667 ; N agrave ; B 41 -10 684 729 ;
+C -1 ; WX 667 ; N ntilde ; B 68 -10 667 690 ;
+C -1 ; WX 667 ; N aring ; B 41 -10 684 769 ;
+C -1 ; WX 556 ; N zcaron ; B 28 -10 536 723 ;
+C -1 ; WX 333 ; N Icircumflex ; B -16 0 392 898 ;
+C -1 ; WX 722 ; N Ntilde ; B 2 0 753 865 ;
+C -1 ; WX 667 ; N ucircumflex ; B 67 -10 671 723 ;
+C -1 ; WX 722 ; N Ecircumflex ; B -6 0 709 898 ;
+C -1 ; WX 333 ; N Iacute ; B -16 0 402 904 ;
+C -1 ; WX 722 ; N Ccedilla ; B 50 -218 714 694 ;
+C -1 ; WX 778 ; N Odieresis ; B 50 -13 764 865 ;
+C -1 ; WX 667 ; N Scaron ; B 32 -13 625 898 ;
+C -1 ; WX 722 ; N Edieresis ; B -6 0 709 865 ;
+C -1 ; WX 333 ; N Igrave ; B -16 0 392 904 ;
+C -1 ; WX 667 ; N adieresis ; B 41 -10 684 690 ;
+C -1 ; WX 778 ; N Ograve ; B 50 -13 764 904 ;
+C -1 ; WX 722 ; N Egrave ; B -6 0 709 904 ;
+C -1 ; WX 611 ; N Ydieresis ; B 44 0 685 865 ;
+C -1 ; WX 800 ; N registered ; B 62 -13 768 694 ;
+C -1 ; WX 778 ; N Otilde ; B 50 -13 764 865 ;
+C -1 ; WX 916 ; N onequarter ; B 72 -10 894 684 ;
+C -1 ; WX 778 ; N Ugrave ; B 105 -13 818 904 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 105 -13 818 898 ;
+C -1 ; WX 667 ; N Thorn ; B -6 0 660 681 ;
+C -1 ; WX 600 ; N divide ; B 47 -31 553 537 ;
+C -1 ; WX 722 ; N Atilde ; B -34 0 688 865 ;
+C -1 ; WX 778 ; N Uacute ; B 105 -13 818 904 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 50 -13 764 898 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 108 553 399 ;
+C -1 ; WX 722 ; N Aring ; B -34 0 688 934 ;
+C -1 ; WX 333 ; N idieresis ; B 51 -10 412 690 ;
+C -1 ; WX 333 ; N iacute ; B 51 -10 392 729 ;
+C -1 ; WX 667 ; N aacute ; B 41 -10 684 729 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 69 22 531 484 ;
+C -1 ; WX 778 ; N Udieresis ; B 105 -13 818 865 ;
+C -1 ; WX 600 ; N minus ; B 47 209 553 297 ;
+C -1 ; WX 398 ; N onesuperior ; B 72 268 326 684 ;
+C -1 ; WX 722 ; N Eacute ; B -6 0 709 904 ;
+C -1 ; WX 722 ; N Acircumflex ; B -34 0 688 898 ;
+C -1 ; WX 800 ; N copyright ; B 62 -13 768 694 ;
+C -1 ; WX 722 ; N Agrave ; B -34 0 688 904 ;
+C -1 ; WX 611 ; N odieresis ; B 41 -10 588 690 ;
+C -1 ; WX 611 ; N oacute ; B 41 -10 588 729 ;
+C -1 ; WX 400 ; N degree ; B 111 398 397 684 ;
+C -1 ; WX 333 ; N igrave ; B 51 -10 338 729 ;
+C -1 ; WX 667 ; N mu ; B 32 -226 671 490 ;
+C -1 ; WX 778 ; N Oacute ; B 50 -13 764 904 ;
+C -1 ; WX 611 ; N eth ; B 61 -10 573 722 ;
+C -1 ; WX 722 ; N Adieresis ; B -34 0 688 865 ;
+C -1 ; WX 611 ; N Yacute ; B 44 0 685 904 ;
+C -1 ; WX 222 ; N brokenbar ; B 85 -13 173 694 ;
+C -1 ; WX 916 ; N onehalf ; B 72 -10 902 684 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 157
+
+KPX A y -18
+KPX A w -28
+KPX A v -18
+KPX A u -25
+KPX A quoteright -92
+KPX A quotedblright -92
+KPX A Y -55
+KPX A W -55
+KPX A V -55
+KPX A U -25
+KPX A T -55
+KPX A Q -25
+KPX A O -25
+KPX A G -25
+KPX A C -25
+
+KPX B period -60
+KPX B comma -60
+
+KPX D period -60
+KPX D comma -60
+
+KPX F r -18
+KPX F period -129
+KPX F o -55
+KPX F e -55
+KPX F comma -129
+KPX F a -55
+KPX F A -55
+
+KPX G period -60
+KPX G comma -60
+
+KPX J period -60
+KPX J comma -60
+
+KPX L y -18
+KPX L quoteright -111
+KPX L Y -92
+KPX L W -92
+KPX L V -92
+KPX L T -92
+
+KPX O period -60
+KPX O comma -60
+
+KPX P period -129
+KPX P comma -129
+KPX P A -55
+
+KPX Q period -60
+KPX Q comma -60
+
+KPX R Y -37
+KPX R W -37
+KPX R V -37
+KPX R T -18
+
+KPX S period -60
+KPX S comma -60
+
+KPX T y -37
+KPX T w -55
+KPX T u -55
+KPX T semicolon -92
+KPX T r -55
+KPX T period -129
+KPX T o -74
+KPX T i -18
+KPX T hyphen -92
+KPX T e -74
+KPX T comma -129
+KPX T colon -92
+KPX T a -74
+KPX T A -55
+
+KPX U period -60
+KPX U comma -60
+
+KPX V u -37
+KPX V semicolon -74
+KPX V period -129
+KPX V o -55
+KPX V i -18
+KPX V hyphen -55
+KPX V e -55
+KPX V comma -129
+KPX V colon -74
+KPX V a -55
+KPX V A -37
+
+KPX W y -37
+KPX W u -37
+KPX W semicolon -74
+KPX W period -111
+KPX W o -37
+KPX W hyphen -55
+KPX W e -37
+KPX W comma -111
+KPX W colon -74
+KPX W a -37
+KPX W A -37
+
+KPX Y u -55
+KPX Y semicolon -92
+KPX Y period -111
+KPX Y o -74
+KPX Y i -37
+KPX Y hyphen -74
+KPX Y e -74
+KPX Y comma -111
+KPX Y colon -92
+KPX Y a -74
+KPX Y A -55
+
+KPX b period -50
+KPX b comma -50
+
+KPX c period -50
+KPX c h -25
+KPX c comma -50
+
+KPX colon space -37
+
+KPX comma space -37
+KPX comma quoteright -37
+KPX comma quotedblright -37
+
+KPX d w -10
+KPX d period 10
+KPX d comma 10
+
+KPX e period -60
+KPX e comma -60
+
+KPX f quoteright 37
+KPX f quotedblright 37
+KPX f period -60
+KPX f comma -60
+
+KPX g period -60
+KPX g comma -60
+
+KPX period quoteright -37
+KPX period quotedblright -37
+
+KPX quotedblleft quoteleft 18
+KPX quotedblleft A -18
+
+KPX quotedblright space -37
+
+KPX quoteleft A -18
+
+KPX quoteright v -18
+KPX quoteright s -37
+KPX quoteright r -18
+KPX quoteright quotedblright 18
+KPX quoteright d -37
+
+KPX r s -18
+KPX r q -18
+KPX r period -92
+KPX r hyphen -37
+KPX r g -18
+KPX r e -18
+KPX r d -18
+KPX r comma -92
+KPX r c -18
+KPX r a -18
+
+KPX s w -18
+
+KPX space Y -37
+KPX space W -37
+KPX space V -37
+KPX space T -37
+KPX space A -37
+
+KPX v period -37
+KPX v o 18
+KPX v e 18
+KPX v comma -37
+KPX v a 18
+
+KPX w period -37
+KPX w o 18
+KPX w e 18
+KPX w comma -37
+KPX w a 18
+
+KPX y period -37
+KPX y comma -37
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 195 175 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 195 175 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 195 175 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 195 175 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 220 165 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 195 175 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 225 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 195 175 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 195 175 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 195 175 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 195 175 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 10 175 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 10 175 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 10 175 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 10 175 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 215 175 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 243 175 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 243 175 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 243 175 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 243 175 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 243 175 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 167 175 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 243 175 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 243 175 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 243 175 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 243 175 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 139 175 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 139 175 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 187 175 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 167 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 167 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 167 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 167 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 167 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 167 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 132 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 112 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 112 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 112 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 112 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 167 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 139 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 139 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 139 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 139 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 139 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 112 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 167 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 167 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 167 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 167 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 139 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 139 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 97 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Cr b/font/Cr
new file mode 100644
index 0000000..383939f
--- /dev/null
+++ b/font/Cr
@@ -0,0 +1,345 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1989, 1990, 1991 Adobe Systems Incorporated. All rights reserved.
+Comment Creation Date: Tue Sep 17 07:47:21 1991
+Comment UniqueID 36347
+Comment VMusage 31037 39405
+Comment Modified by Jeff Kingston 4 July 1994 (removed erroneous ligatures)
+FontName Courier
+FullName Courier
+FamilyName Courier
+Weight Medium
+ItalicAngle 0
+IsFixedPitch true
+FontBBox -28 -250 628 805
+UnderlinePosition -100
+UnderlineThickness 50
+Version 002.004
+Notice Copyright (c) 1989, 1990, 1991 Adobe Systems Incorporated. All rights reserved.
+EncodingScheme AdobeStandardEncoding
+CapHeight 562
+XHeight 426
+Ascender 629
+Descender -157
+StartCharMetrics 260
+C 32 ; WX 600 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 600 ; N exclam ; B 236 -15 364 572 ;
+C 34 ; WX 600 ; N quotedbl ; B 187 328 413 562 ;
+C 35 ; WX 600 ; N numbersign ; B 93 -32 507 639 ;
+C 36 ; WX 600 ; N dollar ; B 105 -126 496 662 ;
+C 37 ; WX 600 ; N percent ; B 81 -15 518 622 ;
+C 38 ; WX 600 ; N ampersand ; B 63 -15 538 543 ;
+C 39 ; WX 600 ; N quoteright ; B 213 328 376 562 ;
+C 40 ; WX 600 ; N parenleft ; B 269 -108 440 622 ;
+C 41 ; WX 600 ; N parenright ; B 160 -108 331 622 ;
+C 42 ; WX 600 ; N asterisk ; B 116 257 484 607 ;
+C 43 ; WX 600 ; N plus ; B 80 44 520 470 ;
+C 44 ; WX 600 ; N comma ; B 181 -112 344 122 ;
+C 45 ; WX 600 ; N hyphen ; B 103 231 497 285 ;
+C 46 ; WX 600 ; N period ; B 229 -15 371 109 ;
+C 47 ; WX 600 ; N slash ; B 125 -80 475 629 ;
+C 48 ; WX 600 ; N zero ; B 106 -15 494 622 ;
+C 49 ; WX 600 ; N one ; B 96 0 505 622 ;
+C 50 ; WX 600 ; N two ; B 70 0 471 622 ;
+C 51 ; WX 600 ; N three ; B 75 -15 466 622 ;
+C 52 ; WX 600 ; N four ; B 78 0 500 622 ;
+C 53 ; WX 600 ; N five ; B 92 -15 497 607 ;
+C 54 ; WX 600 ; N six ; B 111 -15 497 622 ;
+C 55 ; WX 600 ; N seven ; B 82 0 483 607 ;
+C 56 ; WX 600 ; N eight ; B 102 -15 498 622 ;
+C 57 ; WX 600 ; N nine ; B 96 -15 489 622 ;
+C 58 ; WX 600 ; N colon ; B 229 -15 371 385 ;
+C 59 ; WX 600 ; N semicolon ; B 181 -112 371 385 ;
+C 60 ; WX 600 ; N less ; B 41 42 519 472 ;
+C 61 ; WX 600 ; N equal ; B 80 138 520 376 ;
+C 62 ; WX 600 ; N greater ; B 66 42 544 472 ;
+C 63 ; WX 600 ; N question ; B 129 -15 492 572 ;
+C 64 ; WX 600 ; N at ; B 77 -15 533 622 ;
+C 65 ; WX 600 ; N A ; B 3 0 597 562 ;
+C 66 ; WX 600 ; N B ; B 43 0 559 562 ;
+C 67 ; WX 600 ; N C ; B 41 -18 540 580 ;
+C 68 ; WX 600 ; N D ; B 43 0 574 562 ;
+C 69 ; WX 600 ; N E ; B 53 0 550 562 ;
+C 70 ; WX 600 ; N F ; B 53 0 545 562 ;
+C 71 ; WX 600 ; N G ; B 31 -18 575 580 ;
+C 72 ; WX 600 ; N H ; B 32 0 568 562 ;
+C 73 ; WX 600 ; N I ; B 96 0 504 562 ;
+C 74 ; WX 600 ; N J ; B 34 -18 566 562 ;
+C 75 ; WX 600 ; N K ; B 38 0 582 562 ;
+C 76 ; WX 600 ; N L ; B 47 0 554 562 ;
+C 77 ; WX 600 ; N M ; B 4 0 596 562 ;
+C 78 ; WX 600 ; N N ; B 7 -13 593 562 ;
+C 79 ; WX 600 ; N O ; B 43 -18 557 580 ;
+C 80 ; WX 600 ; N P ; B 79 0 558 562 ;
+C 81 ; WX 600 ; N Q ; B 43 -138 557 580 ;
+C 82 ; WX 600 ; N R ; B 38 0 588 562 ;
+C 83 ; WX 600 ; N S ; B 72 -20 529 580 ;
+C 84 ; WX 600 ; N T ; B 38 0 563 562 ;
+C 85 ; WX 600 ; N U ; B 17 -18 583 562 ;
+C 86 ; WX 600 ; N V ; B -4 -13 604 562 ;
+C 87 ; WX 600 ; N W ; B -3 -13 603 562 ;
+C 88 ; WX 600 ; N X ; B 23 0 577 562 ;
+C 89 ; WX 600 ; N Y ; B 24 0 576 562 ;
+C 90 ; WX 600 ; N Z ; B 86 0 514 562 ;
+C 91 ; WX 600 ; N bracketleft ; B 269 -108 442 622 ;
+C 92 ; WX 600 ; N backslash ; B 118 -80 482 629 ;
+C 93 ; WX 600 ; N bracketright ; B 158 -108 331 622 ;
+C 94 ; WX 600 ; N asciicircum ; B 94 354 506 622 ;
+C 95 ; WX 600 ; N underscore ; B 0 -125 600 -75 ;
+C 96 ; WX 600 ; N quoteleft ; B 224 328 387 562 ;
+C 97 ; WX 600 ; N a ; B 53 -15 559 441 ;
+C 98 ; WX 600 ; N b ; B 14 -15 575 629 ;
+C 99 ; WX 600 ; N c ; B 66 -15 529 441 ;
+C 100 ; WX 600 ; N d ; B 45 -15 591 629 ;
+C 101 ; WX 600 ; N e ; B 66 -15 548 441 ;
+C 102 ; WX 600 ; N f ; B 114 0 531 629 ;
+C 103 ; WX 600 ; N g ; B 45 -157 566 441 ;
+C 104 ; WX 600 ; N h ; B 18 0 582 629 ;
+C 105 ; WX 600 ; N i ; B 95 0 505 657 ;
+C 106 ; WX 600 ; N j ; B 82 -157 410 657 ;
+C 107 ; WX 600 ; N k ; B 43 0 580 629 ;
+C 108 ; WX 600 ; N l ; B 95 0 505 629 ;
+C 109 ; WX 600 ; N m ; B -5 0 605 441 ;
+C 110 ; WX 600 ; N n ; B 26 0 575 441 ;
+C 111 ; WX 600 ; N o ; B 62 -15 538 441 ;
+C 112 ; WX 600 ; N p ; B 9 -157 555 441 ;
+C 113 ; WX 600 ; N q ; B 45 -157 591 441 ;
+C 114 ; WX 600 ; N r ; B 60 0 559 441 ;
+C 115 ; WX 600 ; N s ; B 80 -15 513 441 ;
+C 116 ; WX 600 ; N t ; B 87 -15 530 561 ;
+C 117 ; WX 600 ; N u ; B 21 -15 562 426 ;
+C 118 ; WX 600 ; N v ; B 10 -10 590 426 ;
+C 119 ; WX 600 ; N w ; B -4 -10 604 426 ;
+C 120 ; WX 600 ; N x ; B 20 0 580 426 ;
+C 121 ; WX 600 ; N y ; B 7 -157 592 426 ;
+C 122 ; WX 600 ; N z ; B 99 0 502 426 ;
+C 123 ; WX 600 ; N braceleft ; B 182 -108 437 622 ;
+C 124 ; WX 600 ; N bar ; B 275 -250 326 750 ;
+C 125 ; WX 600 ; N braceright ; B 163 -108 418 622 ;
+C 126 ; WX 600 ; N asciitilde ; B 63 197 540 320 ;
+C 161 ; WX 600 ; N exclamdown ; B 236 -157 364 430 ;
+C 162 ; WX 600 ; N cent ; B 96 -49 500 614 ;
+C 163 ; WX 600 ; N sterling ; B 84 -21 521 611 ;
+C 164 ; WX 600 ; N fraction ; B 92 -57 509 665 ;
+C 165 ; WX 600 ; N yen ; B 26 0 574 562 ;
+C 166 ; WX 600 ; N florin ; B 4 -143 539 622 ;
+C 167 ; WX 600 ; N section ; B 113 -78 488 580 ;
+C 168 ; WX 600 ; N currency ; B 73 58 527 506 ;
+C 169 ; WX 600 ; N quotesingle ; B 259 328 341 562 ;
+C 170 ; WX 600 ; N quotedblleft ; B 143 328 471 562 ;
+C 171 ; WX 600 ; N guillemotleft ; B 37 70 563 446 ;
+C 172 ; WX 600 ; N guilsinglleft ; B 149 70 451 446 ;
+C 173 ; WX 600 ; N guilsinglright ; B 149 70 451 446 ;
+C 174 ; WX 600 ; N fi ; B 3 0 597 629 ;
+C 175 ; WX 600 ; N fl ; B 3 0 597 629 ;
+C 177 ; WX 600 ; N endash ; B 75 231 525 285 ;
+C 178 ; WX 600 ; N dagger ; B 141 -78 459 580 ;
+C 179 ; WX 600 ; N daggerdbl ; B 141 -78 459 580 ;
+C 180 ; WX 600 ; N periodcentered ; B 222 189 378 327 ;
+C 182 ; WX 600 ; N paragraph ; B 50 -78 511 562 ;
+C 183 ; WX 600 ; N bullet ; B 172 130 428 383 ;
+C 184 ; WX 600 ; N quotesinglbase ; B 213 -134 376 100 ;
+C 185 ; WX 600 ; N quotedblbase ; B 143 -134 457 100 ;
+C 186 ; WX 600 ; N quotedblright ; B 143 328 457 562 ;
+C 187 ; WX 600 ; N guillemotright ; B 37 70 563 446 ;
+C 188 ; WX 600 ; N ellipsis ; B 37 -15 563 111 ;
+C 189 ; WX 600 ; N perthousand ; B 3 -15 600 622 ;
+C 191 ; WX 600 ; N questiondown ; B 108 -157 471 430 ;
+C 193 ; WX 600 ; N grave ; B 151 497 378 672 ;
+C 194 ; WX 600 ; N acute ; B 242 497 469 672 ;
+C 195 ; WX 600 ; N circumflex ; B 124 477 476 654 ;
+C 196 ; WX 600 ; N tilde ; B 105 489 503 606 ;
+C 197 ; WX 600 ; N macron ; B 120 525 480 565 ;
+C 198 ; WX 600 ; N breve ; B 153 501 447 609 ;
+C 199 ; WX 600 ; N dotaccent ; B 249 477 352 580 ;
+C 200 ; WX 600 ; N dieresis ; B 148 492 453 595 ;
+C 202 ; WX 600 ; N ring ; B 218 463 382 627 ;
+C 203 ; WX 600 ; N cedilla ; B 224 -151 362 10 ;
+C 205 ; WX 600 ; N hungarumlaut ; B 133 497 540 672 ;
+C 206 ; WX 600 ; N ogonek ; B 227 -151 370 0 ;
+C 207 ; WX 600 ; N caron ; B 124 492 476 669 ;
+C 208 ; WX 600 ; N emdash ; B 0 231 600 285 ;
+C 225 ; WX 600 ; N AE ; B 3 0 550 562 ;
+C 227 ; WX 600 ; N ordfeminine ; B 156 249 442 580 ;
+C 232 ; WX 600 ; N Lslash ; B 47 0 554 562 ;
+C 233 ; WX 600 ; N Oslash ; B 43 -80 557 629 ;
+C 234 ; WX 600 ; N OE ; B 7 0 567 562 ;
+C 235 ; WX 600 ; N ordmasculine ; B 157 249 443 580 ;
+C 241 ; WX 600 ; N ae ; B 19 -15 570 441 ;
+C 245 ; WX 600 ; N dotlessi ; B 95 0 505 426 ;
+C 248 ; WX 600 ; N lslash ; B 95 0 505 629 ;
+C 249 ; WX 600 ; N oslash ; B 62 -80 538 506 ;
+C 250 ; WX 600 ; N oe ; B 19 -15 559 441 ;
+C 251 ; WX 600 ; N germandbls ; B 48 -15 588 629 ;
+C -1 ; WX 600 ; N Odieresis ; B 43 -18 557 731 ;
+C -1 ; WX 600 ; N logicalnot ; B 87 108 513 369 ;
+C -1 ; WX 600 ; N minus ; B 80 232 520 283 ;
+C -1 ; WX 600 ; N merge ; B 160 -15 440 436 ;
+C -1 ; WX 600 ; N degree ; B 123 269 477 622 ;
+C -1 ; WX 600 ; N dectab ; B 18 0 582 227 ;
+C -1 ; WX 600 ; N ll ; B 18 0 567 629 ;
+C -1 ; WX 600 ; N IJ ; B 32 -18 583 562 ;
+C -1 ; WX 600 ; N Eacute ; B 53 0 550 793 ;
+C -1 ; WX 600 ; N Ocircumflex ; B 43 -18 557 775 ;
+C -1 ; WX 600 ; N ucircumflex ; B 21 -15 562 654 ;
+C -1 ; WX 600 ; N left ; B 70 68 530 348 ;
+C -1 ; WX 600 ; N threesuperior ; B 155 240 406 622 ;
+C -1 ; WX 600 ; N up ; B 160 0 440 437 ;
+C -1 ; WX 600 ; N multiply ; B 87 43 515 470 ;
+C -1 ; WX 600 ; N Scaron ; B 72 -20 529 805 ;
+C -1 ; WX 600 ; N tab ; B 19 0 581 562 ;
+C -1 ; WX 600 ; N Ucircumflex ; B 17 -18 583 775 ;
+C -1 ; WX 600 ; N divide ; B 87 48 513 467 ;
+C -1 ; WX 600 ; N Acircumflex ; B 3 0 597 775 ;
+C -1 ; WX 600 ; N eacute ; B 66 -15 548 672 ;
+C -1 ; WX 600 ; N uacute ; B 21 -15 562 672 ;
+C -1 ; WX 600 ; N Aacute ; B 3 0 597 793 ;
+C -1 ; WX 600 ; N copyright ; B 0 -18 600 580 ;
+C -1 ; WX 600 ; N twosuperior ; B 177 249 424 622 ;
+C -1 ; WX 600 ; N Ecircumflex ; B 53 0 550 775 ;
+C -1 ; WX 600 ; N ntilde ; B 26 0 575 606 ;
+C -1 ; WX 600 ; N down ; B 160 -15 440 426 ;
+C -1 ; WX 600 ; N center ; B 40 14 560 580 ;
+C -1 ; WX 600 ; N onesuperior ; B 172 249 428 622 ;
+C -1 ; WX 600 ; N ij ; B 37 -157 490 657 ;
+C -1 ; WX 600 ; N edieresis ; B 66 -15 548 595 ;
+C -1 ; WX 600 ; N graybox ; B 76 0 525 599 ;
+C -1 ; WX 600 ; N odieresis ; B 62 -15 538 595 ;
+C -1 ; WX 600 ; N Ograve ; B 43 -18 557 793 ;
+C -1 ; WX 600 ; N threequarters ; B 8 -56 593 666 ;
+C -1 ; WX 600 ; N plusminus ; B 87 44 513 558 ;
+C -1 ; WX 600 ; N prescription ; B 27 -15 577 562 ;
+C -1 ; WX 600 ; N eth ; B 62 -15 538 629 ;
+C -1 ; WX 600 ; N largebullet ; B 261 220 339 297 ;
+C -1 ; WX 600 ; N egrave ; B 66 -15 548 672 ;
+C -1 ; WX 600 ; N ccedilla ; B 66 -151 529 441 ;
+C -1 ; WX 600 ; N notegraphic ; B 136 -15 464 572 ;
+C -1 ; WX 600 ; N Udieresis ; B 17 -18 583 731 ;
+C -1 ; WX 600 ; N Gcaron ; B 31 -18 575 805 ;
+C -1 ; WX 600 ; N arrowdown ; B 116 -15 484 608 ;
+C -1 ; WX 600 ; N format ; B 5 -157 56 607 ;
+C -1 ; WX 600 ; N Otilde ; B 43 -18 557 732 ;
+C -1 ; WX 600 ; N Idieresis ; B 96 0 504 731 ;
+C -1 ; WX 600 ; N adieresis ; B 53 -15 559 595 ;
+C -1 ; WX 600 ; N ecircumflex ; B 66 -15 548 654 ;
+C -1 ; WX 600 ; N Eth ; B 30 0 574 562 ;
+C -1 ; WX 600 ; N onequarter ; B 0 -57 600 665 ;
+C -1 ; WX 600 ; N LL ; B 8 0 592 562 ;
+C -1 ; WX 600 ; N agrave ; B 53 -15 559 672 ;
+C -1 ; WX 600 ; N Zcaron ; B 86 0 514 805 ;
+C -1 ; WX 600 ; N Scedilla ; B 72 -151 529 580 ;
+C -1 ; WX 600 ; N Idot ; B 96 0 504 716 ;
+C -1 ; WX 600 ; N Iacute ; B 96 0 504 793 ;
+C -1 ; WX 600 ; N indent ; B 70 68 530 348 ;
+C -1 ; WX 600 ; N Ugrave ; B 17 -18 583 793 ;
+C -1 ; WX 600 ; N scaron ; B 80 -15 513 669 ;
+C -1 ; WX 600 ; N overscore ; B 0 579 600 629 ;
+C -1 ; WX 600 ; N Aring ; B 3 0 597 753 ;
+C -1 ; WX 600 ; N Ccedilla ; B 41 -151 540 580 ;
+C -1 ; WX 600 ; N Igrave ; B 96 0 504 793 ;
+C -1 ; WX 600 ; N brokenbar ; B 275 -175 326 675 ;
+C -1 ; WX 600 ; N Oacute ; B 43 -18 557 793 ;
+C -1 ; WX 600 ; N otilde ; B 62 -15 538 606 ;
+C -1 ; WX 600 ; N Yacute ; B 24 0 576 793 ;
+C -1 ; WX 600 ; N lira ; B 73 -21 521 611 ;
+C -1 ; WX 600 ; N Icircumflex ; B 96 0 504 775 ;
+C -1 ; WX 600 ; N Atilde ; B 3 0 597 732 ;
+C -1 ; WX 600 ; N Uacute ; B 17 -18 583 793 ;
+C -1 ; WX 600 ; N Ydieresis ; B 24 0 576 731 ;
+C -1 ; WX 600 ; N ydieresis ; B 7 -157 592 595 ;
+C -1 ; WX 600 ; N idieresis ; B 95 0 505 595 ;
+C -1 ; WX 600 ; N Adieresis ; B 3 0 597 731 ;
+C -1 ; WX 600 ; N mu ; B 21 -157 562 426 ;
+C -1 ; WX 600 ; N trademark ; B -23 263 623 562 ;
+C -1 ; WX 600 ; N oacute ; B 62 -15 538 672 ;
+C -1 ; WX 600 ; N acircumflex ; B 53 -15 559 654 ;
+C -1 ; WX 600 ; N Agrave ; B 3 0 597 793 ;
+C -1 ; WX 600 ; N return ; B 19 0 581 562 ;
+C -1 ; WX 600 ; N atilde ; B 53 -15 559 606 ;
+C -1 ; WX 600 ; N square ; B 19 0 581 562 ;
+C -1 ; WX 600 ; N registered ; B 0 -18 600 580 ;
+C -1 ; WX 600 ; N stop ; B 19 0 581 562 ;
+C -1 ; WX 600 ; N udieresis ; B 21 -15 562 595 ;
+C -1 ; WX 600 ; N arrowup ; B 116 0 484 623 ;
+C -1 ; WX 600 ; N igrave ; B 95 0 505 672 ;
+C -1 ; WX 600 ; N Edieresis ; B 53 0 550 731 ;
+C -1 ; WX 600 ; N zcaron ; B 99 0 502 669 ;
+C -1 ; WX 600 ; N arrowboth ; B -28 115 628 483 ;
+C -1 ; WX 600 ; N gcaron ; B 45 -157 566 669 ;
+C -1 ; WX 600 ; N arrowleft ; B -24 115 624 483 ;
+C -1 ; WX 600 ; N aacute ; B 53 -15 559 672 ;
+C -1 ; WX 600 ; N ocircumflex ; B 62 -15 538 654 ;
+C -1 ; WX 600 ; N scedilla ; B 80 -151 513 441 ;
+C -1 ; WX 600 ; N ograve ; B 62 -15 538 672 ;
+C -1 ; WX 600 ; N onehalf ; B 0 -57 611 665 ;
+C -1 ; WX 600 ; N ugrave ; B 21 -15 562 672 ;
+C -1 ; WX 600 ; N Ntilde ; B 7 -13 593 732 ;
+C -1 ; WX 600 ; N iacute ; B 95 0 505 672 ;
+C -1 ; WX 600 ; N arrowright ; B -24 115 624 483 ;
+C -1 ; WX 600 ; N Thorn ; B 79 0 538 562 ;
+C -1 ; WX 600 ; N Egrave ; B 53 0 550 793 ;
+C -1 ; WX 600 ; N thorn ; B -6 -157 555 629 ;
+C -1 ; WX 600 ; N aring ; B 53 -15 559 627 ;
+C -1 ; WX 600 ; N yacute ; B 7 -157 592 672 ;
+C -1 ; WX 600 ; N icircumflex ; B 94 0 505 654 ;
+EndCharMetrics
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 20 121 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex -30 121 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis -30 136 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave -30 121 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring -15 126 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 0 126 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 30 121 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 0 121 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 0 136 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 0 121 ;
+CC Gcaron 2 ; PCC G 0 0 ; PCC caron 0 136 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 0 121 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 0 121 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 0 136 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 0 121 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 0 126 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 0 121 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 0 121 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 0 136 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 0 121 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 0 126 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 30 136 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 30 121 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 0 121 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 0 136 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave -30 121 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 30 121 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 0 136 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 0 136 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 0 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 0 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 0 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 0 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 0 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 0 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 0 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 0 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 0 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 0 0 ;
+CC gcaron 2 ; PCC g 0 0 ; PCC caron -30 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -30 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -30 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -30 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 0 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 0 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 0 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 0 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 0 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 0 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 0 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute -10 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex -10 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 0 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave -30 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute -20 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis -10 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 10 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Cr-Bd b/font/Cr-Bd
new file mode 100644
index 0000000..13cd303
--- /dev/null
+++ b/font/Cr-Bd
@@ -0,0 +1,345 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1989, 1990, 1991, Adobe Systems Incorporated. All rights reserved.
+Comment Creation Date: Tue Sep 17 14:02:41 1991
+Comment UniqueID 36384
+Comment VMusage 31992 40360
+Comment Modified by Jeff Kingston 4 July 1994 (removed erroneous ligatures)
+FontName Courier-Bold
+FullName Courier Bold
+FamilyName Courier
+Weight Bold
+ItalicAngle 0
+IsFixedPitch true
+FontBBox -113 -250 749 801
+UnderlinePosition -100
+UnderlineThickness 50
+Version 002.004
+Notice Copyright (c) 1989, 1990, 1991, Adobe Systems Incorporated. All rights reserved.
+EncodingScheme AdobeStandardEncoding
+CapHeight 562
+XHeight 439
+Ascender 626
+Descender -142
+StartCharMetrics 260
+C 32 ; WX 600 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 600 ; N exclam ; B 202 -15 398 572 ;
+C 34 ; WX 600 ; N quotedbl ; B 135 277 465 562 ;
+C 35 ; WX 600 ; N numbersign ; B 56 -45 544 651 ;
+C 36 ; WX 600 ; N dollar ; B 82 -126 519 666 ;
+C 37 ; WX 600 ; N percent ; B 5 -15 595 616 ;
+C 38 ; WX 600 ; N ampersand ; B 36 -15 546 543 ;
+C 39 ; WX 600 ; N quoteright ; B 171 277 423 562 ;
+C 40 ; WX 600 ; N parenleft ; B 219 -102 461 616 ;
+C 41 ; WX 600 ; N parenright ; B 139 -102 381 616 ;
+C 42 ; WX 600 ; N asterisk ; B 91 219 509 601 ;
+C 43 ; WX 600 ; N plus ; B 71 39 529 478 ;
+C 44 ; WX 600 ; N comma ; B 123 -111 393 174 ;
+C 45 ; WX 600 ; N hyphen ; B 100 203 500 313 ;
+C 46 ; WX 600 ; N period ; B 192 -15 408 171 ;
+C 47 ; WX 600 ; N slash ; B 98 -77 502 626 ;
+C 48 ; WX 600 ; N zero ; B 87 -15 513 616 ;
+C 49 ; WX 600 ; N one ; B 81 0 539 616 ;
+C 50 ; WX 600 ; N two ; B 61 0 499 616 ;
+C 51 ; WX 600 ; N three ; B 63 -15 501 616 ;
+C 52 ; WX 600 ; N four ; B 53 0 507 616 ;
+C 53 ; WX 600 ; N five ; B 70 -15 521 601 ;
+C 54 ; WX 600 ; N six ; B 90 -15 521 616 ;
+C 55 ; WX 600 ; N seven ; B 55 0 494 601 ;
+C 56 ; WX 600 ; N eight ; B 83 -15 517 616 ;
+C 57 ; WX 600 ; N nine ; B 79 -15 510 616 ;
+C 58 ; WX 600 ; N colon ; B 191 -15 407 425 ;
+C 59 ; WX 600 ; N semicolon ; B 123 -111 408 425 ;
+C 60 ; WX 600 ; N less ; B 66 15 523 501 ;
+C 61 ; WX 600 ; N equal ; B 71 118 529 398 ;
+C 62 ; WX 600 ; N greater ; B 77 15 534 501 ;
+C 63 ; WX 600 ; N question ; B 98 -14 501 580 ;
+C 64 ; WX 600 ; N at ; B 16 -15 584 616 ;
+C 65 ; WX 600 ; N A ; B -9 0 609 562 ;
+C 66 ; WX 600 ; N B ; B 30 0 573 562 ;
+C 67 ; WX 600 ; N C ; B 22 -18 560 580 ;
+C 68 ; WX 600 ; N D ; B 30 0 594 562 ;
+C 69 ; WX 600 ; N E ; B 25 0 560 562 ;
+C 70 ; WX 600 ; N F ; B 39 0 570 562 ;
+C 71 ; WX 600 ; N G ; B 22 -18 594 580 ;
+C 72 ; WX 600 ; N H ; B 20 0 580 562 ;
+C 73 ; WX 600 ; N I ; B 77 0 523 562 ;
+C 74 ; WX 600 ; N J ; B 37 -18 601 562 ;
+C 75 ; WX 600 ; N K ; B 21 0 599 562 ;
+C 76 ; WX 600 ; N L ; B 39 0 578 562 ;
+C 77 ; WX 600 ; N M ; B -2 0 602 562 ;
+C 78 ; WX 600 ; N N ; B 8 -12 610 562 ;
+C 79 ; WX 600 ; N O ; B 22 -18 578 580 ;
+C 80 ; WX 600 ; N P ; B 48 0 559 562 ;
+C 81 ; WX 600 ; N Q ; B 32 -138 578 580 ;
+C 82 ; WX 600 ; N R ; B 24 0 599 562 ;
+C 83 ; WX 600 ; N S ; B 47 -22 553 582 ;
+C 84 ; WX 600 ; N T ; B 21 0 579 562 ;
+C 85 ; WX 600 ; N U ; B 4 -18 596 562 ;
+C 86 ; WX 600 ; N V ; B -13 0 613 562 ;
+C 87 ; WX 600 ; N W ; B -18 0 618 562 ;
+C 88 ; WX 600 ; N X ; B 12 0 588 562 ;
+C 89 ; WX 600 ; N Y ; B 12 0 589 562 ;
+C 90 ; WX 600 ; N Z ; B 62 0 539 562 ;
+C 91 ; WX 600 ; N bracketleft ; B 245 -102 475 616 ;
+C 92 ; WX 600 ; N backslash ; B 99 -77 503 626 ;
+C 93 ; WX 600 ; N bracketright ; B 125 -102 355 616 ;
+C 94 ; WX 600 ; N asciicircum ; B 108 250 492 616 ;
+C 95 ; WX 600 ; N underscore ; B 0 -125 600 -75 ;
+C 96 ; WX 600 ; N quoteleft ; B 178 277 428 562 ;
+C 97 ; WX 600 ; N a ; B 35 -15 570 454 ;
+C 98 ; WX 600 ; N b ; B 0 -15 584 626 ;
+C 99 ; WX 600 ; N c ; B 40 -15 545 459 ;
+C 100 ; WX 600 ; N d ; B 20 -15 591 626 ;
+C 101 ; WX 600 ; N e ; B 40 -15 563 454 ;
+C 102 ; WX 600 ; N f ; B 83 0 547 626 ;
+C 103 ; WX 600 ; N g ; B 30 -146 580 454 ;
+C 104 ; WX 600 ; N h ; B 5 0 592 626 ;
+C 105 ; WX 600 ; N i ; B 77 0 523 658 ;
+C 106 ; WX 600 ; N j ; B 63 -146 440 658 ;
+C 107 ; WX 600 ; N k ; B 20 0 585 626 ;
+C 108 ; WX 600 ; N l ; B 77 0 523 626 ;
+C 109 ; WX 600 ; N m ; B -22 0 626 454 ;
+C 110 ; WX 600 ; N n ; B 18 0 592 454 ;
+C 111 ; WX 600 ; N o ; B 30 -15 570 454 ;
+C 112 ; WX 600 ; N p ; B -1 -142 570 454 ;
+C 113 ; WX 600 ; N q ; B 20 -142 591 454 ;
+C 114 ; WX 600 ; N r ; B 47 0 580 454 ;
+C 115 ; WX 600 ; N s ; B 68 -17 535 459 ;
+C 116 ; WX 600 ; N t ; B 47 -15 532 562 ;
+C 117 ; WX 600 ; N u ; B -1 -15 569 439 ;
+C 118 ; WX 600 ; N v ; B -1 0 601 439 ;
+C 119 ; WX 600 ; N w ; B -18 0 618 439 ;
+C 120 ; WX 600 ; N x ; B 6 0 594 439 ;
+C 121 ; WX 600 ; N y ; B -4 -142 601 439 ;
+C 122 ; WX 600 ; N z ; B 81 0 520 439 ;
+C 123 ; WX 600 ; N braceleft ; B 160 -102 464 616 ;
+C 124 ; WX 600 ; N bar ; B 255 -250 345 750 ;
+C 125 ; WX 600 ; N braceright ; B 136 -102 440 616 ;
+C 126 ; WX 600 ; N asciitilde ; B 71 153 530 356 ;
+C 161 ; WX 600 ; N exclamdown ; B 202 -146 398 449 ;
+C 162 ; WX 600 ; N cent ; B 66 -49 518 614 ;
+C 163 ; WX 600 ; N sterling ; B 72 -28 558 611 ;
+C 164 ; WX 600 ; N fraction ; B 25 -60 576 661 ;
+C 165 ; WX 600 ; N yen ; B 10 0 590 562 ;
+C 166 ; WX 600 ; N florin ; B -30 -131 572 616 ;
+C 167 ; WX 600 ; N section ; B 83 -70 517 580 ;
+C 168 ; WX 600 ; N currency ; B 54 49 546 517 ;
+C 169 ; WX 600 ; N quotesingle ; B 227 277 373 562 ;
+C 170 ; WX 600 ; N quotedblleft ; B 71 277 535 562 ;
+C 171 ; WX 600 ; N guillemotleft ; B 8 70 553 446 ;
+C 172 ; WX 600 ; N guilsinglleft ; B 141 70 459 446 ;
+C 173 ; WX 600 ; N guilsinglright ; B 141 70 459 446 ;
+C 174 ; WX 600 ; N fi ; B 12 0 593 626 ;
+C 175 ; WX 600 ; N fl ; B 12 0 593 626 ;
+C 177 ; WX 600 ; N endash ; B 65 203 535 313 ;
+C 178 ; WX 600 ; N dagger ; B 106 -70 494 580 ;
+C 179 ; WX 600 ; N daggerdbl ; B 106 -70 494 580 ;
+C 180 ; WX 600 ; N periodcentered ; B 196 165 404 351 ;
+C 182 ; WX 600 ; N paragraph ; B 6 -70 576 580 ;
+C 183 ; WX 600 ; N bullet ; B 140 132 460 430 ;
+C 184 ; WX 600 ; N quotesinglbase ; B 175 -142 427 143 ;
+C 185 ; WX 600 ; N quotedblbase ; B 65 -142 529 143 ;
+C 186 ; WX 600 ; N quotedblright ; B 61 277 525 562 ;
+C 187 ; WX 600 ; N guillemotright ; B 47 70 592 446 ;
+C 188 ; WX 600 ; N ellipsis ; B 26 -15 574 116 ;
+C 189 ; WX 600 ; N perthousand ; B -113 -15 713 616 ;
+C 191 ; WX 600 ; N questiondown ; B 99 -146 502 449 ;
+C 193 ; WX 600 ; N grave ; B 132 508 395 661 ;
+C 194 ; WX 600 ; N acute ; B 205 508 468 661 ;
+C 195 ; WX 600 ; N circumflex ; B 103 483 497 657 ;
+C 196 ; WX 600 ; N tilde ; B 89 493 512 636 ;
+C 197 ; WX 600 ; N macron ; B 88 505 512 585 ;
+C 198 ; WX 600 ; N breve ; B 83 468 517 631 ;
+C 199 ; WX 600 ; N dotaccent ; B 230 485 370 625 ;
+C 200 ; WX 600 ; N dieresis ; B 128 485 472 625 ;
+C 202 ; WX 600 ; N ring ; B 198 481 402 678 ;
+C 203 ; WX 600 ; N cedilla ; B 205 -206 387 0 ;
+C 205 ; WX 600 ; N hungarumlaut ; B 68 488 588 661 ;
+C 206 ; WX 600 ; N ogonek ; B 169 -199 367 0 ;
+C 207 ; WX 600 ; N caron ; B 103 493 497 667 ;
+C 208 ; WX 600 ; N emdash ; B -10 203 610 313 ;
+C 225 ; WX 600 ; N AE ; B -29 0 602 562 ;
+C 227 ; WX 600 ; N ordfeminine ; B 147 196 453 580 ;
+C 232 ; WX 600 ; N Lslash ; B 39 0 578 562 ;
+C 233 ; WX 600 ; N Oslash ; B 22 -22 578 584 ;
+C 234 ; WX 600 ; N OE ; B -25 0 595 562 ;
+C 235 ; WX 600 ; N ordmasculine ; B 147 196 453 580 ;
+C 241 ; WX 600 ; N ae ; B -4 -15 601 454 ;
+C 245 ; WX 600 ; N dotlessi ; B 77 0 523 439 ;
+C 248 ; WX 600 ; N lslash ; B 77 0 523 626 ;
+C 249 ; WX 600 ; N oslash ; B 30 -24 570 463 ;
+C 250 ; WX 600 ; N oe ; B -18 -15 611 454 ;
+C 251 ; WX 600 ; N germandbls ; B 22 -15 596 626 ;
+C -1 ; WX 600 ; N Odieresis ; B 22 -18 578 748 ;
+C -1 ; WX 600 ; N logicalnot ; B 71 103 529 413 ;
+C -1 ; WX 600 ; N minus ; B 71 203 529 313 ;
+C -1 ; WX 600 ; N merge ; B 137 -15 464 487 ;
+C -1 ; WX 600 ; N degree ; B 86 243 474 616 ;
+C -1 ; WX 600 ; N dectab ; B 8 0 592 320 ;
+C -1 ; WX 600 ; N ll ; B -12 0 600 626 ;
+C -1 ; WX 600 ; N IJ ; B -8 -18 622 562 ;
+C -1 ; WX 600 ; N Eacute ; B 25 0 560 784 ;
+C -1 ; WX 600 ; N Ocircumflex ; B 22 -18 578 780 ;
+C -1 ; WX 600 ; N ucircumflex ; B -1 -15 569 657 ;
+C -1 ; WX 600 ; N left ; B 65 44 535 371 ;
+C -1 ; WX 600 ; N threesuperior ; B 138 222 433 616 ;
+C -1 ; WX 600 ; N up ; B 136 0 463 447 ;
+C -1 ; WX 600 ; N multiply ; B 81 39 520 478 ;
+C -1 ; WX 600 ; N Scaron ; B 47 -22 553 790 ;
+C -1 ; WX 600 ; N tab ; B 19 0 581 562 ;
+C -1 ; WX 600 ; N Ucircumflex ; B 4 -18 596 780 ;
+C -1 ; WX 600 ; N divide ; B 71 16 529 500 ;
+C -1 ; WX 600 ; N Acircumflex ; B -9 0 609 780 ;
+C -1 ; WX 600 ; N eacute ; B 40 -15 563 661 ;
+C -1 ; WX 600 ; N uacute ; B -1 -15 569 661 ;
+C -1 ; WX 600 ; N Aacute ; B -9 0 609 784 ;
+C -1 ; WX 600 ; N copyright ; B 0 -18 600 580 ;
+C -1 ; WX 600 ; N twosuperior ; B 143 230 436 616 ;
+C -1 ; WX 600 ; N Ecircumflex ; B 25 0 560 780 ;
+C -1 ; WX 600 ; N ntilde ; B 18 0 592 636 ;
+C -1 ; WX 600 ; N down ; B 137 -15 464 439 ;
+C -1 ; WX 600 ; N center ; B 40 14 560 580 ;
+C -1 ; WX 600 ; N onesuperior ; B 153 230 447 616 ;
+C -1 ; WX 600 ; N ij ; B 6 -146 574 658 ;
+C -1 ; WX 600 ; N edieresis ; B 40 -15 563 625 ;
+C -1 ; WX 600 ; N graybox ; B 76 0 525 599 ;
+C -1 ; WX 600 ; N odieresis ; B 30 -15 570 625 ;
+C -1 ; WX 600 ; N Ograve ; B 22 -18 578 784 ;
+C -1 ; WX 600 ; N threequarters ; B -47 -60 648 661 ;
+C -1 ; WX 600 ; N plusminus ; B 71 24 529 515 ;
+C -1 ; WX 600 ; N prescription ; B 24 -15 599 562 ;
+C -1 ; WX 600 ; N eth ; B 58 -27 543 626 ;
+C -1 ; WX 600 ; N largebullet ; B 248 229 352 333 ;
+C -1 ; WX 600 ; N egrave ; B 40 -15 563 661 ;
+C -1 ; WX 600 ; N ccedilla ; B 40 -206 545 459 ;
+C -1 ; WX 600 ; N notegraphic ; B 77 -15 523 572 ;
+C -1 ; WX 600 ; N Udieresis ; B 4 -18 596 748 ;
+C -1 ; WX 600 ; N Gcaron ; B 22 -18 594 790 ;
+C -1 ; WX 600 ; N arrowdown ; B 144 -15 456 608 ;
+C -1 ; WX 600 ; N format ; B 5 -146 115 601 ;
+C -1 ; WX 600 ; N Otilde ; B 22 -18 578 759 ;
+C -1 ; WX 600 ; N Idieresis ; B 77 0 523 748 ;
+C -1 ; WX 600 ; N adieresis ; B 35 -15 570 625 ;
+C -1 ; WX 600 ; N ecircumflex ; B 40 -15 563 657 ;
+C -1 ; WX 600 ; N Eth ; B 30 0 594 562 ;
+C -1 ; WX 600 ; N onequarter ; B -56 -60 656 661 ;
+C -1 ; WX 600 ; N LL ; B -45 0 645 562 ;
+C -1 ; WX 600 ; N agrave ; B 35 -15 570 661 ;
+C -1 ; WX 600 ; N Zcaron ; B 62 0 539 790 ;
+C -1 ; WX 600 ; N Scedilla ; B 47 -206 553 582 ;
+C -1 ; WX 600 ; N Idot ; B 77 0 523 748 ;
+C -1 ; WX 600 ; N Iacute ; B 77 0 523 784 ;
+C -1 ; WX 600 ; N indent ; B 65 45 535 372 ;
+C -1 ; WX 600 ; N Ugrave ; B 4 -18 596 784 ;
+C -1 ; WX 600 ; N scaron ; B 68 -17 535 667 ;
+C -1 ; WX 600 ; N overscore ; B 0 579 600 629 ;
+C -1 ; WX 600 ; N Aring ; B -9 0 609 801 ;
+C -1 ; WX 600 ; N Ccedilla ; B 22 -206 560 580 ;
+C -1 ; WX 600 ; N Igrave ; B 77 0 523 784 ;
+C -1 ; WX 600 ; N brokenbar ; B 255 -175 345 675 ;
+C -1 ; WX 600 ; N Oacute ; B 22 -18 578 784 ;
+C -1 ; WX 600 ; N otilde ; B 30 -15 570 636 ;
+C -1 ; WX 600 ; N Yacute ; B 12 0 589 784 ;
+C -1 ; WX 600 ; N lira ; B 72 -28 558 611 ;
+C -1 ; WX 600 ; N Icircumflex ; B 77 0 523 780 ;
+C -1 ; WX 600 ; N Atilde ; B -9 0 609 759 ;
+C -1 ; WX 600 ; N Uacute ; B 4 -18 596 784 ;
+C -1 ; WX 600 ; N Ydieresis ; B 12 0 589 748 ;
+C -1 ; WX 600 ; N ydieresis ; B -4 -142 601 625 ;
+C -1 ; WX 600 ; N idieresis ; B 77 0 523 625 ;
+C -1 ; WX 600 ; N Adieresis ; B -9 0 609 748 ;
+C -1 ; WX 600 ; N mu ; B -1 -142 569 439 ;
+C -1 ; WX 600 ; N trademark ; B -9 230 749 562 ;
+C -1 ; WX 600 ; N oacute ; B 30 -15 570 661 ;
+C -1 ; WX 600 ; N acircumflex ; B 35 -15 570 657 ;
+C -1 ; WX 600 ; N Agrave ; B -9 0 609 784 ;
+C -1 ; WX 600 ; N return ; B 19 0 581 562 ;
+C -1 ; WX 600 ; N atilde ; B 35 -15 570 636 ;
+C -1 ; WX 600 ; N square ; B 19 0 581 562 ;
+C -1 ; WX 600 ; N registered ; B 0 -18 600 580 ;
+C -1 ; WX 600 ; N stop ; B 19 0 581 562 ;
+C -1 ; WX 600 ; N udieresis ; B -1 -15 569 625 ;
+C -1 ; WX 600 ; N arrowup ; B 144 3 456 626 ;
+C -1 ; WX 600 ; N igrave ; B 77 0 523 661 ;
+C -1 ; WX 600 ; N Edieresis ; B 25 0 560 748 ;
+C -1 ; WX 600 ; N zcaron ; B 81 0 520 667 ;
+C -1 ; WX 600 ; N arrowboth ; B -24 143 624 455 ;
+C -1 ; WX 600 ; N gcaron ; B 30 -146 580 667 ;
+C -1 ; WX 600 ; N arrowleft ; B -24 143 634 455 ;
+C -1 ; WX 600 ; N aacute ; B 35 -15 570 661 ;
+C -1 ; WX 600 ; N ocircumflex ; B 30 -15 570 657 ;
+C -1 ; WX 600 ; N scedilla ; B 68 -206 535 459 ;
+C -1 ; WX 600 ; N ograve ; B 30 -15 570 661 ;
+C -1 ; WX 600 ; N onehalf ; B -47 -60 648 661 ;
+C -1 ; WX 600 ; N ugrave ; B -1 -15 569 661 ;
+C -1 ; WX 600 ; N Ntilde ; B 8 -12 610 759 ;
+C -1 ; WX 600 ; N iacute ; B 77 0 523 661 ;
+C -1 ; WX 600 ; N arrowright ; B -34 143 624 455 ;
+C -1 ; WX 600 ; N Thorn ; B 48 0 557 562 ;
+C -1 ; WX 600 ; N Egrave ; B 25 0 560 784 ;
+C -1 ; WX 600 ; N thorn ; B -14 -142 570 626 ;
+C -1 ; WX 600 ; N aring ; B 35 -15 570 678 ;
+C -1 ; WX 600 ; N yacute ; B -4 -142 601 661 ;
+C -1 ; WX 600 ; N icircumflex ; B 63 0 523 657 ;
+EndCharMetrics
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 30 123 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex -30 123 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis -20 123 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave -50 123 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring -10 123 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde -30 123 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 30 123 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 0 123 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 0 123 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 0 123 ;
+CC Gcaron 2 ; PCC G 0 0 ; PCC caron 10 123 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 0 123 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 0 123 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 0 123 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 0 123 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 0 123 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 0 123 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 0 123 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 0 123 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 0 123 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 0 123 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 0 123 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 30 123 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 0 123 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 0 123 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave -30 123 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 30 123 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 0 123 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 0 123 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 0 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex -20 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis -10 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave -30 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 0 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 0 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 0 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 0 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 0 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 0 0 ;
+CC gcaron 2 ; PCC g 0 0 ; PCC caron -40 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -40 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -40 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 0 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 0 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 0 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 0 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 0 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 0 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 0 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 0 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex -20 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis -20 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave -30 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 30 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 10 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 0 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Cr-BdO b/font/Cr-BdO
new file mode 100644
index 0000000..36fdd79
--- /dev/null
+++ b/font/Cr-BdO
@@ -0,0 +1,345 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1989, 1990, 1991, Adobe Systems Incorporated. All rights reserved.
+Comment Creation Date: Tue Sep 17 14:13:24 1991
+Comment UniqueID 36389
+Comment VMusage 10055 54684
+Comment Modified by Jeff Kingston 4 July 1994 (removed erroneous ligatures)
+FontName Courier-BoldOblique
+FullName Courier Bold Oblique
+FamilyName Courier
+Weight Bold
+ItalicAngle -12
+IsFixedPitch true
+FontBBox -56 -250 868 801
+UnderlinePosition -100
+UnderlineThickness 50
+Version 002.004
+Notice Copyright (c) 1989, 1990, 1991, Adobe Systems Incorporated. All rights reserved.
+EncodingScheme AdobeStandardEncoding
+CapHeight 562
+XHeight 439
+Ascender 626
+Descender -142
+StartCharMetrics 260
+C 32 ; WX 600 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 600 ; N exclam ; B 216 -15 495 572 ;
+C 34 ; WX 600 ; N quotedbl ; B 212 277 584 562 ;
+C 35 ; WX 600 ; N numbersign ; B 88 -45 640 651 ;
+C 36 ; WX 600 ; N dollar ; B 87 -126 629 666 ;
+C 37 ; WX 600 ; N percent ; B 102 -15 624 616 ;
+C 38 ; WX 600 ; N ampersand ; B 62 -15 594 543 ;
+C 39 ; WX 600 ; N quoteright ; B 230 277 542 562 ;
+C 40 ; WX 600 ; N parenleft ; B 266 -102 592 616 ;
+C 41 ; WX 600 ; N parenright ; B 117 -102 444 616 ;
+C 42 ; WX 600 ; N asterisk ; B 179 219 597 601 ;
+C 43 ; WX 600 ; N plus ; B 114 39 596 478 ;
+C 44 ; WX 600 ; N comma ; B 99 -111 430 174 ;
+C 45 ; WX 600 ; N hyphen ; B 143 203 567 313 ;
+C 46 ; WX 600 ; N period ; B 207 -15 426 171 ;
+C 47 ; WX 600 ; N slash ; B 91 -77 626 626 ;
+C 48 ; WX 600 ; N zero ; B 136 -15 592 616 ;
+C 49 ; WX 600 ; N one ; B 93 0 561 616 ;
+C 50 ; WX 600 ; N two ; B 61 0 593 616 ;
+C 51 ; WX 600 ; N three ; B 72 -15 571 616 ;
+C 52 ; WX 600 ; N four ; B 82 0 558 616 ;
+C 53 ; WX 600 ; N five ; B 77 -15 621 601 ;
+C 54 ; WX 600 ; N six ; B 136 -15 652 616 ;
+C 55 ; WX 600 ; N seven ; B 147 0 622 601 ;
+C 56 ; WX 600 ; N eight ; B 115 -15 604 616 ;
+C 57 ; WX 600 ; N nine ; B 76 -15 592 616 ;
+C 58 ; WX 600 ; N colon ; B 206 -15 479 425 ;
+C 59 ; WX 600 ; N semicolon ; B 99 -111 480 425 ;
+C 60 ; WX 600 ; N less ; B 121 15 612 501 ;
+C 61 ; WX 600 ; N equal ; B 96 118 614 398 ;
+C 62 ; WX 600 ; N greater ; B 97 15 589 501 ;
+C 63 ; WX 600 ; N question ; B 183 -14 591 580 ;
+C 64 ; WX 600 ; N at ; B 66 -15 641 616 ;
+C 65 ; WX 600 ; N A ; B -9 0 631 562 ;
+C 66 ; WX 600 ; N B ; B 30 0 629 562 ;
+C 67 ; WX 600 ; N C ; B 75 -18 674 580 ;
+C 68 ; WX 600 ; N D ; B 30 0 664 562 ;
+C 69 ; WX 600 ; N E ; B 25 0 669 562 ;
+C 70 ; WX 600 ; N F ; B 39 0 683 562 ;
+C 71 ; WX 600 ; N G ; B 75 -18 674 580 ;
+C 72 ; WX 600 ; N H ; B 20 0 699 562 ;
+C 73 ; WX 600 ; N I ; B 77 0 642 562 ;
+C 74 ; WX 600 ; N J ; B 59 -18 720 562 ;
+C 75 ; WX 600 ; N K ; B 21 0 691 562 ;
+C 76 ; WX 600 ; N L ; B 39 0 635 562 ;
+C 77 ; WX 600 ; N M ; B -2 0 721 562 ;
+C 78 ; WX 600 ; N N ; B 8 -12 729 562 ;
+C 79 ; WX 600 ; N O ; B 74 -18 645 580 ;
+C 80 ; WX 600 ; N P ; B 48 0 642 562 ;
+C 81 ; WX 600 ; N Q ; B 84 -138 636 580 ;
+C 82 ; WX 600 ; N R ; B 24 0 617 562 ;
+C 83 ; WX 600 ; N S ; B 54 -22 672 582 ;
+C 84 ; WX 600 ; N T ; B 86 0 678 562 ;
+C 85 ; WX 600 ; N U ; B 101 -18 715 562 ;
+C 86 ; WX 600 ; N V ; B 84 0 732 562 ;
+C 87 ; WX 600 ; N W ; B 84 0 737 562 ;
+C 88 ; WX 600 ; N X ; B 12 0 689 562 ;
+C 89 ; WX 600 ; N Y ; B 109 0 708 562 ;
+C 90 ; WX 600 ; N Z ; B 62 0 636 562 ;
+C 91 ; WX 600 ; N bracketleft ; B 223 -102 606 616 ;
+C 92 ; WX 600 ; N backslash ; B 223 -77 496 626 ;
+C 93 ; WX 600 ; N bracketright ; B 103 -102 486 616 ;
+C 94 ; WX 600 ; N asciicircum ; B 171 250 555 616 ;
+C 95 ; WX 600 ; N underscore ; B -27 -125 584 -75 ;
+C 96 ; WX 600 ; N quoteleft ; B 297 277 487 562 ;
+C 97 ; WX 600 ; N a ; B 62 -15 592 454 ;
+C 98 ; WX 600 ; N b ; B 13 -15 636 626 ;
+C 99 ; WX 600 ; N c ; B 81 -15 631 459 ;
+C 100 ; WX 600 ; N d ; B 61 -15 644 626 ;
+C 101 ; WX 600 ; N e ; B 81 -15 604 454 ;
+C 102 ; WX 600 ; N f ; B 83 0 677 626 ;
+C 103 ; WX 600 ; N g ; B 41 -146 673 454 ;
+C 104 ; WX 600 ; N h ; B 18 0 614 626 ;
+C 105 ; WX 600 ; N i ; B 77 0 545 658 ;
+C 106 ; WX 600 ; N j ; B 37 -146 580 658 ;
+C 107 ; WX 600 ; N k ; B 33 0 642 626 ;
+C 108 ; WX 600 ; N l ; B 77 0 545 626 ;
+C 109 ; WX 600 ; N m ; B -22 0 648 454 ;
+C 110 ; WX 600 ; N n ; B 18 0 614 454 ;
+C 111 ; WX 600 ; N o ; B 71 -15 622 454 ;
+C 112 ; WX 600 ; N p ; B -31 -142 622 454 ;
+C 113 ; WX 600 ; N q ; B 61 -142 684 454 ;
+C 114 ; WX 600 ; N r ; B 47 0 654 454 ;
+C 115 ; WX 600 ; N s ; B 67 -17 607 459 ;
+C 116 ; WX 600 ; N t ; B 118 -15 566 562 ;
+C 117 ; WX 600 ; N u ; B 70 -15 591 439 ;
+C 118 ; WX 600 ; N v ; B 70 0 694 439 ;
+C 119 ; WX 600 ; N w ; B 53 0 711 439 ;
+C 120 ; WX 600 ; N x ; B 6 0 670 439 ;
+C 121 ; WX 600 ; N y ; B -20 -142 694 439 ;
+C 122 ; WX 600 ; N z ; B 81 0 613 439 ;
+C 123 ; WX 600 ; N braceleft ; B 204 -102 595 616 ;
+C 124 ; WX 600 ; N bar ; B 202 -250 504 750 ;
+C 125 ; WX 600 ; N braceright ; B 114 -102 506 616 ;
+C 126 ; WX 600 ; N asciitilde ; B 120 153 589 356 ;
+C 161 ; WX 600 ; N exclamdown ; B 197 -146 477 449 ;
+C 162 ; WX 600 ; N cent ; B 121 -49 604 614 ;
+C 163 ; WX 600 ; N sterling ; B 107 -28 650 611 ;
+C 164 ; WX 600 ; N fraction ; B 22 -60 707 661 ;
+C 165 ; WX 600 ; N yen ; B 98 0 709 562 ;
+C 166 ; WX 600 ; N florin ; B -56 -131 701 616 ;
+C 167 ; WX 600 ; N section ; B 74 -70 619 580 ;
+C 168 ; WX 600 ; N currency ; B 77 49 643 517 ;
+C 169 ; WX 600 ; N quotesingle ; B 304 277 492 562 ;
+C 170 ; WX 600 ; N quotedblleft ; B 190 277 594 562 ;
+C 171 ; WX 600 ; N guillemotleft ; B 63 70 638 446 ;
+C 172 ; WX 600 ; N guilsinglleft ; B 196 70 544 446 ;
+C 173 ; WX 600 ; N guilsinglright ; B 166 70 514 446 ;
+C 174 ; WX 600 ; N fi ; B 12 0 643 626 ;
+C 175 ; WX 600 ; N fl ; B 12 0 643 626 ;
+C 177 ; WX 600 ; N endash ; B 108 203 602 313 ;
+C 178 ; WX 600 ; N dagger ; B 176 -70 586 580 ;
+C 179 ; WX 600 ; N daggerdbl ; B 122 -70 586 580 ;
+C 180 ; WX 600 ; N periodcentered ; B 249 165 461 351 ;
+C 182 ; WX 600 ; N paragraph ; B 61 -70 699 580 ;
+C 183 ; WX 600 ; N bullet ; B 197 132 523 430 ;
+C 184 ; WX 600 ; N quotesinglbase ; B 145 -142 457 143 ;
+C 185 ; WX 600 ; N quotedblbase ; B 35 -142 559 143 ;
+C 186 ; WX 600 ; N quotedblright ; B 120 277 644 562 ;
+C 187 ; WX 600 ; N guillemotright ; B 72 70 647 446 ;
+C 188 ; WX 600 ; N ellipsis ; B 35 -15 586 116 ;
+C 189 ; WX 600 ; N perthousand ; B -44 -15 742 616 ;
+C 191 ; WX 600 ; N questiondown ; B 101 -146 509 449 ;
+C 193 ; WX 600 ; N grave ; B 272 508 503 661 ;
+C 194 ; WX 600 ; N acute ; B 313 508 608 661 ;
+C 195 ; WX 600 ; N circumflex ; B 212 483 606 657 ;
+C 196 ; WX 600 ; N tilde ; B 200 493 642 636 ;
+C 197 ; WX 600 ; N macron ; B 195 505 636 585 ;
+C 198 ; WX 600 ; N breve ; B 217 468 651 631 ;
+C 199 ; WX 600 ; N dotaccent ; B 346 485 490 625 ;
+C 200 ; WX 600 ; N dieresis ; B 244 485 592 625 ;
+C 202 ; WX 600 ; N ring ; B 319 481 528 678 ;
+C 203 ; WX 600 ; N cedilla ; B 169 -206 367 0 ;
+C 205 ; WX 600 ; N hungarumlaut ; B 172 488 728 661 ;
+C 206 ; WX 600 ; N ogonek ; B 144 -199 350 0 ;
+C 207 ; WX 600 ; N caron ; B 238 493 632 667 ;
+C 208 ; WX 600 ; N emdash ; B 33 203 677 313 ;
+C 225 ; WX 600 ; N AE ; B -29 0 707 562 ;
+C 227 ; WX 600 ; N ordfeminine ; B 189 196 526 580 ;
+C 232 ; WX 600 ; N Lslash ; B 39 0 635 562 ;
+C 233 ; WX 600 ; N Oslash ; B 48 -22 672 584 ;
+C 234 ; WX 600 ; N OE ; B 26 0 700 562 ;
+C 235 ; WX 600 ; N ordmasculine ; B 189 196 542 580 ;
+C 241 ; WX 600 ; N ae ; B 21 -15 651 454 ;
+C 245 ; WX 600 ; N dotlessi ; B 77 0 545 439 ;
+C 248 ; WX 600 ; N lslash ; B 77 0 578 626 ;
+C 249 ; WX 600 ; N oslash ; B 55 -24 637 463 ;
+C 250 ; WX 600 ; N oe ; B 19 -15 661 454 ;
+C 251 ; WX 600 ; N germandbls ; B 22 -15 628 626 ;
+C -1 ; WX 600 ; N Odieresis ; B 74 -18 645 748 ;
+C -1 ; WX 600 ; N logicalnot ; B 135 103 617 413 ;
+C -1 ; WX 600 ; N minus ; B 114 203 596 313 ;
+C -1 ; WX 600 ; N merge ; B 168 -15 533 487 ;
+C -1 ; WX 600 ; N degree ; B 173 243 569 616 ;
+C -1 ; WX 600 ; N dectab ; B 8 0 615 320 ;
+C -1 ; WX 600 ; N ll ; B 1 0 653 626 ;
+C -1 ; WX 600 ; N IJ ; B -8 -18 741 562 ;
+C -1 ; WX 600 ; N Eacute ; B 25 0 669 784 ;
+C -1 ; WX 600 ; N Ocircumflex ; B 74 -18 645 780 ;
+C -1 ; WX 600 ; N ucircumflex ; B 70 -15 591 657 ;
+C -1 ; WX 600 ; N left ; B 109 44 589 371 ;
+C -1 ; WX 600 ; N threesuperior ; B 193 222 525 616 ;
+C -1 ; WX 600 ; N up ; B 196 0 523 447 ;
+C -1 ; WX 600 ; N multiply ; B 105 39 606 478 ;
+C -1 ; WX 600 ; N Scaron ; B 54 -22 672 790 ;
+C -1 ; WX 600 ; N tab ; B 19 0 641 562 ;
+C -1 ; WX 600 ; N Ucircumflex ; B 101 -18 715 780 ;
+C -1 ; WX 600 ; N divide ; B 114 16 596 500 ;
+C -1 ; WX 600 ; N Acircumflex ; B -9 0 631 780 ;
+C -1 ; WX 600 ; N eacute ; B 81 -15 608 661 ;
+C -1 ; WX 600 ; N uacute ; B 70 -15 608 661 ;
+C -1 ; WX 600 ; N Aacute ; B -9 0 665 784 ;
+C -1 ; WX 600 ; N copyright ; B 53 -18 667 580 ;
+C -1 ; WX 600 ; N twosuperior ; B 192 230 541 616 ;
+C -1 ; WX 600 ; N Ecircumflex ; B 25 0 669 780 ;
+C -1 ; WX 600 ; N ntilde ; B 18 0 642 636 ;
+C -1 ; WX 600 ; N down ; B 168 -15 496 439 ;
+C -1 ; WX 600 ; N center ; B 103 14 623 580 ;
+C -1 ; WX 600 ; N onesuperior ; B 213 230 514 616 ;
+C -1 ; WX 600 ; N ij ; B 6 -146 714 658 ;
+C -1 ; WX 600 ; N edieresis ; B 81 -15 604 625 ;
+C -1 ; WX 600 ; N graybox ; B 76 0 652 599 ;
+C -1 ; WX 600 ; N odieresis ; B 71 -15 622 625 ;
+C -1 ; WX 600 ; N Ograve ; B 74 -18 645 784 ;
+C -1 ; WX 600 ; N threequarters ; B 8 -60 698 661 ;
+C -1 ; WX 600 ; N plusminus ; B 76 24 614 515 ;
+C -1 ; WX 600 ; N prescription ; B 24 -15 632 562 ;
+C -1 ; WX 600 ; N eth ; B 93 -27 661 626 ;
+C -1 ; WX 600 ; N largebullet ; B 307 229 413 333 ;
+C -1 ; WX 600 ; N egrave ; B 81 -15 604 661 ;
+C -1 ; WX 600 ; N ccedilla ; B 81 -206 631 459 ;
+C -1 ; WX 600 ; N notegraphic ; B 91 -15 619 572 ;
+C -1 ; WX 600 ; N Udieresis ; B 101 -18 715 748 ;
+C -1 ; WX 600 ; N Gcaron ; B 75 -18 674 790 ;
+C -1 ; WX 600 ; N arrowdown ; B 174 -15 486 608 ;
+C -1 ; WX 600 ; N format ; B -26 -146 243 601 ;
+C -1 ; WX 600 ; N Otilde ; B 74 -18 668 759 ;
+C -1 ; WX 600 ; N Idieresis ; B 77 0 642 748 ;
+C -1 ; WX 600 ; N adieresis ; B 62 -15 592 625 ;
+C -1 ; WX 600 ; N ecircumflex ; B 81 -15 606 657 ;
+C -1 ; WX 600 ; N Eth ; B 30 0 664 562 ;
+C -1 ; WX 600 ; N onequarter ; B 14 -60 706 661 ;
+C -1 ; WX 600 ; N LL ; B -45 0 694 562 ;
+C -1 ; WX 600 ; N agrave ; B 62 -15 592 661 ;
+C -1 ; WX 600 ; N Zcaron ; B 62 0 659 790 ;
+C -1 ; WX 600 ; N Scedilla ; B 54 -206 672 582 ;
+C -1 ; WX 600 ; N Idot ; B 77 0 642 748 ;
+C -1 ; WX 600 ; N Iacute ; B 77 0 642 784 ;
+C -1 ; WX 600 ; N indent ; B 99 45 579 372 ;
+C -1 ; WX 600 ; N Ugrave ; B 101 -18 715 784 ;
+C -1 ; WX 600 ; N scaron ; B 67 -17 632 667 ;
+C -1 ; WX 600 ; N overscore ; B 123 579 734 629 ;
+C -1 ; WX 600 ; N Aring ; B -9 0 631 801 ;
+C -1 ; WX 600 ; N Ccedilla ; B 74 -206 674 580 ;
+C -1 ; WX 600 ; N Igrave ; B 77 0 642 784 ;
+C -1 ; WX 600 ; N brokenbar ; B 218 -175 488 675 ;
+C -1 ; WX 600 ; N Oacute ; B 74 -18 645 784 ;
+C -1 ; WX 600 ; N otilde ; B 71 -15 642 636 ;
+C -1 ; WX 600 ; N Yacute ; B 109 0 708 784 ;
+C -1 ; WX 600 ; N lira ; B 107 -28 650 611 ;
+C -1 ; WX 600 ; N Icircumflex ; B 77 0 642 780 ;
+C -1 ; WX 600 ; N Atilde ; B -9 0 638 759 ;
+C -1 ; WX 600 ; N Uacute ; B 101 -18 715 784 ;
+C -1 ; WX 600 ; N Ydieresis ; B 109 0 708 748 ;
+C -1 ; WX 600 ; N ydieresis ; B -20 -142 694 625 ;
+C -1 ; WX 600 ; N idieresis ; B 77 0 552 625 ;
+C -1 ; WX 600 ; N Adieresis ; B -9 0 631 748 ;
+C -1 ; WX 600 ; N mu ; B 50 -142 591 439 ;
+C -1 ; WX 600 ; N trademark ; B 86 230 868 562 ;
+C -1 ; WX 600 ; N oacute ; B 71 -15 622 661 ;
+C -1 ; WX 600 ; N acircumflex ; B 62 -15 592 657 ;
+C -1 ; WX 600 ; N Agrave ; B -9 0 631 784 ;
+C -1 ; WX 600 ; N return ; B 79 0 700 562 ;
+C -1 ; WX 600 ; N atilde ; B 62 -15 642 636 ;
+C -1 ; WX 600 ; N square ; B 19 0 700 562 ;
+C -1 ; WX 600 ; N registered ; B 53 -18 667 580 ;
+C -1 ; WX 600 ; N stop ; B 19 0 700 562 ;
+C -1 ; WX 600 ; N udieresis ; B 70 -15 591 625 ;
+C -1 ; WX 600 ; N arrowup ; B 244 3 556 626 ;
+C -1 ; WX 600 ; N igrave ; B 77 0 545 661 ;
+C -1 ; WX 600 ; N Edieresis ; B 25 0 669 748 ;
+C -1 ; WX 600 ; N zcaron ; B 81 0 632 667 ;
+C -1 ; WX 600 ; N arrowboth ; B 40 143 688 455 ;
+C -1 ; WX 600 ; N gcaron ; B 41 -146 673 667 ;
+C -1 ; WX 600 ; N arrowleft ; B 40 143 708 455 ;
+C -1 ; WX 600 ; N aacute ; B 62 -15 608 661 ;
+C -1 ; WX 600 ; N ocircumflex ; B 71 -15 622 657 ;
+C -1 ; WX 600 ; N scedilla ; B 67 -206 607 459 ;
+C -1 ; WX 600 ; N ograve ; B 71 -15 622 661 ;
+C -1 ; WX 600 ; N onehalf ; B 23 -60 715 661 ;
+C -1 ; WX 600 ; N ugrave ; B 70 -15 591 661 ;
+C -1 ; WX 600 ; N Ntilde ; B 8 -12 729 759 ;
+C -1 ; WX 600 ; N iacute ; B 77 0 608 661 ;
+C -1 ; WX 600 ; N arrowright ; B 20 143 688 455 ;
+C -1 ; WX 600 ; N Thorn ; B 48 0 619 562 ;
+C -1 ; WX 600 ; N Egrave ; B 25 0 669 784 ;
+C -1 ; WX 600 ; N thorn ; B -31 -142 622 626 ;
+C -1 ; WX 600 ; N aring ; B 62 -15 592 678 ;
+C -1 ; WX 600 ; N yacute ; B -20 -142 694 661 ;
+C -1 ; WX 600 ; N icircumflex ; B 77 0 566 657 ;
+EndCharMetrics
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 56 123 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex -4 123 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 6 123 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave -24 123 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 16 123 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde -4 123 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 56 123 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 26 123 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 26 123 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 26 123 ;
+CC Gcaron 2 ; PCC G 0 0 ; PCC caron 36 123 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 26 123 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 26 123 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 26 123 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 26 123 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 26 123 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 26 123 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 26 123 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 26 123 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 26 123 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 26 123 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 26 123 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 56 123 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 26 123 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 26 123 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave -4 123 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 56 123 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 26 123 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 26 123 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 0 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex -20 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis -10 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave -30 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 0 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 0 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 0 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 0 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 0 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 0 0 ;
+CC gcaron 2 ; PCC g 0 0 ; PCC caron -40 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -40 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -40 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 0 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 0 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 0 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 0 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 0 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 0 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 0 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 0 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex -20 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis -20 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave -30 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 30 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 10 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 0 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Cr-O b/font/Cr-O
new file mode 100644
index 0000000..5f80292
--- /dev/null
+++ b/font/Cr-O
@@ -0,0 +1,345 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1989, 1990, 1991 Adobe Systems Incorporated. All rights reserved.
+Comment Creation Date: Tue Sep 17 09:42:19 1991
+Comment UniqueID 36350
+Comment VMusage 9174 52297
+Comment Modified by Jeff Kingston 4 July 1994 (removed erroneous ligatures)
+FontName Courier-Oblique
+FullName Courier Oblique
+FamilyName Courier
+Weight Medium
+ItalicAngle -12
+IsFixedPitch true
+FontBBox -28 -250 742 805
+UnderlinePosition -100
+UnderlineThickness 50
+Version 002.004
+Notice Copyright (c) 1989, 1990, 1991 Adobe Systems Incorporated. All rights reserved.
+EncodingScheme AdobeStandardEncoding
+CapHeight 562
+XHeight 426
+Ascender 629
+Descender -157
+StartCharMetrics 260
+C 32 ; WX 600 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 600 ; N exclam ; B 243 -15 464 572 ;
+C 34 ; WX 600 ; N quotedbl ; B 273 328 532 562 ;
+C 35 ; WX 600 ; N numbersign ; B 133 -32 596 639 ;
+C 36 ; WX 600 ; N dollar ; B 108 -126 596 662 ;
+C 37 ; WX 600 ; N percent ; B 134 -15 599 622 ;
+C 38 ; WX 600 ; N ampersand ; B 87 -15 580 543 ;
+C 39 ; WX 600 ; N quoteright ; B 283 328 495 562 ;
+C 40 ; WX 600 ; N parenleft ; B 313 -108 572 622 ;
+C 41 ; WX 600 ; N parenright ; B 137 -108 396 622 ;
+C 42 ; WX 600 ; N asterisk ; B 212 257 580 607 ;
+C 43 ; WX 600 ; N plus ; B 129 44 580 470 ;
+C 44 ; WX 600 ; N comma ; B 157 -112 370 122 ;
+C 45 ; WX 600 ; N hyphen ; B 152 231 558 285 ;
+C 46 ; WX 600 ; N period ; B 238 -15 382 109 ;
+C 47 ; WX 600 ; N slash ; B 112 -80 604 629 ;
+C 48 ; WX 600 ; N zero ; B 154 -15 575 622 ;
+C 49 ; WX 600 ; N one ; B 98 0 515 622 ;
+C 50 ; WX 600 ; N two ; B 70 0 568 622 ;
+C 51 ; WX 600 ; N three ; B 82 -15 538 622 ;
+C 52 ; WX 600 ; N four ; B 108 0 541 622 ;
+C 53 ; WX 600 ; N five ; B 99 -15 589 607 ;
+C 54 ; WX 600 ; N six ; B 155 -15 629 622 ;
+C 55 ; WX 600 ; N seven ; B 182 0 612 607 ;
+C 56 ; WX 600 ; N eight ; B 132 -15 588 622 ;
+C 57 ; WX 600 ; N nine ; B 93 -15 574 622 ;
+C 58 ; WX 600 ; N colon ; B 238 -15 441 385 ;
+C 59 ; WX 600 ; N semicolon ; B 157 -112 441 385 ;
+C 60 ; WX 600 ; N less ; B 96 42 610 472 ;
+C 61 ; WX 600 ; N equal ; B 109 138 600 376 ;
+C 62 ; WX 600 ; N greater ; B 85 42 599 472 ;
+C 63 ; WX 600 ; N question ; B 222 -15 583 572 ;
+C 64 ; WX 600 ; N at ; B 127 -15 582 622 ;
+C 65 ; WX 600 ; N A ; B 3 0 607 562 ;
+C 66 ; WX 600 ; N B ; B 43 0 616 562 ;
+C 67 ; WX 600 ; N C ; B 93 -18 655 580 ;
+C 68 ; WX 600 ; N D ; B 43 0 645 562 ;
+C 69 ; WX 600 ; N E ; B 53 0 660 562 ;
+C 70 ; WX 600 ; N F ; B 53 0 660 562 ;
+C 71 ; WX 600 ; N G ; B 83 -18 645 580 ;
+C 72 ; WX 600 ; N H ; B 32 0 687 562 ;
+C 73 ; WX 600 ; N I ; B 96 0 623 562 ;
+C 74 ; WX 600 ; N J ; B 52 -18 685 562 ;
+C 75 ; WX 600 ; N K ; B 38 0 671 562 ;
+C 76 ; WX 600 ; N L ; B 47 0 607 562 ;
+C 77 ; WX 600 ; N M ; B 4 0 715 562 ;
+C 78 ; WX 600 ; N N ; B 7 -13 712 562 ;
+C 79 ; WX 600 ; N O ; B 94 -18 625 580 ;
+C 80 ; WX 600 ; N P ; B 79 0 644 562 ;
+C 81 ; WX 600 ; N Q ; B 95 -138 625 580 ;
+C 82 ; WX 600 ; N R ; B 38 0 598 562 ;
+C 83 ; WX 600 ; N S ; B 76 -20 650 580 ;
+C 84 ; WX 600 ; N T ; B 108 0 665 562 ;
+C 85 ; WX 600 ; N U ; B 125 -18 702 562 ;
+C 86 ; WX 600 ; N V ; B 105 -13 723 562 ;
+C 87 ; WX 600 ; N W ; B 106 -13 722 562 ;
+C 88 ; WX 600 ; N X ; B 23 0 675 562 ;
+C 89 ; WX 600 ; N Y ; B 133 0 695 562 ;
+C 90 ; WX 600 ; N Z ; B 86 0 610 562 ;
+C 91 ; WX 600 ; N bracketleft ; B 246 -108 574 622 ;
+C 92 ; WX 600 ; N backslash ; B 249 -80 468 629 ;
+C 93 ; WX 600 ; N bracketright ; B 135 -108 463 622 ;
+C 94 ; WX 600 ; N asciicircum ; B 175 354 587 622 ;
+C 95 ; WX 600 ; N underscore ; B -27 -125 584 -75 ;
+C 96 ; WX 600 ; N quoteleft ; B 343 328 457 562 ;
+C 97 ; WX 600 ; N a ; B 76 -15 569 441 ;
+C 98 ; WX 600 ; N b ; B 29 -15 625 629 ;
+C 99 ; WX 600 ; N c ; B 106 -15 608 441 ;
+C 100 ; WX 600 ; N d ; B 85 -15 640 629 ;
+C 101 ; WX 600 ; N e ; B 106 -15 598 441 ;
+C 102 ; WX 600 ; N f ; B 114 0 662 629 ;
+C 103 ; WX 600 ; N g ; B 61 -157 657 441 ;
+C 104 ; WX 600 ; N h ; B 33 0 592 629 ;
+C 105 ; WX 600 ; N i ; B 95 0 515 657 ;
+C 106 ; WX 600 ; N j ; B 52 -157 550 657 ;
+C 107 ; WX 600 ; N k ; B 58 0 633 629 ;
+C 108 ; WX 600 ; N l ; B 95 0 515 629 ;
+C 109 ; WX 600 ; N m ; B -5 0 615 441 ;
+C 110 ; WX 600 ; N n ; B 26 0 585 441 ;
+C 111 ; WX 600 ; N o ; B 102 -15 588 441 ;
+C 112 ; WX 600 ; N p ; B -24 -157 605 441 ;
+C 113 ; WX 600 ; N q ; B 85 -157 682 441 ;
+C 114 ; WX 600 ; N r ; B 60 0 636 441 ;
+C 115 ; WX 600 ; N s ; B 78 -15 584 441 ;
+C 116 ; WX 600 ; N t ; B 167 -15 561 561 ;
+C 117 ; WX 600 ; N u ; B 101 -15 572 426 ;
+C 118 ; WX 600 ; N v ; B 90 -10 681 426 ;
+C 119 ; WX 600 ; N w ; B 76 -10 695 426 ;
+C 120 ; WX 600 ; N x ; B 20 0 655 426 ;
+C 121 ; WX 600 ; N y ; B -4 -157 683 426 ;
+C 122 ; WX 600 ; N z ; B 99 0 593 426 ;
+C 123 ; WX 600 ; N braceleft ; B 233 -108 569 622 ;
+C 124 ; WX 600 ; N bar ; B 222 -250 485 750 ;
+C 125 ; WX 600 ; N braceright ; B 140 -108 477 622 ;
+C 126 ; WX 600 ; N asciitilde ; B 116 197 600 320 ;
+C 161 ; WX 600 ; N exclamdown ; B 225 -157 445 430 ;
+C 162 ; WX 600 ; N cent ; B 151 -49 588 614 ;
+C 163 ; WX 600 ; N sterling ; B 124 -21 621 611 ;
+C 164 ; WX 600 ; N fraction ; B 84 -57 646 665 ;
+C 165 ; WX 600 ; N yen ; B 120 0 693 562 ;
+C 166 ; WX 600 ; N florin ; B -26 -143 671 622 ;
+C 167 ; WX 600 ; N section ; B 104 -78 590 580 ;
+C 168 ; WX 600 ; N currency ; B 94 58 628 506 ;
+C 169 ; WX 600 ; N quotesingle ; B 345 328 460 562 ;
+C 170 ; WX 600 ; N quotedblleft ; B 262 328 541 562 ;
+C 171 ; WX 600 ; N guillemotleft ; B 92 70 652 446 ;
+C 172 ; WX 600 ; N guilsinglleft ; B 204 70 540 446 ;
+C 173 ; WX 600 ; N guilsinglright ; B 170 70 506 446 ;
+C 174 ; WX 600 ; N fi ; B 3 0 619 629 ;
+C 175 ; WX 600 ; N fl ; B 3 0 619 629 ;
+C 177 ; WX 600 ; N endash ; B 124 231 586 285 ;
+C 178 ; WX 600 ; N dagger ; B 217 -78 546 580 ;
+C 179 ; WX 600 ; N daggerdbl ; B 163 -78 546 580 ;
+C 180 ; WX 600 ; N periodcentered ; B 275 189 434 327 ;
+C 182 ; WX 600 ; N paragraph ; B 100 -78 630 562 ;
+C 183 ; WX 600 ; N bullet ; B 224 130 485 383 ;
+C 184 ; WX 600 ; N quotesinglbase ; B 185 -134 397 100 ;
+C 185 ; WX 600 ; N quotedblbase ; B 115 -134 478 100 ;
+C 186 ; WX 600 ; N quotedblright ; B 213 328 576 562 ;
+C 187 ; WX 600 ; N guillemotright ; B 58 70 618 446 ;
+C 188 ; WX 600 ; N ellipsis ; B 46 -15 575 111 ;
+C 189 ; WX 600 ; N perthousand ; B 59 -15 627 622 ;
+C 191 ; WX 600 ; N questiondown ; B 105 -157 466 430 ;
+C 193 ; WX 600 ; N grave ; B 294 497 484 672 ;
+C 194 ; WX 600 ; N acute ; B 348 497 612 672 ;
+C 195 ; WX 600 ; N circumflex ; B 229 477 581 654 ;
+C 196 ; WX 600 ; N tilde ; B 212 489 629 606 ;
+C 197 ; WX 600 ; N macron ; B 232 525 600 565 ;
+C 198 ; WX 600 ; N breve ; B 279 501 576 609 ;
+C 199 ; WX 600 ; N dotaccent ; B 360 477 466 580 ;
+C 200 ; WX 600 ; N dieresis ; B 262 492 570 595 ;
+C 202 ; WX 600 ; N ring ; B 332 463 500 627 ;
+C 203 ; WX 600 ; N cedilla ; B 197 -151 344 10 ;
+C 205 ; WX 600 ; N hungarumlaut ; B 239 497 683 672 ;
+C 206 ; WX 600 ; N ogonek ; B 207 -151 348 0 ;
+C 207 ; WX 600 ; N caron ; B 262 492 614 669 ;
+C 208 ; WX 600 ; N emdash ; B 49 231 661 285 ;
+C 225 ; WX 600 ; N AE ; B 3 0 655 562 ;
+C 227 ; WX 600 ; N ordfeminine ; B 209 249 512 580 ;
+C 232 ; WX 600 ; N Lslash ; B 47 0 607 562 ;
+C 233 ; WX 600 ; N Oslash ; B 94 -80 625 629 ;
+C 234 ; WX 600 ; N OE ; B 59 0 672 562 ;
+C 235 ; WX 600 ; N ordmasculine ; B 210 249 535 580 ;
+C 241 ; WX 600 ; N ae ; B 41 -15 626 441 ;
+C 245 ; WX 600 ; N dotlessi ; B 95 0 515 426 ;
+C 248 ; WX 600 ; N lslash ; B 95 0 583 629 ;
+C 249 ; WX 600 ; N oslash ; B 102 -80 588 506 ;
+C 250 ; WX 600 ; N oe ; B 54 -15 615 441 ;
+C 251 ; WX 600 ; N germandbls ; B 48 -15 617 629 ;
+C -1 ; WX 600 ; N Odieresis ; B 94 -18 625 731 ;
+C -1 ; WX 600 ; N logicalnot ; B 155 108 591 369 ;
+C -1 ; WX 600 ; N minus ; B 129 232 580 283 ;
+C -1 ; WX 600 ; N merge ; B 187 -15 503 436 ;
+C -1 ; WX 600 ; N degree ; B 214 269 576 622 ;
+C -1 ; WX 600 ; N dectab ; B 18 0 593 227 ;
+C -1 ; WX 600 ; N ll ; B 33 0 616 629 ;
+C -1 ; WX 600 ; N IJ ; B 32 -18 702 562 ;
+C -1 ; WX 600 ; N Eacute ; B 53 0 668 793 ;
+C -1 ; WX 600 ; N Ocircumflex ; B 94 -18 625 775 ;
+C -1 ; WX 600 ; N ucircumflex ; B 101 -15 572 654 ;
+C -1 ; WX 600 ; N left ; B 114 68 580 348 ;
+C -1 ; WX 600 ; N threesuperior ; B 213 240 501 622 ;
+C -1 ; WX 600 ; N up ; B 223 0 503 437 ;
+C -1 ; WX 600 ; N multiply ; B 103 43 607 470 ;
+C -1 ; WX 600 ; N Scaron ; B 76 -20 673 805 ;
+C -1 ; WX 600 ; N tab ; B 19 0 641 562 ;
+C -1 ; WX 600 ; N Ucircumflex ; B 125 -18 702 775 ;
+C -1 ; WX 600 ; N divide ; B 136 48 573 467 ;
+C -1 ; WX 600 ; N Acircumflex ; B 3 0 607 775 ;
+C -1 ; WX 600 ; N eacute ; B 106 -15 612 672 ;
+C -1 ; WX 600 ; N uacute ; B 101 -15 602 672 ;
+C -1 ; WX 600 ; N Aacute ; B 3 0 658 793 ;
+C -1 ; WX 600 ; N copyright ; B 53 -18 667 580 ;
+C -1 ; WX 600 ; N twosuperior ; B 230 249 535 622 ;
+C -1 ; WX 600 ; N Ecircumflex ; B 53 0 660 775 ;
+C -1 ; WX 600 ; N ntilde ; B 26 0 629 606 ;
+C -1 ; WX 600 ; N down ; B 187 -15 467 426 ;
+C -1 ; WX 600 ; N center ; B 103 14 623 580 ;
+C -1 ; WX 600 ; N onesuperior ; B 231 249 491 622 ;
+C -1 ; WX 600 ; N ij ; B 37 -157 630 657 ;
+C -1 ; WX 600 ; N edieresis ; B 106 -15 598 595 ;
+C -1 ; WX 600 ; N graybox ; B 76 0 652 599 ;
+C -1 ; WX 600 ; N odieresis ; B 102 -15 588 595 ;
+C -1 ; WX 600 ; N Ograve ; B 94 -18 625 793 ;
+C -1 ; WX 600 ; N threequarters ; B 73 -56 659 666 ;
+C -1 ; WX 600 ; N plusminus ; B 96 44 594 558 ;
+C -1 ; WX 600 ; N prescription ; B 27 -15 617 562 ;
+C -1 ; WX 600 ; N eth ; B 102 -15 639 629 ;
+C -1 ; WX 600 ; N largebullet ; B 315 220 395 297 ;
+C -1 ; WX 600 ; N egrave ; B 106 -15 598 672 ;
+C -1 ; WX 600 ; N ccedilla ; B 106 -151 614 441 ;
+C -1 ; WX 600 ; N notegraphic ; B 143 -15 564 572 ;
+C -1 ; WX 600 ; N Udieresis ; B 125 -18 702 731 ;
+C -1 ; WX 600 ; N Gcaron ; B 83 -18 645 805 ;
+C -1 ; WX 600 ; N arrowdown ; B 152 -15 520 608 ;
+C -1 ; WX 600 ; N format ; B -28 -157 185 607 ;
+C -1 ; WX 600 ; N Otilde ; B 94 -18 656 732 ;
+C -1 ; WX 600 ; N Idieresis ; B 96 0 623 731 ;
+C -1 ; WX 600 ; N adieresis ; B 76 -15 570 595 ;
+C -1 ; WX 600 ; N ecircumflex ; B 106 -15 598 654 ;
+C -1 ; WX 600 ; N Eth ; B 43 0 645 562 ;
+C -1 ; WX 600 ; N onequarter ; B 65 -57 674 665 ;
+C -1 ; WX 600 ; N LL ; B 8 0 647 562 ;
+C -1 ; WX 600 ; N agrave ; B 76 -15 569 672 ;
+C -1 ; WX 600 ; N Zcaron ; B 86 0 643 805 ;
+C -1 ; WX 600 ; N Scedilla ; B 76 -151 650 580 ;
+C -1 ; WX 600 ; N Idot ; B 96 0 623 716 ;
+C -1 ; WX 600 ; N Iacute ; B 96 0 638 793 ;
+C -1 ; WX 600 ; N indent ; B 108 68 574 348 ;
+C -1 ; WX 600 ; N Ugrave ; B 125 -18 702 793 ;
+C -1 ; WX 600 ; N scaron ; B 78 -15 614 669 ;
+C -1 ; WX 600 ; N overscore ; B 123 579 734 629 ;
+C -1 ; WX 600 ; N Aring ; B 3 0 607 753 ;
+C -1 ; WX 600 ; N Ccedilla ; B 93 -151 658 580 ;
+C -1 ; WX 600 ; N Igrave ; B 96 0 623 793 ;
+C -1 ; WX 600 ; N brokenbar ; B 238 -175 469 675 ;
+C -1 ; WX 600 ; N Oacute ; B 94 -18 638 793 ;
+C -1 ; WX 600 ; N otilde ; B 102 -15 629 606 ;
+C -1 ; WX 600 ; N Yacute ; B 133 0 695 793 ;
+C -1 ; WX 600 ; N lira ; B 118 -21 621 611 ;
+C -1 ; WX 600 ; N Icircumflex ; B 96 0 623 775 ;
+C -1 ; WX 600 ; N Atilde ; B 3 0 656 732 ;
+C -1 ; WX 600 ; N Uacute ; B 125 -18 702 793 ;
+C -1 ; WX 600 ; N Ydieresis ; B 133 0 695 731 ;
+C -1 ; WX 600 ; N ydieresis ; B -4 -157 683 595 ;
+C -1 ; WX 600 ; N idieresis ; B 95 0 540 595 ;
+C -1 ; WX 600 ; N Adieresis ; B 3 0 607 731 ;
+C -1 ; WX 600 ; N mu ; B 72 -157 572 426 ;
+C -1 ; WX 600 ; N trademark ; B 75 263 742 562 ;
+C -1 ; WX 600 ; N oacute ; B 102 -15 612 672 ;
+C -1 ; WX 600 ; N acircumflex ; B 76 -15 581 654 ;
+C -1 ; WX 600 ; N Agrave ; B 3 0 607 793 ;
+C -1 ; WX 600 ; N return ; B 79 0 700 562 ;
+C -1 ; WX 600 ; N atilde ; B 76 -15 629 606 ;
+C -1 ; WX 600 ; N square ; B 19 0 700 562 ;
+C -1 ; WX 600 ; N registered ; B 53 -18 667 580 ;
+C -1 ; WX 600 ; N stop ; B 19 0 700 562 ;
+C -1 ; WX 600 ; N udieresis ; B 101 -15 572 595 ;
+C -1 ; WX 600 ; N arrowup ; B 209 0 577 623 ;
+C -1 ; WX 600 ; N igrave ; B 95 0 515 672 ;
+C -1 ; WX 600 ; N Edieresis ; B 53 0 660 731 ;
+C -1 ; WX 600 ; N zcaron ; B 99 0 624 669 ;
+C -1 ; WX 600 ; N arrowboth ; B 36 115 692 483 ;
+C -1 ; WX 600 ; N gcaron ; B 61 -157 657 669 ;
+C -1 ; WX 600 ; N arrowleft ; B 40 115 693 483 ;
+C -1 ; WX 600 ; N aacute ; B 76 -15 612 672 ;
+C -1 ; WX 600 ; N ocircumflex ; B 102 -15 588 654 ;
+C -1 ; WX 600 ; N scedilla ; B 78 -151 584 441 ;
+C -1 ; WX 600 ; N ograve ; B 102 -15 588 672 ;
+C -1 ; WX 600 ; N onehalf ; B 65 -57 669 665 ;
+C -1 ; WX 600 ; N ugrave ; B 101 -15 572 672 ;
+C -1 ; WX 600 ; N Ntilde ; B 7 -13 712 732 ;
+C -1 ; WX 600 ; N iacute ; B 95 0 612 672 ;
+C -1 ; WX 600 ; N arrowright ; B 34 115 688 483 ;
+C -1 ; WX 600 ; N Thorn ; B 79 0 606 562 ;
+C -1 ; WX 600 ; N Egrave ; B 53 0 660 793 ;
+C -1 ; WX 600 ; N thorn ; B -24 -157 605 629 ;
+C -1 ; WX 600 ; N aring ; B 76 -15 569 627 ;
+C -1 ; WX 600 ; N yacute ; B -4 -157 683 672 ;
+C -1 ; WX 600 ; N icircumflex ; B 95 0 551 654 ;
+EndCharMetrics
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 46 121 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex -4 121 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis -1 136 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave -4 121 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 12 126 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 27 126 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 56 121 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 26 121 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 29 136 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 26 121 ;
+CC Gcaron 2 ; PCC G 0 0 ; PCC caron 29 136 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 26 121 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 26 121 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 29 136 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 26 121 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 27 126 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 26 121 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 26 121 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 29 136 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 26 121 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 27 126 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 59 136 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 56 121 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 26 121 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 29 136 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave -4 121 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 56 121 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 29 136 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 29 136 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 0 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 0 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 0 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 0 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 0 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 0 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 0 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 0 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 0 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 0 0 ;
+CC gcaron 2 ; PCC g 0 0 ; PCC caron -30 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -30 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -30 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -30 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 0 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 0 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 0 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 0 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 0 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 0 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 0 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute -10 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex -10 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 0 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave -30 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute -20 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis -10 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 10 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He b/font/He
new file mode 100644
index 0000000..1eb3b44
--- /dev/null
+++ b/font/He
@@ -0,0 +1,612 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All rights reserved.
+Comment Creation Date: Thu Mar 15 08:58:00 1990
+Comment UniqueID 28352
+Comment VMusage 26389 33281
+FontName Helvetica
+FullName Helvetica
+FamilyName Helvetica
+Weight Medium
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -166 -225 1000 931
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.006
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All rights reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 718
+XHeight 523
+Ascender 718
+Descender -207
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 90 0 187 718 ;
+C 34 ; WX 355 ; N quotedbl ; B 70 463 285 718 ;
+C 35 ; WX 556 ; N numbersign ; B 28 0 529 688 ;
+C 36 ; WX 556 ; N dollar ; B 32 -115 520 775 ;
+C 37 ; WX 889 ; N percent ; B 39 -19 850 703 ;
+C 38 ; WX 667 ; N ampersand ; B 44 -15 645 718 ;
+C 39 ; WX 222 ; N quoteright ; B 53 463 157 718 ;
+C 40 ; WX 333 ; N parenleft ; B 68 -207 299 733 ;
+C 41 ; WX 333 ; N parenright ; B 34 -207 265 733 ;
+C 42 ; WX 389 ; N asterisk ; B 39 431 349 718 ;
+C 43 ; WX 584 ; N plus ; B 39 0 545 505 ;
+C 44 ; WX 278 ; N comma ; B 87 -147 191 106 ;
+C 45 ; WX 333 ; N hyphen ; B 44 232 289 322 ;
+C 46 ; WX 278 ; N period ; B 87 0 191 106 ;
+C 47 ; WX 278 ; N slash ; B -17 -19 295 737 ;
+C 48 ; WX 556 ; N zero ; B 37 -19 519 703 ;
+C 49 ; WX 556 ; N one ; B 101 0 359 703 ;
+C 50 ; WX 556 ; N two ; B 26 0 507 703 ;
+C 51 ; WX 556 ; N three ; B 34 -19 522 703 ;
+C 52 ; WX 556 ; N four ; B 25 0 523 703 ;
+C 53 ; WX 556 ; N five ; B 32 -19 514 688 ;
+C 54 ; WX 556 ; N six ; B 38 -19 518 703 ;
+C 55 ; WX 556 ; N seven ; B 37 0 523 688 ;
+C 56 ; WX 556 ; N eight ; B 38 -19 517 703 ;
+C 57 ; WX 556 ; N nine ; B 42 -19 514 703 ;
+C 58 ; WX 278 ; N colon ; B 87 0 191 516 ;
+C 59 ; WX 278 ; N semicolon ; B 87 -147 191 516 ;
+C 60 ; WX 584 ; N less ; B 48 11 536 495 ;
+C 61 ; WX 584 ; N equal ; B 39 115 545 390 ;
+C 62 ; WX 584 ; N greater ; B 48 11 536 495 ;
+C 63 ; WX 556 ; N question ; B 56 0 492 727 ;
+C 64 ; WX 1015 ; N at ; B 147 -19 868 737 ;
+C 65 ; WX 667 ; N A ; B 14 0 654 718 ;
+C 66 ; WX 667 ; N B ; B 74 0 627 718 ;
+C 67 ; WX 722 ; N C ; B 44 -19 681 737 ;
+C 68 ; WX 722 ; N D ; B 81 0 674 718 ;
+C 69 ; WX 667 ; N E ; B 86 0 616 718 ;
+C 70 ; WX 611 ; N F ; B 86 0 583 718 ;
+C 71 ; WX 778 ; N G ; B 48 -19 704 737 ;
+C 72 ; WX 722 ; N H ; B 77 0 646 718 ;
+C 73 ; WX 278 ; N I ; B 91 0 188 718 ;
+C 74 ; WX 500 ; N J ; B 17 -19 428 718 ;
+C 75 ; WX 667 ; N K ; B 76 0 663 718 ;
+C 76 ; WX 556 ; N L ; B 76 0 537 718 ;
+C 77 ; WX 833 ; N M ; B 73 0 761 718 ;
+C 78 ; WX 722 ; N N ; B 76 0 646 718 ;
+C 79 ; WX 778 ; N O ; B 39 -19 739 737 ;
+C 80 ; WX 667 ; N P ; B 86 0 622 718 ;
+C 81 ; WX 778 ; N Q ; B 39 -56 739 737 ;
+C 82 ; WX 722 ; N R ; B 88 0 684 718 ;
+C 83 ; WX 667 ; N S ; B 49 -19 620 737 ;
+C 84 ; WX 611 ; N T ; B 14 0 597 718 ;
+C 85 ; WX 722 ; N U ; B 79 -19 644 718 ;
+C 86 ; WX 667 ; N V ; B 20 0 647 718 ;
+C 87 ; WX 944 ; N W ; B 16 0 928 718 ;
+C 88 ; WX 667 ; N X ; B 19 0 648 718 ;
+C 89 ; WX 667 ; N Y ; B 14 0 653 718 ;
+C 90 ; WX 611 ; N Z ; B 23 0 588 718 ;
+C 91 ; WX 278 ; N bracketleft ; B 63 -196 250 722 ;
+C 92 ; WX 278 ; N backslash ; B -17 -19 295 737 ;
+C 93 ; WX 278 ; N bracketright ; B 28 -196 215 722 ;
+C 94 ; WX 469 ; N asciicircum ; B -14 264 483 688 ;
+C 95 ; WX 556 ; N underscore ; B 0 -125 556 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 65 470 169 725 ;
+C 97 ; WX 556 ; N a ; B 36 -15 530 538 ;
+C 98 ; WX 556 ; N b ; B 58 -15 517 718 ;
+C 99 ; WX 500 ; N c ; B 30 -15 477 538 ;
+C 100 ; WX 556 ; N d ; B 35 -15 499 718 ;
+C 101 ; WX 556 ; N e ; B 40 -15 516 538 ;
+C 102 ; WX 278 ; N f ; B 14 0 262 728 ; L i fi ; L l fl ;
+C 103 ; WX 556 ; N g ; B 40 -220 499 538 ;
+C 104 ; WX 556 ; N h ; B 65 0 491 718 ;
+C 105 ; WX 222 ; N i ; B 67 0 155 718 ;
+C 106 ; WX 222 ; N j ; B -16 -210 155 718 ;
+C 107 ; WX 500 ; N k ; B 67 0 501 718 ;
+C 108 ; WX 222 ; N l ; B 67 0 155 718 ;
+C 109 ; WX 833 ; N m ; B 65 0 769 538 ;
+C 110 ; WX 556 ; N n ; B 65 0 491 538 ;
+C 111 ; WX 556 ; N o ; B 35 -14 521 538 ;
+C 112 ; WX 556 ; N p ; B 58 -207 517 538 ;
+C 113 ; WX 556 ; N q ; B 35 -207 494 538 ;
+C 114 ; WX 333 ; N r ; B 77 0 332 538 ;
+C 115 ; WX 500 ; N s ; B 32 -15 464 538 ;
+C 116 ; WX 278 ; N t ; B 14 -7 257 669 ;
+C 117 ; WX 556 ; N u ; B 68 -15 489 523 ;
+C 118 ; WX 500 ; N v ; B 8 0 492 523 ;
+C 119 ; WX 722 ; N w ; B 14 0 709 523 ;
+C 120 ; WX 500 ; N x ; B 11 0 490 523 ;
+C 121 ; WX 500 ; N y ; B 11 -214 489 523 ;
+C 122 ; WX 500 ; N z ; B 31 0 469 523 ;
+C 123 ; WX 334 ; N braceleft ; B 42 -196 292 722 ;
+C 124 ; WX 260 ; N bar ; B 94 -19 167 737 ;
+C 125 ; WX 334 ; N braceright ; B 42 -196 292 722 ;
+C 126 ; WX 584 ; N asciitilde ; B 61 180 523 326 ;
+C 161 ; WX 333 ; N exclamdown ; B 118 -195 215 523 ;
+C 162 ; WX 556 ; N cent ; B 51 -115 513 623 ;
+C 163 ; WX 556 ; N sterling ; B 33 -16 539 718 ;
+C 164 ; WX 167 ; N fraction ; B -166 -19 333 703 ;
+C 165 ; WX 556 ; N yen ; B 3 0 553 688 ;
+C 166 ; WX 556 ; N florin ; B -11 -207 501 737 ;
+C 167 ; WX 556 ; N section ; B 43 -191 512 737 ;
+C 168 ; WX 556 ; N currency ; B 28 99 528 603 ;
+C 169 ; WX 191 ; N quotesingle ; B 59 463 132 718 ;
+C 170 ; WX 333 ; N quotedblleft ; B 38 470 307 725 ;
+C 171 ; WX 556 ; N guillemotleft ; B 97 108 459 446 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 88 108 245 446 ;
+C 173 ; WX 333 ; N guilsinglright ; B 88 108 245 446 ;
+C 174 ; WX 500 ; N fi ; B 14 0 434 728 ;
+C 175 ; WX 500 ; N fl ; B 14 0 432 728 ;
+C 177 ; WX 556 ; N endash ; B 0 240 556 313 ;
+C 178 ; WX 556 ; N dagger ; B 43 -159 514 718 ;
+C 179 ; WX 556 ; N daggerdbl ; B 43 -159 514 718 ;
+C 180 ; WX 278 ; N periodcentered ; B 77 190 202 315 ;
+C 182 ; WX 537 ; N paragraph ; B 18 -173 497 718 ;
+C 183 ; WX 350 ; N bullet ; B 18 202 333 517 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 53 -149 157 106 ;
+C 185 ; WX 333 ; N quotedblbase ; B 26 -149 295 106 ;
+C 186 ; WX 333 ; N quotedblright ; B 26 463 295 718 ;
+C 187 ; WX 556 ; N guillemotright ; B 97 108 459 446 ;
+C 188 ; WX 1000 ; N ellipsis ; B 115 0 885 106 ;
+C 189 ; WX 1000 ; N perthousand ; B 7 -19 994 703 ;
+C 191 ; WX 611 ; N questiondown ; B 91 -201 527 525 ;
+C 193 ; WX 333 ; N grave ; B 14 593 211 734 ;
+C 194 ; WX 333 ; N acute ; B 122 593 319 734 ;
+C 195 ; WX 333 ; N circumflex ; B 21 593 312 734 ;
+C 196 ; WX 333 ; N tilde ; B -4 606 337 722 ;
+C 197 ; WX 333 ; N macron ; B 10 627 323 684 ;
+C 198 ; WX 333 ; N breve ; B 13 595 321 731 ;
+C 199 ; WX 333 ; N dotaccent ; B 121 604 212 706 ;
+C 200 ; WX 333 ; N dieresis ; B 40 604 293 706 ;
+C 202 ; WX 333 ; N ring ; B 75 572 259 756 ;
+C 203 ; WX 333 ; N cedilla ; B 45 -225 259 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 31 593 409 734 ;
+C 206 ; WX 333 ; N ogonek ; B 73 -225 287 0 ;
+C 207 ; WX 333 ; N caron ; B 21 593 312 734 ;
+C 208 ; WX 1000 ; N emdash ; B 0 240 1000 313 ;
+C 225 ; WX 1000 ; N AE ; B 8 0 951 718 ;
+C 227 ; WX 370 ; N ordfeminine ; B 24 304 346 737 ;
+C 232 ; WX 556 ; N Lslash ; B -20 0 537 718 ;
+C 233 ; WX 778 ; N Oslash ; B 39 -19 740 737 ;
+C 234 ; WX 1000 ; N OE ; B 36 -19 965 737 ;
+C 235 ; WX 365 ; N ordmasculine ; B 25 304 341 737 ;
+C 241 ; WX 889 ; N ae ; B 36 -15 847 538 ;
+C 245 ; WX 278 ; N dotlessi ; B 95 0 183 523 ;
+C 248 ; WX 222 ; N lslash ; B -20 0 242 718 ;
+C 249 ; WX 611 ; N oslash ; B 28 -22 537 545 ;
+C 250 ; WX 944 ; N oe ; B 35 -15 902 538 ;
+C 251 ; WX 611 ; N germandbls ; B 67 -15 571 728 ;
+C -1 ; WX 611 ; N Zcaron ; B 23 0 588 929 ;
+C -1 ; WX 500 ; N ccedilla ; B 30 -225 477 538 ;
+C -1 ; WX 500 ; N ydieresis ; B 11 -214 489 706 ;
+C -1 ; WX 556 ; N atilde ; B 36 -15 530 722 ;
+C -1 ; WX 278 ; N icircumflex ; B -6 0 285 734 ;
+C -1 ; WX 333 ; N threesuperior ; B 5 270 325 703 ;
+C -1 ; WX 556 ; N ecircumflex ; B 40 -15 516 734 ;
+C -1 ; WX 556 ; N thorn ; B 58 -207 517 718 ;
+C -1 ; WX 556 ; N egrave ; B 40 -15 516 734 ;
+C -1 ; WX 333 ; N twosuperior ; B 4 281 323 703 ;
+C -1 ; WX 556 ; N eacute ; B 40 -15 516 734 ;
+C -1 ; WX 556 ; N otilde ; B 35 -14 521 722 ;
+C -1 ; WX 667 ; N Aacute ; B 14 0 654 929 ;
+C -1 ; WX 556 ; N ocircumflex ; B 35 -14 521 734 ;
+C -1 ; WX 500 ; N yacute ; B 11 -214 489 734 ;
+C -1 ; WX 556 ; N udieresis ; B 68 -15 489 706 ;
+C -1 ; WX 834 ; N threequarters ; B 45 -19 810 703 ;
+C -1 ; WX 556 ; N acircumflex ; B 36 -15 530 734 ;
+C -1 ; WX 722 ; N Eth ; B 0 0 674 718 ;
+C -1 ; WX 556 ; N edieresis ; B 40 -15 516 706 ;
+C -1 ; WX 556 ; N ugrave ; B 68 -15 489 734 ;
+C -1 ; WX 1000 ; N trademark ; B 46 306 903 718 ;
+C -1 ; WX 556 ; N ograve ; B 35 -14 521 734 ;
+C -1 ; WX 500 ; N scaron ; B 32 -15 464 734 ;
+C -1 ; WX 278 ; N Idieresis ; B 13 0 266 901 ;
+C -1 ; WX 556 ; N uacute ; B 68 -15 489 734 ;
+C -1 ; WX 556 ; N agrave ; B 36 -15 530 734 ;
+C -1 ; WX 556 ; N ntilde ; B 65 0 491 722 ;
+C -1 ; WX 556 ; N aring ; B 36 -15 530 756 ;
+C -1 ; WX 500 ; N zcaron ; B 31 0 469 734 ;
+C -1 ; WX 278 ; N Icircumflex ; B -6 0 285 929 ;
+C -1 ; WX 722 ; N Ntilde ; B 76 0 646 917 ;
+C -1 ; WX 556 ; N ucircumflex ; B 68 -15 489 734 ;
+C -1 ; WX 667 ; N Ecircumflex ; B 86 0 616 929 ;
+C -1 ; WX 278 ; N Iacute ; B 91 0 292 929 ;
+C -1 ; WX 722 ; N Ccedilla ; B 44 -225 681 737 ;
+C -1 ; WX 778 ; N Odieresis ; B 39 -19 739 901 ;
+C -1 ; WX 667 ; N Scaron ; B 49 -19 620 929 ;
+C -1 ; WX 667 ; N Edieresis ; B 86 0 616 901 ;
+C -1 ; WX 278 ; N Igrave ; B -13 0 188 929 ;
+C -1 ; WX 556 ; N adieresis ; B 36 -15 530 706 ;
+C -1 ; WX 778 ; N Ograve ; B 39 -19 739 929 ;
+C -1 ; WX 667 ; N Egrave ; B 86 0 616 929 ;
+C -1 ; WX 667 ; N Ydieresis ; B 14 0 653 901 ;
+C -1 ; WX 737 ; N registered ; B -14 -19 752 737 ;
+C -1 ; WX 778 ; N Otilde ; B 39 -19 739 917 ;
+C -1 ; WX 834 ; N onequarter ; B 73 -19 756 703 ;
+C -1 ; WX 722 ; N Ugrave ; B 79 -19 644 929 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 79 -19 644 929 ;
+C -1 ; WX 667 ; N Thorn ; B 86 0 622 718 ;
+C -1 ; WX 584 ; N divide ; B 39 -19 545 524 ;
+C -1 ; WX 667 ; N Atilde ; B 14 0 654 917 ;
+C -1 ; WX 722 ; N Uacute ; B 79 -19 644 929 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 39 -19 739 929 ;
+C -1 ; WX 584 ; N logicalnot ; B 39 108 545 390 ;
+C -1 ; WX 667 ; N Aring ; B 14 0 654 931 ;
+C -1 ; WX 278 ; N idieresis ; B 13 0 266 706 ;
+C -1 ; WX 278 ; N iacute ; B 95 0 292 734 ;
+C -1 ; WX 556 ; N aacute ; B 36 -15 530 734 ;
+C -1 ; WX 584 ; N plusminus ; B 39 0 545 506 ;
+C -1 ; WX 584 ; N multiply ; B 39 0 545 506 ;
+C -1 ; WX 722 ; N Udieresis ; B 79 -19 644 901 ;
+C -1 ; WX 584 ; N minus ; B 39 216 545 289 ;
+C -1 ; WX 333 ; N onesuperior ; B 43 281 222 703 ;
+C -1 ; WX 667 ; N Eacute ; B 86 0 616 929 ;
+C -1 ; WX 667 ; N Acircumflex ; B 14 0 654 929 ;
+C -1 ; WX 737 ; N copyright ; B -14 -19 752 737 ;
+C -1 ; WX 667 ; N Agrave ; B 14 0 654 929 ;
+C -1 ; WX 556 ; N odieresis ; B 35 -14 521 706 ;
+C -1 ; WX 556 ; N oacute ; B 35 -14 521 734 ;
+C -1 ; WX 400 ; N degree ; B 54 411 346 703 ;
+C -1 ; WX 278 ; N igrave ; B -13 0 184 734 ;
+C -1 ; WX 556 ; N mu ; B 68 -207 489 523 ;
+C -1 ; WX 778 ; N Oacute ; B 39 -19 739 929 ;
+C -1 ; WX 556 ; N eth ; B 35 -15 522 737 ;
+C -1 ; WX 667 ; N Adieresis ; B 14 0 654 901 ;
+C -1 ; WX 667 ; N Yacute ; B 14 0 653 929 ;
+C -1 ; WX 260 ; N brokenbar ; B 94 -19 167 737 ;
+C -1 ; WX 834 ; N onehalf ; B 43 -19 773 703 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 250
+
+KPX A y -40
+KPX A w -40
+KPX A v -40
+KPX A u -30
+KPX A Y -100
+KPX A W -50
+KPX A V -70
+KPX A U -50
+KPX A T -120
+KPX A Q -30
+KPX A O -30
+KPX A G -30
+KPX A C -30
+
+KPX B period -20
+KPX B comma -20
+KPX B U -10
+
+KPX C period -30
+KPX C comma -30
+
+KPX D period -70
+KPX D comma -70
+KPX D Y -90
+KPX D W -40
+KPX D V -70
+KPX D A -40
+
+KPX F r -45
+KPX F period -150
+KPX F o -30
+KPX F e -30
+KPX F comma -150
+KPX F a -50
+KPX F A -80
+
+KPX J u -20
+KPX J period -30
+KPX J comma -30
+KPX J a -20
+KPX J A -20
+
+KPX K y -50
+KPX K u -30
+KPX K o -40
+KPX K e -40
+KPX K O -50
+
+KPX L y -30
+KPX L quoteright -160
+KPX L quotedblright -140
+KPX L Y -140
+KPX L W -70
+KPX L V -110
+KPX L T -110
+
+KPX O period -40
+KPX O comma -40
+KPX O Y -70
+KPX O X -60
+KPX O W -30
+KPX O V -50
+KPX O T -40
+KPX O A -20
+
+KPX P period -180
+KPX P o -50
+KPX P e -50
+KPX P comma -180
+KPX P a -40
+KPX P A -120
+
+KPX Q U -10
+
+KPX R Y -50
+KPX R W -30
+KPX R V -50
+KPX R U -40
+KPX R T -30
+KPX R O -20
+
+KPX S period -20
+KPX S comma -20
+
+KPX T y -120
+KPX T w -120
+KPX T u -120
+KPX T semicolon -20
+KPX T r -120
+KPX T period -120
+KPX T o -120
+KPX T hyphen -140
+KPX T e -120
+KPX T comma -120
+KPX T colon -20
+KPX T a -120
+KPX T O -40
+KPX T A -120
+
+KPX U period -40
+KPX U comma -40
+KPX U A -40
+
+KPX V u -70
+KPX V semicolon -40
+KPX V period -125
+KPX V o -80
+KPX V hyphen -80
+KPX V e -80
+KPX V comma -125
+KPX V colon -40
+KPX V a -70
+KPX V O -40
+KPX V G -40
+KPX V A -80
+
+KPX W y -20
+KPX W u -30
+KPX W period -80
+KPX W o -30
+KPX W hyphen -40
+KPX W e -30
+KPX W comma -80
+KPX W a -40
+KPX W O -20
+KPX W A -50
+
+KPX Y u -110
+KPX Y semicolon -60
+KPX Y period -140
+KPX Y o -140
+KPX Y i -20
+KPX Y hyphen -140
+KPX Y e -140
+KPX Y comma -140
+KPX Y colon -60
+KPX Y a -140
+KPX Y O -85
+KPX Y A -110
+
+KPX a y -30
+KPX a w -20
+KPX a v -20
+
+KPX b y -20
+KPX b v -20
+KPX b u -20
+KPX b period -40
+KPX b l -20
+KPX b comma -40
+KPX b b -10
+
+KPX c k -20
+KPX c comma -15
+
+KPX colon space -50
+
+KPX comma quoteright -100
+KPX comma quotedblright -100
+
+KPX e y -20
+KPX e x -30
+KPX e w -20
+KPX e v -30
+KPX e period -15
+KPX e comma -15
+
+KPX f quoteright 50
+KPX f quotedblright 60
+KPX f period -30
+KPX f o -30
+KPX f e -30
+KPX f dotlessi -28
+KPX f comma -30
+KPX f a -30
+
+KPX g r -10
+
+KPX h y -30
+
+KPX k o -20
+KPX k e -20
+
+KPX m y -15
+KPX m u -10
+
+KPX n y -15
+KPX n v -20
+KPX n u -10
+
+KPX o y -30
+KPX o x -30
+KPX o w -15
+KPX o v -15
+KPX o period -40
+KPX o comma -40
+
+KPX oslash z -55
+KPX oslash y -70
+KPX oslash x -85
+KPX oslash w -70
+KPX oslash v -70
+KPX oslash u -55
+KPX oslash t -55
+KPX oslash s -55
+KPX oslash r -55
+KPX oslash q -55
+KPX oslash period -95
+KPX oslash p -55
+KPX oslash o -55
+KPX oslash n -55
+KPX oslash m -55
+KPX oslash l -55
+KPX oslash k -55
+KPX oslash j -55
+KPX oslash i -55
+KPX oslash h -55
+KPX oslash g -55
+KPX oslash f -55
+KPX oslash e -55
+KPX oslash d -55
+KPX oslash comma -95
+KPX oslash c -55
+KPX oslash b -55
+KPX oslash a -55
+
+KPX p y -30
+KPX p period -35
+KPX p comma -35
+
+KPX period space -60
+KPX period quoteright -100
+KPX period quotedblright -100
+
+KPX quotedblright space -40
+
+KPX quoteleft quoteleft -57
+
+KPX quoteright space -70
+KPX quoteright s -50
+KPX quoteright r -50
+KPX quoteright quoteright -57
+KPX quoteright d -50
+
+KPX r y 30
+KPX r v 30
+KPX r u 15
+KPX r t 40
+KPX r semicolon 30
+KPX r period -50
+KPX r p 30
+KPX r n 25
+KPX r m 25
+KPX r l 15
+KPX r k 15
+KPX r i 15
+KPX r comma -50
+KPX r colon 30
+KPX r a -10
+
+KPX s w -30
+KPX s period -15
+KPX s comma -15
+
+KPX semicolon space -50
+
+KPX space quoteleft -60
+KPX space quotedblleft -30
+KPX space Y -90
+KPX space W -40
+KPX space V -50
+KPX space T -50
+
+KPX v period -80
+KPX v o -25
+KPX v e -25
+KPX v comma -80
+KPX v a -25
+
+KPX w period -60
+KPX w o -10
+KPX w e -10
+KPX w comma -60
+KPX w a -15
+
+KPX x e -30
+
+KPX y period -100
+KPX y o -20
+KPX y e -20
+KPX y comma -100
+KPX y a -20
+
+KPX z o -15
+KPX z e -15
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 167 195 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 167 195 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 167 195 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 167 195 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 167 175 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 167 195 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 195 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 167 195 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 167 195 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 167 195 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 167 195 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -27 195 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -27 195 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -27 195 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -27 195 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 205 195 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 223 195 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 223 195 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 223 195 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 223 195 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 223 195 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 167 195 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 195 195 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 195 195 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 195 195 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 195 195 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 167 195 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 167 195 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 139 195 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 112 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 112 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 112 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 112 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 112 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 102 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 84 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 112 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 112 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 112 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 112 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -27 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 102 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 112 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 112 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 112 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 112 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 112 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 84 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 112 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 112 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 112 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 112 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 84 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 84 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 84 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-Bd b/font/He-Bd
new file mode 100644
index 0000000..a1e1b33
--- /dev/null
+++ b/font/He-Bd
@@ -0,0 +1,570 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Mar 15 09:43:00 1990
+Comment UniqueID 28357
+Comment VMusage 26878 33770
+FontName Helvetica-Bold
+FullName Helvetica Bold
+FamilyName Helvetica
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -170 -228 1003 962
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 718
+XHeight 532
+Ascender 718
+Descender -207
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 90 0 244 718 ;
+C 34 ; WX 474 ; N quotedbl ; B 98 447 376 718 ;
+C 35 ; WX 556 ; N numbersign ; B 18 0 538 698 ;
+C 36 ; WX 556 ; N dollar ; B 30 -115 523 775 ;
+C 37 ; WX 889 ; N percent ; B 28 -19 861 710 ;
+C 38 ; WX 722 ; N ampersand ; B 54 -19 701 718 ;
+C 39 ; WX 278 ; N quoteright ; B 69 445 209 718 ;
+C 40 ; WX 333 ; N parenleft ; B 35 -208 314 734 ;
+C 41 ; WX 333 ; N parenright ; B 19 -208 298 734 ;
+C 42 ; WX 389 ; N asterisk ; B 27 387 362 718 ;
+C 43 ; WX 584 ; N plus ; B 40 0 544 506 ;
+C 44 ; WX 278 ; N comma ; B 64 -168 214 146 ;
+C 45 ; WX 333 ; N hyphen ; B 27 215 306 345 ;
+C 46 ; WX 278 ; N period ; B 64 0 214 146 ;
+C 47 ; WX 278 ; N slash ; B -33 -19 311 737 ;
+C 48 ; WX 556 ; N zero ; B 32 -19 524 710 ;
+C 49 ; WX 556 ; N one ; B 69 0 378 710 ;
+C 50 ; WX 556 ; N two ; B 26 0 511 710 ;
+C 51 ; WX 556 ; N three ; B 27 -19 516 710 ;
+C 52 ; WX 556 ; N four ; B 27 0 526 710 ;
+C 53 ; WX 556 ; N five ; B 27 -19 516 698 ;
+C 54 ; WX 556 ; N six ; B 31 -19 520 710 ;
+C 55 ; WX 556 ; N seven ; B 25 0 528 698 ;
+C 56 ; WX 556 ; N eight ; B 32 -19 524 710 ;
+C 57 ; WX 556 ; N nine ; B 30 -19 522 710 ;
+C 58 ; WX 333 ; N colon ; B 92 0 242 512 ;
+C 59 ; WX 333 ; N semicolon ; B 92 -168 242 512 ;
+C 60 ; WX 584 ; N less ; B 38 -8 546 514 ;
+C 61 ; WX 584 ; N equal ; B 40 87 544 419 ;
+C 62 ; WX 584 ; N greater ; B 38 -8 546 514 ;
+C 63 ; WX 611 ; N question ; B 60 0 556 727 ;
+C 64 ; WX 975 ; N at ; B 118 -19 856 737 ;
+C 65 ; WX 722 ; N A ; B 20 0 702 718 ;
+C 66 ; WX 722 ; N B ; B 76 0 669 718 ;
+C 67 ; WX 722 ; N C ; B 44 -19 684 737 ;
+C 68 ; WX 722 ; N D ; B 76 0 685 718 ;
+C 69 ; WX 667 ; N E ; B 76 0 621 718 ;
+C 70 ; WX 611 ; N F ; B 76 0 587 718 ;
+C 71 ; WX 778 ; N G ; B 44 -19 713 737 ;
+C 72 ; WX 722 ; N H ; B 71 0 651 718 ;
+C 73 ; WX 278 ; N I ; B 64 0 214 718 ;
+C 74 ; WX 556 ; N J ; B 22 -18 484 718 ;
+C 75 ; WX 722 ; N K ; B 87 0 722 718 ;
+C 76 ; WX 611 ; N L ; B 76 0 583 718 ;
+C 77 ; WX 833 ; N M ; B 69 0 765 718 ;
+C 78 ; WX 722 ; N N ; B 69 0 654 718 ;
+C 79 ; WX 778 ; N O ; B 44 -19 734 737 ;
+C 80 ; WX 667 ; N P ; B 76 0 627 718 ;
+C 81 ; WX 778 ; N Q ; B 44 -52 737 737 ;
+C 82 ; WX 722 ; N R ; B 76 0 677 718 ;
+C 83 ; WX 667 ; N S ; B 39 -19 629 737 ;
+C 84 ; WX 611 ; N T ; B 14 0 598 718 ;
+C 85 ; WX 722 ; N U ; B 72 -19 651 718 ;
+C 86 ; WX 667 ; N V ; B 19 0 648 718 ;
+C 87 ; WX 944 ; N W ; B 16 0 929 718 ;
+C 88 ; WX 667 ; N X ; B 14 0 653 718 ;
+C 89 ; WX 667 ; N Y ; B 15 0 653 718 ;
+C 90 ; WX 611 ; N Z ; B 25 0 586 718 ;
+C 91 ; WX 333 ; N bracketleft ; B 63 -196 309 722 ;
+C 92 ; WX 278 ; N backslash ; B -33 -19 311 737 ;
+C 93 ; WX 333 ; N bracketright ; B 24 -196 270 722 ;
+C 94 ; WX 584 ; N asciicircum ; B 62 323 522 698 ;
+C 95 ; WX 556 ; N underscore ; B 0 -125 556 -75 ;
+C 96 ; WX 278 ; N quoteleft ; B 69 454 209 727 ;
+C 97 ; WX 556 ; N a ; B 29 -14 527 546 ;
+C 98 ; WX 611 ; N b ; B 61 -14 578 718 ;
+C 99 ; WX 556 ; N c ; B 34 -14 524 546 ;
+C 100 ; WX 611 ; N d ; B 34 -14 551 718 ;
+C 101 ; WX 556 ; N e ; B 23 -14 528 546 ;
+C 102 ; WX 333 ; N f ; B 10 0 318 727 ; L i fi ; L l fl ;
+C 103 ; WX 611 ; N g ; B 40 -217 553 546 ;
+C 104 ; WX 611 ; N h ; B 65 0 546 718 ;
+C 105 ; WX 278 ; N i ; B 69 0 209 725 ;
+C 106 ; WX 278 ; N j ; B 3 -214 209 725 ;
+C 107 ; WX 556 ; N k ; B 69 0 562 718 ;
+C 108 ; WX 278 ; N l ; B 69 0 209 718 ;
+C 109 ; WX 889 ; N m ; B 64 0 826 546 ;
+C 110 ; WX 611 ; N n ; B 65 0 546 546 ;
+C 111 ; WX 611 ; N o ; B 34 -14 578 546 ;
+C 112 ; WX 611 ; N p ; B 62 -207 578 546 ;
+C 113 ; WX 611 ; N q ; B 34 -207 552 546 ;
+C 114 ; WX 389 ; N r ; B 64 0 373 546 ;
+C 115 ; WX 556 ; N s ; B 30 -14 519 546 ;
+C 116 ; WX 333 ; N t ; B 10 -6 309 676 ;
+C 117 ; WX 611 ; N u ; B 66 -14 545 532 ;
+C 118 ; WX 556 ; N v ; B 13 0 543 532 ;
+C 119 ; WX 778 ; N w ; B 10 0 769 532 ;
+C 120 ; WX 556 ; N x ; B 15 0 541 532 ;
+C 121 ; WX 556 ; N y ; B 10 -214 539 532 ;
+C 122 ; WX 500 ; N z ; B 20 0 480 532 ;
+C 123 ; WX 389 ; N braceleft ; B 48 -196 365 722 ;
+C 124 ; WX 280 ; N bar ; B 84 -19 196 737 ;
+C 125 ; WX 389 ; N braceright ; B 24 -196 341 722 ;
+C 126 ; WX 584 ; N asciitilde ; B 61 163 523 343 ;
+C 161 ; WX 333 ; N exclamdown ; B 90 -186 244 532 ;
+C 162 ; WX 556 ; N cent ; B 34 -118 524 628 ;
+C 163 ; WX 556 ; N sterling ; B 28 -16 541 718 ;
+C 164 ; WX 167 ; N fraction ; B -170 -19 336 710 ;
+C 165 ; WX 556 ; N yen ; B -9 0 565 698 ;
+C 166 ; WX 556 ; N florin ; B -10 -210 516 737 ;
+C 167 ; WX 556 ; N section ; B 34 -184 522 727 ;
+C 168 ; WX 556 ; N currency ; B -3 76 559 636 ;
+C 169 ; WX 238 ; N quotesingle ; B 70 447 168 718 ;
+C 170 ; WX 500 ; N quotedblleft ; B 64 454 436 727 ;
+C 171 ; WX 556 ; N guillemotleft ; B 88 76 468 484 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 83 76 250 484 ;
+C 173 ; WX 333 ; N guilsinglright ; B 83 76 250 484 ;
+C 174 ; WX 611 ; N fi ; B 10 0 542 727 ;
+C 175 ; WX 611 ; N fl ; B 10 0 542 727 ;
+C 177 ; WX 556 ; N endash ; B 0 227 556 333 ;
+C 178 ; WX 556 ; N dagger ; B 36 -171 520 718 ;
+C 179 ; WX 556 ; N daggerdbl ; B 36 -171 520 718 ;
+C 180 ; WX 278 ; N periodcentered ; B 58 172 220 334 ;
+C 182 ; WX 556 ; N paragraph ; B -8 -191 539 700 ;
+C 183 ; WX 350 ; N bullet ; B 10 194 340 524 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 69 -146 209 127 ;
+C 185 ; WX 500 ; N quotedblbase ; B 64 -146 436 127 ;
+C 186 ; WX 500 ; N quotedblright ; B 64 445 436 718 ;
+C 187 ; WX 556 ; N guillemotright ; B 88 76 468 484 ;
+C 188 ; WX 1000 ; N ellipsis ; B 92 0 908 146 ;
+C 189 ; WX 1000 ; N perthousand ; B -3 -19 1003 710 ;
+C 191 ; WX 611 ; N questiondown ; B 55 -195 551 532 ;
+C 193 ; WX 333 ; N grave ; B -23 604 225 750 ;
+C 194 ; WX 333 ; N acute ; B 108 604 356 750 ;
+C 195 ; WX 333 ; N circumflex ; B -10 604 343 750 ;
+C 196 ; WX 333 ; N tilde ; B -17 610 350 737 ;
+C 197 ; WX 333 ; N macron ; B -6 604 339 678 ;
+C 198 ; WX 333 ; N breve ; B -2 604 335 750 ;
+C 199 ; WX 333 ; N dotaccent ; B 104 614 230 729 ;
+C 200 ; WX 333 ; N dieresis ; B 6 614 327 729 ;
+C 202 ; WX 333 ; N ring ; B 59 568 275 776 ;
+C 203 ; WX 333 ; N cedilla ; B 6 -228 245 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 9 604 486 750 ;
+C 206 ; WX 333 ; N ogonek ; B 71 -228 304 0 ;
+C 207 ; WX 333 ; N caron ; B -10 604 343 750 ;
+C 208 ; WX 1000 ; N emdash ; B 0 227 1000 333 ;
+C 225 ; WX 1000 ; N AE ; B 5 0 954 718 ;
+C 227 ; WX 370 ; N ordfeminine ; B 22 276 347 737 ;
+C 232 ; WX 611 ; N Lslash ; B -20 0 583 718 ;
+C 233 ; WX 778 ; N Oslash ; B 33 -27 744 745 ;
+C 234 ; WX 1000 ; N OE ; B 37 -19 961 737 ;
+C 235 ; WX 365 ; N ordmasculine ; B 6 276 360 737 ;
+C 241 ; WX 889 ; N ae ; B 29 -14 858 546 ;
+C 245 ; WX 278 ; N dotlessi ; B 69 0 209 532 ;
+C 248 ; WX 278 ; N lslash ; B -18 0 296 718 ;
+C 249 ; WX 611 ; N oslash ; B 22 -29 589 560 ;
+C 250 ; WX 944 ; N oe ; B 34 -14 912 546 ;
+C 251 ; WX 611 ; N germandbls ; B 69 -14 579 731 ;
+C -1 ; WX 611 ; N Zcaron ; B 25 0 586 936 ;
+C -1 ; WX 556 ; N ccedilla ; B 34 -228 524 546 ;
+C -1 ; WX 556 ; N ydieresis ; B 10 -214 539 729 ;
+C -1 ; WX 556 ; N atilde ; B 29 -14 527 737 ;
+C -1 ; WX 278 ; N icircumflex ; B -37 0 316 750 ;
+C -1 ; WX 333 ; N threesuperior ; B 8 271 326 710 ;
+C -1 ; WX 556 ; N ecircumflex ; B 23 -14 528 750 ;
+C -1 ; WX 611 ; N thorn ; B 62 -208 578 718 ;
+C -1 ; WX 556 ; N egrave ; B 23 -14 528 750 ;
+C -1 ; WX 333 ; N twosuperior ; B 9 283 324 710 ;
+C -1 ; WX 556 ; N eacute ; B 23 -14 528 750 ;
+C -1 ; WX 611 ; N otilde ; B 34 -14 578 737 ;
+C -1 ; WX 722 ; N Aacute ; B 20 0 702 936 ;
+C -1 ; WX 611 ; N ocircumflex ; B 34 -14 578 750 ;
+C -1 ; WX 556 ; N yacute ; B 10 -214 539 750 ;
+C -1 ; WX 611 ; N udieresis ; B 66 -14 545 729 ;
+C -1 ; WX 834 ; N threequarters ; B 16 -19 799 710 ;
+C -1 ; WX 556 ; N acircumflex ; B 29 -14 527 750 ;
+C -1 ; WX 722 ; N Eth ; B -5 0 685 718 ;
+C -1 ; WX 556 ; N edieresis ; B 23 -14 528 729 ;
+C -1 ; WX 611 ; N ugrave ; B 66 -14 545 750 ;
+C -1 ; WX 1000 ; N trademark ; B 44 306 956 718 ;
+C -1 ; WX 611 ; N ograve ; B 34 -14 578 750 ;
+C -1 ; WX 556 ; N scaron ; B 30 -14 519 750 ;
+C -1 ; WX 278 ; N Idieresis ; B -21 0 300 915 ;
+C -1 ; WX 611 ; N uacute ; B 66 -14 545 750 ;
+C -1 ; WX 556 ; N agrave ; B 29 -14 527 750 ;
+C -1 ; WX 611 ; N ntilde ; B 65 0 546 737 ;
+C -1 ; WX 556 ; N aring ; B 29 -14 527 776 ;
+C -1 ; WX 500 ; N zcaron ; B 20 0 480 750 ;
+C -1 ; WX 278 ; N Icircumflex ; B -37 0 316 936 ;
+C -1 ; WX 722 ; N Ntilde ; B 69 0 654 923 ;
+C -1 ; WX 611 ; N ucircumflex ; B 66 -14 545 750 ;
+C -1 ; WX 667 ; N Ecircumflex ; B 76 0 621 936 ;
+C -1 ; WX 278 ; N Iacute ; B 64 0 329 936 ;
+C -1 ; WX 722 ; N Ccedilla ; B 44 -228 684 737 ;
+C -1 ; WX 778 ; N Odieresis ; B 44 -19 734 915 ;
+C -1 ; WX 667 ; N Scaron ; B 39 -19 629 936 ;
+C -1 ; WX 667 ; N Edieresis ; B 76 0 621 915 ;
+C -1 ; WX 278 ; N Igrave ; B -50 0 214 936 ;
+C -1 ; WX 556 ; N adieresis ; B 29 -14 527 729 ;
+C -1 ; WX 778 ; N Ograve ; B 44 -19 734 936 ;
+C -1 ; WX 667 ; N Egrave ; B 76 0 621 936 ;
+C -1 ; WX 667 ; N Ydieresis ; B 15 0 653 915 ;
+C -1 ; WX 737 ; N registered ; B -11 -19 748 737 ;
+C -1 ; WX 778 ; N Otilde ; B 44 -19 734 923 ;
+C -1 ; WX 834 ; N onequarter ; B 26 -19 766 710 ;
+C -1 ; WX 722 ; N Ugrave ; B 72 -19 651 936 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 72 -19 651 936 ;
+C -1 ; WX 667 ; N Thorn ; B 76 0 627 718 ;
+C -1 ; WX 584 ; N divide ; B 40 -42 544 548 ;
+C -1 ; WX 722 ; N Atilde ; B 20 0 702 923 ;
+C -1 ; WX 722 ; N Uacute ; B 72 -19 651 936 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 44 -19 734 936 ;
+C -1 ; WX 584 ; N logicalnot ; B 40 108 544 419 ;
+C -1 ; WX 722 ; N Aring ; B 20 0 702 962 ;
+C -1 ; WX 278 ; N idieresis ; B -21 0 300 729 ;
+C -1 ; WX 278 ; N iacute ; B 69 0 329 750 ;
+C -1 ; WX 556 ; N aacute ; B 29 -14 527 750 ;
+C -1 ; WX 584 ; N plusminus ; B 40 0 544 506 ;
+C -1 ; WX 584 ; N multiply ; B 40 1 545 505 ;
+C -1 ; WX 722 ; N Udieresis ; B 72 -19 651 915 ;
+C -1 ; WX 584 ; N minus ; B 40 197 544 309 ;
+C -1 ; WX 333 ; N onesuperior ; B 26 283 237 710 ;
+C -1 ; WX 667 ; N Eacute ; B 76 0 621 936 ;
+C -1 ; WX 722 ; N Acircumflex ; B 20 0 702 936 ;
+C -1 ; WX 737 ; N copyright ; B -11 -19 749 737 ;
+C -1 ; WX 722 ; N Agrave ; B 20 0 702 936 ;
+C -1 ; WX 611 ; N odieresis ; B 34 -14 578 729 ;
+C -1 ; WX 611 ; N oacute ; B 34 -14 578 750 ;
+C -1 ; WX 400 ; N degree ; B 57 426 343 712 ;
+C -1 ; WX 278 ; N igrave ; B -50 0 209 750 ;
+C -1 ; WX 611 ; N mu ; B 66 -207 545 532 ;
+C -1 ; WX 778 ; N Oacute ; B 44 -19 734 936 ;
+C -1 ; WX 611 ; N eth ; B 34 -14 578 737 ;
+C -1 ; WX 722 ; N Adieresis ; B 20 0 702 915 ;
+C -1 ; WX 667 ; N Yacute ; B 15 0 653 936 ;
+C -1 ; WX 280 ; N brokenbar ; B 84 -19 196 737 ;
+C -1 ; WX 834 ; N onehalf ; B 26 -19 794 710 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 209
+
+KPX A y -30
+KPX A w -30
+KPX A v -40
+KPX A u -30
+KPX A Y -110
+KPX A W -60
+KPX A V -80
+KPX A U -50
+KPX A T -90
+KPX A Q -40
+KPX A O -40
+KPX A G -50
+KPX A C -40
+
+KPX B U -10
+KPX B A -30
+
+KPX D period -30
+KPX D comma -30
+KPX D Y -70
+KPX D W -40
+KPX D V -40
+KPX D A -40
+
+KPX F period -100
+KPX F comma -100
+KPX F a -20
+KPX F A -80
+
+KPX J u -20
+KPX J period -20
+KPX J comma -20
+KPX J A -20
+
+KPX K y -40
+KPX K u -30
+KPX K o -35
+KPX K e -15
+KPX K O -30
+
+KPX L y -30
+KPX L quoteright -140
+KPX L quotedblright -140
+KPX L Y -120
+KPX L W -80
+KPX L V -110
+KPX L T -90
+
+KPX O period -40
+KPX O comma -40
+KPX O Y -70
+KPX O X -50
+KPX O W -50
+KPX O V -50
+KPX O T -40
+KPX O A -50
+
+KPX P period -120
+KPX P o -40
+KPX P e -30
+KPX P comma -120
+KPX P a -30
+KPX P A -100
+
+KPX Q period 20
+KPX Q comma 20
+KPX Q U -10
+
+KPX R Y -50
+KPX R W -40
+KPX R V -50
+KPX R U -20
+KPX R T -20
+KPX R O -20
+
+KPX T y -60
+KPX T w -60
+KPX T u -90
+KPX T semicolon -40
+KPX T r -80
+KPX T period -80
+KPX T o -80
+KPX T hyphen -120
+KPX T e -60
+KPX T comma -80
+KPX T colon -40
+KPX T a -80
+KPX T O -40
+KPX T A -90
+
+KPX U period -30
+KPX U comma -30
+KPX U A -50
+
+KPX V u -60
+KPX V semicolon -40
+KPX V period -120
+KPX V o -90
+KPX V hyphen -80
+KPX V e -50
+KPX V comma -120
+KPX V colon -40
+KPX V a -60
+KPX V O -50
+KPX V G -50
+KPX V A -80
+
+KPX W y -20
+KPX W u -45
+KPX W semicolon -10
+KPX W period -80
+KPX W o -60
+KPX W hyphen -40
+KPX W e -35
+KPX W comma -80
+KPX W colon -10
+KPX W a -40
+KPX W O -20
+KPX W A -60
+
+KPX Y u -100
+KPX Y semicolon -50
+KPX Y period -100
+KPX Y o -100
+KPX Y e -80
+KPX Y comma -100
+KPX Y colon -50
+KPX Y a -90
+KPX Y O -70
+KPX Y A -110
+
+KPX a y -20
+KPX a w -15
+KPX a v -15
+KPX a g -10
+
+KPX b y -20
+KPX b v -20
+KPX b u -20
+KPX b l -10
+
+KPX c y -10
+KPX c l -20
+KPX c k -20
+KPX c h -10
+
+KPX colon space -40
+
+KPX comma space -40
+KPX comma quoteright -120
+KPX comma quotedblright -120
+
+KPX d y -15
+KPX d w -15
+KPX d v -15
+KPX d d -10
+
+KPX e y -15
+KPX e x -15
+KPX e w -15
+KPX e v -15
+KPX e period 20
+KPX e comma 10
+
+KPX f quoteright 30
+KPX f quotedblright 30
+KPX f period -10
+KPX f o -20
+KPX f e -10
+KPX f comma -10
+
+KPX g g -10
+KPX g e 10
+
+KPX h y -20
+
+KPX k o -15
+
+KPX l y -15
+KPX l w -15
+
+KPX m y -30
+KPX m u -20
+
+KPX n y -20
+KPX n v -40
+KPX n u -10
+
+KPX o y -20
+KPX o x -30
+KPX o w -15
+KPX o v -20
+
+KPX p y -15
+
+KPX period space -40
+KPX period quoteright -120
+KPX period quotedblright -120
+
+KPX quotedblright space -80
+
+KPX quoteleft quoteleft -46
+
+KPX quoteright v -20
+KPX quoteright space -80
+KPX quoteright s -60
+KPX quoteright r -40
+KPX quoteright quoteright -46
+KPX quoteright l -20
+KPX quoteright d -80
+
+KPX r y 10
+KPX r v 10
+KPX r t 20
+KPX r s -15
+KPX r q -20
+KPX r period -60
+KPX r o -20
+KPX r hyphen -20
+KPX r g -15
+KPX r d -20
+KPX r comma -60
+KPX r c -20
+
+KPX s w -15
+
+KPX semicolon space -40
+
+KPX space quoteleft -60
+KPX space quotedblleft -80
+KPX space Y -120
+KPX space W -80
+KPX space V -80
+KPX space T -100
+
+KPX v period -80
+KPX v o -30
+KPX v comma -80
+KPX v a -20
+
+KPX w period -40
+KPX w o -20
+KPX w comma -40
+
+KPX x e -10
+
+KPX y period -80
+KPX y o -25
+KPX y e -10
+KPX y comma -80
+KPX y a -30
+
+KPX z e 10
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 195 186 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 195 186 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 195 186 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 195 186 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 195 186 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 195 186 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 215 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 167 186 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 167 186 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 167 186 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 167 186 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -27 186 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -27 186 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -27 186 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -27 186 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 195 186 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 223 186 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 223 186 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 223 186 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 223 186 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 223 186 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 167 186 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 195 186 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 195 186 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 195 186 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 195 186 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 167 186 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 167 186 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 139 186 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 112 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 112 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 112 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 112 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 112 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 112 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 132 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 112 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 112 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 112 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 112 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -27 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 139 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 139 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 139 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 139 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 139 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 139 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 112 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 139 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 139 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 112 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 112 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 84 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-BdO b/font/He-BdO
new file mode 100644
index 0000000..b6cff41
--- /dev/null
+++ b/font/He-BdO
@@ -0,0 +1,570 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Mar 15 10:44:33 1990
+Comment UniqueID 28371
+Comment VMusage 7614 43068
+FontName Helvetica-BoldOblique
+FullName Helvetica Bold Oblique
+FamilyName Helvetica
+Weight Bold
+ItalicAngle -12
+IsFixedPitch false
+FontBBox -174 -228 1114 962
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 718
+XHeight 532
+Ascender 718
+Descender -207
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 94 0 397 718 ;
+C 34 ; WX 474 ; N quotedbl ; B 193 447 529 718 ;
+C 35 ; WX 556 ; N numbersign ; B 60 0 644 698 ;
+C 36 ; WX 556 ; N dollar ; B 67 -115 622 775 ;
+C 37 ; WX 889 ; N percent ; B 136 -19 901 710 ;
+C 38 ; WX 722 ; N ampersand ; B 89 -19 732 718 ;
+C 39 ; WX 278 ; N quoteright ; B 167 445 362 718 ;
+C 40 ; WX 333 ; N parenleft ; B 76 -208 470 734 ;
+C 41 ; WX 333 ; N parenright ; B -25 -208 369 734 ;
+C 42 ; WX 389 ; N asterisk ; B 146 387 481 718 ;
+C 43 ; WX 584 ; N plus ; B 82 0 610 506 ;
+C 44 ; WX 278 ; N comma ; B 28 -168 245 146 ;
+C 45 ; WX 333 ; N hyphen ; B 73 215 379 345 ;
+C 46 ; WX 278 ; N period ; B 64 0 245 146 ;
+C 47 ; WX 278 ; N slash ; B -37 -19 468 737 ;
+C 48 ; WX 556 ; N zero ; B 86 -19 617 710 ;
+C 49 ; WX 556 ; N one ; B 173 0 529 710 ;
+C 50 ; WX 556 ; N two ; B 26 0 619 710 ;
+C 51 ; WX 556 ; N three ; B 65 -19 608 710 ;
+C 52 ; WX 556 ; N four ; B 60 0 598 710 ;
+C 53 ; WX 556 ; N five ; B 64 -19 636 698 ;
+C 54 ; WX 556 ; N six ; B 85 -19 619 710 ;
+C 55 ; WX 556 ; N seven ; B 125 0 676 698 ;
+C 56 ; WX 556 ; N eight ; B 69 -19 616 710 ;
+C 57 ; WX 556 ; N nine ; B 78 -19 615 710 ;
+C 58 ; WX 333 ; N colon ; B 92 0 351 512 ;
+C 59 ; WX 333 ; N semicolon ; B 56 -168 351 512 ;
+C 60 ; WX 584 ; N less ; B 82 -8 655 514 ;
+C 61 ; WX 584 ; N equal ; B 58 87 633 419 ;
+C 62 ; WX 584 ; N greater ; B 36 -8 609 514 ;
+C 63 ; WX 611 ; N question ; B 165 0 671 727 ;
+C 64 ; WX 975 ; N at ; B 186 -19 954 737 ;
+C 65 ; WX 722 ; N A ; B 20 0 702 718 ;
+C 66 ; WX 722 ; N B ; B 76 0 764 718 ;
+C 67 ; WX 722 ; N C ; B 107 -19 789 737 ;
+C 68 ; WX 722 ; N D ; B 76 0 777 718 ;
+C 69 ; WX 667 ; N E ; B 76 0 757 718 ;
+C 70 ; WX 611 ; N F ; B 76 0 740 718 ;
+C 71 ; WX 778 ; N G ; B 108 -19 817 737 ;
+C 72 ; WX 722 ; N H ; B 71 0 804 718 ;
+C 73 ; WX 278 ; N I ; B 64 0 367 718 ;
+C 74 ; WX 556 ; N J ; B 60 -18 637 718 ;
+C 75 ; WX 722 ; N K ; B 87 0 858 718 ;
+C 76 ; WX 611 ; N L ; B 76 0 611 718 ;
+C 77 ; WX 833 ; N M ; B 69 0 918 718 ;
+C 78 ; WX 722 ; N N ; B 69 0 807 718 ;
+C 79 ; WX 778 ; N O ; B 107 -19 823 737 ;
+C 80 ; WX 667 ; N P ; B 76 0 738 718 ;
+C 81 ; WX 778 ; N Q ; B 107 -52 823 737 ;
+C 82 ; WX 722 ; N R ; B 76 0 778 718 ;
+C 83 ; WX 667 ; N S ; B 81 -19 718 737 ;
+C 84 ; WX 611 ; N T ; B 140 0 751 718 ;
+C 85 ; WX 722 ; N U ; B 116 -19 804 718 ;
+C 86 ; WX 667 ; N V ; B 172 0 801 718 ;
+C 87 ; WX 944 ; N W ; B 169 0 1082 718 ;
+C 88 ; WX 667 ; N X ; B 14 0 791 718 ;
+C 89 ; WX 667 ; N Y ; B 168 0 806 718 ;
+C 90 ; WX 611 ; N Z ; B 25 0 737 718 ;
+C 91 ; WX 333 ; N bracketleft ; B 21 -196 462 722 ;
+C 92 ; WX 278 ; N backslash ; B 124 -19 307 737 ;
+C 93 ; WX 333 ; N bracketright ; B -18 -196 423 722 ;
+C 94 ; WX 584 ; N asciicircum ; B 131 323 591 698 ;
+C 95 ; WX 556 ; N underscore ; B -27 -125 540 -75 ;
+C 96 ; WX 278 ; N quoteleft ; B 165 454 361 727 ;
+C 97 ; WX 556 ; N a ; B 55 -14 583 546 ;
+C 98 ; WX 611 ; N b ; B 61 -14 645 718 ;
+C 99 ; WX 556 ; N c ; B 79 -14 599 546 ;
+C 100 ; WX 611 ; N d ; B 82 -14 704 718 ;
+C 101 ; WX 556 ; N e ; B 70 -14 593 546 ;
+C 102 ; WX 333 ; N f ; B 87 0 469 727 ; L i fi ; L l fl ;
+C 103 ; WX 611 ; N g ; B 38 -217 666 546 ;
+C 104 ; WX 611 ; N h ; B 65 0 629 718 ;
+C 105 ; WX 278 ; N i ; B 69 0 363 725 ;
+C 106 ; WX 278 ; N j ; B -42 -214 363 725 ;
+C 107 ; WX 556 ; N k ; B 69 0 670 718 ;
+C 108 ; WX 278 ; N l ; B 69 0 362 718 ;
+C 109 ; WX 889 ; N m ; B 64 0 909 546 ;
+C 110 ; WX 611 ; N n ; B 65 0 629 546 ;
+C 111 ; WX 611 ; N o ; B 82 -14 643 546 ;
+C 112 ; WX 611 ; N p ; B 18 -207 645 546 ;
+C 113 ; WX 611 ; N q ; B 80 -207 665 546 ;
+C 114 ; WX 389 ; N r ; B 64 0 489 546 ;
+C 115 ; WX 556 ; N s ; B 63 -14 584 546 ;
+C 116 ; WX 333 ; N t ; B 100 -6 422 676 ;
+C 117 ; WX 611 ; N u ; B 98 -14 658 532 ;
+C 118 ; WX 556 ; N v ; B 126 0 656 532 ;
+C 119 ; WX 778 ; N w ; B 123 0 882 532 ;
+C 120 ; WX 556 ; N x ; B 15 0 648 532 ;
+C 121 ; WX 556 ; N y ; B 42 -214 652 532 ;
+C 122 ; WX 500 ; N z ; B 20 0 583 532 ;
+C 123 ; WX 389 ; N braceleft ; B 94 -196 518 722 ;
+C 124 ; WX 280 ; N bar ; B 80 -19 353 737 ;
+C 125 ; WX 389 ; N braceright ; B -18 -196 407 722 ;
+C 126 ; WX 584 ; N asciitilde ; B 115 163 577 343 ;
+C 161 ; WX 333 ; N exclamdown ; B 50 -186 353 532 ;
+C 162 ; WX 556 ; N cent ; B 79 -118 599 628 ;
+C 163 ; WX 556 ; N sterling ; B 50 -16 635 718 ;
+C 164 ; WX 167 ; N fraction ; B -174 -19 487 710 ;
+C 165 ; WX 556 ; N yen ; B 60 0 713 698 ;
+C 166 ; WX 556 ; N florin ; B -50 -210 669 737 ;
+C 167 ; WX 556 ; N section ; B 61 -184 598 727 ;
+C 168 ; WX 556 ; N currency ; B 27 76 680 636 ;
+C 169 ; WX 238 ; N quotesingle ; B 165 447 321 718 ;
+C 170 ; WX 500 ; N quotedblleft ; B 160 454 588 727 ;
+C 171 ; WX 556 ; N guillemotleft ; B 135 76 571 484 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 130 76 353 484 ;
+C 173 ; WX 333 ; N guilsinglright ; B 99 76 322 484 ;
+C 174 ; WX 611 ; N fi ; B 87 0 696 727 ;
+C 175 ; WX 611 ; N fl ; B 87 0 695 727 ;
+C 177 ; WX 556 ; N endash ; B 48 227 627 333 ;
+C 178 ; WX 556 ; N dagger ; B 118 -171 626 718 ;
+C 179 ; WX 556 ; N daggerdbl ; B 46 -171 628 718 ;
+C 180 ; WX 278 ; N periodcentered ; B 110 172 276 334 ;
+C 182 ; WX 556 ; N paragraph ; B 98 -191 688 700 ;
+C 183 ; WX 350 ; N bullet ; B 83 194 420 524 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 41 -146 236 127 ;
+C 185 ; WX 500 ; N quotedblbase ; B 36 -146 463 127 ;
+C 186 ; WX 500 ; N quotedblright ; B 162 445 589 718 ;
+C 187 ; WX 556 ; N guillemotright ; B 104 76 540 484 ;
+C 188 ; WX 1000 ; N ellipsis ; B 92 0 939 146 ;
+C 189 ; WX 1000 ; N perthousand ; B 76 -19 1038 710 ;
+C 191 ; WX 611 ; N questiondown ; B 53 -195 559 532 ;
+C 193 ; WX 333 ; N grave ; B 136 604 353 750 ;
+C 194 ; WX 333 ; N acute ; B 236 604 515 750 ;
+C 195 ; WX 333 ; N circumflex ; B 118 604 471 750 ;
+C 196 ; WX 333 ; N tilde ; B 113 610 507 737 ;
+C 197 ; WX 333 ; N macron ; B 122 604 483 678 ;
+C 198 ; WX 333 ; N breve ; B 156 604 494 750 ;
+C 199 ; WX 333 ; N dotaccent ; B 235 614 385 729 ;
+C 200 ; WX 333 ; N dieresis ; B 137 614 482 729 ;
+C 202 ; WX 333 ; N ring ; B 200 568 420 776 ;
+C 203 ; WX 333 ; N cedilla ; B -37 -228 220 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 137 604 645 750 ;
+C 206 ; WX 333 ; N ogonek ; B 41 -228 264 0 ;
+C 207 ; WX 333 ; N caron ; B 149 604 502 750 ;
+C 208 ; WX 1000 ; N emdash ; B 48 227 1071 333 ;
+C 225 ; WX 1000 ; N AE ; B 5 0 1100 718 ;
+C 227 ; WX 370 ; N ordfeminine ; B 92 276 465 737 ;
+C 232 ; WX 611 ; N Lslash ; B 34 0 611 718 ;
+C 233 ; WX 778 ; N Oslash ; B 35 -27 894 745 ;
+C 234 ; WX 1000 ; N OE ; B 99 -19 1114 737 ;
+C 235 ; WX 365 ; N ordmasculine ; B 92 276 485 737 ;
+C 241 ; WX 889 ; N ae ; B 56 -14 923 546 ;
+C 245 ; WX 278 ; N dotlessi ; B 69 0 322 532 ;
+C 248 ; WX 278 ; N lslash ; B 40 0 407 718 ;
+C 249 ; WX 611 ; N oslash ; B 22 -29 701 560 ;
+C 250 ; WX 944 ; N oe ; B 82 -14 977 546 ;
+C 251 ; WX 611 ; N germandbls ; B 69 -14 657 731 ;
+C -1 ; WX 611 ; N Zcaron ; B 25 0 737 936 ;
+C -1 ; WX 556 ; N ccedilla ; B 79 -228 599 546 ;
+C -1 ; WX 556 ; N ydieresis ; B 42 -214 652 729 ;
+C -1 ; WX 556 ; N atilde ; B 55 -14 619 737 ;
+C -1 ; WX 278 ; N icircumflex ; B 69 0 444 750 ;
+C -1 ; WX 333 ; N threesuperior ; B 91 271 441 710 ;
+C -1 ; WX 556 ; N ecircumflex ; B 70 -14 593 750 ;
+C -1 ; WX 611 ; N thorn ; B 18 -208 645 718 ;
+C -1 ; WX 556 ; N egrave ; B 70 -14 593 750 ;
+C -1 ; WX 333 ; N twosuperior ; B 69 283 449 710 ;
+C -1 ; WX 556 ; N eacute ; B 70 -14 627 750 ;
+C -1 ; WX 611 ; N otilde ; B 82 -14 646 737 ;
+C -1 ; WX 722 ; N Aacute ; B 20 0 750 936 ;
+C -1 ; WX 611 ; N ocircumflex ; B 82 -14 643 750 ;
+C -1 ; WX 556 ; N yacute ; B 42 -214 652 750 ;
+C -1 ; WX 611 ; N udieresis ; B 98 -14 658 729 ;
+C -1 ; WX 834 ; N threequarters ; B 99 -19 839 710 ;
+C -1 ; WX 556 ; N acircumflex ; B 55 -14 583 750 ;
+C -1 ; WX 722 ; N Eth ; B 62 0 777 718 ;
+C -1 ; WX 556 ; N edieresis ; B 70 -14 594 729 ;
+C -1 ; WX 611 ; N ugrave ; B 98 -14 658 750 ;
+C -1 ; WX 1000 ; N trademark ; B 179 306 1109 718 ;
+C -1 ; WX 611 ; N ograve ; B 82 -14 643 750 ;
+C -1 ; WX 556 ; N scaron ; B 63 -14 614 750 ;
+C -1 ; WX 278 ; N Idieresis ; B 64 0 494 915 ;
+C -1 ; WX 611 ; N uacute ; B 98 -14 658 750 ;
+C -1 ; WX 556 ; N agrave ; B 55 -14 583 750 ;
+C -1 ; WX 611 ; N ntilde ; B 65 0 646 737 ;
+C -1 ; WX 556 ; N aring ; B 55 -14 583 776 ;
+C -1 ; WX 500 ; N zcaron ; B 20 0 586 750 ;
+C -1 ; WX 278 ; N Icircumflex ; B 64 0 484 936 ;
+C -1 ; WX 722 ; N Ntilde ; B 69 0 807 923 ;
+C -1 ; WX 611 ; N ucircumflex ; B 98 -14 658 750 ;
+C -1 ; WX 667 ; N Ecircumflex ; B 76 0 757 936 ;
+C -1 ; WX 278 ; N Iacute ; B 64 0 528 936 ;
+C -1 ; WX 722 ; N Ccedilla ; B 107 -228 789 737 ;
+C -1 ; WX 778 ; N Odieresis ; B 107 -19 823 915 ;
+C -1 ; WX 667 ; N Scaron ; B 81 -19 718 936 ;
+C -1 ; WX 667 ; N Edieresis ; B 76 0 757 915 ;
+C -1 ; WX 278 ; N Igrave ; B 64 0 367 936 ;
+C -1 ; WX 556 ; N adieresis ; B 55 -14 594 729 ;
+C -1 ; WX 778 ; N Ograve ; B 107 -19 823 936 ;
+C -1 ; WX 667 ; N Egrave ; B 76 0 757 936 ;
+C -1 ; WX 667 ; N Ydieresis ; B 168 0 806 915 ;
+C -1 ; WX 737 ; N registered ; B 55 -19 834 737 ;
+C -1 ; WX 778 ; N Otilde ; B 107 -19 823 923 ;
+C -1 ; WX 834 ; N onequarter ; B 132 -19 806 710 ;
+C -1 ; WX 722 ; N Ugrave ; B 116 -19 804 936 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 116 -19 804 936 ;
+C -1 ; WX 667 ; N Thorn ; B 76 0 716 718 ;
+C -1 ; WX 584 ; N divide ; B 82 -42 610 548 ;
+C -1 ; WX 722 ; N Atilde ; B 20 0 741 923 ;
+C -1 ; WX 722 ; N Uacute ; B 116 -19 804 936 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 107 -19 823 936 ;
+C -1 ; WX 584 ; N logicalnot ; B 105 108 633 419 ;
+C -1 ; WX 722 ; N Aring ; B 20 0 702 962 ;
+C -1 ; WX 278 ; N idieresis ; B 69 0 455 729 ;
+C -1 ; WX 278 ; N iacute ; B 69 0 488 750 ;
+C -1 ; WX 556 ; N aacute ; B 55 -14 627 750 ;
+C -1 ; WX 584 ; N plusminus ; B 40 0 625 506 ;
+C -1 ; WX 584 ; N multiply ; B 57 1 635 505 ;
+C -1 ; WX 722 ; N Udieresis ; B 116 -19 804 915 ;
+C -1 ; WX 584 ; N minus ; B 82 197 610 309 ;
+C -1 ; WX 333 ; N onesuperior ; B 148 283 388 710 ;
+C -1 ; WX 667 ; N Eacute ; B 76 0 757 936 ;
+C -1 ; WX 722 ; N Acircumflex ; B 20 0 706 936 ;
+C -1 ; WX 737 ; N copyright ; B 56 -19 835 737 ;
+C -1 ; WX 722 ; N Agrave ; B 20 0 702 936 ;
+C -1 ; WX 611 ; N odieresis ; B 82 -14 643 729 ;
+C -1 ; WX 611 ; N oacute ; B 82 -14 654 750 ;
+C -1 ; WX 400 ; N degree ; B 175 426 467 712 ;
+C -1 ; WX 278 ; N igrave ; B 69 0 326 750 ;
+C -1 ; WX 611 ; N mu ; B 22 -207 658 532 ;
+C -1 ; WX 778 ; N Oacute ; B 107 -19 823 936 ;
+C -1 ; WX 611 ; N eth ; B 82 -14 670 737 ;
+C -1 ; WX 722 ; N Adieresis ; B 20 0 716 915 ;
+C -1 ; WX 667 ; N Yacute ; B 168 0 806 936 ;
+C -1 ; WX 280 ; N brokenbar ; B 80 -19 353 737 ;
+C -1 ; WX 834 ; N onehalf ; B 132 -19 858 710 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 209
+
+KPX A y -30
+KPX A w -30
+KPX A v -40
+KPX A u -30
+KPX A Y -110
+KPX A W -60
+KPX A V -80
+KPX A U -50
+KPX A T -90
+KPX A Q -40
+KPX A O -40
+KPX A G -50
+KPX A C -40
+
+KPX B U -10
+KPX B A -30
+
+KPX D period -30
+KPX D comma -30
+KPX D Y -70
+KPX D W -40
+KPX D V -40
+KPX D A -40
+
+KPX F period -100
+KPX F comma -100
+KPX F a -20
+KPX F A -80
+
+KPX J u -20
+KPX J period -20
+KPX J comma -20
+KPX J A -20
+
+KPX K y -40
+KPX K u -30
+KPX K o -35
+KPX K e -15
+KPX K O -30
+
+KPX L y -30
+KPX L quoteright -140
+KPX L quotedblright -140
+KPX L Y -120
+KPX L W -80
+KPX L V -110
+KPX L T -90
+
+KPX O period -40
+KPX O comma -40
+KPX O Y -70
+KPX O X -50
+KPX O W -50
+KPX O V -50
+KPX O T -40
+KPX O A -50
+
+KPX P period -120
+KPX P o -40
+KPX P e -30
+KPX P comma -120
+KPX P a -30
+KPX P A -100
+
+KPX Q period 20
+KPX Q comma 20
+KPX Q U -10
+
+KPX R Y -50
+KPX R W -40
+KPX R V -50
+KPX R U -20
+KPX R T -20
+KPX R O -20
+
+KPX T y -60
+KPX T w -60
+KPX T u -90
+KPX T semicolon -40
+KPX T r -80
+KPX T period -80
+KPX T o -80
+KPX T hyphen -120
+KPX T e -60
+KPX T comma -80
+KPX T colon -40
+KPX T a -80
+KPX T O -40
+KPX T A -90
+
+KPX U period -30
+KPX U comma -30
+KPX U A -50
+
+KPX V u -60
+KPX V semicolon -40
+KPX V period -120
+KPX V o -90
+KPX V hyphen -80
+KPX V e -50
+KPX V comma -120
+KPX V colon -40
+KPX V a -60
+KPX V O -50
+KPX V G -50
+KPX V A -80
+
+KPX W y -20
+KPX W u -45
+KPX W semicolon -10
+KPX W period -80
+KPX W o -60
+KPX W hyphen -40
+KPX W e -35
+KPX W comma -80
+KPX W colon -10
+KPX W a -40
+KPX W O -20
+KPX W A -60
+
+KPX Y u -100
+KPX Y semicolon -50
+KPX Y period -100
+KPX Y o -100
+KPX Y e -80
+KPX Y comma -100
+KPX Y colon -50
+KPX Y a -90
+KPX Y O -70
+KPX Y A -110
+
+KPX a y -20
+KPX a w -15
+KPX a v -15
+KPX a g -10
+
+KPX b y -20
+KPX b v -20
+KPX b u -20
+KPX b l -10
+
+KPX c y -10
+KPX c l -20
+KPX c k -20
+KPX c h -10
+
+KPX colon space -40
+
+KPX comma space -40
+KPX comma quoteright -120
+KPX comma quotedblright -120
+
+KPX d y -15
+KPX d w -15
+KPX d v -15
+KPX d d -10
+
+KPX e y -15
+KPX e x -15
+KPX e w -15
+KPX e v -15
+KPX e period 20
+KPX e comma 10
+
+KPX f quoteright 30
+KPX f quotedblright 30
+KPX f period -10
+KPX f o -20
+KPX f e -10
+KPX f comma -10
+
+KPX g g -10
+KPX g e 10
+
+KPX h y -20
+
+KPX k o -15
+
+KPX l y -15
+KPX l w -15
+
+KPX m y -30
+KPX m u -20
+
+KPX n y -20
+KPX n v -40
+KPX n u -10
+
+KPX o y -20
+KPX o x -30
+KPX o w -15
+KPX o v -20
+
+KPX p y -15
+
+KPX period space -40
+KPX period quoteright -120
+KPX period quotedblright -120
+
+KPX quotedblright space -80
+
+KPX quoteleft quoteleft -46
+
+KPX quoteright v -20
+KPX quoteright space -80
+KPX quoteright s -60
+KPX quoteright r -40
+KPX quoteright quoteright -46
+KPX quoteright l -20
+KPX quoteright d -80
+
+KPX r y 10
+KPX r v 10
+KPX r t 20
+KPX r s -15
+KPX r q -20
+KPX r period -60
+KPX r o -20
+KPX r hyphen -20
+KPX r g -15
+KPX r d -20
+KPX r comma -60
+KPX r c -20
+
+KPX s w -15
+
+KPX semicolon space -40
+
+KPX space quoteleft -60
+KPX space quotedblleft -80
+KPX space Y -120
+KPX space W -80
+KPX space V -80
+KPX space T -100
+
+KPX v period -80
+KPX v o -30
+KPX v comma -80
+KPX v a -20
+
+KPX w period -40
+KPX w o -20
+KPX w comma -40
+
+KPX x e -10
+
+KPX y period -80
+KPX y o -25
+KPX y e -10
+KPX y comma -80
+KPX y a -30
+
+KPX z e 10
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 235 186 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 235 186 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 235 186 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 235 186 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 235 186 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 235 186 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 215 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 207 186 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 207 186 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 207 186 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 207 186 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 13 186 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 13 186 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 13 186 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 13 186 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 235 186 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 263 186 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 263 186 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 263 186 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 263 186 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 263 186 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 207 186 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 235 186 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 235 186 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 235 186 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 235 186 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 207 186 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 207 186 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 179 186 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 112 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 112 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 112 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 112 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 112 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 112 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 132 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 112 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 112 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 112 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 112 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -27 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 139 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 139 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 139 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 139 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 139 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 139 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 112 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 139 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 139 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 112 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 112 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 84 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-Bl b/font/He-Bl
new file mode 100644
index 0000000..c28daaf
--- /dev/null
+++ b/font/He-Bl
@@ -0,0 +1,445 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1984 Adobe Systems Incorporated. 	All Rights Reserved.
+Comment Creation Date:Thu Feb 12 17:25:06 PST 1987
+FontName Helvetica-Black
+EncodingScheme AdobeStandardEncoding
+FullName Helvetica Black
+FamilyName Helvetica
+Weight Black
+ItalicAngle 0.0
+IsFixedPitch false
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.001
+Notice Helvetica is a trademark of Allied Corporation.
+FontBBox -167 -232 1007 1013
+CapHeight 720
+XHeight 524
+Descender -178
+Ascender 720
+StartCharMetrics 228
+C 32 ; WX 333 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 60 0 273 720 ;
+C 34 ; WX 500 ; N quotedbl ; B 99 449 401 720 ;
+C 35 ; WX 660 ; N numbersign ; B 84 0 576 705 ;
+C 36 ; WX 667 ; N dollar ; B 23 -112 636 777 ;
+C 37 ; WX 1000 ; N percent ; B 6 -31 993 747 ;
+C 38 ; WX 889 ; N ampersand ; B 45 -19 844 720 ;
+C 39 ; WX 278 ; N quoteright ; B 42 359 225 720 ;
+C 40 ; WX 389 ; N parenleft ; B 47 -178 334 720 ;
+C 41 ; WX 389 ; N parenright ; B 55 -178 342 720 ;
+C 42 ; WX 556 ; N asterisk ; B 54 295 502 720 ;
+C 43 ; WX 660 ; N plus ; B 78 0 582 505 ;
+C 44 ; WX 333 ; N comma ; B 58 -176 270 206 ;
+C 45 ; WX 333 ; N hyphen ; B 32 165 300 347 ;
+C 46 ; WX 333 ; N period ; B 60 0 272 206 ;
+C 47 ; WX 278 ; N slash ; B -32 -90 310 720 ;
+C 48 ; WX 667 ; N zero ; B 28 -15 639 715 ;
+C 49 ; WX 667 ; N one ; B 98 0 469 715 ;
+C 50 ; WX 667 ; N two ; B 56 0 651 715 ;
+C 51 ; WX 667 ; N three ; B 35 -15 632 715 ;
+C 52 ; WX 667 ; N four ; B 25 0 636 705 ;
+C 53 ; WX 667 ; N five ; B 23 -15 633 705 ;
+C 54 ; WX 667 ; N six ; B 27 -15 640 715 ;
+C 55 ; WX 667 ; N seven ; B 56 0 623 705 ;
+C 56 ; WX 667 ; N eight ; B 29 -15 637 715 ;
+C 57 ; WX 667 ; N nine ; B 25 -15 638 715 ;
+C 58 ; WX 333 ; N colon ; B 60 0 272 524 ;
+C 59 ; WX 333 ; N semicolon ; B 58 -176 270 524 ;
+C 60 ; WX 660 ; N less ; B 75 -20 584 532 ;
+C 61 ; WX 660 ; N equal ; B 78 100 582 412 ;
+C 62 ; WX 660 ; N greater ; B 74 -20 583 532 ;
+C 63 ; WX 611 ; N question ; B 27 0 581 739 ;
+C 64 ; WX 740 ; N at ; B 5 -19 734 739 ;
+C 65 ; WX 778 ; N A ; B 11 0 767 720 ;
+C 66 ; WX 778 ; N B ; B 72 0 733 720 ;
+C 67 ; WX 778 ; N C ; B 22 -19 748 739 ;
+C 68 ; WX 778 ; N D ; B 65 0 757 720 ;
+C 69 ; WX 722 ; N E ; B 76 0 677 720 ;
+C 70 ; WX 667 ; N F ; B 74 0 634 720 ;
+C 71 ; WX 833 ; N G ; B 39 -19 766 739 ;
+C 72 ; WX 833 ; N H ; B 69 0 764 720 ;
+C 73 ; WX 389 ; N I ; B 76 0 312 720 ;
+C 74 ; WX 667 ; N J ; B 25 -19 595 720 ;
+C 75 ; WX 833 ; N K ; B 75 0 823 720 ;
+C 76 ; WX 667 ; N L ; B 76 0 636 720 ;
+C 77 ; WX 944 ; N M ; B 60 0 884 720 ;
+C 78 ; WX 833 ; N N ; B 69 0 764 720 ;
+C 79 ; WX 833 ; N O ; B 39 -19 794 739 ;
+C 80 ; WX 722 ; N P ; B 57 0 711 720 ;
+C 81 ; WX 833 ; N Q ; B 39 -81 794 739 ;
+C 82 ; WX 778 ; N R ; B 61 0 746 720 ;
+C 83 ; WX 722 ; N S ; B 33 -19 689 739 ;
+C 84 ; WX 722 ; N T ; B 31 0 691 720 ;
+C 85 ; WX 833 ; N U ; B 70 -19 763 720 ;
+C 86 ; WX 778 ; N V ; B 22 0 755 720 ;
+C 87 ; WX 1000 ; N W ; B 5 0 994 720 ;
+C 88 ; WX 778 ; N X ; B 8 0 770 720 ;
+C 89 ; WX 778 ; N Y ; B 3 0 775 720 ;
+C 90 ; WX 722 ; N Z ; B 36 0 685 720 ;
+C 91 ; WX 389 ; N bracketleft ; B 44 -178 356 720 ;
+C 92 ; WX 278 ; N backslash ; B -107 0 385 720 ;
+C 93 ; WX 389 ; N bracketright ; B 33 -178 345 720 ;
+C 94 ; WX 660 ; N asciicircum ; B 90 291 570 715 ;
+C 95 ; WX 500 ; N underscore ; B 0 -119 500 -61 ;
+C 96 ; WX 278 ; N quoteleft ; B 53 378 236 739 ;
+C 97 ; WX 667 ; N a ; B 25 -15 634 539 ;
+C 98 ; WX 667 ; N b ; B 48 -15 635 720 ;
+C 99 ; WX 667 ; N c ; B 32 -15 622 539 ;
+C 100 ; WX 667 ; N d ; B 33 -15 619 720 ;
+C 101 ; WX 667 ; N e ; B 31 -15 636 539 ;
+C 102 ; WX 389 ; N f ; B 9 0 373 739 ; L i fi ; L l fl ;
+C 103 ; WX 667 ; N g ; B 34 -178 610 539 ;
+C 104 ; WX 667 ; N h ; B 48 0 618 720 ;
+C 105 ; WX 333 ; N i ; B 62 0 270 739 ;
+C 106 ; WX 333 ; N j ; B -20 -178 282 739 ;
+C 107 ; WX 667 ; N k ; B 53 0 662 720 ;
+C 108 ; WX 333 ; N l ; B 62 0 270 720 ;
+C 109 ; WX 1000 ; N m ; B 45 0 955 539 ;
+C 110 ; WX 667 ; N n ; B 48 0 618 539 ;
+C 111 ; WX 667 ; N o ; B 35 -15 631 539 ;
+C 112 ; WX 667 ; N p ; B 44 -178 631 539 ;
+C 113 ; WX 667 ; N q ; B 27 -178 616 539 ;
+C 114 ; WX 444 ; N r ; B 52 0 431 538 ;
+C 115 ; WX 611 ; N s ; B 33 -15 578 539 ;
+C 116 ; WX 444 ; N t ; B 14 -4 396 687 ;
+C 117 ; WX 667 ; N u ; B 48 -15 618 524 ;
+C 118 ; WX 611 ; N v ; B 10 0 601 524 ;
+C 119 ; WX 944 ; N w ; B 21 0 923 524 ;
+C 120 ; WX 667 ; N x ; B 27 0 639 524 ;
+C 121 ; WX 611 ; N y ; B 6 -178 598 524 ;
+C 122 ; WX 556 ; N z ; B 26 0 530 524 ;
+C 123 ; WX 389 ; N braceleft ; B 25 -181 367 741 ;
+C 124 ; WX 278 ; N bar ; B 79 0 198 739 ;
+C 125 ; WX 389 ; N braceright ; B 22 -180 364 742 ;
+C 126 ; WX 660 ; N asciitilde ; B 78 153 582 359 ;
+C 161 ; WX 333 ; N exclamdown ; B 60 -193 273 524 ;
+C 162 ; WX 667 ; N cent ; B 35 -147 628 655 ;
+C 163 ; WX 667 ; N sterling ; B 33 -12 644 727 ;
+C 164 ; WX 167 ; N fraction ; B -167 -15 334 715 ;
+C 165 ; WX 667 ; N yen ; B -1 0 668 720 ;
+C 166 ; WX 667 ; N florin ; B 48 -184 622 747 ;
+C 167 ; WX 667 ; N section ; B 73 -171 593 739 ;
+C 168 ; WX 660 ; N currency ; B 76 58 583 563 ;
+C 169 ; WX 278 ; N quotesingle ; B 79 449 198 720 ;
+C 170 ; WX 500 ; N quotedblleft ; B 41 378 471 739 ;
+C 171 ; WX 667 ; N guillemotleft ; B 120 64 547 448 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 75 64 258 448 ;
+C 173 ; WX 333 ; N guilsinglright ; B 75 64 258 448 ;
+C 174 ; WX 667 ; N fi ; B 9 0 622 739 ;
+C 175 ; WX 667 ; N fl ; B 9 0 622 739 ;
+C 177 ; WX 500 ; N endash ; B 0 187 500 325 ;
+C 178 ; WX 667 ; N dagger ; B 82 -178 584 720 ;
+C 179 ; WX 667 ; N daggerdbl ; B 82 -178 584 720 ;
+C 180 ; WX 333 ; N periodcentered ; B 36 126 296 386 ;
+C 182 ; WX 850 ; N paragraph ; B 54 -178 707 720 ;
+C 183 ; WX 500 ; N bullet ; B 81 192 418 529 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 42 -178 225 183 ;
+C 185 ; WX 500 ; N quotedblbase ; B 29 -178 459 183 ;
+C 186 ; WX 500 ; N quotedblright ; B 29 359 459 720 ;
+C 187 ; WX 667 ; N guillemotright ; B 120 64 547 448 ;
+C 188 ; WX 1000 ; N ellipsis ; B 61 0 939 206 ;
+C 189 ; WX 1000 ; N perthousand ; B -7 -32 1007 751 ;
+C 191 ; WX 611 ; N questiondown ; B 30 -216 584 524 ;
+C 193 ; WX 333 ; N grave ; B -36 591 272 739 ;
+C 194 ; WX 333 ; N acute ; B 66 591 375 739 ;
+C 195 ; WX 333 ; N circumflex ; B -34 591 373 739 ;
+C 196 ; WX 333 ; N tilde ; B -27 590 365 731 ;
+C 197 ; WX 333 ; N macron ; B -19 619 358 709 ;
+C 198 ; WX 333 ; N breve ; B -12 590 351 743 ;
+C 199 ; WX 333 ; N dotaccent ; B 82 596 251 726 ;
+C 200 ; WX 333 ; N dieresis ; B -29 596 368 726 ;
+C 202 ; WX 333 ; N ring ; B 54 593 279 817 ;
+C 203 ; WX 333 ; N cedilla ; B 28 -232 287 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 66 591 627 739 ;
+C 206 ; WX 333 ; N ogonek ; B 73 -205 278 0 ;
+C 207 ; WX 333 ; N caron ; B -34 591 373 739 ;
+C 208 ; WX 1000 ; N emdash ; B 0 187 1000 325 ;
+C 225 ; WX 1000 ; N AE ; B 3 0 981 720 ;
+C 227 ; WX 400 ; N ordfeminine ; B 2 262 398 739 ;
+C 232 ; WX 667 ; N Lslash ; B -20 0 627 720 ;
+C 233 ; WX 833 ; N Oslash ; B 39 -76 794 784 ;
+C 234 ; WX 1000 ; N OE ; B 6 -19 981 739 ;
+C 235 ; WX 400 ; N ordmasculine ; B 6 262 394 739 ;
+C 241 ; WX 1000 ; N ae ; B 38 -15 957 539 ;
+C 245 ; WX 333 ; N dotlessi ; B 62 0 270 524 ;
+C 248 ; WX 333 ; N lslash ; B -1 0 333 720 ;
+C 249 ; WX 667 ; N oslash ; B 35 -72 631 581 ;
+C 250 ; WX 1000 ; N oe ; B 35 -15 961 539 ;
+C 251 ; WX 667 ; N germandbls ; B 48 -15 627 739 ;
+C -1 ; WX 778 ; N Aacute ; B 11 0 767 935 ;
+C -1 ; WX 778 ; N Acircumflex ; B 11 0 767 935 ;
+C -1 ; WX 778 ; N Adieresis ; B 11 0 767 922 ;
+C -1 ; WX 778 ; N Agrave ; B 11 0 767 935 ;
+C -1 ; WX 778 ; N Aring ; B 11 0 767 1013 ;
+C -1 ; WX 778 ; N Atilde ; B 11 0 767 927 ;
+C -1 ; WX 778 ; N Ccedilla ; B 22 -232 748 739 ;
+C -1 ; WX 722 ; N Eacute ; B 76 0 677 935 ;
+C -1 ; WX 722 ; N Ecircumflex ; B 76 0 677 935 ;
+C -1 ; WX 722 ; N Edieresis ; B 76 0 677 922 ;
+C -1 ; WX 722 ; N Egrave ; B 76 0 677 935 ;
+C -1 ; WX 778 ; N Eth ; B 0 0 757 720 ;
+C -1 ; WX 389 ; N Iacute ; B 76 0 403 935 ;
+C -1 ; WX 389 ; N Icircumflex ; B -6 0 401 935 ;
+C -1 ; WX 389 ; N Idieresis ; B -1 0 396 922 ;
+C -1 ; WX 389 ; N Igrave ; B -8 0 312 935 ;
+C -1 ; WX 833 ; N Ntilde ; B 69 0 764 927 ;
+C -1 ; WX 833 ; N Oacute ; B 39 -19 794 935 ;
+C -1 ; WX 833 ; N Ocircumflex ; B 39 -19 794 935 ;
+C -1 ; WX 833 ; N Odieresis ; B 39 -19 794 922 ;
+C -1 ; WX 833 ; N Ograve ; B 39 -19 794 935 ;
+C -1 ; WX 833 ; N Otilde ; B 39 -19 794 927 ;
+C -1 ; WX 722 ; N Scaron ; B 33 -19 689 935 ;
+C -1 ; WX 722 ; N Thorn ; B 57 0 711 720 ;
+C -1 ; WX 833 ; N Uacute ; B 70 -19 763 935 ;
+C -1 ; WX 833 ; N Ucircumflex ; B 70 -19 763 935 ;
+C -1 ; WX 833 ; N Udieresis ; B 70 -19 763 922 ;
+C -1 ; WX 833 ; N Ugrave ; B 70 -19 763 935 ;
+C -1 ; WX 778 ; N Yacute ; B 3 0 775 935 ;
+C -1 ; WX 778 ; N Ydieresis ; B 3 0 775 922 ;
+C -1 ; WX 722 ; N Zcaron ; B 36 0 685 935 ;
+C -1 ; WX 667 ; N aacute ; B 25 -15 634 739 ;
+C -1 ; WX 667 ; N acircumflex ; B 25 -15 634 739 ;
+C -1 ; WX 667 ; N adieresis ; B 25 -15 634 726 ;
+C -1 ; WX 667 ; N agrave ; B 25 -15 634 739 ;
+C -1 ; WX 667 ; N aring ; B 25 -15 634 817 ;
+C -1 ; WX 667 ; N atilde ; B 25 -15 634 731 ;
+C -1 ; WX 278 ; N brokenbar ; B 79 0 198 739 ;
+C -1 ; WX 667 ; N ccedilla ; B 32 -232 622 539 ;
+C -1 ; WX 800 ; N copyright ; B 21 -19 779 739 ;
+C -1 ; WX 400 ; N degree ; B 50 415 350 715 ;
+C -1 ; WX 660 ; N divide ; B 78 7 582 505 ;
+C -1 ; WX 667 ; N eacute ; B 31 -15 636 739 ;
+C -1 ; WX 667 ; N ecircumflex ; B 31 -15 636 739 ;
+C -1 ; WX 667 ; N edieresis ; B 31 -15 636 726 ;
+C -1 ; WX 667 ; N egrave ; B 31 -15 636 739 ;
+C -1 ; WX 667 ; N eth ; B 35 -15 631 739 ;
+C -1 ; WX 333 ; N iacute ; B 62 0 375 739 ;
+C -1 ; WX 333 ; N icircumflex ; B -34 0 373 739 ;
+C -1 ; WX 333 ; N idieresis ; B -29 0 368 726 ;
+C -1 ; WX 333 ; N igrave ; B -36 0 272 739 ;
+C -1 ; WX 660 ; N logicalnot ; B 78 120 582 412 ;
+C -1 ; WX 660 ; N minus ; B 78 198 582 314 ;
+C -1 ; WX 667 ; N mu ; B 48 -178 618 524 ;
+C -1 ; WX 660 ; N multiply ; B 79 3 581 505 ;
+C -1 ; WX 667 ; N ntilde ; B 48 0 618 731 ;
+C -1 ; WX 667 ; N oacute ; B 35 -15 631 739 ;
+C -1 ; WX 667 ; N ocircumflex ; B 35 -15 631 739 ;
+C -1 ; WX 667 ; N odieresis ; B 35 -15 631 726 ;
+C -1 ; WX 667 ; N ograve ; B 35 -15 631 739 ;
+C -1 ; WX 1000 ; N onehalf ; B 40 -15 960 739 ;
+C -1 ; WX 1000 ; N onequarter ; B 40 -15 960 739 ;
+C -1 ; WX 400 ; N onesuperior ; B 80 310 321 739 ;
+C -1 ; WX 667 ; N otilde ; B 35 -15 631 731 ;
+C -1 ; WX 660 ; N plusminus ; B 78 0 582 603 ;
+C -1 ; WX 800 ; N registered ; B 21 -19 779 739 ;
+C -1 ; WX 611 ; N scaron ; B 33 -15 578 739 ;
+C -1 ; WX 667 ; N thorn ; B 44 -178 631 739 ;
+C -1 ; WX 1000 ; N threequarters ; B 40 -15 960 715 ;
+C -1 ; WX 400 ; N threesuperior ; B 6 277 395 715 ;
+C -1 ; WX 950 ; N trademark ; B 28 316 886 720 ;
+C -1 ; WX 400 ; N twosuperior ; B 7 310 394 739 ;
+C -1 ; WX 667 ; N uacute ; B 48 -15 618 739 ;
+C -1 ; WX 667 ; N ucircumflex ; B 48 -15 618 739 ;
+C -1 ; WX 667 ; N udieresis ; B 48 -15 618 726 ;
+C -1 ; WX 667 ; N ugrave ; B 48 -15 618 739 ;
+C -1 ; WX 611 ; N yacute ; B 6 -178 598 739 ;
+C -1 ; WX 611 ; N ydieresis ; B 6 -178 598 726 ;
+C -1 ; WX 556 ; N zcaron ; B 26 0 530 739 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -74
+KPX A Y -74
+KPX A W -37
+KPX A V -74
+KPX A T -92
+
+KPX F period -129
+KPX F comma -129
+KPX F A -55
+
+KPX L y -37
+KPX L quoteright -74
+KPX L Y -92
+KPX L W -55
+KPX L V -92
+KPX L T -92
+
+KPX P period -129
+KPX P comma -129
+KPX P A -74
+
+KPX R y 0
+KPX R Y -37
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -92
+KPX T w -92
+KPX T u -92
+KPX T semicolon -68
+KPX T s -111
+KPX T r -92
+KPX T period -111
+KPX T o -111
+KPX T i 0
+KPX T hyphen -100
+KPX T e -111
+KPX T comma -111
+KPX T colon -68
+KPX T c -111
+KPX T a -111
+KPX T A -74
+
+KPX V y -18
+KPX V u -37
+KPX V semicolon -74
+KPX V r -37
+KPX V period -129
+KPX V o -55
+KPX V i -18
+KPX V hyphen -55
+KPX V e -55
+KPX V comma -129
+KPX V colon -74
+KPX V a -55
+KPX V A -74
+
+KPX W y 0
+KPX W u -18
+KPX W semicolon -18
+KPX W r -18
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen 0
+KPX W e -18
+KPX W comma -74
+KPX W colon -18
+KPX W a -37
+KPX W A -37
+
+KPX Y v -55
+KPX Y u -74
+KPX Y semicolon -74
+KPX Y q -92
+KPX Y period -111
+KPX Y p -74
+KPX Y o -92
+KPX Y i -20
+KPX Y hyphen -92
+KPX Y e -92
+KPX Y comma -111
+KPX Y colon -74
+KPX Y a -92
+KPX Y A -74
+
+KPX f quoteright 24
+KPX f f -18
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t -18
+KPX quoteright s -62
+KPX quoteright quoteright -18
+
+KPX r z 0
+KPX r y 18
+KPX r x 0
+KPX r w 0
+KPX r v 18
+KPX r u 0
+KPX r t 18
+KPX r r 0
+KPX r quoteright 0
+KPX r q -18
+KPX r period -92
+KPX r o -18
+KPX r n 18
+KPX r m 18
+KPX r hyphen -12
+KPX r h 0
+KPX r g 18
+KPX r f 18
+KPX r e -18
+KPX r d -18
+KPX r comma -92
+KPX r c -18
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -92
+KPX y comma -92
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 194 196 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 111 0 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 194 196 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 139 0 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 222 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 167 0 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 222 196 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 139 0 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 222 196 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 139 0 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 250 196 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 250 196 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 250 196 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 250 196 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 167 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 167 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 167 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 167 0 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 28 196 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 28 196 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 28 196 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 196 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 194 196 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 194 196 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 194 196 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 194 196 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 167 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 167 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 167 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 167 0 ;
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 222 196 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 222 196 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 222 196 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 222 196 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 167 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 167 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 167 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 167 0 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 250 196 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 250 196 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 250 196 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 250 196 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 167 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 167 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 167 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 167 0 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 222 196 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 167 0 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 250 196 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 167 0 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 250 196 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 167 0 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 222 196 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 167 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-BlO b/font/He-BlO
new file mode 100644
index 0000000..913d2cc
--- /dev/null
+++ b/font/He-BlO
@@ -0,0 +1,445 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1984 Adobe Systems Incorporated. 	All Rights Reserved.
+Comment Creation Date:Fri Feb 13 09:53:49 PST 1987
+FontName Helvetica-BlackOblique
+EncodingScheme AdobeStandardEncoding
+FullName Helvetica.Black Oblique
+FamilyName Helvetica
+Weight Black
+ItalicAngle -10.0
+IsFixedPitch false
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.001
+Notice Helvetica is a trademark of Allied Corporation.
+FontBBox -170 -232 1121 1013
+CapHeight 720
+XHeight 524
+Descender -178
+Ascender 720
+StartCharMetrics 228
+C 32 ; WX 333 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 61 0 400 720 ;
+C 34 ; WX 500 ; N quotedbl ; B 178 449 528 720 ;
+C 35 ; WX 660 ; N numbersign ; B 123 0 663 705 ;
+C 36 ; WX 667 ; N dollar ; B 59 -112 718 777 ;
+C 37 ; WX 1000 ; N percent ; B 95 -31 1031 747 ;
+C 38 ; WX 889 ; N ampersand ; B 74 -19 862 720 ;
+C 39 ; WX 278 ; N quoteright ; B 105 359 352 720 ;
+C 40 ; WX 389 ; N parenleft ; B 80 -178 461 720 ;
+C 41 ; WX 389 ; N parenright ; B 24 -178 405 720 ;
+C 42 ; WX 556 ; N asterisk ; B 145 295 595 720 ;
+C 43 ; WX 660 ; N plus ; B 113 0 637 505 ;
+C 44 ; WX 333 ; N comma ; B 27 -176 306 206 ;
+C 45 ; WX 333 ; N hyphen ; B 61 165 361 347 ;
+C 46 ; WX 333 ; N period ; B 60 0 308 206 ;
+C 47 ; WX 278 ; N slash ; B -48 -90 437 720 ;
+C 48 ; WX 667 ; N zero ; B 81 -15 711 715 ;
+C 49 ; WX 667 ; N one ; B 170 0 595 715 ;
+C 50 ; WX 667 ; N two ; B 56 0 741 715 ;
+C 51 ; WX 667 ; N three ; B 72 -15 707 715 ;
+C 52 ; WX 667 ; N four ; B 51 0 689 705 ;
+C 53 ; WX 667 ; N five ; B 55 -15 700 705 ;
+C 54 ; WX 667 ; N six ; B 79 -15 716 715 ;
+C 55 ; WX 667 ; N seven ; B 150 0 747 705 ;
+C 56 ; WX 667 ; N eight ; B 63 -15 706 715 ;
+C 57 ; WX 667 ; N nine ; B 72 -15 709 715 ;
+C 58 ; WX 333 ; N colon ; B 60 0 364 524 ;
+C 59 ; WX 333 ; N semicolon ; B 27 -176 362 524 ;
+C 60 ; WX 660 ; N less ; B 111 -20 678 532 ;
+C 61 ; WX 660 ; N equal ; B 96 100 655 412 ;
+C 62 ; WX 660 ; N greater ; B 70 -20 637 532 ;
+C 63 ; WX 611 ; N question ; B 116 0 678 739 ;
+C 64 ; WX 740 ; N at ; B 62 -19 814 739 ;
+C 65 ; WX 778 ; N A ; B 11 0 767 720 ;
+C 66 ; WX 778 ; N B ; B 72 0 805 720 ;
+C 67 ; WX 778 ; N C ; B 78 -19 823 739 ;
+C 68 ; WX 778 ; N D ; B 65 0 831 720 ;
+C 69 ; WX 722 ; N E ; B 76 0 790 720 ;
+C 70 ; WX 667 ; N F ; B 74 0 761 720 ;
+C 71 ; WX 833 ; N G ; B 93 -19 840 739 ;
+C 72 ; WX 833 ; N H ; B 69 0 891 720 ;
+C 73 ; WX 389 ; N I ; B 76 0 439 720 ;
+C 74 ; WX 667 ; N J ; B 64 -19 722 720 ;
+C 75 ; WX 833 ; N K ; B 75 0 922 720 ;
+C 76 ; WX 667 ; N L ; B 76 0 666 720 ;
+C 77 ; WX 944 ; N M ; B 60 0 1011 720 ;
+C 78 ; WX 833 ; N N ; B 69 0 891 720 ;
+C 79 ; WX 833 ; N O ; B 95 -19 865 739 ;
+C 80 ; WX 722 ; N P ; B 57 0 800 720 ;
+C 81 ; WX 833 ; N Q ; B 95 -81 865 739 ;
+C 82 ; WX 778 ; N R ; B 61 0 816 720 ;
+C 83 ; WX 722 ; N S ; B 70 -19 759 739 ;
+C 84 ; WX 722 ; N T ; B 125 0 818 720 ;
+C 85 ; WX 833 ; N U ; B 116 -19 890 720 ;
+C 86 ; WX 778 ; N V ; B 149 0 882 720 ;
+C 87 ; WX 1000 ; N W ; B 132 0 1121 720 ;
+C 88 ; WX 778 ; N X ; B 8 0 895 720 ;
+C 89 ; WX 778 ; N Y ; B 130 0 902 720 ;
+C 90 ; WX 722 ; N Z ; B 36 0 798 720 ;
+C 91 ; WX 389 ; N bracketleft ; B 13 -178 483 720 ;
+C 92 ; WX 278 ; N backslash ; B 20 0 385 720 ;
+C 93 ; WX 389 ; N bracketright ; B 2 -178 472 720 ;
+C 94 ; WX 660 ; N asciicircum ; B 150 291 630 715 ;
+C 95 ; WX 500 ; N underscore ; B -21 -119 489 -61 ;
+C 96 ; WX 278 ; N quoteleft ; B 120 378 366 739 ;
+C 97 ; WX 667 ; N a ; B 47 -15 672 539 ;
+C 98 ; WX 667 ; N b ; B 48 -15 688 720 ;
+C 99 ; WX 667 ; N c ; B 72 -15 676 539 ;
+C 100 ; WX 667 ; N d ; B 72 -15 746 720 ;
+C 101 ; WX 667 ; N e ; B 71 -15 682 539 ;
+C 102 ; WX 389 ; N f ; B 78 0 503 739 ; L i fi ; L l fl ;
+C 103 ; WX 667 ; N g ; B 56 -178 702 539 ;
+C 104 ; WX 667 ; N h ; B 48 0 680 720 ;
+C 105 ; WX 333 ; N i ; B 62 0 400 739 ;
+C 106 ; WX 333 ; N j ; B -51 -178 412 739 ;
+C 107 ; WX 667 ; N k ; B 53 0 729 720 ;
+C 108 ; WX 333 ; N l ; B 62 0 397 720 ;
+C 109 ; WX 1000 ; N m ; B 45 0 1017 539 ;
+C 110 ; WX 667 ; N n ; B 48 0 680 539 ;
+C 111 ; WX 667 ; N o ; B 75 -15 683 539 ;
+C 112 ; WX 667 ; N p ; B 13 -178 684 539 ;
+C 113 ; WX 667 ; N q ; B 68 -178 708 539 ;
+C 114 ; WX 444 ; N r ; B 52 0 525 538 ;
+C 115 ; WX 611 ; N s ; B 61 -15 624 539 ;
+C 116 ; WX 444 ; N t ; B 85 -4 488 687 ;
+C 117 ; WX 667 ; N u ; B 78 -15 710 524 ;
+C 118 ; WX 611 ; N v ; B 102 0 693 524 ;
+C 119 ; WX 944 ; N w ; B 113 0 1015 524 ;
+C 120 ; WX 667 ; N x ; B 27 0 729 524 ;
+C 121 ; WX 611 ; N y ; B 45 -178 690 524 ;
+C 122 ; WX 556 ; N z ; B 26 0 611 524 ;
+C 123 ; WX 389 ; N braceleft ; B 74 -181 497 741 ;
+C 124 ; WX 278 ; N bar ; B 79 0 328 739 ;
+C 125 ; WX 389 ; N braceright ; B -9 -180 414 742 ;
+C 126 ; WX 660 ; N asciitilde ; B 118 153 632 359 ;
+C 161 ; WX 333 ; N exclamdown ; B 26 -193 362 524 ;
+C 162 ; WX 667 ; N cent ; B 76 -147 707 655 ;
+C 163 ; WX 667 ; N sterling ; B 63 -12 719 727 ;
+C 164 ; WX 167 ; N fraction ; B -170 -15 460 715 ;
+C 165 ; WX 667 ; N yen ; B 33 0 795 720 ;
+C 166 ; WX 667 ; N florin ; B 19 -184 751 747 ;
+C 167 ; WX 667 ; N section ; B 106 -171 655 739 ;
+C 168 ; WX 660 ; N currency ; B 100 58 668 563 ;
+C 169 ; WX 278 ; N quotesingle ; B 158 449 325 720 ;
+C 170 ; WX 500 ; N quotedblleft ; B 108 378 601 739 ;
+C 171 ; WX 667 ; N guillemotleft ; B 152 64 626 448 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 107 64 337 448 ;
+C 173 ; WX 333 ; N guilsinglright ; B 86 64 316 448 ;
+C 174 ; WX 667 ; N fi ; B 78 0 752 739 ;
+C 175 ; WX 667 ; N fl ; B 78 0 749 739 ;
+C 177 ; WX 500 ; N endash ; B 33 187 557 325 ;
+C 178 ; WX 667 ; N dagger ; B 145 -178 675 720 ;
+C 179 ; WX 667 ; N daggerdbl ; B 83 -178 679 720 ;
+C 180 ; WX 333 ; N periodcentered ; B 79 126 343 386 ;
+C 182 ; WX 850 ; N paragraph ; B 146 -178 834 720 ;
+C 183 ; WX 500 ; N bullet ; B 142 192 484 529 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 11 -178 257 183 ;
+C 185 ; WX 500 ; N quotedblbase ; B -2 -178 491 183 ;
+C 186 ; WX 500 ; N quotedblright ; B 92 359 586 720 ;
+C 187 ; WX 667 ; N guillemotright ; B 131 64 605 448 ;
+C 188 ; WX 1000 ; N ellipsis ; B 61 0 975 206 ;
+C 189 ; WX 1000 ; N perthousand ; B 57 -32 1033 751 ;
+C 191 ; WX 611 ; N questiondown ; B 25 -216 587 524 ;
+C 193 ; WX 333 ; N grave ; B 94 591 376 739 ;
+C 194 ; WX 333 ; N acute ; B 170 591 505 739 ;
+C 195 ; WX 333 ; N circumflex ; B 70 591 477 739 ;
+C 196 ; WX 333 ; N tilde ; B 77 590 494 731 ;
+C 197 ; WX 333 ; N macron ; B 90 619 483 709 ;
+C 198 ; WX 333 ; N breve ; B 118 590 482 743 ;
+C 199 ; WX 333 ; N dotaccent ; B 187 596 379 726 ;
+C 200 ; WX 333 ; N dieresis ; B 76 596 496 726 ;
+C 202 ; WX 333 ; N ring ; B 177 593 405 817 ;
+C 203 ; WX 333 ; N cedilla ; B -8 -232 264 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 170 591 757 739 ;
+C 206 ; WX 333 ; N ogonek ; B 53 -205 260 0 ;
+C 207 ; WX 333 ; N caron ; B 96 591 503 739 ;
+C 208 ; WX 1000 ; N emdash ; B 33 187 1057 325 ;
+C 225 ; WX 1000 ; N AE ; B 3 0 1094 720 ;
+C 227 ; WX 400 ; N ordfeminine ; B 58 262 492 739 ;
+C 232 ; WX 667 ; N Lslash ; B 27 0 657 720 ;
+C 233 ; WX 833 ; N Oslash ; B 79 -76 879 784 ;
+C 234 ; WX 1000 ; N OE ; B 59 -19 1095 739 ;
+C 235 ; WX 400 ; N ordmasculine ; B 62 262 498 739 ;
+C 241 ; WX 1000 ; N ae ; B 61 -15 1005 539 ;
+C 245 ; WX 333 ; N dotlessi ; B 62 0 362 524 ;
+C 248 ; WX 333 ; N lslash ; B 40 0 432 720 ;
+C 249 ; WX 667 ; N oslash ; B 75 -72 683 581 ;
+C 250 ; WX 1000 ; N oe ; B 75 -15 1009 539 ;
+C 251 ; WX 667 ; N germandbls ; B 48 -15 685 739 ;
+C -1 ; WX 778 ; N Aacute ; B 11 0 767 935 ;
+C -1 ; WX 778 ; N Acircumflex ; B 11 0 767 935 ;
+C -1 ; WX 778 ; N Adieresis ; B 11 0 767 922 ;
+C -1 ; WX 778 ; N Agrave ; B 11 0 767 935 ;
+C -1 ; WX 778 ; N Aring ; B 11 0 767 1013 ;
+C -1 ; WX 778 ; N Atilde ; B 11 0 767 927 ;
+C -1 ; WX 778 ; N Ccedilla ; B 78 -232 823 739 ;
+C -1 ; WX 722 ; N Eacute ; B 76 0 790 935 ;
+C -1 ; WX 722 ; N Ecircumflex ; B 76 0 790 935 ;
+C -1 ; WX 722 ; N Edieresis ; B 76 0 790 922 ;
+C -1 ; WX 722 ; N Egrave ; B 76 0 790 935 ;
+C -1 ; WX 778 ; N Eth ; B 49 0 831 720 ;
+C -1 ; WX 389 ; N Iacute ; B 76 0 568 935 ;
+C -1 ; WX 389 ; N Icircumflex ; B 76 0 540 935 ;
+C -1 ; WX 389 ; N Idieresis ; B 76 0 559 922 ;
+C -1 ; WX 389 ; N Igrave ; B 76 0 439 935 ;
+C -1 ; WX 833 ; N Ntilde ; B 69 0 891 927 ;
+C -1 ; WX 833 ; N Oacute ; B 95 -19 865 935 ;
+C -1 ; WX 833 ; N Ocircumflex ; B 95 -19 865 935 ;
+C -1 ; WX 833 ; N Odieresis ; B 95 -19 865 922 ;
+C -1 ; WX 833 ; N Ograve ; B 95 -19 865 935 ;
+C -1 ; WX 833 ; N Otilde ; B 95 -19 865 927 ;
+C -1 ; WX 722 ; N Scaron ; B 70 -19 759 935 ;
+C -1 ; WX 722 ; N Thorn ; B 57 0 782 720 ;
+C -1 ; WX 833 ; N Uacute ; B 116 -19 890 935 ;
+C -1 ; WX 833 ; N Ucircumflex ; B 116 -19 890 935 ;
+C -1 ; WX 833 ; N Udieresis ; B 116 -19 890 922 ;
+C -1 ; WX 833 ; N Ugrave ; B 116 -19 890 935 ;
+C -1 ; WX 778 ; N Yacute ; B 130 0 902 935 ;
+C -1 ; WX 778 ; N Ydieresis ; B 130 0 902 922 ;
+C -1 ; WX 722 ; N Zcaron ; B 36 0 798 935 ;
+C -1 ; WX 667 ; N aacute ; B 47 -15 672 739 ;
+C -1 ; WX 667 ; N acircumflex ; B 47 -15 672 739 ;
+C -1 ; WX 667 ; N adieresis ; B 47 -15 672 726 ;
+C -1 ; WX 667 ; N agrave ; B 47 -15 672 739 ;
+C -1 ; WX 667 ; N aring ; B 47 -15 672 817 ;
+C -1 ; WX 667 ; N atilde ; B 47 -15 672 731 ;
+C -1 ; WX 278 ; N brokenbar ; B 79 0 328 739 ;
+C -1 ; WX 667 ; N ccedilla ; B 72 -232 676 539 ;
+C -1 ; WX 800 ; N copyright ; B 79 -19 848 739 ;
+C -1 ; WX 400 ; N degree ; B 147 415 452 715 ;
+C -1 ; WX 660 ; N divide ; B 113 7 637 505 ;
+C -1 ; WX 667 ; N eacute ; B 71 -15 682 739 ;
+C -1 ; WX 667 ; N ecircumflex ; B 71 -15 682 739 ;
+C -1 ; WX 667 ; N edieresis ; B 71 -15 682 726 ;
+C -1 ; WX 667 ; N egrave ; B 71 -15 682 739 ;
+C -1 ; WX 667 ; N eth ; B 75 -15 683 739 ;
+C -1 ; WX 333 ; N iacute ; B 62 0 505 739 ;
+C -1 ; WX 333 ; N icircumflex ; B 62 0 477 739 ;
+C -1 ; WX 333 ; N idieresis ; B 62 0 496 726 ;
+C -1 ; WX 333 ; N igrave ; B 62 0 376 739 ;
+C -1 ; WX 660 ; N logicalnot ; B 130 120 655 412 ;
+C -1 ; WX 660 ; N minus ; B 113 198 637 314 ;
+C -1 ; WX 667 ; N mu ; B 17 -178 710 524 ;
+C -1 ; WX 660 ; N multiply ; B 94 3 656 505 ;
+C -1 ; WX 667 ; N ntilde ; B 48 0 680 731 ;
+C -1 ; WX 667 ; N oacute ; B 75 -15 683 739 ;
+C -1 ; WX 667 ; N ocircumflex ; B 75 -15 683 739 ;
+C -1 ; WX 667 ; N odieresis ; B 75 -15 683 726 ;
+C -1 ; WX 667 ; N ograve ; B 75 -15 683 739 ;
+C -1 ; WX 1000 ; N onehalf ; B 138 -15 1014 739 ;
+C -1 ; WX 1000 ; N onequarter ; B 138 -15 992 739 ;
+C -1 ; WX 400 ; N onesuperior ; B 178 310 451 739 ;
+C -1 ; WX 667 ; N otilde ; B 75 -15 683 731 ;
+C -1 ; WX 660 ; N plusminus ; B 78 0 660 603 ;
+C -1 ; WX 800 ; N registered ; B 79 -19 848 739 ;
+C -1 ; WX 611 ; N scaron ; B 61 -15 642 739 ;
+C -1 ; WX 667 ; N thorn ; B 13 -178 684 739 ;
+C -1 ; WX 1000 ; N threequarters ; B 113 -15 992 715 ;
+C -1 ; WX 400 ; N threesuperior ; B 79 277 489 715 ;
+C -1 ; WX 950 ; N trademark ; B 141 316 1013 720 ;
+C -1 ; WX 400 ; N twosuperior ; B 62 310 502 739 ;
+C -1 ; WX 667 ; N uacute ; B 78 -15 710 739 ;
+C -1 ; WX 667 ; N ucircumflex ; B 78 -15 710 739 ;
+C -1 ; WX 667 ; N udieresis ; B 78 -15 710 726 ;
+C -1 ; WX 667 ; N ugrave ; B 78 -15 710 739 ;
+C -1 ; WX 611 ; N yacute ; B 45 -178 690 739 ;
+C -1 ; WX 611 ; N ydieresis ; B 45 -178 690 726 ;
+C -1 ; WX 556 ; N zcaron ; B 26 0 615 739 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -74
+KPX A Y -74
+KPX A W -37
+KPX A V -74
+KPX A T -92
+
+KPX F period -129
+KPX F comma -129
+KPX F A -55
+
+KPX L y -37
+KPX L quoteright -74
+KPX L Y -92
+KPX L W -55
+KPX L V -92
+KPX L T -92
+
+KPX P period -129
+KPX P comma -129
+KPX P A -74
+
+KPX R y 0
+KPX R Y -37
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -92
+KPX T w -92
+KPX T u -92
+KPX T semicolon -68
+KPX T s -111
+KPX T r -92
+KPX T period -111
+KPX T o -111
+KPX T i 0
+KPX T hyphen -100
+KPX T e -111
+KPX T comma -111
+KPX T colon -68
+KPX T c -111
+KPX T a -111
+KPX T A -74
+
+KPX V y -18
+KPX V u -37
+KPX V semicolon -74
+KPX V r -37
+KPX V period -129
+KPX V o -55
+KPX V i -18
+KPX V hyphen -55
+KPX V e -55
+KPX V comma -129
+KPX V colon -74
+KPX V a -55
+KPX V A -74
+
+KPX W y 0
+KPX W u -18
+KPX W semicolon -18
+KPX W r -18
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen 0
+KPX W e -18
+KPX W comma -74
+KPX W colon -18
+KPX W a -37
+KPX W A -37
+
+KPX Y v -55
+KPX Y u -74
+KPX Y semicolon -74
+KPX Y q -92
+KPX Y period -111
+KPX Y p -74
+KPX Y o -92
+KPX Y i -20
+KPX Y hyphen -92
+KPX Y e -92
+KPX Y comma -111
+KPX Y colon -74
+KPX Y a -92
+KPX Y A -74
+
+KPX f quoteright 24
+KPX f f -18
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t -18
+KPX quoteright s -62
+KPX quoteright quoteright -18
+
+KPX r z 0
+KPX r y 18
+KPX r x 0
+KPX r w 0
+KPX r v 18
+KPX r u 0
+KPX r t 18
+KPX r r 0
+KPX r quoteright 0
+KPX r q -18
+KPX r period -92
+KPX r o -18
+KPX r n 18
+KPX r m 18
+KPX r hyphen -12
+KPX r h 0
+KPX r g 18
+KPX r f 18
+KPX r e -18
+KPX r d -18
+KPX r comma -92
+KPX r c -18
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -92
+KPX y comma -92
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 194 196 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 111 0 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 194 196 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 139 0 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 222 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 167 0 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 222 196 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 139 0 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 222 196 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 139 0 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 250 196 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 250 196 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 250 196 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 250 196 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 167 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 167 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 167 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 167 0 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 28 196 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 28 196 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 28 196 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 196 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 194 196 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 194 196 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 194 196 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 194 196 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 167 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 167 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 167 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 167 0 ;
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 222 196 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 222 196 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 222 196 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 222 196 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 167 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 167 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 167 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 167 0 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 250 196 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 250 196 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 250 196 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 250 196 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 167 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 167 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 167 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 167 0 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 222 196 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 167 0 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 250 196 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 167 0 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 250 196 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 167 0 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 222 196 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 167 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-Cm b/font/He-Cm
new file mode 100644
index 0000000..117b492
--- /dev/null
+++ b/font/He-Cm
@@ -0,0 +1,418 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1988, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Fri Dec 13 16:12:38 1991
+Comment UniqueID 37154
+Comment VMusage 24500 31392
+FontName Helvetica-Compressed
+FullName Helvetica Compressed
+FamilyName Helvetica
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -120 -250 1000 990
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.002
+Notice Copyright (c) 1988, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.Helvetica is a trademark of Linotype-Hell AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 712
+XHeight 572
+Ascender 712
+Descender -128
+StartCharMetrics 228
+C 32 ; WX 232 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 259 ; N exclam ; B 52 0 207 712 ;
+C 34 ; WX 333 ; N quotedbl ; B 15 441 318 712 ;
+C 35 ; WX 464 ; N numbersign ; B 21 0 442 712 ;
+C 36 ; WX 464 ; N dollar ; B 22 -74 443 775 ;
+C 37 ; WX 630 ; N percent ; B 17 -14 613 726 ;
+C 38 ; WX 593 ; N ampersand ; B 21 -14 590 726 ;
+C 39 ; WX 204 ; N quoteright ; B 12 461 192 712 ;
+C 40 ; WX 296 ; N parenleft ; B 14 -62 281 726 ;
+C 41 ; WX 296 ; N parenright ; B 15 -62 282 726 ;
+C 42 ; WX 464 ; N asterisk ; B 65 392 398 712 ;
+C 43 ; WX 600 ; N plus ; B 46 32 554 540 ;
+C 44 ; WX 232 ; N comma ; B 17 -128 214 168 ;
+C 45 ; WX 259 ; N hyphen ; B 18 259 240 377 ;
+C 46 ; WX 232 ; N period ; B 38 0 193 168 ;
+C 47 ; WX 259 ; N slash ; B 2 -14 257 726 ;
+C 48 ; WX 464 ; N zero ; B 21 -14 442 726 ;
+C 49 ; WX 464 ; N one ; B 44 0 327 712 ;
+C 50 ; WX 464 ; N two ; B 16 0 438 726 ;
+C 51 ; WX 464 ; N three ; B 23 -14 440 726 ;
+C 52 ; WX 464 ; N four ; B 3 0 453 712 ;
+C 53 ; WX 464 ; N five ; B 20 -14 443 712 ;
+C 54 ; WX 464 ; N six ; B 22 -14 441 726 ;
+C 55 ; WX 464 ; N seven ; B 9 0 447 712 ;
+C 56 ; WX 464 ; N eight ; B 17 -14 447 726 ;
+C 57 ; WX 464 ; N nine ; B 22 -14 441 726 ;
+C 58 ; WX 232 ; N colon ; B 38 0 193 572 ;
+C 59 ; WX 232 ; N semicolon ; B 17 -128 214 572 ;
+C 60 ; WX 600 ; N less ; B 75 54 525 518 ;
+C 61 ; WX 600 ; N equal ; B 46 98 554 474 ;
+C 62 ; WX 600 ; N greater ; B 75 54 525 518 ;
+C 63 ; WX 464 ; N question ; B 43 0 421 726 ;
+C 64 ; WX 800 ; N at ; B 44 -14 756 726 ;
+C 65 ; WX 464 ; N A ; B 11 0 452 712 ;
+C 66 ; WX 464 ; N B ; B 22 0 442 712 ;
+C 67 ; WX 464 ; N C ; B 22 -14 442 726 ;
+C 68 ; WX 464 ; N D ; B 22 0 442 712 ;
+C 69 ; WX 370 ; N E ; B 20 0 364 712 ;
+C 70 ; WX 370 ; N F ; B 20 0 364 712 ;
+C 71 ; WX 464 ; N G ; B 22 -14 443 726 ;
+C 72 ; WX 464 ; N H ; B 22 0 442 712 ;
+C 73 ; WX 204 ; N I ; B 19 0 185 712 ;
+C 74 ; WX 464 ; N J ; B 17 -14 435 712 ;
+C 75 ; WX 464 ; N K ; B 22 0 454 712 ;
+C 76 ; WX 370 ; N L ; B 20 0 366 712 ;
+C 77 ; WX 667 ; N M ; B 21 0 646 712 ;
+C 78 ; WX 500 ; N N ; B 16 0 484 712 ;
+C 79 ; WX 464 ; N O ; B 22 -14 442 726 ;
+C 80 ; WX 464 ; N P ; B 22 0 442 712 ;
+C 81 ; WX 464 ; N Q ; B 22 -128 442 726 ;
+C 82 ; WX 464 ; N R ; B 20 0 464 712 ;
+C 83 ; WX 464 ; N S ; B 22 -14 442 726 ;
+C 84 ; WX 426 ; N T ; B 14 0 412 712 ;
+C 85 ; WX 464 ; N U ; B 22 -14 442 712 ;
+C 86 ; WX 464 ; N V ; B 8 0 455 712 ;
+C 87 ; WX 704 ; N W ; B 3 0 700 712 ;
+C 88 ; WX 464 ; N X ; B 8 0 456 712 ;
+C 89 ; WX 464 ; N Y ; B 8 0 456 712 ;
+C 90 ; WX 370 ; N Z ; B 5 0 365 712 ;
+C 91 ; WX 296 ; N bracketleft ; B 28 -62 268 726 ;
+C 92 ; WX 278 ; N backslash ; B -48 -14 326 726 ;
+C 93 ; WX 296 ; N bracketright ; B 28 -62 268 726 ;
+C 94 ; WX 600 ; N asciicircum ; B 73 347 527 712 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 204 ; N quoteleft ; B 12 461 192 712 ;
+C 97 ; WX 426 ; N a ; B 22 -7 404 579 ;
+C 98 ; WX 426 ; N b ; B 22 -7 404 712 ;
+C 99 ; WX 426 ; N c ; B 22 -7 404 579 ;
+C 100 ; WX 426 ; N d ; B 22 -7 404 712 ;
+C 101 ; WX 426 ; N e ; B 22 -7 404 579 ;
+C 102 ; WX 259 ; N f ; B 7 0 245 712 ; L i fi ; L l fl ;
+C 103 ; WX 426 ; N g ; B 22 -128 404 579 ;
+C 104 ; WX 426 ; N h ; B 22 0 404 712 ;
+C 105 ; WX 204 ; N i ; B 23 0 181 712 ;
+C 106 ; WX 204 ; N j ; B -48 -128 181 712 ;
+C 107 ; WX 426 ; N k ; B 22 0 424 712 ;
+C 108 ; WX 204 ; N l ; B 23 0 181 712 ;
+C 109 ; WX 630 ; N m ; B 24 0 606 579 ;
+C 110 ; WX 426 ; N n ; B 22 0 404 579 ;
+C 111 ; WX 426 ; N o ; B 22 -7 404 579 ;
+C 112 ; WX 426 ; N p ; B 22 -128 404 579 ;
+C 113 ; WX 426 ; N q ; B 22 -128 404 579 ;
+C 114 ; WX 426 ; N r ; B 22 0 404 579 ;
+C 115 ; WX 426 ; N s ; B 22 -7 404 579 ;
+C 116 ; WX 296 ; N t ; B 8 0 288 675 ;
+C 117 ; WX 426 ; N u ; B 22 -7 404 572 ;
+C 118 ; WX 426 ; N v ; B 11 0 415 572 ;
+C 119 ; WX 667 ; N w ; B 5 0 661 572 ;
+C 120 ; WX 426 ; N x ; B 4 0 422 572 ;
+C 121 ; WX 426 ; N y ; B 12 -128 413 572 ;
+C 122 ; WX 333 ; N z ; B 3 0 330 572 ;
+C 123 ; WX 333 ; N braceleft ; B 28 -62 305 726 ;
+C 124 ; WX 222 ; N bar ; B 43 -250 179 750 ;
+C 125 ; WX 333 ; N braceright ; B 28 -62 305 726 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 160 531 346 ;
+C 161 ; WX 259 ; N exclamdown ; B 52 -114 207 598 ;
+C 162 ; WX 464 ; N cent ; B 41 -128 423 674 ;
+C 163 ; WX 464 ; N sterling ; B 9 -14 455 726 ;
+C 164 ; WX 130 ; N fraction ; B -120 -14 250 726 ;
+C 165 ; WX 464 ; N yen ; B 8 0 456 712 ;
+C 166 ; WX 464 ; N florin ; B 9 -128 454 726 ;
+C 167 ; WX 426 ; N section ; B 28 -64 398 726 ;
+C 168 ; WX 464 ; N currency ; B 13 173 451 611 ;
+C 169 ; WX 222 ; N quotesingle ; B 51 441 171 712 ;
+C 170 ; WX 426 ; N quotedblleft ; B 33 461 417 712 ;
+C 171 ; WX 370 ; N guillemotleft ; B 15 99 355 537 ;
+C 172 ; WX 204 ; N guilsinglleft ; B 38 99 189 537 ;
+C 173 ; WX 204 ; N guilsinglright ; B 15 99 166 537 ;
+C 174 ; WX 463 ; N fi ; B 7 0 437 712 ;
+C 175 ; WX 463 ; N fl ; B 7 0 437 712 ;
+C 177 ; WX 500 ; N endash ; B 0 262 500 374 ;
+C 178 ; WX 426 ; N dagger ; B 20 -64 406 712 ;
+C 179 ; WX 426 ; N daggerdbl ; B 20 -64 406 712 ;
+C 180 ; WX 232 ; N periodcentered ; B 33 204 199 370 ;
+C 182 ; WX 620 ; N paragraph ; B 1 -179 619 712 ;
+C 183 ; WX 500 ; N bullet ; B 72 178 428 534 ;
+C 184 ; WX 204 ; N quotesinglbase ; B 12 -95 192 156 ;
+C 185 ; WX 426 ; N quotedblbase ; B 9 -95 393 156 ;
+C 186 ; WX 426 ; N quotedblright ; B 9 461 393 712 ;
+C 187 ; WX 370 ; N guillemotright ; B 15 99 355 537 ;
+C 188 ; WX 1000 ; N ellipsis ; B 89 0 910 168 ;
+C 189 ; WX 759 ; N perthousand ; B 14 -14 745 726 ;
+C 191 ; WX 464 ; N questiondown ; B 43 -128 421 598 ;
+C 193 ; WX 204 ; N grave ; B -39 639 174 780 ;
+C 194 ; WX 204 ; N acute ; B 30 639 243 780 ;
+C 195 ; WX 204 ; N circumflex ; B -48 639 251 780 ;
+C 196 ; WX 204 ; N tilde ; B -44 653 247 766 ;
+C 197 ; WX 204 ; N macron ; B -38 676 243 750 ;
+C 198 ; WX 204 ; N breve ; B -44 640 249 773 ;
+C 199 ; WX 204 ; N dotaccent ; B 46 650 158 773 ;
+C 200 ; WX 204 ; N dieresis ; B -37 650 241 773 ;
+C 202 ; WX 204 ; N ring ; B -4 650 236 875 ;
+C 203 ; WX 204 ; N cedilla ; B -18 -244 237 -4 ;
+C 205 ; WX 204 ; N hungarumlaut ; B -65 639 291 780 ;
+C 206 ; WX 204 ; N ogonek ; B -22 -244 229 0 ;
+C 207 ; WX 204 ; N caron ; B -47 639 252 780 ;
+C 208 ; WX 1000 ; N emdash ; B 0 262 1000 374 ;
+C 225 ; WX 667 ; N AE ; B 7 0 653 712 ;
+C 227 ; WX 256 ; N ordfeminine ; B 3 374 253 726 ;
+C 232 ; WX 370 ; N Lslash ; B -11 0 366 712 ;
+C 233 ; WX 464 ; N Oslash ; B 22 -41 442 759 ;
+C 234 ; WX 630 ; N OE ; B 22 -14 624 726 ;
+C 235 ; WX 256 ; N ordmasculine ; B 3 374 252 725 ;
+C 241 ; WX 630 ; N ae ; B 15 -7 615 579 ;
+C 245 ; WX 204 ; N dotlessi ; B 23 0 181 572 ;
+C 248 ; WX 204 ; N lslash ; B -12 0 217 712 ;
+C 249 ; WX 426 ; N oslash ; B 22 -52 404 616 ;
+C 250 ; WX 630 ; N oe ; B 15 -7 615 579 ;
+C 251 ; WX 426 ; N germandbls ; B 22 -7 404 726 ;
+C -1 ; WX 426 ; N ecircumflex ; B 22 -7 404 780 ;
+C -1 ; WX 426 ; N edieresis ; B 22 -7 404 773 ;
+C -1 ; WX 426 ; N aacute ; B 22 -7 404 780 ;
+C -1 ; WX 800 ; N registered ; B 13 -14 787 726 ;
+C -1 ; WX 204 ; N icircumflex ; B -48 0 251 780 ;
+C -1 ; WX 426 ; N udieresis ; B 22 -7 404 773 ;
+C -1 ; WX 426 ; N ograve ; B 22 -7 404 780 ;
+C -1 ; WX 426 ; N uacute ; B 22 -7 404 780 ;
+C -1 ; WX 426 ; N ucircumflex ; B 22 -7 404 780 ;
+C -1 ; WX 464 ; N Aacute ; B 11 0 452 895 ;
+C -1 ; WX 204 ; N igrave ; B -39 0 181 780 ;
+C -1 ; WX 204 ; N Icircumflex ; B -48 0 251 895 ;
+C -1 ; WX 426 ; N ccedilla ; B 22 -244 404 579 ;
+C -1 ; WX 426 ; N adieresis ; B 22 -7 404 773 ;
+C -1 ; WX 370 ; N Ecircumflex ; B 20 0 364 895 ;
+C -1 ; WX 426 ; N scaron ; B 22 -7 404 780 ;
+C -1 ; WX 426 ; N thorn ; B 22 -128 404 712 ;
+C -1 ; WX 1000 ; N trademark ; B 36 300 964 712 ;
+C -1 ; WX 426 ; N egrave ; B 22 -7 404 780 ;
+C -1 ; WX 277 ; N threesuperior ; B 3 281 274 726 ;
+C -1 ; WX 333 ; N zcaron ; B 3 0 330 780 ;
+C -1 ; WX 426 ; N atilde ; B 22 -7 404 766 ;
+C -1 ; WX 426 ; N aring ; B 22 -7 404 875 ;
+C -1 ; WX 426 ; N ocircumflex ; B 22 -7 404 780 ;
+C -1 ; WX 370 ; N Edieresis ; B 20 0 364 888 ;
+C -1 ; WX 694 ; N threequarters ; B 22 -14 672 726 ;
+C -1 ; WX 426 ; N ydieresis ; B 12 -128 413 773 ;
+C -1 ; WX 426 ; N yacute ; B 12 -128 413 780 ;
+C -1 ; WX 204 ; N iacute ; B 23 0 243 780 ;
+C -1 ; WX 464 ; N Acircumflex ; B 11 0 452 895 ;
+C -1 ; WX 464 ; N Uacute ; B 22 -14 442 895 ;
+C -1 ; WX 426 ; N eacute ; B 22 -7 404 780 ;
+C -1 ; WX 464 ; N Ograve ; B 22 -14 442 895 ;
+C -1 ; WX 426 ; N agrave ; B 22 -7 404 780 ;
+C -1 ; WX 464 ; N Udieresis ; B 22 -14 442 888 ;
+C -1 ; WX 426 ; N acircumflex ; B 22 -7 404 780 ;
+C -1 ; WX 204 ; N Igrave ; B -39 0 185 895 ;
+C -1 ; WX 277 ; N twosuperior ; B 1 290 276 726 ;
+C -1 ; WX 464 ; N Ugrave ; B 22 -14 442 895 ;
+C -1 ; WX 694 ; N onequarter ; B 22 -14 672 726 ;
+C -1 ; WX 464 ; N Ucircumflex ; B 22 -14 442 895 ;
+C -1 ; WX 464 ; N Scaron ; B 22 -14 442 895 ;
+C -1 ; WX 204 ; N Idieresis ; B -37 0 241 888 ;
+C -1 ; WX 204 ; N idieresis ; B -37 0 241 773 ;
+C -1 ; WX 370 ; N Egrave ; B 20 0 364 895 ;
+C -1 ; WX 464 ; N Oacute ; B 22 -14 442 895 ;
+C -1 ; WX 600 ; N divide ; B 46 -14 554 586 ;
+C -1 ; WX 464 ; N Atilde ; B 11 0 452 881 ;
+C -1 ; WX 464 ; N Aring ; B 11 0 452 990 ;
+C -1 ; WX 464 ; N Odieresis ; B 22 -14 442 888 ;
+C -1 ; WX 464 ; N Adieresis ; B 11 0 452 888 ;
+C -1 ; WX 500 ; N Ntilde ; B 16 0 484 881 ;
+C -1 ; WX 370 ; N Zcaron ; B 5 0 365 895 ;
+C -1 ; WX 464 ; N Thorn ; B 22 0 442 712 ;
+C -1 ; WX 204 ; N Iacute ; B 19 0 243 895 ;
+C -1 ; WX 600 ; N plusminus ; B 46 32 554 540 ;
+C -1 ; WX 600 ; N multiply ; B 46 5 554 511 ;
+C -1 ; WX 370 ; N Eacute ; B 20 0 364 895 ;
+C -1 ; WX 464 ; N Ydieresis ; B 8 0 456 888 ;
+C -1 ; WX 277 ; N onesuperior ; B 5 290 189 717 ;
+C -1 ; WX 426 ; N ugrave ; B 22 -7 404 780 ;
+C -1 ; WX 600 ; N logicalnot ; B 46 162 554 459 ;
+C -1 ; WX 426 ; N ntilde ; B 22 0 404 766 ;
+C -1 ; WX 464 ; N Otilde ; B 22 -14 442 881 ;
+C -1 ; WX 426 ; N otilde ; B 22 -7 404 766 ;
+C -1 ; WX 464 ; N Ccedilla ; B 22 -244 442 726 ;
+C -1 ; WX 464 ; N Agrave ; B 11 0 452 895 ;
+C -1 ; WX 694 ; N onehalf ; B 22 -14 673 726 ;
+C -1 ; WX 464 ; N Eth ; B -3 0 442 712 ;
+C -1 ; WX 400 ; N degree ; B 57 426 343 712 ;
+C -1 ; WX 464 ; N Yacute ; B 8 0 456 895 ;
+C -1 ; WX 464 ; N Ocircumflex ; B 22 -14 442 895 ;
+C -1 ; WX 426 ; N oacute ; B 22 -7 404 780 ;
+C -1 ; WX 426 ; N mu ; B 22 -128 404 572 ;
+C -1 ; WX 600 ; N minus ; B 46 218 554 354 ;
+C -1 ; WX 426 ; N eth ; B 22 -7 404 751 ;
+C -1 ; WX 426 ; N odieresis ; B 22 -7 404 773 ;
+C -1 ; WX 800 ; N copyright ; B 13 -14 787 726 ;
+C -1 ; WX 222 ; N brokenbar ; B 43 -175 179 675 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 90
+
+KPX A y -55
+KPX A w -37
+KPX A v -55
+KPX A quoteright -55
+KPX A Y -74
+KPX A W -55
+KPX A V -55
+KPX A T -74
+
+KPX F period -129
+KPX F comma -129
+KPX F A -37
+
+KPX L y -74
+KPX L quoteright -129
+KPX L Y -111
+KPX L W -74
+KPX L V -92
+KPX L T -92
+
+KPX P period -129
+KPX P comma -129
+KPX P A -55
+
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -92
+KPX T w -92
+KPX T u -92
+KPX T semicolon -111
+KPX T s -92
+KPX T r -92
+KPX T period -111
+KPX T o -92
+KPX T i -92
+KPX T hyphen -92
+KPX T e -92
+KPX T comma -111
+KPX T colon -111
+KPX T c -92
+KPX T a -92
+KPX T A -92
+
+KPX V y -18
+KPX V u -18
+KPX V semicolon -37
+KPX V r -18
+KPX V period -92
+KPX V o -37
+KPX V i -18
+KPX V hyphen -37
+KPX V e -37
+KPX V comma -92
+KPX V colon -55
+KPX V a -37
+KPX V A -74
+
+KPX W y -18
+KPX W u -18
+KPX W semicolon -37
+KPX W r -18
+KPX W period -74
+KPX W o -37
+KPX W i -18
+KPX W hyphen -37
+KPX W e -37
+KPX W comma -74
+KPX W colon -37
+KPX W a -37
+KPX W A -74
+
+KPX Y v -37
+KPX Y u -37
+KPX Y semicolon -55
+KPX Y q -55
+KPX Y period -111
+KPX Y p -37
+KPX Y o -55
+KPX Y i -37
+KPX Y hyphen -74
+KPX Y e -55
+KPX Y comma -111
+KPX Y colon -55
+KPX Y a -55
+KPX Y A -92
+
+KPX quoteright t -18
+KPX quoteright s -74
+
+KPX r period -129
+KPX r comma -129
+
+KPX v period -92
+KPX v comma -92
+
+KPX w period -74
+KPX w comma -74
+
+KPX y period -111
+KPX y comma -111
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 130 115 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 130 115 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 130 115 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 130 115 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 130 115 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 130 115 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 83 115 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 83 115 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 83 115 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 83 115 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 0 115 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 0 115 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 0 115 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 0 115 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 148 115 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 130 115 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 130 115 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 130 115 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 130 115 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 130 115 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 130 115 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 130 115 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 130 115 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 130 115 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 130 115 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 130 115 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 130 115 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 83 115 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 111 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 111 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 111 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 111 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 111 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 111 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 111 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 111 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 111 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 111 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 111 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 111 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 111 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 111 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 111 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 111 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 111 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 111 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 111 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 111 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 111 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 111 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 111 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 65 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-Cn b/font/He-Cn
new file mode 100644
index 0000000..954636a
--- /dev/null
+++ b/font/He-Cn
@@ -0,0 +1,447 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989 Adobe Systems Incorporated.  All rights reserved.
+Comment Creation Date: Tue Dec  5 16:28:05 1989
+Comment UniqueID 26316
+Comment VMusage 25458 32350
+FontName Helvetica-Condensed
+FullName Helvetica Condensed Medium
+FamilyName Helvetica
+Weight MediumCondensed
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -174 -224 1071 990
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.002
+Notice Copyright (c) 1985, 1987, 1989 Adobe Systems Incorporated.  All rights reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 750
+XHeight 556
+Ascender 750
+Descender -188
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 121 0 212 750 ;
+C 34 ; WX 250 ; N quotedbl ; B 44 513 207 739 ;
+C 35 ; WX 500 ; N numbersign ; B 5 0 495 750 ;
+C 36 ; WX 500 ; N dollar ; B 35 -116 465 815 ;
+C 37 ; WX 833 ; N percent ; B 55 -15 756 750 ;
+C 38 ; WX 667 ; N ampersand ; B 75 -18 620 750 ;
+C 39 ; WX 222 ; N quoteright ; B 64 504 158 750 ;
+C 40 ; WX 333 ; N parenleft ; B 76 -215 289 750 ;
+C 41 ; WX 333 ; N parenright ; B 44 -215 257 750 ;
+C 42 ; WX 500 ; N asterisk ; B 96 455 405 750 ;
+C 43 ; WX 500 ; N plus ; B 44 0 457 505 ;
+C 44 ; WX 250 ; N comma ; B 80 -146 171 100 ;
+C 45 ; WX 333 ; N hyphen ; B 45 275 288 358 ;
+C 46 ; WX 250 ; N period ; B 80 0 171 100 ;
+C 47 ; WX 278 ; N slash ; B -13 -27 291 750 ;
+C 48 ; WX 500 ; N zero ; B 46 -15 455 750 ;
+C 49 ; WX 500 ; N one ; B 74 0 317 750 ;
+C 50 ; WX 500 ; N two ; B 44 0 447 750 ;
+C 51 ; WX 500 ; N three ; B 38 -15 447 750 ;
+C 52 ; WX 500 ; N four ; B 28 0 451 750 ;
+C 53 ; WX 500 ; N five ; B 43 -15 446 735 ;
+C 54 ; WX 500 ; N six ; B 43 -15 458 750 ;
+C 55 ; WX 500 ; N seven ; B 44 0 456 735 ;
+C 56 ; WX 500 ; N eight ; B 46 -15 454 750 ;
+C 57 ; WX 500 ; N nine ; B 43 -15 458 750 ;
+C 58 ; WX 250 ; N colon ; B 80 0 171 547 ;
+C 59 ; WX 250 ; N semicolon ; B 80 -146 171 547 ;
+C 60 ; WX 500 ; N less ; B 42 -10 459 518 ;
+C 61 ; WX 500 ; N equal ; B 44 124 457 384 ;
+C 62 ; WX 500 ; N greater ; B 42 -10 459 518 ;
+C 63 ; WX 500 ; N question ; B 60 0 462 750 ;
+C 64 ; WX 800 ; N at ; B 36 -15 764 750 ;
+C 65 ; WX 556 ; N A ; B 11 0 546 750 ;
+C 66 ; WX 556 ; N B ; B 80 0 503 750 ;
+C 67 ; WX 556 ; N C ; B 53 -18 503 765 ;
+C 68 ; WX 611 ; N D ; B 82 0 548 750 ;
+C 69 ; WX 500 ; N E ; B 74 0 451 750 ;
+C 70 ; WX 444 ; N F ; B 74 0 426 750 ;
+C 71 ; WX 611 ; N G ; B 54 -18 532 765 ;
+C 72 ; WX 611 ; N H ; B 79 0 532 750 ;
+C 73 ; WX 278 ; N I ; B 98 0 181 750 ;
+C 74 ; WX 444 ; N J ; B 21 -15 368 750 ;
+C 75 ; WX 556 ; N K ; B 79 0 546 750 ;
+C 76 ; WX 500 ; N L ; B 83 0 472 750 ;
+C 77 ; WX 778 ; N M ; B 76 0 702 750 ;
+C 78 ; WX 611 ; N N ; B 77 0 534 750 ;
+C 79 ; WX 611 ; N O ; B 59 -18 553 765 ;
+C 80 ; WX 556 ; N P ; B 86 0 519 750 ;
+C 81 ; WX 611 ; N Q ; B 59 -34 582 765 ;
+C 82 ; WX 611 ; N R ; B 86 0 565 750 ;
+C 83 ; WX 556 ; N S ; B 51 -18 505 765 ;
+C 84 ; WX 500 ; N T ; B 15 0 486 750 ;
+C 85 ; WX 611 ; N U ; B 81 -18 531 750 ;
+C 86 ; WX 556 ; N V ; B 11 0 545 750 ;
+C 87 ; WX 833 ; N W ; B 17 0 816 750 ;
+C 88 ; WX 556 ; N X ; B 17 0 539 750 ;
+C 89 ; WX 556 ; N Y ; B 11 0 546 750 ;
+C 90 ; WX 500 ; N Z ; B 28 0 473 750 ;
+C 91 ; WX 333 ; N bracketleft ; B 100 -209 275 750 ;
+C 92 ; WX 250 ; N backslash ; B -31 0 281 750 ;
+C 93 ; WX 333 ; N bracketright ; B 58 -209 233 750 ;
+C 94 ; WX 500 ; N asciicircum ; B 70 333 431 750 ;
+C 95 ; WX 500 ; N underscore ; B 0 -119 500 -61 ;
+C 96 ; WX 222 ; N quoteleft ; B 64 521 158 767 ;
+C 97 ; WX 444 ; N a ; B 31 -15 417 571 ;
+C 98 ; WX 500 ; N b ; B 75 -15 447 750 ;
+C 99 ; WX 444 ; N c ; B 44 -15 405 571 ;
+C 100 ; WX 500 ; N d ; B 48 -15 424 750 ;
+C 101 ; WX 444 ; N e ; B 43 -15 395 571 ;
+C 102 ; WX 278 ; N f ; B 12 0 259 752 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 45 -189 426 571 ;
+C 104 ; WX 500 ; N h ; B 73 0 428 750 ;
+C 105 ; WX 222 ; N i ; B 72 0 151 750 ;
+C 106 ; WX 222 ; N j ; B 13 -190 154 750 ;
+C 107 ; WX 444 ; N k ; B 69 0 439 750 ;
+C 108 ; WX 222 ; N l ; B 72 0 151 750 ;
+C 109 ; WX 778 ; N m ; B 76 0 703 571 ;
+C 110 ; WX 500 ; N n ; B 73 0 428 571 ;
+C 111 ; WX 500 ; N o ; B 51 -15 449 571 ;
+C 112 ; WX 500 ; N p ; B 72 -188 447 571 ;
+C 113 ; WX 500 ; N q ; B 55 -184 426 571 ;
+C 114 ; WX 333 ; N r ; B 81 0 322 563 ;
+C 115 ; WX 444 ; N s ; B 43 -15 400 571 ;
+C 116 ; WX 278 ; N t ; B 9 0 257 707 ;
+C 117 ; WX 500 ; N u ; B 77 -15 424 556 ;
+C 118 ; WX 444 ; N v ; B 13 0 431 556 ;
+C 119 ; WX 667 ; N w ; B 19 0 649 556 ;
+C 120 ; WX 444 ; N x ; B 9 0 436 556 ;
+C 121 ; WX 444 ; N y ; B 5 -190 425 556 ;
+C 122 ; WX 389 ; N z ; B 24 0 366 556 ;
+C 123 ; WX 274 ; N braceleft ; B 7 -95 266 750 ;
+C 124 ; WX 250 ; N bar ; B 93 0 157 750 ;
+C 125 ; WX 274 ; N braceright ; B 8 -95 267 750 ;
+C 126 ; WX 500 ; N asciitilde ; B 44 166 457 345 ;
+C 161 ; WX 333 ; N exclamdown ; B 121 -179 212 571 ;
+C 162 ; WX 500 ; N cent ; B 58 -137 418 667 ;
+C 163 ; WX 500 ; N sterling ; B 30 -15 485 750 ;
+C 164 ; WX 167 ; N fraction ; B -174 0 341 750 ;
+C 165 ; WX 500 ; N yen ; B -17 0 518 750 ;
+C 166 ; WX 500 ; N florin ; B 10 -192 488 750 ;
+C 167 ; WX 500 ; N section ; B 35 -208 466 750 ;
+C 168 ; WX 500 ; N currency ; B 24 50 475 553 ;
+C 169 ; WX 250 ; N quotesingle ; B 99 513 151 739 ;
+C 170 ; WX 389 ; N quotedblleft ; B 62 521 327 767 ;
+C 171 ; WX 500 ; N guillemotleft ; B 85 125 415 495 ;
+C 172 ; WX 278 ; N guilsinglleft ; B 64 125 215 495 ;
+C 173 ; WX 278 ; N guilsinglright ; B 63 125 214 495 ;
+C 174 ; WX 500 ; N fi ; B 12 0 427 752 ;
+C 175 ; WX 500 ; N fl ; B 12 0 425 752 ;
+C 177 ; WX 500 ; N endash ; B 0 275 500 345 ;
+C 178 ; WX 500 ; N dagger ; B 40 -176 461 750 ;
+C 179 ; WX 500 ; N daggerdbl ; B 39 -176 462 750 ;
+C 180 ; WX 250 ; N periodcentered ; B 80 204 171 304 ;
+C 182 ; WX 440 ; N paragraph ; B 0 -116 391 750 ;
+C 183 ; WX 333 ; N bullet ; B 15 222 318 529 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 64 -146 158 100 ;
+C 185 ; WX 389 ; N quotedblbase ; B 62 -146 327 100 ;
+C 186 ; WX 389 ; N quotedblright ; B 62 504 327 750 ;
+C 187 ; WX 500 ; N guillemotright ; B 85 125 415 495 ;
+C 188 ; WX 1000 ; N ellipsis ; B 121 0 878 100 ;
+C 189 ; WX 1111 ; N perthousand ; B 47 -16 1071 750 ;
+C 191 ; WX 500 ; N questiondown ; B 38 -190 440 559 ;
+C 193 ; WX 333 ; N grave ; B 35 624 233 765 ;
+C 194 ; WX 333 ; N acute ; B 100 624 298 765 ;
+C 195 ; WX 333 ; N circumflex ; B 21 624 313 765 ;
+C 196 ; WX 333 ; N tilde ; B -3 633 337 749 ;
+C 197 ; WX 333 ; N macron ; B 10 657 323 715 ;
+C 198 ; WX 333 ; N breve ; B 12 629 321 765 ;
+C 199 ; WX 250 ; N dotaccent ; B 86 650 165 750 ;
+C 200 ; WX 333 ; N dieresis ; B 52 650 281 750 ;
+C 202 ; WX 250 ; N ring ; B 23 593 227 796 ;
+C 203 ; WX 333 ; N cedilla ; B 66 -224 281 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 61 624 440 765 ;
+C 206 ; WX 333 ; N ogonek ; B 0 -191 208 13 ;
+C 207 ; WX 333 ; N caron ; B 21 624 313 765 ;
+C 208 ; WX 1000 ; N emdash ; B 0 275 1000 345 ;
+C 225 ; WX 833 ; N AE ; B 0 0 785 750 ;
+C 227 ; WX 300 ; N ordfeminine ; B 25 305 276 765 ;
+C 232 ; WX 500 ; N Lslash ; B -13 0 472 750 ;
+C 233 ; WX 611 ; N Oslash ; B 29 -43 573 796 ;
+C 234 ; WX 833 ; N OE ; B 56 -18 787 765 ;
+C 235 ; WX 300 ; N ordmasculine ; B 20 305 279 765 ;
+C 241 ; WX 667 ; N ae ; B 26 -15 630 571 ;
+C 245 ; WX 222 ; N dotlessi ; B 72 0 151 556 ;
+C 248 ; WX 222 ; N lslash ; B -8 0 231 750 ;
+C 249 ; WX 500 ; N oslash ; B 25 -46 472 582 ;
+C 250 ; WX 722 ; N oe ; B 40 -15 676 571 ;
+C 251 ; WX 500 ; N germandbls ; B 71 -5 445 765 ;
+C -1 ; WX 500 ; N Zcaron ; B 28 0 473 959 ;
+C -1 ; WX 444 ; N ccedilla ; B 44 -224 405 571 ;
+C -1 ; WX 444 ; N ydieresis ; B 5 -190 425 750 ;
+C -1 ; WX 444 ; N atilde ; B 31 -15 417 749 ;
+C -1 ; WX 222 ; N icircumflex ; B -34 0 258 765 ;
+C -1 ; WX 300 ; N threesuperior ; B 17 291 283 750 ;
+C -1 ; WX 444 ; N ecircumflex ; B 43 -15 395 765 ;
+C -1 ; WX 500 ; N thorn ; B 72 -188 447 750 ;
+C -1 ; WX 444 ; N egrave ; B 43 -15 395 765 ;
+C -1 ; WX 300 ; N twosuperior ; B 19 300 281 750 ;
+C -1 ; WX 444 ; N eacute ; B 43 -15 395 765 ;
+C -1 ; WX 500 ; N otilde ; B 51 -15 449 749 ;
+C -1 ; WX 556 ; N Aacute ; B 11 0 546 959 ;
+C -1 ; WX 500 ; N ocircumflex ; B 51 -15 449 765 ;
+C -1 ; WX 444 ; N yacute ; B 5 -190 425 765 ;
+C -1 ; WX 500 ; N udieresis ; B 77 -15 424 750 ;
+C -1 ; WX 750 ; N threequarters ; B 21 0 730 750 ;
+C -1 ; WX 444 ; N acircumflex ; B 31 -15 417 765 ;
+C -1 ; WX 611 ; N Eth ; B -6 0 548 750 ;
+C -1 ; WX 444 ; N edieresis ; B 43 -15 395 750 ;
+C -1 ; WX 500 ; N ugrave ; B 77 -15 424 765 ;
+C -1 ; WX 750 ; N trademark ; B 0 329 719 750 ;
+C -1 ; WX 500 ; N ograve ; B 51 -15 449 765 ;
+C -1 ; WX 444 ; N scaron ; B 43 -15 400 765 ;
+C -1 ; WX 278 ; N Idieresis ; B 25 0 254 944 ;
+C -1 ; WX 500 ; N uacute ; B 77 -15 424 765 ;
+C -1 ; WX 444 ; N agrave ; B 31 -15 417 765 ;
+C -1 ; WX 500 ; N ntilde ; B 73 0 428 749 ;
+C -1 ; WX 444 ; N aring ; B 31 -15 417 796 ;
+C -1 ; WX 389 ; N zcaron ; B 24 0 366 765 ;
+C -1 ; WX 278 ; N Icircumflex ; B -6 0 286 959 ;
+C -1 ; WX 611 ; N Ntilde ; B 77 0 534 943 ;
+C -1 ; WX 500 ; N ucircumflex ; B 77 -15 424 765 ;
+C -1 ; WX 500 ; N Ecircumflex ; B 74 0 451 959 ;
+C -1 ; WX 278 ; N Iacute ; B 73 0 271 959 ;
+C -1 ; WX 556 ; N Ccedilla ; B 53 -224 503 765 ;
+C -1 ; WX 611 ; N Odieresis ; B 59 -18 553 944 ;
+C -1 ; WX 556 ; N Scaron ; B 51 -18 505 959 ;
+C -1 ; WX 500 ; N Edieresis ; B 74 0 451 944 ;
+C -1 ; WX 278 ; N Igrave ; B 8 0 206 959 ;
+C -1 ; WX 444 ; N adieresis ; B 31 -15 417 750 ;
+C -1 ; WX 611 ; N Ograve ; B 59 -18 553 959 ;
+C -1 ; WX 500 ; N Egrave ; B 74 0 451 959 ;
+C -1 ; WX 556 ; N Ydieresis ; B 11 0 546 944 ;
+C -1 ; WX 800 ; N registered ; B 8 -18 792 765 ;
+C -1 ; WX 611 ; N Otilde ; B 59 -18 553 943 ;
+C -1 ; WX 750 ; N onequarter ; B 34 0 716 750 ;
+C -1 ; WX 611 ; N Ugrave ; B 81 -18 531 959 ;
+C -1 ; WX 611 ; N Ucircumflex ; B 81 -18 531 959 ;
+C -1 ; WX 556 ; N Thorn ; B 86 0 519 750 ;
+C -1 ; WX 500 ; N divide ; B 44 3 457 505 ;
+C -1 ; WX 556 ; N Atilde ; B 11 0 546 943 ;
+C -1 ; WX 611 ; N Uacute ; B 81 -18 531 959 ;
+C -1 ; WX 611 ; N Ocircumflex ; B 59 -18 553 959 ;
+C -1 ; WX 500 ; N logicalnot ; B 44 117 457 384 ;
+C -1 ; WX 556 ; N Aring ; B 11 0 546 990 ;
+C -1 ; WX 222 ; N idieresis ; B -3 0 226 750 ;
+C -1 ; WX 222 ; N iacute ; B 45 0 243 765 ;
+C -1 ; WX 444 ; N aacute ; B 31 -15 417 765 ;
+C -1 ; WX 500 ; N plusminus ; B 44 0 457 505 ;
+C -1 ; WX 500 ; N multiply ; B 44 48 457 461 ;
+C -1 ; WX 611 ; N Udieresis ; B 81 -18 531 944 ;
+C -1 ; WX 500 ; N minus ; B 44 219 457 289 ;
+C -1 ; WX 300 ; N onesuperior ; B 67 300 233 750 ;
+C -1 ; WX 500 ; N Eacute ; B 74 0 451 959 ;
+C -1 ; WX 556 ; N Acircumflex ; B 11 0 546 959 ;
+C -1 ; WX 800 ; N copyright ; B 8 -18 792 765 ;
+C -1 ; WX 556 ; N Agrave ; B 11 0 546 959 ;
+C -1 ; WX 500 ; N odieresis ; B 51 -15 449 750 ;
+C -1 ; WX 500 ; N oacute ; B 51 -15 449 765 ;
+C -1 ; WX 400 ; N degree ; B 50 450 350 750 ;
+C -1 ; WX 222 ; N igrave ; B -20 0 178 765 ;
+C -1 ; WX 500 ; N mu ; B 75 -189 422 556 ;
+C -1 ; WX 611 ; N Oacute ; B 59 -18 553 959 ;
+C -1 ; WX 500 ; N eth ; B 42 -15 440 770 ;
+C -1 ; WX 556 ; N Adieresis ; B 11 0 546 944 ;
+C -1 ; WX 556 ; N Yacute ; B 11 0 546 959 ;
+C -1 ; WX 250 ; N brokenbar ; B 93 0 157 750 ;
+C -1 ; WX 750 ; N onehalf ; B 42 0 709 750 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -55
+KPX A W -37
+KPX A V -37
+KPX A T -55
+
+KPX F period -111
+KPX F comma -111
+KPX F A -37
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -92
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W 0
+KPX R V 0
+KPX R T -18
+
+KPX T y -55
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T s -74
+KPX T r -74
+KPX T period -92
+KPX T o -74
+KPX T i -18
+KPX T hyphen -55
+KPX T e -74
+KPX T comma -92
+KPX T colon -74
+KPX T c -74
+KPX T a -74
+KPX T A -55
+
+KPX V y 0
+KPX V u -18
+KPX V semicolon -18
+KPX V r -18
+KPX V period -92
+KPX V o -18
+KPX V i 0
+KPX V hyphen -18
+KPX V e -18
+KPX V comma -92
+KPX V colon -18
+KPX V a -18
+KPX V A -37
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon 0
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon 0
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -37
+KPX Y semicolon -37
+KPX Y q -55
+KPX Y period -111
+KPX Y p -37
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -74
+KPX Y e -55
+KPX Y comma -111
+KPX Y colon -37
+KPX Y a -55
+KPX Y A -55
+
+KPX f quoteright 18
+KPX f f 0
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -18
+
+KPX r z 20
+KPX r y 18
+KPX r x 20
+KPX r w 18
+KPX r v 18
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 0
+KPX r q 0
+KPX r period -74
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 20
+KPX r e 0
+KPX r d 0
+KPX r comma -74
+KPX r c -20
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 112 194 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 112 194 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 112 194 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 112 194 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 153 194 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 112 194 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 112 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 84 194 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 84 194 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 84 194 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 84 194 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -27 194 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -27 194 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -27 194 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -27 194 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 139 194 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 139 194 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 139 194 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 139 194 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 139 194 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 139 194 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 112 194 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 139 194 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 139 194 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 139 194 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 139 194 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 112 194 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 112 194 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 84 194 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 56 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 56 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 56 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 56 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 97 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 56 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 56 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 56 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 56 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 56 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 56 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -55 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -55 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -55 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -55 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 84 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 84 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 84 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 84 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 84 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 56 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 84 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 84 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 84 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 84 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 56 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 56 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 28 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-CnBd b/font/He-CnBd
new file mode 100644
index 0000000..d194cbc
--- /dev/null
+++ b/font/He-CnBd
@@ -0,0 +1,447 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989 Adobe Systems Incorporated.  All rights reserved.
+Comment Creation Date: Tue Dec  5 16:31:49 1989
+Comment UniqueID 26320
+Comment VMusage 26214 33106
+FontName Helvetica-Condensed-Bold
+FullName Helvetica Condensed Bold
+FamilyName Helvetica
+Weight BoldCondensed
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -169 -228 1091 971
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.003
+Notice Copyright (c) 1985, 1987, 1989 Adobe Systems Incorporated.  All rights reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 750
+XHeight 564
+Ascender 750
+Descender -189
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 101 0 232 750 ;
+C 34 ; WX 333 ; N quotedbl ; B 16 468 318 739 ;
+C 35 ; WX 500 ; N numbersign ; B 31 0 469 738 ;
+C 36 ; WX 500 ; N dollar ; B 35 -124 466 803 ;
+C 37 ; WX 833 ; N percent ; B 31 -15 803 750 ;
+C 38 ; WX 667 ; N ampersand ; B 63 -18 615 768 ;
+C 39 ; WX 278 ; N quoteright ; B 81 479 202 750 ;
+C 40 ; WX 333 ; N parenleft ; B 52 -198 281 768 ;
+C 41 ; WX 333 ; N parenright ; B 52 -198 281 768 ;
+C 42 ; WX 500 ; N asterisk ; B 79 412 422 738 ;
+C 43 ; WX 500 ; N plus ; B 26 0 475 492 ;
+C 44 ; WX 333 ; N comma ; B 101 -145 233 132 ;
+C 45 ; WX 333 ; N hyphen ; B 48 255 286 370 ;
+C 46 ; WX 333 ; N period ; B 101 0 233 132 ;
+C 47 ; WX 278 ; N slash ; B -11 -94 312 750 ;
+C 48 ; WX 500 ; N zero ; B 48 -15 453 753 ;
+C 49 ; WX 500 ; N one ; B 44 0 353 750 ;
+C 50 ; WX 500 ; N two ; B 32 0 453 753 ;
+C 51 ; WX 500 ; N three ; B 28 -15 453 753 ;
+C 52 ; WX 500 ; N four ; B 23 0 470 738 ;
+C 53 ; WX 500 ; N five ; B 37 -15 458 738 ;
+C 54 ; WX 500 ; N six ; B 42 -15 459 753 ;
+C 55 ; WX 500 ; N seven ; B 32 0 454 738 ;
+C 56 ; WX 500 ; N eight ; B 41 -15 460 753 ;
+C 57 ; WX 500 ; N nine ; B 42 -15 459 753 ;
+C 58 ; WX 278 ; N colon ; B 73 0 205 556 ;
+C 59 ; WX 278 ; N semicolon ; B 73 -145 205 556 ;
+C 60 ; WX 500 ; N less ; B 42 -24 459 527 ;
+C 61 ; WX 500 ; N equal ; B 26 96 475 401 ;
+C 62 ; WX 500 ; N greater ; B 42 -24 459 527 ;
+C 63 ; WX 500 ; N question ; B 51 0 440 768 ;
+C 64 ; WX 833 ; N at ; B 38 -18 795 768 ;
+C 65 ; WX 556 ; N A ; B 9 0 547 750 ;
+C 66 ; WX 556 ; N B ; B 65 0 506 750 ;
+C 67 ; WX 556 ; N C ; B 55 -18 512 768 ;
+C 68 ; WX 611 ; N D ; B 72 0 550 750 ;
+C 69 ; WX 500 ; N E ; B 64 0 458 750 ;
+C 70 ; WX 500 ; N F ; B 73 0 470 750 ;
+C 71 ; WX 611 ; N G ; B 55 -18 542 768 ;
+C 72 ; WX 611 ; N H ; B 68 0 544 750 ;
+C 73 ; WX 278 ; N I ; B 69 0 209 750 ;
+C 74 ; WX 444 ; N J ; B 7 -18 384 750 ;
+C 75 ; WX 556 ; N K ; B 68 0 547 750 ;
+C 76 ; WX 500 ; N L ; B 68 0 468 750 ;
+C 77 ; WX 778 ; N M ; B 67 0 712 750 ;
+C 78 ; WX 611 ; N N ; B 68 0 543 750 ;
+C 79 ; WX 611 ; N O ; B 61 -18 551 768 ;
+C 80 ; WX 556 ; N P ; B 68 0 529 750 ;
+C 81 ; WX 611 ; N Q ; B 61 -71 587 768 ;
+C 82 ; WX 611 ; N R ; B 66 0 567 750 ;
+C 83 ; WX 556 ; N S ; B 49 -18 508 768 ;
+C 84 ; WX 500 ; N T ; B 17 0 484 750 ;
+C 85 ; WX 611 ; N U ; B 68 -18 544 750 ;
+C 86 ; WX 556 ; N V ; B 21 0 536 750 ;
+C 87 ; WX 833 ; N W ; B 24 0 810 750 ;
+C 88 ; WX 556 ; N X ; B 11 0 545 750 ;
+C 89 ; WX 556 ; N Y ; B 12 0 545 750 ;
+C 90 ; WX 500 ; N Z ; B 33 0 468 750 ;
+C 91 ; WX 333 ; N bracketleft ; B 81 -94 280 750 ;
+C 92 ; WX 250 ; N backslash ; B -89 0 340 750 ;
+C 93 ; WX 333 ; N bracketright ; B 53 -94 252 750 ;
+C 94 ; WX 500 ; N asciicircum ; B 10 326 490 750 ;
+C 95 ; WX 500 ; N underscore ; B 0 -119 500 -61 ;
+C 96 ; WX 278 ; N quoteleft ; B 76 495 197 766 ;
+C 97 ; WX 500 ; N a ; B 42 -15 440 579 ;
+C 98 ; WX 500 ; N b ; B 64 -15 444 750 ;
+C 99 ; WX 444 ; N c ; B 49 -15 403 579 ;
+C 100 ; WX 500 ; N d ; B 53 -15 433 750 ;
+C 101 ; WX 500 ; N e ; B 53 -15 443 579 ;
+C 102 ; WX 278 ; N f ; B 21 0 257 750 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 53 -190 433 579 ;
+C 104 ; WX 500 ; N h ; B 61 0 440 750 ;
+C 105 ; WX 278 ; N i ; B 74 0 204 750 ;
+C 106 ; WX 278 ; N j ; B 31 -192 210 750 ;
+C 107 ; WX 444 ; N k ; B 48 0 443 750 ;
+C 108 ; WX 278 ; N l ; B 74 0 204 750 ;
+C 109 ; WX 778 ; N m ; B 66 0 712 579 ;
+C 110 ; WX 500 ; N n ; B 61 0 440 579 ;
+C 111 ; WX 500 ; N o ; B 53 -15 447 579 ;
+C 112 ; WX 500 ; N p ; B 58 -189 438 579 ;
+C 113 ; WX 500 ; N q ; B 50 -188 430 579 ;
+C 114 ; WX 333 ; N r ; B 60 0 319 574 ;
+C 115 ; WX 444 ; N s ; B 28 -15 407 579 ;
+C 116 ; WX 278 ; N t ; B 14 -7 252 719 ;
+C 117 ; WX 500 ; N u ; B 58 -15 431 564 ;
+C 118 ; WX 444 ; N v ; B 10 0 434 564 ;
+C 119 ; WX 667 ; N w ; B 11 0 645 564 ;
+C 120 ; WX 444 ; N x ; B 8 0 436 564 ;
+C 121 ; WX 444 ; N y ; B 5 -195 429 564 ;
+C 122 ; WX 389 ; N z ; B 23 0 367 564 ;
+C 123 ; WX 274 ; N braceleft ; B -32 -92 240 750 ;
+C 124 ; WX 250 ; N bar ; B 75 0 175 750 ;
+C 125 ; WX 274 ; N braceright ; B 34 -94 306 750 ;
+C 126 ; WX 500 ; N asciitilde ; B 26 153 475 359 ;
+C 161 ; WX 333 ; N exclamdown ; B 102 -170 232 579 ;
+C 162 ; WX 500 ; N cent ; B 72 -122 428 671 ;
+C 163 ; WX 500 ; N sterling ; B 35 -15 487 768 ;
+C 164 ; WX 167 ; N fraction ; B -169 0 331 738 ;
+C 165 ; WX 500 ; N yen ; B -18 0 518 750 ;
+C 166 ; WX 500 ; N florin ; B 9 -185 492 763 ;
+C 167 ; WX 500 ; N section ; B 37 -183 463 768 ;
+C 168 ; WX 500 ; N currency ; B 9 58 492 560 ;
+C 169 ; WX 250 ; N quotesingle ; B 66 468 185 739 ;
+C 170 ; WX 500 ; N quotedblleft ; B 87 495 405 766 ;
+C 171 ; WX 500 ; N guillemotleft ; B 74 62 419 447 ;
+C 172 ; WX 278 ; N guilsinglleft ; B 58 62 215 447 ;
+C 173 ; WX 278 ; N guilsinglright ; B 63 62 220 447 ;
+C 174 ; WX 500 ; N fi ; B 10 0 446 750 ;
+C 175 ; WX 500 ; N fl ; B 10 0 443 750 ;
+C 177 ; WX 500 ; N endash ; B 0 259 500 369 ;
+C 178 ; WX 500 ; N dagger ; B 37 -155 463 768 ;
+C 179 ; WX 500 ; N daggerdbl ; B 35 -161 466 768 ;
+C 180 ; WX 333 ; N periodcentered ; B 101 183 233 315 ;
+C 182 ; WX 550 ; N paragraph ; B 23 -116 526 750 ;
+C 183 ; WX 420 ; N bullet ; B 22 186 398 562 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 87 -138 207 132 ;
+C 185 ; WX 500 ; N quotedblbase ; B 96 -138 413 132 ;
+C 186 ; WX 500 ; N quotedblright ; B 95 479 413 750 ;
+C 187 ; WX 500 ; N guillemotright ; B 81 62 426 447 ;
+C 188 ; WX 1000 ; N ellipsis ; B 101 0 899 132 ;
+C 189 ; WX 1111 ; N perthousand ; B 21 -18 1091 748 ;
+C 191 ; WX 500 ; N questiondown ; B 60 -190 449 579 ;
+C 193 ; WX 333 ; N grave ; B 1 629 250 775 ;
+C 194 ; WX 333 ; N acute ; B 83 629 332 775 ;
+C 195 ; WX 333 ; N circumflex ; B -10 644 343 790 ;
+C 196 ; WX 333 ; N tilde ; B -16 636 350 764 ;
+C 197 ; WX 333 ; N macron ; B -6 666 340 740 ;
+C 198 ; WX 333 ; N breve ; B -1 635 335 780 ;
+C 199 ; WX 333 ; N dotaccent ; B 103 644 230 759 ;
+C 200 ; WX 333 ; N dieresis ; B 5 644 328 759 ;
+C 202 ; WX 333 ; N ring ; B 60 632 273 845 ;
+C 203 ; WX 333 ; N cedilla ; B 39 -228 275 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -17 634 447 780 ;
+C 206 ; WX 333 ; N ogonek ; B 88 -205 278 0 ;
+C 207 ; WX 333 ; N caron ; B -10 634 343 780 ;
+C 208 ; WX 1000 ; N emdash ; B 0 259 1000 369 ;
+C 225 ; WX 778 ; N AE ; B -22 0 750 750 ;
+C 227 ; WX 300 ; N ordfeminine ; B 20 291 281 768 ;
+C 232 ; WX 500 ; N Lslash ; B 0 0 474 750 ;
+C 233 ; WX 611 ; N Oslash ; B 36 -38 578 779 ;
+C 234 ; WX 833 ; N OE ; B 61 -18 792 768 ;
+C 235 ; WX 300 ; N ordmasculine ; B 22 291 278 768 ;
+C 241 ; WX 722 ; N ae ; B 44 -15 672 579 ;
+C 245 ; WX 278 ; N dotlessi ; B 74 0 204 564 ;
+C 248 ; WX 278 ; N lslash ; B 2 0 272 750 ;
+C 249 ; WX 500 ; N oslash ; B 7 -58 492 617 ;
+C 250 ; WX 722 ; N oe ; B 46 -15 678 579 ;
+C 251 ; WX 500 ; N germandbls ; B 60 -15 445 768 ;
+C -1 ; WX 500 ; N Zcaron ; B 33 0 468 946 ;
+C -1 ; WX 444 ; N ccedilla ; B 49 -228 403 579 ;
+C -1 ; WX 444 ; N ydieresis ; B 5 -195 429 759 ;
+C -1 ; WX 500 ; N atilde ; B 42 -15 440 744 ;
+C -1 ; WX 278 ; N icircumflex ; B -47 0 306 770 ;
+C -1 ; WX 300 ; N threesuperior ; B 12 290 288 751 ;
+C -1 ; WX 500 ; N ecircumflex ; B 53 -15 443 770 ;
+C -1 ; WX 500 ; N thorn ; B 58 -189 438 750 ;
+C -1 ; WX 500 ; N egrave ; B 53 -15 443 775 ;
+C -1 ; WX 300 ; N twosuperior ; B 13 300 287 752 ;
+C -1 ; WX 500 ; N eacute ; B 53 -15 443 775 ;
+C -1 ; WX 500 ; N otilde ; B 53 -15 447 744 ;
+C -1 ; WX 556 ; N Aacute ; B 9 0 547 961 ;
+C -1 ; WX 500 ; N ocircumflex ; B 53 -15 447 770 ;
+C -1 ; WX 444 ; N yacute ; B 5 -195 429 775 ;
+C -1 ; WX 500 ; N udieresis ; B 58 -15 431 759 ;
+C -1 ; WX 750 ; N threequarters ; B 12 0 739 751 ;
+C -1 ; WX 500 ; N acircumflex ; B 42 -15 440 770 ;
+C -1 ; WX 611 ; N Eth ; B -6 0 550 750 ;
+C -1 ; WX 500 ; N edieresis ; B 53 -15 443 759 ;
+C -1 ; WX 500 ; N ugrave ; B 58 -15 431 775 ;
+C -1 ; WX 860 ; N trademark ; B 1 346 774 750 ;
+C -1 ; WX 500 ; N ograve ; B 53 -15 447 775 ;
+C -1 ; WX 444 ; N scaron ; B 28 -15 407 760 ;
+C -1 ; WX 278 ; N Idieresis ; B -22 0 301 945 ;
+C -1 ; WX 500 ; N uacute ; B 58 -15 431 775 ;
+C -1 ; WX 500 ; N agrave ; B 42 -15 440 775 ;
+C -1 ; WX 500 ; N ntilde ; B 61 0 440 744 ;
+C -1 ; WX 500 ; N aring ; B 42 -15 440 845 ;
+C -1 ; WX 389 ; N zcaron ; B 18 0 371 760 ;
+C -1 ; WX 278 ; N Icircumflex ; B -37 0 316 956 ;
+C -1 ; WX 611 ; N Ntilde ; B 68 0 543 930 ;
+C -1 ; WX 500 ; N ucircumflex ; B 58 -15 431 780 ;
+C -1 ; WX 500 ; N Ecircumflex ; B 64 0 458 956 ;
+C -1 ; WX 278 ; N Iacute ; B 56 0 305 961 ;
+C -1 ; WX 556 ; N Ccedilla ; B 55 -228 512 768 ;
+C -1 ; WX 611 ; N Odieresis ; B 61 -18 551 945 ;
+C -1 ; WX 556 ; N Scaron ; B 49 -18 508 946 ;
+C -1 ; WX 500 ; N Edieresis ; B 64 0 458 945 ;
+C -1 ; WX 278 ; N Igrave ; B -26 0 223 961 ;
+C -1 ; WX 500 ; N adieresis ; B 42 -15 440 759 ;
+C -1 ; WX 611 ; N Ograve ; B 61 -18 551 961 ;
+C -1 ; WX 500 ; N Egrave ; B 64 0 458 961 ;
+C -1 ; WX 556 ; N Ydieresis ; B 12 0 545 945 ;
+C -1 ; WX 830 ; N registered ; B 22 -18 808 768 ;
+C -1 ; WX 611 ; N Otilde ; B 61 -18 551 930 ;
+C -1 ; WX 750 ; N onequarter ; B 20 0 729 750 ;
+C -1 ; WX 611 ; N Ugrave ; B 68 -18 544 961 ;
+C -1 ; WX 611 ; N Ucircumflex ; B 68 -18 544 956 ;
+C -1 ; WX 556 ; N Thorn ; B 68 0 529 750 ;
+C -1 ; WX 500 ; N divide ; B 26 6 475 492 ;
+C -1 ; WX 556 ; N Atilde ; B 9 0 547 930 ;
+C -1 ; WX 611 ; N Uacute ; B 68 -18 544 961 ;
+C -1 ; WX 611 ; N Ocircumflex ; B 61 -18 551 956 ;
+C -1 ; WX 500 ; N logicalnot ; B 26 105 475 401 ;
+C -1 ; WX 556 ; N Aring ; B 9 0 547 971 ;
+C -1 ; WX 278 ; N idieresis ; B -22 0 301 759 ;
+C -1 ; WX 278 ; N iacute ; B 56 0 305 775 ;
+C -1 ; WX 500 ; N aacute ; B 42 -15 440 775 ;
+C -1 ; WX 500 ; N plusminus ; B 26 -15 475 513 ;
+C -1 ; WX 500 ; N multiply ; B 26 22 475 476 ;
+C -1 ; WX 611 ; N Udieresis ; B 68 -18 544 945 ;
+C -1 ; WX 500 ; N minus ; B 26 194 475 304 ;
+C -1 ; WX 300 ; N onesuperior ; B 50 300 251 750 ;
+C -1 ; WX 500 ; N Eacute ; B 64 0 458 961 ;
+C -1 ; WX 556 ; N Acircumflex ; B 9 0 547 956 ;
+C -1 ; WX 830 ; N copyright ; B 22 -18 808 768 ;
+C -1 ; WX 556 ; N Agrave ; B 9 0 547 961 ;
+C -1 ; WX 500 ; N odieresis ; B 53 -15 447 759 ;
+C -1 ; WX 500 ; N oacute ; B 53 -15 447 775 ;
+C -1 ; WX 400 ; N degree ; B 50 450 350 750 ;
+C -1 ; WX 278 ; N igrave ; B -26 0 223 775 ;
+C -1 ; WX 500 ; N mu ; B 58 -189 431 564 ;
+C -1 ; WX 611 ; N Oacute ; B 61 -18 551 961 ;
+C -1 ; WX 500 ; N eth ; B 46 -15 443 776 ;
+C -1 ; WX 556 ; N Adieresis ; B 9 0 547 945 ;
+C -1 ; WX 556 ; N Yacute ; B 12 0 545 961 ;
+C -1 ; WX 250 ; N brokenbar ; B 75 0 175 750 ;
+C -1 ; WX 750 ; N onehalf ; B 12 0 739 750 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -55
+KPX A W -37
+KPX A V -37
+KPX A T -55
+
+KPX F period -111
+KPX F comma -111
+KPX F A -37
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -92
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W 0
+KPX R V 0
+KPX R T -18
+
+KPX T y -55
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T s -74
+KPX T r -74
+KPX T period -92
+KPX T o -74
+KPX T i -18
+KPX T hyphen -55
+KPX T e -74
+KPX T comma -92
+KPX T colon -74
+KPX T c -74
+KPX T a -74
+KPX T A -55
+
+KPX V y 0
+KPX V u -18
+KPX V semicolon -18
+KPX V r -18
+KPX V period -92
+KPX V o -18
+KPX V i 0
+KPX V hyphen -18
+KPX V e -18
+KPX V comma -92
+KPX V colon -18
+KPX V a -18
+KPX V A -37
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon 0
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon 0
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -37
+KPX Y semicolon -37
+KPX Y q -55
+KPX Y period -111
+KPX Y p -37
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -74
+KPX Y e -55
+KPX Y comma -111
+KPX Y colon -37
+KPX Y a -55
+KPX Y A -55
+
+KPX f quoteright 18
+KPX f f 0
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -18
+
+KPX r z 20
+KPX r y 18
+KPX r x 20
+KPX r w 18
+KPX r v 18
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 0
+KPX r q 0
+KPX r period -74
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 0
+KPX r e 0
+KPX r d 0
+KPX r comma -74
+KPX r c 0
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 112 186 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 102 166 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 112 186 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 112 186 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 112 126 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 112 166 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 112 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 84 186 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 84 166 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 84 186 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 84 186 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -27 186 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -27 166 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -27 186 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -27 186 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 139 166 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 139 186 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 139 166 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 139 186 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 139 186 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 139 166 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 112 166 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 139 186 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 139 166 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 139 186 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 139 186 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 112 186 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 112 186 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 84 166 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 84 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 84 -20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 84 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 84 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 84 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 84 -20 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 56 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 84 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 84 -20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 84 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 84 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -37 -20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 84 -20 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 84 -20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 84 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 84 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 84 -20 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 46 -20 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 84 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 84 -10 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 84 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 84 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 56 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 56 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 28 -20 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-CnBdO b/font/He-CnBdO
new file mode 100644
index 0000000..3512c9d
--- /dev/null
+++ b/font/He-CnBdO
@@ -0,0 +1,447 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989 Adobe Systems Incorporated.  All rights reserved.
+Comment Creation Date: Tue Dec  5 16:32:56 1989
+Comment UniqueID 26321
+Comment VMusage 6334 40142
+FontName Helvetica-Condensed-BoldObl
+FullName Helvetica Condensed Bold Oblique
+FamilyName Helvetica
+Weight BoldCondensed
+ItalicAngle -12
+IsFixedPitch false
+FontBBox -169 -228 1141 971
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.003
+Notice Copyright (c) 1985, 1987, 1989 Adobe Systems Incorporated.  All rights reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 750
+XHeight 564
+Ascender 750
+Descender -189
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 102 0 390 750 ;
+C 34 ; WX 333 ; N quotedbl ; B 115 468 475 739 ;
+C 35 ; WX 500 ; N numbersign ; B 81 0 580 738 ;
+C 36 ; WX 500 ; N dollar ; B 68 -124 576 803 ;
+C 37 ; WX 833 ; N percent ; B 138 -15 853 750 ;
+C 38 ; WX 667 ; N ampersand ; B 101 -18 676 768 ;
+C 39 ; WX 278 ; N quoteright ; B 183 479 361 750 ;
+C 40 ; WX 333 ; N parenleft ; B 91 -198 442 768 ;
+C 41 ; WX 333 ; N parenright ; B 12 -198 363 768 ;
+C 42 ; WX 500 ; N asterisk ; B 203 412 546 738 ;
+C 43 ; WX 500 ; N plus ; B 67 0 540 492 ;
+C 44 ; WX 333 ; N comma ; B 70 -145 261 132 ;
+C 45 ; WX 333 ; N hyphen ; B 102 255 365 370 ;
+C 46 ; WX 333 ; N period ; B 101 0 261 132 ;
+C 47 ; WX 278 ; N slash ; B -31 -94 471 750 ;
+C 48 ; WX 500 ; N zero ; B 82 -15 576 753 ;
+C 49 ; WX 500 ; N one ; B 155 0 512 750 ;
+C 50 ; WX 500 ; N two ; B 32 0 577 753 ;
+C 51 ; WX 500 ; N three ; B 61 -15 563 753 ;
+C 52 ; WX 500 ; N four ; B 55 0 563 738 ;
+C 53 ; WX 500 ; N five ; B 72 -15 581 738 ;
+C 54 ; WX 500 ; N six ; B 83 -15 575 753 ;
+C 55 ; WX 500 ; N seven ; B 126 0 611 738 ;
+C 56 ; WX 500 ; N eight ; B 76 -15 570 753 ;
+C 57 ; WX 500 ; N nine ; B 84 -15 575 753 ;
+C 58 ; WX 278 ; N colon ; B 73 0 323 556 ;
+C 59 ; WX 278 ; N semicolon ; B 42 -145 323 556 ;
+C 60 ; WX 500 ; N less ; B 85 -24 571 527 ;
+C 61 ; WX 500 ; N equal ; B 46 96 560 401 ;
+C 62 ; WX 500 ; N greater ; B 37 -24 523 527 ;
+C 63 ; WX 500 ; N question ; B 147 0 569 768 ;
+C 64 ; WX 833 ; N at ; B 109 -18 897 768 ;
+C 65 ; WX 556 ; N A ; B 9 0 547 750 ;
+C 66 ; WX 556 ; N B ; B 65 0 615 750 ;
+C 67 ; WX 556 ; N C ; B 99 -18 630 768 ;
+C 68 ; WX 611 ; N D ; B 72 0 662 750 ;
+C 69 ; WX 500 ; N E ; B 64 0 617 750 ;
+C 70 ; WX 500 ; N F ; B 73 0 629 750 ;
+C 71 ; WX 611 ; N G ; B 99 -18 664 768 ;
+C 72 ; WX 611 ; N H ; B 68 0 703 750 ;
+C 73 ; WX 278 ; N I ; B 69 0 368 750 ;
+C 74 ; WX 444 ; N J ; B 36 -18 543 750 ;
+C 75 ; WX 556 ; N K ; B 68 0 697 750 ;
+C 76 ; WX 500 ; N L ; B 68 0 491 750 ;
+C 77 ; WX 778 ; N M ; B 67 0 871 750 ;
+C 78 ; WX 611 ; N N ; B 68 0 702 750 ;
+C 79 ; WX 611 ; N O ; B 105 -18 664 768 ;
+C 80 ; WX 556 ; N P ; B 68 0 651 750 ;
+C 81 ; WX 611 ; N Q ; B 105 -71 664 768 ;
+C 82 ; WX 611 ; N R ; B 66 0 671 750 ;
+C 83 ; WX 556 ; N S ; B 85 -18 613 768 ;
+C 84 ; WX 500 ; N T ; B 153 0 643 750 ;
+C 85 ; WX 611 ; N U ; B 105 -18 703 750 ;
+C 86 ; WX 556 ; N V ; B 180 0 695 750 ;
+C 87 ; WX 833 ; N W ; B 167 0 969 750 ;
+C 88 ; WX 556 ; N X ; B 11 0 698 750 ;
+C 89 ; WX 556 ; N Y ; B 171 0 704 750 ;
+C 90 ; WX 500 ; N Z ; B 33 0 618 750 ;
+C 91 ; WX 333 ; N bracketleft ; B 61 -94 439 750 ;
+C 92 ; WX 250 ; N backslash ; B 70 0 340 750 ;
+C 93 ; WX 333 ; N bracketright ; B 33 -94 411 750 ;
+C 94 ; WX 500 ; N asciicircum ; B 89 326 569 750 ;
+C 95 ; WX 500 ; N underscore ; B -25 -119 487 -61 ;
+C 96 ; WX 278 ; N quoteleft ; B 181 495 360 766 ;
+C 97 ; WX 500 ; N a ; B 68 -15 525 579 ;
+C 98 ; WX 500 ; N b ; B 64 -15 534 750 ;
+C 99 ; WX 444 ; N c ; B 79 -15 496 579 ;
+C 100 ; WX 500 ; N d ; B 83 -15 592 750 ;
+C 101 ; WX 500 ; N e ; B 88 -15 530 579 ;
+C 102 ; WX 278 ; N f ; B 71 0 416 750 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 44 -190 553 579 ;
+C 104 ; WX 500 ; N h ; B 61 0 539 750 ;
+C 105 ; WX 278 ; N i ; B 74 0 363 750 ;
+C 106 ; WX 278 ; N j ; B -9 -192 368 750 ;
+C 107 ; WX 444 ; N k ; B 48 0 563 750 ;
+C 108 ; WX 278 ; N l ; B 74 0 363 750 ;
+C 109 ; WX 778 ; N m ; B 66 0 812 579 ;
+C 110 ; WX 500 ; N n ; B 61 0 539 579 ;
+C 111 ; WX 500 ; N o ; B 88 -15 531 579 ;
+C 112 ; WX 500 ; N p ; B 18 -189 528 579 ;
+C 113 ; WX 500 ; N q ; B 80 -188 550 579 ;
+C 114 ; WX 333 ; N r ; B 60 0 441 574 ;
+C 115 ; WX 444 ; N s ; B 56 -15 498 579 ;
+C 116 ; WX 278 ; N t ; B 83 -7 372 719 ;
+C 117 ; WX 500 ; N u ; B 78 -15 551 564 ;
+C 118 ; WX 444 ; N v ; B 130 0 554 564 ;
+C 119 ; WX 667 ; N w ; B 127 0 765 564 ;
+C 120 ; WX 444 ; N x ; B 8 0 553 564 ;
+C 121 ; WX 444 ; N y ; B 36 -195 549 564 ;
+C 122 ; WX 389 ; N z ; B 23 0 487 564 ;
+C 123 ; WX 274 ; N braceleft ; B 37 -92 399 750 ;
+C 124 ; WX 250 ; N bar ; B 75 0 334 750 ;
+C 125 ; WX 274 ; N braceright ; B 14 -94 375 750 ;
+C 126 ; WX 500 ; N asciitilde ; B 74 153 536 359 ;
+C 161 ; WX 333 ; N exclamdown ; B 66 -170 355 579 ;
+C 162 ; WX 500 ; N cent ; B 103 -122 521 671 ;
+C 163 ; WX 500 ; N sterling ; B 52 -15 603 768 ;
+C 164 ; WX 167 ; N fraction ; B -169 0 488 738 ;
+C 165 ; WX 500 ; N yen ; B 89 0 677 750 ;
+C 166 ; WX 500 ; N florin ; B -28 -185 651 763 ;
+C 167 ; WX 500 ; N section ; B 48 -183 572 768 ;
+C 168 ; WX 500 ; N currency ; B 38 58 594 560 ;
+C 169 ; WX 250 ; N quotesingle ; B 165 468 342 739 ;
+C 170 ; WX 500 ; N quotedblleft ; B 192 495 568 766 ;
+C 171 ; WX 500 ; N guillemotleft ; B 117 62 514 447 ;
+C 172 ; WX 278 ; N guilsinglleft ; B 101 62 310 447 ;
+C 173 ; WX 278 ; N guilsinglright ; B 76 62 285 447 ;
+C 174 ; WX 500 ; N fi ; B 60 0 605 750 ;
+C 175 ; WX 500 ; N fl ; B 60 0 602 750 ;
+C 177 ; WX 500 ; N endash ; B 55 259 578 369 ;
+C 178 ; WX 500 ; N dagger ; B 127 -155 577 768 ;
+C 179 ; WX 500 ; N daggerdbl ; B 51 -161 579 768 ;
+C 180 ; WX 333 ; N periodcentered ; B 140 183 300 315 ;
+C 182 ; WX 550 ; N paragraph ; B 139 -116 685 750 ;
+C 183 ; WX 420 ; N bullet ; B 97 186 482 562 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 58 -138 235 132 ;
+C 185 ; WX 500 ; N quotedblbase ; B 67 -138 441 132 ;
+C 186 ; WX 500 ; N quotedblright ; B 197 479 572 750 ;
+C 187 ; WX 500 ; N guillemotright ; B 94 62 491 447 ;
+C 188 ; WX 1000 ; N ellipsis ; B 101 0 927 132 ;
+C 189 ; WX 1111 ; N perthousand ; B 128 -18 1141 748 ;
+C 191 ; WX 500 ; N questiondown ; B 54 -190 476 579 ;
+C 193 ; WX 333 ; N grave ; B 166 629 384 775 ;
+C 194 ; WX 333 ; N acute ; B 217 629 497 775 ;
+C 195 ; WX 333 ; N circumflex ; B 127 644 480 790 ;
+C 196 ; WX 333 ; N tilde ; B 119 636 512 764 ;
+C 197 ; WX 333 ; N macron ; B 136 666 497 740 ;
+C 198 ; WX 333 ; N breve ; B 161 635 501 780 ;
+C 199 ; WX 333 ; N dotaccent ; B 240 644 391 759 ;
+C 200 ; WX 333 ; N dieresis ; B 142 644 489 759 ;
+C 202 ; WX 333 ; N ring ; B 215 632 432 845 ;
+C 203 ; WX 333 ; N cedilla ; B -4 -228 248 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 118 634 613 780 ;
+C 206 ; WX 333 ; N ogonek ; B 63 -205 256 0 ;
+C 207 ; WX 333 ; N caron ; B 156 634 509 780 ;
+C 208 ; WX 1000 ; N emdash ; B 55 259 1078 369 ;
+C 225 ; WX 778 ; N AE ; B -22 0 909 750 ;
+C 227 ; WX 300 ; N ordfeminine ; B 82 291 421 768 ;
+C 232 ; WX 500 ; N Lslash ; B 49 0 497 750 ;
+C 233 ; WX 611 ; N Oslash ; B 34 -38 736 779 ;
+C 234 ; WX 833 ; N OE ; B 111 -18 951 768 ;
+C 235 ; WX 300 ; N ordmasculine ; B 84 291 417 768 ;
+C 241 ; WX 722 ; N ae ; B 69 -15 762 579 ;
+C 245 ; WX 278 ; N dotlessi ; B 74 0 324 564 ;
+C 248 ; WX 278 ; N lslash ; B 68 0 391 750 ;
+C 249 ; WX 500 ; N oslash ; B 2 -58 616 617 ;
+C 250 ; WX 722 ; N oe ; B 81 -15 763 579 ;
+C 251 ; WX 500 ; N germandbls ; B 60 -15 561 768 ;
+C -1 ; WX 500 ; N Zcaron ; B 33 0 628 946 ;
+C -1 ; WX 444 ; N ccedilla ; B 52 -228 496 579 ;
+C -1 ; WX 444 ; N ydieresis ; B 36 -195 549 759 ;
+C -1 ; WX 500 ; N atilde ; B 68 -15 592 744 ;
+C -1 ; WX 278 ; N icircumflex ; B 74 0 439 770 ;
+C -1 ; WX 300 ; N threesuperior ; B 96 290 416 751 ;
+C -1 ; WX 500 ; N ecircumflex ; B 88 -15 560 770 ;
+C -1 ; WX 500 ; N thorn ; B 18 -189 528 750 ;
+C -1 ; WX 500 ; N egrave ; B 88 -15 530 775 ;
+C -1 ; WX 300 ; N twosuperior ; B 77 300 425 752 ;
+C -1 ; WX 500 ; N eacute ; B 88 -15 581 775 ;
+C -1 ; WX 500 ; N otilde ; B 88 -15 592 744 ;
+C -1 ; WX 556 ; N Aacute ; B 9 0 648 961 ;
+C -1 ; WX 500 ; N ocircumflex ; B 88 -15 560 770 ;
+C -1 ; WX 444 ; N yacute ; B 36 -195 553 775 ;
+C -1 ; WX 500 ; N udieresis ; B 78 -15 573 759 ;
+C -1 ; WX 750 ; N threequarters ; B 96 0 816 751 ;
+C -1 ; WX 500 ; N acircumflex ; B 68 -15 560 770 ;
+C -1 ; WX 611 ; N Eth ; B 64 0 662 750 ;
+C -1 ; WX 500 ; N edieresis ; B 88 -15 573 759 ;
+C -1 ; WX 500 ; N ugrave ; B 78 -15 551 775 ;
+C -1 ; WX 860 ; N trademark ; B 144 346 933 750 ;
+C -1 ; WX 500 ; N ograve ; B 88 -15 531 775 ;
+C -1 ; WX 444 ; N scaron ; B 56 -15 551 760 ;
+C -1 ; WX 278 ; N Idieresis ; B 69 0 502 945 ;
+C -1 ; WX 500 ; N uacute ; B 78 -15 581 775 ;
+C -1 ; WX 500 ; N agrave ; B 68 -15 525 775 ;
+C -1 ; WX 500 ; N ntilde ; B 61 0 592 744 ;
+C -1 ; WX 500 ; N aring ; B 68 -15 525 845 ;
+C -1 ; WX 389 ; N zcaron ; B 23 0 533 760 ;
+C -1 ; WX 278 ; N Icircumflex ; B 69 0 488 956 ;
+C -1 ; WX 611 ; N Ntilde ; B 68 0 702 930 ;
+C -1 ; WX 500 ; N ucircumflex ; B 78 -15 562 780 ;
+C -1 ; WX 500 ; N Ecircumflex ; B 64 0 617 956 ;
+C -1 ; WX 278 ; N Iacute ; B 69 0 509 961 ;
+C -1 ; WX 556 ; N Ccedilla ; B 99 -228 630 768 ;
+C -1 ; WX 611 ; N Odieresis ; B 105 -18 668 945 ;
+C -1 ; WX 556 ; N Scaron ; B 85 -18 656 946 ;
+C -1 ; WX 500 ; N Edieresis ; B 64 0 617 945 ;
+C -1 ; WX 278 ; N Igrave ; B 69 0 396 961 ;
+C -1 ; WX 500 ; N adieresis ; B 68 -15 573 759 ;
+C -1 ; WX 611 ; N Ograve ; B 105 -18 664 961 ;
+C -1 ; WX 500 ; N Egrave ; B 64 0 617 961 ;
+C -1 ; WX 556 ; N Ydieresis ; B 171 0 704 945 ;
+C -1 ; WX 830 ; N registered ; B 93 -18 897 768 ;
+C -1 ; WX 611 ; N Otilde ; B 105 -18 687 930 ;
+C -1 ; WX 750 ; N onequarter ; B 131 0 788 750 ;
+C -1 ; WX 611 ; N Ugrave ; B 105 -18 703 961 ;
+C -1 ; WX 611 ; N Ucircumflex ; B 105 -18 703 956 ;
+C -1 ; WX 556 ; N Thorn ; B 68 0 618 750 ;
+C -1 ; WX 500 ; N divide ; B 67 6 540 492 ;
+C -1 ; WX 556 ; N Atilde ; B 9 0 660 930 ;
+C -1 ; WX 611 ; N Uacute ; B 105 -18 703 961 ;
+C -1 ; WX 611 ; N Ocircumflex ; B 105 -18 664 956 ;
+C -1 ; WX 500 ; N logicalnot ; B 88 105 560 401 ;
+C -1 ; WX 556 ; N Aring ; B 9 0 571 971 ;
+C -1 ; WX 278 ; N idieresis ; B 74 0 462 759 ;
+C -1 ; WX 278 ; N iacute ; B 74 0 470 775 ;
+C -1 ; WX 500 ; N aacute ; B 68 -15 581 775 ;
+C -1 ; WX 500 ; N plusminus ; B 23 -15 556 513 ;
+C -1 ; WX 500 ; N multiply ; B 48 22 560 476 ;
+C -1 ; WX 611 ; N Udieresis ; B 105 -18 703 945 ;
+C -1 ; WX 500 ; N minus ; B 67 194 540 304 ;
+C -1 ; WX 300 ; N onesuperior ; B 180 300 410 750 ;
+C -1 ; WX 500 ; N Eacute ; B 64 0 620 961 ;
+C -1 ; WX 556 ; N Acircumflex ; B 9 0 617 956 ;
+C -1 ; WX 830 ; N copyright ; B 93 -18 897 768 ;
+C -1 ; WX 556 ; N Agrave ; B 9 0 547 961 ;
+C -1 ; WX 500 ; N odieresis ; B 88 -15 573 759 ;
+C -1 ; WX 500 ; N oacute ; B 88 -15 581 775 ;
+C -1 ; WX 400 ; N degree ; B 174 450 481 750 ;
+C -1 ; WX 278 ; N igrave ; B 74 0 357 775 ;
+C -1 ; WX 500 ; N mu ; B 18 -189 551 564 ;
+C -1 ; WX 611 ; N Oacute ; B 105 -18 675 961 ;
+C -1 ; WX 500 ; N eth ; B 81 -15 538 776 ;
+C -1 ; WX 556 ; N Adieresis ; B 9 0 641 945 ;
+C -1 ; WX 556 ; N Yacute ; B 171 0 704 961 ;
+C -1 ; WX 250 ; N brokenbar ; B 75 0 334 750 ;
+C -1 ; WX 750 ; N onehalf ; B 108 0 813 750 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -55
+KPX A W -37
+KPX A V -37
+KPX A T -55
+
+KPX F period -111
+KPX F comma -111
+KPX F A -37
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -92
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W 0
+KPX R V 0
+KPX R T -18
+
+KPX T y -55
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T s -74
+KPX T r -74
+KPX T period -92
+KPX T o -74
+KPX T i -18
+KPX T hyphen -55
+KPX T e -74
+KPX T comma -92
+KPX T colon -74
+KPX T c -74
+KPX T a -74
+KPX T A -55
+
+KPX V y 0
+KPX V u -18
+KPX V semicolon -18
+KPX V r -18
+KPX V period -92
+KPX V o -18
+KPX V i 0
+KPX V hyphen -18
+KPX V e -18
+KPX V comma -92
+KPX V colon -18
+KPX V a -18
+KPX V A -37
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon 0
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon 0
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -37
+KPX Y semicolon -37
+KPX Y q -55
+KPX Y period -111
+KPX Y p -37
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -74
+KPX Y e -55
+KPX Y comma -111
+KPX Y colon -37
+KPX Y a -55
+KPX Y A -55
+
+KPX f quoteright 18
+KPX f f 0
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -18
+
+KPX r z 20
+KPX r y 18
+KPX r x 20
+KPX r w 18
+KPX r v 18
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 0
+KPX r q 0
+KPX r period -74
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 0
+KPX r e 0
+KPX r d 0
+KPX r comma -74
+KPX r c 0
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 152 186 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 137 166 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 152 186 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 152 186 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 139 126 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 147 166 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 112 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 124 186 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 119 166 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 124 186 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 124 186 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 13 186 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 8 166 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 13 186 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 13 186 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 174 166 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 179 186 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 174 166 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 179 186 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 179 186 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 174 166 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 147 166 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 179 186 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 174 166 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 179 186 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 179 186 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 152 186 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 152 186 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 119 166 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 84 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 80 -20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 84 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 84 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 84 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 80 -20 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 56 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 84 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 80 -20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 84 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 84 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -41 -20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 80 -20 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 80 -20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 84 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 84 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 80 -20 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 42 -20 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 84 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 82 -10 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 84 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 84 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 56 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 56 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 24 -20 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-CnBl b/font/He-CnBl
new file mode 100644
index 0000000..ba31b18
--- /dev/null
+++ b/font/He-CnBl
@@ -0,0 +1,445 @@
+StartFontMetrics 2.0
+Comment  Copyright (c) 1985, 1987 Adobe Systems Incorporated. All rights reserved.
+Comment Creation Date:Thu Aug 13 17:02:44 PDT 1987
+FontName Helvetica-Condensed-Black
+EncodingScheme AdobeStandardEncoding
+FullName Helvetica Condensed Black
+FamilyName Helvetica
+Weight BlackCondensed
+ItalicAngle 0.0
+IsFixedPitch false
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.002
+Notice Copyright (c) 1985, 1987 Adobe Systems Incorporated.  All rights reserved. Helvetica is a trademark of Allied Corporation.
+FontBBox -168 -232 1113 990
+CapHeight 750
+XHeight 560
+Descender -189
+Ascender 750
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 79 0 255 750 ;
+C 34 ; WX 333 ; N quotedbl ; B 16 468 318 739 ;
+C 35 ; WX 500 ; N numbersign ; B 9 0 491 750 ;
+C 36 ; WX 500 ; N dollar ; B 14 -126 484 786 ;
+C 37 ; WX 833 ; N percent ; B 24 -18 810 750 ;
+C 38 ; WX 667 ; N ampersand ; B 47 -18 645 768 ;
+C 39 ; WX 278 ; N quoteright ; B 58 437 216 750 ;
+C 40 ; WX 278 ; N parenleft ; B 24 -187 262 750 ;
+C 41 ; WX 278 ; N parenright ; B 16 -187 254 750 ;
+C 42 ; WX 500 ; N asterisk ; B 64 393 437 750 ;
+C 43 ; WX 500 ; N plus ; B 26 0 475 492 ;
+C 44 ; WX 333 ; N comma ; B 82 -156 251 171 ;
+C 45 ; WX 333 ; N hyphen ; B 43 237 291 387 ;
+C 46 ; WX 333 ; N period ; B 82 0 251 171 ;
+C 47 ; WX 278 ; N slash ; B -28 -94 307 750 ;
+C 48 ; WX 500 ; N zero ; B 28 -18 472 750 ;
+C 49 ; WX 500 ; N one ; B 37 0 349 734 ;
+C 50 ; WX 500 ; N two ; B 23 0 472 750 ;
+C 51 ; WX 500 ; N three ; B 19 -18 469 750 ;
+C 52 ; WX 500 ; N four ; B 9 0 484 734 ;
+C 53 ; WX 500 ; N five ; B 30 -18 473 734 ;
+C 54 ; WX 500 ; N six ; B 27 -18 474 750 ;
+C 55 ; WX 500 ; N seven ; B 24 0 456 734 ;
+C 56 ; WX 500 ; N eight ; B 29 -18 471 750 ;
+C 57 ; WX 500 ; N nine ; B 27 -18 474 750 ;
+C 58 ; WX 278 ; N colon ; B 55 0 224 555 ;
+C 59 ; WX 278 ; N semicolon ; B 55 -156 224 555 ;
+C 60 ; WX 500 ; N less ; B 42 -23 459 528 ;
+C 61 ; WX 500 ; N equal ; B 26 95 475 405 ;
+C 62 ; WX 500 ; N greater ; B 42 -23 459 528 ;
+C 63 ; WX 500 ; N question ; B 20 0 471 768 ;
+C 64 ; WX 830 ; N at ; B 37 -18 794 768 ;
+C 65 ; WX 556 ; N A ; B 9 0 548 750 ;
+C 66 ; WX 556 ; N B ; B 44 0 521 750 ;
+C 67 ; WX 556 ; N C ; B 39 -18 518 768 ;
+C 68 ; WX 556 ; N D ; B 46 0 514 750 ;
+C 69 ; WX 500 ; N E ; B 46 0 461 750 ;
+C 70 ; WX 500 ; N F ; B 49 0 463 750 ;
+C 71 ; WX 556 ; N G ; B 33 -18 512 768 ;
+C 72 ; WX 556 ; N H ; B 41 0 515 750 ;
+C 73 ; WX 278 ; N I ; B 51 0 227 750 ;
+C 74 ; WX 444 ; N J ; B 7 -18 395 750 ;
+C 75 ; WX 556 ; N K ; B 44 0 542 750 ;
+C 76 ; WX 444 ; N L ; B 37 0 428 750 ;
+C 77 ; WX 778 ; N M ; B 49 0 730 750 ;
+C 78 ; WX 556 ; N N ; B 43 0 513 750 ;
+C 79 ; WX 556 ; N O ; B 40 -18 517 768 ;
+C 80 ; WX 556 ; N P ; B 53 0 526 750 ;
+C 81 ; WX 556 ; N Q ; B 40 -123 550 768 ;
+C 82 ; WX 556 ; N R ; B 42 0 542 750 ;
+C 83 ; WX 500 ; N S ; B 16 -18 471 768 ;
+C 84 ; WX 500 ; N T ; B 22 0 478 750 ;
+C 85 ; WX 556 ; N U ; B 42 -18 515 750 ;
+C 86 ; WX 556 ; N V ; B 11 0 545 750 ;
+C 87 ; WX 778 ; N W ; B 10 0 768 750 ;
+C 88 ; WX 556 ; N X ; B 13 0 544 750 ;
+C 89 ; WX 556 ; N Y ; B 11 0 545 750 ;
+C 90 ; WX 444 ; N Z ; B 10 0 434 750 ;
+C 91 ; WX 278 ; N bracketleft ; B 42 -187 262 750 ;
+C 92 ; WX 250 ; N backslash ; B -99 0 350 750 ;
+C 93 ; WX 278 ; N bracketright ; B 16 -187 236 750 ;
+C 94 ; WX 500 ; N asciicircum ; B 15 326 485 750 ;
+C 95 ; WX 500 ; N underscore ; B 0 -119 500 -61 ;
+C 96 ; WX 278 ; N quoteleft ; B 62 455 220 768 ;
+C 97 ; WX 500 ; N a ; B 24 -18 473 576 ;
+C 98 ; WX 500 ; N b ; B 48 -18 464 750 ;
+C 99 ; WX 500 ; N c ; B 49 -18 462 576 ;
+C 100 ; WX 500 ; N d ; B 41 -18 454 750 ;
+C 101 ; WX 500 ; N e ; B 38 -18 466 576 ;
+C 102 ; WX 333 ; N f ; B 19 0 310 750 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 36 -189 453 576 ;
+C 104 ; WX 500 ; N h ; B 46 0 455 750 ;
+C 105 ; WX 278 ; N i ; B 60 0 219 750 ;
+C 106 ; WX 278 ; N j ; B 14 -189 223 750 ;
+C 107 ; WX 500 ; N k ; B 40 0 486 750 ;
+C 108 ; WX 278 ; N l ; B 60 0 219 750 ;
+C 109 ; WX 722 ; N m ; B 38 0 685 576 ;
+C 110 ; WX 500 ; N n ; B 49 0 452 576 ;
+C 111 ; WX 500 ; N o ; B 42 -18 458 576 ;
+C 112 ; WX 500 ; N p ; B 42 -189 458 576 ;
+C 113 ; WX 500 ; N q ; B 35 -188 451 576 ;
+C 114 ; WX 333 ; N r ; B 42 0 315 576 ;
+C 115 ; WX 444 ; N s ; B 11 -18 431 576 ;
+C 116 ; WX 333 ; N t ; B 12 -8 310 720 ;
+C 117 ; WX 500 ; N u ; B 46 -18 449 560 ;
+C 118 ; WX 444 ; N v ; B 9 0 436 560 ;
+C 119 ; WX 667 ; N w ; B 9 0 659 560 ;
+C 120 ; WX 444 ; N x ; B 9 0 435 560 ;
+C 121 ; WX 444 ; N y ; B 6 -189 433 560 ;
+C 122 ; WX 389 ; N z ; B 14 0 375 560 ;
+C 123 ; WX 274 ; N braceleft ; B -9 -95 283 750 ;
+C 124 ; WX 250 ; N bar ; B 54 0 196 750 ;
+C 125 ; WX 274 ; N braceright ; B -9 -95 283 750 ;
+C 126 ; WX 500 ; N asciitilde ; B 26 153 475 359 ;
+C 161 ; WX 333 ; N exclamdown ; B 79 -189 255 560 ;
+C 162 ; WX 500 ; N cent ; B 46 -147 462 685 ;
+C 163 ; WX 500 ; N sterling ; B 0 -18 473 768 ;
+C 164 ; WX 167 ; N fraction ; B -168 0 326 750 ;
+C 165 ; WX 500 ; N yen ; B -17 0 517 750 ;
+C 166 ; WX 500 ; N florin ; B 4 -193 488 763 ;
+C 167 ; WX 500 ; N section ; B 27 -184 474 768 ;
+C 168 ; WX 500 ; N currency ; B 0 58 509 563 ;
+C 169 ; WX 250 ; N quotesingle ; B 66 468 185 739 ;
+C 170 ; WX 500 ; N quotedblleft ; B 53 455 451 768 ;
+C 171 ; WX 500 ; N guillemotleft ; B 37 123 457 505 ;
+C 172 ; WX 278 ; N guilsinglleft ; B 53 123 234 505 ;
+C 173 ; WX 278 ; N guilsinglright ; B 44 123 225 505 ;
+C 174 ; WX 556 ; N fi ; B 19 0 503 750 ;
+C 175 ; WX 556 ; N fl ; B 19 0 503 750 ;
+C 177 ; WX 500 ; N endash ; B 0 253 500 368 ;
+C 178 ; WX 500 ; N dagger ; B 29 -173 472 750 ;
+C 179 ; WX 500 ; N daggerdbl ; B 27 -171 474 750 ;
+C 180 ; WX 333 ; N periodcentered ; B 82 164 251 335 ;
+C 182 ; WX 550 ; N paragraph ; B 11 -116 553 750 ;
+C 183 ; WX 420 ; N bullet ; B 22 186 398 562 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 60 -152 218 161 ;
+C 185 ; WX 500 ; N quotedblbase ; B 51 -152 450 161 ;
+C 186 ; WX 500 ; N quotedblright ; B 49 437 447 750 ;
+C 187 ; WX 500 ; N guillemotright ; B 43 123 463 505 ;
+C 188 ; WX 1000 ; N ellipsis ; B 82 0 918 171 ;
+C 189 ; WX 1111 ; N perthousand ; B -1 -18 1113 752 ;
+C 191 ; WX 500 ; N questiondown ; B 28 -189 479 576 ;
+C 193 ; WX 333 ; N grave ; B -38 634 270 782 ;
+C 194 ; WX 333 ; N acute ; B 63 634 371 782 ;
+C 195 ; WX 333 ; N circumflex ; B -36 634 370 782 ;
+C 196 ; WX 333 ; N tilde ; B -29 634 362 775 ;
+C 197 ; WX 333 ; N macron ; B -21 663 355 753 ;
+C 198 ; WX 333 ; N breve ; B -14 634 348 787 ;
+C 199 ; WX 333 ; N dotaccent ; B 87 640 246 770 ;
+C 200 ; WX 333 ; N dieresis ; B -20 640 354 770 ;
+C 202 ; WX 333 ; N ring ; B 54 635 279 860 ;
+C 203 ; WX 333 ; N cedilla ; B 38 -232 296 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -86 634 521 782 ;
+C 206 ; WX 333 ; N ogonek ; B 73 -205 278 0 ;
+C 207 ; WX 333 ; N caron ; B -36 634 370 782 ;
+C 208 ; WX 1000 ; N emdash ; B 0 253 1000 368 ;
+C 225 ; WX 778 ; N AE ; B -23 0 745 750 ;
+C 227 ; WX 300 ; N ordfeminine ; B 10 277 291 768 ;
+C 232 ; WX 444 ; N Lslash ; B -22 0 428 750 ;
+C 233 ; WX 556 ; N Oslash ; B 5 -85 578 819 ;
+C 234 ; WX 778 ; N OE ; B 33 -18 743 768 ;
+C 235 ; WX 300 ; N ordmasculine ; B 15 277 285 768 ;
+C 241 ; WX 722 ; N ae ; B 20 -18 718 576 ;
+C 245 ; WX 278 ; N dotlessi ; B 60 0 219 560 ;
+C 248 ; WX 278 ; N lslash ; B -7 0 282 750 ;
+C 249 ; WX 500 ; N oslash ; B -11 -74 503 633 ;
+C 250 ; WX 722 ; N oe ; B 35 -18 716 576 ;
+C 251 ; WX 500 ; N germandbls ; B 44 -18 461 768 ;
+C -1 ; WX 556 ; N Aacute ; B 9 0 548 972 ;
+C -1 ; WX 556 ; N Acircumflex ; B 9 0 548 952 ;
+C -1 ; WX 556 ; N Adieresis ; B 9 0 548 960 ;
+C -1 ; WX 556 ; N Agrave ; B 9 0 548 972 ;
+C -1 ; WX 556 ; N Aring ; B 9 0 548 990 ;
+C -1 ; WX 556 ; N Atilde ; B 9 0 548 945 ;
+C -1 ; WX 556 ; N Ccedilla ; B 39 -232 518 768 ;
+C -1 ; WX 500 ; N Eacute ; B 46 0 461 972 ;
+C -1 ; WX 500 ; N Ecircumflex ; B 46 0 461 952 ;
+C -1 ; WX 500 ; N Edieresis ; B 46 0 461 960 ;
+C -1 ; WX 500 ; N Egrave ; B 46 0 461 972 ;
+C -1 ; WX 556 ; N Eth ; B 10 0 534 750 ;
+C -1 ; WX 278 ; N Iacute ; B 36 0 344 972 ;
+C -1 ; WX 278 ; N Icircumflex ; B -63 0 343 952 ;
+C -1 ; WX 278 ; N Idieresis ; B -47 0 327 960 ;
+C -1 ; WX 278 ; N Igrave ; B -65 0 243 972 ;
+C -1 ; WX 556 ; N Ntilde ; B 43 0 513 945 ;
+C -1 ; WX 556 ; N Oacute ; B 40 -18 517 972 ;
+C -1 ; WX 556 ; N Ocircumflex ; B 40 -18 517 952 ;
+C -1 ; WX 556 ; N Odieresis ; B 40 -18 517 960 ;
+C -1 ; WX 556 ; N Ograve ; B 40 -18 517 972 ;
+C -1 ; WX 556 ; N Otilde ; B 40 -18 517 945 ;
+C -1 ; WX 500 ; N Scaron ; B 16 -18 471 952 ;
+C -1 ; WX 556 ; N Thorn ; B 53 0 526 750 ;
+C -1 ; WX 556 ; N Uacute ; B 42 -18 515 972 ;
+C -1 ; WX 556 ; N Ucircumflex ; B 42 -18 515 952 ;
+C -1 ; WX 556 ; N Udieresis ; B 42 -18 515 960 ;
+C -1 ; WX 556 ; N Ugrave ; B 42 -18 515 972 ;
+C -1 ; WX 556 ; N Yacute ; B 11 0 545 972 ;
+C -1 ; WX 556 ; N Ydieresis ; B 11 0 545 960 ;
+C -1 ; WX 444 ; N Zcaron ; B 10 0 434 952 ;
+C -1 ; WX 500 ; N aacute ; B 24 -18 473 782 ;
+C -1 ; WX 500 ; N acircumflex ; B 24 -18 473 762 ;
+C -1 ; WX 500 ; N adieresis ; B 24 -18 473 770 ;
+C -1 ; WX 500 ; N agrave ; B 24 -18 473 782 ;
+C -1 ; WX 500 ; N aring ; B 24 -18 473 860 ;
+C -1 ; WX 500 ; N atilde ; B 24 -18 473 755 ;
+C -1 ; WX 250 ; N brokenbar ; B 54 0 196 750 ;
+C -1 ; WX 500 ; N ccedilla ; B 49 -232 462 576 ;
+C -1 ; WX 830 ; N copyright ; B 21 -18 809 768 ;
+C -1 ; WX 400 ; N degree ; B 50 450 350 750 ;
+C -1 ; WX 500 ; N divide ; B 26 7 475 492 ;
+C -1 ; WX 500 ; N eacute ; B 38 -18 466 782 ;
+C -1 ; WX 500 ; N ecircumflex ; B 38 -18 466 762 ;
+C -1 ; WX 500 ; N edieresis ; B 38 -18 466 770 ;
+C -1 ; WX 500 ; N egrave ; B 38 -18 466 782 ;
+C -1 ; WX 500 ; N eth ; B 38 -18 454 776 ;
+C -1 ; WX 278 ; N iacute ; B 36 0 344 782 ;
+C -1 ; WX 278 ; N icircumflex ; B -73 0 333 762 ;
+C -1 ; WX 278 ; N idieresis ; B -47 0 327 770 ;
+C -1 ; WX 278 ; N igrave ; B -65 0 243 782 ;
+C -1 ; WX 500 ; N logicalnot ; B 26 115 475 405 ;
+C -1 ; WX 500 ; N minus ; B 26 192 475 307 ;
+C -1 ; WX 500 ; N mu ; B 46 -189 449 560 ;
+C -1 ; WX 500 ; N multiply ; B 33 38 467 472 ;
+C -1 ; WX 500 ; N ntilde ; B 49 0 452 755 ;
+C -1 ; WX 500 ; N oacute ; B 42 -18 458 782 ;
+C -1 ; WX 500 ; N ocircumflex ; B 42 -18 458 762 ;
+C -1 ; WX 500 ; N odieresis ; B 42 -18 458 770 ;
+C -1 ; WX 500 ; N ograve ; B 42 -18 458 782 ;
+C -1 ; WX 750 ; N onehalf ; B 10 0 740 750 ;
+C -1 ; WX 750 ; N onequarter ; B 14 0 736 750 ;
+C -1 ; WX 300 ; N onesuperior ; B 49 310 251 750 ;
+C -1 ; WX 500 ; N otilde ; B 42 -18 458 755 ;
+C -1 ; WX 500 ; N plusminus ; B 26 -12 475 510 ;
+C -1 ; WX 830 ; N registered ; B 21 -18 809 768 ;
+C -1 ; WX 444 ; N scaron ; B 10 -18 431 762 ;
+C -1 ; WX 500 ; N thorn ; B 42 -189 458 750 ;
+C -1 ; WX 750 ; N threequarters ; B 1 0 743 750 ;
+C -1 ; WX 300 ; N threesuperior ; B 4 289 296 750 ;
+C -1 ; WX 860 ; N trademark ; B 3 346 858 750 ;
+C -1 ; WX 300 ; N twosuperior ; B 4 300 296 750 ;
+C -1 ; WX 500 ; N uacute ; B 46 -18 455 782 ;
+C -1 ; WX 500 ; N ucircumflex ; B 46 -18 454 772 ;
+C -1 ; WX 500 ; N udieresis ; B 46 -18 449 770 ;
+C -1 ; WX 500 ; N ugrave ; B 46 -18 449 782 ;
+C -1 ; WX 444 ; N yacute ; B 6 -189 433 782 ;
+C -1 ; WX 444 ; N ydieresis ; B 6 -189 433 770 ;
+C -1 ; WX 389 ; N zcaron ; B -8 0 398 762 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -55
+KPX A W -37
+KPX A V -37
+KPX A T -55
+
+KPX F period -111
+KPX F comma -111
+KPX F A -37
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -92
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W 0
+KPX R V 0
+KPX R T -18
+
+KPX T y -55
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T s -74
+KPX T r -74
+KPX T period -92
+KPX T o -74
+KPX T i -18
+KPX T hyphen -55
+KPX T e -74
+KPX T comma -92
+KPX T colon -74
+KPX T c -74
+KPX T a -74
+KPX T A -55
+
+KPX V y 0
+KPX V u -18
+KPX V semicolon -18
+KPX V r -18
+KPX V period -92
+KPX V o -18
+KPX V i 0
+KPX V hyphen -18
+KPX V e -18
+KPX V comma -92
+KPX V colon -18
+KPX V a -18
+KPX V A -37
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon 0
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon 0
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -37
+KPX Y semicolon -37
+KPX Y q -75
+KPX Y period -111
+KPX Y p -37
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -74
+KPX Y e -55
+KPX Y comma -111
+KPX Y colon -37
+KPX Y a -55
+KPX Y A -55
+
+KPX f quoteright 18
+KPX f f 0
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -18
+
+KPX r z 0
+KPX r y 18
+KPX r x 0
+KPX r w 18
+KPX r v 18
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 0
+KPX r q 0
+KPX r period -74
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 0
+KPX r e 0
+KPX r d 0
+KPX r comma -74
+KPX r c 0
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 55 170 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 28 -20 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 83 170 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 45 -20 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 111 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 83 0 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 111 190 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 55 0 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 111 190 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 55 0 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 111 190 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 111 170 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 111 190 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 111 190 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 83 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 83 -10 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 83 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 83 0 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -27 190 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -27 170 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -27 190 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -27 190 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -37 -20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 83 190 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 83 170 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 83 190 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 83 190 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 83 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 83 -20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 83 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 83 0 ;
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 111 190 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 101 170 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 111 190 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 111 190 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 83 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 83 -20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 83 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 83 0 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 111 190 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 111 170 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 111 190 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 111 190 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 83 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 83 -20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 83 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 83 0 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 111 170 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 83 -20 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 111 170 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 83 -20 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 111 170 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 83 -20 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 111 130 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 83 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-CnBlO b/font/He-CnBlO
new file mode 100644
index 0000000..db91ef3
--- /dev/null
+++ b/font/He-CnBlO
@@ -0,0 +1,445 @@
+StartFontMetrics 2.0
+Comment  Copyright (c) 1985, 1987 Adobe Systems Incorporated. All rights reserved.
+Comment Creation Date:Thu Aug 13 18:13:24 PDT 1987
+FontName Helvetica-Condensed-BlackObl
+EncodingScheme AdobeStandardEncoding
+FullName Helvetica.Condensed Black Oblique
+FamilyName Helvetica
+Weight BlackCondensed
+ItalicAngle -12.0
+IsFixedPitch false
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.002
+Notice Copyright (c) 1985, 1987 Adobe Systems Incorporated.  All rights reserved. Helvetica is a trademark of Allied Corporation.
+FontBBox -168 -232 1161 990
+CapHeight 750
+XHeight 560
+Descender -189
+Ascender 750
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 83 0 414 750 ;
+C 34 ; WX 333 ; N quotedbl ; B 115 468 475 739 ;
+C 35 ; WX 500 ; N numbersign ; B 56 0 607 750 ;
+C 36 ; WX 500 ; N dollar ; B 50 -126 596 786 ;
+C 37 ; WX 833 ; N percent ; B 131 -18 858 750 ;
+C 38 ; WX 667 ; N ampersand ; B 84 -18 694 768 ;
+C 39 ; WX 278 ; N quoteright ; B 151 437 375 750 ;
+C 40 ; WX 278 ; N parenleft ; B 61 -187 417 750 ;
+C 41 ; WX 278 ; N parenright ; B -20 -187 337 750 ;
+C 42 ; WX 500 ; N asterisk ; B 188 393 562 750 ;
+C 43 ; WX 500 ; N plus ; B 67 0 540 492 ;
+C 44 ; WX 333 ; N comma ; B 49 -156 287 171 ;
+C 45 ; WX 333 ; N hyphen ; B 93 237 373 387 ;
+C 46 ; WX 333 ; N period ; B 82 0 287 171 ;
+C 47 ; WX 278 ; N slash ; B -48 -94 466 750 ;
+C 48 ; WX 500 ; N zero ; B 61 -18 593 750 ;
+C 49 ; WX 500 ; N one ; B 145 0 505 734 ;
+C 50 ; WX 500 ; N two ; B 23 0 593 750 ;
+C 51 ; WX 500 ; N three ; B 56 -18 576 750 ;
+C 52 ; WX 500 ; N four ; B 39 0 574 734 ;
+C 53 ; WX 500 ; N five ; B 65 -18 598 734 ;
+C 54 ; WX 500 ; N six ; B 67 -18 587 750 ;
+C 55 ; WX 500 ; N seven ; B 104 0 612 734 ;
+C 56 ; WX 500 ; N eight ; B 66 -18 591 750 ;
+C 57 ; WX 500 ; N nine ; B 70 -18 589 750 ;
+C 58 ; WX 278 ; N colon ; B 55 0 342 555 ;
+C 59 ; WX 278 ; N semicolon ; B 22 -156 342 555 ;
+C 60 ; WX 500 ; N less ; B 85 -23 571 528 ;
+C 61 ; WX 500 ; N equal ; B 46 95 561 405 ;
+C 62 ; WX 500 ; N greater ; B 37 -23 523 528 ;
+C 63 ; WX 500 ; N question ; B 133 0 599 768 ;
+C 64 ; WX 830 ; N at ; B 108 -18 896 768 ;
+C 65 ; WX 556 ; N A ; B 9 0 548 750 ;
+C 66 ; WX 556 ; N B ; B 44 0 633 750 ;
+C 67 ; WX 556 ; N C ; B 76 -18 639 768 ;
+C 68 ; WX 556 ; N D ; B 46 0 637 750 ;
+C 69 ; WX 500 ; N E ; B 46 0 608 750 ;
+C 70 ; WX 500 ; N F ; B 49 0 622 750 ;
+C 71 ; WX 556 ; N G ; B 70 -18 632 768 ;
+C 72 ; WX 556 ; N H ; B 41 0 674 750 ;
+C 73 ; WX 278 ; N I ; B 51 0 386 750 ;
+C 74 ; WX 444 ; N J ; B 38 -18 554 750 ;
+C 75 ; WX 556 ; N K ; B 44 0 691 750 ;
+C 76 ; WX 444 ; N L ; B 37 0 460 750 ;
+C 77 ; WX 778 ; N M ; B 49 0 889 750 ;
+C 78 ; WX 556 ; N N ; B 43 0 672 750 ;
+C 79 ; WX 556 ; N O ; B 79 -18 640 768 ;
+C 80 ; WX 556 ; N P ; B 53 0 647 750 ;
+C 81 ; WX 556 ; N Q ; B 79 -123 640 768 ;
+C 82 ; WX 556 ; N R ; B 42 0 639 750 ;
+C 83 ; WX 500 ; N S ; B 48 -18 593 768 ;
+C 84 ; WX 500 ; N T ; B 150 0 637 750 ;
+C 85 ; WX 556 ; N U ; B 78 -18 674 750 ;
+C 86 ; WX 556 ; N V ; B 170 0 704 750 ;
+C 87 ; WX 778 ; N W ; B 136 0 927 750 ;
+C 88 ; WX 556 ; N X ; B 13 0 696 750 ;
+C 89 ; WX 556 ; N Y ; B 170 0 704 750 ;
+C 90 ; WX 444 ; N Z ; B 10 0 583 750 ;
+C 91 ; WX 278 ; N bracketleft ; B 2 -187 421 750 ;
+C 92 ; WX 250 ; N backslash ; B 60 0 350 750 ;
+C 93 ; WX 278 ; N bracketright ; B -24 -187 395 750 ;
+C 94 ; WX 500 ; N asciicircum ; B 94 326 564 750 ;
+C 95 ; WX 500 ; N underscore ; B -25 -119 487 -61 ;
+C 96 ; WX 278 ; N quoteleft ; B 159 455 383 768 ;
+C 97 ; WX 500 ; N a ; B 48 -18 553 576 ;
+C 98 ; WX 500 ; N b ; B 48 -18 553 750 ;
+C 99 ; WX 500 ; N c ; B 77 -18 545 576 ;
+C 100 ; WX 500 ; N d ; B 71 -18 613 750 ;
+C 101 ; WX 500 ; N e ; B 66 -18 558 576 ;
+C 102 ; WX 333 ; N f ; B 83 0 469 750 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 25 -189 572 576 ;
+C 104 ; WX 500 ; N h ; B 46 0 554 750 ;
+C 105 ; WX 278 ; N i ; B 60 0 378 750 ;
+C 106 ; WX 278 ; N j ; B -26 -189 382 750 ;
+C 107 ; WX 500 ; N k ; B 40 0 603 750 ;
+C 108 ; WX 278 ; N l ; B 60 0 378 750 ;
+C 109 ; WX 722 ; N m ; B 38 0 785 576 ;
+C 110 ; WX 500 ; N n ; B 49 0 552 576 ;
+C 111 ; WX 500 ; N o ; B 70 -18 546 576 ;
+C 112 ; WX 500 ; N p ; B 2 -189 547 576 ;
+C 113 ; WX 500 ; N q ; B 65 -188 570 576 ;
+C 114 ; WX 333 ; N r ; B 42 0 437 576 ;
+C 115 ; WX 444 ; N s ; B 39 -18 514 576 ;
+C 116 ; WX 333 ; N t ; B 96 -8 429 720 ;
+C 117 ; WX 500 ; N u ; B 64 -18 568 560 ;
+C 118 ; WX 444 ; N v ; B 128 0 555 560 ;
+C 119 ; WX 667 ; N w ; B 116 0 778 560 ;
+C 120 ; WX 444 ; N x ; B 9 0 550 560 ;
+C 121 ; WX 444 ; N y ; B 17 -189 552 560 ;
+C 122 ; WX 389 ; N z ; B 14 0 494 560 ;
+C 123 ; WX 274 ; N braceleft ; B 60 -95 442 750 ;
+C 124 ; WX 250 ; N bar ; B 54 0 355 750 ;
+C 125 ; WX 274 ; N braceright ; B -29 -95 352 750 ;
+C 126 ; WX 500 ; N asciitilde ; B 74 153 536 359 ;
+C 161 ; WX 333 ; N exclamdown ; B 39 -189 370 560 ;
+C 162 ; WX 500 ; N cent ; B 77 -147 545 685 ;
+C 163 ; WX 500 ; N sterling ; B 19 -18 586 768 ;
+C 164 ; WX 167 ; N fraction ; B -168 0 485 750 ;
+C 165 ; WX 500 ; N yen ; B 92 0 676 750 ;
+C 166 ; WX 500 ; N florin ; B -33 -193 647 763 ;
+C 167 ; WX 500 ; N section ; B 37 -184 580 768 ;
+C 168 ; WX 500 ; N currency ; B 29 58 612 563 ;
+C 169 ; WX 250 ; N quotesingle ; B 165 468 342 739 ;
+C 170 ; WX 500 ; N quotedblleft ; B 150 455 614 768 ;
+C 171 ; WX 500 ; N guillemotleft ; B 88 123 564 505 ;
+C 172 ; WX 278 ; N guilsinglleft ; B 104 123 341 505 ;
+C 173 ; WX 278 ; N guilsinglright ; B 70 123 307 505 ;
+C 174 ; WX 556 ; N fi ; B 83 0 662 750 ;
+C 175 ; WX 556 ; N fl ; B 83 0 662 750 ;
+C 177 ; WX 500 ; N endash ; B 54 253 578 368 ;
+C 178 ; WX 500 ; N dagger ; B 111 -173 583 750 ;
+C 179 ; WX 500 ; N daggerdbl ; B 35 -171 585 750 ;
+C 180 ; WX 333 ; N periodcentered ; B 117 164 322 335 ;
+C 182 ; WX 550 ; N paragraph ; B 128 -116 712 750 ;
+C 183 ; WX 420 ; N bullet ; B 97 186 482 562 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 28 -152 252 161 ;
+C 185 ; WX 500 ; N quotedblbase ; B 19 -152 484 161 ;
+C 186 ; WX 500 ; N quotedblright ; B 142 437 606 750 ;
+C 187 ; WX 500 ; N guillemotright ; B 69 123 545 505 ;
+C 188 ; WX 1000 ; N ellipsis ; B 82 0 954 171 ;
+C 189 ; WX 1111 ; N perthousand ; B 110 -18 1161 752 ;
+C 191 ; WX 500 ; N questiondown ; B 23 -189 489 576 ;
+C 193 ; WX 333 ; N grave ; B 128 634 405 782 ;
+C 194 ; WX 333 ; N acute ; B 198 634 537 782 ;
+C 195 ; WX 333 ; N circumflex ; B 99 634 505 782 ;
+C 196 ; WX 333 ; N tilde ; B 106 634 526 775 ;
+C 197 ; WX 333 ; N macron ; B 120 663 515 753 ;
+C 198 ; WX 333 ; N breve ; B 151 634 515 787 ;
+C 199 ; WX 333 ; N dotaccent ; B 223 640 410 770 ;
+C 200 ; WX 333 ; N dieresis ; B 116 640 518 770 ;
+C 202 ; WX 333 ; N ring ; B 210 635 440 860 ;
+C 203 ; WX 333 ; N cedilla ; B -5 -232 269 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 49 634 687 782 ;
+C 206 ; WX 333 ; N ogonek ; B 48 -205 256 0 ;
+C 207 ; WX 333 ; N caron ; B 130 634 536 782 ;
+C 208 ; WX 1000 ; N emdash ; B 54 253 1078 368 ;
+C 225 ; WX 778 ; N AE ; B -23 0 897 750 ;
+C 227 ; WX 300 ; N ordfeminine ; B 77 277 429 768 ;
+C 232 ; WX 444 ; N Lslash ; B 30 0 460 750 ;
+C 233 ; WX 556 ; N Oslash ; B -3 -85 742 819 ;
+C 234 ; WX 778 ; N OE ; B 72 -18 895 768 ;
+C 235 ; WX 300 ; N ordmasculine ; B 74 277 427 768 ;
+C 241 ; WX 722 ; N ae ; B 45 -18 804 576 ;
+C 245 ; WX 278 ; N dotlessi ; B 60 0 338 560 ;
+C 248 ; WX 278 ; N lslash ; B 50 0 396 750 ;
+C 249 ; WX 500 ; N oslash ; B -17 -74 628 633 ;
+C 250 ; WX 722 ; N oe ; B 67 -18 806 576 ;
+C 251 ; WX 500 ; N germandbls ; B 44 -18 577 768 ;
+C -1 ; WX 556 ; N Aacute ; B 9 0 689 972 ;
+C -1 ; WX 556 ; N Acircumflex ; B 9 0 643 952 ;
+C -1 ; WX 556 ; N Adieresis ; B 9 0 670 960 ;
+C -1 ; WX 556 ; N Agrave ; B 9 0 557 972 ;
+C -1 ; WX 556 ; N Aring ; B 9 0 580 990 ;
+C -1 ; WX 556 ; N Atilde ; B 9 0 674 945 ;
+C -1 ; WX 556 ; N Ccedilla ; B 76 -232 639 768 ;
+C -1 ; WX 500 ; N Eacute ; B 46 0 661 972 ;
+C -1 ; WX 500 ; N Ecircumflex ; B 46 0 625 952 ;
+C -1 ; WX 500 ; N Edieresis ; B 46 0 642 960 ;
+C -1 ; WX 500 ; N Egrave ; B 46 0 608 972 ;
+C -1 ; WX 556 ; N Eth ; B 66 0 657 750 ;
+C -1 ; WX 278 ; N Iacute ; B 51 0 550 972 ;
+C -1 ; WX 278 ; N Icircumflex ; B 51 0 514 952 ;
+C -1 ; WX 278 ; N Idieresis ; B 51 0 531 960 ;
+C -1 ; WX 278 ; N Igrave ; B 51 0 418 972 ;
+C -1 ; WX 556 ; N Ntilde ; B 43 0 674 945 ;
+C -1 ; WX 556 ; N Oacute ; B 79 -18 689 972 ;
+C -1 ; WX 556 ; N Ocircumflex ; B 79 -18 653 952 ;
+C -1 ; WX 556 ; N Odieresis ; B 79 -18 670 960 ;
+C -1 ; WX 556 ; N Ograve ; B 79 -18 640 972 ;
+C -1 ; WX 556 ; N Otilde ; B 79 -18 674 945 ;
+C -1 ; WX 500 ; N Scaron ; B 48 -18 656 952 ;
+C -1 ; WX 556 ; N Thorn ; B 53 0 616 750 ;
+C -1 ; WX 556 ; N Uacute ; B 78 -18 689 972 ;
+C -1 ; WX 556 ; N Ucircumflex ; B 78 -18 674 952 ;
+C -1 ; WX 556 ; N Udieresis ; B 78 -18 674 960 ;
+C -1 ; WX 556 ; N Ugrave ; B 78 -18 674 972 ;
+C -1 ; WX 556 ; N Yacute ; B 170 0 704 972 ;
+C -1 ; WX 556 ; N Ydieresis ; B 170 0 704 960 ;
+C -1 ; WX 444 ; N Zcaron ; B 10 0 628 952 ;
+C -1 ; WX 500 ; N aacute ; B 48 -18 621 782 ;
+C -1 ; WX 500 ; N acircumflex ; B 48 -18 585 762 ;
+C -1 ; WX 500 ; N adieresis ; B 48 -18 602 770 ;
+C -1 ; WX 500 ; N agrave ; B 48 -18 553 782 ;
+C -1 ; WX 500 ; N aring ; B 48 -18 553 860 ;
+C -1 ; WX 500 ; N atilde ; B 48 -18 606 755 ;
+C -1 ; WX 250 ; N brokenbar ; B 54 0 355 750 ;
+C -1 ; WX 500 ; N ccedilla ; B 77 -232 545 576 ;
+C -1 ; WX 830 ; N copyright ; B 91 -18 899 768 ;
+C -1 ; WX 400 ; N degree ; B 174 450 481 750 ;
+C -1 ; WX 500 ; N divide ; B 67 7 540 492 ;
+C -1 ; WX 500 ; N eacute ; B 66 -18 621 782 ;
+C -1 ; WX 500 ; N ecircumflex ; B 66 -18 585 762 ;
+C -1 ; WX 500 ; N edieresis ; B 66 -18 602 770 ;
+C -1 ; WX 500 ; N egrave ; B 66 -18 558 782 ;
+C -1 ; WX 500 ; N eth ; B 66 -18 553 776 ;
+C -1 ; WX 278 ; N iacute ; B 60 0 510 782 ;
+C -1 ; WX 278 ; N icircumflex ; B 58 0 464 762 ;
+C -1 ; WX 278 ; N idieresis ; B 60 0 491 770 ;
+C -1 ; WX 278 ; N igrave ; B 60 0 378 782 ;
+C -1 ; WX 500 ; N logicalnot ; B 88 115 561 405 ;
+C -1 ; WX 500 ; N minus ; B 67 192 540 307 ;
+C -1 ; WX 500 ; N mu ; B 6 -189 568 560 ;
+C -1 ; WX 500 ; N multiply ; B 58 38 550 472 ;
+C -1 ; WX 500 ; N ntilde ; B 49 0 606 755 ;
+C -1 ; WX 500 ; N oacute ; B 70 -18 621 782 ;
+C -1 ; WX 500 ; N ocircumflex ; B 70 -18 585 762 ;
+C -1 ; WX 500 ; N odieresis ; B 70 -18 602 770 ;
+C -1 ; WX 500 ; N ograve ; B 70 -18 546 782 ;
+C -1 ; WX 750 ; N onehalf ; B 108 0 812 750 ;
+C -1 ; WX 750 ; N onequarter ; B 130 0 787 750 ;
+C -1 ; WX 300 ; N onesuperior ; B 180 310 410 750 ;
+C -1 ; WX 500 ; N otilde ; B 70 -18 606 755 ;
+C -1 ; WX 500 ; N plusminus ; B 23 -12 558 510 ;
+C -1 ; WX 830 ; N registered ; B 91 -18 899 768 ;
+C -1 ; WX 444 ; N scaron ; B 39 -18 578 762 ;
+C -1 ; WX 500 ; N thorn ; B 2 -189 547 750 ;
+C -1 ; WX 750 ; N threequarters ; B 85 0 813 750 ;
+C -1 ; WX 300 ; N threesuperior ; B 88 289 423 750 ;
+C -1 ; WX 860 ; N trademark ; B 144 346 1017 750 ;
+C -1 ; WX 300 ; N twosuperior ; B 68 300 432 750 ;
+C -1 ; WX 500 ; N uacute ; B 64 -18 621 782 ;
+C -1 ; WX 500 ; N ucircumflex ; B 64 -18 587 772 ;
+C -1 ; WX 500 ; N udieresis ; B 64 -18 602 770 ;
+C -1 ; WX 500 ; N ugrave ; B 64 -18 568 782 ;
+C -1 ; WX 444 ; N yacute ; B 17 -189 593 782 ;
+C -1 ; WX 444 ; N ydieresis ; B 17 -189 574 770 ;
+C -1 ; WX 389 ; N zcaron ; B 14 0 560 762 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -55
+KPX A W -37
+KPX A V -37
+KPX A T -55
+
+KPX F period -111
+KPX F comma -111
+KPX F A -37
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -92
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W 0
+KPX R V 0
+KPX R T -18
+
+KPX T y -55
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T s -74
+KPX T r -74
+KPX T period -92
+KPX T o -74
+KPX T i -18
+KPX T hyphen -55
+KPX T e -74
+KPX T comma -92
+KPX T colon -74
+KPX T c -74
+KPX T a -74
+KPX T A -55
+
+KPX V y 0
+KPX V u -18
+KPX V semicolon -18
+KPX V r -18
+KPX V period -92
+KPX V o -18
+KPX V i 0
+KPX V hyphen -18
+KPX V e -18
+KPX V comma -92
+KPX V colon -18
+KPX V a -18
+KPX V A -37
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon 0
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon 0
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -37
+KPX Y semicolon -37
+KPX Y q -75
+KPX Y period -111
+KPX Y p -37
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -74
+KPX Y e -55
+KPX Y comma -111
+KPX Y colon -37
+KPX Y a -55
+KPX Y A -55
+
+KPX f quoteright 18
+KPX f f 0
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -18
+
+KPX r z 0
+KPX r y 18
+KPX r x 0
+KPX r w 18
+KPX r v 18
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 0
+KPX r q 0
+KPX r period -74
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 0
+KPX r e 0
+KPX r d 0
+KPX r comma -74
+KPX r c 0
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 55 170 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 28 -20 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 83 170 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 45 -20 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 111 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 83 0 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 111 190 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 55 0 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 111 190 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 55 0 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 111 190 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 111 170 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 111 190 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 111 190 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 83 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 83 -10 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 83 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 83 0 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -27 190 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -27 170 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -27 190 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -27 190 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -37 -20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 83 190 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 83 170 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 83 190 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 83 190 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 83 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 83 -20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 83 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 83 0 ;
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 111 190 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 101 170 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 111 190 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 111 190 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 83 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 83 -20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 83 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 83 0 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 111 190 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 111 170 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 111 190 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 111 190 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 83 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 83 -20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 83 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 83 0 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 111 170 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 83 -20 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 111 170 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 83 -20 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 111 170 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 83 -20 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 111 130 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 83 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-CnLi b/font/He-CnLi
new file mode 100644
index 0000000..3655ad4
--- /dev/null
+++ b/font/He-CnLi
@@ -0,0 +1,445 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1984 Adobe Systems Incorporated. 	All Rights Reserved.
+Comment Creation Date:Mon Mar 30 18:00:00 PST 1987
+FontName Helvetica-Condensed-Light
+EncodingScheme AdobeStandardEncoding
+FullName Helvetica Condensed Light
+FamilyName Helvetica
+Weight LightCondensed
+ItalicAngle 0.0
+IsFixedPitch false
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.001
+Notice Helvetica is a trademark of Allied Corporation.
+FontBBox -170 -207 1000 944
+CapHeight 750
+XHeight 552
+Descender -190
+Ascender 750
+StartCharMetrics 228
+C 32 ; WX 222 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 222 ; N exclam ; B 77 13 146 750 ;
+C 34 ; WX 309 ; N quotedbl ; B 73 524 236 750 ;
+C 35 ; WX 444 ; N numbersign ; B 13 0 431 744 ;
+C 36 ; WX 444 ; N dollar ; B 26 -96 420 778 ;
+C 37 ; WX 778 ; N percent ; B 73 -15 706 741 ;
+C 38 ; WX 611 ; N ampersand ; B 63 -18 573 768 ;
+C 39 ; WX 160 ; N quoteright ; B 49 526 118 750 ;
+C 40 ; WX 278 ; N parenleft ; B 52 -191 244 768 ;
+C 41 ; WX 278 ; N parenright ; B 34 -191 226 768 ;
+C 42 ; WX 389 ; N asterisk ; B 48 462 342 744 ;
+C 43 ; WX 444 ; N plus ; B 21 0 424 490 ;
+C 44 ; WX 222 ; N comma ; B 77 -136 146 88 ;
+C 45 ; WX 333 ; N hyphen ; B 35 269 294 327 ;
+C 46 ; WX 222 ; N period ; B 77 0 146 88 ;
+C 47 ; WX 278 ; N slash ; B -10 -94 289 750 ;
+C 48 ; WX 444 ; N zero ; B 37 -14 407 744 ;
+C 49 ; WX 444 ; N one ; B 60 0 284 744 ;
+C 50 ; WX 444 ; N two ; B 34 0 396 744 ;
+C 51 ; WX 444 ; N three ; B 30 -14 401 744 ;
+C 52 ; WX 444 ; N four ; B 28 0 412 744 ;
+C 53 ; WX 444 ; N five ; B 27 -14 398 730 ;
+C 54 ; WX 444 ; N six ; B 37 -14 408 744 ;
+C 55 ; WX 444 ; N seven ; B 51 0 412 730 ;
+C 56 ; WX 444 ; N eight ; B 36 -14 409 744 ;
+C 57 ; WX 444 ; N nine ; B 40 -14 405 744 ;
+C 58 ; WX 222 ; N colon ; B 77 0 146 521 ;
+C 59 ; WX 222 ; N semicolon ; B 77 -136 146 521 ;
+C 60 ; WX 444 ; N less ; B 19 -12 426 501 ;
+C 61 ; WX 444 ; N equal ; B 21 131 424 360 ;
+C 62 ; WX 444 ; N greater ; B 19 -11 426 502 ;
+C 63 ; WX 389 ; N question ; B 20 0 361 750 ;
+C 64 ; WX 800 ; N at ; B 26 -18 774 768 ;
+C 65 ; WX 500 ; N A ; B 12 0 489 750 ;
+C 66 ; WX 500 ; N B ; B 62 0 454 750 ;
+C 67 ; WX 556 ; N C ; B 63 -18 492 768 ;
+C 68 ; WX 556 ; N D ; B 72 0 500 750 ;
+C 69 ; WX 444 ; N E ; B 67 0 412 750 ;
+C 70 ; WX 444 ; N F ; B 69 0 414 750 ;
+C 71 ; WX 556 ; N G ; B 46 -18 483 768 ;
+C 72 ; WX 556 ; N H ; B 68 0 488 750 ;
+C 73 ; WX 222 ; N I ; B 79 0 144 750 ;
+C 74 ; WX 389 ; N J ; B 12 -18 316 750 ;
+C 75 ; WX 500 ; N K ; B 67 0 491 750 ;
+C 76 ; WX 444 ; N L ; B 74 0 417 750 ;
+C 77 ; WX 722 ; N M ; B 73 0 650 750 ;
+C 78 ; WX 556 ; N N ; B 66 0 490 750 ;
+C 79 ; WX 556 ; N O ; B 58 -18 499 768 ;
+C 80 ; WX 500 ; N P ; B 76 0 462 750 ;
+C 81 ; WX 556 ; N Q ; B 58 -42 527 768 ;
+C 82 ; WX 500 ; N R ; B 63 0 463 750 ;
+C 83 ; WX 500 ; N S ; B 40 -18 461 768 ;
+C 84 ; WX 444 ; N T ; B 20 0 425 750 ;
+C 85 ; WX 556 ; N U ; B 73 -18 483 750 ;
+C 86 ; WX 500 ; N V ; B 14 0 487 750 ;
+C 87 ; WX 722 ; N W ; B 17 0 705 750 ;
+C 88 ; WX 500 ; N X ; B 18 0 482 750 ;
+C 89 ; WX 500 ; N Y ; B 19 0 482 750 ;
+C 90 ; WX 444 ; N Z ; B 34 0 411 750 ;
+C 91 ; WX 278 ; N bracketleft ; B 74 -104 229 768 ;
+C 92 ; WX 222 ; N backslash ; B -40 0 262 750 ;
+C 93 ; WX 278 ; N bracketright ; B 49 -104 204 768 ;
+C 94 ; WX 444 ; N asciicircum ; B 66 340 377 750 ;
+C 95 ; WX 500 ; N underscore ; B 0 -119 500 -61 ;
+C 96 ; WX 160 ; N quoteleft ; B 42 526 111 750 ;
+C 97 ; WX 389 ; N a ; B 26 -14 369 566 ;
+C 98 ; WX 444 ; N b ; B 64 -14 402 750 ;
+C 99 ; WX 389 ; N c ; B 37 -14 358 566 ;
+C 100 ; WX 444 ; N d ; B 44 -14 382 750 ;
+C 101 ; WX 389 ; N e ; B 35 -14 352 566 ;
+C 102 ; WX 222 ; N f ; B 18 0 206 750 ; L i fi ; L l fl ;
+C 103 ; WX 444 ; N g ; B 46 -189 382 566 ;
+C 104 ; WX 444 ; N h ; B 63 0 381 750 ;
+C 105 ; WX 222 ; N i ; B 78 0 145 750 ;
+C 106 ; WX 222 ; N j ; B 21 -189 150 750 ;
+C 107 ; WX 389 ; N k ; B 62 0 375 750 ;
+C 108 ; WX 222 ; N l ; B 82 0 140 750 ;
+C 109 ; WX 667 ; N m ; B 58 0 610 566 ;
+C 110 ; WX 444 ; N n ; B 65 0 379 566 ;
+C 111 ; WX 444 ; N o ; B 49 -14 396 566 ;
+C 112 ; WX 444 ; N p ; B 58 -190 394 566 ;
+C 113 ; WX 444 ; N q ; B 46 -189 382 566 ;
+C 114 ; WX 278 ; N r ; B 69 0 257 566 ;
+C 115 ; WX 389 ; N s ; B 32 -14 350 566 ;
+C 116 ; WX 222 ; N t ; B 16 -10 201 714 ;
+C 117 ; WX 444 ; N u ; B 60 -14 379 552 ;
+C 118 ; WX 389 ; N v ; B 17 0 373 552 ;
+C 119 ; WX 556 ; N w ; B 11 0 545 552 ;
+C 120 ; WX 389 ; N x ; B 13 0 376 552 ;
+C 121 ; WX 389 ; N y ; B 17 -191 373 552 ;
+C 122 ; WX 333 ; N z ; B 18 0 315 552 ;
+C 123 ; WX 351 ; N braceleft ; B 48 -93 277 768 ;
+C 124 ; WX 222 ; N bar ; B 85 0 137 750 ;
+C 125 ; WX 351 ; N braceright ; B 74 -93 303 768 ;
+C 126 ; WX 444 ; N asciitilde ; B 21 179 424 309 ;
+C 161 ; WX 222 ; N exclamdown ; B 77 -185 146 552 ;
+C 162 ; WX 444 ; N cent ; B 62 -143 384 671 ;
+C 163 ; WX 444 ; N sterling ; B 19 -21 428 737 ;
+C 164 ; WX 167 ; N fraction ; B -170 0 332 744 ;
+C 165 ; WX 444 ; N yen ; B -9 0 454 738 ;
+C 166 ; WX 444 ; N florin ; B 12 -189 435 744 ;
+C 167 ; WX 444 ; N section ; B 26 -147 419 768 ;
+C 168 ; WX 444 ; N currency ; B -3 50 448 503 ;
+C 169 ; WX 198 ; N quotesingle ; B 73 524 125 750 ;
+C 170 ; WX 333 ; N quotedblleft ; B 85 526 284 750 ;
+C 171 ; WX 500 ; N guillemotleft ; B 83 130 411 412 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 90 130 231 412 ;
+C 173 ; WX 333 ; N guilsinglright ; B 102 130 243 412 ;
+C 174 ; WX 444 ; N fi ; B 25 0 376 750 ;
+C 175 ; WX 444 ; N fl ; B 25 0 372 750 ;
+C 177 ; WX 500 ; N endash ; B 0 273 500 324 ;
+C 178 ; WX 444 ; N dagger ; B 32 -117 412 768 ;
+C 179 ; WX 444 ; N daggerdbl ; B 31 -117 413 768 ;
+C 180 ; WX 222 ; N periodcentered ; B 77 201 146 289 ;
+C 182 ; WX 564 ; N paragraph ; B 53 -116 443 750 ;
+C 183 ; WX 606 ; N bullet ; B 116 189 490 563 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 77 -136 146 88 ;
+C 185 ; WX 330 ; N quotedblbase ; B 66 -136 265 88 ;
+C 186 ; WX 333 ; N quotedblright ; B 49 526 248 750 ;
+C 187 ; WX 500 ; N guillemotright ; B 89 130 417 412 ;
+C 188 ; WX 1000 ; N ellipsis ; B 133 0 868 88 ;
+C 189 ; WX 1000 ; N perthousand ; B 34 -15 966 741 ;
+C 191 ; WX 389 ; N questiondown ; B 20 -202 361 552 ;
+C 193 ; WX 333 ; N grave ; B 40 605 229 744 ;
+C 194 ; WX 333 ; N acute ; B 104 605 293 744 ;
+C 195 ; WX 333 ; N circumflex ; B 20 605 314 744 ;
+C 196 ; WX 333 ; N tilde ; B 10 618 324 720 ;
+C 197 ; WX 333 ; N macron ; B 19 645 315 690 ;
+C 198 ; WX 333 ; N breve ; B 23 612 311 738 ;
+C 199 ; WX 333 ; N dotaccent ; B 135 617 199 719 ;
+C 200 ; WX 333 ; N dieresis ; B 56 617 278 719 ;
+C 202 ; WX 333 ; N ring ; B 67 596 266 796 ;
+C 203 ; WX 333 ; N cedilla ; B 57 -207 259 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 64 605 382 744 ;
+C 206 ; WX 333 ; N ogonek ; B 0 -191 208 13 ;
+C 207 ; WX 333 ; N caron ; B 20 606 314 745 ;
+C 208 ; WX 1000 ; N emdash ; B 0 273 1000 324 ;
+C 225 ; WX 722 ; N AE ; B 6 0 688 750 ;
+C 227 ; WX 266 ; N ordfeminine ; B 21 334 245 768 ;
+C 232 ; WX 444 ; N Lslash ; B -13 0 417 750 ;
+C 233 ; WX 556 ; N Oslash ; B 26 -29 529 770 ;
+C 234 ; WX 778 ; N OE ; B 56 -18 738 768 ;
+C 235 ; WX 266 ; N ordmasculine ; B 19 333 246 768 ;
+C 241 ; WX 611 ; N ae ; B 24 -14 583 566 ;
+C 245 ; WX 200 ; N dotlessi ; B 71 0 129 552 ;
+C 248 ; WX 222 ; N lslash ; B 6 0 213 750 ;
+C 249 ; WX 444 ; N oslash ; B -3 -42 429 578 ;
+C 250 ; WX 667 ; N oe ; B 37 -14 625 566 ;
+C 251 ; WX 444 ; N germandbls ; B 66 -14 394 768 ;
+C -1 ; WX 500 ; N Aacute ; B 12 0 489 942 ;
+C -1 ; WX 500 ; N Acircumflex ; B 12 0 489 942 ;
+C -1 ; WX 500 ; N Adieresis ; B 12 0 489 917 ;
+C -1 ; WX 500 ; N Agrave ; B 12 0 489 942 ;
+C -1 ; WX 500 ; N Aring ; B 12 0 489 944 ;
+C -1 ; WX 500 ; N Atilde ; B 12 0 489 918 ;
+C -1 ; WX 556 ; N Ccedilla ; B 63 -207 492 768 ;
+C -1 ; WX 444 ; N Eacute ; B 67 0 412 942 ;
+C -1 ; WX 444 ; N Ecircumflex ; B 67 0 412 942 ;
+C -1 ; WX 444 ; N Edieresis ; B 67 0 412 917 ;
+C -1 ; WX 444 ; N Egrave ; B 67 0 412 942 ;
+C -1 ; WX 556 ; N Eth ; B -22 0 500 750 ;
+C -1 ; WX 222 ; N Iacute ; B 49 0 238 942 ;
+C -1 ; WX 222 ; N Icircumflex ; B -35 0 259 942 ;
+C -1 ; WX 222 ; N Idieresis ; B 1 0 223 917 ;
+C -1 ; WX 222 ; N Igrave ; B -15 0 174 942 ;
+C -1 ; WX 556 ; N Ntilde ; B 66 0 490 918 ;
+C -1 ; WX 556 ; N Oacute ; B 58 -18 499 942 ;
+C -1 ; WX 556 ; N Ocircumflex ; B 58 -18 499 942 ;
+C -1 ; WX 556 ; N Odieresis ; B 58 -18 499 917 ;
+C -1 ; WX 556 ; N Ograve ; B 58 -18 499 942 ;
+C -1 ; WX 556 ; N Otilde ; B 58 -18 499 918 ;
+C -1 ; WX 500 ; N Scaron ; B 40 -18 461 923 ;
+C -1 ; WX 500 ; N Thorn ; B 76 0 462 750 ;
+C -1 ; WX 556 ; N Uacute ; B 73 -18 483 942 ;
+C -1 ; WX 556 ; N Ucircumflex ; B 73 -18 483 942 ;
+C -1 ; WX 556 ; N Udieresis ; B 73 -18 483 917 ;
+C -1 ; WX 556 ; N Ugrave ; B 73 -18 483 942 ;
+C -1 ; WX 500 ; N Yacute ; B 19 0 482 942 ;
+C -1 ; WX 500 ; N Ydieresis ; B 19 0 482 917 ;
+C -1 ; WX 444 ; N Zcaron ; B 34 0 411 923 ;
+C -1 ; WX 389 ; N aacute ; B 26 -14 369 744 ;
+C -1 ; WX 389 ; N acircumflex ; B 26 -14 369 744 ;
+C -1 ; WX 389 ; N adieresis ; B 26 -14 369 719 ;
+C -1 ; WX 389 ; N agrave ; B 26 -14 369 744 ;
+C -1 ; WX 389 ; N aring ; B 26 -14 369 796 ;
+C -1 ; WX 389 ; N atilde ; B 26 -14 369 720 ;
+C -1 ; WX 222 ; N brokenbar ; B 85 0 137 750 ;
+C -1 ; WX 389 ; N ccedilla ; B 37 -207 358 566 ;
+C -1 ; WX 800 ; N copyright ; B 17 -18 783 768 ;
+C -1 ; WX 400 ; N degree ; B 50 444 350 744 ;
+C -1 ; WX 444 ; N divide ; B 21 0 424 491 ;
+C -1 ; WX 389 ; N eacute ; B 35 -14 352 744 ;
+C -1 ; WX 389 ; N ecircumflex ; B 35 -14 352 744 ;
+C -1 ; WX 389 ; N edieresis ; B 35 -14 352 719 ;
+C -1 ; WX 389 ; N egrave ; B 35 -14 352 744 ;
+C -1 ; WX 444 ; N eth ; B 48 -14 397 765 ;
+C -1 ; WX 200 ; N iacute ; B 38 0 227 744 ;
+C -1 ; WX 200 ; N icircumflex ; B -56 0 238 744 ;
+C -1 ; WX 200 ; N idieresis ; B -10 0 212 719 ;
+C -1 ; WX 200 ; N igrave ; B -26 0 163 744 ;
+C -1 ; WX 444 ; N logicalnot ; B 21 93 424 360 ;
+C -1 ; WX 444 ; N minus ; B 21 220 424 271 ;
+C -1 ; WX 444 ; N mu ; B 60 -189 379 552 ;
+C -1 ; WX 444 ; N multiply ; B 21 38 424 441 ;
+C -1 ; WX 444 ; N ntilde ; B 65 0 380 720 ;
+C -1 ; WX 444 ; N oacute ; B 49 -14 396 744 ;
+C -1 ; WX 444 ; N ocircumflex ; B 49 -14 396 744 ;
+C -1 ; WX 444 ; N odieresis ; B 49 -14 396 719 ;
+C -1 ; WX 444 ; N ograve ; B 49 -14 396 744 ;
+C -1 ; WX 666 ; N onehalf ; B 2 0 664 744 ;
+C -1 ; WX 666 ; N onequarter ; B 19 0 648 744 ;
+C -1 ; WX 266 ; N onesuperior ; B 57 298 210 744 ;
+C -1 ; WX 444 ; N otilde ; B 49 -14 396 720 ;
+C -1 ; WX 444 ; N plusminus ; B 21 0 424 490 ;
+C -1 ; WX 800 ; N registered ; B 17 -18 783 768 ;
+C -1 ; WX 389 ; N scaron ; B 32 -14 350 725 ;
+C -1 ; WX 444 ; N thorn ; B 58 -190 394 750 ;
+C -1 ; WX 666 ; N threequarters ; B 16 0 650 744 ;
+C -1 ; WX 266 ; N threesuperior ; B 12 290 254 744 ;
+C -1 ; WX 722 ; N trademark ; B 57 329 666 750 ;
+C -1 ; WX 266 ; N twosuperior ; B 16 298 251 744 ;
+C -1 ; WX 444 ; N uacute ; B 60 -14 379 744 ;
+C -1 ; WX 444 ; N ucircumflex ; B 60 -14 379 734 ;
+C -1 ; WX 444 ; N udieresis ; B 60 -14 379 719 ;
+C -1 ; WX 444 ; N ugrave ; B 60 -14 379 744 ;
+C -1 ; WX 389 ; N yacute ; B 17 -191 373 744 ;
+C -1 ; WX 389 ; N ydieresis ; B 17 -191 373 719 ;
+C -1 ; WX 333 ; N zcaron ; B 18 0 315 725 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -55
+KPX A W -37
+KPX A V -37
+KPX A T -55
+
+KPX F period -111
+KPX F comma -111
+KPX F A -37
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -92
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W 0
+KPX R V 0
+KPX R T -18
+
+KPX T y -55
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T s -74
+KPX T r -74
+KPX T period -92
+KPX T o -74
+KPX T i -18
+KPX T hyphen -55
+KPX T e -74
+KPX T comma -92
+KPX T colon -74
+KPX T c -74
+KPX T a -74
+KPX T A -55
+
+KPX V y 0
+KPX V u -18
+KPX V semicolon -18
+KPX V r -18
+KPX V period -92
+KPX V o -18
+KPX V i 0
+KPX V hyphen -18
+KPX V e -18
+KPX V comma -92
+KPX V colon -18
+KPX V a -18
+KPX V A -37
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon 0
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon 0
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -37
+KPX Y semicolon -37
+KPX Y q -55
+KPX Y period -111
+KPX Y p -37
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -74
+KPX Y e -55
+KPX Y comma -111
+KPX Y colon -37
+KPX Y a -55
+KPX Y A -55
+
+KPX f quoteright 28
+KPX f f 0
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -18
+
+KPX r z 0
+KPX r y 18
+KPX r x 0
+KPX r w 18
+KPX r v 18
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 0
+KPX r q 0
+KPX r period -74
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 0
+KPX r e 0
+KPX r d 0
+KPX r comma -74
+KPX r c 0
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 55 178 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 0 -20 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 83 178 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 18 -20 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 111 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 28 0 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 83 198 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 28 0 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 83 198 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 28 0 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 111 198 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 111 198 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 111 198 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 111 198 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 55 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 55 -10 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 55 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 55 0 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -55 198 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -55 198 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -55 198 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -55 198 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -66 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -76 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -66 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -66 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 55 198 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 55 198 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 55 198 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 55 198 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 28 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 28 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 28 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 28 0 ;
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 83 198 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 73 198 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 83 198 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 83 198 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 28 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 28 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 28 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 28 0 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 111 198 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 111 198 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 111 198 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 111 198 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 55 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 55 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 55 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 55 0 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 83 198 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 28 0 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 111 198 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 55 0 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 111 198 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 55 0 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 83 148 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 28 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-CnLiO b/font/He-CnLiO
new file mode 100644
index 0000000..55dc321
--- /dev/null
+++ b/font/He-CnLiO
@@ -0,0 +1,445 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1984 Adobe Systems Incorporated. 	All Rights Reserved.
+Comment Creation Date:Tue Mar 31 08:44:31 PST 1987
+FontName Helvetica-Condensed-LightObl
+EncodingScheme AdobeStandardEncoding
+FullName Helvetica.Condensed Light Oblique
+FamilyName Helvetica
+Weight LightCondensed
+ItalicAngle -12.0
+IsFixedPitch false
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.001
+Notice Helvetica is a trademark of Allied Corporation.
+FontBBox -170 -207 1069 944
+CapHeight 750
+XHeight 552
+Descender -190
+Ascender 750
+StartCharMetrics 228
+C 32 ; WX 222 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 222 ; N exclam ; B 80 13 304 750 ;
+C 34 ; WX 309 ; N quotedbl ; B 184 524 395 750 ;
+C 35 ; WX 444 ; N numbersign ; B 49 0 558 744 ;
+C 36 ; WX 444 ; N dollar ; B 59 -96 516 778 ;
+C 37 ; WX 778 ; N percent ; B 180 -15 752 741 ;
+C 38 ; WX 611 ; N ampersand ; B 98 -18 613 768 ;
+C 39 ; WX 160 ; N quoteright ; B 161 526 277 750 ;
+C 40 ; WX 278 ; N parenleft ; B 94 -191 407 768 ;
+C 41 ; WX 278 ; N parenright ; B -7 -191 307 768 ;
+C 42 ; WX 389 ; N asterisk ; B 182 462 475 744 ;
+C 43 ; WX 444 ; N plus ; B 68 0 482 490 ;
+C 44 ; WX 222 ; N comma ; B 48 -136 165 88 ;
+C 45 ; WX 333 ; N hyphen ; B 92 269 364 327 ;
+C 46 ; WX 222 ; N period ; B 77 0 165 88 ;
+C 47 ; WX 278 ; N slash ; B -30 -94 448 750 ;
+C 48 ; WX 444 ; N zero ; B 85 -14 515 744 ;
+C 49 ; WX 444 ; N one ; B 179 0 442 744 ;
+C 50 ; WX 444 ; N two ; B 34 0 518 744 ;
+C 51 ; WX 444 ; N three ; B 63 -14 505 744 ;
+C 52 ; WX 444 ; N four ; B 71 0 504 744 ;
+C 53 ; WX 444 ; N five ; B 60 -14 523 730 ;
+C 54 ; WX 444 ; N six ; B 85 -14 521 744 ;
+C 55 ; WX 444 ; N seven ; B 112 0 567 730 ;
+C 56 ; WX 444 ; N eight ; B 72 -14 508 744 ;
+C 57 ; WX 444 ; N nine ; B 81 -14 514 744 ;
+C 58 ; WX 222 ; N colon ; B 77 0 257 521 ;
+C 59 ; WX 222 ; N semicolon ; B 48 -136 257 521 ;
+C 60 ; WX 444 ; N less ; B 66 -12 532 501 ;
+C 61 ; WX 444 ; N equal ; B 49 131 501 360 ;
+C 62 ; WX 444 ; N greater ; B 17 -11 483 502 ;
+C 63 ; WX 389 ; N question ; B 134 0 488 750 ;
+C 64 ; WX 800 ; N at ; B 97 -18 875 768 ;
+C 65 ; WX 500 ; N A ; B 12 0 489 750 ;
+C 66 ; WX 500 ; N B ; B 62 0 559 750 ;
+C 67 ; WX 556 ; N C ; B 116 -18 606 768 ;
+C 68 ; WX 556 ; N D ; B 72 0 602 750 ;
+C 69 ; WX 444 ; N E ; B 67 0 566 750 ;
+C 70 ; WX 444 ; N F ; B 69 0 573 750 ;
+C 71 ; WX 556 ; N G ; B 99 -18 594 768 ;
+C 72 ; WX 556 ; N H ; B 68 0 647 750 ;
+C 73 ; WX 222 ; N I ; B 79 0 303 750 ;
+C 74 ; WX 389 ; N J ; B 41 -18 475 750 ;
+C 75 ; WX 500 ; N K ; B 67 0 639 750 ;
+C 76 ; WX 444 ; N L ; B 74 0 429 750 ;
+C 77 ; WX 722 ; N M ; B 73 0 809 750 ;
+C 78 ; WX 556 ; N N ; B 66 0 649 750 ;
+C 79 ; WX 556 ; N O ; B 111 -18 606 768 ;
+C 80 ; WX 500 ; N P ; B 76 0 587 750 ;
+C 81 ; WX 556 ; N Q ; B 111 -42 606 768 ;
+C 82 ; WX 500 ; N R ; B 63 0 564 750 ;
+C 83 ; WX 500 ; N S ; B 76 -18 569 768 ;
+C 84 ; WX 444 ; N T ; B 167 0 584 750 ;
+C 85 ; WX 556 ; N U ; B 107 -18 642 750 ;
+C 86 ; WX 500 ; N V ; B 173 0 646 750 ;
+C 87 ; WX 722 ; N W ; B 162 0 864 750 ;
+C 88 ; WX 500 ; N X ; B 18 0 633 750 ;
+C 89 ; WX 500 ; N Y ; B 178 0 641 750 ;
+C 90 ; WX 444 ; N Z ; B 34 0 570 750 ;
+C 91 ; WX 278 ; N bracketleft ; B 52 -104 390 768 ;
+C 92 ; WX 222 ; N backslash ; B 119 0 262 750 ;
+C 93 ; WX 278 ; N bracketright ; B 27 -104 367 768 ;
+C 94 ; WX 444 ; N asciicircum ; B 138 340 449 750 ;
+C 95 ; WX 500 ; N underscore ; B -25 -119 487 -61 ;
+C 96 ; WX 160 ; N quoteleft ; B 154 526 270 750 ;
+C 97 ; WX 389 ; N a ; B 49 -14 425 566 ;
+C 98 ; WX 444 ; N b ; B 64 -14 478 750 ;
+C 99 ; WX 389 ; N c ; B 75 -14 441 566 ;
+C 100 ; WX 444 ; N d ; B 84 -14 541 750 ;
+C 101 ; WX 389 ; N e ; B 74 -14 434 566 ;
+C 102 ; WX 222 ; N f ; B 77 0 365 750 ; L i fi ; L l fl ;
+C 103 ; WX 444 ; N g ; B 42 -189 499 566 ;
+C 104 ; WX 444 ; N h ; B 63 0 476 750 ;
+C 105 ; WX 222 ; N i ; B 82 0 304 750 ;
+C 106 ; WX 222 ; N j ; B -19 -189 309 750 ;
+C 107 ; WX 389 ; N k ; B 62 0 489 750 ;
+C 108 ; WX 222 ; N l ; B 82 0 299 750 ;
+C 109 ; WX 667 ; N m ; B 58 0 705 566 ;
+C 110 ; WX 444 ; N n ; B 65 0 476 566 ;
+C 111 ; WX 444 ; N o ; B 88 -14 472 566 ;
+C 112 ; WX 444 ; N p ; B 18 -190 473 566 ;
+C 113 ; WX 444 ; N q ; B 84 -189 499 566 ;
+C 114 ; WX 278 ; N r ; B 69 0 377 566 ;
+C 115 ; WX 389 ; N s ; B 58 -14 428 566 ;
+C 116 ; WX 222 ; N t ; B 80 -10 318 714 ;
+C 117 ; WX 444 ; N u ; B 83 -14 496 552 ;
+C 118 ; WX 389 ; N v ; B 134 0 490 552 ;
+C 119 ; WX 556 ; N w ; B 128 0 662 552 ;
+C 120 ; WX 389 ; N x ; B 13 0 484 552 ;
+C 121 ; WX 389 ; N y ; B -12 -191 490 552 ;
+C 122 ; WX 333 ; N z ; B 18 0 427 552 ;
+C 123 ; WX 351 ; N braceleft ; B 119 -93 440 768 ;
+C 124 ; WX 222 ; N bar ; B 85 0 296 750 ;
+C 125 ; WX 351 ; N braceright ; B 54 -93 375 768 ;
+C 126 ; WX 444 ; N asciitilde ; B 66 179 482 309 ;
+C 161 ; WX 222 ; N exclamdown ; B 38 -185 263 552 ;
+C 162 ; WX 444 ; N cent ; B 87 -143 479 671 ;
+C 163 ; WX 444 ; N sterling ; B 28 -21 528 737 ;
+C 164 ; WX 167 ; N fraction ; B -170 0 490 744 ;
+C 165 ; WX 444 ; N yen ; B 80 0 611 738 ;
+C 166 ; WX 444 ; N florin ; B -26 -189 590 744 ;
+C 167 ; WX 444 ; N section ; B 65 -147 511 768 ;
+C 168 ; WX 444 ; N currency ; B 23 50 540 503 ;
+C 169 ; WX 198 ; N quotesingle ; B 184 524 284 750 ;
+C 170 ; WX 333 ; N quotedblleft ; B 197 526 443 750 ;
+C 171 ; WX 500 ; N guillemotleft ; B 133 130 499 412 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 140 130 319 412 ;
+C 173 ; WX 333 ; N guilsinglright ; B 130 130 308 412 ;
+C 174 ; WX 444 ; N fi ; B 84 0 535 750 ;
+C 175 ; WX 444 ; N fl ; B 84 0 531 750 ;
+C 177 ; WX 500 ; N endash ; B 58 273 569 324 ;
+C 178 ; WX 444 ; N dagger ; B 136 -117 527 768 ;
+C 179 ; WX 444 ; N daggerdbl ; B 54 -117 529 768 ;
+C 180 ; WX 222 ; N periodcentered ; B 120 201 207 289 ;
+C 182 ; WX 564 ; N paragraph ; B 167 -116 602 750 ;
+C 183 ; WX 606 ; N bullet ; B 192 189 574 563 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 48 -136 165 88 ;
+C 185 ; WX 330 ; N quotedblbase ; B 37 -136 284 88 ;
+C 186 ; WX 333 ; N quotedblright ; B 161 526 407 750 ;
+C 187 ; WX 500 ; N guillemotright ; B 117 130 482 412 ;
+C 188 ; WX 1000 ; N ellipsis ; B 133 0 887 88 ;
+C 189 ; WX 1000 ; N perthousand ; B 141 -15 1012 741 ;
+C 191 ; WX 389 ; N questiondown ; B 9 -202 364 552 ;
+C 193 ; WX 333 ; N grave ; B 198 605 358 744 ;
+C 194 ; WX 333 ; N acute ; B 233 605 451 744 ;
+C 195 ; WX 333 ; N circumflex ; B 149 605 443 744 ;
+C 196 ; WX 333 ; N tilde ; B 141 618 477 720 ;
+C 197 ; WX 333 ; N macron ; B 156 645 462 690 ;
+C 198 ; WX 333 ; N breve ; B 179 612 468 738 ;
+C 199 ; WX 333 ; N dotaccent ; B 266 617 352 719 ;
+C 200 ; WX 333 ; N dieresis ; B 187 617 431 719 ;
+C 202 ; WX 333 ; N ring ; B 213 596 416 796 ;
+C 203 ; WX 333 ; N cedilla ; B 17 -207 234 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 193 605 540 744 ;
+C 206 ; WX 333 ; N ogonek ; B -23 -191 184 13 ;
+C 207 ; WX 333 ; N caron ; B 178 606 472 745 ;
+C 208 ; WX 1000 ; N emdash ; B 58 273 1069 324 ;
+C 225 ; WX 722 ; N AE ; B 6 0 844 750 ;
+C 227 ; WX 266 ; N ordfeminine ; B 113 334 367 768 ;
+C 232 ; WX 444 ; N Lslash ; B 49 0 429 750 ;
+C 233 ; WX 556 ; N Oslash ; B 26 -29 688 770 ;
+C 234 ; WX 778 ; N OE ; B 109 -18 893 768 ;
+C 235 ; WX 266 ; N ordmasculine ; B 103 333 382 768 ;
+C 241 ; WX 611 ; N ae ; B 46 -14 665 566 ;
+C 245 ; WX 200 ; N dotlessi ; B 71 0 246 552 ;
+C 248 ; WX 222 ; N lslash ; B 77 0 324 750 ;
+C 249 ; WX 444 ; N oslash ; B -7 -42 547 578 ;
+C 250 ; WX 667 ; N oe ; B 75 -14 708 566 ;
+C 251 ; WX 444 ; N germandbls ; B 66 -14 505 768 ;
+C -1 ; WX 500 ; N Aacute ; B 12 0 577 942 ;
+C -1 ; WX 500 ; N Acircumflex ; B 12 0 559 942 ;
+C -1 ; WX 500 ; N Adieresis ; B 12 0 557 917 ;
+C -1 ; WX 500 ; N Agrave ; B 12 0 489 942 ;
+C -1 ; WX 500 ; N Aring ; B 12 0 531 944 ;
+C -1 ; WX 500 ; N Atilde ; B 12 0 603 918 ;
+C -1 ; WX 556 ; N Ccedilla ; B 116 -207 606 768 ;
+C -1 ; WX 444 ; N Eacute ; B 67 0 566 942 ;
+C -1 ; WX 444 ; N Ecircumflex ; B 67 0 566 942 ;
+C -1 ; WX 444 ; N Edieresis ; B 67 0 566 917 ;
+C -1 ; WX 444 ; N Egrave ; B 67 0 566 942 ;
+C -1 ; WX 556 ; N Eth ; B 54 0 602 750 ;
+C -1 ; WX 222 ; N Iacute ; B 79 0 438 942 ;
+C -1 ; WX 222 ; N Icircumflex ; B 79 0 430 942 ;
+C -1 ; WX 222 ; N Idieresis ; B 79 0 418 917 ;
+C -1 ; WX 222 ; N Igrave ; B 79 0 345 942 ;
+C -1 ; WX 556 ; N Ntilde ; B 66 0 649 918 ;
+C -1 ; WX 556 ; N Oacute ; B 111 -18 606 942 ;
+C -1 ; WX 556 ; N Ocircumflex ; B 111 -18 606 942 ;
+C -1 ; WX 556 ; N Odieresis ; B 111 -18 606 917 ;
+C -1 ; WX 556 ; N Ograve ; B 111 -18 606 942 ;
+C -1 ; WX 556 ; N Otilde ; B 111 -18 631 918 ;
+C -1 ; WX 500 ; N Scaron ; B 76 -18 594 923 ;
+C -1 ; WX 500 ; N Thorn ; B 76 0 551 750 ;
+C -1 ; WX 556 ; N Uacute ; B 107 -18 642 942 ;
+C -1 ; WX 556 ; N Ucircumflex ; B 107 -18 642 942 ;
+C -1 ; WX 556 ; N Udieresis ; B 107 -18 642 917 ;
+C -1 ; WX 556 ; N Ugrave ; B 107 -18 642 942 ;
+C -1 ; WX 500 ; N Yacute ; B 178 0 641 942 ;
+C -1 ; WX 500 ; N Ydieresis ; B 178 0 641 917 ;
+C -1 ; WX 444 ; N Zcaron ; B 34 0 570 923 ;
+C -1 ; WX 389 ; N aacute ; B 49 -14 479 744 ;
+C -1 ; WX 389 ; N acircumflex ; B 49 -14 471 744 ;
+C -1 ; WX 389 ; N adieresis ; B 49 -14 459 719 ;
+C -1 ; WX 389 ; N agrave ; B 49 -14 425 744 ;
+C -1 ; WX 389 ; N aring ; B 49 -14 444 796 ;
+C -1 ; WX 389 ; N atilde ; B 49 -14 505 720 ;
+C -1 ; WX 222 ; N brokenbar ; B 85 0 296 750 ;
+C -1 ; WX 389 ; N ccedilla ; B 45 -207 441 566 ;
+C -1 ; WX 800 ; N copyright ; B 88 -18 872 768 ;
+C -1 ; WX 400 ; N degree ; B 173 444 480 744 ;
+C -1 ; WX 444 ; N divide ; B 68 0 482 491 ;
+C -1 ; WX 389 ; N eacute ; B 74 -14 479 744 ;
+C -1 ; WX 389 ; N ecircumflex ; B 74 -14 471 744 ;
+C -1 ; WX 389 ; N edieresis ; B 74 -14 459 719 ;
+C -1 ; WX 389 ; N egrave ; B 74 -14 434 744 ;
+C -1 ; WX 444 ; N eth ; B 87 -14 504 765 ;
+C -1 ; WX 200 ; N iacute ; B 71 0 385 744 ;
+C -1 ; WX 200 ; N icircumflex ; B 71 0 367 744 ;
+C -1 ; WX 200 ; N idieresis ; B 71 0 365 719 ;
+C -1 ; WX 200 ; N igrave ; B 71 0 292 744 ;
+C -1 ; WX 444 ; N logicalnot ; B 87 93 501 360 ;
+C -1 ; WX 444 ; N minus ; B 68 220 482 271 ;
+C -1 ; WX 444 ; N mu ; B 20 -189 496 552 ;
+C -1 ; WX 444 ; N multiply ; B 37 38 510 441 ;
+C -1 ; WX 444 ; N ntilde ; B 65 0 533 720 ;
+C -1 ; WX 444 ; N oacute ; B 88 -14 507 744 ;
+C -1 ; WX 444 ; N ocircumflex ; B 88 -14 499 744 ;
+C -1 ; WX 444 ; N odieresis ; B 88 -14 487 719 ;
+C -1 ; WX 444 ; N ograve ; B 88 -14 472 744 ;
+C -1 ; WX 666 ; N onehalf ; B 75 0 737 744 ;
+C -1 ; WX 666 ; N onequarter ; B 92 0 752 744 ;
+C -1 ; WX 266 ; N onesuperior ; B 192 298 368 744 ;
+C -1 ; WX 444 ; N otilde ; B 88 -14 533 720 ;
+C -1 ; WX 444 ; N plusminus ; B 21 0 492 490 ;
+C -1 ; WX 800 ; N registered ; B 88 -18 872 768 ;
+C -1 ; WX 389 ; N scaron ; B 58 -14 486 725 ;
+C -1 ; WX 444 ; N thorn ; B 18 -190 473 750 ;
+C -1 ; WX 666 ; N threequarters ; B 99 0 784 744 ;
+C -1 ; WX 266 ; N threesuperior ; B 95 290 378 744 ;
+C -1 ; WX 722 ; N trademark ; B 206 329 825 750 ;
+C -1 ; WX 266 ; N twosuperior ; B 79 298 387 744 ;
+C -1 ; WX 444 ; N uacute ; B 83 -14 507 744 ;
+C -1 ; WX 444 ; N ucircumflex ; B 83 -14 497 734 ;
+C -1 ; WX 444 ; N udieresis ; B 83 -14 496 719 ;
+C -1 ; WX 444 ; N ugrave ; B 83 -14 496 744 ;
+C -1 ; WX 389 ; N yacute ; B -12 -191 490 744 ;
+C -1 ; WX 389 ; N ydieresis ; B -12 -191 490 719 ;
+C -1 ; WX 333 ; N zcaron ; B 18 0 468 725 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -55
+KPX A W -37
+KPX A V -37
+KPX A T -55
+
+KPX F period -111
+KPX F comma -111
+KPX F A -37
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -92
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W 0
+KPX R V 0
+KPX R T -18
+
+KPX T y -55
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T s -74
+KPX T r -74
+KPX T period -92
+KPX T o -74
+KPX T i -18
+KPX T hyphen -55
+KPX T e -74
+KPX T comma -92
+KPX T colon -74
+KPX T c -74
+KPX T a -74
+KPX T A -55
+
+KPX V y 0
+KPX V u -18
+KPX V semicolon -18
+KPX V r -18
+KPX V period -92
+KPX V o -18
+KPX V i 0
+KPX V hyphen -18
+KPX V e -18
+KPX V comma -92
+KPX V colon -18
+KPX V a -18
+KPX V A -37
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon 0
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon 0
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -37
+KPX Y semicolon -37
+KPX Y q -55
+KPX Y period -111
+KPX Y p -37
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -74
+KPX Y e -55
+KPX Y comma -111
+KPX Y colon -37
+KPX Y a -55
+KPX Y A -55
+
+KPX f quoteright 28
+KPX f f 0
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -18
+
+KPX r z 0
+KPX r y 18
+KPX r x 0
+KPX r w 18
+KPX r v 18
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 0
+KPX r q 0
+KPX r period -74
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 0
+KPX r e 0
+KPX r d 0
+KPX r comma -74
+KPX r c 0
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 55 178 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 0 -20 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 83 178 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 18 -20 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 111 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 28 0 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 83 198 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 28 0 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 83 198 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 28 0 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 111 198 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 111 198 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 111 198 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 111 198 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 55 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 55 -10 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 55 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 55 0 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -55 198 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -55 198 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -55 198 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -55 198 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -66 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -76 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -66 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -66 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 55 198 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 55 198 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 55 198 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 55 198 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 28 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 28 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 28 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 28 0 ;
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 83 198 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 73 198 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 83 198 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 83 198 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 28 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 28 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 28 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 28 0 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 111 198 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 111 198 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 111 198 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 111 198 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 55 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 55 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 55 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 55 0 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 83 198 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 28 0 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 111 198 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 55 0 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 111 198 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 55 0 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 83 148 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 28 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-CnO b/font/He-CnO
new file mode 100644
index 0000000..b6d0218
--- /dev/null
+++ b/font/He-CnO
@@ -0,0 +1,447 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989 Adobe Systems Incorporated.  All rights reserved.
+Comment Creation Date: Tue Dec  5 16:29:02 1989
+Comment UniqueID 26319
+Comment VMusage 6239 39252
+FontName Helvetica-Condensed-Oblique
+FullName Helvetica Condensed Oblique
+FamilyName Helvetica
+Weight MediumCondensed
+ItalicAngle -12
+IsFixedPitch false
+FontBBox -174 -224 1118 990
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.002
+Notice Copyright (c) 1985, 1987, 1989 Adobe Systems Incorporated.  All rights reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 750
+XHeight 556
+Ascender 750
+Descender -188
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 121 0 371 750 ;
+C 34 ; WX 250 ; N quotedbl ; B 153 513 364 739 ;
+C 35 ; WX 500 ; N numbersign ; B 33 0 621 750 ;
+C 36 ; WX 500 ; N dollar ; B 69 -116 569 815 ;
+C 37 ; WX 833 ; N percent ; B 164 -15 803 750 ;
+C 38 ; WX 667 ; N ampersand ; B 111 -18 648 750 ;
+C 39 ; WX 222 ; N quoteright ; B 171 504 317 750 ;
+C 40 ; WX 333 ; N parenleft ; B 115 -215 443 750 ;
+C 41 ; WX 333 ; N parenright ; B 3 -215 331 750 ;
+C 42 ; WX 500 ; N asterisk ; B 229 455 537 750 ;
+C 43 ; WX 500 ; N plus ; B 91 0 518 505 ;
+C 44 ; WX 250 ; N comma ; B 49 -146 192 100 ;
+C 45 ; WX 333 ; N hyphen ; B 103 275 364 358 ;
+C 46 ; WX 250 ; N period ; B 80 0 192 100 ;
+C 47 ; WX 278 ; N slash ; B -19 -27 450 750 ;
+C 48 ; WX 500 ; N zero ; B 98 -15 563 750 ;
+C 49 ; WX 500 ; N one ; B 190 0 476 750 ;
+C 50 ; WX 500 ; N two ; B 44 0 562 750 ;
+C 51 ; WX 500 ; N three ; B 73 -15 552 750 ;
+C 52 ; WX 500 ; N four ; B 68 0 543 750 ;
+C 53 ; WX 500 ; N five ; B 75 -15 575 735 ;
+C 54 ; WX 500 ; N six ; B 91 -15 566 750 ;
+C 55 ; WX 500 ; N seven ; B 116 0 612 735 ;
+C 56 ; WX 500 ; N eight ; B 83 -15 559 750 ;
+C 57 ; WX 500 ; N nine ; B 91 -15 566 750 ;
+C 58 ; WX 250 ; N colon ; B 80 0 287 547 ;
+C 59 ; WX 250 ; N semicolon ; B 49 -146 287 547 ;
+C 60 ; WX 500 ; N less ; B 89 -10 569 518 ;
+C 61 ; WX 500 ; N equal ; B 70 124 539 384 ;
+C 62 ; WX 500 ; N greater ; B 40 -10 520 518 ;
+C 63 ; WX 500 ; N question ; B 169 0 586 750 ;
+C 64 ; WX 800 ; N at ; B 106 -15 863 750 ;
+C 65 ; WX 556 ; N A ; B 11 0 546 750 ;
+C 66 ; WX 556 ; N B ; B 80 0 610 750 ;
+C 67 ; WX 556 ; N C ; B 106 -18 624 765 ;
+C 68 ; WX 611 ; N D ; B 82 0 653 750 ;
+C 69 ; WX 500 ; N E ; B 74 0 608 750 ;
+C 70 ; WX 444 ; N F ; B 74 0 585 750 ;
+C 71 ; WX 611 ; N G ; B 109 -18 646 765 ;
+C 72 ; WX 611 ; N H ; B 79 0 691 750 ;
+C 73 ; WX 278 ; N I ; B 98 0 340 750 ;
+C 74 ; WX 444 ; N J ; B 52 -15 527 750 ;
+C 75 ; WX 556 ; N K ; B 79 0 698 750 ;
+C 76 ; WX 500 ; N L ; B 83 0 488 750 ;
+C 77 ; WX 778 ; N M ; B 76 0 861 750 ;
+C 78 ; WX 611 ; N N ; B 77 0 693 750 ;
+C 79 ; WX 611 ; N O ; B 116 -18 658 765 ;
+C 80 ; WX 556 ; N P ; B 86 0 641 750 ;
+C 81 ; WX 611 ; N Q ; B 116 -34 659 765 ;
+C 82 ; WX 611 ; N R ; B 86 0 655 750 ;
+C 83 ; WX 556 ; N S ; B 86 -18 611 765 ;
+C 84 ; WX 500 ; N T ; B 158 0 645 750 ;
+C 85 ; WX 611 ; N U ; B 114 -18 690 750 ;
+C 86 ; WX 556 ; N V ; B 170 0 704 750 ;
+C 87 ; WX 833 ; N W ; B 176 0 975 750 ;
+C 88 ; WX 556 ; N X ; B 17 0 692 750 ;
+C 89 ; WX 556 ; N Y ; B 170 0 705 750 ;
+C 90 ; WX 500 ; N Z ; B 28 0 627 750 ;
+C 91 ; WX 333 ; N bracketleft ; B 56 -209 434 750 ;
+C 92 ; WX 250 ; N backslash ; B 128 0 281 750 ;
+C 93 ; WX 333 ; N bracketright ; B 14 -209 392 750 ;
+C 94 ; WX 500 ; N asciicircum ; B 141 333 502 750 ;
+C 95 ; WX 500 ; N underscore ; B -25 -119 487 -61 ;
+C 96 ; WX 222 ; N quoteleft ; B 175 521 321 767 ;
+C 97 ; WX 444 ; N a ; B 55 -15 465 571 ;
+C 98 ; WX 500 ; N b ; B 75 -15 525 750 ;
+C 99 ; WX 444 ; N c ; B 85 -15 488 571 ;
+C 100 ; WX 500 ; N d ; B 88 -15 583 750 ;
+C 101 ; WX 444 ; N e ; B 86 -15 476 571 ;
+C 102 ; WX 278 ; N f ; B 93 0 418 752 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 53 -189 544 571 ;
+C 104 ; WX 500 ; N h ; B 73 0 524 750 ;
+C 105 ; WX 222 ; N i ; B 72 0 310 750 ;
+C 106 ; WX 222 ; N j ; B -27 -190 313 750 ;
+C 107 ; WX 444 ; N k ; B 69 0 552 750 ;
+C 108 ; WX 222 ; N l ; B 72 0 310 750 ;
+C 109 ; WX 778 ; N m ; B 76 0 799 571 ;
+C 110 ; WX 500 ; N n ; B 73 0 524 571 ;
+C 111 ; WX 500 ; N o ; B 96 -15 524 571 ;
+C 112 ; WX 500 ; N p ; B 32 -188 524 571 ;
+C 113 ; WX 500 ; N q ; B 100 -184 544 571 ;
+C 114 ; WX 333 ; N r ; B 81 0 441 563 ;
+C 115 ; WX 444 ; N s ; B 68 -15 473 571 ;
+C 116 ; WX 278 ; N t ; B 101 0 375 707 ;
+C 117 ; WX 500 ; N u ; B 99 -15 542 556 ;
+C 118 ; WX 444 ; N v ; B 131 0 549 556 ;
+C 119 ; WX 667 ; N w ; B 137 0 767 556 ;
+C 120 ; WX 444 ; N x ; B 9 0 548 556 ;
+C 121 ; WX 444 ; N y ; B -13 -190 543 556 ;
+C 122 ; WX 389 ; N z ; B 24 0 482 556 ;
+C 123 ; WX 274 ; N braceleft ; B 77 -95 425 750 ;
+C 124 ; WX 250 ; N bar ; B 93 0 316 750 ;
+C 125 ; WX 274 ; N braceright ; B -12 -95 337 750 ;
+C 126 ; WX 500 ; N asciitilde ; B 89 166 520 345 ;
+C 161 ; WX 333 ; N exclamdown ; B 83 -179 333 571 ;
+C 162 ; WX 500 ; N cent ; B 94 -137 499 667 ;
+C 163 ; WX 500 ; N sterling ; B 40 -15 589 750 ;
+C 164 ; WX 167 ; N fraction ; B -174 0 500 750 ;
+C 165 ; WX 500 ; N yen ; B 88 0 677 750 ;
+C 166 ; WX 500 ; N florin ; B -28 -192 645 750 ;
+C 167 ; WX 500 ; N section ; B 51 -208 552 750 ;
+C 168 ; WX 500 ; N currency ; B 51 50 576 553 ;
+C 169 ; WX 250 ; N quotesingle ; B 208 513 308 739 ;
+C 170 ; WX 389 ; N quotedblleft ; B 173 521 490 767 ;
+C 171 ; WX 500 ; N guillemotleft ; B 145 125 520 495 ;
+C 172 ; WX 278 ; N guilsinglleft ; B 124 125 320 495 ;
+C 173 ; WX 278 ; N guilsinglright ; B 90 125 286 495 ;
+C 174 ; WX 500 ; N fi ; B 93 0 584 752 ;
+C 175 ; WX 500 ; N fl ; B 93 0 584 752 ;
+C 177 ; WX 500 ; N endash ; B 58 275 573 345 ;
+C 178 ; WX 500 ; N dagger ; B 137 -176 573 750 ;
+C 179 ; WX 500 ; N daggerdbl ; B 50 -176 572 750 ;
+C 180 ; WX 250 ; N periodcentered ; B 123 204 236 304 ;
+C 182 ; WX 440 ; N paragraph ; B 113 -116 550 750 ;
+C 183 ; WX 333 ; N bullet ; B 91 222 401 529 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 33 -146 179 100 ;
+C 185 ; WX 389 ; N quotedblbase ; B 31 -146 348 100 ;
+C 186 ; WX 389 ; N quotedblright ; B 169 504 486 750 ;
+C 187 ; WX 500 ; N guillemotright ; B 112 125 487 495 ;
+C 188 ; WX 1000 ; N ellipsis ; B 121 0 899 100 ;
+C 189 ; WX 1111 ; N perthousand ; B 157 -16 1118 750 ;
+C 191 ; WX 500 ; N questiondown ; B 33 -190 450 559 ;
+C 193 ; WX 333 ; N grave ; B 198 624 366 765 ;
+C 194 ; WX 333 ; N acute ; B 233 624 461 765 ;
+C 195 ; WX 333 ; N circumflex ; B 154 624 446 765 ;
+C 196 ; WX 333 ; N tilde ; B 132 633 496 749 ;
+C 197 ; WX 333 ; N macron ; B 150 657 475 715 ;
+C 198 ; WX 333 ; N breve ; B 172 629 484 765 ;
+C 199 ; WX 250 ; N dotaccent ; B 224 650 324 750 ;
+C 200 ; WX 333 ; N dieresis ; B 190 650 440 750 ;
+C 202 ; WX 250 ; N ring ; B 169 593 377 796 ;
+C 203 ; WX 333 ; N cedilla ; B 23 -224 255 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 194 624 603 765 ;
+C 206 ; WX 333 ; N ogonek ; B -23 -191 188 13 ;
+C 207 ; WX 333 ; N caron ; B 184 624 476 765 ;
+C 208 ; WX 1000 ; N emdash ; B 58 275 1073 345 ;
+C 225 ; WX 833 ; N AE ; B 0 0 944 750 ;
+C 227 ; WX 300 ; N ordfeminine ; B 90 305 392 765 ;
+C 232 ; WX 500 ; N Lslash ; B 39 0 488 750 ;
+C 233 ; WX 611 ; N Oslash ; B 25 -43 738 796 ;
+C 234 ; WX 833 ; N OE ; B 113 -18 946 765 ;
+C 235 ; WX 300 ; N ordmasculine ; B 85 305 413 765 ;
+C 241 ; WX 667 ; N ae ; B 50 -15 711 571 ;
+C 245 ; WX 222 ; N dotlessi ; B 72 0 269 556 ;
+C 248 ; WX 222 ; N lslash ; B 59 0 347 750 ;
+C 249 ; WX 500 ; N oslash ; B 19 -46 591 582 ;
+C 250 ; WX 722 ; N oe ; B 81 -15 758 571 ;
+C 251 ; WX 500 ; N germandbls ; B 71 -5 548 765 ;
+C -1 ; WX 500 ; N Zcaron ; B 28 0 627 959 ;
+C -1 ; WX 444 ; N ccedilla ; B 79 -224 488 571 ;
+C -1 ; WX 444 ; N ydieresis ; B -13 -190 543 750 ;
+C -1 ; WX 444 ; N atilde ; B 55 -15 552 749 ;
+C -1 ; WX 222 ; N icircumflex ; B 72 0 391 765 ;
+C -1 ; WX 300 ; N threesuperior ; B 102 291 409 750 ;
+C -1 ; WX 444 ; N ecircumflex ; B 86 -15 502 765 ;
+C -1 ; WX 500 ; N thorn ; B 32 -188 524 750 ;
+C -1 ; WX 444 ; N egrave ; B 86 -15 476 765 ;
+C -1 ; WX 300 ; N twosuperior ; B 83 300 413 750 ;
+C -1 ; WX 444 ; N eacute ; B 86 -15 517 765 ;
+C -1 ; WX 500 ; N otilde ; B 96 -15 580 749 ;
+C -1 ; WX 556 ; N Aacute ; B 11 0 614 959 ;
+C -1 ; WX 500 ; N ocircumflex ; B 96 -15 530 765 ;
+C -1 ; WX 444 ; N yacute ; B -13 -190 543 765 ;
+C -1 ; WX 500 ; N udieresis ; B 99 -15 542 750 ;
+C -1 ; WX 750 ; N threequarters ; B 106 0 831 750 ;
+C -1 ; WX 444 ; N acircumflex ; B 55 -15 502 765 ;
+C -1 ; WX 611 ; N Eth ; B 67 0 653 750 ;
+C -1 ; WX 444 ; N edieresis ; B 86 -15 496 750 ;
+C -1 ; WX 500 ; N ugrave ; B 99 -15 542 765 ;
+C -1 ; WX 750 ; N trademark ; B 147 329 878 750 ;
+C -1 ; WX 500 ; N ograve ; B 96 -15 524 765 ;
+C -1 ; WX 444 ; N scaron ; B 68 -15 532 765 ;
+C -1 ; WX 278 ; N Idieresis ; B 98 0 455 944 ;
+C -1 ; WX 500 ; N uacute ; B 99 -15 545 765 ;
+C -1 ; WX 444 ; N agrave ; B 55 -15 465 765 ;
+C -1 ; WX 500 ; N ntilde ; B 73 0 580 749 ;
+C -1 ; WX 444 ; N aring ; B 55 -15 474 796 ;
+C -1 ; WX 389 ; N zcaron ; B 24 0 504 765 ;
+C -1 ; WX 278 ; N Icircumflex ; B 98 0 460 959 ;
+C -1 ; WX 611 ; N Ntilde ; B 77 0 693 943 ;
+C -1 ; WX 500 ; N ucircumflex ; B 99 -15 542 765 ;
+C -1 ; WX 500 ; N Ecircumflex ; B 74 0 608 959 ;
+C -1 ; WX 278 ; N Iacute ; B 98 0 475 959 ;
+C -1 ; WX 556 ; N Ccedilla ; B 106 -224 624 765 ;
+C -1 ; WX 611 ; N Odieresis ; B 116 -18 658 944 ;
+C -1 ; WX 556 ; N Scaron ; B 86 -18 629 959 ;
+C -1 ; WX 500 ; N Edieresis ; B 74 0 608 944 ;
+C -1 ; WX 278 ; N Igrave ; B 98 0 380 959 ;
+C -1 ; WX 444 ; N adieresis ; B 55 -15 496 750 ;
+C -1 ; WX 611 ; N Ograve ; B 116 -18 658 959 ;
+C -1 ; WX 500 ; N Egrave ; B 74 0 608 959 ;
+C -1 ; WX 556 ; N Ydieresis ; B 170 0 705 944 ;
+C -1 ; WX 800 ; N registered ; B 79 -18 881 765 ;
+C -1 ; WX 611 ; N Otilde ; B 116 -18 676 943 ;
+C -1 ; WX 750 ; N onequarter ; B 143 0 817 750 ;
+C -1 ; WX 611 ; N Ugrave ; B 114 -18 690 959 ;
+C -1 ; WX 611 ; N Ucircumflex ; B 114 -18 690 959 ;
+C -1 ; WX 556 ; N Thorn ; B 86 0 607 750 ;
+C -1 ; WX 500 ; N divide ; B 91 3 518 505 ;
+C -1 ; WX 556 ; N Atilde ; B 11 0 649 943 ;
+C -1 ; WX 611 ; N Uacute ; B 114 -18 690 959 ;
+C -1 ; WX 611 ; N Ocircumflex ; B 116 -18 658 959 ;
+C -1 ; WX 500 ; N logicalnot ; B 111 117 539 384 ;
+C -1 ; WX 556 ; N Aring ; B 11 0 571 990 ;
+C -1 ; WX 222 ; N idieresis ; B 72 0 385 750 ;
+C -1 ; WX 222 ; N iacute ; B 72 0 406 765 ;
+C -1 ; WX 444 ; N aacute ; B 55 -15 517 765 ;
+C -1 ; WX 500 ; N plusminus ; B 44 0 531 505 ;
+C -1 ; WX 500 ; N multiply ; B 65 48 544 461 ;
+C -1 ; WX 611 ; N Udieresis ; B 114 -18 690 944 ;
+C -1 ; WX 500 ; N minus ; B 91 219 518 289 ;
+C -1 ; WX 300 ; N onesuperior ; B 200 300 392 750 ;
+C -1 ; WX 500 ; N Eacute ; B 74 0 608 959 ;
+C -1 ; WX 556 ; N Acircumflex ; B 11 0 599 959 ;
+C -1 ; WX 800 ; N copyright ; B 79 -18 880 765 ;
+C -1 ; WX 556 ; N Agrave ; B 11 0 546 959 ;
+C -1 ; WX 500 ; N odieresis ; B 96 -15 524 750 ;
+C -1 ; WX 500 ; N oacute ; B 96 -15 545 765 ;
+C -1 ; WX 400 ; N degree ; B 174 450 481 750 ;
+C -1 ; WX 222 ; N igrave ; B 72 0 311 765 ;
+C -1 ; WX 500 ; N mu ; B 35 -189 540 556 ;
+C -1 ; WX 611 ; N Oacute ; B 116 -18 658 959 ;
+C -1 ; WX 500 ; N eth ; B 87 -15 548 770 ;
+C -1 ; WX 556 ; N Adieresis ; B 11 0 594 944 ;
+C -1 ; WX 556 ; N Yacute ; B 170 0 705 959 ;
+C -1 ; WX 250 ; N brokenbar ; B 93 0 316 750 ;
+C -1 ; WX 750 ; N onehalf ; B 91 0 777 750 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -55
+KPX A Y -55
+KPX A W -37
+KPX A V -37
+KPX A T -55
+
+KPX F period -111
+KPX F comma -111
+KPX F A -37
+
+KPX L y -37
+KPX L quoteright -92
+KPX L Y -92
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R y 0
+KPX R Y -18
+KPX R W 0
+KPX R V 0
+KPX R T -18
+
+KPX T y -55
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T s -74
+KPX T r -74
+KPX T period -92
+KPX T o -74
+KPX T i -18
+KPX T hyphen -55
+KPX T e -74
+KPX T comma -92
+KPX T colon -74
+KPX T c -74
+KPX T a -74
+KPX T A -55
+
+KPX V y 0
+KPX V u -18
+KPX V semicolon -18
+KPX V r -18
+KPX V period -92
+KPX V o -18
+KPX V i 0
+KPX V hyphen -18
+KPX V e -18
+KPX V comma -92
+KPX V colon -18
+KPX V a -18
+KPX V A -37
+
+KPX W y 0
+KPX W u 0
+KPX W semicolon 0
+KPX W r 0
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -74
+KPX W colon 0
+KPX W a -18
+KPX W A -18
+
+KPX Y v -18
+KPX Y u -37
+KPX Y semicolon -37
+KPX Y q -55
+KPX Y period -111
+KPX Y p -37
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -74
+KPX Y e -55
+KPX Y comma -111
+KPX Y colon -37
+KPX Y a -55
+KPX Y A -55
+
+KPX f quoteright 18
+KPX f f 0
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t 0
+KPX quoteright s -55
+KPX quoteright quoteright -18
+
+KPX r z 20
+KPX r y 18
+KPX r x 20
+KPX r w 18
+KPX r v 18
+KPX r u 0
+KPX r t 0
+KPX r r 0
+KPX r quoteright 0
+KPX r q 0
+KPX r period -74
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r hyphen -37
+KPX r h 0
+KPX r g 0
+KPX r f 20
+KPX r e 0
+KPX r d 0
+KPX r comma -74
+KPX r c -20
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -37
+KPX w comma -37
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 153 194 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 153 194 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 153 194 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 153 194 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 194 194 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 153 194 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 112 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 125 194 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 125 194 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 125 194 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 125 194 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 14 194 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 14 194 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 14 194 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 14 194 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 180 194 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 180 194 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 180 194 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 180 194 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 180 194 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 180 194 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 153 194 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 180 194 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 180 194 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 180 194 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 180 194 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 153 194 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 153 194 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 125 194 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 56 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 56 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 56 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 56 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 97 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 56 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 56 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 56 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 56 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 56 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 56 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -55 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -55 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -55 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -55 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 84 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 84 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 84 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 84 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 84 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 56 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 84 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 84 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 84 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 84 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 56 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 56 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 28 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-ExtC b/font/He-ExtC
new file mode 100644
index 0000000..4e14e98
--- /dev/null
+++ b/font/He-ExtC
@@ -0,0 +1,415 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1988, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Fri Dec 13 16:18:46 1991
+Comment UniqueID 37157
+Comment VMusage 24443 31335
+FontName Helvetica-ExtraCompressed
+FullName Helvetica Extra Compressed
+FamilyName Helvetica
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -123 -250 1000 956
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.002
+Notice Copyright (c) 1988, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.Helvetica is a trademark of Linotype-Hell AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 712
+XHeight 572
+Ascender 712
+Descender -128
+StartCharMetrics 228
+C 32 ; WX 185 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 259 ; N exclam ; B 66 0 193 712 ;
+C 34 ; WX 333 ; N quotedbl ; B 15 441 318 712 ;
+C 35 ; WX 370 ; N numbersign ; B 12 0 358 712 ;
+C 36 ; WX 370 ; N dollar ; B 17 -66 354 778 ;
+C 37 ; WX 537 ; N percent ; B 19 -14 518 726 ;
+C 38 ; WX 426 ; N ampersand ; B 14 -14 424 726 ;
+C 39 ; WX 167 ; N quoteright ; B 9 457 158 712 ;
+C 40 ; WX 296 ; N parenleft ; B 26 -94 270 726 ;
+C 41 ; WX 296 ; N parenright ; B 26 -94 270 726 ;
+C 42 ; WX 370 ; N asterisk ; B 22 399 347 712 ;
+C 43 ; WX 556 ; N plus ; B 33 40 523 532 ;
+C 44 ; WX 185 ; N comma ; B 9 -126 175 148 ;
+C 45 ; WX 259 ; N hyphen ; B 43 264 216 356 ;
+C 46 ; WX 185 ; N period ; B 29 0 156 148 ;
+C 47 ; WX 204 ; N slash ; B -5 -14 210 726 ;
+C 48 ; WX 370 ; N zero ; B 19 -14 351 726 ;
+C 49 ; WX 370 ; N one ; B 39 0 260 712 ;
+C 50 ; WX 370 ; N two ; B 19 0 351 726 ;
+C 51 ; WX 370 ; N three ; B 19 -14 351 726 ;
+C 52 ; WX 370 ; N four ; B -3 0 369 712 ;
+C 53 ; WX 370 ; N five ; B 19 -14 351 712 ;
+C 54 ; WX 370 ; N six ; B 19 -14 351 726 ;
+C 55 ; WX 370 ; N seven ; B 9 0 366 712 ;
+C 56 ; WX 370 ; N eight ; B 19 -14 351 726 ;
+C 57 ; WX 370 ; N nine ; B 19 -14 351 726 ;
+C 58 ; WX 185 ; N colon ; B 29 0 156 572 ;
+C 59 ; WX 185 ; N semicolon ; B 9 -126 175 572 ;
+C 60 ; WX 556 ; N less ; B 60 62 497 510 ;
+C 61 ; WX 556 ; N equal ; B 33 112 523 460 ;
+C 62 ; WX 556 ; N greater ; B 59 62 496 510 ;
+C 63 ; WX 426 ; N question ; B 63 0 363 726 ;
+C 64 ; WX 800 ; N at ; B 36 -14 764 726 ;
+C 65 ; WX 370 ; N A ; B -4 0 374 712 ;
+C 66 ; WX 370 ; N B ; B 19 0 351 712 ;
+C 67 ; WX 370 ; N C ; B 19 -14 351 726 ;
+C 68 ; WX 370 ; N D ; B 19 0 351 712 ;
+C 69 ; WX 296 ; N E ; B 23 0 287 712 ;
+C 70 ; WX 296 ; N F ; B 23 0 287 712 ;
+C 71 ; WX 370 ; N G ; B 19 -14 351 726 ;
+C 72 ; WX 370 ; N H ; B 19 0 351 712 ;
+C 73 ; WX 204 ; N I ; B 31 0 172 712 ;
+C 74 ; WX 370 ; N J ; B 19 -14 351 712 ;
+C 75 ; WX 370 ; N K ; B 13 0 367 712 ;
+C 76 ; WX 296 ; N L ; B 19 0 285 712 ;
+C 77 ; WX 593 ; N M ; B 23 0 570 712 ;
+C 78 ; WX 426 ; N N ; B 23 0 403 712 ;
+C 79 ; WX 370 ; N O ; B 19 -14 351 726 ;
+C 80 ; WX 370 ; N P ; B 19 0 351 712 ;
+C 81 ; WX 370 ; N Q ; B 19 -128 351 726 ;
+C 82 ; WX 370 ; N R ; B 19 0 372 712 ;
+C 83 ; WX 370 ; N S ; B 17 -14 354 726 ;
+C 84 ; WX 333 ; N T ; B 1 0 332 712 ;
+C 85 ; WX 370 ; N U ; B 19 -14 351 712 ;
+C 86 ; WX 370 ; N V ; B 2 0 368 712 ;
+C 87 ; WX 593 ; N W ; B -1 0 594 712 ;
+C 88 ; WX 370 ; N X ; B -5 0 374 712 ;
+C 89 ; WX 370 ; N Y ; B 2 0 368 712 ;
+C 90 ; WX 296 ; N Z ; B 4 0 291 712 ;
+C 91 ; WX 296 ; N bracketleft ; B 38 -95 258 726 ;
+C 92 ; WX 278 ; N backslash ; B -54 -14 332 726 ;
+C 93 ; WX 296 ; N bracketright ; B 38 -95 258 726 ;
+C 94 ; WX 556 ; N asciicircum ; B 51 347 505 712 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 167 ; N quoteleft ; B 9 457 158 712 ;
+C 97 ; WX 333 ; N a ; B 17 -7 325 579 ;
+C 98 ; WX 333 ; N b ; B 17 -7 316 712 ;
+C 99 ; WX 333 ; N c ; B 17 -7 316 579 ;
+C 100 ; WX 333 ; N d ; B 17 -7 316 712 ;
+C 101 ; WX 333 ; N e ; B 17 -7 316 579 ;
+C 102 ; WX 204 ; N f ; B 6 0 202 712 ; L i fi ; L l fl ;
+C 103 ; WX 333 ; N g ; B 17 -128 316 579 ;
+C 104 ; WX 333 ; N h ; B 17 0 316 712 ;
+C 105 ; WX 167 ; N i ; B 20 0 147 712 ;
+C 106 ; WX 167 ; N j ; B -28 -128 152 712 ;
+C 107 ; WX 333 ; N k ; B 19 0 331 712 ;
+C 108 ; WX 167 ; N l ; B 20 0 147 712 ;
+C 109 ; WX 500 ; N m ; B 14 0 485 579 ;
+C 110 ; WX 333 ; N n ; B 17 0 316 579 ;
+C 111 ; WX 333 ; N o ; B 17 -7 316 579 ;
+C 112 ; WX 333 ; N p ; B 19 -128 318 579 ;
+C 113 ; WX 333 ; N q ; B 17 -128 316 579 ;
+C 114 ; WX 333 ; N r ; B 17 0 316 579 ;
+C 115 ; WX 333 ; N s ; B 14 -7 319 579 ;
+C 116 ; WX 204 ; N t ; B 3 0 201 676 ;
+C 117 ; WX 333 ; N u ; B 17 -7 316 572 ;
+C 118 ; WX 333 ; N v ; B 5 0 327 572 ;
+C 119 ; WX 537 ; N w ; B 3 0 535 572 ;
+C 120 ; WX 333 ; N x ; B 1 0 332 572 ;
+C 121 ; WX 333 ; N y ; B 4 -128 328 572 ;
+C 122 ; WX 259 ; N z ; B 9 0 250 572 ;
+C 123 ; WX 333 ; N braceleft ; B 38 -95 295 726 ;
+C 124 ; WX 222 ; N bar ; B 53 -250 169 750 ;
+C 125 ; WX 333 ; N braceright ; B 38 -102 295 719 ;
+C 126 ; WX 556 ; N asciitilde ; B 47 200 509 386 ;
+C 161 ; WX 259 ; N exclamdown ; B 66 -114 193 598 ;
+C 162 ; WX 370 ; N cent ; B 34 -68 333 630 ;
+C 163 ; WX 370 ; N sterling ; B 7 -14 362 726 ;
+C 164 ; WX 130 ; N fraction ; B -123 -14 266 726 ;
+C 165 ; WX 370 ; N yen ; B 2 0 368 712 ;
+C 166 ; WX 370 ; N florin ; B -13 -128 383 726 ;
+C 167 ; WX 426 ; N section ; B 24 -62 401 726 ;
+C 168 ; WX 370 ; N currency ; B 4 113 366 477 ;
+C 169 ; WX 222 ; N quotesingle ; B 51 441 171 712 ;
+C 170 ; WX 333 ; N quotedblleft ; B 8 457 324 712 ;
+C 171 ; WX 333 ; N guillemotleft ; B 12 85 316 535 ;
+C 172 ; WX 167 ; N guilsinglleft ; B 13 85 154 535 ;
+C 173 ; WX 167 ; N guilsinglright ; B 13 85 154 535 ;
+C 174 ; WX 370 ; N fi ; B 9 0 360 712 ;
+C 175 ; WX 370 ; N fl ; B 9 0 360 712 ;
+C 177 ; WX 500 ; N endash ; B 0 266 500 354 ;
+C 178 ; WX 426 ; N dagger ; B 20 -73 406 712 ;
+C 179 ; WX 426 ; N daggerdbl ; B 20 -62 406 712 ;
+C 180 ; WX 185 ; N periodcentered ; B 8 200 176 367 ;
+C 182 ; WX 620 ; N paragraph ; B 75 -179 604 712 ;
+C 183 ; WX 500 ; N bullet ; B 75 181 425 531 ;
+C 184 ; WX 167 ; N quotesinglbase ; B 9 -107 158 148 ;
+C 185 ; WX 333 ; N quotedblbase ; B 9 -107 325 148 ;
+C 186 ; WX 333 ; N quotedblright ; B 9 457 325 712 ;
+C 187 ; WX 333 ; N guillemotright ; B 17 85 321 535 ;
+C 188 ; WX 1000 ; N ellipsis ; B 103 0 896 148 ;
+C 189 ; WX 759 ; N perthousand ; B 11 -14 747 726 ;
+C 191 ; WX 426 ; N questiondown ; B 63 -128 363 598 ;
+C 193 ; WX 167 ; N grave ; B -45 620 147 755 ;
+C 194 ; WX 167 ; N acute ; B 41 620 233 755 ;
+C 195 ; WX 167 ; N circumflex ; B -60 620 226 755 ;
+C 196 ; WX 167 ; N tilde ; B -52 632 220 738 ;
+C 197 ; WX 167 ; N macron ; B -48 653 220 718 ;
+C 198 ; WX 167 ; N breve ; B -56 623 227 752 ;
+C 199 ; WX 167 ; N dotaccent ; B 36 632 130 741 ;
+C 200 ; WX 167 ; N dieresis ; B -46 632 213 741 ;
+C 202 ; WX 167 ; N ring ; B -9 633 176 822 ;
+C 203 ; WX 167 ; N cedilla ; B -38 -235 211 0 ;
+C 205 ; WX 167 ; N hungarumlaut ; B -36 620 307 755 ;
+C 206 ; WX 167 ; N ogonek ; B -48 -188 140 0 ;
+C 207 ; WX 167 ; N caron ; B -58 620 231 755 ;
+C 208 ; WX 1000 ; N emdash ; B 0 266 1000 354 ;
+C 225 ; WX 500 ; N AE ; B -2 0 491 712 ;
+C 227 ; WX 200 ; N ordfeminine ; B 7 375 194 726 ;
+C 232 ; WX 296 ; N Lslash ; B -12 0 285 712 ;
+C 233 ; WX 370 ; N Oslash ; B 6 -62 360 745 ;
+C 234 ; WX 463 ; N OE ; B 18 -14 454 726 ;
+C 235 ; WX 200 ; N ordmasculine ; B 10 375 179 726 ;
+C 241 ; WX 500 ; N ae ; B 14 -7 485 579 ;
+C 245 ; WX 167 ; N dotlessi ; B 20 0 147 572 ;
+C 248 ; WX 167 ; N lslash ; B -12 0 182 712 ;
+C 249 ; WX 333 ; N oslash ; B 3 -68 324 641 ;
+C 250 ; WX 500 ; N oe ; B 14 -7 485 579 ;
+C 251 ; WX 333 ; N germandbls ; B 17 -7 316 726 ;
+C -1 ; WX 333 ; N ecircumflex ; B 17 -7 316 755 ;
+C -1 ; WX 333 ; N edieresis ; B 17 -7 316 741 ;
+C -1 ; WX 333 ; N aacute ; B 17 -7 325 755 ;
+C -1 ; WX 800 ; N registered ; B 16 -14 784 726 ;
+C -1 ; WX 167 ; N icircumflex ; B -60 0 226 755 ;
+C -1 ; WX 333 ; N udieresis ; B 17 -7 316 741 ;
+C -1 ; WX 333 ; N ograve ; B 17 -7 316 755 ;
+C -1 ; WX 333 ; N uacute ; B 17 -7 316 755 ;
+C -1 ; WX 333 ; N ucircumflex ; B 17 -7 316 755 ;
+C -1 ; WX 370 ; N Aacute ; B -4 0 374 889 ;
+C -1 ; WX 167 ; N igrave ; B -45 0 147 755 ;
+C -1 ; WX 204 ; N Icircumflex ; B -41 0 245 889 ;
+C -1 ; WX 333 ; N ccedilla ; B 17 -235 316 579 ;
+C -1 ; WX 333 ; N adieresis ; B 17 -7 325 741 ;
+C -1 ; WX 296 ; N Ecircumflex ; B 5 0 291 889 ;
+C -1 ; WX 333 ; N scaron ; B 14 -7 319 755 ;
+C -1 ; WX 333 ; N thorn ; B 19 -128 318 712 ;
+C -1 ; WX 1000 ; N trademark ; B 36 300 964 712 ;
+C -1 ; WX 333 ; N egrave ; B 17 -7 316 755 ;
+C -1 ; WX 240 ; N threesuperior ; B 12 282 228 726 ;
+C -1 ; WX 259 ; N zcaron ; B -12 0 277 755 ;
+C -1 ; WX 333 ; N atilde ; B 17 -7 325 738 ;
+C -1 ; WX 333 ; N aring ; B 17 -7 325 822 ;
+C -1 ; WX 333 ; N ocircumflex ; B 17 -7 316 755 ;
+C -1 ; WX 296 ; N Edieresis ; B 19 0 287 875 ;
+C -1 ; WX 555 ; N threequarters ; B 7 -14 547 726 ;
+C -1 ; WX 333 ; N ydieresis ; B 4 -128 328 741 ;
+C -1 ; WX 333 ; N yacute ; B 4 -128 328 755 ;
+C -1 ; WX 167 ; N iacute ; B 20 0 233 755 ;
+C -1 ; WX 370 ; N Acircumflex ; B -4 0 374 889 ;
+C -1 ; WX 370 ; N Uacute ; B 19 -14 351 889 ;
+C -1 ; WX 333 ; N eacute ; B 17 -7 316 755 ;
+C -1 ; WX 370 ; N Ograve ; B 19 -14 351 889 ;
+C -1 ; WX 333 ; N agrave ; B 17 -7 325 755 ;
+C -1 ; WX 370 ; N Udieresis ; B 19 -14 351 875 ;
+C -1 ; WX 333 ; N acircumflex ; B 17 -7 325 755 ;
+C -1 ; WX 204 ; N Igrave ; B -26 0 172 889 ;
+C -1 ; WX 240 ; N twosuperior ; B 12 290 228 726 ;
+C -1 ; WX 370 ; N Ugrave ; B 19 -14 351 889 ;
+C -1 ; WX 555 ; N onequarter ; B 20 -14 547 726 ;
+C -1 ; WX 370 ; N Ucircumflex ; B 19 -14 351 889 ;
+C -1 ; WX 370 ; N Scaron ; B 17 -14 354 889 ;
+C -1 ; WX 204 ; N Idieresis ; B -27 0 232 875 ;
+C -1 ; WX 167 ; N idieresis ; B -46 0 213 741 ;
+C -1 ; WX 296 ; N Egrave ; B 20 0 287 889 ;
+C -1 ; WX 370 ; N Oacute ; B 19 -14 351 889 ;
+C -1 ; WX 556 ; N divide ; B 33 16 523 556 ;
+C -1 ; WX 370 ; N Atilde ; B -4 0 374 872 ;
+C -1 ; WX 370 ; N Aring ; B -4 0 374 956 ;
+C -1 ; WX 370 ; N Odieresis ; B 19 -14 351 875 ;
+C -1 ; WX 370 ; N Adieresis ; B -4 0 374 875 ;
+C -1 ; WX 426 ; N Ntilde ; B 23 0 403 872 ;
+C -1 ; WX 296 ; N Zcaron ; B 4 0 296 889 ;
+C -1 ; WX 370 ; N Thorn ; B 19 0 351 712 ;
+C -1 ; WX 204 ; N Iacute ; B 31 0 252 889 ;
+C -1 ; WX 556 ; N plusminus ; B 33 40 523 532 ;
+C -1 ; WX 556 ; N multiply ; B 33 40 523 532 ;
+C -1 ; WX 296 ; N Eacute ; B 23 0 298 889 ;
+C -1 ; WX 370 ; N Ydieresis ; B 2 0 368 875 ;
+C -1 ; WX 240 ; N onesuperior ; B 49 290 193 717 ;
+C -1 ; WX 333 ; N ugrave ; B 17 -7 316 755 ;
+C -1 ; WX 556 ; N logicalnot ; B 33 149 523 460 ;
+C -1 ; WX 333 ; N ntilde ; B 17 0 316 738 ;
+C -1 ; WX 370 ; N Otilde ; B 19 -14 351 872 ;
+C -1 ; WX 333 ; N otilde ; B 17 -7 316 738 ;
+C -1 ; WX 370 ; N Ccedilla ; B 19 -235 351 726 ;
+C -1 ; WX 370 ; N Agrave ; B -4 0 374 889 ;
+C -1 ; WX 555 ; N onehalf ; B 20 -14 547 726 ;
+C -1 ; WX 370 ; N Eth ; B -10 0 351 712 ;
+C -1 ; WX 400 ; N degree ; B 57 426 343 712 ;
+C -1 ; WX 370 ; N Yacute ; B 2 0 368 889 ;
+C -1 ; WX 370 ; N Ocircumflex ; B 19 -14 351 889 ;
+C -1 ; WX 333 ; N oacute ; B 17 -7 316 755 ;
+C -1 ; WX 333 ; N mu ; B 17 -128 316 572 ;
+C -1 ; WX 556 ; N minus ; B 33 228 523 344 ;
+C -1 ; WX 333 ; N eth ; B 17 -7 316 751 ;
+C -1 ; WX 333 ; N odieresis ; B 17 -7 316 741 ;
+C -1 ; WX 800 ; N copyright ; B 16 -14 784 726 ;
+C -1 ; WX 222 ; N brokenbar ; B 53 -175 169 675 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 87
+
+KPX A y -37
+KPX A w -37
+KPX A v -37
+KPX A quoteright -37
+KPX A Y -55
+KPX A W -37
+KPX A V -37
+KPX A T -55
+
+KPX F period -92
+KPX F comma -111
+KPX F A -37
+
+KPX L y -55
+KPX L quoteright -92
+KPX L Y -92
+KPX L W -55
+KPX L V -55
+KPX L T -74
+
+KPX P period -129
+KPX P comma -150
+KPX P A -37
+
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -74
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T s -74
+KPX T r -74
+KPX T period -74
+KPX T o -74
+KPX T i -74
+KPX T hyphen -92
+KPX T e -74
+KPX T comma -74
+KPX T colon -74
+KPX T c -74
+KPX T a -74
+KPX T A -74
+
+KPX V y -18
+KPX V u -18
+KPX V semicolon -18
+KPX V r -18
+KPX V period -55
+KPX V o -18
+KPX V i -18
+KPX V hyphen -55
+KPX V e -18
+KPX V comma -74
+KPX V colon -18
+KPX V a -18
+KPX V A -55
+
+KPX W semicolon -18
+KPX W period -37
+KPX W o -18
+KPX W hyphen -55
+KPX W e -18
+KPX W comma -55
+KPX W colon -18
+KPX W a -18
+KPX W A -55
+
+KPX Y v -18
+KPX Y u -18
+KPX Y semicolon -37
+KPX Y q -55
+KPX Y period -74
+KPX Y p -18
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -92
+KPX Y e -55
+KPX Y comma -92
+KPX Y colon -37
+KPX Y a -55
+KPX Y A -55
+
+KPX quoteright t -18
+KPX quoteright s -55
+
+KPX r period -129
+KPX r hyphen -18
+KPX r comma -129
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 102 134 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 102 134 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 102 134 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 102 134 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 102 134 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 102 134 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 65 134 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 65 134 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 65 134 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 65 134 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 19 134 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 19 134 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 19 134 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 19 134 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 130 134 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 102 134 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 102 134 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 102 134 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 102 134 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 102 134 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 102 134 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 102 134 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 102 134 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 102 134 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 102 134 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 102 134 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 102 134 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 65 134 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 83 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 83 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 83 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 83 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 83 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 83 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 83 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 83 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 83 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 83 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 83 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 83 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 83 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 83 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 83 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 83 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 83 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 83 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 83 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 83 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 83 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 83 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 83 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 46 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-Lt b/font/He-Lt
new file mode 100644
index 0000000..b02ffac
--- /dev/null
+++ b/font/He-Lt
@@ -0,0 +1,445 @@
+StartFontMetrics 2.0
+Comment  Copyright (c) 1985, 1987, 1988 Adobe Systems Incorporated. All Rights Reserved.
+Comment Creation Date:Mon Jan 11 16:46:06 PST 1988
+FontName Helvetica-Light
+EncodingScheme AdobeStandardEncoding
+FullName Helvetica Light
+FamilyName Helvetica
+Weight Light
+ItalicAngle 0.0
+IsFixedPitch false
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.002
+Notice Copyright (c) 1985, 1987, 1988 Adobe Systems Incorporated.  All Rights Reserved.Helvetica is a trademark of Linotype Company.
+FontBBox -164 -212 1000 979
+CapHeight 720
+XHeight 518
+Descender -204
+Ascender 720
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 130 0 203 720 ;
+C 34 ; WX 278 ; N quotedbl ; B 57 494 220 720 ;
+C 35 ; WX 556 ; N numbersign ; B 27 0 530 698 ;
+C 36 ; WX 556 ; N dollar ; B 37 -95 518 766 ;
+C 37 ; WX 889 ; N percent ; B 67 -14 821 705 ;
+C 38 ; WX 667 ; N ampersand ; B 41 -19 644 720 ;
+C 39 ; WX 222 ; N quoteright ; B 80 495 153 720 ;
+C 40 ; WX 333 ; N parenleft ; B 55 -191 277 739 ;
+C 41 ; WX 333 ; N parenright ; B 56 -191 278 739 ;
+C 42 ; WX 389 ; N asterisk ; B 44 434 344 720 ;
+C 43 ; WX 660 ; N plus ; B 80 0 580 500 ;
+C 44 ; WX 278 ; N comma ; B 102 -137 175 88 ;
+C 45 ; WX 333 ; N hyphen ; B 40 229 293 291 ;
+C 46 ; WX 278 ; N period ; B 102 0 175 88 ;
+C 47 ; WX 278 ; N slash ; B -3 -90 288 739 ;
+C 48 ; WX 556 ; N zero ; B 39 -14 516 705 ;
+C 49 ; WX 556 ; N one ; B 120 0 366 705 ;
+C 50 ; WX 556 ; N two ; B 48 0 515 705 ;
+C 51 ; WX 556 ; N three ; B 34 -14 512 705 ;
+C 52 ; WX 556 ; N four ; B 36 0 520 698 ;
+C 53 ; WX 556 ; N five ; B 35 -14 506 698 ;
+C 54 ; WX 556 ; N six ; B 41 -14 514 705 ;
+C 55 ; WX 556 ; N seven ; B 59 0 508 698 ;
+C 56 ; WX 556 ; N eight ; B 44 -14 512 705 ;
+C 57 ; WX 556 ; N nine ; B 41 -14 515 705 ;
+C 58 ; WX 278 ; N colon ; B 102 0 175 492 ;
+C 59 ; WX 278 ; N semicolon ; B 102 -137 175 492 ;
+C 60 ; WX 660 ; N less ; B 80 -6 580 505 ;
+C 61 ; WX 660 ; N equal ; B 80 124 580 378 ;
+C 62 ; WX 660 ; N greater ; B 80 -6 580 505 ;
+C 63 ; WX 500 ; N question ; B 37 0 472 739 ;
+C 64 ; WX 800 ; N at ; B 40 -19 760 739 ;
+C 65 ; WX 667 ; N A ; B 15 0 651 720 ;
+C 66 ; WX 667 ; N B ; B 81 0 610 720 ;
+C 67 ; WX 722 ; N C ; B 48 -19 670 739 ;
+C 68 ; WX 722 ; N D ; B 81 0 669 720 ;
+C 69 ; WX 611 ; N E ; B 81 0 570 720 ;
+C 70 ; WX 556 ; N F ; B 74 0 538 720 ;
+C 71 ; WX 778 ; N G ; B 53 -19 695 739 ;
+C 72 ; WX 722 ; N H ; B 80 0 642 720 ;
+C 73 ; WX 278 ; N I ; B 105 0 173 720 ;
+C 74 ; WX 500 ; N J ; B 22 -19 415 720 ;
+C 75 ; WX 667 ; N K ; B 85 0 649 720 ;
+C 76 ; WX 556 ; N L ; B 81 0 535 720 ;
+C 77 ; WX 833 ; N M ; B 78 0 755 720 ;
+C 78 ; WX 722 ; N N ; B 79 0 642 720 ;
+C 79 ; WX 778 ; N O ; B 53 -19 724 739 ;
+C 80 ; WX 611 ; N P ; B 78 0 576 720 ;
+C 81 ; WX 778 ; N Q ; B 48 -52 719 739 ;
+C 82 ; WX 667 ; N R ; B 80 0 612 720 ;
+C 83 ; WX 611 ; N S ; B 43 -19 567 739 ;
+C 84 ; WX 556 ; N T ; B 16 0 540 720 ;
+C 85 ; WX 722 ; N U ; B 82 -19 640 720 ;
+C 86 ; WX 611 ; N V ; B 18 0 593 720 ;
+C 87 ; WX 889 ; N W ; B 14 0 875 720 ;
+C 88 ; WX 611 ; N X ; B 18 0 592 720 ;
+C 89 ; WX 611 ; N Y ; B 12 0 598 720 ;
+C 90 ; WX 611 ; N Z ; B 31 0 579 720 ;
+C 91 ; WX 333 ; N bracketleft ; B 91 -191 282 739 ;
+C 92 ; WX 278 ; N backslash ; B -46 0 324 739 ;
+C 93 ; WX 333 ; N bracketright ; B 51 -191 242 739 ;
+C 94 ; WX 660 ; N asciicircum ; B 73 245 586 698 ;
+C 95 ; WX 500 ; N underscore ; B 0 -119 500 -61 ;
+C 96 ; WX 222 ; N quoteleft ; B 69 495 142 720 ;
+C 97 ; WX 556 ; N a ; B 46 -14 534 532 ;
+C 98 ; WX 611 ; N b ; B 79 -14 555 720 ;
+C 99 ; WX 556 ; N c ; B 47 -14 508 532 ;
+C 100 ; WX 611 ; N d ; B 56 -14 532 720 ;
+C 101 ; WX 556 ; N e ; B 45 -14 511 532 ;
+C 102 ; WX 278 ; N f ; B 20 0 257 734 ; L i fi ; L l fl ;
+C 103 ; WX 611 ; N g ; B 56 -212 532 532 ;
+C 104 ; WX 556 ; N h ; B 72 0 483 720 ;
+C 105 ; WX 222 ; N i ; B 78 0 144 720 ;
+C 106 ; WX 222 ; N j ; B 5 -204 151 720 ;
+C 107 ; WX 500 ; N k ; B 68 0 487 720 ;
+C 108 ; WX 222 ; N l ; B 81 0 141 720 ;
+C 109 ; WX 833 ; N m ; B 64 0 768 532 ;
+C 110 ; WX 556 ; N n ; B 72 0 483 532 ;
+C 111 ; WX 556 ; N o ; B 38 -14 518 532 ;
+C 112 ; WX 611 ; N p ; B 79 -204 555 532 ;
+C 113 ; WX 611 ; N q ; B 56 -204 532 532 ;
+C 114 ; WX 333 ; N r ; B 75 0 306 532 ;
+C 115 ; WX 500 ; N s ; B 46 -14 454 532 ;
+C 116 ; WX 278 ; N t ; B 20 -14 254 662 ;
+C 117 ; WX 556 ; N u ; B 72 -14 483 518 ;
+C 118 ; WX 500 ; N v ; B 17 0 483 518 ;
+C 119 ; WX 722 ; N w ; B 15 0 707 518 ;
+C 120 ; WX 500 ; N x ; B 18 0 481 518 ;
+C 121 ; WX 500 ; N y ; B 18 -204 482 518 ;
+C 122 ; WX 500 ; N z ; B 33 0 467 518 ;
+C 123 ; WX 333 ; N braceleft ; B 45 -191 279 739 ;
+C 124 ; WX 222 ; N bar ; B 81 0 141 739 ;
+C 125 ; WX 333 ; N braceright ; B 51 -187 285 743 ;
+C 126 ; WX 660 ; N asciitilde ; B 80 174 580 339 ;
+C 161 ; WX 333 ; N exclamdown ; B 130 -187 203 532 ;
+C 162 ; WX 556 ; N cent ; B 45 -141 506 647 ;
+C 163 ; WX 556 ; N sterling ; B 25 -14 530 705 ;
+C 164 ; WX 167 ; N fraction ; B -164 -14 331 705 ;
+C 165 ; WX 556 ; N yen ; B 4 0 552 720 ;
+C 166 ; WX 556 ; N florin ; B 13 -196 539 734 ;
+C 167 ; WX 556 ; N section ; B 48 -181 508 739 ;
+C 168 ; WX 556 ; N currency ; B 27 50 529 553 ;
+C 169 ; WX 222 ; N quotesingle ; B 85 494 137 720 ;
+C 170 ; WX 389 ; N quotedblleft ; B 86 495 310 720 ;
+C 171 ; WX 556 ; N guillemotleft ; B 113 117 443 404 ;
+C 172 ; WX 389 ; N guilsinglleft ; B 121 117 267 404 ;
+C 173 ; WX 389 ; N guilsinglright ; B 122 117 268 404 ;
+C 174 ; WX 500 ; N fi ; B 13 0 435 734 ;
+C 175 ; WX 500 ; N fl ; B 13 0 432 734 ;
+C 177 ; WX 500 ; N endash ; B 0 238 500 282 ;
+C 178 ; WX 556 ; N dagger ; B 37 -166 519 720 ;
+C 179 ; WX 556 ; N daggerdbl ; B 37 -166 519 720 ;
+C 180 ; WX 278 ; N periodcentered ; B 90 301 187 398 ;
+C 182 ; WX 650 ; N paragraph ; B 66 -146 506 720 ;
+C 183 ; WX 500 ; N bullet ; B 70 180 430 540 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 80 -137 153 88 ;
+C 185 ; WX 389 ; N quotedblbase ; B 79 -137 303 88 ;
+C 186 ; WX 389 ; N quotedblright ; B 79 495 303 720 ;
+C 187 ; WX 556 ; N guillemotright ; B 113 117 443 404 ;
+C 188 ; WX 1000 ; N ellipsis ; B 131 0 870 88 ;
+C 189 ; WX 1000 ; N perthousand ; B 14 -14 985 705 ;
+C 191 ; WX 500 ; N questiondown ; B 28 -207 463 532 ;
+C 193 ; WX 333 ; N grave ; B 45 574 234 713 ;
+C 194 ; WX 333 ; N acute ; B 109 574 297 713 ;
+C 195 ; WX 333 ; N circumflex ; B 24 574 318 713 ;
+C 196 ; WX 333 ; N tilde ; B 16 586 329 688 ;
+C 197 ; WX 333 ; N macron ; B 23 612 319 657 ;
+C 198 ; WX 333 ; N breve ; B 28 580 316 706 ;
+C 199 ; WX 333 ; N dotaccent ; B 134 584 199 686 ;
+C 200 ; WX 333 ; N dieresis ; B 60 584 284 686 ;
+C 202 ; WX 333 ; N ring ; B 67 578 266 777 ;
+C 203 ; WX 333 ; N cedilla ; B 54 -207 257 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 109 574 459 713 ;
+C 206 ; WX 333 ; N ogonek ; B 74 -190 228 0 ;
+C 207 ; WX 333 ; N caron ; B 24 574 318 713 ;
+C 208 ; WX 1000 ; N emdash ; B 0 238 1000 282 ;
+C 225 ; WX 1000 ; N AE ; B 5 0 960 720 ;
+C 227 ; WX 334 ; N ordfeminine ; B 8 307 325 739 ;
+C 232 ; WX 556 ; N Lslash ; B 0 0 535 720 ;
+C 233 ; WX 778 ; N Oslash ; B 42 -37 736 747 ;
+C 234 ; WX 1000 ; N OE ; B 41 -19 967 739 ;
+C 235 ; WX 334 ; N ordmasculine ; B 11 307 323 739 ;
+C 241 ; WX 889 ; N ae ; B 39 -14 847 532 ;
+C 245 ; WX 222 ; N dotlessi ; B 78 0 138 518 ;
+C 248 ; WX 222 ; N lslash ; B 10 0 212 720 ;
+C 249 ; WX 556 ; N oslash ; B 35 -23 521 541 ;
+C 250 ; WX 944 ; N oe ; B 36 -14 904 532 ;
+C 251 ; WX 500 ; N germandbls ; B 52 -14 459 734 ;
+C -1 ; WX 667 ; N Aacute ; B 15 0 651 915 ;
+C -1 ; WX 667 ; N Acircumflex ; B 15 0 651 915 ;
+C -1 ; WX 667 ; N Adieresis ; B 15 0 651 888 ;
+C -1 ; WX 667 ; N Agrave ; B 15 0 651 915 ;
+C -1 ; WX 667 ; N Aring ; B 15 0 651 979 ;
+C -1 ; WX 667 ; N Atilde ; B 15 0 651 890 ;
+C -1 ; WX 722 ; N Ccedilla ; B 48 -207 670 739 ;
+C -1 ; WX 611 ; N Eacute ; B 81 0 570 915 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 81 0 570 915 ;
+C -1 ; WX 611 ; N Edieresis ; B 81 0 570 888 ;
+C -1 ; WX 611 ; N Egrave ; B 81 0 570 915 ;
+C -1 ; WX 722 ; N Eth ; B 10 0 669 720 ;
+C -1 ; WX 278 ; N Iacute ; B 62 0 250 915 ;
+C -1 ; WX 278 ; N Icircumflex ; B -23 0 271 915 ;
+C -1 ; WX 278 ; N Idieresis ; B 13 0 237 888 ;
+C -1 ; WX 278 ; N Igrave ; B 18 0 207 915 ;
+C -1 ; WX 722 ; N Ntilde ; B 79 0 642 890 ;
+C -1 ; WX 778 ; N Oacute ; B 53 -19 724 915 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 53 -19 724 915 ;
+C -1 ; WX 778 ; N Odieresis ; B 53 -19 724 888 ;
+C -1 ; WX 778 ; N Ograve ; B 53 -19 724 915 ;
+C -1 ; WX 778 ; N Otilde ; B 53 -19 724 890 ;
+C -1 ; WX 611 ; N Scaron ; B 43 -19 567 915 ;
+C -1 ; WX 611 ; N Thorn ; B 78 0 576 720 ;
+C -1 ; WX 722 ; N Uacute ; B 82 -19 640 915 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 82 -19 640 915 ;
+C -1 ; WX 722 ; N Udieresis ; B 82 -19 640 888 ;
+C -1 ; WX 722 ; N Ugrave ; B 82 -19 640 915 ;
+C -1 ; WX 611 ; N Yacute ; B 12 0 598 915 ;
+C -1 ; WX 611 ; N Ydieresis ; B 12 0 598 888 ;
+C -1 ; WX 611 ; N Zcaron ; B 31 0 579 915 ;
+C -1 ; WX 556 ; N aacute ; B 46 -14 534 713 ;
+C -1 ; WX 556 ; N acircumflex ; B 46 -14 534 713 ;
+C -1 ; WX 556 ; N adieresis ; B 46 -14 534 686 ;
+C -1 ; WX 556 ; N agrave ; B 46 -14 534 713 ;
+C -1 ; WX 556 ; N aring ; B 46 -14 534 777 ;
+C -1 ; WX 556 ; N atilde ; B 46 -14 534 688 ;
+C -1 ; WX 222 ; N brokenbar ; B 81 0 141 739 ;
+C -1 ; WX 556 ; N ccedilla ; B 47 -207 508 532 ;
+C -1 ; WX 800 ; N copyright ; B 21 -19 779 739 ;
+C -1 ; WX 400 ; N degree ; B 50 405 350 705 ;
+C -1 ; WX 660 ; N divide ; B 80 0 580 500 ;
+C -1 ; WX 556 ; N eacute ; B 45 -14 511 713 ;
+C -1 ; WX 556 ; N ecircumflex ; B 45 -14 511 713 ;
+C -1 ; WX 556 ; N edieresis ; B 45 -14 511 686 ;
+C -1 ; WX 556 ; N egrave ; B 45 -14 511 713 ;
+C -1 ; WX 556 ; N eth ; B 38 -14 518 739 ;
+C -1 ; WX 222 ; N iacute ; B 34 0 222 713 ;
+C -1 ; WX 222 ; N icircumflex ; B -51 0 243 713 ;
+C -1 ; WX 222 ; N idieresis ; B -15 0 209 686 ;
+C -1 ; WX 222 ; N igrave ; B -10 0 179 713 ;
+C -1 ; WX 660 ; N logicalnot ; B 80 112 580 378 ;
+C -1 ; WX 660 ; N minus ; B 80 220 580 280 ;
+C -1 ; WX 556 ; N mu ; B 72 -204 483 518 ;
+C -1 ; WX 660 ; N multiply ; B 83 6 578 500 ;
+C -1 ; WX 556 ; N ntilde ; B 72 0 483 688 ;
+C -1 ; WX 556 ; N oacute ; B 38 -14 518 713 ;
+C -1 ; WX 556 ; N ocircumflex ; B 38 -14 518 713 ;
+C -1 ; WX 556 ; N odieresis ; B 38 -14 518 686 ;
+C -1 ; WX 556 ; N ograve ; B 38 -14 518 713 ;
+C -1 ; WX 834 ; N onehalf ; B 40 -14 794 739 ;
+C -1 ; WX 834 ; N onequarter ; B 40 -14 794 739 ;
+C -1 ; WX 333 ; N onesuperior ; B 87 316 247 739 ;
+C -1 ; WX 556 ; N otilde ; B 38 -14 518 688 ;
+C -1 ; WX 660 ; N plusminus ; B 80 0 580 500 ;
+C -1 ; WX 800 ; N registered ; B 21 -19 779 739 ;
+C -1 ; WX 500 ; N scaron ; B 46 -14 454 713 ;
+C -1 ; WX 611 ; N thorn ; B 79 -204 555 720 ;
+C -1 ; WX 834 ; N threequarters ; B 40 -14 794 739 ;
+C -1 ; WX 333 ; N threesuperior ; B 11 308 322 739 ;
+C -1 ; WX 940 ; N trademark ; B 29 299 859 720 ;
+C -1 ; WX 333 ; N twosuperior ; B 15 316 318 739 ;
+C -1 ; WX 556 ; N uacute ; B 72 -14 483 713 ;
+C -1 ; WX 556 ; N ucircumflex ; B 72 -14 483 713 ;
+C -1 ; WX 556 ; N udieresis ; B 72 -14 483 686 ;
+C -1 ; WX 556 ; N ugrave ; B 72 -14 483 713 ;
+C -1 ; WX 500 ; N yacute ; B 18 -204 482 713 ;
+C -1 ; WX 500 ; N ydieresis ; B 18 -204 482 686 ;
+C -1 ; WX 500 ; N zcaron ; B 33 0 467 713 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -74
+KPX A Y -74
+KPX A W -37
+KPX A V -74
+KPX A T -92
+
+KPX F period -129
+KPX F comma -129
+KPX F A -55
+
+KPX L y -37
+KPX L quoteright -74
+KPX L Y -111
+KPX L W -55
+KPX L V -92
+KPX L T -92
+
+KPX P period -129
+KPX P comma -129
+KPX P A -74
+
+KPX R y 0
+KPX R Y -37
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -84
+KPX T w -84
+KPX T u -92
+KPX T semicolon -111
+KPX T s -111
+KPX T r -92
+KPX T period -111
+KPX T o -111
+KPX T i 0
+KPX T hyphen -129
+KPX T e -111
+KPX T comma -111
+KPX T colon -111
+KPX T c -111
+KPX T a -111
+KPX T A -92
+
+KPX V y -18
+KPX V u -37
+KPX V semicolon -74
+KPX V r -37
+KPX V period -129
+KPX V o -55
+KPX V i -18
+KPX V hyphen -55
+KPX V e -55
+KPX V comma -129
+KPX V colon -74
+KPX V a -55
+KPX V A -74
+
+KPX W y 0
+KPX W u -18
+KPX W semicolon -18
+KPX W r -18
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen 0
+KPX W e -18
+KPX W comma -74
+KPX W colon -18
+KPX W a -37
+KPX W A -37
+
+KPX Y v -40
+KPX Y u -37
+KPX Y semicolon -92
+KPX Y q -92
+KPX Y period -111
+KPX Y p -37
+KPX Y o -92
+KPX Y i -20
+KPX Y hyphen -111
+KPX Y e -92
+KPX Y comma -111
+KPX Y colon -92
+KPX Y a -92
+KPX Y A -74
+
+KPX f quoteright 18
+KPX f f -18
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t -18
+KPX quoteright s -74
+KPX quoteright quoteright -18
+
+KPX r z 0
+KPX r y 18
+KPX r x 0
+KPX r w 0
+KPX r v 0
+KPX r u 0
+KPX r t 18
+KPX r r 0
+KPX r quoteright 0
+KPX r q -18
+KPX r period -92
+KPX r o -18
+KPX r n 18
+KPX r m 18
+KPX r hyphen -55
+KPX r h 0
+KPX r g 0
+KPX r f 18
+KPX r e -18
+KPX r d -18
+KPX r comma -92
+KPX r c -18
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -92
+KPX y comma -92
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 139 202 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 83 0 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 139 202 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 83 0 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 194 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 111 0 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 139 202 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 83 0 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 139 202 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 83 0 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 194 202 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 194 202 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 194 202 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 194 202 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 111 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 111 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 111 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 111 0 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -47 202 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -47 202 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -47 202 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -27 202 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -75 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -75 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -75 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -55 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 202 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 202 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 202 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 202 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 111 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 111 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 111 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 111 0 ;
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 167 202 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 167 202 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 167 202 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 167 202 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 111 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 111 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 111 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 111 0 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 222 202 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 222 202 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 222 202 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 222 202 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 111 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 111 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 111 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 111 0 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 167 202 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 111 0 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 194 202 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 111 0 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 222 202 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 111 0 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 187 202 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 111 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-LtO b/font/He-LtO
new file mode 100644
index 0000000..96612d1
--- /dev/null
+++ b/font/He-LtO
@@ -0,0 +1,445 @@
+StartFontMetrics 2.0
+Comment  Copyright (c) 1985, 1987, 1988 Adobe Systems Incorporated. All Rights Reserved.
+Comment Creation Date:Mon Jan 11 17:38:44 PST 1988
+FontName Helvetica-LightOblique
+EncodingScheme AdobeStandardEncoding
+FullName Helvetica Light Oblique
+FamilyName Helvetica
+Weight Light
+ItalicAngle -12.0
+IsFixedPitch false
+UnderlinePosition -90
+UnderlineThickness 58
+Version 001.002
+Notice Copyright (c) 1985, 1987, 1988 Adobe Systems Incorporated.  All Rights Reserved.Helvetica is a trademark of Linotype Company.
+FontBBox -167 -212 1110 979
+CapHeight 720
+XHeight 518
+Descender -204
+Ascender 720
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 130 0 356 720 ;
+C 34 ; WX 278 ; N quotedbl ; B 162 494 373 720 ;
+C 35 ; WX 556 ; N numbersign ; B 75 0 633 698 ;
+C 36 ; WX 556 ; N dollar ; B 75 -95 613 766 ;
+C 37 ; WX 889 ; N percent ; B 176 -14 860 705 ;
+C 38 ; WX 667 ; N ampersand ; B 77 -19 646 720 ;
+C 39 ; WX 222 ; N quoteright ; B 185 495 306 720 ;
+C 40 ; WX 333 ; N parenleft ; B 97 -191 434 739 ;
+C 41 ; WX 333 ; N parenright ; B 15 -191 353 739 ;
+C 42 ; WX 389 ; N asterisk ; B 172 434 472 720 ;
+C 43 ; WX 660 ; N plus ; B 127 0 640 500 ;
+C 44 ; WX 278 ; N comma ; B 73 -137 194 88 ;
+C 45 ; WX 333 ; N hyphen ; B 89 229 355 291 ;
+C 46 ; WX 278 ; N period ; B 102 0 194 88 ;
+C 47 ; WX 278 ; N slash ; B -22 -90 445 739 ;
+C 48 ; WX 556 ; N zero ; B 93 -14 609 705 ;
+C 49 ; WX 556 ; N one ; B 231 0 516 705 ;
+C 50 ; WX 556 ; N two ; B 48 0 628 705 ;
+C 51 ; WX 556 ; N three ; B 74 -14 605 705 ;
+C 52 ; WX 556 ; N four ; B 73 0 570 698 ;
+C 53 ; WX 556 ; N five ; B 71 -14 616 698 ;
+C 54 ; WX 556 ; N six ; B 94 -14 617 705 ;
+C 55 ; WX 556 ; N seven ; B 152 0 656 698 ;
+C 56 ; WX 556 ; N eight ; B 80 -14 601 705 ;
+C 57 ; WX 556 ; N nine ; B 84 -14 607 705 ;
+C 58 ; WX 278 ; N colon ; B 102 0 280 492 ;
+C 59 ; WX 278 ; N semicolon ; B 73 -137 280 492 ;
+C 60 ; WX 660 ; N less ; B 129 -6 687 505 ;
+C 61 ; WX 660 ; N equal ; B 106 124 660 378 ;
+C 62 ; WX 660 ; N greater ; B 79 -6 640 505 ;
+C 63 ; WX 500 ; N question ; B 148 0 594 739 ;
+C 64 ; WX 800 ; N at ; B 108 -19 857 739 ;
+C 65 ; WX 667 ; N A ; B 15 0 651 720 ;
+C 66 ; WX 667 ; N B ; B 81 0 697 720 ;
+C 67 ; WX 722 ; N C ; B 111 -19 771 739 ;
+C 68 ; WX 722 ; N D ; B 81 0 758 720 ;
+C 69 ; WX 611 ; N E ; B 81 0 713 720 ;
+C 70 ; WX 556 ; N F ; B 74 0 691 720 ;
+C 71 ; WX 778 ; N G ; B 116 -19 796 739 ;
+C 72 ; WX 722 ; N H ; B 80 0 795 720 ;
+C 73 ; WX 278 ; N I ; B 105 0 326 720 ;
+C 74 ; WX 500 ; N J ; B 58 -19 568 720 ;
+C 75 ; WX 667 ; N K ; B 85 0 752 720 ;
+C 76 ; WX 556 ; N L ; B 81 0 547 720 ;
+C 77 ; WX 833 ; N M ; B 78 0 908 720 ;
+C 78 ; WX 722 ; N N ; B 79 0 795 720 ;
+C 79 ; WX 778 ; N O ; B 117 -19 812 739 ;
+C 80 ; WX 611 ; N P ; B 78 0 693 720 ;
+C 81 ; WX 778 ; N Q ; B 112 -52 808 739 ;
+C 82 ; WX 667 ; N R ; B 80 0 726 720 ;
+C 83 ; WX 611 ; N S ; B 82 -19 663 739 ;
+C 84 ; WX 556 ; N T ; B 157 0 693 720 ;
+C 85 ; WX 722 ; N U ; B 129 -19 793 720 ;
+C 86 ; WX 611 ; N V ; B 171 0 746 720 ;
+C 87 ; WX 889 ; N W ; B 167 0 1028 720 ;
+C 88 ; WX 611 ; N X ; B 18 0 734 720 ;
+C 89 ; WX 611 ; N Y ; B 165 0 751 720 ;
+C 90 ; WX 611 ; N Z ; B 31 0 729 720 ;
+C 91 ; WX 333 ; N bracketleft ; B 50 -191 439 739 ;
+C 92 ; WX 278 ; N backslash ; B 111 0 324 739 ;
+C 93 ; WX 333 ; N bracketright ; B 10 -191 399 739 ;
+C 94 ; WX 660 ; N asciicircum ; B 125 245 638 698 ;
+C 95 ; WX 500 ; N underscore ; B -25 -119 487 -61 ;
+C 96 ; WX 222 ; N quoteleft ; B 174 495 295 720 ;
+C 97 ; WX 556 ; N a ; B 71 -14 555 532 ;
+C 98 ; WX 611 ; N b ; B 79 -14 619 720 ;
+C 99 ; WX 556 ; N c ; B 92 -14 576 532 ;
+C 100 ; WX 611 ; N d ; B 101 -14 685 720 ;
+C 101 ; WX 556 ; N e ; B 90 -14 575 532 ;
+C 102 ; WX 278 ; N f ; B 97 0 412 734 ; L i fi ; L l fl ;
+C 103 ; WX 611 ; N g ; B 56 -212 642 532 ;
+C 104 ; WX 556 ; N h ; B 72 0 565 720 ;
+C 105 ; WX 222 ; N i ; B 81 0 297 720 ;
+C 106 ; WX 222 ; N j ; B -38 -204 304 720 ;
+C 107 ; WX 500 ; N k ; B 68 0 574 720 ;
+C 108 ; WX 222 ; N l ; B 81 0 294 720 ;
+C 109 ; WX 833 ; N m ; B 64 0 848 532 ;
+C 110 ; WX 556 ; N n ; B 72 0 565 532 ;
+C 111 ; WX 556 ; N o ; B 84 -14 582 532 ;
+C 112 ; WX 611 ; N p ; B 36 -204 620 532 ;
+C 113 ; WX 611 ; N q ; B 102 -204 642 532 ;
+C 114 ; WX 333 ; N r ; B 75 0 419 532 ;
+C 115 ; WX 500 ; N s ; B 78 -14 519 532 ;
+C 116 ; WX 278 ; N t ; B 108 -14 360 662 ;
+C 117 ; WX 556 ; N u ; B 103 -14 593 518 ;
+C 118 ; WX 500 ; N v ; B 127 0 593 518 ;
+C 119 ; WX 722 ; N w ; B 125 0 817 518 ;
+C 120 ; WX 500 ; N x ; B 18 0 584 518 ;
+C 121 ; WX 500 ; N y ; B 26 -204 592 518 ;
+C 122 ; WX 500 ; N z ; B 33 0 564 518 ;
+C 123 ; WX 333 ; N braceleft ; B 103 -191 436 739 ;
+C 124 ; WX 222 ; N bar ; B 81 0 298 739 ;
+C 125 ; WX 333 ; N braceright ; B 12 -187 344 743 ;
+C 126 ; WX 660 ; N asciitilde ; B 127 174 645 339 ;
+C 161 ; WX 333 ; N exclamdown ; B 90 -187 316 532 ;
+C 162 ; WX 556 ; N cent ; B 90 -141 574 647 ;
+C 163 ; WX 556 ; N sterling ; B 51 -14 613 705 ;
+C 164 ; WX 167 ; N fraction ; B -167 -14 481 705 ;
+C 165 ; WX 556 ; N yen ; B 110 0 705 720 ;
+C 166 ; WX 556 ; N florin ; B -26 -196 691 734 ;
+C 167 ; WX 556 ; N section ; B 91 -181 581 739 ;
+C 168 ; WX 556 ; N currency ; B 55 50 629 553 ;
+C 169 ; WX 222 ; N quotesingle ; B 190 494 290 720 ;
+C 170 ; WX 389 ; N quotedblleft ; B 191 495 463 720 ;
+C 171 ; WX 556 ; N guillemotleft ; B 161 117 529 404 ;
+C 172 ; WX 389 ; N guilsinglleft ; B 169 117 353 404 ;
+C 173 ; WX 389 ; N guilsinglright ; B 147 117 330 404 ;
+C 174 ; WX 500 ; N fi ; B 92 0 588 734 ;
+C 175 ; WX 500 ; N fl ; B 92 0 585 734 ;
+C 177 ; WX 500 ; N endash ; B 51 238 560 282 ;
+C 178 ; WX 556 ; N dagger ; B 130 -166 623 720 ;
+C 179 ; WX 556 ; N daggerdbl ; B 49 -166 625 720 ;
+C 180 ; WX 278 ; N periodcentered ; B 163 301 262 398 ;
+C 182 ; WX 650 ; N paragraph ; B 174 -146 659 720 ;
+C 183 ; WX 500 ; N bullet ; B 142 180 510 540 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 51 -137 172 88 ;
+C 185 ; WX 389 ; N quotedblbase ; B 50 -137 322 88 ;
+C 186 ; WX 389 ; N quotedblright ; B 184 495 456 720 ;
+C 187 ; WX 556 ; N guillemotright ; B 138 117 505 404 ;
+C 188 ; WX 1000 ; N ellipsis ; B 131 0 889 88 ;
+C 189 ; WX 1000 ; N perthousand ; B 83 -14 1020 705 ;
+C 191 ; WX 500 ; N questiondown ; B 19 -207 465 532 ;
+C 193 ; WX 333 ; N grave ; B 197 574 356 713 ;
+C 194 ; WX 333 ; N acute ; B 231 574 449 713 ;
+C 195 ; WX 333 ; N circumflex ; B 146 574 440 713 ;
+C 196 ; WX 333 ; N tilde ; B 141 586 475 688 ;
+C 197 ; WX 333 ; N macron ; B 153 612 459 657 ;
+C 198 ; WX 333 ; N breve ; B 177 580 466 706 ;
+C 199 ; WX 333 ; N dotaccent ; B 258 584 345 686 ;
+C 200 ; WX 333 ; N dieresis ; B 184 584 430 686 ;
+C 202 ; WX 333 ; N ring ; B 209 578 412 777 ;
+C 203 ; WX 333 ; N cedilla ; B 14 -207 233 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 231 574 611 713 ;
+C 206 ; WX 333 ; N ogonek ; B 50 -190 199 0 ;
+C 207 ; WX 333 ; N caron ; B 176 574 470 713 ;
+C 208 ; WX 1000 ; N emdash ; B 51 238 1060 282 ;
+C 225 ; WX 1000 ; N AE ; B 5 0 1101 720 ;
+C 227 ; WX 334 ; N ordfeminine ; B 73 307 423 739 ;
+C 232 ; WX 556 ; N Lslash ; B 68 0 547 720 ;
+C 233 ; WX 778 ; N Oslash ; B 41 -37 887 747 ;
+C 234 ; WX 1000 ; N OE ; B 104 -19 1110 739 ;
+C 235 ; WX 334 ; N ordmasculine ; B 76 307 450 739 ;
+C 241 ; WX 889 ; N ae ; B 63 -14 913 532 ;
+C 245 ; WX 222 ; N dotlessi ; B 78 0 248 518 ;
+C 248 ; WX 222 ; N lslash ; B 74 0 316 720 ;
+C 249 ; WX 556 ; N oslash ; B 36 -23 629 541 ;
+C 250 ; WX 944 ; N oe ; B 82 -14 970 532 ;
+C 251 ; WX 500 ; N germandbls ; B 52 -14 554 734 ;
+C -1 ; WX 667 ; N Aacute ; B 15 0 659 915 ;
+C -1 ; WX 667 ; N Acircumflex ; B 15 0 651 915 ;
+C -1 ; WX 667 ; N Adieresis ; B 15 0 651 888 ;
+C -1 ; WX 667 ; N Agrave ; B 15 0 651 915 ;
+C -1 ; WX 667 ; N Aring ; B 15 0 651 979 ;
+C -1 ; WX 667 ; N Atilde ; B 15 0 685 890 ;
+C -1 ; WX 722 ; N Ccedilla ; B 111 -207 771 739 ;
+C -1 ; WX 611 ; N Eacute ; B 81 0 713 915 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 81 0 713 915 ;
+C -1 ; WX 611 ; N Edieresis ; B 81 0 713 888 ;
+C -1 ; WX 611 ; N Egrave ; B 81 0 713 915 ;
+C -1 ; WX 722 ; N Eth ; B 81 0 758 720 ;
+C -1 ; WX 278 ; N Iacute ; B 105 0 445 915 ;
+C -1 ; WX 278 ; N Icircumflex ; B 105 0 436 915 ;
+C -1 ; WX 278 ; N Idieresis ; B 105 0 426 888 ;
+C -1 ; WX 278 ; N Igrave ; B 105 0 372 915 ;
+C -1 ; WX 722 ; N Ntilde ; B 79 0 795 890 ;
+C -1 ; WX 778 ; N Oacute ; B 117 -19 812 915 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 117 -19 812 915 ;
+C -1 ; WX 778 ; N Odieresis ; B 117 -19 812 888 ;
+C -1 ; WX 778 ; N Ograve ; B 117 -19 812 915 ;
+C -1 ; WX 778 ; N Otilde ; B 117 -19 812 890 ;
+C -1 ; WX 611 ; N Scaron ; B 82 -19 663 915 ;
+C -1 ; WX 611 ; N Thorn ; B 78 0 661 720 ;
+C -1 ; WX 722 ; N Uacute ; B 129 -19 793 915 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 129 -19 793 915 ;
+C -1 ; WX 722 ; N Udieresis ; B 129 -19 793 888 ;
+C -1 ; WX 722 ; N Ugrave ; B 129 -19 793 915 ;
+C -1 ; WX 611 ; N Yacute ; B 165 0 751 915 ;
+C -1 ; WX 611 ; N Ydieresis ; B 165 0 751 888 ;
+C -1 ; WX 611 ; N Zcaron ; B 31 0 729 915 ;
+C -1 ; WX 556 ; N aacute ; B 71 -14 561 713 ;
+C -1 ; WX 556 ; N acircumflex ; B 71 -14 555 713 ;
+C -1 ; WX 556 ; N adieresis ; B 71 -14 555 686 ;
+C -1 ; WX 556 ; N agrave ; B 71 -14 555 713 ;
+C -1 ; WX 556 ; N aring ; B 71 -14 555 777 ;
+C -1 ; WX 556 ; N atilde ; B 71 -14 587 688 ;
+C -1 ; WX 222 ; N brokenbar ; B 81 0 298 739 ;
+C -1 ; WX 556 ; N ccedilla ; B 92 -207 576 532 ;
+C -1 ; WX 800 ; N copyright ; B 89 -19 864 739 ;
+C -1 ; WX 400 ; N degree ; B 165 405 471 705 ;
+C -1 ; WX 660 ; N divide ; B 127 0 640 500 ;
+C -1 ; WX 556 ; N eacute ; B 90 -14 575 713 ;
+C -1 ; WX 556 ; N ecircumflex ; B 90 -14 575 713 ;
+C -1 ; WX 556 ; N edieresis ; B 90 -14 575 686 ;
+C -1 ; WX 556 ; N egrave ; B 90 -14 575 713 ;
+C -1 ; WX 556 ; N eth ; B 84 -14 582 739 ;
+C -1 ; WX 222 ; N iacute ; B 78 0 374 713 ;
+C -1 ; WX 222 ; N icircumflex ; B 71 0 365 713 ;
+C -1 ; WX 222 ; N idieresis ; B 78 0 355 686 ;
+C -1 ; WX 222 ; N igrave ; B 78 0 301 713 ;
+C -1 ; WX 660 ; N logicalnot ; B 148 112 660 378 ;
+C -1 ; WX 660 ; N minus ; B 127 220 640 280 ;
+C -1 ; WX 556 ; N mu ; B 29 -204 593 518 ;
+C -1 ; WX 660 ; N multiply ; B 92 6 677 500 ;
+C -1 ; WX 556 ; N ntilde ; B 72 0 587 688 ;
+C -1 ; WX 556 ; N oacute ; B 84 -14 582 713 ;
+C -1 ; WX 556 ; N ocircumflex ; B 84 -14 582 713 ;
+C -1 ; WX 556 ; N odieresis ; B 84 -14 582 686 ;
+C -1 ; WX 556 ; N ograve ; B 84 -14 582 713 ;
+C -1 ; WX 834 ; N onehalf ; B 125 -14 862 739 ;
+C -1 ; WX 834 ; N onequarter ; B 165 -14 823 739 ;
+C -1 ; WX 333 ; N onesuperior ; B 221 316 404 739 ;
+C -1 ; WX 556 ; N otilde ; B 84 -14 587 688 ;
+C -1 ; WX 660 ; N plusminus ; B 80 0 650 500 ;
+C -1 ; WX 800 ; N registered ; B 89 -19 864 739 ;
+C -1 ; WX 500 ; N scaron ; B 78 -14 554 713 ;
+C -1 ; WX 611 ; N thorn ; B 36 -204 620 720 ;
+C -1 ; WX 834 ; N threequarters ; B 131 -14 853 739 ;
+C -1 ; WX 333 ; N threesuperior ; B 102 308 444 739 ;
+C -1 ; WX 940 ; N trademark ; B 174 299 1012 720 ;
+C -1 ; WX 333 ; N twosuperior ; B 82 316 453 739 ;
+C -1 ; WX 556 ; N uacute ; B 103 -14 593 713 ;
+C -1 ; WX 556 ; N ucircumflex ; B 103 -14 593 713 ;
+C -1 ; WX 556 ; N udieresis ; B 103 -14 593 686 ;
+C -1 ; WX 556 ; N ugrave ; B 103 -14 593 713 ;
+C -1 ; WX 500 ; N yacute ; B 26 -204 592 713 ;
+C -1 ; WX 500 ; N ydieresis ; B 26 -204 592 686 ;
+C -1 ; WX 500 ; N zcaron ; B 33 0 564 713 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 115
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -74
+KPX A Y -74
+KPX A W -37
+KPX A V -74
+KPX A T -92
+
+KPX F period -129
+KPX F comma -129
+KPX F A -55
+
+KPX L y -37
+KPX L quoteright -74
+KPX L Y -111
+KPX L W -55
+KPX L V -92
+KPX L T -92
+
+KPX P period -129
+KPX P comma -129
+KPX P A -74
+
+KPX R y 0
+KPX R Y -37
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -84
+KPX T w -84
+KPX T u -92
+KPX T semicolon -111
+KPX T s -111
+KPX T r -92
+KPX T period -111
+KPX T o -111
+KPX T i 0
+KPX T hyphen -129
+KPX T e -111
+KPX T comma -111
+KPX T colon -111
+KPX T c -111
+KPX T a -111
+KPX T A -92
+
+KPX V y -18
+KPX V u -37
+KPX V semicolon -74
+KPX V r -37
+KPX V period -129
+KPX V o -55
+KPX V i -18
+KPX V hyphen -55
+KPX V e -55
+KPX V comma -129
+KPX V colon -74
+KPX V a -55
+KPX V A -74
+
+KPX W y 0
+KPX W u -18
+KPX W semicolon -18
+KPX W r -18
+KPX W period -74
+KPX W o -18
+KPX W i 0
+KPX W hyphen 0
+KPX W e -18
+KPX W comma -74
+KPX W colon -18
+KPX W a -37
+KPX W A -37
+
+KPX Y v -40
+KPX Y u -37
+KPX Y semicolon -92
+KPX Y q -92
+KPX Y period -111
+KPX Y p -37
+KPX Y o -92
+KPX Y i -20
+KPX Y hyphen -111
+KPX Y e -92
+KPX Y comma -111
+KPX Y colon -92
+KPX Y a -92
+KPX Y A -74
+
+KPX f quoteright 18
+KPX f f -18
+
+KPX quoteleft quoteleft -18
+
+KPX quoteright t -18
+KPX quoteright s -74
+KPX quoteright quoteright -18
+
+KPX r z 0
+KPX r y 18
+KPX r x 0
+KPX r w 0
+KPX r v 0
+KPX r u 0
+KPX r t 18
+KPX r r 0
+KPX r quoteright 0
+KPX r q -18
+KPX r period -92
+KPX r o -18
+KPX r n 18
+KPX r m 18
+KPX r hyphen -55
+KPX r h 0
+KPX r g 0
+KPX r f 18
+KPX r e -18
+KPX r d -18
+KPX r comma -92
+KPX r c -18
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -92
+KPX y comma -92
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 139 202 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 83 0 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 139 202 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 83 0 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 194 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 111 0 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 139 202 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 83 0 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 139 202 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 83 0 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 194 202 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 194 202 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 194 202 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 194 202 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 111 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 111 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 111 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 111 0 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -47 202 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -47 202 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -47 202 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -27 202 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -75 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -75 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -75 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -55 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 202 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 202 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 202 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 202 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 111 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 111 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 111 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 111 0 ;
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 167 202 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 167 202 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 167 202 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 167 202 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 111 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 111 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 111 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 111 0 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 222 202 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 222 202 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 222 202 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 222 202 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 111 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 111 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 111 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 111 0 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 167 202 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 111 0 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 194 202 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 111 0 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 222 202 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 111 0 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 187 202 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 111 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-Nr b/font/He-Nr
new file mode 100644
index 0000000..5a08aa8
--- /dev/null
+++ b/font/He-Nr
@@ -0,0 +1,612 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All rights reserved.
+Comment Creation Date: Thu Mar 15 11:04:57 1990
+Comment UniqueID 28380
+Comment VMusage 7572 42473
+FontName Helvetica-Narrow
+FullName Helvetica Narrow
+FamilyName Helvetica
+Weight Medium
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -136 -225 820 931
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.006
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All rights reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 718
+XHeight 523
+Ascender 718
+Descender -207
+StartCharMetrics 228
+C 32 ; WX 228 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 228 ; N exclam ; B 74 0 153 718 ;
+C 34 ; WX 291 ; N quotedbl ; B 57 463 234 718 ;
+C 35 ; WX 456 ; N numbersign ; B 23 0 434 688 ;
+C 36 ; WX 456 ; N dollar ; B 26 -115 426 775 ;
+C 37 ; WX 729 ; N percent ; B 32 -19 697 703 ;
+C 38 ; WX 547 ; N ampersand ; B 36 -15 529 718 ;
+C 39 ; WX 182 ; N quoteright ; B 43 463 129 718 ;
+C 40 ; WX 273 ; N parenleft ; B 56 -207 245 733 ;
+C 41 ; WX 273 ; N parenright ; B 28 -207 217 733 ;
+C 42 ; WX 319 ; N asterisk ; B 32 431 286 718 ;
+C 43 ; WX 479 ; N plus ; B 32 0 447 505 ;
+C 44 ; WX 228 ; N comma ; B 71 -147 157 106 ;
+C 45 ; WX 273 ; N hyphen ; B 36 232 237 322 ;
+C 46 ; WX 228 ; N period ; B 71 0 157 106 ;
+C 47 ; WX 228 ; N slash ; B -14 -19 242 737 ;
+C 48 ; WX 456 ; N zero ; B 30 -19 426 703 ;
+C 49 ; WX 456 ; N one ; B 83 0 294 703 ;
+C 50 ; WX 456 ; N two ; B 21 0 416 703 ;
+C 51 ; WX 456 ; N three ; B 28 -19 428 703 ;
+C 52 ; WX 456 ; N four ; B 20 0 429 703 ;
+C 53 ; WX 456 ; N five ; B 26 -19 421 688 ;
+C 54 ; WX 456 ; N six ; B 31 -19 425 703 ;
+C 55 ; WX 456 ; N seven ; B 30 0 429 688 ;
+C 56 ; WX 456 ; N eight ; B 31 -19 424 703 ;
+C 57 ; WX 456 ; N nine ; B 34 -19 421 703 ;
+C 58 ; WX 228 ; N colon ; B 71 0 157 516 ;
+C 59 ; WX 228 ; N semicolon ; B 71 -147 157 516 ;
+C 60 ; WX 479 ; N less ; B 39 11 440 495 ;
+C 61 ; WX 479 ; N equal ; B 32 115 447 390 ;
+C 62 ; WX 479 ; N greater ; B 39 11 440 495 ;
+C 63 ; WX 456 ; N question ; B 46 0 403 727 ;
+C 64 ; WX 832 ; N at ; B 121 -19 712 737 ;
+C 65 ; WX 547 ; N A ; B 11 0 536 718 ;
+C 66 ; WX 547 ; N B ; B 61 0 514 718 ;
+C 67 ; WX 592 ; N C ; B 36 -19 558 737 ;
+C 68 ; WX 592 ; N D ; B 66 0 553 718 ;
+C 69 ; WX 547 ; N E ; B 71 0 505 718 ;
+C 70 ; WX 501 ; N F ; B 71 0 478 718 ;
+C 71 ; WX 638 ; N G ; B 39 -19 577 737 ;
+C 72 ; WX 592 ; N H ; B 63 0 530 718 ;
+C 73 ; WX 228 ; N I ; B 75 0 154 718 ;
+C 74 ; WX 410 ; N J ; B 14 -19 351 718 ;
+C 75 ; WX 547 ; N K ; B 62 0 544 718 ;
+C 76 ; WX 456 ; N L ; B 62 0 440 718 ;
+C 77 ; WX 683 ; N M ; B 60 0 624 718 ;
+C 78 ; WX 592 ; N N ; B 62 0 530 718 ;
+C 79 ; WX 638 ; N O ; B 32 -19 606 737 ;
+C 80 ; WX 547 ; N P ; B 71 0 510 718 ;
+C 81 ; WX 638 ; N Q ; B 32 -56 606 737 ;
+C 82 ; WX 592 ; N R ; B 72 0 561 718 ;
+C 83 ; WX 547 ; N S ; B 40 -19 508 737 ;
+C 84 ; WX 501 ; N T ; B 11 0 490 718 ;
+C 85 ; WX 592 ; N U ; B 65 -19 528 718 ;
+C 86 ; WX 547 ; N V ; B 16 0 531 718 ;
+C 87 ; WX 774 ; N W ; B 13 0 761 718 ;
+C 88 ; WX 547 ; N X ; B 16 0 531 718 ;
+C 89 ; WX 547 ; N Y ; B 11 0 535 718 ;
+C 90 ; WX 501 ; N Z ; B 19 0 482 718 ;
+C 91 ; WX 228 ; N bracketleft ; B 52 -196 205 722 ;
+C 92 ; WX 228 ; N backslash ; B -14 -19 242 737 ;
+C 93 ; WX 228 ; N bracketright ; B 23 -196 176 722 ;
+C 94 ; WX 385 ; N asciicircum ; B -11 264 396 688 ;
+C 95 ; WX 456 ; N underscore ; B 0 -125 456 -75 ;
+C 96 ; WX 182 ; N quoteleft ; B 53 470 139 725 ;
+C 97 ; WX 456 ; N a ; B 30 -15 435 538 ;
+C 98 ; WX 456 ; N b ; B 48 -15 424 718 ;
+C 99 ; WX 410 ; N c ; B 25 -15 391 538 ;
+C 100 ; WX 456 ; N d ; B 29 -15 409 718 ;
+C 101 ; WX 456 ; N e ; B 33 -15 423 538 ;
+C 102 ; WX 228 ; N f ; B 11 0 215 728 ; L i fi ; L l fl ;
+C 103 ; WX 456 ; N g ; B 33 -220 409 538 ;
+C 104 ; WX 456 ; N h ; B 53 0 403 718 ;
+C 105 ; WX 182 ; N i ; B 55 0 127 718 ;
+C 106 ; WX 182 ; N j ; B -13 -210 127 718 ;
+C 107 ; WX 410 ; N k ; B 55 0 411 718 ;
+C 108 ; WX 182 ; N l ; B 55 0 127 718 ;
+C 109 ; WX 683 ; N m ; B 53 0 631 538 ;
+C 110 ; WX 456 ; N n ; B 53 0 403 538 ;
+C 111 ; WX 456 ; N o ; B 29 -14 427 538 ;
+C 112 ; WX 456 ; N p ; B 48 -207 424 538 ;
+C 113 ; WX 456 ; N q ; B 29 -207 405 538 ;
+C 114 ; WX 273 ; N r ; B 63 0 272 538 ;
+C 115 ; WX 410 ; N s ; B 26 -15 380 538 ;
+C 116 ; WX 228 ; N t ; B 11 -7 211 669 ;
+C 117 ; WX 456 ; N u ; B 56 -15 401 523 ;
+C 118 ; WX 410 ; N v ; B 7 0 403 523 ;
+C 119 ; WX 592 ; N w ; B 11 0 581 523 ;
+C 120 ; WX 410 ; N x ; B 9 0 402 523 ;
+C 121 ; WX 410 ; N y ; B 9 -214 401 523 ;
+C 122 ; WX 410 ; N z ; B 25 0 385 523 ;
+C 123 ; WX 274 ; N braceleft ; B 34 -196 239 722 ;
+C 124 ; WX 213 ; N bar ; B 77 -19 137 737 ;
+C 125 ; WX 274 ; N braceright ; B 34 -196 239 722 ;
+C 126 ; WX 479 ; N asciitilde ; B 50 180 429 326 ;
+C 161 ; WX 273 ; N exclamdown ; B 97 -195 176 523 ;
+C 162 ; WX 456 ; N cent ; B 42 -115 421 623 ;
+C 163 ; WX 456 ; N sterling ; B 27 -16 442 718 ;
+C 164 ; WX 137 ; N fraction ; B -136 -19 273 703 ;
+C 165 ; WX 456 ; N yen ; B 2 0 453 688 ;
+C 166 ; WX 456 ; N florin ; B -9 -207 411 737 ;
+C 167 ; WX 456 ; N section ; B 35 -191 420 737 ;
+C 168 ; WX 456 ; N currency ; B 23 99 433 603 ;
+C 169 ; WX 157 ; N quotesingle ; B 48 463 108 718 ;
+C 170 ; WX 273 ; N quotedblleft ; B 31 470 252 725 ;
+C 171 ; WX 456 ; N guillemotleft ; B 80 108 376 446 ;
+C 172 ; WX 273 ; N guilsinglleft ; B 72 108 201 446 ;
+C 173 ; WX 273 ; N guilsinglright ; B 72 108 201 446 ;
+C 174 ; WX 410 ; N fi ; B 11 0 356 728 ;
+C 175 ; WX 410 ; N fl ; B 11 0 354 728 ;
+C 177 ; WX 456 ; N endash ; B 0 240 456 313 ;
+C 178 ; WX 456 ; N dagger ; B 35 -159 421 718 ;
+C 179 ; WX 456 ; N daggerdbl ; B 35 -159 421 718 ;
+C 180 ; WX 228 ; N periodcentered ; B 63 190 166 315 ;
+C 182 ; WX 440 ; N paragraph ; B 15 -173 408 718 ;
+C 183 ; WX 287 ; N bullet ; B 15 202 273 517 ;
+C 184 ; WX 182 ; N quotesinglbase ; B 43 -149 129 106 ;
+C 185 ; WX 273 ; N quotedblbase ; B 21 -149 242 106 ;
+C 186 ; WX 273 ; N quotedblright ; B 21 463 242 718 ;
+C 187 ; WX 456 ; N guillemotright ; B 80 108 376 446 ;
+C 188 ; WX 820 ; N ellipsis ; B 94 0 726 106 ;
+C 189 ; WX 820 ; N perthousand ; B 6 -19 815 703 ;
+C 191 ; WX 501 ; N questiondown ; B 75 -201 432 525 ;
+C 193 ; WX 273 ; N grave ; B 11 593 173 734 ;
+C 194 ; WX 273 ; N acute ; B 100 593 262 734 ;
+C 195 ; WX 273 ; N circumflex ; B 17 593 256 734 ;
+C 196 ; WX 273 ; N tilde ; B -3 606 276 722 ;
+C 197 ; WX 273 ; N macron ; B 8 627 265 684 ;
+C 198 ; WX 273 ; N breve ; B 11 595 263 731 ;
+C 199 ; WX 273 ; N dotaccent ; B 99 604 174 706 ;
+C 200 ; WX 273 ; N dieresis ; B 33 604 240 706 ;
+C 202 ; WX 273 ; N ring ; B 61 572 212 756 ;
+C 203 ; WX 273 ; N cedilla ; B 37 -225 212 0 ;
+C 205 ; WX 273 ; N hungarumlaut ; B 25 593 335 734 ;
+C 206 ; WX 273 ; N ogonek ; B 60 -225 235 0 ;
+C 207 ; WX 273 ; N caron ; B 17 593 256 734 ;
+C 208 ; WX 820 ; N emdash ; B 0 240 820 313 ;
+C 225 ; WX 820 ; N AE ; B 7 0 780 718 ;
+C 227 ; WX 303 ; N ordfeminine ; B 20 304 284 737 ;
+C 232 ; WX 456 ; N Lslash ; B -16 0 440 718 ;
+C 233 ; WX 638 ; N Oslash ; B 32 -19 607 737 ;
+C 234 ; WX 820 ; N OE ; B 30 -19 791 737 ;
+C 235 ; WX 299 ; N ordmasculine ; B 20 304 280 737 ;
+C 241 ; WX 729 ; N ae ; B 30 -15 695 538 ;
+C 245 ; WX 228 ; N dotlessi ; B 78 0 150 523 ;
+C 248 ; WX 182 ; N lslash ; B -16 0 198 718 ;
+C 249 ; WX 501 ; N oslash ; B 23 -22 440 545 ;
+C 250 ; WX 774 ; N oe ; B 29 -15 740 538 ;
+C 251 ; WX 501 ; N germandbls ; B 55 -15 468 728 ;
+C -1 ; WX 501 ; N Zcaron ; B 19 0 482 929 ;
+C -1 ; WX 410 ; N ccedilla ; B 25 -225 391 538 ;
+C -1 ; WX 410 ; N ydieresis ; B 9 -214 401 706 ;
+C -1 ; WX 456 ; N atilde ; B 30 -15 435 722 ;
+C -1 ; WX 228 ; N icircumflex ; B -5 0 234 734 ;
+C -1 ; WX 273 ; N threesuperior ; B 4 270 266 703 ;
+C -1 ; WX 456 ; N ecircumflex ; B 33 -15 423 734 ;
+C -1 ; WX 456 ; N thorn ; B 48 -207 424 718 ;
+C -1 ; WX 456 ; N egrave ; B 33 -15 423 734 ;
+C -1 ; WX 273 ; N twosuperior ; B 3 281 265 703 ;
+C -1 ; WX 456 ; N eacute ; B 33 -15 423 734 ;
+C -1 ; WX 456 ; N otilde ; B 29 -14 427 722 ;
+C -1 ; WX 547 ; N Aacute ; B 11 0 536 929 ;
+C -1 ; WX 456 ; N ocircumflex ; B 29 -14 427 734 ;
+C -1 ; WX 410 ; N yacute ; B 9 -214 401 734 ;
+C -1 ; WX 456 ; N udieresis ; B 56 -15 401 706 ;
+C -1 ; WX 684 ; N threequarters ; B 37 -19 664 703 ;
+C -1 ; WX 456 ; N acircumflex ; B 30 -15 435 734 ;
+C -1 ; WX 592 ; N Eth ; B 0 0 553 718 ;
+C -1 ; WX 456 ; N edieresis ; B 33 -15 423 706 ;
+C -1 ; WX 456 ; N ugrave ; B 56 -15 401 734 ;
+C -1 ; WX 820 ; N trademark ; B 38 306 740 718 ;
+C -1 ; WX 456 ; N ograve ; B 29 -14 427 734 ;
+C -1 ; WX 410 ; N scaron ; B 26 -15 380 734 ;
+C -1 ; WX 228 ; N Idieresis ; B 11 0 218 901 ;
+C -1 ; WX 456 ; N uacute ; B 56 -15 401 734 ;
+C -1 ; WX 456 ; N agrave ; B 30 -15 435 734 ;
+C -1 ; WX 456 ; N ntilde ; B 53 0 403 722 ;
+C -1 ; WX 456 ; N aring ; B 30 -15 435 756 ;
+C -1 ; WX 410 ; N zcaron ; B 25 0 385 734 ;
+C -1 ; WX 228 ; N Icircumflex ; B -5 0 234 929 ;
+C -1 ; WX 592 ; N Ntilde ; B 62 0 530 917 ;
+C -1 ; WX 456 ; N ucircumflex ; B 56 -15 401 734 ;
+C -1 ; WX 547 ; N Ecircumflex ; B 71 0 505 929 ;
+C -1 ; WX 228 ; N Iacute ; B 75 0 239 929 ;
+C -1 ; WX 592 ; N Ccedilla ; B 36 -225 558 737 ;
+C -1 ; WX 638 ; N Odieresis ; B 32 -19 606 901 ;
+C -1 ; WX 547 ; N Scaron ; B 40 -19 508 929 ;
+C -1 ; WX 547 ; N Edieresis ; B 71 0 505 901 ;
+C -1 ; WX 228 ; N Igrave ; B -11 0 154 929 ;
+C -1 ; WX 456 ; N adieresis ; B 30 -15 435 706 ;
+C -1 ; WX 638 ; N Ograve ; B 32 -19 606 929 ;
+C -1 ; WX 547 ; N Egrave ; B 71 0 505 929 ;
+C -1 ; WX 547 ; N Ydieresis ; B 11 0 535 901 ;
+C -1 ; WX 604 ; N registered ; B -11 -19 617 737 ;
+C -1 ; WX 638 ; N Otilde ; B 32 -19 606 917 ;
+C -1 ; WX 684 ; N onequarter ; B 60 -19 620 703 ;
+C -1 ; WX 592 ; N Ugrave ; B 65 -19 528 929 ;
+C -1 ; WX 592 ; N Ucircumflex ; B 65 -19 528 929 ;
+C -1 ; WX 547 ; N Thorn ; B 71 0 510 718 ;
+C -1 ; WX 479 ; N divide ; B 32 -19 447 524 ;
+C -1 ; WX 547 ; N Atilde ; B 11 0 536 917 ;
+C -1 ; WX 592 ; N Uacute ; B 65 -19 528 929 ;
+C -1 ; WX 638 ; N Ocircumflex ; B 32 -19 606 929 ;
+C -1 ; WX 479 ; N logicalnot ; B 32 108 447 390 ;
+C -1 ; WX 547 ; N Aring ; B 11 0 536 931 ;
+C -1 ; WX 228 ; N idieresis ; B 11 0 218 706 ;
+C -1 ; WX 228 ; N iacute ; B 78 0 239 734 ;
+C -1 ; WX 456 ; N aacute ; B 30 -15 435 734 ;
+C -1 ; WX 479 ; N plusminus ; B 32 0 447 506 ;
+C -1 ; WX 479 ; N multiply ; B 32 0 447 506 ;
+C -1 ; WX 592 ; N Udieresis ; B 65 -19 528 901 ;
+C -1 ; WX 479 ; N minus ; B 32 216 447 289 ;
+C -1 ; WX 273 ; N onesuperior ; B 35 281 182 703 ;
+C -1 ; WX 547 ; N Eacute ; B 71 0 505 929 ;
+C -1 ; WX 547 ; N Acircumflex ; B 11 0 536 929 ;
+C -1 ; WX 604 ; N copyright ; B -11 -19 617 737 ;
+C -1 ; WX 547 ; N Agrave ; B 11 0 536 929 ;
+C -1 ; WX 456 ; N odieresis ; B 29 -14 427 706 ;
+C -1 ; WX 456 ; N oacute ; B 29 -14 427 734 ;
+C -1 ; WX 328 ; N degree ; B 44 411 284 703 ;
+C -1 ; WX 228 ; N igrave ; B -11 0 151 734 ;
+C -1 ; WX 456 ; N mu ; B 56 -207 401 523 ;
+C -1 ; WX 638 ; N Oacute ; B 32 -19 606 929 ;
+C -1 ; WX 456 ; N eth ; B 29 -15 428 737 ;
+C -1 ; WX 547 ; N Adieresis ; B 11 0 536 901 ;
+C -1 ; WX 547 ; N Yacute ; B 11 0 535 929 ;
+C -1 ; WX 213 ; N brokenbar ; B 77 -19 137 737 ;
+C -1 ; WX 684 ; N onehalf ; B 35 -19 634 703 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 250
+
+KPX A y -32
+KPX A w -32
+KPX A v -32
+KPX A u -24
+KPX A Y -81
+KPX A W -40
+KPX A V -56
+KPX A U -40
+KPX A T -97
+KPX A Q -24
+KPX A O -24
+KPX A G -24
+KPX A C -24
+
+KPX B period -15
+KPX B comma -15
+KPX B U -7
+
+KPX C period -24
+KPX C comma -24
+
+KPX D period -56
+KPX D comma -56
+KPX D Y -73
+KPX D W -32
+KPX D V -56
+KPX D A -32
+
+KPX F r -36
+KPX F period -122
+KPX F o -24
+KPX F e -24
+KPX F comma -122
+KPX F a -40
+KPX F A -65
+
+KPX J u -15
+KPX J period -24
+KPX J comma -24
+KPX J a -15
+KPX J A -15
+
+KPX K y -40
+KPX K u -24
+KPX K o -32
+KPX K e -32
+KPX K O -40
+
+KPX L y -24
+KPX L quoteright -130
+KPX L quotedblright -114
+KPX L Y -114
+KPX L W -56
+KPX L V -89
+KPX L T -89
+
+KPX O period -32
+KPX O comma -32
+KPX O Y -56
+KPX O X -48
+KPX O W -24
+KPX O V -40
+KPX O T -32
+KPX O A -15
+
+KPX P period -147
+KPX P o -40
+KPX P e -40
+KPX P comma -147
+KPX P a -32
+KPX P A -97
+
+KPX Q U -7
+
+KPX R Y -40
+KPX R W -24
+KPX R V -40
+KPX R U -32
+KPX R T -24
+KPX R O -15
+
+KPX S period -15
+KPX S comma -15
+
+KPX T y -97
+KPX T w -97
+KPX T u -97
+KPX T semicolon -15
+KPX T r -97
+KPX T period -97
+KPX T o -97
+KPX T hyphen -114
+KPX T e -97
+KPX T comma -97
+KPX T colon -15
+KPX T a -97
+KPX T O -32
+KPX T A -97
+
+KPX U period -32
+KPX U comma -32
+KPX U A -32
+
+KPX V u -56
+KPX V semicolon -32
+KPX V period -102
+KPX V o -65
+KPX V hyphen -65
+KPX V e -65
+KPX V comma -102
+KPX V colon -32
+KPX V a -56
+KPX V O -32
+KPX V G -32
+KPX V A -65
+
+KPX W y -15
+KPX W u -24
+KPX W period -65
+KPX W o -24
+KPX W hyphen -32
+KPX W e -24
+KPX W comma -65
+KPX W a -32
+KPX W O -15
+KPX W A -40
+
+KPX Y u -89
+KPX Y semicolon -48
+KPX Y period -114
+KPX Y o -114
+KPX Y i -15
+KPX Y hyphen -114
+KPX Y e -114
+KPX Y comma -114
+KPX Y colon -48
+KPX Y a -114
+KPX Y O -69
+KPX Y A -89
+
+KPX a y -24
+KPX a w -15
+KPX a v -15
+
+KPX b y -15
+KPX b v -15
+KPX b u -15
+KPX b period -32
+KPX b l -15
+KPX b comma -32
+KPX b b -7
+
+KPX c k -15
+KPX c comma -11
+
+KPX colon space -40
+
+KPX comma quoteright -81
+KPX comma quotedblright -81
+
+KPX e y -15
+KPX e x -24
+KPX e w -15
+KPX e v -24
+KPX e period -11
+KPX e comma -11
+
+KPX f quoteright 41
+KPX f quotedblright 49
+KPX f period -24
+KPX f o -24
+KPX f e -24
+KPX f dotlessi -22
+KPX f comma -24
+KPX f a -24
+
+KPX g r -7
+
+KPX h y -24
+
+KPX k o -15
+KPX k e -15
+
+KPX m y -11
+KPX m u -7
+
+KPX n y -11
+KPX n v -15
+KPX n u -7
+
+KPX o y -24
+KPX o x -24
+KPX o w -11
+KPX o v -11
+KPX o period -32
+KPX o comma -32
+
+KPX oslash z -44
+KPX oslash y -56
+KPX oslash x -69
+KPX oslash w -56
+KPX oslash v -56
+KPX oslash u -44
+KPX oslash t -44
+KPX oslash s -44
+KPX oslash r -44
+KPX oslash q -44
+KPX oslash period -77
+KPX oslash p -44
+KPX oslash o -44
+KPX oslash n -44
+KPX oslash m -44
+KPX oslash l -44
+KPX oslash k -44
+KPX oslash j -44
+KPX oslash i -44
+KPX oslash h -44
+KPX oslash g -44
+KPX oslash f -44
+KPX oslash e -44
+KPX oslash d -44
+KPX oslash comma -77
+KPX oslash c -44
+KPX oslash b -44
+KPX oslash a -44
+
+KPX p y -24
+KPX p period -28
+KPX p comma -28
+
+KPX period space -48
+KPX period quoteright -81
+KPX period quotedblright -81
+
+KPX quotedblright space -32
+
+KPX quoteleft quoteleft -46
+
+KPX quoteright space -56
+KPX quoteright s -40
+KPX quoteright r -40
+KPX quoteright quoteright -46
+KPX quoteright d -40
+
+KPX r y 25
+KPX r v 25
+KPX r u 12
+KPX r t 33
+KPX r semicolon 25
+KPX r period -40
+KPX r p 25
+KPX r n 21
+KPX r m 21
+KPX r l 12
+KPX r k 12
+KPX r i 12
+KPX r comma -40
+KPX r colon 25
+KPX r a -7
+
+KPX s w -24
+KPX s period -11
+KPX s comma -11
+
+KPX semicolon space -40
+
+KPX space quoteleft -48
+KPX space quotedblleft -24
+KPX space Y -73
+KPX space W -32
+KPX space V -40
+KPX space T -40
+
+KPX v period -65
+KPX v o -20
+KPX v e -20
+KPX v comma -65
+KPX v a -20
+
+KPX w period -48
+KPX w o -7
+KPX w e -7
+KPX w comma -48
+KPX w a -11
+
+KPX x e -24
+
+KPX y period -81
+KPX y o -15
+KPX y e -15
+KPX y comma -81
+KPX y a -15
+
+KPX z o -11
+KPX z e -11
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 137 195 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 137 195 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 137 195 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 137 195 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 137 175 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 137 195 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 160 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 137 195 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 137 195 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 137 195 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 137 195 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -22 195 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -22 195 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -22 195 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -22 195 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 168 195 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 183 195 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 183 195 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 183 195 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 183 195 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 183 195 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 137 195 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 160 195 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 160 195 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 160 195 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 160 195 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 137 195 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 137 195 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 114 195 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 92 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 92 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 92 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 92 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 92 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 84 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 69 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 92 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 92 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 92 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 92 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -22 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -22 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -22 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -22 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 84 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 92 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 92 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 92 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 92 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 92 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 69 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 92 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 92 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 92 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 92 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 69 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 69 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 69 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-NrBd b/font/He-NrBd
new file mode 100644
index 0000000..b7c6969
--- /dev/null
+++ b/font/He-NrBd
@@ -0,0 +1,570 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Mar 15 11:47:27 1990
+Comment UniqueID 28398
+Comment VMusage 7614 43068
+FontName Helvetica-Narrow-Bold
+FullName Helvetica Narrow Bold
+FamilyName Helvetica
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -139 -228 822 962
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 718
+XHeight 532
+Ascender 718
+Descender -207
+StartCharMetrics 228
+C 32 ; WX 228 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 273 ; N exclam ; B 74 0 200 718 ;
+C 34 ; WX 389 ; N quotedbl ; B 80 447 308 718 ;
+C 35 ; WX 456 ; N numbersign ; B 15 0 441 698 ;
+C 36 ; WX 456 ; N dollar ; B 25 -115 429 775 ;
+C 37 ; WX 729 ; N percent ; B 23 -19 706 710 ;
+C 38 ; WX 592 ; N ampersand ; B 44 -19 575 718 ;
+C 39 ; WX 228 ; N quoteright ; B 57 445 171 718 ;
+C 40 ; WX 273 ; N parenleft ; B 29 -208 257 734 ;
+C 41 ; WX 273 ; N parenright ; B 16 -208 244 734 ;
+C 42 ; WX 319 ; N asterisk ; B 22 387 297 718 ;
+C 43 ; WX 479 ; N plus ; B 33 0 446 506 ;
+C 44 ; WX 228 ; N comma ; B 52 -168 175 146 ;
+C 45 ; WX 273 ; N hyphen ; B 22 215 251 345 ;
+C 46 ; WX 228 ; N period ; B 52 0 175 146 ;
+C 47 ; WX 228 ; N slash ; B -27 -19 255 737 ;
+C 48 ; WX 456 ; N zero ; B 26 -19 430 710 ;
+C 49 ; WX 456 ; N one ; B 57 0 310 710 ;
+C 50 ; WX 456 ; N two ; B 21 0 419 710 ;
+C 51 ; WX 456 ; N three ; B 22 -19 423 710 ;
+C 52 ; WX 456 ; N four ; B 22 0 431 710 ;
+C 53 ; WX 456 ; N five ; B 22 -19 423 698 ;
+C 54 ; WX 456 ; N six ; B 25 -19 426 710 ;
+C 55 ; WX 456 ; N seven ; B 20 0 433 698 ;
+C 56 ; WX 456 ; N eight ; B 26 -19 430 710 ;
+C 57 ; WX 456 ; N nine ; B 25 -19 428 710 ;
+C 58 ; WX 273 ; N colon ; B 75 0 198 512 ;
+C 59 ; WX 273 ; N semicolon ; B 75 -168 198 512 ;
+C 60 ; WX 479 ; N less ; B 31 -8 448 514 ;
+C 61 ; WX 479 ; N equal ; B 33 87 446 419 ;
+C 62 ; WX 479 ; N greater ; B 31 -8 448 514 ;
+C 63 ; WX 501 ; N question ; B 49 0 456 727 ;
+C 64 ; WX 800 ; N at ; B 97 -19 702 737 ;
+C 65 ; WX 592 ; N A ; B 16 0 576 718 ;
+C 66 ; WX 592 ; N B ; B 62 0 549 718 ;
+C 67 ; WX 592 ; N C ; B 36 -19 561 737 ;
+C 68 ; WX 592 ; N D ; B 62 0 562 718 ;
+C 69 ; WX 547 ; N E ; B 62 0 509 718 ;
+C 70 ; WX 501 ; N F ; B 62 0 481 718 ;
+C 71 ; WX 638 ; N G ; B 36 -19 585 737 ;
+C 72 ; WX 592 ; N H ; B 58 0 534 718 ;
+C 73 ; WX 228 ; N I ; B 52 0 175 718 ;
+C 74 ; WX 456 ; N J ; B 18 -18 397 718 ;
+C 75 ; WX 592 ; N K ; B 71 0 592 718 ;
+C 76 ; WX 501 ; N L ; B 62 0 478 718 ;
+C 77 ; WX 683 ; N M ; B 57 0 627 718 ;
+C 78 ; WX 592 ; N N ; B 57 0 536 718 ;
+C 79 ; WX 638 ; N O ; B 36 -19 602 737 ;
+C 80 ; WX 547 ; N P ; B 62 0 514 718 ;
+C 81 ; WX 638 ; N Q ; B 36 -52 604 737 ;
+C 82 ; WX 592 ; N R ; B 62 0 555 718 ;
+C 83 ; WX 547 ; N S ; B 32 -19 516 737 ;
+C 84 ; WX 501 ; N T ; B 11 0 490 718 ;
+C 85 ; WX 592 ; N U ; B 59 -19 534 718 ;
+C 86 ; WX 547 ; N V ; B 16 0 531 718 ;
+C 87 ; WX 774 ; N W ; B 13 0 762 718 ;
+C 88 ; WX 547 ; N X ; B 11 0 535 718 ;
+C 89 ; WX 547 ; N Y ; B 12 0 535 718 ;
+C 90 ; WX 501 ; N Z ; B 20 0 481 718 ;
+C 91 ; WX 273 ; N bracketleft ; B 52 -196 253 722 ;
+C 92 ; WX 228 ; N backslash ; B -27 -19 255 737 ;
+C 93 ; WX 273 ; N bracketright ; B 20 -196 221 722 ;
+C 94 ; WX 479 ; N asciicircum ; B 51 323 428 698 ;
+C 95 ; WX 456 ; N underscore ; B 0 -125 456 -75 ;
+C 96 ; WX 228 ; N quoteleft ; B 57 454 171 727 ;
+C 97 ; WX 456 ; N a ; B 24 -14 432 546 ;
+C 98 ; WX 501 ; N b ; B 50 -14 474 718 ;
+C 99 ; WX 456 ; N c ; B 28 -14 430 546 ;
+C 100 ; WX 501 ; N d ; B 28 -14 452 718 ;
+C 101 ; WX 456 ; N e ; B 19 -14 433 546 ;
+C 102 ; WX 273 ; N f ; B 8 0 261 727 ; L i fi ; L l fl ;
+C 103 ; WX 501 ; N g ; B 33 -217 453 546 ;
+C 104 ; WX 501 ; N h ; B 53 0 448 718 ;
+C 105 ; WX 228 ; N i ; B 57 0 171 725 ;
+C 106 ; WX 228 ; N j ; B 2 -214 171 725 ;
+C 107 ; WX 456 ; N k ; B 57 0 461 718 ;
+C 108 ; WX 228 ; N l ; B 57 0 171 718 ;
+C 109 ; WX 729 ; N m ; B 52 0 677 546 ;
+C 110 ; WX 501 ; N n ; B 53 0 448 546 ;
+C 111 ; WX 501 ; N o ; B 28 -14 474 546 ;
+C 112 ; WX 501 ; N p ; B 51 -207 474 546 ;
+C 113 ; WX 501 ; N q ; B 28 -207 453 546 ;
+C 114 ; WX 319 ; N r ; B 52 0 306 546 ;
+C 115 ; WX 456 ; N s ; B 25 -14 426 546 ;
+C 116 ; WX 273 ; N t ; B 8 -6 253 676 ;
+C 117 ; WX 501 ; N u ; B 54 -14 447 532 ;
+C 118 ; WX 456 ; N v ; B 11 0 445 532 ;
+C 119 ; WX 638 ; N w ; B 8 0 631 532 ;
+C 120 ; WX 456 ; N x ; B 12 0 444 532 ;
+C 121 ; WX 456 ; N y ; B 8 -214 442 532 ;
+C 122 ; WX 410 ; N z ; B 16 0 394 532 ;
+C 123 ; WX 319 ; N braceleft ; B 39 -196 299 722 ;
+C 124 ; WX 230 ; N bar ; B 69 -19 161 737 ;
+C 125 ; WX 319 ; N braceright ; B 20 -196 280 722 ;
+C 126 ; WX 479 ; N asciitilde ; B 50 163 429 343 ;
+C 161 ; WX 273 ; N exclamdown ; B 74 -186 200 532 ;
+C 162 ; WX 456 ; N cent ; B 28 -118 430 628 ;
+C 163 ; WX 456 ; N sterling ; B 23 -16 444 718 ;
+C 164 ; WX 137 ; N fraction ; B -139 -19 276 710 ;
+C 165 ; WX 456 ; N yen ; B -7 0 463 698 ;
+C 166 ; WX 456 ; N florin ; B -8 -210 423 737 ;
+C 167 ; WX 456 ; N section ; B 28 -184 428 727 ;
+C 168 ; WX 456 ; N currency ; B -2 76 458 636 ;
+C 169 ; WX 195 ; N quotesingle ; B 57 447 138 718 ;
+C 170 ; WX 410 ; N quotedblleft ; B 52 454 358 727 ;
+C 171 ; WX 456 ; N guillemotleft ; B 72 76 384 484 ;
+C 172 ; WX 273 ; N guilsinglleft ; B 68 76 205 484 ;
+C 173 ; WX 273 ; N guilsinglright ; B 68 76 205 484 ;
+C 174 ; WX 501 ; N fi ; B 8 0 444 727 ;
+C 175 ; WX 501 ; N fl ; B 8 0 444 727 ;
+C 177 ; WX 456 ; N endash ; B 0 227 456 333 ;
+C 178 ; WX 456 ; N dagger ; B 30 -171 426 718 ;
+C 179 ; WX 456 ; N daggerdbl ; B 30 -171 426 718 ;
+C 180 ; WX 228 ; N periodcentered ; B 48 172 180 334 ;
+C 182 ; WX 456 ; N paragraph ; B -7 -191 442 700 ;
+C 183 ; WX 287 ; N bullet ; B 8 194 279 524 ;
+C 184 ; WX 228 ; N quotesinglbase ; B 57 -146 171 127 ;
+C 185 ; WX 410 ; N quotedblbase ; B 52 -146 358 127 ;
+C 186 ; WX 410 ; N quotedblright ; B 52 445 358 718 ;
+C 187 ; WX 456 ; N guillemotright ; B 72 76 384 484 ;
+C 188 ; WX 820 ; N ellipsis ; B 75 0 745 146 ;
+C 189 ; WX 820 ; N perthousand ; B -2 -19 822 710 ;
+C 191 ; WX 501 ; N questiondown ; B 45 -195 452 532 ;
+C 193 ; WX 273 ; N grave ; B -19 604 184 750 ;
+C 194 ; WX 273 ; N acute ; B 89 604 292 750 ;
+C 195 ; WX 273 ; N circumflex ; B -8 604 281 750 ;
+C 196 ; WX 273 ; N tilde ; B -14 610 287 737 ;
+C 197 ; WX 273 ; N macron ; B -5 604 278 678 ;
+C 198 ; WX 273 ; N breve ; B -2 604 275 750 ;
+C 199 ; WX 273 ; N dotaccent ; B 85 614 189 729 ;
+C 200 ; WX 273 ; N dieresis ; B 5 614 268 729 ;
+C 202 ; WX 273 ; N ring ; B 48 568 225 776 ;
+C 203 ; WX 273 ; N cedilla ; B 5 -228 201 0 ;
+C 205 ; WX 273 ; N hungarumlaut ; B 7 604 399 750 ;
+C 206 ; WX 273 ; N ogonek ; B 58 -228 249 0 ;
+C 207 ; WX 273 ; N caron ; B -8 604 281 750 ;
+C 208 ; WX 820 ; N emdash ; B 0 227 820 333 ;
+C 225 ; WX 820 ; N AE ; B 4 0 782 718 ;
+C 227 ; WX 303 ; N ordfeminine ; B 18 276 285 737 ;
+C 232 ; WX 501 ; N Lslash ; B -16 0 478 718 ;
+C 233 ; WX 638 ; N Oslash ; B 27 -27 610 745 ;
+C 234 ; WX 820 ; N OE ; B 30 -19 788 737 ;
+C 235 ; WX 299 ; N ordmasculine ; B 5 276 295 737 ;
+C 241 ; WX 729 ; N ae ; B 24 -14 704 546 ;
+C 245 ; WX 228 ; N dotlessi ; B 57 0 171 532 ;
+C 248 ; WX 228 ; N lslash ; B -15 0 243 718 ;
+C 249 ; WX 501 ; N oslash ; B 18 -29 483 560 ;
+C 250 ; WX 774 ; N oe ; B 28 -14 748 546 ;
+C 251 ; WX 501 ; N germandbls ; B 57 -14 475 731 ;
+C -1 ; WX 501 ; N Zcaron ; B 20 0 481 936 ;
+C -1 ; WX 456 ; N ccedilla ; B 28 -228 430 546 ;
+C -1 ; WX 456 ; N ydieresis ; B 8 -214 442 729 ;
+C -1 ; WX 456 ; N atilde ; B 24 -14 432 737 ;
+C -1 ; WX 228 ; N icircumflex ; B -30 0 259 750 ;
+C -1 ; WX 273 ; N threesuperior ; B 7 271 267 710 ;
+C -1 ; WX 456 ; N ecircumflex ; B 19 -14 433 750 ;
+C -1 ; WX 501 ; N thorn ; B 51 -208 474 718 ;
+C -1 ; WX 456 ; N egrave ; B 19 -14 433 750 ;
+C -1 ; WX 273 ; N twosuperior ; B 7 283 266 710 ;
+C -1 ; WX 456 ; N eacute ; B 19 -14 433 750 ;
+C -1 ; WX 501 ; N otilde ; B 28 -14 474 737 ;
+C -1 ; WX 592 ; N Aacute ; B 16 0 576 936 ;
+C -1 ; WX 501 ; N ocircumflex ; B 28 -14 474 750 ;
+C -1 ; WX 456 ; N yacute ; B 8 -214 442 750 ;
+C -1 ; WX 501 ; N udieresis ; B 54 -14 447 729 ;
+C -1 ; WX 684 ; N threequarters ; B 13 -19 655 710 ;
+C -1 ; WX 456 ; N acircumflex ; B 24 -14 432 750 ;
+C -1 ; WX 592 ; N Eth ; B -4 0 562 718 ;
+C -1 ; WX 456 ; N edieresis ; B 19 -14 433 729 ;
+C -1 ; WX 501 ; N ugrave ; B 54 -14 447 750 ;
+C -1 ; WX 820 ; N trademark ; B 36 306 784 718 ;
+C -1 ; WX 501 ; N ograve ; B 28 -14 474 750 ;
+C -1 ; WX 456 ; N scaron ; B 25 -14 426 750 ;
+C -1 ; WX 228 ; N Idieresis ; B -17 0 246 915 ;
+C -1 ; WX 501 ; N uacute ; B 54 -14 447 750 ;
+C -1 ; WX 456 ; N agrave ; B 24 -14 432 750 ;
+C -1 ; WX 501 ; N ntilde ; B 53 0 448 737 ;
+C -1 ; WX 456 ; N aring ; B 24 -14 432 776 ;
+C -1 ; WX 410 ; N zcaron ; B 16 0 394 750 ;
+C -1 ; WX 228 ; N Icircumflex ; B -30 0 259 936 ;
+C -1 ; WX 592 ; N Ntilde ; B 57 0 536 923 ;
+C -1 ; WX 501 ; N ucircumflex ; B 54 -14 447 750 ;
+C -1 ; WX 547 ; N Ecircumflex ; B 62 0 509 936 ;
+C -1 ; WX 228 ; N Iacute ; B 52 0 270 936 ;
+C -1 ; WX 592 ; N Ccedilla ; B 36 -228 561 737 ;
+C -1 ; WX 638 ; N Odieresis ; B 36 -19 602 915 ;
+C -1 ; WX 547 ; N Scaron ; B 32 -19 516 936 ;
+C -1 ; WX 547 ; N Edieresis ; B 62 0 509 915 ;
+C -1 ; WX 228 ; N Igrave ; B -41 0 175 936 ;
+C -1 ; WX 456 ; N adieresis ; B 24 -14 432 729 ;
+C -1 ; WX 638 ; N Ograve ; B 36 -19 602 936 ;
+C -1 ; WX 547 ; N Egrave ; B 62 0 509 936 ;
+C -1 ; WX 547 ; N Ydieresis ; B 12 0 535 915 ;
+C -1 ; WX 604 ; N registered ; B -9 -19 613 737 ;
+C -1 ; WX 638 ; N Otilde ; B 36 -19 602 923 ;
+C -1 ; WX 684 ; N onequarter ; B 21 -19 628 710 ;
+C -1 ; WX 592 ; N Ugrave ; B 59 -19 534 936 ;
+C -1 ; WX 592 ; N Ucircumflex ; B 59 -19 534 936 ;
+C -1 ; WX 547 ; N Thorn ; B 62 0 514 718 ;
+C -1 ; WX 479 ; N divide ; B 33 -42 446 548 ;
+C -1 ; WX 592 ; N Atilde ; B 16 0 576 923 ;
+C -1 ; WX 592 ; N Uacute ; B 59 -19 534 936 ;
+C -1 ; WX 638 ; N Ocircumflex ; B 36 -19 602 936 ;
+C -1 ; WX 479 ; N logicalnot ; B 33 108 446 419 ;
+C -1 ; WX 592 ; N Aring ; B 16 0 576 962 ;
+C -1 ; WX 228 ; N idieresis ; B -17 0 246 729 ;
+C -1 ; WX 228 ; N iacute ; B 57 0 270 750 ;
+C -1 ; WX 456 ; N aacute ; B 24 -14 432 750 ;
+C -1 ; WX 479 ; N plusminus ; B 33 0 446 506 ;
+C -1 ; WX 479 ; N multiply ; B 33 1 447 505 ;
+C -1 ; WX 592 ; N Udieresis ; B 59 -19 534 915 ;
+C -1 ; WX 479 ; N minus ; B 33 197 446 309 ;
+C -1 ; WX 273 ; N onesuperior ; B 21 283 194 710 ;
+C -1 ; WX 547 ; N Eacute ; B 62 0 509 936 ;
+C -1 ; WX 592 ; N Acircumflex ; B 16 0 576 936 ;
+C -1 ; WX 604 ; N copyright ; B -9 -19 614 737 ;
+C -1 ; WX 592 ; N Agrave ; B 16 0 576 936 ;
+C -1 ; WX 501 ; N odieresis ; B 28 -14 474 729 ;
+C -1 ; WX 501 ; N oacute ; B 28 -14 474 750 ;
+C -1 ; WX 328 ; N degree ; B 47 426 281 712 ;
+C -1 ; WX 228 ; N igrave ; B -41 0 171 750 ;
+C -1 ; WX 501 ; N mu ; B 54 -207 447 532 ;
+C -1 ; WX 638 ; N Oacute ; B 36 -19 602 936 ;
+C -1 ; WX 501 ; N eth ; B 28 -14 474 737 ;
+C -1 ; WX 592 ; N Adieresis ; B 16 0 576 915 ;
+C -1 ; WX 547 ; N Yacute ; B 12 0 535 936 ;
+C -1 ; WX 230 ; N brokenbar ; B 69 -19 161 737 ;
+C -1 ; WX 684 ; N onehalf ; B 21 -19 651 710 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 209
+
+KPX A y -24
+KPX A w -24
+KPX A v -32
+KPX A u -24
+KPX A Y -89
+KPX A W -48
+KPX A V -65
+KPX A U -40
+KPX A T -73
+KPX A Q -32
+KPX A O -32
+KPX A G -40
+KPX A C -32
+
+KPX B U -7
+KPX B A -24
+
+KPX D period -24
+KPX D comma -24
+KPX D Y -56
+KPX D W -32
+KPX D V -32
+KPX D A -32
+
+KPX F period -81
+KPX F comma -81
+KPX F a -15
+KPX F A -65
+
+KPX J u -15
+KPX J period -15
+KPX J comma -15
+KPX J A -15
+
+KPX K y -32
+KPX K u -24
+KPX K o -28
+KPX K e -11
+KPX K O -24
+
+KPX L y -24
+KPX L quoteright -114
+KPX L quotedblright -114
+KPX L Y -97
+KPX L W -65
+KPX L V -89
+KPX L T -73
+
+KPX O period -32
+KPX O comma -32
+KPX O Y -56
+KPX O X -40
+KPX O W -40
+KPX O V -40
+KPX O T -32
+KPX O A -40
+
+KPX P period -97
+KPX P o -32
+KPX P e -24
+KPX P comma -97
+KPX P a -24
+KPX P A -81
+
+KPX Q period 16
+KPX Q comma 16
+KPX Q U -7
+
+KPX R Y -40
+KPX R W -32
+KPX R V -40
+KPX R U -15
+KPX R T -15
+KPX R O -15
+
+KPX T y -48
+KPX T w -48
+KPX T u -73
+KPX T semicolon -32
+KPX T r -65
+KPX T period -65
+KPX T o -65
+KPX T hyphen -97
+KPX T e -48
+KPX T comma -65
+KPX T colon -32
+KPX T a -65
+KPX T O -32
+KPX T A -73
+
+KPX U period -24
+KPX U comma -24
+KPX U A -40
+
+KPX V u -48
+KPX V semicolon -32
+KPX V period -97
+KPX V o -73
+KPX V hyphen -65
+KPX V e -40
+KPX V comma -97
+KPX V colon -32
+KPX V a -48
+KPX V O -40
+KPX V G -40
+KPX V A -65
+
+KPX W y -15
+KPX W u -36
+KPX W semicolon -7
+KPX W period -65
+KPX W o -48
+KPX W hyphen -32
+KPX W e -28
+KPX W comma -65
+KPX W colon -7
+KPX W a -32
+KPX W O -15
+KPX W A -48
+
+KPX Y u -81
+KPX Y semicolon -40
+KPX Y period -81
+KPX Y o -81
+KPX Y e -65
+KPX Y comma -81
+KPX Y colon -40
+KPX Y a -73
+KPX Y O -56
+KPX Y A -89
+
+KPX a y -15
+KPX a w -11
+KPX a v -11
+KPX a g -7
+
+KPX b y -15
+KPX b v -15
+KPX b u -15
+KPX b l -7
+
+KPX c y -7
+KPX c l -15
+KPX c k -15
+KPX c h -7
+
+KPX colon space -32
+
+KPX comma space -32
+KPX comma quoteright -97
+KPX comma quotedblright -97
+
+KPX d y -11
+KPX d w -11
+KPX d v -11
+KPX d d -7
+
+KPX e y -11
+KPX e x -11
+KPX e w -11
+KPX e v -11
+KPX e period 16
+KPX e comma 8
+
+KPX f quoteright 25
+KPX f quotedblright 25
+KPX f period -7
+KPX f o -15
+KPX f e -7
+KPX f comma -7
+
+KPX g g -7
+KPX g e 8
+
+KPX h y -15
+
+KPX k o -11
+
+KPX l y -11
+KPX l w -11
+
+KPX m y -24
+KPX m u -15
+
+KPX n y -15
+KPX n v -32
+KPX n u -7
+
+KPX o y -15
+KPX o x -24
+KPX o w -11
+KPX o v -15
+
+KPX p y -11
+
+KPX period space -32
+KPX period quoteright -97
+KPX period quotedblright -97
+
+KPX quotedblright space -65
+
+KPX quoteleft quoteleft -37
+
+KPX quoteright v -15
+KPX quoteright space -65
+KPX quoteright s -48
+KPX quoteright r -32
+KPX quoteright quoteright -37
+KPX quoteright l -15
+KPX quoteright d -65
+
+KPX r y 8
+KPX r v 8
+KPX r t 16
+KPX r s -11
+KPX r q -15
+KPX r period -48
+KPX r o -15
+KPX r hyphen -15
+KPX r g -11
+KPX r d -15
+KPX r comma -48
+KPX r c -15
+
+KPX s w -11
+
+KPX semicolon space -32
+
+KPX space quoteleft -48
+KPX space quotedblleft -65
+KPX space Y -97
+KPX space W -65
+KPX space V -65
+KPX space T -81
+
+KPX v period -65
+KPX v o -24
+KPX v comma -65
+KPX v a -15
+
+KPX w period -32
+KPX w o -15
+KPX w comma -32
+
+KPX x e -7
+
+KPX y period -65
+KPX y o -20
+KPX y e -7
+KPX y comma -65
+KPX y a -24
+
+KPX z e 8
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 160 186 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 160 186 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 160 186 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 160 186 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 160 186 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 160 186 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 176 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 137 186 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 137 186 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 137 186 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 137 186 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute -22 186 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex -22 186 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis -22 186 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave -22 186 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 160 186 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 183 186 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 183 186 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 183 186 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 183 186 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 183 186 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 137 186 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 160 186 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 160 186 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 160 186 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 160 186 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 137 186 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 137 186 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 114 186 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 92 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 92 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 92 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 92 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 92 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 92 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 108 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 92 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 92 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 92 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 92 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -22 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -22 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -22 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -22 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 114 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 114 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 114 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 114 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 114 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 114 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 92 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 114 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 114 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 114 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 114 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 92 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 92 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 69 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-NrBdO b/font/He-NrBdO
new file mode 100644
index 0000000..1a38001
--- /dev/null
+++ b/font/He-NrBdO
@@ -0,0 +1,570 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Mar 15 12:08:57 1990
+Comment UniqueID 28407
+Comment VMusage 7614 43068
+FontName Helvetica-Narrow-BoldOblique
+FullName Helvetica Narrow Bold Oblique
+FamilyName Helvetica
+Weight Bold
+ItalicAngle -12
+IsFixedPitch false
+FontBBox -143 -228 913 962
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 718
+XHeight 532
+Ascender 718
+Descender -207
+StartCharMetrics 228
+C 32 ; WX 228 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 273 ; N exclam ; B 77 0 325 718 ;
+C 34 ; WX 389 ; N quotedbl ; B 158 447 433 718 ;
+C 35 ; WX 456 ; N numbersign ; B 49 0 528 698 ;
+C 36 ; WX 456 ; N dollar ; B 55 -115 510 775 ;
+C 37 ; WX 729 ; N percent ; B 112 -19 739 710 ;
+C 38 ; WX 592 ; N ampersand ; B 73 -19 600 718 ;
+C 39 ; WX 228 ; N quoteright ; B 137 445 297 718 ;
+C 40 ; WX 273 ; N parenleft ; B 62 -208 385 734 ;
+C 41 ; WX 273 ; N parenright ; B -21 -208 302 734 ;
+C 42 ; WX 319 ; N asterisk ; B 120 387 394 718 ;
+C 43 ; WX 479 ; N plus ; B 67 0 500 506 ;
+C 44 ; WX 228 ; N comma ; B 23 -168 201 146 ;
+C 45 ; WX 273 ; N hyphen ; B 60 215 311 345 ;
+C 46 ; WX 228 ; N period ; B 52 0 201 146 ;
+C 47 ; WX 228 ; N slash ; B -30 -19 383 737 ;
+C 48 ; WX 456 ; N zero ; B 71 -19 506 710 ;
+C 49 ; WX 456 ; N one ; B 142 0 434 710 ;
+C 50 ; WX 456 ; N two ; B 21 0 508 710 ;
+C 51 ; WX 456 ; N three ; B 54 -19 499 710 ;
+C 52 ; WX 456 ; N four ; B 50 0 490 710 ;
+C 53 ; WX 456 ; N five ; B 53 -19 522 698 ;
+C 54 ; WX 456 ; N six ; B 70 -19 507 710 ;
+C 55 ; WX 456 ; N seven ; B 102 0 555 698 ;
+C 56 ; WX 456 ; N eight ; B 57 -19 505 710 ;
+C 57 ; WX 456 ; N nine ; B 64 -19 504 710 ;
+C 58 ; WX 273 ; N colon ; B 75 0 288 512 ;
+C 59 ; WX 273 ; N semicolon ; B 46 -168 288 512 ;
+C 60 ; WX 479 ; N less ; B 67 -8 537 514 ;
+C 61 ; WX 479 ; N equal ; B 48 87 519 419 ;
+C 62 ; WX 479 ; N greater ; B 30 -8 500 514 ;
+C 63 ; WX 501 ; N question ; B 135 0 550 727 ;
+C 64 ; WX 800 ; N at ; B 152 -19 782 737 ;
+C 65 ; WX 592 ; N A ; B 16 0 576 718 ;
+C 66 ; WX 592 ; N B ; B 62 0 626 718 ;
+C 67 ; WX 592 ; N C ; B 88 -19 647 737 ;
+C 68 ; WX 592 ; N D ; B 62 0 637 718 ;
+C 69 ; WX 547 ; N E ; B 62 0 620 718 ;
+C 70 ; WX 501 ; N F ; B 62 0 606 718 ;
+C 71 ; WX 638 ; N G ; B 89 -19 670 737 ;
+C 72 ; WX 592 ; N H ; B 58 0 659 718 ;
+C 73 ; WX 228 ; N I ; B 52 0 301 718 ;
+C 74 ; WX 456 ; N J ; B 49 -18 522 718 ;
+C 75 ; WX 592 ; N K ; B 71 0 703 718 ;
+C 76 ; WX 501 ; N L ; B 62 0 501 718 ;
+C 77 ; WX 683 ; N M ; B 57 0 752 718 ;
+C 78 ; WX 592 ; N N ; B 57 0 661 718 ;
+C 79 ; WX 638 ; N O ; B 88 -19 675 737 ;
+C 80 ; WX 547 ; N P ; B 62 0 605 718 ;
+C 81 ; WX 638 ; N Q ; B 88 -52 675 737 ;
+C 82 ; WX 592 ; N R ; B 62 0 638 718 ;
+C 83 ; WX 547 ; N S ; B 66 -19 588 737 ;
+C 84 ; WX 501 ; N T ; B 114 0 615 718 ;
+C 85 ; WX 592 ; N U ; B 96 -19 659 718 ;
+C 86 ; WX 547 ; N V ; B 141 0 656 718 ;
+C 87 ; WX 774 ; N W ; B 138 0 887 718 ;
+C 88 ; WX 547 ; N X ; B 11 0 648 718 ;
+C 89 ; WX 547 ; N Y ; B 137 0 661 718 ;
+C 90 ; WX 501 ; N Z ; B 20 0 604 718 ;
+C 91 ; WX 273 ; N bracketleft ; B 17 -196 379 722 ;
+C 92 ; WX 228 ; N backslash ; B 101 -19 252 737 ;
+C 93 ; WX 273 ; N bracketright ; B -14 -196 347 722 ;
+C 94 ; WX 479 ; N asciicircum ; B 107 323 484 698 ;
+C 95 ; WX 456 ; N underscore ; B -22 -125 443 -75 ;
+C 96 ; WX 228 ; N quoteleft ; B 136 454 296 727 ;
+C 97 ; WX 456 ; N a ; B 45 -14 478 546 ;
+C 98 ; WX 501 ; N b ; B 50 -14 529 718 ;
+C 99 ; WX 456 ; N c ; B 65 -14 491 546 ;
+C 100 ; WX 501 ; N d ; B 67 -14 577 718 ;
+C 101 ; WX 456 ; N e ; B 58 -14 486 546 ;
+C 102 ; WX 273 ; N f ; B 71 0 385 727 ; L i fi ; L l fl ;
+C 103 ; WX 501 ; N g ; B 31 -217 546 546 ;
+C 104 ; WX 501 ; N h ; B 53 0 516 718 ;
+C 105 ; WX 228 ; N i ; B 57 0 298 725 ;
+C 106 ; WX 228 ; N j ; B -35 -214 298 725 ;
+C 107 ; WX 456 ; N k ; B 57 0 549 718 ;
+C 108 ; WX 228 ; N l ; B 57 0 297 718 ;
+C 109 ; WX 729 ; N m ; B 52 0 746 546 ;
+C 110 ; WX 501 ; N n ; B 53 0 516 546 ;
+C 111 ; WX 501 ; N o ; B 67 -14 527 546 ;
+C 112 ; WX 501 ; N p ; B 15 -207 529 546 ;
+C 113 ; WX 501 ; N q ; B 66 -207 545 546 ;
+C 114 ; WX 319 ; N r ; B 52 0 401 546 ;
+C 115 ; WX 456 ; N s ; B 52 -14 479 546 ;
+C 116 ; WX 273 ; N t ; B 82 -6 346 676 ;
+C 117 ; WX 501 ; N u ; B 80 -14 540 532 ;
+C 118 ; WX 456 ; N v ; B 103 0 538 532 ;
+C 119 ; WX 638 ; N w ; B 101 0 723 532 ;
+C 120 ; WX 456 ; N x ; B 12 0 531 532 ;
+C 121 ; WX 456 ; N y ; B 34 -214 535 532 ;
+C 122 ; WX 410 ; N z ; B 16 0 478 532 ;
+C 123 ; WX 319 ; N braceleft ; B 77 -196 425 722 ;
+C 124 ; WX 230 ; N bar ; B 66 -19 289 737 ;
+C 125 ; WX 319 ; N braceright ; B -14 -196 333 722 ;
+C 126 ; WX 479 ; N asciitilde ; B 94 163 473 343 ;
+C 161 ; WX 273 ; N exclamdown ; B 41 -186 290 532 ;
+C 162 ; WX 456 ; N cent ; B 65 -118 491 628 ;
+C 163 ; WX 456 ; N sterling ; B 41 -16 520 718 ;
+C 164 ; WX 137 ; N fraction ; B -143 -19 399 710 ;
+C 165 ; WX 456 ; N yen ; B 49 0 585 698 ;
+C 166 ; WX 456 ; N florin ; B -41 -210 548 737 ;
+C 167 ; WX 456 ; N section ; B 50 -184 491 727 ;
+C 168 ; WX 456 ; N currency ; B 22 76 558 636 ;
+C 169 ; WX 195 ; N quotesingle ; B 135 447 263 718 ;
+C 170 ; WX 410 ; N quotedblleft ; B 132 454 482 727 ;
+C 171 ; WX 456 ; N guillemotleft ; B 111 76 468 484 ;
+C 172 ; WX 273 ; N guilsinglleft ; B 106 76 289 484 ;
+C 173 ; WX 273 ; N guilsinglright ; B 81 76 264 484 ;
+C 174 ; WX 501 ; N fi ; B 71 0 571 727 ;
+C 175 ; WX 501 ; N fl ; B 71 0 570 727 ;
+C 177 ; WX 456 ; N endash ; B 40 227 514 333 ;
+C 178 ; WX 456 ; N dagger ; B 97 -171 513 718 ;
+C 179 ; WX 456 ; N daggerdbl ; B 38 -171 515 718 ;
+C 180 ; WX 228 ; N periodcentered ; B 90 172 226 334 ;
+C 182 ; WX 456 ; N paragraph ; B 80 -191 564 700 ;
+C 183 ; WX 287 ; N bullet ; B 68 194 345 524 ;
+C 184 ; WX 228 ; N quotesinglbase ; B 34 -146 194 127 ;
+C 185 ; WX 410 ; N quotedblbase ; B 29 -146 380 127 ;
+C 186 ; WX 410 ; N quotedblright ; B 132 445 483 718 ;
+C 187 ; WX 456 ; N guillemotright ; B 85 76 443 484 ;
+C 188 ; WX 820 ; N ellipsis ; B 75 0 770 146 ;
+C 189 ; WX 820 ; N perthousand ; B 62 -19 851 710 ;
+C 191 ; WX 501 ; N questiondown ; B 44 -195 459 532 ;
+C 193 ; WX 273 ; N grave ; B 112 604 290 750 ;
+C 194 ; WX 273 ; N acute ; B 194 604 423 750 ;
+C 195 ; WX 273 ; N circumflex ; B 97 604 387 750 ;
+C 196 ; WX 273 ; N tilde ; B 92 610 415 737 ;
+C 197 ; WX 273 ; N macron ; B 100 604 396 678 ;
+C 198 ; WX 273 ; N breve ; B 128 604 405 750 ;
+C 199 ; WX 273 ; N dotaccent ; B 192 614 316 729 ;
+C 200 ; WX 273 ; N dieresis ; B 112 614 395 729 ;
+C 202 ; WX 273 ; N ring ; B 164 568 344 776 ;
+C 203 ; WX 273 ; N cedilla ; B -30 -228 180 0 ;
+C 205 ; WX 273 ; N hungarumlaut ; B 113 604 529 750 ;
+C 206 ; WX 273 ; N ogonek ; B 33 -228 216 0 ;
+C 207 ; WX 273 ; N caron ; B 123 604 412 750 ;
+C 208 ; WX 820 ; N emdash ; B 40 227 878 333 ;
+C 225 ; WX 820 ; N AE ; B 4 0 902 718 ;
+C 227 ; WX 303 ; N ordfeminine ; B 75 276 381 737 ;
+C 232 ; WX 501 ; N Lslash ; B 28 0 501 718 ;
+C 233 ; WX 638 ; N Oslash ; B 29 -27 733 745 ;
+C 234 ; WX 820 ; N OE ; B 81 -19 913 737 ;
+C 235 ; WX 299 ; N ordmasculine ; B 75 276 398 737 ;
+C 241 ; WX 729 ; N ae ; B 46 -14 757 546 ;
+C 245 ; WX 228 ; N dotlessi ; B 57 0 264 532 ;
+C 248 ; WX 228 ; N lslash ; B 33 0 334 718 ;
+C 249 ; WX 501 ; N oslash ; B 18 -29 575 560 ;
+C 250 ; WX 774 ; N oe ; B 67 -14 801 546 ;
+C 251 ; WX 501 ; N germandbls ; B 57 -14 539 731 ;
+C -1 ; WX 501 ; N Zcaron ; B 20 0 604 936 ;
+C -1 ; WX 456 ; N ccedilla ; B 65 -228 491 546 ;
+C -1 ; WX 456 ; N ydieresis ; B 34 -214 535 729 ;
+C -1 ; WX 456 ; N atilde ; B 45 -14 507 737 ;
+C -1 ; WX 228 ; N icircumflex ; B 57 0 364 750 ;
+C -1 ; WX 273 ; N threesuperior ; B 75 271 361 710 ;
+C -1 ; WX 456 ; N ecircumflex ; B 58 -14 486 750 ;
+C -1 ; WX 501 ; N thorn ; B 15 -208 529 718 ;
+C -1 ; WX 456 ; N egrave ; B 58 -14 486 750 ;
+C -1 ; WX 273 ; N twosuperior ; B 57 283 368 710 ;
+C -1 ; WX 456 ; N eacute ; B 58 -14 514 750 ;
+C -1 ; WX 501 ; N otilde ; B 67 -14 529 737 ;
+C -1 ; WX 592 ; N Aacute ; B 16 0 615 936 ;
+C -1 ; WX 501 ; N ocircumflex ; B 67 -14 527 750 ;
+C -1 ; WX 456 ; N yacute ; B 34 -214 535 750 ;
+C -1 ; WX 501 ; N udieresis ; B 80 -14 540 729 ;
+C -1 ; WX 684 ; N threequarters ; B 82 -19 688 710 ;
+C -1 ; WX 456 ; N acircumflex ; B 45 -14 478 750 ;
+C -1 ; WX 592 ; N Eth ; B 51 0 637 718 ;
+C -1 ; WX 456 ; N edieresis ; B 58 -14 487 729 ;
+C -1 ; WX 501 ; N ugrave ; B 80 -14 540 750 ;
+C -1 ; WX 820 ; N trademark ; B 146 306 909 718 ;
+C -1 ; WX 501 ; N ograve ; B 67 -14 527 750 ;
+C -1 ; WX 456 ; N scaron ; B 52 -14 504 750 ;
+C -1 ; WX 228 ; N Idieresis ; B 52 0 405 915 ;
+C -1 ; WX 501 ; N uacute ; B 80 -14 540 750 ;
+C -1 ; WX 456 ; N agrave ; B 45 -14 478 750 ;
+C -1 ; WX 501 ; N ntilde ; B 53 0 529 737 ;
+C -1 ; WX 456 ; N aring ; B 45 -14 478 776 ;
+C -1 ; WX 410 ; N zcaron ; B 16 0 481 750 ;
+C -1 ; WX 228 ; N Icircumflex ; B 52 0 397 936 ;
+C -1 ; WX 592 ; N Ntilde ; B 57 0 661 923 ;
+C -1 ; WX 501 ; N ucircumflex ; B 80 -14 540 750 ;
+C -1 ; WX 547 ; N Ecircumflex ; B 62 0 620 936 ;
+C -1 ; WX 228 ; N Iacute ; B 52 0 433 936 ;
+C -1 ; WX 592 ; N Ccedilla ; B 88 -228 647 737 ;
+C -1 ; WX 638 ; N Odieresis ; B 88 -19 675 915 ;
+C -1 ; WX 547 ; N Scaron ; B 66 -19 588 936 ;
+C -1 ; WX 547 ; N Edieresis ; B 62 0 620 915 ;
+C -1 ; WX 228 ; N Igrave ; B 52 0 301 936 ;
+C -1 ; WX 456 ; N adieresis ; B 45 -14 487 729 ;
+C -1 ; WX 638 ; N Ograve ; B 88 -19 675 936 ;
+C -1 ; WX 547 ; N Egrave ; B 62 0 620 936 ;
+C -1 ; WX 547 ; N Ydieresis ; B 137 0 661 915 ;
+C -1 ; WX 604 ; N registered ; B 45 -19 684 737 ;
+C -1 ; WX 638 ; N Otilde ; B 88 -19 675 923 ;
+C -1 ; WX 684 ; N onequarter ; B 108 -19 661 710 ;
+C -1 ; WX 592 ; N Ugrave ; B 96 -19 659 936 ;
+C -1 ; WX 592 ; N Ucircumflex ; B 96 -19 659 936 ;
+C -1 ; WX 547 ; N Thorn ; B 62 0 588 718 ;
+C -1 ; WX 479 ; N divide ; B 67 -42 500 548 ;
+C -1 ; WX 592 ; N Atilde ; B 16 0 608 923 ;
+C -1 ; WX 592 ; N Uacute ; B 96 -19 659 936 ;
+C -1 ; WX 638 ; N Ocircumflex ; B 88 -19 675 936 ;
+C -1 ; WX 479 ; N logicalnot ; B 86 108 519 419 ;
+C -1 ; WX 592 ; N Aring ; B 16 0 576 962 ;
+C -1 ; WX 228 ; N idieresis ; B 57 0 373 729 ;
+C -1 ; WX 228 ; N iacute ; B 57 0 400 750 ;
+C -1 ; WX 456 ; N aacute ; B 45 -14 514 750 ;
+C -1 ; WX 479 ; N plusminus ; B 33 0 512 506 ;
+C -1 ; WX 479 ; N multiply ; B 47 1 520 505 ;
+C -1 ; WX 592 ; N Udieresis ; B 96 -19 659 915 ;
+C -1 ; WX 479 ; N minus ; B 67 197 500 309 ;
+C -1 ; WX 273 ; N onesuperior ; B 121 283 318 710 ;
+C -1 ; WX 547 ; N Eacute ; B 62 0 620 936 ;
+C -1 ; WX 592 ; N Acircumflex ; B 16 0 579 936 ;
+C -1 ; WX 604 ; N copyright ; B 46 -19 685 737 ;
+C -1 ; WX 592 ; N Agrave ; B 16 0 576 936 ;
+C -1 ; WX 501 ; N odieresis ; B 67 -14 527 729 ;
+C -1 ; WX 501 ; N oacute ; B 67 -14 537 750 ;
+C -1 ; WX 328 ; N degree ; B 143 426 383 712 ;
+C -1 ; WX 228 ; N igrave ; B 57 0 268 750 ;
+C -1 ; WX 501 ; N mu ; B 18 -207 540 532 ;
+C -1 ; WX 638 ; N Oacute ; B 88 -19 675 936 ;
+C -1 ; WX 501 ; N eth ; B 67 -14 549 737 ;
+C -1 ; WX 592 ; N Adieresis ; B 16 0 588 915 ;
+C -1 ; WX 547 ; N Yacute ; B 137 0 661 936 ;
+C -1 ; WX 230 ; N brokenbar ; B 66 -19 289 737 ;
+C -1 ; WX 684 ; N onehalf ; B 108 -19 704 710 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 209
+
+KPX A y -30
+KPX A w -30
+KPX A v -40
+KPX A u -30
+KPX A Y -110
+KPX A W -60
+KPX A V -80
+KPX A U -50
+KPX A T -90
+KPX A Q -40
+KPX A O -40
+KPX A G -50
+KPX A C -40
+
+KPX B U -10
+KPX B A -30
+
+KPX D period -30
+KPX D comma -30
+KPX D Y -70
+KPX D W -40
+KPX D V -40
+KPX D A -40
+
+KPX F period -100
+KPX F comma -100
+KPX F a -20
+KPX F A -80
+
+KPX J u -20
+KPX J period -20
+KPX J comma -20
+KPX J A -20
+
+KPX K y -40
+KPX K u -30
+KPX K o -35
+KPX K e -15
+KPX K O -30
+
+KPX L y -30
+KPX L quoteright -140
+KPX L quotedblright -140
+KPX L Y -120
+KPX L W -80
+KPX L V -110
+KPX L T -90
+
+KPX O period -40
+KPX O comma -40
+KPX O Y -70
+KPX O X -50
+KPX O W -50
+KPX O V -50
+KPX O T -40
+KPX O A -50
+
+KPX P period -120
+KPX P o -40
+KPX P e -30
+KPX P comma -120
+KPX P a -30
+KPX P A -100
+
+KPX Q period 20
+KPX Q comma 20
+KPX Q U -10
+
+KPX R Y -50
+KPX R W -40
+KPX R V -50
+KPX R U -20
+KPX R T -20
+KPX R O -20
+
+KPX T y -60
+KPX T w -60
+KPX T u -90
+KPX T semicolon -40
+KPX T r -80
+KPX T period -80
+KPX T o -80
+KPX T hyphen -120
+KPX T e -60
+KPX T comma -80
+KPX T colon -40
+KPX T a -80
+KPX T O -40
+KPX T A -90
+
+KPX U period -30
+KPX U comma -30
+KPX U A -50
+
+KPX V u -60
+KPX V semicolon -40
+KPX V period -120
+KPX V o -90
+KPX V hyphen -80
+KPX V e -50
+KPX V comma -120
+KPX V colon -40
+KPX V a -60
+KPX V O -50
+KPX V G -50
+KPX V A -80
+
+KPX W y -20
+KPX W u -45
+KPX W semicolon -10
+KPX W period -80
+KPX W o -60
+KPX W hyphen -40
+KPX W e -35
+KPX W comma -80
+KPX W colon -10
+KPX W a -40
+KPX W O -20
+KPX W A -60
+
+KPX Y u -100
+KPX Y semicolon -50
+KPX Y period -100
+KPX Y o -100
+KPX Y e -80
+KPX Y comma -100
+KPX Y colon -50
+KPX Y a -90
+KPX Y O -70
+KPX Y A -110
+
+KPX a y -20
+KPX a w -15
+KPX a v -15
+KPX a g -10
+
+KPX b y -20
+KPX b v -20
+KPX b u -20
+KPX b l -10
+
+KPX c y -10
+KPX c l -20
+KPX c k -20
+KPX c h -10
+
+KPX colon space -40
+
+KPX comma space -40
+KPX comma quoteright -120
+KPX comma quotedblright -120
+
+KPX d y -15
+KPX d w -15
+KPX d v -15
+KPX d d -10
+
+KPX e y -15
+KPX e x -15
+KPX e w -15
+KPX e v -15
+KPX e period 20
+KPX e comma 10
+
+KPX f quoteright 30
+KPX f quotedblright 30
+KPX f period -10
+KPX f o -20
+KPX f e -10
+KPX f comma -10
+
+KPX g g -10
+KPX g e 10
+
+KPX h y -20
+
+KPX k o -15
+
+KPX l y -15
+KPX l w -15
+
+KPX m y -30
+KPX m u -20
+
+KPX n y -20
+KPX n v -40
+KPX n u -10
+
+KPX o y -20
+KPX o x -30
+KPX o w -15
+KPX o v -20
+
+KPX p y -15
+
+KPX period space -40
+KPX period quoteright -120
+KPX period quotedblright -120
+
+KPX quotedblright space -80
+
+KPX quoteleft quoteleft -46
+
+KPX quoteright v -20
+KPX quoteright space -80
+KPX quoteright s -60
+KPX quoteright r -40
+KPX quoteright quoteright -46
+KPX quoteright l -20
+KPX quoteright d -80
+
+KPX r y 10
+KPX r v 10
+KPX r t 20
+KPX r s -15
+KPX r q -20
+KPX r period -60
+KPX r o -20
+KPX r hyphen -20
+KPX r g -15
+KPX r d -20
+KPX r comma -60
+KPX r c -20
+
+KPX s w -15
+
+KPX semicolon space -40
+
+KPX space quoteleft -60
+KPX space quotedblleft -80
+KPX space Y -120
+KPX space W -80
+KPX space V -80
+KPX space T -100
+
+KPX v period -80
+KPX v o -30
+KPX v comma -80
+KPX v a -20
+
+KPX w period -40
+KPX w o -20
+KPX w comma -40
+
+KPX x e -10
+
+KPX y period -80
+KPX y o -25
+KPX y e -10
+KPX y comma -80
+KPX y a -30
+
+KPX z e 10
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 192 186 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 192 186 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 192 186 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 192 186 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 192 186 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 192 186 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 176 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 169 186 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 169 186 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 169 186 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 169 186 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 10 186 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 10 186 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 10 186 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 10 186 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 192 186 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 215 186 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 215 186 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 215 186 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 215 186 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 215 186 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 169 186 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 192 186 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 192 186 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 192 186 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 192 186 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 169 186 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 169 186 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 146 186 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 92 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 92 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 92 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 92 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 92 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 92 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 108 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 92 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 92 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 92 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 92 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -22 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -22 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -22 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -22 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 114 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 114 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 114 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 114 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 114 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 114 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 92 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 114 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 114 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 114 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 114 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 92 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 92 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 69 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-NrO b/font/He-NrO
new file mode 100644
index 0000000..f757319
--- /dev/null
+++ b/font/He-NrO
@@ -0,0 +1,612 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All rights reserved.
+Comment Creation Date: Thu Mar 15 11:25:48 1990
+Comment UniqueID 28389
+Comment VMusage 7572 42473
+FontName Helvetica-Narrow-Oblique
+FullName Helvetica Narrow Oblique
+FamilyName Helvetica
+Weight Medium
+ItalicAngle -12
+IsFixedPitch false
+FontBBox -139 -225 915 931
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.006
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All rights reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 718
+XHeight 523
+Ascender 718
+Descender -207
+StartCharMetrics 228
+C 32 ; WX 228 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 228 ; N exclam ; B 74 0 278 718 ;
+C 34 ; WX 291 ; N quotedbl ; B 138 463 359 718 ;
+C 35 ; WX 456 ; N numbersign ; B 60 0 517 688 ;
+C 36 ; WX 456 ; N dollar ; B 57 -115 506 775 ;
+C 37 ; WX 729 ; N percent ; B 120 -19 729 703 ;
+C 38 ; WX 547 ; N ampersand ; B 63 -15 530 718 ;
+C 39 ; WX 182 ; N quoteright ; B 124 463 254 718 ;
+C 40 ; WX 273 ; N parenleft ; B 89 -207 372 733 ;
+C 41 ; WX 273 ; N parenright ; B -7 -207 276 733 ;
+C 42 ; WX 319 ; N asterisk ; B 135 431 389 718 ;
+C 43 ; WX 479 ; N plus ; B 70 0 497 505 ;
+C 44 ; WX 228 ; N comma ; B 46 -147 175 106 ;
+C 45 ; WX 273 ; N hyphen ; B 77 232 293 322 ;
+C 46 ; WX 228 ; N period ; B 71 0 175 106 ;
+C 47 ; WX 228 ; N slash ; B -17 -19 370 737 ;
+C 48 ; WX 456 ; N zero ; B 77 -19 499 703 ;
+C 49 ; WX 456 ; N one ; B 170 0 417 703 ;
+C 50 ; WX 456 ; N two ; B 21 0 506 703 ;
+C 51 ; WX 456 ; N three ; B 61 -19 500 703 ;
+C 52 ; WX 456 ; N four ; B 50 0 472 703 ;
+C 53 ; WX 456 ; N five ; B 55 -19 509 688 ;
+C 54 ; WX 456 ; N six ; B 74 -19 504 703 ;
+C 55 ; WX 456 ; N seven ; B 112 0 549 688 ;
+C 56 ; WX 456 ; N eight ; B 60 -19 497 703 ;
+C 57 ; WX 456 ; N nine ; B 67 -19 499 703 ;
+C 58 ; WX 228 ; N colon ; B 71 0 247 516 ;
+C 59 ; WX 228 ; N semicolon ; B 46 -147 247 516 ;
+C 60 ; WX 479 ; N less ; B 77 11 526 495 ;
+C 61 ; WX 479 ; N equal ; B 52 115 515 390 ;
+C 62 ; WX 479 ; N greater ; B 41 11 490 495 ;
+C 63 ; WX 456 ; N question ; B 132 0 500 727 ;
+C 64 ; WX 832 ; N at ; B 176 -19 791 737 ;
+C 65 ; WX 547 ; N A ; B 11 0 536 718 ;
+C 66 ; WX 547 ; N B ; B 61 0 583 718 ;
+C 67 ; WX 592 ; N C ; B 88 -19 640 737 ;
+C 68 ; WX 592 ; N D ; B 66 0 626 718 ;
+C 69 ; WX 547 ; N E ; B 71 0 625 718 ;
+C 70 ; WX 501 ; N F ; B 71 0 603 718 ;
+C 71 ; WX 638 ; N G ; B 91 -19 655 737 ;
+C 72 ; WX 592 ; N H ; B 63 0 655 718 ;
+C 73 ; WX 228 ; N I ; B 75 0 279 718 ;
+C 74 ; WX 410 ; N J ; B 39 -19 476 718 ;
+C 75 ; WX 547 ; N K ; B 62 0 662 718 ;
+C 76 ; WX 456 ; N L ; B 62 0 455 718 ;
+C 77 ; WX 683 ; N M ; B 60 0 749 718 ;
+C 78 ; WX 592 ; N N ; B 62 0 655 718 ;
+C 79 ; WX 638 ; N O ; B 86 -19 677 737 ;
+C 80 ; WX 547 ; N P ; B 71 0 604 718 ;
+C 81 ; WX 638 ; N Q ; B 86 -56 677 737 ;
+C 82 ; WX 592 ; N R ; B 72 0 634 718 ;
+C 83 ; WX 547 ; N S ; B 74 -19 584 737 ;
+C 84 ; WX 501 ; N T ; B 122 0 615 718 ;
+C 85 ; WX 592 ; N U ; B 101 -19 653 718 ;
+C 86 ; WX 547 ; N V ; B 142 0 656 718 ;
+C 87 ; WX 774 ; N W ; B 138 0 886 718 ;
+C 88 ; WX 547 ; N X ; B 16 0 647 718 ;
+C 89 ; WX 547 ; N Y ; B 137 0 661 718 ;
+C 90 ; WX 501 ; N Z ; B 19 0 607 718 ;
+C 91 ; WX 228 ; N bracketleft ; B 17 -196 331 722 ;
+C 92 ; WX 228 ; N backslash ; B 115 -19 239 737 ;
+C 93 ; WX 228 ; N bracketright ; B -11 -196 302 722 ;
+C 94 ; WX 385 ; N asciicircum ; B 35 264 442 688 ;
+C 95 ; WX 456 ; N underscore ; B -22 -125 443 -75 ;
+C 96 ; WX 182 ; N quoteleft ; B 135 470 265 725 ;
+C 97 ; WX 456 ; N a ; B 50 -15 458 538 ;
+C 98 ; WX 456 ; N b ; B 48 -15 479 718 ;
+C 99 ; WX 410 ; N c ; B 61 -15 454 538 ;
+C 100 ; WX 456 ; N d ; B 69 -15 534 718 ;
+C 101 ; WX 456 ; N e ; B 69 -15 474 538 ;
+C 102 ; WX 228 ; N f ; B 71 0 341 728 ; L i fi ; L l fl ;
+C 103 ; WX 456 ; N g ; B 34 -220 500 538 ;
+C 104 ; WX 456 ; N h ; B 53 0 470 718 ;
+C 105 ; WX 182 ; N i ; B 55 0 252 718 ;
+C 106 ; WX 182 ; N j ; B -49 -210 252 718 ;
+C 107 ; WX 410 ; N k ; B 55 0 492 718 ;
+C 108 ; WX 182 ; N l ; B 55 0 252 718 ;
+C 109 ; WX 683 ; N m ; B 53 0 699 538 ;
+C 110 ; WX 456 ; N n ; B 53 0 470 538 ;
+C 111 ; WX 456 ; N o ; B 68 -14 479 538 ;
+C 112 ; WX 456 ; N p ; B 11 -207 479 538 ;
+C 113 ; WX 456 ; N q ; B 69 -207 496 538 ;
+C 114 ; WX 273 ; N r ; B 63 0 365 538 ;
+C 115 ; WX 410 ; N s ; B 52 -15 434 538 ;
+C 116 ; WX 228 ; N t ; B 84 -7 302 669 ;
+C 117 ; WX 456 ; N u ; B 77 -15 492 523 ;
+C 118 ; WX 410 ; N v ; B 98 0 495 523 ;
+C 119 ; WX 592 ; N w ; B 103 0 673 523 ;
+C 120 ; WX 410 ; N x ; B 9 0 487 523 ;
+C 121 ; WX 410 ; N y ; B 12 -214 492 523 ;
+C 122 ; WX 410 ; N z ; B 25 0 468 523 ;
+C 123 ; WX 274 ; N braceleft ; B 75 -196 365 722 ;
+C 124 ; WX 213 ; N bar ; B 74 -19 265 737 ;
+C 125 ; WX 274 ; N braceright ; B 0 -196 291 722 ;
+C 126 ; WX 479 ; N asciitilde ; B 91 180 476 326 ;
+C 161 ; WX 273 ; N exclamdown ; B 63 -195 267 523 ;
+C 162 ; WX 456 ; N cent ; B 78 -115 479 623 ;
+C 163 ; WX 456 ; N sterling ; B 40 -16 520 718 ;
+C 164 ; WX 137 ; N fraction ; B -139 -19 396 703 ;
+C 165 ; WX 456 ; N yen ; B 67 0 573 688 ;
+C 166 ; WX 456 ; N florin ; B -43 -207 537 737 ;
+C 167 ; WX 456 ; N section ; B 63 -191 479 737 ;
+C 168 ; WX 456 ; N currency ; B 49 99 530 603 ;
+C 169 ; WX 157 ; N quotesingle ; B 129 463 233 718 ;
+C 170 ; WX 273 ; N quotedblleft ; B 113 470 378 725 ;
+C 171 ; WX 456 ; N guillemotleft ; B 120 108 454 446 ;
+C 172 ; WX 273 ; N guilsinglleft ; B 112 108 279 446 ;
+C 173 ; WX 273 ; N guilsinglright ; B 91 108 257 446 ;
+C 174 ; WX 410 ; N fi ; B 71 0 481 728 ;
+C 175 ; WX 410 ; N fl ; B 71 0 479 728 ;
+C 177 ; WX 456 ; N endash ; B 42 240 510 313 ;
+C 178 ; WX 456 ; N dagger ; B 110 -159 510 718 ;
+C 179 ; WX 456 ; N daggerdbl ; B 43 -159 511 718 ;
+C 180 ; WX 228 ; N periodcentered ; B 106 190 211 315 ;
+C 182 ; WX 440 ; N paragraph ; B 103 -173 533 718 ;
+C 183 ; WX 287 ; N bullet ; B 74 202 339 517 ;
+C 184 ; WX 182 ; N quotesinglbase ; B 17 -149 147 106 ;
+C 185 ; WX 273 ; N quotedblbase ; B -5 -149 260 106 ;
+C 186 ; WX 273 ; N quotedblright ; B 102 463 367 718 ;
+C 187 ; WX 456 ; N guillemotright ; B 98 108 433 446 ;
+C 188 ; WX 820 ; N ellipsis ; B 94 0 744 106 ;
+C 189 ; WX 820 ; N perthousand ; B 72 -19 844 703 ;
+C 191 ; WX 501 ; N questiondown ; B 70 -201 438 525 ;
+C 193 ; WX 273 ; N grave ; B 139 593 276 734 ;
+C 194 ; WX 273 ; N acute ; B 203 593 390 734 ;
+C 195 ; WX 273 ; N circumflex ; B 121 593 359 734 ;
+C 196 ; WX 273 ; N tilde ; B 102 606 402 722 ;
+C 197 ; WX 273 ; N macron ; B 117 627 384 684 ;
+C 198 ; WX 273 ; N breve ; B 137 595 391 731 ;
+C 199 ; WX 273 ; N dotaccent ; B 204 604 297 706 ;
+C 200 ; WX 273 ; N dieresis ; B 138 604 363 706 ;
+C 202 ; WX 273 ; N ring ; B 175 572 330 756 ;
+C 203 ; WX 273 ; N cedilla ; B 2 -225 191 0 ;
+C 205 ; WX 273 ; N hungarumlaut ; B 129 593 463 734 ;
+C 206 ; WX 273 ; N ogonek ; B 35 -225 204 0 ;
+C 207 ; WX 273 ; N caron ; B 145 593 384 734 ;
+C 208 ; WX 820 ; N emdash ; B 42 240 875 313 ;
+C 225 ; WX 820 ; N AE ; B 7 0 899 718 ;
+C 227 ; WX 303 ; N ordfeminine ; B 82 304 368 737 ;
+C 232 ; WX 456 ; N Lslash ; B 34 0 455 718 ;
+C 233 ; WX 638 ; N Oslash ; B 35 -19 730 737 ;
+C 234 ; WX 820 ; N OE ; B 80 -19 915 737 ;
+C 235 ; WX 299 ; N ordmasculine ; B 82 304 384 737 ;
+C 241 ; WX 729 ; N ae ; B 50 -15 746 538 ;
+C 245 ; WX 228 ; N dotlessi ; B 78 0 241 523 ;
+C 248 ; WX 182 ; N lslash ; B 34 0 284 718 ;
+C 249 ; WX 501 ; N oslash ; B 24 -22 531 545 ;
+C 250 ; WX 774 ; N oe ; B 68 -15 791 538 ;
+C 251 ; WX 501 ; N germandbls ; B 55 -15 539 728 ;
+C -1 ; WX 501 ; N Zcaron ; B 19 0 607 929 ;
+C -1 ; WX 410 ; N ccedilla ; B 61 -225 454 538 ;
+C -1 ; WX 410 ; N ydieresis ; B 12 -214 492 706 ;
+C -1 ; WX 456 ; N atilde ; B 50 -15 486 722 ;
+C -1 ; WX 228 ; N icircumflex ; B 78 0 337 734 ;
+C -1 ; WX 273 ; N threesuperior ; B 74 270 358 703 ;
+C -1 ; WX 456 ; N ecircumflex ; B 69 -15 474 734 ;
+C -1 ; WX 456 ; N thorn ; B 11 -207 479 718 ;
+C -1 ; WX 456 ; N egrave ; B 69 -15 474 734 ;
+C -1 ; WX 273 ; N twosuperior ; B 52 281 368 703 ;
+C -1 ; WX 456 ; N eacute ; B 69 -15 481 734 ;
+C -1 ; WX 456 ; N otilde ; B 68 -14 494 722 ;
+C -1 ; WX 547 ; N Aacute ; B 11 0 560 929 ;
+C -1 ; WX 456 ; N ocircumflex ; B 68 -14 479 734 ;
+C -1 ; WX 410 ; N yacute ; B 12 -214 492 734 ;
+C -1 ; WX 456 ; N udieresis ; B 77 -15 492 706 ;
+C -1 ; WX 684 ; N threequarters ; B 106 -19 706 703 ;
+C -1 ; WX 456 ; N acircumflex ; B 50 -15 458 734 ;
+C -1 ; WX 592 ; N Eth ; B 57 0 626 718 ;
+C -1 ; WX 456 ; N edieresis ; B 69 -15 474 706 ;
+C -1 ; WX 456 ; N ugrave ; B 77 -15 492 734 ;
+C -1 ; WX 820 ; N trademark ; B 152 306 866 718 ;
+C -1 ; WX 456 ; N ograve ; B 68 -14 479 734 ;
+C -1 ; WX 410 ; N scaron ; B 52 -15 453 734 ;
+C -1 ; WX 228 ; N Idieresis ; B 75 0 375 901 ;
+C -1 ; WX 456 ; N uacute ; B 77 -15 492 734 ;
+C -1 ; WX 456 ; N agrave ; B 50 -15 458 734 ;
+C -1 ; WX 456 ; N ntilde ; B 53 0 486 722 ;
+C -1 ; WX 456 ; N aring ; B 50 -15 458 756 ;
+C -1 ; WX 410 ; N zcaron ; B 25 0 468 734 ;
+C -1 ; WX 228 ; N Icircumflex ; B 75 0 371 929 ;
+C -1 ; WX 592 ; N Ntilde ; B 62 0 655 917 ;
+C -1 ; WX 456 ; N ucircumflex ; B 77 -15 492 734 ;
+C -1 ; WX 547 ; N Ecircumflex ; B 71 0 625 929 ;
+C -1 ; WX 228 ; N Iacute ; B 75 0 401 929 ;
+C -1 ; WX 592 ; N Ccedilla ; B 88 -225 640 737 ;
+C -1 ; WX 638 ; N Odieresis ; B 86 -19 677 901 ;
+C -1 ; WX 547 ; N Scaron ; B 74 -19 584 929 ;
+C -1 ; WX 547 ; N Edieresis ; B 71 0 625 901 ;
+C -1 ; WX 228 ; N Igrave ; B 75 0 288 929 ;
+C -1 ; WX 456 ; N adieresis ; B 50 -15 458 706 ;
+C -1 ; WX 638 ; N Ograve ; B 86 -19 677 929 ;
+C -1 ; WX 547 ; N Egrave ; B 71 0 625 929 ;
+C -1 ; WX 547 ; N Ydieresis ; B 137 0 661 901 ;
+C -1 ; WX 604 ; N registered ; B 44 -19 687 737 ;
+C -1 ; WX 638 ; N Otilde ; B 86 -19 677 917 ;
+C -1 ; WX 684 ; N onequarter ; B 123 -19 658 703 ;
+C -1 ; WX 592 ; N Ugrave ; B 101 -19 653 929 ;
+C -1 ; WX 592 ; N Ucircumflex ; B 101 -19 653 929 ;
+C -1 ; WX 547 ; N Thorn ; B 71 0 584 718 ;
+C -1 ; WX 479 ; N divide ; B 70 -19 497 524 ;
+C -1 ; WX 547 ; N Atilde ; B 11 0 573 917 ;
+C -1 ; WX 592 ; N Uacute ; B 101 -19 653 929 ;
+C -1 ; WX 638 ; N Ocircumflex ; B 86 -19 677 929 ;
+C -1 ; WX 479 ; N logicalnot ; B 87 108 515 390 ;
+C -1 ; WX 547 ; N Aring ; B 11 0 536 931 ;
+C -1 ; WX 228 ; N idieresis ; B 78 0 341 706 ;
+C -1 ; WX 228 ; N iacute ; B 78 0 367 734 ;
+C -1 ; WX 456 ; N aacute ; B 50 -15 481 734 ;
+C -1 ; WX 479 ; N plusminus ; B 32 0 507 506 ;
+C -1 ; WX 479 ; N multiply ; B 41 0 526 506 ;
+C -1 ; WX 592 ; N Udieresis ; B 101 -19 653 901 ;
+C -1 ; WX 479 ; N minus ; B 70 216 497 289 ;
+C -1 ; WX 273 ; N onesuperior ; B 136 281 305 703 ;
+C -1 ; WX 547 ; N Eacute ; B 71 0 625 929 ;
+C -1 ; WX 547 ; N Acircumflex ; B 11 0 536 929 ;
+C -1 ; WX 604 ; N copyright ; B 44 -19 687 737 ;
+C -1 ; WX 547 ; N Agrave ; B 11 0 536 929 ;
+C -1 ; WX 456 ; N odieresis ; B 68 -14 479 706 ;
+C -1 ; WX 456 ; N oacute ; B 68 -14 481 734 ;
+C -1 ; WX 328 ; N degree ; B 138 411 384 703 ;
+C -1 ; WX 228 ; N igrave ; B 78 0 254 734 ;
+C -1 ; WX 456 ; N mu ; B 20 -207 492 523 ;
+C -1 ; WX 638 ; N Oacute ; B 86 -19 677 929 ;
+C -1 ; WX 456 ; N eth ; B 67 -15 506 737 ;
+C -1 ; WX 547 ; N Adieresis ; B 11 0 536 901 ;
+C -1 ; WX 547 ; N Yacute ; B 137 0 661 929 ;
+C -1 ; WX 213 ; N brokenbar ; B 74 -19 265 737 ;
+C -1 ; WX 684 ; N onehalf ; B 93 -19 688 703 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 250
+
+KPX A y -40
+KPX A w -40
+KPX A v -40
+KPX A u -30
+KPX A Y -100
+KPX A W -50
+KPX A V -70
+KPX A U -50
+KPX A T -120
+KPX A Q -30
+KPX A O -30
+KPX A G -30
+KPX A C -30
+
+KPX B period -20
+KPX B comma -20
+KPX B U -10
+
+KPX C period -30
+KPX C comma -30
+
+KPX D period -70
+KPX D comma -70
+KPX D Y -90
+KPX D W -40
+KPX D V -70
+KPX D A -40
+
+KPX F r -45
+KPX F period -150
+KPX F o -30
+KPX F e -30
+KPX F comma -150
+KPX F a -50
+KPX F A -80
+
+KPX J u -20
+KPX J period -30
+KPX J comma -30
+KPX J a -20
+KPX J A -20
+
+KPX K y -50
+KPX K u -30
+KPX K o -40
+KPX K e -40
+KPX K O -50
+
+KPX L y -30
+KPX L quoteright -160
+KPX L quotedblright -140
+KPX L Y -140
+KPX L W -70
+KPX L V -110
+KPX L T -110
+
+KPX O period -40
+KPX O comma -40
+KPX O Y -70
+KPX O X -60
+KPX O W -30
+KPX O V -50
+KPX O T -40
+KPX O A -20
+
+KPX P period -180
+KPX P o -50
+KPX P e -50
+KPX P comma -180
+KPX P a -40
+KPX P A -120
+
+KPX Q U -10
+
+KPX R Y -50
+KPX R W -30
+KPX R V -50
+KPX R U -40
+KPX R T -30
+KPX R O -20
+
+KPX S period -20
+KPX S comma -20
+
+KPX T y -120
+KPX T w -120
+KPX T u -120
+KPX T semicolon -20
+KPX T r -120
+KPX T period -120
+KPX T o -120
+KPX T hyphen -140
+KPX T e -120
+KPX T comma -120
+KPX T colon -20
+KPX T a -120
+KPX T O -40
+KPX T A -120
+
+KPX U period -40
+KPX U comma -40
+KPX U A -40
+
+KPX V u -70
+KPX V semicolon -40
+KPX V period -125
+KPX V o -80
+KPX V hyphen -80
+KPX V e -80
+KPX V comma -125
+KPX V colon -40
+KPX V a -70
+KPX V O -40
+KPX V G -40
+KPX V A -80
+
+KPX W y -20
+KPX W u -30
+KPX W period -80
+KPX W o -30
+KPX W hyphen -40
+KPX W e -30
+KPX W comma -80
+KPX W a -40
+KPX W O -20
+KPX W A -50
+
+KPX Y u -110
+KPX Y semicolon -60
+KPX Y period -140
+KPX Y o -140
+KPX Y i -20
+KPX Y hyphen -140
+KPX Y e -140
+KPX Y comma -140
+KPX Y colon -60
+KPX Y a -140
+KPX Y O -85
+KPX Y A -110
+
+KPX a y -30
+KPX a w -20
+KPX a v -20
+
+KPX b y -20
+KPX b v -20
+KPX b u -20
+KPX b period -40
+KPX b l -20
+KPX b comma -40
+KPX b b -10
+
+KPX c k -20
+KPX c comma -15
+
+KPX colon space -50
+
+KPX comma quoteright -100
+KPX comma quotedblright -100
+
+KPX e y -20
+KPX e x -30
+KPX e w -20
+KPX e v -30
+KPX e period -15
+KPX e comma -15
+
+KPX f quoteright 50
+KPX f quotedblright 60
+KPX f period -30
+KPX f o -30
+KPX f e -30
+KPX f dotlessi -28
+KPX f comma -30
+KPX f a -30
+
+KPX g r -10
+
+KPX h y -30
+
+KPX k o -20
+KPX k e -20
+
+KPX m y -15
+KPX m u -10
+
+KPX n y -15
+KPX n v -20
+KPX n u -10
+
+KPX o y -30
+KPX o x -30
+KPX o w -15
+KPX o v -15
+KPX o period -40
+KPX o comma -40
+
+KPX oslash z -55
+KPX oslash y -70
+KPX oslash x -85
+KPX oslash w -70
+KPX oslash v -70
+KPX oslash u -55
+KPX oslash t -55
+KPX oslash s -55
+KPX oslash r -55
+KPX oslash q -55
+KPX oslash period -95
+KPX oslash p -55
+KPX oslash o -55
+KPX oslash n -55
+KPX oslash m -55
+KPX oslash l -55
+KPX oslash k -55
+KPX oslash j -55
+KPX oslash i -55
+KPX oslash h -55
+KPX oslash g -55
+KPX oslash f -55
+KPX oslash e -55
+KPX oslash d -55
+KPX oslash comma -95
+KPX oslash c -55
+KPX oslash b -55
+KPX oslash a -55
+
+KPX p y -30
+KPX p period -35
+KPX p comma -35
+
+KPX period space -60
+KPX period quoteright -100
+KPX period quotedblright -100
+
+KPX quotedblright space -40
+
+KPX quoteleft quoteleft -57
+
+KPX quoteright space -70
+KPX quoteright s -50
+KPX quoteright r -50
+KPX quoteright quoteright -57
+KPX quoteright d -50
+
+KPX r y 30
+KPX r v 30
+KPX r u 15
+KPX r t 40
+KPX r semicolon 30
+KPX r period -50
+KPX r p 30
+KPX r n 25
+KPX r m 25
+KPX r l 15
+KPX r k 15
+KPX r i 15
+KPX r comma -50
+KPX r colon 30
+KPX r a -10
+
+KPX s w -30
+KPX s period -15
+KPX s comma -15
+
+KPX semicolon space -50
+
+KPX space quoteleft -60
+KPX space quotedblleft -30
+KPX space Y -90
+KPX space W -40
+KPX space V -50
+KPX space T -50
+
+KPX v period -80
+KPX v o -25
+KPX v e -25
+KPX v comma -80
+KPX v a -25
+
+KPX w period -60
+KPX w o -10
+KPX w e -10
+KPX w comma -60
+KPX w a -15
+
+KPX x e -30
+
+KPX y period -100
+KPX y o -20
+KPX y e -20
+KPX y comma -100
+KPX y a -20
+
+KPX z o -15
+KPX z e -15
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 171 195 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 171 195 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 171 195 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 171 195 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 167 175 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 171 195 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 160 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 171 195 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 171 195 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 171 195 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 171 195 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 12 195 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 12 195 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 12 195 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 12 195 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 202 195 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 217 195 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 217 195 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 217 195 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 217 195 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 217 195 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 171 195 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 194 195 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 194 195 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 194 195 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 194 195 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 171 195 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 171 195 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 148 195 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 92 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 92 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 92 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 92 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 92 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 84 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 69 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 92 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 92 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 92 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 92 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -22 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -22 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -22 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -22 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 84 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 92 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 92 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 92 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 92 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 92 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 69 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 92 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 92 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 92 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 92 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 69 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 69 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 69 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-O b/font/He-O
new file mode 100644
index 0000000..3d69eb7
--- /dev/null
+++ b/font/He-O
@@ -0,0 +1,612 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All rights reserved.
+Comment Creation Date: Thu Mar 15 10:24:18 1990
+Comment UniqueID 28362
+Comment VMusage 7572 42473
+FontName Helvetica-Oblique
+FullName Helvetica Oblique
+FamilyName Helvetica
+Weight Medium
+ItalicAngle -12
+IsFixedPitch false
+FontBBox -170 -225 1116 931
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.006
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All rights reserved.Helvetica is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 718
+XHeight 523
+Ascender 718
+Descender -207
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 90 0 340 718 ;
+C 34 ; WX 355 ; N quotedbl ; B 168 463 438 718 ;
+C 35 ; WX 556 ; N numbersign ; B 73 0 631 688 ;
+C 36 ; WX 556 ; N dollar ; B 69 -115 617 775 ;
+C 37 ; WX 889 ; N percent ; B 147 -19 889 703 ;
+C 38 ; WX 667 ; N ampersand ; B 77 -15 647 718 ;
+C 39 ; WX 222 ; N quoteright ; B 151 463 310 718 ;
+C 40 ; WX 333 ; N parenleft ; B 108 -207 454 733 ;
+C 41 ; WX 333 ; N parenright ; B -9 -207 337 733 ;
+C 42 ; WX 389 ; N asterisk ; B 165 431 475 718 ;
+C 43 ; WX 584 ; N plus ; B 85 0 606 505 ;
+C 44 ; WX 278 ; N comma ; B 56 -147 214 106 ;
+C 45 ; WX 333 ; N hyphen ; B 93 232 357 322 ;
+C 46 ; WX 278 ; N period ; B 87 0 214 106 ;
+C 47 ; WX 278 ; N slash ; B -21 -19 452 737 ;
+C 48 ; WX 556 ; N zero ; B 93 -19 608 703 ;
+C 49 ; WX 556 ; N one ; B 207 0 508 703 ;
+C 50 ; WX 556 ; N two ; B 26 0 617 703 ;
+C 51 ; WX 556 ; N three ; B 75 -19 610 703 ;
+C 52 ; WX 556 ; N four ; B 61 0 576 703 ;
+C 53 ; WX 556 ; N five ; B 68 -19 621 688 ;
+C 54 ; WX 556 ; N six ; B 91 -19 615 703 ;
+C 55 ; WX 556 ; N seven ; B 137 0 669 688 ;
+C 56 ; WX 556 ; N eight ; B 74 -19 607 703 ;
+C 57 ; WX 556 ; N nine ; B 82 -19 609 703 ;
+C 58 ; WX 278 ; N colon ; B 87 0 301 516 ;
+C 59 ; WX 278 ; N semicolon ; B 56 -147 301 516 ;
+C 60 ; WX 584 ; N less ; B 94 11 641 495 ;
+C 61 ; WX 584 ; N equal ; B 63 115 628 390 ;
+C 62 ; WX 584 ; N greater ; B 50 11 597 495 ;
+C 63 ; WX 556 ; N question ; B 161 0 610 727 ;
+C 64 ; WX 1015 ; N at ; B 215 -19 965 737 ;
+C 65 ; WX 667 ; N A ; B 14 0 654 718 ;
+C 66 ; WX 667 ; N B ; B 74 0 712 718 ;
+C 67 ; WX 722 ; N C ; B 108 -19 782 737 ;
+C 68 ; WX 722 ; N D ; B 81 0 764 718 ;
+C 69 ; WX 667 ; N E ; B 86 0 762 718 ;
+C 70 ; WX 611 ; N F ; B 86 0 736 718 ;
+C 71 ; WX 778 ; N G ; B 111 -19 799 737 ;
+C 72 ; WX 722 ; N H ; B 77 0 799 718 ;
+C 73 ; WX 278 ; N I ; B 91 0 341 718 ;
+C 74 ; WX 500 ; N J ; B 47 -19 581 718 ;
+C 75 ; WX 667 ; N K ; B 76 0 808 718 ;
+C 76 ; WX 556 ; N L ; B 76 0 555 718 ;
+C 77 ; WX 833 ; N M ; B 73 0 914 718 ;
+C 78 ; WX 722 ; N N ; B 76 0 799 718 ;
+C 79 ; WX 778 ; N O ; B 105 -19 826 737 ;
+C 80 ; WX 667 ; N P ; B 86 0 737 718 ;
+C 81 ; WX 778 ; N Q ; B 105 -56 826 737 ;
+C 82 ; WX 722 ; N R ; B 88 0 773 718 ;
+C 83 ; WX 667 ; N S ; B 90 -19 713 737 ;
+C 84 ; WX 611 ; N T ; B 148 0 750 718 ;
+C 85 ; WX 722 ; N U ; B 123 -19 797 718 ;
+C 86 ; WX 667 ; N V ; B 173 0 800 718 ;
+C 87 ; WX 944 ; N W ; B 169 0 1081 718 ;
+C 88 ; WX 667 ; N X ; B 19 0 790 718 ;
+C 89 ; WX 667 ; N Y ; B 167 0 806 718 ;
+C 90 ; WX 611 ; N Z ; B 23 0 741 718 ;
+C 91 ; WX 278 ; N bracketleft ; B 21 -196 403 722 ;
+C 92 ; WX 278 ; N backslash ; B 140 -19 291 737 ;
+C 93 ; WX 278 ; N bracketright ; B -14 -196 368 722 ;
+C 94 ; WX 469 ; N asciicircum ; B 42 264 539 688 ;
+C 95 ; WX 556 ; N underscore ; B -27 -125 540 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 165 470 323 725 ;
+C 97 ; WX 556 ; N a ; B 61 -15 559 538 ;
+C 98 ; WX 556 ; N b ; B 58 -15 584 718 ;
+C 99 ; WX 500 ; N c ; B 74 -15 553 538 ;
+C 100 ; WX 556 ; N d ; B 84 -15 652 718 ;
+C 101 ; WX 556 ; N e ; B 84 -15 578 538 ;
+C 102 ; WX 278 ; N f ; B 86 0 416 728 ; L i fi ; L l fl ;
+C 103 ; WX 556 ; N g ; B 42 -220 610 538 ;
+C 104 ; WX 556 ; N h ; B 65 0 573 718 ;
+C 105 ; WX 222 ; N i ; B 67 0 308 718 ;
+C 106 ; WX 222 ; N j ; B -60 -210 308 718 ;
+C 107 ; WX 500 ; N k ; B 67 0 600 718 ;
+C 108 ; WX 222 ; N l ; B 67 0 308 718 ;
+C 109 ; WX 833 ; N m ; B 65 0 852 538 ;
+C 110 ; WX 556 ; N n ; B 65 0 573 538 ;
+C 111 ; WX 556 ; N o ; B 83 -14 585 538 ;
+C 112 ; WX 556 ; N p ; B 14 -207 584 538 ;
+C 113 ; WX 556 ; N q ; B 84 -207 605 538 ;
+C 114 ; WX 333 ; N r ; B 77 0 446 538 ;
+C 115 ; WX 500 ; N s ; B 63 -15 529 538 ;
+C 116 ; WX 278 ; N t ; B 102 -7 368 669 ;
+C 117 ; WX 556 ; N u ; B 94 -15 600 523 ;
+C 118 ; WX 500 ; N v ; B 119 0 603 523 ;
+C 119 ; WX 722 ; N w ; B 125 0 820 523 ;
+C 120 ; WX 500 ; N x ; B 11 0 594 523 ;
+C 121 ; WX 500 ; N y ; B 15 -214 600 523 ;
+C 122 ; WX 500 ; N z ; B 31 0 571 523 ;
+C 123 ; WX 334 ; N braceleft ; B 92 -196 445 722 ;
+C 124 ; WX 260 ; N bar ; B 90 -19 324 737 ;
+C 125 ; WX 334 ; N braceright ; B 0 -196 354 722 ;
+C 126 ; WX 584 ; N asciitilde ; B 111 180 580 326 ;
+C 161 ; WX 333 ; N exclamdown ; B 77 -195 326 523 ;
+C 162 ; WX 556 ; N cent ; B 95 -115 584 623 ;
+C 163 ; WX 556 ; N sterling ; B 49 -16 634 718 ;
+C 164 ; WX 167 ; N fraction ; B -170 -19 482 703 ;
+C 165 ; WX 556 ; N yen ; B 81 0 699 688 ;
+C 166 ; WX 556 ; N florin ; B -52 -207 654 737 ;
+C 167 ; WX 556 ; N section ; B 76 -191 584 737 ;
+C 168 ; WX 556 ; N currency ; B 60 99 646 603 ;
+C 169 ; WX 191 ; N quotesingle ; B 157 463 285 718 ;
+C 170 ; WX 333 ; N quotedblleft ; B 138 470 461 725 ;
+C 171 ; WX 556 ; N guillemotleft ; B 146 108 554 446 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 137 108 340 446 ;
+C 173 ; WX 333 ; N guilsinglright ; B 111 108 314 446 ;
+C 174 ; WX 500 ; N fi ; B 86 0 587 728 ;
+C 175 ; WX 500 ; N fl ; B 86 0 585 728 ;
+C 177 ; WX 556 ; N endash ; B 51 240 623 313 ;
+C 178 ; WX 556 ; N dagger ; B 135 -159 622 718 ;
+C 179 ; WX 556 ; N daggerdbl ; B 52 -159 623 718 ;
+C 180 ; WX 278 ; N periodcentered ; B 129 190 257 315 ;
+C 182 ; WX 537 ; N paragraph ; B 126 -173 650 718 ;
+C 183 ; WX 350 ; N bullet ; B 91 202 413 517 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 21 -149 180 106 ;
+C 185 ; WX 333 ; N quotedblbase ; B -6 -149 318 106 ;
+C 186 ; WX 333 ; N quotedblright ; B 124 463 448 718 ;
+C 187 ; WX 556 ; N guillemotright ; B 120 108 528 446 ;
+C 188 ; WX 1000 ; N ellipsis ; B 115 0 908 106 ;
+C 189 ; WX 1000 ; N perthousand ; B 88 -19 1029 703 ;
+C 191 ; WX 611 ; N questiondown ; B 85 -201 534 525 ;
+C 193 ; WX 333 ; N grave ; B 170 593 337 734 ;
+C 194 ; WX 333 ; N acute ; B 248 593 475 734 ;
+C 195 ; WX 333 ; N circumflex ; B 147 593 438 734 ;
+C 196 ; WX 333 ; N tilde ; B 125 606 490 722 ;
+C 197 ; WX 333 ; N macron ; B 143 627 468 684 ;
+C 198 ; WX 333 ; N breve ; B 167 595 476 731 ;
+C 199 ; WX 333 ; N dotaccent ; B 249 604 362 706 ;
+C 200 ; WX 333 ; N dieresis ; B 168 604 443 706 ;
+C 202 ; WX 333 ; N ring ; B 214 572 402 756 ;
+C 203 ; WX 333 ; N cedilla ; B 2 -225 232 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 157 593 565 734 ;
+C 206 ; WX 333 ; N ogonek ; B 43 -225 249 0 ;
+C 207 ; WX 333 ; N caron ; B 177 593 468 734 ;
+C 208 ; WX 1000 ; N emdash ; B 51 240 1067 313 ;
+C 225 ; WX 1000 ; N AE ; B 8 0 1097 718 ;
+C 227 ; WX 370 ; N ordfeminine ; B 100 304 449 737 ;
+C 232 ; WX 556 ; N Lslash ; B 41 0 555 718 ;
+C 233 ; WX 778 ; N Oslash ; B 43 -19 890 737 ;
+C 234 ; WX 1000 ; N OE ; B 98 -19 1116 737 ;
+C 235 ; WX 365 ; N ordmasculine ; B 100 304 468 737 ;
+C 241 ; WX 889 ; N ae ; B 61 -15 909 538 ;
+C 245 ; WX 278 ; N dotlessi ; B 95 0 294 523 ;
+C 248 ; WX 222 ; N lslash ; B 41 0 347 718 ;
+C 249 ; WX 611 ; N oslash ; B 29 -22 647 545 ;
+C 250 ; WX 944 ; N oe ; B 83 -15 964 538 ;
+C 251 ; WX 611 ; N germandbls ; B 67 -15 658 728 ;
+C -1 ; WX 611 ; N Zcaron ; B 23 0 741 929 ;
+C -1 ; WX 500 ; N ccedilla ; B 74 -225 553 538 ;
+C -1 ; WX 500 ; N ydieresis ; B 15 -214 600 706 ;
+C -1 ; WX 556 ; N atilde ; B 61 -15 592 722 ;
+C -1 ; WX 278 ; N icircumflex ; B 95 0 411 734 ;
+C -1 ; WX 333 ; N threesuperior ; B 90 270 436 703 ;
+C -1 ; WX 556 ; N ecircumflex ; B 84 -15 578 734 ;
+C -1 ; WX 556 ; N thorn ; B 14 -207 584 718 ;
+C -1 ; WX 556 ; N egrave ; B 84 -15 578 734 ;
+C -1 ; WX 333 ; N twosuperior ; B 64 281 449 703 ;
+C -1 ; WX 556 ; N eacute ; B 84 -15 587 734 ;
+C -1 ; WX 556 ; N otilde ; B 83 -14 602 722 ;
+C -1 ; WX 667 ; N Aacute ; B 14 0 683 929 ;
+C -1 ; WX 556 ; N ocircumflex ; B 83 -14 585 734 ;
+C -1 ; WX 500 ; N yacute ; B 15 -214 600 734 ;
+C -1 ; WX 556 ; N udieresis ; B 94 -15 600 706 ;
+C -1 ; WX 834 ; N threequarters ; B 130 -19 861 703 ;
+C -1 ; WX 556 ; N acircumflex ; B 61 -15 559 734 ;
+C -1 ; WX 722 ; N Eth ; B 69 0 764 718 ;
+C -1 ; WX 556 ; N edieresis ; B 84 -15 578 706 ;
+C -1 ; WX 556 ; N ugrave ; B 94 -15 600 734 ;
+C -1 ; WX 1000 ; N trademark ; B 186 306 1056 718 ;
+C -1 ; WX 556 ; N ograve ; B 83 -14 585 734 ;
+C -1 ; WX 500 ; N scaron ; B 63 -15 552 734 ;
+C -1 ; WX 278 ; N Idieresis ; B 91 0 458 901 ;
+C -1 ; WX 556 ; N uacute ; B 94 -15 600 734 ;
+C -1 ; WX 556 ; N agrave ; B 61 -15 559 734 ;
+C -1 ; WX 556 ; N ntilde ; B 65 0 592 722 ;
+C -1 ; WX 556 ; N aring ; B 61 -15 559 756 ;
+C -1 ; WX 500 ; N zcaron ; B 31 0 571 734 ;
+C -1 ; WX 278 ; N Icircumflex ; B 91 0 452 929 ;
+C -1 ; WX 722 ; N Ntilde ; B 76 0 799 917 ;
+C -1 ; WX 556 ; N ucircumflex ; B 94 -15 600 734 ;
+C -1 ; WX 667 ; N Ecircumflex ; B 86 0 762 929 ;
+C -1 ; WX 278 ; N Iacute ; B 91 0 489 929 ;
+C -1 ; WX 722 ; N Ccedilla ; B 108 -225 782 737 ;
+C -1 ; WX 778 ; N Odieresis ; B 105 -19 826 901 ;
+C -1 ; WX 667 ; N Scaron ; B 90 -19 713 929 ;
+C -1 ; WX 667 ; N Edieresis ; B 86 0 762 901 ;
+C -1 ; WX 278 ; N Igrave ; B 91 0 351 929 ;
+C -1 ; WX 556 ; N adieresis ; B 61 -15 559 706 ;
+C -1 ; WX 778 ; N Ograve ; B 105 -19 826 929 ;
+C -1 ; WX 667 ; N Egrave ; B 86 0 762 929 ;
+C -1 ; WX 667 ; N Ydieresis ; B 167 0 806 901 ;
+C -1 ; WX 737 ; N registered ; B 54 -19 837 737 ;
+C -1 ; WX 778 ; N Otilde ; B 105 -19 826 917 ;
+C -1 ; WX 834 ; N onequarter ; B 150 -19 802 703 ;
+C -1 ; WX 722 ; N Ugrave ; B 123 -19 797 929 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 123 -19 797 929 ;
+C -1 ; WX 667 ; N Thorn ; B 86 0 712 718 ;
+C -1 ; WX 584 ; N divide ; B 85 -19 606 524 ;
+C -1 ; WX 667 ; N Atilde ; B 14 0 699 917 ;
+C -1 ; WX 722 ; N Uacute ; B 123 -19 797 929 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 105 -19 826 929 ;
+C -1 ; WX 584 ; N logicalnot ; B 106 108 628 390 ;
+C -1 ; WX 667 ; N Aring ; B 14 0 654 931 ;
+C -1 ; WX 278 ; N idieresis ; B 95 0 416 706 ;
+C -1 ; WX 278 ; N iacute ; B 95 0 448 734 ;
+C -1 ; WX 556 ; N aacute ; B 61 -15 587 734 ;
+C -1 ; WX 584 ; N plusminus ; B 39 0 618 506 ;
+C -1 ; WX 584 ; N multiply ; B 50 0 642 506 ;
+C -1 ; WX 722 ; N Udieresis ; B 123 -19 797 901 ;
+C -1 ; WX 584 ; N minus ; B 85 216 606 289 ;
+C -1 ; WX 333 ; N onesuperior ; B 166 281 371 703 ;
+C -1 ; WX 667 ; N Eacute ; B 86 0 762 929 ;
+C -1 ; WX 667 ; N Acircumflex ; B 14 0 654 929 ;
+C -1 ; WX 737 ; N copyright ; B 54 -19 837 737 ;
+C -1 ; WX 667 ; N Agrave ; B 14 0 654 929 ;
+C -1 ; WX 556 ; N odieresis ; B 83 -14 585 706 ;
+C -1 ; WX 556 ; N oacute ; B 83 -14 587 734 ;
+C -1 ; WX 400 ; N degree ; B 169 411 468 703 ;
+C -1 ; WX 278 ; N igrave ; B 95 0 310 734 ;
+C -1 ; WX 556 ; N mu ; B 24 -207 600 523 ;
+C -1 ; WX 778 ; N Oacute ; B 105 -19 826 929 ;
+C -1 ; WX 556 ; N eth ; B 81 -15 617 737 ;
+C -1 ; WX 667 ; N Adieresis ; B 14 0 654 901 ;
+C -1 ; WX 667 ; N Yacute ; B 167 0 806 929 ;
+C -1 ; WX 260 ; N brokenbar ; B 90 -19 324 737 ;
+C -1 ; WX 834 ; N onehalf ; B 114 -19 839 703 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 250
+
+KPX A y -40
+KPX A w -40
+KPX A v -40
+KPX A u -30
+KPX A Y -100
+KPX A W -50
+KPX A V -70
+KPX A U -50
+KPX A T -120
+KPX A Q -30
+KPX A O -30
+KPX A G -30
+KPX A C -30
+
+KPX B period -20
+KPX B comma -20
+KPX B U -10
+
+KPX C period -30
+KPX C comma -30
+
+KPX D period -70
+KPX D comma -70
+KPX D Y -90
+KPX D W -40
+KPX D V -70
+KPX D A -40
+
+KPX F r -45
+KPX F period -150
+KPX F o -30
+KPX F e -30
+KPX F comma -150
+KPX F a -50
+KPX F A -80
+
+KPX J u -20
+KPX J period -30
+KPX J comma -30
+KPX J a -20
+KPX J A -20
+
+KPX K y -50
+KPX K u -30
+KPX K o -40
+KPX K e -40
+KPX K O -50
+
+KPX L y -30
+KPX L quoteright -160
+KPX L quotedblright -140
+KPX L Y -140
+KPX L W -70
+KPX L V -110
+KPX L T -110
+
+KPX O period -40
+KPX O comma -40
+KPX O Y -70
+KPX O X -60
+KPX O W -30
+KPX O V -50
+KPX O T -40
+KPX O A -20
+
+KPX P period -180
+KPX P o -50
+KPX P e -50
+KPX P comma -180
+KPX P a -40
+KPX P A -120
+
+KPX Q U -10
+
+KPX R Y -50
+KPX R W -30
+KPX R V -50
+KPX R U -40
+KPX R T -30
+KPX R O -20
+
+KPX S period -20
+KPX S comma -20
+
+KPX T y -120
+KPX T w -120
+KPX T u -120
+KPX T semicolon -20
+KPX T r -120
+KPX T period -120
+KPX T o -120
+KPX T hyphen -140
+KPX T e -120
+KPX T comma -120
+KPX T colon -20
+KPX T a -120
+KPX T O -40
+KPX T A -120
+
+KPX U period -40
+KPX U comma -40
+KPX U A -40
+
+KPX V u -70
+KPX V semicolon -40
+KPX V period -125
+KPX V o -80
+KPX V hyphen -80
+KPX V e -80
+KPX V comma -125
+KPX V colon -40
+KPX V a -70
+KPX V O -40
+KPX V G -40
+KPX V A -80
+
+KPX W y -20
+KPX W u -30
+KPX W period -80
+KPX W o -30
+KPX W hyphen -40
+KPX W e -30
+KPX W comma -80
+KPX W a -40
+KPX W O -20
+KPX W A -50
+
+KPX Y u -110
+KPX Y semicolon -60
+KPX Y period -140
+KPX Y o -140
+KPX Y i -20
+KPX Y hyphen -140
+KPX Y e -140
+KPX Y comma -140
+KPX Y colon -60
+KPX Y a -140
+KPX Y O -85
+KPX Y A -110
+
+KPX a y -30
+KPX a w -20
+KPX a v -20
+
+KPX b y -20
+KPX b v -20
+KPX b u -20
+KPX b period -40
+KPX b l -20
+KPX b comma -40
+KPX b b -10
+
+KPX c k -20
+KPX c comma -15
+
+KPX colon space -50
+
+KPX comma quoteright -100
+KPX comma quotedblright -100
+
+KPX e y -20
+KPX e x -30
+KPX e w -20
+KPX e v -30
+KPX e period -15
+KPX e comma -15
+
+KPX f quoteright 50
+KPX f quotedblright 60
+KPX f period -30
+KPX f o -30
+KPX f e -30
+KPX f dotlessi -28
+KPX f comma -30
+KPX f a -30
+
+KPX g r -10
+
+KPX h y -30
+
+KPX k o -20
+KPX k e -20
+
+KPX m y -15
+KPX m u -10
+
+KPX n y -15
+KPX n v -20
+KPX n u -10
+
+KPX o y -30
+KPX o x -30
+KPX o w -15
+KPX o v -15
+KPX o period -40
+KPX o comma -40
+
+KPX oslash z -55
+KPX oslash y -70
+KPX oslash x -85
+KPX oslash w -70
+KPX oslash v -70
+KPX oslash u -55
+KPX oslash t -55
+KPX oslash s -55
+KPX oslash r -55
+KPX oslash q -55
+KPX oslash period -95
+KPX oslash p -55
+KPX oslash o -55
+KPX oslash n -55
+KPX oslash m -55
+KPX oslash l -55
+KPX oslash k -55
+KPX oslash j -55
+KPX oslash i -55
+KPX oslash h -55
+KPX oslash g -55
+KPX oslash f -55
+KPX oslash e -55
+KPX oslash d -55
+KPX oslash comma -95
+KPX oslash c -55
+KPX oslash b -55
+KPX oslash a -55
+
+KPX p y -30
+KPX p period -35
+KPX p comma -35
+
+KPX period space -60
+KPX period quoteright -100
+KPX period quotedblright -100
+
+KPX quotedblright space -40
+
+KPX quoteleft quoteleft -57
+
+KPX quoteright space -70
+KPX quoteright s -50
+KPX quoteright r -50
+KPX quoteright quoteright -57
+KPX quoteright d -50
+
+KPX r y 30
+KPX r v 30
+KPX r u 15
+KPX r t 40
+KPX r semicolon 30
+KPX r period -50
+KPX r p 30
+KPX r n 25
+KPX r m 25
+KPX r l 15
+KPX r k 15
+KPX r i 15
+KPX r comma -50
+KPX r colon 30
+KPX r a -10
+
+KPX s w -30
+KPX s period -15
+KPX s comma -15
+
+KPX semicolon space -50
+
+KPX space quoteleft -60
+KPX space quotedblleft -30
+KPX space Y -90
+KPX space W -40
+KPX space V -50
+KPX space T -50
+
+KPX v period -80
+KPX v o -25
+KPX v e -25
+KPX v comma -80
+KPX v a -25
+
+KPX w period -60
+KPX w o -10
+KPX w e -10
+KPX w comma -60
+KPX w a -15
+
+KPX x e -30
+
+KPX y period -100
+KPX y o -20
+KPX y e -20
+KPX y comma -100
+KPX y a -20
+
+KPX z o -15
+KPX z e -15
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 208 195 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 208 195 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 208 195 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 208 195 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 204 175 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 208 195 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 195 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 208 195 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 208 195 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 208 195 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 208 195 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 14 195 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 14 195 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 14 195 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 14 195 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 246 195 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 264 195 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 264 195 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 264 195 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 264 195 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 264 195 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 208 195 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 236 195 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 236 195 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 236 195 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 236 195 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 208 195 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 208 195 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 180 195 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 112 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 112 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 112 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 112 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 112 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 102 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 84 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 112 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 112 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 112 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 112 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -27 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 102 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 112 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 112 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 112 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 112 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 112 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 84 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 112 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 112 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 112 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 112 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 84 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 84 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 84 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/He-UlCm b/font/He-UlCm
new file mode 100644
index 0000000..4dd03b4
--- /dev/null
+++ b/font/He-UlCm
@@ -0,0 +1,417 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1988, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Fri Dec 13 16:24:33 1991
+Comment UniqueID 37160
+Comment VMusage 24329 31221
+FontName Helvetica-UltraCompressed
+FullName Helvetica Ultra Compressed
+FamilyName Helvetica
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -167 -250 1000 925
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.002
+Notice Copyright (c) 1988, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.Helvetica is a trademark of Linotype-Hell AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 712
+XHeight 572
+Ascender 712
+Descender -128
+StartCharMetrics 228
+C 32 ; WX 166 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 204 ; N exclam ; B 52 0 152 712 ;
+C 34 ; WX 333 ; N quotedbl ; B 47 441 285 712 ;
+C 35 ; WX 333 ; N numbersign ; B -34 0 367 712 ;
+C 36 ; WX 333 ; N dollar ; B 26 -51 306 740 ;
+C 37 ; WX 500 ; N percent ; B 16 -8 484 720 ;
+C 38 ; WX 389 ; N ampersand ; B 32 -14 380 726 ;
+C 39 ; WX 167 ; N quoteright ; B 28 503 154 712 ;
+C 40 ; WX 167 ; N parenleft ; B 13 -97 190 712 ;
+C 41 ; WX 167 ; N parenright ; B -23 -97 154 712 ;
+C 42 ; WX 315 ; N asterisk ; B 15 454 300 712 ;
+C 43 ; WX 500 ; N plus ; B 5 41 495 531 ;
+C 44 ; WX 166 ; N comma ; B 15 -125 147 111 ;
+C 45 ; WX 166 ; N hyphen ; B 20 264 147 336 ;
+C 46 ; WX 166 ; N period ; B 33 0 133 111 ;
+C 47 ; WX 278 ; N slash ; B -10 -14 287 726 ;
+C 48 ; WX 333 ; N zero ; B 28 -8 305 720 ;
+C 49 ; WX 333 ; N one ; B 48 0 232 712 ;
+C 50 ; WX 333 ; N two ; B 28 0 305 720 ;
+C 51 ; WX 333 ; N three ; B 28 -8 305 720 ;
+C 52 ; WX 333 ; N four ; B 6 0 327 712 ;
+C 53 ; WX 333 ; N five ; B 28 -8 305 712 ;
+C 54 ; WX 333 ; N six ; B 28 -8 305 720 ;
+C 55 ; WX 333 ; N seven ; B 20 0 314 712 ;
+C 56 ; WX 333 ; N eight ; B 28 -8 305 720 ;
+C 57 ; WX 333 ; N nine ; B 28 -2 305 726 ;
+C 58 ; WX 166 ; N colon ; B 33 0 133 521 ;
+C 59 ; WX 166 ; N semicolon ; B 8 -125 140 521 ;
+C 60 ; WX 500 ; N less ; B 32 62 469 510 ;
+C 61 ; WX 500 ; N equal ; B 5 140 495 432 ;
+C 62 ; WX 500 ; N greater ; B 31 61 468 510 ;
+C 63 ; WX 333 ; N question ; B 44 0 289 726 ;
+C 64 ; WX 800 ; N at ; B 42 -14 757 726 ;
+C 65 ; WX 333 ; N A ; B 6 0 327 712 ;
+C 66 ; WX 333 ; N B ; B 28 0 305 712 ;
+C 67 ; WX 333 ; N C ; B 28 -14 305 726 ;
+C 68 ; WX 333 ; N D ; B 28 0 305 712 ;
+C 69 ; WX 278 ; N E ; B 31 0 269 712 ;
+C 70 ; WX 278 ; N F ; B 31 0 269 712 ;
+C 71 ; WX 333 ; N G ; B 28 -14 305 726 ;
+C 72 ; WX 333 ; N H ; B 31 0 302 712 ;
+C 73 ; WX 167 ; N I ; B 30 0 136 712 ;
+C 74 ; WX 333 ; N J ; B 31 -14 302 712 ;
+C 75 ; WX 333 ; N K ; B 31 0 326 712 ;
+C 76 ; WX 278 ; N L ; B 31 0 272 712 ;
+C 77 ; WX 481 ; N M ; B 36 0 445 712 ;
+C 78 ; WX 389 ; N N ; B 31 0 358 712 ;
+C 79 ; WX 333 ; N O ; B 28 -14 305 726 ;
+C 80 ; WX 333 ; N P ; B 28 0 305 712 ;
+C 81 ; WX 333 ; N Q ; B 28 -79 315 726 ;
+C 82 ; WX 333 ; N R ; B 28 0 318 712 ;
+C 83 ; WX 333 ; N S ; B 28 -14 305 726 ;
+C 84 ; WX 315 ; N T ; B 12 0 303 712 ;
+C 85 ; WX 333 ; N U ; B 28 -14 305 712 ;
+C 86 ; WX 333 ; N V ; B 4 0 328 712 ;
+C 87 ; WX 481 ; N W ; B 10 0 470 712 ;
+C 88 ; WX 333 ; N X ; B 1 0 332 712 ;
+C 89 ; WX 333 ; N Y ; B 4 0 328 712 ;
+C 90 ; WX 259 ; N Z ; B 11 0 247 712 ;
+C 91 ; WX 222 ; N bracketleft ; B 30 -97 208 712 ;
+C 92 ; WX 278 ; N backslash ; B -57 -14 335 726 ;
+C 93 ; WX 222 ; N bracketright ; B 14 -97 192 712 ;
+C 94 ; WX 500 ; N asciicircum ; B 10 308 490 712 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 167 ; N quoteleft ; B 13 503 139 712 ;
+C 97 ; WX 278 ; N a ; B 20 -7 258 579 ;
+C 98 ; WX 278 ; N b ; B 20 -7 258 712 ;
+C 99 ; WX 278 ; N c ; B 20 -7 258 579 ;
+C 100 ; WX 278 ; N d ; B 20 -7 258 712 ;
+C 101 ; WX 278 ; N e ; B 20 -7 258 579 ;
+C 102 ; WX 167 ; N f ; B 5 0 161 712 ; L i fi ; L l fl ;
+C 103 ; WX 278 ; N g ; B 20 -128 258 579 ;
+C 104 ; WX 278 ; N h ; B 20 0 258 712 ;
+C 105 ; WX 148 ; N i ; B 26 0 122 712 ;
+C 106 ; WX 148 ; N j ; B -17 -128 122 712 ;
+C 107 ; WX 278 ; N k ; B 22 0 273 712 ;
+C 108 ; WX 148 ; N l ; B 26 0 122 712 ;
+C 109 ; WX 426 ; N m ; B 25 0 401 579 ;
+C 110 ; WX 278 ; N n ; B 20 0 258 579 ;
+C 111 ; WX 278 ; N o ; B 20 -7 258 579 ;
+C 112 ; WX 278 ; N p ; B 20 -128 258 579 ;
+C 113 ; WX 278 ; N q ; B 20 -128 258 579 ;
+C 114 ; WX 278 ; N r ; B 20 0 258 579 ;
+C 115 ; WX 278 ; N s ; B 20 -7 258 579 ;
+C 116 ; WX 167 ; N t ; B 6 0 161 675 ;
+C 117 ; WX 278 ; N u ; B 20 -7 258 572 ;
+C 118 ; WX 278 ; N v ; B 2 0 275 572 ;
+C 119 ; WX 444 ; N w ; B 3 0 440 572 ;
+C 120 ; WX 259 ; N x ; B 4 0 255 572 ;
+C 121 ; WX 278 ; N y ; B 4 -128 273 572 ;
+C 122 ; WX 222 ; N z ; B 4 0 217 572 ;
+C 123 ; WX 333 ; N braceleft ; B 37 -97 314 712 ;
+C 124 ; WX 222 ; N bar ; B 67 -250 155 750 ;
+C 125 ; WX 333 ; N braceright ; B 19 -97 296 712 ;
+C 126 ; WX 500 ; N asciitilde ; B 19 205 481 365 ;
+C 161 ; WX 204 ; N exclamdown ; B 52 -112 152 598 ;
+C 162 ; WX 333 ; N cent ; B 51 -83 289 648 ;
+C 163 ; WX 333 ; N sterling ; B 19 -4 322 720 ;
+C 164 ; WX 167 ; N fraction ; B -167 -8 334 720 ;
+C 165 ; WX 333 ; N yen ; B 4 0 328 712 ;
+C 166 ; WX 333 ; N florin ; B -1 -128 334 720 ;
+C 167 ; WX 333 ; N section ; B 23 -128 310 726 ;
+C 168 ; WX 333 ; N currency ; B 25 253 309 536 ;
+C 169 ; WX 222 ; N quotesingle ; B 67 441 155 712 ;
+C 170 ; WX 315 ; N quotedblleft ; B 20 503 276 712 ;
+C 171 ; WX 333 ; N guillemotleft ; B 16 68 316 501 ;
+C 172 ; WX 185 ; N guilsinglleft ; B 24 68 161 501 ;
+C 173 ; WX 185 ; N guilsinglright ; B 24 68 161 501 ;
+C 174 ; WX 315 ; N fi ; B 5 0 296 712 ;
+C 175 ; WX 315 ; N fl ; B 5 0 296 712 ;
+C 177 ; WX 500 ; N endash ; B 0 266 500 333 ;
+C 178 ; WX 333 ; N dagger ; B 10 -116 323 712 ;
+C 179 ; WX 333 ; N daggerdbl ; B 10 -116 323 712 ;
+C 180 ; WX 166 ; N periodcentered ; B 30 232 137 339 ;
+C 182 ; WX 600 ; N paragraph ; B 27 -179 566 712 ;
+C 183 ; WX 500 ; N bullet ; B 75 175 425 525 ;
+C 184 ; WX 167 ; N quotesinglbase ; B 28 -98 154 111 ;
+C 185 ; WX 315 ; N quotedblbase ; B 39 -98 295 111 ;
+C 186 ; WX 315 ; N quotedblright ; B 39 503 295 712 ;
+C 187 ; WX 333 ; N guillemotright ; B 16 68 316 501 ;
+C 188 ; WX 1000 ; N ellipsis ; B 116 0 884 111 ;
+C 189 ; WX 778 ; N perthousand ; B 33 -8 753 720 ;
+C 191 ; WX 333 ; N questiondown ; B 44 -128 289 598 ;
+C 193 ; WX 148 ; N grave ; B -51 633 141 804 ;
+C 194 ; WX 148 ; N acute ; B 7 633 199 804 ;
+C 195 ; WX 148 ; N circumflex ; B -53 633 201 804 ;
+C 196 ; WX 148 ; N tilde ; B -55 656 211 774 ;
+C 197 ; WX 148 ; N macron ; B -40 677 189 741 ;
+C 198 ; WX 148 ; N breve ; B -50 652 199 778 ;
+C 199 ; WX 148 ; N dotaccent ; B 29 666 119 763 ;
+C 200 ; WX 148 ; N dieresis ; B -41 666 189 763 ;
+C 202 ; WX 148 ; N ring ; B -9 626 157 796 ;
+C 203 ; WX 148 ; N cedilla ; B -34 -207 176 -6 ;
+C 205 ; WX 148 ; N hungarumlaut ; B -57 633 262 804 ;
+C 206 ; WX 148 ; N ogonek ; B -24 -207 187 0 ;
+C 207 ; WX 148 ; N caron ; B -53 633 201 804 ;
+C 208 ; WX 1000 ; N emdash ; B 0 266 1000 333 ;
+C 225 ; WX 481 ; N AE ; B 0 0 472 712 ;
+C 227 ; WX 167 ; N ordfeminine ; B 6 375 160 726 ;
+C 232 ; WX 278 ; N Lslash ; B -6 0 272 712 ;
+C 233 ; WX 333 ; N Oslash ; B -2 -45 335 748 ;
+C 234 ; WX 444 ; N OE ; B 27 -14 442 726 ;
+C 235 ; WX 167 ; N ordmasculine ; B 6 375 160 726 ;
+C 241 ; WX 426 ; N ae ; B 23 -7 403 579 ;
+C 245 ; WX 148 ; N dotlessi ; B 26 0 122 572 ;
+C 248 ; WX 148 ; N lslash ; B -10 0 158 712 ;
+C 249 ; WX 278 ; N oslash ; B 1 -36 280 609 ;
+C 250 ; WX 426 ; N oe ; B 23 -7 403 579 ;
+C 251 ; WX 278 ; N germandbls ; B 20 -8 262 712 ;
+C -1 ; WX 278 ; N ecircumflex ; B 12 -7 266 804 ;
+C -1 ; WX 278 ; N edieresis ; B 20 -7 258 763 ;
+C -1 ; WX 278 ; N aacute ; B 20 -7 264 804 ;
+C -1 ; WX 800 ; N registered ; B 22 -14 778 726 ;
+C -1 ; WX 148 ; N icircumflex ; B -53 0 201 804 ;
+C -1 ; WX 278 ; N udieresis ; B 20 -7 258 763 ;
+C -1 ; WX 278 ; N ograve ; B 14 -7 258 804 ;
+C -1 ; WX 278 ; N uacute ; B 20 -7 264 804 ;
+C -1 ; WX 278 ; N ucircumflex ; B 12 -7 266 804 ;
+C -1 ; WX 333 ; N Aacute ; B 6 0 327 925 ;
+C -1 ; WX 148 ; N igrave ; B -51 0 141 804 ;
+C -1 ; WX 167 ; N Icircumflex ; B -43 0 211 925 ;
+C -1 ; WX 278 ; N ccedilla ; B 20 -207 258 579 ;
+C -1 ; WX 278 ; N adieresis ; B 20 -7 258 763 ;
+C -1 ; WX 278 ; N Ecircumflex ; B 12 0 269 925 ;
+C -1 ; WX 278 ; N scaron ; B 12 -7 266 804 ;
+C -1 ; WX 278 ; N thorn ; B 20 -128 258 712 ;
+C -1 ; WX 990 ; N trademark ; B 51 300 939 712 ;
+C -1 ; WX 278 ; N egrave ; B 14 -7 258 804 ;
+C -1 ; WX 199 ; N threesuperior ; B 11 283 191 720 ;
+C -1 ; WX 222 ; N zcaron ; B -16 0 238 804 ;
+C -1 ; WX 278 ; N atilde ; B 10 -7 276 774 ;
+C -1 ; WX 278 ; N aring ; B 20 -7 258 796 ;
+C -1 ; WX 278 ; N ocircumflex ; B 12 -7 266 804 ;
+C -1 ; WX 278 ; N Edieresis ; B 24 0 269 884 ;
+C -1 ; WX 499 ; N threequarters ; B 16 -8 485 720 ;
+C -1 ; WX 278 ; N ydieresis ; B 4 -128 273 763 ;
+C -1 ; WX 278 ; N yacute ; B 4 -128 273 804 ;
+C -1 ; WX 148 ; N iacute ; B 7 0 199 804 ;
+C -1 ; WX 333 ; N Acircumflex ; B 6 0 327 925 ;
+C -1 ; WX 333 ; N Uacute ; B 28 -14 305 925 ;
+C -1 ; WX 278 ; N eacute ; B 20 -7 264 804 ;
+C -1 ; WX 333 ; N Ograve ; B 28 -14 305 925 ;
+C -1 ; WX 278 ; N agrave ; B 14 -7 258 804 ;
+C -1 ; WX 333 ; N Udieresis ; B 28 -14 305 884 ;
+C -1 ; WX 278 ; N acircumflex ; B 12 -7 266 804 ;
+C -1 ; WX 167 ; N Igrave ; B -41 0 151 925 ;
+C -1 ; WX 199 ; N twosuperior ; B 11 288 191 720 ;
+C -1 ; WX 333 ; N Ugrave ; B 28 -14 305 925 ;
+C -1 ; WX 499 ; N onequarter ; B 24 -8 475 720 ;
+C -1 ; WX 333 ; N Ucircumflex ; B 28 -14 305 925 ;
+C -1 ; WX 333 ; N Scaron ; B 28 -14 305 925 ;
+C -1 ; WX 167 ; N Idieresis ; B -31 0 199 884 ;
+C -1 ; WX 148 ; N idieresis ; B -41 0 189 763 ;
+C -1 ; WX 278 ; N Egrave ; B 14 0 269 925 ;
+C -1 ; WX 333 ; N Oacute ; B 28 -14 305 925 ;
+C -1 ; WX 500 ; N divide ; B 5 0 495 572 ;
+C -1 ; WX 333 ; N Atilde ; B 6 0 327 895 ;
+C -1 ; WX 333 ; N Aring ; B 6 0 327 917 ;
+C -1 ; WX 333 ; N Odieresis ; B 28 -14 305 884 ;
+C -1 ; WX 333 ; N Adieresis ; B 6 0 327 884 ;
+C -1 ; WX 389 ; N Ntilde ; B 31 0 358 895 ;
+C -1 ; WX 259 ; N Zcaron ; B 3 0 257 925 ;
+C -1 ; WX 333 ; N Thorn ; B 28 0 305 712 ;
+C -1 ; WX 167 ; N Iacute ; B 17 0 209 925 ;
+C -1 ; WX 500 ; N plusminus ; B 5 41 495 531 ;
+C -1 ; WX 500 ; N multiply ; B 5 21 495 514 ;
+C -1 ; WX 278 ; N Eacute ; B 31 0 269 925 ;
+C -1 ; WX 333 ; N Ydieresis ; B 4 0 328 884 ;
+C -1 ; WX 199 ; N onesuperior ; B 19 288 139 715 ;
+C -1 ; WX 278 ; N ugrave ; B 14 -7 258 804 ;
+C -1 ; WX 500 ; N logicalnot ; B 5 154 495 432 ;
+C -1 ; WX 278 ; N ntilde ; B 10 0 276 774 ;
+C -1 ; WX 333 ; N Otilde ; B 28 -14 305 895 ;
+C -1 ; WX 278 ; N otilde ; B 10 -7 276 774 ;
+C -1 ; WX 333 ; N Ccedilla ; B 28 -207 305 726 ;
+C -1 ; WX 333 ; N Agrave ; B 6 0 327 925 ;
+C -1 ; WX 499 ; N onehalf ; B 18 -8 481 720 ;
+C -1 ; WX 333 ; N Eth ; B -6 0 305 712 ;
+C -1 ; WX 400 ; N degree ; B 54 420 346 712 ;
+C -1 ; WX 333 ; N Yacute ; B 4 0 328 925 ;
+C -1 ; WX 333 ; N Ocircumflex ; B 28 -14 305 925 ;
+C -1 ; WX 278 ; N oacute ; B 20 -7 264 804 ;
+C -1 ; WX 278 ; N mu ; B 20 -128 258 572 ;
+C -1 ; WX 500 ; N minus ; B 5 242 495 330 ;
+C -1 ; WX 278 ; N eth ; B 20 -7 258 751 ;
+C -1 ; WX 278 ; N odieresis ; B 20 -7 258 763 ;
+C -1 ; WX 800 ; N copyright ; B 22 -14 778 726 ;
+C -1 ; WX 222 ; N brokenbar ; B 67 -175 155 675 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 88
+
+KPX A y -37
+KPX A w -37
+KPX A v -37
+KPX A quoteright -74
+KPX A Y -55
+KPX A W -37
+KPX A V -37
+KPX A T -55
+
+KPX F period -129
+KPX F comma -129
+KPX F A -37
+
+KPX L y -37
+KPX L quoteright -129
+KPX L Y -74
+KPX L W -55
+KPX L V -55
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -92
+KPX T w -92
+KPX T u -92
+KPX T semicolon -92
+KPX T s -92
+KPX T r -92
+KPX T period -92
+KPX T o -92
+KPX T i -92
+KPX T hyphen -92
+KPX T e -92
+KPX T comma -92
+KPX T colon -92
+KPX T c -92
+KPX T a -92
+KPX T A -55
+
+KPX V u -18
+KPX V semicolon -18
+KPX V r -18
+KPX V period -74
+KPX V o -18
+KPX V i -18
+KPX V hyphen -37
+KPX V e -18
+KPX V comma -74
+KPX V colon -18
+KPX V a -18
+KPX V A -37
+
+KPX W semicolon -18
+KPX W period -74
+KPX W o -18
+KPX W hyphen -37
+KPX W e -18
+KPX W comma -74
+KPX W colon -18
+KPX W a -18
+KPX W A -37
+
+KPX Y v -37
+KPX Y u -37
+KPX Y semicolon -55
+KPX Y q -37
+KPX Y period -111
+KPX Y p -37
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -92
+KPX Y e -55
+KPX Y comma -92
+KPX Y colon -55
+KPX Y a -37
+KPX Y A -55
+
+KPX quoteleft quoteleft -37
+
+KPX quoteright t -18
+KPX quoteright s -74
+KPX quoteright quoteright -37
+
+KPX r period -129
+KPX r hyphen -18
+KPX r comma -129
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -74
+KPX y comma -74
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 93 121 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 93 121 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 93 121 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 93 121 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 93 121 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 93 121 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 65 121 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 65 121 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 65 121 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 65 121 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 10 121 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 10 121 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 10 121 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 10 121 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 121 121 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 93 121 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 93 121 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 93 121 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 93 121 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 93 121 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 93 121 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 93 121 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 93 121 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 93 121 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 93 121 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 93 121 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 93 121 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 56 121 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 65 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 65 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 65 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 65 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 65 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 65 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 65 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 65 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 65 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 65 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 65 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 65 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 65 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 65 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 65 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 65 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 65 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 65 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 65 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 65 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 65 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 65 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 65 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 37 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/NCS-Bd b/font/NCS-Bd
new file mode 100644
index 0000000..ba1fed6
--- /dev/null
+++ b/font/NCS-Bd
@@ -0,0 +1,472 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1988, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue May 28 16:48:12 1991
+Comment UniqueID 35031
+Comment VMusage 30773 37665
+FontName NewCenturySchlbk-Bold
+FullName New Century Schoolbook Bold
+FamilyName New Century Schoolbook
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -165 -250 1000 988
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.009
+Notice Copyright (c) 1985, 1987, 1988, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+EncodingScheme AdobeStandardEncoding
+CapHeight 722
+XHeight 475
+Ascender 737
+Descender -205
+StartCharMetrics 228
+C 32 ; WX 287 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 296 ; N exclam ; B 53 -15 243 737 ;
+C 34 ; WX 333 ; N quotedbl ; B 0 378 333 737 ;
+C 35 ; WX 574 ; N numbersign ; B 36 0 538 690 ;
+C 36 ; WX 574 ; N dollar ; B 25 -141 549 810 ;
+C 37 ; WX 833 ; N percent ; B 14 -15 819 705 ;
+C 38 ; WX 852 ; N ampersand ; B 34 -15 818 737 ;
+C 39 ; WX 241 ; N quoteright ; B 22 378 220 737 ;
+C 40 ; WX 389 ; N parenleft ; B 77 -117 345 745 ;
+C 41 ; WX 389 ; N parenright ; B 44 -117 312 745 ;
+C 42 ; WX 500 ; N asterisk ; B 54 302 446 737 ;
+C 43 ; WX 606 ; N plus ; B 50 0 556 506 ;
+C 44 ; WX 278 ; N comma ; B 40 -184 238 175 ;
+C 45 ; WX 333 ; N hyphen ; B 42 174 291 302 ;
+C 46 ; WX 278 ; N period ; B 44 -15 234 175 ;
+C 47 ; WX 278 ; N slash ; B -42 -15 320 737 ;
+C 48 ; WX 574 ; N zero ; B 27 -15 547 705 ;
+C 49 ; WX 574 ; N one ; B 83 0 491 705 ;
+C 50 ; WX 574 ; N two ; B 19 0 531 705 ;
+C 51 ; WX 574 ; N three ; B 23 -15 531 705 ;
+C 52 ; WX 574 ; N four ; B 19 0 547 705 ;
+C 53 ; WX 574 ; N five ; B 32 -15 534 705 ;
+C 54 ; WX 574 ; N six ; B 27 -15 547 705 ;
+C 55 ; WX 574 ; N seven ; B 45 -15 547 705 ;
+C 56 ; WX 574 ; N eight ; B 27 -15 548 705 ;
+C 57 ; WX 574 ; N nine ; B 27 -15 547 705 ;
+C 58 ; WX 278 ; N colon ; B 44 -15 234 485 ;
+C 59 ; WX 278 ; N semicolon ; B 40 -184 238 485 ;
+C 60 ; WX 606 ; N less ; B 50 -9 556 515 ;
+C 61 ; WX 606 ; N equal ; B 50 103 556 403 ;
+C 62 ; WX 606 ; N greater ; B 50 -9 556 515 ;
+C 63 ; WX 500 ; N question ; B 23 -15 477 737 ;
+C 64 ; WX 747 ; N at ; B -2 -15 750 737 ;
+C 65 ; WX 759 ; N A ; B -19 0 778 737 ;
+C 66 ; WX 778 ; N B ; B 19 0 739 722 ;
+C 67 ; WX 778 ; N C ; B 39 -15 723 737 ;
+C 68 ; WX 833 ; N D ; B 19 0 794 722 ;
+C 69 ; WX 759 ; N E ; B 19 0 708 722 ;
+C 70 ; WX 722 ; N F ; B 19 0 697 722 ;
+C 71 ; WX 833 ; N G ; B 39 -15 818 737 ;
+C 72 ; WX 870 ; N H ; B 19 0 851 722 ;
+C 73 ; WX 444 ; N I ; B 29 0 415 722 ;
+C 74 ; WX 648 ; N J ; B 6 -15 642 722 ;
+C 75 ; WX 815 ; N K ; B 19 0 822 722 ;
+C 76 ; WX 722 ; N L ; B 19 0 703 722 ;
+C 77 ; WX 981 ; N M ; B 10 0 971 722 ;
+C 78 ; WX 833 ; N N ; B 5 -10 828 722 ;
+C 79 ; WX 833 ; N O ; B 39 -15 794 737 ;
+C 80 ; WX 759 ; N P ; B 24 0 735 722 ;
+C 81 ; WX 833 ; N Q ; B 39 -189 808 737 ;
+C 82 ; WX 815 ; N R ; B 19 -15 815 722 ;
+C 83 ; WX 667 ; N S ; B 51 -15 634 737 ;
+C 84 ; WX 722 ; N T ; B 16 0 706 722 ;
+C 85 ; WX 833 ; N U ; B 14 -15 825 722 ;
+C 86 ; WX 759 ; N V ; B -19 -10 778 722 ;
+C 87 ; WX 981 ; N W ; B 7 -10 974 722 ;
+C 88 ; WX 722 ; N X ; B -12 0 734 722 ;
+C 89 ; WX 722 ; N Y ; B -12 0 734 722 ;
+C 90 ; WX 667 ; N Z ; B 28 0 639 722 ;
+C 91 ; WX 389 ; N bracketleft ; B 84 -109 339 737 ;
+C 92 ; WX 606 ; N backslash ; B 122 -15 484 737 ;
+C 93 ; WX 389 ; N bracketright ; B 50 -109 305 737 ;
+C 94 ; WX 606 ; N asciicircum ; B 66 325 540 690 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 241 ; N quoteleft ; B 22 378 220 737 ;
+C 97 ; WX 611 ; N a ; B 40 -15 601 485 ;
+C 98 ; WX 648 ; N b ; B 4 -15 616 737 ;
+C 99 ; WX 556 ; N c ; B 32 -15 524 485 ;
+C 100 ; WX 667 ; N d ; B 32 -15 644 737 ;
+C 101 ; WX 574 ; N e ; B 32 -15 542 485 ;
+C 102 ; WX 389 ; N f ; B 11 0 461 737 ; L i fi ; L l fl ;
+C 103 ; WX 611 ; N g ; B 30 -205 623 535 ;
+C 104 ; WX 685 ; N h ; B 17 0 662 737 ;
+C 105 ; WX 370 ; N i ; B 26 0 338 737 ;
+C 106 ; WX 352 ; N j ; B -86 -205 271 737 ;
+C 107 ; WX 667 ; N k ; B 17 0 662 737 ;
+C 108 ; WX 352 ; N l ; B 17 0 329 737 ;
+C 109 ; WX 963 ; N m ; B 17 0 940 485 ;
+C 110 ; WX 685 ; N n ; B 17 0 662 485 ;
+C 111 ; WX 611 ; N o ; B 32 -15 579 485 ;
+C 112 ; WX 667 ; N p ; B 17 -205 629 485 ;
+C 113 ; WX 648 ; N q ; B 32 -205 638 485 ;
+C 114 ; WX 519 ; N r ; B 17 0 516 485 ;
+C 115 ; WX 500 ; N s ; B 48 -15 476 485 ;
+C 116 ; WX 426 ; N t ; B 21 -15 405 675 ;
+C 117 ; WX 685 ; N u ; B 17 -15 668 475 ;
+C 118 ; WX 611 ; N v ; B 12 -10 599 475 ;
+C 119 ; WX 889 ; N w ; B 16 -10 873 475 ;
+C 120 ; WX 611 ; N x ; B 12 0 599 475 ;
+C 121 ; WX 611 ; N y ; B 12 -205 599 475 ;
+C 122 ; WX 537 ; N z ; B 38 0 499 475 ;
+C 123 ; WX 389 ; N braceleft ; B 36 -109 313 737 ;
+C 124 ; WX 606 ; N bar ; B 249 -250 357 750 ;
+C 125 ; WX 389 ; N braceright ; B 76 -109 353 737 ;
+C 126 ; WX 606 ; N asciitilde ; B 72 160 534 346 ;
+C 161 ; WX 296 ; N exclamdown ; B 53 -205 243 547 ;
+C 162 ; WX 574 ; N cent ; B 32 -102 528 572 ;
+C 163 ; WX 574 ; N sterling ; B 16 -15 558 705 ;
+C 164 ; WX 167 ; N fraction ; B -165 -15 332 705 ;
+C 165 ; WX 574 ; N yen ; B -10 0 584 690 ;
+C 166 ; WX 574 ; N florin ; B 14 -205 548 737 ;
+C 167 ; WX 500 ; N section ; B 62 -86 438 737 ;
+C 168 ; WX 574 ; N currency ; B 27 84 547 605 ;
+C 169 ; WX 241 ; N quotesingle ; B 53 378 189 737 ;
+C 170 ; WX 481 ; N quotedblleft ; B 22 378 459 737 ;
+C 171 ; WX 500 ; N guillemotleft ; B 46 79 454 397 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 62 79 271 397 ;
+C 173 ; WX 333 ; N guilsinglright ; B 62 79 271 397 ;
+C 174 ; WX 685 ; N fi ; B 11 0 666 737 ;
+C 175 ; WX 685 ; N fl ; B 11 0 666 737 ;
+C 177 ; WX 500 ; N endash ; B 0 184 500 292 ;
+C 178 ; WX 500 ; N dagger ; B 39 -101 461 737 ;
+C 179 ; WX 500 ; N daggerdbl ; B 39 -89 461 737 ;
+C 180 ; WX 278 ; N periodcentered ; B 53 200 225 372 ;
+C 182 ; WX 747 ; N paragraph ; B 96 -71 631 722 ;
+C 183 ; WX 606 ; N bullet ; B 122 180 484 542 ;
+C 184 ; WX 241 ; N quotesinglbase ; B 22 -184 220 175 ;
+C 185 ; WX 481 ; N quotedblbase ; B 22 -184 459 175 ;
+C 186 ; WX 481 ; N quotedblright ; B 22 378 459 737 ;
+C 187 ; WX 500 ; N guillemotright ; B 46 79 454 397 ;
+C 188 ; WX 1000 ; N ellipsis ; B 72 -15 928 175 ;
+C 189 ; WX 1000 ; N perthousand ; B 7 -15 993 705 ;
+C 191 ; WX 500 ; N questiondown ; B 23 -205 477 547 ;
+C 193 ; WX 333 ; N grave ; B 2 547 249 737 ;
+C 194 ; WX 333 ; N acute ; B 84 547 331 737 ;
+C 195 ; WX 333 ; N circumflex ; B -10 547 344 725 ;
+C 196 ; WX 333 ; N tilde ; B -24 563 357 705 ;
+C 197 ; WX 333 ; N macron ; B -6 582 339 664 ;
+C 198 ; WX 333 ; N breve ; B 9 547 324 714 ;
+C 199 ; WX 333 ; N dotaccent ; B 95 552 237 694 ;
+C 200 ; WX 333 ; N dieresis ; B -12 552 345 694 ;
+C 202 ; WX 333 ; N ring ; B 58 545 274 761 ;
+C 203 ; WX 333 ; N cedilla ; B 17 -224 248 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -16 547 431 737 ;
+C 206 ; WX 333 ; N ogonek ; B 168 -163 346 3 ;
+C 207 ; WX 333 ; N caron ; B -10 547 344 725 ;
+C 208 ; WX 1000 ; N emdash ; B 0 184 1000 292 ;
+C 225 ; WX 981 ; N AE ; B -29 0 963 722 ;
+C 227 ; WX 367 ; N ordfeminine ; B 1 407 393 705 ;
+C 232 ; WX 722 ; N Lslash ; B 19 0 703 722 ;
+C 233 ; WX 833 ; N Oslash ; B 39 -53 794 775 ;
+C 234 ; WX 1000 ; N OE ; B 0 0 982 722 ;
+C 235 ; WX 367 ; N ordmasculine ; B 1 407 366 705 ;
+C 241 ; WX 870 ; N ae ; B 32 -15 838 485 ;
+C 245 ; WX 370 ; N dotlessi ; B 26 0 338 475 ;
+C 248 ; WX 352 ; N lslash ; B 17 0 329 737 ;
+C 249 ; WX 611 ; N oslash ; B 32 -103 579 573 ;
+C 250 ; WX 907 ; N oe ; B 32 -15 875 485 ;
+C 251 ; WX 611 ; N germandbls ; B -2 -15 580 737 ;
+C -1 ; WX 574 ; N ecircumflex ; B 32 -15 542 725 ;
+C -1 ; WX 574 ; N edieresis ; B 32 -15 542 694 ;
+C -1 ; WX 611 ; N aacute ; B 40 -15 601 737 ;
+C -1 ; WX 747 ; N registered ; B -2 -15 750 737 ;
+C -1 ; WX 370 ; N icircumflex ; B 9 0 363 725 ;
+C -1 ; WX 685 ; N udieresis ; B 17 -15 668 694 ;
+C -1 ; WX 611 ; N ograve ; B 32 -15 579 737 ;
+C -1 ; WX 685 ; N uacute ; B 17 -15 668 737 ;
+C -1 ; WX 685 ; N ucircumflex ; B 17 -15 668 725 ;
+C -1 ; WX 759 ; N Aacute ; B -19 0 778 964 ;
+C -1 ; WX 370 ; N igrave ; B 21 0 338 737 ;
+C -1 ; WX 444 ; N Icircumflex ; B 29 0 415 952 ;
+C -1 ; WX 556 ; N ccedilla ; B 32 -224 524 485 ;
+C -1 ; WX 611 ; N adieresis ; B 40 -15 601 694 ;
+C -1 ; WX 759 ; N Ecircumflex ; B 19 0 708 952 ;
+C -1 ; WX 500 ; N scaron ; B 48 -15 476 725 ;
+C -1 ; WX 667 ; N thorn ; B 17 -205 629 737 ;
+C -1 ; WX 1000 ; N trademark ; B 6 317 982 722 ;
+C -1 ; WX 574 ; N egrave ; B 32 -15 542 737 ;
+C -1 ; WX 344 ; N threesuperior ; B -3 273 355 705 ;
+C -1 ; WX 537 ; N zcaron ; B 38 0 499 725 ;
+C -1 ; WX 611 ; N atilde ; B 40 -15 601 705 ;
+C -1 ; WX 611 ; N aring ; B 40 -15 601 761 ;
+C -1 ; WX 611 ; N ocircumflex ; B 32 -15 579 725 ;
+C -1 ; WX 759 ; N Edieresis ; B 19 0 708 921 ;
+C -1 ; WX 861 ; N threequarters ; B 15 -15 838 705 ;
+C -1 ; WX 611 ; N ydieresis ; B 12 -205 599 694 ;
+C -1 ; WX 611 ; N yacute ; B 12 -205 599 737 ;
+C -1 ; WX 370 ; N iacute ; B 26 0 350 737 ;
+C -1 ; WX 759 ; N Acircumflex ; B -19 0 778 952 ;
+C -1 ; WX 833 ; N Uacute ; B 14 -15 825 964 ;
+C -1 ; WX 574 ; N eacute ; B 32 -15 542 737 ;
+C -1 ; WX 833 ; N Ograve ; B 39 -15 794 964 ;
+C -1 ; WX 611 ; N agrave ; B 40 -15 601 737 ;
+C -1 ; WX 833 ; N Udieresis ; B 14 -15 825 921 ;
+C -1 ; WX 611 ; N acircumflex ; B 40 -15 601 725 ;
+C -1 ; WX 444 ; N Igrave ; B 29 0 415 964 ;
+C -1 ; WX 344 ; N twosuperior ; B -3 282 350 705 ;
+C -1 ; WX 833 ; N Ugrave ; B 14 -15 825 964 ;
+C -1 ; WX 861 ; N onequarter ; B 31 -15 838 705 ;
+C -1 ; WX 833 ; N Ucircumflex ; B 14 -15 825 952 ;
+C -1 ; WX 667 ; N Scaron ; B 51 -15 634 952 ;
+C -1 ; WX 444 ; N Idieresis ; B 29 0 415 921 ;
+C -1 ; WX 370 ; N idieresis ; B 7 0 364 694 ;
+C -1 ; WX 759 ; N Egrave ; B 19 0 708 964 ;
+C -1 ; WX 833 ; N Oacute ; B 39 -15 794 964 ;
+C -1 ; WX 606 ; N divide ; B 50 -40 556 546 ;
+C -1 ; WX 759 ; N Atilde ; B -19 0 778 932 ;
+C -1 ; WX 759 ; N Aring ; B -19 0 778 988 ;
+C -1 ; WX 833 ; N Odieresis ; B 39 -15 794 921 ;
+C -1 ; WX 759 ; N Adieresis ; B -19 0 778 921 ;
+C -1 ; WX 833 ; N Ntilde ; B 5 -10 828 932 ;
+C -1 ; WX 667 ; N Zcaron ; B 28 0 639 952 ;
+C -1 ; WX 759 ; N Thorn ; B 24 0 735 722 ;
+C -1 ; WX 444 ; N Iacute ; B 29 0 415 964 ;
+C -1 ; WX 606 ; N plusminus ; B 50 0 556 506 ;
+C -1 ; WX 606 ; N multiply ; B 65 15 541 491 ;
+C -1 ; WX 759 ; N Eacute ; B 19 0 708 964 ;
+C -1 ; WX 722 ; N Ydieresis ; B -12 0 734 921 ;
+C -1 ; WX 344 ; N onesuperior ; B 31 282 309 705 ;
+C -1 ; WX 685 ; N ugrave ; B 17 -15 668 737 ;
+C -1 ; WX 606 ; N logicalnot ; B 50 103 556 403 ;
+C -1 ; WX 685 ; N ntilde ; B 17 0 662 705 ;
+C -1 ; WX 833 ; N Otilde ; B 39 -15 794 932 ;
+C -1 ; WX 611 ; N otilde ; B 32 -15 579 705 ;
+C -1 ; WX 778 ; N Ccedilla ; B 39 -224 723 737 ;
+C -1 ; WX 759 ; N Agrave ; B -19 0 778 964 ;
+C -1 ; WX 861 ; N onehalf ; B 31 -15 838 705 ;
+C -1 ; WX 833 ; N Eth ; B 19 0 794 722 ;
+C -1 ; WX 400 ; N degree ; B 57 419 343 705 ;
+C -1 ; WX 722 ; N Yacute ; B -12 0 734 964 ;
+C -1 ; WX 833 ; N Ocircumflex ; B 39 -15 794 952 ;
+C -1 ; WX 611 ; N oacute ; B 32 -15 579 737 ;
+C -1 ; WX 685 ; N mu ; B 17 -205 668 475 ;
+C -1 ; WX 606 ; N minus ; B 50 199 556 307 ;
+C -1 ; WX 611 ; N eth ; B 32 -15 579 737 ;
+C -1 ; WX 611 ; N odieresis ; B 32 -15 579 694 ;
+C -1 ; WX 747 ; N copyright ; B -2 -15 750 737 ;
+C -1 ; WX 606 ; N brokenbar ; B 249 -175 357 675 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 128
+
+KPX A y -18
+KPX A w -18
+KPX A v -18
+KPX A quoteright -74
+KPX A quotedblright -74
+KPX A Y -91
+KPX A W -74
+KPX A V -74
+KPX A U -18
+KPX A T -55
+
+KPX C period -18
+KPX C comma -18
+
+KPX D period -25
+KPX D comma -25
+
+KPX F r -18
+KPX F period -125
+KPX F o -55
+KPX F i -18
+KPX F e -55
+KPX F comma -125
+KPX F a -74
+
+KPX J u -18
+KPX J period -55
+KPX J o -18
+KPX J e -18
+KPX J comma -55
+KPX J a -18
+KPX J A -18
+
+KPX K y -25
+KPX K u -18
+
+KPX L y -25
+KPX L quoteright -100
+KPX L quotedblright -100
+KPX L Y -74
+KPX L W -74
+KPX L V -100
+KPX L T -100
+
+KPX N period -18
+KPX N comma -18
+
+KPX O period -25
+KPX O comma -25
+KPX O T 10
+
+KPX P period -150
+KPX P o -55
+KPX P e -55
+KPX P comma -150
+KPX P a -55
+KPX P A -74
+
+KPX S period -18
+KPX S comma -18
+
+KPX T u -18
+KPX T r -18
+KPX T period -100
+KPX T o -74
+KPX T i -18
+KPX T hyphen -125
+KPX T e -74
+KPX T comma -100
+KPX T a -74
+KPX T O 10
+KPX T A -55
+
+KPX U period -25
+KPX U comma -25
+KPX U A -18
+
+KPX V u -55
+KPX V semicolon -37
+KPX V period -125
+KPX V o -74
+KPX V i -18
+KPX V hyphen -100
+KPX V e -74
+KPX V comma -125
+KPX V colon -37
+KPX V a -74
+KPX V A -74
+
+KPX W y -25
+KPX W u -37
+KPX W semicolon -55
+KPX W period -100
+KPX W o -74
+KPX W i -18
+KPX W hyphen -100
+KPX W e -74
+KPX W comma -100
+KPX W colon -55
+KPX W a -74
+KPX W A -74
+
+KPX Y u -55
+KPX Y semicolon -25
+KPX Y period -100
+KPX Y o -100
+KPX Y i -18
+KPX Y hyphen -125
+KPX Y e -100
+KPX Y comma -100
+KPX Y colon -25
+KPX Y a -100
+KPX Y A -91
+
+KPX colon space -18
+
+KPX comma space -18
+KPX comma quoteright -18
+KPX comma quotedblright -18
+
+KPX f quoteright 75
+KPX f quotedblright 75
+
+KPX period space -18
+KPX period quoteright -18
+KPX period quotedblright -18
+
+KPX quotedblleft A -74
+
+KPX quotedblright space -18
+
+KPX quoteleft A -74
+
+KPX quoteright s -25
+KPX quoteright d -25
+
+KPX r period -74
+KPX r comma -74
+
+KPX semicolon space -18
+
+KPX space quoteleft -18
+KPX space quotedblleft -18
+KPX space Y -18
+KPX space W -18
+KPX space V -18
+KPX space T -18
+KPX space A -18
+
+KPX v period -100
+KPX v comma -100
+
+KPX w period -100
+KPX w comma -100
+
+KPX y period -100
+KPX y comma -100
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 213 227 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 213 227 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 213 227 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 213 227 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 213 227 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 213 227 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 213 227 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 213 227 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 213 227 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 213 227 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 56 227 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 56 227 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 56 227 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 56 227 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 250 227 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 250 227 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 250 227 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 250 227 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 250 227 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 250 227 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 167 227 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 250 227 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 250 227 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 250 227 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 250 227 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 195 227 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 195 227 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 167 227 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 139 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 139 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 139 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 139 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 139 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 139 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 121 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 121 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 121 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 121 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 19 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 19 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 19 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 19 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 176 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 139 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 139 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 139 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 139 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 139 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 84 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 176 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 176 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 176 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 176 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 139 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 139 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 102 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/NCS-BdIt b/font/NCS-BdIt
new file mode 100644
index 0000000..7871147
--- /dev/null
+++ b/font/NCS-BdIt
@@ -0,0 +1,602 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue May 28 16:56:07 1991
+Comment UniqueID 35034
+Comment VMusage 31030 37922
+FontName NewCenturySchlbk-BoldItalic
+FullName New Century Schoolbook Bold Italic
+FamilyName New Century Schoolbook
+Weight Bold
+ItalicAngle -16
+IsFixedPitch false
+FontBBox -205 -250 1147 991
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+EncodingScheme AdobeStandardEncoding
+CapHeight 722
+XHeight 477
+Ascender 737
+Descender -205
+StartCharMetrics 228
+C 32 ; WX 287 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 0 -15 333 737 ;
+C 34 ; WX 400 ; N quotedbl ; B 66 388 428 737 ;
+C 35 ; WX 574 ; N numbersign ; B 30 0 544 690 ;
+C 36 ; WX 574 ; N dollar ; B 9 -120 565 810 ;
+C 37 ; WX 889 ; N percent ; B 54 -28 835 727 ;
+C 38 ; WX 889 ; N ampersand ; B 32 -15 823 737 ;
+C 39 ; WX 259 ; N quoteright ; B 48 388 275 737 ;
+C 40 ; WX 407 ; N parenleft ; B 72 -117 454 745 ;
+C 41 ; WX 407 ; N parenright ; B -70 -117 310 745 ;
+C 42 ; WX 500 ; N asterisk ; B 58 301 498 737 ;
+C 43 ; WX 606 ; N plus ; B 50 0 556 506 ;
+C 44 ; WX 287 ; N comma ; B -57 -192 170 157 ;
+C 45 ; WX 333 ; N hyphen ; B 2 177 263 299 ;
+C 46 ; WX 287 ; N period ; B -20 -15 152 157 ;
+C 47 ; WX 278 ; N slash ; B -41 -15 320 737 ;
+C 48 ; WX 574 ; N zero ; B 21 -15 553 705 ;
+C 49 ; WX 574 ; N one ; B 25 0 489 705 ;
+C 50 ; WX 574 ; N two ; B -38 -3 538 705 ;
+C 51 ; WX 574 ; N three ; B -7 -15 536 705 ;
+C 52 ; WX 574 ; N four ; B -13 0 544 705 ;
+C 53 ; WX 574 ; N five ; B 0 -15 574 705 ;
+C 54 ; WX 574 ; N six ; B 31 -15 574 705 ;
+C 55 ; WX 574 ; N seven ; B 64 -15 593 705 ;
+C 56 ; WX 574 ; N eight ; B 0 -15 552 705 ;
+C 57 ; WX 574 ; N nine ; B 0 -15 543 705 ;
+C 58 ; WX 287 ; N colon ; B -20 -15 237 477 ;
+C 59 ; WX 287 ; N semicolon ; B -57 -192 237 477 ;
+C 60 ; WX 606 ; N less ; B 50 -9 556 515 ;
+C 61 ; WX 606 ; N equal ; B 50 103 556 403 ;
+C 62 ; WX 606 ; N greater ; B 50 -8 556 514 ;
+C 63 ; WX 481 ; N question ; B 79 -15 451 737 ;
+C 64 ; WX 747 ; N at ; B -4 -15 751 737 ;
+C 65 ; WX 741 ; N A ; B -75 0 716 737 ;
+C 66 ; WX 759 ; N B ; B -50 0 721 722 ;
+C 67 ; WX 759 ; N C ; B 37 -15 759 737 ;
+C 68 ; WX 833 ; N D ; B -47 0 796 722 ;
+C 69 ; WX 741 ; N E ; B -41 0 730 722 ;
+C 70 ; WX 704 ; N F ; B -41 0 730 722 ;
+C 71 ; WX 815 ; N G ; B 37 -15 805 737 ;
+C 72 ; WX 870 ; N H ; B -41 0 911 722 ;
+C 73 ; WX 444 ; N I ; B -41 0 485 722 ;
+C 74 ; WX 667 ; N J ; B -20 -15 708 722 ;
+C 75 ; WX 778 ; N K ; B -41 0 832 722 ;
+C 76 ; WX 704 ; N L ; B -41 0 670 722 ;
+C 77 ; WX 944 ; N M ; B -44 0 988 722 ;
+C 78 ; WX 852 ; N N ; B -61 -10 913 722 ;
+C 79 ; WX 833 ; N O ; B 37 -15 796 737 ;
+C 80 ; WX 741 ; N P ; B -41 0 730 722 ;
+C 81 ; WX 833 ; N Q ; B 37 -189 796 737 ;
+C 82 ; WX 796 ; N R ; B -41 -15 749 722 ;
+C 83 ; WX 685 ; N S ; B 1 -15 666 737 ;
+C 84 ; WX 722 ; N T ; B 41 0 759 722 ;
+C 85 ; WX 833 ; N U ; B 88 -15 900 722 ;
+C 86 ; WX 741 ; N V ; B 32 -10 802 722 ;
+C 87 ; WX 944 ; N W ; B 40 -10 1000 722 ;
+C 88 ; WX 741 ; N X ; B -82 0 801 722 ;
+C 89 ; WX 704 ; N Y ; B 13 0 775 722 ;
+C 90 ; WX 704 ; N Z ; B -33 0 711 722 ;
+C 91 ; WX 407 ; N bracketleft ; B 1 -109 464 737 ;
+C 92 ; WX 606 ; N backslash ; B 161 -15 445 737 ;
+C 93 ; WX 407 ; N bracketright ; B -101 -109 362 737 ;
+C 94 ; WX 606 ; N asciicircum ; B 66 325 540 690 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 259 ; N quoteleft ; B 47 388 274 737 ;
+C 97 ; WX 667 ; N a ; B 6 -15 636 477 ;
+C 98 ; WX 611 ; N b ; B 29 -15 557 737 ;
+C 99 ; WX 537 ; N c ; B 0 -15 482 477 ;
+C 100 ; WX 667 ; N d ; B 0 -15 660 737 ;
+C 101 ; WX 519 ; N e ; B 0 -15 479 477 ;
+C 102 ; WX 389 ; N f ; B -48 -205 550 737 ; L i fi ; L l fl ;
+C 103 ; WX 611 ; N g ; B -63 -205 604 528 ;
+C 104 ; WX 685 ; N h ; B 0 -15 639 737 ;
+C 105 ; WX 389 ; N i ; B 32 -15 345 737 ;
+C 106 ; WX 370 ; N j ; B -205 -205 347 737 ;
+C 107 ; WX 648 ; N k ; B -11 -15 578 737 ;
+C 108 ; WX 389 ; N l ; B 32 -15 375 737 ;
+C 109 ; WX 944 ; N m ; B 0 -15 909 477 ;
+C 110 ; WX 685 ; N n ; B 0 -15 639 477 ;
+C 111 ; WX 574 ; N o ; B 0 -15 530 477 ;
+C 112 ; WX 648 ; N p ; B -119 -205 590 477 ;
+C 113 ; WX 630 ; N q ; B 0 -205 587 477 ;
+C 114 ; WX 519 ; N r ; B 0 0 527 486 ;
+C 115 ; WX 481 ; N s ; B 0 -15 435 477 ;
+C 116 ; WX 407 ; N t ; B 24 -15 403 650 ;
+C 117 ; WX 685 ; N u ; B 30 -15 635 477 ;
+C 118 ; WX 556 ; N v ; B 30 -15 496 477 ;
+C 119 ; WX 833 ; N w ; B 30 -15 773 477 ;
+C 120 ; WX 574 ; N x ; B -46 -15 574 477 ;
+C 121 ; WX 519 ; N y ; B -66 -205 493 477 ;
+C 122 ; WX 519 ; N z ; B -19 -15 473 477 ;
+C 123 ; WX 407 ; N braceleft ; B 52 -109 408 737 ;
+C 124 ; WX 606 ; N bar ; B 249 -250 357 750 ;
+C 125 ; WX 407 ; N braceright ; B -25 -109 331 737 ;
+C 126 ; WX 606 ; N asciitilde ; B 72 160 534 346 ;
+C 161 ; WX 333 ; N exclamdown ; B -44 -205 289 547 ;
+C 162 ; WX 574 ; N cent ; B 30 -144 512 578 ;
+C 163 ; WX 574 ; N sterling ; B -18 -15 566 705 ;
+C 164 ; WX 167 ; N fraction ; B -166 -15 333 705 ;
+C 165 ; WX 574 ; N yen ; B 17 0 629 690 ;
+C 166 ; WX 574 ; N florin ; B -43 -205 575 737 ;
+C 167 ; WX 500 ; N section ; B -30 -146 515 737 ;
+C 168 ; WX 574 ; N currency ; B 27 84 547 605 ;
+C 169 ; WX 287 ; N quotesingle ; B 112 388 250 737 ;
+C 170 ; WX 481 ; N quotedblleft ; B 54 388 521 737 ;
+C 171 ; WX 481 ; N guillemotleft ; B -35 69 449 407 ;
+C 172 ; WX 278 ; N guilsinglleft ; B -25 69 244 407 ;
+C 173 ; WX 278 ; N guilsinglright ; B -26 69 243 407 ;
+C 174 ; WX 685 ; N fi ; B -70 -205 641 737 ;
+C 175 ; WX 685 ; N fl ; B -70 -205 671 737 ;
+C 177 ; WX 500 ; N endash ; B -47 189 479 287 ;
+C 178 ; WX 500 ; N dagger ; B 48 -146 508 737 ;
+C 179 ; WX 500 ; N daggerdbl ; B -60 -150 508 737 ;
+C 180 ; WX 287 ; N periodcentered ; B 57 200 229 372 ;
+C 182 ; WX 650 ; N paragraph ; B 25 -131 681 722 ;
+C 183 ; WX 606 ; N bullet ; B 122 180 484 542 ;
+C 184 ; WX 259 ; N quotesinglbase ; B -57 -192 170 157 ;
+C 185 ; WX 481 ; N quotedblbase ; B -57 -192 412 157 ;
+C 186 ; WX 481 ; N quotedblright ; B 43 388 510 737 ;
+C 187 ; WX 481 ; N guillemotright ; B -31 69 453 407 ;
+C 188 ; WX 1000 ; N ellipsis ; B 81 -15 919 157 ;
+C 189 ; WX 1167 ; N perthousand ; B 20 -28 1147 727 ;
+C 191 ; WX 481 ; N questiondown ; B 0 -205 372 547 ;
+C 193 ; WX 333 ; N grave ; B 74 538 294 722 ;
+C 194 ; WX 333 ; N acute ; B 123 538 372 722 ;
+C 195 ; WX 333 ; N circumflex ; B 23 533 365 705 ;
+C 196 ; WX 333 ; N tilde ; B 28 561 398 690 ;
+C 197 ; WX 333 ; N macron ; B 47 573 404 649 ;
+C 198 ; WX 333 ; N breve ; B 67 535 390 698 ;
+C 199 ; WX 333 ; N dotaccent ; B 145 546 289 690 ;
+C 200 ; WX 333 ; N dieresis ; B 33 546 393 690 ;
+C 202 ; WX 333 ; N ring ; B 111 522 335 746 ;
+C 203 ; WX 333 ; N cedilla ; B -21 -220 225 3 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 15 538 480 722 ;
+C 206 ; WX 333 ; N ogonek ; B 68 -155 246 -10 ;
+C 207 ; WX 333 ; N caron ; B 60 531 403 705 ;
+C 208 ; WX 1000 ; N emdash ; B -47 189 979 287 ;
+C 225 ; WX 889 ; N AE ; B -86 0 915 722 ;
+C 227 ; WX 412 ; N ordfeminine ; B 47 407 460 705 ;
+C 232 ; WX 704 ; N Lslash ; B -41 0 670 722 ;
+C 233 ; WX 833 ; N Oslash ; B 35 -68 798 790 ;
+C 234 ; WX 963 ; N OE ; B 29 0 989 722 ;
+C 235 ; WX 356 ; N ordmasculine ; B 42 407 394 705 ;
+C 241 ; WX 815 ; N ae ; B -18 -15 775 477 ;
+C 245 ; WX 389 ; N dotlessi ; B 32 -15 345 477 ;
+C 248 ; WX 389 ; N lslash ; B 5 -15 390 737 ;
+C 249 ; WX 574 ; N oslash ; B 0 -121 530 583 ;
+C 250 ; WX 852 ; N oe ; B -6 -15 812 477 ;
+C 251 ; WX 574 ; N germandbls ; B -91 -205 540 737 ;
+C -1 ; WX 519 ; N ecircumflex ; B 0 -15 479 705 ;
+C -1 ; WX 519 ; N edieresis ; B 0 -15 486 690 ;
+C -1 ; WX 667 ; N aacute ; B 6 -15 636 722 ;
+C -1 ; WX 747 ; N registered ; B -2 -15 750 737 ;
+C -1 ; WX 389 ; N icircumflex ; B 21 -15 363 698 ;
+C -1 ; WX 685 ; N udieresis ; B 30 -15 635 690 ;
+C -1 ; WX 574 ; N ograve ; B 0 -15 530 722 ;
+C -1 ; WX 685 ; N uacute ; B 30 -15 635 722 ;
+C -1 ; WX 685 ; N ucircumflex ; B 30 -15 635 705 ;
+C -1 ; WX 741 ; N Aacute ; B -75 0 716 947 ;
+C -1 ; WX 389 ; N igrave ; B 32 -15 345 715 ;
+C -1 ; WX 444 ; N Icircumflex ; B -41 0 485 930 ;
+C -1 ; WX 537 ; N ccedilla ; B 0 -220 482 477 ;
+C -1 ; WX 667 ; N adieresis ; B 6 -15 636 690 ;
+C -1 ; WX 741 ; N Ecircumflex ; B -41 0 730 930 ;
+C -1 ; WX 481 ; N scaron ; B 0 -15 477 705 ;
+C -1 ; WX 648 ; N thorn ; B -119 -205 590 737 ;
+C -1 ; WX 950 ; N trademark ; B 42 317 1017 722 ;
+C -1 ; WX 519 ; N egrave ; B 0 -15 479 722 ;
+C -1 ; WX 344 ; N threesuperior ; B 3 273 361 705 ;
+C -1 ; WX 519 ; N zcaron ; B -19 -15 473 695 ;
+C -1 ; WX 667 ; N atilde ; B 6 -15 636 690 ;
+C -1 ; WX 667 ; N aring ; B 6 -15 636 746 ;
+C -1 ; WX 574 ; N ocircumflex ; B 0 -15 530 705 ;
+C -1 ; WX 741 ; N Edieresis ; B -41 0 730 915 ;
+C -1 ; WX 861 ; N threequarters ; B 35 -15 789 705 ;
+C -1 ; WX 519 ; N ydieresis ; B -66 -205 493 690 ;
+C -1 ; WX 519 ; N yacute ; B -66 -205 493 722 ;
+C -1 ; WX 389 ; N iacute ; B 32 -15 370 715 ;
+C -1 ; WX 741 ; N Acircumflex ; B -75 0 716 930 ;
+C -1 ; WX 833 ; N Uacute ; B 88 -15 900 947 ;
+C -1 ; WX 519 ; N eacute ; B 0 -15 479 722 ;
+C -1 ; WX 833 ; N Ograve ; B 37 -15 796 947 ;
+C -1 ; WX 667 ; N agrave ; B 6 -15 636 722 ;
+C -1 ; WX 833 ; N Udieresis ; B 88 -15 900 915 ;
+C -1 ; WX 667 ; N acircumflex ; B 6 -15 636 705 ;
+C -1 ; WX 444 ; N Igrave ; B -41 0 485 947 ;
+C -1 ; WX 344 ; N twosuperior ; B -17 280 362 705 ;
+C -1 ; WX 833 ; N Ugrave ; B 88 -15 900 947 ;
+C -1 ; WX 861 ; N onequarter ; B 17 -15 789 705 ;
+C -1 ; WX 833 ; N Ucircumflex ; B 88 -15 900 930 ;
+C -1 ; WX 685 ; N Scaron ; B 1 -15 666 930 ;
+C -1 ; WX 444 ; N Idieresis ; B -41 0 509 915 ;
+C -1 ; WX 389 ; N idieresis ; B 31 -15 391 683 ;
+C -1 ; WX 741 ; N Egrave ; B -41 0 730 947 ;
+C -1 ; WX 833 ; N Oacute ; B 37 -15 796 947 ;
+C -1 ; WX 606 ; N divide ; B 50 -40 556 546 ;
+C -1 ; WX 741 ; N Atilde ; B -75 0 716 915 ;
+C -1 ; WX 741 ; N Aring ; B -75 0 716 991 ;
+C -1 ; WX 833 ; N Odieresis ; B 37 -15 796 915 ;
+C -1 ; WX 741 ; N Adieresis ; B -75 0 716 915 ;
+C -1 ; WX 852 ; N Ntilde ; B -61 -10 913 915 ;
+C -1 ; WX 704 ; N Zcaron ; B -33 0 711 930 ;
+C -1 ; WX 741 ; N Thorn ; B -41 0 690 722 ;
+C -1 ; WX 444 ; N Iacute ; B -41 0 488 947 ;
+C -1 ; WX 606 ; N plusminus ; B 50 0 556 506 ;
+C -1 ; WX 606 ; N multiply ; B 65 15 541 491 ;
+C -1 ; WX 741 ; N Eacute ; B -41 0 730 947 ;
+C -1 ; WX 704 ; N Ydieresis ; B 13 0 775 915 ;
+C -1 ; WX 344 ; N onesuperior ; B 19 282 326 705 ;
+C -1 ; WX 685 ; N ugrave ; B 30 -15 635 722 ;
+C -1 ; WX 606 ; N logicalnot ; B 50 103 556 403 ;
+C -1 ; WX 685 ; N ntilde ; B 0 -15 639 690 ;
+C -1 ; WX 833 ; N Otilde ; B 37 -15 796 915 ;
+C -1 ; WX 574 ; N otilde ; B 0 -15 530 690 ;
+C -1 ; WX 759 ; N Ccedilla ; B 37 -220 759 737 ;
+C -1 ; WX 741 ; N Agrave ; B -75 0 716 947 ;
+C -1 ; WX 861 ; N onehalf ; B 17 -15 798 705 ;
+C -1 ; WX 833 ; N Eth ; B -47 0 796 722 ;
+C -1 ; WX 400 ; N degree ; B 86 419 372 705 ;
+C -1 ; WX 704 ; N Yacute ; B 13 0 775 947 ;
+C -1 ; WX 833 ; N Ocircumflex ; B 37 -15 796 930 ;
+C -1 ; WX 574 ; N oacute ; B 0 -15 530 722 ;
+C -1 ; WX 685 ; N mu ; B -89 -205 635 477 ;
+C -1 ; WX 606 ; N minus ; B 50 199 556 307 ;
+C -1 ; WX 574 ; N eth ; B 0 -15 530 752 ;
+C -1 ; WX 574 ; N odieresis ; B 0 -15 530 690 ;
+C -1 ; WX 747 ; N copyright ; B -2 -15 750 737 ;
+C -1 ; WX 606 ; N brokenbar ; B 249 -175 357 675 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 239
+
+KPX A y -33
+KPX A w -25
+KPX A v -10
+KPX A u -15
+KPX A quoteright -95
+KPX A quotedblright -95
+KPX A Y -70
+KPX A W -84
+KPX A V -100
+KPX A U -32
+KPX A T 5
+KPX A Q 5
+KPX A O 5
+KPX A G 5
+KPX A C 5
+
+KPX B period 15
+KPX B comma 15
+KPX B U 15
+KPX B A -11
+
+KPX C A -5
+
+KPX D period -11
+KPX D comma -11
+KPX D Y 6
+KPX D W -11
+KPX D V -18
+
+KPX F r -27
+KPX F period -91
+KPX F o -47
+KPX F i -41
+KPX F e -41
+KPX F comma -91
+KPX F a -47
+KPX F A -79
+
+KPX J u -39
+KPX J period -74
+KPX J o -40
+KPX J e -33
+KPX J comma -74
+KPX J a -40
+KPX J A -30
+
+KPX K y -48
+KPX K u -4
+KPX K o -4
+KPX K e 18
+
+KPX L y -30
+KPX L quoteright -100
+KPX L quotedblright -100
+KPX L Y -55
+KPX L W -69
+KPX L V -97
+KPX L T -75
+
+KPX N period -49
+KPX N comma -49
+
+KPX O period -18
+KPX O comma -18
+KPX O X -18
+KPX O W -15
+KPX O V -24
+KPX O A -5
+
+KPX P period -100
+KPX P o -40
+KPX P e -33
+KPX P comma -100
+KPX P a -40
+KPX P A -80
+
+KPX R W -14
+KPX R V -24
+
+KPX S period -18
+KPX S comma -18
+
+KPX T y -30
+KPX T w -30
+KPX T u -22
+KPX T r -9
+KPX T period -55
+KPX T o -40
+KPX T i -22
+KPX T hyphen -75
+KPX T h -9
+KPX T e -33
+KPX T comma -55
+KPX T a -40
+KPX T O 11
+KPX T A -60
+
+KPX U period -25
+KPX U comma -25
+KPX U A -42
+
+KPX V u -70
+KPX V semicolon 6
+KPX V period -94
+KPX V o -71
+KPX V i -35
+KPX V hyphen -94
+KPX V e -66
+KPX V comma -94
+KPX V colon -49
+KPX V a -55
+KPX V O -19
+KPX V G -12
+KPX V A -100
+
+KPX W y -41
+KPX W u -25
+KPX W semicolon -22
+KPX W period -86
+KPX W o -33
+KPX W i -27
+KPX W hyphen -61
+KPX W h 5
+KPX W e -39
+KPX W comma -86
+KPX W colon -22
+KPX W a -33
+KPX W O -11
+KPX W A -66
+
+KPX Y u -58
+KPX Y semicolon -55
+KPX Y period -91
+KPX Y o -77
+KPX Y i -22
+KPX Y hyphen -91
+KPX Y e -71
+KPX Y comma -91
+KPX Y colon -55
+KPX Y a -77
+KPX Y A -79
+
+KPX a y -8
+KPX a w -8
+KPX a v 6
+
+KPX b y -6
+KPX b v 8
+KPX b period 6
+KPX b comma 6
+
+KPX c y -20
+KPX c period -8
+KPX c l -13
+KPX c k -8
+KPX c h -18
+KPX c comma -8
+
+KPX colon space -18
+
+KPX comma space -18
+KPX comma quoteright -18
+KPX comma quotedblright -18
+
+KPX d y -15
+KPX d w -15
+
+KPX e y -15
+KPX e x -5
+KPX e w -15
+KPX e p -11
+KPX e g -4
+KPX e b -8
+
+KPX f quoteright 105
+KPX f quotedblright 105
+KPX f period -28
+KPX f o 7
+KPX f l 7
+KPX f i 7
+KPX f e 14
+KPX f dotlessi 7
+KPX f comma -28
+KPX f a 8
+
+KPX g y -11
+KPX g r 11
+KPX g period -5
+KPX g comma -5
+
+KPX h y -20
+
+KPX i v 7
+
+KPX k y -15
+KPX k o -22
+KPX k e -16
+
+KPX l y -7
+KPX l w -7
+
+KPX m y -20
+KPX m u -11
+
+KPX n y -20
+KPX n v -7
+KPX n u -11
+
+KPX o y -11
+KPX o w -8
+KPX o v 6
+
+KPX p y -4
+KPX p period 8
+KPX p comma 8
+
+KPX period space -18
+KPX period quoteright -18
+KPX period quotedblright -18
+
+KPX quotedblleft quoteleft 20
+KPX quotedblleft A -60
+
+KPX quotedblright space -18
+
+KPX quoteleft A -80
+
+KPX quoteright v -16
+KPX quoteright t -22
+KPX quoteright s -46
+KPX quoteright r -9
+KPX quoteright l -22
+KPX quoteright d -41
+
+KPX r y -20
+KPX r v -7
+KPX r u -11
+KPX r t -11
+KPX r semicolon 9
+KPX r s -20
+KPX r quoteright 9
+KPX r period -90
+KPX r p -17
+KPX r o -11
+KPX r l -14
+KPX r k 9
+KPX r i -14
+KPX r hyphen -16
+KPX r g -11
+KPX r e -7
+KPX r d -7
+KPX r comma -90
+KPX r colon 9
+KPX r a -11
+
+KPX s period 11
+KPX s comma 11
+
+KPX semicolon space -18
+
+KPX space quotedblleft -18
+KPX space Y -18
+KPX space W -33
+KPX space V -24
+KPX space T -18
+KPX space A -22
+
+KPX v period -11
+KPX v o -6
+KPX v comma -11
+KPX v a -6
+
+KPX w period -17
+KPX w o -14
+KPX w e -8
+KPX w comma -17
+KPX w a -14
+
+KPX x e 5
+
+KPX y period -25
+KPX y o 8
+KPX y e 15
+KPX y comma -25
+KPX y a 8
+
+KPX z e 4
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 259 225 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 259 225 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 259 225 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 259 225 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 229 245 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 259 225 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 296 225 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 296 225 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 296 225 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 296 225 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 116 225 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 116 225 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 116 225 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 116 225 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 326 225 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 315 225 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 315 225 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 315 225 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 315 225 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 315 225 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 206 225 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 340 225 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 340 225 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 340 225 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 340 225 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 246 225 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 236 225 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 226 225 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 167 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 167 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 167 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 167 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 167 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 167 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 93 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 93 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 93 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 93 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -2 -7 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -2 -7 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -2 -7 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -2 -7 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 176 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 121 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 121 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 121 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 121 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 121 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 74 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 176 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 176 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 176 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 176 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 93 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 93 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 63 -10 ;
+EndComposites
+EndFontMetrics
diff --git a/font/NCS-It b/font/NCS-It
new file mode 100644
index 0000000..6dfd6a2
--- /dev/null
+++ b/font/NCS-It
@@ -0,0 +1,536 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue May 28 16:40:04 1991
+Comment UniqueID 35028
+Comment VMusage 31423 38315
+FontName NewCenturySchlbk-Italic
+FullName New Century Schoolbook Italic
+FamilyName New Century Schoolbook
+Weight Medium
+ItalicAngle -16
+IsFixedPitch false
+FontBBox -166 -250 994 958
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.006
+Notice Copyright (c) 1985, 1987, 1989, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+EncodingScheme AdobeStandardEncoding
+CapHeight 722
+XHeight 466
+Ascender 737
+Descender -205
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 17 -15 303 737 ;
+C 34 ; WX 400 ; N quotedbl ; B 127 463 363 737 ;
+C 35 ; WX 556 ; N numbersign ; B 28 0 528 690 ;
+C 36 ; WX 556 ; N dollar ; B 4 -142 536 808 ;
+C 37 ; WX 833 ; N percent ; B 43 -15 790 705 ;
+C 38 ; WX 852 ; N ampersand ; B 24 -15 773 737 ;
+C 39 ; WX 204 ; N quoteright ; B 39 463 229 737 ;
+C 40 ; WX 333 ; N parenleft ; B 53 -117 411 745 ;
+C 41 ; WX 333 ; N parenright ; B -93 -117 265 745 ;
+C 42 ; WX 500 ; N asterisk ; B 80 318 500 737 ;
+C 43 ; WX 606 ; N plus ; B 50 0 556 506 ;
+C 44 ; WX 278 ; N comma ; B -39 -165 151 109 ;
+C 45 ; WX 333 ; N hyphen ; B 32 202 259 274 ;
+C 46 ; WX 278 ; N period ; B 17 -15 141 109 ;
+C 47 ; WX 606 ; N slash ; B 132 -15 474 737 ;
+C 48 ; WX 556 ; N zero ; B 30 -15 526 705 ;
+C 49 ; WX 556 ; N one ; B 50 0 459 705 ;
+C 50 ; WX 556 ; N two ; B -37 0 506 705 ;
+C 51 ; WX 556 ; N three ; B -2 -15 506 705 ;
+C 52 ; WX 556 ; N four ; B -8 0 512 705 ;
+C 53 ; WX 556 ; N five ; B 4 -15 540 705 ;
+C 54 ; WX 556 ; N six ; B 36 -15 548 705 ;
+C 55 ; WX 556 ; N seven ; B 69 -15 561 705 ;
+C 56 ; WX 556 ; N eight ; B 6 -15 526 705 ;
+C 57 ; WX 556 ; N nine ; B 8 -15 520 705 ;
+C 58 ; WX 278 ; N colon ; B 17 -15 229 466 ;
+C 59 ; WX 278 ; N semicolon ; B -39 -165 229 466 ;
+C 60 ; WX 606 ; N less ; B 36 -8 542 514 ;
+C 61 ; WX 606 ; N equal ; B 50 117 556 389 ;
+C 62 ; WX 606 ; N greater ; B 64 -8 570 514 ;
+C 63 ; WX 444 ; N question ; B 102 -15 417 737 ;
+C 64 ; WX 747 ; N at ; B -2 -15 750 737 ;
+C 65 ; WX 704 ; N A ; B -87 0 668 737 ;
+C 66 ; WX 722 ; N B ; B -33 0 670 722 ;
+C 67 ; WX 722 ; N C ; B 40 -15 712 737 ;
+C 68 ; WX 778 ; N D ; B -33 0 738 722 ;
+C 69 ; WX 722 ; N E ; B -33 0 700 722 ;
+C 70 ; WX 667 ; N F ; B -33 0 700 722 ;
+C 71 ; WX 778 ; N G ; B 40 -15 763 737 ;
+C 72 ; WX 833 ; N H ; B -33 0 866 722 ;
+C 73 ; WX 407 ; N I ; B -33 0 435 722 ;
+C 74 ; WX 611 ; N J ; B -14 -15 651 722 ;
+C 75 ; WX 741 ; N K ; B -33 0 816 722 ;
+C 76 ; WX 667 ; N L ; B -33 0 627 722 ;
+C 77 ; WX 944 ; N M ; B -33 0 977 722 ;
+C 78 ; WX 815 ; N N ; B -51 -15 866 722 ;
+C 79 ; WX 778 ; N O ; B 40 -15 738 737 ;
+C 80 ; WX 667 ; N P ; B -33 0 667 722 ;
+C 81 ; WX 778 ; N Q ; B 40 -190 738 737 ;
+C 82 ; WX 741 ; N R ; B -45 -15 692 722 ;
+C 83 ; WX 667 ; N S ; B -6 -15 638 737 ;
+C 84 ; WX 685 ; N T ; B 40 0 725 722 ;
+C 85 ; WX 815 ; N U ; B 93 -15 867 722 ;
+C 86 ; WX 704 ; N V ; B 36 -10 779 722 ;
+C 87 ; WX 926 ; N W ; B 53 -10 978 722 ;
+C 88 ; WX 704 ; N X ; B -75 0 779 722 ;
+C 89 ; WX 685 ; N Y ; B 31 0 760 722 ;
+C 90 ; WX 667 ; N Z ; B -25 0 667 722 ;
+C 91 ; WX 333 ; N bracketleft ; B -55 -109 388 737 ;
+C 92 ; WX 606 ; N backslash ; B 132 -15 474 737 ;
+C 93 ; WX 333 ; N bracketright ; B -77 -109 366 737 ;
+C 94 ; WX 606 ; N asciicircum ; B 89 325 517 690 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 204 ; N quoteleft ; B 39 463 229 737 ;
+C 97 ; WX 574 ; N a ; B 2 -15 524 466 ;
+C 98 ; WX 556 ; N b ; B 32 -15 488 737 ;
+C 99 ; WX 444 ; N c ; B 2 -15 394 466 ;
+C 100 ; WX 611 ; N d ; B 2 -15 585 737 ;
+C 101 ; WX 444 ; N e ; B -6 -15 388 466 ;
+C 102 ; WX 333 ; N f ; B -68 -205 470 737 ; L i fi ; L l fl ;
+C 103 ; WX 537 ; N g ; B -79 -205 523 497 ;
+C 104 ; WX 611 ; N h ; B 14 -15 562 737 ;
+C 105 ; WX 333 ; N i ; B 29 -15 282 715 ;
+C 106 ; WX 315 ; N j ; B -166 -205 318 715 ;
+C 107 ; WX 556 ; N k ; B 0 -15 497 737 ;
+C 108 ; WX 333 ; N l ; B 14 -15 292 737 ;
+C 109 ; WX 889 ; N m ; B 14 -15 840 466 ;
+C 110 ; WX 611 ; N n ; B 14 -15 562 466 ;
+C 111 ; WX 500 ; N o ; B 2 -15 450 466 ;
+C 112 ; WX 574 ; N p ; B -101 -205 506 466 ;
+C 113 ; WX 556 ; N q ; B 2 -205 500 466 ;
+C 114 ; WX 444 ; N r ; B 10 0 434 466 ;
+C 115 ; WX 444 ; N s ; B 2 -15 394 466 ;
+C 116 ; WX 352 ; N t ; B 24 -15 328 619 ;
+C 117 ; WX 611 ; N u ; B 44 -15 556 466 ;
+C 118 ; WX 519 ; N v ; B 31 -15 447 466 ;
+C 119 ; WX 778 ; N w ; B 31 -15 706 466 ;
+C 120 ; WX 500 ; N x ; B -33 -15 471 466 ;
+C 121 ; WX 500 ; N y ; B -83 -205 450 466 ;
+C 122 ; WX 463 ; N z ; B -33 -15 416 466 ;
+C 123 ; WX 333 ; N braceleft ; B 38 -109 394 737 ;
+C 124 ; WX 606 ; N bar ; B 267 -250 339 750 ;
+C 125 ; WX 333 ; N braceright ; B -87 -109 269 737 ;
+C 126 ; WX 606 ; N asciitilde ; B 72 184 534 322 ;
+C 161 ; WX 333 ; N exclamdown ; B -22 -205 264 547 ;
+C 162 ; WX 556 ; N cent ; B 62 -144 486 580 ;
+C 163 ; WX 556 ; N sterling ; B -13 -15 544 705 ;
+C 164 ; WX 167 ; N fraction ; B -134 -15 301 705 ;
+C 165 ; WX 556 ; N yen ; B 40 0 624 690 ;
+C 166 ; WX 556 ; N florin ; B -58 -205 569 737 ;
+C 167 ; WX 500 ; N section ; B -10 -147 480 737 ;
+C 168 ; WX 556 ; N currency ; B 26 93 530 597 ;
+C 169 ; WX 278 ; N quotesingle ; B 151 463 237 737 ;
+C 170 ; WX 389 ; N quotedblleft ; B 39 463 406 737 ;
+C 171 ; WX 426 ; N guillemotleft ; B -15 74 402 402 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 40 74 259 402 ;
+C 173 ; WX 333 ; N guilsinglright ; B 40 74 259 402 ;
+C 174 ; WX 611 ; N fi ; B -68 -205 555 737 ;
+C 175 ; WX 611 ; N fl ; B -68 -205 587 737 ;
+C 177 ; WX 500 ; N endash ; B -27 208 487 268 ;
+C 178 ; WX 500 ; N dagger ; B 51 -147 506 737 ;
+C 179 ; WX 500 ; N daggerdbl ; B -54 -147 506 737 ;
+C 180 ; WX 278 ; N periodcentered ; B 71 238 207 374 ;
+C 182 ; WX 650 ; N paragraph ; B 48 -132 665 722 ;
+C 183 ; WX 606 ; N bullet ; B 122 180 484 542 ;
+C 184 ; WX 204 ; N quotesinglbase ; B -78 -165 112 109 ;
+C 185 ; WX 389 ; N quotedblbase ; B -78 -165 289 109 ;
+C 186 ; WX 389 ; N quotedblright ; B 39 463 406 737 ;
+C 187 ; WX 426 ; N guillemotright ; B -15 74 402 402 ;
+C 188 ; WX 1000 ; N ellipsis ; B 59 -15 849 109 ;
+C 189 ; WX 1000 ; N perthousand ; B 6 -15 994 705 ;
+C 191 ; WX 444 ; N questiondown ; B -3 -205 312 547 ;
+C 193 ; WX 333 ; N grave ; B 71 518 262 690 ;
+C 194 ; WX 333 ; N acute ; B 132 518 355 690 ;
+C 195 ; WX 333 ; N circumflex ; B 37 518 331 690 ;
+C 196 ; WX 333 ; N tilde ; B 52 547 383 649 ;
+C 197 ; WX 333 ; N macron ; B 52 560 363 610 ;
+C 198 ; WX 333 ; N breve ; B 69 518 370 677 ;
+C 199 ; WX 333 ; N dotaccent ; B 146 544 248 646 ;
+C 200 ; WX 333 ; N dieresis ; B 59 544 359 646 ;
+C 202 ; WX 333 ; N ring ; B 114 512 314 712 ;
+C 203 ; WX 333 ; N cedilla ; B 3 -215 215 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 32 518 455 690 ;
+C 206 ; WX 333 ; N ogonek ; B 68 -215 254 0 ;
+C 207 ; WX 333 ; N caron ; B 73 518 378 690 ;
+C 208 ; WX 1000 ; N emdash ; B -27 208 987 268 ;
+C 225 ; WX 870 ; N AE ; B -87 0 888 722 ;
+C 227 ; WX 422 ; N ordfeminine ; B 72 416 420 705 ;
+C 232 ; WX 667 ; N Lslash ; B -33 0 627 722 ;
+C 233 ; WX 778 ; N Oslash ; B 16 -68 748 780 ;
+C 234 ; WX 981 ; N OE ; B 40 0 975 722 ;
+C 235 ; WX 372 ; N ordmasculine ; B 66 416 370 705 ;
+C 241 ; WX 722 ; N ae ; B -18 -15 666 466 ;
+C 245 ; WX 333 ; N dotlessi ; B 29 -15 282 466 ;
+C 248 ; WX 333 ; N lslash ; B -25 -15 340 737 ;
+C 249 ; WX 500 ; N oslash ; B 2 -121 450 549 ;
+C 250 ; WX 778 ; N oe ; B 2 -15 722 466 ;
+C 251 ; WX 556 ; N germandbls ; B -76 -205 525 737 ;
+C -1 ; WX 444 ; N ecircumflex ; B -6 -15 388 690 ;
+C -1 ; WX 444 ; N edieresis ; B -6 -15 415 646 ;
+C -1 ; WX 574 ; N aacute ; B 2 -15 524 690 ;
+C -1 ; WX 747 ; N registered ; B -2 -15 750 737 ;
+C -1 ; WX 333 ; N icircumflex ; B 29 -15 331 690 ;
+C -1 ; WX 611 ; N udieresis ; B 44 -15 556 646 ;
+C -1 ; WX 500 ; N ograve ; B 2 -15 450 690 ;
+C -1 ; WX 611 ; N uacute ; B 44 -15 556 690 ;
+C -1 ; WX 611 ; N ucircumflex ; B 44 -15 556 690 ;
+C -1 ; WX 704 ; N Aacute ; B -87 0 668 946 ;
+C -1 ; WX 333 ; N igrave ; B 29 -15 282 690 ;
+C -1 ; WX 407 ; N Icircumflex ; B -33 0 435 946 ;
+C -1 ; WX 444 ; N ccedilla ; B 2 -215 394 466 ;
+C -1 ; WX 574 ; N adieresis ; B 2 -15 524 646 ;
+C -1 ; WX 722 ; N Ecircumflex ; B -33 0 700 946 ;
+C -1 ; WX 444 ; N scaron ; B 2 -15 434 690 ;
+C -1 ; WX 574 ; N thorn ; B -101 -205 506 737 ;
+C -1 ; WX 950 ; N trademark ; B 32 318 968 722 ;
+C -1 ; WX 444 ; N egrave ; B -6 -15 388 690 ;
+C -1 ; WX 333 ; N threesuperior ; B 22 273 359 705 ;
+C -1 ; WX 463 ; N zcaron ; B -33 -15 443 690 ;
+C -1 ; WX 574 ; N atilde ; B 2 -15 524 649 ;
+C -1 ; WX 574 ; N aring ; B 2 -15 524 712 ;
+C -1 ; WX 500 ; N ocircumflex ; B 2 -15 450 690 ;
+C -1 ; WX 722 ; N Edieresis ; B -33 0 700 902 ;
+C -1 ; WX 834 ; N threequarters ; B 22 -15 782 705 ;
+C -1 ; WX 500 ; N ydieresis ; B -83 -205 450 646 ;
+C -1 ; WX 500 ; N yacute ; B -83 -205 450 690 ;
+C -1 ; WX 333 ; N iacute ; B 29 -15 355 690 ;
+C -1 ; WX 704 ; N Acircumflex ; B -87 0 668 946 ;
+C -1 ; WX 815 ; N Uacute ; B 93 -15 867 946 ;
+C -1 ; WX 444 ; N eacute ; B -6 -15 411 690 ;
+C -1 ; WX 778 ; N Ograve ; B 40 -15 738 946 ;
+C -1 ; WX 574 ; N agrave ; B 2 -15 524 690 ;
+C -1 ; WX 815 ; N Udieresis ; B 93 -15 867 902 ;
+C -1 ; WX 574 ; N acircumflex ; B 2 -15 524 690 ;
+C -1 ; WX 407 ; N Igrave ; B -33 0 435 946 ;
+C -1 ; WX 333 ; N twosuperior ; B 0 282 359 705 ;
+C -1 ; WX 815 ; N Ugrave ; B 93 -15 867 946 ;
+C -1 ; WX 834 ; N onequarter ; B 34 -15 782 705 ;
+C -1 ; WX 815 ; N Ucircumflex ; B 93 -15 867 946 ;
+C -1 ; WX 667 ; N Scaron ; B -6 -15 638 946 ;
+C -1 ; WX 407 ; N Idieresis ; B -33 0 456 902 ;
+C -1 ; WX 333 ; N idieresis ; B 29 -15 359 646 ;
+C -1 ; WX 722 ; N Egrave ; B -33 0 700 946 ;
+C -1 ; WX 778 ; N Oacute ; B 40 -15 738 946 ;
+C -1 ; WX 606 ; N divide ; B 50 -22 556 528 ;
+C -1 ; WX 704 ; N Atilde ; B -87 0 668 905 ;
+C -1 ; WX 704 ; N Aring ; B -87 0 668 958 ;
+C -1 ; WX 778 ; N Odieresis ; B 40 -15 738 902 ;
+C -1 ; WX 704 ; N Adieresis ; B -87 0 668 902 ;
+C -1 ; WX 815 ; N Ntilde ; B -51 -15 866 905 ;
+C -1 ; WX 667 ; N Zcaron ; B -25 0 667 946 ;
+C -1 ; WX 667 ; N Thorn ; B -33 0 627 722 ;
+C -1 ; WX 407 ; N Iacute ; B -33 0 452 946 ;
+C -1 ; WX 606 ; N plusminus ; B 50 0 556 506 ;
+C -1 ; WX 606 ; N multiply ; B 74 24 532 482 ;
+C -1 ; WX 722 ; N Eacute ; B -33 0 700 946 ;
+C -1 ; WX 685 ; N Ydieresis ; B 31 0 760 902 ;
+C -1 ; WX 333 ; N onesuperior ; B 34 282 311 705 ;
+C -1 ; WX 611 ; N ugrave ; B 44 -15 556 690 ;
+C -1 ; WX 606 ; N logicalnot ; B 50 108 556 389 ;
+C -1 ; WX 611 ; N ntilde ; B 14 -15 562 649 ;
+C -1 ; WX 778 ; N Otilde ; B 40 -15 738 905 ;
+C -1 ; WX 500 ; N otilde ; B 2 -15 467 649 ;
+C -1 ; WX 722 ; N Ccedilla ; B 40 -215 712 737 ;
+C -1 ; WX 704 ; N Agrave ; B -87 0 668 946 ;
+C -1 ; WX 834 ; N onehalf ; B 34 -15 776 705 ;
+C -1 ; WX 778 ; N Eth ; B -33 0 738 722 ;
+C -1 ; WX 400 ; N degree ; B 86 419 372 705 ;
+C -1 ; WX 685 ; N Yacute ; B 31 0 760 946 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 40 -15 738 946 ;
+C -1 ; WX 500 ; N oacute ; B 2 -15 450 690 ;
+C -1 ; WX 611 ; N mu ; B -60 -205 556 466 ;
+C -1 ; WX 606 ; N minus ; B 50 217 556 289 ;
+C -1 ; WX 500 ; N eth ; B 2 -15 450 737 ;
+C -1 ; WX 500 ; N odieresis ; B 2 -15 450 646 ;
+C -1 ; WX 747 ; N copyright ; B -2 -15 750 737 ;
+C -1 ; WX 606 ; N brokenbar ; B 267 -175 339 675 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 181
+
+KPX A y -55
+KPX A w -18
+KPX A v -18
+KPX A u -18
+KPX A quoteright -125
+KPX A quotedblright -125
+KPX A Y -55
+KPX A W -74
+KPX A V -74
+KPX A U -37
+KPX A T -30
+KPX A Q -18
+KPX A O -18
+KPX A G -18
+KPX A C -18
+
+KPX B period -50
+KPX B comma -50
+
+KPX C period -50
+KPX C comma -50
+
+KPX D period -50
+KPX D comma -50
+KPX D Y -18
+KPX D W -18
+KPX D V -18
+
+KPX F r -55
+KPX F period -125
+KPX F o -55
+KPX F i -10
+KPX F e -55
+KPX F comma -125
+KPX F a -55
+KPX F A -35
+
+KPX G period -50
+KPX G comma -50
+
+KPX J u -18
+KPX J period -100
+KPX J o -37
+KPX J e -37
+KPX J comma -100
+KPX J a -37
+KPX J A -18
+
+KPX L y -50
+KPX L quoteright -125
+KPX L quotedblright -125
+KPX L Y -100
+KPX L W -100
+KPX L V -100
+KPX L T -100
+
+KPX N period -60
+KPX N comma -60
+
+KPX O period -50
+KPX O comma -50
+KPX O Y -18
+KPX O X -18
+KPX O V -18
+KPX O T 18
+
+KPX P period -125
+KPX P o -55
+KPX P e -55
+KPX P comma -125
+KPX P a -55
+KPX P A -50
+
+KPX Q period -20
+KPX Q comma -20
+
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R U -18
+
+KPX S period -50
+KPX S comma -50
+
+KPX T y -50
+KPX T w -50
+KPX T u -50
+KPX T semicolon -50
+KPX T r -50
+KPX T period -100
+KPX T o -74
+KPX T i -18
+KPX T hyphen -100
+KPX T h -25
+KPX T e -74
+KPX T comma -100
+KPX T colon -50
+KPX T a -74
+KPX T O 18
+
+KPX U period -100
+KPX U comma -100
+KPX U A -18
+
+KPX V u -75
+KPX V semicolon -75
+KPX V period -100
+KPX V o -75
+KPX V i -50
+KPX V hyphen -100
+KPX V e -75
+KPX V comma -100
+KPX V colon -75
+KPX V a -75
+KPX V A -37
+
+KPX W y -55
+KPX W u -55
+KPX W semicolon -75
+KPX W period -100
+KPX W o -55
+KPX W i -20
+KPX W hyphen -75
+KPX W h -20
+KPX W e -55
+KPX W comma -100
+KPX W colon -75
+KPX W a -55
+KPX W A -55
+
+KPX Y u -100
+KPX Y semicolon -75
+KPX Y period -100
+KPX Y o -100
+KPX Y i -25
+KPX Y hyphen -100
+KPX Y e -100
+KPX Y comma -100
+KPX Y colon -75
+KPX Y a -100
+KPX Y A -55
+
+KPX b period -50
+KPX b comma -50
+KPX b b -10
+
+KPX c period -50
+KPX c k -18
+KPX c h -18
+KPX c comma -50
+
+KPX colon space -37
+
+KPX comma space -37
+KPX comma quoteright -37
+KPX comma quotedblright -37
+
+KPX e period -37
+KPX e comma -37
+
+KPX f quoteright 75
+KPX f quotedblright 75
+KPX f period -75
+KPX f o -10
+KPX f comma -75
+
+KPX g period -50
+KPX g comma -50
+
+KPX l y -10
+
+KPX o period -50
+KPX o comma -50
+
+KPX p period -50
+KPX p comma -50
+
+KPX period space -37
+KPX period quoteright -37
+KPX period quotedblright -37
+
+KPX quotedblleft A -75
+
+KPX quotedblright space -37
+
+KPX quoteleft quoteleft -37
+KPX quoteleft A -75
+
+KPX quoteright s -25
+KPX quoteright quoteright -37
+KPX quoteright d -37
+
+KPX r semicolon -25
+KPX r s -10
+KPX r period -125
+KPX r k -18
+KPX r hyphen -75
+KPX r comma -125
+KPX r colon -25
+
+KPX s period -50
+KPX s comma -50
+
+KPX semicolon space -37
+
+KPX space quoteleft -37
+KPX space quotedblleft -37
+KPX space Y -37
+KPX space W -37
+KPX space V -37
+KPX space T -37
+KPX space A -37
+
+KPX v period -75
+KPX v comma -75
+
+KPX w period -75
+KPX w comma -75
+
+KPX y period -75
+KPX y comma -75
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 246 256 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 246 256 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 231 256 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 246 256 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 216 246 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 231 256 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 255 256 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 255 256 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 255 256 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 255 256 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 97 256 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 97 256 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 97 256 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 97 256 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 301 256 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 283 256 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 283 256 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 283 256 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 283 256 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 283 256 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 227 256 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 301 256 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 301 256 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 301 256 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 301 256 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 256 256 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 236 256 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 227 256 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 121 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 121 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 121 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 121 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 121 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 121 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 56 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 56 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 56 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 56 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 139 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 84 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 84 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 84 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 84 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 56 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 139 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 139 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 84 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 84 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 65 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/NCS-Rm b/font/NCS-Rm
new file mode 100644
index 0000000..b9f616c
--- /dev/null
+++ b/font/NCS-Rm
@@ -0,0 +1,524 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue May 28 16:31:51 1991
+Comment UniqueID 35025
+Comment VMusage 30420 37312
+FontName NewCenturySchlbk-Roman
+FullName New Century Schoolbook Roman
+FamilyName New Century Schoolbook
+Weight Roman
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -195 -250 1000 965
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+EncodingScheme AdobeStandardEncoding
+CapHeight 722
+XHeight 464
+Ascender 737
+Descender -205
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 296 ; N exclam ; B 86 -15 210 737 ;
+C 34 ; WX 389 ; N quotedbl ; B 61 443 328 737 ;
+C 35 ; WX 556 ; N numbersign ; B 28 0 528 690 ;
+C 36 ; WX 556 ; N dollar ; B 45 -138 511 813 ;
+C 37 ; WX 833 ; N percent ; B 43 -15 790 705 ;
+C 38 ; WX 815 ; N ampersand ; B 51 -15 775 737 ;
+C 39 ; WX 204 ; N quoteright ; B 25 443 179 737 ;
+C 40 ; WX 333 ; N parenleft ; B 40 -117 279 745 ;
+C 41 ; WX 333 ; N parenright ; B 54 -117 293 745 ;
+C 42 ; WX 500 ; N asterisk ; B 57 306 443 737 ;
+C 43 ; WX 606 ; N plus ; B 50 0 556 506 ;
+C 44 ; WX 278 ; N comma ; B 62 -185 216 109 ;
+C 45 ; WX 333 ; N hyphen ; B 42 199 291 277 ;
+C 46 ; WX 278 ; N period ; B 77 -15 201 109 ;
+C 47 ; WX 278 ; N slash ; B -32 -15 310 737 ;
+C 48 ; WX 556 ; N zero ; B 42 -15 514 705 ;
+C 49 ; WX 556 ; N one ; B 100 0 496 705 ;
+C 50 ; WX 556 ; N two ; B 35 0 505 705 ;
+C 51 ; WX 556 ; N three ; B 42 -15 498 705 ;
+C 52 ; WX 556 ; N four ; B 28 0 528 705 ;
+C 53 ; WX 556 ; N five ; B 46 -15 502 705 ;
+C 54 ; WX 556 ; N six ; B 41 -15 515 705 ;
+C 55 ; WX 556 ; N seven ; B 59 -15 508 705 ;
+C 56 ; WX 556 ; N eight ; B 42 -15 514 705 ;
+C 57 ; WX 556 ; N nine ; B 41 -15 515 705 ;
+C 58 ; WX 278 ; N colon ; B 77 -15 201 474 ;
+C 59 ; WX 278 ; N semicolon ; B 62 -185 216 474 ;
+C 60 ; WX 606 ; N less ; B 50 -8 556 514 ;
+C 61 ; WX 606 ; N equal ; B 50 117 556 389 ;
+C 62 ; WX 606 ; N greater ; B 50 -8 556 514 ;
+C 63 ; WX 444 ; N question ; B 29 -15 415 737 ;
+C 64 ; WX 737 ; N at ; B -8 -15 744 737 ;
+C 65 ; WX 722 ; N A ; B -8 0 730 737 ;
+C 66 ; WX 722 ; N B ; B 29 0 669 722 ;
+C 67 ; WX 722 ; N C ; B 45 -15 668 737 ;
+C 68 ; WX 778 ; N D ; B 29 0 733 722 ;
+C 69 ; WX 722 ; N E ; B 29 0 663 722 ;
+C 70 ; WX 667 ; N F ; B 29 0 638 722 ;
+C 71 ; WX 778 ; N G ; B 45 -15 775 737 ;
+C 72 ; WX 833 ; N H ; B 29 0 804 722 ;
+C 73 ; WX 407 ; N I ; B 38 0 369 722 ;
+C 74 ; WX 556 ; N J ; B 5 -15 540 722 ;
+C 75 ; WX 778 ; N K ; B 29 0 803 722 ;
+C 76 ; WX 667 ; N L ; B 29 0 644 722 ;
+C 77 ; WX 944 ; N M ; B 29 0 915 722 ;
+C 78 ; WX 815 ; N N ; B 24 -15 791 722 ;
+C 79 ; WX 778 ; N O ; B 45 -15 733 737 ;
+C 80 ; WX 667 ; N P ; B 29 0 650 722 ;
+C 81 ; WX 778 ; N Q ; B 45 -190 748 737 ;
+C 82 ; WX 722 ; N R ; B 29 -15 713 722 ;
+C 83 ; WX 630 ; N S ; B 47 -15 583 737 ;
+C 84 ; WX 667 ; N T ; B 19 0 648 722 ;
+C 85 ; WX 815 ; N U ; B 16 -15 799 722 ;
+C 86 ; WX 722 ; N V ; B -8 -10 730 722 ;
+C 87 ; WX 981 ; N W ; B 5 -10 976 722 ;
+C 88 ; WX 704 ; N X ; B -8 0 712 722 ;
+C 89 ; WX 704 ; N Y ; B -11 0 715 722 ;
+C 90 ; WX 611 ; N Z ; B 24 0 576 722 ;
+C 91 ; WX 333 ; N bracketleft ; B 126 -109 315 737 ;
+C 92 ; WX 606 ; N backslash ; B 132 -15 474 737 ;
+C 93 ; WX 333 ; N bracketright ; B 18 -109 207 737 ;
+C 94 ; WX 606 ; N asciicircum ; B 89 325 517 690 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 204 ; N quoteleft ; B 25 443 179 737 ;
+C 97 ; WX 556 ; N a ; B 44 -15 542 479 ;
+C 98 ; WX 556 ; N b ; B 10 -15 522 737 ;
+C 99 ; WX 444 ; N c ; B 34 -15 426 479 ;
+C 100 ; WX 574 ; N d ; B 34 -15 552 737 ;
+C 101 ; WX 500 ; N e ; B 34 -15 466 479 ;
+C 102 ; WX 333 ; N f ; B 18 0 437 737 ; L i fi ; L l fl ;
+C 103 ; WX 537 ; N g ; B 23 -205 542 494 ;
+C 104 ; WX 611 ; N h ; B 7 0 592 737 ;
+C 105 ; WX 315 ; N i ; B 18 0 286 722 ;
+C 106 ; WX 296 ; N j ; B -86 -205 216 722 ;
+C 107 ; WX 593 ; N k ; B 10 0 589 737 ;
+C 108 ; WX 315 ; N l ; B 18 0 286 737 ;
+C 109 ; WX 889 ; N m ; B 26 0 863 479 ;
+C 110 ; WX 611 ; N n ; B 22 0 589 479 ;
+C 111 ; WX 500 ; N o ; B 34 -15 466 479 ;
+C 112 ; WX 574 ; N p ; B 22 -205 540 479 ;
+C 113 ; WX 556 ; N q ; B 34 -205 552 479 ;
+C 114 ; WX 444 ; N r ; B 18 0 434 479 ;
+C 115 ; WX 463 ; N s ; B 46 -15 417 479 ;
+C 116 ; WX 389 ; N t ; B 18 -15 371 666 ;
+C 117 ; WX 611 ; N u ; B 22 -15 589 464 ;
+C 118 ; WX 537 ; N v ; B -6 -10 515 464 ;
+C 119 ; WX 778 ; N w ; B 1 -10 749 464 ;
+C 120 ; WX 537 ; N x ; B 8 0 529 464 ;
+C 121 ; WX 537 ; N y ; B 4 -205 533 464 ;
+C 122 ; WX 481 ; N z ; B 42 0 439 464 ;
+C 123 ; WX 333 ; N braceleft ; B 54 -109 279 737 ;
+C 124 ; WX 606 ; N bar ; B 267 -250 339 750 ;
+C 125 ; WX 333 ; N braceright ; B 54 -109 279 737 ;
+C 126 ; WX 606 ; N asciitilde ; B 72 184 534 322 ;
+C 161 ; WX 296 ; N exclamdown ; B 86 -205 210 547 ;
+C 162 ; WX 556 ; N cent ; B 74 -141 482 584 ;
+C 163 ; WX 556 ; N sterling ; B 18 -15 538 705 ;
+C 164 ; WX 167 ; N fraction ; B -195 -15 362 705 ;
+C 165 ; WX 556 ; N yen ; B -1 0 557 690 ;
+C 166 ; WX 556 ; N florin ; B 0 -205 538 737 ;
+C 167 ; WX 500 ; N section ; B 55 -147 445 737 ;
+C 168 ; WX 556 ; N currency ; B 26 93 530 597 ;
+C 169 ; WX 204 ; N quotesingle ; B 59 443 145 737 ;
+C 170 ; WX 389 ; N quotedblleft ; B 25 443 364 737 ;
+C 171 ; WX 426 ; N guillemotleft ; B 39 78 387 398 ;
+C 172 ; WX 259 ; N guilsinglleft ; B 39 78 220 398 ;
+C 173 ; WX 259 ; N guilsinglright ; B 39 78 220 398 ;
+C 174 ; WX 611 ; N fi ; B 18 0 582 737 ;
+C 175 ; WX 611 ; N fl ; B 18 0 582 737 ;
+C 177 ; WX 556 ; N endash ; B 0 208 556 268 ;
+C 178 ; WX 500 ; N dagger ; B 42 -147 458 737 ;
+C 179 ; WX 500 ; N daggerdbl ; B 42 -149 458 737 ;
+C 180 ; WX 278 ; N periodcentered ; B 71 238 207 374 ;
+C 182 ; WX 606 ; N paragraph ; B 60 -132 546 722 ;
+C 183 ; WX 606 ; N bullet ; B 122 180 484 542 ;
+C 184 ; WX 204 ; N quotesinglbase ; B 25 -185 179 109 ;
+C 185 ; WX 389 ; N quotedblbase ; B 25 -185 364 109 ;
+C 186 ; WX 389 ; N quotedblright ; B 25 443 364 737 ;
+C 187 ; WX 426 ; N guillemotright ; B 39 78 387 398 ;
+C 188 ; WX 1000 ; N ellipsis ; B 105 -15 895 109 ;
+C 189 ; WX 1000 ; N perthousand ; B 6 -15 994 705 ;
+C 191 ; WX 444 ; N questiondown ; B 29 -205 415 547 ;
+C 193 ; WX 333 ; N grave ; B 17 528 242 699 ;
+C 194 ; WX 333 ; N acute ; B 91 528 316 699 ;
+C 195 ; WX 333 ; N circumflex ; B 10 528 323 695 ;
+C 196 ; WX 333 ; N tilde ; B 1 553 332 655 ;
+C 197 ; WX 333 ; N macron ; B 10 568 323 623 ;
+C 198 ; WX 333 ; N breve ; B 25 528 308 685 ;
+C 199 ; WX 333 ; N dotaccent ; B 116 543 218 645 ;
+C 200 ; WX 333 ; N dieresis ; B 16 543 317 645 ;
+C 202 ; WX 333 ; N ring ; B 66 522 266 722 ;
+C 203 ; WX 333 ; N cedilla ; B 29 -215 237 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -9 528 416 699 ;
+C 206 ; WX 333 ; N ogonek ; B 68 -215 254 0 ;
+C 207 ; WX 333 ; N caron ; B 10 528 323 695 ;
+C 208 ; WX 1000 ; N emdash ; B 0 208 1000 268 ;
+C 225 ; WX 1000 ; N AE ; B 0 0 962 722 ;
+C 227 ; WX 334 ; N ordfeminine ; B -4 407 338 705 ;
+C 232 ; WX 667 ; N Lslash ; B 29 0 644 722 ;
+C 233 ; WX 778 ; N Oslash ; B 45 -56 733 778 ;
+C 234 ; WX 1000 ; N OE ; B 21 0 979 722 ;
+C 235 ; WX 300 ; N ordmasculine ; B 4 407 296 705 ;
+C 241 ; WX 796 ; N ae ; B 34 -15 762 479 ;
+C 245 ; WX 315 ; N dotlessi ; B 18 0 286 464 ;
+C 248 ; WX 315 ; N lslash ; B 18 0 286 737 ;
+C 249 ; WX 500 ; N oslash ; B 34 -97 466 561 ;
+C 250 ; WX 833 ; N oe ; B 34 -15 799 479 ;
+C 251 ; WX 574 ; N germandbls ; B 30 -15 537 737 ;
+C -1 ; WX 500 ; N ecircumflex ; B 34 -15 466 695 ;
+C -1 ; WX 500 ; N edieresis ; B 34 -15 466 645 ;
+C -1 ; WX 556 ; N aacute ; B 44 -15 542 699 ;
+C -1 ; WX 737 ; N registered ; B -8 -15 744 737 ;
+C -1 ; WX 315 ; N icircumflex ; B 1 0 314 695 ;
+C -1 ; WX 611 ; N udieresis ; B 22 -15 589 645 ;
+C -1 ; WX 500 ; N ograve ; B 34 -15 466 699 ;
+C -1 ; WX 611 ; N uacute ; B 22 -15 589 699 ;
+C -1 ; WX 611 ; N ucircumflex ; B 22 -15 589 695 ;
+C -1 ; WX 722 ; N Aacute ; B -8 0 730 937 ;
+C -1 ; WX 315 ; N igrave ; B 8 0 286 699 ;
+C -1 ; WX 407 ; N Icircumflex ; B 38 0 369 933 ;
+C -1 ; WX 444 ; N ccedilla ; B 34 -215 426 479 ;
+C -1 ; WX 556 ; N adieresis ; B 44 -15 542 645 ;
+C -1 ; WX 722 ; N Ecircumflex ; B 29 0 663 933 ;
+C -1 ; WX 463 ; N scaron ; B 46 -15 417 695 ;
+C -1 ; WX 574 ; N thorn ; B 22 -205 540 737 ;
+C -1 ; WX 1000 ; N trademark ; B 32 318 968 722 ;
+C -1 ; WX 500 ; N egrave ; B 34 -15 466 699 ;
+C -1 ; WX 333 ; N threesuperior ; B 18 273 315 705 ;
+C -1 ; WX 481 ; N zcaron ; B 42 0 439 695 ;
+C -1 ; WX 556 ; N atilde ; B 44 -15 542 655 ;
+C -1 ; WX 556 ; N aring ; B 44 -15 542 732 ;
+C -1 ; WX 500 ; N ocircumflex ; B 34 -15 466 695 ;
+C -1 ; WX 722 ; N Edieresis ; B 29 0 663 883 ;
+C -1 ; WX 834 ; N threequarters ; B 28 -15 795 705 ;
+C -1 ; WX 537 ; N ydieresis ; B 4 -205 533 645 ;
+C -1 ; WX 537 ; N yacute ; B 4 -205 533 699 ;
+C -1 ; WX 315 ; N iacute ; B 18 0 307 699 ;
+C -1 ; WX 722 ; N Acircumflex ; B -8 0 730 933 ;
+C -1 ; WX 815 ; N Uacute ; B 16 -15 799 937 ;
+C -1 ; WX 500 ; N eacute ; B 34 -15 466 699 ;
+C -1 ; WX 778 ; N Ograve ; B 45 -15 733 937 ;
+C -1 ; WX 556 ; N agrave ; B 44 -15 542 699 ;
+C -1 ; WX 815 ; N Udieresis ; B 16 -15 799 883 ;
+C -1 ; WX 556 ; N acircumflex ; B 44 -15 542 695 ;
+C -1 ; WX 407 ; N Igrave ; B 38 0 369 937 ;
+C -1 ; WX 333 ; N twosuperior ; B 14 282 319 705 ;
+C -1 ; WX 815 ; N Ugrave ; B 16 -15 799 937 ;
+C -1 ; WX 834 ; N onequarter ; B 39 -15 795 705 ;
+C -1 ; WX 815 ; N Ucircumflex ; B 16 -15 799 933 ;
+C -1 ; WX 630 ; N Scaron ; B 47 -15 583 933 ;
+C -1 ; WX 407 ; N Idieresis ; B 38 0 369 883 ;
+C -1 ; WX 315 ; N idieresis ; B 7 0 308 645 ;
+C -1 ; WX 722 ; N Egrave ; B 29 0 663 937 ;
+C -1 ; WX 778 ; N Oacute ; B 45 -15 733 937 ;
+C -1 ; WX 606 ; N divide ; B 50 -22 556 528 ;
+C -1 ; WX 722 ; N Atilde ; B -8 0 730 893 ;
+C -1 ; WX 722 ; N Aring ; B -8 0 730 965 ;
+C -1 ; WX 778 ; N Odieresis ; B 45 -15 733 883 ;
+C -1 ; WX 722 ; N Adieresis ; B -8 0 730 883 ;
+C -1 ; WX 815 ; N Ntilde ; B 24 -15 791 893 ;
+C -1 ; WX 611 ; N Zcaron ; B 24 0 576 933 ;
+C -1 ; WX 667 ; N Thorn ; B 29 0 650 722 ;
+C -1 ; WX 407 ; N Iacute ; B 38 0 369 937 ;
+C -1 ; WX 606 ; N plusminus ; B 50 0 556 506 ;
+C -1 ; WX 606 ; N multiply ; B 74 24 532 482 ;
+C -1 ; WX 722 ; N Eacute ; B 29 0 663 937 ;
+C -1 ; WX 704 ; N Ydieresis ; B -11 0 715 883 ;
+C -1 ; WX 333 ; N onesuperior ; B 39 282 294 705 ;
+C -1 ; WX 611 ; N ugrave ; B 22 -15 589 699 ;
+C -1 ; WX 606 ; N logicalnot ; B 50 108 556 389 ;
+C -1 ; WX 611 ; N ntilde ; B 22 0 589 655 ;
+C -1 ; WX 778 ; N Otilde ; B 45 -15 733 893 ;
+C -1 ; WX 500 ; N otilde ; B 34 -15 466 655 ;
+C -1 ; WX 722 ; N Ccedilla ; B 45 -215 668 737 ;
+C -1 ; WX 722 ; N Agrave ; B -8 0 730 937 ;
+C -1 ; WX 834 ; N onehalf ; B 39 -15 820 705 ;
+C -1 ; WX 778 ; N Eth ; B 29 0 733 722 ;
+C -1 ; WX 400 ; N degree ; B 57 419 343 705 ;
+C -1 ; WX 704 ; N Yacute ; B -11 0 715 937 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 45 -15 733 933 ;
+C -1 ; WX 500 ; N oacute ; B 34 -15 466 699 ;
+C -1 ; WX 611 ; N mu ; B 22 -205 589 464 ;
+C -1 ; WX 606 ; N minus ; B 50 217 556 289 ;
+C -1 ; WX 500 ; N eth ; B 34 -15 466 752 ;
+C -1 ; WX 500 ; N odieresis ; B 34 -15 466 645 ;
+C -1 ; WX 737 ; N copyright ; B -8 -15 744 737 ;
+C -1 ; WX 606 ; N brokenbar ; B 267 -175 339 675 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 169
+
+KPX A y -37
+KPX A w -25
+KPX A v -37
+KPX A quoteright -74
+KPX A quotedblright -74
+KPX A Y -75
+KPX A W -50
+KPX A V -75
+KPX A U -30
+KPX A T -18
+
+KPX B period -37
+KPX B comma -37
+KPX B A -18
+
+KPX C period -37
+KPX C comma -37
+KPX C A -18
+
+KPX D period -37
+KPX D comma -37
+KPX D Y -18
+KPX D V -18
+
+KPX F r -10
+KPX F period -125
+KPX F o -55
+KPX F i -10
+KPX F e -55
+KPX F comma -125
+KPX F a -65
+KPX F A -50
+
+KPX G period -37
+KPX G comma -37
+
+KPX J u -25
+KPX J period -74
+KPX J o -25
+KPX J e -25
+KPX J comma -74
+KPX J a -25
+KPX J A -18
+
+KPX K y -25
+KPX K o 10
+KPX K e 10
+
+KPX L y -25
+KPX L quoteright -100
+KPX L quotedblright -100
+KPX L Y -74
+KPX L W -74
+KPX L V -91
+KPX L T -75
+
+KPX N period -55
+KPX N comma -55
+
+KPX O period -37
+KPX O comma -37
+KPX O Y -18
+KPX O V -18
+KPX O T 10
+
+KPX P period -125
+KPX P o -37
+KPX P e -37
+KPX P comma -125
+KPX P a -37
+KPX P A -55
+
+KPX Q period -25
+KPX Q comma -25
+
+KPX S period -37
+KPX S comma -37
+
+KPX T semicolon -37
+KPX T period -125
+KPX T o -55
+KPX T hyphen -100
+KPX T e -55
+KPX T comma -125
+KPX T colon -37
+KPX T a -55
+KPX T O 10
+KPX T A -18
+
+KPX U period -100
+KPX U comma -100
+KPX U A -30
+
+KPX V u -75
+KPX V semicolon -75
+KPX V period -125
+KPX V o -75
+KPX V i -18
+KPX V hyphen -100
+KPX V e -75
+KPX V comma -125
+KPX V colon -75
+KPX V a -85
+KPX V O -18
+KPX V A -74
+
+KPX W y -55
+KPX W u -55
+KPX W semicolon -100
+KPX W period -125
+KPX W o -60
+KPX W i -18
+KPX W hyphen -100
+KPX W e -60
+KPX W comma -125
+KPX W colon -100
+KPX W a -75
+KPX W A -50
+
+KPX Y u -91
+KPX Y semicolon -75
+KPX Y period -100
+KPX Y o -100
+KPX Y i -18
+KPX Y hyphen -125
+KPX Y e -100
+KPX Y comma -100
+KPX Y colon -75
+KPX Y a -100
+KPX Y O -18
+KPX Y A -75
+
+KPX a y -10
+KPX a w -10
+KPX a v -10
+
+KPX b period -18
+KPX b comma -18
+
+KPX c period -18
+KPX c l -7
+KPX c k -7
+KPX c h -7
+KPX c comma -18
+
+KPX colon space -37
+
+KPX comma space -37
+KPX comma quoteright -37
+KPX comma quotedblright -37
+
+KPX e period -18
+KPX e comma -18
+
+KPX f quoteright 100
+KPX f quotedblright 100
+KPX f period -37
+KPX f comma -37
+
+KPX g period -25
+KPX g comma -25
+
+KPX o period -18
+KPX o comma -18
+
+KPX p period -18
+KPX p comma -18
+
+KPX period space -37
+KPX period quoteright -37
+KPX period quotedblright -37
+
+KPX quotedblleft A -74
+
+KPX quotedblright space -37
+
+KPX quoteleft quoteleft -25
+KPX quoteleft A -74
+
+KPX quoteright s -25
+KPX quoteright quoteright -25
+KPX quoteright d -37
+
+KPX r period -100
+KPX r hyphen -37
+KPX r comma -100
+
+KPX s period -25
+KPX s comma -25
+
+KPX semicolon space -37
+
+KPX space quoteleft -37
+KPX space quotedblleft -37
+KPX space Y -37
+KPX space W -37
+KPX space V -37
+KPX space T -37
+KPX space A -37
+
+KPX v period -125
+KPX v comma -125
+
+KPX w period -125
+KPX w comma -125
+KPX w a -18
+
+KPX y period -125
+KPX y comma -125
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 195 238 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 195 238 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 195 238 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 195 238 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 195 243 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 195 238 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 195 238 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 195 238 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 195 238 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 195 238 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 37 238 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 37 238 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 37 238 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 37 238 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 241 238 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 223 238 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 223 238 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 223 238 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 223 238 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 223 238 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 149 238 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 241 238 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 241 238 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 241 238 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 241 238 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 216 238 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 186 238 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 139 238 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 112 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 112 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 112 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 112 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 112 10 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 112 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 84 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 84 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 84 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 84 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -9 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -9 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -9 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -9 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 139 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 84 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 84 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 84 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 84 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 65 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 139 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 139 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 102 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 102 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 74 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Pa-Bd b/font/Pa-Bd
new file mode 100644
index 0000000..de7698d
--- /dev/null
+++ b/font/Pa-Bd
@@ -0,0 +1,434 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Jul  2 22:26:30 1990
+Comment UniqueID 31793
+Comment VMusage 36031 46923
+FontName Palatino-Bold
+FullName Palatino Bold
+FamilyName Palatino
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -152 -266 1000 924
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.005
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Palatino is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 471
+Ascender 720
+Descender -258
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 63 -12 219 688 ;
+C 34 ; WX 402 ; N quotedbl ; B 22 376 380 695 ;
+C 35 ; WX 500 ; N numbersign ; B 4 0 496 673 ;
+C 36 ; WX 500 ; N dollar ; B 28 -114 472 721 ;
+C 37 ; WX 889 ; N percent ; B 61 -9 828 714 ;
+C 38 ; WX 833 ; N ampersand ; B 52 -17 813 684 ;
+C 39 ; WX 278 ; N quoteright ; B 29 405 249 695 ;
+C 40 ; WX 333 ; N parenleft ; B 65 -104 305 723 ;
+C 41 ; WX 333 ; N parenright ; B 28 -104 268 723 ;
+C 42 ; WX 444 ; N asterisk ; B 44 332 399 695 ;
+C 43 ; WX 606 ; N plus ; B 51 0 555 505 ;
+C 44 ; WX 250 ; N comma ; B -6 -166 227 141 ;
+C 45 ; WX 333 ; N hyphen ; B 16 195 317 305 ;
+C 46 ; WX 250 ; N period ; B 47 -12 203 144 ;
+C 47 ; WX 296 ; N slash ; B -9 -17 305 720 ;
+C 48 ; WX 500 ; N zero ; B 33 -17 468 660 ;
+C 49 ; WX 500 ; N one ; B 35 -3 455 670 ;
+C 50 ; WX 500 ; N two ; B 25 -3 472 660 ;
+C 51 ; WX 500 ; N three ; B 22 -17 458 660 ;
+C 52 ; WX 500 ; N four ; B 12 -3 473 672 ;
+C 53 ; WX 500 ; N five ; B 42 -17 472 656 ;
+C 54 ; WX 500 ; N six ; B 37 -17 469 660 ;
+C 55 ; WX 500 ; N seven ; B 46 -3 493 656 ;
+C 56 ; WX 500 ; N eight ; B 34 -17 467 660 ;
+C 57 ; WX 500 ; N nine ; B 31 -17 463 660 ;
+C 58 ; WX 250 ; N colon ; B 47 -12 203 454 ;
+C 59 ; WX 250 ; N semicolon ; B -6 -166 227 454 ;
+C 60 ; WX 606 ; N less ; B 49 -15 558 519 ;
+C 61 ; WX 606 ; N equal ; B 51 114 555 396 ;
+C 62 ; WX 606 ; N greater ; B 49 -15 558 519 ;
+C 63 ; WX 444 ; N question ; B 43 -12 411 687 ;
+C 64 ; WX 747 ; N at ; B 42 -12 704 681 ;
+C 65 ; WX 778 ; N A ; B 24 -3 757 686 ;
+C 66 ; WX 667 ; N B ; B 39 -3 611 681 ;
+C 67 ; WX 722 ; N C ; B 44 -17 695 695 ;
+C 68 ; WX 833 ; N D ; B 35 -3 786 681 ;
+C 69 ; WX 611 ; N E ; B 39 -4 577 681 ;
+C 70 ; WX 556 ; N F ; B 28 -3 539 681 ;
+C 71 ; WX 833 ; N G ; B 47 -17 776 695 ;
+C 72 ; WX 833 ; N H ; B 36 -3 796 681 ;
+C 73 ; WX 389 ; N I ; B 39 -3 350 681 ;
+C 74 ; WX 389 ; N J ; B -11 -213 350 681 ;
+C 75 ; WX 778 ; N K ; B 39 -3 763 681 ;
+C 76 ; WX 611 ; N L ; B 39 -4 577 681 ;
+C 77 ; WX 1000 ; N M ; B 32 -10 968 681 ;
+C 78 ; WX 833 ; N N ; B 35 -16 798 681 ;
+C 79 ; WX 833 ; N O ; B 47 -17 787 695 ;
+C 80 ; WX 611 ; N P ; B 39 -3 594 681 ;
+C 81 ; WX 833 ; N Q ; B 47 -184 787 695 ;
+C 82 ; WX 722 ; N R ; B 39 -3 708 681 ;
+C 83 ; WX 611 ; N S ; B 57 -17 559 695 ;
+C 84 ; WX 667 ; N T ; B 17 -3 650 681 ;
+C 85 ; WX 778 ; N U ; B 26 -17 760 681 ;
+C 86 ; WX 778 ; N V ; B 20 -3 763 681 ;
+C 87 ; WX 1000 ; N W ; B 17 -3 988 686 ;
+C 88 ; WX 667 ; N X ; B 17 -3 650 695 ;
+C 89 ; WX 667 ; N Y ; B 15 -3 660 695 ;
+C 90 ; WX 667 ; N Z ; B 24 -3 627 681 ;
+C 91 ; WX 333 ; N bracketleft ; B 73 -104 291 720 ;
+C 92 ; WX 606 ; N backslash ; B 72 0 534 720 ;
+C 93 ; WX 333 ; N bracketright ; B 42 -104 260 720 ;
+C 94 ; WX 606 ; N asciicircum ; B 52 275 554 678 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 278 ; N quoteleft ; B 29 405 249 695 ;
+C 97 ; WX 500 ; N a ; B 40 -17 478 471 ;
+C 98 ; WX 611 ; N b ; B 10 -17 556 720 ;
+C 99 ; WX 444 ; N c ; B 37 -17 414 471 ;
+C 100 ; WX 611 ; N d ; B 42 -17 577 720 ;
+C 101 ; WX 500 ; N e ; B 42 -17 461 471 ;
+C 102 ; WX 389 ; N f ; B 34 -3 381 720 ; L i fi ; L l fl ;
+C 103 ; WX 556 ; N g ; B 26 -266 535 471 ;
+C 104 ; WX 611 ; N h ; B 24 -3 587 720 ;
+C 105 ; WX 333 ; N i ; B 34 -3 298 706 ;
+C 106 ; WX 333 ; N j ; B 3 -266 241 706 ;
+C 107 ; WX 611 ; N k ; B 21 -3 597 720 ;
+C 108 ; WX 333 ; N l ; B 24 -3 296 720 ;
+C 109 ; WX 889 ; N m ; B 24 -3 864 471 ;
+C 110 ; WX 611 ; N n ; B 24 -3 587 471 ;
+C 111 ; WX 556 ; N o ; B 40 -17 517 471 ;
+C 112 ; WX 611 ; N p ; B 29 -258 567 471 ;
+C 113 ; WX 611 ; N q ; B 52 -258 589 471 ;
+C 114 ; WX 389 ; N r ; B 30 -3 389 471 ;
+C 115 ; WX 444 ; N s ; B 39 -17 405 471 ;
+C 116 ; WX 333 ; N t ; B 22 -17 324 632 ;
+C 117 ; WX 611 ; N u ; B 25 -17 583 471 ;
+C 118 ; WX 556 ; N v ; B 11 -3 545 459 ;
+C 119 ; WX 833 ; N w ; B 13 -3 820 471 ;
+C 120 ; WX 500 ; N x ; B 20 -3 483 471 ;
+C 121 ; WX 556 ; N y ; B 10 -266 546 459 ;
+C 122 ; WX 500 ; N z ; B 16 -3 464 459 ;
+C 123 ; WX 310 ; N braceleft ; B 5 -117 288 725 ;
+C 124 ; WX 606 ; N bar ; B 260 0 346 720 ;
+C 125 ; WX 310 ; N braceright ; B 22 -117 305 725 ;
+C 126 ; WX 606 ; N asciitilde ; B 51 155 555 342 ;
+C 161 ; WX 278 ; N exclamdown ; B 59 -227 215 471 ;
+C 162 ; WX 500 ; N cent ; B 73 -106 450 554 ;
+C 163 ; WX 500 ; N sterling ; B -2 -19 501 676 ;
+C 164 ; WX 167 ; N fraction ; B -152 0 320 660 ;
+C 165 ; WX 500 ; N yen ; B 17 -3 483 695 ;
+C 166 ; WX 500 ; N florin ; B 11 -242 490 703 ;
+C 167 ; WX 500 ; N section ; B 30 -217 471 695 ;
+C 168 ; WX 500 ; N currency ; B 32 96 468 533 ;
+C 169 ; WX 227 ; N quotesingle ; B 45 376 181 695 ;
+C 170 ; WX 500 ; N quotedblleft ; B 34 405 466 695 ;
+C 171 ; WX 500 ; N guillemotleft ; B 36 44 463 438 ;
+C 172 ; WX 389 ; N guilsinglleft ; B 82 44 307 438 ;
+C 173 ; WX 389 ; N guilsinglright ; B 82 44 307 438 ;
+C 174 ; WX 611 ; N fi ; B 10 -3 595 720 ;
+C 175 ; WX 611 ; N fl ; B 17 -3 593 720 ;
+C 177 ; WX 500 ; N endash ; B 0 208 500 291 ;
+C 178 ; WX 500 ; N dagger ; B 29 -6 472 682 ;
+C 179 ; WX 500 ; N daggerdbl ; B 32 -245 468 682 ;
+C 180 ; WX 250 ; N periodcentered ; B 47 179 203 335 ;
+C 182 ; WX 641 ; N paragraph ; B 19 -161 599 683 ;
+C 183 ; WX 606 ; N bullet ; B 131 172 475 516 ;
+C 184 ; WX 333 ; N quotesinglbase ; B 56 -160 276 130 ;
+C 185 ; WX 500 ; N quotedblbase ; B 34 -160 466 130 ;
+C 186 ; WX 500 ; N quotedblright ; B 34 405 466 695 ;
+C 187 ; WX 500 ; N guillemotright ; B 37 44 464 438 ;
+C 188 ; WX 1000 ; N ellipsis ; B 89 -12 911 144 ;
+C 189 ; WX 1000 ; N perthousand ; B 33 -9 982 724 ;
+C 191 ; WX 444 ; N questiondown ; B 33 -231 401 471 ;
+C 193 ; WX 333 ; N grave ; B 18 506 256 691 ;
+C 194 ; WX 333 ; N acute ; B 78 506 316 691 ;
+C 195 ; WX 333 ; N circumflex ; B -2 506 335 681 ;
+C 196 ; WX 333 ; N tilde ; B -16 535 349 661 ;
+C 197 ; WX 333 ; N macron ; B 1 538 332 609 ;
+C 198 ; WX 333 ; N breve ; B 15 506 318 669 ;
+C 199 ; WX 333 ; N dotaccent ; B 100 537 234 671 ;
+C 200 ; WX 333 ; N dieresis ; B -8 537 341 671 ;
+C 202 ; WX 333 ; N ring ; B 67 500 267 700 ;
+C 203 ; WX 333 ; N cedilla ; B 73 -225 300 -7 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -56 506 390 691 ;
+C 206 ; WX 333 ; N ogonek ; B 60 -246 274 -17 ;
+C 207 ; WX 333 ; N caron ; B -2 510 335 685 ;
+C 208 ; WX 1000 ; N emdash ; B 0 208 1000 291 ;
+C 225 ; WX 1000 ; N AE ; B 12 -4 954 681 ;
+C 227 ; WX 438 ; N ordfeminine ; B 77 367 361 660 ;
+C 232 ; WX 611 ; N Lslash ; B 16 -4 577 681 ;
+C 233 ; WX 833 ; N Oslash ; B 32 -20 808 698 ;
+C 234 ; WX 1000 ; N OE ; B 43 -17 985 695 ;
+C 235 ; WX 488 ; N ordmasculine ; B 89 367 399 660 ;
+C 241 ; WX 778 ; N ae ; B 46 -17 731 471 ;
+C 245 ; WX 333 ; N dotlessi ; B 34 -3 298 471 ;
+C 248 ; WX 333 ; N lslash ; B -4 -3 334 720 ;
+C 249 ; WX 556 ; N oslash ; B 23 -18 534 471 ;
+C 250 ; WX 833 ; N oe ; B 48 -17 799 471 ;
+C 251 ; WX 611 ; N germandbls ; B 30 -17 565 720 ;
+C -1 ; WX 667 ; N Zcaron ; B 24 -3 627 909 ;
+C -1 ; WX 444 ; N ccedilla ; B 37 -225 414 471 ;
+C -1 ; WX 556 ; N ydieresis ; B 10 -266 546 691 ;
+C -1 ; WX 500 ; N atilde ; B 40 -17 478 673 ;
+C -1 ; WX 333 ; N icircumflex ; B -2 -3 335 701 ;
+C -1 ; WX 300 ; N threesuperior ; B 9 261 292 667 ;
+C -1 ; WX 500 ; N ecircumflex ; B 42 -17 461 701 ;
+C -1 ; WX 611 ; N thorn ; B 17 -258 563 720 ;
+C -1 ; WX 500 ; N egrave ; B 42 -17 461 711 ;
+C -1 ; WX 300 ; N twosuperior ; B 5 261 295 660 ;
+C -1 ; WX 500 ; N eacute ; B 42 -17 461 711 ;
+C -1 ; WX 556 ; N otilde ; B 40 -17 517 673 ;
+C -1 ; WX 778 ; N Aacute ; B 24 -3 757 915 ;
+C -1 ; WX 556 ; N ocircumflex ; B 40 -17 517 701 ;
+C -1 ; WX 556 ; N yacute ; B 10 -266 546 711 ;
+C -1 ; WX 611 ; N udieresis ; B 25 -17 583 691 ;
+C -1 ; WX 750 ; N threequarters ; B 15 -2 735 667 ;
+C -1 ; WX 500 ; N acircumflex ; B 40 -17 478 701 ;
+C -1 ; WX 833 ; N Eth ; B 10 -3 786 681 ;
+C -1 ; WX 500 ; N edieresis ; B 42 -17 461 691 ;
+C -1 ; WX 611 ; N ugrave ; B 25 -17 583 711 ;
+C -1 ; WX 998 ; N trademark ; B 38 274 961 678 ;
+C -1 ; WX 556 ; N ograve ; B 40 -17 517 711 ;
+C -1 ; WX 444 ; N scaron ; B 39 -17 405 693 ;
+C -1 ; WX 389 ; N Idieresis ; B 20 -3 369 895 ;
+C -1 ; WX 611 ; N uacute ; B 25 -17 583 711 ;
+C -1 ; WX 500 ; N agrave ; B 40 -17 478 711 ;
+C -1 ; WX 611 ; N ntilde ; B 24 -3 587 673 ;
+C -1 ; WX 500 ; N aring ; B 40 -17 478 700 ;
+C -1 ; WX 500 ; N zcaron ; B 16 -3 464 693 ;
+C -1 ; WX 389 ; N Icircumflex ; B 26 -3 363 905 ;
+C -1 ; WX 833 ; N Ntilde ; B 35 -16 798 885 ;
+C -1 ; WX 611 ; N ucircumflex ; B 25 -17 583 701 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 39 -4 577 905 ;
+C -1 ; WX 389 ; N Iacute ; B 39 -3 350 915 ;
+C -1 ; WX 722 ; N Ccedilla ; B 44 -225 695 695 ;
+C -1 ; WX 833 ; N Odieresis ; B 47 -17 787 895 ;
+C -1 ; WX 611 ; N Scaron ; B 57 -17 559 909 ;
+C -1 ; WX 611 ; N Edieresis ; B 39 -4 577 895 ;
+C -1 ; WX 389 ; N Igrave ; B 39 -3 350 915 ;
+C -1 ; WX 500 ; N adieresis ; B 40 -17 478 691 ;
+C -1 ; WX 833 ; N Ograve ; B 47 -17 787 915 ;
+C -1 ; WX 611 ; N Egrave ; B 39 -4 577 915 ;
+C -1 ; WX 667 ; N Ydieresis ; B 15 -3 660 895 ;
+C -1 ; WX 747 ; N registered ; B 26 -17 720 695 ;
+C -1 ; WX 833 ; N Otilde ; B 47 -17 787 885 ;
+C -1 ; WX 750 ; N onequarter ; B 19 -2 735 665 ;
+C -1 ; WX 778 ; N Ugrave ; B 26 -17 760 915 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 26 -17 760 905 ;
+C -1 ; WX 611 ; N Thorn ; B 39 -3 574 681 ;
+C -1 ; WX 606 ; N divide ; B 51 0 555 510 ;
+C -1 ; WX 778 ; N Atilde ; B 24 -3 757 885 ;
+C -1 ; WX 778 ; N Uacute ; B 26 -17 760 915 ;
+C -1 ; WX 833 ; N Ocircumflex ; B 47 -17 787 905 ;
+C -1 ; WX 606 ; N logicalnot ; B 51 114 555 396 ;
+C -1 ; WX 778 ; N Aring ; B 24 -3 757 924 ;
+C -1 ; WX 333 ; N idieresis ; B -8 -3 341 691 ;
+C -1 ; WX 333 ; N iacute ; B 34 -3 316 711 ;
+C -1 ; WX 500 ; N aacute ; B 40 -17 478 711 ;
+C -1 ; WX 606 ; N plusminus ; B 51 0 555 505 ;
+C -1 ; WX 606 ; N multiply ; B 72 21 534 483 ;
+C -1 ; WX 778 ; N Udieresis ; B 26 -17 760 895 ;
+C -1 ; WX 606 ; N minus ; B 51 212 555 298 ;
+C -1 ; WX 300 ; N onesuperior ; B 14 261 287 665 ;
+C -1 ; WX 611 ; N Eacute ; B 39 -4 577 915 ;
+C -1 ; WX 778 ; N Acircumflex ; B 24 -3 757 905 ;
+C -1 ; WX 747 ; N copyright ; B 26 -17 720 695 ;
+C -1 ; WX 778 ; N Agrave ; B 24 -3 757 915 ;
+C -1 ; WX 556 ; N odieresis ; B 40 -17 517 691 ;
+C -1 ; WX 556 ; N oacute ; B 40 -17 517 711 ;
+C -1 ; WX 400 ; N degree ; B 50 360 350 660 ;
+C -1 ; WX 333 ; N igrave ; B 18 -3 298 711 ;
+C -1 ; WX 611 ; N mu ; B 25 -225 583 471 ;
+C -1 ; WX 833 ; N Oacute ; B 47 -17 787 915 ;
+C -1 ; WX 556 ; N eth ; B 40 -17 517 720 ;
+C -1 ; WX 778 ; N Adieresis ; B 24 -3 757 895 ;
+C -1 ; WX 667 ; N Yacute ; B 15 -3 660 915 ;
+C -1 ; WX 606 ; N brokenbar ; B 260 0 346 720 ;
+C -1 ; WX 750 ; N onehalf ; B 9 -2 745 665 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 101
+
+KPX A y -70
+KPX A w -70
+KPX A v -70
+KPX A space -18
+KPX A quoteright -92
+KPX A Y -111
+KPX A W -90
+KPX A V -129
+KPX A T -92
+
+KPX F period -111
+KPX F comma -111
+KPX F A -55
+
+KPX L y -74
+KPX L space -18
+KPX L quoteright -74
+KPX L Y -92
+KPX L W -92
+KPX L V -92
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -74
+
+KPX R y -30
+KPX R Y -55
+KPX R W -37
+KPX R V -74
+KPX R T -55
+
+KPX T y -90
+KPX T w -90
+KPX T u -129
+KPX T semicolon -74
+KPX T s -111
+KPX T r -111
+KPX T period -92
+KPX T o -111
+KPX T i -55
+KPX T hyphen -92
+KPX T e -111
+KPX T comma -92
+KPX T colon -74
+KPX T c -129
+KPX T a -111
+KPX T A -92
+
+KPX V y -90
+KPX V u -92
+KPX V semicolon -74
+KPX V r -111
+KPX V period -129
+KPX V o -111
+KPX V i -55
+KPX V hyphen -92
+KPX V e -111
+KPX V comma -129
+KPX V colon -74
+KPX V a -111
+KPX V A -129
+
+KPX W y -74
+KPX W u -74
+KPX W semicolon -37
+KPX W r -74
+KPX W period -37
+KPX W o -74
+KPX W i -37
+KPX W hyphen -37
+KPX W e -74
+KPX W comma -92
+KPX W colon -37
+KPX W a -74
+KPX W A -90
+
+KPX Y v -74
+KPX Y u -74
+KPX Y semicolon -55
+KPX Y q -92
+KPX Y period -74
+KPX Y p -74
+KPX Y o -74
+KPX Y i -55
+KPX Y hyphen -74
+KPX Y e -74
+KPX Y comma -74
+KPX Y colon -55
+KPX Y a -74
+KPX Y A -55
+
+KPX f quoteright 37
+KPX f f -18
+
+KPX one one -37
+
+KPX quoteleft quoteleft -55
+
+KPX quoteright t -18
+KPX quoteright space -55
+KPX quoteright s -55
+KPX quoteright quoteright -55
+
+KPX r quoteright 55
+KPX r period -55
+KPX r hyphen -18
+KPX r comma -55
+
+KPX v period -111
+KPX v comma -111
+
+KPX w period -92
+KPX w comma -92
+
+KPX y period -92
+KPX y comma -92
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 223 224 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 211 224 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 223 224 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 215 224 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 223 224 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 223 224 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 195 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 224 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 224 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 224 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 224 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 28 224 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 28 224 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 28 224 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 224 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 250 224 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 250 224 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 250 224 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 250 224 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 250 224 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 250 224 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 139 224 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 235 224 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 235 224 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 235 224 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 223 224 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 211 224 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 199 224 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 167 224 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 84 20 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 84 20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 84 20 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 84 20 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 84 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 84 12 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 56 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 84 20 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 96 20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 92 20 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 84 20 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 20 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 20 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 20 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 139 12 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 112 20 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 112 20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 112 20 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 112 20 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 112 12 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 56 8 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 151 20 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 20 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 20 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 131 20 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 144 20 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 124 20 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 84 8 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Pa-BdF b/font/Pa-BdF
new file mode 100644
index 0000000..7abf9ac
--- /dev/null
+++ b/font/Pa-BdF
@@ -0,0 +1,432 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Wed Apr 24 13:46:21 1991
+Comment UniqueID 34739
+Comment VMusage 36532 47424
+FontName Palatino-BoldOsF
+FullName Palatino Bold Old Style Figures
+FamilyName Palatino
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -152 -266 988 924
+UnderlinePosition -131
+UnderlineThickness 58
+Version 001.001
+Notice Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.Palatino is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 471
+Ascender 720
+Descender -258
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 63 -12 219 688 ;
+C 34 ; WX 402 ; N quotedbl ; B 22 376 380 695 ;
+C 35 ; WX 500 ; N numbersign ; B 4 0 496 673 ;
+C 36 ; WX 500 ; N dollar ; B 28 -114 472 721 ;
+C 37 ; WX 889 ; N percent ; B 61 -9 828 714 ;
+C 38 ; WX 833 ; N ampersand ; B 52 -17 813 684 ;
+C 39 ; WX 278 ; N quoteright ; B 29 405 249 695 ;
+C 40 ; WX 333 ; N parenleft ; B 65 -104 305 723 ;
+C 41 ; WX 333 ; N parenright ; B 28 -104 268 723 ;
+C 42 ; WX 444 ; N asterisk ; B 44 332 399 695 ;
+C 43 ; WX 606 ; N plus ; B 51 0 555 505 ;
+C 44 ; WX 250 ; N comma ; B -6 -166 227 141 ;
+C 45 ; WX 333 ; N hyphen ; B 16 195 317 305 ;
+C 46 ; WX 250 ; N period ; B 47 -12 203 144 ;
+C 47 ; WX 296 ; N slash ; B -9 -17 305 720 ;
+C 48 ; WX 500 ; N zero ; B 42 -10 476 481 ;
+C 49 ; WX 500 ; N one ; B 28 -8 454 480 ;
+C 50 ; WX 500 ; N two ; B 18 -8 462 473 ;
+C 51 ; WX 500 ; N three ; B 8 -236 440 481 ;
+C 52 ; WX 500 ; N four ; B 6 -236 460 488 ;
+C 53 ; WX 500 ; N five ; B 2 -236 434 477 ;
+C 54 ; WX 500 ; N six ; B 38 -10 470 668 ;
+C 55 ; WX 500 ; N seven ; B 46 -236 488 474 ;
+C 56 ; WX 500 ; N eight ; B 34 -10 468 668 ;
+C 57 ; WX 500 ; N nine ; B 24 -236 458 481 ;
+C 58 ; WX 250 ; N colon ; B 47 -12 203 454 ;
+C 59 ; WX 250 ; N semicolon ; B -6 -166 227 454 ;
+C 60 ; WX 606 ; N less ; B 49 -15 558 519 ;
+C 61 ; WX 606 ; N equal ; B 51 114 555 396 ;
+C 62 ; WX 606 ; N greater ; B 49 -15 558 519 ;
+C 63 ; WX 444 ; N question ; B 43 -12 411 687 ;
+C 64 ; WX 747 ; N at ; B 42 -12 704 681 ;
+C 65 ; WX 778 ; N A ; B 24 -3 757 686 ;
+C 66 ; WX 667 ; N B ; B 39 -3 611 681 ;
+C 67 ; WX 722 ; N C ; B 44 -17 695 695 ;
+C 68 ; WX 833 ; N D ; B 35 -3 786 681 ;
+C 69 ; WX 611 ; N E ; B 39 -4 577 681 ;
+C 70 ; WX 556 ; N F ; B 28 -3 539 681 ;
+C 71 ; WX 833 ; N G ; B 47 -17 776 695 ;
+C 72 ; WX 833 ; N H ; B 36 -3 796 681 ;
+C 73 ; WX 389 ; N I ; B 39 -3 350 681 ;
+C 74 ; WX 389 ; N J ; B -11 -213 350 681 ;
+C 75 ; WX 778 ; N K ; B 39 -3 763 681 ;
+C 76 ; WX 611 ; N L ; B 39 -4 577 681 ;
+C 77 ; WX 1000 ; N M ; B 32 -10 968 681 ;
+C 78 ; WX 833 ; N N ; B 35 -16 798 681 ;
+C 79 ; WX 833 ; N O ; B 47 -17 787 695 ;
+C 80 ; WX 611 ; N P ; B 39 -3 594 681 ;
+C 81 ; WX 833 ; N Q ; B 47 -184 787 695 ;
+C 82 ; WX 722 ; N R ; B 39 -3 708 681 ;
+C 83 ; WX 611 ; N S ; B 57 -17 559 695 ;
+C 84 ; WX 667 ; N T ; B 17 -3 650 681 ;
+C 85 ; WX 778 ; N U ; B 26 -17 760 681 ;
+C 86 ; WX 778 ; N V ; B 20 -3 763 681 ;
+C 87 ; WX 1000 ; N W ; B 17 -3 988 686 ;
+C 88 ; WX 667 ; N X ; B 17 -3 650 695 ;
+C 89 ; WX 667 ; N Y ; B 15 -3 660 695 ;
+C 90 ; WX 667 ; N Z ; B 24 -3 627 681 ;
+C 91 ; WX 333 ; N bracketleft ; B 73 -104 291 720 ;
+C 92 ; WX 606 ; N backslash ; B 72 0 534 720 ;
+C 93 ; WX 333 ; N bracketright ; B 42 -104 260 720 ;
+C 94 ; WX 606 ; N asciicircum ; B 52 275 554 678 ;
+C 95 ; WX 500 ; N underscore ; B 0 -160 500 -102 ;
+C 96 ; WX 278 ; N quoteleft ; B 29 405 249 695 ;
+C 97 ; WX 500 ; N a ; B 40 -17 478 471 ;
+C 98 ; WX 611 ; N b ; B 10 -17 556 720 ;
+C 99 ; WX 444 ; N c ; B 37 -17 414 471 ;
+C 100 ; WX 611 ; N d ; B 42 -17 577 720 ;
+C 101 ; WX 500 ; N e ; B 42 -17 461 471 ;
+C 102 ; WX 389 ; N f ; B 34 -3 381 720 ; L i fi ; L l fl ;
+C 103 ; WX 556 ; N g ; B 26 -266 535 471 ;
+C 104 ; WX 611 ; N h ; B 24 -3 587 720 ;
+C 105 ; WX 333 ; N i ; B 34 -3 298 706 ;
+C 106 ; WX 333 ; N j ; B 3 -266 241 706 ;
+C 107 ; WX 611 ; N k ; B 21 -3 597 720 ;
+C 108 ; WX 333 ; N l ; B 24 -3 296 720 ;
+C 109 ; WX 889 ; N m ; B 24 -3 864 471 ;
+C 110 ; WX 611 ; N n ; B 24 -3 587 471 ;
+C 111 ; WX 556 ; N o ; B 40 -17 517 471 ;
+C 112 ; WX 611 ; N p ; B 29 -258 567 471 ;
+C 113 ; WX 611 ; N q ; B 52 -258 589 471 ;
+C 114 ; WX 389 ; N r ; B 30 -3 389 471 ;
+C 115 ; WX 444 ; N s ; B 39 -17 405 471 ;
+C 116 ; WX 333 ; N t ; B 22 -17 324 632 ;
+C 117 ; WX 611 ; N u ; B 25 -17 583 471 ;
+C 118 ; WX 556 ; N v ; B 11 -3 545 459 ;
+C 119 ; WX 833 ; N w ; B 13 -3 820 471 ;
+C 120 ; WX 500 ; N x ; B 20 -3 483 471 ;
+C 121 ; WX 556 ; N y ; B 10 -266 546 459 ;
+C 122 ; WX 500 ; N z ; B 16 -3 464 459 ;
+C 123 ; WX 310 ; N braceleft ; B 5 -117 288 725 ;
+C 124 ; WX 606 ; N bar ; B 260 0 346 720 ;
+C 125 ; WX 310 ; N braceright ; B 22 -117 305 725 ;
+C 126 ; WX 606 ; N asciitilde ; B 51 155 555 342 ;
+C 161 ; WX 278 ; N exclamdown ; B 59 -227 215 471 ;
+C 162 ; WX 500 ; N cent ; B 73 -106 450 554 ;
+C 163 ; WX 500 ; N sterling ; B -2 -19 501 676 ;
+C 164 ; WX 167 ; N fraction ; B -152 0 320 660 ;
+C 165 ; WX 500 ; N yen ; B 17 -3 483 695 ;
+C 166 ; WX 500 ; N florin ; B 11 -242 490 703 ;
+C 167 ; WX 500 ; N section ; B 30 -217 471 695 ;
+C 168 ; WX 500 ; N currency ; B 32 96 468 533 ;
+C 169 ; WX 227 ; N quotesingle ; B 45 376 181 695 ;
+C 170 ; WX 500 ; N quotedblleft ; B 34 405 466 695 ;
+C 171 ; WX 500 ; N guillemotleft ; B 36 44 463 438 ;
+C 172 ; WX 389 ; N guilsinglleft ; B 82 44 307 438 ;
+C 173 ; WX 389 ; N guilsinglright ; B 82 44 307 438 ;
+C 174 ; WX 611 ; N fi ; B 10 -3 595 720 ;
+C 175 ; WX 611 ; N fl ; B 17 -3 593 720 ;
+C 177 ; WX 500 ; N endash ; B 0 208 500 291 ;
+C 178 ; WX 500 ; N dagger ; B 29 -6 472 682 ;
+C 179 ; WX 500 ; N daggerdbl ; B 32 -245 468 682 ;
+C 180 ; WX 250 ; N periodcentered ; B 47 179 203 335 ;
+C 182 ; WX 641 ; N paragraph ; B 19 -161 599 683 ;
+C 183 ; WX 606 ; N bullet ; B 131 172 475 516 ;
+C 184 ; WX 333 ; N quotesinglbase ; B 56 -160 276 130 ;
+C 185 ; WX 500 ; N quotedblbase ; B 34 -160 466 130 ;
+C 186 ; WX 500 ; N quotedblright ; B 34 405 466 695 ;
+C 187 ; WX 500 ; N guillemotright ; B 37 44 464 438 ;
+C 188 ; WX 1000 ; N ellipsis ; B 89 -12 911 144 ;
+C 189 ; WX 1000 ; N perthousand ; B 33 -9 982 724 ;
+C 191 ; WX 444 ; N questiondown ; B 33 -231 401 471 ;
+C 193 ; WX 333 ; N grave ; B 18 506 256 691 ;
+C 194 ; WX 333 ; N acute ; B 78 506 316 691 ;
+C 195 ; WX 333 ; N circumflex ; B -2 506 335 681 ;
+C 196 ; WX 333 ; N tilde ; B -16 535 349 661 ;
+C 197 ; WX 333 ; N macron ; B 1 538 332 609 ;
+C 198 ; WX 333 ; N breve ; B 15 506 318 669 ;
+C 199 ; WX 333 ; N dotaccent ; B 100 537 234 671 ;
+C 200 ; WX 333 ; N dieresis ; B -8 537 341 671 ;
+C 202 ; WX 333 ; N ring ; B 67 500 267 700 ;
+C 203 ; WX 333 ; N cedilla ; B 73 -225 300 -7 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -56 506 390 691 ;
+C 206 ; WX 333 ; N ogonek ; B 60 -246 274 -17 ;
+C 207 ; WX 333 ; N caron ; B -2 510 335 685 ;
+C 208 ; WX 1000 ; N emdash ; B 125 208 875 291 ;
+C 225 ; WX 1000 ; N AE ; B 12 -4 954 681 ;
+C 227 ; WX 438 ; N ordfeminine ; B 77 367 361 660 ;
+C 232 ; WX 611 ; N Lslash ; B 16 -4 577 681 ;
+C 233 ; WX 833 ; N Oslash ; B 32 -20 808 698 ;
+C 234 ; WX 1000 ; N OE ; B 43 -17 985 695 ;
+C 235 ; WX 488 ; N ordmasculine ; B 89 367 399 660 ;
+C 241 ; WX 778 ; N ae ; B 46 -17 731 471 ;
+C 245 ; WX 333 ; N dotlessi ; B 34 -3 298 471 ;
+C 248 ; WX 333 ; N lslash ; B -4 -3 334 720 ;
+C 249 ; WX 556 ; N oslash ; B 23 -18 534 471 ;
+C 250 ; WX 833 ; N oe ; B 48 -17 799 471 ;
+C 251 ; WX 611 ; N germandbls ; B 30 -17 565 720 ;
+C -1 ; WX 500 ; N ecircumflex ; B 42 -17 461 701 ;
+C -1 ; WX 500 ; N edieresis ; B 42 -17 461 691 ;
+C -1 ; WX 500 ; N aacute ; B 40 -17 478 711 ;
+C -1 ; WX 747 ; N registered ; B 26 -17 720 695 ;
+C -1 ; WX 333 ; N icircumflex ; B -2 -3 335 701 ;
+C -1 ; WX 611 ; N udieresis ; B 25 -17 583 691 ;
+C -1 ; WX 556 ; N ograve ; B 40 -17 517 711 ;
+C -1 ; WX 611 ; N uacute ; B 25 -17 583 711 ;
+C -1 ; WX 611 ; N ucircumflex ; B 25 -17 583 701 ;
+C -1 ; WX 778 ; N Aacute ; B 24 -3 757 915 ;
+C -1 ; WX 333 ; N igrave ; B 18 -3 298 711 ;
+C -1 ; WX 389 ; N Icircumflex ; B 26 -3 363 905 ;
+C -1 ; WX 444 ; N ccedilla ; B 37 -225 414 471 ;
+C -1 ; WX 500 ; N adieresis ; B 40 -17 478 691 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 39 -4 577 905 ;
+C -1 ; WX 444 ; N scaron ; B 39 -17 405 693 ;
+C -1 ; WX 611 ; N thorn ; B 17 -258 563 720 ;
+C -1 ; WX 998 ; N trademark ; B 38 274 961 678 ;
+C -1 ; WX 500 ; N egrave ; B 42 -17 461 711 ;
+C -1 ; WX 300 ; N threesuperior ; B 9 261 292 667 ;
+C -1 ; WX 500 ; N zcaron ; B 16 -3 464 693 ;
+C -1 ; WX 500 ; N atilde ; B 40 -17 478 673 ;
+C -1 ; WX 500 ; N aring ; B 40 -17 478 700 ;
+C -1 ; WX 556 ; N ocircumflex ; B 40 -17 517 701 ;
+C -1 ; WX 611 ; N Edieresis ; B 39 -4 577 895 ;
+C -1 ; WX 750 ; N threequarters ; B 15 -2 735 667 ;
+C -1 ; WX 556 ; N ydieresis ; B 10 -266 546 691 ;
+C -1 ; WX 556 ; N yacute ; B 10 -266 546 711 ;
+C -1 ; WX 333 ; N iacute ; B 34 -3 316 711 ;
+C -1 ; WX 778 ; N Acircumflex ; B 24 -3 757 905 ;
+C -1 ; WX 778 ; N Uacute ; B 26 -17 760 915 ;
+C -1 ; WX 500 ; N eacute ; B 42 -17 461 711 ;
+C -1 ; WX 833 ; N Ograve ; B 47 -17 787 915 ;
+C -1 ; WX 500 ; N agrave ; B 40 -17 478 711 ;
+C -1 ; WX 778 ; N Udieresis ; B 26 -17 760 895 ;
+C -1 ; WX 500 ; N acircumflex ; B 40 -17 478 701 ;
+C -1 ; WX 389 ; N Igrave ; B 39 -3 350 915 ;
+C -1 ; WX 300 ; N twosuperior ; B 5 261 295 660 ;
+C -1 ; WX 778 ; N Ugrave ; B 26 -17 760 915 ;
+C -1 ; WX 750 ; N onequarter ; B 19 -2 735 665 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 26 -17 760 905 ;
+C -1 ; WX 611 ; N Scaron ; B 57 -17 559 909 ;
+C -1 ; WX 389 ; N Idieresis ; B 20 -3 369 895 ;
+C -1 ; WX 333 ; N idieresis ; B -8 -3 341 691 ;
+C -1 ; WX 611 ; N Egrave ; B 39 -4 577 915 ;
+C -1 ; WX 833 ; N Oacute ; B 47 -17 787 915 ;
+C -1 ; WX 606 ; N divide ; B 51 0 555 510 ;
+C -1 ; WX 778 ; N Atilde ; B 24 -3 757 885 ;
+C -1 ; WX 778 ; N Aring ; B 24 -3 757 924 ;
+C -1 ; WX 833 ; N Odieresis ; B 47 -17 787 895 ;
+C -1 ; WX 778 ; N Adieresis ; B 24 -3 757 895 ;
+C -1 ; WX 833 ; N Ntilde ; B 35 -16 798 885 ;
+C -1 ; WX 667 ; N Zcaron ; B 24 -3 627 909 ;
+C -1 ; WX 611 ; N Thorn ; B 39 -3 574 681 ;
+C -1 ; WX 389 ; N Iacute ; B 39 -3 350 915 ;
+C -1 ; WX 606 ; N plusminus ; B 51 0 555 505 ;
+C -1 ; WX 606 ; N multiply ; B 72 21 534 483 ;
+C -1 ; WX 611 ; N Eacute ; B 39 -4 577 915 ;
+C -1 ; WX 667 ; N Ydieresis ; B 15 -3 660 895 ;
+C -1 ; WX 300 ; N onesuperior ; B 14 261 287 665 ;
+C -1 ; WX 611 ; N ugrave ; B 25 -17 583 711 ;
+C -1 ; WX 606 ; N logicalnot ; B 51 114 555 396 ;
+C -1 ; WX 611 ; N ntilde ; B 24 -3 587 673 ;
+C -1 ; WX 833 ; N Otilde ; B 47 -17 787 885 ;
+C -1 ; WX 556 ; N otilde ; B 40 -17 517 673 ;
+C -1 ; WX 722 ; N Ccedilla ; B 44 -225 695 695 ;
+C -1 ; WX 778 ; N Agrave ; B 24 -3 757 915 ;
+C -1 ; WX 750 ; N onehalf ; B 9 -2 745 665 ;
+C -1 ; WX 833 ; N Eth ; B 10 -3 786 681 ;
+C -1 ; WX 400 ; N degree ; B 50 360 350 660 ;
+C -1 ; WX 667 ; N Yacute ; B 15 -3 660 915 ;
+C -1 ; WX 833 ; N Ocircumflex ; B 47 -17 787 905 ;
+C -1 ; WX 556 ; N oacute ; B 40 -17 517 711 ;
+C -1 ; WX 611 ; N mu ; B 25 -225 583 471 ;
+C -1 ; WX 606 ; N minus ; B 51 212 555 298 ;
+C -1 ; WX 556 ; N eth ; B 40 -17 517 720 ;
+C -1 ; WX 556 ; N odieresis ; B 40 -17 517 691 ;
+C -1 ; WX 747 ; N copyright ; B 26 -17 720 695 ;
+C -1 ; WX 606 ; N brokenbar ; B 260 0 346 720 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 101
+
+KPX A y -70
+KPX A w -70
+KPX A v -70
+KPX A space -18
+KPX A quoteright -92
+KPX A Y -111
+KPX A W -90
+KPX A V -129
+KPX A T -92
+
+KPX F period -111
+KPX F comma -111
+KPX F A -55
+
+KPX L y -74
+KPX L space -18
+KPX L quoteright -74
+KPX L Y -92
+KPX L W -92
+KPX L V -92
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -74
+
+KPX R y -30
+KPX R Y -55
+KPX R W -37
+KPX R V -74
+KPX R T -55
+
+KPX T y -90
+KPX T w -90
+KPX T u -129
+KPX T semicolon -74
+KPX T s -111
+KPX T r -111
+KPX T period -92
+KPX T o -111
+KPX T i -55
+KPX T hyphen -92
+KPX T e -111
+KPX T comma -92
+KPX T colon -74
+KPX T c -129
+KPX T a -111
+KPX T A -92
+
+KPX V y -90
+KPX V u -92
+KPX V semicolon -74
+KPX V r -111
+KPX V period -129
+KPX V o -111
+KPX V i -55
+KPX V hyphen -92
+KPX V e -111
+KPX V comma -129
+KPX V colon -74
+KPX V a -111
+KPX V A -129
+
+KPX W y -74
+KPX W u -74
+KPX W semicolon -37
+KPX W r -74
+KPX W period -37
+KPX W o -74
+KPX W i -37
+KPX W hyphen -37
+KPX W e -74
+KPX W comma -92
+KPX W colon -37
+KPX W a -74
+KPX W A -90
+
+KPX Y v -74
+KPX Y u -74
+KPX Y semicolon -55
+KPX Y q -92
+KPX Y period -74
+KPX Y p -74
+KPX Y o -74
+KPX Y i -55
+KPX Y hyphen -74
+KPX Y e -74
+KPX Y comma -74
+KPX Y colon -55
+KPX Y a -74
+KPX Y A -55
+
+KPX f quoteright 37
+KPX f f -18
+
+KPX one one -37
+
+KPX quoteleft quoteleft -55
+
+KPX quoteright t -18
+KPX quoteright space -55
+KPX quoteright s -55
+KPX quoteright quoteright -55
+
+KPX r quoteright 55
+KPX r period -55
+KPX r hyphen -18
+KPX r comma -55
+
+KPX v period -111
+KPX v comma -111
+
+KPX w period -92
+KPX w comma -92
+
+KPX y period -92
+KPX y comma -92
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 223 224 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 211 224 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 223 224 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 215 224 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 223 224 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 223 224 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 224 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 224 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 224 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 224 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 28 224 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 28 224 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 28 224 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 224 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 250 224 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 250 224 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 250 224 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 250 224 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 250 224 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 250 224 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 139 224 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 235 224 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 235 224 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 235 224 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 223 224 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 211 224 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 199 224 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 167 224 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 84 20 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 84 20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 84 20 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 84 20 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 84 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 84 12 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 84 20 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 96 20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 92 20 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 84 20 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 20 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 20 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 20 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 139 12 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 112 20 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 112 20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 112 20 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 112 20 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 112 12 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 56 8 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 151 20 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 20 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 20 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 131 20 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 144 20 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 124 20 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 84 8 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Pa-BdIt b/font/Pa-BdIt
new file mode 100644
index 0000000..e161d04
--- /dev/null
+++ b/font/Pa-BdIt
@@ -0,0 +1,441 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Jul  2 22:48:39 1990
+Comment UniqueID 31799
+Comment VMusage 37656 48548
+FontName Palatino-BoldItalic
+FullName Palatino Bold Italic
+FamilyName Palatino
+Weight Bold
+ItalicAngle -10
+IsFixedPitch false
+FontBBox -170 -271 1073 926
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.005
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Palatino is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 469
+Ascender 726
+Descender -271
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 58 -17 322 695 ;
+C 34 ; WX 500 ; N quotedbl ; B 137 467 493 720 ;
+C 35 ; WX 500 ; N numbersign ; B 4 0 496 673 ;
+C 36 ; WX 500 ; N dollar ; B 20 -108 477 737 ;
+C 37 ; WX 889 ; N percent ; B 56 -17 790 697 ;
+C 38 ; WX 833 ; N ampersand ; B 74 -17 811 695 ;
+C 39 ; WX 278 ; N quoteright ; B 76 431 302 720 ;
+C 40 ; WX 333 ; N parenleft ; B 58 -129 368 723 ;
+C 41 ; WX 333 ; N parenright ; B -12 -129 298 723 ;
+C 42 ; WX 444 ; N asterisk ; B 84 332 439 695 ;
+C 43 ; WX 606 ; N plus ; B 50 -5 556 501 ;
+C 44 ; WX 250 ; N comma ; B -33 -164 208 147 ;
+C 45 ; WX 389 ; N hyphen ; B 37 198 362 300 ;
+C 46 ; WX 250 ; N period ; B 48 -17 187 135 ;
+C 47 ; WX 315 ; N slash ; B 1 -17 315 720 ;
+C 48 ; WX 500 ; N zero ; B 42 -17 490 683 ;
+C 49 ; WX 500 ; N one ; B 41 -3 434 678 ;
+C 50 ; WX 500 ; N two ; B 1 -3 454 683 ;
+C 51 ; WX 500 ; N three ; B 8 -17 450 683 ;
+C 52 ; WX 500 ; N four ; B 3 -3 487 683 ;
+C 53 ; WX 500 ; N five ; B 14 -17 481 675 ;
+C 54 ; WX 500 ; N six ; B 39 -17 488 683 ;
+C 55 ; WX 500 ; N seven ; B 69 -3 544 674 ;
+C 56 ; WX 500 ; N eight ; B 26 -17 484 683 ;
+C 57 ; WX 500 ; N nine ; B 27 -17 491 683 ;
+C 58 ; WX 250 ; N colon ; B 38 -17 236 452 ;
+C 59 ; WX 250 ; N semicolon ; B -33 -164 247 452 ;
+C 60 ; WX 606 ; N less ; B 49 -21 558 517 ;
+C 61 ; WX 606 ; N equal ; B 51 106 555 390 ;
+C 62 ; WX 606 ; N greater ; B 48 -21 557 517 ;
+C 63 ; WX 444 ; N question ; B 91 -17 450 695 ;
+C 64 ; WX 833 ; N at ; B 82 -12 744 681 ;
+C 65 ; WX 722 ; N A ; B -35 -3 685 683 ;
+C 66 ; WX 667 ; N B ; B 8 -3 629 681 ;
+C 67 ; WX 685 ; N C ; B 69 -17 695 695 ;
+C 68 ; WX 778 ; N D ; B 0 -3 747 682 ;
+C 69 ; WX 611 ; N E ; B 11 -3 606 681 ;
+C 70 ; WX 556 ; N F ; B -6 -3 593 681 ;
+C 71 ; WX 778 ; N G ; B 72 -17 750 695 ;
+C 72 ; WX 778 ; N H ; B -12 -3 826 681 ;
+C 73 ; WX 389 ; N I ; B -1 -3 412 681 ;
+C 74 ; WX 389 ; N J ; B -29 -207 417 681 ;
+C 75 ; WX 722 ; N K ; B -10 -3 746 681 ;
+C 76 ; WX 611 ; N L ; B 26 -3 578 681 ;
+C 77 ; WX 944 ; N M ; B -23 -17 985 681 ;
+C 78 ; WX 778 ; N N ; B -2 -3 829 681 ;
+C 79 ; WX 833 ; N O ; B 76 -17 794 695 ;
+C 80 ; WX 667 ; N P ; B 11 -3 673 681 ;
+C 81 ; WX 833 ; N Q ; B 76 -222 794 695 ;
+C 82 ; WX 722 ; N R ; B 4 -3 697 681 ;
+C 83 ; WX 556 ; N S ; B 50 -17 517 695 ;
+C 84 ; WX 611 ; N T ; B 56 -3 674 681 ;
+C 85 ; WX 778 ; N U ; B 83 -17 825 681 ;
+C 86 ; WX 667 ; N V ; B 67 -3 745 681 ;
+C 87 ; WX 1000 ; N W ; B 67 -3 1073 689 ;
+C 88 ; WX 722 ; N X ; B -9 -3 772 681 ;
+C 89 ; WX 611 ; N Y ; B 54 -3 675 695 ;
+C 90 ; WX 667 ; N Z ; B 1 -3 676 681 ;
+C 91 ; WX 333 ; N bracketleft ; B 45 -102 381 723 ;
+C 92 ; WX 606 ; N backslash ; B 72 0 534 720 ;
+C 93 ; WX 333 ; N bracketright ; B -21 -102 315 723 ;
+C 94 ; WX 606 ; N asciicircum ; B 63 275 543 678 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 278 ; N quoteleft ; B 65 431 291 720 ;
+C 97 ; WX 556 ; N a ; B 44 -17 519 470 ;
+C 98 ; WX 537 ; N b ; B 44 -17 494 726 ;
+C 99 ; WX 444 ; N c ; B 32 -17 436 469 ;
+C 100 ; WX 556 ; N d ; B 38 -17 550 726 ;
+C 101 ; WX 444 ; N e ; B 28 -17 418 469 ;
+C 102 ; WX 333 ; N f ; B -130 -271 449 726 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B -50 -271 529 469 ;
+C 104 ; WX 556 ; N h ; B 22 -17 522 726 ;
+C 105 ; WX 333 ; N i ; B 26 -17 312 695 ;
+C 106 ; WX 333 ; N j ; B -64 -271 323 695 ;
+C 107 ; WX 556 ; N k ; B 34 -17 528 726 ;
+C 108 ; WX 333 ; N l ; B 64 -17 318 726 ;
+C 109 ; WX 833 ; N m ; B 19 -17 803 469 ;
+C 110 ; WX 556 ; N n ; B 17 -17 521 469 ;
+C 111 ; WX 556 ; N o ; B 48 -17 502 469 ;
+C 112 ; WX 556 ; N p ; B -21 -271 516 469 ;
+C 113 ; WX 537 ; N q ; B 32 -271 513 469 ;
+C 114 ; WX 389 ; N r ; B 20 -17 411 469 ;
+C 115 ; WX 444 ; N s ; B 25 -17 406 469 ;
+C 116 ; WX 389 ; N t ; B 42 -17 409 636 ;
+C 117 ; WX 556 ; N u ; B 22 -17 521 469 ;
+C 118 ; WX 556 ; N v ; B 19 -17 513 469 ;
+C 119 ; WX 833 ; N w ; B 27 -17 802 469 ;
+C 120 ; WX 500 ; N x ; B -8 -17 500 469 ;
+C 121 ; WX 556 ; N y ; B 13 -271 541 469 ;
+C 122 ; WX 500 ; N z ; B 31 -17 470 469 ;
+C 123 ; WX 333 ; N braceleft ; B 18 -105 334 720 ;
+C 124 ; WX 606 ; N bar ; B 259 0 347 720 ;
+C 125 ; WX 333 ; N braceright ; B -1 -105 315 720 ;
+C 126 ; WX 606 ; N asciitilde ; B 51 151 555 346 ;
+C 161 ; WX 333 ; N exclamdown ; B 2 -225 259 479 ;
+C 162 ; WX 500 ; N cent ; B 52 -105 456 547 ;
+C 163 ; WX 500 ; N sterling ; B 21 -5 501 683 ;
+C 164 ; WX 167 ; N fraction ; B -170 0 338 683 ;
+C 165 ; WX 500 ; N yen ; B 11 -3 538 695 ;
+C 166 ; WX 500 ; N florin ; B 8 -242 479 690 ;
+C 167 ; WX 556 ; N section ; B 47 -151 497 695 ;
+C 168 ; WX 500 ; N currency ; B 32 96 468 533 ;
+C 169 ; WX 250 ; N quotesingle ; B 127 467 293 720 ;
+C 170 ; WX 500 ; N quotedblleft ; B 65 431 511 720 ;
+C 171 ; WX 500 ; N guillemotleft ; B 35 43 458 446 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 60 43 292 446 ;
+C 173 ; WX 333 ; N guilsinglright ; B 35 40 267 443 ;
+C 174 ; WX 611 ; N fi ; B -130 -271 588 726 ;
+C 175 ; WX 611 ; N fl ; B -130 -271 631 726 ;
+C 177 ; WX 500 ; N endash ; B -12 214 512 282 ;
+C 178 ; WX 556 ; N dagger ; B 67 -3 499 685 ;
+C 179 ; WX 556 ; N daggerdbl ; B 33 -153 537 693 ;
+C 180 ; WX 250 ; N periodcentered ; B 67 172 206 324 ;
+C 182 ; WX 556 ; N paragraph ; B 14 -204 629 681 ;
+C 183 ; WX 606 ; N bullet ; B 131 172 475 516 ;
+C 184 ; WX 250 ; N quotesinglbase ; B -3 -144 220 145 ;
+C 185 ; WX 500 ; N quotedblbase ; B -18 -144 424 145 ;
+C 186 ; WX 500 ; N quotedblright ; B 73 431 519 720 ;
+C 187 ; WX 500 ; N guillemotright ; B 35 40 458 443 ;
+C 188 ; WX 1000 ; N ellipsis ; B 91 -17 896 135 ;
+C 189 ; WX 1000 ; N perthousand ; B 65 -17 912 691 ;
+C 191 ; WX 444 ; N questiondown ; B -12 -226 347 479 ;
+C 193 ; WX 333 ; N grave ; B 110 518 322 699 ;
+C 194 ; WX 333 ; N acute ; B 153 518 392 699 ;
+C 195 ; WX 333 ; N circumflex ; B 88 510 415 684 ;
+C 196 ; WX 333 ; N tilde ; B 82 535 441 654 ;
+C 197 ; WX 333 ; N macron ; B 76 538 418 608 ;
+C 198 ; WX 333 ; N breve ; B 96 518 412 680 ;
+C 199 ; WX 333 ; N dotaccent ; B 202 537 325 668 ;
+C 200 ; WX 333 ; N dieresis ; B 90 537 426 668 ;
+C 202 ; WX 556 ; N ring ; B 277 514 477 714 ;
+C 203 ; WX 333 ; N cedilla ; B 12 -218 248 5 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -28 518 409 699 ;
+C 206 ; WX 333 ; N ogonek ; B 32 -206 238 -17 ;
+C 207 ; WX 333 ; N caron ; B 113 510 445 684 ;
+C 208 ; WX 1000 ; N emdash ; B -12 214 1012 282 ;
+C 225 ; WX 944 ; N AE ; B -29 -3 927 681 ;
+C 227 ; WX 333 ; N ordfeminine ; B 47 391 355 684 ;
+C 232 ; WX 611 ; N Lslash ; B 6 -3 578 681 ;
+C 233 ; WX 833 ; N Oslash ; B 57 -54 797 730 ;
+C 234 ; WX 944 ; N OE ; B 39 -17 961 695 ;
+C 235 ; WX 333 ; N ordmasculine ; B 51 391 346 683 ;
+C 241 ; WX 738 ; N ae ; B 44 -17 711 469 ;
+C 245 ; WX 333 ; N dotlessi ; B 26 -17 293 469 ;
+C 248 ; WX 333 ; N lslash ; B 13 -17 365 726 ;
+C 249 ; WX 556 ; N oslash ; B 14 -50 522 506 ;
+C 250 ; WX 778 ; N oe ; B 48 -17 755 469 ;
+C 251 ; WX 556 ; N germandbls ; B -131 -271 549 726 ;
+C -1 ; WX 667 ; N Zcaron ; B 1 -3 676 896 ;
+C -1 ; WX 444 ; N ccedilla ; B 32 -218 436 469 ;
+C -1 ; WX 556 ; N ydieresis ; B 13 -271 541 688 ;
+C -1 ; WX 556 ; N atilde ; B 44 -17 553 666 ;
+C -1 ; WX 333 ; N icircumflex ; B 26 -17 403 704 ;
+C -1 ; WX 300 ; N threesuperior ; B 23 263 310 683 ;
+C -1 ; WX 444 ; N ecircumflex ; B 28 -17 471 704 ;
+C -1 ; WX 556 ; N thorn ; B -21 -271 516 726 ;
+C -1 ; WX 444 ; N egrave ; B 28 -17 418 719 ;
+C -1 ; WX 300 ; N twosuperior ; B 26 271 321 683 ;
+C -1 ; WX 444 ; N eacute ; B 28 -17 448 719 ;
+C -1 ; WX 556 ; N otilde ; B 48 -17 553 666 ;
+C -1 ; WX 722 ; N Aacute ; B -35 -3 685 911 ;
+C -1 ; WX 556 ; N ocircumflex ; B 48 -17 515 704 ;
+C -1 ; WX 556 ; N yacute ; B 13 -271 541 719 ;
+C -1 ; WX 556 ; N udieresis ; B 22 -17 538 688 ;
+C -1 ; WX 750 ; N threequarters ; B 18 -2 732 683 ;
+C -1 ; WX 556 ; N acircumflex ; B 44 -17 527 704 ;
+C -1 ; WX 778 ; N Eth ; B 0 -3 747 682 ;
+C -1 ; WX 444 ; N edieresis ; B 28 -17 482 688 ;
+C -1 ; WX 556 ; N ugrave ; B 22 -17 521 719 ;
+C -1 ; WX 1000 ; N trademark ; B 38 274 961 678 ;
+C -1 ; WX 556 ; N ograve ; B 48 -17 502 719 ;
+C -1 ; WX 444 ; N scaron ; B 25 -17 489 692 ;
+C -1 ; WX 389 ; N Idieresis ; B -1 -3 454 880 ;
+C -1 ; WX 556 ; N uacute ; B 22 -17 521 719 ;
+C -1 ; WX 556 ; N agrave ; B 44 -17 519 719 ;
+C -1 ; WX 556 ; N ntilde ; B 17 -17 553 666 ;
+C -1 ; WX 556 ; N aring ; B 44 -17 519 714 ;
+C -1 ; WX 500 ; N zcaron ; B 31 -17 517 692 ;
+C -1 ; WX 389 ; N Icircumflex ; B -1 -3 443 896 ;
+C -1 ; WX 778 ; N Ntilde ; B -2 -3 829 866 ;
+C -1 ; WX 556 ; N ucircumflex ; B 22 -17 521 704 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 11 -3 606 896 ;
+C -1 ; WX 389 ; N Iacute ; B -1 -3 420 911 ;
+C -1 ; WX 685 ; N Ccedilla ; B 69 -218 695 695 ;
+C -1 ; WX 833 ; N Odieresis ; B 76 -17 794 880 ;
+C -1 ; WX 556 ; N Scaron ; B 50 -17 557 896 ;
+C -1 ; WX 611 ; N Edieresis ; B 11 -3 606 880 ;
+C -1 ; WX 389 ; N Igrave ; B -1 -3 412 911 ;
+C -1 ; WX 556 ; N adieresis ; B 44 -17 538 688 ;
+C -1 ; WX 833 ; N Ograve ; B 76 -17 794 911 ;
+C -1 ; WX 611 ; N Egrave ; B 11 -3 606 911 ;
+C -1 ; WX 611 ; N Ydieresis ; B 54 -3 675 880 ;
+C -1 ; WX 747 ; N registered ; B 26 -17 720 695 ;
+C -1 ; WX 833 ; N Otilde ; B 76 -17 794 866 ;
+C -1 ; WX 750 ; N onequarter ; B 18 -2 732 683 ;
+C -1 ; WX 778 ; N Ugrave ; B 83 -17 825 911 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 83 -17 825 896 ;
+C -1 ; WX 667 ; N Thorn ; B 11 -3 644 681 ;
+C -1 ; WX 606 ; N divide ; B 50 -5 556 501 ;
+C -1 ; WX 722 ; N Atilde ; B -35 -3 685 866 ;
+C -1 ; WX 778 ; N Uacute ; B 83 -17 825 911 ;
+C -1 ; WX 833 ; N Ocircumflex ; B 76 -17 794 896 ;
+C -1 ; WX 606 ; N logicalnot ; B 51 107 555 390 ;
+C -1 ; WX 722 ; N Aring ; B -35 -3 685 926 ;
+C -1 ; WX 333 ; N idieresis ; B 26 -17 426 688 ;
+C -1 ; WX 333 ; N iacute ; B 26 -17 392 719 ;
+C -1 ; WX 556 ; N aacute ; B 44 -17 519 719 ;
+C -1 ; WX 606 ; N plusminus ; B 50 0 556 501 ;
+C -1 ; WX 606 ; N multiply ; B 72 17 534 479 ;
+C -1 ; WX 778 ; N Udieresis ; B 83 -17 825 880 ;
+C -1 ; WX 606 ; N minus ; B 51 204 555 292 ;
+C -1 ; WX 300 ; N onesuperior ; B 41 271 298 680 ;
+C -1 ; WX 611 ; N Eacute ; B 11 -3 606 911 ;
+C -1 ; WX 722 ; N Acircumflex ; B -35 -3 685 896 ;
+C -1 ; WX 747 ; N copyright ; B 26 -17 720 695 ;
+C -1 ; WX 722 ; N Agrave ; B -35 -3 685 911 ;
+C -1 ; WX 556 ; N odieresis ; B 48 -17 538 688 ;
+C -1 ; WX 556 ; N oacute ; B 48 -17 504 719 ;
+C -1 ; WX 400 ; N degree ; B 50 383 350 683 ;
+C -1 ; WX 333 ; N igrave ; B 26 -17 322 719 ;
+C -1 ; WX 556 ; N mu ; B -15 -232 521 469 ;
+C -1 ; WX 833 ; N Oacute ; B 76 -17 794 911 ;
+C -1 ; WX 556 ; N eth ; B 48 -17 546 726 ;
+C -1 ; WX 722 ; N Adieresis ; B -35 -3 685 880 ;
+C -1 ; WX 611 ; N Yacute ; B 54 -3 675 911 ;
+C -1 ; WX 606 ; N brokenbar ; B 259 0 347 720 ;
+C -1 ; WX 750 ; N onehalf ; B 14 -2 736 683 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 108
+
+KPX A y -55
+KPX A w -37
+KPX A v -55
+KPX A space -55
+KPX A quoteright -55
+KPX A Y -74
+KPX A W -74
+KPX A V -74
+KPX A T -55
+
+KPX F space -18
+KPX F period -111
+KPX F comma -111
+KPX F A -74
+
+KPX L y -37
+KPX L space -18
+KPX L quoteright -55
+KPX L Y -74
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P space -55
+KPX P period -129
+KPX P comma -129
+KPX P A -92
+
+KPX R y -20
+KPX R Y -37
+KPX R W -55
+KPX R V -55
+KPX R T -37
+
+KPX T y -80
+KPX T w -50
+KPX T u -92
+KPX T semicolon -55
+KPX T s -92
+KPX T r -92
+KPX T period -55
+KPX T o -111
+KPX T i -74
+KPX T hyphen -92
+KPX T e -111
+KPX T comma -55
+KPX T colon -55
+KPX T c -92
+KPX T a -111
+KPX T O -18
+KPX T A -55
+
+KPX V y -50
+KPX V u -50
+KPX V semicolon -37
+KPX V r -74
+KPX V period -111
+KPX V o -74
+KPX V i -50
+KPX V hyphen -37
+KPX V e -74
+KPX V comma -111
+KPX V colon -37
+KPX V a -92
+KPX V A -74
+
+KPX W y -30
+KPX W u -30
+KPX W semicolon -18
+KPX W r -30
+KPX W period -55
+KPX W o -55
+KPX W i -30
+KPX W e -55
+KPX W comma -55
+KPX W colon -28
+KPX W a -74
+KPX W A -74
+
+KPX Y v -30
+KPX Y u -50
+KPX Y semicolon -55
+KPX Y q -92
+KPX Y period -55
+KPX Y p -74
+KPX Y o -111
+KPX Y i -54
+KPX Y hyphen -55
+KPX Y e -92
+KPX Y comma -55
+KPX Y colon -55
+KPX Y a -111
+KPX Y A -55
+
+KPX f quoteright 37
+KPX f f -37
+
+KPX one one -55
+
+KPX quoteleft quoteleft -55
+
+KPX quoteright t -18
+KPX quoteright space -37
+KPX quoteright s -37
+KPX quoteright quoteright -55
+
+KPX r quoteright 55
+KPX r q -18
+KPX r period -55
+KPX r o -18
+KPX r h -18
+KPX r g -18
+KPX r e -18
+KPX r comma -55
+KPX r c -18
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -37
+KPX y comma -37
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 195 212 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 195 212 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 195 212 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 195 212 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 83 212 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 195 212 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 176 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 212 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 212 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 212 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 212 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 28 212 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 28 212 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 28 212 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 212 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 223 212 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 250 212 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 250 212 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 250 212 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 250 212 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 250 212 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 112 212 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 223 212 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 223 212 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 223 212 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 211 212 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 151 212 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 139 212 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 167 212 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 112 20 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 112 20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 112 20 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 112 20 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 0 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 112 12 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 56 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 56 20 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 56 20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 56 20 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 56 20 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 20 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -12 20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 20 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 20 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 112 12 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 112 20 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 100 20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 112 20 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 112 20 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 112 12 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 44 8 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 112 20 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 100 20 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 112 20 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 112 20 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 112 20 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 112 20 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 72 8 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Pa-BdItF b/font/Pa-BdItF
new file mode 100644
index 0000000..a2b3a49
--- /dev/null
+++ b/font/Pa-BdItF
@@ -0,0 +1,439 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Wed Apr 24 14:37:49 1991
+Comment UniqueID 34742
+Comment VMusage 38760 49652
+FontName Palatino-BoldItalicOsF
+FullName Palatino Bold Italic Old Style Figures
+FamilyName Palatino
+Weight Bold
+ItalicAngle -10
+IsFixedPitch false
+FontBBox -170 -271 1073 926
+UnderlinePosition -131
+UnderlineThickness 58
+Version 001.001
+Notice Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.Palatino is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 681
+XHeight 469
+Ascender 726
+Descender -271
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 58 -17 322 695 ;
+C 34 ; WX 500 ; N quotedbl ; B 137 467 493 720 ;
+C 35 ; WX 500 ; N numbersign ; B 4 0 496 673 ;
+C 36 ; WX 500 ; N dollar ; B 20 -108 477 737 ;
+C 37 ; WX 889 ; N percent ; B 56 -17 790 697 ;
+C 38 ; WX 833 ; N ampersand ; B 74 -17 811 695 ;
+C 39 ; WX 278 ; N quoteright ; B 76 431 302 720 ;
+C 40 ; WX 333 ; N parenleft ; B 58 -129 368 723 ;
+C 41 ; WX 333 ; N parenright ; B -12 -129 298 723 ;
+C 42 ; WX 444 ; N asterisk ; B 84 332 439 695 ;
+C 43 ; WX 606 ; N plus ; B 50 -5 556 501 ;
+C 44 ; WX 250 ; N comma ; B -33 -164 208 147 ;
+C 45 ; WX 389 ; N hyphen ; B 37 198 362 300 ;
+C 46 ; WX 250 ; N period ; B 48 -17 187 135 ;
+C 47 ; WX 315 ; N slash ; B 1 -17 315 720 ;
+C 48 ; WX 500 ; N zero ; B 26 -12 466 477 ;
+C 49 ; WX 500 ; N one ; B 48 -4 462 488 ;
+C 50 ; WX 500 ; N two ; B 8 -6 434 477 ;
+C 51 ; WX 500 ; N three ; B -40 -256 410 477 ;
+C 52 ; WX 500 ; N four ; B -18 -270 462 486 ;
+C 53 ; WX 500 ; N five ; B -30 -256 446 471 ;
+C 54 ; WX 500 ; N six ; B 34 -12 484 686 ;
+C 55 ; WX 500 ; N seven ; B 8 -249 508 473 ;
+C 56 ; WX 500 ; N eight ; B 26 -12 484 686 ;
+C 57 ; WX 500 ; N nine ; B 0 -256 458 477 ;
+C 58 ; WX 250 ; N colon ; B 38 -17 236 452 ;
+C 59 ; WX 250 ; N semicolon ; B -33 -164 247 452 ;
+C 60 ; WX 606 ; N less ; B 49 -21 558 517 ;
+C 61 ; WX 606 ; N equal ; B 51 106 555 390 ;
+C 62 ; WX 606 ; N greater ; B 48 -21 557 517 ;
+C 63 ; WX 444 ; N question ; B 91 -17 450 695 ;
+C 64 ; WX 833 ; N at ; B 82 -12 744 681 ;
+C 65 ; WX 722 ; N A ; B -35 -3 685 683 ;
+C 66 ; WX 667 ; N B ; B 8 -3 629 681 ;
+C 67 ; WX 685 ; N C ; B 69 -17 695 695 ;
+C 68 ; WX 778 ; N D ; B 0 -3 747 682 ;
+C 69 ; WX 611 ; N E ; B 11 -3 606 681 ;
+C 70 ; WX 556 ; N F ; B -6 -3 593 681 ;
+C 71 ; WX 778 ; N G ; B 72 -17 750 695 ;
+C 72 ; WX 778 ; N H ; B -12 -3 826 681 ;
+C 73 ; WX 389 ; N I ; B -1 -3 412 681 ;
+C 74 ; WX 389 ; N J ; B -29 -207 417 681 ;
+C 75 ; WX 722 ; N K ; B -10 -3 746 681 ;
+C 76 ; WX 611 ; N L ; B 26 -3 578 681 ;
+C 77 ; WX 944 ; N M ; B -23 -17 985 681 ;
+C 78 ; WX 778 ; N N ; B -2 -3 829 681 ;
+C 79 ; WX 833 ; N O ; B 76 -17 794 695 ;
+C 80 ; WX 667 ; N P ; B 11 -3 673 681 ;
+C 81 ; WX 833 ; N Q ; B 76 -222 794 695 ;
+C 82 ; WX 722 ; N R ; B 4 -3 697 681 ;
+C 83 ; WX 556 ; N S ; B 50 -17 517 695 ;
+C 84 ; WX 611 ; N T ; B 56 -3 674 681 ;
+C 85 ; WX 778 ; N U ; B 83 -17 825 681 ;
+C 86 ; WX 667 ; N V ; B 67 -3 745 681 ;
+C 87 ; WX 1000 ; N W ; B 67 -3 1073 689 ;
+C 88 ; WX 722 ; N X ; B -9 -3 772 681 ;
+C 89 ; WX 611 ; N Y ; B 54 -3 675 695 ;
+C 90 ; WX 667 ; N Z ; B 1 -3 676 681 ;
+C 91 ; WX 333 ; N bracketleft ; B 45 -102 381 723 ;
+C 92 ; WX 606 ; N backslash ; B 72 0 534 720 ;
+C 93 ; WX 333 ; N bracketright ; B -21 -102 315 723 ;
+C 94 ; WX 606 ; N asciicircum ; B 63 275 543 678 ;
+C 95 ; WX 500 ; N underscore ; B 0 -160 500 -102 ;
+C 96 ; WX 278 ; N quoteleft ; B 65 431 291 720 ;
+C 97 ; WX 556 ; N a ; B 44 -17 519 470 ;
+C 98 ; WX 537 ; N b ; B 44 -17 494 726 ;
+C 99 ; WX 444 ; N c ; B 32 -17 436 469 ;
+C 100 ; WX 556 ; N d ; B 38 -17 550 726 ;
+C 101 ; WX 444 ; N e ; B 28 -17 418 469 ;
+C 102 ; WX 333 ; N f ; B -130 -271 449 726 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B -50 -271 529 469 ;
+C 104 ; WX 556 ; N h ; B 22 -17 522 726 ;
+C 105 ; WX 333 ; N i ; B 26 -17 312 695 ;
+C 106 ; WX 333 ; N j ; B -64 -271 323 695 ;
+C 107 ; WX 556 ; N k ; B 34 -17 528 726 ;
+C 108 ; WX 333 ; N l ; B 64 -17 318 726 ;
+C 109 ; WX 833 ; N m ; B 19 -17 803 469 ;
+C 110 ; WX 556 ; N n ; B 17 -17 521 469 ;
+C 111 ; WX 556 ; N o ; B 48 -17 502 469 ;
+C 112 ; WX 556 ; N p ; B -21 -271 516 469 ;
+C 113 ; WX 537 ; N q ; B 32 -271 513 469 ;
+C 114 ; WX 389 ; N r ; B 20 -17 411 469 ;
+C 115 ; WX 444 ; N s ; B 25 -17 406 469 ;
+C 116 ; WX 389 ; N t ; B 42 -17 409 636 ;
+C 117 ; WX 556 ; N u ; B 22 -17 521 469 ;
+C 118 ; WX 556 ; N v ; B 19 -17 513 469 ;
+C 119 ; WX 833 ; N w ; B 27 -17 802 469 ;
+C 120 ; WX 500 ; N x ; B -8 -17 500 469 ;
+C 121 ; WX 556 ; N y ; B 13 -271 541 469 ;
+C 122 ; WX 500 ; N z ; B 31 -17 470 469 ;
+C 123 ; WX 333 ; N braceleft ; B 18 -105 334 720 ;
+C 124 ; WX 606 ; N bar ; B 259 0 347 720 ;
+C 125 ; WX 333 ; N braceright ; B -1 -105 315 720 ;
+C 126 ; WX 606 ; N asciitilde ; B 51 151 555 346 ;
+C 161 ; WX 333 ; N exclamdown ; B 2 -225 259 479 ;
+C 162 ; WX 500 ; N cent ; B 52 -105 456 547 ;
+C 163 ; WX 500 ; N sterling ; B 21 -5 501 683 ;
+C 164 ; WX 167 ; N fraction ; B -170 0 338 683 ;
+C 165 ; WX 500 ; N yen ; B 11 -3 538 695 ;
+C 166 ; WX 500 ; N florin ; B 8 -242 479 690 ;
+C 167 ; WX 556 ; N section ; B 47 -151 497 695 ;
+C 168 ; WX 500 ; N currency ; B 32 96 468 533 ;
+C 169 ; WX 250 ; N quotesingle ; B 127 467 293 720 ;
+C 170 ; WX 500 ; N quotedblleft ; B 65 431 511 720 ;
+C 171 ; WX 500 ; N guillemotleft ; B 35 43 458 446 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 60 43 292 446 ;
+C 173 ; WX 333 ; N guilsinglright ; B 35 40 267 443 ;
+C 174 ; WX 611 ; N fi ; B -130 -271 588 726 ;
+C 175 ; WX 611 ; N fl ; B -130 -271 631 726 ;
+C 177 ; WX 500 ; N endash ; B -12 214 512 282 ;
+C 178 ; WX 556 ; N dagger ; B 67 -3 499 685 ;
+C 179 ; WX 556 ; N daggerdbl ; B 33 -153 537 693 ;
+C 180 ; WX 250 ; N periodcentered ; B 67 172 206 324 ;
+C 182 ; WX 556 ; N paragraph ; B 14 -204 629 681 ;
+C 183 ; WX 606 ; N bullet ; B 131 172 475 516 ;
+C 184 ; WX 250 ; N quotesinglbase ; B -3 -144 220 145 ;
+C 185 ; WX 500 ; N quotedblbase ; B -18 -144 424 145 ;
+C 186 ; WX 500 ; N quotedblright ; B 73 431 519 720 ;
+C 187 ; WX 500 ; N guillemotright ; B 35 40 458 443 ;
+C 188 ; WX 1000 ; N ellipsis ; B 91 -17 896 135 ;
+C 189 ; WX 1000 ; N perthousand ; B 65 -17 912 691 ;
+C 191 ; WX 444 ; N questiondown ; B -12 -226 347 479 ;
+C 193 ; WX 333 ; N grave ; B 110 518 322 699 ;
+C 194 ; WX 333 ; N acute ; B 153 518 392 699 ;
+C 195 ; WX 333 ; N circumflex ; B 88 510 415 684 ;
+C 196 ; WX 333 ; N tilde ; B 82 535 441 654 ;
+C 197 ; WX 333 ; N macron ; B 76 538 418 608 ;
+C 198 ; WX 333 ; N breve ; B 96 518 412 680 ;
+C 199 ; WX 333 ; N dotaccent ; B 202 537 325 668 ;
+C 200 ; WX 333 ; N dieresis ; B 90 537 426 668 ;
+C 202 ; WX 556 ; N ring ; B 277 514 477 714 ;
+C 203 ; WX 333 ; N cedilla ; B 12 -218 248 5 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -28 518 409 699 ;
+C 206 ; WX 333 ; N ogonek ; B 32 -206 238 -17 ;
+C 207 ; WX 333 ; N caron ; B 113 510 445 684 ;
+C 208 ; WX 1000 ; N emdash ; B 113 214 887 282 ;
+C 225 ; WX 944 ; N AE ; B -29 -3 927 681 ;
+C 227 ; WX 333 ; N ordfeminine ; B 47 391 355 684 ;
+C 232 ; WX 611 ; N Lslash ; B 6 -3 578 681 ;
+C 233 ; WX 833 ; N Oslash ; B 57 -54 797 730 ;
+C 234 ; WX 944 ; N OE ; B 39 -17 961 695 ;
+C 235 ; WX 333 ; N ordmasculine ; B 51 391 346 683 ;
+C 241 ; WX 738 ; N ae ; B 44 -17 711 469 ;
+C 245 ; WX 333 ; N dotlessi ; B 26 -17 293 469 ;
+C 248 ; WX 333 ; N lslash ; B 13 -17 365 726 ;
+C 249 ; WX 556 ; N oslash ; B 14 -50 522 506 ;
+C 250 ; WX 778 ; N oe ; B 48 -17 755 469 ;
+C 251 ; WX 556 ; N germandbls ; B -131 -271 549 726 ;
+C -1 ; WX 444 ; N ecircumflex ; B 28 -17 471 704 ;
+C -1 ; WX 444 ; N edieresis ; B 28 -17 482 688 ;
+C -1 ; WX 556 ; N aacute ; B 44 -17 519 719 ;
+C -1 ; WX 747 ; N registered ; B 26 -17 720 695 ;
+C -1 ; WX 333 ; N icircumflex ; B 26 -17 403 704 ;
+C -1 ; WX 556 ; N udieresis ; B 22 -17 538 688 ;
+C -1 ; WX 556 ; N ograve ; B 48 -17 502 719 ;
+C -1 ; WX 556 ; N uacute ; B 22 -17 521 719 ;
+C -1 ; WX 556 ; N ucircumflex ; B 22 -17 521 704 ;
+C -1 ; WX 722 ; N Aacute ; B -35 -3 685 911 ;
+C -1 ; WX 333 ; N igrave ; B 26 -17 322 719 ;
+C -1 ; WX 389 ; N Icircumflex ; B -1 -3 443 896 ;
+C -1 ; WX 444 ; N ccedilla ; B 32 -218 436 469 ;
+C -1 ; WX 556 ; N adieresis ; B 44 -17 538 688 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 11 -3 606 896 ;
+C -1 ; WX 444 ; N scaron ; B 25 -17 489 692 ;
+C -1 ; WX 556 ; N thorn ; B -21 -271 516 726 ;
+C -1 ; WX 1000 ; N trademark ; B 38 274 961 678 ;
+C -1 ; WX 444 ; N egrave ; B 28 -17 418 719 ;
+C -1 ; WX 300 ; N threesuperior ; B 23 263 310 683 ;
+C -1 ; WX 500 ; N zcaron ; B 31 -17 517 692 ;
+C -1 ; WX 556 ; N atilde ; B 44 -17 553 666 ;
+C -1 ; WX 556 ; N aring ; B 44 -17 519 714 ;
+C -1 ; WX 556 ; N ocircumflex ; B 48 -17 515 704 ;
+C -1 ; WX 611 ; N Edieresis ; B 11 -3 606 880 ;
+C -1 ; WX 750 ; N threequarters ; B 18 -2 732 683 ;
+C -1 ; WX 556 ; N ydieresis ; B 13 -271 541 688 ;
+C -1 ; WX 556 ; N yacute ; B 13 -271 541 719 ;
+C -1 ; WX 333 ; N iacute ; B 26 -17 392 719 ;
+C -1 ; WX 722 ; N Acircumflex ; B -35 -3 685 896 ;
+C -1 ; WX 778 ; N Uacute ; B 83 -17 825 911 ;
+C -1 ; WX 444 ; N eacute ; B 28 -17 448 719 ;
+C -1 ; WX 833 ; N Ograve ; B 76 -17 794 911 ;
+C -1 ; WX 556 ; N agrave ; B 44 -17 519 719 ;
+C -1 ; WX 778 ; N Udieresis ; B 83 -17 825 880 ;
+C -1 ; WX 556 ; N acircumflex ; B 44 -17 527 704 ;
+C -1 ; WX 389 ; N Igrave ; B -1 -3 412 911 ;
+C -1 ; WX 300 ; N twosuperior ; B 26 271 321 683 ;
+C -1 ; WX 778 ; N Ugrave ; B 83 -17 825 911 ;
+C -1 ; WX 750 ; N onequarter ; B 18 -2 732 683 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 83 -17 825 896 ;
+C -1 ; WX 556 ; N Scaron ; B 50 -17 557 896 ;
+C -1 ; WX 389 ; N Idieresis ; B -1 -3 454 880 ;
+C -1 ; WX 333 ; N idieresis ; B 26 -17 426 688 ;
+C -1 ; WX 611 ; N Egrave ; B 11 -3 606 911 ;
+C -1 ; WX 833 ; N Oacute ; B 76 -17 794 911 ;
+C -1 ; WX 606 ; N divide ; B 50 -5 556 501 ;
+C -1 ; WX 722 ; N Atilde ; B -35 -3 685 866 ;
+C -1 ; WX 722 ; N Aring ; B -35 -3 685 926 ;
+C -1 ; WX 833 ; N Odieresis ; B 76 -17 794 880 ;
+C -1 ; WX 722 ; N Adieresis ; B -35 -3 685 880 ;
+C -1 ; WX 778 ; N Ntilde ; B -2 -3 829 866 ;
+C -1 ; WX 667 ; N Zcaron ; B 1 -3 676 896 ;
+C -1 ; WX 667 ; N Thorn ; B 11 -3 644 681 ;
+C -1 ; WX 389 ; N Iacute ; B -1 -3 420 911 ;
+C -1 ; WX 606 ; N plusminus ; B 50 0 556 501 ;
+C -1 ; WX 606 ; N multiply ; B 72 17 534 479 ;
+C -1 ; WX 611 ; N Eacute ; B 11 -3 606 911 ;
+C -1 ; WX 611 ; N Ydieresis ; B 54 -3 675 880 ;
+C -1 ; WX 300 ; N onesuperior ; B 41 271 298 680 ;
+C -1 ; WX 556 ; N ugrave ; B 22 -17 521 719 ;
+C -1 ; WX 606 ; N logicalnot ; B 51 107 555 390 ;
+C -1 ; WX 556 ; N ntilde ; B 17 -17 553 666 ;
+C -1 ; WX 833 ; N Otilde ; B 76 -17 794 866 ;
+C -1 ; WX 556 ; N otilde ; B 48 -17 553 666 ;
+C -1 ; WX 685 ; N Ccedilla ; B 69 -218 695 695 ;
+C -1 ; WX 722 ; N Agrave ; B -35 -3 685 911 ;
+C -1 ; WX 750 ; N onehalf ; B 14 -2 736 683 ;
+C -1 ; WX 778 ; N Eth ; B 0 -3 747 682 ;
+C -1 ; WX 400 ; N degree ; B 50 383 350 683 ;
+C -1 ; WX 611 ; N Yacute ; B 54 -3 675 911 ;
+C -1 ; WX 833 ; N Ocircumflex ; B 76 -17 794 896 ;
+C -1 ; WX 556 ; N oacute ; B 48 -17 504 719 ;
+C -1 ; WX 556 ; N mu ; B -15 -232 521 469 ;
+C -1 ; WX 606 ; N minus ; B 51 204 555 292 ;
+C -1 ; WX 556 ; N eth ; B 48 -17 546 726 ;
+C -1 ; WX 556 ; N odieresis ; B 48 -17 538 688 ;
+C -1 ; WX 747 ; N copyright ; B 26 -17 720 695 ;
+C -1 ; WX 606 ; N brokenbar ; B 259 0 347 720 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 108
+
+KPX A y -55
+KPX A w -37
+KPX A v -55
+KPX A space -55
+KPX A quoteright -55
+KPX A Y -74
+KPX A W -74
+KPX A V -74
+KPX A T -55
+
+KPX F space -18
+KPX F period -111
+KPX F comma -111
+KPX F A -74
+
+KPX L y -37
+KPX L space -18
+KPX L quoteright -55
+KPX L Y -74
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P space -55
+KPX P period -129
+KPX P comma -129
+KPX P A -92
+
+KPX R y -20
+KPX R Y -37
+KPX R W -55
+KPX R V -55
+KPX R T -37
+
+KPX T y -80
+KPX T w -50
+KPX T u -92
+KPX T semicolon -55
+KPX T s -92
+KPX T r -92
+KPX T period -55
+KPX T o -111
+KPX T i -74
+KPX T hyphen -92
+KPX T e -111
+KPX T comma -55
+KPX T colon -55
+KPX T c -92
+KPX T a -111
+KPX T O -18
+KPX T A -55
+
+KPX V y -50
+KPX V u -50
+KPX V semicolon -37
+KPX V r -74
+KPX V period -111
+KPX V o -74
+KPX V i -50
+KPX V hyphen -37
+KPX V e -74
+KPX V comma -111
+KPX V colon -37
+KPX V a -92
+KPX V A -74
+
+KPX W y -30
+KPX W u -30
+KPX W semicolon -18
+KPX W r -30
+KPX W period -55
+KPX W o -55
+KPX W i -30
+KPX W e -55
+KPX W comma -55
+KPX W colon -28
+KPX W a -74
+KPX W A -74
+
+KPX Y v -30
+KPX Y u -50
+KPX Y semicolon -55
+KPX Y q -92
+KPX Y period -55
+KPX Y p -74
+KPX Y o -111
+KPX Y i -54
+KPX Y hyphen -55
+KPX Y e -92
+KPX Y comma -55
+KPX Y colon -55
+KPX Y a -111
+KPX Y A -55
+
+KPX f quoteright 37
+KPX f f -37
+
+KPX one one -55
+
+KPX quoteleft quoteleft -55
+
+KPX quoteright t -18
+KPX quoteright space -37
+KPX quoteright s -37
+KPX quoteright quoteright -55
+
+KPX r quoteright 55
+KPX r q -18
+KPX r period -55
+KPX r o -18
+KPX r h -18
+KPX r g -18
+KPX r e -18
+KPX r comma -55
+KPX r c -18
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -37
+KPX y comma -37
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 195 212 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 195 212 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 195 212 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 195 212 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 83 212 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 195 212 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 212 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 212 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 212 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 212 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 28 212 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 28 212 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 28 212 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 212 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 223 212 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 250 212 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 250 212 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 250 212 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 250 212 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 250 212 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 112 212 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 223 212 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 223 212 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 223 212 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 211 212 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 151 212 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 139 212 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 167 212 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 112 20 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 112 20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 112 20 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 112 20 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 0 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 112 12 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 56 20 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 56 20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 56 20 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 56 20 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 20 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -12 20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 20 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 20 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 112 12 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 112 20 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 100 20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 112 20 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 112 20 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 112 12 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 44 8 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 112 20 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 100 20 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 112 20 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 112 20 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 112 20 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 112 20 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 72 8 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Pa-It b/font/Pa-It
new file mode 100644
index 0000000..01bdcf0
--- /dev/null
+++ b/font/Pa-It
@@ -0,0 +1,439 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Jul  2 22:37:33 1990
+Comment UniqueID 31796
+Comment VMusage 37415 48307
+FontName Palatino-Italic
+FullName Palatino Italic
+FamilyName Palatino
+Weight Medium
+ItalicAngle -10
+IsFixedPitch false
+FontBBox -170 -276 1010 918
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.005
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Palatino is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 692
+XHeight 482
+Ascender 733
+Descender -276
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 76 -8 292 733 ;
+C 34 ; WX 500 ; N quotedbl ; B 140 508 455 733 ;
+C 35 ; WX 500 ; N numbersign ; B 4 0 495 692 ;
+C 36 ; WX 500 ; N dollar ; B 15 -113 452 733 ;
+C 37 ; WX 889 ; N percent ; B 74 -7 809 710 ;
+C 38 ; WX 778 ; N ampersand ; B 47 -18 766 692 ;
+C 39 ; WX 278 ; N quoteright ; B 78 488 258 733 ;
+C 40 ; WX 333 ; N parenleft ; B 54 -106 331 733 ;
+C 41 ; WX 333 ; N parenright ; B 2 -106 279 733 ;
+C 42 ; WX 389 ; N asterisk ; B 76 368 400 706 ;
+C 43 ; WX 606 ; N plus ; B 51 0 555 504 ;
+C 44 ; WX 250 ; N comma ; B 8 -143 203 123 ;
+C 45 ; WX 333 ; N hyphen ; B 19 223 304 281 ;
+C 46 ; WX 250 ; N period ; B 53 -5 158 112 ;
+C 47 ; WX 296 ; N slash ; B -40 -119 392 733 ;
+C 48 ; WX 500 ; N zero ; B 36 -11 480 699 ;
+C 49 ; WX 500 ; N one ; B 54 -3 398 699 ;
+C 50 ; WX 500 ; N two ; B 12 -3 437 699 ;
+C 51 ; WX 500 ; N three ; B 22 -11 447 699 ;
+C 52 ; WX 500 ; N four ; B 15 -3 478 699 ;
+C 53 ; WX 500 ; N five ; B 14 -11 491 693 ;
+C 54 ; WX 500 ; N six ; B 49 -11 469 699 ;
+C 55 ; WX 500 ; N seven ; B 53 -3 502 692 ;
+C 56 ; WX 500 ; N eight ; B 36 -11 469 699 ;
+C 57 ; WX 500 ; N nine ; B 32 -11 468 699 ;
+C 58 ; WX 250 ; N colon ; B 44 -5 207 458 ;
+C 59 ; WX 250 ; N semicolon ; B -9 -146 219 456 ;
+C 60 ; WX 606 ; N less ; B 53 -6 554 516 ;
+C 61 ; WX 606 ; N equal ; B 51 126 555 378 ;
+C 62 ; WX 606 ; N greater ; B 53 -6 554 516 ;
+C 63 ; WX 500 ; N question ; B 114 -8 427 706 ;
+C 64 ; WX 747 ; N at ; B 27 -18 718 706 ;
+C 65 ; WX 722 ; N A ; B -19 -3 677 705 ;
+C 66 ; WX 611 ; N B ; B 26 -6 559 692 ;
+C 67 ; WX 667 ; N C ; B 45 -18 651 706 ;
+C 68 ; WX 778 ; N D ; B 28 -3 741 692 ;
+C 69 ; WX 611 ; N E ; B 30 -3 570 692 ;
+C 70 ; WX 556 ; N F ; B 0 -3 548 692 ;
+C 71 ; WX 722 ; N G ; B 50 -18 694 706 ;
+C 72 ; WX 778 ; N H ; B -3 -3 800 692 ;
+C 73 ; WX 333 ; N I ; B 7 -3 354 692 ;
+C 74 ; WX 333 ; N J ; B -35 -206 358 692 ;
+C 75 ; WX 667 ; N K ; B 13 -3 683 692 ;
+C 76 ; WX 556 ; N L ; B 16 -3 523 692 ;
+C 77 ; WX 944 ; N M ; B -19 -18 940 692 ;
+C 78 ; WX 778 ; N N ; B 2 -11 804 692 ;
+C 79 ; WX 778 ; N O ; B 53 -18 748 706 ;
+C 80 ; WX 611 ; N P ; B 9 -3 594 692 ;
+C 81 ; WX 778 ; N Q ; B 53 -201 748 706 ;
+C 82 ; WX 667 ; N R ; B 9 -3 639 692 ;
+C 83 ; WX 556 ; N S ; B 42 -18 506 706 ;
+C 84 ; WX 611 ; N T ; B 53 -3 635 692 ;
+C 85 ; WX 778 ; N U ; B 88 -18 798 692 ;
+C 86 ; WX 722 ; N V ; B 75 -8 754 692 ;
+C 87 ; WX 944 ; N W ; B 71 -8 980 700 ;
+C 88 ; WX 722 ; N X ; B 20 -3 734 692 ;
+C 89 ; WX 667 ; N Y ; B 52 -3 675 705 ;
+C 90 ; WX 667 ; N Z ; B 20 -3 637 692 ;
+C 91 ; WX 333 ; N bracketleft ; B 18 -100 326 733 ;
+C 92 ; WX 606 ; N backslash ; B 81 0 513 733 ;
+C 93 ; WX 333 ; N bracketright ; B 7 -100 315 733 ;
+C 94 ; WX 606 ; N asciicircum ; B 51 283 554 689 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 278 ; N quoteleft ; B 78 488 258 733 ;
+C 97 ; WX 444 ; N a ; B 4 -11 406 482 ;
+C 98 ; WX 463 ; N b ; B 37 -11 433 733 ;
+C 99 ; WX 407 ; N c ; B 25 -11 389 482 ;
+C 100 ; WX 500 ; N d ; B 17 -11 483 733 ;
+C 101 ; WX 389 ; N e ; B 15 -11 374 482 ;
+C 102 ; WX 278 ; N f ; B -162 -276 413 733 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B -37 -276 498 482 ;
+C 104 ; WX 500 ; N h ; B 10 -9 471 733 ;
+C 105 ; WX 278 ; N i ; B 34 -9 264 712 ;
+C 106 ; WX 278 ; N j ; B -70 -276 265 712 ;
+C 107 ; WX 444 ; N k ; B 8 -9 449 733 ;
+C 108 ; WX 278 ; N l ; B 36 -9 251 733 ;
+C 109 ; WX 778 ; N m ; B 24 -9 740 482 ;
+C 110 ; WX 556 ; N n ; B 24 -9 514 482 ;
+C 111 ; WX 444 ; N o ; B 17 -11 411 482 ;
+C 112 ; WX 500 ; N p ; B -7 -276 465 482 ;
+C 113 ; WX 463 ; N q ; B 24 -276 432 482 ;
+C 114 ; WX 389 ; N r ; B 26 -9 384 482 ;
+C 115 ; WX 389 ; N s ; B 9 -11 345 482 ;
+C 116 ; WX 333 ; N t ; B 41 -9 310 646 ;
+C 117 ; WX 556 ; N u ; B 32 -11 512 482 ;
+C 118 ; WX 500 ; N v ; B 21 -11 477 482 ;
+C 119 ; WX 722 ; N w ; B 21 -11 699 482 ;
+C 120 ; WX 500 ; N x ; B 9 -11 484 482 ;
+C 121 ; WX 500 ; N y ; B -8 -276 490 482 ;
+C 122 ; WX 444 ; N z ; B -1 -11 416 482 ;
+C 123 ; WX 333 ; N braceleft ; B 15 -100 319 733 ;
+C 124 ; WX 606 ; N bar ; B 275 0 331 733 ;
+C 125 ; WX 333 ; N braceright ; B 14 -100 318 733 ;
+C 126 ; WX 606 ; N asciitilde ; B 51 168 555 339 ;
+C 161 ; WX 333 ; N exclamdown ; B 15 -276 233 467 ;
+C 162 ; WX 500 ; N cent ; B 56 -96 418 551 ;
+C 163 ; WX 500 ; N sterling ; B 2 -18 479 708 ;
+C 164 ; WX 167 ; N fraction ; B -170 0 337 699 ;
+C 165 ; WX 500 ; N yen ; B 35 -3 512 699 ;
+C 166 ; WX 500 ; N florin ; B 5 -276 470 708 ;
+C 167 ; WX 500 ; N section ; B 14 -220 463 706 ;
+C 168 ; WX 500 ; N currency ; B 14 115 486 577 ;
+C 169 ; WX 333 ; N quotesingle ; B 140 508 288 733 ;
+C 170 ; WX 500 ; N quotedblleft ; B 98 488 475 733 ;
+C 171 ; WX 500 ; N guillemotleft ; B 57 70 437 440 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 57 70 270 440 ;
+C 173 ; WX 333 ; N guilsinglright ; B 63 70 276 440 ;
+C 174 ; WX 528 ; N fi ; B -162 -276 502 733 ;
+C 175 ; WX 545 ; N fl ; B -162 -276 520 733 ;
+C 177 ; WX 500 ; N endash ; B -10 228 510 278 ;
+C 178 ; WX 500 ; N dagger ; B 48 0 469 692 ;
+C 179 ; WX 500 ; N daggerdbl ; B 10 -162 494 692 ;
+C 180 ; WX 250 ; N periodcentered ; B 53 195 158 312 ;
+C 182 ; WX 500 ; N paragraph ; B 33 -224 611 692 ;
+C 183 ; WX 500 ; N bullet ; B 86 182 430 526 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 27 -122 211 120 ;
+C 185 ; WX 500 ; N quotedblbase ; B 43 -122 424 120 ;
+C 186 ; WX 500 ; N quotedblright ; B 98 488 475 733 ;
+C 187 ; WX 500 ; N guillemotright ; B 63 70 443 440 ;
+C 188 ; WX 1000 ; N ellipsis ; B 102 -5 873 112 ;
+C 189 ; WX 1000 ; N perthousand ; B 72 -6 929 717 ;
+C 191 ; WX 500 ; N questiondown ; B 57 -246 370 467 ;
+C 193 ; WX 333 ; N grave ; B 86 518 310 687 ;
+C 194 ; WX 333 ; N acute ; B 122 518 346 687 ;
+C 195 ; WX 333 ; N circumflex ; B 56 510 350 679 ;
+C 196 ; WX 333 ; N tilde ; B 63 535 390 638 ;
+C 197 ; WX 333 ; N macron ; B 74 538 386 589 ;
+C 198 ; WX 333 ; N breve ; B 92 518 393 677 ;
+C 199 ; WX 333 ; N dotaccent ; B 175 537 283 645 ;
+C 200 ; WX 333 ; N dieresis ; B 78 537 378 637 ;
+C 202 ; WX 333 ; N ring ; B 159 508 359 708 ;
+C 203 ; WX 333 ; N cedilla ; B -9 -216 202 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 46 518 385 730 ;
+C 206 ; WX 333 ; N ogonek ; B 38 -207 196 -18 ;
+C 207 ; WX 333 ; N caron ; B 104 510 409 679 ;
+C 208 ; WX 1000 ; N emdash ; B -10 228 1010 278 ;
+C 225 ; WX 941 ; N AE ; B -4 -3 902 692 ;
+C 227 ; WX 333 ; N ordfeminine ; B 60 404 321 699 ;
+C 232 ; WX 556 ; N Lslash ; B -16 -3 523 692 ;
+C 233 ; WX 778 ; N Oslash ; B 32 -39 762 721 ;
+C 234 ; WX 1028 ; N OE ; B 56 -18 989 706 ;
+C 235 ; WX 333 ; N ordmasculine ; B 66 404 322 699 ;
+C 241 ; WX 638 ; N ae ; B 1 -11 623 482 ;
+C 245 ; WX 278 ; N dotlessi ; B 34 -9 241 482 ;
+C 248 ; WX 278 ; N lslash ; B -10 -9 302 733 ;
+C 249 ; WX 444 ; N oslash ; B -18 -24 460 510 ;
+C 250 ; WX 669 ; N oe ; B 17 -11 654 482 ;
+C 251 ; WX 500 ; N germandbls ; B -160 -276 488 733 ;
+C -1 ; WX 667 ; N Zcaron ; B 20 -3 637 907 ;
+C -1 ; WX 407 ; N ccedilla ; B 25 -216 389 482 ;
+C -1 ; WX 500 ; N ydieresis ; B -8 -276 490 657 ;
+C -1 ; WX 444 ; N atilde ; B 4 -11 446 650 ;
+C -1 ; WX 278 ; N icircumflex ; B 29 -9 323 699 ;
+C -1 ; WX 300 ; N threesuperior ; B 28 273 304 699 ;
+C -1 ; WX 389 ; N ecircumflex ; B 15 -11 398 699 ;
+C -1 ; WX 500 ; N thorn ; B -39 -276 433 733 ;
+C -1 ; WX 389 ; N egrave ; B 15 -11 374 707 ;
+C -1 ; WX 300 ; N twosuperior ; B 13 278 290 699 ;
+C -1 ; WX 389 ; N eacute ; B 15 -11 394 707 ;
+C -1 ; WX 444 ; N otilde ; B 17 -11 446 650 ;
+C -1 ; WX 722 ; N Aacute ; B -19 -3 677 897 ;
+C -1 ; WX 444 ; N ocircumflex ; B 17 -11 411 699 ;
+C -1 ; WX 500 ; N yacute ; B -8 -276 490 707 ;
+C -1 ; WX 556 ; N udieresis ; B 32 -11 512 657 ;
+C -1 ; WX 750 ; N threequarters ; B 35 -2 715 699 ;
+C -1 ; WX 444 ; N acircumflex ; B 4 -11 406 699 ;
+C -1 ; WX 778 ; N Eth ; B 19 -3 741 692 ;
+C -1 ; WX 389 ; N edieresis ; B 15 -11 406 657 ;
+C -1 ; WX 556 ; N ugrave ; B 32 -11 512 707 ;
+C -1 ; WX 1000 ; N trademark ; B 52 285 951 689 ;
+C -1 ; WX 444 ; N ograve ; B 17 -11 411 707 ;
+C -1 ; WX 389 ; N scaron ; B 9 -11 419 687 ;
+C -1 ; WX 333 ; N Idieresis ; B 7 -3 418 847 ;
+C -1 ; WX 556 ; N uacute ; B 32 -11 512 707 ;
+C -1 ; WX 444 ; N agrave ; B 4 -11 406 707 ;
+C -1 ; WX 556 ; N ntilde ; B 24 -9 514 650 ;
+C -1 ; WX 444 ; N aring ; B 4 -11 406 728 ;
+C -1 ; WX 444 ; N zcaron ; B -1 -11 447 687 ;
+C -1 ; WX 333 ; N Icircumflex ; B 7 -3 390 889 ;
+C -1 ; WX 778 ; N Ntilde ; B 2 -11 804 866 ;
+C -1 ; WX 556 ; N ucircumflex ; B 32 -11 512 699 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 30 -3 570 889 ;
+C -1 ; WX 333 ; N Iacute ; B 7 -3 406 897 ;
+C -1 ; WX 667 ; N Ccedilla ; B 45 -216 651 706 ;
+C -1 ; WX 778 ; N Odieresis ; B 53 -18 748 847 ;
+C -1 ; WX 556 ; N Scaron ; B 42 -18 539 907 ;
+C -1 ; WX 611 ; N Edieresis ; B 30 -3 570 847 ;
+C -1 ; WX 333 ; N Igrave ; B 7 -3 354 897 ;
+C -1 ; WX 444 ; N adieresis ; B 4 -11 434 657 ;
+C -1 ; WX 778 ; N Ograve ; B 53 -18 748 897 ;
+C -1 ; WX 611 ; N Egrave ; B 30 -3 570 897 ;
+C -1 ; WX 667 ; N Ydieresis ; B 52 -3 675 847 ;
+C -1 ; WX 747 ; N registered ; B 11 -18 736 706 ;
+C -1 ; WX 778 ; N Otilde ; B 53 -18 748 866 ;
+C -1 ; WX 750 ; N onequarter ; B 31 -2 715 699 ;
+C -1 ; WX 778 ; N Ugrave ; B 88 -18 798 897 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 88 -18 798 889 ;
+C -1 ; WX 611 ; N Thorn ; B 9 -3 570 692 ;
+C -1 ; WX 606 ; N divide ; B 51 0 555 504 ;
+C -1 ; WX 722 ; N Atilde ; B -19 -3 677 866 ;
+C -1 ; WX 778 ; N Uacute ; B 88 -18 798 897 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 53 -18 748 889 ;
+C -1 ; WX 606 ; N logicalnot ; B 51 118 555 378 ;
+C -1 ; WX 722 ; N Aring ; B -19 -3 677 918 ;
+C -1 ; WX 278 ; N idieresis ; B 34 -9 351 657 ;
+C -1 ; WX 278 ; N iacute ; B 34 -9 331 707 ;
+C -1 ; WX 444 ; N aacute ; B 4 -11 414 707 ;
+C -1 ; WX 606 ; N plusminus ; B 51 0 555 504 ;
+C -1 ; WX 606 ; N multiply ; B 83 36 523 474 ;
+C -1 ; WX 778 ; N Udieresis ; B 88 -18 798 847 ;
+C -1 ; WX 606 ; N minus ; B 51 224 555 280 ;
+C -1 ; WX 300 ; N onesuperior ; B 61 278 285 699 ;
+C -1 ; WX 611 ; N Eacute ; B 30 -3 570 897 ;
+C -1 ; WX 722 ; N Acircumflex ; B -19 -3 677 889 ;
+C -1 ; WX 747 ; N copyright ; B 11 -18 736 706 ;
+C -1 ; WX 722 ; N Agrave ; B -19 -3 677 897 ;
+C -1 ; WX 444 ; N odieresis ; B 17 -11 434 657 ;
+C -1 ; WX 444 ; N oacute ; B 17 -11 414 707 ;
+C -1 ; WX 400 ; N degree ; B 90 389 390 689 ;
+C -1 ; WX 278 ; N igrave ; B 34 -9 271 707 ;
+C -1 ; WX 556 ; N mu ; B 15 -226 512 482 ;
+C -1 ; WX 778 ; N Oacute ; B 53 -18 748 897 ;
+C -1 ; WX 444 ; N eth ; B 17 -11 478 733 ;
+C -1 ; WX 722 ; N Adieresis ; B -19 -3 677 847 ;
+C -1 ; WX 667 ; N Yacute ; B 52 -3 675 897 ;
+C -1 ; WX 606 ; N brokenbar ; B 275 0 331 733 ;
+C -1 ; WX 750 ; N onehalf ; B 31 -2 721 699 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 106
+
+KPX A y -55
+KPX A w -37
+KPX A v -37
+KPX A space -37
+KPX A quoteright -55
+KPX A Y -55
+KPX A W -55
+KPX A V -74
+KPX A T -55
+
+KPX F period -111
+KPX F comma -111
+KPX F A -111
+
+KPX L y -37
+KPX L space -18
+KPX L quoteright -37
+KPX L Y -74
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -129
+
+KPX R y -37
+KPX R Y -55
+KPX R W -55
+KPX R V -74
+KPX R T -55
+
+KPX T y -92
+KPX T w -92
+KPX T u -111
+KPX T semicolon -74
+KPX T s -111
+KPX T r -111
+KPX T period -74
+KPX T o -111
+KPX T i -55
+KPX T hyphen -55
+KPX T e -111
+KPX T comma -74
+KPX T colon -74
+KPX T c -111
+KPX T a -111
+KPX T O -18
+KPX T A -92
+
+KPX V y -74
+KPX V u -74
+KPX V semicolon -37
+KPX V r -92
+KPX V period -129
+KPX V o -74
+KPX V i -74
+KPX V hyphen -55
+KPX V e -92
+KPX V comma -129
+KPX V colon -37
+KPX V a -74
+KPX V A -210
+
+KPX W y -20
+KPX W u -20
+KPX W semicolon -18
+KPX W r -20
+KPX W period -55
+KPX W o -20
+KPX W i -20
+KPX W hyphen -18
+KPX W e -20
+KPX W comma -55
+KPX W colon -18
+KPX W a -20
+KPX W A -92
+
+KPX Y v -74
+KPX Y u -92
+KPX Y semicolon -74
+KPX Y q -92
+KPX Y period -92
+KPX Y p -74
+KPX Y o -111
+KPX Y i -55
+KPX Y hyphen -74
+KPX Y e -111
+KPX Y comma -92
+KPX Y colon -74
+KPX Y a -92
+KPX Y A -92
+
+KPX f quoteright 55
+
+KPX one one -55
+
+KPX quoteleft quoteleft -74
+
+KPX quoteright t -37
+KPX quoteright space -55
+KPX quoteright s -55
+KPX quoteright quoteright -74
+
+KPX r quoteright 37
+KPX r q -18
+KPX r period -74
+KPX r o -18
+KPX r h -18
+KPX r g -18
+KPX r e -18
+KPX r comma -74
+KPX r c -18
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -37
+KPX y comma -37
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 271 210 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 261 210 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 255 210 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 235 210 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 235 210 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 255 228 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 207 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 199 210 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 179 210 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 179 210 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 167 210 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 60 210 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 40 210 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 40 210 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 210 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 263 228 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 283 210 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 263 210 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 255 210 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 251 210 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 263 228 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 130 228 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 277 210 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 255 210 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 235 210 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 235 210 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 227 210 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 187 210 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 179 228 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 68 20 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 56 20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 56 20 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 44 20 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 36 20 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 56 12 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 37 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 48 20 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 48 20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 28 20 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 16 20 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -15 20 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -27 20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 20 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -39 20 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 112 12 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 68 20 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 56 20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 56 20 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 36 20 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 56 12 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 10 8 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 124 20 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 112 20 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 112 20 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 100 20 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 96 20 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 84 20 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 38 8 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Pa-ItF b/font/Pa-ItF
new file mode 100644
index 0000000..fec6226
--- /dev/null
+++ b/font/Pa-ItF
@@ -0,0 +1,437 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Wed Apr 24 13:28:10 1991
+Comment UniqueID 34736
+Comment VMusage 37767 48659
+FontName Palatino-ItalicOsF
+FullName Palatino Italic Old Style Figures
+FamilyName Palatino
+Weight Medium
+ItalicAngle -10
+IsFixedPitch false
+FontBBox -170 -276 989 918
+UnderlinePosition -131
+UnderlineThickness 58
+Version 001.001
+Notice Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.Palatino is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 692
+XHeight 482
+Ascender 733
+Descender -276
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 76 -8 292 733 ;
+C 34 ; WX 500 ; N quotedbl ; B 140 508 455 733 ;
+C 35 ; WX 500 ; N numbersign ; B 4 0 495 692 ;
+C 36 ; WX 500 ; N dollar ; B 15 -113 452 733 ;
+C 37 ; WX 889 ; N percent ; B 74 -7 809 710 ;
+C 38 ; WX 778 ; N ampersand ; B 47 -18 766 692 ;
+C 39 ; WX 278 ; N quoteright ; B 78 488 258 733 ;
+C 40 ; WX 333 ; N parenleft ; B 54 -106 331 733 ;
+C 41 ; WX 333 ; N parenright ; B 2 -106 279 733 ;
+C 42 ; WX 389 ; N asterisk ; B 76 368 400 706 ;
+C 43 ; WX 606 ; N plus ; B 51 0 555 504 ;
+C 44 ; WX 250 ; N comma ; B 8 -143 203 123 ;
+C 45 ; WX 333 ; N hyphen ; B 19 223 304 281 ;
+C 46 ; WX 250 ; N period ; B 53 -5 158 112 ;
+C 47 ; WX 296 ; N slash ; B -40 -119 392 733 ;
+C 48 ; WX 500 ; N zero ; B 36 -14 456 478 ;
+C 49 ; WX 500 ; N one ; B 60 -8 398 482 ;
+C 50 ; WX 500 ; N two ; B 26 -10 426 478 ;
+C 51 ; WX 500 ; N three ; B 6 -226 394 478 ;
+C 52 ; WX 500 ; N four ; B 6 -226 462 478 ;
+C 53 ; WX 500 ; N five ; B 6 -226 442 478 ;
+C 54 ; WX 500 ; N six ; B 49 -14 479 684 ;
+C 55 ; WX 500 ; N seven ; B 28 -226 488 478 ;
+C 56 ; WX 500 ; N eight ; B 32 -14 456 672 ;
+C 57 ; WX 500 ; N nine ; B 12 -232 446 478 ;
+C 58 ; WX 250 ; N colon ; B 44 -5 207 458 ;
+C 59 ; WX 250 ; N semicolon ; B -9 -146 219 456 ;
+C 60 ; WX 606 ; N less ; B 53 -6 554 516 ;
+C 61 ; WX 606 ; N equal ; B 51 126 555 378 ;
+C 62 ; WX 606 ; N greater ; B 53 -6 554 516 ;
+C 63 ; WX 500 ; N question ; B 114 -8 427 706 ;
+C 64 ; WX 747 ; N at ; B 27 -18 718 706 ;
+C 65 ; WX 722 ; N A ; B -19 -3 677 705 ;
+C 66 ; WX 611 ; N B ; B 26 -6 559 692 ;
+C 67 ; WX 667 ; N C ; B 45 -18 651 706 ;
+C 68 ; WX 778 ; N D ; B 28 -3 741 692 ;
+C 69 ; WX 611 ; N E ; B 30 -3 570 692 ;
+C 70 ; WX 556 ; N F ; B 0 -3 548 692 ;
+C 71 ; WX 722 ; N G ; B 50 -18 694 706 ;
+C 72 ; WX 778 ; N H ; B -3 -3 800 692 ;
+C 73 ; WX 333 ; N I ; B 7 -3 354 692 ;
+C 74 ; WX 333 ; N J ; B -35 -206 358 692 ;
+C 75 ; WX 667 ; N K ; B 13 -3 683 692 ;
+C 76 ; WX 556 ; N L ; B 16 -3 523 692 ;
+C 77 ; WX 944 ; N M ; B -19 -18 940 692 ;
+C 78 ; WX 778 ; N N ; B 2 -11 804 692 ;
+C 79 ; WX 778 ; N O ; B 53 -18 748 706 ;
+C 80 ; WX 611 ; N P ; B 9 -3 594 692 ;
+C 81 ; WX 778 ; N Q ; B 53 -201 748 706 ;
+C 82 ; WX 667 ; N R ; B 9 -3 639 692 ;
+C 83 ; WX 556 ; N S ; B 42 -18 506 706 ;
+C 84 ; WX 611 ; N T ; B 53 -3 635 692 ;
+C 85 ; WX 778 ; N U ; B 88 -18 798 692 ;
+C 86 ; WX 722 ; N V ; B 75 -8 754 692 ;
+C 87 ; WX 944 ; N W ; B 71 -8 980 700 ;
+C 88 ; WX 722 ; N X ; B 20 -3 734 692 ;
+C 89 ; WX 667 ; N Y ; B 52 -3 675 705 ;
+C 90 ; WX 667 ; N Z ; B 20 -3 637 692 ;
+C 91 ; WX 333 ; N bracketleft ; B 18 -100 326 733 ;
+C 92 ; WX 606 ; N backslash ; B 81 0 513 733 ;
+C 93 ; WX 333 ; N bracketright ; B 7 -100 315 733 ;
+C 94 ; WX 606 ; N asciicircum ; B 51 283 554 689 ;
+C 95 ; WX 500 ; N underscore ; B 0 -160 500 -102 ;
+C 96 ; WX 278 ; N quoteleft ; B 78 488 258 733 ;
+C 97 ; WX 444 ; N a ; B 4 -11 406 482 ;
+C 98 ; WX 463 ; N b ; B 37 -11 433 733 ;
+C 99 ; WX 407 ; N c ; B 25 -11 389 482 ;
+C 100 ; WX 500 ; N d ; B 17 -11 483 733 ;
+C 101 ; WX 389 ; N e ; B 15 -11 374 482 ;
+C 102 ; WX 278 ; N f ; B -162 -276 413 733 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B -37 -276 498 482 ;
+C 104 ; WX 500 ; N h ; B 10 -9 471 733 ;
+C 105 ; WX 278 ; N i ; B 34 -9 264 712 ;
+C 106 ; WX 278 ; N j ; B -70 -276 265 712 ;
+C 107 ; WX 444 ; N k ; B 8 -9 449 733 ;
+C 108 ; WX 278 ; N l ; B 36 -9 251 733 ;
+C 109 ; WX 778 ; N m ; B 24 -9 740 482 ;
+C 110 ; WX 556 ; N n ; B 24 -9 514 482 ;
+C 111 ; WX 444 ; N o ; B 17 -11 411 482 ;
+C 112 ; WX 500 ; N p ; B -7 -276 465 482 ;
+C 113 ; WX 463 ; N q ; B 24 -276 432 482 ;
+C 114 ; WX 389 ; N r ; B 26 -9 384 482 ;
+C 115 ; WX 389 ; N s ; B 9 -11 345 482 ;
+C 116 ; WX 333 ; N t ; B 41 -9 310 646 ;
+C 117 ; WX 556 ; N u ; B 32 -11 512 482 ;
+C 118 ; WX 500 ; N v ; B 21 -11 477 482 ;
+C 119 ; WX 722 ; N w ; B 21 -11 699 482 ;
+C 120 ; WX 500 ; N x ; B 9 -11 484 482 ;
+C 121 ; WX 500 ; N y ; B -8 -276 490 482 ;
+C 122 ; WX 444 ; N z ; B -1 -11 416 482 ;
+C 123 ; WX 333 ; N braceleft ; B 15 -100 319 733 ;
+C 124 ; WX 606 ; N bar ; B 275 0 331 733 ;
+C 125 ; WX 333 ; N braceright ; B 14 -100 318 733 ;
+C 126 ; WX 606 ; N asciitilde ; B 51 168 555 339 ;
+C 161 ; WX 333 ; N exclamdown ; B 15 -276 233 467 ;
+C 162 ; WX 500 ; N cent ; B 56 -96 418 551 ;
+C 163 ; WX 500 ; N sterling ; B 2 -18 479 708 ;
+C 164 ; WX 167 ; N fraction ; B -170 0 337 699 ;
+C 165 ; WX 500 ; N yen ; B 35 -3 512 699 ;
+C 166 ; WX 500 ; N florin ; B 5 -276 470 708 ;
+C 167 ; WX 500 ; N section ; B 14 -220 463 706 ;
+C 168 ; WX 500 ; N currency ; B 14 115 486 577 ;
+C 169 ; WX 333 ; N quotesingle ; B 140 508 288 733 ;
+C 170 ; WX 500 ; N quotedblleft ; B 98 488 475 733 ;
+C 171 ; WX 500 ; N guillemotleft ; B 57 70 437 440 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 57 70 270 440 ;
+C 173 ; WX 333 ; N guilsinglright ; B 63 70 276 440 ;
+C 174 ; WX 528 ; N fi ; B -162 -276 502 733 ;
+C 175 ; WX 545 ; N fl ; B -162 -276 520 733 ;
+C 177 ; WX 500 ; N endash ; B -10 228 510 278 ;
+C 178 ; WX 500 ; N dagger ; B 48 0 469 692 ;
+C 179 ; WX 500 ; N daggerdbl ; B 10 -162 494 692 ;
+C 180 ; WX 250 ; N periodcentered ; B 53 195 158 312 ;
+C 182 ; WX 500 ; N paragraph ; B 33 -224 611 692 ;
+C 183 ; WX 500 ; N bullet ; B 86 182 430 526 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 27 -122 211 120 ;
+C 185 ; WX 500 ; N quotedblbase ; B 43 -122 424 120 ;
+C 186 ; WX 500 ; N quotedblright ; B 98 488 475 733 ;
+C 187 ; WX 500 ; N guillemotright ; B 63 70 443 440 ;
+C 188 ; WX 1000 ; N ellipsis ; B 102 -5 873 112 ;
+C 189 ; WX 1000 ; N perthousand ; B 72 -6 929 717 ;
+C 191 ; WX 500 ; N questiondown ; B 57 -246 370 467 ;
+C 193 ; WX 333 ; N grave ; B 86 518 310 687 ;
+C 194 ; WX 333 ; N acute ; B 122 518 346 687 ;
+C 195 ; WX 333 ; N circumflex ; B 56 510 350 679 ;
+C 196 ; WX 333 ; N tilde ; B 63 535 390 638 ;
+C 197 ; WX 333 ; N macron ; B 74 538 386 589 ;
+C 198 ; WX 333 ; N breve ; B 92 518 393 677 ;
+C 199 ; WX 333 ; N dotaccent ; B 125 537 233 645 ;
+C 200 ; WX 333 ; N dieresis ; B 78 537 378 637 ;
+C 202 ; WX 333 ; N ring ; B 159 508 359 708 ;
+C 203 ; WX 333 ; N cedilla ; B -9 -216 202 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 46 518 385 730 ;
+C 206 ; WX 333 ; N ogonek ; B 38 -207 196 -18 ;
+C 207 ; WX 333 ; N caron ; B 104 510 409 679 ;
+C 208 ; WX 1000 ; N emdash ; B 115 228 885 278 ;
+C 225 ; WX 941 ; N AE ; B -4 -3 902 692 ;
+C 227 ; WX 333 ; N ordfeminine ; B 60 404 321 699 ;
+C 232 ; WX 556 ; N Lslash ; B -16 -3 523 692 ;
+C 233 ; WX 778 ; N Oslash ; B 32 -39 762 721 ;
+C 234 ; WX 1028 ; N OE ; B 56 -18 989 706 ;
+C 235 ; WX 333 ; N ordmasculine ; B 66 404 322 699 ;
+C 241 ; WX 638 ; N ae ; B 1 -11 623 482 ;
+C 245 ; WX 278 ; N dotlessi ; B 34 -9 241 482 ;
+C 248 ; WX 278 ; N lslash ; B -10 -9 302 733 ;
+C 249 ; WX 444 ; N oslash ; B -18 -24 460 510 ;
+C 250 ; WX 669 ; N oe ; B 17 -11 654 482 ;
+C 251 ; WX 500 ; N germandbls ; B -160 -276 488 733 ;
+C -1 ; WX 389 ; N ecircumflex ; B 15 -11 398 699 ;
+C -1 ; WX 389 ; N edieresis ; B 15 -11 406 657 ;
+C -1 ; WX 444 ; N aacute ; B 4 -11 414 707 ;
+C -1 ; WX 747 ; N registered ; B 11 -18 736 706 ;
+C -1 ; WX 278 ; N icircumflex ; B 29 -9 323 699 ;
+C -1 ; WX 556 ; N udieresis ; B 32 -11 512 657 ;
+C -1 ; WX 444 ; N ograve ; B 17 -11 411 707 ;
+C -1 ; WX 556 ; N uacute ; B 32 -11 512 707 ;
+C -1 ; WX 556 ; N ucircumflex ; B 32 -11 512 699 ;
+C -1 ; WX 722 ; N Aacute ; B -19 -3 677 897 ;
+C -1 ; WX 278 ; N igrave ; B 34 -9 271 707 ;
+C -1 ; WX 333 ; N Icircumflex ; B 7 -3 390 889 ;
+C -1 ; WX 407 ; N ccedilla ; B 25 -216 389 482 ;
+C -1 ; WX 444 ; N adieresis ; B 4 -11 434 657 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 30 -3 570 889 ;
+C -1 ; WX 389 ; N scaron ; B 9 -11 419 687 ;
+C -1 ; WX 500 ; N thorn ; B -39 -276 433 733 ;
+C -1 ; WX 1000 ; N trademark ; B 52 285 951 689 ;
+C -1 ; WX 389 ; N egrave ; B 15 -11 374 707 ;
+C -1 ; WX 300 ; N threesuperior ; B 28 273 304 699 ;
+C -1 ; WX 444 ; N zcaron ; B -1 -11 447 687 ;
+C -1 ; WX 444 ; N atilde ; B 4 -11 446 650 ;
+C -1 ; WX 444 ; N aring ; B 4 -11 406 728 ;
+C -1 ; WX 444 ; N ocircumflex ; B 17 -11 411 699 ;
+C -1 ; WX 611 ; N Edieresis ; B 30 -3 570 847 ;
+C -1 ; WX 750 ; N threequarters ; B 35 -2 715 699 ;
+C -1 ; WX 500 ; N ydieresis ; B -8 -276 490 657 ;
+C -1 ; WX 500 ; N yacute ; B -8 -276 490 707 ;
+C -1 ; WX 278 ; N iacute ; B 34 -9 331 707 ;
+C -1 ; WX 722 ; N Acircumflex ; B -19 -3 677 889 ;
+C -1 ; WX 778 ; N Uacute ; B 88 -18 798 897 ;
+C -1 ; WX 389 ; N eacute ; B 15 -11 394 707 ;
+C -1 ; WX 778 ; N Ograve ; B 53 -18 748 897 ;
+C -1 ; WX 444 ; N agrave ; B 4 -11 406 707 ;
+C -1 ; WX 778 ; N Udieresis ; B 88 -18 798 847 ;
+C -1 ; WX 444 ; N acircumflex ; B 4 -11 406 699 ;
+C -1 ; WX 333 ; N Igrave ; B 7 -3 354 897 ;
+C -1 ; WX 300 ; N twosuperior ; B 13 278 290 699 ;
+C -1 ; WX 778 ; N Ugrave ; B 88 -18 798 897 ;
+C -1 ; WX 750 ; N onequarter ; B 31 -2 715 699 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 88 -18 798 889 ;
+C -1 ; WX 556 ; N Scaron ; B 42 -18 539 907 ;
+C -1 ; WX 333 ; N Idieresis ; B 7 -3 418 847 ;
+C -1 ; WX 278 ; N idieresis ; B 34 -9 351 657 ;
+C -1 ; WX 611 ; N Egrave ; B 30 -3 570 897 ;
+C -1 ; WX 778 ; N Oacute ; B 53 -18 748 897 ;
+C -1 ; WX 606 ; N divide ; B 51 0 555 504 ;
+C -1 ; WX 722 ; N Atilde ; B -19 -3 677 866 ;
+C -1 ; WX 722 ; N Aring ; B -19 -3 677 918 ;
+C -1 ; WX 778 ; N Odieresis ; B 53 -18 748 847 ;
+C -1 ; WX 722 ; N Adieresis ; B -19 -3 677 847 ;
+C -1 ; WX 778 ; N Ntilde ; B 2 -11 804 866 ;
+C -1 ; WX 667 ; N Zcaron ; B 20 -3 637 907 ;
+C -1 ; WX 611 ; N Thorn ; B 9 -3 570 692 ;
+C -1 ; WX 333 ; N Iacute ; B 7 -3 406 897 ;
+C -1 ; WX 606 ; N plusminus ; B 51 0 555 504 ;
+C -1 ; WX 606 ; N multiply ; B 83 36 523 474 ;
+C -1 ; WX 611 ; N Eacute ; B 30 -3 570 897 ;
+C -1 ; WX 667 ; N Ydieresis ; B 52 -3 675 847 ;
+C -1 ; WX 300 ; N onesuperior ; B 61 278 285 699 ;
+C -1 ; WX 556 ; N ugrave ; B 32 -11 512 707 ;
+C -1 ; WX 606 ; N logicalnot ; B 51 118 555 378 ;
+C -1 ; WX 556 ; N ntilde ; B 24 -9 514 650 ;
+C -1 ; WX 778 ; N Otilde ; B 53 -18 748 866 ;
+C -1 ; WX 444 ; N otilde ; B 17 -11 446 650 ;
+C -1 ; WX 667 ; N Ccedilla ; B 45 -216 651 706 ;
+C -1 ; WX 722 ; N Agrave ; B -19 -3 677 897 ;
+C -1 ; WX 750 ; N onehalf ; B 31 -2 721 699 ;
+C -1 ; WX 778 ; N Eth ; B 19 -3 741 692 ;
+C -1 ; WX 400 ; N degree ; B 90 389 390 689 ;
+C -1 ; WX 667 ; N Yacute ; B 52 -3 675 897 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 53 -18 748 889 ;
+C -1 ; WX 444 ; N oacute ; B 17 -11 414 707 ;
+C -1 ; WX 556 ; N mu ; B 15 -226 512 482 ;
+C -1 ; WX 606 ; N minus ; B 51 224 555 280 ;
+C -1 ; WX 444 ; N eth ; B 17 -11 478 733 ;
+C -1 ; WX 444 ; N odieresis ; B 17 -11 434 657 ;
+C -1 ; WX 747 ; N copyright ; B 11 -18 736 706 ;
+C -1 ; WX 606 ; N brokenbar ; B 275 0 331 733 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 106
+
+KPX A y -55
+KPX A w -37
+KPX A v -37
+KPX A space -37
+KPX A quoteright -55
+KPX A Y -55
+KPX A W -55
+KPX A V -74
+KPX A T -55
+
+KPX F period -111
+KPX F comma -111
+KPX F A -111
+
+KPX L y -37
+KPX L space -18
+KPX L quoteright -37
+KPX L Y -74
+KPX L W -74
+KPX L V -74
+KPX L T -74
+
+KPX P period -129
+KPX P comma -129
+KPX P A -129
+
+KPX R y -37
+KPX R Y -55
+KPX R W -55
+KPX R V -74
+KPX R T -55
+
+KPX T y -92
+KPX T w -92
+KPX T u -111
+KPX T semicolon -74
+KPX T s -111
+KPX T r -111
+KPX T period -74
+KPX T o -111
+KPX T i -55
+KPX T hyphen -55
+KPX T e -111
+KPX T comma -74
+KPX T colon -74
+KPX T c -111
+KPX T a -111
+KPX T O -18
+KPX T A -92
+
+KPX V y -74
+KPX V u -74
+KPX V semicolon -37
+KPX V r -92
+KPX V period -129
+KPX V o -74
+KPX V i -74
+KPX V hyphen -55
+KPX V e -92
+KPX V comma -129
+KPX V colon -37
+KPX V a -74
+KPX V A -210
+
+KPX W y -20
+KPX W u -20
+KPX W semicolon -18
+KPX W r -20
+KPX W period -55
+KPX W o -20
+KPX W i -20
+KPX W hyphen -18
+KPX W e -20
+KPX W comma -55
+KPX W colon -18
+KPX W a -20
+KPX W A -92
+
+KPX Y v -74
+KPX Y u -92
+KPX Y semicolon -74
+KPX Y q -92
+KPX Y period -92
+KPX Y p -74
+KPX Y o -111
+KPX Y i -55
+KPX Y hyphen -74
+KPX Y e -111
+KPX Y comma -92
+KPX Y colon -74
+KPX Y a -92
+KPX Y A -92
+
+KPX f quoteright 55
+
+KPX one one -55
+
+KPX quoteleft quoteleft -74
+
+KPX quoteright t -37
+KPX quoteright space -55
+KPX quoteright s -55
+KPX quoteright quoteright -74
+
+KPX r quoteright 37
+KPX r q -18
+KPX r period -74
+KPX r o -18
+KPX r h -18
+KPX r g -18
+KPX r e -18
+KPX r comma -74
+KPX r c -18
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -37
+KPX y comma -37
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 271 210 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 261 210 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 255 210 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 235 210 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 235 210 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 255 228 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 199 210 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 179 210 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 179 210 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 167 210 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 60 210 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 40 210 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 40 210 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 210 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 263 228 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 283 210 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 263 210 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 255 210 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 251 210 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 263 228 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 130 228 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 277 210 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 255 210 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 235 210 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 235 210 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 227 210 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 187 210 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 179 228 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 68 20 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 56 20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 56 20 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 44 20 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 36 20 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 56 12 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 48 20 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 48 20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 28 20 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 16 20 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -15 20 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -27 20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 20 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -39 20 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 112 12 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 68 20 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 56 20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 56 20 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 36 20 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 56 12 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 10 8 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 124 20 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 112 20 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 112 20 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 100 20 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 96 20 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 84 20 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 38 8 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Pa-Rm b/font/Pa-Rm
new file mode 100644
index 0000000..6566b16
--- /dev/null
+++ b/font/Pa-Rm
@@ -0,0 +1,445 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Jul  2 22:14:17 1990
+Comment UniqueID 31790
+Comment VMusage 36445 47337
+FontName Palatino-Roman
+FullName Palatino Roman
+FamilyName Palatino
+Weight Roman
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -166 -283 1021 927
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.005
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Palatino is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 692
+XHeight 469
+Ascender 726
+Descender -281
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 81 -5 197 694 ;
+C 34 ; WX 371 ; N quotedbl ; B 52 469 319 709 ;
+C 35 ; WX 500 ; N numbersign ; B 4 0 495 684 ;
+C 36 ; WX 500 ; N dollar ; B 30 -116 471 731 ;
+C 37 ; WX 840 ; N percent ; B 39 -20 802 709 ;
+C 38 ; WX 778 ; N ampersand ; B 43 -20 753 689 ;
+C 39 ; WX 278 ; N quoteright ; B 45 446 233 709 ;
+C 40 ; WX 333 ; N parenleft ; B 60 -215 301 726 ;
+C 41 ; WX 333 ; N parenright ; B 32 -215 273 726 ;
+C 42 ; WX 389 ; N asterisk ; B 32 342 359 689 ;
+C 43 ; WX 606 ; N plus ; B 51 7 555 512 ;
+C 44 ; WX 250 ; N comma ; B 16 -155 218 123 ;
+C 45 ; WX 333 ; N hyphen ; B 17 215 312 287 ;
+C 46 ; WX 250 ; N period ; B 67 -5 183 111 ;
+C 47 ; WX 606 ; N slash ; B 87 -119 519 726 ;
+C 48 ; WX 500 ; N zero ; B 29 -20 465 689 ;
+C 49 ; WX 500 ; N one ; B 60 -3 418 694 ;
+C 50 ; WX 500 ; N two ; B 16 -3 468 689 ;
+C 51 ; WX 500 ; N three ; B 15 -20 462 689 ;
+C 52 ; WX 500 ; N four ; B 2 -3 472 694 ;
+C 53 ; WX 500 ; N five ; B 13 -20 459 689 ;
+C 54 ; WX 500 ; N six ; B 32 -20 468 689 ;
+C 55 ; WX 500 ; N seven ; B 44 -3 497 689 ;
+C 56 ; WX 500 ; N eight ; B 30 -20 464 689 ;
+C 57 ; WX 500 ; N nine ; B 20 -20 457 689 ;
+C 58 ; WX 250 ; N colon ; B 66 -5 182 456 ;
+C 59 ; WX 250 ; N semicolon ; B 16 -153 218 456 ;
+C 60 ; WX 606 ; N less ; B 57 0 558 522 ;
+C 61 ; WX 606 ; N equal ; B 51 136 555 386 ;
+C 62 ; WX 606 ; N greater ; B 48 0 549 522 ;
+C 63 ; WX 444 ; N question ; B 43 -5 395 694 ;
+C 64 ; WX 747 ; N at ; B 24 -20 724 694 ;
+C 65 ; WX 778 ; N A ; B 15 -3 756 700 ;
+C 66 ; WX 611 ; N B ; B 26 -3 576 692 ;
+C 67 ; WX 709 ; N C ; B 22 -20 670 709 ;
+C 68 ; WX 774 ; N D ; B 22 -3 751 692 ;
+C 69 ; WX 611 ; N E ; B 22 -3 572 692 ;
+C 70 ; WX 556 ; N F ; B 22 -3 536 692 ;
+C 71 ; WX 763 ; N G ; B 22 -20 728 709 ;
+C 72 ; WX 832 ; N H ; B 22 -3 810 692 ;
+C 73 ; WX 337 ; N I ; B 22 -3 315 692 ;
+C 74 ; WX 333 ; N J ; B -15 -194 311 692 ;
+C 75 ; WX 726 ; N K ; B 22 -3 719 692 ;
+C 76 ; WX 611 ; N L ; B 22 -3 586 692 ;
+C 77 ; WX 946 ; N M ; B 16 -13 926 692 ;
+C 78 ; WX 831 ; N N ; B 17 -20 813 692 ;
+C 79 ; WX 786 ; N O ; B 22 -20 764 709 ;
+C 80 ; WX 604 ; N P ; B 22 -3 580 692 ;
+C 81 ; WX 786 ; N Q ; B 22 -176 764 709 ;
+C 82 ; WX 668 ; N R ; B 22 -3 669 692 ;
+C 83 ; WX 525 ; N S ; B 24 -20 503 709 ;
+C 84 ; WX 613 ; N T ; B 18 -3 595 692 ;
+C 85 ; WX 778 ; N U ; B 12 -20 759 692 ;
+C 86 ; WX 722 ; N V ; B 8 -9 706 692 ;
+C 87 ; WX 1000 ; N W ; B 8 -9 984 700 ;
+C 88 ; WX 667 ; N X ; B 14 -3 648 700 ;
+C 89 ; WX 667 ; N Y ; B 9 -3 654 704 ;
+C 90 ; WX 667 ; N Z ; B 15 -3 638 692 ;
+C 91 ; WX 333 ; N bracketleft ; B 79 -184 288 726 ;
+C 92 ; WX 606 ; N backslash ; B 81 0 512 726 ;
+C 93 ; WX 333 ; N bracketright ; B 45 -184 254 726 ;
+C 94 ; WX 606 ; N asciicircum ; B 51 283 554 689 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 278 ; N quoteleft ; B 45 446 233 709 ;
+C 97 ; WX 500 ; N a ; B 32 -12 471 469 ;
+C 98 ; WX 553 ; N b ; B -15 -12 508 726 ;
+C 99 ; WX 444 ; N c ; B 26 -20 413 469 ;
+C 100 ; WX 611 ; N d ; B 35 -12 579 726 ;
+C 101 ; WX 479 ; N e ; B 26 -20 448 469 ;
+C 102 ; WX 333 ; N f ; B 23 -3 341 728 ; L i fi ; L l fl ;
+C 103 ; WX 556 ; N g ; B 32 -283 544 469 ;
+C 104 ; WX 582 ; N h ; B 6 -3 572 726 ;
+C 105 ; WX 291 ; N i ; B 21 -3 271 687 ;
+C 106 ; WX 234 ; N j ; B -40 -283 167 688 ;
+C 107 ; WX 556 ; N k ; B 21 -12 549 726 ;
+C 108 ; WX 291 ; N l ; B 21 -3 271 726 ;
+C 109 ; WX 883 ; N m ; B 16 -3 869 469 ;
+C 110 ; WX 582 ; N n ; B 6 -3 572 469 ;
+C 111 ; WX 546 ; N o ; B 32 -20 514 469 ;
+C 112 ; WX 601 ; N p ; B 8 -281 554 469 ;
+C 113 ; WX 560 ; N q ; B 35 -281 560 469 ;
+C 114 ; WX 395 ; N r ; B 21 -3 374 469 ;
+C 115 ; WX 424 ; N s ; B 30 -20 391 469 ;
+C 116 ; WX 326 ; N t ; B 22 -12 319 621 ;
+C 117 ; WX 603 ; N u ; B 18 -12 581 469 ;
+C 118 ; WX 565 ; N v ; B 6 -7 539 459 ;
+C 119 ; WX 834 ; N w ; B 6 -7 808 469 ;
+C 120 ; WX 516 ; N x ; B 20 -3 496 469 ;
+C 121 ; WX 556 ; N y ; B 12 -283 544 459 ;
+C 122 ; WX 500 ; N z ; B 16 -3 466 462 ;
+C 123 ; WX 333 ; N braceleft ; B 58 -175 289 726 ;
+C 124 ; WX 606 ; N bar ; B 275 0 331 726 ;
+C 125 ; WX 333 ; N braceright ; B 44 -175 275 726 ;
+C 126 ; WX 606 ; N asciitilde ; B 51 176 555 347 ;
+C 161 ; WX 278 ; N exclamdown ; B 81 -225 197 469 ;
+C 162 ; WX 500 ; N cent ; B 61 -101 448 562 ;
+C 163 ; WX 500 ; N sterling ; B 12 -13 478 694 ;
+C 164 ; WX 167 ; N fraction ; B -166 0 337 689 ;
+C 165 ; WX 500 ; N yen ; B 5 -3 496 701 ;
+C 166 ; WX 500 ; N florin ; B 0 -262 473 706 ;
+C 167 ; WX 500 ; N section ; B 26 -219 465 709 ;
+C 168 ; WX 500 ; N currency ; B 30 96 470 531 ;
+C 169 ; WX 208 ; N quotesingle ; B 61 469 147 709 ;
+C 170 ; WX 500 ; N quotedblleft ; B 51 446 449 709 ;
+C 171 ; WX 500 ; N guillemotleft ; B 50 71 450 428 ;
+C 172 ; WX 331 ; N guilsinglleft ; B 66 71 265 428 ;
+C 173 ; WX 331 ; N guilsinglright ; B 66 71 265 428 ;
+C 174 ; WX 605 ; N fi ; B 23 -3 587 728 ;
+C 175 ; WX 608 ; N fl ; B 23 -3 590 728 ;
+C 177 ; WX 500 ; N endash ; B 0 219 500 277 ;
+C 178 ; WX 500 ; N dagger ; B 34 -5 466 694 ;
+C 179 ; WX 500 ; N daggerdbl ; B 34 -249 466 694 ;
+C 180 ; WX 250 ; N periodcentered ; B 67 203 183 319 ;
+C 182 ; WX 628 ; N paragraph ; B 39 -150 589 694 ;
+C 183 ; WX 606 ; N bullet ; B 131 172 475 516 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 22 -153 210 110 ;
+C 185 ; WX 500 ; N quotedblbase ; B 51 -153 449 110 ;
+C 186 ; WX 500 ; N quotedblright ; B 51 446 449 709 ;
+C 187 ; WX 500 ; N guillemotright ; B 50 71 450 428 ;
+C 188 ; WX 1000 ; N ellipsis ; B 109 -5 891 111 ;
+C 189 ; WX 1144 ; N perthousand ; B 123 -20 1021 709 ;
+C 191 ; WX 444 ; N questiondown ; B 43 -231 395 469 ;
+C 193 ; WX 333 ; N grave ; B 31 506 255 677 ;
+C 194 ; WX 333 ; N acute ; B 78 506 302 677 ;
+C 195 ; WX 333 ; N circumflex ; B 11 510 323 677 ;
+C 196 ; WX 333 ; N tilde ; B 2 535 332 640 ;
+C 197 ; WX 333 ; N macron ; B 11 538 323 591 ;
+C 198 ; WX 333 ; N breve ; B 26 506 308 664 ;
+C 199 ; WX 250 ; N dotaccent ; B 75 537 175 637 ;
+C 200 ; WX 333 ; N dieresis ; B 17 537 316 637 ;
+C 202 ; WX 333 ; N ring ; B 67 496 267 696 ;
+C 203 ; WX 333 ; N cedilla ; B 96 -225 304 -10 ;
+C 205 ; WX 380 ; N hungarumlaut ; B 3 506 377 687 ;
+C 206 ; WX 313 ; N ogonek ; B 68 -165 245 -20 ;
+C 207 ; WX 333 ; N caron ; B 11 510 323 677 ;
+C 208 ; WX 1000 ; N emdash ; B 0 219 1000 277 ;
+C 225 ; WX 944 ; N AE ; B -10 -3 908 692 ;
+C 227 ; WX 333 ; N ordfeminine ; B 24 422 310 709 ;
+C 232 ; WX 611 ; N Lslash ; B 6 -3 586 692 ;
+C 233 ; WX 833 ; N Oslash ; B 30 -20 797 709 ;
+C 234 ; WX 998 ; N OE ; B 22 -20 962 709 ;
+C 235 ; WX 333 ; N ordmasculine ; B 10 416 323 709 ;
+C 241 ; WX 758 ; N ae ; B 30 -20 732 469 ;
+C 245 ; WX 287 ; N dotlessi ; B 21 -3 271 469 ;
+C 248 ; WX 291 ; N lslash ; B -14 -3 306 726 ;
+C 249 ; WX 556 ; N oslash ; B 16 -23 530 474 ;
+C 250 ; WX 827 ; N oe ; B 32 -20 800 469 ;
+C 251 ; WX 556 ; N germandbls ; B 23 -9 519 731 ;
+C -1 ; WX 667 ; N Zcaron ; B 15 -3 638 908 ;
+C -1 ; WX 444 ; N ccedilla ; B 26 -225 413 469 ;
+C -1 ; WX 556 ; N ydieresis ; B 12 -283 544 657 ;
+C -1 ; WX 500 ; N atilde ; B 32 -12 471 652 ;
+C -1 ; WX 287 ; N icircumflex ; B -12 -3 300 697 ;
+C -1 ; WX 300 ; N threesuperior ; B 1 266 299 689 ;
+C -1 ; WX 479 ; N ecircumflex ; B 26 -20 448 697 ;
+C -1 ; WX 601 ; N thorn ; B -2 -281 544 726 ;
+C -1 ; WX 479 ; N egrave ; B 26 -20 448 697 ;
+C -1 ; WX 300 ; N twosuperior ; B 0 273 301 689 ;
+C -1 ; WX 479 ; N eacute ; B 26 -20 448 697 ;
+C -1 ; WX 546 ; N otilde ; B 32 -20 514 652 ;
+C -1 ; WX 778 ; N Aacute ; B 15 -3 756 908 ;
+C -1 ; WX 546 ; N ocircumflex ; B 32 -20 514 697 ;
+C -1 ; WX 556 ; N yacute ; B 12 -283 544 697 ;
+C -1 ; WX 603 ; N udieresis ; B 18 -12 581 657 ;
+C -1 ; WX 750 ; N threequarters ; B 15 -3 735 689 ;
+C -1 ; WX 500 ; N acircumflex ; B 32 -12 471 697 ;
+C -1 ; WX 774 ; N Eth ; B 14 -3 751 692 ;
+C -1 ; WX 479 ; N edieresis ; B 26 -20 448 657 ;
+C -1 ; WX 603 ; N ugrave ; B 18 -12 581 697 ;
+C -1 ; WX 979 ; N trademark ; B 40 285 939 689 ;
+C -1 ; WX 546 ; N ograve ; B 32 -20 514 697 ;
+C -1 ; WX 424 ; N scaron ; B 30 -20 391 685 ;
+C -1 ; WX 337 ; N Idieresis ; B 19 -3 318 868 ;
+C -1 ; WX 603 ; N uacute ; B 18 -12 581 697 ;
+C -1 ; WX 500 ; N agrave ; B 32 -12 471 697 ;
+C -1 ; WX 582 ; N ntilde ; B 6 -3 572 652 ;
+C -1 ; WX 500 ; N aring ; B 32 -12 471 716 ;
+C -1 ; WX 500 ; N zcaron ; B 16 -3 466 685 ;
+C -1 ; WX 337 ; N Icircumflex ; B 13 -3 325 908 ;
+C -1 ; WX 831 ; N Ntilde ; B 17 -20 813 871 ;
+C -1 ; WX 603 ; N ucircumflex ; B 18 -12 581 697 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 22 -3 572 908 ;
+C -1 ; WX 337 ; N Iacute ; B 22 -3 315 908 ;
+C -1 ; WX 709 ; N Ccedilla ; B 22 -225 670 709 ;
+C -1 ; WX 786 ; N Odieresis ; B 22 -20 764 868 ;
+C -1 ; WX 525 ; N Scaron ; B 24 -20 503 908 ;
+C -1 ; WX 611 ; N Edieresis ; B 22 -3 572 868 ;
+C -1 ; WX 337 ; N Igrave ; B 22 -3 315 908 ;
+C -1 ; WX 500 ; N adieresis ; B 32 -12 471 657 ;
+C -1 ; WX 786 ; N Ograve ; B 22 -20 764 908 ;
+C -1 ; WX 611 ; N Egrave ; B 22 -3 572 908 ;
+C -1 ; WX 667 ; N Ydieresis ; B 9 -3 654 868 ;
+C -1 ; WX 747 ; N registered ; B 11 -18 736 706 ;
+C -1 ; WX 786 ; N Otilde ; B 22 -20 764 883 ;
+C -1 ; WX 750 ; N onequarter ; B 30 -3 727 692 ;
+C -1 ; WX 778 ; N Ugrave ; B 12 -20 759 908 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 12 -20 759 908 ;
+C -1 ; WX 604 ; N Thorn ; B 32 -3 574 692 ;
+C -1 ; WX 606 ; N divide ; B 51 10 555 512 ;
+C -1 ; WX 778 ; N Atilde ; B 15 -3 756 871 ;
+C -1 ; WX 778 ; N Uacute ; B 12 -20 759 908 ;
+C -1 ; WX 786 ; N Ocircumflex ; B 22 -20 764 908 ;
+C -1 ; WX 606 ; N logicalnot ; B 51 120 551 386 ;
+C -1 ; WX 778 ; N Aring ; B 15 -3 756 927 ;
+C -1 ; WX 287 ; N idieresis ; B -6 -3 293 657 ;
+C -1 ; WX 287 ; N iacute ; B 21 -3 279 697 ;
+C -1 ; WX 500 ; N aacute ; B 32 -12 471 697 ;
+C -1 ; WX 606 ; N plusminus ; B 51 0 555 512 ;
+C -1 ; WX 606 ; N multiply ; B 83 36 523 474 ;
+C -1 ; WX 778 ; N Udieresis ; B 12 -20 759 868 ;
+C -1 ; WX 606 ; N minus ; B 51 233 555 289 ;
+C -1 ; WX 300 ; N onesuperior ; B 31 273 269 692 ;
+C -1 ; WX 611 ; N Eacute ; B 22 -3 572 908 ;
+C -1 ; WX 778 ; N Acircumflex ; B 15 -3 756 908 ;
+C -1 ; WX 747 ; N copyright ; B 11 -18 736 706 ;
+C -1 ; WX 778 ; N Agrave ; B 15 -3 756 908 ;
+C -1 ; WX 546 ; N odieresis ; B 32 -20 514 657 ;
+C -1 ; WX 546 ; N oacute ; B 32 -20 514 697 ;
+C -1 ; WX 400 ; N degree ; B 50 389 350 689 ;
+C -1 ; WX 287 ; N igrave ; B 8 -3 271 697 ;
+C -1 ; WX 603 ; N mu ; B 18 -236 581 469 ;
+C -1 ; WX 786 ; N Oacute ; B 22 -20 764 908 ;
+C -1 ; WX 546 ; N eth ; B 32 -20 504 728 ;
+C -1 ; WX 778 ; N Adieresis ; B 15 -3 756 868 ;
+C -1 ; WX 667 ; N Yacute ; B 9 -3 654 908 ;
+C -1 ; WX 606 ; N brokenbar ; B 275 0 331 726 ;
+C -1 ; WX 750 ; N onehalf ; B 15 -3 735 692 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 111
+
+KPX A y -74
+KPX A w -74
+KPX A v -92
+KPX A space -55
+KPX A quoteright -74
+KPX A Y -111
+KPX A W -74
+KPX A V -111
+KPX A T -74
+
+KPX F period -92
+KPX F comma -92
+KPX F A -74
+
+KPX L y -55
+KPX L space -37
+KPX L quoteright -74
+KPX L Y -92
+KPX L W -74
+KPX L V -92
+KPX L T -74
+
+KPX P space -18
+KPX P period -129
+KPX P comma -129
+KPX P A -92
+
+KPX R y -37
+KPX R Y -37
+KPX R W -37
+KPX R V -55
+KPX R T -37
+
+KPX T y -90
+KPX T w -90
+KPX T u -90
+KPX T semicolon -55
+KPX T s -90
+KPX T r -90
+KPX T period -74
+KPX T o -92
+KPX T i -55
+KPX T hyphen -55
+KPX T e -92
+KPX T comma -74
+KPX T colon -55
+KPX T c -111
+KPX T a -92
+KPX T O -18
+KPX T A -74
+
+KPX V y -92
+KPX V u -92
+KPX V semicolon -55
+KPX V r -92
+KPX V period -129
+KPX V o -111
+KPX V i -55
+KPX V hyphen -74
+KPX V e -111
+KPX V comma -129
+KPX V colon -55
+KPX V a -92
+KPX V A -111
+
+KPX W y -50
+KPX W u -50
+KPX W semicolon -18
+KPX W r -74
+KPX W period -92
+KPX W o -92
+KPX W i -55
+KPX W hyphen -55
+KPX W e -92
+KPX W comma -92
+KPX W colon -18
+KPX W a -92
+KPX W A -92
+
+KPX Y v -90
+KPX Y u -90
+KPX Y space -18
+KPX Y semicolon -74
+KPX Y q -90
+KPX Y period -111
+KPX Y p -111
+KPX Y o -92
+KPX Y i -55
+KPX Y hyphen -92
+KPX Y e -92
+KPX Y comma -111
+KPX Y colon -74
+KPX Y a -92
+KPX Y A -92
+
+KPX f quoteright 55
+KPX f f -18
+
+KPX one one -55
+
+KPX quoteleft quoteleft -37
+
+KPX quoteright quoteright -37
+
+KPX r u -8
+KPX r quoteright 74
+KPX r q -18
+KPX r period -74
+KPX r o -18
+KPX r hyphen -18
+KPX r h -18
+KPX r g -18
+KPX r e -18
+KPX r d -18
+KPX r comma -74
+KPX r c -18
+
+KPX space Y -18
+KPX space A -37
+
+KPX v period -111
+KPX v comma -111
+
+KPX w period -92
+KPX w comma -92
+
+KPX y period -111
+KPX y comma -111
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 229 231 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 223 231 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 223 231 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 215 231 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 223 231 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 223 231 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 188 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 231 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 231 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 231 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 231 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 2 231 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 2 231 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 2 231 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 2 231 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 249 231 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 227 231 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 227 231 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 227 231 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 227 231 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 227 243 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 96 231 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 255 231 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 247 231 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 223 231 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 223 231 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 203 231 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 191 231 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 179 231 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 84 20 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 72 20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 72 20 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 60 20 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 72 20 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 72 12 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 56 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 97 20 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 85 20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 73 20 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 73 20 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -23 20 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -23 20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -23 20 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -23 20 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 113 12 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 107 20 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 107 20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 107 20 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 95 20 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 107 12 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 46 8 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 159 20 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 135 20 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 135 20 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 111 20 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 144 20 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 112 20 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 84 8 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Pa-SC b/font/Pa-SC
new file mode 100644
index 0000000..5d85bd6
--- /dev/null
+++ b/font/Pa-SC
@@ -0,0 +1,511 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Apr 25 10:03:17 1991
+Comment UniqueID 34745
+Comment VMusage 38816 49708
+FontName Palatino-SC
+FullName Palatino Small Caps & Old Style Figures
+FamilyName Palatino
+Weight Roman
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -166 -262 1021 928
+UnderlinePosition -131
+UnderlineThickness 58
+Version 001.001
+Notice Copyright (c) 1985, 1987, 1989, 1990, 1991 Adobe Systems Incorporated.  All Rights Reserved.Palatino is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 692
+XHeight 493
+Ascender 486
+Descender -3
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 81 -5 197 694 ;
+C 34 ; WX 371 ; N quotedbl ; B 52 469 319 709 ;
+C 35 ; WX 500 ; N numbersign ; B 4 0 495 684 ;
+C 36 ; WX 500 ; N dollar ; B 30 -116 471 731 ;
+C 37 ; WX 840 ; N percent ; B 39 -20 802 709 ;
+C 38 ; WX 778 ; N ampersand ; B 43 -20 753 689 ;
+C 39 ; WX 278 ; N quoteright ; B 45 446 233 709 ;
+C 40 ; WX 333 ; N parenleft ; B 60 -215 301 726 ;
+C 41 ; WX 333 ; N parenright ; B 32 -215 273 726 ;
+C 42 ; WX 389 ; N asterisk ; B 32 342 359 689 ;
+C 43 ; WX 606 ; N plus ; B 51 7 555 512 ;
+C 44 ; WX 250 ; N comma ; B 16 -155 218 123 ;
+C 45 ; WX 333 ; N hyphen ; B 17 215 312 287 ;
+C 46 ; WX 250 ; N period ; B 67 -5 183 111 ;
+C 47 ; WX 606 ; N slash ; B 87 -119 519 726 ;
+C 48 ; WX 500 ; N zero ; B 22 -20 478 478 ;
+C 49 ; WX 500 ; N one ; B 72 -3 430 484 ;
+C 50 ; WX 500 ; N two ; B 23 -9 468 478 ;
+C 51 ; WX 500 ; N three ; B 14 -236 438 478 ;
+C 52 ; WX 500 ; N four ; B 4 -236 468 478 ;
+C 53 ; WX 500 ; N five ; B 14 -236 444 472 ;
+C 54 ; WX 500 ; N six ; B 32 -14 468 700 ;
+C 55 ; WX 500 ; N seven ; B 42 -236 494 470 ;
+C 56 ; WX 500 ; N eight ; B 30 -14 464 694 ;
+C 57 ; WX 500 ; N nine ; B 30 -238 466 478 ;
+C 58 ; WX 250 ; N colon ; B 66 -5 182 456 ;
+C 59 ; WX 250 ; N semicolon ; B 16 -153 218 456 ;
+C 60 ; WX 606 ; N less ; B 57 0 558 522 ;
+C 61 ; WX 606 ; N equal ; B 51 136 555 386 ;
+C 62 ; WX 606 ; N greater ; B 48 0 549 522 ;
+C 63 ; WX 444 ; N question ; B 43 -5 395 694 ;
+C 64 ; WX 747 ; N at ; B 24 -20 724 694 ;
+C 65 ; WX 778 ; N A ; B 15 -3 756 700 ;
+C 66 ; WX 611 ; N B ; B 26 -3 576 692 ;
+C 67 ; WX 709 ; N C ; B 22 -20 670 709 ;
+C 68 ; WX 774 ; N D ; B 22 -3 751 692 ;
+C 69 ; WX 611 ; N E ; B 22 -3 572 692 ;
+C 70 ; WX 556 ; N F ; B 22 -3 536 692 ;
+C 71 ; WX 763 ; N G ; B 22 -20 728 709 ;
+C 72 ; WX 832 ; N H ; B 22 -3 810 692 ;
+C 73 ; WX 337 ; N I ; B 22 -3 315 692 ;
+C 74 ; WX 333 ; N J ; B -15 -194 311 692 ;
+C 75 ; WX 726 ; N K ; B 22 -3 719 692 ;
+C 76 ; WX 611 ; N L ; B 22 -3 586 692 ;
+C 77 ; WX 946 ; N M ; B 16 -13 926 692 ;
+C 78 ; WX 831 ; N N ; B 17 -20 813 692 ;
+C 79 ; WX 786 ; N O ; B 22 -20 764 709 ;
+C 80 ; WX 604 ; N P ; B 22 -3 580 692 ;
+C 81 ; WX 786 ; N Q ; B 22 -176 764 709 ;
+C 82 ; WX 668 ; N R ; B 22 -3 669 692 ;
+C 83 ; WX 525 ; N S ; B 24 -20 503 709 ;
+C 84 ; WX 613 ; N T ; B 18 -3 595 692 ;
+C 85 ; WX 778 ; N U ; B 12 -20 759 692 ;
+C 86 ; WX 722 ; N V ; B 8 -9 706 692 ;
+C 87 ; WX 1000 ; N W ; B 8 -9 984 700 ;
+C 88 ; WX 667 ; N X ; B 14 -3 648 700 ;
+C 89 ; WX 667 ; N Y ; B 9 -3 654 704 ;
+C 90 ; WX 667 ; N Z ; B 15 -3 638 692 ;
+C 91 ; WX 333 ; N bracketleft ; B 79 -184 288 726 ;
+C 92 ; WX 606 ; N backslash ; B 81 0 512 726 ;
+C 93 ; WX 333 ; N bracketright ; B 45 -184 254 726 ;
+C 94 ; WX 606 ; N asciicircum ; B 51 283 554 689 ;
+C 95 ; WX 500 ; N underscore ; B 0 -160 500 -102 ;
+C 96 ; WX 278 ; N quoteleft ; B 45 446 233 709 ;
+C 97 ; WX 611 ; N a ; B 18 -3 592 498 ;
+C 98 ; WX 500 ; N b ; B 28 -2 466 486 ;
+C 99 ; WX 556 ; N c ; B 44 -14 528 498 ;
+C 100 ; WX 611 ; N d ; B 36 -2 566 486 ;
+C 101 ; WX 500 ; N e ; B 23 -3 458 492 ;
+C 102 ; WX 444 ; N f ; B 18 -3 420 492 ; L i fi ; L l fl ;
+C 103 ; WX 556 ; N g ; B 28 -14 528 497 ;
+C 104 ; WX 667 ; N h ; B 24 -3 650 487 ;
+C 105 ; WX 333 ; N i ; B 30 -3 300 487 ;
+C 106 ; WX 333 ; N j ; B 12 -147 300 487 ;
+C 107 ; WX 556 ; N k ; B 28 -3 552 487 ;
+C 108 ; WX 500 ; N l ; B 20 -3 468 487 ;
+C 109 ; WX 778 ; N m ; B 34 -12 738 487 ;
+C 110 ; WX 667 ; N n ; B 24 -14 644 487 ;
+C 111 ; WX 611 ; N o ; B 40 -14 570 498 ;
+C 112 ; WX 500 ; N p ; B 24 -3 468 492 ;
+C 113 ; WX 611 ; N q ; B 40 -138 570 498 ;
+C 114 ; WX 556 ; N r ; B 24 -3 552 487 ;
+C 115 ; WX 444 ; N s ; B 44 -14 400 498 ;
+C 116 ; WX 500 ; N t ; B 18 -3 474 487 ;
+C 117 ; WX 611 ; N u ; B 20 -14 590 487 ;
+C 118 ; WX 556 ; N v ; B 12 -8 542 487 ;
+C 119 ; WX 778 ; N w ; B 12 -8 762 488 ;
+C 120 ; WX 500 ; N x ; B 16 -2 484 493 ;
+C 121 ; WX 500 ; N y ; B 14 -3 480 493 ;
+C 122 ; WX 500 ; N z ; B 20 -3 477 487 ;
+C 123 ; WX 333 ; N braceleft ; B 58 -175 289 726 ;
+C 124 ; WX 606 ; N bar ; B 275 0 331 726 ;
+C 125 ; WX 333 ; N braceright ; B 44 -175 275 726 ;
+C 126 ; WX 606 ; N asciitilde ; B 51 176 555 347 ;
+C 161 ; WX 278 ; N exclamdown ; B 81 -225 197 469 ;
+C 162 ; WX 500 ; N cent ; B 61 -101 448 562 ;
+C 163 ; WX 500 ; N sterling ; B 12 -13 478 694 ;
+C 164 ; WX 167 ; N fraction ; B -166 0 337 689 ;
+C 165 ; WX 500 ; N yen ; B 5 -3 496 701 ;
+C 166 ; WX 500 ; N florin ; B 0 -262 473 706 ;
+C 167 ; WX 500 ; N section ; B 26 -219 465 709 ;
+C 168 ; WX 611 ; N currency ; B 50 -14 586 484 ;
+C 169 ; WX 208 ; N quotesingle ; B 61 469 147 709 ;
+C 170 ; WX 500 ; N quotedblleft ; B 51 446 449 709 ;
+C 171 ; WX 500 ; N guillemotleft ; B 50 71 450 428 ;
+C 172 ; WX 331 ; N guilsinglleft ; B 66 71 265 428 ;
+C 173 ; WX 331 ; N guilsinglright ; B 66 71 265 428 ;
+C 174 ; WX 777 ; N fi ; B 18 -3 744 492 ;
+C 175 ; WX 944 ; N fl ; B 18 -3 912 492 ;
+C 177 ; WX 500 ; N endash ; B 0 219 500 277 ;
+C 178 ; WX 500 ; N dagger ; B 34 -5 466 694 ;
+C 179 ; WX 500 ; N daggerdbl ; B 34 -249 466 694 ;
+C 180 ; WX 250 ; N periodcentered ; B 67 203 183 319 ;
+C 182 ; WX 628 ; N paragraph ; B 39 -150 589 694 ;
+C 183 ; WX 606 ; N bullet ; B 131 172 475 516 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 22 -153 210 110 ;
+C 185 ; WX 500 ; N quotedblbase ; B 51 -153 449 110 ;
+C 186 ; WX 500 ; N quotedblright ; B 51 446 449 709 ;
+C 187 ; WX 500 ; N guillemotright ; B 50 71 450 428 ;
+C 188 ; WX 1000 ; N ellipsis ; B 109 -5 891 111 ;
+C 189 ; WX 1144 ; N perthousand ; B 123 -20 1021 709 ;
+C 191 ; WX 444 ; N questiondown ; B 43 -231 395 469 ;
+C 193 ; WX 333 ; N grave ; B 31 531 255 702 ;
+C 194 ; WX 333 ; N acute ; B 78 531 302 702 ;
+C 195 ; WX 333 ; N circumflex ; B 11 531 323 698 ;
+C 196 ; WX 333 ; N tilde ; B 2 560 332 665 ;
+C 197 ; WX 333 ; N macron ; B 11 563 323 616 ;
+C 198 ; WX 333 ; N breve ; B 26 531 308 689 ;
+C 199 ; WX 250 ; N dotaccent ; B 75 562 175 662 ;
+C 200 ; WX 333 ; N dieresis ; B 17 562 316 662 ;
+C 202 ; WX 333 ; N ring ; B 67 521 267 721 ;
+C 203 ; WX 333 ; N cedilla ; B 96 -225 304 -10 ;
+C 205 ; WX 380 ; N hungarumlaut ; B 3 531 377 712 ;
+C 206 ; WX 313 ; N ogonek ; B 68 -165 245 -20 ;
+C 207 ; WX 333 ; N caron ; B 11 531 323 698 ;
+C 208 ; WX 1000 ; N emdash ; B 125 219 875 277 ;
+C 225 ; WX 944 ; N AE ; B -10 -3 908 692 ;
+C 227 ; WX 333 ; N ordfeminine ; B 24 422 310 709 ;
+C 232 ; WX 611 ; N Lslash ; B 6 -3 586 692 ;
+C 233 ; WX 833 ; N Oslash ; B 30 -20 797 709 ;
+C 234 ; WX 998 ; N OE ; B 22 -20 962 709 ;
+C 235 ; WX 333 ; N ordmasculine ; B 10 416 323 709 ;
+C 241 ; WX 778 ; N ae ; B 8 0 736 488 ;
+C 245 ; WX 333 ; N dotlessi ; B 30 -3 300 487 ;
+C 248 ; WX 500 ; N lslash ; B 20 -3 468 487 ;
+C 249 ; WX 611 ; N oslash ; B 32 -22 570 506 ;
+C 250 ; WX 833 ; N oe ; B 42 -14 794 498 ;
+C 251 ; WX 888 ; N germandbls ; B 44 -14 844 498 ;
+C -1 ; WX 500 ; N ecircumflex ; B 23 -3 458 718 ;
+C -1 ; WX 500 ; N edieresis ; B 23 -3 458 682 ;
+C -1 ; WX 611 ; N aacute ; B 18 -3 592 722 ;
+C -1 ; WX 747 ; N registered ; B 11 -18 736 706 ;
+C -1 ; WX 333 ; N icircumflex ; B 23 -3 335 718 ;
+C -1 ; WX 611 ; N udieresis ; B 20 -14 590 682 ;
+C -1 ; WX 611 ; N ograve ; B 40 -14 570 722 ;
+C -1 ; WX 611 ; N uacute ; B 20 -14 590 722 ;
+C -1 ; WX 611 ; N ucircumflex ; B 20 -14 590 718 ;
+C -1 ; WX 778 ; N Aacute ; B 15 -3 756 909 ;
+C -1 ; WX 333 ; N igrave ; B 30 -3 300 722 ;
+C -1 ; WX 337 ; N Icircumflex ; B 13 -3 325 905 ;
+C -1 ; WX 556 ; N ccedilla ; B 44 -225 528 498 ;
+C -1 ; WX 611 ; N adieresis ; B 18 -3 592 682 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 22 -3 572 905 ;
+C -1 ; WX 444 ; N scaron ; B 44 -14 400 706 ;
+C -1 ; WX 500 ; N thorn ; B 24 -3 468 487 ;
+C -1 ; WX 979 ; N trademark ; B 40 285 939 689 ;
+C -1 ; WX 500 ; N egrave ; B 23 -3 458 722 ;
+C -1 ; WX 300 ; N threesuperior ; B 1 266 299 689 ;
+C -1 ; WX 500 ; N zcaron ; B 20 -3 477 706 ;
+C -1 ; WX 611 ; N atilde ; B 18 -3 592 677 ;
+C -1 ; WX 611 ; N aring ; B 18 -3 592 741 ;
+C -1 ; WX 611 ; N ocircumflex ; B 40 -14 570 718 ;
+C -1 ; WX 611 ; N Edieresis ; B 22 -3 572 869 ;
+C -1 ; WX 750 ; N threequarters ; B 15 -3 735 689 ;
+C -1 ; WX 500 ; N ydieresis ; B 14 -3 480 682 ;
+C -1 ; WX 500 ; N yacute ; B 14 -3 480 722 ;
+C -1 ; WX 333 ; N iacute ; B 30 -3 314 722 ;
+C -1 ; WX 778 ; N Acircumflex ; B 15 -3 756 905 ;
+C -1 ; WX 778 ; N Uacute ; B 12 -20 759 909 ;
+C -1 ; WX 500 ; N eacute ; B 23 -3 458 722 ;
+C -1 ; WX 786 ; N Ograve ; B 22 -20 764 909 ;
+C -1 ; WX 611 ; N agrave ; B 18 -3 592 722 ;
+C -1 ; WX 778 ; N Udieresis ; B 12 -20 759 869 ;
+C -1 ; WX 611 ; N acircumflex ; B 18 -3 592 718 ;
+C -1 ; WX 337 ; N Igrave ; B 22 -3 315 909 ;
+C -1 ; WX 300 ; N twosuperior ; B 0 273 301 689 ;
+C -1 ; WX 778 ; N Ugrave ; B 12 -20 759 909 ;
+C -1 ; WX 750 ; N onequarter ; B 30 -3 727 692 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 12 -20 759 905 ;
+C -1 ; WX 525 ; N Scaron ; B 24 -20 503 905 ;
+C -1 ; WX 337 ; N Idieresis ; B 19 -3 318 869 ;
+C -1 ; WX 333 ; N idieresis ; B 29 -3 328 682 ;
+C -1 ; WX 611 ; N Egrave ; B 22 -3 572 909 ;
+C -1 ; WX 786 ; N Oacute ; B 22 -20 764 909 ;
+C -1 ; WX 606 ; N divide ; B 51 10 555 512 ;
+C -1 ; WX 778 ; N Atilde ; B 15 -3 756 872 ;
+C -1 ; WX 778 ; N Aring ; B 15 -3 756 928 ;
+C -1 ; WX 786 ; N Odieresis ; B 22 -20 764 869 ;
+C -1 ; WX 778 ; N Adieresis ; B 15 -3 756 869 ;
+C -1 ; WX 831 ; N Ntilde ; B 17 -20 813 872 ;
+C -1 ; WX 667 ; N Zcaron ; B 15 -3 638 905 ;
+C -1 ; WX 604 ; N Thorn ; B 32 -3 574 692 ;
+C -1 ; WX 337 ; N Iacute ; B 22 -3 315 909 ;
+C -1 ; WX 606 ; N plusminus ; B 51 0 555 512 ;
+C -1 ; WX 606 ; N multiply ; B 83 36 523 474 ;
+C -1 ; WX 611 ; N Eacute ; B 22 -3 572 909 ;
+C -1 ; WX 667 ; N Ydieresis ; B 9 -3 654 869 ;
+C -1 ; WX 300 ; N onesuperior ; B 31 273 269 692 ;
+C -1 ; WX 611 ; N ugrave ; B 20 -14 590 722 ;
+C -1 ; WX 606 ; N logicalnot ; B 51 120 551 386 ;
+C -1 ; WX 667 ; N ntilde ; B 24 -14 644 677 ;
+C -1 ; WX 786 ; N Otilde ; B 22 -20 764 884 ;
+C -1 ; WX 611 ; N otilde ; B 40 -14 570 677 ;
+C -1 ; WX 709 ; N Ccedilla ; B 22 -225 670 709 ;
+C -1 ; WX 778 ; N Agrave ; B 15 -3 756 909 ;
+C -1 ; WX 750 ; N onehalf ; B 15 -3 735 692 ;
+C -1 ; WX 774 ; N Eth ; B 14 -3 751 692 ;
+C -1 ; WX 400 ; N degree ; B 50 389 350 689 ;
+C -1 ; WX 667 ; N Yacute ; B 9 -3 654 909 ;
+C -1 ; WX 786 ; N Ocircumflex ; B 22 -20 764 905 ;
+C -1 ; WX 611 ; N oacute ; B 40 -14 570 722 ;
+C -1 ; WX 603 ; N mu ; B 18 -236 581 469 ;
+C -1 ; WX 606 ; N minus ; B 51 233 555 289 ;
+C -1 ; WX 611 ; N eth ; B 36 -2 566 486 ;
+C -1 ; WX 611 ; N odieresis ; B 40 -14 570 682 ;
+C -1 ; WX 747 ; N copyright ; B 11 -18 736 706 ;
+C -1 ; WX 606 ; N brokenbar ; B 275 0 331 726 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 164
+
+KPX A y -74
+KPX A w -74
+KPX A v -92
+KPX A u -55
+KPX A t -55
+KPX A quoteright -74
+KPX A q -55
+KPX A o -55
+KPX A g -37
+KPX A c -55
+KPX A Y -111
+KPX A W -74
+KPX A V -111
+KPX A U -37
+KPX A T -74
+
+KPX B a -37
+
+KPX D a -55
+
+KPX F period -92
+KPX F comma -92
+KPX F a -74
+KPX F A -74
+
+KPX L y -55
+KPX L quoteright -74
+KPX L Y -92
+KPX L W -74
+KPX L V -92
+KPX L T -74
+
+KPX O a -55
+
+KPX P period -129
+KPX P o -37
+KPX P comma -129
+KPX P a -92
+KPX P A -92
+
+KPX R y -37
+KPX R Y -37
+KPX R W -37
+KPX R V -55
+KPX R T -37
+
+KPX T y -74
+KPX T w -74
+KPX T u -74
+KPX T semicolon -55
+KPX T r -74
+KPX T period -74
+KPX T o -92
+KPX T i -55
+KPX T hyphen -55
+KPX T h -55
+KPX T e -55
+KPX T comma -74
+KPX T colon -55
+KPX T a -92
+KPX T O -18
+KPX T A -74
+
+KPX U a -55
+KPX U A -55
+
+KPX V u -74
+KPX V semicolon -55
+KPX V period -129
+KPX V o -111
+KPX V i -55
+KPX V hyphen -74
+KPX V g -55
+KPX V e -111
+KPX V comma -129
+KPX V colon -55
+KPX V a -129
+KPX V A -129
+
+KPX W y -50
+KPX W u -50
+KPX W semicolon -18
+KPX W period -92
+KPX W o -92
+KPX W i -55
+KPX W hyphen -55
+KPX W h -55
+KPX W e -92
+KPX W comma -92
+KPX W colon -18
+KPX W a -111
+KPX W A -111
+
+KPX Y u -90
+KPX Y semicolon -74
+KPX Y s -37
+KPX Y period -111
+KPX Y o -92
+KPX Y i -55
+KPX Y hyphen -92
+KPX Y e -92
+KPX Y comma -111
+KPX Y colon -74
+KPX Y c -111
+KPX Y a -92
+KPX Y A -92
+
+KPX a y -55
+KPX a w -55
+KPX a v -74
+KPX a u -55
+KPX a t -37
+KPX a quoteright -37
+KPX a quotedblright -18
+KPX a o -18
+KPX a g -18
+KPX a c -18
+
+KPX d y -18
+KPX d w -18
+KPX d u -18
+KPX d period -37
+KPX d comma -37
+KPX d a -18
+
+KPX f period -55
+KPX f comma -55
+KPX f a -37
+
+KPX j period -37
+KPX j comma -37
+KPX j a -37
+
+KPX l y -55
+KPX l w -55
+KPX l v -55
+KPX l t -37
+KPX l quoteright -55
+
+KPX n period -18
+KPX n comma -18
+KPX n a -37
+
+KPX o y -18
+KPX o x -18
+KPX o v -37
+KPX o period -18
+KPX o comma -18
+KPX o a -55
+
+KPX p period -74
+KPX p comma -74
+KPX p a -55
+
+KPX quotedblleft a -18
+
+KPX quoteleft quoteleft -37
+KPX quoteleft a -37
+
+KPX quoteright quoteright -37
+
+KPX r v -18
+KPX r u -8
+KPX r q -18
+KPX r o -18
+KPX r hyphen -18
+KPX r c -18
+
+KPX s a -18
+
+KPX space Y -18
+KPX space A -37
+
+KPX t period -55
+KPX t comma -55
+KPX t a -37
+
+KPX u period -37
+KPX u comma -37
+KPX u a -55
+
+KPX v period -111
+KPX v comma -111
+KPX v a -92
+
+KPX w period -92
+KPX w comma -92
+KPX w a -74
+
+KPX x c -18
+
+KPX y period -111
+KPX y o -18
+KPX y comma -111
+KPX y c -18
+KPX y a -55
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 229 207 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 223 207 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 223 207 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 215 207 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 223 207 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 223 207 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 207 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 207 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 207 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 207 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 2 207 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 2 207 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 2 207 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 2 207 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 249 207 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 227 207 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 227 207 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 227 207 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 227 207 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 227 219 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 96 207 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 255 207 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 247 207 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 223 207 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 223 207 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 203 207 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 191 207 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 179 207 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 139 20 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 127 20 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 127 20 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 115 20 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 127 20 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 127 12 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 108 20 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 96 20 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 84 20 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 84 20 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 12 20 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 12 20 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 12 20 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 12 20 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 155 12 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 139 20 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 139 20 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 139 20 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 127 20 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 139 12 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 56 8 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 163 20 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 20 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 20 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 115 20 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 116 20 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 84 20 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 84 8 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Symbol b/font/Symbol
new file mode 100644
index 0000000..1cdbdae
--- /dev/null
+++ b/font/Symbol
@@ -0,0 +1,209 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All rights reserved.
+Comment Creation Date: Wed Jan 17 21:48:26 1990
+Comment UniqueID 27004
+Comment VMusage 28489 37622
+FontName Symbol
+FullName Symbol
+FamilyName Symbol
+Weight Medium
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -180 -293 1090 1010
+UnderlinePosition -98
+UnderlineThickness 54
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All rights reserved.
+EncodingScheme FontSpecific
+StartCharMetrics 189
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 128 -17 240 672 ;
+C 34 ; WX 713 ; N universal ; B 31 0 681 705 ;
+C 35 ; WX 500 ; N numbersign ; B 20 -16 481 673 ;
+C 36 ; WX 549 ; N existential ; B 25 0 478 707 ;
+C 37 ; WX 833 ; N percent ; B 63 -36 771 655 ;
+C 38 ; WX 778 ; N ampersand ; B 41 -18 750 661 ;
+C 39 ; WX 439 ; N suchthat ; B 48 -17 414 500 ;
+C 40 ; WX 333 ; N parenleft ; B 53 -191 300 673 ;
+C 41 ; WX 333 ; N parenright ; B 30 -191 277 673 ;
+C 42 ; WX 500 ; N asteriskmath ; B 65 134 427 551 ;
+C 43 ; WX 549 ; N plus ; B 10 0 539 533 ;
+C 44 ; WX 250 ; N comma ; B 56 -152 194 104 ;
+C 45 ; WX 549 ; N minus ; B 11 233 535 288 ;
+C 46 ; WX 250 ; N period ; B 69 -17 181 95 ;
+C 47 ; WX 278 ; N slash ; B 0 -18 254 646 ;
+C 48 ; WX 500 ; N zero ; B 23 -17 471 685 ;
+C 49 ; WX 500 ; N one ; B 117 0 390 673 ;
+C 50 ; WX 500 ; N two ; B 25 0 475 686 ;
+C 51 ; WX 500 ; N three ; B 39 -17 435 685 ;
+C 52 ; WX 500 ; N four ; B 16 0 469 685 ;
+C 53 ; WX 500 ; N five ; B 29 -17 443 685 ;
+C 54 ; WX 500 ; N six ; B 36 -17 467 685 ;
+C 55 ; WX 500 ; N seven ; B 24 -16 448 673 ;
+C 56 ; WX 500 ; N eight ; B 54 -18 440 685 ;
+C 57 ; WX 500 ; N nine ; B 31 -18 460 685 ;
+C 58 ; WX 278 ; N colon ; B 81 -17 193 460 ;
+C 59 ; WX 278 ; N semicolon ; B 83 -152 221 460 ;
+C 60 ; WX 549 ; N less ; B 26 0 523 522 ;
+C 61 ; WX 549 ; N equal ; B 11 141 537 390 ;
+C 62 ; WX 549 ; N greater ; B 26 0 523 522 ;
+C 63 ; WX 444 ; N question ; B 70 -17 412 686 ;
+C 64 ; WX 549 ; N congruent ; B 11 0 537 475 ;
+C 65 ; WX 722 ; N Alpha ; B 4 0 684 673 ;
+C 66 ; WX 667 ; N Beta ; B 29 0 592 673 ;
+C 67 ; WX 722 ; N Chi ; B -9 0 704 673 ;
+C 68 ; WX 612 ; N Delta ; B 6 0 608 688 ;
+C 69 ; WX 611 ; N Epsilon ; B 32 0 617 673 ;
+C 70 ; WX 763 ; N Phi ; B 26 0 741 673 ;
+C 71 ; WX 603 ; N Gamma ; B 24 0 609 673 ;
+C 72 ; WX 722 ; N Eta ; B 39 0 729 673 ;
+C 73 ; WX 333 ; N Iota ; B 32 0 316 673 ;
+C 74 ; WX 631 ; N theta1 ; B 18 -18 623 689 ;
+C 75 ; WX 722 ; N Kappa ; B 35 0 722 673 ;
+C 76 ; WX 686 ; N Lambda ; B 6 0 680 688 ;
+C 77 ; WX 889 ; N Mu ; B 28 0 887 673 ;
+C 78 ; WX 722 ; N Nu ; B 29 -8 720 673 ;
+C 79 ; WX 722 ; N Omicron ; B 41 -17 715 685 ;
+C 80 ; WX 768 ; N Pi ; B 25 0 745 673 ;
+C 81 ; WX 741 ; N Theta ; B 41 -17 715 685 ;
+C 82 ; WX 556 ; N Rho ; B 28 0 563 673 ;
+C 83 ; WX 592 ; N Sigma ; B 5 0 589 673 ;
+C 84 ; WX 611 ; N Tau ; B 33 0 607 673 ;
+C 85 ; WX 690 ; N Upsilon ; B -8 0 694 673 ;
+C 86 ; WX 439 ; N sigma1 ; B 40 -233 436 500 ;
+C 87 ; WX 768 ; N Omega ; B 34 0 736 688 ;
+C 88 ; WX 645 ; N Xi ; B 40 0 599 673 ;
+C 89 ; WX 795 ; N Psi ; B 15 0 781 684 ;
+C 90 ; WX 611 ; N Zeta ; B 44 0 636 673 ;
+C 91 ; WX 333 ; N bracketleft ; B 86 -155 299 674 ;
+C 92 ; WX 863 ; N therefore ; B 163 0 701 478 ;
+C 93 ; WX 333 ; N bracketright ; B 33 -155 246 674 ;
+C 94 ; WX 658 ; N perpendicular ; B 15 0 652 674 ;
+C 95 ; WX 500 ; N underscore ; B -2 -252 502 -206 ;
+C 96 ; WX 500 ; N radicalex ; B 480 881 1090 917 ;
+C 97 ; WX 631 ; N alpha ; B 41 -18 622 500 ;
+C 98 ; WX 549 ; N beta ; B 61 -223 515 741 ;
+C 99 ; WX 549 ; N chi ; B 12 -231 522 499 ;
+C 100 ; WX 494 ; N delta ; B 40 -19 481 740 ;
+C 101 ; WX 439 ; N epsilon ; B 22 -19 427 502 ;
+C 102 ; WX 521 ; N phi ; B 27 -224 490 671 ;
+C 103 ; WX 411 ; N gamma ; B 5 -225 484 499 ;
+C 104 ; WX 603 ; N eta ; B 0 -202 527 514 ;
+C 105 ; WX 329 ; N iota ; B 0 -17 301 503 ;
+C 106 ; WX 603 ; N phi1 ; B 36 -224 587 499 ;
+C 107 ; WX 549 ; N kappa ; B 33 0 558 501 ;
+C 108 ; WX 549 ; N lambda ; B 24 -17 548 739 ;
+C 109 ; WX 576 ; N mu ; B 33 -223 567 500 ;
+C 110 ; WX 521 ; N nu ; B -9 -16 475 507 ;
+C 111 ; WX 549 ; N omicron ; B 35 -19 501 499 ;
+C 112 ; WX 549 ; N pi ; B 10 -19 530 487 ;
+C 113 ; WX 521 ; N theta ; B 43 -17 485 690 ;
+C 114 ; WX 549 ; N rho ; B 50 -230 490 499 ;
+C 115 ; WX 603 ; N sigma ; B 30 -21 588 500 ;
+C 116 ; WX 439 ; N tau ; B 10 -19 418 500 ;
+C 117 ; WX 576 ; N upsilon ; B 7 -18 535 507 ;
+C 118 ; WX 713 ; N omega1 ; B 12 -18 671 583 ;
+C 119 ; WX 686 ; N omega ; B 42 -17 684 500 ;
+C 120 ; WX 493 ; N xi ; B 27 -224 469 766 ;
+C 121 ; WX 686 ; N psi ; B 12 -228 701 500 ;
+C 122 ; WX 494 ; N zeta ; B 60 -225 467 756 ;
+C 123 ; WX 480 ; N braceleft ; B 58 -183 397 673 ;
+C 124 ; WX 200 ; N bar ; B 65 -177 135 673 ;
+C 125 ; WX 480 ; N braceright ; B 79 -183 418 673 ;
+C 126 ; WX 549 ; N similar ; B 17 203 529 307 ;
+C 161 ; WX 620 ; N Upsilon1 ; B -2 0 610 685 ;
+C 162 ; WX 247 ; N minute ; B 27 459 228 735 ;
+C 163 ; WX 549 ; N lessequal ; B 29 0 526 639 ;
+C 164 ; WX 167 ; N fraction ; B -180 -12 340 677 ;
+C 165 ; WX 713 ; N infinity ; B 26 124 688 404 ;
+C 166 ; WX 500 ; N florin ; B 2 -193 494 686 ;
+C 167 ; WX 753 ; N club ; B 86 -26 660 533 ;
+C 168 ; WX 753 ; N diamond ; B 142 -36 600 550 ;
+C 169 ; WX 753 ; N heart ; B 117 -33 631 532 ;
+C 170 ; WX 753 ; N spade ; B 113 -36 629 548 ;
+C 171 ; WX 1042 ; N arrowboth ; B 24 -15 1024 511 ;
+C 172 ; WX 987 ; N arrowleft ; B 32 -15 942 511 ;
+C 173 ; WX 603 ; N arrowup ; B 45 0 571 910 ;
+C 174 ; WX 987 ; N arrowright ; B 49 -15 959 511 ;
+C 175 ; WX 603 ; N arrowdown ; B 45 -22 571 888 ;
+C 176 ; WX 400 ; N degree ; B 50 385 350 685 ;
+C 177 ; WX 549 ; N plusminus ; B 10 0 539 645 ;
+C 178 ; WX 411 ; N second ; B 20 459 413 737 ;
+C 179 ; WX 549 ; N greaterequal ; B 29 0 526 639 ;
+C 180 ; WX 549 ; N multiply ; B 17 8 533 524 ;
+C 181 ; WX 713 ; N proportional ; B 27 123 639 404 ;
+C 182 ; WX 494 ; N partialdiff ; B 26 -20 462 746 ;
+C 183 ; WX 460 ; N bullet ; B 50 113 410 473 ;
+C 184 ; WX 549 ; N divide ; B 10 71 536 456 ;
+C 185 ; WX 549 ; N notequal ; B 15 -25 540 549 ;
+C 186 ; WX 549 ; N equivalence ; B 14 82 538 443 ;
+C 187 ; WX 549 ; N approxequal ; B 14 135 527 394 ;
+C 188 ; WX 1000 ; N ellipsis ; B 111 -17 889 95 ;
+C 189 ; WX 603 ; N arrowvertex ; B 280 -120 336 1010 ;
+C 190 ; WX 1000 ; N arrowhorizex ; B -60 220 1050 276 ;
+C 191 ; WX 658 ; N carriagereturn ; B 15 -16 602 629 ;
+C 192 ; WX 823 ; N aleph ; B 175 -18 661 658 ;
+C 193 ; WX 686 ; N Ifraktur ; B 10 -53 578 740 ;
+C 194 ; WX 795 ; N Rfraktur ; B 26 -15 759 734 ;
+C 195 ; WX 987 ; N weierstrass ; B 159 -211 870 573 ;
+C 196 ; WX 768 ; N circlemultiply ; B 43 -17 733 673 ;
+C 197 ; WX 768 ; N circleplus ; B 43 -15 733 675 ;
+C 198 ; WX 823 ; N emptyset ; B 39 -24 781 719 ;
+C 199 ; WX 768 ; N intersection ; B 40 0 732 509 ;
+C 200 ; WX 768 ; N union ; B 40 -17 732 492 ;
+C 201 ; WX 713 ; N propersuperset ; B 20 0 673 470 ;
+C 202 ; WX 713 ; N reflexsuperset ; B 20 -125 673 470 ;
+C 203 ; WX 713 ; N notsubset ; B 36 -70 690 540 ;
+C 204 ; WX 713 ; N propersubset ; B 37 0 690 470 ;
+C 205 ; WX 713 ; N reflexsubset ; B 37 -125 690 470 ;
+C 206 ; WX 713 ; N element ; B 45 0 505 468 ;
+C 207 ; WX 713 ; N notelement ; B 45 -58 505 555 ;
+C 208 ; WX 768 ; N angle ; B 26 0 738 673 ;
+C 209 ; WX 713 ; N gradient ; B 36 -19 681 718 ;
+C 210 ; WX 790 ; N registerserif ; B 50 -17 740 673 ;
+C 211 ; WX 790 ; N copyrightserif ; B 51 -15 741 675 ;
+C 212 ; WX 890 ; N trademarkserif ; B 18 293 855 673 ;
+C 213 ; WX 823 ; N product ; B 25 -101 803 751 ;
+C 214 ; WX 549 ; N radical ; B 10 -38 515 917 ;
+C 215 ; WX 250 ; N dotmath ; B 69 210 169 310 ;
+C 216 ; WX 713 ; N logicalnot ; B 15 0 680 288 ;
+C 217 ; WX 603 ; N logicaland ; B 23 0 583 454 ;
+C 218 ; WX 603 ; N logicalor ; B 30 0 578 477 ;
+C 219 ; WX 1042 ; N arrowdblboth ; B 27 -20 1023 510 ;
+C 220 ; WX 987 ; N arrowdblleft ; B 30 -15 939 513 ;
+C 221 ; WX 603 ; N arrowdblup ; B 39 2 567 911 ;
+C 222 ; WX 987 ; N arrowdblright ; B 45 -20 954 508 ;
+C 223 ; WX 603 ; N arrowdbldown ; B 44 -19 572 890 ;
+C 224 ; WX 494 ; N lozenge ; B 18 0 466 745 ;
+C 225 ; WX 329 ; N angleleft ; B 25 -198 306 746 ;
+C 226 ; WX 790 ; N registersans ; B 50 -20 740 670 ;
+C 227 ; WX 790 ; N copyrightsans ; B 49 -15 739 675 ;
+C 228 ; WX 786 ; N trademarksans ; B 5 293 725 673 ;
+C 229 ; WX 713 ; N summation ; B 14 -108 695 752 ;
+C 230 ; WX 384 ; N parenlefttp ; B 40 -293 436 926 ;
+C 231 ; WX 384 ; N parenleftex ; B 40 -85 92 925 ;
+C 232 ; WX 384 ; N parenleftbt ; B 40 -293 436 926 ;
+C 233 ; WX 384 ; N bracketlefttp ; B 0 -80 341 926 ;
+C 234 ; WX 384 ; N bracketleftex ; B 0 -79 55 925 ;
+C 235 ; WX 384 ; N bracketleftbt ; B 0 -80 340 926 ;
+C 236 ; WX 494 ; N bracelefttp ; B 201 -75 439 926 ;
+C 237 ; WX 494 ; N braceleftmid ; B 14 -85 255 935 ;
+C 238 ; WX 494 ; N braceleftbt ; B 201 -70 439 926 ;
+C 239 ; WX 494 ; N braceex ; B 201 -80 255 935 ;
+C 241 ; WX 329 ; N angleright ; B 21 -198 302 746 ;
+C 242 ; WX 274 ; N integral ; B 2 -107 291 916 ;
+C 243 ; WX 686 ; N integraltp ; B 332 -83 715 921 ;
+C 244 ; WX 686 ; N integralex ; B 332 -88 415 975 ;
+C 245 ; WX 686 ; N integralbt ; B 39 -81 415 921 ;
+C 246 ; WX 384 ; N parenrighttp ; B 54 -293 450 926 ;
+C 247 ; WX 384 ; N parenrightex ; B 398 -85 450 925 ;
+C 248 ; WX 384 ; N parenrightbt ; B 54 -293 450 926 ;
+C 249 ; WX 384 ; N bracketrighttp ; B 22 -80 360 926 ;
+C 250 ; WX 384 ; N bracketrightex ; B 305 -79 360 925 ;
+C 251 ; WX 384 ; N bracketrightbt ; B 20 -80 360 926 ;
+C 252 ; WX 494 ; N bracerighttp ; B 17 -75 255 926 ;
+C 253 ; WX 494 ; N bracerightmid ; B 201 -85 442 935 ;
+C 254 ; WX 494 ; N bracerightbt ; B 17 -70 255 926 ;
+C -1 ; WX 790 ; N apple ; B 56 -3 733 808 ;
+EndCharMetrics
+EndFontMetrics
diff --git a/font/Ti-Bd b/font/Ti-Bd
new file mode 100644
index 0000000..55207f9
--- /dev/null
+++ b/font/Ti-Bd
@@ -0,0 +1,648 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Mar 20 12:17:14 1990
+Comment UniqueID 28417
+Comment VMusage 30458 37350
+FontName Times-Bold
+FullName Times Bold
+FamilyName Times
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -168 -218 1000 935
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Times is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 676
+XHeight 461
+Ascender 676
+Descender -205
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 81 -13 251 691 ;
+C 34 ; WX 555 ; N quotedbl ; B 83 404 472 691 ;
+C 35 ; WX 500 ; N numbersign ; B 4 0 496 700 ;
+C 36 ; WX 500 ; N dollar ; B 29 -99 472 750 ;
+C 37 ; WX 1000 ; N percent ; B 124 -14 877 692 ;
+C 38 ; WX 833 ; N ampersand ; B 62 -16 787 691 ;
+C 39 ; WX 333 ; N quoteright ; B 79 356 263 691 ;
+C 40 ; WX 333 ; N parenleft ; B 46 -168 306 694 ;
+C 41 ; WX 333 ; N parenright ; B 27 -168 287 694 ;
+C 42 ; WX 500 ; N asterisk ; B 56 255 447 691 ;
+C 43 ; WX 570 ; N plus ; B 33 0 537 506 ;
+C 44 ; WX 250 ; N comma ; B 39 -180 223 155 ;
+C 45 ; WX 333 ; N hyphen ; B 44 171 287 287 ;
+C 46 ; WX 250 ; N period ; B 41 -13 210 156 ;
+C 47 ; WX 278 ; N slash ; B -24 -19 302 691 ;
+C 48 ; WX 500 ; N zero ; B 24 -13 476 688 ;
+C 49 ; WX 500 ; N one ; B 65 0 442 688 ;
+C 50 ; WX 500 ; N two ; B 17 0 478 688 ;
+C 51 ; WX 500 ; N three ; B 16 -14 468 688 ;
+C 52 ; WX 500 ; N four ; B 19 0 475 688 ;
+C 53 ; WX 500 ; N five ; B 22 -8 470 676 ;
+C 54 ; WX 500 ; N six ; B 28 -13 475 688 ;
+C 55 ; WX 500 ; N seven ; B 17 0 477 676 ;
+C 56 ; WX 500 ; N eight ; B 28 -13 472 688 ;
+C 57 ; WX 500 ; N nine ; B 26 -13 473 688 ;
+C 58 ; WX 333 ; N colon ; B 82 -13 251 472 ;
+C 59 ; WX 333 ; N semicolon ; B 82 -180 266 472 ;
+C 60 ; WX 570 ; N less ; B 31 -8 539 514 ;
+C 61 ; WX 570 ; N equal ; B 33 107 537 399 ;
+C 62 ; WX 570 ; N greater ; B 31 -8 539 514 ;
+C 63 ; WX 500 ; N question ; B 57 -13 445 689 ;
+C 64 ; WX 930 ; N at ; B 108 -19 822 691 ;
+C 65 ; WX 722 ; N A ; B 9 0 689 690 ;
+C 66 ; WX 667 ; N B ; B 16 0 619 676 ;
+C 67 ; WX 722 ; N C ; B 49 -19 687 691 ;
+C 68 ; WX 722 ; N D ; B 14 0 690 676 ;
+C 69 ; WX 667 ; N E ; B 16 0 641 676 ;
+C 70 ; WX 611 ; N F ; B 16 0 583 676 ;
+C 71 ; WX 778 ; N G ; B 37 -19 755 691 ;
+C 72 ; WX 778 ; N H ; B 21 0 759 676 ;
+C 73 ; WX 389 ; N I ; B 20 0 370 676 ;
+C 74 ; WX 500 ; N J ; B 3 -96 479 676 ;
+C 75 ; WX 778 ; N K ; B 30 0 769 676 ;
+C 76 ; WX 667 ; N L ; B 19 0 638 676 ;
+C 77 ; WX 944 ; N M ; B 14 0 921 676 ;
+C 78 ; WX 722 ; N N ; B 16 -18 701 676 ;
+C 79 ; WX 778 ; N O ; B 35 -19 743 691 ;
+C 80 ; WX 611 ; N P ; B 16 0 600 676 ;
+C 81 ; WX 778 ; N Q ; B 35 -176 743 691 ;
+C 82 ; WX 722 ; N R ; B 26 0 715 676 ;
+C 83 ; WX 556 ; N S ; B 35 -19 513 692 ;
+C 84 ; WX 667 ; N T ; B 31 0 636 676 ;
+C 85 ; WX 722 ; N U ; B 16 -19 701 676 ;
+C 86 ; WX 722 ; N V ; B 16 -18 701 676 ;
+C 87 ; WX 1000 ; N W ; B 19 -15 981 676 ;
+C 88 ; WX 722 ; N X ; B 16 0 699 676 ;
+C 89 ; WX 722 ; N Y ; B 15 0 699 676 ;
+C 90 ; WX 667 ; N Z ; B 28 0 634 676 ;
+C 91 ; WX 333 ; N bracketleft ; B 67 -149 301 678 ;
+C 92 ; WX 278 ; N backslash ; B -25 -19 303 691 ;
+C 93 ; WX 333 ; N bracketright ; B 32 -149 266 678 ;
+C 94 ; WX 581 ; N asciicircum ; B 73 311 509 676 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 333 ; N quoteleft ; B 70 356 254 691 ;
+C 97 ; WX 500 ; N a ; B 25 -14 488 473 ;
+C 98 ; WX 556 ; N b ; B 17 -14 521 676 ;
+C 99 ; WX 444 ; N c ; B 25 -14 430 473 ;
+C 100 ; WX 556 ; N d ; B 25 -14 534 676 ;
+C 101 ; WX 444 ; N e ; B 25 -14 426 473 ;
+C 102 ; WX 333 ; N f ; B 14 0 389 691 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 28 -206 483 473 ;
+C 104 ; WX 556 ; N h ; B 16 0 534 676 ;
+C 105 ; WX 278 ; N i ; B 16 0 255 691 ;
+C 106 ; WX 333 ; N j ; B -57 -203 263 691 ;
+C 107 ; WX 556 ; N k ; B 22 0 543 676 ;
+C 108 ; WX 278 ; N l ; B 16 0 255 676 ;
+C 109 ; WX 833 ; N m ; B 16 0 814 473 ;
+C 110 ; WX 556 ; N n ; B 21 0 539 473 ;
+C 111 ; WX 500 ; N o ; B 25 -14 476 473 ;
+C 112 ; WX 556 ; N p ; B 19 -205 524 473 ;
+C 113 ; WX 556 ; N q ; B 34 -205 536 473 ;
+C 114 ; WX 444 ; N r ; B 29 0 434 473 ;
+C 115 ; WX 389 ; N s ; B 25 -14 361 473 ;
+C 116 ; WX 333 ; N t ; B 20 -12 332 630 ;
+C 117 ; WX 556 ; N u ; B 16 -14 537 461 ;
+C 118 ; WX 500 ; N v ; B 21 -14 485 461 ;
+C 119 ; WX 722 ; N w ; B 23 -14 707 461 ;
+C 120 ; WX 500 ; N x ; B 12 0 484 461 ;
+C 121 ; WX 500 ; N y ; B 16 -205 480 461 ;
+C 122 ; WX 444 ; N z ; B 21 0 420 461 ;
+C 123 ; WX 394 ; N braceleft ; B 22 -175 340 698 ;
+C 124 ; WX 220 ; N bar ; B 66 -19 154 691 ;
+C 125 ; WX 394 ; N braceright ; B 54 -175 372 698 ;
+C 126 ; WX 520 ; N asciitilde ; B 29 173 491 333 ;
+C 161 ; WX 333 ; N exclamdown ; B 82 -203 252 501 ;
+C 162 ; WX 500 ; N cent ; B 53 -140 458 588 ;
+C 163 ; WX 500 ; N sterling ; B 21 -14 477 684 ;
+C 164 ; WX 167 ; N fraction ; B -168 -12 329 688 ;
+C 165 ; WX 500 ; N yen ; B -64 0 547 676 ;
+C 166 ; WX 500 ; N florin ; B 0 -155 498 706 ;
+C 167 ; WX 500 ; N section ; B 57 -132 443 691 ;
+C 168 ; WX 500 ; N currency ; B -26 61 526 613 ;
+C 169 ; WX 278 ; N quotesingle ; B 75 404 204 691 ;
+C 170 ; WX 500 ; N quotedblleft ; B 32 356 486 691 ;
+C 171 ; WX 500 ; N guillemotleft ; B 23 36 473 415 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 51 36 305 415 ;
+C 173 ; WX 333 ; N guilsinglright ; B 28 36 282 415 ;
+C 174 ; WX 556 ; N fi ; B 14 0 536 691 ;
+C 175 ; WX 556 ; N fl ; B 14 0 536 691 ;
+C 177 ; WX 500 ; N endash ; B 0 181 500 271 ;
+C 178 ; WX 500 ; N dagger ; B 47 -134 453 691 ;
+C 179 ; WX 500 ; N daggerdbl ; B 45 -132 456 691 ;
+C 180 ; WX 250 ; N periodcentered ; B 41 248 210 417 ;
+C 182 ; WX 540 ; N paragraph ; B 0 -186 519 676 ;
+C 183 ; WX 350 ; N bullet ; B 35 198 315 478 ;
+C 184 ; WX 333 ; N quotesinglbase ; B 79 -180 263 155 ;
+C 185 ; WX 500 ; N quotedblbase ; B 14 -180 468 155 ;
+C 186 ; WX 500 ; N quotedblright ; B 14 356 468 691 ;
+C 187 ; WX 500 ; N guillemotright ; B 27 36 477 415 ;
+C 188 ; WX 1000 ; N ellipsis ; B 82 -13 917 156 ;
+C 189 ; WX 1000 ; N perthousand ; B 7 -29 995 706 ;
+C 191 ; WX 500 ; N questiondown ; B 55 -201 443 501 ;
+C 193 ; WX 333 ; N grave ; B 8 528 246 713 ;
+C 194 ; WX 333 ; N acute ; B 86 528 324 713 ;
+C 195 ; WX 333 ; N circumflex ; B -2 528 335 704 ;
+C 196 ; WX 333 ; N tilde ; B -16 547 349 674 ;
+C 197 ; WX 333 ; N macron ; B 1 565 331 637 ;
+C 198 ; WX 333 ; N breve ; B 15 528 318 691 ;
+C 199 ; WX 333 ; N dotaccent ; B 103 537 230 667 ;
+C 200 ; WX 333 ; N dieresis ; B -2 537 335 667 ;
+C 202 ; WX 333 ; N ring ; B 60 527 273 740 ;
+C 203 ; WX 333 ; N cedilla ; B 68 -218 294 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -13 528 425 713 ;
+C 206 ; WX 333 ; N ogonek ; B 90 -173 319 44 ;
+C 207 ; WX 333 ; N caron ; B -2 528 335 704 ;
+C 208 ; WX 1000 ; N emdash ; B 0 181 1000 271 ;
+C 225 ; WX 1000 ; N AE ; B 4 0 951 676 ;
+C 227 ; WX 300 ; N ordfeminine ; B -1 397 301 688 ;
+C 232 ; WX 667 ; N Lslash ; B 19 0 638 676 ;
+C 233 ; WX 778 ; N Oslash ; B 35 -74 743 737 ;
+C 234 ; WX 1000 ; N OE ; B 22 -5 981 684 ;
+C 235 ; WX 330 ; N ordmasculine ; B 18 397 312 688 ;
+C 241 ; WX 722 ; N ae ; B 33 -14 693 473 ;
+C 245 ; WX 278 ; N dotlessi ; B 16 0 255 461 ;
+C 248 ; WX 278 ; N lslash ; B -22 0 303 676 ;
+C 249 ; WX 500 ; N oslash ; B 25 -92 476 549 ;
+C 250 ; WX 722 ; N oe ; B 22 -14 696 473 ;
+C 251 ; WX 556 ; N germandbls ; B 19 -12 517 691 ;
+C -1 ; WX 667 ; N Zcaron ; B 28 0 634 914 ;
+C -1 ; WX 444 ; N ccedilla ; B 25 -218 430 473 ;
+C -1 ; WX 500 ; N ydieresis ; B 16 -205 480 667 ;
+C -1 ; WX 500 ; N atilde ; B 25 -14 488 674 ;
+C -1 ; WX 278 ; N icircumflex ; B -36 0 301 704 ;
+C -1 ; WX 300 ; N threesuperior ; B 3 268 297 688 ;
+C -1 ; WX 444 ; N ecircumflex ; B 25 -14 426 704 ;
+C -1 ; WX 556 ; N thorn ; B 19 -205 524 676 ;
+C -1 ; WX 444 ; N egrave ; B 25 -14 426 713 ;
+C -1 ; WX 300 ; N twosuperior ; B 0 275 300 688 ;
+C -1 ; WX 444 ; N eacute ; B 25 -14 426 713 ;
+C -1 ; WX 500 ; N otilde ; B 25 -14 476 674 ;
+C -1 ; WX 722 ; N Aacute ; B 9 0 689 923 ;
+C -1 ; WX 500 ; N ocircumflex ; B 25 -14 476 704 ;
+C -1 ; WX 500 ; N yacute ; B 16 -205 480 713 ;
+C -1 ; WX 556 ; N udieresis ; B 16 -14 537 667 ;
+C -1 ; WX 750 ; N threequarters ; B 23 -12 733 688 ;
+C -1 ; WX 500 ; N acircumflex ; B 25 -14 488 704 ;
+C -1 ; WX 722 ; N Eth ; B 6 0 690 676 ;
+C -1 ; WX 444 ; N edieresis ; B 25 -14 426 667 ;
+C -1 ; WX 556 ; N ugrave ; B 16 -14 537 713 ;
+C -1 ; WX 1000 ; N trademark ; B 24 271 977 676 ;
+C -1 ; WX 500 ; N ograve ; B 25 -14 476 713 ;
+C -1 ; WX 389 ; N scaron ; B 25 -14 363 704 ;
+C -1 ; WX 389 ; N Idieresis ; B 20 0 370 877 ;
+C -1 ; WX 556 ; N uacute ; B 16 -14 537 713 ;
+C -1 ; WX 500 ; N agrave ; B 25 -14 488 713 ;
+C -1 ; WX 556 ; N ntilde ; B 21 0 539 674 ;
+C -1 ; WX 500 ; N aring ; B 25 -14 488 740 ;
+C -1 ; WX 444 ; N zcaron ; B 21 0 420 704 ;
+C -1 ; WX 389 ; N Icircumflex ; B 20 0 370 914 ;
+C -1 ; WX 722 ; N Ntilde ; B 16 -18 701 884 ;
+C -1 ; WX 556 ; N ucircumflex ; B 16 -14 537 704 ;
+C -1 ; WX 667 ; N Ecircumflex ; B 16 0 641 914 ;
+C -1 ; WX 389 ; N Iacute ; B 20 0 370 923 ;
+C -1 ; WX 722 ; N Ccedilla ; B 49 -218 687 691 ;
+C -1 ; WX 778 ; N Odieresis ; B 35 -19 743 877 ;
+C -1 ; WX 556 ; N Scaron ; B 35 -19 513 914 ;
+C -1 ; WX 667 ; N Edieresis ; B 16 0 641 877 ;
+C -1 ; WX 389 ; N Igrave ; B 20 0 370 923 ;
+C -1 ; WX 500 ; N adieresis ; B 25 -14 488 667 ;
+C -1 ; WX 778 ; N Ograve ; B 35 -19 743 923 ;
+C -1 ; WX 667 ; N Egrave ; B 16 0 641 923 ;
+C -1 ; WX 722 ; N Ydieresis ; B 15 0 699 877 ;
+C -1 ; WX 747 ; N registered ; B 26 -19 721 691 ;
+C -1 ; WX 778 ; N Otilde ; B 35 -19 743 884 ;
+C -1 ; WX 750 ; N onequarter ; B 28 -12 743 688 ;
+C -1 ; WX 722 ; N Ugrave ; B 16 -19 701 923 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 16 -19 701 914 ;
+C -1 ; WX 611 ; N Thorn ; B 16 0 600 676 ;
+C -1 ; WX 570 ; N divide ; B 33 -31 537 537 ;
+C -1 ; WX 722 ; N Atilde ; B 9 0 689 884 ;
+C -1 ; WX 722 ; N Uacute ; B 16 -19 701 923 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 35 -19 743 914 ;
+C -1 ; WX 570 ; N logicalnot ; B 33 108 537 399 ;
+C -1 ; WX 722 ; N Aring ; B 9 0 689 935 ;
+C -1 ; WX 278 ; N idieresis ; B -36 0 301 667 ;
+C -1 ; WX 278 ; N iacute ; B 16 0 290 713 ;
+C -1 ; WX 500 ; N aacute ; B 25 -14 488 713 ;
+C -1 ; WX 570 ; N plusminus ; B 33 0 537 506 ;
+C -1 ; WX 570 ; N multiply ; B 48 16 522 490 ;
+C -1 ; WX 722 ; N Udieresis ; B 16 -19 701 877 ;
+C -1 ; WX 570 ; N minus ; B 33 209 537 297 ;
+C -1 ; WX 300 ; N onesuperior ; B 28 275 273 688 ;
+C -1 ; WX 667 ; N Eacute ; B 16 0 641 923 ;
+C -1 ; WX 722 ; N Acircumflex ; B 9 0 689 914 ;
+C -1 ; WX 747 ; N copyright ; B 26 -19 721 691 ;
+C -1 ; WX 722 ; N Agrave ; B 9 0 689 923 ;
+C -1 ; WX 500 ; N odieresis ; B 25 -14 476 667 ;
+C -1 ; WX 500 ; N oacute ; B 25 -14 476 713 ;
+C -1 ; WX 400 ; N degree ; B 57 402 343 688 ;
+C -1 ; WX 278 ; N igrave ; B -26 0 255 713 ;
+C -1 ; WX 556 ; N mu ; B 33 -206 536 461 ;
+C -1 ; WX 778 ; N Oacute ; B 35 -19 743 923 ;
+C -1 ; WX 500 ; N eth ; B 25 -14 476 691 ;
+C -1 ; WX 722 ; N Adieresis ; B 9 0 689 877 ;
+C -1 ; WX 722 ; N Yacute ; B 15 0 699 928 ;
+C -1 ; WX 220 ; N brokenbar ; B 66 -19 154 691 ;
+C -1 ; WX 750 ; N onehalf ; B -7 -12 775 688 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 283
+
+KPX A y -74
+KPX A w -90
+KPX A v -100
+KPX A u -50
+KPX A quoteright -74
+KPX A quotedblright 0
+KPX A p -25
+KPX A Y -100
+KPX A W -130
+KPX A V -145
+KPX A U -50
+KPX A T -95
+KPX A Q -45
+KPX A O -45
+KPX A G -55
+KPX A C -55
+
+KPX B period 0
+KPX B comma 0
+KPX B U -10
+KPX B A -30
+
+KPX D period -20
+KPX D comma 0
+KPX D Y -40
+KPX D W -40
+KPX D V -40
+KPX D A -35
+
+KPX F r 0
+KPX F period -110
+KPX F o -25
+KPX F i 0
+KPX F e -25
+KPX F comma -92
+KPX F a -25
+KPX F A -90
+
+KPX G period 0
+KPX G comma 0
+
+KPX J u -15
+KPX J period -20
+KPX J o -15
+KPX J e -15
+KPX J comma 0
+KPX J a -15
+KPX J A -30
+
+KPX K y -45
+KPX K u -15
+KPX K o -25
+KPX K e -25
+KPX K O -30
+
+KPX L y -55
+KPX L quoteright -110
+KPX L quotedblright -20
+KPX L Y -92
+KPX L W -92
+KPX L V -92
+KPX L T -92
+
+KPX N period 0
+KPX N comma 0
+KPX N A -20
+
+KPX O period 0
+KPX O comma 0
+KPX O Y -50
+KPX O X -40
+KPX O W -50
+KPX O V -50
+KPX O T -40
+KPX O A -40
+
+KPX P period -110
+KPX P o -20
+KPX P e -20
+KPX P comma -92
+KPX P a -10
+KPX P A -74
+
+KPX Q period -20
+KPX Q comma 0
+KPX Q U -10
+
+KPX R Y -35
+KPX R W -35
+KPX R V -55
+KPX R U -30
+KPX R T -40
+KPX R O -30
+
+KPX S period 0
+KPX S comma 0
+
+KPX T y -74
+KPX T w -74
+KPX T u -92
+KPX T semicolon -74
+KPX T r -74
+KPX T period -90
+KPX T o -92
+KPX T i -18
+KPX T hyphen -92
+KPX T h 0
+KPX T e -92
+KPX T comma -74
+KPX T colon -74
+KPX T a -92
+KPX T O -18
+KPX T A -90
+
+KPX U period -50
+KPX U comma -50
+KPX U A -60
+
+KPX V u -92
+KPX V semicolon -92
+KPX V period -145
+KPX V o -100
+KPX V i -37
+KPX V hyphen -74
+KPX V e -100
+KPX V comma -129
+KPX V colon -92
+KPX V a -92
+KPX V O -45
+KPX V G -30
+KPX V A -135
+
+KPX W y -60
+KPX W u -50
+KPX W semicolon -55
+KPX W period -92
+KPX W o -75
+KPX W i -18
+KPX W hyphen -37
+KPX W h 0
+KPX W e -65
+KPX W comma -92
+KPX W colon -55
+KPX W a -65
+KPX W O -10
+KPX W A -120
+
+KPX Y u -92
+KPX Y semicolon -92
+KPX Y period -92
+KPX Y o -111
+KPX Y i -37
+KPX Y hyphen -92
+KPX Y e -111
+KPX Y comma -92
+KPX Y colon -92
+KPX Y a -85
+KPX Y O -35
+KPX Y A -110
+
+KPX a y 0
+KPX a w 0
+KPX a v -25
+KPX a t 0
+KPX a p 0
+KPX a g 0
+KPX a b 0
+
+KPX b y 0
+KPX b v -15
+KPX b u -20
+KPX b period -40
+KPX b l 0
+KPX b comma 0
+KPX b b -10
+
+KPX c y 0
+KPX c period 0
+KPX c l 0
+KPX c k 0
+KPX c h 0
+KPX c comma 0
+
+KPX colon space 0
+
+KPX comma space 0
+KPX comma quoteright -55
+KPX comma quotedblright -45
+
+KPX d y 0
+KPX d w -15
+KPX d v 0
+KPX d period 0
+KPX d d 0
+KPX d comma 0
+
+KPX e y 0
+KPX e x 0
+KPX e w 0
+KPX e v -15
+KPX e period 0
+KPX e p 0
+KPX e g 0
+KPX e comma 0
+KPX e b 0
+
+KPX f quoteright 55
+KPX f quotedblright 50
+KPX f period -15
+KPX f o -25
+KPX f l 0
+KPX f i -25
+KPX f f 0
+KPX f e 0
+KPX f dotlessi -35
+KPX f comma -15
+KPX f a 0
+
+KPX g y 0
+KPX g r 0
+KPX g period -15
+KPX g o 0
+KPX g i 0
+KPX g g 0
+KPX g e 0
+KPX g comma 0
+KPX g a 0
+
+KPX h y -15
+
+KPX i v -10
+
+KPX k y -15
+KPX k o -15
+KPX k e -10
+
+KPX l y 0
+KPX l w 0
+
+KPX m y 0
+KPX m u 0
+
+KPX n y 0
+KPX n v -40
+KPX n u 0
+
+KPX o y 0
+KPX o x 0
+KPX o w -10
+KPX o v -10
+KPX o g 0
+
+KPX p y 0
+
+KPX period quoteright -55
+KPX period quotedblright -55
+
+KPX quotedblleft quoteleft 0
+KPX quotedblleft A -10
+
+KPX quotedblright space 0
+
+KPX quoteleft quoteleft -63
+KPX quoteleft A -10
+
+KPX quoteright v -20
+KPX quoteright t 0
+KPX quoteright space -74
+KPX quoteright s -37
+KPX quoteright r -20
+KPX quoteright quoteright -63
+KPX quoteright quotedblright 0
+KPX quoteright l 0
+KPX quoteright d -20
+
+KPX r y 0
+KPX r v -10
+KPX r u 0
+KPX r t 0
+KPX r s 0
+KPX r r 0
+KPX r q -18
+KPX r period -100
+KPX r p -10
+KPX r o -18
+KPX r n -15
+KPX r m 0
+KPX r l 0
+KPX r k 0
+KPX r i 0
+KPX r hyphen -37
+KPX r g -10
+KPX r e -18
+KPX r d 0
+KPX r comma -92
+KPX r c -18
+KPX r a 0
+
+KPX s w 0
+
+KPX space quoteleft 0
+KPX space quotedblleft 0
+KPX space Y -55
+KPX space W -30
+KPX space V -45
+KPX space T -30
+KPX space A -55
+
+KPX v period -70
+KPX v o -10
+KPX v e -10
+KPX v comma -55
+KPX v a -10
+
+KPX w period -70
+KPX w o -10
+KPX w h 0
+KPX w e 0
+KPX w comma -55
+KPX w a 0
+
+KPX x e 0
+
+KPX y period -70
+KPX y o -25
+KPX y e -10
+KPX y comma -55
+KPX y a 0
+
+KPX z o 0
+KPX z e 0
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 188 210 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 188 210 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 188 210 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 188 210 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 180 195 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 188 210 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 208 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 174 210 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 174 210 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 174 210 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 174 210 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 28 210 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 28 210 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 28 210 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 210 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 195 210 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 223 210 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 223 210 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 223 210 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 223 210 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 223 210 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 112 210 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 222 210 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 222 210 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 222 210 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 222 210 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 210 215 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 215 210 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 167 210 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 77 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 77 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 77 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 77 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 77 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 77 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 69 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 62 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 62 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 62 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 62 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -34 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -34 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -34 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -34 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 112 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 84 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 84 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 84 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 84 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 28 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 105 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 105 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 105 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 105 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 84 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 84 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 56 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Ti-BdIt b/font/Ti-BdIt
new file mode 100644
index 0000000..25ab54e
--- /dev/null
+++ b/font/Ti-BdIt
@@ -0,0 +1,648 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Mar 20 13:14:55 1990
+Comment UniqueID 28425
+Comment VMusage 32721 39613
+FontName Times-BoldItalic
+FullName Times Bold Italic
+FamilyName Times
+Weight Bold
+ItalicAngle -15
+IsFixedPitch false
+FontBBox -200 -218 996 921
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.009
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Times is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 669
+XHeight 462
+Ascender 699
+Descender -205
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 389 ; N exclam ; B 67 -13 370 684 ;
+C 34 ; WX 555 ; N quotedbl ; B 136 398 536 685 ;
+C 35 ; WX 500 ; N numbersign ; B -33 0 533 700 ;
+C 36 ; WX 500 ; N dollar ; B -20 -100 497 733 ;
+C 37 ; WX 833 ; N percent ; B 39 -10 793 692 ;
+C 38 ; WX 778 ; N ampersand ; B 5 -19 699 682 ;
+C 39 ; WX 333 ; N quoteright ; B 98 369 302 685 ;
+C 40 ; WX 333 ; N parenleft ; B 28 -179 344 685 ;
+C 41 ; WX 333 ; N parenright ; B -44 -179 271 685 ;
+C 42 ; WX 500 ; N asterisk ; B 65 249 456 685 ;
+C 43 ; WX 570 ; N plus ; B 33 0 537 506 ;
+C 44 ; WX 250 ; N comma ; B -60 -182 144 134 ;
+C 45 ; WX 333 ; N hyphen ; B 2 166 271 282 ;
+C 46 ; WX 250 ; N period ; B -9 -13 139 135 ;
+C 47 ; WX 278 ; N slash ; B -64 -18 342 685 ;
+C 48 ; WX 500 ; N zero ; B 17 -14 477 683 ;
+C 49 ; WX 500 ; N one ; B 5 0 419 683 ;
+C 50 ; WX 500 ; N two ; B -27 0 446 683 ;
+C 51 ; WX 500 ; N three ; B -15 -13 450 683 ;
+C 52 ; WX 500 ; N four ; B -15 0 503 683 ;
+C 53 ; WX 500 ; N five ; B -11 -13 487 669 ;
+C 54 ; WX 500 ; N six ; B 23 -15 509 679 ;
+C 55 ; WX 500 ; N seven ; B 52 0 525 669 ;
+C 56 ; WX 500 ; N eight ; B 3 -13 476 683 ;
+C 57 ; WX 500 ; N nine ; B -12 -10 475 683 ;
+C 58 ; WX 333 ; N colon ; B 23 -13 264 459 ;
+C 59 ; WX 333 ; N semicolon ; B -25 -183 264 459 ;
+C 60 ; WX 570 ; N less ; B 31 -8 539 514 ;
+C 61 ; WX 570 ; N equal ; B 33 107 537 399 ;
+C 62 ; WX 570 ; N greater ; B 31 -8 539 514 ;
+C 63 ; WX 500 ; N question ; B 79 -13 470 684 ;
+C 64 ; WX 832 ; N at ; B 63 -18 770 685 ;
+C 65 ; WX 667 ; N A ; B -67 0 593 683 ;
+C 66 ; WX 667 ; N B ; B -24 0 624 669 ;
+C 67 ; WX 667 ; N C ; B 32 -18 677 685 ;
+C 68 ; WX 722 ; N D ; B -46 0 685 669 ;
+C 69 ; WX 667 ; N E ; B -27 0 653 669 ;
+C 70 ; WX 667 ; N F ; B -13 0 660 669 ;
+C 71 ; WX 722 ; N G ; B 21 -18 706 685 ;
+C 72 ; WX 778 ; N H ; B -24 0 799 669 ;
+C 73 ; WX 389 ; N I ; B -32 0 406 669 ;
+C 74 ; WX 500 ; N J ; B -46 -99 524 669 ;
+C 75 ; WX 667 ; N K ; B -21 0 702 669 ;
+C 76 ; WX 611 ; N L ; B -22 0 590 669 ;
+C 77 ; WX 889 ; N M ; B -29 -12 917 669 ;
+C 78 ; WX 722 ; N N ; B -27 -15 748 669 ;
+C 79 ; WX 722 ; N O ; B 27 -18 691 685 ;
+C 80 ; WX 611 ; N P ; B -27 0 613 669 ;
+C 81 ; WX 722 ; N Q ; B 27 -208 691 685 ;
+C 82 ; WX 667 ; N R ; B -29 0 623 669 ;
+C 83 ; WX 556 ; N S ; B 2 -18 526 685 ;
+C 84 ; WX 611 ; N T ; B 50 0 650 669 ;
+C 85 ; WX 722 ; N U ; B 67 -18 744 669 ;
+C 86 ; WX 667 ; N V ; B 65 -18 715 669 ;
+C 87 ; WX 889 ; N W ; B 65 -18 940 669 ;
+C 88 ; WX 667 ; N X ; B -24 0 694 669 ;
+C 89 ; WX 611 ; N Y ; B 73 0 659 669 ;
+C 90 ; WX 611 ; N Z ; B -11 0 590 669 ;
+C 91 ; WX 333 ; N bracketleft ; B -37 -159 362 674 ;
+C 92 ; WX 278 ; N backslash ; B -1 -18 279 685 ;
+C 93 ; WX 333 ; N bracketright ; B -56 -157 343 674 ;
+C 94 ; WX 570 ; N asciicircum ; B 67 304 503 669 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 333 ; N quoteleft ; B 128 369 332 685 ;
+C 97 ; WX 500 ; N a ; B -21 -14 455 462 ;
+C 98 ; WX 500 ; N b ; B -14 -13 444 699 ;
+C 99 ; WX 444 ; N c ; B -5 -13 392 462 ;
+C 100 ; WX 500 ; N d ; B -21 -13 517 699 ;
+C 101 ; WX 444 ; N e ; B 5 -13 398 462 ;
+C 102 ; WX 333 ; N f ; B -169 -205 446 698 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B -52 -203 478 462 ;
+C 104 ; WX 556 ; N h ; B -13 -9 498 699 ;
+C 105 ; WX 278 ; N i ; B 2 -9 263 684 ;
+C 106 ; WX 278 ; N j ; B -189 -207 279 684 ;
+C 107 ; WX 500 ; N k ; B -23 -8 483 699 ;
+C 108 ; WX 278 ; N l ; B 2 -9 290 699 ;
+C 109 ; WX 778 ; N m ; B -14 -9 722 462 ;
+C 110 ; WX 556 ; N n ; B -6 -9 493 462 ;
+C 111 ; WX 500 ; N o ; B -3 -13 441 462 ;
+C 112 ; WX 500 ; N p ; B -120 -205 446 462 ;
+C 113 ; WX 500 ; N q ; B 1 -205 471 462 ;
+C 114 ; WX 389 ; N r ; B -21 0 389 462 ;
+C 115 ; WX 389 ; N s ; B -19 -13 333 462 ;
+C 116 ; WX 278 ; N t ; B -11 -9 281 594 ;
+C 117 ; WX 556 ; N u ; B 15 -9 492 462 ;
+C 118 ; WX 444 ; N v ; B 16 -13 401 462 ;
+C 119 ; WX 667 ; N w ; B 16 -13 614 462 ;
+C 120 ; WX 500 ; N x ; B -46 -13 469 462 ;
+C 121 ; WX 444 ; N y ; B -94 -205 392 462 ;
+C 122 ; WX 389 ; N z ; B -43 -78 368 449 ;
+C 123 ; WX 348 ; N braceleft ; B 5 -187 436 686 ;
+C 124 ; WX 220 ; N bar ; B 66 -18 154 685 ;
+C 125 ; WX 348 ; N braceright ; B -129 -187 302 686 ;
+C 126 ; WX 570 ; N asciitilde ; B 54 173 516 333 ;
+C 161 ; WX 389 ; N exclamdown ; B 19 -205 322 492 ;
+C 162 ; WX 500 ; N cent ; B 42 -143 439 576 ;
+C 163 ; WX 500 ; N sterling ; B -32 -12 510 683 ;
+C 164 ; WX 167 ; N fraction ; B -169 -14 324 683 ;
+C 165 ; WX 500 ; N yen ; B 33 0 628 669 ;
+C 166 ; WX 500 ; N florin ; B -87 -156 537 707 ;
+C 167 ; WX 500 ; N section ; B 36 -143 459 685 ;
+C 168 ; WX 500 ; N currency ; B -26 34 526 586 ;
+C 169 ; WX 278 ; N quotesingle ; B 128 398 268 685 ;
+C 170 ; WX 500 ; N quotedblleft ; B 53 369 513 685 ;
+C 171 ; WX 500 ; N guillemotleft ; B 12 32 468 415 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 32 32 303 415 ;
+C 173 ; WX 333 ; N guilsinglright ; B 10 32 281 415 ;
+C 174 ; WX 556 ; N fi ; B -188 -205 514 703 ;
+C 175 ; WX 556 ; N fl ; B -186 -205 553 704 ;
+C 177 ; WX 500 ; N endash ; B -40 178 477 269 ;
+C 178 ; WX 500 ; N dagger ; B 91 -145 494 685 ;
+C 179 ; WX 500 ; N daggerdbl ; B 10 -139 493 685 ;
+C 180 ; WX 250 ; N periodcentered ; B 51 257 199 405 ;
+C 182 ; WX 500 ; N paragraph ; B -57 -193 562 669 ;
+C 183 ; WX 350 ; N bullet ; B 0 175 350 525 ;
+C 184 ; WX 333 ; N quotesinglbase ; B -5 -182 199 134 ;
+C 185 ; WX 500 ; N quotedblbase ; B -57 -182 403 134 ;
+C 186 ; WX 500 ; N quotedblright ; B 53 369 513 685 ;
+C 187 ; WX 500 ; N guillemotright ; B 12 32 468 415 ;
+C 188 ; WX 1000 ; N ellipsis ; B 40 -13 852 135 ;
+C 189 ; WX 1000 ; N perthousand ; B 7 -29 996 706 ;
+C 191 ; WX 500 ; N questiondown ; B 30 -205 421 492 ;
+C 193 ; WX 333 ; N grave ; B 85 516 297 697 ;
+C 194 ; WX 333 ; N acute ; B 139 516 379 697 ;
+C 195 ; WX 333 ; N circumflex ; B 40 516 367 690 ;
+C 196 ; WX 333 ; N tilde ; B 48 536 407 655 ;
+C 197 ; WX 333 ; N macron ; B 51 553 393 623 ;
+C 198 ; WX 333 ; N breve ; B 71 516 387 678 ;
+C 199 ; WX 333 ; N dotaccent ; B 163 525 293 655 ;
+C 200 ; WX 333 ; N dieresis ; B 55 525 397 655 ;
+C 202 ; WX 333 ; N ring ; B 127 516 340 729 ;
+C 203 ; WX 333 ; N cedilla ; B -80 -218 156 5 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 69 516 498 697 ;
+C 206 ; WX 333 ; N ogonek ; B -40 -173 189 44 ;
+C 207 ; WX 333 ; N caron ; B 79 516 411 690 ;
+C 208 ; WX 1000 ; N emdash ; B -40 178 977 269 ;
+C 225 ; WX 944 ; N AE ; B -64 0 918 669 ;
+C 227 ; WX 266 ; N ordfeminine ; B 16 399 330 685 ;
+C 232 ; WX 611 ; N Lslash ; B -22 0 590 669 ;
+C 233 ; WX 722 ; N Oslash ; B 27 -125 691 764 ;
+C 234 ; WX 944 ; N OE ; B 23 -8 946 677 ;
+C 235 ; WX 300 ; N ordmasculine ; B 56 400 347 685 ;
+C 241 ; WX 722 ; N ae ; B -5 -13 673 462 ;
+C 245 ; WX 278 ; N dotlessi ; B 2 -9 238 462 ;
+C 248 ; WX 278 ; N lslash ; B -13 -9 301 699 ;
+C 249 ; WX 500 ; N oslash ; B -3 -119 441 560 ;
+C 250 ; WX 722 ; N oe ; B 6 -13 674 462 ;
+C 251 ; WX 500 ; N germandbls ; B -200 -200 473 705 ;
+C -1 ; WX 611 ; N Zcaron ; B -11 0 590 897 ;
+C -1 ; WX 444 ; N ccedilla ; B -24 -218 392 462 ;
+C -1 ; WX 444 ; N ydieresis ; B -94 -205 438 655 ;
+C -1 ; WX 500 ; N atilde ; B -21 -14 491 655 ;
+C -1 ; WX 278 ; N icircumflex ; B -2 -9 325 690 ;
+C -1 ; WX 300 ; N threesuperior ; B 17 265 321 683 ;
+C -1 ; WX 444 ; N ecircumflex ; B 5 -13 423 690 ;
+C -1 ; WX 500 ; N thorn ; B -120 -205 446 699 ;
+C -1 ; WX 444 ; N egrave ; B 5 -13 398 697 ;
+C -1 ; WX 300 ; N twosuperior ; B 2 274 313 683 ;
+C -1 ; WX 444 ; N eacute ; B 5 -13 435 697 ;
+C -1 ; WX 500 ; N otilde ; B -3 -13 491 655 ;
+C -1 ; WX 667 ; N Aacute ; B -67 0 593 904 ;
+C -1 ; WX 500 ; N ocircumflex ; B -3 -13 451 690 ;
+C -1 ; WX 444 ; N yacute ; B -94 -205 435 697 ;
+C -1 ; WX 556 ; N udieresis ; B 15 -9 494 655 ;
+C -1 ; WX 750 ; N threequarters ; B 7 -14 726 683 ;
+C -1 ; WX 500 ; N acircumflex ; B -21 -14 455 690 ;
+C -1 ; WX 722 ; N Eth ; B -31 0 700 669 ;
+C -1 ; WX 444 ; N edieresis ; B 5 -13 443 655 ;
+C -1 ; WX 556 ; N ugrave ; B 15 -9 492 697 ;
+C -1 ; WX 1000 ; N trademark ; B 32 263 968 669 ;
+C -1 ; WX 500 ; N ograve ; B -3 -13 441 697 ;
+C -1 ; WX 389 ; N scaron ; B -19 -13 439 690 ;
+C -1 ; WX 389 ; N Idieresis ; B -32 0 445 862 ;
+C -1 ; WX 556 ; N uacute ; B 15 -9 492 697 ;
+C -1 ; WX 500 ; N agrave ; B -21 -14 455 697 ;
+C -1 ; WX 556 ; N ntilde ; B -6 -9 504 655 ;
+C -1 ; WX 500 ; N aring ; B -21 -14 455 729 ;
+C -1 ; WX 389 ; N zcaron ; B -43 -78 424 690 ;
+C -1 ; WX 389 ; N Icircumflex ; B -32 0 420 897 ;
+C -1 ; WX 722 ; N Ntilde ; B -27 -15 748 862 ;
+C -1 ; WX 556 ; N ucircumflex ; B 15 -9 492 690 ;
+C -1 ; WX 667 ; N Ecircumflex ; B -27 0 653 897 ;
+C -1 ; WX 389 ; N Iacute ; B -32 0 412 904 ;
+C -1 ; WX 667 ; N Ccedilla ; B 32 -218 677 685 ;
+C -1 ; WX 722 ; N Odieresis ; B 27 -18 691 862 ;
+C -1 ; WX 556 ; N Scaron ; B 2 -18 526 897 ;
+C -1 ; WX 667 ; N Edieresis ; B -27 0 653 862 ;
+C -1 ; WX 389 ; N Igrave ; B -32 0 406 904 ;
+C -1 ; WX 500 ; N adieresis ; B -21 -14 471 655 ;
+C -1 ; WX 722 ; N Ograve ; B 27 -18 691 904 ;
+C -1 ; WX 667 ; N Egrave ; B -27 0 653 904 ;
+C -1 ; WX 611 ; N Ydieresis ; B 73 0 659 862 ;
+C -1 ; WX 747 ; N registered ; B 30 -18 718 685 ;
+C -1 ; WX 722 ; N Otilde ; B 27 -18 691 862 ;
+C -1 ; WX 750 ; N onequarter ; B 7 -14 721 683 ;
+C -1 ; WX 722 ; N Ugrave ; B 67 -18 744 904 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 67 -18 744 897 ;
+C -1 ; WX 611 ; N Thorn ; B -27 0 573 669 ;
+C -1 ; WX 570 ; N divide ; B 33 -29 537 535 ;
+C -1 ; WX 667 ; N Atilde ; B -67 0 593 862 ;
+C -1 ; WX 722 ; N Uacute ; B 67 -18 744 904 ;
+C -1 ; WX 722 ; N Ocircumflex ; B 27 -18 691 897 ;
+C -1 ; WX 606 ; N logicalnot ; B 51 108 555 399 ;
+C -1 ; WX 667 ; N Aring ; B -67 0 593 921 ;
+C -1 ; WX 278 ; N idieresis ; B 2 -9 360 655 ;
+C -1 ; WX 278 ; N iacute ; B 2 -9 352 697 ;
+C -1 ; WX 500 ; N aacute ; B -21 -14 463 697 ;
+C -1 ; WX 570 ; N plusminus ; B 33 0 537 506 ;
+C -1 ; WX 570 ; N multiply ; B 48 16 522 490 ;
+C -1 ; WX 722 ; N Udieresis ; B 67 -18 744 862 ;
+C -1 ; WX 606 ; N minus ; B 51 209 555 297 ;
+C -1 ; WX 300 ; N onesuperior ; B 30 274 301 683 ;
+C -1 ; WX 667 ; N Eacute ; B -27 0 653 904 ;
+C -1 ; WX 667 ; N Acircumflex ; B -67 0 593 897 ;
+C -1 ; WX 747 ; N copyright ; B 30 -18 718 685 ;
+C -1 ; WX 667 ; N Agrave ; B -67 0 593 904 ;
+C -1 ; WX 500 ; N odieresis ; B -3 -13 466 655 ;
+C -1 ; WX 500 ; N oacute ; B -3 -13 463 697 ;
+C -1 ; WX 400 ; N degree ; B 83 397 369 683 ;
+C -1 ; WX 278 ; N igrave ; B 2 -9 260 697 ;
+C -1 ; WX 576 ; N mu ; B -60 -207 516 449 ;
+C -1 ; WX 722 ; N Oacute ; B 27 -18 691 904 ;
+C -1 ; WX 500 ; N eth ; B -3 -13 454 699 ;
+C -1 ; WX 667 ; N Adieresis ; B -67 0 593 862 ;
+C -1 ; WX 611 ; N Yacute ; B 73 0 659 904 ;
+C -1 ; WX 220 ; N brokenbar ; B 66 -18 154 685 ;
+C -1 ; WX 750 ; N onehalf ; B -9 -14 723 683 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 283
+
+KPX A y -74
+KPX A w -74
+KPX A v -74
+KPX A u -30
+KPX A quoteright -74
+KPX A quotedblright 0
+KPX A p 0
+KPX A Y -70
+KPX A W -100
+KPX A V -95
+KPX A U -50
+KPX A T -55
+KPX A Q -55
+KPX A O -50
+KPX A G -60
+KPX A C -65
+
+KPX B period 0
+KPX B comma 0
+KPX B U -10
+KPX B A -25
+
+KPX D period 0
+KPX D comma 0
+KPX D Y -50
+KPX D W -40
+KPX D V -50
+KPX D A -25
+
+KPX F r -50
+KPX F period -129
+KPX F o -70
+KPX F i -40
+KPX F e -100
+KPX F comma -129
+KPX F a -95
+KPX F A -100
+
+KPX G period 0
+KPX G comma 0
+
+KPX J u -40
+KPX J period -10
+KPX J o -40
+KPX J e -40
+KPX J comma -10
+KPX J a -40
+KPX J A -25
+
+KPX K y -20
+KPX K u -20
+KPX K o -25
+KPX K e -25
+KPX K O -30
+
+KPX L y -37
+KPX L quoteright -55
+KPX L quotedblright 0
+KPX L Y -37
+KPX L W -37
+KPX L V -37
+KPX L T -18
+
+KPX N period 0
+KPX N comma 0
+KPX N A -30
+
+KPX O period 0
+KPX O comma 0
+KPX O Y -50
+KPX O X -40
+KPX O W -50
+KPX O V -50
+KPX O T -40
+KPX O A -40
+
+KPX P period -129
+KPX P o -55
+KPX P e -50
+KPX P comma -129
+KPX P a -40
+KPX P A -85
+
+KPX Q period 0
+KPX Q comma 0
+KPX Q U -10
+
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R U -40
+KPX R T -30
+KPX R O -40
+
+KPX S period 0
+KPX S comma 0
+
+KPX T y -37
+KPX T w -37
+KPX T u -37
+KPX T semicolon -74
+KPX T r -37
+KPX T period -92
+KPX T o -95
+KPX T i -37
+KPX T hyphen -92
+KPX T h 0
+KPX T e -92
+KPX T comma -92
+KPX T colon -74
+KPX T a -92
+KPX T O -18
+KPX T A -55
+
+KPX U period 0
+KPX U comma 0
+KPX U A -45
+
+KPX V u -55
+KPX V semicolon -74
+KPX V period -129
+KPX V o -111
+KPX V i -55
+KPX V hyphen -70
+KPX V e -111
+KPX V comma -129
+KPX V colon -74
+KPX V a -111
+KPX V O -30
+KPX V G -10
+KPX V A -85
+
+KPX W y -55
+KPX W u -55
+KPX W semicolon -55
+KPX W period -74
+KPX W o -80
+KPX W i -37
+KPX W hyphen -50
+KPX W h 0
+KPX W e -90
+KPX W comma -74
+KPX W colon -55
+KPX W a -85
+KPX W O -15
+KPX W A -74
+
+KPX Y u -92
+KPX Y semicolon -92
+KPX Y period -74
+KPX Y o -111
+KPX Y i -55
+KPX Y hyphen -92
+KPX Y e -111
+KPX Y comma -92
+KPX Y colon -92
+KPX Y a -92
+KPX Y O -25
+KPX Y A -74
+
+KPX a y 0
+KPX a w 0
+KPX a v 0
+KPX a t 0
+KPX a p 0
+KPX a g 0
+KPX a b 0
+
+KPX b y 0
+KPX b v 0
+KPX b u -20
+KPX b period -40
+KPX b l 0
+KPX b comma 0
+KPX b b -10
+
+KPX c y 0
+KPX c period 0
+KPX c l 0
+KPX c k -10
+KPX c h -10
+KPX c comma 0
+
+KPX colon space 0
+
+KPX comma space 0
+KPX comma quoteright -95
+KPX comma quotedblright -95
+
+KPX d y 0
+KPX d w 0
+KPX d v 0
+KPX d period 0
+KPX d d 0
+KPX d comma 0
+
+KPX e y 0
+KPX e x 0
+KPX e w 0
+KPX e v 0
+KPX e period 0
+KPX e p 0
+KPX e g 0
+KPX e comma 0
+KPX e b -10
+
+KPX f quoteright 55
+KPX f quotedblright 0
+KPX f period -10
+KPX f o -10
+KPX f l 0
+KPX f i 0
+KPX f f -18
+KPX f e -10
+KPX f dotlessi -30
+KPX f comma -10
+KPX f a 0
+
+KPX g y 0
+KPX g r 0
+KPX g period 0
+KPX g o 0
+KPX g i 0
+KPX g g 0
+KPX g e 0
+KPX g comma 0
+KPX g a 0
+
+KPX h y 0
+
+KPX i v 0
+
+KPX k y 0
+KPX k o -10
+KPX k e -30
+
+KPX l y 0
+KPX l w 0
+
+KPX m y 0
+KPX m u 0
+
+KPX n y 0
+KPX n v -40
+KPX n u 0
+
+KPX o y -10
+KPX o x -10
+KPX o w -25
+KPX o v -15
+KPX o g 0
+
+KPX p y 0
+
+KPX period quoteright -95
+KPX period quotedblright -95
+
+KPX quotedblleft quoteleft 0
+KPX quotedblleft A 0
+
+KPX quotedblright space 0
+
+KPX quoteleft quoteleft -74
+KPX quoteleft A 0
+
+KPX quoteright v -15
+KPX quoteright t -37
+KPX quoteright space -74
+KPX quoteright s -74
+KPX quoteright r -15
+KPX quoteright quoteright -74
+KPX quoteright quotedblright 0
+KPX quoteright l 0
+KPX quoteright d -15
+
+KPX r y 0
+KPX r v 0
+KPX r u 0
+KPX r t 0
+KPX r s 0
+KPX r r 0
+KPX r q 0
+KPX r period -65
+KPX r p 0
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r l 0
+KPX r k 0
+KPX r i 0
+KPX r hyphen 0
+KPX r g 0
+KPX r e 0
+KPX r d 0
+KPX r comma -65
+KPX r c 0
+KPX r a 0
+
+KPX s w 0
+
+KPX space quoteleft 0
+KPX space quotedblleft 0
+KPX space Y -70
+KPX space W -70
+KPX space V -70
+KPX space T 0
+KPX space A -37
+
+KPX v period -37
+KPX v o -15
+KPX v e -15
+KPX v comma -37
+KPX v a 0
+
+KPX w period -37
+KPX w o -15
+KPX w h 0
+KPX w e -10
+KPX w comma -37
+KPX w a -10
+
+KPX x e -10
+
+KPX y period -37
+KPX y o 0
+KPX y e 0
+KPX y comma -37
+KPX y a 0
+
+KPX z o 0
+KPX z e 0
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 172 207 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 187 207 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 167 207 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 172 207 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 157 192 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 167 207 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 167 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 172 207 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 187 207 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 187 207 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 172 207 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 33 207 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 53 207 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 48 207 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 33 207 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 210 207 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 200 207 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 230 207 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 215 207 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 200 207 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 215 207 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 112 207 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 210 207 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 230 207 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 230 207 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 200 207 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 154 207 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 169 207 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 139 207 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 84 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 84 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 74 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 74 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 84 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 84 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 56 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 56 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 56 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 46 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 46 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -42 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -37 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -37 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 97 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 84 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 69 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 74 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 84 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 28 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 112 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 112 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 97 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 102 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 56 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 41 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 13 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Ti-BdItF b/font/Ti-BdItF
new file mode 100644
index 0000000..3e513cc
--- /dev/null
+++ b/font/Ti-BdItF
@@ -0,0 +1,518 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Dec  4 12:07:03 1990
+Comment UniqueID 33656
+Comment VMusage 33137 40029
+FontName Times-BoldItalicOsF
+FullName Times Bold Italic Old Style Figures
+FamilyName Times
+Weight Bold
+ItalicAngle -15
+IsFixedPitch false
+FontBBox -200 -218 996 921
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Times is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 669
+XHeight 462
+Ascender 699
+Descender -205
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 389 ; N exclam ; B 67 -13 370 684 ;
+C 34 ; WX 555 ; N quotedbl ; B 136 398 536 685 ;
+C 35 ; WX 500 ; N numbersign ; B -33 0 533 700 ;
+C 36 ; WX 500 ; N dollar ; B -20 -100 497 733 ;
+C 37 ; WX 833 ; N percent ; B 39 -10 793 692 ;
+C 38 ; WX 778 ; N ampersand ; B 5 -19 699 682 ;
+C 39 ; WX 333 ; N quoteright ; B 98 369 302 685 ;
+C 40 ; WX 333 ; N parenleft ; B 28 -179 344 685 ;
+C 41 ; WX 333 ; N parenright ; B -44 -179 271 685 ;
+C 42 ; WX 500 ; N asterisk ; B 65 249 456 685 ;
+C 43 ; WX 570 ; N plus ; B 33 0 537 506 ;
+C 44 ; WX 250 ; N comma ; B -60 -182 144 134 ;
+C 45 ; WX 333 ; N hyphen ; B 2 166 271 282 ;
+C 46 ; WX 250 ; N period ; B -9 -13 139 135 ;
+C 47 ; WX 278 ; N slash ; B -64 -18 342 685 ;
+C 48 ; WX 500 ; N zero ; B 20 -12 472 502 ;
+C 49 ; WX 500 ; N one ; B 22 0 468 486 ;
+C 50 ; WX 500 ; N two ; B 0 0 430 498 ;
+C 51 ; WX 500 ; N three ; B -29 -194 432 498 ;
+C 52 ; WX 500 ; N four ; B -26 -168 486 513 ;
+C 53 ; WX 500 ; N five ; B -22 -194 477 486 ;
+C 54 ; WX 500 ; N six ; B 32 -12 516 680 ;
+C 55 ; WX 500 ; N seven ; B 44 -182 508 486 ;
+C 56 ; WX 500 ; N eight ; B 24 -12 496 682 ;
+C 57 ; WX 500 ; N nine ; B -24 -190 460 502 ;
+C 58 ; WX 333 ; N colon ; B 23 -13 264 459 ;
+C 59 ; WX 333 ; N semicolon ; B -25 -183 264 459 ;
+C 60 ; WX 570 ; N less ; B 31 -8 539 514 ;
+C 61 ; WX 570 ; N equal ; B 33 107 537 399 ;
+C 62 ; WX 570 ; N greater ; B 31 -8 539 514 ;
+C 63 ; WX 500 ; N question ; B 79 -13 470 684 ;
+C 64 ; WX 832 ; N at ; B 63 -18 770 685 ;
+C 65 ; WX 667 ; N A ; B -67 0 593 683 ;
+C 66 ; WX 667 ; N B ; B -24 0 624 669 ;
+C 67 ; WX 667 ; N C ; B 32 -18 677 685 ;
+C 68 ; WX 722 ; N D ; B -46 0 685 669 ;
+C 69 ; WX 667 ; N E ; B -27 0 653 669 ;
+C 70 ; WX 667 ; N F ; B -13 0 660 669 ;
+C 71 ; WX 722 ; N G ; B 21 -18 706 685 ;
+C 72 ; WX 778 ; N H ; B -24 0 799 669 ;
+C 73 ; WX 389 ; N I ; B -32 0 406 669 ;
+C 74 ; WX 500 ; N J ; B -46 -99 524 669 ;
+C 75 ; WX 667 ; N K ; B -21 0 702 669 ;
+C 76 ; WX 611 ; N L ; B -22 0 590 669 ;
+C 77 ; WX 889 ; N M ; B -29 -12 917 669 ;
+C 78 ; WX 722 ; N N ; B -27 -15 748 669 ;
+C 79 ; WX 722 ; N O ; B 27 -18 691 685 ;
+C 80 ; WX 611 ; N P ; B -27 0 613 669 ;
+C 81 ; WX 722 ; N Q ; B 27 -208 691 685 ;
+C 82 ; WX 667 ; N R ; B -29 0 623 669 ;
+C 83 ; WX 556 ; N S ; B 2 -18 526 685 ;
+C 84 ; WX 611 ; N T ; B 50 0 650 669 ;
+C 85 ; WX 722 ; N U ; B 67 -18 744 669 ;
+C 86 ; WX 667 ; N V ; B 65 -18 715 669 ;
+C 87 ; WX 889 ; N W ; B 65 -18 940 669 ;
+C 88 ; WX 667 ; N X ; B -24 0 694 669 ;
+C 89 ; WX 611 ; N Y ; B 73 0 659 669 ;
+C 90 ; WX 611 ; N Z ; B -11 0 590 669 ;
+C 91 ; WX 333 ; N bracketleft ; B -37 -159 362 674 ;
+C 92 ; WX 278 ; N backslash ; B -1 -18 279 685 ;
+C 93 ; WX 333 ; N bracketright ; B -56 -157 343 674 ;
+C 94 ; WX 570 ; N asciicircum ; B 67 304 503 669 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 333 ; N quoteleft ; B 128 369 332 685 ;
+C 97 ; WX 500 ; N a ; B -21 -14 455 462 ;
+C 98 ; WX 500 ; N b ; B -14 -13 444 699 ;
+C 99 ; WX 444 ; N c ; B -5 -13 392 462 ;
+C 100 ; WX 500 ; N d ; B -21 -13 517 699 ;
+C 101 ; WX 444 ; N e ; B 5 -13 398 462 ;
+C 102 ; WX 333 ; N f ; B -169 -205 446 698 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B -52 -203 478 462 ;
+C 104 ; WX 556 ; N h ; B -13 -9 498 699 ;
+C 105 ; WX 278 ; N i ; B 2 -9 263 684 ;
+C 106 ; WX 278 ; N j ; B -189 -207 279 684 ;
+C 107 ; WX 500 ; N k ; B -23 -8 483 699 ;
+C 108 ; WX 278 ; N l ; B 2 -9 290 699 ;
+C 109 ; WX 778 ; N m ; B -14 -9 722 462 ;
+C 110 ; WX 556 ; N n ; B -6 -9 493 462 ;
+C 111 ; WX 500 ; N o ; B -3 -13 441 462 ;
+C 112 ; WX 500 ; N p ; B -120 -205 446 462 ;
+C 113 ; WX 500 ; N q ; B 1 -205 471 462 ;
+C 114 ; WX 389 ; N r ; B -21 0 389 462 ;
+C 115 ; WX 389 ; N s ; B -19 -13 333 462 ;
+C 116 ; WX 278 ; N t ; B -11 -9 281 594 ;
+C 117 ; WX 556 ; N u ; B 15 -9 492 462 ;
+C 118 ; WX 444 ; N v ; B 16 -13 401 462 ;
+C 119 ; WX 667 ; N w ; B 16 -13 614 462 ;
+C 120 ; WX 500 ; N x ; B -46 -13 469 462 ;
+C 121 ; WX 444 ; N y ; B -94 -205 392 462 ;
+C 122 ; WX 389 ; N z ; B -43 -78 368 449 ;
+C 123 ; WX 348 ; N braceleft ; B 5 -187 436 686 ;
+C 124 ; WX 220 ; N bar ; B 66 -18 154 685 ;
+C 125 ; WX 348 ; N braceright ; B -129 -187 302 686 ;
+C 126 ; WX 570 ; N asciitilde ; B 54 173 516 333 ;
+C 161 ; WX 389 ; N exclamdown ; B 19 -205 322 492 ;
+C 162 ; WX 500 ; N cent ; B 42 -143 439 576 ;
+C 163 ; WX 500 ; N sterling ; B -32 -12 510 683 ;
+C 164 ; WX 167 ; N fraction ; B -169 -14 324 683 ;
+C 165 ; WX 500 ; N yen ; B 33 0 628 669 ;
+C 166 ; WX 500 ; N florin ; B -87 -156 537 707 ;
+C 167 ; WX 500 ; N section ; B 36 -143 459 685 ;
+C 168 ; WX 500 ; N currency ; B -26 34 526 586 ;
+C 169 ; WX 278 ; N quotesingle ; B 128 398 268 685 ;
+C 170 ; WX 500 ; N quotedblleft ; B 53 369 513 685 ;
+C 171 ; WX 500 ; N guillemotleft ; B 12 32 468 415 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 32 32 303 415 ;
+C 173 ; WX 333 ; N guilsinglright ; B 10 32 281 415 ;
+C 174 ; WX 556 ; N fi ; B -188 -205 514 703 ;
+C 175 ; WX 556 ; N fl ; B -186 -205 553 704 ;
+C 177 ; WX 500 ; N endash ; B -40 178 477 269 ;
+C 178 ; WX 500 ; N dagger ; B 91 -145 494 685 ;
+C 179 ; WX 500 ; N daggerdbl ; B 10 -139 493 685 ;
+C 180 ; WX 250 ; N periodcentered ; B 51 257 199 405 ;
+C 182 ; WX 500 ; N paragraph ; B -57 -193 562 669 ;
+C 183 ; WX 350 ; N bullet ; B 0 175 350 525 ;
+C 184 ; WX 333 ; N quotesinglbase ; B -5 -182 199 134 ;
+C 185 ; WX 500 ; N quotedblbase ; B -57 -182 403 134 ;
+C 186 ; WX 500 ; N quotedblright ; B 53 369 513 685 ;
+C 187 ; WX 500 ; N guillemotright ; B 12 32 468 415 ;
+C 188 ; WX 1000 ; N ellipsis ; B 40 -13 852 135 ;
+C 189 ; WX 1000 ; N perthousand ; B 7 -29 996 706 ;
+C 191 ; WX 500 ; N questiondown ; B 30 -205 421 492 ;
+C 193 ; WX 333 ; N grave ; B 85 516 297 697 ;
+C 194 ; WX 333 ; N acute ; B 139 516 379 697 ;
+C 195 ; WX 333 ; N circumflex ; B 40 516 367 690 ;
+C 196 ; WX 333 ; N tilde ; B 48 536 407 655 ;
+C 197 ; WX 333 ; N macron ; B 51 553 393 623 ;
+C 198 ; WX 333 ; N breve ; B 71 516 387 678 ;
+C 199 ; WX 333 ; N dotaccent ; B 163 525 293 655 ;
+C 200 ; WX 333 ; N dieresis ; B 55 525 397 655 ;
+C 202 ; WX 333 ; N ring ; B 127 516 340 729 ;
+C 203 ; WX 333 ; N cedilla ; B -80 -218 156 5 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 69 516 498 697 ;
+C 206 ; WX 333 ; N ogonek ; B -40 -173 189 44 ;
+C 207 ; WX 333 ; N caron ; B 79 516 411 690 ;
+C 208 ; WX 1000 ; N emdash ; B 84 178 852 269 ;
+C 225 ; WX 944 ; N AE ; B -64 0 918 669 ;
+C 227 ; WX 266 ; N ordfeminine ; B 16 399 330 685 ;
+C 232 ; WX 611 ; N Lslash ; B -22 0 590 669 ;
+C 233 ; WX 722 ; N Oslash ; B 27 -125 691 764 ;
+C 234 ; WX 944 ; N OE ; B 23 -8 946 677 ;
+C 235 ; WX 300 ; N ordmasculine ; B 56 400 347 685 ;
+C 241 ; WX 722 ; N ae ; B -5 -13 673 462 ;
+C 245 ; WX 278 ; N dotlessi ; B 2 -9 238 462 ;
+C 248 ; WX 278 ; N lslash ; B -13 -9 301 699 ;
+C 249 ; WX 500 ; N oslash ; B -3 -119 441 560 ;
+C 250 ; WX 722 ; N oe ; B 6 -13 674 462 ;
+C 251 ; WX 500 ; N germandbls ; B -200 -200 473 705 ;
+C -1 ; WX 444 ; N ecircumflex ; B 5 -13 423 690 ;
+C -1 ; WX 444 ; N edieresis ; B 5 -13 443 655 ;
+C -1 ; WX 500 ; N aacute ; B -21 -14 463 697 ;
+C -1 ; WX 747 ; N registered ; B 30 -18 718 685 ;
+C -1 ; WX 278 ; N icircumflex ; B -2 -9 325 690 ;
+C -1 ; WX 556 ; N udieresis ; B 15 -9 494 655 ;
+C -1 ; WX 500 ; N ograve ; B -3 -13 441 697 ;
+C -1 ; WX 556 ; N uacute ; B 15 -9 492 697 ;
+C -1 ; WX 556 ; N ucircumflex ; B 15 -9 492 690 ;
+C -1 ; WX 667 ; N Aacute ; B -67 0 593 904 ;
+C -1 ; WX 278 ; N igrave ; B 2 -9 260 697 ;
+C -1 ; WX 389 ; N Icircumflex ; B -32 0 420 897 ;
+C -1 ; WX 444 ; N ccedilla ; B -25 -218 392 462 ;
+C -1 ; WX 500 ; N adieresis ; B -21 -14 471 655 ;
+C -1 ; WX 667 ; N Ecircumflex ; B -27 0 653 897 ;
+C -1 ; WX 389 ; N scaron ; B -19 -13 439 690 ;
+C -1 ; WX 500 ; N thorn ; B -120 -205 446 699 ;
+C -1 ; WX 1000 ; N trademark ; B 32 263 968 669 ;
+C -1 ; WX 444 ; N egrave ; B 5 -13 398 697 ;
+C -1 ; WX 300 ; N threesuperior ; B 17 265 321 683 ;
+C -1 ; WX 389 ; N zcaron ; B -43 -78 424 690 ;
+C -1 ; WX 500 ; N atilde ; B -21 -14 491 655 ;
+C -1 ; WX 500 ; N aring ; B -21 -14 455 729 ;
+C -1 ; WX 500 ; N ocircumflex ; B -3 -13 451 690 ;
+C -1 ; WX 667 ; N Edieresis ; B -27 0 653 862 ;
+C -1 ; WX 750 ; N threequarters ; B 7 -14 726 683 ;
+C -1 ; WX 444 ; N ydieresis ; B -94 -205 438 655 ;
+C -1 ; WX 444 ; N yacute ; B -94 -205 435 697 ;
+C -1 ; WX 278 ; N iacute ; B 2 -9 352 697 ;
+C -1 ; WX 667 ; N Acircumflex ; B -67 0 593 897 ;
+C -1 ; WX 722 ; N Uacute ; B 67 -18 744 904 ;
+C -1 ; WX 444 ; N eacute ; B 5 -13 435 697 ;
+C -1 ; WX 722 ; N Ograve ; B 27 -18 691 904 ;
+C -1 ; WX 500 ; N agrave ; B -21 -14 455 697 ;
+C -1 ; WX 722 ; N Udieresis ; B 67 -18 744 862 ;
+C -1 ; WX 500 ; N acircumflex ; B -21 -14 455 690 ;
+C -1 ; WX 389 ; N Igrave ; B -32 0 406 904 ;
+C -1 ; WX 300 ; N twosuperior ; B 2 274 313 683 ;
+C -1 ; WX 722 ; N Ugrave ; B 67 -18 744 904 ;
+C -1 ; WX 750 ; N onequarter ; B 7 -14 721 683 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 67 -18 744 897 ;
+C -1 ; WX 556 ; N Scaron ; B 2 -18 526 897 ;
+C -1 ; WX 389 ; N Idieresis ; B -32 0 445 862 ;
+C -1 ; WX 278 ; N idieresis ; B 2 -9 360 655 ;
+C -1 ; WX 667 ; N Egrave ; B -27 0 653 904 ;
+C -1 ; WX 722 ; N Oacute ; B 27 -18 691 904 ;
+C -1 ; WX 570 ; N divide ; B 33 -29 537 535 ;
+C -1 ; WX 667 ; N Atilde ; B -67 0 593 862 ;
+C -1 ; WX 667 ; N Aring ; B -67 0 593 921 ;
+C -1 ; WX 722 ; N Odieresis ; B 27 -18 691 862 ;
+C -1 ; WX 667 ; N Adieresis ; B -67 0 593 862 ;
+C -1 ; WX 722 ; N Ntilde ; B -27 -15 748 862 ;
+C -1 ; WX 611 ; N Zcaron ; B -11 0 590 897 ;
+C -1 ; WX 611 ; N Thorn ; B -27 0 573 669 ;
+C -1 ; WX 389 ; N Iacute ; B -32 0 412 904 ;
+C -1 ; WX 570 ; N plusminus ; B 33 0 537 506 ;
+C -1 ; WX 570 ; N multiply ; B 48 16 522 490 ;
+C -1 ; WX 667 ; N Eacute ; B -27 0 653 904 ;
+C -1 ; WX 611 ; N Ydieresis ; B 73 0 659 862 ;
+C -1 ; WX 300 ; N onesuperior ; B 30 274 301 683 ;
+C -1 ; WX 556 ; N ugrave ; B 15 -9 492 697 ;
+C -1 ; WX 606 ; N logicalnot ; B 51 108 555 399 ;
+C -1 ; WX 556 ; N ntilde ; B -6 -9 504 655 ;
+C -1 ; WX 722 ; N Otilde ; B 27 -18 691 862 ;
+C -1 ; WX 500 ; N otilde ; B -3 -13 491 655 ;
+C -1 ; WX 667 ; N Ccedilla ; B 32 -218 677 685 ;
+C -1 ; WX 667 ; N Agrave ; B -67 0 593 904 ;
+C -1 ; WX 750 ; N onehalf ; B -9 -14 723 683 ;
+C -1 ; WX 722 ; N Eth ; B -31 0 700 669 ;
+C -1 ; WX 400 ; N degree ; B 83 397 369 683 ;
+C -1 ; WX 611 ; N Yacute ; B 73 0 659 904 ;
+C -1 ; WX 722 ; N Ocircumflex ; B 27 -18 691 897 ;
+C -1 ; WX 500 ; N oacute ; B -3 -13 463 697 ;
+C -1 ; WX 576 ; N mu ; B -60 -207 516 449 ;
+C -1 ; WX 606 ; N minus ; B 51 209 555 297 ;
+C -1 ; WX 500 ; N eth ; B -3 -13 454 699 ;
+C -1 ; WX 500 ; N odieresis ; B -3 -13 466 655 ;
+C -1 ; WX 747 ; N copyright ; B 30 -18 718 685 ;
+C -1 ; WX 220 ; N brokenbar ; B 66 -18 154 685 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 170
+
+KPX A y -74
+KPX A w -74
+KPX A v -74
+KPX A u -30
+KPX A quoteright -74
+KPX A Y -70
+KPX A W -100
+KPX A V -95
+KPX A U -50
+KPX A T -55
+KPX A Q -55
+KPX A O -50
+KPX A G -60
+KPX A C -65
+
+KPX B U -10
+KPX B A -25
+
+KPX D Y -50
+KPX D W -40
+KPX D V -50
+KPX D A -25
+
+KPX F r -50
+KPX F period -129
+KPX F o -70
+KPX F i -40
+KPX F e -100
+KPX F comma -129
+KPX F a -95
+KPX F A -100
+
+KPX J u -40
+KPX J period -10
+KPX J o -40
+KPX J e -40
+KPX J comma -10
+KPX J a -40
+KPX J A -25
+
+KPX K y -20
+KPX K u -20
+KPX K o -25
+KPX K e -25
+KPX K O -30
+
+KPX L y -37
+KPX L quoteright -55
+KPX L Y -37
+KPX L W -37
+KPX L V -37
+KPX L T -18
+
+KPX N A -30
+
+KPX O Y -50
+KPX O X -40
+KPX O W -50
+KPX O V -50
+KPX O T -40
+KPX O A -40
+
+KPX P period -129
+KPX P o -55
+KPX P e -50
+KPX P comma -129
+KPX P a -40
+KPX P A -85
+
+KPX Q U -10
+
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R U -40
+KPX R T -30
+KPX R O -40
+
+KPX T y -37
+KPX T w -37
+KPX T u -37
+KPX T semicolon -74
+KPX T r -37
+KPX T period -92
+KPX T o -95
+KPX T i -37
+KPX T hyphen -92
+KPX T e -92
+KPX T comma -92
+KPX T colon -74
+KPX T a -92
+KPX T O -18
+KPX T A -55
+
+KPX U A -45
+
+KPX V u -55
+KPX V semicolon -74
+KPX V period -129
+KPX V o -111
+KPX V i -55
+KPX V hyphen -70
+KPX V e -111
+KPX V comma -129
+KPX V colon -74
+KPX V a -111
+KPX V O -30
+KPX V G -10
+KPX V A -85
+
+KPX W y -55
+KPX W u -55
+KPX W semicolon -55
+KPX W period -74
+KPX W o -80
+KPX W i -37
+KPX W hyphen -50
+KPX W e -90
+KPX W comma -74
+KPX W colon -55
+KPX W a -85
+KPX W O -15
+KPX W A -74
+
+KPX Y u -92
+KPX Y semicolon -92
+KPX Y period -74
+KPX Y o -111
+KPX Y i -55
+KPX Y hyphen -92
+KPX Y e -111
+KPX Y comma -92
+KPX Y colon -92
+KPX Y a -92
+KPX Y O -25
+KPX Y A -74
+
+KPX b u -20
+KPX b period -40
+KPX b b -10
+
+KPX c k -10
+KPX c h -10
+
+KPX comma quoteright -95
+KPX comma quotedblright -95
+
+KPX e b -10
+
+KPX f quoteright 55
+KPX f period -10
+KPX f o -10
+KPX f f -18
+KPX f e -10
+KPX f dotlessi -30
+KPX f comma -10
+
+KPX k o -10
+KPX k e -30
+
+KPX n v -40
+
+KPX o y -10
+KPX o x -10
+KPX o w -25
+KPX o v -15
+
+KPX period quoteright -95
+KPX period quotedblright -95
+
+KPX quoteleft quoteleft -74
+
+KPX quoteright v -15
+KPX quoteright t -37
+KPX quoteright space -74
+KPX quoteright s -74
+KPX quoteright r -15
+KPX quoteright quoteright -74
+KPX quoteright d -15
+
+KPX r period -65
+KPX r comma -65
+
+KPX space Y -70
+KPX space W -70
+KPX space V -70
+KPX space A -37
+
+KPX v period -37
+KPX v o -15
+KPX v e -15
+KPX v comma -37
+
+KPX w period -37
+KPX w o -15
+KPX w e -10
+KPX w comma -37
+KPX w a -10
+
+KPX x e -10
+
+KPX y period -37
+KPX y comma -37
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 172 207 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 187 207 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 167 207 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 172 207 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 157 192 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 167 207 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 172 207 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 187 207 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 187 207 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 172 207 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 33 207 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 53 207 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 48 207 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 33 207 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 210 207 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 200 207 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 230 207 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 215 207 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 200 207 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 215 207 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 112 207 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 210 207 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 230 207 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 230 207 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 200 207 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 154 207 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 169 207 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 139 207 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 84 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 84 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 74 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 74 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 84 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 84 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 56 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 56 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 46 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 46 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -42 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -37 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -37 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 97 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 84 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 69 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 74 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 84 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 28 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 112 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 112 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 97 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 102 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 56 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 41 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 13 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Ti-BdSC b/font/Ti-BdSC
new file mode 100644
index 0000000..3199d09
--- /dev/null
+++ b/font/Ti-BdSC
@@ -0,0 +1,570 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Dec  4 11:50:51 1990
+Comment UniqueID 33653
+Comment VMusage 30950 37842
+FontName Times-BoldSC
+FullName Times Bold Small Caps & Old Style Figures
+FamilyName Times
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -168 -218 1012 935
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Times is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 676
+XHeight 494
+Ascender 494
+Descender 0
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 81 -13 251 691 ;
+C 34 ; WX 555 ; N quotedbl ; B 83 404 472 691 ;
+C 35 ; WX 500 ; N numbersign ; B 4 0 496 700 ;
+C 36 ; WX 500 ; N dollar ; B 29 -99 472 750 ;
+C 37 ; WX 1000 ; N percent ; B 124 -14 877 692 ;
+C 38 ; WX 833 ; N ampersand ; B 62 -16 787 691 ;
+C 39 ; WX 333 ; N quoteright ; B 79 356 263 691 ;
+C 40 ; WX 333 ; N parenleft ; B 46 -168 306 694 ;
+C 41 ; WX 333 ; N parenright ; B 27 -168 287 694 ;
+C 42 ; WX 500 ; N asterisk ; B 56 255 447 691 ;
+C 43 ; WX 570 ; N plus ; B 33 0 537 506 ;
+C 44 ; WX 250 ; N comma ; B 39 -180 223 155 ;
+C 45 ; WX 333 ; N hyphen ; B 44 171 287 287 ;
+C 46 ; WX 250 ; N period ; B 41 -13 210 156 ;
+C 47 ; WX 278 ; N slash ; B -24 -19 302 691 ;
+C 48 ; WX 500 ; N zero ; B 20 -12 470 506 ;
+C 49 ; WX 500 ; N one ; B 70 0 420 494 ;
+C 50 ; WX 500 ; N two ; B 32 0 451 506 ;
+C 51 ; WX 500 ; N three ; B 16 -190 466 506 ;
+C 52 ; WX 500 ; N four ; B 20 -168 476 519 ;
+C 53 ; WX 500 ; N five ; B 16 -190 462 494 ;
+C 54 ; WX 500 ; N six ; B 26 -12 468 690 ;
+C 55 ; WX 500 ; N seven ; B 24 -174 476 494 ;
+C 56 ; WX 500 ; N eight ; B 26 -12 470 690 ;
+C 57 ; WX 500 ; N nine ; B 22 -190 464 506 ;
+C 58 ; WX 333 ; N colon ; B 82 -13 251 472 ;
+C 59 ; WX 333 ; N semicolon ; B 82 -180 266 472 ;
+C 60 ; WX 570 ; N less ; B 31 -8 539 514 ;
+C 61 ; WX 570 ; N equal ; B 33 107 537 399 ;
+C 62 ; WX 570 ; N greater ; B 31 -8 539 514 ;
+C 63 ; WX 500 ; N question ; B 57 -13 445 689 ;
+C 64 ; WX 930 ; N at ; B 108 -19 822 691 ;
+C 65 ; WX 722 ; N A ; B 9 0 689 690 ;
+C 66 ; WX 667 ; N B ; B 16 0 619 676 ;
+C 67 ; WX 722 ; N C ; B 49 -19 687 691 ;
+C 68 ; WX 722 ; N D ; B 14 0 690 676 ;
+C 69 ; WX 667 ; N E ; B 16 0 641 676 ;
+C 70 ; WX 611 ; N F ; B 16 0 583 676 ;
+C 71 ; WX 778 ; N G ; B 37 -19 755 691 ;
+C 72 ; WX 778 ; N H ; B 21 0 759 676 ;
+C 73 ; WX 389 ; N I ; B 20 0 370 676 ;
+C 74 ; WX 500 ; N J ; B 3 -96 479 676 ;
+C 75 ; WX 778 ; N K ; B 30 0 769 676 ;
+C 76 ; WX 667 ; N L ; B 19 0 638 676 ;
+C 77 ; WX 944 ; N M ; B 14 0 921 676 ;
+C 78 ; WX 722 ; N N ; B 16 -18 701 676 ;
+C 79 ; WX 778 ; N O ; B 35 -19 743 691 ;
+C 80 ; WX 611 ; N P ; B 16 0 600 676 ;
+C 81 ; WX 778 ; N Q ; B 35 -176 743 691 ;
+C 82 ; WX 722 ; N R ; B 26 0 715 676 ;
+C 83 ; WX 556 ; N S ; B 35 -19 513 692 ;
+C 84 ; WX 667 ; N T ; B 31 0 636 676 ;
+C 85 ; WX 722 ; N U ; B 16 -19 701 676 ;
+C 86 ; WX 722 ; N V ; B 16 -18 701 676 ;
+C 87 ; WX 1000 ; N W ; B 19 -15 981 676 ;
+C 88 ; WX 722 ; N X ; B 16 0 699 676 ;
+C 89 ; WX 722 ; N Y ; B 15 0 699 676 ;
+C 90 ; WX 667 ; N Z ; B 28 0 634 676 ;
+C 91 ; WX 333 ; N bracketleft ; B 67 -149 301 678 ;
+C 92 ; WX 278 ; N backslash ; B -25 -19 303 691 ;
+C 93 ; WX 333 ; N bracketright ; B 32 -149 266 678 ;
+C 94 ; WX 581 ; N asciicircum ; B 73 311 509 676 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 333 ; N quoteleft ; B 70 356 254 691 ;
+C 97 ; WX 556 ; N a ; B 16 0 530 506 ;
+C 98 ; WX 556 ; N b ; B 20 0 512 494 ;
+C 99 ; WX 556 ; N c ; B 26 -12 513 506 ;
+C 100 ; WX 611 ; N d ; B 20 0 568 494 ;
+C 101 ; WX 556 ; N e ; B 19 0 509 494 ;
+C 102 ; WX 500 ; N f ; B 16 0 462 494 ; L i fi ; L l fl ;
+C 103 ; WX 611 ; N g ; B 32 -12 563 509 ;
+C 104 ; WX 611 ; N h ; B 14 0 589 494 ;
+C 105 ; WX 333 ; N i ; B 28 0 301 494 ;
+C 106 ; WX 444 ; N j ; B 14 -80 412 494 ;
+C 107 ; WX 611 ; N k ; B 16 0 590 494 ;
+C 108 ; WX 556 ; N l ; B 18 0 512 494 ;
+C 109 ; WX 722 ; N m ; B 14 0 699 494 ;
+C 110 ; WX 556 ; N n ; B 14 -12 530 494 ;
+C 111 ; WX 611 ; N o ; B 30 -12 572 506 ;
+C 112 ; WX 500 ; N p ; B 16 0 484 494 ;
+C 113 ; WX 611 ; N q ; B 30 -170 572 506 ;
+C 114 ; WX 611 ; N r ; B 22 0 590 494 ;
+C 115 ; WX 444 ; N s ; B 30 -12 408 506 ;
+C 116 ; WX 556 ; N t ; B 22 0 524 494 ;
+C 117 ; WX 611 ; N u ; B 21 -12 579 494 ;
+C 118 ; WX 556 ; N v ; B 16 -12 530 494 ;
+C 119 ; WX 778 ; N w ; B 8 -12 752 494 ;
+C 120 ; WX 556 ; N x ; B 16 0 534 494 ;
+C 121 ; WX 556 ; N y ; B 16 0 532 494 ;
+C 122 ; WX 500 ; N z ; B 14 0 468 494 ;
+C 123 ; WX 394 ; N braceleft ; B 22 -175 340 698 ;
+C 124 ; WX 220 ; N bar ; B 66 -19 154 691 ;
+C 125 ; WX 394 ; N braceright ; B 54 -175 372 698 ;
+C 126 ; WX 520 ; N asciitilde ; B 29 173 491 333 ;
+C 161 ; WX 333 ; N exclamdown ; B 82 -203 252 501 ;
+C 162 ; WX 500 ; N cent ; B 53 -140 458 588 ;
+C 163 ; WX 500 ; N sterling ; B 21 -14 477 684 ;
+C 164 ; WX 167 ; N fraction ; B -168 -12 329 688 ;
+C 165 ; WX 500 ; N yen ; B -64 0 547 676 ;
+C 166 ; WX 500 ; N florin ; B 0 -155 498 706 ;
+C 167 ; WX 500 ; N section ; B 57 -132 443 691 ;
+C 168 ; WX 667 ; N currency ; B 34 -12 624 512 ;
+C 169 ; WX 278 ; N quotesingle ; B 75 404 204 691 ;
+C 170 ; WX 500 ; N quotedblleft ; B 32 356 486 691 ;
+C 171 ; WX 500 ; N guillemotleft ; B 23 36 473 415 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 51 36 305 415 ;
+C 173 ; WX 333 ; N guilsinglright ; B 28 36 282 415 ;
+C 174 ; WX 833 ; N fi ; B 16 0 801 494 ;
+C 175 ; WX 1056 ; N fl ; B 16 0 1012 494 ;
+C 177 ; WX 500 ; N endash ; B 0 181 500 271 ;
+C 178 ; WX 500 ; N dagger ; B 47 -134 453 691 ;
+C 179 ; WX 500 ; N daggerdbl ; B 45 -132 456 691 ;
+C 180 ; WX 250 ; N periodcentered ; B 41 248 210 417 ;
+C 182 ; WX 540 ; N paragraph ; B 0 -186 519 676 ;
+C 183 ; WX 350 ; N bullet ; B 35 198 315 478 ;
+C 184 ; WX 333 ; N quotesinglbase ; B 79 -180 263 155 ;
+C 185 ; WX 500 ; N quotedblbase ; B 14 -180 468 155 ;
+C 186 ; WX 500 ; N quotedblright ; B 14 356 468 691 ;
+C 187 ; WX 500 ; N guillemotright ; B 27 36 477 415 ;
+C 188 ; WX 1000 ; N ellipsis ; B 82 -13 917 156 ;
+C 189 ; WX 1000 ; N perthousand ; B 7 -29 995 706 ;
+C 191 ; WX 500 ; N questiondown ; B 55 -201 443 501 ;
+C 193 ; WX 333 ; N grave ; B 8 561 246 746 ;
+C 194 ; WX 333 ; N acute ; B 86 561 324 746 ;
+C 195 ; WX 333 ; N circumflex ; B -2 561 335 737 ;
+C 196 ; WX 333 ; N tilde ; B -16 580 349 707 ;
+C 197 ; WX 333 ; N macron ; B 1 598 331 670 ;
+C 198 ; WX 333 ; N breve ; B 15 561 318 724 ;
+C 199 ; WX 333 ; N dotaccent ; B 103 570 230 700 ;
+C 200 ; WX 333 ; N dieresis ; B -2 570 335 700 ;
+C 202 ; WX 333 ; N ring ; B 60 560 273 773 ;
+C 203 ; WX 333 ; N cedilla ; B 68 -218 294 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -13 561 425 746 ;
+C 206 ; WX 333 ; N ogonek ; B 90 -173 319 44 ;
+C 207 ; WX 333 ; N caron ; B -2 561 335 737 ;
+C 208 ; WX 1000 ; N emdash ; B 125 181 875 271 ;
+C 225 ; WX 1000 ; N AE ; B 4 0 951 676 ;
+C 227 ; WX 300 ; N ordfeminine ; B -1 397 301 688 ;
+C 232 ; WX 667 ; N Lslash ; B 19 0 638 676 ;
+C 233 ; WX 778 ; N Oslash ; B 35 -74 743 737 ;
+C 234 ; WX 1000 ; N OE ; B 22 -5 981 684 ;
+C 235 ; WX 330 ; N ordmasculine ; B 18 397 312 688 ;
+C 241 ; WX 778 ; N ae ; B 14 0 745 494 ;
+C 245 ; WX 333 ; N dotlessi ; B 28 0 301 494 ;
+C 248 ; WX 556 ; N lslash ; B -4 0 512 494 ;
+C 249 ; WX 611 ; N oslash ; B 30 -92 572 569 ;
+C 250 ; WX 833 ; N oe ; B 32 -8 798 502 ;
+C 251 ; WX 888 ; N germandbls ; B 30 -12 852 506 ;
+C -1 ; WX 556 ; N ecircumflex ; B 19 0 509 737 ;
+C -1 ; WX 556 ; N edieresis ; B 19 0 509 700 ;
+C -1 ; WX 556 ; N aacute ; B 16 0 530 746 ;
+C -1 ; WX 747 ; N registered ; B 26 -19 721 691 ;
+C -1 ; WX 333 ; N icircumflex ; B -9 0 328 737 ;
+C -1 ; WX 611 ; N udieresis ; B 21 -12 579 700 ;
+C -1 ; WX 611 ; N ograve ; B 30 -12 572 746 ;
+C -1 ; WX 611 ; N uacute ; B 21 -12 579 746 ;
+C -1 ; WX 611 ; N ucircumflex ; B 21 -12 579 737 ;
+C -1 ; WX 722 ; N Aacute ; B 9 0 689 923 ;
+C -1 ; WX 333 ; N igrave ; B 1 0 301 746 ;
+C -1 ; WX 389 ; N Icircumflex ; B 20 0 370 914 ;
+C -1 ; WX 556 ; N ccedilla ; B 26 -218 513 506 ;
+C -1 ; WX 556 ; N adieresis ; B 16 0 530 700 ;
+C -1 ; WX 667 ; N Ecircumflex ; B 16 0 641 914 ;
+C -1 ; WX 444 ; N scaron ; B 30 -12 408 737 ;
+C -1 ; WX 500 ; N thorn ; B 28 0 514 494 ;
+C -1 ; WX 1000 ; N trademark ; B 24 271 977 676 ;
+C -1 ; WX 556 ; N egrave ; B 19 0 509 746 ;
+C -1 ; WX 300 ; N threesuperior ; B 3 268 297 688 ;
+C -1 ; WX 500 ; N zcaron ; B 14 0 468 737 ;
+C -1 ; WX 556 ; N atilde ; B 16 0 530 707 ;
+C -1 ; WX 556 ; N aring ; B 16 0 530 773 ;
+C -1 ; WX 611 ; N ocircumflex ; B 30 -12 572 737 ;
+C -1 ; WX 667 ; N Edieresis ; B 16 0 641 877 ;
+C -1 ; WX 750 ; N threequarters ; B 23 -12 733 688 ;
+C -1 ; WX 556 ; N ydieresis ; B 16 0 532 700 ;
+C -1 ; WX 556 ; N yacute ; B 16 0 532 746 ;
+C -1 ; WX 333 ; N iacute ; B 28 0 317 746 ;
+C -1 ; WX 722 ; N Acircumflex ; B 9 0 689 914 ;
+C -1 ; WX 722 ; N Uacute ; B 16 -19 701 923 ;
+C -1 ; WX 556 ; N eacute ; B 19 0 509 746 ;
+C -1 ; WX 778 ; N Ograve ; B 35 -19 743 923 ;
+C -1 ; WX 556 ; N agrave ; B 16 0 530 746 ;
+C -1 ; WX 722 ; N Udieresis ; B 16 -19 701 877 ;
+C -1 ; WX 556 ; N acircumflex ; B 16 0 530 737 ;
+C -1 ; WX 389 ; N Igrave ; B 20 0 370 923 ;
+C -1 ; WX 300 ; N twosuperior ; B 0 275 300 688 ;
+C -1 ; WX 722 ; N Ugrave ; B 16 -19 701 923 ;
+C -1 ; WX 750 ; N onequarter ; B 28 -12 743 688 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 16 -19 701 914 ;
+C -1 ; WX 556 ; N Scaron ; B 35 -19 513 914 ;
+C -1 ; WX 389 ; N Idieresis ; B 20 0 370 877 ;
+C -1 ; WX 333 ; N idieresis ; B -9 0 328 700 ;
+C -1 ; WX 667 ; N Egrave ; B 16 0 641 923 ;
+C -1 ; WX 778 ; N Oacute ; B 35 -19 743 923 ;
+C -1 ; WX 570 ; N divide ; B 33 -31 537 537 ;
+C -1 ; WX 722 ; N Atilde ; B 9 0 689 884 ;
+C -1 ; WX 722 ; N Aring ; B 9 0 689 935 ;
+C -1 ; WX 778 ; N Odieresis ; B 35 -19 743 877 ;
+C -1 ; WX 722 ; N Adieresis ; B 9 0 689 877 ;
+C -1 ; WX 722 ; N Ntilde ; B 16 -18 701 884 ;
+C -1 ; WX 667 ; N Zcaron ; B 28 0 634 914 ;
+C -1 ; WX 611 ; N Thorn ; B 16 0 600 676 ;
+C -1 ; WX 389 ; N Iacute ; B 20 0 370 923 ;
+C -1 ; WX 570 ; N plusminus ; B 33 0 537 506 ;
+C -1 ; WX 570 ; N multiply ; B 48 16 522 490 ;
+C -1 ; WX 667 ; N Eacute ; B 16 0 641 923 ;
+C -1 ; WX 722 ; N Ydieresis ; B 15 0 699 877 ;
+C -1 ; WX 300 ; N onesuperior ; B 28 275 273 688 ;
+C -1 ; WX 611 ; N ugrave ; B 21 -12 579 746 ;
+C -1 ; WX 570 ; N logicalnot ; B 33 108 537 399 ;
+C -1 ; WX 556 ; N ntilde ; B 14 -12 530 707 ;
+C -1 ; WX 778 ; N Otilde ; B 35 -19 743 884 ;
+C -1 ; WX 611 ; N otilde ; B 30 -12 572 707 ;
+C -1 ; WX 722 ; N Ccedilla ; B 49 -218 687 691 ;
+C -1 ; WX 722 ; N Agrave ; B 9 0 689 923 ;
+C -1 ; WX 750 ; N onehalf ; B -7 -12 775 688 ;
+C -1 ; WX 722 ; N Eth ; B 6 0 690 676 ;
+C -1 ; WX 400 ; N degree ; B 57 402 343 688 ;
+C -1 ; WX 722 ; N Yacute ; B 15 0 699 928 ;
+C -1 ; WX 778 ; N Ocircumflex ; B 35 -19 743 914 ;
+C -1 ; WX 611 ; N oacute ; B 30 -12 572 746 ;
+C -1 ; WX 556 ; N mu ; B 33 -206 536 461 ;
+C -1 ; WX 570 ; N minus ; B 33 209 537 297 ;
+C -1 ; WX 611 ; N eth ; B 14 0 568 494 ;
+C -1 ; WX 611 ; N odieresis ; B 30 -12 572 700 ;
+C -1 ; WX 747 ; N copyright ; B 26 -19 721 691 ;
+C -1 ; WX 220 ; N brokenbar ; B 66 -19 154 691 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 213
+
+KPX A y -74
+KPX A w -90
+KPX A v -100
+KPX A u -50
+KPX A t -37
+KPX A quoteright -74
+KPX A q -18
+KPX A o -18
+KPX A g -18
+KPX A c -18
+KPX A Y -100
+KPX A W -130
+KPX A V -145
+KPX A U -50
+KPX A T -95
+KPX A Q -45
+KPX A O -45
+KPX A G -45
+KPX A C -45
+
+KPX B a -18
+KPX B U -10
+KPX B A -30
+
+KPX C a -18
+
+KPX D period -20
+KPX D a -37
+KPX D Y -40
+KPX D W -40
+KPX D V -40
+KPX D A -35
+
+KPX F period -110
+KPX F o -25
+KPX F j -18
+KPX F e -25
+KPX F comma -92
+KPX F a -55
+KPX F J -18
+KPX F A -72
+
+KPX J u -15
+KPX J period -20
+KPX J o -15
+KPX J a -15
+KPX J A -30
+
+KPX K y -45
+KPX K u -15
+KPX K o -25
+KPX K O -30
+
+KPX L y -55
+KPX L w -18
+KPX L v -18
+KPX L t -18
+KPX L quoteright -110
+KPX L quotedblright -20
+KPX L Y -92
+KPX L W -92
+KPX L V -92
+KPX L T -92
+
+KPX N A -20
+
+KPX O a -18
+KPX O Y -37
+KPX O X -40
+KPX O W -37
+KPX O V -37
+KPX O T -37
+KPX O A -40
+
+KPX P period -110
+KPX P comma -92
+KPX P a -55
+KPX P A -55
+
+KPX Q period -20
+KPX Q U -10
+
+KPX R Y -35
+KPX R W -35
+KPX R V -55
+KPX R U -18
+KPX R T -40
+
+KPX S V -18
+
+KPX T y -74
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T r -55
+KPX T period -90
+KPX T o -55
+KPX T j -37
+KPX T i -18
+KPX T hyphen -92
+KPX T e -37
+KPX T comma -74
+KPX T colon -74
+KPX T a -92
+KPX T J -18
+KPX T A -74
+
+KPX U period -50
+KPX U comma -50
+KPX U a -37
+KPX U A -60
+
+KPX V u -92
+KPX V semicolon -92
+KPX V period -145
+KPX V o -74
+KPX V i -37
+KPX V hyphen -74
+KPX V g -74
+KPX V e -100
+KPX V comma -129
+KPX V colon -92
+KPX V a -142
+KPX V O -45
+KPX V G -45
+KPX V A -135
+
+KPX W y -60
+KPX W u -50
+KPX W semicolon -55
+KPX W period -92
+KPX W o -75
+KPX W i -37
+KPX W hyphen -37
+KPX W h -37
+KPX W e -55
+KPX W comma -92
+KPX W colon -55
+KPX W a -111
+KPX W O -18
+KPX W A -120
+
+KPX Y u -92
+KPX Y semicolon -92
+KPX Y s -55
+KPX Y period -92
+KPX Y o -111
+KPX Y i -55
+KPX Y hyphen -92
+KPX Y e -92
+KPX Y comma -92
+KPX Y colon -92
+KPX Y c -37
+KPX Y a -111
+KPX Y O -35
+KPX Y C -35
+KPX Y A -110
+
+KPX a y -74
+KPX a w -74
+KPX a v -74
+KPX a u -18
+KPX a t -37
+KPX a quoteright -37
+KPX a o -18
+KPX a g -18
+KPX a c -18
+
+KPX b u -20
+KPX b period -40
+
+KPX c a -18
+
+KPX comma quoteright -55
+KPX comma quotedblright -45
+
+KPX d y -18
+KPX d w -15
+KPX d v -18
+KPX d a -18
+
+KPX f period -37
+KPX f comma -37
+KPX f a -55
+
+KPX g period -15
+
+KPX j a -18
+
+KPX k o -15
+
+KPX l y -37
+KPX l w -37
+KPX l t -18
+KPX l quoteright -55
+
+KPX n a -18
+
+KPX o y -18
+KPX o w -18
+KPX o v -18
+KPX o a -18
+
+KPX p period -37
+KPX p comma -37
+KPX p a -18
+
+KPX period quoteright -55
+KPX period quotedblright -55
+
+KPX quotedblleft A -10
+
+KPX quoteleft quoteleft -63
+KPX quoteleft A -10
+
+KPX quoteright quoteright -63
+
+KPX r y -18
+KPX r v -10
+KPX r q -18
+KPX r o -18
+KPX r hyphen -37
+
+KPX space Y -55
+KPX space W -30
+KPX space V -45
+KPX space T -30
+KPX space A -55
+
+KPX t period -37
+KPX t j -18
+KPX t hyphen -37
+KPX t comma -37
+KPX t a -18
+
+KPX u a -37
+
+KPX v period -70
+KPX v o -37
+KPX v hyphen -37
+KPX v g -37
+KPX v comma -55
+KPX v a -74
+
+KPX w period -70
+KPX w o -37
+KPX w hyphen -37
+KPX w comma -55
+KPX w a -74
+
+KPX y period -70
+KPX y o -25
+KPX y hyphen -37
+KPX y comma -55
+KPX y a -74
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 188 177 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 188 177 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 188 177 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 188 177 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 180 162 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 188 177 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 174 177 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 174 177 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 174 177 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 174 177 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 28 177 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 28 177 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 28 177 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 177 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 195 177 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 223 177 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 223 177 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 223 177 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 223 177 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 223 177 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 112 177 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 222 177 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 222 177 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 222 177 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 222 177 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 210 182 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 215 177 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 167 177 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 105 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 105 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 105 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 105 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 105 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 105 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 118 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 118 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 118 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 118 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -7 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -7 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -7 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -7 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 112 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 139 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 139 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 139 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 139 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 139 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 56 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 132 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 132 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 132 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 132 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 112 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 112 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 84 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Ti-ExBd b/font/Ti-ExBd
new file mode 100644
index 0000000..49cf056
--- /dev/null
+++ b/font/Ti-ExBd
@@ -0,0 +1,420 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Oct 29 15:49:23 1990
+Comment UniqueID 33198
+Comment VMusage 29419 36311
+FontName Times-ExtraBold
+FullName Times Extra Bold
+FamilyName Times
+Weight ExtraBold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -167 -224 1032 972
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.Times is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 712
+XHeight 488
+Ascender 712
+Descender -166
+StartCharMetrics 228
+C 32 ; WX 259 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 42 -12 236 724 ;
+C 34 ; WX 333 ; N quotedbl ; B 25 408 308 724 ;
+C 35 ; WX 519 ; N numbersign ; B 8 0 512 712 ;
+C 36 ; WX 519 ; N dollar ; B 12 -105 494 784 ;
+C 37 ; WX 833 ; N percent ; B 40 -12 793 724 ;
+C 38 ; WX 722 ; N ampersand ; B 16 -12 727 724 ;
+C 39 ; WX 259 ; N quoteright ; B 19 338 239 724 ;
+C 40 ; WX 370 ; N parenleft ; B 40 -166 364 724 ;
+C 41 ; WX 370 ; N parenright ; B 6 -166 330 724 ;
+C 42 ; WX 481 ; N asterisk ; B 38 280 442 724 ;
+C 43 ; WX 600 ; N plus ; B 56 0 544 488 ;
+C 44 ; WX 259 ; N comma ; B 18 -200 238 186 ;
+C 45 ; WX 333 ; N hyphen ; B 36 184 297 304 ;
+C 46 ; WX 259 ; N period ; B 28 -12 232 192 ;
+C 47 ; WX 278 ; N slash ; B -30 -12 308 724 ;
+C 48 ; WX 519 ; N zero ; B 24 -12 496 724 ;
+C 49 ; WX 407 ; N one ; B -10 0 390 728 ;
+C 50 ; WX 500 ; N two ; B -16 0 490 724 ;
+C 51 ; WX 519 ; N three ; B -14 -12 488 724 ;
+C 52 ; WX 519 ; N four ; B 0 0 519 712 ;
+C 53 ; WX 500 ; N five ; B 14 -12 472 712 ;
+C 54 ; WX 519 ; N six ; B 14 -12 510 724 ;
+C 55 ; WX 444 ; N seven ; B 6 0 470 712 ;
+C 56 ; WX 500 ; N eight ; B 20 -12 477 724 ;
+C 57 ; WX 519 ; N nine ; B 12 -12 508 724 ;
+C 58 ; WX 259 ; N colon ; B 28 -12 232 500 ;
+C 59 ; WX 259 ; N semicolon ; B 18 -200 238 500 ;
+C 60 ; WX 600 ; N less ; B 44 -8 534 496 ;
+C 61 ; WX 600 ; N equal ; B 56 82 544 406 ;
+C 62 ; WX 600 ; N greater ; B 66 -8 556 496 ;
+C 63 ; WX 444 ; N question ; B 19 -12 424 724 ;
+C 64 ; WX 800 ; N at ; B 36 -12 764 724 ;
+C 65 ; WX 630 ; N A ; B -42 0 656 712 ;
+C 66 ; WX 722 ; N B ; B 0 0 664 712 ;
+C 67 ; WX 685 ; N C ; B 32 -12 640 724 ;
+C 68 ; WX 778 ; N D ; B 0 0 754 712 ;
+C 69 ; WX 722 ; N E ; B 10 0 675 712 ;
+C 70 ; WX 630 ; N F ; B 0 0 618 712 ;
+C 71 ; WX 722 ; N G ; B 20 -12 734 724 ;
+C 72 ; WX 852 ; N H ; B 1 0 851 712 ;
+C 73 ; WX 407 ; N I ; B 0 0 407 712 ;
+C 74 ; WX 537 ; N J ; B -4 -12 550 712 ;
+C 75 ; WX 741 ; N K ; B -4 0 790 712 ;
+C 76 ; WX 611 ; N L ; B 0 0 611 712 ;
+C 77 ; WX 981 ; N M ; B -2 0 983 712 ;
+C 78 ; WX 778 ; N N ; B -2 0 780 712 ;
+C 79 ; WX 815 ; N O ; B 20 -12 796 724 ;
+C 80 ; WX 648 ; N P ; B -2 0 650 712 ;
+C 81 ; WX 815 ; N Q ; B 20 -178 796 724 ;
+C 82 ; WX 741 ; N R ; B 0 0 778 712 ;
+C 83 ; WX 611 ; N S ; B 28 -12 594 724 ;
+C 84 ; WX 704 ; N T ; B 28 0 676 712 ;
+C 85 ; WX 741 ; N U ; B -10 -12 740 712 ;
+C 86 ; WX 630 ; N V ; B -38 -12 682 712 ;
+C 87 ; WX 1000 ; N W ; B -32 -12 1032 712 ;
+C 88 ; WX 685 ; N X ; B -8 0 708 712 ;
+C 89 ; WX 648 ; N Y ; B -44 0 664 712 ;
+C 90 ; WX 648 ; N Z ; B -9 0 650 712 ;
+C 91 ; WX 315 ; N bracketleft ; B 50 -166 272 712 ;
+C 92 ; WX 278 ; N backslash ; B -74 -12 352 724 ;
+C 93 ; WX 315 ; N bracketright ; B 43 -166 265 712 ;
+C 94 ; WX 600 ; N asciicircum ; B 73 346 527 712 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 259 ; N quoteleft ; B 20 338 240 724 ;
+C 97 ; WX 519 ; N a ; B 16 -12 518 500 ;
+C 98 ; WX 556 ; N b ; B -12 -12 524 712 ;
+C 99 ; WX 463 ; N c ; B 14 -12 476 500 ;
+C 100 ; WX 574 ; N d ; B 32 -12 566 712 ;
+C 101 ; WX 481 ; N e ; B 14 -12 468 500 ;
+C 102 ; WX 333 ; N f ; B 12 0 414 724 ; L i fi ; L l fl ;
+C 103 ; WX 519 ; N g ; B 24 -166 516 500 ;
+C 104 ; WX 593 ; N h ; B 12 0 582 712 ;
+C 105 ; WX 315 ; N i ; B 13 0 303 724 ;
+C 106 ; WX 315 ; N j ; B -95 -178 252 724 ;
+C 107 ; WX 574 ; N k ; B 13 0 601 712 ;
+C 108 ; WX 315 ; N l ; B 13 0 303 712 ;
+C 109 ; WX 852 ; N m ; B 12 0 840 500 ;
+C 110 ; WX 593 ; N n ; B 12 0 582 500 ;
+C 111 ; WX 537 ; N o ; B 15 -12 523 500 ;
+C 112 ; WX 574 ; N p ; B -2 -166 542 500 ;
+C 113 ; WX 556 ; N q ; B 32 -166 573 500 ;
+C 114 ; WX 426 ; N r ; B 14 0 436 500 ;
+C 115 ; WX 426 ; N s ; B 26 -12 410 500 ;
+C 116 ; WX 352 ; N t ; B 12 -12 352 658 ;
+C 117 ; WX 593 ; N u ; B 12 -12 582 488 ;
+C 118 ; WX 426 ; N v ; B -16 -12 442 488 ;
+C 119 ; WX 685 ; N w ; B -16 -12 700 488 ;
+C 120 ; WX 500 ; N x ; B -31 0 531 488 ;
+C 121 ; WX 444 ; N y ; B -30 -166 466 488 ;
+C 122 ; WX 444 ; N z ; B 8 0 436 488 ;
+C 123 ; WX 370 ; N braceleft ; B 43 -166 348 724 ;
+C 124 ; WX 222 ; N bar ; B 51 0 171 712 ;
+C 125 ; WX 370 ; N braceright ; B 22 -166 327 724 ;
+C 126 ; WX 600 ; N asciitilde ; B 68 154 531 334 ;
+C 161 ; WX 278 ; N exclamdown ; B 42 -178 236 558 ;
+C 162 ; WX 519 ; N cent ; B 29 -112 491 598 ;
+C 163 ; WX 519 ; N sterling ; B 20 -12 522 724 ;
+C 164 ; WX 167 ; N fraction ; B -167 -12 334 724 ;
+C 165 ; WX 519 ; N yen ; B -102 0 606 712 ;
+C 166 ; WX 519 ; N florin ; B -2 -178 512 724 ;
+C 167 ; WX 519 ; N section ; B 16 -166 504 724 ;
+C 168 ; WX 519 ; N currency ; B -2 96 520 614 ;
+C 169 ; WX 222 ; N quotesingle ; B 59 408 163 724 ;
+C 170 ; WX 500 ; N quotedblleft ; B 11 338 490 724 ;
+C 171 ; WX 500 ; N guillemotleft ; B 30 55 475 433 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 53 55 303 433 ;
+C 173 ; WX 333 ; N guilsinglright ; B 30 55 280 433 ;
+C 174 ; WX 648 ; N fi ; B 21 0 627 724 ;
+C 175 ; WX 648 ; N fl ; B 21 0 628 724 ;
+C 177 ; WX 500 ; N endash ; B 0 198 500 290 ;
+C 178 ; WX 519 ; N dagger ; B 18 -166 500 724 ;
+C 179 ; WX 519 ; N daggerdbl ; B 18 -166 500 724 ;
+C 180 ; WX 259 ; N periodcentered ; B 28 142 232 346 ;
+C 182 ; WX 620 ; N paragraph ; B 40 -166 565 712 ;
+C 183 ; WX 500 ; N bullet ; B 72 178 428 534 ;
+C 184 ; WX 259 ; N quotesinglbase ; B 18 -200 238 186 ;
+C 185 ; WX 500 ; N quotedblbase ; B 10 -200 489 186 ;
+C 186 ; WX 500 ; N quotedblright ; B 10 338 489 724 ;
+C 187 ; WX 500 ; N guillemotright ; B 25 55 470 433 ;
+C 188 ; WX 1000 ; N ellipsis ; B 65 -12 935 192 ;
+C 189 ; WX 907 ; N perthousand ; B 22 -12 884 724 ;
+C 191 ; WX 444 ; N questiondown ; B 20 -178 425 558 ;
+C 193 ; WX 315 ; N grave ; B -6 556 240 746 ;
+C 194 ; WX 315 ; N acute ; B 75 556 321 746 ;
+C 195 ; WX 315 ; N circumflex ; B -18 556 333 734 ;
+C 196 ; WX 315 ; N tilde ; B -32 576 348 710 ;
+C 197 ; WX 315 ; N macron ; B -14 595 330 675 ;
+C 198 ; WX 315 ; N breve ; B 0 556 314 724 ;
+C 199 ; WX 315 ; N dotaccent ; B 87 563 227 703 ;
+C 200 ; WX 315 ; N dieresis ; B -20 563 336 703 ;
+C 202 ; WX 315 ; N ring ; B 50 556 266 772 ;
+C 203 ; WX 315 ; N cedilla ; B 24 -220 258 0 ;
+C 205 ; WX 315 ; N hungarumlaut ; B -30 556 414 746 ;
+C 206 ; WX 315 ; N ogonek ; B 16 -224 282 21 ;
+C 207 ; WX 315 ; N caron ; B -18 556 333 734 ;
+C 208 ; WX 1000 ; N emdash ; B 0 198 1000 290 ;
+C 225 ; WX 1000 ; N AE ; B -75 0 964 712 ;
+C 227 ; WX 311 ; N ordfeminine ; B -8 416 319 724 ;
+C 232 ; WX 611 ; N Lslash ; B 0 0 611 712 ;
+C 233 ; WX 815 ; N Oslash ; B 20 -58 796 766 ;
+C 234 ; WX 1000 ; N OE ; B 6 0 1006 712 ;
+C 235 ; WX 322 ; N ordmasculine ; B -4 416 326 724 ;
+C 241 ; WX 759 ; N ae ; B 19 -12 739 500 ;
+C 245 ; WX 315 ; N dotlessi ; B 13 0 303 488 ;
+C 248 ; WX 315 ; N lslash ; B -5 0 321 712 ;
+C 249 ; WX 537 ; N oslash ; B 15 -50 523 544 ;
+C 250 ; WX 796 ; N oe ; B 14 -12 782 500 ;
+C 251 ; WX 556 ; N germandbls ; B 0 0 542 724 ;
+C -1 ; WX 481 ; N ecircumflex ; B 14 -12 468 734 ;
+C -1 ; WX 481 ; N edieresis ; B 14 -12 468 703 ;
+C -1 ; WX 519 ; N aacute ; B 16 -12 518 746 ;
+C -1 ; WX 800 ; N registered ; B 40 -12 760 724 ;
+C -1 ; WX 315 ; N icircumflex ; B -18 0 333 734 ;
+C -1 ; WX 593 ; N udieresis ; B 12 -12 582 703 ;
+C -1 ; WX 537 ; N ograve ; B 15 -12 523 746 ;
+C -1 ; WX 593 ; N uacute ; B 12 -12 582 746 ;
+C -1 ; WX 593 ; N ucircumflex ; B 12 -12 582 734 ;
+C -1 ; WX 630 ; N Aacute ; B -42 0 656 946 ;
+C -1 ; WX 315 ; N igrave ; B -6 0 303 746 ;
+C -1 ; WX 407 ; N Icircumflex ; B 0 0 407 934 ;
+C -1 ; WX 463 ; N ccedilla ; B 14 -220 476 500 ;
+C -1 ; WX 519 ; N adieresis ; B 16 -12 518 703 ;
+C -1 ; WX 722 ; N Ecircumflex ; B 10 0 675 934 ;
+C -1 ; WX 426 ; N scaron ; B 26 -12 410 734 ;
+C -1 ; WX 574 ; N thorn ; B -2 -166 542 712 ;
+C -1 ; WX 1000 ; N trademark ; B 6 308 994 712 ;
+C -1 ; WX 481 ; N egrave ; B 14 -12 468 746 ;
+C -1 ; WX 311 ; N threesuperior ; B -7 282 319 724 ;
+C -1 ; WX 444 ; N zcaron ; B 8 0 436 734 ;
+C -1 ; WX 519 ; N atilde ; B 16 -12 518 710 ;
+C -1 ; WX 519 ; N aring ; B 16 -12 518 772 ;
+C -1 ; WX 537 ; N ocircumflex ; B 15 -12 523 734 ;
+C -1 ; WX 722 ; N Edieresis ; B 10 0 675 903 ;
+C -1 ; WX 778 ; N threequarters ; B -7 -12 787 724 ;
+C -1 ; WX 444 ; N ydieresis ; B -30 -166 466 703 ;
+C -1 ; WX 444 ; N yacute ; B -30 -166 466 746 ;
+C -1 ; WX 315 ; N iacute ; B 13 0 321 746 ;
+C -1 ; WX 630 ; N Acircumflex ; B -42 0 656 934 ;
+C -1 ; WX 741 ; N Uacute ; B -10 -12 740 946 ;
+C -1 ; WX 481 ; N eacute ; B 14 -12 468 746 ;
+C -1 ; WX 815 ; N Ograve ; B 20 -12 796 946 ;
+C -1 ; WX 519 ; N agrave ; B 16 -12 518 746 ;
+C -1 ; WX 741 ; N Udieresis ; B -10 -12 740 903 ;
+C -1 ; WX 519 ; N acircumflex ; B 16 -12 518 734 ;
+C -1 ; WX 407 ; N Igrave ; B 0 0 407 946 ;
+C -1 ; WX 311 ; N twosuperior ; B -9 290 320 724 ;
+C -1 ; WX 741 ; N Ugrave ; B -10 -12 740 946 ;
+C -1 ; WX 778 ; N onequarter ; B 26 -12 787 726 ;
+C -1 ; WX 741 ; N Ucircumflex ; B -10 -12 740 934 ;
+C -1 ; WX 611 ; N Scaron ; B 28 -12 594 934 ;
+C -1 ; WX 407 ; N Idieresis ; B 0 0 407 903 ;
+C -1 ; WX 315 ; N idieresis ; B -20 0 336 703 ;
+C -1 ; WX 722 ; N Egrave ; B 10 0 675 946 ;
+C -1 ; WX 815 ; N Oacute ; B 20 -12 796 946 ;
+C -1 ; WX 600 ; N divide ; B 56 -44 544 532 ;
+C -1 ; WX 630 ; N Atilde ; B -42 0 656 910 ;
+C -1 ; WX 630 ; N Aring ; B -42 0 656 972 ;
+C -1 ; WX 815 ; N Odieresis ; B 20 -12 796 903 ;
+C -1 ; WX 630 ; N Adieresis ; B -42 0 656 903 ;
+C -1 ; WX 778 ; N Ntilde ; B -2 0 780 910 ;
+C -1 ; WX 648 ; N Zcaron ; B -9 0 650 934 ;
+C -1 ; WX 648 ; N Thorn ; B -2 0 650 712 ;
+C -1 ; WX 407 ; N Iacute ; B 0 0 407 946 ;
+C -1 ; WX 600 ; N plusminus ; B 56 0 544 488 ;
+C -1 ; WX 600 ; N multiply ; B 56 0 544 488 ;
+C -1 ; WX 722 ; N Eacute ; B 10 0 675 946 ;
+C -1 ; WX 648 ; N Ydieresis ; B -44 0 664 903 ;
+C -1 ; WX 311 ; N onesuperior ; B 26 290 286 726 ;
+C -1 ; WX 593 ; N ugrave ; B 12 -12 582 746 ;
+C -1 ; WX 600 ; N logicalnot ; B 56 82 544 406 ;
+C -1 ; WX 593 ; N ntilde ; B 12 0 582 710 ;
+C -1 ; WX 815 ; N Otilde ; B 20 -12 796 910 ;
+C -1 ; WX 537 ; N otilde ; B 15 -12 523 710 ;
+C -1 ; WX 685 ; N Ccedilla ; B 32 -220 640 724 ;
+C -1 ; WX 630 ; N Agrave ; B -42 0 656 946 ;
+C -1 ; WX 778 ; N onehalf ; B 26 -12 787 726 ;
+C -1 ; WX 778 ; N Eth ; B 0 0 754 712 ;
+C -1 ; WX 400 ; N degree ; B 57 438 343 724 ;
+C -1 ; WX 648 ; N Yacute ; B -44 0 664 946 ;
+C -1 ; WX 815 ; N Ocircumflex ; B 20 -12 796 934 ;
+C -1 ; WX 537 ; N oacute ; B 15 -12 523 746 ;
+C -1 ; WX 593 ; N mu ; B 6 -166 582 488 ;
+C -1 ; WX 600 ; N minus ; B 56 184 544 304 ;
+C -1 ; WX 537 ; N eth ; B 15 -12 523 712 ;
+C -1 ; WX 537 ; N odieresis ; B 15 -12 523 703 ;
+C -1 ; WX 800 ; N copyright ; B 40 -12 760 724 ;
+C -1 ; WX 222 ; N brokenbar ; B 51 0 171 712 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 91
+
+KPX A y -18
+KPX A w -37
+KPX A v -37
+KPX A quoteright -74
+KPX A quotedblright -74
+KPX A Y -55
+KPX A W -74
+KPX A V -74
+KPX A T -74
+
+KPX F r -55
+KPX F period -111
+KPX F o -55
+KPX F i -37
+KPX F e -55
+KPX F comma -111
+KPX F a -55
+KPX F A -55
+
+KPX L y -37
+KPX L quoteright -37
+KPX L quotedblright -37
+KPX L Y -74
+KPX L W -74
+KPX L V -74
+KPX L T -92
+
+KPX P period -129
+KPX P comma -129
+KPX P A -37
+
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX T y -92
+KPX T w -92
+KPX T u -92
+KPX T semicolon -92
+KPX T r -92
+KPX T period -92
+KPX T o -92
+KPX T i -55
+KPX T hyphen -92
+KPX T e -92
+KPX T comma -92
+KPX T colon -92
+KPX T a -92
+KPX T A -74
+
+KPX V u -55
+KPX V semicolon -55
+KPX V period -111
+KPX V o -74
+KPX V i -37
+KPX V hyphen -74
+KPX V e -74
+KPX V comma -111
+KPX V colon -55
+KPX V a -74
+KPX V A -55
+
+KPX W y -18
+KPX W u -37
+KPX W semicolon -55
+KPX W period -111
+KPX W o -55
+KPX W i -37
+KPX W hyphen -55
+KPX W e -55
+KPX W comma -111
+KPX W colon -55
+KPX W a -55
+KPX W A -55
+
+KPX Y u -55
+KPX Y semicolon -55
+KPX Y period -74
+KPX Y o -74
+KPX Y i -37
+KPX Y hyphen -92
+KPX Y e -74
+KPX Y comma -74
+KPX Y colon -55
+KPX Y a -74
+KPX Y A -37
+
+KPX f quoteright 74
+KPX f quotedblright 74
+
+KPX quoteright s -37
+
+KPX r period -74
+KPX r hyphen -74
+KPX r comma -74
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 151 200 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 151 200 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 151 200 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 151 200 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 151 200 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 151 200 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 204 200 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 204 200 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 204 200 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 204 200 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 51 200 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 51 200 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 51 200 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 51 200 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 255 200 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 250 200 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 250 200 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 250 200 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 250 200 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 250 200 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 148 200 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 242 200 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 242 200 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 242 200 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 242 200 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 167 200 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 167 200 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 167 200 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 107 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 107 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 107 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 107 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 107 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 107 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 118 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 118 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 118 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 118 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 139 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 111 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 111 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 111 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 111 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 111 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 56 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 139 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 139 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 65 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 65 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 65 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Ti-It b/font/Ti-It
new file mode 100644
index 0000000..6d7a003
--- /dev/null
+++ b/font/Ti-It
@@ -0,0 +1,648 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Mar 20 13:14:56 1990
+Comment UniqueID 28427
+Comment VMusage 32912 39804
+FontName Times-Italic
+FullName Times Italic
+FamilyName Times
+Weight Medium
+ItalicAngle -15.5
+IsFixedPitch false
+FontBBox -169 -217 1010 883
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Times is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 653
+XHeight 441
+Ascender 683
+Descender -205
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 39 -11 302 667 ;
+C 34 ; WX 420 ; N quotedbl ; B 144 421 432 666 ;
+C 35 ; WX 500 ; N numbersign ; B 2 0 540 676 ;
+C 36 ; WX 500 ; N dollar ; B 31 -89 497 731 ;
+C 37 ; WX 833 ; N percent ; B 79 -13 790 676 ;
+C 38 ; WX 778 ; N ampersand ; B 76 -18 723 666 ;
+C 39 ; WX 333 ; N quoteright ; B 151 436 290 666 ;
+C 40 ; WX 333 ; N parenleft ; B 42 -181 315 669 ;
+C 41 ; WX 333 ; N parenright ; B 16 -180 289 669 ;
+C 42 ; WX 500 ; N asterisk ; B 128 255 492 666 ;
+C 43 ; WX 675 ; N plus ; B 86 0 590 506 ;
+C 44 ; WX 250 ; N comma ; B -4 -129 135 101 ;
+C 45 ; WX 333 ; N hyphen ; B 49 192 282 255 ;
+C 46 ; WX 250 ; N period ; B 27 -11 138 100 ;
+C 47 ; WX 278 ; N slash ; B -65 -18 386 666 ;
+C 48 ; WX 500 ; N zero ; B 32 -7 497 676 ;
+C 49 ; WX 500 ; N one ; B 49 0 409 676 ;
+C 50 ; WX 500 ; N two ; B 12 0 452 676 ;
+C 51 ; WX 500 ; N three ; B 15 -7 465 676 ;
+C 52 ; WX 500 ; N four ; B 1 0 479 676 ;
+C 53 ; WX 500 ; N five ; B 15 -7 491 666 ;
+C 54 ; WX 500 ; N six ; B 30 -7 521 686 ;
+C 55 ; WX 500 ; N seven ; B 75 -8 537 666 ;
+C 56 ; WX 500 ; N eight ; B 30 -7 493 676 ;
+C 57 ; WX 500 ; N nine ; B 23 -17 492 676 ;
+C 58 ; WX 333 ; N colon ; B 50 -11 261 441 ;
+C 59 ; WX 333 ; N semicolon ; B 27 -129 261 441 ;
+C 60 ; WX 675 ; N less ; B 84 -8 592 514 ;
+C 61 ; WX 675 ; N equal ; B 86 120 590 386 ;
+C 62 ; WX 675 ; N greater ; B 84 -8 592 514 ;
+C 63 ; WX 500 ; N question ; B 132 -12 472 664 ;
+C 64 ; WX 920 ; N at ; B 118 -18 806 666 ;
+C 65 ; WX 611 ; N A ; B -51 0 564 668 ;
+C 66 ; WX 611 ; N B ; B -8 0 588 653 ;
+C 67 ; WX 667 ; N C ; B 66 -18 689 666 ;
+C 68 ; WX 722 ; N D ; B -8 0 700 653 ;
+C 69 ; WX 611 ; N E ; B -1 0 634 653 ;
+C 70 ; WX 611 ; N F ; B 8 0 645 653 ;
+C 71 ; WX 722 ; N G ; B 52 -18 722 666 ;
+C 72 ; WX 722 ; N H ; B -8 0 767 653 ;
+C 73 ; WX 333 ; N I ; B -8 0 384 653 ;
+C 74 ; WX 444 ; N J ; B -6 -18 491 653 ;
+C 75 ; WX 667 ; N K ; B 7 0 722 653 ;
+C 76 ; WX 556 ; N L ; B -8 0 559 653 ;
+C 77 ; WX 833 ; N M ; B -18 0 873 653 ;
+C 78 ; WX 667 ; N N ; B -20 -15 727 653 ;
+C 79 ; WX 722 ; N O ; B 60 -18 699 666 ;
+C 80 ; WX 611 ; N P ; B 0 0 605 653 ;
+C 81 ; WX 722 ; N Q ; B 59 -182 699 666 ;
+C 82 ; WX 611 ; N R ; B -13 0 588 653 ;
+C 83 ; WX 500 ; N S ; B 17 -18 508 667 ;
+C 84 ; WX 556 ; N T ; B 59 0 633 653 ;
+C 85 ; WX 722 ; N U ; B 102 -18 765 653 ;
+C 86 ; WX 611 ; N V ; B 76 -18 688 653 ;
+C 87 ; WX 833 ; N W ; B 71 -18 906 653 ;
+C 88 ; WX 611 ; N X ; B -29 0 655 653 ;
+C 89 ; WX 556 ; N Y ; B 78 0 633 653 ;
+C 90 ; WX 556 ; N Z ; B -6 0 606 653 ;
+C 91 ; WX 389 ; N bracketleft ; B 21 -153 391 663 ;
+C 92 ; WX 278 ; N backslash ; B -41 -18 319 666 ;
+C 93 ; WX 389 ; N bracketright ; B 12 -153 382 663 ;
+C 94 ; WX 422 ; N asciicircum ; B 0 301 422 666 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 333 ; N quoteleft ; B 171 436 310 666 ;
+C 97 ; WX 500 ; N a ; B 17 -11 476 441 ;
+C 98 ; WX 500 ; N b ; B 23 -11 473 683 ;
+C 99 ; WX 444 ; N c ; B 30 -11 425 441 ;
+C 100 ; WX 500 ; N d ; B 15 -13 527 683 ;
+C 101 ; WX 444 ; N e ; B 31 -11 412 441 ;
+C 102 ; WX 278 ; N f ; B -147 -207 424 678 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 8 -206 472 441 ;
+C 104 ; WX 500 ; N h ; B 19 -9 478 683 ;
+C 105 ; WX 278 ; N i ; B 49 -11 264 654 ;
+C 106 ; WX 278 ; N j ; B -124 -207 276 654 ;
+C 107 ; WX 444 ; N k ; B 14 -11 461 683 ;
+C 108 ; WX 278 ; N l ; B 41 -11 279 683 ;
+C 109 ; WX 722 ; N m ; B 12 -9 704 441 ;
+C 110 ; WX 500 ; N n ; B 14 -9 474 441 ;
+C 111 ; WX 500 ; N o ; B 27 -11 468 441 ;
+C 112 ; WX 500 ; N p ; B -75 -205 469 441 ;
+C 113 ; WX 500 ; N q ; B 25 -209 483 441 ;
+C 114 ; WX 389 ; N r ; B 45 0 412 441 ;
+C 115 ; WX 389 ; N s ; B 16 -13 366 442 ;
+C 116 ; WX 278 ; N t ; B 37 -11 296 546 ;
+C 117 ; WX 500 ; N u ; B 42 -11 475 441 ;
+C 118 ; WX 444 ; N v ; B 21 -18 426 441 ;
+C 119 ; WX 667 ; N w ; B 16 -18 648 441 ;
+C 120 ; WX 444 ; N x ; B -27 -11 447 441 ;
+C 121 ; WX 444 ; N y ; B -24 -206 426 441 ;
+C 122 ; WX 389 ; N z ; B -2 -81 380 428 ;
+C 123 ; WX 400 ; N braceleft ; B 51 -177 407 687 ;
+C 124 ; WX 275 ; N bar ; B 105 -18 171 666 ;
+C 125 ; WX 400 ; N braceright ; B -7 -177 349 687 ;
+C 126 ; WX 541 ; N asciitilde ; B 40 183 502 323 ;
+C 161 ; WX 389 ; N exclamdown ; B 59 -205 322 473 ;
+C 162 ; WX 500 ; N cent ; B 77 -143 472 560 ;
+C 163 ; WX 500 ; N sterling ; B 10 -6 517 670 ;
+C 164 ; WX 167 ; N fraction ; B -169 -10 337 676 ;
+C 165 ; WX 500 ; N yen ; B 27 0 603 653 ;
+C 166 ; WX 500 ; N florin ; B 25 -182 507 682 ;
+C 167 ; WX 500 ; N section ; B 53 -162 461 666 ;
+C 168 ; WX 500 ; N currency ; B -22 53 522 597 ;
+C 169 ; WX 214 ; N quotesingle ; B 132 421 241 666 ;
+C 170 ; WX 556 ; N quotedblleft ; B 166 436 514 666 ;
+C 171 ; WX 500 ; N guillemotleft ; B 53 37 445 403 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 51 37 281 403 ;
+C 173 ; WX 333 ; N guilsinglright ; B 52 37 282 403 ;
+C 174 ; WX 500 ; N fi ; B -141 -207 481 681 ;
+C 175 ; WX 500 ; N fl ; B -141 -204 518 682 ;
+C 177 ; WX 500 ; N endash ; B -6 197 505 243 ;
+C 178 ; WX 500 ; N dagger ; B 101 -159 488 666 ;
+C 179 ; WX 500 ; N daggerdbl ; B 22 -143 491 666 ;
+C 180 ; WX 250 ; N periodcentered ; B 70 199 181 310 ;
+C 182 ; WX 523 ; N paragraph ; B 55 -123 616 653 ;
+C 183 ; WX 350 ; N bullet ; B 40 191 310 461 ;
+C 184 ; WX 333 ; N quotesinglbase ; B 44 -129 183 101 ;
+C 185 ; WX 556 ; N quotedblbase ; B 57 -129 405 101 ;
+C 186 ; WX 556 ; N quotedblright ; B 151 436 499 666 ;
+C 187 ; WX 500 ; N guillemotright ; B 55 37 447 403 ;
+C 188 ; WX 889 ; N ellipsis ; B 57 -11 762 100 ;
+C 189 ; WX 1000 ; N perthousand ; B 25 -19 1010 706 ;
+C 191 ; WX 500 ; N questiondown ; B 28 -205 368 471 ;
+C 193 ; WX 333 ; N grave ; B 121 492 311 664 ;
+C 194 ; WX 333 ; N acute ; B 180 494 403 664 ;
+C 195 ; WX 333 ; N circumflex ; B 91 492 385 661 ;
+C 196 ; WX 333 ; N tilde ; B 100 517 427 624 ;
+C 197 ; WX 333 ; N macron ; B 99 532 411 583 ;
+C 198 ; WX 333 ; N breve ; B 117 492 418 650 ;
+C 199 ; WX 333 ; N dotaccent ; B 207 508 305 606 ;
+C 200 ; WX 333 ; N dieresis ; B 107 508 405 606 ;
+C 202 ; WX 333 ; N ring ; B 155 492 355 691 ;
+C 203 ; WX 333 ; N cedilla ; B -30 -217 182 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 93 494 486 664 ;
+C 206 ; WX 333 ; N ogonek ; B -20 -169 200 40 ;
+C 207 ; WX 333 ; N caron ; B 121 492 426 661 ;
+C 208 ; WX 889 ; N emdash ; B -6 197 894 243 ;
+C 225 ; WX 889 ; N AE ; B -27 0 911 653 ;
+C 227 ; WX 276 ; N ordfeminine ; B 42 406 352 676 ;
+C 232 ; WX 556 ; N Lslash ; B -8 0 559 653 ;
+C 233 ; WX 722 ; N Oslash ; B 60 -105 699 722 ;
+C 234 ; WX 944 ; N OE ; B 49 -8 964 666 ;
+C 235 ; WX 310 ; N ordmasculine ; B 67 406 362 676 ;
+C 241 ; WX 667 ; N ae ; B 23 -11 640 441 ;
+C 245 ; WX 278 ; N dotlessi ; B 49 -11 235 441 ;
+C 248 ; WX 278 ; N lslash ; B 37 -11 307 683 ;
+C 249 ; WX 500 ; N oslash ; B 28 -135 469 554 ;
+C 250 ; WX 667 ; N oe ; B 20 -12 646 441 ;
+C 251 ; WX 500 ; N germandbls ; B -168 -207 493 679 ;
+C -1 ; WX 556 ; N Zcaron ; B -6 0 606 873 ;
+C -1 ; WX 444 ; N ccedilla ; B 26 -217 425 441 ;
+C -1 ; WX 444 ; N ydieresis ; B -24 -206 441 606 ;
+C -1 ; WX 500 ; N atilde ; B 17 -11 511 624 ;
+C -1 ; WX 278 ; N icircumflex ; B 34 -11 328 661 ;
+C -1 ; WX 300 ; N threesuperior ; B 43 268 339 676 ;
+C -1 ; WX 444 ; N ecircumflex ; B 31 -11 441 661 ;
+C -1 ; WX 500 ; N thorn ; B -75 -205 469 683 ;
+C -1 ; WX 444 ; N egrave ; B 31 -11 412 664 ;
+C -1 ; WX 300 ; N twosuperior ; B 33 271 324 676 ;
+C -1 ; WX 444 ; N eacute ; B 31 -11 459 664 ;
+C -1 ; WX 500 ; N otilde ; B 27 -11 496 624 ;
+C -1 ; WX 611 ; N Aacute ; B -51 0 564 876 ;
+C -1 ; WX 500 ; N ocircumflex ; B 27 -11 468 661 ;
+C -1 ; WX 444 ; N yacute ; B -24 -206 459 664 ;
+C -1 ; WX 500 ; N udieresis ; B 42 -11 479 606 ;
+C -1 ; WX 750 ; N threequarters ; B 23 -10 736 676 ;
+C -1 ; WX 500 ; N acircumflex ; B 17 -11 476 661 ;
+C -1 ; WX 722 ; N Eth ; B -8 0 700 653 ;
+C -1 ; WX 444 ; N edieresis ; B 31 -11 451 606 ;
+C -1 ; WX 500 ; N ugrave ; B 42 -11 475 664 ;
+C -1 ; WX 980 ; N trademark ; B 30 247 957 653 ;
+C -1 ; WX 500 ; N ograve ; B 27 -11 468 664 ;
+C -1 ; WX 389 ; N scaron ; B 16 -13 454 661 ;
+C -1 ; WX 333 ; N Idieresis ; B -8 0 435 818 ;
+C -1 ; WX 500 ; N uacute ; B 42 -11 477 664 ;
+C -1 ; WX 500 ; N agrave ; B 17 -11 476 664 ;
+C -1 ; WX 500 ; N ntilde ; B 14 -9 476 624 ;
+C -1 ; WX 500 ; N aring ; B 17 -11 476 691 ;
+C -1 ; WX 389 ; N zcaron ; B -2 -81 434 661 ;
+C -1 ; WX 333 ; N Icircumflex ; B -8 0 425 873 ;
+C -1 ; WX 667 ; N Ntilde ; B -20 -15 727 836 ;
+C -1 ; WX 500 ; N ucircumflex ; B 42 -11 475 661 ;
+C -1 ; WX 611 ; N Ecircumflex ; B -1 0 634 873 ;
+C -1 ; WX 333 ; N Iacute ; B -8 0 413 876 ;
+C -1 ; WX 667 ; N Ccedilla ; B 66 -217 689 666 ;
+C -1 ; WX 722 ; N Odieresis ; B 60 -18 699 818 ;
+C -1 ; WX 500 ; N Scaron ; B 17 -18 520 873 ;
+C -1 ; WX 611 ; N Edieresis ; B -1 0 634 818 ;
+C -1 ; WX 333 ; N Igrave ; B -8 0 384 876 ;
+C -1 ; WX 500 ; N adieresis ; B 17 -11 489 606 ;
+C -1 ; WX 722 ; N Ograve ; B 60 -18 699 876 ;
+C -1 ; WX 611 ; N Egrave ; B -1 0 634 876 ;
+C -1 ; WX 556 ; N Ydieresis ; B 78 0 633 818 ;
+C -1 ; WX 760 ; N registered ; B 41 -18 719 666 ;
+C -1 ; WX 722 ; N Otilde ; B 60 -18 699 836 ;
+C -1 ; WX 750 ; N onequarter ; B 33 -10 736 676 ;
+C -1 ; WX 722 ; N Ugrave ; B 102 -18 765 876 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 102 -18 765 873 ;
+C -1 ; WX 611 ; N Thorn ; B 0 0 569 653 ;
+C -1 ; WX 675 ; N divide ; B 86 -11 590 517 ;
+C -1 ; WX 611 ; N Atilde ; B -51 0 566 836 ;
+C -1 ; WX 722 ; N Uacute ; B 102 -18 765 876 ;
+C -1 ; WX 722 ; N Ocircumflex ; B 60 -18 699 873 ;
+C -1 ; WX 675 ; N logicalnot ; B 86 108 590 386 ;
+C -1 ; WX 611 ; N Aring ; B -51 0 564 883 ;
+C -1 ; WX 278 ; N idieresis ; B 49 -11 353 606 ;
+C -1 ; WX 278 ; N iacute ; B 49 -11 356 664 ;
+C -1 ; WX 500 ; N aacute ; B 17 -11 487 664 ;
+C -1 ; WX 675 ; N plusminus ; B 86 0 590 506 ;
+C -1 ; WX 675 ; N multiply ; B 93 8 582 497 ;
+C -1 ; WX 722 ; N Udieresis ; B 102 -18 765 818 ;
+C -1 ; WX 675 ; N minus ; B 86 220 590 286 ;
+C -1 ; WX 300 ; N onesuperior ; B 43 271 284 676 ;
+C -1 ; WX 611 ; N Eacute ; B -1 0 634 876 ;
+C -1 ; WX 611 ; N Acircumflex ; B -51 0 564 873 ;
+C -1 ; WX 760 ; N copyright ; B 41 -18 719 666 ;
+C -1 ; WX 611 ; N Agrave ; B -51 0 564 876 ;
+C -1 ; WX 500 ; N odieresis ; B 27 -11 489 606 ;
+C -1 ; WX 500 ; N oacute ; B 27 -11 487 664 ;
+C -1 ; WX 400 ; N degree ; B 101 390 387 676 ;
+C -1 ; WX 278 ; N igrave ; B 49 -11 284 664 ;
+C -1 ; WX 500 ; N mu ; B -30 -209 497 428 ;
+C -1 ; WX 722 ; N Oacute ; B 60 -18 699 876 ;
+C -1 ; WX 500 ; N eth ; B 27 -11 482 683 ;
+C -1 ; WX 611 ; N Adieresis ; B -51 0 564 818 ;
+C -1 ; WX 556 ; N Yacute ; B 78 0 633 876 ;
+C -1 ; WX 275 ; N brokenbar ; B 105 -18 171 666 ;
+C -1 ; WX 750 ; N onehalf ; B 34 -10 749 676 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 283
+
+KPX A y -55
+KPX A w -55
+KPX A v -55
+KPX A u -20
+KPX A quoteright -37
+KPX A quotedblright 0
+KPX A p 0
+KPX A Y -55
+KPX A W -95
+KPX A V -105
+KPX A U -50
+KPX A T -37
+KPX A Q -40
+KPX A O -40
+KPX A G -35
+KPX A C -30
+
+KPX B period 0
+KPX B comma 0
+KPX B U -10
+KPX B A -25
+
+KPX D period 0
+KPX D comma 0
+KPX D Y -40
+KPX D W -40
+KPX D V -40
+KPX D A -35
+
+KPX F r -55
+KPX F period -135
+KPX F o -105
+KPX F i -45
+KPX F e -75
+KPX F comma -135
+KPX F a -75
+KPX F A -115
+
+KPX G period 0
+KPX G comma 0
+
+KPX J u -35
+KPX J period -25
+KPX J o -25
+KPX J e -25
+KPX J comma -25
+KPX J a -35
+KPX J A -40
+
+KPX K y -40
+KPX K u -40
+KPX K o -40
+KPX K e -35
+KPX K O -50
+
+KPX L y -30
+KPX L quoteright -37
+KPX L quotedblright 0
+KPX L Y -20
+KPX L W -55
+KPX L V -55
+KPX L T -20
+
+KPX N period 0
+KPX N comma 0
+KPX N A -27
+
+KPX O period 0
+KPX O comma 0
+KPX O Y -50
+KPX O X -40
+KPX O W -50
+KPX O V -50
+KPX O T -40
+KPX O A -55
+
+KPX P period -135
+KPX P o -80
+KPX P e -80
+KPX P comma -135
+KPX P a -80
+KPX P A -90
+
+KPX Q period 0
+KPX Q comma 0
+KPX Q U -10
+
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R U -40
+KPX R T 0
+KPX R O -40
+
+KPX S period 0
+KPX S comma 0
+
+KPX T y -74
+KPX T w -74
+KPX T u -55
+KPX T semicolon -65
+KPX T r -55
+KPX T period -74
+KPX T o -92
+KPX T i -55
+KPX T hyphen -74
+KPX T h 0
+KPX T e -92
+KPX T comma -74
+KPX T colon -55
+KPX T a -92
+KPX T O -18
+KPX T A -50
+
+KPX U period -25
+KPX U comma -25
+KPX U A -40
+
+KPX V u -74
+KPX V semicolon -74
+KPX V period -129
+KPX V o -111
+KPX V i -74
+KPX V hyphen -55
+KPX V e -111
+KPX V comma -129
+KPX V colon -65
+KPX V a -111
+KPX V O -30
+KPX V G 0
+KPX V A -60
+
+KPX W y -70
+KPX W u -55
+KPX W semicolon -65
+KPX W period -92
+KPX W o -92
+KPX W i -55
+KPX W hyphen -37
+KPX W h 0
+KPX W e -92
+KPX W comma -92
+KPX W colon -65
+KPX W a -92
+KPX W O -25
+KPX W A -60
+
+KPX Y u -92
+KPX Y semicolon -65
+KPX Y period -92
+KPX Y o -92
+KPX Y i -74
+KPX Y hyphen -74
+KPX Y e -92
+KPX Y comma -92
+KPX Y colon -65
+KPX Y a -92
+KPX Y O -15
+KPX Y A -50
+
+KPX a y 0
+KPX a w 0
+KPX a v 0
+KPX a t 0
+KPX a p 0
+KPX a g -10
+KPX a b 0
+
+KPX b y 0
+KPX b v 0
+KPX b u -20
+KPX b period -40
+KPX b l 0
+KPX b comma 0
+KPX b b 0
+
+KPX c y 0
+KPX c period 0
+KPX c l 0
+KPX c k -20
+KPX c h -15
+KPX c comma 0
+
+KPX colon space 0
+
+KPX comma space 0
+KPX comma quoteright -140
+KPX comma quotedblright -140
+
+KPX d y 0
+KPX d w 0
+KPX d v 0
+KPX d period 0
+KPX d d 0
+KPX d comma 0
+
+KPX e y -30
+KPX e x -20
+KPX e w -15
+KPX e v -15
+KPX e period -15
+KPX e p 0
+KPX e g -40
+KPX e comma -10
+KPX e b 0
+
+KPX f quoteright 92
+KPX f quotedblright 0
+KPX f period -15
+KPX f o 0
+KPX f l 0
+KPX f i -20
+KPX f f -18
+KPX f e 0
+KPX f dotlessi -60
+KPX f comma -10
+KPX f a 0
+
+KPX g y 0
+KPX g r 0
+KPX g period -15
+KPX g o 0
+KPX g i 0
+KPX g g -10
+KPX g e -10
+KPX g comma -10
+KPX g a 0
+
+KPX h y 0
+
+KPX i v 0
+
+KPX k y -10
+KPX k o -10
+KPX k e -10
+
+KPX l y 0
+KPX l w 0
+
+KPX m y 0
+KPX m u 0
+
+KPX n y 0
+KPX n v -40
+KPX n u 0
+
+KPX o y 0
+KPX o x 0
+KPX o w 0
+KPX o v -10
+KPX o g -10
+
+KPX p y 0
+
+KPX period quoteright -140
+KPX period quotedblright -140
+
+KPX quotedblleft quoteleft 0
+KPX quotedblleft A 0
+
+KPX quotedblright space 0
+
+KPX quoteleft quoteleft -111
+KPX quoteleft A 0
+
+KPX quoteright v -10
+KPX quoteright t -30
+KPX quoteright space -111
+KPX quoteright s -40
+KPX quoteright r -25
+KPX quoteright quoteright -111
+KPX quoteright quotedblright 0
+KPX quoteright l 0
+KPX quoteright d -25
+
+KPX r y 0
+KPX r v 0
+KPX r u 0
+KPX r t 0
+KPX r s -10
+KPX r r 0
+KPX r q -37
+KPX r period -111
+KPX r p 0
+KPX r o -45
+KPX r n 0
+KPX r m 0
+KPX r l 0
+KPX r k 0
+KPX r i 0
+KPX r hyphen -20
+KPX r g -37
+KPX r e -37
+KPX r d -37
+KPX r comma -111
+KPX r c -37
+KPX r a -15
+
+KPX s w 0
+
+KPX space quoteleft 0
+KPX space quotedblleft 0
+KPX space Y -75
+KPX space W -40
+KPX space V -35
+KPX space T -18
+KPX space A -18
+
+KPX v period -74
+KPX v o 0
+KPX v e 0
+KPX v comma -74
+KPX v a 0
+
+KPX w period -74
+KPX w o 0
+KPX w h 0
+KPX w e 0
+KPX w comma -74
+KPX w a 0
+
+KPX x e 0
+
+KPX y period -55
+KPX y o 0
+KPX y e 0
+KPX y comma -55
+KPX y a 0
+
+KPX z o 0
+KPX z e 0
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 139 212 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 144 212 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 139 212 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 149 212 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 129 192 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 139 212 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 167 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 149 212 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 169 212 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 159 212 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 149 212 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 10 212 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 40 212 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 30 212 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 10 212 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 177 212 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 195 212 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 230 212 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 230 212 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 205 212 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 215 212 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 94 212 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 195 212 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 215 212 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 225 212 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 215 212 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 132 212 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 142 212 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 112 212 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 84 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 84 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 84 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 84 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 84 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 84 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 56 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 56 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 56 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 46 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 56 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -47 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -57 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -52 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 49 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 74 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 84 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 84 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 69 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 28 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 74 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 74 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 74 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 84 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 56 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 36 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 8 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Ti-ItF b/font/Ti-ItF
new file mode 100644
index 0000000..82cc242
--- /dev/null
+++ b/font/Ti-ItF
@@ -0,0 +1,531 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Dec  4 11:35:02 1990
+Comment UniqueID 33650
+Comment VMusage 33130 40022
+FontName Times-ItalicOsF
+FullName Times Italic Old Style Figures
+FamilyName Times
+Weight Medium
+ItalicAngle -15.5
+IsFixedPitch false
+FontBBox -169 -217 1010 883
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Times is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 653
+XHeight 441
+Ascender 683
+Descender -205
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 39 -11 302 667 ;
+C 34 ; WX 420 ; N quotedbl ; B 144 421 432 666 ;
+C 35 ; WX 500 ; N numbersign ; B 2 0 540 676 ;
+C 36 ; WX 500 ; N dollar ; B 31 -89 497 731 ;
+C 37 ; WX 833 ; N percent ; B 79 -13 790 676 ;
+C 38 ; WX 778 ; N ampersand ; B 76 -18 723 666 ;
+C 39 ; WX 333 ; N quoteright ; B 151 436 290 666 ;
+C 40 ; WX 333 ; N parenleft ; B 42 -181 315 669 ;
+C 41 ; WX 333 ; N parenright ; B 16 -180 289 669 ;
+C 42 ; WX 500 ; N asterisk ; B 128 255 492 666 ;
+C 43 ; WX 675 ; N plus ; B 86 0 590 506 ;
+C 44 ; WX 250 ; N comma ; B -4 -129 135 101 ;
+C 45 ; WX 333 ; N hyphen ; B 49 192 282 255 ;
+C 46 ; WX 250 ; N period ; B 27 -11 138 100 ;
+C 47 ; WX 278 ; N slash ; B -65 -18 386 666 ;
+C 48 ; WX 500 ; N zero ; B 16 -8 484 494 ;
+C 49 ; WX 500 ; N one ; B 56 0 438 486 ;
+C 50 ; WX 500 ; N two ; B 19 0 422 494 ;
+C 51 ; WX 500 ; N three ; B -18 -190 434 494 ;
+C 52 ; WX 500 ; N four ; B -16 -172 458 494 ;
+C 53 ; WX 500 ; N five ; B -14 -190 462 486 ;
+C 54 ; WX 500 ; N six ; B 28 -8 521 684 ;
+C 55 ; WX 500 ; N seven ; B 48 -190 520 486 ;
+C 56 ; WX 500 ; N eight ; B 10 -8 476 670 ;
+C 57 ; WX 500 ; N nine ; B -12 -196 462 494 ;
+C 58 ; WX 333 ; N colon ; B 50 -11 261 441 ;
+C 59 ; WX 333 ; N semicolon ; B 27 -129 261 441 ;
+C 60 ; WX 675 ; N less ; B 84 -8 592 514 ;
+C 61 ; WX 675 ; N equal ; B 86 120 590 386 ;
+C 62 ; WX 675 ; N greater ; B 84 -8 592 514 ;
+C 63 ; WX 500 ; N question ; B 132 -12 472 664 ;
+C 64 ; WX 920 ; N at ; B 118 -18 806 666 ;
+C 65 ; WX 611 ; N A ; B -51 0 564 668 ;
+C 66 ; WX 611 ; N B ; B -8 0 588 653 ;
+C 67 ; WX 667 ; N C ; B 66 -18 689 666 ;
+C 68 ; WX 722 ; N D ; B -8 0 700 653 ;
+C 69 ; WX 611 ; N E ; B -1 0 634 653 ;
+C 70 ; WX 611 ; N F ; B 8 0 645 653 ;
+C 71 ; WX 722 ; N G ; B 52 -18 722 666 ;
+C 72 ; WX 722 ; N H ; B -8 0 767 653 ;
+C 73 ; WX 333 ; N I ; B -8 0 384 653 ;
+C 74 ; WX 444 ; N J ; B -6 -18 491 653 ;
+C 75 ; WX 667 ; N K ; B 7 0 722 653 ;
+C 76 ; WX 556 ; N L ; B -8 0 559 653 ;
+C 77 ; WX 833 ; N M ; B -18 0 873 653 ;
+C 78 ; WX 667 ; N N ; B -20 -15 727 653 ;
+C 79 ; WX 722 ; N O ; B 60 -18 699 666 ;
+C 80 ; WX 611 ; N P ; B 0 0 605 653 ;
+C 81 ; WX 722 ; N Q ; B 59 -182 699 666 ;
+C 82 ; WX 611 ; N R ; B -13 0 588 653 ;
+C 83 ; WX 500 ; N S ; B 17 -18 508 667 ;
+C 84 ; WX 556 ; N T ; B 59 0 633 653 ;
+C 85 ; WX 722 ; N U ; B 102 -18 765 653 ;
+C 86 ; WX 611 ; N V ; B 76 -18 688 653 ;
+C 87 ; WX 833 ; N W ; B 71 -18 906 653 ;
+C 88 ; WX 611 ; N X ; B -29 0 655 653 ;
+C 89 ; WX 556 ; N Y ; B 78 0 633 653 ;
+C 90 ; WX 556 ; N Z ; B -6 0 606 653 ;
+C 91 ; WX 389 ; N bracketleft ; B 21 -153 391 663 ;
+C 92 ; WX 278 ; N backslash ; B -41 -18 319 666 ;
+C 93 ; WX 389 ; N bracketright ; B 12 -153 382 663 ;
+C 94 ; WX 422 ; N asciicircum ; B 0 301 422 666 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 333 ; N quoteleft ; B 171 436 310 666 ;
+C 97 ; WX 500 ; N a ; B 17 -11 476 441 ;
+C 98 ; WX 500 ; N b ; B 23 -11 473 683 ;
+C 99 ; WX 444 ; N c ; B 30 -11 425 441 ;
+C 100 ; WX 500 ; N d ; B 15 -13 527 683 ;
+C 101 ; WX 444 ; N e ; B 31 -11 412 441 ;
+C 102 ; WX 278 ; N f ; B -147 -207 424 678 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 8 -206 472 441 ;
+C 104 ; WX 500 ; N h ; B 19 -9 478 683 ;
+C 105 ; WX 278 ; N i ; B 49 -11 264 654 ;
+C 106 ; WX 278 ; N j ; B -124 -207 276 654 ;
+C 107 ; WX 444 ; N k ; B 14 -11 461 683 ;
+C 108 ; WX 278 ; N l ; B 41 -11 279 683 ;
+C 109 ; WX 722 ; N m ; B 12 -9 704 441 ;
+C 110 ; WX 500 ; N n ; B 14 -9 474 441 ;
+C 111 ; WX 500 ; N o ; B 27 -11 468 441 ;
+C 112 ; WX 500 ; N p ; B -75 -205 469 441 ;
+C 113 ; WX 500 ; N q ; B 25 -209 483 441 ;
+C 114 ; WX 389 ; N r ; B 45 0 412 441 ;
+C 115 ; WX 389 ; N s ; B 16 -13 366 442 ;
+C 116 ; WX 278 ; N t ; B 37 -11 296 546 ;
+C 117 ; WX 500 ; N u ; B 42 -11 475 441 ;
+C 118 ; WX 444 ; N v ; B 21 -18 426 441 ;
+C 119 ; WX 667 ; N w ; B 16 -18 648 441 ;
+C 120 ; WX 444 ; N x ; B -27 -11 447 441 ;
+C 121 ; WX 444 ; N y ; B -24 -206 426 441 ;
+C 122 ; WX 389 ; N z ; B -2 -81 380 428 ;
+C 123 ; WX 400 ; N braceleft ; B 51 -177 407 687 ;
+C 124 ; WX 275 ; N bar ; B 105 -18 171 666 ;
+C 125 ; WX 400 ; N braceright ; B -7 -177 349 687 ;
+C 126 ; WX 541 ; N asciitilde ; B 40 183 502 323 ;
+C 161 ; WX 389 ; N exclamdown ; B 59 -205 322 473 ;
+C 162 ; WX 500 ; N cent ; B 77 -143 472 560 ;
+C 163 ; WX 500 ; N sterling ; B 10 -6 517 670 ;
+C 164 ; WX 167 ; N fraction ; B -169 -10 337 676 ;
+C 165 ; WX 500 ; N yen ; B 27 0 603 653 ;
+C 166 ; WX 500 ; N florin ; B 25 -182 507 682 ;
+C 167 ; WX 500 ; N section ; B 53 -162 461 666 ;
+C 168 ; WX 500 ; N currency ; B -22 53 522 597 ;
+C 169 ; WX 214 ; N quotesingle ; B 132 421 241 666 ;
+C 170 ; WX 556 ; N quotedblleft ; B 166 436 514 666 ;
+C 171 ; WX 500 ; N guillemotleft ; B 53 37 445 403 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 51 37 281 403 ;
+C 173 ; WX 333 ; N guilsinglright ; B 52 37 282 403 ;
+C 174 ; WX 500 ; N fi ; B -141 -207 481 681 ;
+C 175 ; WX 500 ; N fl ; B -141 -204 518 682 ;
+C 177 ; WX 500 ; N endash ; B -6 197 505 243 ;
+C 178 ; WX 500 ; N dagger ; B 101 -159 488 666 ;
+C 179 ; WX 500 ; N daggerdbl ; B 22 -143 491 666 ;
+C 180 ; WX 250 ; N periodcentered ; B 70 199 181 310 ;
+C 182 ; WX 523 ; N paragraph ; B 55 -123 616 653 ;
+C 183 ; WX 350 ; N bullet ; B 40 191 310 461 ;
+C 184 ; WX 333 ; N quotesinglbase ; B 44 -129 183 101 ;
+C 185 ; WX 556 ; N quotedblbase ; B 57 -129 405 101 ;
+C 186 ; WX 556 ; N quotedblright ; B 151 436 499 666 ;
+C 187 ; WX 500 ; N guillemotright ; B 55 37 447 403 ;
+C 188 ; WX 889 ; N ellipsis ; B 57 -11 762 100 ;
+C 189 ; WX 1000 ; N perthousand ; B 25 -19 1010 706 ;
+C 191 ; WX 500 ; N questiondown ; B 28 -205 368 471 ;
+C 193 ; WX 333 ; N grave ; B 121 492 311 664 ;
+C 194 ; WX 333 ; N acute ; B 180 494 403 664 ;
+C 195 ; WX 333 ; N circumflex ; B 91 492 385 661 ;
+C 196 ; WX 333 ; N tilde ; B 100 517 427 624 ;
+C 197 ; WX 333 ; N macron ; B 99 532 411 583 ;
+C 198 ; WX 333 ; N breve ; B 117 492 418 650 ;
+C 199 ; WX 333 ; N dotaccent ; B 207 508 305 606 ;
+C 200 ; WX 333 ; N dieresis ; B 107 508 405 606 ;
+C 202 ; WX 333 ; N ring ; B 155 492 355 691 ;
+C 203 ; WX 333 ; N cedilla ; B -30 -217 182 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B 93 494 486 664 ;
+C 206 ; WX 333 ; N ogonek ; B -20 -169 200 40 ;
+C 207 ; WX 333 ; N caron ; B 121 492 426 661 ;
+C 208 ; WX 889 ; N emdash ; B 119 197 769 243 ;
+C 225 ; WX 889 ; N AE ; B -27 0 911 653 ;
+C 227 ; WX 276 ; N ordfeminine ; B 42 406 352 676 ;
+C 232 ; WX 556 ; N Lslash ; B -8 0 559 653 ;
+C 233 ; WX 722 ; N Oslash ; B 60 -105 699 722 ;
+C 234 ; WX 944 ; N OE ; B 49 -8 964 666 ;
+C 235 ; WX 310 ; N ordmasculine ; B 67 406 362 676 ;
+C 241 ; WX 667 ; N ae ; B 23 -11 640 441 ;
+C 245 ; WX 278 ; N dotlessi ; B 49 -11 235 441 ;
+C 248 ; WX 278 ; N lslash ; B 37 -11 307 683 ;
+C 249 ; WX 500 ; N oslash ; B 28 -135 469 554 ;
+C 250 ; WX 667 ; N oe ; B 20 -12 646 441 ;
+C 251 ; WX 500 ; N germandbls ; B -168 -207 493 679 ;
+C -1 ; WX 444 ; N ecircumflex ; B 31 -11 441 661 ;
+C -1 ; WX 444 ; N edieresis ; B 31 -11 451 606 ;
+C -1 ; WX 500 ; N aacute ; B 17 -11 487 664 ;
+C -1 ; WX 760 ; N registered ; B 41 -18 719 666 ;
+C -1 ; WX 278 ; N icircumflex ; B 34 -11 328 661 ;
+C -1 ; WX 500 ; N udieresis ; B 42 -11 479 606 ;
+C -1 ; WX 500 ; N ograve ; B 27 -11 468 664 ;
+C -1 ; WX 500 ; N uacute ; B 42 -11 477 664 ;
+C -1 ; WX 500 ; N ucircumflex ; B 42 -11 475 661 ;
+C -1 ; WX 611 ; N Aacute ; B -51 0 564 876 ;
+C -1 ; WX 278 ; N igrave ; B 49 -11 284 664 ;
+C -1 ; WX 333 ; N Icircumflex ; B -8 0 425 873 ;
+C -1 ; WX 444 ; N ccedilla ; B 26 -217 425 441 ;
+C -1 ; WX 500 ; N adieresis ; B 17 -11 489 606 ;
+C -1 ; WX 611 ; N Ecircumflex ; B -1 0 634 873 ;
+C -1 ; WX 389 ; N scaron ; B 16 -13 454 661 ;
+C -1 ; WX 500 ; N thorn ; B -75 -205 469 683 ;
+C -1 ; WX 980 ; N trademark ; B 30 247 957 653 ;
+C -1 ; WX 444 ; N egrave ; B 31 -11 412 664 ;
+C -1 ; WX 300 ; N threesuperior ; B 43 268 339 676 ;
+C -1 ; WX 389 ; N zcaron ; B -2 -81 434 661 ;
+C -1 ; WX 500 ; N atilde ; B 17 -11 511 624 ;
+C -1 ; WX 500 ; N aring ; B 17 -11 476 691 ;
+C -1 ; WX 500 ; N ocircumflex ; B 27 -11 468 661 ;
+C -1 ; WX 611 ; N Edieresis ; B -1 0 634 818 ;
+C -1 ; WX 750 ; N threequarters ; B 23 -10 736 676 ;
+C -1 ; WX 444 ; N ydieresis ; B -24 -206 441 606 ;
+C -1 ; WX 444 ; N yacute ; B -24 -206 459 664 ;
+C -1 ; WX 278 ; N iacute ; B 49 -11 356 664 ;
+C -1 ; WX 611 ; N Acircumflex ; B -51 0 564 873 ;
+C -1 ; WX 722 ; N Uacute ; B 102 -18 765 876 ;
+C -1 ; WX 444 ; N eacute ; B 31 -11 459 664 ;
+C -1 ; WX 722 ; N Ograve ; B 60 -18 699 876 ;
+C -1 ; WX 500 ; N agrave ; B 17 -11 476 664 ;
+C -1 ; WX 722 ; N Udieresis ; B 102 -18 765 818 ;
+C -1 ; WX 500 ; N acircumflex ; B 17 -11 476 661 ;
+C -1 ; WX 333 ; N Igrave ; B -8 0 384 876 ;
+C -1 ; WX 300 ; N twosuperior ; B 33 271 324 676 ;
+C -1 ; WX 722 ; N Ugrave ; B 102 -18 765 876 ;
+C -1 ; WX 750 ; N onequarter ; B 33 -10 736 676 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 102 -18 765 873 ;
+C -1 ; WX 500 ; N Scaron ; B 17 -18 520 873 ;
+C -1 ; WX 333 ; N Idieresis ; B -8 0 435 818 ;
+C -1 ; WX 278 ; N idieresis ; B 49 -11 353 606 ;
+C -1 ; WX 611 ; N Egrave ; B -1 0 634 876 ;
+C -1 ; WX 722 ; N Oacute ; B 60 -18 699 876 ;
+C -1 ; WX 675 ; N divide ; B 86 -11 590 517 ;
+C -1 ; WX 611 ; N Atilde ; B -51 0 566 836 ;
+C -1 ; WX 611 ; N Aring ; B -51 0 564 883 ;
+C -1 ; WX 722 ; N Odieresis ; B 60 -18 699 818 ;
+C -1 ; WX 611 ; N Adieresis ; B -51 0 564 818 ;
+C -1 ; WX 667 ; N Ntilde ; B -20 -15 727 836 ;
+C -1 ; WX 556 ; N Zcaron ; B -6 0 606 873 ;
+C -1 ; WX 611 ; N Thorn ; B 0 0 569 653 ;
+C -1 ; WX 333 ; N Iacute ; B -8 0 413 876 ;
+C -1 ; WX 675 ; N plusminus ; B 86 0 590 506 ;
+C -1 ; WX 675 ; N multiply ; B 93 8 582 497 ;
+C -1 ; WX 611 ; N Eacute ; B -1 0 634 876 ;
+C -1 ; WX 556 ; N Ydieresis ; B 78 0 633 818 ;
+C -1 ; WX 300 ; N onesuperior ; B 43 271 284 676 ;
+C -1 ; WX 500 ; N ugrave ; B 42 -11 475 664 ;
+C -1 ; WX 675 ; N logicalnot ; B 86 108 590 386 ;
+C -1 ; WX 500 ; N ntilde ; B 14 -9 476 624 ;
+C -1 ; WX 722 ; N Otilde ; B 60 -18 699 836 ;
+C -1 ; WX 500 ; N otilde ; B 27 -11 496 624 ;
+C -1 ; WX 667 ; N Ccedilla ; B 66 -217 689 666 ;
+C -1 ; WX 611 ; N Agrave ; B -51 0 564 876 ;
+C -1 ; WX 750 ; N onehalf ; B 34 -10 749 676 ;
+C -1 ; WX 722 ; N Eth ; B -8 0 700 653 ;
+C -1 ; WX 400 ; N degree ; B 101 390 387 676 ;
+C -1 ; WX 556 ; N Yacute ; B 78 0 633 876 ;
+C -1 ; WX 722 ; N Ocircumflex ; B 60 -18 699 873 ;
+C -1 ; WX 500 ; N oacute ; B 27 -11 487 664 ;
+C -1 ; WX 500 ; N mu ; B -30 -209 497 428 ;
+C -1 ; WX 675 ; N minus ; B 86 220 590 286 ;
+C -1 ; WX 500 ; N eth ; B 27 -11 482 683 ;
+C -1 ; WX 500 ; N odieresis ; B 27 -11 489 606 ;
+C -1 ; WX 760 ; N copyright ; B 41 -18 719 666 ;
+C -1 ; WX 275 ; N brokenbar ; B 105 -18 171 666 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 182
+
+KPX A y -55
+KPX A w -55
+KPX A v -55
+KPX A u -20
+KPX A quoteright -37
+KPX A Y -55
+KPX A W -95
+KPX A V -105
+KPX A U -50
+KPX A T -37
+KPX A Q -40
+KPX A O -40
+KPX A G -35
+KPX A C -30
+
+KPX B U -10
+KPX B A -25
+
+KPX D Y -40
+KPX D W -40
+KPX D V -40
+KPX D A -35
+
+KPX F r -55
+KPX F period -135
+KPX F o -105
+KPX F i -45
+KPX F e -75
+KPX F comma -135
+KPX F a -75
+KPX F A -115
+
+KPX J u -35
+KPX J period -25
+KPX J o -25
+KPX J e -25
+KPX J comma -25
+KPX J a -35
+KPX J A -40
+
+KPX K y -40
+KPX K u -40
+KPX K o -40
+KPX K e -35
+KPX K O -50
+
+KPX L y -30
+KPX L quoteright -37
+KPX L Y -20
+KPX L W -55
+KPX L V -55
+KPX L T -20
+
+KPX N A -27
+
+KPX O Y -50
+KPX O X -40
+KPX O W -50
+KPX O V -50
+KPX O T -40
+KPX O A -55
+
+KPX P period -135
+KPX P o -80
+KPX P e -80
+KPX P comma -135
+KPX P a -80
+KPX P A -90
+
+KPX Q U -10
+
+KPX R Y -18
+KPX R W -18
+KPX R V -18
+KPX R U -40
+KPX R O -40
+
+KPX T y -74
+KPX T w -74
+KPX T u -55
+KPX T semicolon -65
+KPX T r -55
+KPX T period -74
+KPX T o -92
+KPX T i -55
+KPX T hyphen -74
+KPX T e -92
+KPX T comma -74
+KPX T colon -55
+KPX T a -92
+KPX T O -18
+KPX T A -50
+
+KPX U period -25
+KPX U comma -25
+KPX U A -40
+
+KPX V u -74
+KPX V semicolon -74
+KPX V period -129
+KPX V o -111
+KPX V i -74
+KPX V hyphen -55
+KPX V e -111
+KPX V comma -129
+KPX V colon -65
+KPX V a -111
+KPX V O -30
+KPX V A -60
+
+KPX W y -70
+KPX W u -55
+KPX W semicolon -65
+KPX W period -92
+KPX W o -92
+KPX W i -55
+KPX W hyphen -37
+KPX W e -92
+KPX W comma -92
+KPX W colon -65
+KPX W a -92
+KPX W O -25
+KPX W A -60
+
+KPX Y u -92
+KPX Y semicolon -65
+KPX Y period -92
+KPX Y o -92
+KPX Y i -74
+KPX Y hyphen -74
+KPX Y e -92
+KPX Y comma -92
+KPX Y colon -65
+KPX Y a -92
+KPX Y O -15
+KPX Y A -50
+
+KPX a g -10
+
+KPX b u -20
+KPX b period -40
+
+KPX c k -20
+KPX c h -15
+
+KPX comma quoteright -140
+KPX comma quotedblright -140
+
+KPX e y -30
+KPX e x -20
+KPX e w -15
+KPX e v -15
+KPX e period -15
+KPX e g -40
+KPX e comma -10
+
+KPX f quoteright 92
+KPX f period -15
+KPX f i -20
+KPX f f -18
+KPX f dotlessi -60
+KPX f comma -10
+
+KPX g period -15
+KPX g g -10
+KPX g e -10
+KPX g comma -10
+
+KPX k y -10
+KPX k o -10
+KPX k e -10
+
+KPX n v -40
+
+KPX o v -10
+KPX o g -10
+
+KPX period quoteright -140
+KPX period quotedblright -140
+
+KPX quoteleft quoteleft -111
+
+KPX quoteright v -10
+KPX quoteright t -30
+KPX quoteright space -111
+KPX quoteright s -40
+KPX quoteright r -25
+KPX quoteright quoteright -111
+KPX quoteright d -25
+
+KPX r s -10
+KPX r q -37
+KPX r period -111
+KPX r o -45
+KPX r hyphen -20
+KPX r g -37
+KPX r e -37
+KPX r d -37
+KPX r comma -111
+KPX r c -37
+KPX r a -15
+
+KPX space Y -75
+KPX space W -40
+KPX space V -35
+KPX space T -18
+KPX space A -18
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -74
+KPX w comma -74
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 139 212 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 144 212 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 139 212 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 149 212 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 129 192 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 139 212 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 149 212 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 169 212 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 159 212 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 149 212 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 10 212 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 40 212 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 30 212 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 10 212 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 177 212 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 195 212 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 230 212 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 230 212 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 205 212 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 215 212 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 94 212 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 195 212 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 215 212 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 225 212 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 215 212 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 132 212 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 142 212 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 112 212 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 84 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 84 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 84 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 84 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 84 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 84 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 56 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 56 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 46 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 56 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -47 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -57 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -52 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 49 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 74 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 84 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 84 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 69 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 28 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 74 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 74 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 74 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 84 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 56 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 36 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 8 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Ti-Rm b/font/Ti-Rm
new file mode 100644
index 0000000..e5092b5
--- /dev/null
+++ b/font/Ti-Rm
@@ -0,0 +1,648 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Mar 20 12:15:44 1990
+Comment UniqueID 28416
+Comment VMusage 30487 37379
+FontName Times-Roman
+FullName Times Roman
+FamilyName Times
+Weight Roman
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -168 -218 1000 898
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Times is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 662
+XHeight 450
+Ascender 683
+Descender -217
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 130 -9 238 676 ;
+C 34 ; WX 408 ; N quotedbl ; B 77 431 331 676 ;
+C 35 ; WX 500 ; N numbersign ; B 5 0 496 662 ;
+C 36 ; WX 500 ; N dollar ; B 44 -87 457 727 ;
+C 37 ; WX 833 ; N percent ; B 61 -13 772 676 ;
+C 38 ; WX 778 ; N ampersand ; B 42 -13 750 676 ;
+C 39 ; WX 333 ; N quoteright ; B 79 433 218 676 ;
+C 40 ; WX 333 ; N parenleft ; B 48 -177 304 676 ;
+C 41 ; WX 333 ; N parenright ; B 29 -177 285 676 ;
+C 42 ; WX 500 ; N asterisk ; B 69 265 432 676 ;
+C 43 ; WX 564 ; N plus ; B 30 0 534 506 ;
+C 44 ; WX 250 ; N comma ; B 56 -141 195 102 ;
+C 45 ; WX 333 ; N hyphen ; B 39 194 285 257 ;
+C 46 ; WX 250 ; N period ; B 70 -11 181 100 ;
+C 47 ; WX 278 ; N slash ; B -9 -14 287 676 ;
+C 48 ; WX 500 ; N zero ; B 24 -14 476 676 ;
+C 49 ; WX 500 ; N one ; B 111 0 394 676 ;
+C 50 ; WX 500 ; N two ; B 30 0 475 676 ;
+C 51 ; WX 500 ; N three ; B 43 -14 431 676 ;
+C 52 ; WX 500 ; N four ; B 12 0 472 676 ;
+C 53 ; WX 500 ; N five ; B 32 -14 438 688 ;
+C 54 ; WX 500 ; N six ; B 34 -14 468 684 ;
+C 55 ; WX 500 ; N seven ; B 20 -8 449 662 ;
+C 56 ; WX 500 ; N eight ; B 56 -14 445 676 ;
+C 57 ; WX 500 ; N nine ; B 30 -22 459 676 ;
+C 58 ; WX 278 ; N colon ; B 81 -11 192 459 ;
+C 59 ; WX 278 ; N semicolon ; B 80 -141 219 459 ;
+C 60 ; WX 564 ; N less ; B 28 -8 536 514 ;
+C 61 ; WX 564 ; N equal ; B 30 120 534 386 ;
+C 62 ; WX 564 ; N greater ; B 28 -8 536 514 ;
+C 63 ; WX 444 ; N question ; B 68 -8 414 676 ;
+C 64 ; WX 921 ; N at ; B 116 -14 809 676 ;
+C 65 ; WX 722 ; N A ; B 15 0 706 674 ;
+C 66 ; WX 667 ; N B ; B 17 0 593 662 ;
+C 67 ; WX 667 ; N C ; B 28 -14 633 676 ;
+C 68 ; WX 722 ; N D ; B 16 0 685 662 ;
+C 69 ; WX 611 ; N E ; B 12 0 597 662 ;
+C 70 ; WX 556 ; N F ; B 12 0 546 662 ;
+C 71 ; WX 722 ; N G ; B 32 -14 709 676 ;
+C 72 ; WX 722 ; N H ; B 19 0 702 662 ;
+C 73 ; WX 333 ; N I ; B 18 0 315 662 ;
+C 74 ; WX 389 ; N J ; B 10 -14 370 662 ;
+C 75 ; WX 722 ; N K ; B 34 0 723 662 ;
+C 76 ; WX 611 ; N L ; B 12 0 598 662 ;
+C 77 ; WX 889 ; N M ; B 12 0 863 662 ;
+C 78 ; WX 722 ; N N ; B 12 -11 707 662 ;
+C 79 ; WX 722 ; N O ; B 34 -14 688 676 ;
+C 80 ; WX 556 ; N P ; B 16 0 542 662 ;
+C 81 ; WX 722 ; N Q ; B 34 -178 701 676 ;
+C 82 ; WX 667 ; N R ; B 17 0 659 662 ;
+C 83 ; WX 556 ; N S ; B 42 -14 491 676 ;
+C 84 ; WX 611 ; N T ; B 17 0 593 662 ;
+C 85 ; WX 722 ; N U ; B 14 -14 705 662 ;
+C 86 ; WX 722 ; N V ; B 16 -11 697 662 ;
+C 87 ; WX 944 ; N W ; B 5 -11 932 662 ;
+C 88 ; WX 722 ; N X ; B 10 0 704 662 ;
+C 89 ; WX 722 ; N Y ; B 22 0 703 662 ;
+C 90 ; WX 611 ; N Z ; B 9 0 597 662 ;
+C 91 ; WX 333 ; N bracketleft ; B 88 -156 299 662 ;
+C 92 ; WX 278 ; N backslash ; B -9 -14 287 676 ;
+C 93 ; WX 333 ; N bracketright ; B 34 -156 245 662 ;
+C 94 ; WX 469 ; N asciicircum ; B 24 297 446 662 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 333 ; N quoteleft ; B 115 433 254 676 ;
+C 97 ; WX 444 ; N a ; B 37 -10 442 460 ;
+C 98 ; WX 500 ; N b ; B 3 -10 468 683 ;
+C 99 ; WX 444 ; N c ; B 25 -10 412 460 ;
+C 100 ; WX 500 ; N d ; B 27 -10 491 683 ;
+C 101 ; WX 444 ; N e ; B 25 -10 424 460 ;
+C 102 ; WX 333 ; N f ; B 20 0 383 683 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 28 -218 470 460 ;
+C 104 ; WX 500 ; N h ; B 9 0 487 683 ;
+C 105 ; WX 278 ; N i ; B 16 0 253 683 ;
+C 106 ; WX 278 ; N j ; B -70 -218 194 683 ;
+C 107 ; WX 500 ; N k ; B 7 0 505 683 ;
+C 108 ; WX 278 ; N l ; B 19 0 257 683 ;
+C 109 ; WX 778 ; N m ; B 16 0 775 460 ;
+C 110 ; WX 500 ; N n ; B 16 0 485 460 ;
+C 111 ; WX 500 ; N o ; B 29 -10 470 460 ;
+C 112 ; WX 500 ; N p ; B 5 -217 470 460 ;
+C 113 ; WX 500 ; N q ; B 24 -217 488 460 ;
+C 114 ; WX 333 ; N r ; B 5 0 335 460 ;
+C 115 ; WX 389 ; N s ; B 51 -10 348 460 ;
+C 116 ; WX 278 ; N t ; B 13 -10 279 579 ;
+C 117 ; WX 500 ; N u ; B 9 -10 479 450 ;
+C 118 ; WX 500 ; N v ; B 19 -14 477 450 ;
+C 119 ; WX 722 ; N w ; B 21 -14 694 450 ;
+C 120 ; WX 500 ; N x ; B 17 0 479 450 ;
+C 121 ; WX 500 ; N y ; B 14 -218 475 450 ;
+C 122 ; WX 444 ; N z ; B 27 0 418 450 ;
+C 123 ; WX 480 ; N braceleft ; B 100 -181 350 680 ;
+C 124 ; WX 200 ; N bar ; B 67 -14 133 676 ;
+C 125 ; WX 480 ; N braceright ; B 130 -181 380 680 ;
+C 126 ; WX 541 ; N asciitilde ; B 40 183 502 323 ;
+C 161 ; WX 333 ; N exclamdown ; B 97 -218 205 467 ;
+C 162 ; WX 500 ; N cent ; B 53 -138 448 579 ;
+C 163 ; WX 500 ; N sterling ; B 12 -8 490 676 ;
+C 164 ; WX 167 ; N fraction ; B -168 -14 331 676 ;
+C 165 ; WX 500 ; N yen ; B -53 0 512 662 ;
+C 166 ; WX 500 ; N florin ; B 7 -189 490 676 ;
+C 167 ; WX 500 ; N section ; B 70 -148 426 676 ;
+C 168 ; WX 500 ; N currency ; B -22 58 522 602 ;
+C 169 ; WX 180 ; N quotesingle ; B 48 431 133 676 ;
+C 170 ; WX 444 ; N quotedblleft ; B 43 433 414 676 ;
+C 171 ; WX 500 ; N guillemotleft ; B 42 33 456 416 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 63 33 285 416 ;
+C 173 ; WX 333 ; N guilsinglright ; B 48 33 270 416 ;
+C 174 ; WX 556 ; N fi ; B 31 0 521 683 ;
+C 175 ; WX 556 ; N fl ; B 32 0 521 683 ;
+C 177 ; WX 500 ; N endash ; B 0 201 500 250 ;
+C 178 ; WX 500 ; N dagger ; B 59 -149 442 676 ;
+C 179 ; WX 500 ; N daggerdbl ; B 58 -153 442 676 ;
+C 180 ; WX 250 ; N periodcentered ; B 70 199 181 310 ;
+C 182 ; WX 453 ; N paragraph ; B -22 -154 450 662 ;
+C 183 ; WX 350 ; N bullet ; B 40 196 310 466 ;
+C 184 ; WX 333 ; N quotesinglbase ; B 79 -141 218 102 ;
+C 185 ; WX 444 ; N quotedblbase ; B 45 -141 416 102 ;
+C 186 ; WX 444 ; N quotedblright ; B 30 433 401 676 ;
+C 187 ; WX 500 ; N guillemotright ; B 44 33 458 416 ;
+C 188 ; WX 1000 ; N ellipsis ; B 111 -11 888 100 ;
+C 189 ; WX 1000 ; N perthousand ; B 7 -19 994 706 ;
+C 191 ; WX 444 ; N questiondown ; B 30 -218 376 466 ;
+C 193 ; WX 333 ; N grave ; B 19 507 242 678 ;
+C 194 ; WX 333 ; N acute ; B 93 507 317 678 ;
+C 195 ; WX 333 ; N circumflex ; B 11 507 322 674 ;
+C 196 ; WX 333 ; N tilde ; B 1 532 331 638 ;
+C 197 ; WX 333 ; N macron ; B 11 547 322 601 ;
+C 198 ; WX 333 ; N breve ; B 26 507 307 664 ;
+C 199 ; WX 333 ; N dotaccent ; B 118 523 216 623 ;
+C 200 ; WX 333 ; N dieresis ; B 18 523 315 623 ;
+C 202 ; WX 333 ; N ring ; B 67 512 266 711 ;
+C 203 ; WX 333 ; N cedilla ; B 52 -215 261 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -3 507 377 678 ;
+C 206 ; WX 333 ; N ogonek ; B 64 -165 249 0 ;
+C 207 ; WX 333 ; N caron ; B 11 507 322 674 ;
+C 208 ; WX 1000 ; N emdash ; B 0 201 1000 250 ;
+C 225 ; WX 889 ; N AE ; B 0 0 863 662 ;
+C 227 ; WX 276 ; N ordfeminine ; B 4 394 270 676 ;
+C 232 ; WX 611 ; N Lslash ; B 12 0 598 662 ;
+C 233 ; WX 722 ; N Oslash ; B 34 -80 688 734 ;
+C 234 ; WX 889 ; N OE ; B 30 -6 885 668 ;
+C 235 ; WX 310 ; N ordmasculine ; B 6 394 304 676 ;
+C 241 ; WX 667 ; N ae ; B 38 -10 632 460 ;
+C 245 ; WX 278 ; N dotlessi ; B 16 0 253 460 ;
+C 248 ; WX 278 ; N lslash ; B 19 0 259 683 ;
+C 249 ; WX 500 ; N oslash ; B 29 -112 470 551 ;
+C 250 ; WX 722 ; N oe ; B 30 -10 690 460 ;
+C 251 ; WX 500 ; N germandbls ; B 12 -9 468 683 ;
+C -1 ; WX 611 ; N Zcaron ; B 9 0 597 886 ;
+C -1 ; WX 444 ; N ccedilla ; B 25 -215 412 460 ;
+C -1 ; WX 500 ; N ydieresis ; B 14 -218 475 623 ;
+C -1 ; WX 444 ; N atilde ; B 37 -10 442 638 ;
+C -1 ; WX 278 ; N icircumflex ; B -16 0 295 674 ;
+C -1 ; WX 300 ; N threesuperior ; B 15 262 291 676 ;
+C -1 ; WX 444 ; N ecircumflex ; B 25 -10 424 674 ;
+C -1 ; WX 500 ; N thorn ; B 5 -217 470 683 ;
+C -1 ; WX 444 ; N egrave ; B 25 -10 424 678 ;
+C -1 ; WX 300 ; N twosuperior ; B 1 270 296 676 ;
+C -1 ; WX 444 ; N eacute ; B 25 -10 424 678 ;
+C -1 ; WX 500 ; N otilde ; B 29 -10 470 638 ;
+C -1 ; WX 722 ; N Aacute ; B 15 0 706 890 ;
+C -1 ; WX 500 ; N ocircumflex ; B 29 -10 470 674 ;
+C -1 ; WX 500 ; N yacute ; B 14 -218 475 678 ;
+C -1 ; WX 500 ; N udieresis ; B 9 -10 479 623 ;
+C -1 ; WX 750 ; N threequarters ; B 15 -14 718 676 ;
+C -1 ; WX 444 ; N acircumflex ; B 37 -10 442 674 ;
+C -1 ; WX 722 ; N Eth ; B 16 0 685 662 ;
+C -1 ; WX 444 ; N edieresis ; B 25 -10 424 623 ;
+C -1 ; WX 500 ; N ugrave ; B 9 -10 479 678 ;
+C -1 ; WX 980 ; N trademark ; B 30 256 957 662 ;
+C -1 ; WX 500 ; N ograve ; B 29 -10 470 678 ;
+C -1 ; WX 389 ; N scaron ; B 39 -10 350 674 ;
+C -1 ; WX 333 ; N Idieresis ; B 18 0 315 835 ;
+C -1 ; WX 500 ; N uacute ; B 9 -10 479 678 ;
+C -1 ; WX 444 ; N agrave ; B 37 -10 442 678 ;
+C -1 ; WX 500 ; N ntilde ; B 16 0 485 638 ;
+C -1 ; WX 444 ; N aring ; B 37 -10 442 711 ;
+C -1 ; WX 444 ; N zcaron ; B 27 0 418 674 ;
+C -1 ; WX 333 ; N Icircumflex ; B 11 0 322 886 ;
+C -1 ; WX 722 ; N Ntilde ; B 12 -11 707 850 ;
+C -1 ; WX 500 ; N ucircumflex ; B 9 -10 479 674 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 12 0 597 886 ;
+C -1 ; WX 333 ; N Iacute ; B 18 0 317 890 ;
+C -1 ; WX 667 ; N Ccedilla ; B 28 -215 633 676 ;
+C -1 ; WX 722 ; N Odieresis ; B 34 -14 688 835 ;
+C -1 ; WX 556 ; N Scaron ; B 42 -14 491 886 ;
+C -1 ; WX 611 ; N Edieresis ; B 12 0 597 835 ;
+C -1 ; WX 333 ; N Igrave ; B 18 0 315 890 ;
+C -1 ; WX 444 ; N adieresis ; B 37 -10 442 623 ;
+C -1 ; WX 722 ; N Ograve ; B 34 -14 688 890 ;
+C -1 ; WX 611 ; N Egrave ; B 12 0 597 890 ;
+C -1 ; WX 722 ; N Ydieresis ; B 22 0 703 835 ;
+C -1 ; WX 760 ; N registered ; B 38 -14 722 676 ;
+C -1 ; WX 722 ; N Otilde ; B 34 -14 688 850 ;
+C -1 ; WX 750 ; N onequarter ; B 37 -14 718 676 ;
+C -1 ; WX 722 ; N Ugrave ; B 14 -14 705 890 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 14 -14 705 886 ;
+C -1 ; WX 556 ; N Thorn ; B 16 0 542 662 ;
+C -1 ; WX 564 ; N divide ; B 30 -10 534 516 ;
+C -1 ; WX 722 ; N Atilde ; B 15 0 706 850 ;
+C -1 ; WX 722 ; N Uacute ; B 14 -14 705 890 ;
+C -1 ; WX 722 ; N Ocircumflex ; B 34 -14 688 886 ;
+C -1 ; WX 564 ; N logicalnot ; B 30 108 534 386 ;
+C -1 ; WX 722 ; N Aring ; B 15 0 706 898 ;
+C -1 ; WX 278 ; N idieresis ; B -9 0 288 623 ;
+C -1 ; WX 278 ; N iacute ; B 16 0 290 678 ;
+C -1 ; WX 444 ; N aacute ; B 37 -10 442 678 ;
+C -1 ; WX 564 ; N plusminus ; B 30 0 534 506 ;
+C -1 ; WX 564 ; N multiply ; B 38 8 527 497 ;
+C -1 ; WX 722 ; N Udieresis ; B 14 -14 705 835 ;
+C -1 ; WX 564 ; N minus ; B 30 220 534 286 ;
+C -1 ; WX 300 ; N onesuperior ; B 57 270 248 676 ;
+C -1 ; WX 611 ; N Eacute ; B 12 0 597 890 ;
+C -1 ; WX 722 ; N Acircumflex ; B 15 0 706 886 ;
+C -1 ; WX 760 ; N copyright ; B 38 -14 722 676 ;
+C -1 ; WX 722 ; N Agrave ; B 15 0 706 890 ;
+C -1 ; WX 500 ; N odieresis ; B 29 -10 470 623 ;
+C -1 ; WX 500 ; N oacute ; B 29 -10 470 678 ;
+C -1 ; WX 400 ; N degree ; B 57 390 343 676 ;
+C -1 ; WX 278 ; N igrave ; B -8 0 253 678 ;
+C -1 ; WX 500 ; N mu ; B 36 -218 512 450 ;
+C -1 ; WX 722 ; N Oacute ; B 34 -14 688 890 ;
+C -1 ; WX 500 ; N eth ; B 29 -10 471 686 ;
+C -1 ; WX 722 ; N Adieresis ; B 15 0 706 835 ;
+C -1 ; WX 722 ; N Yacute ; B 22 0 703 890 ;
+C -1 ; WX 200 ; N brokenbar ; B 67 -14 133 676 ;
+C -1 ; WX 750 ; N onehalf ; B 31 -14 746 676 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 283
+
+KPX A y -92
+KPX A w -92
+KPX A v -74
+KPX A u 0
+KPX A quoteright -111
+KPX A quotedblright 0
+KPX A p 0
+KPX A Y -105
+KPX A W -90
+KPX A V -135
+KPX A U -55
+KPX A T -111
+KPX A Q -55
+KPX A O -55
+KPX A G -40
+KPX A C -40
+
+KPX B period 0
+KPX B comma 0
+KPX B U -10
+KPX B A -35
+
+KPX D period 0
+KPX D comma 0
+KPX D Y -55
+KPX D W -30
+KPX D V -40
+KPX D A -40
+
+KPX F r 0
+KPX F period -80
+KPX F o -15
+KPX F i 0
+KPX F e 0
+KPX F comma -80
+KPX F a -15
+KPX F A -74
+
+KPX G period 0
+KPX G comma 0
+
+KPX J u 0
+KPX J period 0
+KPX J o 0
+KPX J e 0
+KPX J comma 0
+KPX J a 0
+KPX J A -60
+
+KPX K y -25
+KPX K u -15
+KPX K o -35
+KPX K e -25
+KPX K O -30
+
+KPX L y -55
+KPX L quoteright -92
+KPX L quotedblright 0
+KPX L Y -100
+KPX L W -74
+KPX L V -100
+KPX L T -92
+
+KPX N period 0
+KPX N comma 0
+KPX N A -35
+
+KPX O period 0
+KPX O comma 0
+KPX O Y -50
+KPX O X -40
+KPX O W -35
+KPX O V -50
+KPX O T -40
+KPX O A -35
+
+KPX P period -111
+KPX P o 0
+KPX P e 0
+KPX P comma -111
+KPX P a -15
+KPX P A -92
+
+KPX Q period 0
+KPX Q comma 0
+KPX Q U -10
+
+KPX R Y -65
+KPX R W -55
+KPX R V -80
+KPX R U -40
+KPX R T -60
+KPX R O -40
+
+KPX S period 0
+KPX S comma 0
+
+KPX T y -80
+KPX T w -80
+KPX T u -45
+KPX T semicolon -55
+KPX T r -35
+KPX T period -74
+KPX T o -80
+KPX T i -35
+KPX T hyphen -92
+KPX T h 0
+KPX T e -70
+KPX T comma -74
+KPX T colon -50
+KPX T a -80
+KPX T O -18
+KPX T A -93
+
+KPX U period 0
+KPX U comma 0
+KPX U A -40
+
+KPX V u -75
+KPX V semicolon -74
+KPX V period -129
+KPX V o -129
+KPX V i -60
+KPX V hyphen -100
+KPX V e -111
+KPX V comma -129
+KPX V colon -74
+KPX V a -111
+KPX V O -40
+KPX V G -15
+KPX V A -135
+
+KPX W y -73
+KPX W u -50
+KPX W semicolon -37
+KPX W period -92
+KPX W o -80
+KPX W i -40
+KPX W hyphen -65
+KPX W h 0
+KPX W e -80
+KPX W comma -92
+KPX W colon -37
+KPX W a -80
+KPX W O -10
+KPX W A -120
+
+KPX Y u -111
+KPX Y semicolon -92
+KPX Y period -129
+KPX Y o -110
+KPX Y i -55
+KPX Y hyphen -111
+KPX Y e -100
+KPX Y comma -129
+KPX Y colon -92
+KPX Y a -100
+KPX Y O -30
+KPX Y A -120
+
+KPX a y 0
+KPX a w -15
+KPX a v -20
+KPX a t 0
+KPX a p 0
+KPX a g 0
+KPX a b 0
+
+KPX b y 0
+KPX b v -15
+KPX b u -20
+KPX b period -40
+KPX b l 0
+KPX b comma 0
+KPX b b 0
+
+KPX c y -15
+KPX c period 0
+KPX c l 0
+KPX c k 0
+KPX c h 0
+KPX c comma 0
+
+KPX colon space 0
+
+KPX comma space 0
+KPX comma quoteright -70
+KPX comma quotedblright -70
+
+KPX d y 0
+KPX d w 0
+KPX d v 0
+KPX d period 0
+KPX d d 0
+KPX d comma 0
+
+KPX e y -15
+KPX e x -15
+KPX e w -25
+KPX e v -25
+KPX e period 0
+KPX e p 0
+KPX e g -15
+KPX e comma 0
+KPX e b 0
+
+KPX f quoteright 55
+KPX f quotedblright 0
+KPX f period 0
+KPX f o 0
+KPX f l 0
+KPX f i -20
+KPX f f -25
+KPX f e 0
+KPX f dotlessi -50
+KPX f comma 0
+KPX f a -10
+
+KPX g y 0
+KPX g r 0
+KPX g period 0
+KPX g o 0
+KPX g i 0
+KPX g g 0
+KPX g e 0
+KPX g comma 0
+KPX g a -5
+
+KPX h y -5
+
+KPX i v -25
+
+KPX k y -15
+KPX k o -10
+KPX k e -10
+
+KPX l y 0
+KPX l w -10
+
+KPX m y 0
+KPX m u 0
+
+KPX n y -15
+KPX n v -40
+KPX n u 0
+
+KPX o y -10
+KPX o x 0
+KPX o w -25
+KPX o v -15
+KPX o g 0
+
+KPX p y -10
+
+KPX period quoteright -70
+KPX period quotedblright -70
+
+KPX quotedblleft quoteleft 0
+KPX quotedblleft A -80
+
+KPX quotedblright space 0
+
+KPX quoteleft quoteleft -74
+KPX quoteleft A -80
+
+KPX quoteright v -50
+KPX quoteright t -18
+KPX quoteright space -74
+KPX quoteright s -55
+KPX quoteright r -50
+KPX quoteright quoteright -74
+KPX quoteright quotedblright 0
+KPX quoteright l -10
+KPX quoteright d -50
+
+KPX r y 0
+KPX r v 0
+KPX r u 0
+KPX r t 0
+KPX r s 0
+KPX r r 0
+KPX r q 0
+KPX r period -55
+KPX r p 0
+KPX r o 0
+KPX r n 0
+KPX r m 0
+KPX r l 0
+KPX r k 0
+KPX r i 0
+KPX r hyphen -20
+KPX r g -18
+KPX r e 0
+KPX r d 0
+KPX r comma -40
+KPX r c 0
+KPX r a 0
+
+KPX s w 0
+
+KPX space quoteleft 0
+KPX space quotedblleft 0
+KPX space Y -90
+KPX space W -30
+KPX space V -50
+KPX space T -18
+KPX space A -55
+
+KPX v period -65
+KPX v o -20
+KPX v e -15
+KPX v comma -65
+KPX v a -25
+
+KPX w period -65
+KPX w o -10
+KPX w h 0
+KPX w e 0
+KPX w comma -65
+KPX w a -10
+
+KPX x e -15
+
+KPX y period -65
+KPX y o 0
+KPX y e 0
+KPX y comma -65
+KPX y a 0
+
+KPX z o 0
+KPX z e 0
+EndKernPairs
+EndKernData
+StartComposites 58
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 195 212 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 195 212 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 195 212 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 195 212 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 185 187 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 195 212 ;
+CC Ccedilla 2 ; PCC C 0 0 ; PCC cedilla 167 0 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 212 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 212 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 212 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 212 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 0 212 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 0 212 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 0 212 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 0 212 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 195 212 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 195 212 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 195 212 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 195 212 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 195 212 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 195 212 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 112 212 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 195 212 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 195 212 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 195 212 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 195 212 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 195 212 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 195 212 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 139 212 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 56 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 56 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 56 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 56 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 56 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 56 0 ;
+CC ccedilla 2 ; PCC c 0 0 ; PCC cedilla 56 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 56 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 56 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 56 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 56 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -27 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 84 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 84 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 84 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 84 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 84 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 28 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 84 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 84 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 84 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 84 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 84 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 84 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 56 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Ti-RmSC b/font/Ti-RmSC
new file mode 100644
index 0000000..78bcf48
--- /dev/null
+++ b/font/Ti-RmSC
@@ -0,0 +1,550 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Tue Dec  4 11:14:47 1990
+Comment UniqueID 33647
+Comment VMusage 29411 36303
+FontName Times-RomanSC
+FullName Times Roman Small Caps & Old Style Figures
+FamilyName Times
+Weight Roman
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -168 -218 994 898
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.Times is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 662
+XHeight 486
+Ascender 486
+Descender 0
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 130 -9 238 676 ;
+C 34 ; WX 408 ; N quotedbl ; B 77 431 331 676 ;
+C 35 ; WX 500 ; N numbersign ; B 5 0 496 662 ;
+C 36 ; WX 500 ; N dollar ; B 44 -87 457 727 ;
+C 37 ; WX 833 ; N percent ; B 61 -13 772 676 ;
+C 38 ; WX 778 ; N ampersand ; B 42 -13 750 676 ;
+C 39 ; WX 333 ; N quoteright ; B 79 433 218 676 ;
+C 40 ; WX 333 ; N parenleft ; B 48 -177 304 676 ;
+C 41 ; WX 333 ; N parenright ; B 29 -177 285 676 ;
+C 42 ; WX 500 ; N asterisk ; B 69 265 432 676 ;
+C 43 ; WX 564 ; N plus ; B 30 0 534 506 ;
+C 44 ; WX 250 ; N comma ; B 56 -141 195 102 ;
+C 45 ; WX 333 ; N hyphen ; B 39 194 285 257 ;
+C 46 ; WX 250 ; N period ; B 70 -11 181 100 ;
+C 47 ; WX 278 ; N slash ; B -9 -14 287 676 ;
+C 48 ; WX 500 ; N zero ; B 20 -8 474 494 ;
+C 49 ; WX 500 ; N one ; B 111 0 382 486 ;
+C 50 ; WX 500 ; N two ; B 39 0 442 494 ;
+C 51 ; WX 500 ; N three ; B 45 -188 432 494 ;
+C 52 ; WX 500 ; N four ; B 14 -177 475 505 ;
+C 53 ; WX 500 ; N five ; B 34 -188 442 510 ;
+C 54 ; WX 500 ; N six ; B 38 -8 466 684 ;
+C 55 ; WX 500 ; N seven ; B 18 -187 454 486 ;
+C 56 ; WX 500 ; N eight ; B 52 -8 438 674 ;
+C 57 ; WX 500 ; N nine ; B 28 -198 454 494 ;
+C 58 ; WX 278 ; N colon ; B 81 -11 192 459 ;
+C 59 ; WX 278 ; N semicolon ; B 80 -141 219 459 ;
+C 60 ; WX 564 ; N less ; B 28 -8 536 514 ;
+C 61 ; WX 564 ; N equal ; B 30 120 534 386 ;
+C 62 ; WX 564 ; N greater ; B 28 -8 536 514 ;
+C 63 ; WX 444 ; N question ; B 68 -8 414 676 ;
+C 64 ; WX 921 ; N at ; B 116 -14 809 676 ;
+C 65 ; WX 722 ; N A ; B 15 0 706 674 ;
+C 66 ; WX 667 ; N B ; B 17 0 593 662 ;
+C 67 ; WX 667 ; N C ; B 28 -14 633 676 ;
+C 68 ; WX 722 ; N D ; B 16 0 685 662 ;
+C 69 ; WX 611 ; N E ; B 12 0 597 662 ;
+C 70 ; WX 556 ; N F ; B 12 0 546 662 ;
+C 71 ; WX 722 ; N G ; B 32 -14 709 676 ;
+C 72 ; WX 722 ; N H ; B 19 0 702 662 ;
+C 73 ; WX 333 ; N I ; B 18 0 315 662 ;
+C 74 ; WX 389 ; N J ; B 10 -14 370 662 ;
+C 75 ; WX 722 ; N K ; B 34 0 723 662 ;
+C 76 ; WX 611 ; N L ; B 12 0 598 662 ;
+C 77 ; WX 889 ; N M ; B 12 0 863 662 ;
+C 78 ; WX 722 ; N N ; B 12 -11 707 662 ;
+C 79 ; WX 722 ; N O ; B 34 -14 688 676 ;
+C 80 ; WX 556 ; N P ; B 16 0 542 662 ;
+C 81 ; WX 722 ; N Q ; B 34 -178 701 676 ;
+C 82 ; WX 667 ; N R ; B 17 0 659 662 ;
+C 83 ; WX 556 ; N S ; B 42 -14 491 676 ;
+C 84 ; WX 611 ; N T ; B 17 0 593 662 ;
+C 85 ; WX 722 ; N U ; B 14 -14 705 662 ;
+C 86 ; WX 722 ; N V ; B 16 -11 697 662 ;
+C 87 ; WX 944 ; N W ; B 5 -11 932 662 ;
+C 88 ; WX 722 ; N X ; B 10 0 704 662 ;
+C 89 ; WX 722 ; N Y ; B 22 0 703 662 ;
+C 90 ; WX 611 ; N Z ; B 9 0 597 662 ;
+C 91 ; WX 333 ; N bracketleft ; B 88 -156 299 662 ;
+C 92 ; WX 278 ; N backslash ; B -9 -14 287 676 ;
+C 93 ; WX 333 ; N bracketright ; B 34 -156 245 662 ;
+C 94 ; WX 469 ; N asciicircum ; B 24 297 446 662 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 333 ; N quoteleft ; B 115 433 254 676 ;
+C 97 ; WX 556 ; N a ; B 24 0 526 494 ;
+C 98 ; WX 500 ; N b ; B 24 0 458 486 ;
+C 99 ; WX 500 ; N c ; B 18 -8 477 494 ;
+C 100 ; WX 556 ; N d ; B 20 0 536 486 ;
+C 101 ; WX 500 ; N e ; B 22 0 468 486 ;
+C 102 ; WX 444 ; N f ; B 23 0 438 486 ; L i fi ; L l fl ;
+C 103 ; WX 556 ; N g ; B 20 -8 537 494 ;
+C 104 ; WX 611 ; N h ; B 24 0 576 486 ;
+C 105 ; WX 278 ; N i ; B 14 0 252 486 ;
+C 106 ; WX 333 ; N j ; B 8 -8 300 486 ;
+C 107 ; WX 556 ; N k ; B 22 0 548 486 ;
+C 108 ; WX 500 ; N l ; B 22 0 474 486 ;
+C 109 ; WX 667 ; N m ; B 14 0 648 486 ;
+C 110 ; WX 611 ; N n ; B 23 0 579 486 ;
+C 111 ; WX 556 ; N o ; B 22 -8 522 494 ;
+C 112 ; WX 444 ; N p ; B 14 0 436 486 ;
+C 113 ; WX 556 ; N q ; B 22 -124 523 494 ;
+C 114 ; WX 500 ; N r ; B 14 0 493 486 ;
+C 115 ; WX 389 ; N s ; B 27 -8 354 494 ;
+C 116 ; WX 500 ; N t ; B 26 0 468 486 ;
+C 117 ; WX 611 ; N u ; B 21 -8 581 486 ;
+C 118 ; WX 556 ; N v ; B 26 -8 524 486 ;
+C 119 ; WX 778 ; N w ; B 0 -8 770 486 ;
+C 120 ; WX 556 ; N x ; B 26 0 526 486 ;
+C 121 ; WX 556 ; N y ; B 24 0 528 486 ;
+C 122 ; WX 556 ; N z ; B 24 0 522 486 ;
+C 123 ; WX 480 ; N braceleft ; B 100 -181 350 680 ;
+C 124 ; WX 200 ; N bar ; B 67 -14 133 676 ;
+C 125 ; WX 480 ; N braceright ; B 130 -181 380 680 ;
+C 126 ; WX 541 ; N asciitilde ; B 40 183 502 323 ;
+C 161 ; WX 333 ; N exclamdown ; B 97 -218 205 467 ;
+C 162 ; WX 500 ; N cent ; B 53 -138 448 579 ;
+C 163 ; WX 500 ; N sterling ; B 12 -8 490 676 ;
+C 164 ; WX 167 ; N fraction ; B -168 -14 331 676 ;
+C 165 ; WX 500 ; N yen ; B -53 0 512 662 ;
+C 166 ; WX 500 ; N florin ; B 7 -189 490 676 ;
+C 167 ; WX 500 ; N section ; B 70 -148 426 676 ;
+C 168 ; WX 611 ; N currency ; B 28 -8 574 494 ;
+C 169 ; WX 180 ; N quotesingle ; B 48 431 133 676 ;
+C 170 ; WX 444 ; N quotedblleft ; B 43 433 414 676 ;
+C 171 ; WX 500 ; N guillemotleft ; B 42 33 456 416 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 63 33 285 416 ;
+C 173 ; WX 333 ; N guilsinglright ; B 48 33 270 416 ;
+C 174 ; WX 722 ; N fi ; B 23 0 696 486 ;
+C 175 ; WX 944 ; N fl ; B 23 0 918 486 ;
+C 177 ; WX 500 ; N endash ; B 0 201 500 250 ;
+C 178 ; WX 500 ; N dagger ; B 59 -149 442 676 ;
+C 179 ; WX 500 ; N daggerdbl ; B 58 -153 442 676 ;
+C 180 ; WX 250 ; N periodcentered ; B 70 199 181 310 ;
+C 182 ; WX 453 ; N paragraph ; B -22 -154 450 662 ;
+C 183 ; WX 350 ; N bullet ; B 40 196 310 466 ;
+C 184 ; WX 333 ; N quotesinglbase ; B 79 -141 218 102 ;
+C 185 ; WX 444 ; N quotedblbase ; B 45 -141 416 102 ;
+C 186 ; WX 444 ; N quotedblright ; B 30 433 401 676 ;
+C 187 ; WX 500 ; N guillemotright ; B 44 33 458 416 ;
+C 188 ; WX 1000 ; N ellipsis ; B 111 -11 888 100 ;
+C 189 ; WX 1000 ; N perthousand ; B 7 -19 994 706 ;
+C 191 ; WX 444 ; N questiondown ; B 30 -218 376 466 ;
+C 193 ; WX 333 ; N grave ; B 19 543 242 714 ;
+C 194 ; WX 333 ; N acute ; B 93 543 317 714 ;
+C 195 ; WX 333 ; N circumflex ; B 11 543 322 710 ;
+C 196 ; WX 333 ; N tilde ; B 1 568 331 674 ;
+C 197 ; WX 333 ; N macron ; B 11 583 322 637 ;
+C 198 ; WX 333 ; N breve ; B 26 543 307 700 ;
+C 199 ; WX 333 ; N dotaccent ; B 118 559 216 659 ;
+C 200 ; WX 333 ; N dieresis ; B 18 559 315 659 ;
+C 202 ; WX 333 ; N ring ; B 67 548 266 747 ;
+C 203 ; WX 333 ; N cedilla ; B 52 -215 261 0 ;
+C 205 ; WX 333 ; N hungarumlaut ; B -3 543 377 714 ;
+C 206 ; WX 333 ; N ogonek ; B 64 -165 249 0 ;
+C 207 ; WX 333 ; N caron ; B 11 543 322 710 ;
+C 208 ; WX 1000 ; N emdash ; B 125 201 875 250 ;
+C 225 ; WX 889 ; N AE ; B 0 0 863 662 ;
+C 227 ; WX 276 ; N ordfeminine ; B 4 394 270 676 ;
+C 232 ; WX 611 ; N Lslash ; B 12 0 598 662 ;
+C 233 ; WX 722 ; N Oslash ; B 34 -80 688 734 ;
+C 234 ; WX 889 ; N OE ; B 30 -6 885 668 ;
+C 235 ; WX 310 ; N ordmasculine ; B 6 394 304 676 ;
+C 241 ; WX 722 ; N ae ; B 18 0 691 486 ;
+C 245 ; WX 278 ; N dotlessi ; B 14 0 252 486 ;
+C 248 ; WX 500 ; N lslash ; B 8 0 474 486 ;
+C 249 ; WX 556 ; N oslash ; B 22 -95 520 575 ;
+C 250 ; WX 722 ; N oe ; B 22 -8 698 494 ;
+C 251 ; WX 778 ; N germandbls ; B 27 -8 743 494 ;
+C -1 ; WX 500 ; N ecircumflex ; B 22 0 468 710 ;
+C -1 ; WX 500 ; N edieresis ; B 22 0 468 659 ;
+C -1 ; WX 556 ; N aacute ; B 24 0 526 714 ;
+C -1 ; WX 760 ; N registered ; B 38 -14 722 676 ;
+C -1 ; WX 278 ; N icircumflex ; B -16 0 295 710 ;
+C -1 ; WX 611 ; N udieresis ; B 21 -8 581 659 ;
+C -1 ; WX 556 ; N ograve ; B 22 -8 522 714 ;
+C -1 ; WX 611 ; N uacute ; B 21 -8 581 714 ;
+C -1 ; WX 611 ; N ucircumflex ; B 21 -8 581 710 ;
+C -1 ; WX 722 ; N Aacute ; B 15 0 706 890 ;
+C -1 ; WX 278 ; N igrave ; B -8 0 252 714 ;
+C -1 ; WX 333 ; N Icircumflex ; B 11 0 322 886 ;
+C -1 ; WX 500 ; N ccedilla ; B 18 -215 477 494 ;
+C -1 ; WX 556 ; N adieresis ; B 24 0 526 659 ;
+C -1 ; WX 611 ; N Ecircumflex ; B 12 0 597 886 ;
+C -1 ; WX 389 ; N scaron ; B 27 -8 354 710 ;
+C -1 ; WX 444 ; N thorn ; B 14 0 436 486 ;
+C -1 ; WX 980 ; N trademark ; B 30 256 957 662 ;
+C -1 ; WX 500 ; N egrave ; B 22 0 468 714 ;
+C -1 ; WX 300 ; N threesuperior ; B 15 262 291 676 ;
+C -1 ; WX 556 ; N zcaron ; B 24 0 522 710 ;
+C -1 ; WX 556 ; N atilde ; B 24 0 526 674 ;
+C -1 ; WX 556 ; N aring ; B 24 0 526 747 ;
+C -1 ; WX 556 ; N ocircumflex ; B 22 -8 522 710 ;
+C -1 ; WX 611 ; N Edieresis ; B 12 0 597 835 ;
+C -1 ; WX 750 ; N threequarters ; B 15 -14 718 676 ;
+C -1 ; WX 556 ; N ydieresis ; B 24 0 528 659 ;
+C -1 ; WX 556 ; N yacute ; B 24 0 528 714 ;
+C -1 ; WX 278 ; N iacute ; B 14 0 290 714 ;
+C -1 ; WX 722 ; N Acircumflex ; B 15 0 706 886 ;
+C -1 ; WX 722 ; N Uacute ; B 14 -14 705 890 ;
+C -1 ; WX 500 ; N eacute ; B 22 0 468 714 ;
+C -1 ; WX 722 ; N Ograve ; B 34 -14 688 890 ;
+C -1 ; WX 556 ; N agrave ; B 24 0 526 714 ;
+C -1 ; WX 722 ; N Udieresis ; B 14 -14 705 835 ;
+C -1 ; WX 556 ; N acircumflex ; B 24 0 526 710 ;
+C -1 ; WX 333 ; N Igrave ; B 18 0 315 890 ;
+C -1 ; WX 300 ; N twosuperior ; B 1 270 296 676 ;
+C -1 ; WX 722 ; N Ugrave ; B 14 -14 705 890 ;
+C -1 ; WX 750 ; N onequarter ; B 37 -14 718 676 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 14 -14 705 886 ;
+C -1 ; WX 556 ; N Scaron ; B 42 -14 491 886 ;
+C -1 ; WX 333 ; N Idieresis ; B 18 0 315 835 ;
+C -1 ; WX 278 ; N idieresis ; B -9 0 288 659 ;
+C -1 ; WX 611 ; N Egrave ; B 12 0 597 890 ;
+C -1 ; WX 722 ; N Oacute ; B 34 -14 688 890 ;
+C -1 ; WX 564 ; N divide ; B 30 -10 534 516 ;
+C -1 ; WX 722 ; N Atilde ; B 15 0 706 850 ;
+C -1 ; WX 722 ; N Aring ; B 15 0 706 898 ;
+C -1 ; WX 722 ; N Odieresis ; B 34 -14 688 835 ;
+C -1 ; WX 722 ; N Adieresis ; B 15 0 706 835 ;
+C -1 ; WX 722 ; N Ntilde ; B 12 -11 707 850 ;
+C -1 ; WX 611 ; N Zcaron ; B 9 0 597 886 ;
+C -1 ; WX 556 ; N Thorn ; B 16 0 542 662 ;
+C -1 ; WX 333 ; N Iacute ; B 18 0 317 890 ;
+C -1 ; WX 564 ; N plusminus ; B 30 0 534 506 ;
+C -1 ; WX 564 ; N multiply ; B 38 8 527 497 ;
+C -1 ; WX 611 ; N Eacute ; B 12 0 597 890 ;
+C -1 ; WX 722 ; N Ydieresis ; B 22 0 703 835 ;
+C -1 ; WX 300 ; N onesuperior ; B 57 270 248 676 ;
+C -1 ; WX 611 ; N ugrave ; B 21 -8 581 714 ;
+C -1 ; WX 564 ; N logicalnot ; B 30 108 534 386 ;
+C -1 ; WX 611 ; N ntilde ; B 23 0 579 674 ;
+C -1 ; WX 722 ; N Otilde ; B 34 -14 688 850 ;
+C -1 ; WX 556 ; N otilde ; B 22 -8 522 674 ;
+C -1 ; WX 667 ; N Ccedilla ; B 28 -215 633 676 ;
+C -1 ; WX 722 ; N Agrave ; B 15 0 706 890 ;
+C -1 ; WX 750 ; N onehalf ; B 31 -14 746 676 ;
+C -1 ; WX 722 ; N Eth ; B 16 0 685 662 ;
+C -1 ; WX 400 ; N degree ; B 57 390 343 676 ;
+C -1 ; WX 722 ; N Yacute ; B 22 0 703 890 ;
+C -1 ; WX 722 ; N Ocircumflex ; B 34 -14 688 886 ;
+C -1 ; WX 556 ; N oacute ; B 22 -8 522 714 ;
+C -1 ; WX 500 ; N mu ; B 36 -218 512 450 ;
+C -1 ; WX 564 ; N minus ; B 30 220 534 286 ;
+C -1 ; WX 556 ; N eth ; B 20 0 536 486 ;
+C -1 ; WX 556 ; N odieresis ; B 22 -8 522 659 ;
+C -1 ; WX 760 ; N copyright ; B 38 -14 722 676 ;
+C -1 ; WX 200 ; N brokenbar ; B 67 -14 133 676 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 195
+
+KPX A y -92
+KPX A w -92
+KPX A v -74
+KPX A u -18
+KPX A t -35
+KPX A quoteright -111
+KPX A Y -105
+KPX A W -90
+KPX A V -135
+KPX A U -55
+KPX A T -111
+KPX A Q -55
+KPX A O -55
+KPX A G -40
+KPX A C -40
+
+KPX B u -18
+KPX B a -37
+KPX B U -10
+KPX B A -35
+
+KPX C a -18
+
+KPX D a -18
+KPX D Y -55
+KPX D W -30
+KPX D V -40
+KPX D A -40
+
+KPX F period -80
+KPX F o -15
+KPX F comma -80
+KPX F a -15
+KPX F A -55
+
+KPX J A -60
+
+KPX K y -25
+KPX K u -15
+KPX K o -35
+KPX K O -30
+
+KPX L y -55
+KPX L quoteright -92
+KPX L Y -100
+KPX L W -74
+KPX L V -100
+KPX L T -92
+
+KPX N A -35
+
+KPX O Y -50
+KPX O X -40
+KPX O W -35
+KPX O V -50
+KPX O T -18
+KPX O A -35
+
+KPX P period -111
+KPX P comma -111
+KPX P a -15
+KPX P A -92
+
+KPX Q U -10
+
+KPX R Y -65
+KPX R W -55
+KPX R V -80
+KPX R U -40
+KPX R T -60
+KPX R O -40
+
+KPX T y -80
+KPX T w -80
+KPX T u -45
+KPX T semicolon -55
+KPX T r -35
+KPX T period -74
+KPX T o -80
+KPX T i -35
+KPX T hyphen -92
+KPX T e -70
+KPX T comma -74
+KPX T colon -50
+KPX T a -80
+KPX T O -18
+KPX T A -93
+
+KPX U A -40
+
+KPX V u -75
+KPX V semicolon -74
+KPX V period -129
+KPX V o -129
+KPX V i -60
+KPX V hyphen -100
+KPX V e -111
+KPX V comma -129
+KPX V colon -74
+KPX V a -111
+KPX V O -40
+KPX V G -18
+KPX V A -135
+
+KPX W y -73
+KPX W u -50
+KPX W semicolon -37
+KPX W period -92
+KPX W o -80
+KPX W i -40
+KPX W hyphen -65
+KPX W e -80
+KPX W comma -92
+KPX W colon -37
+KPX W a -80
+KPX W O -10
+KPX W A -120
+
+KPX Y u -111
+KPX Y semicolon -92
+KPX Y period -129
+KPX Y o -110
+KPX Y i -55
+KPX Y hyphen -111
+KPX Y e -100
+KPX Y comma -129
+KPX Y colon -92
+KPX Y a -100
+KPX Y O -30
+KPX Y C -35
+KPX Y A -120
+
+KPX a y -55
+KPX a w -55
+KPX a v -74
+KPX a u -18
+KPX a t -35
+KPX a quoteright -74
+KPX a quotedblright -55
+KPX a q -18
+KPX a o -18
+KPX a g -18
+KPX a c -18
+
+KPX b u -20
+KPX b period -40
+
+KPX c y -15
+
+KPX comma quoteright -70
+KPX comma quotedblright -70
+
+KPX d period -18
+KPX d comma -18
+
+KPX f period -55
+KPX f comma -55
+KPX f a -10
+
+KPX j period -18
+KPX j comma -18
+KPX j a -18
+
+KPX k o -10
+
+KPX l y -55
+KPX l w -37
+KPX l v -55
+KPX l t -37
+KPX l quoteright -74
+KPX l quotedblright -35
+
+KPX n period -35
+KPX n comma -35
+KPX n a -18
+
+KPX o y -10
+KPX o x -18
+KPX o w -25
+KPX o v -15
+KPX o period -18
+KPX o comma -18
+
+KPX p period -35
+KPX p comma -35
+KPX p a -18
+
+KPX period quoteright -70
+KPX period quotedblright -70
+
+KPX quotedblleft a -55
+KPX quotedblleft A -80
+
+KPX quoteleft quoteleft -74
+KPX quoteleft a -74
+KPX quoteleft A -80
+
+KPX quoteright quoteright -74
+
+KPX r hyphen -20
+
+KPX space Y -90
+KPX space W -30
+KPX space V -50
+KPX space T -18
+KPX space A -55
+
+KPX t period -35
+KPX t hyphen -18
+KPX t comma -35
+KPX t a -35
+
+KPX u period -18
+KPX u comma -18
+KPX u a -55
+
+KPX v period -74
+KPX v o -20
+KPX v hyphen -35
+KPX v comma -74
+KPX v a -74
+
+KPX w period -74
+KPX w o -10
+KPX w comma -74
+KPX w a -74
+
+KPX y semicolon -35
+KPX y period -74
+KPX y o -18
+KPX y hyphen -37
+KPX y comma -74
+KPX y colon -35
+KPX y c -18
+KPX y a -35
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 195 176 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 195 176 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 195 176 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 195 176 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 185 151 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 195 176 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 139 176 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 139 176 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 139 176 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 139 176 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 0 176 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 0 176 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 0 176 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 0 176 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 195 176 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 195 176 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 195 176 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 195 176 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 195 176 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 195 176 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 112 176 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 195 176 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 195 176 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 195 176 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 195 176 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 195 176 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 195 176 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 139 176 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 112 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 112 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 112 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 112 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 112 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 112 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 84 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 84 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 84 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 84 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -27 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -27 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -27 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -27 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 139 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 112 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 112 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 112 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 112 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 112 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 28 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 139 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 139 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 139 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 139 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 112 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 112 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 112 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Ti-Sm b/font/Ti-Sm
new file mode 100644
index 0000000..2f89c88
--- /dev/null
+++ b/font/Ti-Sm
@@ -0,0 +1,416 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Oct 29 15:55:58 1990
+Comment UniqueID 33201
+Comment VMusage 29517 36409
+FontName Times-Semibold
+FullName Times Semibold
+FamilyName Times
+Weight Semibold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -167 -216 1004 933
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.Times is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 680
+XHeight 470
+Ascender 708
+Descender -216
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 93 -12 239 696 ;
+C 34 ; WX 333 ; N quotedbl ; B 40 380 293 696 ;
+C 35 ; WX 500 ; N numbersign ; B 10 0 488 680 ;
+C 36 ; WX 500 ; N dollar ; B 36 -102 464 736 ;
+C 37 ; WX 833 ; N percent ; B 53 -12 779 696 ;
+C 38 ; WX 833 ; N ampersand ; B 36 -16 788 696 ;
+C 39 ; WX 278 ; N quoteright ; B 59 406 219 696 ;
+C 40 ; WX 333 ; N parenleft ; B 22 -194 312 696 ;
+C 41 ; WX 333 ; N parenright ; B 21 -194 311 696 ;
+C 42 ; WX 500 ; N asterisk ; B 54 262 446 696 ;
+C 43 ; WX 600 ; N plus ; B 65 0 535 470 ;
+C 44 ; WX 250 ; N comma ; B 52 -156 212 134 ;
+C 45 ; WX 333 ; N hyphen ; B 43 183 291 287 ;
+C 46 ; WX 250 ; N period ; B 52 -12 198 134 ;
+C 47 ; WX 278 ; N slash ; B 0 -16 278 696 ;
+C 48 ; WX 500 ; N zero ; B 22 -12 478 696 ;
+C 49 ; WX 500 ; N one ; B 82 0 438 696 ;
+C 50 ; WX 500 ; N two ; B 20 0 477 696 ;
+C 51 ; WX 500 ; N three ; B 36 -12 430 696 ;
+C 52 ; WX 500 ; N four ; B 22 0 478 680 ;
+C 53 ; WX 500 ; N five ; B 40 -12 432 680 ;
+C 54 ; WX 500 ; N six ; B 21 -12 479 696 ;
+C 55 ; WX 500 ; N seven ; B 8 -12 462 680 ;
+C 56 ; WX 500 ; N eight ; B 38 -12 462 696 ;
+C 57 ; WX 500 ; N nine ; B 21 -12 479 696 ;
+C 58 ; WX 250 ; N colon ; B 52 -12 198 472 ;
+C 59 ; WX 250 ; N semicolon ; B 52 -156 212 472 ;
+C 60 ; WX 600 ; N less ; B 64 -6 536 476 ;
+C 61 ; WX 600 ; N equal ; B 65 100 535 370 ;
+C 62 ; WX 600 ; N greater ; B 64 -6 536 476 ;
+C 63 ; WX 444 ; N question ; B 28 -12 416 696 ;
+C 64 ; WX 800 ; N at ; B 43 -16 757 696 ;
+C 65 ; WX 722 ; N A ; B 14 0 708 696 ;
+C 66 ; WX 667 ; N B ; B 20 0 624 680 ;
+C 67 ; WX 722 ; N C ; B 21 -16 678 696 ;
+C 68 ; WX 778 ; N D ; B 20 0 748 680 ;
+C 69 ; WX 667 ; N E ; B 20 0 650 680 ;
+C 70 ; WX 611 ; N F ; B 20 0 594 680 ;
+C 71 ; WX 778 ; N G ; B 28 -16 764 696 ;
+C 72 ; WX 778 ; N H ; B 20 0 758 680 ;
+C 73 ; WX 389 ; N I ; B 26 0 362 680 ;
+C 74 ; WX 500 ; N J ; B 20 -16 468 680 ;
+C 75 ; WX 778 ; N K ; B 20 0 764 680 ;
+C 76 ; WX 611 ; N L ; B 20 0 606 680 ;
+C 77 ; WX 889 ; N M ; B 18 -8 870 680 ;
+C 78 ; WX 778 ; N N ; B 20 -16 758 680 ;
+C 79 ; WX 722 ; N O ; B 21 -16 701 696 ;
+C 80 ; WX 611 ; N P ; B 20 0 598 680 ;
+C 81 ; WX 722 ; N Q ; B 21 -216 701 696 ;
+C 82 ; WX 722 ; N R ; B 14 0 712 680 ;
+C 83 ; WX 556 ; N S ; B 39 -16 517 696 ;
+C 84 ; WX 667 ; N T ; B 19 0 647 680 ;
+C 85 ; WX 778 ; N U ; B 28 -16 750 680 ;
+C 86 ; WX 722 ; N V ; B 14 -16 708 680 ;
+C 87 ; WX 1000 ; N W ; B 12 -16 988 680 ;
+C 88 ; WX 722 ; N X ; B 10 0 712 680 ;
+C 89 ; WX 722 ; N Y ; B 12 0 710 680 ;
+C 90 ; WX 667 ; N Z ; B 28 0 639 680 ;
+C 91 ; WX 333 ; N bracketleft ; B 76 -180 286 680 ;
+C 92 ; WX 278 ; N backslash ; B 0 -16 278 696 ;
+C 93 ; WX 333 ; N bracketright ; B 47 -180 257 680 ;
+C 94 ; WX 600 ; N asciicircum ; B 82 316 518 680 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 278 ; N quoteleft ; B 59 406 219 696 ;
+C 97 ; WX 500 ; N a ; B 24 -12 494 482 ;
+C 98 ; WX 500 ; N b ; B 10 -12 476 708 ;
+C 99 ; WX 444 ; N c ; B 20 -12 432 482 ;
+C 100 ; WX 556 ; N d ; B 28 -12 528 708 ;
+C 101 ; WX 444 ; N e ; B 20 -12 432 482 ;
+C 102 ; WX 333 ; N f ; B 16 0 398 708 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B 34 -216 488 482 ;
+C 104 ; WX 556 ; N h ; B 17 0 541 708 ;
+C 105 ; WX 278 ; N i ; B 19 0 259 696 ;
+C 106 ; WX 278 ; N j ; B -90 -216 218 696 ;
+C 107 ; WX 556 ; N k ; B 18 0 544 708 ;
+C 108 ; WX 278 ; N l ; B 18 0 260 708 ;
+C 109 ; WX 833 ; N m ; B 14 0 818 482 ;
+C 110 ; WX 556 ; N n ; B 16 0 540 482 ;
+C 111 ; WX 500 ; N o ; B 24 -12 476 482 ;
+C 112 ; WX 556 ; N p ; B 25 -216 524 482 ;
+C 113 ; WX 500 ; N q ; B 18 -216 488 482 ;
+C 114 ; WX 389 ; N r ; B 20 0 376 482 ;
+C 115 ; WX 389 ; N s ; B 32 -12 366 482 ;
+C 116 ; WX 333 ; N t ; B 16 -12 322 628 ;
+C 117 ; WX 556 ; N u ; B 12 -12 536 470 ;
+C 118 ; WX 500 ; N v ; B 12 -12 488 470 ;
+C 119 ; WX 722 ; N w ; B 12 -12 710 470 ;
+C 120 ; WX 500 ; N x ; B 12 0 488 470 ;
+C 121 ; WX 500 ; N y ; B 10 -216 486 470 ;
+C 122 ; WX 444 ; N z ; B 29 0 415 470 ;
+C 123 ; WX 333 ; N braceleft ; B 48 -180 270 680 ;
+C 124 ; WX 222 ; N bar ; B 70 0 152 708 ;
+C 125 ; WX 333 ; N braceright ; B 63 -180 285 680 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 155 531 315 ;
+C 161 ; WX 333 ; N exclamdown ; B 94 -216 240 492 ;
+C 162 ; WX 500 ; N cent ; B 50 -138 462 594 ;
+C 163 ; WX 500 ; N sterling ; B 6 -12 472 696 ;
+C 164 ; WX 167 ; N fraction ; B -167 -12 334 696 ;
+C 165 ; WX 500 ; N yen ; B -100 0 600 680 ;
+C 166 ; WX 500 ; N florin ; B 9 -204 491 708 ;
+C 167 ; WX 500 ; N section ; B 62 -128 438 696 ;
+C 168 ; WX 500 ; N currency ; B -5 84 505 594 ;
+C 169 ; WX 222 ; N quotesingle ; B 68 380 154 696 ;
+C 170 ; WX 500 ; N quotedblleft ; B 50 406 451 696 ;
+C 171 ; WX 500 ; N guillemotleft ; B 27 43 473 427 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 52 43 304 427 ;
+C 173 ; WX 333 ; N guilsinglright ; B 29 43 281 427 ;
+C 174 ; WX 556 ; N fi ; B 17 0 539 708 ;
+C 175 ; WX 556 ; N fl ; B 15 0 541 708 ;
+C 177 ; WX 500 ; N endash ; B 0 197 500 273 ;
+C 178 ; WX 500 ; N dagger ; B 49 -128 451 696 ;
+C 179 ; WX 500 ; N daggerdbl ; B 49 -144 451 696 ;
+C 180 ; WX 250 ; N periodcentered ; B 52 162 198 308 ;
+C 182 ; WX 620 ; N paragraph ; B 44 -182 536 680 ;
+C 183 ; WX 500 ; N bullet ; B 80 170 420 510 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 59 -156 219 134 ;
+C 185 ; WX 500 ; N quotedblbase ; B 49 -156 450 134 ;
+C 186 ; WX 500 ; N quotedblright ; B 49 406 450 696 ;
+C 187 ; WX 500 ; N guillemotright ; B 27 43 473 427 ;
+C 188 ; WX 1000 ; N ellipsis ; B 94 -12 906 134 ;
+C 189 ; WX 1000 ; N perthousand ; B 2 -12 998 708 ;
+C 191 ; WX 444 ; N questiondown ; B 28 -216 416 492 ;
+C 193 ; WX 278 ; N grave ; B -18 530 218 708 ;
+C 194 ; WX 278 ; N acute ; B 60 530 296 708 ;
+C 195 ; WX 278 ; N circumflex ; B -24 530 302 702 ;
+C 196 ; WX 278 ; N tilde ; B -38 550 316 668 ;
+C 197 ; WX 278 ; N macron ; B -22 568 300 634 ;
+C 198 ; WX 278 ; N breve ; B -8 530 286 690 ;
+C 199 ; WX 278 ; N dotaccent ; B 79 540 199 660 ;
+C 200 ; WX 278 ; N dieresis ; B -23 540 301 660 ;
+C 202 ; WX 278 ; N ring ; B 36 532 242 738 ;
+C 203 ; WX 278 ; N cedilla ; B 24 -216 244 0 ;
+C 205 ; WX 278 ; N hungarumlaut ; B -32 530 376 708 ;
+C 206 ; WX 278 ; N ogonek ; B 28 -216 278 20 ;
+C 207 ; WX 278 ; N caron ; B -24 530 302 702 ;
+C 208 ; WX 1000 ; N emdash ; B 0 197 1000 273 ;
+C 225 ; WX 1000 ; N AE ; B 4 0 983 680 ;
+C 227 ; WX 300 ; N ordfeminine ; B -2 400 305 696 ;
+C 232 ; WX 611 ; N Lslash ; B 20 0 606 680 ;
+C 233 ; WX 722 ; N Oslash ; B 21 -66 701 744 ;
+C 234 ; WX 1000 ; N OE ; B 20 -16 1004 696 ;
+C 235 ; WX 300 ; N ordmasculine ; B 3 400 297 696 ;
+C 241 ; WX 722 ; N ae ; B 24 -12 696 482 ;
+C 245 ; WX 278 ; N dotlessi ; B 19 0 259 482 ;
+C 248 ; WX 278 ; N lslash ; B -39 0 317 708 ;
+C 249 ; WX 500 ; N oslash ; B 24 -90 476 556 ;
+C 250 ; WX 778 ; N oe ; B 30 -12 746 482 ;
+C 251 ; WX 500 ; N germandbls ; B 8 -12 472 708 ;
+C -1 ; WX 444 ; N ecircumflex ; B 20 -12 432 702 ;
+C -1 ; WX 444 ; N edieresis ; B 20 -12 432 660 ;
+C -1 ; WX 500 ; N aacute ; B 24 -12 494 708 ;
+C -1 ; WX 800 ; N registered ; B 52 -16 748 696 ;
+C -1 ; WX 278 ; N icircumflex ; B -30 0 296 702 ;
+C -1 ; WX 556 ; N udieresis ; B 12 -12 536 660 ;
+C -1 ; WX 500 ; N ograve ; B 24 -12 476 708 ;
+C -1 ; WX 556 ; N uacute ; B 12 -12 536 708 ;
+C -1 ; WX 556 ; N ucircumflex ; B 12 -12 536 702 ;
+C -1 ; WX 722 ; N Aacute ; B 14 0 708 903 ;
+C -1 ; WX 278 ; N igrave ; B -24 0 259 708 ;
+C -1 ; WX 389 ; N Icircumflex ; B 26 0 362 897 ;
+C -1 ; WX 444 ; N ccedilla ; B 20 -216 432 482 ;
+C -1 ; WX 500 ; N adieresis ; B 24 -12 494 660 ;
+C -1 ; WX 667 ; N Ecircumflex ; B 20 0 650 897 ;
+C -1 ; WX 389 ; N scaron ; B 32 -12 366 702 ;
+C -1 ; WX 556 ; N thorn ; B 25 -216 524 708 ;
+C -1 ; WX 1000 ; N trademark ; B 25 276 975 680 ;
+C -1 ; WX 444 ; N egrave ; B 20 -12 432 708 ;
+C -1 ; WX 300 ; N threesuperior ; B 20 270 274 696 ;
+C -1 ; WX 444 ; N zcaron ; B 29 0 415 702 ;
+C -1 ; WX 500 ; N atilde ; B 24 -12 494 668 ;
+C -1 ; WX 500 ; N aring ; B 24 -12 494 738 ;
+C -1 ; WX 500 ; N ocircumflex ; B 24 -12 476 702 ;
+C -1 ; WX 667 ; N Edieresis ; B 20 0 650 855 ;
+C -1 ; WX 750 ; N threequarters ; B 20 -12 750 696 ;
+C -1 ; WX 500 ; N ydieresis ; B 10 -216 486 660 ;
+C -1 ; WX 500 ; N yacute ; B 10 -216 486 708 ;
+C -1 ; WX 278 ; N iacute ; B 19 0 290 708 ;
+C -1 ; WX 722 ; N Acircumflex ; B 14 0 708 897 ;
+C -1 ; WX 778 ; N Uacute ; B 28 -16 750 903 ;
+C -1 ; WX 444 ; N eacute ; B 20 -12 432 708 ;
+C -1 ; WX 722 ; N Ograve ; B 21 -16 701 903 ;
+C -1 ; WX 500 ; N agrave ; B 24 -12 494 708 ;
+C -1 ; WX 778 ; N Udieresis ; B 28 -16 750 855 ;
+C -1 ; WX 500 ; N acircumflex ; B 24 -12 494 702 ;
+C -1 ; WX 389 ; N Igrave ; B 26 0 362 903 ;
+C -1 ; WX 300 ; N twosuperior ; B 2 278 300 696 ;
+C -1 ; WX 778 ; N Ugrave ; B 28 -16 750 903 ;
+C -1 ; WX 750 ; N onequarter ; B 26 -12 750 696 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 28 -16 750 897 ;
+C -1 ; WX 556 ; N Scaron ; B 39 -16 517 897 ;
+C -1 ; WX 389 ; N Idieresis ; B 26 0 362 855 ;
+C -1 ; WX 278 ; N idieresis ; B -29 0 295 660 ;
+C -1 ; WX 667 ; N Egrave ; B 20 0 650 903 ;
+C -1 ; WX 722 ; N Oacute ; B 21 -16 701 903 ;
+C -1 ; WX 600 ; N divide ; B 65 -31 535 501 ;
+C -1 ; WX 722 ; N Atilde ; B 14 0 708 863 ;
+C -1 ; WX 722 ; N Aring ; B 14 0 708 933 ;
+C -1 ; WX 722 ; N Odieresis ; B 21 -16 701 855 ;
+C -1 ; WX 722 ; N Adieresis ; B 14 0 708 855 ;
+C -1 ; WX 778 ; N Ntilde ; B 20 -16 758 863 ;
+C -1 ; WX 667 ; N Zcaron ; B 28 0 639 897 ;
+C -1 ; WX 611 ; N Thorn ; B 20 0 598 680 ;
+C -1 ; WX 389 ; N Iacute ; B 26 0 362 903 ;
+C -1 ; WX 600 ; N plusminus ; B 65 0 535 470 ;
+C -1 ; WX 600 ; N multiply ; B 65 0 535 470 ;
+C -1 ; WX 667 ; N Eacute ; B 20 0 650 903 ;
+C -1 ; WX 722 ; N Ydieresis ; B 12 0 710 855 ;
+C -1 ; WX 300 ; N onesuperior ; B 26 278 258 696 ;
+C -1 ; WX 556 ; N ugrave ; B 12 -12 536 708 ;
+C -1 ; WX 600 ; N logicalnot ; B 65 98 535 370 ;
+C -1 ; WX 556 ; N ntilde ; B 16 0 540 668 ;
+C -1 ; WX 722 ; N Otilde ; B 21 -16 701 863 ;
+C -1 ; WX 500 ; N otilde ; B 24 -12 476 668 ;
+C -1 ; WX 772 ; N Ccedilla ; B 21 -216 678 696 ;
+C -1 ; WX 722 ; N Agrave ; B 14 0 708 903 ;
+C -1 ; WX 750 ; N onehalf ; B 26 -12 750 696 ;
+C -1 ; WX 778 ; N Eth ; B 20 0 748 680 ;
+C -1 ; WX 400 ; N degree ; B 56 410 342 696 ;
+C -1 ; WX 722 ; N Yacute ; B 12 0 710 903 ;
+C -1 ; WX 722 ; N Ocircumflex ; B 21 -16 701 897 ;
+C -1 ; WX 500 ; N oacute ; B 24 -12 476 708 ;
+C -1 ; WX 556 ; N mu ; B 12 -216 536 470 ;
+C -1 ; WX 600 ; N minus ; B 65 194 535 276 ;
+C -1 ; WX 500 ; N eth ; B 24 -12 476 708 ;
+C -1 ; WX 500 ; N odieresis ; B 24 -12 476 660 ;
+C -1 ; WX 800 ; N copyright ; B 52 -16 748 696 ;
+C -1 ; WX 222 ; N brokenbar ; B 70 0 152 708 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 86
+
+KPX A y -74
+KPX A w -74
+KPX A v -74
+KPX A quoteright -111
+KPX A Y -92
+KPX A W -111
+KPX A V -111
+KPX A T -74
+
+KPX F period -129
+KPX F comma -129
+KPX F A -74
+
+KPX L y -55
+KPX L quoteright -129
+KPX L Y -111
+KPX L W -111
+KPX L V -111
+KPX L T -92
+
+KPX P period -129
+KPX P comma -129
+KPX P A -55
+
+KPX R Y -55
+KPX R W -55
+KPX R V -55
+KPX R T -18
+
+KPX T y -74
+KPX T w -92
+KPX T u -74
+KPX T semicolon -74
+KPX T r -55
+KPX T period -111
+KPX T o -74
+KPX T i -37
+KPX T hyphen -92
+KPX T e -74
+KPX T comma -111
+KPX T colon -74
+KPX T a -74
+KPX T A -74
+
+KPX V u -55
+KPX V semicolon -92
+KPX V period -129
+KPX V o -74
+KPX V i -37
+KPX V hyphen -92
+KPX V e -74
+KPX V comma -129
+KPX V colon -92
+KPX V a -74
+KPX V A -92
+
+KPX W y -37
+KPX W u -37
+KPX W semicolon -74
+KPX W period -129
+KPX W o -55
+KPX W i -18
+KPX W hyphen -74
+KPX W e -55
+KPX W comma -129
+KPX W colon -74
+KPX W a -55
+KPX W A -74
+
+KPX Y u -55
+KPX Y semicolon -92
+KPX Y period -129
+KPX Y o -74
+KPX Y i -37
+KPX Y hyphen -92
+KPX Y e -74
+KPX Y comma -129
+KPX Y colon -92
+KPX Y a -74
+KPX Y A -74
+
+KPX f quoteright 18
+
+KPX quoteleft quoteleft -37
+
+KPX quoteright t -37
+KPX quoteright s -74
+KPX quoteright quoteright -37
+
+KPX r period -111
+KPX r hyphen -55
+KPX r comma -111
+
+KPX v period -92
+KPX v comma -92
+
+KPX w period -92
+KPX w comma -92
+
+KPX y period -92
+KPX y comma -92
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 222 195 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 222 195 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 222 195 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 222 195 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 222 195 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 222 195 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 183 195 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 183 195 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 183 195 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 183 195 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 56 195 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 56 195 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 56 195 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 56 195 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 250 195 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 216 195 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 216 195 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 216 195 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 216 195 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 216 195 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 162 195 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 267 195 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 267 195 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 267 195 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 267 195 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 245 195 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 245 195 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 218 195 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 111 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 111 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 111 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 111 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 111 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 111 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 89 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 89 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 89 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 89 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -6 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -6 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -6 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -6 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 145 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 111 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 111 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 111 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 111 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 111 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 56 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 127 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 127 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 127 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 127 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 111 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 111 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 83 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/Ti-SmIt b/font/Ti-SmIt
new file mode 100644
index 0000000..386863a
--- /dev/null
+++ b/font/Ti-SmIt
@@ -0,0 +1,415 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Mon Oct 29 16:04:00 1990
+Comment UniqueID 33204
+Comment VMusage 31573 38465
+FontName Times-SemiboldItalic
+FullName Times Semibold Italic
+FamilyName Times
+Weight Semibold
+ItalicAngle -13
+IsFixedPitch false
+FontBBox -167 -218 1025 919
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.Times is a trademark of Linotype AG and/or its subsidiaries.
+EncodingScheme AdobeStandardEncoding
+CapHeight 680
+XHeight 482
+Ascender 708
+Descender -206
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 389 ; N exclam ; B 60 -12 330 696 ;
+C 34 ; WX 333 ; N quotedbl ; B 120 380 373 696 ;
+C 35 ; WX 500 ; N numbersign ; B 26 0 504 680 ;
+C 36 ; WX 500 ; N dollar ; B 22 -104 492 746 ;
+C 37 ; WX 833 ; N percent ; B 70 -12 796 696 ;
+C 38 ; WX 778 ; N ampersand ; B 44 -16 757 696 ;
+C 39 ; WX 278 ; N quoteright ; B 127 416 289 696 ;
+C 40 ; WX 333 ; N parenleft ; B 18 -206 360 696 ;
+C 41 ; WX 333 ; N parenright ; B -47 -206 295 696 ;
+C 42 ; WX 500 ; N asterisk ; B 106 260 497 696 ;
+C 43 ; WX 600 ; N plus ; B 65 0 535 470 ;
+C 44 ; WX 250 ; N comma ; B 8 -152 170 128 ;
+C 45 ; WX 333 ; N hyphen ; B 28 188 303 282 ;
+C 46 ; WX 250 ; N period ; B 26 -12 166 128 ;
+C 47 ; WX 278 ; N slash ; B 21 -16 324 696 ;
+C 48 ; WX 500 ; N zero ; B 35 -16 497 696 ;
+C 49 ; WX 500 ; N one ; B 51 0 435 696 ;
+C 50 ; WX 500 ; N two ; B 2 0 466 696 ;
+C 51 ; WX 500 ; N three ; B 1 -16 463 696 ;
+C 52 ; WX 500 ; N four ; B 17 0 499 696 ;
+C 53 ; WX 500 ; N five ; B 2 -16 471 680 ;
+C 54 ; WX 500 ; N six ; B 39 -16 484 696 ;
+C 55 ; WX 500 ; N seven ; B 83 -16 524 680 ;
+C 56 ; WX 500 ; N eight ; B 19 -16 493 696 ;
+C 57 ; WX 500 ; N nine ; B 55 -16 500 696 ;
+C 58 ; WX 250 ; N colon ; B 26 -12 238 470 ;
+C 59 ; WX 250 ; N semicolon ; B 8 -152 238 470 ;
+C 60 ; WX 600 ; N less ; B 74 -8 544 478 ;
+C 61 ; WX 600 ; N equal ; B 65 99 535 371 ;
+C 62 ; WX 600 ; N greater ; B 86 -8 556 478 ;
+C 63 ; WX 500 ; N question ; B 90 -12 444 696 ;
+C 64 ; WX 800 ; N at ; B 43 -16 758 696 ;
+C 65 ; WX 722 ; N A ; B -36 0 678 696 ;
+C 66 ; WX 667 ; N B ; B -4 0 651 680 ;
+C 67 ; WX 722 ; N C ; B 63 -16 742 696 ;
+C 68 ; WX 778 ; N D ; B 0 0 767 680 ;
+C 69 ; WX 667 ; N E ; B -10 0 666 680 ;
+C 70 ; WX 611 ; N F ; B -8 0 659 680 ;
+C 71 ; WX 722 ; N G ; B 39 -16 734 696 ;
+C 72 ; WX 778 ; N H ; B -6 0 824 680 ;
+C 73 ; WX 389 ; N I ; B 2 0 426 680 ;
+C 74 ; WX 500 ; N J ; B 14 -16 530 680 ;
+C 75 ; WX 722 ; N K ; B -6 0 772 680 ;
+C 76 ; WX 611 ; N L ; B -6 0 606 680 ;
+C 77 ; WX 889 ; N M ; B -12 -8 932 680 ;
+C 78 ; WX 778 ; N N ; B -2 -16 814 680 ;
+C 79 ; WX 722 ; N O ; B 48 -16 714 696 ;
+C 80 ; WX 611 ; N P ; B -6 0 641 680 ;
+C 81 ; WX 722 ; N Q ; B 48 -206 714 696 ;
+C 82 ; WX 722 ; N R ; B 1 0 683 680 ;
+C 83 ; WX 556 ; N S ; B 22 -16 565 696 ;
+C 84 ; WX 611 ; N T ; B 61 0 668 680 ;
+C 85 ; WX 778 ; N U ; B 102 -16 820 680 ;
+C 86 ; WX 722 ; N V ; B 90 -16 806 680 ;
+C 87 ; WX 944 ; N W ; B 82 -16 1022 680 ;
+C 88 ; WX 722 ; N X ; B -4 0 760 680 ;
+C 89 ; WX 667 ; N Y ; B 96 0 750 680 ;
+C 90 ; WX 611 ; N Z ; B -15 0 650 680 ;
+C 91 ; WX 389 ; N bracketleft ; B 17 -190 406 680 ;
+C 92 ; WX 278 ; N backslash ; B 8 -16 311 696 ;
+C 93 ; WX 389 ; N bracketright ; B -21 -190 368 680 ;
+C 94 ; WX 600 ; N asciicircum ; B 92 315 528 680 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 278 ; N quoteleft ; B 130 416 292 696 ;
+C 97 ; WX 500 ; N a ; B -1 -12 469 482 ;
+C 98 ; WX 500 ; N b ; B 21 -12 486 708 ;
+C 99 ; WX 444 ; N c ; B 23 -12 437 482 ;
+C 100 ; WX 500 ; N d ; B -1 -12 517 708 ;
+C 101 ; WX 444 ; N e ; B 20 -12 438 482 ;
+C 102 ; WX 333 ; N f ; B -130 -206 462 708 ; L i fi ; L l fl ;
+C 103 ; WX 444 ; N g ; B -42 -206 464 482 ;
+C 104 ; WX 556 ; N h ; B 18 -12 523 708 ;
+C 105 ; WX 278 ; N i ; B 30 -12 285 696 ;
+C 106 ; WX 278 ; N j ; B -127 -206 274 696 ;
+C 107 ; WX 556 ; N k ; B 24 -12 567 708 ;
+C 108 ; WX 278 ; N l ; B 26 -12 292 708 ;
+C 109 ; WX 778 ; N m ; B 26 -12 745 482 ;
+C 110 ; WX 556 ; N n ; B 28 -12 523 482 ;
+C 111 ; WX 500 ; N o ; B 20 -12 473 482 ;
+C 112 ; WX 500 ; N p ; B -84 -206 488 482 ;
+C 113 ; WX 500 ; N q ; B 8 -206 486 482 ;
+C 114 ; WX 389 ; N r ; B 29 0 418 482 ;
+C 115 ; WX 389 ; N s ; B -6 -16 372 482 ;
+C 116 ; WX 333 ; N t ; B 41 -12 350 615 ;
+C 117 ; WX 556 ; N u ; B 44 -12 521 482 ;
+C 118 ; WX 444 ; N v ; B 49 -12 443 482 ;
+C 119 ; WX 667 ; N w ; B 46 -12 648 482 ;
+C 120 ; WX 500 ; N x ; B -6 -12 488 482 ;
+C 121 ; WX 444 ; N y ; B -71 -206 441 482 ;
+C 122 ; WX 444 ; N z ; B -4 -64 421 470 ;
+C 123 ; WX 389 ; N braceleft ; B 68 -190 387 680 ;
+C 124 ; WX 222 ; N bar ; B 95 0 177 708 ;
+C 125 ; WX 389 ; N braceright ; B -8 -190 311 680 ;
+C 126 ; WX 600 ; N asciitilde ; B 64 155 526 315 ;
+C 161 ; WX 389 ; N exclamdown ; B 58 -206 328 502 ;
+C 162 ; WX 500 ; N cent ; B 40 -131 479 581 ;
+C 163 ; WX 500 ; N sterling ; B -2 -12 492 696 ;
+C 164 ; WX 167 ; N fraction ; B -167 -16 334 696 ;
+C 165 ; WX 500 ; N yen ; B -8 0 646 680 ;
+C 166 ; WX 500 ; N florin ; B -79 -206 543 708 ;
+C 167 ; WX 500 ; N section ; B 36 -132 460 696 ;
+C 168 ; WX 500 ; N currency ; B 39 113 491 567 ;
+C 169 ; WX 222 ; N quotesingle ; B 138 380 224 696 ;
+C 170 ; WX 500 ; N quotedblleft ; B 100 416 485 696 ;
+C 171 ; WX 500 ; N guillemotleft ; B 21 43 480 427 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 41 43 313 427 ;
+C 173 ; WX 333 ; N guilsinglright ; B 20 43 292 427 ;
+C 174 ; WX 556 ; N fi ; B -147 -206 529 708 ;
+C 175 ; WX 556 ; N fl ; B -148 -206 559 708 ;
+C 177 ; WX 500 ; N endash ; B -8 197 508 273 ;
+C 178 ; WX 500 ; N dagger ; B 91 -134 494 696 ;
+C 179 ; WX 500 ; N daggerdbl ; B 9 -128 493 696 ;
+C 180 ; WX 250 ; N periodcentered ; B 53 164 195 306 ;
+C 182 ; WX 620 ; N paragraph ; B 130 -166 676 696 ;
+C 183 ; WX 500 ; N bullet ; B 100 170 440 510 ;
+C 184 ; WX 278 ; N quotesinglbase ; B 34 -152 196 128 ;
+C 185 ; WX 500 ; N quotedblbase ; B 34 -152 419 128 ;
+C 186 ; WX 500 ; N quotedblright ; B 127 416 512 696 ;
+C 187 ; WX 500 ; N guillemotright ; B 20 43 479 427 ;
+C 188 ; WX 1000 ; N ellipsis ; B 57 -16 863 124 ;
+C 189 ; WX 1000 ; N perthousand ; B 20 -12 1012 708 ;
+C 191 ; WX 500 ; N questiondown ; B 52 -206 406 502 ;
+C 193 ; WX 278 ; N grave ; B 88 532 291 708 ;
+C 194 ; WX 278 ; N acute ; B 144 532 377 708 ;
+C 195 ; WX 278 ; N circumflex ; B 45 532 359 708 ;
+C 196 ; WX 278 ; N tilde ; B 54 554 400 668 ;
+C 197 ; WX 278 ; N macron ; B 50 572 380 632 ;
+C 198 ; WX 278 ; N breve ; B 79 532 388 696 ;
+C 199 ; WX 278 ; N dotaccent ; B 168 544 282 658 ;
+C 200 ; WX 278 ; N dieresis ; B 66 544 385 658 ;
+C 202 ; WX 278 ; N ring ; B 123 532 329 738 ;
+C 203 ; WX 278 ; N cedilla ; B -56 -218 168 2 ;
+C 205 ; WX 278 ; N hungarumlaut ; B 50 532 439 708 ;
+C 206 ; WX 278 ; N ogonek ; B -31 -218 226 19 ;
+C 207 ; WX 278 ; N caron ; B 91 532 405 708 ;
+C 208 ; WX 1000 ; N emdash ; B -8 197 1008 273 ;
+C 225 ; WX 944 ; N AE ; B -41 0 953 680 ;
+C 227 ; WX 300 ; N ordfeminine ; B 46 400 348 696 ;
+C 232 ; WX 611 ; N Lslash ; B -6 0 606 680 ;
+C 233 ; WX 722 ; N Oslash ; B 48 -112 714 771 ;
+C 234 ; WX 944 ; N OE ; B 20 -16 985 696 ;
+C 235 ; WX 300 ; N ordmasculine ; B 58 400 353 696 ;
+C 241 ; WX 778 ; N ae ; B 37 -12 746 482 ;
+C 245 ; WX 278 ; N dotlessi ; B 30 -12 248 482 ;
+C 248 ; WX 278 ; N lslash ; B -18 -12 341 708 ;
+C 249 ; WX 500 ; N oslash ; B 20 -117 473 572 ;
+C 250 ; WX 778 ; N oe ; B 29 -12 756 482 ;
+C 251 ; WX 500 ; N germandbls ; B -163 -206 495 708 ;
+C -1 ; WX 444 ; N ecircumflex ; B 20 -12 465 708 ;
+C -1 ; WX 444 ; N edieresis ; B 20 -12 491 658 ;
+C -1 ; WX 500 ; N aacute ; B -1 -12 488 708 ;
+C -1 ; WX 800 ; N registered ; B 72 -16 768 696 ;
+C -1 ; WX 278 ; N icircumflex ; B 30 -12 347 708 ;
+C -1 ; WX 556 ; N udieresis ; B 44 -12 521 658 ;
+C -1 ; WX 500 ; N ograve ; B 20 -12 473 708 ;
+C -1 ; WX 556 ; N uacute ; B 44 -12 521 708 ;
+C -1 ; WX 556 ; N ucircumflex ; B 44 -12 521 708 ;
+C -1 ; WX 722 ; N Aacute ; B -36 0 678 889 ;
+C -1 ; WX 278 ; N igrave ; B 30 -12 279 708 ;
+C -1 ; WX 389 ; N Icircumflex ; B 2 0 444 889 ;
+C -1 ; WX 444 ; N ccedilla ; B 23 -218 437 482 ;
+C -1 ; WX 500 ; N adieresis ; B -1 -12 496 658 ;
+C -1 ; WX 667 ; N Ecircumflex ; B -10 0 666 889 ;
+C -1 ; WX 389 ; N scaron ; B -6 -16 461 708 ;
+C -1 ; WX 500 ; N thorn ; B -84 -206 488 708 ;
+C -1 ; WX 1000 ; N trademark ; B 72 274 1025 680 ;
+C -1 ; WX 444 ; N egrave ; B 20 -12 438 708 ;
+C -1 ; WX 300 ; N threesuperior ; B 32 268 336 696 ;
+C -1 ; WX 444 ; N zcaron ; B -4 -64 488 708 ;
+C -1 ; WX 500 ; N atilde ; B -1 -12 511 668 ;
+C -1 ; WX 500 ; N aring ; B -1 -12 469 738 ;
+C -1 ; WX 500 ; N ocircumflex ; B 20 -12 473 708 ;
+C -1 ; WX 667 ; N Edieresis ; B -10 0 666 839 ;
+C -1 ; WX 750 ; N threequarters ; B 32 -16 724 696 ;
+C -1 ; WX 444 ; N ydieresis ; B -71 -206 468 658 ;
+C -1 ; WX 444 ; N yacute ; B -71 -206 460 708 ;
+C -1 ; WX 278 ; N iacute ; B 30 -12 365 708 ;
+C -1 ; WX 722 ; N Acircumflex ; B -36 0 678 889 ;
+C -1 ; WX 778 ; N Uacute ; B 102 -16 820 889 ;
+C -1 ; WX 444 ; N eacute ; B 20 -12 483 708 ;
+C -1 ; WX 722 ; N Ograve ; B 48 -16 714 889 ;
+C -1 ; WX 500 ; N agrave ; B -1 -12 469 708 ;
+C -1 ; WX 778 ; N Udieresis ; B 102 -16 820 839 ;
+C -1 ; WX 500 ; N acircumflex ; B -1 -12 470 708 ;
+C -1 ; WX 389 ; N Igrave ; B 2 0 426 889 ;
+C -1 ; WX 300 ; N twosuperior ; B 26 278 332 696 ;
+C -1 ; WX 778 ; N Ugrave ; B 102 -16 820 889 ;
+C -1 ; WX 750 ; N onequarter ; B 45 -16 724 696 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 102 -16 820 889 ;
+C -1 ; WX 556 ; N Scaron ; B 22 -16 585 889 ;
+C -1 ; WX 389 ; N Idieresis ; B 2 0 470 839 ;
+C -1 ; WX 278 ; N idieresis ; B 30 -12 373 658 ;
+C -1 ; WX 667 ; N Egrave ; B -10 0 666 889 ;
+C -1 ; WX 722 ; N Oacute ; B 48 -16 714 889 ;
+C -1 ; WX 600 ; N divide ; B 65 -28 535 498 ;
+C -1 ; WX 722 ; N Atilde ; B -36 0 678 849 ;
+C -1 ; WX 722 ; N Aring ; B -36 0 678 919 ;
+C -1 ; WX 722 ; N Odieresis ; B 48 -16 714 839 ;
+C -1 ; WX 722 ; N Adieresis ; B -36 0 678 839 ;
+C -1 ; WX 778 ; N Ntilde ; B -2 -16 814 849 ;
+C -1 ; WX 611 ; N Zcaron ; B -15 0 650 889 ;
+C -1 ; WX 611 ; N Thorn ; B -6 0 615 680 ;
+C -1 ; WX 389 ; N Iacute ; B 2 0 462 889 ;
+C -1 ; WX 600 ; N plusminus ; B 65 0 535 470 ;
+C -1 ; WX 600 ; N multiply ; B 65 0 535 470 ;
+C -1 ; WX 667 ; N Eacute ; B -10 0 666 889 ;
+C -1 ; WX 667 ; N Ydieresis ; B 96 0 750 839 ;
+C -1 ; WX 300 ; N onesuperior ; B 45 278 299 696 ;
+C -1 ; WX 556 ; N ugrave ; B 44 -12 521 708 ;
+C -1 ; WX 600 ; N logicalnot ; B 65 100 535 371 ;
+C -1 ; WX 556 ; N ntilde ; B 28 -12 523 668 ;
+C -1 ; WX 722 ; N Otilde ; B 48 -16 714 849 ;
+C -1 ; WX 500 ; N otilde ; B 20 -12 511 668 ;
+C -1 ; WX 722 ; N Ccedilla ; B 63 -218 742 696 ;
+C -1 ; WX 722 ; N Agrave ; B -36 0 678 889 ;
+C -1 ; WX 750 ; N onehalf ; B 45 -16 724 696 ;
+C -1 ; WX 778 ; N Eth ; B 0 0 767 680 ;
+C -1 ; WX 400 ; N degree ; B 107 410 393 696 ;
+C -1 ; WX 667 ; N Yacute ; B 96 0 750 889 ;
+C -1 ; WX 722 ; N Ocircumflex ; B 48 -16 714 889 ;
+C -1 ; WX 500 ; N oacute ; B 20 -12 488 708 ;
+C -1 ; WX 556 ; N mu ; B -82 -206 521 482 ;
+C -1 ; WX 600 ; N minus ; B 65 194 535 276 ;
+C -1 ; WX 500 ; N eth ; B 20 -12 473 708 ;
+C -1 ; WX 500 ; N odieresis ; B 20 -12 496 658 ;
+C -1 ; WX 800 ; N copyright ; B 72 -16 768 696 ;
+C -1 ; WX 222 ; N brokenbar ; B 95 0 177 708 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 85
+
+KPX A y -37
+KPX A w -37
+KPX A v -37
+KPX A quoteright -92
+KPX A Y -55
+KPX A W -74
+KPX A V -37
+KPX A T -55
+
+KPX F period -129
+KPX F comma -129
+KPX F A -74
+
+KPX L y -37
+KPX L quoteright -111
+KPX L Y -74
+KPX L W -92
+KPX L V -37
+KPX L T -37
+
+KPX P period -129
+KPX P comma -129
+KPX P A -55
+
+KPX R Y -37
+KPX R W -55
+KPX R T -18
+
+KPX T y -74
+KPX T w -111
+KPX T u -92
+KPX T semicolon -74
+KPX T r -92
+KPX T period -111
+KPX T o -92
+KPX T i -37
+KPX T hyphen -92
+KPX T e -92
+KPX T comma -111
+KPX T colon -74
+KPX T a -92
+KPX T A -92
+
+KPX V u -111
+KPX V semicolon -129
+KPX V period -129
+KPX V o -129
+KPX V i -92
+KPX V hyphen -129
+KPX V e -129
+KPX V comma -129
+KPX V colon -129
+KPX V a -129
+KPX V A -129
+
+KPX W y -37
+KPX W u -37
+KPX W semicolon -74
+KPX W period -129
+KPX W o -55
+KPX W i -18
+KPX W hyphen -74
+KPX W e -55
+KPX W comma -129
+KPX W colon -74
+KPX W a -55
+KPX W A -74
+
+KPX Y u -37
+KPX Y semicolon -92
+KPX Y period -129
+KPX Y o -55
+KPX Y i -18
+KPX Y hyphen -92
+KPX Y e -55
+KPX Y comma -129
+KPX Y colon -92
+KPX Y a -55
+KPX Y A -55
+
+KPX f quoteright 37
+
+KPX quoteleft quoteleft -55
+
+KPX quoteright t -18
+KPX quoteright s -55
+KPX quoteright quoteright -55
+
+KPX r period -111
+KPX r hyphen -55
+KPX r comma -111
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -74
+KPX w comma -74
+
+KPX y period -74
+KPX y comma -74
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 257 181 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 257 181 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 257 181 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 257 181 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 257 181 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 257 181 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 224 181 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 224 181 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 224 181 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 224 181 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 85 181 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 85 181 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 85 181 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 85 181 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 279 181 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 268 181 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 268 181 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 268 181 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 268 181 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 268 181 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 180 181 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 302 181 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 302 181 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 302 181 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 302 181 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 236 181 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 236 181 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 208 181 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 111 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 111 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 111 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 111 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 111 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 111 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 106 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 106 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 106 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 106 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -12 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -12 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -12 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -12 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 122 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 111 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 111 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 111 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 111 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 111 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 56 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 122 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 122 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 122 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 122 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 83 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 83 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 83 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/ZC-Bd b/font/ZC-Bd
new file mode 100644
index 0000000..bcb6209
--- /dev/null
+++ b/font/ZC-Bd
@@ -0,0 +1,491 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Sep  6 11:34:10 1990
+Comment UniqueID 32817
+Comment VMusage 33645 40537
+FontName ZapfChancery-Bold
+FullName ITC Zapf Chancery Bold
+FamilyName ITC Zapf Chancery
+Weight Bold
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -188 -314 1006 819
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.ITC Zapf Chancery is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 594
+XHeight 449
+Ascender 714
+Descender -300
+StartCharMetrics 228
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 333 ; N exclam ; B 58 -16 285 610 ;
+C 34 ; WX 389 ; N quotedbl ; B 61 258 328 610 ;
+C 35 ; WX 556 ; N numbersign ; B 33 0 523 610 ;
+C 36 ; WX 556 ; N dollar ; B 29 -154 474 707 ;
+C 37 ; WX 667 ; N percent ; B 48 -183 619 700 ;
+C 38 ; WX 889 ; N ampersand ; B 30 -16 847 610 ;
+C 39 ; WX 222 ; N quoteright ; B 35 258 213 610 ;
+C 40 ; WX 333 ; N parenleft ; B 78 -210 344 666 ;
+C 41 ; WX 333 ; N parenright ; B -11 -210 255 666 ;
+C 42 ; WX 444 ; N asterisk ; B 46 236 398 610 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 278 ; N comma ; B -50 -178 192 198 ;
+C 45 ; WX 333 ; N hyphen ; B 16 169 317 269 ;
+C 46 ; WX 278 ; N period ; B 47 -16 231 168 ;
+C 47 ; WX 296 ; N slash ; B -44 -16 340 610 ;
+C 48 ; WX 556 ; N zero ; B 36 -16 520 610 ;
+C 49 ; WX 556 ; N one ; B 60 0 471 610 ;
+C 50 ; WX 556 ; N two ; B 16 -16 533 610 ;
+C 51 ; WX 556 ; N three ; B 0 -16 464 610 ;
+C 52 ; WX 556 ; N four ; B 0 -36 520 610 ;
+C 53 ; WX 556 ; N five ; B 16 -16 520 672 ;
+C 54 ; WX 556 ; N six ; B 49 -16 520 610 ;
+C 55 ; WX 556 ; N seven ; B 77 -28 520 674 ;
+C 56 ; WX 556 ; N eight ; B 36 -16 483 610 ;
+C 57 ; WX 556 ; N nine ; B 5 -16 507 610 ;
+C 58 ; WX 278 ; N colon ; B 47 -16 242 449 ;
+C 59 ; WX 278 ; N semicolon ; B -50 -178 242 449 ;
+C 60 ; WX 600 ; N less ; B 47 -8 553 514 ;
+C 61 ; WX 600 ; N equal ; B 47 107 553 399 ;
+C 62 ; WX 600 ; N greater ; B 47 -8 553 514 ;
+C 63 ; WX 389 ; N question ; B 58 -16 379 610 ;
+C 64 ; WX 800 ; N at ; B 87 -16 713 610 ;
+C 65 ; WX 667 ; N A ; B -94 -16 703 610 ;
+C 66 ; WX 667 ; N B ; B -18 -3 618 597 ;
+C 67 ; WX 611 ; N C ; B 31 -16 603 610 ;
+C 68 ; WX 722 ; N D ; B -27 -3 691 597 ;
+C 69 ; WX 667 ; N E ; B -27 -16 632 610 ;
+C 70 ; WX 556 ; N F ; B -27 0 583 610 ;
+C 71 ; WX 722 ; N G ; B 37 -102 728 610 ;
+C 72 ; WX 778 ; N H ; B -27 0 805 594 ;
+C 73 ; WX 389 ; N I ; B -27 0 401 594 ;
+C 74 ; WX 333 ; N J ; B -139 -214 352 594 ;
+C 75 ; WX 722 ; N K ; B -27 -16 759 604 ;
+C 76 ; WX 556 ; N L ; B -14 -16 559 594 ;
+C 77 ; WX 889 ; N M ; B -27 -16 916 604 ;
+C 78 ; WX 722 ; N N ; B -27 -8 749 594 ;
+C 79 ; WX 722 ; N O ; B 31 -16 691 610 ;
+C 80 ; WX 611 ; N P ; B -27 0 594 597 ;
+C 81 ; WX 722 ; N Q ; B 31 -173 764 610 ;
+C 82 ; WX 722 ; N R ; B -27 -16 762 597 ;
+C 83 ; WX 500 ; N S ; B -18 -16 476 610 ;
+C 84 ; WX 667 ; N T ; B 13 0 654 604 ;
+C 85 ; WX 778 ; N U ; B 0 -16 811 594 ;
+C 86 ; WX 611 ; N V ; B -63 -16 598 610 ;
+C 87 ; WX 944 ; N W ; B -58 -16 940 610 ;
+C 88 ; WX 611 ; N X ; B -58 -16 651 610 ;
+C 89 ; WX 611 ; N Y ; B -50 0 651 610 ;
+C 90 ; WX 611 ; N Z ; B -18 -31 604 610 ;
+C 91 ; WX 389 ; N bracketleft ; B 93 -200 380 656 ;
+C 92 ; WX 296 ; N backslash ; B -44 -16 340 610 ;
+C 93 ; WX 389 ; N bracketright ; B 9 -200 296 656 ;
+C 94 ; WX 600 ; N asciicircum ; B 82 229 518 594 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 41 258 219 610 ;
+C 97 ; WX 500 ; N a ; B 22 -14 524 449 ;
+C 98 ; WX 500 ; N b ; B 29 -16 465 714 ;
+C 99 ; WX 389 ; N c ; B 17 -14 418 449 ;
+C 100 ; WX 500 ; N d ; B 22 -14 599 714 ;
+C 101 ; WX 389 ; N e ; B 17 -14 413 449 ;
+C 102 ; WX 333 ; N f ; B -187 -314 464 714 ; L i fi ; L l fl ;
+C 103 ; WX 500 ; N g ; B -64 -314 479 449 ;
+C 104 ; WX 556 ; N h ; B 30 -14 595 714 ;
+C 105 ; WX 333 ; N i ; B 2 -14 347 649 ;
+C 106 ; WX 278 ; N j ; B -146 -314 228 649 ;
+C 107 ; WX 500 ; N k ; B 17 -14 539 714 ;
+C 108 ; WX 278 ; N l ; B 32 -14 361 714 ;
+C 109 ; WX 778 ; N m ; B -29 -14 817 449 ;
+C 110 ; WX 556 ; N n ; B -23 -14 595 449 ;
+C 111 ; WX 500 ; N o ; B 17 -14 465 449 ;
+C 112 ; WX 500 ; N p ; B -63 -300 465 584 ;
+C 113 ; WX 500 ; N q ; B 22 -300 507 526 ;
+C 114 ; WX 389 ; N r ; B -6 -14 407 449 ;
+C 115 ; WX 389 ; N s ; B -2 -14 346 449 ;
+C 116 ; WX 333 ; N t ; B -58 -14 354 579 ;
+C 117 ; WX 556 ; N u ; B -18 -14 583 449 ;
+C 118 ; WX 444 ; N v ; B -30 -14 442 449 ;
+C 119 ; WX 722 ; N w ; B -30 -14 720 449 ;
+C 120 ; WX 500 ; N x ; B -11 -72 508 449 ;
+C 121 ; WX 444 ; N y ; B -152 -314 436 449 ;
+C 122 ; WX 389 ; N z ; B -30 -14 432 449 ;
+C 123 ; WX 389 ; N braceleft ; B 76 -200 367 656 ;
+C 124 ; WX 222 ; N bar ; B 67 -16 155 714 ;
+C 125 ; WX 389 ; N braceright ; B 22 -200 313 656 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 173 531 333 ;
+C 161 ; WX 333 ; N exclamdown ; B 40 -177 267 449 ;
+C 162 ; WX 556 ; N cent ; B 67 -128 456 554 ;
+C 163 ; WX 556 ; N sterling ; B 0 -43 536 610 ;
+C 164 ; WX 167 ; N fraction ; B -170 -16 337 610 ;
+C 165 ; WX 556 ; N yen ; B -43 0 593 610 ;
+C 166 ; WX 556 ; N florin ; B -110 -314 558 610 ;
+C 167 ; WX 500 ; N section ; B 25 -216 426 610 ;
+C 168 ; WX 556 ; N currency ; B 22 43 534 554 ;
+C 169 ; WX 222 ; N quotesingle ; B 61 258 161 610 ;
+C 170 ; WX 389 ; N quotedblleft ; B 27 258 379 610 ;
+C 171 ; WX 444 ; N guillemotleft ; B 49 14 375 424 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 64 14 242 424 ;
+C 173 ; WX 333 ; N guilsinglright ; B 64 14 242 424 ;
+C 174 ; WX 556 ; N fi ; B -187 -314 585 714 ;
+C 175 ; WX 556 ; N fl ; B -187 -314 604 714 ;
+C 177 ; WX 500 ; N endash ; B -6 184 506 254 ;
+C 178 ; WX 444 ; N dagger ; B 2 -41 442 610 ;
+C 179 ; WX 444 ; N daggerdbl ; B 39 -60 385 610 ;
+C 180 ; WX 278 ; N periodcentered ; B 71 191 207 327 ;
+C 182 ; WX 620 ; N paragraph ; B 72 -200 579 594 ;
+C 183 ; WX 500 ; N bullet ; B 102 149 398 445 ;
+C 184 ; WX 222 ; N quotesinglbase ; B -13 -160 165 192 ;
+C 185 ; WX 389 ; N quotedblbase ; B -14 -160 338 192 ;
+C 186 ; WX 389 ; N quotedblright ; B 39 258 391 610 ;
+C 187 ; WX 444 ; N guillemotright ; B 49 14 375 424 ;
+C 188 ; WX 1000 ; N ellipsis ; B 75 -16 925 168 ;
+C 189 ; WX 944 ; N perthousand ; B 25 -183 919 700 ;
+C 191 ; WX 389 ; N questiondown ; B -4 -177 317 449 ;
+C 193 ; WX 278 ; N grave ; B 29 516 221 688 ;
+C 194 ; WX 278 ; N acute ; B 97 510 301 688 ;
+C 195 ; WX 278 ; N circumflex ; B 21 510 271 688 ;
+C 196 ; WX 278 ; N tilde ; B 6 543 304 661 ;
+C 197 ; WX 278 ; N macron ; B 21 555 279 619 ;
+C 198 ; WX 278 ; N breve ; B 36 540 309 668 ;
+C 199 ; WX 278 ; N dotaccent ; B 73 532 221 674 ;
+C 200 ; WX 278 ; N dieresis ; B -14 532 308 674 ;
+C 202 ; WX 278 ; N ring ; B 53 498 225 670 ;
+C 203 ; WX 278 ; N cedilla ; B -22 -190 186 20 ;
+C 205 ; WX 278 ; N hungarumlaut ; B -16 510 362 688 ;
+C 206 ; WX 278 ; N ogonek ; B -33 -190 209 20 ;
+C 207 ; WX 278 ; N caron ; B 46 510 296 688 ;
+C 208 ; WX 1000 ; N emdash ; B -6 184 1006 254 ;
+C 225 ; WX 889 ; N AE ; B -35 -16 845 610 ;
+C 227 ; WX 325 ; N ordfeminine ; B 8 333 348 610 ;
+C 232 ; WX 556 ; N Lslash ; B -14 -16 559 594 ;
+C 233 ; WX 722 ; N Oslash ; B 31 -94 691 683 ;
+C 234 ; WX 1000 ; N OE ; B 46 -16 965 610 ;
+C 235 ; WX 325 ; N ordmasculine ; B 11 333 302 610 ;
+C 241 ; WX 667 ; N ae ; B 17 -14 696 493 ;
+C 245 ; WX 333 ; N dotlessi ; B 2 -14 347 449 ;
+C 248 ; WX 278 ; N lslash ; B -18 -14 361 714 ;
+C 249 ; WX 500 ; N oslash ; B 17 -99 470 521 ;
+C 250 ; WX 667 ; N oe ; B 22 -14 702 449 ;
+C 251 ; WX 556 ; N germandbls ; B -188 -314 502 714 ;
+C -1 ; WX 389 ; N ecircumflex ; B 17 -14 413 688 ;
+C -1 ; WX 389 ; N edieresis ; B 17 -14 413 674 ;
+C -1 ; WX 500 ; N aacute ; B 22 -14 524 688 ;
+C -1 ; WX 800 ; N registered ; B 87 -16 713 610 ;
+C -1 ; WX 333 ; N icircumflex ; B 2 -14 347 688 ;
+C -1 ; WX 556 ; N udieresis ; B -18 -14 583 674 ;
+C -1 ; WX 500 ; N ograve ; B 17 -14 465 688 ;
+C -1 ; WX 556 ; N uacute ; B -18 -14 583 688 ;
+C -1 ; WX 556 ; N ucircumflex ; B -18 -14 583 688 ;
+C -1 ; WX 667 ; N Aacute ; B -94 -16 703 819 ;
+C -1 ; WX 333 ; N igrave ; B 2 -14 347 688 ;
+C -1 ; WX 389 ; N Icircumflex ; B -27 0 401 819 ;
+C -1 ; WX 389 ; N ccedilla ; B 17 -190 418 449 ;
+C -1 ; WX 500 ; N adieresis ; B 22 -14 524 674 ;
+C -1 ; WX 667 ; N Ecircumflex ; B -27 -16 632 819 ;
+C -1 ; WX 389 ; N scaron ; B -2 -14 384 688 ;
+C -1 ; WX 500 ; N thorn ; B -63 -300 465 714 ;
+C -1 ; WX 1000 ; N trademark ; B 24 189 976 594 ;
+C -1 ; WX 389 ; N egrave ; B 17 -14 413 688 ;
+C -1 ; WX 361 ; N threesuperior ; B 1 234 308 610 ;
+C -1 ; WX 389 ; N zcaron ; B -30 -14 432 688 ;
+C -1 ; WX 500 ; N atilde ; B 22 -14 524 661 ;
+C -1 ; WX 500 ; N aring ; B 22 -14 524 670 ;
+C -1 ; WX 500 ; N ocircumflex ; B 17 -14 465 688 ;
+C -1 ; WX 667 ; N Edieresis ; B -27 -16 632 805 ;
+C -1 ; WX 834 ; N threequarters ; B 41 -16 793 610 ;
+C -1 ; WX 444 ; N ydieresis ; B -152 -314 436 674 ;
+C -1 ; WX 444 ; N yacute ; B -152 -314 436 688 ;
+C -1 ; WX 333 ; N iacute ; B 2 -14 347 688 ;
+C -1 ; WX 667 ; N Acircumflex ; B -94 -16 703 819 ;
+C -1 ; WX 778 ; N Uacute ; B 0 -16 811 819 ;
+C -1 ; WX 389 ; N eacute ; B 17 -14 413 688 ;
+C -1 ; WX 722 ; N Ograve ; B 31 -16 691 819 ;
+C -1 ; WX 500 ; N agrave ; B 22 -14 524 688 ;
+C -1 ; WX 778 ; N Udieresis ; B 0 -16 811 805 ;
+C -1 ; WX 500 ; N acircumflex ; B 22 -14 524 688 ;
+C -1 ; WX 389 ; N Igrave ; B -27 0 401 819 ;
+C -1 ; WX 361 ; N twosuperior ; B 8 234 345 610 ;
+C -1 ; WX 778 ; N Ugrave ; B 0 -16 811 819 ;
+C -1 ; WX 834 ; N onequarter ; B 41 -16 793 610 ;
+C -1 ; WX 778 ; N Ucircumflex ; B 0 -16 811 819 ;
+C -1 ; WX 500 ; N Scaron ; B -18 -16 476 819 ;
+C -1 ; WX 389 ; N Idieresis ; B -27 0 401 805 ;
+C -1 ; WX 333 ; N idieresis ; B 2 -14 347 674 ;
+C -1 ; WX 667 ; N Egrave ; B -27 -16 632 819 ;
+C -1 ; WX 722 ; N Oacute ; B 31 -16 691 819 ;
+C -1 ; WX 600 ; N divide ; B 47 -33 553 539 ;
+C -1 ; WX 667 ; N Atilde ; B -94 -16 703 792 ;
+C -1 ; WX 667 ; N Aring ; B -94 -16 703 801 ;
+C -1 ; WX 722 ; N Odieresis ; B 31 -16 691 805 ;
+C -1 ; WX 667 ; N Adieresis ; B -94 -16 703 805 ;
+C -1 ; WX 722 ; N Ntilde ; B -27 -8 749 792 ;
+C -1 ; WX 611 ; N Zcaron ; B -18 -31 604 819 ;
+C -1 ; WX 611 ; N Thorn ; B -27 0 573 594 ;
+C -1 ; WX 389 ; N Iacute ; B -27 0 401 819 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 68 21 532 485 ;
+C -1 ; WX 667 ; N Eacute ; B -27 -16 632 819 ;
+C -1 ; WX 611 ; N Ydieresis ; B -50 0 651 805 ;
+C -1 ; WX 361 ; N onesuperior ; B 39 244 306 610 ;
+C -1 ; WX 556 ; N ugrave ; B -18 -14 583 688 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 108 553 399 ;
+C -1 ; WX 556 ; N ntilde ; B -23 -14 595 661 ;
+C -1 ; WX 722 ; N Otilde ; B 31 -16 691 792 ;
+C -1 ; WX 500 ; N otilde ; B 17 -14 465 661 ;
+C -1 ; WX 611 ; N Ccedilla ; B 31 -190 603 610 ;
+C -1 ; WX 667 ; N Agrave ; B -94 -16 703 819 ;
+C -1 ; WX 834 ; N onehalf ; B 41 -16 830 610 ;
+C -1 ; WX 722 ; N Eth ; B -27 -3 692 597 ;
+C -1 ; WX 400 ; N degree ; B 57 324 343 610 ;
+C -1 ; WX 611 ; N Yacute ; B -50 0 651 819 ;
+C -1 ; WX 722 ; N Ocircumflex ; B 31 -16 691 819 ;
+C -1 ; WX 500 ; N oacute ; B 17 -14 465 688 ;
+C -1 ; WX 556 ; N mu ; B -18 -314 583 449 ;
+C -1 ; WX 600 ; N minus ; B 47 209 553 297 ;
+C -1 ; WX 500 ; N eth ; B 17 -14 474 714 ;
+C -1 ; WX 500 ; N odieresis ; B 17 -14 465 674 ;
+C -1 ; WX 800 ; N copyright ; B 87 -16 713 610 ;
+C -1 ; WX 222 ; N brokenbar ; B 67 -16 155 714 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 145
+
+KPX A y -37
+KPX A w -37
+KPX A v -37
+KPX A quoteright -40
+KPX A quotedblright -40
+KPX A Y -55
+KPX A W -55
+KPX A V -55
+KPX A T -55
+KPX A Q -10
+KPX A O -10
+KPX A G -10
+KPX A C -10
+
+KPX B period -50
+KPX B comma -50
+KPX B U -18
+
+KPX D period -50
+KPX D comma -50
+KPX D W 10
+KPX D V 10
+
+KPX F r -40
+KPX F period -129
+KPX F o -50
+KPX F i -18
+KPX F e -50
+KPX F comma -111
+KPX F a -50
+KPX F A -55
+
+KPX G period -50
+KPX G comma -50
+
+KPX J period -50
+KPX J comma -50
+
+KPX L y -18
+KPX L quoteright -10
+KPX L Y -74
+KPX L W -40
+KPX L V -40
+KPX L T -55
+
+KPX N period -50
+KPX N comma -50
+
+KPX O period -50
+KPX O comma -50
+KPX O W 10
+KPX O V 10
+
+KPX P period -129
+KPX P o -25
+KPX P e -25
+KPX P comma -129
+KPX P a -25
+KPX P A -55
+
+KPX Q period -50
+KPX Q comma 125
+
+KPX R Y -18
+KPX R W -37
+KPX R V -18
+KPX R U -10
+KPX R T -37
+
+KPX S period -50
+KPX S comma -50
+
+KPX T y -74
+KPX T w -92
+KPX T u -74
+KPX T semicolon -74
+KPX T r -55
+KPX T period -111
+KPX T o -74
+KPX T i -37
+KPX T hyphen -92
+KPX T e -74
+KPX T comma -92
+KPX T colon -74
+KPX T a -74
+KPX T A -55
+
+KPX V semicolon -18
+KPX V period -111
+KPX V o -18
+KPX V hyphen -37
+KPX V e -18
+KPX V comma -111
+KPX V colon -18
+KPX V a -18
+KPX V O 10
+KPX V G 10
+KPX V A -55
+
+KPX W period -111
+KPX W o -18
+KPX W hyphen -37
+KPX W e -18
+KPX W comma -111
+KPX W a -18
+KPX W O 10
+KPX W A -65
+
+KPX Y u -55
+KPX Y semicolon -55
+KPX Y period -111
+KPX Y o -74
+KPX Y i -37
+KPX Y hyphen -74
+KPX Y e -74
+KPX Y comma -92
+KPX Y colon -55
+KPX Y a -74
+KPX Y A -55
+
+KPX b period -50
+KPX b comma -50
+
+KPX colon space -37
+
+KPX comma space -37
+KPX comma quoteright -18
+KPX comma quotedblright -18
+
+KPX f quoteright 18
+KPX f period -75
+KPX f comma -50
+
+KPX g period -50
+KPX g comma -18
+
+KPX period quoteright -18
+KPX period quotedblright -18
+
+KPX quotedblleft quoteleft -18
+KPX quotedblleft A -40
+
+KPX quotedblright space -37
+
+KPX quoteleft quoteleft -40
+KPX quoteleft A -40
+
+KPX quoteright v 18
+KPX quoteright t 18
+KPX quoteright s -18
+KPX quoteright r 18
+KPX quoteright quoteright -40
+KPX quoteright quotedblright -18
+KPX quoteright l 18
+KPX quoteright d -18
+
+KPX r period -92
+KPX r hyphen -55
+KPX r comma -74
+
+KPX space quoteleft -37
+KPX space quotedblleft -37
+KPX space Y -37
+KPX space W -37
+KPX space V -37
+KPX space T -37
+KPX space A -37
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -74
+KPX w comma -74
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 235 131 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 235 131 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 235 131 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 235 131 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 235 131 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 235 131 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 213 131 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 213 131 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 213 131 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 213 131 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 84 131 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 84 131 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 84 131 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 84 131 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 254 131 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 234 131 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 234 131 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 234 131 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 234 131 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 234 131 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 143 131 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 278 131 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 278 131 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 278 131 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 278 131 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 199 131 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 199 131 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 199 131 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 129 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 129 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 129 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 129 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 151 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 129 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 88 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 88 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 88 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 88 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 34 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 34 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 34 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 34 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 145 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 111 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 111 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 111 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 111 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 111 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 88 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 157 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 157 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 157 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 157 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 101 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 101 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 74 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/ZC-Dm b/font/ZC-Dm
new file mode 100644
index 0000000..c37e41d
--- /dev/null
+++ b/font/ZC-Dm
@@ -0,0 +1,480 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Sep  6 12:00:28 1990
+Comment UniqueID 32826
+Comment VMusage 34487 41379
+FontName ZapfChancery-Demi
+FullName ITC Zapf Chancery Demi
+FamilyName ITC Zapf Chancery
+Weight Demi
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -184 -314 1006 825
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.ITC Zapf Chancery is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 594
+XHeight 443
+Ascender 714
+Descender -300
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 53 -14 225 610 ;
+C 34 ; WX 389 ; N quotedbl ; B 82 294 307 610 ;
+C 35 ; WX 500 ; N numbersign ; B 32 0 469 594 ;
+C 36 ; WX 500 ; N dollar ; B 30 -149 417 714 ;
+C 37 ; WX 667 ; N percent ; B 46 -167 621 706 ;
+C 38 ; WX 833 ; N ampersand ; B 14 -14 819 610 ;
+C 39 ; WX 222 ; N quoteright ; B 22 294 176 610 ;
+C 40 ; WX 333 ; N parenleft ; B 89 -213 301 669 ;
+C 41 ; WX 333 ; N parenright ; B 32 -213 244 669 ;
+C 42 ; WX 444 ; N asterisk ; B 54 256 390 610 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 250 ; N comma ; B -48 -140 166 193 ;
+C 45 ; WX 333 ; N hyphen ; B 32 187 301 251 ;
+C 46 ; WX 250 ; N period ; B 48 -14 202 154 ;
+C 47 ; WX 296 ; N slash ; B -40 -16 336 610 ;
+C 48 ; WX 500 ; N zero ; B 38 -16 462 610 ;
+C 49 ; WX 500 ; N one ; B 53 0 435 614 ;
+C 50 ; WX 500 ; N two ; B 7 -16 473 610 ;
+C 51 ; WX 500 ; N three ; B -18 -16 410 610 ;
+C 52 ; WX 500 ; N four ; B 9 -24 468 610 ;
+C 53 ; WX 500 ; N five ; B 7 -16 480 670 ;
+C 54 ; WX 500 ; N six ; B 38 -16 462 610 ;
+C 55 ; WX 500 ; N seven ; B 75 -26 498 668 ;
+C 56 ; WX 500 ; N eight ; B 35 -16 443 610 ;
+C 57 ; WX 500 ; N nine ; B 3 -16 453 610 ;
+C 58 ; WX 250 ; N colon ; B 48 -14 202 443 ;
+C 59 ; WX 250 ; N semicolon ; B -48 -140 202 443 ;
+C 60 ; WX 600 ; N less ; B 47 -8 553 514 ;
+C 61 ; WX 600 ; N equal ; B 47 121 553 385 ;
+C 62 ; WX 600 ; N greater ; B 47 -8 553 514 ;
+C 63 ; WX 333 ; N question ; B 59 -14 321 610 ;
+C 64 ; WX 800 ; N at ; B 87 -16 713 610 ;
+C 65 ; WX 611 ; N A ; B -94 -16 628 610 ;
+C 66 ; WX 611 ; N B ; B -22 -4 558 598 ;
+C 67 ; WX 611 ; N C ; B 36 -16 571 610 ;
+C 68 ; WX 722 ; N D ; B -10 -4 675 598 ;
+C 69 ; WX 611 ; N E ; B -10 -10 572 610 ;
+C 70 ; WX 500 ; N F ; B -22 0 522 610 ;
+C 71 ; WX 667 ; N G ; B 36 -78 653 610 ;
+C 72 ; WX 722 ; N H ; B -22 0 744 594 ;
+C 73 ; WX 333 ; N I ; B -10 0 343 594 ;
+C 74 ; WX 278 ; N J ; B -146 -215 306 594 ;
+C 75 ; WX 611 ; N K ; B -10 -16 646 610 ;
+C 76 ; WX 556 ; N L ; B 0 -10 528 594 ;
+C 77 ; WX 833 ; N M ; B -17 -16 850 594 ;
+C 78 ; WX 667 ; N N ; B -10 -16 684 594 ;
+C 79 ; WX 722 ; N O ; B 36 -16 686 610 ;
+C 80 ; WX 556 ; N P ; B -22 0 540 594 ;
+C 81 ; WX 722 ; N Q ; B 36 -176 766 610 ;
+C 82 ; WX 611 ; N R ; B -10 -16 643 594 ;
+C 83 ; WX 500 ; N S ; B 5 -16 449 610 ;
+C 84 ; WX 611 ; N T ; B 16 0 595 604 ;
+C 85 ; WX 722 ; N U ; B -14 -16 736 594 ;
+C 86 ; WX 556 ; N V ; B -48 -16 562 610 ;
+C 87 ; WX 944 ; N W ; B -24 -16 954 610 ;
+C 88 ; WX 611 ; N X ; B -41 -16 632 610 ;
+C 89 ; WX 611 ; N Y ; B -38 0 649 610 ;
+C 90 ; WX 611 ; N Z ; B -15 -23 600 610 ;
+C 91 ; WX 333 ; N bracketleft ; B 74 -207 355 663 ;
+C 92 ; WX 296 ; N backslash ; B -40 -16 336 610 ;
+C 93 ; WX 333 ; N bracketright ; B -22 -207 259 663 ;
+C 94 ; WX 600 ; N asciicircum ; B 89 229 511 594 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 46 294 200 610 ;
+C 97 ; WX 444 ; N a ; B 22 -14 488 443 ;
+C 98 ; WX 444 ; N b ; B 40 -14 408 714 ;
+C 99 ; WX 389 ; N c ; B 22 -14 400 444 ;
+C 100 ; WX 444 ; N d ; B 22 -14 550 714 ;
+C 101 ; WX 389 ; N e ; B 22 -14 399 443 ;
+C 102 ; WX 278 ; N f ; B -160 -314 410 714 ; L i fi ; L l fl ;
+C 103 ; WX 444 ; N g ; B -32 -314 430 443 ;
+C 104 ; WX 500 ; N h ; B 40 -14 543 714 ;
+C 105 ; WX 278 ; N i ; B -6 -14 306 654 ;
+C 106 ; WX 278 ; N j ; B -116 -314 223 654 ;
+C 107 ; WX 444 ; N k ; B 31 -14 487 714 ;
+C 108 ; WX 278 ; N l ; B 61 -14 341 714 ;
+C 109 ; WX 722 ; N m ; B -20 -14 771 443 ;
+C 110 ; WX 500 ; N n ; B -20 -14 551 443 ;
+C 111 ; WX 444 ; N o ; B 28 -14 416 443 ;
+C 112 ; WX 444 ; N p ; B -68 -300 408 560 ;
+C 113 ; WX 444 ; N q ; B 22 -300 483 486 ;
+C 114 ; WX 333 ; N r ; B -13 -14 372 443 ;
+C 115 ; WX 389 ; N s ; B 18 -14 355 443 ;
+C 116 ; WX 333 ; N t ; B 0 -14 345 552 ;
+C 117 ; WX 500 ; N u ; B -20 -14 549 443 ;
+C 118 ; WX 444 ; N v ; B -30 -14 431 456 ;
+C 119 ; WX 722 ; N w ; B -30 -14 698 454 ;
+C 120 ; WX 444 ; N x ; B -18 -55 450 443 ;
+C 121 ; WX 444 ; N y ; B -127 -314 429 455 ;
+C 122 ; WX 389 ; N z ; B -22 -14 438 443 ;
+C 123 ; WX 333 ; N braceleft ; B 40 -207 300 663 ;
+C 124 ; WX 222 ; N bar ; B 79 -16 143 714 ;
+C 125 ; WX 333 ; N braceright ; B 33 -207 293 663 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 183 531 323 ;
+C 161 ; WX 278 ; N exclamdown ; B 53 -181 225 443 ;
+C 162 ; WX 500 ; N cent ; B 51 -149 421 554 ;
+C 163 ; WX 500 ; N sterling ; B -9 -50 498 610 ;
+C 164 ; WX 167 ; N fraction ; B -166 -16 333 610 ;
+C 165 ; WX 500 ; N yen ; B -27 0 527 610 ;
+C 166 ; WX 500 ; N florin ; B -132 -314 514 610 ;
+C 167 ; WX 500 ; N section ; B 63 -212 420 610 ;
+C 168 ; WX 500 ; N currency ; B 0 47 500 547 ;
+C 169 ; WX 222 ; N quotesingle ; B 73 294 149 610 ;
+C 170 ; WX 389 ; N quotedblleft ; B 56 294 364 610 ;
+C 171 ; WX 444 ; N guillemotleft ; B 62 19 370 419 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 69 19 243 419 ;
+C 173 ; WX 333 ; N guilsinglright ; B 69 19 243 419 ;
+C 174 ; WX 500 ; N fi ; B -184 -314 543 714 ;
+C 175 ; WX 500 ; N fl ; B -168 -314 553 714 ;
+C 177 ; WX 500 ; N endash ; B -6 193 506 245 ;
+C 178 ; WX 444 ; N dagger ; B 12 -32 442 610 ;
+C 179 ; WX 444 ; N daggerdbl ; B 48 -43 396 610 ;
+C 180 ; WX 250 ; N periodcentered ; B 63 199 187 323 ;
+C 182 ; WX 620 ; N paragraph ; B 80 -196 567 594 ;
+C 183 ; WX 500 ; N bullet ; B 102 149 398 445 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 22 -113 176 203 ;
+C 185 ; WX 389 ; N quotedblbase ; B 25 -113 333 203 ;
+C 186 ; WX 389 ; N quotedblright ; B 25 294 333 610 ;
+C 187 ; WX 444 ; N guillemotright ; B 62 19 370 419 ;
+C 188 ; WX 1000 ; N ellipsis ; B 90 -14 910 154 ;
+C 189 ; WX 944 ; N perthousand ; B 23 -167 921 706 ;
+C 191 ; WX 333 ; N questiondown ; B 12 -181 274 443 ;
+C 193 ; WX 278 ; N grave ; B 34 496 220 664 ;
+C 194 ; WX 278 ; N acute ; B 93 496 279 664 ;
+C 195 ; WX 278 ; N circumflex ; B 23 496 255 670 ;
+C 196 ; WX 278 ; N tilde ; B 12 524 300 630 ;
+C 197 ; WX 278 ; N macron ; B 24 543 274 589 ;
+C 198 ; WX 278 ; N breve ; B 41 524 303 642 ;
+C 199 ; WX 278 ; N dotaccent ; B 83 524 207 642 ;
+C 200 ; WX 278 ; N dieresis ; B 3 524 281 642 ;
+C 202 ; WX 278 ; N ring ; B 71 496 251 676 ;
+C 203 ; WX 278 ; N cedilla ; B -42 -193 160 9 ;
+C 205 ; WX 278 ; N hungarumlaut ; B 16 496 356 664 ;
+C 206 ; WX 278 ; N ogonek ; B -24 -193 210 9 ;
+C 207 ; WX 278 ; N caron ; B 58 496 290 670 ;
+C 208 ; WX 1000 ; N emdash ; B -6 193 1006 245 ;
+C 225 ; WX 833 ; N AE ; B -20 -10 789 610 ;
+C 227 ; WX 289 ; N ordfeminine ; B 20 336 335 610 ;
+C 232 ; WX 556 ; N Lslash ; B 0 -10 528 594 ;
+C 233 ; WX 722 ; N Oslash ; B 36 -90 686 684 ;
+C 234 ; WX 944 ; N OE ; B 42 -10 890 610 ;
+C 235 ; WX 289 ; N ordmasculine ; B 29 336 290 610 ;
+C 241 ; WX 611 ; N ae ; B 22 -14 645 479 ;
+C 245 ; WX 278 ; N dotlessi ; B -6 -14 306 443 ;
+C 248 ; WX 278 ; N lslash ; B -6 -14 341 714 ;
+C 249 ; WX 444 ; N oslash ; B 17 -80 427 509 ;
+C 250 ; WX 667 ; N oe ; B 22 -14 685 443 ;
+C 251 ; WX 500 ; N germandbls ; B -167 -314 479 714 ;
+C -1 ; WX 389 ; N ecircumflex ; B 22 -14 399 670 ;
+C -1 ; WX 389 ; N edieresis ; B 22 -14 399 642 ;
+C -1 ; WX 444 ; N aacute ; B 22 -14 488 664 ;
+C -1 ; WX 800 ; N registered ; B 87 -16 713 610 ;
+C -1 ; WX 278 ; N icircumflex ; B -6 -14 306 670 ;
+C -1 ; WX 500 ; N udieresis ; B -20 -14 549 642 ;
+C -1 ; WX 444 ; N ograve ; B 28 -14 416 664 ;
+C -1 ; WX 500 ; N uacute ; B -20 -14 549 664 ;
+C -1 ; WX 500 ; N ucircumflex ; B -20 -14 549 670 ;
+C -1 ; WX 611 ; N Aacute ; B -94 -16 628 803 ;
+C -1 ; WX 278 ; N igrave ; B -6 -14 306 664 ;
+C -1 ; WX 333 ; N Icircumflex ; B -10 0 343 809 ;
+C -1 ; WX 389 ; N ccedilla ; B 22 -193 400 444 ;
+C -1 ; WX 444 ; N adieresis ; B 22 -14 488 642 ;
+C -1 ; WX 611 ; N Ecircumflex ; B -10 -10 572 809 ;
+C -1 ; WX 389 ; N scaron ; B 18 -14 392 670 ;
+C -1 ; WX 444 ; N thorn ; B -68 -300 408 714 ;
+C -1 ; WX 1000 ; N trademark ; B 37 190 963 594 ;
+C -1 ; WX 389 ; N egrave ; B 22 -14 399 664 ;
+C -1 ; WX 325 ; N threesuperior ; B 8 234 294 610 ;
+C -1 ; WX 389 ; N zcaron ; B -22 -14 438 670 ;
+C -1 ; WX 444 ; N atilde ; B 22 -14 488 630 ;
+C -1 ; WX 444 ; N aring ; B 22 -14 488 676 ;
+C -1 ; WX 444 ; N ocircumflex ; B 28 -14 416 670 ;
+C -1 ; WX 611 ; N Edieresis ; B -10 -10 572 781 ;
+C -1 ; WX 750 ; N threequarters ; B 28 -16 739 610 ;
+C -1 ; WX 444 ; N ydieresis ; B -127 -314 429 642 ;
+C -1 ; WX 444 ; N yacute ; B -127 -314 429 664 ;
+C -1 ; WX 278 ; N iacute ; B -6 -14 306 664 ;
+C -1 ; WX 611 ; N Acircumflex ; B -94 -16 628 809 ;
+C -1 ; WX 722 ; N Uacute ; B -14 -16 736 803 ;
+C -1 ; WX 389 ; N eacute ; B 22 -14 399 664 ;
+C -1 ; WX 722 ; N Ograve ; B 36 -16 686 803 ;
+C -1 ; WX 444 ; N agrave ; B 22 -14 488 664 ;
+C -1 ; WX 722 ; N Udieresis ; B -14 -16 736 781 ;
+C -1 ; WX 444 ; N acircumflex ; B 22 -14 488 670 ;
+C -1 ; WX 333 ; N Igrave ; B -10 0 343 803 ;
+C -1 ; WX 325 ; N twosuperior ; B 3 234 312 610 ;
+C -1 ; WX 722 ; N Ugrave ; B -14 -16 736 803 ;
+C -1 ; WX 750 ; N onequarter ; B 34 -16 739 612 ;
+C -1 ; WX 722 ; N Ucircumflex ; B -14 -16 736 809 ;
+C -1 ; WX 500 ; N Scaron ; B 5 -16 449 809 ;
+C -1 ; WX 333 ; N Idieresis ; B -10 0 343 781 ;
+C -1 ; WX 278 ; N idieresis ; B -6 -14 306 642 ;
+C -1 ; WX 611 ; N Egrave ; B -10 -10 572 803 ;
+C -1 ; WX 722 ; N Oacute ; B 36 -16 686 803 ;
+C -1 ; WX 600 ; N divide ; B 47 -11 553 517 ;
+C -1 ; WX 611 ; N Atilde ; B -94 -16 628 769 ;
+C -1 ; WX 611 ; N Aring ; B -94 -16 628 825 ;
+C -1 ; WX 722 ; N Odieresis ; B 36 -16 686 781 ;
+C -1 ; WX 611 ; N Adieresis ; B -94 -16 628 781 ;
+C -1 ; WX 667 ; N Ntilde ; B -10 -16 684 769 ;
+C -1 ; WX 611 ; N Zcaron ; B -15 -23 600 809 ;
+C -1 ; WX 556 ; N Thorn ; B -22 0 535 594 ;
+C -1 ; WX 333 ; N Iacute ; B -10 0 343 803 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 71 24 529 482 ;
+C -1 ; WX 611 ; N Eacute ; B -10 -10 572 803 ;
+C -1 ; WX 611 ; N Ydieresis ; B -38 0 649 781 ;
+C -1 ; WX 325 ; N onesuperior ; B 34 244 291 612 ;
+C -1 ; WX 500 ; N ugrave ; B -20 -14 549 664 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 107 553 385 ;
+C -1 ; WX 500 ; N ntilde ; B -20 -14 551 630 ;
+C -1 ; WX 722 ; N Otilde ; B 36 -16 686 769 ;
+C -1 ; WX 444 ; N otilde ; B 28 -14 429 630 ;
+C -1 ; WX 611 ; N Ccedilla ; B 36 -193 571 610 ;
+C -1 ; WX 611 ; N Agrave ; B -94 -16 628 803 ;
+C -1 ; WX 750 ; N onehalf ; B 34 -16 750 612 ;
+C -1 ; WX 722 ; N Eth ; B -10 -4 675 598 ;
+C -1 ; WX 400 ; N degree ; B 58 326 342 610 ;
+C -1 ; WX 611 ; N Yacute ; B -38 0 649 803 ;
+C -1 ; WX 722 ; N Ocircumflex ; B 36 -16 686 809 ;
+C -1 ; WX 444 ; N oacute ; B 28 -14 416 664 ;
+C -1 ; WX 500 ; N mu ; B -20 -314 549 443 ;
+C -1 ; WX 600 ; N minus ; B 47 221 553 285 ;
+C -1 ; WX 444 ; N eth ; B 28 -14 424 714 ;
+C -1 ; WX 444 ; N odieresis ; B 28 -14 416 642 ;
+C -1 ; WX 800 ; N copyright ; B 87 -16 713 610 ;
+C -1 ; WX 222 ; N brokenbar ; B 79 -16 143 714 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 135
+
+KPX A y -37
+KPX A w -37
+KPX A v -37
+KPX A quoteright -50
+KPX A quotedblright -50
+KPX A Y -55
+KPX A W -55
+KPX A V -55
+KPX A T -55
+KPX A Q -50
+KPX A O -50
+KPX A G -50
+KPX A C -50
+
+KPX B period -30
+KPX B comma -30
+
+KPX D period -37
+KPX D comma -37
+KPX D W 18
+KPX D V 18
+KPX D A 18
+
+KPX F r -60
+KPX F period -129
+KPX F o -60
+KPX F i -18
+KPX F e -60
+KPX F comma -111
+KPX F a -60
+KPX F A -55
+
+KPX G period -30
+KPX G comma -18
+
+KPX J period -30
+KPX J comma -18
+KPX J A 20
+
+KPX L y -18
+KPX L quoteright -25
+KPX L quotedblright -25
+KPX L Y -74
+KPX L W -55
+KPX L V -55
+KPX L T -55
+
+KPX N period -18
+KPX N comma -18
+
+KPX O period -30
+KPX O comma -30
+KPX O W 30
+KPX O V 30
+
+KPX P period -129
+KPX P comma -129
+KPX P A -55
+
+KPX Q period -18
+KPX Q comma 125
+
+KPX R Y -18
+KPX R W -37
+KPX R V -18
+KPX R T -37
+
+KPX S period -30
+KPX S comma -30
+
+KPX T y -74
+KPX T w -92
+KPX T u -74
+KPX T semicolon -50
+KPX T r -55
+KPX T period -111
+KPX T o -74
+KPX T i -37
+KPX T hyphen -92
+KPX T e -74
+KPX T comma -92
+KPX T colon -50
+KPX T a -74
+KPX T A -55
+
+KPX V semicolon -18
+KPX V period -111
+KPX V o -18
+KPX V hyphen -37
+KPX V e -18
+KPX V comma -111
+KPX V colon -18
+KPX V a -18
+KPX V G 18
+KPX V A -55
+
+KPX W period -111
+KPX W o -18
+KPX W hyphen -18
+KPX W e -18
+KPX W comma -111
+KPX W a -18
+KPX W A -37
+
+KPX Y u -75
+KPX Y semicolon -55
+KPX Y period -111
+KPX Y o -100
+KPX Y i -37
+KPX Y hyphen -100
+KPX Y e -100
+KPX Y comma -92
+KPX Y colon -55
+KPX Y a -100
+KPX Y A -55
+
+KPX b period -50
+KPX b comma -50
+
+KPX colon space -50
+
+KPX comma space -50
+
+KPX f quoteright 37
+KPX f quotedblright 37
+KPX f period -37
+
+KPX g period -37
+
+KPX period quoteright -18
+KPX period quotedblright -18
+
+KPX quotedblleft A -50
+
+KPX quoteleft quoteleft -68
+KPX quoteleft A -50
+
+KPX quoteright v -30
+KPX quoteright t -30
+KPX quoteright s -75
+KPX quoteright quoteright -68
+KPX quoteright l -25
+KPX quoteright d -50
+
+KPX r quoteright 37
+KPX r period -92
+KPX r hyphen -55
+KPX r comma -74
+
+KPX space quoteleft -50
+KPX space quotedblleft -50
+KPX space Y -50
+KPX space W -50
+KPX space V -50
+KPX space T -50
+KPX space A -50
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -74
+KPX w comma -74
+
+KPX y period -55
+KPX y comma -55
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 213 139 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 213 139 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 213 139 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 213 139 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 202 149 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 213 139 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 179 139 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 179 139 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 179 139 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 179 139 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 57 139 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 57 139 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 57 139 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 57 139 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 230 139 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 234 139 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 234 139 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 234 139 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 234 139 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 234 139 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 123 139 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 245 139 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 245 139 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 245 139 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 245 139 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 213 139 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 213 139 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 190 139 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 95 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 95 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 95 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 95 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 95 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 95 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 108 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 108 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 108 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 108 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 6 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 6 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 6 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 6 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 123 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 129 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 129 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 129 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 129 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 129 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 102 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 117 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 117 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 117 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 117 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 95 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 95 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 62 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/ZC-It b/font/ZC-It
new file mode 100644
index 0000000..7a36d1c
--- /dev/null
+++ b/font/ZC-It
@@ -0,0 +1,452 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Sep  6 11:42:36 1990
+Comment UniqueID 32820
+Comment VMusage 34139 41031
+FontName ZapfChancery-Italic
+FullName ITC Zapf Chancery Italic
+FamilyName ITC Zapf Chancery
+Weight Roman
+ItalicAngle -12
+IsFixedPitch false
+FontBBox -257 -314 1007 831
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.ITC Zapf Chancery is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 708
+XHeight 438
+Ascender 714
+Descender -314
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 28 -14 262 610 ;
+C 34 ; WX 333 ; N quotedbl ; B 95 343 308 610 ;
+C 35 ; WX 500 ; N numbersign ; B 31 0 469 594 ;
+C 36 ; WX 500 ; N dollar ; B -4 -144 444 709 ;
+C 37 ; WX 667 ; N percent ; B 40 -160 618 700 ;
+C 38 ; WX 778 ; N ampersand ; B 29 -16 818 610 ;
+C 39 ; WX 222 ; N quoteright ; B 55 343 225 610 ;
+C 40 ; WX 333 ; N parenleft ; B 66 -216 381 664 ;
+C 41 ; WX 333 ; N parenright ; B -39 -216 276 664 ;
+C 42 ; WX 444 ; N asterisk ; B 69 263 409 610 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 250 ; N comma ; B -46 -140 142 148 ;
+C 45 ; WX 333 ; N hyphen ; B 34 190 299 248 ;
+C 46 ; WX 250 ; N period ; B 26 -14 152 128 ;
+C 47 ; WX 278 ; N slash ; B -53 -16 331 610 ;
+C 48 ; WX 500 ; N zero ; B 19 -16 478 610 ;
+C 49 ; WX 500 ; N one ; B 0 0 387 610 ;
+C 50 ; WX 500 ; N two ; B -36 -16 432 610 ;
+C 51 ; WX 500 ; N three ; B -59 -16 425 610 ;
+C 52 ; WX 500 ; N four ; B 5 -35 427 610 ;
+C 53 ; WX 500 ; N five ; B -8 -16 527 679 ;
+C 54 ; WX 500 ; N six ; B 32 -16 498 610 ;
+C 55 ; WX 500 ; N seven ; B 97 -33 501 645 ;
+C 56 ; WX 500 ; N eight ; B 6 -16 470 610 ;
+C 57 ; WX 500 ; N nine ; B -21 -16 464 610 ;
+C 58 ; WX 250 ; N colon ; B 26 -14 224 438 ;
+C 59 ; WX 250 ; N semicolon ; B -46 -140 224 438 ;
+C 60 ; WX 600 ; N less ; B 47 -9 553 515 ;
+C 61 ; WX 600 ; N equal ; B 47 126 553 380 ;
+C 62 ; WX 600 ; N greater ; B 47 -9 553 515 ;
+C 63 ; WX 333 ; N question ; B 52 -14 357 610 ;
+C 64 ; WX 800 ; N at ; B 87 -16 713 610 ;
+C 65 ; WX 611 ; N A ; B -82 -16 602 632 ;
+C 66 ; WX 667 ; N B ; B 26 -6 615 640 ;
+C 67 ; WX 556 ; N C ; B 21 -16 559 610 ;
+C 68 ; WX 722 ; N D ; B 16 -6 698 640 ;
+C 69 ; WX 667 ; N E ; B 27 -12 645 618 ;
+C 70 ; WX 500 ; N F ; B -73 -118 600 629 ;
+C 71 ; WX 556 ; N G ; B 11 -242 572 610 ;
+C 72 ; WX 722 ; N H ; B -38 -16 822 708 ;
+C 73 ; WX 333 ; N I ; B -37 0 368 594 ;
+C 74 ; WX 389 ; N J ; B -129 -147 423 594 ;
+C 75 ; WX 667 ; N K ; B -27 -153 764 610 ;
+C 76 ; WX 556 ; N L ; B -81 -16 523 610 ;
+C 77 ; WX 833 ; N M ; B -29 -16 933 722 ;
+C 78 ; WX 722 ; N N ; B -6 -168 824 708 ;
+C 79 ; WX 611 ; N O ; B 21 -16 587 610 ;
+C 80 ; WX 611 ; N P ; B -1 0 615 628 ;
+C 81 ; WX 611 ; N Q ; B 21 -177 712 610 ;
+C 82 ; WX 611 ; N R ; B -39 -168 708 640 ;
+C 83 ; WX 444 ; N S ; B -82 -81 431 610 ;
+C 84 ; WX 611 ; N T ; B 20 0 701 667 ;
+C 85 ; WX 722 ; N U ; B 22 -16 688 617 ;
+C 86 ; WX 611 ; N V ; B 11 -16 697 714 ;
+C 87 ; WX 889 ; N W ; B 3 -16 955 723 ;
+C 88 ; WX 556 ; N X ; B -119 -16 610 610 ;
+C 89 ; WX 611 ; N Y ; B -22 -168 711 647 ;
+C 90 ; WX 611 ; N Z ; B -43 -19 584 624 ;
+C 91 ; WX 333 ; N bracketleft ; B 1 -207 419 655 ;
+C 92 ; WX 278 ; N backslash ; B -53 -16 331 610 ;
+C 93 ; WX 333 ; N bracketright ; B -76 -207 342 655 ;
+C 94 ; WX 600 ; N asciicircum ; B 90 229 510 594 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 80 343 250 610 ;
+C 97 ; WX 389 ; N a ; B -6 -15 387 438 ;
+C 98 ; WX 389 ; N b ; B -21 -23 389 714 ;
+C 99 ; WX 333 ; N c ; B -6 -14 313 438 ;
+C 100 ; WX 389 ; N d ; B -6 -14 543 714 ;
+C 101 ; WX 333 ; N e ; B -6 -14 310 438 ;
+C 102 ; WX 278 ; N f ; B -228 -314 438 714 ; L i fi ; L l fl ;
+C 103 ; WX 389 ; N g ; B -192 -314 419 438 ;
+C 104 ; WX 444 ; N h ; B -20 -14 449 714 ;
+C 105 ; WX 278 ; N i ; B 28 -14 278 635 ;
+C 106 ; WX 222 ; N j ; B -228 -314 247 635 ;
+C 107 ; WX 407 ; N k ; B -6 -184 535 714 ;
+C 108 ; WX 222 ; N l ; B 16 -14 394 714 ;
+C 109 ; WX 667 ; N m ; B 14 -14 662 438 ;
+C 110 ; WX 444 ; N n ; B 9 -14 452 438 ;
+C 111 ; WX 389 ; N o ; B -6 -14 356 438 ;
+C 112 ; WX 389 ; N p ; B -140 -314 367 432 ;
+C 113 ; WX 389 ; N q ; B -6 -300 397 510 ;
+C 114 ; WX 278 ; N r ; B 5 -14 328 438 ;
+C 115 ; WX 333 ; N s ; B -40 -14 317 438 ;
+C 116 ; WX 278 ; N t ; B -2 -14 318 539 ;
+C 117 ; WX 444 ; N u ; B 9 -14 435 438 ;
+C 118 ; WX 444 ; N v ; B -1 -14 445 488 ;
+C 119 ; WX 667 ; N w ; B -14 -14 681 488 ;
+C 120 ; WX 389 ; N x ; B -33 -195 486 438 ;
+C 121 ; WX 389 ; N y ; B -117 -314 390 438 ;
+C 122 ; WX 389 ; N z ; B -99 -14 383 445 ;
+C 123 ; WX 333 ; N braceleft ; B 40 -207 368 655 ;
+C 124 ; WX 222 ; N bar ; B 82 -16 140 714 ;
+C 125 ; WX 333 ; N braceright ; B -35 -207 293 655 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 186 531 320 ;
+C 161 ; WX 278 ; N exclamdown ; B -4 -186 230 438 ;
+C 162 ; WX 500 ; N cent ; B 35 -134 389 543 ;
+C 163 ; WX 500 ; N sterling ; B -50 -52 472 610 ;
+C 164 ; WX 167 ; N fraction ; B -167 -16 334 610 ;
+C 165 ; WX 500 ; N yen ; B -21 -168 593 647 ;
+C 166 ; WX 500 ; N florin ; B -131 -314 515 610 ;
+C 167 ; WX 500 ; N section ; B 16 -215 477 610 ;
+C 168 ; WX 500 ; N currency ; B 38 85 462 509 ;
+C 169 ; WX 222 ; N quotesingle ; B 115 343 185 610 ;
+C 170 ; WX 333 ; N quotedblleft ; B 67 343 362 610 ;
+C 171 ; WX 389 ; N guillemotleft ; B 56 24 314 414 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 83 24 243 414 ;
+C 173 ; WX 333 ; N guilsinglright ; B 53 24 213 414 ;
+C 174 ; WX 444 ; N fi ; B -257 -314 472 714 ;
+C 175 ; WX 444 ; N fl ; B -257 -314 537 714 ;
+C 177 ; WX 500 ; N endash ; B -7 199 507 239 ;
+C 178 ; WX 444 ; N dagger ; B 34 -37 464 610 ;
+C 179 ; WX 444 ; N daggerdbl ; B 49 -59 444 610 ;
+C 180 ; WX 250 ; N periodcentered ; B 74 208 176 310 ;
+C 182 ; WX 600 ; N paragraph ; B 85 -199 618 594 ;
+C 183 ; WX 500 ; N bullet ; B 102 149 398 445 ;
+C 184 ; WX 222 ; N quotesinglbase ; B -37 -121 133 146 ;
+C 185 ; WX 333 ; N quotedblbase ; B -24 -121 271 146 ;
+C 186 ; WX 333 ; N quotedblright ; B 54 343 349 610 ;
+C 187 ; WX 389 ; N guillemotright ; B 32 24 290 414 ;
+C 188 ; WX 1000 ; N ellipsis ; B 104 -14 896 128 ;
+C 189 ; WX 944 ; N perthousand ; B 31 -160 924 700 ;
+C 191 ; WX 333 ; N questiondown ; B -44 -186 261 438 ;
+C 193 ; WX 278 ; N grave ; B 133 492 279 659 ;
+C 194 ; WX 278 ; N acute ; B 188 492 345 659 ;
+C 195 ; WX 278 ; N circumflex ; B 111 492 331 659 ;
+C 196 ; WX 278 ; N tilde ; B 102 543 381 619 ;
+C 197 ; WX 278 ; N macron ; B 102 544 345 578 ;
+C 198 ; WX 278 ; N breve ; B 125 522 373 631 ;
+C 199 ; WX 278 ; N dotaccent ; B 176 522 268 610 ;
+C 200 ; WX 278 ; N dieresis ; B 116 522 342 610 ;
+C 202 ; WX 278 ; N ring ; B 200 483 376 659 ;
+C 203 ; WX 278 ; N cedilla ; B -78 -191 94 6 ;
+C 205 ; WX 278 ; N hungarumlaut ; B 88 492 375 659 ;
+C 206 ; WX 278 ; N ogonek ; B -51 -191 144 6 ;
+C 207 ; WX 278 ; N caron ; B 136 492 356 659 ;
+C 208 ; WX 1000 ; N emdash ; B -7 199 1007 239 ;
+C 225 ; WX 778 ; N AE ; B -64 -16 756 594 ;
+C 227 ; WX 253 ; N ordfeminine ; B 22 338 297 610 ;
+C 232 ; WX 556 ; N Lslash ; B -85 -16 523 610 ;
+C 233 ; WX 611 ; N Oslash ; B -30 -78 638 672 ;
+C 234 ; WX 889 ; N OE ; B 21 -16 867 610 ;
+C 235 ; WX 253 ; N ordmasculine ; B 53 339 298 610 ;
+C 241 ; WX 556 ; N ae ; B -13 -14 544 468 ;
+C 245 ; WX 278 ; N dotlessi ; B 28 -14 257 438 ;
+C 248 ; WX 222 ; N lslash ; B 0 -14 394 714 ;
+C 249 ; WX 389 ; N oslash ; B -66 -64 428 488 ;
+C 250 ; WX 556 ; N oe ; B -6 -14 544 438 ;
+C 251 ; WX 444 ; N germandbls ; B -212 -314 457 714 ;
+C -1 ; WX 333 ; N ecircumflex ; B -6 -14 359 659 ;
+C -1 ; WX 333 ; N edieresis ; B -6 -14 370 610 ;
+C -1 ; WX 389 ; N aacute ; B -6 -15 401 659 ;
+C -1 ; WX 800 ; N registered ; B 87 -16 713 610 ;
+C -1 ; WX 278 ; N icircumflex ; B 28 -14 321 659 ;
+C -1 ; WX 444 ; N udieresis ; B 9 -14 435 610 ;
+C -1 ; WX 389 ; N ograve ; B -6 -14 356 659 ;
+C -1 ; WX 444 ; N uacute ; B 9 -14 435 659 ;
+C -1 ; WX 444 ; N ucircumflex ; B 9 -14 435 659 ;
+C -1 ; WX 611 ; N Aacute ; B -82 -16 602 811 ;
+C -1 ; WX 278 ; N igrave ; B 28 -14 259 659 ;
+C -1 ; WX 333 ; N Icircumflex ; B -37 0 368 801 ;
+C -1 ; WX 333 ; N ccedilla ; B -31 -191 313 438 ;
+C -1 ; WX 389 ; N adieresis ; B -6 -15 398 610 ;
+C -1 ; WX 667 ; N Ecircumflex ; B 27 -12 645 801 ;
+C -1 ; WX 333 ; N scaron ; B -40 -14 364 659 ;
+C -1 ; WX 389 ; N thorn ; B -140 -314 403 714 ;
+C -1 ; WX 990 ; N trademark ; B 44 187 963 594 ;
+C -1 ; WX 333 ; N egrave ; B -6 -14 310 659 ;
+C -1 ; WX 325 ; N threesuperior ; B 9 234 330 610 ;
+C -1 ; WX 389 ; N zcaron ; B -99 -14 392 659 ;
+C -1 ; WX 389 ; N atilde ; B -6 -15 437 619 ;
+C -1 ; WX 389 ; N aring ; B -6 -15 387 659 ;
+C -1 ; WX 389 ; N ocircumflex ; B -6 -14 367 659 ;
+C -1 ; WX 667 ; N Edieresis ; B 27 -12 645 752 ;
+C -1 ; WX 750 ; N threequarters ; B 9 -16 716 610 ;
+C -1 ; WX 389 ; N ydieresis ; B -117 -314 390 610 ;
+C -1 ; WX 389 ; N yacute ; B -117 -314 390 659 ;
+C -1 ; WX 278 ; N iacute ; B 28 -14 335 659 ;
+C -1 ; WX 611 ; N Acircumflex ; B -82 -16 602 811 ;
+C -1 ; WX 722 ; N Uacute ; B 22 -16 688 801 ;
+C -1 ; WX 333 ; N eacute ; B -6 -14 373 659 ;
+C -1 ; WX 611 ; N Ograve ; B 21 -16 587 801 ;
+C -1 ; WX 389 ; N agrave ; B -6 -15 387 659 ;
+C -1 ; WX 722 ; N Udieresis ; B 22 -16 688 752 ;
+C -1 ; WX 389 ; N acircumflex ; B -6 -15 387 659 ;
+C -1 ; WX 333 ; N Igrave ; B -37 0 368 801 ;
+C -1 ; WX 325 ; N twosuperior ; B 16 234 330 610 ;
+C -1 ; WX 722 ; N Ugrave ; B 22 -16 688 801 ;
+C -1 ; WX 750 ; N onequarter ; B 30 -16 716 610 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 22 -16 688 801 ;
+C -1 ; WX 444 ; N Scaron ; B -82 -81 439 801 ;
+C -1 ; WX 333 ; N Idieresis ; B -37 0 370 752 ;
+C -1 ; WX 278 ; N idieresis ; B 28 -14 332 610 ;
+C -1 ; WX 667 ; N Egrave ; B 27 -12 645 801 ;
+C -1 ; WX 611 ; N Oacute ; B 21 -16 587 801 ;
+C -1 ; WX 600 ; N divide ; B 47 -14 553 520 ;
+C -1 ; WX 611 ; N Atilde ; B -82 -16 602 771 ;
+C -1 ; WX 611 ; N Aring ; B -82 -16 602 831 ;
+C -1 ; WX 611 ; N Odieresis ; B 21 -16 587 752 ;
+C -1 ; WX 611 ; N Adieresis ; B -82 -16 602 762 ;
+C -1 ; WX 722 ; N Ntilde ; B -6 -168 824 761 ;
+C -1 ; WX 611 ; N Zcaron ; B -43 -19 584 801 ;
+C -1 ; WX 611 ; N Thorn ; B -5 0 590 623 ;
+C -1 ; WX 333 ; N Iacute ; B -37 0 373 801 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 73 26 527 480 ;
+C -1 ; WX 667 ; N Eacute ; B 27 -12 645 801 ;
+C -1 ; WX 611 ; N Ydieresis ; B -22 -168 711 752 ;
+C -1 ; WX 325 ; N onesuperior ; B 30 244 284 610 ;
+C -1 ; WX 444 ; N ugrave ; B 9 -14 435 659 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 126 553 380 ;
+C -1 ; WX 444 ; N ntilde ; B 9 -14 452 619 ;
+C -1 ; WX 611 ; N Otilde ; B 21 -16 587 761 ;
+C -1 ; WX 389 ; N otilde ; B -6 -14 417 619 ;
+C -1 ; WX 556 ; N Ccedilla ; B 21 -191 559 610 ;
+C -1 ; WX 611 ; N Agrave ; B -82 -16 602 811 ;
+C -1 ; WX 750 ; N onehalf ; B 30 -16 716 610 ;
+C -1 ; WX 722 ; N Eth ; B 16 -6 698 640 ;
+C -1 ; WX 400 ; N degree ; B 101 324 387 610 ;
+C -1 ; WX 611 ; N Yacute ; B -22 -168 711 801 ;
+C -1 ; WX 611 ; N Ocircumflex ; B 21 -16 587 801 ;
+C -1 ; WX 389 ; N oacute ; B -6 -14 381 659 ;
+C -1 ; WX 444 ; N mu ; B -81 -314 435 438 ;
+C -1 ; WX 600 ; N minus ; B 47 224 553 282 ;
+C -1 ; WX 389 ; N eth ; B -6 -14 429 714 ;
+C -1 ; WX 389 ; N odieresis ; B -6 -14 378 610 ;
+C -1 ; WX 800 ; N copyright ; B 87 -16 713 610 ;
+C -1 ; WX 222 ; N brokenbar ; B 82 -16 140 714 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 105
+
+KPX A quoteright -55
+KPX A quotedblright -55
+
+KPX B period -75
+KPX B comma -75
+
+KPX D period -75
+KPX D comma -75
+
+KPX F period -111
+KPX F comma -111
+
+KPX G period -75
+KPX G comma -50
+
+KPX J period -75
+KPX J comma -75
+
+KPX L quoteright -60
+KPX L quotedblright -60
+KPX L Y -75
+KPX L W -75
+KPX L V -75
+KPX L T -75
+
+KPX N comma 175
+
+KPX O period -75
+KPX O comma -75
+
+KPX P period -92
+KPX P comma -92
+
+KPX Q comma 190
+
+KPX S period -74
+KPX S comma -74
+
+KPX T y -74
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T r -74
+KPX T period -74
+KPX T o -74
+KPX T i -74
+KPX T hyphen -74
+KPX T e -74
+KPX T comma -74
+KPX T colon -74
+KPX T a -74
+
+KPX U period -40
+KPX U comma -40
+
+KPX V semicolon -18
+KPX V period -111
+KPX V o -18
+KPX V hyphen -37
+KPX V e -18
+KPX V comma -111
+KPX V colon -18
+KPX V a -18
+
+KPX W period -92
+KPX W comma -92
+
+KPX Y u -37
+KPX Y semicolon -74
+KPX Y period -111
+KPX Y o -55
+KPX Y i -55
+KPX Y hyphen -55
+KPX Y e -55
+KPX Y comma -111
+KPX Y colon -74
+KPX Y a -55
+
+KPX b period -75
+KPX b comma -75
+
+KPX c period -40
+KPX c comma -40
+
+KPX colon space -37
+
+KPX comma space -37
+KPX comma quoteright -75
+KPX comma quotedblright -75
+
+KPX d period -40
+KPX d comma -40
+
+KPX e period -40
+KPX e comma -40
+
+KPX f quoteright 18
+KPX f quotedblright 18
+KPX f period -75
+KPX f f -18
+KPX f comma -75
+
+KPX g period -50
+KPX g comma -50
+
+KPX period quoteright -75
+KPX period quotedblright -75
+
+KPX quoteleft quoteleft -97
+
+KPX quoteright s -37
+KPX quoteright quoteright -97
+KPX quoteright d -18
+
+KPX r y 18
+KPX r v 18
+KPX r period -74
+KPX r n 18
+KPX r hyphen -37
+KPX r comma -74
+
+KPX space quoteleft -37
+KPX space quotedblleft -37
+KPX space Y -37
+KPX space W -37
+KPX space V -37
+KPX space T -37
+KPX space A -37
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -18
+KPX y comma -18
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 187 152 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 187 152 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 187 152 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 187 152 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 167 172 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 187 152 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 245 142 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 245 142 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 245 142 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 245 142 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 28 142 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 28 142 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 28 142 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 28 142 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 272 142 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 167 142 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 167 142 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 167 142 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 167 142 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 167 142 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 83 142 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 237 142 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 237 142 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 237 142 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 237 142 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 167 142 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 167 142 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 167 142 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 56 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 56 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 56 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 36 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 6 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 56 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 28 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 28 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 28 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 8 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -10 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -10 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -10 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -20 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 63 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 36 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 36 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 36 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 26 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 36 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 8 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 53 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 63 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 63 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 63 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 36 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 36 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 36 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/ZC-Lt b/font/ZC-Lt
new file mode 100644
index 0000000..0f1f3f7
--- /dev/null
+++ b/font/ZC-Lt
@@ -0,0 +1,481 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Sep  6 11:50:57 1990
+Comment UniqueID 32823
+Comment VMusage 33216 40108
+FontName ZapfChancery-Light
+FullName ITC Zapf Chancery Light
+FamilyName ITC Zapf Chancery
+Weight Light
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -173 -314 1006 808
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.ITC Zapf Chancery is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 594
+XHeight 434
+Ascender 714
+Descender -300
+StartCharMetrics 228
+C 32 ; WX 222 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 73 -14 197 610 ;
+C 34 ; WX 333 ; N quotedbl ; B 71 350 262 610 ;
+C 35 ; WX 444 ; N numbersign ; B 1 0 443 594 ;
+C 36 ; WX 444 ; N dollar ; B 17 -146 375 714 ;
+C 37 ; WX 667 ; N percent ; B 59 -137 608 696 ;
+C 38 ; WX 778 ; N ampersand ; B 31 -16 747 554 ;
+C 39 ; WX 222 ; N quoteright ; B 62 350 184 610 ;
+C 40 ; WX 333 ; N parenleft ; B 90 -213 304 669 ;
+C 41 ; WX 333 ; N parenright ; B 29 -213 243 669 ;
+C 42 ; WX 444 ; N asterisk ; B 66 260 389 610 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 222 ; N comma ; B -12 -146 146 152 ;
+C 45 ; WX 333 ; N hyphen ; B 40 197 293 241 ;
+C 46 ; WX 222 ; N period ; B 56 -14 166 108 ;
+C 47 ; WX 278 ; N slash ; B -48 -16 326 610 ;
+C 48 ; WX 444 ; N zero ; B 38 -16 406 610 ;
+C 49 ; WX 444 ; N one ; B 21 -3 423 610 ;
+C 50 ; WX 444 ; N two ; B -37 -16 451 610 ;
+C 51 ; WX 444 ; N three ; B -15 -16 375 610 ;
+C 52 ; WX 444 ; N four ; B -11 -26 466 610 ;
+C 53 ; WX 444 ; N five ; B 1 -16 436 670 ;
+C 54 ; WX 444 ; N six ; B 33 -16 433 610 ;
+C 55 ; WX 444 ; N seven ; B 50 -16 439 663 ;
+C 56 ; WX 444 ; N eight ; B 16 -16 396 610 ;
+C 57 ; WX 444 ; N nine ; B 1 -16 402 610 ;
+C 58 ; WX 222 ; N colon ; B 56 -14 178 434 ;
+C 59 ; WX 222 ; N semicolon ; B -12 -146 178 434 ;
+C 60 ; WX 600 ; N less ; B 47 -8 553 514 ;
+C 61 ; WX 600 ; N equal ; B 47 134 553 372 ;
+C 62 ; WX 600 ; N greater ; B 47 -8 553 514 ;
+C 63 ; WX 333 ; N question ; B 75 -14 321 610 ;
+C 64 ; WX 800 ; N at ; B 87 -16 713 610 ;
+C 65 ; WX 611 ; N A ; B -75 -8 632 610 ;
+C 66 ; WX 556 ; N B ; B -3 -3 497 597 ;
+C 67 ; WX 556 ; N C ; B 40 -16 532 610 ;
+C 68 ; WX 667 ; N D ; B -16 -3 627 597 ;
+C 69 ; WX 556 ; N E ; B -1 0 555 597 ;
+C 70 ; WX 444 ; N F ; B -1 0 454 597 ;
+C 71 ; WX 611 ; N G ; B 40 -28 598 610 ;
+C 72 ; WX 667 ; N H ; B -1 0 668 594 ;
+C 73 ; WX 278 ; N I ; B -16 0 294 594 ;
+C 74 ; WX 278 ; N J ; B -147 -218 294 594 ;
+C 75 ; WX 611 ; N K ; B -16 -8 608 610 ;
+C 76 ; WX 500 ; N L ; B -1 -3 501 594 ;
+C 77 ; WX 778 ; N M ; B -16 -8 801 597 ;
+C 78 ; WX 667 ; N N ; B 11 -16 681 594 ;
+C 79 ; WX 667 ; N O ; B 40 -16 627 610 ;
+C 80 ; WX 500 ; N P ; B -16 0 493 597 ;
+C 81 ; WX 667 ; N Q ; B 40 -152 707 610 ;
+C 82 ; WX 556 ; N R ; B -1 -8 591 597 ;
+C 83 ; WX 444 ; N S ; B -8 -16 391 610 ;
+C 84 ; WX 556 ; N T ; B 19 0 548 610 ;
+C 85 ; WX 667 ; N U ; B 12 -16 666 594 ;
+C 86 ; WX 500 ; N V ; B -20 -16 499 625 ;
+C 87 ; WX 833 ; N W ; B -27 -16 832 625 ;
+C 88 ; WX 556 ; N X ; B -63 -16 555 610 ;
+C 89 ; WX 556 ; N Y ; B -42 0 598 610 ;
+C 90 ; WX 611 ; N Z ; B 9 -42 634 604 ;
+C 91 ; WX 333 ; N bracketleft ; B 84 -200 347 656 ;
+C 92 ; WX 278 ; N backslash ; B -48 -16 326 610 ;
+C 93 ; WX 333 ; N bracketright ; B -14 -200 249 656 ;
+C 94 ; WX 600 ; N asciicircum ; B 93 227 507 594 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 78 350 200 610 ;
+C 97 ; WX 389 ; N a ; B 26 -14 420 434 ;
+C 98 ; WX 389 ; N b ; B 29 -14 351 714 ;
+C 99 ; WX 333 ; N c ; B 26 -14 351 434 ;
+C 100 ; WX 389 ; N d ; B 26 -14 478 714 ;
+C 101 ; WX 333 ; N e ; B 26 -14 365 434 ;
+C 102 ; WX 222 ; N f ; B -156 -314 352 714 ; L i fi ; L l fl ;
+C 103 ; WX 389 ; N g ; B -55 -314 360 434 ;
+C 104 ; WX 444 ; N h ; B 44 -14 476 714 ;
+C 105 ; WX 222 ; N i ; B -13 -14 264 620 ;
+C 106 ; WX 222 ; N j ; B -139 -314 169 620 ;
+C 107 ; WX 389 ; N k ; B 33 -14 421 714 ;
+C 108 ; WX 222 ; N l ; B 44 -14 297 714 ;
+C 109 ; WX 667 ; N m ; B 4 -14 694 434 ;
+C 110 ; WX 444 ; N n ; B -2 -14 476 434 ;
+C 111 ; WX 389 ; N o ; B 26 -14 351 434 ;
+C 112 ; WX 389 ; N p ; B -47 -300 351 434 ;
+C 113 ; WX 389 ; N q ; B 26 -300 374 482 ;
+C 114 ; WX 278 ; N r ; B -2 -14 296 434 ;
+C 115 ; WX 333 ; N s ; B 3 -14 285 434 ;
+C 116 ; WX 278 ; N t ; B -19 -14 297 539 ;
+C 117 ; WX 444 ; N u ; B -2 -14 476 434 ;
+C 118 ; WX 389 ; N v ; B -30 -14 366 446 ;
+C 119 ; WX 667 ; N w ; B -12 -14 644 446 ;
+C 120 ; WX 444 ; N x ; B -6 -94 457 434 ;
+C 121 ; WX 389 ; N y ; B -125 -314 382 446 ;
+C 122 ; WX 333 ; N z ; B -53 -14 360 434 ;
+C 123 ; WX 333 ; N braceleft ; B 76 -200 310 656 ;
+C 124 ; WX 222 ; N bar ; B 89 -16 133 714 ;
+C 125 ; WX 333 ; N braceright ; B 23 -200 257 656 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 189 531 317 ;
+C 161 ; WX 278 ; N exclamdown ; B 77 -180 201 444 ;
+C 162 ; WX 444 ; N cent ; B 65 -136 362 536 ;
+C 163 ; WX 444 ; N sterling ; B -15 -46 436 610 ;
+C 164 ; WX 167 ; N fraction ; B -166 -16 333 610 ;
+C 165 ; WX 444 ; N yen ; B -34 0 478 610 ;
+C 166 ; WX 444 ; N florin ; B -173 -314 466 610 ;
+C 167 ; WX 500 ; N section ; B 76 -216 415 610 ;
+C 168 ; WX 444 ; N currency ; B 18 92 426 500 ;
+C 169 ; WX 222 ; N quotesingle ; B 98 350 160 610 ;
+C 170 ; WX 333 ; N quotedblleft ; B 74 350 320 610 ;
+C 171 ; WX 444 ; N guillemotleft ; B 82 25 340 413 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 82 25 236 413 ;
+C 173 ; WX 333 ; N guilsinglright ; B 97 25 251 413 ;
+C 174 ; WX 444 ; N fi ; B -156 -314 470 714 ;
+C 175 ; WX 444 ; N fl ; B -156 -314 485 714 ;
+C 177 ; WX 500 ; N endash ; B -6 200 506 238 ;
+C 178 ; WX 444 ; N dagger ; B 16 -40 428 610 ;
+C 179 ; WX 444 ; N daggerdbl ; B 52 -40 381 610 ;
+C 180 ; WX 222 ; N periodcentered ; B 68 226 154 312 ;
+C 182 ; WX 600 ; N paragraph ; B 122 -200 514 594 ;
+C 183 ; WX 500 ; N bullet ; B 102 149 398 445 ;
+C 184 ; WX 222 ; N quotesinglbase ; B 25 -108 147 152 ;
+C 185 ; WX 333 ; N quotedblbase ; B 25 -108 274 152 ;
+C 186 ; WX 333 ; N quotedblright ; B 53 350 299 610 ;
+C 187 ; WX 444 ; N guillemotright ; B 104 25 362 413 ;
+C 188 ; WX 1000 ; N ellipsis ; B 112 -14 888 108 ;
+C 189 ; WX 944 ; N perthousand ; B 42 -137 902 696 ;
+C 191 ; WX 333 ; N questiondown ; B 12 -180 258 444 ;
+C 193 ; WX 222 ; N grave ; B 50 480 194 654 ;
+C 194 ; WX 222 ; N acute ; B 101 480 245 654 ;
+C 195 ; WX 222 ; N circumflex ; B 32 480 234 654 ;
+C 196 ; WX 222 ; N tilde ; B 19 534 291 620 ;
+C 197 ; WX 222 ; N macron ; B 36 538 254 564 ;
+C 198 ; WX 222 ; N breve ; B 47 523 286 623 ;
+C 199 ; WX 222 ; N dotaccent ; B 104 512 190 610 ;
+C 200 ; WX 222 ; N dieresis ; B 42 512 255 610 ;
+C 202 ; WX 222 ; N ring ; B 56 480 224 648 ;
+C 203 ; WX 222 ; N cedilla ; B -16 -190 137 6 ;
+C 205 ; WX 222 ; N hungarumlaut ; B 17 480 292 654 ;
+C 206 ; WX 222 ; N ogonek ; B -7 -190 169 0 ;
+C 207 ; WX 222 ; N caron ; B 65 480 267 656 ;
+C 208 ; WX 1000 ; N emdash ; B -6 200 1006 238 ;
+C 225 ; WX 778 ; N AE ; B -23 -16 774 597 ;
+C 227 ; WX 253 ; N ordfeminine ; B 33 342 292 610 ;
+C 232 ; WX 500 ; N Lslash ; B -1 -3 501 594 ;
+C 233 ; WX 667 ; N Oslash ; B 22 -85 627 678 ;
+C 234 ; WX 889 ; N OE ; B 40 -16 885 610 ;
+C 235 ; WX 253 ; N ordmasculine ; B 30 342 251 610 ;
+C 241 ; WX 556 ; N ae ; B 26 -14 579 468 ;
+C 245 ; WX 222 ; N dotlessi ; B -13 -14 264 434 ;
+C 248 ; WX 222 ; N lslash ; B -4 -14 297 714 ;
+C 249 ; WX 389 ; N oslash ; B -15 -70 378 491 ;
+C 250 ; WX 556 ; N oe ; B 26 -14 579 434 ;
+C 251 ; WX 444 ; N germandbls ; B -139 -314 403 714 ;
+C -1 ; WX 333 ; N ecircumflex ; B 26 -14 365 654 ;
+C -1 ; WX 333 ; N edieresis ; B 26 -14 365 610 ;
+C -1 ; WX 389 ; N aacute ; B 26 -14 420 654 ;
+C -1 ; WX 800 ; N registered ; B 87 -16 713 610 ;
+C -1 ; WX 222 ; N icircumflex ; B -13 -14 264 654 ;
+C -1 ; WX 444 ; N udieresis ; B -2 -14 476 610 ;
+C -1 ; WX 389 ; N ograve ; B 26 -14 351 654 ;
+C -1 ; WX 444 ; N uacute ; B -2 -14 476 654 ;
+C -1 ; WX 444 ; N ucircumflex ; B -2 -14 476 654 ;
+C -1 ; WX 611 ; N Aacute ; B -75 -8 632 806 ;
+C -1 ; WX 222 ; N igrave ; B -13 -14 264 654 ;
+C -1 ; WX 278 ; N Icircumflex ; B -16 0 294 806 ;
+C -1 ; WX 333 ; N ccedilla ; B 26 -190 351 434 ;
+C -1 ; WX 389 ; N adieresis ; B 26 -14 420 610 ;
+C -1 ; WX 556 ; N Ecircumflex ; B -1 0 555 806 ;
+C -1 ; WX 333 ; N scaron ; B 3 -14 323 656 ;
+C -1 ; WX 389 ; N thorn ; B -73 -300 351 714 ;
+C -1 ; WX 990 ; N trademark ; B 44 187 954 594 ;
+C -1 ; WX 333 ; N egrave ; B 26 -14 365 654 ;
+C -1 ; WX 289 ; N threesuperior ; B 4 234 265 610 ;
+C -1 ; WX 333 ; N zcaron ; B -53 -14 360 656 ;
+C -1 ; WX 389 ; N atilde ; B 26 -14 420 620 ;
+C -1 ; WX 389 ; N aring ; B 26 -14 420 648 ;
+C -1 ; WX 389 ; N ocircumflex ; B 26 -14 351 654 ;
+C -1 ; WX 556 ; N Edieresis ; B -1 0 555 762 ;
+C -1 ; WX 666 ; N threequarters ; B 4 -16 675 610 ;
+C -1 ; WX 389 ; N ydieresis ; B -125 -314 382 610 ;
+C -1 ; WX 389 ; N yacute ; B -125 -314 382 654 ;
+C -1 ; WX 222 ; N iacute ; B -13 -14 264 654 ;
+C -1 ; WX 611 ; N Acircumflex ; B -75 -8 632 806 ;
+C -1 ; WX 667 ; N Uacute ; B 12 -16 666 806 ;
+C -1 ; WX 333 ; N eacute ; B 26 -14 365 654 ;
+C -1 ; WX 667 ; N Ograve ; B 40 -16 627 806 ;
+C -1 ; WX 389 ; N agrave ; B 26 -14 420 654 ;
+C -1 ; WX 667 ; N Udieresis ; B 12 -16 666 762 ;
+C -1 ; WX 389 ; N acircumflex ; B 26 -14 420 654 ;
+C -1 ; WX 278 ; N Igrave ; B -16 0 294 806 ;
+C -1 ; WX 289 ; N twosuperior ; B -24 234 299 610 ;
+C -1 ; WX 667 ; N Ugrave ; B 12 -16 666 806 ;
+C -1 ; WX 666 ; N onequarter ; B 4 -16 675 610 ;
+C -1 ; WX 667 ; N Ucircumflex ; B 12 -16 666 806 ;
+C -1 ; WX 444 ; N Scaron ; B -8 -16 396 808 ;
+C -1 ; WX 278 ; N Idieresis ; B -16 0 294 762 ;
+C -1 ; WX 222 ; N idieresis ; B -13 -14 264 610 ;
+C -1 ; WX 556 ; N Egrave ; B -1 0 555 806 ;
+C -1 ; WX 667 ; N Oacute ; B 40 -16 627 806 ;
+C -1 ; WX 600 ; N divide ; B 47 -10 553 516 ;
+C -1 ; WX 611 ; N Atilde ; B -75 -8 632 772 ;
+C -1 ; WX 611 ; N Aring ; B -75 -8 632 800 ;
+C -1 ; WX 667 ; N Odieresis ; B 40 -16 627 762 ;
+C -1 ; WX 611 ; N Adieresis ; B -75 -8 632 762 ;
+C -1 ; WX 667 ; N Ntilde ; B 11 -16 681 772 ;
+C -1 ; WX 611 ; N Zcaron ; B 9 -42 634 808 ;
+C -1 ; WX 500 ; N Thorn ; B -16 0 490 594 ;
+C -1 ; WX 278 ; N Iacute ; B -16 0 294 806 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 77 27 523 479 ;
+C -1 ; WX 556 ; N Eacute ; B -1 0 555 806 ;
+C -1 ; WX 556 ; N Ydieresis ; B -42 0 598 762 ;
+C -1 ; WX 289 ; N onesuperior ; B 11 244 278 610 ;
+C -1 ; WX 444 ; N ugrave ; B -2 -14 476 654 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 108 553 372 ;
+C -1 ; WX 444 ; N ntilde ; B -2 -14 476 620 ;
+C -1 ; WX 667 ; N Otilde ; B 40 -16 627 772 ;
+C -1 ; WX 389 ; N otilde ; B 26 -14 375 620 ;
+C -1 ; WX 556 ; N Ccedilla ; B 40 -190 532 610 ;
+C -1 ; WX 611 ; N Agrave ; B -75 -8 632 806 ;
+C -1 ; WX 666 ; N onehalf ; B 4 -16 675 610 ;
+C -1 ; WX 667 ; N Eth ; B -16 -3 627 597 ;
+C -1 ; WX 400 ; N degree ; B 57 324 343 610 ;
+C -1 ; WX 556 ; N Yacute ; B -42 0 598 806 ;
+C -1 ; WX 667 ; N Ocircumflex ; B 40 -16 627 806 ;
+C -1 ; WX 389 ; N oacute ; B 26 -14 351 654 ;
+C -1 ; WX 444 ; N mu ; B -2 -314 476 434 ;
+C -1 ; WX 600 ; N minus ; B 47 231 553 275 ;
+C -1 ; WX 389 ; N eth ; B 26 -14 371 714 ;
+C -1 ; WX 389 ; N odieresis ; B 26 -14 351 610 ;
+C -1 ; WX 800 ; N copyright ; B 87 -16 713 610 ;
+C -1 ; WX 222 ; N brokenbar ; B 89 -16 133 714 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 134
+
+KPX A y -37
+KPX A w -37
+KPX A v -37
+KPX A quoteright -90
+KPX A quotedblright -90
+KPX A Y -55
+KPX A W -55
+KPX A V -55
+KPX A T -55
+KPX A Q -28
+KPX A O -28
+KPX A G -28
+KPX A C -28
+
+KPX B period -37
+KPX B comma -37
+
+KPX D period -37
+KPX D comma -37
+KPX D W 10
+
+KPX F r -50
+KPX F period -111
+KPX F o -50
+KPX F i -18
+KPX F e -50
+KPX F comma -111
+KPX F a -50
+KPX F A -37
+
+KPX G period -18
+KPX G comma -18
+
+KPX J period -40
+KPX J comma -40
+
+KPX K y -37
+KPX K u -37
+KPX K o -37
+KPX K e -37
+KPX K O -28
+
+KPX L y -18
+KPX L quoteright -90
+KPX L quotedblright -90
+KPX L Y -55
+KPX L W -37
+KPX L V -37
+KPX L T -74
+
+KPX N period -30
+KPX N comma -30
+
+KPX O period -37
+KPX O comma -37
+KPX O W 10
+KPX O V 10
+
+KPX P period -129
+KPX P comma -129
+KPX P A -18
+
+KPX Q comma 20
+
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX S period -37
+KPX S comma -37
+
+KPX T y -55
+KPX T w -74
+KPX T u -55
+KPX T semicolon -74
+KPX T r -55
+KPX T period -92
+KPX T o -55
+KPX T i -18
+KPX T hyphen -74
+KPX T e -55
+KPX T comma -92
+KPX T colon -74
+KPX T a -55
+KPX T O -20
+KPX T A -37
+
+KPX V period -111
+KPX V hyphen -18
+KPX V comma -111
+KPX V O 10
+KPX V G 10
+KPX V A -37
+
+KPX W y 10
+KPX W period -111
+KPX W comma -111
+KPX W O 10
+KPX W A -37
+
+KPX Y u -55
+KPX Y semicolon -74
+KPX Y period -111
+KPX Y o -74
+KPX Y i -25
+KPX Y hyphen -74
+KPX Y e -74
+KPX Y comma -111
+KPX Y colon -74
+KPX Y a -74
+KPX Y O -25
+KPX Y A -55
+
+KPX b period -50
+KPX b comma -50
+
+KPX colon space -37
+
+KPX comma space -37
+KPX comma quoteright -25
+KPX comma quotedblright -25
+
+KPX f quoteright 18
+KPX f period -40
+KPX f comma -20
+
+KPX g period -40
+KPX g comma -20
+
+KPX period quoteright -37
+KPX period quotedblright -37
+
+KPX quotedblleft quoteleft -20
+KPX quotedblleft A -50
+
+KPX quotedblright space -37
+
+KPX quoteleft quoteleft -98
+KPX quoteleft A -50
+
+KPX quoteright s -55
+KPX quoteright r -18
+KPX quoteright quoteright -98
+KPX quoteright quotedblright -20
+KPX quoteright d -50
+
+KPX r period -74
+KPX r hyphen -37
+KPX r comma -74
+
+KPX space quoteleft -37
+KPX space quotedblleft -37
+KPX space Y -37
+KPX space W -37
+KPX space V -37
+KPX space T -37
+KPX space A -37
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -74
+KPX w comma -74
+
+KPX y period -74
+KPX y comma -74
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 189 152 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 189 152 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 189 152 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 189 152 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 189 152 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 189 152 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 161 152 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 152 152 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 152 152 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 161 152 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 46 152 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 46 152 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 38 152 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 46 152 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 211 152 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 247 152 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 247 152 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 238 152 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 247 152 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 238 152 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 129 152 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 205 152 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 205 152 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 205 152 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 205 152 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 167 152 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 167 152 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 165 152 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 72 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 72 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 72 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 72 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 72 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 72 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 80 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 80 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 80 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 80 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -18 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -18 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -18 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -18 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 91 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 84 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 84 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 84 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 84 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 84 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 56 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 99 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 99 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 81 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 91 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 78 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 78 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 36 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/ZC-LtIt b/font/ZC-LtIt
new file mode 100644
index 0000000..eec80c0
--- /dev/null
+++ b/font/ZC-LtIt
@@ -0,0 +1,433 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Sep  6 12:09:39 1990
+Comment UniqueID 32829
+Comment VMusage 31663 38555
+FontName ZapfChancery-LightItalic
+FullName ITC Zapf Chancery Light Italic
+FamilyName ITC Zapf Chancery
+Weight Light
+ItalicAngle -12
+IsFixedPitch false
+FontBBox -260 -314 991 814
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.ITC Zapf Chancery is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 714
+XHeight 434
+Ascender 714
+Descender -300
+StartCharMetrics 228
+C 32 ; WX 222 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 30 -14 259 610 ;
+C 34 ; WX 333 ; N quotedbl ; B 111 350 302 610 ;
+C 35 ; WX 444 ; N numbersign ; B 9 0 443 594 ;
+C 36 ; WX 444 ; N dollar ; B -18 -152 403 706 ;
+C 37 ; WX 667 ; N percent ; B 59 -137 609 696 ;
+C 38 ; WX 778 ; N ampersand ; B 31 -16 822 610 ;
+C 39 ; WX 222 ; N quoteright ; B 61 350 207 610 ;
+C 40 ; WX 333 ; N parenleft ; B 75 -213 376 669 ;
+C 41 ; WX 333 ; N parenright ; B -43 -213 258 669 ;
+C 42 ; WX 444 ; N asterisk ; B 66 260 389 610 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 222 ; N comma ; B -54 -122 121 142 ;
+C 45 ; WX 333 ; N hyphen ; B 21 197 280 241 ;
+C 46 ; WX 222 ; N period ; B 18 -14 122 102 ;
+C 47 ; WX 278 ; N slash ; B -48 -16 326 610 ;
+C 48 ; WX 444 ; N zero ; B 21 -18 423 610 ;
+C 49 ; WX 444 ; N one ; B -28 0 366 610 ;
+C 50 ; WX 444 ; N two ; B -41 -16 412 610 ;
+C 51 ; WX 444 ; N three ; B -72 -16 378 610 ;
+C 52 ; WX 444 ; N four ; B -6 -29 407 619 ;
+C 53 ; WX 444 ; N five ; B -28 -16 490 672 ;
+C 54 ; WX 444 ; N six ; B 24 -16 466 610 ;
+C 55 ; WX 444 ; N seven ; B 50 -26 486 663 ;
+C 56 ; WX 444 ; N eight ; B -2 -16 432 610 ;
+C 57 ; WX 444 ; N nine ; B -22 -16 406 610 ;
+C 58 ; WX 222 ; N colon ; B 18 -14 197 434 ;
+C 59 ; WX 222 ; N semicolon ; B -54 -122 197 434 ;
+C 60 ; WX 600 ; N less ; B 47 -8 553 514 ;
+C 61 ; WX 600 ; N equal ; B 47 134 553 372 ;
+C 62 ; WX 600 ; N greater ; B 47 -8 553 514 ;
+C 63 ; WX 333 ; N question ; B 50 -14 351 610 ;
+C 64 ; WX 800 ; N at ; B 87 -16 713 610 ;
+C 65 ; WX 611 ; N A ; B -86 -16 587 627 ;
+C 66 ; WX 611 ; N B ; B 10 -8 562 630 ;
+C 67 ; WX 556 ; N C ; B 34 -16 566 610 ;
+C 68 ; WX 722 ; N D ; B 10 0 686 630 ;
+C 69 ; WX 667 ; N E ; B 10 -8 628 630 ;
+C 70 ; WX 500 ; N F ; B -86 -127 603 619 ;
+C 71 ; WX 556 ; N G ; B 10 -236 560 610 ;
+C 72 ; WX 722 ; N H ; B -42 -16 825 714 ;
+C 73 ; WX 333 ; N I ; B -27 0 360 594 ;
+C 74 ; WX 389 ; N J ; B -159 -141 391 594 ;
+C 75 ; WX 667 ; N K ; B -21 -158 767 610 ;
+C 76 ; WX 556 ; N L ; B -71 -16 514 610 ;
+C 77 ; WX 833 ; N M ; B -42 -16 938 706 ;
+C 78 ; WX 722 ; N N ; B -9 -158 825 714 ;
+C 79 ; WX 611 ; N O ; B 20 -16 583 610 ;
+C 80 ; WX 611 ; N P ; B -2 0 608 618 ;
+C 81 ; WX 611 ; N Q ; B 20 -175 709 610 ;
+C 82 ; WX 611 ; N R ; B -30 -158 709 624 ;
+C 83 ; WX 444 ; N S ; B -88 -80 432 610 ;
+C 84 ; WX 611 ; N T ; B 20 0 704 676 ;
+C 85 ; WX 722 ; N U ; B 20 -16 681 610 ;
+C 86 ; WX 611 ; N V ; B 20 -16 699 725 ;
+C 87 ; WX 889 ; N W ; B 0 -16 956 714 ;
+C 88 ; WX 556 ; N X ; B -125 -16 595 610 ;
+C 89 ; WX 611 ; N Y ; B -30 -170 713 642 ;
+C 90 ; WX 611 ; N Z ; B -48 -16 575 627 ;
+C 91 ; WX 333 ; N bracketleft ; B 2 -200 412 656 ;
+C 92 ; WX 278 ; N backslash ; B -48 -16 326 610 ;
+C 93 ; WX 333 ; N bracketright ; B -79 -200 331 656 ;
+C 94 ; WX 600 ; N asciicircum ; B 93 227 507 594 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 92 350 238 610 ;
+C 97 ; WX 389 ; N a ; B -5 -14 410 434 ;
+C 98 ; WX 389 ; N b ; B -16 -14 396 714 ;
+C 99 ; WX 333 ; N c ; B -5 -14 322 434 ;
+C 100 ; WX 389 ; N d ; B -5 -14 548 714 ;
+C 101 ; WX 333 ; N e ; B -5 -14 316 434 ;
+C 102 ; WX 278 ; N f ; B -196 -314 436 714 ; L i fi ; L l fl ;
+C 103 ; WX 389 ; N g ; B -188 -314 413 434 ;
+C 104 ; WX 444 ; N h ; B -16 -14 461 714 ;
+C 105 ; WX 278 ; N i ; B 28 -14 270 634 ;
+C 106 ; WX 222 ; N j ; B -240 -314 237 634 ;
+C 107 ; WX 407 ; N k ; B 0 -176 542 714 ;
+C 108 ; WX 222 ; N l ; B 15 -14 388 714 ;
+C 109 ; WX 667 ; N m ; B 9 -14 684 434 ;
+C 110 ; WX 444 ; N n ; B 9 -14 461 434 ;
+C 111 ; WX 389 ; N o ; B 0 -14 352 434 ;
+C 112 ; WX 389 ; N p ; B -126 -300 365 434 ;
+C 113 ; WX 389 ; N q ; B 0 -300 389 507 ;
+C 114 ; WX 278 ; N r ; B 0 -8 331 434 ;
+C 115 ; WX 333 ; N s ; B -33 -14 307 434 ;
+C 116 ; WX 278 ; N t ; B -22 -14 302 535 ;
+C 117 ; WX 444 ; N u ; B 12 -14 456 434 ;
+C 118 ; WX 444 ; N v ; B -12 -14 446 500 ;
+C 119 ; WX 667 ; N w ; B -12 -14 669 491 ;
+C 120 ; WX 389 ; N x ; B -29 -192 491 434 ;
+C 121 ; WX 389 ; N y ; B -137 -314 383 434 ;
+C 122 ; WX 389 ; N z ; B -80 -14 390 443 ;
+C 123 ; WX 333 ; N braceleft ; B 61 -200 387 656 ;
+C 124 ; WX 222 ; N bar ; B 89 -16 133 714 ;
+C 125 ; WX 333 ; N braceright ; B -54 -200 272 656 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 189 531 317 ;
+C 161 ; WX 278 ; N exclamdown ; B -6 -180 223 444 ;
+C 162 ; WX 444 ; N cent ; B 45 -146 376 548 ;
+C 163 ; WX 444 ; N sterling ; B -64 -51 424 610 ;
+C 164 ; WX 167 ; N fraction ; B -165 -16 332 610 ;
+C 165 ; WX 444 ; N yen ; B -35 -170 519 642 ;
+C 166 ; WX 444 ; N florin ; B -169 -314 465 610 ;
+C 167 ; WX 500 ; N section ; B 44 -216 424 610 ;
+C 168 ; WX 444 ; N currency ; B 18 92 426 500 ;
+C 169 ; WX 222 ; N quotesingle ; B 118 350 180 610 ;
+C 170 ; WX 333 ; N quotedblleft ; B 89 350 349 610 ;
+C 171 ; WX 389 ; N guillemotleft ; B 67 25 322 413 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 82 25 240 413 ;
+C 173 ; WX 333 ; N guilsinglright ; B 93 25 251 413 ;
+C 174 ; WX 444 ; N fi ; B -260 -314 475 714 ;
+C 175 ; WX 444 ; N fl ; B -260 -314 544 714 ;
+C 177 ; WX 500 ; N endash ; B -27 200 491 238 ;
+C 178 ; WX 444 ; N dagger ; B 12 -40 427 610 ;
+C 179 ; WX 444 ; N daggerdbl ; B 43 -40 405 610 ;
+C 180 ; WX 222 ; N periodcentered ; B 68 228 154 314 ;
+C 182 ; WX 600 ; N paragraph ; B 70 -200 550 594 ;
+C 183 ; WX 500 ; N bullet ; B 102 149 398 445 ;
+C 184 ; WX 222 ; N quotesinglbase ; B -39 -118 107 142 ;
+C 185 ; WX 333 ; N quotedblbase ; B -39 -118 221 142 ;
+C 186 ; WX 333 ; N quotedblright ; B 61 350 321 610 ;
+C 187 ; WX 389 ; N guillemotright ; B 67 25 322 413 ;
+C 188 ; WX 1000 ; N ellipsis ; B 115 -14 885 102 ;
+C 189 ; WX 944 ; N perthousand ; B 42 -137 905 696 ;
+C 191 ; WX 333 ; N questiondown ; B -30 -180 271 444 ;
+C 193 ; WX 278 ; N grave ; B 109 480 243 654 ;
+C 194 ; WX 278 ; N acute ; B 156 480 302 654 ;
+C 195 ; WX 278 ; N circumflex ; B 90 480 294 654 ;
+C 196 ; WX 278 ; N tilde ; B 66 538 348 624 ;
+C 197 ; WX 278 ; N macron ; B 88 538 308 564 ;
+C 198 ; WX 278 ; N breve ; B 98 523 339 623 ;
+C 199 ; WX 278 ; N dotaccent ; B 132 523 218 619 ;
+C 200 ; WX 278 ; N dieresis ; B 97 523 305 619 ;
+C 202 ; WX 278 ; N ring ; B 105 480 273 648 ;
+C 203 ; WX 278 ; N cedilla ; B -49 -190 108 6 ;
+C 205 ; WX 278 ; N hungarumlaut ; B 95 480 363 654 ;
+C 206 ; WX 278 ; N ogonek ; B 48 -195 202 0 ;
+C 207 ; WX 278 ; N caron ; B 90 480 294 654 ;
+C 208 ; WX 1000 ; N emdash ; B -27 200 991 238 ;
+C 225 ; WX 778 ; N AE ; B -81 -16 742 594 ;
+C 227 ; WX 253 ; N ordfeminine ; B 48 342 326 610 ;
+C 232 ; WX 556 ; N Lslash ; B -71 -16 514 610 ;
+C 233 ; WX 611 ; N Oslash ; B -41 -78 625 672 ;
+C 234 ; WX 889 ; N OE ; B 30 -16 853 610 ;
+C 235 ; WX 253 ; N ordmasculine ; B 48 342 283 610 ;
+C 241 ; WX 556 ; N ae ; B -5 -14 539 468 ;
+C 245 ; WX 278 ; N dotlessi ; B 28 -14 257 434 ;
+C 248 ; WX 222 ; N lslash ; B 0 -14 388 714 ;
+C 249 ; WX 389 ; N oslash ; B -64 -61 418 481 ;
+C 250 ; WX 556 ; N oe ; B -5 -14 539 434 ;
+C 251 ; WX 444 ; N germandbls ; B -196 -314 444 714 ;
+C -1 ; WX 333 ; N ecircumflex ; B -5 -14 345 654 ;
+C -1 ; WX 333 ; N edieresis ; B -5 -14 356 619 ;
+C -1 ; WX 389 ; N aacute ; B -5 -14 410 654 ;
+C -1 ; WX 800 ; N registered ; B 87 -16 713 610 ;
+C -1 ; WX 278 ; N icircumflex ; B 28 -14 308 654 ;
+C -1 ; WX 444 ; N udieresis ; B 12 -14 456 619 ;
+C -1 ; WX 389 ; N ograve ; B 0 -14 352 654 ;
+C -1 ; WX 444 ; N uacute ; B 12 -14 456 654 ;
+C -1 ; WX 444 ; N ucircumflex ; B 12 -14 456 654 ;
+C -1 ; WX 611 ; N Aacute ; B -86 -16 587 806 ;
+C -1 ; WX 278 ; N igrave ; B 28 -14 257 654 ;
+C -1 ; WX 333 ; N Icircumflex ; B -27 0 368 806 ;
+C -1 ; WX 333 ; N ccedilla ; B -5 -190 322 434 ;
+C -1 ; WX 389 ; N adieresis ; B -5 -14 410 619 ;
+C -1 ; WX 667 ; N Ecircumflex ; B 10 -8 628 806 ;
+C -1 ; WX 333 ; N scaron ; B -33 -14 368 654 ;
+C -1 ; WX 389 ; N thorn ; B -126 -300 370 714 ;
+C -1 ; WX 990 ; N trademark ; B 44 187 954 594 ;
+C -1 ; WX 333 ; N egrave ; B -5 -14 316 654 ;
+C -1 ; WX 289 ; N threesuperior ; B -22 234 271 610 ;
+C -1 ; WX 389 ; N zcaron ; B -80 -14 396 654 ;
+C -1 ; WX 389 ; N atilde ; B -5 -14 427 624 ;
+C -1 ; WX 389 ; N aring ; B -5 -14 410 648 ;
+C -1 ; WX 389 ; N ocircumflex ; B 0 -14 362 654 ;
+C -1 ; WX 667 ; N Edieresis ; B 10 -8 628 771 ;
+C -1 ; WX 666 ; N threequarters ; B -22 -16 647 610 ;
+C -1 ; WX 389 ; N ydieresis ; B -137 -314 383 619 ;
+C -1 ; WX 389 ; N yacute ; B -137 -314 383 654 ;
+C -1 ; WX 278 ; N iacute ; B 28 -14 316 654 ;
+C -1 ; WX 611 ; N Acircumflex ; B -86 -16 587 806 ;
+C -1 ; WX 722 ; N Uacute ; B 20 -16 681 806 ;
+C -1 ; WX 333 ; N eacute ; B -5 -14 353 654 ;
+C -1 ; WX 611 ; N Ograve ; B 20 -16 583 806 ;
+C -1 ; WX 389 ; N agrave ; B -5 -14 410 654 ;
+C -1 ; WX 722 ; N Udieresis ; B 20 -16 681 771 ;
+C -1 ; WX 389 ; N acircumflex ; B -5 -14 410 654 ;
+C -1 ; WX 333 ; N Igrave ; B -27 0 360 806 ;
+C -1 ; WX 289 ; N twosuperior ; B 0 234 301 610 ;
+C -1 ; WX 722 ; N Ugrave ; B 20 -16 681 806 ;
+C -1 ; WX 666 ; N onequarter ; B 2 -16 647 610 ;
+C -1 ; WX 722 ; N Ucircumflex ; B 20 -16 681 806 ;
+C -1 ; WX 444 ; N Scaron ; B -88 -80 469 806 ;
+C -1 ; WX 333 ; N Idieresis ; B -27 0 379 771 ;
+C -1 ; WX 278 ; N idieresis ; B 28 -14 319 619 ;
+C -1 ; WX 667 ; N Egrave ; B 10 -8 628 806 ;
+C -1 ; WX 611 ; N Oacute ; B 20 -16 583 806 ;
+C -1 ; WX 600 ; N divide ; B 47 -10 553 516 ;
+C -1 ; WX 611 ; N Atilde ; B -86 -16 590 776 ;
+C -1 ; WX 611 ; N Aring ; B -86 -16 587 814 ;
+C -1 ; WX 611 ; N Odieresis ; B 20 -16 583 771 ;
+C -1 ; WX 611 ; N Adieresis ; B -86 -16 587 771 ;
+C -1 ; WX 722 ; N Ntilde ; B -9 -158 825 776 ;
+C -1 ; WX 611 ; N Zcaron ; B -48 -16 575 806 ;
+C -1 ; WX 611 ; N Thorn ; B -6 0 583 620 ;
+C -1 ; WX 333 ; N Iacute ; B -27 0 376 806 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 77 27 523 479 ;
+C -1 ; WX 667 ; N Eacute ; B 10 -8 628 806 ;
+C -1 ; WX 611 ; N Ydieresis ; B -30 -170 713 771 ;
+C -1 ; WX 289 ; N onesuperior ; B 12 244 268 610 ;
+C -1 ; WX 444 ; N ugrave ; B 12 -14 456 654 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 108 553 372 ;
+C -1 ; WX 444 ; N ntilde ; B 9 -14 461 624 ;
+C -1 ; WX 611 ; N Otilde ; B 20 -16 583 776 ;
+C -1 ; WX 389 ; N otilde ; B 0 -14 416 624 ;
+C -1 ; WX 556 ; N Ccedilla ; B 34 -190 566 610 ;
+C -1 ; WX 611 ; N Agrave ; B -86 -16 587 806 ;
+C -1 ; WX 666 ; N onehalf ; B 2 -16 649 610 ;
+C -1 ; WX 722 ; N Eth ; B 10 0 686 630 ;
+C -1 ; WX 400 ; N degree ; B 87 324 373 610 ;
+C -1 ; WX 611 ; N Yacute ; B -30 -170 713 806 ;
+C -1 ; WX 611 ; N Ocircumflex ; B 20 -16 583 806 ;
+C -1 ; WX 389 ; N oacute ; B 0 -14 370 654 ;
+C -1 ; WX 444 ; N mu ; B -46 -314 456 434 ;
+C -1 ; WX 600 ; N minus ; B 47 231 553 275 ;
+C -1 ; WX 389 ; N eth ; B 0 -14 412 714 ;
+C -1 ; WX 389 ; N odieresis ; B 0 -14 373 619 ;
+C -1 ; WX 800 ; N copyright ; B 87 -16 713 610 ;
+C -1 ; WX 222 ; N brokenbar ; B 89 -16 133 714 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 94
+
+KPX A quoteright -55
+KPX A quotedblright -55
+
+KPX B period -50
+KPX B comma -50
+
+KPX D period -50
+KPX D comma -50
+
+KPX F r -25
+KPX F period -111
+KPX F o -37
+KPX F i -25
+KPX F e -37
+KPX F comma -111
+KPX F a -37
+
+KPX G period -50
+KPX G comma -50
+
+KPX J u -30
+KPX J period -75
+KPX J o -37
+KPX J e -37
+KPX J comma -75
+KPX J a -37
+
+KPX L quoteright -74
+KPX L quotedblright -74
+
+KPX O period -50
+KPX O comma -50
+
+KPX P period -92
+KPX P comma -92
+
+KPX S period -50
+KPX S comma -50
+
+KPX T y -74
+KPX T w -74
+KPX T u -74
+KPX T semicolon -74
+KPX T r -74
+KPX T period -74
+KPX T o -74
+KPX T i -74
+KPX T hyphen -74
+KPX T e -74
+KPX T comma -74
+KPX T colon -74
+KPX T a -74
+
+KPX V semicolon -18
+KPX V period -111
+KPX V o -18
+KPX V hyphen -37
+KPX V e -18
+KPX V comma -111
+KPX V colon -18
+KPX V a -18
+
+KPX W period -92
+KPX W comma -92
+
+KPX Y u -37
+KPX Y semicolon -74
+KPX Y period -111
+KPX Y o -55
+KPX Y i -55
+KPX Y hyphen -55
+KPX Y e -55
+KPX Y comma -111
+KPX Y colon -74
+KPX Y a -55
+
+KPX b period -50
+KPX b comma -50
+
+KPX f quoteright 18
+KPX f period -50
+KPX f f -18
+KPX f comma -50
+
+KPX g period -37
+KPX g comma -37
+
+KPX period quoteright -50
+KPX period quotedblright -50
+
+KPX quoteleft quoteleft -108
+
+KPX quoteright s -37
+KPX quoteright quoteright -108
+
+KPX r y 18
+KPX r v 18
+KPX r period -74
+KPX r n 18
+KPX r hyphen -37
+KPX r comma -74
+
+KPX space quoteleft -37
+KPX space quotedblleft -37
+KPX space Y -37
+KPX space W -37
+KPX space V -37
+KPX space T -37
+KPX space A -37
+
+KPX v period -55
+KPX v comma -55
+
+KPX w period -55
+KPX w comma -55
+
+KPX y period -18
+KPX y comma -18
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 237 152 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 225 152 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 225 152 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 225 152 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 257 166 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 242 152 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 261 152 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 261 152 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 261 152 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 261 152 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 74 152 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 74 152 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 74 152 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 74 152 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 314 152 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 195 152 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 195 152 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 195 152 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 195 152 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 195 152 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 175 152 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 280 152 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 280 152 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 280 152 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 280 152 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 247 152 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 247 152 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 213 152 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 79 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 79 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 79 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 79 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 79 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 79 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 51 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 51 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 51 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 51 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 14 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 14 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 14 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 14 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 106 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 68 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 68 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 68 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 68 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 68 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 74 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 83 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 83 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 83 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 83 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 56 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 56 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 102 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/ZC-MdIt b/font/ZC-MdIt
new file mode 100644
index 0000000..6efb57a
--- /dev/null
+++ b/font/ZC-MdIt
@@ -0,0 +1,480 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Fri Dec 28 16:35:46 1990
+Comment UniqueID 33936
+Comment VMusage 34559 41451
+FontName ZapfChancery-MediumItalic
+FullName ITC Zapf Chancery Medium Italic
+FamilyName ITC Zapf Chancery
+Weight Medium
+ItalicAngle -14
+IsFixedPitch false
+FontBBox -181 -314 1065 831
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.007
+Notice Copyright (c) 1985, 1987, 1989, 1990 Adobe Systems Incorporated.  All Rights Reserved.ITC Zapf Chancery is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 708
+XHeight 438
+Ascender 714
+Descender -314
+StartCharMetrics 228
+C 32 ; WX 220 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 280 ; N exclam ; B 119 -14 353 610 ;
+C 34 ; WX 220 ; N quotedbl ; B 120 343 333 610 ;
+C 35 ; WX 440 ; N numbersign ; B 83 0 521 594 ;
+C 36 ; WX 440 ; N dollar ; B 60 -144 508 709 ;
+C 37 ; WX 680 ; N percent ; B 132 -160 710 700 ;
+C 38 ; WX 780 ; N ampersand ; B 126 -16 915 610 ;
+C 39 ; WX 240 ; N quoteright ; B 168 343 338 610 ;
+C 40 ; WX 260 ; N parenleft ; B 96 -216 411 664 ;
+C 41 ; WX 220 ; N parenright ; B -13 -216 302 664 ;
+C 42 ; WX 420 ; N asterisk ; B 139 263 479 610 ;
+C 43 ; WX 520 ; N plus ; B 117 0 543 426 ;
+C 44 ; WX 220 ; N comma ; B 25 -140 213 148 ;
+C 45 ; WX 280 ; N hyphen ; B 69 190 334 248 ;
+C 46 ; WX 220 ; N period ; B 102 -14 228 128 ;
+C 47 ; WX 340 ; N slash ; B 74 -16 458 610 ;
+C 48 ; WX 440 ; N zero ; B 79 -16 538 610 ;
+C 49 ; WX 440 ; N one ; B 41 0 428 610 ;
+C 50 ; WX 440 ; N two ; B 17 -16 485 610 ;
+C 51 ; WX 440 ; N three ; B 1 -16 485 610 ;
+C 52 ; WX 440 ; N four ; B 77 -35 499 610 ;
+C 53 ; WX 440 ; N five ; B 60 -16 595 679 ;
+C 54 ; WX 440 ; N six ; B 90 -16 556 610 ;
+C 55 ; WX 440 ; N seven ; B 157 -33 561 645 ;
+C 56 ; WX 440 ; N eight ; B 65 -16 529 610 ;
+C 57 ; WX 440 ; N nine ; B 32 -16 517 610 ;
+C 58 ; WX 260 ; N colon ; B 98 -14 296 438 ;
+C 59 ; WX 240 ; N semicolon ; B 29 -140 299 438 ;
+C 60 ; WX 520 ; N less ; B 139 0 527 468 ;
+C 61 ; WX 520 ; N equal ; B 117 86 543 340 ;
+C 62 ; WX 520 ; N greater ; B 139 0 527 468 ;
+C 63 ; WX 380 ; N question ; B 150 -14 455 610 ;
+C 64 ; WX 700 ; N at ; B 127 -16 753 610 ;
+C 65 ; WX 620 ; N A ; B 13 -16 697 632 ;
+C 66 ; WX 600 ; N B ; B 85 -6 674 640 ;
+C 67 ; WX 520 ; N C ; B 93 -16 631 610 ;
+C 68 ; WX 700 ; N D ; B 86 -6 768 640 ;
+C 69 ; WX 620 ; N E ; B 91 -12 709 618 ;
+C 70 ; WX 580 ; N F ; B 120 -118 793 629 ;
+C 71 ; WX 620 ; N G ; B 148 -242 709 610 ;
+C 72 ; WX 680 ; N H ; B 18 -16 878 708 ;
+C 73 ; WX 380 ; N I ; B 99 0 504 594 ;
+C 74 ; WX 400 ; N J ; B -14 -147 538 594 ;
+C 75 ; WX 660 ; N K ; B 53 -153 844 610 ;
+C 76 ; WX 580 ; N L ; B 53 -16 657 610 ;
+C 77 ; WX 840 ; N M ; B 58 -16 1020 722 ;
+C 78 ; WX 700 ; N N ; B 85 -168 915 708 ;
+C 79 ; WX 600 ; N O ; B 94 -16 660 610 ;
+C 80 ; WX 540 ; N P ; B 42 0 658 628 ;
+C 81 ; WX 600 ; N Q ; B 84 -177 775 610 ;
+C 82 ; WX 600 ; N R ; B 58 -168 805 640 ;
+C 83 ; WX 460 ; N S ; B 45 -81 558 610 ;
+C 84 ; WX 500 ; N T ; B 63 0 744 667 ;
+C 85 ; WX 740 ; N U ; B 126 -16 792 617 ;
+C 86 ; WX 640 ; N V ; B 124 -16 810 714 ;
+C 87 ; WX 880 ; N W ; B 94 -16 1046 723 ;
+C 88 ; WX 560 ; N X ; B -30 -16 699 610 ;
+C 89 ; WX 560 ; N Y ; B 41 -168 774 647 ;
+C 90 ; WX 620 ; N Z ; B 42 -19 669 624 ;
+C 91 ; WX 240 ; N bracketleft ; B -13 -207 405 655 ;
+C 92 ; WX 480 ; N backslash ; B 140 -16 524 610 ;
+C 93 ; WX 320 ; N bracketright ; B -27 -207 391 655 ;
+C 94 ; WX 520 ; N asciicircum ; B 132 239 532 594 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 240 ; N quoteleft ; B 169 343 339 610 ;
+C 97 ; WX 420 ; N a ; B 92 -15 485 438 ;
+C 98 ; WX 420 ; N b ; B 82 -23 492 714 ;
+C 99 ; WX 340 ; N c ; B 87 -14 406 438 ;
+C 100 ; WX 440 ; N d ; B 102 -14 651 714 ;
+C 101 ; WX 340 ; N e ; B 87 -14 403 438 ;
+C 102 ; WX 320 ; N f ; B -119 -314 547 714 ; L i fi ; L l fl ;
+C 103 ; WX 400 ; N g ; B -108 -314 503 438 ;
+C 104 ; WX 440 ; N h ; B 55 -14 524 714 ;
+C 105 ; WX 240 ; N i ; B 100 -14 341 635 ;
+C 106 ; WX 220 ; N j ; B -112 -314 332 635 ;
+C 107 ; WX 440 ; N k ; B 87 -184 628 714 ;
+C 108 ; WX 240 ; N l ; B 102 -14 480 714 ;
+C 109 ; WX 620 ; N m ; B 86 -14 704 438 ;
+C 110 ; WX 460 ; N n ; B 101 -14 544 438 ;
+C 111 ; WX 400 ; N o ; B 87 -14 449 438 ;
+C 112 ; WX 440 ; N p ; B -23 -314 484 432 ;
+C 113 ; WX 400 ; N q ; B 87 -300 490 510 ;
+C 114 ; WX 300 ; N r ; B 101 -14 424 438 ;
+C 115 ; WX 320 ; N s ; B 46 -14 403 438 ;
+C 116 ; WX 320 ; N t ; B 106 -14 426 539 ;
+C 117 ; WX 460 ; N u ; B 102 -14 528 438 ;
+C 118 ; WX 440 ; N v ; B 87 -14 533 488 ;
+C 119 ; WX 680 ; N w ; B 87 -14 782 488 ;
+C 120 ; WX 420 ; N x ; B 70 -195 589 438 ;
+C 121 ; WX 400 ; N y ; B -24 -314 483 438 ;
+C 122 ; WX 440 ; N z ; B 26 -14 508 445 ;
+C 123 ; WX 240 ; N braceleft ; B 55 -207 383 655 ;
+C 124 ; WX 520 ; N bar ; B 320 -16 378 714 ;
+C 125 ; WX 240 ; N braceright ; B -10 -207 318 655 ;
+C 126 ; WX 520 ; N asciitilde ; B 123 186 539 320 ;
+C 161 ; WX 280 ; N exclamdown ; B 72 -186 306 438 ;
+C 162 ; WX 440 ; N cent ; B 122 -134 476 543 ;
+C 163 ; WX 440 ; N sterling ; B -16 -52 506 610 ;
+C 164 ; WX 60 ; N fraction ; B -181 -16 320 610 ;
+C 165 ; WX 440 ; N yen ; B -1 -168 613 647 ;
+C 166 ; WX 440 ; N florin ; B -64 -314 582 610 ;
+C 167 ; WX 420 ; N section ; B 53 -215 514 610 ;
+C 168 ; WX 440 ; N currency ; B 50 85 474 509 ;
+C 169 ; WX 160 ; N quotesingle ; B 145 343 215 610 ;
+C 170 ; WX 340 ; N quotedblleft ; B 169 343 464 610 ;
+C 171 ; WX 340 ; N guillemotleft ; B 98 24 356 414 ;
+C 172 ; WX 240 ; N guilsinglleft ; B 98 24 258 414 ;
+C 173 ; WX 260 ; N guilsinglright ; B 106 24 266 414 ;
+C 174 ; WX 520 ; N fi ; B -124 -314 605 714 ;
+C 175 ; WX 520 ; N fl ; B -124 -314 670 714 ;
+C 177 ; WX 500 ; N endash ; B 51 199 565 239 ;
+C 178 ; WX 460 ; N dagger ; B 138 -37 568 610 ;
+C 179 ; WX 480 ; N daggerdbl ; B 138 -59 533 610 ;
+C 180 ; WX 220 ; N periodcentered ; B 139 208 241 310 ;
+C 182 ; WX 500 ; N paragraph ; B 105 -199 638 594 ;
+C 183 ; WX 600 ; N bullet ; B 228 149 524 445 ;
+C 184 ; WX 180 ; N quotesinglbase ; B 21 -121 191 146 ;
+C 185 ; WX 280 ; N quotedblbase ; B -14 -121 281 146 ;
+C 186 ; WX 360 ; N quotedblright ; B 158 343 453 610 ;
+C 187 ; WX 380 ; N guillemotright ; B 117 24 375 414 ;
+C 188 ; WX 1000 ; N ellipsis ; B 124 -14 916 128 ;
+C 189 ; WX 960 ; N perthousand ; B 112 -160 1005 700 ;
+C 191 ; WX 400 ; N questiondown ; B 82 -186 387 438 ;
+C 193 ; WX 220 ; N grave ; B 193 492 339 659 ;
+C 194 ; WX 300 ; N acute ; B 265 492 422 659 ;
+C 195 ; WX 340 ; N circumflex ; B 223 482 443 649 ;
+C 196 ; WX 440 ; N tilde ; B 243 543 522 619 ;
+C 197 ; WX 440 ; N macron ; B 222 544 465 578 ;
+C 198 ; WX 440 ; N breve ; B 253 522 501 631 ;
+C 199 ; WX 220 ; N dotaccent ; B 236 522 328 610 ;
+C 200 ; WX 360 ; N dieresis ; B 243 522 469 610 ;
+C 202 ; WX 300 ; N ring ; B 240 483 416 659 ;
+C 203 ; WX 300 ; N cedilla ; B 12 -191 184 6 ;
+C 205 ; WX 400 ; N hungarumlaut ; B 208 492 495 659 ;
+C 206 ; WX 280 ; N ogonek ; B 38 -191 233 6 ;
+C 207 ; WX 340 ; N caron ; B 254 492 474 659 ;
+C 208 ; WX 1000 ; N emdash ; B 51 199 1065 239 ;
+C 225 ; WX 740 ; N AE ; B -21 -16 799 594 ;
+C 227 ; WX 260 ; N ordfeminine ; B 111 338 386 610 ;
+C 232 ; WX 580 ; N Lslash ; B 49 -16 657 610 ;
+C 233 ; WX 660 ; N Oslash ; B 83 -78 751 672 ;
+C 234 ; WX 820 ; N OE ; B 63 -16 909 610 ;
+C 235 ; WX 260 ; N ordmasculine ; B 128 339 373 610 ;
+C 241 ; WX 540 ; N ae ; B 67 -14 624 468 ;
+C 245 ; WX 240 ; N dotlessi ; B 100 -14 306 438 ;
+C 248 ; WX 300 ; N lslash ; B 121 -14 515 714 ;
+C 249 ; WX 440 ; N oslash ; B 46 -64 540 488 ;
+C 250 ; WX 560 ; N oe ; B 78 -14 628 438 ;
+C 251 ; WX 420 ; N germandbls ; B -127 -314 542 714 ;
+C -1 ; WX 340 ; N ecircumflex ; B 87 -14 433 649 ;
+C -1 ; WX 340 ; N edieresis ; B 87 -14 449 610 ;
+C -1 ; WX 420 ; N aacute ; B 92 -15 492 659 ;
+C -1 ; WX 740 ; N registered ; B 137 -16 763 610 ;
+C -1 ; WX 240 ; N icircumflex ; B 100 -14 363 649 ;
+C -1 ; WX 460 ; N udieresis ; B 102 -14 528 610 ;
+C -1 ; WX 400 ; N ograve ; B 87 -14 449 659 ;
+C -1 ; WX 460 ; N uacute ; B 102 -14 528 659 ;
+C -1 ; WX 460 ; N ucircumflex ; B 102 -14 528 649 ;
+C -1 ; WX 620 ; N Aacute ; B 13 -16 702 821 ;
+C -1 ; WX 240 ; N igrave ; B 100 -14 306 659 ;
+C -1 ; WX 380 ; N Icircumflex ; B 99 0 504 821 ;
+C -1 ; WX 340 ; N ccedilla ; B 62 -191 406 438 ;
+C -1 ; WX 420 ; N adieresis ; B 92 -15 485 610 ;
+C -1 ; WX 620 ; N Ecircumflex ; B 91 -12 709 821 ;
+C -1 ; WX 320 ; N scaron ; B 46 -14 464 659 ;
+C -1 ; WX 440 ; N thorn ; B -38 -314 505 714 ;
+C -1 ; WX 1000 ; N trademark ; B 127 187 1046 594 ;
+C -1 ; WX 340 ; N egrave ; B 87 -14 403 659 ;
+C -1 ; WX 264 ; N threesuperior ; B 59 234 348 610 ;
+C -1 ; WX 440 ; N zcaron ; B 26 -14 514 659 ;
+C -1 ; WX 420 ; N atilde ; B 92 -15 522 619 ;
+C -1 ; WX 420 ; N aring ; B 92 -15 485 659 ;
+C -1 ; WX 400 ; N ocircumflex ; B 87 -14 453 649 ;
+C -1 ; WX 620 ; N Edieresis ; B 91 -12 709 762 ;
+C -1 ; WX 660 ; N threequarters ; B 39 -16 706 610 ;
+C -1 ; WX 400 ; N ydieresis ; B -24 -314 483 610 ;
+C -1 ; WX 400 ; N yacute ; B -24 -314 483 659 ;
+C -1 ; WX 240 ; N iacute ; B 100 -14 392 659 ;
+C -1 ; WX 620 ; N Acircumflex ; B 13 -16 697 821 ;
+C -1 ; WX 740 ; N Uacute ; B 126 -16 792 821 ;
+C -1 ; WX 340 ; N eacute ; B 87 -14 462 659 ;
+C -1 ; WX 600 ; N Ograve ; B 94 -16 660 821 ;
+C -1 ; WX 420 ; N agrave ; B 92 -15 485 659 ;
+C -1 ; WX 740 ; N Udieresis ; B 126 -16 792 762 ;
+C -1 ; WX 420 ; N acircumflex ; B 92 -15 485 649 ;
+C -1 ; WX 380 ; N Igrave ; B 99 0 504 821 ;
+C -1 ; WX 264 ; N twosuperior ; B 72 234 354 610 ;
+C -1 ; WX 740 ; N Ugrave ; B 126 -16 792 821 ;
+C -1 ; WX 660 ; N onequarter ; B 56 -16 702 610 ;
+C -1 ; WX 740 ; N Ucircumflex ; B 126 -16 792 821 ;
+C -1 ; WX 460 ; N Scaron ; B 45 -81 594 831 ;
+C -1 ; WX 380 ; N Idieresis ; B 99 0 519 762 ;
+C -1 ; WX 240 ; N idieresis ; B 100 -14 369 610 ;
+C -1 ; WX 620 ; N Egrave ; B 91 -12 709 821 ;
+C -1 ; WX 600 ; N Oacute ; B 94 -16 660 821 ;
+C -1 ; WX 520 ; N divide ; B 117 -14 543 440 ;
+C -1 ; WX 620 ; N Atilde ; B 13 -16 702 771 ;
+C -1 ; WX 620 ; N Aring ; B 13 -16 697 831 ;
+C -1 ; WX 600 ; N Odieresis ; B 94 -16 660 762 ;
+C -1 ; WX 620 ; N Adieresis ; B 13 -16 709 762 ;
+C -1 ; WX 700 ; N Ntilde ; B 85 -168 915 761 ;
+C -1 ; WX 620 ; N Zcaron ; B 42 -19 669 831 ;
+C -1 ; WX 540 ; N Thorn ; B 52 0 647 623 ;
+C -1 ; WX 380 ; N Iacute ; B 99 0 532 821 ;
+C -1 ; WX 520 ; N plusminus ; B 117 0 543 436 ;
+C -1 ; WX 520 ; N multiply ; B 133 16 527 410 ;
+C -1 ; WX 620 ; N Eacute ; B 91 -12 709 821 ;
+C -1 ; WX 560 ; N Ydieresis ; B 41 -168 774 762 ;
+C -1 ; WX 264 ; N onesuperior ; B 83 244 311 610 ;
+C -1 ; WX 460 ; N ugrave ; B 102 -14 528 659 ;
+C -1 ; WX 520 ; N logicalnot ; B 117 86 543 340 ;
+C -1 ; WX 460 ; N ntilde ; B 101 -14 544 619 ;
+C -1 ; WX 600 ; N Otilde ; B 94 -16 660 761 ;
+C -1 ; WX 400 ; N otilde ; B 87 -14 502 619 ;
+C -1 ; WX 520 ; N Ccedilla ; B 93 -191 631 610 ;
+C -1 ; WX 620 ; N Agrave ; B 13 -16 697 821 ;
+C -1 ; WX 660 ; N onehalf ; B 56 -16 702 610 ;
+C -1 ; WX 700 ; N Eth ; B 86 -6 768 640 ;
+C -1 ; WX 400 ; N degree ; B 171 324 457 610 ;
+C -1 ; WX 560 ; N Yacute ; B 41 -168 774 821 ;
+C -1 ; WX 600 ; N Ocircumflex ; B 94 -16 660 821 ;
+C -1 ; WX 400 ; N oacute ; B 87 -14 482 659 ;
+C -1 ; WX 460 ; N mu ; B 7 -314 523 438 ;
+C -1 ; WX 520 ; N minus ; B 117 184 543 242 ;
+C -1 ; WX 400 ; N eth ; B 87 -14 522 714 ;
+C -1 ; WX 400 ; N odieresis ; B 87 -14 479 610 ;
+C -1 ; WX 740 ; N copyright ; B 137 -16 763 610 ;
+C -1 ; WX 520 ; N brokenbar ; B 320 -16 378 714 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 131
+
+KPX A quoteright -40
+KPX A quotedblright -40
+KPX A U -10
+KPX A T 10
+KPX A Q 10
+KPX A O 10
+KPX A G -30
+KPX A C 20
+
+KPX D period -30
+KPX D comma -20
+KPX D Y 10
+KPX D A -10
+
+KPX F period -40
+KPX F i 10
+KPX F comma -30
+
+KPX G period -20
+KPX G comma -10
+
+KPX J period -20
+KPX J comma -10
+
+KPX K u -20
+KPX K o -20
+KPX K e -20
+
+KPX L y -10
+KPX L quoteright -25
+KPX L quotedblright -25
+KPX L W -10
+KPX L V -20
+
+KPX O period -20
+KPX O comma -10
+KPX O Y 10
+KPX O T 20
+KPX O A -20
+
+KPX P period -50
+KPX P o -10
+KPX P e -10
+KPX P comma -40
+KPX P a -20
+KPX P A -10
+
+KPX Q U -10
+
+KPX R Y 10
+KPX R W 10
+KPX R T 20
+
+KPX T o -20
+KPX T i 20
+KPX T hyphen -20
+KPX T h 20
+KPX T e -20
+KPX T a -20
+KPX T O 30
+KPX T A 10
+
+KPX V period -100
+KPX V o -20
+KPX V e -20
+KPX V comma -90
+KPX V a -20
+KPX V O 10
+KPX V G -20
+
+KPX W period -50
+KPX W o -20
+KPX W i 10
+KPX W h 10
+KPX W e -20
+KPX W comma -40
+KPX W a -20
+KPX W O 10
+
+KPX Y u -20
+KPX Y period -50
+KPX Y o -50
+KPX Y i 10
+KPX Y e -40
+KPX Y comma -40
+KPX Y a -60
+
+KPX b period -30
+KPX b l -20
+KPX b comma -20
+KPX b b -20
+
+KPX c k -10
+
+KPX comma quoteright -70
+KPX comma quotedblright -70
+
+KPX d w -20
+KPX d v -10
+KPX d d -40
+
+KPX e y 10
+
+KPX f quoteright 30
+KPX f quotedblright 30
+KPX f period -50
+KPX f f -50
+KPX f e -10
+KPX f comma -40
+KPX f a -20
+
+KPX g y 10
+KPX g period -30
+KPX g i 10
+KPX g e 10
+KPX g comma -20
+KPX g a 10
+
+KPX k y 10
+KPX k o -10
+KPX k e -20
+
+KPX m y 10
+KPX m u 10
+
+KPX n y 20
+
+KPX o period -30
+KPX o comma -20
+
+KPX p period -30
+KPX p p -10
+KPX p comma -20
+
+KPX period quoteright -80
+KPX period quotedblright -80
+
+KPX quotedblleft quoteleft 20
+KPX quotedblleft A 10
+
+KPX quoteleft quoteleft -115
+KPX quoteleft A 10
+
+KPX quoteright v 30
+KPX quoteright t 20
+KPX quoteright s -25
+KPX quoteright r 30
+KPX quoteright quoteright -115
+KPX quoteright quotedblright 20
+KPX quoteright l 20
+
+KPX r period -50
+KPX r i 10
+KPX r comma -40
+
+KPX s period -20
+KPX s comma -10
+
+KPX v period -30
+KPX v comma -20
+
+KPX w period -30
+KPX w o 10
+KPX w h 20
+KPX w comma -20
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 280 162 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 240 172 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 240 152 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 250 162 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 260 172 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 180 152 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 230 162 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 180 172 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 170 152 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 220 162 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 110 162 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 60 172 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 50 152 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 100 162 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 210 142 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 160 162 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 130 172 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 120 152 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 150 162 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 90 142 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 120 172 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 310 162 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 260 172 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 260 152 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 270 162 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 220 162 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 170 152 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 130 172 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 70 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 20 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 10 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 80 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 60 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 0 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 40 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex -10 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis -20 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 30 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute -30 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex -80 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis -100 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave -40 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 10 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 60 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 10 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 10 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 60 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde -20 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron -10 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 70 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 30 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 20 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 50 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 60 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 0 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 40 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/ZC-Rm b/font/ZC-Rm
new file mode 100644
index 0000000..a501b13
--- /dev/null
+++ b/font/ZC-Rm
@@ -0,0 +1,486 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.
+Comment Creation Date: Thu Sep  6 11:25:29 1990
+Comment UniqueID 32814
+Comment VMusage 33348 40240
+FontName ZapfChancery-Roman
+FullName ITC Zapf Chancery Roman
+FamilyName ITC Zapf Chancery
+Weight Roman
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -171 -314 1005 817
+UnderlinePosition -100
+UnderlineThickness 50
+Version 001.000
+Notice Copyright (c) 1990 Adobe Systems Incorporated.  All Rights Reserved.ITC Zapf Chancery is a registered trademark of International Typeface Corporation.
+EncodingScheme AdobeStandardEncoding
+CapHeight 594
+XHeight 438
+Ascender 714
+Descender -300
+StartCharMetrics 228
+C 32 ; WX 250 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 278 ; N exclam ; B 58 -14 192 610 ;
+C 34 ; WX 333 ; N quotedbl ; B 60 330 273 610 ;
+C 35 ; WX 500 ; N numbersign ; B 25 0 459 594 ;
+C 36 ; WX 500 ; N dollar ; B 41 -143 402 707 ;
+C 37 ; WX 667 ; N percent ; B 44 -160 623 700 ;
+C 38 ; WX 778 ; N ampersand ; B 28 -14 743 551 ;
+C 39 ; WX 222 ; N quoteright ; B 13 330 179 610 ;
+C 40 ; WX 333 ; N parenleft ; B 86 -218 301 674 ;
+C 41 ; WX 333 ; N parenright ; B 32 -218 247 674 ;
+C 42 ; WX 444 ; N asterisk ; B 54 260 382 610 ;
+C 43 ; WX 600 ; N plus ; B 47 0 553 506 ;
+C 44 ; WX 250 ; N comma ; B -17 -154 165 155 ;
+C 45 ; WX 333 ; N hyphen ; B 42 193 291 245 ;
+C 46 ; WX 250 ; N period ; B 58 -14 192 128 ;
+C 47 ; WX 278 ; N slash ; B -56 -16 334 610 ;
+C 48 ; WX 500 ; N zero ; B 37 -16 463 610 ;
+C 49 ; WX 500 ; N one ; B 23 0 463 610 ;
+C 50 ; WX 500 ; N two ; B -13 -16 484 610 ;
+C 51 ; WX 500 ; N three ; B -25 -16 412 610 ;
+C 52 ; WX 500 ; N four ; B -5 -30 505 610 ;
+C 53 ; WX 500 ; N five ; B 13 -16 472 666 ;
+C 54 ; WX 500 ; N six ; B 47 -16 476 610 ;
+C 55 ; WX 500 ; N seven ; B 60 -24 477 646 ;
+C 56 ; WX 500 ; N eight ; B 39 -16 426 610 ;
+C 57 ; WX 500 ; N nine ; B 24 -16 453 610 ;
+C 58 ; WX 250 ; N colon ; B 58 -14 192 433 ;
+C 59 ; WX 250 ; N semicolon ; B -17 -154 192 433 ;
+C 60 ; WX 600 ; N less ; B 47 -9 553 515 ;
+C 61 ; WX 600 ; N equal ; B 47 126 553 380 ;
+C 62 ; WX 600 ; N greater ; B 47 -9 553 515 ;
+C 63 ; WX 333 ; N question ; B 59 -14 315 610 ;
+C 64 ; WX 800 ; N at ; B 87 -16 713 610 ;
+C 65 ; WX 611 ; N A ; B -68 -9 650 610 ;
+C 66 ; WX 556 ; N B ; B -2 -2 510 594 ;
+C 67 ; WX 556 ; N C ; B 33 -16 531 610 ;
+C 68 ; WX 667 ; N D ; B -2 -2 634 594 ;
+C 69 ; WX 556 ; N E ; B -2 -3 550 604 ;
+C 70 ; WX 444 ; N F ; B -3 0 460 604 ;
+C 71 ; WX 611 ; N G ; B 33 -33 586 610 ;
+C 72 ; WX 667 ; N H ; B -8 0 667 594 ;
+C 73 ; WX 333 ; N I ; B -2 0 324 594 ;
+C 74 ; WX 278 ; N J ; B -152 -218 291 594 ;
+C 75 ; WX 611 ; N K ; B -7 -3 643 604 ;
+C 76 ; WX 556 ; N L ; B 20 0 542 594 ;
+C 77 ; WX 833 ; N M ; B -9 -9 836 604 ;
+C 78 ; WX 667 ; N N ; B -2 -16 685 594 ;
+C 79 ; WX 667 ; N O ; B 33 -16 634 610 ;
+C 80 ; WX 500 ; N P ; B -8 0 503 594 ;
+C 81 ; WX 667 ; N Q ; B 33 -160 708 610 ;
+C 82 ; WX 556 ; N R ; B -8 -8 595 594 ;
+C 83 ; WX 444 ; N S ; B -9 -16 405 610 ;
+C 84 ; WX 556 ; N T ; B 17 0 564 604 ;
+C 85 ; WX 667 ; N U ; B 8 -16 667 594 ;
+C 86 ; WX 556 ; N V ; B -35 -16 554 610 ;
+C 87 ; WX 889 ; N W ; B -28 -16 896 610 ;
+C 88 ; WX 556 ; N X ; B -52 -16 572 610 ;
+C 89 ; WX 556 ; N Y ; B -38 0 600 610 ;
+C 90 ; WX 611 ; N Z ; B 0 -36 635 614 ;
+C 91 ; WX 333 ; N bracketleft ; B 81 -207 358 663 ;
+C 92 ; WX 278 ; N backslash ; B -56 -16 334 610 ;
+C 93 ; WX 333 ; N bracketright ; B -25 -207 252 663 ;
+C 94 ; WX 600 ; N asciicircum ; B 90 229 510 594 ;
+C 95 ; WX 500 ; N underscore ; B 0 -125 500 -75 ;
+C 96 ; WX 222 ; N quoteleft ; B 50 330 216 610 ;
+C 97 ; WX 389 ; N a ; B 23 -14 423 438 ;
+C 98 ; WX 389 ; N b ; B 28 -14 354 714 ;
+C 99 ; WX 333 ; N c ; B 23 -14 341 438 ;
+C 100 ; WX 389 ; N d ; B 23 -14 474 714 ;
+C 101 ; WX 333 ; N e ; B 23 -14 354 438 ;
+C 102 ; WX 222 ; N f ; B -166 -314 373 714 ; L i fi ; L l fl ;
+C 103 ; WX 389 ; N g ; B -63 -314 392 438 ;
+C 104 ; WX 444 ; N h ; B 42 -14 475 714 ;
+C 105 ; WX 278 ; N i ; B 19 -14 287 627 ;
+C 106 ; WX 222 ; N j ; B -131 -314 197 627 ;
+C 107 ; WX 389 ; N k ; B 31 -14 419 714 ;
+C 108 ; WX 222 ; N l ; B 37 -14 302 714 ;
+C 109 ; WX 667 ; N m ; B -1 -14 694 438 ;
+C 110 ; WX 444 ; N n ; B -1 -14 471 438 ;
+C 111 ; WX 389 ; N o ; B 23 -14 354 438 ;
+C 112 ; WX 389 ; N p ; B -69 -300 354 438 ;
+C 113 ; WX 389 ; N q ; B 23 -300 398 500 ;
+C 114 ; WX 278 ; N r ; B -1 -14 314 438 ;
+C 115 ; WX 333 ; N s ; B 0 -14 292 438 ;
+C 116 ; WX 278 ; N t ; B -27 -14 296 523 ;
+C 117 ; WX 444 ; N u ; B -1 -14 471 438 ;
+C 118 ; WX 389 ; N v ; B -36 -14 383 450 ;
+C 119 ; WX 667 ; N w ; B -21 -14 671 445 ;
+C 120 ; WX 444 ; N x ; B -6 -89 470 438 ;
+C 121 ; WX 389 ; N y ; B -127 -314 399 450 ;
+C 122 ; WX 333 ; N z ; B -41 -14 366 438 ;
+C 123 ; WX 333 ; N braceleft ; B 50 -207 294 663 ;
+C 124 ; WX 222 ; N bar ; B 74 -16 132 714 ;
+C 125 ; WX 333 ; N braceright ; B 39 -207 283 663 ;
+C 126 ; WX 600 ; N asciitilde ; B 69 186 531 320 ;
+C 161 ; WX 278 ; N exclamdown ; B 54 -186 188 438 ;
+C 162 ; WX 500 ; N cent ; B 92 -130 388 538 ;
+C 163 ; WX 500 ; N sterling ; B 0 -52 475 610 ;
+C 164 ; WX 168 ; N fraction ; B -171 -16 339 610 ;
+C 165 ; WX 500 ; N yen ; B -22 0 553 610 ;
+C 166 ; WX 500 ; N florin ; B -131 -314 515 610 ;
+C 167 ; WX 500 ; N section ; B 45 -216 442 610 ;
+C 168 ; WX 500 ; N currency ; B 38 85 462 509 ;
+C 169 ; WX 222 ; N quotesingle ; B 76 330 146 610 ;
+C 170 ; WX 333 ; N quotedblleft ; B 42 330 328 610 ;
+C 171 ; WX 444 ; N guillemotleft ; B 83 20 341 418 ;
+C 172 ; WX 333 ; N guilsinglleft ; B 81 20 231 418 ;
+C 173 ; WX 333 ; N guilsinglright ; B 81 20 231 418 ;
+C 174 ; WX 444 ; N fi ; B -154 -314 485 714 ;
+C 175 ; WX 444 ; N fl ; B -154 -314 501 714 ;
+C 177 ; WX 500 ; N endash ; B -5 199 505 239 ;
+C 178 ; WX 444 ; N dagger ; B 11 -36 433 610 ;
+C 179 ; WX 444 ; N daggerdbl ; B 46 -43 384 610 ;
+C 180 ; WX 250 ; N periodcentered ; B 74 214 176 316 ;
+C 182 ; WX 600 ; N paragraph ; B 79 -200 551 594 ;
+C 183 ; WX 500 ; N bullet ; B 102 149 398 445 ;
+C 184 ; WX 222 ; N quotesinglbase ; B -35 -140 131 140 ;
+C 185 ; WX 333 ; N quotedblbase ; B -25 -140 261 140 ;
+C 186 ; WX 333 ; N quotedblright ; B 12 330 298 610 ;
+C 187 ; WX 444 ; N guillemotright ; B 83 20 341 418 ;
+C 188 ; WX 1000 ; N ellipsis ; B 100 -14 900 128 ;
+C 189 ; WX 944 ; N perthousand ; B 31 -160 926 700 ;
+C 191 ; WX 333 ; N questiondown ; B -8 -186 248 438 ;
+C 193 ; WX 278 ; N grave ; B 63 484 220 650 ;
+C 194 ; WX 278 ; N acute ; B 129 484 286 650 ;
+C 195 ; WX 278 ; N circumflex ; B 49 490 272 650 ;
+C 196 ; WX 278 ; N tilde ; B 44 534 323 610 ;
+C 197 ; WX 278 ; N macron ; B 51 531 291 571 ;
+C 198 ; WX 278 ; N breve ; B 62 516 311 626 ;
+C 199 ; WX 278 ; N dotaccent ; B 111 516 207 610 ;
+C 200 ; WX 278 ; N dieresis ; B 56 516 286 610 ;
+C 202 ; WX 278 ; N ring ; B 86 489 262 665 ;
+C 203 ; WX 278 ; N cedilla ; B 21 -192 196 6 ;
+C 205 ; WX 278 ; N hungarumlaut ; B 62 484 353 650 ;
+C 206 ; WX 278 ; N ogonek ; B -13 -192 221 10 ;
+C 207 ; WX 278 ; N caron ; B 96 484 319 644 ;
+C 208 ; WX 1000 ; N emdash ; B -5 199 1005 239 ;
+C 225 ; WX 778 ; N AE ; B -43 -13 772 596 ;
+C 227 ; WX 253 ; N ordfeminine ; B 20 339 280 610 ;
+C 232 ; WX 556 ; N Lslash ; B 20 0 542 594 ;
+C 233 ; WX 667 ; N Oslash ; B 14 -87 634 681 ;
+C 234 ; WX 889 ; N OE ; B 24 -16 883 610 ;
+C 235 ; WX 253 ; N ordmasculine ; B 27 339 242 610 ;
+C 241 ; WX 556 ; N ae ; B 14 -14 565 469 ;
+C 245 ; WX 278 ; N dotlessi ; B 19 -14 287 438 ;
+C 248 ; WX 222 ; N lslash ; B -20 -14 302 714 ;
+C 249 ; WX 389 ; N oslash ; B -15 -68 377 492 ;
+C 250 ; WX 556 ; N oe ; B 23 -14 573 438 ;
+C 251 ; WX 444 ; N germandbls ; B -132 -314 421 714 ;
+C -1 ; WX 333 ; N ecircumflex ; B 23 -14 354 650 ;
+C -1 ; WX 333 ; N edieresis ; B 23 -14 354 610 ;
+C -1 ; WX 389 ; N aacute ; B 23 -14 423 650 ;
+C -1 ; WX 800 ; N registered ; B 87 -16 713 610 ;
+C -1 ; WX 278 ; N icircumflex ; B 19 -14 287 650 ;
+C -1 ; WX 444 ; N udieresis ; B -1 -14 471 610 ;
+C -1 ; WX 389 ; N ograve ; B 23 -14 354 650 ;
+C -1 ; WX 444 ; N uacute ; B -1 -14 471 650 ;
+C -1 ; WX 444 ; N ucircumflex ; B -1 -14 471 650 ;
+C -1 ; WX 611 ; N Aacute ; B -68 -9 650 802 ;
+C -1 ; WX 278 ; N igrave ; B 19 -14 287 650 ;
+C -1 ; WX 333 ; N Icircumflex ; B -2 0 324 802 ;
+C -1 ; WX 333 ; N ccedilla ; B 23 -192 341 438 ;
+C -1 ; WX 389 ; N adieresis ; B 23 -14 423 610 ;
+C -1 ; WX 556 ; N Ecircumflex ; B -2 -3 550 802 ;
+C -1 ; WX 333 ; N scaron ; B 0 -14 357 644 ;
+C -1 ; WX 389 ; N thorn ; B -69 -300 354 714 ;
+C -1 ; WX 990 ; N trademark ; B 3 187 922 594 ;
+C -1 ; WX 333 ; N egrave ; B 23 -14 354 650 ;
+C -1 ; WX 325 ; N threesuperior ; B -6 234 284 610 ;
+C -1 ; WX 333 ; N zcaron ; B -41 -14 366 644 ;
+C -1 ; WX 389 ; N atilde ; B 23 -14 423 610 ;
+C -1 ; WX 389 ; N aring ; B 23 -14 423 665 ;
+C -1 ; WX 389 ; N ocircumflex ; B 23 -14 354 650 ;
+C -1 ; WX 556 ; N Edieresis ; B -2 -3 550 762 ;
+C -1 ; WX 750 ; N threequarters ; B -6 -16 736 610 ;
+C -1 ; WX 389 ; N ydieresis ; B -127 -314 399 610 ;
+C -1 ; WX 389 ; N yacute ; B -127 -314 399 650 ;
+C -1 ; WX 278 ; N iacute ; B 19 -14 287 650 ;
+C -1 ; WX 611 ; N Acircumflex ; B -68 -9 650 802 ;
+C -1 ; WX 667 ; N Uacute ; B 8 -16 667 802 ;
+C -1 ; WX 333 ; N eacute ; B 23 -14 354 650 ;
+C -1 ; WX 667 ; N Ograve ; B 33 -16 634 802 ;
+C -1 ; WX 389 ; N agrave ; B 23 -14 423 650 ;
+C -1 ; WX 667 ; N Udieresis ; B 8 -16 667 762 ;
+C -1 ; WX 389 ; N acircumflex ; B 23 -14 423 650 ;
+C -1 ; WX 333 ; N Igrave ; B -2 0 324 802 ;
+C -1 ; WX 325 ; N twosuperior ; B -19 234 315 610 ;
+C -1 ; WX 667 ; N Ugrave ; B 8 -16 667 802 ;
+C -1 ; WX 750 ; N onequarter ; B 15 -16 736 610 ;
+C -1 ; WX 667 ; N Ucircumflex ; B 8 -16 667 802 ;
+C -1 ; WX 444 ; N Scaron ; B -9 -16 422 796 ;
+C -1 ; WX 333 ; N Idieresis ; B -2 0 324 762 ;
+C -1 ; WX 278 ; N idieresis ; B 19 -14 287 610 ;
+C -1 ; WX 556 ; N Egrave ; B -2 -3 550 802 ;
+C -1 ; WX 667 ; N Oacute ; B 33 -16 634 802 ;
+C -1 ; WX 600 ; N divide ; B 47 -14 553 520 ;
+C -1 ; WX 611 ; N Atilde ; B -68 -9 650 762 ;
+C -1 ; WX 611 ; N Aring ; B -68 -9 650 817 ;
+C -1 ; WX 667 ; N Odieresis ; B 33 -16 634 762 ;
+C -1 ; WX 611 ; N Adieresis ; B -68 -9 650 762 ;
+C -1 ; WX 667 ; N Ntilde ; B -2 -16 685 762 ;
+C -1 ; WX 611 ; N Zcaron ; B 0 -36 635 796 ;
+C -1 ; WX 500 ; N Thorn ; B -8 0 494 594 ;
+C -1 ; WX 333 ; N Iacute ; B -2 0 324 802 ;
+C -1 ; WX 600 ; N plusminus ; B 47 0 553 506 ;
+C -1 ; WX 600 ; N multiply ; B 73 26 527 480 ;
+C -1 ; WX 556 ; N Eacute ; B -2 -3 550 802 ;
+C -1 ; WX 556 ; N Ydieresis ; B -38 0 600 762 ;
+C -1 ; WX 325 ; N onesuperior ; B 15 244 301 610 ;
+C -1 ; WX 444 ; N ugrave ; B -1 -14 471 650 ;
+C -1 ; WX 600 ; N logicalnot ; B 47 126 553 380 ;
+C -1 ; WX 444 ; N ntilde ; B -1 -14 471 610 ;
+C -1 ; WX 667 ; N Otilde ; B 33 -16 634 762 ;
+C -1 ; WX 389 ; N otilde ; B 23 -14 389 610 ;
+C -1 ; WX 556 ; N Ccedilla ; B 33 -192 531 610 ;
+C -1 ; WX 611 ; N Agrave ; B -68 -9 650 802 ;
+C -1 ; WX 750 ; N onehalf ; B 15 -16 745 610 ;
+C -1 ; WX 667 ; N Eth ; B -2 -2 634 594 ;
+C -1 ; WX 400 ; N degree ; B 61 324 347 610 ;
+C -1 ; WX 556 ; N Yacute ; B -38 0 600 802 ;
+C -1 ; WX 667 ; N Ocircumflex ; B 33 -16 634 802 ;
+C -1 ; WX 389 ; N oacute ; B 23 -14 354 650 ;
+C -1 ; WX 444 ; N mu ; B -1 -314 471 438 ;
+C -1 ; WX 600 ; N minus ; B 47 224 553 282 ;
+C -1 ; WX 389 ; N eth ; B 23 -14 384 718 ;
+C -1 ; WX 389 ; N odieresis ; B 23 -14 354 610 ;
+C -1 ; WX 800 ; N copyright ; B 87 -16 713 610 ;
+C -1 ; WX 222 ; N brokenbar ; B 74 -16 132 714 ;
+EndCharMetrics
+StartKernData
+StartKernPairs 140
+
+KPX A y -37
+KPX A w -27
+KPX A v -37
+KPX A quoteright -90
+KPX A quotedblright -90
+KPX A Y -55
+KPX A W -55
+KPX A V -55
+KPX A T -55
+KPX A Q -18
+KPX A O -18
+KPX A G -18
+KPX A C -18
+
+KPX B period -75
+KPX B comma -75
+
+KPX D period -75
+KPX D comma -75
+KPX D W 10
+KPX D V 10
+
+KPX F r -50
+KPX F period -111
+KPX F o -75
+KPX F i -50
+KPX F e -75
+KPX F comma -111
+KPX F a -75
+KPX F A -37
+
+KPX G period -75
+KPX G comma -75
+
+KPX J period -75
+KPX J comma -50
+
+KPX L y -18
+KPX L quoteright -90
+KPX L quotedblright -90
+KPX L Y -55
+KPX L W -55
+KPX L V -55
+KPX L T -74
+
+KPX N period -50
+KPX N comma -50
+
+KPX O period -75
+KPX O comma -75
+KPX O W 10
+KPX O V 10
+
+KPX P period -129
+KPX P comma -129
+KPX P A -18
+
+KPX Q period -37
+KPX Q comma 75
+
+KPX R W -18
+KPX R V -18
+KPX R T -18
+
+KPX S period -75
+KPX S comma -75
+
+KPX T y -55
+KPX T w -74
+KPX T u -55
+KPX T semicolon -74
+KPX T r -55
+KPX T period -92
+KPX T o -55
+KPX T i -18
+KPX T hyphen -74
+KPX T e -55
+KPX T comma -92
+KPX T colon -74
+KPX T a -55
+KPX T A -37
+
+KPX V semicolon -37
+KPX V period -111
+KPX V o -18
+KPX V hyphen -18
+KPX V e -18
+KPX V comma -111
+KPX V a -18
+KPX V O 10
+KPX V G 10
+KPX V A -37
+
+KPX W semicolon -37
+KPX W period -111
+KPX W o -37
+KPX W e -37
+KPX W comma -111
+KPX W colon -37
+KPX W a -37
+KPX W O 10
+KPX W A -57
+
+KPX Y u -55
+KPX Y semicolon -74
+KPX Y period -111
+KPX Y o -55
+KPX Y i -45
+KPX Y hyphen -100
+KPX Y e -75
+KPX Y comma -111
+KPX Y colon -74
+KPX Y a -75
+KPX Y A -55
+
+KPX b period -75
+KPX b comma -75
+
+KPX c period -30
+KPX c comma -50
+
+KPX comma space -37
+KPX comma quoteright -20
+KPX comma quotedblright -20
+
+KPX f quoteright 37
+KPX f quotedblright 37
+KPX f period -75
+KPX f comma -75
+
+KPX g period -50
+KPX g comma -25
+
+KPX period quoteright -37
+KPX period quotedblright -37
+
+KPX quotedblleft quoteleft -18
+
+KPX quotedblright space -37
+
+KPX quoteleft quoteleft -102
+KPX quoteleft A -90
+
+KPX quoteright t -55
+KPX quoteright s -75
+KPX quoteright r -55
+KPX quoteright quoteright -102
+KPX quoteright quotedblright -18
+KPX quoteright l -40
+KPX quoteright d -70
+
+KPX r period -74
+KPX r hyphen -37
+KPX r comma -74
+
+KPX space quoteleft -37
+KPX space quotedblleft -37
+KPX space Y -37
+KPX space W -37
+KPX space V -37
+KPX space T -37
+KPX space A -37
+
+KPX v period -74
+KPX v comma -74
+
+KPX w period -74
+KPX w comma -74
+
+KPX y period -74
+KPX y comma -74
+EndKernPairs
+EndKernData
+StartComposites 56
+CC Aacute 2 ; PCC A 0 0 ; PCC acute 177 152 ;
+CC Acircumflex 2 ; PCC A 0 0 ; PCC circumflex 177 152 ;
+CC Adieresis 2 ; PCC A 0 0 ; PCC dieresis 177 152 ;
+CC Agrave 2 ; PCC A 0 0 ; PCC grave 177 152 ;
+CC Aring 2 ; PCC A 0 0 ; PCC ring 167 152 ;
+CC Atilde 2 ; PCC A 0 0 ; PCC tilde 177 152 ;
+CC Eacute 2 ; PCC E 0 0 ; PCC acute 119 152 ;
+CC Ecircumflex 2 ; PCC E 0 0 ; PCC circumflex 119 152 ;
+CC Edieresis 2 ; PCC E 0 0 ; PCC dieresis 119 152 ;
+CC Egrave 2 ; PCC E 0 0 ; PCC grave 119 152 ;
+CC Iacute 2 ; PCC I 0 0 ; PCC acute 38 152 ;
+CC Icircumflex 2 ; PCC I 0 0 ; PCC circumflex 38 152 ;
+CC Idieresis 2 ; PCC I 0 0 ; PCC dieresis 38 152 ;
+CC Igrave 2 ; PCC I 0 0 ; PCC grave 38 152 ;
+CC Ntilde 2 ; PCC N 0 0 ; PCC tilde 175 152 ;
+CC Oacute 2 ; PCC O 0 0 ; PCC acute 220 152 ;
+CC Ocircumflex 2 ; PCC O 0 0 ; PCC circumflex 220 152 ;
+CC Odieresis 2 ; PCC O 0 0 ; PCC dieresis 220 152 ;
+CC Ograve 2 ; PCC O 0 0 ; PCC grave 220 152 ;
+CC Otilde 2 ; PCC O 0 0 ; PCC tilde 220 152 ;
+CC Scaron 2 ; PCC S 0 0 ; PCC caron 103 152 ;
+CC Uacute 2 ; PCC U 0 0 ; PCC acute 195 152 ;
+CC Ucircumflex 2 ; PCC U 0 0 ; PCC circumflex 195 152 ;
+CC Udieresis 2 ; PCC U 0 0 ; PCC dieresis 195 152 ;
+CC Ugrave 2 ; PCC U 0 0 ; PCC grave 195 152 ;
+CC Yacute 2 ; PCC Y 0 0 ; PCC acute 149 152 ;
+CC Ydieresis 2 ; PCC Y 0 0 ; PCC dieresis 149 152 ;
+CC Zcaron 2 ; PCC Z 0 0 ; PCC caron 147 152 ;
+CC aacute 2 ; PCC a 0 0 ; PCC acute 66 0 ;
+CC acircumflex 2 ; PCC a 0 0 ; PCC circumflex 66 0 ;
+CC adieresis 2 ; PCC a 0 0 ; PCC dieresis 66 0 ;
+CC agrave 2 ; PCC a 0 0 ; PCC grave 66 0 ;
+CC aring 2 ; PCC a 0 0 ; PCC ring 56 0 ;
+CC atilde 2 ; PCC a 0 0 ; PCC tilde 66 0 ;
+CC eacute 2 ; PCC e 0 0 ; PCC acute 38 0 ;
+CC ecircumflex 2 ; PCC e 0 0 ; PCC circumflex 38 0 ;
+CC edieresis 2 ; PCC e 0 0 ; PCC dieresis 38 0 ;
+CC egrave 2 ; PCC e 0 0 ; PCC grave 38 0 ;
+CC iacute 2 ; PCC dotlessi 0 0 ; PCC acute 0 0 ;
+CC icircumflex 2 ; PCC dotlessi 0 0 ; PCC circumflex 0 0 ;
+CC idieresis 2 ; PCC dotlessi 0 0 ; PCC dieresis 0 0 ;
+CC igrave 2 ; PCC dotlessi 0 0 ; PCC grave 0 0 ;
+CC ntilde 2 ; PCC n 0 0 ; PCC tilde 63 0 ;
+CC oacute 2 ; PCC o 0 0 ; PCC acute 66 0 ;
+CC ocircumflex 2 ; PCC o 0 0 ; PCC circumflex 66 0 ;
+CC odieresis 2 ; PCC o 0 0 ; PCC dieresis 66 0 ;
+CC ograve 2 ; PCC o 0 0 ; PCC grave 66 0 ;
+CC otilde 2 ; PCC o 0 0 ; PCC tilde 66 0 ;
+CC scaron 2 ; PCC s 0 0 ; PCC caron 38 0 ;
+CC uacute 2 ; PCC u 0 0 ; PCC acute 63 0 ;
+CC ucircumflex 2 ; PCC u 0 0 ; PCC circumflex 63 0 ;
+CC udieresis 2 ; PCC u 0 0 ; PCC dieresis 63 0 ;
+CC ugrave 2 ; PCC u 0 0 ; PCC grave 63 0 ;
+CC yacute 2 ; PCC y 0 0 ; PCC acute 66 0 ;
+CC ydieresis 2 ; PCC y 0 0 ; PCC dieresis 66 0 ;
+CC zcaron 2 ; PCC z 0 0 ; PCC caron 8 0 ;
+EndComposites
+EndFontMetrics
diff --git a/font/ZD b/font/ZD
new file mode 100644
index 0000000..6b98e8d
--- /dev/null
+++ b/font/ZD
@@ -0,0 +1,222 @@
+StartFontMetrics 2.0
+Comment Copyright (c) 1985, 1987, 1988, 1989 Adobe Systems Incorporated.  All rights reserved.
+Comment Creation Date: Fri Dec  1 12:57:42 1989
+Comment UniqueID 26200
+Comment VMusage 39281 49041
+FontName ZapfDingbats
+FullName ITC Zapf Dingbats
+FamilyName ITC Zapf Dingbats
+Weight Medium
+ItalicAngle 0
+IsFixedPitch false
+FontBBox -1 -143 981 820
+UnderlinePosition -98
+UnderlineThickness 54
+Version 001.004
+Notice Copyright (c) 1985, 1987, 1988, 1989 Adobe Systems Incorporated.  All rights reserved.ITC Zapf Dingbats is a registered trademark of International Typeface Corporation.
+EncodingScheme FontSpecific
+StartCharMetrics 202
+C 32 ; WX 278 ; N space ; B 0 0 0 0 ;
+C 33 ; WX 974 ; N a1 ; B 35 72 939 621 ;
+C 34 ; WX 961 ; N a2 ; B 35 81 927 611 ;
+C 35 ; WX 974 ; N a202 ; B 35 72 939 621 ;
+C 36 ; WX 980 ; N a3 ; B 35 0 945 692 ;
+C 37 ; WX 719 ; N a4 ; B 34 139 685 566 ;
+C 38 ; WX 789 ; N a5 ; B 35 -14 755 705 ;
+C 39 ; WX 790 ; N a119 ; B 35 -14 755 705 ;
+C 40 ; WX 791 ; N a118 ; B 35 -13 761 705 ;
+C 41 ; WX 690 ; N a117 ; B 35 138 655 553 ;
+C 42 ; WX 960 ; N a11 ; B 35 123 925 568 ;
+C 43 ; WX 939 ; N a12 ; B 35 134 904 559 ;
+C 44 ; WX 549 ; N a13 ; B 29 -11 516 705 ;
+C 45 ; WX 855 ; N a14 ; B 34 59 820 632 ;
+C 46 ; WX 911 ; N a15 ; B 35 50 876 642 ;
+C 47 ; WX 933 ; N a16 ; B 35 139 899 550 ;
+C 48 ; WX 911 ; N a105 ; B 35 50 876 642 ;
+C 49 ; WX 945 ; N a17 ; B 35 139 909 553 ;
+C 50 ; WX 974 ; N a18 ; B 35 104 938 587 ;
+C 51 ; WX 755 ; N a19 ; B 34 -13 721 705 ;
+C 52 ; WX 846 ; N a20 ; B 36 -14 811 705 ;
+C 53 ; WX 762 ; N a21 ; B 35 0 727 692 ;
+C 54 ; WX 761 ; N a22 ; B 35 0 727 692 ;
+C 55 ; WX 571 ; N a23 ; B -1 -68 571 661 ;
+C 56 ; WX 677 ; N a24 ; B 36 -13 642 705 ;
+C 57 ; WX 763 ; N a25 ; B 35 0 728 692 ;
+C 58 ; WX 760 ; N a26 ; B 35 0 726 692 ;
+C 59 ; WX 759 ; N a27 ; B 35 0 725 692 ;
+C 60 ; WX 754 ; N a28 ; B 35 0 720 692 ;
+C 61 ; WX 494 ; N a6 ; B 35 0 460 692 ;
+C 62 ; WX 552 ; N a7 ; B 35 0 517 692 ;
+C 63 ; WX 537 ; N a8 ; B 35 0 503 692 ;
+C 64 ; WX 577 ; N a9 ; B 35 96 542 596 ;
+C 65 ; WX 692 ; N a10 ; B 35 -14 657 705 ;
+C 66 ; WX 786 ; N a29 ; B 35 -14 751 705 ;
+C 67 ; WX 788 ; N a30 ; B 35 -14 752 705 ;
+C 68 ; WX 788 ; N a31 ; B 35 -14 753 705 ;
+C 69 ; WX 790 ; N a32 ; B 35 -14 756 705 ;
+C 70 ; WX 793 ; N a33 ; B 35 -13 759 705 ;
+C 71 ; WX 794 ; N a34 ; B 35 -13 759 705 ;
+C 72 ; WX 816 ; N a35 ; B 35 -14 782 705 ;
+C 73 ; WX 823 ; N a36 ; B 35 -14 787 705 ;
+C 74 ; WX 789 ; N a37 ; B 35 -14 754 705 ;
+C 75 ; WX 841 ; N a38 ; B 35 -14 807 705 ;
+C 76 ; WX 823 ; N a39 ; B 35 -14 789 705 ;
+C 77 ; WX 833 ; N a40 ; B 35 -14 798 705 ;
+C 78 ; WX 816 ; N a41 ; B 35 -13 782 705 ;
+C 79 ; WX 831 ; N a42 ; B 35 -14 796 705 ;
+C 80 ; WX 923 ; N a43 ; B 35 -14 888 705 ;
+C 81 ; WX 744 ; N a44 ; B 35 0 710 692 ;
+C 82 ; WX 723 ; N a45 ; B 35 0 688 692 ;
+C 83 ; WX 749 ; N a46 ; B 35 0 714 692 ;
+C 84 ; WX 790 ; N a47 ; B 34 -14 756 705 ;
+C 85 ; WX 792 ; N a48 ; B 35 -14 758 705 ;
+C 86 ; WX 695 ; N a49 ; B 35 -14 661 706 ;
+C 87 ; WX 776 ; N a50 ; B 35 -6 741 699 ;
+C 88 ; WX 768 ; N a51 ; B 35 -7 734 699 ;
+C 89 ; WX 792 ; N a52 ; B 35 -14 757 705 ;
+C 90 ; WX 759 ; N a53 ; B 35 0 725 692 ;
+C 91 ; WX 707 ; N a54 ; B 35 -13 672 704 ;
+C 92 ; WX 708 ; N a55 ; B 35 -14 672 705 ;
+C 93 ; WX 682 ; N a56 ; B 35 -14 647 705 ;
+C 94 ; WX 701 ; N a57 ; B 35 -14 666 705 ;
+C 95 ; WX 826 ; N a58 ; B 35 -14 791 705 ;
+C 96 ; WX 815 ; N a59 ; B 35 -14 780 705 ;
+C 97 ; WX 789 ; N a60 ; B 35 -14 754 705 ;
+C 98 ; WX 789 ; N a61 ; B 35 -14 754 705 ;
+C 99 ; WX 707 ; N a62 ; B 34 -14 673 705 ;
+C 100 ; WX 687 ; N a63 ; B 36 0 651 692 ;
+C 101 ; WX 696 ; N a64 ; B 35 0 661 691 ;
+C 102 ; WX 689 ; N a65 ; B 35 0 655 692 ;
+C 103 ; WX 786 ; N a66 ; B 34 -14 751 705 ;
+C 104 ; WX 787 ; N a67 ; B 35 -14 752 705 ;
+C 105 ; WX 713 ; N a68 ; B 35 -14 678 705 ;
+C 106 ; WX 791 ; N a69 ; B 35 -14 756 705 ;
+C 107 ; WX 785 ; N a70 ; B 36 -14 751 705 ;
+C 108 ; WX 791 ; N a71 ; B 35 -14 757 705 ;
+C 109 ; WX 873 ; N a72 ; B 35 -14 838 705 ;
+C 110 ; WX 761 ; N a73 ; B 35 0 726 692 ;
+C 111 ; WX 762 ; N a74 ; B 35 0 727 692 ;
+C 112 ; WX 762 ; N a203 ; B 35 0 727 692 ;
+C 113 ; WX 759 ; N a75 ; B 35 0 725 692 ;
+C 114 ; WX 759 ; N a204 ; B 35 0 725 692 ;
+C 115 ; WX 892 ; N a76 ; B 35 0 858 705 ;
+C 116 ; WX 892 ; N a77 ; B 35 -14 858 692 ;
+C 117 ; WX 788 ; N a78 ; B 35 -14 754 705 ;
+C 118 ; WX 784 ; N a79 ; B 35 -14 749 705 ;
+C 119 ; WX 438 ; N a81 ; B 35 -14 403 705 ;
+C 120 ; WX 138 ; N a82 ; B 35 0 104 692 ;
+C 121 ; WX 277 ; N a83 ; B 35 0 242 692 ;
+C 122 ; WX 415 ; N a84 ; B 35 0 380 692 ;
+C 123 ; WX 392 ; N a97 ; B 35 263 357 705 ;
+C 124 ; WX 392 ; N a98 ; B 34 263 357 705 ;
+C 125 ; WX 668 ; N a99 ; B 35 263 633 705 ;
+C 126 ; WX 668 ; N a100 ; B 36 263 634 705 ;
+C 161 ; WX 732 ; N a101 ; B 35 -143 697 806 ;
+C 162 ; WX 544 ; N a102 ; B 56 -14 488 706 ;
+C 163 ; WX 544 ; N a103 ; B 34 -14 508 705 ;
+C 164 ; WX 910 ; N a104 ; B 35 40 875 651 ;
+C 165 ; WX 667 ; N a106 ; B 35 -14 633 705 ;
+C 166 ; WX 760 ; N a107 ; B 35 -14 726 705 ;
+C 167 ; WX 760 ; N a108 ; B 0 121 758 569 ;
+C 168 ; WX 776 ; N a112 ; B 35 0 741 705 ;
+C 169 ; WX 595 ; N a111 ; B 34 -14 560 705 ;
+C 170 ; WX 694 ; N a110 ; B 35 -14 659 705 ;
+C 171 ; WX 626 ; N a109 ; B 34 0 591 705 ;
+C 172 ; WX 788 ; N a120 ; B 35 -14 754 705 ;
+C 173 ; WX 788 ; N a121 ; B 35 -14 754 705 ;
+C 174 ; WX 788 ; N a122 ; B 35 -14 754 705 ;
+C 175 ; WX 788 ; N a123 ; B 35 -14 754 705 ;
+C 176 ; WX 788 ; N a124 ; B 35 -14 754 705 ;
+C 177 ; WX 788 ; N a125 ; B 35 -14 754 705 ;
+C 178 ; WX 788 ; N a126 ; B 35 -14 754 705 ;
+C 179 ; WX 788 ; N a127 ; B 35 -14 754 705 ;
+C 180 ; WX 788 ; N a128 ; B 35 -14 754 705 ;
+C 181 ; WX 788 ; N a129 ; B 35 -14 754 705 ;
+C 182 ; WX 788 ; N a130 ; B 35 -14 754 705 ;
+C 183 ; WX 788 ; N a131 ; B 35 -14 754 705 ;
+C 184 ; WX 788 ; N a132 ; B 35 -14 754 705 ;
+C 185 ; WX 788 ; N a133 ; B 35 -14 754 705 ;
+C 186 ; WX 788 ; N a134 ; B 35 -14 754 705 ;
+C 187 ; WX 788 ; N a135 ; B 35 -14 754 705 ;
+C 188 ; WX 788 ; N a136 ; B 35 -14 754 705 ;
+C 189 ; WX 788 ; N a137 ; B 35 -14 754 705 ;
+C 190 ; WX 788 ; N a138 ; B 35 -14 754 705 ;
+C 191 ; WX 788 ; N a139 ; B 35 -14 754 705 ;
+C 192 ; WX 788 ; N a140 ; B 35 -14 754 705 ;
+C 193 ; WX 788 ; N a141 ; B 35 -14 754 705 ;
+C 194 ; WX 788 ; N a142 ; B 35 -14 754 705 ;
+C 195 ; WX 788 ; N a143 ; B 35 -14 754 705 ;
+C 196 ; WX 788 ; N a144 ; B 35 -14 754 705 ;
+C 197 ; WX 788 ; N a145 ; B 35 -14 754 705 ;
+C 198 ; WX 788 ; N a146 ; B 35 -14 754 705 ;
+C 199 ; WX 788 ; N a147 ; B 35 -14 754 705 ;
+C 200 ; WX 788 ; N a148 ; B 35 -14 754 705 ;
+C 201 ; WX 788 ; N a149 ; B 35 -14 754 705 ;
+C 202 ; WX 788 ; N a150 ; B 35 -14 754 705 ;
+C 203 ; WX 788 ; N a151 ; B 35 -14 754 705 ;
+C 204 ; WX 788 ; N a152 ; B 35 -14 754 705 ;
+C 205 ; WX 788 ; N a153 ; B 35 -14 754 705 ;
+C 206 ; WX 788 ; N a154 ; B 35 -14 754 705 ;
+C 207 ; WX 788 ; N a155 ; B 35 -14 754 705 ;
+C 208 ; WX 788 ; N a156 ; B 35 -14 754 705 ;
+C 209 ; WX 788 ; N a157 ; B 35 -14 754 705 ;
+C 210 ; WX 788 ; N a158 ; B 35 -14 754 705 ;
+C 211 ; WX 788 ; N a159 ; B 35 -14 754 705 ;
+C 212 ; WX 894 ; N a160 ; B 35 58 860 634 ;
+C 213 ; WX 838 ; N a161 ; B 35 152 803 540 ;
+C 214 ; WX 1016 ; N a163 ; B 34 152 981 540 ;
+C 215 ; WX 458 ; N a164 ; B 35 -127 422 820 ;
+C 216 ; WX 748 ; N a196 ; B 35 94 698 597 ;
+C 217 ; WX 924 ; N a165 ; B 35 140 890 552 ;
+C 218 ; WX 748 ; N a192 ; B 35 94 698 597 ;
+C 219 ; WX 918 ; N a166 ; B 35 166 884 526 ;
+C 220 ; WX 927 ; N a167 ; B 35 32 892 660 ;
+C 221 ; WX 928 ; N a168 ; B 35 129 891 562 ;
+C 222 ; WX 928 ; N a169 ; B 35 128 893 563 ;
+C 223 ; WX 834 ; N a170 ; B 35 155 799 537 ;
+C 224 ; WX 873 ; N a171 ; B 35 93 838 599 ;
+C 225 ; WX 828 ; N a172 ; B 35 104 791 588 ;
+C 226 ; WX 924 ; N a173 ; B 35 98 889 594 ;
+C 227 ; WX 924 ; N a162 ; B 35 98 889 594 ;
+C 228 ; WX 917 ; N a174 ; B 35 0 882 692 ;
+C 229 ; WX 930 ; N a175 ; B 35 84 896 608 ;
+C 230 ; WX 931 ; N a176 ; B 35 84 896 608 ;
+C 231 ; WX 463 ; N a177 ; B 35 -99 429 791 ;
+C 232 ; WX 883 ; N a178 ; B 35 71 848 623 ;
+C 233 ; WX 836 ; N a179 ; B 35 44 802 648 ;
+C 234 ; WX 836 ; N a193 ; B 35 44 802 648 ;
+C 235 ; WX 867 ; N a180 ; B 35 101 832 591 ;
+C 236 ; WX 867 ; N a199 ; B 35 101 832 591 ;
+C 237 ; WX 696 ; N a181 ; B 35 44 661 648 ;
+C 238 ; WX 696 ; N a200 ; B 35 44 661 648 ;
+C 239 ; WX 874 ; N a182 ; B 35 77 840 619 ;
+C 241 ; WX 874 ; N a201 ; B 35 73 840 615 ;
+C 242 ; WX 760 ; N a183 ; B 35 0 725 692 ;
+C 243 ; WX 946 ; N a184 ; B 35 160 911 533 ;
+C 244 ; WX 771 ; N a197 ; B 34 37 736 655 ;
+C 245 ; WX 865 ; N a185 ; B 35 207 830 481 ;
+C 246 ; WX 771 ; N a194 ; B 34 37 736 655 ;
+C 247 ; WX 888 ; N a198 ; B 34 -19 853 712 ;
+C 248 ; WX 967 ; N a186 ; B 35 124 932 568 ;
+C 249 ; WX 888 ; N a195 ; B 34 -19 853 712 ;
+C 250 ; WX 831 ; N a187 ; B 35 113 796 579 ;
+C 251 ; WX 873 ; N a188 ; B 36 118 838 578 ;
+C 252 ; WX 927 ; N a189 ; B 35 150 891 542 ;
+C 253 ; WX 970 ; N a190 ; B 35 76 931 616 ;
+C 254 ; WX 918 ; N a191 ; B 34 99 884 593 ;
+C -1 ; WX 410 ; N a86 ; B 35 0 375 692 ;
+C -1 ; WX 509 ; N a85 ; B 35 0 475 692 ;
+C -1 ; WX 334 ; N a95 ; B 35 0 299 692 ;
+C -1 ; WX 509 ; N a205 ; B 35 0 475 692 ;
+C -1 ; WX 390 ; N a89 ; B 35 -14 356 705 ;
+C -1 ; WX 234 ; N a87 ; B 35 -14 199 705 ;
+C -1 ; WX 276 ; N a91 ; B 35 0 242 692 ;
+C -1 ; WX 390 ; N a90 ; B 35 -14 355 705 ;
+C -1 ; WX 410 ; N a206 ; B 35 0 375 692 ;
+C -1 ; WX 317 ; N a94 ; B 35 0 283 692 ;
+C -1 ; WX 317 ; N a93 ; B 35 0 283 692 ;
+C -1 ; WX 276 ; N a92 ; B 35 0 242 692 ;
+C -1 ; WX 334 ; N a96 ; B 35 0 299 692 ;
+C -1 ; WX 234 ; N a88 ; B 35 -14 199 705 ;
+EndCharMetrics
+EndFontMetrics
diff --git a/gnu.gpl b/gnu.gpl
new file mode 100644
index 0000000..0c7dfb9
--- /dev/null
+++ b/gnu.gpl
@@ -0,0 +1,344 @@
+From rms@santafe.edu Thu Mar 12 19:35:41 1998
+From: Richard Stallman <rms@santafe.edu>
+To: jeff@cs.usyd.edu.au
+
+		    GNU GENERAL PUBLIC LICENSE
+		       Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+     59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+			    Preamble
+
+  The licenses for most software are designed to take away your
+freedom to share and change it.  By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users.  This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it.  (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.)  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+  To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have.  You must make sure that they, too, receive or can get the
+source code.  And you must show them these terms so they know their
+rights.
+
+  We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+  Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software.  If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+  Finally, any free program is threatened constantly by software
+patents.  We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary.  To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+		    GNU GENERAL PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License.  The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language.  (Hereinafter, translation is included without limitation in
+the term "modification".)  Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope.  The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+  1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+  2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+    a) You must cause the modified files to carry prominent notices
+    stating that you changed the files and the date of any change.
+
+    b) You must cause any work that you distribute or publish, that in
+    whole or in part contains or is derived from the Program or any
+    part thereof, to be licensed as a whole at no charge to all third
+    parties under the terms of this License.
+
+    c) If the modified program normally reads commands interactively
+    when run, you must cause it, when started running for such
+    interactive use in the most ordinary way, to print or display an
+    announcement including an appropriate copyright notice and a
+    notice that there is no warranty (or else, saying that you provide
+    a warranty) and that users may redistribute the program under
+    these conditions, and telling the user how to view a copy of this
+    License.  (Exception: if the Program itself is interactive but
+    does not normally print such an announcement, your work based on
+    the Program is not required to print an announcement.)
+
+These requirements apply to the modified work as a whole.  If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works.  But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+  3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+    a) Accompany it with the complete corresponding machine-readable
+    source code, which must be distributed under the terms of Sections
+    1 and 2 above on a medium customarily used for software interchange; or,
+
+    b) Accompany it with a written offer, valid for at least three
+    years, to give any third party, for a charge no more than your
+    cost of physically performing source distribution, a complete
+    machine-readable copy of the corresponding source code, to be
+    distributed under the terms of Sections 1 and 2 above on a medium
+    customarily used for software interchange; or,
+
+    c) Accompany it with the information you received as to the offer
+    to distribute corresponding source code.  (This alternative is
+    allowed only for noncommercial distribution and only if you
+    received the program in object code or executable form with such
+    an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it.  For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable.  However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+
+  4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License.  Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+  5. You are not required to accept this License, since you have not
+signed it.  However, nothing else grants you permission to modify or
+distribute the Program or its derivative works.  These actions are
+prohibited by law if you do not accept this License.  Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+  6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions.  You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+  7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all.  For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices.  Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+
+  8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded.  In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+  9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number.  If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation.  If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+  10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission.  For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this.  Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+			    NO WARRANTY
+
+  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+		     END OF TERMS AND CONDITIONS
+
+	    How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) 19yy  <name of author>
+
+    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 2 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, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+    Gnomovision version 69, Copyright (C) 19yy name of author
+    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  Here is a sample; alter the names:
+
+  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+  `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+  <signature of Ty Coon>, 1 April 1989
+  Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs.  If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library.  If this is what you want to do, use the GNU Library General
+Public License instead of this License.
diff --git a/hyph/README b/hyph/README
new file mode 100644
index 0000000..84409bb
--- /dev/null
+++ b/hyph/README
@@ -0,0 +1,124 @@
+Format of Lout hyphenation information files
+
+Jeffrey H. Kingston
+22 December 1992
+21 September 1994
+6 June 1995
+3 April 1996
+
+Basser Lout Version 3 incorporates automatic hyphenation using the
+method introduced by TeX (see Appendix H of the TeXBook by D. E. Knuth),
+with support for multilingual hyphenation.  No special action is required
+to install hyphenation unless it is desired to change the hyphenation
+information that controls it.
+
+There is one hyphenation information file for each language, and it is
+named in the langdef of that language.  For example:
+
+	langdef German Deutsch { german }
+
+(There will usually be other information between the hyphenation file
+name and the closing brace, not relevant here.)  This example means that
+unpacked Lout hyphenation file german.lh or its packed equivalent
+german.lp (see below) is to be used when hyphenating German words.  These
+files are kept in the Lout system hyphenation directory (this directory).  If
+a language is desired but no hyphenation information file is available, the
+file name may be replaced with -, and then the language will be defined but
+hyphenation in that language will never be attempted.  Another possibility
+is to include a placeholder file for the language (see below).
+
+The first time on any run that German hyphenation is required, Lout will
+search the directories of the hyphenation path for a binary file called
+german.lp, which contains a binary form of the hyphenation patterns in
+german.lh, modified so that the file may be shared by big-endian and
+little-endian machines.  If german.lp cannot be found, Lout then searches
+for the text file german.lh instead, and uses it to construct german.lp.
+To change the German hyphenation patterns, delete german.lp and modify
+german.lh; the rest is automatic.
+
+Alternatively, if lout is invoked with the -x flag and the langdef line
+above appears in its input, it will read german.lh and produce german.lp
+immediately.  This is intended for setting up: it is good to create all
+these packed files at setup time, since a subsequent lout run that needs them
+will not have write permission in the Lout system hyphenation directory.
+
+An unpacked Lout hyphenation information (.lh) file mainly contains a
+long list of TeX hyphenation patterns.  It must begin with either
+
+    Lout hyphenation information
+
+or
+    Lout hyphenation placeholder
+
+alone on the first line.  In the second case, it is understood that the
+file is a placeholder (i.e. a stub file which might be overwritten with
+a real file in the future), and Lout does not read any futher; the effect
+is that Lout will not hyphenate this language, but not complain about the
+absence of the file either.
+
+In the non-placeholder case, following the header line comes the "Classes:"
+heading followed by the character classes.  For example:
+
+    Classes:
+    @!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+    aA
+    bB
+    cC
+    ...
+    yY
+    zZ
+
+The hyphenation process treats the characters in each class as identical
+(so the classes above ensure that the distinction between upper and lower
+case is ignored).  By definition, the characters of the first class are
+"non-letters", and the characters of the remaining classes are "letters".
+Notice that these are actual characters, not character names:  hyphenation
+files are encoding-specific.
+
+Next comes the "Exceptions:" heading followed by the exceptions, which
+are words (composed of letters and "-" only) whose hyphenation is to be
+treated as a special case.  For example:
+
+    Exceptions:
+    ta-ble
+    phil-an-thropic
+
+These words may be hyphenated in the places shown by the "-" characters.
+Character classes are in effect here (Table will be hyphenated as Ta-ble).
+If there are no exceptions, "Exceptions:" may be omitted.
+
+Next comes an optional LengthLimit section, which tells Lout to ignore
+some patterns.  For example,
+
+    LengthLimit:
+    4
+
+means that patterns containing more than 4 letters (note that
+. counts as a letter) are to be ignored.  The purpose is to discard
+the least important patterns from files that are too large for Lout
+to handle otherwise.  None of the files actually use this at present,
+but hyphenation files seem to be getting larger and larger, and if
+any whoppers come along they might have to be trimmed in this way.
+
+Finally comes the "Patterns:" heading followed by the list of TeX
+hyphenation patterns.  Apart from the weighting digits, the patterns
+should contain only letters.  Lout understands some TeX escape sequences
+e.g. it will accept \^e anywhere in a hyphenation file as the ecircumflex
+character.
+
+The file may contain comments, which begin with % (either at the start
+of a line or after a white space character) and go to end of line.  The
+headings, classes, exceptions and patterns are separated by arbitrary
+white space.
+
+Briefly, hyphenation of a word works like this.  If the word contains a
+character not found in any character class, it will not be hyphenated.
+Otherwise the word is analysed into sequences of letters separated by
+sequences of non-letters.  Each sequence of five or more letters is
+then matched, either with an exception or else with the hyphenation
+patterns, and hyphenated.  The hyphen character "-" is treated specially.
+
+Extreme lengths were resorted to to compress the .lp file as much as
+possible.  Files significantly larger than german.lh are likely to cause
+Lout to abort with an error message.  Please contact jeff@cs.su.oz.au if
+you have problems with this or anything else.
diff --git a/hyph/czech.lh b/hyph/czech.lh
new file mode 100644
index 0000000..8527abe
--- /dev/null
+++ b/hyph/czech.lh
@@ -0,0 +1,4582 @@
+Lout hyphenation information
+%
+%  This is a Czech hyphenation file created by Jeff Kingston
+%  on 16 July 1995 from a TeX file supplied by Pavel Vana.
+%  The only comment received with the file was this one:
+%
+%     Czech hyphenation patterns - Lala 8.11.1991
+%
+%  Like Czech itself, this file is encoded in the Latin2
+%  character set.  Czech has 15 accented letters, each with
+%  upper-case and lower-case forms:
+%
+%     PostScript    Latin2     Latin2    Latin2
+%     name          decimal    octal     literal
+%                   code       code	 character
+%
+%     aacute        225        341       á
+%     ccaron        232        350       è
+%     dcaron        239        357       ï
+%     eacute        233        351       é
+%     ecaron        236        354       ì
+%     iacute        237        355       í
+%     ncaron        242        362       ò
+%     oacute        243        363       ó
+%     rcaron        248        370       ø
+%     scaron        185        271       ¹
+%     tcaron        187        273       »
+%     uacute        250        372       ú
+%     uring         249        371       ù
+%     yacute        253        375       ý
+%     zcaron        190        276       ¾
+%
+%     Aacute        193        301       Á
+%     Ccaron        200        310       È
+%     Dcaron        207        317       Ï
+%     Eacute        201        311       É
+%     Ecaron        204        314       Ì
+%     Iacute        205        315       Í
+%     Ncaron        210        322       Ò
+%     Oacute        211        323       Ó
+%     Rcaron        216        330       Ø
+%     Scaron        169        251       ©
+%     Tcaron        171        253       «
+%     Uacute        218        332       Ú
+%     Uring         217        331       Ù
+%     Yacute        221        335       Ý
+%     Zcaron        174        256       ®
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+áÁ
+èÈ
+ïÏ
+éÉ
+ìÌ
+íÍ
+òÒ
+óÓ
+øØ
+¹©
+»«
+úÚ
+ùÙ
+ýÝ
+¾®
+
+Patterns:
+%samohláska-souhláska-samohláska
+a1¾a
+a1¹a
+a1èa
+a1øa
+a1ca
+a1ja
+a1ïa
+a1»a
+a1òa
+a1ha
+a1cha
+a1ka
+a1ra
+a1da
+a1ta
+a1na
+a1¾e
+a1¹e
+a1èe
+a1øe
+a1ce
+a1je
+a1he
+a1che
+a1ke
+a1re
+a1de
+a1te
+a1ne
+a1ri
+a1¾i
+a1¹i
+a1èi
+a1øi
+a1ci
+a1ji
+a1di
+a1ti
+a1ni
+a1¾o
+a1¹o
+a1èo
+a1øo
+a1co
+a1jo
+a1ïo
+a1»o
+a1òo
+a1ho
+a1cho
+a1ko
+a1ro
+a1do
+a1to
+a1no
+a1¾u
+a1¹u
+a1èu
+a1øu
+a1cu
+a1ju
+a1ïu
+a1»u
+a1òu
+a1hu
+a1chu
+a1ku
+a1ru
+a1du
+a1tu
+a1nu
+a1hy
+a1chy
+a1ky
+a1ry
+a1dy
+a1ty
+a1ny
+a1¾á
+a1¹á
+a1èá
+a1øá
+a1cá
+a1já
+a1ïá
+a1ȇ
+a1òá
+a1há
+a1chá
+a1ká
+a1rá
+a1dá
+a1tá
+a1ná
+a1¾é
+a1¹é
+a1èé
+a1øé
+a1cé
+a1jé
+a1hé
+a1ché
+a1ké
+a1ré
+a1dé
+a1té
+a1né
+a1¾í
+a1¹í
+a1èí
+a1øí
+a1cí
+a1jí
+a1dí
+a1tí
+a1ní
+a1kó
+a1ró
+a1dó
+a1tó
+a1nó
+a1hý
+a1chý
+a1ký
+a1rý
+a1dý
+a1tý
+a1ný
+a1dì
+a1tì
+a1nì
+e1¾a
+e1¹a
+e1èa
+e1øa
+e1ca
+e1ja
+e1ïa
+e1»a
+e1òa
+e1ha
+e1cha
+e1ka
+e1ra
+e1da
+e1ta
+e1na
+e1¾e
+e1¹e
+e1èe
+e1øe
+e1ce
+e1je
+e1he
+e1che
+e1ke
+e1re
+e1de
+e1te
+e1ne
+e1¾i
+e1¹i
+e1èi
+e1øi
+e1ci
+e1ji
+e1di
+e1ti
+e1ni
+e1¾o
+e1¹o
+e1èo
+e1øo
+e1co
+e1jo
+e1ïo
+e1»o
+e1òo
+e1ho
+e1cho
+e1ko
+e1ro
+e1do
+e1to
+e1no
+e1¾u
+e1¹u
+e1èu
+e1øu
+e1cu
+e1ju
+e1ïu
+e1»u
+e1òu
+e1hu
+e1chu
+e1ku
+e1ru
+e1du
+e1tu
+e1nu
+e1hy
+e1chy
+e1ky
+e1ry
+e1dy
+e1ty
+e1ny
+e1¾á
+e1¹á
+e1èá
+e1øá
+e1cá
+e1já
+e1há
+e1chá
+e1ká
+e1rá
+e1dá
+e1tá
+e1ná
+e1¾é
+e1¹é
+e1èé
+e1øé
+e1cé
+e1jé
+e1hé
+e1ché
+e1ké
+e1ré
+e1dé
+e1té
+e1né
+e1¾í
+e1¹í
+e1èí
+e1øí
+e1cí
+e1jí
+e1dí
+e1tí
+e1ní
+e1hý
+e1chý
+e1ký
+e1rý
+e1dý
+e1tý
+e1ný
+e1dì
+e1tì
+e1nì
+i1¾a
+i1¹a
+i1èa
+i1øa
+i1ca
+i1ja
+i1ïa
+i1»a
+i1òa
+i1ha
+i1cha
+i1ka
+i1ra
+i1da
+i1ta
+i1na
+i1¾e
+i1¹e
+i1èe
+i1øe
+i1ce
+i1je
+i1he
+i1che
+i1ke
+i1re
+i1de
+i1te
+i1ne
+i1¾i
+i1¹i
+i1èi
+i1øi
+i1ci
+i1ji
+i1di
+i1ti
+i1ni
+i1¾o
+i1¹o
+i1èo
+i1øo
+i1co
+i1jo
+i1ïo
+i1»o
+i1òo
+i1ho
+i1cho
+i1ko
+i1ro
+i1do
+i1to
+i1no
+i1¾u
+i1¹u
+i1èu
+i1øu
+i1cu
+i1ju
+i1ïu
+i1»u
+i1òu
+i1hu
+i1chu
+i1ku
+i1ru
+i1du
+i1tu
+i1nu
+i1hy
+i1chy
+i1ky
+i1ry
+i1dy
+i1ty
+i1ny
+i1¾á
+i1¹á
+i1èá
+i1øá
+i1cá
+i1já
+i1ïá
+i1ȇ
+i1òá
+i1há
+i1chá
+i1ká
+i1rá
+i1dá
+i1tá
+i1ná
+i1¾é
+i1¹é
+i1èé
+i1øé
+i1cé
+i1jé
+i1hé
+i1ché
+i1ké
+i1ré
+i1dé
+i1té
+i1né
+i1¾í
+i1¹í
+i1èí
+i1øí
+i1cí
+i1jí
+i1dí
+i1tí
+i1ní
+i1kó
+i1ró
+i1hý
+i1chý
+i1ký
+i1rý
+i1dý
+i1tý
+i1ný
+i1dì
+i1tì
+i1nì
+o1¾a
+o1¹a
+o1èa
+o1øa
+o1ca
+o1ja
+o1ïa
+o1»a
+o1òa
+o1ha
+o1cha
+o1ka
+o1ra
+o1da
+o1ta
+o1na
+o1¾e
+o1¹e
+o1èe
+o1øe
+o1ce
+o1je
+o1he
+o1che
+o1ke
+o1re
+o1de
+o1te
+o1ne
+o1¾i
+o1¹i
+o1èi
+o1øi
+o1ci
+o1ji
+o1di
+o1ti
+o1ni
+o1¾o
+o1¹o
+o1èo
+o1øo
+o1co
+o1jo
+o1ïo
+o1»o
+o1òo
+o1ho
+o1cho
+o1ko
+o1ro
+o1do
+o1to
+o1no
+o1¾u
+o1¹u
+o1èu
+o1øu
+o1cu
+o1ju
+o1ïu
+o1»u
+o1òu
+o1hu
+o1chu
+o1ku
+o1ru
+o1du
+o1tu
+o1nu
+o1hy
+o1chy
+o1ky
+o1ry
+o1dy
+o1ty
+o1ny
+o1¾á
+o1¹á
+o1èá
+o1øá
+o1cá
+o1já
+o1há
+o1chá
+o1ká
+o1rá
+o1dá
+o1tá
+o1ná
+o1¾é
+o1¹é
+o1èé
+o1øé
+o1cé
+o1jé
+o1hé
+o1ché
+o1ké
+o1ré
+o1dé
+o1té
+o1né
+o1¾í
+o1¹í
+o1èí
+o1øí
+o1cí
+o1jí
+o1dí
+o1tí
+o1ní
+o1hý
+o1chý
+o1ký
+o1rý
+o1dý
+o1tý
+o1ný
+o1dì
+o1tì
+o1nì
+u1¾a
+u1¹a
+u1èa
+u1øa
+u1ca
+u1ja
+u1ïa
+u1»a
+u1òa
+u1ha
+u1cha
+u1ka
+u1ra
+u1da
+u1ta
+u1na
+u1¾e
+u1¹e
+u1èe
+u1øe
+u1ce
+u1je
+u1he
+u1che
+u1ke
+u1re
+u1de
+u1te
+u1ne
+u1¾i
+u1¹i
+u1èi
+u1øi
+u1ci
+u1ji
+u1di
+u1ti
+u1ni
+u1¾o
+u1¹o
+u1èo
+u1øo
+u1co
+u1jo
+u1ïo
+u1»o
+u1òo
+u1ho
+u1cho
+u1ko
+u1ro
+u1do
+u1to
+u1no
+u1¾u
+u1¹u
+u1èu
+u1øu
+u1cu
+u1ju
+u1ïu
+u1»u
+u1òu
+u1hu
+u1chu
+u1ku
+u1ru
+u1du
+u1tu
+u1nu
+u1hy
+u1chy
+u1ky
+u1ry
+u1dy
+u1ty
+u1ny
+u1¾á
+u1¹á
+u1èá
+u1øá
+u1cá
+u1já
+u1ïá
+u1ȇ
+u1òá
+u1há
+u1chá
+u1ká
+u1rá
+u1dá
+u1tá
+u1ná
+u1¾é
+u1¹é
+u1èé
+u1øé
+u1cé
+u1jé
+u1hé
+u1ché
+u1ké
+u1ré
+u1dé
+u1té
+u1né
+u1¾í
+u1¹í
+u1èí
+u1øí
+u1cí
+u1jí
+u1dí
+u1tí
+u1ní
+u1hý
+u1chý
+u1ký
+u1rý
+u1dý
+u1tý
+u1ný
+u1dì
+u1tì
+u1nì
+y1¾a
+y1¹a
+y1èa
+y1øa
+y1ca
+y1ja
+y1ha
+y1cha
+y1ka
+y1ra
+y1da
+y1ta
+y1na
+y1¾e
+y1¹e
+y1èe
+y1øe
+y1ce
+y1je
+y1he
+y1che
+y1ke
+y1re
+y1de
+y1te
+y1ne
+y1¾i
+y1¹i
+y1èi
+y1øi
+y1ci
+y1ji
+y1di
+y1ti
+y1ni
+y1¾o
+y1¹o
+y1èo
+y1øo
+y1co
+y1jo
+y1òo
+y1ho
+y1cho
+y1ko
+y1ro
+y1do
+y1to
+y1no
+y1¾u
+y1¹u
+y1èu
+y1øu
+y1cu
+y1ju
+y1hu
+y1chu
+y1ku
+y1ru
+y1du
+y1tu
+y1nu
+y1hy
+y1chy
+y1ky
+y1ry
+y1dy
+y1ty
+y1ny
+y1¾á
+y1¹á
+y1èá
+y1øá
+y1cá
+y1já
+y1há
+y1chá
+y1ká
+y1rá
+y1dá
+y1tá
+y1ná
+y1¾é
+y1¹é
+y1èé
+y1øé
+y1cé
+y1jé
+y1hé
+y1ché
+y1ké
+y1ré
+y1dé
+y1té
+y1né
+y1¾í
+y1¹í
+y1èí
+y1øí
+y1cí
+y1jí
+y1dí
+y1tí
+y1ní
+y1hý
+y1chý
+y1ký
+y1rý
+y1dý
+y1tý
+y1ný
+y1dì
+y1tì
+y1nì
+á1¾a
+á1¹a
+á1èa
+á1øa
+á1ca
+á1ja
+á1ïa
+á1»a
+á1òa
+á1ha
+á1cha
+á1ka
+á1ra
+á1da
+á1ta
+á1na
+á1¾e
+á1¹e
+á1èe
+á1øe
+á1ce
+á1je
+á1he
+á1che
+á1ke
+á1re
+á1de
+á1te
+á1ne
+á1¾i
+á1¹i
+á1èi
+á1øi
+á1ci
+á1ji
+á1di
+á1ti
+á1ni
+á1¾o
+á1¹o
+á1èo
+á1øo
+á1co
+á1jo
+á1ïo
+á1»o
+á1òo
+á1ho
+á1cho
+á1ko
+á1ro
+á1do
+á1to
+á1no
+á1¾u
+á1¹u
+á1èu
+á1øu
+á1cu
+á1ju
+á1ïu
+á1»u
+á1òu
+á1hu
+á1chu
+á1ku
+á1ru
+á1du
+á1tu
+á1nu
+á1hy
+á1chy
+á1ky
+á1ry
+á1dy
+á1ty
+á1ny
+á1¾á
+á1¹á
+á1èá
+á1øá
+á1cá
+á1já
+á1há
+á1chá
+á1ká
+á1rá
+á1dá
+á1tá
+á1ná
+á1¾é
+á1¹é
+á1èé
+á1øé
+á1cé
+á1jé
+á1hé
+á1ché
+á1ké
+á1ré
+á1dé
+á1té
+á1né
+á1¾í
+á1¹í
+á1èí
+á1øí
+á1cí
+á1jí
+á1dí
+á1tí
+á1ní
+á1hý
+á1chý
+á1ký
+á1rý
+á1dý
+á1tý
+á1ný
+á1dì
+á1tì
+á1nì
+é1¾a
+é1¹a
+é1èa
+é1øa
+é1ca
+é1ja
+é1ïa
+é1»a
+é1òa
+é1ha
+é1cha
+é1ka
+é1ra
+é1da
+é1ta
+é1na
+é1¾e
+é1¹e
+é1èe
+é1øe
+é1ce
+é1je
+é1he
+é1che
+é1ke
+é1re
+é1de
+é1te
+é1ne
+é1¾i
+é1¹i
+é1èi
+é1øi
+é1ci
+é1ji
+é1di
+é1ti
+é1ni
+é1¾o
+é1¹o
+é1èo
+é1øo
+é1co
+é1jo
+é1ïo
+é1»o
+é1ho
+é1cho
+é1ko
+é1ro
+é1do
+é1to
+é1no
+é1¾u
+é1¹u
+é1èu
+é1øu
+é1cu
+é1ju
+é1ïu
+é1»u
+é1hu
+é1chu
+é1ku
+é1ru
+é1du
+é1tu
+é1nu
+é1hy
+é1chy
+é1ky
+é1ry
+é1dy
+é1ty
+é1ny
+é1¾á
+é1¹á
+é1èá
+é1øá
+é1cá
+é1já
+é1há
+é1chá
+é1ká
+é1rá
+é1dá
+é1tá
+é1ná
+é1¾é
+é1¹é
+é1èé
+é1øé
+é1cé
+é1jé
+é1hé
+é1ché
+é1ké
+é1ré
+é1dé
+é1té
+é1né
+é1¾í
+é1¹í
+é1èí
+é1øí
+é1cí
+é1jí
+é1dí
+é1tí
+é1ní
+é1hý
+é1chý
+é1ký
+é1rý
+é1dý
+é1tý
+é1ný
+é1dì
+é1tì
+é1nì
+í1¾a
+í1¹a
+í1èa
+í1øa
+í1ca
+í1ja
+í1ïa
+í1»a
+í1òa
+í1ha
+í1cha
+í1ka
+í1ra
+í1da
+í1ta
+í1na
+í1¾e
+í1¹e
+í1èe
+í1øe
+í1ce
+í1je
+í1he
+í1che
+í1ke
+í1re
+í1de
+í1te
+í1ne
+í1¾i
+í1¹i
+í1èi
+í1øi
+í1ci
+í1ji
+í1di
+í1ti
+í1ni
+í1¾o
+í1¹o
+í1èo
+í1øo
+í1co
+í1jo
+í1ïo
+í1»o
+í1òo
+í1ho
+í1cho
+í1ko
+í1ro
+í1do
+í1to
+í1no
+í1¾u
+í1¹u
+í1èu
+í1øu
+í1cu
+í1ju
+í1ïu
+í1»u
+í1òu
+í1hu
+í1chu
+í1ku
+í1ru
+í1du
+í1tu
+í1nu
+í1hy
+í1chy
+í1ky
+í1ry
+í1dy
+í1ty
+í1ny
+í1¾á
+í1¹á
+í1èá
+í1øá
+í1cá
+í1já
+í1ïá
+í1»á
+í1òá
+í1há
+í1chá
+í1ká
+í1rá
+í1dá
+í1tá
+í1ná
+í1¾é
+í1¹é
+í1èé
+í1øé
+í1cé
+í1jé
+í1hé
+í1ché
+í1ké
+í1ré
+í1dé
+í1té
+í1né
+í1¾í
+í1¹í
+í1èí
+í1øí
+í1cí
+í1jí
+í1dí
+í1tí
+í1ní
+í1hý
+í1chý
+í1ký
+í1rý
+í1dý
+í1tý
+í1ný
+í1dì
+í1tì
+í1nì
+ó1¾a
+ó1da
+ó1do
+ó1du
+ó1ta
+ó1tu
+ó1to
+ó1na
+ó1nu
+ó1no
+ó1¾e
+ó1øe
+ó1je
+ó1ti
+ó1ni
+ì1¾a
+ì1¹a
+ì1èa
+ì1øa
+ì1ca
+ì1ja
+ì1ha
+ì1cha
+ì1ka
+ì1ra
+ì1da
+ì1ta
+ì1na
+ì1¾e
+ì1¹e
+ì1èe
+ì1øe
+ì1ce
+ì1je
+ì1he
+ì1che
+ì1ke
+ì1re
+ì1de
+ì1te
+ì1ne
+ì1¾i
+ì1¹i
+ì1èi
+ì1øi
+ì1ci
+ì1ji
+ì1di
+ì1ti
+ì1ni
+ì1¾o
+ì1¹o
+ì1èo
+ì1øo
+ì1co
+ì1jo
+ì1ho
+ì1cho
+ì1ko
+ì1ro
+ì1do
+ì1to
+ì1no
+ì1¾u
+ì1¹u
+ì1èu
+ì1øu
+ì1cu
+ì1ju
+ì1hu
+ì1chu
+ì1ku
+ì1ru
+ì1du
+ì1tu
+ì1nu
+ì1hy
+ì1chy
+ì1ky
+ì1ry
+ì1dy
+ì1ty
+ì1ny
+ì1¾á
+ì1¹á
+ì1èá
+ì1øá
+ì1cá
+ì1já
+ì1há
+ì1chá
+ì1ká
+ì1rá
+ì1dá
+ì1tá
+ì1ná
+ì1¾é
+ì1¹é
+ì1èé
+ì1øé
+ì1cé
+ì1jé
+ì1ché
+ì1ké
+ì1ré
+ì1dé
+ì1té
+ì1né
+ì1¾í
+ì1¹í
+ì1èí
+ì1øí
+ì1cí
+ì1jí
+ì1dí
+ì1tí
+ì1ní
+ì1hý
+ì1chý
+ì1ký
+ì1rý
+ì1dý
+ì1tý
+ì1ný
+ì1dì
+ì1tì
+ì1nì
+a1ga
+a1ge
+a1gi
+a1go
+a1gó
+a1gu
+e1ga
+e1ge
+e1gi
+e1go
+e1gu
+e1gá
+i1ga
+i1ge
+i1gi
+i1go
+i1gu
+i1gá
+i1gó
+o1ga
+o1ge
+o1gi
+o1go
+o1gu
+u1ga
+u1ge
+u1gi
+u1gy
+u1go
+u1gu
+a1xa
+a1xe
+a1xi
+a1xo
+a1xu
+a1xó
+e1xa
+e1xe
+e1xi
+e1xo
+e1xu
+i1xa
+i1xe
+i1xi
+i1xo
+i1xu
+o1xa
+o1xe
+o1xi
+o1xo
+o1xu
+ù1zu
+u1zù
+ù1zo
+o1zù
+ì1zù
+ù1zí
+í1zù
+ó1zù
+ù1zi
+i1zù
+ù1zá
+á1zù
+é1zù
+ù1ze
+e1zù
+ù1za
+a1zù
+ý1zù
+ù1zù
+ù1zy
+y1zù
+ù1òu
+u1òù
+ù1òo
+o1òù
+ù1òí
+ó1òù
+ù1òi
+i1òù
+á1òù
+é1òù
+e1òù
+ù1òa
+a1òù
+ý1òù
+ù1vu
+u1vù
+ù1vo
+o1vù
+ù1vì
+ì1vù
+ù1ví
+í1vù
+ù1vi
+i1vù
+á1vù
+é1vù
+ù1ve
+e1vù
+ù1va
+a1vù
+ý1vù
+ù1vù
+ù1vy
+y1vù
+ù1»a
+ù1tu
+u1tù
+ù1to
+o1tù
+ù1tì
+ì1tù
+ù1tí
+í1tù
+ó1tù
+ù1ti
+i1tù
+á1tù
+é1tù
+ù1te
+e1tù
+ù1ta
+a1tù
+ý1tù
+ù1tù
+ù1ty
+y1tù
+ù1su
+u1sù
+ù1so
+o1sù
+ì1sù
+ù1sí
+í1sù
+ó1sù
+ù1si
+i1sù
+ù1sá
+á1sù
+é1sù
+ù1se
+e1sù
+ù1sa
+a1sù
+ý1sù
+ù1sy
+y1sù
+ù1ru
+u1rù
+ù1ro
+o1rù
+ì1rù
+í1rù
+ó1rù
+i1rù
+ù1rá
+á1rù
+é1rù
+ù1re
+e1rù
+ù1ra
+a1rù
+ù1rý
+ý1rù
+ù1rù
+ù1ry
+y1rù
+u1pù
+ù1po
+o1pù
+ù1pì
+ì1pù
+ù1pí
+í1pù
+i1pù
+é1pù
+ù1pe
+e1pù
+a1pù
+ý1pù
+y1pù
+u1nù
+o1nù
+ù1nì
+ì1nù
+ù1ní
+í1nù
+ó1nù
+ù1ni
+i1nù
+á1nù
+é1nù
+ù1ne
+e1nù
+ù1na
+a1nù
+ý1nù
+ù1nù
+ù1ny
+y1nù
+u1mù
+o1mù
+ù1mì
+ì1mù
+í1mù
+ó1mù
+i1mù
+á1mù
+é1mù
+e1mù
+ù1ma
+a1mù
+ý1mù
+ù1mù
+ù1my
+y1mù
+ù1lu
+u1lù
+ù1lo
+o1lù
+ì1lù
+ù1lí
+í1lù
+ó1lù
+ù1li
+i1lù
+á1lù
+é1lù
+ù1le
+e1lù
+ù1la
+a1lù
+ù1lý
+ý1lù
+ù1lù
+ù1ly
+y1lù
+u1kù
+ù1ko
+o1kù
+ì1kù
+í1kù
+ó1kù
+i1kù
+á1kù
+é1kù
+e1kù
+ù1ka
+a1kù
+ý1kù
+ù1ky
+y1kù
+u1jù
+o1jù
+ì1jù
+ù1jí
+í1jù
+ó1jù
+ù1ji
+i1jù
+á1jù
+é1jù
+ù1je
+e1jù
+ù1ja
+a1jù
+ý1jù
+y1jù
+u1hù
+o1hù
+ì1hù
+í1hù
+i1hù
+ù1há
+á1hù
+é1hù
+ù1he
+e1hù
+ù1ha
+a1hù
+ù1hù
+ù1hy
+y1hù
+é1fù
+a1fù
+y1fù
+ù1¾u
+u1¾ù
+ù1¾o
+o1¾ù
+ì1¾ù
+ù1¾í
+í1¾ù
+ó1¾ù
+ù1¾i
+i1¾ù
+ù1¾á
+á1¾ù
+é1¾ù
+ù1¾e
+e1¾ù
+ù1¾a
+a1¾ù
+ý1¾ù
+y1¾ù
+ù1du
+u1dù
+ù1do
+o1dù
+ù1dì
+ì1dù
+í1dù
+ó1dù
+ù1di
+i1dù
+á1dù
+é1dù
+e1dù
+ù1da
+a1dù
+ý1dù
+ù1dy
+y1dù
+u1cù
+o1cù
+ì1cù
+ù1cí
+í1cù
+i1cù
+á1cù
+e1cù
+a1cù
+ý1cù
+y1cù
+u1bù
+o1bù
+ù1bì
+ì1bù
+í1bù
+ó1bù
+i1bù
+á1bù
+é1bù
+e1bù
+ù1ba
+a1bù
+ý1bù
+ù1by
+y1bù
+u1èù
+o1èù
+ì1èù
+í1èù
+ù1èi
+i1èù
+á1èù
+ù1èe
+e1èù
+a1èù
+ý1èù
+ù1èy
+y1èù
+u1ïù
+o1ïù
+í1ïù
+á1ïù
+é1ïù
+e1ïù
+a1ïù
+ù1chu
+u1chù
+ù1cho
+o1chù
+ì1chù
+í1chù
+i1chù
+á1chù
+e1chù
+ù1cha
+a1chù
+ù1chý
+ý1chù
+ù1chù
+ù1chy
+y1chù
+u1øù
+o1øù
+ì1øù
+ù1øí
+í1øù
+ù1øi
+i1øù
+á1øù
+é1øù
+ù1øe
+e1øù
+a1øù
+ý1øù
+y1øù
+ù1¹u
+u1¹ù
+ù1¹o
+o1¹ù
+ì1¹ù
+ù1¹í
+í1¹ù
+ù1¹i
+i1¹ù
+á1¹ù
+é1¹ù
+ù1¹e
+e1¹ù
+ù1¹a
+a1¹ù
+ý1¹ù
+ù1¹ù
+y1¹ù
+u1bu
+u1fu
+u1lu
+u1mu
+u1pu
+u1su
+u1vu
+u1zu
+u1bo
+u1fo
+u1lo
+u1mo
+u1po
+u1so
+u1vo
+u1zo
+u1bì
+u1mì
+u1pì
+u1vì
+u1bí
+u1fí
+u1lí
+u1mí
+u1pí
+u1sí
+u1ví
+u1zí
+u1bi
+u1fi
+u1li
+u1mi
+u1pi
+u1si
+u1vi
+u1zi
+u1bá
+u1fá
+u1lá
+u1má
+u1pá
+u1sá
+u1vá
+u1zá
+u1bé
+u1lé
+u1mé
+u1pé
+u1sé
+u1vé
+u1zé
+u1be
+u1fe
+u1le
+u1me
+u1pe
+u1se
+u1ve
+u1ze
+u1ba
+u1fa
+u1la
+u1ma
+u1pa
+u1sa
+u1va
+u1za
+u1bý
+u1lý
+u1mý
+u1pý
+u1sý
+u1vý
+u1zý
+u1by
+u1fy
+u1my
+u1py
+u1sy
+u1vy
+o1bu
+o1fu
+o1lu
+o1mu
+o1pu
+o1su
+o1vu
+o1zu
+o1bo
+o1fo
+o1lo
+o1mo
+o1po
+o1so
+o1vo
+o1zo
+o1bì
+o1mì
+o1pì
+o1vì
+o1bí
+o1fí
+o1lí
+o1mí
+o1pí
+o1sí
+o1ví
+o1zí
+o1fó
+o1zó
+o1bi
+o1fi
+o1li
+o1mi
+o1pi
+o1si
+o1vi
+o1zi
+o1bá
+o1fá
+o1lá
+o1má
+o1pá
+o1sá
+o1vá
+o1zá
+o1bé
+o1fé
+o1lé
+o1mé
+o1pé
+o1sé
+o1vé
+o1zé
+o1be
+o1fe
+o1le
+o1me
+o1pe
+o1se
+o1ve
+o1ze
+o1ba
+o1fa
+o1la
+o1ma
+o1pa
+o1sa
+o1va
+o1za
+o1bý
+o1lý
+o1mý
+o1pý
+o1sý
+o1vý
+o1zý
+o1by
+o1ly
+o1my
+o1py
+o1sy
+o1vy
+o1zy
+ú1lu
+ú1su
+ú1zu
+ú1bo
+ú1lo
+ú1mo
+ú1po
+ú1vo
+ú1bì
+ú1mì
+ú1pì
+ú1vì
+ú1pí
+ú1li
+ú1pi
+ú1si
+ú1vi
+ú1zi
+ú1le
+ú1se
+ú1ze
+ú1pa
+ú1sa
+ú1va
+ú1by
+ú1ly
+ú1my
+ì1bu
+ì1lu
+ì1mu
+ì1pu
+ì1su
+ì1vu
+ì1zu
+ì1bo
+ì1fo
+ì1lo
+ì1mo
+ì1po
+ì1so
+ì1vo
+ì1zo
+ì1mì
+ì1vì
+ì1bí
+ì1lí
+ì1mí
+ì1pí
+ì1sí
+ì1ví
+ì1zí
+ì1li
+ì1mi
+ì1pi
+ì1si
+ì1vi
+ì1zi
+ì1bá
+ì1lá
+ì1má
+ì1pá
+ì1sá
+ì1vá
+ì1zá
+ì1lé
+ì1mé
+ì1pé
+ì1sé
+ì1vé
+ì1zé
+ì1be
+ì1le
+ì1me
+ì1pe
+ì1se
+ì1ve
+ì1ze
+ì1ba
+ì1la
+ì1ma
+ì1pa
+ì1sa
+ì1va
+ì1za
+ì1lý
+ì1mý
+ì1pý
+ì1sý
+ì1vý
+ì1zý
+ì1by
+ì1ly
+ì1my
+ì1py
+ì1sy
+ì1vy
+ì1zy
+í1bu
+í1fu
+í1lu
+í1mu
+í1pu
+í1su
+í1vu
+í1zu
+í1bo
+í1fo
+í1lo
+í1mo
+í1po
+í1so
+í1vo
+í1zo
+í1bì
+í1mì
+í1vì
+í1bí
+í1lí
+í1pí
+í1ví
+í1zí
+í1bi
+í1li
+í1mi
+í1pi
+í1si
+í1vi
+í1zi
+í1bá
+í1lá
+í1má
+í1pá
+í1sá
+í1vá
+í1zá
+í1bé
+í1lé
+í1mé
+í1pé
+í1sé
+í1vé
+í1zé
+í1be
+í1le
+í1me
+í1pe
+í1se
+í1ve
+í1ze
+í1ba
+í1la
+í1ma
+í1pa
+í1sa
+í1va
+í1za
+í1lý
+í1mý
+í1sý
+í1vý
+í1zý
+í1by
+í1fy
+í1ly
+í1my
+í1py
+í1sy
+í1vy
+í1zy
+ó1bu
+ó1lu
+ó1mu
+ó1pu
+ó1su
+ó1vu
+ó1zu
+ó1lo
+ó1po
+ó1so
+ó1vo
+ó1zo
+ó1bì
+ó1mì
+ó1vì
+ó1sí
+ó1ví
+ó1zí
+ó1fi
+ó1zi
+ó1lé
+ó1vé
+ó1zé
+ó1le
+ó1me
+ó1ve
+ó1ze
+ó1ba
+ó1fa
+ó1la
+ó1ma
+ó1pa
+ó1sa
+ó1va
+ó1za
+ó1by
+ó1fy
+ó1ly
+ó1my
+ó1py
+ó1sy
+ó1vy
+ó1zy
+i1bu
+i1lu
+i1mu
+i1pu
+i1su
+i1vu
+i1zu
+i1bo
+i1fo
+i1lo
+i1mo
+i1po
+i1so
+i1vo
+i1zo
+i1bì
+i1mì
+i1pì
+i1vì
+i1bí
+i1lí
+i1mí
+i1pí
+i1sí
+i1ví
+i1zí
+i1vó
+i1bi
+i1fi
+i1li
+i1mi
+i1pi
+i1si
+i1vi
+i1zi
+i1bá
+i1lá
+i1má
+i1pá
+i1sá
+i1vá
+i1zá
+i1bé
+i1lé
+i1mé
+i1pé
+i1sé
+i1vé
+i1zé
+i1be
+i1fe
+i1le
+i1me
+i1pe
+i1se
+i1ve
+i1ze
+i1ba
+i1fa
+i1la
+i1ma
+i1pa
+i1sa
+i1va
+i1za
+i1bý
+i1lý
+i1mý
+i1pý
+i1sý
+i1vý
+i1zý
+i1by
+i1fy
+i1ly
+i1my
+i1py
+i1sy
+i1vy
+i1zy
+á1bu
+á1fu
+á1lu
+á1mu
+á1pu
+á1su
+á1vu
+á1zu
+á1bo
+á1lo
+á1mo
+á1po
+á1so
+á1vo
+á1zo
+á1bì
+á1fì
+á1mì
+á1pì
+á1vì
+á1bí
+á1fí
+á1lí
+á1mí
+á1pí
+á1sí
+á1ví
+á1zí
+á1bi
+á1fi
+á1li
+á1mi
+á1pi
+á1si
+á1vi
+á1zi
+á1bá
+á1lá
+á1má
+á1pá
+á1sá
+á1vá
+á1zá
+á1bé
+á1lé
+á1mé
+á1pé
+á1sé
+á1vé
+á1zé
+á1be
+á1fe
+á1le
+á1me
+á1pe
+á1se
+á1ve
+á1ze
+á1ba
+á1fa
+á1la
+á1ma
+á1pa
+á1sa
+á1va
+á1za
+á1lý
+á1mý
+á1pý
+á1sý
+á1vý
+á1zý
+á1by
+á1fy
+á1ly
+á1my
+á1py
+á1sy
+á1vy
+á1zy
+é1bu
+é1fu
+é1lu
+é1mu
+é1pu
+é1su
+é1vu
+é1zu
+é1bo
+é1lo
+é1mo
+é1po
+é1so
+é1vo
+é1zo
+é1mì
+é1pì
+é1vì
+é1fi
+é1mi
+é1pi
+é1si
+é1vi
+é1zi
+é1bá
+é1vá
+é1zá
+é1lé
+é1fe
+é1le
+é1me
+é1pe
+é1se
+é1ve
+é1ze
+é1ba
+é1la
+é1ma
+é1pa
+é1sa
+é1va
+é1za
+é1by
+é1ly
+é1my
+é1sy
+é1vy
+é1zy
+e1bu
+e1fu
+e1lu
+e1mu
+e1pu
+e1su
+e1vu
+e1zu
+e1bo
+e1fo
+e1lo
+e1mo
+e1po
+e1so
+e1vo
+e1zo
+e1bì
+e1mì
+e1pì
+e1vì
+e1bí
+e1lí
+e1mí
+e1pí
+e1sí
+e1ví
+e1zí
+e1ló
+e1zó
+e1bi
+e1fi
+e1li
+e1mi
+e1pi
+e1si
+e1vi
+e1zi
+e1bá
+e1fá
+e1lá
+e1má
+e1pá
+e1sá
+e1vá
+e1zá
+e1bé
+e1lé
+e1mé
+e1pé
+e1sé
+e1vé
+e1zé
+e1be
+e1fe
+e1le
+e1me
+e1pe
+e1se
+e1ve
+e1ze
+e1ba
+e1fa
+e1la
+e1ma
+e1pa
+e1sa
+e1va
+e1za
+e1bý
+e1lý
+e1mý
+e1pý
+e1sý
+e1vý
+e1zý
+e1by
+e1ly
+e1my
+e1py
+e1sy
+e1vy
+e1zy
+a1bu
+a1fu
+a1lu
+a1mu
+a1pu
+a1su
+a1vu
+a1zu
+a1bo
+a1fo
+a1lo
+a1mo
+a1po
+a1so
+a1vo
+a1zo
+a1bì
+a1mì
+a1pì
+a1vì
+a1bí
+a1fí
+a1lí
+a1mí
+a1pí
+a1sí
+a1ví
+a1zí
+a1ló
+a1bi
+a1fi
+a1li
+a1mi
+a1pi
+a1si
+a1vi
+a1zi
+a1bá
+a1fá
+a1lá
+a1má
+a1pá
+a1sá
+a1vá
+a1zá
+a1bé
+a1fé
+a1lé
+a1mé
+a1pé
+a1sé
+a1vé
+a1zé
+a1be
+a1fe
+a1le
+a1me
+a1pe
+a1se
+a1ve
+a1ze
+a1ba
+a1fa
+a1la
+a1ma
+a1pa
+a1sa
+a1va
+a1za
+a1bý
+a1lý
+a1mý
+a1pý
+a1sý
+a1vý
+a1zý
+a1by
+a1fy
+a1ly
+a1my
+a1py
+a1sy
+a1vy
+a1zy
+ý1bu
+ý1fu
+ý1lu
+ý1mu
+ý1pu
+ý1su
+ý1vu
+ý1zu
+ý1bo
+ý1lo
+ý1mo
+ý1po
+ý1so
+ý1vo
+ý1zo
+ý1bì
+ý1mì
+ý1pì
+ý1vì
+ý1lí
+ý1bi
+ý1li
+ý1mi
+ý1pi
+ý1si
+ý1vi
+ý1zi
+ý1bá
+ý1lá
+ý1má
+ý1pá
+ý1sá
+ý1vá
+ý1zá
+ý1zé
+ý1be
+ý1le
+ý1me
+ý1pe
+ý1se
+ý1ve
+ý1ze
+ý1ba
+ý1la
+ý1ma
+ý1pa
+ý1sa
+ý1va
+ý1za
+ý1by
+ý1ly
+ý1my
+ý1py
+ý1sy
+ý1vy
+ý1zy
+y1bu
+y1fu
+y1lu
+y1mu
+y1pu
+y1su
+y1vu
+y1zu
+y1bo
+y1lo
+y1mo
+y1po
+y1so
+y1vo
+y1zo
+y1bì
+y1mì
+y1pì
+y1vì
+y1bí
+y1lí
+y1mí
+y1pí
+y1sí
+y1ví
+y1zí
+y1mó
+y1bi
+y1fi
+y1li
+y1mi
+y1pi
+y1si
+y1vi
+y1zi
+y1bá
+y1fá
+y1lá
+y1má
+y1pá
+y1sá
+y1vá
+y1zá
+y1fé
+y1lé
+y1mé
+y1pé
+y1sé
+y1vé
+y1zé
+y1be
+y1fe
+y1le
+y1me
+y1pe
+y1se
+y1ve
+y1ze
+y1ba
+y1fa
+y1la
+y1ma
+y1pa
+y1sa
+y1va
+y1za
+y1lý
+y1mý
+y1pý
+y1sý
+y1vý
+y1zý
+y1by
+y1ly
+y1my
+y1py
+y1sy
+y1vy
+y1zy
+%slabièné r a l
+v2r1h
+vr2hn
+vr2hl
+vr3hl.
+vr2hc
+v2r1ch
+vr2chn
+vr2chl
+v2r1k
+vr2kn
+vr2kl
+vr3kl.
+v2r1d
+vr2dn
+vr2dl
+v2r1t
+vr2tn
+vr2tl
+vr3tl.
+v2r1n
+v2r1¾
+v2r1¹
+vr2¹k
+vr2¹n
+vr2¹m
+vr2¹t
+v2r1è
+vr2èm
+vr2èt
+v2r1c
+v2r1b
+vr2bk
+v2r1s
+vr2st
+vr2s2tv
+v2r1z
+vr2zn
+vr2zl
+vr3zl.
+s2r1k
+sr2kn
+sr2kl
+sr3kl.
+s2r1d
+sr2dn
+sr2dè
+s2r1n
+sr2nk
+sr2nè
+s2r1¹
+sr2¹m
+sr2¹t
+s2r1b
+sr2bs
+s2r1p
+sr2pn
+sr2pk
+s2r1s
+sr2st
+s2rs2tk
+s2rs2tn
+t2r1h
+tr2hl
+tr3hl.
+tr2hn
+t2r1n
+tr2nk
+tr2nè
+t2r1¾
+tr2¾n
+t2r1è
+tr2èk
+tr2èm
+tr2èt
+t2r1b
+t2r1m
+t2r1p
+tr2pn
+tr2pm
+tr2pè
+t2r1s
+tr2sn
+tr2sl
+tr3sl.
+tr2sk
+t2r1v
+ch2r1t
+chr2tl
+chr3tl.
+ch2r1è
+chr2èm
+chr2èt
+ch2r1s
+chr2st
+p2r1ch
+pr2chn
+pr2chl
+pr3chl.
+p2r1k
+pr2kn
+p2r1d
+pr2dl
+pr3dl.
+p2r1t
+p2r1n
+p2r1¹
+pr2¹k
+p2r1è
+p2r1c
+p2r1v
+pr2vn
+pr2vk
+m2r1d
+mr2dl
+m2r1k
+mr2kl
+mr3kl.
+mr2kn
+m2r1t
+mr2tv
+mr2tk
+mr2tn
+m2r1¹
+mr2¹»
+mr2¹k
+m2r1m
+mr2ml
+m2r1s
+mr2sk
+m2r1v
+mr2vm
+mr2vt
+m2r1z
+mr2zk
+mr2zl
+mr3zl.
+mr2zn
+è2r1t
+èr2tk
+èr2tn
+èr2tl
+èr3tl.
+k2r1t
+kr2tn
+kr2tl
+kr2tk
+k2r1n
+k2r1¹
+kr2¹k
+k2r1è
+kr2èn
+kr2èk
+kr2èm
+kr2èt
+k2r1b
+k2r1m
+kr2mn
+kr2mm
+kr2mt
+k2r1z
+h2r1k
+hr2kl
+hr3kl.
+hr2kn
+h2r1d
+hr2dl
+hr2dn
+h2r1n
+hr2nc
+hr2nk
+hr2nè
+hr2òm
+hr2òt
+h2r1è
+h2r1b
+hr2bk
+hr2b1l
+h2r1m
+h2r1s
+hr2st
+h2rs2tm
+h2r1z
+f2r1k
+fr2kl
+fr2kn
+f2r1è
+fr2èk
+fr2èm
+fr2èt
+d2r1n
+dr2nk
+dr2nè
+d2r1¾
+dr2¾k
+dr2¾m
+dr2¾t
+dr2¾g
+d2r1c
+dr2cl
+dr3cl.
+dr2cn
+d2r1b
+dr2bn
+dr2bl
+dr3bl.
+d2r1s
+dr2sn
+d2r1v
+d2r1z
+dr2zn
+dr2zl
+c2r1è
+b2r1k
+br2kn
+br2kl
+b2r1d
+b2r1t
+br2tn
+br2tl
+br3tl.
+b2r1n
+br2nk
+b2r1¾
+br2¾ï
+b2r1è
+br2èk
+b2r1v
+b2r1z
+br2zl
+br2zk
+br2zd
+b2r1b
+br2bl
+z2r1n
+zr2nk
+k2l1k
+v2l1h
+vl2hk
+vl2hè
+v2l1k
+v2l1n
+vl2nk
+v2l1è
+vl2èk
+v2l1c
+h2l1t
+hl2tn
+hl2tl
+hl3tl.
+p2l1ch
+p2l1k
+p2l1n
+p2l1¾
+p2l1ò
+p2l1s
+pl2st
+pl2s»
+p2l1z
+pl2zl
+pl2zn
+b2l1b
+bl2bn
+bl2bl
+bl3bl.
+bl2bc
+bl2bè
+m2l1s
+ml2sn
+m2l1¾
+ml2¾n
+1¾l.
+1¹l.
+1èl.
+1cl.
+1hl.
+1c2hl.
+1dl.
+1tl.
+1bl.
+1ml.
+1pl.
+1sl.
+1vl.
+1zl.
+1cr.
+1hr.
+1c2hr.
+1kr.
+1dr.
+1tr.
+1br.
+1fr.
+1mr.
+1pr.
+1sr.
+1vr.
+%dvojice souhlásek
+.¾4
+¾1¹
+¾1è
+¾1c
+¾1ï
+¾1k
+¾1d
+¾1t
+¾1n
+¾1b
+¾1l
+¾1m
+¾1p
+¾1v
+.¹4
+¹1¹
+¹1è
+¹1c
+¹1»
+¹1ch
+¹1k
+¹1d
+¹1t
+¹1n
+¹1b
+¹1l
+¹1m
+¹1p
+¹1v
+.è4
+è1è
+è1c
+è1»
+è1ò
+è1k
+è1t
+è1n
+è1b
+è1l
+è1m
+è1p
+è1v
+.ø4
+ø1è
+ø1c
+ø1k
+ø1d
+ø1t
+ø1n
+ø1b
+ø1l
+ø1m
+ø1v
+.c4
+c1k
+c1t
+c1n
+c1l
+c1m
+c1v
+.j4
+j1¹
+j1è
+j1c
+j1k
+j1d
+j1t
+j1n
+j1b
+j1f
+j1l
+j1m
+j1p
+j1s
+j1v
+j1z
+.ï4
+ï1c
+ï1k
+ï1t
+ï1m
+.»4
+»1c
+»1h
+»1ch
+»1k
+»1t
+»1m
+»1s
+»1v
+.ò4
+ò1c
+ò1h
+ò1ch
+ò1k
+ò1d
+ò1t
+ò1m
+ò1p
+ò1z
+.h4
+h1¹
+h1è
+h1c
+h1k
+h1d
+h1n
+h1l
+.ch4
+4ch.
+ch1b
+ch1r
+ch1t
+ch1n
+ch1l
+ch1m
+.k4
+k1¹
+k1è
+k1ø
+k1c
+k1ch
+k1r
+k1t
+k1n
+k1b
+k1l
+k1m
+k1p
+k1s
+k1vic
+.r4
+r1¹
+r1è
+r1c
+r1h
+r1ch
+r1k
+r1d
+r1t
+r1n
+r1b
+r1l
+r1m
+r1p
+r1s
+r1v
+r1z
+.d4
+d1¾
+d1¹
+d1è
+d1ø
+d1c
+d1»
+d1ò
+d1h
+d1ch
+d1k
+d1n
+d1b
+d1l
+d1m
+d1p
+d1r
+d1s
+d1v
+.t4
+t1¹
+t1è
+t1c
+t1ch
+t1k
+t1r
+t1n
+t1b
+t1f
+t1l
+t1m
+t1p
+t1v
+.n4
+n1¾
+n1¹
+n1è
+n1c
+n1ï
+n1h
+n1ch
+n1k
+n1r
+n1d
+n1t
+n1n
+n1b
+n1l
+n1p
+n1z
+.x4
+x1c
+x1k
+x1b
+x1f
+x1l
+x1p
+x1n
+x1h
+x1t
+.b4
+b1¾
+b1¹
+b1è
+b1ø
+b1c
+b1h
+b1ch
+b1k
+b1r
+b1n
+b1f
+b1l
+b1m
+b1s
+b1v
+b1z
+.f4
+f1l
+f1k
+f1s
+.l4
+l1¾
+l1¹
+l1è
+l1ò
+l1c
+l1k
+l1d
+l1t
+l1n
+l1b
+l1m
+l1p
+l1s
+l1v
+l1z
+.m4
+m1¹
+m1è
+m1c
+m1ch
+m1k
+m1r
+m1d
+m1t
+m1n
+m1b
+m1l
+m1p
+m1s
+m1z
+.p4
+p1è
+p1ø
+p1c
+p1ch
+p1k
+p1r
+p1t
+p1n
+p1l
+.s4
+s1¹
+s1è
+s1ò
+s1c
+s1k
+s1r
+s1t
+s1n
+s1b
+s1l
+s1m
+s1p
+.v4
+v1¹
+v1è
+v1ò
+v1c
+v1ch
+v1k
+v1r
+v1d
+v1t
+v1n
+v1b
+v1l
+v1m
+v1p
+v1s
+.z4
+z1¹
+z1è
+z1c
+z1k
+z1d
+z1t
+z1b
+z1l
+z1m
+z1n
+z1p
+z1v
+.g4
+g1n
+g1r
+g1m
+g1g
+d1g
+r1g
+n1g
+j1g
+l1g
+f1g
+s1g
+v1g
+%vícesouhláskové skupiny
+b2s1c
+b1s2k
+b1¹2t
+c2t2n
+c1t2v
+è1s2k
+è1¹2t
+d1s2k
+d1¹2t
+f1g2h
+h2ø2m
+j1g2l
+j2ï1m
+j1s2k
+j1¹2t
+j2s2m
+k2t1n
+k2t1r
+k3t2ri
+k2è1n
+k2ø2t
+l2k2n
+l1s2k
+l1¹2t
+l2s2t
+l1t2r
+m2b1d
+m1b2r
+m2d2l
+m2k2l
+m2k2n
+m1p2l
+m2p2t
+m1s2k
+m1¹2t
+m2s2t
+n1g2l.
+n2g1l
+n2k1c
+n2k1l
+n2k1r
+n2k1t
+n2s1f
+n1s2k
+n1s2t
+n2t1g
+n2t1k
+n2t1n
+n2t1s
+n2t1v
+n2è1n
+n1¹2t
+p2t1k
+p2è1n
+p2r2s
+p1s2k
+p1¹2t
+r2d1n
+r2k1r
+r2k1t
+r2m1n
+r2p1c
+r2p1è
+r1s2k
+r1s2p
+r2t1l
+r2t1n
+r2v1n
+r2z1n
+r1¹2t
+s2h2l
+s2h2r
+s2ch2v
+s2k2l
+s2k2r
+s2k1v
+s2m2l
+s2m1n
+s2p2l
+s2p2r
+s2t1k
+s2t2l
+s2t1m
+s2t1n
+s2t1r
+s2t2ø
+¹1s2k
+t2k2n
+t2ø1k
+t2ø1n
+t1s2k
+v1s2k
+v1¹2t
+v2s2t
+v2z2d
+v2z2l
+v2z2n
+v2z2t
+v2¾2d
+z2d2l
+z2d1n
+z2d2v
+z2k2l
+z2v2l
+¾1s2k
+¾1¹2t
+è2t2v
+ò1s2k
+ò1¹2t
+¹2k2l
+o¹k3l
+¹2t1m
+¹2t1n
+¹2t2v
+¹2»1k
+%poèáteèní skupiny hlásek
+.s2t2r
+%pøedpony
+.be2z1
+bez1b2
+bez1h2
+be3z2ov
+be3z2ink
+bez1k2
+bez1m2
+bez1p2
+bez1s2
+bez1t2
+.be3z2e1
+.bezec2
+.bezej2
+.bezel2
+.bezes2
+.bezest2
+.bezez2
+blaho1
+blahos2
+blahop2
+boje1
+bojes2
+bojech2
+celo1
+celod2
+celop2
+celos2
+celoz2
+.ètyø1
+.ètyøè2
+.ètyøh2
+.ètyøk2
+.ètyøs2
+.ètyøv2
+.daleko1
+.dalekoh2
+.dalekoz2
+.do1
+.doè2
+.doh2
+.doj2
+.dok2
+.do2k3s
+.do2k3t
+.dom2
+.doo1p2
+.dop2
+.dos2
+.dot2
+.doú1è2
+.dov2
+.doz2
+.do¾2
+dù1
+dùk2
+dùs2
+dùt2
+dùv2
+dvoj1
+dvou1
+dvojè2
+dvouè2
+dvojk2
+dvouk2
+dvojst2r
+dvoust3r
+jedno1
+jednoh2
+jednos2
+jednot2
+jedno2t3k
+jedno2t3l
+jedno2t3n
+jednoz2
+kolem1
+kolemj2
+kolems2
+.koso1
+.kosoè2t2v
+kro2m1
+.kro3m2ì
+.lec1
+.lec2h
+.leck2
+.leda1k
+.leda2s1k2
+.mezi1
+.mezib2
+.meziè2
+.mezi2è3k
+.mezid2
+.mezih2
+.meziv2
+.mimo1s2
+.mimo1st2
+místo1d2
+místo1k2
+místo1p2
+.mnoho1
+.mnohoh2
+.mnohos2
+.mnohoè2
+.na1
+.nab2
+.nac2
+.naè2
+.nah2
+.nach2
+.naj2
+.nak2
+.nal2
+.nam2
+.nap2
+.naø2
+.nas2
+.nast2
+.na¹2
+.nat2
+.nav2
+.naz2
+.ná1
+.náb2
+.nác2
+.nád2
+.ná2d3h
+.náh2
+.nák2
+.nám2
+.náp2
+.nár2
+.nás2
+.nást2
+.nát2
+.náv2
+.na2d1
+.na3d2ì
+.na3d2a
+.na3d2á
+.na3d2í
+.na3d2i
+.na3d2u
+.na3d2o
+.na4d3obl
+.na4d3obyè
+.na3d2o1smr
+.na3d2r
+.na4d3rot
+.nadch2
+.nadh2
+.nadk2
+.nads2
+.nadz2
+.na3d2e1
+.nadez2
+.naded2
+.nadej2
+.nadeh2
+.nadel2
+.nadep2
+.nade¹2
+.ne1
+.neb2
+.nec2
+.neè2
+.ned2
+.neg2
+.ne2g3l
+.neh2
+.ne2h1t
+.nech2
+.ne2ch.
+.ne2ch»3
+.nek2
+.ne2kro
+.ne2kt
+.nel2
+.nem2
+.nep2
+.ner2
+.ne2r2v
+.neø2
+.nes2
+.nest2
+.ne¹2
+.net2
+.nev2
+.nez2
+.nedo1
+.nedob2ra
+.nedok2
+.nedom2
+.nedop2
+.nedor2
+.nedos2
+.nedot2
+.nedov2
+.nedoz2
+.neod1
+.neodh2
+.neodch2
+.neodm2
+.neod2ol
+.neodp2
+.neods2
+.neodst2
+.neod¹2
+.neodt2
+.neodz2
+.neod2e1
+.neodeb2
+.neodeh2
+.neodej2
+.neodem2
+.neodep2
+.neodes2
+.neode¹2
+.neodez
+.neod2ì
+.nepo1
+.nepob2
+.nepoc2
+.nepof2
+.nepog2
+.nepoh2
+.nepoch2
+.nepoj2
+.nepok2
+.nepom2
+.nepo2mp
+.nepon2
+.nepop2
+.nepo2r1t
+.nepos2
+.nepost2
+.nepo¹2
+.nepo2¹3t
+.nepo3¹4»u
+.nepot2
+.nepo7uè
+.nepo7u1k2
+.nepov2
+.nepoz2
+.nepo2d1
+.nepo3d2a
+.nepo3d2i
+.nepo3d2ob
+.nepo3d2u
+.nepo3d2á
+.nepo3d2í
+.nepodh2
+.nepodk2
+.nepo3d2ot
+.nepodp2
+.nepo3d2rá¾d
+.nepo3d2ra¾
+.nepods2
+.nepodst2
+.nepodv2
+.nepo3d2e1
+.nepodeb2
+.nepodej2
+.nepodem2
+.nepodep2
+.nepodes2
+.nepodez2
+.nepro1
+.neprob2
+.neproc2
+.neproè2
+.neprod2
+.neprog2
+.neproj2
+.neproh2
+.neproch2
+.neprok2
+.neprol2
+.neprom2
+.neprop2
+.nepror2
+.neproø2
+.nepros2
+.neprost2
+.nepro¹2
+.neprot2
+.neprov2
+.neproz2
+.nepro¾2
+.nepøe2d1
+.nepøe3d2a
+.nepøe3d2á
+.nepøe3d2ra
+.nepøedk2
+.nepøeds2
+.nepøedv2
+.nepøedz2
+.nepøedpo3k2
+.nepøe3d2e1
+.nepøedej2
+.nepøedes2
+.nepøedest2
+.nepøede¹2
+.nepøe2s1n
+.nepøe1
+.nepøeb2
+.nepøec2
+.nepøeè2
+.nepøeh2
+.nepøej2
+.nepøek2
+.nepøel2
+.nepøem2
+.nepøep2
+.nepøer2
+.nepøeø2
+.nepøe¹2
+.nepøet2
+.nepøev2
+.nepøez2
+.nepøi1
+.nepøib2
+.nepøic2
+.nepøiè2
+.nepøid2
+.nepøij2
+.nepøih2
+.nepøik2
+.nepøil2
+.nepøim2
+.nepøip2
+.nepøiø2
+.nepøis2
+.nepøist2
+.nepøi¹2
+.nepøit2
+.nepøiv2
+.nepøiz2
+.nero2z1
+.nero3zum
+.nerozb2
+.nerozè2
+.nerozd2
+.nerozh2
+.nerozk2
+.nerozp2
+.nerozs2
+.nerozst2
+.neroz¹2
+.nerozt2
+.nerozv2
+.nerozz2
+.nero3z2e1
+.nerozeb2
+.nerozeè2
+.nerozed2
+.nerozeh2
+.nerozej2
+.nerozek2
+.nerozel2
+.nerozem2
+.nerozep2
+.nerozer2
+.nerozeø2
+.nerozes2
+.nerozest2
+.neroze¹2
+.nerozet2
+.nerozev2
+.nerozez2
+.nesou1
+.nesouè2
+.nesoud2
+.nesouh2
+.nesouk2
+.nesoum2
+.nesous2
+.nesoust2
+.nesou¹2
+.nesouv2
+.nesouz2
+.neupo1
+.neupos2
+.neupot2
+.nì1k2
+.ne2j1
+.ne3j2du.
+.ne3j2de¹.
+.ne3j2de.
+.ne3j2deme.
+.ne3j2dete.
+.ne3j2dou.
+.ne3j2e
+.ne3j2a
+.ne3j2sem.
+.ne3j2si.
+.ne3j2sme.
+.ne3j2ste.
+.ne3j2sou.
+.ne4j3akt
+.ne3j2i
+.ne3j2í
+.nejd2
+.nejf2
+.nejh2
+.nejk2
+.nejm2
+.nejp2
+.nejs2
+.nejst2
+.nejt2
+.nejv2
+.nejz2
+.nejne1
+.nejnep2
+.nejnes2
+.nejnez2
+.ni1k2
+.o1
+.oh2
+.ok2
+.ok3t
+.okolo1
+.okoloj2
+.okolos2
+.om2
+.op2
+.op3ti
+.op3to
+.or2v
+.os2l
+.os2m
+.os3mo
+.os2n
+.os2p
+.os2tu
+.os2ty
+.os2tý
+.os2t2r
+.os2v
+.o¹2
+.ot2r
+.ot3ru
+.ov2
+.oz2
+.o¾2
+.o2b1d2
+.o2b1j
+.o2b1k2
+.o2b1r
+.o3b2ran
+.o3b2rán
+.o2b1ø
+.o2b1s2
+.o2b1¹2
+.o2b1t2
+.o2b1v2
+.o2b1z2
+.o2boj1s2
+.o2boj1st2r
+.o2boj1¾
+.o2boj1r
+.o2boj1n
+.obou1
+.obous2
+.obousm2
+.ob2e1
+.obe2c1
+.obeh2
+obej2
+obel2
+obep2
+.obes2
+.obest2
+.obet2
+.obez2
+.od1
+.odh2
+.odch2
+.odm2
+.od2ol
+.odp2
+.ods2
+.odst2
+.od¹2
+.odt2
+.odz2
+.od2e1
+.odeb2
+.odeh2
+.odej2
+.odem2
+.odep2
+.odes2
+.ode¹2
+.odez
+.od2ì
+.ote1v2
+.pa1h2r
+.pa1k2l
+.pa1m2l
+.pa1p2r
+.pa1t2v
+.pa1z2v
+.pa4s3tv
+.pìti1
+.pìtiè2
+.pìtih2
+.pìtik2
+.pìtis2
+.pìtiv2
+.po1
+.pob2
+.poc2
+.poè2
+.pof2
+.pog2
+.poh2
+.poch2
+.po2int
+.poj2
+.po2jï
+.pok2
+.po2ls
+.po2l¹
+.pom2
+.po2mp
+.pon2
+.pop2
+.po2rn
+.po2r1t
+.por2tl
+.pos2
+.post2
+.po¹2
+.po2¹3t
+.po2¹3»
+.po3¹4tìv
+.po3¹4»u
+.pot2
+.po7uè
+.po7u1k2
+.po7uliè
+.pov2
+.poz2
+.po2z3dì
+.po2d1
+.po3d2a
+.po3d2i
+.po3d2le.
+.po3d2ob
+.po4d3obl
+.po4d3oboj
+.po4d3oboè
+.po3d2rob
+.po3d2u
+.po3d2á
+.po3d2í
+.podh2
+.podk2
+.podm2
+.po3d2ol
+.po3d2ot
+.podp2
+.po3d2rá¾d
+.po3d2ra¾i
+.pods2
+.podst2
+.podv2
+.po3d2e1
+.podeb2
+.podej2
+.podem2
+.podep2
+.podes2
+.podez2
+.polo1o1
+.polo1p2
+.polo1s2
+.pra1
+.pras2
+.pra2s1k
+.pra2s1n
+.pra2cn
+.pra2èk
+.pra2h1n
+.pra2h1l
+.pra2kt
+.pra2¹t
+.pra2vd
+.pro1
+.prob2
+.proc2
+.proè2
+.prod2
+.prog2
+.proj2
+.proh2
+.proch2
+.prok2
+.prol2
+.prom2
+.prop2
+.pror2
+.proø2
+.pros2
+.prost2
+.pro¹2
+.prot2
+.pro2u
+.prov2
+.proz2
+.pro¾2
+proti1
+protik2
+protim2
+protip2
+protis2
+protist2
+prù1
+prù2mk
+prùh2
+prùk2
+prùp2
+prùr2
+prùs2
+prùt2
+prùv2
+prùz
+.pøe1
+.pøeb2
+.pøec2
+.pøeè2
+.pøeh2
+.pøej2
+.pøek2
+.pøel2
+.pøem2
+.pøep2
+.pøer2
+.pøeø2
+.pøes2
+.pøe2s1è
+.pøe2sto
+.pøe2sn
+.pøe¹2
+.pøet2
+.pøev2
+.pøez2
+.pøe2d1
+.pøe3d2a
+.pøe3d2á
+.pøe3d2ra
+.pøe3d2rá¾d
+.pøedk2
+.pøeds2
+.pøedv2
+.pøedz2
+.pøedpo3k2
+.pøe3d2e1
+.pøedej2
+.pøedes2
+.pøedest2
+.pøede¹2
+.pøedev2
+.pøe3s2níd
+.pøe2s1po
+.pøe2s1pø
+.pøe2s1len
+.pøe2s1li
+.pøi1
+.pøib2
+.pøic2
+.pøiè2
+.pøid2
+.pøij2
+.pøih2
+.pøik2
+.pøil2
+.pøim2
+.pøip2
+.pøiø2
+.pøis2
+.pøist2
+.pøi¹2
+.pøit2
+.pøiv2
+.pøiz2
+pøí1
+pøí2m1n
+pøíb2
+pøí2èk
+pøí2èn
+pøíj2
+pøík2
+pøím2
+pøíp2
+pøís2
+pøíst2
+pøí¹2
+pøít2
+pøív2
+pøíz2
+pù1j2d
+.ro2z1
+.ro3zum
+.rozb2
+.rozè2
+.rozd2
+.rozh2
+.rozk2
+.rozp2
+.rozs2
+.rozst2
+.roz¹2
+.rozt2
+.rozv2
+.rozz2
+.ro3z2e1
+.rozeb2
+.rozeè2
+.rozed2
+.rozeh2
+.rozej2
+.rozek2
+.rozel2
+.rozem2
+.rozep2
+.rozer2
+.rozeø2
+.rozes2
+.rozest2
+.roze¹2
+.rozet2
+.rozev2
+.rozez2
+.sd2
+.sh2
+.sk2
+.sp2
+.sv2
+.se1
+.se2dmi
+.se2dme
+.se2dl
+.se2dn
+.seb2
+.sebe1
+.sebek2
+.sec2
+.se2è
+.se3è2t
+.se2gm
+.seg2
+.seh2
+.se2is1
+.sej2
+.sek2
+.sel2
+.sem2
+.sep2
+.se2p1t
+.sep2ta
+.serv2
+.se2rvis
+.seø2
+.ses2
+.se2st
+se3st2roj
+.se3st2øel
+.se¹2
+.set2
+.sev2
+.se2x1
+.sez2
+.sou1
+.souè2
+.soud2
+.sou2d3c
+.sou2d3n
+.souh2
+.souj2
+.souk2
+.soum2
+.soup2
+.sous2
+.soust2
+.sou¹2
+.souv2
+.souz2
+.spolu1
+.spolub2
+.spolup2
+.nespolu1p2
+.¹esti1
+.¹estiè2
+.¹estih2
+.¹estik2
+.¹estis2
+.¹estiv2
+.tro2j1ú
+.tro2j1s2
+.u1
+.ub2
+.uc2
+.ud2
+.uh2
+.u2h3l
+.u3h4lad
+.u3h4líd
+.u2h3r
+.u3h4rad
+.u3h4rab
+.u3h4rá
+.u4h5rám.
+.u4h5rách.
+.uch2
+.uj2
+.uk2
+.ul2h
+.ul2p
+.um2
+.up2
+.upo1
+.upos2
+.upot2
+.ur2
+.ur3b
+.ur3è
+.uø2
+.us2
+.ust2
+.u¹2
+.ut2
+.uv2
+.uz2
+.u2z3b
+.u2z3d
+.u2z3l
+.u2z3m
+.u¾2
+.u2¾3¹í
+ú1
+úc2
+úè2
+ú2hl
+ú3h2lav
+új2
+úk2
+úp2
+ús2
+ú2s3t
+ús4tn
+ú3s4tav
+ú3s4t2r
+ú3s4t2ø
+ú4s5t3øi
+ú¹2
+út2
+úv2
+ú2z1k
+.vk2
+.vp2
+.vs2
+.vst2
+.v¹2
+.vt2
+.vz2
+.ve1
+.vec2
+.ved2
+.vì1h2l
+.veh2
+.ve2jc
+.ve2jè
+.ve2jp
+.ve2kt
+.vem2
+.ve2n1
+.ve2p3ø
+.vep2
+.ve2r
+.ve3ri
+.ves2
+.ve2s3l
+.ve2s3mí
+.ve2s3n
+.ve2s3t
+.ve3s4tav
+.ve¹2
+.ve2¹3k
+.vet2
+.ve2tch
+.vev2
+.ve2z3
+.ve3zl.
+.ve2l1b2
+.ve2l1k
+.ve2l1m
+.ve2l1t2
+.ve2l2t3l
+.vele1
+.vele2bn
+.veleh2
+.veles2
+.velest2
+.velez2
+.vodo1
+.vodot2
+.vodoz2
+.v¹e1
+.v¹e2ch.
+.vy1
+.vyb2
+.vyc2
+.vyè2
+.vyd2
+.vy2d1r
+.vy3d2rol
+.vy3d2ráp
+.vy3d2rás
+.vyh2
+.vyj2
+.vyk2
+.vyl2
+.vym2
+.vyn2
+.vyp2
+.vyr2
+.vyø2
+.vys2
+.vyst2
+.vy¹2
+.vy2¹3¹
+.vyt2
+.vyv2
+.vyz2
+.vý1
+.výè2
+.výh2
+.výk2
+.vým2
+.výp2
+.výr2v
+.výs2
+.výst2
+.vý¹2
+.vý2¹3k
+.výt2
+.výv2
+.výz2
+.vz1h2
+.vz1p2
+.vz1t2
+.vze1
+.vzed2
+.vzep2
+.vzes2
+.vze¹2
+.vzez2
+.zd2
+.zh2
+.zch2
+.zk2
+.zl2
+.zm2
+.zp2
+.zr2
+.zt2
+.zv2
+.zne1
+.znek2
+.znem2
+.znep2
+.zne2rv
+.znes2
+.zne¹2
+.znet2
+.za1
+.z3a2larm
+.z3akti
+.zab2
+.zaè2
+.zad2
+.zah2
+.zach2
+.zaj2
+.zak2
+.zal2
+.zam2
+.zap2
+.zar2
+.zaø2
+.zas2
+.zast2
+.za¹2
+.zat2
+.zav2
+.zaz2
+.zane1
+.zaned2
+.zanes2
+.zane¹2
+.uza1m2
+.uza1r2
+.uza1v2
+.zá1
+.záb2
+.zác2
+.zád2
+.záh2
+.zách2
+.záj2
+.zák2
+.nejzá1k2
+.zám2
+.záp2
+.zás2
+.zást2
+.zá¹2
+.zát2
+.záv2
+.záz2
+.z2e1
+.z3e2f
+.zed2
+.ze2d1n
+.zej2
+.zem2
+.ze2ms
+.ze2mn
+.zep2
+.zes2
+.zet2
+.zev2
+.zez2
+zù1
+%cizí pøedpony
+.a1e2ro
+.a1d2re
+.a1g2no
+.a1ch2r
+.a1k2l
+.a1k2re
+.an1es
+an3g2l
+.an2t1ar
+.anti1
+.antik2
+.antip2
+an1t2ro1
+.ar2ch1an
+.as2pek
+.a1s2t
+.as3t2r
+asym3p2t
+.a1t2r
+.aus¹t2r
+.auto1
+.abs¹t2
+.de1f2
+.de1g2
+.de1k2
+.de1p2
+.de2p3ta
+.de2z1
+.di1o
+.di1p2
+.dis3k2v
+dis3k2r
+dis3t2r
+.di1u
+.du1p2l
+.epi1
+.epig2
+.ex1
+.exk2
+.exp2
+.ext2
+.ex2o
+ex2i1s
+.fyto1
+.fytop2
+.ide1
+.ide2n
+.in1
+.inc2
+.inf2
+.ing2
+.ink2
+.ins2
+.int2
+.inter1
+.interp2
+.inters2
+.kom1p2
+.kon3g2
+.kon3k2
+.kon3s2
+.konst2
+.kon3t2
+.kon3v2
+.ko1o
+.hyper1
+.hypert2
+.hypo1
+.hypos2
+.kata1k2l
+.ko1i
+.ko1e
+.para1
+.paraf2
+.parag2
+.re1
+.ref2
+.reg2
+.re2j1
+.rek2
+.re2n2d
+.re2n2t
+.rep2
+.re2pti
+.res2
+.re2sp.
+.ret2
+.sub1
+.super1
+.superp2
+.supers2
+.supra1
+.sy1s2t
+.te1o1
+.topo1g2
+.tran2s1
+.tran3s2pi
+.tran3s2k2r
+.tran3s2c
+.tri1
+.trip2
+.tri2èk
+.tri2st
+.zoo1
+.zoop2
+.zoos2
+%pøípony a koncovky
+i1ent
+ru1ov
+3s2t2ví
+3s2t2vo.
+3s2t2va.
+3s2t2vu.
+3s2t2ve
+3s2tev.
+3s2tevn
+3s2t2vùm.
+3s2t2vy.
+3¾e.
+.m4¾e.
+3hle.
+c4hle.
+3li.
+3ly.
+3la.
+3nout.
+3nouti.
+i1án
+a1tb
+e1tb
+i1tb
+1t2va.
+1t2vy.
+1t2vì.
+1t2vu.
+1t2vou.
+1t2ev.
+1t2vám.
+1t2vách.
+1t2vami.
+3s2t2v
+a4s3t2v
+á4st3v
+3k2rac
+3k2rat
+3k2rát.
+3k2ráte.
+3p2lex
+1t2rof
+1s2trof
+%výjimky
+.a1v2¹ak
+.atmo1s2f
+.ce1d1r
+èesko3s4l
+èesko3b4r
+.e1gyp2t1
+.elek1t
+.elek3t1r
+.elek3t1ø
+elip1s
+elip1t
+eu1k2lei1d
+.i1h2ned
+kladko1s2t2roj
+moøe1p2lav
+.pe1t1r
+oka1m¾i
+s2t2ran
+z2d2rav
+zù1s2ta
diff --git a/hyph/danish.lh b/hyph/danish.lh
new file mode 100644
index 0000000..9747c06
--- /dev/null
+++ b/hyph/danish.lh
@@ -0,0 +1,1184 @@
+Lout hyphenation information
+%
+%  Danish hyphenation file, created by
+%  Jeffrey H. Kingston 22 April 1994
+%  from a file supplied by Jesper Hagen
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+æÆ
+øØ
+åÅ
+
+Patterns:
+.ae3
+.an3k
+.an1s
+.be5la
+.be1t
+.bi4tr
+.der3i
+.diagno5
+.her3
+.hoved3
+.ne4t5
+.om1
+.ove4
+.po1
+.så3
+.til3
+.yd5r
+.ær5i
+.øv3r
+ab5le
+3abst
+a3c
+ade5la
+5adg
+a1e
+5afg
+5a4f1l
+af3r
+af4ri
+5afs
+a4gef
+a4gi
+ag5in
+ag5si
+3agti
+a4gy
+a3h
+ais5t
+a3j
+a5ka
+a3ke
+a5kr
+aku5
+a3la
+a1le
+a1li
+al3k
+4alkv
+a1lo
+al5si
+a3lu
+a1ly
+am4pa
+3analy
+an4k5r
+a3nu
+3anv
+a5o
+a5pe
+a3pi
+a5po
+a1ra
+ar5af
+1arb
+a1re
+5arg
+a1ri
+a3ro
+a3sa
+a3sc
+a1si
+a3sk
+a3so
+3a3sp
+a3ste
+a3sti
+a1ta1
+a1te
+a1ti
+a4t5in
+a1to
+ato5v
+a5tr
+a1tu
+a3tø
+a5va
+a1ve
+a5væ
+a5z
+1ba
+ba4ti
+4bd
+1be
+be1k
+be3ro
+be5ru
+be1s4
+be1tr
+1bi
+bi5sk
+b1j
+4b1n
+1bo
+bo4gr
+bo3ra
+bo5re
+1br4
+brød3
+4bs
+bs5k
+b3so
+b1st
+b5t
+3bu
+bu4s5tr
+b5w
+1by
+by5s
+5bæ
+4c1c
+1ce
+ce5ro
+3ch
+4ch.
+ci4o
+ck3
+5cy
+3da
+4d3af
+d5anta
+da4s
+d1b
+d1d4
+1de
+de5d
+4de4lem
+der5eri
+de4rig
+de5sk
+d1f
+d1g
+d3h
+1di
+di1e
+di5l
+d3j
+d1k
+d1l
+d1m
+4d1n
+3do
+4dop
+d5ov
+d1p
+4drett
+5d4reve
+3drif
+3driv
+d5ros
+d5ru
+5drøv
+ds5an
+ds5in
+d1ski
+d4sm
+dstå4
+d4su
+dsu5l
+ds5vi
+d3ta
+d1te
+dt5o
+d5tr
+dt5u
+1du
+dub5
+d1v
+3dy
+3dæ
+3dø
+e5ad
+e3af
+e5ag
+e3ak
+e1al
+ea4la
+e3an
+e5ap
+e3at
+e3bl
+ebs3
+e1ci
+ed5ar
+edde4
+eddel5
+e4do
+ed5ra
+ed3re
+ed3rin
+ed4str
+e3e
+3eff
+e3fr
+3eft
+e3gu
+e1h
+e3in
+ei5s
+e3je
+e4j5el
+e1ka
+e3ke
+e3kl
+4e1ko
+e5kr
+ek5sa
+3eksem
+3eksp
+e3ku
+e1kv
+e5ky
+e3lad
+el3ak
+el3ar
+e1las
+e3le
+e4lek
+3elem
+e1li
+5elim
+e3lo
+el5sa
+e5lu
+e3ly
+e3læ
+e3lø
+e4mad
+em4p5le
+em1s
+en5ak
+e4nan
+4enn
+e4no
+en3so
+e5nu
+e5ol
+e3op
+e1or
+e3ov
+epi3
+e1pr
+e3ra
+er3af
+e4rag
+e4rak
+e1re
+e4ref
+er5ege
+5erhv
+e1ri
+e4rib
+er1k
+ero5d
+er5ov
+er3s
+er5tr
+e3rum
+er5un
+e5ry
+e3rø
+er5øn
+e1ta
+e1te
+etek4s
+e1ti
+e3tj
+e1to
+e3tr
+e3tu
+e1ty
+e5tæ
+e5tø
+e3um
+e3un
+3eur
+e1va
+e3ve
+e4v3erf
+e1vi
+e1væ
+e5x
+e3æ
+e5å
+1fa
+fa4ce
+fags3
+f1b
+f1d
+1fe
+fej4
+fejl1
+f1f
+f1g
+f1h
+1fi
+f1k
+3fl
+1fo
+for1en
+fo4ri
+f1p
+f1s4
+4ft
+f3ta
+f1te
+f1ti
+f5to
+f5tvi
+1fu
+f1v
+3fy
+3fæ
+3fø
+fø4r5en
+1ga
+g3art
+g1b
+g1d
+1ge
+4g5enden
+ger3in
+ge3s
+g3f
+g1g
+g1h
+1gi
+gi4b
+gi3st
+giø4
+5gj
+g3k
+g1l
+g1m
+3go
+4g5om
+g5ov
+g3p
+1gr
+gs1a
+gsde4len
+g4se
+gsha4
+g5sla
+gs3or
+gs1p
+g5s4tide
+g4str
+gs1v
+g4sø
+g5så
+g3ta
+g1te
+g1ti
+g5to
+g3tr
+gt4s
+g3ud
+gun5
+g3v
+1gy
+g5yd
+3gæ
+3gø1
+3gå
+4ha.
+heds3
+he5s
+4het
+hi4e
+hi4n5
+hi3s
+ho5ko
+ho5ve
+4h3t
+hun4
+hund3
+hvo4
+i1a
+i3b
+i4ble
+i1c
+i3dr
+ids5k
+i1el
+i1en
+i3er
+i3et.
+if3r
+i3gu
+i3h
+i5i
+i5j
+i1ka
+i1ke
+ik1l
+i5ko
+ik3re
+ik5ri
+iks5t
+ik4tu
+i3ku
+ik3v
+i3lag
+il3eg
+il5ej
+il5el
+i3li
+i4l5id
+il3k
+i1lo
+il5u
+i3mu
+ind3t
+5inf
+ings1
+in3s
+in4sv
+inter1
+i3nu
+i3od
+i3og
+i5ok
+i3ol
+ion4
+ions1
+i5o5r
+i3ot
+i5pi
+i3pli
+i5pr
+i3re
+i3ri
+ir5t
+i3sc
+i3si
+i4sm
+is3p
+i1ster
+i3sti
+i5sua
+i1ta
+i1te
+i1ti
+i3to
+i3tr
+it5re.
+i1tu
+i3ty
+i5tæ
+i1u
+i1va
+i1ve
+i1vi
+i3ø
+j3ag
+jde4rer
+jds1
+jek4to
+4j5en.
+j5k
+j3le
+j3li
+jlmeld5
+jlmel4di
+j3r
+jre5
+ju3s
+5kap
+k5au
+5kav
+k5b
+kel5s
+ke3sk
+ke5st
+ke4t5a
+k3h
+ki3e
+ki3st
+k1k
+k5lak
+k1le
+3klu
+k4ny
+5kod
+1kon
+ko3ra
+3kort
+ko3v
+1kra
+5kry
+ks3an
+k1si
+ks3k
+ks1p
+k3ste
+k5stu
+ks5v
+k1t
+k4tar
+k4terh
+kti4e
+kt5re
+kt5s
+3kur
+1kus
+3kut
+k4vo
+k4vu
+3kø
+3kå
+5lab
+lad3r
+5lagd
+la4g3r
+5lam
+1lat
+l1b
+ldiagnos5
+l3dr
+ld3st
+1le.
+5led
+4lele
+le4mo
+3len
+1ler
+1les
+4leu
+l1f
+lfin4
+lfind5
+l1go1
+l3h
+li4ga
+lingeniø4
+4l5ins
+4l3int
+li5o
+l3j
+l1ke
+l1ko
+l3ky
+l1l
+l5mu
+lo4du
+l3op
+4l5or
+3lov
+4l3p
+l4ps
+l3r
+4ls
+lses1
+ls5in
+l5sj
+l1ta
+l4taf
+l1te
+l4t5erf
+l3ti
+lt3o
+l3tr
+l3tu
+lu5l
+l3ve
+l3vi
+l3væ
+5løs
+1ma
+m1b
+m3d
+1me
+4m5ej
+m3f
+m1g
+m3h
+1mi
+mi3k
+m5ing
+mi4o
+mi5sty
+m3k
+m1l
+m1m
+mmen5
+m1n
+3mo
+mo4da
+4mop
+4m5ov
+m1pe
+m3pi
+m3pl
+m1po
+m3pr
+m1r
+mse5s
+ms5in
+m5sk
+ms3p
+m3ste
+ms5v
+m3ta
+m3te
+m3ti
+m3tr
+m5tå
+m1ud
+1mul
+mu1li
+3my
+1mæ
+3mø
+3må
+3na
+4nak
+1nal
+n1b
+n1c
+4nd
+n3dr
+nd5si
+nd5sk
+nd5sp
+1ne
+ne5a
+ne4da
+nemen4
+nement5e
+neo4
+n3erk
+n5erl
+ne5sl
+ne5st
+n1f
+n4go
+4n1h
+1ni
+4nim
+ni5o
+ni3st
+n1ke
+n1ko
+n3kr
+n3ku
+n5kv
+n3kæ
+4n1l
+n1m
+n1n
+1no
+n3ord
+n5p
+n3r
+4ns
+n3si
+n1sku
+ns3po
+n1sta
+n5sti
+n1ta
+nta4le
+n1te
+n1ti
+ntiali4
+n3to
+n1tr
+nt4s5t
+nt4su
+n3tu
+n3ty
+n5tæ
+4n1v
+3ny
+n3z
+3næ
+4n5æb
+5nø
+o3a
+o4as
+ob3li
+o1c
+o4din
+od5ri
+od5s
+od5un
+o1e
+of5r
+o4gek
+o4gel
+o4g5o
+og5re
+og5sk
+o5h
+o5in
+oi6s5e
+o1j
+o3ka
+o1ke
+o3ku
+o3la
+o3le
+o1li
+o1lo
+o3lu
+o5ly
+o5læ
+1omr
+on3k
+ook5
+o3or
+o5ov
+o3pi
+op3l
+op3r
+op3s
+3opta
+4or.
+or1an
+3ordn
+ord5s
+o3re.
+o3reg
+o3rek
+o3rer
+o3re3s
+o3ret
+o3ri
+3orient
+or5im
+o4r5in
+or3k
+or5o
+or3sl
+or3st
+or3ø
+o3si
+o3so
+o3t
+o1te
+o5un
+ov4s
+o5å
+3pa
+pa5gh
+p5anl
+p3d
+4pec
+3pen
+1per
+pe1ra
+pe5s
+pe3u
+p3f
+4p5h
+1pla
+p4lan
+4ple.
+4pler
+4ples
+p3m
+p3n
+5pok
+4po3re
+3pot
+4p5p4
+p4ro
+1proc
+5præ
+p3sk
+p5so
+ps4p
+p3st
+p1t
+1pu
+pu5b
+p5ule
+p5v
+5py3
+5pæd
+på3
+qu4
+4raf
+ra5is
+4rarb
+r1b
+r4d5ar
+r3dr
+rd4s3
+4reks
+1rel
+re5la
+r5enss
+5rese
+re5spo
+4ress
+re3st
+re5s4u
+5rett
+r1f
+r1gu
+r1h
+ri1e
+ri5la
+4rimo
+r4ing
+ringse4
+ringso4r
+4rinp
+4rint
+r3ka
+r1ke
+r1ki
+rk3so
+r3ku
+r5kæ
+r1l
+rmo4
+r5mu
+r1n
+ro1b
+ro3p
+r3or
+r3p
+r1r
+rre5s
+rro4n5
+r1sa
+r1si
+r5skr
+r4sk5v
+rs4n
+r3sp
+r5stu
+r5su
+r3sv
+r5tal
+r1te
+r4teli
+r1ti
+r3to
+r4t5or
+rt5rat
+rt3re
+r5tri
+r5tro
+rt3s
+r5ty
+r5tæ
+r5tø
+r3ud
+run4da
+5rut
+r3va
+r1ve
+r3vi
+r3væ
+ry4s
+r5æl
+4røn
+5rør
+3råd
+r5år
+s3af
+1sam
+sa4ma
+s3ap
+s1ar
+1sat
+4s1b
+s1d
+sdy4
+1se
+s4ed
+5s4er
+se4se
+s1f
+4s1g4
+4s3h
+si4bl
+1sig
+s5int
+5sis
+5sit
+5siu
+s5ju
+4sk.
+1skab
+1ske
+s3kl
+sk5s4
+5sky
+s4kå
+s1le
+s1li
+slo3
+5slu
+s5ly
+3slå
+s1m
+s4my
+4snin
+s4nit
+s4næ
+so5k
+5sol
+5som.
+3somm
+s5oms
+5somt
+3son
+4s1op
+sp4
+3spec
+4sper
+3s4pi
+s1pl
+3sprog.
+s5r4
+s1s4
+4st.
+5s4tam
+1stan
+st5as
+3stat
+1stav
+1ste.
+1sted
+3stel
+5stemo
+1sten
+5step
+3ster.
+3stes
+5stet
+5stj
+3sto
+st5om
+1str
+5stø
+1stå
+s1ud
+3sul
+s3un
+3sur
+s3ve
+3s4y
+1sy1s
+1sæ
+4s5æn
+1sø
+s5øk
+så4r5
+5ta.
+1tag
+tands3
+4tanv
+4tb
+tede4l
+teds5
+3teg
+5tekn
+teo1
+5term
+te5ro
+4t1f
+6t3g
+t1h
+tialis5t
+3tid
+ti4en
+ti3st
+ti4ø
+4t3k
+4t1l
+tli4s5
+t1m
+t1n
+to5ra
+to1re
+to1ri
+tor4m
+4t3p
+t4ra
+4tres
+tro5v
+1try
+3træk.
+4ts
+t3si
+ts4pa
+ts5pr
+t3st
+ts5ul
+t4sø
+t5så
+4t1t
+t5uds
+5tur
+t5ve
+t3væ
+1typ
+u1a
+5udl
+ud5r
+ud3s
+3udv
+u1e
+ue4t5
+uge4ri
+ugs3
+u5gu
+u3i
+u5kl
+uk4ta
+uk4tr
+u1la
+u1le
+u5ly
+u3læ
+u5pe
+up5l
+u5q
+u3ra
+u3re
+u4r3eg
+u1rer
+u3ro
+us5a
+u3si
+u5ska
+u5so
+us5v
+u1te
+u1ti
+u1to
+ut5r
+ut5s4
+5u5v
+va5d
+3varm
+1ved
+ve4l5e
+ve4reg
+ve3s
+5vet
+v5h
+vi4l3in
+1vis
+v5j
+v5k
+vl4
+v3le
+v5li
+vls1
+1vo
+4v5om
+v5p
+v5re
+v3st
+v5su
+v5t
+3vu
+3værd
+1værk
+5vå
+y3a
+y5dr
+y3e
+y3ke
+y5ki
+yk3li
+y3ko
+yk4s5
+y3kv
+y5li
+y5lo
+y5mu
+yns5
+y5o
+y1pe
+y3pi
+y3re
+yr3ek
+y3ri
+y3si
+y3ti
+y5t3r
+y5ve
+y5væ
+zi5o
+æb3l
+æ3c
+æ3e
+æg5a
+æ4gek
+æ4g5r
+ægs5
+æ5i
+æ5kv
+ælle4
+æn1dr
+æ5o
+æ1re
+ær4g5r
+æ3ri
+ær4ma
+ær4mo
+ær5s
+æ5si
+æ3so
+æ3ste
+æ3ve
+øde5
+ø3e
+ø1je
+ø3ke
+ø3le
+øms5
+øn3st
+øn4t3
+ø1re
+ø3ri
+ørne3
+ør5o
+ø1ve
+å1d
+å1e
+å5h
+å3l
+å3re
+års5t
+å5sk
+å3t
diff --git a/hyph/dutch.lh b/hyph/dutch.lh
new file mode 100644
index 0000000..18c8657
--- /dev/null
+++ b/hyph/dutch.lh
@@ -0,0 +1,6166 @@
+Lout hyphenation information
+%
+% Created by Jeff Kingston 7 October 1994 from a TeX hyphenation
+% patterns file supplied by Ronald Rietman, who says it is nehyph1.tex
+% from the CTAN archive.  A larger file called nehyph2.tex was tried
+% first, but proved to exceed Lout's internal limits on the size of a
+% hyphenation table.  Note that there are no accented characters
+% in this file, which means that Lout will never hyphenate a Dutch
+% word containing an accented character.  To summarise a discussion
+% by Rietman, this is probably the safest thing although it does miss
+% a few opportunities for acceptable hyphenations, mainly of words
+% containing a trema which Lout could not hyphenate correctly anyway
+% since the following letter changes when hyphenating.
+%
+% The following comment came with the file:
+%
+% These are TeX hyphenation patterns for Dutch generated at the
+% Computer Science Department of Utrecht University.
+% Padualaan 14, P.O. Box 80.089, 3508 TB Utrecht, The Netherlands.
+% Telephone: +31-30-531454, e-mail: postmaster@cs.ruu.nl
+%
+% Copyright (c) 1989 by CELEX.
+% CELEX, Wundtlaan 1, 6525 XD Nijmegen, The Netherlands.
+% Telephone: +31-80-615751, email: celex@hnympi52.bitnet
+%
+% General permission for non-profit usage is granted.
+% For commercial usage contact CELEX at the above address.
+% Copying of this file is only permitted with inclusion of
+% this copyright notice and with these same restrictions.
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+
+Patterns:
+.ad3ek
+.ad3eq
+.ad3op
+.ad3or
+.ad3s
+.af3ra
+.al3f
+.al4st
+.am3p
+.an3d4
+.an4kl
+.an3th
+.ap2n
+.ar3tr
+.as3p
+.as1t
+.as3tr
+.at4r
+.ba3ta
+.be3la
+.bij1
+.bli4
+.bu2s
+.ca4te.
+.ce4len
+.co4ler
+.culot4
+.da4gi
+.dag3r
+.da4k
+.de2a
+.de3ra
+.de3ro
+.di4s
+.ed3w
+.ek3s
+.ek4w
+.elo3
+.en3t
+.er4f3l
+.erop3
+.ert4
+.er3ui
+.es3
+.exi1
+.gaat3
+.ga4me.
+.ge3f
+.ge3la
+.ge3n4a
+.ge3r4a
+.ges4
+.ge3sk
+.he2a
+.he2r
+.her3i
+.her3u
+.ho4les
+.ho4met
+.hy4de
+.ij2s
+.ij4s3l
+.ima4ge
+.in1
+.in3d4
+.ink4
+.in3s4
+.in3t
+.jes2
+.ka4taa
+.ka4te.
+.ke3ra
+.ker4kl
+.le4b
+.le4go
+.le4gr
+.len4s
+.les3
+.le3th
+.luit4
+.mein3
+.me3so
+.mo4s
+.mos3k
+.na3fl
+.na1s
+.och3
+.oe4r
+.oe4s3
+.olf4
+.olie3
+.om1a
+.on1
+.on3i
+.on3s
+.on2t
+.pa2k
+.pe4te.
+.prik3
+.puit4
+.quit4
+.raat4
+.ran4ch
+.read3
+.re4mol
+.res3p
+.rijk4s
+.ro4l
+.ro4q
+.ro4sk
+.sa4p
+.sce4ne
+.se4st
+.se2t
+.sha4
+.ski3s
+.sli2
+.snap3
+.st2
+.ste4m3
+.sty4
+.sul3
+.taat4
+.tan4da
+.ta3ro
+.te4f
+.tek2
+.ten4tj
+.te4ra
+.ter4pa
+.thee3
+.ti4me
+.ti4na
+.to2s
+.traat4
+.ts4
+.tu4ne.
+.ui2
+.ui3le
+.uit1
+.uit4je
+.van3o
+.veld3
+.ver1
+.vu4l3
+.was3t
+.we2l
+.wel3o
+.wet4s
+.work3
+.xe1
+.ya2l
+.zes3
+.zit3
+a4a4
+aad3a
+aad3o
+aad3r
+aag1
+aag3r
+aags4
+aai1
+aak1
+aak3l
+aak3r
+aak3w
+aal1a
+2aald
+aal1e
+aal3k
+aal1o
+4aalr
+4aalv
+aam1
+aan1
+aan3a
+1aanj
+aan3sp
+3aanwi
+aap1a
+aar1
+aar4th
+aas3e
+aas3f
+aas3p
+aat3a
+aat3h
+aat3o
+aat3r
+a1b
+abak4s3
+aba4s
+abe4la
+able2
+a4ble.
+a4bles
+3abonn
+ab3ru
+4ace
+a2ce.
+a3cee
+a3cep
+a4cer.
+a4cers
+a4ces
+2ach.
+a3cha
+2a1che
+4a1chi
+a1cho
+a3chr
+4achs
+a1chu
+2acl
+2aco
+2acr
+4acs
+a1d
+2ad.
+ad2a
+ad3aa
+ad3ad
+ada2r3
+a4dete
+ade4tj
+2adi
+2adl
+ad3ora
+2adp
+3adres
+ad3sla
+4ady
+2ae
+aege4
+aek4
+ael4
+a4fau
+af3d
+af1dw
+4afe
+af3ei
+afe4la
+1afg
+2afi
+a4fin
+af3l
+2afo
+afon4d
+af1r
+af3ric
+af3ris
+af3rit
+af3ru
+af3s
+a4fu
+3afzet
+4aga
+ag1ad
+agas4s
+age2o
+a4gins
+ag3le
+ag3ord
+ag3reg
+ag3roo
+ag3sla
+ag4spr
+a4g3uu
+a1h
+4ah.
+ah3l
+ai1e
+aig4
+aik4
+ails4
+ai4lu
+2ais4
+ai3sc
+ai1so
+ai4sol
+ai1t
+4a1j
+2ak.
+ak3arb
+a4ked
+aker4se
+a2kes
+a2kez
+2akh
+akhou4
+ak3id
+a2k1l
+ak3la
+ak3lo
+ak3na
+ak3ne
+a4kog
+ak3ond
+4akp
+2aks
+4aks.
+ak1st
+4akt.
+ak3we
+a1la
+alan4st
+a4lap
+2ald
+a2lel
+a4lents
+al2fe
+alf3l
+alf2r
+4alia
+al4kank
+al4kro
+al4mac
+al4mol
+a1lo
+al3omt
+alo4n
+al3ph
+als3j
+al2sl
+als3oo
+al4stem
+al4sti
+al3tha
+a1lu
+4ambe
+1ambt
+ame4ran
+3ameu
+4amm
+am2pl
+am4se
+am4sm
+am4sn
+am2sp
+am3spe
+an2aa
+an4af
+a2na2g
+an3arc
+an4ded
+2andj
+and4ri
+a4nec
+an3emi
+a3nen
+an3est
+an4gan
+an4gap
+anges4
+an2gr
+a3ni
+4ank.
+an4kaa
+an4kak
+an4kas
+an4kna
+an2kr
+ank3ro
+annet4
+ano3st
+an3scr
+an2so
+an2sp
+antes4
+ant2h
+an3tha
+a4nuu
+anval4s
+a1o
+a2ob
+a4op4
+4ap.
+a1pa
+a2pe.
+a4ped
+ap3j
+ap3le
+a1plu
+a1po
+1appa
+3appr
+a1pr
+a4p3rij
+april3
+ap2sl
+ap2sp
+2apu
+a1py
+a1q
+a4ques
+4ar.
+a1ra
+ar2da
+ard3ac
+ard3ol
+ard3op
+ar2dr
+ar4dran
+ard3ri
+ard3w
+a4rew
+arg3l
+3argum
+a1ri
+ari4an.
+ari4ce
+ariet4
+ar3k4l
+2arl
+ar4map
+ar4mu
+ar4nes
+a1ro
+2aroo
+ar4s1l
+ars3la
+ars3m
+ar2sn
+ar2so
+ar4spa
+ar4spr
+ar4stek
+ar4str
+ar4tak
+ar4tap
+ar2tj
+ar4top
+ar2tr
+art4sl
+a3rus
+a1ry
+4asa
+asal4
+as1ap
+a2sc
+as4ch
+as4cr
+a2seb
+a2sec
+as4ee
+a2sel
+a3sem
+as4en
+as2hi
+asi4on.
+a2sl
+as3lam
+as3lan
+as3li
+aslijs4
+as3m
+as3pa
+as3pi
+as3pl
+assi3s
+3assoc
+as1ta
+as3tan
+a4s3te
+as4th
+as3ti
+as3ton
+a1t
+at1ac
+a4talen
+ata1s
+a4taz
+ate4rec
+ate4rek
+4atg
+at2ha
+a3thar
+a2tj
+3atlas
+3atmos
+2atn
+a2t3re
+a3trek
+at2sl
+at4slo
+at2sp
+at4stak
+at4sti
+at4stre
+at2tu
+2au
+4au.
+au1ch
+au3e
+3aug
+au3kr
+auli4ne
+aul4le
+aup2
+aur2
+4aus
+au3sa
+au1t4
+3auto
+au1wi
+4auz
+a1v
+aven3s
+ave3re
+ave3ri
+aver4u
+a3vi
+avil4l
+1avo
+4avot
+a1w
+4ay
+ay4a
+a1z
+aze3s
+1ba
+baar3t
+babe4
+babet4
+ba4ch
+ba4da
+ba4des
+ba4dr
+bag4h
+ba4ka
+bal4kla
+ba3na
+ba4ne.
+ban4kl
+ban4kn
+ban4k3o
+ban4kr
+bank3w
+ban4q
+baseli4
+bassi4
+bas3t
+2b1b
+bbe4lag
+bbe4lee
+bbe4n
+2b1c
+2b1d
+3be
+be3am
+be4art
+be3dw
+beet1
+be3g4
+beis4
+bei4tj
+be3ke
+be3kl
+be4lex
+bel3k
+bel3sp
+be1ra
+bergi4
+ber4gl
+ber4gr
+be1r2o
+be4ron
+bers4k
+ber4sto
+be1s4
+be3sm
+be1tw
+beur4s
+2b1f
+2bg
+4b3h
+1b2i
+bid3s4
+bi4du
+bi3eu
+bij3d
+bij3k
+bijs2
+bij3sl
+bij3sm
+bin4dr
+bin4tj
+bio3
+bis4a
+bi3se
+bis4tr
+bi1tr
+bit4se
+2b1j
+2b1k
+1b4l
+bleus4
+3bli
+blik3o
+4blish
+blok3
+2b1m
+b1n
+1bo
+boe4ga
+boe4kn
+boe3s4
+bo4les
+bo2ma
+bom3aa
+bo4mo
+bonai4
+bond4s
+bon4tj
+bon4to
+boos4t3
+bor4sto
+bos3
+bo4sp
+bos4ses
+bo2su
+bo2th
+bot3j
+bo4tu
+boven3
+1b2r2
+braat4
+b4re
+breis4
+bri4a
+bri4l
+bro4n
+2b1s2
+b3s4c
+b2sla
+bsou4
+2b1t2
+bt4s3
+1bu
+buit4j
+bus3c
+bu2su
+b1v
+2bw
+byr4
+bys4
+2b1z
+1ca
+ca4chem
+cae3
+cag4
+ca2k
+can4nes
+ca3pa
+ca2pe
+cara4t
+ca4re.
+ca3ro
+cas3t
+cat2
+ca3ta
+cate4r
+ca3th
+2c1c
+cce4s
+1ce
+cee2
+cei4
+3cel
+celi4n
+ce4lop
+4cema
+ce3na
+2ceni
+3cent
+4cepa
+ce3ra
+ce3r4o
+ce2s
+ce3s2a
+4cesp
+ce3su
+ce2tj
+2ch.
+chaar4s
+4chav
+2chc
+2che.
+4cheb
+2cheg
+2chek
+che4lee
+4chemu
+4cheor
+4chep
+3cheq
+che3ri
+4chero
+2ches
+2chev
+4chg
+4chh
+chi4k
+4chm
+4chn
+cho3s
+2chp
+3chris
+2cht
+3chum
+2chw
+3ci
+ci4al.
+cier4s
+ci1eu
+ci4le.
+ci4nen
+ci1p
+ci4so
+ci3t4
+c3j
+2c2k
+cka4
+ck1en
+ck3ers
+ck3l
+ck3n
+cks4
+1c2l
+cle4v
+c4li
+cli4q
+clo4ne.
+clo4se.
+cly4
+2cn
+cno4
+1co
+3co.
+3coa
+3cod
+3col
+co4le.
+colet4
+co2lu
+3com
+3con
+con3g
+con3s
+cop4
+3copa
+co4pe.
+co3pr
+coquet4
+3cor
+co3ro
+corp2
+3cos
+3cot
+3cou
+4cout
+co2v
+4c1q
+c4ques
+1c4r2
+cra4y
+2crib
+3cris
+cros4
+crui4
+2c1t
+ct3ad
+cte2n
+c2th
+cti4on.
+cti4ons
+c2tj
+ctoi4
+c2ton
+cto4rin
+ctu4re.
+1cu
+cu4ad
+cuk4
+3cul
+cur3s
+cy4th
+c3z
+1da
+3daag
+4daam
+4daanb
+d3aanw
+2d1af
+da3fr
+da2ga
+da4ged
+da4gon
+dag3op
+da4gor
+da2gr
+da2gu
+2d3akk
+dak3l
+da2k3r
+4daks
+4dalar
+4dalm
+d2ame
+3dan
+da4nas
+dan4kl
+dan4sm
+dans3p
+2d1ap
+d2ape
+3dapes
+da2ra
+2d1arb
+3dari
+dar2m
+darm3a
+das3t
+4d3aut
+da4ve.
+2d1b4
+dbou4wi
+2d1c
+2d3d2
+dde4lev
+dde2n
+dde4red
+dde4ree
+dde3s
+1de
+de1ch
+2deen
+dee4r
+dee3t
+4deff
+4deg.
+2dei
+de4klaa
+de4klag
+de4kna
+4deksa
+de4lac
+4delas
+del3dr
+4delec
+4delek
+4d3elem
+de4leng
+de4lon
+de4lov
+del4sl
+del4str
+4demai
+4demm
+d4en.
+de4nab
+den4ac
+den4du
+de4nep
+den4kof
+den4kop
+den4kr
+de2no
+den3oo
+de3rab
+de3ras
+de4rei
+de4rem
+de4rep
+de4ret
+de4rim
+de4rin.
+der3k
+der3na
+der3of
+der3on
+der4sa
+4derts
+der1u
+de2s
+de4sk
+de3sl
+des4pel
+de3sta
+des3ti
+de3sto
+de3str
+det2
+de3ta
+4deten
+de3tw
+dewin4d
+2dex
+3dex.
+2d1f2
+2d1g
+d4ge.
+d4ges.
+d3g4l
+2d1h
+d3he
+dhun4
+1di
+dia3s2
+die2f
+die4tra
+di1eu
+di2ga
+dig3aa
+2dijz
+di4ko
+2dind
+2dinf
+2dinr
+2d1ins
+4dinw
+4dinz
+di4sin
+2d1j
+2d1k
+2d3l
+dlan4de
+dli2n
+2d1m
+dmoes4
+2d3n
+1do
+2doef
+doe2l
+d4ok
+dok4r
+dolk3s
+do2mo
+dom2s
+2dont
+3donti
+dont4l
+2dop
+do4pe.
+do4pes
+3dopj
+d3o4pl
+3dopt
+2d1org
+do3ro
+dors3m
+do3sk
+2d3p2
+dpren4
+d2r2
+3dra
+4drand
+4drap
+4dras
+d4re.
+d3rec
+d3red
+d3rege
+4d3rel
+3dremp
+d3resu
+2dric
+dries4
+3d4rif
+d3rijd
+d3rijk
+3drijv
+3drin
+3dris
+d3rit
+dri2v
+4droei
+3drog
+4drok
+d3rond
+d3rood
+4droos
+d3rov
+d4roy
+4d3roz
+4drug
+drug4s
+d3ruim
+3druk
+4drus
+4ds
+ds1a
+dsa4d
+ds2al
+dsas3
+d3sch
+ds4cor
+d4sed
+d2see
+d4sek
+dse4la
+d3sen
+d4ses
+dsex2
+d2si
+dsi4ga
+d2sl
+d3slaa
+d3slac
+ds3lie
+d3slin
+ds4mee
+ds3na
+ds3no
+d3snu
+ds1o
+ds2oo
+d4spal
+d4spet
+d1spi
+d4spon
+d3spor
+ds4pre
+d1st
+d3sta
+d4staal
+d4stab
+d4staf
+d4stal
+d3ste
+d4stek
+ds3th
+d4stit
+d2su
+d3sur
+2d3t2
+1du
+du4bl
+2duil
+dui4t
+4duitg
+du1o
+dus3
+du4wee
+2d1v
+2d1w
+d2wa
+d3waar
+d3wac
+4dwarm
+4d3wat
+d3weg
+d4wei
+d3wek
+d3wer
+d3wes3
+d3wet
+1dy
+4dyo
+dy2s3
+2d1z
+d2zj
+e1a
+e3aa
+e3ac
+e4ade.
+e4ades
+ea2di
+ea4dor
+ea2gu
+e3ai
+ea2k
+e2akd
+e4ake
+e4ako
+eals4
+e2am
+e3amb
+e3and
+e3ant
+e4anu
+ea2ri
+ea2s
+e4at.
+e2ath
+e4atm
+eatri4
+eatu4
+eau4n
+eau3s4t
+e1b
+ebo4k
+e3br
+e3cha
+e1che
+e1chi
+e3cho
+ec3le
+3econo
+ecor2
+ec4tin
+e1d
+4ed.
+e3dam
+ed3ijz
+e2dov
+e3dru
+edsel3
+ed1sp
+ed2w
+e3dwan
+e2e
+ee2da
+ee2f
+eef3l
+ee4gli
+ee2gr
+ee2k
+eek1e
+eek3n
+ee3ko
+ee3kri
+eek3ur
+eek3uu
+ee2l
+ee3led
+ee3li
+eel3k
+eel4si
+2eem
+ee2n1
+eeng4
+een3k
+een3sl
+eep3ac
+eer1a
+ee2ri
+eer3in
+eer3k
+eer3om
+eer4ov
+ee2s
+ee3sc
+ees4ch
+ee4sem
+ees3li
+ee3smu
+ee3spr
+ees3te
+ee2t
+eet3h
+eet3oo
+eetra4
+ee4tw
+e4fad
+ef3da
+3effec
+3effek
+ef4fle
+e1fl
+e4fom
+e1f2r
+ef3sm
+e1g
+egas4k
+e4gec
+ege4las
+ege4lov
+e4gos
+eg3s4
+e1h
+eid4sp
+ei1e
+eie3s
+e1ij
+eil3d
+eil3m
+ei2lo
+e2in
+ei4nap
+ein4do
+ein4dr
+ein4du
+ei4ned
+ei4re.
+ei2s3a
+eis4lo
+eis4p
+eis4ta
+eis4tel
+eit2
+ei1tj
+ei4too
+eit4s
+eit3z
+e3j2
+e3kaa
+e3kam
+e3kas
+2eke
+ek4er
+ek2et
+e4kez
+ek3ins
+e4klast
+e3kled
+ek3les
+e4koli
+ek3ov
+ek4ru
+ek1sa
+3eksam
+3eksem
+eks1p
+e1kw
+e1la
+el1ac
+el1af
+el3arb
+e4las.
+el2dr
+e2lel
+e3len
+e3lep
+e4lert
+e4leta
+e3lev
+el4faa
+el4fend
+3elfta
+el3gl
+e3lig
+e4lind
+e4linga
+eli4p
+3elix
+elk3s4
+e1lo
+e2lob
+e3lok
+e2lol
+el3oli
+e4lom
+el3ops
+e2lor
+el4sj
+els2u
+e1lu
+e1m
+emes3
+em3ins
+e4mir
+en1ac
+e2nak
+en3akk
+e2nal
+en3ana
+e2nap
+en3app
+e2nas
+en3asi
+ena4sp
+e2nav
+e2naz
+en4ce.
+en3dar
+ende4ra
+en4dur
+e2nec
+en3ech
+en3eil
+ene4n3
+e4nent
+e3ner
+e4nerf
+3energ
+e4nerv
+e3nes
+e4nete
+e2nex
+en3ga
+enge3s
+engs4
+e4nid
+enier4t
+e4nink
+e3nis
+4enkl
+en4kre
+e2non
+enoot3
+en1op
+eno4pl
+e2nor
+e3nor.
+en3ord
+en1ov
+en2sl
+en2sn
+en2so
+ens3on
+en4stin
+ent2h
+en4trol
+ent4sl
+ent4sp
+en1ui
+e2nun
+en3ur
+e2nuu
+e1o
+eoga4
+e3on
+eonti4n
+e3op
+eop4l
+eop4r
+e4or4ge
+eo1ro
+eo3s4
+eota4
+e1p
+ep2a
+e4paf
+ep4ap
+e4peen
+3epid
+ep3j
+e4poge
+ep2s
+eps3pr
+ep4tr
+e1q
+e3ra.
+e3raad
+e4raap.
+er1ac
+er3afd
+e1rai
+er3aks
+e4rall
+e3ranc
+e3rape
+e1rat
+e2rav
+erd2a
+erd4i
+er3do
+er3d4w
+e3rec
+er3eff
+e4reig
+er3eks
+erel2
+ere4neg
+ere4se.
+ere4tj
+e4rets
+er3gl
+e1ri
+erie3s
+erie3t
+e3rif
+e3rig
+e3rij.
+e3rije
+e4rijs
+e4rijz
+e4r3ind
+er3ins
+e4r3int
+erip4
+e3ris
+e3riz
+er3ma
+er3mo
+e3ro.
+e1rob
+e4roc
+e1rod
+e1roe
+e4roed
+e3rok
+e1rol
+er3oli
+e3roma
+er3omk
+er1on
+e3ron.
+er3oog
+er3oor
+e2r1op
+ero4pi
+e4r1or
+e1ros
+e3rot
+er1ov
+er3oxy
+ert4h
+er3tr
+e1ru
+e3ruim
+eruit4j
+eru2m
+e2r3ur
+er3uu
+4es.
+e3san
+e3sas
+e3sch
+e3sem
+e3shop
+es3ill
+e3sjo
+3eskad
+e1s2m
+e1sn
+e1so
+e3sol
+e1sp
+es3pek
+e4spen
+es4poo
+e3stad
+es4tak
+e4s3te.
+e3s4tem
+es3ten
+es3ter
+es4teu
+e2sti
+es3tig
+es3tin
+e3stof
+e1stu
+e3sy
+e1ta
+e3tali
+et4ana
+eta4p
+e4tau
+e3te
+etek4k
+ete3ra
+e1th
+et2ha
+et3ham
+etien4
+e3til
+e3ting
+e1tj
+et2jo
+e1to
+e3ton
+e1tr
+et3rui
+et3sap
+et4sla
+et4sli
+et2sp
+ets3pr
+et4stek
+et3s4u
+e1tu
+et2w
+e3twi
+4eu.
+eu4ce
+eu3e
+eug4dr
+eug4r
+2eui
+e1uit
+eu4ler
+e3um.
+eu4na
+eun3s
+eun3t
+eu4rad
+eu4rat
+eu4rij
+eus3t
+eut2h
+2eu2w1
+e1v
+eval4s
+even4st
+eve3ri
+evol4ga
+e1w
+ew2h
+e3wi
+1exam
+1exem
+4exi
+1exp
+3extr
+ey2n
+eys4
+e1z
+4ez.
+ezen4s
+ezin4s
+1fa
+f3aar
+f4ab
+face4
+2f1ach
+fa4den
+f4ag
+fa2ke
+fal4to
+4fana
+fant4
+fa4re.
+3fase
+f2av
+2f1b
+f1c
+2fd
+f2da
+f4dele
+fde4s3
+fdes4m
+f4dh
+f2din
+f3doe
+f1dr
+fd4ra
+fd4ru
+fd2w
+1fe
+fe2a
+fede1
+fee4l
+f3een
+3fees
+fe4lov
+3fem
+fen3t
+fe3rab
+fe3ran
+fe4ret
+fes3
+fes4p
+fe4tj
+feur4
+2fex
+2f1f2
+ff3s4
+f3fu
+4f3g2
+fge1
+fgo4v
+4f1h
+1fi
+fi3ch
+3fie
+fie3tj
+2f1ijz
+fi4le.
+film3a
+fi4nel
+fi4no
+4fint
+fisto3
+f1j
+2f1k
+f2l4
+f3laf
+fle2t
+4flie
+4f3lij
+f4lip
+f4lor
+f4lot
+f3loz
+2f3m
+fma4d
+f1n
+1fo
+2foef
+2f3of
+f3oms
+fon3te
+f3oog
+2f1o2p
+2f3org
+3form
+for4tj
+fo1ru
+2f3oud
+foy4
+2f3p
+fr2
+1fra
+fra4m
+f2ras
+f2raz
+f3reg
+fre4t
+f4rez
+f2ri
+f3rij
+fri4te
+f2rod
+4frol
+fru3g
+2f1s
+f2sa
+f3sch
+f3sel
+f4sh
+fsho4
+f3s2j
+f4slap
+f4sled
+fs2m
+f2s1o
+f3ste
+fste4m
+f3s4ti
+f3stof
+f3stu
+2f1t
+f4tene
+f2th
+f2tj
+ft3je
+ftwa4
+1fu
+f2un
+2fuu
+f3uur
+2f1v
+2f1w
+1fy
+4f1z
+1ga
+gaar3t
+4gabc
+gaby4
+2g1ac
+4gaft
+4gafw
+4gah
+gal2a
+ga4mes
+gamo4
+gan3d
+gan4st
+gapo4
+4g3arb
+g3arm
+g3arti
+ga2s
+ga4se
+gas3p
+gas3tr
+2gaut
+4gavo
+gazi2
+2g1b
+2g1c
+2g1d
+g3de
+g4dell
+g4dim
+g3doe
+gd2s
+1ge
+ge3a
+ge4ari
+4geb.
+2g3ebb
+2gebd
+4gebt
+ge1c
+gedan4
+gee4
+ge3ei
+g3eend
+gee2r
+gef4
+4geff
+gei4la
+gei4tj
+gek4l
+ge3k4w
+gel4da
+gel4du
+gel3f
+gel3sa
+gel3sn
+4gemb
+4gemf
+4gemp
+ge4ned
+gen3k
+ge4noc
+ge4nof
+ge4nog
+gens4f
+gen4su
+gen4tr
+ge1ra
+ger4dr
+ge4reng
+ge1r2o
+ger4sp
+4gerts
+ge3ru
+ge1s2
+ge3s4a
+ge3sc
+ge3sh
+ge3sj
+4ges4k
+ge3s4m
+ge3so
+ges4p
+ge3spl
+ges4te
+ge3ta
+get4i
+get4j
+ge3t4w
+3gev
+2g1f2
+4g3g4
+gge4nol
+2g1h
+g2het
+g2hum
+1gi
+gier4s
+gi1eu
+gi2f
+2gij
+gi4mes
+gi4nes
+2ginf
+2g1j
+2g1k
+2gl
+g3la2m
+3gla4s
+3glaz
+g2le
+g3leg
+g3lei
+g3ler
+3glik
+g2lim
+gli4n
+3glob
+3glom
+4g3lon
+g1loo
+g1lop
+3g2ly
+2g1m
+2g1n
+g3na
+gneet3
+g4ners
+gne4tj
+g2no
+g3non
+1go
+go2a
+2goc
+g1och
+godon4
+god4s
+2goef
+goes3
+4goh
+go2k3
+go2ma
+go4mel
+4g3ong
+4gont
+2g3oor
+2gop
+gop4la
+4gore
+4gorg
+gor4s
+go3tr
+gou4dee
+gouil4
+2gov
+2g1p
+1g2r2
+g3rak
+gra2m
+g4ra2s
+gra4ves
+2g3red
+gree4
+2grei
+g3reis
+4grem
+gren4s
+gre4s
+g3rijk
+gri4mes
+2griv
+4grok
+g3roke
+4grou
+g3ruim
+g3ruk
+2gs
+gs1a
+gsas3
+g2sc
+g3sch
+g4sco
+g4scr
+g2se
+gs1ef
+gs3eig
+gs3eis
+gs3ek
+g3sel
+gs3f
+g2s1i
+gs4ke.
+gs4ken.
+gs4kes
+g2sl
+gs4lep
+gs3lie
+g3slu
+g4sma
+gs4maak
+g3snoe
+g2s1o
+gs3p
+gs4pel
+gs4pet
+gs4pi
+g3spie
+g3stam
+g1ste
+g3s4te.
+gs3teh
+g3stel
+g4stelg
+gs3th
+g3stig
+g3stu
+g2su
+gs1ui
+gs3uu
+g3sy
+2g1t
+g4tap
+gtui4gi
+1gu
+gu4al
+gu2at
+gu2e
+2gue.
+3guer
+guet4
+guim4
+gui4ne.
+2g3uit
+gun3
+gus3
+2g1v
+2g1w
+3gy
+2g1z
+h2a
+haar3t
+haf4tu
+ha4kr
+hal2f3
+2hamp
+han3ga
+hang3s
+han4sl
+hap4se
+har4t3a
+har4th
+hart3j
+har4to
+has3
+ha4tek
+ha2t3r
+4h1b
+4hc
+2hd
+h4e
+4he.
+he2ad
+3hech
+heel3o
+he4fe
+hei4t
+he4kan
+he2kw
+he4lan
+hele4n
+hel4m3a
+he4lov
+hel4pa
+hel4pr
+3hemd
+hemme4
+hen4kr
+2heo
+he4pij
+he2pl
+he2p3r
+he2q
+he1ra
+her3ad
+he3ral
+he3rau
+her3c
+he3rem
+he2ri
+her4paa
+her4pr
+her3s
+he3sa
+he2sp
+hes3t
+hete1
+4hew
+4hf
+h3h
+4hi.
+hie4dr
+hie4f
+hie2r1
+hie4to
+hie4tr
+hilip4
+hi4ma
+him4pl
+him4pr
+hin4tj
+2hir2
+hi4re
+4h1j
+2hl
+h2le
+2h2m
+h3ma
+h3me
+h4mer
+4h1n
+h2na
+h2nit
+2hoc
+hoe4ker
+hoe4sl
+ho2fa
+ho4fe
+hog4
+ho2k
+ho4le.
+ho4me.
+ho4mec
+ho4mes
+hon3dr
+hon3ga
+honig3
+hon4se
+hoo4
+ho4pl
+ho4po
+hop4sm
+hop4str
+ho2q
+ho1ro
+hor4se.
+hor4tj
+4ho3ru
+hou4se
+2how
+4h1p
+hpi4
+2h4r
+hra4b
+hri2
+hro4b
+hro4k
+4h1s
+2ht
+h4t1a
+ht3au
+h4t3ec
+h4ted
+h2tef
+h4teks
+h4temb
+h4ten3t
+hter1
+hte4rin
+hte4ro
+h4tesk
+h2t3ev
+h2tex
+ht1h
+ht1j
+ht1o
+h1ton
+h4t3r
+ht2s
+ht4ser
+hts1o
+ht4som
+hts3pl
+ht3sta
+ht4stek
+ht4sten
+ht3u
+hu2ba
+hug2
+huid3a
+huim3a
+hul4der
+hulp3a
+hu4me.
+2hus
+hu4te.
+hu4tes
+huw4do
+4h3v
+2hw
+h2wei
+4hy.
+3hyp
+hype2
+h3z
+i1a
+i4aalt
+i3ac
+i3ae
+iaf2
+ia3g
+i3ak
+iak4l
+i2als
+ian4n
+i4ans
+ias4me.
+i3au
+iave4
+i1b
+i2bac
+ibu3e
+ica4p
+i3cen
+i1cha
+i1che
+i3chi
+i1cho
+4ici
+id3ach
+id3ame
+i3dat
+id4e
+ider4sp
+ider4st
+id2g
+id3ru
+id2s1
+id4si
+ids3l
+ids3o
+ids3p
+id4stem
+iduw4
+id3w
+ie3a
+ie4dac
+i1ee2
+ie2fl
+ie2f3r
+ie4gal
+ie4gas
+ie4gu
+iekes4
+ie2kl
+ie2kn
+ie4kond
+ie4kre
+ieks3p
+iek3t
+ie4kuu
+ie4laa
+ie4las
+ie3le
+ielf4
+iel4le
+ie4mov
+i4enc
+ie4nij
+ien4sta
+ien4str
+ien4stu
+ie4plo
+ie4pui
+ie3rad
+ie3rap
+ie4rat
+ierk4
+ie3roo
+ier4re.
+ier4sl
+ies4e
+ie2sl
+ies3li
+ies3m
+ie2sn
+ie2so
+ie2sp
+ie3sta
+ie4ste
+ie4taa
+ie4tap
+ie4tho
+ie2tj
+ie4tog
+ie4trot
+ieuw4a
+2if
+if4tang
+if4tr
+if4tui
+i4gav
+i4gins
+igit4
+ig3n
+ig4ner.
+igs4
+ig3sc
+ig3sto
+i1h
+i3i
+i4j
+2ij.
+ij1a
+2ij1e
+ije2n3
+ij1i
+ij3o
+2ijt
+4ik
+i4kak
+ikes4
+i2kij
+i2kn
+ik3na
+ik3ni
+ik3re
+ik1sp
+ik1st
+ik3we
+2il
+i1la
+il3ac
+i3lak
+il2da
+il4din
+il2dr
+ild3ri
+ilds4
+i3len
+ile4t
+ile3u
+i2l3ez
+i4link
+illa3s
+il2ma
+i1lo
+i3lof
+il3oor
+il3or
+il4sti
+il2th
+i3lu
+ima4ges
+i2me.
+i2med
+i4met.
+imma4g
+imme4la
+imon4
+im3op
+imo4r
+im4sm
+imte3
+in1ac
+in4as
+in4dene
+3indru
+1indu
+1inf
+in4gaa
+in4gag
+in4gal
+in2go
+in2gr
+ing3ru
+ing4s3e
+3inhou
+in2kn
+ink3na
+3inkom
+inos4t
+1inri
+in4sa
+3insta
+inta4
+in4tap
+int4r
+3invlo
+i3o
+io1a
+iog4
+io4nin
+ion4s3
+io3pr
+io1s4
+io3sko
+iot4r
+i1pa
+ip3ac
+i4perw
+ipe4tj
+ip3j
+i1pl
+i3pot
+i4ps
+ipsi4
+ip4sle
+ipu4r
+i1q
+4ir
+i3ra
+iraat4
+ir2e
+i4red
+ires4
+iret4
+i1ri
+i1ro
+ir2s
+ir3ste
+i1ru
+i1sa
+i4saa
+i2sad
+i4sak
+i4s3ap
+is1ar
+i2sas
+i4sau
+i2sc
+isci4n
+i2s3ei
+i4serv
+ise4tj
+i3sfe
+isi4ne
+i3sji
+is4koo
+i2s3l
+is4laa
+is4lui
+is3n
+is3p
+is3t
+istal3
+is4th
+isti4n
+is4tra
+is4tre
+is4ty
+2it
+i1ta
+it1ac
+it3ach
+i3tan
+i3ter
+i4thou
+i3thy
+i3t2i
+i1to
+it1ri
+it3ru
+its3ei
+it3smi
+its3u
+i1tu
+it3w
+4i1u2
+ium1
+i1v
+iver4a
+ive3re
+ive3ri
+ive3s
+i1w
+i1z
+i4zl
+2jaf
+jager4s
+ja4ke
+j4am
+ja4me
+ja4ne.
+jani4
+ja4no
+jan4sl
+3jar
+jas3p
+jaz2
+jbe4li
+j1c
+4j1d
+j4daa
+jde4ne
+jden4s
+jde3s
+j4dog
+j2dr
+jd3re
+jd3ri
+j4du
+je2a
+jean4n
+2j1ee4
+2jei
+jek4tr
+j1en
+je3r4o4
+je4s3
+je2t
+je3to
+jet3r
+jet3u
+j2f1a
+j4fec
+j2f3ei
+j2f1en
+j2fij
+j4fin
+jf3l
+jf4la
+jf2s
+jfs3ec
+jf3str
+jft4
+j1g
+j4gre
+jg4st
+4j1h
+2ji
+3jic
+jin3
+2jk
+j2kaa
+j4kag
+j4kar
+j4kas
+j4kek
+j4kerv
+j2kij
+j2kl
+j3kle
+jk3li
+jk3lu
+j2kn
+j4kof
+j4kol
+j4kon
+j2kor
+j2kr
+jk3re
+jk3ru
+jks3a
+jk2si
+jk2sl
+jks3n
+jk3soo
+jk3th
+j2kui
+jk3waa
+jk3we
+jk3wi
+j1la
+jlijs4
+jl3k
+j1lo
+j2loe
+2jm
+jm3af
+j3mi
+j2n1a
+j4nerw
+jne3s
+j4net
+j4nex
+jn3g
+j4nim
+j4nink
+j2n1o
+jn4sce
+jn2si
+jn2sl
+jn2sp
+jo4a
+job2
+jo4ke.
+jol4e
+3jon
+jone4
+jo4nes
+j4ou
+jou4l
+3jour
+joy4
+j1p
+jp3ac
+jpe3s
+jp3j
+j2pli
+j4pre
+j4pri
+4j1r
+4js
+js4e
+j3sel
+j2s1i
+j2sl
+js3li
+j3slu
+j4so
+j1sp
+j2spo
+j1sta
+j3stel
+js3ten
+j4s3ter
+j1str
+j4stran
+j1stu
+j2su
+2j1t
+j4taar
+j2th
+j3the
+j4top
+j2tr
+jt3ra
+jt4rad
+j3tre
+j3trok
+ju4a
+juit4
+ju2le
+jumel4
+jus3
+justi4n
+j1v
+jve4n
+jve3ri
+jver4sp
+j1w
+j1z
+jze4ro
+1ka
+2k1ac
+3kache
+4kaf.
+4kafs
+4kah
+4kaks
+4kalb
+kalf4s
+kal4k3a
+kal4kl
+4kalt
+2kamb
+kam4pr
+4kang
+ka3n4o
+kan4sl
+kan4t3j
+kant3r
+ka3pa
+ka4pl
+kap3la
+4kappa
+kap3s
+2karm
+k3arti
+ka4s
+ka4tan
+kat3j
+ka4tog
+ka4too
+ka4tui
+2k3aut
+2kavo
+2k1b
+kbe2k
+kbek3w
+2k1c
+2k1d
+1ke
+k4ed
+keel3
+2keen
+kee4pl
+keer4s
+keis4
+ke4nad
+ke4nau
+ke4nep
+keni2
+ke2no
+k2ens
+ken3t
+ke3rad
+ker4kn
+ker4ko
+ker4kr
+ker4ku
+ker4kw
+ker4n3a
+4kers4ek4
+4kerts
+4kerwt
+k4es
+ke3sta
+ke4s3tr
+ke4th
+ke2t3j
+4ketu
+ke4tw
+k4eu
+2kex
+k1ey
+key3s
+k3ezel
+2k1f2
+2k3g
+2k1h
+1ki
+4kied
+kies4t
+2k1ijz
+4kindu
+2kinr
+2kins
+3kins.
+ki2p
+kip3l
+3kis
+kis4p
+kis4to
+2k1j
+2k1k
+kker4s
+kke3s4
+1k2l4
+3klac
+4kladi
+4kland
+3klank
+kla2p1
+2klat
+4kleer
+4kleg
+k3len
+4klera
+3kle4u
+2k3lic
+k3lied
+2klij
+kli4me
+k4lon
+3klont
+k3lope
+2k3loz
+2k3luc
+4kluih
+2k1m
+1k2n4
+4knad
+2knam
+3knec
+knip1
+2kniv
+2knum
+1ko
+4koct
+2koef
+koe4ket
+4kokt
+kole4n3
+4kolm
+3kom
+kon3s
+4kontw
+2k3oog
+4kopb
+ko4pl
+kop4ri
+3kopt
+2k1org
+kor4ta
+kort3o
+4kos.
+ko4so
+4koss
+4kov
+2k3p2
+kpren4
+1k2r
+kra2b
+k3rad
+3kran
+3krat
+2k3rec
+kret4
+2k3ric
+k3rijk
+krij4t
+2krip
+4krol.
+4kroll
+kro3s
+2krou
+kru4l
+2ks
+k4sad
+ks1ar
+k2sav
+k2see
+ksem3a
+k2s1in
+ks3j
+k3slac
+k2s3li
+ks4mak
+ks4mee
+ks3na
+k1spe
+k1sta
+k4staf
+k4star
+k1ste
+k4sted
+k4stele
+k3sten
+ks4ti
+k1sto
+k2sui
+2k1t
+kte2n3
+k2t1h
+k2tin
+k4tj
+ktoet4
+kt3ond
+kt2s
+kt3sc
+kt3se
+1ku
+ku3che
+kui4f
+2k3uit
+kuk4
+3kun
+2kuse
+kus4tr
+4kuus
+2k1v
+k2w
+k3waar
+2k3wac
+k3wag
+3kwak
+k4wal
+1kwam
+3kwar
+4k3weg
+k3wei
+2k3wer
+k4wes3
+1kwid
+4kwijd
+k3wijz
+k4wik
+2kwil
+4kwim
+2kwin
+2k3wo
+4ky.
+2k1z
+4laand
+laap3
+4laard
+laar3t
+3labo
+2lac
+3lach.
+lacht4s
+l4aci
+3lact
+la2d3a
+2ladj
+la4dok
+la2dr
+lad3s4
+la4du
+2laf
+la2fa
+lafo4
+la2ga
+lag3aa
+la2g3o
+la2gr
+la3gra
+lag3s4
+lai4d
+lai4n
+la2k3a
+la4ki
+2lal
+l3alb
+la4mac
+la4mov
+lam4p3j
+lam4p3l
+lam4pol
+4lana
+3land
+lan4da
+lan4do
+lan4d3r
+la4nek
+lan4em
+lang3l
+lan4ka
+lan4k3l
+lan4sl
+lan4t3j
+3lapj
+la4p3l
+la4p3o
+4lappa
+la2p3r
+2larb
+las3
+la4tam
+la2th
+lat3j
+la4tro
+lat3s
+la4tui
+2lau
+lau4de.
+lau4m
+la4vat
+2lavo
+la2wr
+la4ze.
+4lazi
+2l1b
+4l1c
+2l1d
+l2d3ac
+ldak4s
+l4dart
+ld3een
+ld3ei
+l3d4en
+l4dh
+l2dom
+l2don
+l4dos
+l2d3ov
+lds4a
+ld3sl
+ld1sp
+ld3w
+1le
+le2a
+lea2d
+lea4s
+le3at
+3leb
+ledes4
+lee2
+leeg3
+4leekh
+lee4p3
+lee4s3
+2leeu
+2leff
+4leier
+4leig
+lei4na
+le4kw
+l3elem
+l2en
+l4en.
+le4nad
+3leng
+3leni
+len3k
+len4tr
+leper4
+le1ro
+le2s
+les2k
+le3sko
+4lesm
+le4sp
+le3str
+le2tr
+let4sta
+4letu
+4levil4
+4lexc
+2lexp
+3ley
+4lf
+l2f1ac
+l2fin
+lf3li
+lf4lo
+l2fo
+l3foe
+l3fou
+lf4ree
+lf4sei
+lfs3m
+lf4spo
+l1g
+l4gaf
+l4gap
+l3gla
+l4gon
+lg1s
+l1h
+1li
+li4ce.
+4lick
+3lid
+lie4ga
+lie4gr
+li3enn
+lies4t
+lieu3
+3liev
+3ligg
+lij4ko
+lij4ma
+3lijn
+4lijp
+3lijs
+lij4st
+2l1ijz
+li4ke.
+li2ko
+lilia4
+lil4le.
+4limp
+lim4pj
+2linf
+4linh
+lin4ka
+3linn
+4linr
+2lins
+lin4t3j
+4linv
+4lipj
+li4pl
+lis4e
+4litary
+li1th
+li4ve.
+l1j4
+l4kaf
+l4kei
+l4kep
+l4klag
+l4klev
+l2kri
+lk3rij
+lk2s
+l4kuu
+lk3wi
+4l1l
+l3la
+llas4
+lle3st
+llinai4
+lls4
+2l1m
+lm3act
+l4med
+l4mind
+lms2
+lm3sc
+lmta4
+4l1n
+lni2
+3lobd
+lo4bo
+loe4d3a
+loe4d3r
+loem3a
+4loes
+lofd2
+3lofi
+lof3r
+lof4s
+4logig
+lo3go
+lo4gre
+log4s3
+loi4r
+3loka
+lo4kar
+lo2kl
+lo2kr
+lo2k3u
+lomp3j
+l3omv
+lon4gaa
+lon4go
+lon4gr
+lon4t3j
+3loopb
+4loord
+4loort
+3loper
+4loph
+4lopn
+lop4r
+2lops
+2lopt
+4lopw
+l4or.
+l1org
+lo1ro
+lo4sp
+los1t
+lo4str
+lo2ta
+lot3ak
+lo2th
+lot3j
+lou2p
+lo4ve.
+lo4wed
+1loz
+2l1p
+l4pac
+lpe4ni
+lpes4
+lp2h
+lp3j
+lp3ond
+l4ques
+2l3r
+2ls
+l3sam
+ls4cr
+l4sed
+l2sef
+l4sele
+l4sep
+ls2j
+ls3ja
+ls4kel
+l3sla
+l2sle
+l2sli
+ls3lie
+ls4mee
+l3som
+l1sp
+l2spr
+l1st
+l4stal
+l4steko
+l4stele
+l4stev
+l4stou
+l2su
+2l1t
+ltai4
+lt2h
+l4thi
+l2t3ho
+l3tj
+l4tjesk
+l2tov
+lu4bl
+lu1e
+3lui.
+3luid
+4luit
+lu2ka
+luk2s
+3lumb
+4luni
+lu1th
+l1v
+lva3no
+lve3ri
+l1w
+1ly
+l1z
+1ma
+3maalt
+3m4aat
+mac3k
+ma4cl
+ma3de
+2m3adv
+2maf
+ma4geb
+ma4gev
+mai4li
+ma4ke.
+4makt
+ma3la
+ma4lent
+man3ac
+m3anal
+man3c
+3mans
+man4see
+man4sl
+man4sn
+man4so
+mans3p
+man4st
+4mape
+map4l
+mas4p
+mat3j
+m2av
+mazi4
+2m1b
+mbi4ne.
+mbi4nes
+mbo4le.
+2m1c
+2m1d
+md2s
+md3so
+m3dw
+1me
+3me1c
+3medi
+mee3kr
+mee3le
+mee3lo
+mee3lu
+mee3ri
+3mees
+mee3sl
+mee3sp
+mee3tr
+me2i
+mein4a
+4melam
+mel4ko
+mel4ku
+3m2en
+men4ag
+men4gra
+meng3s
+me4noo
+men4suu
+men4tj
+mep4j
+me1ra
+me4raak
+me4rak
+me4ram
+merg4s
+mer4kn
+mer4kw
+mer3n
+mer4on
+3me2s
+mes4ha4
+me3spo
+met4aa
+3me3th
+3meto
+metrai4
+m4eu
+meus4
+2m1f
+mfi3t
+2m3g
+2m1h
+1mi
+mi1ch
+miche4
+mick4
+2mid.
+3midd
+mijl4s
+4mijs
+3mil
+mi4le.
+mi4men
+2minf
+2minr
+2mins
+3mis
+mis4la
+mi3sog
+mis4ses
+mis4to
+3mit
+mi1tr
+2m1j
+2m3k2
+2m3l
+2m1m2
+2m1n
+1mo
+3mod
+mode4l
+3moed
+moed4s
+2moef
+3moei
+moe4raa
+moe2s
+moet4s
+3mo3g
+3mole
+mol4ma
+4molt
+4momv
+mon4a
+monet4
+mo3no
+mon4so
+m3onts
+3mooi
+2mop
+m3ope
+m3oplo
+mop4sn
+moquet4
+5mora
+mor4e
+mo3ro
+mor4sp
+mos4c
+mo4sl
+mo3sta
+mot4h
+4moud
+mo4ve.
+mo4ver.
+mo4vers
+2m1p
+mp3ach
+m4paf
+m4pes
+m3pj
+mpon4g
+m4ps
+mp4se4
+2m3r
+4m1s
+m2sa
+m3sau
+ms2j
+m3sje
+m4sle
+m3s2m
+m2so
+m3son
+m3spl
+ms4ti
+m4ston
+m4stop
+mtes2
+1mu
+mu2m3
+3mut
+2m1v
+2m1w
+3my
+my3o
+2m1z
+1na
+3na.
+3naal
+3n2aam
+2n1aan3
+4naap
+4naard
+3naars
+naar3t
+n3aas.
+3nabe
+2nac
+n4acu
+nadet4
+3nadi
+4n3adm
+2n1af
+naf4l
+n2a1g4
+3nagel
+n3agem
+na3gl
+na3gr
+3nai
+na1ij
+4naker
+na3k4l
+3nale
+4n3alf
+3nali
+3n2am
+n2an
+nan4e
+nanes4
+3nant
+nan4tj
+4nara
+na4rap
+2n1arb
+2narg
+2n1arm
+4nars
+2n1art
+na3sc
+na3s4l
+nas4m
+na1sp
+na3stu
+n3asy
+3n4at.
+3nata
+nat4h
+n4ati
+2natl
+nat4r
+2n1b
+2n1c
+n4cheo
+nci4n
+2n1d
+n4daas
+n4dabo
+n2dac
+n2dar
+nd3art
+n4daz
+n4degg
+nd1ei
+n4derec
+n4dh
+n4dijs.
+nd3ijz
+ndi4se
+n4dof
+n4doli
+nd3ont
+n4doog
+n2dov
+nd3ove
+nd3rap
+n2dre
+nd3rei
+nds4ben
+nd3si
+nd1sp
+nd4spra
+n2duu
+nd3uur
+nd3w
+1ne
+nebe4s
+2need
+3nee4m
+2n1een
+neer3s
+nees3
+2n3eff
+3ne3g2
+nege4n
+nehen4
+2nei
+3neig
+neil4
+n1ein
+n3elem
+neli4n
+3n2em
+4nemm
+4nemp
+ne2n
+n4en.
+n4end.
+nen3g
+4nenke
+nen3o
+ne4pli
+ne1ra
+n2ere
+n4erg
+ne4rid
+ner4sp
+4nerts
+4neru
+4nesm
+ne3sta
+4nesth
+ne3str
+ne4ton
+ne4tru
+4netu
+3neuz
+2n3f2
+2ng
+n2g3ad
+n4gak
+n2gam
+n4gank
+n2gar
+n4geen
+n4gensm
+nge4rap
+nge4ras
+ng4hi
+ng3ij
+n4ginr
+n4g3ins
+ng3lad
+ng2li
+n3glic
+n3glu
+ng3n
+n2g1on
+ng3rai
+n3gro
+ng2s
+ng4sche
+ng4s3le
+ngu4a
+4n3h
+nhands4
+nhom4
+1n2i
+ni4ce.
+ni3eus
+ni3euz
+3nig
+nij4st
+2nijz
+n3ijze
+nik4s
+3nim
+2nin.
+4n3ind
+2n3inf
+4ninga
+nin2k3
+2n3ins
+2n3int
+4ninv
+ni4pl
+ni4sel
+ni3str
+ni3th
+ni1tr
+nits4
+3niv
+n1j2
+2n1k
+nk3aan
+n4kag
+n4karb
+n4kasp
+nk2ey
+n4knaa
+n4kog
+nk4om
+nkoo4
+nk3ov
+n3kra
+nk3rek
+n3kru
+nk1s
+nk4so
+n2kw
+n3kwam
+nk3wat
+nk3wi
+2n3l
+4n3m
+2n3n2
+nne4pol
+nniks3
+1no
+4nobj
+4noec
+2noef
+4noer
+noes3
+3nolo
+n2oma
+n3omg
+3nomi
+3nomm
+4noms
+4nomw
+3non.
+3nonc
+n3ond
+2n1ont
+3nood
+4noof
+2n1oog
+4n3oorl
+2nop
+no4pas
+no4poo
+no4por
+4n1org
+2nork
+3norm
+3nors
+2nort
+no3s4a
+no3sk
+no3sp
+3nota
+no4tap
+3noter
+3noti
+2nov
+3n2ova
+2n3p4
+npoor4
+n1q
+2n3r
+4n1s
+n2sa
+n3saal
+n3sal
+ns3ang
+nsas3
+ns3asp
+n3sau
+ns2c
+n3sce
+n3sch
+n4sed
+n4sef
+n4seg
+n2sev
+ns3f
+ns4fee
+n3sjo
+ns4kri
+n3slaa
+n2sle
+ns2m
+ns3mar
+n3sme
+ns3moe
+n4s3mu
+n3sne
+n3snij
+n3snoe
+n3soe
+ns3onw
+n3soor
+n4spaa
+n4spot
+ns4ta
+n4staf
+n3ste
+n4steh
+n4stenv
+ns3the
+ns4tie
+n3stig
+n4stij
+n2sui
+2n1t
+n4tarc
+ntat4
+n3teg
+n2tei
+nt3eig
+n3tel
+nte4loo
+n3tev
+n2th
+n3them
+n3thol
+nt3ink
+nt4jo
+n3to
+n4toli
+n4top
+nt3raf
+n4t3rij
+n3trou
+nt3rui
+nt3ruk
+nt3rus
+nt4sa
+nt4schr
+nt4sle
+nt3sm
+nts4ma
+nt1sn
+n3tu
+n4tuit
+ntu4re.
+ntu4res
+nt4wis
+1nu
+nu1er
+2nui
+4nuil
+3num
+2nur
+nuts4h
+n3uur
+nu2wi
+2n1v
+nvel4l
+nvil4
+2n1w
+nwa4v
+nwe4tj
+nx3a
+1n2y
+4ny4i
+4nyo
+2n1z
+o1ag
+o1al
+o1an
+oa4ti
+obal4
+1obj
+obos4
+ob3sk
+o3cha
+o1che
+ochet4
+o3chi
+o3chr
+ocke4
+4od.
+od1ac
+ode3ra
+o4dr
+od3re
+od3ri
+ods3oo
+od4sur
+od3w
+oe2da
+oed3aa
+oed3ar
+oed3ei
+oede4n
+oede3s
+oe4don
+oe2dr
+oe2d3u
+oed3w
+oe2f3a
+1oefe
+oe2fi
+oe2fl
+oef3le
+oe3flu
+oe2f3o
+oe2f3r
+oei1
+oei3s4
+oe4kaa
+oeke4n
+oe2kl
+oe4kna
+oe2k3r
+oek4sl
+oe2ku
+oe2kw
+oel2a
+oe4lap
+oel3ei
+oeleve4
+oe3li
+oe4lov
+oe4mac
+oe4mak
+oe4mo
+oe2no
+2oep
+oep3ac
+oe2pl
+oe3plo
+oep3lu
+oe2pr
+oeps1
+oep4se
+oe4pu
+oe1ra
+oe4ral
+oer4sl
+oer4so
+oer4sp
+oe3se
+oe4so
+oe4tei
+oe2t3h
+oe2tj
+oe4tol
+oet4so
+oe4tw
+of3at
+ofd1a
+ofd3ei
+of2do
+ofd3on
+of2d3r
+of4du
+ofd3w
+3offic
+of3l
+of4la
+of4le
+of4lu
+o3foo
+of2r
+of3ri
+of4sel
+of2si
+of2sl
+of2sp
+of4su
+oft2s
+of4tur
+of4tuu
+ofy3
+o1g
+og4aa
+o4gal
+oge4las
+oge4st
+1ogig
+og3le
+og3n
+og2s
+og3sc
+og3spi
+og3ste
+o1h
+2oi1
+oi4ne.
+oinet4
+ois4
+oi3sc
+oist4
+o1j
+o4kaas
+o4kaz
+ok3ef
+o4kes
+o2k3n
+o4kre
+o4k3ro
+ok3sa
+ok1st
+ok4str
+okter4s
+4ol.
+o1la
+ol3ac
+olber4
+ol3ein
+o3len
+ole4ne
+ole1u4
+ol2fa
+olf3l
+ol4gor
+ol4gre
+ol4gri
+olie3s
+ol4kaa
+ol4mes
+o1lo
+olo3k
+o2lop
+ol3sj
+o1lu
+ol3umn
+o4map
+omen4s
+o4mint
+2omm
+om4pj
+ompo4t
+3omro
+on3ac
+o4nam
+o4naz
+4onc
+2onca
+ond3ac
+4onde.
+4onden
+on4dij
+on4don
+on2dr
+ond3re
+ond3sj
+on4dur
+o2ned
+4oneerb
+o4neh
+on4end
+on4gap
+onge4tj
+ong3le
+4onin
+oni2q
+4onk
+on4klo
+on3kw
+2onn
+onne3s
+2ono
+on2sn
+on3ta
+on4taa
+ontes3
+1ont1h
+on4tre
+3ontva
+3ontw
+o4o2
+4oo.
+oo3c
+oo4d
+ood1a
+ood1e
+ood1o
+ood3r
+oofd3o
+oof4dr
+oo4g1
+oog3r
+oogs4
+oog3sp
+ook1
+ooks4m
+ook3w
+ool1
+oom1
+oo4n1
+oon4sa
+oo4p
+oop1a
+oop4sp
+oo4r1
+oor3g
+oor3i
+oor3k
+oor3sm
+oos3
+oo4t
+oot3h
+oot1o
+o1pa
+o4paar
+op3ach
+o4pad
+o4paf
+o4pak
+opa4n
+3opbre
+op3een
+3openi
+3opera
+o4perw
+op4her
+4op3j
+op3l
+1opn
+4opn.
+4opneu
+o1po
+op1of
+op3ont
+op3r
+op4ra
+ops4c
+op3sj
+op3sm
+op1so
+op3sp
+ops4t
+2opt
+3opta
+3optim
+o1q
+o1ra
+oraat4
+o3race
+o2rag
+or3ana
+or4ce.
+or4das
+or4d3oo
+or4dor
+ord3w
+o4reh
+orever4
+4org.
+or4ge.
+4orgi
+org3li
+o1ri
+3orkes
+ork4l
+orkma4
+or4mac
+o3ros
+4orp
+orp4sc
+or3sme
+or3so
+or4son
+or4tabl
+or4tak
+or4too
+or4tor
+or4tred
+ort3w
+or1u
+o3rum
+or4un
+orwe4gi
+o4sab
+o3sc
+o4sce
+o4sci
+os4co
+os2cr
+o4scu
+o3s4e
+oses4t
+oset3
+oset4t
+o4sj
+os2k
+o2s3l
+os3m
+os3no
+o1s2o
+os1p
+os3pa
+os3pi
+o4s3pr
+o3stat
+os3te
+os4tem
+os4teu
+os4th
+os3ti
+os4tij
+os3tol
+os4tr
+ost3ri
+os3tu
+os4tun
+o3sty
+o1ta
+ot1ac
+ot4ec
+ote4lan
+o4tesc
+o1th
+o2t1ho
+otli4
+o1to
+oto3a
+ot3re
+o1tro
+ot4sl
+ot4spa
+ot4sti
+ot4str
+ot4stu
+o1tu
+ou3b
+ou2d1a
+ou4des
+ou2do
+oud3r
+ou1e
+oue2t
+ou3is
+ouk4
+oun4g
+ou4rar
+ou4re.
+ou4rem
+ou4res
+ou2ro
+ou4sc
+ous4t
+4out.
+ou2ta
+out1j
+ou2t3o
+ou2t3r
+4outs
+ou1wi
+o1v
+2ovee
+3ovens
+3overg
+o4ves
+2o3vi
+ovis4t
+2ovj
+o1wa
+o4we.
+o1wi
+ow2n
+oy2en
+oy4l
+oys4
+o1z
+oze3s
+3paal
+2paan
+paar3t
+2pac
+pa3che
+3pact
+3pad.
+pa2da
+pad3ac
+pa4dr
+pag2a
+4pagg
+pa3gh
+4pake
+4palb
+3pale
+pa4nad
+pa4neu
+pa4nisl
+pan4tr
+pa4o
+1pap
+pa4pet
+pa4pl
+2papp
+3pa3ra
+pard4
+3park
+par4ka
+par4kl
+2p3arm
+1part
+3parti
+part3j
+3partn
+3pas3
+pas4ses
+4patl
+3patr
+2p3aut
+pa4vl
+2p1b
+2p1c
+2p3d2
+1pe
+pe2a4r
+3peb
+4peci
+pee4n
+2pef
+3pei
+pei4la
+4p1eis
+pe2kl
+pek3la
+pe2kn
+pe4lee
+pel3f
+pe4link
+pe4lov
+3p4en
+pe4nam
+pen4se.
+pen3sl
+pen3sm
+pen3sp
+pen3t4
+pe4nu
+4pepi
+3pe1ra
+3perc
+pe4rek
+pe4res
+3peri
+peri3s4
+3perk
+pe3ron
+3pers
+per4sc
+per4str
+pes3ti
+3peut
+4pex
+2p1f
+2p3g
+pge3s
+2p1h
+p2heu
+3p2hia
+1pi
+pi4ce.
+pi1eu
+pi4ga
+pij3k
+pij4li
+3pijn
+3pijp
+pij4pa
+pij4pl
+pij4tj
+2pijz
+pi4kl
+pi4ko
+pi4nas
+4pinj
+pin4kr
+4pinr
+2pins
+pi4ot
+3pis
+pi4sco
+pi3th
+pit3j
+pit3r
+pit4sp
+2p1j
+4pja
+p2je
+2p1k
+p2l4
+3pla
+4pla.
+4plad
+4plam
+4plang
+p4lant
+4p3lap
+1p4las
+pla4tr
+p4lec
+p3leid
+p3lep
+p4lex
+2plig
+2plij
+pli4t
+3ploe
+2p1m
+2p1n
+p4neum
+pock1
+3pod
+poe2s
+po4ki4
+po4kol
+3pol
+3pom
+4poml
+3pone
+pon4se.
+poo4
+4poog.
+4poor.
+poor4tj
+poot1
+3pop
+po4p3a
+po4pi
+po2q
+pore4n
+2p1org
+4pork
+por4tra
+3pos
+po1sa
+po4ta
+3poti
+pot1j
+4pov
+po4we
+2p1p
+ppe2n
+p2r2
+3prac
+3prakt
+p3rand
+3prang
+p3rech
+prek4s3
+3prent
+pres3c
+pre4t3j
+pre4tr
+preus4
+3prij
+3princ
+4pring
+p4rio
+p4riu
+3prob
+3p4roc
+3prod
+3prof
+3proj
+4prok
+pro4s3t
+pru4t
+2ps
+4ps.
+p3sel
+pse4la
+ps2m
+ps3ma
+p1sn
+p2sna
+p1sp
+ps4pe
+p1st
+p3ste.
+p3stem
+ps3th
+ps2u
+3p2sy
+4p1t
+p3te
+ptea4
+p2t1h
+p4tj
+pt2s
+1p2u
+pu3e
+pul4le.
+3pun
+4pun.
+punt3j
+put3j
+pu2t3r
+2p1v
+2p1w
+py1
+2p1z
+1qu2
+2que.
+4raalm
+2raan
+raap3
+3r2aar
+4r3aard
+raat1
+2rac
+r4ac.
+raccro4
+ra2ce
+rade4ra
+ra3di
+4radr
+2rafd
+ra3gn
+rag4s
+rai4d
+ra4kri
+4ralar
+4ralf
+r1alg
+4ralm
+4ralu
+4ramn
+r4amp
+2rana
+r2anc
+ran4ce
+ran4daa
+ran4ge.
+ran4ges
+ran4g3o
+ran4sl
+rans3p
+r4anti
+ran4t3j
+ran4tr
+r3antw
+ra4pas
+1rapi
+3rappo
+ra2pr
+4r3arb
+r4are
+4r1arm
+4rarr
+4r3art
+ras3l
+ra3son
+r4ati
+rat3j
+2rau
+ra4vel
+ra3yo
+2r1b
+rbonne4
+r1c
+r4chec
+r4chen
+r4chete
+r2chl
+rci2a
+2r1d
+r4dact
+r3dag
+r2d3ar
+rder4s
+rdes4s
+r2dol
+rd4re
+rd2s
+rd3sc
+rd3se
+rd3sp
+rd3str
+rd2w
+rdwa4r
+r4d3wo
+1re
+3re.
+3reac
+rea4d
+re4ade
+rea4m
+3reda
+reda4l
+3redd
+rede4s3
+ree2d1
+ree4k
+2r1een
+reen4e
+reer4ad
+4reers
+4reerw
+2reff
+4reg.
+4regd
+3regel
+rege4s
+4regg
+3regi
+re3gl
+4rego
+4regt
+4reie
+4reil
+4reind
+3reini
+rei4sc
+re4kaa
+re4kle
+re4klu
+re4kn
+rekor4
+re4kro
+4reks
+re4kuu
+reld3o
+rel4d3r
+re4lei
+relijs4
+re4lur
+reme4t
+remin4
+re2na
+re4nam
+re4nan
+r2end
+re4nep
+3renh
+4r1eni
+re2no
+ren3of
+re3n4ov
+4rentw
+4req
+4r3erf
+re3r2o
+2r3ert
+4r3erv
+2rerw
+r2es
+re1sa
+res4e
+resi3s
+res4koo
+res4kop
+re2sl
+re2sp
+res3pe
+res3pi
+res3t
+re4tem
+re4tog
+reu4ko
+2r1ex
+r4faa
+r4fag
+r4feng
+r1fl
+r4flag
+r2f3li
+r4foo
+r1fr
+r2fre
+rf4rek
+rf2s4
+rf3sc
+r4fur
+4r1g
+r4gab
+r4gart
+rge4a
+r4geen
+r4gei
+r4geng
+r4gerep
+rget4
+rg2l
+r4glu
+rg2ne
+rg1s
+rg3so
+rgs4p
+r1h
+rho4m
+ri4bl
+rici4e
+rie4kap
+rie4lei
+rien4n
+rie4to
+ri1eu
+ri4fa
+r4ig
+ri4gaa
+rig4l
+r3ijld
+3rijm
+rijs4t
+ri2kl
+ri4mer.
+ri4mers
+rim4pr
+2rinf
+r2ing
+ring3l
+ring3r
+2rinh
+rin4kl
+4rinko
+4rinkt
+rin4ne.
+2rinr
+2rins
+r3inv
+ri4oc
+r4is
+ri4sam
+ri3s4ko
+ris4tee
+rist4j
+3rivie
+rivo3l
+r1j4
+rjan4
+rjas4t
+r1k
+r4kart
+r2kei
+rke4n
+rken4s
+r4kez
+r4kink
+r2klo
+r3klok
+r2kne
+r2kob
+rk1s
+rk4slu
+rk4taa
+rk3waa
+r4kwat
+r2kwe
+r1l
+r3la
+rle4gek
+rlings4
+rlo4f3
+rluit4
+r1m
+rma3f4
+r4mart
+r3me
+r4meb
+r4meg
+rme4ra
+rmi4ne.
+2r1n
+rn4aa
+rn4am
+r4nap
+rna4sp
+r3nei
+r4nele
+r4n3ene
+rnes3
+rne4tj
+r2nex
+r4nid
+r4non
+r4noor
+r3nu
+ro1ch
+2roef
+roe4g3r
+roe4pl
+roe4rei
+roe4ta
+2roev
+ro3fl
+roges3
+4roj
+3roker
+rol4a
+2roli
+rollo4
+r2on.
+ron4da
+ron4d3o
+ronds4
+r2one
+r2oni
+ron4ka
+r2ons
+ron4tj
+ron4t3r
+roof3
+roog3
+2r1oor
+ro4pan
+rop4e
+rop4la
+rop2o
+ro4pu
+4roq
+2rorg
+ro1sk
+ro3sko
+ro1sp
+rot4h
+ro3tr
+rot4st
+r1oud
+3rout
+r1p
+rp3j
+rpool4
+rp4sto
+rquet4
+2r3r2
+rre4lu
+rre3sp
+rreur3
+rrie4t
+rru2
+2r1s
+r2sa
+r4saan
+rsail4
+r3sal
+r4s1am
+rs2cr
+r2sek
+r4selz
+r4serv
+rseve3
+rs4hal
+rs2ja
+r3sjou
+r3sjt
+rs4kat
+rs4kie
+rs4koo
+r4sloo
+rs2m
+r3smak
+rs4mit
+r4snaa
+r2sno
+r3snoe
+r4sog
+r4som.
+rs3ong
+r2sor
+rs3ord
+r4spad
+r4spar
+rs4pen
+rsper4s
+r4spot
+rss4
+r4staf
+rs3tas
+rs4te
+rs4ti
+r4stit
+r4stun
+rs4ui
+rsui4t
+2r1t
+rtai4n
+r2tar
+rt3art
+rtati4
+r4tau
+rte4na
+r4teve
+r2th
+rt3hel
+r3tho
+rt4ij
+r4tink
+rtoi4
+rto4le
+r4tom
+r2tri
+rt3rij
+r2tru
+rt3ruk
+rt4sec
+rt2sl
+rts3li
+rt4spr
+r4tui4t
+rt2wi
+3rubr
+ru1e
+ru2g
+2rui
+3ruimt
+ru2k1
+ru4li
+r2um
+2runi
+ru4pi
+r2u2s
+ru4st
+4ruu
+r1v
+rve3ri
+rv1ic
+rvil4
+rvoch4
+rvoy2
+r1w
+rwe4tj
+r4wh
+r1x
+3ryl
+ry1o
+4r1z
+rzu4e
+3sa.
+3saag
+s1aan
+4s1aar
+3sab
+2s1ac
+3sacr
+s1ad
+2s1af
+sa2fe
+3sai
+s3akko
+s1akt
+1sal
+s4ala
+s3all
+4salm
+3salo
+4salp
+s3alta
+s1amb
+s3ana
+3sanc
+3sap.
+2sar
+3sar.
+sa3ra
+s3arb
+s3arc
+3sard
+sa4re.
+3sari
+s1arm
+3s4ars
+s1art
+s3assi
+sas3t
+3s2at
+4s3atl
+4satm
+4s3att
+3saus
+s3aut
+3sauz
+s1av
+4s3b
+1sc
+2sca
+2sce
+4scel
+4scent
+s2ch
+4sch.
+3sche
+4schec
+4scheq
+3s4chi
+4schk
+3schr
+2sci
+sci4ne.
+sci4nes
+2scl
+2s2co
+s4cola
+3scoo
+3scop
+3s4core
+scorre4
+2scr
+scra4
+4scris
+2scu
+2scy
+2s1d2
+sde4a
+s3dw
+1se
+3se.
+se2a
+sear2
+sebal4
+sebe4s
+s1ech
+4secz
+2s1een
+4seev
+4sei.
+seig4
+seis4t
+3seiz
+sek4sl
+s2el
+se4lag
+4s3elem
+3selen
+4self
+sel3k
+se2lo
+3sels
+se4m3ac
+s3emm
+se4mo
+s2en
+3s4en.
+se4nem
+se4net
+sen3k
+se2no
+3sen3s
+sen4tj
+sen3tw
+3s4er
+se1ra
+4sergo
+4sern
+ser2s
+se1sa
+s3e2s3p
+sessi4
+se1st
+s3eter
+se2tr
+se4tw
+se1u4m
+seur4s
+s3even
+2sex
+s1exa
+2s1f2
+s2fe
+s3fei
+4sfi
+s2fy
+sge3st
+2s1h
+s4ha.
+sha2k
+sha4p
+sheid4
+s4hip
+3shir
+s2hop
+s4hort
+s2hot
+3show
+1si
+3sia
+si4dec
+si4dew
+sie3s
+sie3tj
+si3f
+3s4ig
+2s3ijz
+2s3ind
+2sinf
+sin3gl
+4sini
+s3inko
+4sinm
+2sinr
+2s1ins
+2s1int
+4sinv
+s3inz
+si4ons
+3si2s
+sis4t
+3sit
+2s1j2
+3sjac
+s3jas
+s3je.
+3sje4r
+s4jez
+s2jo
+3sjok
+4sjon
+2s1k
+s3k2a
+ska4te
+s3ke
+3s4ki.
+s3kl
+s3kn
+s4kopi
+skorre4
+3skrib
+3skrip
+s3k4w
+sky3
+1s2l2
+3sla.
+3slaan
+s3laar
+s3lad
+3slag
+slag3r
+3s4lak
+2s1lam
+3slape
+s3las
+2s3lat
+s4lav
+s4le.
+3sleep
+4s3leer
+2s3leg
+2s3lei
+4sleng
+3slent
+4s3ler
+s3les
+sle4tj
+3sleu
+2s3lev
+4s3lez
+2s3lic
+2slid
+4s3lied
+s3lief
+s3lig
+3slijp
+s3lini
+4slinn
+4s3lit
+slo4b
+4sloc
+3sloe
+3slof
+2s3log
+s3loos
+3s4lot
+4slou
+s4low
+2s3loz
+4s3luc
+3slui
+4slui.
+4sluid
+sluis4t
+s3lus
+4sly
+2s1m
+s3man
+s3mas
+4s3mat
+4smec
+s2med
+4s3mei
+4smelo
+4smen
+4smes
+3smeu
+3smid.
+4smidd
+smies3
+s2mij
+smoes4t
+3smok
+3smul
+s2n
+4s3nac
+2snam
+sne4k
+3snel
+2s3nes3
+s3net
+s3neus4
+4s3nie
+s4nip
+4snit
+4sniv
+s3nog
+2snum
+s3nut
+1so1c
+soci3
+1sod
+1soe
+4soef
+soeve3
+3sofa
+s1off
+s3oge
+3soi
+1s2ol
+3sold
+so4le.
+so4les
+3s2om.
+3somm
+2s3oms
+4somz
+s1ond
+2song
+3sonn
+3s4ons
+2s1on2t
+sont3e
+sont4l
+4sonv
+2s3oog
+3s4oort
+2s1op
+3s2op.
+sop2h
+s4opo
+s2opp
+so3pra
+s3opto
+3sor.
+s2orb
+3sori
+s3ork
+3sor4s
+s4ort
+sos4t
+s4ot
+sot4h
+sou3t
+2s1ov
+s2p2
+4sp.
+4spaal
+2s3pak
+s4pan
+3spann
+4s3pap
+3speci
+3s4pee
+speet3
+2spei
+3spell
+2spen
+2sper
+s4perm
+s3pes
+4spex
+1spie
+4spijn
+spi4k
+2s1p4l
+s3plei
+3splet
+spli2
+s3plic
+3splin
+3spoel
+2spol
+2spom
+s4pore
+2spos
+4sprac
+3sprek
+4spres
+3spreu
+s4prie
+4spriem
+4sprij
+4sprob
+2s3ps
+2spt
+3spui
+2spun
+s1q
+4s3r
+4s3s2
+ssa3s
+s4sce
+s4sco
+ss4e
+ssi1s
+ss4k
+s4sm
+sson4n
+sspas4
+s2t
+4st.
+4staanw
+2s4tac
+3stad.
+4stafe
+4stakk
+4stale
+4stali
+sta4lo
+3stamp
+3stand
+s4tap
+3stape
+star3o
+2stas
+4stau
+4stavo
+4stax
+s4taz
+4stb
+2stc
+2std
+4stea
+4stec
+3s4ted
+3steen
+s3teer
+4steka
+4stema
+4stemo
+4stenu
+4steo
+4sterm
+4steros
+4sterr
+4ste2s
+stes4s
+4steva
+s4tex
+s4tez
+2stf
+4stg
+2sth
+s4tha
+s3thet
+st1hi
+st1ho
+s4thu
+s4thy
+s4tich
+2stid
+s4tiel
+3stier
+3stigm
+4stijd
+3stijf
+3stijl
+st3ijs
+3stikt
+s4tilu
+3stimu
+st3ind
+4stins
+4stint
+sti4o
+3stip
+4stite
+2s4t1j
+4stk
+2stl
+st4let
+2stm
+2stn
+2stoc
+4stoef
+4stoej
+3stoel
+4stoer
+4stoes
+4stoez
+4stol.
+sto4ne.
+4s3tong
+st3oog
+sto4p
+4st3ord
+sto4re.
+4stos
+s4tov
+2stp
+4strad
+4strap
+4strav
+4strec
+s3tref
+4streg
+4strei
+s4trek
+3strel
+s4trem
+4stroe
+s4trol.
+s4troll
+4stroos
+4stroz
+1stru
+s4trui
+2stt
+2stub
+3stud
+2stv
+2s4t3w
+2sty
+2stz
+1su
+su2b1
+sub3r
+3suik
+s1uit
+3suk
+2s1un
+s4us
+3sus.
+4s3v
+svoge4
+4s1w
+1s4y
+3syn
+sy4nan
+sy4ne
+3sys
+4s1z
+taal1
+t3aanv
+4taap
+4taas
+2tac
+t3acad
+t1ach
+t4aci
+t2act
+3tacu
+4tad
+t1ade
+tad2s
+tad4ste
+2taf.
+2tafd
+4taff
+4t3afs
+2tafw
+ta4gr
+3tai
+tai2l3
+ta4ke.
+takt3a
+4tald
+3talg
+talm3a
+4talt
+ta4mak
+ta4man
+2tamb
+3tamen
+ta4mu
+t3anal
+tan4d3r
+3tanj
+t2ans
+3tants
+ta4pek
+ta4pes
+t3arb
+4tarea
+3tari
+4t1arm
+ta2ro
+2tart
+t3arti
+tart3s
+tarwe3
+ta4ry.
+4tas4p
+ta3sta
+ta4tem
+2tatl
+3tau
+4t3aut
+2tav
+ta4ve.
+4tavo
+4t1b
+4t1c
+4t3d2
+1te
+3tea
+te4ad
+te2as
+3tec
+tec3t
+4ted.
+t3edit
+te3do
+tee2m1
+4teen3
+tege4n3
+t3eind
+teits3
+4tekk
+3tekor
+3teks4
+4tekse
+tek3t
+te4lap
+3telef
+3teleg
+te4loe
+te4log
+te4luu
+4temm
+te4mor
+3tempo
+4temt
+t2en
+ten4ac
+ten3al
+ten3as
+te4nau
+te4ned
+te4nek
+te4nel
+te4n3et
+ten3k
+te4nol
+ten4se.
+ten4su
+ten4tis
+t3entw
+3tenu
+3tenw
+3teo
+te3p2h
+t2er
+ter3af
+ter3ak
+te3ral
+ter4dol
+3terec
+te4rem
+te4reu
+3terh
+teri4m
+3termi
+ter3na
+ter4spr
+3tes
+tes4ko
+t3euro
+4teuv
+te4ve.
+2texe
+4texp
+4t1f2
+tfa4d
+4t3g2
+2th.
+2t1ha
+3t4ha.
+3t2hag
+4t3hal
+3than.
+2thc
+3the.
+3t2hea
+3thee.
+t2her
+3thera
+t3here
+3therm
+3thes
+4thl
+4thok
+t4hom
+4t1hoo
+2t3hor
+t1hou
+t3houd
+t3houw
+2ths
+t1hu
+2thui
+t4hun
+3t2hur
+2thyp
+1ti
+ti4aalb
+tia4nu
+3tib
+3tica
+3tice
+ti4ce.
+3tie
+ti4eerb
+tie3ru
+tie3s
+ties4l
+ties4p
+tie3t
+ti1eu
+ti2ga
+tig3aa
+4tigm
+ti2gu
+4tijl.
+4tijld
+4tijlt
+3tijn
+2t1ijz
+tik4w
+4tiliu
+til4la.
+ti4mes
+ti4min
+3timm
+4timp
+ti4nad
+4tincu
+4tind
+2tinf
+tin4gi
+tin4g3r
+4tinku
+4tinl
+2tins
+t3inst
+4tinv
+4tinw
+ti4oneu
+3tis
+tis4l
+ti3sli
+tis4tr
+ti3tr
+3tiv
+3tiz
+tj2
+2t1ja
+4tjesl
+4tjeu
+2t1jo
+2t1ju
+4t3k4
+4t1l
+t3la
+tleve4
+4t3m
+tmos3
+4t3n
+3toc
+4tock
+3tod
+to3do
+toe3d
+toe3g
+3toen
+toe3pl
+toe3tj
+3toez
+4to2f
+tog4n
+3toil
+to4kan
+4tolf
+tol4pr
+4tolv
+t3oml
+tom4n
+4tomp
+4toms
+t2on
+2tond
+3tonee
+to4nes
+ton4gr
+to4non
+2tont
+t2oo4
+3toon
+to4pas
+4topb
+4topd
+top4let
+4topm
+2topn
+4topr
+to4q
+2torg
+t3orga
+tor4m3a
+to3sf
+to3sk
+to3sl
+tot4r
+tou1c
+4toverg
+4t3p2
+tpa4t
+tper4sp
+tpe4t
+4tq
+t2r2
+4t3raad
+4traf
+tra4fo
+3trai
+trap3l
+4trato
+traw4
+tre4ak
+2trec
+4treda
+3trein
+4t3reis
+4treiz
+4treke
+tre4kl
+tre4ku
+4trel
+tre2t
+3tribu
+3tril
+4triv
+tro3a
+4troed
+t3roer
+t3roes
+t3rold
+t4rom
+t3rond
+3tros
+trui3t4
+2t1rus
+4ts
+ts4aar
+tsa4le
+t3sch
+t2s3ef
+t2sei
+t2sek
+ts3eks
+t3sen
+t4seng
+ts1ex
+tsi4ga
+t2sij
+t4sink
+ts2j
+ts4kel
+ts4kul
+ts3lam
+t4slan
+t3slep
+ts2me
+t4smu
+ts3nat
+t3snoe
+ts1or
+t1sp
+t3span
+t3spi
+t3spor
+t3spre
+t1st
+t4stab
+t4star
+t4s3tas
+t3ste
+t4steg
+t4stera
+ts4tes.
+ts4tie
+t3ston
+t3stop
+t3str
+t3stu
+tst4w
+t2su
+t4suit
+4t1t2
+t3t4a
+tta4g
+t3te
+tte3lo
+tte2n
+tten4tj
+t3tr
+ttrai4
+4tual.
+4tuals
+tu4bel
+tu1e
+3tuin
+4tuip
+tuit4j
+4tuk
+tuk3sn
+3tum
+tu4mel
+4tump
+tu4nes
+3tunn
+tu1o
+3turb
+3tu4s3
+tuu4
+tu3wa
+4t1v
+tva4l
+2t1w
+4t3wa
+t3we
+twee3s
+twee3t
+t3wie
+t4wijf
+4twil
+t2win
+t3wind
+t3wo
+1ty1
+ty4le.
+3typ
+4t1z
+u1a
+ua4dro
+uae4
+u4an.
+ua4re.
+ua4res
+uat4s
+4ub
+ub3ac
+ube4li
+u2bo
+u4ce.
+u4ces
+u1cha
+u3chen
+u3chet4
+u3cho
+uchu4
+uck4e
+uc4ta
+u1d
+uden4tj
+udet4
+u4dez
+udge4t
+udi4ne
+ud3ove
+u2dr
+ud4sa
+ud4sta
+ud4sto
+ud3w
+u1ee
+u1el
+ueli4
+ue4s
+ues3t
+u1eu
+u1fl
+u3f2r
+4ug
+ug4des
+ug2do
+ug3ei
+uge4leg
+uge4ne.
+ugi4e
+u4g3l
+u2go
+ug3on
+u2g3r
+ug3s4
+ugsto4r
+u3h
+u2i
+ui2da
+ui4deu
+uid3g
+ui2d1o
+uid4sta
+ui3e
+uies4
+uif3l
+ui2f3r
+ui4fu
+ui4gaa
+ui2go
+ui2g3r
+4uik
+ui2k3a
+ui2k3l
+ui2ko
+ui2k3r
+uik3w
+ui2la
+uil3aa
+ui4lem
+uil3m
+ui2lo
+ui2ma
+uimes4
+u4in
+ui4n1a
+ui4nes.
+ui2no
+uin4slo
+ui4pe.
+ui4pes
+ui4pl
+ui4p3r
+4uis
+ui2sa
+ui4sl
+1uitg
+uit1h
+uit1j
+uit3r
+uit1s
+uit3sm
+uit3sp
+u1j
+uk4e
+uke3no
+u2k3l
+u2kor
+u2kr
+uk3ri
+uks4h
+uks4me
+uk4taa
+uk3w
+u1la
+ul3ac
+uliet4
+ul4kar
+u1lo
+ul4pak
+ul2p3l
+ul2po
+ul4pr
+ul4ps
+ul4spa
+ul4spu
+ul4stel
+u1lu2
+u4mac
+ummi3s
+umpi4
+un2c
+un3che
+un4e
+une4tj
+un3g
+3unif
+3univ
+un4kr
+un2s
+un3sc
+un3se
+uns4t
+unst3a
+un4stei
+unst3r
+un4tag
+un2tj
+u3ol
+u1or
+4up
+u1pa
+upda4
+u2pe.
+u2pek
+u4pen
+u2pes
+u1pl
+u1po
+u1pr
+u1q
+2ur
+u1ra
+ur3ac
+ur2al
+uras4t
+u4rec
+u4renv
+ures4
+ure4tj
+ur2fa
+ur3gl
+u1ri
+uri4c
+4urie
+u4rind
+ur4kie
+u1ro
+u4ront
+ur2sl
+ur2sn
+ur4spa
+ur4spr
+ur4sui
+u1ru
+u3ry
+u1san
+u2sc
+u3s2cr
+4use
+u4sep
+u4sj
+u4s3l
+us3n
+u2so
+u4s3p
+us4se.
+us4ses
+u2st
+us3te
+us4tei
+us3ti
+us3tr
+4ut
+u1ta
+ut2ad
+u3tan
+u4tees
+u4tef
+u4teks
+u4tem
+uter4n
+u4tet
+u2tex
+uti4oni
+uti2q
+u1to
+u1tr
+uts4c
+ut1sn
+ut2sp
+ut4sto
+u1tu
+uu2
+uur1
+uur3a
+u1v
+uvan4
+uvel4s
+uw1a
+u4wec
+u4wei
+u4weko
+u4wij
+u4wind
+u4wink
+uw1o
+uw3r
+uwui2
+u1z
+uzes4
+uziek3
+va4kar
+va2ki
+vak3l
+va2ko
+va4loe
+val4s3p
+va2n
+va3se
+va3s4o
+va4th
+2vc
+veel1
+veep4
+2vega4
+veis4
+ve4lap
+vel4do
+vel4dr
+vel4d3u
+ve4lis
+ve2na
+ven3k
+ve2n3o
+ven2s
+ven4se
+venti4o
+ve2r
+ver1a
+ver3da
+verdi4
+ver3k4
+ver3n
+ver3p
+ver3sa
+ver3sm
+ver3sp
+ver3tw
+ver1u
+ve2s3
+ves4c
+ves4po
+ve4st
+ve4tem
+ve2tj
+ve4to
+ve2tr
+2vi2c
+vi3ch
+vie2s
+vies3p
+vie2w
+vi4ne
+ving4
+4vi4ot
+vi4san
+vi4set
+vi4sol
+visper4
+vi1tr
+vi4val
+2v1j
+v2l
+4vlar
+vleis4
+vle3s
+vlooi4t
+3vo
+voel4s
+voet3j
+voe4tr
+vo2le
+vo2li
+vol3ij
+v4r2
+vrij3k
+vues4
+vu2lo
+waad1
+w2ad
+w2ag
+3wagen
+wa4la
+wa4les
+4wana
+wan4gl
+wa2n3o
+wan3sm
+3wap
+war4tan
+wart3j
+war4to
+wart3r
+wa4s3p
+watt3u
+2w1b
+w1c
+2w1d
+1we
+we2a
+we2b3a
+we2d1i
+we2dr
+wee3lo
+wee3sl
+wee3sp
+wees4t
+we2g3a
+weg3eb
+we4gerv
+weg3ij
+weg3l
+we2g3o
+we2g3r
+we4ka
+we4kr
+wel3ed
+wel3ee
+we2lo
+wel3om
+we3loo
+wel3s4
+we4mab
+we2mi
+we4mo
+we2n
+we3ne
+we4nee
+we4nem
+wen4kas
+wen3o
+wer4gr
+w4erk
+wer4k3l
+wer4k3o
+wer4kr
+wer4k3u
+wer4k3w
+wer4p3a
+4werw
+we2s
+wes3p
+w4et
+we2th
+2w1f
+w1g
+w1h
+3wijd
+wijs3
+wi2k
+3wil
+wil4s
+1win
+win4d3r
+3wink
+win4kl
+win2s
+win4ta
+wi4sec
+1wi2t
+wi3te
+wit3h
+wit3j
+wit3o
+wit3r
+w1j
+2w1k
+2w1l
+w1m
+4wn
+wn3ac
+w3nes
+w4oe
+woe3i2
+wo2l
+wol2f
+wolf4s3
+worm3a
+4wot
+w1p
+wper4
+w2r
+wri4
+2w1s
+w2sa
+ws4k
+w2sle
+2w1t
+w1v
+wva2
+4w1w
+wwa4v
+w1z
+xan3
+x1b
+x1c
+xchan4
+xel4
+xf4
+x1h
+xis4
+x1k
+xop4
+x1p
+x1t
+x4tak
+xtie4
+xtraat4
+xtu4r
+xu1
+x3v
+x3w
+xys4
+y1a
+y4ah
+yan4c
+y1b
+yber4t
+y1c
+ycho3
+y1d
+y1e
+y1f
+yfu4
+y1g
+y3gl
+ygu2
+y3h
+y1i
+y1j
+yl3al
+y4les
+y4let
+yli4n
+y1lo
+ylo3s
+ymfes4
+ym4fl
+ymor4
+y3no
+yn3t
+yon4n
+y1p
+y4pec
+y4ped
+y4pek
+y2pem
+y4pev
+y4pew
+y1r
+yr4e
+y1sa
+ys4h
+ysha4
+y2s3l
+y1so
+ys3t
+ys4ty
+y1t2
+ytop4
+y3v
+yvet4
+yvon4
+y3w
+y1z
+3za
+zaf4
+za2k3a
+za2ku
+zan4da
+zang3s
+zas4
+2zb
+4zc
+4zd
+zee3g
+zee3k
+zee3le
+zee3ro
+zee3s4
+zelf1
+zen4da
+ze2no
+ze4raa
+ze3roo
+zer4sl
+zer4sp
+ze2s
+ze3sc
+zes3e
+ze3sl
+ze3str
+ze4ta
+ze2th
+ze2ti
+ze4tj
+ze4tr
+zeve2
+zeven3
+2zg
+ziek3l
+zie4kr
+zie4kw
+ziel4s3
+zi4ga
+zij4na
+zijn4s
+zings3
+zin4si
+zin4sl
+zin4sm
+zi4os
+zi2t
+2zk
+z2l
+2zm
+zn4
+zoet3j
+zoe4tr
+zo3f
+zon3da
+zo4nek
+zon2s
+zo2t
+2zp
+2zs
+4zt
+zus3
+4zv
+z2w
+2z1z
diff --git a/hyph/english.lh b/hyph/english.lh
new file mode 100644
index 0000000..8713a3f
--- /dev/null
+++ b/hyph/english.lh
@@ -0,0 +1,4499 @@
+Lout hyphenation information
+%
+%  Created by Jeff Kingston, 20 April 1994, from a TeX
+%  hyphenation file.
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+
+Exceptions:
+as-so-ciate
+as-so-ciates
+dec-li-na-tion
+oblig-a-tory
+phil-an-thropic
+present
+presents
+project
+projects
+reci-procity
+re-cog-ni-zance
+ref-or-ma-tion
+ret-ri-bu-tion
+ta-ble
+
+Patterns:
+.ach4
+.ad4der
+.af1t
+.al3t
+.am5at
+.an5c
+.ang4
+.ani5m
+.ant4
+.an3te
+.anti5s
+.ar5s
+.ar4tie
+.ar4ty
+.as3c
+.as1p
+.as1s
+.aster5
+.atom5
+.au1d
+.av4i
+.awn4
+.ba4g
+.ba5na
+.bas4e
+.ber4
+.be5ra
+.be3sm
+.be5sto
+.bri2
+.but4ti
+.cam4pe
+.can5c
+.capa5b
+.car5ol
+.ca4t
+.ce4la
+.ch4
+.chill5i
+.ci2
+.cit5r
+.co3e
+.co4r
+.cor5ner
+.de4moi
+.de3o
+.de3ra
+.de3ri
+.des4c
+.dictio5
+.do4t
+.du4c
+.dumb5
+.earth5
+.eas3i
+.eb4
+.eer4
+.eg2
+.el5d
+.el3em
+.enam3
+.en3g
+.en3s
+.eq5ui5t
+.er4ri
+.es3
+.eu3
+.eye5
+.fes3
+.for5mer
+.ga2
+.ge2
+.gen3t4
+.ge5og
+.gi5a
+.gi4b
+.go4r
+.hand5i
+.han5k
+.he2
+.hero5i
+.hes3
+.het3
+.hi3b
+.hi3er
+.hon5ey
+.hon3o
+.hov5
+.id4l
+.idol3
+.im3m
+.im5pin
+.in1
+.in3ci
+.ine2
+.in2k
+.in3s
+.ir5r
+.is4i
+.ju3r
+.la4cy
+.la4m
+.lat5er
+.lath5
+.le2
+.leg5e
+.len4
+.lep5
+.lev1
+.li4g
+.lig5a
+.li2n
+.li3o
+.li4t
+.mag5a5
+.mal5o
+.man5a
+.mar5ti
+.me2
+.mer3c
+.me5ter
+.mis1
+.mist5i
+.mon3e
+.mo3ro
+.mu5ta
+.muta5b
+.ni4c
+.od2
+.odd5
+.of5te
+.or5ato
+.or3c
+.or1d
+.or3t
+.os3
+.os4tl
+.oth3
+.out3
+.ped5al
+.pe5te
+.pe5tit
+.pi4e
+.pio5n
+.pi2t
+.pre3m
+.ra4c
+.ran4t
+.ratio5na
+.ree2
+.re5mit
+.res2
+.re5stat
+.ri4g
+.rit5u
+.ro4q
+.ros5t
+.row5d
+.ru4d
+.sci3e
+.self5
+.sell5
+.se2n
+.se5rie
+.sh2
+.si2
+.sing4
+.st4
+.sta5bl
+.sy2
+.ta4
+.te4
+.ten5an
+.th2
+.ti2
+.til4
+.tim5o5
+.ting4
+.tin5k
+.ton4a
+.to4p
+.top5i
+.tou5s
+.trib5ut
+.un1a
+.un3ce
+.under5
+.un1e
+.un5k
+.un5o
+.un3u
+.up3
+.ure3
+.us5a
+.ven4de
+.ve5ra
+.wil5i
+.ye4
+4ab.
+a5bal
+a5ban
+abe2
+ab5erd
+abi5a
+ab5it5ab
+ab5lat
+ab5o5liz
+4abr
+ab5rog
+ab3ul
+a4car
+ac5ard
+ac5aro
+a5ceou
+ac1er
+a5chet
+4a2ci
+a3cie
+ac1in
+a3cio
+ac5rob
+act5if
+ac3ul
+ac4um
+a2d
+ad4din
+ad5er.
+2adi
+a3dia
+ad3ica
+adi4er
+a3dio
+a3dit
+a5diu
+ad4le
+ad3ow
+ad5ran
+ad4su
+4adu
+a3duc
+ad5um
+ae4r
+aeri4e
+a2f
+aff4
+a4gab
+aga4n
+ag5ell
+age4o
+4ageu
+ag1i
+4ag4l
+ag1n
+a2go
+3agog
+ag3oni
+a5guer
+ag5ul
+a4gy
+a3ha
+a3he
+ah4l
+a3ho
+ai2
+a5ia
+a3ic.
+ai5ly
+a4i4n
+ain5in
+ain5o
+ait5en
+a1j
+ak1en
+al5ab
+al3ad
+a4lar
+4aldi
+2ale
+al3end
+a4lenti
+a5le5o
+al1i
+al4ia.
+ali4e
+al5lev
+4allic
+4alm
+a5log.
+a4ly.
+4alys
+5a5lyst
+5alyt
+3alyz
+4ama
+am5ab
+am3ag
+ama5ra
+am5asc
+a4matis
+a4m5ato
+am5era
+am3ic
+am5if
+am5ily
+am1in
+ami4no
+a2mo
+a5mon
+amor5i
+amp5en
+a2n
+an3age
+3analy
+a3nar
+an3arc
+anar4i
+a3nati
+4and
+ande4s
+an3dis
+an1dl
+an4dow
+a5nee
+a3nen
+an5est.
+a3neu
+2ang
+ang5ie
+an1gl
+a4n1ic
+a3nies
+an3i3f
+an4ime
+a5nimi
+a5nine
+an3io
+a3nip
+an3ish
+an3it
+a3niu
+an4kli
+5anniz
+ano4
+an5ot
+anoth5
+an2sa
+an4sco
+an4sn
+an2sp
+ans3po
+an4st
+an4sur
+antal4
+an4tie
+4anto
+an2tr
+an4tw
+an3ua
+an3ul
+a5nur
+4ao
+apar4
+ap5at
+ap5ero
+a3pher
+4aphi
+a4pilla
+ap5illar
+ap3in
+ap3ita
+a3pitu
+a2pl
+apoc5
+ap5ola
+apor5i
+apos3t
+aps5es
+a3pu
+aque5
+2a2r
+ar3act
+a5rade
+ar5adis
+ar3al
+a5ramete
+aran4g
+ara3p
+ar4at
+a5ratio
+ar5ativ
+a5rau
+ar5av4
+araw4
+arbal4
+ar4chan
+ar5dine
+ar4dr
+ar5eas
+a3ree
+ar3ent
+a5ress
+ar4fi
+ar4fl
+ar1i
+ar5ial
+ar3ian
+a3riet
+ar4im
+ar5inat
+ar3io
+ar2iz
+ar2mi
+ar5o5d
+a5roni
+a3roo
+ar2p
+ar3q
+arre4
+ar4sa
+ar2sh
+4as.
+as4ab
+as3ant
+ashi4
+a5sia.
+a3sib
+a3sic
+5a5si4t
+ask3i
+as4l
+a4soc
+as5ph
+as4sh
+as3ten
+as1tr
+asur5a
+a2ta
+at3abl
+at5ac
+at3alo
+at5ap
+ate5c
+at5ech
+at3ego
+at3en.
+at3era
+ater5n
+a5terna
+at3est
+at5ev
+4ath
+ath5em
+a5then
+at4ho
+ath5om
+4ati.
+a5tia
+at5i5b
+at1ic
+at3if
+ation5ar
+at3itu
+a4tog
+a2tom
+at5omiz
+a4top
+a4tos
+a1tr
+at5rop
+at4sk
+at4tag
+at5te
+at4th
+a2tu
+at5ua
+at5ue
+at3ul
+at3ura
+a2ty
+au4b
+augh3
+au3gu
+au4l2
+aun5d
+au3r
+au5sib
+aut5en
+au1th
+a2va
+av3ag
+a5van
+ave4no
+av3era
+av5ern
+av5ery
+av1i
+avi4er
+av3ig
+av5oc
+a1vor
+3away
+aw3i
+aw4ly
+aws4
+ax4ic
+ax4id
+ay5al
+aye4
+ays4
+azi4er
+azz5i
+5ba.
+bad5ger
+ba4ge
+bal1a
+ban5dag
+ban4e
+ban3i
+barbi5
+bari4a
+bas4si
+1bat
+ba4z
+2b1b
+b2be
+b3ber
+bbi4na
+4b1d
+4be.
+beak4
+beat3
+4be2d
+be3da
+be3de
+be3di
+be3gi
+be5gu
+1bel
+be1li
+be3lo
+4be5m
+be5nig
+be5nu
+4bes4
+be3sp
+be5str
+3bet
+bet5iz
+be5tr
+be3tw
+be3w
+be5yo
+2bf
+4b3h
+bi2b
+bi4d
+3bie
+bi5en
+bi4er
+2b3if
+1bil
+bi3liz
+bina5r4
+bin4d
+bi5net
+bi3ogr
+bi5ou
+bi2t
+3bi3tio
+bi3tr
+3bit5ua
+b5itz
+b1j
+bk4
+b2l2
+blath5
+b4le.
+blen4
+5blesp
+b3lis
+b4lo
+blun4t
+4b1m
+4b3n
+bne5g
+3bod
+bod3i
+bo4e
+bol3ic
+bom4bi
+bon4a
+bon5at
+3boo
+5bor.
+4b1ora
+bor5d
+5bore
+5bori
+5bos4
+b5ota
+both5
+bo4to
+bound3
+4bp
+4brit
+broth3
+2b5s2
+bsor4
+2bt
+bt4l
+b4to
+b3tr
+buf4fer
+bu4ga
+bu3li
+bumi4
+bu4n
+bunt4i
+bu3re
+bus5ie
+buss4e
+5bust
+4buta
+3butio
+b5uto
+b1v
+4b5w
+5by.
+bys4
+1ca
+cab3in
+ca1bl
+cach4
+ca5den
+4cag4
+2c5ah
+ca3lat
+cal4la
+call5in
+4calo
+can5d
+can4e
+can4ic
+can5is
+can3iz
+can4ty
+cany4
+ca5per
+car5om
+cast5er
+cas5tig
+4casy
+ca4th
+4cativ
+cav5al
+c3c
+ccha5
+cci4a
+ccompa5
+ccon4
+ccou3t
+2ce.
+4ced.
+4ceden
+3cei
+5cel.
+3cell
+1cen
+3cenc
+2cen4e
+4ceni
+3cent
+3cep
+ce5ram
+4cesa
+3cessi
+ces5si5b
+ces5t
+cet4
+c5e4ta
+cew4
+2ch
+4ch.
+4ch3ab
+5chanic
+ch5a5nis
+che2
+cheap3
+4ched
+che5lo
+3chemi
+ch5ene
+ch3er.
+ch3ers
+4ch1in
+5chine.
+ch5iness
+5chini
+5chio
+3chit
+chi2z
+3cho2
+ch4ti
+1ci
+3cia
+ci2a5b
+cia5r
+ci5c
+4cier
+5cific.
+4cii
+ci4la
+3cili
+2cim
+2cin
+c4ina
+3cinat
+cin3em
+c1ing
+c5ing.
+5cino
+cion4
+4cipe
+ci3ph
+4cipic
+4cista
+4cisti
+2c1it
+cit3iz
+5ciz
+ck1
+ck3i
+1c4l4
+4clar
+c5laratio
+5clare
+cle4m
+4clic
+clim4
+cly4
+c5n
+1co
+co5ag
+coe2
+2cog
+co4gr
+coi4
+co3inc
+col5i
+5colo
+col3or
+com5er
+con4a
+c4one
+con3g
+con5t
+co3pa
+cop3ic
+co4pl
+4corb
+coro3n
+cos4e
+cov1
+cove4
+cow5a
+coz5e
+co5zi
+c1q
+cras5t
+5crat.
+5cratic
+cre3at
+5cred
+4c3reta
+cre4v
+cri2
+cri5f
+c4rin
+cris4
+5criti
+cro4pl
+crop5o
+cros4e
+cru4d
+4c3s2
+2c1t
+cta4b
+ct5ang
+c5tant
+c2te
+c3ter
+c4ticu
+ctim3i
+ctu4r
+c4tw
+cud5
+c4uf
+c4ui
+cu5ity
+5culi
+cul4tis
+3cultu
+cu2ma
+c3ume
+cu4mi
+3cun
+cu3pi
+cu5py
+cur5a4b
+cu5ria
+1cus
+cuss4i
+3c4ut
+cu4tie
+4c5utiv
+4cutr
+1cy
+cze4
+1d2a
+5da.
+2d3a4b
+dach4
+4daf
+2dag
+da2m2
+dan3g
+dard5
+dark5
+4dary
+3dat
+4dativ
+4dato
+5dav4
+dav5e
+5day
+d1b
+d5c
+d1d4
+2de.
+deaf5
+deb5it
+de4bon
+decan4
+de4cil
+de5com
+2d1ed
+4dee.
+de5if
+deli4e
+del5i5q
+de5lo
+d4em
+5dem.
+3demic
+dem5ic.
+de5mil
+de4mons
+demor5
+1den
+de4nar
+de3no
+denti5f
+de3nu
+de1p
+de3pa
+depi4
+de2pu
+d3eq
+d4erh
+5derm
+dern5iz
+der5s
+des2
+d2es.
+de1sc
+de2s5o
+des3ti
+de3str
+de4su
+de1t
+de2to
+de1v
+dev3il
+4dey
+4d1f
+d4ga
+d3ge4t
+dg1i
+d2gy
+d1h2
+5di.
+1d4i3a
+dia5b
+di4cam
+d4ice
+3dict
+3did
+5di3en
+d1if
+di3ge
+di4lato
+d1in
+1dina
+3dine.
+5dini
+di5niz
+1dio
+dio5g
+di4pl
+dir2
+di1re
+dirt5i
+dis1
+5disi
+d4is3t
+d2iti
+1di1v
+d1j
+d5k2
+4d5la
+3dle.
+3dled
+3dles.
+4dless
+2d3lo
+4d5lu
+2dly
+d1m
+4d1n4
+1do
+3do.
+do5de
+5doe
+2d5of
+d4og
+do4la
+doli4
+do5lor
+dom5iz
+do3nat
+doni4
+doo3d
+dop4p
+d4or
+3dos
+4d5out
+do4v
+3dox
+d1p
+1dr
+drag5on
+4drai
+dre4
+drea5r
+5dren
+dri4b
+dril4
+dro4p
+4drow
+5drupli
+4dry
+2d1s2
+ds4p
+d4sw
+d4sy
+d2th
+1du
+d1u1a
+du2c
+d1uca
+duc5er
+4duct.
+4ducts
+du5el
+du4g
+d3ule
+dum4be
+du4n
+4dup
+du4pe
+d1v
+d1w
+d2y
+5dyn
+dy4se
+dys5p
+e1a4b
+e3act
+ead1
+ead5ie
+ea4ge
+ea5ger
+ea4l
+eal5er
+eal3ou
+eam3er
+e5and
+ear3a
+ear4c
+ear5es
+ear4ic
+ear4il
+ear5k
+ear2t
+eart3e
+ea5sp
+e3ass
+east3
+ea2t
+eat5en
+eath3i
+e5atif
+e4a3tu
+ea2v
+eav3en
+eav5i
+eav5o
+2e1b
+e4bel.
+e4bels
+e4ben
+e4bit
+e3br
+e4cad
+ecan5c
+ecca5
+e1ce
+ec5essa
+ec2i
+e4cib
+ec5ificat
+ec5ifie
+ec5ify
+ec3im
+eci4t
+e5cite
+e4clam
+e4clus
+e2col
+e4comm
+e4compe
+e4conc
+e2cor
+ec3ora
+eco5ro
+e1cr
+e4crem
+ec4tan
+ec4te
+e1cu
+e4cul
+ec3ula
+2e2da
+4ed3d
+e4d1er
+ede4s
+4edi
+e3dia
+ed3ib
+ed3ica
+ed3im
+ed1it
+edi5z
+4edo
+e4dol
+edon2
+e4dri
+e4dul
+ed5ulo
+ee2c
+eed3i
+ee2f
+eel3i
+ee4ly
+ee2m
+ee4na
+ee4p1
+ee2s4
+eest4
+ee4ty
+e5ex
+e1f
+e4f3ere
+1eff
+e4fic
+5efici
+efil4
+e3fine
+ef5i5nite
+3efit
+efor5es
+e4fuse.
+4egal
+eger4
+eg5ib
+eg4ic
+eg5ing
+e5git5
+eg5n
+e4go.
+e4gos
+eg1ul
+e5gur
+5egy
+e1h4
+eher4
+ei2
+e5ic
+ei5d
+eig2
+ei5gl
+e3imb
+e3inf
+e1ing
+e5inst
+eir4d
+eit3e
+ei3th
+e5ity
+e1j
+e4jud
+ej5udi
+eki4n
+ek4la
+e1la
+e4la.
+e4lac
+elan4d
+el5ativ
+e4law
+elaxa4
+e3lea
+el5ebra
+5elec
+e4led
+el3ega
+e5len
+e4l1er
+e1les
+el2f
+el2i
+e3libe
+e4l5ic.
+el3ica
+e3lier
+el5igib
+e5lim
+e4l3ing
+e3lio
+e2lis
+el5ish
+e3liv3
+4ella
+el4lab
+ello4
+e5loc
+el5og
+el3op.
+el2sh
+el4ta
+e5lud
+el5ug
+e4mac
+e4mag
+e5man
+em5ana
+em5b
+e1me
+e2mel
+e4met
+em3ica
+emi4e
+em5igra
+em1in2
+em5ine
+em3i3ni
+e4mis
+em5ish
+e5miss
+em3iz
+5emniz
+emo4g
+emoni5o
+em3pi
+e4mul
+em5ula
+emu3n
+e3my
+en5amo
+e4nant
+ench4er
+en3dic
+e5nea
+e5nee
+en3em
+en5ero
+en5esi
+en5est
+en3etr
+e3new
+en5ics
+e5nie
+e5nil
+e3nio
+en3ish
+en3it
+e5niu
+5eniz
+4enn
+4eno
+eno4g
+e4nos
+en3ov
+en4sw
+ent5age
+4enthes
+en3ua
+en5uf
+e3ny.
+4en3z
+e5of
+eo2g
+e4oi4
+e3ol
+eop3ar
+e1or
+eo3re
+eo5rol
+eos4
+e4ot
+eo4to
+e5out
+e5ow
+e2pa
+e3pai
+ep5anc
+e5pel
+e3pent
+ep5etitio
+ephe4
+e4pli
+e1po
+e4prec
+ep5reca
+e4pred
+ep3reh
+e3pro
+e4prob
+ep4sh
+ep5ti5b
+e4put
+ep5uta
+e1q
+equi3l
+e4q3ui3s
+er1a
+era4b
+4erand
+er3ar
+4erati.
+2erb
+er4bl
+er3ch
+er4che
+2ere.
+e3real
+ere5co
+ere3in
+er5el.
+er3emo
+er5ena
+er5ence
+4erene
+er3ent
+ere4q
+er5ess
+er3est
+eret4
+er1h
+er1i
+e1ria4
+5erick
+e3rien
+eri4er
+er3ine
+e1rio
+4erit
+er4iu
+eri4v
+e4riva
+er3m4
+er4nis
+4ernit
+5erniz
+er3no
+2ero
+er5ob
+e5roc
+ero4r
+er1ou
+er1s
+er3set
+ert3er
+4ertl
+er3tw
+4eru
+eru4t
+5erwau
+e1s4a
+e4sage.
+e4sages
+es2c
+e2sca
+es5can
+e3scr
+es5cu
+e1s2e
+e2sec
+es5ecr
+es5enc
+e4sert.
+e4serts
+e4serva
+4esh
+e3sha
+esh5en
+e1si
+e2sic
+e2sid
+es5iden
+es5igna
+e2s5im
+es4i4n
+esis4te
+esi4u
+e5skin
+es4mi
+e2sol
+es3olu
+e2son
+es5ona
+e1sp
+es3per
+es5pira
+es4pre
+2ess
+es4si4b
+estan4
+es3tig
+es5tim
+4es2to
+e3ston
+2estr
+e5stro
+estruc5
+e2sur
+es5urr
+es4w
+eta4b
+eten4d
+e3teo
+ethod3
+et1ic
+e5tide
+etin4
+eti4no
+e5tir
+e5titio
+et5itiv
+4etn
+et5ona
+e3tra
+e3tre
+et3ric
+et5rif
+et3rog
+et5ros
+et3ua
+et5ym
+et5z
+4eu
+e5un
+e3up
+eu3ro
+eus4
+eute4
+euti5l
+eu5tr
+eva2p5
+e2vas
+ev5ast
+e5vea
+ev3ell
+evel3o
+e5veng
+even4i
+ev1er
+e5verb
+e1vi
+ev3id
+evi4l
+e4vin
+evi4v
+e5voc
+e5vu
+e1wa
+e4wag
+e5wee
+e3wh
+ewil5
+ew3ing
+e3wit
+1exp
+5eyc
+5eye.
+eys4
+1fa
+fa3bl
+fab3r
+fa4ce
+4fag
+fain4
+fall5e
+4fa4ma
+fam5is
+5far
+far5th
+fa3ta
+fa3the
+4fato
+fault5
+4f5b
+4fd
+4fe.
+feas4
+feath3
+fe4b
+4feca
+5fect
+2fed
+fe3li
+fe4mo
+fen2d
+fend5e
+fer1
+5ferr
+fev4
+4f1f
+f4fes
+f4fie
+f5fin.
+f2f5is
+f4fly
+f2fy
+4fh
+1fi
+fi3a
+2f3ic.
+4f3ical
+f3ican
+4ficate
+f3icen
+fi3cer
+fic4i
+5ficia
+5ficie
+4fics
+fi3cu
+fi5del
+fight5
+fil5i
+fill5in
+4fily
+2fin
+5fina
+fin2d5
+fi2ne
+f1in3g
+fin4n
+fis4ti
+f4l2
+f5less
+flin4
+flo3re
+f2ly5
+4fm
+4fn
+1fo
+5fon
+fon4de
+fon4t
+fo2r
+fo5rat
+for5ay
+fore5t
+for4i
+fort5a
+fos5
+4f5p
+fra4t
+f5rea
+fres5c
+fri2
+fril4
+frol5
+2f3s
+2ft
+f4to
+f2ty
+3fu
+fu5el
+4fug
+fu4min
+fu5ne
+fu3ri
+fusi4
+fus4s
+4futa
+1fy
+1ga
+gaf4
+5gal.
+3gali
+ga3lo
+2gam
+ga5met
+g5amo
+gan5is
+ga3niz
+gani5za
+4gano
+gar5n4
+gass4
+gath3
+4gativ
+4gaz
+g3b
+gd4
+2ge.
+2ged
+geez4
+gel4in
+ge5lis
+ge5liz
+4gely
+1gen
+ge4nat
+ge5niz
+4geno
+4geny
+1geo
+ge3om
+g4ery
+5gesi
+geth5
+4geto
+ge4ty
+ge4v
+4g1g2
+g2ge
+g3ger
+gglu5
+ggo4
+gh3in
+gh5out
+gh4to
+5gi.
+1gi4a
+gia5r
+g1ic
+5gicia
+g4ico
+gien5
+5gies.
+gil4
+g3imen
+3g4in.
+gin5ge
+5g4ins
+5gio
+3gir
+gir4l
+g3isl
+gi4u
+5giv
+3giz
+gl2
+gla4
+glad5i
+5glas
+1gle
+gli4b
+g3lig
+3glo
+glo3r
+g1m
+g4my
+gn4a
+g4na.
+gnet4t
+g1ni
+g2nin
+g4nio
+g1no
+g4non
+1go
+3go.
+gob5
+5goe
+3g4o4g
+go3is
+gon2
+4g3o3na
+gondo5
+go3ni
+5goo
+go5riz
+gor5ou
+5gos.
+gov1
+g3p
+1gr
+4grada
+g4rai
+gran2
+5graph.
+g5rapher
+5graphic
+4graphy
+4gray
+gre4n
+4gress.
+4grit
+g4ro
+gruf4
+gs2
+g5ste
+gth3
+gu4a
+3guard
+2gue
+5gui5t
+3gun
+3gus
+4gu4t
+g3w
+1gy
+2g5y3n
+gy5ra
+h3ab4l
+hach4
+hae4m
+hae4t
+h5agu
+ha3la
+hala3m
+ha4m
+han4ci
+han4cy
+5hand.
+han4g
+hang5er
+hang5o
+h5a5niz
+han4k
+han4te
+hap3l
+hap5t
+ha3ran
+ha5ras
+har2d
+hard3e
+har4le
+harp5en
+har5ter
+has5s
+haun4
+5haz
+haz3a
+h1b
+1head
+3hear
+he4can
+h5ecat
+h4ed
+he5do5
+he3l4i
+hel4lis
+hel4ly
+h5elo
+hem4p
+he2n
+hena4
+hen5at
+heo5r
+hep5
+h4era
+hera3p
+her4ba
+here5a
+h3ern
+h5erou
+h3ery
+h1es
+he2s5p
+he4t
+het4ed
+heu4
+h1f
+h1h
+hi5an
+hi4co
+high5
+h4il2
+himer4
+h4ina
+hion4e
+hi4p
+hir4l
+hi3ro
+hir4p
+hir4r
+his3el
+his4s
+hith5er
+hi2v
+4hk
+4h1l4
+hlan4
+h2lo
+hlo3ri
+4h1m
+hmet4
+2h1n
+h5odiz
+h5ods
+ho4g
+hoge4
+hol5ar
+3hol4e
+ho4ma
+home3
+hon4a
+ho5ny
+3hood
+hoon4
+hor5at
+ho5ris
+hort3e
+ho5ru
+hos4e
+ho5sen
+hos1p
+1hous
+house3
+hov5el
+4h5p
+4hr4
+hree5
+hro5niz
+hro3po
+4h1s2
+h4sh
+h4tar
+ht1en
+ht5es
+h4ty
+hu4g
+hu4min
+hun5ke
+hun4t
+hus3t4
+hu4t
+h1w
+h4wart
+hy3pe
+hy3ph
+hy2s
+2i1a
+i2al
+iam4
+iam5ete
+i2an
+4ianc
+ian3i
+4ian4t
+ia5pe
+iass4
+i4ativ
+ia4tric
+i4atu
+ibe4
+ib3era
+ib5ert
+ib5ia
+ib3in
+ib5it.
+ib5ite
+i1bl
+ib3li
+i5bo
+i1br
+i2b5ri
+i5bun
+4icam
+5icap
+4icar
+i4car.
+i4cara
+icas5
+i4cay
+iccu4
+4iceo
+4ich
+2ici
+i5cid
+ic5ina
+i2cip
+ic3ipa
+i4cly
+i2c5oc
+4i1cr
+5icra
+i4cry
+ic4te
+ictu2
+ic4t3ua
+ic3ula
+ic4um
+ic5uo
+i3cur
+2id
+i4dai
+id5anc
+id5d
+ide3al
+ide4s
+i2di
+id5ian
+idi4ar
+i5die
+id3io
+idi5ou
+id1it
+id5iu
+i3dle
+i4dom
+id3ow
+i4dr
+i2du
+id5uo
+2ie4
+ied4e
+5ie5ga
+ield3
+ien5a4
+ien4e
+i5enn
+i3enti
+i1er.
+i3esc
+i1est
+i3et
+4if.
+if5ero
+iff5en
+if4fr
+4ific.
+i3fie
+i3fl
+4ift
+2ig
+iga5b
+ig3era
+ight3i
+4igi
+i3gib
+ig3il
+ig3in
+ig3it
+i4g4l
+i2go
+ig3or
+ig5ot
+i5gre
+igu5i
+ig1ur
+i3h
+4i5i4
+i3j
+4ik
+i1la
+il3a4b
+i4lade
+i2l5am
+ila5ra
+i3leg
+il1er
+ilev4
+il5f
+il1i
+il3ia
+il2ib
+il3io
+il4ist
+2ilit
+il2iz
+ill5ab
+4iln
+il3oq
+il4ty
+il5ur
+il3v
+i4mag
+im3age
+ima5ry
+imenta5r
+4imet
+im1i
+im5ida
+imi5le
+i5mini
+4imit
+im4ni
+i3mon
+i2mu
+im3ula
+2in.
+i4n3au
+4inav
+incel4
+in3cer
+4ind
+in5dling
+2ine
+i3nee
+iner4ar
+i5ness
+4inga
+4inge
+in5gen
+4ingi
+in5gling
+4ingo
+4ingu
+2ini
+i5ni.
+i4nia
+in3io
+in1is
+i5nite.
+5initio
+in3ity
+4ink
+4inl
+2inn
+2i1no
+i4no4c
+ino4s
+i4not
+2ins
+in3se
+insur5a
+2int.
+2in4th
+in1u
+i5nus
+4iny
+2io
+4io.
+ioge4
+io2gr
+i1ol
+io4m
+ion3at
+ion4ery
+ion3i
+io5ph
+ior3i
+i4os
+io5th
+i5oti
+io4to
+i4our
+2ip
+ipe4
+iphras4
+ip3i
+ip4ic
+ip4re4
+ip3ul
+i3qua
+iq5uef
+iq3uid
+iq3ui3t
+4ir
+i1ra
+ira4b
+i4rac
+ird5e
+ire4de
+i4ref
+i4rel4
+i4res
+ir5gi
+ir1i
+iri5de
+ir4is
+iri3tu
+5i5r2iz
+ir4min
+iro4g
+5iron.
+ir5ul
+2is.
+is5ag
+is3ar
+isas5
+2is1c
+is3ch
+4ise
+is3er
+3isf
+is5han
+is3hon
+ish5op
+is3ib
+isi4d
+i5sis
+is5itiv
+4is4k
+islan4
+4isms
+i2so
+iso5mer
+is1p
+is2pi
+is4py
+4is1s
+is4sal
+issen4
+is4ses
+is4ta.
+is1te
+is1ti
+ist4ly
+4istral
+i2su
+is5us
+4ita.
+ita4bi
+i4tag
+4ita5m
+i3tan
+i3tat
+2ite
+it3era
+i5teri
+it4es
+2ith
+i1ti
+4itia
+4i2tic
+it3ica
+5i5tick
+it3ig
+it5ill
+i2tim
+2itio
+4itis
+i4tism
+i2t5o5m
+4iton
+i4tram
+it5ry
+4itt
+it3uat
+i5tud
+it3ul
+4itz.
+i1u
+2iv
+iv3ell
+iv3en.
+i4v3er.
+i4vers.
+iv5il.
+iv5io
+iv1it
+i5vore
+iv3o3ro
+i4v3ot
+4i5w
+ix4o
+4iy
+4izar
+izi4
+5izont
+5ja
+jac4q
+ja4p
+1je
+jer5s
+4jestie
+4jesty
+jew3
+jo4p
+5judg
+3ka.
+k3ab
+k5ag
+kais4
+kal4
+k1b
+k2ed
+1kee
+ke4g
+ke5li
+k3en4d
+k1er
+kes4
+k3est.
+ke4ty
+k3f
+kh4
+k1i
+5ki.
+5k2ic
+k4ill
+kilo5
+k4im
+k4in.
+kin4de
+k5iness
+kin4g
+ki4p
+kis4
+k5ish
+kk4
+k1l
+4kley
+4kly
+k1m
+k5nes
+1k2no
+ko5r
+kosh4
+k3ou
+kro5n
+4k1s2
+k4sc
+ks4l
+k4sy
+k5t
+k1w
+lab3ic
+l4abo
+laci4
+l4ade
+la3dy
+lag4n
+lam3o
+3land
+lan4dl
+lan5et
+lan4te
+lar4g
+lar3i
+las4e
+la5tan
+4lateli
+4lativ
+4lav
+la4v4a
+2l1b
+lbin4
+4l1c2
+lce4
+l3ci
+2ld
+l2de
+ld4ere
+ld4eri
+ldi4
+ld5is
+l3dr
+l4dri
+le2a
+le4bi
+left5
+5leg.
+5legg
+le4mat
+lem5atic
+4len.
+3lenc
+5lene.
+1lent
+le3ph
+le4pr
+lera5b
+ler4e
+3lerg
+3l4eri
+l4ero
+les2
+le5sco
+5lesq
+3less
+5less.
+l3eva
+lev4er.
+lev4era
+lev4ers
+3ley
+4leye
+2lf
+l5fr
+4l1g4
+l5ga
+lgar3
+l4ges
+lgo3
+2l3h
+li4ag
+li2am
+liar5iz
+li4as
+li4ato
+li5bi
+5licio
+li4cor
+4lics
+4lict.
+l4icu
+l3icy
+l3ida
+lid5er
+3lidi
+lif3er
+l4iff
+li4fl
+5ligate
+3ligh
+li4gra
+3lik
+4l4i4l
+lim4bl
+lim3i
+li4mo
+l4im4p
+l4ina
+1l4ine
+lin3ea
+lin3i
+link5er
+li5og
+4l4iq
+lis4p
+l1it
+l2it.
+5litica
+l5i5tics
+liv3er
+l1iz
+4lj
+lka3
+l3kal
+lka4t
+l1l
+l4law
+l2le
+l5lea
+l3lec
+l3leg
+l3lel
+l3le4n
+l3le4t
+ll2i
+l2lin4
+l5lina
+ll4o
+lloqui5
+ll5out
+l5low
+2lm
+l5met
+lm3ing
+l4mod
+lmon4
+2l1n2
+3lo.
+lob5al
+lo4ci
+4lof
+3logic
+l5ogo
+3logu
+lom3er
+5long
+lon4i
+l3o3niz
+lood5
+5lope.
+lop3i
+l3opm
+lora4
+lo4rato
+lo5rie
+lor5ou
+5los.
+los5et
+5losophiz
+5losophy
+los4t
+lo4ta
+loun5d
+2lout
+4lov
+2lp
+lpa5b
+l3pha
+l5phi
+lp5ing
+l3pit
+l4pl
+l5pr
+4l1r
+2l1s2
+l4sc
+l2se
+l4sie
+4lt
+lt5ag
+ltane5
+l1te
+lten4
+ltera4
+lth3i
+l5ties.
+ltis4
+l1tr
+ltu2
+ltur3a
+lu5a
+lu3br
+luch4
+lu3ci
+lu3en
+luf4
+lu5id
+lu4ma
+5lumi
+l5umn.
+5lumnia
+lu3o
+luo3r
+4lup
+luss4
+lus3te
+1lut
+l5ven
+l5vet4
+2l1w
+1ly
+4lya
+4lyb
+ly5me
+ly3no
+2lys4
+l5yse
+1ma
+2mab
+ma2ca
+ma5chine
+ma4cl
+mag5in
+5magn
+2mah
+maid5
+4mald
+ma3lig
+ma5lin
+mal4li
+mal4ty
+5mania
+man5is
+man3iz
+4map
+ma5rine.
+ma5riz
+mar4ly
+mar3v
+ma5sce
+mas4e
+mas1t
+5mate
+math3
+ma3tis
+4matiza
+4m1b
+mba4t5
+m5bil
+m4b3ing
+mbi4v
+4m5c
+4me.
+2med
+4med.
+5media
+me3die
+m5e5dy
+me2g
+mel5on
+mel4t
+me2m
+mem1o3
+1men
+men4a
+men5ac
+men4de
+4mene
+men4i
+mens4
+mensu5
+3ment
+men4te
+me5on
+m5ersa
+2mes
+3mesti
+me4ta
+met3al
+me1te
+me5thi
+m4etr
+5metric
+me5trie
+me3try
+me4v
+4m1f
+2mh
+5mi.
+mi3a
+mid4a
+mid4g
+mig4
+3milia
+m5i5lie
+m4ill
+min4a
+3mind
+m5inee
+m4ingl
+min5gli
+m5ingly
+min4t
+m4inu
+miot4
+m2is
+mis4er.
+mis5l
+mis4ti
+m5istry
+4mith
+m2iz
+4mk
+4m1l
+m1m
+mma5ry
+4m1n
+mn4a
+m4nin
+mn4o
+1mo
+4mocr
+5mocratiz
+mo2d1
+mo4go
+mois2
+moi5se
+4mok
+mo5lest
+mo3me
+mon5et
+mon5ge
+moni3a
+mon4ism
+mon4ist
+mo3niz
+monol4
+mo3ny.
+mo2r
+4mora.
+mos2
+mo5sey
+mo3sp
+moth3
+m5ouf
+3mous
+mo2v
+4m1p
+mpara5
+mpa5rab
+mpar5i
+m3pet
+mphas4
+m2pi
+mpi4a
+mp5ies
+m4p1in
+m5pir
+mp5is
+mpo3ri
+mpos5ite
+m4pous
+mpov5
+mp4tr
+m2py
+4m3r
+4m1s2
+m4sh
+m5si
+4mt
+1mu
+mula5r4
+5mult
+multi3
+3mum
+mun2
+4mup
+mu4u
+4mw
+1na
+2n1a2b
+n4abu
+4nac.
+na4ca
+n5act
+nag5er.
+nak4
+na4li
+na5lia
+4nalt
+na5mit
+n2an
+nanci4
+nan4it
+nank4
+nar3c
+4nare
+nar3i
+nar4l
+n5arm
+n4as
+nas4c
+nas5ti
+n2at
+na3tal
+nato5miz
+n2au
+nau3se
+3naut
+nav4e
+4n1b4
+ncar5
+n4ces.
+n3cha
+n5cheo
+n5chil
+n3chis
+nc1in
+nc4it
+ncour5a
+n1cr
+n1cu
+n4dai
+n5dan
+n1de
+nd5est.
+ndi4b
+n5d2if
+n1dit
+n3diz
+n5duc
+ndu4r
+nd2we
+2ne.
+n3ear
+ne2b
+neb3u
+ne2c
+5neck
+2ned
+ne4gat
+neg5ativ
+5nege
+ne4la
+nel5iz
+ne5mi
+ne4mo
+1nen
+4nene
+3neo
+ne4po
+ne2q
+n1er
+nera5b
+n4erar
+n2ere
+n4er5i
+ner4r
+1nes
+2nes.
+4nesp
+2nest
+4nesw
+3netic
+ne4v
+n5eve
+ne4w
+n3f
+n4gab
+n3gel
+nge4n4e
+n5gere
+n3geri
+ng5ha
+n3gib
+ng1in
+n5git
+n4gla
+ngov4
+ng5sh
+n1gu
+n4gum
+n2gy
+4n1h4
+nha4
+nhab3
+nhe4
+3n4ia
+ni3an
+ni4ap
+ni3ba
+ni4bl
+ni4d
+ni5di
+ni4er
+ni2fi
+ni5ficat
+n5igr
+nik4
+n1im
+ni3miz
+n1in
+5nine.
+nin4g
+ni4o
+5nis.
+nis4ta
+n2it
+n4ith
+3nitio
+n3itor
+ni3tr
+n1j
+4nk2
+n5kero
+n3ket
+nk3in
+n1kl
+4n1l
+n5m
+nme4
+nmet4
+4n1n2
+nne4
+nni3al
+nni4v
+nob4l
+no3ble
+n5ocl
+4n3o2d
+3noe
+4nog
+noge4
+nois5i
+no5l4i
+5nologis
+3nomic
+n5o5miz
+no4mo
+no3my
+no4n
+non4ag
+non5i
+n5oniz
+4nop
+5nop5o5li
+nor5ab
+no4rary
+4nosc
+nos4e
+nos5t
+no5ta
+1nou
+3noun
+nov3el3
+nowl3
+n1p4
+npi4
+npre4c
+n1q
+n1r
+nru4
+2n1s2
+ns5ab
+nsati4
+ns4c
+n2se
+n4s3es
+nsid1
+nsig4
+n2sl
+ns3m
+n4soc
+ns4pe
+n5spi
+nsta5bl
+n1t
+nta4b
+nter3s
+nt2i
+n5tib
+nti4er
+nti2f
+n3tine
+n4t3ing
+nti4p
+ntrol5li
+nt4s
+ntu3me
+nu1a
+nu4d
+nu5en
+nuf4fe
+n3uin
+3nu3it
+n4um
+nu1me
+n5umi
+3nu4n
+n3uo
+nu3tr
+n1v2
+n1w4
+nym4
+nyp4
+4nz
+n3za
+4oa
+oad3
+o5a5les
+oard3
+oas4e
+oast5e
+oat5i
+ob3a3b
+o5bar
+obe4l
+o1bi
+o2bin
+ob5ing
+o3br
+ob3ul
+o1ce
+och4
+o3chet
+ocif3
+o4cil
+o4clam
+o4cod
+oc3rac
+oc5ratiz
+ocre3
+5ocrit
+octor5a
+oc3ula
+o5cure
+od5ded
+od3ic
+odi3o
+o2do4
+odor3
+od5uct.
+od5ucts
+o4el
+o5eng
+o3er
+oe4ta
+o3ev
+o2fi
+of5ite
+ofit4t
+o2g5a5r
+og5ativ
+o4gato
+o1ge
+o5gene
+o5geo
+o4ger
+o3gie
+1o1gis
+og3it
+o4gl
+o5g2ly
+3ogniz
+o4gro
+ogu5i
+1ogy
+2ogyn
+o1h2
+ohab5
+oi2
+oic3es
+oi3der
+oiff4
+oig4
+oi5let
+o3ing
+oint5er
+o5ism
+oi5son
+oist5en
+oi3ter
+o5j
+2ok
+o3ken
+ok5ie
+o1la
+o4lan
+olass4
+ol2d
+old1e
+ol3er
+o3lesc
+o3let
+ol4fi
+ol2i
+o3lia
+o3lice
+ol5id.
+o3li4f
+o5lil
+ol3ing
+o5lio
+o5lis.
+ol3ish
+o5lite
+o5litio
+o5liv
+olli4e
+ol5ogiz
+olo4r
+ol5pl
+ol2t
+ol3ub
+ol3ume
+ol3un
+o5lus
+ol2v
+o2ly
+om5ah
+oma5l
+om5atiz
+om2be
+om4bl
+o2me
+om3ena
+om5erse
+o4met
+om5etry
+o3mia
+om3ic.
+om3ica
+o5mid
+om1in
+o5mini
+5ommend
+omo4ge
+o4mon
+om3pi
+ompro5
+o2n
+on1a
+on4ac
+o3nan
+on1c
+3oncil
+2ond
+on5do
+o3nen
+on5est
+on4gu
+on1ic
+o3nio
+on1is
+o5niu
+on3key
+on4odi
+on3omy
+on3s
+onspi4
+onspir5a
+onsu4
+onten4
+on3t4i
+ontif5
+on5um
+onva5
+oo2
+ood5e
+ood5i
+oo4k
+oop3i
+o3ord
+oost5
+o2pa
+ope5d
+op1er
+3opera
+4operag
+2oph
+o5phan
+o5pher
+op3ing
+o3pit
+o5pon
+o4posi
+o1pr
+op1u
+opy5
+o1q
+o1ra
+o5ra.
+o4r3ag
+or5aliz
+or5ange
+ore5a
+o5real
+or3ei
+ore5sh
+or5est.
+orew4
+or4gu
+4o5ria
+or3ica
+o5ril
+or1in
+o1rio
+or3ity
+o3riu
+or2mi
+orn2e
+o5rof
+or3oug
+or5pe
+3orrh
+or4se
+ors5en
+orst4
+or3thi
+or3thy
+or4ty
+o5rum
+o1ry
+os3al
+os2c
+os4ce
+o3scop
+4oscopi
+o5scr
+os4i4e
+os5itiv
+os3ito
+os3ity
+osi4u
+os4l
+o2so
+os4pa
+os4po
+os2ta
+o5stati
+os5til
+os5tit
+o4tan
+otele4g
+ot3er.
+ot5ers
+o4tes
+4oth
+oth5esi
+oth3i4
+ot3ic.
+ot5ica
+o3tice
+o3tif
+o3tis
+oto5s
+ou2
+ou3bl
+ouch5i
+ou5et
+ou4l
+ounc5er
+oun2d
+ou5v
+ov4en
+over4ne
+over3s
+ov4ert
+o3vis
+oviti4
+o5v4ol
+ow3der
+ow3el
+ow5est
+ow1i
+own5i
+o4wo
+oy1a
+1pa
+pa4ca
+pa4ce
+pac4t
+p4ad
+5pagan
+p3agat
+p4ai
+pain4
+p4al
+pan4a
+pan3el
+pan4ty
+pa3ny
+pa1p
+pa4pu
+para5bl
+par5age
+par5di
+3pare
+par5el
+p4a4ri
+par4is
+pa2te
+pa5ter
+5pathic
+pa5thy
+pa4tric
+pav4
+3pay
+4p1b
+pd4
+4pe.
+3pe4a
+pear4l
+pe2c
+2p2ed
+3pede
+3pedi
+pedia4
+ped4ic
+p4ee
+pee4d
+pek4
+pe4la
+peli4e
+pe4nan
+p4enc
+pen4th
+pe5on
+p4era.
+pera5bl
+p4erag
+p4eri
+peri5st
+per4mal
+perme5
+p4ern
+per3o
+per3ti
+pe5ru
+per1v
+pe2t
+pe5ten
+pe5tiz
+4pf
+4pg
+4ph.
+phar5i
+phe3no
+ph4er
+ph4es.
+ph1ic
+5phie
+ph5ing
+5phisti
+3phiz
+ph2l
+3phob
+3phone
+5phoni
+pho4r
+4phs
+ph3t
+5phu
+1phy
+pi3a
+pian4
+pi4cie
+pi4cy
+p4id
+p5ida
+pi3de
+5pidi
+3piec
+pi3en
+pi4grap
+pi3lo
+pi2n
+p4in.
+pind4
+p4ino
+3pi1o
+pion4
+p3ith
+pi5tha
+pi2tu
+2p3k2
+1p2l2
+3plan
+plas5t
+pli3a
+pli5er
+4plig
+pli4n
+ploi4
+plu4m
+plum4b
+4p1m
+2p3n
+po4c
+5pod.
+po5em
+po3et5
+5po4g
+poin2
+5point
+poly5t
+po4ni
+po4p
+1p4or
+po4ry
+1pos
+pos1s
+p4ot
+po4ta
+5poun
+4p1p
+ppa5ra
+p2pe
+p4ped
+p5pel
+p3pen
+p3per
+p3pet
+ppo5site
+pr2
+pray4e
+5preci
+pre5co
+pre3em
+pref5ac
+pre4la
+pre3r
+p3rese
+3press
+pre5ten
+pre3v
+5pri4e
+prin4t3
+pri4s
+pris3o
+p3roca
+prof5it
+pro3l
+pros3e
+pro1t
+2p1s2
+p2se
+ps4h
+p4sib
+2p1t
+pt5a4b
+p2te
+p2th
+pti3m
+ptu4r
+p4tw
+pub3
+pue4
+puf4
+pul3c
+pu4m
+pu2n
+pur4r
+5pus
+pu2t
+5pute
+put3er
+pu3tr
+put4ted
+put4tin
+p3w
+qu2
+qua5v
+2que.
+3quer
+3quet
+2rab
+ra3bi
+rach4e
+r5acl
+raf5fi
+raf4t
+r2ai
+ra4lo
+ram3et
+r2ami
+rane5o
+ran4ge
+r4ani
+ra5no
+rap3er
+3raphy
+rar5c
+rare4
+rar5ef
+4raril
+r2as
+ration4
+rau4t
+ra5vai
+rav3el
+ra5zie
+r1b
+r4bab
+r4bag
+rbi2
+rbi4f
+r2bin
+r5bine
+rb5ing.
+rb4o
+r1c
+r2ce
+rcen4
+r3cha
+rch4er
+r4ci4b
+rc4it
+rcum3
+r4dal
+rd2i
+rdi4a
+rdi4er
+rdin4
+rd3ing
+2re.
+re1al
+re3an
+re5arr
+5reav
+re4aw
+r5ebrat
+rec5oll
+rec5ompe
+re4cre
+2r2ed
+re1de
+re3dis
+red5it
+re4fac
+re2fe
+re5fer.
+re3fi
+re4fy
+reg3is
+re5it
+re1li
+re5lu
+r4en4ta
+ren4te
+re1o
+re5pin
+re4posi
+re1pu
+r1er4
+r4eri
+rero4
+re5ru
+r4es.
+re4spi
+ress5ib
+res2t
+re5stal
+re3str
+re4ter
+re4ti4z
+re3tri
+reu2
+re5uti
+rev2
+re4val
+rev3el
+r5ev5er.
+re5vers
+re5vert
+re5vil
+rev5olu
+re4wh
+r1f
+rfu4
+r4fy
+rg2
+rg3er
+r3get
+r3gic
+rgi4n
+rg3ing
+r5gis
+r5git
+r1gl
+rgo4n
+r3gu
+rh4
+4rh.
+4rhal
+ri3a
+ria4b
+ri4ag
+r4ib
+rib3a
+ric5as
+r4ice
+4rici
+5ricid
+ri4cie
+r4ico
+rid5er
+ri3enc
+ri3ent
+ri1er
+ri5et
+rig5an
+5rigi
+ril3iz
+5riman
+rim5i
+3rimo
+rim4pe
+r2ina
+5rina.
+rin4d
+rin4e
+rin4g
+ri1o
+5riph
+riph5e
+ri2pl
+rip5lic
+r4iq
+r2is
+r4is.
+ris4c
+r3ish
+ris4p
+ri3ta3b
+r5ited.
+rit5er.
+rit5ers
+rit3ic
+ri2tu
+rit5ur
+riv5el
+riv3et
+riv3i
+r3j
+r3ket
+rk4le
+rk4lin
+r1l
+rle4
+r2led
+r4lig
+r4lis
+rl5ish
+r3lo4
+r1m
+rma5c
+r2me
+r3men
+rm5ers
+rm3ing
+r4ming.
+r4mio
+r3mit
+r4my
+r4nar
+r3nel
+r4ner
+r5net
+r3ney
+r5nic
+r1nis4
+r3nit
+r3niv
+rno4
+r4nou
+r3nu
+rob3l
+r2oc
+ro3cr
+ro4e
+ro1fe
+ro5fil
+rok2
+ro5ker
+5role.
+rom5ete
+rom4i
+rom4p
+ron4al
+ron4e
+ro5n4is
+ron4ta
+1room
+5root
+ro3pel
+rop3ic
+ror3i
+ro5ro
+ros5per
+ros4s
+ro4the
+ro4ty
+ro4va
+rov5el
+rox5
+r1p
+r4pea
+r5pent
+rp5er.
+r3pet
+rp4h4
+rp3ing
+r3po
+r1r4
+rre4c
+rre4f
+r4reo
+rre4st
+rri4o
+rri4v
+rron4
+rros4
+rrys4
+4rs2
+r1sa
+rsa5ti
+rs4c
+r2se
+r3sec
+rse4cr
+rs5er.
+rs3es
+rse5v2
+r1sh
+r5sha
+r1si
+r4si4b
+rson3
+r1sp
+r5sw
+rtach4
+r4tag
+r3teb
+rten4d
+rte5o
+r1ti
+rt5ib
+rti4d
+r4tier
+r3tig
+rtil3i
+rtil4l
+r4tily
+r4tist
+r4tiv
+r3tri
+rtroph4
+rt4sh
+ru3a
+ru3e4l
+ru3en
+ru4gl
+ru3in
+rum3pl
+ru2n
+runk5
+run4ty
+r5usc
+ruti5n
+rv4e
+rvel4i
+r3ven
+rv5er.
+r5vest
+r3vey
+r3vic
+rvi4v
+r3vo
+r1w
+ry4c
+5rynge
+ry3t
+sa2
+2s1ab
+5sack
+sac3ri
+s3act
+5sai
+salar4
+sal4m
+sa5lo
+sal4t
+3sanc
+san4de
+s1ap
+sa5ta
+5sa3tio
+sat3u
+sau4
+sa5vor
+5saw
+4s5b
+scan4t5
+sca4p
+scav5
+s4ced
+4scei
+s4ces
+sch2
+s4cho
+3s4cie
+5scin4d
+scle5
+s4cli
+scof4
+4scopy
+scour5a
+s1cu
+4s5d
+4se.
+se4a
+seas4
+sea5w
+se2c3o
+3sect
+4s4ed
+se4d4e
+s5edl
+se2g
+seg3r
+5sei
+se1le
+5self
+5selv
+4seme
+se4mol
+sen5at
+4senc
+sen4d
+s5ened
+sen5g
+s5enin
+4sentd
+4sentl
+sep3a3
+4s1er.
+s4erl
+ser4o
+4servo
+s1e4s
+se5sh
+ses5t
+5se5um
+5sev
+sev3en
+sew4i
+5sex
+4s3f
+2s3g
+s2h
+2sh.
+sh1er
+5shev
+sh1in
+sh3io
+3ship
+shiv5
+sho4
+sh5old
+shon3
+shor4
+short5
+4shw
+si1b
+s5icc
+3side.
+5sides
+5sidi
+si5diz
+4signa
+sil4e
+4sily
+2s1in
+s2ina
+5sine.
+s3ing
+1sio
+5sion
+sion5a
+si2r
+sir5a
+1sis
+3sitio
+5siu
+1siv
+5siz
+sk2
+4ske
+s3ket
+sk5ine
+sk5ing
+s1l2
+s3lat
+s2le
+slith5
+2s1m
+s3ma
+small3
+sman3
+smel4
+s5men
+5smith
+smol5d4
+s1n4
+1so
+so4ce
+soft3
+so4lab
+sol3d2
+so3lic
+5solv
+3som
+3s4on.
+sona4
+son4g
+s4op
+5sophic
+s5ophiz
+s5ophy
+sor5c
+sor5d
+4sov
+so5vi
+2spa
+5spai
+spa4n
+spen4d
+2s5peo
+2sper
+s2phe
+3spher
+spho5
+spil4
+sp5ing
+4spio
+s4ply
+s4pon
+spor4
+4spot
+squal4l
+s1r
+2ss
+s1sa
+ssas3
+s2s5c
+s3sel
+s5seng
+s4ses.
+s5set
+s1si
+s4sie
+ssi4er
+ss5ily
+s4sl
+ss4li
+s4sn
+sspend4
+ss2t
+ssur5a
+ss5w
+2st.
+s2tag
+s2tal
+stam4i
+5stand
+s4ta4p
+5stat.
+s4ted
+stern5i
+s5tero
+ste2w
+stew5a
+s3the
+st2i
+s4ti.
+s5tia
+s1tic
+5stick
+s4tie
+s3tif
+st3ing
+5stir
+s1tle
+5stock
+stom3a
+5stone
+s4top
+3store
+st4r
+s4trad
+5stratu
+s4tray
+s4trid
+4stry
+4st3w
+s2ty
+1su
+su1al
+su4b3
+su2g3
+su5is
+suit3
+s4ul
+su2m
+sum3i
+su2n
+su2r
+4sv
+sw2
+4swo
+s4y
+4syc
+3syl
+syn5o
+sy5rin
+1ta
+3ta.
+2tab
+ta5bles
+5taboliz
+4taci
+ta5do
+4taf4
+tai5lo
+ta2l
+ta5la
+tal5en
+tal3i
+4talk
+tal4lis
+ta5log
+ta5mo
+tan4de
+tanta3
+ta5per
+ta5pl
+tar4a
+4tarc
+4tare
+ta3riz
+tas4e
+ta5sy
+4tatic
+ta4tur
+taun4
+tav4
+2taw
+tax4is
+2t1b
+4tc
+t4ch
+tch5et
+4t1d
+4te.
+tead4i
+4teat
+tece4
+5tect
+2t1ed
+te5di
+1tee
+teg4
+te5ger
+te5gi
+3tel.
+teli4
+5tels
+te2ma2
+tem3at
+3tenan
+3tenc
+3tend
+4tenes
+1tent
+ten4tag
+1teo
+te4p
+te5pe
+ter3c
+5ter3d
+1teri
+ter5ies
+ter3is
+teri5za
+5ternit
+ter5v
+4tes.
+4tess
+t3ess.
+teth5e
+3teu
+3tex
+4tey
+2t1f
+4t1g
+2th.
+than4
+th2e
+4thea
+th3eas
+the5at
+the3is
+3thet
+th5ic.
+th5ica
+4thil
+5think
+4thl
+th5ode
+5thodic
+4thoo
+thor5it
+tho5riz
+2ths
+1tia
+ti4ab
+ti4ato
+2ti2b
+4tick
+t4ico
+t4ic1u
+5tidi
+3tien
+tif2
+ti5fy
+2tig
+5tigu
+till5in
+1tim
+4timp
+tim5ul
+2t1in
+t2ina
+3tine.
+3tini
+1tio
+ti5oc
+tion5ee
+5tiq
+ti3sa
+3tise
+tis4m
+ti5so
+tis4p
+5tistica
+ti3tl
+ti4u
+1tiv
+tiv4a
+1tiz
+ti3za
+ti3zen
+2tl
+t5la
+tlan4
+3tle.
+3tled
+3tles.
+t5let.
+t5lo
+4t1m
+tme4
+2t1n2
+1to
+to3b
+to5crat
+4todo
+2tof
+to2gr
+to5ic
+to2ma
+tom4b
+to3my
+ton4ali
+to3nat
+4tono
+4tony
+to2ra
+to3rie
+tor5iz
+tos2
+5tour
+4tout
+to3war
+4t1p
+1tra
+tra3b
+tra5ch
+traci4
+trac4it
+trac4te
+tras4
+tra5ven
+trav5es5
+tre5f
+tre4m
+trem5i
+5tria
+tri5ces
+5tricia
+4trics
+2trim
+tri4v
+tro5mi
+tron5i
+4trony
+tro5phe
+tro3sp
+tro3v
+tru5i
+trus4
+4t1s2
+t4sc
+tsh4
+t4sw
+4t3t2
+t4tes
+t5to
+ttu4
+1tu
+tu1a
+tu3ar
+tu4bi
+tud2
+4tue
+4tuf4
+5tu3i
+3tum
+tu4nis
+2t3up.
+3ture
+5turi
+tur3is
+tur5o
+tu5ry
+3tus
+4tv
+tw4
+4t1wa
+twis4
+4two
+1ty
+4tya
+2tyl
+type3
+ty5ph
+4tz
+tz4e
+4uab
+uac4
+ua5na
+uan4i
+uar5ant
+uar2d
+uar3i
+uar3t
+u1at
+uav4
+ub4e
+u4bel
+u3ber
+u4bero
+u1b4i
+u4b5ing
+u3ble.
+u3ca
+uci4b
+uc4it
+ucle3
+u3cr
+u3cu
+u4cy
+ud5d
+ud3er
+ud5est
+udev4
+u1dic
+ud3ied
+ud3ies
+ud5is
+u5dit
+u4don
+ud4si
+u4du
+u4ene
+uens4
+uen4te
+uer4il
+3ufa
+u3fl
+ugh3en
+ug5in
+2ui2
+uil5iz
+ui4n
+u1ing
+uir4m
+uita4
+uiv3
+uiv4er.
+u5j
+4uk
+u1la
+ula5b
+u5lati
+ulch4
+5ulche
+ul3der
+ul4e
+u1len
+ul4gi
+ul2i
+u5lia
+ul3ing
+ul5ish
+ul4lar
+ul4li4b
+ul4lis
+4ul3m
+u1l4o
+4uls
+uls5es
+ul1ti
+ultra3
+4ultu
+u3lu
+ul5ul
+ul5v
+um5ab
+um4bi
+um4bly
+u1mi
+u4m3ing
+umor5o
+um2p
+unat4
+u2ne
+un4er
+u1ni
+un4im
+u2nin
+un5ish
+uni3v
+un3s4
+un4sw
+unt3ab
+un4ter.
+un4tes
+unu4
+un5y
+un5z
+u4ors
+u5os
+u1ou
+u1pe
+uper5s
+u5pia
+up3ing
+u3pl
+up3p
+upport5
+upt5ib
+uptu4
+u1ra
+4ura.
+u4rag
+u4ras
+ur4be
+urc4
+ur1d
+ure5at
+ur4fer
+ur4fr
+u3rif
+uri4fic
+ur1in
+u3rio
+u1rit
+ur3iz
+ur2l
+url5ing.
+ur4no
+uros4
+ur4pe
+ur4pi
+urs5er
+ur5tes
+ur3the
+urti4
+ur4tie
+u3ru
+2us
+u5sad
+u5san
+us4ap
+usc2
+us3ci
+use5a
+u5sia
+u3sic
+us4lin
+us1p
+us5sl
+us5tere
+us1tr
+u2su
+usur4
+uta4b
+u3tat
+4ute.
+4utel
+4uten
+uten4i
+4u1t2i
+uti5liz
+u3tine
+ut3ing
+ution5a
+u4tis
+5u5tiz
+u4t1l
+ut5of
+uto5g
+uto5matic
+u5ton
+u4tou
+uts4
+u3u
+uu4m
+u1v2
+uxu3
+uz4e
+1va
+5va.
+2v1a4b
+vac5il
+vac3u
+vag4
+va4ge
+va5lie
+val5o
+val1u
+va5mo
+va5niz
+va5pi
+var5ied
+3vat
+4ve.
+4ved
+veg3
+v3el.
+vel3li
+ve4lo
+v4ely
+ven3om
+v5enue
+v4erd
+5vere.
+v4erel
+v3eren
+ver5enc
+v4eres
+ver3ie
+vermi4n
+3verse
+ver3th
+v4e2s
+4ves.
+ves4te
+ve4te
+vet3er
+ve4ty
+vi5ali
+5vian
+5vide.
+5vided
+4v3iden
+5vides
+5vidi
+v3if
+vi5gn
+vik4
+2vil
+5vilit
+v3i3liz
+v1in
+4vi4na
+v2inc
+vin5d
+4ving
+vio3l
+v3io4r
+vi1ou
+vi4p
+vi5ro
+vis3it
+vi3so
+vi3su
+4viti
+vit3r
+4vity
+3viv
+5vo.
+voi4
+3vok
+vo4la
+v5ole
+5volt
+3volv
+vom5i
+vor5ab
+vori4
+vo4ry
+vo4ta
+4votee
+4vv4
+v4y
+w5abl
+2wac
+wa5ger
+wag5o
+wait5
+w5al.
+wam4
+war4t
+was4t
+wa1te
+wa5ver
+w1b
+wea5rie
+weath3
+wed4n
+weet3
+wee5v
+wel4l
+w1er
+west3
+w3ev
+whi4
+wi2
+wil2
+will5in
+win4de
+win4g
+wir4
+3wise
+with3
+wiz5
+w4k
+wl4es
+wl3in
+w4no
+1wo2
+wom1
+wo5ven
+w5p
+wra4
+wri4
+writa4
+w3sh
+ws4l
+ws4pe
+w5s4t
+4wt
+wy4
+x1a
+xac5e
+x4ago
+xam3
+x4ap
+xas5
+x3c2
+x1e
+xe4cuto
+x2ed
+xer4i
+xe5ro
+x1h
+xhi2
+xhil5
+xhu4
+x3i
+xi5a
+xi5c
+xi5di
+x4ime
+xi5miz
+x3o
+x4ob
+x3p
+xpan4d
+xpecto5
+xpe3d
+x1t2
+x3ti
+x1u
+xu3a
+xx4
+y5ac
+3yar4
+y5at
+y1b
+y1c
+y2ce
+yc5er
+y3ch
+ych4e
+ycom4
+ycot4
+y1d
+y5ee
+y1er
+y4erf
+yes4
+ye4t
+y5gi
+4y3h
+y1i
+y3la
+ylla5bl
+y3lo
+y5lu
+ymbol5
+yme4
+ympa3
+yn3chr
+yn5d
+yn5g
+yn5ic
+5ynx
+y1o4
+yo5d
+y4o5g
+yom4
+yo5net
+y4ons
+y4os
+y4ped
+yper5
+yp3i
+y3po
+y4poc
+yp2ta
+y5pu
+yra5m
+yr5ia
+y3ro
+yr4r
+ys4c
+y3s2e
+ys3ica
+ys3io
+3ysis
+y4so
+yss4
+ys1t
+ys3ta
+ysur4
+y3thin
+yt3ic
+y1w
+za1
+z5a2b
+zar2
+4zb
+2ze
+ze4n
+ze4p
+z1er
+ze3ro
+zet4
+2z1i
+z4il
+z4is
+5zl
+4zm
+1zo
+zo4m
+zo5ol
+zte4
+4z1z2
+z4zy
diff --git a/hyph/engluk.lh b/hyph/engluk.lh
new file mode 100644
index 0000000..c1b0f7e
--- /dev/null
+++ b/hyph/engluk.lh
@@ -0,0 +1,8600 @@
+Lout hyphenation information
+%
+%  Created by Jeff Kingston, 16 November 1996, from a TeX
+%  hyphenation file with the following header comment:
+%
+% File: ukhyphen.tex
+% TeX hyphenation patterns for UK English [NOT TO BE CHANGED IN ANY WAY!]
+% Version 1.0.  Released 17 April 1992.
+%
+% Created by Dominik Wujastyk and Graham Toal using Frank Liang's PATGEN 1.0.
+% Like the US patterns, these UK patterns correctly hyphenate about 90% of 
+% the words in the input list, and produce no hyphens not in the list 
+% (see TeXbook pp. 451--2).
+%
+% These patterns are based on a file of 114925 British-hyphenated words
+% generously made available to Dominik Wujastyk by Oxford University Press.
+% This list of words is copyright to the OUP and may not be redistributed.  
+% The hyphenation break points in the words in the abovementioned file is 
+% also copyright to the OUP.
+%
+% We are very grateful to Oxford University Press for allowing us to use 
+% their list of hyphenated words to produce the following TeX hyphenation 
+% patterns.  This file of hyphenation patterns may be freely distributed.
+%
+% These patterns require a value of about 14000 for TeX's pattern memory size.
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+
+Exceptions:
+as-so-ciate
+as-so-ciates
+dec-li-na-tion
+oblig-a-tory
+phil-an-thropic
+present
+presents
+project
+projects
+reci-procity
+re-cog-ni-zance
+ref-or-ma-tion
+ret-ri-bu-tion
+ta-ble
+
+Patterns:
+.ab4i
+.ab3ol
+.ace4
+.acet3
+.ach4
+.ac5tiva
+.ad4din
+.ad3e
+.ad3o
+.ae5d
+.aer3i
+.af3f
+.af3t
+.ag4a
+.ag5n
+.air3
+.al5im
+.al1k
+.al3le
+.am5ar
+.ama5te
+.am2i
+.am3pe
+.am3ph
+.an1
+.ana3b
+.ana3s
+.and2
+.an5da
+.an4el
+.an4en
+.an4gl
+.an4on.
+.an3s
+.ant3a
+.an3ti3
+.ant4ic
+.an4t5o
+.any5
+.aph5or
+.ap4i
+.ar5ab
+.ar5ap
+.ar4ci
+.ar5d
+.ar4e
+.ari4
+.ar4ise
+.ar4isi
+.ar5sen
+.art5icl
+.as1
+.as4q
+.as5sib
+.at5ar
+.ateli4
+.at5omise
+.at5omiz
+.at3r
+.at3t
+.au3b
+.au3g4u
+.aur4e5
+.aus5
+.authen5
+.av4
+.av5era
+.bap5tism
+.barri5c
+.bas4i
+.ba5sic
+.be3di
+.be3lo
+.be5r4a
+.be5sm
+.bi4er
+.blaz5o
+.bo3lo
+.bos5om
+.boun4d
+.bov4
+.bra5ch
+.bre2
+.burn5i
+.ca3de
+.ca4gin
+.cam5i
+.cam3o
+.can1
+.can5ta
+.ca5pitu
+.car4i
+.cas5ual
+.ca4ti
+.cen5so
+.cen5tena
+.cent5ri
+.cer4i
+.ch4
+.cit4a
+.clem5e
+.clima5to
+.co5it
+.co3pa
+.cop5ro
+.co3ru
+.co3si
+.co5ter
+.cotyle5
+.cri5tici
+.custom5
+.dav5
+.dea5co
+.de5lec
+.del5eg
+.de3li
+.deli5r
+.de1m
+.de5nit
+.de3no
+.der2
+.de3ra
+.de5res
+.de3ri
+.de5scrib
+.de5serv
+.de5signe
+.de5sir
+.de5sis
+.de5spoi
+.determ5i
+.de3ve
+.de4w
+.di4al.
+.dia3s
+.di4at
+.din4a
+.dio5c
+.do2
+.do4e
+.domest5
+.du4al.
+.du4c
+.dys3
+.east5
+.echin5
+.eco3
+.ec3t
+.ed5em
+.ed4it.
+.ed4iti
+.eg4
+.ei3d
+.ei5r
+.el3ev3
+.el2i
+.elu5s
+.em3b
+.em5in
+.emp4
+.em5py
+.en1
+.en5c
+.en4ded
+.en3s
+.ent2
+.en5ta
+.eos5
+.epi1
+.epi3d
+.er2a
+.er5em5
+.er4i4
+.er4o2
+.eros4
+.erot3
+.er4ri
+.es1
+.escal5
+.es3p
+.es3t
+.etern5
+.eth3e
+.eu1
+.eur4
+.eval3
+.evol5ut
+.ew4
+.ex1
+.ex3a
+.eye3
+.fal4le
+.far4i
+.fec5unda
+.fen4d
+.feoff5
+.fi2
+.fi5lia
+.fil5tr
+.fin5ess
+.fin3g
+.fi5n4it
+.fis4c5
+.fo3c
+.fran5ch
+.fu5ga
+.ga4m
+.gam5et
+.gen4et
+.ge5neti
+.gen5ia
+.ge3ro
+.glor5io
+.gnost4
+.go3no
+.gos3
+.hab2
+.ha5bili
+.hama5
+.han4de
+.hast5i
+.he4i
+.hem5a
+.hi2
+.hi3b
+.ho2l
+.ho5rol
+.hov3
+.hy3lo
+.ico3s
+.idi2
+.ig3
+.ig1n
+.il4i
+.im5b
+.in1
+.in3d
+.in3e2
+.in2i
+.in3o
+.in3t
+.invest5i
+.ir3r
+.is4c
+.is4li
+.is4o
+.iso5m
+.ka5ro
+.ki4e
+.kin3e
+.lab4o
+.la4me
+.lam5enta
+.lan5i
+.lash4e
+.le4m
+.len5ti
+.le2p
+.lep5r
+.les5son
+.le5van
+.librar5
+.lig3a
+.li3o
+.li4ons
+.li4p
+.loc3a
+.lo4gia
+.lo2p
+.loph3
+.lous5i
+.lov5er
+.lub3
+.lyo3
+.mac5u
+.mal5ad5
+.ma5lin
+.mar5ti
+.math5
+.me5lodio
+.ment4
+.men5ta
+.me5rid
+.me5rin
+.met4er
+.mi4e
+.mi3gr
+.min5ue
+.mirk4
+.mis1
+.mi5to
+.mo3bi
+.mo5lec
+.mon3a
+.mor5ti
+.mu3ni
+.mu3si
+.musi5co
+.myth3
+.na5k
+.nari4
+.nast4
+.nas5ti
+.nec3t
+.ni4c
+.ni5tro
+.no4c
+.nom3o
+.nos3t
+.no5tic
+.nucle5
+.obed5
+.ob3el
+.ob3l
+.od4
+.oed5
+.oe5so
+.of5t
+.oi4
+.ol4d
+.ome2
+.om5el
+.on4ce
+.on4e
+.op2i
+.opt5a
+.or1
+.or4at4
+.ora5tori
+.or5che
+.or3d
+.ore4
+.or3eo
+.or4i
+.orner4
+.or2o
+.os1
+.osi4
+.oth5
+.out1
+.ov4
+.pal5i
+.para5dis
+.par5af
+.para5t
+.pa5ta
+.pa4tio
+.pec3t4
+.pecu3
+.ped3e
+.pend4
+.pen5de
+.pep3t
+.peri5n
+.perse5c
+.pe5titi
+.ph2
+.phe5nom
+.phon4i
+.pi2e
+.pi3la
+.plast4
+.plic4
+.plica4
+.plos4
+.po3la
+.po5lite
+.po2p
+.pop5l
+.po5sitio
+.pos5si
+.pro5bat
+.pur4r
+.put4te
+.ra5cem
+.ran5gi
+.re3ca
+.ref5ere
+.re5gar
+.re1i
+.re5lin
+.re1m
+.re5o
+.res5ci
+.re5sen
+.re5spo
+.re5stat
+.re5store
+.re5str
+.re3ta
+.re5u
+.re3w
+.rib5a
+.rin4
+.rit2
+.rol4la
+.ros3a
+.sa2
+.sac5r
+.sal4i
+.sa5lin
+.salt5er
+.sanc5
+.sap5a
+.sa3vo
+.sci3e
+.sea3s
+.sect4
+.sec5to
+.se3gr
+.sen3t
+.se1q
+.ser4ie
+.ses1
+.sev5era
+.sh2
+.si5gno
+.sis3
+.st4
+.stat4o
+.stra5to
+.string5i
+.su5da
+.sulph5a
+.sul3t
+.tact4i
+.tac5tic
+.ta4m
+.tamar5
+.tar5o
+.tect4
+.tel5a
+.tell5e
+.te4m
+.te5ra5t
+.ter4p
+.th4
+.tho4
+.thol4
+.ti2
+.til4
+.ti5ni
+.tit4is
+.tor1
+.tran4c
+.tri5bal
+.tri3d
+.trin4a
+.tri5sti
+.tro4ph
+.troph5o
+.tro4v
+.tular5
+.turb4
+.turi4
+.tu5te
+.tu3to
+.ul4l
+.ulti5mat
+.un5ce
+.un5ch
+.un3d2
+.under5
+.un3e
+.un3g
+.uni3c
+.uni3o
+.un3k4
+.un5s
+.un3t4
+.un5u
+.up1
+.up3l
+.ura4
+.ur5eth
+.ur4o
+.va5led
+.ve2
+.vec5
+.ve5lo
+.vent5il
+.ver4ie
+.ver3n
+.vic5to
+.vi2s
+.vis3i
+.vi5so
+.vo1c
+.vo5lut
+.wine5s
+.xy3l
+.za5r
+a4a
+1ab
+2ab.
+2aba
+ab5are
+abay4
+2abb
+ab5ber
+2abe4
+ab3erd
+ab3err
+a3bet
+ab1ic
+a3bie
+2abin
+4abio
+abi5on
+ab3ita
+ab4itu
+ab3la
+abli4
+4abolic
+ab3om
+ab3ota
+3about
+ab1r
+2abs.
+ab1ul
+abu4lo
+ab3use
+ab3usi
+2aby
+ac2a
+ac5abl
+ac3al
+5acanth
+ac5ard
+a5cat
+ach5al
+a5chini
+ach5ism
+achro4
+ach5ur
+2aci
+a4cic
+aci4ers
+acif4
+4acit
+ack5a
+ac3li
+4aco.
+aco3d
+ac5onr
+4acos
+4acou
+ac1r
+ac3ry
+act5ate
+act5ile
+ac2to
+act5ory
+ac2t5r
+ac5uat
+a5dai
+ada3v
+4adee
+ad5eni
+ad4ha
+ad3ica
+a5dif
+4adil
+adi4op
+adi4p
+adis4i
+a3diti
+3adju
+5admit
+a2do
+4adoe
+4adoi
+ad3ol
+a3dos
+ad1ow
+ad1r
+adram4
+4a2du
+ad3ula
+ad3um
+4ady
+ae5a
+ae4cit
+aeco3
+4aed
+aed5is
+ae5g
+ae3on
+ae5p
+aerody5
+ae4s
+ae5si
+aes3t
+aet4a
+aeth4
+aet4or.
+aev3a
+4af.
+4afe
+af5ta
+a4fu
+ag4ari
+4ageri
+a5ghe
+a5gia
+agi4as
+4agino
+4agl
+agli4
+4ag1n
+ag3oni
+agor4a
+ag5ot
+a2gr
+ag3ri
+agru5
+2ah
+a1h2a
+ahar2
+aha5ra
+a1he
+ah4n
+a5hoo
+2ai2
+4ai.
+ai3a
+a1ic
+aid4a
+aid5er
+aig2
+ai5gu
+ail3er
+ail3o
+aim5er
+ain5ders
+ai5nea
+a3ing.
+ain3i
+ain5o
+aint5er
+air5a
+air5p
+air3s
+ais1i
+a5ism
+2a1j
+a4ju
+2ak
+akel4
+ak5u
+al5abl
+alact4
+a1lae
+al5ais
+ala3ma
+al5ance
+al3at
+a5lav
+alc3at
+al3ch
+ald5ri
+2ale
+a3lec
+aleg4
+ale5ma
+al5ende
+a1leo
+a2let
+al3ibr
+ali4ci
+al5ics
+al1id
+al3if
+5alig
+al1in
+a5lini
+alin5o
+al5ipe
+al5ipot
+4alis.
+4aliu
+4alk
+alk5ie
+al4lab
+al4lag
+alli5an
+allig4
+al4lish
+a5loe
+al3ogr
+a3lom
+a3loo
+al1or
+al4orim
+alos4
+a4lou
+al3ous
+a5low
+al5pen
+al3ph
+al5tati
+al3tie
+alu3b
+al5ued
+al3ues
+a5lumnia
+al1va
+al5ver
+alv5u
+2a1ly4
+a5lyn
+2a2m
+a5mad
+ama4g
+aman5d
+a5marine
+a3mas.
+am1at
+a5m4atic
+am5atu
+am4bin
+3ambu
+am5elo
+a3men
+amen4d
+am3era
+am5erl
+am1i
+ami2c
+am5ica
+amic5r
+3amid
+a3mili
+am5ily
+amini4f
+am5iniz
+aminos4
+a5mis.
+a4mium.
+a3mon
+amor5a
+amort3
+am5ose
+am2p
+am5peri
+amphi5g
+amp3li
+ampo5l
+am3ul
+amyl5
+a2n
+an2a
+a5nadi
+an3ae
+an3age
+ana5k
+an3ali
+an3arc
+a5nast
+an4con
+an3d4at
+and5au
+and5eer
+an5del
+an5dif
+and5ist
+an5dit
+an4doni
+an4ea
+an5eer
+an3ell
+anel5li
+an3eu
+an3gan
+angov4
+an4gur
+4anh
+an3ic
+ani3f
+an5ifo
+4anig
+an5ion
+anis5te
+4anity
+4aniu
+an5no
+4anny
+an1o
+an2oe
+an3oma
+anor3
+an2os
+an5ot
+an2s
+an3sc
+an4sco
+ans3il
+an4sur
+an2t2a
+ant5abl
+an3tal
+an5tam
+an2te
+1anth
+an4thi
+3anthr
+4antic
+an4tie
+an4ting
+ant4iv
+an4tone
+ant4r
+an4tus
+an5tym
+an3ul
+an3um.
+an5ums
+a3nur
+a5nut
+an2y
+an5ya
+a5nyi
+2ao
+aol3i
+5aow
+2ap
+4ap.
+4apa
+a1pac
+ap3al
+ap5aro
+ape5li
+a5peu
+aph5em
+aph3i
+aph5ol
+aphyl3
+ap1i
+ap5icu
+ap3in
+ap4ine
+a5pir
+a3plan
+ap5li
+apo5str
+apo3th
+a2pr
+ap5ron
+4aps
+apt5at
+apu5lar
+a5pun
+a4q
+a5qui
+a2r
+4arabi
+ara5bo
+aract4i
+ara2g
+ar3age
+ar4aged
+ar5agi
+ar3ago
+a3raj
+ar3all
+ara3m
+aran4g
+aran5te
+ar5apa
+ar1at
+a3rau
+ara3v
+ar3ba
+arb5et
+ar4bid
+ar4bl
+arb3li
+ar4bul
+ar5chet
+arch5o
+ar5dina
+ar4done
+ar3en
+aren5d
+ar5ett
+ar3ev5
+ar5gh
+ar3gu
+ar3h
+ar1i
+ar5iff
+ar4ill
+a5ri5net
+ar5ini
+a5rishi
+arm3er
+ar5mit
+ar3nal
+ar3nis
+ar3od
+ar5oid
+aro4mas
+aro4n
+a5roti
+a5rouc
+ar3ox
+arp5ers
+ar4pu
+2arr
+ar2rh
+ar2s
+ars5al
+ar3so
+art5at
+ar2th
+arth4e
+arth3r
+ar5tiz
+2aru
+ar3um
+ar5un4
+a3ryo
+a5ryt
+ar5z
+as1a
+as4af
+asan2
+2asc
+as5con
+as5cot
+as2cr
+as2e
+as3ect
+4ased
+asep4
+ash5ay
+ash5il
+as5ily
+as3in
+a5sio
+a3sit
+as5iv
+ask5er
+aski4
+as4la
+as4lo
+2aso
+as5och
+a4soned
+as5or
+as3ph
+ass2
+assa5gi
+ass5ibl
+as4sil
+assit5
+2asta
+as4tat
+as4tia
+as3tis
+as4tit
+4asto2
+as3tra
+as4tri
+as1u
+as4un
+as5ur
+2a2ta
+4atabi
+a5talis
+atam4
+ata3p
+atar3a
+ata3s
+ata3t4
+at3eau
+at3ech
+at5eer
+a5tel.
+ate5le
+at5enat
+at3ent
+4ater
+at3era
+at5ernis
+at5erniz
+4atess
+at5et
+4a2th
+ath3a
+a3then
+ath5erin
+ath5ero
+ath5ete
+ath3i
+ath3od
+a5thon
+ath5r
+4a3tia
+ati2c
+at5icis
+ati5cit
+at5iciz
+a2tif
+a4t1i4l
+a4tim
+a2t3in
+4atina
+at5ing
+4at4is.
+at1it
+atit3u
+atitud5i
+4atiu
+at4ivi
+a5tiviz
+a2to
+5at5od
+4atog
+2atol
+4aton
+a3too
+a4tops
+a5torian
+a4tory
+atos4
+a5toz
+2a2tr
+at3ra
+a4tre
+5at5ress
+at1ri
+atric5u
+at3ron
+at5rou
+at4tag
+2a2tu
+at1ul
+atu4m
+at3ura
+at3urg
+4a2ty
+2au2
+4au.
+aub5i
+4auc
+au5cer
+auc3o
+aud5er
+audic4
+aul3i
+aul4t
+aul5ted
+ault5er
+ault5i
+au3ma
+aun2
+aun5chie
+aun3d
+aun4dre
+au5reo
+aur4o
+au5ror
+4aus.
+aus5er
+aus5p
+aus4ted
+aut3ar
+aut3er
+au3th
+2av
+av4ab
+ava4g
+av3age
+ava5la
+av5alr
+av5ant
+av5ar
+avas3
+av3end
+av3ern
+av3ig
+aviol4
+av1is
+aw5er.
+aw5ers
+aw1i
+aw5nie
+aw5y
+a4x
+ax2id
+4ay
+ay5la
+ay3m
+ayn4
+ays2
+ay5si
+ay5sta
+ayth4
+2az2
+az3ar
+aze4
+az5ee
+azyg4
+azz4l
+2ba.
+ba5bir
+3back
+baen4
+bag4a
+5bah
+ba4i
+bal3a
+balm5i
+ba5lon
+bal5u
+bam4a
+ban4a
+ba5nan
+b4ane
+5bang
+b4aniti
+b4ans
+ba4p1
+5barb
+bar4d
+bardi4
+bar4n
+ba5rom
+bar3on
+5bars
+1bas
+bas4te
+ba4th4
+3batic
+ba5tio
+bat5on
+battle5
+2b1b2
+b4bata
+b3bli
+b4bone
+b1c2
+bcord4
+2b1d
+bdeac5
+bde4b
+bdi4v
+b2e
+4be.
+3bea
+4beas
+be3ca
+3becu
+2bed
+be3da
+bed5el
+bed2i
+be4do
+be5dra
+be4du
+5bee
+3bef
+be3go
+be5gr
+be3gu
+1bel
+be3la
+2bele
+be3lit
+bel4t
+be3m
+ben4d
+bend5a
+bend5er
+be1ne
+be5nig
+be5nu
+4beo
+be3q
+2bere
+berga5m
+berl4
+5berr
+ber5s
+b5ertin
+be1s2
+2bes.
+be3sl
+be3tr
+be3w
+2b1f
+bfa4
+4b1h
+b4ha
+2bi.
+1bia
+bi4b1
+bicen5
+3b2id
+bid5i
+b4ie
+bi4ers
+bif4
+bi4fid.
+bi5ga
+bigu3
+b1il
+b2ile
+5biles
+3b2ill
+4bim
+bimet5
+5bina
+5bin4d
+bind3e
+bin5et
+bin5i4
+1bi2o
+bio3l
+bio5m
+bi3ou
+bip4
+bi5q
+bir4
+bi3re4
+bi5rus
+b2is
+5bism
+bis4o
+bisul5
+3bitua
+4bity
+bi5ve
+b1j
+4b5k4
+2bl2
+5blac
+blag4
+b3lan
+5blast
+bla5tu
+blem5at
+3bler
+5blesp
+4blik
+blim3a
+bli3o
+bli2q
+b3lis
+4bly
+2b1m
+bment4
+bmi4
+4b1n
+bo2
+4bo.
+3boa
+bo5am
+5bob
+bod5i
+bo5h
+2boid
+4boke
+bol4e
+4boled
+bol3i
+bol4t
+3bon
+bon4c
+bon4e
+bon4ie
+boni4f
+bon4sp
+1boo
+b3orat
+bor3d
+bor5ee
+bor5et
+3bori
+bor5ic
+bor5io
+bor4n
+bot3an
+5boti
+boun5ti
+3bour
+bous4
+bow2
+bow3s
+4boxy
+5boy
+br4
+3brach
+4bral
+bram4
+b2ran
+bran4d
+4bre.
+b4reas
+4b2res
+brev5et
+b2rid
+5brief
+bring5
+bri4os
+b5rist
+b4roa
+bro4ma
+bros4
+brum4
+4bry.
+4b1s2
+b3sc
+bscon4
+bsen4
+bserv5an
+b5si
+bsin4
+bso2
+bsol3e
+bso3lu
+b4stac
+bstupe5
+2b1t
+b5tlet
+4bu.
+5bub
+buf5fer
+b4uli
+b4ulos
+bun2
+bun4a
+b5u5nat
+bunt4
+bur3e
+bur4ri
+busi4e
+buss2
+bus5si
+3bust
+bu5tar
+b3ute
+b5utin
+3butio
+but4iv
+b5ut5o
+b1v
+4b3w
+2by
+4by.
+3byi
+bys4
+5byt
+2ca.
+cab5in
+c4ace
+caco3
+cad4r
+5caf
+ca3go
+5cai
+5cak
+c1al
+c4ala
+ca5laman
+cal5ar
+3calc
+ca5lef
+call5in
+cal4m
+ca3ly
+ca3ma
+cam4i
+ca5nar
+c2an4e
+c4ano
+ca3noe
+can5tar
+can5ted
+can4tic
+can4tr
+5cao
+1cap
+ca5pil
+capt4
+cap3ti
+cap3u
+1car
+ca3ra5c
+car5ame
+ca3ree
+ca3r4i3c
+car3if
+car5m
+car3ni
+car3ol
+car5on
+car5oo
+ca3rou
+car4v
+case5
+cashi4
+3cas3s
+cas5tig
+3casu3
+c1at
+c4at.
+c2atc
+c4atom
+ca3t2r
+c4ats
+cat4u
+3cau
+caulk4i
+cav3il
+3cay
+c1c4
+ccent5r
+cces4sa
+c3ch
+cci3d4
+ccip4
+ccle3
+4ce.
+4ceab
+cean3
+3ceas
+ce4ci
+2ced
+5ceda
+ce3dar
+3cede
+3cedi
+4cef
+ce5g
+3ceiv
+cel3ai
+cel5ib5
+5cell
+cel5lin
+celo4
+ce5lom
+4cely
+2cem
+ce4met
+3cemi
+ce4mo
+1cen2
+5cenc
+cen5ci
+cen5ded
+cend5en
+cend5er
+cen3i
+2cenn
+3cent
+cent4a
+cen5ted
+cen5ter.
+cen5ters
+cen5tes
+1cep
+cept3a
+cep5tic
+3cera
+cer4bi
+3cerd
+ce3rem
+5cern
+5cess
+cest5o
+ces5tr
+ce2t
+cew4
+2ch
+4ch.
+4chab
+3chae
+3chai
+cham5per
+chan5gi
+cha3pa
+chec4
+4ched
+3chee
+3chem
+che3ol
+ch1er
+ch4eri
+5cherin
+ch4erl
+4ches
+3chete
+ch5eu
+che5va
+3chew
+ch5ex
+5chi.
+3chia
+3chico
+ch3ily
+ch4in.
+ch3inn
+3chio
+5chip
+chizz4
+ch5k
+5chlor
+4chm
+1cho
+cho3a
+5choc
+4choi
+ch5oid
+3chor
+4chored
+chor5ol
+4choso
+3chot
+4choti
+ch5ous
+chow5
+3chr
+chur4
+3chut
+5chyd
+3chyl
+3chym
+1c2i2
+4ci.
+4ciac
+cia4m
+ci3ca
+4cids
+4cie.
+ci3er
+ci3est
+ci5et
+ci3f
+cifi4
+4cig
+ci3ga
+cigar5
+3cil
+cil5lin
+2cim
+cim3a
+ci3me
+5cimen
+4cinab
+4cind
+cine5a
+cine5mat
+ci5ness
+4cint
+ci3ol
+ci5om
+ci4po
+cisi4
+cit3r
+ck1
+ckar5
+cka5t
+c4ke
+ck5if
+ck4sc
+cl2
+cla5rif
+3clas
+c2le2
+2cle.
+c5lec
+clemat4
+clev3
+cli1m
+c3ling
+cli2q
+clo4q
+c4lotr
+clue4
+clyp5
+5clys
+cn2
+c3ni
+1c2o2
+4co.
+3coa
+co5ba
+3coc
+co3ci
+co5cu
+co3dic
+co3dif
+4cody
+3coe
+co5et
+co3gr
+4c3oid
+co3inc
+4col.
+col3a
+co3log
+5colou
+co5ly
+co5mas
+co4me
+co3mo4
+comp4
+con1
+con4ati
+con4ch
+cond5er
+con4ey
+con4ie
+con3s
+con3t
+conta5d
+3coo
+coop4
+co3or
+cop4e
+co3ph
+co5pl
+co3po
+cop4t
+2cora
+cor5ded
+cord5er
+4cored
+co3rel
+3corn
+4coro
+co5rol
+5cort
+3cos.
+cost3a
+cost5er
+co5ta
+3co3tr
+5coty
+cous5t
+cov1
+co3va
+cow5a
+coz4
+co5zi
+c1q
+cr2
+5craf
+craft5i
+c4ran
+5crani
+cra5niu
+cras3t
+cra4te
+c2re
+4crean
+cre3at
+cre4p3
+5creti
+cre4to
+cret5or
+cri3l
+cron4
+crost4
+4crou
+5c4rus
+cry2
+crym3
+cryo3
+4c5s4
+csim5
+2ct
+c2ta
+c3tac
+ctac5u
+c5ta5g
+ct1an
+ct5ant
+c5taria
+c3tato
+c1te
+c4tea
+c2t5ee
+c4tent
+cter4ia
+ct5es
+ct5et
+ct2ic
+c5ticia
+c4tics
+ctifi4e
+c3tim
+ct4in.
+ct4ina
+ct5ing
+c3tini
+c5tin5o
+c5tio
+c3t2is
+c3tit
+c4titu
+c4tity
+ct5ive
+ct4ivit
+ct5olo
+c1tom
+c3ton
+c5toris
+c5toriz
+c1tr
+c2tre
+ctro5t
+c1tu
+c2tum
+c1ty
+cub3at
+c4uf
+cu5ity
+cul5ab
+c2uli
+cull5er
+cull5in
+1c2ult
+cu4mi
+5cuna
+cun4e
+5cuni
+5cuol
+cu5pa
+cu3pi
+c3upl
+1cur
+cur4er
+cur5ial
+4cur4o
+1cus
+cus5a
+c3utiv
+c3utr
+5cuu
+cu5v
+2cy.
+cy4bi
+1cyc
+cyl3
+cy4m
+cy5no
+cys4
+cys5to
+cy4t
+cz2
+4da.
+d4abr
+1d2ac
+dach4
+d5ache
+3dact
+d1ag
+d4a4gi
+d4ale
+d4alg
+dal5ler
+dam5a
+3dame
+d3ami
+da5mu
+3dang
+d1an4t
+d3ap
+d3ard
+5darm
+3d4as2
+dast5a
+d1at
+dativ4
+dat4u
+daugh3
+daun5te
+3dav
+d3b
+d3c4
+d1d4
+d4dere
+d3di
+d3dler
+d3dli
+d3dyi
+2de.
+deac3t
+de5aw
+de4bi
+deb5it
+3dec
+de5cant
+de4cil
+de1cr
+4dect
+ded3i
+defor5e
+de4fy.
+de3g
+de4gu
+de3io
+5de3is
+de3lat
+deli4e
+del5ler
+del5li
+de5lo
+1d4em
+4demie
+4dem4is
+demo4n
+de4mons
+de3mor
+de4mos
+4demy
+de1n2a
+den4d
+4dene
+d3enh
+deni4e
+dens5a
+dens5er
+den5tit
+de3od
+deo3l
+deon2
+deont5
+de1p
+depen4
+deposi4
+de2pu
+d3eq
+derac4
+de3rai
+d4ere
+4dered
+de5reg
+3derer
+1deri
+der3k
+3derm
+der4mi
+der5min
+5derne
+3dero4
+der5os
+der3s
+5deru
+4des.
+de3sa
+5desc
+des4ca
+de5scal
+de3sec
+des4i
+de3sid
+des5igna
+des1p
+des5pon
+de3sq
+d3est.
+des3ti
+1de1t
+de3tes
+de5th
+de2ti
+dev3il
+de3vis
+de3vit
+de4voi
+devol5u
+3dex
+2d5f
+dfol4
+d2g
+dg4a
+dgel4
+d4gen
+d3gr
+4d1h
+dhot4
+d4hu
+4di.
+1dia
+di2ad
+3diar
+diat5om
+4d1ib
+d1ic.
+dic5am
+di4ce
+di3ch
+d5icl
+dic5ol
+1dict
+dic5tat
+dic4te
+5dicul
+d5icur
+1did
+di4ers
+3di3ev
+d4ifo
+dig3al
+di3gam
+dil4
+5dill
+dilo4
+di3lu
+di5mer
+dimet4
+di1mi
+2d1in
+din4e
+din5gi
+di5nos
+3di1o
+dio4c
+di4ola
+dip5t
+3dire
+di3ri
+4d5iro
+di4s1
+d4isc
+disen3
+3disia
+3diss
+d4itas
+d4iter
+dithe4
+d3ito
+ditor3
+2dity
+1diu
+1di1v2
+di4val
+di5vine
+dix4i
+d1j
+2dl4
+d1la
+5dlef
+5dlest
+3dlew
+dlin4
+d1lo
+d5lu
+2d1m
+4d1n2
+1do
+4do.
+d4ob
+do4c3u
+dog4a
+do4j
+d4ol.
+dol3en
+do5line
+dol5it
+do4lon
+d4ols
+5dom.
+doman4
+domin5
+dom5ino
+dom5it
+do5mo
+don4at
+4dony
+3doo
+d2or
+4dor.
+dor4m
+dort4
+d4os
+do5sim
+dossi4
+dot1a
+dot4tin
+2dous
+d4own
+3dox
+d1p
+dr2
+d5rail
+d3ral
+3dram
+dran4
+d4ras
+drast4
+3drel
+dres4
+dress5o
+dri4e
+d4rif
+dri4g3
+d4rom
+dropho4
+drunk3
+4d1s2
+d5sl
+ds3m
+ds4mi
+d4sw
+dt4
+dt5ho
+1du
+2du.
+du1at
+3duc
+duch5
+duci5an
+du4co
+du5eli
+du5ell
+du5en
+du5ett
+du5in
+dul3c
+d3ule
+dul4l
+dum4be
+dun4a
+d5un4c
+du2p
+du3pl
+5duro
+d5use
+dust5er
+du3u
+d1v
+dver2
+dvert3
+dvoc5at
+2d1w
+dwell3
+2d2y
+dy4ad.
+dy5ar
+5dy4e
+5dyk
+dyl2
+dyll3
+5dymi
+3dyn
+dys3p
+d3zo
+ea2
+4eab
+e1act
+eac4te
+ea5cu
+e5add
+ead3er
+ead1i
+ead3li
+ea4g
+eak1
+eal3a
+eal3er
+ea3log
+eam4bl
+eam3er
+ean5i
+eap2
+eap5er
+e3app
+ear3a
+ear3er
+ear4li
+e5ar2r
+ear4te
+earth5i
+eas5er
+ea4soni
+e1as1s
+eassem4
+eas4t
+east5i
+eat5eni
+eat3er
+eat5ie
+e3atif
+eatit4
+eat4itu
+e3atri
+e4atu
+eau3
+eav5i
+eavi4e
+eav5ou
+eaz5i
+e1b
+ebar4
+eb2b
+ebe4
+e4bel.
+e4bels
+e2ben
+eb5et
+eb2i
+e5bil
+e4bin
+e4bis
+e4bl
+e4bos
+ebot3o
+e2br
+eb1ra
+eb2t
+e4buc
+ebus5i
+ec2a
+ec3ade
+ecad5en
+ecal5e
+e5cam
+e4capo
+ec3at
+ec5ath
+e1ce
+ecent5o
+ech3i
+e4cib
+eci4f
+ecip5i
+e1cl
+ec3lip
+econ4sc
+econstit5
+ec3ora
+ec5oro
+ec3rat
+ec5rean
+e4crem
+ec1ro
+ect5ati
+ec4ter
+ecti4c
+ec4tit
+ec4t5us
+ec1ul
+e5culi
+2ed
+e5dans
+e2dat
+ede2
+e4ded
+e5deh
+e4dele
+edes3t
+ede3te
+edeter5
+e3dev
+e5dew
+ed4g
+edi4als
+ed5ical
+ed5ics
+ediges4
+ed5igr
+ed3ime
+ed1it
+edi2v
+ediv5id
+ed3li
+edor4
+e4dox
+ed1ro
+edu5cer
+e2dul
+ed3ulo
+e4d5ur
+ee4ce
+eed3er
+ee4do
+ee2f
+ee5g
+ee1i
+ee2l1i
+ee2m
+eem5er
+eem3i
+eep1
+ee4pa
+eer4ine
+eesi4
+ee3to
+e1f
+efact5o
+efal4
+ef5eree
+ef5inite
+e4fite
+ef4l
+efor5est
+2efu
+e4fug
+efut5a
+egel3
+egi5a
+e4gib
+e3gla
+eg3le
+eg4mi
+eg5nab
+e5g4on
+e2gr
+e5gur
+e1h2
+e5ho
+eh5s
+ehy2
+ehyd5r
+eid4
+5eido
+4eif
+eig2
+e5ignit
+e4in.
+e3inc
+e2ine
+e1ing
+ein5i
+e4ins.
+ei4p4
+eir3o
+4eis
+eis3i
+eit5er
+eith4
+e2iv
+eiv3er
+e2iz
+e1j
+ejudic4
+ek3en
+ek5is
+ek4l
+e4lac
+e5lad
+el5age
+elam4
+el5anc
+elast3
+e4lates
+el5ative
+elch5er
+eld3er
+2ele
+elea5g
+4e4led
+el5eni
+el3eno
+ele3o
+ele5ph
+el1er
+e1les
+e5less
+e4leste
+el3et3o
+elev3a
+ele3vi
+el5ex
+e4l3ica4
+e1lie
+eli4ers
+e3lim
+el3ing
+eli3on
+e4li4s
+elit4t
+e3liv
+el4lab
+ell5iz
+e3loa
+e3loc
+elo5ca
+eloc3u
+elo4di
+e2log
+elom5ate
+el5op.
+el5ops
+elp5in
+el3so
+el5tie
+e1lu
+elu4m
+elus4
+elv4
+e5lyi
+3elyt
+em3ago
+em3ana
+emar4
+emarc5a
+em5atiz
+emat5ol
+em5bi
+e1me4
+e4mee
+e4mel
+e3mem
+e4m3era
+em5ero
+emet4e
+em4icis
+e4mie
+e2mig
+emig5ra
+em3ina
+em5ing
+e3mio
+em3ism
+e4mita
+e4miu
+em4mae
+4emnit
+emo3bi
+emod4u
+e2mog
+e4moi
+em3olo
+em5om
+4emon
+e3moni
+emon5ol
+e2mor
+em5oris
+em3orr
+e4motic
+e5moz
+empa5r
+empara5
+em5pes
+4empli.
+em4pre
+em3um
+e5mut
+en3ac
+e4nal
+en3am3o
+en4ann
+e2n3ar
+en3as.
+ena5ture
+3encep
+en4cile
+enct4
+2end
+en4d5al
+en4dedl
+end5rit
+4ene
+ene5d
+en3ee
+e5nelle
+e5nep
+e2ner
+e5nereo
+ener5v
+en5esi
+e3ness
+en1et
+en4ett
+e2n3eu
+e3new
+en3gi
+en3ic
+en5ier
+en3ig3r
+en5in
+enit5u
+en3k
+en1o
+en3oi
+eno2m
+en3oty
+enov3
+en2s
+ens5al
+en3sp
+en4sum
+en4sus
+ent3ar
+en4ters
+en5tia
+en4tify
+en2to
+en4tri
+ent5rin
+ent5up
+en4tus
+4enu
+en3ua
+en3uf
+en3ur
+en5ut
+5enwa
+eo3b
+e4och
+e4oda
+eof2
+eo2l
+eol5ar.
+eol5at
+eologi4
+e5olu
+eo3m
+eon4a
+e3ont
+eop4t
+e1or1
+eor4de
+eor3e
+eor5o
+eo1s2
+eo4to
+e1pa
+ep4al
+ep5arc
+epa4t
+epend5en
+ep5ert
+e4pete
+epe5titio
+ep5ex
+eph1
+eph4i
+e2pig
+e5pla
+ep3lic
+epol3a
+epol3i
+epolit5
+ep3reh
+epres5e
+ep5rim
+e4p5rob5
+ept3or
+e1p4u
+e3pur5
+e4puta
+equin4
+equi5no
+er1
+era4cie
+era4do
+era4g
+era4l
+er3aph
+er3api
+er3apy
+4erati.
+4eratim
+er5atu
+er3bat
+er3be
+erb5os
+2erc
+er3ch
+er3cl
+2erd
+erd5ar
+erdi4e
+2ere
+er3eal
+4ered
+er3egr
+er5el.
+er5ell
+er5els
+e4reme
+er3en
+5erend
+eren4e
+ere5ol
+e3req
+er3er
+ere4s
+er5ese
+er3esi
+er5este
+er5esti
+eres5tr
+eret4
+er3et.
+er3ets
+er3ett
+ere4v
+er3ex
+ergi3v
+er3gl
+er3ia.
+er4ian
+eri4cid
+5er5ick
+er2id
+er3ie
+er3iff
+er4imet
+er3in
+eri4na
+eri4on
+er3iou
+er4isc
+eri5sta
+4eri2t
+e3riv
+er5iz
+4erj
+erk4
+er3me
+er4moi
+5ernacl
+er5nalis
+ern3er
+ern3is
+ern3it
+4ero.
+er3oid
+ero5is
+ero5st
+erpent5in
+erre5la
+er4rep
+er5sine
+er5ted
+er4ter
+ert5er.
+ert5ers
+er4thi
+ert5iz
+2eru
+eru4b
+eru5d
+erund5
+er4vil
+5erwau
+eryth3
+2erz
+4es.
+es5am
+es5an
+e2sc
+es5can
+es5che
+esci5e
+escut5
+e3sea
+e3sect
+e5see
+e5seg5
+ese4l
+es5enc
+e3sh4a
+e1shi
+e5shu
+esi4an
+es5ic.
+e5sick
+es5iden
+esi5diu
+es5ies
+es3im
+es3in
+e5sion
+e4sit
+es4it.
+es4its
+e3skin
+e3s4mi
+es4od
+es3ola
+es3ol3u
+es3ona
+eso3p
+e1sor
+es3per3
+es5pira
+es5pit
+es4pl
+esplen5
+es5pot
+e5s2pr
+es4s3an
+essar5
+ess5ee
+es4sil
+es2so
+esta4b
+est3an
+e5star
+es5tau
+e2sti
+est5ifi
+est5igati
+e3stoc
+es5too
+est4r
+estud4
+e1su
+e2s3ul
+es4ur5
+et2a
+et3al.
+et5allis
+et3al5o
+eta5me
+eta3p
+et3ari
+et5ary
+et4as
+et3ate
+et3ati
+et5ay
+et3eer
+etell5i
+etend5er
+et5eni
+eter2
+et3er3a
+et5eria
+etex4
+e2th1
+ethyl3
+2etia
+e3ticu
+eti4gi
+e5tim
+et3in
+eti4na
+e3tir
+et5itiv
+eti4u
+et5olo
+e5tomete
+e2ton
+et3ona
+etor3i
+etra5g
+4e4tral
+etra5m
+et4ran
+et5ress
+et1ri
+et4ria
+etrib5a
+e4trim
+et1ro
+et2t
+et3ter
+etud4
+et3ude
+e4tum
+et4we
+et5z
+eudio5
+eue4
+euk5
+4eum
+e3urg
+eur5i
+eus4
+eu5ten
+eu3ter
+eut3i
+ev4abi
+eval5e
+eva2p3
+ev3ast
+ev3at
+ev5eli
+eve4n
+ev5erat
+ev5eren
+ever4er
+e4veri
+e4ves
+e1via
+e4viab
+e2vic
+evictu4
+evid3
+ev5ig
+ev4ile
+ev5ish
+evis5in
+evis5o
+e4viu
+evoc3
+evol5e
+evol5ute
+evu4
+e1wa
+e4wag
+e5way
+ew1er
+e3wh
+ew5ie
+ew1in
+ew5ish
+e3wit
+e1wr
+ex5ic
+ex4on.
+1exp
+4ey.
+ey4as
+eyl4
+ey3s2
+ez5er.
+ez5ers
+ez5ie
+1f2a
+2fa.
+fab4i
+fa3cet
+fact2
+fa2c3u
+2f3ag
+fall5in
+5falo
+fa5lon
+fals5ifie
+4fan3a
+fan5tasiz
+fant3i
+5far
+far3i
+5faw
+4f5b
+2f5d
+2fe.
+3feas
+fea3tu
+feb5r
+3fec
+2fed1
+5fei
+fe1li
+fem3i
+femin5
+fend5er
+f5eni
+4fered
+fer3ee
+3fero
+fe5roc
+fer5om
+3ferr
+fer3v
+2fes.
+fess3o
+fest3a
+fest5i
+fe4t
+fet4al
+fet4in
+fet4o
+3feu
+fe5veri
+2ff
+f1fe
+ffec4te
+f5fet
+f1fi
+f5fia
+f3fic
+f5fie
+ffil3
+f2f3is
+ff4le
+ff3lin
+ffoc3
+ffoni4
+ffor3e
+f3fr
+ffranch5
+4f5h
+fi5ance
+fib5u
+4fic.
+4fical
+3fici
+4fics
+fi5del
+fid3en
+fiel4
+fier4c
+fight5
+1fi2l
+2fin
+fin2a
+fi3nal
+find3
+fin2e
+f1ing
+5finin
+fin4ni
+fir2m1
+f3ita
+f5itee
+fl2
+3fla
+fle2s
+f3lica
+flin4
+3flo
+flo5ric
+3flu
+flum4i
+1fo
+4fo.
+3foc
+fo2e
+foeti4
+fo1l4i
+fo4lie
+foment4
+fo2n
+fon4de
+3foo
+fo5ram
+for5ay
+for5b
+for4di
+fore3t
+5form
+for4m3a
+fortu5na
+fo3v
+1fr2
+frag5a
+frant4
+frar4
+fratch4
+fre4s
+frost5i
+fruc4
+2f3s
+fs4p
+2ft
+f1ted
+f4ter.
+ft5es
+fti4et
+ft4ine
+3fu
+4fu.
+fu4c
+fuel5li
+fug4a
+fu4min
+fun2g
+4fured
+fur3n
+fu3sil
+fus5o
+fu5til
+4ga.
+ga4cie
+gadi4
+ga4dos
+3gag
+3gai
+3gale
+ga5len
+gali4a
+gal5ler
+3galo
+gam4bl
+gan5at
+4ganed
+gang5er
+g5ant.
+gan4tr
+g5ants
+g5arc
+g4are
+gar3ee
+gariz4a
+ga5rot
+gar5p
+5garr
+1ga4s
+gas5i
+gas3o
+gasol5
+gass5in
+gast3r
+g1at
+g4at.
+gat5iv
+g4ato.
+g4atos
+g4att
+gat5u
+gaud5
+ga5za
+g1b
+g5d4
+2ge.
+5geal
+3gean
+2ge4d
+3gedi
+5gedn
+4gef
+1gel
+4gele
+ge4li
+gel4in
+gel5li
+ge4lu
+2gely
+gem3i
+5gemo
+3gen
+gen4du
+gen5it
+gen3o
+gen5ti
+ge4o
+geo3lo
+4gere
+3germ4
+2ges.
+5gess
+gest5at
+3get
+get3a
+2g1f
+2g1g
+gg4a
+g2ge
+g5gedl
+g3ger
+g5gerer
+ggi4a5
+g3gli
+gglu3
+g5gly
+ggrav3
+g4gro
+2gh
+g5hai
+gh5eni
+g3ho
+g4hos
+gh2t
+1g2i
+4gi.
+gi4all
+gi4at
+3gib
+gi5co
+gi4g
+gi5gan
+gin5gi
+3gio
+gi4or
+gi4ot
+5gip
+gi5pa
+g4i4s
+5gis.
+gi2t1
+5gitu
+giv5en.
+2gl2
+g3lar
+5glass.
+glec4
+3gler
+g4leto
+g4letr
+g4ley
+gli5on
+g5lis4
+3glo
+4g5lod
+glom3
+4glop
+3glu
+glu5te
+glu5ti
+3glyp
+2g1m4
+2gn2
+g1na
+g4nab
+g5nate
+5gnath
+g5nati
+gna5tur
+gn5edl
+gn5ee
+gn3er
+g1ni
+g4nia
+g2n3in
+gn4in.
+g4ni2o
+g2no
+5gnori
+gno4s
+2go.
+5goa
+3goc
+5god
+3goe
+go4et
+go4ge
+4gogram
+g5oid
+go3is
+go2me
+5gonn
+go5nom
+3goo
+goph4
+4gor.
+5gorg
+4gors
+g4ory
+3gos
+gos4t
+2gou
+gour4i
+g1ous
+gov1
+g3p
+1gr2
+grab4
+3gram
+4grame
+gra2p
+g4re
+gril4
+grim3a
+g4ro
+gro4g
+g5ron
+grop4
+3gru
+gru3en
+gru5i
+grum4b
+2g1s
+gs4c
+gs4t
+g4sti
+gth5eni
+g5to
+g4u2a
+gu5ab
+5guan
+3guard
+g5uat
+2gue
+5gueu
+5guit4
+gui5ta
+gu2ma
+gu4mi
+3gun
+g4uras
+g4ured
+gur4n
+gur4u
+4gury
+gust5a
+2g1w
+2gy
+gy2b
+5gym
+3gyn
+gyn5o
+g5z2
+ha2
+4ha.
+h4ac
+hadi4e
+had4ine
+hae3o
+haged5
+hagi3o
+hag5u
+ha5ic
+hais4
+hak4ine
+hal5ant
+ha4m
+ham5an
+han4cro
+han2g
+h1ani4
+h5aniz
+han4t
+hant3a
+ha4pe
+hap3l
+har1a
+har5b
+har4d
+har5die
+harge4
+ha5rism
+har3o
+har4ted
+har4ti
+has4te
+hat5o
+haught5
+havel4
+hav5ersi
+hav5o
+h1b
+h1c
+h1d
+hdeac5
+hdu4
+he2
+4he.
+h2ea
+1head
+3hear
+hearch4
+heast5
+heav5en
+hec3t4
+he5del
+he3do
+heek4
+h4ei
+he3is
+he5lat
+h5elin
+he3lio
+he5liu
+hel4li
+h3el3o
+hem1a
+he3men
+hemis4
+he5mop
+hem4p
+hende5
+he3or
+hep1
+h1er.
+her4as
+her2b
+herb3a
+herb3i
+here3a
+here3o
+h5erett
+h5erh
+her5ial
+h5erine
+h1erl
+her5om
+h4eron
+h1ers
+h5erwa
+hes3tr
+het1
+h4et3a
+het3i
+het4ted
+heu2
+heum3
+heumat5
+he4v4
+hev5i
+hex5o
+h1f
+h5h
+2hi.
+hi4ar
+h1ic
+hi3c4an
+hi4cin
+h4icl
+h5ie.
+h1ier
+h4i4ers
+h1ies
+h3ifi4
+h3ify
+hig4o
+hi5ka
+hi4l
+hi5ma4
+hi5mer
+himos4
+h1in
+hin4d
+h2in2e
+hi5nie
+h5iniz
+hi5nop
+h2ins
+hio5lo
+h4ior
+hi2p
+hip3l
+h4ir
+hir4r
+hirr5i
+hit4a
+hiv5a
+4hl
+h3la
+h1le
+h3let
+h1l2i
+hli4a
+2h1m
+h4manic
+h5mica
+2h1n2
+hnocen5
+4ho.
+ho3an
+ho4co
+ho3don
+ho5du
+ho5ep
+hol3ar
+hold1
+hol4is.
+ho5lys
+ho4mag
+hom5in
+h2o4n
+hon5em
+ho5neu
+hon3ey
+hong3i
+ho5nio
+hon1o
+1hood
+hoo5r
+h4ope
+ho2p5r
+h4op4te
+hor5et
+h4orn
+horn5i
+ho5rog
+hort5h
+hosi4
+ho4ton
+h2ou
+3house3
+4h1p
+2hr
+hras5eo
+hre4
+hre5ma
+hr5er
+hres4
+hri4
+hrill5in
+hrim4
+h5rit
+h3rod
+hrom4i
+hry4
+h3rym3
+2h1s
+hsi4
+h4sk
+ht5ag
+ht5ee
+ht3en.
+ht5ener
+ht3eni
+ht3ens
+ht5eo
+ht5es
+ht4foo
+h1th
+ht4ine
+hu4g
+hu4mat
+hu5mer
+hu4min
+hun4c
+hunk4
+hun4t
+hur3i
+hu3sia
+huz4
+h1w
+h4wart
+h2y
+hy2l
+hyl5en
+hy2m
+hyn4
+hy3o
+hyol5i
+hy1pe
+hy3ph
+hyr4
+hys3te
+hy4t
+2i1a2
+ia4bl
+iab5olis
+iab5oliz
+i2ach
+iac3o
+i2ac2r
+ia5cri
+ia5dem
+i5ae
+iaf4
+i2ag4
+ia3gn
+i5a4g5o
+ia3gr
+i3ah
+i5ai
+ialect4
+i3alit
+ial5li
+4ialn
+i2a3lo
+ia5ly
+i5amb
+ia3me
+ianch5
+i3ant
+i5ape
+ia3ph
+i2ard
+4iarit
+i3at
+ia5the
+i5atom
+iat4u
+iatur4a
+i3au
+iav4
+ib3era
+ib1i
+ibio4
+ibios4
+ib5li
+4ibo
+i4bon
+ibor4
+i4bose
+i5bou
+ib1ri
+4ibu
+ib3uta
+ic3ac
+ic5ado
+i4cal
+ic1an
+2icar
+iccu4
+4ice
+i5ceo
+4ich
+ich4i
+ich5ing
+ich5ol
+4icin
+i5cio
+2ick
+ic4lo
+2i2co
+ico3c
+ic5ola
+icon3o
+i5cop
+icotyle5
+2i1cr
+i4cri
+i4cru
+i4cry
+ic4tedl
+ic4ter
+ict5ic
+2icu
+icu4lu
+ic3um
+i5cun4
+i5cut
+2i1cy
+i2d
+id1a
+i5day
+ide4m
+id3enc
+id3era
+iderm5
+i3dicu
+id3if
+i5dig
+i5dil
+i3dim
+id4ines
+idios4
+idir4
+id1is4
+id4ist
+2i4d1it
+idi4v
+id3li
+id3ol
+idol3a
+4idomi
+id3ow
+4idr
+id5ri
+id3ul
+ie2
+4iec
+2ieg2
+ie3ga
+ie5i
+i5ell
+4iem
+2i1en
+ien2d
+i1er
+i3eres
+i2eri
+ieri4n
+4iern
+ier2o
+i4ert
+i3esc
+ies3el
+i1es2t
+i3est.
+2i1et
+i4et.
+iet3ie
+4ieu
+i5euti
+iev3a
+iev3er
+iev3o
+2i1f
+i2fe
+if4fa
+iff5ler
+if3ic.
+i4ficac
+if5ics
+ifi4d
+ifi4n
+4i2fl
+i3fo
+ifoc5
+if5tee
+i3fy
+2ig
+i3gad
+ig3and
+3igar
+i1ge
+i3ger
+ight5er.
+ight5ers
+4igi
+ign5iz
+igno5m
+i3gon
+ig1or
+ig3ot
+i5gret
+i4g5ro
+igu5it
+ig1ur
+2i1h
+ihy4
+2ii
+i5in
+ija4
+4iju
+2ik2
+ik5an
+ike4b
+i2l3a
+ila4g
+ila5tel
+i5later
+il4ax
+il5dr
+il4du
+i3len
+ilesi4
+il3f
+il3ia.
+il3iar
+ili4arl
+i3lici
+i5lien
+ili4er
+ili4fe
+il4ific
+il1in
+il5ine.
+4iliou
+il5ipp
+il5iq
+il4ite
+ilit5u
+il4mo
+i5lon
+il3ou
+ilth4
+il2tr
+4ilu
+il5ul
+i5lum
+il5ure
+il3v
+4ilym
+ima4c
+im2ag
+im3age
+im1al
+im5am
+i5m2as
+i4mated
+i4matin
+imat5u
+im1i
+i3m2ie
+im4ine
+im5ino
+im5mes
+i2mo
+i5mog
+i3mon
+im5oo
+i3mos.
+impar5a
+imparad5
+im5pie
+impot5
+im5pr
+impu4
+im1ul
+im5um
+in3ab
+4inace
+in4ado
+in5agl
+in3air
+ina4l
+4inalit
+in5am
+in3an
+in3ap
+in4ars
+i3nas.
+4inata
+inator5
+in3au
+in4aw
+2inc
+inc4tua
+2ind
+in5dar
+inde5p
+indes5
+inde3t
+indeterm5
+in5dro
+4inea
+4ined
+in5ee
+in5ega
+4in5eo
+ine4s
+in3esi
+ine5te
+4ineu
+inev5
+infilt5
+infol4
+4infu
+4inga
+in5gal
+4inge
+ing5ha
+4ingi
+4ingle
+4ingli
+4ingo
+4ingu
+ing3um
+2ini
+in5ia.
+4inic
+in4ici
+in3ion
+in4itud
+4ink
+ink4ine
+4inl
+2inn
+2ino
+4ino.
+in3oi
+i5nole
+4inos
+i3nos.
+in5ose
+in3osi
+4inq
+ins2
+in4sch5
+inse2
+insect5
+insec5u
+in3si
+5insk
+insolv5
+in4tee
+int5ess
+in3til
+int5res
+intu5m
+2inu
+in5ul
+in5um
+in3un
+in3ur
+invol5u
+2io2
+ioact4
+i1od
+iod3i4
+iod5o
+ioe4
+io3gr
+4i1ol
+io3ma
+i4omani
+io3mo
+i5ope
+io3ph
+i5opo
+iop4s
+i1or
+iora4m
+4iore
+4iorit
+5ioriz
+4iorl
+ior4n
+io3sc
+i3ose
+i3osi
+i4oso
+io5sta
+i3ot
+iot4a
+io5th
+iot5ic
+io5tr
+i4oty
+i4our.
+i4ours
+i5ox
+2ip
+ip3al
+ipap4
+ipar3o
+ipart5ite
+ip1at
+i3pend
+i1ph2e
+iphen3
+i5pheri
+iphi4
+i4phu
+ip3id
+i5pil
+ip3in
+ip4ine
+ipir4
+ip5is
+ip1i4t
+ip4iti
+ip3lin
+ip3lo
+i3po
+i4pog
+i4poli
+i4pom
+ipon3
+i4pow
+ip2pl
+ip3pli
+ip4re
+ip5tori
+ip1ul
+i5put
+ipy4
+2iq
+i3qua
+2ir
+ir1a
+ir4abi
+ira4c
+ir4ae.
+ir4ag
+ir4alin
+ir4alli
+i5raso
+irassi4
+iray4
+ird3i
+ire3a
+ir3ec
+ir5ee
+irel4
+ire5li
+ires4
+ir5ess
+ir1i
+ir2i4d
+ir4im
+ir4is.
+5iriz
+irl5ing
+ir5och
+ir5ol
+ir3om
+ir4q
+ir2s
+ir5ta
+ir5tee
+irwo4me
+i4sa
+is5ad
+is3age
+is1al
+is3am
+is1an
+is3ar
+is5av
+4isb
+i2s3c
+is5chi
+isci5c
+4i1sec
+ise5cr
+is3ell
+4is3en
+is2er
+is5ere
+i2s3et
+4iseu
+is3har
+ish5ee
+4ishio
+ish3op
+is5hor
+2isia
+is5ic
+is3ie
+4isim
+is3inc
+4isis
+is4ke
+is1l
+islun4
+2isma
+is1on
+is5oner
+iso5p
+is1p
+i3s2ph
+5ispr
+2is1s
+iss5ad
+is4sal
+is5san
+iss4iv
+iss4o
+4ista
+is4tal
+ist5enc
+ist5ent
+is5terer
+4isth
+is4t3ic
+4istl
+i4s1to
+4is4tom
+is1tr
+3istry
+4isty
+i5sul
+is3ur
+2isy
+it1a
+it5ab
+ita4c
+4itai
+it3am
+it4ana
+it4as
+it3at
+i3tect
+it3ee
+it3enc
+it3ent
+it3era
+2ith
+itha5l
+ith5i
+i5thol
+ith3r
+ithy5
+2itia
+iti4co
+it5icu
+it1ie
+it3ig
+4itim
+it4in.
+it4ins
+4itio.
+4itione
+i5tiq
+4i5tit
+it3iv
+it4li
+it5lo
+4ito.
+it5ol
+2iton
+it1ou
+2itr
+it5ress
+i4tric
+2itt
+it4tit
+itu4als
+it5uar
+4itue
+it1ul
+it1ur
+it3us
+2i1u2
+i3um
+iur5e
+2iva
+iv5anc
+iv1at
+i4ved
+iv5el.
+iv5eling
+iv5els
+i4ver.
+iv3eri
+i4vers.
+iver5sal
+ives4
+iv3et
+i4vie
+iv3if
+i5vilit
+5ivist.
+5ivists
+iv1it
+i2vo
+ivoc3
+i5vore
+2i1w
+2ix
+ix3o
+i5ye
+1iz
+4izah
+iz3i2
+2izo
+iz5oi
+2izz
+1ja
+2ja.
+3jac
+ja2c5o
+jac3u
+jag5u
+jal4
+ja5lo
+ja5pan
+jel5la
+jeo2
+jeop3
+4jes
+jeu4
+jew3
+2ji
+3jig
+jil4
+jill5
+5jis.
+3jo2
+4jo.
+joc5o
+joc5u
+jol4e
+4jr
+4js
+ju1di
+jui4
+ju5l
+ju3ni
+juscu4
+jut3a
+ju1v
+k4abi
+k2a5bu
+kach4
+k3a4g
+kais5
+ka4l
+ka5lim
+kal4is
+k4an
+ka3o
+kap4
+kar4i
+1kas.
+kaur4
+kav4
+k1b4
+k1c
+kcom4
+k5d2
+kdo4
+kdol5
+4ked
+ke5da
+k5ede
+3kee
+ke4g
+ken4d
+keno4
+kep5t
+ker5a
+k4ere
+k5erel
+ker4j
+ker5o
+kes4i
+ket5a
+key4wo
+k1f
+kfur4
+k3ho
+5kih
+ki2l
+kilo3
+k1in
+k2in.
+3kind
+kinema4
+kin5et
+k3ing
+kin4i
+k2ins
+kir3m
+kir4r
+kis4
+3kis.
+k1ish
+kit5c
+ki4w
+kk4
+k5ker
+k2l2
+k3la
+k5lea
+k3ler
+k3let
+k3li
+k3lo
+k1m
+kn2
+k2no
+1know
+ko5a
+kol4
+ko5mi
+ko5pe
+k1p
+k5ro4
+k3ru
+4k1s
+k3sl
+ks2mi
+ks4t
+k1t
+kur5
+k5v
+k1w
+3kyl
+l2a
+4la.
+5laa
+lab5ar
+label4
+5labr
+l4ac
+la2ca
+la5ceo
+la5cer
+la4ch
+la2co
+5la5col
+lac5on
+la3cu
+la4de
+l5adm
+l4ae
+l4af
+la3ger
+la4gis
+lag3r
+5lah4
+la4ic.
+l4al
+4lale
+5lamandr
+la5melli
+lam4ie
+lam1o
+l5amu
+lan3at
+lan2d
+3land.
+land3i
+3lands
+lan4er
+lan3et
+lan5tine
+lan4tr
+la4p
+lapi4
+lar5an
+lar5de
+4lared
+l4as
+lat5al
+la4te
+5latilis
+5latiliz
+5latini
+lat5us
+l4au
+5laur
+lav5at
+l4aw
+4laz
+l3b
+lbe4
+l4bit
+l4by
+l1c2
+l2cat
+lce4
+lcen4
+l4cere
+lch4e
+l3dar
+l3ded
+l3deh
+l5dera
+ld3est
+l5dew
+ldi2
+l3die
+ld4ine
+l5di5nes
+ld3ish
+ld5li
+l3do
+4le.
+3leagu
+le5atio
+leav5er
+l3eb5ra
+le3ca
+le5cha
+lect5ica
+2led
+le5dr
+leg1a
+l3egan
+3legg
+le4gin
+leg3o
+le3gra
+lek4
+4leled
+lel5o
+lelu5
+lem5enc
+lem3is
+l5emiz
+5lemm
+l3emn
+le2mo
+lem5on
+l5enda
+len5dar
+lend4e
+len4do
+le1ne
+le5nie
+len3o
+4lentio
+len5u
+le3on
+leo4s
+le5q
+2ler
+le5rec
+5l4eria
+l4eric
+le5rig
+ler3om
+leros4
+ler3ot
+4les.
+le3sco
+3les4s
+1let
+le5tra
+le5tre
+5le5tu5
+leur5
+2lev
+l3eva
+5leve
+lev5ita
+le4wi
+l5exa
+1ley
+lf5id
+l2fo
+lf3on
+l1g2
+l4gal
+l4gem
+lgi4a
+l4gid
+l4goi
+l3h
+4li.
+li4ani
+lias4
+lib1r
+l1ic.
+5lich
+li4cie
+5licio
+l3ic3on
+lict4o
+li4cu
+l3ida
+l4idar
+5lidif
+3lieu
+l4ife
+l4ifo
+lift5er
+1lig
+li5ger
+light5i
+5lih
+3lik
+1l4il
+lil4i
+lim2b
+limet4e
+lim4p
+l4ina.
+l4inas
+lin4d
+l4ine
+5lin3ea
+lin4er.
+lin4ers
+lin4ger
+ling3i
+5lingt
+3lingu
+3linq
+lint5i
+3liog
+li4ol
+lio3m
+liot4
+li3ou
+5liph
+lipt5
+li1q
+3lir
+l1is
+l4isk
+5lisse
+l1it
+l2it.
+l3it5a
+5liter
+3lith
+5litia
+3litr
+lit4u
+l4iv
+l5ivat
+liv3er
+liv5id
+lkal5o
+lk5at
+lk3er.
+lk3ers
+ll2
+l1la
+lla4ba
+llact4
+l5las
+l4law
+l5leb
+l1lec
+l1leg
+l3lei
+l1lel
+lle5m
+l1len
+l3lep
+l3leu
+l3lev
+ll3f
+l1li
+lli5am
+lli4an
+llib4e
+llic4
+l4licl
+lli5co
+l5lie
+lligat4
+l2lin
+l5lin.
+l3lina
+l3line
+l5lio
+lli5v
+ll3m
+l1lo
+lloc3a
+lloc5u
+llo2q
+l4lov
+llow5er
+ll3p
+ll3s
+ll5t
+l1lu
+llun4
+l5lya
+l3lyc
+l3lyg
+l3lyh
+l3lyi
+l5lym
+lm2
+l1ma
+l1me
+l4mer
+lm3ing
+l5mip
+l2m3od
+l1n4
+l3ne
+lneo4
+2lo.
+5load
+5lob3a
+1loc
+loc3al
+loc5ul
+lo4cus.
+2locy
+l3odis
+3lo3dr
+1log
+lo5gan
+4loi.
+lo5mi
+lom4m
+lon4al
+lon4e
+l5onel
+lo5ney
+long5in
+3lonia
+loni4e
+l3onis
+l3oniz
+loom5er
+lop4e
+5lo5pen
+l3opm
+1lo1q
+l4ored
+lor5iat
+lor4ife
+lo5rof
+loros4
+l4os.
+lo1so
+loss4
+los5sie
+lot5at
+loth4ie
+lo5tu
+5loup
+lp1at
+lp3er
+lph2
+l5phe
+l3phin
+l2pho
+l3pie
+l3pit
+lr4
+l3ri
+l3ro
+l5ru
+4ls
+l5sam
+ls5an
+lsi4fia
+lsi4m
+ls4is
+l5sk
+ls4p
+l1s2t
+ltan3e
+l4tang
+lt5ant
+l5tar
+l1te
+l4tei
+ltern3
+lth3i
+lti4ci
+ltim4a
+ltin4
+lti3t
+l3t4iv
+lt4or
+l1tr
+ltramont5
+l1tu
+l4tus
+4lu.
+lu1a
+luch4
+lu2c5o
+luc5ra
+lu4cu
+4lue
+lu1en
+lu5er
+lu1i
+lu4it
+lum4bri
+lu4mo
+5lump
+lu2m5u
+lunch5eo
+5lune
+l3unta
+lu3ori
+5lup
+3lur3o
+lusk5
+luss4
+lut5an
+4lut5ar
+5lutioniz
+lu5toc
+lut5r
+lu1v
+lv5ate
+l5vet4
+l4vi
+l4vor
+l3w
+lx4
+2ly
+4ly.
+ly1c
+ly4ca
+lyc4l
+lyc5os
+lym2
+lymph5
+lyp2
+ly4pa
+lypt5o
+3lyr
+lys5er
+3lyw
+3lyz
+lz4
+4ma.
+m4aca
+mac3ad
+ma5chine
+5machy
+ma4cis
+mact4
+4mad.
+4mada
+4mads
+ma4ge
+5magn
+2mago4
+2mah
+ma5ho
+3ma4i
+4mai.
+maid3
+5mak
+mal3ap
+mal5ari
+5male2
+mal5ed
+mal3ef
+m3alg
+m3alis
+mal4is.
+mal3le
+mal4li
+2mam
+mament4
+m5ament.
+1man
+3m4an.
+man3a
+man5dar
+man3dr
+manic4
+man4ica
+ma5nil
+m4ans
+mantel5
+2map
+m3aph
+1mar
+5maran
+mar5ol
+ma5ron
+ma3roo
+mar5ri
+mar4shi
+mar3v
+ma3son
+massi4
+mass5ing
+3mas1t
+mas4ted
+mast4ic
+mas4tin
+m4at.
+m4aten
+ma3ter
+mater5n4
+m4atit
+mat4iti
+m4atiza
+ma3tog
+mat5om
+ma3top
+m4ats
+3m4att
+ma5ture
+mav4
+2m1b
+mbat4t
+mb4d
+m5bec
+m5berer
+m4bery
+m4bes
+mb2i
+m2bic
+m5bil5
+m4b3ing
+m4bis
+mb5ist
+mbival5
+m5bler
+m3bli
+mbru4
+mbu3l
+mbur4
+m1c
+m5d
+m2e
+2me.
+mea5g
+me5and
+me4ba
+me4bi
+2med
+4med.
+3media
+med5icat
+4medie
+m5ed5ies
+3medit
+me4do
+m5edy
+me2g
+5meg2a1
+mega5t
+4mele
+mel5ee
+mel5ler
+mel3on
+mel4t
+melt5er
+me2m
+4m5eme
+1men
+3men.
+2mena
+men4ag
+mend5er
+mend5o
+me1ne
+ment5or
+5ments
+5meog
+me4p
+m5eran
+4mere
+mer4ia
+2me2s
+mes5en
+me5si4a
+mes5q
+3mesti4
+1me2t
+meta3t
+met1e
+4meted
+meth4i
+meti4c
+met5ici
+met3o
+met3ri
+m1f
+4m3h
+4mi.
+m1ic
+mi4cin
+mi3co
+3micro
+m4ict
+mi3cul
+mi4cus
+m4idi
+mid4in
+mid5on
+mi5fi
+mig5a
+migh5ti
+mi2gr
+4mij
+mi5ka
+m2il
+m3ila
+mil4ad
+4m5ilie
+mil5ies
+3mill
+mi5lo
+mil4t
+3m2im
+mim5i
+5min4d
+mind5er
+min4er.
+min4ers
+ming5li
+min5ie
+m4init
+min3ol
+1m4int
+minth5o
+mi3o
+mi3p
+mirab4
+mi5racu
+m2is.
+m4isc
+mi4se
+4misem
+mis3ha
+5missi
+m3ist.
+mis4tin
+m3ists
+mi2t
+m5itan
+4mity
+3miu
+5mix
+4m1l
+mlo5cuti
+mlun4
+2m1m2
+mman4d
+mmand5er
+m3medi
+mmel5li
+mmet4e
+mmig3
+mmin3u
+mmis3
+mmob3
+m5moc
+mmor3
+mmut3a
+4m1n2
+mnif4
+m4nin
+mni5o
+mnis4
+mno5l
+1mo
+4mo.
+2moc
+mod1
+mod5ifie
+mogast4
+mo4go
+mog5ri
+m5oir
+mok4i
+mol3a
+4molog.
+4mologs
+4mologu
+mo3ly
+mo1m
+mo4mis
+m4on
+mona4
+4moned
+mon1g
+mo4no
+monolo4
+monolog5i
+m4op
+mophil5i
+mop4t
+m3orab
+m3orat4
+mor4ato
+m5ord
+mo5rel
+3moria
+m5oriz
+mor5on
+3morp
+3morse
+mor5tal
+mo3sp
+5most
+mo3sta
+2m1ous
+m1p
+m3pa
+m4panc
+m4pant
+mpath3
+mpel5li
+m5perer
+mper3i
+mpet5it
+mphal5o
+m4phe
+m4phl
+m2pi
+mp5id
+m5pig
+mp3ily
+mp1in
+m3pir
+mp3is
+m3po
+mpol5it
+mpo2t
+mpov5
+mp3to
+mp5tr
+m3pu
+m5q
+m3r
+m4ry
+4m1s
+msel5f
+m5si
+msol4
+mtu4
+muck4e
+muff4
+mul1t2
+m5unc
+mu5nio
+mun3is
+mus5co
+mu4se
+mus5ke
+mu3til
+m1v
+m3w
+2my
+5my3c
+my4d
+my3e
+3myi
+5myst4
+3myt
+n1a
+2na.
+na2c
+nach4
+na5cious.
+na5ciousl
+nac4te
+nac5tiva
+na5culari
+na4d4a
+nadi4
+nad4op
+n2ae.
+naffil4
+nag4a
+n4agen
+5na5geri
+na4gi
+n5ago
+5n4a3gr
+5nah
+5nail
+na5iv
+nak2
+4naled
+n5alg
+n4alia
+na3ly
+1nam
+3name
+nam4n
+na5nas
+nannot4
+nan4ta
+nan5ted
+nan4to
+na5o
+4n4ard
+nar5tisti
+n2as
+nas5i
+nas5p
+nas3s
+nas5te
+nat5al
+na5tat
+n4atee
+na3the
+nath4l
+nati4
+n4ati.
+nat5ic
+n4ato.
+na3tom
+na4tos
+nat4r
+na5turi
+naugh5ti
+naus3
+3naut
+naut3i
+na2v
+na5vel
+n3b4
+nbarric5
+nbeau4
+nbe4n
+nbene4
+nbet4
+nbit4
+n1c2a
+n4cal.
+ncarn5at
+ncel4i
+ncent5ri
+n4cept.
+n3cer
+ncer4e
+n4ces.
+n5cet
+n5cey
+n3cha
+nch4ie
+n3cho
+nch5olo
+n3chu
+n4cic
+ncid5en
+n4cif
+ncip5ie
+n1c2l
+n4cles
+ncoc4
+nco5pat
+n1cr
+nc1t
+nc4tin
+nct4ivi
+nct2o
+n1cu
+ncu4lo
+n4cun
+n4curvi
+ncus4t
+4nd
+n2da
+n3da4c
+n3dal
+n4dale
+n3dam
+nd3anc
+nde2
+n3dea
+nde3ci
+n1ded
+nde4l
+ndeleg4
+nd3enc
+ndepre4
+n3derl
+nde4s
+ndes5cr
+n5dez
+nd4hi
+n1dic
+ndic5u
+ndid5a
+n3die
+nd5ily
+nd4ine
+nd3ise
+nd5is4i
+nd5ism.
+nd5ity
+nd3ler
+nd1li
+n5doc
+ndor4
+n2dou
+nd5our
+ndrag5
+ndram4
+n5dron
+ndu4b
+nduct5iv
+n4dun
+nd2we
+n3dyi
+2ne.
+ne3alo
+n3ear
+ne2b3u
+5neck
+ne4cl
+ne2co
+n5ectom
+2ned
+3nedi
+ne4du4
+neg3a
+ne3go
+5negu
+neis4
+2nele
+ne5lia
+neli4g
+n4ely
+ne2mo
+4n1en
+n3end
+neo3l
+neon4
+ne2p
+n1er
+4nered
+5nering
+ner5o
+ner4r5
+ner2v
+nerv5in
+2nes.
+n1esc
+ne3sia
+1ness
+n1est
+nes3tr
+net3a
+net3ic
+ne4tog
+net1r
+neuma5to
+neut5r
+nev5er
+n4ew
+news3
+n4eys.
+n3f
+nfo4
+nform5er
+nfortu5
+nfran3
+4ng
+ng2a
+n4gae
+n5gee
+n3geri
+n5gero
+ngh4
+n2gi
+n5gic
+ngio4g
+n5glem
+n3glie
+n5glio
+ng1n
+n1go
+n4gry
+n1gu
+n2gum
+n1h2
+nhab3
+nho4
+nhy2
+nhyd5
+n1i
+4ni.
+3niac
+ni3ba
+n4icab
+ni4cen
+4nicl
+nict5a
+ni4cul4
+ni4dio
+n2ie
+ni4ers
+nif4f
+nift4
+nif5ti
+ni2g
+night5i
+n3igm
+3nign
+nik5e
+n2il
+nil4a
+n3im1
+n4ime
+5nimet
+n4ines
+nin4j
+5ninn
+n4inu
+5niol
+ni1ou
+3nipu
+5niq
+n4is.
+n4isk
+nis4l
+nis4o
+n5iss
+nis5ter.
+nis5ters
+nitch4
+ni4te
+ni3tho
+n4itos
+ni5tra
+nit5res
+ni3tri
+nit4ur
+n2iv
+niv4a
+ni3vo
+nivoc4
+niz5en
+n1j
+njam2
+njur5i
+4n2k
+nk5ar
+n5kero
+n3key
+nk5if
+nk5il
+4n1l2
+nland5
+n3le
+nlet4
+n3m
+nmater4
+nmor5ti
+n1n4
+nne4
+nnel5li
+nnerv5a
+n3ni
+nni3ki
+nnov3
+n5nyi
+4no.
+n5obi
+no5bil
+nob4l
+no5blem
+nobser4
+n5ocula
+no4di
+n4ody
+noe4c
+no4fa
+nois5i
+n5ol.
+no3la
+nol4i
+nom3al
+1nomi
+no2mo
+4none
+3nonic
+5nood
+nop5i
+nora4t
+nor5di
+nor4ia
+nor4is
+nor3ma
+n4oro
+nor4t
+n4os.
+nos4o
+no3sp
+not1a
+3note
+n1ou
+n4oug
+3noun
+2nous
+nou5v
+nova4l
+nove2
+nov3el
+novel5e
+n4ow
+now5er
+now3l
+n3p4
+npil4
+npla4
+npoin4
+npo5la
+npos4
+npri4
+n1q
+n4quef
+n1r
+nre4i
+nre3m
+nres5tr
+4n1s
+ns2c
+n2sco
+ns3cot
+n4scu
+n5sec
+nsec4te
+n2ses
+n5seu
+n3sh2
+n2si
+ns3ib
+n4sic
+n5sick
+n3sid
+n3sie
+ns5ifi
+ns3ing
+n3sio
+n3s2is
+nsi2t
+ns3iv
+nsolu4
+n5son
+n4sore
+n4sory
+n3spir
+n3s2t
+nsta4
+nstil4
+n3su
+nsur4e
+n3swa
+ntab4u
+nt3age
+nt1al
+n4t3anc
+nt5and
+ntan5eo
+n4t3ant
+nt4ariu
+n5tasis
+nt3ast
+nt1at
+nt5ath
+nt3ati
+nt5ativ
+n5tau
+n1te
+n4tec
+n4tee.
+n4tees
+n3tel
+ntend5en
+n4teo
+n4ter.
+n3teri
+n5tern
+ntern5al
+nter5nat
+nth2
+n1the
+nther5
+nth5ine
+nt2i
+nt4ib
+n4tic.
+n5ticis
+n5ticiz
+n4tics
+ntic4u4
+n3tid4
+n1tie
+n4tify.
+n3tig
+nt5ilati
+n5till
+nt3ing
+nt5ing.
+nti3p
+n4tipar
+n4tis.
+nt3ism
+nt3ist
+n5titio
+nt3iz
+n2tj
+n1t2o
+n3tom
+ntoni4
+n5top
+n1tr
+ntra3d
+nt3ral
+n4trant
+n3trat
+nt5ress
+nt3ril
+ntrol5ler
+n5trym
+n1tu
+n3tua
+ntub5
+ntup5li
+n5tur
+n2ty
+n2u
+nu1a
+5nuc
+3nud
+nud5i
+nu3en
+nug4a
+nu3i
+nu4is
+5nuk
+n4ulo
+n3ult
+nultim5
+nu1me
+5numenta
+5numer
+5numi
+3nunc
+nu3tat
+n5utiv
+nu4to
+nu1tr
+n3v2
+nve2
+nvel3
+nven4e
+nven5o
+nvers5an
+nvi4t
+nvoc5at
+n5w
+nwin4
+nwom4
+n2x4
+2ny2
+5nyc
+nym5it
+nyth4
+n1z2
+nzy4
+2oa2
+o5ace
+o3act
+oad5er
+oad5i
+o3ag
+oak5er
+o3ales
+oal4i
+oal5in
+o5alit
+oan4t
+oap5i
+oar5er
+oar4se
+oast5er
+oat5a
+oat5ee
+oat5er
+4oba
+obe4l
+ob2i
+ob3ing
+2obi3o
+ob3it
+o3bla
+ob1li
+4obo
+ob3oc
+o5bol
+o5bot
+o3bra
+obrom4
+ob5t
+ob3ul
+o3bus
+2oc
+oc2a
+o4cab
+o3cad
+oc5ag
+o5calli
+o4c5ativ
+oc5ato
+4o3ce2
+o4cea
+ocen5o
+ocess4i
+och4e
+och5in
+o3chon
+ochro4n
+o5chu
+oci3ab
+oci4al
+o1cl
+o2cle
+o1cr
+ocre3
+oct2
+oc2te
+oc1to
+ocu4lu
+ocum4
+oc5uo
+ocuss4
+ocus5si
+ocut5r
+o1cy
+o5cyt
+ocyt5o
+od3al.
+ode4c
+o5deg
+ode4ga
+o5dend
+o3dent
+odes4
+od3ica
+o4d1ie
+od3iga
+od4il
+od1is2
+odis5ia
+od5it
+5odiz
+od3li
+o2do
+od5olo
+od5ous
+o3dro
+od5ru
+o2du
+odu5cer
+o4duct.
+o4ducts
+od3ul
+o5dyt
+oe3a
+oe4bi
+oe5cu
+oe4d
+o5ee
+oe5ic
+o3elec
+oelli4
+oelo4
+oe3o4p
+oep5
+o5eq
+o3er
+oes3t
+o1et
+o4et.
+oet3i
+oet4r
+3oeu
+o3ev
+o3ex
+oflu4
+4ofo
+o4ful
+ofun4
+2o1g
+o2ga
+o3gam
+og5ar5
+o3gas
+ogen1
+o5gey
+o3gi
+o4gio
+og2na
+ogoni4
+o4got
+o2gri
+o4gro
+og4sh
+o2gu
+o5gyr
+o1h2
+o3ha
+ohab3
+o3he
+oher4er
+o3ho4
+ohy4
+2oi
+oi4c
+o3ic.
+oi5ch
+o2i4d
+4oide
+oig4
+oi5ki5
+oil3er
+oil5i
+oin3de
+o3ing
+oin4t5er
+oin4tr
+oi4o
+4ois
+o3ism
+oi4t
+oit4al
+oith4
+o1j
+ok4ine
+ok3l
+ok5u
+ola4c
+o4lack
+o5lali
+ol4an
+olan5d
+ol5ast
+olat5er
+ol5ch
+ole2c4
+ol5eci
+ol5efi
+o3leo
+ole4on
+o3lep
+ol1er
+o3lest
+o3leu
+o1lia
+ol3ica
+o3lice
+ol5iciz
+ol5ick
+ol3ics
+ol5id.
+oli2e
+o3lier
+ol5ies.
+o5lif
+oli4f3e
+oli5go
+o5lina
+ol3ing
+oli5os
+ol5ip4
+olis4
+ol2it
+olle2
+ollim3
+ol4lope
+ol4lyi
+ol3mi
+o1lo
+4oloc
+ol3oid
+o4lona
+olon5el
+ol1or
+o3los
+ol1ou
+4ol1ub
+o3lumi
+o5lunte
+ol3us.
+oly3ph
+4olyt
+2om
+o1ma
+o4mab
+o2mac
+o2mal
+o4mane
+omast4
+o3mat
+om4be
+ome4d
+ome4g
+omeg5a
+ome3li
+om3ena
+omen4t
+o3meri
+om1i
+o3mia
+omi2c
+omic5r
+om4ie.
+omil4
+om4iny
+omiss4
+om2it
+omme4
+om2na
+omni3
+o4moi
+omoli3
+o2mo4n
+om5ony
+o4mos.
+omot5iv
+o2mou
+om5pil
+ompt5er
+ona4d
+on3ai
+o5nas.
+onast5i
+on5ativ
+4onau
+on1c
+oncat3
+on4cho
+5ond5ar
+ond5ent
+on3der
+on3dr
+on5dy
+o2ne
+4onea
+onec4r
+4oned
+on1ee
+on5ell
+o3neo
+on3ess
+on1et
+ong3at
+on4gu
+4onh
+4o1nia
+on5iar
+2oni4c
+onic5a
+onical4
+on4id
+on3ies
+on3if
+o5nig
+o1nio
+onk4s
+4onnes
+on5odi
+on5oi
+ono4mi
+4o5nomic
+ono3s
+o5nota
+ons2
+2ont
+ont5ane.
+on4ter
+onti5fi
+onton5
+ont4r
+on4tre
+on5ur
+o5nus
+onvo5lu
+on2z
+2oo
+oof3er
+oo1i
+ook3er
+ook3i
+oo4le
+ool5ie
+oo4m
+oon3i
+oo2p
+oop4ie
+o3opt
+oo4se
+oost5er
+oo2t
+oot3er
+ooz5er
+o1pa
+o4pab
+o5pali
+opa5ra
+opath5
+o5pec
+opens4
+op1er
+3opera
+4operag
+o1pha
+o4phe
+oph4ie
+o5phil
+op5hol
+o1phy
+ophy5la
+op1i
+op3ies
+op5ing
+o3p2it
+4opl
+oplast4
+o4poi
+opol3i
+opon4
+op5ony
+op5ori
+opoun4
+o2p5ov
+op2pl
+op5pli
+oprac4
+op3ran
+opre4
+opro4l
+op5rop
+op5so
+1op1t
+op2ta
+op1u
+o5quial
+or1a
+or5ado
+ora4g
+o5rai
+or5al
+4orals
+oram4
+oran3e
+orator5
+orb3in
+or4ch
+orch3i
+or4du
+2ore
+or5ead
+ore5ar
+ore5ca
+ore3f
+ore3g
+or3ei
+oreo5l
+or3esc
+ore3sh
+or3ess
+orest5at
+or5este
+or5ett
+ore4v
+5orex
+or4fr
+or5gn
+or1i
+4ori.
+or3ia.
+4orian
+ori4ci
+ori5cid
+orien4
+or3if
+5orig
+ori5ga
+ori4no
+4orio.
+or5ion
+4orios
+ork5a
+2orm
+orm1i
+or3n4a
+5ornis
+or3nit
+or3one
+o5roo
+or5ose
+or5oso
+or1ou
+orrel3
+orres3
+or4sc
+or4sey
+or4sti
+2ort
+ort3an
+ort3at
+ort3er
+or5tes.
+or3thi
+or4thr
+or4tit
+ort3iz
+or4tor
+or5tra
+ort3re
+4or1u
+or4un
+ory5p
+osa5i
+os3al
+osar5
+o1sc
+os4ca
+os4ce
+o2sch
+o4sci
+osclero5s
+o3sec
+osec3u
+ose5g
+os5enc
+osens4
+os5eo
+oser4
+o2set
+os5eu
+o3sia
+osi4al
+osi4an
+os5ide
+o3sier
+os5if
+os1in
+o4sis
+o5ske
+o5son
+o3soph
+os3opo
+4osp
+o3spec
+os1pi
+os4sa
+oss5ar
+os4sit
+4osta
+ost5age
+os4tar
+os5tee
+os5ten
+osten5t
+ost5ica
+os3til
+o5stome
+ost3or
+4osu
+os1ur
+2ot
+ot3a4g
+o5talit
+ot3am
+ot4anic
+o3tap
+ot4atio
+o5ta5v
+o3tax
+o4ted
+oter4m
+ot5esta
+4oth
+othalam5
+oth5erin
+o5therm
+otherm5a
+o5thor
+o5tia
+o5till
+5ot5iniz
+ot4iv
+o3tiva
+o5tivi
+o1t2o
+o5tone
+o4torn
+o4tou
+4o1tr
+oturi4
+oty3le
+o4u2
+5ou3a
+oub2
+ou5br
+ou5ca
+ou5co
+oud5i
+4oue
+ou3et
+oug4
+ou5ga
+ought5i
+ou5gi
+oul4t
+oult5i
+ou3m
+2oun
+oun2d
+ound5a
+ound5el
+oun5gin
+oun3tr
+oup5li
+our3er
+ou5san
+2ouse
+5ousia
+ouss4
+out5ish
+ouv5a
+ova3le
+o5var
+4ovati
+ov5eling
+o4ver.
+over3b
+over3s
+ov4ete
+ovid5en
+o1vis
+ovis5o
+o2v5os
+ow3ag
+ow3an
+o5way
+owd4i
+owd3l
+ow1el
+owel5li
+ow5ha
+owhith4
+ow1i
+ow5in
+owi5ne
+ows4
+ow5sh
+ow5sl
+ow5y
+o4x
+ox3i
+oxic5ol
+ox5o
+2oy
+oy5a
+oys4
+2oz
+o1zo
+ozo5i
+o3zyg
+4pa.
+pac4te
+pa5dou
+pad4r
+paes4
+pa3gan
+4pagat
+pag4ati
+pain2
+4pairm
+pa5lan
+pal3in
+pa3lo
+p4als
+pan5ac
+pan1e
+pan3i
+pa4pa
+pa3pe
+pap3u
+pa3py
+1par
+para5s
+par3l
+pa3roc
+pa3rol
+par5on
+1p4as
+pass5ive
+pas1t
+pas4tin
+pa3ter
+pati4n
+p5ato
+pat4ric
+pa5tricia
+5pau
+paul5e
+pau3p
+pa5vil
+5paw
+pawk4
+paw5ki
+2p1b
+p1c4
+p5d2
+2pe.
+pearl5i
+pe4co
+pec4tu
+2ped
+5ped3a
+3pede
+3pedi
+ped3is
+3peds
+pe2du
+p4ee
+pe2f
+4pele
+pe5leo
+pel5v
+pen4at
+5p4enc
+pend5er
+pen5dr
+pen4ic
+3p4enn
+pens5ati
+pen5u
+pe5on
+5perc
+percent5
+4pere
+perem5i
+p4eri
+5p4er3n
+p3eron
+per4os.
+per5tin
+pert5is
+per3v
+p4ery
+2pes
+pes4s3
+pes5til
+3pet
+pet5all
+pet3en
+pe2ti
+pet3r
+pe4wa
+4pex
+p1f
+p5g
+2ph.
+4phae
+pha5ged
+ph5al.
+ph2an
+phant5i
+phe4
+ph5esi
+ph3et
+3phib
+4phic
+1phil
+phi4n
+ph1is
+phi5th
+ph2l
+1pho
+4phobl
+4phoned
+3phor
+ph5oriz
+phos3p
+ph3ou
+3phra
+4phs
+1phu
+phu5i
+2phy.
+3phyl
+4pi.
+3piar
+4pica
+p5ical
+pi3co
+pi4cr
+pict4
+p2ie
+p4iest
+pi5eti
+p5ifie
+pig3n
+p2il
+3pile
+pill5in
+5pilo
+pi3lot
+pim2
+pin4e
+pin5et
+3pinge
+p4inn
+5p4ins
+3pi1o
+pip4a
+pi4pe
+5piq
+pir5ac
+pir4t
+p4is.
+p4isc
+pis2s
+piss5a
+pis5til
+pis4tr
+p2itu
+2p3k2
+p2l2
+1pla
+pla5no
+plant5er
+plas5tici
+pla5t4o
+4ple.
+4pled.
+3pleg
+3plen
+2ples
+4plism
+4plist
+plu2m
+plum4be
+plumb5er
+p4ly
+2p1m
+2pn
+pnos4
+1po
+4po.
+po3ca
+3pod
+4pof
+2p5oid
+pois5i
+po5lemic
+po4ly1
+poly3s
+poman5
+pom4e
+p4o2n
+pon4ac
+pon4ce
+pon4i4e
+3ponif
+pon5ta
+2pony
+po4pa
+po5ple
+4porato
+por3ea
+4pored
+pori4f
+por3p
+3port
+por5tie
+3p4os
+pos1s2
+po1te
+poult5e
+pound5er
+pout5er
+p5oxi
+5poy
+4p1p2
+ppar3
+pparat5
+p4pene
+ppet3
+pph4
+ppi4c
+p4pled
+p5pler
+p5plet
+ppress5o
+pprob5a
+1pr2
+prac1
+pra5d
+prar4
+4pre.
+preb3
+pre1d
+pref5ere
+prel5ate
+3prem
+pre5mat
+pren3
+pres3a
+pre5scin
+p3rese
+5pressi
+5prici
+pri4es
+4pri4m
+pring5er
+pring5i
+4prio
+p5riol
+pri4os
+pris5in
+priv2
+4priva
+4pro.
+pro3bo
+p3roc3a
+pro4ch
+pro1l
+pron4a
+proph5e
+propyl5
+pro3r2
+pros4i
+pros5tr
+pro3th
+4pry
+2ps2
+p3sac
+psal5t
+p3sh
+p1si
+p5sin.
+pso3m
+p1st
+psul3i
+3psyc
+2pt2
+pt3ab
+p4tad
+p4tan
+p2tar
+pt5arc
+p1ted
+p5tena
+pt5enn
+5ptery
+p5tet
+pt4ic
+p5tie
+p3til
+p2t3in
+pt4ine
+p3tise
+p5tisi
+p5tom
+p4tr
+p1tu
+pub1
+pu5be
+puc4
+puch4
+pudi4c
+pu5er
+puff5er
+pu4lar
+pu5lar.
+pu5lis
+p4u4m
+pum4o
+p4un
+pun4a
+3punc
+pun5gi
+pun3i
+pun2t
+pu3pi
+pur5b
+pur3c
+p4us
+push4ie
+pu3tat
+p5u5tis
+pu3tr
+4p1w
+2p4y
+py3e
+3pyg
+3pyl
+pyr3e
+py5t
+4qf
+qu4
+5quak
+4quar
+qua5tio
+2que.
+3quera
+4quere
+4ques.
+1quet
+5quina
+5quir
+3quito
+4quitu
+4ra.
+ra3ba
+5rabe
+3ra3bin
+r2abo
+ra3bol
+rac4a
+r2acu
+rac5ula
+ra5culo
+r2ad
+ra4de
+rad4ine
+rag5ou
+ra3gr
+3raill
+ra5ist
+4ralia
+ra3ly
+r5amn
+ra3mu
+r4andi
+ran5dish
+ran4du
+ra5nee
+ran4gen
+ra3nia
+ra3noi
+ran2t
+ran5ted
+5rantel
+rant5in
+rant5o
+rapol5
+rap5to
+4rarc
+rare2
+rar3ef
+rar5ia.
+ras2
+ras3c
+r2ase
+r4ask
+ra3so
+rass5a
+rass5in
+r4as5te
+ra5tap
+ra5tat
+rat5eu
+rath4e
+rat3if
+rat4in.
+ra5toc
+5ra5tol
+4r4atom
+ra4tos
+ra5tui
+rat5um
+rat3ur
+rav5ai
+rav5eli
+rav3it
+rawn4
+ra3zie
+r1b
+r2ba
+r4bag
+rb3ali
+rb1an
+rbar3
+r2be
+rbe5c
+r3bel
+rbel5o
+rb3ent
+r4bes
+rb2i
+rbic4
+rbic5u
+r2bin
+r5bine
+rbit1
+r2bos
+r4bum
+rbu5t4
+r1c2
+rcant5
+rca4s
+r4cele
+rcen5er
+rcen5tena
+r2ces
+rcha3i
+rch3al
+rch5ard
+rch5ate
+r3cheo
+r4cher
+rch4ier
+r4chin
+rch3is
+r3chit
+rcil4
+rci5nog
+rcis2
+rciz4i
+r2cl
+r4cle
+r5clo
+rcolo4
+rcrit5
+rcriti4
+rct4
+rc5ti
+r5dam
+r4d1an4
+rd4an.
+r2dar
+r5de4l
+r3dens
+r4des
+rd5ess
+rd5ian
+r4die
+r5dig
+rd2in
+rd3ing
+rdi3o
+rd1is2
+rd5ler
+rd3li
+r4dol
+rd5ous
+r2e
+4re.
+rea4
+r4ea.
+react5iv
+re3af
+re3ag
+re5alt
+re5amb
+re3ani
+re5ant
+re5asc
+reas3o
+r5eau
+3reav
+r5ebrate
+reb5uc
+re3cal
+rec4ce
+re3ce
+reced5en
+re3cha
+reci5si
+r4e1c2r
+rec4t3r
+re3cu
+2r4ed
+re1de
+re3dis
+re4dol
+re1dr
+reed5i
+ree3m
+3reer
+re2fe
+re3fin
+re5gali
+re5gra
+re3gre
+reg3ri
+re3gro
+reg3ul
+rei4
+re3if
+re1in
+re3is
+reit3
+reit4i
+re1la
+re1le
+4reled
+re3lia
+rel3ic
+re5lig
+reli4q
+rel3li
+r5em.
+rem5ac
+reman4d
+rem5ato
+r3emp
+rem5ul
+rena4
+ren5at
+r4endi
+rene2
+ren4es
+r4eni
+renic5
+ren4it
+ren4ter
+re5num
+re3oc
+3reog
+re5ola
+re3oli
+3reos
+re1pe
+re4per
+re5ph
+rep5id
+re3pin
+re3ple
+re4pre
+re1q
+rer4a
+rere4
+re5rea
+re3r2u
+2res.
+re3scr
+re3sel
+re3sem
+re3ser
+res5ist
+re5sit
+re3spe
+r3esq
+re5stal
+rest5er
+re5stu
+3retar
+re3ten
+re4t4er3
+re5term
+re1t2o
+re5ton
+re3tra
+re3tre
+re5tri
+re3tu
+re3un
+reur4
+re1v
+rev3el
+revi4t
+r1f
+rf4l
+rfu4m
+r1g2
+r4gag
+rgal4
+r2ge
+r5gee
+r4gene
+r3geo
+r3ger
+rg5li
+rgu5f
+rh2
+r5hel4
+rhe5ol
+rhos4
+3r2hy
+4ri.
+ri3am
+ri5ap
+2r2ib
+ri3bo
+rica5tu
+2rice
+rich5om
+rick4en
+r4icl
+ri5cli
+ri3col
+ri5cor
+ri4cra
+2ricu
+rid4al
+rid4e
+ri5el
+ri3er
+ri2es
+rift5er
+rif5tie
+5rifuga
+ri5gam
+rig5ant
+ri5l4a
+r4ile
+rill5er.
+rill5ings
+4rim.
+ri2ma
+rima4g
+rim5an4
+rim3at
+r4imb
+rimen4
+4rimm
+4rims
+rin4e
+r4inet
+ring5ie
+rink5er
+r4ino
+rin4s
+rins5i
+rin4t5er
+ri3o
+rio4g
+5rione
+ri4op
+ri5or
+ri5p2a
+ri5pie
+rip5lica
+ri5r
+ris4c
+ris4is
+r2isp
+ris4pa
+ris4pe
+ris5ter
+4risti
+ri3ton
+r5it5r
+r2i4v
+riv4al
+ri5vall
+riv5eli
+riv3en
+riv3il
+5ri5zo
+r1j
+r2k
+r5kas
+rk5ati
+r5kell
+rk5eni
+rk1er
+r3ket
+r3key
+r3kier
+r5kiest
+r5kin.
+r5kins
+rks4me
+r1la
+rlat3
+r1le
+r3l4ic
+r3line
+r5lins
+r4lit
+r1lo
+r3mac
+rma5ce
+r5mad
+r2mal
+r4manc
+r4mano
+r4mari
+r4mary
+rm4as
+r4m3ati
+rma5toc
+r5ma5tol
+rme2a
+r2mic
+rm4ica
+r5m2id
+rm4ie
+r5mig
+rmil5
+rmin4e
+rm3ing
+r4ming.
+r4mite.
+r3moc
+rmol4
+r1mu
+rmu3li
+r2n2
+rn3ab
+r3nac
+r5nad
+rn5ar
+rn3ate
+rn5atin
+rn5edl
+r3nel
+r3ness
+rn5est
+r3net
+r3ney
+r5nia
+rn5ib
+r3nic
+rn3in
+rn4ine
+r1nis
+rn3ist
+rni5v
+rn3iz
+rn5n
+r3noc
+r5nog
+rnt4
+rnuc4
+r5nut
+4ro.
+ro4be
+rob3le
+ro5br
+5rocc
+ro3cu
+r2od
+ro3do
+rody4n
+ro1fe
+ro3gn
+4roi
+ro3ic
+roid3
+ro3la
+r4oled
+rol5ite
+ro3ly
+romant4
+ro5mel
+ro3mit
+romolec5
+rom4p
+ro3mu
+ron4ac
+4ronal
+ro5nate
+ron5ch
+ron4do
+rong5i
+r5onme
+ro1no
+ron4ton
+roo4
+1room
+5root
+r2op
+4rop.
+ro3pel
+rop4ine
+r4opr
+r5opte
+ror5d
+4rore
+r4osa
+rosi4a
+ro5sol
+4ross
+ro5stat
+ros4ti
+ros5tit
+ro3tat
+ro1te
+ro4ter
+ro3tu
+5roue
+roul3
+round5er
+rou5sel
+4rouss
+r4out
+r4ow
+row3er
+4rox
+rpass5in
+rp3at
+rpe2
+r3pent
+rp5er.
+r2ph
+rph5e
+r3phol
+rp3ing
+rp5is
+rpol3a
+r2p5ou
+rpre4
+rpret5er
+r3pu
+r1q
+4r1r4
+rra4h
+rran5gi
+rrap4
+rre2l
+r4reo4
+rrhe3
+r3ri
+rric4
+rricu4
+rri4fy.
+rrin5ge
+rri4os
+rrob3
+rrog5
+rro4t
+r5ru
+rry5
+r3ryi
+r3rym
+2r1s2
+r4sag
+r2sal
+r5salis
+r5saliz
+r2san
+r4sar
+r2se
+r3sea
+r3sec
+rsel4
+rsell5
+rs3er.
+rs3ers
+r3set
+r3sha
+r3shi
+r4shie
+r5si2a
+rs3ib
+r5sie
+r4sil
+rs3ing
+r3sio
+r4sit
+rs3iv
+rs5li
+rstor4
+rstrat4
+r3su
+r4sus
+rswear4
+rt2
+rt3ab
+rta4g
+rt3age
+r3tar
+r4tare
+rt3c
+r1ted
+r4tedl
+r3tel4
+r5tend
+rt3eni
+r5terer
+r5tet
+r5teu
+r4thene
+rth2i
+rth5ing.
+rth3ri
+r1t4ic
+r4ticl
+r5tiet
+r5tila
+r5till
+rtil5le
+rt5ily
+r2tin
+r3tina
+rt3ing
+r3titi
+rti5tu
+rt3iv
+r2tiz
+rt5let
+rt3li
+r1t4o
+rto5l
+rt5rid
+rt5si
+r1tu
+r4tus
+rtwis4
+ru3a
+r4ube
+rub3r
+ru4ce
+r2ud
+rue4l
+r4uf
+ru3in
+ruis5i
+ru2l
+r4ume
+r4umi
+ru4more
+run4cl
+runcu4
+runcul5
+run2d4
+run2e
+ru5net
+run4g
+run4t
+ru2p
+rup5lic
+ru3pu
+rur4i
+rus4p
+rust5at
+rust5ee
+rus5tic
+rus4t5u
+ru3tal
+ru3ti
+r1v2
+r4vanc
+r2ve
+rvel4i
+r3ven
+rven4e
+rv5er.
+rv5ers.
+r3vest
+r3vet
+r3vey
+rvi4t
+r1w
+2r2y
+ry5er
+5rygm
+ry4go
+rym4b
+3ryngo
+4ryngol
+ryp5a
+ry2t
+ryth4i
+r2z
+2sa.
+2sab
+s3abl
+5sack
+sac4q
+s3act
+sac4te
+sad5i
+sad5o
+5sae
+sa4g
+3sai
+sain4t
+5sak
+sa2l
+sa5lac
+3sale
+sa3lie
+s4al4t
+sa3lu
+sa4m
+sa5min
+sam5o
+samp4
+san3a
+san4ded
+s4an4e
+san5gar
+san5if
+2sant
+sant5ri
+s3ap
+sap3r
+sar5s
+3sas.
+sas3s
+sassem4
+s2a1t
+sa2te
+s5ativ
+s5atory
+sat1u
+1sau
+sau5ci
+saur5
+savi2
+sa3vou
+4s3b
+s4bei
+sbe4s
+sby3
+sc2
+s1ca
+sca5len
+sca2p
+scar4c
+scav3
+s1ce
+s4ced
+4scei
+4s4ces
+sch2
+scid5
+s2co
+scof4
+s4coi
+3s4cope
+5scopic
+5scripti
+2s1cu
+4scura.
+4scuras
+2s1d2
+2se.
+se2a
+s4eam
+seas4
+sea3w
+sec4a
+sec5an
+se2co
+secon4
+2sed
+se4da
+sed4it
+3seed
+3sei
+sei3g
+5sela
+4sele
+se3lec
+selen5
+5self
+2s4eme
+sem2i
+semi5d
+sem4o
+sen5g
+3sens
+sen5sati
+sen5sori
+sent5ee
+5sentm
+seo5log
+se2p
+sep3a
+sep4si
+3sept
+sep3ti
+ser4an
+se5rene
+ser4to
+4servo
+s2es
+4ses.
+se5sh
+s5esta
+1set
+5seum
+3sev
+sev3en
+sewo4
+3sex
+sexo2
+3sey
+2s1f
+sfact5o
+sfi4
+sfor5e
+sfran5
+2s1g4
+s2h
+4shab
+sh4abi
+sh1er
+sh5et
+shil5li
+sh5iness
+sh3io
+5ship
+s3hon
+4shu4
+shys4
+si4all
+siast5
+4s1ib
+s3icat
+3sicc
+2s5icl
+si4cu
+si5cul
+s4id
+4sid.
+si4de
+side5l
+sid3en
+sid5eri
+4sids
+5sid5u4a
+si4ers
+sif4
+sif5f
+si4g
+1sili
+sim4ply
+2sin
+s2ine
+sin5et
+5sing5er
+sin3i
+5sink
+si5nol
+si3nus
+1sio4
+4sio.
+si5o5s
+3sip
+si4pr
+s1is2
+4sish
+4sism
+sist3a
+sist3o
+s1it
+si4te
+sit5om
+4s1iv
+5siva
+s1j
+s2k2
+4sk.
+s5kar
+ske2
+s3ket
+s5key
+s3kier
+s5kiest
+sk5ily
+sk5ines
+4sks
+sky3l
+2sl4
+slang5i
+s1lat
+3slau
+slav5eri
+s2le
+s5lea
+s3let
+s5ley
+s3lit
+slo3c
+slov5
+s5luc
+2s1m4
+s3man
+smas4
+s3men
+smi3g
+3smith
+smo4d
+smu5tatio
+s1n2
+s2na
+2so.
+2s3od
+sod3o
+sody4
+3soe
+4s3oid
+s2ol
+sol3a
+so5lan
+sol4er
+so3lic
+3solve
+solv5er
+1so2m
+soma5to
+3some.
+so5mete
+so3mo
+s2ona
+son5at
+s4one
+son5or
+s2o2p
+4sor3ie
+5sorio
+sor4it
+s5oriz
+sor3o
+s3ory
+sos4
+4sose
+so5th
+3sou
+sov5e
+so3vi
+spast4
+spens5a
+4speo
+3sperm
+s5pero
+spers5a
+sph2
+s3pha
+3spher
+spic5ul
+s2pid
+sp5id.
+s5pier
+spil4l
+s2pin
+sp3ing
+spi5ni
+spital5
+s1pl
+sple2
+s4ply
+s2po
+5spom
+spon5gi
+3spons
+3spoon
+spru5d
+s4py
+s1r
+sre2
+sreg5
+srep5u
+sre4s
+4ss
+s1sa
+s5sam2
+s1sel
+s5seng
+s3sent
+ssent5er
+ss3er.
+s5seri
+ss3ers
+s5seu
+ssev3
+s3sia
+s1sic
+s1sif
+ss1in
+ss4in.
+s4sine
+ss4is.
+s3s2it
+ss4ivi
+ss5li
+ss3m
+s4sn
+s1so
+ssol3u
+ssolu4b
+s4sore
+ssor5ial
+ss5po
+s1su
+ss3w
+st2
+4st.
+stab2
+sta3bi
+4stak
+s4tale
+stant5iv
+s3tas.
+5static
+st3c
+ste2
+ste5ar
+ste5at
+s4teb
+s4tec
+4s1ted
+s4tedl
+s4tedn
+4stere
+ster4ia
+s4tern.
+s3tero
+st5est
+s1th
+s4tha
+s4thu
+s3ti3a
+3stick
+s3ticu
+stil5ler
+s4tily
+st3ing
+5s4tir
+s5tiz
+4stl
+st3ler
+st3li
+s4toe
+3ston
+stone3
+ston4ie
+s5torat
+stor5ian
+s4tose
+s2tou
+s4tray
+stre4
+strep3
+3struc
+stru5d
+2st3s
+s1tu
+s4tud
+stu4m
+stur4e
+4stw
+s4ty
+1styl
+4su.
+su5an
+su4b1
+subt2
+suct4
+sud4a
+su3et
+suf3f
+sug3
+3sui
+sui5c
+su5ing
+1s2ul
+s4u2m
+sum3i
+sun4a
+su5pe
+su3pin
+supra3
+sur4as
+sur3c
+s4urg
+sur3pl
+su5su
+su5z
+2s3v
+svers5a
+sves4
+svest5i
+sw2
+5swee
+swell5i
+4swered
+2swo
+s2y
+4sy.
+sy4bi
+sy1c
+sy4ce
+sy4chr
+sy4d
+1syl
+3syn
+syn5e
+sy5pho
+syr5i
+2ta.
+2tab
+ta5blem
+3tabli
+t2abo
+ta3bol
+ta4bou
+t4a3ce
+ta5chom
+ta3chy
+ta4cid
+t5ade
+tad4i
+5t2adj
+ta5dor
+tad2r
+tae5n
+taf4
+tage5o
+ta5gog
+3tagr
+3tah
+1tai
+3tail
+2tair
+t4ais
+1tak
+tal2c
+tal5ent
+ta5lep
+t4alia
+t4alin
+tal4l3a
+5tallu
+t2alo4
+ta3ly
+tam5ari
+5ta3met
+tamorph5
+tan5at
+tand5er
+t4ane
+5tanel
+tan5ie
+t5aniz
+tant5an
+ta4pa
+1tard
+tar5ia.
+tark5i
+tar3n
+3tarr
+tas3i
+t3asm
+5tass
+tas4t
+ta3sta
+tast5i4c
+t4ateu
+3tatis
+t4ato.
+tat4ou
+tat4r
+tat3ut
+tau3to
+t5awa
+tawn4
+t4ax
+4t3b
+2tc2
+t1ca
+tcas4
+tch5ett
+tch5u
+4t1d4
+4te.
+te5cha
+5techn
+te3cr
+t4ed
+te5d2a
+4tedd
+4tedo
+4teei
+te2g
+5tegic
+t3ego
+teg1r
+teg3u
+tei4
+te2l
+4teled
+tel5iz
+1tell
+4te3lo
+3tels
+tem3a
+4teme
+te5mon
+ten4ag
+4tenar
+4tene
+t5enm
+5tenna
+4teno
+te5nog
+tent4a
+te2o
+teo5l
+2tep
+te3pe
+tep5i
+tera4c
+t4erag
+t4erato
+3ter3b
+5terd
+2tere4
+ter3eb
+ter5ec
+5terel
+te3reo
+3teres4
+1teri
+ter3ia
+ter5id
+ter5if
+t4erin
+ter5iorit
+ter3it
+ter5k
+5ternit
+ter5no
+3terr
+2t2es
+4tes.
+tesi4
+t3esq
+t3ess.
+t5esses
+tes4t
+test3a
+5teste
+test5er
+test5in
+test5or
+tes5tu
+teti4
+tet1r
+tetr5o
+tew3ar
+3tex
+2t3f
+t3g
+2th.
+tha4
+th5al.
+thal3m
+4the.
+4thea
+th5eas
+4thed
+1thei
+3theo
+theo3l
+t4her
+5therap
+th5erc
+t5herd
+4thered
+th3ern
+th3ery
+4thi.
+t5hill
+3think
+5th4io
+th4is.
+th5lo
+2thm2
+th4mi
+th3oli
+4t5hoo
+4thopt
+4thores
+3thot
+5thoug
+1th2r
+2ths
+5thur
+5thym
+3thyr
+thys4
+4ti.
+1ti2a
+ti3ab
+2t3ib
+5ti5bu
+t1ic
+t3ic.
+tic5as
+t2ici
+tici5ar
+3ti3cin
+t4icity
+ti3col
+tic1u
+4ticule
+t3id.
+t4ida
+3tidi
+ti3die
+t5ids
+3ti2en
+1tif2
+ti3fe
+4tiff
+4tific.
+3tigi
+tigi5o
+4tigm
+5tigu
+ti4ka
+ti4let
+5tilin
+t4ill
+til4l5ag
+t4ilt
+1tim
+tim1a
+5timet4
+t1in
+5ti5nad
+4tined
+tin3et
+ting5ing
+3tinn
+4tins
+t4int
+tin4te
+tin5ted
+tint5er
+tin3ue
+1tio
+ti3oc
+tiol3a
+ti5omo
+4tionem
+1tip
+ti5plex
+ti3pli
+ti4q
+ti5qua
+t3iris
+2t1is
+3tisan
+tis4c
+tish5i
+3tiss
+tis2t
+5t4iste
+t4istr
+ti5t4an
+tith4e
+tit5il
+t3itis
+3titl
+ti3tra
+3tiu
+2t1iv
+tiv5all
+t3ive
+tiv3is
+2tl
+t1la
+tlant4
+5tleb
+5tledr
+3tlef
+3tlem
+5tlen
+5tletr
+5tlew
+t1li
+tlin4
+4t3m
+tmet2
+tmo4t5
+2t3n2
+t4nere
+2to.
+toas4
+to1b
+4tocc
+tode5c
+tod4i
+to5do
+3toe
+1tog
+2t3oid
+5tok
+4toled
+tol4l
+tolu5
+to5ly
+tom3ac
+toma4n
+tomat5ol
+tom4b
+to4mog
+tom5os
+ton4e
+ton5ea
+3tonn
+ton3s
+top4e
+to5pia
+to4pos
+t1or
+to5rad
+4tore
+tor5er
+tori4as
+tor5oi
+tor5p
+tor4q
+3tos.
+to3s4p
+tos4t
+to5str
+to5talis
+to5taliz
+to3tem
+tot5u
+tou4f
+5tour
+t3ous
+4tov
+to3war
+t3p
+tr2
+tra4co
+4tradd
+4traist
+tra5q
+trarch4
+tra5ven
+tra5vers
+trav5est
+3tray
+4tre.
+4tred
+tre4mo
+tren4
+trend5i
+tre5pr
+tres4s
+4trew
+t5ricl
+3tricu
+t2rie
+tri5fli
+trifu5ga
+2tril
+tri3li
+tri3me
+t2rit
+4trix
+t4rod
+tro5f
+5troop
+tro4pha
+tro3sp
+t2rot
+t5roto
+tro1v
+3troy
+t4ruc
+tru3i
+2t4ry
+trys4
+4t1s
+t2sc
+ts4h
+ts2i
+t4sil
+tstay4
+2t1t4
+tta4
+t3tab
+t5tan
+t5tas
+t3ted
+t4tere
+t5terer
+t5test
+t3ti
+tti3tu
+ttitud4
+ttitu5di
+t3tler
+t3tli
+t5toi
+t5tor
+t3tos
+tt5s
+t4tupe
+t2ty
+4tu.
+tu1a
+tu4al5li
+tuari4
+tu4bin
+tu5bu
+tu5den
+tud5ie
+tu5en
+4tuf
+tu1i
+tu4is
+2tum.
+3tumi
+4tums
+3tun
+tun4a
+tu4ne
+tun5it
+tup5let
+tup5lic
+tu5rac
+t4uran
+turb3a
+tur4d
+turf5i
+5turit
+tur4n
+5tur5o
+1tut
+4tut4iv
+t1w
+t3wa4
+t2wi
+twi5li
+t3wit
+t3wo
+twon4
+4ty.
+ty4a
+5tych
+ty4let
+tyl5i
+ty5mi
+1typ
+3type
+1tyr1
+2tz2
+t5zia
+t5zie
+2ua2
+ua3ci
+u2ag
+ua5h
+u1al
+ua5lu
+uan4o
+uant5is
+uant5it
+uar3a
+uar2d
+uar3i
+uari4n
+uar5ters
+uar4t5i
+ua5tern
+uba4
+ub5bly
+u1b2i
+u4bicu
+ub3lin
+ub5lo
+ub3ra
+4uc
+u1c2a
+uccen5
+u4cend
+u4ch
+u5chr
+uc3l
+u4com
+uco5t
+uc2tr
+uc3ub
+uc5ul
+u5cum
+u5dac
+ud1al
+ud4e
+ud5ep
+u4der
+udev4
+ud4g
+udi4cin
+ud3ied
+u5dinis
+udi3o
+u5ditio
+u2do
+u5doi
+ud5on
+u5dor
+ueb4
+u4ed
+uen4o
+uen4ter
+uer3a
+ues4s
+uest5rat
+ues5tri
+ue4t
+uf2
+3ufa
+u3fl
+u4fo
+uft4
+uga4c
+ug5lif
+ug2ni
+u4go
+ug3ul
+ug3ura
+uhem3
+2ui2
+ui3al
+u2ic
+uicent5
+uid5o
+uil4a
+uild5er
+ui3lib
+uil4t
+uinc5u
+uin4s
+uint4
+uin4ta
+ui5pr
+uis3er
+uis4t
+uisti4
+uit5er
+ui5val5
+ui3vo
+u2iz
+4ul.
+u1la
+u4lab
+4ulac
+ul5ard
+u5lat
+ul4bo
+ul3ca
+ul4ch
+5ulche
+5ulchre
+4ulea
+u5lee
+u1len4
+4ulenci
+u5lent
+ulet4
+ul4ev
+ul2fa
+ul2i
+ul4ia
+u3line
+ul3ing
+ul5ish
+u5liti
+u5lity
+4ull
+ul4lat
+ul4l5ib
+ul4lis
+ul4lit
+ul3m
+u1lo
+u5lom
+ulph3i
+ulph3o
+ulp5ing
+ul4po
+2uls
+ul3sif
+u1lu
+ul1v4
+u1ma
+um3am
+umar4
+u5mas
+um4bar.
+um2bi
+umen4t
+u1mi
+u4mic
+u2m5if
+umi4fy
+umi5lia
+umin4ar
+u4mined
+u4m3ing
+u4mora
+u4mos
+um2p
+um4pa
+ump3er
+ump5li
+umpt4
+ump5te
+u1mu
+umu4lo
+un1
+u4n3a4
+un5ab
+unabu4
+un4ae
+un4as.
+un2ce
+un4dal
+un3ded
+unde4t
+undeter5m
+undi4c
+un4die
+un3do
+un4dus
+u3n2er
+unho5li
+un2i
+u1nic
+un4ie
+un3in
+un4ine
+uni5p
+uni3so
+un3ist
+uni1v
+un3iz
+unk5eri
+un5ket
+un3kn
+2unn
+un4nag
+un5o
+un5r
+un3s4
+un5sh
+un2ti
+until4
+unu4
+un3us
+uo3de
+uodent4
+u5oros
+u3os
+uo5tatio
+u1ou
+2up
+u1pat
+u1pe
+u5pee
+uper3
+u1ph
+u5pid
+up3ing
+u4po
+u5pol
+u2pr
+upre4
+u5quet
+u4r
+ur1a
+4ura.
+ura4ci
+4urae
+ura2g
+4uranti
+uras5
+urb5ing
+ur2c
+urc3a
+ur5den.
+ur5deni
+ur5die
+ur4du
+ur3ea
+ur5ee
+ur1er
+ur3ers
+ur1e2t
+ur3ett
+ur2f
+ur3fa
+ur1i
+u5ri5cu
+ur4ie.
+ur5ifie
+uril4
+ur4ili
+ur5ion
+uri4os.
+url5er
+ur5lie
+url5ing
+ur1m4
+urn3al
+urn3er
+urn5s
+ur1o
+uro4d
+ur5o4m
+ur5ot
+uroti4
+urpen5t
+urph4
+ur2s
+urs5al
+urs5er
+ur3sh
+urs3or
+ur5ta
+ur1te
+ur5tes
+urth2
+ur3the
+urti4
+ur1u
+ur4va
+u3sad
+us3ag
+us3al
+us4ap
+us3at
+2usc
+us4can
+ush5a
+us5ian
+usil5
+u4s1in
+usk5er
+us1p
+us4pa
+uss4e
+4ust
+us3tac
+us5tan
+ust4ic
+us5tici
+ust5ig
+ust3il
+us1to4
+us1tr
+us4tre
+usur4e
+us5uri
+u3tane
+utch4e
+ut5eni
+u5teo
+u4tere
+ut2i
+u3tie
+ut3ing
+u5tini
+u3tio
+ut5ism
+ut3ist
+5u5tiz
+ut3le
+utli4
+ut2o
+u4to5s
+u4t1ra
+uts2
+ut5sm
+ut4tone
+u3tu
+u4tul
+uu4
+uv2
+u4va
+uve2
+uven3
+uv5eri
+u5vin
+ux2o
+uy4a
+uy5er
+4va.
+2v3ab
+5vac
+va1ca
+va5ceo
+vacu1
+v4ad
+3vag3a
+va4ge
+4vaged
+vager4
+vag5r
+v1al.
+1vale
+vali2
+va5lie
+val4ise
+5valu
+5val4v
+vam4i
+va5mo
+5vann
+vanta4
+4vantl
+var4is
+4vase
+vas5el5
+v5a4so
+vast3a
+v4at.
+5vatee
+vat4ina
+4vatu
+2ve.
+vect4
+ve3g
+3vei
+2vel
+vel3at
+4vele
+v3eler
+ve5line
+v1ell
+v4ella
+vel5ler
+vel3li
+vel5opi
+ven4al
+ven4do
+ve1ne
+ve5nia
+vent5o
+ven4tr
+4venu
+v5en5ue
+5ve3o
+5verb
+verde5v
+4v4ere4
+ver5ea
+ver3ei
+v5erie
+ver3m4
+ver4ne
+5verse
+4ves.
+4vi.
+5vialit
+vi4atr
+vi1b4
+vic2
+vi4ca
+vi5cari
+vice3r
+5vict2
+5vicu
+5vider
+vign3
+vi4l
+vil3i
+3vili4a
+v5ilise
+v5ilize
+vil5lin
+vim4
+5vime
+2v1in
+vin4ac
+3vinci
+vin2e
+5vinit
+v5iniz
+vint4
+vin5ta
+3vi1o
+viol3
+vi5om
+5vi3p
+vire4
+vi5rid
+vir3u
+5visecti
+5visio
+v3ism
+2v5ist
+vi2t
+vit2a
+vi3tal
+vi5tel
+v5itie
+vit1r
+vi3tu
+v3ity
+viv5al
+viv5or
+vi5zo
+1vo
+2vo.
+vo2l
+vo5litio
+vol4ubi
+volv4
+4von
+vo5rac
+3vorc
+4vore
+3voro
+vo3tar
+2vow
+vr4
+v5ra4
+v5ri
+v5ro
+vrot4
+4vs
+v3ure
+2vv2
+v5ver
+v5vi
+4vy
+4wab
+wag3o
+wais4
+w3al.
+wall5er
+w3als
+wan5gli
+wank5er
+war5ded
+ward5er
+ward5r
+war4f
+war4te
+war5thi
+wass4
+was4t
+wa1te
+wav4ine
+w1b4
+w4bon
+w5c
+w5die
+w3dr
+we4b
+w4ed
+3weed
+5wei
+weight5i
+weir4
+wel3i
+weliz4
+wel4izi
+wel4li
+went4
+wes4
+west3
+w5est.
+w5f
+wh2
+w5hid
+wi2
+wid4e
+wi5er
+will5in
+wim2p
+win2e
+wing5er
+win4tr
+3w4ise
+with5eri
+w3la
+wl1er
+wl1i
+wl4ie
+w1m
+1wo
+wol4
+wol5ver
+3wom
+won2t
+word5i
+wotch4
+woun4
+wp5in
+wra4
+ws5ing
+w5ster
+wt4
+w5te
+w3to
+wy2
+wz4
+x1a
+x4ach
+x4ade
+x2ag
+x3agg
+xa5met
+x3ami
+xan5d
+xano4
+x2as
+xas5p
+x3c4
+xcav3
+xcor5
+xe4
+x1ec
+xec3r
+xe5cutio
+xecut5o
+xe2d
+x5edl
+x5edn
+x5eg
+x1em
+x3en
+xen4op
+x3er
+xer4g
+xer3o
+x1h
+xhort4a
+x1i
+x3ia.
+x4ias
+xi4c
+x5ige
+xim3a
+x4ime
+ximet4
+x3io
+xi4p
+x4it.
+x4its
+x1o
+x4ode
+x5om
+xo4mat
+xo4n
+x4os
+xotrop4
+x3p
+xpel4
+xpo5n2
+xpoun4
+x1s2
+x1t2
+x4ted
+xtens5o
+xter3i
+xter4m3
+xtern3
+x4th
+xti4
+xtra5d
+xtra3v
+xtre4
+xu4o
+x1ur
+xur4b
+x5us
+x5w
+xx4
+xys4
+xy3t
+y1a2
+y5ac
+1y2ar
+3yard
+yas4i
+4y1b
+yb2i
+yca5m
+y5chede
+ych5is
+y3cho
+y4chose
+yc1l
+yclam4
+y4coli
+y4coll
+ycom4
+y2cos
+y1d4
+yda4
+yder4
+ydro5s
+y4drou
+y3ee
+yel5o
+y3en
+y1er
+y3est.
+yes5te
+y5ett
+y5f
+y1g
+ygi2
+ygi5a
+y3gl
+ygo4i
+y1h
+y1i
+y3in
+yle2
+ylin5de
+yllab5i
+yl3os
+yl5ou
+y1me4
+y3men
+y5met
+y5mia
+ym5in
+ymot4
+ym4pha
+yn1
+ynago4
+ynand5
+yn5ap4
+yn5ast
+yn4ci
+ynd4
+yn2e
+yn3er
+yng4
+yn4gol
+yni4c
+yn4y
+y1o2
+yo3d
+yo4gis
+youn4
+young5
+2yp
+yp5al
+yper3
+y5pere
+y4peri
+y4pero
+y4pet
+y2ph
+yph4e
+yph3i
+y4p1i
+yp1n
+ypo1
+y4pox
+y2pr
+yp5ri
+yp4si
+yp5syf
+ypt3a
+y5pu
+y3rag
+yr3at
+yr3ic
+y5rig
+yr3is
+yr3i4t
+yr5olo
+yr4r
+yr4s
+yr5u
+4y2s
+ys5ag
+ys5at
+y3s2c
+y3sh
+ys1ic
+ys3in
+ysi4o
+yso5
+ys4so
+ys1t
+ys4to
+y3u
+yv4
+y3w
+yz5er
+yzy4
+z1a1
+2za.
+za4bi
+za2i
+z4as
+za4te
+zd4
+zeb4
+ze4d
+zen4a
+z5eng
+zer5a
+z3et4
+z1i
+zib5
+5zic4
+z2ie
+zi5m
+zin4c3i
+z3ing
+zing5i
+z4is
+3zlem
+z3ler
+z3li
+4zo.
+5zoa
+zo3an
+3zoo2
+zo3ol
+zo3on
+zo5op
+zo5oti
+zo5p
+zot2
+z5s
+5zum
+4zy.
+zz2
+z3zar
+z5zas
+z3zie
+zzo3
+z5zot
diff --git a/hyph/finnish.lh b/hyph/finnish.lh
new file mode 100644
index 0000000..4fcd4b6
--- /dev/null
+++ b/hyph/finnish.lh
@@ -0,0 +1,286 @@
+Lout hyphenation information
+%
+% Created by Jeff Kingston 19 April 1994 from a TeX hyphenation
+% patterns file with the following header comment:
+%
+% fhyphen.tex for TeX 3.0 (-jme)
+%
+% Needs to be changed when the new fonts will be generated!
+%
+% ----->  Finnish hyphenation patterns for MLPCTeX  <------
+% First release January -86 by Kauko Saarinen,
+% Computing Centre, University of Jyvaskyla, Finland
+%
+% Completely rewritten January -88. The new patterns make
+% much less mistakes with foreign and compound words.
+% The article "Automatic Hyphenation of Finnish"
+% by Professor Fred Karlsson is also referred
+%
+% ftp'ed from tukki.jyu.fi by Sverre Slotte July 4 1991
+% changed ^^84 to ä and ^^85 to ö
+% ---------------------------------------------------------
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+äÄ
+öÖ
+
+Patterns:
+1be
+1bi
+1bo
+1bu
+1by
+1da
+1de
+1di
+1do
+1du
+1dy
+1dä
+1dö
+1fa
+1fe
+1fi
+1fo
+1fu
+1fy
+1ga
+1ge
+1gi
+1go
+1gu
+1gy
+1gä
+1gö
+1ha
+1he
+1hi
+1ho
+1hu
+1hy
+1hä
+1hö
+1ja
+1je
+1ji
+1jo
+1ju
+1jy
+1jä
+1jö
+1ka
+1ke
+1ki
+1ko
+1ku
+1ky
+1kä
+1kö
+1la
+1le
+1li
+1lo
+1lu
+1ly
+1lä
+1lö
+1ma
+1me
+1mi
+1mo
+1mu
+1my
+1mä
+1mö
+1na
+1ne
+1ni
+1no
+1nu
+1ny
+1nä
+1nö
+1pa
+1pe
+1pi
+1po
+1pu
+1py
+1pä
+1pö
+1ra
+1re
+1ri
+1ro
+1ru
+1ry
+1rä
+1rö
+1sa
+1se
+1si
+1so
+1su
+1sy
+1sä
+1sö
+1ta
+1te
+1ti
+1to
+1tu
+1ty
+1tä
+1tö
+1va
+1ve
+1vi
+1vo
+1vu
+1vy
+1vä
+1vö
+% ------- Some common words borrowed from other languages -------
+% ------- This part could be updated from time to time    -------
+%
+st2r 1st2re % -stressi, -strategia etc.
+%
+%  ------ Some special cases occuring with compound words only ----
+%  ------ There still remains well known problem as 'kaivos\-aukko' etc.
+a1y2
+y1a2
+y1o2
+o1y2
+u1y2
+y1u2
+ö3a2
+ö3o2
+ä3a2
+ä3o2
+ä1u2
+ö1u2
+a1ä2   
+a1ö2
+o1ä2
+o1ö2
+u1ä2
+u1ö2
+%    lyhyt/pitka -vokaalipareja, tavallisesti sanarajalla
+aa1i2    % maa-ikkuna
+aa1o2    % maa-ottelu
+aa1u2    % uraa-uurtava
+ee1a2    % tee-astia
+ee1i2    % tee-istutus
+ee1u2    % varietee-uusinta
+uu1e2    % puu-esine
+uu1o2    % puu-osa
+uu1i2    % puu-istutus
+a1uu     % kala-uuni
+i1uu     % ravi-uutiset
+e1uu     % virhe-uutinen
+o1uu     % radio-uutiset
+ai1ui    % maanantai-uinti
+i1eu     % keski-eurooppalainen
+%          vokaalikolmikkoja etc.  yhdyssanojen rajoissa
+io1a2
+io1e2
+e1ö2
+ö1e2
+.ä2     % don't hyphenate  ä-lyllinen etc.
+%
+% The following patterns contain no general scientific rule. They
+% are selected more or less intuitively to solve problems
+% with common and frequently appearing compound words.
+% However, every pattern resolves more than only one
+% hyphenation problem.
+%
+yli1o2p     % yli-opisto etc.
+alou2s1
+keu2s1      % oikeus-oppinut etc.
+tasau2s1    % tasaus-ennakko etc.
+rtau2s1
+2s1ohje     % -sohjelma   etc.
+2s1a2sia    % nais-asianainen etc.
+1a2sian     % neuvottelu-asian  etc.
+1a2siat     % koti-asian  (ei kotia-sian)
+1a2sioi     % talous-asioita etc.
+r2as l2as   % tikku-rasia  etc
+2s1o2pisk   % xs-opiskelija  etc
+2n1o2pet
+2s1a2loi
+2n1o2pist   % kansan-opisto etc.
+2s1o2pist
+2s1o2sa     % xxs-osakas etc.
+2n1o2sa     % asian-osainen etc.
+alkei2s1
+peru2s1
+2s1i2dea. 2s1i2dean
+2s1e2sity    % xs-esitys etc
+2n1e2dus     % kansan-edustaja etc.
+2s1ajatu     % -ajatus etc.
+2s1ase
+2s1apu
+2s1y2rit     % yhteis-yritys etc.
+2n1e2nerg    % ydin-energia etc.
+2s1y2hti
+2n1otto 2n1oton
+2n1anto 2n1anno
+2n1a2jan 2n1aika
+2n1o2mai
+2n1y2lit
+2s1a2len
+2n1a2len
+1a2siaka2s1
+ulo2s1        % ulos-ajo
+2n1a2jo       % kiven-ajo
+2s1a2jo
+%
+% *** The following rules may be used on user's responsibility ***
+% *** for example, may be needed with narrow columns           ***
+%       >>>>>>>>>>>  a1e a1o e1o o1a u1a  <<<<<<<<<<<
+%
+% ----- Some districting rules by Professor Fred Karlsson's ideas   ------
+%
+b2l 1b2lo bib3li
+b2r 1b2ri 1b2ro 1b2ru
+d2r 1d2ra
+f2l 1f2la
+f2r 1f2ra 1f2re
+g2l 1g2lo
+g2r 1g2ra
+k2l
+1k2ra 1k2ri
+1k2v 1k2va
+p2l
+p2r 1p2ro
+c2l
+q2v 1q2vi
+sc2h ts2h
diff --git a/hyph/french.lh b/hyph/french.lh
new file mode 100644
index 0000000..442de83
--- /dev/null
+++ b/hyph/french.lh
@@ -0,0 +1,1377 @@
+Lout hyphenation information
+%
+%  Created by Jeff Kingston, 19 May 1996, from a TeX
+%  hyphenation file.  Apart from commenting out things that
+%  are not relevant to Lout I have made the following changes:
+%
+%  (1)  I have guessed that \c c means ccedilla, and I have changed the
+%       only line containing it from 1\c c to 1\cc, and informed Lout that
+%       \cc is the code for ccedilla.  The change is because Lout does not
+%       expect to find spaces in the middle of hyphenation patterns.
+%
+%  (2)  I have deleted the following lines since I am unsure what to do
+%       about \oe (it is not an ISO-LATIN-1 character):
+%
+%         1c\oe0 % final zero essential to terminate cs
+%         .d\'e2s1\oe0 % final zero essential to terminate cs
+%         1m\oe0 % final zero essential to terminate cs
+%         1n\oe0 % final zero essential to terminate cs
+%         1s\oe0 % final zero essential to terminate cs
+%
+%  In other respects this file should faithfully reflect the original.
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;|<,.>?/0123456789
+'
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+\`a\`A
+\^a\^A
+\cc
+\`e\`E
+\'e\'E
+\^e\^E
+\^\i\^I
+\"\i\"I
+\^o\^O
+\^u\^U
+
+Patterns:
+% f7hyph.tex % French hyphenation patterns (7-bit OT1 encoding)
+% f7hyph.tex is ONLY for people having a MlTeX engine and CMR fonts.
+% \message{f7hyph.tex french hyphenation patterns. 7-bit OT1 encoding 
+%         (V2.0) 05/20/94}
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%          *BEFORE* using this file *PLEASE* run checksum on it:           %
+%                       checksum -v f7hyph.tex                             %
+% to make sure that it hasn't been damaged.                                %
+% Then if you notice anything wrong in french hyphenation please report to %
+% Daniel Flipo and Bernard Gaulle at the email address: cesure-l@ens.fr    %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%      checksum        = "20125 1319 2460 29960"
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%% The most famous good guys who worked hard to obtain something usable. 
+% Jacques Desarmenien, Universite de Strasbourg :
+%          -  << how to run TeX in a French environment: hyphenation, fonts,
+%             typography. >> in Tugboat, 5 (1984) 91-102. and TeX85 conference
+%          -  << La division par ordinateur des mots francais :
+%             application a TeX >> in TSI vol. 5 No 4, 1986 (C) AFCET-
+%                                                             Gauthier-Villars
+% Norman Buckle, UQAH (nb; many additions)
+% Michael Ferguson, INRS-Telecommunications (mjf) June 1988
+% Justin Bur, Universite de Montreal (jbb; checked against original list)
+%                    all patterns including apostrophe missing from nb list
+% after that, GUTenberg  and specially Daniel Flipo and Bernard Gaulle
+% did their best effort to improve the list of patterns.
+%\begingroup
+% comment the following line when used without MlTeX and outside hyconfig.tex
+%\accenthyphcodes\spechyphcodes % changes the \' ... etc
+%\lccode`\'=`\'
+%%%%%%%%
+% hyphenation patterns for french ... for use with fonts that do not
+%                                     have the accented characters inside.
+%%%%%%%
+% Mods to \i and \oe form ... TeX eats up spaces and loses patterns. mjf Jun 88
+%\lccode'33='33 %\oe ... both needed in
+%\lccode'20='20 % \i .. dotless i
+%\patterns{
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%*
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%a
+2'2
+.a4
+'a4
+.\^a4
+'\^a4
+                    .ab3r\'ea
+                    'ab3r\'ea
+                    a1\`e2dre
+                    .ae3s4ch
+                    'ae3s4ch
+                    1alcool
+                    a2l1algi
+                    .amino1a2c
+                    'amino1a2c
+                    .ana3s4tr
+                    'ana3s4tr
+                    1a2nesth\'esi
+                    .anti1a2
+                    'anti1a2
+                    .anti1e2
+                    'anti1e2
+                    .anti1\'e2
+                    .anti2enne
+                    'anti2enne
+                    'anti1\'e2
+                    .anti1s2
+                    'anti1s2
+                    .apo2s3ta
+                    'apo2s3ta
+                    apo2s3tr
+                    archi1\'e2pis
+                    .as2ta
+                    'as2ta
+                    a2s3tro
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%b
+1ba
+1b\^a
+                    .bai2se3main % hyphen disappeared from french  5/2/94
+1be
+1b\'e
+1b\`e
+1b\^e
+4be.
+4bes.
+2bent. % mute syllable: tombent (df) 22/02/94
+1bi
+1b\^\i0 % final zero essential to terminate cs
+                    .bi1a2c
+                    .bi1a2t % like .tri1a2t for tri-athlon bg 12/27/93
+                    .bi1au
+                    .bio1a2
+                    .bi2s1a2
+                    .bi1u2
+1b2l
+4ble.
+4bles.
+2blent. % mute syllable: troublent (df) 28/02/94
+1bo
+1b\^o
+1b2r
+4bre.
+4bres.
+2brent. % mute syllable: palabrent (df) 28/02/94
+1bu
+1b\^u
+1by
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%c
+1\cc
+1ca
+1c\^a
+ca3ou3t2 % pour caoutchou... added 3/1/94 df-bg
+1ce
+1c\'e
+1c\`e
+1c\^e
+4ce.
+4ces.
+% words ending with -cent (df) 22/02/94
+        2cent.
+      ja3cent.
+      ac3cent.
+     \'e3cent.
+  munifi3cent.
+  r\'eti3cent.
+privatdo3cent.
+    inno3cent.
+      es3cent.
+ acquies4cent.
+      is3cent.
+   immis4cent.
+%
+.ch4
+1c2h
+4ch.
+2chb
+4che.
+4ches.
+2chent. % mute syllable: touchent (df) 22/02/94
+                    .ch\`e2vre3feuille % hyphen disappeared from french 5/2/94
+2chg
+ch2l
+4chle.
+4chles.
+                    chlo2r3a2c
+                    chlo2r3\'e2t
+2chm
+2chn
+2chp
+ch2r
+4chre.
+4chres.
+2chs
+2cht
+2chw
+1ci
+1c\^\i0 % final zero essential to terminate cs
+                    .ci2s1alp
+1c2k
+4ck.
+2ckb
+4cke.
+4ckes.
+2ckent. % mute syllable: stockent (df) 22/02/94
+2ckf
+2ckg
+2ck3h
+2ckp
+2cks
+2ckt
+1c2l
+4cle.
+4cles.
+2clent. % mute syllable: encerclent (df) 28/02/94
+1co
+1c\^o
+                    co1acc
+                    co1acq
+                    co1a2d
+                    co1ap
+                    co1ar
+                    co1assoc
+                    co1assur
+                    co1au
+                    co1ax
+                    co1\'e2
+                    co1ef
+                    co1en
+                    co1ex
+                    .con4  % missing from nb list
+                    .cons4 % missing from nb list
+                    .contre1s2c
+                    .contre3ma\^\i0tre % hyphen disappeared from french 5/2/94
+                    co2nurb
+                    .co1o2
+                    .co2o3lie
+1c2r
+4cre.
+4cres.
+2crent. % mute syllable: massacrent (df) 28/02/94
+1cu
+1c\^u
+1cy
+.cul4 % -- as .con4 .cons4 (march 92)
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%d
+1d'
+1da
+1d\^a
+                    .dacryo1a2
+d1d2h
+1de
+1d\'e
+1d\`e
+1d\^e
+4de.
+4des.
+% words ending with -dent (df) 22/02/94
+      2dent.
+d\'eca3dent.
+   \'e3dent.
+   cci3dent.
+  inci3dent.
+ confi3dent.
+   tri3dent.
+ dissi3dent.
+ chien3dent.
+   .ar3dent.
+  impu3dent.
+   pru3dent.
+%
+                    .d\'e1a2
+                    .d\'e1io
+                    .d\'e1o2
+                    .d\'e2s % originaly in JD file
+                    %.d\'e2s1a2 removed 09/17/92 because wrong for the
+                    % original JD 500 words test
+                    .d\'e3s2a3cr
+                    .d\'es2a3m % .d\'es2a2mi introduced 09/17/92 bec. i
+                               % can't see why d\'esamidonner ran in JD.
+                               % Moved to .d\'es2a3m df 12/27/93.
+                    .d\'e3s2a3tell
+                    .d\'e3s2astr
+                    .d\'e3s2c % 1 moved 3 due to .d\'e2s 09/17/92
+                    %.d\'e2s1e2 removed 09/17/92 because wrong for the
+                    % original JD 500 words test
+                    .d\'e2s1\'e2
+                    .d\'e3s2\'e3gr
+                    .d\'e3s2ensib
+                    .d\'e3s2ert
+                    .d\'e3s2exu
+                    %.d\'e2s3h removed 09/17/92 because wrong for the
+                    % original JD 500 words test
+                    .d\'e2s1i2
+                    .d\'e3s2i3d
+                    .d\'e3s2i3gn
+                    .d\'e3s2i3li
+                    .d\'e3s2i3nen
+                    .d\'e3s2invo
+                    .d\'e3s2i3r
+                    .d\'e3s2ist
+                    %.d\'e2s1o2 removed 09/17/92 because wrong for the
+                    % original JD 500 words test
+                    .d\'e3s2o3d\'e
+                    .d\'e3s2o3l
+                    .d\'e3s2o3pil
+                    .d\'e3s2orm
+                    .d\'e3s2orp
+                    .d\'e3s2oufr
+                    .d\'e3s2p % 1 moved 3 due to .d\'e2s 09/17/92
+                    .d\'e3s2t % 1 moved 3 due to .d\'e2s 09/17/92
+                    .d\'e2s1u2n
+                    3d2hal
+                    3d2houd
+1di
+1d\^\i0 % final zero essential to terminate cs
+                    di2s3cop
+                    .di1a2c\'e
+                    .di1a2cid
+                    dia2g3n
+                    .di1ald
+                    .di1a2mi
+                    .di1a2tom
+                    .di1e2n
+                    .di2s3h
+2dlent. % mute syllable: jodlent (df) 28/02/94
+1do
+1d\^o
+1d2r
+4dre.
+4dres.
+2drent. % mute syllable: engendrent (df) 28/02/94
+d1s2
+1du
+1d\^u
+1dy
+                    .dy2s3
+                    .dy2s1a2
+                    .dy2s1i2
+                    .dy2s1o2 % missing from nb list
+                    .dy2s1u2
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%e
+.e4
+'e4
+.\^e4
+'\^e4
+.\'e4
+'\'e4
+.\`e4
+'\`e4
+                    1\'e2drie
+                    1\'e2drique
+                    1\'e2lectr
+                    1\'e2l\'ement
+                    .en1a2
+                    'en1a2
+                    1\'e2nerg
+                    e2n1i2vr
+                    .en1o2
+                    'en1o2
+                    \'epi2s3cop
+                    \'epi3s4cope
+                    e2s3cop
+                    .eu2r1a2
+                    'eu2r1a2
+                    eu1s2tat
+                    extra1
+                    extra2c
+                    extra2i
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%f
+1fa
+1f\^a
+1fe
+1f\'e
+1f\`e
+1f\^e
+4fe.
+4fes.
+2fent. % mute syllable: agrafent chauffent (df) 22/02/94
+%
+1fi
+1f\^\i0 % final zero essential to terminate cs
+1f2l
+4fle.
+4fles.
+2flent. % mute syllable: gonflent (df) 28/02/94
+1fo
+1f\^o
+1f2r
+4fre.
+4fres.
+2frent. % mute syllable: balafrent (df) 28/02/94
+f1s2
+1fu
+1f\^u
+1fy
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%g
+1ga
+1g\^a
+1ge
+1g\'e
+1g\`e
+1g\^e
+4ge.
+4ges.
+% words ending with -gent (df) 22/02/94
+       2gent.
+   r\'e3gent.
+  entre3gent.
+   indi3gent.
+   dili3gent.
+intelli3gent.
+  indul3gent.
+    tan3gent.
+    rin3gent.
+ contin3gent.
+    .ar3gent.
+    'ar3gent.
+    ser3gent.
+    ter3gent.
+r\'esur3gent.
+%
+1g2ha
+1g2he
+1g2hi
+1g2ho
+1g2hy
+1gi
+1g\^\i0 % final zero essential to terminate cs
+1g2l
+4gle.
+4gles.
+2glent. % mute syllable: meuglent (df) 28/02/94
+    1g2n
+.sta2g3n
+  wa2g3n
+4gne.
+4gnes.
+2gnent. % mute syllable: accompagnent (df) 28/02/94
+1go
+1g\^o
+1g2r
+4gre.
+4gres.
+2grent. % mute syllable: immigrent (df) 28/02/94
+1gu
+1g\^u
+g1s2
+4gue.
+4gues.
+% words ending with -guent (df) 22/02/94
+   2guent.
+.on3guent.
+'on3guent.
+%
+1gy
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%h
+1ha
+1h\^a
+1he
+1h\'e
+1h\`e
+1h\^e
+                    h\'emi1\'e
+                    h\'emo1p2t
+4he.
+4hes.
+1hi
+1h\^\i0 % final zero essential to terminate cs
+1ho
+1h\^o
+1hu
+1h\^u
+1hy
+                    hypera2
+                    hypere2
+                    hyper\'e2
+                    hyperi2
+                    hypero2
+                    hypers2
+                    hype4r1
+                    hyperu2
+                    hypo1a2
+                    hypo1e2 % missing from nb list
+                    hypo1\'e2
+                    hypo1i2
+                    hypo1o2
+                    hypo1s2
+                    hypo1u2
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%i
+.i4
+'i4
+.\^\i4
+'\^\i4
+                    i1algi
+                    i1arthr
+                    i1\`e2dre
+% ill patterns missing from nb list
+    il2l 
+   cil3l
+  rcil4l
+  ucil4l
+ vacil4l
+   gil3l
+   hil3l
+   lil3l
+     l3lion
+   mil3l
+   mil4let
+\'emil4l
+ semil4l
+  rmil4l
+ armil5l
+ capil3l
+ papil3la
+ papil3le
+ papil3li
+ papil3lom
+ pupil3l
+ piril3l
+ thril3l
+ cyril3l
+ ibril3l
+ pusil3l
+ .stil3l
+distil3l
+instil3l
+fritil3l
+boutil3l
+ vanil3lin
+ vanil3lis
+   vil3l
+  avil4l
+chevil4l
+ uevil4l
+  uvil4l
+   xil3l
+% end of ill patterns
+                    1informat % missing from nb list
+                    .in1a2
+                    'in1a2
+                    .in2a3nit
+                    'in2a3nit
+                    .in2augur
+                    'in2augur
+                    .in1e2
+                    'in1e2
+                    .in1\'e2
+                    'in1\'e2
+                    .in2effab % missing from nb list
+                    'in2effab
+                    .in2\'e3lucta
+                    'in2\'e3lucta
+                    .in2\'e3narra
+                    'in2\'e3narra
+                    .in2ept
+                    'in2ept
+                    .in2er
+                    'in2er
+                    .in2exora % missing from nb list
+                    'in2exora
+                    .in1i2
+                    'in1i2
+                    .in2i3miti
+                    'in2i3miti
+                    .in2i3q
+                    'in2i3q
+                    .in2i3t
+                    'in2i3t
+                    .in1o2
+                    'in1o2
+                    .in2o3cul
+                    'in2o3cul
+                    .in2ond
+                    'in2ond
+                    .in1s2tab
+                    'in1s2tab
+                    'inte4r3
+                    .intera2
+                    'intera2
+                    .intere2
+                    'intere2
+                    .inter\'e2
+                    'inter\'e2
+                    .interi2
+                    'interi2
+                    .intero2
+                    'intero2
+                    .inte4r3
+                    .interu2
+                    'interu2
+                    .inters2
+                    'inters2
+                    .in1u2
+                    'in1u2
+                    .in2uit
+                    'in2uit
+                    .in2u3l
+                    'in2u3l
+                    io1a2ct
+                    i1oxy
+                    i1s2tat
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%j
+1j
+2jk
+4je.
+4jes.
+2jent. % mute syllable: gal\`ejent (df) 22/02/94
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%k
+1ka
+1k\^a
+1ke
+1k\'e
+1k\`e
+1k\^e
+4ke.
+4kes.
+2kent. % mute syllable: jerkent (df) 22/02/94
+1k2h
+4kh.
+.kh4
+1ki
+1k\^\i0 % final zero essential to terminate cs
+1ko
+1k\^o
+1k2r
+1ku
+1k\^u
+1ky
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%l
+1la
+1l\^a
+1l\`a
+                    la2w3re
+1le
+1l\'e
+1l\`e
+1l\^e
+4le.
+4les.
+% words ending with -lent (df) 22/02/94
+        2lent.
+     .ta3lent.
+     iva3lent.
+\'equiva4lent.
+  monova3lent.
+  polyva3lent.
+      re3lent.
+     .do3lent.
+    indo3lent.
+    inso3lent.
+   turbu3lent.
+   succu3lent.
+  f\'ecu3lent.
+   trucu3lent.
+     opu3lent.
+   corpu3lent.
+      ru3lent.
+   sporu4lent.
+%
+1li
+1l\^\i0 % final zero essential to terminate cs
+1lo
+1l\^o
+l1s2t
+1lu
+1l\^u
+1ly
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%m
+1ma
+1m\^a
+                    .ma2c3k
+                    .macro1s2c
+                    .ma2l1a2dres
+                    .ma2l1a2dro
+                    .ma2l1ais\'e
+                    .ma2l1ap
+                    .ma2l1a2v
+                    .ma2l1en
+                    .ma2l1int
+                    .ma2l1oc
+                    .ma2l1o2d
+                    .ma2r1x % nb (jbb: ?)
+1me
+1m\'e
+1m\`e
+1m\^e
+                    .m\'e2g1oh
+                    .m\'e2sa % missing from nb list
+                    .m\'e3san % missing from nb list
+                    .m\'e2s1es
+                    .m\'e2s1i
+                    .m\'e2s1u2s
+                    .m\'eta1s2ta
+4me.
+4mes.
+% words ending with -ment (df) 22/02/94
+      \^a2ment.
+       da2ment.
+       fa2ment.
+   amalga2ment.
+      cla2ment.
+       ra2ment.
+temp\'era3ment.
+       ta2ment.
+    testa3ment.
+      qua2ment.
+      \`e2ment.
+   car\^e2ment.
+ diaphrag2ment.
+     ryth2ment.
+       ai2ment.
+      rai3ment.
+   ab\^\i2ment.
+    \'eci2ment.
+     vidi2ment.
+    subli2ment.
+    \'eli2ment.
+     reli2ment.
+       mi2ment.
+      ani2ment.
+     veni2ment.
+       ri2ment.
+  d\'etri3ment.
+    nutri3ment.
+     inti2ment.
+     esti2ment.
+        l2ment.
+     flam2ment.
+     gram2ment.
+     .gem2ment.
+       om2ment.
+     .com3ment.
+      \^o2ment.
+    slalo2ment.
+     chro2ment.
+       to2ment.
+       ar2ment.
+     .sar3ment.
+       er2ment.
+  antifer3ment.
+     .ser3ment.
+      fir2ment.
+       or2ment.
+       as2ment.
+       au2ment.
+    \'ecu2ment.
+       fu2ment.
+       hu2ment.
+    fichu3ment.
+      llu2ment.
+      plu2ment.
+      bou2ment.
+      bru2ment.
+       su2ment.
+       tu2ment.
+%
+1mi
+1m\^\i0 % final zero essential to terminate cs
+                    .milli1am
+                    1m2n\'emo
+                    1m2n\`es
+                    1m2n\'esi
+1mo
+1m\^o
+                    .mono1a2
+                    .mono1e2
+                    .mono1\'e2
+                    .mono1i2
+                    .mono1\"\i2d\'e
+                    .mono1o2
+                    .mono1u2
+                    .mono1s2
+                    mon2t3r\'eal % missing from nb list
+m1s2
+1mu
+1m\^u
+1my
+                    moye2n1\^a2g
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%n
+1na
+1n\^a
+1ne
+1n\'e
+1n\`e
+1n\^e
+4ne.
+4nes.
+% words ending with -nent (df) 22/02/94
+          2nent. % fric-tionnent - syllable muette - bg 27/12/93
+    r\'ema3nent.
+      imma3nent.
+     perma3nent.
+    .\'emi3nent.
+pr\'e\'emi3nent.
+  pro\'emi3nent.
+  sur\'emi3nent.
+      immi3nent.
+     conti3nent.
+     perti3nent.
+     absti3nent.
+%
+1ni
+1n\^\i0 % final zero essential to terminate cs
+1no
+1n\^o
+                    .no2n1obs
+1nu
+1n\^u
+                    n3s2at.
+                    n3s2ats.
+n1x
+1ny
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%o
+.o4
+'o4
+'\^o4
+.\^o4
+%'\"o2 % mjf % deleted 3/1/94 df-bg
+                    o2b3long
+                    1octet % missing from nb list
+                    o1d2l
+                    o1\`e2dre
+                    o1ioni
+                    ombud2s3
+                    omni1s2
+                    o1s2tas
+                    o1s2tat
+                    o1s2t\'ero
+                    o1s2tim
+                    o1s2tom
+                    o1s2trad
+                    o1s2tratu
+                    o1s2triction
+                    .oua1ou
+                    'oua1ou
+                    .ovi1s2c
+                    'ovi1s2c
+                    oxy1a2
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%p
+1pa
+1p\^a
+                    pal\'eo1\'e2
+                    .pa2n1a2f
+                    .pa2n1a2m\'e
+                    .pa2n1a2ra
+                    .pa2n1is
+                    .pa2n1o2ph
+                    .pa2n1opt
+                    .pa2r1a2che
+                    .pa2r1a2ch\`e
+                    .para1s2
+                    .pa2r3h\'e
+1pe
+1p\'e
+1p\`e
+1p\^e
+4pe.
+4pes.
+% words ending with -pent (df) 22/02/94
+   2pent.
+ re3pent.
+.ar3pent.
+'ar3pent.
+ser3pent.
+%
+                    .pen2ta % pent- or penta- but never pen-ta bg 12/27/93
+                    per3h
+                    p\'e2nul % p\'e2n1ul moved back 09/17/92 to JD def.
+                    .pe4r
+                    .per1a2
+                    .per1e2
+                    .per1\'e2
+                    .per1i2
+                    .per1o2
+                    .per1u2
+                    p\'e1r2\'e2q % 2r1 moved 09/17/92 to 1r2(it was a typo)
+                    .p\'eri1os
+                    .p\'eri1s2
+                    .p\'eri2s3s
+                    .p\'eri2s3ta
+                    .p\'eri1u2
+1p2h
+.ph4
+4ph.
+                    .phalan3s2t
+4phe.
+4phes.
+2phent. % mute syllable: triomphent (df) 22/02/94
+ph2l
+4phle.
+4phles.
+2phn
+                    photo1s2
+ph2r
+4phre.
+4phres.
+2phs
+2pht
+                    3ph2tal\'e
+                    3ph2tis
+%%%% Here is an example of a pb involving phonetic and etymologic patterns 5/94
+%%%%                .phyto3ph2 % originaly, but wrong for phy-toph-thora   9/92
+%%%%                .phy2topha % for -pharmacie but wrong for phyto-biol.. 5/94
+1pi
+1p\^\i0 % final zero essential to terminate cs
+1p2l
+4ple.
+4ples.
+2plent. % mute syllable: accouplent (df) 28/02/94
+                    .pluri1a
+                    1p2n\'e
+                    1p2neu
+1po
+1p\^o
+                    po1astre
+                    poly1a2
+                    poly1e2
+                    poly1\'e2
+                    poly1\`e2
+                    poly1i2
+                    poly1o2
+                    poly1s2
+                    poly1u2
+                    .pon2tet % JD hypenated it asis 09/17/92, exception
+                    .pos2t3h
+                    .pos2t1in
+                    .pos2t1o2
+                    .pos2t3r
+                    .post1s2
+1p2r
+4pre.
+4pres.
+2prent. % mute syllable: empourprent (df) 28/02/94
+                    .pr\'e1a2
+                    .pr\'e2a3la % missing from nb list
+                    .pr\'e2au
+                    .pr\'e1\'e2
+                    .pr\'e1e2
+                    .pr\'e1i2
+                    .pr\'e1o2
+                    .pr\'e1u2
+                    .pr\'e1s2
+                    .pro1\'e2
+                    .pro1s2c\'e
+                    pro2s3tat
+                    .prou3d2h
+                    1p2sych
+                    .psycho1a2n
+                    1p2t\`er
+                    1p2t\'er
+1pu
+                    .pud1d2l
+1p\^u
+1py
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%q
+1q
+4que.
+4ques.
+% words ending with -quent (df) 22/02/94
+        2quent.
+     \'e3quent.
+   \'elo3quent.
+grandilo3quent.
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%r
+1ra
+1r\^a
+                    radio1a2 % missing from nb list
+1re
+1r\'e
+1r\`e
+1r\^e
+                    .r\'e1a2
+                    .r\'e2a3le
+                    .r\'e2a3lis
+                    .r\'e2a3lit
+                    .r\'e2aux
+                    .r\'e1\'e2
+                    .r\'e1e2
+                    .r\'e2el
+                    .r\'e2er
+                    .r\'e2\`er
+                    .r\'e1i2
+                    .r\'e2i3fi
+                    .r\'e1o2
+                    .re1s2
+                    .re2s3cap
+                    .re2s3cisi % for res-cision  09/17/92 (missing from nb)
+                    .re2s3ciso % for res-cisoire 09/17/92(missing from nb)
+                    .re2s3cou
+                    .re2s3cri
+                    .re2s3pect
+                    .re2s3pir
+                    .re2s3plend
+                    .re2s3pons
+                    .re2s3quil
+                    .re2s3s
+                    .re2s3t
+                    .re3s4tab
+                    .re3s4tag
+                    .re3s4tand
+                    .re3s4tat
+                    .re3s4t\'en
+                    .re3s4t\'er
+                    .re3s4tim
+                    .re3s4tip
+                    .re3s4toc
+                    .re3s4top
+                    .re3s4tr
+                    .re4s5trein
+                    .re4s5trict
+                    .re4s5trin
+                    .re3s4tu
+                    .re3s4ty
+                    .r\'eu2 %.r\'e1u2 % pattern rejected 12/2/92
+                            % (don't hyphenate as r\'e-union nor r\'eu-nion)
+                    .r\'e2uss
+                    .r\'etro1a2
+4re.
+4res.
+% words ending with -rent (df) 22/02/94
+       2rent. % es-p\`erent - syllable muette - bg 27/12/93
+    .pa3rent.
+   appa3rent.
+transpa3rent.
+    \'e3rent.
+    tor3rent.
+    cur3rent.
+%
+1r2h
+4rhe.
+4rhes.
+                    2r3heur
+                    2r3hydr
+1ri
+1r\^\i0 % final zero essential to terminate cs
+1ro
+1r\^o
+1ru
+1r\^u
+1ry
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%s
+1sa
+1s\^a
+.sch4
+                    1s2caph
+                    1s2cl\'er
+                    1s2cop
+ 1s2ch
+e2s3ch
+i2s3ch\'e
+i2s3chia
+i2s3chio
+4sch.
+4sche.
+4sches.
+2schs
+1se
+1s\'e
+1s\`e
+1s\^e
+                    sesqui1a2
+4se.
+4ses.
+% words ending with -sent (df) 22/02/94
+     2sent. % massent - syllable muette - bg 27/12/93
+   ab3sent.
+pr\'e3sent.
+ .res3sent.
+%
+.seu2le % jbb
+.sh4
+1s2h
+4sh.
+4she.
+4shes.
+2shent. % mute syllable: smashent (df) 22/02/94
+2shm
+                    2s3hom
+2shr
+2shs
+1si
+1s\^\i0 % final zero essential to terminate cs
+                    1s2lav
+                    1s2lov
+1so
+1s\^o
+                    1s2patia
+                    1s2perm
+                    1s2por
+                    1s2ph\`er
+                    1s2ph\'er
+                    1s2piel
+                    1s2piros
+                    1s2tandard
+                    1s2tein
+                    st\'er\'eo1s2
+                    1s2tigm
+                    1s2tock
+                    1s2tomos
+                    1s2troph
+                    1s2tructu
+                    1s2tyle
+1su
+1s\^u
+                    .su2b1a2
+                    .su3b2alt
+                    .su2b1\'e2
+                    .su3b2\'e3r
+                    .su2b1in
+                    .su2b3limin
+                    .su2b3lin
+                    .su2b3lu
+                    sub1s2
+                    .su2b1ur
+                    supero2
+                    supe4r1
+                    supers2
+                    .su2r1a2
+                    su3r2ah
+                    .su3r2a3t
+                    .su2r1e2
+                    .su3r2eau
+                    .su3r2ell
+                    .su3r2et
+                    .su2r1\'e2
+                    .su2r3h
+                    .su2r1i2m
+                    .su2r1inf
+                    .su2r1int
+                    .su2r1of
+                    .su2r1ox
+1sy
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%t
+1ta
+1t\^a
+1t\`a
+                    tachy1a2
+                    tchin3t2
+1te
+1t\'e
+1t\`e
+1t\^e
+                    t\'el\'e1e2
+                    t\'el\'e1i2
+                    t\'el\'e1o2b
+                    t\'el\'e1o2p
+                    t\'el\'e1s2
+4te.
+4tes.
+% words ending with -tent (df) 22/02/94
+        2tent. % mentent - syllable muette - bg 27/12/93
+     .la3tent.
+     .pa3tent.
+ comp\'e3tent.
+   \'eni3tent.
+ m\'econ3tent.
+  omnipo3tent.
+ventripo3tent.
+\'equipo3tent.
+    impo3tent.
+     mit3tent.
+%
+.th4
+1t2h
+4th.
+4the.
+4thes.
+                    thermo1s2
+                    2t3heur
+2thl % th2l  was wrong for ...ath-lon (jd said 2thl) df 12/27/93
+2thm
+2thn
+th2r
+4thre.
+4thres.
+2ths
+1ti
+1t\^\i0 % final zero essential to terminate cs
+1to
+1t\^o
+1t2r
+                    tran2s1a2
+                    tran3s2act
+                    tran3s2ats
+                    tran2s3h
+                    tran2s1o2
+                    tran2s3p
+                    tran2s1u2
+4tre.
+4tres.
+2trent. % mute syllable: infiltrent (df) 28/02/94
+                    .tri1a2c
+                    .tri1a2n
+                    .tri1a2t
+                    .tri1o2n
+                    t1t2l
+1tu
+1t\^u
+tung2s3
+1ty
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%u
+.u4
+'u4
+.\^u4
+'\^u4
+                    uni1o2v
+                    uni1a2x
+                    u2s3tr
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%v
+1va
+1v\^a
+1ve
+1v\'e
+1v\`e
+1v\^e
+                    v\'elo1s2ki
+4ve.
+4ves.
+% words ending with -vent (df) 22/02/94
+     2vent.
+conni3vent.
+ .sou3vent.
+%
+1vi
+1v\^\i0 % final zero essential to terminate cs
+1vo
+1v\^o
+                    vol2t1amp
+1v2r
+4vre.
+4vres.
+2vrent. % mute syllable: recouvrent (df) 28/02/94
+1vu
+1v\^u
+1vy
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%w
+1wa
+1we
+4we.
+4wes.
+2went. % mute syllable: interviewent (df) 22/02/94
+1wi
+1wo
+1wu
+1w2r
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%x
+2xent. % mute syllable:  malaxent (df) 22/02/94
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%y
+.y4
+'y4
+                    y1asth
+                    y1s2tom
+                    y1algi
+%-------------------%-----------------------%
+% phonetic patterns % etymological patterns %
+%-------------------%-----------------------%
+%%z
+1za
+1ze
+1z\'e
+1z\`e
+4ze.
+4zes.
+% words ending with -zent (df) 22/02/94
+        2zent.
+privatdo3zent.
+%
+1zi
+1zo
+1zu
+1zy
+%}
+%\endgroup
+%Fin du fichier f7hyph.tex
+%%%%%%%%%%%%%%%%%%%%%%%%%%
+
diff --git a/hyph/german.lh b/hyph/german.lh
new file mode 100644
index 0000000..3b0fec6
--- /dev/null
+++ b/hyph/german.lh
@@ -0,0 +1,568 @@
+Lout hyphenation information
+%
+% This is a German hyphenation file constructed by Jeff Kingston
+% on 21 April 1994 from a TeX file supplied by Sverre Slotte.
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+äÄ
+åÅ
+öÖ
+üÜ
+ß
+
+Patterns:
+.aa6l .ab3a4s .ab3ei .abi2 .ab3it .ab1l .ab1r .ab3u .ad3o4r .alti6 .ana3c
+.an5alg .an1e .ang8s .an1s .ap1p .ar6sc .ar6ta .ar6tei .as2z .au2f1 .au2s3
+.be5erb .be3na .ber6t5r .bie6r5 .bim6s5t .brot3 .bru6s .ch6 .che6f5 .da8c
+.da2r .dar5in .dar5u .den6ka .de5r6en .des6pe .de8spo .de3sz .dia3s4 .dien4
+.dy2s1 .ehren5 .eine6 .ei6n5eh .ei8nen .ein5sa .en6der .en6d5r .en3k4
+.en8ta8 .en8tei .en4t3r .epo1 .er6ban .er6b5ei .er6bla .er6d5um .er3ei
+.er5er .er3in .er3o4b .erwi5s .es1p .es8t .ex1a2 .ex3em .fal6sc .fe6st5a
+.flu4g3 .furch8 .ga6ner .ge3n4a .ge5rö .ges6 .halb5 .halbe6 .hal6br
+.haup4 .hau4t .heima6 .he4r3e .her6za .he5x .hin3 .hir8sc .ho4c .hu3sa
+.hy5o .ibe5 .ima6ge .in1 .ini6 .is5chi .jagd5 .kal6k5o .ka6ph .ki4e .kop6f3
+.kraf6 .kü5ra .lab6br .liie6 .lo6s5k .lö4s3t .ma5d .mi2t1 .no6th
+.no6top .obe8ri .ob1l .obs2 .ob6st5e .or3c .ort6s5e .ost3a .oste8r .pe4re
+.pe3ts .ph6 .po8str .rau4m3 .re5an .ro8q .ru5the .rü5be .rü8stet
+.sch8 .se6e .se5n6h .se5ra .si2e .spi6ke .st4 .sy2n .tages5 .tan6kl .ta8th
+.te6e .te8str .to6der .to8nin .to6we .um1 .umpf4 .un1 .une6 .unge5n .ur1c
+.ur5en .ve6rin .vora8 .wah6l5 .we8ges .wo6r .wor3a .wun4s .zi4e .zuch8
+.ände8re .öch8 aa1c aa2gr aal5e aa6r5a a5arti aa2s1t aat2s 6aba
+ab3art 1abdr 6abel aben6dr ab5erk ab5err ab5esse 1abf 1abg 1abhä ab1ir
+1abko a1bl ab1la 5ablag a6blaß ab4ler ab1lu a8blä 5a6blö abma5c
+1abn ab1ra ab1re 5a6brec ab1ro ab1s ab8sk abs2z 3abtei ab1ur 1abw 5abze
+5abzu ab1än abäu8 a4ce.  a5chal ach5art ach5au a1che a8chent ach6er.
+a6ch5erf a1chi ach1l ach3m ach5n a1cho ach3re a1chu ach1w a1chy ach5äf
+ack1o acks6t ack5sta a1d 8ad.  a6d5ac ad3ant ad8ar 5addi a8dein ade5o8
+adi5en 1adj 1adle ad1op a2dre 3adres adt1 1adv a6dä a1e2d ae1r a1er.
+1aero 8afa a3fal af1an a5far a5fat af1au a6fentl a2f1ex af1fr af5rau af1re
+1afri af6tent af6tra aft5re a6f5um 8afä ag5abe 5a4gent ag8er ages5e
+1aggr ag5las ag1lo a1gn ag2ne 1agog a6g5und a1ha a1he ah5ein a4h3erh a1hi
+ahl1a ah1le ah4m3ar ahn1a a5ho ahra6 ahr5ab ah1re ah8rei ahren8s ahre4s3
+ahr8ti ah1ru a1hu ah8ö ai3d2s ai1e aif6 a3inse ai4re.  a5isch.  ais8e
+a3ismu ais6n aiso6 a1j 1akad a4kade a1ke a1ki 1akko 5akro1 a5lal al5ans
+3al8arm al8beb al8berw alb5la 3album al1c a1le a6l5e6be a4l3ein a8lel
+a8lerb a8lerh a6lert 5a6l5eth 1algi al4gli al3int al4lab al8lan al4l3ar
+alle3g a1lo a4l5ob al6schm al4the altist5 al4t3re 8a1lu alu5i a6lur alu3ta
+a1lä a6mate 8ame.  5a6meise am6m5ei am6mum am2n ampf3a am6schw am2ta
+a1mu a1mä a3nac a1nad anadi5e an3ako an3alp 3analy an3ame an3ara a1nas
+an5asti a1nat anat5s an8dent ande4s3 an1ec an5eis an1e2k 4aner.  a6n5erd
+a8nerf a6n5erke 1anfa 5anfert 1anfä 3angab 5angebo an3gli ang6lis an2gn
+3angri ang5t6 5anhä ani5g ani4ka an5i8on an1kl an6kno an4kro 1anl anma5c
+anmar4 3annah anne4s3 a1no 5a6n1o2d 5a6n3oma 5a6nord 1anr an1sa 5anschl
+an4soz an1st 5anstal an1s2z 5antenn an1th 5anwä a5ny an4z3ed 5anzeig
+5anzieh 3anzug an1ä 5anäs a1nö anö8d a1os a1pa 3apfel a2ph1t
+aph5ä6 a1pi 8apl apo1c apo1s a6poste a6poth 1appa ap1pr a1pr a5pä
+a3pü a1ra a4r3af ar3all 3arbei 2arbt ar1c 2a1re ar3ein ar2gl 2a1ri
+ari5es ar8kers ar6les ar4nan ar5o6ch ar1o2d a1rol ar3ony a8ror a3ros ar5ox
+ar6schl 8artei ar6t5ri a1ru a1ry 1arzt arz1w ar8zä arä8m arö6
+ar5öm ar1ü2 a1sa a6schec asch5l asch3m a6schn a3s4hi as1pa asp5l
+a8steb as5tev 1asth a6stoc a1str ast3re 8a1ta ata5c ata3la a6tapf ata5pl
+a1te a6teli aten5a ate5ran 6atf 6atg a1th at3hal 1athl 2a1ti 5atlant 3atlas
+8atmus 6atn a1to a6t5ops ato6ra a6t5ort.  4a1tr a6t5ru at2t1h at5t6hä
+6a1tu atz1w a1tä a1tü au1a au6bre auch3a au1e aue4l 5aufent 3auffü
+3aufga 1aufn auf1t 3auftr 1aufw 3auge.  au4kle aule8s 6aum au8mar aum5p
+1ausb 3ausd 1ausf 1ausg au8sin 3auss au4sta 1ausw 1ausz aut5eng au1th 1auto
+auße8 a1v ave5r6a aver6i a1w a6wes a1x a2xia a6xio a1ya a1z azi5er.
+8aß 1ba 8ba8del ba1la ba1na ban6k5r ba5ot bardi6n ba1ro basten6 bau3sp
+2b1b bb6le b2bli 2b1c 2b1d 1be be1a be8at.  be1ch 8becht 8becke.  be5el
+be1en bee8rei be5eta bef2 8beff be1g2 behö8 bei1s 6b5eisen bei3tr b8el
+bel8o belu3t be3nac bend6o be6ners be6nerw be4nor ben4se6 bens5el be1nä
+be1nü be1o2 b8er.  be1ra be8rac ber8gab.  ber1r be1rü bes8c bes5erh
+bes2p be5tha bet5sc be1un be1ur 8bex be6zwec 2b1f8 bfe6st5e 2b1g2 bga2s5
+bge1 2b1h bhole6 1bi bi1bl b6ie bi1el bi1la bilä5 bi1na bi4nok bi5str
+bi6stu bi5tr bit4t5r b1j 2b1k2 bkü6 bl8 b6la.  6b1lad 6blag 8blam 1blat
+b8latt 3blau.  b6lav 3ble.  b1leb b1led 8b1leg 8b1leh 8bleid 8bleih 6b3lein
+blei3s ble4m3o 4blich b4lind 8bling b2lio 5blit b4litz b1loh 8b1los 1blu
+5blum 2blun blut3a blut5sc 3blä bläs5c 5blö 3blü blü8sc 2b1m
+2b1n 1bo bo1ch bo5d6s boe5 8boff 8bonk bo1ra b1ort 2b1p2 b1q 1br brail6
+brast8 bre4a b5red 8bref 8b5riem b6riga bro1s b1rup b2ruz 8bröh
+brös5c 8bs b1sa b8sang b2s1ar b1sc bs3erl bs3erz b8sof b1s2p bst1h
+b3stru b5stä b6sun 2b1t b2t1h 1bu bu1ie bul6k b8ure bu6sin 6b1v 2b1w
+1by1 by6te.  8b1z bzi1s 1bä b5ä6s5 1bü b6ü5bere büge6
+bügel5e bür6sc 1ca cag6 ca5la ca6re ca5y c1c 1ce celi4c celich5 ce1ro
+c8h 2ch.  1chae ch1ah ch3akt cha6mer 8chanz 5chara 3chari 5chato 6chb 1chef
+6chei ch3eil ch3eis 6cherkl 6chf 4chh 5chiad 5chias 6chins 8chj chl6 5chlor
+6ch2m 2chn6 ch8nie 5cho.  8chob choi8d 6chp ch3ren ch6res ch3rü 2chs
+2cht cht5ha cht3hi 5chthon ch6tin 6chuh chu4la 6ch3unt chut6t 8chw 1ci
+ci5tr c2k 2ck.  ck1ei 4ckh ck3l ck3n ck5o8f ck1r 2cks ck5stra ck6s5u c2l
+1c8o con6ne 8corb cos6t c3q 1c6r 8c1t 1cu 1cy 5cä1 cö5 1da.  8daas
+2dabg 8dabr 6dabt 6dabw 1dac da2gr 6d5alk 8d5amt dan6ce.  dani5er dan8ker
+2danl danla6 6dans 8danzi 6danzu d1ap da2r1a8 2d1arb d3arc dar6men 4d3art
+8darz 1dat 8datm 2d1auf 2d1aus 2d1b 2d1c 2d1d d5de d3d2h ddämme8 1de
+2deal de5an de3cha de1e defe6 6deff 2d1ehr 5d4eic de5isc de8lar del6s5e
+del6spr de4mag de8mun de8nep dene6r 8denge.  8dengen de5o6d 2deol de5ram
+8derdb der5ein de1ro der1r d8ers der5um de4s3am de4s3an de4sau de6sil
+de4sin de8sor de4spr de2su 8deul de5us.  2d1f df2l 2d1g 2d1h 1di dia5c
+di5ara dice5 di3chr di5ena di1gn di1la dil8s di1na 8dind 6dinf 4d3inh
+2d1ins di5o6d di3p4t di8sen dis1p di5s8per di6s5to dis5tra di8tan di8tin
+d1j 6dje 2dju 2d1k 2d1l 2d1m 2d1n6 dni6 dnje6 1do 6d5obe do6berf 6d5ony
+do3ran 6dord 2d1org dor4t3h do6ste 6doth dott8e 2d1p d5q dr4 1drah 8drak
+d5rand 6dre.  4drech d6reck 4d3reg 8d3reic d5reife 8drem 8d1ren 2drer
+8dres.  6d5rh 1dria d1ric 8drind droi6 dro5x 1dru 8drut drös5c 1drü
+drü5b drü8sc 2ds d1sa d6san dsat6 d1sc 5d6scha.  5dschik dse8e d8serg
+8dsl d1sp d4spak ds2po d8spä d1st d1sü 2dt d1ta d1te d1ti d1to dt1s6
+d1tu d5tä 1du du5als du1b6 du1e duf4t3r 4d3uh du5ie 8duml 8dumw 2d1und
+du8ni 6d5unt dur2c durch3 6durl 6dursa 8durt du1s du8schr 2d1v 2d1w dwa8l
+2d1z 1dä 6däh 8dänd dä6r dö8bl d5öl dör6fl dö8sc
+d5ö4st dös3te 1dü ea4ben e1ac e1ah e1akt e1al.  e5alf e1alg
+e5a8lin e1alk e1all e5alp e1alt e5alw e1am e1and ea6nim e1ar.  e5arf e1ark
+e5arm e3art e5at.  e6ate e6a5t6l e8ats e5att e6au.  e1aus e1b e6b5am
+ebens5e eb4lie eb4ser eb4s3in e1che e8cherz e1chi ech3m 8ech3n ech1r
+ech8send ech4su e1chu eck5an e5cl e1d ee5a ee3e ee5g e1ei ee5isc eei4s3t
+ee6lend e1ell ee5lö e1erd ee3r4e ee8reng eere6s5 ee5rä ee6tat e1ex
+e1f e6fau e8fe8b 3effek ef3rom ege6ra eglo6si 1egy e1ha e6h5ach eh5ans
+e6hap eh5auf e1he e1hi ehl3a eh1le ehl5ein eh1mu ehn5ec e1ho ehr1a eh1re
+ehre6n eh1ri eh1ru ehr5um e1hu eh1w e1hy e1hä e1hö e3hüt ei1a
+eia6s ei6bar eich3a eich5r ei4dar ei6d5ei ei8derf ei3d4sc ei1e 8eifen
+3eifri 1eign eil1d ei6mab ei8mag ein1a4 ei8nat ei8nerh ei8ness ei6nete
+ein1g e8ini ein1k ei6n5od ei8nok ei4nor e3insä ei1o e1irr ei5ru ei8sab
+ei5schn ei6s5ent ei8sol ei4t3al eit3ar eit1h ei6thi ei8tho eit8samt ei6t5um
+e1j 1ekd e1ke e1ki e1k2l e1kn ekni4 e1la e2l1al 6elan e6lanf e8lanl e6l5ans
+el3arb el3arm e6l3art 5e6lasti e6lauge elbst5a e1le 6elef ele6h e6l5ehe
+e8leif e6l5einh 1elek e8lel 3eleme e6lemen e6lente el5epi e4l3err e6l5ersc
+elf2l elg2 e6l5ins ell8er 4e1lo e4l3ofe el8soh el8tent 5eltern e1lu elut2
+e1lä e1lü em8dei em8meis 4emo emo5s 1emp1f 1empt 1emto e1mu emurk4
+emurks5 e1mä en5a6ben en5achs en5ack e1nad en5af en5all en3alt en1am
+en3an.  en3ant en3anz en1a6p en1ar en1a6s 6e1nat en3auf en3aus en2ce enda6l
+end5erf end5erg en8dess 4ene.  en5eck e8neff e6n5ehr e6n5eim en3eis 6enem.
+6enen e4nent 4ener.  e8nerd e6n3erf e4nerg 5energi e6n5erla en5ers e6nerst
+en5erw 6enes e6n5ess e2nex en3glo 2eni enni6s5 ennos4 enns8 e1no e6nober
+eno8f en5opf e4n3ord en8sers ens8kl en1sp ens6por en5t6ag enta5go en8terbu
+en6tid 3entla ent5ric 5entwic 5entwu 1entz enu5i e3ny en8zan en1öf
+e1nös e1nüg eo1c e5o6fe e5okk e1on.  e3onf e5onk e5onl e5onr e5opf
+e5ops e5or.  e1ord e1org eo5r6h eo1t e1pa e8pee e6p5e6g ep5ent e1p2f e1pi
+5epid e6pidem e1pl 5epos e6pos.  ep4p3a e1pr e1pä e1q e1ra.  er5aal
+8eraba e5rabel er5a6ben e5rabi er3abs er3ach era5e era5k6l er3all er3amt
+e3rand e3rane er3ans e5ranz.  e1rap er3arc e3rari er3a6si e1rat erat3s
+er3auf e3raum 3erbse er1c e1re 4e5re.  er3eck er5egg er5e2h 2erei e3rei.
+e8reine er5einr 6eren.  e4r3enm 4erer.  e6r5erm er5ero er5erst e4r3erz
+er3ess 5erfül er8gan.  5ergebn er2g5h 5ergänz 5erhöhu 2e1ri eri5ak
+e6r5iat e4r3ind e6r5i6n5i6 er5ins e6r5int er5itio er1kl 3erklä
+5erlös.  ermen6s er6nab 3ernst 6e1ro.  e1rod er1o2f e1rog 6e3roi ero8ide
+e3rol e1rom e1ron e3rop8 e2r1or e1ros e1rot er5ox ersch4 5erstat er6t5ein
+er2t1h er5t6her 2e1ru eruf4s3 e4r3uhr er3ums e5rus 5erwerb e1ry er5zwa
+er3zwu erä8m er5äs erö8 e3rös.  e6r1ü2b e1sa esa8b e8sap
+e6s5a6v e1sc esch4l ese1a es5ebe eserve5 e8sh es5ill es3int es4kop e2sl
+eso8b e1sp espei6s5 es2po es2pu 5essenz e6stabs e6staf e6st5ak est3ar
+e8stob e1str est5res es3ur e2sz e1sü e1ta et8ag etari5e eta8ta e1te
+eten6te et5hal e5thel e1ti 1etn e1to e1tr et3rec e8tscha et8se et6tei et2th
+et2t1r e1tu etu1s et8zent et8zw e1tä e1tö e1tü eu1a2 eu1e eue8rei
+eu5fe euin5 euk2 e1um.  eu6nio e5unter eu1o6 eu5p 3europ eu1sp eu5str eu8zo
+e1v eval6s eve5r6en ever4i e1w e2wig ex1or 1exp 1extr ey3er.  e1z e1ä2
+e5ö8 e1ü e8ßes fa6ch5i fade8 fa6del fa5el.  fal6lo falt8e fa1na
+fan4gr 6fanl 6fap far6ba far4bl far6r5a 2f1art fa1sc fau8str fa3y 2f1b2
+6f1c 2f1d 1fe 2f1eck fe6dr feh6lei f6eim 8feins f5eis fel5en 8feltern 8femp
+fe5rant 4ferd.  ferri8 fe8stof fe6str fe6stum fe8tag fet6ta fex1 2ff f1fa
+f6f5arm f5fe ffe5in ffe6la ffe8ler ff1f f1fla ff3lei ff4lie ff8sa ff6s5ta
+2f1g2 fgewen6 4f1h 1fi fid4 fi3ds fieb4 fi1la fi8lei fil4m5a f8in.  fi1na
+8finf fi8scho fi6u 6f1j 2f1k2 f8lanz fl8e 4f3lein 8flib 4fling f2lix 6f3lon
+5flop 1flor 5f8läc 3flöt 2f1m 2f1n 1fo foh1 f2on fo6na 2f1op fo5ra
+for8mei for8str for8th for6t5r fo5ru 6f5otte 2f1p8 f1q fr6 f5ram 1f8ran
+f8raß f8re.  frei1 5frei.  f3reic f3rest f1rib 8f1ric 6frig 1fris fro8na
+fräs5t 2fs f1sc f2s1er f5str fs3tät 2ft f1tak f1te ft5e6h ftere6 ft1h
+f1ti f5to f1tr ft5rad ft1sc ft2so f1tu ftwi3d4 ft1z 1fu 6f5ums 6funf fun4ka
+fu8ßend 6f1v 2f1w 2f1z 1fä fä1c 8färm 6fäug fä8ß
+föde3 8föf 3för 1fü fün4f3u 1ga ga6bl 6gabw 8gabz g3a4der
+ga8ho ga5isc 4gak ga1la 6g5amt ga1na gan5erb gan6g5a ga5nj 6ganl 8gansc
+6garb 2g1arc 2g1arm ga5ro 6g3arti ga8sa ga8sc ga6stre 2g1atm 6g5auf gau5fr
+g5aus 2g1b g5c 6gd g1da 1ge ge1a2 ge6an ge8at.  ge1e2 ge6es gef2 8geff
+ge1g2l ge1im 4g3eise geist5r gel8bra gelt8s ge5lö ge8nin gen3k 6g5entf
+ge3nä ge1or ge1ra ge6rab ger8au 8gerhö ger8ins ge1ro 6g5erz.
+ge1rä ge1rü ge1s ges2p ge5unt 4g3ex3 2g1f8 2g1g g1ha 6g1hei 5ghel.
+g5henn 6g1hi g1ho 1ghr g1hö 1gi gi5la gi8me.  gi1na 4g3ins gi3str g1j
+2g1k 8gl.  1glad g5lag glan4z3 1glas 6glass 5glaub g3lauf 1gle.  g5leb
+3gleic g3lein 5gleis 1glem 2gler 8g3leu gli8a g2lie 3glied 1g2lik 1g2lim
+g6lio 1gloa 5glom 1glon 1glop g1los g4loss g5luf 1g2ly 1glü 2g1m gn8
+6gn.  1gna 8gnach 2gnah g1nas g8neu g2nie g3nis 1gno 8gnot 1go goe1 8gof
+2gog 5gogr 6g5oh goni5e 6gonist go1ra 8gord 2g1p2 g1q 1gr4 g5rahm gra8m
+gra4s3t 6g1rec gre6ge 4g3reic g5reit 8grenn gri4e g5riem 5grif 2grig g5ring
+6groh 2grot gro6ß 4grut 2gs gs1ab g5sah gs1ak gs1an gs8and gs1ar gs1au
+g1sc gs1ef g5seil gs5ein g2s1er gs1in g2s1o gso2r gs1pr g2s1u 2g1t g3te
+g2t1h 1gu gu5as gu2e 2gue.  6gued 4g3uh 8gums 6g5unt gu1s gut3h gu2tu 4g1v
+2g1w gy1n g1z 1gä 8gä8m 6gärm 1gö 1gü 6güb 1haa hab8r
+ha8del hade4n 8hae ha5el.  haf6tr 2hal.  ha1la hal4b5a 6hale 8han.  ha1na
+han6dr han6ge.  2hani h5anth 6hanz 6harb h3arbe h3arme ha5ro ha2t1h h1atm
+hau6san ha8ß h1b2 h1c h1d he2bl he3cho h3echt he5d6s 5heft h5e6he.
+hei8ds h1eif 2hein he3ism he5ist.  heit8s3 hek6ta hel8lau 8helt he6mer
+1hemm 6h1emp hen5end hen5klo hen6tri he2nu 8heo he8q her3ab he5rak her3an
+4herap her3au h3erbi he1ro he8ro8b he4r3um her6z5er he4spe he1st heta6
+het5am he5th heu3sc he1xa hey5e h1f2 h1g hgol8 h1h h1iat hie6r5i hi5kt
+hil1a2 hil4fr hi5nak hin4ta hi2nu hi5ob hirn5e hir6ner hi1sp hi1th hi5tr
+5hitz h1j h6jo h1k2 hlabb4 hla4ga hla6gr h5lai hl8am h1las h1laß hl1c
+h1led h3lein h5ler.  h2lif h2lim h8linf hl5int h2lip h2lit h4lor h3lose
+h1läs hme5e h2nee h2nei hn3eig h2nel hne8n hne4p3f hn8erz h6netz h2nip
+h2nit h1nol hn5sp h2nuc h2nud h2nul hoch1 1hoh hoh8lei 2hoi ho4l3ar 1holz
+h2on ho1ra 6horg 5horn.  ho3sl hos1p ho4spi h1p hpi6 h1q 6hr h1rai h8rank
+h5raum hr1c hrcre8 h1red h3reg h8rei.  h4r3erb h8rert hrg2 h1ric hr5ins
+h2rom hr6t5erl hr2t1h hr6t5ra hr8tri h6rum hr1z hs3ach h6s5amt h1sc h6s5ec
+h6s5erl hs8erle h4sob h1sp h8spaß h8spel hs6po h4spun h1str h4s3tum
+hs3und h1sü h5ta.  h5tab ht3ac ht1ak ht3ang h5tanz ht1ar ht1at h5taub
+h1te h2t1ec ht3eff ht3ehe h4t3eif h8teim h4t3ein ht3eis h6temp h8tentf
+hte8ren h6terfü h8tergr h4t3erh h6t5ersc h8terst h8tese h8tess h2t1eu
+h4t3ex ht1he ht5hu h1ti ht5rak hts3ah ht1sc ht6sex ht8sk ht8so h1tu htz8
+h5tüm hub5l hu6b5r huh1l h5uhr.  huld5a6 hu8lent hu8lä h5up.  h1v
+h5weib h3weis h1z hä8kl häl8s häma8tu8 hä8sche.  hät1s
+häu4s3c 2hö.  2höe 8höi hö6s hös5c hühne6 hül4s3t
+hütte8re i5adn i1af i5ak.  i1al.  i1al1a i1alb i1ald i5alei i1alf i1alg
+i3alh i1alk i1all i1alp i1alr i1als i1alt i1alv i5alw i3alz i1an.  ia5na
+i3and ian8e ia8ne8b i1ang i3ank i5ann i1ant i1anz i6apo i1ar.  ia6rab i5arr
+i1as.  i1asm i1ass i5ast.  i1at.  i5ats i1au i5azz i6b5eig i6b5eis ib2le
+i4blis i6brig i6b5unt i6büb i1che ich5ei i6cherb i1chi ich5ins ich1l
+ich3m ich1n i1cho icht5an icht3r i1chu ich1w ick6s5te ic5l i1d id3arm
+3ideal ide8na 3ideol ide5rö i6diot id5rec id1t ie1a ie6b5ar iebe4s3
+ie2bl ieb1r ie8bra ie4bre ie8bä ie2dr ie1e8 ie6f5ad ief5f ie2f1l ie4fro
+ief1t i1ei ie4l3ec ie8lei ie4lek i3ell i1en.  i1end ien6e i3enf i5enn
+ien6ne.  i1enp i1enr i5ensa ien8stal i5env i1enz ie5o ier3a4b ie4rap i2ere
+ie4rec ie6r5ein ie6r5eis ier8er i3ern.  ie8rum ie8rund ie6s5che ie6tau
+ie8tert ie5the ie6t5ri i1ett ie5un iex5 2if i1fa if5ang i6fau if1fr if5lac
+i5f6lie i1fre ift5a if6t5r ig3art 2ige i8gess ig5he i5gla ig2ni i5go ig3rot
+ig3s2p i1ha i8ham i8hans i1he i1hi ih1n ih1r i1hu i8hum ih1w 8i1i ii2s ii2t
+i1j i1k i6kak i8kerz i6kes ik4ler i6k5unt 2il i5lac i1lag il3ans i5las
+i1lau il6auf i1le ile8h i8lel il2fl il3ipp il6l5enn i1lo ilt8e i1lu i1lä
+i8mart imb2 i8mele i8mid imme6l5a i1mu i1mä i5mö ina5he i1nat in1au
+inau8s 8ind.  in4d3an 5index ind2r 3indus i5nec i2n1ei i8nerw 3infek 1info
+5ingeni ing5s6o 5inhab ini5er.  5inj in8kät in8nan i1no inoi8d in3o4ku
+in5sau in1sp 5inspe 5instit 5instru ins4ze 5intere 5interv in3the in5t2r
+i5ny inä2 i1när in1äs inö8 in5öd i1nös 2io io1a8 io1c
+iode4 io2di ioi8 i1ol.  i1om.  i1on.  i5onb ion2s1 i1ont i5ops i5o8pt i1or.
+i3oral io3rat i5orc i1os.  i1ot.  i1o8x 2ip i1pa i1pi i1p2l i1pr i1q i1ra
+ir6bl i1re i1ri ir8me8d ir2m1o2 ir8nak i1ro ir5rho ir6schl ir6sch5r i5rus
+i5ry i5rä i1sa i8samt i6sar i2s1au i8scheh i8schei isch5m isch3r
+ischä8 is8ele ise3ra i4s3erh is3err isi6de i8sind is4kop ison5e is6por
+i8s5tum i5sty i5sö i1ta it5ab.  i2t1a2m i8tax i1te i8tersc i1thi i1tho
+i5thr it8hä i1ti i8ti8d iti6kl itmen4 i1to i8tof it3ran it3rau i1tri
+itri5o it1sc it2se it5spa it8tru i1tu it6z5erg it6z1w i1tä itä6r5e
+ität2 itäts5 i1tü i1u iu6r 2i1v i6vad iva8tin i8vei i6v5ene i8verh
+i2vob i8vur i1w iwi2 i5xa i1xe i1z ize8n i8zir i6z5w iä8m i1ä6r
+i5ät.  i5äv i1ö8 iü8 i6ß5ers ja5la je2t3r 6jm 5jo jo5as
+jo1ra jou6l ju5cha jugen4 jugend5 jung5s6 ju1s 3jä 1ka 8kachs 8kakz
+ka1la kal5d kam5t ka1na 2kanl 8kapf ka6pl ka5r6a 6k3arbe ka1ro kar6p5f
+4k3arti 8karz ka1rä kasi5e ka6teb kat8ta kauf6s kau3t2 2k1b 2k1c 4k1d
+kehr6s kehrs5a 8keic 2k1eig 6k5ein 6k5eis ke6lar ke8leis ke8lo 8kemp
+k5ente.  k3entf 8k5ents 6kentz ke1ra k5erlau 2k1f8 2k1g 2k1h ki5fl 8kik
+king6s5 6kinh ki5os ki5sp ki5th 8ki8ö 2k1k2 kl8 1kla 8klac k5lager
+kle4br k3leib 3kleid kle5isc 4k3leit k3lek 6k5ler.  5klet 2klic 8klig k2lim
+k2lin 5klip 5klop k3lor 1klä 2k1m kmani5e kn8 6kner k2ni knä8 1k2o
+ko1a2 ko6de.  ko1i koi8t ko6min ko1op ko1or ko6pht ko3ra kor6d5er ko5ru
+ko5t6sc k3ou 3kow 6k5ox 2k1p2 k1q 1kr8 4k3rad 2k1rec 4k3reic kre5ie 2krib
+6krig 2krip 6kroba 2ks k1sa k6sab ksal8s k8samt k6san k1sc k2s1ex k5spat
+k5spe k8spil ks6por k1spr kst8 k2s1uf 2k1t kta8l kt5a6re k8tein kte8re
+k2t1h k8tinf kt3rec kt1s 1ku ku1ch kuck8 k3uhr ku5ie kum2s1 kunfts5 kun2s
+kunst3 ku8rau ku4ro kurz1 ku1st 4kusti ku1ta ku8ß 6k1v 2k1w ky5n 2k1z
+1kä kä4m 4k3ämi käse5 1kö kö1c kö1s 1kü kü1c
+kür6sc kü1s 1la.  8labf 8labh lab2r 2l1abs lach3r la8dr 5ladu 8ladv
+6laff laf5t la2gn 5laken 8lamb la6mer 5lampe.  2l1amt la1na 1land lan4d3a
+lan4d3r lan4gr 8lanme 6lann 8lanw 6lanä 8lappa lap8pl lap6pr l8ar.
+la5ra lar4af la8rag la8ran la6r5a6s l3arbe la8rei 6larm.  la8sa la1sc
+la8sta lat8i 6l5atm 4lauss 4lauto 1law 2lb l8bab l8bauf l8bede l4b3ins
+l5blo lbst5an lbst3e 8lc l1che l8chert l1chi lch3m l5cho lch5w 6ld l4d3ei
+ld1re l6düb le2bl le8bre lecht6s5 led2r 6leff le4gas 1lehr lei6br le8inf
+8leinn 5leistu 4lektr le6l5ers lemo2 8lemp l8en.  8lends 6lendun le8nend
+len8erw 6l5ents 4l3entw 4lentz 8lenzy 8leoz 6lepi le6pip 8lepo 1ler l6er.
+8lerbs 6l5erde le8reis le8rend le4r3er 4l3erg l8ergr 6lerkl 6l5erzie
+8lerö 8lesel lesi5e le3sko le3tha let1s 5leuc 4leuro leu4s3t le5xe 6lexp
+l1f 2l1g lgend8 l8gh lglie3 lglied6 6l1h 1li li1ar li1as 2lick li8dr li1en
+lien6n li8ers li8ert 2ließ 3lig li8ga8b li1g6n li1l8a 8limb li1na
+4l3indu lings5 4l3inh 6linj link4s3 4linkt 2lint 8linv lion5s6t 4lipp 5lipt
+4lisam livi5e 6l1j 6l1k l8keim l8kj lk2l lko8f lkor8 lk2sa lk2se 6ll l1la
+ll3a4be l8labt ll8anl ll1b ll1c ll1d6 l1le l4l3eim l6l5eise ller3a l4leti
+l5lip l1lo ll3ort ll5ov ll6spr llte8 l1lu ll3urg l1lä l5lü l6lüb
+2l1m l6m5o6d 6ln l1na l1no 8lobl lo6br 3loch.  l5o4fen 5loge.  5lohn 4l3ohr
+1lok l2on 4l3o4per lo1ra 2l1ord 6lorg 4lort lo1ru 1los.  lo8sei 3losig
+lo6ve lowi5 6l1p lp2f l8pho l8pn lp4s3te l2pt l1q 8l1r 2ls l1sa l6sarm l1sc
+l8sec l6s5erg l4s3ers l8sh l5s6la l1sp ls4por ls2pu l1str l8suni l1sü
+2l1t lt5amp l4t3ein l5ten l6t5eng l6t5erp l4t3hei lt3her l2t1ho l6t5i6b
+lti1l l8trö lt1sc lt6ser lt4s3o lt5ums lu8br lu2dr lu1en8 8lu8fe luft3a
+luf8tr lu6g5r 2luh l1uhr lu5it 5luk 2l1umf 2l1umw 1lun 6l5u6nio 4l3unte
+lu5ol 4lurg 6lurs l3urt lu4sto lu3str lu6st5re lu8su lu6tal lu6t5e6g
+lu8terg lu3the lu6t5or lu2t1r lu6ß5 l1v lve5r6u 2l1w 1ly lya6 6lymp
+ly1no l8zess l8zo8f l3zwei lz5wu 3länd lä5on lä6sc lät1s
+5läuf 2läug läu6s5c lä5v l1öl 1lös lö1ß6t 6l1übe
+1ma 8mabg ma5chan mad2 ma5el 4magg mag8n ma1la ma8lau mal5d 8malde mali5e
+malu8 ma8lut 2m1amp 3man mand2 man3ds 8mangr mani5o 8m5anst 6mappa 4m3arbe
+mar8kr ma1r4o mar8schm 3mas ma1sc ma1tö 4m5auf ma5yo 2m1b mb6r 2m1c 2m1d
+md6sä 1me me1ch me5isc 5meld mel8sa 8memp me5nal men4dr men8schl
+men8schw 8mentsp me1ra mer4gl me1ro 3mes me6s5ei me1th me8ß 2m1f6 2m1g
+2m1h 1mi mi1a mi6ale mi1la 2m1imm mi1na mi5nü mi4s3an mit1h mi5t6ra
+3mitt mitta8 mi6ß5 6mj 2m1k8 2m1l 2m1m m6mad m6m5ak m8menth m8mentw
+mme6ra m2mn mm5sp mm5ums mmut5s m8män m1n8 m5ni 1mo mo5ar mo4dr 8mof
+mo8gal mo4kla mol5d m2on mon8do mo4n3od mont8a 6m5ony mopa6 mo1ra mor8d5a
+mo1sc mo1sp 5mot moy5 2mp m1pa mpfa6 mpf3l mphe6 m1pi mpin6 m1pl mp2li
+m2plu mpo8ste m1pr mprä5 mp8th mput6 mpu5ts m1pö 8m1q 2m1r 2ms ms5au
+m1sc msch4l ms6po m3spri m1str 2m1t mt1ar m8tein m2t1h mt6se mt8sä mu5e
+6m5uh mumi1 1mun mun6dr muse5e mu1ta 2m1v mvol2 mvoll3 2m1w 1my 2m1z
+mä6kl 1män mä1s mä5tr mäu4s3c 3mäß möb2 6möl
+1mü 5mün 3müt 1na.  n5ab.  8nabn n1abs n1abz na6bä na2c nach3e
+3nacht 1nae na5el n1afr 1nag 1n2ah na8ha na8ho 1nai 6nair na4kol n1akt
+nal1a 8naly 1nama na4mer na1mn n1amp 8n1amt 5nanc nan6ce n1and n6and.
+2n1ang 1nani 1nann n1ans 8nanw 5napf.  1n2ar.  na2ra 2n1arc n8ard 1nari
+n8ark 6n1arm 5n6ars 2n1art n8arv 6natm nat6s5e 1naue 4nauf n3aug 5naui
+n5auk na5um 6nausb 6nauto 1nav 2nax 3naz 1naß n1b2 nbau5s n1c nche5e
+nch5m 2n1d nda8d n2d1ak nd5ans n2d1ei nde8lac ndel6sa n8derhi nde4se
+nde8stal n2dj ndnis5 n6d5or6t nd3rec nd3rot nd8samt nd6sau ndt1h n8dumd 1ne
+ne5as ne2bl 6n5ebn 2nec 5neei ne5en ne1g4l 2negy 4n1ein 8neis 4n3e4lem
+8nemb 2n1emp nen1a 6n5energ nen3k 8nentb 4n3en3th 8nentl 8n5entn 8n5ents
+ne1ra ne5r8al ne8ras 8nerbi 6n5erde.  nere5i6d nerfor6 6n5erhö 8nerlö
+2n1err n8ers.  6n5ertra 2n1erz nesi3e net1h neu4ra neu5sc 8neuß n1f nf5f
+nf2l nflei8 nf5lin nft8st n8g5ac ng5d ng8en nge8ram ngg2 ng1h n6glic ng3rip
+ng8ru ng2se4 ng2si n2g1um n1gy n8gäl n1h nhe6r5e 1ni ni1bl ni5chä
+ni8dee n6ie ni1en nie6s5te niet5h ni8etn 4n3i6gel n6ik ni1la 2n1imp ni5na
+2n1ind 8ninf 6n5inh ni8nit 6n5inn 2n1ins 4n1int n6is ni3str ni1th ni1tr n1j
+n6ji n8kad nk5ans n1ke n8kerla n1ki nk5inh n5klö n1k2n n8k5not nk3rot
+n8krü nk5spo nk6t5r n8kuh n6küb n5l6 nli4mi n1m nmen4s n1na n8nerg
+nni5o n1no nn4t3ak nnt1h nnu1e n1ny n1nä n1nö n1nü no5a no4b3la
+4n3obs 2nobt noche8 no6die no4dis no8ia no5isc 6n5o6leu no4mal noni6er
+2n1onk n1ony 4n3o4per 6nopf 6nopti no3ra no4ram nor6da 4n1org 2n1ort n6os
+no1st 8nost.  no8tan no8ter noty6pe 6n5ox n1p2 n1q n1r nrös3 6ns n1sac
+ns3ang n1sc n8self n8s5erf n8serg n6serk ns5erw n8sint n1s2pe n1spr
+n6s5tat.  n5s6te.  n6stob n1str n1ta n4t3a4go nt5anh nt3ark nt3art n1te
+nt3eis nte5n6ar nte8nei nter3a nte6rei nt1ha nt6har n3ther nt5hie n3thus
+n1ti nti1c n8tinh nti1t ntlo6b ntmen8 n1to nt3o4ti n1tr ntra5f ntra5ut
+nt8rea nt3rec nt8rep n4t3rin nt8rop n4t3rot n4trü nt1s nts6an nt2sk n1tu
+nt1z n1tä n1tö n8töl n1tü 1nu nu1a nu5el nu5en 4n1uhr nu5ie
+8numl 6n5ums 6n5umw 2n1und 6nuni 6n5unr 2n1unt 2nup 2nu6r n5uri nu3skr
+nu5ta n1v 8n1w 1nys n1za n6zab n2z1ar n6zaus nzi4ga n8zof n6z5unt n1zw
+n6zwir 1näc 5näe 5näi n8äl nä6m nä6re n5ärz 5näus
+n1öl 1nöt n5öz 5nü.  6n1ü2b 5nüß o5ab.  oa2l o8ala
+o1a2m o1an ob1ac obe4ra o6berh 5o4bers o4beru obe6ser 1obj o1bl o2bli ob5sk
+3obst.  ob8sta obst5re ob5sz o1che oche8b o8chec o3chi och1l och3m ocho8f
+o3chro och3to o3chu och1w o1d o2d1ag od2dr ode5i ode6n5e od1tr o5e6b
+o5e6der.  oe8du o1ef o1e2l o1e2p o1er.  o5e8x o1fa of8fan 1offi of8fin
+of6f5la o5fla o1fr 8o1g og2n o1ha o1he o6h5eis o1hi ohl1a oh1le oh4l3er
+5ohm.  oh2ni o1ho oh1re oh1ru o1hu oh1w o1hy o1hä o5ia o1id.  o8idi
+oi8dr o5ids o5isch.  oiset6 o1ism o3ist.  o5i6tu o1j o1k ok2l ok3lau
+o8klä 1okta o1la old5am old5r o1le ole5in ole1r ole3u ol6gl ol2kl olk4s1
+ol8lak ol8lauf.  ol6lel ol8less o1lo ol1s ol6sk o1lu oly1e2 5olym o2mab
+om6an o8mau ombe4 o8merz om5sp o1mu o8munt o1mä o1mö o1na ona8m on1ax
+on8ent o6n5erb 8oni oni5er.  on1k on6n5a6b o1no ono1c o4nokt 1ons onts8
+o1nä oo8f 1oog oo2pe oo2sa o1pa 3o4pera o3pfli opf3lo opf3r o1pi o1pl
+o2pli o5p6n op8pa op6pl o1pr o3p4ter 1opti o1pä o5pö o1q o1ra.  o3rad
+o8radd 1oram o6rang o5ras o8rauf or5cha or4d3a4m or8dei or8deu 1ordn or4dos
+o1re o5re.  ore2h o8r5ein ore5isc or6enn or8fla or8fli 1orga 5orgel.  or2gl
+o1ri 5o6rient or8nan or8nä o1ro or1r2h or6t5an or8tau or8tere o1rus o1ry
+o1rä or1ü2 o1sa osa3i 6ose o8serk o1sk o6ske o6ski os2kl os2ko os2kr
+osni5e o2s1o2d o3s4per o4stam o6stau o3stra ost3re osu6 o6s5ur o5s6ze o1ta
+ot3auf o6taus o1te o6terw o1th othe5u o2th1r o1ti o1to oto1a ot1re o1tri
+o1tro ot1sc o3tsu ot6t5erg ot2t3h ot2t5r ot8tö o1tu ou3e ouf1 ou5f6l
+o5u6gr ou5ie ou6rar ou1t6a o1v o1wa o1we o6wer.  o1wi owid6 o1wo o5wu o1xe
+oy5al.  oy1e oy1i o5yo o1z oza2r 1o2zea ozo3is oö8 oß5elt oß1t
+3paa pa6ce 5pad pag2 1pak pa1la pa8na8t pani5el pa4nor pan1s2 1pap pap8s
+pa8rei par8kr paro8n par5o6ti part8e 5partei 3partn pas6sep pa4tha 1pau
+6paug pau3sc p1b 8p5c 4p1d 1pe 4peic pe5isc 2pek pen3k pen8to8 p8er pe1ra
+pere6 per5ea per5eb pe4rem 2perr per8ran 3pers 4persi pe3rü pe4sta pet2s
+p2f1ec p4fei pf1f pf2l 5pflanz pf8leg pf3lei 2pft pf3ta p1g 1ph 2ph.
+2p1haf 6phb 8phd 6p5heit ph5eme 6phg phi6e 8phk 6phn p5holl pht2 ph3tha
+4ph3the phu6 6phz pi1en pi5err pi1la pi1na 5pinse pioni8e 1pis pi1s2k pi1th
+p1k pl8 5pla p2lau 4plei p3lein 2pler 6p5les 2plig p6lik 6p5ling p2liz
+plo8min 6p1m p1n 1p2o 8poh 5pol po8lan poly1 po3ny po1ra 2porn por4t3h
+po5rö 5poti p1pa p6p5ei ppe6la pp5f p2p1h p1pi pp1l ppp6 pp5ren pp1s
+p5pö pr6 3preis 1pres 2p3rig 5prinz 1prob 1prod 5prog pro8pt pro6t5a
+prote5i 8proß prä3l 1präs präte4 1prüf p5schl 2pst 1p2sy p1t
+p8to8d pt1s 5p6ty 1pu pu1b2 2puc pu2dr puf8fr 6p5uh pun8s pu8rei pu5s6h
+pu1ta p1v p3w 5py py5l p1z pä6der p5ä6m pä8nu 8pär pät5h
+pät1s qu6 1qui 8rabk ra6bla 3rable ra2br r1abt 6rabz ra4dan ra2dr 5rafal
+ra4f3er ra5gla ra2g3n 6raha ral5am 5rald 4ralg ra8lins 2rall ral5t 8ramei
+r3anal r6and ran8der ran4dr 8ranf 6ranga 5rangi ran8gli r3angr rans5pa
+8ranw r8anz.  ra5or 6rapf ra5pl rap6s5er 2r1arb 1rarh r1arm ra5ro 2r1art
+6r1arz ra8tei ra6t5he 6ratl ra4t3ro r5atta raue4n 6raus.  r5austa rau8tel
+raut5s ray1 r1b rb5lass r6bler rb4lie rbon6n r8brecht rb6s5tä r8ces
+r1che rch1l rch3m rch3re rch3tr rch1w 8rd r1da r8dachs r8dap rda5ro rde5ins
+rdio5 r8dir rd3ost r1dr r8drau 1re.  re1ak 3reakt re3als re6am.  re1as
+4reben re6bl rech5a r8edi re3er 8reff 3refl 2reh 5reha r4ei.  reich6s5
+8reier 6reign re5imp 4r3eina 6r3einb 6reing 6r5einn 6reinr 4r3eins r3eint
+reli3e 8r5elt 6rempf 2remt ren5a6b ren8gl r3enni 1reno 5rente 4r3enth
+8rentl 4r3entw 8rentz ren4zw re1on requi5 1rer rer4bl 6rerbs 4r3erd
+8rerhö 8rerkl 4r3erla 8rerlö 4r3erns 6r5ernä rer5o 6r5erreg r5ertr
+r5erwec r5erö re2sa re8schm 2ress re5u8ni 6rewo 2r1ex r1f r8ferd rf4lie
+8r1g r8gah rge4bl rge5na rgest4 rg6ne r2gni2 r8gob r4g3ret rg8sel r1h8 r2hy
+5rhyt ri1ar ri5cha rid2g r2ie rieg4s5 ri8ei ri1el ri6ele ri1en ri3er.
+ri5ers.  ri6fan ri8fer ri8fr 1r2ig ri8kn ri5la rimä8 ri1na r8inde rin4ga
+rin6gr 1rinn 6rinner rino1 r8insp 4rinst ri1nä ri5o6ch ri1o2d ri3o6st
+2r1ir r2is ri3sko ri8spr ri8stü ri5sv r2it 6r5i6tal ri5tr ri6ve.  8r1j
+6rk r1ke rkehrs5 r1ki r3klin r1k2n rk3str rk4t3an rk6to r6kuh rkä4s3t
+r1l r5li rline5a 6r1m r6manl rma4p r4m3aph r8minf r8mob rm5sa 2rn r1na
+rna8be r5ne rn2ei r6neif r6nex r6nh rn1k r1no r6n5oc rn1sp r1nä r1nü
+ro6bern 6robs ro1ch 3rock.  ro5de ro1e 4rofe ro8hert 1rohr ro5id ro1in
+ro5isc 6rolym r2on 6roog ro6phan r3ort ro1s2p ro5s6w ro4tau ro1tr ro6ts
+5rout r1p rpe8re rp2f r2ps r2pt r1q 2rr r1ra r1re rrer6 rr6hos r5rhö
+r1ri r1ro rro8f rr8or rror5a r1ru r3ry r1rä r1rö r1rü 2r1s r6sab
+r4sanf rse6e rse5na r2sh r6ska r6ski rs2kl r8sko r2sl rs2p r6stauf r8sterw
+r8stran rswi3d4 r2sz 2r1t rt3art r8taut r5tei rt5eige r8tepe r4t3erh
+r8terla r4t3hei r5t6hu r4t3int rt5reif rt1sc rt6ser rt6s5o rt6s5u rt5und
+r8turt rube6 ru1en 1r4uf ruf4st ru1ie 2r1umg 2r1uml 2rums run8der run4d5r
+6rundz 6runf 8runs 2r1unt 2r1ur r6us ru6sta ru3str ru6tr 1ruts r1v rven1
+rvi2c r1w r1x r1za rz5ac r6z5al r8z1ar r8zerd r6z5erf rz8erh rz4t3h r8zum
+rä4ste räu8sc r1öf 5röhr rö5le 3röll 5römis r1ör
+rö2sc 3rümp 1sa.  1saa s3a4ben sa2bl 2s1abs 6s1abt 6sabw 3sack.
+6s3a4der 1saf sa1fa 4s1aff sa5fr 1sag 1sai sa1i2k1 4s1akt 1sal sa1la
+4s3alpi 6salter salz3a 1sam s5anb san2c 1sand s5angeh 6sanl 2s1ans 6s3antr
+8s1anw s1ap s6aph 8sapo sap5p6 s8ar.  2s1arb 3sarg s1arm sa5ro 2s1art
+6s1arz 1sas 1sat sat8a 2s1atl sa8tom 3s8aue s5auff sau5i s6aur 2s1aus
+5s6ause 2s1b2 2sca s4ce 8sch.  3scha.  5schade 3schaf 3schal sch5ame
+8schanc 8schb 1sche 6schef 8schex 2schf 2schg 2schh 1schi 2schk 5schlag
+5schlu 6schmäß 6schnaß 1scho 6schord 6schp 3schri 8schric 8schrig
+8schrou 6schs 2scht sch3ta sch3tr 1schu 8schunt 6schv 2schz 5schö
+5schü 2sco scre6 6scu 2s1d 1se se5an se1ap se6ben se5ec see5i6g se3erl
+8seff se6han se8hi se8hö 6s5eid.  2s1eig s8eil 5sein.  sei5n6e 6s5einh
+3s8eit 3sel.  se4lar selb4 6s3e4lem se8lerl 2s1emp sen3ac se5nec 6s5ents
+4sentz s8er.  se8reim ser5inn 8sermä 8s5erzi 6seröf se1um 8sexa 6sexp
+2s1f2 sfal8ler 2s3g2 sge5b2 s1h s8hew 5s6hip 5s4hop 1si 2siat si1b sicht6s
+6s5i6dee siege6s5 si1en si5err si1f2 si1g2n si6g5r si8kau sik1i si4kin
+si2kl si8kü si1la sil6br si1na 2s1inf sin5gh 2s1inh sinne6s5 2s1ins
+si5ru si5str 4s1j s1k2 6sk.  2skau skel6c skelch5 s6kele 1s2ki.  3s4kin.
+s6kiz s8kj 6skn 2skow 3skrib 3skrip 2sku 8skü s1l s8lal slei3t s4low
+2s1m s1n 6sna 6snot 1so so1ch 2s1odo so4dor 6s5o4fen solo3 s2on so5of 4sope
+so1ra 2s1ord 4sorga sou5c so3un 4s3ox sp2 8spaa 5spal 1span 2spap s2pec
+s4peis 1spek s6perg 4spers s6pes 2s1pf 8sphi 1s2phä 1spi spi4e 6s5pig
+6spinse 2spis 2spla 2spol 5s6pom 6s5pos 6spoti 1spra 3s8prec 6spreis
+5spring 6sprob 1spru s2pul 1s2pur 6spy 5spän 1spü s1q 2s1r 2s1s2
+sse8nu ssini6s ssoi6r 2st.  1sta 4stafe 2stag sta3la 6stale 4stalg 8stalk
+8stamt 6st5anf 4stans 6stanw 6starb sta4te 6staus 2stb 6stc 6std 1ste
+4steil 3s2tel st3elb 8stemb 6steppi 8stese 8stesse 6stf 2stg 2sth st1ha
+st3hei s8t1hi st1ho st5hu 1sti sti4el 4stigm sti3na 6stind 4stinf sti8r
+2stk 2stl 2stm 1sto 6stoll.  4st3ope 6stopf.  6stord 6stp 5stra.  4strai
+3s4tral 6s5traum 3straß 3strec 6s3tref 8streib 5streif 6streno 6stres
+6strev 5s6tria 6strig 5strik 8strisi 3s4troa s8troma st5rose 4struf 3strum
+6sträg 2st1s6 2stt 1stu stu5a 4stuc 2stue 8stun.  2stv 2stw s2tyl 6stz
+1stä 8stäg 1stö 1stü 8stüch 4stür.  1su su2b1 3suc su1e
+su2fe su8mar 6sumfa 8sumk 2s1unt sup1p2 6s5u6ran 6surte 2s1v 2s1w 1sy 8syl.
+sy5la syn1 sy2na syne4 s1z s4zend 5s6zene.  8szu 1sä 6s5änd 6säugi
+6säuß 5söm 2s1ü2b 1süc sü8di 1sün 5süß taats3
+4tab.  taba6k ta8ban tab2l ta6bre 4tabs t3absc 8tabz 6t3acht ta6der 6tadr
+tad6s tad2t 1tafe4 1tag ta6ga6 ta8gei tage4s tag6s5t tah8 tahl3 tai6ne.
+ta5ir.  tak8ta tal3au 1tale ta8leng tal5ert 6t5a6mer 6tamp tampe6 2t1amt
+tan5d6a tan8dr tands5a tani5e 6tanl 2tanr t3ans 8t5antr tanu6 t5anw 8tanwa
+tan8zw ta8rau 6tarbe 1tari 2tark 2t1arm ta1ro 2tart t3arti 6tarz ta1sc
+ta6sien ta8stem ta8sto t5aufb 4taufn 8taus.  5tause 8tausf 6tausg t5ausl
+2t1b2 2t1c t6chu 2t1d te2am tea4s te8ben 5techn 4teff te4g3re te6hau 2tehe
+te4hel 2t1ehr te5id.  teig5l 6teign tei8gr 1teil 4teinh t5einhe 4teis
+t5eisen 8teiw te8lam te4lar 4telek 8telem te6man te6n5ag ten8erw ten5k
+tens4p ten8tro 4t3entw 8tentz te6pli 5teppi ter5a6b te3ral ter5au 8terbar
+t5erbe.  6terben 8terbs 4t3erbt t5erde.  ter5ebe ter5ein te8rers terf4
+8terhö 6terklä ter8nor ter6re.  t8erscha t5e6sel te8stau t3euro te1xa
+tex3e 8texp tex6ta 2t1f2 2t1g2 2th.  th6a 5tha.  2thaa 6t1hab 6t5haf t5hah
+8thak 3thal.  6thals 6t3hand 2t1hau 1the.  3t4hea t1heb t5heil t3heit
+t3helf 1theo 5therap 5therf 6t5herz 1thes 1thet 5thi.  2t1hil t3him 8thir
+3this t5hj 2th1l 2th1m th1n t5hob t5hof 4tholz 6thopti 1thr6 4ths t1hum
+1thy 4t1hä 2t1hö t1hü ti1a2m ti1b tie6fer ti1en ti8gerz tig3l
+ti8kin ti5lat 1tilg t1ind tin4k3l ti3spa ti5str 5tite ti5tr ti8vel ti8vr
+2t1j 2t1k2 2t1l tl8a 2t1m8 2t1n 3tobe 8tobj to3cha 5tocht 8tock tode4
+to8del to8du to1e 6t5o6fen to1in toi6r 5toll.  to8mene t2ons 2t1ony to4per
+5topf.  6topt to1ra to1s to6ska tos2l 2toti to1tr t8ou 2t1p2 6t1q tr6
+tra5cha tra8far traf5t 1trag tra6gl tra6gr t3rahm 1trai t6rans tra3sc
+tra6st 3traue t4re.  2trec t3rech t8reck 6t1red t8ree 4t1reg 3treib 4treif
+8t3reis 8trepo tre6t5r t3rev 4t3rez 1trib t6rick tri6er 2trig t8rink
+tri6o5d trizi5 tro1a 3troc trocke6 troi8d tro8man.  tro3ny 5tropf 6t5rosa
+t5roß 5trub 5trup trut5 1träg 6t1röh 5trüb trü3bu t1rüc
+t1rüs 2ts ts1ab t1sac tsa8d ts1ak t6s5alt ts1an ts1ar ts3auf t3schr
+t5schä tse6e tsee5i tsein6s ts3ent ts1er t8serf t4serk t8sh 5t6sik
+t4s3int ts5ort.  t5s6por t6sprei t1st t6s5tanz ts1th t6stit t4s3tor 1t2sua
+t2s1uf t8sum.  t2s1u8n t2s1ur 2t1t tt5eif tte6sa tt1ha tt8ret tt1sc tt8ser
+tt5s6z 1tuc tuch5a 1tu1e 6tuh t5uhr tu1i tu6it 1tumh 6t5umr 1tums 8tumt
+6tund 6tunf 2t1unt tu5ra tu6rau tu6re.  tu4r3er 2t1v 2t1w 1ty1 ty6a ty8la
+8tym 6ty6o 2tz tz5al tz1an tz1ar t8zec tzeh6 tzehn5 t6z5ei.  t6zor t4z3um
+t6zäu 5täg 6täh t5ält t8än täre8 8tä8st 6täuß
+t5öffen 8tö8k 1tön 4tüb t6ü5ber.  5tüch 1tür.  u3al.
+u5alb u5alf u3alh u5alk u3alp u3an.  ua5na u3and u5ans u5ar.  ua6th u1au
+ua1y u2bab ubi5er.  u6b5rit ubs2k u5bö u8büb 2uc u1che u6ch5ec u1chi
+uch1l uch3m uch5n uch1r uch5to ucht5re u1chu uch1w uck1a uck5in u1d ud4a
+u1ei u6ela uene8 u6ep u1er uer1a ue8rerl uer5o u8esc u2est u8ev u1fa u2f1ei
+u4f3ent u8ferh uf1fr uf1l uf1ra uf1re uf1rä uf1rü uf1s2p uf1st uft1s
+u8gabt u8gad u6gap ugeb8 u8gn ugo3s4 u1ha u1he u1hi uh1le u1ho uh1re u1hu
+uh1w u1hä u1hö 6ui ui5en u1ig u3ins uin8tes u5isch.  u1j 6uk u1ke
+u1ki u1kl u8klu u1k6n u5ky u1la uld8se u1le ul8lac ul6lau ul6le6l ul6lo
+ulni8 u1lo ulo6i ult6a ult8e u1lu ul2vr u1lä u1lö 3umfan 5umlau umo8f
+um8pho u1mu umu8s u5mö u1n1a un2al un6at unau2 6und.  5undein un4d3um
+3undzw undü8 un8düb une2b un1ec une2h un3eis 3unfal 1unfä 5ungea
+3unglü ung2s1 un8gä 1u2nif un4it un8kro unk5s u1no unpa2 uns2p unvol4
+unvoll5 u5os.  u1pa u1pi u1p2l u1pr up4s3t up2t1a u1q u1ra ur5abs ura8d
+ur5ah u6rak ur3alt u6rana u6r5ans u8rap ur5a6ri u8ratt u1re ur3eig ur8gri
+u1ri ur5ins 3urlau urmen6 ur8nan u1ro 3ursac ur8sau ur8sei ur4sk 3urtei
+u1ru uru5i6 uru6r u1ry ur2za ur6zä ur5ä6m u5rö u1rü urück3
+u1sa usa4gi u2s1ar u2s1au u8schec usch5wi u2s1ei use8kel u8sl u4st3a4b
+us3tau u3s4ter u2s1uf u8surn ut1ac u1tal uta8m u1tan ut1ar u1tas ut1au u1te
+u8teic u4tent u8terf u6terin u4t3hei ut5ho ut1hu u1ti utine5 uti6q u1to
+uto5c u1tr ut1sa ut1s6p ut6stro u1tu utz5w u1u u1v uve5n uve3r4ä u1w
+u1xe u5ya uy5e6 u1yi u2z1eh u8zerh u5ö uße6n ußen5e 8vanb 6vang
+6varb var8d va6t5a va8tei va2t1r 2v1b 6v5c 6vd 1ve 6ve5g6 ver1 ver5b verb8l
+ve2re2 verg8 ve2ru8 ve1s ve2s3p ve3xe 2v1f 2v1g 6v5h vi6el vie6w5 vi1g4
+vi8leh vil6le.  8vint vi1ru vi1tr 2v1k 2v1l 2v1m 4v5n 8vo8f voi6le vol8lend
+vol8li v2or1 vo2re vo8rin vo2ro 2v1p 8vra v6re 2v1s 2v1t 2v1v 4v3w 2v1z
+waffe8 wa6g5n 1wah wah8n wa5la wal8din wal6ta wan4dr 5ware wa8ru war4za
+1was w5c w1d 5wech we6fl 1weg we8geng weg5h weg3l we2g1r weh6r5er 5weise
+weit3r wel2t welt3r we6rat 8werc 5werdu wer4fl 5werk.  wer4ka wer8ku wer4ta
+wer8term we2sp we8stend we6steu we8str we8stö wet8ta wich6s5t 1wid wi2dr
+wiede4 wieder5 wik6 wim6ma win4d3r 5wirt wisch5l 1wj 6wk 2w1l 8w1n wo1c
+woche6 wol6f wor6t5r 6ws2 w1sk 6w5t 5wunde.  wun6gr wu1sc wu2t1 6w5w wy5a
+wärme5 wä1sc 1xag x1ak x3a4men 8xamt x1an 8x1b x1c 1xe.  x3e4g 1xen
+xe1ro x1erz 1xes 8xf x1g 8x1h 1xi 8xid xi8so 4xiste x1k 6x1l x1m 8xn 1xo
+8x5o6d 8x3p2 x1r x1s6 8x1t x6tak x8terf x2t1h 1xu xu1e x5ul 6x3w x1z 5ya.
+y5an.  y5ank y1b y1c y6cha y4chia y1d yen6n y5ern y1g y5h y5in y1j y1k2
+y1lak yl1al yla8m y5lax y1le y1lo y5lu y8mn ym1p2 y3mu y1na yno2d yn1t
+y1on.  y1o4p y5ou ypo1 y1pr y8ps y1r yri3e yr1r2 y1s ys5iat ys8ty y1t y3w
+y1z yä8m z5a6b zab5l 8za6d 1zah za5is 4z3ak 6z1am 5zange.  8zanl 2z1ara
+6z5as z5auf 3zaun 2z1b 6z1c 6z1d 1ze ze4dik 4z3eff 8zein zei4ta zei8ters
+ze6la ze8lec zel8th 4zemp 6z5engel zen8zin 8zergä zer8i ze1ro zers8
+zerta8 zer8tab zer8tag 8zerz ze8ste zeu6gr 2z1ex 2z1f8 z1g 4z1h 1zi zi1en
+zi5es.  4z3imp zi1na 6z5inf 6z5inni zin6s5er 8zinsuf zist5r zi5th zi1tr
+6z1j 2z1k 2z1l 2z1m 6z1n 1zo zo6gl 4z3oh zo1on zor6na8 4z1p z5q 6z1r 2z1s8
+2z1t z4t3end z4t3hei z8thi 1zu zu3al zu1b4 zu1f2 6z5uhr zun2a 8zunem zunf8
+8zungl zu1o zup8fi zu1s8 zu1z 2z1v zw8 z1wal 5zweck zwei3s z1wel z1wer
+z6werg 8z5wes 1zwi zwi1s 6z1wo 1zy 2z1z zz8a zzi1s 1zä 1zö 6zöl.
+zö1le 1zü 2z1ü2b ä1a6 äb1l ä1che ä3chi äch8sc
+äch8sp ä5chu äck5a äd1a äd5era ä6d5ia ä1e ä5fa
+äf1l äft6s äg1h äg3le ä6g5nan äg5str ä1he ä1hi
+äh1le äh5ne 1ähnl äh1re äh5ri äh1ru ä1hu äh1w
+6äi ä1isc ä6ische ä5ism ä5j ä1k äl1c ä1le ä8lei
+äl6schl ämi1e äm8n äm8s ä5na 5änderu äne5i8 äng3l
+änk5l ä1no än6s5c ä1pa äp6s5c 3äq är1c ä1re
+äre8m 5ärgern är6gl ä1ri 3ärmel ä1ro ärt6s5 ä1ru
+3ärztl ä5rö ä6s5chen äsen8s äs1th äta8b ä1te
+äteri4 äter5it ä6thy ä1ti 3ätk ä1to ät8schl äts1p
+ä5tu äub1l äu1e 1äug äu8ga äu5i ä1um.  ä1us.
+1äuß ä1z ö1b ö1che ö5chi öch8stei öch8str öcht6
+5ö6dem 5öffn ö1he öh1l8 öh1re ö1hu ö1is ö1ke
+1ö2ko 1öl.  öl6k5l öl8pl ö1mu ö5na önig6s3 ö1no
+ö5o6t öpf3l öp6s5c ö1re ör8gli ö1ri ör8tr ö1ru
+5österr ö1te ö5th ö1ti ö1tu ö1v ö1w öwe8 ö2z
+üb6e2 3ü4ber1 üb1l üb1r 5ü2bu ü1che ü1chi ü8ch3l
+üch6s5c ü8ck ück1a ück5ers üd1a2 ü6deu üdi8t ü2d1o4
+üd5s6 üge4l5a üg1l üh5a ü1he ü8heh ü6h5erk üh1le
+üh1re üh1ru ü1hu üh1w ü3k ü1le ül4l5a ül8lo
+ül4ps ül6s5c ü1lu ün8da ün8fei ünk5l ün8za ün6zw
+ü5pi ü1re ü8rei ür8fl ür8fr ür8geng ü1ri ü1ro
+ür8sta ür8ster ü1ru üse8n ü8sta ü8stes ü6s5tete
+ü3ta ü1te ü1ti üt8tr ü1tu üt8zei ü1v ß1a8 5ßa.
+ß8as ß1b8 ß1c ß1d 1ße ß5ec 8ße8g 8ße8h 2ß1ei
+8ßem ß1f8 ß1g ß1h 1ßi ß1k ß1l ß1m ßmana8 ß1n
+ß1o ß1p8 ß5q ß1r ß1s2 ßst8 ß1ta ß1te ßt3hei
+ß1ti ß5to ß1tr 1ßu8 6ß5um ß1v ß1w ß1z
diff --git a/hyph/italian.lh b/hyph/italian.lh
new file mode 100644
index 0000000..99ccee2
--- /dev/null
+++ b/hyph/italian.lh
@@ -0,0 +1,99 @@
+Lout hyphenation information
+%
+% This is an Italian hyphenation file constructed by Daniele Giacomini
+% (daniele@evo.it) on 03 February 1999 from a TeX file supplied by
+% Claudio Beccari (beccari@polito.it).
+%
+% Removed some patterns that generated ``internal error'' message.
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+àÀ
+èÈ
+éÉ
+ìÌ
+òÒ
+ùÙ
+
+Patterns:
+.anti1  .anti3m2n
+.di2s3cine
+.e2x
+.fran2k3
+.circu2m1
+.wa2g3n
+.ca4p3s
+.opto1
+.para1
+.pre1
+.p2s
+%.ri1a2    .ri1e2   .re1i2  .ri1o2  .ri1u2
+.su2b3lu   .su2b3r
+.wel2t1
+3p2sic
+3p2neu1
+a1ia a1ie  a1io  a1iu a1uo a1ya 2at.
+e1iu e2w
+io1i 
+o1ia o1ie  o1io  o1iu
+u1u 
+%
+'2
+1b   2bb   2bc   2bd  2bf  2bm  2bn  2bp  2bs  2bt  2bv  
+     b2l   b2r   2b.  2b'.
+1c   2cb   2cc   2cd  2cf  2ck  2cm  2cn  2cq  2cs  2ct  2cz  
+     2chh  c2h   2chb ch2r 2chn c2l  c2r  2c.  2c'. .c2
+1d   2db   2dd   2dg  2dl  2dm  2dn  2dp  d2r  2ds  2dt  2dv  2dw  
+     2d.   2d'.  .d2
+1f   2fb   2fg   2ff  2fn  f2l  f2r  2fs  2ft  2f.  2f'.  
+1g   2gb   2gd   2gf  2gg  g2h  g2l  2gm  g2n  2gp  g2r  2gs  2gt  
+     2gv   2gw   2gz  2gh2t     2g.  2g'.  
+1h   2hb   2hd   h2l  2hm  2hn  2hr  2hv  2h.  2h'.   
+1j   2j.   2j'.  
+1k   2kg   2kf   k2h  2kk  k2l  k2r  2kt  2k.  2k'.   
+1l   2lb   2lc   2ld  2l3f2     2lg  l2h  2lk  2ll  2lm  2ln  2lp
+     2lq   2lr   2ls  2lt  2lv  2lw  2lz  2l.  2l'.   
+1m   2mb   2mc   2mf  2ml  2mm  2mn  2mp  2mq  2mr  2ms  2mt  2mv  2mw  
+     2m.   2m'.    
+1n   2nc   2nd   2nf  2ng  2nk  2nl  2nm  2nn  2np  2nq  2nr  2ns  n2s3r
+     2nt   2nv   2nz   2n'  n2g3n     2nheit.   2n'.  
+1p   2pd   p2h   p2l  2pn  2pp  p2r  2ps  2pt  2pz  2p.  2p'.   
+1q   2qq   2q.   2q'.   
+1r   2rb   2rc   2rd  2rf  r2h  2rg  2rk  2rl  2rm  2rn  2rp 
+     2rq   2rr   2rs  2rt  rt2s3 2rv 2rx  2rw  2rz  2r.  2r'.   
+1s2  2shm  2s3s  2s3p2n    2stb 2stc 2std 2stf 2stg 2stm 2stn 2stp 2sts 2stt 2stv 2sz  
+     4s.   4s'.   
+1t   2tb   2tc   2td  2tf  2tg  t2h  t2l  2tm  2tn  2tp  t2r  2ts  3t2sch 
+     2tt   2tv   2tw  t2z  2tzk 2tzs 2t.  2t'.   
+1v   2vc   2vl   v2r  2vv  2v.  2v'.   
+1w   w2h   wa2r  2w1y 2w.  2w'.   
+1x   2xw   2x.   2x'.  
+y1ou y1i  
+1z   2zb   2zd   2zl  2zn  2zp  2zt  2zs  2zv  2zz  2z.  2z'.   .z2
diff --git a/hyph/norweg.lh b/hyph/norweg.lh
new file mode 100644
index 0000000..e7f2eaa
--- /dev/null
+++ b/hyph/norweg.lh
@@ -0,0 +1,6301 @@
+Lout hyphenation information
+%
+% Norwegian hyphenation file, created by
+% Jeffrey H. Kingston 24 September 1994 from
+% an uncommented file sent by Rolf Lindgren.
+%
+% \chardef\ae=3D'32	JeffK replaced \ae by \346
+% \chardef\o=3D'34	JeffK replaced \o  by \370
+% \chardef\aa=3D'345	JeffK replaced \aa by \345
+% \lccode\ae=3D\ae
+% \lccode\o=3D\o
+% \lccode\aa=3D\aa
+% \catcode\ae=3D11
+% \catcode\o=3D11
+% \catcode\aa=3D11
+% \def\ae{(^Z character deleted here by JeffK)}%
+% \def\o{(^\ character deleted here by JeffK)}%
+% \def\aa{=E5}%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+æÆ
+øØ
+åÅ
+
+Patterns:
+.ad3s
+.ai4
+.ak5kl
+.ak3kr
+.ak5r
+.al5k
+.alli3a
+.all5s
+.al4t3et
+.al4t3o
+.an5dra
+.an3er
+.an3es
+.an3s
+.ant1r
+.arres4
+.art4
+.ast3r
+.atta5c
+.avi4
+.avis3
+.ba4ket
+.be2ste
+.bu3sta
+.dau3s
+.da3v
+.dek5s
+.des5ti
+.dia1
+.disi5pl
+.drag3s
+.dør3
+.ek3l
+.eks3t
+.ek3v
+.el5ek
+.els4kl
+.en3a4
+.eng3s4
+.en5in
+.en3sp
+.ep3l
+.erob5
+.es1k
+.es3p
+.est3r
+.et3r
+.et5se
+.ette2
+.et4tr
+.et2tø
+.eu3
+.fa4br
+.fel2t
+.fil2t3r
+.fløy5
+.fra3s
+.fri3e4
+.gang3s4
+.ge5na
+.grun2n3
+.gå4i
+.ha4ven
+.hud3
+.hygi4
+.hygie3
+.iat4
+.ik4r
+.imp4
+.in3a4
+.in3g4
+.inn1s2
+.io2
+.ion5i
+.is4pr
+.is3s
+.is3ø
+.je4t5
+.kaffe3
+.kal2kv
+.ka4pr
+.ke5ik.
+.ke5ip.
+.ke5iv.
+.kjøt4
+.kole5s
+.le4a
+.le4f
+.let4ta
+.le4u
+.li5a
+.lik3s
+.lov3
+.lo4va
+.lu4b5
+.ly4den
+.ly4sk
+.løy3e
+.man5t
+.ma4to
+.me4s5k
+.midi3
+.mi4g3r
+.mit5r
+.mon5s4
+.my4s5o
+.mør2kr
+.ne2d3i
+.ned3r
+.ned1s
+.ne2k3
+.ne4st
+.ni5tre
+.nor2d
+.norsk3
+.of5r
+.ok5k4
+.om1
+.om5p
+.oms4
+.opp3ad
+.op4pel
+.oppo3f
+.opp3s
+.os3l
+.os3p
+.ot5r
+.over3i
+.pa3g
+.pe4e
+.pe3sti
+.pe4t3r
+.po4str
+.pris3t
+.ra4ja
+.rang4s
+.re4kli
+.re3so
+.re5ste
+.riks3
+.ro4mi
+.rom3st
+.ror4s5
+.rosen3
+.ro5ve
+.sel2e
+.selv3a
+.sen3d
+.side3
+.sid3r
+.si4st
+.sjof4
+.sjøl1
+.sk4
+.skru3t
+.små1
+.so3pe
+.so3ve
+.st4
+.så5re
+.te4st
+.tes5ti
+.te4t
+.tet3r
+.ti4gr
+.ti2l3
+.tro4e
+.ts2
+.ub4
+.ue2
+.uk4
+.uls5
+.ulve3
+.ul4v5i
+.unde2
+.unn5s
+.up4r
+.us4p
+.us4u
+.ut4rer
+.ut5t4
+.vann1
+.veg3r
+.ve4kl
+.ve2l
+.ve3ra
+.vib5
+.vings2
+.vi5tr
+.wes4t3
+.øk5i
+.øs4tet
+.øy4e
+.øye3s4
+.ånds3
+.åt5a
+a5alt
+a3anl
+a3ap
+a5as
+a1b
+4abe
+ab4h
+a2b3l
+abok5
+a2b3r
+a3b4re
+ab4ro
+abus3
+aci5e
+ac3in
+a5cu
+a3da
+a4deks
+adel2s
+adesh3
+ad3j
+4adl
+a3dop
+a1drag
+ad3rei
+ad3ri
+ad4s5am
+ads5i
+ad3st
+a3e2
+a4en
+a4er
+aes4t5
+5affæ
+af3le
+a1fra
+af3ri
+af4to
+3a2gent
+ag5ga
+ag2gr
+agg3s4
+a4gid
+a2git
+ag3la
+ag3ord
+a2gr
+a3gret.
+ag3ri
+ag3ro
+a5grø
+ag5sen
+ag3sj
+ags5å
+a4gur
+ag5ur.
+a1h
+a5ib
+a3inn
+ai4ro
+a5irs
+ai4s5k
+a1j
+aje3s4
+2ak.
+a1ka
+a3ke.
+a1ki
+a3kj
+ak4klæ
+ak5kro
+ak3l
+ak4læ
+ak5omb
+ak3r
+a3kred
+ak5sku
+ak5spa
+aks4pe
+ak3sta
+ak5sto
+ak3str
+ak5stu
+ak5sva
+1aktig
+ak4tre
+4aku
+a2k3v
+a5ky
+a3kå
+a1la
+a3lal
+al5apr
+al5art
+ala3tr
+a4lav
+al5avi
+ald3r
+ald5sv
+a3le
+4ale.
+a4leks
+ale4ra
+ale3s
+ales5k
+4alg.
+al2gl
+al4gå
+2ali
+alin5d
+al3inn
+a4l5int
+alk5ve
+al4l5ap
+al4lep
+5allie
+al3lo
+alls5po
+alon4
+al3ord
+al3p
+al4sel
+als4ka
+als4ke.
+als3kj
+als5l
+al3spo
+al4stø
+altek5s
+al4tj
+alt3op
+a1lu
+5a4lum
+al3ur
+aluta3
+al1vo
+a1ly
+a5læ
+a2lø4
+a3lør
+al3øv
+a3lå
+2am
+a2mal
+am3ald
+am2br
+amb5ra
+ame5ra
+a2meri
+ame4tr
+am5om.
+a4m5os
+am4pak
+amp3l
+am4pr
+am1s
+ams2l
+am4sla
+am4slø
+am3s4t
+amst5r
+am5un
+a2nal
+an3al4f
+1analy
+an3art
+an4dav
+ands3i
+andve5s4
+ane5d
+an3e4ti
+ang3l
+an5g4o
+an3gr
+an4gren
+3angrep
+2a3ni
+an5i4on
+an2kr
+ank5ra
+ank5re
+ank3ri
+an4k5ve
+an4k5å
+an4nom
+ann4skj
+an4nø
+2ano
+a4nof
+an5op
+an3sa
+3ansik
+ansis5
+an2sk
+an3skj
+ans5pa
+an2s3pi
+an1s4t
+an4s5u4
+an3sva
+an4t5ap
+an5te
+an5t4i
+ant5ord
+an3tr
+an4tra
+a4nut
+a4n5æ4
+4anø
+a4n5øy
+4ao
+a5oh
+a3ok
+a3or
+a3os
+a5ot.
+ao2v
+a4p5ed
+apet5
+a1pi
+ap5j
+a3pla
+ap3li
+apo3p
+3appel
+ap3p4r
+ap3r
+ap2sk
+ap5spr
+ap2s3t
+a3psy
+a3py3
+2ar.
+a1ra
+1arb
+2arbi
+2ard
+ar4dj
+ard5sti
+a3re.
+3a2rea
+ared4
+ar5emb
+ar5gh
+2ari
+arie4
+ar4kl
+4arn
+ar5nap
+a1ro
+ar5oks
+ar3or
+arp3s
+ar3smø
+ar4sn
+ar4sta
+3artil
+ar5tri
+ar4tro
+ar4tår
+a5rum
+arve5s
+3arvi
+a1ry
+ar5øy
+a3rå
+2as
+a3s2a
+as5and
+asbe2
+asei4
+ase5id
+ase5le
+ase3s
+as5jor
+a2ska
+as5kad
+a3skar.
+as3ko
+a3skr
+as3ku
+a4s5ky
+as3l
+as5ma
+as5na
+as3p
+3assist
+as2s3k
+as2s3n
+as4s3op
+as2s3p
+as4stu
+as5ta.
+a3stad
+as3tat
+ast5egg
+as5ter
+aste5s
+as3ti
+a5stise
+as5tisk
+as3to
+ast5re.
+ast3ri
+ast5un
+as5tør
+a3svi
+2at
+a1ta
+ata4ko
+ata5kr
+ate5t
+4ati
+at5ion
+at3j
+3atla
+5atlø
+at4n5o
+at2o
+at4om
+at5opp
+ato3s
+ato5u
+ato3v
+at3r
+at4ra
+4atri.
+at4ry
+at3sp
+ats5å
+att5o
+at3tri
+at2trå
+at4t5ung
+at4tør
+a4tun
+a3ty
+a1t4ø
+at5år
+a2u
+au3a
+au4dal
+au4dei
+aud3s
+aue4l
+au5g4n
+au3i
+au5k4l
+au4k3u
+5aumur.
+aur5s
+aus3k
+au4sp
+aus4s5k
+au2st
+aus4tet
+aust5re
+au3su
+au5te
+aut4o
+3aux
+a1va
+av5ank
+ave5sl
+aves5t
+1avg
+3avgi
+a1vi
+4avin
+a4v5inn
+avi5o4
+avi2s
+a2vis.
+av5ise.
+av5ising
+a1vo
+a4vok
+av3okt
+av3sa
+3avslu
+5avsn
+av3sv
+4a3vu
+5avv
+a1væ
+a3vø
+a4v5øl
+a5vå
+a3ø4
+1b2a
+3ba.
+ba4k5end
+bak5ett
+ba4k5om
+bak3t4
+ba3la
+ba3na
+bane3
+ba4sk
+bass5t
+ba4st
+bas5ta
+ba5t4r
+bau4g
+ba5yo
+2b1b
+bbel4
+bb3ru
+b4bå4
+2b3d
+5be
+be5de
+be3dr
+be4d3re
+begei5
+be5g4l
+be4i
+bek4l
+bel5år
+ber3sk
+be1s4
+be5sm
+be3sp
+bes5s
+bes5tev
+be5tv
+4bf
+2b3h
+1bi
+bi5ap
+bi5av
+bi5br
+bi3d
+bik4ki
+bik4l
+bi4lei
+bi4lo
+bi2o
+bi3s4a
+bis3k
+bis4la
+bi2s4t3r
+bis4v
+bite4s5
+bi3tr
+4bk
+b2l
+3b4la
+b5lat
+ble4mo
+5b4lu
+3b4ly
+2bm
+2b1n
+bne3
+1bo
+bo2k3
+bo4ko
+bolt5
+bol4tr
+bom1
+boms4
+bop4
+bor4t5o
+bor4t5r
+bor4tu
+bo5r4u
+bo3s4
+b2r
+b4rad
+bre4da
+brei3s
+3bren
+3brev
+3brikat
+b3rio
+b3rist
+4brit
+b3riu
+3bru
+4b5rua
+bruk2s1
+bru3re
+bru5spe
+bru5s4t
+3bry
+3b4rø
+2b1s2
+b5sc
+b4s5of
+bs3s
+bs4te
+4b5t
+3bu
+bu5d4e
+bu4el
+bu3o
+bup4
+b4us
+bus4h5
+bu5she
+bu5skj
+bu3sn
+bu4sp
+buss5t
+4bw
+5by
+by5e
+by5o4
+byr5i
+3bø
+3bå
+bån4d
+båt3r
+1ca
+ca5ra
+4c1c
+1cel
+celeb3r
+5ceu
+4ch.
+3cha
+3chere
+5chet
+1chi
+5chom
+3chu
+ch3v
+2ck
+cke4t
+ck5i
+ck5l
+c4k3o
+ck3s4
+3co
+con3
+con4t5r
+co4o
+co3ri
+cos3t
+cou5
+co3v
+4c5p4
+cqu4
+cre3
+cre4e
+crim4
+5cud
+cu5ra
+3cy
+cæ3
+1da
+3daf
+d3aksl
+da5kv
+4d3alf
+dam3b
+dans2a
+4d3ansv
+2dar
+d4ar.
+4darb
+das4h
+4d5ass
+daus4
+2dav
+d3a2vi
+da5vin
+d3avl
+2d1b4
+2d1d
+d3da
+ddags3
+dde3s4
+dd2hi
+d4d5or
+d3d2r
+dd5ret
+dd5si
+dds5l
+dds4n
+dds5tr
+dd4sty
+dd5så
+dd5t
+1de
+de3d4
+4d5ed.
+def4
+2d3eie
+de5ikt
+de3ist
+dek4ko
+dek4v
+de4laf
+de4l5ei
+de4l5ek
+4delem
+del4sa
+del4sk
+dels3l
+del4str
+3den
+deni5f
+den2s
+dens3t
+de5rap
+der5e4ge
+de3res
+de5sak
+des4hi
+de2sin
+de1s4k
+de5ska
+de2so
+de3s4ta
+de5sv
+de5v4r
+2d1f
+2d5g2
+dgi4n
+2d1h
+4dho
+1di
+5di.
+dia3s4
+di3en
+di4gat
+di4g5re
+di5ka
+di5kl
+4dind
+4d1inn
+di5ok
+dipo4
+di4sa.
+di4sc
+d5iset
+di5si
+disk4
+di4s3ko
+dis3kr
+4d3iso
+d3iste
+di5stre
+2d1j
+d2ju
+3djup
+2d3k4
+4d5l
+2d1m
+4d3n
+1do
+do3a
+do5br
+dok4ka
+2dolj
+4d5oml
+do4mo
+4domr
+dom2s
+d3omse
+dom4si
+doms3k
+4d5onk
+2dop
+d3opp
+2d3ord
+d3ost
+2do2ve
+2d1p
+dpri5
+dprio4
+2dr
+3drag.
+d4rakt
+d4ral
+3d4ram
+d3ras
+d3rau
+4dre.
+4d5red
+d2rei
+d2rekt
+dre5ni
+d2rev
+3drevet
+d2ri
+5d4rif
+d3rik.
+d3rin
+3d4riv
+d1ro
+d2rom.
+3dronn
+d5ror
+5drue
+3druk
+d3ryk
+d3rød
+d3rør
+3drå
+4dråm
+4ds
+d2sa
+ds5ab
+ds5ad
+d3sag
+ds3an
+dsa4r
+ds5eie
+dse4l
+dsel5sl
+d2si
+d3s4ke5
+d4skjen
+ds5kn
+d5skri
+d3sku
+ds5le
+d5slit
+d3slok
+d3slå
+ds3no
+d2so
+ds5of
+ds3op
+ds5pa
+ds3s2
+ds3tal
+d5star
+d5s4tau
+ds4te
+ds4to
+d5stor
+d2str
+ds3tra
+d5stry
+ds4typ
+d2su
+ds3un
+ds3ur.
+ds1v
+d3sy
+d5sæ
+ds3øk
+ds5øm
+ds5øn
+d5søs
+2dt
+d3ta
+d5te
+d1tr
+d5trø
+dtu2
+dt3uk
+d1ty
+d1tø
+1du
+due5s
+du3i
+du4it
+duo5
+du4rak
+d4us
+2d5ut
+4d3v
+2dw
+1dy
+d3ye
+4d5ynk
+dy4pet
+5dæ
+1dø
+døds3t
+4døk
+dø2r
+d3øre
+d3øs
+5døv
+dø5vi
+då4dr
+då4p
+d3år.
+då4ra
+d3å4t
+e1a
+ea4do
+ea2gu
+ea4k
+ea4lar
+e2alo
+ea2m
+e4ann
+ea2p
+ea4ry
+e5as.
+e5ask
+e3asm
+e3ass
+ea3tr
+e3att
+e2au
+ea2v
+e1b
+eb4bu
+eber5ø
+eb4l
+ebo5b4
+e4brer
+eb4u
+4ec
+e1ce
+e5ci
+e5c3r
+ec4re
+e5cu
+2ed
+e4d3ad
+ed3ar
+ed5e4ge
+ede4reg
+ede4s5p
+edin4n
+e2dist
+ed3or
+e1dra
+e3dres
+e3drikk
+e4drin
+ed1ru
+ed3so
+ed3s4po
+ed3st
+eds5å
+e3då
+e1e2
+ee5in
+eek5e
+eek3v
+e4el.
+ee3la
+een3i
+ee4t
+e4ets
+e1f
+3effek
+e5fi
+efi5b
+ef3le
+e3fli
+efor3ed
+ef5ta
+e3fæ
+eg4an
+ega4sk
+egg4r
+e1gla
+egn3s
+eg4ra
+egs4a
+egs3i
+egs5kj
+eg3skr
+egs4p
+egu5i4
+eguns5
+e3gæ
+e5h
+ehov4
+4ei.
+ei5a4d
+ei3ak
+ei3b
+ei5d4u
+ei3erin
+eig5s
+ei4k3an
+4ein
+ei4nal
+ei4nan
+ein3d
+ei4nei
+ein5g
+e3inn
+e3insy
+ei4nu
+ei4nø
+ei3o4
+ei5ra
+e1isk.
+ei3ski
+ei3skr
+ei3s4ku
+e3isme
+eis4p
+ei3spo
+ei4ste
+eit5re
+e1j
+eju4l
+ejul5a
+4e1ka
+eka4s5
+4e1ki
+ekin4
+e1kj
+ek4kad
+ek4k5j
+e1kl
+ek4lau
+e3knek
+ek3no
+ek5nup
+ek3nus
+2eko
+e1kr
+e3k4ra
+ek4ri
+ek4rok
+1eksam
+ek2s3k
+eks5l
+5ek2s5p
+5ekstr
+ek4stø
+ek5sv
+ekte4t
+ekt3ete
+e1ky
+e3kø
+e3kå
+2e1la
+e2lak
+e3lakk
+el3aks
+el3al
+e5lap
+e5lar
+eld4s5e
+el3egn
+el1ek
+3elem
+e2leme
+el4gan
+2eli
+eli4kv
+e5lin.
+e3linn
+el3k
+el4lins
+el3lo
+el5l4ur
+e2l3ob
+e5lod
+e2l3op
+el3or
+3elske
+els5pin
+els5tel
+els5tra
+els3v
+el4t3ro
+elt3u
+4e1lu
+e5lum
+e4l3un
+el3ur
+elv3ant
+elve5s4k
+e1ly
+el5ynd
+e1læ
+el5ærv
+4elø
+el3øk
+elø4r
+el5øre
+4e3lå
+5emalj
+e4mana
+e4mels
+e3mer
+em5e4ta
+e3mi
+emi5g
+emmer3
+emme2re
+emo3a
+em3om.
+emp5li
+em5po
+em3skr
+em5sku
+em1st
+ems4te
+emst5r
+emøb5l
+emønst4
+emø2r
+emåls3
+em3år
+e3nakk
+en5all
+en3art
+en3avi
+3endrin
+en5dro
+en2e
+3eneli
+en3gr
+engs4t
+e5nip
+e3nit
+en5iv
+en3kl
+e4n5omr
+en1op
+en4s5ei
+en3si
+ens4ka.
+ens3ma
+en3sori
+ens4pl
+en1st
+ens2v
+ens3va
+en4t5enh
+ent3r
+en3ø4v
+en5øy
+e5o4g5e
+e3oks
+e1om
+e1on
+eon4s
+e1op
+eo2pe
+eo4pi
+e5or.
+e1ord
+e3ork
+e5ors
+e5ost
+e1o2v
+e1p
+4ep.
+ep5je
+e2ple
+3eple.
+ep5sla
+ep4so
+e3psy
+e1ra
+er5adr
+er5aks
+er3anl
+e2rapp
+er3ar
+4erat
+er3av.
+er5avd
+er5avt
+erdi3s
+er3d2r
+er5dv
+ere5a
+er5ed.
+2erei
+er3eid
+er5eik
+4erek
+er3eks
+er5enh
+e2res
+er1ess
+e3resta
+ere4ta
+er3ev
+erg3s
+2eri
+er3ile
+er1inn
+er3int
+er5nak
+2e1ro
+er5obl
+e2rok
+e2rop
+er3opp
+er5opt
+er1or
+e3ror.
+e2rov
+erre4st
+er3sl
+er4s3pa
+ers4tem
+ers4v
+er4sva
+4e1ru
+er5ut.
+er3uts
+er5utt
+e1ry
+e3ræ
+e1rø
+er3øl
+4erå
+e5rå.
+e1råd
+er5åk
+er5ål
+er3ån
+e5sab
+e3s4al
+e5sav
+ese4ne
+ese3s
+es3inf
+es3int
+esi5st
+e3s4j
+eske3
+e1sko
+e1skr
+e4skra
+es4kro
+esku3e
+e3skå
+e1slag
+es4lem
+e5slen
+e3slu
+es2n
+e3s4nak
+es3nev
+es3ni
+e3sno
+es3nu
+e3snø
+e2so2r
+e1sp
+e4spat
+es3pir
+es5pl
+e3s4por
+es4s5and
+es4sja
+est5ali
+e4stap
+est5a4pe
+e3stati
+es5tema
+e2stev
+e3stit
+e1sto
+es4tori
+est3re.
+est5ris
+e3stu
+es4ty
+4esu
+e3svak
+e3s4ø
+e3så
+e1ta
+etal2j
+eta5st
+4etek
+e5tem
+ete4se
+e1tj
+e1tr
+e3tre
+e4t5res
+et3ri
+et4rie
+et4rin
+et4ron
+et4rop
+et2s
+ets3l
+ets3p
+ets3t
+et4sty
+etså4
+et4t5av
+etter3a4
+et4t3j
+etts3l
+e1ty
+e1tø
+e3tå
+e4ud
+e3uk4
+eu2ke.
+e3ul
+eum4
+eums5
+e1un
+e5uo
+e4uro
+1europ
+e4use
+e5utl
+eut4r
+e5uts
+e5utt
+e1v
+4ev.
+e4vad4
+eva4de
+eva5dr
+eval4
+evand5
+eve3s4
+e3vi
+5e4vige
+evre3
+e3vrim
+ev4sku
+ev4sty
+e4vu
+ey3c
+e3yn
+e3yr
+e5y4t
+e3æ4
+e1ø4
+e1å4
+3fa
+fa5ci
+fa2g
+fa5gr
+fag5u
+4f5alf
+fallit4
+fal5ska
+fan4tor
+fa5p4
+4farb
+fart4
+farts3
+fa4s5k
+fa3t4r
+2fb
+4fd
+1fe
+febe4
+fe2br
+feb3ri
+fe5e
+fei5en
+feil3
+fei5to
+fe4l5an
+felle2
+fel5ok
+fe2m
+fem5a
+fem3ø
+fen3s
+fe4sta
+fes3ti
+fet5o
+2f1f
+f4fid
+f4fj
+ff4l
+f2f3re
+f3fæ
+f3g4
+3fi
+fi5an5
+fi5ap
+fi3li
+fin4gr
+fi4no
+fir3k
+fi4st
+fj4
+f3jeg
+1fjel
+2f3k
+1f2l4
+fla5g4r
+f4les
+5flo
+5fly
+flys4
+3f4lø
+2fm
+fma4d
+fmar4
+2fn
+3f4nu
+3fo
+fo2n3a2
+fon3s
+fo4nu
+fo2r
+for1a
+fo5ra.
+fo5ras
+fo3re.
+fore2n
+for3ene
+fo3rer
+fo3ri
+for3k
+fo4ro
+for3sm
+for5t4i
+for3æ
+for3ø
+fost3r
+fo4t3r
+fot5sk
+4fp
+f2r4
+fra3l
+fra2m
+fram3e
+fra5v4
+f3re.
+fred4se
+fre4met
+fre4mo
+fre4s5k
+fris4l
+fri5sto
+fri5v4
+5fro
+f3roa
+f5rof
+3fru
+fru4e
+fru4n
+fru3s
+fru5tr
+3fry
+frø5
+frøp4
+2f1s2
+f3sh
+fsi2
+fs5s
+fs4t
+2ft
+ft5amp
+ft5ans
+f4t5ekk
+ft5ekt
+fte4na
+ftka5s4
+ft3r
+ft2s
+ft4s3i
+ft4ska
+ft5sla
+ft5slo
+ft5spe
+ft5sta
+fts5å
+f2t3u
+3fu
+4futm
+4f5v
+1fy
+fy5o
+2fæ
+3fø
+fø4rek
+før4st
+få3
+1ga
+ga4fl
+ga5gi
+4gakt
+gak4v
+gam4bl
+g3and
+gan4gj
+gan4gr
+g5ank
+gan4s5v
+2garb
+2gart
+ga5si
+gas4sa
+ga2st
+ga3t4ro
+ga5tå
+4gavg
+g3avi
+4gavs
+2g1b
+gbok4
+4gc
+2g1d2
+gdoms3
+g3d4r
+1ge
+5ge.
+ge3a
+ge3d
+gefis4
+4g3egg
+ge3gl
+4g5ei.
+ge5i4d
+geit5o
+geit3r
+ge3k
+4gelem
+gels4
+4g3emn
+gemø4
+ge2na
+gen3ap
+gen5g
+gen3n
+ge4n3om
+gens4t
+gen5sv
+ge2o
+ge5on
+3ger
+ge5rap
+ge4ren
+ge3res
+ge5rop
+ger4sn
+ge1s
+g5e4ser
+ge5te
+get4r
+ge3u
+2g1f
+gfib5
+4g1g
+gga4
+gg5an.
+g4g5ap
+g4gav
+gge5o4
+g4g5i4m
+g2gl
+gg5la
+g3glu
+gg3re
+g4g5ro
+g5gry
+gg3se
+gg3so
+gg3s4t
+gg3s2v
+gg3så
+2g1h
+1gi
+gie2
+gi3ene
+gik4r
+3gin
+4gind
+ging4
+4g3inge
+4g5inn
+gi1on
+gi3s4l
+gi5spa
+gi5tr
+1gj
+2g3ja
+gjen3
+gje4ne
+gje4s5p
+gje2st
+2g3k2
+g1l
+g2la
+g3lag
+4g5lak
+2glau
+4gle.
+g3lev
+g2lid
+gl3s4
+g2lu
+g5lør
+2gløs
+g3lå
+4g1m
+gme4t
+2g1n
+gn3d4
+gne4t5j
+gne4t5r
+gn4i
+gning4s
+gni2s
+gnist3
+g3niv
+g4nom
+gn4skr
+g4ny
+gn5åp
+1go
+go3b4
+5goc
+2g3ok
+g3omr
+go5no
+2g3opp
+gora5
+4gord
+4gorg
+go3rø
+3got
+2g1p
+1g2r
+3gra
+4g5rac
+g4rad.
+gram5e
+grana2
+4g5rap
+g3rar
+gra4sa
+g4rav
+4g3re.
+gre4en
+4g5ref
+g3rek
+4g5rel
+gre3ni
+grep4
+gre5v4r
+g4ric
+4g5rid
+g5rif
+g3rik
+3gru
+4g5rui
+g3råd
+4g2s
+gs1a2
+gs3at
+g5sc
+gse2
+g3seg
+g3sei
+g4s5ele
+gs4els
+gs3em
+gs1ev
+gs4id
+g3sil
+g5s4kad
+g5s4kall
+g3s2ki
+gs5kog
+gs3ku
+gs3kv
+gs5kå
+gs3l
+gs4lyn
+gs3me
+gs4nel
+g5sno
+gs3nø
+gs1o
+gs3p
+g3s4pel
+g3s4pi
+gs3s4
+gs3ta
+gs4tang
+gs5ted
+g3s4tef
+g5stega
+gs4ter.
+gs5tig
+gs3tj
+g3stol.
+gs5traf
+gs5tran
+g5strek
+gst5rop
+gs3try
+g4sty
+g5styr
+gs1v
+gs5vet
+g3sy
+gsy4t
+2g1t
+g5te
+1gu
+gu3ar
+gu2di
+4g5ug
+gul2l3
+gu4l5o
+g4un
+4g5urn
+gus3
+2g3utl
+3gutt.
+2g1v
+1gy
+g3æt
+3gø4
+4gøra
+4gøre
+gøy5
+3gå
+4gåp
+g4år
+g5år.
+gås5tr
+ha5c
+hai3
+ha5kø
+hal4sk
+hal4v3a
+hand5sl
+hane5
+hard3st
+har4t3r
+ha4sji
+hasp5l
+ha5ul
+hav5eng
+hav4sl
+hav4sp
+ha4v5ø
+4hb
+2he.
+he2a
+he3an
+he2k
+he5ka
+4helf
+helfab4
+he5li
+helse3s
+hel5sl
+4her.
+he5re
+hero5s
+he4r5u
+he2s
+hes3p
+hes5te
+hets5
+hi5li
+hings4
+hins4
+hi4o
+his5k
+hi3sta
+hi4to
+hi5tr
+4hl
+4hm
+ho5bl
+ho2s
+ho5si
+hos5ti
+4hot.
+ho3ve
+hoved3
+4how
+h5p
+2hr
+2ht
+h5ta
+hu4do
+hu5et
+hugs2
+hu4l5ø
+hung3r
+hu2s
+hu5se
+hus3k
+hus3s
+hu4st
+hust3r
+h2v
+hvi5to
+hvi3tr
+hvo4
+hvor3
+hy2br
+hy3e4
+hy2gr
+hy3s4t
+hø4s
+hø5vi
+høy1
+høy4et
+h2å
+hå4pl
+hå3ri
+ia3b4
+i5adn
+ia3g2
+iak4
+i5ak.
+i5akb
+i1al.
+ia4l5an
+i3alb
+i3ald
+iale4
+ia4l5et
+i3alf
+i3alg
+i3all
+i5aln
+ia4lom
+i3alp
+i5alr
+i3als4
+i3alt
+ia4lu
+i5alv
+i3and
+i3ang
+i1ans
+ias3s
+i3at.
+i5atg
+ia3tro
+i5au
+i1b
+ibe4l
+i2b3l
+i2br
+ib3ra
+ib3ro
+i1c
+i4ch
+i3da
+i4dea
+3i2dio
+idisip5
+1idret
+id3ru
+id2s3
+id4sk
+ids5te
+id2t
+idt3re
+i2d3un
+id5øy
+id5å
+2ie
+ie3d4
+i3eff
+ie3i
+i1el
+i2ele
+ie4lim
+i4em
+i1ens
+i3ent
+ie3o
+i4ep
+i1e2r
+ier5an
+ie5rat
+ie5rek
+i4e5rel
+ie3ri
+ie3ro
+ie3rå
+i3es.
+ie5sn
+ie5s4t
+i3et.
+i3ett
+i3e4ty4
+ietyl3
+ifes5
+if3re
+if5ri
+ifts3k
+ig5att
+i3ge
+ige2n
+igg5s
+ig5no
+i4gom
+ig3ret
+i4g5ro
+ig5rut
+igs4a
+ig3si
+igst4
+i4gut
+i1h
+i5i
+i3j
+4i1ka
+ik5art
+ike4g5l
+ike4r5u
+ike3s
+i1ki
+i1kj
+ik2kar
+ik4kor
+ik2kord
+ik5kra
+ikk3sl
+ik3l
+ik4lo4
+iklor5
+ik4læ
+i5k4no
+4i3ko
+ikos5t
+ik3r
+ik4ra
+ik4ret
+ik1ro
+ik4ry
+i5k4rø
+ik4san
+ikt4r
+ikt2s
+i2kv
+ik3va
+ik3væ
+i3ky
+i3kø
+2il
+i1la
+i4lak
+ild5s4p
+il3eie
+ile3s
+ilfab4
+ili4br
+il3k
+ill3s
+3illu
+il4mi
+i3lo
+il3s
+il4sm
+il5tra
+i3lu
+il3v
+i3ly
+i3læ
+i1m
+im5ord
+im3p
+ims5m
+im3s4t
+imt5v
+i5nakk
+inat4r
+in3au
+in4dra
+ind3s
+1indus
+4ine
+in5eid
+ine4r3å4
+ine5u
+3infek
+3info
+in4gav
+3ingeni
+ing5l
+in4gor
+ing3r
+ings1
+ing4slå
+ings3ti
+ings3to
+in4gø
+4ini
+i3nip
+in4kok
+in4k5op
+in4nan
+3innho
+in4n3om
+inn3sm
+inn1sp
+1innt
+in4nø
+in3ok
+in5op
+i4nov
+in3sa
+in5s4ka
+ins4kv
+in5sma
+in3smed
+in3s4o
+in1sp
+ins4pl
+in1st
+in5sta
+3instan
+1insti
+1instru
+in3sv
+in3sø
+in3t
+int4r
+int5rin
+in5ul
+3inves
+4inø
+io5a
+i1o2d
+io5g
+io4ka
+i3ol.
+i5olb
+i5olf
+i5o4lu
+i3om.
+i3on.
+ioni4
+i3ons
+i3op
+i3or.
+io4ra
+io4re
+i5orin
+io5ry
+io5rø
+io2s4
+io4sa
+io3se
+io4se.
+io3st
+io4su
+i1ot.
+ipa4n5
+i1pi
+i3pla
+ip3lo
+i5p4lok
+ipo4s
+ipp5esk
+ip2s
+ip4sk
+ips3l
+ip5sor
+i5py
+i1ra
+ird5s
+i3re
+irek4n
+ir2kl
+i1ro
+ir4sc
+ir4t5o
+i1ru
+iru3e
+i3ry
+i3rø
+i5rå
+i4sag
+4ise
+is5edd
+ise3s4
+i4s3ind
+i4sj5i
+i4s3ju
+is5jø
+i2sk
+is3ka
+is3kje
+is1kr
+is3ku
+is3kv
+is3la
+i3slag.
+is4lav
+is5lo
+i5slu
+is3n
+3i2sol
+i2s3op
+is3p
+is4pan
+is4par
+is4pi
+is5pin
+is5s4l
+is4spr
+4ista
+is5tap
+is3tas
+is5ten.
+ist4i
+is3ti.
+4istik
+is3tin
+is5tis
+is3to
+is4tom
+is4top
+i4s5trah
+i4s5trak
+is3tu
+is4tun
+i2su
+i3sue
+isum3
+is3un
+is3v
+i5sæ
+isø4
+is5øy
+is5å
+i1ta
+ite3sl
+ites4t
+itets1
+iti5al
+itik4
+it3j
+it3rer
+it3rin
+i3trise
+itse4r3
+it4skr
+its5t
+its3v
+it4top
+it4tra
+itt4si
+itts4t
+i3tu
+it5ung
+i1ty
+i1tø
+i5tå
+i1u4
+ius3
+4i1v
+i2v3ak
+iv5ank
+iva2te
+iv3av
+iven5
+ivent4
+iv5is.
+iv3n
+iv2s
+ivs3l
+ivs3n
+iv4spo
+i5xi
+i3æ
+i1ø4
+i1å
+iår4
+3jag
+ja5gr
+3jakke
+jakk5s
+jals4
+5jamm
+ja4sp
+ja5t4r
+jazz3
+j4e
+je3dr
+je4f5re
+je5ik
+je5in
+je5is
+jekk5s
+jek4l
+jel5dr
+je5l2e
+jel4lo
+jel4t3
+je4mo
+jen3d
+jene4s
+je3n4i
+jert5a
+jes5akt
+jes5er
+je5sku
+jet3s4
+j5h
+j5isj
+j5it
+j5l
+5joc
+jo4i5
+jok4ki
+jon2
+jons3
+jor2do
+jord3r
+3jou
+j5p
+2jr
+j5t
+ju4an
+ju3ar
+5jub
+jube4
+ju4pet
+jup5l
+jup3r
+ju5skj
+ju3so
+3just
+ju3s4te
+ju5s4tif
+jær2s
+j4ø
+jødsel3
+jø3g4r
+jø3h
+jø5ko
+jø3kr
+jø5ro
+jøs4l
+jø3tr
+jøt2t3
+jøtte4
+2jå
+jå5r
+k2a
+3ka.
+3kab
+kaf5ta
+k5agi
+ka3is
+3kake.
+4k3aks
+3kale
+3kalk
+kal5ko
+kall4s5
+ka3lo
+3kalv
+1kam
+kamb3r
+kamp5r
+1kan
+ka3na
+4k5anm
+4kap.
+3kapi
+kaps3l
+3ka3ra
+2karbe
+3karr
+kar4st
+ka3ru
+5kas
+kas3s
+5kata
+ka5te
+ka4tio
+katte1
+kat4tø
+kau3
+5kauk
+5kaus4
+ka4van
+2k5b
+kbu4
+4k5c
+kcarri4
+2k3d4
+1ke
+ke3a2
+ked4
+ke5da
+ke3dr
+ke4et.
+5kef4
+3kei
+4keie
+ke3ie.
+ke5im.
+ke5is.
+ke3kn
+4k5ekt
+3kel
+ke4l5ek
+ke4l5os
+ke5lå
+ke4n5i
+ken3s
+ken4skj
+ken4s5t
+kent4
+ken3tr
+ke3or
+ke5os
+ke3p
+ker5ap
+ker3k
+ke3ru
+kese4
+ke4s3et
+4k5eske
+kest4
+ke3sta
+ke3sæ
+ke5u
+4k5evj
+4k5evn
+kev4r
+2k1f
+2k1g
+2k1h4
+5kig
+kikk4s3
+3kilde
+4k5imp
+ki3na
+kin3d
+1king
+ki4nu
+kip5r
+kip4s3
+1kir
+3kis
+kis5m
+4ki3s4p
+ki3tr
+3kjens
+5kjent
+3kjerk
+5kjert
+3kjole
+4kjor
+k3jord
+5kjærl
+2k1k
+kk5a4bi
+kk5adr
+k4kal
+kk5anl
+kk5app
+kk3arb
+kkars5
+kk5eie
+k4k5eld
+k4k5il
+kk3inn
+k4kins
+k2k3l
+kk4lam
+kk4lok
+k2k3op
+k2kr
+kk3ren
+kk5rot
+kk4s5je
+kk5sko
+kk3sn
+kk2so
+kks4p
+kk3st
+kks4te
+kk4stø
+kk3t4
+k2k3v
+k4k1ø
+k2k3å
+kkå4r
+k2l4
+4kl.
+3klag
+k5lak
+3klang
+klau3s
+3klausu
+k4lede
+k5len
+k4lep
+kle4st
+2k5let
+k3lig
+3k4lim4
+klod3
+4klov
+3klub
+4kluf
+5klyp
+3klæ
+k3lå5
+2k1m
+kmål4
+2k1n
+k3nak
+3knap
+knat4r
+k4nei
+k2nek
+5k4nic
+3knip
+knist5
+3kniv
+3k2nu
+k2ny
+k4nø
+kn3øy
+1ko
+ko4bl
+3koe
+3kof
+ko2g
+kog3n
+kog3st
+5koke
+kole3i
+koles4
+4kolj
+3kom
+4k5omh
+4k5omt
+3kon
+kon3gr
+ko3no
+kon1s4
+ko4pl
+kop5pa
+3kor
+4korpe
+kor4sk
+kor4sl
+kor4sv
+ko3r4u
+3kos
+ko3s4l
+ko5sp
+ko4stø
+ko3sv
+kot4tr
+k3o4u
+ko5un
+2kov
+2k1p4
+k2r4
+3kraf
+2krap
+k3rau
+2k3re.
+k4red
+k3redd.
+3kredi
+4k3reg
+kre4kli
+k5repa
+5kreps
+k4rese
+4krif
+3k4rig
+3k4rim
+3krise
+5k4ro.
+4kroc
+k4ron
+4k3ros
+kro5v
+kru5i
+3k4ruk
+krus3t
+k3rute
+krut4r
+k5ry.
+3krys
+4kryt
+k3rød
+3krøm
+k5rør
+3kråk
+4krån
+4ks
+k4s5a4b
+k5sak
+k4sc
+ksel3s
+kse3sk
+kse5sl
+kse3s4m
+kse5sp
+kse3st
+k4sf
+ks4kos
+k3slag
+ks3lo
+ks4mel
+k3sna
+ks3p
+ks4par
+ks4pel
+ks4pi
+ks5pl
+ks5pu
+ks3s4
+k2st
+ks3tal
+ks3tat
+ks5te.
+k4stek
+k4s3tj
+ks3tra
+kst5rekk
+k4s3tå
+ks5yng
+k3sø
+ks5øl.
+ks3å
+k4såp
+4k1t
+ktak4
+kt5app
+kt5avt
+kt5emn
+kte4n5
+kte5sm
+kte5st
+k4tom
+k4t5op
+k2t3r
+k5t4rak
+k3tre.
+kt4ry
+kt4rå
+kt5sla
+kts5v
+kt5t
+ktu3ar
+ktu4ren
+k2t5ut
+ktø4
+kt3øv
+k5tå
+1ku
+ku3bj
+ku2e
+ku5ere
+3kull
+3kult
+4kuly
+kum3sl
+kum5sv
+3kun
+kun4s4
+kunst3e
+kupo4
+4kurd
+3kurs
+4kurt
+k3urt.
+3kus
+4kusl
+ku3ø
+1k2v4
+k4vad
+3k4val
+k5vam
+k4veit
+k5vek
+2kverd
+k3vev
+k3vin.
+3kvinn
+kvit5o
+kvit3r
+4k3vå
+4kw
+kyd4r
+ky3k4
+ky5la
+ky5ru
+ky4st3
+3kæ
+2kø
+3kø.
+kø2r
+3køs
+kø4v
+k3øyd
+køy5er.
+k2å
+kåk5
+k5åpn
+kå3ri
+5la.
+la5br
+la4c
+la4f5e
+lag3re
+3lagss
+5lake
+la4k5i
+lak4l
+lak4sy
+la5kø
+2lal
+3lamp
+la4mu
+lands3l
+lane5s4
+lan4gr
+lang5s4
+lang3ø
+lan5ko
+lant4r
+4l5a4pa
+4l5a4pe
+lap4pr
+4la4p5r
+2larb
+la4sak
+la4sk
+las4sa
+la4st5j
+las4to
+la5te
+lat5orm
+la4tre
+lat4ro
+la3tå
+3lau
+4lavg
+l3avh
+4lavs
+2l1b
+l3c
+2ld
+l3da
+lder2s
+lde3s4
+ldisip5
+ldog4
+l4d5ok
+ldoms5m
+ld3ra
+ld3ri
+ld4s3a
+ldse4
+lds3i
+ld4ski
+ld3s4kr
+lds5ma
+ld3ste
+1le
+3le.
+le3au
+4leff
+5lege
+le5g4l
+5lei.
+lei4st
+2lek.
+le4kan
+le5k4no
+l2eks
+l4el
+4lemt
+le4nal
+5lene
+len4si
+4leple
+le3re
+4lern
+le5ru
+les5kjø
+le5sku
+le3sl
+les5m
+les5or
+le5s4po
+less4
+les5sv
+le3s4ta
+le5sti
+les3v
+let4r
+let5s
+le1u
+leu4t
+4lev.
+le3ve
+2l1f
+2l1g
+lg5ant
+l4gav
+lge3o
+lge4sv
+l4glo
+lg5sk
+lg5s4t
+2l5h
+lhygi5
+1li
+li5as
+li3b
+li4gan
+li4gre
+lig3s4
+lik3k4l
+likk5o
+li3k4l
+li3kv
+5lil
+li4m5å
+2lindu
+3ling
+lin4g5a
+link3l
+2linn
+3linp
+li3on
+lio5s
+2lip
+lire5
+li4ro
+li2st
+list3r
+li5te
+liti3a
+lit3r
+litt5erk
+livs5
+liv4se
+2l1j
+l3je
+ljes4t
+l5ji
+2l1k
+lk3arb
+lkk4
+lk4na
+lk4no
+lk4om
+lk4ovn
+lk3s4
+4l1l
+llag4
+l4l5aks
+l5l4an
+ll3d
+l4leu
+l3li
+lli2a
+lli4kv
+llk4
+llkor4
+llkort5
+ll4ok
+llo2m
+ll3ord
+ll5se
+ll3sk
+lls5kv
+ll5s4le
+ll5slø
+ll3sm
+ll3sn
+ll5su
+llsyre5
+ll3t
+llu4pi
+ll3ur
+ll5v
+l3lør.
+ll3øye
+2l1m
+lm5år
+2l1n
+1lo
+lo5ar
+lo4da
+lodd3s
+lo5dro
+lo4dy
+lok3s
+2lol
+lo5ls
+lo4min
+lomme3r
+2lomn
+lo3mo
+l3omso
+lom5sti
+lom5str
+lop2p3o
+loppof3
+2lor
+4lord
+4l3org
+5l4ort
+lo5rø
+lo4s3ol
+3lov.
+4lovn
+2l1p
+lps3k
+2l1r
+lre4d5a
+4l1s
+lsdi5p4
+ls5ele
+l5sen
+l5ses3
+lse4si
+lse4so
+l4sf
+l3si
+l2sk
+l3ska
+l4ske
+l3s4ki
+l3skr
+ls4ku
+l4skv
+l3skå
+l2sl
+ls3lo
+ls4løy
+l5s2mø
+l2sn
+l4sne
+ls4nel
+l2s3pa
+l5spek
+ls4po
+ls5pri
+ls3s2
+ls4t
+ls5tal.
+l2s5tin
+ls5tit
+l3sto
+l2su4
+ls3un
+l2sv
+ls3æ
+l2s3å
+2l1t
+l2tar
+l5tei
+l2top
+lt5ra.
+lt4rat
+lt3s4
+lt4s5v
+ltu2r3
+l4t5ø
+l3tå
+4lub
+3l4uf
+lu5in
+luk3r
+lung3r
+4luni
+2lur
+3l4ure
+luren3
+3luri
+lu5si
+lu5str
+4lutg
+4lutv
+3luv
+2lv
+l1va
+lv3eie
+l3vi
+lvi4e
+lv5n
+l5vor
+lv3s4
+lv5ul
+lv5un
+l1væ
+lv3å
+ly5a
+ly3e4
+ly3gl
+ly4na
+ly4nel
+ly3r
+ly2s3k
+lys3p
+lys3v
+ly5te
+1lø
+2løk
+3løk.
+lø4ku
+4løm
+løp2s
+2lør
+l5ørr
+3løs
+lø4s3k
+lø4su
+lø4sø
+4løt
+løt5j
+2løye
+4løyf
+4l5øyn
+2lå
+lå4gi
+lå3k
+5låm
+3lån
+4låp
+4lår
+l3åri
+lå5rin
+lår4s
+1lås.
+lå4s5te
+låte5
+lå3tø
+1ma
+ma3f
+ma3ie
+ma3is
+mak5r
+maksi3
+maks3v
+mak4ta
+ma5k4v
+4m5alde
+4malj
+ma4lo
+mal4tek
+mal5å
+m4an
+ma5nak
+m5anal
+3mann
+manns3l
+mann2st
+man4tr
+manu3
+ma4o
+2marb
+mar4sk
+mar5sl
+mas4ki
+ma4sko
+ma4sti
+ma3sø
+ma4tr
+mat3s4
+4m5avs
+ma3y
+2m1b
+mbio4t
+mb5ler
+mb3ros
+4mc
+2m3d2
+1m2e
+3meda
+me4d5ele
+5medl
+me4d3un
+me5il
+4mekk
+me2k3l
+me3kn
+2m3eks
+mel3dr
+me4l3ek
+mel5eng
+men4da
+me5no
+men3t4r
+me5o
+merans5
+me3rov
+3mes
+me3u
+2m1f
+mfo5re
+2m1g
+mgå4i
+2m1h
+1mi
+mi3ak
+m5i4do
+mid3s
+5mi5f
+mi2g
+mi5k4l
+mik5r
+mind3
+mini3sk
+min2s
+mi4o
+mi3p
+mis4la
+mis3s
+mi2s3t
+mi5te
+1mj
+4m5jer
+4m5jo
+2m3k4
+2m3l
+2m1m
+mma4l3
+mme4de
+mme4len
+mmen1s
+mme1s
+mmi3a
+mmi4g3
+mmon4s
+2m1n
+mn3am
+m5ni
+mni5t4
+mn4s
+1mo
+mod5r
+mod4s3
+mo3g
+2molj
+mo3no
+mo5ra
+mor4si
+mor4st
+mo3rø
+mo2s3k
+mot3a
+mo4tak
+mo4tar
+mo4til
+mo4tof
+mo4t3r
+2mo2v
+5mo3va
+mo3vere
+2m1p
+mpe3s
+m2pl
+mp5log
+mp3p4
+mp5re.
+mpri5o4
+m4p5rot
+m4ps
+2m5r
+2ms
+m3se
+m4sep
+m3sko.
+m1slag
+ms3lan
+m1s2n
+m1sp
+ms5par
+ms5pre
+ms3s2
+m4s5tal
+ms4tere
+m3s4to
+m3sva
+ms5væ
+m5sæ
+m3sø
+ms3å
+2m1t
+m4t5or
+mt2v
+mt3va
+m3tvin
+m3tå
+1mu
+mu5da5
+mu4e5r
+mull4
+mulls5
+mu5ni
+munn3s
+3mus
+mus3k
+muss5t
+2m1v
+m5w
+1my
+3myn
+my5on
+my3s4te
+5mæ
+1mø
+4møk
+møn2
+5mørk
+mør4kl
+mør3ø
+møy3
+1må
+må4len
+4mår
+må4re
+må5s
+1na
+nad5sk
+4n5adv
+n5ae
+na5f4r
+n5agi
+2nak
+5naka
+5nako
+na3k4r
+n5aks
+4n1akt
+na4l5ap
+n5a4lar
+nal5dra
+2nalge
+na4lom
+na4l5u
+na5lår
+na3me
+4nana
+5nanda
+n3ande
+2nap
+n3appar
+nap5s
+2narb
+4narv
+nas4t
+na4stø
+3nat
+na4tel
+na4tep
+4n3atl
+na3tre.
+nats4
+nat2tra
+4navg
+3navn
+2n1b
+nbo5b4
+n1c
+2n1d
+n3da
+nd3art
+nders4
+nde3s
+ndi3o
+ndisip5
+nd3j
+nd1op
+n3drag
+nd5ram
+nd3ri
+nd4ron
+nd5sat
+nd4s5end
+nds5kar
+nd3skr
+nd4skra
+nd3tva
+1ne
+nea4n
+ne5ar
+5neb
+4nedd
+n3eddi
+nedi4s
+ne4d5om
+n3eff
+4negg
+2neie
+ne3in
+ne5ist5
+nek4l
+n3enge
+neni5
+2neple.
+ne4p5re.
+ne4rei
+nero5b
+ne5rov
+ne3sn
+ne3s4p
+ne3sta
+nes5tek
+nes3ti.
+ne5s4v
+n3e4tas
+ne3t4r
+net3st
+2n1f4
+4ng
+ngat4
+ngelsk3
+nges4
+ng3g
+ngis4
+ng3jern
+ng5lad
+n2g3om
+ng5orm
+n2gr
+ng3ren
+n5grep
+ng5rot
+ng5ser
+ngs1k
+ng4ska
+ngs5na
+ng5øy
+2n1h
+1ni
+5ni.
+ni3ak
+nids4
+ni3en
+3nik
+ni5k4ro
+ni4ne4
+4ninf
+2n3inn
+4nins
+4n3int
+ni1o
+ni3or
+2nip
+nip3l
+nip4pes
+nis4a
+ni5sar
+nit3r
+nit4rer
+2niv
+niv5sk
+niv3st
+3nivå
+n5j
+2n1k
+n4k5au
+nke3s4
+n2ki
+n3kie
+nk1in
+nk3k4
+n2kl
+n5kled
+nk3ler
+n3kli
+nk5lok
+n3klu
+nk5st
+nk4tek
+n4k5vo
+n3kør
+2n5l
+2n1m
+2nn
+n4n5ad.
+nna4k
+nn5ake
+nn5ank
+n4nau
+n2nav
+nn3avl
+nn3d4
+n5ne.
+nneds5
+nne4ge
+nn5egg
+nn3eie
+nn4er
+nn3g4
+n5n4ing
+n3niv
+nn3k
+n4nof
+nno4mi
+n2n3or
+nn4sek
+nn5sov
+nn5s4po
+nn1st
+nn5ster
+nn3t4
+n2n5ut
+nnø4
+nn5øv
+nn5å4
+1no
+no5br
+4n3off
+2nok
+4n5oks
+no2ku
+2nolj
+no4mek
+4nomn
+nom3s4
+2nop
+no3ra
+2n3ord.
+nor3dav
+nord5o
+4n5org
+4nork
+nor4s
+no5ræ
+no5sk
+nos4p
+nos3t
+2n3ost.
+3not
+no5ul
+2nover
+3no3vere
+2n1p
+2n3r
+2ns
+n2sa
+n5sad
+n3sag
+ns5akt.
+n4s5alp
+n5sang
+n3sat
+n3sau
+ns3eie
+nse4le
+nsem4
+n3ser
+nse3s
+ns4inf
+n5skaf
+n3skal
+n5skau.
+ns5kno
+n5skog
+n1skr
+n3sku
+n5s4lam
+ns5len
+n3slip
+ns3lit
+ns3lu
+ns4mek
+n3snar
+n2so
+n5sod
+nso4k3
+n3sol
+ns3oms
+ns3op
+n3splin
+n5spå
+ns3s4
+ns4ten
+nste4v
+ns5ting
+nst3is
+nsu5b4o
+n4s5vak
+nsøk5i
+n3såp
+2n1t
+nta4la
+nt5amm
+n4tana
+n4t5ark
+nt5aut
+nt4e
+nteks5t
+nte4ra
+n4t5ess
+nti5k4l
+n2tr
+ntral3a
+n5tram
+n4t5ret
+nt3ri
+nt4riv
+nt4ro.
+nt3ru
+nt4ru.
+nt4rø
+nts4ki
+ntu5e4
+n4t5uk
+ntu5ra
+n4tøk
+1nu
+nu5et
+nuf4te
+nu3i4
+4nuly
+2n3un
+nu4ni
+nu4sels
+nus5ta
+nust5r
+2n5v4
+nve3s4
+nves3t
+nve4sti
+nve4s5to
+1ny
+3ny.
+ny3e4
+ny5k4l
+nyl5t
+4n5yn
+ny3or
+ny5sn
+ny3tr
+n3z
+1næ
+1nø
+3nød.
+nøds5ti
+nø5g4r
+nø3h
+4nøko
+nøl4o
+nø5p4
+nø5ra
+n5ørk
+nøs4l
+nø3s4m
+nøt5r
+3nøy
+nøye3r
+5nå.
+3nåd
+3nål
+n3ån
+4nå4p
+n1år
+n5å4s
+oa2
+oa5b
+oa3g
+oa5i4
+o5aj
+o1ak
+oa3l
+o3am
+o1an
+o3ap
+oa4s
+o3asi
+oa3t
+o3av
+3ob1j
+ob3l
+o4b5li
+ob4lo
+obog4
+o5bra
+ob5rer
+ob5ri
+o3ci
+o5cr
+o3da
+o5dam
+od3an
+od4dre
+o4d5ikt
+od5s4ka
+od5sn
+od3sp
+ods5te
+od5sti
+o3dy
+od5å4
+o3e4
+oe5su
+1offi
+of3ta
+og5ei
+o3gen
+ogg4r
+og2l
+og3le
+og2no
+og3red
+og3sk
+ogs5ka
+og3sn
+ogs4tj
+ogs4to
+o1h
+o1i2
+o4ia
+oi4d
+oi5e
+o4ig
+oi3le
+oi5ni
+oi5se
+o4it
+o1j
+o1ka
+o4kei
+o3ki
+o4kil
+o1kj
+o3kla
+ok3le
+ok3n
+o5kol
+okon3
+o1kr
+o5k4ro
+1oksid
+ok2sk
+okst3r
+ok4sv
+ok4søl
+o2k3v
+ok4vin
+o1l4a
+o4l5am
+ol5d4r
+4ole
+ol4fj
+4oli
+3olj
+ol2k3l
+4oll
+ol4l3un
+ol4m5ur
+ol4m5å
+o3lo
+o4loks
+olo3kv
+ol5sko
+ol3sv
+olt5o
+o1lu
+ol5ur
+ol5ve
+o1ly
+o3læ
+ol5år
+2om.
+4oma
+o5makt.
+om5akts
+om3ald
+om5am
+oma5sk
+3ombu
+2ome
+ome5d
+om5ekt
+om5eur
+om5je
+om3ju
+4omm
+omme2r
+1omn.
+om2na
+om3pli
+3områ
+oms4kra
+5om5su
+om3t
+o2mu
+om3ul
+om5ur
+omø4r
+om3øre
+2ona
+5onak
+on4al
+onas5t
+on3av
+on4dar
+ond4ri
+ond3si
+4one
+on4gj
+on3gla
+ong3ra
+on3gre
+4oni
+o4nid
+on3k
+onning3
+4ono
+onop5p4
+onse4n
+onsi5s
+ons3l
+onsø4
+on3t
+ontek4
+on4tri
+on5ur
+o4nut
+4onæ
+oo4mo
+o3o2p
+o1or
+2opa
+o1pi
+4opl
+o1pla
+op3li
+o3po
+2opp.
+3opph
+3oppl
+3op4p5r
+3oppt
+op4p3u
+2o1pr
+op5re.
+op4s5e
+opt3r
+o3py
+2or.
+o1ra
+o5ran.
+o3rat
+or3av
+or4dep
+3ordn
+ord3ra
+ords5la
+ord3st
+o3reb
+o3red
+o3ref
+o3reg
+o3reh
+o3rek
+o5reli
+or3els
+oren1
+o5renh
+or1eni
+or3enk
+o3re1s
+or3esc
+o3ret
+ore4tan
+1orga
+o5ri.
+1orien
+ori4mo
+or5inn
+or3int
+o4r5iv
+3orkes
+ork4l
+or4nal
+o3ro
+o5ron
+or3or
+o4rov
+or4s5ed
+ors4ka
+or3sl
+ors4t
+or4sæ
+or4tar
+or3tr
+ort3sø
+or1u2
+o3rub
+o5rum
+oru4t
+o5ryf
+or3yn
+oræ4
+orø4
+or3øk
+or3øn
+osi3e4
+osi4l5u
+4osk
+os2ka
+o1sko
+os5m
+os3n
+o3spe
+os3sa
+os4sko
+os4sp
+o2st
+ost5ad
+o3stas
+o3stat
+ost5eg
+os5ti.
+os3tit
+o4s4to
+ost3op
+ost5ran
+ost5røy
+ost5un
+os4ty
+o5sva
+o3sy
+o1ta
+o5te
+ote3i
+o4teld
+ote5o4
+otet3s4
+otia5
+ot5off
+oto3s
+o3tr
+ot3sa
+ot2sk
+ots4p
+ot3sv
+ot4tap
+ot4tar
+ott4s5tr
+otts3v
+otus5
+o1ty
+o5tø
+ou5b4
+4oun
+ou4v
+4ov.
+o1va
+o3ve.
+o3ved
+4o3vek
+o3vem
+o3ven
+ov4ende
+1o2ver
+2overe
+overi2
+o5vern
+o3vet
+o1vi
+1ovn.
+4ovo
+ov4se
+ov3sm
+o5væ
+o4we
+oya3m
+o3ø4
+o3å
+1pa
+4pad.
+4padg
+pa2g
+pag4h
+3pak
+pak5kr
+pa5la
+panikk3
+pan5k
+3pap
+pa5p4r
+2parb
+p4arbr
+part4s
+5pass
+pa3s4te
+pa3stil
+3pate
+patri3
+2p1b
+p3c
+4p3d2
+1pe
+pe3a
+pe5di
+pe5le
+pel5sl
+pel5sn
+3peng4
+5pens
+3pep
+pe5pl
+4perr.
+5pers
+pe5s4ko
+pe2tr
+pet3s4
+p3etse.
+2p1f
+4p3g4
+2p1h
+pi3e4r
+5pil.
+pin4g
+pinn3s
+pi5ok
+3pip
+pis3k
+pi2st
+pist3r
+3pit
+p3ja
+4pje
+pju4
+pjus5
+2p1k
+p2l
+pla4k5e
+3p4lam
+p3lar
+3plass
+4ple.
+3plek
+p3lem
+p3lep
+p3les
+p3let
+p3lev
+pli4d
+3plikt
+5pline
+3plinæ
+4plit
+3p4loi
+p5lot
+ply5d
+p3læ
+4p3lø
+p3lå
+2p1m
+2p1n
+1po
+po5dr
+pokt4
+pol5an
+5poli
+4polj
+pol2s
+polst3
+4pon.
+4por.
+4pore
+4porg
+por4tv
+po3rø
+po3sti
+pos4tis
+po3str
+4pov
+2pp
+ppe3st
+ppe3tr
+p1pi
+p4pid
+pp3l
+pp3r
+pp5ros
+pp1s
+pp3sa
+pp3t
+ppu4
+pp3y
+pp3ø
+p2r2
+3pref
+4prel
+pren4s
+3pres
+pres5te
+p4rim
+3prins
+p4rior
+3pris
+3p4ro
+5prod
+pro3g
+pro3sk
+pro3v
+prøs4
+5prøv
+4prå4
+pråk3
+2ps
+p2sa
+p4sar
+4p3se
+p4sed
+4psi
+p5sis
+p3sj
+ps3kv
+p5skå
+ps3le
+ps3lo
+ps5lus
+p3slå
+p3snø
+4p1st
+p3sta
+ps5tre
+p2sv
+p2sy
+3psyk
+4p1t
+p5te
+ptus5
+ptøy3
+1pu
+4pudy
+pu2e
+3pul
+3pum
+3punk
+5pus
+pus4h
+2p1v
+3pæ
+pø4bl
+pø4t
+4p3ø4v
+p5øy
+3på1
+4påd
+p5ål.
+4påp
+på3t
+1qu
+que5r
+3rabat
+ra4del
+3radio
+4ra3dr
+ra4dre
+rags4l
+ra5ins
+ra3isk
+3raka
+ra4k5au4
+5raki
+rak5se
+2rakti
+rak4v
+rak5ø
+3ral
+ra2la
+rala4n
+ra4l5en
+ram3b
+ra2mer
+ra4mu
+r4an.
+2rana
+r2anda
+rand3r
+2ranl
+ran4na
+rann1s4
+ran5sj
+ran3skr
+ran4tro
+ra5om
+ra3pl
+2rar
+r3arm
+ra3rø
+3rasit
+ras4pa
+ras5sl
+r5a4tel
+ra3t4r
+ra4tut
+5raud3
+ra3utg
+rau4to
+2rav
+rav3al
+ra3vi
+3ravn.
+ray5
+2r1b
+rbe4d
+r1c
+2rd
+r5dad
+rd3amer
+rd3ar
+rd3aus
+rden4s3
+rde5st
+r5det
+r3di
+rdisi5
+r3dj
+rdjup3
+rdju4pi
+rd5rei
+r5dris
+rd2st
+rd4va
+r3då
+1re
+re2ag
+re5am
+reb4
+redes5
+re3dr
+re4drep
+red4st
+4reff
+re2fl
+refo4r
+re4f5re
+4regg
+5reins
+3reis
+re4kle
+2reks
+rek4v
+4r1eld
+3rele
+4relem
+5relø
+4remb
+rem5ett
+ren4g3r
+re2ni
+ren4kl
+r3enl
+ren5ska
+ren4ski
+re3ol
+re5o2r
+rer5ap
+re5res
+r3ern
+re5sa
+4re2sc
+re5sku
+re3s4l
+re2spi
+2ress.
+res2s3k
+res2s5t
+res3tas
+res1tau
+res4ter
+re3s4ti
+5resu
+5retn
+re4t3ret
+re5tri
+re2t3ro
+2reur
+rev3ad
+re4v5inn
+3revis
+2r5evn
+2r1f
+rfe5b
+rfje4
+rfjet3
+2r1g
+r4gand
+rg3art
+rga4s
+rgefi5s
+rge4sv
+rg4he
+rg2l
+rg3s4t
+2r1h
+1ri
+ri1an.
+ri5ano
+ri3ant
+ri3at
+ri5av
+ri4dø
+ri5eli
+2ri1en
+ri4end
+ri3ete
+rif4l
+ri3fr
+rigs3
+rig4si
+ri3k4l
+ri5k4v
+ri3kå
+ri5lø
+4rimm
+ri4mor
+4rind
+rini5
+2rinn
+2r5inst
+4rint
+ri3om
+ri3o4s
+rio5sk
+ri3o4t
+ri3sko
+ri3spa
+ri3t4r
+ri4van
+ri4vis
+4rivs
+r1j
+2r1k
+rka3d
+rk5akt
+rkap4
+r4k5ei
+rk3k4
+rk5leg
+rkob5
+rko4pr
+rk5red
+rk3skr
+rk5s4p
+rk3st
+rk4s3ti
+rkt4
+r3kø
+2r3l2
+rlog4
+rlo5v
+2r1m
+r4m5ap
+r4m3endr
+r4m3je
+rm3p
+rm4sj
+rm3sk
+rm5st
+rm5svi
+rmål4
+4r1n
+r4n3ald
+r4nart
+rn5d
+rne3p
+rnes4m
+rn3g
+r5ni
+r4nom
+rn3sk
+rnø4f5
+rn4å
+rob4
+ro1bl
+4robr
+r5obs
+3roc
+ro5dr
+ro4f5l
+ro5fr
+3rofy
+roge4s
+ro3gl
+4roke
+3rokj
+ro3kl
+2rok5s
+ro4leu
+4rolj
+4romb
+3rome
+ro4mj
+4romn
+ro5mo
+4romp
+4r5omv
+2ronn
+r3onn.
+3rono
+ron3s
+4ropp
+ropp2s
+rop2s
+2ror
+r3ord.
+3rose.
+ros5l
+ro3sta
+4roto
+roy4
+roy5e
+2r1p
+rp4l
+r5po
+r1r
+rr3d
+r3re
+rre5ster
+rrie4
+rri5eri
+r3ro
+rr3s
+r3ru
+2r1s
+r3sak
+rs3att
+rsbe5i
+r3se
+rs5eld
+rse3s
+rsjo4f
+rsj5or
+rsjø5
+r2sk
+r3s2ka
+r4s5ke
+r3skik
+rs5kit
+r3skj
+rs4klæ
+r3sko
+r3skr
+r4skro
+r3sku
+r3skå
+r2sl
+rs4let
+r3slå
+rs2n
+r3s4po
+rs3s
+rs5tal
+r4stap
+r4ste.
+r4step
+rs4tig
+r3sto
+r4s5tro
+rs3tun
+rs5un
+rs2v
+rs5van
+r4svek
+r5s4y
+rs5æt
+4r1t
+rt5art
+rta5s4
+r5te
+rte5inf
+r4tind
+r4t5ord
+r4tov
+r4treg
+rt5rot
+rt5sa
+rt4sid
+rt4skr
+rt3s4mu
+rt4su
+r4t3un.
+rt5und
+r3t2vi
+rt5ød
+r3tå
+rt5år.
+r4ub
+ru5i4d
+ru3in
+ru5kr
+4ruli
+5rulk.
+r5ulke
+r3ulv
+r4um
+rumf5
+run3a
+3runde.
+ru2r
+rur5s
+rus4pen
+ru4st5r
+ru4stø
+2rut
+rut3a4n
+2r1v
+r5va
+rvei5
+r3vj
+r3v2r
+rv2s
+rv5st
+rx3
+ry5er
+4rym
+ryn5g
+ry5ot
+ry4p5i
+r5æt
+rø4da
+rød3r
+rød3st
+røk5r
+4røl
+rø4m
+rønn3
+rø5si
+rø4ta
+rø3vi
+rågå4
+råka4
+råk3l
+4rål
+r1å4r
+råse5i
+rå5te
+rå3tr
+3råv
+1sa
+3sa.
+sa4bl
+2s1adv
+5safe
+sa4f3r
+s3afte
+s3a4gi
+4s3a4g3r
+sag3s4
+sa2k
+3sak.
+s3aka
+3sake
+sak3er
+sak5es
+sak3i
+4s3aksj
+2sakt
+s3akti
+3sala
+sa4lar
+s1ald
+3sale
+3salg.
+sal3s4
+3salt
+3salv
+3sam
+sa4mat
+sa2mor
+2s5a2na
+s3angs
+4s3anl
+s3ansi
+san3skr
+s3anten
+4s1ap
+sa4po
+2s1ar
+3sar.
+4s3arb
+sa4rev
+s3art
+3sas
+4s3atl
+sat4r
+sa4t5ra
+sa5tre
+3sats
+s3atte
+2s1av
+s3avs
+4s5b
+sbond4
+1sc4
+4sca
+sch2
+s4co2
+4s3d2
+1se
+3se.
+se5at.
+3seb
+s3ed.
+se3dr
+sef4
+se4gen
+s3egg.
+se4gl
+2seie
+s3eie.
+4s5eit
+sek4l
+se3kne
+se4knu
+se2k3r
+se3kro
+4seksp
+seks3t
+sek4tet
+3sel
+sel5at
+se4lite
+sel2s
+sels5ta
+sel2v
+sel4v3e
+s4en.
+4s3endr
+3s4ent
+2seple
+ser3ap
+se3re
+2serkl
+se4ros
+ser4tv
+se5rø
+se2s
+ses5il
+ses5sm
+ses4tas
+ses4tel
+se3sy
+3s2et
+se3t4r
+set4tø
+se3tv
+se3u
+2s1evn
+seøy5
+2s1f4
+3sfæ
+4s3g2
+sgu2
+2s1h
+5s4ha.
+sho2r
+1si
+si1al
+3sid
+4sidr
+si1en
+si5eu
+si4f3l
+sif3r
+3sig
+si5gl
+sik4kl
+sik5ko
+sikts3
+4sillu
+5sina
+4sindu
+2sinf
+s3innl
+4sinnt
+si4op
+3sir
+sise5
+sis4t
+si1ste
+sis5tem
+si5sø
+4s5itl
+si3tr
+siv5a
+si4val
+siv3s
+si4v5u
+5siz
+1sj
+2sj.
+4sjag
+4sjb
+3sjef
+4s5jern
+sje3s4
+4sjf
+4sjg
+sj3ia
+5sjik
+4sjk
+4sjl
+2sjm
+4sjom
+sjon4
+2sjor
+s3jord.
+4sjou
+2sjp
+2sjt
+3sjuk
+2s3jus
+sjø2l
+sjø1r
+sjø3s4
+5sjå
+4sk.
+1ska
+4ska.
+4skalv
+2skam
+2skan
+3skap
+5skap.
+4skapi
+4s5kapp
+sk5arb
+4skart
+2skas
+2s3ke
+3s4kei
+ske3s
+1sk4i
+3skif
+ski5kr
+3skilt
+ski4na
+3skinn
+ski4no
+3skip
+2skir
+3skiv
+1skj
+3skjeg
+2skjens
+2skjole
+3skjor
+4skjærl
+skk4
+4s3kl
+sk4le
+sk5lit
+4skn
+s3kna
+s2ko
+3skok
+3skol
+1skole
+4skom
+4skon
+5skorpe
+3skot
+s3kov
+s1kra
+2skraf
+4s4krep
+4s3kret
+3skrif
+4skrig
+s3kro
+4skruk
+s3kry
+4sks4
+4skt
+s2ku
+3s4kud
+4skun
+2s2kv
+3skvet
+s3kvi
+s3kvo
+3sky
+sky3d
+3skøy
+4s3kåp
+1skår
+s1l
+s2la
+sla4gi
+s3land
+s3las
+s3lat
+3slave
+4sle.
+s2lede.
+sle4i
+s2lek
+s2leng
+s2lep
+s4likk
+4slin
+slin4t5
+3s4lir
+4slis
+s2lit
+3slite
+3slitt.
+s2lo
+s3los
+slott2
+s3lov
+s2lu
+4s3lue
+5slup
+s4lut
+4sluv
+s2lyn
+3slyng
+4s5læ
+4sløs
+3s4lå.
+s3lås
+3slåt
+2s1m4
+s2mak
+3smak.
+4sman
+sma5t4r
+s2med
+s4med.
+3smell.
+smete5
+smeteo4
+5s4mi.
+s4mie
+3s2mug
+s2my
+3smyk
+s2mør
+3smør.
+3s4må.
+små3r
+s1n4
+s2na
+s5nad
+4snat
+4s3nav
+4s5ne.
+4sneb
+sned5s
+s2negl
+5s4nek
+s5nem
+s4nil
+4s3nin
+sning4
+1s4nip
+3s4nit
+s3niv
+s2no
+s2nø
+snø5dr
+snø3kl
+snø3l
+3snør
+snø1s
+snø5vi
+s3nå
+1so
+3s4og
+so5gl
+5soi
+3s4ok
+sokk4
+4s5oks
+3sol.
+3sold
+so5li
+2solj
+sol3s
+sol5ø
+3s4om.
+s3omf
+3somh
+3somm
+4somn
+2s1omr
+s3omt
+3son
+son4sk
+so2p
+4s5ope
+3sopp.
+s3oppg
+sop3r
+3sor.
+2s1ord
+5sore
+4sork
+3sort
+sos5k
+3sot
+2so2v
+3sove.
+5sovek
+s2p2
+2sp.
+5spad
+spa3g
+3spann
+3s4pat.
+spe4a5
+3spei
+1s4pell
+4speng
+2s3per
+3sperr
+s4perre
+1spi
+s4pio
+2spip
+2s3p4l
+2s3po
+3spor.
+s4pora
+4s5pos
+5spra
+2spro
+3spru
+3språ
+s3ps
+sp5st
+4spul
+4spum
+3s4pur
+3s4py
+4s5pyr
+3spø
+4s3r
+srac4
+srack5
+4s1s
+ss2a
+s4s5ald
+s3se
+sse5in
+ssel3s
+s5sem
+ss4end
+s4s3enk
+s4sepl
+s5ser
+sse3s
+s5s4ing
+ssive4
+s5s4kjæ
+s4s3kå
+s2sl
+ss4let
+ss3li
+ssmosa5
+ss2n
+ss5oms
+ss5pre
+ss4t
+ss5tet
+ss5tit
+ss5tro
+ss5tru
+ss5try
+ss5tub
+s4s5ul
+s5sur
+ssu4t
+s2sv
+s3sy
+s2t
+4st.
+2sta.
+3stake.
+1stan
+3stang
+s5tank
+2stann
+st5antr
+1stat
+1stav
+s4tav.
+4stavl
+4stb
+2std
+ste3am
+1s4ted
+3sted.
+2steg
+s4teg.
+1stei
+3stein
+s4tek.
+3s4teke
+s4tekt
+3stemm
+3stemn
+3stemt
+3s4teng
+ste4n3om
+3step.
+1sterk.
+4stert
+stes5ta
+s4teu
+3stev.
+4stg
+2sth
+4stia
+4stid
+3stift
+4stig.
+1stik
+2s5tike
+3s4tikk
+4s3tiko
+2s3tiku
+3s4til.
+3stilk
+2stils
+st3ind
+4stinn
+1stjer
+4stk
+2stl
+4st5n
+4sto.
+3stof
+4s5tog
+3stokk
+st5oms
+4s5ton
+sto4p
+4s4t3ord
+sto4ret
+s5tos
+3stove.
+1str
+4strav
+2stre.
+st5rekl
+s3trel
+s4trik
+4stroe
+st3rom
+5strup
+2st3rus
+s5tryg
+3s4trøm
+st5røn
+4st3s4
+5s4tud
+3stue
+stue3re
+3stund
+4stur
+5s4ture
+4stus.
+2stv
+3sty
+5styk
+s3typ
+s4tyr
+4stæ4
+3stø
+stør4k5
+størs5
+4støs
+1stå
+5s4tåe
+3stål
+2s5tår
+1su
+3sua
+3su2b3
+3suc
+su4f
+3sug
+su2k
+4s3uke
+3sukk
+3sum
+4s3und
+su4nen
+3sup
+sup3r
+s5urt
+3sus
+2s1ut
+s4ut.
+sv2
+3s4vane
+svar2s
+s5ved
+4s5veg
+svek4l
+sver3a
+sverd3s
+3sverm
+s2verte
+s2vet
+3s2veve
+s4vi.
+3svie
+s3vil
+4svir
+s1vis
+s5vit
+3s4vor
+3svu
+3s4vø
+s3vå
+1sy
+sy2d
+sy5da
+sy3er
+sy4kog
+5sym
+3s4yn
+3syre
+sy5ri
+4s1yrk
+3sys
+4s3yt
+2sytr
+sæ2r3
+sære4
+sæt5r
+4søko
+3s4øl
+s3øns
+1sør3
+sø4ret
+sør4i
+s1ø2v
+2søy
+s3øye
+3søyl
+3så.
+5såd
+3sål
+4s3ån
+så4r
+s3åre
+s5ås
+3ta.
+ta5b4r
+5tadra
+tad4s
+3taf
+4t3afri
+ta3gr
+ta5is
+ta4ka
+4take.
+taks5ei
+t3aksj
+tak3sk
+2taktig
+3tal.
+3tale
+tali5e4
+3tals
+3tame
+4tamm
+tam4o
+5tamt
+tand4a
+4tangr
+tang3s
+ta4nin
+3tank
+t3anl
+5tann
+tan4nem
+t5anten
+3tantis
+4t3anv
+3tap.
+5tapi
+2tarb
+3tard
+ta5ru
+t3a4sia
+ta3sn
+tas4p
+ta4sta
+5tatar
+2tatl
+5tato
+tat2s3
+tat4sa
+tat4sk
+t5attr
+5tau.
+ta3un
+3taur
+tau3st
+4taut
+4t3avd
+2tavg
+3tavind
+3tavl
+tav5o
+ta4vor
+4tavs
+4tavt
+3tavæ
+tay3
+4t1b
+4tc
+t3che
+2t3d4
+3te
+5tea
+5tebo
+5tedag
+te4deg
+5tedir
+5te3d2r
+5tedu
+5tedy
+5tedø
+5tefa
+5tefo
+4t3egd
+4tegg
+teg4l
+5tegn
+4tei
+5tei.
+5teig
+tein3a
+5teinn
+5teip
+te1is
+5tekn
+te4knu
+4teksp
+teks4t
+tek3sti
+tek3stu
+tek5stur
+tekt2s3
+t3eld.
+te3lem
+4tella
+tel5sv
+4temm
+4temn
+5temo
+temp3l
+4temt
+temøn5
+te4n5an
+5teno
+ten5t4r
+5teo
+4tep.
+tepri3
+teprio4
+5tera
+te2r3en
+4terk.
+ter4kv
+ter5r
+ter3sm
+5tert
+4t3eske
+te5s4ko
+te5sku
+tes4mo
+tes5or
+te3s4p
+te2sta
+tes5tant
+tes3tas
+te3stil
+tes4to
+te3s4v
+te4tend
+4te4ter
+5teun
+te3us
+5teut
+4tev.
+5tevi
+4tevn
+4t1f
+2t1g2
+4t1h4
+than4s3
+thun4
+1ti
+5tia
+tiat4r
+5tiby
+5tid
+3ti1e
+tift4
+3tig.
+ti4gru
+tik4ka
+tik4kl
+tikk3o
+ti3k4r
+tik3v
+3tilb
+tild4
+t3ild.
+ti4lei
+3tilf
+5tilfe
+4till.
+3tilla
+3tilleg
+5tils4
+3tilta
+5tima
+3time
+3ti3na
+4tinf
+2t3inn
+tinu5a4
+tinu4i5
+ti4o
+ti5or
+ti5os
+ti3pl
+5tir
+3tis
+ti5s4ta
+tis4to
+5titur
+tium4
+tiv3s
+3tiå
+2t1ja
+4t5jeg
+3tjen
+tjen2s
+tjer4t
+t3jev
+2t3jo
+3tju
+t5jun
+4t3k2
+4t5l
+2t1m
+tma5t4r
+2t1n
+t3ni
+1to
+3to.
+to3ar
+4t5obl
+3tog
+tog4r
+t3ogv
+tokk5a
+tok4kan
+to3kl
+5toli
+4tolj
+3tom.
+5toma
+to4mal
+to4m5e4n
+4tomf
+tom5s4
+3ton
+tong3r
+tons4
+3tor
+to3rar
+to4ras
+t5orde
+to4r5ek
+tore4t
+tor5ete
+5toris
+tor5k4
+4torm.
+5torra
+tors4l
+5torv
+to3ry
+to5rø
+to3ska
+tos4t
+2tost.
+to3sta
+to3str
+to3ut
+4t1p
+tpa4r
+tpres4t
+tpre5sta
+t2r2
+5trai
+3trakta
+t4rane
+3trao
+3trap
+t3rate.
+3trav
+4travn
+t5redd
+t3reg
+5treka
+3trem
+tre3ni
+t3rens
+tre3sp
+tre3st
+4treu
+tre5v4r
+2tri
+4trid
+t3rik.
+3trill
+4tring
+3trinn
+3tro.
+3troe
+t3rog
+t3role
+3troll.
+4t5rom.
+t3rona
+t3ropo
+3tropp
+tro3v
+3tru.
+2t3rud
+t4rue
+t3rug
+t4ruk
+4trun
+t3ru3r
+4trut
+3trøst
+3trøye
+3tråd
+4ts
+t2sa
+tsa4f
+tsak3
+t3sang
+tsbe5i
+5tsef
+ts5eid
+t4s5enk
+ts3erk
+t3sil
+t4sj5is
+t4sjo
+t1sk
+ts4ke
+ts3kv
+tsky4e
+t5slad
+ts4lik
+t3slu
+ts3ma
+ts5me
+ts2n
+ts3na
+t1spe
+t1st
+ts3tap
+ts4te
+t3sted
+t3s4to
+t3stri
+t5stu
+ts5ur
+ts3vo
+ts5væ
+t3sy
+t4sæ
+t5søm
+4t1t
+tt5arm
+t4t5as
+t5te5i
+t4tek5s
+tten5s
+t4tins
+t2tol
+tt5ram
+tt4re
+tt3ring
+tt5riu
+tt5rom
+tt5rå.
+tt5sei
+tt5sn
+tt3spr
+tts4tj
+tts4ty
+tt3så
+tt5t
+tt3v
+t4t3y4t
+ttør3
+tt5øri
+tt3øye
+tt1å4
+1tu
+tu3e4t
+5tuf
+4t5ugl
+tu3in
+3tukt
+3tula
+5tule
+t3ull.
+3tun.
+tun5d
+tun3gr
+5tunn
+3tur
+5turb
+3tus.
+tusi3
+tu4s5o
+4tutg
+2t1v
+tve5d
+tvei5e
+t3vin.
+t2ving
+3t2vis5t
+4t3w
+ty4la
+5type
+5tyra
+tyr3st
+3tyv
+2tz
+1tæ
+4tød
+t3øks
+tø2r
+t3øre
+5tørk
+5tøs
+4tøt
+4tøv
+2tå
+tå3k
+t3ån
+1tår
+tåte5
+u3ac
+u3ak
+u3al.
+u3ald
+u5a4le
+u5alf
+u5all
+u5alm
+u3a4lo
+u5a4lu
+u1a2n
+ua5no
+u3ar.
+u3ay
+ub4br
+ub3l
+ub4lo
+u3br
+u3ce
+u3ch
+u3ci
+uda5i
+ud3dh
+uddom3
+ud4då
+ud4en
+ude3s
+uds5i
+ud4sja
+ud4sl
+uds5te
+5u2dy
+u4døy
+u1el
+u3els
+u1en
+uend5r
+u1e2r
+u4eren
+ue3ri
+u4ern
+ue5ro
+uer4r
+ue3sn
+ues4t
+ue5u
+u5ez
+uf4l
+ufor5d4
+uft3a
+ug4a
+ugj5end
+ug5la
+ugo3
+ug5se
+ug3sk
+ug3sv
+u5gæ
+u1h
+ui2m
+uis5a
+u3isk
+u3ism
+u3ist
+u3itt
+uit4to
+u1j
+u5ka
+u5ket
+u1ki
+u3kj
+uk3l
+uk4s5l
+uk4st
+ukt4r
+u2ku
+uk3ur
+u4kv
+u1la
+ul4d5o
+ul4dø
+u5li
+ul4k5l
+ul4lov
+ull5sv
+uls5k
+ul2st
+uls5ti
+uls3v
+ult5o
+ul2t3r
+u1lu
+1uly
+u1læ
+u3lø
+uma2ne
+um4fes
+ummi3
+um3pla
+um4spa
+umt4
+4una
+u5na.
+under3e
+3underv
+und3st
+4une
+un4g5j
+ung3l
+un4go
+ung3si
+u2nion
+un5nak
+unns5la
+un3or
+unst3a
+uns5tig
+un5sv
+un3tr
+un4tri
+u4n5øy
+u3nå
+uo2
+u5ol.
+u3op
+u5or.
+u3o4r3e
+uo3ri
+u3ort
+u3o4s
+uove4
+uover3
+u3pi
+up3li
+up5lo
+up5pr
+up3re
+up5sa
+up4sk
+u3pø
+u4på
+4u1ra
+ur5ade
+ur5akk
+ural5a
+u4ralu
+ura3s4
+ur5avs
+u3ref
+u3r4el
+u3res
+u3rev
+ur2gl
+4uri
+ur3inn
+uri4sp
+uri4st
+ur4kak
+ur4kle
+u1ro
+ur5oks
+ur3opp
+u3ror
+u5rot
+ur5r
+ur3sk
+ur5tv
+u1ru
+uru3s
+u3ry
+ur5øy
+u2sa
+u5saf
+us5and
+u3sat
+us4er
+use5s
+us5i4m
+us4is
+u3sit
+u4sja
+u4sji
+u2sk
+us5kå
+us3la
+us5ly
+u4s5ok
+us4o3v
+us3p
+uss3m
+us4som
+uss4p
+us2st
+us5tak
+u3stas
+ust5ett
+us3ti
+us4tig
+us4tik
+us4tr
+u3st4ra
+us5tøm
+u2su
+u4s3un
+us1v
+u2sy
+u1ta
+ut3adr
+utak4l
+ut3arm
+ut5art
+ut5aus
+3utb
+1utd
+ute3g
+1utg
+uti4v3
+u4t3j
+3utmå
+ut5oms
+ut3r
+ut4ros
+3utru
+ut4rusk
+ut3s4
+1utst
+utt3s4
+1utv
+u5ty
+u3tør
+uu4
+uum5
+uumi4
+u3un
+u1v
+u4vø
+ux3
+uya5ne
+u5yu
+uø4
+uøn4
+u3å
+3va.
+vad1r
+va2f
+va5fr
+vak3s
+4v5akti
+vak4to
+3valg
+va5lor
+4valv
+va4nar
+2vang
+3vann
+van5sl
+van5sm
+va4pe
+va5po
+va5ra3
+2varb
+3varm
+vars5v
+vas2
+va2sk
+vas3ki
+vass3
+va4st
+3vat
+vat3ei
+va4t5el
+4vav
+2v1b
+2v3d2
+vdisip5
+vd4ø
+1ve
+ve5a4
+ve5dis
+ve4då4
+vefe3i
+ve4gi
+ve4gre
+3vei.
+vei4ka
+4vein
+vei5tr
+5veke
+veks4tr
+vel5as
+vel4d5in
+vel3dr
+ve5los
+vels4
+vel3sm
+vel5sp
+vel4ste
+vel3tr
+ve2lu
+vel3ø4v
+4vendr
+ven5s4t
+vent4s
+ve3o4
+3vep
+vepe5
+ve2r1a
+ve4ral
+3verd
+ve5res
+ve2ril
+ve4rim
+2verm
+ve4rob
+vers3m
+3ves
+ve3s4m
+ve2st
+ve3sv
+ve5te
+vete2s3
+ve3u
+2v1f4
+vfab4
+2v1g2
+2v1h
+vid5s4t
+5vie.
+vi5em
+vi5en
+vi4e5ra
+vi3et
+5vif
+5viki
+vi3kro
+vil5a
+vi4lag
+vi4lin
+vi4lo
+vil4sti
+vil4t5r
+vindus3
+3vink
+vin4kl
+vinte2
+vi3ot
+3vir
+vi4str
+vit5re.
+vi4tun
+3viv
+2vj
+v3ja
+v1je
+4v3jo
+2v3k4
+2v1l2
+vlat4
+vls5l
+vl5v
+v3lå
+2v1m
+vmøn5
+vmønst4
+2v1n
+vns4kr
+vn3sp
+vn5s4t
+vo5a
+vo3b
+vo4g
+vog5e
+vog3r
+1vok
+3vol
+v1op2
+vopp3
+voppof3
+vor2s5
+3vos
+2v1p4
+2v1r
+vra3s4
+vres4
+2v1s2
+vse4l
+vs3er
+vs5ev
+v4s3f
+vs3h
+v3sj
+vs4ke
+v5s4li
+v4s3nø
+vs5od
+vs3op
+v3s4p
+vs3s
+vs4t
+v3sta
+v3sto
+v2sv
+v4s3va
+vs3vi
+vs3øy
+2v1t
+v3tr
+v5tv
+5vud
+v3ut
+2v1v
+3vy
+væ5ra
+5væs
+v5ø4d
+4v3ø4v
+2v3øy
+v4åk
+våpen3
+vår3s
+vår4sa
+v4å4t3
+våte4
+1wa
+wa5is
+wale4
+3we
+we4e
+w5h
+whi4
+1wi2
+wi5er
+wi3ni
+wos4
+w4r
+3wur
+w5y
+x3e
+x5t
+y1a2
+y4ab
+y4af
+ya4l
+yan5a4
+ya5no
+ya3s
+ya5to
+y1b
+yb3ri
+yce5
+y5ci
+yc5r
+4yd
+y5dar
+y5de.
+yde3r
+yd5et
+y2do
+yd1r
+yd3ri
+y1els
+y3en.
+y3ende
+yen5sv
+ye2r
+yer5i
+y1e4t
+y1f
+yf4l
+yg4go
+yg4g5r
+yg4lo
+yg3ro
+y1h
+y1i
+y5j
+4yk
+y3ka
+y4kano
+yka3p4
+y1ki
+y3kj
+yk4kab
+yk4k3an
+ykk3sv
+yk3l
+yk4læ
+y4komn
+y3k4r
+yk3s
+y5kø
+y1la
+yl3al
+yla4m
+yl4dø
+yle4t
+ylkes5
+yl4s5t
+yl4tra
+yl4t5ret
+y5lu
+y3læ
+ymbi3
+ynas5
+yn3av
+ynd5r
+yn5eld
+ynns4
+y3no
+yn2sk
+yns3v
+yn4t5u
+y3ou
+yo5y
+ype5ra
+ype3s
+y1pi
+y1pla
+y4p5r
+y5psy
+y5pø
+y1ra
+y4r5ap
+yr5av
+yr4d5ra
+yre3s4
+yrke2s3
+y1ro
+yr5oks
+yr2s
+yr5sn
+yr5sp
+yr3sti
+yr5ul
+y3ry
+y1rå3
+yse3s
+y2sj
+y5sje
+y3skr
+ys3le
+ys4nu
+y4s5or
+ys4s5il
+ys4s3p
+ys5sv
+y1sta
+ys3ti
+yst3re.
+yst5æ
+ys5øm
+ys5år
+y3ta
+yt3j
+yton3
+yt3r
+yt4ry
+yt4rå
+yts5p
+yt5s4å
+yt5te
+ytt5sl
+y5tø
+y5u
+yu4r
+y1v
+y5å
+3za
+1ze2
+ze5l
+zen5
+ze3r
+1zi
+z5l
+1zo
+zo3f
+4zor
+3zu
+z5v
+3zy
+z4zi4f
+æd5s
+æk3l
+ær3a
+ærd5r
+ære4so
+ære4sp
+æring4
+ær3o
+ær4sel
+ærs5il
+ær3sk
+ær5sl
+ær4sn
+ær3so
+ær3u
+ærø4
+ær5øl
+ær3øv
+æ3røy
+ærå4
+æs3t
+æ5vi
+ø3a4
+ø1b
+4ø5c
+ød5al
+ød5ra
+ød5sla
+ød3sp
+øds5å
+ød5t4
+ø2d5u
+ø4d5ø
+ø3e
+øffe4
+øf4l
+ø5fr
+ø2g
+ø3ga
+ø3ge
+øg4na
+øg3r
+øg4ra
+øg3s4
+ø3i
+ø5j
+ø3ka
+ø3kj
+økk3r
+økk5s
+øk3l
+øk4lis
+øk4lo
+1ø4ko
+3øks.
+øk4seg
+øk3st
+øla4
+øl3ap
+øl5as
+øl3d
+ø2lei
+ølei4es
+ø5liv
+4øll
+ø2l1o2
+øl3s
+øls4k
+øl3t
+ølø4d
+ø5l4øv
+øm4s3in
+øm3ut
+øn5al
+øn4k5å
+øn5nav
+ønn2s
+ønns5l
+ønns3t
+øn3sa
+øn3sp
+ønst3r
+øn2t3
+ø3or
+ø3pi
+øp3l
+øps5la
+øps5v
+ø5pø
+ør5ar
+ørd5r
+ør5ekt
+øre3s
+øre5tr
+øri4
+øring4
+ørings5
+ø5ris
+ørk4l
+ør4kø
+ør4r5is
+ør2s
+ør5sa
+ør4skr
+ør3so
+ør4sp
+ør5sta
+ør5sti
+ørs3tr
+ørø4s
+øs3l
+øs3s
+øste4n
+øst5ett
+øs3ti
+øs4to
+øst5ro
+øs5un
+øs5ø4r
+4øt
+øt5a
+ø4t3o
+øtt3s
+ø5ty
+ø3u
+ø3va
+øve3s
+øv5inn
+4øvn
+ø5vo
+ø3væ
+ø5ø
+å5a
+å1b
+åbe5r
+åde5i
+å3d4j
+å3dr
+åd4s5a
+åd5sla
+åd5sna
+å3e2
+å1f
+åfab4
+åg3l
+åg3re
+åg3s4
+å1h
+å3i
+å3j
+å3kal
+3åker
+åke4r5e
+åke3s
+å3kj
+åk3vi
+4ål
+å4l5em
+ål5enh
+ål3or
+ål4san
+åls3n
+åls5te
+åls5tj
+å5lu
+å3ly
+ål5ø4r
+ål5øy
+å5lå
+å1m
+ånd4se
+ånd5sla
+ånes4
+ån5sø
+å3o
+å1p
+åpe2n
+1åpn
+åps3
+å2r
+å3ra
+år5an
+å3re
+åre5s4
+å3ris
+år3k
+4årn3
+år2nu
+1år2s
+års3af
+år4sku
+år5str
+års3v
+år5så
+å3ru
+år5yr
+å5rø
+å1s
+åse3s4
+ås2n
+ås4s5k
+ås4t
+ås5tak
+å3ta
+åtes4t
+åt4t5o
+å5u
+å1v
+å3ø
diff --git a/hyph/old.italian.lh b/hyph/old.italian.lh
new file mode 100644
index 0000000..032366c
--- /dev/null
+++ b/hyph/old.italian.lh
@@ -0,0 +1,135 @@
+Lout hyphenation information
+%
+%  Italian hyphenation file, created by Andrea Cisternino on
+%  20 April 1997 from a TeX file supplied by Claudio Beccari.
+%  See long comment below for full information about the origin
+%  of this file, and a copyright notice.
+%
+%  JeffK has made the following modifications to convert to ISO-LATIN-1:
+%
+%     TeX file         Lout file
+%     'a               \341
+%     'e               \351
+%     'i               \355
+%     'o               \363
+%     'u               \372
+%     "u               \374
+%     ~n               \361
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+áÁ
+éÉ
+íÍ
+óÓ
+úÚ
+'
+
+Patterns:
+%%%%%%%%%%%%%%%%%%%%%%%%%%%  file ithyph.tex  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% Prepared by Claudio Beccari   e-mail  beccari@polito.it
+%
+%                                       Dipartimento di Elettronica
+%                                       Politecnico di Torino
+%                                       Corso Duca degli Abruzzi, 24
+%                                       10129 TORINO	
+%
+% \versionnumber{4.2}   \versiondate{24 may 1996}
+%
+% These hyphenation patterns for the Italian language are supposed to comply 
+% with the Reccomendation UNI 6461 on hyphenation issued by the Italian 
+% Standards Institution (Ente Nazionale di Unificazione UNI).  No guarantee
+% or declaration of fitness to any particular purpose is given and any
+% liability is disclaimed.
+% 
+% See comments and loading instructions at the end of the file
+% 
+% Commented (AC): \lccode`\'=`\'          % Apostrophe has its own lccode
+% Commented (AC):                         % so that it is treated as a
+% Commented (AC):                         % letter
+% Commented (AC): \patterns{
+.anti1  .anti3m2n
+.di2s3cine
+.e2x
+.fran2k3
+.circu2m1
+.wa2g3n
+.ca4p3s
+.opto1
+.para1
+.pre1
+.p2s
+%.ri1a2    .ri1e2   .re1i2  .ri1o2  .ri1u2
+.su2b3lu   .su2b3r
+.wel2t1
+3p2sic
+3p2neu1
+a1ia a1ie  a1io  a1iu a1uo a1ya 2at.
+e1iu e2w
+io1i 
+o1ia o1ie  o1io  o1iu
+u1u 
+%
+'2
+1b   2bb   2bc   2bd  2bf  2bm  2bn  2bp  2bs  2bt  2bv  
+     b2l   b2r   2b.  2b'. 2b''
+1c   2cb   2cc   2cd  2cf  2ck  2cm  2cn  2cq  2cs  2ct  2cz  
+     2chh  c2h   2chb ch2r 2chn c2l  c2r  2c.  2c'. 2c'' .c2
+1d   2db   2dd   2dg  2dl  2dm  2dn  2dp  d2r  2ds  2dt  2dv  2dw  
+     2d.   2d'.  2d'' .d2
+1f   2fb   2fg   2ff  2fn  f2l  f2r  2fs  2ft  2f.  2f'. 2f'' 
+1g   2gb   2gd   2gf  2gg  g2h  g2l  2gm  g2n  2gp  g2r  2gs  2gt  
+     2gv   2gw   2gz  2gh2t     2g.  2g'. 2g'' 
+1h   2hb   2hd   h2l  2hm  2hn  2hr  2hv  2h.  2h'.  2h'' 
+1j   2j.   2j'.  2j''
+1k   2kg   2kf   k2h  2kk  k2l  k2r  2kt  2k.  2k'. 2k''  
+1l   2lb   2lc   2ld  2l3f2     2lg  l2h  2lk  2ll  2lm  2ln  2lp
+     2lq   2lr   2ls  2lt  2lv  2lw  2lz  2l.  2l'. 2l''  
+1m   2mb   2mc   2mf  2ml  2mm  2mn  2mp  2mq  2mr  2ms  2mt  2mv  2mw  
+     2m.   2m'.  2m''  
+1n   2nc   2nd   2nf  2ng  2nk  2nl  2nm  2nn  2np  2nq  2nr  2ns  n2s3r
+     2nt   2nv   2nz   2n'  n2g3n     2nheit.   2n.  2n'. 2n'' 
+1p   2pd   p2h   p2l  2pn  2pp  p2r  2ps  2pt  2pz  2p.  2p'. 2p''  
+1q   2qq   2q.   2q'. 2q''  
+1r   2rb   2rc   2rd  2rf  r2h  2rg  2rk  2rl  2rm  2rn  2rp 
+     2rq   2rr   2rs  2rt  rt2s3 2rv 2rx  2rw  2rz  2r.  2r'. 2r''  
+1s2  2shm  2s3s  2s3p2n    2stb 2stc 2std 2stf 2stg 2stm 2stn 2stp 2sts 2stt 2stv 2sz  
+     4s.   4s'.  4s'' 
+1t   2tb   2tc   2td  2tf  2tg  t2h  t2l  2tm  2tn  2tp  t2r  2ts  3t2sch 
+     2tt   2tv   2tw  t2z  2tzk 2tzs 2t.  2t'. 2t''  
+1v   2vc   2vl   v2r  2vv  2v.  2v'. 2v''  
+1w   w2h   wa2r  2w1y 2w.  2w'. 2w''  
+1x   2xw   2x.   2x'. 2x'' 
+y1ou y1i  
+1z   2zb   2zd   2zl  2zn  2zp  2zt  2zs  2zv  2zz  2z.  2z'. 2z''  .z2
+% Commented (AC): }                          % Pattern end
+% Commented (AC): 
+% Commented (AC): \endinput
diff --git a/hyph/polish.lh b/hyph/polish.lh
new file mode 100644
index 0000000..879b042
--- /dev/null
+++ b/hyph/polish.lh
@@ -0,0 +1,11 @@
+Lout hyphenation placeholder
+% 
+% Polish hyphenation patterns placeholder file.  You will be able
+% to get the real file from URL
+%
+%    ftp://ftp.cs.su.oz.au/jeff/lout.latin2.2.0.tar.gz.
+%
+% eventually.
+%
+% Jeffrey H. Kingston
+% 2 April 1996
diff --git a/hyph/russian.lh b/hyph/russian.lh
new file mode 100644
index 0000000..6a4ae7f
--- /dev/null
+++ b/hyph/russian.lh
@@ -0,0 +1,6144 @@
+Lout hyphenation information
+% 
+% This is a Russian (koi8-r) hyphenation file constructed 
+% by Valeriy Ushakov on 16 November 1994 from a TeX file
+% written by Dimitri Vulis. Original header follows:
+%
+% This is rhyphen.tex (Russian hyphenation patterns) as of 12/31/89
+% This code was written by Dimitri Vulis and placed into public domain.
+% There is no copyright associated with this code. Use it as you wish.
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+Àà
+Áá
+Ââ
+Ãã
+Ää
+Åå
+Ææ
+Çç
+Èè
+Éé
+Êê
+Ëë
+Ìì
+Íí
+Îî
+Ïï
+Ðð
+Ññ
+Òò
+Óó
+Ôô
+Õõ
+Öö
+×÷
+Øø
+Ùù
+Úú
+Ûû
+Üü
+Ýý
+Þþ
+ßÿ
+
+Patterns:
+.ÁÌØ5
+.ÁÓ6Ë
+.ÂÅÚ1
+.ÂÅ2ÚÕ
+.×Å2Ó1Ë
+.×Å5Ô×Ì
+.×Ï5×
+.ÇÏ2ÓÂ
+.Ä×Ï2Å
+.ÄÖÏ6Õ
+.ÄÉ2Á
+.ÄÏ1ÓÍ
+.ÅÚ5
+.ÖÅÒ5Ô6
+.ÚÁÕ2
+.ÚÁ1Û2
+.ÚÏ2Ï3
+.ÉÇ2
+.ÉÚ1Î
+.ÉÚ1Ò
+.ÉÓ1ÔÉ
+.ÉÓ5ÔÒ
+.ÌÅ1Í
+.ÌÅÓ2Ë
+.ÌØ2
+.ÍÅ5Ä6Ì
+.ÍÅ6ÖÁ
+.ÍÅÌÉ6
+.ÍÉ2ÎÁÔ
+.ÎÁ5×6
+.ÎÁ1Ó
+.ÎÁ1Þ2Î
+.ÎÅÁ6
+.ÎÅ1×
+.ÎÅ6×ÒÉ
+.ÎÅ1Ú2
+.ÎÅ5Ì
+.ÎÏÓ5Ë
+.ÏÂ1ÌÅ
+.ÏÂ5ÌÉ×
+.ÏÂ5ÌÉÔ
+.ÏÂ1ÌÏ
+.ÏÂ1ÏÓÎ
+.ÏÂ1ÒÅ
+.ÏÂ1ÒÕ
+.ÏÂ1Õ2Þ
+.ÏÇ1Î
+.ÏÚ2
+.ÏÓ2Ð
+.ÏÔ3×
+.ÏÔ1Ò
+.ÐÏ1×2
+.ÐÏ1Ö2
+.ÐÏÌÕ1
+.ÐÒÅ1Ì
+.ÐÒÉ1Þ
+.ÒÁ2Ó1ÔÁ
+.ÒÁ2ÓÔÏ
+.ÒÅÊ2Ó1
+.ÔÁ5ÓÍ
+.ÔÅË1Ó
+.ÔÒÁÎ2Ó1
+.ÔØ2
+.ÕË2
+.ÕÍÙ6Û5
+.ÕÒ6×
+.ÆÁ5Õ
+.ÈÌÁ2
+.ÞÁ2Å
+Á1Á
+ÁÁ6Â
+Á1ÂÁ
+5ÁÂÁÔÁ
+Á1ÂÅ
+ÁÂÅ5ÓÔ
+Á1ÂÉ
+Á1ÂÌÁ
+Á1ÂÌÅ
+Á1ÂÌÉ
+Á1ÂÌÏ
+Á1ÂÌÕ
+Á1ÂÌÙ
+Á1ÂÏ
+Á1ÂÒÁ
+Á1ÂÒÅ
+Á1ÂÒÉ
+Á1ÂÒÏ
+Á1ÂÒÕ
+Á1ÂÒÙ
+Á5ÂÒÑ
+Á1ÂÕ
+Á1ÂÈ
+Á1ÂÙ
+Á1ÂØÅ
+Á1ÂØÉ
+Á1ÂØÀ
+Á1ÂØÑ
+Á1ÂÀ
+Á1ÂÑ
+Á1×Á
+1Á×Ç
+Á1×Å
+Á1×É
+Á1×ÌÁ
+Á1×ÌÅ
+Á1×ÌÉ
+Á1×ÌÏ
+Á1×ÌÕ
+Á1×ÌÙ
+Á1×Ï
+Á2×ÏÔ
+Á6×Ð
+Á1×ÒÁ
+Á1×ÒÅ
+Á1×ÒÉ
+Á1×ÒÏ
+Á1×ÒÕ
+Á1×ÒÙ
+Á1×Õ
+Á1×Ù
+Á1×ØÅ
+Á1×ØÉ
+Á1×ØÀ
+Á1×ØÑ
+Á5×Ü
+Á1×À
+Á1×Ñ
+Á1ÇÁ
+ÁÇÁ5Ó6
+Á5Ç×
+ÁÇ1Ä
+Á1ÇÅ
+Á1ÇÉ
+Á1ÇÌ
+Á1ÇÌÁ
+Á1ÇÌÅ
+Á1ÇÌÉ
+Á1ÇÌÏ
+Á1ÇÌÕ
+Á1ÇÌÙ
+Á1ÇÏ
+ÁÇÏ5Ó
+Á1ÇÒÁ
+Á1ÇÒÅ
+Á1ÇÒÉ
+1Á1ÇÒÏ
+Á1ÇÒÕ
+Á1ÇÒÙ
+Á3ÇÕ
+Á1ÇÙ
+Á1ÇØÅ
+Á1ÇØÉ
+Á1ÇØÀ
+Á1ÇØÑ
+Á1ÇÀ
+Á1ÇÑ
+Á1ÄÁ
+ÁÄ1ÁÇÅ
+Á1Ä×Á
+Á1Ä×Å
+Á1Ä×É
+Á1Ä×Ï
+Á1Ä×Õ
+Á1Ä×Ù
+Á1ÄÅ
+Á1ÄÖ
+ÁÄÖÏ6
+ÁÄ5ÚÉ
+Á1ÄÉ
+ÁÄÉ2Ï
+Á2Ä1Ì
+Á1ÄÌÁ
+Á1ÄÌÅ
+Á1ÄÌÉ
+Á1ÄÌÏ
+Á1ÄÌÕ
+Á1ÄÌÙ
+1ÁÄÍ
+Á1ÄÏ
+Á3ÄÒÁ
+Á1ÄÒÅ
+ÁÄ5ÒÅÚ
+Á1ÄÒÉ
+Á1ÄÒÏ
+Á1ÄÒÕ
+Á1ÄÒÙ
+Á1ÄÕ
+Á1ÄÃ
+Á1ÄÙ
+Á1ÄØÅ
+Á1ÄØÉ
+Á1ÄØÀ
+Á1ÄØÑ
+Á1ÄÀ
+Á1ÄÑ
+Á1Å
+ÁÅ2Â
+ÁÅ6ÄÉ
+ÁÅ2Ì
+Á1ÖÁ
+Á1ÖÅ
+Á1ÖÖ
+Á1ÖÉ
+Á1ÖÍ
+Á1ÖÏ
+Á1ÖÒ
+Á1ÖÕ
+Á1ÖØÅ
+Á1ÖØÉ
+Á1ÖØÀ
+Á1ÖØÑ
+2ÁÚ
+Á1ÚÁ
+ÁÚ1×Å
+ÁÚ1×É
+ÁÚ1×Ï
+ÁÚ1ÄÁ
+ÁÚ5ÄÏ
+ÁÚ5ÄÒÏ
+ÁÚ5ÄÕ
+Á1ÚÅ
+Á1ÚÉ
+ÁÚÉÁ6
+ÁÚÉ5Í6
+Á1ÚÏ
+ÁÚ1Ò
+Á5ÚÕ
+ÁÚ5ÕÂÅ
+ÁÚ6ÕÓ
+Á6ÚÕÞ
+Á1ÚÙ
+Á1ÚØÅ
+Á1ÚØÉ
+Á1ÚØÀ
+Á1ÚØÑ
+Á1ÚÀ
+Á1ÚÑ
+Á1É
+ÁÉ2Ç
+Á6ÉÄ
+ÁÉÚ5
+ÁÉ6ÍÅÔ
+ÁÉ2ÎÉ
+Á2ÉÈ
+2ÁÊ
+ÁÊ2ÍÁ
+Á1ËÁ
+Á1Ë×Á
+Á1Ë×Å
+Á1Ë×É
+Á1Ë×Ï
+Á1Ë×Õ
+Á1Ë×Ù
+Á1ËÅ
+Á1ËÉ
+Á1ËÌÁ
+Á1ËÌÅ
+Á1ËÌÉ
+Á1ËÌÏ
+Á1ËÌÕ
+Á1ËÌÙ
+ÁË1Î
+Á1ËÏ
+Á1ËÒÁ
+Á1ËÒÅ
+Á1ËÒÉ
+Á1ËÒÏ
+Á1ËÒÕ
+Á1ËÒÙ
+ÁË1Ó
+Á1ËÕ
+Á1ËÙ
+Á1ËØÅ
+Á1ËØÉ
+Á1ËØÀ
+Á1ËØÑ
+Á1ËÀ
+Á1ËÑ
+Á1ÌÁ
+Á2ÌÁÂ
+1ÁÌÇ
+Á1ÌÅ
+Á5ÌÉ
+6ÁÌÉÎ
+Á1ÌÏ
+Á1ÌÕ
+Á1ÌÙ
+Á1ÌØÅ
+Á1ÌØÉ
+Á1ÌØÀ
+Á1ÌØÑ
+Á1ÌÀ
+Á1ÌÑ
+2Á1ÍÁ
+Á1ÍÅ
+Á1ÍÉ
+Á1ÍÌÁ
+Á1ÍÌÅ
+Á1ÍÌÉ
+Á1ÍÌÏ
+Á1ÍÌÕ
+Á1ÍÌÙ
+Á1ÍÎÏ
+Á1ÍÏ
+ÁÍÏ1Ó
+1ÁÍÐÅ
+Á1ÍÒÁ
+Á1ÍÒÅ
+Á1ÍÒÉ
+Á1ÍÒÏ
+Á1ÍÒÕ
+Á1ÍÒÙ
+Á1ÍÕ
+ÁÍ1Þ
+Á1ÍÛ
+Á1ÍÙ
+Á1ÍØÅ
+Á1ÍØÉ
+Á1ÍØÀ
+Á1ÍØÑ
+Á1ÍÀ
+Á1ÍÑ
+Á1ÎÁ
+Á1ÎÅ
+Á1ÎÉ
+Á6ÎÉÎÓ
+Á1ÎÏ
+Á2Î1ÏÂ
+6ÁÎÏÓ
+Á1ÎÒÁ
+Á1ÎÒÅ
+Á1ÎÒÉ
+Á1ÎÒÏ
+Á1ÎÒÕ
+Á1ÎÒÙ
+ÁÎ2Ó1ËÒ
+ÁÎ2ÓÐ
+ÁÎ2ÓÃ
+Á1ÎÕ
+Á2Î5ÕÚ
+Á1ÎÙ
+Á1ÎØÅ
+Á1ÎØÉ
+Á1ÎØÀ
+Á1ÎØÑ
+Á1ÎÀ
+Á1ÎÑ
+2Á3Ï
+ÁÏ6Ë
+ÁÏ2Ð
+ÁÏ2Ó
+ÁÏÔ5Ò
+Á1ÐÁ
+Á1ÐÅ
+Á1ÐÉ
+Á1ÐÌÁ
+Á1ÐÌÅ
+Á1ÐÌÉ
+Á1ÐÌÏ
+Á1ÐÌÕ
+Á1ÐÌÙ
+Á1ÐÏ
+1ÁÐÐ
+Á1ÐÒÁ
+Á1ÐÒÅ
+Á1ÐÒÉ
+ÁÐÒÉ2ÚÎ
+Á1ÐÒÏ
+Á1ÐÒÕ
+Á1ÐÒÙ
+Á5Ð2Ô
+Á1ÐÔÁ
+Á1ÐÔÅ
+Á1ÐÔÉ
+Á1ÐÔÏ
+Á1ÐÔÕ
+Á1ÐÔÙ
+Á1ÐÕ
+Á1ÐÙ
+Á1ÐØÅ
+Á1ÐØÉ
+Á1ÐØÀ
+Á1ÐØÑ
+Á1ÐÀ
+Á1ÐÑ
+Á1Ò6Á
+Á1ÒÅ
+Á1ÒÉ
+5ÁÒÍÅ
+Á1ÒÏ
+ÁÒ2Ô1ÏÒ
+Á1ÒÕ
+Á1ÒÙ
+Á1ÒØÅ
+Á1ÒØÉ
+Á1ÒØÀ
+Á1ÒØÑ
+Á1ÒÀ
+Á1ÒÑ
+Á1ÓÁ
+Á1Ó×Á
+Á1Ó×Å
+Á1Ó×É
+Á1Ó×Ï
+Á1Ó×Õ
+Á1Ó×Ù
+6Á1ÓÅ
+Á1ÓÉ
+ÁÓ1Ë
+Á1ÓË×Á
+Á1ÓË×Å
+Á1ÓË×É
+Á1ÓË×Ï
+Á1ÓË×Õ
+Á1ÓË×Ù
+Á1ÓËÒÁ
+Á1ÓËÒÅ
+Á1ÓËÒÉ
+Á1ÓËÒÏ
+Á1ÓËÒÕ
+Á1ÓËÒÙ
+ÁÓ5ÌÅÔ
+ÁÓ5ÌÑÍ
+ÁÓ5ÌÑÈ
+ÁÓ5ÍÉ
+Á1ÓÏ
+ÁÓ3ÐÏ
+ÁÓ1ÐÕ
+Á1ÓÒÁ
+Á1ÓÒÅ
+Á1ÓÒÉ
+Á1ÓÒÏ
+Á1ÓÒÕ
+Á1ÓÒÙ
+1ÁÓÓÉÇ
+ÁÓÓ6Ð
+Á1ÓÔÁ
+Á1ÓÔ×Á
+Á1ÓÔ×Å
+Á1ÓÔ×É
+Á1ÓÔ×Ï
+Á1ÓÔ×Õ
+Á1ÓÔ×Ù
+Á1ÓÔ×ØÅ
+Á1ÓÔ×ØÉ
+Á1ÓÔ×ØÀ
+Á1ÓÔ×ØÑ
+Á1ÓÔ×À
+Á1ÓÔ×Ñ
+Á1ÓÔÅ
+Á1ÓÔÉ
+Á1ÓÔÏ
+Á6Ó5ÔÏÍ
+Á1ÓÔÒÁ
+Á1ÓÔÒÅ
+Á1ÓÔÒÉ
+Á1ÓÔÒÏ
+Á1ÓÔÒÕ
+Á1ÓÔÒÙ
+Á1ÓÔÒØÅ
+Á1ÓÔÒØÉ
+Á1ÓÔÒØÀ
+Á1ÓÔÒØÑ
+Á1ÓÔÒÀ
+Á1ÓÔÒÑ
+Á1ÓÔÕ
+Á1ÓÔÙ
+Á1ÓÔØÅ
+Á1ÓÔØÉ
+Á1ÓÔØÀ
+Á1ÓÔØÑ
+Á1ÓÔÀ
+Á1ÓÔÑ
+Á6Ó5ÔÑÇ
+Á6ÓÔÑÎ
+Á1ÓÕ
+ÁÓ1Þ
+Á1Ó2ÛÅ
+Á1ÓÙ
+Á1ÓØÅ
+Á1ÓØÉ
+Á1ÓØÀ
+Á1ÓØÑ
+Á1ÓÀ
+Á1ÓÑ
+Á1ÔÁ
+1ÁÔÁË
+Á1Ô×Á
+Á1Ô×Å
+Á1Ô5×É
+Á1Ô×Ï
+Á1Ô×Õ
+Á1Ô×Ù
+Á1ÔÅ
+ÁÔÅ2Ó1
+Á1ÔÉ
+Á1ÔÏ
+Á6ÔÏÍÎ
+Á1ÔÒÁ
+Á1ÔÒÅ
+Á1ÔÒÉ
+Á1ÔÒÏ
+Á1ÔÒÕ
+Á1ÔÒÙ
+Á1ÔÕ
+Á1ÔÙ
+Á1ÔØÅ
+Á1ÔØÉ
+Á1ÔØÀ
+Á1ÔØÑ
+Á1ÔÀ
+Á1ÔÑ
+Á1Õ
+Á2ÕÍ
+Á2ÕÎ
+Á2ÕÓ
+ÁÕÓ5Ë
+ÁÕ2Ô1Ò
+Á3ÕÞ
+ÁÕ2ÞÉ
+Á2ÕÜ
+Á1ÆÁ
+Á1ÆÅ
+Á1ÆÉ
+Á1ÆÌÁ
+Á1ÆÌÅ
+Á1ÆÌÉ
+Á1ÆÌÏ
+Á1ÆÌÕ
+Á1ÆÌÙ
+Á1ÆÏ
+Á1ÆÒÁ
+Á1ÆÒÅ
+Á1ÆÒÉ
+Á1ÆÒÏ
+Á1ÆÒÕ
+Á1ÆÒÙ
+Á1ÆÕ
+Á1ÆØÅ
+Á1ÆØÉ
+Á1ÆØÀ
+Á1ÆØÑ
+Á1ÆÀ
+Á1ÆÑ
+Á1ÈÁ
+Á1ÈÄÁ
+Á1ÈÄÅ
+Á1ÈÄÉ
+Á1ÈÄÏ
+Á1ÈÄÕ
+Á1ÈÄÙ
+Á1ÈÅ
+Á1ÈÉ
+Á1ÈÏ
+Á1ÈÕ
+Á1ÈÙ
+Á1ÈØÅ
+Á1ÈØÉ
+Á1ÈØÀ
+Á1ÈØÑ
+Á1ÈÀ
+Á1ÈÑ
+Á1ÃÁ
+Á1ÃÅ
+Á1ÃÉ
+Á1ÃÏ
+Á1ÃÕ
+Á1ÃÙ
+Á1ÃØÅ
+Á1ÃØÉ
+Á1ÃØÀ
+Á1ÃØÑ
+Á1ÞÁ
+Á1ÞÅ
+ÁÞÅÓ2
+Á1ÞÉ
+ÁÞ1ÔÁ
+Á1ÞÕ
+Á1ÞØÅ
+Á1ÞØÉ
+Á1ÞØÀ
+Á1ÞØÑ
+2ÁÛ
+Á1ÛÁ
+Á6Û×
+Á1Û×Á
+Á1Û×Å
+Á1Û×É
+Á1Û×Ï
+Á1Û×Õ
+Á1Û×Ù
+Á1ÛÅ
+Á5ÛÉ
+Á1ÛÌÁ
+Á1ÛÌÅ
+Á1ÛÌÉ
+Á1ÛÌÏ
+Á1ÛÌÕ
+Á1ÛÌÙ
+Á1ÛÏ
+Á1ÛÒÁ
+Á1ÛÒÅ
+Á1ÛÒÉ
+Á1ÛÒÏ
+Á1ÛÒÕ
+Á1ÛÒÙ
+ÁÛ1ÔÁ
+Á1ÛÕ
+Á1ÛØÅ
+Á1ÛØÉ
+Á1ÛØÀ
+Á1ÛØÑ
+Á5Ý
+Á1ÝÁ
+Á1ÝÅ
+Á1ÝÉ
+Á1ÝÏ
+Á1ÝÕ
+Á1ÝØÅ
+Á1ÝØÉ
+Á1ÝØÀ
+Á1ÝØÑ
+Á1Ù
+Á1Ü1
+Á2ÜÒ
+Á1À
+Á1Ñ
+ÁÑ2Ú
+ÂÁ6Ë×
+ÂÁÓ1Í
+ÂÁ6È5Ò
+Â1ÁÜ
+Â1Â
+1Â1×
+6Â1Ç
+Â1Ä
+1ÂÅ
+ÂÅÇ5Î
+ÂÅ6ÄÌ
+ÂÅ2Ú1Á2
+ÂÅÚ1Ä2
+ÂÅ2Ú1É
+ÂÅ2ÚÏ2
+ÂÅÏ6
+ÂÅ2Ó1Ë
+2ÂÅÓ3Ð
+ÂÅ2ÓÔÁ
+ÂÅÓ1Þ
+Â1Ö
+ÂÚ2
+1ÂÚÄ2
+Â5ÚÅ
+5ÂÚÖ
+Â5ÚÉ
+Â1ÚÏ
+5ÂÉ2Ï
+ÂÉÏ5Ó
+ÂÉ6ÓË
+Â5Ë
+1ÂÌ
+Â1ÌÁ×
+2ÂÌÁÓ
+2ÂÌÄ
+Â1ÌÅÇ
+ÂÌÅ2Ó5Ë
+Â5ÌÉÚÁ
+ÂÌ1ÉÓÐ
+Â1ÌÏÖ
+Â1ÌÏÍ
+Â6ÌÕÄ
+6ÂÌÈ
+2ÂÌØ5
+6Â1Í
+2Â1Î
+Â1ÏÂ
+ÂÏÄ6Ò
+ÂÏ5ÄÒÏ
+ÂÏ1ÖÖ
+ÂÏ1Ú
+ÂÏ6ÚÕ
+ÂÏ1Ò×
+ÂÏÒÔ5
+ÂÏÒ6ÔÒ
+ÂÏ1ÓË
+ÂÏ2ÓÏÂ
+ÂÏ5Ó6Ð
+ÂÏ1Ó2Ó
+5ÂÏÔ
+ÂÏ6Ô×
+ÂÏ1Ô2Ì
+5ÂÏÃ
+Â1Ð
+6ÂÒ.
+ÂÒÁ6ÓÌ
+ÂÒÁ3Õ
+Â1ÒÙ×
+Â5ÒÙÇ
+Â5ÒÙÄ
+6Â1Ó2
+2Â1Ô
+1ÂÕ
+Â1ÕÇ
+ÂÕ2ÇÌ
+Â1Õ2ÓÌ
+Â1Æ
+Â1È
+2Â1Ã
+Â1Þ
+Â1Û
+Â1Ý
+Â2ß
+ÂÜ1Ò
+1ÂÀ
+1ÂÑ
+1×ÁÇ
+5×ÁË
+×ÁÎ5Ó6Ã
+×Á1ÓÔ
+×ÁÈ1
+×1Â
+×6ÂÉ
+×1×
+×1Ç
+×1Ä
+×ÄÏ1Ó
+1×ÅÇ
+1×ÅÌÌ
+×Å5ÏÌÁ
+×ÅÏ2Ó
+×ÅÒ2È1Ò
+1×Ú2
+×2ÚÁ
+×Úß2
+×ÚÙÓ5
+×É6ÁË
+×É2ÁÍ
+×É6ÁÒ
+×É6ÁÓ
+×É5ÁÆ
+×É6ÄÌ
+×ÉÎ6ÄÒ
+5×ÉÎÔ
+6×5ÉÎÆ
+×É5ÏÌ
+×ÉÓÔ5Ì
+1×É2È1
+×1Ë
+×Ë1Î
+×6ËÕÓ
+1×Ì
+2×1ÌÁÂ
+2×1ÌÁÇ
+2×1ÌÅÓ
+×ÌÉ6Å
+6×5ÌÉË
+6×5ÌÉÞ
+2×ÌØ
+×1ÍÁ
+2×1ÍÉ
+×1ÍÏ
+×6ÍÏÇÏ
+×6ÍÏÞ
+×1Î
+×6ÎÅÓ
+×2ÎÕÛ
+×ÏÂÅÚ5
+×Ï1×Ë
+×Ï1Ç
+×ÏÚ1×
+×ÏÉ2Ó
+1×ÏË
+×Ï2Ó1Ë
+×Ï2ÓÔÒ
+×Ï6ÈÒ
+1×ÏÑ
+1×Ð
+×5ÐÏ6Ì
+1×Ò2
+2×Ò.
+×ÒÁ2Ö5Ä
+×5ÒÁÓ
+6×5ÒÁÃ
+6×5ÒÉÔÙ
+×5ÒÏÒ
+×ÒÏÓ5
+×ÒÏ5Ô
+×1Ó2
+1×2ÓÁ
+×6ÓÅÇ
+5×ÓÅÍ
+6×ÓË
+1×2ÓÐ
+1×2ÓÈ
+1×2ÓÀ
+×1Ô
+×ÔÏ3Ë2
+6×5ÔÒ
+1×Õ2Á
+1×ÕÄ
+×ÕÅ6Ä
+×Õ1Ú
+×ÕÏ6
+×Õ2È1
+×1Æ
+×1È
+×6ÈÏÄ
+×1Ã
+×1ÞÁ
+×1ÞÉ
+×1Û
+1×2ÛÉ×
+×1Ý
+1×ß2
+×Ù1ÓË
+×Ù5ÓÐ
+×Ù1Ó2Ó
+×Ù1È
+1×À
+1ÇÁ
+ÇÁ2Õ
+2Ç1Â
+5Ç×É
+Ç1×Ù
+5Ç×ØÀ
+Ç1Ç
+Ç5ÄÏ
+ÇÅÌÉ2Ï
+ÇÅ2Î1ÉÎ
+ÇÅ2ÎÒ
+ÇÅ6ÏÂ
+ÇÅ2ÏÄ
+ÇÅ6ÏË
+ÇÅ6ÏÎ
+ÇÅ2ÏÐ
+ÇÅ6ÏÒÉ
+ÇÅ2ÏÓ
+ÇÅ2ÏÔ
+ÇÅ2ÏÃ
+Ç1Ú
+2Ç1Ë
+ÇËÏ1×
+6ÇÌ.
+6Ç5ÌÁÊ
+6ÇÌ×
+1ÇÌÑ
+Ç1Í
+Ç1ÎÉ
+ÇÏ1Ú
+ÇÏ2Ó1Á
+ÇÏÓ1Ë
+ÇÏÓ3Ó
+ÇÏ6ÓÔÅÌ
+ÇÏ2Ó1ÔÒ
+ÇÏ1ÓÛ
+2Ç1Ð
+6ÇÒÅË
+2ÇÒÏÐ
+2Ç1Ó
+Ç2ÓÂ
+2Ç5Ô
+6ÇÆ
+6Ç1È
+Ç1Ã
+Ç1Þ
+2Ç1Û
+Ç1Ü
+ÄÁ6ÂÅ
+ÄÁ2ÇÅÎ
+ÄÁ2ÄÒ
+2ÄÁÌÇ
+ÄÁ2ÐÒ
+6Ä1Â
+Ä×6
+2Ä1×Á
+2Ä1×Å
+Ä×Å2Ó5Ë
+2Ä1×ÉÄ
+6Ä×ÉÎÔ
+6Ä5×ÉÎÞ
+2Ä1×ÉÓ
+Ä5×Ë
+2Ä1×ÏÄ
+Ä×Õ1Û
+6Ä5×Ù
+Ä1Ç2
+Ä5Ä6
+5ÄÅÂ
+ÄÅ2Ú1Á2
+ÄÅ2Ú1É2Ï
+ÄÅ2Ú1Ï2
+ÄÅ2Ï5
+5ÄÅÆ
+ÄÅ5È
+5ÄÖÁ
+5ÄÖÉÑ
+ÄÖ5Ì
+ÄÖ1Í
+ÄÖ1Ò
+6ÄÚ.
+1ÄÚÅ.
+Ä5ÚÅÍ
+Ä1ÚÏ
+ÄÉ2ÁÄ
+ÄÉ6ÁÌÉ
+ÄÉ2ÁÍ
+6Ä5É6ÄÅ
+2ÄÉÎÓ
+2Ä1ÉÎÆ
+ÄÉ2ÏÂ
+ÄÉ5ÏÎ
+ÄÉ2ÏÐ
+ÄÉ2Ï5Ó
+ÄÉ6Ð5Ô
+ÄÉ2Ó1Å
+ÄÉ2ÓË
+ÄÉ2ÓÔÏ
+ÄÉ2Ó1ÔÒ
+ÄÉ5È
+2Ä1Ë
+Ä1ÌÁ
+Ä5ÌÅÄ
+Ä1ÌÅÖ
+5Ä6ÌÅÊ
+Ä5ÌÅÎÉ
+Ä1ÌÏ
+Ä1ÌÙ
+5ÄÌÀ
+2Ä1Í
+Ä2ÍÓ
+Ä2Í1Þ
+Ä1Î
+1ÄÎÅ×Î
+ÄÎÏ5Ä
+1ÄÎÑÛ
+2Ä1ÏÂÌ
+ÄÏ6ÂÌÁ
+6ÄÏÂß
+1ÄÏ×
+ÄÏ1Ä2
+ÄÏ1Ú
+ÄÏÉÓ6
+2ÄÏËÔ
+ÄÏ5ÍÎÏ
+ÄÏ5Ò×Á
+5ÄÏÒÅ
+ÄÏ2ÒÕ
+2Ä1Ï2ÓÉ
+ÄÏ1ÓÎ
+ÄÏ1Ó2Ð
+Ä5ÏÔÒ
+1ÄÏÞ
+ÄÏ1Û2
+Ä1Ð
+2ÄÒ.
+5Ä6ÒÁÖ
+Ä1ÒÁÓ
+5Ä6ÒÁÑ
+Ä1ÒÅÖ
+Ä5ÒÅÛ
+ÄÒÉ5Ó
+Ä1ÒÉÈ
+6Ä5ÒÏÚ
+2ÄÒÓ
+Ä1ÒÕÂ
+6Ä5ÒÕÞ
+2Ä1ÒÙ×
+Ä1ÒÑÄ
+5ÄÒÑÔ
+2Ä1Ó
+ÄÓ3ËÎ
+2Ä1Ô
+1ÄÕÍ
+2ÄÕÏ5
+ÄÕ6ÏÐ
+ÄÕ6ÏÓ
+ÄÕ6ÒÁÌ
+6Ä5Õ6ÓÉ
+1ÄÕÈ
+2Ä1ÕÜ
+2Ä1Æ
+Ä1È
+Ä1Þ
+2Ä1Û2
+5ÄÙ×
+2ÄØ.
+1ÄØÅ
+5ÄØÀ
+1ÄØÑ
+Ä1Ü
+1ÄÀÎ
+Å1Á
+ÅÁ2Â
+ÅÁ2Ä
+ÅÁ5ÄÏ
+Å3Á2Ú
+Å6ÁËÏ
+Å6ÁÓ
+ÅÁ2ÔÏ
+ÅÁ6Õ
+Å1ÂÁ
+Å1ÂÅ
+ÅÂÅ5ÚÏ5
+Å1ÂÉ
+Å1ÂÌÁ
+Å1ÂÌÅ
+Å1ÂÌÉ
+Å1ÂÌÏ
+Å1ÂÌÕ
+Å1ÂÌÙ
+Å1ÂÏ
+Å5ÂÏÒ
+Å1ÂÒ
+Å1ÂÒÁ
+Å1ÂÒÅ
+Å1ÂÒÉ
+Å1ÂÒÏ
+Å1ÂÒÕ
+Å1ÂÒÙ
+Å1ÂÕ
+Å1ÂÙ
+Å1ÂØÅ
+Å1ÂØÉ
+Å1ÂØÀ
+Å1ÂØÑ
+Å1ÂÀ
+Å1ÂÑ
+Å1×Á
+2Å1×Å
+Å1×É
+Å×6ËÕ
+Å1×ÌÁ
+Å1×ÌÅ
+Å1×ÌÉ
+Å1×ÌÏ
+Å1×ÌÕ
+Å1×ÌÙ
+Å×2ÎÉÍ
+Å×2ÎÑÔ
+Å1×Ï
+6Å×ÏÌ
+Å×Ï2Ó
+Å×2Ð
+Å×5ÐÁ
+2Å×Ò
+Å1×ÒÁ
+Å1×ÒÅ
+Å1×ÒÉ
+Å2×ÒÏ
+Å1×ÒÕ
+Å1×ÒÙ
+Å1×Õ
+Å×1Þ
+Å×ßÅ5È
+Å1×Ù
+Å1×ØÅ
+Å1×ØÉ
+Å1×ØÀ
+Å1×ØÑ
+Å1×À
+Å1×Ñ
+Å1ÇÁ
+Å1ÇÄ
+Å1ÇÅ
+Å1ÇÉ
+Å1ÇÌÁ
+Å1ÇÌÅ
+Å1ÇÌÉ
+Å1ÇÌÏ
+Å1ÇÌÕ
+Å1ÇÌÙ
+ÅÇ1ÎÅ
+ÅÇ6ÎÏ
+Å1ÇÏ
+Å1ÇÒÁ
+Å1ÇÒÅ
+Å1ÇÒÉ
+Å1ÇÒÏ
+Å1ÇÒÕ
+Å1ÇÒÙ
+Å1ÇÕ
+Å1ÇÙ
+Å1ÇØÅ
+Å1ÇØÉ
+Å1ÇØÀ
+Å1ÇØÑ
+Å1ÇÀ
+Å1ÇÑ
+Å1ÄÁ
+Å6Ä5ÁÂ
+Å2Ä1ÁÐ
+Å1Ä×Á
+Å1Ä×Å
+Å1Ä×É
+Å1Ä×Ï
+Å1Ä×Õ
+Å1Ä×Ù
+Å1ÄÅ
+Å5ÄÖÅ
+Å1ÄÉ
+Å6Ä5ÉÓÐ
+Å2Ä1ÉÀ
+Å2ÄÌ
+Å1ÄÌÁ
+Å3ÄÌÅ
+Å1Ä1ÌÉ
+Å1ÄÌÏ
+Å1ÄÌÕ
+Å1ÄÌÙ
+ÅÄ5ÌÑ
+Å1ÄÏ
+ÅÄ5Ï6ÐÒ
+ÅÄ1ÏÓÍ
+Å2ÄÏÔ×
+Å1ÄÒÁ
+Å1ÄÒÅ
+Å1ÄÒÉ
+Å1ÄÒÏ
+Å1ÄÒÕ
+Å1ÄÒÙ
+Å1ÄÕ
+Å6Ä5ÕÇ
+Å6ÄÕÍÙ
+Å1ÄÙ
+Å1ÄØÅ
+Å1ÄØÉ
+Å1ÄØÀ
+Å1ÄØÑ
+Å1ÄÀ
+Å1ÄÑ
+Å1Å
+Å2Å×Á
+ÅÅ6Ç
+Å6ÅÍÁ
+Å6ÅÐ
+Å1ÖÁ
+ÅÖÁ6Ô
+ÅÖ5ÁÔÏ
+Å2ÖÄÀ
+Å1ÖÅ
+Å1ÖÖ
+Å5ÖÉ
+ÅÖ1Í
+Å1ÖÏ
+ÅÖ1Ò
+Å1ÖÕ
+Å1ÖØÅ
+Å1ÖØÉ
+Å1ÖØÀ
+Å1ÖØÑ
+Å1ÚÁ
+ÅÚ5×É
+ÅÚ1×Ï
+ÅÚ1ÄÁ
+ÅÚÄÉ2
+ÅÚ5ÄÏ.
+ÅÚ1ÄÒ
+ÅÚ1ÄÕ
+ÅÚ1ÄÙ
+Å1ÚÅ
+Å1ÚÉ
+Å1ÚÏ
+ÅÚ1ÏÔ
+Å1ÚÕ
+Å1ÚÙ
+Å1ÚØÅ
+Å1ÚØÉ
+Å1ÚØÀ
+Å1ÚØÑ
+Å1ÚÀ
+Å1ÚÑ
+Å1É
+ÅÉ2Ç
+ÅÉ2Ä
+ÅÉ2Í
+Å1ËÁ
+Å1Ë×Á
+Å1Ë×Å
+Å1Ë×É
+Å1Ë×Ï
+Å1Ë×Õ
+Å1Ë×Ù
+Å1ËÅ
+Å1ËÉ
+Å1ËÌÁ
+Å1ËÌÅ
+Å1ËÌÉ
+Å1ËÌÏ
+Å1ËÌÕ
+Å1ËÌÙ
+ÅË1Î
+2Å1ËÏ
+Å1ËÒÁ
+Å1ËÒÅ
+Å1ËÒÉ
+Å1ËÒÏ
+Å1ËÒÕ
+Å1ËÒÙ
+ÅË1ÓË
+ÅËÓÐÏ6
+ÅË1ÓÔÕ
+Å1ËÕ
+Å1ËÙ
+Å1ËØÅ
+Å1ËØÉ
+Å1ËØÀ
+Å1ËØÑ
+Å1ËÀ
+Å1ËÑ
+Å1ÌÁ
+Å1ÌÅ
+Å1ÌÉ
+Å1ÌÏ
+Å1ÌÕ
+Å1ÌÙ
+Å1ÌØÅ
+Å1ÌØÉ
+Å1ÌØÀ
+Å1ÌØÑ
+Å1ÌÀ
+Å1ÌÑ
+Å1ÍÁ
+Å1ÍÅ
+Å1ÍÉ
+Å1ÍÌÁ
+Å1ÍÌÅ
+Å1ÍÌÉ
+Å1ÍÌÏ
+Å1ÍÌÕ
+Å1ÍÌÙ
+ÅÍ1ÎÅ
+Å1ÍÏ
+ÅÍ6ÐÔ
+Å1ÍÒÁ
+Å1ÍÒÅ
+Å1ÍÒÉ
+Å1ÍÒÏ
+Å1ÍÒÕ
+Å1ÍÒÙ
+Å1ÍÕ
+ÅÍ1Þ
+Å1ÍÙ
+Å1ÍØÅ
+Å1ÍØÉ
+Å1ÍØÀ
+Å1ÍØÑ
+Å1ÍÀ
+Å1ÍÑ
+Å1ÎÁ
+Å1ÎÅ
+Å1ÎÉ
+Å1ÎÏ
+2ÅÎÒ
+Å1ÎÒÁ
+Å1Î5ÒÅ
+Å1Î1ÒÉ
+Å1ÎÒÏ
+Å1ÎÒÕ
+Å1ÎÒÙ
+Å1ÎÕ
+Å1ÎÙ
+Å1ÎØÅ
+Å1ÎØÉ
+Å1ÎØÀ
+Å1ÎØÑ
+Å1ÎÀ
+Å1ÎÑ
+2Å1Ï
+ÅÏ5Á
+ÅÏ2Â
+ÅÏ5ÂÁ
+ÅÏÂ1Ì
+ÅÏÂÏ1
+Å3Ï2ÇÒÁÎ
+Å2ÏÄÉ
+ÅÏ2Ö
+Å5ÏÉÄ
+ÅÏ6ËÉ
+ÅÏ2ËÏÎ
+Å5ÏÌ.
+Å5ÏÌÙ
+Å5ÏÌÑ
+Å3ÏÎ.
+Å6ÏÐÁ
+Å2ÏÐÌ
+ÅÏ6ÐÏÚ
+ÅÏ2ÐÒ
+ÅÏ6ÐÕ
+ÅÏ6ÐÙ
+Å2ÏÒÏ
+ÅÏ2ÒÕ
+ÅÏ1Ó
+ÅÏ2ÓÁ
+ÅÏ6Ó×
+ÅÏ2ÓÅ
+ÅÏ6ÓÏÂ
+ÅÏ6ÓÕ
+ÅÏ6ÓÃ
+Å6ÏÔÅ
+Å5Ï6ÆÏÒ
+ÅÏ6È×
+Å5ÏÈÌ
+ÅÏ2ÞÅ
+ÅÏ2Ý
+Å1ÐÁ
+Å1ÐÅ
+Å1ÐÉ
+Å1ÐÌÁ
+Å1ÐÌÅ
+Å1ÐÌÉ
+Å1ÐÌÏ
+Å1ÐÌÕ
+Å1ÐÌÙ
+Å1ÐÏ
+Å1ÐÒÁ
+Å1ÐÒÅ
+Å1ÐÒÉ
+ÅÐÒÉÅ2
+Å1ÐÒÏ
+Å1ÐÒÕ
+Å1ÐÒÙ
+Å1ÐÔÁ
+Å1ÐÔÅ
+Å1ÐÔÉ
+Å1ÐÔÏ
+Å1ÐÔÕ
+Å1ÐÔÙ
+Å1ÐÕ
+Å1ÐÙ
+Å1ÐØÅ
+Å1ÐØÉ
+Å1ÐØÀ
+Å1ÐØÑ
+Å1ÐÀ
+Å1ÐÑ
+Å1ÒÁ
+ÅÒ1ÁÜ
+ÅÒ5×Á.
+ÅÒ1×ÁÔ
+ÅÒ1×Ù
+Å1ÒÅ
+ÅÒÅ1Ç
+ÅÒÅ1Ú×
+ÅÒÅ1ÓÓ
+Å1ÒÉ
+ÅÒ6ËÌ
+Å1ÒÏ
+ÅÒÏ2Â
+ÅÒ5ÔÌÉ
+ÅÒ1ÔÑ
+Å1ÒÕ
+Å2Ò1Õ2Ð
+ÅÒ2ÈÉ
+Å1ÒÙ
+Å1ÒØÅ
+Å1ÒØÉ
+Å1ÒØÀ
+Å1ÒØÑ
+Å1ÒÀ
+Å1ÒÑ
+Å1ÓÁ
+Å1Ó6Â
+Å1Ó×Á
+Å1Ó×Å
+Å1Ó×É
+Å1Ó×Ï
+Å1Ó×Õ
+Å1Ó×Ù
+Å1ÓÇ
+Å1ÓÄ
+Å1ÓÅ
+Å1ÓÉ
+Å1ÓË
+ÅÓ5ËÁÌ
+Å1ÓË×Á
+Å1ÓË×Å
+Å1ÓË×É
+Å1ÓË×Ï
+Å1ÓË×Õ
+Å1ÓË×Ù
+ÅÓ6ËÌ
+Å1ÓËÒÁ
+Å1ÓËÒÅ
+Å1ÓËÒÉ2
+ÅÓËÒÉÐ1
+Å1ÓËÒÏ
+Å1ÓËÒÕ
+Å1ÓËÒÙ
+Å1ÓÍ
+Å1ÓÏ
+ÅÓÏ6ÓË
+2ÅÓ1Ð
+Å1ÓÒÁ
+Å1ÓÒÅ
+Å1ÓÒÉ
+Å1ÓÒÏ
+Å1ÓÒÕ
+Å1ÓÒÙ
+ÅÓÓ2Ð
+Å1ÓÔÁ
+Å5ÓÔÁ.
+ÅÓ1ÔÁÒ
+Å1ÓÔ×Á
+Å1ÓÔ×Å
+Å1ÓÔ×É
+Å1ÓÔ×Ï
+Å1ÓÔ×Õ
+Å1ÓÔ×Ù
+Å1ÓÔ×ØÅ
+Å1ÓÔ×ØÉ
+Å1ÓÔ×ØÀ
+Å1ÓÔ×ØÑ
+Å1ÓÔ×À
+Å1ÓÔ×Ñ
+Å1ÓÔÅ
+Å1ÓÔÉ
+Å6ÓÔÉÇ
+ÅÓÔ5Ì
+Å1ÓÔÏ
+Å1ÓÔÒÁ
+Å1ÓÔÒÅ
+Å1ÓÔÒÉ
+Å1ÓÔÒÏ
+Å1ÓÔÒÕ
+Å1ÓÔÒÙ
+Å1ÓÔÒØÅ
+Å1ÓÔÒØÉ
+Å1ÓÔÒØÀ
+Å1ÓÔÒØÑ
+Å1ÓÔÒÀ
+Å1ÓÔÒÑ
+Å1ÓÔÕ
+Å1ÓÔÙ
+Å1ÓÔØÅ
+Å1ÓÔØÉ
+Å1ÓÔØÀ
+Å1ÓÔØÑ
+Å1ÓÔÀ
+Å1ÓÔÑ
+Å1ÓÕ
+Å1ÓÙ
+Å1ÓØÅ
+Å1ÓØÉ
+Å1ÓØÀ
+Å1ÓØÑ
+Å1ÓÀ
+Å1ÓÑ
+Å1ÔÁ
+Å1Ô×Á
+Å1Ô×Å
+Å1Ô×É
+Å1Ô×Ï
+Å1Ô×Õ
+Å1Ô×Ù
+Å5Ô×Ñ
+Å1ÔÅ
+Å1ÔÉ
+Å1ÔÌ
+Å1ÔÏ
+Å1ÔÒÁ
+Å1ÔÒÅ
+Å1ÔÒÉ
+Å1ÔÒÏ
+Å1ÔÒÕ
+Å1ÔÒÙ
+Å5ÔÒØ
+Å1ÔÕ
+Å1ÔÙ
+Å1ÔØÅ
+Å1ÔØÉ
+Å1ÔØÀ
+Å1ÔØÑ
+Å1ÔÀ
+Å1ÔÑ
+2Å1Õ2
+ÅÕÌ6
+ÅÕÍÙ6
+ÅÕÍÙÛ5
+Å1ÆÁ
+Å1ÆÅ
+Å1ÆÉ
+Å1ÆÌÁ
+Å1ÆÌÅ
+Å1ÆÌÉ
+Å1ÆÌÏ
+Å1ÆÌÕ
+Å1ÆÌÙ
+Å1ÆÏ
+Å1ÆÒÁ
+Å1ÆÒÅ
+Å1ÆÒÉ
+Å1ÆÒÏ
+Å1ÆÒÕ
+Å1ÆÒÙ
+Å1ÆÕ
+Å1ÆØÅ
+Å1ÆØÉ
+Å1ÆØÀ
+Å1ÆØÑ
+Å1ÆÀ
+Å1ÆÑ
+Å1ÈÁ
+Å1ÈÄÁ
+Å1ÈÄÅ
+Å1ÈÄÉ
+Å1ÈÄÏ
+Å1ÈÄÕ
+Å1ÈÄÙ
+Å1ÈÅ
+Å1ÈÉ
+ÅÈ1Í
+Å1ÈÏ
+Å1ÈÕ
+Å1ÈÙ
+Å1ÈØÅ
+Å1ÈØÉ
+Å1ÈØÀ
+Å1ÈØÑ
+Å1ÈÀ
+Å1ÈÑ
+Å1ÃÁ
+Å1ÃÅ
+ÅÃ1Ú
+Å1ÃÉ
+Å1ÃÏ
+Å1ÃÕ
+Å1ÃÙ
+Å1ÃØÅ
+Å1ÃØÉ
+Å1ÃØÀ
+Å1ÃØÑ
+Å1ÞÁ
+Å1ÞÅ
+Å1ÞÉ
+Å1ÞÕ
+Å1ÞØÅ
+Å1ÞØÉ
+Å1ÞØÀ
+Å1ÞØÑ
+Å1ÛÁ
+Å1Û×Á
+Å1Û×Å
+Å1Û×É
+Å1Û×Ï
+Å1Û×Õ
+Å1Û×Ù
+Å1ÛÅ
+Å1ÛÉ
+Å1ÛÌÁ
+Å1ÛÌÅ
+Å1ÛÌÉ
+Å1ÛÌÏ
+Å1ÛÌÕ
+Å1ÛÌÙ
+Å1ÛÏ
+Å1ÛÒÁ
+Å1ÛÒÅ
+Å1ÛÒÉ
+Å1ÛÒÏ
+Å1ÛÒÕ
+Å1ÛÒÙ
+Å1ÛÔÁ
+ÅÛ1ÔÏ
+Å1ÛÕ
+Å1ÛØÅ
+Å1ÛØÉ
+Å1ÛØÀ
+Å1ÛØÑ
+Å1ÝÁ
+Å1ÝÅ
+Å1ÝÉ
+Å1ÝÏ
+Å1ÝÕ
+Å1ÝØÅ
+Å1ÝØÉ
+Å1ÝØÀ
+Å1ÝØÑ
+Å1Ù
+Å1Ü6
+Å1À
+Å1Ñ
+ÅÑ6Ú
+2ÖÁ×Å
+Ö1Â
+Ö1×
+1ÖÇ
+6ÖÇÁ
+6Ö5ÇÏ
+6Ö5ÇÒ
+1ÖÄ
+6ÖÄ.
+6ÖÄÅÆ
+2ÖÄ1Ì
+6Ö5ÄÏÌ
+6Ö5ÄÏÒ
+2ÖÄØ
+3ÖÅ×
+5ÖÅÇ
+ÖÅ5Ä2
+5ÖÅÊ
+ÖÅ2ÏÄ
+Ö1Ö
+Ö2ÖÅ
+Ö1Ú
+Ö5ÉÍÐ
+ÖÉ5Ï
+2Ö1Ë
+1ÖÌÉ×
+Ö5ÌÉÞ
+Ö1ÍÁ
+1ÖÍÕ
+Ö1Î
+2Ö1Ï2Ó
+Ö1Ð
+ÖÒÅ6Ó5
+Ö1Ó
+Ö1Ô
+Ö1ÕÜ
+2Ö1Ã
+Ö1Þ
+Ö5ÜÌ
+5ÖÑ
+1ÚÁ
+5ÚÁ.
+ÚÁÂ6
+ÚÁ1×Þ
+ÚÁ1Ç2
+ÚÁÅ6
+ÚÁ1Ú2
+Ú1ÁËÔ
+Ú1ÁÌË
+ÚÁÍÅÓ2
+ÚÁÎ5Ó6
+ÚÁ5Ð6ÎÕ
+ÚÁ1Ò2Ö
+ÚÁ1Ó2
+ÚÁÓ3ÓË
+ÚÁÔ2
+ÚÁ3ÔÍ
+ÚÁ5Õ
+ÚÁ1È
+ÚÁ1ÛÐ
+ÚÁÑ2
+2Ú1Â
+Ú×2
+Ú5×ÁÑ
+Ú×ÅÔ3×
+Ú1×Ë
+Ú6×ÏÎ
+1Ú×Õ
+Ú1×Ù
+Ú1×Ñ
+Ú1Ç
+Ú5ÇÎÁ
+ÚÇ1ÎÕ
+Ú5ÄÁ.
+Ú1Ä×
+Ú1ÄÅ
+Ú1ÄÉ
+2ÚÄÎ
+Ú5ÄÏÄ
+Ú5ÄÏÊ
+Ú5ÄÏÍ
+Ú5ÄÏÏ
+Ú1ÄÑ
+6Ú1Ö
+Ú1Ú
+ÚÉ5Á
+ÚÉ6ÎÉ
+2Ú1ÉÎÔ
+2Ú1ÉÎÆ
+ÚÉÏÂ5
+ÚÉ6ÏÎÏ
+ÚÉÏ6Ð
+3ÚÉÓ
+ÚÉ5Ó6È
+2Ú1Ë
+Ú1Ì
+6Ú1Í
+6ÚÎÁ.
+6Ú1ÎÅ
+Ú1ÎÉ
+Ú1ÎÏ
+2Ú1ÎÕ
+2ÚÎÙ
+6ÚÏÂÝ
+ÚÏ1Ç
+ÚÏ3Ä2Ò
+ÚÏ1Ú2
+ÚÏË2
+Ú1ÏËÓ
+1ÚÏÌ
+ÚÏ1Í
+ÚÏ1Ò×
+Ú1ÏÒÇ
+5ÚÏ5ÒÕ
+ÚÏÓ2
+ÚÏ1ÓÐ
+ÚÏ1Ý
+Ú1Ð
+Ú1ÒÁ
+Ú2ÒÁË
+Ú2ÒÁÞ
+5ÚÒÉ
+Ú1ÒÏÄ
+6Ú1ÒÕ
+Ú1ÒÑ
+2Ú1Ó
+Ú1Ô
+1ÚÕ
+ÚÕ6ÂÅÖ
+2Ú1Õ2Ä
+ÚÕ6Ë
+2Ú1Õ2Ó
+Ú1Õ2Þ
+Ú1Ã
+Ú1Þ
+Ú1Û
+Ú6ß
+Ú2Ù
+2ÚÙÍ
+5ÚØÀ
+Ú1Ü
+ÚÜ1Ë
+É1Á
+É2ÁÂ
+É2Á1Ç
+É6ÁÄÉ
+ÉÁ2ÍÕ
+ÉÁ6ÎÁÌ
+É2ÁÐ
+ÉÁÓ2
+ÉÁ1ÓË
+É6ÁÔÒÁ
+É2ÁÆ
+2ÉÂ
+É1ÂÁ
+É1ÂÅ
+É1ÂÉ
+É1ÂÌÁ
+É1ÂÌÅ
+É1ÂÌÉ
+É1ÂÌÏ
+É1ÂÌÕ
+É1ÂÌÙ
+É1ÂÏ
+É1ÂÒÁ
+É1ÂÒÅ
+É1ÂÒÉ
+É1ÂÒÏ
+É1ÂÒÕ
+É1ÂÒÙ
+É1ÂÕ
+É1ÂÙ
+É1ÂØÅ
+É1ÂØÉ
+É1ÂØÀ
+É1ÂØÑ
+É1ÂÀ
+É1ÂÑ
+É1×Á
+6É×ÁÖ
+É1×Å
+É1×É
+É1×ÌÁ
+É1×ÌÅ
+É1×ÌÉ
+É1×ÌÏ
+É1×ÌÕ
+É1×ÌÙ
+É1×Ï
+É1×ÒÁ
+É1×ÒÅ
+É1×ÒÉ
+É1×ÒÏ
+É1×ÒÕ
+É1×ÒÙ
+É1×2Ó
+É1×Õ
+2É1×Ù
+É1×ØÅ
+É1×ØÉ
+É1×ØÀ
+É1×ØÑ
+É1×À
+É1×Ñ
+É1ÇÁ
+É5ÇÄ
+É1ÇÅ
+É1ÇÉ
+6É5ÇÌ
+É1ÇÌÁ
+É1ÇÌÅ
+É1ÇÌÉ
+É1ÇÌÏ
+É1ÇÌÕ
+É1ÇÌÙ
+ÉÇ1Î
+É1ÇÏ
+É1ÇÒÁ
+É1ÇÒÅ
+É1ÇÒÉ
+É1ÇÒÏ
+É1ÇÒÕ
+É1ÇÒÙ
+É1ÇÕ
+É1ÇÙ
+É1ÇØÅ
+É1ÇØÉ
+É1ÇØÀ
+É1ÇØÑ
+É1ÇÀ
+É1ÇÑ
+É1ÄÁ
+É1Ä×Á
+É1Ä×Å
+É1Ä×É
+É1Ä×Ï
+É1Ä×Õ
+É1Ä×Ù
+É1ÄÅ
+É2ÄÅÊ
+É1ÄÖÉ
+É1ÄÉ
+ÉÄÉ3ÏÍ
+ÉÄÉ3ÏÔ
+É1ÄÌÁ
+É1ÄÌÅ
+É1ÄÌÉ
+É1ÄÌÏ
+É1ÄÌÕ
+É1ÄÌÙ
+É1ÄÏ
+É1ÄÒÁ
+É1ÄÒÅ
+É1ÄÒÉ
+É1ÄÒÏ5
+É1ÄÒÕ
+É1ÄÒÙ
+É1ÄÕ
+ÉÄ1Ã
+É1ÄÙ
+É1ÄØÅ
+É1ÄØÉ
+É1ÄØÀ
+É1ÄØÑ
+É1ÄÀ
+É1ÄÑ
+É1Å
+ÉÅ6Â
+ÉÅ6Ä
+É6ÅÎÏ
+É1ÖÁ
+É1ÖÅ
+É1ÖÖ
+É1ÖÉ
+É1ÖÏ
+É1ÖÕ
+É1ÖØÅ
+É1ÖØÉ
+É1ÖØÀ
+É1ÖØÑ
+É1ÚÁ
+ÉÚ1×
+ÉÚ2×Á
+ÉÚ2ÇÎ
+ÉÚÇ1ÎÅ
+ÉÚ1Ä
+É1ÚÅ
+É1ÚÉ
+É1ÚÎÁÞ
+É1ÚÏ
+ÉÚÏ1Ô
+É1ÚÒ
+É1ÚÕ
+É1ÚÙ
+ÉÚÙ1Ó
+É1ÚØÅ
+É1ÚØÉ
+É1ÚØÀ
+É1ÚØÑ
+É1ÚÀ
+É1ÚÑ
+É1É
+ÉÉ2Ú
+É1ËÁ
+É1Ë×Á
+É1Ë×Å
+É1Ë×É
+É1Ë×Ï
+É1Ë×Õ
+É1Ë×Ù
+É1ËÅ
+É1ËÉ
+É1ËÌÁ
+É1ËÌÅ
+É1ËÌÉ
+É1ËÌÏ
+É1ËÌÕ
+É1ËÌÙ
+ÉË1Î
+É1ËÏ
+É6ËÏÎÏ
+6ÉËÒ
+É1ËÒÁ
+É1ËÒÅ
+É1ËÒÉ
+É1ËÒÏ
+É1ËÒÕ
+É1ËÒÙ
+ÉË1ÓË
+ÉËÓ1ÔÕ
+É1ËÕ
+É5Ë6Þ
+É1ËÙ
+É1ËØÅ
+É1ËØÉ
+É1ËØÀ
+É1ËØÑ
+É1ËÀ
+É1ËÑ
+É1ÌÁ
+É2Ì1Á2Ã
+É1ÌÅ
+É1ÌÉ
+ÉÌ6ÌÕ
+É1ÌÏ
+ÉÌÏ5Ä
+É1ÌÕ
+É1ÌÙ
+É1ÌØÅ
+É1ÌØÉ
+É1ÌØÀ
+É1ÌØÑ
+É1ÌÀ
+É1ÌÑ
+É1ÍÁ
+É1ÍÅ
+É2ÍÅÅ
+É2ÍÅÌ
+6ÉÍÅÎÅ
+É2ÍÅÎÏ
+2ÉÍÅÎØ
+É6ÍÅÀ
+É5ÍÉ
+É1ÍÌÁ
+É1Í1ÌÅ
+É1ÍÌÉ
+É1ÍÌÏ
+É1ÍÌÕ
+É1ÍÌÙ
+5ÉÍÍÕ
+ÉÍ1Î
+É1ÍÏ
+É1ÍÒÁ
+É1ÍÒÅ
+É1ÍÒÉ
+É1ÍÒÏ
+É1ÍÒÕ
+É1ÍÒÙ
+É1ÍÕ
+É1ÍÙ
+É1ÍØÅ
+É1ÍØÉ
+É1ÍØÀ
+É1ÍØÑ
+É1ÍÀ
+É1ÍÑ
+É1ÎÁ
+5ÉÎÁ×Ç
+ÉÎ1ÁÔÏÍ
+É1ÎÅ
+5ÉÎÖ
+É1ÎÉ
+É1ÎÏ
+É2Î1Ò
+É1ÎÒÁ
+É1ÎÒÅ
+É1ÎÒÉ
+É1ÎÒÏ
+É1ÎÒÕ
+É1ÎÒÙ
+ÉÎ6ÓÌ
+5ÉÎÓÐ
+ÉÎÓ6Ã
+ÉÎ2Ô1×
+É1ÎÕ
+É6ÎÕÉ
+É1ÎÙ
+É1ÎØÅ
+É1ÎØÉ
+É1ÎØÀ
+É1ÎØÑ
+É1ÎÀ
+ÉÎ1ÀÓ
+É1ÎÑ
+É1Ï
+ÉÏÂ5Ì
+ÉÏ2ÂÒ
+É2ÏËÏ
+É6ÏËÒ
+É5ÏÌÅ
+É3ÏÐÔ
+É3ÏÒÔ
+ÉÏ1Ó2
+É2ÏÓË
+ÉÏ2ÓÎ
+ÉÏ2ÓÔÁ
+É2ÏÔ
+É5ÏÔË
+É2ÏÈ
+É2ÏÃ
+6ÉÐ
+É1ÐÁ
+É1ÐÅ
+É1ÐÉ
+É1ÐÌÁ
+É1ÐÌÅ
+É1ÐÌÉ
+É1ÐÌÏ
+É1ÐÌÕ
+É1ÐÌÙ
+É1ÐÏ
+É1ÐÒÁ
+É1ÐÒÅ
+É1ÐÒÉ
+É1ÐÒÏ
+É1ÐÒÕ
+É1ÐÒÙ
+É1ÐÓ
+É1ÐÔÁ
+É1ÐÔÅ
+É1ÐÔÉ
+É1ÐÔÏ
+ÉÐ6ÔÏÎ
+É2Ð1ÔÕ
+É1ÐÔÙ
+É1ÐÕ
+É1ÐÙ
+É1ÐØÅ
+É1ÐØÉ
+É1ÐØÀ
+É1ÐØÑ
+É1ÐÀ
+É1ÐÑ
+É1ÒÁ
+ÉÒ5×
+É1ÒÅ
+É1ÒÉ
+É1ÒÏ
+É1ÒÕ
+É1ÒÙ
+É1ÒØÅ
+É1ÒØÉ
+É1ÒØÀ
+É1ÒØÑ
+É1ÒÀ
+É1ÒÑ
+É1ÓÁ
+ÉÓ1Â
+É1Ó×Á
+É1Ó×Å
+É1Ó×É
+É1Ó×Ï
+É1Ó×Õ
+É1Ó×Ù
+É1ÓÅ
+É1ÓÉ
+ÉÓ1Ë
+É1ÓË×Á
+É1ÓË×Å
+É1ÓË×É
+É1ÓË×Ï
+É1ÓË×Õ
+É1ÓË×Ù
+ÉÓË1Î
+6É5ÓËÏÒ
+É1ÓËÒÁ
+É1ÓËÒÅ
+É1ÓËÒÉ
+É1ÓËÒÏ
+É1ÓËÒÕ
+É1ÓËÒÙ
+ÉÓ1Í
+É1Ó2ÎÉ
+É1ÓÏ
+ÉÓ1Ð
+ÉÓ2ÐÁÓ
+É1ÓÒÁ
+É1ÓÒÅ
+É1ÓÒÉ
+É1ÓÒÏ
+É1ÓÒÕ
+É1ÓÒÙ
+É1ÓÔÁ
+É1ÓÔ×Á
+É1ÓÔ×Å
+É1ÓÔ×É
+É1ÓÔ×Ï
+É1ÓÔ×Õ
+É1ÓÔ×Ù
+É1ÓÔ×ØÅ
+É1ÓÔ×ØÉ
+É1ÓÔ×ØÀ
+É1ÓÔ×ØÑ
+É1ÓÔ×À
+É1ÓÔ×Ñ
+É1ÓÔÅ
+ÉÓ1ÔÅË
+ÉÓ5ÔÅÃ
+É1ÓÔÉ
+É1ÓÔÏ
+É1ÓÔÒÁ
+É1ÓÔÒÅ
+É1ÓÔÒÉ
+É1ÓÔÒÏ
+É1ÓÔÒÕ
+É1ÓÔÒÙ
+É1ÓÔÒØÅ
+É1ÓÔÒØÉ
+É1ÓÔÒØÀ
+É1ÓÔÒØÑ
+É1ÓÔÒÀ
+É1ÓÔÒÑ
+É1ÓÔÕ
+É1ÓÔÙ
+É1ÓÔØÅ
+É1ÓÔØÉ
+É1ÓÔØÀ
+É1ÓÔØÑ
+É1ÓÔÀ
+É1ÓÔÑ
+É1ÓÕ
+ÉÓ1Þ
+É1ÓÙ
+É1ÓØÅ
+É1ÓØÉ
+É1ÓØÀ
+É1ÓØÑ
+É1ÓÀ
+É1ÓÑ
+É1ÔÁ
+É1Ô×Á
+É1Ô×Å
+É1Ô×É
+É1Ô×Ï
+É1Ô×Õ
+É1Ô×Ù
+É1ÔÅ
+É1ÔÉ
+É1ÔÌ
+É1ÔÏ
+ÉÔÏÏÐ1
+É6ÔÏÔ
+É1ÔÒÁ
+É1ÔÒÅ
+É1ÔÒÉ
+É1ÔÒÏ
+É1ÔÒÕ
+É1ÔÒÙ
+É1ÔÕ
+É2Ô1ÕÐ
+ÉÔ1ÕÞ
+É1ÔÙ
+É1ÔØÅ
+É1ÔØÉ
+É1ÔØÀ
+É1ÔØÑ
+É1ÔÀ
+É1ÔÑ
+É1Õ2
+ÉÕ5Ä
+ÉÕ5ÍÅ
+É1ÆÁ
+É1ÆÅ
+É1ÆÉ
+É1ÆÌÁ
+É1ÆÌÅ
+É1ÆÌÉ
+É1ÆÌÏ
+É1ÆÌÕ
+É1ÆÌÙ
+É1ÆÏ
+É1ÆÒÁ
+É1ÆÒÅ
+É1ÆÒÉ
+É1ÆÒÏ
+É1ÆÒÕ
+É1ÆÒÙ
+É1ÆÕ
+É1ÆØÅ
+É1ÆØÉ
+É1ÆØÀ
+É1ÆØÑ
+É1ÆÀ
+É1ÆÑ
+É5ÈÁ
+É1ÈÄÁ
+É1ÈÄÅ
+É1ÈÄÉ
+É1ÈÄÏ
+É1ÈÄÕ
+É1ÈÄÙ
+É5ÈÅ
+É1ÈÉ
+É1ÈÏ
+É1ÈÕ
+É1ÈÙ
+É1ÈØÅ
+É1ÈØÉ
+É1ÈØÀ
+É1ÈØÑ
+É5ÈÜ
+É1ÈÀ
+É1ÈÑ
+É1ÃÁ
+É1ÃÅ
+É1ÃÉ
+É1ÃÏ
+É1ÃÕ
+É1ÃÙ
+É1ÃØÅ
+É1ÃØÉ
+É1ÃØÀ
+É1ÃØÑ
+É1ÞÁ
+É1ÞÅ
+É1ÞÉ
+É1ÞÕ
+É1ÞØÅ
+É1ÞØÉ
+É1ÞØÀ
+É1ÞØÑ
+É1ÛÁ
+É1Û×Á
+É1Û×Å
+É1Û×É
+É1Û×Ï
+É1Û×Õ
+É1Û×Ù
+É1ÛÅ
+É1ÛÉ
+É1ÛÌÁ
+É1ÛÌÅ
+É1ÛÌÉ
+É1ÛÌÏ
+É1ÛÌÕ
+É1ÛÌÙ
+É1ÛÏ
+É1Û2Ð
+É1ÛÒÁ
+É1ÛÒÅ
+É1ÛÒÉ
+É1ÛÒÏ
+É1ÛÒÕ
+É1ÛÒÙ
+É1ÛÕ
+É1ÛØÅ
+É1ÛØÉ
+É1ÛØÀ
+É1ÛØÑ
+É1ÝÁ
+É1ÝÅ
+É1ÝÉ
+É1ÝÏ
+É1ÝÕ
+É1ÝØÅ
+É1ÝØÉ
+É1ÝØÀ
+É1ÝØÑ
+É1Ù
+É1Ü
+É1À
+É2ÀÌ
+É2ÀÎ
+É1Ñ
+ÉÑ2Ä
+Ê1
+Ê×2
+Ê2×Ó
+Ê2Ä1×
+Ê2ÄÎ
+Ê2Ä1Ò
+ÊÅÒ5
+Ê2Ë1×
+Ê6ËÌ
+Ê2ÌØ
+ÊÍ1Á
+Ê2ÍÓ
+Ê2ÎÔ
+Ê5Ï
+Ê2Ð
+Ê5ÐÁ
+Ê5ÐÅ
+Ê5ÐÏ
+ÊÐ1Ô
+Ê5ÐÙ
+Ê2Ó1Â
+ÊÓ1ËÕÒ
+Ê2ÓÍÕ
+Ê2ÓÎ
+Ê2ÓÛ
+Ê6ÔÕ
+ÊÕ6
+Ê2È
+Ê5ÈÏ
+ÊÈ2Ó1
+Ê6ÞÌ
+1ËÁ×
+ËÁ5×6Ô
+1ËÁÅ
+5ËÁÖ
+2ËÁÚË
+1ËÁÍ
+ËÁÍ5Î
+1ËÁÐ
+ËÁ1ÓÐ
+1ËÁÔ
+ËÁ1ÔÌ
+ËÁ2Õ
+ËÁ3ÕÓ
+2ËÁÆ
+1ËÁÈ
+1ËÁÀ
+2Ë1Â
+2Ë1Ç
+Ë1Ä
+1ËÅ
+6ËÅÁ
+Ë1Ö
+1ËÉ×
+ËÉË1Ó
+5ËÉÌ
+ËÉ5Ï
+2Ë1Ë
+1ËÌ
+2ËÌ.
+2Ë1ÌÁË
+Ë5ÌÉÊ
+2ËÌØ
+2Ë1Í
+2ËÎ
+Ë1ÎÁ
+3Ë2ÎÉÖ
+Ë1ÎÏ
+5ËÏ×Ù
+ËÏ1Ç2Î
+ËÏ5Ä2
+ËÏ5ÚÎ
+ËÏ2ÍÉÎ
+1ËÏÍÐ
+1ËÏÎ
+1ËÏÏ
+6ËÏÐÓ
+ËÏÐÕ5
+ËÏÒ1×
+Ë1ÏÒÇ
+6ËÏÒÅÊ
+1ËÏÓ
+ËÏ2Ó×
+ËÏ1ÓË
+ËÏÓ1ÍÏ
+ËÏÓ5Î
+ËÏ1ÓÐ
+ËÏ5ÓÔ×
+ËÏ1Ô2Ì
+1ËÏÛ
+Ë1Ð
+6ËÒ.
+ËÒÉ2Ï5
+ËÒË6
+2ËÓ
+Ë2Ó×
+Ë1ÓËÉ
+Ë2Ó1Ì
+Ë6Ó1Í
+Ë6ÓÎ
+ËÓ1Ð
+Ë5ÓÔÅ.
+ËÓ1ÔÒ
+Ë1ÓÈ
+2Ë1Ô
+5Ë6ÔÏ.
+ËÕÇ1
+ËÕÓ1Ë
+ËÕ6ÔÌ
+2Ë1Æ
+6Ë1È
+2Ë1Ã
+Ë1Þ
+2Ë1Û
+Ë1Ü
+2Ë1Ñ
+ÌÁ2Ç1Ì
+1ÌÁÎÄ
+ÌÁ6Ô×
+5ÌÁÈÏ
+Ì1ÂÁ
+Ì1ÂÉ
+Ì1ÂÏ
+Ì5ÂÙ
+Ì1×
+Ì6×Ë
+Ì6×Ó
+Ì1Ç
+Ì2ÇÁÔ
+Ì1Ä
+ÌÄ2Î
+Ì6ÄÕÅ
+ÌÅ6×5ÒÁ
+1ÌÅÎÄ
+ÌÅ2Ï
+ÌÅ5ÔÒ
+Ì1ÖÁ
+ÌÖÁ6Ô
+ÌÖÁÔ5×
+Ì5Ö6Â
+Ì1ÖÅ
+5Ì6ÖÅÛ
+Ì1ÖÉ
+Ì1ÖØ
+Ì1ÚÄ
+Ì1ÚÅ
+Ì1ÚÏ
+ÌÚ6Õ
+ÌÉ2×1Ì
+5ÌÉÇ
+ÌÉ6ÅÎÉ
+ÌÉÏ5
+ÌÉ1ÓÐÁ
+ÌÉ2Ô1×
+ÌÉ2ÔÏÂ
+ÌÉ2È1×
+5ÌÉÃÏ
+5ÌÉÞÉ
+Ì1Ë
+Ì6ËÌ
+ÌË1Î
+Ì1Ì
+Ì2ÌØ
+Ì1Í
+Ì6ÍÝ
+2Ì1Î
+ÌÏÂÏ1
+ÌÏ6ÂÏÒ
+ÌÏ5×Ä
+ÌÏ5Ä6Ò
+ÌÏ1Ú
+ÌÏÓ5ËÁ
+ÌÏ1ÓËÕ
+ÌÏ5ÓÔ×
+Ì1Ð
+Ì6ÐÎ
+2Ì1Ó
+Ì6Ó5Â
+Ì6ÓÄ
+ÌÓ2Ð
+Ì1Ô
+Ì2ÔË
+Ì6Ô5Ì
+ÌÕ2ÁÔ
+ÌÕ1Ä2Î
+ÌÕ5ÏÌ
+Ì1Æ
+Ì1È
+Ì1Ã
+Ì1ÞÁ
+Ì5ÞÅ
+Ì1ÞØ
+Ì1Û6
+Ì1Ý
+6ÌØ.
+1ÌØÏ
+6ÌØÛ
+1ÌØÀ
+ÍÁ2×Ú
+1ÍÁÇ
+ÍÁÇ1Î
+ÍÁ5Ä6Ì
+ÍÁ5Ú6Ì
+ÍÁ1ÓÂ
+Í6ÁÔ
+ÍÁ2Ô1ÁÎ
+ÍÁ2ÔÏÂ
+ÍÁ2Õ
+ÍÁÕ2Ô
+ÍÁÕÜ1
+ÍÁ2ÞÔ
+2Í1Â6
+2Í1×2
+Í1Ç
+5Í6ÇÎ
+Í5ÄÅ
+Í5ÄÉ
+5ÍÅÄ
+ÍÅ2ÄÏÓ
+ÍÅ2ÄÒ
+ÍÅ6ÖÉ
+1ÍÅÊ
+1ÍÅÎ.
+ÍÅ2Ï
+Í1Ú
+ÍÉ6ÄÌ
+ÍÉ6Ú5ÁÎ
+2Í1ÉÚÄ
+5ÍÉÊ
+5ÍÉÎÇ
+ÍÉ2ÎÀ
+ÍÉ6ÏË
+ÍÉ5ÏÔÉ
+Í1Ë
+1ÍËÎ
+6ÍËÏ
+1ÍÌ
+6ÍÌØ
+6Í1Í
+Í2Í1Î
+Í2Í1Þ
+Í1ÎÁ
+Í2ÎÁÂ
+Í5ÎÅÐ
+Í5ÎÉÊ
+Í5ÎÏ×
+Í1ÎÏÅ
+Í1ÎÏÓ
+Í5ÎÏÔ
+6ÍÎÙ
+ÍÏ5Ú×
+ÍÏ1Í
+1ÍÏÎ
+ÍÏ6ÎÒ
+ÍÏ3Ï
+ÍÏ1ÓË
+ÍÏÓ6Ð
+5ÍÏÔÉ
+2Í1ÏÔÐ
+2Í1Ð
+ÍÐÏ2Þ
+2ÍÒÅ
+Í1Ó
+Í2ÓÂ
+2ÍÓË
+ÍÓ2Î
+Í2Ó1ÏÒ
+ÍÓ6Ð
+ÍÓ2Ó
+1Í2ÓÔÉ
+6Í1Ô
+1ÍÕÓ
+ÍÕ5Ó6Ë
+Í1Æ
+6Í1È
+6Í1Ã
+Í1ÞÅ
+Í1ÞÉÓ
+1ÍÝÅ
+5ÍÝÕ
+1ÍÙ.
+Í5Ü
+1ÍÀ
+Í1À2Ó
+1ÎÁ.
+6ÎÁ×Ç
+1ÎÁ1Ç
+1ÎÁÄ
+ÎÁ2ÄÒ
+ÎÁ1Ú2
+ÎÁ2ÉÌ
+6ÎÁÌÇ
+ÎÁ1ÍÎ
+ÎÁÏ2
+ÎÁ1Ò×
+1ÎÁÓ2
+ÎÁ1ÓÍ
+ÎÁ1ÓÓ
+ÎÁ1ÓÞ
+ÎÁÕ6Þ
+ÎÁ1È
+5ÎÁÃ
+ÎÁ1Þ2ÎÅ
+1ÎÁ1Û2
+ÎÁ5Ü
+3ÎÁÑ
+6Î1Â
+Î1×2
+6Î1Ç
+Î2Ç1Ä
+Î1Ä
+Î2Ä1×
+ÎÄÅ2Ó1
+ÎÄ6Ú
+Î2Ä1Ì
+Î2ÄÎ
+Î6ÄÃ
+ÎÅ2ÁÌ
+ÎÅ1×2Ä
+6ÎÅ×Ë
+2ÎÅ×Î
+ÎÅ2×ÒÁ
+ÎÅ×5ÒÉÔ
+ÎÅ×1ÒÏ
+ÎÅ×6Ô
+ÎÅ5ÄÒ
+ÎÅ1ÚÎ
+ÎÅÉ2
+ÎÅ5ËÓÔ
+ÎÅ1ÍÎ
+ÎÅÏ2Ò
+ÎÅÏ2ÓÔÁÔ
+ÎÅÏ6ÓÔÏ
+ÎÅÏ2È
+ÎÅÏ2Ã
+ÎÅ1Ó2Î
+ÎÅ1Ó2Ð
+ÎÅ1Ó2Æ
+ÎÅ1Ó2È
+ÎÅ1ÓÞ
+ÎÅ5ÞÌ
+ÎÅÑ6
+Î1Ö
+Î1Ú
+5ÎÉÂ
+2Î1ÉÚÄ
+1ÎÉË
+ÎÉ5ËÔ
+ÎÉÌÁ6
+ÎÉÌ5ÁÍ
+ÎÉ5ÏË
+1ÎÉÃ
+Î1Ë
+Î6Ë5ÒÏÔ
+6Î1Ì
+Î1Í
+Î1Î
+1ÎÏ.
+ÎÏ5Á
+ÎÏ2ÂÒ
+ÎÏ5Å
+ÎÏ1Ú
+1ÎÏÊ
+1ÎÏÍ
+ÎÏÍ5Î
+ÎÏÍ5Þ
+ÎÏ5ÏÇ
+ÎÏ5Ó6Ð
+ÎÏ5Ó6È
+2ÎÏÔÄ
+ÎÏ5ÔË
+ÎÏ5ÔÒ
+1ÎÏÈ
+Î1Ð
+2Î1Ó
+Î6Ó5Á×
+Î2Ó1Â
+Î2Ó1×
+Î2ÓÇ
+Î2Ó1Ä
+Î2Ó1ÌÑ
+Î2Ó1Í
+Î2ÓÎ
+ÎÓ2ÐÒ
+ÎÓÕ2Ò
+ÎÓ1ÕÒÁ
+Î2ÓÆ
+Î1Ô
+ÎÔÉÁ2
+ÎÔÉÏ2
+Î2ÔË
+ÎÔ2Ò
+Î2ÔÒÁÄ
+ÎÔÒ1É2ÇÒ
+ÎÕ5Á
+ÎÕ6ÄÒ
+ÎÕÚ2
+ÎÕ6ÚÅ
+6Î1ÕÏ
+ÎÕÓ5ËÕ
+1ÎÕÀ
+6Î1Æ
+Î1È
+ÎÈÏ5
+2Î1Ã
+Î1Þ
+2Î1Û
+Î1Ý
+3ÎÙ
+1ÎØÏ
+1ÎØÀ
+Î1Ü
+Î5ÀÒ
+ÎÀ2Ó
+1ÎÑ
+2ÎÑÛ
+2Ï1Á2
+ÏÁÎÁÂÉ5
+Ï6Á5ÔÁ
+Ï1ÂÁ
+Ï1ÂÅ
+1ÏÂÅÓ
+Ï1ÂÉ
+Ï1ÂÌÁ
+Ï2ÂÌÁÇ
+Ï1ÂÌÅ
+Ï1ÂÌÉ
+ÏÂ5ÌÉË
+ÏÂ5ÌÉÞ
+Ï1ÂÌÏ
+Ï1Â1ÌÕ
+Ï1ÂÌÙ
+Ï1ÂÏ
+1Ï2ÂÏÚ
+ÏÂÏ1Ì
+ÏÂ1ÏÓÏ
+Ï1ÂÒ
+Ï1ÂÒÁ
+ÏÂ5ÒÁÄ
+ÏÂ5ÒÁÍ
+ÏÂ5ÒÁÓ
+Ï1ÂÒÅ
+Ï1ÂÒÉ
+Ï1ÂÒÏ
+Ï1ÂÒÕ
+Ï1ÂÒÙ
+Ï1ÂÕ
+1ÏÂÝ
+1ÏÂß
+Ï1ÂÙ
+Ï1ÂØÅ
+Ï1ÂØÉ
+Ï1ÂØÀ
+Ï1ÂØÑ
+Ï1ÂÀ
+Ï2ÂÑ
+2Ï×
+Ï1×Á
+Ï1×2×
+Ï×6ÄÁ
+Ï1×Å
+Ï×5ÚÎ
+Ï1×É
+Ï×5ÉÎÔ
+Ï×2ËÌ
+Ï1×ÌÁ
+Ï1×ÌÅ
+Ï1×ÌÉ
+Ï1×ÌÏ
+Ï1×ÌÕ
+Ï1×ÌÙ
+Ï1×Í
+Ï1×Ï
+Ï×Ï5ÓË
+Ï×Ï5ÓÔÒ
+Ï6×ÐÏ
+Ï2×ÐÒ
+Ï1×ÒÁ
+Ï1×ÒÅ
+Ï1×ÒÉ
+Ï1×ÒÏ
+Ï1×ÒÕ
+Ï2×ÒÙ
+Ï×2ÓÅ
+Ï1×2Ô
+Ï1×Õ
+Ï1×Ù
+Ï1×ØÅ
+Ï1×ØÉ
+Ï1×ØÀ
+Ï1×ØÑ
+Ï1×À
+Ï1×Ñ
+2ÏÇ
+Ï1ÇÁ
+Ï1Ç×
+Ï1ÇÄ
+Ï1ÇÅ
+Ï1ÇÉ
+Ï1ÇÌ
+Ï1ÇÌÁ
+Ï1ÇÌÅ
+Ï1ÇÌÉ
+Ï1ÇÌÏ
+Ï1ÇÌÕ
+Ï1ÇÌÙ
+Ï1ÇÎÁ
+Ï1ÇÎÅÚ
+Ï1ÇÎÏ
+Ï1ÇÏ
+Ï1ÇÒÁ
+Ï1ÇÒÅ
+Ï1ÇÒÉ
+Ï1ÇÒÏ
+Ï1ÇÒÕ
+Ï1ÇÒÙ
+Ï1ÇÕ
+Ï1ÇÙ
+Ï1ÇØÅ
+Ï1ÇØÉ
+Ï1ÇØÀ
+Ï1ÇØÑ
+Ï1ÇÀ
+Ï1ÇÑ
+Ï1ÄÁ
+Ï2Ä1ÁÄ
+2ÏÄÁÒ
+Ï1Ä×Á
+Ï1Ä×Å
+Ï1Ä×É
+Ï1Ä×Ï
+Ï1Ä×Õ
+Ï1Ä×Ù
+Ï1ÄÅ
+Ï1ÄÉ
+ÏÄÉ5ÁÐ
+Ï1ÄÌÁ
+Ï1ÄÌÅ
+Ï1ÄÌÉ
+Ï1ÄÌÏ
+Ï1ÄÌÕ
+Ï1ÄÌÙ
+Ï1ÄÏ
+ÏÄÏ1Ó
+ÏÄÏ6ÔÒ
+Ï2Ä1ÒÁ
+Ï1ÄÒÅ
+Ï1ÄÒÉ
+Ï1ÄÒÏ
+Ï2Ä1ÒÏÓ
+Ï1ÄÒÕ
+Ï1ÄÒÙ
+Ï1ÄÕ
+Ï2Ä1Õ2Ò
+Ï1ÄÙ
+ÏÄØ1
+Ï1ÄØÅ
+Ï1ÄØÉ
+Ï1ÄØÀ
+Ï1ÄØÑ
+Ï1ÄÀ
+Ï1ÄÑ
+Ï1Å
+ÏÅ2Â
+Ï2Å×Ì
+ÏÅ2Ä
+ÏÅ5ÄÁ
+ÏÅ5Ä6Ì
+Ï6ÅÐ
+Ï2ÅÔ
+ÏÅ2È
+Ï1ÖÁ
+Ï1ÖÅ
+Ï1ÖÉ
+Ï1ÖÍ
+Ï1ÖÏ
+Ï1ÖÕ
+Ï1ÖØÅ
+Ï1ÖØÉ
+Ï1ÖØÀ
+Ï1ÖØÑ
+2Ï1ÚÁ
+ÏÚ1ÄÕ
+ÏÚ5ÄÀ
+Ï1ÚÅ
+Ï1ÚÉ
+Ï1ÚÏ
+Ï2Ú1ÏÂ
+ÏÚ1ÒÏ
+Ï1ÚÕ
+Ï1ÚÙ
+Ï1ÚØÅ
+Ï1ÚØÉ
+Ï1ÚØÀ
+Ï1ÚØÑ
+Ï1ÚÀ
+Ï1ÚÑ
+2Ï1É
+ÏÉ2Ç6
+ÏÉ6Å
+ÏÉ2Ú
+ÏÉ2ÍÅ
+ÏÉ2ÍÕ
+ÏÉ2Ï
+ÏÊ5Ð
+Ï1ËÁ
+Ï2Ë1ÁÕ
+Ï1Ë×Á
+Ï1Ë×Å
+Ï1Ë×É
+Ï1Ë×Ï
+Ï1Ë×Õ
+Ï1Ë×Ù
+Ï1ËÅ
+Ï1ËÉ
+2ÏËÌ
+Ï1ËÌÁ
+Ï1ËÌÅ
+Ï1ËÌÉ
+Ï1ËÌÏ
+Ï1ËÌÕ
+Ï1ËÌÙ
+ÏË5ÎÅ
+ÏË1ÎÕ
+Ï1ËÏ
+2ÏËÏÌ
+Ï1ËÒÁ
+Ï1ËÒÅ
+Ï1ËÒÉ
+Ï1ËÒÏ
+Ï1ËÒÕ
+Ï1ËÒÙ
+ÏË1ÓË
+1ÏËÔ
+Ï1ËÕ
+Ï6ËÕÅ
+Ï1ËÙ
+Ï1ËØÅ
+Ï1ËØÉ
+Ï1ËØÀ
+Ï1ËØÑ
+Ï1ËÀ
+Ï1ËÑ
+2ÏÌ
+Ï1ÌÁ
+Ï1ÌÅ
+Ï5ÌÉ
+Ï3ÌÏ
+Ï1ÌÕ
+ÏÌÕÏ2
+Ï1ÌÙ
+Ï1ÌØÅ
+Ï1ÌØÉ
+Ï1ÌØÀ
+Ï1ÌØÑ
+Ï1ÌÀ
+Ï1ÌÑ
+2ÏÍ
+Ï1ÍÁ
+Ï1ÍÅ
+ÏÍÅ6ÄÌ
+Ï1ÍÉ
+ÏÍ1ÉÎÔ
+Ï1ÍÌÁ
+Ï1ÍÌÅ
+Ï1ÍÌÉ
+Ï1ÍÌÏ
+Ï1ÍÌÕ
+Ï1ÍÌÙ
+3ÏÍÍÅ
+ÏÍ2ÎÑ
+Ï1ÍÏ
+ÏÍ6ÐÓ
+ÏÍ2ÐÔ
+Ï1ÍÒÁ
+Ï1Í1ÒÅ
+Ï1ÍÒÉ
+Ï1ÍÒÏ
+Ï1ÍÒÕ
+Ï1ÍÒÙ
+Ï1ÍÕ
+Ï1ÍÙ
+Ï1ÍØÅ
+Ï1ÍØÉ
+Ï1ÍØÀ
+Ï1ÍØÑ
+Ï2ÍÀ
+Ï1ÍÑ
+Ï1ÎÁ
+2ÏÎÁÚ
+Ï1ÎÅ
+Ï1ÎÉ
+Ï1ÎÏ
+Ï1ÎÒÁ
+Ï1Î5ÒÅ
+Ï1ÎÒÉ
+Ï1ÎÒÏ
+Ï1ÎÒÕ
+Ï1ÎÒÙ
+ÏÎ2ÔÒÁÔ
+ÏÎ2ÔÒ1Õ2
+Ï1ÎÕ
+Ï2Î1ÕÜ
+Ï1ÎÙ
+Ï1ÎØÅ
+Ï1ÎØÉ
+Ï1ÎØÀ
+Ï1ÎØÑ
+Ï1ÎÀ
+Ï1ÎÑ
+Ï1Ï2
+Ï5ÏÁ
+ÏÏÂ2Õ3
+ÏÏÂ5Õ6ÞÅ
+ÏÏË6Ó
+Ï5ÏÍ
+ÏÏ5ÓÆ
+Ï2ÏÔÉ
+Ï2ÏÈÏ
+Ï1ÐÁ
+ÏÐÁÌÅ5
+Ï5Ð×
+Ï1ÐÅ
+Ï1ÐÉ
+2ÏÐÉÒ
+Ï1ÐÌÁ
+Ï1ÐÌÅ
+Ï1ÐÌÉ
+Ï1ÐÌÏ
+Ï1ÐÌÕ
+Ï1ÐÌÙ
+Ï1ÐÏ
+Ï1ÐÒÁ
+Ï1ÐÒÅ
+Ï1ÐÒÉ
+Ï1ÐÒÏ
+Ï1ÐÒÕ
+Ï1ÐÒÙ
+Ï1ÐÔÁ
+Ï1ÐÔÅ
+Ï1ÐÔÉ
+Ï1ÐÔÏ
+Ï1Ð5ÔÕ
+Ï1ÐÔÙ
+Ï1ÐÕ
+Ï1ÐÙ
+Ï1ÐØÅ
+Ï1ÐØÉ
+Ï1ÐØÀ
+Ï1ÐØÑ
+Ï1ÐÀ
+Ï1ÐÑ
+Ï1ÒÁ
+Ï2ÒÁÌÇ
+ÏÒÁ5Ó6ÐÒ
+6ÏÒÁÔ
+Ï1ÒÅ
+Ï1ÒÉ
+ÏÒÉ5ÏÌ
+ÏÒ1ÉÓÐ
+Ï1ÒÏ
+ÏÒÔ1Ì
+ÏÒ5ÔØ
+ÏÒ5ÔÑ
+Ï1ÒÕ
+Ï5ÒÕ.
+ÏÒ5ÕÚ
+ÏÒ5ÕÜ
+2Ï1ÒÙ
+Ï1ÒØÅ
+Ï1ÒØÉ
+Ï1ÒØÀ
+Ï1ÒØÑ
+Ï1ÒÀ
+Ï1ÒÑ
+Ï1ÓÁ
+Ï1ÓÂ
+ÏÓ5ÂÁ
+Ï1Ó×Á
+Ï1Ó×Å
+Ï1Ó×É
+Ï1Ó×Ï
+Ï1Ó×Õ
+Ï1Ó×Ù
+ÏÓ1Ç
+Ï1ÓÅ
+Ï1ÓÉ
+Ï6Ó5ÉÚ
+ÏÓ1ËÁ.
+Ï1ÓË×Á
+Ï1ÓË×Å
+Ï1ÓË×É
+Ï1ÓË×Ï
+Ï1ÓË×Õ
+Ï1ÓË×Ù
+ÏÓ1ËÉ
+ÏÓ1ËÏÊ
+Ï1ÓËÒÁ
+Ï1ÓËÒÅ
+Ï1ÓËÒÉ
+Ï1ÓËÒÏ
+Ï1ÓËÒÕ
+Ï1ÓËÒÙ
+ÏÓ1ËÕ.
+ÏÓ5ÍÉ
+ÏÓ1ÍÏÓ
+ÏÓ2Î
+Ï1ÓÎÅ
+Ï1ÓÎÉÍ
+ÏÓ5ÎÉÔ
+Ï1ÓÏ
+6ÏÓÐ
+ÏÓ6ÐÁÔ
+Ï1ÓÐÅ
+ÏÓ6ÐÌÅ
+Ï1ÓÒÁ
+Ï1ÓÒÅ
+Ï1ÓÒÉ
+Ï1ÓÒÏ
+Ï1ÓÒÕ
+Ï1ÓÒÙ
+ÏÓ2Ó×
+ÏÓ2ÓËÏ
+ÏÓ2Ó1Í
+ÏÓ2ÓÐ
+ÏÓ6ÓÞ
+Ï1ÓÔÁ
+2ÏÓÔÁÌ
+Ï2ÓÔ1×
+Ï1ÓÔ×Á
+Ï1ÓÔ×Å
+Ï1ÓÔ×É
+Ï1ÓÔ×Ï
+Ï1ÓÔ×Õ
+Ï1ÓÔ×Ù
+Ï1ÓÔ×ØÅ
+Ï1ÓÔ×ØÉ
+Ï1ÓÔ×ØÀ
+Ï1ÓÔ×ØÑ
+Ï1ÓÔ×À
+Ï1ÓÔ×Ñ
+Ï1ÓÔÅ
+Ï1ÓÔÉ
+Ï5ÓÔÌ
+Ï1Ó6ÔÏ
+Ï1ÓÔÒÁ
+Ï1ÓÔÒÅ
+Ï1ÓÔÒÉ
+Ï1ÓÔÒÏ
+Ï1ÓÔÒÕ
+Ï1ÓÔÒÙ
+Ï1ÓÔÒØÅ
+Ï1ÓÔÒØÉ
+Ï1ÓÔÒØÀ
+Ï1ÓÔÒØÑ
+Ï1ÓÔÒÀ
+Ï1ÓÔÒÑ
+Ï1ÓÔÕ
+Ï1ÓÔÙ
+Ï1ÓÔØÅ
+Ï1ÓÔØÉ
+Ï1ÓÔØÀ
+Ï1ÓÔØÑ
+Ï1ÓÔÀ
+Ï1ÓÔÑ
+Ï1ÓÕ
+Ï2Ó1ÕÎ
+Ï6Ó5ÕÐ
+2ÏÓÆ
+Ï1ÓÞÅ
+Ï1ÓÙ
+Ï1ÓØÅ
+Ï1ÓØÉ
+Ï1ÓØÀ
+Ï1ÓØÑ
+Ï1ÓÀ
+Ï1ÓÑ
+Ï1ÔÁ
+ÏÔ1×
+Ï6Ô×Á
+Ï1Ô×Å
+Ï1Ô×É
+Ï1Ô×Ï
+1ÏÔ×Ò
+Ï1Ô×Õ
+Ï1Ô×Ù
+1ÏÔÄ
+Ï1ÔÅ
+Ï3ÔÉ
+5ÏÔËÒ
+ÏÔ1Ì
+Ï1ÔÏ
+ÏÔÏ5Ë6
+2ÏÔÒ
+Ï1ÔÒÁ
+ÏÔ5ÒÁÓ
+Ï1ÔÒÅ
+Ï1ÔÒÉ
+Ï1ÔÒÏ
+Ï1ÔÒÕ
+Ï1ÔÒÙ
+Ï5ÔÒÀ
+Ï1ÔÒÑ
+Ï1ÔÕ
+Ï1ÔÙ
+Ï1ÔØÅ
+Ï1ÔØÉ
+Ï5ÔØ6Í
+Ï1ÔØÀ
+Ï1ÔØÑ
+Ï1ÔÀ
+Ï1ÔÑ
+2Ï1Õ2
+ÏÕÚ6
+ÏÕÍÙ6
+ÏÕÍÙÛ5
+2ÏÆ
+Ï1ÆÁ
+Ï1ÆÅ
+Ï1ÆÉ
+Ï1ÆÌÁ
+Ï1ÆÌÅ
+Ï1ÆÌÉ
+Ï1ÆÌÏ
+Ï1ÆÌÕ
+Ï1ÆÌÙ
+Ï1ÆÏ
+Ï2Æ1ÏÒÉ
+ÏÆÏÓ5
+Ï1ÆÒÁ
+Ï1ÆÒÅ
+Ï1ÆÒÉ
+Ï1ÆÒÏ
+Ï1ÆÒÕ
+Ï1ÆÒÙ
+Ï1ÆÕ
+Ï1ÆØÅ
+Ï1ÆØÉ
+Ï1ÆØÀ
+Ï1ÆØÑ
+Ï1ÆÀ
+Ï1ÆÑ
+Ï1ÈÁ
+Ï1ÈÄÁ
+Ï1ÈÄÅ
+Ï1ÈÄÉ
+Ï1ÈÄÏ
+Ï1ÈÄÕ
+Ï1ÈÄÙ
+Ï1ÈÅ
+2Ï1ÈÉ
+ÏÈ5ÌÅ
+Ï1ÈÏ
+6ÏÈÏÒ
+2Ï5ÈÒÏ
+Ï5È6Ô
+Ï1ÈÕ
+Ï1ÈÙ
+Ï1ÈØÅ
+Ï1ÈØÉ
+Ï1ÈØÀ
+Ï1ÈØÑ
+Ï1ÈÀ
+Ï1ÈÑ
+Ï1ÃÁ
+Ï1ÃÅ
+Ï1ÃÉ
+Ï2ÃÏ
+Ï1ÃÕ
+Ï1ÃÙ
+Ï1ÃØÅ
+Ï1ÃØÉ
+Ï1ÃØÀ
+Ï1ÃØÑ
+6Ï1ÞÁ
+Ï1ÞÅ
+Ï1ÞÉ
+ÏÞÉ6Ñ
+Ï1ÞÌ
+6Ï1ÞÕ
+Ï1ÞØÅ
+Ï1ÞØÉ
+Ï1ÞØÀ
+Ï1ÞØÑ
+Ï1ÛÁ
+Ï1Û×Á
+Ï1Û×Å
+Ï1Û×É
+Ï1Û×Ï
+Ï1Û×Õ
+Ï1Û×Ù
+Ï1ÛÅ
+Ï1ÛÉ
+Ï1Û6Ì
+Ï1ÛÌÁ
+Ï1ÛÌÅ
+Ï1ÛÌÉ
+Ï1ÛÌÏ
+Ï1ÛÌÕ
+Ï1ÛÌÙ
+Ï6ÛÎ
+Ï1ÛÏ
+Ï5ÛÐ
+Ï1ÛÒÁ
+Ï1ÛÒÅ
+Ï1ÛÒÉ
+Ï1ÛÒÏ
+Ï1ÛÒÕ
+Ï1ÛÒÙ
+Ï1ÛÔÁ
+Ï1ÛÕ
+Ï1ÛØÅ
+Ï1ÛØÉ
+Ï1ÛØÀ
+Ï1ÛØÑ
+Ï1ÝÁ
+Ï1ÝÅ
+Ï1ÝÉ
+Ï1ÝÏ
+Ï1ÝÕ
+Ï1ÝØÅ
+Ï1ÝØÉ
+Ï1ÝØÀ
+Ï1ÝØÑ
+Ï1Ù
+2Ï1Ü
+ÏÜ5ÔÉ
+Ï1À
+ÏÀ2Â
+Ï1Ñ
+ÏÑ6Â
+ÏÑ2×
+ÏÑ2Ä
+ÏÑ2Ú
+ÏÑ6Ò
+ÐÁ5Ó2Ë
+ÐÁ1ÓÍ
+ÐÁ5ÔÌ
+6Ð1Â
+Ð×6
+Ð5×Ë
+Ð1Ä
+ÐÅ5ÄÖ
+ÐÅÄ1ÉÎ
+1ÐÅÎÚ
+ÐÅ1Ð6
+ÐÅÒ1×
+ÐÅÒ2Í1ÁÌ
+ÐÅÒ1Ï
+ÐÅ2ÒÏÓ
+ÐÅ6Ó5Ë
+1ÐÅÞ
+1ÐÉÓ
+1ÐÉÔ
+6Ð1Ë
+1ÐÌ
+6ÐÌÁÎÄ
+ÐÌÅ6×5Ò
+ÐÌÏÓ1
+2Ð1Í
+Ð1Î
+Ð6ÎÅ×
+1ÐÏ
+ÐÏ5Â
+ÐÏ5Ç6
+ÐÏÄ1Ö
+ÐÏ2Ä1Ì
+ÐÏ2ÄÏÔ
+ÐÏ2ÄÒÅ
+ÐÏ2ÄØ
+ÐÏ1Ú
+ÐÏ2Ú1ÄÁ
+ÐÏÌ5ÏÂ
+ÐÏ1Í
+ÐÏÓ2
+ÐÏ1ÓË
+ÐÏ1ÓÍ
+ÐÏ1ÓÓ
+ÐÏ2ÓÔÉ
+ÐÏ1ÓÈ
+5ÐÏÓÙ
+ÐÏ1Ô2Ì
+ÐÏ1ÔÒ
+ÐÏ1È
+ÐÏÜ1Í
+Ð1Ð
+1ÐÒ
+2Ð1ÒÁÊ
+ÐÒÅ6ÄÉÎ
+ÐÒÅÊ2
+ÐÒ6Ö
+ÐÒÉ5×
+ÐÒÉ1Ì
+ÐÒÉÌØ2
+ÐÒÉÎ6Ó5
+ÐÒÉ1Ó
+ÐÒÉÞÅ2Ó1Ë
+6ÐÒÎ
+ÐÒÏ5ÍÞ
+ÐÒÏ1ÓË
+2ÐÒÓ
+6ÐÒÈ
+6ÐÓ.
+1Ð2ÓÅ
+1Ð2ÓÉ
+Ð1ÓË
+1Ð2ÓÏ
+Ð1ÓÔ
+5Ð6ÓÕ
+Ð6ÓÙ
+5ÐÓÀ
+Ð1ÔÁÔ
+ÐÔ1×
+2Ð1ÔÉÚ
+6Ð5ÔÉÌ
+6ÐÔÉÍ
+Ð5ÔÏË
+Ð1ÔÏÎ
+Ð5ÔÏÃ
+Ð1ÔÒ
+5ÐÔÑ
+2Ð1Æ
+2Ð1Ã
+Ð1Þ
+5Ð6ÞÅÎÎ
+2Ð1Û
+Ð1Ý
+5ÐÜ
+5ÐÑ
+ÒÁÁ6
+1ÒÁÂ
+ÒÁ1ÇÎ
+ÒÁÚ1×
+ÒÁ6ÚÕÂ
+ÒÁ6Ë×
+1ÒÁÌÇ
+5ÒÁÍÌ
+ÒÁÎ2ÓÕ
+Ò6ÁÐ
+ÒÁÓ1Â
+ÒÁ2ÓË
+ÒÁ6ÓÌÑ
+ÒÁÓ5Í
+ÒÁ2ÓÔ×
+ÒÁ2Ó1ÔÅÒ
+ÒÁ2Ó1ÔÉÒ
+ÒÁÓ1ÔÏÒ
+ÒÁ2Ó1ÔÒÁ
+ÒÁ2Ó1ÔÒÏÇ
+ÒÁ2Ó1ÔÒÏÅ
+ÒÁ6ÓÔÕÛ
+ÒÁ2ÔÁË
+ÒÁ5ÕÓ
+2ÒÁÜ
+Ò1Â
+ÒÂ6Ï
+Ò1×ÁÒ
+1Ò×ÁÔØ
+Ò1×ÁÃ
+Ò1×ÅÖ
+Ò1×ÅÊ
+Ò1×ÅÎ
+Ò1×É
+Ò1×Ï
+Ò×Ï5Ú
+6Ò×Ó
+Ò1×Ñ
+Ò1Ç
+Ò2Ç×
+Ò6ÇÄ
+Ò2Ç1Î
+Ò2ÇÏÔ
+Ò6ÇÒÁÂ
+Ò1Ä
+ÒÄ2Ì
+Ò2ÄÎ
+Ò2Ä1Ã
+ÒÅ6×Ð
+ÒÅ6ÄÌ
+ÒÅ6ÄÏÐ
+ÒÅ2Ä1Ò
+ÒÅÅ2
+ÒÅ5ÖØ
+1ÒÅÚÁ
+ÒÅ1ÚÒ
+ÒÅ2Ë1×Á
+1ÒÅËÌÁ
+ÒÅÍ1Î
+ÒÅÏ2Ä
+ÒÅ5ÏÌÁ
+ÒÅ2ÏÓ
+ÒÅ2ÏÔ
+ÒÅÏ2Ã
+ÒÅ6ÐÔ
+ÒÅ1Ò2
+ÒÅ2Ó1×
+ÒÅ1Ó2Ð
+ÒÅ1ÓÞ
+ÒÅ2È1Ò
+Ò1Ö
+1ÒÖÁ×Å
+Ò2ÖÎ
+Ò5ÚÄ
+Ò1ÚÅ
+Ò1ÚÉ
+Ò1ÚÏ
+Ò5ÚÙ
+Ò1ÚÑ
+ÒÉ5Á
+ÒÉÁ6Ú
+ÒÉ5×Ë
+ÒÉ2ÄÒ
+2ÒÉÅÎ
+ÒÉ1ÖÍ
+ÒÉ1Ú×
+ÒÉ1ÚÎ
+ÒÉ6ÚÏË
+6ÒÉÍÍ
+ÒÉ1ÍÞ
+5ÒÉÓÏ
+2ÒÉÓÐ
+ÒÉ1ÈÌ
+Ò1Ë
+ÒË1Î
+Ò1Ì
+Ò1Í
+Ò2ÍË
+Ò2Í1Î
+Ò2ÍÓ
+Ò2Í5Þ
+Ò6ÍÝ
+Ò6ÍØ
+Ò1Î
+ÒÏ5Á
+2ÒÏÂÌ
+6ÒÏÂß
+ÒÏ5×È
+ÒÏÇ1ÎÅ
+ÒÏÇ1ÎÕ
+ÒÏ1ÄÖ
+ÒÏ1ÄÚ
+ÒÏ5ÄÌ
+ÒÏ1Ú×
+ÒÏ1ÚÒ
+ÒÏÉ2Ó
+ÒÏ6ÐÔ
+ÒÏ1Ò×
+2Ò1ÏÒÔ
+ÒÏ1ÓÍ
+ÒÏ5ÓÎÕ
+ÒÏ5ÓÐÁ
+ÒÏ5ÓÐÌ
+ÒÏ5Ó6Ã
+1ÒÏÓÛ
+2ÒÏÔÄ
+5ÒÏÔÓ
+5ÒÏÕÜ
+ÒÏ1È
+Ò6ÏÞ
+Ò1Ð
+ÒÐÕÓ5
+Ò1Ò
+ÒÒÏ5
+ÒÒÏÓ6
+Ò1Ó
+Ò2ÓÎ
+ÒÓ6Ð
+Ò1ÔÁ
+Ò2Ô1ÁËÔ
+Ò2ÔÁÐ
+ÒÔ1×
+Ò5Ô6×Á
+Ò1ÔÅ
+Ò1ÔÉ
+ÒÔ1ÌÀ
+Ò5ÔÌÑ
+Ò1ÔÏ
+Ò2Ô1ÏÂ
+Ò1ÔÒ
+Ò1ÔÕ
+Ò1ÔÙ
+Ò1ÔØÀ
+Ò1ÔÀ
+ÒÕ6ÄÁÒ
+ÒÕÚ2Ì
+ÒÕË5Ó
+6ÒÕÏ
+Ò1Æ
+Ò2È1×
+Ò1ÈÅ
+ÒÈ5ÌÅ
+Ò1ÈÌÏ
+Ò1ÈÏ
+Ò2È1ÏÐ
+ÒÈ1Õ2
+Ò1Ã
+Ò2Ã1×
+ÒÃÅ6Ð5
+Ò1Þ
+Ò1Û
+Ò6Û×
+Ò2ÛË
+Ò2ÛÎ
+Ò2Û1Ò
+Ò1Ý
+1ÒÙÂ
+ÒÙ2Ç1Î
+ÒÙÈ1
+Ò1Ü
+Ò6ÜÐ
+1ÓÁ
+5ÓÁ.
+ÓÁ2Ë×
+ÓÁ5Ó6
+ÓÂÅ5Ú
+ÓÂÅÚÏ5
+ÓÂÏ1Ô
+1Ó×
+Ó×Á6Å
+Ó1×ÅÎ
+2Ó1×É
+Ó×Ï5×
+ÓÇ6
+Ó1ÄÁ
+1ÓÄ×
+Ó3ÄÅ
+Ó5ÄÉ
+1ÓÅ
+ÓÅÇÏ1
+ÓÅÇÏÄ2
+ÓÅ1Ú
+5ÓÅË
+ÓÅËÓ1Ô
+ÓÅÒ5×Á
+1ÓÖ
+6Ó1Ú
+1ÓÉ
+6ÓÉÄÁ
+ÓÉ3ÏÍ
+2Ó1É2ÏÒ
+2Ó1ÉÓÐ
+2ÓË.
+Ó6ËÁË
+1ÓËÁÆ
+6ÓËÉÌ
+1Ó2ËÌÅ
+Ó6ËÌÏ
+2ÓËÎ
+ÓË1ÎÕ
+6ÓËÏÎ
+1ÓËÏÐ
+Ó2ËÏÐ.
+1ÓÌ
+6ÓÌ.
+ÓÌÅ5Ï6
+2Ó1ÌÉÒÕ
+6Ó5ÌÏË
+2ÓÌØ
+6ÓÌÑÍ
+2ÓÍÅÎ.
+5ÓÍÅÓ
+Ó1ÍÅÔ
+5ÓÍÙ
+Ó1Î
+6Ó5ÎÁ.
+1Ó2ÎÁÂ
+Ó3ÎÉË
+Ó5ÎÏÅ
+Ó5ÎÏÊ
+Ó5ÎÏÍ
+2ÓÎÙ
+1ÓÏ
+ÓÏÂ1ÌÁÇ
+ÓÏ6×Ú
+ÓÏ6×ÉÎ
+ÓÏ6×5Ô
+ÓÏ1Ç
+ÓÏ1Ö
+ÓÏ1Ú
+ÓÏ1Ì2Ç
+ÓÏ1Í
+5Ó6ÏÎ
+ÓÏ1Ò2×
+ÓÏ1Ó
+ÓÏÓ6Â
+ÓÏ6Ó5ÎÏ
+ÓÏÓ6Ð
+ÓÏ5Ý
+Ó1ÐÁ
+Ó6Ð×
+1ÓÐÅÎÓ
+ÓÐÅ1Ò2ÓÉ
+Ó2ÐÅÛ
+Ó5ÐÉÌ
+Ó2ÐÏÓ
+1ÓÐÏÓÏ
+1Ó2ÐÏÔ
+Ó1Ó
+Ó2ÓÂ
+ÓÓ1×Ï
+2ÓÓË
+Ó2ÓÎ
+Ó3Ó2ÎÅ
+Ó2ÓÏÒÉ
+ÓÓ6Ó
+6ÓÓ6Ô
+Ó6ÓÆ
+Ó6ÓÃ
+Ó6ÓÛ
+2ÓÔ.
+ÓÔÁ2×1Ò
+2ÓÔÁÕ
+2ÓÔ×.
+ÓÔ6×Ï
+2ÓÔÅÒÌ
+2ÓÔÅÓ
+2ÓÔË
+Ó1ÔÌÅ
+ÓÔ5ÌÑ
+2ÓÔÎ
+1ÓÔÏ
+6ÓÔÒ.
+2ÓÔÒÕÂ
+6ÓÔÓ
+6ÓÔÕÄÙ
+5ÓÔÙ
+2ÓÔØ.
+5ÓÔØÏ
+1ÓÕ
+ÓÕ2Â1
+6Ó5ÕÉ
+ÓÕ2ÎÉ
+ÓÕÐÅ2
+ÓÕÐÅÒ1
+1ÓÆÅ
+6ÓÆÉ
+ÓÈ6
+1ÓÈÅ
+Ó1ÈÌ
+Ó1ÈÏ
+Ó1Ã
+1Ó2ÃÅÍ
+1ÓÞÁÓ
+Ó1ÞÁÔ
+ÓÞÅ2Ó1Ë
+1ÓÞÉÔ
+Ó1ÞÌ
+6Ó5ÞÕ
+Ó1Û6
+Ó1Ý
+1Óß2
+ÓßÅ3Ä
+ÓßÅ3Ì
+ÓßÅ5ÍÁ
+ÓßÅ3ÍÏ
+ÓßÅ5È
+1ÓÙ
+6Ó1Ü6
+ÔÁ2ÉÌ
+1ÔÁËÔ
+ÔÁÍÅ2
+ÔÁÍÅÓ1
+2ÔÁÍÐ
+ÔÁ2ÎÁÌ
+1ÔÁÕ
+6Ô1Â
+Ô5×ÉÌ
+Ô2×Ì
+Ô×Ï1Ú
+1Ô2×ÏÒ
+5Ô×ØÀ
+2Ô1Ç
+Ô1Ä2
+ÔÅÇ1Î
+1ÔÅËÁ
+ÔÅË1ÓÔÁ
+1ÔÅËÛ
+ÔÅÌÅ3Ï
+5ÔÅÌÅÒ
+ÔÅÍ5Î
+ÔÅ2ÏÓ
+ÔÅ2Ò1ÁË
+ÔÅÒ1×
+ÔÅÒÅ2Ï3
+1ÔÅÒÌ
+ÔÅ2È1Ï
+1ÔÅÞÅ
+5ÔÅÞØ
+Ô1Ö
+Ô1Ú
+ÔÉ5Á
+5ÔÉÇÅ
+Ô1ÉÍÐ
+2Ô1ÉÎ×
+Ô5ÉÎÄ
+6ÔÉÎÖ
+2Ô1ÉÎÆ
+ÔÉ5ÏÌÉ
+ÔÉÏ2Ð
+ÔÉ1Ó2Ð
+ÔÉ5ÔÕ
+2ÔÊ
+Ô1Ë
+1Ô2ËÁÎ
+Ô6ËÁÞ
+1ÔËÎ
+Ô5ÌÅÊ
+Ô5ÌÉÎ
+1ÔÌÉÔ
+Ô1ÌÏÇ
+2ÔÌØ
+2Ô1Í2
+2Ô1Î
+ÔÏ5Ç
+ÔÏÚÁ6×5
+ÔÏ1Ú×
+1ÔÏÌË
+2ÔÏÍÍ
+6ÔÏÍÓ
+2ÔÏÍÝ
+6ÔÏÍÜ
+2ÔÏÎÇ
+ÔÏ6ÐÔ
+1ÔÏÒÓ
+1ÔÏÒÃ
+ÔÏ1Ó2
+1ÔÏÞÎ
+5ÔÏÝ
+2Ô1Ð
+2ÔÒ.
+2ÔÒÁÂÏ
+Ô2ÒÁ×
+Ô1ÒÁÚ
+2ÔÒ1ÁÒ
+2ÔÒÁÓÓ
+2ÔÒÂ
+6ÔÒ×
+2ÔÒÇ
+2ÔÒÄ
+1ÔÒÅÂ
+6Ô1ÒÅÄ
+ÔÒÅ2È
+1ÔÒÉÂ
+2ÔÒÉÇÒ
+ÔÒÉ3Ï
+2ÔÒË
+2ÔÒÍ
+2ÔÒÐ
+2ÔÒÒ
+6ÔÒÓ
+2ÔÒÔ
+1ÔÒÕÂ
+2ÔÒÆ
+2ÔÒÃ
+2ÔÒ5Û
+Ô1ÒÙ×
+2ÔÒÜ
+6Ô5ÒÑÄ
+2Ô1Ó
+Ô6ÓÄ
+Ô2Ó1Í
+ÔÓ2Î
+6Ô1Ô
+Ô2ÔÌ
+5ÔÕÄÙ
+6ÔÕÏÔ
+ÔÕ2ÐÒ
+2ÔÕÞ
+ÔÕ2ÞÅ
+5ÔÕÛÅ×
+2Ô1ÕÜ
+ÔÕ2ÜÌ
+2Ô1Æ
+2ÔÈ
+Ô1ÈÅ
+ÔÈ1Ì
+Ô1ÈÏ
+2Ô1Ã
+Ô1Þ
+2Ô1Û2
+2Ô1Ý
+ÔÙÓ5Ë
+2ÔØ.
+ÔØ5×
+ÔØ6ÍÕ
+ÔØ5ÏÒ
+2Ô1Ü6
+ÔÑ5ÂÒÑ
+5ÔÑÎÕ
+Ô1Ñ2Þ
+Õ1Á
+Õ6ÁÌÅ
+Õ2ÁÎÔ
+Õ2ÁÒ
+Õ5ÁÒÉ
+Õ6ÁÓ
+Õ1ÂÁ
+Õ1ÂÅ
+5Õ6ÂÅÄ
+Õ1ÂÉ
+Õ1ÂÌÁ
+Õ1ÂÌÅ
+Õ1ÂÌÉ
+Õ1ÂÌÏ
+Õ1ÂÌÕ
+Õ1ÂÌÙ
+Õ1ÂÏ
+Õ1ÂÒÁ
+Õ1ÂÒÅ
+Õ1ÂÒÉ
+Õ1ÂÒÏ
+Õ1ÂÒÕ
+Õ1ÂÒÙ
+Õ1ÂÕ
+Õ1ÂÙ
+Õ1ÂØÅ
+Õ1ÂØÉ
+Õ1ÂØÀ
+Õ1ÂØÑ
+Õ1ÂÀ
+Õ1ÂÑ
+Õ1×Á
+Õ1×Å
+Õ1×É
+Õ1×ÌÁ
+Õ1×ÌÅ
+Õ1×ÌÉ
+Õ1×ÌÏ
+Õ1×ÌÕ
+Õ1×ÌÙ
+Õ1×Ï
+Õ1×ÒÁ
+Õ1×ÒÅ
+Õ1×ÒÉ
+Õ1×ÒÏ
+Õ1×ÒÕ
+Õ1×ÒÙ
+Õ1×Õ
+Õ1×Ù
+Õ1×ØÅ
+Õ1×ØÉ
+Õ1×ØÀ
+Õ1×ØÑ
+Õ1×À
+Õ1×Ñ
+Õ1ÇÁ
+Õ2ÇÁÄ
+Õ1ÇÅ
+Õ1ÇÉ
+Õ1ÇÌ
+Õ1ÇÌÁ
+Õ1ÇÌÅ
+Õ1ÇÌÉ
+Õ1ÇÌÏ
+Õ1ÇÌÕ
+Õ1ÇÌÙ
+Õ1ÇÏ
+Õ1ÇÒÁ
+Õ1ÇÒÅ
+Õ1ÇÒÉ
+Õ1ÇÒÏ
+Õ1ÇÒÕ
+Õ1ÇÒÙ
+Õ1ÇÕ
+Õ1ÇÙ
+Õ1ÇØÅ
+Õ1ÇØÉ
+Õ1ÇØÀ
+Õ1ÇØÑ
+Õ1ÇÀ
+Õ1ÇÑ
+Õ1ÄÁ
+ÕÄ2×
+Õ1Ä×Á
+Õ1Ä×Å
+Õ1Ä×É
+Õ1Ä×Ï
+Õ1Ä×Õ
+Õ1Ä×Ù
+Õ1ÄÅ
+Õ5ÄÖ
+Õ1ÄÉ
+ÕÄÉ5Ó
+Õ6ÄÌ
+Õ1ÄÌÁ
+Õ1ÄÌÅ
+Õ1ÄÌÉ
+Õ1ÄÌÏ
+Õ1ÄÌÕ
+Õ1ÄÌÙ
+Õ1ÄÏ
+Õ1ÄÒ
+Õ1ÄÒÁ
+Õ1ÄÒÅ
+Õ1ÄÒÉ
+Õ1ÄÒÏ
+Õ2Ä1ÒÕ
+Õ1ÄÒÙ
+Õ1ÄÕ
+Õ1ÄÙ
+Õ1ÄØÅ
+Õ1ÄØÉ
+Õ1ÄØÀ
+Õ1ÄØÑ
+Õ1ÄÀ
+Õ1ÄÑ
+Õ1Å
+ÕÅ2Â
+Õ2Å×
+Õ5Å×Á
+1Õ2ÅÌ
+Õ5ÅÍ.
+ÕÅ1Ò
+Õ2ÅÓ
+Õ1ÖÁ
+Õ1ÖÅ
+Õ1ÖÉ
+Õ1ÖÏ
+Õ1ÖÕ
+Õ1ÖØÅ
+Õ1ÖØÉ
+Õ1ÖØÀ
+Õ1ÖØÑ
+Õ1ÚÁ
+ÕÚ6ÇÎ
+ÕÚ5ÄÁ
+ÕÚ5ÄÀ
+Õ1ÚÅ
+Õ6ÚÅÌ
+Õ1ÚÉ
+1ÕÚÌ
+Õ1ÚÏ
+Õ1ÚÕ
+Õ1ÚÙ
+Õ1ÚØÅ
+Õ1ÚØÉ
+Õ1ÚØÀ
+Õ1ÚØÑ
+Õ1ÚÀ
+Õ1ÚÑ
+Õ1É
+Õ6ÉË
+5Õ6ÉÞ
+Õ1ËÁ
+Õ1Ë×Á
+Õ1Ë×Å
+Õ1Ë×É
+Õ1Ë×Ï
+Õ1Ë×Õ
+Õ1Ë×Ù
+Õ1ËÅ
+Õ1ËÉ
+Õ1ËÌÁ
+Õ1ËÌÅ
+Õ1ËÌÉ
+Õ1ËÌÏ
+Õ1ËÌÕ
+Õ1ËÌÙ
+ÕË1Î
+Õ1ËÏ
+ÕËÏÓ6
+Õ1ËÒÁ
+Õ1ËÒÅ
+Õ1ËÒÉ
+Õ1ËÒÏ
+Õ1ËÒÕ
+Õ1ËÒÙ
+Õ1ËÕ
+Õ1ËÙ
+Õ1ËØÅ
+Õ1ËØÉ
+Õ1ËØÀ
+Õ1ËØÑ
+Õ1ËÀ
+Õ1ËÑ
+Õ1ÌÁ
+2Õ5ÌÅ
+ÕÌÅ2Ð
+Õ1ÌÉ
+Õ1ÌÏ
+Õ1ÌÕ
+Õ1ÌÙ
+ÕÌØ1Ä
+Õ1ÌØÅ
+Õ1ÌØÉ
+Õ1ÌØÀ
+Õ1ÌØÑ
+Õ1ÌÀ
+Õ1ÌÑ
+Õ5ÍÁ
+Õ1ÍÅ
+Õ1ÍÉ
+Õ6ÍÉÅ
+1Õ2ÍÌ
+Õ1ÍÌÁ
+Õ1ÍÌÅ
+Õ1ÍÌÉ
+Õ1ÍÌÏ
+Õ1ÍÌÕ
+Õ1ÍÌÙ
+ÕÍ1ÎÏÇ
+Õ1ÍÏ
+Õ1ÍÒÁ
+Õ1ÍÒÅ
+Õ1ÍÒÉ
+Õ1ÍÒÏ
+Õ1ÍÒÕ
+Õ1ÍÒÙ
+Õ1ÍÕ
+Õ1ÍÙ
+5Õ6ÍÙÛ
+Õ1ÍØÅ
+Õ1ÍØÉ
+Õ1ÍØÀ
+Õ1ÍØÑ
+Õ1ÍÀ
+Õ1ÍÑ
+Õ1ÎÁ
+Õ1ÎÅ
+Õ1ÎÉ
+Õ1ÎÏ
+Õ1ÎÒÁ
+Õ1ÎÒÅ
+Õ1ÎÒÉ
+Õ1ÎÒÏ
+Õ1ÎÒÕ
+Õ1ÎÒÙ
+Õ1ÎÕ
+Õ1ÎÙ
+Õ4ÎÙ×
+Õ1ÎØÅ
+Õ1ÎØÉ
+Õ1ÎØÀ
+Õ1ÎØÑ
+Õ1ÎÀ
+Õ1ÎÑ
+Õ1Ï
+ÕÏ6ËÏ
+ÕÏ2Ó
+1Õ2ÏÔ
+Õ1ÐÁ
+Õ1ÐÅ
+Õ1ÐÉ
+Õ1ÐÌÁ
+Õ1ÐÌÅ
+Õ1ÐÌÉ
+Õ1ÐÌÏ
+Õ1ÐÌÕ
+Õ1ÐÌÙ
+Õ1ÐÏ
+Õ1ÐÒÁ
+Õ1ÐÒÅ
+Õ1ÐÒÉ
+Õ1ÐÒÏ
+Õ1ÐÒÕ
+Õ1ÐÒÙ
+Õ1ÐÔÁ
+Õ1ÐÔÅ
+Õ1ÐÔÉ
+Õ1ÐÔÏ
+Õ1ÐÔÕ
+Õ1ÐÔÙ
+Õ1ÐÕ
+Õ1ÐÙ
+Õ1ÐØÅ
+Õ1ÐØÉ
+Õ1ÐØÀ
+Õ1ÐØÑ
+Õ1ÐÀ
+Õ1ÐÑ
+Õ1ÒÁ
+ÕÒ5ÁÌÀ
+ÕÒ1×
+Õ1ÒÅ
+Õ5ÒÉ
+Õ1ÒÏ
+Õ1ÒÕ
+ÕÒÕ5Ç
+Õ1ÒÙ
+Õ1ÒØÅ
+Õ1ÒØÉ
+Õ1ÒØÀ
+Õ1ÒØÑ
+Õ1ÒÀ
+Õ1ÒÑ
+Õ1ÓÁ
+ÕÓ6Â
+Õ1Ó×Á
+Õ1Ó×Å
+Õ1Ó×É
+Õ1Ó×Ï
+Õ1Ó×Õ
+Õ1Ó×Ù
+ÕÓ1Ä
+Õ1ÓÅ
+Õ1ÓÉ
+ÕÓ1ËÁ
+Õ1ÓË×Á
+Õ1ÓË×Å
+Õ1ÓË×É
+Õ1ÓË×Ï
+Õ1ÓË×Õ
+Õ1ÓË×Ù
+ÕÓ5ËÉ
+ÕÓ5ËÏ×
+ÕÓ1ËÏÍ
+Õ1ÓËÒÁ
+Õ1ÓËÒÅ
+Õ1ÓËÒÉ
+Õ1ÓËÒÏ
+Õ1ÓËÒÕ
+Õ1ÓËÒÙ
+ÕÓ5ËÕ.
+Õ1ÓÍ
+Õ5ÓÏ
+ÕÓ2ÐÏ
+Õ1ÓÒÁ
+Õ1ÓÒÅ
+Õ1ÓÒÉ
+Õ1ÓÒÏ
+Õ1ÓÒÕ
+Õ1ÓÒÙ
+ÕÓ2ÓÍ
+Õ1ÓÔÁ
+Õ2ÓÔ1×
+Õ1ÓÔ×Á
+Õ1ÓÔ×Å
+Õ1ÓÔ×É
+Õ1ÓÔ×Ï
+Õ1ÓÔ×Õ
+Õ1ÓÔ×Ù
+Õ1ÓÔ×ØÅ
+Õ1ÓÔ×ØÉ
+Õ1ÓÔ×ØÀ
+Õ1ÓÔ×ØÑ
+Õ1ÓÔ×À
+Õ1ÓÔ×Ñ
+Õ1ÓÔÅ
+Õ1ÓÔÉ
+Õ1ÓÔÏ
+Õ1ÓÔÒÁ
+Õ1ÓÔÒÅ
+Õ1ÓÔÒÉ
+Õ1ÓÔÒÏ
+Õ1ÓÔÒÕ
+Õ1ÓÔÒÙ
+Õ1ÓÔÒØÅ
+Õ1ÓÔÒØÉ
+Õ1ÓÔÒØÀ
+Õ1ÓÔÒØÑ
+Õ1ÓÔÒÀ
+Õ1ÓÔÒÑ
+Õ1ÓÔÕ
+Õ1ÓÔÙ
+Õ1ÓÔØÅ
+Õ1ÓÔØÉ
+Õ1ÓÔØÀ
+Õ1ÓÔØÑ
+Õ1ÓÔÀ
+Õ1ÓÔÑ
+Õ1ÓÕ
+Õ1ÓÆ
+Õ1ÓÙ
+Õ1ÓØÅ
+Õ1ÓØÉ
+Õ1ÓØÀ
+Õ1ÓØÑ
+Õ1ÓÀ
+Õ1ÓÑ
+Õ1ÔÁ
+Õ1Ô×Á
+Õ1Ô×Å
+Õ1Ô×É
+Õ1Ô×Ï
+Õ1Ô×Õ
+Õ1Ô×Ù
+Õ1ÔÅ
+Õ1ÔÉ
+Õ1ÔÌ
+ÕÔ5ÌÁ
+Õ1ÔÏ
+Õ1ÔÒÁ
+Õ1ÔÒÅ
+Õ1ÔÒÉ
+Õ1Ô6ÒÏ
+Õ1ÔÒÕ
+Õ1ÔÒÙ
+Õ5ÔÒÑ
+Õ1ÔÕ
+Õ1ÔÙ
+Õ1ÔØÅ
+Õ1ÔØÉ
+ÕÔØ6Í
+Õ1ÔØÀ
+Õ1ÔØÑ
+Õ1ÔÀ
+Õ1ÔÑ
+Õ1Õ2
+ÕÕÍ5
+2ÕÆ
+Õ1ÆÁ
+Õ1ÆÅ
+Õ1ÆÉ
+Õ1ÆÌÁ
+Õ1ÆÌÅ
+Õ1ÆÌÉ
+Õ1ÆÌÏ
+Õ1ÆÌÕ
+Õ1ÆÌÙ
+Õ1ÆÏ
+Õ1ÆÒÁ
+Õ1ÆÒÅ
+Õ1ÆÒÉ
+Õ1ÆÒÏ
+Õ1ÆÒÕ
+Õ1ÆÒÙ
+Õ1ÆÕ
+Õ1ÆØÅ
+Õ1ÆØÉ
+Õ1ÆØÀ
+Õ1ÆØÑ
+Õ1ÆÀ
+Õ1ÆÑ
+Õ1ÈÁ
+Õ2È×
+Õ1ÈÄÁ
+Õ1ÈÄÅ
+Õ1ÈÄÉ
+Õ1ÈÄÏ
+Õ1ÈÄÕ
+Õ1ÈÄÙ
+Õ1ÈÅ
+Õ1ÈÉ
+ÕÈ1Ì
+ÕÈ1Í
+Õ1ÈÏ
+Õ2È1Ò
+Õ1ÈÕ
+ÕÈÕ2Ì
+Õ1ÈÙ
+Õ1ÈØÅ
+Õ1ÈØÉ
+Õ1ÈØÀ
+Õ1ÈØÑ
+Õ1ÈÀ
+Õ1ÈÑ
+Õ1ÃÁ
+Õ1ÃÅ
+Õ1ÃÉ
+Õ1ÃÏ
+Õ1ÃÕ
+Õ1ÃÙ
+Õ1ÃØÅ
+Õ1ÃØÉ
+Õ1ÃØÀ
+Õ1ÃØÑ
+Õ1ÞÁ
+Õ1ÞÅ
+Õ1ÞÉ
+Õ5ÞÌ
+Õ1ÞÕ
+Õ1ÞØÅ
+Õ1ÞØÉ
+Õ1ÞØÀ
+Õ1ÞØÑ
+Õ1ÛÁ
+Õ1Û×Á
+Õ1Û×Å
+Õ1Û×É
+Õ1Û×Ï
+Õ1Û×Õ
+Õ1Û×Ù
+Õ1ÛÅ
+Õ1ÛÉ
+Õ1ÛÌÁ
+Õ1ÛÌÅ
+Õ1ÛÌÉ
+Õ1ÛÌÏ
+Õ1ÛÌÕ
+Õ1ÛÌÙ
+Õ1ÛÏ
+Õ1ÛÐ
+Õ1ÛÒÁ
+Õ1ÛÒÅ
+Õ1ÛÒÉ
+Õ1ÛÒÏ
+Õ1ÛÒÕ
+Õ1ÛÒÙ
+Õ5ÛÔ
+Õ1ÛÕ
+Õ1ÛØÅ
+Õ1ÛØÉ
+Õ1ÛØÀ
+Õ1ÛØÑ
+Õ1ÝÁ
+Õ1ÝÅ
+Õ1ÝÉ
+Õ1ÝÏ
+Õ1ÝÕ
+Õ1ÝØÅ
+Õ1ÝØÉ
+Õ1ÝØÀ
+Õ1ÝØÑ
+Õ1Ù
+Õ1Ü
+ÕÜ5ÌÁ
+ÕÜ5ÌÅ
+Õ2ÜÌÌ
+6ÕÜÎ
+ÕÜ1ÎØ
+Õ5ÜÒ
+ÕÜ1Ô
+Õ1À
+Õ1Ñ
+ÕÑ2Ú
+1ÆÁ
+ÆÁÇ1Î
+ÆÁÒ5×
+2Æ1×
+Æ1Ç
+ÆÅ5Ä
+ÆÅÍ5Î
+ÆÅÎÉ6
+ÆÅ2Ó1Ë
+1ÆÉ
+ÆÉ1Ä
+ÆÉ6Å
+ÆÉ6ÎÉÎ
+ÆÉ3Ï
+ÆÉ1Ó2Ë
+Æ1Ë
+1ÆÌ
+Æ1Í
+2Æ1Î
+1ÆÏ
+2Æ1Ï2ÂÒ
+ÆÏ5Å
+2Æ1ÏÒÇ
+Æ1Ð
+ÆÒ6
+Æ6ÒÅ
+ÆÒÅ6Ó5
+ÆÒÉ6Ó
+2Æ1Ó
+Æ1Ô
+Æ6Ô5×
+1ÆÔÏÎÇ
+Æ2Ô1Ò
+5ÆÕ
+ÆÕ5Ä
+Æ6ÕÚ
+6ÆÕÏ
+Æ1Æ
+Æ1Û
+1ÆÙ
+6ÆØ.
+1ÈÁ
+ÈÁÂ2
+2È1Á2Ä
+È1Á2ÔÏ
+È1Â6
+1È×
+6È×.
+2È1×Å
+2È1Ç
+2È1Ä
+È6Å
+ÈÅ2Ï
+È1Ú
+1ÈÉ
+ÈÉÅ2
+È1ÉÚÌ
+ÈÉ2ÍÌ
+È1Ë
+È1ÌÁ.
+È1ÌÉ
+È1ÌÏ.
+È1ÌÕ
+È1ÌÙ
+È5ÌÀ
+È1ÌÑ
+È1ÍÁ
+È5ÍÅÔ
+È1ÍÉ
+È1Î
+2È1Ï2Ë
+ÈÏ2ÐÅ
+3ÈÏÒ
+ÈÏÒ5×
+È1ÏÓÎ
+ÈÏ5Ô6Ì
+È1Ð
+1ÈÒ
+2È1Ó
+ÈÓ6Ð
+ÈÓ2È
+È1Ô
+È2ÔË
+1ÈÕ.
+2È1Õ2Ç
+ÈÕ2Å
+È1ÕÌ
+È1Õ2Ò
+ÈÕ5ÒÁ
+2È1Õ2Þ
+1ÈÕÑ
+È1Æ6
+È1È
+È1Ã
+6È1Þ
+È1Û
+5ÈÙ
+È1Ü
+È6ÜÃ
+1ÃÁ.
+1ÃÁÍ
+Ã1Â
+1Ã×
+2Ã1Ç
+Ã1Ä
+1ÃÅ
+ÃÅÊ6Ô5
+6ÃÅÎÎÉ
+2ÃÚÁ
+1ÃÚÑ
+1ÃÉ
+2Ã1Ë
+2Ã1Ì
+2Ã1Í
+Ã1Î
+1ÃÏ
+Ã1Ï2Â
+2Ã1Ï2Ä
+2Ã1ÏÔ
+Ã1Ð
+Ã1Ò
+ÃÒÅ6Ó5
+6Ã1Ó
+Ã1Ô
+6ÃÕÏ
+Ã1Ã
+Ã5Þ
+6ÃÛ
+1ÃÙ
+5ÞÁÊ
+5ÞÁÎ
+ÞÁÒ3Ô
+ÞÁÓÔ1Ì
+ÞÁ5ÔÌ
+5ÞÁÔÙ
+Þ1×
+Þ5Ç
+1ÞÅÌ
+ÞÅÈ1Ì
+1ÞÖ
+1ÞÉ×
+3ÞÉÊ
+1ÞÉË
+ÞÉ6ÑÈ
+6Þ1Ë
+Þ1ÌÁ
+6Þ5ÌÅÇ
+6Þ5ÌÅÖ
+Þ1ÌÉ
+Þ1Í
+2ÞÍÁ
+Þ6ÍÏË
+Þ1Î
+1ÞÏ
+Þ1Ð
+Þ1Ó
+1ÞÔ
+Þ1ÔÅÌ
+2ÞÔÍ
+ÞÕÄ5Ì
+1Þ2È6
+Þ1Þ
+Þ1Û
+5ÞÑ
+ÛÁÇ1Î
+6Û1Â
+Û5×É
+Û5×Ø
+Û5Ç
+6Û5Ä
+ÛÅ5×Ò
+ÛÅË1
+ÛÅËÓ2
+ÛÅÏ2
+ÛÅ2Ð1Ô
+1ÛÉ
+2ÛÉÂ
+Û1Ë
+Û2ËÉ×
+ÛË5Î
+1Û2ËÏÌ
+1ÛÌÀ
+Û1ÌÑ
+Û1Í
+Û1Î
+Û5ÎÉ
+1ÛÐÅ
+1ÛÐÉÌ
+Û2ÐÒ
+Û1Ó
+1ÛÔÅ
+1ÛÔÒ
+1ÛÔÕ
+1ÛÔÙ
+2Û1Æ
+Û1Ã
+Û1Þ
+Û1Û
+5ÛÙ
+6ÛØ.
+ÛØÑ2
+Û5Ü6
+1ÛÀ
+ÝÅ1Ó
+1ÝÉ
+2Ý1Î
+Ý1Ó
+Ý1Ý
+5ÝÑ
+ß1
+ßÅ2
+ß2ÅÌ
+ßÅÍ5Î
+ß6Ó
+ß6Ý
+ßÀ2
+ßÑ2
+Ù1Á
+Ù1ÂÁ
+Ù1ÂÅ
+Ù1ÂÉ
+Ù1ÂÌÁ
+Ù1ÂÌÅ
+Ù1ÂÌÉ
+Ù1ÂÌÏ
+Ù1ÂÌÕ
+Ù1ÂÌÙ
+Ù1ÂÏ
+Ù1ÂÒÁ
+Ù1ÂÒÅ
+Ù1ÂÒÉ
+Ù1ÂÒÏ
+Ù1ÂÒÕ
+Ù1ÂÒÙ
+Ù1ÂÕ
+Ù1ÂÙ
+Ù1ÂØÅ
+Ù1ÂØÉ
+Ù1ÂØÀ
+Ù1ÂØÑ
+Ù1ÂÀ
+Ù1ÂÑ
+Ù1×Á
+Ù1×Å
+Ù1×É
+Ù1×ÌÁ
+Ù1×ÌÅ
+Ù1×ÌÉ
+Ù1×ÌÏ
+Ù1×ÌÕ
+Ù1×ÌÙ
+Ù1×Ï
+Ù6×5Ð
+Ù1×ÒÁ
+Ù1×ÒÅ
+Ù1×ÒÉ
+Ù1×ÒÏ
+Ù1×ÒÕ
+Ù1×ÒÙ
+Ù1×Õ
+Ù1×Ù
+Ù1×ØÅ
+Ù1×ØÉ
+Ù1×ØÀ
+Ù1×ØÑ
+Ù1×À
+Ù1×Ñ
+Ù1Ç
+Ù1ÇÁ
+Ù1ÇÅ
+Ù1ÇÉ
+Ù1ÇÌÁ
+Ù1ÇÌÅ
+Ù1ÇÌÉ
+Ù1ÇÌÏ
+Ù1ÇÌÕ
+Ù1ÇÌÙ
+Ù1ÇÏ
+Ù1ÇÒÁ
+Ù1ÇÒÅ
+Ù1ÇÒÉ
+Ù1ÇÒÏ
+Ù1ÇÒÕ
+Ù1ÇÒÙ
+Ù1ÇÕ
+Ù1ÇÙ
+Ù1ÇØÅ
+Ù1ÇØÉ
+Ù1ÇØÀ
+Ù1ÇØÑ
+Ù1ÇÀ
+Ù1ÇÑ
+Ù1ÄÁ
+Ù1Ä×Á
+Ù1Ä×Å
+Ù1Ä×É
+Ù1Ä×Ï
+Ù1Ä×Õ
+Ù1Ä×Ù
+Ù1ÄÅ
+Ù1ÄÉ
+Ù1ÄÌÁ
+Ù1ÄÌÅ
+Ù1ÄÌÉ
+Ù1ÄÌÏ
+Ù1ÄÌÕ
+Ù1ÄÌÙ
+Ù1ÄÏ
+Ù5ÄÒ
+Ù1ÄÒÁ
+Ù1ÄÒÅ
+Ù1ÄÒÉ
+Ù1ÄÒÏ
+Ù1ÄÒÕ
+Ù1ÄÒÙ
+Ù1ÄÕ
+Ù1ÄÙ
+Ù1ÄØÅ
+Ù1ÄØÉ
+Ù1ÄØÀ
+Ù1ÄØÑ
+Ù1ÄÀ
+Ù1ÄÑ
+Ù1Å2
+Ù1ÖÁ
+Ù1ÖÅ
+Ù1ÖÖ
+Ù1ÖÉ
+Ù1ÖÍ
+Ù1ÖÏ
+Ù1ÖÒ
+Ù1ÖÕ
+Ù1ÖØÅ
+Ù1ÖØÉ
+Ù1ÖØÀ
+Ù1ÖØÑ
+Ù1ÚÁ
+Ù1Ú×
+Ù1ÚÄ
+Ù1ÚÅ
+Ù1ÚÉ
+Ù1ÚÏ
+Ù1ÚÒ
+Ù1ÚÕ
+Ù1ÚÙ
+Ù1ÚØÅ
+Ù1ÚØÉ
+Ù1ÚØÀ
+Ù1ÚØÑ
+Ù1ÚÀ
+Ù1ÚÑ
+Ù1É2
+Ù1ËÁ
+Ù1Ë×Á
+Ù1Ë×Å
+Ù1Ë×É
+Ù1Ë×Ï
+Ù1Ë×Õ
+Ù1Ë×Ù
+Ù1ËÅ
+Ù1ËÉ
+Ù1ËÌÁ
+Ù1ËÌÅ
+Ù1ËÌÉ
+Ù1ËÌÏ
+Ù1ËÌÕ
+Ù1ËÌÙ
+ÙË1Î
+Ù1ËÏ
+Ù1ËÒÁ
+Ù1ËÒÅ
+Ù1ËÒÉ
+Ù1ËÒÏ
+Ù1ËÒÕ
+Ù1ËÒÙ
+Ù1ËÕ
+Ù1ËÙ
+Ù1ËØÅ
+Ù1ËØÉ
+Ù1ËØÀ
+Ù1ËØÑ
+Ù1ËÀ
+Ù1ËÑ
+Ù1ÌÁ
+Ù1ÌÅ3
+Ù1ÌÉ
+Ù1ÌÏ
+Ù1ÌÕ
+Ù1ÌÙ
+Ù1ÌØÅ
+Ù1ÌØÉ
+Ù1ÌØÀ
+Ù1ÌØÑ
+Ù1ÌÀ
+Ù1ÌÑ
+Ù1ÍÁ
+Ù1ÍÅ
+Ù1ÍÉ
+Ù1ÍÌÁ
+Ù1ÍÌÅ
+Ù1ÍÌÉ
+Ù1ÍÌÏ
+Ù1ÍÌÕ
+Ù1ÍÌÙ
+Ù1ÍÏ
+Ù1ÍÒÁ
+Ù1ÍÒÅ
+Ù1ÍÒÉ
+Ù1ÍÒÏ
+Ù1ÍÒÕ
+Ù1ÍÒÙ
+Ù1ÍÕ
+ÙÍ1Þ
+Ù1ÍÙ6
+ÙÍÙÛ5
+Ù1ÍØÅ
+Ù1ÍØÉ
+Ù1ÍØÀ
+Ù1ÍØÑ
+Ù1ÍÀ
+Ù1ÍÑ
+Ù1ÎÁ
+Ù1ÎÅ
+Ù1ÎÉ
+Ù1ÎÏ
+Ù1ÎÒÁ
+Ù1ÎÒÅ
+Ù1ÎÒÉ
+Ù1ÎÒÏ
+Ù1ÎÒÕ
+Ù1ÎÒÙ
+Ù1ÎÕ
+Ù1ÎÙ
+Ù1ÎØÅ
+Ù1ÎØÉ
+Ù1ÎØÀ
+Ù1ÎØÑ
+Ù1ÎÀ
+Ù1ÎÑ
+Ù1Ï
+Ù1ÐÁ
+Ù1ÐÅ
+Ù1ÐÉ
+Ù1ÐÌÁ
+Ù1ÐÌÅ
+Ù1ÐÌÉ
+Ù1ÐÌÏ
+Ù1ÐÌÕ
+Ù1ÐÌÙ
+Ù1ÐÏ
+ÙÐÏÌ1Ú2Ì
+Ù1ÐÒÁ
+Ù1ÐÒÅ
+Ù1ÐÒÉ
+Ù1ÐÒÏ
+Ù1ÐÒÕ
+Ù1ÐÒÙ
+Ù1ÐÔÁ
+Ù1ÐÔÅ
+Ù1ÐÔÉ
+Ù1ÐÔÏ
+Ù1ÐÔÕ
+Ù1ÐÔÙ
+Ù1ÐÕ
+Ù1ÐÙ
+Ù1ÐØÅ
+Ù1ÐØÉ
+Ù1ÐØÀ
+Ù1ÐØÑ
+Ù1ÐÀ
+Ù1ÐÑ
+Ù1ÒÁ
+Ù1Ò×
+Ù1ÒÅ
+ÙÒÅ2È5
+Ù1ÒÉ
+Ù1ÒÏ
+Ù1ÒÕ
+Ù1ÒÙ
+Ù1ÒØÅ
+Ù1ÒØÉ
+Ù1ÒØÀ
+Ù1ÒØÑ
+Ù1ÒÀ
+Ù1ÒÑ
+Ù1ÓÁ
+Ù1Ó×Á
+Ù1Ó×Å
+Ù1Ó×É
+Ù1Ó×Ï
+Ù1Ó×Õ
+Ù1Ó×Ù
+Ù1ÓÅ
+Ù1ÓÉ
+Ù1ÓË×Á
+Ù1ÓË×Å
+Ù1ÓË×É
+Ù1ÓË×Ï
+Ù1ÓË×Õ
+Ù1ÓË×Ù
+ÙÓ5ËÉ
+Ù1ÓËÒÁ
+Ù1ÓËÒÅ
+Ù1ÓËÒÉ
+Ù1ÓËÒÏ
+Ù1ÓËÒÕ
+Ù1ÓËÒÙ
+ÙÓ5ËÕ
+Ù5ÓÍ
+Ù1ÓÏ
+ÙÓ6ÐÁ
+ÙÓ6ÐÌ
+Ù1ÓÒÁ
+Ù1ÓÒÅ
+Ù1ÓÒÉ
+Ù1ÓÒÏ
+Ù1ÓÒÕ
+Ù1ÓÒÙ
+Ù1ÓÔÁ
+Ù1ÓÔ×Á
+Ù1ÓÔ×Å
+Ù1ÓÔ×É
+Ù1ÓÔ×Ï
+Ù1ÓÔ×Õ
+Ù1ÓÔ×Ù
+Ù1ÓÔ×ØÅ
+Ù1ÓÔ×ØÉ
+Ù1ÓÔ×ØÀ
+Ù1ÓÔ×ØÑ
+Ù1ÓÔ×À
+Ù1ÓÔ×Ñ
+Ù1ÓÔÅ
+Ù1ÓÔÉ
+Ù1ÓÔÏ
+Ù1ÓÔÒÁ
+Ù1ÓÔÒÅ
+Ù1ÓÔÒÉ
+Ù1ÓÔÒÏ
+Ù1ÓÔÒÕ
+Ù1ÓÔÒÙ
+Ù1ÓÔÒØÅ
+Ù1ÓÔÒØÉ
+Ù1ÓÔÒØÀ
+Ù1ÓÔÒØÑ
+Ù1ÓÔÒÀ
+Ù1ÓÔÒÑ
+Ù1ÓÔÕ
+Ù1ÓÔÙ
+Ù1ÓÔØÅ
+Ù1ÓÔØÉ
+Ù1ÓÔØÀ
+Ù1ÓÔØÑ
+Ù1ÓÔÀ
+Ù1ÓÔÑ
+Ù1ÓÕ
+Ù1ÓÙ
+Ù1ÓØÅ
+Ù1ÓØÉ
+Ù1ÓØÀ
+Ù1ÓØÑ
+Ù1ÓÀ
+Ù1ÓÑ
+Ù1ÔÁ
+Ù1Ô×Á
+Ù1Ô×Å
+Ù1Ô×É
+Ù1Ô×Ï
+Ù1Ô×Õ
+Ù1Ô×Ù
+Ù1ÔÅ
+Ù1ÔÉ
+Ù1ÔÏ
+Ù5ÔÒ
+Ù1ÔÒÁ
+Ù1ÔÒÅ
+Ù1ÔÒÉ
+Ù1ÔÒÏ
+Ù1ÔÒÕ
+Ù1ÔÒÙ
+Ù1ÔÕ
+Ù1ÔÙ
+Ù1ÔØÅ
+Ù1ÔØÉ
+Ù1ÔØÀ
+Ù1ÔØÑ
+Ù1ÔÀ
+Ù1ÔÑ
+Ù1Õ2
+Ù1ÆÁ
+Ù1ÆÅ
+Ù1ÆÉ
+Ù1ÆÌÁ
+Ù1ÆÌÅ
+Ù1ÆÌÉ
+Ù1ÆÌÏ
+Ù1ÆÌÕ
+Ù1ÆÌÙ
+Ù1ÆÏ
+Ù1ÆÒÁ
+Ù1ÆÒÅ
+Ù1ÆÒÉ
+Ù1ÆÒÏ
+Ù1ÆÒÕ
+Ù1ÆÒÙ
+Ù1ÆÕ
+Ù1ÆØÅ
+Ù1ÆØÉ
+Ù1ÆØÀ
+Ù1ÆØÑ
+Ù1ÆÀ
+Ù1ÆÑ
+Ù1ÈÁ
+Ù1ÈÄÁ
+Ù1ÈÄÅ
+Ù1ÈÄÉ
+Ù1ÈÄÏ
+Ù1ÈÄÕ
+Ù1ÈÄÙ
+Ù1ÈÅ
+Ù1ÈÉ
+Ù1ÈÏ
+Ù1ÈÕ
+Ù1ÈÙ
+Ù1ÈØÅ
+Ù1ÈØÉ
+Ù1ÈØÀ
+Ù1ÈØÑ
+Ù1ÈÀ
+Ù1ÈÑ
+Ù1ÃÁ
+Ù1ÃÅ
+Ù1ÃÉ
+Ù1ÃÏ
+Ù1ÃÕ
+Ù1ÃÙ
+Ù1ÃØÅ
+Ù1ÃØÉ
+Ù1ÃØÀ
+Ù1ÃØÑ
+Ù1ÞÁ
+Ù1ÞÅ
+Ù1ÞÉ
+Ù5ÞÌ
+Ù1ÞÕ
+Ù1ÞØÅ
+Ù1ÞØÉ
+Ù1ÞØÀ
+Ù1ÞØÑ
+Ù1ÛÁ
+Ù1Û×Á
+Ù1Û×Å
+Ù1Û×É
+Ù1Û×Ï
+Ù1Û×Õ
+Ù1Û×Ù
+Ù1ÛÅ
+Ù1ÛÉ
+Ù1ÛÌÁ
+Ù1ÛÌÅ
+Ù1ÛÌÉ
+Ù1ÛÌÏ
+Ù1ÛÌÕ
+Ù1ÛÌÙ
+Ù1ÛÏ
+Ù1ÛÒÁ
+Ù1ÛÒÅ
+Ù1ÛÒÉ
+Ù1ÛÒÏ
+Ù1ÛÒÕ
+Ù1ÛÒÙ
+Ù1ÛÕ
+Ù1ÛØÅ
+Ù1ÛØÉ
+Ù1ÛØÀ
+Ù1ÛØÑ
+Ù1ÝÁ
+Ù1ÝÅ
+Ù1ÝÉ
+Ù1ÝÏ
+Ù1ÝÕ
+Ù1ÝØÅ
+Ù1ÝØÉ
+Ù1ÝØÀ
+Ù1ÝØÑ
+Ù1Ù
+Ù1Ü
+Ù1À
+Ù1Ñ2
+Ø1Â
+ØÂÉ5
+Ø1×Á
+Ø1×Å
+Ø1×É
+Ø1Ç
+Ø1ÄÅ
+Ø1ÄÖ
+Ø1ÄÉ
+Ø5ÄÏÒ
+ØÄÏ5Ó6
+Ø5ÄÒ
+Ø5ÄÕ
+Ø5ÄÑ
+Ø1Ö
+Ø1Ú
+Ø6ÚÑ.
+Ø1Ë
+ØË5×
+Ø2Ë1ÌÏ
+ØË5Î
+Ø1Ì
+Ø1Í
+Ø1Î
+Ø2ÎÕÌ
+Ø1Ð
+Ø1Ò
+Ø1Ó
+Ø2ÓÎ
+Ø2ÓÔÉ
+ØÓ1ÔÉÎ
+Ø1Ô
+Ø2Ô1×
+Ø1Æ
+Ø6Æ5ÒÁ
+Ø1È
+ØÈÏ2Ú1
+Ø1ÃÚ
+Ø1Þ
+Ø1Û
+Ø6ÛË
+Ø1Ý
+Ø6ÝÁ
+Ø2ÝÅ
+Ø6ÝÕ
+Ø1Ü
+ØÑ6×É
+Ü1Á
+Ü5×Á
+Ü6×Ô
+Ü2Ä
+2Ü1Å
+Ü5ÚÅ
+Ü5ÚÉ
+Ü1É
+2ÜÊ
+ÜË2Ú
+ÜËÓ1
+Ü5ÌÙ
+ÜÌØ5
+Ü1ÌÑ
+1ÜÍ
+Ü1Ï
+Ü6Ð
+Ü5ÒÉ
+ÜÓ1Ë
+ÜÓ5Í
+ÜÓ2ÐÁ
+ÜÓ6Ô
+Ü1Õ
+Ü6Æ
+Ü5ÃÚ
+Ü1Ù
+Ü1Ü
+Ü1À
+2Ü1Ñ
+À1Á
+À1ÂÁ
+ÀÂ2×
+À1ÂÅ
+À1ÂÉ
+À1ÂÌÁ
+À1ÂÌÅ
+À1ÂÌÉ
+À1ÂÌÏ
+À1ÂÌÕ
+À1ÂÌÙ
+À1ÂÏ
+À1ÂÒÁ
+À1ÂÒÅ
+À1ÂÒÉ
+À1ÂÒÏ
+À1ÂÒÕ
+À1ÂÒÙ
+À1ÂÕ
+À1ÂÙ
+À1ÂØÅ
+À1ÂØÉ
+À1ÂØÀ
+À1ÂØÑ
+À1ÂÀ
+À1ÂÑ
+À1×Á
+À1×Å
+À1×É
+À1×ÌÁ
+À1×ÌÅ
+À1×ÌÉ
+À1×ÌÏ
+À1×ÌÕ
+À1×ÌÙ
+À1×Ï
+À1×ÒÁ
+À1×ÒÅ
+À1×ÒÉ
+À1×ÒÏ
+À1×ÒÕ
+À1×ÒÙ
+À1×Õ
+À1×Ù
+À1×ØÅ
+À1×ØÉ
+À1×ØÀ
+À1×ØÑ
+À1×À
+À1×Ñ
+À1ÇÁ
+À1ÇÅ
+À1ÇÉ
+À1ÇÌÁ
+À1ÇÌÅ
+À1ÇÌÉ
+À1ÇÌÏ
+À1ÇÌÕ
+À1ÇÌÙ
+ÀÇ1Î
+À1ÇÏ
+À1ÇÒÁ
+À1ÇÒÅ
+À1ÇÒÉ
+À1ÇÒÏ
+À1ÇÒÕ
+À1ÇÒÙ
+À1ÇÕ
+À1ÇÙ
+À1ÇØÅ
+À1ÇØÉ
+À1ÇØÀ
+À1ÇØÑ
+À1ÇÀ
+À1ÇÑ
+À1ÄÁ
+À1Ä×Á
+À1Ä×Å
+À1Ä×É
+À1Ä×Ï
+À1Ä×Õ
+À1Ä×Ù
+À1ÄÅ
+ÀÄ1Ö
+À1ÄÉ
+À1ÄÌÁ
+À1ÄÌÅ
+À1ÄÌÉ
+À1ÄÌÏ
+À1ÄÌÕ
+À1ÄÌÙ
+À1ÄÏ
+À1ÄÒÁ
+À1ÄÒÅ
+À1ÄÒÉ
+À1ÄÒÏ
+À1ÄÒÕ
+À1ÄÒÙ
+À1ÄÕ
+À1ÄÙ
+À1ÄØÅ
+À1ÄØÉ
+À1ÄØÀ
+À1ÄØÑ
+À1ÄÀ
+À1ÄÑ
+À1Å
+À1ÖÁ
+À1ÖÅ
+À1ÖÉ
+À1ÖÏ
+À1ÖÕ
+À1ÖØÅ
+À1ÖØÉ
+À1ÖØÀ
+À1ÖØÑ
+À1ÚÁ
+À1ÚÅ
+À1ÚÉ
+À1ÚÏ
+À1ÚÕ
+À1ÚÙ
+À1ÚØÅ
+À1ÚØÉ
+À1ÚØÀ
+À1ÚØÑ
+À1ÚÀ
+À1ÚÑ
+À1É
+ÀÊ2Ä1
+ÀÊÄÏ6
+À1ËÁ
+À1Ë×Á
+À1Ë×Å
+À1Ë×É
+À1Ë×Ï
+À1Ë×Õ
+À1Ë×Ù
+À1ËÅ
+À1ËÉ
+À1ËÌÁ
+À1ËÌÅ
+À1ËÌÉ
+À1ËÌÏ
+À1ËÌÕ
+À1ËÌÙ
+ÀË1Î
+À1ËÏ
+À1ËÒÁ
+À1ËÒÅ
+À1ËÒÉ
+À1ËÒÏ
+À1ËÒÕ
+À1ËÒÙ
+À1ËÕ
+À1ËÙ
+À1ËØÅ
+À1ËØÉ
+À1ËØÀ
+À1ËØÑ
+À1ËÀ
+À1ËÑ
+À1ÌÁ
+À1ÌÅ
+À1ÌÉ
+À1ÌÏ
+À1ÌÕ
+À1ÌÙ
+À1ÌØÅ
+À1ÌØÉ
+À1ÌØÀ
+À1ÌØÑ
+À1ÌÀ
+À1ÌÑ
+2ÀÍ
+À1ÍÁ
+À1ÍÅ
+À1ÍÉ
+ÀÍÉÎÉ5
+À1ÍÌÁ
+À1ÍÌÅ
+À1ÍÌÉ
+À1ÍÌÏ
+À1ÍÌÕ
+À1ÍÌÙ
+À1ÍÏ
+À1ÍÒÁ
+À1ÍÒÅ
+À1ÍÒÉ
+À1ÍÒÏ
+À1ÍÒÕ
+À1ÍÒÙ
+À1ÍÕ
+À1ÍÙ
+À1ÍØÅ
+À1ÍØÉ
+À1ÍØÀ
+À1ÍØÑ
+À1ÍÀ
+À1ÍÑ
+À1ÎÁ
+À1ÎÅ
+À1ÎÉ
+À1ÎÏ
+À1ÎÒÁ
+À1ÎÒÅ
+À1ÎÒÉ
+À1ÎÒÏ
+À1ÎÒÕ
+À1ÎÒÙ
+À1ÎÕ
+À1ÎÙ
+À1ÎØÅ
+À1ÎØÉ
+À1ÎØÀ
+À1ÎØÑ
+À1ÎÀ
+À1ÎÑ
+À1Ï
+À1ÐÁ
+À1ÐÅ
+À1ÐÉ
+À1ÐÌÁ
+À1ÐÌÅ
+À1ÐÌÉ
+À1ÐÌÏ
+À1ÐÌÕ
+À1ÐÌÙ
+À1ÐÏ
+À1ÐÒÁ
+À1ÐÒÅ
+À1ÐÒÉ
+À1ÐÒÏ
+À1ÐÒÕ
+À1ÐÒÙ
+À6Ð5Ô
+À1ÐÔÁ
+À1ÐÔÅ
+À1ÐÔÉ
+À1ÐÔÏ
+À1ÐÔÕ
+À1ÐÔÙ
+À1ÐÕ
+À1ÐÙ
+À1ÐØÅ
+À1ÐØÉ
+À1ÐØÀ
+À1ÐØÑ
+À1ÐÀ
+À1ÐÑ
+À1ÒÁ
+À1ÒÅ
+À1ÒÉ
+À1ÒÏ
+À1ÒÕ
+À1ÒÙ
+À1ÒØÅ
+À1ÒØÉ
+À1ÒØÀ
+À1ÒØÑ
+À1ÒÀ
+À1ÒÑ
+À1ÓÁ
+À1Ó×Á
+À1Ó×Å
+À1Ó×É
+À1Ó×Ï
+À1Ó×Õ
+À1Ó×Ù
+À1ÓÅ
+À1ÓÉ
+ÀÓ5Ë
+À1ÓË×Á
+À1ÓË×Å
+À1ÓË×É
+À1ÓË×Ï
+À1ÓË×Õ
+À1ÓË×Ù
+À1ÓËÒÁ
+À1ÓËÒÅ
+À1ÓËÒÉ
+À1ÓËÒÏ
+À1ÓËÒÕ
+À1ÓËÒÙ
+À1ÓÏ
+À1ÓÒÁ
+À1ÓÒÅ
+À1ÓÒÉ
+À1ÓÒÏ
+À1ÓÒÕ
+À1ÓÒÙ
+À1ÓÔÁ
+À1ÓÔ×Á
+À1ÓÔ×Å
+À1ÓÔ×É
+À1ÓÔ×Ï
+À1ÓÔ×Õ
+À1ÓÔ×Ù
+À1ÓÔ×ØÅ
+À1ÓÔ×ØÉ
+À1ÓÔ×ØÀ
+À1ÓÔ×ØÑ
+À1ÓÔ×À
+À1ÓÔ×Ñ
+À1ÓÔÅ
+À1ÓÔÉ
+À1ÓÔÏ
+À1ÓÔÒÁ
+À1ÓÔÒÅ
+À1ÓÔÒÉ
+À1ÓÔÒÏ
+À1ÓÔÒÕ
+À1ÓÔÒÙ
+À1ÓÔÒØÅ
+À1ÓÔÒØÉ
+À1ÓÔÒØÀ
+À1ÓÔÒØÑ
+À1ÓÔÒÀ
+À1ÓÔÒÑ
+À1ÓÔÕ
+À1ÓÔÙ
+À1ÓÔØÅ
+À1ÓÔØÉ
+À1ÓÔØÀ
+À1ÓÔØÑ
+À1ÓÔÀ
+À1ÓÔÑ
+À1ÓÕ
+À1ÓÙ
+À1ÓØÅ
+À1ÓØÉ
+À1ÓØÀ
+À1ÓØÑ
+À1ÓÀ
+À1ÓÑ
+À1ÔÁ
+À1Ô×Á
+À1Ô×Å
+À1Ô×É
+À1Ô×Ï
+À1Ô×Õ
+À1Ô×Ù
+À1ÔÅ
+À1ÔÉ
+À1ÔÏ
+À1ÔÒÁ
+À1ÔÒÅ
+À1ÔÒÉ
+À1ÔÒÏ
+À1ÔÒÕ
+À1ÔÒÙ
+À1ÔÕ
+À1ÔÙ
+À1ÔØÅ
+À1ÔØÉ
+À1ÔØÀ
+À1ÔØÑ
+À1ÔÀ
+À1ÔÑ
+À1Õ
+À1ÆÁ
+À1ÆÅ
+À1ÆÉ
+À1ÆÌÁ
+À1ÆÌÅ
+À1ÆÌÉ
+À1ÆÌÏ
+À1ÆÌÕ
+À1ÆÌÙ
+À1ÆÏ
+À1ÆÒÁ
+À1ÆÒÅ
+À1ÆÒÉ
+À1ÆÒÏ
+À1ÆÒÕ
+À1ÆÒÙ
+À1ÆÕ
+À1ÆØÅ
+À1ÆØÉ
+À1ÆØÀ
+À1ÆØÑ
+À1ÆÀ
+À1ÆÑ
+À1ÈÁ
+À1ÈÄÁ
+À1ÈÄÅ
+À1ÈÄÉ
+À1ÈÄÏ
+À1ÈÄÕ
+À1ÈÄÙ
+À1ÈÅ
+À1ÈÉ
+À1ÈÏ
+À1ÈÕ
+À1ÈÙ
+À1ÈØÅ
+À1ÈØÉ
+À1ÈØÀ
+À1ÈØÑ
+À1ÈÀ
+À1ÈÑ
+À1ÃÁ
+À1ÃÅ
+À1ÃÉ
+À1ÃÏ
+À1ÃÕ
+À1ÃÙ
+À1ÃØÅ
+À1ÃØÉ
+À1ÃØÀ
+À1ÃØÑ
+À1ÞÁ
+À1ÞÅ
+À1ÞÉ
+À1ÞÕ
+À1ÞØÅ
+À1ÞØÉ
+À1ÞØÀ
+À1ÞØÑ
+À1ÛÁ
+À1Û×Á
+À1Û×Å
+À1Û×É
+À1Û×Ï
+À1Û×Õ
+À1Û×Ù
+À1ÛÅ
+À1ÛÉ
+À1ÛÌÁ
+À1ÛÌÅ
+À1ÛÌÉ
+À1ÛÌÏ
+À1ÛÌÕ
+À1ÛÌÙ
+À1ÛÏ
+À1ÛÒÁ
+À1ÛÒÅ
+À1ÛÒÉ
+À1ÛÒÏ
+À1ÛÒÕ
+À1ÛÒÙ
+À1ÛÕ
+À1ÛØÅ
+À1ÛØÉ
+À1ÛØÀ
+À1ÛØÑ
+À5Ý
+À1ÝÁ
+À1ÝÅ
+À1ÝÉ
+À1ÝÏ
+À1ÝÕ
+À1ÝØÅ
+À1ÝØÉ
+À1ÝØÀ
+À1ÝØÑ
+À1Ù
+À1Ü
+À1À
+À1Ñ
+Ñ1Á
+Ñ1ÂÁ
+Ñ1ÂÅ
+Ñ1ÂÉ
+Ñ1ÂÌÁ
+Ñ1ÂÌÅ
+Ñ1ÂÌÉ
+Ñ1ÂÌÏ
+Ñ1ÂÌÕ
+Ñ1ÂÌÙ
+Ñ1ÂÏ
+Ñ1ÂÒÁ
+Ñ1ÂÒÅ
+Ñ1ÂÒÉ
+Ñ1ÂÒÏ
+Ñ1ÂÒÕ
+Ñ1ÂÒÙ
+Ñ1ÂÕ
+Ñ1ÂÙ
+Ñ1ÂØÅ
+Ñ1ÂØÉ
+Ñ1ÂØÀ
+Ñ1ÂØÑ
+Ñ1ÂÀ
+Ñ1ÂÑ
+Ñ1×Á
+Ñ1×Å
+5Ñ1×É
+Ñ2×Ì
+Ñ1×ÌÁ
+Ñ1×ÌÅ
+Ñ1×ÌÉ
+Ñ1×ÌÏ
+Ñ1×ÌÕ
+Ñ1×ÌÙ
+Ñ1×Ï
+Ñ1×ÒÁ
+Ñ1×ÒÅ
+Ñ1×ÒÉ
+Ñ1×ÒÏ
+Ñ1×ÒÕ
+Ñ1×ÒÙ
+Ñ1×Õ
+Ñ1×Ù
+Ñ1×ØÅ
+Ñ1×ØÉ
+Ñ1×ØÀ
+Ñ1×ØÑ
+Ñ1×À
+Ñ1×Ñ
+Ñ1ÇÁ
+Ñ1ÇÅ
+Ñ1ÇÉ
+Ñ1ÇÌÁ
+Ñ1ÇÌÅ
+Ñ1ÇÌÉ
+Ñ1ÇÌÏ
+Ñ1ÇÌÕ
+Ñ1ÇÌÙ
+ÑÇ5Î
+Ñ1ÇÏ
+Ñ1ÇÒÁ
+Ñ1ÇÒÅ
+Ñ1ÇÒÉ
+Ñ1ÇÒÏ
+Ñ1ÇÒÕ
+Ñ1ÇÒÙ
+Ñ1ÇÕ
+Ñ1ÇÙ
+Ñ1ÇØÅ
+Ñ1ÇØÉ
+Ñ1ÇØÀ
+Ñ1ÇØÑ
+Ñ1ÇÀ
+Ñ1ÇÑ
+Ñ1ÄÁ
+Ñ1Ä×Á
+Ñ1Ä×Å
+Ñ1Ä×É
+Ñ1Ä×Ï
+Ñ1Ä×Õ
+Ñ1Ä×Ù
+Ñ1ÄÅ
+Ñ1ÄÉ
+Ñ1ÄÌÁ
+Ñ1ÄÌÅ
+Ñ1ÄÌÉ
+Ñ1ÄÌÏ
+Ñ1ÄÌÕ
+Ñ1ÄÌÙ
+Ñ1ÄÏ
+Ñ1ÄÒÁ
+Ñ1ÄÒÅ
+Ñ1ÄÒÉ
+Ñ1ÄÒÏ
+Ñ1ÄÒÕ
+Ñ1ÄÒÙ
+Ñ1ÄÕ
+Ñ1ÄÙ
+Ñ1ÄØÅ
+Ñ1ÄØÉ
+Ñ1ÄØÀ
+Ñ1ÄØÑ
+Ñ1ÄÀ
+Ñ1ÄÑ
+Ñ1Å
+Ñ1ÖÁ
+Ñ1ÖÅ
+Ñ1ÖÉ
+Ñ1ÖÏ
+Ñ1ÖÕ
+Ñ1ÖØÅ
+Ñ1ÖØÉ
+Ñ1ÖØÀ
+Ñ1ÖØÑ
+Ñ1ÚÁ
+ÑÚ1×
+Ñ1ÚÅ
+Ñ1ÚÉ
+Ñ1ÚÏ
+Ñ1ÚÕ
+Ñ1ÚÙ
+Ñ1ÚØÅ
+Ñ1ÚØÉ
+Ñ1ÚØÀ
+Ñ1ÚØÑ
+Ñ1ÚÀ
+Ñ1ÚÑ
+Ñ1É
+Ñ1ËÁ
+Ñ1Ë×Á
+Ñ1Ë×Å
+Ñ1Ë×É
+Ñ1Ë×Ï
+Ñ1Ë×Õ
+Ñ1Ë×Ù
+Ñ1ËÅ
+Ñ1ËÉ
+Ñ1ËÌÁ
+Ñ1ËÌÅ
+Ñ1ËÌÉ
+Ñ1ËÌÏ
+Ñ1ËÌÕ
+Ñ1ËÌÙ
+ÑË1Î
+Ñ1ËÏ
+Ñ1ËÒÁ
+Ñ1ËÒÅ
+Ñ1ËÒÉ
+Ñ1ËÒÏ
+Ñ1ËÒÕ
+Ñ1ËÒÙ
+Ñ1ËÕ
+Ñ1ËÙ
+Ñ1ËØÅ
+Ñ1ËØÉ
+Ñ1ËØÀ
+Ñ1ËØÑ
+Ñ1ËÀ
+Ñ1ËÑ
+Ñ1ÌÁ
+Ñ1ÌÅ
+Ñ1ÌÉ
+Ñ1ÌÏ
+Ñ1ÌÕ
+Ñ1ÌÙ
+Ñ1ÌØÅ
+Ñ1ÌØÉ
+Ñ1ÌØÀ
+Ñ1ÌØÑ
+Ñ1ÌÀ
+Ñ1ÌÑ
+Ñ1ÍÁ
+Ñ1ÍÅ
+Ñ1ÍÉ
+Ñ1ÍÌÁ
+Ñ1ÍÌÅ
+Ñ1ÍÌÉ
+Ñ1ÍÌÏ
+Ñ1ÍÌÕ
+Ñ1ÍÌÙ
+Ñ1ÍÏ
+Ñ1ÍÒÁ
+Ñ1ÍÒÅ
+Ñ1ÍÒÉ
+Ñ1ÍÒÏ
+Ñ1ÍÒÕ
+Ñ1ÍÒÙ
+Ñ1ÍÕ
+Ñ1ÍÙ
+Ñ1ÍØÅ
+Ñ1ÍØÉ
+Ñ1ÍØÀ
+Ñ1ÍØÑ
+Ñ1ÍÀ
+Ñ1ÍÑ
+Ñ1ÎÁ
+Ñ1ÎÅ
+Ñ1ÎÉ
+Ñ1ÎÏ
+Ñ1ÎÒÁ
+Ñ1ÎÒÅ
+Ñ1ÎÒÉ
+Ñ1ÎÒÏ
+Ñ1ÎÒÕ
+Ñ1ÎÒÙ
+Ñ1ÎÕ
+Ñ1ÎÙ
+Ñ1ÎØÅ
+Ñ1ÎØÉ
+Ñ1ÎØÀ
+Ñ1ÎØÑ
+Ñ1ÎÀ
+Ñ1ÎÑ
+Ñ1Ï2
+Ñ1ÐÁ
+Ñ1ÐÅ
+Ñ1ÐÉ
+Ñ1ÐÌÁ
+Ñ1ÐÌÅ
+Ñ1ÐÌÉ
+Ñ1ÐÌÏ
+Ñ1ÐÌÕ
+Ñ1ÐÌÙ
+Ñ1ÐÏ
+Ñ1ÐÒÁ
+Ñ1ÐÒÅ
+Ñ1ÐÒÉ
+Ñ1ÐÒÏ
+Ñ1ÐÒÕ
+Ñ1ÐÒÙ
+Ñ1ÐÔÁ
+Ñ1ÐÔÅ
+Ñ1ÐÔÉ
+Ñ1ÐÔÏ
+Ñ1ÐÔÕ
+Ñ1ÐÔÙ
+Ñ1ÐÕ
+Ñ1ÐÙ
+Ñ1ÐØÅ
+Ñ1ÐØÉ
+Ñ1ÐØÀ
+Ñ1ÐØÑ
+Ñ1ÐÀ
+Ñ1ÐÑ
+Ñ1ÒÁ
+ÑÒ5×
+Ñ1ÒÅ
+Ñ1ÒÉ
+Ñ1ÒÏ
+Ñ1ÒÕ
+Ñ1ÒÙ
+Ñ1ÒØÅ
+Ñ1ÒØÉ
+Ñ1ÒØÀ
+Ñ1ÒØÑ
+Ñ1ÒÀ
+Ñ1ÒÑ
+Ñ1ÓÁ
+Ñ1Ó×Á
+Ñ1Ó×Å
+Ñ1Ó×É
+Ñ1Ó×Ï
+Ñ1Ó×Õ
+Ñ1Ó×Ù
+Ñ1ÓÅ
+Ñ1ÓÉ
+ÑÓ1Ë
+Ñ1ÓË×Á
+Ñ1ÓË×Å
+Ñ1ÓË×É
+Ñ1ÓË×Ï
+Ñ1ÓË×Õ
+Ñ1ÓË×Ù
+Ñ1ÓËÒÁ
+Ñ1ÓËÒÅ
+Ñ1ÓËÒÉ
+Ñ1ÓËÒÏ
+Ñ1ÓËÒÕ
+Ñ1ÓËÒÙ
+Ñ1ÓÏ
+Ñ1ÓÒÁ
+Ñ1ÓÒÅ
+Ñ1ÓÒÉ
+Ñ1ÓÒÏ
+Ñ1ÓÒÕ
+Ñ1ÓÒÙ
+ÑÓ6Ô
+Ñ1ÓÔÁ
+Ñ1ÓÔ×Á
+Ñ1ÓÔ×Å
+Ñ1ÓÔ×É
+Ñ1ÓÔ×Ï
+Ñ1ÓÔ×Õ
+Ñ1ÓÔ×Ù
+Ñ1ÓÔ×ØÅ
+Ñ1ÓÔ×ØÉ
+Ñ1ÓÔ×ØÀ
+Ñ1ÓÔ×ØÑ
+Ñ1ÓÔ×À
+Ñ1ÓÔ×Ñ
+Ñ1ÓÔÅ
+Ñ1ÓÔÉ
+Ñ1ÓÔÏ
+Ñ1ÓÔÒÁ
+Ñ1ÓÔÒÅ
+Ñ1ÓÔÒÉ
+Ñ1ÓÔÒÏ
+Ñ1ÓÔÒÕ
+Ñ1ÓÔÒÙ
+Ñ1ÓÔÒØÅ
+Ñ1ÓÔÒØÉ
+Ñ1ÓÔÒØÀ
+Ñ1ÓÔÒØÑ
+Ñ1ÓÔÒÀ
+Ñ1ÓÔÒÑ
+Ñ1ÓÔÕ
+Ñ1ÓÔÙ
+Ñ1ÓÔØÅ
+Ñ1ÓÔØÉ
+Ñ1ÓÔØÀ
+Ñ1ÓÔØÑ
+Ñ1ÓÔÀ
+Ñ1ÓÔÑ
+Ñ1ÓÕ
+Ñ1ÓÙ
+Ñ1ÓØÅ
+Ñ1ÓØÉ
+Ñ1ÓØÀ
+Ñ1ÓØÑ
+Ñ1ÓÀ
+Ñ1ÓÑ
+Ñ1ÔÁ
+Ñ1Ô×Á
+Ñ1Ô×Å
+Ñ1Ô×É
+Ñ1Ô×Ï
+Ñ1Ô×Õ
+Ñ1Ô×Ù
+Ñ1ÔÅ
+Ñ3ÔÉ
+Ñ1ÔÏ
+Ñ1ÔÒÁ
+Ñ1ÔÒÅ
+Ñ1ÔÒÉ
+Ñ1ÔÒÏ
+Ñ1ÔÒÕ
+Ñ1ÔÒÙ
+Ñ1ÔÕ
+Ñ1ÔÙ
+Ñ1ÔØÅ
+Ñ1ÔØÉ
+Ñ1ÔØÀ
+Ñ1ÔØÑ
+Ñ1ÔÀ
+Ñ1ÔÑ
+Ñ1Õ
+Ñ1ÆÁ
+Ñ1ÆÅ
+Ñ1ÆÉ
+Ñ1ÆÌÁ
+Ñ1ÆÌÅ
+Ñ1ÆÌÉ
+Ñ1ÆÌÏ
+Ñ1ÆÌÕ
+Ñ1ÆÌÙ
+Ñ1ÆÏ
+Ñ1ÆÒÁ
+Ñ1ÆÒÅ
+Ñ1ÆÒÉ
+Ñ1ÆÒÏ
+Ñ1ÆÒÕ
+Ñ1ÆÒÙ
+Ñ1ÆÕ
+Ñ1ÆØÅ
+Ñ1ÆØÉ
+Ñ1ÆØÀ
+Ñ1ÆØÑ
+Ñ1ÆÀ
+Ñ1ÆÑ
+Ñ1ÈÁ
+Ñ1ÈÄÁ
+Ñ1ÈÄÅ
+Ñ1ÈÄÉ
+Ñ1ÈÄÏ
+Ñ1ÈÄÕ
+Ñ1ÈÄÙ
+Ñ1ÈÅ
+Ñ1ÈÉ
+Ñ1ÈÏ
+Ñ1ÈÕ
+Ñ1ÈÙ
+Ñ1ÈØÅ
+Ñ1ÈØÉ
+Ñ1ÈØÀ
+Ñ1ÈØÑ
+Ñ1ÈÀ
+Ñ1ÈÑ
+Ñ1ÃÁ
+Ñ1ÃÅ
+Ñ1ÃÉ
+Ñ1ÃÏ
+Ñ1ÃÕ
+Ñ1ÃÙ
+Ñ1ÃØÅ
+Ñ1ÃØÉ
+Ñ1ÃØÀ
+Ñ1ÃØÑ
+Ñ1ÞÁ
+Ñ1ÞÅ
+Ñ1ÞÉ
+Ñ1ÞÕ
+Ñ1ÞØÅ
+Ñ1ÞØÉ
+Ñ1ÞØÀ
+Ñ1ÞØÑ
+Ñ1ÛÁ
+Ñ1Û×Á
+Ñ1Û×Å
+Ñ1Û×É
+Ñ1Û×Ï
+Ñ1Û×Õ
+Ñ1Û×Ù
+Ñ1ÛÅ
+Ñ1ÛÉ
+Ñ1ÛÌÁ
+Ñ1ÛÌÅ
+Ñ1ÛÌÉ
+Ñ1ÛÌÏ
+Ñ1ÛÌÕ
+Ñ1ÛÌÙ
+Ñ1ÛÏ
+Ñ1ÛÒÁ
+Ñ1ÛÒÅ
+Ñ1ÛÒÉ
+Ñ1ÛÒÏ
+Ñ1ÛÒÕ
+Ñ1ÛÒÙ
+Ñ1ÛÕ
+Ñ1ÛØÅ
+Ñ1ÛØÉ
+Ñ1ÛØÀ
+Ñ1ÛØÑ
+Ñ1ÝÁ
+Ñ1ÝÅ
+Ñ1ÝÉ
+Ñ1ÝÏ
+Ñ1ÝÕ
+Ñ1ÝØÅ
+Ñ1ÝØÉ
+Ñ1ÝØÀ
+Ñ1ÝØÑ
+Ñ1Ù
+Ñ1Ü
+Ñ1À
+Ñ1Ñ
diff --git a/hyph/slovenia.lh b/hyph/slovenia.lh
new file mode 100644
index 0000000..b1ca126
--- /dev/null
+++ b/hyph/slovenia.lh
@@ -0,0 +1,1124 @@
+Lout hyphenation information
+%
+%  This is a Slovenian hyphenation file created by Jeff Kingston
+%  on 8 June 1995 from a TeX file supplied by Ljupco Taseski.
+%  Apologies to the author (no author information could be found).
+%
+%  Slovenian has three accented letters, each with upper and lower
+%  case forms, which are found in the ISO-LATIN-2 character set
+%  but not in ISO-LATIN-1:
+%
+%      Character   ISO-Latin-2  ISO-Latin-2
+%                  encoding     encoding
+%                  (decimal)    (octal)
+%
+%      C caron     200          310
+%      c caron     232          350
+%      S caron     169          251
+%      s caron     185          271
+%      Z caron     174          256
+%      z caron     190          276
+%
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+èÈ
+¹©
+¾®
+
+Patterns:
+.av5r
+.di6spo
+.ek3s
+.ek5v
+.is1
+.iz1
+.obi4d
+.ob5it
+.od1
+.po4d5n
+.po4v5s
+.pre6d7n
+.se4k5s
+.si4s
+.st4
+.voz5l
+.voz5n
+.zliz6
+a1a
+a1b
+ab5ba
+ab6rod
+a1c
+ac5ci
+a1è
+a1d
+ad2l
+a6dobl
+ad6rl.
+ad6rla
+ad6rob
+ad5ur
+a1e1
+a1f
+af5ga
+af1t
+a1g
+a1h
+a4hm
+ah5mi
+ah5mo
+a1i
+ai2n1
+a1j
+a4j5ek
+a4jf
+aj5fi
+aj5fo
+aj5ha
+aj5he
+aj5im
+aj6imo
+aj3os
+aj6stb
+a5ju.
+aj3uè
+aj3ug
+aj5¾n
+a1k
+ak4s
+a4kst
+a1l
+a1m
+a4mz
+a1n
+an6dga
+an6dhi
+a4nm
+an5mi
+an5zi
+a1o
+ao2b1
+a1p
+a4ph
+a1ra
+ar6dwa
+a1re
+a1ri
+a1ro
+a1ru
+ar5xa
+ar5xo
+ar5xu
+a1s
+a4s¹
+as5¹è
+a1¹
+a1t
+a4tf
+at4i
+a1u1
+a4uf
+a2uk
+a4ul
+a1v
+av5¹i
+a4v¾
+av5¾a
+ay5to
+a1ze
+az5fo
+a4zig
+az3la
+az3le
+az4lil
+az4lit
+az4liv
+a4zob
+a4z3oè
+az5ora
+az5oro
+a4zra
+az4red
+az5vp
+a1¾
+a¾5mi
+ba6bba
+ban3è4
+ba4u
+2b1c
+2b1è
+2b1d
+be1
+be4v
+b1h
+bi1
+b1ja
+b4ja.
+b5jel
+b3jem
+b5jet
+2b1k
+b3lep
+b5leta
+b5lil
+b5lit
+b5liv
+b1m
+4bmi
+2b1n
+bo1
+bo6chm
+b5ord
+bo5vp
+b3rab
+b5ras
+b3ra¹
+b3rez
+bre4zg
+bre4zi
+bre4zr
+b5re¾e
+b3rob
+br6¾da
+2b1s
+2b1¹
+2b1t
+bu5ki
+bu5ku
+bu5kv
+bu5ry
+2b1v
+b1z
+b1¾
+2cc
+2ch.
+ch5ma
+2ck
+c1ka
+ck1o2
+c5ko.
+ckov3
+ck1s
+ck5we
+2c1n
+2c1t
+2è1b
+2è1g
+èi1
+1èj
+2è1k
+1èl
+4è3let
+è5mes
+2è1n
+4èop
+2è1p
+2è1s
+4èup
+2d1b
+2d1c
+2d1è
+2d1d
+dd6voj
+d2e
+6d5elem
+de4min
+de4mn
+de4z3i
+2d1g
+2d1h
+di5ck
+4dind
+d4i5no
+dis1
+di4skr
+di6spr
+2d1j
+2d1k
+5dlet
+d2li
+d5lit
+d5liv
+d1lo
+2d3m
+4d3nac
+4d5naè
+4d5nap
+4d3nar
+4dnas
+4d5neb
+d5niv
+4d5niz
+4d5njaè
+4d3no¾
+d2o
+4dobè
+4d5obd
+2d3o2f
+do5rd
+do5vè
+do5v4z
+2d1p
+d5raz
+d3rep
+dre6pn
+d4rev
+2d1s
+2d1¹
+2d1t
+dteks6
+d4ur
+du5ro
+du5um
+2d1v
+4d3vi
+2d1z2
+e1a
+e1b
+eb4j
+eb6liz
+e1c
+e1è
+e4èd
+eè5de
+eè5di
+eè5do
+eè3le
+eè5op
+e4èt
+eè5ti
+eè5to
+eè5tr
+eè5up
+e2è1v
+eè6vrs
+e1d
+e4df
+ed5ig
+ed2l
+ed5ob
+ed6obe
+ed6obr
+e4dobs
+e4d3oè
+ed5vè
+ed5zb
+e1e
+e4ep
+e1f
+e4ff
+ef5fe
+ef5ta
+e1g
+e1h
+e1i
+ei6pzi
+ei2z
+eiz5e
+e1j
+e1k
+ek6mal
+ek6tre
+e1l
+e1m
+e1n
+e1o1
+eob4j
+eob4r
+eo4dl
+eo4z5n
+e1p
+ep5nik
+e1ra
+era6z5l
+era5z4r
+era5z4v
+e1re
+e4rf
+e1ri
+e1ro
+e4rr
+e1ru
+e1s
+es5da
+e5sta
+e5sti.
+e5stih
+e5stil
+e1¹
+e4¹p
+e¹5po
+e1t
+4eth
+e4tin¹
+e1u1
+e1v
+eve6t5l
+ev5ha
+ev6pre
+ev6ste
+ev5stv
+2ew
+ew6ind
+ew5le
+e4wt
+ew5to
+e4yw
+e1z
+ez5dj
+e3z4dr
+ez2g
+ez5gl
+e5zij
+ez6ijo
+ez5imn
+e5zis
+ez6ist
+ez5iz
+ez4l
+ez6lom
+ez6man
+ez4mo
+e4zob
+e4z5or
+ez4re
+e4zt
+e4z5u4m5
+e4z¾
+e1¾
+1fa
+fe1
+fe6ljt
+ff5ma
+fi6zlj
+2f1n
+fo6uri
+fre4u
+2f1s
+2ft
+ft5ve
+fu1
+2g1d
+ge6ige
+gel5è4
+ge6njè
+gi6tpr
+go1
+go5vz
+2g1t
+gu1
+ha4u
+2h1è
+he4i
+2h1k
+4hl.
+h4lo
+2h1n
+h5ren
+2h1¹
+2h1t
+1hu
+hu6ffm
+i1a
+i1b
+i1c
+i4cs
+i1èa
+i1èe
+i1èi
+iè5ra
+i1èu
+iè5vr
+i1d
+4idor
+i1e1
+i1f
+i1g
+4igh
+i1h
+i1i
+ii2n1
+i1j
+i1k
+i4kè
+ik5èa
+i1l
+il5è4k
+4ile
+4ilo
+i1m
+i4mh
+im5hi
+i1n
+1ind
+2ine
+3i4n3os
+1inp
+3inse
+1in¹
+4in¹k
+3intr
+i1o1
+i1p
+i1r
+4ire
+i1s
+is4a
+is6ert
+isis4
+i4skv
+2iss
+i1¹
+i1t
+it5pr
+i1u
+i1v
+iv5jo
+i1x
+i1z
+iz1l
+iz4la
+izli4z
+iz5me
+iz5mo
+iz6ode
+iz5po
+i2zr
+iz1u
+iz6ure
+i1¾
+j5akt
+2j1b
+2j1c
+2j1è
+2j1d
+je4ks4
+2j1g
+2jh
+j1hi
+4jime
+4j5int
+2j1k
+2j1l
+2j1m
+2j1n
+4job
+2j1od
+jod4l
+2jos
+4jo¾
+2j1p
+2j1r
+jra1
+jraz4
+2j1s
+jsis6t
+2j1¹
+2j1t
+ju1
+2juè
+ju5dm
+2jus
+ju2¾1
+2j1v
+2j1z
+jz6ves
+2k1c
+2k1d
+ke5ti
+ki1
+2k1m
+1kn
+ko1
+kok4
+ko5kd
+ko6v¹e
+koz6lo
+1kre
+2ks.
+k5sat
+ks1c
+ks1p
+ks4po
+ks1t
+4kst.
+ks6taz
+ks5te
+2k1t
+3ktr
+4ktra
+ku5ro
+k5vip
+la4ir
+la6vz.
+2l1b
+2l1c
+2l1è
+2l1d
+le1
+le4e
+le6ipz
+le5me
+2l1f
+2l1g
+lg5èa
+2l1h
+l2i1
+li6d¾.
+1liz
+4l5izd
+2lj.
+4ljc
+2ljè
+2ljk
+2ljn
+2ljs
+2lj¹
+lju5d6j
+2l1k
+2l1l
+2l1m
+2l1n
+lo1
+1loè
+2l1p
+2l1s
+2l1¹
+2l1t
+lu5ki
+lu5ku
+2l1v
+2l1z
+2l1¾
+2m1b
+2m1c
+2m1è
+2m1d
+me4d5n
+me6dos
+me4dr
+2m1f
+4mind
+4minp
+4min¹
+mi6th.
+2m1k
+2m1m
+m5niv
+mo6¹t.
+mo6v¹.
+2m1p
+2m1s
+2m1¹
+2m1t
+m5urn
+2m1v
+my5hi
+2m1¾
+na1
+5naèel
+na4d5nj
+nad5r
+na6dra
+na4dre
+na6dur
+1naj
+na6jak
+na4j5en
+naj3o
+na6joè
+na4j3u
+1nas
+na4v3z
+navze6
+1naz
+naz6or
+2n1b
+2n1c
+2nè
+n1èa
+n1èe
+n1èi
+n1èu
+2n3d2
+nd5ga
+nd5hi
+n4dm
+ne1
+ne3d2
+1neh
+ne3zm
+nez4v
+2n1f
+2n1g
+n4gh
+ng5ha
+n4gv
+ng5vi
+2n1h
+2nj.
+2njc
+nje4v5s
+2njk
+2njs
+2nj¹
+4njv
+2n1k
+2n1l
+2n1n
+no5rd
+n4ost
+2n1p
+2n1s
+nsis4
+2n1¹
+2n1t
+nteks4
+n4tg
+nt5ga
+nt5ge
+n4tv
+nt5vi
+nu1
+2n1v
+ny5qu
+2n1z
+nz4i
+2n1¾
+o1a
+o4as
+o1b
+ob5gl
+ob5ide
+ob5jo
+5obla
+5obro
+o4bz
+o1c
+oc5ke
+oc5ki
+o4cr
+o1è
+o1d
+od5dv
+od5nal
+o6drep
+od5zd
+o2d1¾
+o1e
+oele4
+o1f
+o1g
+4ogl
+o1h
+o1i
+oiz2
+o1j
+o1k
+o4kb
+ok5ba
+ok5be
+o4kt
+o1l
+o6l5avt
+ol6gèa
+o4lr
+ol5re
+o1m
+o1n
+o1o
+ood4l
+o2ol
+o4om
+o1p
+o4pm
+op5me
+4opy
+o1ra
+or4deè
+o1re
+o1ri
+o1ro
+o1ru
+o1s
+5oseb
+ose4m5
+o1¹
+o1t
+o1u
+ou5ki
+ou5ku
+o1v
+ov5sem
+ov5¹k
+o2v1z
+o5vza
+ov3zd
+o1y
+o1z
+oz4b
+ozd5j
+oz4g
+oz5lo
+oz6lo¾
+oz2n
+oz5nic
+oz5ni¹
+oz2o
+oz2r
+oz2v
+o1¾
+o¾5mi
+2p1c
+2p3è2
+pè5ka
+pe1
+1peè
+pe4kt
+pet3l
+pe4tle
+pe4v5s
+pev5t4
+4phs
+ph5so
+pi5zo
+2p1k
+4ploz
+po1
+po6dfa
+po4d3l
+po4dna
+po4d5oè
+po6lob
+po6std
+prez4
+2p1s
+2p1¹
+2p1t
+pz6ig.
+qu2
+3raèu
+2rae
+ra6j¾n
+rav5z
+ra6vza
+ra4z5id
+3razl
+ra4z5or
+2r1b
+2r1c
+2r1è
+2r1d
+re1
+3real
+re6cht
+re5èv
+5redè
+re6dig
+re6dnju
+re6iba
+re5jo
+re5km
+re6sda
+rev6sk
+re6znaè
+re6zus
+re6zve
+r1f
+2r1g
+2r1h
+ri1
+r4in
+ri5n4o
+riz4g
+riz4l
+riz4n
+2r1j
+2r1k
+2r1l
+2r1m
+2r1n
+ro1
+rob6id
+3rodi
+ro5zo
+2r1p
+r1r
+2r1s
+2r1¹
+2r1t
+r4th
+rt5ha
+ru5kl
+2r1v
+r3v2j
+rv5jo
+ry5an
+2r1z
+rz2l
+r1¾
+r¾5da
+2s1b
+1sc
+4sc.
+s2ci
+se4k5sa
+sek5si
+se5ma
+se5vp
+2s1f
+si1
+s4id
+si6gn.
+sis1
+2s1j
+2sk.
+s2kn
+4skre
+s4lav
+s4on
+soni5
+soniè4
+1sp
+s4plod
+spod4l
+2s1s
+2st.
+3ste
+s4ten
+4stf
+s4tiè
+5stim
+s4tir
+2stk
+2stm
+1str
+s4tra.
+su1
+su4bo
+sve5t
+¹2è
+2¹è.
+2¹èk
+2¹èn
+¹e2s
+2¹1j
+ta5wi
+taz4
+2t1b
+2t1c
+tch5o
+2t1d
+tek6st
+5tema
+te5xa
+t1f
+4tind
+4tinos
+4tinp
+4tinse
+4t3int
+2t1k
+6tletno
+2t1m
+4tnaj
+to6v¾.
+trt5u
+tr6tur
+2t1s
+2t1t
+tu1
+4tz.
+2u1a
+u1b
+ub4j
+u4bp
+ub5po
+u1c
+u1è
+u1d
+ud6mi.
+u1e
+u1f
+u1g
+u1h
+u1i
+u1j
+u1ka
+u1ke
+u1ko
+u1l
+u1m
+u1n
+u1p
+up6èka
+u1ra
+u1re
+4urg
+u1ri
+u1s
+1usp
+u1¹
+u¹e3s
+u1t
+u4th
+uth5o
+u1v
+ux5em
+u1z
+u1¾
+2v1b
+2v1c
+2vè
+v1èa
+v1èe
+v4èer
+v1èi
+2v1d
+ve4èl
+ve4èm
+ve4i
+ve4tin
+vetle6t
+v1f
+v1g
+vi5dv
+vid6va
+1viv
+vi6¾g.
+2v1j
+4vjo
+2v1k
+2v1m
+2v1n
+vo5rd
+voz5le
+2v1p
+3v2pa
+v4pij
+v4pil
+v5skn
+v5¹ek
+4v¹k
+2v1t
+vt4k
+vz2
+v2za
+3v2zg
+2v3zk
+2vzo
+v3zp
+v2zu
+1wa
+wo2
+x1f
+1ye
+2y1f
+y1j
+y1l
+y1w
+1z2a
+z6ane.
+za5uk
+za3vp
+za1z2
+za5zd
+2z1b
+3zbir
+z1c
+2z1è
+2z1d2
+zd5ju
+z3dv
+z1g
+z4gni
+z5got
+2z1h
+1zi
+z1ig
+2z1is
+4z5i¹è
+2z1j
+2z1k
+z3ku
+z5las
+z1li
+3zlil
+5zlit
+5zliv
+zliz5
+1zlj
+3zlog
+z5lom
+3zlo¾
+z1lu
+2z1m
+1zn
+1zo
+z1ob
+2z1od
+z1og
+z2ol
+z4om
+2z1p
+1z1r
+4zredè
+4zre¹
+4zrez
+4zre¾
+4zri
+4zru
+2z1s
+z1¹
+z1t
+1zu
+z4uj
+2z1up
+2z1uz
+z1v2
+z4ven
+z3vn
+3z4voj
+z4vok
+2z1z2
+z1¾
+2¾1b
+2¾1c
+2¾1è
+2¾1j
+2¾1k
+4¾mi
+.è8
+.¹8
+.¾8
+8¾.
+8¹.
+8è.
diff --git a/hyph/spanish.lh b/hyph/spanish.lh
new file mode 100644
index 0000000..bf3a546
--- /dev/null
+++ b/hyph/spanish.lh
@@ -0,0 +1,185 @@
+Lout hyphenation information
+%
+%  Spanish hyphenation file, created by Jeffrey H. Kingston
+%  23 September 1994 from a TeX file supplied by Luis Melendez.
+%  See long comment below for full information about the origin
+%  of this file, and a copyright notice.
+%
+%  JeffK has made the following modifications to convert to ISO-LATIN-1:
+%
+%     TeX file         Lout file
+%     'a               \341
+%     'e               \351
+%     'i               \355
+%     'o               \363
+%     'u               \372
+%     "u               \374
+%     ~n               \361
+%
+
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+áÁ
+éÉ
+íÍ
+óÓ
+úÚ
+üÜ
+ñÑ
+
+Patterns:
+% Hyphenation patterns for Spanish.
+% Compiled by Julio Sanchez (jsanchez@gmv.es) on September 1991.
+%
+% These patterns have been derived from "On Word Division in Spanish",
+% Jos'e A. Ma~nas, Communications of the ACM, and implemented in his
+% package ftc. You can get ftc and a draft of the abovementioned
+% paper from goya.dit.upm.es in src/text.proc/ftc.Z. FTP access may
+% be available. Otherwise, send help to info@goya.dit.upm.es for
+% details on use of the mail server.
+%
+% Rules mentioned below are those described in that paper. After
+% several unsatisfactory attempts to pretend I knew better, these 
+% patterns closely follow that paper. Pattern 'tl' is not considered. 
+% It is conflictive and ftc does not use it either.
+%
+% These patterns have been generated by shyphen.sh version 1.2, 
+% shyphen.sh is a sh script that allows a number of choices. 
+% Full benefit from some of these options can only be
+% obtained if appropriate fonts are available.
+%
+% Follows a copyright notice. This is not in the public domain,
+% but the copyright is essentially a hold-harmless clause. That
+% is, use it at will, but don't sue me if you don't like it.
+%
+%			COPYRIGHT NOTICE
+%
+% These patterns and the generating sh script are Copyright (c) GMV 1991
+% These patterns were developed for internal GMV use and are made
+% public in the hope that they will benefit others. Also, spreading
+% these patterns throughout the Spanish-language TeX community is
+% expected to provide back-benefits to GMV in that it can help keeping
+% GMV in the mainstream of spanish users. However, this is given
+% for free and WITHOUT ANY WARRANTY. Under no circumstances can Julio
+% Sanchez, GMV, Jos'e A. Ma~nas or any agents or representatives thereof 
+% be held responsible for any errors in this software nor for any damages
+% derived from its use, even in case any of the above has been notified
+% of the possibility of such damages. If any such situation arises, you
+% responsible for repair. Use of this software is an explicit
+% acceptance of these conditions. 
+% 
+% You can use this software for any purpose. You cannot delete this
+% copyright notice. If you change this software, you must include 
+% comments explaining who, when and why. You are kindly requested to 
+% send any changes to tex@gmv.es. If you change the generating 
+% script, you must include code in it such that any output is clearly
+% labeled as generated by a modified script.
+%
+% Despite the lack of warranty, we would like to hear about any
+% problem you find. Please report problems to tex@gmv.es.
+%
+%               END OF COPYRIGHT NOTICE
+%
+% Options included in this set: basic TeX
+% Open vowels: a e o 'a 'e 'i 'o 'u
+% Closed vowels: i u "u
+% Consonants: b c d f g j k l m n p q r s t v w x y z ~n
+%
+% Some of the patterns below represent combinations that never
+% happen in Spanish. Would they happen, they would be hyphenated
+% according to the rules.
+
+% This keeps {cat|lc}code changes, if any, local. Nice to users of
+% multilingual versions. These are the minimum changes needed to process
+% the patterns. These and other changes will have to be re-enacted when
+% Spanish be established as the current language. See the babel docs if
+% you don't understand this.
+% deleted by JeffK:  \begingroup
+% deleted by JeffK:  \catcode`'=12 \lccode`'=`'
+% deleted by JeffK:  \catcode`"=12 \lccode`"=`"
+% deleted by JeffK:  \catcode`~=12 \lccode`~=`~
+% deleted by JeffK:  \patterns{
+% Rule SR1
+% Vowels are kept together by the defaults
+% Rule SR2
+% Attach vowel groups to left consonant
+1ba 1be 1bo 1bá 1bé 1bí 1bó 1bú 1bi 1bu 1bü 
+1ca 1ce 1co 1cá 1cé 1cí 1có 1cú 1ci 1cu 1cü 
+1da 1de 1do 1dá 1dé 1dí 1dó 1dú 1di 1du 1dü 
+1fa 1fe 1fo 1fá 1fé 1fí 1fó 1fú 1fi 1fu 1fü 
+1ga 1ge 1go 1gá 1gé 1gí 1gó 1gú 1gi 1gu 1gü 
+1ja 1je 1jo 1já 1jé 1jí 1jó 1jú 1ji 1ju 1jü 
+1ka 1ke 1ko 1ká 1ké 1kí 1kó 1kú 1ki 1ku 1kü 
+1la 1le 1lo 1lá 1lé 1lí 1ló 1lú 1li 1lu 1lü 
+1ma 1me 1mo 1má 1mé 1mí 1mó 1mú 1mi 1mu 1mü 
+1na 1ne 1no 1ná 1né 1ní 1nó 1nú 1ni 1nu 1nü 
+1pa 1pe 1po 1pá 1pé 1pí 1pó 1pú 1pi 1pu 1pü 
+1qa 1qe 1qo 1qá 1qé 1qí 1qó 1qú 1qi 1qu 1qü 
+1ra 1re 1ro 1rá 1ré 1rí 1ró 1rú 1ri 1ru 1rü 
+1sa 1se 1so 1sá 1sé 1sí 1só 1sú 1si 1su 1sü 
+1ta 1te 1to 1tá 1té 1tí 1tó 1tú 1ti 1tu 1tü 
+1va 1ve 1vo 1vá 1vé 1ví 1vó 1vú 1vi 1vu 1vü 
+1wa 1we 1wo 1wá 1wé 1wí 1wó 1wú 1wi 1wu 1wü 
+1xa 1xe 1xo 1xá 1xé 1xí 1xó 1xú 1xi 1xu 1xü 
+1ya 1ye 1yo 1yá 1yé 1yí 1yó 1yú 1yi 1yu 1yü 
+1za 1ze 1zo 1zá 1zé 1zí 1zó 1zú 1zi 1zu 1zü 
+1ña 1ñe 1ño 1ñá 1ñé 1ñí 1ñó 1ñú 1ñi 1ñu 1ñü 
+% Rule SR3
+% Build legal consonant groups, leave other consonants bound to 
+% the previous group. This overrides part of the SR2 pattern
+% group.
+1c2ha 1c2he 1c2ho 1c2há 1c2hé 1c2hí 1c2hó 1c2hú 1c2hi 1c2hu 1c2hü 
+1l2la 1l2le 1l2lo 1l2lá 1l2lé 1l2lí 1l2ló 1l2lú 1l2li 1l2lu 1l2lü 
+1r2ra 1r2re 1r2ro 1r2rá 1r2ré 1r2rí 1r2ró 1r2rú 1r2ri 1r2ru 1r2rü 
+1b2la 1b2le 1b2lo 1b2lá 1b2lé 1b2lí 1b2ló 1b2lú 1b2li 1b2lu 1b2lü 
+1b2ra 1b2re 1b2ro 1b2rá 1b2ré 1b2rí 1b2ró 1b2rú 1b2ri 1b2ru 1b2rü 
+1c2la 1c2le 1c2lo 1c2lá 1c2lé 1c2lí 1c2ló 1c2lú 1c2li 1c2lu 1c2lü 
+1c2ra 1c2re 1c2ro 1c2rá 1c2ré 1c2rí 1c2ró 1c2rú 1c2ri 1c2ru 1c2rü 
+1d2ra 1d2re 1d2ro 1d2rá 1d2ré 1d2rí 1d2ró 1d2rú 1d2ri 1d2ru 1d2rü 
+1f2la 1f2le 1f2lo 1f2lá 1f2lé 1f2lí 1f2ló 1f2lú 1f2li 1f2lu 1f2lü 
+1f2ra 1f2re 1f2ro 1f2rá 1f2ré 1f2rí 1f2ró 1f2rú 1f2ri 1f2ru 1f2rü 
+1g2la 1g2le 1g2lo 1g2lá 1g2lé 1g2lí 1g2ló 1g2lú 1g2li 1g2lu 1g2lü 
+1g2ra 1g2re 1g2ro 1g2rá 1g2ré 1g2rí 1g2ró 1g2rú 1g2ri 1g2ru 1g2rü 
+1k2la 1k2le 1k2lo 1k2lá 1k2lé 1k2lí 1k2ló 1k2lú 1k2li 1k2lu 1k2lü 
+1k2ra 1k2re 1k2ro 1k2rá 1k2ré 1k2rí 1k2ró 1k2rú 1k2ri 1k2ru 1k2rü 
+1p2la 1p2le 1p2lo 1p2lá 1p2lé 1p2lí 1p2ló 1p2lú 1p2li 1p2lu 1p2lü 
+1p2ra 1p2re 1p2ro 1p2rá 1p2ré 1p2rí 1p2ró 1p2rú 1p2ri 1p2ru 1p2rü 
+1t2ra 1t2re 1t2ro 1t2rá 1t2ré 1t2rí 1t2ró 1t2rú 1t2ri 1t2ru 1t2rü 
+% Rule SR4 is implicitly implemented by the default values
+% Rule HE1 is implemented by TeX parameters \lefthyphenmin and
+% \righthyphenmin. Help yourself. The correct values for
+% Spanish are 2 and 2. If you set them below these values,
+% incorrect breaks will happen.
+% Rule HE2
+% Break between a consonant and an h
+b1h d1h f1h g1h j1h k1h l1h m1h n1h p1h q1h r1h s1h t1h v1h w1h x1h y1h z1h ñ1h 
+% We now avoid some problematic breaks.
+su2b2r su2b2l
+% deleted by JeffK:  }
+% deleted by JeffK:  \endgroup
diff --git a/hyph/swedish.lh b/hyph/swedish.lh
new file mode 100644
index 0000000..7bb8aef
--- /dev/null
+++ b/hyph/swedish.lh
@@ -0,0 +1,3771 @@
+Lout hyphenation information
+%
+%  This is a Swedish hyphenation file created by Jeff Kingston
+%  on 20 March 1994 from a TeX file supplied by Sverre Slotte.
+%
+Classes:
+@!$%^&*()_-+=~`{[}]:;'|<,.>?/0123456789
+aA
+bB
+cC
+dD
+eE
+fF
+gG
+hH
+iI
+jJ
+kK
+lL
+mM
+nN
+oO
+pP
+qQ
+rR
+sS
+tT
+uU
+vV
+wW
+xX
+yY
+zZ
+äÄ
+åÅ
+öÖ
+
+Patterns:
+.a2b
+.ab5i
+.ab5ol
+.ab3r
+.ac1
+.a2d
+.a3dr
+.ad3s
+.a5g4ra
+.a5gre
+.a5kl
+.a5le
+.a3lu
+.amp3l
+.a5mu
+.and4rar
+.a2n5es
+.ang4er
+.an5go
+.an3s
+.ap1p
+.as2k
+.a3sket
+.as2t
+.a5sten
+.a3sti
+.a5ta
+.at3t
+.au3st
+.a4val
+.av3s2
+.b4
+.bort3s
+.cis4
+.cis2t
+.cy5klop
+.d4
+.dä2r5
+.ek1v
+.e3l4a
+.e2l3in
+.em5b
+.e4nä
+.e2r3i
+.e2s
+.e5skad
+.es3kal
+.es5kap
+.e5strad
+.e3tr
+.evan5
+.f4
+.feb3r
+.folk1
+.fram5
+.fres3
+.för1a
+.för1en
+.fågel3
+.g2
+.gus3
+.he2m
+.hu5sa
+.ib4
+.i3k4
+.im3p
+.i2n1
+.in3d
+.ink2
+.in3s
+.in3t
+.is5k
+.is3s
+.k4
+.kans4k
+.ke5s
+.ko5li
+.kring3
+.l4
+.lek5tr
+.linne3
+.m2
+.mas2ke
+.ma5skeri
+.me2din
+.me4re
+.mid3
+.mon2s
+.män5sko
+.må4st
+.n2
+.ner3s
+.ok3t
+.o3kv
+.o2m
+.om1s
+.o3mu
+.on4k
+.o3o
+.o1s2k
+.o3sl
+.o3stra
+.o3sv
+.o3tr
+.o1u
+.o4ä
+.p4
+.pa3ste
+.pa5sti
+.peri5
+.pi5sti
+.pub3lika
+.på3t
+.r2
+.re4gr
+.re2s5te
+.re3str
+.ri4sp
+.röve5
+.s4
+.sa2k
+.sand3s
+.seg3r
+.si5o
+.sk2
+.snab2
+.spas5
+.st4
+.straf2
+.string4
+.sup3p
+.t4
+.tes3ta
+.tig3r
+.ti2ot
+.u3k
+.up2
+.u4ra
+.ur3s
+.u2ta
+.u2to
+.ut3om
+.u5trer
+.ut5s
+.v2
+.vatten3
+.vä2g
+.väg3s
+.x2
+.y2a
+.y4e
+.ägg3s
+.ä3ro
+.ög5n
+.ö3ro
+.ång4este
+.år4s
+.å2sk
+.åter3
+abe4s3
+ab1l
+ab3la
+ab3ort
+ab5ric
+ab3rio
+a5bu
+ac4kes
+ack3u4p
+a1d
+a5dag
+a5dek
+a5del
+ad5ep
+ad1j
+ad3op
+a5dran
+a3dre
+1adres
+ad3ril
+a5dro
+ad3ru
+ads3v
+a5ed
+3affä
+1af3ri
+a5fä
+a1ga
+aga4ra
+a1ge
+a2ge.
+age4l
+agg3s
+ag1l
+ag3ro
+ag4sp
+a1h
+a4hj
+aib4
+a3iv
+a1j
+a3ka
+a4kart
+a3ke
+a1ki
+ak3n
+a1ko
+ak5ram
+akri5s2
+ak3rob
+ak4sta
+3aktig
+ak3tri
+a1ku
+a5kvari
+ak5ve
+4akö
+a5kår
+ak5åt
+a1la
+al5adm
+ali2br
+a2lin
+a5lin.
+a3line
+al3ins
+ali5stik
+alivs4
+a4lj
+alk3ak
+a1lo
+al5ort
+al3tr
+a1lu
+alu5s
+alv3s
+a1ly
+a3lä
+a3lö
+am4bra
+am4i
+ams2
+a3mö
+ana4bo
+an3alf
+an3ark
+an3c
+anci5
+an5dak
+andel2
+an4dun
+an3gi
+ang4o
+an1gr
+aniu4
+ank3r
+ano2i
+a4nok
+a4nop
+an5sche
+ansis3t
+an3skri
+an5slag
+ans5par
+an1st
+1ansva
+a1nu
+a5ny
+a3nö
+a1o
+a2pe.
+ape4n3
+ap5lad
+ap3lar
+apo3str
+1appara
+apps4k
+ap3ric
+a5pris
+ap2s
+ap3se
+aps5l
+apu5s
+a5py
+a5pä
+2ara
+a5rag
+a4rarv
+1arb
+4arbi
+2arbo
+4arbr
+ar3dr
+2arh
+a1ri
+ar3ka
+4arl
+4arn.
+ar4nal
+a1ro
+a2rob
+4arp
+ar2sa
+ar2sv
+ar3ti
+ar2tra
+art3v
+4aru
+a5rus
+a3ry
+a3rä
+a5rö
+2asa
+asbe4
+a1sc
+as2h
+a5sj
+as3kis
+ask4l
+as3ku
+as3pa
+as3pig
+as5sak
+as4sin
+as2sk
+as2s5op
+as2sp
+as2st
+as3ta
+a5stard
+as2tej
+as5ter
+asti5o
+as1to
+as4tr
+ast5rak
+a5stral
+ast3rol
+ast3ron
+a5stu
+as5tör
+a3su
+a1sy
+a2sö
+as5å
+a1t
+ata5ra
+ati5ö
+a2tr
+a3tral
+4atrar
+a4t5re
+at3ria
+a3tric
+at3rie
+a5trik
+a3tris
+a3tro
+at4sk
+1attac
+at4tj
+att3sk
+a4tung
+2au
+au5b
+au2t5a
+3autom
+4a1va
+aves4
+1avg
+2a1vi
+av3r
+4a3vä
+a5å
+1b2a
+bad3s4
+ba4ko
+5bar
+bas4ta
+4b1b
+b4bak
+b4bj
+bb3l
+bb5la
+4bc
+2b1d
+3be
+be1d
+be3d4r
+be5e
+be1k
+be5lu
+be3lå
+be3nå
+be1rö
+be1s
+be3sl
+be4sta
+be4ste
+be5su
+be1tr
+bets3t
+be3tv
+be3u
+4bex
+2bf
+4bh
+1b4i
+bi3d4r
+5big
+bi5skv
+2b3k
+2b2l
+b5lar
+ble4mo
+3blera
+3bles
+3blett
+5blid
+3blikr
+3bliks
+3blö
+3blå
+2bm
+2b1n
+1b2o
+bo4kan
+bo4ki
+bo2kl
+bo1mu
+3bon
+bor4ti
+bo5st
+boy5
+2bp
+b2r
+2b5raf
+4brar
+2b5rati
+5brid
+5brik.
+b3rika
+3brike
+3briks
+b5rikö
+bruks3
+bru4st
+3bry
+3brö
+4b1s2
+bs3ch
+b4sp
+bst4
+2b1t
+1b2u
+4b1v
+1by
+by5r
+3bä
+3bö
+3bå
+5cap
+c1c
+1c2e
+3centr
+ceu4s
+2ch
+4ch.
+3chau
+3chef
+4cht
+chäs3
+chör4
+1ci
+ci4lu
+ci3pl
+cipp4
+c5kap
+c3ke
+c1ki
+c2k5j
+ck1l
+ck3n
+c1ko
+c4kordn
+ck3org
+ck3r
+ck4re
+ck3sla
+cks5m
+ck5sn
+ckus2
+c2l
+cle2a
+co2a
+co4m
+4c2r
+4cs
+1cy
+1da
+3da.
+4dadr
+2daf3
+5dako
+da3li
+5dam
+da3må
+2dansv
+2d1ap
+2darb
+4dart
+4dax
+2d3b
+2dc
+dcen3
+2d1d
+ddags5
+dd3r
+1d2e
+de1k4
+4deko
+del2sa
+de5lut
+denti5ö
+de3pr
+der3k
+de2ro
+de5rol
+der5sti
+de4ru
+de2s
+de3se
+de3sp
+dess4l
+des3ti
+de3tr
+2d3f
+2d1g
+2d1h
+1di
+dias4
+di5el
+di2gr
+di3ka
+di5ku
+din3g4o
+2dinr
+4dint
+di1o
+di4od
+di3p
+dis3p
+dis5to
+dis3tra
+dis5trä
+2dj
+d5jor
+djup5p
+3djur
+2d3k4
+2d1l
+dlings5
+2d1m
+2d1n
+1do
+d2ol
+do5lo
+2domr
+dom2so
+5don
+4dori
+do3y
+2d1p
+2d2r2
+d3rad
+3drag
+d5rarb
+d5rassera
+d5ratu
+3drej
+4d5ren
+d4ric
+d3rig
+d1rin
+d4riv
+d5ror
+drotts3
+5d4ry
+3d4rä
+4dräc
+3d4röm
+2ds
+d2sa
+d3sag
+ds1an
+d2se
+ds5enh
+d2si
+dsk2
+d3skef
+ds3kl
+ds5kn
+d2sky
+ds1l
+ds4lot
+d4sma
+ds3n
+ds4ni
+ds5nå
+d2so
+ds5ort
+ds3pl
+ds3s4
+ds3tag
+ds2te
+d5s2tig
+d4sty
+d2stå
+d2su
+ds1v
+ds5vag
+d2sö
+2d1t
+1du
+dubb4
+2dunde
+4dup
+2dut
+2d1v
+2d3w
+1dy
+4dz
+1dö
+döds3
+4dög
+2dås
+d5åsk
+e1a
+e2ake
+e4am
+e1b
+e3bl
+e2br
+eb3ril
+4ec
+e3ch
+echiff5
+ecis4
+e3co
+edi4u
+ed3jo
+e5dral
+eds2l
+ed3s2m
+edso4
+e1e
+e2ed
+e4ei
+ee2k5
+e4en.
+e4ene
+e1f
+e3fl
+ef2s
+e1g
+e3ga
+e3ge
+eg1l
+eg2ler
+e5glera
+e5gleri
+eg5rat
+eg3rin
+e5gru
+egs3
+e1h
+eig2
+ei5gn
+e3ik
+e1in
+ei5sh
+e1isk
+e1jo
+e3ju
+e3jä
+e5jö
+e3ka
+e1ki
+e1kl
+ek3lat
+ek4le
+ek3n
+e1ko
+ek3orr
+ek4ret.
+ek5ro
+ek4st
+e1ku
+ek5vis
+e1ky
+e1kä
+e1la
+el1akt
+el4arb
+eleb3r
+elekt3ri
+eli5ku
+el3k4
+ell5s
+e1lo
+e4lob
+el5ug
+e5luv
+e1ly
+2e1lä
+e1lö
+e1m
+e5mat
+e5mis
+emon1s
+emp5le
+e2nav
+2enj
+en5klo
+en3si
+ens5ke
+ens2m
+en5sta
+en2t1r
+ent4rat.
+ent3rati
+ent3ri
+ent3ru
+en4tut
+2eny
+2e1nä
+e3nö
+e4növ
+e1o
+e2og
+eo4i
+e5or
+2ep
+e3pla
+ep5le
+epp2s3
+e1pr
+ep3s
+ep4tr
+epu3b
+e3på
+e2raff
+er1ak
+er3d4
+er3erö
+e1ri
+e5rib
+e4rinf
+erings5
+eri5stik
+erk4la
+er3kv
+er5na
+e1ro
+e3rob
+e2rom
+erp4
+er3ra
+er5sc
+ers4ken
+ers4le
+er3sli
+er4sta
+er3str
+er3sv
+e1ru
+e4rut
+e3ry
+e1rä
+e3rös
+er5öve
+e5råd
+e2sal
+es5all
+es3arm
+e1sc
+2ese
+es4hi
+esi4u
+es2k
+e4skan
+e4s5kar
+e4s3ken
+es3ker
+es5kul
+e1sl
+es3lös
+e1sp
+es3pl
+es4sc
+es2st
+es2t
+e3stal
+es3ten
+esti2ge
+es3tin
+es5tor.
+es5torn
+es4tr
+est5rer
+e3stru
+e3stå
+estånds5
+e3sy
+eta3b
+eti5op
+eti3ö
+e1to
+e5tri.
+et3ris
+e5trä
+ets1l
+et2st
+et4sv
+et2sä
+et2s5ö
+e1tu
+etu4ri
+et5vu
+e1ty
+2etz
+e5tä
+etäc4
+e5tö
+e3tå
+euk4
+e5um.
+eu4mi
+e5up4
+eu4se.
+eu5tro
+e1v
+ex1
+1exp
+ext4r
+1f2a
+fac2
+fa3sh
+fa4st
+2fb
+2fd
+1fe
+fe2l
+fes3ta
+fe3sto
+2fex
+2f1f
+ff3l
+ff3n
+f2f3r
+ffö5re
+2f3g2
+1fi
+fi2br
+fib5rig
+fi3skal
+fi2ti
+f2j
+2fk
+2f2l
+5flask
+2fm
+fma4
+2f2n
+3fna
+1fo
+4fof
+folk3r
+2fom
+fo2na
+fost3r
+2fp
+f2r
+fra2m
+f4rer
+5freri
+f4ri.
+fri5sp
+fros5ta
+2f1s
+fs2k
+f2st
+f4sv
+2f1t
+f4tak
+fte4r
+f4tin
+f4tr
+ft2sa
+ft4se
+fts5i
+ft4ska
+fts5m
+ft3str
+f2tu
+ft3v
+1fu
+fu5ru
+fu3tu
+2fv
+1fy
+fy4ma
+3fäl
+5fäs
+1fö
+fö2ren
+fö2ri
+för3k
+för1sl
+för3sm
+för3sp
+för3su
+ga5br
+3g2ag
+4gakt
+3g2al
+ga4no
+2garb
+ga2ro
+ga4st
+gast3r
+5g2ati
+gaus4
+g4av
+g5avsn
+2g1b
+4gc
+2g1d
+ge2a
+ge5b4
+2gef
+2ge4j
+geld4
+g2eli
+3gelis
+3gelä
+g4em
+ge4nap
+3g2eni
+3genj
+4genm
+gen4sa
+g4ense
+1g2ent
+4genv
+ge5ny
+3genä
+ge2o
+1g2era
+4gerarb
+3g2eri
+4germ
+g2ersk
+gers5n
+5gese
+ges3ti
+ge4to
+5g2ett
+2g5f
+2g1g
+g4gap
+gg1l
+g4gos
+ggs4la
+ggs4m
+ggs4t
+2g1h4
+ghets1
+1g2i
+gi1o
+gis3l
+gi4ste
+gis4tr
+gi5stral
+gi5st4rat
+3giv
+gi2ö
+g2j
+g5ja
+g5jä
+2g3k2
+2gl
+g2las
+5glase
+glas5k
+5glasö
+gles5n
+g4lid
+g5lös
+2g1m
+2g1n
+g4nag
+g2no
+1g2o
+3go.
+3gol
+gon3s4
+2gord
+g5ordn
+go3sl
+2g1p
+g2r4
+3graf
+5gral
+gra2m
+g5rat.
+5grec
+5grett
+g3rig
+g1ring
+5grip
+g5roi
+gro2v
+grä4n
+5gräns
+2g2s
+gs1an
+g3sel
+gs3f
+g3sint
+gsk2
+g5s4ki
+gs4kj
+gs4kot
+gs1l
+gs1m
+gs3mi
+gs3n
+gs4ni
+gs4nö
+gs1p
+gs3pl
+gs3po
+gs3pu
+gs3s
+gs5tag
+gs5tak
+g5stark
+g3stif
+gs3till
+gs4tin
+gst4r
+gs5tvi
+gs1u
+g4sug
+g4s3ve
+gs3vå
+gs1ä
+2g1t
+1g2u
+guld1
+gul4da
+4gulä
+gu2ma
+4gup
+gu5ru
+2gut
+g3utb
+2g1v
+4gw
+3g2y
+gytt3j
+g2ä
+1g2ö
+gö3ra
+gö5ro
+3g4å
+gårds3
+gå4sp
+ha3bl
+ha5ge
+handels3
+hands4l
+han5g2a
+ha5ra
+ha4sp
+hav2
+havs5
+h5c
+4hd
+he4at
+hets3v
+h3h
+4hir
+hi4t
+5hjä
+h1k
+2hl
+h4le
+2hm
+4hn
+h2na
+h2nit
+ho5nu
+hop5plo
+hop3s
+hos3p
+4how
+h5p
+h1s
+2ht
+hu2s
+hu4st
+hust5r
+hyg5r
+hys2
+hy3ster
+häll2
+hälls1
+hälso3
+hä5ro
+hä4s
+hö2g
+i1a
+ia3fr
+ia3g
+ia4lu
+ias5k
+ia3tr
+i1b
+ib3l
+i5bril
+i3ca
+i2ce.
+i5cha
+i3che
+ick3u4
+i5co
+i4dom
+id1r
+id3ri
+id3ro
+ids3v
+id4sä
+i4dun
+i3då
+4i1e
+i1fr
+3ifrån
+i1g
+4igan
+i2geb
+ig5ej
+ig4gr
+ig1l
+ig3no
+i1h
+i5i
+i1ki
+i3klo
+ik5län
+i4k3n
+i1ko
+ik3re
+i5krob
+ik5rof
+ik5ros
+ik2s
+ik5sh
+i3kul
+i3kum
+ik5u4t
+ik1v
+i3ky
+i3kö
+i5kå
+i1la
+i3li
+il1jö
+il5la
+ill3s2
+3illu
+il5lär
+il2min
+i1lo
+i3lu
+i4lup
+i5lä
+im2b
+imb3r
+im5sm
+im4tv
+i1mu
+i3mä
+i5mö
+i5må
+i4nau
+in4ga
+ing4es.
+ing5is
+ing4si
+ings5o
+i3ni
+i4nif
+ink5s
+in5kve
+1inneh
+5inre
+1inri
+3inrä
+in1s
+in2sk
+in3skr
+in3sl
+5inslag
+ins4m
+in3sn
+1inspe
+5inspeln
+3instan
+3instink
+3instru
+1intr
+in4tra
+i1nu
+i4nun
+i1nä
+i5oc
+i1og
+i3ok
+io4kr
+i1ol
+io5li
+i5om
+i3ono
+ion2s3
+i3opi
+i1or
+i1os
+i1ot
+ip5pi
+i3ra
+i4res
+i1ri
+i1ro
+iro3p
+i1ru
+i5sce
+is2h
+i2sk
+is5kep
+isk5na
+is1ko
+is1kr
+is3ku
+is4kun
+is4kvi
+is3ky
+i5slam
+is3län
+is3n
+i3so
+is3pa
+is3pi
+is3po
+is3pu
+is2sk
+is5ski
+is2sp
+is2st
+iss3tr
+is3tag
+i1stans
+is5tat.
+ist5att
+is3ten.
+i1stent
+is4tes
+is5tor.
+i3strik
+i3strö
+i3sy
+i1t
+it5c
+i4te.
+i4tei
+i3tri
+it5sj
+it3st
+it2t5op
+it4t3r
+itut4
+i5tä
+i4tå
+i1u
+i1v
+i2vak
+i4vin
+iv3r
+iv4su
+ivs4v
+ivs5va
+ix2t
+ix5tu
+i1ö
+1ja
+4jarb
+jas5m
+jas5p
+2jb
+2j1d
+1je
+je2a
+5jef
+je5sta
+2jf
+4j3g
+4jh
+1jig
+3jis
+2j1k
+j4kr
+j2k3v
+2j1l
+2jm
+2j1n
+j2o
+3job
+4jolj
+jor4din
+jord5s
+3jou
+2jr
+2j1s
+j5sa
+j4sk
+j4st
+2jt
+j2u
+juk3s
+jul3k
+4jup
+2jur
+jur5sta
+jus2
+jus3s4
+jut4sta
+jä5lo
+jäl4sa
+jär5s
+jör2s
+jös4t
+jå4sk
+1k2a
+3ka.
+5kad.
+3kade.
+ka4dr
+2kaf
+5kafä
+ka5gr
+ka3i
+2kak
+k1akti
+3kan.
+4kandi
+5kano
+2kap
+5kapac
+3kapi
+3kar.
+ka3ra
+2karbe
+k5arbet
+ka5ri
+3karna
+4karp
+4karv
+3kas
+kas5ko
+kas3ti
+ka5stru
+2katt
+4kau
+2k3b
+2kc
+4k1d
+1k2e
+3ke.
+ke3dr
+ke4er
+2kef
+kels4
+ke5nå
+2kep
+ke2s
+4kex
+2k3f
+kfö2r
+kfö3ri
+2k5g
+2k1h4
+kid5s
+4kif
+5kig
+4kim
+5kimå
+king3r
+4kinne
+2kins
+kin4sta
+2kint
+ki4nu
+4k3k4
+kl2
+k2lama
+3klass
+2klat
+5klav
+2kle
+k2lej
+2klig
+k2lim
+3klip
+k2lis
+klist3r
+4klj
+3klos
+5klub
+3kläd
+4kläg
+2k1m
+2k2n
+k3nad
+5k4nal
+3k4nap
+k3ni
+3knip
+3k4niv
+3knop
+3k4nu
+3k4ny
+k2o
+4koc
+2kodl
+kog3n
+ko4gr
+kogs5
+ko2lin
+4kolj
+5kolle
+1kom
+3komm
+2k3omr
+5konse
+5konst
+3kont
+ko3nu
+4kop.
+4kope
+1kor
+2korr
+3korres
+5kortera
+1kos
+ko3sc
+kos4k
+ko3sl
+3kost
+2k3ou
+4kox
+2k1p
+k2r4
+3kraf
+kra3ge
+2krar
+5krera
+k4reten
+krid5s2
+krings2k
+2kriv
+3krop
+kru5stad
+k3ryg
+4kräl
+2ks
+ksaks5
+k3sal
+k4sas
+ks3ch
+k4ser
+ks2ha
+ks4ho
+ks2k4
+ks3kl
+ks5kra
+k3skä
+ks3lös
+ks4ma
+k2so
+ks3pl
+k1s2t
+k2su
+2k1t
+kti5ge
+k4tinn
+k2tins
+k2tom
+k2tr
+kt3re
+kt3rin
+kt5rog
+kt3rol
+kt5rät
+kt5t4
+k2tut
+ku5la
+4kuld
+3kulö
+3kurs
+1kus
+kust3a
+kv4
+k3vagn
+3kvali
+k5vare
+5kvarn
+3kvart
+k4vato
+k2ve
+5kvens
+5kventa
+3kvin
+5kvire
+k4vo
+5kväll
+k1vär
+kydds1
+3kyrk
+kägg5s
+5känn
+1käns
+3kärl
+4kög
+kör4s
+4kål
+3la.
+lack5s
+1lade.
+2ladm
+4ladr
+2laf
+la4gin
+5lagm
+lag3r
+2lak
+5laki
+3laktis
+la5lo
+3lande.
+2lappara
+lap5sa
+1lar.
+2larb
+1larn
+lar5s
+la2sk
+5laste.
+3lat.
+la5tr
+2lau
+2lav
+la5vu
+2l5b4
+4l3c
+2ld
+ld3r
+lds4an
+lds2m
+l4dö
+1le
+3le.
+le5ig
+le4kl
+lem4so
+lem4sö
+2l5enl
+3ler.
+3lern
+le5s2l
+les5te
+le3um
+2lex
+2l1f
+l3fl
+2l1g
+lg2l
+l3gla
+2l1h
+1li
+5lif
+3lig
+li4go
+li5k2l
+lik3s
+5limer
+2linga.
+ling5o
+2lingr
+2lini
+4lint
+li1o
+2lip
+lis3c
+li4sor
+lis3s
+li4sta
+li4vo
+liv2s1
+l2jak
+4l1jo
+3lju
+l1jä
+l3jör
+l5jå
+2l1k
+l2kl
+lk5lag
+l2kr
+l3kra
+lk3re
+l4kv
+l1la
+lld4r
+l3li
+ll3k4
+ll1l
+l1lo
+llok5v
+l2l5ov
+ll5p
+ll4san
+ll2se
+ll3sk
+ll5slä
+ll2so
+ll4ti
+ll3tr
+ll5tv
+l1lu
+llust3ra
+l5ly
+l5läm
+l3lö
+l1lå
+4l1m
+l4mol
+l1n
+lo2af
+lo3dr
+lod5st
+lo2ge.
+2lolj
+2lom
+4lord
+2lorg
+4lort
+lp5red
+4l1r
+2l1s
+l2sc
+l2sk
+lsk3n
+l4skop
+l4skre
+l4skv
+l3sky
+l3slu
+ls5lå
+ls3m
+l2sp
+ls3pol
+lss4
+l2st
+l3sta
+ls2ten
+l5strid
+l3stru
+l3stä
+l3stå
+l2su
+l5sur
+l2sv
+l4svi
+ls5vå
+l2sö
+l4så
+4l1t
+lta2tu
+l2tr
+lt5rati
+l3trera
+ltu4
+l4tå
+lu5i
+2lun
+lun4g3
+lungs2
+2lupp
+lu4pu
+3lust
+4lutb
+4luts
+4lv
+l1va
+l1vi
+lv3r
+lv3sp
+l3vä
+lv5års
+ly4gat
+lyg3r
+lyg3s
+3lyste
+5lystn
+ly4str
+läg5r
+1länds
+4längda
+4längt
+4läp
+lätt3s
+4löm
+4lört
+4lå.
+1lång
+lång3s
+4lår
+lå2s
+1ma
+ma5fr
+mag5n
+mak3r
+2makti
+ma3li
+m4an
+mand4
+mang2a
+man5go
+ma5ni
+mani1k
+man2sc
+5mari
+mash5
+mas3ko
+mask5r
+2m1b
+m3ba
+mbet4
+2mc
+2m1d
+m4dat
+m4do
+m3dr
+m4då
+1me
+me5lu
+men5k
+me5nu
+me5ny
+me3sti
+me5trin
+met3ro
+meu4
+4mex
+2m1f
+m3fle
+4m1g4
+2m1h
+1mi
+mi4lu
+ming4o
+min4st
+4minv
+mi3nö
+mi5sf
+mi4sp
+miss3t
+mi2tr
+2m1k
+m2kl
+2m3l
+2m1m2
+2m1n
+m2nam
+m4nav
+mn5g4
+m2n3å
+1mo
+2momr
+mo3na
+2morg
+mos3k
+mo2ta
+mo4tin
+mot3s
+2m1p
+m2pak
+m2pl
+mp3lad
+m5plane
+mp3lat
+mp3lin
+mp5p4
+m4pry
+mp5sk
+mp3st
+4m1r
+2ms
+ms4kor
+m1skr
+ms3lä
+ms4me
+ms5na
+msnitts5
+m3stjä
+mst3rin
+m5strå
+ms5äp
+2m1t
+m3tv
+mulls3
+mult5r
+5mum
+4mun3g4
+5mur
+mu2sk
+mu3sta
+mut2s
+mut4sl
+2m3v
+4myg
+1myn
+mys4te
+1män
+mäns4
+1mäs
+mäs5ta
+mö3ra
+4möv
+3mål.
+5målet.
+mån5sk
+måt5s
+1na
+3na.
+nad4s3
+2naf
+na5gr
+2nak
+3nako
+3nakr
+na3kro
+n1akt
+2nalf
+5nalfl
+nal3sk
+na2lu
+n5amb
+4nanv
+nap3r
+nap5sa
+na4rap
+2narb
+2nark
+4nart
+nas3ti
+nast3r
+2n3b4
+2n1c
+n3cha
+n3che
+n3chi
+ncis4
+ncyk3l
+2n1d
+n2dak
+n4dav
+nde3s
+n2dins
+nd3r
+n5dril
+nd4ro
+nd5sat
+1ne
+3ne.
+ne4di
+ned3r
+ned3s
+ne2gr
+ne5gres
+4nenl
+nes3s2
+ne4sta
+ne5s4ti
+ne3tre
+2nex
+2n3f4
+2ng1
+n4gar
+n4ge.
+n4gen.
+n4gend
+n4gens
+n4genti
+n4ger.
+n4get
+n2gi
+ng3ig
+n5gjo
+ng4ly
+n2go
+ng5om
+ng3or
+ng3rad
+ngs1k
+n4göd
+2n1h
+1n2i
+ni5ec
+3nin
+nings1
+nings3p
+nings3v
+ni1o
+4nip
+ni5s2teri
+nist3ra
+nit4r
+3niv
+2n1j
+n4jar
+nju4s
+2nk
+n1ki
+n3klag
+n1ko
+nkrafts5
+nk4re
+n1kro
+nkrus4
+n1ku
+n5kä
+n1kö
+2n1l
+2n1m
+4n1n
+nnd4
+n3ne
+nne2s
+nnes5ta
+nnis4
+nn3k
+nn3sa
+nn3s4t
+1no
+no4kl
+2nolj
+no2mar
+2nomr
+nom3s4
+non4st
+2nord
+2norg
+no3sa
+no5sc
+no4tu
+2n1p
+2n5r
+4ns
+n4sint
+n4sise
+ns2k
+n5skal
+ns3kan
+ns3kat
+ns5kon
+ns3kor
+n4skra
+ns5lat
+ns3mi
+ns3mö
+n4soc
+n1spi
+ns3pl
+ns3po
+ns3s4
+ns2t
+n4star
+n2s3te
+ns4tel
+n3stif
+ns3tig
+n1stru
+nst5vil
+n3s4ty
+n1sva
+ns3vär
+2n1t
+n4tark
+nter5s
+nt4ha
+n4tinf
+n2tomb
+n2tra
+nt3rad
+n3trah
+n3trak
+n5trala
+nt3rali
+n5tram
+nt3rep
+n3trer
+nt3ria
+nt3rin
+nt3ris
+n4tropin
+nts2
+nts3c
+nt4se
+nt3skal
+nts5ko
+n3tvät
+nufts4
+3nui
+1num
+2nup
+n3upp
+2nutb
+2n1v
+ny5gr
+n5z
+4näc
+3näm
+4nö.
+4nöa
+4nög
+nö2ja
+nörs4k
+o1a
+o2ard
+5o4bj
+o4bli
+oc4k5r
+ock3sk
+oc1ku
+o1d
+ode4k
+ode5si
+odi4a
+3odlin
+o5dral
+o3dro
+ods4k
+ods4m
+od5stu
+o1e
+o3fr
+o3fä
+o1g
+oges4
+o4gj
+o5glo
+o5gly
+ognos2
+ogno5st
+og3se
+o1h
+o1i
+o4il
+o1j
+o1k
+ok4la
+o4kli
+ok3na
+o2kry
+ok3sl
+o2kv
+o1la
+o5lak
+ol5au
+olfö4
+ol3g
+1olj
+olk3rä
+ol2ku
+ol3lä
+o1lo
+o1lu
+o1ly
+o1lä
+o3lö
+ol5år
+3ombud
+o3me
+o3mi
+om5pa
+om3pl
+1omr
+4omra
+om3sla
+om4ste
+3omsät
+o3mä
+on3c
+on5gi
+on1gr
+ongs4l
+o4nins
+on1k
+ons3c
+onsi3s
+on1sta
+on5stel
+ons4ter
+on3tras
+on4tre
+o1ny
+o1nä
+o3nö
+on5å
+oo4d
+o3or
+o5pline
+op4pl
+opp3le
+opp2s
+o3pri
+5optiko
+o3på
+o5q
+4ora
+o3rak
+oran3g4
+o2rap
+1ordn
+ord3r
+or2d5ä
+o4reh
+1orga
+o3ri
+3orient
+o1ro
+or5pr
+or4sn
+ors5tig
+or4tin
+or2tr
+o1ru
+o3ry
+o1rä
+o1rö
+o3sfä
+o4skar
+osk4l
+o1skop
+o5sn
+o3som
+os5pig
+os4sc
+os4st
+os3ten
+os5tiker
+o5still
+os4tr
+ost5re
+ost5ron
+os3tul
+os5ög
+ota4la
+4oti.
+4otie
+4otin
+o1to
+o5tro
+ot5run
+ot4trä
+ott2s
+otts3p
+o1tu
+o1ty
+o5tä
+o5tö
+4our
+ou4s
+out3s
+out3t
+o1v
+ova4n
+ov3r
+ov4si
+ov5sj
+ov3sl
+o3we
+ox3
+oy2
+o3än
+o3ö
+o3å
+1pa
+3pa.
+4paf
+pag4
+paki3
+pakis4
+pa5la
+pa5ra
+2parb
+4pask
+pa2st
+pas2tel
+pa3u
+2p3b
+2pc
+2pd4
+1pe
+pek5tri
+pekt3ro
+pels4i
+3pen.
+5peng
+3penn
+5pensi
+pent5r
+per4bl
+3perio
+3pers
+pe5tro
+4pex
+4p1f
+p5fl
+4p5g
+4p1h
+1pi
+pi4el
+pi1o
+3pip
+pi5sta
+pi5sto
+p2j
+2p1k2
+p2l
+p4lac
+3plan.
+p4lane
+p5larn
+pla4s
+p3lev
+3plex
+3plic
+1plik
+p3lop
+2p1m
+2p1n
+p3ni
+1po
+5poa
+2poc
+2pof
+po2i
+po3kr
+3polit
+4polj
+poly3
+4porg
+3pos2
+4pov
+2pp
+p3pe
+p4pins
+pp5j
+pp1l
+pp3la
+pp3lin
+pp3ly
+pp3lä
+pp5lö
+pp3lån
+pp3låt
+pp5oc
+pp3of
+pp3ra
+pp3ri
+pp3ry
+pp1st
+p2pu
+p5py
+pp3å
+p2r4
+2pra
+4pre.
+1pres
+pre3sk
+pre3sta
+pres5to
+p1rig
+p3rik
+5pril
+3princ
+pring3
+p5riol
+3pro
+pro3g
+p3ror
+3präs
+5pröv
+2ps
+p2sal
+3psalm
+p5s2ho
+p5sj
+ps4ke
+ps5ke.
+ps4le
+ps2li
+p3sna
+p3sod
+ps5s
+ps2t
+p4stak
+p4sy
+p2sö
+4p1t
+p2tra
+p3tri
+1pu
+pul5tr
+5punk
+pus3t
+2p1v
+5päl
+pä5ro
+p5ög
+på4sk
+påts4
+qu4
+3que
+1ra
+3ra.
+raci4t
+3rade.
+4radr
+ra4du
+5ra1e
+2raffä
+ra3fr
+4rag
+2rak
+ra2lo
+r4ande
+3rande.
+rand3s2
+2ransv
+ra3pl
+3rar
+r4ar.
+4rarb
+r4are
+4rarg
+r4ark
+r4arn
+r4ars
+4rart
+r3arta
+r4as
+ras5h
+ra2st
+3raste.
+3rativ
+ra3tri
+2rav
+ra5yo
+2r1b
+r3bl
+2r1c
+2r1d
+rda5gr
+r2d5ex
+r3dj
+rds4ko
+rd4st
+1re
+3re.
+re3b
+4rec
+5reco
+re5du
+4rej
+re1kr
+rek5tri
+re3lu
+rem5p
+r4en.
+2reni
+2renk
+2renl
+re3o
+3rer.
+3rern
+3reso
+res4sk
+re1sti
+4restr
+re5så
+3ret.
+4retet
+ret3ro
+4rety
+2revig
+4rex
+2r1f
+r3fl
+rfö3ri
+2r1g
+rgs5tra
+2r1h
+3rial
+4rib
+3rifo
+2rifr
+r3ifrå
+3rigt
+3riktn
+rim4s
+3ringen.
+2rinr
+2rins
+2rint
+ri1o
+3riot
+ri5ple
+r1j
+2r1k
+rk3akt
+rkes3
+rk5h
+r2kl
+r4k5lad
+rk3lan
+r3klas
+rk3n
+r4kre
+rk5st
+rk5tr
+r4kup
+r2kv
+r3kvi
+2r1l
+r5laka
+r5lav
+rlds3
+2r1m
+r4marb
+2r1n
+rn3g4
+rn5k4
+r2nom
+rns4k
+rn5sko
+rn3s4t
+ro3b
+rog5s
+2rolj
+rol4li
+rom4a
+5roman
+ro3pl
+ropps3
+ro4ra
+2rord
+2rorg
+2rorie
+3rorn
+2r1p
+r4pö
+r1r
+rra4n
+rreligi5
+r5rib
+rr3k4
+r4rob
+r4rom
+rrs4
+rr5sp
+r4rö
+2rs
+r3sak
+r2sin
+r3skal
+r5skatt
+rsk3na
+r2sku
+r3slag
+rs2m
+rs5min
+rs5nä
+rs2t
+rs5tend
+r5steni
+r4stj
+r1sto
+r4ston
+r3strö
+r3stu
+rstånds4v
+r1sv
+r2svä
+r1sy
+r1så
+4r1t
+r2taf
+r2tak
+rt4re
+rt5res
+r5tri
+r3trä
+rt5t
+r4tut
+rt5va
+rt5vå
+ru3br
+ruks1
+5rullera
+rull3s
+runn2
+runns5
+4rupp
+ru5sha
+ru4sk
+ru5str
+rut4ra
+5ruö
+2r1v
+r3vj
+rv4s
+r3w
+rydd5s
+ry5o
+ry4pi
+rängs2
+räns5t
+rä5s2ti
+rö2d5el
+röd3sp
+r3öi
+1r2ör
+r1övr
+råge5l
+rå5ra
+1sa
+3sa.
+4sa3dr
+sad5s
+2saf
+sa3i
+2sak
+3sakr
+sak5ri
+3saks
+4s1akt
+sa5lo
+3s2am
+sa2ma
+samman1
+sa4mor
+4sang
+2sanl
+s3anlä
+4sano
+san3sla
+2sap
+2sarb
+4sarm
+4sart
+4sass
+sa4tu
+2sau
+2s1av
+4s3b
+s2c
+4sca
+2sch.
+1scha
+2schb
+1schen
+1scher
+1schi
+2schk
+4schm
+4schp
+4schr
+3schy
+3schö
+3sci
+4scy
+2s3d
+1se
+se4at.
+se2g
+2s3egg
+seg3ra
+sek5le
+sek3r
+sek5tr
+se3kv
+se4kva
+3sel.
+3sen.
+s5ersä
+3ses
+3set.
+4sex
+2s1f
+s3fl
+s2fä
+sfö2
+2s3g2
+2s1h
+s5has
+5shaw
+shi1s
+1si
+si2ett
+3sif
+3sig
+3sik
+sikts3
+sindu3s
+2s1inf
+2sinneh
+sinnes3
+3sinni
+4sinr
+2sins
+s3instr
+sis2t
+3sit
+siu4
+s2j
+s4ju
+5sjuk
+själs3
+2sk.
+4ska.
+s2kada
+s2kado
+3skaffn
+s4kag
+s2kal
+1skap
+5skap.
+5skapet
+skaps3
+s4kara
+4skas
+4ske.
+s4kene
+3skepp
+4skh
+sk4i
+3skido
+1skil
+1skin
+3skiv
+3skj
+4skl
+s1klas
+2skn
+s4ko.
+s4kog
+1s4kol
+3skola
+2skom
+s5korg
+s4korp
+skor3s
+4skos
+5skott
+s5krag
+s4kran
+5skrat
+sk4re
+5skrev
+1skrif
+4s3krig
+3skrip
+3skriv
+4skro
+s5kron
+5skräc
+3skräm
+4skrö
+sk3s
+2skt
+s3kup
+s4kve
+3skvät
+1sky
+5skyd
+s4kyn
+5skärp
+3skärv
+sk5ät
+1skö
+4sköp
+3skåd
+3skål
+5skåps
+2sl2
+s5lad.
+3slagare
+s3land
+5s2lang
+s4lant
+5slinga.
+slin2s3
+s2lit
+s3litt
+s5lor
+5slott.
+slotts5
+s2lu
+s3luc
+s3luf
+3slum
+5slup
+4slus
+3slut
+s5länn
+3släp
+s5lär
+s2lät
+3s2löj
+s3löst
+5slå.
+5slår
+2sm
+s4mak.
+s2mal
+s2mi
+s4mic
+3smitta
+s5mj
+5smug
+3smäd
+3smäl
+2s2n4
+3snab
+s4nac
+3s4nib
+3snil
+3snit
+5snäc
+3snö.
+5snön
+3s4nör
+s4nå
+3snål
+1so
+5soi
+2solj
+sols2
+so4lö
+2som
+5son
+son4s
+sopp5s
+so5pr
+so4pu
+3sor.
+4sord
+3sorn
+3sot
+4sott
+s2p2
+4s3pap
+s4park
+spa5tr
+4sped
+5speg
+1s4pek
+3spel
+4spen
+3spet
+3spill
+2spip
+3spir
+4spl
+s1pla
+s3plats
+spli4
+s5plik
+5split
+4spol
+4spos
+s3pres
+3sprid
+s3pris
+2spro
+3spru
+s3pry
+3sprän
+3språ
+3spån
+3spår
+2s1r
+4s1s
+s5sad
+s4satt
+sse4lin
+s5sja
+ss2k
+ss5kl
+ss3kun
+ss1l
+s3s2lä
+ss3n
+ss2t
+ss3unn
+s2sv
+4st.
+s2ta
+4sta.
+1stadi
+1stads
+s4taf
+5stalgis
+3stalle
+3stallk
+1stant
+s4tart
+5start.
+1state
+4stations
+3statl
+1stau
+2stb
+2stc
+4s3te.
+1s2teg
+s4tek.
+s2tem
+3stem.
+3steme
+s4tena
+3stenar
+3stene
+3stense
+1stera
+1stering
+3sterne
+4stes
+5stetis
+s4ti.
+2stia
+2stib
+3stick
+2stid
+s4tie
+s2tif
+s2tik
+s4tiken
+2s2til
+3stil.
+s2tim
+s4tin.
+3stink
+3s2tisc
+1s2tit
+s5tju
+5stjäl
+3stjär
+2stm
+2stn
+5stoc
+1stol
+stori4eu
+5storis
+stor3s
+3straff
+4strativ
+3strato
+3strej
+st3ren
+1strer
+1strid
+5strim
+1struk
+5strump
+s5tryc
+5sträc
+3sträng
+3ström
+5stråk
+2st3s2
+st5t
+1s2ty
+4styn
+2styp
+3styr
+1stä
+3stäl
+2stäv
+5stäve
+1stö
+1stå
+4ståg
+1su
+su2b
+3sud
+3sug
+su3i
+3s2um
+2sun
+5sun.
+4sund
+5sune
+2sup
+5supa
+5supplea
+su2pu
+5s4us
+2sut
+s5utd
+su4to
+s3uts
+s2v2
+4s3vak
+5svam
+4svap
+svars3
+s3vat
+4svec
+3sven
+s3ver
+s5ves
+4s3vil
+4svis
+s3vät
+s5våd
+2syk
+5syl
+5syn
+syn5k
+3sys
+1sä
+3säk
+s4äl
+2säp
+3sät
+4säta
+1sö
+4söd
+2sög
+s5öga
+4söl
+sör2s
+2söv
+sång3
+1ta
+3ta.
+tab2
+ta3ch
+3tade.
+4tadi
+4tads3
+2taff
+5takl
+ta5kre
+2taktig
+5tallise
+3tame
+3tami
+3tan.
+ta4nab
+3tande.
+2tanf
+t3anfa
+4tanl
+2tappar
+3tar.
+4tarb
+tar4mi
+3tarn
+tars4
+5tas.
+3tast
+ta1str
+ta4tan
+tat2s3
+2tatt
+2tav
+4tave
+3tavlan
+3tax
+2t3b4
+2tc
+t3cha
+t3che
+2t3d
+1te
+te4as
+teb4
+3tec
+4teg.
+te2gr
+te3gre
+te3i
+te4int
+te4kl
+te3kv
+tel4f
+3tema
+te4mu
+ten3g4
+tenk4
+3tensi
+te5nu
+te4nä
+5ter.
+5teriö
+terk4
+5term
+3tern
+ter5sl
+te2r5u
+3tes
+te5stik
+te5stu
+5tetik
+tet4s1
+2texp
+2t3f4
+2t3g4
+2t1h
+t4hen
+5t2hi
+1ti
+3tial
+3tib
+2tic
+3tici
+3tid
+tids3t
+4tidö
+tifts5
+ti2gel
+2tign
+ti2gr
+3tigt
+3tiks
+5tilj
+3tillst
+3tillv
+5time
+2tink
+2tinr
+2tint
+ti2os
+3tisk
+3tiv
+ti4van
+4tivita
+ti2ö
+t2j
+t4jat
+4tje
+2tjo
+3tjän
+2t3k4
+2t1l
+2t1m
+2t5n4
+tne4
+3tok
+4tol.
+4tolj
+2tomr
+2torg
+5toriett
+torm5s
+1torn
+tor1st
+tos4k
+2t1p
+t2r
+t4raf
+5trafi
+3t4ral.
+t4rala
+3t4rale
+5tralo
+3trals
+t4ralt
+1trans
+5tran2s5a
+4trar
+t3rat.
+t4rato
+4trer.
+4trern
+2tri
+3tribu
+trids3
+t3rif
+t1ring
+t3ring.
+4trio
+5trod
+t4rog
+4tropi.
+4tror
+5trotn
+t3rum.
+t4rump
+3trupp
+trus5ta
+3träd
+träds4
+3träg
+4träk
+t3räkn
+t4rän
+5tröja
+4tråk
+2ts
+t4sank
+ts5art
+ts5au
+t4sci
+ts5f
+t2si
+t5skatt
+ts4ked
+t4sku
+t5skul
+ts5läk
+ts4met
+ts3nä
+t3snö
+t2so
+ts5ord
+ts3s
+ts2te
+t4stra
+ts5tv
+t2su
+ts3vär
+2tt
+t2tak
+t4tau
+tte5g4
+tte2n
+t4tip
+tt3ja
+t1to
+tt3rad
+tt3rand
+tt3rat
+tt3re
+tt3ri
+t1t4ry
+tt5ski
+tts4ko
+t3tu
+tt3vi
+t5ty
+t3tä
+t3tö
+tugg4
+2tunde
+3tunga
+2tup
+tu5re
+2tutb
+t4utr
+t3utv
+t3utö
+5tuö
+2tv
+t1var
+tvin4s
+tvit5
+3tviv
+t3vän
+3tvån
+ty3da
+tyg5r
+3typ
+2tz
+täc4ko
+2täl
+5tält
+4täm
+1tävl
+tö2do
+4tög
+törs3t
+3tåg
+u1a
+ub5al
+ub3lic
+u1blik
+u3cha
+ucku5
+u5cl
+u2dak
+u5de
+ud3r
+ud4ret
+ud3s4a
+u1e
+u3fl
+uf4to
+4u1ga
+u1ge
+ug4gr
+ugg3s
+ugn4
+ug3s4
+u3h
+u5ie
+u1in
+u3is
+u3itet
+u1j
+u2keb
+u5ki
+uk3n
+u1ko
+ukos2
+uk2s
+uks3p
+uks3v
+uk3tr
+u3ku
+uk1v
+u1la
+ul2di
+uld3sm
+ul4du
+ulls2
+ull4sk
+ull3än
+u1lo
+u3lu
+u1lä
+u1lö
+ums2te
+u1mu
+u3mö
+3underl
+1undersö
+1underv
+un4dom
+un5g2ef
+un3gersk
+ung5it
+3unif
+unk5l
+unk3n
+un4ko
+un1sk
+un2tr
+un5trati
+u5nu
+u5nä
+u1o
+u4pern
+u2pl
+u3plet
+up3lik
+1uppg
+up4pin
+1uppla
+3upplä
+up4p3r
+upp3s
+upp5sp
+up5ut
+u5rag
+ur5ak
+ur5arv
+u3re
+u1ri
+u1ro
+u4rob
+u4rom
+ur1sp
+urs5ten.
+urs5tin
+ur4stä
+ur4sv
+u5ry
+u3rö
+us5anl
+u3se
+us2ha
+us4he
+us1k
+us4kl
+us4kr
+us2ky
+us5lä
+us3n
+us3pen
+us2st
+us5tat
+u3stik
+u3strin
+u3stris
+u4stä
+ut5arm
+1utb
+ute3s
+u4tif
+uti3ö
+ut3j
+3utjäm
+utlands3
+u1to
+u3top
+uto5s
+1ut3r
+ut4rer
+ut4ro
+ut5rop
+5utru
+ut1s
+ut5sa
+2utsid
+ut3sl
+3utslä
+ut5trö
+ut1v
+3utvec
+u5ty
+u3tör
+ut3öv
+ut5å
+u5u
+2u1v
+u2vak
+u3ö
+u5å
+2v1akti
+5vama
+4vanp
+2varb
+va4res
+var2s
+vars3v
+va1r4u
+vas5ti
+5vattn
+4vau
+4vav
+5vavi
+2v1b4
+2vc
+2v3d4
+1ve
+ve2k
+ve3ke
+5ventera
+ve3ny
+4vep
+3verk
+ver4ste
+ve2s5p
+ve1st
+3veta
+3vete
+2v5f
+2v1g
+2v1h
+v4i
+vid3s
+vild3s
+vings4
+3vinkl
+vin2st
+vi5ny
+3vis.
+vi5sa
+vis5h
+vi4st
+vis3ta
+vi2tr
+2vj
+2v1k2
+2v1l
+2vm
+vmörk4
+2v1n4
+1vo
+2vom
+2vorg
+vos4
+2v3p
+2vr
+v2re
+3vrera
+2vs
+v1s2k
+vs4ka
+v3sni
+v2so
+vss4
+vs4te
+v5sto
+v5sty
+vs3vå
+v2sö
+2v1t
+vu2d1
+2vun
+v1und
+4v5up
+4vut
+2v1v
+3vy
+3väg
+vä4l
+5väld
+väll4s3
+väl5p
+1värd
+4värj
+3värld
+3väx
+3vö
+vång4s3
+3vård
+1wa
+we2
+whi2
+wi2e
+w4na
+x1a
+xan5
+xand4
+x1c
+x1e
+xe3k
+xem3pla
+x1i
+xis2
+x1k2
+x1l
+xli4
+x1n
+x1o
+x1p
+xs4
+x1t
+xti2
+x4tå
+x3u
+y1a
+yb4s
+ycks5k
+ycks5t
+y2da
+y5dan
+ydd4
+yd3r
+yd3s
+y1e
+y1ga
+y1ge
+yg4gj
+ygs4a
+ygs4p
+y1h
+y1i
+y3ki
+y5klist
+yk5lon
+y1ko
+4yl
+y1la
+yl2gj
+yl5lä
+y1lo
+y3må
+yng3r
+ynk5l
+yn5ko
+yn4s
+y3or
+y5ou
+y5po
+yp3ri
+yre4s
+y1ri
+y1ro
+yr5tu
+y1rå
+y5scho
+ys3ko
+yskon5s
+ys5sa
+ys4st
+ys3ta
+ys3ti
+ys4tik.
+yst3ra
+y2tak
+y2te.
+y4tea
+y1to
+ytt3r
+y3va
+y3vi
+y5w
+1za
+1ze
+ze4ro
+1zi
+1zo
+z5s
+3zu
+z4zin
+ä1a
+äde4s
+äd3r
+äd5se
+äd3st
+ä3e
+ä1ga
+ä1ge
+äg1l
+äg3r
+äg4re
+äg3se
+ä3h
+ä3i
+ä5jo
+4äk
+ä1ki
+äk3la
+äk3n
+äk3r
+ä1la
+äl2p
+äl4seg
+äls5kog
+äl4sl
+ält3r
+äl2tu
+äl4vin
+ämp3l
+änd1st
+änni5s
+änn3s
+ä4no
+äns1l
+än4st
+än4sv
+än2t3r
+äpp3l
+ä4pr
+ä4rap
+är2bre
+ä1ri
+är4nå
+är5ob
+ä3rop
+ä5ror
+ä5ros
+är2si
+är2so
+är2sv
+ärt3s
+4äs
+äs5na
+äs3pa
+äs5pi
+äs3ta
+äst3r
+2ät
+ä3to
+ä5tre
+ätt3r
+ä1va
+ä2vak
+ä3vi
+ä5vu
+ö1a
+ö1b
+ö4dak
+öde4s
+öd3r
+öd2s
+öd3se
+ö2d5ö
+ö1e
+ö1ga
+ög5ak
+ö5gar
+ö1ge
+ö5gen
+ö5ger
+ög1l
+ög2n
+ögn3e
+1ögon
+ög3s
+ög4st
+ö1i
+ö3jo
+ö1ki
+ök5n
+ö5kr
+ök2s
+ö1la
+ölk5s
+öl4kö
+öl2p
+ö5lä
+öman4
+ö2nom
+öns3ke
+ön4so
+önst3r
+öp5li
+ö5plo
+3öppn
+ö2ra
+ö3rande
+ö3ras
+ör3d4r
+ör1eni
+ö3res
+ö3ret
+ör5evig
+ör3g
+ö1ri
+ö5rig
+ö5ring
+ör3int
+ör5ir
+ör5iv
+örk2
+ör3kl
+ör3ol
+ör1or
+ör2pla
+ör1sk
+örs2ka
+ör3sla
+ör3u
+ör3vr
+ör3y
+ör1ä
+ör1ö
+ös4sk
+ös3ta
+öst3rä
+ö2tak
+ö1v
+öve4
+över3
+5övere
+öv3ri
+å1a
+å1b
+å1d
+å3dj
+ådjurs5
+åd3r
+åds4l
+ådå4
+å1e
+å1f
+å3fl
+å1ga
+å1ge
+åge2l
+åg5l
+åg3st
+å1h
+å3i
+å1k
+å4kre
+åk4st
+å2ku
+å4kv
+å1la
+3ålder
+å2lin
+ål2s5e
+ål5tr
+å1lä
+å1m
+åman4s
+ån4dr
+ång3r
+åns4t
+å3o
+å1p
+å2pl
+å5pla
+ård2s
+å1ri
+å5ror
+5årsav
+år2sv
+år4så
+å3ru
+år5ö
+å1s2
+å3sa
+å3se
+å3skå
+ås3n
+ås3s4
+åte2
+åt3ri
+å3trå
+åts5j
+å3tö
+å1v
diff --git a/include/README b/include/README
new file mode 100644
index 0000000..0204b0c
--- /dev/null
+++ b/include/README
@@ -0,0 +1,73 @@
+Directory lout/include
+
+This directory contains Lout source files for the standard packages.
+The following listing classifies them into types of files.
+
+Setup files (containing mainly lists of options settable by the user)
+---------------------------------------------------------------------
+
+   Setup files for basic document types (choose one):
+
+       doc              The OrdinarySetup package
+       report           The ReportSetup package
+       book             The BookSetup package
+       slides           The OverheadsSetup package
+       picture          The IllustrationSetup package
+
+   Setup files for special-purpose packages (choose any combination):
+
+       tbl              The Tbl table formatting package
+       tab              The Tab table formatting package (OBSOLETE, use tbl)
+       eq               The Eq equation formatting package
+       diag             The Diag diagram drawing package
+       fig              The Fig advanced graphics package (OBSOLETE, use diag)
+       graph            The Graph graph drawing package
+       cprint           The cprint C and C++ program printing package
+       pas              The Pas Pascal progam printing package
+       modula           The Modula Modula-2 progam printing package
+       latin2           The Latin2 (Eastern European characters) package
+       russian          The Russian language package
+
+Source files (containing Lout and PostScript source code for the packages)
+--------------------------------------------------------------------------
+
+       bsf              The BasicSetup package
+       bsf.lpg          A PostScript prepend file needed by BasicSetup
+       dsf              The DocumentSetup package
+       docf             The OrdinarySetup package
+       reportf          The ReportSetup package
+       bookf            The BookSetup package
+       slidesf          The OverheadsSetup package
+       picturef         The IllustrationSetup package
+
+       tabf             The Tab table formatting package (OBSOLETE)
+       tabf.lpg         A PostScript prepend file needed by tabf (OBSOLETE)
+       tblf             The Tbl table formatting package
+       tblf.lpg         A PostScript prepend file needed by tblf
+       eqf              The Eq equation formatting package
+       figf             The Fig advanced graphics package (OBSOLETE)
+       figf.lpg         A PostScript prepend file needed by figf (OBSOLETE)
+       diagf            The Diag diagram drawing package
+       diagf.etc        A file included by diagf
+       diagf.lpg        A PostScript prepend file needed by diagf
+       graphf           The Graph graph drawing package
+       graphf.etc       A file included by graphf
+       graphf.lpg       A PostScript prepend file needed by graphf
+       cprintf          The cprint C and C++ program printing package
+       pasf             The Pas Pascal progam printing package
+       modulaf          The Modula Modula-2 progam printing package
+       latin2.fd        Latin2 font definitions file (placeholder file)
+       russian.fd       Russian font definitions file (placeholder file)
+
+Miscellaneous
+-------------
+
+       fontdefs         Standard font definitions file
+       langdefs         Standard language definitions file
+       mydefs           Empty file for if the user doesn't have one
+       ts               The ToySetup package (an expert users' intro. example)
+       init             A Lout source file used during installation (lout -x)
+
+
+Jeffrey H. Kingston
+26 May 1999
diff --git a/include/book b/include/book
new file mode 100644
index 0000000..2d28f62
--- /dev/null
+++ b/include/book
@@ -0,0 +1,376 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for books                                                 #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   17 September 1999                                                         #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  @SysInclude commands for standard packages.                                #
+#                                                                             #
+###############################################################################
+
+  @SysInclude { fontdefs	} # font definitions
+  @SysInclude { langdefs	} # language definitions
+  @SysInclude { bsf		} # BasicSetup package
+  @SysInclude { dsf		} # DocumentSetup package
+  @SysInclude { bookf		} # BookSetup extension
+
+
+###############################################################################
+#                                                                             #
+#  @Include command for reading personal definitions from current directory.  #
+#                                                                             #
+###############################################################################
+
+  @Include { mydefs }
+
+###############################################################################
+#                                                                             #
+#  The @BasicSetup @Use clause - basics, lists, paragraphs, displays.         #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+ 
+@Use { @BasicSetup
+  # @InitialFont	{ Times Base 12p	} # initial font
+  # @InitialBreak	{{adjust 1.2fx hyphen} @OrIfPlain {ragged 1fx nohyphen}}
+  # @InitialSpace	{ lout			} # initial space style
+  # @InitialLanguage	{ English		} # initial language
+  # @InitialColour	{ black			} # initial colour
+  # @OptimizePages	{ No			} # optimize page breaks?
+  # @HeadingFont	{ Bold			} # font for @Heading
+  # @ParaGap		{ 1.3vx @OrIfPlain 1f	} # gap between paragraphs
+  # @ParaIndent		{ 2.00f	@OrIfPlain 5s	} # first-line indent for @PP
+  # @DisplayGap		{ 1.00v	@OrIfPlain 1f	} # gap above, below displays
+  # @DisplayIndent	{ 2.00f	@OrIfPlain 5s	} # @IndentedDisplay indent
+  # @DefaultIndent	{ 0.5rt			} # @Display indent
+  # @DisplayNumStyle	{ (num)			} # style of display numbers
+  # @WideIndent		{ 4.00f	@OrIfPlain 10s	} # @WideTaggedList indent
+  # @VeryWideIndent	{ 8.00f	@OrIfPlain 20s	} # @VeryWideTaggedList indent
+  # @ListOuterGap	{ 1.00v	@OrIfPlain 1f	} # gap before, after lists
+  # @ListGap		{ 1.00v	@OrIfPlain 1f	} # gap between list items
+  # @ListIndent		{ 0s			} # indent of list items
+  # @ListRightIndent	{ 0s			} # right indent of list items
+  # @ListLabelWidth	{ 2.00f	@OrIfPlain 5s	} # width allowed for list tags
+  # @NumberSeparator	{ .			} # separates nums like 2.3.7
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @DocumentSetup @Use clause - page layout plus figures, tables, etc.    #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+
+@Use { @DocumentSetup
+  # @PageType		{ A4	@OrIfPlain Other} # page type (width, height)
+  # @PageWidth		{ 80s			} # page width if type Other
+  # @PageHeight		{ 66f			} # page height if type Other
+  # @PageOrientation	{ Portrait		} # Portrait, Landscape, etc.
+  # @PageBackground	{  			} # background of each page
+  # @TopMargin		{ 2.5c	@OrIfPlain 6f	} # top margin of all pages
+  # @FootMargin		{ 2.5c	@OrIfPlain 6f	} # bottom margin of all pages
+  # @OddLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of odd pages
+  # @OddRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of odd pages
+  # @EvenLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of even pages
+  # @EvenRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of even pages
+  # @PageBoxType	{ None			} # None Box CurveBox ShadowBox
+  # @PageBoxMargin	{ 1.00c			} # page box margin
+  # @PageBoxLineWidth	{			} # page box line thickness
+  # @PageBoxPaint	{ none			} # page box paint
+  # @PageBoxShadow	{ 0.60c			} # shadow margin if ShadowBox
+  # @ColumnNumber	{ 1			} # number of columns (1 to 10)
+  # @ColumnGap		{ 1.00c	@OrIfPlain 6s	} # column gap
+  # @FigureLocation	{ PageTop		} # default figure location
+  # @TableLocation	{ PageTop		} # default table location
+  # @FigureFormat	{ @CC @Body		} # default figure format
+  # @TableFormat	{ @CC @Body		} # default table format
+  # @FigureWord		{ figure		} # "Figure" word else anything
+  # @TableWord		{ table			} # "Table" word else anything
+  # @FigureNumbers	{ Arabic		} # method of numbering figures
+  # @TableNumbers	{ Arabic		} # method of numbering tables
+  # @FigureCaptionPos	{ Below 		} # Above or Below
+  # @TableCaptionPos	{ Below			} # Above or Below
+  # @CaptionFont        {                       } # figure, table caption font
+  # @CaptionBreak       {                       } # figure, table caption break
+  # @CaptionFormat      { @B { number @DotSep @OneCol }	} # figure, table caption format
+  # @MakeFigureContents { No                    } # list of figures at start
+  # @MakeTableContents  { No                    } # list of tables at start
+  # @MakeContents	{ No			} # make contents? Yes or No
+    @MakeContents	{ Yes			} # make contents? Yes or No
+  # @ContentsGap	{ 0.20v	@OrIfPlain 0f	} # extra gap above minor entry
+  # @ContentsGapAbove	{ 0.80v	@OrIfPlain 1f	} # extra gap above major entry
+  # @ContentsGapBelow	{ 0.00v	@OrIfPlain 0f	} # extra gap below major entry
+  # @ContentsFont       { Bold                  } # font for major entry
+  # @ContentsPartGapAbove { 1.00v @OrIfPlain 1f	} # extra gap above `part' entry
+  # @ContentsPartGapBelow { 0.00v @OrIfPlain 0f	} # extra gap below `part' entry
+  # @ContentsFormat	{ number @DotSep title	} # contents entry format
+  # @ContentsLeader	{ ..			} # leader symbol in contents
+  # @ContentsLeaderGap	{ 4s	@OrIfPlain 2s	} # gap between leaders
+  # @ContentsRightWidth	{ 3f	@OrIfPlain 6s	} # page numbers column width
+  # @MakeReferences	{ Yes			} # make references? Yes or No
+  # @RefCiteStyle	{ [cite]		} # citation style
+  # @RefCiteLabels	{ @RefNum		} # citation items
+  # @RefNumbers		{ Arabic		} # reference numbers
+  # @RefListFormat	{ Labels		} # NoLabels, Labels, etc.
+  # @RefListLabels	{ [@RefNum]		} # ref list label format
+  # @RefListTitle	{ references		} # title of reference list
+  # @ChapRefListTitle	{ references		} # title of chapter ref list
+  # @RefListIndent	{ 0s			} # indent to left of labels
+  # @RefListRightIndent	{ 0s			} # indent to right of items
+  # @RefListGap		{ @ListGap		} # gap between ref list items
+  # @RefListFont	{        		} # font used in reference list
+  # @RefListBreak	{        		} # break style of ref list
+  # @RefListLabelWidth 	{ @ListLabelWidth	} # Labels column width
+  # @RefListSortKey	{ @Tag			} # sorting key
+  # @MakeIndex		{ No			} # make index? Yes or No
+    @MakeIndex		{ Yes			} # make index? Yes or No
+  # @IndexFont		{			} # index entries font
+  # @IndexBreak		{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexColumnNumber	{ 2			} # index columns (1 to 10)
+  # @IndexColumnGap	{ 1.00c	@OrIfPlain 6s	} # index column gap
+  # @MakeIndexA		{ No 			} # make index A? Yes or No
+  # @IndexAFont		{			} # index A entries font
+  # @IndexABreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexAColumnNumber	{ 2			} # index A columns (1 to 10)
+  # @IndexAColumnGap	{ 1.00c	@OrIfPlain 6s	} # index A column gap
+  # @MakeIndexB		{ No 			} # make index B? Yes or No
+  # @IndexBFont		{			} # index B entries font
+  # @IndexBBreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexBColumnNumber	{ 2			} # index B columns (1 to 10)
+  # @IndexBColumnGap	{ 1.00c	@OrIfPlain 6s	} # index B column gap
+  # @TopGap		{ 0.75c	@OrIfPlain 2f	} # gap between figures
+  # @MidGap		{ 0.75c	@OrIfPlain 2f	} # gap above/below body text
+  # @FootNoteNumbers	{ Arabic		} # footnote numbers
+  # @FootNoteThrough	{ No			} # numbered through chapter?
+  # @FootNoteLocation	{ ColFoot		} # where the footnote appears
+  # @FootNoteFont	{ 0.80f			} # font for footnotes
+  # @FootNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for footnotes
+  # @FootNoteFormat     { { number &0.05f } @Insert body } # footnote format
+  # @FootLen		{ 2.00c	@OrIfPlain 10s	} # length of footnote line
+  # @FootAboveGap	{ @DisplayGap		} # gap above footnote line
+  # @FootGap		{ 0.20c	@OrIfPlain 1fx	} # gap between footnotes
+  # @MarginNoteFont	{ 0.80f			} # font of margin notes
+  # @MarginNoteBreak	{ ragged 1.10fx		} # break style of margin notes
+  # @MarginNoteHGap	{ 0.5c   		} # horizontal gap to notes
+  # @MarginNoteVGap	{ @DisplayGap		} # min vertical gap between
+  # @MarginNoteWidth	{ 1.50c  		} # width of margin notes
+  # @EndNoteNumbers	{ Arabic		} # endnote numbers
+  # @EndNoteFont	{ 0.80f			} # font of endnotes
+  # @EndNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for endnotes
+  # @EndNoteFormat	{ { number &0.05f } @Insert body } # endnote format
+  # @EndNoteGap		{ 0.20c	@OrIfPlain 1f	} # gap between endnotes
+  # @TheoremWord	{ theorem		} # "Theorem" word, etc.
+  # @TheoremTitleFormat	{ (title)		} # only if title present
+  # @TheoremFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @DefinitionWord	{ definition		} # "Definition" word, etc.
+  # @DefinitionTitleFormat { (title)		} # only if title present
+  # @DefinitionFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ClaimWord		{ claim			} # "Claim" word, etc.
+  # @ClaimTitleFormat	{ (title)		} # only if title present
+  # @ClaimFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @PropositionWord	{ proposition		} # "Proposition" word, etc.
+  # @PropositionTitleFormat { (title)		} # only if title present
+  # @PropositionFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @LemmaWord		{ lemma			} # "Lemma" word, etc.
+  # @LemmaTitleFormat	{ (title)		} # only if title present
+  # @LemmaFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @CorollaryWord	{ corollary		} # "Corollary" word, etc.
+  # @CorollaryTitleFormat { (title)		} # only if title present
+  # @CorollaryFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ExampleWord	{ example		} # "Example" word, etc.
+  # @ExampleTitleFormat	{ (title)		} # only if title present
+  # @ExampleFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ProofWord		{ proof			} # "Proof" word, etc.
+  # @PageHeaders	{ Simple		} # None Simple Titles NoTitles
+    @PageHeaders	{ Titles		} # None Simple Titles NoTitles
+  # @PageNumbers	{ Arabic		} # page numbers
+  # @FirstPageNumber	{ 1			} # number of first page 
+  # @IntroPageNumbers	{ Roman			} # intro page numbers
+  # @IntroFirstPageNumber{ 1			} # number of first intro page 
+  # @StructPageNums	{ No			} # make structured page numbers
+
+  # @OddTop		{ @Centre{- @PageNum -}	} # Simple page headers
+  # @OddFoot		{ @Null			}
+  # @EvenTop		{ @Centre{- @PageNum -}	}
+  # @EvenFoot		{ @Null			}
+  # @StartOddTop	{ @Null			}
+  # @StartOddFoot	{ @Null			}
+  # @StartEvenTop	{ @Null			}
+  # @StartEvenFoot	{ @Null			}
+  # @IntroOddTop	{ @Null			}
+  # @IntroOddFoot	{ @Centre @PageNum	}
+  # @IntroEvenTop	{ @Null			}
+  # @IntroEvenFoot	{ @Centre @PageNum	}
+  # @IntroStartOddTop	{ @Null			}
+  # @IntroStartOddFoot	{ @Null			}
+  # @IntroStartEvenTop	{ @Null			}
+  # @IntroStartEvenFoot	{ @Null			}
+
+						  # Titles, NoTitles headers
+  # @RunningOddTop  { @I {@MinorNum @DotSep @MinorTitle} @Right @B @PageNum }
+  # @RunningOddFoot		{ @Null					}
+  # @RunningEvenTop { @B @PageNum @Right @I {@MajorNum @DotSep @MajorTitle} }
+  # @RunningEvenFoot		{ @Null					}
+  # @RunningStartOddTop 	{ @Null					}
+  # @RunningStartOddFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+  # @RunningStartEvenTop	{ @Null					}
+  # @RunningStartEvenFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+  # @RunningIntroOddTop		{ @Null					}
+  # @RunningIntroOddFoot	{ @Right @PageNum			}
+  # @RunningIntroEvenTop	{ @Null					}
+  # @RunningIntroEvenFoot	{ @PageNum				}
+  # @RunningIntroStartOddTop	{ @Null					}
+  # @RunningIntroStartOddFoot	{ @Null					}
+  # @RunningIntroStartEvenTop	{ @Null					}
+  # @RunningIntroStartEvenFoot	{ @Null					}
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @BookSetup @Use clause - options specific to books.                    #
+#                                                                             #
+###############################################################################
+
+@Use { @BookSetup
+  # @TitlePageFont		{ Helvetica Base} # title page font (not size)
+  # @SeparateIntroNumbering	{ Yes		} # separate intro page numbers
+  # @PrefaceAfterContents  	{ No		} # Yes or No
+  # @ChapterStartPages		{ Any		} # Any, Odd, or Even
+  # @ReferencesBeforeAppendices	{ No		} # references before appendices
+  # @PrefaceWord		{ preface	} # word for "Preface"
+  # @ContentsWord		{ contents	} # word for "Contents"
+  # @FigureListWord		{ figurelist	} # word for "List of Figures"
+  # @TableListWord		{ tablelist	} # word for "List of Tables"
+  # @IntroductionWord		{ introduction	} # word for "Introduction"
+  # @ChapterWord		{ chapter	} # word for "Chapter"
+  # @AppendixWord		{ appendix	} # word for "Appendix"
+  # @IndexWord			{ index		} # word for "Index"
+  # @IndexAWord			{ index		} # word for "Index" (A)
+  # @IndexBWord			{ index		} # word for "Index" (B)
+  # @ChapterNumbers		{ Arabic	} # kind of chapter numbers
+  # @FirstChapterNumber		{ 1		} # first chapter number (Arabic)
+  # @SectionNumbers		{ Arabic	} # kind of section numbers
+  # @FirstSectionNumber		{ 1		} # first section number (Arabic)
+  # @SubSectionNumbers		{ Arabic	} # kind of subsection numbers
+  # @FirstSubSectionNumber	{ 1		} # first subsect number (Arabic)
+  # @SubSubSectionNumbers	{ Arabic	} # kind of sub-subs. numbers
+  # @FirstSubSubSectionNumber	{ 1		} # first sub-sub number (Arabic)
+  # @AppendixNumbers		{ UCAlpha	} # kind of appendix numbers
+  # @FirstAppendixNumber	{ 1		} # first appendix num (Arabic)
+  # @SubAppendixNumbers		{ Arabic	} # kind of subappendix numbers
+  # @FirstSubAppendixNumber	{ 1		} # first sub-app num (Arabic)
+  # @SubSubAppendixNumbers	{ Arabic	} # kind of sub-subapp. numbers
+  # @FirstSubSubAppendixNumber	{ 1		} # first sub-sub num (Arabic)
+  # @PartHeadingFont		{ Helvetica Base 2.50f	} # part head font
+  # @PartHeadingBreak		{ clines 1.2fx nohyphen	} # part head break
+  # @PartHeadingFormat          { @CD number @DP @CD title } # part head format
+  # @ChapterHeadingFont		{ Bold 2.00f		} # chapter head font
+  # @ChapterHeadingBreak	{ ragged 1.2fx nohyphen	} # chapter head break
+  # @ChapterHeadingFormat	{ number @DotSep title	} # format of chap. head
+  # @SectionHeadingFont		{ Bold			} # section head font
+  # @SectionHeadingBreak	{ ragged 1.2fx nohyphen	} # section head break
+  # @SectionHeadingFormat	{ number @DotSep title	} # section head fmt
+  # @SubSectionHeadingFont	{ Bold			} # subs. head font
+  # @SubSectionHeadingBreak	{ ragged 1.2fx nohyphen	} # subs. head break
+  # @SubSectionHeadingFormat	{ number @DotSep title	} # subs. head fmt
+  # @SubSubSectionHeadingFont	{ Slope			} # sub-subs. head font
+  # @SubSubSectionHeadingBreak	{ ragged 1.2fx nohyphen	} # sub-subs. head break
+  # @SubSubSectionHeadingFormat	{ number @DotSep title	} # sub-subs. head fmt
+  # @AppendixHeadingFont	{ Bold 2.00f		} # appendix head font
+  # @AppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # appendix head break
+  # @AppendixHeadingFormat	{ number @DotSep title	} # appendix head fmt
+  # @SubAppendixHeadingFont	{ Bold			} # subapp. head font
+  # @SubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # subapp. head break
+  # @SubAppendixHeadingFormat	{ number @DotSep title	} # subapp. head fmt
+  # @SubSubAppendixHeadingFont	{ Slope			} # sub-suba. head font
+  # @SubSubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # sub-suba. head break
+  # @SubSubAppendixHeadingFormat{ number @DotSep title	} # sub-suba. head fmt
+  # @AbovePartGap		{ 4.00f			} # gap above part title
+  # @AboveChapterGap		{ 3.00f			} # above major titles
+  # @SectionGap			{ 2.0v	@OrIfPlain 3f	} # between sections
+  # @SubSectionGap		{ 1.5v	@OrIfPlain 2f	} # between subsects
+  # @SubSubSectionGap		{ 1.5v	@OrIfPlain 2f	} # between sub-subs.
+  # @SubAppendixGap		{ 2.0v	@OrIfPlain 3f	} # between subappendices
+  # @SubSubAppendixGap		{ 1.5v	@OrIfPlain 2f	} # between sub-subapps
+  # @AbbreviationsInContents	{ Yes		} # add abbreviations to contents
+  # @IntroductionInContents	{ Yes		} # add introduction to contents
+  # @PartInContents		{ Yes		} # add parts to contents
+  # @ChapterInContents		{ Yes		} # add chapters to contents
+  # @SectionInContents		{ Yes		} # add sections to contents
+  # @SubSectionInContents	{ Yes		} # add subsections to contents
+  # @SubSubSectionInContents	{ No		} # add sub-subsects to contents
+  # @AppendixInContents		{ Yes		} # add appendices to contents
+  # @SubAppendixInContents	{ Yes		} # add subappendices to contents
+  # @SubSubAppendixInContents	{ No		} # add sub-subapps to contents
+  # @ReferencesInContents	{ Yes		} # add ref. section to contents
+  # @IndexInContents		{ Yes		} # add index to contents
+  # @IndexAInContents		{ Yes		} # add index A to contents
+  # @IndexBInContents		{ Yes		} # add index B to contents
+  # @PartContentsIndent         { 0.5rt		} # indent of part contents entry
+  # @ChapterNumInTheorems	{ Yes		} # theorem num has chapter num
+  # @SectionNumInTheorems	{ No		} # theorem num has section num
+  # @SubSectionNumInTheorems	{ No		} # theorem num has subsect num
+  # @SubSubSectionNumInTheorems	{ No		} # theorem num has sub-ss. num
+  # @AppendixNumInTheorems	{ Yes		} # theorem num has appendix num
+  # @SubAppendixNumInTheorems	{ No		} # theorem num has sub-app num
+  # @SubSubAppendixNumInTheorems{ No		} # theorem num has sub-sa. num
+  # @ChapterNumInDisplays	{ Yes		} # display num has chapter num
+  # @SectionNumInDisplays	{ Yes		} # display num has section num
+  # @SubSectionNumInDisplays	{ No		} # display num has subsect num
+  # @SubSubSectionNumInDisplays	{ No		} # display num has sub-ss. num
+  # @AppendixNumInDisplays	{ Yes		} # display num has appendix num
+  # @SubAppendixNumInDisplays	{ Yes		} # display num has sub-app num
+  # @SubSubAppendixNumInDisplays{ No		} # display num has sub-sa. num
+  # @ChapterNumInFigures	{ Yes		} # figure num has chapter num
+  # @SectionNumInFigures	{ No		} # figure num has section num
+  # @SubSectionNumInFigures	{ No		} # figure num has subsect num
+  # @SubSubSectionNumInFigures	{ No		} # figure num has sub-ss. num
+  # @AppendixNumInFigures	{ Yes		} # figure num has appendix num
+  # @SubAppendixNumInFigures	{ No		} # figure num has sub-app num
+  # @SubSubAppendixNumInFigures	{ No		} # figure num has sub-sa. num
+  # @ChapterNumInTables		{ Yes		} # table num has chapter num
+  # @SectionNumInTables		{ No		} # table num has section num
+  # @SubSectionNumInTables	{ No		} # table num has subsect num
+  # @SubSubSectionNumInTables	{ No		} # table num has sub-ss. num
+  # @AppendixNumInTables	{ Yes		} # table num has appendix num
+  # @SubAppendixNumInTables	{ No		} # table num has sub-app num
+  # @SubSubAppendixNumInTables	{ No		} # table num has sub-sa. num
+  # @SectionNumInRunners 	{ Yes		} # runners have section num
+  # @SubSectionNumInRunners 	{ No		} # runners have subsect num
+  # @SubSubSectionNumInRunners 	{ No		} # runners have sub-ss. num
+  # @SubAppendixNumInRunners 	{ Yes		} # runners have sub-app num
+  # @SubSubAppendixNumInRunners { No		} # runners have sub-sa. num
+  # @PrefacePrefix		{		} # for structured page nums
+  # @ContentsPrefix		{		} # for structured page nums
+  # @FigureContentsPrefix	{		} # for structured page nums
+  # @TableContentsPrefix	{		} # for structured page nums
+  # @AbbreviationsPrefix	{		} # for structured page nums
+  # @IntroductionPrefix		{		} # for structured page nums
+  # @ChapterPrefix		{		} # for structured page nums
+  # @AppendixPrefix		{		} # for structured page nums
+  # @ReferencesPrefix		{		} # for structured page nums
+  # @IndexPrefix		{		} # for structured page nums
+  # @IndexAPrefix		{		} # for structured page nums
+  # @IndexBPrefix		{		} # for structured page nums
+}
+
+
+###############################################################################
+#                                                                             #
+#  @Database (and @SysDatabase) clauses go here.                              #
+#                                                                             #
+###############################################################################
+
+@SysDatabase @RefStyle { refstyle }		  # reference printing styles
diff --git a/include/bookf b/include/bookf
new file mode 100644
index 0000000..fe5ab72
--- /dev/null
+++ b/include/bookf
@@ -0,0 +1,1263 @@
+
+###########################################################################
+#                                                                         #
+#  @BookSetup extension to @DocumentSetup.                                #
+#                                                                         #
+#  Jeffrey H. Kingston                                                    #
+#  17 September 1999                                                      #
+#                                                                         #
+#  This package extends DocumentSetup with definitions for books.         #
+#                                                                         #
+###########################################################################
+
+extend @BasicSetup @DocumentSetup
+export @Book @Preface @Abbreviations @Introduction @Chapter @Appendix
+def @BookSetup
+    named @TitlePageFont		{  Helvetica Base		}
+    named @SeparateIntroNumbering	{  Yes				}
+    named @PrefaceAfterContents		{  No				}
+    named @ChapterStartPages		{  Any				}
+    named @ReferencesBeforeAppendices	{  No				}
+
+    named @PrefaceWord			{  preface			}
+    named @ContentsWord			{  contents			}
+    named @FigureListWord		{  figurelist			}
+    named @TableListWord		{  tablelist			}
+    named @IntroductionWord		{  introduction			}
+    named @AbbreviationsWord		{  abbreviations		}
+    named @ChapterWord			{  chapter			}
+    named @AppendixWord			{  appendix			}
+    named @IndexWord			{  index			}
+    named @IndexAWord			{  index			}
+    named @IndexBWord			{  index			}
+
+    named @ChapterNumbers		{  Arabic			}
+    named @FirstChapterNumber		{  1				}
+    named @SectionNumbers		{  Arabic			}
+    named @FirstSectionNumber		{  1				}
+    named @SubSectionNumbers		{  Arabic			}
+    named @FirstSubSectionNumber	{  1				}
+    named @SubSubSectionNumbers		{  Arabic			}
+    named @FirstSubSubSectionNumber	{  1				}
+    named @AppendixNumbers		{  UCAlpha			}
+    named @FirstAppendixNumber		{  1				}
+    named @SubAppendixNumbers		{  Arabic			}
+    named @FirstSubAppendixNumber	{  1				}
+    named @SubSubAppendixNumbers	{  Arabic			}
+    named @FirstSubSubAppendixNumber	{  1				}
+
+    named @PartHeadingFont		{  Helvetica Base 2.50f		}
+    named @PartHeadingBreak		{  clines 1.2fx nohyphen	}
+    named @PartHeadingFormat
+	left number right title		{  @CD number @DP @CD title	}
+
+    named @ChapterHeadingFont		{  Bold 2.00f			}
+    named @ChapterHeadingBreak		{  ragged 1.2fx nohyphen   	}
+    named @ChapterHeadingFormat
+	left number right title		{  number @DotSep title    	}
+
+    named @SectionHeadingFont		{  Bold				}
+    named @SectionHeadingBreak		{  ragged 1.2fx nohyphen	}
+    named @SectionHeadingFormat
+	left number right title		{  number @DotSep title    	}
+
+    named @SubSectionHeadingFont	{  Bold				}
+    named @SubSectionHeadingBreak	{  ragged 1.2fx nohyphen	}
+    named @SubSectionHeadingFormat
+	left number right title		{  number @DotSep title    	}
+
+    named @SubSubSectionHeadingFont	{  Slope			}
+    named @SubSubSectionHeadingBreak	{  ragged 1.2fx nohyphen	}
+    named @SubSubSectionHeadingFormat
+	left number right title		{  number @DotSep title    	}
+
+    named @AppendixHeadingFont		{  Bold 2.00f			}
+    named @AppendixHeadingBreak		{  ragged 1.2fx nohyphen   	}
+    named @AppendixHeadingFormat
+	left number right title		{  number @DotSep title    	}
+
+    named @SubAppendixHeadingFont	{  Bold				}
+    named @SubAppendixHeadingBreak	{  ragged 1.2fx nohyphen   	}
+    named @SubAppendixHeadingFormat
+	left number right title		{  number @DotSep title    	}
+
+    named @SubSubAppendixHeadingFont	{  Slope			}
+    named @SubSubAppendixHeadingBreak	{  ragged 1.2fx nohyphen   	}
+    named @SubSubAppendixHeadingFormat
+	left number right title		{  number @DotSep title    	}
+
+    named @AbovePartGap			{  4.00f			}
+    named @AboveChapterGap		{  3.00f			}
+    named @SectionGap			{  2.0v  @OrIfPlain 3f		}
+    named @SubSectionGap		{  1.5v  @OrIfPlain 2f		}
+    named @SubSubSectionGap		{  1.5v  @OrIfPlain 2f		}
+    named @SubAppendixGap		{  2.0v  @OrIfPlain 3f		}
+    named @SubSubAppendixGap		{  1.5v  @OrIfPlain 2f		}
+
+    named @PrefaceInContents		{  No 				}
+    named @AbbreviationsInContents	{  Yes				}
+    named @IntroductionInContents	{  Yes				}
+    named @PartInContents		{  Yes				}
+    named @ChapterInContents		{  Yes				}
+    named @SectionInContents		{  Yes				}
+    named @SubSectionInContents		{  Yes				}
+    named @SubSubSectionInContents	{  No				}
+    named @AppendixInContents		{  Yes				}
+    named @SubAppendixInContents	{  Yes				}
+    named @SubSubAppendixInContents	{  No				}
+    named @ReferencesInContents		{  Yes				}
+    named @IndexInContents		{  Yes				}
+    named @IndexAInContents		{  Yes				}
+    named @IndexBInContents		{  Yes				}
+    named @PartContentsIndent		{  0.5rt			}
+
+    named @ChapterNumInTheorems		{  Yes				}
+    named @SectionNumInTheorems		{  No				}
+    named @SubSectionNumInTheorems	{  No				}
+    named @SubSubSectionNumInTheorems	{  No				}
+    named @AppendixNumInTheorems	{  Yes				}
+    named @SubAppendixNumInTheorems	{  No				}
+    named @SubSubAppendixNumInTheorems	{  No				}
+
+    named @ChapterNumInDisplays		{  Yes				}
+    named @SectionNumInDisplays		{  Yes				}
+    named @SubSectionNumInDisplays	{  No				}
+    named @SubSubSectionNumInDisplays	{  No				}
+    named @AppendixNumInDisplays	{  Yes				}
+    named @SubAppendixNumInDisplays	{  Yes				}
+    named @SubSubAppendixNumInDisplays	{  No				}
+
+    named @ChapterNumInFigures		{  Yes				}
+    named @SectionNumInFigures		{  No				}
+    named @SubSectionNumInFigures	{  No				}
+    named @SubSubSectionNumInFigures	{  No				}
+    named @AppendixNumInFigures		{  Yes				}
+    named @SubAppendixNumInFigures	{  No				}
+    named @SubSubAppendixNumInFigures	{  No				}
+
+    named @ChapterNumInTables		{  Yes				}
+    named @SectionNumInTables		{  No				}
+    named @SubSectionNumInTables	{  No				}
+    named @SubSubSectionNumInTables	{  No				}
+    named @AppendixNumInTables		{  Yes				}
+    named @SubAppendixNumInTables	{  No				}
+    named @SubSubAppendixNumInTables	{  No				}
+
+    named @SectionNumInRunners		{  Yes				}
+    named @SubSectionNumInRunners	{  No				}
+    named @SubSubSectionNumInRunners	{  No				}
+    named @SubAppendixNumInRunners	{  Yes				}
+    named @SubSubAppendixNumInRunners	{  No				}
+
+    named @PrefacePrefix		{				}
+    named @ContentsPrefix		{				}
+    named @FigureContentsPrefix		{				}
+    named @TableContentsPrefix		{				}
+    named @AbbreviationsPrefix		{				}
+    named @IntroductionPrefix		{				}
+    named @ChapterPrefix		{				}
+    named @AppendixPrefix		{				}
+    named @ReferencesPrefix		{				}
+    named @IndexPrefix			{				}
+    named @IndexAPrefix			{				}
+    named @IndexBPrefix			{				}
+
+@Begin
+
+    #######################################################################
+    #                                                                     #
+    #  Lists of chapters, sections, sub(-sub)sections, and appendices.    #
+    #                                                                     #
+    #######################################################################
+
+    export num
+    def @ChapterList named @Tag {} right num
+    {
+	    @Galley
+        //  @ChapterList @Next num
+    }
+
+    export num
+    def @SectionList named @Tag {} right num
+    {
+	@Galley
+        //@SectionGap	@SectionList @Next num
+    }
+
+    export num
+    def @SubSectionList named @Tag {} right num
+    {
+	@Galley
+        //@SubSectionGap    @SubSectionList @Next num
+    }
+
+    export num
+    def @SubSubSectionList named @Tag {} right num
+    {
+	@Galley
+        //@SubSubSectionGap @SubSubSectionList @Next num
+    }
+
+    export num
+    def @AppendixList named @Tag {} right num
+    {
+	@Galley
+        //	@AppendixList @Next num
+    }
+
+    export num
+    def @SubAppendixList named @Tag {} right num
+    {
+	@Galley
+        //@SubAppendixGap   @SubAppendixList @Next num
+    }
+
+    export num
+    def @SubSubAppendixList named @Tag {} right num
+    {
+	@Galley
+        //@SubSubAppendixGap   @SubSubAppendixList @Next num
+    }
+
+    def @PrefacePlace { @Galley }
+    def @AbbreviationsPlace { @Galley }
+    def @IntroductionPlace { @Galley }
+
+
+    #######################################################################
+    #                                                                     #
+    #  @Full - this sends text to a full-width place.                     #
+    #                                                                     #
+    #######################################################################
+
+    def @Full right x
+    {
+	def @Any  force into { @FullPlace&&following     } right x { x }
+	def @Odd  force into { @OddFullPlace&&following  } right x { x }
+	def @Even force into { @EvenFullPlace&&following } right x { x }
+
+	@ChapterStartPages @Case {
+	    Any  @Yield @Any  x
+	    Odd  @Yield @Odd  x
+	    Even @Yield @Even x
+	}
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  @NoForceFull - this sends text to a full-width place.              #
+    #                                                                     #
+    #######################################################################
+
+    def @NoForceFull right x
+    {
+	def @Any  into { @FullPlace&&following     } right x { x }
+	def @Odd  into { @OddFullPlace&&following  } right x { x }
+	def @Even into { @EvenFullPlace&&following } right x { x }
+
+	@ChapterStartPages @Case {
+	    Any  @Yield @Any  x
+	    Odd  @Yield @Odd  x
+	    Even @Yield @Even x
+	}
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  @IntroFull - this sends text to a full-width intro place.          #
+    #                                                                     #
+    #######################################################################
+
+    def @IntroFull right x
+    {
+	def @Any  force into { @IntroFullPlace&&following     } right x { x }
+	def @Odd  force into { @IntroOddFullPlace&&following  } right x { x }
+	def @Even force into { @IntroEvenFullPlace&&following } right x { x }
+
+	@ChapterStartPages @Case {
+	    Any  @Yield @Any  x
+	    Odd  @Yield @Odd  x
+	    Even @Yield @Even x
+	}
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  @ChooseFull - this sends either to introfull or ordinary full      #
+    #                                                                     #
+    #######################################################################
+
+    def @ChooseFull right x
+    {
+	@SeparateIntroNumbering @Case {
+	    No  @Yield @Full x
+	    Yes @Yield @IntroFull x
+	}
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Book.                                                              #
+    #                                                                     #
+    #######################################################################
+
+    def @Book
+	named @Tag {}
+        named @Title {}
+        named @Author {}
+        named @Edition {}
+        named @Publisher {}
+        named @BeforeTitlePage {}
+        named @OnTitlePage {}
+        named @AfterTitlePage {}
+        named @AtEnd { dft }
+        named @AtAfter { dft }
+        named @InitialFont { @InitialFont }
+        named @InitialBreak { @InitialBreak }
+        named @InitialSpace { @InitialSpace }
+        named @InitialLanguage { @InitialLanguage }
+        named @PageOrientation { @PageOrientation }
+        named @PageHeaders { @PageHeaders }
+        named @ColumnNumber { @ColumnNumber }
+        named @FirstPageNumber { @FirstPageNumber }
+        named @IntroFirstPageNumber { @IntroFirstPageNumber }
+	named @OptimizePages { @OptimizePages }
+    {
+	def @Before
+	{
+	    @BeforeTitlePage @Case {
+		""   @Yield @Null
+		else @Yield @BeforeTitlePage
+	    }
+	}
+
+	def @On
+	{
+	    @OnTitlePage @Case {
+		"" @Yield {
+		    	//1i    |0.5rt 2.5f @Font {1.2fx clines} @Break @Title |
+			//2i    |0.5rt clines @Break @Author |
+			//1i    |0.5rt clines @Break @Edition |
+			//1rt   @OneRow @Publisher
+		}
+		else @Yield @OnTitlePage
+	    }
+	}
+
+	def @After
+	{
+	    @AfterTitlePage @Case {
+		""   @Yield @Null
+		else @Yield  { @AfterTitlePage // None @Runner }
+	    }
+	}
+
+	def @ContentsPart
+	    named @Tag {}
+	{
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { ExtraMajorIntro }
+		initiallanguage { @InitialLanguage }
+		title { contents @WordVal @ContentsWord }
+		aboveheadinggap { @AboveChapterGap }
+		headingfont { @ChapterHeadingFont }
+		headingbreak { @ChapterHeadingBreak }
+		headingformat { @Num @ChapterHeadingFormat @Body }
+		incontents { No }
+		pnprefix { @ContentsPrefix }
+		inrunners { Yes }
+		majortitle { contents @WordVal @ContentsWord }
+		sendheader { @ChooseFull @Body }
+		innergap { @SectionGap }
+		@ContentsSection
+	}
+
+	def @FigureContentsPart
+	    named @Tag {}
+	{
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { ExtraMajorIntro }
+		initiallanguage { @InitialLanguage }
+		title { figurelist @WordVal @FigureListWord }
+		aboveheadinggap { @AboveChapterGap }
+		headingfont { @ChapterHeadingFont }
+		headingbreak { @ChapterHeadingBreak }
+		headingformat { @Num @ChapterHeadingFormat @Body }
+		incontents { No }
+		pnprefix { @FigureContentsPrefix }
+		inrunners { Yes }
+		majortitle { figurelist @WordVal @FigureListWord }
+		sendheader { @ChooseFull @Body }
+		innergap { @SectionGap }
+		@FigureContentsSection
+	}
+
+	def @TableContentsPart
+	    named @Tag {}
+	{
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { ExtraMajorIntro }
+		initiallanguage { @InitialLanguage }
+		title { tablelist @WordVal @TableListWord }
+		aboveheadinggap { @AboveChapterGap }
+		headingfont { @ChapterHeadingFont }
+		headingbreak { @ChapterHeadingBreak }
+		headingformat { @Num @ChapterHeadingFormat @Body }
+		incontents { No }
+		pnprefix { @TableContentsPrefix }
+		inrunners { Yes }
+		majortitle { tablelist @WordVal @TableListWord }
+		sendheader { @ChooseFull @Body }
+		innergap { @SectionGap }
+		@TableContentsSection
+	}
+
+	def @ReferencesPart
+	    named @Tag {}
+	{
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { ExtraMajor }
+		initiallanguage { @InitialLanguage }
+		title { @RefHeading @RefListTitle }
+		majortitle { @RefHeading @RefListTitle }
+		aboveheadinggap { @AboveChapterGap }
+		headingfont { @ChapterHeadingFont }
+		headingbreak { @ChapterHeadingBreak }
+		headingformat { @Num @ChapterHeadingFormat @Body }
+		incontents { @ReferencesInContents }
+		pnprefix { @ReferencesPrefix }
+		inrunners { Yes }
+		sendheader { @Full @Body }
+		innergap { @SectionGap }
+		@ReferencesSection
+
+	}
+
+	def @IndexPart
+	    named @Tag {}
+	{
+	    def @Run
+	    {
+		NonStart @Runner
+		    @MajorNum {}
+		    @MajorTitle { index @WordVal @IndexWord }
+		    @MinorNum {}
+		    @MinorTitle { index @WordVal @IndexWord }
+		    @Owner { @Tag }
+		    @Prefix { @IndexPrefix }
+	    }
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Major }
+		initiallanguage { @InitialLanguage }
+		title { index @WordVal @IndexWord }
+		aboveheadinggap { @AboveChapterGap }
+		headingfont { @ChapterHeadingFont }
+		headingbreak { @ChapterHeadingBreak }
+		headingformat { @Num @ChapterHeadingFormat @Body }
+		incontents { @IndexInContents }
+		pnprefix { @IndexPrefix }
+		inrunners { Yes }
+		sendheader { @Full @Body }
+		innergap { @SectionGap }
+		wantindefinite { Yes }
+		@IndexSection @Run
+	}
+
+	def @IndexAPart
+	    named @Tag {}
+	{
+	    def @RunA
+	    {
+		NonStart @Runner
+		    @MajorNum {}
+		    @MajorTitle { index @WordVal @IndexAWord }
+		    @MinorNum {}
+		    @MinorTitle { index @WordVal @IndexAWord }
+		    @Owner { @Tag }
+		    @Prefix { @IndexAPrefix }
+	    }
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Major }
+		initiallanguage { @InitialLanguage }
+		title { index @WordVal @IndexAWord }
+		aboveheadinggap { @AboveChapterGap }
+		headingfont { @ChapterHeadingFont }
+		headingbreak { @ChapterHeadingBreak }
+		headingformat { @Num @ChapterHeadingFormat @Body }
+		incontents { @IndexAInContents }
+		pnprefix { @IndexAPrefix }
+		inrunners { Yes }
+		sendheader { @Full @Body }
+		innergap { @SectionGap }
+		wantindefinite { Yes }
+		@IndexASection @RunA
+	}
+
+	def @IndexBPart
+	    named @Tag {}
+	{
+	    def @RunB
+	    {
+		NonStart @Runner
+		    @MajorNum {}
+		    @MajorTitle { index @WordVal @IndexBWord }
+		    @MinorNum {}
+		    @MinorTitle { index @WordVal @IndexBWord }
+		    @Owner { @Tag }
+		    @Prefix { @IndexBPrefix }
+	    }
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Major }
+		initiallanguage { @InitialLanguage }
+		title { index @WordVal @IndexBWord }
+		aboveheadinggap { @AboveChapterGap }
+		headingfont { @ChapterHeadingFont }
+		headingbreak { @ChapterHeadingBreak }
+		headingformat { @Num @ChapterHeadingFormat @Body }
+		incontents { @IndexBInContents }
+		pnprefix { @IndexBPrefix }
+		inrunners { Yes }
+		sendheader { @Full @Body }
+		innergap { @SectionGap }
+		wantindefinite { Yes }
+		@IndexBSection @RunB
+	}
+
+        def @BookIntro force into { @IntroColPlace&&preceding }
+	    named @Optimize { @OptimizePages }
+        {
+		    @PageMark @Tag
+	    //	    @Before
+            //1.1b  @TitlePageFont @Font @On
+            //1.1b  @After
+            //	    Start @Runner @Owner { @Tag }
+            //1.1b  @PrefaceAfterContents @NoDo @PrefacePlace
+            //      @MakeContents @Case {
+			{ Yes Bypass }	@Yield @ContentsPart
+			else		@Yield @Null
+		    }
+            //      @MakeFigureContents @Case {
+			{ Yes Bypass }	@Yield @FigureContentsPart
+			else		@Yield @Null
+		    }
+            //      @MakeTableContents @Case {
+			{ Yes Bypass }	@Yield @TableContentsPart
+			else		@Yield @Null
+		    }
+            //1.1b  @PrefaceAfterContents @Do @PrefacePlace
+        }
+
+        def @BookBody force into { @ColPlace&&preceding }
+	    named @Optimize { @OptimizePages }
+        {
+	    # The first component of @BookBody must be indefinite, so that
+	    # its flushing is delayed until we reach the body galleys, either
+	    # @Introduction or @Chapter.  If not, @BookBody will free up
+	    # @PrefacePlace etc. too soon, producing a "no @PrefacePlace
+	    # precedes this @PrefacePLace&&preceding" error message.
+
+	        @AbbreviationsPlace
+	    //  @IntroductionPlace
+	    //	@ChapterList @FirstChapterNumber
+	    //	@ReferencesBeforeAppendices @Do {
+		    @MakeReferences @Do @ReferencesPart
+		}
+            //	@AppendixList @FirstAppendixNumber
+	    //	@ReferencesBeforeAppendices @NoDo {
+		    @MakeReferences @Do @ReferencesPart
+		}
+	    //	@MakeIndexA @Do @IndexAPart
+	    //  @MakeIndexA @Case {
+		  Bypass  @Yield @BypassBeginIndexAPlace
+		  else    @Yield @Null
+		}
+	    //	@MakeIndexB @Do @IndexBPart
+	    //  @MakeIndexB @Case {
+		  Bypass  @Yield @BypassBeginIndexBPlace
+		  else    @Yield @Null
+		}
+	    //	@MakeIndex  @Do @IndexPart
+	    //  @MakeIndex @Case {
+		  Bypass  @Yield @BypassBeginIndexPlace
+		  else    @Yield @Null
+		}
+        }
+
+	def @BookCombined force into { @ColPlace&&preceding }
+	    named @Optimize { @OptimizePages }
+	{
+		    @PageMark @Tag
+	    //	    @Before
+            //1.1b  @TitlePageFont @Font @On
+            //1.1b  @After
+            //	    Start @Runner @Owner { @Tag }
+            //1.1b  @PrefaceAfterContents @NoDo @PrefacePlace
+            //      @MakeContents @Case {
+			{ Yes Bypass }	@Yield @ContentsPart
+			else		@Yield @Null
+		    }
+            //      @MakeFigureContents @Case {
+			{ Yes Bypass }	@Yield @FigureContentsPart
+			else		@Yield @Null
+		    }
+            //      @MakeTableContents @Case {
+			{ Yes Bypass }	@Yield @TableContentsPart
+			else		@Yield @Null
+		    }
+            //1.1b  @PrefaceAfterContents @Do @PrefacePlace
+	    //  @AbbreviationsPlace
+	    //  @IntroductionPlace
+	    //	@ChapterList @FirstChapterNumber
+	    //	@ReferencesBeforeAppendices @Do {
+		    @MakeReferences @Do @ReferencesPart
+		}
+            //	@AppendixList @FirstAppendixNumber
+	    //	@ReferencesBeforeAppendices @NoDo {
+		    @MakeReferences @Do @ReferencesPart
+		}
+	    //	@MakeIndexA @Do @IndexAPart
+	    //  @MakeIndexA @Case {
+		  Bypass  @Yield @BypassBeginIndexAPlace
+		  else    @Yield @Null
+		}
+	    //	@MakeIndexB @Do @IndexBPart
+	    //  @MakeIndexB @Case {
+		  Bypass  @Yield @BypassBeginIndexBPlace
+		  else    @Yield @Null
+		}
+	    //	@MakeIndex  @Do @IndexPart
+	    //  @MakeIndex @Case {
+		  Bypass  @Yield @BypassBeginIndexPlace
+		  else    @Yield @Null
+		}
+	}
+
+        @InitialFont @Font @InitialBreak @Break @InitialLanguage @Language
+	@InitialSpace @Space { @ColourCommand @InitialColour } @SetColour
+        {
+
+	    @SeparateIntroNumbering @Case {
+
+		No  @Yield {
+		        Yes @BeginAllCounters {}
+		        Yes @BeginDisplayCounter {}
+		        Yes @BeginFigureCounter {}
+		        Yes @BeginTableCounter {}
+		    //	@PageList
+			    @ColumnNumber { @ColumnNumber }
+			    @PageHeaders { @PageHeaders }
+			    @Orient { @PageOrientation }
+			    @FirstPageNumber
+		    //	@BookCombined
+		    //	NonStart @Runner @Owner { @Tag }
+		    //  @AtEnd @Case {
+			    dft @Yield @Null
+			    else @Yield
+				 @EvenPage @Orient { @PageOrientation } @AtEnd
+			}
+		}
+
+		Yes @Yield {
+		        Yes @BeginAllCounters {}
+		        Yes @BeginDisplayCounter {}
+		        Yes @BeginFigureCounter {}
+		        Yes @BeginTableCounter {}
+		    //  @IntroPageList
+			    @ColumnNumber { 1 }
+			    @PageHeaders { @PageHeaders }
+			    @Orient { @PageOrientation }
+			    @IntroFirstPageNumber
+		    //	NonStart @Runner @Owner { @Tag }
+		    //	@PageList
+			    @ColumnNumber { @ColumnNumber }
+			    @PageHeaders { @PageHeaders }
+			    @Orient { @PageOrientation }
+			    extra { Yes }
+			    @FirstPageNumber
+		    //	@BookIntro
+		    //	@BookBody
+		    //	NonStart @Runner @Owner { @Tag }
+		    //  @AtEnd @Case {
+			    dft @Yield @Null
+			    else @Yield
+				 @EvenPage @Orient { @PageOrientation } @AtEnd
+			}
+		}
+	    }
+        }
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Preface.                                                           #
+    #                                                                     #
+    #######################################################################
+
+    def @Preface force into { @PrefacePlace&&preceding }
+        named @Tag {}
+        named @Title { preface @WordVal @PrefaceWord }
+        named @RunningTitle { dft }
+	named @InitialLanguage {}
+        body @Body
+    {
+
+	@LargeScaleStructure
+	    tag { @Tag }
+	    type { ExtraMajorIntro }
+	    initiallanguage { @InitialLanguage }
+	    title { @Title }
+	    runningtitle { @RunningTitle }
+	    aboveheadinggap { @AboveChapterGap }
+	    headingfont { @ChapterHeadingFont }
+	    headingbreak { @ChapterHeadingBreak }
+	    headingformat { @Num @ChapterHeadingFormat @Body }
+	    incontents { @PrefaceInContents }
+	    pnprefix { @PrefacePrefix }
+	    sendheader { @ChooseFull @Body }
+	    innergap { @SectionGap }
+	    inrunners { Yes }
+	    @Body
+
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Abbreviations.                                                     #
+    #                                                                     #
+    #######################################################################
+
+    def @Abbreviations force into { @AbbreviationsPlace&&preceding }
+        named @Tag {}
+        named @Title { abbreviations @WordVal @AbbreviationsWord }
+        named @RunningTitle { dft }
+	named @InitialLanguage {}
+        body @Body
+    {
+
+	@LargeScaleStructure
+	    tag { @Tag }
+	    type { Major }
+	    initiallanguage { @InitialLanguage }
+	    title { @Title }
+	    runningtitle { @RunningTitle }
+	    aboveheadinggap { @AboveChapterGap }
+	    headingfont { @ChapterHeadingFont }
+	    headingbreak { @ChapterHeadingBreak }
+	    headingformat { @Num @ChapterHeadingFormat @Body }
+	    incontents { @AbbreviationsInContents }
+	    pnprefix { @AbbreviationsPrefix }
+	    sendheader { @Full @Body }
+	    innergap { @SectionGap }
+	    inrunners { Yes }
+	    @Body
+
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Introduction.                                                      #
+    #                                                                     #
+    #######################################################################
+
+    def @Introduction force into { @IntroductionPlace&&preceding }
+        named @Tag {}
+        named @Title { introduction @WordVal @IntroductionWord }
+        named @RunningTitle { dft }
+	named @InitialLanguage {}
+        body @Body
+    {
+
+	@LargeScaleStructure
+	    tag { @Tag }
+	    type { Major }
+	    initiallanguage { @InitialLanguage }
+	    title { @Title }
+	    runningtitle { @RunningTitle }
+	    aboveheadinggap { @AboveChapterGap }
+	    headingfont { @ChapterHeadingFont }
+	    headingbreak { @ChapterHeadingBreak }
+	    headingformat { @Num @ChapterHeadingFormat @Body }
+	    incontents { @IntroductionInContents }
+	    pnprefix { @IntroductionPrefix }
+	    sendheader { @Full @Body }
+	    innergap { @SectionGap }
+	    inrunners { Yes }
+	    @Body
+
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Chapters containing sections and subsections.                      #
+    #                                                                     #
+    #######################################################################
+
+    export @BeginSections @EndSections @Section
+    def @Chapter force into { @ChapterList&&preceding }
+        named @Tag {}
+        named @Title {}
+        named @RunningTitle { dft }
+	named @InitialLanguage {}
+	named @PartNumber {}
+	named @PartTitle {}
+	named @PartText {}
+        named @BypassNumber { dft }
+        body @Body
+    {
+
+        def @EndSectionsPlace { @Galley }
+
+        def @EndSections force into { @EndSectionsPlace&&preceding }
+	{}
+
+        macro @BeginSections
+	{   //@SectionGap @SectionList @FirstSectionNumber
+	    // @EndSectionsPlace //
+	}
+
+	def @ChapterShortNum
+	{
+	    @ChapterNumbers @Then {
+		@BypassNumber @Dft {
+		    @ChapterNumbers @Num @ChapterList&&@Tag @Open { num }
+		}
+	    }
+	}
+
+	def @MajorNum
+	{
+	    @ChapterNumbers @Then @InitialLanguage @Language {
+		chapter @WordVal @ChapterWord @ChapterShortNum
+	    }
+	}
+
+	def @MajorTitle
+	{
+	    @InitialLanguage @Language {
+		@RunningTitle @Dft @Title
+	    }
+	}
+
+        export @BeginSubSections @EndSubSections @SubSection
+        def @Section force into { @SectionList&&preceding }
+            named @Tag {}
+            named @Title {}
+            named @RunningTitle { dft }
+	    named @InitialLanguage { @InitialLanguage }
+	    named @BypassNumber { dft }
+            body @Body
+        {
+
+            def @EndSubSectionsPlace { @Galley }
+
+            def @EndSubSections force into { @EndSubSectionsPlace&&preceding }
+	    {}
+
+            macro @BeginSubSections
+            {	//@SubSectionGap @SubSectionList @FirstSubSectionNumber
+		// @EndSubSectionsPlace //
+	    }
+
+	    def @SectionShortNum
+	    {
+		@SectionNumbers @Then {
+		    @BypassNumber @Dft {
+			@ChapterShortNum @Join @SectionNumbers @Num
+			{ @SectionList&&@Tag @Open { num } }
+		    }
+		}
+	    }
+
+	    export @BeginSubSubSections @EndSubSubSections @SubSubSection
+            def @SubSection force into { @SubSectionList&&preceding }
+		named @Tag {}
+		named @Title {}
+		named @RunningTitle { dft }
+		named @InitialLanguage { @InitialLanguage }
+		named @BypassNumber { dft }
+		body @Body
+            {
+
+                def @EndSubSubSectionsPlace { @Galley }
+
+                def @EndSubSubSections force into
+		    { @EndSubSubSectionsPlace&&preceding }
+		{}
+
+                macro @BeginSubSubSections
+                { //@SubSubSectionGap @SubSubSectionList @FirstSubSubSectionNumber
+		  // @EndSubSubSectionsPlace //
+		}
+
+		def @SubSectionShortNum
+		{
+		    @SubSectionNumbers @Then {
+			@BypassNumber @Dft {
+			    @SectionShortNum @Join @SubSectionNumbers @Num
+			    { @SubSectionList&&@Tag @Open { num } }
+			}
+		    }
+		}
+
+		def @SubSubSection force into { @SubSubSectionList&&preceding }
+		    named @Tag {}
+		    named @Title {}
+		    named @RunningTitle { dft }
+		    named @InitialLanguage { @InitialLanguage }
+		    named @BypassNumber { dft }
+		    body @Body
+		{
+                
+		    @LargeScaleStructure
+			tag { @Tag }
+			type { Minor }
+			initiallanguage { @InitialLanguage }
+			title { @Title }
+			runningtitle { @RunningTitle }
+			headingfont { @SubSubSectionHeadingFont }
+			headingbreak { @SubSubSectionHeadingBreak }
+			headingformat { @Num @SubSubSectionHeadingFormat @Body }
+			incontents { @SubSubSectionInContents }
+			contentsindent { 9f }
+			numbers { @SubSubSectionNumbers }
+			attachnum { @SubSubSectionList&&preceding @Tagged @Tag }
+			retrievenum { @SubSubSectionList&&@Tag @Open { num } }
+			bypassnumber { @BypassNumber }
+			prefix { @SubSectionShortNum }
+			majornum { @MajorNum }
+			majortitle { @MajorTitle }
+			intheorems { @SubSubSectionNumInTheorems }
+			indisplays { @SubSubSectionNumInDisplays }
+			infigures { @SubSubSectionNumInFigures }
+			intables { @SubSubSectionNumInTables }
+			inrunners { @SubSubSectionNumInRunners }
+			@Body
+	        }
+
+		@LargeScaleStructure
+		    tag { @Tag }
+		    type { Minor }
+		    initiallanguage { @InitialLanguage }
+		    title { @Title }
+		    runningtitle { @RunningTitle }
+		    headingfont { @SubSectionHeadingFont }
+		    headingbreak { @SubSectionHeadingBreak }
+		    headingformat { @Num @SubSectionHeadingFormat @Body }
+		    incontents { @SubSectionInContents }
+		    contentsindent { 6f }
+		    numbers { @SubSectionNumbers }
+		    attachnum { @SubSectionList&&preceding @Tagged @Tag }
+		    retrievenum { @SubSectionList&&@Tag @Open { num } }
+		    bypassnumber { @BypassNumber }
+		    prefix { @SectionShortNum }
+		    majornum { @MajorNum }
+		    majortitle { @MajorTitle }
+		    intheorems { @SubSectionNumInTheorems }
+		    indisplays { @SubSectionNumInDisplays }
+		    infigures { @SubSectionNumInFigures }
+		    intables { @SubSectionNumInTables }
+		    inrunners { @SubSectionNumInRunners }
+		    @Body
+
+            }
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Minor }
+		initiallanguage { @InitialLanguage }
+		title { @Title }
+		runningtitle { @RunningTitle }
+		headingfont { @SectionHeadingFont }
+		headingbreak { @SectionHeadingBreak }
+		headingformat { @Num @SectionHeadingFormat @Body }
+		incontents { @SectionInContents }
+		contentsindent { 3f }
+		numbers { @SectionNumbers }
+		attachnum { @SectionList&&preceding @Tagged @Tag }
+		retrievenum { @SectionList&&@Tag @Open { num } }
+		bypassnumber { @BypassNumber }
+		prefix { @ChapterShortNum }
+		majornum { @MajorNum }
+		majortitle { @MajorTitle }
+		intheorems { @SectionNumInTheorems }
+		indisplays { @SectionNumInDisplays }
+		infigures { @SectionNumInFigures }
+		intables { @SectionNumInTables }
+		inrunners { @SectionNumInRunners }
+		@Body
+
+        }
+
+	def @Part
+	    named @Tag {}
+	{
+	    @LargeScaleStructure
+	        type { VeryMajor }
+		initiallanguage { @InitialLanguage }
+		title { @PartTitle }
+		aboveheadinggap { @AbovePartGap }
+		headingfont { @PartHeadingFont }
+		headingbreak { @PartHeadingBreak }
+		headingformat { @Num @PartHeadingFormat @Body }
+		bypassnumber { @PartNumber }
+		incontents { @PartInContents }
+		sendheader { @Full @Body }
+		inrunners { Yes }
+		tag { @Tag }
+		@PartText
+	}
+
+	@PartNumber @Case {
+	    ""   @Yield @Null
+	    else @Yield @Part
+	}
+	//
+	@LargeScaleStructure
+	    tag { @Tag }
+	    type { Major }
+	    initiallanguage { @InitialLanguage }
+	    title { @Title }
+	    runningtitle { @RunningTitle }
+	    aboveheadinggap { @AboveChapterGap }
+	    headingfont { @ChapterHeadingFont }
+	    headingbreak { @ChapterHeadingBreak }
+	    headingformat { @Num @ChapterHeadingFormat @Body }
+	    incontents { @ChapterInContents }
+	    contentsindent { 0f }
+	    word { chapter @WordVal @ChapterWord }
+	    numbers { @ChapterNumbers }
+	    attachnum { @ChapterList&&preceding @Tagged @Tag }
+	    retrievenum { @ChapterList&&@Tag @Open { num } }
+	    bypassnumber { @BypassNumber }
+	    pnprefix { @ChapterPrefix }
+	    intheorems { @ChapterNumInTheorems }
+	    indisplays { @ChapterNumInDisplays }
+	    infigures { @ChapterNumInFigures }
+	    intables { @ChapterNumInTables }
+	    sendheader { @Full @Body }
+	    innergap { @SectionGap }
+	    inrunners { Yes }
+	    @Body
+
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Appendices.                                                        #
+    #                                                                     #
+    #######################################################################
+
+    export @BeginSubAppendices @EndSubAppendices @SubAppendix
+    def @Appendix force into { @AppendixList&&preceding }
+        named @Tag {}
+        named @Title {}
+        named @RunningTitle { dft }
+	named @InitialLanguage {}
+	named @PartNumber {}
+	named @PartTitle {}
+	named @PartText {}
+        named @BypassNumber { dft }
+        body @Body
+    {
+
+        def @EndSubAppendicesPlace { @Galley }
+
+        def @EndSubAppendices force into { @EndSubAppendicesPlace&&preceding }
+	{}
+
+        macro @BeginSubAppendices
+	{   //@SubAppendixGap @SubAppendixList @FirstSubAppendixNumber
+	    // @EndSubAppendicesPlace //
+	}
+
+	def @AppendixShortNum
+	{
+	    @AppendixNumbers @Then {
+		@BypassNumber @Dft {
+		    @AppendixNumbers @Num @AppendixList&&@Tag @Open { num }
+		}
+	    }
+	}
+
+	def @MajorNum
+	{
+	    @AppendixNumbers @Then @InitialLanguage @Language {
+		appendix @WordVal @AppendixWord @AppendixShortNum
+	    }
+	}
+
+	def @MajorTitle
+	{
+	    @InitialLanguage @Language {
+		@RunningTitle @Dft @Title
+	    }
+	}
+
+        export @BeginSubSubAppendices @EndSubSubAppendices @SubSubAppendix
+        def @SubAppendix force into { @SubAppendixList&&preceding }
+            named @Tag {}
+            named @Title {}
+            named @RunningTitle { dft }
+	    named @InitialLanguage { @InitialLanguage }
+	    named @BypassNumber { dft }
+            body @Body
+        {
+
+            def @EndSubSubAppendicesPlace { @Galley }
+
+            def @EndSubSubAppendices force into { @EndSubSubAppendicesPlace&&preceding }
+	    {}
+
+            macro @BeginSubSubAppendices
+            {	//@SubSubAppendixGap @SubSubAppendixList @FirstSubSubAppendixNumber
+		// @EndSubSubAppendicesPlace //
+	    }
+
+	    def @SubAppendixShortNum
+	    {
+		@SubAppendixNumbers @Then {
+		    @BypassNumber @Dft {
+			@AppendixShortNum @Join @SubAppendixNumbers @Num
+			{ @SubAppendixList&&@Tag @Open { num } }
+		    }
+		}
+	    }
+
+            def @SubSubAppendix force into { @SubSubAppendixList&&preceding }
+		named @Tag {}
+		named @Title {}
+		named @RunningTitle { dft }
+		named @InitialLanguage { @InitialLanguage }
+		named @BypassNumber { dft }
+		body @Body
+            {
+
+		@LargeScaleStructure
+		    tag { @Tag }
+		    type { Minor }
+		    initiallanguage { @InitialLanguage }
+		    title { @Title }
+		    runningtitle { @RunningTitle }
+		    headingfont { @SubSubAppendixHeadingFont }
+		    headingbreak { @SubSubAppendixHeadingBreak }
+		    headingformat { @Num @SubSubAppendixHeadingFormat @Body }
+		    incontents { @SubSubAppendixInContents }
+		    contentsindent { 6f }
+		    numbers { @SubSubAppendixNumbers }
+		    attachnum { @SubSubAppendixList&&preceding @Tagged @Tag }
+		    retrievenum { @SubSubAppendixList&&@Tag @Open { num } }
+		    bypassnumber { @BypassNumber }
+		    prefix { @SubAppendixShortNum }
+		    majornum { @MajorNum }
+		    majortitle { @MajorTitle }
+		    intheorems { @SubSubAppendixNumInTheorems }
+		    indisplays { @SubSubAppendixNumInDisplays }
+		    infigures { @SubSubAppendixNumInFigures }
+		    intables { @SubSubAppendixNumInTables }
+		    inrunners { @SubSubAppendixNumInRunners }
+		    @Body
+
+            }
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Minor }
+		initiallanguage { @InitialLanguage }
+		title { @Title }
+		runningtitle { @RunningTitle }
+		headingfont { @SubAppendixHeadingFont }
+		headingbreak { @SubAppendixHeadingBreak }
+		headingformat { @Num @SubAppendixHeadingFormat @Body }
+		incontents { @SubAppendixInContents }
+		contentsindent { 3f }
+		numbers { @SubAppendixNumbers }
+		attachnum { @SubAppendixList&&preceding @Tagged @Tag }
+		retrievenum { @SubAppendixList&&@Tag @Open { num } }
+		bypassnumber { @BypassNumber }
+		prefix { @AppendixShortNum }
+		majornum { @MajorNum }
+		majortitle { @MajorTitle }
+		intheorems { @SubAppendixNumInTheorems }
+		indisplays { @SubAppendixNumInDisplays }
+		infigures { @SubAppendixNumInFigures }
+		intables { @SubAppendixNumInTables }
+		inrunners { @SubAppendixNumInRunners }
+		@Body
+
+        }
+
+	def @Part
+	    named @Tag {}
+	{
+	    @LargeScaleStructure
+	        type { VeryMajor }
+		initiallanguage { @InitialLanguage }
+		title { @PartTitle }
+		aboveheadinggap { @AbovePartGap }
+		headingfont { @PartHeadingFont }
+		headingbreak { @PartHeadingBreak }
+		headingformat { @Num @PartHeadingFormat @Body }
+		bypassnumber { @PartNumber }
+		incontents { @PartInContents }
+		sendheader { @Full @Body }
+		inrunners { Yes }
+		tag { @Tag }
+		@PartText
+	}
+
+	@PartNumber @Case {
+	    ""   @Yield @Null
+	    else @Yield @Part
+	}
+	//
+	@LargeScaleStructure
+	    tag { @Tag }
+	    type { Major }
+	    initiallanguage { @InitialLanguage }
+	    title { @Title }
+	    runningtitle { @RunningTitle }
+	    aboveheadinggap { @AboveChapterGap }
+	    headingfont { @AppendixHeadingFont }
+	    headingbreak { @AppendixHeadingBreak }
+	    headingformat { @Num @AppendixHeadingFormat @Body }
+	    incontents { @AppendixInContents }
+	    contentsindent { 0f }
+	    word { appendix @WordVal @AppendixWord }
+	    numbers { @AppendixNumbers }
+	    attachnum { @AppendixList&&preceding @Tagged @Tag }
+	    retrievenum { @AppendixList&&@Tag @Open { num } }
+	    bypassnumber { @BypassNumber }
+	    pnprefix { @AppendixPrefix }
+	    intheorems { @AppendixNumInTheorems }
+	    indisplays { @AppendixNumInDisplays }
+	    infigures { @AppendixNumInFigures }
+	    intables { @AppendixNumInTables }
+	    sendheader { @Full @Body }
+	    innergap { @SubAppendixGap }
+	    inrunners { Yes }
+	    @Body
+
+    }
+
+
+@End @BookSetup
diff --git a/include/bsf b/include/bsf
new file mode 100644
index 0000000..726058f
--- /dev/null
+++ b/include/bsf
@@ -0,0 +1,1563 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @BasicSetup package (Version 3.13)                                    #
+#                                                                             #
+#  Jeffrey H. Kingston                                                        #
+#  5 February 1999                                                            #
+#                                                                             #
+#  Based on the first part of the @DocumentLayout package, version 3.11.      #
+#                                                                             #
+#  This package contains basic symbols used widely throughout many            #
+#  documents, for font changes, particular characters, standard words in      #
+#  the current language, date and time, paragraphs, lists, colours,           #
+#  rules, and boxes.                                                          #
+#                                                                             #
+###############################################################################
+
+@SysPrependGraphic { "bsf.lpg" }   # rules, boxes, margin note setup
+
+
+###############################################################################
+#                                                                             #
+#  The following symbols are defined outside @BasicSetup so that              #
+#  they can be invoked when setting its parameters in the @Use clause.        #
+#                                                                             #
+###############################################################################
+
+def @OrIfPlain
+    precedence 80
+    left x
+    right y
+{
+    @BackEnd @Case {
+	PlainText @Yield y
+	else      @Yield x
+    }
+}
+
+    export i c p m s v f
+    def @LengthUnits
+    {
+	def i left x {
+	    @BackEnd @Case {
+		PostScript @Yield { x" in" }
+		PDF        @Yield { "__mul(__in, "x")" }
+		PlainText  @Yield ""
+	    }
+	}
+
+	def c left x {
+	    @BackEnd @Case {
+		PostScript @Yield { x" cm" }
+		PDF        @Yield { "__mul(__cm, "x")" }
+		PlainText  @Yield ""
+	    }
+	}
+
+	def p left x {
+	    @BackEnd @Case {
+		PostScript @Yield { x" pt" }
+		PDF        @Yield { "__mul(__pt, "x")" }
+		PlainText  @Yield ""
+	    }
+	}
+
+	def m left x {
+	    @BackEnd @Case {
+		PostScript @Yield { x" em" }
+		PDF        @Yield { "__mul(__em, "x")" }
+		PlainText  @Yield ""
+	    }
+	}
+
+	def s left x {
+	    @BackEnd @Case {
+		PostScript @Yield { x" sp" }
+		PDF        @Yield { "__mul(__louts, "x")" }
+		PlainText  @Yield ""
+	    }
+	}
+
+	def v left x {
+	    @BackEnd @Case {
+		PostScript @Yield { x" vs" }
+		PDF        @Yield { "__mul(__loutv, "x")" }
+		PlainText  @Yield ""
+	    }
+	}
+
+	def f left x {
+	    @BackEnd @Case {
+		PostScript @Yield { x" ft" }
+		PDF        @Yield { "__mul(__loutf, "x")" }
+		PlainText  @Yield ""
+	    }
+	}
+    }
+
+
+###############################################################################
+#                                                                             #
+#  Symbols exported by @BasicSetup.                                           #
+#                                                                             #
+###############################################################################
+
+export
+
+    @InitialFont @InitialBreak @InitialSpace @InitialLanguage @InitialColour
+    @OptimizePages @HeadingFont
+    @ParaGap @ParaIndent @DisplayGap @DisplayIndent @DefaultIndent
+    @DisplayNumStyle @WideIndent @VeryWideIndent
+    @ListGap @ListIndent @ListRightIndent @ListLabelWidth
+    @NumberSeparator
+
+    @Word @Roman @UCRoman @Alpha @UCAlpha @Months @ShortMonths @WeekDays
+    @ShortWeekDays @TwelveHours @ShortHours @MeriDiems @ShortMeriDiems
+
+    @Sym @R @I @B @BI @S @F @II
+    "~" "~~" "``" "''" ",," "--" "---" "..."
+
+    @Bullet @ParSym @SectSym @Dagger @DaggerDbl @CDot @Sterling @Yen @Florin
+    @Star @Degree @Minute @Second @Multiply @Divide @Lozenge @Register
+    @CopyRight @TradeMark @Euro
+
+    @Date @Time @DateTimeFormat @DropCapTwo @DropCapThree @Centre @Right
+    @NoDotSep @NoDotJoin @Join @Sep @DotSep @DotJoin @DashJoin @NumSep
+    @OverStrike @Sup @Sub @Colour @FullWidthRule @LocalWidthRule
+    @Box @CurveBox @ShadowBox @BoundaryMarks @NumberMarker @NumberOf
+    @PageMarker @PageMark @PageOf
+
+    @BeginDisplayCounter
+
+    @Heading "^" "&-" @If @Not @And @Or @True
+    @PP @LP @LLP @DP @LOP @NP @CNP
+
+    @BeginAlignedDisplays
+    @EndAlignedDisplays
+
+    @Display
+    @LeftDisplay
+    @IndentedDisplay
+    @QuotedDisplay
+    @CentredDisplay
+    @RightDisplay
+    @AlignedDisplay
+    @LeftAlignedDisplay
+    @IndentedAlignedDisplay
+    @QuotedAlignedDisplay
+    @CentredAlignedDisplay
+    @RightAlignedDisplay
+    @NumberedDisplay
+    @LeftNumberedDisplay
+    @IndentedNumberedDisplay
+    @QuotedNumberedDisplay
+    @CentredNumberedDisplay
+    @RightNumberedDisplay
+    @AlignedNumberedDisplay
+    @LeftAlignedNumberedDisplay
+    @IndentedAlignedNumberedDisplay
+    @QuotedAlignedNumberedDisplay
+    @CentredAlignedNumberedDisplay
+    @RightAlignedNumberedDisplay
+
+    @RawDisplay
+    @RawLeftDisplay
+    @RawIndentedDisplay
+    @RawQuotedDisplay
+    @RawCentredDisplay
+    @RawRightDisplay
+    @RawAlignedDisplay
+    @RawLeftAlignedDisplay
+    @RawIndentedAlignedDisplay
+    @RawQuotedAlignedDisplay
+    @RawCentredAlignedDisplay
+    @RawRightAlignedDisplay
+    @RawNumberedDisplay
+    @RawLeftNumberedDisplay
+    @RawIndentedNumberedDisplay
+    @RawQuotedNumberedDisplay
+    @RawCentredNumberedDisplay
+    @RawRightNumberedDisplay
+    @RawAlignedNumberedDisplay
+    @RawLeftAlignedNumberedDisplay
+    @RawIndentedAlignedNumberedDisplay
+    @RawQuotedAlignedNumberedDisplay
+    @RawCentredAlignedNumberedDisplay
+    @RawRightAlignedNumberedDisplay
+
+    @ListItem
+    @ListInterruptItem
+    @ListNewPage
+    @DropListItem
+    @TagItem
+    @DropTagItem
+
+    @EndList
+    @RawEndList
+
+    @RawList
+    @RawLeftList
+    @RawIndentedList
+    @RawQuotedList
+    @RawCentredList @RawCenteredList
+    @RawNumberedList
+    @RawParenNumberedList
+    @RawRomanList
+    @RawParenRomanList
+    @RawUCRomanList
+    @RawParenUCRomanList
+    @RawAlphaList
+    @RawParenAlphaList
+    @RawUCAlphaList
+    @RawParenUCAlphaList
+    @RawBulletList
+    @RawStarList
+    @RawDashList
+    @RawTaggedList
+    @RawWideTaggedList
+    @RawVeryWideTaggedList
+
+    @List
+    @LeftList
+    @IndentedList
+    @QuotedList
+    @CentredList @CenteredList
+    @NumberedList 
+    @ParenNumberedList
+    @RomanList
+    @ParenRomanList
+    @UCRomanList
+    @ParenUCRomanList
+    @AlphaList
+    @ParenAlphaList
+    @UCAlphaList
+    @ParenUCAlphaList
+    @BulletList 
+    @StarList 
+    @DashList
+    @TaggedList
+    @WideTaggedList
+    @VeryWideTaggedList
+
+
+###############################################################################
+#                                                                             #
+#  The @BasicSetup package.                                                   #
+#                                                                             #
+###############################################################################
+
+def @BasicSetup
+    named @InitialFont	  { Times Base 12p	} # initial font
+    named @InitialBreak	  { {adjust 1.20fx hyphen} @OrIfPlain
+			    {ragged 1fx nohyphen} } # initial break
+    named @InitialSpace	  { lout		} # initial space style
+    named @InitialLanguage{ English		} # initial language
+    named @InitialColour  { black		} # initial colour
+    named @OptimizePages  { No			} # optimize page breaks?
+    named @HeadingFont	  { Bold		} # font for @Heading
+    named @ParaGap	  { 1.3vx @OrIfPlain 1f	} # gap between paragraphs
+    named @ParaIndent	  { 2.0f @OrIfPlain 5s	} # first-line indent for @PP
+    named @DisplayGap	  { 1.0v @OrIfPlain 1f	} # gap above, below displays
+    named @DisplayIndent  { 2.0f @OrIfPlain 5s	} # @IndentedDisplay indent
+    named @DefaultIndent  { 0.5rt		} # @Display indent
+    named @DisplayNumStyle
+	right num	  { (num)		} # display number style
+    named @WideIndent	  { 4.0f @OrIfPlain 10s	} # @WideTaggedList indent
+    named @VeryWideIndent { 8.0f @OrIfPlain 20s	} # @VeryWideTaggedList indent
+    named @ListOuterGap	  { 1.0v @OrIfPlain 1f	} # gap before, after list
+    named @ListGap	  { 1.0v @OrIfPlain 1f	} # gap between list items
+    named @ListIndent	  { 0s			} # indent of list items
+    named @ListRightIndent{ 0s			} # right indent of list items
+    named @ListLabelWidth { 2.0f @OrIfPlain 5s	} # width allowed for list tags
+    named @NumberSeparator{ .			} # separates numbers like 2.3.7
+@Begin
+
+    ###########################################################################
+    #                                                                         #
+    #   @Sym, font symbols, and miscellaneous special characters.             #
+    #                                                                         #
+    ###########################################################################
+
+    def @Sym right x { { Symbol Base } @Font @Char x	}
+
+    def @R   right x { Base @Font x			}
+    def @I   right x { Slope @Font x			}
+    def @B   right x { Bold @Font x			}
+    def @BI  right x { BoldSlope @Font x		}
+    def @S   right x { smallcaps @Font x		}
+    def @F   right x { { Courier Base -1p } @Font x 	}
+
+    def @II
+	right x
+    {
+	{ @CurrFace @Case {
+	    Bold @Yield BoldSlope
+	    else @Yield Slope
+	} } @Font x
+    }
+
+    def "~"  left x right y { x &1su y }
+    def "~~" left x right y { x &2s y }
+
+    def "``"       { @Char "quotedblleft"	@OrIfPlain "``"	}
+    def "''"       { @Char "quotedblright"	@OrIfPlain "''"	}
+    def ",,"       { @Char "quotedblbase"	@OrIfPlain ",,"	}
+    def "--"       { @Char "endash"		@OrIfPlain "--"	}
+    def "---"      { @Char "emdash"		@OrIfPlain "---"}
+    def "..."      { @Char "ellipsis"		@OrIfPlain "..."}
+    def @Bullet    { @Char "bullet"		@OrIfPlain "o"	}
+    def @ParSym    { @Char "paragraph"		@OrIfPlain "P"	}
+    def @SectSym   { @Char "section"		@OrIfPlain "$"	}
+    def @Dagger    { @Char "dagger"		@OrIfPlain "+"	}
+    def @DaggerDbl { @Char "daggerdbl"		@OrIfPlain "++"	}
+    def @CDot      { @Char "periodcentered"	@OrIfPlain "."	}
+    def @Sterling  { @Char "sterling"		@OrIfPlain "&"	}
+    def @Yen       { @Char "yen"		@OrIfPlain "Y"	}
+    def @Florin    { @Char "florin"		@OrIfPlain "f"	}
+
+    def @Star      { @Sym  "asteriskmath"	@OrIfPlain "*"	}
+    def @Degree    { @Sym  "degree"		@OrIfPlain "o"	}
+    def @Minute    { @Sym  "minute"		@OrIfPlain "'"	}
+    def @Second    { @Sym  "second"		@OrIfPlain "''"	}
+    def @Multiply  { @Sym  "multiply"		@OrIfPlain "x"	}
+    def @Divide    { @Sym  "divide"		@OrIfPlain "/"	}
+    def @Lozenge   { @Sym  "lozenge"		@OrIfPlain "O"	}
+    def @Register  { @Sym  "registersans"	@OrIfPlain "R"	}
+    def @CopyRight { @Sym  "copyrightsans"	@OrIfPlain "C"	}
+    def @TradeMark { @Sym  "trademarksans"	@OrIfPlain "TM"	}
+
+    def @Euro
+    {
+	@BackEnd @Case {
+
+	    PostScript @Yield {
+		0.65w @VShift @VContract @HContract
+		"xsize ysize ysize 0.07 mul louteuro" @Graphic {
+		    0.7f @High 0.735f @Wide
+		}
+	    }
+
+	    PDF @Yield { EUR }
+
+	    PlainText @Yield { EUR }
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Symbols stored in the "standard" database                              #
+    #                                                                         #
+    #    @Word            language-spacific words such as Chapter, etc.       #
+    #    @Roman           lower case Roman numerals i, ii, ... , cc           #
+    #    @UCRoman         upper case Roman numerals I, II, ... , CC           #
+    #    @Alpha           lower case Roman alphabet a, b,  ... , z            #
+    #    @UCAlpha         upper case Roman alphabet A, B,  ... , Z            #
+    #    @Months          months of the year:  January, ... , December        #
+    #    @ShortMonths     months of the year, abbreviated:  Jan, ..., Dec     #
+    #    @WeekDays        days of the week:  Sunday, ... , Saturday           #
+    #    @ShortWeekDays   days of the week, abbreviated:  Sun, ... , Sat      #
+    #    @TwelveHours     hours, from 1 to 12                                 #
+    #    @ShortHours      hours, from 0 to 23                                 #
+    #    @DateTimeFormat  format of results of @Date and @Time                #
+    #                                                                         #
+    ###########################################################################
+
+    def @Word		left @Tag right @Val { @Val }
+    def @Roman		left @Tag right @Val { @Val }
+    def @UCRoman	left @Tag right @Val { @Val }
+    def @Alpha		left @Tag right @Val { @Val }
+    def @UCAlpha	left @Tag right @Val { @Val }
+    def @Months		left @Tag right @Val { @Val }
+    def @ShortMonths	left @Tag right @Val { @Val }
+    def @WeekDays	left @Tag right @Val { @Val }
+    def @ShortWeekDays	left @Tag right @Val { @Val }
+    def @TwelveHours  	left @Tag right @Val { @Val }
+    def @ShortHours  	left @Tag right @Val { @Val }
+    def @MeriDiems  	left @Tag right @Val { @Val }
+    def @ShortMeriDiems	left @Tag right @Val { @Val }
+
+    export @Value
+    def @DateTimeFormat	left @Tag
+	named @Value
+	    named @Year          {}
+	    named @ShortYear     {}
+	    named @Month         {}
+	    named @ShortMonth    {}
+	    named @MonthNum      {}
+	    named @Day           {}
+	    named @ShortDay      {}
+	    named @DayNum        {}
+	    named @MeriDiem      {}
+	    named @ShortMeriDiem {}
+	    named @Hour          {}
+	    named @TwelveHour    {}
+	    named @ShortHour     {}
+	    named @Minute        {}
+	    named @Second        {}
+	{}
+    {}
+
+    @SysDatabase @Word @Roman @UCRoman @Alpha @UCAlpha @Months
+		 @ShortMonths @WeekDays @ShortWeekDays @TwelveHours
+		 @ShortHours @MeriDiems @ShortMeriDiems @DateTimeFormat
+    { standard  }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @Date and @Time: the date and time now.                                #
+    #                                                                         #
+    ###########################################################################
+
+    def @Date
+	named @Format
+	    named @Year         { @Moment&&now @Open { {@Century}@Year         }}
+	    named @ShortYear    { @Moment&&now @Open { @Year                   }}
+	    named @Month        { @Moment&&now @Open { @Months&&@Month         }}
+	    named @ShortMonth   { @Moment&&now @Open { @ShortMonths&&@Month    }}
+	    named @MonthNum     { @Moment&&now @Open { @Month                  }}
+	    named @Day          { @Moment&&now @Open { @WeekDays&&@WeekDay     }}
+	    named @ShortDay     { @Moment&&now @Open { @ShortWeekDays&&@WeekDay}}
+	    named @DayNum       { @Moment&&now @Open { @Day                    }}
+	    named @MeriDiem     { @Moment&&now @Open { @MeriDiems&&@Hour       }}
+	    named @ShortMeriDiem{ @Moment&&now @Open { @ShortMeriDiems&&@Hour  }}
+	    named @Hour         { @Moment&&now @Open { @Hour                   }}
+	    named @TwelveHour   { @Moment&&now @Open { @TwelveHours&&@Hour     }}
+	    named @ShortHour    { @Moment&&now @Open { @ShortHours&&@Hour      }}
+	    named @Minute       { @Moment&&now @Open { @Minute                 }}
+	    named @Second       { @Moment&&now @Open { @Second                 }}
+	{
+	    @DateTimeFormat&&date @Open { @Value
+		@Year          { @Year }
+		@ShortYear     { @ShortYear }
+		@Month         { @Month }
+		@ShortMonth    { @ShortMonth }
+		@MonthNum      { @MonthNum }
+		@Day           { @Day }
+		@ShortDay      { @ShortDay }
+		@DayNum        { @DayNum }
+		@MeriDiem      { @MeriDiem }
+		@ShortMeriDiem { @ShortMeriDiem }
+		@Hour          { @Hour }
+		@TwelveHour    { @TwelveHour }
+		@ShortHour     { @ShortHour }
+		@Minute        { @Minute }
+		@Second        { @Second }
+	    }
+	}
+    { @Format }
+
+    def @Time
+	named @Format
+	    named @Year         { @Moment&&now @Open { {@Century}@Year         }}
+	    named @ShortYear    { @Moment&&now @Open { @Year                   }}
+	    named @Month        { @Moment&&now @Open { @Months&&@Month         }}
+	    named @ShortMonth   { @Moment&&now @Open { @ShortMonths&&@Month    }}
+	    named @MonthNum     { @Moment&&now @Open { @Month                  }}
+	    named @Day          { @Moment&&now @Open { @WeekDays&&@WeekDay     }}
+	    named @ShortDay     { @Moment&&now @Open { @ShortWeekDays&&@WeekDay}}
+	    named @DayNum       { @Moment&&now @Open { @Day                    }}
+	    named @MeriDiem     { @Moment&&now @Open { @MeriDiems&&@Hour       }}
+	    named @ShortMeriDiem{ @Moment&&now @Open { @ShortMeriDiems&&@Hour  }}
+	    named @Hour         { @Moment&&now @Open { @Hour                   }}
+	    named @TwelveHour   { @Moment&&now @Open { @TwelveHours&&@Hour     }}
+	    named @ShortHour    { @Moment&&now @Open { @ShortHours&&@Hour      }}
+	    named @Minute       { @Moment&&now @Open { @Minute                 }}
+	    named @Second       { @Moment&&now @Open { @Second                 }}
+	{
+	    @DateTimeFormat&&time @Open { @Value
+		@Year          { @Year }
+		@ShortYear     { @ShortYear }
+		@Month         { @Month }
+		@ShortMonth    { @ShortMonth }
+		@MonthNum      { @MonthNum }
+		@Day           { @Day }
+		@ShortDay      { @ShortDay }
+		@DayNum        { @DayNum }
+		@MeriDiem      { @MeriDiem }
+		@ShortMeriDiem { @ShortMeriDiem }
+		@Hour          { @Hour }
+		@TwelveHour    { @TwelveHour }
+		@ShortHour     { @ShortHour }
+		@Minute        { @Minute }
+		@Second        { @Second }
+	    }
+	}
+    { @Format }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @DropCapTwo and @DropCapThree                                          #
+    #                                                                         #
+    ###########################################################################
+
+    def @DropCapTwo
+	left y
+	named height { 1.5v }
+	right x
+    {
+	def @ParPlace { @Galley }
+	def @EndParPlace { @Galley }
+
+	def @LineList
+	{
+	    @PAdjust @ParPlace
+	    //1vx @LineList
+	}
+
+	def @ParGalley horizontally into { @ParPlace&&preceding }
+	    right x
+	{
+	    x
+	}
+
+	def @EndPar force into { @EndParPlace&&following } { @Null }
+
+	def @Cap
+	{
+	    -0.25f @VShift 1.0w @VShift {
+		-90d @Rotate height @Wide @Scale 90d @Rotate y
+	    }
+	}
+
+						  |1s @PAdjust @ParPlace 
+	/1vo  @Cap @ParGalley {x & @EndPar &1rt } |   @PAdjust @ParPlace
+	//1vx @LineList
+	//    @EndParPlace
+    }
+
+    def @DropCapThree
+	left y
+	named height { 2.5v }
+	right x
+    {
+	def @ParPlace { @Galley }
+	def @EndParPlace { @Galley }
+
+	def @LineList
+	{
+	    @PAdjust @ParPlace
+	    //1vx @LineList
+	}
+
+	def @ParGalley force horizontally into { @ParPlace&&preceding }
+	    right x
+	{
+	    x
+	}
+
+	def @EndPar force into { @EndParPlace&&following } { @Null }
+
+	def @Cap
+	{
+	    -0.25f @VShift 1.0w @VShift {
+		-90d @Rotate height @Wide @Scale 90d @Rotate y
+	    }
+	}
+
+						|1s @PAdjust @ParPlace 
+	/1vo  @ParGalley { x & @EndPar &1rt }	|   @PAdjust @ParPlace
+	/1vo  @Cap				|   @PAdjust @ParPlace
+	//1vx @LineList
+	//    @EndParPlace
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @Centre, @Center, @Right, @NoDotSep, @NoDotJoin, @DotSep,              #
+    #  @DotJoin, @DashJoin, @NumSep                                           #
+    #                                                                         #
+    ###########################################################################
+
+    macro @Centre @Center { |0.5rt @HContract }
+
+    def @Right
+	precedence 50
+	left x
+	right y
+    { x |1.0rt @OneCol { 2f @Wide {} | y } }
+
+    def @NoDotSep left x right y
+    {
+	x @Case {
+	    {}   @Yield y
+	    else @Yield {
+		y @Case {
+		    {}   @Yield x
+		    else @Yield { x |2s y }
+		}
+	    }
+	}
+    }
+
+    def @NoDotJoin left x right y
+    {
+	x @Case {
+	    {}   @Yield y
+	    else @Yield {
+	        y @Case {
+		    {}   @Yield x
+		    else @Yield { x{y} }
+	        }
+	    }
+	}
+    }
+
+    def @DotSep left x right y
+    {
+	x @Case {
+	    {}   @Yield y
+	    else @Yield {
+		y @Case {
+		    {}   @Yield x
+		    else @Yield { x. |2s y }
+		}
+	    }
+        }
+    }
+
+    def @DotJoin left x right y
+    {
+	x @Case {
+	    {}   @Yield y
+	    else @Yield {
+		y @Case {
+		    {}   @Yield x
+		    else @Yield { x.y }
+		}
+	    }
+	}
+    }
+
+    def @DashJoin left x right y
+    {
+	x @Case {
+	    {}   @Yield y
+	    else @Yield {
+		y @Case {
+		    {}   @Yield x
+		    else @Yield { x--y }
+		}
+	    }
+        }
+    }
+
+    def @NumSep left x right y
+    {
+	x @Case {
+	    {}   @Yield y
+	    else @Yield {
+		y @Case {
+		    {}   @Yield x
+		    else @Yield {
+			@CurrLang @Case {
+			    Hungarian @Yield { y. x }
+			    else      @Yield { x y }
+			}
+		    }
+		}
+	    }
+        }
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @OverStrike, @Sup and @Sub                                            #
+    #                                                                         #
+    ###########################################################################
+
+    def @OverStrike left x right y
+    {
+	@OneRow { @HContract @VContract x /0io @HContract @VContract y }
+    }
+
+    def @Sup
+	left x
+	named gap { 0.40fk }
+	right y
+    {
+	@HContract @VContract
+	{
+	    | 0.7f @Font y ^/gap x
+	}
+    }
+
+    def @Sub
+	left x
+	named gap { 0.40fk }
+	right y
+    {
+	@HContract @VContract
+	{
+	    x /gap | 0.7f @Font y
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @Colour, @Color, @AddPaint, @LineWidth                                #
+    #                                                                         #
+    ###########################################################################
+
+    def @ColourCommand right col
+    {
+	def @ColourCoords
+	{
+	    col @Case {
+		darkblue	@Yield	{ 0.0 0.0 0.5 }
+		blue		@Yield	{ 0.0 0.0 1.0 }
+		lightblue	@Yield	{ 0.5 0.5 1.0 }
+		darkgreen	@Yield	{ 0.0 0.5 0.0 }
+		green		@Yield	{ 0.0 1.0 0.0 }
+		lightgreen	@Yield	{ 0.5 1.0 0.5 }
+		darkred		@Yield	{ 0.5 0.0 0.0 }
+		red		@Yield	{ 1.0 0.0 0.0 }
+		lightred	@Yield	{ 1.0 0.5 0.5 }
+		darkcyan	@Yield	{ 0.0 0.5 0.5 }
+		cyan		@Yield	{ 0.0 1.0 1.0 }
+		lightcyan	@Yield	{ 0.5 1.0 1.0 }
+		darkmagenta	@Yield	{ 0.5 0.0 0.5 }
+		magenta		@Yield	{ 1.0 0.0 1.0 }
+		lightmagenta	@Yield	{ 1.0 0.5 1.0 }
+		darkyellow	@Yield	{ 0.5 0.5 0.0 }
+		yellow		@Yield	{ 1.0 1.0 0.0 }
+		lightyellow	@Yield	{ 1.0 1.0 0.5 }
+		darkgray	@Yield	{ 0.2 0.2 0.2 }
+		gray		@Yield	{ 0.5 0.5 0.5 }
+		lightgray	@Yield	{ 0.8 0.8 0.8 }
+		darkgrey	@Yield	{ 0.2 0.2 0.2 }
+		grey		@Yield	{ 0.5 0.5 0.5 }
+		lightgrey	@Yield	{ 0.8 0.8 0.8 }
+		black		@Yield	{ 0.0 0.0 0.0 }
+		white		@Yield	{ 1.0 1.0 1.0 }
+	    }
+	}
+
+	col @Case {
+	    nochange @Yield { nochange }
+	    else @Yield { @BackEnd @Case {
+		PostScript	@Yield { @ColourCoords setrgbcolor }
+		PDF		@Yield { @ColourCoords rg @ColourCoords RG }
+		PlainText	@Yield ""
+	    } }
+	}
+    }
+
+    def @Colour @Color left col right y { {@ColourCommand col} @SetColour y }
+
+    def @AddPaint right col
+    {
+	col @Case {
+	    none @Yield ""
+	    nochange @Yield {
+		@BackEnd @Case {
+		    PostScript @Yield "gsave fill grestore"
+		    PDF        @Yield "q f Q"
+		    PlainText  @Yield ""
+		}
+	    }
+	    else @Yield {
+		@BackEnd @Case {
+		    PostScript @Yield {"gsave" @ColourCommand col "fill grestore"}
+		    PDF        @Yield { "q" @ColourCommand col "f Q" }
+		    PlainText  @Yield ""
+		}
+	    }
+	}
+    }
+
+    def @LineWidth right lw
+    {
+	lw @Case {
+	    "" @Yield ""
+	    else @Yield {
+		@BackEnd @Case {
+		    PostScript @Yield { lw "setlinewidth" }
+		    PDF        @Yield { lw "w" }
+		    PlainText  @Yield ""
+		}
+	    }
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @FullWidthRule, @Box, @CurveBox, and @ShadowBox                       #
+    #                                                                         #
+    ###########################################################################
+
+    def @FullWidthRule
+	import @LengthUnits named linewidth {}
+    {
+	@BackEnd @Case {
+
+	    PostScript @Yield @HExpand {
+		{ "LoutRule" @LineWidth linewidth "stroke" } @Graphic { 0.5p @High }
+	    }
+
+	    PDF @Yield @HExpand {
+		{ "0 0 m __xsize 0 l" @LineWidth linewidth "S" } @Graphic { 0.5p @High }
+	    }
+
+	    PlainText @Yield { "-" @PlainGraphic 1f @High }
+	}
+    }
+
+    def @LocalWidthRule
+	import @LengthUnits named linewidth {}
+    {
+	@BackEnd @Case {
+
+	    PostScript @Yield {
+		{ "LoutRule" @LineWidth linewidth "stroke" } @Graphic { 0.5p @High }
+	    }
+
+	    PDF @Yield {
+		{ "0 0 m __xsize 0 l" @LineWidth linewidth "S" } @Graphic { 0.5p @High }
+	    }
+
+	    PlainText  @Yield { "-" @PlainGraphic 1f @High }
+	}
+    }
+
+    def @Box
+	named margin { 0.3f }
+	import @LengthUnits named linewidth {}
+	named paint { none }
+	right x
+    {
+	@BackEnd @Case {
+
+	    PostScript @Yield @VContract @HContract 0c @HShift {
+		{"LoutBox" @AddPaint paint @LineWidth linewidth "stroke"}
+		@Graphic
+		{ ^/margin ^|margin 0c @HShift @OneRow x |margin /margin }
+	    }
+
+	    PDF @Yield @VContract @HContract 0c @HShift {
+		{ "0 0 m __xsize 0 l __xsize __ysize l 0 __ysize l h"
+		@AddPaint paint @LineWidth linewidth "S" } @Graphic
+		{ ^/margin ^|margin 0c @HShift @OneRow x |margin /margin }
+	    }
+
+	    PlainText @Yield @VContract @HContract 0c @HShift {
+		^/margin ^|margin 0c @HShift @OneRow x |margin /margin
+	    }
+	}
+    }
+
+    def @CurveBox
+	named margin { 0.3f }
+	import @LengthUnits named linewidth {}
+	named paint { none }
+	right x
+    {
+	def @PDFStuff
+	{
+	    "__xmark 0 m"
+	    "__sub(__xsize, __xmark) 0 l"
+	    "__sub(__xsize, __div(__mul(11, __xmark), 24)) 0"
+	    "__xsize __div(__mul(11, __xmark), 24)"
+	    "__xsize __xmark c"
+	    "__xsize __sub(__ysize, __xmark) l"
+	    "__xsize __sub(__ysize, __div(__mul(11, __xmark), 24))"
+	    "__sub(__xsize, __div(__mul(11, __xmark), 24)) __ysize"
+	    "__sub(__xsize, __xmark) __ysize c"
+	    "__xmark __ysize l"
+	    "__div(__mul(11, __xmark), 24) __ysize"
+	    "0 __sub(__ysize, __div(__mul(11, __xmark), 24))"
+	    "0 __sub(__ysize, __xmark) c"
+	    "0 __xmark l"
+	    "0 __div(__mul(11, __xmark), 24)"
+	    "__div(__mul(11, __xmark), 24) 0"
+	    "__xmark 0 c"
+	    "h"
+	    @AddPaint paint @LineWidth linewidth "S"
+	}
+
+	@VContract @HContract 0c @HShift @BackEnd @Case {
+
+	    PostScript @Yield {
+		{"LoutCurveBox" @AddPaint paint @LineWidth linewidth "stroke"}
+		@Graphic
+		{ ^/margin ^|margin 0c @HShift @OneRow x |margin /margin }
+	    }
+
+	    PlainText @Yield {
+		^/margin ^|margin 0c @HShift @OneRow x |margin /margin
+	    }
+
+	    PDF @Yield {
+		@PDFStuff @Graphic
+		{ ^/margin ^|margin 0c @HShift @OneRow x |margin /margin }
+	    }
+	}
+    }
+
+    def @ShadowBox
+	named margin { 0.3f }
+	import @LengthUnits named linewidth {}
+	named paint { none }
+	named shadow { 0.2f }
+	right x
+    {
+	@VContract @HContract 0c @HShift @BackEnd @Case {
+
+	    PostScript @Yield {
+		"LoutShadowBox fill" @Graphic
+		{ ^/shadow ^|shadow 0c @HShift
+		      @Box margin {margin} paint {paint} linewidth {linewidth} x
+		      |shadow /shadow
+		}
+	    }
+
+	    PlainText @Yield {
+		^/shadow ^|shadow 0c @HShift
+		@Box margin {margin} paint {paint} linewidth {linewidth} x
+		|shadow /shadow
+	    } 
+
+	    PDF @Yield {
+		{
+		  "__mul(__xmark, 2) 0 m __xsize 0 l"
+		  "__xsize __sub(__ysize, __mul(__xmark, 2)) l"
+		  "__sub(__xsize, __xmark) __sub(__ysize, __mul(__xmark, 2)) l"
+		  "__sub(__xsize, __xmark) __xmark l"
+		  "__mul(__xmark, 2) __xmark l h f"
+		}
+		@Graphic
+		{ ^/shadow ^|shadow 0c @HShift
+		  @Box margin {margin} paint {paint} linewidth {linewidth} x
+		  |shadow /shadow
+		}
+	    }
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @BoundaryMarks                                                        #
+    #                                                                         #
+    ###########################################################################
+
+    def @BoundaryMarks
+	import @LengthUnits named linewidth { 0.2p }
+	import @LengthUnits named length { 0.5c }
+	import @LengthUnits named gap { 0.5c }
+	import @LengthUnits named lout { 0c }
+	import @LengthUnits named rout { 0c }
+	import @LengthUnits named uout { 0c }
+	import @LengthUnits named dout { 0c }
+    {
+	def @UpStroke    { "0" gap       "rmoveto" "0" length     "rlineto" }
+	def @DownStroke  { "0" gap "neg" "rmoveto" "0" length "neg rlineto" }
+	def @LeftStroke  { gap "neg" "0" "rmoveto" length "neg" "0 rlineto" }
+	def @RightStroke { gap "0"       "rmoveto" length       "0 rlineto" }
+
+	def @LLSpot { lout "neg"             dout "neg" moveto }
+	def @LRSpot { xsize rout "add"       dout "neg" moveto }
+	def @ULSpot { lout "neg"       ysize uout "add" moveto }
+	def @URSpot { xsize rout "add" ysize uout "add" moveto }
+
+	def @PDFStuff {
+	    "__sub(-"gap", "lout")            __sub(0, "dout") m "
+	    "__sub(__sub(-"gap", "lout"), "length") __sub(0, "dout") l"
+	    "__sub(0, "lout")       __sub(-"gap", "dout") m "
+	    "__sub(0, "lout") __sub(__sub(-"gap", "dout"), "length") l"
+	    "__add(__xsize,"rout")       __sub(-"gap", "dout") m "
+	    "__add(__xsize,"rout") __sub(__sub(-"gap", "dout"), "length") l"
+	    "__add(__add(__xsize,"rout"),"gap")           __sub(0, "dout") m "
+	    "__add(__add(__add(__xsize,"rout"),"gap"),"length") __sub(0, "dout") l"
+	    "      __sub(__sub(0, "lout"), "gap")            __add(__ysize, "uout") m "
+	    "__sub(__sub(__sub(0, "lout"), "gap"), "length") __add(__ysize, "uout") l"
+	    "__sub(0, "lout")       __add(__add(__ysize, "uout"), "gap") m "
+	    "__sub(0, "lout") __add(__add(__add(__ysize, "uout"), "gap"), "length") l"
+	    "      __add(__add(__xsize, "rout"), "gap")            __add(__ysize, "uout") m "
+	    "__add(__add(__add(__xsize, "rout"), "gap"), "length") __add(__ysize, "uout") l"
+	    "__add(__xsize, "rout")       __add(__add(__ysize, "uout"), "gap") m "
+	    "__add(__xsize, "rout") __add(__add(__add(__ysize, "uout"), "gap"), "length") l"
+
+	    linewidth "w S"
+	}
+
+	@BackEnd @Case {
+
+	    PostScript @Yield {
+		{
+		    @LLSpot @LeftStroke
+		    @LLSpot @DownStroke
+		    @LRSpot @DownStroke
+		    @LRSpot @RightStroke
+		    @ULSpot @LeftStroke
+		    @ULSpot @UpStroke
+		    @URSpot @RightStroke
+		    @URSpot @UpStroke
+	
+		    linewidth "setlinewidth stroke"
+		} @Graphic {}
+	    }
+
+	    PlainText @Yield ""
+
+	    PDF @Yield { @PDFStuff @Graphic {} }
+	}
+    }
+
+    ##########################################################################
+    #                                                                        #
+    #   @NumberMarker, @NumberOf, @PageMarker, @PageMark, and @PageOf        #
+    #                                                                        #
+    ##########################################################################
+
+    export @Tag @Value
+    def @NumberMarker
+	named @Tag {}
+	named @Value { "??" }
+    {
+	@Null
+    }
+
+    def @NumberOf
+	right x
+    {
+	@NumberMarker&&x @Open { @Value }
+    }
+
+
+    export num rawnum @Tag
+    def @PageMarker
+	named @Tag {}
+	named num {}
+	named rawnum {}
+    {
+	@PageLabel num
+    }
+
+    def @PageMark
+	right x
+    {
+	@PageMarker&&preceding @Tagged x
+    }
+
+    def @PageOf
+	right x
+    {
+	@PageMarker&&x @Open { num }
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @Join and @Sep                                                         #
+    #                                                                         #
+    #  Join two objects together with @NumberSeparator, unless one is         #
+    #  empty in which case just return the other.                             #
+    #                                                                         #
+    ###########################################################################
+
+    def @Join left x right y
+    {
+        x @Case {
+	    {}   @Yield y
+	    else @Yield {
+	        y @Case {
+		    {}   @Yield x
+		    else @Yield { x{@NumberSeparator}y }
+	        }
+	    }
+        }
+    }
+
+    def @Sep left x right y
+    {
+	x @Case {
+	    {}   @Yield y
+	    else @Yield {
+		y @Case {
+		    {}   @Yield x
+		    else @Yield { x{@NumberSeparator} |2s y }
+		}
+	    }
+        }
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Miscellaneous.                                                         #
+    #                                                                         #
+    ###########################################################################
+
+    def @Heading       right x { ragged @Break @HeadingFont      @Font x }
+    def "^"		       { {} ^& {}				 }
+    def "&-"  left x   right y { x &0ch y				 }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @If @Not @And @Or @True                                                #
+    #                                                                         #
+    #  Used in databases to make optional fields format nicely.               #
+    #                                                                         #
+    ###########################################################################
+
+    def @If
+	precedence 97
+	left x
+	right y
+    {
+	y @Case {
+	    {} @Yield @Null
+	    else @Yield { @Null{x} }
+	}
+    }
+
+    def @Not
+	precedence 100
+	right y
+    {
+	y @Case {
+	    {} @Yield "*"
+	    else @Yield ""
+	}
+    }
+
+    def @And
+	precedence 99
+	left x
+	right y
+    {
+	x @Case {
+	   {} @Yield {}
+	   else @Yield y
+	}
+    }
+
+    def @Or
+	precedence 98
+	left x
+	right y
+    {
+	x @Case {
+	   {} @Yield y
+	   else @Yield x
+	}
+    }
+
+    def @True { "*" }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Paragraphs.                                                            #
+    #                                                                         #
+    ###########################################################################
+
+    macro @PP	{ //@ParaGap @ParaIndent @Wide &{0i}	}
+    macro @LP	{ //{@ParaGap}			  	}
+    macro @LLP	{ //{1vx}				}
+    macro @DP	{ //{@DisplayGap}			}
+    macro @LOP	{ //{@ListOuterGap}			}
+    macro @NP	{ //{1.1b}				}
+    macro @CNP	{ // 3.2v @High //0io //{}		}
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Beginning and ending of aligned displays.                              #
+    #                                                                         #
+    ###########################################################################
+
+    def @APlace            { @Galley }
+    def @EndAlignedPlace   { @Galley }
+    def @AlignedPlace      { @Galley }
+
+    def @BAligned into { @APlace&&preceding }
+    {
+	def @AlignedList { @AlignedPlace /1.1b @AlignedList }
+
+	//1.1b @AlignedList
+	//     @EndAlignedPlace
+    }
+
+    macro @BAD @BeginAlignedDisplays { // @APlace | @BAligned }
+    def   @EAD @EndAlignedDisplays force into { @EndAlignedPlace&&preceding } {}
+
+
+    ###########################################################################
+    #                                                                         #
+    #  New code for numbered displays that will cross section boundaries      #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag val
+    def @NumDispCounterMarker
+	named @Tag {}
+	named val {}
+    {
+	@Null
+    }
+
+    def @NumDispNum right tag
+    {
+	@NumDispCounterMarker&&tag @Open { @Next val }
+    }
+
+    def @NumDispCounterIncrement
+	right tag
+    {
+	@NumDispCounterMarker&&preceding @Tagged tag
+	@NumDispCounterMarker val { @NumDispNum tag }
+	@NumberMarker @Tag { tag } @Value { @NumDispNum tag }
+    }
+
+    def @NN
+    {
+	@NumDispCounterMarker&&preceding @Open { @DisplayNumStyle val }
+    }
+
+    def @Do
+        left x
+        right y
+    {
+        x @Case {
+            { No None } @Yield @Null
+            else        @Yield y
+        }
+    }
+
+    def @BeginDisplayCounter
+	left condition
+	right prefix
+    {
+	condition @Do @NumDispCounterMarker val { prefix @Join 0 }
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Galleys that carry displays to their places.                           #
+    #                                                                         #
+    ###########################################################################
+
+    def @DispPlace { @Galley }
+
+    def @Disp into { @DispPlace&&preceding }
+	right x
+    {
+	x
+    }
+
+    def @NDisp into { @DispPlace&&preceding }
+	named @Tag {}
+	right x
+    {
+	@OneRow {
+	   @NumDispCounterIncrement @Tag
+	   @PageMark @Tag
+	   ^//
+	   @OneRow x
+	}
+    }
+
+    def @ADisp into { @AlignedPlace&&preceding }
+	right x
+    {
+	x
+    }
+
+    def @ANDisp into { @AlignedPlace&&preceding }
+	named @Tag {}
+	right x
+    {
+	@OneRow {
+	   @NumDispCounterIncrement @Tag
+	   @PageMark @Tag
+	   ^/
+	   @OneRow x
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Displays and raw displays.                                             #
+    #                                                                         #
+    ###########################################################################
+
+    macro @G  { |@DefaultIndent      }
+    macro @LG { |                    }
+    macro @IG { |@DisplayIndent      }
+    macro @CG { |0.5rt               }
+    macro @RG { |1.0rt               }
+    macro @QR { @DisplayIndent @Wide { |1rt @NN } }
+    macro @DX { @DispPlace           }
+    macro @DY { @Disp                }
+    macro @AX { @APlace              }
+    macro @AY { @ADisp               }
+    macro @NY { @NDisp               }
+    macro @MY { @ANDisp              }
+
+    macro @D	 @Display			{ @DP @G   @DX  |         @DP // @DY }
+    macro @LD	 @LeftDisplay			{ @DP @LG  @DX  |         @DP // @DY }
+    macro @ID	 @IndentedDisplay		{ @DP @IG  @DX  |         @DP // @DY }
+    macro @QD	 @QuotedDisplay			{ @DP @IG  @DX  @IG       @DP // @DY }
+    macro @CD	 @CentredDisplay
+		 @CenteredDisplay		{ @DP @CG  @DX  |         @DP // @DY }
+    macro	 @RightDisplay			{ @DP @RG  @DX  |         @DP // @DY }
+
+
+    macro @AD	 @AlignedDisplay		{ @DP @G   @AX  |         @DP // @AY }
+    macro @LAD	 @LeftAlignedDisplay		{ @DP @LG  @AX  |         @DP // @AY }
+    macro @IAD	 @IndentedAlignedDisplay	{ @DP @IG  @AX  |         @DP // @AY }
+    macro @QAD	 @QuotedAlignedDisplay		{ @DP @IG  @AX  @IG       @DP // @AY }
+    macro @CAD	 @CentredAlignedDisplay
+		 @CenteredAlignedDisplay	{ @DP @CG  @AX  |         @DP // @AY }
+    macro        @RightAlignedDisplay		{ @DP @RG  @AX  |         @DP // @AY }
+
+    macro @ND	 @NumberedDisplay		{ @DP @G   @DX  |1rt @NN  @DP // @NY }
+    macro @LND	 @LeftNumberedDisplay		{ @DP @LG  @DX  |1rt @NN  @DP // @NY }
+    macro @IND	 @IndentedNumberedDisplay	{ @DP @IG  @DX  |1rt @NN  @DP // @NY }
+    macro @QND	 @QuotedNumberedDisplay		{ @DP @IG  @DX  |1rt @QR  @DP // @NY }
+    macro @CND	 @CentredNumberedDisplay
+		 @CenteredNumberedDisplay	{ @DP @CG  @DX  |1rt @NN  @DP // @NY }
+    macro	 @RightNumberedDisplay		{ @DP @RG  @DX  |1rt @NN  @DP // @NY }
+
+    macro @AND	 @AlignedNumberedDisplay	{ @DP @G   @AX  |1rt @NN  @DP // @MY }
+    macro @LAND	 @LeftAlignedNumberedDisplay	{ @DP @LG  @AX  |1rt @NN  @DP // @MY }
+    macro @IAND	 @IndentedAlignedNumberedDisplay{ @DP @IG  @AX  |1rt @NN  @DP // @MY }
+    macro @QAND  @QuotedAlignedNumberedDisplay	{ @DP @IG  @AX  |1rt @QR  @DP // @MY }
+    macro @CAND	 @CentredAlignedNumberedDisplay
+		 @CenteredAlignedNumberedDisplay{ @DP @CG  @AX  |1rt @NN  @DP // @MY }
+    macro	 @RightAlignedNumberedDisplay	{ @DP @RG  @AX  |1rt @NN  @DP // @MY }
+
+
+    macro @RD	 @RawDisplay			{     @G   @DX  |         // @DY }
+    macro @RLD	 @RawLeftDisplay		{     @LG  @DX  |         // @DY }
+    macro @RID	 @RawIndentedDisplay		{     @IG  @DX  |         // @DY }
+    macro @RQD	 @RawQuotedDisplay		{     @IG  @DX  @IG |     // @DY }
+    macro @RCD	 @RawCentredDisplay
+		 @RawCenteredDisplay		{     @CG  @DX  | |       // @DY }
+    macro @RRD	 @RawRightDisplay		{     @RG  @DX  |         // @DY }
+
+
+    macro @RAD	 @RawAlignedDisplay		{     @G   @AX  |         // @AY }
+    macro @RLAD	 @RawLeftAlignedDisplay		{     @LG  @AX  |         // @AY }
+    macro @RIAD	 @RawIndentedAlignedDisplay	{     @IG  @AX  |         // @AY }
+    macro @RQAD	 @RawQuotedAlignedDisplay	{     @IG  @AX  @IG |     // @AY }
+    macro @RCAD	 @RawCentredAlignedDisplay
+		 @RawCenteredAlignedDisplay	{     @CG  @AX  |         // @AY }
+    macro @RRAD  @RawRightAlignedDisplay	{     @RG  @AX  |         // @AY }
+
+    macro @RND	 @RawNumberedDisplay		{     @G   @DX  |1rt @NN  // @NY }
+    macro @RLND	 @RawLeftNumberedDisplay	{     @LG  @DX  |1rt @NN  // @NY }
+    macro @RIND	 @RawIndentedNumberedDisplay	{     @IG  @DX  |1rt @NN  // @NY }
+    macro @RQND	 @RawQuotedNumberedDisplay	{     @IG  @DX  |1rt @QR  // @NY }
+    macro @RCND	 @RawCentredNumberedDisplay
+		 @RawCenteredNumberedDisplay	{     @CG  @DX  |1rt @NN  // @NY }
+    macro @RRND	 @RawRightNumberedDisplay	{     @RG  @DX  |1rt @NN  // @NY }
+
+    macro @RAND	 @RawAlignedNumberedDisplay	{     @G   @AX  |1rt @NN  // @MY }
+    macro @RLAND @RawLeftAlignedNumberedDisplay {     @LG  @AX  |1rt @NN  // @MY }
+    macro @RIAND @RawIndentedAlignedNumberedDisplay { @IG  @AX  |1rt @NN  // @MY }
+    macro @RQAND @RawQuotedAlignedNumberedDisplay {   @IG  @AX  |1rt @QR  // @MY }
+    macro @RCAND @RawCentredAlignedNumberedDisplay
+		 @RawCenteredAlignedNumberedDisplay { @CG  @AX  |1rt @NN  // @MY }
+    macro @RRAND @RawRightAlignedNumberedDisplay{     @RG  @AX  |1rt @NN  // @MY }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Lists and raw lists.                                                   #
+    #                                                                         #
+    ###########################################################################
+
+
+    def @ItemPlace          { @Galley }
+    def @InterruptItemPlace { @Galley }
+    def @NewPageItemPlace   { @Galley }
+    def @TagPlace           { @Galley }
+    def @EndListPlace       { @Galley }
+
+    def @RawList
+	named style right num { num              }
+	named type  right num { num              }
+	named gap             { @ListGap         }
+	named indent          { @ListIndent      }
+	named itemindent      { 0c		 }
+	named rightindent     { @ListRightIndent }
+	named labelwidth      { @ListLabelWidth  }
+	named start           { 1                }
+    {
+        def @MakeList right num
+	{
+	    def @NormalItem
+	    {
+	        |indent
+	        labelwidth @Wide {
+		    # @NumberMarker @Value {style num} {style num} &0io
+		    @NumberMarker @Value {num} {style type num} &0io
+		}
+	        |itemindent  @ItemPlace  |rightindent
+	        //gap  @MakeList @NotRevealed @Next num
+	    }
+
+	    def @InterruptItem
+	    {
+		@InterruptItemPlace
+		//gap  @MakeList @NotRevealed num
+	    }
+
+	    def @NewPageItem
+	    {
+		@NewPageItemPlace
+		//1.1b  @MakeList @NotRevealed num
+	    }
+
+	    @OneOf
+	    {
+		@NormalItem
+		@InterruptItem
+		@NewPageItem
+	    }
+	}
+
+	def @ListGalleyPlace { @Galley }
+
+	def @ListGalley into { @ListGalleyPlace&&preceding }
+	{
+	    @MakeList start // @EndListPlace
+	}
+
+	@ListGalleyPlace
+	//
+	@ListGalley
+    }
+
+    def listitem into { @ItemPlace&&preceding }
+	named @Tag {}
+	right x
+    {
+	   @NumberMarker&&preceding @Tagged @Tag
+	// @PageMark @Tag
+	// x
+    }
+
+    def droplistitem into { @ItemPlace&&preceding }
+	named @Tag {}
+	right x
+    {
+	   @NumberMarker&&preceding @Tagged @Tag
+	// @PageMark @Tag
+	//
+	//1vx x
+    }
+
+    def tagitem into { @ItemPlace&&preceding }
+	named tag {}
+	right x
+    {
+	def sendtag into { @TagPlace&&preceding } { tag }
+
+	sendtag // x
+    }
+
+    def droptagitem into { @ItemPlace&&preceding }
+	named tag {}
+	right x
+    {
+	def sendtag into { @TagPlace&&preceding } { tag }
+
+	sendtag // //1vx x
+    }
+
+    def endlist force into { @EndListPlace&&preceding } {}
+
+    def listnewpage into { @NewPageItemPlace&&preceding } {}
+
+    def listinterruptitem into { @InterruptItemPlace&&preceding }
+	right x
+    {
+	x
+    }
+
+
+    macro @LI   @ListItem		{ // listitem			}
+    macro @LII  @ListInterruptItem	{ // listinterruptitem		}
+    macro @LNP  @ListNewPage		{ // listnewpage		}
+    macro @DLI  @DropListItem		{ // droplistitem		}
+    macro @TI   @TagItem		{ // tagitem tag		}
+    macro @DTI  @DropTagItem		{ // droptagitem tag		}
+    macro @REL  @RawEndList		{ // & endlist // 		}
+    macro @EL   @EndList		{ // & endlist @LOP		}
+
+
+    macro @RLL    @RawLeftList		{ @RawList style {}
+						   labelwidth { 0c }           }
+    macro @RIL    @RawIndentedList	{ @RawList style {}                    }
+    macro @RQL    @RawQuotedList	{ @RawList style {}
+						   rightindent {@DisplayIndent}}
+    macro @RCL    @RawCentredList	{ @RawList style {}
+						   labelwidth {0c}
+						   itemindent {0.5rt}          }
+    macro         @RawCenteredList	{ @RawCentredList                      }
+    macro @RNL    @RawNumberedList      { @RawList style { num.	             } }
+    macro @RPNL   @RawParenNumberedList { @RawList style { (num)	     } }
+    macro @RRL    @RawRomanList	        { @RawList type  { @Roman&&num }
+						   style { num.    } }
+    macro @RPRL   @RawParenRomanList    { @RawList type  { @Roman&&num }
+						   style { (num)   } }
+    macro @RUCRL  @RawUCRomanList       { @RawList type  { @UCRoman&&num }
+						   style { num.  } }
+    macro @RPUCRL @RawParenUCRomanList  { @RawList type  { @UCRoman&&num }
+						   style { (num) } }
+    macro @RAL    @RawAlphaList	        { @RawList type  { @Alpha&&num }
+						   style { num.    } }
+    macro @RPAL   @RawParenAlphaList    { @RawList type  { @Alpha&&num }
+						   style { (num)   } }
+    macro @RUCAL  @RawUCAlphaList       { @RawList type  { @UCAlpha&&num }
+						   style { num.  } }
+    macro @RPUCAL @RawParenUCAlphaList  { @RawList type  { @UCAlpha&&num }
+						   style { (num) } }
+    macro @RBL    @RawBulletList        { @RawList style { @Bullet	     } }
+    macro @RSL    @RawStarList	        { @RawList style { @Star	     } }
+    macro @RDL    @RawDashList	        { @RawList style { --	 	     } }
+    macro @RTL    @RawTaggedList        { @RawList type { @TagPlace         } }
+    macro @RWTL   @RawWideTaggedList    { @RawList type { @TagPlace         }
+					           labelwidth { @WideIndent  } }
+    macro @RVWTL  @RawVeryWideTaggedList{ @RawList type { @TagPlace         }
+					        labelwidth { @VeryWideIndent } }
+
+
+    macro @L     @List			{ @LOP @RawList			}
+    macro @LL    @LeftList		{ @LOP @RawLeftList		}
+    macro @IL    @IndentedList		{ @LOP @RawIndentedList		}
+    macro @QL    @QuotedList		{ @LOP @RawQuotedList		}
+    macro @CL    @CentredList		{ @LOP @RawCentredList		}
+    macro        @CenteredList		{ @LOP @RawCenteredList		}
+    macro @NL    @NumberedList		{ @LOP @RawNumberedList		}
+    macro @PNL   @ParenNumberedList	{ @LOP @RawParenNumberedList	}
+    macro @RL    @RomanList		{ @LOP @RawRomanList		}
+    macro @PRL   @ParenRomanList	{ @LOP @RawParenRomanList	}
+    macro @UCRL  @UCRomanList		{ @LOP @RawUCRomanList		}
+    macro @PUCRL @ParenUCRomanList	{ @LOP @RawParenUCRomanList	}
+    macro @AL    @AlphaList		{ @LOP @RawAlphaList		}
+    macro @PAL   @ParenAlphaList	{ @LOP @RawParenAlphaList	}
+    macro @UCAL  @UCAlphaList		{ @LOP @RawUCAlphaList		}
+    macro @PUCAL @ParenUCAlphaList	{ @LOP @RawParenUCAlphaList	}
+    macro @BL    @BulletList		{ @LOP @RawBulletList		}
+    macro @SL    @StarList		{ @LOP @RawStarList		}
+    macro @DL    @DashList		{ @LOP @RawDashList		}
+    macro @TL    @TaggedList		{ @LOP @RawTaggedList		}
+    macro @WTL   @WideTaggedList	{ @LOP @RawWideTaggedList	}
+    macro @VWTL  @VeryWideTaggedList	{ @LOP @RawVeryWideTaggedList	}
+
+@End @BasicSetup
diff --git a/include/bsf.lpg b/include/bsf.lpg
new file mode 100644
index 0000000..8eb6c02
--- /dev/null
+++ b/include/bsf.lpg
@@ -0,0 +1,140 @@
+%%BeginResource: procset LoutBasicSetup
+
+% width height linethickness louteuro -
+% draw a Euro symbol of this width and height with this line thickness
+% Author: Jeff Kingston, based on code from Andrew Beardsley
+/louteuro {
+  20 dict begin
+    /eurothick exch def
+    /euroheight exch def
+    /eurowidth exch def
+    /eurostrokewidth euroheight 0.8 mul def
+    /eurostep eurothick 60 cos mul 60 sin div def
+    /eurotheta 40 def
+
+    % llx lly width thickness louteurobox -
+    % draw angled box starting at (llx, lly) with given width and thickness
+    /louteurobox
+    {
+      /euroboxthick exch def
+      /euroboxwidth exch def
+      newpath moveto euroboxwidth 0 rlineto
+      eurostep euroboxthick rlineto
+      euroboxwidth neg 0 rlineto closepath fill
+    } def
+
+    % lower cross stroke
+    0 euroheight 2 div eurothick 1.5 mul sub
+    eurostrokewidth eurothick louteurobox
+
+    % upper cross stroke
+    0 euroheight 2 div eurothick 0.5 mul add
+    eurostrokewidth eurostep 2 mul add eurothick louteurobox
+
+    % circular part
+    /eurohctr eurowidth euroheight 2 div eurotheta cos mul sub def
+    /eurovctr euroheight 2 div def
+    newpath
+    eurohctr eurovctr eurovctr eurotheta 350 eurotheta sub arc
+    eurohctr eurovctr eurovctr eurothick sub 365 eurotheta sub eurotheta arcn
+    closepath fill
+  end
+} def
+
+% path for @FullWidthRule symbol
+/LoutRule
+{ 0 0 moveto xsize 0 lineto
+} def
+
+% path for @Box symbol
+/LoutBox
+{ 0 0 moveto xsize 0 lineto
+  xsize ysize lineto 0 ysize lineto
+  closepath
+} def
+
+% path for @CurveBox symbol
+/LoutCurveBox
+{ xmark 0 moveto
+  xsize xmark sub xmark xmark 270 360 arc
+  xsize xmark sub ysize xmark sub xmark 0 90 arc
+  xmark ysize xmark sub xmark 90 180 arc
+  xmark xmark xmark 180 270 arc
+  closepath
+} def
+
+% path for @ShadowBox symbol
+/LoutShadowBox
+{ xmark 2 mul 0 moveto xsize 0 lineto
+  xsize ysize xmark 2 mul sub lineto
+  xsize xmark sub ysize xmark 2 mul sub lineto
+  xsize xmark sub xmark lineto
+  xmark 2 mul xmark lineto
+  closepath
+} def
+
+% set up dictionary containing margin note data: parity LoutMargSet -
+/LoutMargSet
+{ /LoutMargDict 12 dict def
+  LoutMargDict begin
+    /parity exch def
+    /matr matrix currentmatrix def
+    /rightx xsize def
+    /lefty ysize def   % highest allowable point for top of next left note
+    /righty ysize def  % highest allowable point for top of next right note
+    /max { 2 copy gt { pop } { exch pop } ifelse } def
+    /min { 2 copy lt { pop } { exch pop } ifelse } def
+  end
+} def
+
+%translate coordinate system for marginal notes:  type LoutMargShift -
+% where type 0 is left margin, 1 is right margin, 2 is outer, 3 is inner
+/LoutMargShift
+{ LoutMargDict begin
+
+    % y coordinate of top of note, in margin coords, before vertical adjust
+    0 ysize transform matr itransform exch pop
+
+    % decide whether left or right margin based on type and parity
+    exch [ 0 1 parity 1 parity sub ] exch get 0 eq
+    {
+      % left margin: adjust top of note downwards if overlaps previous note
+      lefty min
+
+      % bottom of note is new lefty position and also translate position
+      ysize sub dup /lefty exch def
+
+      % want right edge of note at coordinate zero
+      xsize neg exch
+    }
+    {
+      % right margin: adjust top of note downwards if overlaps previous note
+      righty min
+
+      % bottom of note is new righty position and also translate position
+      ysize sub dup /righty exch def
+
+      % want left edge of note at coordinate rightx
+      rightx exch
+    } ifelse
+
+    % stack now contains coord of bottom left corner in margin coordinates
+    matr setmatrix translate
+  end
+} def
+
+% create LoutPageDict with left, right, foot, top for @Place symbol users
+/LoutPageSet
+{
+  /LoutPageDict 5 dict def
+  LoutPageDict begin
+    /matr matrix currentmatrix def
+    /left 0 def
+    /right xsize def
+    /foot 0 def
+    /top ysize def
+  end
+
+} def
+
+%%EndResource
diff --git a/include/cprint b/include/cprint
new file mode 100644
index 0000000..d7acb06
--- /dev/null
+++ b/include/cprint
@@ -0,0 +1,70 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for C and C++ program printing                            #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  The @SysInclude { cprintf } line                                           #
+#                                                                             #
+#  This line causes Lout to read the definitions for C printing, and should   #
+#  not be touched.                                                            #
+#                                                                             #
+###############################################################################
+
+@SysInclude { cprintf }
+
+
+###############################################################################
+#                                                                             #
+#  The @CPSetup @Use clause                                                   #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+
+@Use { @CPSetup
+  # style		{ fixed			} # fixed, varying, or symbol
+
+  # fixedfont		{ Courier		} # font family if fixed
+  # fixedstrings	{ Base			} # string face if fixed
+  # fixedidentifiers	{ Base			} # identifier face if fixed
+  # fixedcomments	{ Base			} # comment face if fixed
+  # fixedkeywords	{ Base			} # keyword face if fixed
+  # fixednumbers	{ Base			} # number face if fixed
+  # fixedoperators	{ Base			} # operator face if fixed
+  # fixedsize		{ -1.0p			} # font size if fixed
+  # fixedline		{ 1.0vx			} # line-space if fixed
+  # fixedtabin		{ 8			} # tab interval if fixed
+  # fixedtabout		{ 8s			} # tab width if fixed
+
+  # varyingfont		{			} # font family if varying
+  # varyingstrings	{ Slope			} # string face if varying
+  # varyingidentifiers	{ Slope			} # identifier face if varying
+  # varyingcomments	{ Base			} # comment face if varying
+  # varyingkeywords	{ Bold			} # keyword face if varying
+  # varyingnumbers	{ Base			} # number face if varying
+  # varyingoperators	{ Base			} # operator face if varying
+  # varyingsize		{ 1.0f			} # font size if varying
+  # varyingline		{ 1.0vx			} # line-space if varying
+  # varyingtabin	{ 8			} # tab interval if varying
+  # varyingtabout	{ 3f			} # tab width if varying
+
+  # symbolfont		{			} # font family if symbol
+  # symbolstrings	{ Slope			} # string face if symbol
+  # symbolidentifiers	{ Slope			} # identifier face if symbol
+  # symbolcomments	{ Base			} # comment face if symbol
+  # symbolkeywords	{ Bold			} # keyword face if symbol
+  # symbolnumbers	{ Base			} # number face if symbol
+  # symboloperators	{ Base			} # operator face if symbol
+  # symbolsize		{ 1.0f			} # font size if symbol
+  # symbolline		{ 1.0vx			} # line-space if symbol
+  # symboltabin		{ 8			} # tab interval if symbol
+  # symboltabout	{ 3f			} # tab width if symbol
+}
diff --git a/include/cprintf b/include/cprintf
new file mode 100644
index 0000000..fca806e
--- /dev/null
+++ b/include/cprintf
@@ -0,0 +1,383 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @CPSetup package for formatting C and C++ programs (Version 1.1)      #
+#                                                                             #
+#  Version 1.0 by Jeffrey H. Kingston, March 1994.                            #
+#  Version 1.1 by Jeffrey H. Kingston, November 1998 (name change only)       #
+#                                                                             #
+#  This package uses a filtered body parameter to convert C and C++ source    #
+#  code into Lout source.  The filter program is c2lout which is distributed  #
+#  with Basser Lout Version 3.  The list of keywords and tokens is from       #
+#  Stroustrup, 2nd Edition.  See "User's Guide to the Lout Document           #
+#  Formatting System" for user information.                                   #
+#                                                                             #
+###############################################################################
+
+export @CP
+def @CPSetup
+    named style              { fixed     }  # print style
+
+    named fixedfont          { Courier   }  # font family if fixed
+    named fixedstrings       { Base      }  # string face if fixed
+    named fixedidentifiers   { Base      }  # identifier face if fixed
+    named fixedcomments      { Base      }  # comment face if fixed
+    named fixedkeywords      { Base      }  # keyword face if fixed
+    named fixednumbers       { Base      }  # number face if fixed
+    named fixedoperators     { Base      }  # operator face if fixed
+    named fixedsize          { -1.0p     }  # font size if fixed
+    named fixedline          { 1.0vx     }  # line-space if fixed
+    named fixedtabin	     { 8	 }  # tab interval if fixed
+    named fixedtabout	     { 8s	 }  # tab width if fixed
+
+    named varyingfont        {           }  # font family if varying
+    named varyingstrings     { Slope     }  # string face if varying
+    named varyingidentifiers { Slope     }  # identifier face if varying
+    named varyingcomments    { Base      }  # comment face if varying
+    named varyingkeywords    { Bold      }  # keyword face if varying
+    named varyingnumbers     { Base      }  # number face if varying
+    named varyingoperators   { Base      }  # operator face if varying
+    named varyingsize        { 1.0f      }  # font size if varying
+    named varyingline        { 1.0vx     }  # line-space if varying
+    named varyingtabin       { 8	 }  # tab interval if varying
+    named varyingtabout      { 3f	 }  # tab width if varying
+
+    named symbolfont         {           }  # font family if symbol
+    named symbolstrings      { Slope     }  # string face if symbol
+    named symbolidentifiers  { Slope     }  # identifier face if symbol
+    named symbolcomments     { Base      }  # comment face if symbol
+    named symbolkeywords     { Bold      }  # keyword face if symbol
+    named symbolnumbers      { Base      }  # number face if symbol
+    named symboloperators    { Base      }  # operator face if symbol
+    named symbolsize         { 1.0f      }  # font size if symbol
+    named symbolline         { 1.0vx     }  # line-space if symbol
+    named symboltabin        { 8	 }  # tab interval if symbol
+    named symboltabout       { 3f	 }  # tab width if symbol
+
+@Begin
+
+    export
+    
+	"$$" "$>" "`" @L @S @C
+
+	"0" "1" "2" "3" "4" "5" "6" "7" "8" "9"
+
+	"!" "%" "^" "&" "*" "(" ")" "-" "+" "=" "${" "$}" "|" "~"
+	"[" "]"     ";" "'" ":" "<" ">" "?" "," "."  "/"
+
+	"->" "++" "--" ".*" "->*" "<<" ">>"  "<="  ">=" "==" "!=" "&&"
+	"||" "*=" "/=" "%=" "+="  "-=" "<<=" ">>=" "&=" "^=" "|=" "::"
+
+	asm       continue  float     new       signed    try
+	auto      default   for       operator  sizeof    typedef
+	break     delete    friend    private   static    union
+	case      do        goto      protected struct    unsigned
+	catch     double    if        public    switch    virtual
+	char      else      inline    register  template  void
+	class     enum      int       return    this      volatile
+	const     extern    long      short     throw     while
+
+	@EvaluateCp
+
+    def @CP
+	named style        { style         }  # style
+	named font         { dft           }  # font family
+	named strings      { dft           }  # string font
+	named identifiers  { dft           }  # ident. font
+	named comments     { dft           }  # comment font
+	named keywords     { dft           }  # keyword font
+	named numbers      { dft           }  # number font
+	named operators    { dft           }  # operator font
+	named size         { dft           }  # font size
+	named line         { dft           }  # line-space
+	named tabin        { dft           }  # tab interval
+	named tabout       { dft           }  # tab width
+	body @Body			      # filtered, see below
+    @Begin
+
+	def @Test	# returns x unless x is dft
+	    left x
+	    named iffixed {}
+	    named ifvarying {}
+	    named ifsymbol {}
+	{
+	    x @Case {
+		dft @Yield {
+		    style @Case {
+			fixed   @Yield { iffixed   }
+			varying @Yield { ifvarying }
+			symbol  @Yield { ifsymbol  }
+		    }
+		}
+		else @Yield x
+	    }
+	}
+
+	def @InitTab
+	{
+	  tabin @Test
+	      iffixed   { fixedtabin   }
+	      ifvarying { varyingtabin }
+	      ifsymbol  { symboltabin  }
+	}
+
+	def @InitTabWidth
+	{
+	  tabout @Test
+	      iffixed   { fixedtabout   }
+	      ifvarying { varyingtabout }
+	      ifsymbol  { symboltabout  }
+	}
+
+	def @Filter
+	{
+	    c2lout -r -i{@FilterIn} -o{@FilterOut} -e{@FilterErr}
+	      -t{@InitTab} -T{@InitTabWidth}
+	}
+
+	def @InitFontFamily
+	{
+	  font @Test
+	      iffixed   { fixedfont   }
+	      ifvarying { varyingfont }
+	      ifsymbol  { symbolfont  }
+	}
+
+	def @InitSize
+	{
+	  size @Test
+	      iffixed   { fixedsize   }
+	      ifvarying { varyingsize }
+	      ifsymbol  { symbolsize  }
+	}
+
+	def @InitLine
+	{
+	  line @Test
+	      iffixed   { fixedline   }
+	      ifvarying { varyingline }
+	      ifsymbol  { symbolline  }
+	}
+
+	def @S		# for formatting C strings
+	    right x
+	{
+	    "\"" &
+	    strings @Test
+	      iffixed   { fixedstrings   }
+	      ifvarying { varyingstrings }
+	      ifsymbol  { symbolstrings  }
+	    @Font x
+	    & "\""
+	}
+
+	def "`"
+	{
+	    style @Case {
+		symbol	@Yield { "`" }
+		else	@Yield { "'" }
+	    }
+	}
+
+	def @L		# for formatting C character literals
+	    right x
+	{
+	    ` &
+	    strings @Test
+	      iffixed   { fixedstrings   }
+	      ifvarying { varyingstrings }
+	      ifsymbol  { symbolstrings  }
+	    @Font x
+	    & '
+	}
+
+	def @Ident	# for formatting C identifiers
+	{
+	    identifiers @Test
+	      iffixed   { fixedidentifiers   }
+	      ifvarying { varyingidentifiers }
+	      ifsymbol  { symbolidentifiers  }
+	}
+
+	def @C		# for formatting C comments
+	    right x
+	{
+	    comments @Test
+	      iffixed   { fixedcomments   }
+	      ifvarying { varyingcomments }
+	      ifsymbol  { symbolcomments  }
+	    @Font x
+	}
+
+	def @K		# for formatting C keywords
+	    right x
+	{
+	    keywords @Test
+	      iffixed   { fixedkeywords   }
+	      ifvarying { varyingkeywords }
+	      ifsymbol  { symbolkeywords  }
+	    @Font x
+	}
+
+	def @N		# for formatting C numbers
+	    right x
+	{
+	    numbers @Test
+	      iffixed   { fixednumbers   }
+	      ifvarying { varyingnumbers }
+	      ifsymbol  { symbolnumbers  }
+	    @Font x
+	}
+
+	def @O		# for formatting C operators
+	    right x
+	{
+	    operators @Test
+	      iffixed   { fixedoperators   }
+	      ifvarying { varyingoperators }
+	      ifsymbol  { symboloperators  }
+	    @Font x
+	}
+
+	def @A		# get characters from the Adobe Symbol font
+	    left sym
+	    right x
+	{
+	    style @Case {
+		symbol	@Yield { { Symbol Base } @Font @Char sym }
+		else	@Yield { x			}
+	    }
+	}
+
+	macro "$>" { {} & }
+
+	def "$$" { "#" }
+
+	def "0"		{ @N "0"			}
+	def "1"		{ @N "1"			}
+	def "2"		{ @N "2"			}
+	def "3"		{ @N "3"			}
+	def "4"		{ @N "4"			}
+	def "5"		{ @N "5"			}
+	def "6"		{ @N "6"			}
+	def "7"		{ @N "7"			}
+	def "8"		{ @N "8"			}
+	def "9"		{ @N "9"			}
+
+	def "!"		{ 		  @O "!"	}
+	def "%"		{		  @O "%"	}
+	def "^"		{		  @O "^"	}
+	def "&"		{		  @O "&"	}
+	def "*"		{ asteriskmath @A @O "*"	}
+	def "("		{		  @O "("	}
+	def ")"		{		  @O ")"	}
+	def "-"		{ minus @A	  @O "-"	}
+	def "+"		{ plus  @A	  @O "+"	}
+	def "="		{ equal @A	  @O "="	}
+	def "${"	{		  @O "{"	}
+	def "$}"	{		  @O "}"	}
+	def "|"		{		  @O "|"	}
+	def "~"		{		  @O "~"	}
+	def "["		{		  @O "["	}
+	def "]"		{		  @O "]"	}
+	def ";"		{		  @O ";"	}
+	def "'"		{		  @O "'"	}
+	def ":"		{		  @O ":"	}
+	def "<"		{ less @A	  @O "<"	}
+	def ">"		{ greater @A	  @O ">"	}
+	def "?"		{		  @O "?"	}
+	def ","		{		  @O ","	}
+	def "."		{		  @O "."	}
+	def "/"		{		  @O "/"	}
+	def "->"	{ arrowright @A	  @O "->"	}
+	def "++"	{		     { + }{ + }	}
+	def "--"	{		     { - }{ - }	}
+	def ".*"	{		     { . }{ * } }
+	def "->*"	{		     { ->}{ * }	}
+	def "<<"	{		     { < }{ < }	}
+	def ">>"	{		     { > }{ > }	}
+	def "<="	{ lessequal @A	  @O "<="	}
+	def ">="	{ greaterequal @A @O ">="	}
+	def "=="	{		     { = }{ = } }
+	def "!="	{ notequal @A	  @O "!="	}
+	def "&&"	{		     { & }{ & }	}
+	def "||"	{		     { | }{ | }	}
+	def "*="	{		     { * }{ = }	}
+	def "/="	{		     { / }{ = } }
+	def "%="	{		     { % }{ = } }
+	def "+="	{		     { + }{ = }	}
+	def "-="	{		     { - }{ = }	}
+	def "<<="	{		     { <<}{ = }	}
+	def ">>="	{		     { >>}{ = }	}
+	def "&="	{		     { & }{ = }	}
+	def "^="	{		     { ^ }{ = } }
+	def "|="	{		     { | }{ = }	}
+	def "::"	{		     { : }{ : }	}
+
+	def asm		{ @K "asm"			}
+	def auto	{ @K "auto"			}
+	def break	{ @K "break"			}
+	def case	{ @K "case"			}
+	def catch	{ @K "catch"			}
+	def char	{ @K "char"			}
+	def class	{ @K "class"			}
+	def const	{ @K "const"			}
+
+	def continue	{ @K "continue"			}
+	def default	{ @K "default"			}
+	def delete	{ @K "delete"			}
+	def do		{ @K "do"			}
+	def double	{ @K "double"			}
+	def else	{ @K "else"			}
+	def enum	{ @K "enum"			}
+	def extern 	{ @K "extern"			}
+
+	def float	{ @K "float"			}
+	def for		{ @K "for"			}
+	def friend	{ @K "friend"			}
+	def goto	{ @K "goto"			}
+	def if		{ @K "if"			}
+	def inline	{ @K "inline"			}
+	def int		{ @K "int"			}
+	def long	{ @K "long"			}
+
+	def new		{ @K "new"			}
+	def operator	{ @K "operator"			}
+	def private	{ @K "private"			}
+	def protected	{ @K "protected"		}
+	def public	{ @K "public"			}
+	def register	{ @K "register"			}
+	def return	{ @K "return"			}
+	def short	{ @K "short"			}
+
+	def signed	{ @K "signed"			}
+	def sizeof	{ @K "sizeof"			}
+	def static	{ @K "static"			}
+	def struct	{ @K "struct"			}
+	def switch	{ @K "switch"			}
+	def template	{ @K "template"			}
+	def this	{ @K "this"			}
+	def throw	{ @K "throw"			}
+
+	def try		{ @K "try"			}
+	def typedef	{ @K "typedef"			}
+	def union	{ @K "union"			}
+	def unsigned	{ @K "unsigned"			}
+	def virtual	{ @K "virtual"			}
+	def void	{ @K "void"			}
+	def volatile	{ @K "volatile"			}
+	def while	{ @K "while"			}
+
+	def @EvaluateCp right x
+	{
+	  { @InitFontFamily Base } @Font
+	  { @Ident @InitSize } @Font
+	  { @InitLine lines } @Break x
+	}
+
+	{ @InitFontFamily Base } @Font { @Ident @InitSize } @Font
+	{ @InitLine lines } @Break @Body
+
+    @End @CP
+
+@End @CPSetup
diff --git a/include/diag b/include/diag
new file mode 100644
index 0000000..b4ffdb2
--- /dev/null
+++ b/include/diag
@@ -0,0 +1,193 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for diagram printing                                      #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  The @SysInclude { diagf } line                                             #
+#                                                                             #
+#  This line causes Lout to read the definitions for diagrams, and should     #
+#  not be touched.                                                            #
+#                                                                             #
+###############################################################################
+
+@SysInclude { diagf }
+
+
+###############################################################################
+#                                                                             #
+#  The @DiagSetup @Use clause                                                 #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+
+@Use { @DiagSetup
+  # save		{ no			}
+  # maxlabels		{ 200			}
+  # outline		{ box			}
+  # margin		{ 0.6f			}
+  # shadow		{ 0.4f			}
+  # sides		{ 3			}
+  # angle		{ "dup 180 exch div"	}  # 180d / sides
+  # translate		{			}
+  # outlinestyle	{ solid			}
+  # outlinedashlength	{ 0.2f			}
+  # outlinewidth	{ 0.02f			}
+  # paint		{ nopaint		}
+  # font		{			}
+  # break		{			}
+  # format		{ @Body			}
+  # valign		{ ctr			}
+  # vsize		{			}
+  # vindent		{ ctr			}
+  # vstrut		{ no			}
+  # vmargin		{			}
+  # topmargin		{			}
+  # footmargin		{			}
+  # halign		{ ctr			}
+  # hsize              	{			}
+  # hindent		{ ctr			}
+  # hstrut		{ no			}
+  # hmargin		{			}
+  # leftmargin		{			}
+  # rightmargin		{			}
+  # nodelabel		{			}
+  # nodelabelmargin	{ 0.2f			}
+  # nodelabelfont	{ "-2p"			}
+  # nodelabelbreak	{ ragged nohyphen	}
+  # nodelabelformat	{ @Body			}
+  # nodelabelpos	{			}
+  # nodelabelprox	{ outside		}
+  # nodelabelangle	{ horizontal		}
+  # nodelabelctr	{ no			}
+  # nodelabeladjust	{ 0 0			}
+  # alabel		{			}
+  # alabelmargin	{			}
+  # alabelfont		{			}
+  # alabelbreak		{			}
+  # alabelformat	{			}
+  # alabelpos		{ NE			}
+  # alabelprox		{			}
+  # alabelangle		{			}
+  # alabelctr		{ 			}
+  # alabeladjust	{			}
+  # blabel		{			}
+  # blabelmargin	{			}
+  # blabelfont		{			}
+  # blabelbreak		{			}
+  # blabelformat	{			}
+  # blabelpos		{ NW			}
+  # blabelprox		{			}
+  # blabelangle		{			}
+  # blabelctr		{ 			}
+  # blabeladjust	{			}
+  # clabel		{			}
+  # clabelmargin	{			}
+  # clabelfont		{			}
+  # clabelbreak		{			}
+  # clabelformat	{			}
+  # clabelpos		{ SW			}
+  # clabelprox		{			}
+  # clabelangle		{			}
+  # clabelctr		{ 			}
+  # clabeladjust	{			}
+  # dlabel		{			}
+  # dlabelmargin	{			}
+  # dlabelfont		{			}
+  # dlabelbreak		{			}
+  # dlabelformat	{			}
+  # dlabelpos		{ SE			}
+  # dlabelprox		{			}
+  # dlabelangle		{			}
+  # dlabelctr		{ 			}
+  # dlabeladjust	{			}
+  # path		{ line			}
+  # from		{ 0, 0			}
+  # to			{ 1, 1			}
+  # bias		{ 2.0f			}
+  # fbias		{ 2.0f			}
+  # tbias		{ 2.0f			}
+  # radius		{ 1.0f			}
+  # xindent		{ 0.8f			}
+  # zindent		{ 0.8f			}
+  # pathstyle		{ solid			}
+  # pathdashlength	{ 0.2f			}
+  # pathwidth		{ 0.02f			}
+  # pathgap		{ 0.04f			}
+  # arrow		{ no			}
+  # arrowstyle		{ solid			}
+  # arrowwidth		{ 0.45f			}
+  # arrowlength		{ 0.6f			}
+  # linklabel		{			}
+  # linklabelmargin	{ 0.2f			}
+  # linklabelfont	{ "-2p"			}
+  # linklabelbreak	{ ragged nohyphen	}
+  # linklabelformat	{ @Body			}
+  # linklabelpos	{			}
+  # linklabelprox	{ above			}
+  # linklabelangle	{ horizontal		}
+  # linklabelctr	{ no			}
+  # linklabeladjust	{ 0 0			}
+  # xlabel		{			}
+  # xlabelmargin	{			}
+  # xlabelfont		{			}
+  # xlabelbreak		{			}
+  # xlabelformat	{			}
+  # xlabelpos		{ LFROM			}
+  # xlabelprox		{			}
+  # xlabelangle		{			}
+  # xlabelctr		{			}
+  # xlabeladjust	{			}
+  # ylabel		{			}
+  # ylabelmargin	{			}
+  # ylabelfont		{			}
+  # ylabelbreak		{			}
+  # ylabelformat	{			}
+  # ylabelpos		{ LMID			}
+  # ylabelprox		{			}
+  # ylabelangle		{			}
+  # ylabelctr		{ yes			}
+  # ylabeladjust	{			}
+  # zlabel		{			}
+  # zlabelmargin	{			}
+  # zlabelfont		{			}
+  # zlabelbreak		{			}
+  # zlabelformat	{			}
+  # zlabelpos		{ LTO			}
+  # zlabelprox		{			}
+  # zlabelangle		{			}
+  # zlabelctr		{			}
+  # zlabeladjust	{			}
+  # fromlabel		{			}
+  # fromlabelmargin	{ 0f			}
+  # fromlabelfont	{ "-2p"			}
+  # fromlabelbreak	{ ragged nohyphen	}
+  # fromlabelformat	{ @Body			}
+  # fromlabelpos	{ FROM			}
+  # fromlabelprox	{ E			}
+  # fromlabelangle	{ antiparallel		}
+  # fromlabelctr	{ no			}
+  # fromlabeladjust	{ 0 0			}
+  # tolabel		{			}
+  # tolabelmargin	{ 0f			}
+  # tolabelfont		{ "-2p"			}
+  # tolabelbreak	{ ragged nohyphen	}
+  # tolabelformat	{ @Body			}
+  # tolabelpos		{ TO			}
+  # tolabelprox		{ E			}
+  # tolabelangle	{ parallel		}
+  # tolabelctr		{ no			}
+  # tolabeladjust	{ 0 0			}
+  # treehsep		{ 0.5f			}
+  # treevsep		{ 0.5f			}
+  # treehindent		{ ctr			}
+  # treevindent		{ ctr			}
+}
diff --git a/include/diagf b/include/diagf
new file mode 100644
index 0000000..18b888a
--- /dev/null
+++ b/include/diagf
@@ -0,0 +1,3845 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @Diag package for drawing diagrams                                    #
+#  Version 1.0 (July 1996)                                                    #
+#  Jeffrey H. Kingston                                                        #
+#                                                                             #
+#  Based on Version 2.0 of the @Fig package (Jeffrey H. Kingston, Dec 1992).  #
+#                                                                             #
+###############################################################################
+
+@SysPrependGraphic { diagf.lpg }
+@SysInclude { diagf.etc }
+
+export @Diag
+def @DiagSetup
+    named save		             	{ no	           	}
+    named maxlabels             	{ 200           	}
+
+    import @Geometry named outline
+	named margin {}
+	named shadow {}
+	named sides {}
+	named angle {}
+					{ box			}
+    named margin			{ 0.6f          	}
+    import @Geometry named shadow	{ 0.4f          	}
+    import @Geometry named sides	{ 3			}
+    import @Geometry named angle	{ "dup 180 exch div"	}
+    named translate			{			}
+    named outlinestyle
+	named solid   { "/ldiagsolid"   }
+	named dashed  { "/ldiagdashed"  }
+	named cdashed { "/ldiagcdashed" }
+	named dotted  { "/ldiagdotted"  }
+	named noline  { "/ldiagnoline"  }
+					{ solid         	}
+    import @Geometry named outlinedashlength	{ 0.2f		}
+    import @Geometry named outlinewidth
+	named thin   { 0.04 ft }
+	named medium { 0.08 ft }
+	named thick  { 0.12 ft }
+					{ thin	         	}
+    named paint                 	{ nopaint       	}
+    named font				{			}
+    named break				{			}
+    named format right @Body    	{ @Body         	}
+
+    named valign			{ ctr           	}
+    named vsize                 	{               	}
+    named vindent			{ ctr           	}
+    named vstrut
+	named no  { 0.0f }
+	named yes { 1.0f }
+					{ no            	}
+    named vmargin               	{               	}
+    named topmargin             	{               	}
+    named footmargin            	{               	}
+
+    named halign			{ ctr           	}
+    named hsize                 	{               	}
+    named hindent			{ ctr           	}
+    named hstrut
+	named no  { 0.0f }
+	named yes { 1.0f }
+					{ no            	}
+    named hmargin               	{               	}
+    named leftmargin            	{               	}
+    named rightmargin           	{               	}
+
+    named nodelabel			{			}
+    named nodelabelmargin		{ 0.2f			}
+    named nodelabelfont			{ -2p			}
+    named nodelabelbreak		{ ragged nohyphen	}
+    named nodelabelformat right @Body	{ @Body			}
+    import @Geometry named nodelabelpos	{ 			}
+    named nodelabelprox			{ outside		}
+    import @Geometry named nodelabelangle  { horizontal		}
+    named nodelabelctr			{ no			}
+    import @Geometry named nodelabeladjust { 0 0		}
+
+    named alabel			{			}
+    named alabelmargin			{ 			}
+    named alabelfont			{ 			}
+    named alabelbreak			{ 			}
+    named alabelformat right @Body	{ 			}
+    import @Geometry named alabelpos	{ NE			}
+    named alabelprox			{ 			}
+    import @Geometry named alabelangle	{ 			}
+    named alabelctr			{ 			}
+    import @Geometry named alabeladjust	{ 			}
+
+    named blabel			{			}
+    named blabelmargin			{ 			}
+    named blabelfont			{ 			}
+    named blabelbreak			{ 			}
+    named blabelformat right @Body	{ 			}
+    import @Geometry named blabelpos	{ NW			}
+    named blabelprox			{ 			}
+    import @Geometry named blabelangle	{ 			}
+    named blabelctr			{ 			}
+    import @Geometry named blabeladjust	{ 			}
+
+    named clabel			{			}
+    named clabelmargin			{ 			}
+    named clabelfont			{ 			}
+    named clabelbreak			{ 			}
+    named clabelformat right @Body	{ 			}
+    import @Geometry named clabelpos	{ SW			}
+    named clabelprox			{ 			}
+    import @Geometry named clabelangle	{ 			}
+    named clabelctr			{ 			}
+    import @Geometry named clabeladjust	{ 			}
+
+    named dlabel			{			}
+    named dlabelmargin			{ 			}
+    named dlabelfont			{ 			}
+    named dlabelbreak			{ 			}
+    named dlabelformat right @Body	{ 			}
+    import @Geometry named dlabelpos	{ SE			}
+    named dlabelprox			{ 			}
+    import @Geometry named dlabelangle	{ 			}
+    named dlabelctr			{ 			}
+    import @Geometry named dlabeladjust	{ 			}
+
+    import @Geometry named path
+	named from {}
+	named to {}
+	named bias {}
+	named fbias {}
+	named tbias {}
+	named radius {}
+	named xindent {}
+	named zindent {}
+	named frompt {}
+	named topt {}
+	named arrow {}
+	named arrowlength {}
+					{ line			}
+    import @Geometry named from		{ 0,0			}
+    import @Geometry named to		{ 1,1			}
+    import @Geometry named bias		{ 2.0f			}
+    import @Geometry named fbias	{ 2.0f			}
+    import @Geometry named tbias	{ 2.0f			}
+    import @Geometry named radius	{ 1.0f			}
+    import @Geometry named xindent	{ 0.8f			}
+    import @Geometry named zindent	{ 0.8f			}
+    import @Geometry named frompt	{ 0 0			}
+    import @Geometry named topt		{ 0 0			}
+    named pathstyle
+	named solid   { "/ldiagsolid"   }
+	named dashed  { "/ldiagdashed"  }
+	named cdashed { "/ldiagcdashed" }
+	named dotted  { "/ldiagdotted"  }
+	named noline  { "/ldiagnoline"  }
+					{ solid         	}
+    import @Geometry named pathdashlength { 0.2f		}
+    import @Geometry named pathwidth
+	named thin   { 0.04 ft }
+	named medium { 0.08 ft }
+	named thick  { 0.12 ft }
+					{ thin	         	}
+    import @Geometry named pathgap
+	named thin   { 0.08 ft }
+	named medium { 0.16 ft }
+	named thick  { 0.24 ft }
+					{ thin	         	}
+    named arrow                 	{ no			}
+    named arrowstyle             	{ solid			}
+    named arrowwidth             	{ 0.3f			}
+    named arrowlength            	{ 0.5f			}
+
+    named linklabel			{			}
+    named linklabelmargin		{ 0.2f			}
+    named linklabelfont			{ -2p			}
+    named linklabelbreak		{ ragged nohyphen	}
+    named linklabelformat right @Body	{ @Body			}
+    import @Geometry named linklabelpos	{ 			}
+    named linklabelprox			{ above			}
+    import @Geometry named linklabelangle  { horizontal		}
+    named linklabelctr			{ no			}
+    import @Geometry named linklabeladjust { 0 0		}
+
+    named xlabel			{			}
+    named xlabelmargin			{ 			}
+    named xlabelfont			{ 			}
+    named xlabelbreak			{ 			}
+    named xlabelformat right @Body	{ 			}
+    import @Geometry named xlabelpos	{ LFROM			}
+    named xlabelprox			{ 			}
+    import @Geometry named xlabelangle	{ 			}
+    named xlabelctr			{			}
+    import @Geometry named xlabeladjust	{ 			}
+
+    named ylabel			{			}
+    named ylabelmargin			{ 			}
+    named ylabelfont			{ 			}
+    named ylabelbreak			{ 			}
+    named ylabelformat right @Body	{ 			}
+    import @Geometry named ylabelpos	{ LMID			}
+    named ylabelprox			{ 			}
+    import @Geometry named ylabelangle	{ 			}
+    named ylabelctr			{ yes			}
+    import @Geometry named ylabeladjust	{ 			}
+
+    named zlabel			{			}
+    named zlabelmargin			{ 			}
+    named zlabelfont			{ 			}
+    named zlabelbreak			{ 			}
+    named zlabelformat right @Body	{ 			}
+    import @Geometry named zlabelpos	{ LTO			}
+    named zlabelprox			{ 			}
+    import @Geometry named zlabelangle	{ 			}
+    named zlabelctr			{			}
+    import @Geometry named zlabeladjust	{ 			}
+
+    named fromlabel			{			}
+    named fromlabelmargin		{ 0f			}
+    named fromlabelfont			{			}
+    named fromlabelbreak		{ ragged nohyphen	}
+    named fromlabelformat right @Body	{ @Body			}
+    import @Geometry named fromlabelpos	{ FROM			}
+    named fromlabelprox			{ W			}
+    import @Geometry named fromlabelangle  { antiparallel	}
+    named fromlabelctr			{ no			}
+    import @Geometry named fromlabeladjust { 0 0		}
+
+    named tolabel			{			}
+    named tolabelmargin			{ 0f			}
+    named tolabelfont			{			}
+    named tolabelbreak			{ ragged nohyphen	}
+    named tolabelformat right @Body	{ @Body			}
+    import @Geometry named tolabelpos	{ TO			}
+    named tolabelprox			{ W			}
+    import @Geometry named tolabelangle	{ parallel		}
+    named tolabelctr			{ no			}
+    import @Geometry named tolabeladjust { 0 0			}
+
+    named treehsep			{ 0.5f			}
+    named treevsep			{ 0.5f			}
+    named treehindent
+	named left  { 0.0rt }
+	named ctr   { 0.5rt }
+	named right { 1.0rt }
+					{ ctr			}
+    named treevindent
+	named top   { 0.0rt }
+	named ctr   { 0.5rt }
+	named foot  { 1.0rt }
+					{ ctr			}
+
+{
+
+    export "::" @ShowPoints @ShowTags @ShowDirections @CatchTags @Transform
+
+	   @Tree @HTree
+
+           @Node
+           @Box @CurveBox @ShadowBox @Square @Diamond @Polygon
+	   @Isosceles @Ellipse @Circle
+	   @ArrowHead @SolidArrowHead @OpenArrowHead @HalfOpenArrowHead
+	   @SolidCurvedArrowHead @OpenCurvedArrowHead @HalfOpenCurvedArrowHead
+	   @CircleArrowHead @BoxArrowHead
+
+	   @Link
+	   @Line @DoubleLine @Arrow @DoubleArrow @Curve @CurveArrow
+	   @ACurve @ACurveArrow @CCurve @CCurveArrow
+	   @Bezier @BezierArrow
+	   @HVLine @HVArrow @VHLine @VHArrow
+	   @HVCurve @HVCurveArrow @VHCurve @VHCurveArrow
+	   @LVRLine @LVRArrow @RVLLine @RVLArrow
+	   @LVRCurve @LVRCurveArrow @RVLCurve @RVLCurveArrow
+	   @DWrapLine @DWrapArrow @UWrapLine @UWrapArrow
+	   @DWrapCurve @DWrapCurveArrow @UWrapCurve @UWrapCurveArrow
+
+    def @Diag
+	named save		             	{ save	           	}
+        named maxlabels             		{ maxlabels     	}
+
+	import @Geometry named outline
+	    named margin {}
+	    named shadow {}
+	    named sides {}
+	    named angle {}
+						{ outline
+						    margin { margin }
+						    shadow { shadow }
+						    sides  { sides  }
+						    angle  { angle  }
+						}
+        named margin                		{ margin        	}
+	import @Geometry named shadow		{ shadow		}
+	import @Geometry named sides		{ sides			}
+	import @Geometry named angle		{ angle			}
+	named translate				{ translate		}
+	named nodetag				{			}
+        named outlinestyle
+	    named solid   { "/ldiagsolid"   }
+	    named dashed  { "/ldiagdashed"  }
+	    named cdashed { "/ldiagcdashed" }
+	    named dotted  { "/ldiagdotted"  }
+	    named noline  { "/ldiagnoline"  }
+						{ outlinestyle     	}
+        import @Geometry named outlinedashlength{ outlinedashlength    	}
+        import @Geometry named outlinewidth
+	    named thin   { 0.04 ft }
+	    named medium { 0.08 ft }
+	    named thick  { 0.12 ft }
+						{ outlinewidth     	}
+        named paint                 		{ paint         	}
+	named font				{ font			}
+	named break				{ break			}
+        named format right @Body    		{ format @Body  	}
+        named valign				{ valign        	}
+        named vsize                 		{ vsize         	}
+        named vindent				{ vindent       	}
+        named vstrut
+		named no  { 0.0f }
+		named yes { 1.0f }
+						{ vstrut	 	}
+        named vmargin               		{ vmargin       	}
+        named topmargin             		{ topmargin     	}
+        named footmargin            		{ footmargin    	}
+        named halign				{ halign        	}
+        named hsize                 		{ hsize         	}
+        named hindent				{ hindent       	}
+        named hstrut
+		named no  { 0.0f }
+		named yes { 1.0f }
+						{ hstrut	 	}
+        named hmargin               		{ hmargin       	}
+        named leftmargin            		{ leftmargin    	}
+        named rightmargin           		{ rightmargin   	}
+
+	import @Geometry named path
+	    named from {}
+	    named to {}
+	    named bias {}
+	    named fbias {}
+	    named tbias {}
+	    named radius {}
+	    named xindent {}
+	    named zindent {}
+	    named frompt {}
+	    named topt {}
+	    named arrow {}
+	    named arrowlength {}
+						{ path
+						    from	{ from }
+						    to		{ to   }
+						    bias	{ bias }
+						    fbias	{ fbias }
+						    tbias	{ tbias }
+						    radius	{ radius }
+						    xindent	{ xindent }
+						    zindent	{ zindent }
+						    frompt	{ frompt }
+						    topt	{ topt }
+						    arrow	{ arrow }
+						    arrowlength	{ arrowlength }
+						}
+	import @Geometry named from		{ from			}
+	import @Geometry named to		{ to			}
+	import @Geometry named bias		{ bias			}
+	import @Geometry named fbias		{ fbias			}
+	import @Geometry named tbias		{ tbias			}
+	import @Geometry named radius		{ radius		}
+	import @Geometry named xindent		{ xindent		}
+	import @Geometry named zindent		{ zindent		}
+	import @Geometry named frompt		{ frompt		}
+	import @Geometry named topt		{ topt			}
+        named pathstyle
+	    named solid   { "/ldiagsolid"   }
+	    named dashed  { "/ldiagdashed"  }
+	    named cdashed { "/ldiagcdashed" }
+	    named dotted  { "/ldiagdotted"  }
+	    named noline  { "/ldiagnoline"  }
+						{ pathstyle     	}
+        import @Geometry named pathdashlength	{ pathdashlength    	}
+        import @Geometry named pathwidth
+	    named thin   { 0.04 ft }
+	    named medium { 0.08 ft }
+	    named thick  { 0.12 ft }
+						{ pathwidth     	}
+        import @Geometry named pathgap
+	    named thin   { 0.08 ft }
+	    named medium { 0.16 ft }
+	    named thick  { 0.24 ft }
+						{ pathgap	     	}
+	named arrow				{ arrow			}
+	named arrowstyle			{ arrowstyle		}
+	named arrowwidth			{ arrowwidth		}
+	named arrowlength			{ arrowlength		}
+
+	named nodelabel				{ nodelabel		}
+	named nodelabelmargin			{ nodelabelmargin	}
+	named nodelabelfont			{ nodelabelfont		}
+	named nodelabelbreak			{ nodelabelbreak	}
+	named nodelabelformat right @Body	{ nodelabelformat @Body	}
+	import @Geometry named nodelabelpos	{ nodelabelpos		}
+	named nodelabelprox			{ nodelabelprox		}
+	import @Geometry named nodelabelangle	{ nodelabelangle	}
+	named nodelabelctr			{ nodelabelctr		}
+	import @Geometry named nodelabeladjust	{ nodelabeladjust	}
+
+        named alabel				{ alabel		}
+        named alabelmargin			{ alabelmargin		}
+        named alabelfont			{ alabelfont		}
+        named alabelbreak			{ alabelbreak		}
+	named alabelformat right @Body		{ alabelformat @Body	}
+        import @Geometry named alabelpos	{ alabelpos		}
+        named alabelprox			{ alabelprox		}
+        import @Geometry named alabelangle	{ alabelangle		}
+	named alabelctr				{ alabelctr		}
+        import @Geometry named alabeladjust	{ alabeladjust		}
+
+        named blabel				{ blabel		}
+        named blabelmargin			{ blabelmargin		}
+        named blabelfont			{ blabelfont		}
+        named blabelbreak			{ blabelbreak		}
+	named blabelformat right @Body		{ blabelformat @Body	}
+        import @Geometry named blabelpos	{ blabelpos		}
+        named blabelprox			{ blabelprox		}
+        import @Geometry named blabelangle	{ blabelangle		}
+	named blabelctr				{ blabelctr		}
+        import @Geometry named blabeladjust	{ blabeladjust		}
+
+        named clabel				{ clabel		}
+        named clabelmargin			{ clabelmargin		}
+        named clabelfont			{ clabelfont		}
+        named clabelbreak			{ clabelbreak		}
+	named clabelformat right @Body		{ clabelformat @Body	}
+        import @Geometry named clabelpos	{ clabelpos		}
+        named clabelprox			{ clabelprox		}
+        import @Geometry named clabelangle	{ clabelangle		}
+	named clabelctr				{ clabelctr		}
+        import @Geometry named clabeladjust	{ clabeladjust		}
+
+        named dlabel				{ dlabel		}
+        named dlabelmargin			{ dlabelmargin		}
+        named dlabelfont			{ dlabelfont		}
+        named dlabelbreak			{ dlabelbreak		}
+	named dlabelformat right @Body		{ dlabelformat @Body	}
+        import @Geometry named dlabelpos	{ dlabelpos		}
+        named dlabelprox			{ dlabelprox		}
+        import @Geometry named dlabelangle	{ dlabelangle		}
+	named dlabelctr				{ dlabelctr		}
+        import @Geometry named dlabeladjust	{ dlabeladjust		}
+
+        named fromlabel				{ fromlabel		}
+        named fromlabelmargin			{ fromlabelmargin	}
+        named fromlabelfont			{ fromlabelfont		}
+        named fromlabelbreak			{ fromlabelbreak	}
+	named fromlabelformat right @Body	{ fromlabelformat @Body	}
+        import @Geometry named fromlabelpos	{ fromlabelpos		}
+        named fromlabelprox			{ fromlabelprox		}
+        import @Geometry named fromlabelangle	{ fromlabelangle	}
+	named fromlabelctr			{ fromlabelctr		}
+        import @Geometry named fromlabeladjust	{ fromlabeladjust	}
+
+	named linklabel				{ linklabel		}
+	named linklabelmargin			{ linklabelmargin	}
+	named linklabelfont			{ linklabelfont		}
+	named linklabelbreak			{ linklabelbreak	}
+	named linklabelformat right @Body	{ linklabelformat @Body	}
+	import @Geometry named linklabelpos	{ linklabelpos		}
+	named linklabelprox			{ linklabelprox		}
+	import @Geometry named linklabelangle	{ linklabelangle	}
+	named linklabelctr			{ linklabelctr		}
+	import @Geometry named linklabeladjust	{ linklabeladjust	}
+
+        named xlabel				{ xlabel		}
+        named xlabelmargin			{ xlabelmargin		}
+        named xlabelfont			{ xlabelfont		}
+        named xlabelbreak			{ xlabelbreak		}
+	named xlabelformat right @Body		{ xlabelformat @Body	}
+        import @Geometry named xlabelpos	{ xlabelpos		}
+        named xlabelprox			{ xlabelprox		}
+        import @Geometry named xlabelangle	{ xlabelangle		}
+	named xlabelctr				{ xlabelctr		}
+        import @Geometry named xlabeladjust	{ xlabeladjust		}
+
+        named ylabel				{ ylabel		}
+        named ylabelmargin			{ ylabelmargin		}
+        named ylabelfont			{ ylabelfont		}
+        named ylabelbreak			{ ylabelbreak		}
+	named ylabelformat right @Body		{ ylabelformat @Body	}
+        import @Geometry named ylabelpos	{ ylabelpos		}
+        named ylabelprox			{ ylabelprox		}
+        import @Geometry named ylabelangle	{ ylabelangle		}
+	named ylabelctr				{ ylabelctr		}
+        import @Geometry named ylabeladjust	{ ylabeladjust		}
+
+        named zlabel				{ zlabel		}
+        named zlabelmargin			{ zlabelmargin		}
+        named zlabelfont			{ zlabelfont		}
+        named zlabelbreak			{ zlabelbreak		}
+	named zlabelformat right @Body		{ zlabelformat @Body	}
+        import @Geometry named zlabelpos	{ zlabelpos		}
+        named zlabelprox			{ zlabelprox		}
+        import @Geometry named zlabelangle	{ zlabelangle		}
+	named zlabelctr				{ zlabelctr		}
+        import @Geometry named zlabeladjust	{ zlabeladjust		}
+
+        named tolabel				{ tolabel		}
+        named tolabelmargin			{ tolabelmargin		}
+        named tolabelfont			{ tolabelfont		}
+        named tolabelbreak			{ tolabelbreak		}
+	named tolabelformat right @Body		{ tolabelformat @Body	}
+        import @Geometry named tolabelpos	{ tolabelpos		}
+        named tolabelprox			{ tolabelprox		}
+        import @Geometry named tolabelangle	{ tolabelangle		}
+	named tolabelctr			{ tolabelctr		}
+        import @Geometry named tolabeladjust	{ tolabeladjust		}
+
+	named treehsep				{ treehsep		}
+	named treevsep				{ treevsep		}
+	named treehindent
+	    named left  { 0.0rt }
+	    named ctr   { 0.5rt }
+	    named right { 1.0rt }
+						{ treehindent		}
+	named treevindent
+	    named top   { 0.0rt }
+	    named ctr   { 0.5rt }
+	    named foot  { 1.0rt }
+						{ treevindent		}
+        body @Body
+    @Begin
+
+        # Like @Graphic, but affects the graphics state of right parameter
+        def @InnerGraphic
+            left ps
+            right x
+        {
+          @BackEnd @Case {
+            PostScript @Yield {
+              { ps gsave // grestore } @Graphic x
+            }
+            PDF @Yield {
+              { ps q // Q } @Graphic x
+            }
+          }
+        }
+
+	def @BoxLabels right x
+	{
+          @BackEnd @Case {
+            PostScript @Yield {
+	        "[ ldiagbox ] pop" @Graphic x
+	      }
+	      PDF @Yield {}
+	    }
+	}
+
+	def @IfNonEmpty
+	    left x
+	    right y
+	{
+	    x @Case {
+		""   @Yield @Null
+		else @Yield y
+	    }
+	}
+
+	def @Else
+	    precedence 20
+	    associativity right
+	    left x
+	    right y
+	{
+	    x @Case {
+		""   @Yield y
+		else @Yield x
+	    }
+	}
+
+        def @ShowTags
+	    right x
+        {
+          @BackEnd @Case {
+            PostScript @Yield {
+            {
+	      "() ldiagpushtagdict"
+              // "ldiagshowtags ldiagpopuptagdict"
+	      } @Graphic x
+	      }
+	      PDF @Yield {}
+	    }
+        }
+
+        def @ShowPoints
+	    right x
+        {
+          @BackEnd @Case {
+            PostScript @Yield {
+            {
+	      "() ldiagpushtagdict"
+              // "ldiagshowpoints ldiagpopuptagdict"
+	      } @Graphic x
+	      }
+	      PDF @Yield {}
+	    }
+        }
+
+        def @ShowDirections
+	    right x
+        {
+          @BackEnd @Case {
+            PostScript @Yield {
+            { "() ldiagpushtagdict"
+              // "ldiagshowangles ldiagpopuptagdict" } @Graphic x
+	      }
+	      PDF @Yield {}
+	    }
+        }
+
+        def "::"
+            precedence 33
+	    associativity right
+            left name
+            right x
+        {
+          @BackEnd @Case {
+            PostScript @Yield {
+            { "("name") ldiagpushtagdict"
+              // "ldiagpopuptagdict" } @Graphic x
+	      }
+	      PDF @Yield {}
+	    }
+        }
+
+        def @CatchTags
+            precedence 33
+	    associativity right
+            right x
+        {
+          @BackEnd @Case {
+            PostScript @Yield {
+            {
+	       "() ldiagpushtagdict"
+               // "ldiagpoptagdict"
+	      }
+	      @Graphic x
+	      }
+	      PDF @Yield {}
+	    }
+        }
+
+        def @ZeroWidth right x
+        {
+	    @HContract @VContract {
+            ^|0io @HContract @VContract x |0io
+	    }
+        }
+
+        def @ZeroSize right x
+        {
+	    @HContract @VContract {
+            ^/0io ^|0io @HContract @VContract x |0io /0io
+	    }
+        }
+
+	def @FromArrowLength
+	    left arrow
+	    right arrowlength
+	{
+        @BackEnd @Case {
+          PostScript @Yield {
+	    arrow @Case {
+		{ no yes forward }   @Yield 0
+		{ back both }	     @Yield {"("arrowlength") ldiagdecodelength"}
+	    }
+	    }
+	    PDF @Yield {}
+	  }
+	}
+
+	def @ToArrowLength
+	    left arrow
+	    right arrowlength
+	{
+        @BackEnd @Case {
+          PostScript @Yield {
+	    arrow @Case {
+		{ no back }	     @Yield 0
+		{ yes forward both } @Yield {"("arrowlength") ldiagdecodelength"}
+	    }
+	    }
+	    PDF @Yield {}
+	  }
+	}
+
+	def @AddMargins
+	    named mtop {}
+	    named mfoot {}
+	    named mleft {}
+	    named mright {}
+	    right x
+	{
+
+	    @HContract @VContract {
+			 ^|mleft    |mright
+		^/mtop    |      x  |
+		 /mfoot   |         |
+	    }
+	}
+
+        def @Transform
+            precedence 32
+            import @Geometry named translate
+#               named to precedence 10 left x right y { x y "ldiagpsub" }
+                named to precedence 10 left x right y {
+                  @BackEnd @Case {
+                    PostScript @Yield { x y "ldiagpsub" }
+                    PDF @Yield {""}
+                  }
+                }
+            {}
+            import @Geometry named rotate { 0d }
+            named scale    { 1 1 }
+            right x
+        {
+          @BackEnd @Case {
+
+            PostScript @Yield {
+            { rotate "rotate" scale "scale newpath clip" }
+            @InnerGraphic
+            {
+                @ZeroSize x
+            }
+            //
+            # { rotate "rotate" scale "scale" translate "translate" }
+            { translate "translate" rotate "rotate" scale "scale" }
+            @InnerGraphic
+            {
+                @ZeroSize x
+            }
+	      }
+
+	      PDF @Yield { # presume that "rotate", "scale" and "translate" are not matrices
+            { "__cos("rotate") __sin("rotate") __sub(0, __sin("rotate")) __cos("rotate") 0 0 cm"
+              "__pick(1, "scale") 0 0 __pick(2, "scale") 0 0 cm n W" }
+            @InnerGraphic
+            {
+                @ZeroSize x
+            }
+            //
+            # { rotate "rotate" scale "scale" translate "translate" }
+            { "1 0 0 1 "translate" cm"
+              "__cos("rotate") __sin("rotate") __sub(0, __sin("rotate")) __cos("rotate") 0 0 cm"
+              "__pick(1, "scale") 0 0 __pick(2, "scale") 0 0 cm" }
+            @InnerGraphic
+            {
+                @ZeroSize x
+            }
+	      }
+
+	    }
+        }
+
+	def @DoLabel
+	    named which				{}
+	    named labeltag			{ LABEL }
+	    named label				{}
+	    named labelmargin			{}
+	    named labelfont			{}
+	    named labelbreak			{}
+	    named labelformat right @Body	{}
+	    named labelpos			{}
+	    named labelprox			{}
+	    named labelangle			{}
+	    named labelctr			{}
+	    named labeladjust			{}
+	{
+
+	    import @Geometry
+            def alignedangle
+            {
+		labelpos??"ANGLE" quadcase 
+			0	{ labelpos??"ANGLE"		}
+			0-90	{ labelpos??"ANGLE"		}
+			90	{ labelpos??"ANGLE"		}
+			90-180	{ labelpos??"ANGLE" + 180d	}
+			180	{ labelpos??"ANGLE" + 180d	}
+			180-270	{ labelpos??"ANGLE" + 180d	}
+			270	{ labelpos??"ANGLE" + 180d	}
+			270-360	{ labelpos??"ANGLE"		}
+	    }
+
+	    import @Geometry
+            def perpalignedangle
+            {
+		labelpos??"ANGLE" quadcase 
+			0	{ labelpos??"ANGLE" - 90d	}
+			0-90	{ labelpos??"ANGLE" - 90d	}
+			90	{ labelpos??"ANGLE" - 90d	}
+			90-180	{ labelpos??"ANGLE" - 90d	}
+			180	{ labelpos??"ANGLE" + 90d	}
+			180-270	{ labelpos??"ANGLE" + 90d	}
+			270	{ labelpos??"ANGLE" + 90d	}
+			270-360	{ labelpos??"ANGLE" + 90d	}
+		    
+	    }
+
+	    import @Geometry
+            def finalangle
+            {
+                labelangle @Case {
+
+		    "horizontal"	@Yield { 0d				}
+                    "aligned"		@Yield { alignedangle			}
+                    "perpendicular"	@Yield { perpalignedangle		}
+                    "parallel"		@Yield { labelpos??"ANGLE"		}
+                    "antiparallel"	@Yield { labelpos??"ANGLE" + 180d	}
+                    else		@Yield labelangle
+                }
+            }
+
+	    import @Geometry
+	    def @AlignedAboveProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SW) }
+				0-90	{ (SW) }
+				90	{ (SW) }
+				90-180	{ (SE) }
+				180	{ (SE) }
+				180-270	{ (SE) }
+				270	{ (SE) }
+				270-360	{ (SW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (SE) }
+				0-90	{ (SE) }
+				90	{ (SE) }
+				90-180	{ (SW) }
+				180	{ (SW) }
+				180-270	{ (SW) }
+				270	{ (SW) }
+				270-360	{ (SE) }
+			  }
+		  else @Yield (S)
+		}
+	    }
+
+	    import @Geometry
+	    def @AlignedBelowProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (NW) }
+				0-90	{ (NW) }
+				90	{ (NW) }
+				90-180	{ (NE) }
+				180	{ (NE) }
+				180-270	{ (NE) }
+				270	{ (NE) }
+				270-360	{ (NW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (NE) }
+				0-90	{ (NE) }
+				90	{ (NE) }
+				90-180	{ (NW) }
+				180	{ (NW) }
+				180-270	{ (NW) }
+				270	{ (NW) }
+				270-360	{ (NE) }
+			  }
+		  else @Yield (N)
+		}
+	    }
+
+	    import @Geometry
+	    def @AlignedLeftProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SW) }
+				0-90	{ (SW) }
+				90	{ (SW) }
+				90-180	{ (NE) }
+				180	{ (SE) }
+				180-270	{ (SE) }
+				270	{ (SE) }
+				270-360	{ (NW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (SE) }
+				0-90	{ (SE) }
+				90	{ (SE) }
+				90-180	{ (NW) }
+				180	{ (SW) }
+				180-270	{ (SW) }
+				270	{ (SW) }
+				270-360	{ (NE) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (S) }
+				0-90	{ (S) }
+				90	{ (S) }
+				90-180	{ (N) }
+				180	{ (S) }
+				180-270	{ (S) }
+				270	{ (S) }
+				270-360	{ (N) }
+			  }
+		}
+	    }
+
+	    import @Geometry
+	    def @AlignedRightProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SW) }
+				0-90	{ (NW) }
+				90	{ (NW) }
+				90-180	{ (SE) }
+				180	{ (SE) }
+				180-270	{ (NE) }
+				270	{ (NE) }
+				270-360	{ (SW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (SE) }
+				0-90	{ (NE) }
+				90	{ (NE) }
+				90-180	{ (SW) }
+				180	{ (SW) }
+				180-270	{ (NW) }
+				270	{ (NW) }
+				270-360	{ (SE) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (S) }
+				0-90	{ (N) }
+				90	{ (N) }
+				90-180	{ (S) }
+				180	{ (S) }
+				180-270	{ (N) }
+				270	{ (N) }
+				270-360	{ (S) }
+			  }
+		}
+	    }
+
+	    import @Geometry
+	    def @AlignedInsideProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SW) }
+				0-90	{ (SW) }
+				90	{ (SW) }
+				90-180	{ (NE) }
+				180	{ (NE) }
+				180-270	{ (NE) }
+				270	{ (NE) }
+				270-360	{ (SW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (SE) }
+				0-90	{ (SE) }
+				90	{ (SE) }
+				90-180	{ (NW) }
+				180	{ (NW) }
+				180-270	{ (NW) }
+				270	{ (NW) }
+				270-360	{ (SE) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (S) }
+				0-90	{ (S) }
+				90	{ (S) }
+				90-180	{ (N) }
+				180	{ (N) }
+				180-270	{ (N) }
+				270	{ (N) }
+				270-360	{ (S) }
+			  }
+		}
+	    }
+
+	    import @Geometry
+	    def @AlignedOutsideProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (NW) }
+				0-90	{ (NW) }
+				90	{ (NW) }
+				90-180	{ (SE) }
+				180	{ (SE) }
+				180-270	{ (SE) }
+				270	{ (SE) }
+				270-360	{ (NW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (NE) }
+				0-90	{ (NE) }
+				90	{ (NE) }
+				90-180	{ (SW) }
+				180	{ (SW) }
+				180-270	{ (SW) }
+				270	{ (SW) }
+				270-360	{ (NE) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (N) }
+				0-90	{ (N) }
+				90	{ (N) }
+				90-180	{ (S) }
+				180	{ (S) }
+				180-270	{ (S) }
+				270	{ (S) }
+				270-360	{ (N) }
+			  }
+		}
+	    }
+
+
+	    import @Geometry
+	    def @PerpendicularAboveProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SE) }
+				0-90	{ (SE) }
+				90	{ (SE) }
+				90-180	{ (SW) }
+				180	{ (NE) }
+				180-270	{ (NE) }
+				270	{ (NE) }
+				270-360	{ (NW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (NE) }
+				0-90	{ (NE) }
+				90	{ (NE) }
+				90-180	{ (NW) }
+				180	{ (SE) }
+				180-270	{ (SE) }
+				270	{ (SE) }
+				270-360	{ (SW) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (E) }
+				0-90	{ (E) }
+				90	{ (E) }
+				90-180	{ (W) }
+				180	{ (E) }
+				180-270	{ (E) }
+				270	{ (E) }
+				270-360	{ (W) }
+			  }
+		}
+	    }
+
+	    import @Geometry
+	    def @PerpendicularBelowProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SW) }
+				0-90	{ (SW) }
+				90	{ (SW) }
+				90-180	{ (SE) }
+				180	{ (NW) }
+				180-270	{ (NW) }
+				270	{ (NW) }
+				270-360	{ (NE) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (NW) }
+				0-90	{ (NW) }
+				90	{ (NW) }
+				90-180	{ (NE) }
+				180	{ (SW) }
+				180-270	{ (SW) }
+				270	{ (SW) }
+				270-360	{ (SE) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (W) }
+				0-90	{ (W) }
+				90	{ (W) }
+				90-180	{ (E) }
+				180	{ (W) }
+				180-270	{ (W) }
+				270	{ (W) }
+				270-360	{ (E) }
+			  }
+		}
+	    }
+
+	    import @Geometry
+	    def @PerpendicularLeftProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SE) }
+				0-90	{ (SE) }
+				90	{ (SE) }
+				90-180	{ (SE) }
+				180	{ (NE) }
+				180-270	{ (NE) }
+				270	{ (NE) }
+				270-360	{ (NE) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (NE) }
+				0-90	{ (NE) }
+				90	{ (NE) }
+				90-180	{ (NE) }
+				180	{ (SE) }
+				180-270	{ (SE) }
+				270	{ (SE) }
+				270-360	{ (SE) }
+			  }
+		  else @Yield (E)
+		}
+	    }
+
+	    import @Geometry
+	    def @PerpendicularRightProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SW) }
+				0-90	{ (SW) }
+				90	{ (SW) }
+				90-180	{ (SW) }
+				180	{ (NW) }
+				180-270	{ (NW) }
+				270	{ (NW) }
+				270-360	{ (NW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (NW) }
+				0-90	{ (NW) }
+				90	{ (NW) }
+				90-180	{ (NW) }
+				180	{ (SW) }
+				180-270	{ (SW) }
+				270	{ (SW) }
+				270-360	{ (SW) }
+			  }
+		  else @Yield (W)
+		}
+	    }
+
+	    import @Geometry
+	    def @PerpendicularInsideProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SE) }
+				0-90	{ (SE) }
+				90	{ (SE) }
+				90-180	{ (SE) }
+				180	{ (NW) }
+				180-270	{ (NW) }
+				270	{ (NW) }
+				270-360	{ (NW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (NE) }
+				0-90	{ (NE) }
+				90	{ (NE) }
+				90-180	{ (NE) }
+				180	{ (SW) }
+				180-270	{ (SW) }
+				270	{ (SW) }
+				270-360	{ (SW) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (E) }
+				0-90	{ (E) }
+				90	{ (E) }
+				90-180	{ (E) }
+				180	{ (W) }
+				180-270	{ (W) }
+				270	{ (W) }
+				270-360	{ (W) }
+			  }
+		}
+	    }
+
+	    import @Geometry
+	    def @PerpendicularOutsideProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SW) }
+				0-90	{ (SW) }
+				90	{ (SW) }
+				90-180	{ (SW) }
+				180	{ (NE) }
+				180-270	{ (NE) }
+				270	{ (NE) }
+				270-360	{ (NE) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (NW) }
+				0-90	{ (NW) }
+				90	{ (NW) }
+				90-180	{ (NW) }
+				180	{ (SE) }
+				180-270	{ (SE) }
+				270	{ (SE) }
+				270-360	{ (SE) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (W) }
+				0-90	{ (W) }
+				90	{ (W) }
+				90-180	{ (W) }
+				180	{ (E) }
+				180-270	{ (E) }
+				270	{ (E) }
+				270-360	{ (E) }
+			  }
+		}
+	    }
+
+
+	    import @Geometry
+	    def @OtherAboveProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SW) }
+				0-90	{ (SE) }
+				90	{ (SW) }
+				90-180	{ (SW) }
+				180	{ (SE) }
+				180-270	{ (SE) }
+				270	{ (NW) }
+				270-360	{ (SW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (SE) }
+				0-90	{ (SE) }
+				90	{ (NW) }
+				90-180	{ (SW) }
+				180	{ (SW) }
+				180-270	{ (SE) }
+				270	{ (SW) }
+				270-360	{ (SW) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (S) }
+				0-90	{ (SE) }
+				90	{ (W) }
+				90-180	{ (SW) }
+				180	{ (S) }
+				180-270	{ (SE) }
+				270	{ (W) }
+				270-360	{ (SW) }
+			  }
+		}
+	    }
+
+	    import @Geometry
+	    def @OtherBelowProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (NW) }
+				0-90	{ (NW) }
+				90	{ (SW) }
+				90-180	{ (NE) }
+				180	{ (NE) }
+				180-270	{ (NW) }
+				270	{ (NW) }
+				270-360	{ (NE) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (NE) }
+				0-90	{ (NW) }
+				90	{ (NW) }
+				90-180	{ (NE) }
+				180	{ (NW) }
+				180-270	{ (NW) }
+				270	{ (SW) }
+				270-360	{ (NE) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (N) }
+				0-90	{ (NW) }
+				90	{ (W) }
+				90-180	{ (NE) }
+				180	{ (N) }
+				180-270	{ (NW) }
+				270	{ (W) }
+				270-360	{ (NE) }
+			  }
+		}
+	    }
+
+	    import @Geometry
+	    def @OtherLeftProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SW) }
+				0-90	{ (SE) }
+				90	{ (SE) }
+				90-180	{ (NE) }
+				180	{ (SE) }
+				180-270	{ (SE) }
+				270	{ (NE) }
+				270-360	{ (NE) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (SE) }
+				0-90	{ (SE) }
+				90	{ (NE) }
+				90-180	{ (NE) }
+				180	{ (SW) }
+				180-270	{ (SE) }
+				270	{ (SE) }
+				270-360	{ (NE) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (S) }
+				0-90	{ (SE) }
+				90	{ (E) }
+				90-180	{ (NE) }
+				180	{ (S) }
+				180-270	{ (SE) }
+				270	{ (E) }
+				270-360	{ (NE) }
+			  }
+		}
+	    }
+
+	    import @Geometry
+	    def @OtherRightProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SW) }
+				0-90	{ (NW) }
+				90	{ (SW) }
+				90-180	{ (SW) }
+				180	{ (SE) }
+				180-270	{ (NW) }
+				270	{ (NW) }
+				270-360	{ (SW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (SE) }
+				0-90	{ (NW) }
+				90	{ (NW) }
+				90-180	{ (SW) }
+				180	{ (SW) }
+				180-270	{ (NW) }
+				270	{ (SW) }
+				270-360	{ (SW) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (S) }
+				0-90	{ (NW) }
+				90	{ (W) }
+				90-180	{ (SW) }
+				180	{ (S) }
+				180-270	{ (NW) }
+				270	{ (W) }
+				270-360	{ (SW) }
+			  }
+		}
+	    }
+
+	    import @Geometry
+	    def @OtherInsideProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (SW) }
+				0-90	{ (SE) }
+				90	{ (SE) }
+				90-180	{ (NE) }
+				180	{ (NE) }
+				180-270	{ (NW) }
+				270	{ (NW) }
+				270-360	{ (SW) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (SE) }
+				0-90	{ (SE) }
+				90	{ (NE) }
+				90-180	{ (NE) }
+				180	{ (NW) }
+				180-270	{ (NW) }
+				270	{ (SW) }
+				270-360	{ (SW) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (S) }
+				0-90	{ (SE) }
+				90	{ (E) }
+				90-180	{ (NE) }
+				180	{ (N) }
+				180-270	{ (NW) }
+				270	{ (W) }
+				270-360	{ (SW) }
+			  }
+		}
+	    }
+
+	    import @Geometry
+	    def @OtherOutsideProximity
+	    {
+		which @Case {
+		  { x f } @Yield { labelpos??ANGLE quadcase
+				0	{ (NW) }
+				0-90	{ (NW) }
+				90	{ (SW) }
+				90-180	{ (SW) }
+				180	{ (SE) }
+				180-270	{ (SE) }
+				270	{ (NE) }
+				270-360	{ (NE) }
+			  }
+		  { z t } @Yield { labelpos??ANGLE quadcase
+				0	{ (NE) }
+				0-90	{ (NW) }
+				90	{ (NW) }
+				90-180	{ (SW) }
+				180	{ (SW) }
+				180-270	{ (SE) }
+				270	{ (SE) }
+				270-360	{ (NE) }
+			  }
+		  else @Yield { labelpos??ANGLE quadcase
+				0	{ (N) }
+				0-90	{ (NW) }
+				90	{ (W) }
+				90-180	{ (SW) }
+				180	{ (S) }
+				180-270	{ (SE) }
+				270	{ (E) }
+				270-360	{ (NE) }
+			  }
+		}
+	    }
+
+
+	    import @Geometry
+	    def @AboveProximity
+	    {
+                labelangle @Case {
+                    "aligned"		@Yield @AlignedAboveProximity
+		    "perpendicular"	@Yield @PerpendicularAboveProximity
+                    else		@Yield @OtherAboveProximity
+                }
+	    }
+
+	    import @Geometry
+	    def @BelowProximity
+	    {
+                labelangle @Case {
+                    "aligned"		@Yield @AlignedBelowProximity
+		    "perpendicular"	@Yield @PerpendicularBelowProximity
+                    else		@Yield @OtherBelowProximity
+                }
+	    }
+
+	    import @Geometry
+	    def @LeftProximity
+	    {
+                labelangle @Case {
+                    "aligned"		@Yield @AlignedLeftProximity
+		    "perpendicular"	@Yield @PerpendicularLeftProximity
+                    else		@Yield @OtherLeftProximity
+                }
+	    }
+
+	    import @Geometry
+	    def @RightProximity
+	    {
+                labelangle @Case {
+                    "aligned"		@Yield @AlignedRightProximity
+		    "perpendicular"	@Yield @PerpendicularRightProximity
+                    else		@Yield @OtherRightProximity
+                }
+	    }
+
+	    import @Geometry
+	    def @InsideProximity
+	    {
+                labelangle @Case {
+                    "aligned"		@Yield @AlignedInsideProximity
+		    "perpendicular"	@Yield @PerpendicularInsideProximity
+                    else		@Yield @OtherInsideProximity
+                }
+	    }
+
+	    import @Geometry
+	    def @OutsideProximity
+	    {
+                labelangle @Case {
+                    "aligned"		@Yield @AlignedOutsideProximity
+		    "perpendicular"	@Yield @PerpendicularOutsideProximity
+                    else		@Yield @OtherOutsideProximity
+                }
+	    }
+
+	    import @Geometry
+            def proximity
+            {
+                labelprox @Case {
+                    above   @Yield @AboveProximity
+                    below   @Yield @BelowProximity
+                    left    @Yield @LeftProximity
+                    right   @Yield @RightProximity
+                    inside  @Yield @InsideProximity
+                    outside @Yield @OutsideProximity
+		    else    @Yield { "("labelprox")" }
+                }
+            }
+
+	    import @Geometry
+	    def dorotate
+		left point
+		right angle
+	    {
+		{ {0 0} distance point } atangle { {0 0} angleto point + angle }
+	    }
+
+	    import @Geometry
+	    def translation
+	    {
+		labelctr @Case {
+		    { no No } @Yield {
+			labelpos -- labeltag?!?proximity
+		    }
+		    { yes Yes } @Yield {
+			#P0	:= labelpos
+			#P1	:= labeltag?!?proximity -- P0
+			#P2	:= labeltag??CTR -- P0
+			#TH	:= labelpos??ANGLE
+			#P1A	:= P1 dorotate { 0 - TH }
+			#P2A	:= P2 dorotate { 0 - TH }
+			#PRA	:= { 0 - xcoord P2A 0 - ycoord P1A }
+			#PRA dorotate TH ++ P0
+			XP1	:= labeltag?!?proximity
+			XP2	:= labeltag??CTR
+			XANG	:= labelpos??ANGLE
+			XTH	:= XANG - 90d - { XP1 angleto XP2 }
+			XDIST	:= { XP1 distance XP2 } * sin XTH
+			labelpos -- XP1 ++ XDIST atangle XANG
+		    }
+		}
+	    }
+
+	    @CatchTags @ZeroSize @Transform
+		translate { translation ++ labeladjust }
+		rotate { finalangle }
+		scale { 1 1 }
+	    labeltag:: @BoxLabels @CatchTags @AddMargins
+		mtop { labelmargin }
+		mfoot { labelmargin }
+		mleft { labelmargin }
+		mright { labelmargin }
+	    labelfont @Font labelbreak @Break labelformat label
+	}
+
+
+        def @Node
+            import @Geometry named translate
+#               named to precedence 10 left x right y { x y "ldiagpsub" }
+                named to precedence 10 left x right y {
+                  @BackEnd @Case {
+                    PostScript @Yield { x y "ldiagpsub" }
+                    PDF @Yield {""}
+                  }
+                }
+            {}
+            import @Geometry named rotate	{ 0d			}
+	    import @Geometry named outline
+		named margin {}
+		named shadow {}
+		named sides {}
+		named angle {}
+						{ outline
+						    margin { margin }
+						    shadow { shadow }
+						    sides  { sides  }
+						    angle  { angle  }
+						}
+	    named margin               		{ margin        	}
+	    import @Geometry named shadow	{ shadow		}
+	    import @Geometry named sides	{ sides			}
+	    import @Geometry named angle	{ angle			}
+	    named nodetag			{ nodetag		}
+            named outlinestyle
+		named solid   { "/ldiagsolid"   }
+		named dashed  { "/ldiagdashed"  }
+		named cdashed { "/ldiagcdashed" }
+		named dotted  { "/ldiagdotted"  }
+		named noline  { "/ldiagnoline"  }
+						{ outlinestyle     	}
+            import @Geometry named outlinedashlength { outlinedashlength}
+            import @Geometry named outlinewidth
+		named thin   { 0.04 ft }
+		named medium { 0.08 ft }
+		named thick  { 0.12 ft }
+						{ outlinewidth     	}
+            named paint				{ paint         	}
+	    named font				{ font			}
+	    named break				{ break			}
+            named format right @Body		{ format @Body  	}
+            named valign			{ valign        	}
+            named vsize				{ vsize         	}
+            named vindent			{ vindent       	}
+	    named vstrut
+		named no  { 0.0f }
+		named yes { 1.0f }
+						{ vstrut	 	}
+            named vmargin			{ vmargin       	}
+            named topmargin			{ topmargin     	}
+            named footmargin			{ footmargin    	}
+
+            named halign			{ halign        	}
+            named hsize				{ hsize         	}
+            named hindent			{ hindent       	}
+	    named hstrut
+		named no  { 0.0f }
+		named yes { 1.0f }
+						{ hstrut	 	}
+            named hmargin			{ hmargin       	}
+            named leftmargin			{ leftmargin    	}
+            named rightmargin			{ rightmargin   	}
+
+	    named nodelabel			{ nodelabel		}
+	    named nodelabelmargin		{ nodelabelmargin	}
+	    named nodelabelfont			{ nodelabelfont		}
+	    named nodelabelbreak		{ nodelabelbreak	}
+	    named nodelabelformat right @Body	{ nodelabelformat @Body	}
+	    import @Geometry named nodelabelpos	{ nodelabelpos		}
+	    named nodelabelprox			{ nodelabelprox		}
+	    import @Geometry named nodelabelangle  { nodelabelangle	}
+	    named nodelabelctr			{ nodelabelctr		}
+	    import @Geometry named nodelabeladjust { nodelabeladjust	}
+
+            named alabel			{ alabel		}
+            named alabelmargin			{ alabelmargin		}
+            named alabelfont			{ alabelfont		}
+            named alabelbreak			{ alabelbreak		}
+	    named alabelformat right @Body	{ alabelformat @Body	}
+            import @Geometry named alabelpos	{ alabelpos		}
+            named alabelprox			{ alabelprox		}
+            import @Geometry named alabelangle	{ alabelangle		}
+	    named alabelctr			{ alabelctr		}
+            import @Geometry named alabeladjust	{ alabeladjust		}
+
+            named blabel			{ blabel		}
+            named blabelmargin			{ blabelmargin		}
+            named blabelfont			{ blabelfont		}
+            named blabelbreak			{ blabelbreak		}
+	    named blabelformat right @Body	{ blabelformat @Body	}
+            import @Geometry named blabelpos	{ blabelpos		}
+            named blabelprox			{ blabelprox		}
+            import @Geometry named blabelangle	{ blabelangle		}
+	    named blabelctr			{ blabelctr		}
+            import @Geometry named blabeladjust	{ blabeladjust		}
+
+            named clabel			{ clabel		}
+            named clabelmargin			{ clabelmargin		}
+            named clabelfont			{ clabelfont		}
+            named clabelbreak			{ clabelbreak		}
+	    named clabelformat right @Body	{ clabelformat @Body	}
+            import @Geometry named clabelpos	{ clabelpos		}
+            named clabelprox			{ clabelprox		}
+            import @Geometry named clabelangle	{ clabelangle		}
+	    named clabelctr			{ clabelctr		}
+            import @Geometry named clabeladjust	{ clabeladjust		}
+
+            named dlabel			{ dlabel		}
+            named dlabelmargin			{ dlabelmargin		}
+            named dlabelfont			{ dlabelfont		}
+            named dlabelbreak			{ dlabelbreak		}
+	    named dlabelformat right @Body	{ dlabelformat @Body	}
+            import @Geometry named dlabelpos	{ dlabelpos		}
+            named dlabelprox			{ dlabelprox		}
+            import @Geometry named dlabelangle	{ dlabelangle		}
+	    named dlabelctr			{ dlabelctr		}
+            import @Geometry named dlabeladjust	{ dlabeladjust		}
+
+            right @Body
+        {
+
+            def @LabelPos
+		left x
+		right y
+            {
+		nodelabelpos @Case {
+		    x    @Yield y
+		    else @Yield ""
+		}
+            }
+
+            def @If
+		left cond
+		right x
+            {
+		cond @Case {
+		    { yes Yes } @Yield x
+		    else        @Yield ""
+		}
+            }
+
+
+            def @Strut right x
+            {
+		def vs { 0.5w @VShift { vstrut @High } }
+		def hs {                hstrut @Wide   }
+
+		@HContract @VContract {
+		    @HContract @VContract x | vs / hs |
+		}
+            }
+
+	    def @Indent right x
+	    {
+		x @Case {
+		    { top left   } @Yield 0.0rt
+		    { ctr        } @Yield 0.5rt
+		    { foot right } @Yield 1.0rt
+		    { mctr	     } @Yield 0.5bx
+		    else           @Yield x
+		}
+	    }
+
+            def @VSize right x
+            {
+		vsize @Case {
+		    ""   @Yield x
+		    else @Yield { vsize @High { /{@Indent vindent} x / } }
+		}
+            }
+
+            def @HSize right x
+            {
+		hsize @Case {
+		    ""   @Yield x
+		    else @Yield { hsize @Wide { |{@Indent hindent} x | } }
+		}
+            }
+
+	    def @Align right x
+	    {
+		x @Case {
+		    { top left   } @Yield 0.0w
+		    { ctr        } @Yield 0.5w
+		    { foot right } @Yield 1.0w
+		    { mark       } @Yield "+0i"
+		    else           @Yield x
+		}
+	    }
+
+	    def @ALabel
+	    {
+		@DoLabel
+		    which	{ "a"						}
+		    label	{ alabel	     @Else nodelabel		}
+		    labelmargin	{ alabelmargin	     @Else nodelabelmargin	}
+		    labelfont	{ alabelfont	     @Else nodelabelfont	}
+		    labelbreak	{ alabelbreak	     @Else nodelabelbreak	}
+		    labelformat { alabelformat @Body @Else nodelabelformat @Body}
+		    labelpos	{ alabelpos	     @Else nodelabelpos		}
+		    labelprox	{ alabelprox	     @Else nodelabelprox	}
+		    labelangle	{ alabelangle	     @Else nodelabelangle	}
+		    labelctr	{ alabelctr	     @Else nodelabelctr		}
+		    labeladjust	{ alabeladjust	     @Else nodelabeladjust	}
+	    }
+
+	    def @BLabel
+	    {
+		@DoLabel
+		    which	{ "b"						}
+		    label	{ blabel	     @Else nodelabel		}
+		    labelmargin	{ blabelmargin	     @Else nodelabelmargin	}
+		    labelfont	{ blabelfont	     @Else nodelabelfont	}
+		    labelbreak	{ blabelbreak	     @Else nodelabelbreak	}
+		    labelformat { blabelformat @Body @Else nodelabelformat @Body}
+		    labelpos	{ blabelpos	     @Else nodelabelpos		}
+		    labelprox	{ blabelprox	     @Else nodelabelprox	}
+		    labelangle	{ blabelangle	     @Else nodelabelangle	}
+		    labelctr	{ blabelctr	     @Else nodelabelctr		}
+		    labeladjust	{ blabeladjust	     @Else nodelabeladjust	}
+	    }
+
+	    def @CLabel
+	    {
+		@DoLabel
+		    which	{ "c"						}
+		    label	{ clabel	     @Else nodelabel		}
+		    labelmargin	{ clabelmargin	     @Else nodelabelmargin	}
+		    labelfont	{ clabelfont	     @Else nodelabelfont	}
+		    labelbreak	{ clabelbreak	     @Else nodelabelbreak	}
+		    labelformat { clabelformat @Body @Else nodelabelformat @Body}
+		    labelpos	{ clabelpos	     @Else nodelabelpos		}
+		    labelprox	{ clabelprox	     @Else nodelabelprox	}
+		    labelangle	{ clabelangle	     @Else nodelabelangle	}
+		    labelctr	{ clabelctr	     @Else nodelabelctr		}
+		    labeladjust	{ clabeladjust	     @Else nodelabeladjust	}
+	    }
+
+	    def @DLabel
+	    {
+		@DoLabel
+		    which	{ "d"						}
+		    label	{ dlabel	     @Else nodelabel		}
+		    labelmargin	{ dlabelmargin	     @Else nodelabelmargin	}
+		    labelfont	{ dlabelfont	     @Else nodelabelfont	}
+		    labelbreak	{ dlabelbreak	     @Else nodelabelbreak	}
+		    labelformat { dlabelformat @Body @Else nodelabelformat @Body}
+		    labelpos	{ dlabelpos	     @Else nodelabelpos		}
+		    labelprox	{ dlabelprox	     @Else nodelabelprox	}
+		    labelangle	{ dlabelangle	     @Else nodelabelangle	}
+		    labelctr	{ dlabelctr	     @Else nodelabelctr		}
+		    labeladjust	{ dlabeladjust	     @Else nodelabeladjust	}
+	    }
+
+	    import @Geometry
+	    def @OutLine
+	    {
+	      @BackEnd @Case {
+	        PostScript @Yield {
+		outline @Case {
+		    box		@Yield { "ldiagbox"			}
+		    curvebox	@Yield { "("margin") ldiagcurvebox"	}
+		    shadowbox	@Yield { shadow "ldiagshadow ldiagbox"	}
+		    square	@Yield { "ldiagsquare"			}
+		    diamond	@Yield { "ldiagdiamond"			}
+		    polygon	@Yield { sides angle "ldiagpolygon"	}
+		    isosceles	@Yield { "ldiagisosceles"		}
+		    ellipse	@Yield { "ldiagellipse"			}
+		    circle	@Yield { "ldiagcircle"			}
+		    else	    @Yield {
+				    outline
+					margin { "("margin") ldiagdecodelength" }
+					shadow { shadow }
+					sides  { sides  }
+					angle  { angle  }
+		    }
+		}
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    def @Value
+            {
+              @BackEnd @Case {
+                PostScript @Yield {
+		@HContract @VContract
+		{
+		    {
+			"ldiagnodebegin [" @OutLine "]"
+			outlinedashlength "[" outlinestyle "]"
+			outlinewidth "/ldiag"paint "ldiagnodeend"
+			"(IN) ldiagpushtagdict"
+			//
+			"ldiagpopuptagdict"
+		    }
+		    @Graphic
+		    {
+			{@Align valign} @VShift {@Align halign} @HShift
+			@AddMargins
+			    mtop   { topmargin   @Else vmargin @Else margin }
+			    mfoot  { footmargin  @Else vmargin @Else margin }
+			    mleft  { leftmargin  @Else hmargin @Else margin }
+			    mright { rightmargin @Else hmargin @Else margin }
+			    @HSize @VSize @HContract @VContract
+			    font @Font break @Break format @Strut @Body
+		    }
+		    / {alabel @Else nodelabel} @IfNonEmpty @ALabel
+		    / {blabel @Else nodelabel} @IfNonEmpty @BLabel
+		    / {clabel @Else nodelabel} @IfNonEmpty @CLabel
+		    / {dlabel @Else nodelabel} @IfNonEmpty @DLabel
+		}
+                }
+                PDF @Yield {}
+              }
+            }
+
+	    def @TValue
+	    {
+		nodetag @Case {
+		    ""   @Yield @Value
+		    else @Yield { nodetag:: @Value }
+		}
+	    }
+
+            translate @Case {
+                  "" @Yield @TValue
+                  else @Yield {
+		    @Null & # so that preceding space gets chewed up
+                    @Transform translate { translate } rotate { rotate } @TValue
+                  }
+            }
+        }
+
+	macro @@Node	 { @Node			  }
+        macro @Box	 { @Node outline { box		} }
+        macro @CurveBox	 { @Node outline { curvebox	} }
+	macro @ShadowBox { @Node outline { shadowbox	} }
+        macro @Square	 { @Node outline { square	} }
+        macro @Diamond	 { @Node outline { diamond	} }
+        macro @Polygon	 { @Node outline { polygon	} }
+        macro @Isosceles { @Node outline { isosceles	} }
+        macro @Ellipse	 { @Node outline { ellipse	} }
+        macro @Circle	 { @Node outline { circle	} }
+
+
+	macro @InsulatedNode {
+	    @Node
+		topmargin { 0i }
+		footmargin { 0i }
+		leftmargin { 0i }
+		rightmargin { 0i }
+		alabel {}
+		blabel {}
+		clabel {}
+		dlabel {}
+		hsize {}
+		vsize {}
+		vstrut { no }
+		hstrut { no }
+	}
+
+	def @SolidArrowHead
+	    named width { arrowwidth }
+	    named length { arrowlength }
+	    named pathwidth { pathwidth }
+	{
+	    @InsulatedNode
+		paint { nochange }
+		outlinestyle { noline }
+		outlinewidth { pathwidth }
+		outline {
+		  @BackEnd @Case {
+		    PostScript @Yield {
+		    "ldiagsolidarrowhead"
+		    # 0 0 xsize ysize * 0.5 0 ysize
+		    }
+		    PDF @Yield {}
+		  }
+		}
+	    {
+		length @Wide width @High
+	    }
+	}
+
+	def @OpenArrowHead
+	    named width { arrowwidth }
+	    named length { arrowlength }
+	    named pathwidth { pathwidth }
+	{
+	    @InsulatedNode
+		outlinewidth { pathwidth }
+		outlinestyle { noline }
+		paint { nochange }
+		outline {
+		  @BackEnd @Case {
+		    PostScript @Yield {
+		    pathwidth "ldiagopenarrowhead"
+
+		    # PSW := { 0 0 }
+		    # PNW := { 0 ysize }
+		    # PE  := { xsize ysize*0.5 }
+		    # REL := pathwidth atangle { PE angleto PNW + 90d }
+		    # PNA := { 0 ysize*0.5 + pathwidth*0.5 }
+		    # PSA := { 0 ysize*0.5 - pathwidth*0.5 }
+		    # PNI := {
+		    #   PNA PNA ++ { xsize 0 }
+		    #   PNW ++ REL PE ++ REL ldiaglineintersect
+		    # }
+		    # PSI := PNI -- { 0 pathwidth }
+		    #
+		    # PSW PE PNW PNI PNA PSA PSI PSW
+		    }
+		    PDF @Yield {}
+		  }
+		}
+	    {
+		length @Wide width @High
+	    }
+	}
+
+	def @HalfOpenArrowHead
+	    named width { arrowwidth }
+	    named length { arrowlength }
+	    named pathwidth { pathwidth }
+	{
+	    @InsulatedNode
+		paint { nochange }
+		outlinestyle { noline }
+		outlinewidth { pathwidth }
+		outline {
+		  @BackEnd @Case {
+		    PostScript @Yield {
+		    pathwidth "ldiaghalfopenarrowhead"
+
+		    # 0 0
+		    # xsize ysize * 0.5
+		    # 0 ysize
+		    # xsize*0.3 ysize*0.5 + pathwidth*0.5
+		    # 0         ysize*0.5 + pathwidth*0.5
+		    # 0         ysize*0.5 - pathwidth*0.5
+		    # xsize*0.3 ysize*0.5 - pathwidth*0.5
+		    # 0 0
+		    }
+		    PDF @Yield {}
+		  }
+		}
+	    {
+		length @Wide width @High
+	    }
+	}
+
+	def @SolidCurvedArrowHead
+	    named width { arrowwidth }
+	    named length { arrowlength }
+	    named pathwidth { pathwidth }
+	{
+	    @InsulatedNode
+		outlinestyle { noline }
+		paint { nochange }
+		outlinewidth { pathwidth }
+		outline {
+		  @BackEnd @Case {
+		    PostScript @Yield {
+		    "ldiagsolidcurvedarrowhead"
+		    # 0 0
+		    # [0 0 xsize ysize * 0.5 "ldiaglinebetween"
+		    #  xsize 0 xsize ysize "ldiaglineintersect" clockwise]
+		    # xsize ysize * 0.5
+		    # [xsize ysize * 0.5 0 ysize "ldiaglinebetween"
+		    #  xsize 0 xsize ysize "ldiaglineintersect" clockwise]
+		    # 0 ysize
+		    }
+		    PDF @Yield {}
+		  }
+		}
+	    {
+		length @Wide width @High
+	    }
+	}
+
+	def @OpenCurvedArrowHead
+	    named width { arrowwidth }
+	    named length { arrowlength }
+	    named pathwidth { pathwidth }
+	{
+	    @InsulatedNode
+		outlinestyle { noline }
+		paint { nochange }
+		outlinewidth { pathwidth }
+		outline {
+		  @BackEnd @Case {
+		    PostScript @Yield {
+		    pathwidth "ldiagopencurvedarrowhead"
+		    # LR:= { 0 0 xsize ysize * 0.5 "ldiaglinebetween"
+		    #    xsize 0 xsize ysize "ldiaglineintersect" }
+		    # UR:= { xsize ysize * 0.5 0 ysize "ldiaglinebetween"
+		    #      xsize 0 xsize ysize "ldiaglineintersect" }
+		    # PW2  := pathwidth * 0.5
+		    # UMID := {
+		    # 0 ysize * 0.5 + PW2  xsize ysize * 0.5 + PW2
+		    # {0 ysize} ++ 1f atangle { UR angleto {0 ysize} + 90d }
+		    # { 0 ysize } ldiaglineintersect
+		    # }
+		    # LMID := UMID -- { 0 pathwidth }
+		    # 0 0
+		    # [LR clockwise]
+		    # xsize ysize * 0.5
+		    # [UR clockwise]
+		    # 0 ysize
+		    # UMID
+		    # 0 ysize * 0.5 + PW2
+		    # 0 ysize * 0.5 - PW2
+		    # LMID
+		    # 0 0
+		    }
+		    PDF @Yield {}
+		  }
+		}
+	    {
+		length @Wide width @High
+	    }
+	}
+
+	def @HalfOpenCurvedArrowHead
+	    named width { arrowwidth }
+	    named length { arrowlength }
+	    named pathwidth { pathwidth }
+	{
+	    @InsulatedNode
+		outlinestyle { noline }
+		paint { nochange }
+		outlinewidth { pathwidth }
+		outline {
+		  @BackEnd @Case {
+		    PostScript @Yield {
+		    pathwidth "ldiaghalfopencurvedarrowhead"
+		    # LR:= { 0 0 xsize ysize * 0.5 "ldiaglinebetween"
+		    #      xsize 0 xsize ysize "ldiaglineintersect" }
+		    # UR:= { xsize ysize * 0.5 0 ysize "ldiaglinebetween"
+		    #      xsize 0 xsize ysize "ldiaglineintersect" }
+		    # BR:= { 0 0 LR 0 ysize UR "ldiaglineintersect" }
+		    # BRAD := { 0 0 } distance BR
+		    # PW2  := pathwidth * 0.5
+		    # XDIST := sqrt { BRAD*BRAD - PW2*PW2 }
+		    # UMID := BR ++ { XDIST PW2 }
+		    # LMID := BR ++ { XDIST 0 - PW2 }
+		    # 0 0
+		    # [LR clockwise]
+		    # xsize ysize * 0.5
+		    # [UR clockwise]
+		    # 0 ysize
+		    # [BR clockwise ]
+		    # UMID
+		    # 0 ysize * 0.5 + PW2
+		    # 0 ysize * 0.5 - PW2
+		    # LMID
+		    # [BR clockwise ]
+		    # 0 0
+		    }
+		    PDF @Yield {}
+		  }
+		}
+	    {
+		length @Wide width @High
+	    }
+	}
+
+	def @CircleArrowHead
+	    named width { arrowwidth }
+	    named length { arrowlength }
+	    named pathwidth { pathwidth }
+	{
+	    @InsulatedNode
+		outlinestyle { noline }
+		paint { nochange }
+		outlinewidth { pathwidth }
+		outline { circle }
+	    { length @Wide length @High }
+	}
+
+	def @BoxArrowHead
+	    named width { arrowwidth }
+	    named length { arrowlength }
+	    named pathwidth { pathwidth }
+	{
+	    @InsulatedNode
+		outlinestyle { noline }
+		paint { nochange }
+		outlinewidth { pathwidth }
+		outline { box }
+	    { length @Wide width @High }
+	}
+
+	def @ArrowHead
+	    named style { arrowstyle }
+	    named width { arrowwidth }
+	    named length { arrowlength }
+	    named pathwidth { pathwidth }
+	{
+	    style @Case {
+		solid          @Yield @SolidArrowHead
+				  width { width } length { length }
+				  pathwidth { pathwidth }
+		halfopen       @Yield @HalfOpenArrowHead
+				  width { width } length { length }
+				  pathwidth { pathwidth }
+		open           @Yield @OpenArrowHead
+				  width { width } length { length }
+				  pathwidth { pathwidth }
+		curvedsolid    @Yield @SolidCurvedArrowHead
+				  width { width } length { length }
+				  pathwidth { pathwidth }
+		curvedhalfopen @Yield @HalfOpenCurvedArrowHead
+				  width { width } length { length }
+				  pathwidth { pathwidth }
+		curvedopen     @Yield @OpenCurvedArrowHead
+				  width { width } length { length }
+				  pathwidth { pathwidth }
+		circle         @Yield @CircleArrowHead
+				  width { width } length { length }
+				  pathwidth { pathwidth }
+		box            @Yield @BoxArrowHead
+				  width { width } length { length }
+				  pathwidth { pathwidth }
+	    }
+	}
+
+        def @Link
+            import @Geometry named path
+                named from {}
+                named to {}
+                named bias {}
+                named fbias {}
+                named tbias {}
+                named radius {}
+                named xindent {}
+                named zindent {}
+                named frompt {}
+                named topt {}
+                named arrow {}
+                named arrowlength {}
+            					{ path
+						    from { from }
+						    to { to }
+						    bias { bias }
+						    fbias { fbias }
+						    tbias { tbias }
+						    radius { radius }
+						    xindent { xindent }
+						    zindent { zindent }
+						    frompt { frompt }
+						    topt { topt }
+						    arrow { arrow }
+						    arrowlength { arrowlength }
+						}
+            import @Geometry named from		{ from			}
+            import @Geometry named to		{ to			}
+            import @Geometry named bias		{ bias			}
+            import @Geometry named fbias	{ fbias			}
+            import @Geometry named tbias	{ tbias			}
+            import @Geometry named radius	{ radius		}
+            import @Geometry named xindent	{ xindent		}
+            import @Geometry named zindent	{ zindent		}
+            import @Geometry named frompt	{ frompt		}
+            import @Geometry named topt		{ topt		}
+            named pathstyle
+		named solid   { "/ldiagsolid"   }
+		named dashed  { "/ldiagdashed"  }
+		named cdashed { "/ldiagcdashed" }
+		named dotted  { "/ldiagdotted"  }
+		named noline  { "/ldiagnoline"  }
+						{ pathstyle		}
+            import @Geometry named pathdashlength { pathdashlength	}
+            import @Geometry named pathwidth
+		named thin   { 0.04 ft }
+		named medium { 0.08 ft }
+		named thick  { 0.12 ft }
+						{ pathwidth		}
+            import @Geometry named pathgap
+		named thin   { 0.08 ft }
+		named medium { 0.16 ft }
+		named thick  { 0.24 ft }
+						{ pathgap		}
+
+            named arrow				{ arrow			}
+            named arrowstyle			{ arrowstyle		}
+            named arrowwidth			{ arrowwidth		}
+            named arrowlength			{ arrowlength		}
+
+	    named linklabel			{ linklabel		}
+	    named linklabelmargin		{ linklabelmargin	}
+	    named linklabelfont			{ linklabelfont		}
+	    named linklabelbreak		{ linklabelbreak	}
+	    named linklabelformat right @Body	{ linklabelformat @Body	}
+	    import @Geometry named linklabelpos	{ linklabelpos		}
+	    named linklabelprox			{ linklabelprox		}
+	    import @Geometry named linklabelangle  { linklabelangle	}
+	    named linklabelctr			{ linklabelctr		}
+	    import @Geometry named linklabeladjust { linklabeladjust	}
+
+            named xlabel			{ xlabel		}
+            named xlabelmargin	        	{ xlabelmargin		}
+            named xlabelfont			{ xlabelfont		}
+            named xlabelbreak			{ xlabelbreak		}
+	    named xlabelformat right @Body	{ xlabelformat @Body	}
+            import @Geometry named xlabelpos	{ xlabelpos		}
+            named xlabelprox			{ xlabelprox		}
+            import @Geometry named xlabelangle	{ xlabelangle		}
+	    named xlabelctr			{ xlabelctr		}
+            import @Geometry named xlabeladjust	{ xlabeladjust		}
+
+            named ylabel			{ ylabel		}
+            named ylabelmargin			{ ylabelmargin		}
+            named ylabelfont			{ ylabelfont		}
+            named ylabelbreak			{ ylabelbreak		}
+	    named ylabelformat right @Body	{ ylabelformat @Body	}
+            import @Geometry named ylabelpos	{ ylabelpos		}
+            named ylabelprox			{ ylabelprox		}
+            import @Geometry named ylabelangle	{ ylabelangle		}
+	    named ylabelctr			{ ylabelctr		}
+            import @Geometry named ylabeladjust	{ ylabeladjust		}
+
+            named zlabel			{ zlabel		}
+            named zlabelmargin			{ zlabelmargin		}
+            named zlabelfont			{ zlabelfont		}
+            named zlabelbreak			{ zlabelbreak		}
+	    named zlabelformat right @Body	{ zlabelformat @Body	}
+            import @Geometry named zlabelpos	{ zlabelpos		}
+            named zlabelprox			{ zlabelprox		}
+            import @Geometry named zlabelangle	{ zlabelangle		}
+	    named zlabelctr			{ zlabelctr		}
+            import @Geometry named zlabeladjust	{ zlabeladjust		}
+
+            named fromlabel			{ fromlabel		}
+            named fromlabelmargin		{ fromlabelmargin	}
+            named fromlabelfont			{ fromlabelfont		}
+            named fromlabelbreak		{ fromlabelbreak	}
+	    named fromlabelformat right @Body	{ fromlabelformat @Body	}
+            import @Geometry named fromlabelpos	{ fromlabelpos		}
+            named fromlabelprox			{ fromlabelprox		}
+            import @Geometry named fromlabelangle  { fromlabelangle	}
+	    named fromlabelctr			{ fromlabelctr		}
+            import @Geometry named fromlabeladjust { fromlabeladjust	}
+
+            named tolabel			{ tolabel		}
+            named tolabelmargin			{ tolabelmargin		}
+            named tolabelfont			{ tolabelfont		}
+            named tolabelbreak			{ tolabelbreak		}
+	    named tolabelformat right @Body	{ tolabelformat @Body	}
+            import @Geometry named tolabelpos	{ tolabelpos		}
+            named tolabelprox			{ tolabelprox		}
+            import @Geometry named tolabelangle	{ tolabelangle		}
+	    named tolabelctr			{ tolabelctr		}
+            import @Geometry named tolabeladjust{ tolabeladjust		}
+
+        {
+	    def @XLabel
+	    {
+		@DoLabel
+		    which	{ "x"						}
+		    label	{ xlabel	     @Else linklabel		}
+		    labelmargin	{ xlabelmargin	     @Else linklabelmargin	}
+		    labelfont	{ xlabelfont	     @Else linklabelfont	}
+		    labelbreak	{ xlabelbreak	     @Else linklabelbreak	}
+		    labelformat { xlabelformat @Body @Else linklabelformat @Body}
+		    labelpos	{ xlabelpos	     @Else linklabelpos		}
+		    labelprox	{ xlabelprox	     @Else linklabelprox	}
+		    labelangle	{ xlabelangle	     @Else linklabelangle	}
+		    labelctr	{ xlabelctr	     @Else linklabelctr		}
+		    labeladjust	{ xlabeladjust	     @Else linklabeladjust	}
+	    }
+
+	    def @YLabel
+	    {
+		@DoLabel
+		    which	{ "y"						}
+		    label	{ ylabel	     @Else linklabel		}
+		    labelmargin	{ ylabelmargin	     @Else linklabelmargin	}
+		    labelfont	{ ylabelfont	     @Else linklabelfont	}
+		    labelbreak	{ ylabelbreak	     @Else linklabelbreak	}
+		    labelformat { ylabelformat @Body @Else linklabelformat @Body}
+		    labelpos	{ ylabelpos	     @Else linklabelpos		}
+		    labelprox	{ ylabelprox	     @Else linklabelprox	}
+		    labelangle	{ ylabelangle	     @Else linklabelangle	}
+		    labelctr	{ ylabelctr	     @Else linklabelctr		}
+		    labeladjust	{ ylabeladjust	     @Else linklabeladjust	}
+	    }
+
+	    def @ZLabel
+	    {
+		@DoLabel
+		    which	{ "z"						}
+		    label	{ zlabel	     @Else linklabel		}
+		    labelmargin	{ zlabelmargin	     @Else linklabelmargin	}
+		    labelfont	{ zlabelfont	     @Else linklabelfont	}
+		    labelbreak	{ zlabelbreak	     @Else linklabelbreak	}
+		    labelformat { zlabelformat @Body @Else linklabelformat @Body}
+		    labelpos	{ zlabelpos	     @Else linklabelpos		}
+		    labelprox	{ zlabelprox	     @Else linklabelprox	}
+		    labelangle	{ zlabelangle	     @Else linklabelangle	}
+		    labelctr	{ zlabelctr	     @Else linklabelctr		}
+		    labeladjust	{ zlabeladjust	     @Else linklabeladjust	}
+	    }
+
+	    def @FromArrow
+	    {
+		arrow @Case {
+		    { back both } @Yield {
+			@ArrowHead
+			    style { arrowstyle }
+			    width { arrowwidth }
+			    length { arrowlength }
+			    pathwidth { pathwidth }
+		    }
+		    else @Yield ""
+		}
+	    }
+
+	    def @ToArrow
+	    {
+		arrow @Case {
+		    { yes forward both } @Yield {
+			@ArrowHead
+			    style { arrowstyle }
+			    width { arrowwidth }
+			    length { arrowlength }
+			    pathwidth { pathwidth }
+		    }
+		    else @Yield ""
+		}
+	    }
+
+	    import @Geometry
+	    def @LinePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	       {arrow @FromArrowLength arrowlength}
+	       {arrow @ToArrowLength arrowlength}
+	       "{" from "}" "{" to "}"
+	       xindent zindent "ldiaglinepath"
+               # FROM	:< {from??CTR angleto to??CTR}
+               # FROM	:: from boundaryatangle FROM@ANGLE
+               # 	++ {arrow @FromArrowLength arrowlength}atangle FROM@ANGLE
+               # TO  	:< FROM@ANGLE
+               # TO  	:: to boundaryatangle { TO@ANGLE - 180d }
+               # ++ {arrow @ToArrowLength arrowlength} atangle {TO@ANGLE - 180d}
+               # 		
+               # LMID	:: FROM ** 0.5 ++ TO ** 0.5
+               # LMID	:< FROM@ANGLE
+               # XINDENT	:= xindent min { FROM distance LMID }
+               # LFROM	:: FROM ++ XINDENT atangle FROM@ANGLE
+               # LFROM	:< FROM@ANGLE
+               # ZINDENT	:= zindent min { TO distance LMID }
+               # LTO 	:: TO -- ZINDENT atangle FROM@ANGLE
+               # LTO 	:< FROM@ANGLE
+	       #
+               # if cond { direct }
+               # then { FROM TO }
+               # else { FROM LFROM LMID LTO TO }
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @DoubleLinePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	       {arrow @FromArrowLength arrowlength}
+	       {arrow @ToArrowLength arrowlength}
+	       "{" from "}" "{" to "}"
+	       xindent zindent pathgap "ldiagdoublelinepath"
+               # FROM	:< {from??CTR angleto to??CTR}
+               # FROM	:: from boundaryatangle FROM@ANGLE
+               # 	++ {arrow @FromArrowLength arrowlength}atangle FROM@ANGLE
+               # TO  	:< FROM@ANGLE
+               # TO  	:: to boundaryatangle { TO@ANGLE - 180d }
+               # ++ {arrow @ToArrowLength arrowlength} atangle {TO@ANGLE - 180d}
+               # 		
+               # LMID	:: FROM ** 0.5 ++ TO ** 0.5
+               # LMID	:< FROM@ANGLE
+               # XINDENT	:= xindent min { FROM distance LMID }
+               # LFROM	:: FROM ++ XINDENT atangle FROM@ANGLE
+               # LFROM	:< FROM@ANGLE
+               # ZINDENT	:= zindent min { TO distance LMID }
+               # LTO 	:: TO -- ZINDENT atangle FROM@ANGLE
+               # LTO 	:< FROM@ANGLE
+	       #
+               # if cond { direct }
+               # then { FROM TO }
+               # else { FROM LFROM LMID LTO TO }
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @ACurvePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	       {arrow @FromArrowLength arrowlength}
+	       {arrow @ToArrowLength arrowlength}
+	       "{" from "}" "{" to "}"
+	       xindent zindent bias "ldiagacurvepath"
+               #  #B1	:= bias max 0.02f
+               #  #B2	:= { from??CTR distance to??CTR } * 0.5
+               #  #BIAS    := B1 min B2
+	       #  BIAS  := bias max 0.02f
+               #  XMID	:= from??CTR ** 0.5 ++ to??CTR ** 0.5
+               #  XTOP	:= XMID ++ BIAS atangle {from??CTR angleto to??CTR - 90d}
+               #  CTR  	:= { from??CTR XTOP ldiaglinebetween
+               #  	     to??CTR   XTOP ldiaglinebetween ldiaglineintersect }
+               #  FROM	:: aabout
+               #  		circum { from }
+               #  		extra  { arrow @FromArrowLength arrowlength }
+               #  		centre { CTR }
+	       #  FROM 	:< if cond { from??CTR distance FROM > 0 }
+               #  	      then { from??CTR angleto FROM }
+	       #  	      else { CTR angleto FROM + 90d }
+               #  TO	:: cabout
+               #  		circum { to }
+               #  		extra  { arrow @ToArrowLength arrowlength }
+               #  		centre { CTR }
+               #  TO   	:< if cond { TO distance to??CTR > 0 }
+               #  	      then { TO angleto to??CTR }
+               #  	      else { CTR angleto TO + 90d }
+               # 
+               #  RADIUS	:= CTR distance FROM
+               #  LMID 	:: CTR ++ RADIUS atangle {
+               #   CTR angleto FROM +
+	       #   { {360d + {CTR angleto TO} - {CTR angleto FROM}} mod 360 } / 2
+	       #   }
+               #  LMID 	:< CTR angleto LMID  + 90d
+               #
+               #  XINDENT	:= xindent min { FROM distance LMID }
+               #  LFROM	:: CTR ++ RADIUS atangle {
+               #  	   CTR angleto { FROM ++ XINDENT atangle FROM@ANGLE } }
+               #  LFROM	:< CTR angleto LFROM + 90d
+               #  ZINDENT	:= zindent min { TO distance LMID }
+               #  LTO  	:: CTR ++ RADIUS atangle {
+               #  	   CTR angleto { TO ++ ZINDENT atangle {TO@ANGLE+180d}}}
+               #  LTO  	:< CTR angleto LTO   + 90d
+               #
+               #  if cond { direct }
+	       #  then { FROM [CTR] TO }
+               #  else { FROM [CTR] LFROM [CTR] LMID [CTR] LTO [CTR] TO }
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @CCurvePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	       {arrow @FromArrowLength arrowlength}
+	       {arrow @ToArrowLength arrowlength}
+	       "{" from "}" "{" to "}"
+	       xindent zindent bias "ldiagccurvepath"
+              #  #B1     := bias max 0.02f
+              #  #B2     := { from??CTR distance to??CTR } * 0.5
+              #  #BIAS   := B1 min B2
+              #  BIAS   := bias max 0.02f
+              #  XMID   := from??CTR ** 0.5 ++ to??CTR ** 0.5
+              #  XTOP   := XMID ++ BIAS atangle {from??CTR angleto to??CTR + 90d}
+              #  CTR    := { from??CTR XTOP ldiaglinebetween
+              #              to??CTR   XTOP ldiaglinebetween ldiaglineintersect }
+              #  FROM   :: cabout
+              #                  circum { from }
+              #                  extra  { arrow @FromArrowLength arrowlength }
+              #                  centre { CTR }
+              #  FROM   :< if cond { from??CTR distance FROM > 0 }
+              #               then { from??CTR angleto FROM }
+              #               else { CTR angleto FROM - 90d }
+              #  TO     :: aabout
+              #                 circum { to }
+              #                 extra  { arrow @ToArrowLength arrowlength }
+              #                 centre { CTR }
+              #  TO     :< if cond { TO distance to??CTR > 0 }
+              #               then { TO angleto to??CTR }
+              #               else { CTR angleto TO - 90d }
+              #
+              #  RADIUS  := CTR distance FROM
+              #  LMID    :: CTR ++ RADIUS atangle {
+              #   CTR angleto TO +
+              #   { {360d + {CTR angleto FROM} - {CTR angleto TO} } mod 360 } / 2
+              #   }
+              #  LMID    :< CTR angleto LMID  - 90d
+              #
+              #  XINDENT := xindent min { FROM distance LMID }
+              #  LFROM   :: CTR ++ RADIUS atangle {
+              #             CTR angleto { FROM ++ XINDENT atangle FROM@ANGLE } }
+              #  LFROM   :< CTR angleto LFROM - 90d
+              #  ZINDENT := zindent min { TO distance LMID }
+              #  LTO     :: CTR ++ RADIUS atangle {
+              #             CTR angleto { TO ++ ZINDENT atangle {TO@ANGLE+180d}}}
+              #  LTO     :< CTR angleto LTO   - 90d
+              #
+              #  if cond { direct }
+              #  then { FROM [CTR clockwise] TO }
+              #  else { FROM [CTR clockwise] LFROM [CTR clockwise]
+              #         LMID [CTR clockwise] LTO   [CTR clockwise] TO }
+		  }
+		  PDF @Yield {}
+		}
+          }
+
+	    import @Geometry
+	    def @BezierPath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	       {arrow @FromArrowLength arrowlength}
+	       {arrow @ToArrowLength arrowlength}
+	       "{" from "}" "{" to "}"
+	       xindent zindent [ frompt ] [ topt ] "ldiagbezierpath"
+              # FROM      :< from??CTR angleto frompt
+              # FROM      :: from boundaryatangle FROM@ANGLE
+              # ++ {arrow @FromArrowLength arrowlength} atangle FROM@ANGLE
+              # TO        :< topt angleto to??CTR
+              # TO        :: to boundaryatangle { TO@ANGLE + 180d }
+              # ++ {arrow @ToArrowLength arrowlength} atangle { TO@ANGLE + 180d }
+              # LFROM     :: FROM ++ { xindent atangle FROM@ANGLE }
+              # LFROM     :< FROM@ANGLE
+              # LTO       :: TO ++ zindent atangle { TO@ANGLE + 180d }
+              # LTO       :< TO@ANGLE
+              # LMID       :: { FROM ++ TO ++ frompt ++ topt } ** 0.25
+              # FROM [frompt topt] TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @VHLinePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent "ldiagvhlinepath"
+              # CTR     := { {xcoord from??CTR} {ycoord to??CTR} }
+              # FANG    := from??CTR angleto CTR
+              # TANG    := to??CTR angleto CTR
+              # FROM    :: from boundaryatangle FANG
+              # ++ {arrow @FromArrowLength arrowlength} atangle FANG
+              # FROM    :< FANG
+              # TO      :: to boundaryatangle TANG
+              # ++ {arrow @ToArrowLength arrowlength} atangle TANG
+              # TO      :< TANG + 180d
+              # FDIST   := FROM distance CTR
+              # TDIST   := TO distance CTR
+              # XINDENT := xindent min FDIST
+              # ZINDENT := zindent min TDIST
+              # LFROM   :: FROM ++ XINDENT atangle FANG
+              # LFROM   :< FROM@ANGLE
+              # LTO     :: TO ++ ZINDENT atangle TANG
+              # LTO     :< TO@ANGLE
+              # LMID    :: CTR 
+              # LMID    :< {1f atangle {FANG + 180d}} angleto
+              #            {1f atangle {TANG + 180d}}
+              # FROM LFROM LMID LTO TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @VHCurvePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent radius "ldiagvhcurvepath"
+              # CTR     := { {xcoord from??CTR} {ycoord to??CTR} }
+              # FANG    := from??CTR angleto CTR
+              # TANG    := to??CTR angleto CTR
+              # FROM    :: from boundaryatangle FANG
+              # ++ {arrow @FromArrowLength arrowlength} atangle FANG
+              # FROM    :< FANG
+              # TO      :: to boundaryatangle TANG
+              # ++ {arrow @ToArrowLength arrowlength} atangle TANG
+              # TO      :< TANG + 180d
+              # FDIST   := FROM distance CTR
+              # TDIST   := TO distance CTR
+              # RADIUS  := radius min FDIST min TDIST 
+              # XINDENT := xindent min { FDIST - RADIUS }
+              # ZINDENT := zindent min { TDIST - RADIUS }
+              # LFROM   :: FROM ++ XINDENT atangle FANG
+              # LFROM   :< FROM@ANGLE
+              # LTO     :: TO ++ ZINDENT atangle TANG
+              # LTO     :< TO@ANGLE
+              # FCTR    := CTR ++ RADIUS atangle { FROM@ANGLE + 180d }
+              # TCTR    := CTR ++ RADIUS atangle { TO@ANGLE          }
+              # XCTR    := CTR ++ RADIUS atangle { FROM@ANGLE + 180d }
+              #                ++ RADIUS atangle { TO@ANGLE }
+              # LMID    :: XCTR ++ RADIUS atangle { XCTR angleto CTR }
+              # LMID    :< FCTR angleto TCTR
+              # FROM LFROM FCTR
+              #     { FCTR angleto TCTR } quadcase
+              #       0        {   }
+              #       0-90     { [XCTR clockwise] }
+              #       90       {   }
+              #       90-180   { [XCTR] }
+              #       180      {   }
+              #       180-270  { [XCTR clockwise] }
+              #       270      {   }
+              #       270-360  { [XCTR] }
+              # TCTR LTO TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @HVLinePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent "ldiaghvlinepath"
+              # CTR     := { {xcoord to??CTR} {ycoord from??CTR} }
+              # FANG    := from??CTR angleto CTR
+              # TANG    := to??CTR angleto CTR
+              # FROM    :: from boundaryatangle FANG
+              # ++ {arrow @FromArrowLength arrowlength} atangle FANG
+              # FROM    :< FANG
+              # TO      :: to boundaryatangle TANG
+              # ++ {arrow @ToArrowLength arrowlength} atangle TANG
+              # TO      :< TANG + 180d
+              # FDIST   := FROM distance CTR
+              # TDIST   := TO distance CTR
+              # XINDENT := xindent min FDIST
+              # ZINDENT := zindent min TDIST
+              # LFROM   :: FROM ++ XINDENT atangle FANG
+              # LFROM   :< FROM@ANGLE
+              # LTO     :: TO ++ ZINDENT atangle TANG
+              # LTO     :< TO@ANGLE
+              # LMID    :: CTR 
+              # LMID    :< {1f atangle {FANG + 180d}} angleto
+              #            {1f atangle {TANG + 180d}}
+              # FROM LFROM LMID LTO TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @HVCurvePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent radius "ldiaghvcurvepath"
+              # CTR     := { {xcoord to??CTR} {ycoord from??CTR} }
+              # FANG    := from??CTR angleto CTR
+              # TANG    := to??CTR angleto CTR
+              # FROM    :: from boundaryatangle FANG
+              # ++ {arrow @FromArrowLength arrowlength} atangle FANG
+              # FROM    :< FANG
+              # TO      :: to boundaryatangle TANG
+              # ++ {arrow @ToArrowLength arrowlength} atangle TANG
+              # TO      :< TANG + 180d
+              # FDIST   := FROM distance CTR
+              # TDIST   := TO distance CTR
+              # RADIUS  := radius min FDIST min TDIST 
+              # XINDENT := xindent min { FDIST - RADIUS }
+              # ZINDENT := zindent min { TDIST - RADIUS }
+              # LFROM   :: FROM ++ XINDENT atangle FANG
+              # LFROM   :< FROM@ANGLE
+              # LTO     :: TO ++ ZINDENT atangle TANG
+              # LTO     :< TO@ANGLE
+              # FCTR    := CTR ++ RADIUS atangle { FROM@ANGLE + 180d }
+              # TCTR    := CTR ++ RADIUS atangle { TO@ANGLE          }
+              # XCTR    := CTR ++ RADIUS atangle { FROM@ANGLE + 180d }
+              #                ++ RADIUS atangle { TO@ANGLE }
+              # LMID    :: XCTR ++ RADIUS atangle { XCTR angleto CTR }
+              # LMID    :< FCTR angleto TCTR
+              # FROM LFROM FCTR
+              #     { FCTR angleto TCTR } quadcase
+              #       0        {   }
+              #       0-90     { [XCTR] }
+              #       90       {   }
+              #       90-180   { [XCTR clockwise] }
+              #       180      {   }
+              #       180-270  { [XCTR] }
+              #       270      {   }
+              #       270-360  { [XCTR clockwise] }
+              # TCTR LTO TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @LVRLinePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent bias "ldiaglvrlinepath"
+              # FROM    :: from boundaryatangle 180d
+              # ++ {arrow @FromArrowLength arrowlength} atangle 180d
+              # FROM    :< 180d
+              # TO      :: to boundaryatangle 180d
+              # ++ {arrow @ToArrowLength arrowlength} atangle 180d
+              # TO      :< 0d
+              # XLEFT   := {{xcoord FROM} min {xcoord TO}} - bias
+              # P1      :: { XLEFT ycoord FROM }
+              # P2      :: { XLEFT ycoord TO   }
+              # VERT    := P1 angleto P2
+              # P1      :< P1 angleto {P1++{1f atangle 180d}++{1f atangle VERT}}
+              # P2      :< P2 angleto {P2++{1f atangle 0d}  ++{1f atangle VERT}}
+              # LMID    :: P1 ** 0.5 ++ P2 ** 0.5
+              # LMID    :< VERT
+              # XINDENT := xindent min {FROM distance P1}
+              # ZINDENT := zindent min {P2   distance TO}
+              # LFROM   :: FROM -- { XINDENT 0 }
+              # LFROM   :< 180d
+              # LTO     :: TO -- { ZINDENT 0 }
+              # LTO     :< 0d
+              # FROM LFROM P1 LMID P2 LTO TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @LVRCurvePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent bias radius "ldiaglvrcurvepath"
+              # FROM    :: from boundaryatangle 180d
+              # ++ {arrow @FromArrowLength arrowlength} atangle 180d
+              # FROM    :< 180d
+              # TO      :: to boundaryatangle 180d
+              # ++ {arrow @ToArrowLength arrowlength} atangle 180d
+              # TO      :< 0d
+              # XLEFT   := {{xcoord FROM} min {xcoord TO}} - bias
+              # XP1     := { XLEFT ycoord FROM }
+              # XP2     := { XLEFT ycoord TO   }
+              # VERT    := XP1 angleto XP2
+              # LMID    :: XP1 ** 0.5 ++ XP2 ** 0.5
+              # LMID    :< VERT
+              # XINDENT := xindent min {FROM distance XP1}
+              # ZINDENT := zindent min {XP2   distance TO}
+              # LFROM   :: FROM -- { XINDENT 0 }
+              # LFROM   :< 180d
+              # LTO     :: TO -- { ZINDENT 0 }
+              # LTO     :< 0d
+              # RADIUS  := radius min { { XP1 distance XP2 } / 2 }
+              # XP1PRE  := XP1 ++ { RADIUS atangle 0d }
+              # XP1POST := XP1 ++ { RADIUS atangle VERT }
+              # XP1CTR  := XP1PRE ++ { RADIUS atangle VERT }
+              # P1      :: XP1CTR ++ { RADIUS atangle { XP1CTR angleto XP1 } }
+              # P1      :< XP1PRE angleto XP1POST
+              # XP2PRE  := XP2 -- { RADIUS atangle VERT }
+              # XP2POST := XP2 ++ { RADIUS atangle 0d }
+              # XP2CTR  := XP2PRE ++ { RADIUS atangle 0d }
+              # P2      :: XP2CTR ++ { RADIUS atangle { XP2CTR angleto XP2 } }
+              # P2      :< XP2PRE angleto XP2POST
+              # FROM LFROM XP1PRE
+              #   {round VERT} quadcase
+              #     90 { [XP1CTR clockwise] P1 [XP1CTR clockwise] }
+              #     270 { [XP1CTR] P1 [XP1CTR] }
+              # XP1POST LMID XP2PRE
+              #   {round VERT} quadcase
+              #     90 { [XP2CTR clockwise] P2 [XP2CTR clockwise] }
+              #     270 { [XP2CTR] P2 [XP2CTR] }
+              # XP2POST LTO TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @RVLLinePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent bias "ldiagrvllinepath"
+              # FROM    :: from boundaryatangle 0d
+              # ++ {arrow @FromArrowLength arrowlength} atangle 0d
+              # FROM    :< 0d
+              # TO      :: to boundaryatangle 0d
+              # ++ {arrow @ToArrowLength arrowlength} atangle 0d
+              # TO      :< 180d
+              # XRIGHT  := {{xcoord FROM} max {xcoord TO}} + bias
+              # P1      :: { XRIGHT ycoord FROM }
+              # P2      :: { XRIGHT ycoord TO   }
+              # VERT    := P1 angleto P2
+              # P1      :< P1 angleto {P1++{1f atangle 0d}  ++{1f atangle VERT}}
+              # P2      :< P2 angleto {P2++{1f atangle 180d}++{1f atangle VERT}}
+              # LMID    :: P1 ** 0.5 ++ P2 ** 0.5
+              # LMID    :< VERT
+              # XINDENT := xindent min {FROM distance P1}
+              # ZINDENT := zindent min {P2   distance TO}
+              # LFROM   :: FROM ++ { XINDENT 0 }
+              # LFROM   :< 0d
+              # LTO     :: TO ++ { ZINDENT 0 }
+              # LTO     :< 180d
+              # FROM LFROM P1 LMID P2 LTO TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @RVLCurvePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent bias radius "ldiagrvlcurvepath"
+              # FROM    :: from boundaryatangle 0d
+              # ++ {arrow @FromArrowLength arrowlength} atangle 0d
+              # FROM    :< 0d
+              # TO      :: to boundaryatangle 0d
+              # ++ {arrow @ToArrowLength arrowlength} atangle 0d
+              # TO      :< 180d
+              # XRIGHT  := {{xcoord FROM} max {xcoord TO}} + bias
+              # XP1     := { XRIGHT ycoord FROM }
+              # XP2     := { XRIGHT ycoord TO   }
+              # VERT    := XP1 angleto XP2
+              # LMID    :: XP1 ** 0.5 ++ XP2 ** 0.5
+              # LMID    :< VERT
+              # XINDENT := xindent min {FROM distance XP1}
+              # ZINDENT := zindent min {XP2   distance TO}
+              # LFROM   :: FROM ++ { XINDENT 0 }
+              # LFROM   :< 0d
+              # LTO     :: TO ++ { ZINDENT 0 }
+              # LTO     :< 180d
+              # RADIUS  := radius min { { XP1 distance XP2 } * 0.5 }
+              # XP1PRE  := XP1 ++ { RADIUS atangle 180d }
+              # XP1POST := XP1 ++ { RADIUS atangle VERT }
+              # XP1CTR  := XP1PRE ++ { RADIUS atangle VERT }
+              # P1      :: XP1CTR ++ { RADIUS atangle { XP1CTR angleto XP1 } }
+              # P1      :< XP1PRE angleto XP1POST
+              # XP2PRE  := XP2 -- { RADIUS atangle VERT }
+              # XP2POST := XP2 ++ { RADIUS atangle 180d }
+              # XP2CTR  := XP2PRE ++ { RADIUS atangle 180d }
+              # P2      :: XP2CTR ++ { RADIUS atangle { XP2CTR angleto XP2 } }
+              # P2      :< XP2PRE angleto XP2POST
+              # FROM LFROM XP1PRE
+              #   {round VERT} quadcase
+              #     90 { [XP1CTR] P1 [XP1CTR] }
+              #     270 { [XP1CTR clockwise] P1 [XP1CTR clockwise] }
+              # XP1POST LMID XP2PRE
+              #   {round VERT} quadcase
+              #     90 { [XP2CTR] P2 [XP2CTR] }
+              #     270 { [XP2CTR clockwise] P2 [XP2CTR clockwise] }
+              # XP2POST LTO TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @DWrapLinePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent bias fbias tbias "ldiagdwraplinepath"
+              # DIRN	:= if cond { xcoord from??CTR < xcoord to??CTR }
+              # 	      then { 180d } else { 0d }
+              # FROM	:: from boundaryatangle DIRN
+              # ++ {arrow @FromArrowLength arrowlength} atangle DIRN
+              # FROM	:< DIRN
+              # TO	:: to boundaryatangle { DIRN + 180d }
+              # ++ {arrow @ToArrowLength arrowlength} atangle { DIRN + 180d }
+              # TO	:< DIRN
+              # P1	:: FROM ++ {fbias max 0} atangle DIRN
+              # P1	:< if cond { DIRN = 180d } then { 225d } else { -45d }
+              # P4	:: TO ++ {tbias max 0} atangle { DIRN + 180d }
+              # P4	:< if cond { DIRN = 180d } then { 135d } else { 45d }
+              # YC	:= ycoord { from boundaryatangle 270d } min
+              # 	   ycoord { to   boundaryatangle 270d }
+              # 	   - { bias max 0 }
+              # P2	:: { xcoord P1 YC }
+              # P2	:< P4@ANGLE - 180d
+              # P3	:: { xcoord P4 YC }
+              # P3	:< P1@ANGLE - 180d
+              # XINDENT	:= xindent min { FROM distance P1 }
+              # LFROM	:: FROM ++ XINDENT atangle DIRN
+              # LFROM	:< FROM@ANGLE
+              # ZINDENT	:= zindent min { TO distance P4 }
+              # LTO	:: TO ++ ZINDENT atangle { DIRN + 180d }
+              # LTO	:< TO@ANGLE
+              # LMID	:: P2 ** 0.5 ++ P3 ** 0.5
+              # LMID	:< DIRN - 180d
+              # FROM P1 P2 P3 P4 TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @DWrapCurvePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent bias fbias tbias radius "ldiagdwrapcurvepath"
+              # DIRN	:= if cond { xcoord from??CTR < xcoord to??CTR }
+              # 	      then { 180d } else { 0d }
+              # CLOCK	:= if cond { xcoord from??CTR < xcoord to??CTR }
+              # 	      then { anticlockwise } else { clockwise }
+              # FROM	:: from boundaryatangle DIRN
+              # ++ {arrow @FromArrowLength arrowlength} atangle DIRN
+              # FROM	:< DIRN
+              # TO	:: to boundaryatangle { DIRN + 180d }
+              # ++ {arrow @ToArrowLength arrowlength} atangle { DIRN + 180d }
+              # TO	:< DIRN
+              #
+              # XP1	:= FROM ++ {fbias max 0} atangle DIRN
+              # XP4	:= TO ++ {tbias max 0} atangle { DIRN + 180d }
+              # YC	:= ycoord { from boundaryatangle 270d } min
+              # 	   ycoord { to   boundaryatangle 270d }
+              # 	   - { bias max 0 }
+              # XP2	:= { xcoord XP1 YC }
+              # XP3	:= { xcoord XP4 YC }
+              #
+              # RP1	:= radius min { XP1 distance FROM } min
+              # 	   { { XP1 distance XP2 } / 2 }
+              # XP1PRE	:= XP1 ++ RP1 atangle { XP1 angleto FROM }
+              # XP1POST := XP1 ++ RP1 atangle { XP1 angleto XP2  }
+              # XP1CTR  := XP1PRE ++ RP1 atangle { XP1 angleto XP2  }
+              # P1	:: XP1CTR ++ RP1 atangle { XP1CTR angleto XP1 }
+              # P1	:< XP1CTR angleto P1 + DIRN - 90d
+              #
+              # RP2	:= radius min { { XP1 distance XP2 } / 2 }
+              # 	     min { { XP2 distance XP3 } / 2 }
+              # XP2PRE	:= XP2 ++ RP2 atangle { XP2 angleto XP1 }
+              # XP2POST	:= XP2 ++ RP2 atangle { XP2 angleto XP3 }
+              # XP2CTR	:= XP2PRE ++ RP2 atangle { XP2 angleto XP3 }
+              # P2	:: XP2CTR ++ RP2 atangle { XP2CTR angleto XP2 }
+              # P2	:< XP2CTR angleto P2 + DIRN - 90d
+              #
+              # RP3	:= radius min { { XP2 distance XP3 } / 2 }
+              # 	     min { { XP3 distance XP4 } / 2 }
+              # XP3PRE	:= XP3 ++ RP3 atangle { XP3 angleto XP2 }
+              # XP3POST	:= XP3 ++ RP3 atangle { XP3 angleto XP4 }
+              # XP3CTR	:= XP3PRE ++ RP3 atangle { XP3 angleto XP4 }
+              # P3	:: XP3CTR ++ RP3 atangle { XP3CTR angleto XP3 }
+              # P3	:< XP3CTR angleto P3 + DIRN - 90d
+              #
+              # RP4	:= radius min { { XP4 distance XP3 } / 2 }
+              # 	     min { XP4 distance TO }
+              # XP4PRE	:= XP4 ++ RP4 atangle { XP4 angleto XP3 }
+              # XP4POST := XP4 ++ RP4 atangle { XP4 angleto TO  }
+              # XP4CTR  := XP4PRE ++ RP4 atangle { XP4 angleto TO  }
+              # P4	:: XP4CTR ++ RP4 atangle { XP4CTR angleto XP4 }
+              # P4	:< XP4CTR angleto P4 + DIRN - 90d
+              #
+              # XINDENT	:= xindent min { FROM distance XP1PRE }
+              # LFROM	:: FROM ++ XINDENT atangle DIRN
+              # LFROM	:< FROM@ANGLE
+              #
+              # LMID	:: XP2 ** 0.5 ++ XP3 ** 0.5
+              # LMID	:< DIRN - 180d
+              #
+              # ZINDENT	:= zindent min { TO distance XP4POST }
+              # LTO	:: TO ++ ZINDENT atangle { DIRN + 180d }
+              # LTO	:< TO@ANGLE
+              #
+              # FROM LFROM
+              # XP1PRE [XP1CTR CLOCK] XP1POST
+              # XP2PRE [XP2CTR CLOCK] XP2POST
+              # LMID
+              # XP3PRE [XP3CTR CLOCK] XP3POST
+              # XP4PRE [XP4CTR CLOCK] XP4POST
+              # LTO TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @UWrapLinePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent bias fbias tbias "ldiaguwraplinepath"
+              # DIRN	:= if cond { xcoord from??CTR < xcoord to??CTR }
+              # 	      then { 180d } else { 0d }
+              # FROM	:: from boundaryatangle DIRN
+              # ++ {arrow @FromArrowLength arrowlength} atangle DIRN
+              # FROM	:< DIRN
+              # TO	:: to boundaryatangle { DIRN + 180d }
+              # ++ {arrow @ToArrowLength arrowlength} atangle { DIRN + 180d }
+              # TO	:< DIRN
+              # P1	:: FROM ++ {fbias max 0} atangle DIRN
+              # P1	:< if cond { DIRN = 180d } then { 135d } else { 45d }
+              # P4	:: TO ++ {tbias max 0} atangle { DIRN + 180d }
+              # P4	:< if cond { DIRN = 180d } then { 225d } else { -45d }
+              # YC	:= ycoord { from boundaryatangle 90d } max
+              # 	   ycoord { to   boundaryatangle 90d }
+              # 	   + { bias max 0 }
+              # P2	:: { xcoord P1 YC }
+              # P2	:< P4@ANGLE - 180d
+              # P3	:: { xcoord P4 YC }
+              # P3	:< P1@ANGLE - 180d
+              # XINDENT	:= xindent min { FROM distance P1 }
+              # LFROM	:: FROM ++ XINDENT atangle DIRN
+              # LFROM	:< FROM@ANGLE
+              # ZINDENT	:= zindent min { TO distance P4 }
+              # LTO	:: TO ++ ZINDENT atangle { DIRN + 180d }
+              # LTO	:< TO@ANGLE
+              # LMID	:: P2 ** 0.5 ++ P3 ** 0.5
+              # LMID	:< DIRN - 180d
+              # FROM P1 P2 P3 P4 TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @UWrapCurvePath
+	    {
+		@BackEnd @Case {
+		  PostScript @Yield {
+	      {arrow @FromArrowLength arrowlength}
+	      {arrow @ToArrowLength arrowlength}
+	      "{" from "}" "{" to "}"
+	      xindent zindent bias fbias tbias radius "ldiaguwrapcurvepath"
+              # DIRN	:= if cond { xcoord from??CTR < xcoord to??CTR }
+              # 	      then { 180d } else { 0d }
+              # CLOCK	:= if cond { xcoord from??CTR < xcoord to??CTR }
+              # 	      then { clockwise } else { anticlockwise }
+              # FROM	:: from boundaryatangle DIRN
+              # ++ {arrow @FromArrowLength arrowlength} atangle DIRN
+              # FROM	:< DIRN
+              # TO	:: to boundaryatangle { DIRN + 180d }
+              # ++ {arrow @ToArrowLength arrowlength} atangle { DIRN + 180d }
+              # TO	:< DIRN
+              #
+              # XP1	:= FROM ++ {fbias max 0} atangle DIRN
+              # XP4	:= TO ++ {tbias max 0} atangle { DIRN + 180d }
+              # YC	:= ycoord { from boundaryatangle 90d } max
+              # 	   ycoord { to   boundaryatangle 90d }
+              # 	   + { bias max 0 }
+              # XP2	:= { xcoord XP1 YC }
+              # XP3	:= { xcoord XP4 YC }
+              #
+              # RP1	:= radius min { XP1 distance FROM } min
+              # 	   { { XP1 distance XP2 } / 2 }
+              # XP1PRE	:= XP1 ++ RP1 atangle { XP1 angleto FROM }
+              # XP1POST := XP1 ++ RP1 atangle { XP1 angleto XP2  }
+              # XP1CTR  := XP1PRE ++ RP1 atangle { XP1 angleto XP2  }
+              # P1	:: XP1CTR ++ RP1 atangle { XP1CTR angleto XP1 }
+              # P1	:< XP1CTR angleto P1 + DIRN + 90d
+              #
+              # RP2	:= radius min { { XP1 distance XP2 } / 2 }
+              # 	     min { { XP2 distance XP3 } / 2 }
+              # XP2PRE	:= XP2 ++ RP2 atangle { XP2 angleto XP1 }
+              # XP2POST	:= XP2 ++ RP2 atangle { XP2 angleto XP3 }
+              # XP2CTR	:= XP2PRE ++ RP2 atangle { XP2 angleto XP3 }
+              # P2	:: XP2CTR ++ RP2 atangle { XP2CTR angleto XP2 }
+              # P2	:< XP2CTR angleto P2 + DIRN + 90d
+              #
+              # RP3	:= radius min { { XP2 distance XP3 } / 2 }
+              # 	     min { { XP3 distance XP4 } / 2 }
+              # XP3PRE	:= XP3 ++ RP3 atangle { XP3 angleto XP2 }
+              # XP3POST	:= XP3 ++ RP3 atangle { XP3 angleto XP4 }
+              # XP3CTR	:= XP3PRE ++ RP3 atangle { XP3 angleto XP4 }
+              # P3	:: XP3CTR ++ RP3 atangle { XP3CTR angleto XP3 }
+              # P3	:< XP3CTR angleto P3 + DIRN + 90d
+              #
+              # RP4	:= radius min { { XP4 distance XP3 } / 2 }
+              # 	     min { XP4 distance TO }
+              # XP4PRE	:= XP4 ++ RP4 atangle { XP4 angleto XP3 }
+              # XP4POST := XP4 ++ RP4 atangle { XP4 angleto TO  }
+              # XP4CTR  := XP4PRE ++ RP4 atangle { XP4 angleto TO  }
+              # P4	:: XP4CTR ++ RP4 atangle { XP4CTR angleto XP4 }
+              # P4	:< XP4CTR angleto P4 + DIRN + 90d
+              #
+              # XINDENT	:= xindent min { FROM distance XP1PRE }
+              # LFROM	:: FROM ++ XINDENT atangle DIRN
+              # LFROM	:< FROM@ANGLE
+              #
+              # LMID	:: XP2 ** 0.5 ++ XP3 ** 0.5
+              # LMID	:< DIRN - 180d
+              #
+              # ZINDENT	:= zindent min { TO distance XP4POST }
+              # LTO	:: TO ++ ZINDENT atangle { DIRN + 180d }
+              # LTO	:< TO@ANGLE
+              #
+              # FROM LFROM
+              # XP1PRE [XP1CTR CLOCK] XP1POST
+              # XP2PRE [XP2CTR CLOCK] XP2POST
+              # LMID
+              # XP3PRE [XP3CTR CLOCK] XP3POST
+              # XP4PRE [XP4CTR CLOCK] XP4POST
+              # LTO TO
+		  }
+		  PDF @Yield {}
+		}
+	    }
+
+	    import @Geometry
+	    def @Path
+	    {
+		path @Case {
+		    line			@Yield @LinePath
+		    doubleline			@Yield @DoubleLinePath
+		    { acurve curve }		@Yield @ACurvePath
+		    ccurve			@Yield @CCurvePath
+		    bezier			@Yield @BezierPath
+		    vhline			@Yield @VHLinePath
+		    vhcurve			@Yield @VHCurvePath
+		    hvline			@Yield @HVLinePath
+		    hvcurve			@Yield @HVCurvePath
+		    lvrline			@Yield @LVRLinePath
+		    lvrcurve			@Yield @LVRCurvePath
+		    rvlline			@Yield @RVLLinePath
+		    rvlcurve			@Yield @RVLCurvePath
+		    dwrapline			@Yield @DWrapLinePath
+		    dwrapcurve			@Yield @DWrapCurvePath
+		    uwrapline			@Yield @UWrapLinePath
+		    uwrapcurve			@Yield @UWrapCurvePath
+		    else			@Yield {
+			path
+			    from { from }
+			    to { to }
+			    bias { bias }
+			    fbias { fbias }
+			    tbias { tbias }
+			    radius { radius }
+			    xindent { xindent }
+			    zindent { zindent }
+			    frompt { frompt }
+			    topt { topt }
+			    arrow { arrow }
+			    arrowlength { arrowlength }
+		    }
+		}
+	    }
+
+	    def @FromLabel
+	    {
+		@DoLabel
+		    which	{ "f"				}
+		    label	{ fromlabel @Else @FromArrow	}
+		    labelmargin	{ fromlabelmargin		}
+		    labelfont	{ fromlabelfont			}
+		    labelbreak	{ fromlabelbreak		}
+		    labelformat { fromlabelformat @Body		}
+		    labelpos	{ fromlabelpos			}
+		    labelprox	{ fromlabelprox			}
+		    labelangle	{ fromlabelangle		}
+		    labelctr	{ fromlabelctr			}
+		    labeladjust	{ fromlabeladjust		}
+	    }
+
+	    def @ToLabel
+	    {
+		@DoLabel
+		    which	{ "t"				}
+		    label	{ tolabel @Else @ToArrow	}
+		    labelmargin	{ tolabelmargin			}
+		    labelfont	{ tolabelfont			}
+		    labelbreak	{ tolabelbreak			}
+		    labelformat { tolabelformat @Body		}
+		    labelpos	{ tolabelpos			}
+		    labelprox	{ tolabelprox			}
+		    labelangle	{ tolabelangle			}
+		    labelctr	{ tolabelctr			}
+		    labeladjust	{ tolabeladjust			}
+	    }
+
+	    def @Direct
+	    {
+		pathstyle @Case {
+		    { "/ldiagsolid" "/ldiagdashed" "/ldiagcdashed"
+		      "/ldiagdotted" "/ldiagnoline" } @Yield 1
+		    else @Yield 0
+		}
+	    }
+
+	  @BackEnd @Case {
+	    PostScript @Yield {
+
+	    @Null & # so that preceding space gets chewed up
+            {
+	      @Direct "ldiaglinkbegin [" @Path "]" pathdashlength
+	      "[" pathstyle "]" pathwidth "ldiaglinkend"
+            }
+            @Graphic
+            {
+		/ { fromlabel @Else @FromArrow}	@IfNonEmpty @FromLabel
+		/ { xlabel @Else linklabel }	@IfNonEmpty @XLabel
+		/ { ylabel @Else linklabel }	@IfNonEmpty @YLabel
+		/ { zlabel @Else linklabel }	@IfNonEmpty @ZLabel
+		/ { tolabel @Else @ToArrow }	@IfNonEmpty @ToLabel
+	    }
+
+	    }
+	    PDF @Yield {}
+	  }
+	}
+
+
+        def @ObjectLink
+	    precedence 90
+	    associativity left
+	    left x
+	    named treehsep { treehsep }
+	    named treevsep { treevsep }
+	    named format
+		named x {}
+		named y {}
+		named insinuatelink {}
+		named treehsep {}
+		named treevsep {}
+	    { x | y | insinuatelink }
+            import @Geometry named path
+                named from {}
+                named to {}
+                named bias {}
+                named fbias {}
+                named tbias {}
+                named radius {}
+                named xindent {}
+                named zindent {}
+                named frompt {}
+                named topt {}
+                named arrow {}
+                named arrowlength {}
+            					{ path
+						    from { from }
+						    to { to }
+						    bias { bias }
+						    fbias { fbias }
+						    tbias { tbias }
+						    radius { radius }
+						    xindent { xindent }
+						    zindent { zindent }
+						    frompt { frompt }
+						    topt { topt }
+						    arrow { arrow }
+						    arrowlength { arrowlength }
+						}
+            import @Geometry named basefrom	{ 			}
+            import @Geometry named baseto	{ 			}
+            import @Geometry named from		{ 			}
+            import @Geometry named to		{ 			}
+            import @Geometry named bias		{ bias			}
+            import @Geometry named fbias	{ fbias			}
+            import @Geometry named tbias	{ tbias			}
+            import @Geometry named radius	{ radius		}
+            import @Geometry named xindent	{ xindent		}
+            import @Geometry named zindent	{ zindent		}
+            import @Geometry named frompt	{ frompt		}
+            import @Geometry named topt		{ topt			}
+            named pathstyle
+		named solid   { "/ldiagsolid"   }
+		named dashed  { "/ldiagdashed"  }
+		named cdashed { "/ldiagcdashed" }
+		named dotted  { "/ldiagdotted"  }
+		named noline  { "/ldiagnoline"  }
+						{ pathstyle		}
+            import @Geometry named pathdashlength { pathdashlength	}
+            import @Geometry named pathwidth
+		named thin   { 0.04 ft }
+		named medium { 0.08 ft }
+		named thick  { 0.12 ft }
+						{ pathwidth		}
+            import @Geometry named pathgap
+		named thin   { 0.08 ft }
+		named medium { 0.16 ft }
+		named thick  { 0.24 ft }
+						{ pathgap		}
+
+            named arrow				{ arrow			}
+            named arrowstyle			{ arrowstyle		}
+            named arrowwidth			{ arrowwidth		}
+            named arrowlength			{ arrowlength		}
+
+	    named linklabel			{ linklabel		}
+	    named linklabelmargin		{ linklabelmargin	}
+	    named linklabelfont			{ linklabelfont		}
+	    named linklabelbreak		{ linklabelbreak	}
+	    named linklabelformat right @Body	{ linklabelformat @Body	}
+	    import @Geometry named linklabelpos	{ linklabelpos		}
+	    named linklabelprox			{ linklabelprox		}
+	    import @Geometry named linklabelangle  { linklabelangle	}
+	    named linklabelctr			{ linklabelctr		}
+	    import @Geometry named linklabeladjust { linklabeladjust	}
+
+            named xlabel			{ xlabel		}
+            named xlabelmargin	        	{ xlabelmargin		}
+            named xlabelfont			{ xlabelfont		}
+            named xlabelbreak			{ xlabelbreak		}
+	    named xlabelformat right @Body	{ xlabelformat @Body	}
+            import @Geometry named xlabelpos	{ xlabelpos		}
+            named xlabelprox			{ xlabelprox		}
+            import @Geometry named xlabelangle	{ xlabelangle		}
+	    named xlabelctr			{ xlabelctr		}
+            import @Geometry named xlabeladjust	{ xlabeladjust		}
+
+            named ylabel			{ ylabel		}
+            named ylabelmargin			{ ylabelmargin		}
+            named ylabelfont			{ ylabelfont		}
+            named ylabelbreak			{ ylabelbreak		}
+	    named ylabelformat right @Body	{ ylabelformat @Body	}
+            import @Geometry named ylabelpos	{ ylabelpos		}
+            named ylabelprox			{ ylabelprox		}
+            import @Geometry named ylabelangle	{ ylabelangle		}
+	    named ylabelctr			{ ylabelctr		}
+            import @Geometry named ylabeladjust	{ ylabeladjust		}
+
+            named zlabel			{ zlabel		}
+            named zlabelmargin			{ zlabelmargin		}
+            named zlabelfont			{ zlabelfont		}
+            named zlabelbreak			{ zlabelbreak		}
+	    named zlabelformat right @Body	{ zlabelformat @Body	}
+            import @Geometry named zlabelpos	{ zlabelpos		}
+            named zlabelprox			{ zlabelprox		}
+            import @Geometry named zlabelangle	{ zlabelangle		}
+	    named zlabelctr			{ zlabelctr		}
+            import @Geometry named zlabeladjust	{ zlabeladjust		}
+
+            named fromlabel			{ fromlabel		}
+            named fromlabelmargin		{ fromlabelmargin	}
+            named fromlabelfont			{ fromlabelfont		}
+            named fromlabelbreak		{ fromlabelbreak	}
+	    named fromlabelformat right @Body	{ fromlabelformat @Body	}
+            import @Geometry named fromlabelpos	{ fromlabelpos		}
+            named fromlabelprox			{ fromlabelprox		}
+            import @Geometry named fromlabelangle  { fromlabelangle	}
+	    named fromlabelctr			{ fromlabelctr		}
+            import @Geometry named fromlabeladjust { fromlabeladjust	}
+
+            named tolabel			{ tolabel		}
+            named tolabelmargin			{ tolabelmargin		}
+            named tolabelfont			{ tolabelfont		}
+            named tolabelbreak			{ tolabelbreak		}
+	    named tolabelformat right @Body	{ tolabelformat @Body	}
+            import @Geometry named tolabelpos	{ tolabelpos		}
+            named tolabelprox			{ tolabelprox		}
+            import @Geometry named tolabelangle	{ tolabelangle		}
+	    named tolabelctr			{ tolabelctr		}
+            import @Geometry named tolabeladjust{ tolabeladjust		}
+	    right y
+
+        {
+	    def @From
+	    {
+		from @Case {
+		    ""   @Yield basefrom
+		    else @Yield { basefrom"@"from }
+		}
+	    }
+
+	    def @To
+	    {
+		to @Case {
+		    ""   @Yield baseto
+		    else @Yield { baseto"@"to }
+		}
+	    }
+
+	    format
+		x { x }
+		y { y }
+		treehsep { treehsep }
+		treevsep { treevsep }
+		insinuatelink {
+		    @Link
+			from		{ @From			}
+			to		{ @To			}
+			bias		{ bias			}
+			fbias		{ fbias			}
+			tbias		{ tbias			}
+			radius		{ radius		}
+			xindent		{ xindent		}
+			zindent		{ zindent		}
+			frompt		{ frompt		}
+			topt		{ topt			}
+			path		{ path
+						from { @From }
+						to { @To }
+						bias { bias }
+						fbias { fbias }
+						tbias { tbias }
+						radius { radius }
+						xindent { xindent }
+						zindent { zindent }
+						frompt { frompt }
+						topt { topt }
+						arrow { arrow }
+						arrowlength { arrowlength }
+					}
+			pathstyle	{ pathstyle		}
+			pathdashlength	{ pathdashlength	}
+			pathwidth	{ pathwidth		}
+			pathgap 	{ pathgap		}
+			arrow		{ arrow			}
+			arrowstyle	{ arrowstyle		}
+			arrowwidth	{ arrowwidth		}
+			arrowlength	{ arrowlength		}
+
+			linklabel	{ linklabel		}
+			linklabelmargin	{ linklabelmargin	}
+			linklabelfont	{ linklabelfont		}
+			linklabelbreak	{ linklabelbreak	}
+			linklabelformat	{ linklabelformat @Body	}
+			linklabelpos	{ linklabelpos		}
+			linklabelprox	{ linklabelprox		}
+			linklabelangle	{ linklabelangle	}
+			linklabelctr	{ linklabelctr		}
+			linklabeladjust	{ linklabeladjust	}
+
+			xlabel		{ xlabel		}
+			xlabelmargin	{ xlabelmargin		}
+			xlabelfont	{ xlabelfont		}
+			xlabelbreak	{ xlabelbreak		}
+			xlabelformat	{ xlabelformat @Body	}
+			xlabelpos	{ xlabelpos		}
+			xlabelprox	{ xlabelprox		}
+			xlabelangle	{ xlabelangle		}
+			xlabelctr	{ xlabelctr		}
+			xlabeladjust	{ xlabeladjust		}
+
+			ylabel		{ ylabel		}
+			ylabelmargin	{ ylabelmargin		}
+			ylabelfont	{ ylabelfont		}
+			ylabelbreak	{ ylabelbreak		}
+			ylabelformat	{ ylabelformat @Body	}
+			ylabelpos	{ ylabelpos		}
+			ylabelprox	{ ylabelprox		}
+			ylabelangle	{ ylabelangle		}
+			ylabelctr	{ ylabelctr		}
+			ylabeladjust	{ ylabeladjust		}
+
+			zlabel		{ zlabel		}
+			zlabelmargin	{ zlabelmargin		}
+			zlabelfont	{ zlabelfont		}
+			zlabelbreak	{ zlabelbreak		}
+			zlabelformat	{ zlabelformat @Body	}
+			zlabelpos	{ zlabelpos		}
+			zlabelprox	{ zlabelprox		}
+			zlabelangle	{ zlabelangle		}
+			zlabelctr	{ zlabelctr		}
+			zlabeladjust	{ zlabeladjust		}
+
+			fromlabel	{ fromlabel		}
+			fromlabelmargin	{ fromlabelmargin	}
+			fromlabelfont	{ fromlabelfont		}
+			fromlabelbreak	{ fromlabelbreak	}
+			fromlabelformat	{ fromlabelformat @Body	}
+			fromlabelpos	{ fromlabelpos		}
+			fromlabelprox	{ fromlabelprox		}
+			fromlabelangle	{ fromlabelangle	}
+			fromlabelctr	{ fromlabelctr		}
+			fromlabeladjust	{ fromlabeladjust	}
+
+			tolabel		{ tolabel		}
+			tolabelmargin	{ tolabelmargin		}
+			tolabelfont	{ tolabelfont		}
+			tolabelbreak	{ tolabelbreak		}
+			tolabelformat	{ tolabelformat @Body	}
+			tolabelpos	{ tolabelpos		}
+			tolabelprox	{ tolabelprox		}
+			tolabelangle	{ tolabelangle		}
+			tolabelctr	{ tolabelctr		}
+			tolabeladjust	{ tolabeladjust		}
+	    }
+        }
+
+	macro @Line		{ @Link path { line     }		}
+	macro @DoubleLine	{ @Link path { doubleline }		}
+	macro @Arrow		{ @Link path { line     } arrow { yes }	}
+	macro @DoubleArrow	{ @Link path {doubleline} arrow { yes }	}
+	macro @Curve		{ @Link path { curve	}		}
+	macro @CurveArrow	{ @Link path { curve	} arrow { yes }	}
+	macro @ACurve		{ @Link path { acurve	}		}
+	macro @ACurveArrow	{ @Link path { acurve	} arrow { yes }	}
+	macro @CCurve		{ @Link path { ccurve	}		}
+	macro @CCurveArrow	{ @Link path { ccurve	} arrow { yes }	}
+
+	macro @Bezier		{ @Link path { bezier	}		}
+	macro @BezierArrow	{ @Link path { bezier	} arrow { yes }	}
+
+	macro @HVLine		{ @Link path { hvline   }		}
+	macro @HVArrow		{ @Link path { hvline   } arrow { yes }	}
+	macro @VHLine		{ @Link path { vhline   }		}
+	macro @VHArrow		{ @Link path { vhline   } arrow { yes }	}
+	macro @HVCurve		{ @Link path { hvcurve  }		}
+	macro @HVCurveArrow	{ @Link path { hvcurve  } arrow { yes }	}
+	macro @VHCurve		{ @Link path { vhcurve  }		}
+	macro @VHCurveArrow	{ @Link path { vhcurve  } arrow { yes }	}
+
+	macro @LVRLine		{ @Link path { lvrline  }		}
+	macro @LVRArrow		{ @Link path { lvrline  } arrow { yes }	}
+	macro @RVLLine		{ @Link path { rvlline  }		}
+	macro @RVLArrow		{ @Link path { rvlline  } arrow { yes }	}
+	macro @LVRCurve		{ @Link path { lvrcurve }		}
+	macro @LVRCurveArrow	{ @Link path { lvrcurve } arrow { yes }	}
+	macro @RVLCurve		{ @Link path { rvlcurve }		}
+	macro @RVLCurveArrow	{ @Link path { rvlcurve } arrow { yes }	}
+
+	macro @DWrapLine	{ @Link path { dwrapline}		}
+	macro @DWrapArrow	{ @Link path { dwrapline} arrow { yes }	}
+	macro @UWrapLine	{ @Link path { uwrapline}		}
+	macro @UWrapArrow	{ @Link path { uwrapline} arrow { yes }	}
+	macro @DWrapCurve	{ @Link path {dwrapcurve}		}
+	macro @DWrapCurveArrow	{ @Link path {dwrapcurve} arrow { yes }	}
+	macro @UWrapCurve	{ @Link path {uwrapcurve}		}
+	macro @UWrapCurveArrow	{ @Link path {uwrapcurve} arrow { yes }	}
+
+	export
+
+	    @Node @Box @CurveBox @ShadowBox @Square @Diamond
+	    @Polygon @Isosceles @Ellipse @Circle
+	    @LeftSub @ZeroWidthLeftSub @RightSub @ZeroWidthRightSub
+	    @FirstSub @NextSub @StubSub
+
+	def @Tree
+	    named treehindent
+		named left  { 0.0rt }
+		named ctr   { 0.5rt }
+		named right { 1.0rt }
+						{ treehindent		}
+	    body x
+	{
+
+	    macro @TNode	{ @@Node nodetag { T 		} }
+            macro @Node		{ @TNode                          }
+            macro @Box		{ @TNode outline { box		} }
+            macro @CurveBox	{ @TNode outline { curvebox	} }
+	    macro @ShadowBox	{ @TNode outline { shadowbox	} }
+            macro @Square	{ @TNode outline { square	} }
+            macro @Diamond	{ @TNode outline { diamond	} }
+            macro @Polygon	{ @TNode outline { polygon	} }
+            macro @Isosceles	{ @TNode outline { isosceles	} }
+            macro @Ellipse	{ @TNode outline { ellipse	} }
+            macro @Circle	{ @TNode outline { circle	} }
+
+	    def fixroot
+		precedence 90
+		left root
+	    {
+		|treehindent root
+	    }
+
+	    macro @LeftSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { L@T }
+		    format { { /treevsep {L::y} } |treehsep x | insinuatelink }
+	    }
+
+	    macro @ZeroWidthLeftSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { L@T }
+		    format { { /treevsep @ZeroWidth { {L::y} ^|treehsep } } |
+			x | insinuatelink }
+	    }
+
+	    macro @FirstSub
+	    {
+		fixroot //
+		@ObjectLink
+		    basefrom { T }
+		    baseto { S@T }
+		    format { //treevsep {S::y} | insinuatelink | }
+	    }
+
+	    macro @NextSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { S@T }
+		    format { x |treehsep { / {S::y} | insinuatelink | } }
+	    }
+
+	    macro @RightSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { R@T }
+		    format { x |treehsep  { /treevsep {R::y} } | insinuatelink }
+	    }
+
+	    macro @ZeroWidthRightSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { R@T }
+		    format { x | { /treevsep @ZeroWidth { |treehsep {R::y} } }
+			| insinuatelink }
+	    }
+
+	    macro @StubSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { T }
+		    format { @VContract { |0.5rt x | // |0.5rt
+		      S:: @BoxLabels @CatchTags y | } | insinuatelink }
+		    # path { from S@T@SW S@T@SE to }
+		    path {
+			P1::	S@SW
+			P2::	S@SE
+			FROM::	from boundaryatangle { from??CTR angleto P1 }
+			TO::	to   boundaryatangle { to??CTR   angleto P2 }
+			FROM P1 P2 TO
+		    }
+	    }
+
+	    @HContract @VContract x
+	}
+
+	export
+
+	    @Node @Box @CurveBox @ShadowBox @Square @Diamond
+	    @Polygon @Isosceles @Ellipse @Circle
+	    @LeftSub @ZeroWidthLeftSub @RightSub @ZeroWidthRightSub
+	    @FirstSub @NextSub @StubSub
+
+	def @HTree
+	    named treevindent
+		named top   { 0.0rt }
+		named ctr   { 0.5rt }
+		named foot  { 1.0rt }
+						{ treevindent		}
+	    body x
+	{
+
+	    macro @TNode	{ @@Node nodetag { T 		} }
+	    macro @Node		{ @TNode                          }
+            macro @Box		{ @TNode outline { box		} }
+            macro @CurveBox	{ @TNode outline { curvebox	} }
+	    macro @ShadowBox	{ @TNode outline { shadowbox	} }
+            macro @Square	{ @TNode outline { square	} }
+            macro @Diamond	{ @TNode outline { diamond	} }
+            macro @Polygon	{ @TNode outline { polygon	} }
+            macro @Isosceles	{ @TNode outline { isosceles	} }
+            macro @Ellipse	{ @TNode outline { ellipse	} }
+            macro @Circle	{ @TNode outline { circle	} }
+
+	    def fixroot
+		precedence 90
+		left root
+	    {
+		/treevindent root
+	    }
+
+	    macro @LeftSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { L@T }
+		    format { { |treehsep {L::y} } /treevsep x / insinuatelink }
+	    }
+
+	    macro @ZeroWidthLeftSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { L@T }
+		    format { { |treehsep @ZeroWidth { {L::y} ^/treevsep } } /
+			x / insinuatelink }
+	    }
+
+	    macro @FirstSub
+	    {
+		fixroot ||
+		@ObjectLink
+		    basefrom { T }
+		    baseto { S@T }
+		    format { ||treehsep { {S::y} / insinuatelink / } }
+	    }
+
+	    macro @NextSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { S@T }
+		    format { x /treevsep { | {S::y} { / insinuatelink / } } }
+	    }
+
+	    macro @RightSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { R@T }
+		    format { x /treevsep  { |treehsep {R::y} } / insinuatelink }
+	    }
+
+	    macro @ZeroWidthRightSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { R@T }
+		    format { x / { |treehsep @ZeroWidth { /treevsep {R::y} } }
+			/ insinuatelink }
+	    }
+
+	    macro @StubSub
+	    {
+		@ObjectLink
+		    basefrom { T }
+		    baseto { T }
+		    format { @VContract { { /0.5rt x / } || { /0.5rt
+		      S:: @BoxLabels @CatchTags y / } } / insinuatelink }
+		    # path { from S@T@SW S@T@SE to }
+		    path {
+			P1::	S@NE
+			P2::	S@SE
+			FROM::	from boundaryatangle { from??CTR angleto P1 }
+			TO::	to   boundaryatangle { to??CTR   angleto P2 }
+			FROM P1 P2 TO
+		    }
+	    }
+
+	    @HContract @VContract x
+	}
+
+	@BackEnd @Case {
+	  PostScript @Yield {
+        {
+	  save @Case { { yes Yes } @Yield "grestore save gsave" else @Yield {} }
+	  maxlabels "ldiagbegin"
+          //
+	  "ldiagend"
+	  save @Case { { yes Yes } @Yield "restore" else @Yield {} }
+        } @Graphic @Body
+	  }
+	  PDF @Yield {}
+	}
+
+    @End @Diag
+}
diff --git a/include/diagf.etc b/include/diagf.etc
new file mode 100644
index 0000000..c92a145
--- /dev/null
+++ b/include/diagf.etc
@@ -0,0 +1,627 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @Geometry package for algebra and geometry in PostScript              #
+#  Version 1.0 (June 1996)                                                    #
+#  Jeffrey H. Kingston                                                        #
+#                                                                             #
+###############################################################################
+
+export
+
+    i c p m s v f d "-0" "-1" "-2" "-3" "-4" "-5" "-6" "-7" "-8" "-9" "-."
+    pi e sqrt abs ceiling floor truncate round cos sin atan
+    exp log rand max min "*" "/" idiv mod "+" "-"
+    xcoord ycoord distance angleto ":=" ":==" "::" ":<" prev "??" "?!?"
+    boundaryatangle atangle
+    "**" "++" "--" anglefix anydebug ","
+    "=" "!=" "==" "!==" "<" "<=" ">" ">=" not and xor or
+    if quadcase signcase xloop yloop zloop
+    cabout aabout
+
+def @Geometry
+{
+    def i
+	precedence 100
+	left x
+    {
+	x "in"
+    }
+
+    def c
+	precedence 100
+	left x
+    {
+	x "cm"
+    }
+
+    def p
+	precedence 100
+	left x
+    {
+	x "pt"
+    }
+
+    def m
+	precedence 100
+	left x
+    {
+	x "em"
+    }
+
+    def s
+	precedence 100
+	left x
+    {
+	x "sp"
+    }
+
+    def v
+	precedence 100
+	left x
+    {
+	x "vs"
+    }
+
+    def f
+	precedence 100
+	left x
+    {
+	x "ft"
+    }
+
+    def d
+	precedence 100
+	left x
+    {
+	x "dg"
+    }
+
+    def pi
+    {
+	"ldiagpi"
+    }
+
+    def e
+    {
+	"ldiage"
+    }
+
+    def sqrt
+	precedence 99
+	right y
+    {
+	y "sqrt"
+    }
+
+    def abs
+	precedence 99
+	right y
+    {
+	y "abs"
+    }
+
+    def anglefix
+	precedence 99
+	right y
+    {
+	y "ldiagfixangle"
+    }
+
+    def ceiling
+	precedence 99
+	right y
+    {
+	y "ceiling"
+    }
+
+    def floor
+	precedence 99
+	right y
+    {
+	y "floor"
+    }
+
+    def truncate
+	precedence 99
+	right y
+    {
+	y "truncate"
+    }
+
+    def round
+	precedence 99
+	right y
+    {
+	y "round"
+    }
+
+    def cos
+	precedence 99
+	right y
+    {
+	y "cos"
+    }
+
+    def sin
+	precedence 99
+	right y
+    {
+	y "sin"
+    }
+
+    def xcoord
+	precedence 99
+	right y
+    {
+	y "pop"
+    }
+
+    def ycoord
+	precedence 99
+	right y
+    {
+	y "exch pop"
+    }
+
+    def distance
+	precedence 98
+	left x
+	right y
+    {
+	x y "ldiagdistance"
+    }
+
+    def angleto
+	precedence 98
+	left x
+	right y
+    {
+	x y "ldiagangleto"
+    }
+
+    def atan
+	precedence 98
+	left x
+	right y
+    {
+	x y "atan"
+    }
+
+    def exp
+	precedence 98
+	left x
+	right y
+    {
+	x y "exp"
+    }
+
+    def log
+	precedence 98
+	left x
+	right y
+    {
+	x y "ldiaglog"
+    }
+
+    def rand
+	precedence 98
+	left x
+	right y
+    {
+	x y "dorand"
+    }
+
+    def max
+	precedence 98
+	left x
+	right y
+    {
+	x y "ldiagmax"
+    }
+
+    def min
+	precedence 98
+	left x
+	right y
+    {
+	x y "ldiagmin"
+    }
+
+    def "*"
+	precedence 97
+	left x
+	right y
+    {
+	x y "mul"
+    }
+
+    def "/"
+	precedence 96
+	associativity left
+	left x
+	right y
+    {
+	x y "div"
+    }
+
+    def idiv
+	precedence 96
+	associativity left
+	left x
+	right y
+    {
+	x y "idiv"
+    }
+
+    def mod
+	precedence 96
+	left x
+	right y
+    {
+	x "cvi" y "cvi mod"
+    }
+
+    def "+"
+	precedence 95
+	associativity left
+	left x
+	right y
+    {
+	x @Case {
+	    ""   @Yield y
+	    else @Yield { x y "add" }
+	}
+    }
+
+    def "-"
+	precedence 95
+	associativity left
+	left x
+	right y
+    {
+	x @Case {
+	    ""   @Yield { y "neg" }
+	    else @Yield { x y "sub" }
+	}
+    }
+
+    def "-0" { "-0" }
+    def "-1" { "-1" }
+    def "-2" { "-2" }
+    def "-3" { "-3" }
+    def "-4" { "-4" }
+    def "-5" { "-5" }
+    def "-6" { "-6" }
+    def "-7" { "-7" }
+    def "-8" { "-8" }
+    def "-9" { "-9" }
+    def "-." { "-." }
+
+    def prev
+    {
+	"ldiagprevious"
+    }
+
+    def "??"
+	precedence 99
+	left x
+	right y
+    {
+	"{" x "} ("y") ldiagdolabel"
+    }
+
+    def "?!?"
+	precedence 99
+	left x
+	right y
+    {
+	"{" x "} "y" ldiagdolabel"
+    }
+
+    def boundaryatangle
+	precedence 89
+	left x
+	right y
+    {
+	x??"CTR" y x??"CIRCUM" "ldiagpadd"
+    }
+
+    def atangle
+	precedence 89
+	left x
+	right y
+    {
+	0 0 x y "ldiagatangle"
+    }
+
+    def "**"
+	precedence 88
+	left x
+	right y
+    {
+	x y "ldiagpmul"
+    }
+
+    def "++"
+	precedence 87
+	associativity left
+	left x
+	right y
+    {
+	x y "ldiagpadd"
+    }
+
+    def "--"
+	precedence 87
+	associativity left
+	left x
+	right y
+    {
+	y x "ldiagpsub"
+    }
+
+    def "="
+	precedence 79
+	left x
+	right y
+    {
+	x y "eq"
+    }
+
+    def "!="
+	precedence 79
+	left x
+	right y
+    {
+	x y "ne"
+    }
+
+    def "=="
+	precedence 79
+	left x
+	right y
+    {
+	x y "ldiagangleeq"
+    }
+
+    def "!=="
+	precedence 79
+	left x
+	right y
+    {
+	x y "ldiaganglene"
+    }
+
+    def "<"
+	precedence 79
+	left x
+	right y
+    {
+	x y "lt"
+    }
+
+    def "<="
+	precedence 79
+	left x
+	right y
+    {
+	x y "le"
+    }
+
+    def ">"
+	precedence 79
+	left x
+	right y
+    {
+	x y "gt"
+    }
+
+    def ">="
+	precedence 79
+	left x
+	right y
+    {
+	x y "ge"
+    }
+
+    def not
+	precedence 78
+	right y
+    {
+	y "not"
+    }
+
+    def and
+	precedence 77
+	left x
+	right y
+    {
+	x y "and"
+    }
+
+    def xor
+	precedence 76
+	left x
+	right y
+    {
+	x y "xor"
+    }
+
+    def or
+	precedence 76
+	left x
+	right y
+    {
+	x y "or"
+    }
+
+    def ","
+	precedence 70
+	left x
+	right y
+    {
+	OOO ++ { OOX -- OOO }**x ++ { OOY -- OOO }**y
+    }
+
+    def ":="
+	precedence 20
+	left x
+	right y
+    {
+	"/"x "[" y "] cvx def"
+    }
+
+    def ":=="
+	precedence 20
+	left x
+	right y
+    {
+	"/"x "[" y "counttomark 2 add (assigning) exch ldiagdebugprint ] cvx def"
+    }
+
+    def "::"
+	precedence 20
+	left x
+	right y
+    {
+	y "/"x "ldiagpointdef"
+    }
+
+    def ":<"
+	precedence 20
+	left x
+	right y
+    {
+	y "/"x"@ANGLE ldiagangledef"
+    }
+
+    def if
+	named cond {}
+	named then {}
+	named else {}
+    {
+	cond "{" then "} {" else "} ifelse"
+    }
+
+    def quadcase
+	precedence 10
+	left angle
+	named "0"	{}
+	named "0-90"	{}
+	named "90"	{}
+	named "90-180"	{}
+	named "180"	{}
+	named "180-270"	{}
+	named "270"	{}
+	named "270-360"	{}
+    {
+	"{" 0-90 "} {" 270 "} {" 180 "} {" 90 "}"
+	"{" 0 "} {" 270-360 "} {" 180-270 "} {" 90-180 "}" angle "ldiagquadcase"
+    }
+
+    def signcase
+	precedence 10
+	left number
+	named neg {}
+	named zero {}
+	named pos {}
+    {
+	"{" neg "} {" zero "} {" pos "}" number "ldiagsigncase"
+    }
+
+    def xloop
+	named from { 0 }
+	named to { 0 }
+	named by { 1 }
+	named do named x { "xval" } {}
+    {
+	from by to "{ /xval exch def" do "} for"
+    }
+
+    def yloop
+	named from { 0 }
+	named to { 0 }
+	named by { 1 }
+	named do named y { "yval" } {}
+    {
+	from by to "{ /yval exch def" do "} for"
+    }
+
+    def zloop
+	named from { 0 }
+	named to { 0 }
+	named by { 1 }
+	named do named z { "zval" } {}
+    {
+	from by to "{ /zval exch def" do "} for"
+    }
+
+    def anydebug
+	right tag
+    {
+	"[" tag "counttomark ("tag") exch ldiagdebugprint cleartomark"
+    }
+
+    def aabout
+	named circum {}
+	named extra {}
+	named centre {}
+    {
+	"{" circum "} cvlit" extra "[" centre "] cvx ldiagaabout"
+	# ZXCTR	:= centre
+	# ZFCTR	:= circum??CTR
+	# ZAREF	:= ZFCTR angleto ZXCTR
+	# ZAMIN	:= 0d
+	# ZPMIN	:= circum boundaryatangle { ZAREF - ZAMIN }
+	# 		 ++ extra atangle { ZAREF - ZAMIN }
+	# ZAMAX	:= 90d
+	# ZPMAX	:= circum boundaryatangle { ZAREF - ZAMAX }
+	# 		 ++ extra atangle { ZAREF - ZAMAX }
+	# xloop from { 1 } to { 12 } by { 1 } do {
+	#   ZAMID	:= { ZAMIN + ZAMAX } * 0.5
+	#   ZPMID	:= circum boundaryatangle { ZAREF - ZAMID }
+	# 		 ++ extra atangle { ZAREF - ZAMID }
+	#   if cond { {ZPMID distance ZXCTR} > {ZFCTR distance ZXCTR} } then {
+	#     ZAMAX := ZAMID
+	#     ZPMAX := ZPMID
+	#   }
+	#   else {
+	#     ZAMIN := ZAMID
+	#     ZPMIN := ZPMID
+	#   }
+	# }
+	# ZPMID
+    }
+
+    def cabout
+	named circum {}
+	named extra {}
+	named centre {}
+    {
+       "{" circum "} cvlit" extra "[" centre "] cvx ldiagcabout"
+       # ZXCTR	:= centre
+       # ZFCTR	:= circum??CTR
+       # ZAREF	:= ZFCTR angleto ZXCTR
+       # ZAMIN	:= 0d
+       # ZPMIN	:= circum boundaryatangle { ZAREF + ZAMIN }
+       # 		 ++ extra atangle { ZAREF + ZAMIN }
+       # ZAMAX	:= 90d
+       # ZPMAX	:= circum boundaryatangle { ZAREF + ZAMAX }
+       # 		 ++ extra atangle { ZAREF + ZAMAX }
+       # xloop from { 1 } to { 12 } by { 1 } do {
+       #   ZAMID	:= { ZAMIN + ZAMAX } * 0.5
+       #   ZPMID	:= circum boundaryatangle { ZAREF + ZAMID }
+       # 		 ++ extra atangle { ZAREF + ZAMID }
+       #   if cond { {ZPMID distance ZXCTR} > {ZFCTR distance ZXCTR} } then {
+       #     ZAMAX := ZAMID
+       #     ZPMAX := ZPMID
+       #   }
+       #   else {
+       #     ZAMIN := ZAMID
+       #     ZPMIN := ZPMID
+       #   }
+       # }
+       # ZPMID
+    }
+}
diff --git a/include/diagf.lpg b/include/diagf.lpg
new file mode 100644
index 0000000..8b76f58
--- /dev/null
+++ b/include/diagf.lpg
@@ -0,0 +1,2706 @@
+%%BeginResource: procset LoutFigPrependGraphic
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                                    %
+%  PostScript @SysPrependGraphic file for @Diag Jeffrey H. Kingston  %
+%  Version 2.0 (includes CIRCUM label)                September 1996 %
+%                                                                    %
+%  To assist in avoiding name clashes, the names of all symbols      %
+%  defined here begin with "ldiag".  However, this is not feasible   %
+%  with user-defined labels and some labels used by users.           %
+%                                                                    %
+%  <point>      is two numbers, a point.                             %
+%  <length>     is one number, a length                              %
+%  <angle>      is one number, an angle in degrees                   %
+%  <dashlength> is one number, the preferred length of a dash        %
+%                                                                    %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+errordict begin
+   /handleerror
+   {
+      {  /Times-Roman findfont 8 pt scalefont setfont
+	 0 setgray 4 pt 4 pt moveto
+	 $error /errorname get
+	 dup ldiagdict exch known
+	 { ldiagdict exch get }
+	 { 50 string cvs } ifelse
+	 show
+	 (  Command: ) show
+	 $error /command get 50 string cvs show
+      } stopped {} if
+      showpage stop
+   } def
+end
+
+% begin diagram: <maxlabels> ldiagbegin -
+% must be defined outside ldiagdict since it loads it
+/ldiagbegin
+{ xsize 0 0 ysize ldiagdict begin
+  5 -1 roll /ldiagmaxlabels exch def
+  (@Diag) ldiagpushtagdict
+  /OOY ldiagpointdef /OOX ldiagpointdef 0 0 /OOO ldiagpointdef
+} def
+
+% end diagram: - ldiagend -
+/ldiagend
+{ ldiagpoptagdict end
+} def
+
+% concat strings: <string> <string> ldiagconcat <string>
+% must be defined outside ldiagdict since used in ldiagpromotelabels
+/ldiagconcat
+{ 2 copy length exch length add string
+  dup 0 4 index putinterval
+  dup 3 index length 3 index putinterval
+  3 1 roll pop pop
+} def
+
+/ldiagdebugposy 432 def
+/ldiagdebugposx 72 def
+
+% <string> <int> ldiagdebugprint -
+% must be defined outside ldiagdict since used in arbitrary places
+% print count or <int> stack entries, which ever is the smaller
+/ldiagdebugprint
+{
+  exch
+  gsave
+  initgraphics
+  ldiagdebugposy 72 lt
+  { /ldiagdebugposx ldiagdebugposx 144 add store
+    /ldiagdebugposy 432 store
+  }
+  {
+    /ldiagdebugposy ldiagdebugposy 12 sub store
+  } ifelse
+  ldiagdebugposx ldiagdebugposy moveto
+  /Times-Roman findfont 10 scalefont setfont
+  0 setgray show
+  count 1 sub 2 copy lt { pop } { exch pop } ifelse 1 sub
+  0 exch 1 exch
+  {
+    /ldiagdebugposy ldiagdebugposy 12 sub store
+    ldiagdebugposx 12 add ldiagdebugposy moveto
+    index 50 string cvs show
+  } for
+  grestore
+} def
+
+/ldiagdict 200 dict def
+ldiagdict begin
+
+% error messages
+/dictfull (dictfull error:  too many labels?) def
+/dictstackoverflow (dictstackoverflow error:  labels nested too deeply?) def
+/execstackoverflow (execstackoverflow error:  figure nested too deeply?) def
+/limitcheck (limitcheck error:  figure nested too deeply or too large?) def
+/syntaxerror (syntaxerror error:  syntax error in text of figure?) def
+/typecheck (typecheck error:  syntax error in text of figure?) def
+/undefined (undefined error:  unknown or misspelt label?) def
+/VMError (VMError error:  run out of memory?) def
+
+% push pi onto stack:  - ldiagpi <num>
+/ldiagpi 3.14159 def
+
+% push e onto stack:  - ldiage <num>
+/ldiage 2.71828 def
+
+% arc directions
+/clockwise     false def
+/anticlockwise true  def
+
+% test equality between two angles:  <angle> <angle> ldiagangleeq <bool>
+/ldiagangleeq { ldiagfixangle exch ldiagfixangle eq } def
+
+% test inequality between two angles:  <angle> <angle> ldiaganglene <bool>
+/ldiaganglene { ldiagangleeq not } def
+
+% maximum of two numbers:  <num> <num> ldiagmax <num>
+/ldiagmax { 2 copy gt { pop } { exch pop } ifelse } def
+
+% minimum of two numbers:  <num> <num> ldiagmin <num>
+/ldiagmin { 2 copy lt { pop } { exch pop } ifelse } def
+
+% add two points:  <point> <point> ldiagpadd <point>
+/ldiagpadd
+{
+  % (Entering padd) 4 ldiagdebugprint
+  exch 3 1 roll add 3 1 roll add exch
+  % (Leaving padd) 2 ldiagdebugprint
+} def
+
+% subtract first point from second:  <point> <point> ldiagpsub <point>
+/ldiagpsub { 3 2 roll sub 3 1 roll exch sub exch } def
+
+% max two points:  <point> <point> ldiagpmax <point>
+/ldiagpmax { exch 3 1 roll ldiagmax 3 1 roll ldiagmax exch } def
+
+% min two points:  <point> <point> ldiagpmin <point>
+/ldiagpmin { exch 3 1 roll ldiagmin 3 1 roll ldiagmin exch } def
+
+% scalar multiplication: <point> <num> ldiagpmul <point>
+/ldiagpmul { dup 3 1 roll mul 3 1 roll mul exch } def
+
+% point at angle and distance:  <point> <length> <angle> ldiagatangle <point>
+/ldiagatangle { 2 copy cos mul 3 1 roll sin mul ldiagpadd } def
+
+% angle from one point to another:  <point> <point> ldiagangleto <angle>
+/ldiagangleto { ldiagpsub 2 copy 0 eq exch 0 eq and {pop} {exch atan} ifelse } def
+
+% distance between two points:  <point> <point> ldiagdistance <length>
+/ldiagdistance { ldiagpsub dup mul exch dup mul add sqrt } def
+
+% stroke a solid line:  <length> <dashlength> ldiagsolid -
+/ldiagsolid
+{  pop pop [] 0 setdash 1 setlinecap stroke
+} def
+
+% stroke a dashed line:   <length> <dashlength> ldiagdashed -
+/ldiagdashed
+{  2 copy div 2 le 1 index 0 le or
+   {  exch pop 1 pt ldiagmax [ exch dup ] 0 setdash }
+   {  dup [ exch 4 2 roll 2 copy div
+      1 sub 2 div ceiling dup 4 1 roll
+      1 add mul sub exch div ] 0 setdash
+   } ifelse 0 setlinecap stroke
+} def
+
+% stroke a cdashed line:  <length> <dashlength> ldiagcdashed -
+/ldiagcdashed
+{  % (Entering ldiagcdashed) 2 ldiagdebugprint
+   2 copy le 1 index 0 le or
+   { exch pop 1 pt ldiagmax [ exch dup ] dup 0 get 2 div setdash }
+   { dup [ 4 2 roll exch 2 copy exch div
+     2 div ceiling div 1 index sub
+     ] exch 2 div setdash
+   } ifelse 0 setlinecap stroke
+   % (Leaving ldiagcdashed) 0 ldiagdebugprint
+} def
+
+% stroke a dotted line:  <length> <dashlength> ldiagdotted -
+/ldiagdotted
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt ldiagmax [ exch 0 exch ] 0 setdash }
+   { 1 index exch div ceiling div
+     [ 0 3 2 roll ] 0 setdash
+   } ifelse 1 setlinecap stroke
+} def
+
+% stroke a noline line:  <length> <dashlength> ldiagnoline -
+/ldiagnoline
+{ pop pop
+} def
+
+% painting (i.e. filling): - ldiagwhite - (etc.)
+/ldiagnopaint		{			       } def
+/ldiagnochange		{ 			  fill } def
+/ldiagdarkblue		{ 0.0 0.0 0.5 setrgbcolor fill } def
+/ldiagblue		{ 0.0 0.0 1.0 setrgbcolor fill } def
+/ldiaglightblue		{ 0.5 0.5 1.0 setrgbcolor fill } def
+/ldiagdarkgreen		{ 0.0 0.5 0.0 setrgbcolor fill } def
+/ldiaggreen		{ 0.0 1.0 0.0 setrgbcolor fill } def
+/ldiaglightgreen	{ 0.5 1.0 0.5 setrgbcolor fill } def
+/ldiagdarkred		{ 0.5 0.0 0.0 setrgbcolor fill } def
+/ldiagred		{ 1.0 0.0 0.0 setrgbcolor fill } def
+/ldiaglightred		{ 1.0 0.5 0.5 setrgbcolor fill } def
+/ldiagdarkcyan		{ 0.0 0.5 0.5 setrgbcolor fill } def
+/ldiagcyan		{ 0.0 1.0 1.0 setrgbcolor fill } def
+/ldiaglightcyan		{ 0.5 1.0 1.0 setrgbcolor fill } def
+/ldiagdarkmagenta	{ 0.5 0.0 0.5 setrgbcolor fill } def
+/ldiagmagenta		{ 1.0 0.0 1.0 setrgbcolor fill } def
+/ldiaglightmagenta	{ 1.0 0.5 1.0 setrgbcolor fill } def
+/ldiagdarkyellow	{ 0.5 0.5 0.0 setrgbcolor fill } def
+/ldiagyellow		{ 1.0 1.0 0.0 setrgbcolor fill } def
+/ldiaglightyellow	{ 1.0 1.0 0.5 setrgbcolor fill } def
+/ldiagdarkgray		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/ldiaggray		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/ldiaglightgray		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/ldiagdarkgrey		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/ldiaggrey		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/ldiaglightgrey		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/ldiagblack		{ 0.0 0.0 0.0 setrgbcolor fill } def
+/ldiagwhite		{ 1.0 1.0 1.0 setrgbcolor fill } def
+
+% shape and labels of the @Box symbol
+/ldiagbox
+{
+   0     0         /SW  ldiagpointdef
+   xsize 0         /SE  ldiagpointdef
+   xsize ysize     /NE  ldiagpointdef
+   0     ysize     /NW  ldiagpointdef
+   SE 0.5 ldiagpmul /S   ldiagpointdef
+   NW 0.5 ldiagpmul /W   ldiagpointdef
+   W SE ldiagpadd   /E   ldiagpointdef
+   S NW ldiagpadd   /N   ldiagpointdef
+   NE 0.5 ldiagpmul /CTR ldiagpointdef
+
+     0 dg /S@ANGLE  ldiagangledef
+    45 dg /SE@ANGLE ldiagangledef
+    90 dg /E@ANGLE  ldiagangledef
+   135 dg /NE@ANGLE ldiagangledef
+   180 dg /N@ANGLE  ldiagangledef
+   225 dg /NW@ANGLE ldiagangledef
+   270 dg /W@ANGLE  ldiagangledef
+   315 dg /SW@ANGLE ldiagangledef
+
+   [ CTR NE ldiagpsub /ldiagboxcircum cvx ] ldiagcircumdef
+   SW SE NE NW SW
+} def
+
+% shape and labels of the @CurveBox symbol
+% <margin> ldiagcurvebox <shape>
+/ldiagcurvebox
+{  
+
+   % (Entering ldiagcurvebox) 1 ldiagdebugprint
+   ldiagdecodelength /cbmgn exch def
+
+   xsize 0.5 mul	ysize 0.5 mul	/CTR ldiagpointdef
+   xsize 0.5 mul	0		/S   ldiagpointdef
+   xsize		ysize 0.5 mul	/E   ldiagpointdef
+   xsize 0.5 mul	ysize		/N   ldiagpointdef
+   0			ysize 0.5 mul	/W   ldiagpointdef
+
+   cbmgn 0.293 mul		cbmgn 0.293 mul		  /SW  ldiagpointdef
+   xsize cbmgn 0.293 mul sub	cbmgn 0.293 mul		  /SE  ldiagpointdef
+   xsize cbmgn 0.293 mul sub	ysize cbmgn 0.293 mul sub /NE  ldiagpointdef
+   cbmgn 0.293 mul		ysize cbmgn 0.293 mul sub /NW  ldiagpointdef
+
+     0 dg /S@ANGLE  ldiagangledef
+    45 dg /SE@ANGLE ldiagangledef
+    90 dg /E@ANGLE  ldiagangledef
+   135 dg /NE@ANGLE ldiagangledef
+   180 dg /N@ANGLE  ldiagangledef
+   225 dg /NW@ANGLE ldiagangledef
+   270 dg /W@ANGLE  ldiagangledef
+   315 dg /SW@ANGLE ldiagangledef
+
+   [ xsize ysize 0.5 ldiagpmul cbmgn /ldiagcurveboxcircum cvx ] ldiagcircumdef
+
+   cbmgn		0
+   xsize cbmgn sub	0
+   [ xsize cbmgn sub	cbmgn		]
+   xsize		cbmgn
+   xsize		ysize cbmgn sub
+   [ xsize cbmgn sub	ysize cbmgn sub	]
+   xsize cbmgn sub	ysize
+   cbmgn		ysize
+   [ cbmgn		ysize cbmgn sub	]
+   0			ysize cbmgn sub
+   0			cbmgn
+   [ cbmgn		cbmgn		]
+   cbmgn		0
+
+   % (Leaving ldiagcurvebox) 0 ldiagdebugprint
+} def
+
+% shadow of the @ShadowBox symbol
+% its shape and labels are done, somewhat inaccurately, with ldiagbox
+% <shadowmargin> ldiagshadow -
+/ldiagshadow
+{ 
+  /lfshm exch def
+  
+  lfshm 0 moveto
+  0 lfshm neg rlineto
+  xsize 0 rlineto
+  0 ysize rlineto
+  lfshm neg 0 rlineto
+  xsize 0 lineto
+  closepath fill
+
+} def
+
+% shape and labels of the @Square symbol
+/ldiagsquare
+{
+   xsize ysize 0.5 ldiagpmul /CTR ldiagpointdef
+   CTR xsize xsize ysize ysize ldiagpmax 0.5 ldiagpmul ldiagpadd /NE ldiagpointdef
+   CTR 0 0 CTR NE ldiagdistance 135 ldiagatangle ldiagpadd /NW ldiagpointdef
+   CTR 0 0 CTR NE ldiagdistance 225 ldiagatangle ldiagpadd /SW ldiagpointdef
+   CTR 0 0 CTR NE ldiagdistance 315 ldiagatangle ldiagpadd /SE ldiagpointdef
+   SW 0.5 ldiagpmul SE 0.5 ldiagpmul ldiagpadd /S ldiagpointdef
+   NW 0.5 ldiagpmul NE 0.5 ldiagpmul ldiagpadd /N ldiagpointdef
+   SW 0.5 ldiagpmul NW 0.5 ldiagpmul ldiagpadd /W ldiagpointdef
+   SE 0.5 ldiagpmul NE 0.5 ldiagpmul ldiagpadd /E ldiagpointdef
+
+     0 dg /S@ANGLE  ldiagangledef
+    45 dg /SE@ANGLE ldiagangledef
+    90 dg /E@ANGLE  ldiagangledef
+   135 dg /NE@ANGLE ldiagangledef
+   180 dg /N@ANGLE  ldiagangledef
+   225 dg /NW@ANGLE ldiagangledef
+   270 dg /W@ANGLE  ldiagangledef
+   315 dg /SW@ANGLE ldiagangledef
+
+   [ CTR NE ldiagpsub /ldiagboxcircum cvx ] ldiagcircumdef
+   SW SE NE NW SW
+} def
+
+% shape and labels of the @Diamond symbol
+/ldiagdiamond
+{
+   xsize 0 0.5 ldiagpmul /S   ldiagpointdef
+   0 ysize 0.5 ldiagpmul /W   ldiagpointdef
+   S W         ldiagpadd /CTR ldiagpointdef
+   CTR W       ldiagpadd /N   ldiagpointdef
+   CTR S       ldiagpadd /E   ldiagpointdef
+   E N ldiagpadd 0.5 ldiagpmul /NE ldiagpointdef
+   N W ldiagpadd 0.5 ldiagpmul /NW ldiagpointdef
+   S W ldiagpadd 0.5 ldiagpmul /SW ldiagpointdef
+   S E ldiagpadd 0.5 ldiagpmul /SE ldiagpointdef
+
+     0 dg        /S@ANGLE  ldiagangledef
+    90 dg        /E@ANGLE  ldiagangledef
+   180 dg        /N@ANGLE  ldiagangledef
+   270 dg        /W@ANGLE  ldiagangledef
+   S E ldiagangleto /SE@ANGLE ldiagangledef
+   E N ldiagangleto /NE@ANGLE ldiagangledef
+   N W ldiagangleto /NW@ANGLE ldiagangledef
+   W S ldiagangleto /SW@ANGLE ldiagangledef
+
+   [ xsize ysize 0.5 ldiagpmul /ldiagdiamondcircum cvx ] ldiagcircumdef
+   S E N W S
+} def
+
+% shape and labels of the @Ellipse symbol
+/ldiagellipse
+{
+   xsize 0 0.5 ldiagpmul /S   ldiagpointdef
+   0 ysize 0.5 ldiagpmul /W   ldiagpointdef
+   S W         ldiagpadd /CTR ldiagpointdef
+   CTR W       ldiagpadd /N   ldiagpointdef
+   CTR S       ldiagpadd /E   ldiagpointdef
+   CTR xsize 0 0.3536 ldiagpmul ldiagpadd 0 ysize 0.3536 ldiagpmul ldiagpadd /NE ldiagpointdef
+   0 ysize 0.3536 ldiagpmul CTR xsize 0 0.3536 ldiagpmul ldiagpadd ldiagpsub /SE ldiagpointdef
+   xsize 0 0.3536 ldiagpmul CTR ldiagpsub 0 ysize 0.3536 ldiagpmul ldiagpadd /NW ldiagpointdef
+   0 ysize 0.3536 ldiagpmul xsize 0 0.3536 ldiagpmul CTR ldiagpsub ldiagpsub /SW ldiagpointdef
+   [ xsize ysize 0.5 ldiagpmul /ldiagellipsecircum cvx ] ldiagcircumdef
+
+     0 dg /S@ANGLE  ldiagangledef
+    90 dg /E@ANGLE  ldiagangledef
+   180 dg /N@ANGLE  ldiagangledef
+   270 dg /W@ANGLE  ldiagangledef
+
+   S E ldiagangleto /SE@ANGLE ldiagangledef
+   E N ldiagangleto /NE@ANGLE ldiagangledef
+   N W ldiagangleto /NW@ANGLE ldiagangledef
+   W S ldiagangleto /SW@ANGLE ldiagangledef
+
+   S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+} def
+
+% shape and labels of the @Circle symbol
+/ldiagcircle
+{
+   xsize ysize 0.5 ldiagpmul /CTR ldiagpointdef
+   CTR xsize 0 ysize 0 ldiagpmax 0.5 ldiagpmul ldiagpadd /E ldiagpointdef
+   CTR 0 0 CTR E ldiagdistance 45 ldiagatangle ldiagpadd /NE ldiagpointdef
+   CTR 0 0 CTR E ldiagdistance 90 ldiagatangle ldiagpadd /N ldiagpointdef
+   CTR 0 0 CTR E ldiagdistance 135 ldiagatangle ldiagpadd /NW ldiagpointdef
+   CTR 0 0 CTR E ldiagdistance 180 ldiagatangle ldiagpadd /W ldiagpointdef
+   CTR 0 0 CTR E ldiagdistance 225 ldiagatangle ldiagpadd /SW ldiagpointdef
+   CTR 0 0 CTR E ldiagdistance 270 ldiagatangle ldiagpadd /S ldiagpointdef
+   CTR 0 0 CTR E ldiagdistance 315 ldiagatangle ldiagpadd /SE ldiagpointdef
+   [ S E ldiagpsub /ldiagellipsecircum cvx ] ldiagcircumdef
+
+     0 dg /S@ANGLE  ldiagangledef
+    45 dg /SE@ANGLE ldiagangledef
+    90 dg /E@ANGLE  ldiagangledef
+   135 dg /NE@ANGLE ldiagangledef
+   180 dg /N@ANGLE  ldiagangledef
+   225 dg /NW@ANGLE ldiagangledef
+   270 dg /W@ANGLE  ldiagangledef
+   315 dg /SW@ANGLE ldiagangledef
+
+   S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+} def
+
+% shape and labels of the @VLine and @VArrow symbols
+/ldiagvline
+{
+   xmark ysize ldiagprevious /FROM ldiagpointdef
+   xmark 0 ldiagprevious /TO ldiagpointdef
+} def
+
+% points of a polygon around base with given no of sides, vert init angle:
+% <sides> <angle> ldiagpolygon <point> ... <point>
+/ldiagpolygon
+{  exch round cvi exch
+   xsize ysize 0.5 ldiagpmul /CTR ldiagpointdef
+   90 sub CTR 2 copy ldiagmax 5 3 roll
+   [ 4 copy pop /ldiagpolycircum cvx ] ldiagcircumdef
+   exch dup 360 exch div exch
+   1 1  3 2 roll
+   {  4 string cvs (P) exch ldiagconcat
+      3 copy exch pop (@ANGLE) ldiagconcat cvn exch 90 add exch ldiagangledef
+      cvn 6 copy pop pop ldiagatangle 2 copy 10 2 roll
+      3 2 roll ldiagpointdef
+      dup 3 1 roll add exch
+   }  for
+   pop ldiagatangle
+} def
+
+% shape and labels of the @Isosceles triangle symbol
+/ldiagisosceles
+{
+   xsize ysize 0.5 ldiagpmul /CTR ldiagpointdef
+   0     0                   /SW  ldiagpointdef
+   xsize 0                   /SE  ldiagpointdef
+   xsize 0.5 mul ysize       /N   ldiagpointdef
+   xsize 0.5 mul 0           /S   ldiagpointdef
+   SE 0.5 ldiagpmul N 0.5 ldiagpmul ldiagpadd /NE ldiagpointdef
+   SW 0.5 ldiagpmul N 0.5 ldiagpmul ldiagpadd /NW ldiagpointdef
+
+   [ xsize ysize /ldiagisoscelescircum cvx ] ldiagcircumdef
+
+     0 dg              /SW@ANGLE ldiagangledef
+     0 dg              /SE@ANGLE ldiagangledef
+   180 dg              /N@ANGLE  ldiagangledef
+     0 dg              /S@ANGLE  ldiagangledef
+     SE N ldiagangleto /NE@ANGLE ldiagangledef
+     N SW ldiagangleto /NW@ANGLE ldiagangledef
+
+   SW SE N SW
+} def
+
+% next array element:  <array> <index> ldiaggetnext <array> <index> <any> true
+%                                               or <array> <index> false
+/ldiaggetnext
+{  2 copy exch length ge
+   { false }
+   { 2 copy get exch 1 add exch true } ifelse
+} def
+
+% check whether thing is number:  <any> ldiagisnumbertype <any> <bool>
+/ldiagisnumbertype
+{  dup type dup
+   /integertype eq exch /realtype eq or
+} def
+
+% check whether thing is an array:  <any> ldiagisarraytype <any> <bool>
+/ldiagisarraytype { dup type /arraytype eq } def
+
+% check whether thing is an array:  <any> ldiagisnametype <any> <bool>
+/ldiagisnametype { dup type /nametype eq } def
+
+% get next item:  <array> <index> ldiaggetnextitem <array> <index> 0
+%                                              or <array> <index> <array> 1
+%                                              or <array> <index> <point> 2
+/ldiaggetnextitem
+{   ldiaggetnext
+    {	ldiagisarraytype
+	{   1
+	}
+	{   ldiagisnumbertype
+	    {	3 1 roll
+		ldiaggetnext
+		{   ldiagisnumbertype
+		    {	4 3 roll exch  2
+		    }
+		    {	pop 3 2 roll pop  0
+		    } ifelse
+		}
+		{   3 2 roll pop  0
+		} ifelse
+	    }
+	    {	pop 0
+	    } ifelse
+	} ifelse
+    }
+    {	0
+    } ifelse
+} def
+
+% approximate equality: num1 num2  approxeq  <boolean>
+/approxeq
+{ dup 0 eq
+  { pop 0 eq
+  }
+  { dup 3 1 roll sub exch div abs 0.001 lt
+  } ifelse
+} def
+
+% set arc path:  bool x1 y1  x2 y2  x0 y0  ldiagsetarc  <angle> <angle> <dist>
+% the path goes from x1 y1 to x2 y2 about centre x0 y0,
+% anticlockwise if bool is true else clockwise.
+% The orientations of backwards pointing and forwards pointing
+% arrowheads are returned in the two angles, and
+% the length of the arc is returned in <dist>.
+/ldiagsetarc
+{
+  % (Entering ldiagsetarc) 7 ldiagdebugprint
+  20 dict begin
+     matrix currentmatrix 8 1 roll
+     2 copy translate 2 copy 8 2 roll
+     4 2 roll ldiagpsub 6 2 roll ldiagpsub
+     dup /y1 exch def dup mul /y1s exch def
+     dup /x1 exch def dup mul /x1s exch def
+     dup /y2 exch def dup mul /y2s exch def
+     dup /x2 exch def dup mul /x2s exch def
+     /dist1 0 0 x1 y1 ldiagdistance def
+     /dist2 0 0 x2 y2 ldiagdistance def
+
+     y1s y2s approxeq
+     {	-1
+     }
+     {	y1s x2s mul y2s x1s mul sub y1s y2s sub div
+     } ifelse
+     /da exch def
+
+     x1s x2s approxeq
+     {	-1
+     }
+     {	x1s y2s mul x2s y1s mul sub x1s x2s sub div
+     } ifelse
+     /db exch def
+
+     da 0 gt db 0 gt and
+     {
+	% (  case 1, ellipse) 0 ldiagdebugprint
+	/LMax da sqrt db sqrt ldiagmax def
+	/scalex da sqrt LMax div def
+	/scaley db sqrt LMax div def
+	scalex scaley scale
+	0 0 LMax
+	0 0 x1 scalex mul y1 scaley mul ldiagangleto
+	0 0 x2 scalex mul y2 scaley mul ldiagangleto
+	2 copy eq { 360 add } if
+	2 copy 8 2 roll
+	5 index { arc } { arcn } ifelse
+	2 index 1 index
+	{ 90 sub } { 90 add } ifelse
+	dup sin scaley mul exch cos scalex mul atan
+	2 index 2 index
+	{ 90 add } { 90 sub } ifelse
+	dup sin scaley mul exch cos scalex mul atan
+	5 2 roll  % res1 res2 ang1 ang2 anticlockwise
+	{ exch sub } { sub } ifelse
+	dup 0 le { 360 add } if  ldiagpi mul LMax mul 180 div
+     }
+     {
+	dist1 dist2 approxeq
+	% x1 y1 dist1 (  x1 y1, d) 3 ldiagdebugprint pop pop pop
+	% x2 y2 dist2 (  x2 y2, d) 3 ldiagdebugprint pop pop pop
+	{
+		% (  case 2, circle) 0 ldiagdebugprint
+		0 0
+		dist1
+		0 0 x1 y1 ldiagangleto
+		0 0 x2 y2 ldiagangleto
+		2 copy eq { 360 add } if
+		2 copy 8 2 roll
+		5 index { arc } { arcn } ifelse
+		2 index 1 index
+		{ 90 sub } { 90 add } ifelse
+		2 index 2 index
+		{ 90 add } { 90 sub } ifelse
+		5 2 roll % res1 res2 ang1 ang2 clockwise
+		{ exch sub } { sub } ifelse
+		dup 0 le { 360 add } if
+		ldiagpi mul dist1 mul 180 div
+	}
+	{
+		% (  case 3, line) 0 ldiagdebugprint
+		x2 y2 lineto pop
+		x2 y2 x1 y1 ldiagangleto
+		x1 y1 x2 y2 ldiagangleto
+		x1 y1 x2 y2 ldiagdistance
+	} ifelse
+     } ifelse
+     4 -1 roll setmatrix
+     end
+  % (Leaving ldiagsetarc) 3 ldiagdebugprint
+} def
+
+% ldiagsetcurve: set up a Bezier curve from x0 y0 to x3 y3
+% and return arrowhead angles and length of curve (actually 0)
+% x0 y0 x1 y1 x2 y2 x3 y3 ldiagsetcurve <angle> <angle> <length>
+/ldiagsetcurve
+{ 8 copy curveto pop pop
+  ldiagangleto
+  5 1 roll
+  4 2 roll ldiagangleto
+  exch
+  0
+} def
+
+% ldiagsetpath: convert a Diag path into a PostScript path
+% [ shape ] ldiagsetpath 
+/ldiagsetpath
+{
+  10 dict begin
+    0 newpath
+    /prevseen false def
+    /curveseen false def
+    { ldiaggetnextitem
+      dup 0 eq { pop exit }
+      { 1 eq
+        { /curveseen true def
+	  /curve exch def
+	  curve length 0 eq { /curveseen false def } if
+        }
+        { /ycurr exch def
+	  /xcurr exch def
+	  prevseen
+	  { curveseen
+	    { curve length 4 eq
+	      { xprev yprev
+		curve 0 get curve 1 get
+		curve 2 get curve 3 get
+		xcurr ycurr
+		ldiagsetcurve pop pop pop
+	      }
+	      { xprev yprev xcurr ycurr
+	        curve length 1 ge { curve 0 get } { 0 } ifelse
+	        curve length 2 ge { curve 1 get } { 0 } ifelse
+	        curve length 3 ge { curve 2 get } { true } ifelse
+	        7 1 roll
+	        ldiagsetarc pop pop pop
+	      } ifelse
+	    }
+	    { xcurr ycurr lineto
+	    } ifelse
+	  }
+	  { xcurr ycurr moveto
+	  } ifelse
+	  /xprev xcurr def
+	  /yprev ycurr def
+	  /prevseen true def
+	  /curveseen false def
+        } ifelse
+      } ifelse
+    } loop pop pop
+  end
+} def
+
+% ldiagpaintpath: paint a path of the given shape
+% /paint [ shape ] ldiagpaintpath -
+/ldiagpaintpath
+{
+  ldiagsetpath cvx exec
+} def
+
+% stroke a path of the given shape in the given linestyle and dash length.
+% Return the origin and angle of the backward and forward arrow heads.
+% dashlength /linestyle [shape] ldiagdopath  [<point> <angle>] [<point> <angle>] 
+/ldiagdopath
+{
+  10 dict begin
+    0
+    /prevseen  false def
+    /curveseen false def
+    /backarrow []    def
+    /fwdarrow  []    def
+    {
+	ldiaggetnextitem
+	dup 0 eq { pop exit }
+	{
+	    1 eq
+	    {	/curveseen true def
+		/curve exch def
+		curve length 0 eq { /prevseen false def } if
+	    }
+	    {	/ycurr exch def
+		/xcurr exch def
+		prevseen
+		{   newpath xprev yprev moveto
+		    curveseen
+		    {	curve length 4 eq
+			{   xprev yprev
+			    curve 0 get curve 1 get
+			    curve 2 get curve 3 get
+			    xcurr ycurr ldiagsetcurve
+			}
+			{   xprev yprev xcurr ycurr
+			    curve length 1 ge { curve 0 get } { 0 } ifelse
+			    curve length 2 ge { curve 1 get } { 0 } ifelse
+			    curve length 3 ge { curve 2 get } { true } ifelse
+			    7 1 roll
+			    ldiagsetarc
+			} ifelse
+		    }
+		    {	xcurr ycurr lineto
+			xcurr ycurr xprev yprev ldiagangleto dup 180 sub
+			xprev yprev xcurr ycurr ldiagdistance
+		    } ifelse
+		    6 index 6 index cvx exec
+		    [ xprev yprev 5 -1 roll ]
+		    backarrow length 0 eq
+		    { /backarrow exch def }
+		    { pop } ifelse
+		    [ xcurr ycurr 4 -1 roll ] /fwdarrow exch def
+		} if
+		/xprev xcurr def
+		/yprev ycurr def
+		/prevseen true def
+		/curveseen false def
+	    } ifelse
+	} ifelse
+    } loop
+    pop pop pop pop
+    backarrow length 0 eq { [ 0 0 0 ] } { backarrow } ifelse
+    fwdarrow  length 0 eq { [ 0 0 0 ] } { fwdarrow  } ifelse
+  end
+} def
+
+
+% stroke a path of the given shape in the given linestyle and dash length.
+% dashlength [ /linestyle ] [shape] ldiagdosegpath  -
+/ldiagdosegpath
+{
+  12 dict begin
+    1 index /seg exch def
+    1 index length /seglength exch def
+    0 /segcount exch def
+    0
+    /prevseen  false def
+    /curveseen false def
+    /backarrow []    def
+    /fwdarrow  []    def
+    {
+	ldiaggetnextitem
+	dup 0 eq { pop exit }
+	{
+	    1 eq
+	    {	/curveseen true def
+		/curve exch def
+		curve length 0 eq { /prevseen false def } if
+	    }
+	    {	/ycurr exch def
+		/xcurr exch def
+		prevseen
+		{   newpath xprev yprev moveto
+		    curveseen
+		    {	curve length 4 eq
+			{   xprev yprev
+			    curve 0 get curve 1 get
+			    curve 2 get curve 3 get
+			    xcurr ycurr ldiagsetcurve
+			}
+			{   xprev yprev xcurr ycurr
+			    curve length 1 ge { curve 0 get } { 0 } ifelse
+			    curve length 2 ge { curve 1 get } { 0 } ifelse
+			    curve length 3 ge { curve 2 get } { true } ifelse
+			    7 1 roll
+			    ldiagsetarc
+			} ifelse
+		    }
+		    {	xcurr ycurr lineto
+			xcurr ycurr xprev yprev ldiagangleto dup 180 sub
+			xprev yprev xcurr ycurr ldiagdistance
+		    } ifelse
+		    6 index seg segcount seglength mod get cvx exec
+		    /segcount segcount 1 add def
+		    [ xprev yprev 5 -1 roll ]
+		    backarrow length 0 eq
+		    { /backarrow exch def }
+		    { pop } ifelse
+		    [ xcurr ycurr 4 -1 roll ] /fwdarrow exch def
+		} if
+		/xprev xcurr def
+		/yprev ycurr def
+		/prevseen true def
+		/curveseen false def
+	    } ifelse
+	} ifelse
+    } loop
+    pop pop pop pop
+  end
+} def
+
+% ldiagnodebegin: start of node parameters
+% ldiagnodebegin -
+/ldiagnodebegin
+{ % (Entering ldiagnodebegin) 0 ldiagdebugprint
+  ldiagmaxlabels dict begin 
+} def
+
+% ldiagnodeend: end of node parameters (so do the node)
+% <outline> <dashlength> <style> <linewidth> <paint> ldiagnodeend -
+/ldiagnodeend
+{
+  % (Entering ldiagnodeend) 0 ldiagdebugprint
+  end % matches begin in ldiagnodebegin
+  4 index gsave ldiagpaintpath grestore
+  3 index ldiagsetpath clip newpath
+  2 mul setlinewidth
+  3 -1 roll ldiagdosegpath
+  % (Leaving ldiagnodeend) 0 ldiagdebugprint
+} def
+
+% ldiaglinkbegin: start of link parameters
+% <direct> ldiaglinkbegin -
+/ldiaglinkbegin
+{ ldiagmaxlabels dict begin 
+  1 eq /direct exch def
+} def
+
+% ldiaglinkend: end of link parameters (so do the link)
+% <outline> <dashlength> <style> <linewidth> ldiaglinkend -
+/ldiaglinkend
+{
+  end % matches begin in ldiaglinkbegin
+  setlinewidth
+  3 -1 roll ldiagdosegpath
+} def
+
+% ldiagdoarrow: draw an arrow head of given form
+% dashlength /lstyle /pstyle hfrac height width [ <point> <angle> ] ldiagdoarrow -
+/ldiagdoarrow
+{  matrix currentmatrix 8 1 roll
+   dup 0 get 1 index 1 get translate
+   2 get rotate
+   [ 2 index neg 2 index 0 0
+     3 index 3 index neg
+     1 index 10 index mul 0
+     7 index 7 index ]
+   4 1 roll pop pop pop
+   dup 3 1 roll
+   gsave ldiagpaintpath grestore ldiagdopath pop pop
+   setmatrix
+} def
+
+% arrow head styles
+/ldiagopen     0.0 def
+/ldiaghalfopen 0.5 def
+/ldiagclosed   1.0 def
+
+% stroke no arrows, forward, back, and both
+/ldiagnoarrow { pop pop pop pop pop pop pop pop                        } def
+/ldiagforward { 7 -1 roll ldiagdoarrow pop                              } def
+/ldiagback    { 8 -2 roll pop ldiagdoarrow                              } def
+/ldiagboth    { 8 -1 roll 7 copy ldiagdoarrow pop 7 -1 roll ldiagdoarrow } def
+
+% ldiagprevious: return previous point on path
+/ldiagprevious
+{ ldiagisnumbertype
+  { 2 copy }
+  { ldiagisarraytype
+    { 2 index 2 index }
+    { 0 0 }
+    ifelse
+  } ifelse
+} def
+
+% Tag dictionary operators
+%
+% Diag's tag dictionaries are kept on the same stack as other dictionaries,
+% since there is nowhere else to put them.  However, they are managed like
+% a separate stack using the following operators:
+%
+%  <tag>  ldiagpushtagdict  -      Push a new, empty tag dictionary
+%         ldiagtoptagdict   dict   Find the top tag dictionary
+%         ldiagpoptagdict   -      Pop and destroy the top tag dictionary
+%         ldiagpopuptagdict -      Pop top tag dict and promote its entries
+%         ldiagdebugtagdict -      Debug print of dictionary stack
+%
+% They are distinguished from other dictionaries by containing /ldiagtagdict,
+% whose value is the <tag> which is used by ldiagpopuptagdict,
+% and they are hopefully never the target of any non-tag definition because
+% they are never the top dictionary, since push places the new dict second.
+
+/ldiagpushtagdict
+{ ldiagmaxlabels dict dup
+  currentdict end exch begin begin
+  exch /ldiagtagdict exch put
+} def
+
+/ldiagtoptagdict
+{ /ldiagtagdict where not
+  { (Diag internal error: no tag dictionary) show stop
+  } if
+} def
+
+/ldiagpoptagdict
+{
+  % (Entering poptagdict) 0 ldiagdebugprint
+  % ldiagdebugtagdict
+  mark
+  { currentdict end
+    dup /ldiagtagdict known
+    { exit
+    } if
+  } loop
+  pop
+  counttomark
+  { begin
+  } repeat
+  pop
+  % (Leaving poptagdict) 0 ldiagdebugprint
+  % ldiagdebugtagdict
+} def
+
+% promote labels from top tag dictionary to second top tag dictionary
+% each prefixed by <string>@ if <string> (value of /ldiagtagdict) is not empty
+% - ldiagpopuptagdict -
+/ldiagpopuptagdict
+{
+  ldiagtagdict
+  % (Entering ldiagpopuptagdict) 1 ldiagdebugprint
+  % ldiagdebugtagdict
+  ldiagtoptagdict ldiagpoptagdict ldiagtoptagdict exch
+  { exch 50 string cvs 3 index
+    dup length 0 ne
+    { (@) ldiagconcat
+    } if
+    exch ldiagconcat cvn exch 2 index 3 1 roll put
+  } forall
+  pop pop
+  % (Leaving ldiagpopuptagdict) 0 ldiagdebugprint
+  % ldiagdebugtagdict
+} def
+
+% debug tag dictionary stack
+/ldiagdebugtagdict
+{ (Entering ldiagdebugtagdict) 0 ldiagdebugprint
+  30 array dictstack
+  { dup /ldiagtagdict known
+    { dup /ldiagtagdict get 0 ldiagdebugprint
+      { pop 50 string cvs (   ) exch ldiagconcat
+	dup 0 ldiagdebugprint
+	pop
+      }
+      forall
+    }
+    { pop (other) 0 ldiagdebugprint
+    } ifelse
+  } forall
+  (Leaving ldiagdebugtagdict) 0 ldiagdebugprint
+} def
+
+% label a point in top tag dictionary:  <point> /name ldiagpointdef -
+/ldiagpointdef
+{
+  % (Entering ldiagpointdef) 3 ldiagdebugprint
+  [ 4 2 roll transform /itransform cvx ] cvx
+  ldiagtoptagdict 3 1 roll put
+  % (Leaving ldiagpointdef) 0 ldiagdebugprint
+} def
+
+% label an angle in top tag dictionary:  <angle> /name ldiagangledef -
+/ldiagangledef
+{
+  % (Entering ldiagangledef) 2 ldiagdebugprint
+  exch ldiagfixangle ldiagtoptagdict 3 1 roll put
+  % (Leaving ldiagangledef) 0 ldiagdebugprint
+} def
+
+% add CIRCUM operator with this body:  <array> ldiagcircumdef -
+/ldiagcircumdef
+{   % (Entering ldiagcircumdef) 1 ldiagdebugprint
+    /CIRCUM exch cvx
+    ldiagtoptagdict 3 1 roll put
+    % currentdict end
+    % 3 1 roll
+    % def
+    % begin
+    % (Leaving ldiagcircumdef) 0 ldiagdebugprint
+} def
+
+% show points (except CIRCUM and ANGLE): - ldiagshowpoints -
+/ldiagshowpoints
+{
+  % (Entering ldiagshowpoints) 0 ldiagdebugprint
+  ldiagtoptagdict
+  { 1 index 50 string cvs
+    (ldiagdebugpos) search
+    { pop pop pop pop pop }
+    {
+      (CIRCUM) search % if CIRCUM in key
+      { pop pop pop pop pop }
+      { 
+        (ANGLE) search % if ANGLE in key
+        {
+          pop pop pop pop pop
+        }
+        {
+          (ldiagtagdict) search
+          {
+            pop pop pop pop pop
+          }
+          {
+	    pop cvx exec
+	    newpath 2.0 pt 0 360 arc 0 setgray fill pop
+          } ifelse
+        } ifelse
+      } ifelse
+    } ifelse
+  } forall
+  % (Leaving ldiagshowpoints) 0 ldiagdebugprint
+} def
+
+
+/ldiagshowtags
+{
+  % (Entering ldiagshowtags) 0 ldiagdebugprint
+  ldiagtoptagdict
+  { 1 index 50 string cvs
+    % dup 0 ldiagdebugprint
+    (ldiagdebugpos) search
+    { pop pop pop pop pop }
+    {
+      (CIRCUM) search % if CIRCUM in key
+      { pop pop pop pop pop }
+      { 
+        (ANGLE) search % if ANGLE in key
+        {
+          pop pop pop pop pop
+        }
+        {
+          (ldiagtagdict) search
+          {
+            pop pop pop pop pop
+          }
+          {
+	    pop cvx exec 2 copy
+	    gsave
+	    newpath 2.0 pt 0 360 arc 0 setgray fill
+            /Times-Roman findfont 8 pt scalefont setfont
+            translate 40 rotate 0.2 cm 0.1 cm moveto 20 string cvs show
+	    grestore
+          } ifelse
+        } ifelse
+      } ifelse
+    } ifelse
+  } forall
+  % (Leaving ldiagshowtags) 0 ldiagdebugprint
+} def
+
+
+% show angles: - ldiagshowangles -
+/ldiagshowangles
+{
+  % (Entering ldiagshowangles) 0 ldiagdebugprint
+  ldiagtoptagdict
+  { 1 index 20 string cvs
+    % dup 0 ldiagdebugprint
+    (ldiagdebugpos) search
+    { pop pop pop pop pop }
+    {
+      (ldiagtagdict) search
+      {
+        pop pop pop pop pop
+      }
+      {
+        (CIRCUM) search % if CIRCUM in key
+        { pop pop pop pop pop }
+        { 
+          (@ANGLE) search % if ANGLE in key, draw the angle at the point
+          {
+            % (showing ANGLE) 5 ldiagdebugprint
+            gsave exch pop exch pop cvx
+            % (about to execute) 1 ldiagdebugprint
+            exec translate rotate 0.8 0.8 scale pop
+            newpath 0 0 2.0 pt 0 360 arc 0 setgray fill
+            newpath 4 pt 0 moveto 9 pt 0 lineto
+            9 pt 1.5 pt lineto 11 pt 0 lineto 9 pt -1.5 pt lineto
+            9 pt 0 lineto [] 0 setdash 4 pt setlinewidth 0 setlinejoin
+	    stroke grestore
+            % (finished ANGLE) 5 ldiagdebugprint
+          }
+          {
+            % else must be a point, we aren't showing those
+            pop pop pop
+          } ifelse
+        } ifelse
+      } ifelse
+    } ifelse
+  } forall
+  % (Leaving ldiagshowangles) 0 ldiagdebugprint
+} def
+
+% fix an angle to 0 <= res < 360:  <angle> ldiagfixangle <angle>
+/ldiagfixangle
+{
+  % (Entering ldiagfixangle) 1 ldiagdebugprint
+  { dup 0 ge { exit } if
+    360 add
+  } loop
+  { dup 360 lt { exit } if
+    360 sub
+  } loop
+  % (Leaving ldiagfixangle) 1 ldiagdebugprint
+} def
+
+% find point on circumference of box:  alpha a b ldiagboxcircum x y
+/ldiagboxcircum
+{
+  % (Entering ldiagboxcircum) 3 ldiagdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    ldiagfixangle /alpha exch def
+    0 0 a b ldiagangleto /theta exch def
+
+    % if alpha <= theta, return (a, a*tan(alpha))
+    alpha theta le
+    { a  a alpha sin mul alpha cos div }
+    {
+      % else if alpha <= 180 - theta, return (b*cot(alpha), b)
+      alpha 180 theta sub le
+      { b alpha cos mul alpha sin div  b }
+      {
+        % else if alpha <= 180 + theta, return (-a, -a*tan(alpha))
+        alpha 180 theta add le
+        { a neg  a neg alpha sin mul alpha cos div }
+        {
+	  % else if alpha <= 360 - theta, return (-b*cot(alpha), -b)
+	  alpha 360 theta sub le
+          { b neg alpha cos mul alpha sin div  b neg }
+	  {
+	    % else 360 - theta <= alpha, return (a, a*tan(alpha))
+	    a  a alpha sin mul alpha cos div
+	  } ifelse
+        } ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving ldiagboxcircum) 2 ldiagdebugprint
+} def
+
+% find quadratic roots (assume a != 0): a b c ldiagqroots x1 x2 2
+%                                                     or    x2 1
+%                                                     or       0
+/ldiagqroots
+{
+  4 dict begin
+    /c exch def
+    /b exch def
+    /a exch def
+    /disc b b mul 4 a c mul mul sub def
+    disc 0 lt
+    { 0
+    }
+    { disc 0 eq
+      { b neg 2 a mul div
+	1
+      }
+      { b neg disc sqrt add 2 a mul div
+        b neg disc sqrt sub 2 a mul div
+	2
+      }
+      ifelse
+    }
+    ifelse
+  end
+} def
+
+% work our which quadrant: <angle> ldiagquadrant <0-3>
+/ldiagquadrant
+{ dup 90 lt
+  { pop 0
+  }
+  { dup 180 lt
+    { pop 1
+    }
+    { 270 lt
+      { 2
+      }
+      { 3
+      } ifelse
+    } ifelse
+  } ifelse
+} def
+
+% find curvebox circum, assuming upper right quadrant: alpha a b xmk ldiagcb x y
+/ldiagcb
+{
+  6 dict begin
+    /xmk exch def
+    /b exch def
+    /a exch def
+    /alpha exch def
+    /theta1 0 0 a b xmk sub ldiagangleto def
+    /theta2 0 0 a xmk sub b ldiagangleto def
+    alpha theta1 le
+    { % if alpha <= theta1, return (a, a*tan(alpha))
+      a  a alpha sin mul alpha cos div
+    }
+    { alpha theta2 ge
+      { % else if alpha > theta2, return (b*cot(alpha), b)
+	b alpha cos mul alpha sin div  b
+      }
+      {
+	% else, return the intersection of line and circle
+	a xmk sub b xmk sub xmk  0 0 alpha ldiagcircleintersect
+	dup 0 eq
+	{ % should never happen, just return any reasonable point
+	  pop
+	  a b 0.5 ldiagpmul
+	}
+	{ 1 eq
+	  { % should never happen, just return the point on top of stack
+	  }
+	  { % the usual case, two points on stack, return the larger
+	    ldiagpmax
+	  } ifelse
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+} def
+
+% find point on circumference of curvebox: alpha a b xmk ldiagcurveboxcircum x y
+/ldiagcurveboxcircum
+{
+  % (Entering ldiagcurveboxcircum) 4 ldiagdebugprint
+  5 dict begin
+    /xmk exch def
+    /b exch def
+    /a exch def
+    ldiagfixangle /alpha exch def
+
+    % work out which quadrant we are in, and reflect accordingly
+    /quad alpha ldiagquadrant def
+    quad 0 eq
+    { alpha a b xmk ldiagcb
+    }
+    { quad 1 eq
+      { 180 alpha sub a b xmk ldiagcb exch neg exch
+      }
+      { quad 2 eq
+	{ alpha 180 sub a b xmk ldiagcb neg exch neg exch
+	}
+	{ 360 alpha sub a b xmk ldiagcb neg
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving ldiagcurveboxcircum) 2 ldiagdebugprint
+} def
+
+% find point on circumference of diamond:  alpha a b ldiagdiamondcircum x y
+/ldiagdiamondcircum
+{
+  % (Entering ldiagdiamondcircum) 3 ldiagdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    ldiagfixangle /alpha exch def
+    b alpha cos abs mul  a alpha sin abs mul  add  /denom exch def
+    a b mul alpha cos mul denom div
+    a b mul alpha sin mul denom div
+  end
+  % (Leaving ldiagdiamondcircum) 2 ldiagdebugprint
+} def
+
+% find point on circumference of ellipse:  alpha a b ldiagellipsecircum x y
+/ldiagellipsecircum
+{
+  % (Entering ldiagellipsecircum) 3 ldiagdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    ldiagfixangle /alpha exch def
+    b alpha cos mul dup mul  a alpha sin mul dup mul  add sqrt /denom exch def
+    a b mul alpha cos mul denom div
+    a b mul alpha sin mul denom div
+  end
+  % (Leaving ldiagellipsecircum) 2 ldiagdebugprint
+} def
+
+% find point on circumference of isosceles:  alpha a b ldiagisoscelescircum x y
+/ldiagisoscelescircum
+{
+  % (Entering ldiagisoscelescircum) 3 ldiagdebugprint
+  7 dict begin
+    /b exch def
+    /a exch def
+    /alpha exch ldiagfixangle def
+    /theta1 90 def
+    /theta2 a b 0.5 ldiagpmul 0 0 ldiagangleto def
+    /theta3 a b 0.5 ldiagpmul a 0 ldiagangleto def
+    alpha theta1 ge alpha theta2 le and
+    { 0 0 a 2 div b
+    }
+    { alpha theta2 ge alpha theta3 le and
+      { 0 0 a 0
+      }
+      { a 0 a 2 div b
+      } ifelse
+    } ifelse
+    a 2 div b 2 div 2 copy 1 ft alpha ldiagatangle ldiaglineintersect
+    a 2 div b 2 div 4 2 roll ldiagpsub
+  end
+  % (Leaving ldiagisoscelescircum) 2 ldiagdebugprint
+} def
+
+% find point of intersection of two lines each defined by two points
+% x1 y1 x2 y2  x3 y3 x4 y4  ldiaglineintersect x y
+/ldiaglineintersect
+{
+  % (Entering ldiaglineintersect) 8 ldiagdebugprint
+  13 dict begin
+    /y4 exch def
+    /x4 exch def
+    /y3 exch def
+    /x3 exch def
+    /y2 exch def
+    /x2 exch def
+    /y1 exch def
+    /x1 exch def
+    x2 x1 sub /x21 exch def
+    x4 x3 sub /x43 exch def
+    y2 y1 sub /y21 exch def
+    y4 y3 sub /y43 exch def
+    y21 x43 mul y43 x21 mul sub /det exch def
+  
+    % calculate x 
+    y21 x43 mul x1 mul
+    y43 x21 mul x3 mul sub
+    y3 y1 sub x21 mul x43 mul add
+    det div
+
+    % calculate y
+    x21 y43 mul y1 mul
+    x43 y21 mul y3 mul sub
+    x3 x1 sub y21 mul y43 mul add
+    det neg div
+
+  end
+  % (Leaving ldiaglineintersect) 2 ldiagdebugprint
+} def
+
+% find point on circumference of polygon
+% alpha radius num theta ldiagpolycircum x y
+/ldiagpolycircum
+{
+  % (Entering ldiagpolycircum) 4 ldiagdebugprint
+  13 dict begin
+    /theta exch def
+    /num exch def
+    /radius exch def
+    /alpha exch def
+
+    % calculate delta, the angle from theta to alpha
+    alpha theta sub ldiagfixangle
+
+    % calculate the angle which is the multiple of 360/num closest to delta
+    360 num div div truncate 360 num div mul theta add /anglea exch def
+
+    % calculate the next multiple of 360/num after anglea
+    anglea 360 num div add /angleb exch def
+
+    % intersect the line through these two points with the alpha line
+    anglea cos anglea sin  angleb cos angleb sin
+    0 0  alpha cos 2 mul alpha sin 2 mul
+    ldiaglineintersect radius ldiagpmul
+
+  end
+  % (Leaving ldiagpolycircum) 2 ldiagdebugprint
+} def
+
+% find point of intersection of a line and a circle
+% x0 y0 r  x1 y1 theta  ldiagcircleintersect xa ya xb yb 2
+%                                        or       xb yb 1
+%                                        or             0
+/ldiagcircleintersect
+{
+  % (Entering ldiagcircleintersect) 6 ldiagdebugprint
+  15 dict begin
+    /theta exch def
+    /y1    exch def
+    /x1    exch def
+    /r     exch def
+    /y0    exch def
+    /x0    exch def
+
+    % if sin(theta) = 0 then line is horizontal and y must be y1
+    theta sin abs 0.00001 lt
+    { 
+      /a 1 def
+      /b -2 x0 mul def
+      /c x0 dup mul y1 y0 sub dup mul add r dup mul sub def
+      a b c ldiagqroots dup
+      0 eq
+      { pop
+	0
+      }
+      { 1 eq
+	{ y1 1
+	}
+	{ y1 exch y1 2
+	} ifelse
+      } ifelse
+    }
+    {
+      /ct theta cos theta sin div def
+      /a ct ct mul 1 add def
+      /b ct x1 x0 sub mul y1 add y0 sub 2 mul def
+      /c x1 x0 sub dup mul y1 y0 sub dup mul add r dup mul sub def
+      a b c ldiagqroots dup
+      0 eq
+      { pop
+	0
+      }
+      { 1 eq
+	{ y1 add /yb exch def
+	  yb y1 sub ct mul x1 add /xb exch def
+	  xb yb 1
+	}
+	{ y1 add /ya exch def
+	  ya y1 sub ct mul x1 add /xa exch def
+	  y1 add /yb exch def
+	  yb y1 sub ct mul x1 add /xb exch def
+	  xa ya xb yb 2
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving ldiagcircleintersect) 1 ldiagdebugprint
+} def
+
+% find line which is the perpendicular bisector of two points, defined
+% by two points
+% x1 y1 x2 y2 ldiaglinebetween x3 y3 x4 y4
+/ldiaglinebetween
+{ % (Entering ldiaglinebetween) 4 ldiagdebugprint
+  /y2 exch def /x2 exch def
+  /y1 exch def /x1 exch def
+
+  % let x3, y3 be the point halfway between the two points
+  x1 y1 x2 y2 ldiagpadd 0.5 ldiagpmul
+  /y3 exch def /x3 exch def
+
+  % find a point perpendicular to x3, y3
+  x3 y3 50 x1 y1 x2 y2 ldiagangleto 90 dg add ldiagatangle
+
+  % plus x3 y3 gives the two points
+  x3 y3
+
+  % (Leaving ldiaglinebetween) 4 ldiagdebugprint
+} def
+
+% find <proc>@<string>:  <proc> <string> ldiagfindlabel <any> true
+%                                                      <proc> <string> false
+/ldiagfindlabel
+{
+  % (Entering ldiagfindlabel) 2 ldiagdebugprint
+  exch dup length 1 ne
+  { exch false
+    % (Leaving ldiagfindabel (length not 1)) 3 ldiagdebugprint
+  }
+  { dup 0 get type /nametype ne
+    { exch false
+      % (Leaving ldiagfindabel (not a name)) 3 ldiagdebugprint
+    }
+    { dup 0 get 50 string cvs (@) ldiagconcat 2 index ldiagconcat dup where
+      { exch get exch pop exch pop cvx exec true
+	% (Leaving ldiagfindlabel with success) 100 ldiagdebugprint
+      }
+      {
+	pop exch false
+	% (Leaving ldiagfindabel (concat not sensible)) 3 ldiagdebugprint
+      } ifelse
+    } ifelse
+  } ifelse
+} bind def
+
+% execute <proc>@<string> or else default:  <proc> <string> ldiagdolabel <various>
+/ldiagdolabel
+{
+  % (Entering ldiagdolabel) 2 ldiagdebugprint
+  ldiagfindlabel not
+  {
+    dup (CIRCUM) eq
+    { pop pop pop 0 0
+    }
+    {
+      dup (ANGLE) eq
+      { pop pop 0
+      }
+      { pop cvx exec
+      } ifelse
+    } ifelse
+  } if
+  % (Leaving ldiagdolabel) 2 ldiagdebugprint
+} bind def
+
+% execute a proc depending on whether number is negative, zero, or positive
+% procneg proczero procpos number ldiagsigncase <anything>
+/ldiagsigncase
+{
+  % (Entering ldiagsigncase) 4 ldiagdebugprint
+  dup 0 lt
+  { pop pop pop exec
+  }
+  { 0 gt
+    { exch pop exch pop exec
+    }
+    { pop exch pop exec
+    } ifelse
+  } ifelse
+  % (Leaving ldiagsigncase) 0 ldiagdebugprint
+} bind def
+
+% execute proci if angle is in ith quadrant
+% proc45 proc270 proc180 proc90 proc0 proc315 proc225 proc135 angle ldiagquadcase <anything>
+/ldiagquadcase
+{
+  % (Entering ldiagquadcase) 9 ldiagdebugprint
+  round ldiagfixangle cvi dup 90 mod 0 eq
+  { 90 idiv 4 add } { 90 idiv } ifelse
+  8 exch roll pop pop pop pop pop pop pop exec
+  % (Leaving ldiagquadcase) 0 ldiagdebugprint
+} bind def
+
+% decode Lout length into PostScript length
+% <string> ldiagdecodelength <number>
+/ldiagdecodelength
+{
+  % (Entering ldiagdecodelength) 1 ldiagdebugprint
+  (f) search
+  { exch pop exch pop cvr ft
+  }
+  { (c) search
+    { exch pop exch pop cvr cm
+    }
+    { (p) search
+      { exch pop exch pop cvr pt
+      }
+      { (m) search
+	{ exch pop exch pop cvr em
+	}
+	{ (s) search
+	  { exch pop exch pop cvr sp
+	  }
+	  { (v) search
+	    { exch pop exch pop cvr vs
+	    }
+	    { (i) search
+	      { exch pop exch pop cvr in
+	      }
+	      { pop 0
+	      } ifelse
+	    } ifelse
+	  } ifelse
+	} ifelse
+      } ifelse
+    } ifelse
+  } ifelse
+  % (Leaving ldiagdecodelength) 1 ldiagdebugprint
+} def
+
+% implement aabout function
+% logical form:  <circum> <extra> <centre> aabout <point>
+% actual form:   { <labelorpoint> } cvlit <length> [ <point> ] cvx aabout <point>
+/ldiagaabout
+{
+  /centre exch def
+  /extra exch def
+  /circum exch def
+
+  /ZXCTR [ centre ] cvx def
+  /ZFCTR [ circum (CTR) ldiagdolabel ] cvx def
+  /ZAREF ZFCTR ZXCTR ldiagangleto def
+  /ZAMIN 0 dg def
+  /ZPMIN [ circum (CTR) ldiagdolabel ZAREF ZAMIN sub
+	 circum (CIRCUM) ldiagdolabel ldiagpadd
+	 0 0 extra ZAREF ZAMIN sub ldiagatangle
+	 ldiagpadd ] cvx def
+
+  /ZAMAX 90 dg def
+  /ZPMAX [ circum (CTR) ldiagdolabel ZAREF ZAMAX sub
+	 circum (CIRCUM) ldiagdolabel ldiagpadd
+	 0 0 extra ZAREF ZAMAX sub ldiagatangle
+	 ldiagpadd ] cvx def
+
+  1 1 20
+  { /xval exch def
+    /ZAMID ZAMIN ZAMAX add 0.5 mul def
+    /ZPMID [ circum (CTR) ldiagdolabel ZAREF ZAMID sub
+	   circum (CIRCUM) ldiagdolabel ldiagpadd
+	   0 0 extra ZAREF ZAMID sub ldiagatangle
+	   ldiagpadd ] cvx def
+    ZPMID ZXCTR ldiagdistance ZFCTR ZXCTR ldiagdistance gt
+    {
+      /ZAMAX [ ZAMID ] cvx def
+      /ZPMAX [ ZPMID ] cvx def
+    }
+    {
+      /ZAMIN [ ZAMID ] cvx def
+      /ZPMIN [ ZPMID ] cvx def
+    } ifelse
+  } for
+  ZPMID
+} def
+
+% implement cabout function
+% logical form:  <circum> <extra> <centre> cabout <point>
+% actual form:   { <labelorpoint> } cvlit <length> [ <point> ] cvx cabout <point>
+/ldiagcabout
+{
+  /centre exch def
+  /extra exch def
+  /circum exch def
+
+  /ZXCTR [ centre ] cvx def
+  /ZFCTR [ circum (CTR) ldiagdolabel ] cvx def
+  /ZAREF ZFCTR ZXCTR ldiagangleto def
+  /ZAMIN 0 dg def
+  /ZPMIN [ circum (CTR) ldiagdolabel ZAREF ZAMIN add
+	 circum (CIRCUM) ldiagdolabel ldiagpadd
+	 0 0 extra ZAREF ZAMIN add ldiagatangle
+	 ldiagpadd ] cvx def
+
+  /ZAMAX 90 dg def
+  /ZPMAX [ circum (CTR) ldiagdolabel ZAREF ZAMAX add
+	 circum (CIRCUM) ldiagdolabel ldiagpadd
+	 0 0 extra ZAREF ZAMAX add ldiagatangle
+	 ldiagpadd ] cvx def
+
+  1 1 20
+  { /xval exch def
+    /ZAMID ZAMIN ZAMAX add 0.5 mul def
+    /ZPMID [ circum (CTR) ldiagdolabel ZAREF ZAMID add
+	   circum (CIRCUM) ldiagdolabel ldiagpadd
+	   0 0 extra ZAREF ZAMID add ldiagatangle
+	   ldiagpadd ] cvx def
+    ZPMID ZXCTR ldiagdistance ZFCTR ZXCTR ldiagdistance gt
+    {
+      /ZAMAX [ ZAMID ] cvx def
+      /ZPMAX [ ZPMID ] cvx def
+    }
+    {
+      /ZAMIN [ ZAMID ] cvx def
+      /ZPMIN [ ZPMID ] cvx def
+    } ifelse
+  } for
+  ZPMID
+} def
+
+% fromarrowlength toarrowlength { from } { to } xindent zindent ldiaglinepath -
+/ldiaglinepath
+{
+  % (entering ldiaglinepath) 0 ldiagdebugprint
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  from (CTR) ldiagdolabel to (CTR) ldiagdolabel ldiagangleto
+  /FROM@ANGLE ldiagangledef 
+  from (CTR) ldiagdolabel FROM@ANGLE from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength FROM@ANGLE ldiagatangle ldiagpadd
+  /FROM ldiagpointdef
+
+  FROM@ANGLE /TO@ANGLE ldiagangledef
+  to (CTR) ldiagdolabel TO@ANGLE 180 dg sub to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength TO@ANGLE 180 dg sub ldiagatangle ldiagpadd /TO ldiagpointdef
+
+  FROM 0.5 ldiagpmul TO 0.5 ldiagpmul ldiagpadd /LMID ldiagpointdef
+  FROM@ANGLE /LMID@ANGLE ldiagangledef
+
+  /XINDENT xindent FROM LMID ldiagdistance ldiagmin def
+  FROM 0 0 XINDENT FROM@ANGLE ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  FROM@ANGLE /LFROM@ANGLE ldiagangledef
+
+  /ZINDENT zindent TO LMID ldiagdistance ldiagmin def
+  0 0 ZINDENT FROM@ANGLE ldiagatangle TO ldiagpsub /LTO ldiagpointdef
+  FROM@ANGLE /LTO@ANGLE ldiagangledef
+
+  direct { FROM TO } { FROM LFROM LMID LTO TO } ifelse
+
+  % (leaving ldiaglinepath) 0 ldiagdebugprint
+} def
+
+% fromarrowlength toarrowlength { from } { to } xindent zindent pathgap ldiagdoublelinepath -
+/ldiagdoublelinepath
+{
+  % (entering ldiagdoublelinepath) 0 ldiagdebugprint
+  /pathgap exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  from (CTR) ldiagdolabel to (CTR) ldiagdolabel ldiagangleto
+  /FROM@ANGLE ldiagangledef 
+  from (CTR) ldiagdolabel FROM@ANGLE from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength FROM@ANGLE ldiagatangle ldiagpadd
+  /FROM ldiagpointdef
+
+  FROM@ANGLE /TO@ANGLE ldiagangledef
+  to (CTR) ldiagdolabel TO@ANGLE 180 dg sub to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength TO@ANGLE 180 dg sub ldiagatangle ldiagpadd /TO ldiagpointdef
+
+  FROM 0.5 ldiagpmul TO 0.5 ldiagpmul ldiagpadd /LMID ldiagpointdef
+  FROM@ANGLE /LMID@ANGLE ldiagangledef
+
+  /XINDENT xindent FROM LMID ldiagdistance ldiagmin def
+  FROM 0 0 XINDENT FROM@ANGLE ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  FROM@ANGLE /LFROM@ANGLE ldiagangledef
+
+  /ZINDENT zindent TO LMID ldiagdistance ldiagmin def
+  0 0 ZINDENT FROM@ANGLE ldiagatangle TO ldiagpsub /LTO ldiagpointdef
+  FROM@ANGLE /LTO@ANGLE ldiagangledef
+
+  direct {
+    FROM pathgap 2 div FROM@ANGLE 90 dg sub ldiagatangle
+    TO   pathgap 2 div FROM@ANGLE 90 dg sub ldiagatangle
+    []
+    FROM pathgap 2 div FROM@ANGLE 90 dg add ldiagatangle
+    TO   pathgap 2 div FROM@ANGLE 90 dg add ldiagatangle
+  }
+  {
+    FROM  pathgap 2 div FROM@ANGLE 90 dg sub ldiagatangle
+    LFROM pathgap 2 div FROM@ANGLE 90 dg sub ldiagatangle
+    LMID  pathgap 2 div FROM@ANGLE 90 dg sub ldiagatangle
+    LTO   pathgap 2 div FROM@ANGLE 90 dg sub ldiagatangle
+    TO    pathgap 2 div FROM@ANGLE 90 dg sub ldiagatangle
+    []
+    FROM  pathgap 2 div FROM@ANGLE 90 dg add ldiagatangle
+    LFROM pathgap 2 div FROM@ANGLE 90 dg add ldiagatangle
+    LMID  pathgap 2 div FROM@ANGLE 90 dg add ldiagatangle
+    LTO   pathgap 2 div FROM@ANGLE 90 dg add ldiagatangle
+    TO    pathgap 2 div FROM@ANGLE 90 dg add ldiagatangle
+  } ifelse
+
+  % (leaving ldiagdoublelinepath) 0 ldiagdebugprint
+} def
+
+% fromarrowlen toarrowlen { from } { to } xindent zindent bias ldiagacurvepath -
+/ldiagacurvepath
+{
+  % (entering ldiagacurvepath) 0 ldiagdebugprint
+  /bias exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  %/B1 bias 0.02 ft ldiagmax def
+  %/B2 from (CTR) ldiagdolabel to (CTR) ldiagdolabel ldiagdistance 0.5 mul def
+  %/BIAS B1 B2 ldiagmin def
+  /BIAS bias 0.02 ft ldiagmax def
+  /XMID [ from (CTR) ldiagdolabel 0.5 ldiagpmul
+	  to   (CTR) ldiagdolabel 0.5 ldiagpmul ldiagpadd ] cvx def
+  /XTOP [ XMID 0 0 BIAS from (CTR) ldiagdolabel to (CTR) ldiagdolabel
+	  ldiagangleto 90 dg sub ldiagatangle ldiagpadd ] cvx def
+  /CTR [ from (CTR) ldiagdolabel XTOP ldiaglinebetween
+	 to   (CTR) ldiagdolabel XTOP ldiaglinebetween
+	 ldiaglineintersect ] cvx def
+
+  from fromarrowlength [ CTR ] cvx ldiagaabout /FROM ldiagpointdef
+  from (CTR) ldiagdolabel FROM ldiagdistance 0 gt
+  { from (CTR) ldiagdolabel FROM ldiagangleto
+  }
+  { CTR FROM ldiagangleto 90 dg add
+  } ifelse /FROM@ANGLE ldiagangledef
+
+  to toarrowlength [ CTR ] cvx ldiagcabout /TO ldiagpointdef
+  TO to (CTR) ldiagdolabel ldiagdistance 0 gt
+  { TO to (CTR) ldiagdolabel ldiagangleto
+  }
+  { CTR TO ldiagangleto 90 dg add
+  } ifelse /TO@ANGLE ldiagangledef
+
+  /RADIUS CTR FROM ldiagdistance def
+  CTR 0 0 RADIUS CTR FROM ldiagangleto 360 dg CTR TO ldiagangleto
+  add CTR FROM ldiagangleto sub cvi 360 mod 0.5 mul add
+  ldiagatangle ldiagpadd /LMID ldiagpointdef
+  CTR LMID ldiagangleto 90 dg add /LMID@ANGLE ldiagangledef
+
+  /XINDENT xindent FROM LMID ldiagdistance ldiagmin def
+  CTR 0 0 RADIUS CTR FROM 0 0 XINDENT FROM@ANGLE ldiagatangle
+  ldiagpadd ldiagangleto ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  CTR LFROM ldiagangleto 90 dg add /LFROM@ANGLE ldiagangledef
+
+  /ZINDENT zindent TO LMID ldiagdistance ldiagmin def
+  CTR 0 0 RADIUS CTR TO 0 0 ZINDENT TO@ANGLE 180 dg add
+  ldiagatangle ldiagpadd ldiagangleto ldiagatangle ldiagpadd /LTO ldiagpointdef
+  CTR LTO ldiagangleto 90 dg add /LTO@ANGLE ldiagangledef
+
+  direct
+  { FROM [CTR] TO }
+  { FROM [CTR] LFROM [CTR] LMID [CTR] LTO [CTR] TO }
+  ifelse
+
+  % (leaving ldiagacurvepath) 0 ldiagdebugprint
+} def
+
+% fromarrowlen toarrowlen { from } { to } xindent zindent bias ldiagccurvepath -
+/ldiagccurvepath
+{
+  % (entering ldiagccurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /bias exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  %/B1 bias 0.02 ft ldiagmax def
+  %/B2 from (CTR) ldiagdolabel to (CTR) ldiagdolabel ldiagdistance 0.5 mul def
+  %/BIAS B1 B2 ldiagmin def
+  /BIAS bias 0.02 ft ldiagmax def
+  /XMID [ from (CTR) ldiagdolabel 0.5 ldiagpmul
+	to (CTR) ldiagdolabel 0.5 ldiagpmul ldiagpadd ] cvx def
+  /XTOP [ XMID 0 0 BIAS from (CTR) ldiagdolabel to (CTR) ldiagdolabel
+	ldiagangleto 90 dg add ldiagatangle ldiagpadd ] cvx def
+  /CTR [ from (CTR) ldiagdolabel XTOP ldiaglinebetween
+         to (CTR) ldiagdolabel XTOP ldiaglinebetween ldiaglineintersect ] cvx def
+
+  from fromarrowlength [ CTR ] cvx ldiagcabout /FROM ldiagpointdef
+  from (CTR) ldiagdolabel FROM ldiagdistance 0 gt
+  { from (CTR) ldiagdolabel FROM ldiagangleto }
+  { CTR FROM ldiagangleto 90 dg sub }
+  ifelse /FROM@ANGLE ldiagangledef
+
+  to toarrowlength [ CTR ] cvx ldiagaabout /TO ldiagpointdef
+  TO to (CTR) ldiagdolabel ldiagdistance 0 gt
+  { TO to (CTR) ldiagdolabel ldiagangleto }
+  { CTR TO ldiagangleto 90 dg sub }
+  ifelse /TO@ANGLE ldiagangledef
+
+  /RADIUS [ CTR FROM ldiagdistance ] cvx def
+  CTR 0 0 RADIUS CTR TO ldiagangleto 360 dg CTR FROM ldiagangleto add
+  CTR TO ldiagangleto sub cvi 360 cvi mod 2 div add ldiagatangle
+  ldiagpadd /LMID ldiagpointdef
+  CTR LMID ldiagangleto 90 dg sub /LMID@ANGLE ldiagangledef
+
+  /XINDENT [ xindent FROM LMID ldiagdistance ldiagmin ] cvx def
+  CTR 0 0 RADIUS CTR FROM 0 0 XINDENT FROM@ANGLE ldiagatangle ldiagpadd
+  ldiagangleto ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  CTR LFROM ldiagangleto 90 dg sub /LFROM@ANGLE ldiagangledef
+
+  /ZINDENT [ zindent TO LMID ldiagdistance ldiagmin ] cvx def
+  CTR 0 0 RADIUS CTR TO 0 0 ZINDENT TO@ANGLE 180 dg add ldiagatangle
+  ldiagpadd ldiagangleto ldiagatangle ldiagpadd /LTO ldiagpointdef
+  CTR LTO ldiagangleto 90 dg sub /LTO@ANGLE ldiagangledef
+
+  direct
+  { FROM [CTR clockwise] TO }
+  { FROM [CTR clockwise] LFROM [CTR clockwise]
+  LMID [CTR clockwise] LTO [CTR clockwise] TO }
+  ifelse
+  % (leaving ldiagccurvepath) 0 ldiagdebugprint
+} def
+
+
+% farr tarr { from } { to } xindent zindent [frompt] [topt] ldiagbezierpath -
+/ldiagbezierpath
+{
+  % (entering ldiagbezierpath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  cvx /topt exch def
+  cvx /frompt exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  from (CTR) ldiagdolabel frompt ldiagangleto /FROM@ANGLE ldiagangledef
+  from (CTR) ldiagdolabel FROM@ANGLE from (CIRCUM) ldiagdolabel
+  ldiagpadd 0 0 fromarrowlength FROM@ANGLE ldiagatangle ldiagpadd
+  /FROM ldiagpointdef
+
+  topt to (CTR) ldiagdolabel ldiagangleto /TO@ANGLE ldiagangledef
+  to (CTR) ldiagdolabel TO@ANGLE 180 dg add to (CIRCUM) ldiagdolabel
+  ldiagpadd 0 0 toarrowlength TO@ANGLE 180 dg add ldiagatangle ldiagpadd
+  /TO ldiagpointdef
+
+  FROM 0 0 xindent FROM@ANGLE ldiagatangle ldiagpadd
+  /LFROM ldiagpointdef
+  FROM@ANGLE /LFROM@ANGLE ldiagangledef
+
+  TO 0 0 zindent TO@ANGLE 180 dg add ldiagatangle ldiagpadd
+  /LTO ldiagpointdef
+  TO@ANGLE /LTO@ANGLE ldiagangledef
+
+  FROM TO ldiagpadd frompt ldiagpadd topt ldiagpadd 0.25 ldiagpmul
+  /LMID ldiagpointdef
+
+  FROM [frompt topt] TO
+
+  % (leaving ldiagbezierpath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+
+% farr tarr { from } { to } xindent zindent ldiagvhlinepath -
+/ldiagvhlinepath
+{
+  % (entering ldiagvhlinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  /CTR [ from (CTR) ldiagdolabel pop to (CTR) ldiagdolabel exch pop ] cvx def
+  /FANG [ from (CTR) ldiagdolabel CTR ldiagangleto ] cvx def
+  /TANG [ to (CTR) ldiagdolabel CTR ldiagangleto ] cvx def
+
+  from (CTR) ldiagdolabel FANG from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength FANG ldiagatangle ldiagpadd /FROM ldiagpointdef
+  FANG /FROM@ANGLE ldiagangledef
+
+  to (CTR) ldiagdolabel TANG to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength TANG ldiagatangle ldiagpadd /TO ldiagpointdef
+  TANG 180 dg add /TO@ANGLE ldiagangledef
+
+  /FDIST [ FROM CTR ldiagdistance ] cvx def
+  /TDIST [ TO CTR ldiagdistance ] cvx def
+  /XINDENT [ xindent FDIST ldiagmin ] cvx def
+  /ZINDENT [ zindent TDIST ldiagmin ] cvx def
+  FROM 0 0 XINDENT FANG ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  FROM@ANGLE /LFROM@ANGLE ldiagangledef
+  TO 0 0 ZINDENT TANG ldiagatangle ldiagpadd /LTO ldiagpointdef
+  TO@ANGLE /LTO@ANGLE ldiagangledef
+
+  CTR /LMID ldiagpointdef
+  0 0 1 ft FANG 180 dg add ldiagatangle
+  0 0 1 ft TANG 180 dg add ldiagatangle
+  ldiagangleto /LMID@ANGLE ldiagangledef
+
+  FROM LFROM LMID LTO TO
+
+  % (leaving ldiagvhlinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+% farr tarr { from } { to } xindent zindent radius ldiagvhcurvepath -
+/ldiagvhcurvepath
+{
+  % (entering ldiagvhcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /radius exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  /CTR [ from (CTR) ldiagdolabel pop to (CTR) ldiagdolabel exch pop ] cvx def
+  /FANG [ from (CTR) ldiagdolabel CTR ldiagangleto ] cvx def
+  /TANG [ to (CTR) ldiagdolabel CTR ldiagangleto ] cvx def
+
+  from (CTR) ldiagdolabel FANG from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength FANG ldiagatangle ldiagpadd /FROM ldiagpointdef
+  FANG /FROM@ANGLE ldiagangledef
+
+  to (CTR) ldiagdolabel TANG to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength TANG ldiagatangle ldiagpadd /TO ldiagpointdef
+  TANG 180 dg add /TO@ANGLE ldiagangledef
+
+  /FDIST [ FROM CTR ldiagdistance ] cvx def
+  /TDIST [ TO CTR ldiagdistance ] cvx def
+  /RADIUS [ radius FDIST TDIST ldiagmin ldiagmin ] cvx def
+  /XINDENT [ xindent FDIST RADIUS sub ldiagmin ] cvx def
+  /ZINDENT [ zindent TDIST RADIUS sub ldiagmin ] cvx def
+
+  FROM 0 0 XINDENT FANG ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  FROM@ANGLE /LFROM@ANGLE ldiagangledef
+  TO 0 0 ZINDENT TANG ldiagatangle ldiagpadd /LTO ldiagpointdef
+  TO@ANGLE /LTO@ANGLE ldiagangledef
+
+  /FCTR [ CTR 0 0 RADIUS FROM@ANGLE 180 dg add ldiagatangle ldiagpadd ] cvx def
+  /TCTR [ CTR 0 0 RADIUS TO@ANGLE ldiagatangle ldiagpadd ] cvx def
+  /XCTR [ CTR 0 0 RADIUS FROM@ANGLE 180 dg add ldiagatangle ldiagpadd
+              0 0 RADIUS TO@ANGLE ldiagatangle ldiagpadd ] cvx def
+  XCTR 0 0 RADIUS XCTR CTR ldiagangleto ldiagatangle ldiagpadd
+  /LMID ldiagpointdef
+  FCTR TCTR ldiagangleto /LMID@ANGLE ldiagangledef
+
+  FROM LFROM FCTR
+  {[XCTR clockwise]} {} {} {} {} {[XCTR]} {[XCTR clockwise]} {[XCTR]}
+  FCTR TCTR ldiagangleto ldiagquadcase
+  TCTR LTO TO
+
+  % (leaving ldiagvhcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+% farr tarr { from } { to } xindent zindent ldiaghvlinepath -
+/ldiaghvlinepath
+{
+  % (entering ldiaghvlinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  /CTR [ to (CTR) ldiagdolabel pop from (CTR) ldiagdolabel exch pop ] cvx def
+  /FANG [ from (CTR) ldiagdolabel CTR ldiagangleto ] cvx def
+  /TANG [ to (CTR) ldiagdolabel CTR ldiagangleto ] cvx def
+
+  from (CTR) ldiagdolabel FANG from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength FANG ldiagatangle ldiagpadd /FROM ldiagpointdef
+  FANG /FROM@ANGLE ldiagangledef
+
+  to (CTR) ldiagdolabel TANG to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength TANG ldiagatangle ldiagpadd /TO ldiagpointdef
+  TANG 180 dg add /TO@ANGLE ldiagangledef
+
+  /FDIST [ FROM CTR ldiagdistance ] cvx def
+  /TDIST [ TO CTR ldiagdistance ] cvx def
+  /XINDENT [ xindent FDIST ldiagmin ] cvx def
+  /ZINDENT [ zindent TDIST ldiagmin ] cvx def
+
+  FROM 0 0 XINDENT FANG ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  FROM@ANGLE /LFROM@ANGLE ldiagangledef
+  TO 0 0 ZINDENT TANG ldiagatangle ldiagpadd /LTO ldiagpointdef
+  TO@ANGLE /LTO@ANGLE ldiagangledef
+
+  CTR /LMID ldiagpointdef
+  0 0 1 ft FANG 180 dg add ldiagatangle
+  0 0 1 ft TANG 180 dg add ldiagatangle ldiagangleto
+  /LMID@ANGLE ldiagangledef
+
+  FROM LFROM LMID LTO TO
+
+  % (leaving ldiaghvlinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+% farr tarr { from } { to } xindent zindent radius ldiaghvcurvepath -
+/ldiaghvcurvepath
+{
+  % (entering ldiaghvcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /radius exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  /CTR [ to (CTR) ldiagdolabel pop from (CTR) ldiagdolabel exch pop ] cvx def
+  /FANG [ from (CTR) ldiagdolabel CTR ldiagangleto ] cvx def
+  /TANG [ to (CTR) ldiagdolabel CTR ldiagangleto ] cvx def
+
+  from (CTR) ldiagdolabel FANG from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength FANG ldiagatangle ldiagpadd /FROM ldiagpointdef
+  FANG /FROM@ANGLE ldiagangledef
+
+  to (CTR) ldiagdolabel TANG to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength TANG ldiagatangle ldiagpadd /TO ldiagpointdef
+  TANG 180 dg add /TO@ANGLE ldiagangledef
+
+  /FDIST [ FROM CTR ldiagdistance ] cvx def
+  /TDIST [ TO CTR ldiagdistance ] cvx def
+  /RADIUS [ radius FDIST TDIST ldiagmin ldiagmin ] cvx def
+  /XINDENT [ xindent FDIST RADIUS sub ldiagmin ] cvx def
+  /ZINDENT [ zindent TDIST RADIUS sub ldiagmin ] cvx def
+  FROM 0 0 XINDENT FANG ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  FROM@ANGLE /LFROM@ANGLE ldiagangledef
+  TO 0 0 ZINDENT TANG ldiagatangle ldiagpadd /LTO ldiagpointdef
+  TO@ANGLE /LTO@ANGLE ldiagangledef
+
+  /FCTR [ CTR 0 0 RADIUS FROM@ANGLE 180 dg add ldiagatangle ldiagpadd ] cvx def
+  /TCTR [ CTR 0 0 RADIUS TO@ANGLE ldiagatangle ldiagpadd ] cvx def
+  /XCTR [ CTR 0 0 RADIUS FROM@ANGLE 180 dg add ldiagatangle ldiagpadd
+	      0 0 RADIUS TO@ANGLE ldiagatangle ldiagpadd ] cvx def
+  XCTR 0 0 RADIUS XCTR CTR ldiagangleto ldiagatangle ldiagpadd
+  /LMID ldiagpointdef
+  FCTR TCTR ldiagangleto /LMID@ANGLE ldiagangledef
+
+  FROM LFROM FCTR
+  {[XCTR]} {} {} {} {} {[XCTR clockwise]} {[XCTR]} {[XCTR clockwise]}
+  FCTR TCTR ldiagangleto ldiagquadcase
+  TCTR LTO TO
+
+  % (leaving ldiaghvcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+% farr tarr { from } { to } xindent zindent bias ldiaglvrlinepath -
+/ldiaglvrlinepath
+{
+  % (entering ldiaglvrlinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /bias exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  from (CTR) ldiagdolabel 180 dg from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength 180 dg ldiagatangle ldiagpadd /FROM ldiagpointdef
+  180 dg /FROM@ANGLE ldiagangledef
+
+  to (CTR) ldiagdolabel 180 dg to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength 180 dg ldiagatangle ldiagpadd /TO ldiagpointdef
+  0 dg /TO@ANGLE ldiagangledef
+
+  /XLEFT [ FROM pop TO pop ldiagmin bias sub ] cvx def
+  XLEFT FROM exch pop /P1 ldiagpointdef
+  XLEFT TO exch pop /P2 ldiagpointdef
+  /VERT [ P1 P2 ldiagangleto ] cvx def
+  P1 P1 0 0 1 ft 180 dg ldiagatangle ldiagpadd 0 0 1 ft VERT ldiagatangle
+  ldiagpadd ldiagangleto /P1@ANGLE ldiagangledef
+  P2 P2 0 0 1 ft 0 dg ldiagatangle ldiagpadd 0 0 1 ft VERT ldiagatangle
+  ldiagpadd ldiagangleto /P2@ANGLE ldiagangledef
+
+  P1 0.5 ldiagpmul P2 0.5 ldiagpmul ldiagpadd /LMID ldiagpointdef
+  VERT /LMID@ANGLE ldiagangledef
+
+  /XINDENT [ xindent FROM P1 ldiagdistance ldiagmin ] cvx def
+  /ZINDENT [ zindent P2 TO ldiagdistance ldiagmin ] cvx def
+  XINDENT 0 FROM ldiagpsub /LFROM ldiagpointdef
+  180 dg /LFROM@ANGLE ldiagangledef
+  ZINDENT 0 TO ldiagpsub /LTO ldiagpointdef
+  0 dg /LTO@ANGLE ldiagangledef
+
+  FROM LFROM P1 LMID P2 LTO TO
+
+  % (leaving ldiaglvrlinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+% farr tarr { from } { to } xindent zindent bias radius ldiaglvrcurvepath -
+/ldiaglvrcurvepath
+{
+  % (entering ldiaglvrcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /radius exch def
+  /bias exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  from (CTR) ldiagdolabel 180 dg from (CIRCUM) ldiagdolabel ldiagpadd 0 0
+  fromarrowlength 180 dg ldiagatangle ldiagpadd /FROM ldiagpointdef
+  180 dg /FROM@ANGLE ldiagangledef
+  to (CTR) ldiagdolabel 180 dg to (CIRCUM) ldiagdolabel ldiagpadd 0 0
+  toarrowlength 180 dg ldiagatangle ldiagpadd /TO ldiagpointdef
+  0 dg /TO@ANGLE ldiagangledef
+  /XLEFT [ FROM pop TO pop ldiagmin bias sub ] cvx def
+  /XP1 [ XLEFT FROM exch pop ] cvx def
+  /XP2 [ XLEFT TO exch pop ] cvx def
+  /VERT [ XP1 XP2 ldiagangleto ] cvx def
+  XP1 0.5 ldiagpmul XP2 0.5 ldiagpmul ldiagpadd /LMID ldiagpointdef
+  VERT /LMID@ANGLE ldiagangledef
+  /XINDENT [ xindent FROM XP1 ldiagdistance ldiagmin ] cvx def
+  /ZINDENT [ zindent XP2 TO ldiagdistance ldiagmin ] cvx def
+  XINDENT 0 FROM ldiagpsub /LFROM ldiagpointdef
+  180 dg /LFROM@ANGLE ldiagangledef
+  ZINDENT 0 TO ldiagpsub /LTO ldiagpointdef
+  0 dg /LTO@ANGLE ldiagangledef
+  /RADIUS [ radius XP1 XP2 ldiagdistance 2 div ldiagmin ] cvx def
+  /XP1PRE [ XP1 0 0 RADIUS 0 dg ldiagatangle ldiagpadd ] cvx def
+  /XP1POST [ XP1 0 0 RADIUS VERT ldiagatangle ldiagpadd ] cvx def
+  /XP1CTR [ XP1PRE 0 0 RADIUS VERT ldiagatangle ldiagpadd ] cvx def
+  XP1CTR 0 0 RADIUS XP1CTR XP1 ldiagangleto ldiagatangle ldiagpadd
+  /P1 ldiagpointdef
+  XP1PRE XP1POST ldiagangleto /P1@ANGLE ldiagangledef
+  /XP2PRE [ 0 0 RADIUS VERT ldiagatangle XP2 ldiagpsub ] cvx def
+  /XP2POST [ XP2 0 0 RADIUS 0 dg ldiagatangle ldiagpadd ] cvx def
+  /XP2CTR [ XP2PRE 0 0 RADIUS 0 dg ldiagatangle ldiagpadd ] cvx def
+  XP2CTR 0 0 RADIUS XP2CTR XP2 ldiagangleto ldiagatangle ldiagpadd
+  /P2 ldiagpointdef
+  XP2PRE XP2POST ldiagangleto /P2@ANGLE ldiagangledef
+  FROM LFROM XP1PRE
+  {  } { [XP1CTR] P1 [XP1CTR] } {  } { [XP1CTR clockwise] P1 [XP1CTR clockwise] }
+  {  } {  } {  } {  } VERT round ldiagquadcase
+  XP1POST LMID XP2PRE
+  {  } { [XP2CTR] P2 [XP2CTR] } {  } { [XP2CTR clockwise] P2 [XP2CTR clockwise] }
+  {  } {  } {  } {  } VERT round ldiagquadcase
+  XP2POST LTO TO
+
+  % (leaving ldiaglvrcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+% farr tarr { from } { to } xindent zindent bias ldiagrvllinepath -
+/ldiagrvllinepath
+{
+  % (entering ldiagrvllinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /bias exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  from (CTR) ldiagdolabel 0 dg from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength 0 dg ldiagatangle ldiagpadd /FROM ldiagpointdef
+  0 dg /FROM@ANGLE ldiagangledef
+  to (CTR) ldiagdolabel 0 dg to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength 0 dg ldiagatangle ldiagpadd /TO ldiagpointdef
+  180 dg /TO@ANGLE ldiagangledef
+  /XRIGHT [ FROM pop TO pop ldiagmax bias add ] cvx def
+  XRIGHT FROM exch pop /P1 ldiagpointdef
+  XRIGHT TO exch pop /P2 ldiagpointdef
+  /VERT [ P1 P2 ldiagangleto ] cvx def
+  P1 P1 0 0 1 ft 0 dg ldiagatangle ldiagpadd 0 0 1 ft VERT ldiagatangle
+  ldiagpadd ldiagangleto /P1@ANGLE ldiagangledef
+  P2 P2 0 0 1 ft 180 dg ldiagatangle ldiagpadd 0 0 1 ft VERT ldiagatangle
+  ldiagpadd ldiagangleto /P2@ANGLE ldiagangledef
+  P1 0.5 ldiagpmul P2 0.5 ldiagpmul ldiagpadd /LMID ldiagpointdef
+  VERT /LMID@ANGLE ldiagangledef
+  /XINDENT [ xindent FROM P1 ldiagdistance ldiagmin ] cvx def
+  /ZINDENT [ zindent P2 TO ldiagdistance ldiagmin ] cvx def
+  FROM XINDENT 0 ldiagpadd /LFROM ldiagpointdef
+  0 dg /LFROM@ANGLE ldiagangledef
+  TO ZINDENT 0 ldiagpadd /LTO ldiagpointdef
+  180 dg /LTO@ANGLE ldiagangledef
+  FROM LFROM P1 LMID P2 LTO TO
+
+  % (leaving ldiagrvllinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+
+% farr tarr { from } { to } xindent zindent bias radius ldiagrvlcurvepath -
+/ldiagrvlcurvepath
+{
+  % (entering ldiagrvlcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /radius exch def
+  /bias exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  from (CTR) ldiagdolabel 0 dg from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength 0 dg ldiagatangle ldiagpadd /FROM ldiagpointdef
+  0 dg /FROM@ANGLE ldiagangledef
+  to (CTR) ldiagdolabel 0 dg to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength 0 dg ldiagatangle ldiagpadd /TO ldiagpointdef
+  180 dg /TO@ANGLE ldiagangledef
+  /XRIGHT [ FROM pop TO pop ldiagmax bias add ] cvx def
+  /XP1 [ XRIGHT FROM exch pop ] cvx def
+  /XP2 [ XRIGHT TO exch pop ] cvx def
+  /VERT [ XP1 XP2 ldiagangleto ] cvx def
+  XP1 0.5 ldiagpmul XP2 0.5 ldiagpmul ldiagpadd /LMID ldiagpointdef
+  VERT /LMID@ANGLE ldiagangledef
+  /XINDENT [ xindent FROM XP1 ldiagdistance ldiagmin ] cvx def
+  /ZINDENT [ zindent XP2 TO ldiagdistance ldiagmin ] cvx def
+  FROM XINDENT 0 ldiagpadd /LFROM ldiagpointdef
+  0 dg /LFROM@ANGLE ldiagangledef
+  TO ZINDENT 0 ldiagpadd /LTO ldiagpointdef
+  180 dg /LTO@ANGLE ldiagangledef
+  /RADIUS [ radius XP1 XP2 ldiagdistance 0.5 mul ldiagmin ] cvx def
+  /XP1PRE [ XP1 0 0 RADIUS 180 dg ldiagatangle ldiagpadd ] cvx def
+  /XP1POST [ XP1 0 0 RADIUS VERT ldiagatangle ldiagpadd ] cvx def
+  /XP1CTR [ XP1PRE 0 0 RADIUS VERT ldiagatangle ldiagpadd ] cvx def
+  XP1CTR 0 0 RADIUS XP1CTR XP1 ldiagangleto ldiagatangle ldiagpadd
+  /P1 ldiagpointdef
+  XP1PRE XP1POST ldiagangleto /P1@ANGLE ldiagangledef
+  /XP2PRE [ 0 0 RADIUS VERT ldiagatangle XP2 ldiagpsub ] cvx def
+  /XP2POST [ XP2 0 0 RADIUS 180 dg ldiagatangle ldiagpadd ] cvx def
+  /XP2CTR [ XP2PRE 0 0 RADIUS 180 dg ldiagatangle ldiagpadd ] cvx def
+  XP2CTR 0 0 RADIUS XP2CTR XP2 ldiagangleto ldiagatangle ldiagpadd
+  /P2 ldiagpointdef
+  XP2PRE XP2POST ldiagangleto /P2@ANGLE ldiagangledef
+  FROM LFROM XP1PRE
+  {} {[XP1CTR clockwise] P1 [XP1CTR clockwise]} {} {[XP1CTR] P1 [XP1CTR]}
+  {} {} {} {} VERT round ldiagquadcase
+  XP1POST LMID XP2PRE
+  {} {[XP2CTR clockwise] P2 [XP2CTR clockwise]} {} {[XP2CTR] P2 [XP2CTR]}
+  {} {} {} {} VERT round ldiagquadcase
+  XP2POST LTO TO
+
+  % (leaving ldiagrvlcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+% farr tarr { from } { to } xindent zindent bias fbias tbias ldiagdwraplinepath -
+/ldiagdwraplinepath
+{
+  % (entering ldiagdwraplinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /tbias exch def
+  /fbias exch def
+  /bias exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  /DIRN [ from (CTR) ldiagdolabel pop to (CTR) ldiagdolabel pop
+  lt { 180 dg } { 0 dg } ifelse ] cvx def
+  from (CTR) ldiagdolabel DIRN from (CIRCUM) ldiagdolabel ldiagpadd 0 0
+  fromarrowlength DIRN ldiagatangle ldiagpadd /FROM ldiagpointdef
+  DIRN /FROM@ANGLE ldiagangledef
+  to (CTR) ldiagdolabel DIRN 180 dg add to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength DIRN 180 dg add ldiagatangle ldiagpadd /TO ldiagpointdef
+  DIRN /TO@ANGLE ldiagangledef
+  FROM 0 0 fbias 0 ldiagmax DIRN ldiagatangle ldiagpadd /P1 ldiagpointdef
+  DIRN 180 dg eq { 225 dg } { -45 dg } ifelse /P1@ANGLE ldiagangledef
+  TO 0 0 tbias 0 ldiagmax DIRN 180 dg add ldiagatangle ldiagpadd
+  /P4 ldiagpointdef
+  DIRN 180 dg eq { 135 dg } { 45 dg } ifelse /P4@ANGLE ldiagangledef
+  /YC [ from (CTR) ldiagdolabel 270 dg from (CIRCUM) ldiagdolabel ldiagpadd
+  exch pop to (CTR) ldiagdolabel 270 dg to (CIRCUM) ldiagdolabel ldiagpadd
+  exch pop ldiagmin bias 0 ldiagmax sub ] cvx def
+  P1 pop YC /P2 ldiagpointdef
+  P4@ANGLE 180 dg sub /P2@ANGLE ldiagangledef
+  P4 pop YC /P3 ldiagpointdef
+  P1@ANGLE 180 dg sub /P3@ANGLE ldiagangledef
+  /XINDENT [ xindent FROM P1 ldiagdistance ldiagmin ] cvx def
+  FROM 0 0 XINDENT DIRN ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  FROM@ANGLE /LFROM@ANGLE ldiagangledef
+  /ZINDENT [ zindent TO P4 ldiagdistance ldiagmin ] cvx def
+  TO 0 0 ZINDENT DIRN 180 dg add ldiagatangle ldiagpadd /LTO ldiagpointdef
+  TO@ANGLE /LTO@ANGLE ldiagangledef
+  P2 0.5 ldiagpmul P3 0.5 ldiagpmul ldiagpadd /LMID ldiagpointdef
+  DIRN 180 dg sub /LMID@ANGLE ldiagangledef
+  FROM P1 P2 P3 P4 TO
+
+  % (leaving ldiagdwraplinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+% farr tarr { from } { to } xindent zindent bias fbias tbias radius
+% ldiagdwrapcurvepath -
+/ldiagdwrapcurvepath
+{
+  % (entering ldiagdwrapcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /radius exch def
+  /tbias exch def
+  /fbias exch def
+  /bias exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  /DIRN [ from (CTR) ldiagdolabel pop to (CTR) ldiagdolabel pop lt
+  { 180 dg } { 0 dg } ifelse ] cvx def
+  /CLOCK [ from (CTR) ldiagdolabel pop to (CTR) ldiagdolabel pop lt
+  { anticlockwise } { clockwise } ifelse ] cvx def
+  from (CTR) ldiagdolabel DIRN from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength DIRN ldiagatangle ldiagpadd /FROM ldiagpointdef
+  DIRN /FROM@ANGLE ldiagangledef
+  to (CTR) ldiagdolabel DIRN 180 dg add to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength DIRN 180 dg add ldiagatangle ldiagpadd /TO ldiagpointdef
+  DIRN /TO@ANGLE ldiagangledef
+  /XP1 [ FROM 0 0 fbias 0 ldiagmax DIRN ldiagatangle ldiagpadd ] cvx def
+  /XP4 [ TO 0 0 tbias 0 ldiagmax DIRN 180 dg add ldiagatangle ldiagpadd ] cvx def
+  /YC [ from (CTR) ldiagdolabel 270 dg from (CIRCUM) ldiagdolabel ldiagpadd
+  exch pop to (CTR) ldiagdolabel 270 dg to (CIRCUM) ldiagdolabel ldiagpadd
+  exch pop ldiagmin bias 0 ldiagmax sub ] cvx def
+  /XP2 [ XP1 pop YC ] cvx def
+  /XP3 [ XP4 pop YC ] cvx def
+  /RP1 [ radius XP1 FROM ldiagdistance XP1 XP2 ldiagdistance 2 div
+  ldiagmin ldiagmin ] cvx def
+  /XP1PRE [ XP1 0 0 RP1 XP1 FROM ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP1POST [ XP1 0 0 RP1 XP1 XP2 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP1CTR [ XP1PRE 0 0 RP1 XP1 XP2 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  XP1CTR 0 0 RP1 XP1CTR XP1 ldiagangleto ldiagatangle ldiagpadd /P1 ldiagpointdef
+  XP1CTR P1 ldiagangleto DIRN add 90 dg sub /P1@ANGLE ldiagangledef
+  /RP2 [ radius XP1 XP2 ldiagdistance 2 div XP2 XP3 ldiagdistance 2 div
+  ldiagmin ldiagmin ] cvx def
+  /XP2PRE [ XP2 0 0 RP2 XP2 XP1 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP2POST [ XP2 0 0 RP2 XP2 XP3 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP2CTR [ XP2PRE 0 0 RP2 XP2 XP3 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  XP2CTR 0 0 RP2 XP2CTR XP2 ldiagangleto ldiagatangle ldiagpadd /P2 ldiagpointdef
+  XP2CTR P2 ldiagangleto DIRN add 90 dg sub /P2@ANGLE ldiagangledef
+  /RP3 [ radius XP2 XP3 ldiagdistance 2 div XP3 XP4 ldiagdistance 2 div
+  ldiagmin ldiagmin ] cvx def
+  /XP3PRE [ XP3 0 0 RP3 XP3 XP2 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP3POST [ XP3 0 0 RP3 XP3 XP4 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP3CTR [ XP3PRE 0 0 RP3 XP3 XP4 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  XP3CTR 0 0 RP3 XP3CTR XP3 ldiagangleto ldiagatangle ldiagpadd /P3 ldiagpointdef
+  XP3CTR P3 ldiagangleto DIRN add 90 dg sub /P3@ANGLE ldiagangledef
+  /RP4 [ radius XP4 XP3 ldiagdistance 2 div XP4 TO ldiagdistance
+  ldiagmin ldiagmin ] cvx def
+  /XP4PRE [ XP4 0 0 RP4 XP4 XP3 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP4POST [ XP4 0 0 RP4 XP4 TO ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP4CTR [ XP4PRE 0 0 RP4 XP4 TO ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  XP4CTR 0 0 RP4 XP4CTR XP4 ldiagangleto ldiagatangle ldiagpadd /P4 ldiagpointdef
+  XP4CTR P4 ldiagangleto DIRN add 90 dg sub /P4@ANGLE ldiagangledef
+  /XINDENT [ xindent FROM XP1PRE ldiagdistance ldiagmin ] cvx def
+  FROM 0 0 XINDENT DIRN ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  FROM@ANGLE /LFROM@ANGLE ldiagangledef
+  XP2 0.5 ldiagpmul XP3 0.5 ldiagpmul ldiagpadd /LMID ldiagpointdef
+  DIRN 180 dg sub /LMID@ANGLE ldiagangledef
+  /ZINDENT [ zindent TO XP4POST ldiagdistance ldiagmin ] cvx def
+  TO 0 0 ZINDENT DIRN 180 dg add ldiagatangle ldiagpadd /LTO ldiagpointdef
+  TO@ANGLE /LTO@ANGLE ldiagangledef
+  FROM LFROM
+  XP1PRE [XP1CTR CLOCK] XP1POST
+  XP2PRE [XP2CTR CLOCK] XP2POST
+  LMID
+  XP3PRE [XP3CTR CLOCK] XP3POST
+  XP4PRE [XP4CTR CLOCK] XP4POST
+  LTO TO
+
+  % (leaving ldiagdwrapcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+% farr tarr { from } { to } xindent zindent bias fbias tbias ldiaguwraplinepath -
+/ldiaguwraplinepath
+{
+  % (entering ldiaguwraplinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /tbias exch def
+  /fbias exch def
+  /bias exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  /DIRN [ from (CTR) ldiagdolabel pop to (CTR) ldiagdolabel pop lt
+  { 180 dg } { 0 dg } ifelse ] cvx def
+  from (CTR) ldiagdolabel DIRN from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength DIRN ldiagatangle ldiagpadd /FROM ldiagpointdef
+  DIRN /FROM@ANGLE ldiagangledef
+  to (CTR) ldiagdolabel DIRN 180 dg add to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength DIRN 180 dg add ldiagatangle ldiagpadd /TO ldiagpointdef
+  DIRN /TO@ANGLE ldiagangledef
+  FROM 0 0 fbias 0 ldiagmax DIRN ldiagatangle ldiagpadd /P1 ldiagpointdef
+  DIRN 180 dg eq { 135 dg } { 45 dg } ifelse /P1@ANGLE ldiagangledef
+  TO 0 0 tbias 0 ldiagmax DIRN 180 dg add ldiagatangle ldiagpadd
+  /P4 ldiagpointdef
+  DIRN 180 dg eq { 225 dg } { -45 dg } ifelse /P4@ANGLE ldiagangledef
+  /YC [ from (CTR) ldiagdolabel 90 dg from (CIRCUM) ldiagdolabel ldiagpadd
+  exch pop to (CTR) ldiagdolabel 90 dg to (CIRCUM) ldiagdolabel ldiagpadd
+  exch pop ldiagmax bias 0 ldiagmax add ] cvx def
+  P1 pop YC /P2 ldiagpointdef
+  P4@ANGLE 180 dg sub /P2@ANGLE ldiagangledef
+  P4 pop YC /P3 ldiagpointdef
+  P1@ANGLE 180 dg sub /P3@ANGLE ldiagangledef
+  /XINDENT [ xindent FROM P1 ldiagdistance ldiagmin ] cvx def
+  FROM 0 0 XINDENT DIRN ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  FROM@ANGLE /LFROM@ANGLE ldiagangledef
+  /ZINDENT [ zindent TO P4 ldiagdistance ldiagmin ] cvx def
+  TO 0 0 ZINDENT DIRN 180 dg add ldiagatangle ldiagpadd /LTO ldiagpointdef
+  TO@ANGLE /LTO@ANGLE ldiagangledef
+  P2 0.5 ldiagpmul P3 0.5 ldiagpmul ldiagpadd /LMID ldiagpointdef
+  DIRN 180 dg sub /LMID@ANGLE ldiagangledef
+  FROM P1 P2 P3 P4 TO
+
+  % (leaving ldiaguwraplinepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+% farr tarr { from } { to } xindent zindent bias fbias tbias radius
+% ldiaguwrapcurvepath -
+/ldiaguwrapcurvepath
+{
+  % (entering ldiaguwrapcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+  /radius exch def
+  /tbias exch def
+  /fbias exch def
+  /bias exch def
+  /zindent exch def
+  /xindent exch def
+  cvlit /to exch def
+  cvlit /from exch def
+  /toarrowlength exch def
+  /fromarrowlength exch def
+
+  /DIRN [ from (CTR) ldiagdolabel pop to (CTR) ldiagdolabel pop lt
+  { 180 dg } { 0 dg } ifelse ] cvx def
+  /CLOCK [ from (CTR) ldiagdolabel pop to (CTR) ldiagdolabel pop lt
+  { clockwise } { anticlockwise } ifelse ] cvx def
+  from (CTR) ldiagdolabel DIRN from (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 fromarrowlength DIRN ldiagatangle ldiagpadd /FROM ldiagpointdef
+  DIRN /FROM@ANGLE ldiagangledef
+  to (CTR) ldiagdolabel DIRN 180 dg add to (CIRCUM) ldiagdolabel ldiagpadd
+  0 0 toarrowlength DIRN 180 dg add ldiagatangle ldiagpadd /TO ldiagpointdef
+  DIRN /TO@ANGLE ldiagangledef
+  /XP1 [ FROM 0 0 fbias 0 ldiagmax DIRN ldiagatangle ldiagpadd ] cvx def
+  /XP4 [ TO 0 0 tbias 0 ldiagmax DIRN 180 dg add ldiagatangle ldiagpadd ] cvx def
+  /YC [ from (CTR) ldiagdolabel 90 dg from (CIRCUM) ldiagdolabel ldiagpadd
+  exch pop to (CTR) ldiagdolabel 90 dg to (CIRCUM) ldiagdolabel ldiagpadd
+  exch pop ldiagmax bias 0 ldiagmax add ] cvx def
+  /XP2 [ XP1 pop YC ] cvx def
+  /XP3 [ XP4 pop YC ] cvx def
+  /RP1 [ radius XP1 FROM ldiagdistance XP1 XP2 ldiagdistance 2 div
+  ldiagmin ldiagmin ] cvx def
+  /XP1PRE [ XP1 0 0 RP1 XP1 FROM ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP1POST [ XP1 0 0 RP1 XP1 XP2 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP1CTR [ XP1PRE 0 0 RP1 XP1 XP2 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  XP1CTR 0 0 RP1 XP1CTR XP1 ldiagangleto ldiagatangle ldiagpadd /P1 ldiagpointdef
+  XP1CTR P1 ldiagangleto DIRN add 90 dg add /P1@ANGLE ldiagangledef
+  /RP2 [ radius XP1 XP2 ldiagdistance 2 div XP2 XP3 ldiagdistance 2 div
+  ldiagmin ldiagmin ] cvx def
+  /XP2PRE [ XP2 0 0 RP2 XP2 XP1 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP2POST [ XP2 0 0 RP2 XP2 XP3 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP2CTR [ XP2PRE 0 0 RP2 XP2 XP3 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  XP2CTR 0 0 RP2 XP2CTR XP2 ldiagangleto ldiagatangle ldiagpadd /P2 ldiagpointdef
+  XP2CTR P2 ldiagangleto DIRN add 90 dg add /P2@ANGLE ldiagangledef
+  /RP3 [ radius XP2 XP3 ldiagdistance 2 div XP3 XP4 ldiagdistance 2 div
+  ldiagmin ldiagmin ] cvx def
+  /XP3PRE [ XP3 0 0 RP3 XP3 XP2 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP3POST [ XP3 0 0 RP3 XP3 XP4 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP3CTR [ XP3PRE 0 0 RP3 XP3 XP4 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  XP3CTR 0 0 RP3 XP3CTR XP3 ldiagangleto ldiagatangle ldiagpadd /P3 ldiagpointdef
+  XP3CTR P3 ldiagangleto DIRN add 90 dg add /P3@ANGLE ldiagangledef
+  /RP4 [ radius XP4 XP3 ldiagdistance 2 div XP4 TO ldiagdistance
+  ldiagmin ldiagmin ] cvx def
+  /XP4PRE [ XP4 0 0 RP4 XP4 XP3 ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP4POST [ XP4 0 0 RP4 XP4 TO ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  /XP4CTR [ XP4PRE 0 0 RP4 XP4 TO ldiagangleto ldiagatangle ldiagpadd ] cvx def
+  XP4CTR 0 0 RP4 XP4CTR XP4 ldiagangleto ldiagatangle ldiagpadd /P4 ldiagpointdef
+  XP4CTR P4 ldiagangleto DIRN add 90 dg add /P4@ANGLE ldiagangledef
+  /XINDENT [ xindent FROM XP1PRE ldiagdistance ldiagmin ] cvx def
+  FROM 0 0 XINDENT DIRN ldiagatangle ldiagpadd /LFROM ldiagpointdef
+  FROM@ANGLE /LFROM@ANGLE ldiagangledef
+  XP2 0.5 ldiagpmul XP3 0.5 ldiagpmul ldiagpadd /LMID ldiagpointdef
+  DIRN 180 dg sub /LMID@ANGLE ldiagangledef
+  /ZINDENT [ zindent TO XP4POST ldiagdistance ldiagmin ] cvx def
+  TO 0 0 ZINDENT DIRN 180 dg add ldiagatangle ldiagpadd /LTO ldiagpointdef
+  TO@ANGLE /LTO@ANGLE ldiagangledef
+  FROM LFROM
+  XP1PRE [XP1CTR CLOCK] XP1POST
+  XP2PRE [XP2CTR CLOCK] XP2POST
+  LMID
+  XP3PRE [XP3CTR CLOCK] XP3POST
+  XP4PRE [XP4CTR CLOCK] XP4POST
+  LTO TO
+
+  % (leaving ldiaguwrapcurvepath) 0 ldiagdebugprint
+  % count (  stack size is) 1 ldiagdebugprint pop
+} def
+
+% shape and labels of the @SolidArrowHead symbol
+% - ldiagsolidarrowhead -
+/ldiagsolidarrowhead
+{
+  0 0 xsize ysize 0.5 mul 0 ysize
+} def
+
+% shape and labels of the @OpenArrowHead symbol
+% <pathwidth> ldiagopenarrowhead -
+/ldiagopenarrowhead
+{
+  /pathwidth exch def
+  /PSW [ 0 0 ] cvx def
+  /PNW [ 0 ysize ] cvx def
+  /PE  [ xsize ysize 0.5 mul ] cvx def
+  /REL [ 0 0 pathwidth PE PNW ldiagangleto 90 add ldiagatangle ] cvx def
+  /PNA [ 0 ysize 0.5 mul pathwidth 0.5 mul add ] cvx def
+  /PSA [ 0 ysize 0.5 mul pathwidth 0.5 mul sub ] cvx def
+  /PNI [ PNA PNA xsize 0 ldiagpadd PNW REL ldiagpadd
+	 PE REL ldiagpadd ldiaglineintersect ] cvx def
+  /PSI [ 0 pathwidth PNI ldiagpsub ] cvx def
+
+  PSW PE PNW PNI PNA PSA PSI PSW
+} def
+
+% shape and labels of the @HalfOpenArrowHead symbol
+% <pathwidth> ldiaghalfopenarrowhead -
+/ldiaghalfopenarrowhead
+{
+  /pathwidth exch def
+  0 0
+  xsize ysize 0.5 mul
+  0 ysize
+  xsize 0.3 mul ysize 0.5 mul pathwidth 0.5 mul add
+  0             ysize 0.5 mul pathwidth 0.5 mul add
+  0             ysize 0.5 mul pathwidth 0.5 mul sub
+  xsize 0.3 mul ysize 0.5 mul pathwidth 0.5 mul sub
+  0 0
+} def
+
+% shape and labels of the @SolidCurvedArrowHead symbol
+% - ldiagsolidcurvedarrowhead -
+/ldiagsolidcurvedarrowhead
+{
+  0 0
+  [0 0 xsize ysize 0.5 mul ldiaglinebetween
+   xsize 0 xsize ysize ldiaglineintersect clockwise]
+  xsize ysize 0.5 mul
+  [xsize ysize 0.5 mul 0 ysize ldiaglinebetween
+   xsize 0 xsize ysize ldiaglineintersect clockwise]
+  0 ysize
+} def
+
+% shape and labels of the @OpenCurvedArrowHead symbol
+% <pathwidth> ldiagopencurvedarrowhead -
+/ldiagopencurvedarrowhead
+{
+  /pathwidth exch def
+  /LR [ 0 0 xsize ysize 0.5 mul ldiaglinebetween
+	xsize 0 xsize ysize ldiaglineintersect
+      ] cvx def
+  /UR [ xsize ysize 0.5 mul 0 ysize ldiaglinebetween
+	xsize 0 xsize ysize ldiaglineintersect
+      ] cvx def
+  /PW2 [ pathwidth 0.5 mul ] cvx def
+  /UMID [
+      0 ysize 0.5 mul PW2 add
+      xsize ysize 0.5 mul PW2 add
+      0 ysize 0 0 1 ft UR 0 ysize ldiagangleto 90 add ldiagatangle
+      ldiagpadd 0 ysize ldiaglineintersect
+      ] cvx def
+  /LMID [ 0 pathwidth UMID ldiagpsub ] cvx def
+  0 0
+  [LR clockwise]
+  xsize ysize 0.5 mul
+  [UR clockwise]
+  0 ysize
+  UMID
+  0 ysize 0.5 mul PW2 add
+  0 ysize 0.5 mul PW2 sub
+  LMID
+  0 0
+} def
+
+% shape and labels of the @HalfOpenCurvedArrowHead symbol
+% <pathwidth> ldiaghalfopencurvedarrowhead -
+/ldiaghalfopencurvedarrowhead
+{
+  /pathwidth exch def
+  /LR [ 0 0 xsize ysize 0.5 mul ldiaglinebetween
+	xsize 0 xsize ysize ldiaglineintersect
+      ] cvx def
+  /UR [ xsize ysize 0.5 mul 0 ysize ldiaglinebetween
+	xsize 0 xsize ysize ldiaglineintersect
+      ] cvx def
+  /BR [ 0 0 LR 0 ysize UR ldiaglineintersect ] cvx def
+  /BRAD [ 0 0 BR ldiagdistance ] cvx def
+  /PW2 [ pathwidth 0.5 mul ] cvx def
+  /XDIST [ BRAD dup mul PW2 dup mul sub sqrt ] cvx def
+  /UMID [ BR XDIST PW2 ldiagpadd ] cvx def
+  /LMID [ BR XDIST 0 PW2 sub ldiagpadd ] cvx def
+  0 0
+  [LR clockwise]
+  xsize ysize 0.5 mul
+  [UR clockwise]
+  0 ysize
+  [BR clockwise]
+  UMID
+  0 ysize 0.5 mul PW2 add
+  0 ysize 0.5 mul PW2 sub
+  LMID
+  [BR clockwise]
+  0 0
+} def
+
+end
+%%EndResource
diff --git a/include/doc b/include/doc
new file mode 100644
index 0000000..7dda601
--- /dev/null
+++ b/include/doc
@@ -0,0 +1,353 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for ordinary documents                                    #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  @SysInclude commands for standard packages.                                #
+#                                                                             #
+###############################################################################
+
+  @SysInclude { fontdefs	} # font definitions
+  @SysInclude { langdefs	} # language definitions
+  @SysInclude { bsf		} # BasicSetup package
+  @SysInclude { dsf		} # DocumentSetup package
+  @SysInclude { docf		} # OrdinarySetup extension
+
+
+###############################################################################
+#                                                                             #
+#  @Include command for reading personal definitions from current directory.  #
+#                                                                             #
+###############################################################################
+
+  @Include { mydefs }
+
+
+###############################################################################
+#                                                                             #
+#  The @BasicSetup @Use clause - basics, lists, paragraphs, displays.         #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+
+@Use { @BasicSetup
+  # @InitialFont	{ Times Base 12p	} # initial font
+  # @InitialBreak	{{adjust 1.2fx hyphen} @OrIfPlain {ragged 1fx nohyphen}}
+  # @InitialSpace	{ lout			} # initial space style
+  # @InitialLanguage	{ English		} # initial language
+  # @InitialColour	{ black			} # initial colour
+  # @OptimizePages	{ No			} # optimize page breaks?
+  # @HeadingFont	{ Bold			} # font for @Heading
+  # @ParaGap		{ 1.3vx @OrIfPlain 1f	} # gap between paragraphs
+  # @ParaIndent		{ 2.00f	@OrIfPlain 5s	} # first-line indent for @PP
+  # @DisplayGap		{ 1.00v	@OrIfPlain 1f	} # gap above, below displays
+  # @DisplayIndent	{ 2.00f	@OrIfPlain 5s	} # @IndentedDisplay indent
+  # @DefaultIndent	{ 0.5rt			} # @Display indent
+  # @DisplayNumStyle	{ (num)			} # style of display numbers
+  # @WideIndent		{ 4.00f	@OrIfPlain 10s	} # @WideTaggedList indent
+  # @VeryWideIndent	{ 8.00f	@OrIfPlain 20s	} # @VeryWideTaggedList indent
+  # @ListOuterGap	{ 1.00v	@OrIfPlain 1f	} # gap before, after lists
+  # @ListGap		{ 1.00v	@OrIfPlain 1f	} # gap between list items
+  # @ListIndent		{ 0s			} # indent of list items
+  # @ListRightIndent	{ 0s			} # right indent of list items
+  # @ListLabelWidth	{ 2.00f	@OrIfPlain 5s	} # width allowed for list tags
+  # @NumberSeparator	{ .			} # separates nums like 2.3.7
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @DocumentSetup @Use clause - page layout plus figures, tables, etc.    #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+
+@Use { @DocumentSetup
+  # @PageType		{ A4	@OrIfPlain Other} # page type (width, height)
+  # @PageWidth		{ 80s			} # page width if type Other
+  # @PageHeight		{ 66f			} # page height if type Other
+  # @PageOrientation	{ Portrait		} # Portrait, Landscape, etc.
+  # @PageBackground	{  			} # background of each page
+  # @TopMargin		{ 2.5c	@OrIfPlain 6f	} # top margin of all pages
+  # @FootMargin		{ 2.5c	@OrIfPlain 6f	} # bottom margin of all pages
+  # @OddLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of odd pages
+  # @OddRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of odd pages
+  # @EvenLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of even pages
+  # @EvenRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of even pages
+  # @PageBoxType	{ None			} # None Box CurveBox ShadowBox
+  # @PageBoxMargin	{ 1.00c			} # page box margin
+  # @PageBoxLineWidth	{			} # page box line thickness
+  # @PageBoxPaint	{ none			} # page box paint
+  # @PageBoxShadow	{ 0.60c			} # shadow margin if ShadowBox
+  # @ColumnNumber	{ 1			} # number of columns (1 to 10)
+  # @ColumnGap		{ 1.00c	@OrIfPlain 6s	} # column gap
+
+  # @FigureLocation	{ PageTop		} # default figure location
+  # @TableLocation	{ PageTop		} # default table location
+  # @FigureFormat	{ @CC @Body		} # default figure format
+  # @TableFormat	{ @CC @Body		} # default table format
+  # @FigureWord		{ figure		} # "Figure" word else anything
+  # @TableWord		{ table			} # "Table" word else anything
+  # @FigureNumbers	{ Arabic		} # method of numbering figures
+  # @TableNumbers	{ Arabic		} # method of numbering tables
+  # @FigureCaptionPos	{ Below 		} # Above or Below
+  # @TableCaptionPos	{ Below			} # Above or Below
+  # @CaptionFont        {                       } # figure, table caption font
+  # @CaptionBreak       {                       } # figure, table caption break
+  # @CaptionFormat      { @B { number @DotSep @OneCol }	} # figure, table caption format
+  # @MakeFigureContents { No                    } # list of figures at start
+  # @MakeTableContents  { No                    } # list of tables at start
+  # @MakeContents	{ No			} # make contents? Yes or No
+  # @ContentsGap	{ 0.20v	@OrIfPlain 0f	} # extra gap above minor entry
+  # @ContentsGapAbove	{ 0.80v	@OrIfPlain 1f	} # extra gap above major entry
+  # @ContentsGapBelow	{ 0.00v	@OrIfPlain 0f	} # extra gap below major entry
+  # @ContentsFont       { Bold                  } # font for major entry
+  # @ContentsPartGapAbove { 1.00v @OrIfPlain 1f	} # extra gap above `part' entry
+  # @ContentsPartGapBelow { 0.00v @OrIfPlain 0f	} # extra gap below `part' entry
+  # @ContentsFormat	{ number @DotSep title	} # contents entry format
+  # @ContentsLeader	{ ..			} # leader symbol in contents
+  # @ContentsLeaderGap	{ 4s	@OrIfPlain 2s	} # gap between leaders
+  # @ContentsRightWidth	{ 3f	@OrIfPlain 6s	} # page numbers column width
+  # @MakeReferences	{ Yes			} # make references? Yes or No
+  # @RefCiteStyle	{ [cite]		} # citation style
+  # @RefCiteLabels	{ @RefNum		} # citation items
+  # @RefNumbers		{ Arabic		} # reference numbers
+  # @RefListFormat	{ Labels		} # NoLabels, Labels, etc.
+  # @RefListLabels	{ [@RefNum]		} # ref list label format
+  # @RefListTitle	{ references		} # title of reference list
+  # @ChapRefListTitle	{ references		} # title of chapter ref list
+  # @RefListIndent	{ 0s			} # indent to left of labels
+  # @RefListRightIndent	{ 0s			} # indent to right of items
+  # @RefListGap		{ @ListGap		} # gap between ref list items
+  # @RefListFont	{        		} # font used in reference list
+  # @RefListBreak	{        		} # break style of ref list
+  # @RefListLabelWidth 	{ @ListLabelWidth	} # Labels column width
+  # @RefListSortKey	{ @Tag			} # sorting key
+  # @MakeIndex		{ No			} # make index? Yes or No
+  # @IndexFont		{			} # index entries font
+  # @IndexBreak		{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexColumnNumber	{ 2			} # index columns (1 to 10)
+  # @IndexColumnGap	{ 1.00c	@OrIfPlain 6s	} # index column gap
+  # @MakeIndexA		{ No 			} # make index A? Yes or No
+  # @IndexAFont		{			} # index A entries font
+  # @IndexABreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexAColumnNumber	{ 2			} # index A columns (1 to 10)
+  # @IndexAColumnGap	{ 1.00c	@OrIfPlain 6s	} # index A column gap
+  # @MakeIndexB		{ No 			} # make index B? Yes or No
+  # @IndexBFont		{			} # index B entries font
+  # @IndexBBreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexBColumnNumber	{ 2			} # index B columns (1 to 10)
+  # @IndexBColumnGap	{ 1.00c	@OrIfPlain 6s	} # index B column gap
+  # @TopGap		{ 0.75c	@OrIfPlain 2f	} # gap between figures
+  # @MidGap		{ 0.75c	@OrIfPlain 2f	} # gap above/below body text
+  # @FootNoteNumbers	{ Arabic		} # footnote numbers
+  # @FootNoteThrough	{ No			} # numbered through chapter?
+  # @FootNoteLocation	{ ColFoot		} # where the footnote appears
+  # @FootNoteFont	{ 0.80f			} # font for footnotes
+  # @FootNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for footnotes
+  # @FootNoteFormat     { { number &0.05f } @Insert body } # footnote format
+  # @FootLen		{ 2.00c	@OrIfPlain 10s	} # length of footnote line
+  # @FootAboveGap	{ @DisplayGap		} # gap above footnote line
+  # @FootGap		{ 0.20c	@OrIfPlain 1fx	} # gap between footnotes
+  # @MarginNoteFont	{ 0.80f			} # font of margin notes
+  # @MarginNoteBreak	{ ragged 1.10fx		} # break style of margin notes
+  # @MarginNoteHGap	{ 0.5c   		} # horizontal gap to notes
+  # @MarginNoteVGap	{ @DisplayGap  		} # min vertical gap between
+  # @MarginNoteWidth	{ 1.50c  		} # width of margin notes
+  # @EndNoteNumbers	{ Arabic		} # endnote numbers
+  # @EndNoteFont	{ 0.80f			} # font of endnotes
+  # @EndNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for endnotes
+  # @EndNoteFormat	{ { number &0.05f } @Insert body } # endnote format
+  # @EndNoteGap		{ 0.20c	@OrIfPlain 1f	} # gap between endnotes
+  # @TheoremWord	{ theorem		} # "Theorem" word, etc.
+  # @TheoremTitleFormat	{ (title)		} # only if title present
+  # @TheoremFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @DefinitionWord	{ definition		} # "Definition" word, etc.
+  # @DefinitionTitleFormat { (title)		} # only if title present
+  # @DefinitionFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ClaimWord		{ claim			} # "Claim" word, etc.
+  # @ClaimTitleFormat	{ (title)		} # only if title present
+  # @ClaimFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @PropositionWord	{ proposition		} # "Proposition" word, etc.
+  # @PropositionTitleFormat { (title)		} # only if title present
+  # @PropositionFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @LemmaWord		{ lemma			} # "Lemma" word, etc.
+  # @LemmaTitleFormat	{ (title)		} # only if title present
+  # @LemmaFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @CorollaryWord	{ corollary		} # "Corollary" word, etc.
+  # @CorollaryTitleFormat { (title)		} # only if title present
+  # @CorollaryFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ExampleWord	{ example		} # "Example" word, etc.
+  # @ExampleTitleFormat	{ (title)		} # only if title present
+  # @ExampleFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ProofWord		{ proof			} # "Proof" word, etc.
+  # @PageHeaders	{ Simple		} # None Simple Titles NoTitles
+  # @PageNumbers	{ Arabic		} # page numbers
+  # @FirstPageNumber	{ 1			} # number of first page 
+  # @IntroPageNumbers	{ Roman			} # intro page numbers
+  # @IntroFirstPageNumber{ 1			} # number of first intro page 
+  # @StructPageNums	{ No			} # make structured page numbers
+
+  # @OddTop		{ @Centre{- @PageNum -}	} # Simple page headers
+  # @OddFoot		{ @Null			}
+  # @EvenTop		{ @Centre{- @PageNum -}	}
+  # @EvenFoot		{ @Null			}
+  # @StartOddTop	{ @Null			}
+  # @StartOddFoot	{ @Null			}
+  # @StartEvenTop	{ @Null			}
+  # @StartEvenFoot	{ @Null			}
+  # @IntroOddTop	{ @Null			}
+  # @IntroOddFoot	{ @Centre @PageNum	}
+  # @IntroEvenTop	{ @Null			}
+  # @IntroEvenFoot	{ @Centre @PageNum	}
+  # @IntroStartOddTop	{ @Null			}
+  # @IntroStartOddFoot	{ @Null			}
+  # @IntroStartEvenTop	{ @Null			}
+  # @IntroStartEvenFoot	{ @Null			}
+
+						  # Titles, NoTitles headers
+  # @RunningOddTop  { @I {@MinorNum @DotSep @MinorTitle} @Right @B @PageNum }
+  # @RunningOddFoot		{ @Null					}
+  # @RunningEvenTop { @B @PageNum @Right @I {@MajorNum @DotSep @MajorTitle} }
+  # @RunningEvenFoot		{ @Null					}
+  # @RunningStartOddTop 	{ @Null					}
+  # @RunningStartOddFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+  # @RunningStartEvenTop	{ @Null					}
+  # @RunningStartEvenFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+  # @RunningIntroOddTop		{ @Null					}
+  # @RunningIntroOddFoot	{ @Right @PageNum			}
+  # @RunningIntroEvenTop	{ @Null					}
+  # @RunningIntroEvenFoot	{ @PageNum				}
+  # @RunningIntroStartOddTop	{ @Null					}
+  # @RunningIntroStartOddFoot	{ @Null					}
+  # @RunningIntroStartEvenTop	{ @Null					}
+  # @RunningIntroStartEvenFoot	{ @Null					}
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @OrdinarySetup @Use clause - options specific to ordinary documents.   #
+#                                                                             #
+###############################################################################
+
+@Use { @OrdinarySetup
+  # @IndexWord			{ index		} # word for "Index" word etc.
+  # @IndexAWord			{ index		} # word for "Index" (A)
+  # @IndexBWord			{ index		} # word for "Index" (B)
+  # @AppendixWord		{ appendix	} # word for "Appendix"
+  # @SectionNumbers		{ Arabic	} # kind of section numbers
+  # @FirstSectionNumber		{ 1		} # first section num (Arabic)
+  # @SubSectionNumbers		{ Arabic	} # kind of subsection numbers
+  # @FirstSubSectionNumber	{ 1		} # first subsect num (Arabic)
+  # @SubSubSectionNumbers	{ Arabic	} # kind of sub-subsect numbers
+  # @FirstSubSubSectionNumber	{ 1		} # first subsub. num (Arabic)
+  # @AppendixNumbers		{ UCAlpha	} # kind of appendix numbers
+  # @FirstAppendixNumber	{ 1		} # first appendix num (Arabic)
+  # @SubAppendixNumbers		{ Arabic	} # kind of subappendix numbers
+  # @FirstSubAppendixNumber	{ 1		} # first sub-app. num (Arabic)
+  # @SubSubAppendixNumbers	{ Arabic	} # kind of sub-subapp. numbers
+  # @FirstSubSubAppendixNumber	{ 1		} # first sub-sub. num (Arabic)
+  # @SectionHeadingFont		{ Bold			} # section head font
+  # @SectionHeadingBreak	{ ragged 1.2fx nohyphen	} # section head break
+  # @SectionHeadingFormat	{ number @DotSep title	} # section head fmt
+  # @SubSectionHeadingFont	{ Bold			} # subsect head font
+  # @SubSectionHeadingBreak	{ ragged 1.2fx nohyphen	} # subsect head break
+  # @SubSectionHeadingFormat	{ number @DotSep title	} # subsect head fmt
+  # @SubSubSectionHeadingFont	{ Slope			} # sub-ss. head font
+  # @SubSubSectionHeadingBreak	{ ragged 1.2fx nohyphen	} # sub-ss. head break
+  # @SubSubSectionHeadingFormat	{ number @DotSep title	} # sub-ss. head fmt
+  # @AppendixHeadingFont	{ Bold			} # appendix head font
+  # @AppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # appendix head break
+  # @AppendixHeadingFormat	{ number @DotSep title	} # appendix head fmt
+  # @SubAppendixHeadingFont	{ Bold			} # subapp. head font
+  # @SubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # subapp. head break
+  # @SubAppendixHeadingFormat	{ number @DotSep title	} # subapp. head format
+  # @SubSubAppendixHeadingFont	{ Slope			} # sub-sa. head font
+  # @SubSubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # sub-sa. head break
+  # @SubSubAppendixHeadingFormat{ number @DotSep title	} # sub-sa. head fmt
+  # @ReferencesHeadingFont	{ Bold			} # refs head font
+  # @ReferencesHeadingBreak	{ ragged 1.2fx nohyphen	} # refs head break
+  # @ReferencesHeadingFormat	{ title			} # refs head format
+  # @IndexHeadingFont		{ Bold			} # index head font
+  # @IndexHeadingBreak		{ ragged 1.2fx nohyphen	} # index head break
+  # @IndexHeadingFormat		{ title			} # index head format
+  # @IndexAHeadingFont		{ Bold			} # index A head font
+  # @IndexAHeadingBreak		{ ragged 1.2fx nohyphen	} # index A head break
+  # @IndexAHeadingFormat	{ title			} # index A head fmt
+  # @IndexBHeadingFont		{ Bold			} # index B head font
+  # @IndexBHeadingBreak		{ ragged 1.2fx nohyphen	} # index B head break
+  # @IndexBHeadingFormat	{ title			} # index B head fmt
+  # @SectionGap			{ 2.0v	@OrIfPlain 3f	} # between sections
+  # @SubSectionGap		{ 1.5v	@OrIfPlain 2f	} # between subsects
+  # @SubSubSectionGap		{ 1.5v	@OrIfPlain 2f	} # between sub-subs.
+  # @AppendixGap		{ 2.0v	@OrIfPlain 3f	} # between appendices
+  # @SubAppendixGap		{ 1.5v	@OrIfPlain 2f	} # between subappendices
+  # @SubSubAppendixGap		{ 1.5v	@OrIfPlain 2f	} # between sub-subapps
+  # @SectionInContents		{ Yes		} # add sections to contents
+  # @SubSectionInContents	{ Yes		} # add subsections to contents
+  # @SubSubSectionInContents	{ No		} # add sub-subsects to contents
+  # @AppendixInContents		{ Yes		} # add appendices to contents
+  # @SubAppendixInContents	{ Yes		} # add subappendices to contents
+  # @SubSubAppendixInContents	{ No		} # add sub-subapps to contents
+  # @ReferencesInContents	{ Yes		} # add ref. section to contents
+  # @IndexInContents		{ Yes		} # add index to contents
+  # @IndexAInContents		{ Yes		} # add index A to contents
+  # @IndexBInContents		{ Yes		} # add index B to contents
+  # @SectionNumInTheorems	{ No		} # theorem num has section num
+  # @SubSectionNumInTheorems	{ No		} # theorem num has subsect num
+  # @SubSubSectionNumInTheorems	{ No		} # theorem num has sub-ss. num
+  # @AppendixNumInTheorems	{ No		} # theorem num has appendix num
+  # @SubAppendixNumInTheorems	{ No		} # theorem num has sub-app num
+  # @SubSubAppendixNumInTheorems{ No		} # theorem num has sub-sa. num
+  # @SectionNumInDisplays	{ Yes		} # display num has section num
+  # @SubSectionNumInDisplays	{ No		} # display num has subsect num
+  # @SubSubSectionNumInDisplays	{ No		} # display num has sub-ss. num
+  # @AppendixNumInDisplays	{ Yes		} # display num has appendix num
+  # @SubAppendixNumInDisplays	{ Yes		} # display num has sub-app num
+  # @SubSubAppendixNumInDisplays{ No		} # display num has sub-sa. num
+  # @SectionNumInFigures	{ No		} # figure num has section num
+  # @SubSectionNumInFigures	{ No		} # figure num has subsect num
+  # @SubSubSectionNumInFigures	{ No		} # figure num has sub-ss. num
+  # @AppendixNumInFigures	{ No		} # figure num has appendix num
+  # @SubAppendixNumInFigures	{ No		} # figure num has sub-app num
+  # @SubSubAppendixNumInFigures	{ No		} # figure num has sub-sa. num
+  # @SectionNumInTables		{ No		} # table num has section num
+  # @SubSectionNumInTables	{ No		} # table num has subsect num
+  # @SubSubSectionNumInTables	{ No		} # table num has sub-ss. num
+  # @AppendixNumInTables	{ No		} # table num has appendix num
+  # @SubAppendixNumInTables	{ No		} # table num has sub-app num
+  # @SubSubAppendixNumInTables	{ No		} # table num has sub-sa. num
+  # @SectionNumInRunners 	{ Yes		} # runners have section num
+  # @SubSectionNumInRunners 	{ No		} # runners have subsect num
+  # @SubSubSectionNumInRunners 	{ No		} # runners have sub-ss. num
+  # @AppendixNumInRunners 	{ Yes		} # runners have appendix num
+  # @SubAppendixNumInRunners 	{ No		} # runners have sub-app num
+  # @SubSubAppendixNumInRunners { No		} # runners have sub-sa. num
+  # @SectionPrefix		{		} # for structured page nums
+  # @AppendixPrefix		{		} # for structured page nums
+  # @ReferencesPrefix		{		} # for structured page nums
+  # @IndexPrefix		{		} # for structured page nums
+  # @IndexAPrefix		{		} # for structured page nums
+  # @IndexBPrefix		{		} # for structured page nums
+}
+
+
+###############################################################################
+#                                                                             #
+#  @Database (and @SysDatabase) clauses go here.                              #
+#                                                                             #
+###############################################################################
+
+@SysDatabase @RefStyle { refstyle }		  # reference printing styles
diff --git a/include/docf b/include/docf
new file mode 100644
index 0000000..dd9f0e6
--- /dev/null
+++ b/include/docf
@@ -0,0 +1,779 @@
+
+###########################################################################
+#                                                                         #
+#  @OrdinarySetup extension to @DocumentSetup.                            #
+#                                                                         #
+#  Jeffrey H. Kingston                                                    #
+#  August 1994                                                            #
+#  5 February 1999                                                        #
+#                                                                         #
+#  This package extends DocumentSetup for ordinary documents.             #
+#                                                                         #
+###########################################################################
+
+extend @BasicSetup @DocumentSetup
+export @Doc @Document @Text
+def @OrdinarySetup
+
+    named @IndexWord			{ index			}
+    named @IndexAWord			{ index			}
+    named @IndexBWord			{ index			}
+    named @AppendixWord			{ appendix		}
+
+    named @SectionNumbers		{ Arabic		}
+    named @FirstSectionNumber		{ 1			}
+    named @SubSectionNumbers		{ Arabic		}
+    named @FirstSubSectionNumber	{ 1			}
+    named @SubSubSectionNumbers		{ Arabic		}
+    named @FirstSubSubSectionNumber	{ 1			}
+    named @AppendixNumbers		{ UCAlpha		}
+    named @FirstAppendixNumber		{ 1			}
+    named @SubAppendixNumbers		{ Arabic		}
+    named @FirstSubAppendixNumber	{ 1			}
+    named @SubSubAppendixNumbers	{ Arabic		}
+    named @FirstSubSubAppendixNumber	{ 1			}
+
+    named @SectionHeadingFont		{ Bold			}
+    named @SectionHeadingBreak		{ ragged 1.2fx nohyphen }
+    named @SectionHeadingFormat
+	    left number right title	{ number @Sep title	}
+
+    named @SubSectionHeadingFont	{ Bold			}
+    named @SubSectionHeadingBreak	{ ragged 1.2fx nohyphen	}
+    named @SubSectionHeadingFormat
+	    left number right title	{ number @Sep title	}
+
+    named @SubSubSectionHeadingFont	{ Slope			}
+    named @SubSubSectionHeadingBreak	{ ragged 1.2fx nohyphen	}
+    named @SubSubSectionHeadingFormat
+	    left number right title	{ number @Sep title	}
+
+    named @AppendixHeadingFont		{ Bold			}
+    named @AppendixHeadingBreak		{ ragged 1.2fx nohyphen	}
+    named @AppendixHeadingFormat
+	    left number right title	{ number @Sep title	}
+
+    named @SubAppendixHeadingFont	{ Bold			}
+    named @SubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	}
+    named @SubAppendixHeadingFormat
+	    left number right title	{ number @Sep title	}
+
+    named @SubSubAppendixHeadingFont	{ Slope			}
+    named @SubSubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	}
+    named @SubSubAppendixHeadingFormat
+	    left number right title	{ number @Sep title	}
+
+    named @ReferencesHeadingFont	{ Bold			}
+    named @ReferencesHeadingBreak	{ ragged 1.2fx nohyphen	}
+    named @ReferencesHeadingFormat
+	    right title			{ title			}
+
+    named @IndexHeadingFont		{ Bold			}
+    named @IndexHeadingBreak		{ ragged 1.2fx nohyphen	}
+    named @IndexHeadingFormat
+	    right title			{ title			}
+
+    named @IndexAHeadingFont		{ Bold			}
+    named @IndexAHeadingBreak		{ ragged 1.2fx nohyphen	}
+    named @IndexAHeadingFormat
+	    right title			{ title			}
+
+    named @IndexBHeadingFont		{ Bold			}
+    named @IndexBHeadingBreak		{ ragged 1.2fx nohyphen	}
+    named @IndexBHeadingFormat
+	    right title			{ title			}
+
+    named @SectionGap			{ 2.0v  @OrIfPlain 3f	}
+    named @SubSectionGap		{ 1.5v  @OrIfPlain 2f	}
+    named @SubSubSectionGap		{ 1.5v  @OrIfPlain 2f	}
+    named @AppendixGap			{ 2.0v  @OrIfPlain 3f	}
+    named @SubAppendixGap		{ 1.5v  @OrIfPlain 2f	}
+    named @SubSubAppendixGap		{ 1.5v  @OrIfPlain 2f	}
+
+    named @SectionInContents		{ Yes			}
+    named @SubSectionInContents		{ Yes			}
+    named @SubSubSectionInContents	{ No			}
+    named @AppendixInContents		{ Yes			}
+    named @SubAppendixInContents	{ Yes			}
+    named @SubSubAppendixInContents	{ No			}
+    named @ReferencesInContents		{ Yes			}
+    named @IndexInContents		{ Yes			}
+    named @IndexAInContents		{ Yes			}
+    named @IndexBInContents		{ Yes			}
+
+    named @SectionNumInTheorems		{ No			}
+    named @SubSectionNumInTheorems	{ No			}
+    named @SubSubSectionNumInTheorems	{ No			}
+    named @AppendixNumInTheorems	{ No			}
+    named @SubAppendixNumInTheorems	{ No			}
+    named @SubSubAppendixNumInTheorems	{ No			}
+
+    named @SectionNumInDisplays		{ Yes			}
+    named @SubSectionNumInDisplays	{ No			}
+    named @SubSubSectionNumInDisplays	{ No			}
+    named @AppendixNumInDisplays	{ Yes			}
+    named @SubAppendixNumInDisplays	{ No			}
+    named @SubSubAppendixNumInDisplays	{ No			}
+
+    named @SectionNumInFigures		{ No			}
+    named @SubSectionNumInFigures	{ No			}
+    named @SubSubSectionNumInFigures	{ No			}
+    named @AppendixNumInFigures		{ No			}
+    named @SubAppendixNumInFigures	{ No			}
+    named @SubSubAppendixNumInFigures	{ No			}
+
+    named @SectionNumInTables		{ No			}
+    named @SubSectionNumInTables	{ No			}
+    named @SubSubSectionNumInTables	{ No			}
+    named @AppendixNumInTables		{ No			}
+    named @SubAppendixNumInTables	{ No			}
+    named @SubSubAppendixNumInTables	{ No			}
+
+    named @SectionNumInRunners		{ Yes			}
+    named @SubSectionNumInRunners	{ No			}
+    named @SubSubSectionNumInRunners	{ No			}
+    named @AppendixNumInRunners		{ Yes			}
+    named @SubAppendixNumInRunners	{ No			}
+    named @SubSubAppendixNumInRunners	{ No			}
+
+    named @SectionPrefix		{			}
+    named @AppendixPrefix		{			}
+    named @ReferencesPrefix		{			}
+    named @IndexPrefix			{			}
+    named @IndexAPrefix			{			}
+    named @IndexBPrefix			{			}
+@Begin
+
+    #######################################################################
+    #                                                                     #
+    #  Lists of sections, sub(-sub)sections, appendices, etc.             #
+    #                                                                     #
+    #######################################################################
+
+    def @TextPlace { @Galley }
+
+    export num
+    def @SectionList named @Tag {} right num
+    {
+	@Galley
+        //@SectionGap	@SectionList @Next num
+    }
+
+    export num
+    def @SubSectionList named @Tag {} right num
+    {
+	@Galley
+        //@SubSectionGap    @SubSectionList @Next num
+    }
+
+    export num
+    def @SubSubSectionList named @Tag {} right num
+    {
+	@Galley
+        //@SubSubSectionGap @SubSubSectionList @Next num
+    }
+
+    export num
+    def @AppendixList named @Tag {} right num
+    {
+	@Galley
+        //@AppendixGap	@AppendixList @Next num
+    }
+
+    export num
+    def @SubAppendixList named @Tag {} right num
+    {
+	@Galley
+        //@SubAppendixGap   @SubAppendixList @Next num
+    }
+
+    export num
+    def @SubSubAppendixList named @Tag {} right num
+    {
+	@Galley
+        //@SubSubAppendixGap   @SubSubAppendixList @Next num
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  @SendFull - send full-width text.                                  #
+    #                                                                     #
+    #######################################################################
+
+    def @SendFull force into { @FullPlace&&following }
+	right x
+    {
+	x
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Document.                                                          #
+    #                                                                     #
+    #######################################################################
+
+    def @Document
+        named @InitialFont { @InitialFont }
+        named @InitialBreak { @InitialBreak }
+        named @InitialSpace { @InitialSpace }
+        named @InitialLanguage { @InitialLanguage }
+	named @PageOrientation { @PageOrientation }
+        named @PageHeaders { @PageHeaders }
+        named @ColumnNumber { @ColumnNumber }
+        named @FirstPageNumber { @FirstPageNumber }
+	named @OptimizePages { @OptimizePages }
+	named @Unpaginated { No }
+    {
+	def @ReferencesPart
+	    named @Tag {}
+	{
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Major }
+		initiallanguage { @InitialLanguage }
+		title { @RefHeading @RefListTitle }
+		headingfont { @ReferencesHeadingFont }
+		headingbreak { @ReferencesHeadingBreak }
+		headingformat { @ReferencesHeadingFormat @Body }
+		incontents { @ReferencesInContents }
+		pnprefix { @ReferencesPrefix }
+		majornum {}
+		majortitle {}
+		minornum {}
+		minortitle { @RefHeading @RefListTitle }
+		inrunners { Yes }
+		sendheader { @Body }
+		aboveheadinggap { 0f }
+		{ //@RefListGap @ReferencesSection }
+
+	}
+
+        def @IndexPart
+	    named @Tag {}
+        {
+
+	    def @Run
+	    {
+		NonStart @Runner
+		    @MajorNum {}
+		    @MajorTitle { index @WordVal @IndexWord }
+		    @MinorNum {}
+		    @MinorTitle {}
+		    @Owner { @Tag }
+		    @Prefix { @IndexPrefix }
+	    }
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Major }
+		initiallanguage { @InitialLanguage }
+		title { index @WordVal @IndexWord }
+		headingfont { @IndexHeadingFont }
+		headingbreak { @IndexHeadingBreak }
+		headingformat { @IndexHeadingFormat @Body }
+		incontents { @IndexInContents }
+		pnprefix { @IndexPrefix }
+		inrunners { Yes }
+		majornum {}
+		majortitle {}
+		minornum {}
+		minortitle { index @WordVal @IndexWord }
+		sendheader { @SendFull @Body }
+		innergap { @SectionGap }
+		wantindefinite { Yes }
+		@IndexSection @Run
+
+        }
+
+        def @IndexAPart
+	    named @Tag {}
+        {
+	    def @Run
+	    {
+		NonStart @Runner
+		    @MajorNum {}
+		    @MajorTitle { index @WordVal @IndexAWord }
+		    @MinorNum {}
+		    @MinorTitle {}
+		    @Owner { @Tag }
+		    @Prefix { @IndexAPrefix }
+	    }
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Major }
+		initiallanguage { @InitialLanguage }
+		title { index @WordVal @IndexAWord }
+		headingfont { @IndexAHeadingFont }
+		headingbreak { @IndexAHeadingBreak }
+		headingformat { @IndexAHeadingFormat @Body }
+		incontents { @IndexAInContents }
+		pnprefix { @IndexAPrefix }
+		inrunners { Yes }
+		majornum {}
+		majortitle {}
+		minornum {}
+		minortitle { index @WordVal @IndexAWord }
+		sendheader { @SendFull @Body }
+		innergap { @SectionGap }
+		wantindefinite { Yes }
+		@IndexASection @Run
+
+        }
+
+        def @IndexBPart
+	    named @Tag {}
+        {
+	    def @Run
+	    {
+		NonStart @Runner
+		    @MajorNum {}
+		    @MajorTitle { index @WordVal @IndexBWord }
+		    @MinorNum {}
+		    @MinorTitle {}
+		    @Owner { @Tag }
+		    @Prefix { @IndexBPrefix }
+	    }
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Major }
+		initiallanguage { @InitialLanguage }
+		title { index @WordVal @IndexBWord }
+		headingfont { @IndexBHeadingFont }
+		headingbreak { @IndexBHeadingBreak }
+		headingformat { @IndexBHeadingFormat @Body }
+		incontents { @IndexBInContents }
+		pnprefix { @IndexBPrefix }
+		inrunners { Yes }
+		majornum {}
+		majortitle {}
+		minornum {}
+		minortitle { index @WordVal @IndexBWord }
+		sendheader { @SendFull @Body }
+		innergap { @SectionGap }
+		wantindefinite { Yes }
+		@IndexBSection @Run
+
+        }
+
+        def @DocumentBody force into { @ColPlace&&preceding }
+	    named @Optimize { @OptimizePages }
+        {
+	    # this whole comment is now obsolete:
+	    # It's important that the first component of @DocumentBody be
+	    # indefinite.  If it was definite, then @DocumentBody would
+	    # attach immediately to the first page.  This would prevent
+	    # @FullWidth from attaching to that page, with the result that
+	    # a document starting with @FullWidth would start on page 2!
+
+	    //  @FootNoteThrough @Do @BeginFootNoteCounter
+	    //	@TextPlace
+	    //@SectionGap @EndFigureList
+	    //@SectionGap @EndNoteList 1
+	    //@SectionGap @MakeReferences @Do @ReferencesPart
+	    //  @MakeIndexA @Do @IndexAPart
+	    //  @MakeIndexB @Do @IndexBPart
+	    //  @MakeIndex  @Do @IndexPart
+            //	NonStart @Runner
+        }
+
+        @InitialFont @Font @InitialBreak @Break @InitialLanguage @Language
+	@InitialSpace @Space { @ColourCommand @InitialColour } @SetColour
+        {
+		Yes @BeginAllCounters {}
+		Yes @BeginDisplayCounter {}
+		Yes @BeginFigureCounter {}
+		Yes @BeginTableCounter {}
+            //  @BackEnd @Case {
+
+		    PlainText @Yield {
+			@Unpaginated @Case {
+
+			    { Yes yes } @Yield {
+				@ContinuousPageList
+				    @Orient { @PageOrientation }
+			    }
+
+			    { No no } @Yield {
+				@PageList
+				    @ColumnNumber { @ColumnNumber }
+				    @PageHeaders { @PageHeaders }
+				    @Orient { @PageOrientation }
+				    extra { Yes }
+				    @FirstPageNumber
+			    }
+			}
+		    }
+
+		    else @Yield {
+			    @PageList
+				@ColumnNumber { @ColumnNumber }
+				@PageHeaders { @PageHeaders }
+				@Orient { @PageOrientation }
+				extra { Yes }
+				@FirstPageNumber
+		    }
+		}
+	    //  @DocumentBody
+        }
+    }
+
+    macro @Doc { @Document // }
+
+
+    #######################################################################
+    #                                                                     #
+    #  @Text containing sections, appendices, etc.                        #
+    #                                                                     #
+    #######################################################################
+
+    export @ContentsGoesHere @FullWidth
+	   @BeginSections @EndSections @Section
+	   @BeginAppendices @EndAppendices @Appendix
+    def @Text force into { @TextPlace&&preceding }
+        body @Body
+    {
+
+	def @ContentsGoesHere { @ContentsSection }
+
+	export @ContentsGoesHere
+	def @FullWidth body @Body
+	{
+	    def @ContentsGoesHere {}
+
+            @SendFull { Start @Runner // @Body }
+	    & NonStart @Runner & &2.1b &
+	}
+
+        def @EndSectionsPlace { @Galley }
+
+        def @EndSections force into { @EndSectionsPlace&&preceding }
+	{}
+
+        macro @BeginSections
+	{   //@SectionGap @SectionList @FirstSectionNumber
+	    // @EndSectionsPlace //
+	}
+
+        export @BeginSubSections @EndSubSections @SubSection @Title
+        def @Section force into { @SectionList&&preceding }
+            named @Tag {}
+            named @Title {}
+            named @RunningTitle { dft }
+	    named @InitialLanguage {}
+	    named @BypassNumber { dft }
+            body @Body
+        {
+
+            def @EndSubSectionsPlace { @Galley }
+
+            def @EndSubSections force into { @EndSubSectionsPlace&&preceding }
+	    {}
+
+            macro @BeginSubSections
+            {	//@SubSectionGap @SubSectionList @FirstSubSectionNumber
+		// @EndSubSectionsPlace //
+	    }
+
+            def @SectionShortNum
+	    {
+		@SectionNumbers @Then {
+		    @BypassNumber @Dft {
+			@SectionNumbers @Num @SectionList&&@Tag @Open { num }
+		    }
+		}
+	    }
+
+	    export @BeginSubSubSections @EndSubSubSections @SubSubSection
+            def @SubSection force into { @SubSectionList&&preceding }
+		named @Tag {}
+		named @Title {}
+		named @RunningTitle { dft }
+		named @InitialLanguage { @InitialLanguage }
+		named @BypassNumber { dft }
+		body @Body
+            {
+
+                def @EndSubSubSectionsPlace { @Galley }
+
+                def @EndSubSubSections force into
+		    { @EndSubSubSectionsPlace&&preceding }
+		{}
+
+                macro @BeginSubSubSections
+                {   //@SubSubSectionGap
+			@SubSubSectionList @FirstSubSubSectionNumber
+		    // @EndSubSubSectionsPlace //
+		}
+
+                def @SubSectionShortNum
+		{
+		    @SubSectionNumbers @Then {
+			@BypassNumber @Dft {
+			    @SectionShortNum @Join @SubSectionNumbers @Num
+			    { @SubSectionList&&@Tag @Open { num } }
+			}
+		    }
+		}
+
+		def @SubSubSection force into { @SubSubSectionList&&preceding }
+		    named @Tag {}
+		    named @Title {}
+		    named @RunningTitle { dft }
+		    named @InitialLanguage { @InitialLanguage }
+		    named @BypassNumber { dft }
+		    body @Body
+		{
+
+		    @LargeScaleStructure
+			tag { @Tag }
+			type { Minor }
+			initiallanguage { @InitialLanguage }
+			title { @Title }
+			runningtitle { @RunningTitle }
+			headingfont { @SubSubSectionHeadingFont }
+			headingbreak { @SubSubSectionHeadingBreak }
+			headingformat { @Num @SubSubSectionHeadingFormat @Body }
+			incontents { @SubSubSectionInContents }
+			contentsindent { 6f }
+			numbers { @SubSubSectionNumbers }
+			attachnum { @SubSubSectionList&&preceding @Tagged @Tag }
+			retrievenum { @SubSubSectionList&&@Tag @Open { num } }
+			bypassnumber { @BypassNumber }
+			prefix { @SubSectionShortNum }
+			majornum {}
+			majortitle {}
+			intheorems { @SubSubSectionNumInTheorems }
+			indisplays { @SubSubSectionNumInDisplays }
+			infigures { @SubSubSectionNumInFigures }
+			intables { @SubSubSectionNumInTables }
+			inrunners { @SubSubSectionNumInRunners }
+			@Body
+
+	        }
+
+		@LargeScaleStructure
+		    tag { @Tag }
+		    type { Minor }
+		    initiallanguage { @InitialLanguage }
+		    title { @Title }
+		    runningtitle { @RunningTitle }
+		    headingfont { @SubSectionHeadingFont }
+		    headingbreak { @SubSectionHeadingBreak }
+		    headingformat { @Num @SubSectionHeadingFormat @Body }
+		    incontents { @SubSectionInContents }
+		    contentsindent { 3f }
+		    numbers { @SubSectionNumbers }
+		    attachnum { @SubSectionList&&preceding @Tagged @Tag }
+		    retrievenum { @SubSectionList&&@Tag @Open { num } }
+		    bypassnumber { @BypassNumber }
+		    prefix { @SectionShortNum }
+		    majornum {}
+		    majortitle {}
+		    intheorems { @SubSectionNumInTheorems }
+		    indisplays { @SubSectionNumInDisplays }
+		    infigures { @SubSectionNumInFigures }
+		    intables { @SubSectionNumInTables }
+		    inrunners { @SubSectionNumInRunners }
+		    @Body
+
+            }
+
+            @LargeScaleStructure
+                tag { @Tag }
+                type { Minor }
+                initiallanguage { @InitialLanguage }
+                title { @Title }
+                runningtitle { @RunningTitle }
+                headingfont { @SectionHeadingFont }
+                headingbreak { @SectionHeadingBreak }
+                headingformat { @Num @SectionHeadingFormat @Body }
+                incontents { @SectionInContents }
+                numbers { @SectionNumbers }
+                attachnum { @SectionList&&preceding @Tagged @Tag }
+                retrievenum { @SectionList&&@Tag @Open { num } }
+		pnprefix { @SectionPrefix }
+		majornum {}
+		majortitle {}
+                bypassnumber { @BypassNumber }
+                intheorems { @SectionNumInTheorems }
+                indisplays { @SectionNumInDisplays }
+                infigures { @SectionNumInFigures }
+                intables { @SectionNumInTables }
+                inrunners { @SectionNumInRunners }
+                @Body
+
+        }
+
+        def @EndAppendicesPlace { @Galley }
+
+        def @EndAppendices force into { @EndAppendicesPlace&&preceding }
+	{}
+
+        macro @BeginAppendices
+        {   //@AppendixGap @AppendixList @FirstAppendixNumber
+	    // @EndAppendicesPlace //
+	}
+
+	export @BeginSubAppendices @EndSubAppendices @SubAppendix
+	def @Appendix force into { @AppendixList&&preceding }
+            named @Tag {}
+            named @Title {}
+            named @RunningTitle { dft }
+	    named @InitialLanguage {}
+	    named @BypassNumber { dft }
+            body @Body
+	{
+
+            def @EndSubAppendicesPlace { @Galley }
+
+            def @EndSubAppendices force into
+		{ @EndSubAppendicesPlace&&preceding }
+	    {}
+
+            macro @BeginSubAppendices
+            {	//@SubAppendixGap @SubAppendixList @FirstSubAppendixNumber
+		// @EndSubAppendicesPlace //
+	    }
+
+            def @AppendixShortNum
+            {
+		@AppendixNumbers @Then {
+		    @BypassNumber @Dft {
+			@AppendixNumbers @Num @AppendixList&&@Tag @Open { num }
+		    }
+		}
+            }
+
+            export @BeginSubSubAppendices @EndSubSubAppendices @SubSubAppendix
+            def @SubAppendix force into { @SubAppendixList&&preceding }
+		named @Tag {}
+		named @Title {}
+		named @RunningTitle { dft }
+		named @InitialLanguage { @InitialLanguage }
+		named @BypassNumber { dft }
+		body @Body
+            {
+
+		def @EndSubSubAppendicesPlace { @Galley }
+
+		def @EndSubSubAppendices force into
+		    { @EndSubSubAppendicesPlace&&preceding }
+		{}
+
+		macro @BeginSubSubAppendices
+		{   //@SubSubAppendixGap
+			@SubSubAppendixList @FirstSubSubAppendixNumber
+		    // @EndSubSubAppendicesPlace //
+		}
+
+		def @SubAppendixShortNum
+		{
+		    @SubAppendixNumbers @Then {
+			@BypassNumber @Dft {
+			    @AppendixShortNum @Join @SubAppendixNumbers @Num
+			    { @SubAppendixList&&@Tag @Open { num } }
+			}
+		    }
+		}
+
+		def @SubSubAppendix force into {@SubSubAppendixList&&preceding}
+		    named @Tag {}
+		    named @Title {}
+		    named @RunningTitle { dft }
+		    named @InitialLanguage { @InitialLanguage }
+		    named @BypassNumber { dft }
+		    body @Body
+		{
+
+		    @LargeScaleStructure
+			tag { @Tag }
+			type { Minor }
+			initiallanguage { @InitialLanguage }
+			title { @Title }
+			runningtitle { @RunningTitle }
+			headingfont { @SubSubAppendixHeadingFont }
+			headingbreak { @SubSubAppendixHeadingBreak }
+			headingformat { @Num @SubSubAppendixHeadingFormat @Body }
+			incontents { @SubSubAppendixInContents }
+			contentsindent { 6f }
+			numbers { @SubSubAppendixNumbers }
+			attachnum { @SubSubAppendixList&&preceding @Tagged @Tag }
+			retrievenum { @SubSubAppendixList&&@Tag @Open { num } }
+			bypassnumber { @BypassNumber }
+			prefix { @SubAppendixShortNum }
+			majornum {}
+			majortitle {}
+			intheorems { @SubSubAppendixNumInTheorems }
+			indisplays { @SubSubAppendixNumInDisplays }
+			infigures { @SubSubAppendixNumInFigures }
+			intables { @SubSubAppendixNumInTables }
+			inrunners { @SubSubAppendixNumInRunners }
+			@Body
+
+		}
+
+		@LargeScaleStructure
+		    tag { @Tag }
+		    type { Minor }
+		    initiallanguage { @InitialLanguage }
+		    title { @Title }
+		    runningtitle { @RunningTitle }
+		    headingfont { @SubAppendixHeadingFont }
+		    headingbreak { @SubAppendixHeadingBreak }
+		    headingformat { @Num @SubAppendixHeadingFormat @Body }
+		    incontents { @SubAppendixInContents }
+		    contentsindent { 3f }
+		    numbers { @SubAppendixNumbers }
+		    attachnum { @SubAppendixList&&preceding @Tagged @Tag }
+		    retrievenum { @SubAppendixList&&@Tag @Open { num } }
+		    bypassnumber { @BypassNumber }
+		    prefix { @AppendixShortNum }
+		    majornum {}
+		    majortitle {}
+		    intheorems { @SubAppendixNumInTheorems }
+		    indisplays { @SubAppendixNumInDisplays }
+		    infigures { @SubAppendixNumInFigures }
+		    intables { @SubAppendixNumInTables }
+		    inrunners { @SubAppendixNumInRunners }
+		    @Body
+	    }
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Minor }
+		initiallanguage { @InitialLanguage }
+		title { @Title }
+		runningtitle { @RunningTitle }
+		headingfont { @AppendixHeadingFont }
+		headingbreak { @AppendixHeadingBreak }
+		headingformat { @Num @AppendixHeadingFormat @Body }
+		incontents { @AppendixInContents }
+		contentsindent { 0f }
+		word { appendix @WordVal @AppendixWord }
+		numbers { @AppendixNumbers }
+		attachnum { @AppendixList&&preceding @Tagged @Tag }
+		retrievenum { @AppendixList&&@Tag @Open { num } }
+		pnprefix { @AppendixPrefix }
+		majornum {}
+		majortitle {}
+		bypassnumber { @BypassNumber }
+		intheorems { @AppendixNumInTheorems }
+		indisplays { @AppendixNumInDisplays }
+		infigures { @AppendixNumInFigures }
+		intables { @AppendixNumInTables }
+		inrunners { Yes }
+		@Body
+
+	}
+
+	//  Start @Runner
+	//  @Body
+	//  NonStart @Runner
+
+    }
+
+@End @OrdinarySetup
diff --git a/include/dsf b/include/dsf
new file mode 100644
index 0000000..082c59d
--- /dev/null
+++ b/include/dsf
@@ -0,0 +1,4644 @@
+###############################################################################
+#                                                                             #
+#  Lout @DocumentSetup package (Version 3.16)                                 #
+#                                                                             #
+#  Version 1.0 by Jeffrey H. Kingston, 17 July 1991.                          #
+#  Version 2.0 by Jeffrey H. Kingston, 22 December 1992.                      #
+#  Version 3.0 by Jeffrey H. Kingston, 19 April 1994.                         #
+#  Version 3.03 by Jeffrey H. Kingston, 6 May 1995.                           #
+#  Versions 3.04 and 3.05 by Jeffrey H. Kingston, 11 June 1995.               #
+#  Version 3.05 by Jeffrey H. Kingston, 25 July 1995.                         #
+#  Version 3.07 by Jeffrey H. Kingston, February 1996.                        #
+#  Version 3.10 by Jeffrey H. Kingston, September 1996.                       #
+#  Version 3.11 by Jeffrey H. Kingston, December 1996.                        #
+#  Version 3.13 by Jeffrey H. Kingston, October 1998.                         #
+#  Version 3.16 by Jeffrey H. Kingston, May 1999.                             #
+#  Version 3.17 by Jeffrey H. Kingston, September 1999.                       #
+#                                                                             #
+#  This Lout package contains the general definitions used by all types of    #
+#  documents.  It needs to be extended (see docf, reportf, bookf, slidesf,    #
+#  etc.) with definitions for particular document types.  Consult "A User's   #
+#  Guide to the Lout Document Formatting System" for user information.        #
+#                                                                             #
+###############################################################################
+
+extend @BasicSetup
+
+export
+
+    @Runner
+	
+    @Figure @Table
+    @FootNote @AnotherFootNote @EndNote
+    @LeftNote @RightNote @OuterNote @InnerNote @Place
+    @Theorem @Proof @EndProof
+    @Definition @Claim @Proposition @Lemma @Corollary @Example
+    @Reference @RefStyle @RefPrint
+    @Ref @NoRef @ChapRef @NoChapRef
+    @Cite @NoCite @ChapCite @NoChapCite
+
+    @IndexA @SubIndexA @SubSubIndexA @RawIndexA
+    @RawSubIndexA @RawSubSubIndexA @IndexABlanks
+
+    @IndexB @SubIndexB @SubSubIndexB @RawIndexB
+    @RawSubIndexB @RawSubSubIndexB @IndexBBlanks
+
+    @Index @SubIndex @SubSubIndex @RawIndex
+    @RawSubIndex @RawSubSubIndex @IndexBlanks
+
+    @BypassContentsEntry @BypassMajorContentsEntry
+    @BypassFigureContentsEntry @BypassTableContentsEntry
+    @BypassReference @BypassChapReference
+    @BypassBeginIndex @BypassRawIndex @BypassEndIndex
+    @BypassBeginIndexA @BypassRawIndexA @BypassEndIndexA
+    @BypassBeginIndexB @BypassRawIndexB @BypassEndIndexB
+
+
+def @DocumentSetup
+    named @PageType		{ A4    @OrIfPlain Other} # page type (width, height)
+    named @PageWidth		{ 80s			} # page width if type Other
+    named @PageHeight		{ 66f			} # page height if type Other
+    named @PageOrientation	{ Portrait		} # Portrait, Landscape, etc.
+    named @PageBackground	{			} # background of each page
+    named @TopMargin		{ 2.50c  @OrIfPlain 6f	} # top margin of all pages
+    named @FootMargin		{ 2.50c  @OrIfPlain 6f	} # bottom margin of all pages
+    named @OddLeftMargin	{ 2.50c  @OrIfPlain 10s	} # left margin of odd pages
+    named @OddRightMargin	{ 2.50c  @OrIfPlain 10s	} # right margin of odd pages
+    named @EvenLeftMargin	{ 2.50c  @OrIfPlain 10s	} # left margin of even pages
+    named @EvenRightMargin	{ 2.50c  @OrIfPlain 10s	} # right margin of even pages
+    named @PageBoxType		{ None			} # None Box CurveBox ShadowBox
+    named @PageBoxMargin	{ 1.00c			} # page box margin
+    import @LengthUnits named @PageBoxLineWidth
+				{			} # page box line thickness
+    named @PageBoxPaint		{  none			} # page box paint
+    named @PageBoxShadow	{  0.60c		} # shadow margin if ShadowBox
+    named @ColumnNumber		{  1			} # number of columns (1 to 10)
+    named @ColumnGap		{  1.00c @OrIfPlain 6s	} # column gap
+    named @FigureLocation	{  PageTop		} # default figure location
+    named @TableLocation	{  PageTop		} # default table location
+    named @FigureFormat
+    	named @II right x { |@DisplayIndent x |      }
+    	named @QQ right x { |@DisplayIndent x |@DisplayIndent }
+    	named @CC right x { |0.5rt x |      }
+    	named @RR right x { |1.0rt x |      }
+	right @Body
+				{  @CC @Body		} # default figure format
+    named @TableFormat
+    	named @II right x { |@DisplayIndent x |      }
+    	named @QQ right x { |@DisplayIndent x |@DisplayIndent }
+    	named @CC right x { |0.5rt x |      }
+    	named @RR right x { |1.0rt x |      }
+	right @Body
+				{  @CC @Body		} # default table format
+    named @FigureWord		{  figure		} # "Figure" word else anything
+    named @TableWord		{  table		} # "Table" word else anything
+    named @FigureNumbers	{  Arabic		} # method of numbering figures
+    named @TableNumbers		{  Arabic		} # method of numbering tables
+    named @FigureCaptionPos	{  Below		} # Above or Below
+    named @TableCaptionPos	{  Below		} # Above or Below
+    named @FigureCaptionFont    {			} # figure caption font
+    named @FigureCaptionBreak   {			} # figure caption break
+    named @FigureCaptionFormat named word {} named number {} named caption {}
+				{  @B { word @NumSep number. &2s } @Insert caption }
+    named @TableCaptionFont    {			} # figure caption font
+    named @TableCaptionBreak   {			} # figure caption break
+    named @TableCaptionFormat named word {} named number {} named caption {}
+				{  @B { word @NumSep number. &2s } @Insert caption }
+    named @MakeFigureContents   {  No			} # list of figures at start
+    named @MakeTableContents    {  No			} # list of tables at start
+    named @MakeContents		{  No			} # make contents? Yes or No
+    named @ContentsGap		{  0.20v @OrIfPlain 0f	} # extra gap above minor entry
+    named @ContentsGapAbove	{  0.80v @OrIfPlain 1f	} # extra gap above major entry
+    named @ContentsGapBelow	{  0.00v @OrIfPlain 0f	} # extra gap below major entry
+    named @ContentsFont    	{  Bold                 } # font for major entry
+    named @ContentsPartGapAbove	{  1.00v @OrIfPlain 1f  } # extra gap above part entry
+    named @ContentsPartGapBelow	{  0.00v @OrIfPlain 0f  } # extra gap below part entry
+    named @ContentsFormat
+	left number
+	right title
+				{  number @Sep title } # contents format
+    named @ContentsLeader	{  ..			} # leader symbol in contents
+    named @ContentsLeaderGap	{  4s    @OrIfPlain 2s	} # gap between leaders
+    named @ContentsRightWidth	{  3f    @OrIfPlain 6s	} # page numbers column width
+
+    named @MakeReferences	{  Yes			} # make references? Yes or No
+    named @RefCiteStyle right cite {  [cite]		} # citation style
+    named @RefCiteLabels
+	named @RefNum       {}
+	named @Tag          {}
+	named @Type         {}
+	named @Abstract     {}
+	named @Address      {}
+	named @Annote       {}
+	named @Author       {}
+	named @Day          {}
+	named @Edition      {}
+	named @HowPublished {}
+	named @InAuthor     {}
+	named @InTitle      {}
+	named @Institution  {}
+	named @Journal      {}
+	named @Keywords     {}
+	named @Label        {}
+	named @Month        {}
+	named @Note         {}
+	named @Number       {}
+	named @Organization {}
+	named @Page         {}
+	named @Pages        {}
+	named @Pinpoint     {}
+	named @Publisher    {}
+	named @Title        {}
+	named @TitleNote    {}
+	named @TRType       {}
+	named @Volume       {}
+	named @Year         {}
+				{  @RefNum		} # citation items
+    named @RefNumbers		{  Arabic		} # reference numbers
+
+    named @RefListFormat	{  Labels		} # NoLabels, Labels,
+						  	# DropLabels, IntegrateLabels
+    named @RefListLabels
+	named @RefNum       {}
+	named @Tag          {}
+	named @Type         {}
+	named @Abstract     {}
+	named @Address      {}
+	named @Annote       {}
+	named @Author       {}
+	named @Day          {}
+	named @Edition      {}
+	named @HowPublished {}
+	named @InAuthor     {}
+	named @InTitle      {}
+	named @Institution  {}
+	named @Journal      {}
+	named @Keywords     {}
+	named @Label        {}
+	named @Month        {}
+	named @Note         {}
+	named @Number       {}
+	named @Organization {}
+	named @Page         {}
+	named @Pages        {}
+	named @Pinpoint     {}
+	named @Publisher    {}
+	named @Title        {}
+	named @TitleNote    {}
+	named @TRType       {}
+	named @Volume       {}
+	named @Year         {}
+				{  [@RefNum]		} # ref list label format
+    named @RefListTitle		{  references		} # title of reference list
+    named @ChapRefListTitle	{  references		} # title of chapter ref list
+    named @RefListIndent	{  0s			} # indent to left of labels
+    named @RefListRightIndent	{  0s			} # indent to right of items
+    named @RefListGap		{  @ListGap		} # gap between ref list items
+    named @RefListFont		{			} # font used in reference list
+    named @RefListBreak		{			} # break style of ref list
+    named @RefListLabelWidth 	{  @ListLabelWidth	} # numeric labels column width
+    named @RefListSortKey
+	named @Tag          {}
+	named @Type         {}
+	named @Abstract     {}
+	named @Address      {}
+	named @Annote       {}
+	named @Author       {}
+	named @Day          {}
+	named @Edition      {}
+	named @HowPublished {}
+	named @InAuthor     {}
+	named @InTitle      {}
+	named @Institution  {}
+	named @Journal      {}
+	named @Keywords     {}
+	named @Label        {}
+	named @Month        {}
+	named @Note         {}
+	named @Number       {}
+	named @Organization {}
+	named @Page         {}
+	named @Pages        {}
+	named @Pinpoint     {}
+	named @Publisher    {}
+	named @Title        {}
+	named @TitleNote    {}
+	named @TRType       {}
+	named @Volume       {}
+	named @Year         {}
+	named ":"	    { "\037" }
+				{  @Tag			} # sorting key
+
+    named @MakeIndex		{  No			} # make index? Yes or No
+    named @IndexFont		{			} # index entries font
+    named @IndexBreak		{ {oragged 1.2fx} @OrIfPlain {oragged 1fx}	} # index entries break
+    named @IndexColumnNumber	{  2			} # index columns (1 to 10)
+    named @IndexColumnGap	{  1.00c @OrIfPlain 6s	} # index column gap
+    named @MakeIndexA		{  No			} # make index A? Yes or No
+    named @IndexAFont		{			} # index A entries font
+    named @IndexABreak		{ {oragged 1.2fx} @OrIfPlain {oragged 1fx}	} # index A entries break
+    named @IndexAColumnNumber	{  2			} # index A columns (1 to 10)
+    named @IndexAColumnGap	{  1.00c @OrIfPlain 6s	} # index A column gap
+    named @MakeIndexB		{  No			} # make index B? Yes or No
+    named @IndexBFont		{			} # index B entries font
+    named @IndexBBreak		{ {oragged 1.2fx} @OrIfPlain {oragged 1fx}	} # index B entries break
+    named @IndexBColumnNumber	{  2			} # index B columns (1 to 10)
+    named @IndexBColumnGap	{  1.00c @OrIfPlain 6s	} # index B column gap
+    named @TopGap		{  0.75c @OrIfPlain 2f	} # gap between figures
+    named @MidGap		{  0.75c @OrIfPlain 2f	} # gap above/below body text
+
+    named @FootNoteNumbers	{  Arabic		} # footnote numbers
+    named @FootNoteThrough	{  No			} # numbered through chapter?
+    named @FootNoteLocation	{  ColFoot		} # where the footnote appears
+    named @FootNoteFont		{  0.80f		} # font for footnotes
+    named @FootNoteBreak	{  1.2fx @OrIfPlain 1fx	} # break for footnotes
+    named @FootNoteFormat left number right body
+				{  { number &0.05f } @Insert body } # break for footnotes
+    named @FootLen		{  2.00c @OrIfPlain 10s	} # length of footnote line
+    named @FootAboveGap		{  @DisplayGap		} # gap above footnote line
+    named @FootGap		{  0.20c @OrIfPlain 1fx	} # gap between footnotes
+
+    named @MarginNoteFont	{  0.80f		} # font of margin notes
+    named @MarginNoteBreak	{  ragged 1.10fx	} # break style of margin notes
+    named @MarginNoteHGap	{  0.5c			} # horizontal gap to notes
+    named @MarginNoteVGap	{  @DisplayGap		} # min vertical gap between
+    named @MarginNoteWidth	{  1.50c		} # width of margin notes
+
+    named @EndNoteNumbers	{  Arabic		} # endnote numbers
+    named @EndNoteFont		{  0.80f		} # font of endnotes
+    named @EndNoteBreak		{  1.2fx @OrIfPlain 1fx	} # break for endnotes
+    named @EndNoteFormat left number right body
+				{  { number &0.05f } @Insert body } # break for endnotes
+    named @EndNoteGap		{  0.20c @OrIfPlain 1f	} # gap between endnotes
+
+    named @TheoremWord		{  theorem		} # "Theorem" word, etc.
+    named @TheoremTitleFormat right title
+				{  (title)              } # Theorem title format if present
+    named @TheoremFormat named word {} named number {} named title {} named body {} # theorem format
+				{  { @B { word @NumSep number title: } &2s } @Insert body }
+    named @DefinitionWord	{  definition		} # "Definition" word, etc.
+    named @DefinitionTitleFormat{  (title)              } # Definition title format if present
+    named @DefinitionFormat named word {} named number {} named title {} named body {} # definition format
+				{  { @B { word @NumSep number title: } &2s } @Insert body }
+    named @ClaimWord		{  claim		} # "Claim" word, etc.
+    named @ClaimTitleFormat	{  (title)              } # Claim title format if present
+    named @ClaimFormat named word {} named number {} named title {} named body {} # claim format
+				{  { @B { word @NumSep number title: } &2s } @Insert body }
+    named @PropositionWord	{  proposition		} # "Proposition" word, etc.
+    named @PropositionTitleFormat{  (title)             } # Proposition title format if present
+    named @PropositionFormat named word {} named number {} named title {} named body {} # proposition format
+				{  { @B { word @NumSep number title: } &2s } @Insert body }
+    named @LemmaWord		{  lemma		} # "Lemma" word, etc.
+    named @LemmaTitleFormat	{  (title)              } # Lemma title format if present
+    named @LemmaFormat named word {} named number {} named title {} named body {} # lemma format
+				{  { @B { word @NumSep number title: } &2s } @Insert body }
+    named @CorollaryWord	{  corollary		} # "Corollary" word, etc.
+    named @CorollaryTitleFormat	{  (title)              } # Corollary title format if present
+    named @CorollaryFormat named word {} named number {} named title {} named body {} # corollary format
+				{  { @B { word @NumSep number title: } &2s } @Insert body }
+    named @ExampleWord		{  example		} # "Example" word, etc.
+    named @ExampleTitleFormat	{  (title)              } # Example title format if present
+    named @ExampleFormat named word {} named number {} named title {} named body {} # example format
+				{  { @B { word @NumSep number title: } &2s } @Insert body }
+    named @ProofWord		{  proof		} # "Proof" word, etc.
+
+    named @PageHeaders		{  Simple		} # None Simple Titles NoTitles
+    named @PageNumbers		{  Arabic		} # page numbers
+    named @FirstPageNumber	{  1			} # number of first page 
+    named @IntroPageNumbers	{  Roman		} # intro page numbers
+    named @IntroFirstPageNumber	{  1			} # number of first intro page 
+    named @StructPageNums	{  No			} # structured page numbers
+
+    named @OddTop	      right @PageNum { @Centre { - @PageNum - }	}
+    named @OddFoot	      right @PageNum { @Null                    }
+    named @EvenTop	      right @PageNum { @Centre { - @PageNum - }	}
+    named @EvenFoot	      right @PageNum { @Null                    }
+    named @StartOddTop	      right @PageNum { @Null                    }
+    named @StartOddFoot	      right @PageNum { @Null                    }
+    named @StartEvenTop	      right @PageNum { @Null                    }
+    named @StartEvenFoot      right @PageNum { @Null                    }
+
+    named @IntroOddTop	      right @PageNum { @Null                    }
+    named @IntroOddFoot	      right @PageNum { @Centre @PageNum         }
+    named @IntroEvenTop	      right @PageNum { @Null                    }
+    named @IntroEvenFoot      right @PageNum { @Centre @PageNum         }
+    named @IntroStartOddTop   right @PageNum { @Null                    }
+    named @IntroStartOddFoot  right @PageNum { @Null                    }
+    named @IntroStartEvenTop  right @PageNum { @Null                    }
+    named @IntroStartEvenFoot right @PageNum { @Null                    }
+
+    named @RunningOddTop
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @I { @MinorNum @Sep @MinorTitle } @Right @B @PageNum }
+
+    named @RunningOddFoot
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Null }
+
+    named @RunningEvenTop
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @B @PageNum @Right @I { @MajorNum @Sep @MajorTitle } }
+
+    named @RunningEvenFoot
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Null }
+
+    named @RunningStartOddTop
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Null }
+
+    named @RunningStartOddFoot
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Centre { Bold 0.8f } @Font @PageNum }
+
+    named @RunningStartEvenTop
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Null }
+
+    named @RunningStartEvenFoot
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Centre { Bold 0.8f } @Font @PageNum }
+
+
+    named @RunningIntroOddTop
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Null }
+
+    named @RunningIntroOddFoot
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Right @PageNum  }
+
+    named @RunningIntroEvenTop
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Null }
+
+    named @RunningIntroEvenFoot
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @PageNum }
+
+    named @RunningIntroStartOddTop
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Null }
+
+    named @RunningIntroStartOddFoot
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Null }
+
+    named @RunningIntroStartEvenTop
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Null }
+
+    named @RunningIntroStartEvenFoot
+	named @MajorNum {} named @MajorTitle {}
+	named @MinorNum {} named @MinorTitle {} right @PageNum
+    { @Null }
+
+
+@Begin
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @Protect x                                                             #
+    #                                                                         #
+    #  Like @CNP, this reserves space on the current page or else makes sure  #
+    #  x appears on the following page.  Lookahead is proportional to font    #
+    #  size.                                                                  #
+    #                                                                         #
+    ###########################################################################
+
+    def @Protect right x { 3.0f @High //0io // x }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @HLine                                                                #
+    #                                                                         #
+    #   Draws a horizontal line to fill available space.                      #
+    #                                                                         #
+    ###########################################################################
+
+    def @HLine
+    {
+	@BackEnd @Case {
+	   PlainText @Yield { "-" @PlainGraphic 1f @High }
+	   PostScript @Yield { {0 0 moveto xsize 0 lineto stroke} @Graphic {} }
+	   PDF @Yield { {0 0 m __xsize 0 l S} @Graphic {} }
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  x @WordVal y                                                           #
+    #                                                                         #
+    #  Returns @Word&&x if x == y, otherwise y.                               #
+    #                                                                         #
+    ###########################################################################
+
+    def @WordVal
+	left x
+	right y
+    {
+	y @Case {
+	    x    @Yield @Word&&x
+	    else @Yield y
+	}
+    }
+
+    ###########################################################################
+    #                                                                         #
+    #  x @Dft y                                                               #
+    #                                                                         #
+    #  This returns x unless its value is "dft", in which case it returns y.  #
+    #  Useful for defaulting the value of one parameter to another.           #
+    #                                                                         #
+    ###########################################################################
+
+    def @Dft
+	left x
+	right y
+    {
+	x @Case {
+	    dft  @Yield y
+	    else @Yield x
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  x @Do y                                                                #
+    #                                                                         #
+    #  This returns @Null if x is No or None, otherwise y.                    #
+    #                                                                         #
+    ###########################################################################
+
+    def @Do
+	left x
+	right y
+    {
+	x @Case {
+	    { No None } @Yield @Null
+	    else        @Yield y
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  x @NoDo y                                                              #
+    #                                                                         #
+    #  Negation of @Do: This returns y if x is No or None, otherwise @Null.   #
+    #                                                                         #
+    ###########################################################################
+
+    def @NoDo
+	left x
+	right y
+    {
+	x @Case {
+	    { No None } @Yield y
+	    else        @Yield @Null
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  x @Then y                                                              #
+    #                                                                         #
+    #  This returns the empty object if x is No or None, otherwise y.         #
+    #                                                                         #
+    ###########################################################################
+
+    def @Then
+	left x
+	right y
+    {
+	x @Case {
+	    { No None } @Yield {}
+	    else        @Yield y
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  x @NoThen y                                                            #
+    #                                                                         #
+    #  Negation of @Then: returns y if x is No or None, otherwise empty.      #
+    #                                                                         #
+    ###########################################################################
+
+    def @NoThen
+	left x
+	right y
+    {
+	x @Case {
+	    { No None } @Yield y
+	    else        @Yield {}
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Number markers.                                                        #
+    #                                                                         #
+    ###########################################################################
+
+    def @Num
+	left numtype
+	right num
+    {
+	numtype @Case {
+	    None    @Yield {}
+	    Arabic  @Yield num
+	    Roman   @Yield @Roman&&num
+	    UCRoman @Yield @UCRoman&&num
+	    Alpha   @Yield @Alpha&&num
+	    UCAlpha @Yield @UCAlpha&&num
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @MakePageNum                                                          #
+    #                                                                         #
+    #   Make a page number.                                                   #
+    #                                                                         #
+    ###########################################################################
+
+    def @MakePageNum
+	named numbers {}
+	named rawnum {}
+	named prefix {}
+	named owner {}
+    {
+	def @OwnerNum { @PageMarker&&owner @Open { rawnum } }
+
+	def @StructNum { @FirstPageNumber @Plus rawnum @Minus @OwnerNum }
+
+	@PageHeaders.@StructPageNums @Case {
+	    { Titles.Yes NoTitles.Yes } @Yield {
+		prefix @Join { numbers @Num @StructNum } }
+	    else @Yield { numbers @Num rawnum }
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Page size, margins, and boxes.  This code culminates in @OddPage x     #
+    #  and @EvenPage x, which produce one odd or even page containing x.      #
+    #                                                                         #
+    ###########################################################################
+
+    def @Width
+    {
+	@PageType @Case {
+	    Letter      @Yield  612p
+	    Tabloid     @Yield  792p
+	    Ledger      @Yield 1224p
+	    Legal       @Yield  612p
+	    Statement   @Yield  396p
+	    Executive   @Yield  540p
+	    A3          @Yield  842p
+	    A4          @Yield  595p
+	    A5          @Yield  420p
+	    B4          @Yield  729p
+	    B5          @Yield  516p
+	    Folio       @Yield  612p
+	    Quarto      @Yield  610p
+	    10x14       @Yield  720p
+	    Other	@Yield @PageWidth
+	}
+    }
+
+    def @Height
+    {
+	@PageType @Case {
+	    Letter      @Yield  792p
+	    Tabloid     @Yield 1224p
+	    Ledger      @Yield  792p
+	    Legal       @Yield 1008p
+	    Statement   @Yield  612p
+	    Executive   @Yield  720p
+	    A3          @Yield 1190p
+	    A4          @Yield  842p
+	    A5          @Yield  595p
+	    B4          @Yield 1032p
+	    B5          @Yield  729p
+	    Folio       @Yield  936p
+	    Quarto      @Yield  780p
+	    10x14       @Yield 1008p
+	    Other       @Yield @PageHeight
+	}
+    }
+
+    def @OrientedWidth right @Orient
+    {
+	@Orient @Case {
+	    { Portrait ReversePortrait }   @Yield @Width
+	    { Landscape ReverseLandscape } @Yield @Height
+	}
+    }
+
+    def @OrientedHeight right @Orient
+    {
+	@Orient @Case {
+	    { Portrait ReversePortrait }   @Yield @Height
+	    { Landscape ReverseLandscape } @Yield @Width
+	}
+    }
+
+    def @OrientationAngle right @Orient
+    {
+	@Orient @Case {
+	    Portrait         @Yield 0d
+	    Landscape        @Yield 90d
+	    ReversePortrait  @Yield 180d
+	    ReverseLandscape @Yield 270d
+	}
+    }
+
+    def @PageBox right x
+    {
+	@PageBoxType @Case {
+	    None      @Yield x
+	    Box       @Yield @Box
+			margin { @PageBoxMargin }
+			paint { @PageBoxPaint }
+			linewidth { @PageBoxLineWidth } x
+	    CurveBox  @Yield @CurveBox
+			margin { @PageBoxMargin }
+			paint { @PageBoxPaint }
+			linewidth { @PageBoxLineWidth } x
+	    ShadowBox @Yield @ShadowBox
+			margin { @PageBoxMargin }
+			paint { @PageBoxPaint }
+			linewidth { @PageBoxLineWidth }
+			shadow { @PageBoxShadow } x
+	}
+    }
+
+    def @DoBackground right @Orient
+    {	
+#     "LoutPageSet" @Graphic	# VT: case PDF produces nothing
+      { @BackEnd @Case {
+          PostScript @Yield "LoutPageSet"
+          else @Yield "% @DoBackground/LoutPageSet UNIMPLEMENTED"
+        }
+      } @Graphic
+      {
+	{ @OrientationAngle @Orient } @Rotate
+	{ @OrientedWidth @Orient } @Wide { @OrientedHeight @Orient } @High
+	{   //@TopMargin ||@OddLeftMargin
+	        @HExpand @VExpand @PageBackground
+	    ||@OddRightMargin //@FootMargin
+	}
+      }
+    }
+
+    def @PageSet right x
+    {	
+#     "LoutPageSet" @Graphic	# VT: case PDF produces nothing
+      { @BackEnd @Case {
+          PostScript @Yield "LoutPageSet"
+          else @Yield "% @DoBackground/LoutPageSet UNIMPLEMENTED"
+        }
+      } @Graphic x
+    }
+
+    def @MargSet
+	left parity
+	right x
+    {
+#	{ parity "LoutMargSet" } @Graphic x	# VT: case PDF produces nothing
+	{ @BackEnd @Case {
+	    PostScript @Yield { parity "LoutMargSet" }
+	    else @Yield "% @MargSet/LoutMargSet UNIMPLEMENTED"
+	  }
+	} @Graphic x
+    }
+
+    def @OddPage
+	left extra
+	named @Orient {}
+	right x
+    {
+	# @DoBackground @Orient ||0io
+	@PageSet
+	{ @OrientationAngle @Orient } @Rotate
+	{ @OrientedWidth @Orient } @Wide { @OrientedHeight @Orient } @High
+	{   //@TopMargin ||@OddLeftMargin
+		@PageBackground @Background
+	        1 @MargSet
+		@PageBox @HExpand { extra // @VExpand x }
+	    ||@OddRightMargin //@FootMargin
+	}
+    }
+
+    def @EvenPage
+	left extra
+	named @Orient {}
+	right x
+    {
+	@PageSet
+	# @DoBackground @Orient ||0io
+	{ @OrientationAngle @Orient } @Rotate
+	{ @OrientedWidth @Orient } @Wide { @OrientedHeight @Orient } @High
+	{   //@TopMargin ||@EvenLeftMargin
+		@PageBackground @Background
+	        0 @MargSet
+		@PageBox @HExpand { extra // @VExpand x }
+	    ||@EvenRightMargin //@FootMargin
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Definitions for page headers and footers.  There are 16 symbols here,  #
+    #  in the following pattern:                                              #
+    #                                                                         #
+    #     @(- | Running)(- | Intro)(Odd | Even)(Top | Foot)Header             #
+    #                                                                         #
+    #  Running means that running headers are to be used.                     #
+    #  Intro means that the header is destined for an introductory page.      #
+    #  Odd or Even means whether the page number will be odd or even.         #
+    #  Top or Foot means whether the header is for the top or foot of page.   #
+    #                                                                         #
+    ###########################################################################
+
+    export @Start @MajorNum @MajorTitle @MinorNum @MinorTitle @Owner @Prefix
+    def @Runner
+	left  @Start
+	named @MajorNum   {}
+	named @MajorTitle {}
+	named @MinorNum   {}
+	named @MinorTitle {}
+	named @Owner      {}
+	named @Prefix     {}
+	named @Tag        {}
+    { @Null
+    }
+
+    def @DupRunner # duplicate previous runner
+    {
+	@Runner&&preceding @Open {
+	    NonStart @Runner
+		@MajorNum { @MajorNum }
+		@MajorTitle { @MajorTitle }
+		@MinorNum { @MinorNum }
+		@MinorTitle { @MinorTitle }
+		@Owner { @Owner }
+		@Prefix { @Prefix }
+	}
+    }
+
+    def @OddTopHeader
+	left @PageHeadersAndStart
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    None.Start      @Yield @Null
+	    None.NonStart   @Yield @Null
+	    None.None       @Yield @Null
+	    Simple.Start    @Yield @StartOddTop @PageNum
+	    Simple.NonStart @Yield @OddTop @PageNum
+	    Simple.None     @Yield @Null
+	}
+    }
+
+    def @OddFootHeader
+	left @PageHeadersAndStart
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    None.Start      @Yield @Null
+	    None.NonStart   @Yield @Null
+	    None.None       @Yield @Null
+	    Simple.Start    @Yield @StartOddFoot @PageNum
+	    Simple.NonStart @Yield @OddFoot @PageNum
+	    Simple.None     @Yield @Null
+	}
+    }
+
+    def @EvenTopHeader
+	left @PageHeadersAndStart
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    None.Start      @Yield @Null
+	    None.NonStart   @Yield @Null
+	    None.None       @Yield @Null
+	    Simple.Start    @Yield @StartEvenTop @PageNum
+	    Simple.NonStart @Yield @EvenTop @PageNum
+	    Simple.None     @Yield @Null
+	}
+    }
+
+    def @EvenFootHeader
+	left @PageHeadersAndStart
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    None.Start      @Yield @Null
+	    None.NonStart   @Yield @Null
+	    None.None       @Yield @Null
+	    Simple.Start    @Yield @StartEvenFoot @PageNum
+	    Simple.NonStart @Yield @EvenFoot @PageNum
+	    Simple.None     @Yield @Null
+	}
+    }
+
+    def @IntroOddTopHeader
+	left @PageHeadersAndStart
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    None.Start      @Yield @Null
+	    None.NonStart   @Yield @Null
+	    None.None       @Yield @Null
+	    Simple.Start    @Yield @IntroStartOddTop @PageNum
+	    Simple.NonStart @Yield @IntroOddTop @PageNum
+	    Simple.None     @Yield @Null
+	}
+    }
+
+    def @IntroOddFootHeader
+	left @PageHeadersAndStart
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    None.Start      @Yield @Null
+	    None.NonStart   @Yield @Null
+	    None.None       @Yield @Null
+	    Simple.Start    @Yield @IntroStartOddFoot @PageNum
+	    Simple.NonStart @Yield @IntroOddFoot @PageNum
+	    Simple.None     @Yield @Null
+	}
+    }
+
+    def @IntroEvenTopHeader
+	left @PageHeadersAndStart
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    None.Start      @Yield @Null
+	    None.NonStart   @Yield @Null
+	    None.None       @Yield @Null
+	    Simple.Start    @Yield @IntroStartEvenTop @PageNum
+	    Simple.NonStart @Yield @IntroEvenTop @PageNum
+	    Simple.None     @Yield @Null
+	}
+    }
+
+    def @IntroEvenFootHeader
+	left @PageHeadersAndStart
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    None.Start      @Yield @Null
+	    None.NonStart   @Yield @Null
+	    None.None       @Yield @Null
+	    Simple.Start    @Yield @IntroStartEvenFoot @PageNum
+	    Simple.NonStart @Yield @IntroEvenFoot @PageNum
+	    Simple.None     @Yield @Null
+	}
+    }
+
+
+    def @RunningOddTopHeader
+	left @PageHeadersAndStart
+	named @MajorNum   {}
+	named @MajorTitle {}
+	named @MinorNum   {}
+	named @MinorTitle {}
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    NoTitles.??       @Yield ??
+	    NoTitles.Start    @Yield @RunningStartOddTop @PageNum
+	    NoTitles.NonStart @Yield @RunningOddTop @PageNum
+	    NoTitles.None     @Yield @Null
+	    Titles.??         @Yield ??
+	    Titles.Start      @Yield @RunningStartOddTop
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.NonStart   @Yield @RunningOddTop
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.None	      @Yield @Null
+	}
+    }
+
+    def @RunningOddFootHeader
+	left @PageHeadersAndStart
+	named @MajorNum   {}
+	named @MajorTitle {}
+	named @MinorNum   {}
+	named @MinorTitle {}
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    NoTitles.??       @Yield @Null
+	    NoTitles.Start    @Yield @RunningStartOddFoot @PageNum
+	    NoTitles.NonStart @Yield @RunningOddFoot @PageNum
+	    NoTitles.None     @Yield @Null
+	    Titles.??         @Yield @Null
+	    Titles.Start      @Yield @RunningStartOddFoot
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.NonStart   @Yield @RunningOddFoot
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.None	      @Yield @Null
+	}
+    }
+
+    def @RunningEvenTopHeader
+	left @PageHeadersAndStart
+	named @MajorNum   {}
+	named @MajorTitle {}
+	named @MinorNum   {}
+	named @MinorTitle {}
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    NoTitles.??       @Yield ??
+	    NoTitles.Start    @Yield @RunningStartEvenTop @PageNum
+	    NoTitles.NonStart @Yield @RunningEvenTop @PageNum
+	    NoTitles.None     @Yield @Null
+	    Titles.??         @Yield ??
+	    Titles.Start      @Yield @RunningStartEvenTop
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.NonStart   @Yield @RunningEvenTop
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.None	      @Yield @Null
+	}
+    }
+
+    def @RunningEvenFootHeader
+	left @PageHeadersAndStart
+	named @MajorNum   {}
+	named @MajorTitle {}
+	named @MinorNum   {}
+	named @MinorTitle {}
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    NoTitles.??       @Yield @Null
+	    NoTitles.Start    @Yield @RunningStartEvenFoot @PageNum
+	    NoTitles.NonStart @Yield @RunningEvenFoot @PageNum
+	    NoTitles.None     @Yield @Null
+	    Titles.??         @Yield @Null
+	    Titles.Start      @Yield @RunningStartEvenFoot
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.NonStart   @Yield @RunningEvenFoot
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.None	      @Yield @Null
+	}
+    }
+
+    def @RunningIntroOddTopHeader
+	left @PageHeadersAndStart
+	named @MajorNum   {}
+	named @MajorTitle {}
+	named @MinorNum   {}
+	named @MinorTitle {}
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    NoTitles.??       @Yield ??
+	    NoTitles.Start    @Yield @RunningIntroStartOddTop @PageNum
+	    NoTitles.NonStart @Yield @RunningIntroOddTop @PageNum
+	    NoTitles.None     @Yield @Null
+	    Titles.??         @Yield ??
+	    Titles.Start      @Yield @RunningIntroStartOddTop
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.NonStart   @Yield @RunningIntroOddTop
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.None	      @Yield @Null
+	}
+    }
+
+    def @RunningIntroOddFootHeader
+	left @PageHeadersAndStart
+	named @MajorNum   {}
+	named @MajorTitle {}
+	named @MinorNum   {}
+	named @MinorTitle {}
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    NoTitles.??       @Yield @Null
+	    NoTitles.Start    @Yield @RunningIntroStartOddFoot @PageNum
+	    NoTitles.NonStart @Yield @RunningIntroOddFoot @PageNum
+	    NoTitles.None     @Yield @Null
+	    Titles.??         @Yield @Null
+	    Titles.Start      @Yield @RunningIntroStartOddFoot
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.NonStart   @Yield @RunningIntroOddFoot
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.None	      @Yield @Null
+	}
+    }
+
+    def @RunningIntroEvenTopHeader
+	left @PageHeadersAndStart
+	named @MajorNum   {}
+	named @MajorTitle {}
+	named @MinorNum   {}
+	named @MinorTitle {}
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    NoTitles.??       @Yield ??
+	    NoTitles.Start    @Yield @RunningIntroStartEvenTop @PageNum
+	    NoTitles.NonStart @Yield @RunningIntroEvenTop @PageNum
+	    NoTitles.None     @Yield @Null
+	    Titles.??         @Yield ??
+	    Titles.Start      @Yield @RunningIntroStartEvenTop
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.NonStart   @Yield @RunningIntroEvenTop
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.None	      @Yield @Null
+	}
+    }
+
+    def @RunningIntroEvenFootHeader
+	left @PageHeadersAndStart
+	named @MajorNum   {}
+	named @MajorTitle {}
+	named @MinorNum   {}
+	named @MinorTitle {}
+	right @PageNum
+    {
+	@PageHeadersAndStart @Case {
+	    NoTitles.??       @Yield @Null
+	    NoTitles.Start    @Yield @RunningIntroStartEvenFoot @PageNum
+	    NoTitles.NonStart @Yield @RunningIntroEvenFoot @PageNum
+	    NoTitles.None     @Yield @Null
+	    Titles.??         @Yield @Null
+	    Titles.Start      @Yield @RunningIntroStartEvenFoot
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.NonStart   @Yield @RunningIntroEvenFoot
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    @PageNum
+	    Titles.None	      @Yield @Null
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Helper definitions for laying out pages.                               #
+    #                                                                         #
+    ###########################################################################
+
+    def @PageTopPlace		{ @Galley }
+    def @PageFootAndTopPlace	{ @Galley }
+    def @PageFootNotePlace	{ @Galley }
+    def @FullPlace		{ @Galley }
+    def @OddFullPlace		{ @Galley }
+    def @EvenFullPlace		{ @Galley }
+    def @FullPagePlace		{ @Galley }
+    def @EvenFullPagePlace	{ @Galley }
+    def @EvenPagePlace		{ @Galley }
+    def @OddFullPagePlace	{ @Galley }
+    def @ColTopPlace		{ @Galley }
+    def @ColFootAndTopPlace	{ @Galley }
+    def @ColPlace		{ @Galley }
+    def @ColFootNotePlace	{ @Galley }
+    def @IntroFullPlace		{ @Galley }
+    def @IntroOddFullPlace	{ @Galley }
+    def @IntroEvenFullPlace	{ @Galley }
+    def @IntroColPlace		{ @Galley }
+    def @IndexPlace		{ @Galley }
+    def @IndexAPlace		{ @Galley }
+    def @IndexBPlace		{ @Galley }
+    def @AfterLinePlace		{ @ForceGalley }
+
+    def @TryAfterLinePlace right x
+    {
+	x @Case {
+	    noforce @Yield @Galley
+	    force   @Yield @ForceGalley
+	}
+    }
+
+    def @EvenFullPageSection
+    {
+		  @OneRow @EvenFullPagePlace
+	//	  @FullPagePlace
+	//@MidGap @EvenFullPageSection
+    }
+
+    def @OddFullPageSection
+    {
+		  @OneRow @OddFullPagePlace
+	//	  @FullPagePlace
+	//@MidGap @OddFullPageSection
+    }
+
+    def @EvenPageTopSect
+    {
+		  @OneRow @EvenPagePlace
+	//	  @PageTopPlace
+	//@MidGap @PageFootAndTopPlace
+	//@MidGap @EvenPageTopSect
+    }
+
+    def @OddPageTopSect
+    {
+		  @PageTopPlace
+	//@MidGap @PageFootAndTopPlace
+	//@MidGap @OddPageTopSect
+    }
+
+    def @PageOddTopSection right @Orient
+    {
+	@OddPageTopSect ||{@OrientedWidth @Orient} @FullPlace
+			||{@OrientedWidth @Orient} @OddFullPlace
+    }
+
+    def @PageEvenTopSection right @Orient
+    {
+	@EvenPageTopSect ||{@OrientedWidth @Orient} @FullPlace
+			 ||{@OrientedWidth @Orient} @EvenFullPlace
+    }
+
+    def @PageIntroOddTopSection right @Orient
+    {
+	@OddPageTopSect ||{@OrientedWidth @Orient} @IntroFullPlace
+			||{@OrientedWidth @Orient} @IntroOddFullPlace
+    }
+
+    def @PageIntroEvenTopSection right @Orient
+    {
+	@EvenPageTopSect
+	||{@OrientedWidth @Orient} @IntroFullPlace
+	||{@OrientedWidth @Orient} @IntroEvenFullPlace
+    }
+
+    def @PageFootNoteList
+    {
+		    @PageFootNotePlace
+	//@FootGap  @PageFootNoteList
+    }
+
+    def @PageFootNoteSection
+    {
+	            @FootLen @Wide @HLine
+	//@FootGap  @PageFootNoteList
+    }
+
+    def @PageFootAndTopSect
+    {
+		  @PageFootAndTopPlace
+	//@MidGap @PageFootAndTopSect
+    }
+
+    def @PageFootSection
+    {
+	//@MidGap       @PageFootAndTopSect
+	//@FootAboveGap @PageFootNoteSection
+    }
+
+    def @ColTopSection
+    {
+		  @ColTopPlace
+	//@MidGap @ColFootAndTopPlace
+	//@MidGap @TryAfterLinePlace noforce
+	//@MidGap @ColTopSection
+    }
+
+    def @RestOfColSection
+    {
+	          @AfterLinePlace
+	//@MidGap @TryAfterLinePlace force
+	//@MidGap @ColPlace @NotRevealed
+	//@MidGap @RestOfColSection
+    }
+
+    def @IntroRestOfColSection
+    {
+	          @AfterLinePlace
+	//@MidGap @TryAfterLinePlace force
+	//@MidGap @IntroColPlace @NotRevealed
+	//@MidGap @IntroRestOfColSection
+    }
+
+    def @ColFootAndTopList { @ColFootAndTopPlace //@TopGap @ColFootAndTopList }
+
+    def @ColFootNoteList
+    {
+		    @ColFootNotePlace
+	//@FootGap  @ColFootNoteList
+    }
+
+    def @ColFootNoteSection
+    {
+	           @FootLen @Wide @HLine
+	//@FootGap @ColFootNoteList
+    }
+
+    def @ColFootSection
+    {
+	//@TopGap       @ColFootAndTopList
+	//@FootAboveGap @ColFootNoteSection
+    }
+
+    def @ColsOf
+	left num
+	named gap { @ColumnGap }
+	right x
+    {
+	def @Two { x ||gap x }
+	def @Four { @Two ||gap @Two }
+	def @Eight { @Four ||gap @Four }
+
+	num @Case {
+	    1  @Yield { x				}
+	    2  @Yield { @Two				}
+	    3  @Yield { @Two  ||gap x			}
+	    4  @Yield { @Four				}
+	    5  @Yield { @Four ||gap x			}
+	    6  @Yield { @Four ||gap @Two		}
+	    7  @Yield { @Four ||gap @Two  ||gap x	}
+	    8  @Yield { @Four ||gap @Four		}
+	    9  @Yield { @Four ||gap @Four ||gap x	}
+	   10  @Yield { @Four ||gap @Four ||gap @Two	}
+	}
+    }
+
+    def @EqualWidth right x { 50c @Wide x }	# believe it or not
+
+    def @ColList right num
+    {
+	@HExpand num @ColsOf @EqualWidth @VExpand
+	{
+	    @ColTopSection //@TopGap
+	    @ColPlace //@MidGap @RestOfColSection // //1rt
+	    @OneRow { @ColFootSection }
+
+	}
+    }
+    
+    def @IntroColList right num
+    {
+	@HExpand num @ColsOf @EqualWidth @VExpand
+	{
+	    @ColTopSection //@TopGap
+	    @IntroColPlace //@MidGap @IntroRestOfColSection // //1rt
+	    @OneRow { @ColFootSection }
+	}
+    }
+    
+    def @ZeroColList right num
+    {
+	@HExpand num @ColsOf @EqualWidth 0c @High @ColPlace
+    }
+    
+    def @ZeroIntroColList right num
+    {
+	@HExpand num @ColsOf @EqualWidth 0c @High @IntroColPlace
+    }
+    
+    def @IndexColList right num
+    {
+	@HExpand num @ColsOf gap { @IndexColumnGap } @EqualWidth @VExpand @IndexPlace
+    }
+    
+    def @IndexAColList right num
+    {
+	@HExpand num @ColsOf gap { @IndexAColumnGap } @EqualWidth @VExpand @IndexAPlace
+    }
+    
+    def @IndexBColList right num
+    {
+	@HExpand num @ColsOf gap { @IndexBColumnGap } @EqualWidth @VExpand @IndexBPlace
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Footnotes.                                                             #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag count
+    def @FootNoteCounterMarker
+	named @Tag {}
+	named count {}
+    {
+	@Null
+    }
+
+    def @FootNoteNum right tag
+    {
+	@FootNoteCounterMarker&&tag @Open { @Next count }
+    }
+
+    def @FootNoteCounterIncrement
+	right tag
+    {
+	   @FootNoteCounterMarker&&preceding @Tagged tag
+	// @FootNoteCounterMarker count { @FootNoteNum tag }
+	// @NumberMarker @Tag { tag }
+		@Value { @FootNoteNumbers @Num @FootNoteNum tag }
+    }
+
+    def @BeginFootNoteCounter
+    {
+	@FootNoteCounterMarker count { 0 }
+    }
+
+    def @FootNote
+	named @Tag {}
+	named @Location { @FootNoteLocation }
+	named @Another { No }
+	named @Label { Numbered }
+	right x
+    {
+
+	def @FootLabelFmt
+	    right x
+	{
+	    @FootNoteFont @Font @FootNoteBreak @Break
+	    +0.3v @VShift { Base 0.8f } @Font x
+	}
+
+	def @FootExtra
+	{
+            @BackEnd @Case {
+	        PlainText @Yield ","
+	        else @Yield @FootLabelFmt ","
+            }
+	}
+
+	def @FootLabel
+	{
+	    @Label @Case {
+		"Numbered" @Yield { @BackEnd @Case {
+		    PlainText @Yield { ({@NumberOf @Tag}) }
+		    else @Yield @FootLabelFmt @NumberOf @Tag
+		} }
+		else @Yield { @BackEnd @Case {
+		    PlainText @Yield @Label
+		    else @Yield @FootLabelFmt @Label
+		} }
+            }
+	}
+
+	def @LongFootLabel
+	{
+	    @Another @Case {
+		No  @Yield {                 @FootLabel }
+		Yes @Yield { @FootExtra &0iu @FootLabel }
+	    }
+	}
+
+	def @FootVal
+	{
+	    @FootNoteFont @Font @FootNoteBreak @Break @Label @Case {
+		"Numbered" @Yield {
+		    { @FootNoteCounterIncrement @Tag & @FootLabel }
+		      @FootNoteFormat x
+		}
+		else @Yield { @FootLabel @FootNoteFormat x }
+	    }
+	}
+
+	def @PageFootNote into { @PageFootNotePlace&&following } { @FootVal }
+	def @ColFootNote  into { @ColFootNotePlace&&following  } { @FootVal }
+
+	@Location @Case {
+	    ColFoot  @Yield { @Null &0iu @LongFootLabel & @ColFootNote  }
+	    PageFoot @Yield { @Null &0iu @LongFootLabel & @PageFootNote }
+	}
+    }
+
+    macro @AnotherFootNote { @FootNote @Another { Yes } }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Definitions for page lists.  There are four symbols here, in the       #
+    #  following pattern:                                                     #
+    #                                                                         #
+    #    @(Simple | Running)(- | Intro)PageList                               #
+    #                                                                         #
+    #  Running means that the page list is to support running headers.        #
+    #  Intro means that the page list is an introductory page list.           #
+    #  These are then packaged into @PageList and @IntroPageList.             #
+    #                                                                         #
+    ###########################################################################
+
+    def @SStart right @PageNum
+    {
+	@PageNum @Case {
+	    { 1 0 } @Yield Start
+	    else    @Yield NonStart
+	}
+    }
+
+    def @ChooseColList right colnum
+    {
+	@OneOf
+	{
+	    @ColList colnum
+	    @IndexAColList @IndexAColumnNumber
+	    @IndexBColList @IndexBColumnNumber
+	    @IndexColList  @IndexColumnNumber
+	}
+    }
+
+    def @ChooseIntroColList right colnum
+    {
+	@OneOf
+	{
+	    @IntroColList colnum
+	    @IndexAColList @IndexAColumnNumber
+	    @IndexBColList @IndexBColumnNumber
+	    @IndexColList  @IndexColumnNumber
+	}
+    }
+
+    def @SimplePageList
+	named @ColumnNumber {}
+	named @PageHeaders {}
+	named extra { No }
+	named @Orient {}
+	named @AtTop { @Null }
+	right @PageNum
+    {
+
+	def @OrdinaryOddPage
+	{
+		{@PageHeaders.{@SStart @PageNum}} @OddTopHeader
+		    { @PageNumbers @Num @PageNum }
+		//@MidGap @AtTop
+		//@MidGap @PageOddTopSection @Orient
+		//@MidGap @ChooseColList @ColumnNumber
+		// //1rt @OneRow
+		{  //        @PageFootSection
+		   //@MidGap {@PageHeaders.{@SStart @PageNum}} @OddFootHeader
+				 { @PageNumbers @Num @PageNum }
+		}
+	}
+
+	def @FullPageOddPage
+	{
+		{@PageHeaders.{@SStart @PageNum}} @OddTopHeader
+		    { @PageNumbers @Num @PageNum }
+		//@MidGap @OddFullPageSection
+		// //1rt @OneRow
+		{ //@MidGap {@PageHeaders.{@SStart @PageNum}} @OddFootHeader
+				 { @PageNumbers @Num @PageNum }
+		}
+	}
+
+        def @SimpleEvenPageList
+	    named @ColumnNumber {}
+	    named @PageHeaders {}
+	    named extra { No }
+	    right @PageNum
+        {
+
+	    def @OrdinaryEvenPage
+	    {
+		@PageHeaders.NonStart @EvenTopHeader
+		    { @PageNumbers @Num @PageNum }
+		//@MidGap @PageEvenTopSection @Orient
+		//@MidGap @ChooseColList @ColumnNumber
+		// //1rt @OneRow
+		{  //        @PageFootSection
+		   //@MidGap @PageHeaders.NonStart @EvenFootHeader
+			     { @PageNumbers @Num @PageNum }
+		}
+	    }
+
+	    def @FullPageEvenPage
+	    {
+		@PageHeaders.NonStart @EvenTopHeader
+		    { @PageNumbers @Num @PageNum }
+		//@MidGap @EvenFullPageSection
+		// //1rt @OneRow
+		{ //@MidGap @PageHeaders.NonStart @EvenFootHeader
+			     { @PageNumbers @Num @PageNum }
+		}
+	    }
+
+	        @PageMarker
+		    rawnum { @PageNum }
+		    num { @PageNumbers @Num @PageNum }
+	    //  @FootNoteThrough @NoDo @BeginFootNoteCounter
+	    //  {} @EvenPage @Orient { @Orient }
+	        {
+		    @OrdinaryEvenPage ||{@OrientedWidth @Orient} @FullPageEvenPage
+	        }
+	    //  @SimplePageList
+		    @ColumnNumber { @ColumnNumber }
+		    @PageHeaders { @PageHeaders }
+		    @Orient { @Orient }
+		@Next @PageNum
+        }
+
+	    @PageMarker
+		rawnum { @PageNum }
+		num { @PageNumbers @Num @PageNum }
+	//  @FootNoteThrough @NoDo @BeginFootNoteCounter
+	//  { extra @Then @ZeroColList @ColumnNumber } @OddPage @Orient { @Orient }
+	    {
+		@OrdinaryOddPage ||{@OrientedWidth @Orient} @FullPageOddPage
+	    }
+	//  @SimpleEvenPageList
+		@ColumnNumber { @ColumnNumber }
+		@PageHeaders { @PageHeaders }
+	    @Next @PageNum
+    }
+
+    def @SimpleIntroPageList
+	named @ColumnNumber {}
+	named @PageHeaders {}
+	named @Orient {}
+	named extra { No }
+	named @AtTop { @Null }
+	right @PageNum
+    {
+	    @PageMarker
+		num { @IntroPageNumbers @Num @PageNum }
+		rawnum { @PageNum }
+	//  @FootNoteThrough @NoDo @BeginFootNoteCounter
+	//  { extra @Then @ZeroIntroColList @ColumnNumber } @OddPage @Orient { @Orient }
+	    {
+		{@PageHeaders.{@SStart @PageNum}} @IntroOddTopHeader
+		    { @IntroPageNumbers @Num @PageNum }
+		//@MidGap @AtTop
+		//@MidGap @PageIntroOddTopSection @Orient
+		//@MidGap @ChooseIntroColList @ColumnNumber
+		// //1rt @OneRow
+		{  //        @PageFootSection
+		   //@MidGap
+		       {@PageHeaders.{@SStart @PageNum}} @IntroOddFootHeader
+			   { @IntroPageNumbers @Num @PageNum }
+		}
+	    }
+	//  @PageMarker
+		num { @IntroPageNumbers @Num @Next @PageNum }
+		rawnum { @Next @PageNum }
+	//  @FootNoteThrough @NoDo @BeginFootNoteCounter
+	//  {} @EvenPage @Orient { @Orient }
+	    @Runner&&following @Open
+	    {
+		@PageHeaders.NonStart @IntroEvenTopHeader { @IntroPageNumbers @Num @Next @PageNum }
+		//@MidGap @PageIntroEvenTopSection @Orient
+		//@MidGap @ChooseIntroColList @ColumnNumber
+		// //1rt @OneRow
+		{  //        @PageFootSection
+		   //@MidGap @PageHeaders.NonStart @IntroEvenFootHeader
+				{ @IntroPageNumbers @Num @Next @PageNum }
+		}
+	    }
+	//  @SimpleIntroPageList
+		@ColumnNumber { @ColumnNumber }
+		@PageHeaders { @PageHeaders }
+		@Orient { @Orient }
+	    @Next @Next @PageNum
+    }
+
+    def @SimpleOddOrEvenIntroPageList
+	named @ColumnNumber {}
+	named @PageHeaders {}
+	named @Orient {}
+	named extra { No }
+	named @AtTop { @Null }
+	right @PageNum
+    {
+
+        def @SimpleEvenIntroPageList
+	    named @ColumnNumber {}
+	    named @PageHeaders {}
+	    named @Orient {}
+	    named extra { No }
+	    named @AtTop { @Null }
+	    right @PageNum
+       {
+
+	    @PageMarker
+		num { @IntroPageNumbers @Num @PageNum }
+		rawnum { @PageNum }
+	 // @FootNoteThrough @NoDo @BeginFootNoteCounter
+	 // {} @EvenPage @Orient { @Orient }
+	    @Runner&&following @Open
+	    {
+		@PageHeaders.NonStart @IntroEvenTopHeader { @IntroPageNumbers @Num @PageNum }
+		//@MidGap @PageIntroEvenTopSection @Orient
+		//@MidGap @ChooseIntroColList @ColumnNumber
+		// //1rt @OneRow
+		{  //        @PageFootSection
+		   //@MidGap @PageHeaders.NonStart @IntroEvenFootHeader
+				{ @IntroPageNumbers @Num @PageNum }
+		}
+	    }
+	 // @SimpleOddOrEvenIntroPageList
+		@ColumnNumber { @ColumnNumber }
+		@PageHeaders { @PageHeaders }
+		@Orient { @Orient }
+	    @Next @PageNum
+       }
+	    @PageMarker
+		num { @IntroPageNumbers @Num @PageNum }
+		rawnum { @PageNum }
+	//  @FootNoteThrough @NoDo @BeginFootNoteCounter
+	//  { extra @Then @ZeroIntroColList @ColumnNumber } @OddPage @Orient { @Orient }
+	    {
+		{@PageHeaders.{@SStart @PageNum}} @IntroOddTopHeader
+		    { @IntroPageNumbers @Num @PageNum }
+		//@MidGap @AtTop
+		//@MidGap @PageIntroOddTopSection @Orient
+		//@MidGap @ChooseIntroColList @ColumnNumber
+		// //1rt @OneRow
+		{  //        @PageFootSection
+		   //@MidGap
+		       {@PageHeaders.{@SStart @PageNum}} @IntroOddFootHeader
+			   { @IntroPageNumbers @Num @PageNum }
+		}
+	    }
+	//  @SimpleEvenIntroPageList
+		@ColumnNumber { @ColumnNumber }
+		@PageHeaders { @PageHeaders }
+		@Orient { @Orient }
+		@Next @PageNum
+    }
+
+    def @RunningPageList
+	named @ColumnNumber {}
+	named @PageHeaders {}
+	named extra { No }
+	named @Orient {}
+	named @AtTop { @Null }
+	right @PageNum
+    {
+
+	def @OrdinaryOddPage
+	{
+	    @Runner&&following @Open
+	    {
+		@PageMarker
+		    num { @MakePageNum
+				numbers { @PageNumbers }
+				rawnum  { @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner } }
+		    rawnum { @PageNum }
+		// @PageHeaders.@Start @RunningOddTopHeader
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    {
+			@MakePageNum
+			    numbers { @PageNumbers }
+			    rawnum  { @PageNum }
+			    prefix  { @Prefix }
+			    owner   { @Owner }
+		    }
+		//@MidGap @AtTop
+		//@MidGap @PageOddTopSection @Orient
+		//@MidGap @ChooseColList @ColumnNumber
+		// //1rt @OneRow
+		{  //        @PageFootSection
+		   //@MidGap @PageHeaders.@Start @RunningOddFootHeader
+			@MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+			@MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+			{
+			    @MakePageNum
+				numbers { @PageNumbers }
+				rawnum  { @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner }
+			}
+		}
+	    }
+	}
+
+	def @FullPageOddPage
+	{
+	    @Runner&&following @Open
+	    {
+		@PageMarker
+		    num { @MakePageNum
+				numbers { @PageNumbers }
+				rawnum  { @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner } }
+		    rawnum { @PageNum }
+		// @PageHeaders.@Start @RunningOddTopHeader
+		    @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+		    @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+		    {
+			@MakePageNum
+			    numbers { @PageNumbers }
+			    rawnum  { @PageNum }
+			    prefix  { @Prefix }
+			    owner   { @Owner }
+		    }
+		//@MidGap @AtTop
+		//@MidGap @OddFullPageSection
+		// //1rt @OneRow
+		{
+		   //@MidGap @PageHeaders.@Start @RunningOddFootHeader
+			@MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+			@MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+			{
+			    @MakePageNum
+				numbers { @PageNumbers }
+				rawnum  { @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner }
+			}
+		}
+	    }
+	}
+
+        def @RunningEvenPageList
+	    named @ColumnNumber {}
+	    named @PageHeaders {}
+	    right @PageNum
+        {
+
+	    def @OrdinaryEvenPage
+	    {
+	        @Runner&&following @Open
+	        {
+		    @PageMarker
+			num { @MakePageNum
+				numbers { @PageNumbers }
+				rawnum  { @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner } }
+			rawnum { @PageNum }
+		    // @PageHeaders.@Start @RunningEvenTopHeader
+			@MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+			@MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+			{
+			    @MakePageNum
+				numbers { @PageNumbers }
+				rawnum  { @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner }
+			}
+		    //@MidGap @PageEvenTopSection @Orient
+		    //@MidGap @ChooseColList @ColumnNumber
+		    // //1rt @OneRow
+		    {  //        @PageFootSection
+		       //@MidGap @PageHeaders.@Start @RunningEvenFootHeader
+			   @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+			   @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+			   {
+				@MakePageNum
+				    numbers { @PageNumbers }
+				    rawnum  { @PageNum }
+				    prefix  { @Prefix }
+				    owner   { @Owner }
+			   }
+		    }
+	        }
+	    }
+
+	    def @FullPageEvenPage
+	    {
+	        @Runner&&following @Open
+	        {
+		    @PageMarker
+			num { @MakePageNum
+				numbers { @PageNumbers }
+				rawnum  { @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner } }
+			rawnum { @PageNum }
+		    // @PageHeaders.@Start @RunningEvenTopHeader
+			@MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+			@MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+			{
+			    @MakePageNum
+				numbers { @PageNumbers }
+				rawnum  { @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner }
+			}
+		    //@MidGap @EvenFullPageSection
+		    // //1rt @OneRow
+		    {
+		       //@MidGap @PageHeaders.@Start @RunningEvenFootHeader
+			   @MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+			   @MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+			   {
+				@MakePageNum
+				    numbers { @PageNumbers }
+				    rawnum  { @PageNum }
+				    prefix  { @Prefix }
+				    owner   { @Owner }
+			   }
+		    }
+	        }
+	    }
+
+		@FootNoteThrough @NoDo @BeginFootNoteCounter
+	    //  {} @EvenPage @Orient { @Orient }
+	        {
+		    @OrdinaryEvenPage ||{@OrientedWidth @Orient} @FullPageEvenPage
+	        }
+	    //  @RunningPageList
+		    @ColumnNumber { @ColumnNumber }
+		    @PageHeaders { @PageHeaders }
+		    @Orient { @Orient }
+		@Next @PageNum
+        }
+
+	    @FootNoteThrough @NoDo @BeginFootNoteCounter
+	//  { extra @Then @ZeroColList @ColumnNumber } @OddPage @Orient { @Orient }
+	    {
+		@OrdinaryOddPage ||{@OrientedWidth @Orient} @FullPageOddPage
+	    }
+	//  @RunningEvenPageList
+		@ColumnNumber { @ColumnNumber }
+		@PageHeaders { @PageHeaders }
+	    @Next @PageNum
+    }
+
+    def @RunningIntroPageList
+	named @ColumnNumber {}
+	named @PageHeaders {}
+	named @AtTop { @Null }
+	named @Orient {}
+	named extra { No }
+	right @PageNum
+    {
+	    @FootNoteThrough @NoDo @BeginFootNoteCounter
+	//  { extra @Then @ZeroIntroColList @ColumnNumber } @OddPage @Orient { @Orient }
+	    @Runner&&following @Open
+	    {
+		@PageMarker
+		    num { @MakePageNum
+			    numbers { @IntroPageNumbers }
+			    rawnum  { @PageNum }
+			    prefix  { @Prefix }
+			    owner   { @Owner } }
+		    rawnum { @PageNum }
+		// @PageHeaders.@Start @RunningIntroOddTopHeader
+			@MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+			@MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+			{
+			    @MakePageNum
+				numbers { @IntroPageNumbers }
+				rawnum  { @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner }
+			}
+		//@MidGap @AtTop
+		//@MidGap @PageIntroOddTopSection @Orient
+		//@MidGap @IntroColList @ColumnNumber
+		// //1rt @OneRow
+		{  //        @PageFootSection
+		   //@MidGap @PageHeaders.@Start @RunningIntroOddFootHeader
+			@MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+			@MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+			{
+			    @MakePageNum
+				numbers { @IntroPageNumbers }
+				rawnum  { @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner }
+			}
+		}
+	    }
+	//  @FootNoteThrough @NoDo @BeginFootNoteCounter
+	//  {} @EvenPage @Orient { @Orient }
+	    @Runner&&following @Open
+	    {
+		@PageMarker
+		    num { @MakePageNum
+			    numbers { @IntroPageNumbers }
+			    rawnum  { @Next @PageNum }
+			    prefix  { @Prefix }
+			    owner   { @Owner } }
+		    rawnum { @Next @PageNum }
+		// @PageHeaders.@Start @RunningIntroEvenTopHeader
+			@MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+			@MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+			{
+			    @MakePageNum
+				numbers { @IntroPageNumbers }
+				rawnum  { @Next @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner }
+			}
+		//@MidGap @PageIntroEvenTopSection @Orient
+		//@MidGap @ChooseIntroColList @ColumnNumber
+		// //1rt @OneRow
+		{  //        @PageFootSection
+		   //@MidGap @PageHeaders.@Start @RunningIntroEvenFootHeader
+			@MajorNum { @MajorNum } @MajorTitle { @MajorTitle }
+			@MinorNum { @MinorNum } @MinorTitle { @MinorTitle }
+			{
+			    @MakePageNum
+				numbers { @IntroPageNumbers }
+				rawnum  { @Next @PageNum }
+				prefix  { @Prefix }
+				owner   { @Owner }
+			}
+		}
+	    }
+	//  @RunningIntroPageList
+		@PageHeaders { @PageHeaders }
+		@ColumnNumber { @ColumnNumber }
+		@Orient { @Orient }
+	    @Next @Next @PageNum
+    }
+
+    def @PageList
+	named @ColumnNumber {}
+	named @PageHeaders {}
+	named extra { No }
+	named @Orient {}
+	named @AtTop { @Null }
+	right @FirstPageNum
+    {
+	@PageHeaders @Case {
+	    { None Simple } @Yield @SimplePageList
+		  @ColumnNumber { @ColumnNumber }
+		  @PageHeaders { @PageHeaders }
+		  @Orient { @Orient }
+		  extra { extra }
+		  @AtTop { @AtTop }
+		  @FirstPageNum
+	    { Running Titles } @Yield @RunningPageList
+		  @ColumnNumber { @ColumnNumber }
+		  @PageHeaders { @PageHeaders }
+		  @Orient { @Orient }
+		  extra { extra }
+		  @AtTop { @AtTop }
+		  @FirstPageNum
+	}
+	//
+	@PageMark last.page
+    }
+
+    def @IntroPageList
+	named @ColumnNumber {}
+	named @PageHeaders {}
+	named @Orient {}
+	named extra { No }
+	named @AtTop { @Null }
+	right @FirstPageNum
+    {
+	@PageHeaders @Case {
+	    { None Simple } @Yield @SimpleIntroPageList
+		  @ColumnNumber { @ColumnNumber }
+		  @PageHeaders { @PageHeaders }
+		  @Orient { @Orient }
+		  extra { extra }
+		  @AtTop { @AtTop }
+		  @FirstPageNum
+	    { Running Titles } @Yield @RunningIntroPageList
+		  @ColumnNumber { @ColumnNumber }
+		  @PageHeaders { @PageHeaders }
+		  @Orient { @Orient }
+		  extra { extra }
+		  @AtTop { @AtTop }
+		  @FirstPageNum
+	}
+    }
+
+    def @ContinuousPageList
+	named @Orient {}
+    {
+	{@OrientedWidth @Orient} @Wide
+	{   //@TopMargin ||@EvenLeftMargin
+	    {
+				@BeginFootNoteCounter
+		//		@ColPlace
+		//@FootAboveGap	@ColFootNoteSection
+		//@FootAboveGap	@PageFootNoteSection
+	    }
+	    ||@EvenRightMargin //@FootMargin
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Table of contents (including lists of figures and tables).             #
+    #                                                                         #
+    ###########################################################################
+
+    def @ContentsItem
+	named indent { 0f }
+	named number {}
+	named title {}
+	named pagenum {}
+	named pregap { @ContentsGap }
+	named postgap { 0c }
+	named protect { No }
+    {
+	def @Leaders { @ContentsLeader &@ContentsLeaderGap @Leaders }
+
+	def @RightPart
+	{
+	    @ContentsRightWidth @Wide {
+		# &@ContentsLeaderGap @Leaders &@ContentsLeaderGap
+		&1rt { pagenum //0.5vx }
+	    }
+	}
+
+	def @Item
+	{
+	    |indent number @ContentsFormat @HExpand {
+	        title & @ContentsLeaderGap @Wide &1rt @OneCol {
+		    @Leaders & @RightPart &0io
+	        }
+	    }
+	    |@ContentsRightWidth
+	}
+
+	//pregap
+	//0.5vx
+	@BackEnd @Case {
+	  { PostScript PlainText } @Yield {
+	    protect @Case {
+	      No    @Yield @Item
+	      Yes   @Yield @Protect @Item
+	    }
+	  }
+	  PDF @Yield {
+	    protect @Case {
+	      No    @Yield { "__link_source=<<"title">>" } @Graphic @Item
+	      Yes   @Yield { "__link_source=<<"title">>" } @Graphic { @Protect @Item }
+	    }
+	  }
+	}
+	//postgap
+    }
+
+    def @ContentsPlace { @Galley }
+    def @FigureContentsPlace { @Galley }
+    def @TableContentsPlace { @Galley }
+
+    def @SendContents into { @ContentsPlace&&preceding }
+	right x
+    {
+	x
+    }
+
+    def @SendFigureContents into { @FigureContentsPlace&&preceding }
+	right x
+    {
+	x
+    }
+
+    def @SendTableContents into { @TableContentsPlace&&preceding }
+	right x
+    {
+	x
+    }
+
+    def @ContentsEntry
+	left  wanted
+	named indent { 0f }
+	named number {}
+	named title {}
+	named pagenum {}
+	named pregap { @ContentsGap }
+	named postgap { 0c }
+    {
+	@MakeContents.wanted @Case {
+	    Yes.Yes   @Yield { @SendContents @ContentsItem
+				   indent { indent }
+				   number { number }
+				   title { title }
+				   pagenum { pagenum }
+				   pregap { pregap }
+				   postgap { postgap }
+			     }
+	    else      @Yield @Null
+	}
+    }
+
+    def @FigureContentsEntry
+	left  wanted
+	named indent { 0f }
+	named number {}
+	named title {}
+	named pagenum {}
+	named pregap { @ContentsGap }
+	named postgap { 0c }
+    {
+	@MakeFigureContents.wanted @Case {
+	    Yes.Yes   @Yield { @SendFigureContents @ContentsItem
+				   indent { indent }
+				   number { number }
+				   title { title }
+				   pagenum { pagenum }
+				   pregap { pregap }
+				   postgap { postgap }
+			     }
+	    else      @Yield @Null
+	}
+    }
+
+    def @TableContentsEntry
+	left  wanted
+	named indent { 0f }
+	named number {}
+	named title {}
+	named pagenum {}
+	named pregap { @ContentsGap }
+	named postgap { 0c }
+    {
+	@MakeTableContents.wanted @Case {
+	    Yes.Yes   @Yield { @SendTableContents @ContentsItem
+				   indent { indent }
+				   number { number }
+				   title { title }
+				   pagenum { pagenum }
+				   pregap { pregap }
+				   postgap { postgap }
+			     }
+	    else      @Yield @Null
+	}
+    }
+
+    def @MajorContentsEntry
+	left  wanted
+	named indent { 0f }
+	named number {}
+	named title {}
+	named pagenum {}
+	named pregap { @ContentsGapAbove }
+	named postgap { @ContentsGapBelow }
+    {
+	@MakeContents.wanted @Case {
+	    Yes.Yes   @Yield { @SendContents @ContentsItem
+				   indent { indent }
+				   number { @ContentsFont @Font number }
+				   title { @ContentsFont @Font title }
+				   pagenum { pagenum }
+				   pregap { pregap }
+				   postgap { postgap }
+				   protect { Yes }
+			     }
+	    else      @Yield @Null
+	}
+    }
+
+    def @VeryMajorContentsEntry
+	left  wanted
+	named indent { 0.5rt }
+	named title {}
+	named pregap { @ContentsPartGapAbove }
+	named postgap { @ContentsPartGapBelow }
+    {
+	def item
+	{
+	    //pregap
+	    //0.5vx
+	    |indent @ContentsFont @Font @OneCol title |
+	    //0.5vx
+	    //postgap
+	}
+
+	@MakeContents.wanted @Case {
+	    Yes.Yes   @Yield @SendContents item
+	    else      @Yield @Null
+	}
+
+    }
+
+    def @ContentsSection
+    {
+	def @ContentsList { @ContentsPlace // @ContentsList }
+
+	@MakeContents @Case {
+	    { Yes Bypass }  @Yield @ContentsList
+	    else	    @Yield @Null
+	}
+    }
+
+    def @FigureContentsSection
+    {
+	def @FigureContentsList { @FigureContentsPlace // @FigureContentsList }
+
+	@MakeFigureContents @Case {
+	    { Yes Bypass }  @Yield @FigureContentsList
+	    else	    @Yield @Null
+	}
+    }
+
+    def @TableContentsSection
+    {
+	def @TableContentsList { @TableContentsPlace // @TableContentsList }
+
+	@MakeTableContents @Case {
+	    { Yes Bypass }  @Yield @TableContentsList
+	    else	    @Yield @Null
+	}
+    }
+
+    ###########################################################################
+    #                                                                         #
+    #  Bypass table of contents.                                              #
+    #                                                                         #
+    ###########################################################################
+
+    def @BypassContentsEntry into { @ContentsPlace&&preceding }
+	named indent { 0f }
+	named number {}
+	named title {}
+	named pagenum {}
+    {
+	@MakeContents @Case {
+	    Bypass @Yield { @ContentsItem
+				indent { indent }
+				number { number }
+				title { title }
+				pagenum { pagenum }
+				pregap { @ContentsGap }
+				postgap { 0c }
+			  }
+	    else  @Yield  @Null
+	}
+    }
+
+    def @BypassFigureContentsEntry into { @FigureContentsPlace&&preceding }
+	named indent { 0f }
+	named number {}
+	named title {}
+	named pagenum {}
+    {
+	@MakeFigureContents @Case {
+	    Bypass @Yield { @ContentsItem
+				indent { indent }
+				number { number }
+				title { title }
+				pagenum { pagenum }
+				pregap { @ContentsGap }
+				postgap { 0c }
+			  }
+	    else  @Yield  @Null
+	}
+    }
+
+    def @BypassTableContentsEntry into { @TableContentsPlace&&preceding }
+	named indent { 0f }
+	named number {}
+	named title {}
+	named pagenum {}
+    {
+	@MakeTableContents @Case {
+	    Bypass @Yield { @ContentsItem
+				indent { indent }
+				number { number }
+				title { title }
+				pagenum { pagenum }
+				pregap { @ContentsGap }
+				postgap { 0c }
+			  }
+	    else  @Yield  @Null
+	}
+    }
+
+    def @BypassMajorContentsEntry into { @ContentsPlace&&preceding }
+	named indent { 0f }
+	named number {}
+	named title {}
+	named pagenum {}
+    {
+	@MakeContents @Case {
+	    Bypass @Yield { @ContentsItem
+				indent { indent }
+				number { @B number }
+				title { @B title }
+				pagenum { pagenum }
+				pregap { @ContentsGapAbove }
+				postgap { @ContentsGapBelow }
+			  }
+	    else  @Yield  @Null
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Endnotes.                                                              #
+    #                                                                         #
+    ###########################################################################
+
+    export num
+    def @EndNoteList
+	named @Tag {}
+	right num
+    {
+	@Galley //@EndNoteGap @EndNoteList @Next num
+    }
+
+    def endtag right num
+    {
+        @BackEnd @Case {
+	    PlainText @Yield {
+	        ({@EndNoteNumbers @Num num})
+	    }
+	    else @Yield {
+	        +0.3v @VShift 0.8f @Font @EndNoteNumbers @Num num
+	    }
+        }
+    }
+
+    def @EndNote
+	named @Tag {}
+	right x
+    {
+	def ftag
+	{
+	    @EndNoteFont @Font @EndNoteList&&@Tag @Open { endtag num }
+	}
+
+	def @ENote into { @EndNoteList&&following }
+	{
+	    @EndNoteFont @Font @EndNoteBreak @Break
+	    { { @EndNoteList&&preceding @Tagged @Tag ftag } @EndNoteFormat x }
+	}
+
+	@Null & @EndNoteFont @Font ftag & @ENote
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Margin Notes.                                                          #
+    #                                                                         #
+    ###########################################################################
+
+    def @ZeroSize right x
+    {
+	@HContract @VContract { ^/0io |0io @OneCol @OneRow x |0io /0io }
+    }
+
+    def @MargPut
+	left parity
+	right x
+    {
+	@MarginNoteFont @Font @MarginNoteBreak @Break @ZeroSize {
+	  @BackEnd @Case {
+	    PlainText @Yield ""
+	    PostScript @Yield {
+	    { parity "LoutMargShift gsave" // "grestore" } @Graphic
+	    {
+		|@MarginNoteHGap @MarginNoteWidth @Wide @OneRow x
+		|@MarginNoteHGap //@MarginNoteVGap
+	    }
+	    }
+	    PDF @Yield { "% @MargPut/LoutMargShift UNIMPLEMENTED" @Graphic {
+		  |@MarginNoteHGap @MarginNoteWidth @Wide @OneRow x
+		  |@MarginNoteHGap //@MarginNoteVGap
+	      }	# VT: PDF currently has no output
+	    }
+	  }
+	}
+    }
+
+    def @LeftNote  right x { @Null & 0 @MargPut x }
+    def @RightNote right x { @Null & 1 @MargPut x }
+    def @OuterNote right x { @Null & 2 @MargPut x }
+    def @InnerNote right x { @Null & 3 @MargPut x }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @Place: places an object at an arbitrary point on the page.            #
+    #                                                                         #
+    ###########################################################################
+
+#
+# VT: the expressions in the braces will work for PostScript but not for PDF
+# they should be modified in the way the "named c { " cm" }" blocks were modified above
+# but since the point of @Place is to output a matrix (?), I have not implemented this change
+#
+    def @Place
+      named x
+	named "+" precedence 96 associativity left left a right b { a b "add" }
+	named "-" precedence 96 associativity left left a right b { a b "sub" }
+	named "/" precedence 97 associativity left left a right b { a b "div" }
+	named "*" precedence 98 associativity left left a right b { a b "mul" }
+	named c   precedence 99                    left a         { a "cm"    }
+	named i   precedence 99                    left a         { a "in"    }
+	named e   precedence 99                    left a         { a "em"    }
+	named p   precedence 99                    left a         { a "pt"    }
+	named f   precedence 99                    left a         { a "ft"    }
+	named s   precedence 99                    left a         { a "sp"    }
+	named v   precedence 99                    left a         { a "vs"    }
+	named cm  precedence 99                    left a         { a "cm"    }
+	named in  precedence 99                    left a         { a "in"    }
+	named em  precedence 99                    left a         { a "em"    }
+	named pt  precedence 99                    left a         { a "pt"    }
+	named ft  precedence 99                    left a         { a "ft"    }
+	named sp  precedence 99                    left a         { a "sp"    }
+	named vs  precedence 99                    left a         { a "vs"    }
+	{ 0 }
+      named y
+	named "+" precedence 96 associativity left left a right b { a b "add" }
+	named "-" precedence 96 associativity left left a right b { a b "sub" }
+	named "/" precedence 97 associativity left left a right b { a b "div" }
+	named "*" precedence 98 associativity left left a right b { a b "mul" }
+	named c   precedence 99                    left a         { a "cm"    }
+	named i   precedence 99                    left a         { a "in"    }
+	named e   precedence 99                    left a         { a "em"    }
+	named p   precedence 99                    left a         { a "pt"    }
+	named f   precedence 99                    left a         { a "ft"    }
+	named s   precedence 99                    left a         { a "sp"    }
+	named v   precedence 99                    left a         { a "vs"    }
+	named cm  precedence 99                    left a         { a "cm"    }
+	named in  precedence 99                    left a         { a "in"    }
+	named em  precedence 99                    left a         { a "em"    }
+	named pt  precedence 99                    left a         { a "pt"    }
+	named ft  precedence 99                    left a         { a "ft"    }
+	named sp  precedence 99                    left a         { a "sp"    }
+	named vs  precedence 99                    left a         { a "vs"    }
+	{ 0 }
+      right val
+    {
+	@ZeroSize {
+	  @BackEnd @Case {
+	    PlainText @Yield ""
+	    PostScript @Yield {
+		{ "LoutPageDict begin matr setmatrix" x y "translate end gsave"
+		  // "grestore" } @Graphic val
+	    }
+	    else @Yield { { "% @Place UNIMPLEMENTED" } @Graphic val	# VT: PDF currently has no output
+	    }
+	  }
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @Theorem, @Proof, and @EndProof                                       #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag val
+    def @TheoremCounterMarker
+	named @Tag {}
+	named val {}
+    {
+	@Null
+    }
+
+    def @BeginTheoremCounter
+	right prefix
+    {
+	@TheoremCounterMarker val { prefix @Join 0 }
+    }
+
+    def @TheoremNum right tag
+    {
+	@TheoremCounterMarker&&tag @Open { @Next val }
+    }
+
+    def @TheoremCounterIncrement
+	right tag
+    {
+	@TheoremCounterMarker&&preceding @Tagged tag
+	@TheoremCounterMarker val { @TheoremNum tag }
+	@NumberMarker @Tag { tag } @Value { @TheoremNum tag }
+    }
+
+    def @Theorem
+       named @Tag {}
+       named @Title {}
+       right x
+    {
+	def @TheoremTitle
+	{
+	   @Title @Case {
+		""   @Yield @Null
+		else @Yield @TheoremTitleFormat @Title
+	   }
+	}
+
+	{ @PageMark @Tag @TheoremCounterIncrement @Tag } @Insert
+	@TheoremFormat
+	    word { theorem @WordVal @TheoremWord }
+	    number { @TheoremNum @Tag }
+	    title { @TheoremTitle }
+	    body { x }
+    }
+
+    macro @Proof { @B { {proof @WordVal @ProofWord}: } &2s }
+
+    macro @EndProof { &1rt @Box {} }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @Definition                                                           #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag val
+    def @DefinitionCounterMarker
+	named @Tag {}
+	named val {}
+    {
+	@Null
+    }
+
+    def @BeginDefinitionCounter
+	right prefix
+    {
+	@DefinitionCounterMarker val { prefix @Join 0 }
+    }
+
+    def @DefinitionNum right tag
+    {
+	@DefinitionCounterMarker&&tag @Open { @Next val }
+    }
+
+    def @DefinitionCounterIncrement
+	right tag
+    {
+	@DefinitionCounterMarker&&preceding @Tagged tag
+	@DefinitionCounterMarker val { @DefinitionNum tag }
+	@NumberMarker @Tag { tag } @Value { @DefinitionNum tag }
+    }
+
+    def @Definition
+       named @Tag {}
+       named @Title {}
+       right x
+    {
+	def @DefinitionTitle
+	{
+	   @Title @Case {
+		""   @Yield @Null
+		else @Yield (@Title)
+	   }
+	}
+
+	{ @PageMark @Tag @DefinitionCounterIncrement @Tag } @Insert
+	@DefinitionFormat
+	    word { definition @WordVal @DefinitionWord }
+	    number { @DefinitionNum @Tag }
+	    title { @DefinitionTitle }
+	    body { x }
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @Claim                                                                #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag val
+    def @ClaimCounterMarker
+	named @Tag {}
+	named val {}
+    {
+	@Null
+    }
+
+    def @BeginClaimCounter
+	right prefix
+    {
+	@ClaimCounterMarker val { prefix @Join 0 }
+    }
+
+    def @ClaimNum right tag
+    {
+	@ClaimCounterMarker&&tag @Open { @Next val }
+    }
+
+    def @ClaimCounterIncrement
+	right tag
+    {
+	@ClaimCounterMarker&&preceding @Tagged tag
+	@ClaimCounterMarker val { @ClaimNum tag }
+	@NumberMarker @Tag { tag } @Value { @ClaimNum tag }
+    }
+
+    def @Claim
+       named @Tag {}
+       named @Title {}
+       right x
+    {
+	def @ClaimTitle
+	{
+	   @Title @Case {
+		""   @Yield @Null
+		else @Yield (@Title)
+	   }
+	}
+
+	{ @PageMark @Tag @ClaimCounterIncrement @Tag } @Insert
+	@ClaimFormat
+	    word { claim @WordVal @ClaimWord }
+	    number { @ClaimNum @Tag }
+	    title { @ClaimTitle }
+	    body { x }
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @Proposition                                                          #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag val
+    def @PropositionCounterMarker
+	named @Tag {}
+	named val {}
+    {
+	@Null
+    }
+
+    def @BeginPropositionCounter
+	right prefix
+    {
+	@PropositionCounterMarker val { prefix @Join 0 }
+    }
+
+    def @PropositionNum right tag
+    {
+	@PropositionCounterMarker&&tag @Open { @Next val }
+    }
+
+    def @PropositionCounterIncrement
+	right tag
+    {
+	@PropositionCounterMarker&&preceding @Tagged tag
+	@PropositionCounterMarker val { @PropositionNum tag }
+	@NumberMarker @Tag { tag } @Value { @PropositionNum tag }
+    }
+
+    def @Proposition
+       named @Tag {}
+       named @Title {}
+       right x
+    {
+	def @PropositionTitle
+	{
+	   @Title @Case {
+		""   @Yield @Null
+		else @Yield (@Title)
+	   }
+	}
+
+	{ @PageMark @Tag @PropositionCounterIncrement @Tag } @Insert
+	@PropositionFormat
+	    word { proposition @WordVal @PropositionWord }
+	    number { @PropositionNum @Tag }
+	    title { @PropositionTitle }
+	    body { x }
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @Lemma                                                                #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag val
+    def @LemmaCounterMarker
+	named @Tag {}
+	named val {}
+    {
+	@Null
+    }
+
+    def @BeginLemmaCounter
+	right prefix
+    {
+	@LemmaCounterMarker val { prefix @Join 0 }
+    }
+
+    def @LemmaNum right tag
+    {
+	@LemmaCounterMarker&&tag @Open { @Next val }
+    }
+
+    def @LemmaCounterIncrement
+	right tag
+    {
+	@LemmaCounterMarker&&preceding @Tagged tag
+	@LemmaCounterMarker val { @LemmaNum tag }
+	@NumberMarker @Tag { tag } @Value { @LemmaNum tag }
+    }
+
+    def @Lemma
+       named @Tag {}
+       named @Title {}
+       right x
+    {
+	def @LemmaTitle
+	{
+	   @Title @Case {
+		""   @Yield @Null
+		else @Yield (@Title)
+	   }
+	}
+
+	{ @PageMark @Tag @LemmaCounterIncrement @Tag } @Insert
+	@LemmaFormat
+	    word { lemma @WordVal @LemmaWord }
+	    number { @LemmaNum @Tag }
+	    title { @LemmaTitle }
+	    body { x }
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @Corollary                                                            #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag val
+    def @CorollaryCounterMarker
+	named @Tag {}
+	named val {}
+    {
+	@Null
+    }
+
+    def @BeginCorollaryCounter
+	right prefix
+    {
+	@CorollaryCounterMarker val { prefix @Join 0 }
+    }
+
+    def @CorollaryNum right tag
+    {
+	@CorollaryCounterMarker&&tag @Open { @Next val }
+    }
+
+    def @CorollaryCounterIncrement
+	right tag
+    {
+	@CorollaryCounterMarker&&preceding @Tagged tag
+	@CorollaryCounterMarker val { @CorollaryNum tag }
+	@NumberMarker @Tag { tag } @Value { @CorollaryNum tag }
+    }
+
+    def @Corollary
+       named @Tag {}
+       named @Title {}
+       right x
+    {
+	def @CorollaryTitle
+	{
+	   @Title @Case {
+		""   @Yield @Null
+		else @Yield (@Title)
+	   }
+	}
+
+	{ @PageMark @Tag @CorollaryCounterIncrement @Tag } @Insert
+	@CorollaryFormat
+	    word { corollary @WordVal @CorollaryWord }
+	    number { @CorollaryNum @Tag }
+	    title { @CorollaryTitle }
+	    body { x }
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @Example                                                              #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag val
+    def @ExampleCounterMarker
+	named @Tag {}
+	named val {}
+    {
+	@Null
+    }
+
+    def @BeginExampleCounter
+	right prefix
+    {
+	@ExampleCounterMarker val { prefix @Join 0 }
+    }
+
+    def @ExampleNum right tag
+    {
+	@ExampleCounterMarker&&tag @Open { @Next val }
+    }
+
+    def @ExampleCounterIncrement
+	right tag
+    {
+	@ExampleCounterMarker&&preceding @Tagged tag
+	@ExampleCounterMarker val { @ExampleNum tag }
+	@NumberMarker @Tag { tag } @Value { @ExampleNum tag }
+    }
+
+    def @Example
+       named @Tag {}
+       named @Title {}
+       right x
+    {
+	def @ExampleTitle
+	{
+	   @Title @Case {
+		""   @Yield @Null
+		else @Yield (@Title)
+	   }
+	}
+
+	{ @PageMark @Tag @ExampleCounterIncrement @Tag } @Insert
+	@ExampleFormat
+	    word { example @WordVal @ExampleWord }
+	    number { @ExampleNum @Tag }
+	    title { @ExampleTitle }
+	    body { x }
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @BeginAllCounters - begin all counters                                 #
+    #                                                                         #
+    ###########################################################################
+
+    def @BeginAllCounters
+	left condition
+	right prefix
+    {
+	condition @Do {
+	    @BeginTheoremCounter prefix
+	    // @BeginDefinitionCounter prefix
+	    // @BeginClaimCounter prefix
+	    // @BeginPropositionCounter prefix
+	    // @BeginLemmaCounter prefix
+	    // @BeginCorollaryCounter prefix
+	    // @BeginExampleCounter prefix
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @Reference - a reference.                                              #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag @Type @Abstract @Address @Annote @Author @Day @Edition
+	   @HowPublished @InAuthor @InTitle @Institution @Journal @Keywords
+	   @Label @Month @Note @Number @Organization @Page @Pages @Pinpoint
+	   @Publisher @Title @TitleNote @TRType @URL @Volume @Year
+
+    def @Reference
+	named compulsory @Tag		{}
+	named compulsory @Type		{}
+	named @Abstract			{}
+	named @Address			{}
+	named @Annote			{}
+	named @Author			{}
+	named @Day			{}
+	named @Edition			{}
+	named @HowPublished		{}
+	named @InAuthor			{}
+	named @InTitle			{}
+	named @Institution		{}
+	named @Journal			{}
+	named @Keywords			{}
+	named @Label			{}
+	named @Month			{}
+	named @Note			{}
+	named @Number			{}
+	named @Organization		{}
+	named @Page			{}
+	named @Pages			{}
+	named @Pinpoint			{}
+	named @Publisher		{}
+	named @Title			{}
+	named @TitleNote		{}
+	named @TRType			{}
+	named @URL
+	  named "~"  { "~"      }
+	  named "/"  { "/"  &0p }
+	  named "//" { "//" &0p }	{}
+	named @Volume			{}
+	named @Year			{}
+    { @Null }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @CiteLabel - the value of the label of a reference within a citation.  #
+    #                                                                         #
+    ###########################################################################
+
+    def @CiteLabel
+	left label
+	right tag 
+    {
+	@RefCiteLabels
+	    @RefNum       { @NumberOf tag				}
+	    @Tag          { tag						}
+	    @Type         { @Reference&&tag @Open { @Type }		}
+	    @Abstract     { @Reference&&tag @Open { @Abstract }		}
+	    @Address      { @Reference&&tag @Open { @Address }		}
+	    @Annote       { @Reference&&tag @Open { @Annote }		}
+	    @Author       { @Reference&&tag @Open { @Author }		}
+	    @Day          { @Reference&&tag @Open { @Day }		}
+	    @Edition      { @Reference&&tag @Open { @Edition }		}
+	    @HowPublished { @Reference&&tag @Open { @HowPublished }	}
+	    @InAuthor     { @Reference&&tag @Open { @InAuthor }		}
+	    @InTitle      { @Reference&&tag @Open { @InTitle }		}
+	    @Institution  { @Reference&&tag @Open { @Institution }	}
+	    @Journal      { @Reference&&tag @Open { @Journal }		}
+	    @Keywords     { @Reference&&tag @Open { @Keywords }		}
+
+	    @Label        { label @Case {
+			      "" @Yield {@Reference&&tag @Open {@Label}}
+			      else @Yield label
+			    }						}
+
+	    @Month        { @Reference&&tag @Open { @Month }		}
+	    @Note         { @Reference&&tag @Open { @Note }		}
+	    @Number       { @Reference&&tag @Open { @Number }		}
+	    @Organization { @Reference&&tag @Open { @Organization }	}
+	    @Page         { @Reference&&tag @Open { @Page }		}
+	    @Pages        { @Reference&&tag @Open { @Pages }		}
+	    @Pinpoint     { @Reference&&tag @Open { @Pinpoint }		}
+	    @Publisher    { @Reference&&tag @Open { @Publisher }	}
+	    @Title        { @Reference&&tag @Open { @Title }		}
+	    @TitleNote    { @Reference&&tag @Open { @TitleNote }	}
+	    @TRType       { @Reference&&tag @Open { @TRType }		}
+	    @Volume       { @Reference&&tag @Open { @Volume }		}
+	    @Year         { @Reference&&tag @Open { @Year }		}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @ListLabel - the value of the label of a reference within a ref list.  #
+    #                                                                         #
+    ###########################################################################
+
+    def @ListLabel
+	left label
+	right tag 
+    {
+	@RefListLabels
+	    @RefNum       { @NumberOf tag				}
+	    @Tag          { tag						}
+	    @Type         { @Reference&&tag @Open { @Type }		}
+	    @Abstract     { @Reference&&tag @Open { @Abstract }		}
+	    @Address      { @Reference&&tag @Open { @Address }		}
+	    @Annote       { @Reference&&tag @Open { @Annote }		}
+	    @Author       { @Reference&&tag @Open { @Author }		}
+	    @Day          { @Reference&&tag @Open { @Day }		}
+	    @Edition      { @Reference&&tag @Open { @Edition }		}
+	    @HowPublished { @Reference&&tag @Open { @HowPublished }	}
+	    @InAuthor     { @Reference&&tag @Open { @InAuthor }		}
+	    @InTitle      { @Reference&&tag @Open { @InTitle }		}
+	    @Institution  { @Reference&&tag @Open { @Institution }	}
+	    @Journal      { @Reference&&tag @Open { @Journal }		}
+	    @Keywords     { @Reference&&tag @Open { @Keywords }		}
+
+	    @Label        { label @Case {
+			      "" @Yield {@Reference&&tag @Open {@Label}}
+			      else @Yield label
+			    }						}
+
+	    @Month        { @Reference&&tag @Open { @Month }		}
+	    @Note         { @Reference&&tag @Open { @Note }		}
+	    @Number       { @Reference&&tag @Open { @Number }		}
+	    @Organization { @Reference&&tag @Open { @Organization }	}
+	    @Page         { @Reference&&tag @Open { @Page }		}
+	    @Pages        { @Reference&&tag @Open { @Pages }		}
+	    @Pinpoint     { @Reference&&tag @Open { @Pinpoint }		}
+	    @Publisher    { @Reference&&tag @Open { @Publisher }	}
+	    @Title        { @Reference&&tag @Open { @Title }		}
+	    @TitleNote    { @Reference&&tag @Open { @TitleNote }	}
+	    @TRType       { @Reference&&tag @Open { @TRType }		}
+	    @Volume       { @Reference&&tag @Open { @Volume }		}
+	    @Year         { @Reference&&tag @Open { @Year }		}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @SortKey - the value of the sort key of a reference.                   #
+    #                                                                         #
+    ###########################################################################
+
+    def @SortKey
+	left label
+	right tag 
+    {
+	@RefListSortKey
+	    @Tag          { tag						}
+	    @Type         { @Reference&&tag @Open { @Type }		}
+	    @Abstract     { @Reference&&tag @Open { @Abstract }		}
+	    @Address      { @Reference&&tag @Open { @Address }		}
+	    @Annote       { @Reference&&tag @Open { @Annote }		}
+	    @Author       { @Reference&&tag @Open { @Author }		}
+	    @Day          { @Reference&&tag @Open { @Day }		}
+	    @Edition      { @Reference&&tag @Open { @Edition }		}
+	    @HowPublished { @Reference&&tag @Open { @HowPublished }	}
+	    @InAuthor     { @Reference&&tag @Open { @InAuthor }		}
+	    @InTitle      { @Reference&&tag @Open { @InTitle }		}
+	    @Institution  { @Reference&&tag @Open { @Institution }	}
+	    @Journal      { @Reference&&tag @Open { @Journal }		}
+	    @Keywords     { @Reference&&tag @Open { @Keywords }		}
+
+	    @Label        { label @Case {
+			      "" @Yield {@Reference&&tag @Open {@Label}}
+			      else @Yield label
+			    }						}
+
+	    @Month        { @Reference&&tag @Open { @Month }		}
+	    @Note         { @Reference&&tag @Open { @Note }		}
+	    @Number       { @Reference&&tag @Open { @Number }		}
+	    @Organization { @Reference&&tag @Open { @Organization }	}
+	    @Page         { @Reference&&tag @Open { @Page }		}
+	    @Pages        { @Reference&&tag @Open { @Pages }		}
+	    @Pinpoint     { @Reference&&tag @Open { @Pinpoint }		}
+	    @Publisher    { @Reference&&tag @Open { @Publisher }	}
+	    @Title        { @Reference&&tag @Open { @Title }		}
+	    @TitleNote    { @Reference&&tag @Open { @TitleNote }	}
+	    @TRType       { @Reference&&tag @Open { @TRType }		}
+	    @Volume       { @Reference&&tag @Open { @Volume }		}
+	    @Year         { @Reference&&tag @Open { @Year }		}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @RefStyle - a reference printing style.                                #
+    #                                                                         #
+    ###########################################################################
+
+    export @Style
+    def @RefStyle
+	left @Tag
+	named @Style right reftag {}
+    {}
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @RefPrint - prints reference with tag reftag in appropriate style.     #
+    #                                                                         #
+    ###########################################################################
+
+    def @RefPrint right reftag
+    {	& @RefStyle&&{ @Reference&&reftag @Open { @Type } }
+	@Open { @Style reftag } &
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @ReferencesSection and @ChapReferencesSection - a list of references.  #
+    #                                                                         #
+    ###########################################################################
+
+    def @RefPlace { @Galley }
+    def @ChapRefPlace { @Galley }
+
+    def @BypassRefPlace { @Galley }
+    def @BypassChapRefPlace { @Galley }
+
+    def @ReferencesSection
+    {
+	def @RefList right num
+	{
+	    @NumberMarker @Value { @RefNumbers @Num num } & | @RefPlace
+	    //@RefListGap @RefList @Next num
+	}
+
+	def @BypassRefList
+	{
+	    @BypassRefPlace //@RefListGap @BypassRefList
+	}
+
+	@RefList 1
+	//@RefListGap
+	@BypassRefList
+    }
+
+    def @ChapReferencesSection
+    {
+	def @ChapRefList right num
+	{
+	    @NumberMarker @Value { @RefNumbers @Num num } & | @ChapRefPlace
+	    //@RefListGap @ChapRefList @Next num
+	}
+
+	def @BypassChapRefList
+	{
+	    @BypassChapRefPlace //@RefListGap @BypassChapRefList
+	}
+
+	@ChapRefList 1
+	//@RefListGap
+	@BypassChapRefList
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #   @RefHeading - heading for reference lists.                            #
+    #                                                                         #
+    ###########################################################################
+
+    def @RefHeading right x
+    {	x @Case {
+	    references @Yield @Word&&references
+	    bibliography @Yield @Word&&bibliography
+	    else @Yield x
+	}
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #   @ChapRefSection                                                   #
+    #                                                                     #
+    #######################################################################
+
+    def @ChapRefSection
+    {
+	@Heading @RefHeading @ChapRefListTitle
+	@DP
+	@ChapReferencesSection
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @SendRef and @ChapSendRef - send one reference to the reference list.  #
+    #                                                                         #
+    ###########################################################################
+
+    def @RefItem
+	left lab
+	right ref
+    {
+	def @ZeroWidth right x { &0io @OneCol x &0io }
+
+	@RefListFormat @Case {
+	    NoLabels   @Yield {					   ref	}
+	    Labels     @Yield { @ZeroWidth lab |@RefListLabelWidth ref	}
+	    DropLabels @Yield { lab //1vx      |@RefListLabelWidth ref	}
+	    InLabels   @Yield { lab & 2s @Wide &		   ref	}
+	}
+    }
+
+
+    def @RefListItem
+	left label
+	right tag
+    {
+#
+# VT: I can't get this to work, so I've put back the original code
+#
+#	@RefListFont @Font @RefListBreak @Break {
+#	  @BackEnd @Case {
+#	    PostScript @Yield {
+#	      @NumberMarker&&preceding @Tagged tag &
+#	      @PageMark tag
+#	      |@RefListIndent {label @ListLabel tag} @RefItem {@RefPrint tag}
+#	      |@RefListRightIndent
+#	    }
+#	    PDF @Yield {
+#	      { "__link_target=<<"tag">>" }
+#	      @Graphic
+#	      {
+#	      @NumberMarker&&preceding @Tagged tag &
+#	      @PageMark tag
+#	      |@RefListIndent {label @ListLabel tag} @RefItem {@RefPrint tag}
+#	      |@RefListRightIndent
+#	      }
+#	    }
+#	  }
+#	}
+# VT: original:
+
+	@RefListFont @Font @RefListBreak @Break {
+	    @NumberMarker&&preceding @Tagged tag &
+	    @PageMark tag
+	    |@RefListIndent {label @ListLabel tag} @RefItem {@RefPrint tag}
+	    |@RefListRightIndent
+	}
+    }
+
+
+    def @SendRef into { @RefPlace&&foll_or_prec }
+	left label
+	right tag
+    {
+	def @Key { label @SortKey tag }
+
+	# no @Merge i.e. omit duplicates
+
+	label @RefListItem tag
+    }
+
+
+    def @ChapSendRef into { @ChapRefPlace&&foll_or_prec }
+	left label
+	right tag
+    {
+	def @Key { label @SortKey tag }
+
+	# no @Merge i.e. omit duplicates
+
+	label @RefListItem tag
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @Ref (bare citation) and its variants.                                 #
+    #                                                                         #
+    ###########################################################################
+
+    def @Ref
+	named label {}
+	right tag
+    {
+	@MakeReferences @Case {
+	    Yes	  @Yield { label @CiteLabel tag & label @SendRef tag }
+	    else  @Yield @Null
+	}
+    }
+
+    def @NoRef
+	named label {}
+	right tag
+    {
+	@MakeReferences @Case {
+	    Yes  @Yield { label @SendRef tag }
+	    else @Yield @Null
+	}
+    }
+
+    def @ChapRef
+	named label {}
+	right tag
+    {
+	@MakeReferences @Case {
+	    Yes  @Yield { label @CiteLabel tag & label @ChapSendRef tag }
+	    else @Yield @Null
+	}
+    }
+
+    def @NoChapRef
+	named label {}
+	right tag
+    {
+	@MakeReferences @Case {
+	    Yes  @Yield { label @ChapSendRef tag }
+	    else @Yield @Null
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Bypass references.                                                     #
+    #                                                                         #
+    ###########################################################################
+
+    def @BypassReference into { @BypassRefPlace&&preceding }
+	named label {}
+	named value {}
+    {
+	@MakeReferences @Case {
+	    Bypass @Yield { label @RefItem value }
+	    else   @Yield @Null
+	}
+    }
+
+    def @BypassChapReference into { @BypassChapRefPlace&&preceding }
+	named label {}
+	named value {}
+    {
+	@MakeReferences @Case {
+	    Bypass @Yield { label @RefItem value }
+	    else   @Yield @Null
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @Cite (citation) and its variants.                                     #
+    #                                                                         #
+    ###########################################################################
+
+    export "$" "," ";"
+    def @Cite body cite
+    {
+	macro "$" { @Ref }
+	def "," precedence 90 left x { x"," }
+	def ";" precedence 90 left x { x";" }
+
+	@MakeReferences @Case {
+#	    Yes  @Yield { @RefCiteStyle cite }
+	    Yes  @Yield {
+	      @BackEnd @Case {
+	        { PlainText PostScript } @Yield { @RefCiteStyle cite }
+	        PDF        @Yield {
+#
+# VT: can't get this to work: need to ask JHK; I want the text following the "$" to be
+# the name of the link that we are trying to create a link to
+#	          { "__link_source=<<"label">>" }
+#	          @Graphic
+			{ @RefCiteStyle cite }
+#	          { blue @Colour @Underline { @RefCiteStyle cite } }
+	        }
+	      }
+	    }
+	    else @Yield @Null
+	}
+    }
+
+    export "$" "," ";"
+    def @NoCite body cite
+    {
+	macro "$" { @NoRef }
+	def "," precedence 90 left x { x }
+	def ";" precedence 90 left x { x";" }
+
+	@MakeReferences @Case {
+	    Yes  @Yield { cite }
+	    else @Yield @Null
+	}
+    }
+
+    export "$" "," ";"
+    def @ChapCite body cite
+    {
+	macro "$" { @ChapRef }
+	def "," precedence 90 left x { x"," }
+	def ";" precedence 90 left x { x";" }
+
+	@MakeReferences @Case {
+	    Yes  @Yield { @RefCiteStyle cite }
+	    else @Yield @Null
+	}
+    }
+
+    export "$" "," ";"
+    def @NoChapCite body cite
+    {
+	macro "$" { @NoChapRef }
+	def "," precedence 90 left x { x }
+	def ";" precedence 90 left x { x";" }
+
+	@MakeReferences @Case {
+	    Yes  @Yield { cite }
+	    else @Yield @Null
+	}
+    }
+
+    ###########################################################################
+    #                                                                         #
+    #  Floating figures.                                                      #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag prefix
+    def @FigurePrefixMarker
+	named @Tag {}
+	named prefix {}
+    {
+	@Null
+    }
+
+    export @Tag count
+    def @FigureCounterMarker
+	named @Tag {}
+	named count {}
+    {
+	@Null
+    }
+
+    def @RawFigureNum right tag
+    {
+	@FigureCounterMarker&&tag @Open { @Next count }
+    }
+
+    def @FigureCounterIncrement
+	right tag
+    {
+	   @FigureCounterMarker&&preceding @Tagged tag
+	// @FigurePrefixMarker&&preceding @Tagged tag
+	// @FigureCounterMarker count { @RawFigureNum tag }
+	// @NumberMarker @Tag { tag }
+		@Value { { @FigurePrefixMarker&&tag @Open { prefix } }
+		    @Join {@FigureNumbers @Num @RawFigureNum tag}
+		}
+    }
+
+    def @BeginFigureCounter
+	left condition
+	right prefix
+    {
+	condition @Do {
+	       @FigurePrefixMarker prefix { prefix }
+	    // @FigureCounterMarker count { 0 }
+	}
+    }
+
+    def @EndFigureList { @Galley //@MidGap @EndFigureList }
+
+    def @Figure
+	named @Tag {}
+	named @Caption { dft }
+	named @ShortCaption { dft }
+	named @CaptionPos { @FigureCaptionPos }
+	named @Format
+    	    named @II right x { |@DisplayIndent x |               }
+    	    named @QQ right x { |@DisplayIndent x |@DisplayIndent }
+    	    named @CC right x { |0.5rt x          |               }
+    	    named @RR right x { |1.0rt x          |               }
+		right @Body { @FigureFormat @Body }
+	named @InitialLanguage { @InitialLanguage }
+	named @BypassNumber { dft }
+	named @OnePage { dft }
+	named @Location { @FigureLocation }
+	right @Body
+    {
+	def @FigureNumber
+	{
+	    @BypassNumber @Dft @NumberOf @Tag
+	}
+
+	def @ContentsCaption
+	{
+	    @ShortCaption @Dft @Caption
+	}
+
+	def @OnePg
+	{
+	    @OnePage @Case {
+		{ No  no } @Yield No
+		{ Yes yes } @Yield Yes
+		dft @Yield { @Location @Case {
+				PageTop		@Yield No
+				EvenPageTop	@Yield No
+				FullPage	@Yield No
+				EvenFullPage	@Yield No
+				PageFoot	@Yield Yes
+				ColTop		@Yield No
+				ColFoot		@Yield Yes
+				ColEnd		@Yield No
+				Display		@Yield Yes
+				AfterLine	@Yield Yes
+				TryAfterLine	@Yield Yes
+				Raw		@Yield No
+			     }
+			   }
+	    }
+	}
+
+	def @CaptionState
+	{
+	    @Caption @Case {
+		dft  @Yield None
+		else @Yield { @CaptionPos @Case {
+		    { Below below } @Yield Below
+		    { Above above } @Yield Above
+		} }
+	    }
+	}
+
+	#def @FigureLabel
+	#{
+	#    @FigureNumbers @Case {
+	#	No   @Yield @Null
+	#	else @Yield {
+	#	    @CaptionFormat { {figure @WordVal @FigureWord} @NumSep @FigureNumber }
+	#	}
+	#    }
+	#}
+
+	def @CaptionVal
+	{
+	    @FigureCaptionFont @Font @FigureCaptionBreak @Break
+	    { ||0.5rt @FigureCaptionFormat
+		 word { figure @WordVal @FigureWord }
+		 number { @FigureNumber }
+		 caption { @Caption }
+	    }
+	}
+
+	def @FigureVal
+	{
+	    @InitialLanguage @Language
+	    {
+		@MakeFigureContents @FigureContentsEntry
+		    indent { 0f }
+		    number { @FigureNumber }
+		    title { @InitialLanguage @Language @ContentsCaption }
+		    pagenum { @PageOf @Tag }
+		// @FigureCounterIncrement @Tag
+		// @PageMark @Tag
+		// @Body
+	    }
+	}
+
+	def @FigureTarget
+	{
+	    @Location @Case {
+		PageTop		@Yield  @PageTopPlace&&following
+		EvenPageTop	@Yield  @PageTopPlace&&following
+		FullPage	@Yield  @FullPagePlace&&following
+		EvenFullPage	@Yield  @FullPagePlace&&following
+		PageFoot	@Yield  @PageFootAndTopPlace&&following
+		ColTop		@Yield  @ColTopPlace&&following
+		ColFoot		@Yield  @ColFootAndTopPlace&&following
+		ColEnd		@Yield  @EndFigureList&&following
+		Display		@Yield  @AfterLinePlace&&following
+		AfterLine	@Yield  @AfterLinePlace&&following
+		TryAfterLine	@Yield  @TryAfterLinePlace&&following
+	    }
+	}
+
+	def @SendEncl into { @FigureTarget }
+	    right x
+	{
+	    def @Enclose right x
+	    {
+		@OnePg @Case {
+                	No  @Yield @Format x
+                	Yes @Yield x
+            	}
+	    }
+
+	    x
+	}
+
+	def @Send into { @FigureTarget }
+	    right x
+	{
+	    x
+	}
+
+	def @EvenFullPageSend into { @EvenFullPagePlace&&following }
+	    right x
+	{
+	    @OneRow x
+	}
+
+	def @EvenPageSend into { @EvenPagePlace&&following }
+	    right x
+	{
+	    @OneRow x
+	}
+
+	def @RawFigureVal
+	{
+	    @OnePg.@CaptionState @Case
+	    {
+		Yes.Below @Yield @OneRow { @Format @FigureVal @DP @CaptionVal }
+		Yes.Above @Yield @OneRow { @CaptionVal @DP @Format @FigureVal }
+		Yes.None  @Yield @OneRow { @Format @FigureVal }
+		No.Below  @Yield         { @Format @FigureVal @DP @CaptionVal }
+		No.Above  @Yield         { @CaptionVal @DP @Format @FigureVal }
+		No.None   @Yield         { @Format @FigureVal }
+	    }
+	}
+
+	def @NonRawFigureVal
+	{
+	  @OnePg.@CaptionState @Case
+	  {
+	    Yes.Below @Yield {
+		@Send @OneRow { @Format @FigureVal @DP @CaptionVal // @DupRunner}
+	    }
+	    Yes.Above @Yield {
+		@Send @OneRow { @CaptionVal @DP @Format @FigureVal // @DupRunner}
+	    }
+	    Yes.None @Yield {
+		@Send @OneRow { @Format @FigureVal // @DupRunner }
+	    }
+	    No.Below @Yield {
+		@SendEncl { @FigureVal // @Send { @CaptionVal // @DupRunner } }
+	    }
+	    No.Above @Yield {
+		@Send { @CaptionVal // @SendEncl { @FigureVal // @DupRunner } }
+	    }
+	    No.None @Yield {
+		@SendEncl { @FigureVal // @DupRunner }
+	    }
+	  }
+	}
+
+	@Location @Case {
+	    Raw		  @Yield @RawFigureVal
+	    Display	  @Yield { @NonRawFigureVal &1rt }
+	    EvenPageTop   @Yield @EvenPageSend @NonRawFigureVal
+	    EvenFullPage  @Yield @EvenFullPageSend @NonRawFigureVal
+	    else	  @Yield @NonRawFigureVal
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Floating tables (exact clone of figure code immediately above).        #
+    #                                                                         #
+    ###########################################################################
+
+    export @Tag prefix
+    def @TablePrefixMarker
+	named @Tag {}
+	named prefix {}
+    {
+	@Null
+    }
+
+    export @Tag count
+    def @TableCounterMarker
+	named @Tag {}
+	named count {}
+    {
+	@Null
+    }
+
+    def @RawTableNum right tag
+    {
+	@TableCounterMarker&&tag @Open { @Next count }
+    }
+
+    def @TableCounterIncrement
+	right tag
+    {
+	   @TableCounterMarker&&preceding @Tagged tag
+	// @TablePrefixMarker&&preceding @Tagged tag
+	// @TableCounterMarker count { @RawTableNum tag }
+	// @NumberMarker @Tag { tag }
+		@Value { { @TablePrefixMarker&&tag @Open { prefix } }
+		    @Join {@TableNumbers @Num @RawTableNum tag}
+		}
+    }
+
+    def @BeginTableCounter
+	left condition
+	right prefix
+    {
+	condition @Do {
+	       @TablePrefixMarker prefix { prefix }
+	    // @TableCounterMarker count { 0 }
+	}
+    }
+
+    def @EndTableList { @Galley //@MidGap @EndTableList }
+
+    def @Table
+	named @Tag {}
+	named @Caption { dft }
+	named @ShortCaption { dft }
+	named @CaptionPos { @TableCaptionPos }
+	named @Format
+    	    named @II right x { |@DisplayIndent x |               }
+    	    named @QQ right x { |@DisplayIndent x |@DisplayIndent }
+    	    named @CC right x { |0.5rt x          |               }
+    	    named @RR right x { |1.0rt x          |               }
+		right @Body { @TableFormat @Body }
+	named @InitialLanguage { @InitialLanguage }
+	named @BypassNumber { dft }
+	named @OnePage { dft }
+	named @Location { @TableLocation }
+	right @Body
+    {
+	def @TableNumber
+	{
+	    @BypassNumber @Dft @NumberOf @Tag
+	}
+
+	def @ContentsCaption
+	{
+	    @ShortCaption @Dft @Caption
+	}
+
+	def @OnePg
+	{
+	    @OnePage @Case {
+		{ No  no } @Yield No
+		{ Yes yes } @Yield Yes
+		dft @Yield { @Location @Case {
+				PageTop		@Yield No
+				EvenPageTop	@Yield No
+				FullPage	@Yield No
+				EvenFullPage	@Yield No
+				PageFoot	@Yield Yes
+				ColTop		@Yield No
+				ColFoot		@Yield Yes
+				ColEnd		@Yield No
+				Display		@Yield Yes
+				AfterLine	@Yield Yes
+				TryAfterLine	@Yield Yes
+				Raw		@Yield No
+			     }
+			   }
+	    }
+	}
+
+	def @CaptionState
+	{
+	    @Caption @Case {
+		dft  @Yield None
+		else @Yield { @CaptionPos @Case {
+		    { Below below } @Yield Below
+		    { Above above } @Yield Above
+		} }
+	    }
+	}
+
+	#def @TableLabel
+	#{
+	#    @TableNumbers @Case {
+	#	No   @Yield @Null
+	#	else @Yield {
+	#	    @CaptionFormat { {table @WordVal @TableWord} @NumSep @TableNumber }
+	#	}
+	#    }
+	#}
+
+	def @CaptionVal
+	{
+	    @TableCaptionFont @Font @TableCaptionBreak @Break
+	    { ||0.5rt @TableCaptionFormat
+		 word { table @WordVal @TableWord }
+		 number { @TableNumber }
+		 caption { @Caption }
+	    }
+	}
+
+	def @TableVal
+	{
+	    @InitialLanguage @Language
+	    {
+		@MakeTableContents @TableContentsEntry
+		    indent { 0f }
+		    number { @TableNumber }
+		    title { @InitialLanguage @Language @ContentsCaption }
+		    pagenum { @PageOf @Tag }
+		// @TableCounterIncrement @Tag
+		// @PageMark @Tag
+		// @Body
+	    }
+	}
+
+	def @TableTarget
+	{
+	    @Location @Case {
+		PageTop		@Yield  @PageTopPlace&&following
+		EvenPageTop	@Yield  @PageTopPlace&&following
+		FullPage	@Yield  @FullPagePlace&&following
+		EvenFullPage	@Yield  @FullPagePlace&&following
+		PageFoot	@Yield  @PageFootAndTopPlace&&following
+		ColTop		@Yield  @ColTopPlace&&following
+		ColFoot		@Yield  @ColFootAndTopPlace&&following
+		ColEnd		@Yield  @EndTableList&&following
+		Display		@Yield  @AfterLinePlace&&following
+		AfterLine	@Yield  @AfterLinePlace&&following
+		TryAfterLine	@Yield  @TryAfterLinePlace&&following
+	    }
+	}
+
+	def @SendEncl into { @TableTarget }
+	    right x
+	{
+	    def @Enclose right x
+	    {
+		@OnePg @Case {
+                	No  @Yield @Format x
+                	Yes @Yield x
+            	}
+	    }
+
+	    x
+	}
+
+	def @Send into { @TableTarget }
+	    right x
+	{
+	    x
+	}
+
+	def @EvenFullPageSend into { @EvenFullPagePlace&&following }
+	    right x
+	{
+	    @OneRow x
+	}
+
+	def @EvenPageSend into { @EvenPagePlace&&following }
+	    right x
+	{
+	    @OneRow x
+	}
+
+	def @RawTableVal
+	{
+	    @OnePg.@CaptionState @Case
+	    {
+		Yes.Below @Yield @OneRow { @Format @TableVal @DP @CaptionVal }
+		Yes.Above @Yield @OneRow { @CaptionVal @DP @Format @TableVal }
+		Yes.None  @Yield @OneRow { @Format @TableVal }
+		No.Below  @Yield         { @Format @TableVal @DP @CaptionVal }
+		No.Above  @Yield         { @CaptionVal @DP @Format @TableVal }
+		No.None   @Yield         { @Format @TableVal }
+	    }
+	}
+
+	def @NonRawTableVal
+	{
+	  @OnePg.@CaptionState @Case
+	  {
+	    Yes.Below @Yield {
+		@Send @OneRow { @Format @TableVal @DP @CaptionVal // @DupRunner}
+	    }
+	    Yes.Above @Yield {
+		@Send @OneRow { @CaptionVal @DP @Format @TableVal // @DupRunner}
+	    }
+	    Yes.None @Yield {
+		@Send @OneRow { @Format @TableVal // @DupRunner }
+	    }
+	    No.Below @Yield {
+		@SendEncl { @TableVal // @Send { @CaptionVal // @DupRunner } }
+	    }
+	    No.Above @Yield {
+		@Send { @CaptionVal // @SendEncl { @TableVal // @DupRunner } }
+	    }
+	    No.None @Yield {
+		@SendEncl { @TableVal // @DupRunner }
+	    }
+	  }
+	}
+
+	@Location @Case {
+	    Raw		  @Yield @RawTableVal
+	    Display	  @Yield { @NonRawTableVal &1rt }
+	    EvenPageTop   @Yield @EvenPageSend @NonRawTableVal
+	    EvenFullPage  @Yield @EvenFullPageSend @NonRawTableVal
+	    else	  @Yield @NonRawTableVal
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Index.                                                                 #
+    #                                                                         #
+    ###########################################################################
+
+    def @IndexList { @Galley //1vx @IndexList }
+    def @BypassIndexList { @Galley //1vx @BypassIndexList }
+
+    def @IndexSection into { @IndexPlace&&following }
+	right etc
+    {
+	// @IndexBreak @Break @IndexList
+	// @IndexBreak @Break @BypassIndexList // etc
+    }
+
+    def @DoIndex into { @IndexList&&following }
+	left @Key
+	named indent { 0f }
+	right @Body
+    {
+	def @Merge left x right y
+	{
+	    {x @Rump y} @Case
+	    {
+	        ""      @Yield  x
+		else    @Yield  { { x &"0.03fu" , } @Meld y }
+	    }
+
+################################ obsolete ###################################
+#	    {x @Rump y} @Case
+#	    {
+#		""	@Yield	x
+#		else	@Yield	{
+#				 { {x @Rump y} @Common "," } @Case
+#				 {
+#				   ","	@Yield { x &"0.03fu" x @Rump y }
+#				   else	@Yield { x &"0.03fu" , x @Rump y }
+#				 }
+#				}
+#	    }
+#############################################################################
+	}
+
+	@IndexFont @Font @IndexBreak @Break { indent @Wide & @Body }
+    }
+
+    def @RawIndex
+	left x
+	named @Tag {}
+	named indent { 0f }
+	right y
+    {
+	@MakeIndex @Case {
+	    Yes  @Yield { {@PageMark @Tag} x @DoIndex indent { indent } y }
+	    else @Yield @Null
+	}
+    }
+
+    macro @RawSubIndex    { @RawIndex indent { "1f" } }
+    macro @RawSubSubIndex { @RawIndex indent { "2f" } }
+
+    def @Index
+	left x
+	named @Tag {}
+	named indent { 0f }
+	named to {}
+	right y
+    {
+	def numval
+	{
+#	    to @Case
+#	    {
+#		""    @Yield @PageOf @Tag
+#		else  @Yield {
+#		    { @PageOf @Tag } @Case
+#		    {
+#			{ @PageOf to } @Yield { @PageOf @Tag }
+#			else	       @Yield { {@PageOf @Tag}--{@PageOf to} }
+#		    }
+#		}
+#	    }
+	 @BackEnd @Case {
+	  { PlainText PostScript } @Yield {
+	    to @Case
+	    {
+		""    @Yield @PageOf @Tag
+		else  @Yield {
+		    { @PageOf @Tag } @Case
+		    {
+			{ @PageOf to } @Yield { @PageOf @Tag }
+			else	       @Yield { {@PageOf @Tag}--{@PageOf to} }
+		    }
+		}
+	    }
+	  }
+#
+#	PDF: Index entries produce a blue underlined hyperlink for the page number
+#
+	  PDF @Yield {
+	    { "__link_source=<<"@Tag">>" }
+	    @Graphic { blue @Colour @Underline {
+	    to @Case
+	    {
+		""    @Yield @PageOf @Tag
+		else  @Yield {
+		    { @PageOf @Tag } @Case
+		    {
+			{ @PageOf to } @Yield { @PageOf @Tag }
+			else	       @Yield { {@PageOf @Tag}--{@PageOf to} }
+		    }
+		}
+	    }
+	    }
+	    }
+	  }
+	 }
+	}
+
+	@MakeIndex @Case {
+	    Yes  @Yield {
+		     @BackEnd @Case {
+			 { PostScript PlainText } @Yield {
+			   @PageMark @Tag
+			   x @DoIndex indent { indent } { y &"0.03fu" , numval }
+			 }
+			 PDF @Yield {
+			   {"__link_target=<<"@Tag">>"} @Graphic {""}
+			   @PageMark @Tag
+			   x @DoIndex indent { indent } { y &"0.03fu" , numval }
+			 }
+		     }
+		   }
+#	    Yes  @Yield { @PageMark @Tag
+#			  x @DoIndex indent { indent } { y &"0.03fu" , numval }
+#			}
+	    else @Yield @Null
+	}
+    }
+
+    macro @SubIndex { @Index indent { "1f" } }
+    macro @SubSubIndex { @Index indent { "2f" } }
+
+    def @IndexBlanks
+    {
+	b @RawIndex {} c @RawIndex {} d @RawIndex {} e @RawIndex {}
+	f @RawIndex {} g @RawIndex {} h @RawIndex {} i @RawIndex {}
+	j @RawIndex {} k @RawIndex {} l @RawIndex {} m @RawIndex {}
+	n @RawIndex {} o @RawIndex {} p @RawIndex {} q @RawIndex {}
+	r @RawIndex {} s @RawIndex {} t @RawIndex {} u @RawIndex {}
+	v @RawIndex {} w @RawIndex {} x @RawIndex {} y @RawIndex {}
+	z @RawIndex {}
+    }
+
+    def @BypassBeginIndexPlace { @Galley }
+
+    def @BypassBeginIndex force into { @BypassBeginIndexPlace&&preceding } {}
+
+    def @BypassRawIndex force into { @BypassIndexList&&preceding }
+	named indent { 0f }
+	right x
+    {
+	&indent x
+    }
+
+    def @BypassEndIndex { @Null }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  IndexA.                                                                #
+    #                                                                         #
+    ###########################################################################
+
+    def @IndexAList { @Galley //1vx @IndexAList }
+    def @BypassIndexAList { @Galley //1vx @BypassIndexAList }
+
+    def @IndexASection into { @IndexAPlace&&following }
+	right etc
+    {
+	// @IndexAList // etc
+	// @BypassIndexAList // etc
+    }
+
+    def @DoIndexA into { @IndexAList&&following }
+	left @Key
+	named indent { 0f }
+	right @Body
+    {
+	def @Merge left x right y
+	{
+	    {x @Rump y} @Case
+	    {
+	        ""      @Yield  x
+		else    @Yield  { { x &"0.03fu" , } @Meld y }
+	    }
+	}
+
+	@IndexAFont @Font @IndexABreak @Break { indent @Wide & @Body }
+    }
+
+    def @RawIndexA
+	left x
+	named @Tag {}
+	named indent { 0f }
+	right y
+    {
+	@MakeIndexA @Case {
+	    Yes  @Yield { {@PageMark @Tag} x @DoIndexA indent { indent } y }
+	    else @Yield @Null
+	}
+    }
+
+    macro @RawSubIndexA    { @RawIndexA indent { "1f" } }
+    macro @RawSubSubIndexA { @RawIndexA indent { "2f" } }
+
+    def @IndexA
+	left x
+	named @Tag {}
+	named indent { 0f }
+	named to {}
+	right y
+    {
+	def numval
+	{
+#	    to @Case
+#	    {
+#		""    @Yield @PageOf @Tag
+#		else  @Yield {
+#		    { @PageOf @Tag } @Case
+#		    {
+#			{ @PageOf to } @Yield { @PageOf @Tag }
+#			else	       @Yield { {@PageOf @Tag}--{@PageOf to} }
+#		    }
+#		}
+#	    }
+	 @BackEnd @Case {
+	  { PostScript PlainText } @Yield {
+	    to @Case
+	    {
+		""    @Yield @PageOf @Tag
+		else  @Yield {
+		    { @PageOf @Tag } @Case
+		    {
+			{ @PageOf to } @Yield { @PageOf @Tag }
+			else	       @Yield { {@PageOf @Tag}--{@PageOf to} }
+		    }
+		}
+	    }
+	  }
+#
+#	PDF: Index entries produce a blue underlined hyperlink for the page number
+#
+	  PDF @Yield {
+	    { "__link_source=<<"@Tag">>" }
+	    @Graphic { blue @Colour @Underline {
+	    to @Case
+	    {
+		""    @Yield @PageOf @Tag
+		else  @Yield {
+		    { @PageOf @Tag } @Case
+		    {
+			{ @PageOf to } @Yield { @PageOf @Tag }
+			else	       @Yield { {@PageOf @Tag}--{@PageOf to} }
+		    }
+		}
+	    }
+	    }
+	    }
+	  }
+	 }
+	}
+
+	@MakeIndexA @Case {
+	    Yes  @Yield { @PageMark @Tag
+			  x @DoIndexA indent { indent } { y &"0.03fu" , numval }
+			}
+	    else @Yield @Null
+	}
+    }
+
+    macro @SubIndexA { @IndexA indent { "1f" } }
+    macro @SubSubIndexA { @IndexA indent { "2f" } }
+
+    def @IndexABlanks
+    {
+	b @RawIndexA {} c @RawIndexA {} d @RawIndexA {} e @RawIndexA {}
+	f @RawIndexA {} g @RawIndexA {} h @RawIndexA {} i @RawIndexA {}
+	j @RawIndexA {} k @RawIndexA {} l @RawIndexA {} m @RawIndexA {}
+	n @RawIndexA {} o @RawIndexA {} p @RawIndexA {} q @RawIndexA {}
+	r @RawIndexA {} s @RawIndexA {} t @RawIndexA {} u @RawIndexA {}
+	v @RawIndexA {} w @RawIndexA {} x @RawIndexA {} y @RawIndexA {}
+	z @RawIndexA {}
+    }
+
+    def @BypassBeginIndexAPlace { @Galley }
+
+    def @BypassBeginIndexA force into { @BypassBeginIndexAPlace&&preceding } {}
+
+    def @BypassRawIndexA force into { @BypassIndexAList&&preceding }
+	named indent { 0f }
+	right x
+    {
+	&indent x
+    }
+
+    def @BypassEndIndexA { @Null }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  IndexB.                                                                #
+    #                                                                         #
+    ###########################################################################
+
+    def @IndexBList { @Galley //1vx @IndexBList }
+    def @BypassIndexBList { @Galley //1vx @BypassIndexBList }
+
+    def @IndexBSection into { @IndexBPlace&&following }
+	right etc
+    {
+	// @IndexBList // etc
+	// @BypassIndexBList // etc
+    }
+
+    def @DoIndexB into { @IndexBList&&following }
+	left @Key
+	named indent { 0f }
+	right @Body
+    {
+	def @Merge left x right y
+	{
+	    {x @Rump y} @Case
+	    {
+	        ""      @Yield  x
+		else    @Yield  { { x &"0.03fu" , } @Meld y }
+	    }
+	}
+
+	@IndexBFont @Font @IndexBBreak @Break { indent @Wide & @Body }
+    }
+
+    def @RawIndexB
+	left x
+	named @Tag {}
+	named indent { 0f }
+	right y
+    {
+	@MakeIndexB @Case {
+	    Yes  @Yield { {@PageMark @Tag} x @DoIndexB indent { indent } y }
+	    else @Yield @Null
+	}
+    }
+
+    macro @RawSubIndexB    { @RawIndexB indent { "1f" } }
+    macro @RawSubSubIndexB { @RawIndexB indent { "2f" } }
+
+    def @IndexB
+	left x
+	named @Tag {}
+	named indent { 0f }
+	named to {}
+	right y
+    {
+	def numval
+	{
+#	    to @Case
+#	    {
+#		""    @Yield @PageOf @Tag
+#		else  @Yield {
+#		    { @PageOf @Tag } @Case
+#		    {
+#			{ @PageOf to } @Yield { @PageOf @Tag }
+#			else	       @Yield { {@PageOf @Tag}--{@PageOf to} }
+#		    }
+#		}
+#	    }
+	 @BackEnd @Case {
+	  { PostScript PlainText } @Yield {
+	    to @Case
+	    {
+		""    @Yield @PageOf @Tag
+		else  @Yield {
+		    { @PageOf @Tag } @Case
+		    {
+			{ @PageOf to } @Yield { @PageOf @Tag }
+			else	       @Yield { {@PageOf @Tag}--{@PageOf to} }
+		    }
+		}
+	    }
+	  }
+#
+#	PDF: Index entries produce a blue underlined hyperlink for the page number
+#
+	  PDF @Yield {
+	    { "__link_source=<<"@Tag">>" }
+	    @Graphic { blue @Colour @Underline {
+	    to @Case
+	    {
+		""    @Yield @PageOf @Tag
+		else  @Yield {
+		    { @PageOf @Tag } @Case
+		    {
+			{ @PageOf to } @Yield { @PageOf @Tag }
+			else	       @Yield { {@PageOf @Tag}--{@PageOf to} }
+		    }
+		}
+	    }
+	    }
+	    }
+	  }
+	 }
+	}
+
+	@MakeIndexB @Case {
+	    Yes  @Yield { @PageMark @Tag
+			  x @DoIndexB indent { indent } { y &"0.03fu" , numval }
+			}
+	    else @Yield @Null
+	}
+    }
+
+    macro @SubIndexB { @IndexB indent { "1f" } }
+    macro @SubSubIndexB { @IndexB indent { "2f" } }
+
+    def @IndexBBlanks
+    {
+	b @RawIndexB {} c @RawIndexB {} d @RawIndexB {} e @RawIndexB {}
+	f @RawIndexB {} g @RawIndexB {} h @RawIndexB {} i @RawIndexB {}
+	j @RawIndexB {} k @RawIndexB {} l @RawIndexB {} m @RawIndexB {}
+	n @RawIndexB {} o @RawIndexB {} p @RawIndexB {} q @RawIndexB {}
+	r @RawIndexB {} s @RawIndexB {} t @RawIndexB {} u @RawIndexB {}
+	v @RawIndexB {} w @RawIndexB {} x @RawIndexB {} y @RawIndexB {}
+	z @RawIndexB {}
+    }
+
+    def @BypassBeginIndexBPlace { @Galley }
+
+    def @BypassBeginIndexB force into { @BypassBeginIndexBPlace&&preceding } {}
+
+    def @BypassRawIndexB force into { @BypassIndexBList&&preceding }
+	named indent { 0f }
+	right x
+    {
+	&indent x
+    }
+
+    def @BypassEndIndexB { @Null }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @LargeScaleStructure                                                   #
+    #                                                                         #
+    #  The prototype for the value of each large-scale structure symbol       #
+    #  (@Chapter, @Section, etc.)                                             #
+    #                                                                         #
+    ###########################################################################
+
+    def @LargeScaleStructure
+	named tag {}			# tag of this large-scale structure sym
+	named type {}			# MajorIntro, Major, VeryMajor, or Minor
+	named initiallanguage {}	# its language
+	named title {}			# its full title
+	named runningtitle {}		# its running title
+	named aboveheadinggap { 0f }	# gap above heading
+	named headingfont {}		# its heading font
+	named headingbreak {}		# its heading break
+	named headingformat		# its heading format
+	    left @Num right @Body {}
+	named incontents { No }         # entry in table of contents required
+	named contentsindent { 0f }	# only if type is Major
+	named word {}
+	named numbers { None }
+	named attachnum {}		# only if numbers is not None
+	named retrievenum {}		# only if numbers is not None
+	named bypassnumber {}		# only if numbers is not None, or VeryMajor
+	named prefix {}			# prefix of number of this symbol
+	named pnprefix {}		# prefix for page numbers of this sym
+	named majornum { dft }
+	named majortitle { dft }
+	named minornum { dft }
+	named minortitle { dft }
+	named intheorems { No }
+	named indisplays { No }
+	named infigures { No }
+	named intables { No }
+	named inrunners { No }
+	named sendheader right @Body {}
+	named innergap {}
+	named endifmajor right innergap {
+	    @EndFigureList
+	    //innergap @EndNoteList 1
+	    //innergap @ChapRefSection
+	}
+	named wantindefinite { No }
+	right @Body
+    {
+
+	def @ShortNum
+	{
+	    numbers @Then {
+		bypassnumber @Dft {
+		    prefix @Join { numbers @Num retrievenum }
+		}
+	    }
+	}
+
+	def @LongNum
+	{
+	    numbers @Then {
+		initiallanguage @Language { word @NumSep @ShortNum }
+	    }
+	}
+
+	def @ShortTitle
+	{
+	    initiallanguage @Language { runningtitle @Dft title }
+	}
+
+        def @Run right start
+        {
+	    inrunners @Do type @Case {
+
+		{ Major MajorIntro } @Yield {
+		    start @Runner
+			@MajorNum { majornum @Dft @LongNum }
+			@MajorTitle { majortitle @Dft @ShortTitle }
+			@MinorNum {}
+			@MinorTitle {}
+			@Owner { tag }
+			@Prefix { pnprefix @Join @ShortNum }
+		}
+
+		{ ExtraMajor ExtraMajorIntro } @Yield {
+		    start @Runner
+			@MajorNum { majornum @Dft @LongNum }
+			@MajorTitle { majortitle @Dft @ShortTitle }
+			@MinorNum { majornum @Dft @LongNum }
+			@MinorTitle { majortitle @Dft @ShortTitle }
+			@Owner { tag }
+			@Prefix { pnprefix @Join @ShortNum }
+		}
+
+		{ VeryMajor } @Yield {
+		    start @Runner
+		        @MajorNum { majornum @Dft @LongNum }
+		        @MajorTitle { majortitle @Dft @ShortTitle }
+		        @MinorNum {}
+		        @MinorTitle {}
+		        @Owner { tag }
+		        @Prefix {}
+		}
+
+		Minor @Yield {
+		    start @Runner
+			@MajorNum { majornum @Dft @LongNum }
+			@MajorTitle { majortitle @Dft @ShortTitle }
+			@MinorNum { minornum @Dft @LongNum }
+			@MinorTitle { minortitle @Dft @ShortTitle }
+			@Owner { tag }
+			@Prefix { pnprefix @Join @ShortNum }
+		}
+	    }
+        }
+
+	def @ContentsStuff
+	{
+	    incontents.type @Case {
+
+		Yes.Minor @Yield {
+			incontents @ContentsEntry
+			    indent { contentsindent }
+			    number { @LongNum }
+			    title { initiallanguage @Language title }
+			    pagenum { @PageOf tag }
+	        }
+
+		{ Yes.Major Yes.MajorIntro Yes.ExtraMajor Yes.ExtraMajorIntro } @Yield {
+			incontents @MajorContentsEntry
+			    number { @LongNum }
+			    title { initiallanguage @Language title }
+			    pagenum { @PageOf tag }
+	        }
+
+		{ Yes.VeryMajor } @Yield {
+			incontents @VeryMajorContentsEntry
+			    title { initiallanguage @Language { bypassnumber: &2s title } }
+		}
+
+		else @Yield @Null
+	    }
+	}
+
+	def @Heading
+	{
+	    def @AttachPDFLink
+	        left title
+	        right x
+	    {
+	        @BackEnd @Case {
+
+                    # VTan: Rats! Cannot use the tag for the name of the link
+	            # because the source link has no access to the tag
+                    #
+                    # using title will work most of the time; it will fail
+	            # with a "problem with left parameter of @Graphic" warning
+	            # message if the title has objects other than text in it.
+	            # Eg, "@Title { My @FancyTitle }"  with
+	            # "def @FancyTitle { @OneCol { @Bold "fancy" "title" }" }
+                    #
+                    # Example: the user manual has a definition for @Tex which
+	            # causes this warning message to appear
+
+		    PDF @Yield {
+		        title @Case {
+			    "" @Yield x
+			    else @Yield {
+			        "__link_target_for_export=<<"title">>"
+			        @Graphic x
+			    }
+		        }
+		    }
+
+		    else @Yield x
+	        }
+	    }
+
+	    type @Case {
+
+		Minor @Yield title @AttachPDFLink {
+		    headingfont @Font
+		    headingbreak @Break @Protect {@LongNum headingformat title}
+		    // @PageMark tag
+		}
+
+		{ Major MajorIntro ExtraMajor ExtraMajorIntro } @Yield {
+		    sendheader { title @AttachPDFLink {
+		    //aboveheadinggap
+		    headingfont @Font
+		    headingbreak @Break { @LongNum headingformat title }
+		    // @PageMark tag
+		    } }
+		}
+
+		{ VeryMajor } @Yield { sendheader { title @AttachPDFLink {
+		    //aboveheadinggap
+		    headingfont @Font
+		    headingbreak @Break { bypassnumber headingformat title }
+		    // @PageMark tag
+		    } }
+		}
+	    }
+	}
+
+	def @IfMajor right x
+	{
+	    type @Case {
+		{ MajorIntro Major ExtraMajor ExtraMajorIntro } @Yield x
+		else @Yield @Null
+	    }
+	}
+
+	def @StartIfMajor {
+	    type @Case {
+		{ MajorIntro Major ExtraMajor ExtraMajorIntro VeryMajor } @Yield Start
+		else @Yield NonStart
+	    }
+	}
+
+	initiallanguage @Language {
+		@Heading
+	    //   wantindefinite @Case {
+		    Yes @Yield @Null
+		    No  @Yield ""
+		}
+            //  numbers @Do {
+		  attachnum & @NumberMarker @Tag { tag } @Value { @ShortNum }
+		}
+            # //  @PageMark tag
+	    //  @IfMajor { @FootNoteThrough @Do @BeginFootNoteCounter }
+            //  @Run @StartIfMajor
+            //  @ContentsStuff
+            //  intheorems @BeginAllCounters @ShortNum
+            //  indisplays @BeginDisplayCounter @ShortNum
+            //  infigures @BeginFigureCounter @ShortNum
+            //  intables @BeginTableCounter @ShortNum
+            //  @Body
+	    //innergap  @IfMajor endifmajor innergap
+            //  @Run NonStart
+	}
+    }
+
+@End @DocumentSetup
diff --git a/include/eq b/include/eq
new file mode 100644
index 0000000..b8cd1f0
--- /dev/null
+++ b/include/eq
@@ -0,0 +1,27 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for equation formatting                                   #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  The @SysInclude { eqf } line                                               #
+#                                                                             #
+#  This line causes Lout to read the definitions for equations, and should    #
+#  not be touched.                                                            #
+#                                                                             #
+###############################################################################
+
+@SysInclude { eqf }
+
+
+###############################################################################
+#                                                                             #
+#  This package does not offer default options that can be changed.           #
+#                                                                             #
+###############################################################################
diff --git a/include/eqf b/include/eqf
new file mode 100644
index 0000000..4437edf
--- /dev/null
+++ b/include/eqf
@@ -0,0 +1,1643 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @Eq package for equation formatting (Version 3.0)                     #
+#                                                                             #
+#  Version 1.0 by Jeffrey H. Kingston, December 1990.                         #
+#  Version 2.0 by Jeffrey H. Kingston, 22 December 1992.                      #
+#  Version 3.0 by Jeffrey H. Kingston and Robert Marsa, March 1996.           #
+#                                                                             #
+#  This package makes extensive use of the Adobe Systems Symbol font, and     #
+#  it assumes that the font has not been recoded.  It could be rewritten      #
+#  using the @Char symbol to be made independent of any recoding, but since   #
+#  there seems no reason to ever recode this font, I haven't bothered.        #
+#                                                                             #
+#  See "Eq - a Lout package for typesetting mathematics" for user             #
+#  information.  Acknowledgement:  the @Eq language is based closely on       #
+#  the Eqn language of B. W. Kernighan and L. L. Cherry; the spacing rules    #
+#  are similar to those of the TeX system by D. E. Knuth.                     #
+#                                                                             #
+#  Version 3.0 makes use of the new x and y units of measurement to improve   #
+#  the spacing rules.                                                         #
+#                                                                             #
+###############################################################################
+
+export	"`" "``" "```" bin rel punct non vctr big
+
+	space exclam universal numbersign existential percent
+	ampersand suchthat parenleft parenright asteriskmath
+	plus comma minus period slash zero one two three four
+	five six seven eight nine colon semicolon less equal
+	greater question congruent Alpha Beta Chi Delta Epsilon
+	Phi Gamma Eta Iota thetaone Kappa Lambda Mu Nu Omicron
+	Pi Theta Rho Sigma Tau Upsilon sigmaone Omega Xi Psi Zeta
+	bracketleft therefore bracketright perpendicular underscore
+	radicalex alpha beta chi delta epsilon phi gamma eta iota
+	phione kappa lambda mu nu omicron pi theta rho sigma tau
+	upsilon omegaone omega xi psi zeta braceleft bar braceright
+	similar Upsilonone minute lessequal fraction infinity florin
+	club diamond heart spade arrowboth arrowleft arrowup
+	arrowright arrowdown degree plusminus second greaterequal
+	multiply proportional partialdiff bullet divide notequal
+	equivalence approxequal ellipsis arrowvertex arrowhorizex
+	carriagereturn aleph Ifraktur Rfraktur weierstrass
+	circlemultiply circleplus emptyset intersection union
+	propersuperset reflexsuperset notsubset propersubset
+	reflexsubset element notelement angle gradient registerserif
+	copyrightserif trademarkserif product radical dotmath
+	logicalnot logicaland logicalor arrowdblboth arrowdblleft
+	arrowdblup arrowdblright arrowdbldown lozenge angleleft
+	registersans copyrightsans trademarksans summation parenlefttp
+	parenleftex parenleftbt bracketlefttp bracketleftex
+	bracketleftbt bracelefttp braceleftmid braceleftbt braceex
+	angleright integral integraltp integralex integralbt
+	parenrighttp parenrightex parenrightbt bracketrighttp
+	bracketrightex bracketrightbt bracerighttp bracerightmid
+	bracerightbt
+
+	hbar Re Im partial infty prime nabla surd top bot dbar
+	triangle backslash forall exists neg circle square
+
+	"0" "1" "2" "3" "4" "5" "6" "7" "8" "9"
+
+	sum prod coprod int oint bcap bcup bvee bwedge bodot botimes
+	boplus buplus
+
+	"+" "-" "+-" "-+" setminus cdot times "*" circ div cap cup uplus
+	sqcap sqcup triangleleft triangleright wr bigcirc bigtriangleup
+	bigtriangledown vee wedge oplus ominus otimes oslash odot dagger
+	daggerdbl amalg
+
+	"<" ">" "=" "<=" prec preceq "<<" subset subseteq sqsubseteq
+	in vdash smile frown ">=" succ succeq ">>" supset supseteq
+	sqsupseteq ni dashv mid parallel "==" "~" "-~" asymp "~~"
+	"=~" bowtie propto models doteq perp notsub notin "!=" not
+	"<->" "<--" "-->" up down "<=>" "<==" "==>" dblup dbldown
+	":" "::" ":="
+
+	lpar blpar rpar brpar lbrack blbrack rbrack brbrack lbrace blbrace
+	rbrace brbrace lfloor blfloor rfloor brfloor lceil blceil
+	rceil brceil langle blangle rangle brangle
+
+	";" "," col
+	
+	"!" "?" "%" "(" ")" "[" "]"
+
+	arccos arcsin arctan arg cos cosh cot coth csc deg det dim exp
+	gcd hom inf ker lg lim liminf limsup ln log max min Pr sec sin
+	sinh supr tan tanh mod ldots cdots vdots ddots del grad
+	"..." ",...," "'" "''" "'''" "''''" empty
+	
+	leftarrow longleftarrow dblleftarrow dbllongleftarrow
+	rightarrow longrightarrow dblrightarrow dbllongrightarrow
+	leftrightarrow longleftrightarrow dblleftrightarrow dbllongleftrightarrow
+	mapsto longmapsto hookleftarrow hookrightarrow leadsto
+	leftharpoonup rightharpoonup leftharpoondown rightharpoondown
+	rightleftharpoons
+	uparrow dbluparrow downarrow dbldownarrow updownarrow dblupdownarrow
+	nearrow searrow swarrow nwarrow
+
+	sup sub tsub supp on ton frac half third over from to widefrom wideto
+	dot dotdot hat tilde vec dyad overbar underbar sqrt root
+	nextcol above labove cabove rabove mabove
+	matrix pmatrix bmatrix brmatrix fmatrix cmatrix amatrix
+
+def @Eq                  
+    body @Body
+@Begin
+
+
+    ###################################################################
+    #                                                                 #
+    #  Context-sensitive format changes.                              #
+    #                                                                 #
+    #  Equation formatting (according to Knuth) demands changes in    #
+    #  the appearance of equations depending on context.  These are:  #
+    #                                                                 #
+    #     @Smaller x      Superscripts and subscripts are to be set   #
+    #                     in a smaller font size.  The @Smaller       #
+    #                     symbol implements this by changing the      #
+    #                     f unit.                                     #
+    #                                                                 #
+    #     @HSqueeze x     The horizontal space surrounding binary     #
+    #                     operators and relations is to be reduced    #
+    #                     within superscripts and subscripts, etc.    #
+    #                     The @HSqueeze symbol implements this by     #
+    #                     changing the y unit, which is not used by   #
+    #                     Lout but which is used by symbols @ThinGap, #
+    #                     @MedGap and @ThickGap.                      #
+    #                                                                 #
+    #     @VSqueeze x     The vertical space taken by superscripts    #
+    #                     and subscripts is to be reduced within      #
+    #                     built-up fractions and under root signs.    #
+    #                     The @VSqueeze symbol implements this by     #
+    #                     changing the z unit, which is not used by   #
+    #                     Lout but is used by the @SupGap symbol.     #
+    #                                                                 #
+    #  Knuth also recommends some changes that depend on whether the  #
+    #  equation is displayed or inline; these are not implemented.    #
+    #                                                                 #
+    ###################################################################
+
+    def @SpaceGap { 0.05f  }
+
+    def @Smaller  right x { 0.7f @Font @SpaceGap @Space x }
+
+    def @HSqueeze right x { 0.2f @YUnit x }
+
+    def @VSqueeze right x { 0.7f @ZUnit x }
+
+    def @SkewGap  { 0.05f  }
+    def @SupGap   { 0.43zk }
+    def @ThinGap  { 0.15y  }
+    def @MedGap   { 0.20y  }
+    def @ThickGap { 0.25y  }
+    def @ColGap   { 0.8f   }
+    def @RowGap   { 0.5f   }
+
+    def "`"       { &@ThinGap  }
+    def "``"      { &@MedGap   }
+    def "```"     { &@ThickGap }
+
+    def bin	right x { ``  x ``  }
+    def rel	right x { ``` x ``` }
+    def punct	right x {     x `   }
+    def non	right x { 0c @YUnit x }
+    def big	right x { 1.3f @Font @SpaceGap @Space x }
+
+    def @Base   right x { Base @Font x }
+    def @Sym    right x { {Symbol Base} @Font x }
+
+    def @HLine
+	named line { @BackEnd @Case { PostScript @Yield { "0.05 ft setlinewidth" } PDF @Yield { "__mul(__loutf, 0.05) w" } } }
+    {
+	@BackEnd @Case {
+	  PostScript @Yield {
+	    { "0 0 moveto xsize 0 lineto" line "stroke" } @Graphic {}
+	  }
+	  PDF @Yield {	# note re-arrangement of commands (setlinewidth (='w') not allowed in a path)
+	    { line "0 0 m __xsize 0 l s" } @Graphic {}
+	  }
+	}
+    }
+
+    def @VLine
+    {
+	@BackEnd @Case {
+	  PostScript @Yield {
+	    "0 0 moveto 0 ysize lineto 0.05 ft setlinewidth stroke" @Graphic {}
+	  }
+	  PDF @Yield {
+	    "__mul(__loutf, 0.05) w 0 0 m 0 __ysize l s" @Graphic {}
+	  }
+	}
+    }
+
+    def vctr
+	right x
+    {
+	0.5w @VShift x
+    }
+
+    def @Strut right x
+    {
+	@OneCol { x | @OneRow { 0.5f @High ^/ 0.5f @High } }
+    }
+
+    ###################################################################
+    #                                                                 #
+    #   Full names                                                    #
+    #                                                                 #
+    #   These symbols and their names are taken directly from the     #
+    #   Adobe Systems Inc. Symbol font (see PostScript Language       #
+    #   Reference Manual, pp. 256-257).  The only differences are:    #
+    #                                                                 #
+    #      Adobe:  theta1        Eq:  thetaone                        #
+    #              sigma1             sigmaone                        #
+    #              phi1               phione                          #
+    #              omega1             omegaone                        #
+    #                                                                 #
+    #   These were needed since Lout identifiers do not have digits.  #
+    #                                                                 #
+    ###################################################################
+
+    def space           { @Sym "\040"  }
+    def exclam          { @Sym "\041"  }
+    def universal       { @Sym "\042"  }
+    def numbersign      { @Sym "\043"  }
+    def existential     { @Sym "\044"  }
+    def percent         { @Sym "\045"  }
+    def ampersand       { @Sym "\046"  }
+    def suchthat        { @Sym "\047"  }
+    def parenleft       { @Sym "\050"  }
+    def parenright      { @Sym "\051"  }
+    def asteriskmath    { @Sym "\052"  }
+    def plus            { @Sym "+"     }
+    def comma           { @Sym "\054"  }
+    def minus           { @Sym "-"     }
+    def period          { @Sym "\056"  }
+    def slash           { @Sym "\057"  }
+    def zero            { @Sym "\060"  }
+    def one             { @Sym "\061"  }
+    def two             { @Sym "\062"  }
+    def three           { @Sym "\063"  }
+    def four            { @Sym "\064"  }
+    def five            { @Sym "\065"  }
+    def six             { @Sym "\066"  }
+    def seven           { @Sym "\067"  }
+    def eight           { @Sym "\070"  }
+    def nine            { @Sym "\071"  }
+    def colon           { @Sym "\072"  }
+    def semicolon       { @Sym "\073"  }
+    def less            { @Sym "\074"  }
+    def equal           { @Sym "\075"  }
+    def greater         { @Sym "\076"  }
+    def question        { @Sym "\077"  }
+    def congruent       { @Sym "\100"  }
+    def Alpha           { @Sym "\101"  }
+    def Beta            { @Sym "\102"  }
+    def Chi             { @Sym "\103"  }
+    def Delta           { @Sym "\104"  }
+    def Epsilon         { @Sym "\105"  }
+    def Phi             { @Sym "\106"  }
+    def Gamma           { @Sym "\107"  }
+    def Eta             { @Sym "\110"  }
+    def Iota            { @Sym "\111"  }
+    def thetaone        { @Sym "\112"  }
+    def Kappa           { @Sym "\113"  }
+
+    def Lambda          { @Sym "\114"  }
+    def Mu              { @Sym "\115"  }
+    def Nu              { @Sym "\116"  }
+    def Omicron         { @Sym "\117"  }
+    def Pi              { @Sym "\120"  }
+    def Theta           { @Sym "\121"  }
+    def Rho             { @Sym "\122"  }
+    def Sigma           { @Sym "\123"  }
+    def Tau             { @Sym "\124"  }
+    def Upsilon         { @Sym "\125"  }
+    def sigmaone        { @Sym "\126"  }
+    def Omega           { @Sym "\127"  }
+    def Xi              { @Sym "\130"  }
+    def Psi             { @Sym "\131"  }
+    def Zeta            { @Sym "\132"  }
+    def bracketleft     { @Sym "\133"  }
+    def therefore       { @Sym "\134"  }
+    def bracketright    { @Sym "\135"  }
+    def perpendicular   { @Sym "\136"  }
+    def underscore      { @Sym "\137"  }
+    def radicalex       { @Sym "\140"  }
+    def alpha           { @Sym "\141"  }
+    def beta            { @Sym "\142"  }
+    def chi             { @Sym "\143"  }
+    def delta           { @Sym "\144"  }
+    def epsilon         { @Sym "\145"  }
+    def phi             { @Sym "\146"  }
+    def gamma           { @Sym "\147"  }
+    def eta             { @Sym "\150"  }
+    def iota            { @Sym "\151"  }
+    def phione          { @Sym "\152"  }
+    def kappa           { @Sym "\153"  }
+    def lambda          { @Sym "\154"  }
+    def mu              { @Sym "\155"  }
+    def nu              { @Sym "\156"  }
+
+    def omicron         { @Sym "\157"  }
+    def pi              { @Sym "\160"  }
+    def theta           { @Sym "\161"  }
+    def rho             { @Sym "\162"  }
+    def sigma           { @Sym "\163"  }
+    def tau             { @Sym "\164"  }
+    def upsilon         { @Sym "\165"  }
+    def omegaone        { @Sym "\166"  }
+    def omega           { @Sym "\167"  }
+    def xi              { @Sym "\170"  }
+    def psi             { @Sym "\171"  }
+    def zeta            { @Sym "\172"  }
+    def braceleft       { @Sym "\173"  }
+    def bar             { @Sym "\174"  }
+    def braceright      { @Sym "\175"  }
+    def similar         { @Sym "\176"  }
+    def Upsilonone      { @Sym "\241"  }
+    def minute          { @Sym "\242"  }
+    def lessequal       { @Sym "\243"  }
+    def fraction        { @Sym "\244"  }
+    def infinity        { "1.2f" @Font @Sym "\245"  }
+    def florin          { @Sym "\246"  }
+    def club            { @Sym "\247"  }
+    def diamond         { @Sym "\250"  }
+    def heart           { @Sym "\251"  }
+    def spade           { @Sym "\252"  }
+    def arrowboth       { @Sym "\253"  }
+    def arrowleft       { @Sym "\254"  }
+    def arrowup         { @Sym "\255"  }
+    def arrowright      { @Sym "\256"  }
+    def arrowdown       { @Sym "\257"  }
+    def degree          { @Sym "\260"  }
+    def plusminus       { @Sym "\261"  }
+    def second          { @Sym "\262"  }
+    def greaterequal    { @Sym "\263"  }
+
+    def multiply        { @Sym "\264"  }
+    def proportional    { @Sym "\265"  }
+    def partialdiff     { @Sym "\266"  }
+    def bullet          { @Sym "\267"  }
+    def divide          { @Sym "\270"  }
+    def notequal        { @Sym "\271"  }
+    def equivalence     { @Sym "\272"  }
+    def approxequal     { @Sym "\273"  }
+    def ellipsis        { @Sym "\274"  }
+    def arrowvertex     { @Sym "\275"  }
+    def arrowhorizex    { @Sym "\276"  }
+    def carriagereturn  { @Sym "\277"  }
+    def aleph           { @Sym "\300"  }
+    def Ifraktur        { @Sym "\301"  }
+    def Rfraktur        { @Sym "\302"  }
+    def weierstrass     { @Sym "\303"  }
+    def circlemultiply  { @Sym "\304"  }
+    def circleplus      { @Sym "\305"  }
+    def emptyset        { @Sym "\306"  }
+    def intersection    { @Sym "\307"  }
+    def union           { @Sym "\310"  }
+    def propersuperset  { @Sym "\311"  }
+    def reflexsuperset  { @Sym "\312"  }
+    def notsubset       { @Sym "\313"  }
+    def propersubset    { @Sym "\314"  }
+    def reflexsubset    { @Sym "\315"  }
+    def element         { @Sym "\316"  }
+    def notelement      { @Sym "\317"  }
+    def angle           { @Sym "\320"  }
+    def gradient        { @Sym "\321"  }
+    def registerserif   { @Sym "\322"  }
+    def copyrightserif  { @Sym "\323"  }
+    def trademarkserif  { @Sym "\324"  }
+    def product         { @Sym "\325"  }
+    def radical         { @Sym "\326"  }
+    def dotmath         { @Sym "\327"  }
+
+    def @PureDot   # dot with no extra space
+    {
+	@HContract { &0io 0.4w @HShift dotmath }
+    }
+
+    def logicalnot      { @Sym "\330"  }
+    def logicaland      { @Sym "\331"  }
+    def logicalor       { @Sym "\332"  }
+    def arrowdblboth    { @Sym "\333"  }
+    def arrowdblleft    { @Sym "\334"  }
+    def arrowdblup      { @Sym "\335"  }
+    def arrowdblright   { @Sym "\336"  }
+    def arrowdbldown    { @Sym "\337"  }
+    def lozenge         { @Sym "\340"  }
+    def angleleft       { @Sym "\341"  }
+    def registersans    { @Sym "\342"  }
+    def copyrightsans   { @Sym "\343"  }
+    def trademarksans   { @Sym "\344"  }
+    def summation       { @Sym "\345"  }
+    def parenlefttp     { @Sym "\346"  }
+    def parenleftex     { @Sym "\347"  }
+    def parenleftbt     { @Sym "\350"  }
+    def bracketlefttp   { @Sym "\351"  }
+    def bracketleftex   { @Sym "\352"  }
+    def bracketleftbt   { @Sym "\353"  }
+    def bracelefttp     { @Sym "\354"  }
+    def braceleftmid    { @Sym "\355"  }
+    def braceleftbt     { @Sym "\356"  }
+    def braceex         { @Sym "\357"  }
+    def angleright      { @Sym "\361"  }
+    def integral        { @Sym "\362"  }
+    def integraltp      { @Sym "\363"  }
+    def integralex      { @Sym "\364"  }
+    def integralbt      { @Sym "\365"  }
+    def parenrighttp    { @Sym "\366"  }
+    def parenrightex    { @Sym "\367"  }
+    def parenrightbt    { @Sym "\370"  }
+    def bracketrighttp  { @Sym "\371"  }
+    def bracketrightex  { @Sym "\372"  }
+    def bracketrightbt  { @Sym "\373"  }
+    def bracerighttp    { @Sym "\374"  }
+    def bracerightmid   { @Sym "\375"  }
+    def bracerightbt    { @Sym "\376"  }
+
+
+    ###################################################################
+    #                                                                 #
+    #   Short names                                                   #
+    #                                                                 #
+    #   These symbols, their names, and their spacing, are based on   #
+    #   the list in Appendix F of Donald E. Knuth's The TeXBook.      #
+    #                                                                 #
+    #   Group 1 (lowercase Greek letters):  see full names above      #
+    #   Group 2 (uppercase Greek letters):  see full names above      #
+    #   Group 3 (calligraphic capitals):    not provided by Eq        #
+    #                                                                 #
+    ###################################################################
+
+    ###################################################################
+    #                                                                 #
+    #   Group 4 (miscellaneous Ord symbols)                           #
+    #                                                                 #
+    #   Not all of Knuth's symbols are available.  The four suits     #
+    #   (heartsuit, etc.), have definitions above.                    #
+    #                                                                 #
+    ###################################################################
+
+    def hbar         { @OneCol { &0.1f @Base "-" ^/0.25fo h }	}
+    def Re           { Rfraktur					}
+    def Im           { Ifraktur					}
+    def partial      { partialdiff				}
+    def infty        { infinity					}
+    def prime        { minute        				}
+   #def emptyset     { defined above				}
+    def nabla        { gradient					}
+    def surd         { radical					}
+    def top          { 180d @Rotate perpendicular		}
+    def bot          { perpendicular				}
+    def dbar         { @Base "||"                         	}
+   #def angle        { defined above				}
+    def backslash    { "\\"					}
+    def forall       { universal					}
+    def exists       { existential				}
+    def neg          { logicalnot				}
+
+    def circle       { @HContract @VContract
+				@BackEnd @Case {
+				  PostScript @Yield {
+				      { "xsize ysize 2 div moveto"
+					"xsize 2 div ysize 2 div xsize 2 div 0 360 arc"
+					"0.04 ft setlinewidth stroke"
+				      }
+				      @Graphic { 0.7f @Wide 0.3f @High ^/ 0.3f @High }
+				  }
+				  PDF @Yield {
+#
+# VT: draws a counterclockwise 360 degree arc from 0 to +360 degree positions
+#     (straight right to straight right) with centre = (xsize/2, ysize/2)
+#     and radius = xsize/2
+#
+# implemented as two counterclockwise 180 degree arcs:
+#
+				      {
+	"__mul(0.04, __loutf) w"
+#
+#   start at (xsize, ysize/2)
+#   the control points are:
+#     pt1 = (xsize, ysize/2 + (4/3 * xsize/2)) and pt2 = (0, ysize/2 + (4/3 * xsize/2))
+#   end at (0, ysize/2)
+#
+	"__xsize __div(__ysize, 2) m"
+	"__xsize __add(__div(__ysize, 2), __div(__mul(2, __xsize), 3))"	# pt1
+	"0 __add(__div(__ysize, 2), __div(__mul(2, __xsize), 3))"		# pt2
+	"0 __div(__ysize, 2) c"								# pt3
+#
+#   start at (0, ysize/2)
+#   the control points are:
+#     pt1 = (0, ysize/2 - (4/3 * xsize/2)) and pt2 = (xsize, ysize/2 - (4/3 * xsize/2))
+#   end at (xsize, ysize/2)
+#
+	"0 __sub(__div(__ysize, 2), __div(__mul(2, __xsize), 3))"		# pt1
+	"__xsize __sub(__div(__ysize, 2), __div(__mul(2, __xsize), 3))"	# pt2
+	"__xsize __div(__ysize, 2) c S"						# pt3
+				      }
+				      @Graphic { 0.7f @Wide 0.3f @High ^/ 0.3f @High }
+				  }
+				}
+		     }
+
+    def square       { @HContract @VContract
+				@BackEnd @Case {
+				  PostScript @Yield {
+				      { "0 0 moveto xsize 0 lineto xsize ysize lineto"
+					"0 ysize lineto closepath"
+					"0.04 ft setlinewidth stroke"
+				      }
+				      @Graphic { 0.6f @Wide 0.3f @High ^/ 0.3f @High }
+				  }
+				  PDF @Yield {
+				      { "__mul(__loutf, 0.04) w"
+				        "0 0 m __xsize 0 l __xsize __ysize l"
+				        "0 __ysize l s"
+				      }
+				      @Graphic { 0.6f @Wide 0.3f @High ^/ 0.3f @High }
+				  }
+				}
+		     }
+
+    def triangle     { @HContract @VContract
+				@BackEnd @Case {
+				  PostScript @Yield {
+				      { "0 0 moveto xsize 0 lineto"
+				        "xsize 2 div ysize lineto closepath"
+					"0.04 ft setlinewidth stroke"
+				      }
+				      @Graphic
+				      { 0.3f @Wide 0.3f @High ^| ^/
+				        0.3f @Wide 0.3f @High
+				      }
+				  }
+				  PDF @Yield {
+				      { "__mul(__loutf, 0.04) w"
+				        "0 0 m __xsize 0 l"
+				        "__div(__xsize, 2) __ysize l s"
+				      }
+				      @Graphic
+				      { 0.3f @Wide 0.3f @High ^| ^/
+				        0.3f @Wide 0.3f @High
+				      }
+				  }
+				}
+		     }
+
+    ###################################################################
+    #                                                                 #
+    #   Group 5 (digits)                                              #
+    #                                                                 #
+    ###################################################################
+
+    def "0" { zero            }
+    def "1" { one             }
+    def "2" { two             }
+    def "3" { three           }
+    def "4" { four            }
+    def "5" { five            }
+    def "6" { six             }
+    def "7" { seven           }
+    def "8" { eight           }
+    def "9" { nine            }
+
+
+    ###################################################################
+    #                                                                 #
+    #   Group 6 ("Large" operators)                                   #
+    #                                                                 #
+    #   Knuth's large operators automatically change size depending   #
+    #   on whether the equation is display or inline.  Eq does not    #
+    #   do this; instead, the `big' operator must be used.            #
+    #                                                                 #
+    ###################################################################
+
+    def sum	{ summation					}
+    def prod	{ product					}
+    def coprod	{ 180d @Rotate vctr product			}
+    def int	{ 1.3f @Font vctr integral			}
+    def oint	{ @OneCol { vctr degree |0.015fo int }		}
+    def bcap	{ 1.3f @Font intersection			}
+    def bcup	{ 1.3f @Font union				}
+    def bvee	{ 1.3f @Font logicalor				}
+    def bwedge	{ 1.3f @Font logicaland				}
+    def bodot	{ & 1.3f @Font @HContract { circle /0io &0.5rt @PureDot } }
+    def botimes	{ 1.3f @Font circlemultiply			}
+    def boplus	{ 1.3f @Font circleplus				}
+    def buplus	{ & 1.3f @Font @HContract { &0.5rt 0.7f @Font plus ^/0.2fo union } }
+
+    ###################################################################
+    #                                                                 #
+    #   Group 7 (binary operations)                                   #
+    #                                                                 #
+    #   All of Knuth's symbols are available except \star, \diamond   #
+    #   and \bullet; a few have been given more mnemonic names.       #
+    #                                                                 #
+    ###################################################################
+
+    def "+"		{ bin plus				}
+    def "-"		{ bin minus				}
+    def "+-"		{ bin plusminus				}
+    def "-+"		{ bin 180d @Rotate plusminus		}
+    def setminus		{ bin backslash				}
+    def cdot		{ bin dotmath				}
+    def times		{ bin multiply				}
+    def "*"		{ bin asteriskmath			}
+   #def diamond		{ name used above			}
+    def circ		{ bin circle				}
+   #def bullet		{ name used above			}
+    def div		{ bin divide				}
+    def cap		{ bin intersection			}
+    def cup		{ bin union				}
+    def uplus		{ bin @OneRow @HContract { &0.5rt 0.7f @Font plus ^/0.2fo union}}
+    def sqcap		{ bin
+			  { @HContract @VContract
+				@BackEnd @Case {
+				  PostScript @Yield {
+				    {	"0 0 moveto 0 ysize lineto xsize ysize lineto"
+					"xsize 0 lineto"
+					"0.04 ft setlinewidth stroke"
+				    }
+				    @Graphic
+				    {	0.3f @Wide 0.3f @High ^| ^/
+					0.3f @Wide 0.3f @High
+				    }
+				  }
+				  PDF @Yield {
+				    {	"__mul(__loutf, 0.04) w"
+					"0 0 m 0 __ysize l __xsize __ysize l"
+					"__xsize 0 l s"
+				    }
+				    @Graphic
+				    {	0.3f @Wide 0.3f @High ^| ^/
+					0.3f @Wide 0.3f @High
+				    }
+				  }
+				}
+			  }
+			}
+    def sqcup		{ 180d @Rotate sqcap			}
+    def triangleleft	{ bin 90d @Rotate 0.8f @Font triangle	}
+    def triangleright	{ bin "-90d" @Rotate 0.8f @Font triangle}
+    def wr		{ bin vctr {90d @Rotate similar}	}
+    def bigcirc		{ bin 1.2f @Font circle			}
+    def bigtriangleup	{ bin 1.2f @Font triangle		}
+    def bigtriangledown	{ bin 180d @Rotate 1.2f @Font triangle	}
+    def vee		{ bin logicalor				}
+    def wedge		{ bin logicaland			}
+    def oplus		{ bin circleplus			}
+    def ominus		{ bin @OneRow @HContract { circle /0io &0.5rt minus}}
+    def otimes		{ bin circlemultiply			}
+    def oslash		{`vctr 60d @Rotate @HContract {circle /0io &0.5rt minus`}}
+    def odot		{ bin @OneRow @HContract {circle /0io &0.5rt @PureDot }}
+    def dagger		{ bin @Base @Char "dagger"		}
+    def daggerdbl	{ bin @Base @Char "daggerdbl"		}
+    def amalg		{ bin 180d @Rotate vctr product		}
+
+    ###################################################################
+    #                                                                 #
+    #   Group 8 (relations)                                           #
+    #                                                                 #
+    #   All Knuth's operators are available, but many have been       #
+    #   given different, more mnemonic names.  Also included is       #
+    #   a not operator for negating the relations.                    #
+    #                                                                 #
+    ###################################################################
+
+    def "<"		{ rel less				}
+    def ">"		{ rel greater				}
+    def "="		{ rel equal				}
+    def "<="		{ rel lessequal				}
+    def prec		{ rel { 0.45f @Font "-90d" @Rotate
+				{ parenrighttp ^| parenlefttp }
+			      }
+			}
+    def preceq		{ rel { @OneRow non prec /0.1f minus }	}
+    def "<<"		{ rel {less less}			}
+    def subset		{ rel propersubset			}
+    def subseteq	{ rel reflexsubset			}
+    def sqsubseteq	{ rel @HContract @VContract
+					@BackEnd @Case {
+					  PostScript @Yield {
+						{ { "xsize 0 moveto"
+						  "0 0 lineto"
+						  "0 ysize lineto"
+						  "xsize ysize lineto"
+						  "0.04 ft setlinewidth stroke"
+						  }
+						  @Graphic
+						  { 0.5f @Wide 0.25f @High ^/
+						    0.25f @High
+						  }
+						  /0.1f minus
+						}
+					  }
+					  PDF @Yield {
+						{ { "__mul(__loutf, 0.04) w"
+						    "__xsize 0 m"
+						    "0 0 l"
+						    "0 __ysize l"
+						    "__xsize __ysize l s"
+						  }
+						  @Graphic
+						  { 0.5f @Wide 0.25f @High ^/
+						    0.25f @High
+						  }
+						  /0.1f minus
+						}
+					  }
+					}
+			}
+
+    def in		{ rel element				}
+    def vdash		{ rel vctr{"-90d" @Rotate perpendicular}}
+    def smile		{ rel vctr 90d @Rotate parenleft	}
+    def frown		{ rel vctr 90d @Rotate parenright	}
+
+    def ">="		{ rel greaterequal			}
+    def succ		{ rel { 0.45f @Font 90d @Rotate
+			        { parenrighttp ^| parenlefttp }
+			      }
+			}
+    def succeq		{ rel { @OneRow non succ /0.1f minus }	}
+    def ">>"		{ rel {greater greater}			}
+    def supset		{ rel propersuperset			}
+    def supseteq	{ rel reflexsuperset			}
+    def sqsupseteq	{ rel @HContract @VContract
+					@BackEnd @Case {
+					  PostScript @Yield {
+					    {	{ "0 0 moveto xsize 0 lineto"
+						  "xsize ysize lineto"
+						  "0 ysize lineto"
+						  "0.04 ft setlinewidth stroke"
+						}
+						@Graphic
+						{ 0.5f @Wide 0.25f @High ^/
+						  0.25f @High
+						}
+					      /0.1f minus
+					    }
+					  }
+					  PDF @Yield {
+					    {	{ "__mul(__loutf, 0.04) w"
+					      "0 0 m __xsize 0 l"
+						  "__xsize __ysize l"
+						  "0 __ysize l s"
+						}
+						@Graphic
+						{ 0.5f @Wide 0.25f @High ^/
+						  0.25f @High
+						}
+					      /0.1f minus
+					    }
+					  }
+					}
+			}
+    def ni		{ rel 180d @Rotate element		}
+    def dashv		{ rel vctr {90d @Rotate perpendicular}	}
+    def mid		{ rel @Base "|"				}
+    def parallel	{ rel @Base "||"			}
+
+    def "=="		{ rel equivalence			}
+    def "~"		{ rel similar				}
+    def "-~"		{ rel @OneRow{similar^/0.07f/0.07f minus}}
+    def asymp		{ rel 0.7f @Font @OneRow
+			      { 90d @Rotate parenleft ^/0.008f
+			      /0.008f 90d @Rotate parenright }
+			}
+    def "~~"		{ rel approxequal			}
+    def "=~"		{ rel congruent				}
+    def bowtie		{ rel{non triangleright non triangleleft}}
+    def propto		{ rel proportional			}
+    def models		{ rel{@Base vctr "|" &0.05fo vctr equal}}
+    def doteq		{ rel @OneRow @HContract {&0.5rt dotmath^/0.15f equal}}
+    def perp		{ rel perpendicular			}
+
+    def notsub		{ rel notsubset				}
+    def notin		{ rel notelement			}
+    def "!="		{ rel notequal				}
+
+    def "<->"		{ rel arrowboth				}
+    def "<--"		{ rel arrowleft				}
+    def "-->"		{ rel arrowright			}
+    def up		{ rel arrowup				}
+    def down		{ rel arrowdown				}
+    def "<=>"		{ rel arrowdblboth			}
+    def "<=="		{ rel arrowdblleft			}
+    def "==>"		{ rel arrowdblright			}
+    def dblup		{ rel arrowdblup			}
+    def dbldown		{ rel arrowdbldown			}
+
+    def ":"		{ rel colon				}
+    def "::"		{ rel @OneCol {colon ` colon}		}
+    def ":="		{ rel { colon{ //0.05fo equal} }	}
+
+    def not right x	{ @HContract {@OneCol x /0co &0.5rt slash}}
+
+
+    ###################################################################
+    #                                                                 #
+    #   Groups 11 and 12 - openings and closings.                     #
+    #                                                                 #
+    ###################################################################
+
+    def lpar	{ parenleft				}
+    def rpar	{ parenright				}
+    def lbrack	{ bracketleft				}
+    def rbrack	{ bracketright				}
+    def lbrace	{ braceleft				}
+    def rbrace	{ braceright				}
+    def lfloor	{ ` "-0.15f" @VShift bracketleftbt	}
+    def rfloor	{   "-0.15f" @VShift bracketrightbt `	}
+    def lceil	{ ` "-0.1f"  @VShift bracketlefttp	}
+    def rceil	{   "-0.1f"  @VShift bracketrighttp `	}
+    def langle	{ angleleft				}
+    def rangle	{ angleright				}
+
+    def blpar	{ @OneRow {parenlefttp    ^/ parenleftex    / parenleftbt   } }
+    def brpar	{ @OneRow {parenrighttp   ^/ parenrightex   / parenrightbt  } }
+    def blbrack	{ @OneRow {bracketlefttp  ^/ bracketleftex  / bracketleftbt } }
+    def brbrack	{ @OneRow {bracketrighttp ^/ bracketrightex / bracketrightbt} }
+    def blbrace	{ @OneRow {bracelefttp    ^/ braceleftmid   / braceleftbt   } }
+    def brbrace	{ @OneRow {bracerighttp   ^/ bracerightmid  / bracerightbt  } }
+    def blfloor	{ @OneRow {bracketleftex  ^/ bracketleftex  / bracketleftbt } }
+    def brfloor	{ @OneRow {bracketrightex ^/ bracketrightex / bracketrightbt} }
+    def blceil	{ @OneRow {bracketlefttp  ^/ bracketleftex  / bracketleftex } }
+    def brceil	{ @OneRow {bracketrighttp ^/ bracketrightex / bracketrightex} }
+    def blangle	{ @HContract @VContract
+				@BackEnd @Case {
+				  PostScript @Yield {
+				    { "xsize 0 moveto"
+				      "0 ysize 2 div lineto"
+				      "xsize ysize lineto"
+				      "0.04 ft setlinewidth stroke"
+			          }
+			          @Graphic { 0.5f @Wide 2f @High ^/ 2f @High }
+				  }
+				  PDF @Yield {
+				    { "__mul(__loutf, 0.04) w"
+				      "__xsize 0 m"
+				      "0 __div(__ysize, 2) l"
+				      "__xsize __ysize l S"
+			          }
+			          @Graphic { 0.5f @Wide 2f @High ^/ 2f @High }
+				  }
+				}
+		}
+    def brangle	{ @HContract @VContract
+				@BackEnd @Case {
+				  PostScript @Yield {
+				    { "0 0 moveto"
+				      "xsize ysize 2 div lineto"
+				      "0 ysize lineto"
+				      "0.04 ft setlinewidth stroke"
+			          }
+			          @Graphic { 0.5f @Wide 2f @High ^/ 2f @High }
+				  }
+				  PDF @Yield {
+				    { "__mul(__loutf, 0.04) w"
+				      "0 0 m"
+				      "__xsize __div(__ysize, 2) l"
+				      "0 __ysize l S"
+			          }
+			          @Graphic { 0.5f @Wide 2f @High ^/ 2f @High }
+				  }
+				}
+		}
+
+
+    ###################################################################
+    #                                                                 #
+    #   Group 13 - punctuation.                                       #
+    #                                                                 #
+    ###################################################################
+
+    def ";"     { punct semicolon     }
+    def ","     { punct comma         }
+    def col     { punct colon         }
+
+
+    ###################################################################
+    #                                                                 #
+    #   Additional short symbols (Knuth p. 132)                       #
+    #                                                                 #
+    ###################################################################
+
+    def "!" { exclam          }
+    def "?" { question        }
+    def "%" { percent         }
+    def "(" { parenleft       }
+    def ")" { parenright      }
+    def "[" { bracketleft     }
+    def "]" { bracketright    }
+
+
+    ###################################################################
+    #                                                                 #
+    #   Common mathematical functions (from Knuth p. 162).            #
+    #   mod is included, since @Rel mod is easily typed if needed.    #
+    #                                                                 #
+    ###################################################################
+
+    def arccos	{ @Base "arccos"	}
+    def arcsin	{ @Base "arcsin"	}
+    def arctan	{ @Base "arctan"	}
+    def arg	{ @Base "arg"		}
+    def cos	{ @Base "cos"		}
+    def cosh	{ @Base "cosh"		}
+    def cot	{ @Base "cot"		}
+    def coth	{ @Base "coth"		}
+    def csc	{ @Base "csc"		}
+    def deg	{ @Base "deg"		}
+    def det	{ @Base "det"		}
+    def dim	{ @Base "dim"		}
+    def exp	{ @Base "exp"		}
+    def gcd	{ @Base "gcd"		}
+    def hom	{ @Base "hom"		}
+    def inf	{ @Base "inf"		}
+    def ker	{ @Base "ker"		}
+    def lg	{ @Base "lg"		}
+    def lim	{ @Base "lim"		}
+    def liminf	{ @OneCol { @Base "lim" ` @Base "inf" }	}
+    def limsup	{ @OneCol { @Base "lim" ` @Base "sup" }	}
+    def ln	{ @Base "ln"		}
+    def log	{ @Base "log"		}
+    def max	{ @Base "max"		}
+    def min	{ @Base "min"		}
+    def Pr	{ @Base "Pr"		}
+    def sec	{ @Base "sec"		}
+    def sin	{ @Base "sin"		}
+    def sinh	{ @Base "sinh"		}
+    def supr	{ @Base "sup"		}
+    def tan	{ @Base "tan"		}
+    def tanh	{ @Base "tanh"		}
+    def mod	{ @Base "mod"		}
+
+
+    ###################################################################
+    #                                                                 #
+    #  Arrow symbols.                                                 #
+    #                                                                 #
+    ###################################################################
+
+    def leftarrow		{ arrowleft }
+    def longleftarrow		{ { 1.6 1 } @Scale arrowleft }
+    def dblleftarrow		{ arrowdblleft }
+    def dbllongleftarrow	{ { 1.6 1 } @Scale arrowdblleft }
+    def rightarrow		{ arrowright }
+    def longrightarrow		{ { 1.6 1 } @Scale arrowright }
+    def dblrightarrow		{ arrowdblright }
+    def dbllongrightarrow	{ { 1.6 1 } @Scale arrowdblright }
+    def leftrightarrow		{ arrowboth }
+    def longleftrightarrow	{ { 1.6 1 } @Scale arrowboth }
+    def dblleftrightarrow	{ arrowdblboth }
+    def dbllongleftrightarrow	{ { 1.6 1 } @Scale arrowdblboth }
+
+    def mapsto
+    {
+	@HContract @VContract {
+	  @BackEnd @Case {
+	    PostScript @Yield {
+	      "0 ymark 0.16 ft sub moveto 0 ymark 0.16 ft add lineto stroke"
+	      @Graphic arrowright
+	    }
+	    PDF @Yield {
+		"0 __sub(__ymark, __mul(__loutf, 0.16)) m 0 __add(__ymark, __mul(__loutf, 0.16)) l S"
+		@Graphic arrowright
+	    }
+	  }
+	}
+    }
+
+    def longmapsto
+    {
+	@HContract @VContract {
+	  @BackEnd @Case {
+	    PostScript @Yield {
+		"0 ymark 0.16 ft sub moveto 0 ymark 0.16 ft add lineto stroke"
+		@Graphic { { 1.6 1 } @Scale arrowright }
+	    }
+	    PDF @Yield {
+		"0 __sub(__ymark, __mul(__loutf, 0.16)) m 0 __add(__ymark, __mul(__loutf, 0.16)) l S"
+		@Graphic { { 1.6 1 } @Scale arrowright }
+	    }
+	  }
+	}
+    }
+
+    def hookleftarrow
+    {
+	@HContract @VContract {
+	  @BackEnd @Case {
+
+	    PostScript @Yield {
+		"xsize ymark moveto xsize ymark 0.1 ft add 0.1 ft -90 90 arc stroke"
+		@Graphic leftarrow
+	    }
+
+	    PDF @Yield {
+#
+# VT: draws a counterclockwise 180 degree arc from -90 to +90 degree positions
+#     (straight down to straight up) with centre = (xsize, ymark + 0.1 ft)
+#     and radius = 0.1 ft
+#
+# the control points therefore are:
+#   pt1 = (xsize + (4/3 * 0.1 ft), ymark) and pt2 = (xsize + (4/3 * 0.1 ft), ymark + 0.2 ft)
+#
+		{
+		  "__xsize __ymark m"											# pt0
+		  "__add(__xsize, __div(__mul(0.4, __loutf), 3)) __ymark"					# pt1
+		  "__add(__xsize, __div(__mul(0.4, __loutf), 3)) __add(__ymark, __mul(0.2, __loutf))"	# pt2
+		  "__xsize __add(__ymark, __mul(0.2, __loutf)) c S"						# pt3
+		}
+		@Graphic leftarrow
+	    }
+
+	  }
+	}
+    }
+
+    def hookrightarrow
+    {
+	@HContract @VContract {
+	  @BackEnd @Case {
+
+	    PostScript @Yield {
+		"0 ymark moveto 0 0.1 ft ymark add 0.1 ft -90 90 arcn stroke"
+		@Graphic rightarrow
+	    }
+
+	    PDF @Yield {
+#
+# VT: draws a clockwise 180 degree arc from -90 to +90 degree positions
+#     (straight down to straight up) with centre = (0, ymark + 0.1 ft)
+#     and radius = 0.1 ft
+#
+# the control points therefore are:
+#   pt1 = (-4/3 * 0.1 ft, ymark) and pt2 = (-4/3 * 0.1 ft, ymark + 0.2 ft)
+#
+		{
+		  "0 __ymark m"										# pt0
+		  "__div(__mul(-0.4, __loutf), 3) __ymark"					# pt1
+		  "__div(__mul(-0.4, __loutf), 3) __add(__ymark, __mul(0.2, __loutf))"	# pt2
+		  "0 __add(__ymark, __mul(0.2, __loutf)) c S"					# pt3
+		}
+		@Graphic rightarrow
+	    }
+
+	  }
+	}
+    }
+
+    def @ClipToSize right x
+    {
+	@HContract @VContract
+	  @BackEnd @Case {
+	    PostScript @Yield {
+		{
+		"grestore newpath 0 0 moveto xsize 0 lineto xsize ysize lineto"
+		"0 ysize lineto closepath clip gsave"
+		} @Graphic x
+	    }
+	    PDF @Yield {
+		"Q n 0 0 __xsize __ysize re W n q" @Graphic x
+	    }
+	  }
+    }
+
+    def @ClipAboveMark
+	left amount
+	right x
+    {
+	@ClipToSize { ^//{{amount}o} x }
+    }
+
+    def @ClipBelowMark
+	left amount
+	right x
+    {
+	@ClipToSize { x //{{amount}o} }
+    }
+
+    def leftharpoonup
+    {
+	0.04f @ClipBelowMark leftarrow
+    }
+
+    def rightharpoonup
+    {
+	0.04f @ClipBelowMark rightarrow
+    }
+
+    def leftharpoondown
+    {
+	0.02f @ClipAboveMark leftarrow
+    }
+
+    def rightharpoondown
+    {
+	0.02f @ClipAboveMark rightarrow
+    }
+
+    def rightleftharpoons
+    {
+	@HContract @VContract {
+		rightharpoonup
+		^//0.1fo
+		 //0.1fo
+		leftharpoondown
+	}
+    }
+
+    def leadsto		{ @HContract { similar &0.4fo arrowright } }
+
+    def uparrow		{ arrowup }
+    def dbluparrow	{ arrowdblup }
+    def downarrow	{ arrowdown }
+    def dbldownarrow	{ arrowdbldown }
+    def updownarrow	{ @HContract { arrowup &0io arrowdown } }
+    def dblupdownarrow	{ @VContract { arrowdblup ^//0.2fo arrowdbldown } }
+    def nearrow		{ 0.5w @VShift 0.5w @HShift  45d @Rotate arrowright }
+    def searrow		{ 0.5w @VShift 0.5w @HShift 315d @Rotate arrowright }
+    def swarrow		{ 0.5w @VShift 0.5w @HShift 225d @Rotate arrowright }
+    def nwarrow		{ 0.5w @VShift 0.5w @HShift 135d @Rotate arrowright }
+
+
+    ###################################################################
+    #                                                                 #
+    #   Other symbols taken from TeX.                                 #
+    #                                                                 #
+    ###################################################################
+
+    def ldots { .       &0.3f .       &0.3f .			}
+    def cdots { dotmath &0.3f dotmath &0.3f dotmath		}
+    def vdots { @OneRow { dotmath ^/0.3f dotmath /0.3f dotmath } }
+    def ddots { @OneCol @OneRow
+	       {        dotmath
+	         ^/0.3f |0.3f dotmath
+                  /0.3f |     |0.3f dotmath
+	       }
+	      }
+
+
+    ###################################################################
+    #                                                                 #
+    #   Symbols taken from eqn (Kernighan and Cherry 1975).           #
+    #                                                                 #
+    ###################################################################
+
+    def del	{ gradient			}
+    def grad	{ gradient			}
+    def "..."	{ ellipsis			}
+    def ",...,"	{ , ellipsis ``` ,		}
+    def "'"	{ minute			}
+    def "''"	{ minute minute			}
+    def "'''"	{ minute minute minute		}
+    def "''''"	{ minute minute minute minute	}
+    def empty	{ emptyset			}
+
+
+
+    ###################################################################
+    #                                                                 #
+    #   Miscellaneous                                                 #
+    #                                                                 #
+    ###################################################################
+
+    ###################################################################
+    #                                                                 #
+    #   Symbols with parameters.                                      #
+    #                                                                 #
+    #   These symbols are essentially those of eqn, with some         #
+    #   changes and additions.                                        #
+    #                                                                 #
+    ###################################################################
+
+    def sup
+	precedence 60
+	associativity left
+	left x
+	named gap { @SupGap }
+	right y
+    {
+	@HContract @VContract
+	{          | 0.45w @VShift @Smaller @HSqueeze @VSqueeze y
+	  ^/gap  x
+	}
+    }
+
+    def sub
+	precedence 60
+	associativity left
+	left x
+	named gap { @SupGap }
+	right y
+    {
+	@HContract @VContract
+	{
+	       # x
+	       "." @KernShrink x
+	  /gap    |  @Smaller @HSqueeze @VSqueeze y
+	}
+    }
+
+    def tsub
+	precedence 60
+	associativity left
+	left x
+	named gap { @SupGap }
+	right y
+    {
+	@HContract @VContract
+	{
+	       x
+	  /gap    |  &0io 0.2f @HShift @Smaller @HSqueeze @VSqueeze y
+	}
+    }
+
+    def supp
+	precedence 60
+	associativity left
+	left x
+	named gap { @SupGap }
+	right y
+    {
+	@HContract @VContract
+	{
+	    { ^/gap x /gap } |  y
+	}
+    }
+
+    def on
+	precedence 61
+	associativity left
+	left x
+	named gap { @SupGap }
+	right y
+    {
+	@Smaller @HSqueeze @VSqueeze x ^/  /
+	@Smaller @HSqueeze @VSqueeze y 
+    }
+
+    def ton
+	precedence 61
+	associativity left
+	left x
+	named gap { @SupGap }
+	right y
+    {
+	@Smaller @HSqueeze @VSqueeze x ^/  /
+	&0io 0.3f @HShift @Smaller @HSqueeze @VSqueeze y
+    }
+
+    def frac
+	precedence 54
+	associativity left
+	left x
+	named gap { 0.2f }
+	right y
+    {
+	@HContract @VContract @Smaller @HSqueeze @VSqueeze
+	{ 1w @VShift { x /gap } | fraction &0io | 0w @VShift { |gap y }
+	}
+    }
+
+    def half { 1 frac 2 }
+    def third { 1 frac 3 }
+
+    def over
+	precedence 54
+	associativity left
+	left x
+	named gap { 0.2f }
+	right y
+    {  
+	@HContract @VContract
+	{          |0.5rt @OneCol @VSqueeze x
+	  ^//gap   @HLine
+	   //gap   |0.5rt @OneCol @VSqueeze @Strut y
+	}
+    }
+
+    def from
+	precedence 58
+	associativity left
+	left x
+	named gap { @ThinGap  }
+	named skew { 0c }
+	right y
+    {  
+	@HContract @VContract
+	{          |0.5rt x
+	   //gap   |0.5rt &skew @Smaller @HSqueeze @VSqueeze y
+	}
+    }
+
+    def to
+	precedence 58
+	associativity left
+	left x
+	named gap { @ThinGap  }
+	named skew { 0c }
+	right y
+    {
+	@HContract @VContract
+	{          |0.5rt &skew @Smaller @HSqueeze @VSqueeze y
+	  ^//gap   |0.5rt x
+	}
+    }
+
+    def widefrom
+	precedence 58
+	associativity left
+	left x
+	named gap { @ThinGap  }
+	right y
+    {
+	@HContract @VContract
+	{
+	    x //gap @HScale y
+	}
+    }
+
+    def wideto
+	precedence 58
+	associativity left
+	left x
+	named gap { @ThinGap  }
+	right y
+    {
+	@HContract @VContract
+	{
+	    @HScale y ^//gap x
+	}
+    }
+
+    def dot
+	precedence 62
+	left x
+	named gap { @ThinGap }
+    {
+	x to gap { gap } skew { @SkewGap } .
+    }
+
+    def dotdot
+	precedence 62
+	left x
+	named gap { @ThinGap }
+    {
+	x to gap { gap } skew { @SkewGap } ..
+    }
+
+    def hat
+	precedence 62
+	left x
+	named gap { @ThinGap }
+    {
+	x to gap { gap } skew { @SkewGap } @Base "^"
+    }
+
+    def tilde
+	precedence 62
+	left x
+	named gap { @ThinGap }
+    {
+	x to gap { gap } skew { @SkewGap } @Base "~"
+    }
+
+    def vec
+	precedence 62
+	left x
+	named gap { @ThinGap }
+    {
+	x to gap { gap } skew { @SkewGap } arrowright
+    }
+
+    def dyad
+	precedence 62
+	left x
+	named gap { @ThinGap }
+    {
+	x to gap { gap } skew { @SkewGap } arrowboth
+    }
+
+    def overbar
+	precedence 62
+	left x
+	named gap { @ThinGap }
+    {
+	x wideto gap { gap } minus
+    }
+
+    def underbar
+	precedence 62
+	left x
+	named gap { @ThinGap }
+    {
+	x widefrom gap { gap } minus
+    }
+
+    def sqrt
+	precedence 56
+	named gap { @ThinGap }
+	right x
+    {
+	@BackEnd @Case {
+	  PostScript @Yield {
+	    @HContract @VContract
+		{
+		    @VScale surd | @OneRow
+		    {
+			@HLine line { "0.03 ft setlinewidth 2 setlinecap" }
+			^//gap  |gap  @VSqueeze @Strut x # //gap
+		    }
+		}
+	  }
+	  PDF @Yield {
+		@HContract @VContract
+		{
+#
+#	VT: this PDF is correct but it renders badly in Acrobat (?problem
+#	    with scaling by fractional factors)
+#	In other words, the @VScale value comes through correctly but it
+#	    looks ugly; GhostScript's translation actually expands the
+#	    "draw surd" instruction into raw moveto's and lineto's which
+#	    it presumably gets from the font's definition of the glyph!
+#
+		    @VScale surd | @OneRow
+		    {
+			@HLine line { "__mul(__loutf, 0.03) w 2 J" }
+			^//gap  |gap  @VSqueeze @Strut x # //gap
+		    }
+		}
+	  }
+	}
+    }
+
+    def root
+	precedence 56
+	left x
+	right y
+    {
+	"" sup x &0io sqrt y
+    }
+
+    def above
+	precedence 52
+	left x
+	named gap { @RowGap }
+	right y
+    {
+	|0.5rt x //gap |0.5rt y
+    }
+
+    def labove
+	precedence 52
+	left x
+	named gap { @RowGap }
+	right y
+    {
+	x //gap y
+    }
+
+    def cabove
+	precedence 52
+	left x
+	named gap { @RowGap }
+	right y
+    {
+	|0.5rt x //gap |0.5rt y
+    }
+
+    def rabove
+	precedence 52
+	left x
+	named gap { @RowGap }
+	right y
+    {
+	|1rt x //gap |1rt y
+    }
+
+    def mabove
+	precedence 52
+	left x
+	named gap { @RowGap }
+	right y
+    {
+	x /gap y
+    }
+
+    def nextcol
+	precedence 50
+	left x
+	named gap { @ColGap }
+	right y
+    {
+	x |gap y
+    }
+
+    export row axisrow col lcol ccol rcol mcol
+    def matrix
+	precedence 100
+	named gap { @MedGap }
+	named strut
+	    named no  { }
+	    named No  { }
+	    named yes { 0.5f }
+	    named Yes { 0.5f }
+	{ No }
+	named atleft {}
+	named atright {}
+	named userow { No }
+	named shiftdelim { Yes }
+	body x
+    { 
+	def @Strut
+	{
+	    strut @Case {
+		"" @Yield {}
+		else @Yield { @OneRow { strut @High ^/ strut @High } }
+	    }
+	}
+
+	def newrow
+	    precedence 50
+	    associativity left
+	    left x
+	    right y
+	{
+	    x @Case {
+		"" @Yield { y | @Strut }
+		else @Yield { x /@RowGap y | @Strut }
+	    }
+	}
+
+	macro row { newrow "" }
+
+	def newaxisrow
+	    precedence 50
+	    associativity left
+	    left x
+	    right y
+	{
+	    x @Case {
+		"" @Yield { y | @Strut }
+		else @Yield { x ^/@RowGap y | @Strut }
+	    }
+	}
+
+	macro axisrow { newaxisrow "" }
+
+	def col
+	    precedence 52
+	    associativity left
+	    left x
+	    named indent { 0.5rt }
+	    right y
+	{
+	    x @Case {
+		""   @Yield {            &indent @OneCol y }
+		else @Yield { x |@ColGap &indent @OneCol y }
+	    }
+	}
+
+	def lcol
+	    precedence 52
+	    associativity left
+	    left x
+	    right y
+	{
+	    x col indent { 0i } y
+	}
+
+	def ccol
+	    precedence 52
+	    associativity left
+	    left x
+	    right y
+	{
+	    x col indent { 0.5rt } y
+	}
+
+	def rcol
+	    precedence 52
+	    associativity left
+	    left x
+	    right y
+	{
+	    x col indent { 1rt } y
+	}
+
+	def mcol
+	    precedence 52
+	    associativity left
+	    left x
+	    right y
+	{
+	    x @Case {
+		""   @Yield {            @OneCol y }
+		else @Yield { x |@ColGap @OneCol y }
+	    }
+	}
+
+	def delim right x
+	{
+	    x @Case
+	    {
+		""   @Yield @Null
+		else @Yield
+		{
+		    shiftdelim @Case {
+		    { Yes yes } @Yield { @VScale x }
+		    else        @Yield { @VCover x }
+		    }
+		}
+	    }
+	}
+
+	@HContract @VContract {
+	    delim atleft &@ThinGap
+	    userow @Case {
+		{Yes yes} @Yield @HContract @VContract {^//gap @OneRow x //gap}
+		else      @Yield vctr @HContract @VContract { //gap x //gap }
+	    }
+	    &@ThinGap delim atright
+	}
+    }
+
+    macro pmatrix  { matrix atleft { "1.5f" @Font ( } atright { "1.5f" @Font ) }}
+    macro bmatrix  { matrix atleft { blbrack } atright { brbrack } }
+    macro brmatrix { matrix atleft { blbrace } atright { brbrace } }
+    macro fmatrix  { matrix atleft { blfloor } atright { brfloor } }
+    macro cmatrix  { matrix atleft { blceil  } atright { brceil  } }
+    macro amatrix  { matrix atleft { blangle } atright { brangle } }
+
+    Slope @Font { separate @SpaceGap } @Space 1f @ZUnit 1f @YUnit @Body
+
+@End @Eq                  
+
+macro @E { @OneCol @Eq }
diff --git a/include/fig b/include/fig
new file mode 100644
index 0000000..dac333c
--- /dev/null
+++ b/include/fig
@@ -0,0 +1,27 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for figure drawing (OBSOLETE: use @Diag instead)          #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  The @SysInclude { figf } line                                              #
+#                                                                             #
+#  This line causes Lout to read the definitions for equations, and should    #
+#  not be touched.                                                            #
+#                                                                             #
+###############################################################################
+
+@SysInclude { figf }
+
+
+###############################################################################
+#                                                                             #
+#  This package does not offer the ability to change default options.         #
+#                                                                             #
+###############################################################################
diff --git a/include/figf b/include/figf
new file mode 100644
index 0000000..c3cd15b
--- /dev/null
+++ b/include/figf
@@ -0,0 +1,909 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @Fig package for drawing figures (Version 2.0)                        #
+#                                                                             #
+#  Version 1.0 by Jeffrey H. Kingston, October 1991.                          #
+#  Version 2.0 by Jeffrey H. Kingston, 22 December 1992.                      #
+#  Symbol names changed by JHK 5 March 1993 to avoid clashes with EPS files.  #
+#  @CurveBox and @ShadowBox added by JHK April 1995.                          #
+#                                                                             #
+#  See "Fig - a Lout package for drawing figures" for user information.       #
+#                                                                             #
+#  This package is now obsolete, having been replaced by @Diag.               #
+#                                                                             #
+###############################################################################
+
+@SysPrependGraphic { "figf.lpg" }
+
+export in cm pt em sp vs ft dg
+       "<<" "**" "++" "--" @Max @Min
+       @Distance @XDistance @YDistance @Angle
+       @Prev "::" @Label @BaseOf @MarkOf @ShowLabels @Figure
+       @Frame @Box @CurveBox @ShadowBox @Square @Diamond @Polygon @Ellipse
+       @Circle @HLine @VLine @Line @HArrow @VArrow @Arrow @Arc
+
+def @Fig                  
+    named maxlabels  { 200     }
+    named linestyle  { solid   }
+    named linewidth  { 0.5 pt  }
+    named linecap    { round   }
+    named dashlength { 0.15 cm }
+    named paint      { nopaint }
+    named margin     { 0.4c    }
+    named arrow      { noarrow }
+    named headstyle  { open    }
+    named headwidth  { 0.05 cm }
+    named headlength { 0.15 cm }
+    body @Body
+@Begin
+
+    # Like @Graphic, but affects the graphics state of right parameter
+    def @InnerGraphic
+	left ps
+	right x
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield { { ps gsave // grestore } @Graphic x }
+	    	PDF        @Yield { }
+	    }
+    }
+
+    def in precedence 39 left x {
+	    @BackEnd @Case {
+	    	PostScript @Yield { x "in" }
+	    	PDF        @Yield { "__mul(__in, "x")" }
+	    }
+	}
+
+    def cm precedence 39 left x {
+	    @BackEnd @Case {
+	    	PostScript @Yield { x "cm" }
+	    	PDF        @Yield { "__mul(__cm, "x")" }
+	    }
+	}
+
+    def pt precedence 39 left x {
+	    @BackEnd @Case {
+	    	PostScript @Yield { x "pt" }
+	    	PDF        @Yield { "__mul(__pt, "x")" }
+	    }
+	}
+
+    def em precedence 39 left x {
+	    @BackEnd @Case {
+	    	PostScript @Yield { x "em" }
+	    	PDF        @Yield { "__mul(__em, "x")" }
+	    }
+	}
+
+    def sp precedence 39 left x {
+	    @BackEnd @Case {
+	    	PostScript @Yield { x "sp" }
+	    	PDF        @Yield { "__mul(__louts, "x")" }
+	    }
+	}
+
+    def vs precedence 39 left x {
+	    @BackEnd @Case {
+	    	PostScript @Yield { x "vs" }
+	    	PDF        @Yield { "__mul(__loutv, "x")" }
+	    }
+	}
+
+    def ft precedence 39 left x {
+	    @BackEnd @Case {
+	    	PostScript @Yield { x "ft" }
+	    	PDF        @Yield { "__mul(__loutf, "x")" }
+	    }
+	}
+
+    def dg precedence 39 left x {
+	    @BackEnd @Case {
+	    	PostScript @Yield { x "dg" }
+	    	PDF        @Yield { }
+	    }
+	}
+
+    def "<<"
+	precedence 38
+	left length
+	right angle
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				0 0 length angle "lfigatangle"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def "**"
+	precedence 37
+	left point
+	right length
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				point length "lfigpmul"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def "++"
+	precedence 36
+	associativity left
+	left x
+	right y
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				x y "lfigpadd"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def "--"
+	precedence 36
+	associativity left
+	left x
+	right y
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				y x "lfigpsub"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @Max
+	precedence 36
+	left x
+	right y
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				x y "lfigpmax"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @Min
+	precedence 36
+	left x
+	right y
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				x y "lfigpmin"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @Distance
+	precedence 35
+	left x
+	right y
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				x y "lfigdistance"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @XDistance
+	precedence 35
+	left x
+	right y
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				x y "lfigxdistance"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @YDistance
+	precedence 35
+	left x
+	right y
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				x y "lfigydistance"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @Angle
+	precedence 35
+	left x
+	right y
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				x y "lfigangle"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @Prev
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				"lfigprevious"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def "::"
+	precedence 33
+	left name
+	right x
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				{ "currentdict end" maxlabels "dict begin begin"
+				  // "("name") lfigpromotelabels" } @Graphic x
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @Label
+	right name
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				"/"name "lfigpointdef"
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @MarkOf
+	precedence 32
+	left point
+	right x
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				{ point "translate" } @InnerGraphic
+				{
+				    /0io |0io @OneCol @OneRow x |0io /0io
+				}
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @BaseOf
+	precedence 32
+	left point
+	right x
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				{ point "translate" } @InnerGraphic
+				{
+				    /0io |0io @OneRow @OneCol {
+				    | @OneCol @OneRow x ^/
+				    } |0io /0io
+				}
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @ShowLabels
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				"lfigshowlabels" @Graphic
+			}
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @Figure
+	named shape      {            }
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named arrow      { arrow      }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	named paint      { paint      }
+	named margin     { 0c         }
+	right x
+    {
+	    @BackEnd @Case {
+	    	PostScript @Yield {
+				@HContract @VContract
+				{
+				    #fill the shape
+				    paint @Case
+				    {
+					nopaint @Yield {}
+			
+					{ nochange darkblue blue lightblue darkgreen green lightgreen
+					  darkred red lightred darkcyan cyan lightcyan darkmagenta
+					  magenta lightmagenta darkyellow yellow lightyellow darkgray
+					  gray lightgray darkgrey grey lightgrey black white }
+					@Yield
+					{ "/lfig"paint "[" shape "] gsave lfigpaintpath grestore" }
+				    }
+			
+				    # stroke the path and add any arrowheads
+				    linestyle @Case
+				    {
+					{ solid dashed cdashed dotted noline } @Yield
+					{
+					    linewidth "setlinewidth" "lfig"linecap "setlinecap"
+					    dashlength "/lfig"linestyle "[" shape "] lfigdopath"
+					    arrow @Case
+					    {
+						noarrow @Yield { pop pop }
+						{ forward back both } @Yield
+						{  dashlength "/lfig"linestyle "/"lfigblack
+						   headstyle @Case
+						   { { open halfopen closed } @Yield "lfig"headstyle }
+						   headlength headwidth "lfig"arrow
+						}
+					    }
+					}
+				    }
+				}
+				@Graphic
+				{
+				    ^/margin ^|margin @OneCol @OneRow x |margin
+				     /margin
+				}
+			}
+
+			PDF @Yield {
+			}
+		}
+    }
+
+    def @Frame
+	right x
+    {
+	@Figure
+	    shape {xsize 0 @Label X 0 ysize @Label Y}
+	{ x }
+    }
+
+    def @Box
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { margin     }
+	right x
+    {
+	@Figure
+	    shape {
+		# 0     0      @Label SW
+		# xsize 0      @Label SE
+		# xsize ysize  @Label NE
+		# 0     ysize  @Label NW
+		# SE ** 0.5    @Label S
+		# NW ** 0.5    @Label W
+		# W ++ SE      @Label E
+		# S ++ NW      @Label N
+		# NE ** 0.5    @Label CTR
+		# SW SE NE NW SW
+		lfigbox
+	    }
+	    linestyle  { linestyle }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	x
+    }
+
+
+    def @CurveBox
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { margin     }
+	right x
+    {
+	@Figure
+	    shape {
+		lfigcurvebox
+	    }
+	    linestyle  { linestyle }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	{ 0c @HShift x }
+    }
+
+    def @ShadowBox
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { margin     }
+	named shadow     { 0.2f       }
+	right x
+    {
+		@BackEnd @Case {
+			PostScript @Yield {
+				@VContract @HContract 0c @HShift "lfigshadow" @Graphic
+				{
+				  ^/shadow ^|shadow 0c @HShift
+				  @Figure
+				    shape {
+					lfigbox
+				    }
+				    linestyle  { linestyle }
+				    linewidth  { linewidth  }
+				    linecap    { linecap    }
+				    dashlength { dashlength }
+				    paint      { paint      }
+				    margin     { margin     }
+				  0c @HShift x
+				  |shadow /shadow
+				}
+			}
+			PDF @Yield {
+				@VContract @HContract 0c @HShift
+
+#				"lfigshadow" @Graphic is this:
+				{ "__mul(__xmark, 2) 0 m __xsize 0 l"			#  xmark 2 mul 0 moveto xsize 0 lineto
+				  "__xsize __sub(__ysize, __mul(__xmark, 2)) l"	#  xsize ysize xmark 2 mul sub lineto
+				  "__sub(__xsize, __xmark) __sub(ysize, __mul(__xmark, 2)) l"	#  xsize xmark sub ysize xmark 2 mul sub lineto
+				  "__sub(__xsize, __xmark) __xmark l"			#  xsize xmark sub xmark lineto
+				  "__mul(__xmark, 2) __xmark l h f"				#  xmark 2 mul xmark lineto closepath fill
+				} @Graphic
+
+				{
+				  ^/shadow ^|shadow 0c @HShift
+				  @Figure
+				    shape {
+					lfigbox
+				    }
+				    linestyle  { linestyle }
+				    linewidth  { linewidth  }
+				    linecap    { linecap    }
+				    dashlength { dashlength }
+				    paint      { paint      }
+				    margin     { margin     }
+				  0c @HShift x
+				  |shadow /shadow
+				}
+			}
+		}
+    }
+
+    def @Square
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { margin     }
+	right x
+    {
+	@Figure
+	    shape {
+		# {xsize ysize} ** 0.5                           @Label CTR
+		# CTR ++ {{xsize xsize} @Max {ysize ysize}}**0.5 @Label NE
+		# CTR ++ { {CTR @Distance NE} << 135 }           @Label NW
+		# CTR ++ { {CTR @Distance NE} << 225 }           @Label SW
+		# CTR ++ { {CTR @Distance NE} << 315 }           @Label SE
+		# SW ** 0.5 ++ SE ** 0.5                         @Label S
+		# NW ** 0.5 ++ NE ** 0.5                         @Label N
+		# SW ** 0.5 ++ NW ** 0.5                         @Label W
+		# SE ** 0.5 ++ NE ** 0.5                         @Label E
+		# SW SE NE NW SW
+		lfigsquare
+	    }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	x
+    }
+
+    def @Diamond
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { margin     }
+	right x
+    {
+	@Figure
+	    shape {
+		# {xsize 0} ** 0.5  @Label S
+		# {0 ysize} ** 0.5  @Label W
+		# S ++ W            @Label CTR
+		# CTR ++ W          @Label N
+		# CTR ++ S          @Label E
+		# S E N W S
+		lfigdiamond
+	    }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	x
+    }
+
+    def @Polygon
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { margin     }
+	named sides      { 3          }
+	named angle      { "dup 180 exch div" }
+	right x
+    {
+	@Figure
+	    shape      { sides angle lfigpolygon }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	x
+    }
+
+    def @Ellipse
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { margin     }
+	right x
+    {
+	@Figure
+	    shape {
+		# {xsize 0} ** 0.5  @Label S
+		# {0 ysize} ** 0.5  @Label W
+		# S ++ W            @Label CTR
+		# CTR ++ W          @Label N
+		# CTR ++ S          @Label E
+		# CTR ++ {xsize 0} ** 0.3536 ++ {0 ysize} ** 0.3536  @Label NE
+		# CTR ++ {xsize 0} ** 0.3536 -- {0 ysize} ** 0.3536  @Label SE
+		# CTR -- {xsize 0} ** 0.3536 ++ {0 ysize} ** 0.3536  @Label NW
+		# CTR -- {xsize 0} ** 0.3536 -- {0 ysize} ** 0.3536  @Label SW
+		# S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+		lfigellipse
+	    }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	x
+    }
+
+    def @Circle
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { margin     }
+	right x
+    {
+	@Figure
+	    shape {
+		# {xsize ysize} **0.5                    @Label CTR
+		# CTR ++ {{xsize 0} @Max {ysize 0}}**0.5 @Label E
+		# CTR ++ { {CTR @Distance E} << 45  }    @Label NE
+		# CTR ++ { {CTR @Distance E} << 90  }    @Label N
+		# CTR ++ { {CTR @Distance E} << 135 }    @Label NW
+		# CTR ++ { {CTR @Distance E} << 180 }    @Label W
+		# CTR ++ { {CTR @Distance E} << 225 }    @Label SW
+		# CTR ++ { {CTR @Distance E} << 270 }    @Label S
+		# CTR ++ { {CTR @Distance E} << 315 }    @Label SE
+		# S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+		lfigcircle
+	    }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	x
+    }
+
+    def @HLine
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { 0c         }
+	named arrow      { arrow      }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	right x
+    {
+	@Figure
+	    shape {
+		# 0     ymark @Prev @Label FROM
+		# xsize ymark @Prev @Label TO
+		lfighline
+	    }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	    arrow      { arrow      }
+	    headstyle  { headstyle  }
+	    headwidth  { headwidth  }
+	    headlength { headlength }
+	x
+    }
+
+    def @VLine
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { 0c         }
+	named arrow      { arrow      }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	right x
+    {
+	@Figure
+	    shape {
+		# xmark ysize @Prev @Label FROM
+		# xmark 0     @Prev @Label TO
+		lfigvline
+	    }
+	    linestyle  { linestyle }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	    arrow      { arrow      }
+	    headstyle  { headstyle  }
+	    headwidth  { headwidth  }
+	    headlength { headlength }
+	x
+    }
+
+    def @HArrow
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { 0c         }
+	named arrow      { forward    }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	right x
+    {
+	@Figure
+	    shape {
+		# 0     ymark @Prev @Label FROM
+		# xsize ymark @Prev @Label TO
+		lfighline
+	    }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	    arrow      { arrow      }
+	    headstyle  { headstyle  }
+	    headwidth  { headwidth  }
+	    headlength { headlength }
+	x
+    }
+
+    def @VArrow
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { 0c         }
+	named arrow      { forward    }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	right x
+    {
+	@Figure
+	    shape {
+		# xmark ysize @Prev @Label FROM
+		# xmark 0     @Prev @Label TO
+		lfigvline
+	    }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	    arrow      { arrow      }
+	    headstyle  { headstyle  }
+	    headwidth  { headwidth  }
+	    headlength { headlength }
+	x
+    }
+
+    def @Line
+	named from       { 0 ysize    }
+	named to         { xsize 0    }
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { 0c         }
+	named arrow      { arrow      }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	right x
+    {
+	@Figure
+	    shape {
+		from @Prev @Label FROM
+		to   @Prev @Label TO
+	    }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	    arrow      { arrow      }
+	    headstyle  { headstyle  }
+	    headwidth  { headwidth  }
+	    headlength { headlength }
+	x
+    }
+
+    def @Arrow
+	named from       { 0 ysize    }
+	named to         { xsize 0    }
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { 0c         }
+	named arrow      { forward    }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	right x
+    {
+	@Figure
+	    shape {
+		from @Prev @Label FROM
+		to   @Prev @Label TO
+	    }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	    arrow      { arrow      }
+	    headstyle  { headstyle  }
+	    headwidth  { headwidth  }
+	    headlength { headlength }
+	x
+    }
+
+    def @Arc
+	named from       { 0 ysize    }
+	named to         { xsize 0    }
+	named ctr        { 0 0        }
+	named direction  { clockwise  }
+	named linestyle  { linestyle  }
+	named linewidth  { linewidth  }
+	named linecap    { linecap    }
+	named dashlength { dashlength }
+	named paint      { paint      }
+	named margin     { 0c         }
+	named arrow      { noarrow    }
+	named headstyle  { headstyle  }
+	named headwidth  { headwidth  }
+	named headlength { headlength }
+	right x
+    {
+	@Figure
+	    shape {
+		from @Label FROM
+		to   @Label TO
+		ctr  @Label CTR
+		FROM [ CTR
+		direction @Case { {clockwise anticlockwise} @Yield direction }
+		] TO
+	    }
+	    linestyle  { linestyle  }
+	    linewidth  { linewidth  }
+	    linecap    { linecap    }
+	    dashlength { dashlength }
+	    paint      { paint      }
+	    margin     { margin     }
+	    arrow      { arrow      }
+	    headstyle  { headstyle  }
+	    headwidth  { headwidth  }
+	    headlength { headlength }
+	x
+    }
+
+    @BackEnd @Case {
+        PostScript @Yield {
+            { "grestore save gsave" maxlabels "dict begin lfigdict begin"
+              // "end end restore"
+            } @Graphic @Body
+        }
+        PDF @Yield {
+        }
+    }
+
+@End @Fig                  
diff --git a/include/figf.lpg b/include/figf.lpg
new file mode 100644
index 0000000..2b64188
--- /dev/null
+++ b/include/figf.lpg
@@ -0,0 +1,1003 @@
+%%BeginResource: procset LoutFigPrependGraphic
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                                    %
+%  PostScript @SysPrependGraphic file for @Fig  Jeffrey H. Kingston  %
+%  Version 2.0 (includes CIRCUM label)                 January 1992  %
+%                                                                    %
+%  To assist in avoiding name clashes, the names of all symbols      %
+%  defined here begin with "lfig".  However, this is not feasible    %
+%  with user-defined labels and some labels used by users.           %
+%                                                                    %
+%  <point>      is two numbers, a point.                             %
+%  <length>     is one number, a length                              %
+%  <angle>      is one number, an angle in degrees                   %
+%  <dashlength> is one number, the preferred length of a dash        %
+%                                                                    %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+errordict begin
+   /handleerror
+   {
+      {  /Times-Roman findfont 8 pt scalefont setfont
+	 0 setgray 4 pt 4 pt moveto
+	 $error /errorname get
+	 dup lfigdict exch known
+	 { lfigdict exch get }
+	 { 30 string cvs } ifelse
+	 show
+	 (  Command: ) show
+	 $error /command get 30 string cvs show
+      } stopped {} if
+      showpage stop
+   } def
+end
+
+% concat strings: <string> <string> lfigconcat <string>
+% must be defined outside lfigdict since used in lfigpromotelabels
+/lfigconcat
+{ 2 copy length exch length add string
+  dup 0 4 index putinterval
+  dup 3 index length 3 index putinterval
+  3 1 roll pop pop
+} def
+
+% <string> lfigdebugprint -
+% must be defined outside lfigdict since used in arbitrary places
+% /lfigdebugprint
+% { print
+%   (;  operand stack:\n) print
+%   count copy
+%   count 2 idiv
+%   { ==
+%     (\n) print
+%   } repeat
+%   (\n) print
+% } def
+
+/lfigdict 120 dict def
+lfigdict begin
+
+% error messages
+/dictfull (dictfull error:  too many labels?) def
+/dictstackoverflow (dictstackoverflow error:  labels nested too deeply?) def
+/execstackoverflow (execstackoverflow error:  figure nested too deeply?) def
+/limitcheck (limitcheck error:  figure nested too deeply or too large?) def
+/syntaxerror (syntaxerror error:  syntax error in text of figure?) def
+/typecheck (typecheck error:  syntax error in text of figure?) def
+/undefined (undefined error:  unknown or misspelt label?) def
+/VMError (VMError error:  run out of memory?) def
+
+% push pi onto stack:  - lfigpi <num>
+/lfigpi 3.14159 def
+
+% arc directions
+/clockwise     false def
+/anticlockwise true  def
+
+% maximum of two numbers:  <num> <num> lfigmax <num>
+/lfigmax { 2 copy gt { pop } { exch pop } ifelse } def
+
+% minimum of two numbers:  <num> <num> lfigmin <num>
+/lfigmin { 2 copy lt { pop } { exch pop } ifelse } def
+
+% add two points:  <point> <point> lfigpadd <point>
+/lfigpadd { exch 3 1 roll add 3 1 roll add exch } def
+
+% subtract first point from second:  <point> <point> lfigpsub <point>
+/lfigpsub { 3 2 roll sub 3 1 roll exch sub exch } def
+
+% max two points:  <point> <point> lfigpmax <point>
+/lfigpmax { exch 3 1 roll lfigmax 3 1 roll lfigmax exch } def
+
+% min two points:  <point> <point> lfigpmin <point>
+/lfigpmin { exch 3 1 roll lfigmin 3 1 roll lfigmin exch } def
+
+% scalar multiplication: <point> <num> lfigpmul <point>
+/lfigpmul { dup 3 1 roll mul 3 1 roll mul exch } def
+
+% point at angle and distance:  <point> <length> <angle> lfigatangle <point>
+/lfigatangle { 2 copy cos mul 3 1 roll sin mul lfigpadd } def
+
+% angle from one point to another:  <point> <point> lfigangle <angle>
+/lfigangle { lfigpsub 2 copy 0 eq exch 0 eq and {pop} {exch atan} ifelse } def
+
+% distance between two points:  <point> <point> lfigdistance <length>
+/lfigdistance { lfigpsub dup mul exch dup mul add sqrt } def
+
+% difference in x coords: <point> <point> lfigxdistance <length>
+/lfigxdistance { pop 3 1 roll pop sub } def
+
+%difference in y coords: <point> <point> lfigydistance <length>
+/lfigydistance { 3 1 roll pop sub exch pop } def
+
+% stroke a solid line:  <length> <dashlength> lfigsolid -
+/lfigsolid
+{  pop pop [] 0 setdash stroke
+} def
+
+% stroke a lfigdashed line:   <length> <dashlength> lfigdashed -
+/lfigdashed
+{  2 copy div 2 le 1 index 0 le or
+   {  exch pop 1 pt lfigmax [ exch dup ] 0 setdash }
+   {  dup [ exch 4 2 roll 2 copy div
+      1 sub 2 div ceiling dup 4 1 roll
+      1 add mul sub exch div ] 0 setdash
+   } ifelse stroke
+} def
+
+% stroke a lfigcdashed line:  <length> <dashlength> lfigcdashed -
+/lfigcdashed
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt lfigmax [ exch dup ] dup 0 get 2 div setdash }
+   { dup [ 4 2 roll exch 2 copy exch div
+     2 div ceiling div 1 index sub
+     ] exch 2 div setdash
+   } ifelse stroke
+} def
+
+% stroke a dotted line:  <length> <dashlength> lfigdotted -
+/lfigdotted
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt lfigmax [ exch 0 exch ] 0 setdash }
+   { 1 index exch div ceiling div
+     [ 0 3 2 roll ] 0 setdash
+   } ifelse stroke
+} def
+
+% stroke a noline line:  <length> <dashlength> lfignoline -
+/lfignoline
+{ pop pop
+} def
+
+% painting (i.e. filling): - lfigwhite - (etc.)
+/lfignopaint		{			       } def
+/lfignochange		{ 			  fill } def
+/lfigdarkblue		{ 0.0 0.0 0.5 setrgbcolor fill } def
+/lfigblue		{ 0.0 0.0 1.0 setrgbcolor fill } def
+/lfiglightblue		{ 0.5 0.5 1.0 setrgbcolor fill } def
+/lfigdarkgreen		{ 0.0 0.5 0.0 setrgbcolor fill } def
+/lfiggreen		{ 0.0 1.0 0.0 setrgbcolor fill } def
+/lfiglightgreen		{ 0.5 1.0 0.5 setrgbcolor fill } def
+/lfigdarkred		{ 0.5 0.0 0.0 setrgbcolor fill } def
+/lfigred		{ 1.0 0.0 0.0 setrgbcolor fill } def
+/lfiglightred		{ 1.0 0.5 0.5 setrgbcolor fill } def
+/lfigdarkcyan		{ 0.0 0.5 0.5 setrgbcolor fill } def
+/lfigcyan		{ 0.0 1.0 1.0 setrgbcolor fill } def
+/lfiglightcyan		{ 0.5 1.0 1.0 setrgbcolor fill } def
+/lfigdarkmagenta	{ 0.5 0.0 0.5 setrgbcolor fill } def
+/lfigmagenta		{ 1.0 0.0 1.0 setrgbcolor fill } def
+/lfiglightmagenta	{ 1.0 0.5 1.0 setrgbcolor fill } def
+/lfigdarkyellow		{ 0.5 0.5 0.0 setrgbcolor fill } def
+/lfigyellow		{ 1.0 1.0 0.0 setrgbcolor fill } def
+/lfiglightyellow	{ 1.0 1.0 0.5 setrgbcolor fill } def
+/lfigdarkgray		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/lfiggray		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/lfiglightgray		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/lfigdarkgrey		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/lfiggrey		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/lfiglightgrey		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/lfigblack		{ 0.0 0.0 0.0 setrgbcolor fill } def
+/lfigwhite		{ 1.0 1.0 1.0 setrgbcolor fill } def
+
+% line caps (and joins, not currently used)
+/lfigbutt       0 def
+/lfiground      1 def
+/lfigprojecting 2 def
+/lfigmiter      0 def
+/lfigbevel      2 def
+
+% shape and labels of the @Box symbol
+/lfigbox
+{
+   0     0     /SW  lfigpointdef
+   xsize 0     /SE  lfigpointdef
+   xsize ysize /NE  lfigpointdef
+   0     ysize /NW  lfigpointdef
+   SE 0.5 lfigpmul /S   lfigpointdef
+   NW 0.5 lfigpmul /W   lfigpointdef
+   W SE lfigpadd   /E   lfigpointdef
+   S NW lfigpadd   /N   lfigpointdef
+   NE 0.5 lfigpmul /CTR lfigpointdef
+   [ CTR NE lfigpsub /lfigboxcircum cvx ] lfigcircumdef
+   SW SE NE NW SW
+} def
+
+% shape and labels of the @CurveBox symbol
+/lfigcurvebox
+{
+
+   xsize 0.5 mul	ysize 0.5 mul	/CTR lfigpointdef
+   xsize 0.5 mul	0		/S   lfigpointdef
+   xsize		ysize 0.5 mul	/E   lfigpointdef
+   xsize 0.5 mul	ysize		/N   lfigpointdef
+   0			ysize 0.5 mul	/W   lfigpointdef
+
+   xmark 0.293 mul		xmark 0.293 mul		  /SW  lfigpointdef
+   xsize xmark 0.293 mul sub	xmark 0.293 mul		  /SE  lfigpointdef
+   xsize xmark 0.293 mul sub	ysize xmark 0.293 mul sub /NE  lfigpointdef
+   xmark 0.293 mul		ysize xmark 0.293 mul sub /NW  lfigpointdef
+
+   [ xsize ysize 0.5 lfigpmul xmark /lfigcurveboxcircum cvx ] lfigcircumdef
+
+   xmark		0
+   xsize xmark sub	0
+   [ xsize xmark sub	xmark		]
+   xsize		xmark
+   xsize		ysize xmark sub
+   [ xsize xmark sub	ysize xmark sub	]
+   xsize xmark sub	ysize
+   xmark		ysize
+   [ xmark		ysize xmark sub	]
+   0			ysize xmark sub
+   0			xmark
+   [ xmark		xmark		]
+   xmark		0
+} def
+
+% shadow of the @ShadowBox symbol
+% its shape and labels are done, somewhat inaccurately, with lfigbox
+/lfigshadow
+{ xmark 2 mul 0 moveto xsize 0 lineto
+  xsize ysize xmark 2 mul sub lineto
+  xsize xmark sub ysize xmark 2 mul sub lineto
+  xsize xmark sub xmark lineto
+  xmark 2 mul xmark lineto closepath fill
+} def
+
+% shape and labels of the @Square symbol
+/lfigsquare
+{
+   xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   CTR xsize xsize ysize ysize lfigpmax 0.5 lfigpmul lfigpadd /NE lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 135 lfigatangle lfigpadd /NW lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 225 lfigatangle lfigpadd /SW lfigpointdef
+   CTR 0 0 CTR NE lfigdistance 315 lfigatangle lfigpadd /SE lfigpointdef
+   SW 0.5 lfigpmul SE 0.5 lfigpmul lfigpadd /S lfigpointdef
+   NW 0.5 lfigpmul NE 0.5 lfigpmul lfigpadd /N lfigpointdef
+   SW 0.5 lfigpmul NW 0.5 lfigpmul lfigpadd /W lfigpointdef
+   SE 0.5 lfigpmul NE 0.5 lfigpmul lfigpadd /E lfigpointdef
+   [ CTR NE lfigpsub /lfigboxcircum cvx ] lfigcircumdef
+   SW SE NE NW SW
+} def
+
+% shape and labels of the @Diamond symbol
+/lfigdiamond
+{
+   xsize 0 0.5 lfigpmul /S   lfigpointdef
+   0 ysize 0.5 lfigpmul /W   lfigpointdef
+   S W         lfigpadd /CTR lfigpointdef
+   CTR W       lfigpadd /N   lfigpointdef
+   CTR S       lfigpadd /E   lfigpointdef
+   [ xsize ysize 0.5 lfigpmul /lfigdiamondcircum cvx ] lfigcircumdef
+   S E N W S
+} def
+
+% shape and labels of the @Ellipse symbol
+/lfigellipse
+{
+   xsize 0 0.5 lfigpmul /S   lfigpointdef
+   0 ysize 0.5 lfigpmul /W   lfigpointdef
+   S W         lfigpadd /CTR lfigpointdef
+   CTR W       lfigpadd /N   lfigpointdef
+   CTR S       lfigpadd /E   lfigpointdef
+   CTR xsize 0 0.3536 lfigpmul lfigpadd 0 ysize 0.3536 lfigpmul lfigpadd /NE lfigpointdef
+   0 ysize 0.3536 lfigpmul CTR xsize 0 0.3536 lfigpmul lfigpadd lfigpsub /SE lfigpointdef
+   xsize 0 0.3536 lfigpmul CTR lfigpsub 0 ysize 0.3536 lfigpmul lfigpadd /NW lfigpointdef
+   0 ysize 0.3536 lfigpmul xsize 0 0.3536 lfigpmul CTR lfigpsub lfigpsub /SW lfigpointdef
+   [ xsize ysize 0.5 lfigpmul /lfigellipsecircum cvx ] lfigcircumdef
+   S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+} def
+
+% shape and labels of the @Circle symbol
+/lfigcircle
+{
+   xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   CTR xsize 0 ysize 0 lfigpmax 0.5 lfigpmul lfigpadd /E lfigpointdef
+   CTR 0 0 CTR E lfigdistance 45 lfigatangle lfigpadd /NE lfigpointdef
+   CTR 0 0 CTR E lfigdistance 90 lfigatangle lfigpadd /N lfigpointdef
+   CTR 0 0 CTR E lfigdistance 135 lfigatangle lfigpadd /NW lfigpointdef
+   CTR 0 0 CTR E lfigdistance 180 lfigatangle lfigpadd /W lfigpointdef
+   CTR 0 0 CTR E lfigdistance 225 lfigatangle lfigpadd /SW lfigpointdef
+   CTR 0 0 CTR E lfigdistance 270 lfigatangle lfigpadd /S lfigpointdef
+   CTR 0 0 CTR E lfigdistance 315 lfigatangle lfigpadd /SE lfigpointdef
+   [ S E lfigpsub /lfigellipsecircum cvx ] lfigcircumdef
+   S [ CTR ] E [ CTR ] N [ CTR ] W [ CTR ] S
+} def
+
+% shape and labels of the @HLine and @HArrow symbols
+/lfighline
+{
+   0 ymark lfigprevious /FROM lfigpointdef
+   xsize ymark lfigprevious /TO lfigpointdef
+} def
+
+% shape and labels of the @VLine and @VArrow symbols
+/lfigvline
+{
+   xmark ysize lfigprevious /FROM lfigpointdef
+   xmark 0 lfigprevious /TO lfigpointdef
+} def
+
+% points of a polygon around base with given no of sides, vert init angle:
+% <sides> <angle> figpolygon <point> ... <point>
+/lfigpolygon
+{  xsize ysize 0.5 lfigpmul /CTR lfigpointdef
+   90 sub CTR 2 copy lfigmax 5 3 roll
+   [ 4 copy pop /lfigpolycircum cvx ] lfigcircumdef
+   exch dup 360 exch div exch
+   1 1  3 2 roll
+   {  4 string cvs (P) exch lfigconcat cvn
+      6 copy pop pop lfigatangle 2 copy 10 2 roll
+      3 2 roll lfigpointdef
+      dup 3 1 roll add exch
+   }  for
+   pop lfigatangle
+} def
+
+% next array element:  <array> <index> lfiggetnext <array> <index> <any> true
+%                                               or <array> <index> false
+/lfiggetnext
+{  2 copy exch length ge
+   { false }
+   { 2 copy get exch 1 add exch true } ifelse
+} def
+
+% check whether thing is number:  <any> lfigisnumbertype <any> <bool>
+/lfigisnumbertype
+{  dup type dup
+   /integertype eq exch /realtype eq or
+} def
+
+% check whether thing is an array:  <any> lfigisarraytype <any> <bool>
+/lfigisarraytype { dup type /arraytype eq } def
+
+% get next item:  <array> <index> lfiggetnextitem <array> <index> 0
+%                                              or <array> <index> <array> 1
+%                                              or <array> <index> <point> 2
+/lfiggetnextitem
+{   lfiggetnext
+    {	lfigisarraytype
+	{   1
+	}
+	{   lfigisnumbertype
+	    {	3 1 roll
+		lfiggetnext
+		{   lfigisnumbertype
+		    {	4 3 roll exch  2
+		    }
+		    {	pop 3 2 roll pop  0
+		    } ifelse
+		}
+		{   3 2 roll pop  0
+		} ifelse
+	    }
+	    {	pop 0
+	    } ifelse
+	} ifelse
+    }
+    {	0
+    } ifelse
+} def
+
+% set arc path:  bool x1 y1  x2 y2  x0 y0  lfigsetarc  <angle> <angle> <dist>
+% the path goes from x1 y1 to x2 y2 about centre x0 y0,
+% anticlockwise if bool is true else clockwise.
+% The orientations of backwards pointing and forwards pointing
+% arrowheads are returned in the two angles, and
+% the length of the arc is returned in <dist>.
+/lfigsetarc
+{
+  20 dict begin
+     matrix currentmatrix 8 1 roll
+     2 copy translate 2 copy 8 2 roll
+     4 2 roll lfigpsub 6 2 roll lfigpsub
+     dup /y1 exch def dup mul /y1s exch def
+     dup /x1 exch def dup mul /x1s exch def
+     dup /y2 exch def dup mul /y2s exch def
+     dup /x2 exch def dup mul /x2s exch def
+
+     y1s y2s eq
+     {	-1
+     }
+     {	y1s x2s mul y2s x1s mul sub y1s y2s sub div
+     } ifelse
+     /da exch def
+
+     x1s x2s eq
+     {	-1
+     }
+     {	x1s y2s mul x2s y1s mul sub x1s x2s sub div
+     } ifelse
+     /db exch def
+
+     da 0 gt db 0 gt and
+     {	/LMax da sqrt db sqrt lfigmax def
+	/scalex da sqrt LMax div def
+	/scaley db sqrt LMax div def
+	scalex scaley scale
+	0 0 LMax
+	0 0 x1 scalex mul y1 scaley mul lfigangle
+	0 0 x2 scalex mul y2 scaley mul lfigangle
+	2 copy eq { 360 add } if
+	2 copy 8 2 roll
+	5 index { arc } { arcn } ifelse
+	2 index 1 index
+	{ 90 sub } { 90 add } ifelse
+	dup sin scaley mul exch cos scalex mul atan
+	2 index 2 index
+	{ 90 add } { 90 sub } ifelse
+	dup sin scaley mul exch cos scalex mul atan
+	5 2 roll  % res1 res2 ang1 ang2 anticlockwise
+	{ exch sub } { sub } ifelse
+	dup 0 le { 360 add } if  lfigpi mul LMax mul 180 div
+     }
+     {	0 0 x1 y1 lfigdistance 0 0 x2 y2 lfigdistance eq
+	0 0 x1 y1 lfigdistance 0 gt and
+	{	0 0
+		0 0 x1 y1 lfigdistance
+		0 0 x1 y1 lfigangle
+		0 0 x2 y2 lfigangle
+		2 copy eq { 360 add } if
+		2 copy 8 2 roll
+		5 index { arc } { arcn } ifelse
+		2 index 1 index
+		{ 90 sub } { 90 add } ifelse
+		2 index 2 index
+		{ 90 add } { 90 sub } ifelse
+		5 2 roll % res1 res2 ang1 ang2 clockwise
+		{ exch sub } { sub } ifelse
+		dup 0 le { 360 add } if lfigpi mul 0 0 x1 y1 lfigdistance mul 180 div
+	}
+	{	x2 y2 lineto pop
+		x2 y2 x1 y1 lfigangle
+		x1 y1 x2 y2 lfigangle
+		x1 y1 x2 y2 lfigdistance
+	} ifelse
+     } ifelse
+     4 -1 roll setmatrix
+   end
+} def
+
+% lfigsetcurve: set up a Bezier curve from x0 y0 to x3 y3
+% and return arrowhead angles and length of curve (actually 0)
+% x0 y0 x1 y1 x2 y2 x3 y3 lfigsetcurve <angle> <angle> <length>
+/lfigsetcurve
+{ 8 copy curveto pop pop
+  lfigangle
+  5 1 roll
+  4 2 roll lfigangle
+  exch
+  0
+} def
+
+% lfigpaintpath: paint a path of the given shape
+% /paint [ shape ] lfigpaintpath -
+/lfigpaintpath
+{
+  10 dict begin
+    0 newpath
+    /prevseen false def
+    /curveseen false def
+    { lfiggetnextitem
+      dup 0 eq { pop exit }
+      { 1 eq
+        { /curveseen true def
+	  /curve exch def
+	  curve length 0 eq { /curveseen false def } if
+        }
+        { /ycurr exch def
+	  /xcurr exch def
+	  prevseen
+	  { curveseen
+	    { curve length 4 eq
+	      { xprev yprev
+		curve 0 get curve 1 get
+		curve 2 get curve 3 get
+		xcurr ycurr
+		lfigsetcurve pop pop pop
+	      }
+	      { xprev yprev xcurr ycurr
+	        curve length 1 ge { curve 0 get } { 0 } ifelse
+	        curve length 2 ge { curve 1 get } { 0 } ifelse
+	        curve length 3 ge { curve 2 get } { true } ifelse
+	        7 1 roll
+	        lfigsetarc pop pop pop
+	      } ifelse
+	    }
+	    { xcurr ycurr lineto
+	    } ifelse
+	  }
+	  { xcurr ycurr moveto
+	  } ifelse
+	  /xprev xcurr def
+	  /yprev ycurr def
+	  /prevseen true def
+	  /curveseen false def
+        } ifelse
+      } ifelse
+    } loop pop pop cvx exec
+  end
+} def
+
+% stroke a path of the given shape in the given linestyle and dash length.
+% Return the origin and angle of the backward and forward arrow heads.
+% dashlength /linestyle [shape] lfigdopath  [<point> <angle>] [<point> <angle>] 
+/lfigdopath
+{
+  10 dict begin
+    0
+    /prevseen  false def
+    /curveseen false def
+    /backarrow []    def
+    /fwdarrow  []    def
+    {
+	lfiggetnextitem
+	dup 0 eq { pop exit }
+	{
+	    1 eq
+	    {	/curveseen true def
+		/curve exch def
+		curve length 0 eq { /prevseen false def } if
+	    }
+	    {	/ycurr exch def
+		/xcurr exch def
+		prevseen
+		{   newpath xprev yprev moveto
+		    curveseen
+		    {	curve length 4 eq
+			{   xprev yprev
+			    curve 0 get curve 1 get
+			    curve 2 get curve 3 get
+			    xcurr ycurr lfigsetcurve
+			}
+			{   xprev yprev xcurr ycurr
+			    curve length 1 ge { curve 0 get } { 0 } ifelse
+			    curve length 2 ge { curve 1 get } { 0 } ifelse
+			    curve length 3 ge { curve 2 get } { true } ifelse
+			    7 1 roll
+			    lfigsetarc
+			} ifelse
+		    }
+		    {	xcurr ycurr lineto
+			xcurr ycurr xprev yprev lfigangle dup 180 sub
+			xprev yprev xcurr ycurr lfigdistance
+		    } ifelse
+		    6 index 6 index cvx exec
+		    [ xprev yprev 5 -1 roll ]
+		    backarrow length 0 eq
+		    { /backarrow exch def }
+		    { pop } ifelse
+		    [ xcurr ycurr 4 -1 roll ] /fwdarrow exch def
+		} if
+		/xprev xcurr def
+		/yprev ycurr def
+		/prevseen true def
+		/curveseen false def
+	    } ifelse
+	} ifelse
+    } loop
+    pop pop pop pop
+    backarrow length 0 eq { [ 0 0 0 ] } { backarrow } ifelse
+    fwdarrow  length 0 eq { [ 0 0 0 ] } { fwdarrow  } ifelse
+  end
+} def
+
+% lfigdoarrow: draw an arrow head of given form
+% dashlength /lstyle /pstyle hfrac height width [ <point> <angle> ] lfigdoarrow -
+/lfigdoarrow
+{  matrix currentmatrix 8 1 roll
+   dup 0 get 1 index 1 get translate
+   2 get rotate
+   [ 2 index neg 2 index 0 0
+     3 index 3 index neg
+     1 index 10 index mul 0
+     7 index 7 index ]
+   4 1 roll pop pop pop
+   dup 3 1 roll
+   gsave lfigpaintpath grestore lfigdopath pop pop
+   setmatrix
+} def
+
+% arrow head styles
+/lfigopen     0.0 def
+/lfighalfopen 0.5 def
+/lfigclosed   1.0 def
+
+% stroke no arrows, forward, back, and both
+/lfignoarrow { pop pop pop pop pop pop pop pop                        } def
+/lfigforward { 7 -1 roll lfigdoarrow pop                              } def
+/lfigback    { 8 -2 roll pop lfigdoarrow                              } def
+/lfigboth    { 8 -1 roll 7 copy lfigdoarrow pop 7 -1 roll lfigdoarrow } def
+
+% lfigprevious: return previous point on path
+/lfigprevious
+{ lfigisnumbertype
+  { 2 copy }
+  { lfigisarraytype
+    { 2 index 2 index }
+    { 0 0 }
+    ifelse
+  } ifelse
+} def
+
+% label a point in 2nd top dictionary:  <point> /name lfigpointdef -
+/lfigpointdef
+{
+  % (Entering lfigpointdef) lfigdebugprint
+  [ 4 2 roll transform
+    /itransform cvx ] cvx
+    currentdict end
+    3 1 roll
+    % currentdict length currentdict maxlength lt
+    % { def }
+    % { exec moveto (too many labels) show stop }
+    % ifelse
+    def
+    begin
+  % (Leaving lfigpointdef) lfigdebugprint
+} def
+
+% promote labels from second top to third top dictionary
+% <string> lfigpromotelabels -
+/lfigpromotelabels
+{
+  % (Entering lfigpromotelabels) lfigdebugprint
+  currentdict end exch currentdict end
+  { exch 20 string cvs 2 index
+    (@) lfigconcat exch lfigconcat cvn exch def
+  } forall pop begin
+  % (Leaving lfigpromotelabels) lfigdebugprint
+} def
+
+% show labels (except CIRCUM): - lfigshowlabels -
+/lfigshowlabels
+{
+  % (Entering lfigshowlabels) lfigdebugprint
+  currentdict end
+    currentdict
+    { 1 index 20 string cvs (CIRCUM) search % if CIRCUM in key
+      { pop pop pop pop pop }
+      { pop cvx exec 2 copy
+        newpath 1.5 pt 0 360 arc
+        0 setgray fill
+        /Times-Roman findfont 8 pt scalefont setfont
+        moveto 0.2 cm 0.1 cm rmoveto 20 string cvs show
+      }
+      ifelse
+    } forall
+  begin
+  % (Leaving lfigshowlabels) lfigdebugprint
+} def
+
+% fix an angle to 0 <= res < 360:  <angle> lfigfixangle <angle>
+/lfigfixangle
+{
+  % (Entering lfigfixangle) lfigdebugprint
+  { dup 0 ge { exit } if
+    360 add
+  } loop
+  { dup 360 lt { exit } if
+    360 sub
+  } loop
+  % (Leaving lfigfixangle) lfigdebugprint
+} def
+
+% find point on circumference of box:  alpha a b lfigboxcircum x y
+/lfigboxcircum
+{
+  % (Entering lfigboxcircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    0 0 a b lfigangle /theta exch def
+
+    % if alpha <= theta, return (a, a*tan(alpha))
+    alpha theta le
+    { a  a alpha sin mul alpha cos div }
+    {
+      % else if alpha <= 180 - theta, return (b*cot(alpha), b)
+      alpha 180 theta sub le
+      { b alpha cos mul alpha sin div  b }
+      {
+        % else if alpha <= 180 + theta, return (-a, -a*tan(alpha))
+        alpha 180 theta add le
+        { a neg  a neg alpha sin mul alpha cos div }
+        {
+	  % else if alpha <= 360 - theta, return (-b*cot(alpha), -b)
+	  alpha 360 theta sub le
+          { b neg alpha cos mul alpha sin div  b neg }
+	  {
+	    % else 360 - theta <= alpha, return (a, a*tan(alpha))
+	    a  a alpha sin mul alpha cos div
+	  } ifelse
+        } ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigboxcircum) lfigdebugprint
+} def
+
+% find quadratic roots (assume a != 0): a b c lfigqroots x1 x2 2
+%                                                     or    x2 1
+%                                                     or       0
+/lfigqroots
+{
+  4 dict begin
+    /c exch def
+    /b exch def
+    /a exch def
+    /disc b b mul 4 a c mul mul sub def
+    disc 0 lt
+    { 0
+    }
+    { disc 0 eq
+      { b neg 2 a mul div
+	1
+      }
+      { b neg disc sqrt add 2 a mul div
+        b neg disc sqrt sub 2 a mul div
+	2
+      }
+      ifelse
+    }
+    ifelse
+  end
+} def
+
+% work our which quadrant: <angle> lfigquadrant <0-3>
+/lfigquadrant
+{ dup 90 lt
+  { pop 0
+  }
+  { dup 180 lt
+    { pop 1
+    }
+    { 270 lt
+      { 2
+      }
+      { 3
+      } ifelse
+    } ifelse
+  } ifelse
+} def
+
+% find curvebox circum, assuming upper right quadrant: alpha a b xmk lfigcb x y
+/lfigcb
+{
+  6 dict begin
+    /xmk exch def
+    /b exch def
+    /a exch def
+    /alpha exch def
+    /theta1 0 0 a b xmk sub lfigangle def
+    /theta2 0 0 a xmk sub b lfigangle def
+    alpha theta1 le
+    { % if alpha <= theta1, return (a, a*tan(alpha))
+      a  a alpha sin mul alpha cos div
+    }
+    { alpha theta2 ge
+      { % else if alpha > theta2, return (b*cot(alpha), b)
+	b alpha cos mul alpha sin div  b
+      }
+      {
+	% else, return the intersection of line and circle
+	a xmk sub b xmk sub xmk  0 0 alpha lfigcircleintersect
+	dup 0 eq
+	{ % should never happen, just return any reasonable point
+	  pop
+	  a b 0.5 lfigpmul
+	}
+	{ 1 eq
+	  { % should never happen, just return the point on top of stack
+	  }
+	  { % the usual case, two points on stack, return the larger
+	    lfigpmax
+	  } ifelse
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+} def
+
+% find point on circumference of curvebox: alpha a b xmk lfigcurveboxcircum x y
+/lfigcurveboxcircum
+{
+  % (Entering lfigcurveboxcircum) lfigdebugprint
+  5 dict begin
+    /xmk exch def
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+
+    % work out which quadrant we are in, and reflect accordingly
+    /quad alpha lfigquadrant def
+    quad 0 eq
+    { alpha a b xmk lfigcb
+    }
+    { quad 1 eq
+      { 180 alpha sub a b xmk lfigcb exch neg exch
+      }
+      { quad 2 eq
+	{ alpha 180 sub a b xmk lfigcb neg exch neg exch
+	}
+	{ 360 alpha sub a b xmk lfigcb neg
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigcurveboxcircum) lfigdebugprint
+} def
+
+% find point on circumference of diamond:  alpha a b lfigdiamondcircum x y
+/lfigdiamondcircum
+{
+  % (Entering lfigdiamondcircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    b alpha cos abs mul  a alpha sin abs mul  add  /denom exch def
+    a b mul alpha cos mul denom div
+    a b mul alpha sin mul denom div
+  end
+  % (Leaving lfigdiamondcircum) lfigdebugprint
+} def
+
+% find point on circumference of ellipse:  alpha a b lfigellipsecircum x y
+/lfigellipsecircum
+{
+  % (Entering lfigellipsecircum) lfigdebugprint
+  4 dict begin
+    /b exch def
+    /a exch def
+    lfigfixangle /alpha exch def
+    b alpha cos mul dup mul  a alpha sin mul dup mul  add sqrt /denom exch def
+    a b mul alpha cos mul denom div
+    a b mul alpha sin mul denom div
+  end
+  % (Leaving lfigellipsecircum) lfigdebugprint
+} def
+
+% find point of intersection of two lines each defined by two points
+% x1 y1 x2 y2  x3 y3 x4 y4  lfiglineintersect x y
+/lfiglineintersect
+{
+  % (Entering lfiglineintersect) lfigdebugprint
+  13 dict begin
+    /y4 exch def
+    /x4 exch def
+    /y3 exch def
+    /x3 exch def
+    /y2 exch def
+    /x2 exch def
+    /y1 exch def
+    /x1 exch def
+    x2 x1 sub /x21 exch def
+    x4 x3 sub /x43 exch def
+    y2 y1 sub /y21 exch def
+    y4 y3 sub /y43 exch def
+    y21 x43 mul y43 x21 mul sub /det exch def
+  
+    % calculate x 
+    y21 x43 mul x1 mul
+    y43 x21 mul x3 mul sub
+    y3 y1 sub x21 mul x43 mul add
+    det div
+
+    % calculate y
+    x21 y43 mul y1 mul
+    x43 y21 mul y3 mul sub
+    x3 x1 sub y21 mul y43 mul add
+    det neg div
+
+  end
+  % (Leaving lfiglineintersect) lfigdebugprint
+} def
+
+% find point on circumference of polygon
+% alpha radius num theta lfigpolycircum x y
+/lfigpolycircum
+{
+  % (Entering lfigpolycircum) lfigdebugprint
+  13 dict begin
+    /theta exch def
+    /num exch def
+    /radius exch def
+    /alpha exch def
+
+    % calculate delta, the angle from theta to alpha
+    alpha theta sub lfigfixangle
+
+    % calculate the angle which is the multiple of 360/num closest to delta
+    360 num div div truncate 360 num div mul theta add /anglea exch def
+
+    % calculate the next multiple of 360/num after anglea
+    anglea 360 num div add /angleb exch def
+
+    % intersect the line through these two points with the alpha line
+    anglea cos anglea sin  angleb cos angleb sin
+    0 0  alpha cos 2 mul alpha sin 2 mul
+    lfiglineintersect radius lfigpmul
+
+  end
+  % (Leaving lfigpolycircum) lfigdebugprint
+} def
+
+% find point of intersection of a point and a circle
+% x0 y0 r  x1 y1 theta  lfigcircleintersect xa ya xb yb 2
+%                                        or       xb yb 1
+%                                        or             0
+/lfigcircleintersect
+{
+  % (Entering lfigcircleintersect) lfigdebugprint
+  15 dict begin
+    /theta exch def
+    /y1    exch def
+    /x1    exch def
+    /r     exch def
+    /y0    exch def
+    /x0    exch def
+
+    % if sin(theta) = 0 then line is horizontal and y must be y1
+    theta sin abs 0.00001 lt
+    { 
+      /a 1 def
+      /b -2 x0 mul def
+      /c x0 dup mul y1 y0 sub dup mul add r dup mul sub def
+      a b c lfigqroots dup
+      0 eq
+      { pop
+	0
+      }
+      { 1 eq
+	{ y1 1
+	}
+	{ y1 exch y1 2
+	} ifelse
+      } ifelse
+    }
+    {
+      /ct theta cos theta sin div def
+      /a ct ct mul 1 add def
+      /b ct x1 x0 sub mul y1 add y0 sub 2 mul def
+      /c x1 x0 sub dup mul y1 y0 sub dup mul add r dup mul sub def
+      a b c lfigqroots dup
+      0 eq
+      { pop
+	0
+      }
+      { 1 eq
+	{ y1 add /yb exch def
+	  yb y1 sub ct mul x1 add /xb exch def
+	  xb yb 1
+	}
+	{ y1 add /ya exch def
+	  ya y1 sub ct mul x1 add /xa exch def
+	  y1 add /yb exch def
+	  yb y1 sub ct mul x1 add /xb exch def
+	  xa ya xb yb 2
+	} ifelse
+      } ifelse
+    } ifelse
+  end
+  % (Leaving lfigcircleintersect) lfigdebugprint
+} def
+
+% add CIRCUM operator with this body:  <array> lfigcircumdef -
+/lfigcircumdef
+{   % (Entering lfigcircumdef) lfigdebugprint
+    /CIRCUM exch cvx
+    currentdict end
+    3 1 roll
+    % currentdict length currentdict maxlength lt
+    % { def }
+    % { exec moveto (too many labels) show stop }
+    % ifelse
+    def
+    begin
+    % (Leaving lfigcircumdef) lfigdebugprint
+} def
+
+end
+%%EndResource
diff --git a/include/fontdefs b/include/fontdefs
new file mode 100644
index 0000000..0001b97
--- /dev/null
+++ b/include/fontdefs
@@ -0,0 +1,156 @@
+##################################################################################################################
+#                                                                                                                #
+#  Font definitions.  Use a very wide window to see them clearly.                                                #
+#                                                                                                                #
+#       Lout font       Lout font         PostScript         PostScript font metrics    Lout character Recode/   #
+#       family name     face name         font name          (formerly .AFM) file name  mapping file   NoRecode  #
+#                                                                                                                #
+##################################################################################################################
+
+
+fontdef	AvantGarde	Base		{ AvantGarde-Medium		AG-Md		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	Slope		{ AvantGarde-MediumObl		AG-MdO		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	Bold		{ AvantGarde-Bold		AG-Bd		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	BoldSlope	{ AvantGarde-BoldObl		AG-BdO		LtLatin1.LCM	Recode	 }
+
+fontdef	AvantGarde	Bold		{ AvantGarde-Bold		AG-Bd		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	BoldObl		{ AvantGarde-BoldObl		AG-BdO		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	Book		{ AvantGarde-Book		AG-Bk		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	BookOblique	{ AvantGarde-BookOblique	AG-BkO		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	CondBold	{ AvantGarde-CondBold		AG-CnBd		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	CondBook	{ AvantGarde-CondBook		AG-CnBk		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	CondDemi	{ AvantGarde-CondDemi		AG-CnDm		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	CondMedium	{ AvantGarde-CondMedium		AG-CnMd		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	Demi		{ AvantGarde-Demi		AG-Dm		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	DemiOblique	{ AvantGarde-DemiOblique	AG-DmO		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	ExtraLight	{ AvantGarde-ExtraLight		AG-ExLt		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	ExtraLightObl	{ AvantGarde-ExtraLightObl	AG-ExLtO	LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	Medium		{ AvantGarde-Medium		AG-Md		LtLatin1.LCM	Recode	 }
+fontdef	AvantGarde	MediumObl	{ AvantGarde-MediumObl		AG-MdO		LtLatin1.LCM	Recode	 }
+
+
+fontdef	Bookman		Base		{ Bookman-Medium		Bk-Md		LtLatin1.LCM	Recode	 }
+fontdef	Bookman		Slope		{ Bookman-MediumItalic		Bk-MdIt		LtLatin1.LCM	Recode	 }
+fontdef	Bookman		Bold		{ Bookman-Bold			Bk-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Bookman		BoldSlope	{ Bookman-BoldItalic		Bk-BdIt		LtLatin1.LCM	Recode	 }
+
+fontdef	Bookman		Bold		{ Bookman-Bold			Bk-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Bookman		BoldItalic	{ Bookman-BoldItalic		Bk-BdIt		LtLatin1.LCM	Recode	 }
+fontdef	Bookman		Demi		{ Bookman-Demi			Bk-Dm		LtLatin1.LCM	Recode	 }
+fontdef	Bookman		DemiItalic	{ Bookman-DemiItalic		Bk-DmIt		LtLatin1.LCM	Recode	 }
+fontdef	Bookman		Light		{ Bookman-Light			Bk-Lt		LtLatin1.LCM	Recode	 }
+fontdef	Bookman		LightItalic	{ Bookman-LightItalic		Bk-LtIt		LtLatin1.LCM	Recode	 }
+fontdef	Bookman		Medium		{ Bookman-Medium		Bk-Md		LtLatin1.LCM	Recode	 }
+fontdef	Bookman		MediumItalic	{ Bookman-MediumItalic		Bk-MdIt		LtLatin1.LCM	Recode	 }
+
+
+fontdef	Courier		Base		{ Courier			Cr		LtLatin1.LCM	Recode	 }
+fontdef	Courier		Slope		{ Courier-Oblique		Cr-O		LtLatin1.LCM	Recode	 }
+fontdef	Courier		Bold		{ Courier-Bold			Cr-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Courier		BoldSlope	{ Courier-BoldOblique		Cr-BdO		LtLatin1.LCM	Recode	 }
+
+fontdef	Courier		Base		{ Courier			Cr		LtLatin1.LCM	Recode	 }
+fontdef	Courier		Bold		{ Courier-Bold			Cr-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Courier		BoldOblique	{ Courier-BoldOblique		Cr-BdO		LtLatin1.LCM	Recode	 }
+fontdef	Courier		Oblique		{ Courier-Oblique		Cr-O		LtLatin1.LCM	Recode	 }
+
+
+fontdef	Helvetica	Base		{ Helvetica			He		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	Slope		{ Helvetica-Oblique		He-O		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	Bold		{ Helvetica-Bold		He-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	BoldSlope	{ Helvetica-BoldOblique		He-BdO		LtLatin1.LCM	Recode	 }
+
+fontdef	Helvetica	Base		{ Helvetica			He		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	Black		{ Helvetica-Black		He-Bl		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	BlackOblique	{ Helvetica-BlackOblique	He-BlO		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	Bold		{ Helvetica-Bold		He-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	BoldOblique	{ Helvetica-BoldOblique		He-BdO		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	Compressed	{ Helvetica-Compressed		He-Cm		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	Cond		{ Helvetica-Condensed		He-Cn		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	CondBlack	{ Helvetica-Condensed-Black	He-CnBl		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	CondBlackObl	{ Helvetica-Condensed-BlackObl	He-CnBlO	LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	CondBold	{ Helvetica-Condensed-Bold	He-CnBd		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	CondBoldObl	{ Helvetica-Condensed-BoldObl	He-CnBdO	LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	CondLight	{ Helvetica-Condensed-Light	He-CnLi		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	CondLightObl	{ Helvetica-Condensed-LightObl	He-CnLiO	LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	CondOblique	{ Helvetica-Condensed-Oblique	He-CnO		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	ExtraCompressed	{ Helvetica-ExtraCompressed	He-ExtC		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	Light		{ Helvetica-Light		He-Lt		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	LightOblique	{ Helvetica-LightOblique	He-LtO		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	Narrow		{ Helvetica-Narrow		He-Nr		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	NarrowBold	{ Helvetica-Narrow-Bold		He-NrBd		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	NarrowBoldObl	{ Helvetica-Narrow-BoldOblique	He-NrBdO	LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	NarrowObl	{ Helvetica-Narrow-Oblique	He-NrO		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	Oblique		{ Helvetica-Oblique		He-O		LtLatin1.LCM	Recode	 }
+fontdef	Helvetica	UltraCompressed	{ Helvetica-UltraCompressed	He-UlCm		LtLatin1.LCM	Recode	 }
+
+
+fontdef	Schoolbook	Base		{ NewCenturySchlbk-Roman	NCS-Rm		LtLatin1.LCM	Recode	 }
+fontdef	Schoolbook	Slope		{ NewCenturySchlbk-Italic	NCS-It		LtLatin1.LCM	Recode	 }
+fontdef	Schoolbook	Bold		{ NewCenturySchlbk-Bold		NCS-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Schoolbook	BoldSlope	{ NewCenturySchlbk-BoldItalic	NCS-BdIt	LtLatin1.LCM	Recode	 }
+
+fontdef	Schoolbook	Bold		{ NewCenturySchlbk-Bold		NCS-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Schoolbook	BoldItalic	{ NewCenturySchlbk-BoldItalic	NCS-BdIt	LtLatin1.LCM	Recode	 }
+fontdef	Schoolbook	Italic		{ NewCenturySchlbk-Italic	NCS-It		LtLatin1.LCM	Recode	 }
+fontdef	Schoolbook	Roman		{ NewCenturySchlbk-Roman	NCS-Rm		LtLatin1.LCM	Recode	 }
+
+
+fontdef	Palatino	Base		{ Palatino-Roman		Pa-Rm		LtLatin1.LCM	Recode	 }
+fontdef	Palatino	Slope		{ Palatino-Italic		Pa-It		LtLatin1.LCM	Recode	 }
+fontdef	Palatino	Bold		{ Palatino-Bold			Pa-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Palatino	BoldSlope	{ Palatino-BoldItalic		Pa-BdIt		LtLatin1.LCM	Recode	 }
+
+fontdef	Palatino	Bold		{ Palatino-Bold			Pa-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Palatino	BoldItalic	{ Palatino-BoldItalic		Pa-BdIt		LtLatin1.LCM	Recode	 }
+fontdef	Palatino	BoldItalicOsF	{ Palatino-BoldItalicOsF	Pa-BdItF	LtLatin1.LCM	Recode	 }
+fontdef	Palatino	BoldOsF		{ Palatino-BoldOsF		Pa-BdF		LtLatin1.LCM	Recode	 }
+fontdef	Palatino	Italic		{ Palatino-Italic		Pa-It		LtLatin1.LCM	Recode	 }
+fontdef	Palatino	ItalicOsF	{ Palatino-ItalicOsF		Pa-ItF		LtLatin1.LCM	Recode	 }
+fontdef	Palatino	Roman		{ Palatino-Roman		Pa-Rm		LtLatin1.LCM	Recode	 }
+fontdef	Palatino	SC		{ Palatino-SC			Pa-SC		LtLatin1.LCM	Recode	 }
+
+
+fontdef	Symbol		Base		{ Symbol			Symbol		Symb.LCM	NoRecode }
+fontdef	Symbol		Slope		{ Symbol			Symbol		Symb.LCM	NoRecode }
+fontdef	Symbol		Bold		{ Symbol			Symbol		Symb.LCM	NoRecode }
+fontdef	Symbol		BoldSlope	{ Symbol			Symbol		Symb.LCM	NoRecode }
+
+
+fontdef	Times		Base		{ Times-Roman			Ti-Rm		LtLatin1.LCM	Recode	 }
+fontdef	Times		Slope		{ Times-Italic			Ti-It		LtLatin1.LCM	Recode	 }
+fontdef	Times		Bold		{ Times-Bold			Ti-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Times		BoldSlope	{ Times-BoldItalic		Ti-BdIt		LtLatin1.LCM	Recode	 }
+
+fontdef	Times		Bold		{ Times-Bold			Ti-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Times		BoldItalic	{ Times-BoldItalic		Ti-BdIt		LtLatin1.LCM	Recode	 }
+fontdef	Times		BoldItalicOsF	{ Times-BoldItalicOsF		Ti-BdItF	LtLatin1.LCM	Recode	 }
+fontdef	Times		BoldSC		{ Times-BoldSC			Ti-BdSC		LtLatin1.LCM	Recode	 }
+fontdef	Times		ExtraBold	{ Times-ExtraBold		Ti-ExBd		LtLatin1.LCM	Recode	 }
+fontdef	Times		Italic		{ Times-Italic			Ti-It		LtLatin1.LCM	Recode	 }
+fontdef	Times		ItalicOsF	{ Times-ItalicOsF		Ti-ItF		LtLatin1.LCM	Recode	 }
+fontdef	Times		Roman		{ Times-Roman			Ti-Rm		LtLatin1.LCM	Recode	 }
+fontdef	Times		RomanSC		{ Times-RomanSC			Ti-RmSC		LtLatin1.LCM	Recode	 }
+fontdef	Times		Semibold	{ Times-Semibold		Ti-Sm		LtLatin1.LCM	Recode	 }
+fontdef	Times		SemiboldItalic	{ Times-SemiboldItalic		Ti-SmIt		LtLatin1.LCM	Recode	 }
+
+
+fontdef	Chancery	Base		{ ZapfChancery-Roman		ZC-Rm		LtLatin1.LCM	Recode	 }
+fontdef	Chancery	Slope		{ ZapfChancery-Italic		ZC-It		LtLatin1.LCM	Recode	 }
+fontdef	Chancery	Bold		{ ZapfChancery-Bold		ZC-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Chancery	BoldSlope	{ ZapfChancery-MediumItalic	ZC-MdIt		LtLatin1.LCM	Recode	 }
+
+fontdef	Chancery	Roman		{ ZapfChancery-Roman		ZC-Rm		LtLatin1.LCM	Recode	 }
+fontdef	Chancery	Bold		{ ZapfChancery-Bold		ZC-Bd		LtLatin1.LCM	Recode	 }
+fontdef	Chancery	Italic		{ ZapfChancery-Italic		ZC-It		LtLatin1.LCM	Recode	 }
+fontdef	Chancery	Light		{ ZapfChancery-Light		ZC-Lt		LtLatin1.LCM	Recode	 }
+fontdef	Chancery	Demi		{ ZapfChancery-Demi		ZC-Dm		LtLatin1.LCM	Recode	 }
+fontdef	Chancery	LightItalic	{ ZapfChancery-LightItalic	ZC-LtIt		LtLatin1.LCM	Recode	 }
+fontdef	Chancery	MediumItalic	{ ZapfChancery-MediumItalic	ZC-MdIt		LtLatin1.LCM	Recode	 }
+
+
+fontdef	Dingbats	Base		{ ZapfDingbats			ZD		Ding.LCM	NoRecode }
+fontdef	Dingbats	Slope		{ ZapfDingbats			ZD		Ding.LCM	NoRecode }
+fontdef	Dingbats	Bold		{ ZapfDingbats			ZD		Ding.LCM	NoRecode }
+fontdef	Dingbats	BoldSlope	{ ZapfDingbats			ZD		Ding.LCM	NoRecode }
+
diff --git a/include/graph b/include/graph
new file mode 100644
index 0000000..f346317
--- /dev/null
+++ b/include/graph
@@ -0,0 +1,27 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for graph drawing                                         #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  The @SysInclude { graphf } line                                            #
+#                                                                             #
+#  This line causes Lout to read the definitions for graphs, and should       #
+#  not be touched.                                                            #
+#                                                                             #
+###############################################################################
+
+@SysInclude { graphf }
+
+
+###############################################################################
+#                                                                             #
+#  This package does not offer default options that can be changed.           #
+#                                                                             #
+###############################################################################
diff --git a/include/graphf b/include/graphf
new file mode 100644
index 0000000..dfd69df
--- /dev/null
+++ b/include/graphf
@@ -0,0 +1,1084 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @Graph package for drawing graphs (Version 1.0)                       #
+#                                                                             #
+#  Version 1.0 by Jeffrey H. Kingston, December 1993.                         #
+#                                                                             #
+#  This package draws graphs, the statistical kind not the graph-theoretical  #
+#  kind.  See the User's Guide (Advanced Graphics) for user info.             #
+#                                                                             #
+###############################################################################
+
+@SysPrependGraphic { graphf.lpg }
+@SysInclude { graphf.etc }
+
+def @GraphObj
+    left p
+    named margin { 0c }
+    named adj { 0 0 }
+    right x
+{
+  @BackEnd @Case {
+    PostScript @Yield {
+	@Null &  # kills previous white space
+	@HContract @VContract {
+	  //0io ||0io @HContract @VContract 
+	  { p "trpoint translate" adj "translate gsave" // "grestore" }
+	  @Graphic { //margin ||margin x ||margin //margin }
+	  ||0io //0io
+	}
+    }
+# VT: PDF does nothing
+    PDF @Yield {
+	@Null &  # kills previous white space
+	@HContract @VContract {
+	  //0io ||0io @HContract @VContract 
+	  { "% @GraphObj UNIMPLEMENTED" }
+	  @Graphic { //margin ||margin x ||margin //margin }
+	  ||0io //0io
+	}
+    }
+  }
+}
+
+def @GraphCross
+    named symbolsize
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 0.15 ft }
+{
+  @BackEnd @Case {
+
+    PostScript @Yield {
+	@HContract @VContract
+	{ "newpath 0 0 moveto xsize ysize lineto 0 ysize moveto"
+	  "xsize 0 lineto [] 0 setdash stroke"
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+    PDF @Yield {
+	@HContract @VContract
+	{"n [] 0 d 0 0 m __xsize __ysize l 0 __ysize m __xsize 0 l S"}	# uses S because PostScript version does NOT use closepath
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+  }
+}
+
+def @GraphPlus
+    named symbolsize
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 0.15 ft }
+{
+  @BackEnd @Case {
+
+    PostScript @Yield {
+	@HContract @VContract
+	{ "newpath xmark 0 moveto xmark ysize lineto 0 ymark moveto"
+	  "xsize ymark lineto [] 0 setdash stroke"
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+    PDF @Yield {
+	@HContract @VContract
+	{"n [] 0 d __xmark 0 m __xmark __ysize l 0 __ymark m __xsize __ymark l S"}	# uses S because PostScript version does NOT use closepath
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+  }
+}
+
+def @GraphSquare
+    named symbolsize
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 0.15 ft }
+{
+  @BackEnd @Case {
+
+    PostScript @Yield {
+	@HContract @VContract
+	{ "newpath 0 0 moveto xsize 0 lineto xsize ysize lineto"
+	  "0 ysize lineto closepath [] 0 setdash stroke"
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+    PDF @Yield {
+	@HContract @VContract
+	{"n [] 0 d 0 0 __xsize __ysize re s"}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+  }
+}
+
+def @GraphFilledSquare
+    named symbolsize
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 0.15 ft }
+{
+  @BackEnd @Case {
+
+    PostScript @Yield {
+	@HContract @VContract
+	{ "newpath 0 0 moveto xsize 0 lineto xsize ysize lineto"
+	  "0 ysize lineto closepath gsave [] 0 setdash stroke grestore fill"
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+    PDF @Yield {
+	@HContract @VContract
+	{"n [] 0 d 0 0 __xsize __ysize re b"}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+  }
+}
+
+def @GraphDiamond
+    named symbolsize
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 0.15 ft }
+{
+  @BackEnd @Case {
+
+    PostScript @Yield {
+	@HContract @VContract
+	{ "newpath 0 ymark moveto xmark 0 lineto xsize ymark lineto"
+	  "xmark ysize lineto closepath [] 0 setdash stroke"
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+    PDF @Yield {
+	@HContract @VContract
+	{"n [] 0 d 0 __ymark m __xmark 0 l __xsize __ymark l __xmark __ysize l s"}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+  }
+}
+
+def @GraphFilledDiamond
+    named symbolsize
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 0.15 ft }
+{
+  @BackEnd @Case {
+
+    PostScript @Yield {
+	@HContract @VContract
+	{ "newpath 0 ymark moveto xmark 0 lineto xsize ymark lineto"
+	  "xmark ysize lineto closepath gsave [] 0 setdash stroke grestore fill"
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+    PDF @Yield {
+	@HContract @VContract
+	{"n [] 0 d 0 __ymark m __xmark 0 l __xsize __ymark l __xmark __ysize l b"
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+  }
+}
+
+def @GraphCircle
+    named symbolsize
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 0.15 ft }
+{
+  @BackEnd @Case {
+
+    PostScript @Yield {
+	@HContract @VContract
+	{ "newpath xmark ymark xmark 0 360 arc"
+	  "[] 0 setdash stroke"
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+    PDF @Yield {
+	@HContract @VContract
+#
+# draw a circle whose centre is at (xmark, ymark) and whose radius is xmark units;
+#
+# for curveto to work, we need to calculate the control points of the Bezier curve
+# as well as move the pen to the correct initial point. The circle is drawn as two
+# arcs of 180 degrees
+#
+#   pt0 = (xmark + xmark, ymark)
+#   pt1 = (xmark + xmark, ymark + 4/3 * xmark)
+#   pt2 = (0, ymark + 4/3 * xmark)
+#   pt3 = (0, ymark)
+#
+#   pt0 = (0, ymark)
+#   pt1 = (0, ymark - 4/3 * xmark)
+#   pt2 = (xmark + xmark, ymark - 4/3 * xmark)
+#   pt3 = (xmark + xmark, ymark)
+#
+	{"n [] 0 d"
+	 "__mul(2, __xmark) __ymark m"
+	 "__mul(2, __xmark) __add(__ymark, __div(__mul(4, __xmark), 3))"	# pt1
+	 "0 __add(__ymark, __div(__mul(4, __xmark), 3))"			# pt2
+	 "0 __ymark c"									# pt3
+
+	 "0 __sub(__ymark, __div(__mul(4, __xmark), 3))"			# pt1
+	 "__mul(2, __xmark) __sub(__ymark, __div(__mul(4, __xmark), 3))"	# pt2
+	 "__mul(2, __xmark) __ymark c S"						# pt3
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+  }
+}
+
+def @GraphFilledCircle
+    named symbolsize
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 0.15 ft }
+{
+  @BackEnd @Case {
+    PostScript @Yield {
+	@HContract @VContract
+	{ "newpath xmark ymark xmark 0 360 arc"
+	  "gsave [] 0 setdash stroke grestore fill"
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+    PDF @Yield {
+	@HContract @VContract
+#
+# draw a filled circle whose centre is at (xmark, ymark) and whose radius is xmark units;
+#
+# for curveto to work, we need to calculate the control points of the Bezier curve
+# as well as move the pen to the correct initial point. The circle is drawn as two
+# arcs of 180 degrees
+#
+#   pt0 = (xmark + xmark, ymark)
+#   pt1 = (xmark + xmark, ymark + 4/3 * xmark)
+#   pt2 = (0, ymark + 4/3 * xmark)
+#   pt3 = (0, ymark)
+#
+#   pt0 = (0, ymark)
+#   pt1 = (0, ymark - 4/3 * xmark)
+#   pt2 = (xmark + xmark, ymark - 4/3 * xmark)
+#   pt3 = (xmark + xmark, ymark)
+#
+# Note: this is not a strict translation because there is a setdash bracketed by
+#   gsave/grestore in the above PostScript but there is no closepath before it;
+#   but in PDF, it is not possible to execute a setdash within a path definition.
+#
+	{"n [] 0 d"
+	 "__mul(2, __xmark) __ymark m"
+	 "__mul(2, __xmark) __add(__ymark, __div(__mul(4, __xmark), 3))"	# pt1
+	 "0 __add(__ymark, __div(__mul(4, __xmark), 3))"			# pt2
+	 "0 __ymark c"									# pt3
+
+	 "0 __sub(__ymark, __div(__mul(4, __xmark), 3))"			# pt1
+	 "__mul(2, __xmark) __sub(__ymark, __div(__mul(4, __xmark), 3))"	# pt2
+	 "__mul(2, __xmark) __ymark c b"						# pt3
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+  }
+}
+
+def @GraphTriangle
+    named symbolsize
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 0.15 ft }
+{
+  @BackEnd @Case {
+
+    PostScript @Yield {
+	@HContract @VContract
+	{ "newpath 0 0 moveto xsize 0 lineto xmark ysize 1.25 mul lineto"
+	  "closepath [] 0 setdash stroke"
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+    PDF @Yield {
+	@HContract @VContract
+	{"n [] 0 d 0 0 m __xsize 0 l __xmark __mul(__ysize, 1.25) l s"}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+  }
+}
+
+def @GraphFilledTriangle
+    named symbolsize
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 0.15 ft }
+{
+  @BackEnd @Case {
+
+    PostScript @Yield {
+	@HContract @VContract
+	{ "newpath 0 0 moveto xsize 0 lineto xmark ysize 1.25 mul lineto"
+	  "closepath gsave [] 0 setdash stroke grestore fill"
+	}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+    PDF @Yield {
+	@HContract @VContract
+	{"n [] 0 d 0 0 m __xsize 0 l __xmark __mul(__ysize, 1.25) l h b"}
+	@Graphic
+	{symbolsize @High symbolsize @Wide ^| symbolsize @Wide ^/ symbolsize @High}
+    }
+
+  }
+}
+
+def @GraphNoLine
+    named dashlength { 0.2 ft }
+    named linewidth  { "currentlinewidth" }
+    named length
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 1.0 ft }
+{
+    length @Wide {}
+}
+
+def @GraphSolid
+    named dashlength { 0.2 ft }
+    named linewidth  { "currentlinewidth" }
+    named length
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 1.0 ft }
+{
+  @BackEnd @Case {
+    PostScript @Yield {
+	@HContract @VContract
+	{ "xsize 0 lgraphdict begin newpath 0 0 moveto lineto"
+	   "/linewidth" linewidth "def xsize" dashlength "solid end"
+	} @Graphic { length @Wide }
+    }
+# VT: PDF does nothing
+    PDF @Yield {
+	@HContract @VContract
+      { "% @GraphSolid UNIMPLEMENTED" } @Graphic { length @Wide }
+    }
+  }
+}
+
+def @GraphDashed
+    named dashlength { 0.2 ft }
+    named linewidth  { "currentlinewidth" }
+    named length
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 1.0 ft }
+{
+  @BackEnd @Case {
+    PostScript @Yield {
+	@HContract @VContract
+	{ "xsize 0 lgraphdict begin newpath 0 0 moveto lineto"
+	   "/linewidth" linewidth "def xsize" dashlength "dashed end"
+	} @Graphic { length @Wide }
+    }
+# VT: PDF does nothing
+    PDF @Yield {
+	@HContract @VContract
+      { "% @GraphDashed UNIMPLEMENTED" } @Graphic { length @Wide }
+    }
+  }
+}
+
+def @GraphDotted
+    named dashlength { 0.2 ft }
+    named linewidth  { "currentlinewidth" }
+    named length
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+    { 1.0 ft }
+{
+  @BackEnd @Case {
+    PostScript @Yield {
+	@HContract @VContract
+	{ "xsize 0 lgraphdict begin newpath 0 0 moveto lineto"
+	   "/linewidth" linewidth "def xsize" dashlength "dotted end"
+	} @Graphic { length @Wide }
+    }
+# VT: PDF does nothing
+    PDF @Yield {
+	@HContract @VContract
+      { "% @GraphDotted UNIMPLEMENTED" } @Graphic { length @Wide }
+    }
+  }
+}
+
+
+export @Data
+def @Graph
+    named save         { no       }
+    named style        { frame    }
+    named width
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+		       { 6.0 cm   }
+    named height
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+		       { 4.0 cm   }
+    named xextra       { "none"   }
+    named yextra       { "none"   }
+    named xdecreasing  { no       }
+    named ydecreasing  { no       }
+    named leftcaption  {          }
+    named rightcaption {          }
+    named abovecaption {          }
+    named belowcaption {          }
+    named leftgap
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+		       { 1.5 cm   }
+    named rightgap
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+		       { 0.5 cm   }
+    named abovegap
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+		       { 0.5 cm   }
+    named belowgap
+	named cm left x { x"c" }
+	named in left x { x"i" }
+	named em left x { x"m" }
+	named pt left x { x"p" }
+	named ft left x { x"f" }
+	named sp left x { x"s" }
+	named vs left x { x"v" }
+		       { 0.5 cm   }
+    named hidecaptions { yes       }
+    named objects
+	named @NW
+	    import @GraphMath named at { 0 0 }
+	    named margin
+		named cm left x { x"c" }
+		named in left x { x"i" }
+		named em left x { x"m" }
+		named pt left x { x"p" }
+		named ft left x { x"f" }
+		named sp left x { x"s" }
+		named vs left x { x"v" }
+	    { 0.3 ft }
+	    right x
+	{ at @GraphObj adj { "xsize neg ysize" } margin { margin } x }
+	named @SW
+	    import @GraphMath named at { 0 0 }
+	    named margin
+		named cm left x { x"c" }
+		named in left x { x"i" }
+		named em left x { x"m" }
+		named pt left x { x"p" }
+		named ft left x { x"f" }
+		named sp left x { x"s" }
+		named vs left x { x"v" }
+	    { 0.3 ft }
+	    right x
+	{ at @GraphObj adj { "xsize neg 0" } margin { margin } x }
+	named @SE
+	    import @GraphMath named at { 0 0 }
+	    named margin
+		named cm left x { x"c" }
+		named in left x { x"i" }
+		named em left x { x"m" }
+		named pt left x { x"p" }
+		named ft left x { x"f" }
+		named sp left x { x"s" }
+		named vs left x { x"v" }
+	    { 0.3 ft }
+	    right x
+	{ at @GraphObj adj { "0 0" } margin { margin } x }
+	named @NE
+	    import @GraphMath named at { 0 0 }
+	    named margin
+		named cm left x { x"c" }
+		named in left x { x"i" }
+		named em left x { x"m" }
+		named pt left x { x"p" }
+		named ft left x { x"f" }
+		named sp left x { x"s" }
+		named vs left x { x"v" }
+	    { 0.3 ft }
+	    right x
+	{ at @GraphObj adj { "0 ysize" } margin { margin } x }
+	named @W
+	    import @GraphMath named at { 0 0 }
+	    named margin
+		named cm left x { x"c" }
+		named in left x { x"i" }
+		named em left x { x"m" }
+		named pt left x { x"p" }
+		named ft left x { x"f" }
+		named sp left x { x"s" }
+		named vs left x { x"v" }
+	    { 0.3 ft }
+	    right x
+	{ at @GraphObj adj { "xsize neg ysize 2 div" } margin { margin } x }
+	named @S
+	    import @GraphMath named at { 0 0 }
+	    named margin
+		named cm left x { x"c" }
+		named in left x { x"i" }
+		named em left x { x"m" }
+		named pt left x { x"p" }
+		named ft left x { x"f" }
+		named sp left x { x"s" }
+		named vs left x { x"v" }
+	    { 0.3 ft }
+	    right x
+	{ at @GraphObj adj { "xsize neg 2 div 0" } margin { margin } x }
+	named @E
+	    import @GraphMath named at { 0 0 }
+	    named margin
+		named cm left x { x"c" }
+		named in left x { x"i" }
+		named em left x { x"m" }
+		named pt left x { x"p" }
+		named ft left x { x"f" }
+		named sp left x { x"s" }
+		named vs left x { x"v" }
+	    { 0.3 ft }
+	    right x
+	{ at @GraphObj adj { "0 ysize 2 div" } margin { margin } x }
+	named @N
+	    import @GraphMath named at { 0 0 }
+	    named margin
+		named cm left x { x"c" }
+		named in left x { x"i" }
+		named em left x { x"m" }
+		named pt left x { x"p" }
+		named ft left x { x"f" }
+		named sp left x { x"s" }
+		named vs left x { x"v" }
+	    { 0.3 ft }
+	    right x
+	{ at @GraphObj adj { "xsize neg 2 div ysize" } margin { margin } x }
+	named @CTR
+	    import @GraphMath named at { 0 0 }
+	    named margin
+		named cm left x { x"c" }
+		named in left x { x"i" }
+		named em left x { x"m" }
+		named pt left x { x"p" }
+		named ft left x { x"f" }
+		named sp left x { x"s" }
+		named vs left x { x"v" }
+	    { 0.3 ft }
+	    right x
+	{ at @GraphObj adj { "xsize neg 2 div ysize 2 div" } margin {margin} x }
+		       {}
+    named xorigin  named none { "false" }           { none           }
+    named yorigin  named none { "false" }           { none           }
+    named xlog     named none { "0" }               { none           }
+    named ylog     named none { "0" }               { none           }
+    named points   named none { "none" }            { none           }
+    named pairs    named none { "none" }            { none           }
+    named colour   named none { "none" }            { none           }
+    named color    named none { "none" }            { none           }
+    named paint    named none { "none"  }           { none           }
+    named xmin     named none { "false" }           { none           }
+    named xmax     named none { "false" }           { none           }
+    named ymin     named none { "false" }           { none           }
+    named ymax     named none { "false" }           { none           }
+    named xticksep named none { "0" }               { none           }
+    named yticksep named none { "0" }               { none           }
+    named rticksep named none { "0" }               { none           }
+    import @GraphMath named xticks
+	named none                                  { "false"        }
+	named auto                                  { "false"        }
+	named "@"                                   { " lgen"        }
+	named "^"                                   { "^"            }
+		       { false    }
+    import @GraphMath named yticks
+	named none                                  { "false"        }
+	named auto                                  { "false"        }
+	named "@"                                   { " lgen"        }
+	named "^"                                   { "^"            }
+		       { false    }
+    import @GraphMath named rticks
+	named none                                  { "false"        }
+	named auto                                  { "false"        }
+	named "@"                                   { " lgen"        }
+	named "^"                                   { "^"            }
+		       { }
+    named xticklength                               { 0.5 ft   }
+    named yticklength                               { 0.5 ft   }
+    named rticklength                               { 0.5 ft   }
+    named dataformat                                { xandy    }
+    named dashlength                                { 0.2 ft   }
+    named linewidth				    { "currentlinewidth"   }
+    named symbolsize                                { 0.15 ft  }
+    body @Body
+@Begin
+
+    def @Above
+    {
+	abovecaption @Case {
+	    ""   @Yield {}
+	    else @Yield @OneCol { ||0.5rt clines @Break abovecaption || //abovegap }
+	}
+    }
+
+    def @Below
+    {
+	belowcaption @Case {
+	    ""   @Yield {}
+	    else @Yield @OneCol { //belowgap ||0.5rt clines @Break belowcaption || }
+	}
+    }
+
+    def @Left
+    {
+	leftcaption @Case {
+	    ""   @Yield {}
+	    else @Yield @OneCol @OneRow {
+		 { //0.5rt @OneRow clines @Break leftcaption // } ^||leftgap }
+	}
+    }
+
+    def @Right
+    {
+	rightcaption @Case {
+	    ""   @Yield {}
+	    else @Yield @OneCol @OneRow {
+		 ||rightgap { //0.5rt @OneRow lines @Break rightcaption // } }
+	}
+    }
+
+    def @ZeroWidth
+	right x
+    {
+	hidecaptions @Case {
+	    { No  no  } @Yield x
+	    { Yes yes } @Yield @OneCol { ||0io x ||0io }
+	}
+    }
+
+    def @AddCaptions right x
+    {
+	def belowextra
+	{
+	    xticks @Case {
+		""   @Yield { 0i }
+		else @Yield { 1.7f }
+	    }
+	}
+
+	@HContract @VContract
+	{
+	                       | @Above    |
+	    / @ZeroWidth @Left | &0.5rt x  | @ZeroWidth @Right
+	    /belowextra        | @Below    |
+	}
+    }
+
+    export pi e sqrt abs ceiling floor truncate round cos sin atan exp log rand
+	   "*" "/" idiv mod "-" "-0" "-1" "-2" "-3" "-4" "-5" "-6" "-7" "-8"
+	   "-9" "-." "+" "=" "!=" "<" "<=" ">" ">=" not and xor or
+	   if xloop yloop zloop
+
+    def @Data
+	named points   named none { "none" }            { points     }
+	named pairs    named none { "none" }            { pairs      }
+	named colour   named none { "none" }            { colour     }
+	named color    named none { "none" }            { color      }
+	named paint    named none { "none" }            { paint      }
+	named dashlength                                { dashlength }
+	named linewidth                                 { linewidth  }
+	named symbolsize                                { symbolsize }
+	named dataformat                                { dataformat }
+	body data
+    {
+	def pi                                    {     "3.14159"  }
+	def e                                     {     "2.71828"  }
+	def sqrt     precedence 40        right y {   y "sqrt"     }
+	def abs      precedence 40        right y {   y "abs"      }
+	def ceiling  precedence 40        right y {   y "ceiling"  }
+	def floor    precedence 40        right y {   y "floor"    }
+	def truncate precedence 40        right y {   y "truncate" }
+	def round    precedence 40        right y {   y "round"    }
+	def cos      precedence 40        right y {   y "cos"      }
+	def sin      precedence 40        right y {   y "sin"      }
+	def atan     precedence 39 left x right y { x y "atan"     }
+	def exp      precedence 38 left x right y { x y "exp"      }
+	def log      precedence 37 left x right y { x y "dolog"    }
+	def rand     precedence 36 left x right y { x y "dorand"   }
+	def "*"      precedence 35 left x right y { x y "mul"      }
+	def "/"      precedence 34 left x right y { x y "div"      }
+	def idiv     precedence 34 left x right y { x y "idiv"     }
+	def mod      precedence 34 left x right y { x y "mod"      }
+	def "-"      precedence 33 left x right y
+	{ x @Case { "" @Yield {y "neg"} else @Yield { x y "sub" } }  }
+	def "-0"				    {     "-0"       }
+	def "-1"				    {     "-1"       }
+	def "-2"				    {     "-2"       }
+	def "-3"				    {     "-3"       }
+	def "-4"				    {     "-4"       }
+	def "-5"				    {     "-5"       }
+	def "-6"				    {     "-6"       }
+	def "-7"				    {     "-7"       }
+	def "-8"				    {     "-8"       }
+	def "-9"				    {     "-9"       }
+	def "-."				    {     "-."       }
+	def "+"      precedence 32 left x right y
+	{ x @Case { "" @Yield { y }     else @Yield { x y "add" } }  }
+	def "="      precedence 30 left x right y { x y "eq"       }
+	def "!="     precedence 30 left x right y { x y "ne"       }
+	def "<"      precedence 30 left x right y { x y "lt"       }
+	def "<="     precedence 30 left x right y { x y "le"       }
+	def ">"      precedence 30 left x right y { x y "gt"       }
+	def ">="     precedence 30 left x right y { x y "ge"       }
+	def not      precedence 25        right y {   y "not"      }
+	def and      precedence 24 left x right y { x y "and"      }
+	def xor      precedence 23 left x right y { x y "xor"      }
+	def or       precedence 22 left x right y { x y "or"       }
+	def if
+	    named cond { true }
+	    named then {}
+	    named else {}
+	{ cond "{" then "} {" else "} ifelse" }
+	def xloop
+	    named from { 0 }
+	    named to { 0 }
+	    named by { 1 }
+	    named do named x { "xval" } {}
+	{ from by to "{ /xval exch def" do "} for" }
+	def yloop
+	    named from { 0 }
+	    named to { 0 }
+	    named by { 1 }
+	    named do named y { "yval" } {}
+	{ from by to "{ /yval exch def" do "} for" }
+	def zloop
+	    named from { 0 }
+	    named to { 0 }
+	    named by { 1 }
+	    named do named z { "zval" } {}
+	{ from by to "{ /zval exch def" do "} for" }
+
+	def @IfPt
+	   left no
+	   right yes
+	{
+	    points @Case {
+		none @Yield no
+		else @Yield yes
+	    }
+	}
+
+	def @Points
+	{
+	    points @Case {
+		none            @Yield ""
+		plus            @Yield "plus"
+		cross           @Yield "cross"
+		square          @Yield "square"
+		filledsquare    @Yield "filledsquare"
+		diamond         @Yield "diamond"
+		filleddiamond   @Yield "filleddiamond"
+		circle          @Yield "circle"
+		filledcircle    @Yield "filledcircle"
+		triangle        @Yield "triangle"
+		filledtriangle  @Yield "filledtriangle"
+	    }
+	}
+
+	def @Pairs
+	{
+	  pairs @Case {
+	    none       @Yield {}
+	    solid      @Yield { "linesetup solid"   @IfPt "ilinesetup solid"  }
+	    dashed     @Yield { "linesetup cdashed" @IfPt "ilinesetup dashed" }
+	    dotted     @Yield { "linesetup dotted"  @IfPt "ilinesetup dotted" }
+	    surfacexhisto @Yield { "surfacexhisto" }
+	    surfaceyhisto @Yield { "surfaceyhisto" }
+	    xhisto        @Yield { "xhisto" }
+	    yhisto        @Yield { "yhisto" }
+	    filledxhisto  @Yield { "filledxhisto" }
+	    filledyhisto  @Yield { "filledyhisto" }
+	  }
+	}
+
+        def @DataFormat
+        {
+	    dataformat @Case {
+	        xandy     @Yield xandy
+	        yonly     @Yield yonly
+	        xonly     @Yield xonly
+	    }
+        }
+
+	def @Col
+	{
+	    { colour @Case { "none" @Yield color else @Yield colour } } @Case {
+		none		@Yield	{                         }
+		nochange	@Yield	{                         }
+		darkblue	@Yield	{ 0.0 0.0 0.5 setrgbcolor }
+		blue		@Yield	{ 0.0 0.0 1.0 setrgbcolor }
+		lightblue	@Yield	{ 0.5 0.5 1.0 setrgbcolor }
+		darkgreen	@Yield	{ 0.0 0.5 0.0 setrgbcolor }
+		green		@Yield	{ 0.0 1.0 0.0 setrgbcolor }
+		lightgreen	@Yield	{ 0.5 1.0 0.5 setrgbcolor }
+		darkred		@Yield	{ 0.5 0.0 0.0 setrgbcolor }
+		red		@Yield	{ 1.0 0.0 0.0 setrgbcolor }
+		lightred	@Yield	{ 1.0 0.5 0.5 setrgbcolor }
+		darkcyan	@Yield	{ 0.0 0.5 0.5 setrgbcolor }
+		cyan		@Yield	{ 0.0 1.0 1.0 setrgbcolor }
+		lightcyan	@Yield	{ 0.5 1.0 1.0 setrgbcolor }
+		darkmagenta	@Yield	{ 0.5 0.0 0.5 setrgbcolor }
+		magenta		@Yield	{ 1.0 0.0 1.0 setrgbcolor }
+		lightmagenta	@Yield	{ 1.0 0.5 1.0 setrgbcolor }
+		darkyellow	@Yield	{ 0.5 0.5 0.0 setrgbcolor }
+		yellow		@Yield	{ 1.0 1.0 0.0 setrgbcolor }
+		lightyellow	@Yield	{ 1.0 1.0 0.5 setrgbcolor }
+		darkgray	@Yield	{ 0.2 0.2 0.2 setrgbcolor }
+		gray		@Yield	{ 0.5 0.5 0.5 setrgbcolor }
+		lightgray	@Yield	{ 0.7 0.7 0.7 setrgbcolor }
+		darkgrey	@Yield	{ 0.2 0.2 0.2 setrgbcolor }
+		grey		@Yield	{ 0.5 0.5 0.5 setrgbcolor }
+		lightgrey	@Yield	{ 0.7 0.7 0.7 setrgbcolor }
+		black		@Yield	{ 0.0 0.0 0.0 setrgbcolor }
+		white		@Yield	{ 1.0 1.0 1.0 setrgbcolor }
+	    }
+	}
+
+	def @Paint
+	{
+	    paint @Case {
+	       { none no No } @Yield "false"
+	       { yes Yes } @Yield "true"
+	    }
+	}
+
+       "[ [" data "]" dataformat
+	  "{" @Points "}"
+	  "{" @Pairs "}"
+	  "{ /dashlength" dashlength "def"
+	  "  /linewidth"  linewidth  "def" @Col
+	  "  /symbolsize" symbolsize "def }"
+	  "{" @Paint "}"
+       "]"
+    }
+
+    def @Style
+    {
+	style @Case {
+	    frame    @Yield { "framestyle" }
+	    none     @Yield { "nonestyle"  }
+	    axes     @Yield { "axesstyle"  }
+	}
+    }
+
+    def @XExtra
+    {
+	xextra @Case {
+	    "none" @Yield {
+		style @Case {
+	            frame    @Yield { "0.5 cm" }
+	            none     @Yield { "0"  }
+	            axes     @Yield { "0"  }
+		}
+	    }
+	    else @Yield xextra
+	}
+    }
+
+    def @YExtra
+    {
+	yextra @Case {
+	    "none" @Yield {
+		style @Case {
+	            frame @Yield { "0.5 cm" }
+	            none  @Yield { "0"  }
+	            axes  @Yield { "0"  }
+		}
+	    }
+	    else @Yield yextra
+	}
+    }
+
+    def @XDecreasing
+    {
+	xdecreasing @Case {
+	    { No no } @Yield "false"
+	    { Yes yes } @Yield "true"
+	}
+    }
+
+    def @YDecreasing
+    {
+	ydecreasing @Case {
+	    { No no } @Yield "false"
+	    { Yes yes } @Yield "true"
+	}
+    }
+
+    @AddCaptions width @Wide height @High
+    @BackEnd @Case {
+	PostScript @Yield {
+	    {
+		"grestore"
+		save @Case { { Yes yes } @Yield "save" else @Yield {} }
+		"gsave xsize ysize lgraphdict begin /ysize exch def /xsize exch def"
+		"/alldata [" @Body "] def"
+		xticksep "[" xticks "] 0 alldata" xmin xmax xlog
+		  @XExtra @XDecreasing xorigin xticklength "xset"
+		yticksep "[" yticks "] 1 alldata" ymin ymax ylog
+		  @YExtra @YDecreasing yorigin yticklength "yset"
+
+		rticks @Case {
+
+		  ""   @Yield "norset"
+
+		  else @Yield {
+		    rticksep "[" rticks "] 1 alldata" ymin ymax ylog
+		    @YExtra @YDecreasing yorigin rticklength "rset"
+		  }
+		}
+
+		"rundata" @Style // "end"
+		save @Case { { Yes yes } @Yield "restore" else @Yield {} }
+	    } @Graphic { //1rt objects }
+	}
+	PDF @Yield { {"% @Graph UNIMPLEMENTED"} @Graphic { //1rt objects } }
+    }
+
+@End @Graph                  
diff --git a/include/graphf.etc b/include/graphf.etc
new file mode 100644
index 0000000..3e3a6cb
--- /dev/null
+++ b/include/graphf.etc
@@ -0,0 +1,295 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @GraphMath package for @Graph (Version 1.1)                           #
+#                                                                             #
+#  Version 1.0 by Jeffrey H. Kingston, December 1993.                         #
+#  Version 1.1 by Jeffrey H. Kingston, October 1996.                          #
+#                                                                             #
+#  This package provides mathematics for the @Graph graph drawing package.    #
+#                                                                             #
+###############################################################################
+
+export
+
+    "-0" "-1" "-2" "-3" "-4" "-5" "-6" "-7" "-8" "-9" "-."
+    pi e sqrt abs ceiling floor truncate round cos sin atan
+    exp log rand "*" "/" idiv mod "+" "-"
+    "=" "!=" "<" "<=" ">" ">=" not and xor or
+    if xloop yloop zloop
+
+def @GraphMath
+{
+    def "-0" { "-0" }
+    def "-1" { "-1" }
+    def "-2" { "-2" }
+    def "-3" { "-3" }
+    def "-4" { "-4" }
+    def "-5" { "-5" }
+    def "-6" { "-6" }
+    def "-7" { "-7" }
+    def "-8" { "-8" }
+    def "-9" { "-9" }
+    def "-." { "-." }
+
+    def pi { "3.14159" }
+
+    def e  { "2.71828" }
+
+    def sqrt
+	precedence 40
+	right y
+    {
+	y "sqrt"
+    }
+
+    def abs
+	precedence 40
+	right y
+    {
+	y "abs"
+    }
+
+    def ceiling
+	precedence 40
+	right y
+    {
+	y "ceiling"
+    }
+
+    def floor
+	precedence 40
+	right y
+    {
+	y "floor"
+    }
+
+    def truncate
+	precedence 40
+	right y
+    {
+	y "truncate"
+    }
+
+    def round
+	precedence 40
+	right y
+    {
+	y "round"
+    }
+
+    def cos
+	precedence 40
+	right y
+    {
+	y "cos"
+    }
+
+    def sin
+	precedence 40
+	right y
+    {
+	y "sin"
+    }
+
+    def atan
+	precedence 39
+	left x
+	right y
+    {
+	x y "atan"
+    }
+
+    def exp
+	precedence 38
+	left x
+	right y
+    {
+	x y "exp"
+    }
+
+    def log
+	precedence 37
+	left x
+	right y
+    {
+	x y "dolog"
+    }
+
+    def rand
+	precedence 36
+	left x
+	right y
+    {
+	x y "dorand"
+    }
+
+    def "*"
+	precedence 35
+	left x
+	right y
+    {
+	x y "mul"
+    }
+
+    def "/"
+	precedence 35
+	left x
+	right y
+    {
+	x y "div"
+    }
+
+    def "idiv"
+	precedence 34
+	left x
+	right y
+    {
+	x y "idiv"
+    }
+
+    def "mod"
+	precedence 34
+	left x
+	right y
+    {
+	x y "mod"
+    }
+
+    def "-"
+	precedence 33
+	left x
+	right y
+    {
+	x @Case {
+	    ""   @Yield { y "neg" }
+	    else @Yield { x y "sub" }
+	}
+    }
+
+    def "+"
+	precedence 32
+	left x
+	right y
+    {
+	x @Case {
+	    ""   @Yield { y }
+	    else @Yield { x y "add" }
+	}
+    }
+
+    def "="
+	precedence 30
+	left x
+	right y
+    {
+	x y "eq"
+    }
+
+    def "!="
+	precedence 30
+	left x
+	right y
+    {
+	x y "ne"
+    }
+
+    def "<"
+	precedence 30
+	left x
+	right y
+    {
+	x y "lt"
+    }
+
+    def "<="
+	precedence 30
+	left x
+	right y
+    {
+	x y "le"
+    }
+
+    def ">"
+	precedence 30
+	left x
+	right y
+    {
+	x y "gt"
+    }
+
+    def ">="
+	precedence 30
+	left x
+	right y
+    {
+	x y "ge"
+    }
+
+    def "not"
+	precedence 25
+	right y
+    {
+	y "not"
+    }
+
+    def "and"
+	precedence 24
+	left x
+	right y
+    {
+	x y "and"
+    }
+
+    def "xor"
+	precedence 23
+	left x
+	right y
+    {
+	x y "xor"
+    }
+
+    def "or"
+	precedence 22
+	left x
+	right y
+    {
+	x y "or"
+    }
+
+    def if
+	named cond { true }
+	named then {}
+	named else {}
+    {
+	cond "{" then "} {" else "} ifelse"
+    }
+
+    def xloop
+	named from { 0 }
+	named to { 0 }
+	named by { 1 }
+	named do named x { "xval" } {}
+    {
+	from by to "{ /xval exch def" do "} for"
+    }
+
+    def yloop
+	named from { 0 }
+	named to { 0 }
+	named by { 1 }
+	named do named y { "yval" } {}
+    {
+	from by to "{ /yval exch def" do "} for"
+    }
+
+    def zloop
+	named from { 0 }
+	named to { 0 }
+	named by { 1 }
+	named do named z { "zval" } {}
+    {
+	from by to "{ /zval exch def" do "} for"
+    }
+
+}
diff --git a/include/graphf.lpg b/include/graphf.lpg
new file mode 100644
index 0000000..60447f0
--- /dev/null
+++ b/include/graphf.lpg
@@ -0,0 +1,768 @@
+%%BeginResource: procset LoutGraphPrependGraphic
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                                    %
+%  PostScript @SysPrependGraphic file for @Graph (Version 1.0)       %
+%                                                                    %
+%  Version 1.0 by Jeffrey H. Kingston, December 1993.                %
+%                                                                    %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+errordict begin
+   /handleerror
+   {
+      {  /Times-Roman findfont 8 pt scalefont setfont
+	 0 setgray 4 pt 4 pt moveto
+	 $error /errorname get
+	 dup lgraphdict exch known
+	 { lgraphdict exch get }
+	 { 30 string cvs } ifelse
+	 show
+	 (  Command: ) show
+	 $error /command get 30 string cvs show
+      } stopped {} if
+      showpage stop
+   } def
+end
+
+/lgraphdict 200 dict def
+lgraphdict begin
+
+% error messages
+/dictfull (dictfull error) def
+/dictstackoverflow (dictstackoverflow error) def
+/execstackoverflow (execstackoverflow error:  expression too complex?) def
+/limitcheck (limitcheck error:  graph too complex or too large?) def
+/syntaxerror (syntaxerror error:  syntax error in text of graph?) def
+/typecheck (typecheck error:  syntax error in text of graph?) def
+/undefined (undefined error:  unknown or misspelt symbol?) def
+/rangecheck (rangecheck error:  undefined expression (e.g. divide by zero)?) def
+/VMError (VMError error:  run out of memory?) def
+
+% random number between x and y inclusive: x y dorand num
+/dorand { 1 index sub 1 add rand exch mod add } def
+
+% log to given base: base num dolog num
+/dolog { ln exch ln div } def
+
+% maximum of two numbers:  <num> <num> max <num>
+/max { 2 copy gt { pop } { exch pop } ifelse } def
+
+% add two points:  <point> <point> padd <point>
+/padd { exch 3 1 roll add 3 1 roll add exch } def
+
+% subtract first point from second:  <point> <point> psub <point>
+/psub { 3 2 roll sub 3 1 roll exch sub exch } def
+
+% distance between two points:  <point> <point> distance <length>
+/distance { psub dup mul exch dup mul add sqrt } def
+
+% point at angle and distance:  <point> <length> <angle> atangle <point>
+/atangle { 2 copy cos mul 3 1 roll sin mul padd } def
+
+% angle from one point to another:  <point> <point> angle <angle>
+/angle { psub 2 copy 0 eq exch 0 eq and {pop} {exch atan} ifelse } def
+
+
+% set up for line
+% - linesetup <length> <dashlength>
+/linesetup
+{ newpath
+  xcurr ycurr trpoint xprev yprev trpoint
+  4 copy moveto lineto distance dashlength
+} def
+
+% set up for icon-avoiding line
+% - ilinesetup <length> <dashlength>
+/ilinesetup
+{ newpath
+  xprev yprev trpoint xcurr ycurr trpoint 4 copy
+  4 copy angle symbolsize 1.5 mul exch 4 2 roll pop pop atangle
+  6 2 roll 4 2 roll
+  4 copy angle symbolsize 1.5 mul exch 4 2 roll pop pop atangle 
+  4 copy moveto lineto distance dashlength
+} def
+
+
+% stroke a solid line:  <length> <dashlength> solid -
+/solid
+{ pop pop [] 0 setdash linewidth setlinewidth stroke
+} def
+  
+% stroke a dashed line:   <length> <dashlength> dashed -
+/dashed
+{  2 copy 2 mul le 1 index 0 le or
+   {  exch pop 1 pt max [ exch dup ] 0 setdash }
+   {  dup [ exch 4 2 roll 2 copy div
+      1 sub 2 div ceiling dup 4 1 roll
+      1 add mul sub exch div ] 0 setdash
+   } ifelse linewidth setlinewidth stroke
+} def
+
+% stroke a cdashed line:  <length> <dashlength> cdashed -
+/cdashed
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt max [ exch dup ] dup 0 get 2 div setdash }
+   { dup [ 4 2 roll exch 2 copy exch div
+     2 div ceiling div 1 index sub
+     ] exch 2 div setdash
+   } ifelse linewidth setlinewidth stroke
+} def
+
+% stroke a dotted line:  <length> <dashlength> dotted -
+/dotted
+{  2 copy le 1 index 0 le or
+   { exch pop 1 pt max [ exch 0 exch ] 0 setdash }
+   { 1 index exch div ceiling div 0.99999 mul
+     [ 0 3 2 roll ] 0 setdash
+   } ifelse gsave 1 setlinecap linewidth setlinewidth stroke grestore newpath
+} def
+
+% stroke a noline line:  <length> <dashlength> noline -
+/noline
+{ pop pop
+} def
+
+% stroke a y histogram: - yhisto -
+/yhisto
+{ xprev yleft trpoint yextra sub moveto
+  xprev yprev trpoint lineto
+  xcurr yprev trpoint lineto
+  xcurr yleft trpoint yextra sub lineto 
+  linewidth setlinewidth stroke
+} def
+
+% stroke an x histogram: - xhisto -
+/xhisto
+{ xleft yprev trpoint exch xextra sub exch moveto
+  xcurr yprev trpoint lineto
+  xcurr ycurr trpoint lineto
+  xleft ycurr trpoint exch xextra sub exch lineto 
+  linewidth setlinewidth stroke
+} def
+
+% stroke a surface y histogram: - surfaceyhisto -
+/surfaceyhisto
+{ firstpair
+  { xprev yleft trpoint yextra sub moveto
+    xprev yprev trpoint lineto
+  }
+  { xprev yprev trpoint moveto
+  } ifelse
+  xcurr yprev trpoint lineto
+  lastpair
+  { xcurr yleft trpoint yextra sub lineto 
+  }
+  { xcurr ycurr trpoint lineto
+  } ifelse
+  linewidth setlinewidth stroke
+} def
+
+% stroke a surface x histogram: - surfacexhisto -
+/surfacexhisto
+{ firstpair
+  { xleft yprev trpoint exch xextra sub exch moveto
+  }
+  { xprev yprev trpoint moveto
+  } ifelse
+  xcurr yprev trpoint lineto
+  xcurr ycurr trpoint lineto
+  lastpair
+  { xleft ycurr trpoint exch xextra sub exch lineto 
+  } if
+  linewidth setlinewidth stroke
+} def
+
+% stroke a filled y histogram: - filledyhisto -
+/filledyhisto
+{
+  linewidth setlinewidth
+  xprev yleft trpoint exch currentlinewidth 2 div add exch yextra sub moveto
+  xprev yprev trpoint exch currentlinewidth 2 div add exch lineto
+  xcurr yprev trpoint exch currentlinewidth 2 div sub exch lineto
+  xcurr yleft trpoint exch currentlinewidth 2 div sub exch yextra sub lineto 
+  closepath fill
+} def
+
+% stroke a filled x histogram: - filledxhisto -
+/filledxhisto
+{
+  linewidth setlinewidth
+  xleft yprev trpoint currentlinewidth 2 div add exch xextra sub exch moveto
+  xcurr yprev trpoint currentlinewidth 2 div add lineto
+  xcurr ycurr trpoint currentlinewidth 2 div sub lineto
+  xleft ycurr trpoint currentlinewidth 2 div sub exch xextra sub exch lineto 
+  closepath fill
+} def
+
+
+% cross: show a small cross
+/cross
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg symbolsize neg rmoveto
+  symbolsize 2 mul symbolsize 2 mul rlineto
+  0 symbolsize -2 mul rmoveto
+  symbolsize -2 mul symbolsize 2 mul rlineto
+  [] 0 setdash stroke
+} def
+
+% plus: show a small plus
+/plus
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg 0 rmoveto
+  symbolsize 2 mul 0 rlineto
+  symbolsize neg symbolsize neg rmoveto
+  0 symbolsize 2 mul rlineto
+  [] 0 setdash stroke
+} def
+
+% square: show a small square
+/square
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg symbolsize neg rmoveto
+  symbolsize 2 mul 0 rlineto
+  0 symbolsize 2 mul rlineto
+  symbolsize -2 mul 0 rlineto
+  closepath [] 0 setdash stroke
+} def
+
+% filledsquare: show a small filled square
+/filledsquare
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg symbolsize neg rmoveto
+  symbolsize 2 mul 0 rlineto
+  0 symbolsize 2 mul rlineto
+  symbolsize -2 mul 0 rlineto
+  closepath gsave [] 0 setdash stroke grestore fill
+} def
+
+% diamond: show a small diamond
+/diamond
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg 0 rmoveto
+  symbolsize symbolsize neg rlineto
+  symbolsize symbolsize rlineto
+  symbolsize neg symbolsize rlineto
+  closepath [] 0 setdash stroke
+} def
+
+% filleddiamond: show a small filled diamond
+/filleddiamond
+{ newpath
+  xcurr ycurr trpoint moveto
+  symbolsize neg 0 rmoveto
+  symbolsize symbolsize neg rlineto
+  symbolsize symbolsize rlineto
+  symbolsize neg symbolsize rlineto
+  closepath gsave [] 0 setdash stroke grestore fill
+} def
+
+% circle: show a small circle
+/circle
+{ newpath
+  xcurr ycurr trpoint symbolsize 0 360 arc [] 0 setdash stroke
+} def
+
+% filledcircle: show a small filled circle
+/filledcircle
+{ newpath
+  xcurr ycurr trpoint symbolsize 0 360 arc gsave [] 0 setdash stroke grestore fill
+} def
+
+% triangle: show a small triangle
+/triangle
+{ newpath
+  xcurr ycurr trpoint moveto
+  0 symbolsize 1.5 mul rmoveto
+  symbolsize neg symbolsize -2.5 mul rlineto
+  symbolsize 2 mul 0 rlineto
+  closepath [] 0 setdash stroke
+} def
+
+% filledtriangle: show a small filled triangle
+/filledtriangle
+{ newpath
+  xcurr ycurr trpoint moveto
+  0 symbolsize 1.5 mul rmoveto
+  symbolsize neg symbolsize -2.5 mul rlineto
+  symbolsize 2 mul 0 rlineto
+  closepath gsave [] 0 setdash stroke grestore fill
+} def
+
+
+%plog: like log only with a base, and protected from failing if <= 0
+% base x plog res
+/plog { dup 0 le { pop pop 0 } { ln exch ln div } ifelse } def
+
+% xtr: transform one x value logarithmically if xlog > 1
+% <num> xtr <num>
+/xtr
+{ xlog 1 gt
+  { xlog exch plog
+  } if
+} def
+
+% ytr: transform one y value logarithmically if ylog > 1
+% <num> ytr <num>
+/ytr
+{ ylog 1 gt
+  { ylog exch plog
+  } if
+} def
+
+% % trpoint: transform (x, y) in graph space into (x', y') in print space
+% % x y trpoint x' y'
+% /trpoint
+% { exch xtr trxmin sub trxmax trxmin sub div xwidth mul xextra add
+%   exch ytr trymin sub trymax trymin sub div ywidth mul yextra add
+% } def
+
+
+% trpoint: transform (x, y) in graph space into (x', y') in print space
+% x y trpoint x' y'
+/trpoint
+{ exch xtr xdecr { trxmax exch sub } { trxmin sub } ifelse
+  trxmax trxmin sub div xwidth mul xextra add
+
+  exch ytr ydecr { trymax exch sub } { trymin sub } ifelse
+  trymax trymin sub div ywidth mul yextra add
+} def
+
+
+% yonly: interpolate x values 1, 2, ... into data
+% [ data ] yonly [ newdata ]
+/yonly
+{ dup /tmp exch def
+  length [ exch 1 exch 1 exch
+  { dup tmp exch 1 sub get
+  } for
+  ]
+} def
+
+% xonly: interpolate y values 1, 2, ... into data
+% [ data ] yonly [ newdata ]
+/xonly
+{ dup /tmp exch def
+  length [ exch 1 exch 1 exch
+  { dup tmp exch 1 sub get exch
+  } for
+  ]
+} def
+
+% xandy: no interpolation of x or y values
+% [ data ] xandy [ data ]
+/xandy {} def
+
+
+% expstringwidth: calculate width of string containing optional exponent
+% <string> expstringwidth <width>
+/expstringwidth
+{ (^) search
+  { exch pop stringwidth pop exch stringwidth pop 0.7 mul add }
+  { stringwidth pop }
+  ifelse
+} def
+
+% expstringshow: show string containing optional exponent
+% <string> expstringshow -
+/expstringshow
+{ (^) search
+  { exch pop show 0 0.5 ft rmoveto
+    gsave currentfont 0.7 scalefont setfont show grestore
+  }
+  { show
+  }
+  ifelse
+} def
+
+% concatenate two strings: <string> <string> strconcat <string>
+/strconcat
+{ 2 copy length exch length add string
+  dup 0 4 index putinterval
+  dup 3 index length 3 index putinterval
+  3 1 roll pop pop
+} def
+
+% lgen: generate one label automatically
+% num lgen num string
+/lgen { dup 20 string cvs } def
+
+% loglgen: generate one logarithmic label (with exponent)
+% <base> <exponent> loglgen <string>
+/loglgen
+{ 20 string cvs exch 20 string cvs
+  (^) strconcat exch strconcat
+} def
+
+
+% printxtick: print one x tick
+% xpos printxtick -
+/printxtick
+{ newpath
+  yleft trpoint moveto 0 yextra neg rmoveto
+  0 xticklength neg rlineto [] 0 setdash stroke
+} def
+
+% printxlabel: print one x label
+% (xlabel) xpos printxlabel -
+/printxlabel
+{ yleft trpoint moveto 0 yextra neg rmoveto
+  0 xticklength neg rmoveto 0 0.9 ft neg rmoveto
+  xlog 1 gt { 0 0.3 ft neg rmoveto } if
+  dup expstringwidth -2 div 0 rmoveto expstringshow
+} def
+
+% printytick: print one y tick
+% ypos printytick -
+/printytick
+{ newpath
+  xleft exch trpoint moveto xextra neg 0 rmoveto
+  yticklength neg 0 rlineto [] 0 setdash stroke
+} def
+
+% printylabel: print one y label
+% (ylabel) ypos printylabel -
+/printylabel
+{ xleft exch trpoint moveto xextra neg 0 rmoveto
+  yticklength neg 0 rmoveto -0.3 ft -0.3 ft rmoveto
+  dup expstringwidth neg 0 rmoveto expstringshow
+} def
+
+% printrtick: print one r tick
+% ypos printrtick -
+/printrtick
+{ newpath
+  xright exch trpoint moveto xextra 0 rmoveto
+  rticklength 0 rlineto [] 0 setdash stroke
+} def
+
+% printrlabel: print one r label
+% (rlabel) ypos printrlabel -
+/printrlabel
+{ xright exch trpoint moveto xextra 0 rmoveto
+  rticklength 0 rmoveto  0.3 ft -0.3 ft rmoveto
+  expstringshow
+} def
+
+% printticks: print ticks and labels
+% /tickproc /labelproc [ tickandlabeldata ] min printticks -
+/printticks
+{ /prev exch def
+  { dup type dup dup /integertype eq exch /realtype eq or
+    { pop dup /prev exch def 2 index cvx exec
+    }
+    { /stringtype eq
+      { prev 2 index cvx exec
+      }
+      { pop
+      } ifelse
+    } ifelse
+  } forall
+  pop pop
+} def
+
+
+% printxaxistick: print one x axis tick
+% xpos printxaxistick -
+/printxaxistick
+{ newpath
+  yaxis trpoint moveto 0 xticklength -2 div rmoveto
+  0 xticklength rlineto [] 0 setdash stroke
+} def
+
+% printxaxislabel: print one x axis label
+% (xlabel) xpos printxaxislabel -
+/printxaxislabel
+{ yaxis trpoint moveto
+  0 xticklength -2 div rmoveto 0 0.9 ft neg rmoveto
+  xlog 1 gt { 0 0.3 ft neg rmoveto } if
+  dup expstringwidth -2 div 0 rmoveto expstringshow
+} def
+
+% printyaxistick: print one y axis tick
+% ypos printyaxistick -
+/printyaxistick
+{ newpath
+  xaxis exch trpoint moveto
+  yticklength -2 div 0 rmoveto
+  yticklength 0 rlineto [] 0 setdash stroke
+} def
+
+% printyaxislabel: print one y axis label
+% (ylabel) ypos printyaxislabel -
+/printyaxislabel
+{ xaxis exch trpoint moveto
+  yticklength -2 div 0 rmoveto -0.3 ft -0.3 ft rmoveto
+  dup expstringwidth neg 0 rmoveto expstringshow
+} def
+
+
+% <val> minmax -
+% perform minv := min(minv, val); maxv := max(maxv, val)
+% allowing for the possibility of minv, maxv, val being false (undefined)
+/minmax
+{ dup false eq
+  { pop }
+  { minv false eq
+    { dup /minv exch def /maxv exch def }
+    { dup minv lt
+      { /minv exch def }
+      { dup maxv gt
+	{ /maxv exch def }
+	{ pop }
+	ifelse
+      } ifelse
+    } ifelse
+  } ifelse
+} def
+
+% <ticks> ticksundef <ticks> <bool>
+% returns true iff the ticks array is undefined (one false entry)
+/ticksundef
+{ dup length 1 eq
+  { dup 0 get false eq
+  }
+  { false }
+  ifelse
+} def
+
+% <number> integral <boolean>
+% true if the number has an integral value
+/integral { dup round eq } def
+
+% ticksep ticks xory alldata minval maxval axis base ticksandlimits ticks min max base
+% ticksandlimits: sort out value of x or y ticks and limits and log base
+/ticksandlimits
+{ /base exch def
+  /minv false def
+  /maxv false def
+
+  % min and max of user-supplied minval, maxval, and axis
+  minmax minmax minmax
+
+  % min and max of data points
+  { 0 get dup dup length 1 sub 3 index exch 2 exch
+    { get minmax dup
+    } for pop pop
+  } forall
+  pop dup
+
+  % min and max of tick values
+  { dup type /stringtype eq
+    { pop } { minmax } ifelse
+  } forall
+
+  % fix minv and maxv if undefined (false) or equal
+  minv false eq
+  { /minv -1 def /maxv 1 def }
+  { minv maxv eq
+    { minv 0 lt
+      { /minv 2 minv mul def /maxv 0 def
+      }
+      { minv 0 eq
+	{ /minv -1 def /maxv 1 def
+	}
+	{ /minv 0 def /maxv 2 maxv mul def
+	} ifelse
+      } ifelse
+    } if
+  } ifelse
+
+  % invent ticks if undefined
+  ticksundef
+  { pop /ticksep exch def
+
+    % if base is reasonable and minv is positive, logarithmic ticks
+    base 1 gt minv 0 gt and
+    {
+      % get integral log of minv and maxv
+      /logminv base minv plog floor   cvi def
+      /logmaxv base maxv plog ceiling cvi def
+
+      % if minv close to base, make it 1; reset minv and maxv
+      logminv 1 eq logmaxv 4 ge and { /logminv 0 def } if
+      /minv base logminv exp def
+      /maxv base logmaxv exp def
+
+      % ticks := [ base**logminv, ... , base**logmaxv ]
+      [ logminv 1 logmaxv
+	{ dup base exch exp
+	  exch base exch loglgen
+	} for
+      ]
+    }
+    { % non-logarithmic ticks
+      {
+        % fix tick separation if undefined (0) or too small
+	/base 0 def
+        /delta maxv minv sub def
+        ticksep delta 30 div le
+        { /ticksep 10 delta log 1 sub ceiling exp def
+	  ticksep delta 2 div ge
+	  { /ticksep ticksep 2 div def }
+	  { ticksep delta 5 div lt
+	    { /ticksep 2 ticksep mul def
+	    } if
+	  } ifelse
+        } if
+
+        % adjust minv and maxv to be multiples of ticksep
+        /minv minv ticksep div floor   ticksep mul def
+        /maxv maxv ticksep div ceiling ticksep mul def
+        /delta maxv minv sub def
+
+        % if minv or maxv near zero, move to zero and redo
+        minv ticksep eq
+        { /minv 0 def }
+        { maxv ticksep neg eq { /maxv 0 def } { exit } ifelse
+        } ifelse
+      } loop
+
+      % if minv, maxv, and ticksep are all integral, set "makeint" to true
+      /makeint minv integral maxv integral ticksep integral and and def
+
+      % ticks := [ minv, minv+ticksep, ... , maxv ]
+      [ 0 1 delta ticksep div round
+	{ ticksep mul minv add makeint { cvi } if lgen }
+	for
+      ]
+    } ifelse
+  }
+  { exch pop
+  } ifelse
+  minv maxv base
+} def
+
+% xset: set up all data for x axis, including limits and ticks
+% xticksep xticks 0 alldata xmin xmax xlog xextra xdecr xaxis xticklength xset -
+/xset
+{ /xticklength exch def
+  /xaxis exch def
+  /xdecr exch def
+  /xextra exch def
+  xaxis exch ticksandlimits
+  /xlog exch def /xmax exch def /xmin exch def /xticks exch def
+  /xleft xdecr { xmax } { xmin } ifelse def
+  /xright xdecr { xmin } { xmax } ifelse def
+  /xwidth xsize xextra 2 mul sub def
+  /trxmin xmin xtr def /trxmax xmax xtr def
+} def
+
+% yset: set up all data for y axis, including limits and yticks
+% yticksep yticks 0 alldata ymin ymax ylog yextra ydecr yaxis yticklength yset -
+/yset
+{ /yticklength exch def
+  /yaxis exch def
+  /ydecr exch def
+  /yextra exch def
+  yaxis exch ticksandlimits
+  /ylog exch def /ymax exch def /ymin exch def /yticks exch def
+  /yleft ydecr { ymax } { ymin } ifelse def
+  /yright ydecr { ymin } { ymax } ifelse def
+  /ywidth ysize yextra 2 mul sub def
+  /trymin ymin ytr def /trymax ymax ytr def
+} def
+
+% rset: set up all data for y axis (again), but including limits and rticks
+% rticksep rticks 0 alldata ymin ymax ylog yextra ydecr yaxis rticklength rset -
+/rset
+{ /rticklength exch def
+  /yaxis exch def
+  /ydecr exch def
+  /yextra exch def
+  yaxis exch ticksandlimits
+  /ylog exch def /ymax exch def /ymin exch def /rticks exch def
+  /yleft ydecr { ymax } { ymin } ifelse def
+  /yright ydecr { ymin } { ymax } ifelse def
+  /ywidth ysize yextra 2 mul sub def
+  /trymin ymin ytr def /trymax ymax ytr def
+} def
+
+% norset: set up data for no rticks
+% - norset -
+/norset
+{ /rticklength 0 def
+  /rticks [] def
+} def
+
+% framestyle: print a frame around the graph
+/framestyle
+{ 0 0 moveto xsize 0 lineto xsize ysize lineto
+  0 ysize lineto closepath stroke
+  /printxtick /printxlabel xticks xleft printticks
+  /printytick /printylabel yticks ymin printticks
+  /printrtick /printrlabel rticks ymin printticks
+} def
+
+% nonestyle: print nothing around the graph
+/nonestyle
+{
+} def
+
+% axesstyle: print axes for the graph (unless axis values missing)
+/axesstyle
+{
+  xaxis false eq yaxis false eq or
+  { framestyle }
+  { xaxis yaxis trpoint dup 0 exch moveto xsize exch lineto
+    dup 0 moveto ysize lineto stroke
+    /printxaxistick /printxaxislabel xticks xleft printticks
+    /printyaxistick /printyaxislabel yticks ymin printticks
+  } ifelse
+} def
+
+% rundata: run all data sets
+/rundata
+{ alldata
+  { gsave
+    dup dup dup dup
+    4 get /dopaint exch def
+    3 get /initrun exch def
+    2 get /pairs exch def
+    1 get /points exch def
+    0 get /data exch def
+    dopaint
+    { data length 4 ge
+      { initrun
+	newpath
+	data 0 get ymin trpoint yextra sub moveto
+	0 2 data length 2 sub
+	{ dup 1 add
+	  data exch get /ycurr exch def
+	  data exch get /xcurr exch def
+	  xcurr ycurr trpoint lineto
+	} for
+	data dup length 2 sub get ymin trpoint yextra sub lineto
+	closepath fill
+      } if
+    } if
+    initrun
+    data length 2 ge
+    {
+      /xcurr data 0 get def
+      /ycurr data 1 get def
+      points
+      data length 4 ge
+      { 2 2 data length 2 sub
+	{ /xprev xcurr def
+          /yprev ycurr def
+	  dup dup 2 eq /firstpair exch def
+	  data length 2 sub eq /lastpair exch def
+	  dup 1 add
+          data exch get /ycurr exch def
+          data exch get /xcurr exch def
+	  pairs
+	  points
+	} for
+      } if
+    } if
+    grestore
+  } forall
+} def
+
+end
+%%EndResource
diff --git a/include/init b/include/init
new file mode 100644
index 0000000..2718c22
--- /dev/null
+++ b/include/init
@@ -0,0 +1,34 @@
+
+###############################################################################
+#                                                                             #
+#  init                                                                       #
+#                                                                             #
+#  Lout file for initializing run.                                            #
+#                                                                             #
+#  Jeffrey H. Kingston                                                        #
+#  21 September 1994                                                          #
+#                                                                             #
+###############################################################################
+
+
+@SysInclude { fontdefs }			  # font definitions
+@SysInclude { langdefs }			  # language definitions
+@SysInclude { bsf }				  # BasicSetup package
+@SysInclude { dsf }				  # DocumentSetup package
+						  #   including standard.ld
+def @TeX
+{
+    @OneCol { T &0.4fo {-0.2f @VShift E} &0.45fo X }
+}
+
+def @LaTeX
+{
+    @OneCol { L &0.3fo { +0.1f @VShift 0.8f @Font A } &0.4fo @TeX }
+}
+
+@Use { @BasicSetup }
+@Use { @DocumentSetup }
+
+@SysDatabase @Reference { loutrefs }		  # references about Lout
+@SysDatabase @Reference { oldrefs }		  # old references about Lout
+@SysDatabase @RefStyle { refstyle }		  # reference printing styles
diff --git a/include/langdefs b/include/langdefs
new file mode 100644
index 0000000..ec3ac3a
--- /dev/null
+++ b/include/langdefs
@@ -0,0 +1,16 @@
+langdef Czech Cesky Cestina			{ czech		. : ! ? .) ?) !) .' !' ?' }
+langdef Danish Dansk				{ danish	. : ! ? .) ?) !) .' !' ?' }
+langdef Dutch Nederlands			{ dutch		. : ! ? .) ?) !) .' !' ?' }
+langdef English					{ english	. : ! ? .) ?) !) .' !' ?' }
+langdef EnglishUK				{ engluk	. : ! ? .) ?) !) .' !' ?' }
+langdef Finnish Suomi				{ finnish	. : ! ? .) ?) !) .' !' ?' }
+langdef French Francais "Fran\347ais"		{ french				  }
+langdef German Deutsch				{ german	. : ! ? .) ?) !) .' !' ?' }
+langdef Hungarian Magyar			{ -		. : ! ? .) ?) !) .' !' ?' }
+langdef	Italian Italiano			{ italian	. : ! ? .) ?) !) .' !' ?' }
+langdef Norwegian Norsk				{ norweg	. : ! ? .) ?) !) .' !' ?' }
+langdef Polish Polski				{ polish	. : ! ? .) ?) !) .' !' ?' }
+langdef Russian "\362\325\323\323\313\311\312"  { russian	. : ! ? .) ?) !) .' !' ?' }
+langdef Slovenian Slovenia Slovenija		{ slovenia	. : ! ? .) ?) !) .' !' ?' }
+langdef Spanish	"Espa\361ol"			{ spanish	. : ! ? .) ?) !) .' !' ?' }
+langdef Swedish	Svenska				{ swedish	. : ! ? .) ?) !) .' !' ?' }
diff --git a/include/latin2 b/include/latin2
new file mode 100644
index 0000000..35ddf2c
--- /dev/null
+++ b/include/latin2
@@ -0,0 +1,9 @@
+#################################################################
+#                                                               #
+#  latin2                                                       #
+#                                                               #
+#  This file includes everything you need for Latin2.           #
+#                                                               #
+#################################################################
+
+@SysInclude { latin2.fd }
diff --git a/include/latin2.fd b/include/latin2.fd
new file mode 100644
index 0000000..5bc648b
--- /dev/null
+++ b/include/latin2.fd
@@ -0,0 +1,143 @@
+##################################################################################################################
+#                                                                                                                #
+#  Latin2 Font definitions.  Use a very wide window to see them clearly.                                         #
+#                                                                                                                #
+#       Lout font       Lout font         PostScript         PostScript font metrics    Lout character Recode/   #
+#       family name     face name         font name          (formerly .AFM) file name  mapping file   NoRecode  #
+#                                                                                                                #
+##################################################################################################################
+
+
+fontdef	AvantGardeCE	Base		{ AvantGarde-Medium		AG-Md		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	Slope		{ AvantGarde-MediumObl		AG-MdO		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	Bold		{ AvantGarde-Bold		AG-Bd		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	BoldSlope	{ AvantGarde-BoldObl		AG-BdO		LtLatin2.LCM	Recode	 }
+
+fontdef	AvantGardeCE	Bold		{ AvantGarde-Bold		AG-Bd		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	BoldObl		{ AvantGarde-BoldObl		AG-BdO		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	Book		{ AvantGarde-Book		AG-Bk		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	BookOblique	{ AvantGarde-BookOblique	AG-BkO		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	CondBold	{ AvantGarde-CondBold		AG-CnBd		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	CondBook	{ AvantGarde-CondBook		AG-CnBk		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	CondDemi	{ AvantGarde-CondDemi		AG-CnDm		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	CondMedium	{ AvantGarde-CondMedium		AG-CnMd		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	Demi		{ AvantGarde-Demi		AG-Dm		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	DemiOblique	{ AvantGarde-DemiOblique	AG-DmO		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	ExtraLight	{ AvantGarde-ExtraLight		AG-ExLt		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	ExtraLightObl	{ AvantGarde-ExtraLightObl	AG-ExLtO	LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	Medium		{ AvantGarde-Medium		AG-Md		LtLatin2.LCM	Recode	 }
+fontdef	AvantGardeCE	MediumObl	{ AvantGarde-MediumObl		AG-MdO		LtLatin2.LCM	Recode	 }
+
+
+fontdef	BookmanCE	Base		{ Bookman-Medium		Bk-Md		LtLatin2.LCM	Recode	 }
+fontdef	BookmanCE	Slope		{ Bookman-MediumItalic		Bk-MdIt		LtLatin2.LCM	Recode	 }
+fontdef	BookmanCE	Bold		{ Bookman-Bold			Bk-Bd		LtLatin2.LCM	Recode	 }
+fontdef	BookmanCE	BoldSlope	{ Bookman-BoldItalic		Bk-BdIt		LtLatin2.LCM	Recode	 }
+
+fontdef	BookmanCE	Bold		{ Bookman-Bold			Bk-Bd		LtLatin2.LCM	Recode	 }
+fontdef	BookmanCE	BoldItalic	{ Bookman-BoldItalic		Bk-BdIt		LtLatin2.LCM	Recode	 }
+fontdef	BookmanCE	Demi		{ Bookman-Demi			Bk-Dm		LtLatin2.LCM	Recode	 }
+fontdef	BookmanCE	DemiItalic	{ Bookman-DemiItalic		Bk-DmIt		LtLatin2.LCM	Recode	 }
+fontdef	BookmanCE	Light		{ Bookman-Light			Bk-Lt		LtLatin2.LCM	Recode	 }
+fontdef	BookmanCE	LightItalic	{ Bookman-LightItalic		Bk-LtIt		LtLatin2.LCM	Recode	 }
+fontdef	BookmanCE	Medium		{ Bookman-Medium		Bk-Md		LtLatin2.LCM	Recode	 }
+fontdef	BookmanCE	MediumItalic	{ Bookman-MediumItalic		Bk-MdIt		LtLatin2.LCM	Recode	 }
+
+
+fontdef	CourierCE	Base		{ Courier			Cr		LtLatin2.LCM	Recode	 }
+fontdef	CourierCE	Slope		{ Courier-Oblique		Cr-O		LtLatin2.LCM	Recode	 }
+fontdef	CourierCE	Bold		{ Courier-Bold			Cr-Bd		LtLatin2.LCM	Recode	 }
+fontdef	CourierCE	BoldSlope	{ Courier-BoldOblique		Cr-BdO		LtLatin2.LCM	Recode	 }
+
+fontdef	CourierCE	Base		{ Courier			Cr		LtLatin2.LCM	Recode	 }
+fontdef	CourierCE	Bold		{ Courier-Bold			Cr-Bd		LtLatin2.LCM	Recode	 }
+fontdef	CourierCE	BoldOblique	{ Courier-BoldOblique		Cr-BdO		LtLatin2.LCM	Recode	 }
+fontdef	CourierCE	Oblique		{ Courier-Oblique		Cr-O		LtLatin2.LCM	Recode	 }
+
+
+fontdef	HelveticaCE	Base		{ Helvetica			He		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	Slope		{ Helvetica-Oblique		He-O		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	Bold		{ Helvetica-Bold		He-Bd		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	BoldSlope	{ Helvetica-BoldOblique		He-BdO		LtLatin2.LCM	Recode	 }
+
+fontdef	HelveticaCE	Base		{ Helvetica			He		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	Black		{ Helvetica-Black		He-Bl		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	BlackOblique	{ Helvetica-BlackOblique	He-BlO		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	Bold		{ Helvetica-Bold		He-Bd		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	BoldOblique	{ Helvetica-BoldOblique		He-BdO		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	Compressed	{ Helvetica-Compressed		He-Cm		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	Cond		{ Helvetica-Condensed		He-Cn		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	CondBlack	{ Helvetica-Condensed-Black	He-CnBl		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	CondBlackObl	{ Helvetica-Condensed-BlackObl	He-CnBlO	LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	CondBold	{ Helvetica-Condensed-Bold	He-CnBd		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	CondBoldObl	{ Helvetica-Condensed-BoldObl	He-CnBdO	LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	CondLight	{ Helvetica-Condensed-Light	He-CnLi		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	CondLightObl	{ Helvetica-Condensed-LightObl	He-CnLiO	LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	CondOblique	{ Helvetica-Condensed-Oblique	He-CnO		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	ExtraCompressed	{ Helvetica-ExtraCompressed	He-ExtC		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	Light		{ Helvetica-Light		He-Lt		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	LightOblique	{ Helvetica-LightOblique	He-LtO		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	Narrow		{ Helvetica-Narrow		He-Nr		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	NarrowBold	{ Helvetica-Narrow-Bold		He-NrBd		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	NarrowBoldObl	{ Helvetica-Narrow-BoldOblique	He-NrBdO	LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	NarrowObl	{ Helvetica-Narrow-Oblique	He-NrO		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	Oblique		{ Helvetica-Oblique		He-O		LtLatin2.LCM	Recode	 }
+fontdef	HelveticaCE	UltraCompressed	{ Helvetica-UltraCompressed	He-UlCm		LtLatin2.LCM	Recode	 }
+
+
+fontdef	SchoolbookCE	Base		{ NewCenturySchlbk-Roman	NCS-Rm		LtLatin2.LCM	Recode	 }
+fontdef	SchoolbookCE	Slope		{ NewCenturySchlbk-Italic	NCS-It		LtLatin2.LCM	Recode	 }
+fontdef	SchoolbookCE	Bold		{ NewCenturySchlbk-Bold		NCS-Bd		LtLatin2.LCM	Recode	 }
+fontdef	SchoolbookCE	BoldSlope	{ NewCenturySchlbk-BoldItalic	NCS-BdIt	LtLatin2.LCM	Recode	 }
+
+fontdef	SchoolbookCE	Bold		{ NewCenturySchlbk-Bold		NCS-Bd		LtLatin2.LCM	Recode	 }
+fontdef	SchoolbookCE	BoldItalic	{ NewCenturySchlbk-BoldItalic	NCS-BdIt	LtLatin2.LCM	Recode	 }
+fontdef	SchoolbookCE	Italic		{ NewCenturySchlbk-Italic	NCS-It		LtLatin2.LCM	Recode	 }
+fontdef	SchoolbookCE	Roman		{ NewCenturySchlbk-Roman	NCS-Rm		LtLatin2.LCM	Recode	 }
+
+
+fontdef	PalatinoCE	Base		{ Palatino-Roman		Pa-Rm		LtLatin2.LCM	Recode	 }
+fontdef	PalatinoCE	Slope		{ Palatino-Italic		Pa-It		LtLatin2.LCM	Recode	 }
+fontdef	PalatinoCE	Bold		{ Palatino-Bold			Pa-Bd		LtLatin2.LCM	Recode	 }
+fontdef	PalatinoCE	BoldSlope	{ Palatino-BoldItalic		Pa-BdIt		LtLatin2.LCM	Recode	 }
+
+fontdef	PalatinoCE	Bold		{ Palatino-Bold			Pa-Bd		LtLatin2.LCM	Recode	 }
+fontdef	PalatinoCE	BoldItalic	{ Palatino-BoldItalic		Pa-BdIt		LtLatin2.LCM	Recode	 }
+fontdef	PalatinoCE	BoldItalicOsF	{ Palatino-BoldItalicOsF	Pa-BdItF	LtLatin2.LCM	Recode	 }
+fontdef	PalatinoCE	BoldOsF		{ Palatino-BoldOsF		Pa-BdF		LtLatin2.LCM	Recode	 }
+fontdef	PalatinoCE	Italic		{ Palatino-Italic		Pa-It		LtLatin2.LCM	Recode	 }
+fontdef	PalatinoCE	ItalicOsF	{ Palatino-ItalicOsF		Pa-ItF		LtLatin2.LCM	Recode	 }
+fontdef	PalatinoCE	Roman		{ Palatino-Roman		Pa-Rm		LtLatin2.LCM	Recode	 }
+fontdef	PalatinoCE	SC		{ Palatino-SC			Pa-SC		LtLatin2.LCM	Recode	 }
+
+
+fontdef	TimesCE		Base		{ Times-Roman			Ti-Rm		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		Slope		{ Times-Italic			Ti-It		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		Bold		{ Times-Bold			Ti-Bd		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		BoldSlope	{ Times-BoldItalic		Ti-BdIt		LtLatin2.LCM	Recode	 }
+
+fontdef	TimesCE		Bold		{ Times-Bold			Ti-Bd		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		BoldItalic	{ Times-BoldItalic		Ti-BdIt		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		BoldItalicOsF	{ Times-BoldItalicOsF		Ti-BdItF	LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		BoldSC		{ Times-BoldSC			Ti-BdSC		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		ExtraBold	{ Times-ExtraBold		Ti-ExBd		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		Italic		{ Times-Italic			Ti-It		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		ItalicOsF	{ Times-ItalicOsF		Ti-ItF		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		Roman		{ Times-Roman			Ti-Rm		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		RomanSC		{ Times-RomanSC			Ti-RmSC		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		Semibold	{ Times-Semibold		Ti-Sm		LtLatin2.LCM	Recode	 }
+fontdef	TimesCE		SemiboldItalic	{ Times-SemiboldItalic		Ti-SmIt		LtLatin2.LCM	Recode	 }
+
+
+fontdef	ChanceryCE	Base		{ ZapfChancery-Roman		ZC-Rm		LtLatin2.LCM	Recode	 }
+fontdef	ChanceryCE	Slope		{ ZapfChancery-Italic		ZC-It		LtLatin2.LCM	Recode	 }
+fontdef	ChanceryCE	Bold		{ ZapfChancery-Bold		ZC-Bd		LtLatin2.LCM	Recode	 }
+fontdef	ChanceryCE	BoldSlope	{ ZapfChancery-MediumItalic	ZC-MdIt		LtLatin2.LCM	Recode	 }
+
+fontdef	ChanceryCE	Roman		{ ZapfChancery-Roman		ZC-Rm		LtLatin2.LCM	Recode	 }
+fontdef	ChanceryCE	Bold		{ ZapfChancery-Bold		ZC-Bd		LtLatin2.LCM	Recode	 }
+fontdef	ChanceryCE	Italic		{ ZapfChancery-Italic		ZC-It		LtLatin2.LCM	Recode	 }
+fontdef	ChanceryCE	Light		{ ZapfChancery-Light		ZC-Lt		LtLatin2.LCM	Recode	 }
+fontdef	ChanceryCE	Demi		{ ZapfChancery-Demi		ZC-Dm		LtLatin2.LCM	Recode	 }
+fontdef	ChanceryCE	LightItalic	{ ZapfChancery-LightItalic	ZC-LtIt		LtLatin2.LCM	Recode	 }
+fontdef	ChanceryCE	MediumItalic	{ ZapfChancery-MediumItalic	ZC-MdIt		LtLatin2.LCM	Recode	 }
diff --git a/include/modula b/include/modula
new file mode 100644
index 0000000..0f84ad6
--- /dev/null
+++ b/include/modula
@@ -0,0 +1,27 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for Modula-2 program printing                             #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  The @SysInclude { modulaf } line                                           #
+#                                                                             #
+#  This line causes Lout to read the definitions for Modula-2, and should     #
+#  not be touched.                                                            #
+#                                                                             #
+###############################################################################
+
+@SysInclude { modulaf }
+
+
+###############################################################################
+#                                                                             #
+#  This package does not offer the ability to change default options.         #
+#                                                                             #
+###############################################################################
diff --git a/include/modulaf b/include/modulaf
new file mode 100644
index 0000000..2f1221d
--- /dev/null
+++ b/include/modulaf
@@ -0,0 +1,137 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @Modula package for formatting Modula-2 programs (Version 1.0)        #
+#                                                                             #
+#  Version 1.0 by Jeffrey H. Kingston, September 1993.                        #
+#                                                                             #
+#  This package implements the complete Modula-2 language (in a style which   #
+#  claims only to reflect its author's taste) with the following caveats:     #
+#                                                                             #
+#  * The symbol { must be given as lbrace                                     #
+#                                                                             #
+#  * The symbol } must be given as rbrace                                     #
+#                                                                             #
+#  * The symbol # must be given as numbersign                                 #
+#                                                                             #
+#  * Double quotes are used by Lout to delimit literal strings, so they       #
+#    need to be quoted (Modula-2 allows single quoted strings wherever        #
+#    double quoted strings can go; we recommend these be used)                #
+#                                                                             #
+#  * Literal strings should be enclosed in double quotes                      #
+#                                                                             #
+#  * The symbols B, H, C, and E as used in numeric literals will appear       #
+#    in italic font                                                           #
+#                                                                             #
+###############################################################################
+
+export	"0" "1" "2" "3" "4" "5" "6" "7" "8" "9"
+
+	"*" "/" "~" "+" "-" "=" "<>" ">" ">=" "<" "<=" "("
+	")" "[" "]" "," ";" "." ":" "..." ".." "|" "^" ":=" "'" "`"
+	"&"
+
+	lbrace rbrace numbersign
+
+	AND ARRAY BEGIN BY CASE CONST DEFINITION DIV DO ELSE ELSIF
+	END EXPORT EXIT FOR FROM IF IMPLEMENTATION IMPORT IN LOOP
+	MOD MODULE NOT OF OR POINTER PROCEDURE QUALIFIED RECORD
+	REPEAT RETURN SET TO THEN TYPE UNTIL VAR WHILE WITH @Com
+
+def @Modula
+   body @Body
+@Begin
+
+    def @R right x { Base @Font x }
+    def @B right x { Bold @Font x }
+    def @S right x { { Symbol Base } @Font x }
+
+    def "0"	{ @R "0"			}
+    def "1"	{ @R "1"			}
+    def "2"	{ @R "2"			}
+    def "3"	{ @R "3"			}
+    def "4"	{ @R "4"			}
+    def "5"	{ @R "5"			}
+    def "6"	{ @R "6"			}
+    def "7"	{ @R "7"			}
+    def "8"	{ @R "8"			}
+    def "9"	{ @R "9"			}
+
+    def "*"	{ @S @Char "asteriskmath"	}
+    def "/"	{ @R @Char "fraction"		}
+    def "~"	{ @R "~"			}
+    def "+"	{ @S "+"			}
+    def "-"	{ @S "-"			}
+    def "="	{ @S @Char "equal"		}
+    def "<>"	{ @S @Char "notequal"		}
+    def ">"	{ @S @Char "greater"		}
+    def ">="	{ @S @Char "greaterequal"	}
+    def "<"	{ @S @Char "less"		}
+    def "<="	{ @S @Char "lessequal"		}
+    def "("	{ @R "("			}
+    def ")"	{ @R ")"			}
+    def "["	{ @R "["			}
+    def "]"	{ @R "]"			}
+    def ","	{ @R ","			}
+    def ";"	{ @R ";"			}
+    def "."	{ @R "."			}
+    def ":"	{ @R ":"			}
+    def ".."	{ @R ".." &0.1f			}
+    def "..."	{ @R "..." 			}
+    def "|"	{ @R "|"			}
+    def "^"	{ @S 0.8f @Font @Char "arrowup"	}
+    def ":="	{ :{//0.03fo =}			}
+    def "'"	{ @R "'"			}
+    def "`"	{ @R "`"			}
+    def "&"	{ @R "&"			}
+
+    def lbrace		{ @R "{"		}
+    def rbrace		{ @R "}"		}
+    def numbersign	{ @R "#"		}
+
+    def AND		{ @B "and"		}
+    def ARRAY		{ @B "array"		}
+    def BEGIN		{ @B "begin"		}
+    def BY		{ @B "by"		}
+    def CASE		{ @B "case"		}
+    def CONST		{ @B "const"		}
+    def DEFINITION	{ @B "definition"	}
+    def DIV		{ @B "div"		}
+    def DO		{ @B "do"		}
+    def ELSE		{ @B "else"		}
+    def ELSIF		{ @B "elsif"		}
+    def END		{ @B "end"		}
+    def EXPORT		{ @B "export"		}
+    def EXIT		{ @B "exit"		}
+    def FOR		{ @B "for"		}
+    def FROM		{ @B "from"		}
+    def IF		{ @B "if"		}
+    def IMPLEMENTATION	{ @B "implementation"	}
+    def IMPORT		{ @B "import"		}
+    def IN		{ @B "in"		}
+    def LOOP		{ @B "loop"		}
+    def MOD		{ @B "mod"		}
+    def MODULE		{ @B "module"		}
+    def NOT		{ @B "not"		}
+    def OF		{ @B "of"		}
+    def OR		{ @B "or"		}
+    def POINTER		{ @B "pointer"		}
+    def PROCEDURE	{ @B "procedure"	}
+    def QUALIFIED	{ @B "qualified"	}
+    def RECORD		{ @B "record"		}
+    def REPEAT		{ @B "repeat"		}
+    def RETURN		{ @B "return"		}
+    def SET		{ @B "set"		}
+    def TO		{ @B "to"		}
+    def THEN		{ @B "then"		}
+    def TYPE		{ @B "type"		}
+    def UNTIL		{ @B "until"		}
+    def VAR		{ @B "var"		}
+    def WHILE		{ @B "while"		}
+    def WITH		{ @B "with"		}
+
+    def @Com right x	{ @R "{" x @R "}"	}
+
+   Slope @Font lines @Break @Body
+
+@End @Modula
diff --git a/include/mydefs b/include/mydefs
new file mode 100644
index 0000000..e7b7ebb
--- /dev/null
+++ b/include/mydefs
@@ -0,0 +1,9 @@
+
+###############################################################################
+#                                                                             #
+#  mydefs                                                                     #
+#                                                                             #
+#  This empty Lout file is a placeholder which is read by the standard setup  #
+#  files when there is no mydefs file in the user's current directory.        #
+#                                                                             #
+###############################################################################
diff --git a/include/pas b/include/pas
new file mode 100644
index 0000000..b62b24a
--- /dev/null
+++ b/include/pas
@@ -0,0 +1,27 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for Pascal program printing                               #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  The @SysInclude { pasf } line                                              #
+#                                                                             #
+#  This line causes Lout to read the definitions for Pascal, and should       #
+#  not be touched.                                                            #
+#                                                                             #
+###############################################################################
+
+@SysInclude { pasf }
+
+
+###############################################################################
+#                                                                             #
+#  This package does not offer default options that can be changed.           #
+#                                                                             #
+###############################################################################
diff --git a/include/pasf b/include/pasf
new file mode 100644
index 0000000..84dba18
--- /dev/null
+++ b/include/pasf
@@ -0,0 +1,110 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @Pas package for formatting Pascal programs (Version 2.0)             #
+#                                                                             #
+#  Version 1.0 by Jeffrey H. Kingston, June 1991.                             #
+#  Version 2.0 by Jeffrey H. Kingston, 22 December 1992.                      #
+#                                                                             #
+#  See "Eq - a Lout package for typesetting mathematics" for user             #
+#  information.                                                               #
+#                                                                             #
+#  Reference:   Jensen, K. and Wirth, N.  Pascal User Manual and Report.      #
+#               Second Edition, Springer-Verlag, 1975.                        #
+#                                                                             #
+###############################################################################
+
+export	"0" "1" "2" "3" "4" "5" "6" "7" "8" "9"
+	"." "," ":" ";" "'" "`" "+" "-" "*" "/" "(" ")"
+	"[" "]" "^" ".." "=" "<" ">" "<>" "<=" ">=" ":="
+
+	and array begin case const div do downto else end
+	file for forward function goto if in label mod nil not
+	of or otherwise packed procedure program record repeat
+	set then to type until var while with @Com
+
+def @Pas
+   body @Body
+@Begin
+
+    def @R right x { Base @Font x }
+    def @B right x { Bold @Font x }
+    def @S right x { { Symbol Base } @Font x }
+
+    def "0"	{ @R "0"			}
+    def "1"	{ @R "1"			}
+    def "2"	{ @R "2"			}
+    def "3"	{ @R "3"			}
+    def "4"	{ @R "4"			}
+    def "5"	{ @R "5"			}
+    def "6"	{ @R "6"			}
+    def "7"	{ @R "7"			}
+    def "8"	{ @R "8"			}
+    def "9"	{ @R "9"			}
+    def "."	{ @R "."			}
+    def ","	{ @R ","			}
+    def ":"	{ @R ":"			}
+    def ";"	{ @R ";"			}
+    def "'"	{ @R "'"			}
+    def "`"	{ @R "`"			}
+    def "+"	{ @S "+"			}
+    def "-"	{ @S "-"			}
+    def "*"	{ @S @Char "asteriskmath"	}
+    def "/"	{ @R @Char "fraction"		}
+    def "("	{ @R "("			}
+    def ")"	{ @R ")"			}
+    def "["	{ @R "["			}
+    def "]"	{ @R "]"			}
+    def "^"	{ @S 0.8f @Font @Char "arrowup"	}
+    def ".."	{ @R ".." &0.1f			}
+    def "="	{ @S @Char "equal"		}
+    def "<"	{ @S @Char "less"		}
+    def ">"	{ @S @Char "greater"		}
+    def "<>"	{ @S @Char "notequal"		}
+    def "<="	{ @S @Char "lessequal"		}
+    def ">="	{ @S @Char "greaterequal"	}
+    def ":="	{ :{//0.03fo &0.1f =}		}
+
+    def and		{ @B "and"		}
+    def array		{ @B "array"		}
+    def begin		{ @B "begin"		}
+    def case		{ @B "case"		}
+    def const		{ @B "const"		}
+    def div		{ @B "div"		}
+    def do		{ @B "do"		}
+    def downto		{ @B "downto"		}
+    def else		{ @B "else"		}
+    def end		{ @B "end"		}
+    def file		{ @B "file"		}
+    def for		{ @B "for"		}
+    def forward		{ @B "forward"		}
+    def function	{ @B "function"		}
+    def goto		{ @B "goto"		}
+    def if		{ @B "if"		}
+    def in		{ @B "in"		}
+    def label		{ @B "label"		}
+    def mod		{ @B "mod"		}
+    def nil		{ @B "nil"		}
+    def not		{ @B "not"		}
+    def of		{ @B "of"		}
+    def or		{ @B "or"		}
+    def otherwise	{ @B "otherwise"	}
+    def packed		{ @B "packed"		}
+    def procedure	{ @B "procedure"	}
+    def program		{ @B "program"		}
+    def record		{ @B "record"		}
+    def repeat		{ @B "repeat"		}
+    def set		{ @B "set"		}
+    def then		{ @B "then"		}
+    def to		{ @B "to"		}
+    def type		{ @B "type"		}
+    def until		{ @B "until"		}
+    def var		{ @B "var"		}
+    def while		{ @B "while"		}
+    def with		{ @B "with"		}
+
+    def @Com right x	{ @R "{" x @R "}"	}
+
+   Slope @Font lines @Break @Body
+
+@End @Pas
diff --git a/include/picture b/include/picture
new file mode 100644
index 0000000..55d2f3e
--- /dev/null
+++ b/include/picture
@@ -0,0 +1,254 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for stand-alone illustrations                             #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  @SysInclude commands for standard packages.                                #
+#                                                                             #
+###############################################################################
+
+  @SysInclude { fontdefs	} # font definitions
+  @SysInclude { langdefs	} # language definitions
+  @SysInclude { bsf		} # BasicSetup package
+  @SysInclude { dsf		} # DocumentSetup package
+  @SysInclude { picturef	} # IllustrationSetup extension
+
+
+###############################################################################
+#                                                                             #
+#  @Include command for reading personal definitions from current directory.  #
+#                                                                             #
+###############################################################################
+
+  @Include { mydefs }
+
+
+###############################################################################
+#                                                                             #
+#  The @BasicSetup @Use clause - basics, lists, paragraphs, displays.         #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+ 
+@Use { @BasicSetup
+  # @InitialFont	{ Times Base 12p	} # initial font
+  # @InitialBreak	{{adjust 1.2fx hyphen} @OrIfPlain {ragged 1fx nohyphen}}
+  # @InitialSpace	{ lout			} # initial space style
+  # @InitialLanguage	{ English		} # initial language
+  # @InitialColour	{ black			} # initial colour
+  # @OptimizePages	{ No			} # optimize page breaks?
+  # @HeadingFont	{ Bold			} # font for @Heading
+  # @ParaGap		{ 1.3vx @OrIfPlain 1f	} # gap between paragraphs
+  # @ParaIndent		{ 2.00f	@OrIfPlain 5s	} # first-line indent for @PP
+  # @DisplayGap		{ 1.00v	@OrIfPlain 1f	} # gap above, below displays
+  # @DisplayIndent	{ 2.00f	@OrIfPlain 5s	} # @IndentedDisplay indent
+  # @DefaultIndent	{ 0.5rt			} # @Display indent
+  # @DisplayNumStyle	{ (num)			} # style of display numbers
+  # @WideIndent		{ 4.00f	@OrIfPlain 10s	} # @WideTaggedList indent
+  # @VeryWideIndent	{ 8.00f	@OrIfPlain 20s	} # @VeryWideTaggedList indent
+  # @ListOuterGap	{ 1.00v	@OrIfPlain 1f	} # gap before, after lists
+  # @ListGap		{ 1.00v	@OrIfPlain 1f	} # gap between list items
+  # @ListIndent		{ 0s			} # indent of list items
+  # @ListRightIndent	{ 0s			} # right indent of list items
+  # @ListLabelWidth	{ 2.00f	@OrIfPlain 5s	} # width allowed for list tags
+  # @NumberSeparator	{ .			} # separates nums like 2.3.7
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @DocumentSetup @Use clause - page layout plus figures, tables, etc.    #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+
+@Use { @DocumentSetup
+  # @PageType		{ A4	@OrIfPlain Other} # page type (width, height)
+  # @PageWidth		{ 80s			} # page width if type Other
+  # @PageHeight		{ 66f			} # page height if type Other
+  # @PageOrientation	{ Portrait		} # Portrait, Landscape, etc.
+  # @PageBackground	{  			} # background of each page
+  # @TopMargin		{ 2.5c	@OrIfPlain 6f	} # top margin of all pages
+  # @FootMargin		{ 2.5c	@OrIfPlain 6f	} # bottom margin of all pages
+  # @OddLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of odd pages
+  # @OddRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of odd pages
+  # @EvenLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of even pages
+  # @EvenRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of even pages
+  # @PageBoxType	{ None			} # None Box CurveBox ShadowBox
+  # @PageBoxMargin	{ 1.00c			} # page box margin
+  # @PageBoxLineWidth	{			} # page box line thickness
+  # @PageBoxPaint	{ none			} # page box paint
+  # @PageBoxShadow	{ 0.60c			} # shadow margin if ShadowBox
+  # @ColumnNumber	{ 1			} # number of columns (1 to 10)
+  # @ColumnGap		{ 1.00c	@OrIfPlain 6s	} # column gap
+  # @FigureLocation	{ PageTop		} # default figure location
+  # @TableLocation	{ PageTop		} # default table location
+  # @FigureFormat	{ @CC @Body		} # default figure format
+  # @TableFormat	{ @CC @Body		} # default table format
+  # @FigureWord		{ figure		} # "Figure" word else anything
+  # @TableWord		{ table			} # "Table" word else anything
+  # @FigureNumbers	{ Arabic		} # method of numbering figures
+  # @TableNumbers	{ Arabic		} # method of numbering tables
+  # @FigureCaptionPos	{ Below 		} # Above or Below
+  # @TableCaptionPos	{ Below			} # Above or Below
+  # @CaptionFont        {                       } # figure, table caption font
+  # @CaptionBreak       {                       } # figure, table caption break
+  # @CaptionFormat      { @B { number @DotSep @OneCol }	} # figure, table caption format
+  # @MakeFigureContents { No                    } # list of figures at start
+  # @MakeTableContents  { No                    } # list of tables at start
+  # @MakeContents	{ No			} # make contents? Yes or No
+  # @ContentsGap	{ 0.20v	@OrIfPlain 0f	} # extra gap above minor entry
+  # @ContentsGapAbove	{ 0.80v	@OrIfPlain 1f	} # extra gap above major entry
+  # @ContentsGapBelow	{ 0.00v	@OrIfPlain 0f	} # extra gap below major entry
+  # @ContentsFont       { Bold                  } # font for major entry
+  # @ContentsPartGapAbove { 1.00v @OrIfPlain 1f	} # extra gap above `part' entry
+  # @ContentsPartGapBelow { 0.00v @OrIfPlain 0f	} # extra gap below `part' entry
+  # @ContentsFormat	{ number @DotSep title	} # contents entry format
+  # @ContentsLeader	{ ..			} # leader symbol in contents
+  # @ContentsLeaderGap	{ 4s	@OrIfPlain 2s	} # gap between leaders
+  # @ContentsRightWidth	{ 3f	@OrIfPlain 6s	} # page numbers column width
+  # @MakeReferences	{ Yes			} # make references? Yes or No
+  # @RefCiteStyle	{ [cite]		} # citation style
+  # @RefCiteLabels	{ @RefNum		} # citation items
+  # @RefNumbers		{ Arabic		} # reference numbers
+  # @RefListFormat	{ Labels		} # NoLabels, Labels, etc.
+  # @RefListLabels	{ [@RefNum]		} # ref list label format
+  # @RefListTitle	{ references		} # title of reference list
+  # @ChapRefListTitle	{ references		} # title of chapter ref list
+  # @RefListIndent	{ 0s			} # indent to left of labels
+  # @RefListRightIndent	{ 0s			} # indent to right of items
+  # @RefListGap		{ @ListGap		} # gap between ref list items
+  # @RefListFont	{        		} # font used in reference list
+  # @RefListBreak	{        		} # break style of ref list
+  # @RefListLabelWidth 	{ @ListLabelWidth	} # Labels column width
+  # @RefListSortKey	{ @Tag			} # sorting key
+  # @MakeIndex		{ No			} # make index? Yes or No
+  # @IndexFont		{			} # index entries font
+  # @IndexBreak		{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexColumnNumber	{ 2			} # index columns (1 to 10)
+  # @IndexColumnGap	{ 1.00c	@OrIfPlain 6s	} # index column gap
+  # @MakeIndexA		{ No 			} # make index A? Yes or No
+  # @IndexAFont		{			} # index A entries font
+  # @IndexABreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexAColumnNumber	{ 2			} # index A columns (1 to 10)
+  # @IndexAColumnGap	{ 1.00c	@OrIfPlain 6s	} # index A column gap
+  # @MakeIndexB		{ No 			} # make index B? Yes or No
+  # @IndexBFont		{			} # index B entries font
+  # @IndexBBreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexBColumnNumber	{ 2			} # index B columns (1 to 10)
+  # @IndexBColumnGap	{ 1.00c	@OrIfPlain 6s	} # index B column gap
+  # @TopGap		{ 0.75c	@OrIfPlain 2f	} # gap between figures
+  # @MidGap		{ 0.75c	@OrIfPlain 2f	} # gap above/below body text
+  # @FootNoteNumbers	{ Arabic		} # footnote numbers
+  # @FootNoteThrough	{ No			} # numbered through chapter?
+  # @FootNoteLocation	{ ColFoot		} # where the footnote appears
+  # @FootNoteFont	{ 0.80f			} # font for footnotes
+  # @FootNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for footnotes
+  # @FootNoteFormat     { { number &0.05f } @Insert body } # footnote format
+  # @FootLen		{ 2.00c	@OrIfPlain 10s	} # length of footnote line
+  # @FootAboveGap	{ @DisplayGap		} # gap above footnote line
+  # @FootGap		{ 0.20c	@OrIfPlain 1fx	} # gap between footnotes
+  # @MarginNoteFont	{ 0.80f			} # font of margin notes
+  # @MarginNoteBreak	{ ragged 1.10fx		} # break style of margin notes
+  # @MarginNoteHGap	{ 0.5c   		} # horizontal gap to notes
+  # @MarginNoteVGap	{ @DisplayGap		} # min vertical gap between
+  # @MarginNoteWidth	{ 1.50c  		} # width of margin notes
+  # @EndNoteNumbers	{ Arabic		} # endnote numbers
+  # @EndNoteFont	{ 0.80f			} # font of endnotes
+  # @EndNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for endnotes
+  # @EndNoteFormat	{ { number &0.05f } @Insert body } # endnote format
+  # @EndNoteGap		{ 0.20c	@OrIfPlain 1f	} # gap between endnotes
+  # @TheoremWord	{ theorem		} # "Theorem" word, etc.
+  # @TheoremTitleFormat	{ (title)		} # only if title present
+  # @TheoremFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @DefinitionWord	{ definition		} # "Definition" word, etc.
+  # @DefinitionTitleFormat { (title)		} # only if title present
+  # @DefinitionFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ClaimWord		{ claim			} # "Claim" word, etc.
+  # @ClaimTitleFormat	{ (title)		} # only if title present
+  # @ClaimFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @PropositionWord	{ proposition		} # "Proposition" word, etc.
+  # @PropositionTitleFormat { (title)		} # only if title present
+  # @PropositionFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @LemmaWord		{ lemma			} # "Lemma" word, etc.
+  # @LemmaTitleFormat	{ (title)		} # only if title present
+  # @LemmaFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @CorollaryWord	{ corollary		} # "Corollary" word, etc.
+  # @CorollaryTitleFormat { (title)		} # only if title present
+  # @CorollaryFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ExampleWord	{ example		} # "Example" word, etc.
+  # @ExampleTitleFormat	{ (title)		} # only if title present
+  # @ExampleFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ProofWord		{ proof			} # "Proof" word, etc.
+  # @PageHeaders	{ Simple		} # None Simple Titles NoTitles
+  # @PageNumbers	{ Arabic		} # page numbers
+  # @FirstPageNumber	{ 1			} # number of first page 
+  # @IntroPageNumbers	{ Roman			} # intro page numbers
+  # @IntroFirstPageNumber{ 1			} # number of first intro page 
+  # @StructPageNums	{ No			} # make structured page numbers
+
+  # @OddTop		{ @Centre{- @PageNum -}	} # Simple page headers
+  # @OddFoot		{ @Null			}
+  # @EvenTop		{ @Centre{- @PageNum -}	}
+  # @EvenFoot		{ @Null			}
+  # @StartOddTop	{ @Null			}
+  # @StartOddFoot	{ @Null			}
+  # @StartEvenTop	{ @Null			}
+  # @StartEvenFoot	{ @Null			}
+  # @IntroOddTop	{ @Null			}
+  # @IntroOddFoot	{ @Centre @PageNum	}
+  # @IntroEvenTop	{ @Null			}
+  # @IntroEvenFoot	{ @Centre @PageNum	}
+  # @IntroStartOddTop	{ @Null			}
+  # @IntroStartOddFoot	{ @Null			}
+  # @IntroStartEvenTop	{ @Null			}
+  # @IntroStartEvenFoot	{ @Null			}
+
+						  # Titles, NoTitles headers
+  # @RunningOddTop  { @I {@MinorNum @DotSep @MinorTitle} @Right @B @PageNum }
+  # @RunningOddFoot		{ @Null					}
+  # @RunningEvenTop { @B @PageNum @Right @I {@MajorNum @DotSep @MajorTitle} }
+  # @RunningEvenFoot		{ @Null					}
+  # @RunningStartOddTop 	{ @Null					}
+  # @RunningStartOddFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+  # @RunningStartEvenTop	{ @Null					}
+  # @RunningStartEvenFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+  # @RunningIntroOddTop		{ @Null					}
+  # @RunningIntroOddFoot	{ @Right @PageNum			}
+  # @RunningIntroEvenTop	{ @Null					}
+  # @RunningIntroEvenFoot	{ @PageNum				}
+  # @RunningIntroStartOddTop	{ @Null					}
+  # @RunningIntroStartOddFoot	{ @Null					}
+  # @RunningIntroStartEvenTop	{ @Null					}
+  # @RunningIntroStartEvenFoot	{ @Null					}
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @IllustrationSetup @Use clause - there are no options for this.        #
+#                                                                             #
+###############################################################################
+
+@Use { @IllustrationSetup
+}
+
+
+###############################################################################
+#                                                                             #
+#  @Database (and @SysDatabase) clauses go here.                              #
+#                                                                             #
+###############################################################################
+
+@SysDatabase @RefStyle { refstyle }		  # reference printing styles
diff --git a/include/picturef b/include/picturef
new file mode 100644
index 0000000..fd9177d
--- /dev/null
+++ b/include/picturef
@@ -0,0 +1,37 @@
+
+###########################################################################
+#                                                                         #
+#  @IllustrationSetup extension to @DocumentSetup.                        #
+#                                                                         #
+#  Jeffrey H. Kingston                                                    #
+#  August 1994                                                            #
+#                                                                         #
+#  This package extends DocumentSetup for illustrations.                  #
+#                                                                         #
+###########################################################################
+
+extend @BasicSetup @DocumentSetup
+export @Illustration
+def @IllustrationSetup
+@Begin
+
+    #######################################################################
+    #                                                                     #
+    #  @Illustration                                                      #
+    #                                                                     #
+    #######################################################################
+
+    def @Illustration
+	named @InitialFont { @InitialFont }
+	named @InitialBreak { @InitialBreak }
+	named @InitialSpace { @InitialSpace }
+	named @InitialLanguage { @InitialLanguage }
+	named @InitialColour { @InitialColour }
+	right x
+    {
+        @InitialFont @Font @InitialBreak @Break @InitialLanguage @Language
+	@InitialSpace @Space { @ColourCommand @InitialColour } @SetColour
+	@OneCol @OneRow x
+    }
+
+@End @IllustrationSetup
diff --git a/include/report b/include/report
new file mode 100644
index 0000000..01fdcc6
--- /dev/null
+++ b/include/report
@@ -0,0 +1,372 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for technical reports                                     #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#   17 September 1999                                                         #
+#                                                                             #
+#   Note: this version, released with Lout Version 3.13, is not upwardly      #
+#   compatible with previous versions:  the @Abstract symbol must now         #
+#   be placed before the //, not after.                                       #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  @SysInclude commands for standard packages.                                #
+#                                                                             #
+###############################################################################
+
+  @SysInclude { fontdefs	} # font definitions
+  @SysInclude { langdefs	} # language definitions
+  @SysInclude { bsf		} # BasicSetup package
+  @SysInclude { dsf		} # DocumentSetup package
+  @SysInclude { reportf		} # ReportSetup extension
+
+
+###############################################################################
+#                                                                             #
+#  @Include command for reading personal definitions from current directory.  #
+#                                                                             #
+###############################################################################
+
+  @Include { mydefs }
+
+
+###############################################################################
+#                                                                             #
+#  The @BasicSetup @Use clause - basics, lists, paragraphs, displays.         #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+ 
+@Use { @BasicSetup
+  # @InitialFont	{ Times Base 12p	} # initial font
+  # @InitialBreak	{{adjust 1.2fx hyphen} @OrIfPlain {ragged 1fx nohyphen}}
+  # @InitialSpace	{ lout			} # initial space style
+  # @InitialLanguage	{ English		} # initial language
+  # @InitialColour	{ black			} # initial colour
+  # @OptimizePages	{ No			} # optimize page breaks?
+  # @HeadingFont	{ Bold			} # font for @Heading
+  # @ParaGap		{ 1.3vx @OrIfPlain 1f	} # gap between paragraphs
+  # @ParaIndent		{ 2.00f	@OrIfPlain 5s	} # first-line indent for @PP
+  # @DisplayGap		{ 1.00v	@OrIfPlain 1f	} # gap above, below displays
+  # @DisplayIndent	{ 2.00f	@OrIfPlain 5s	} # @IndentedDisplay indent
+  # @DefaultIndent	{ 0.5rt			} # @Display indent
+  # @DisplayNumStyle	{ (num)			} # style of display numbers
+  # @WideIndent		{ 4.00f	@OrIfPlain 10s	} # @WideTaggedList indent
+  # @VeryWideIndent	{ 8.00f	@OrIfPlain 20s	} # @VeryWideTaggedList indent
+  # @ListOuterGap	{ 1.00v	@OrIfPlain 1f	} # gap before, after lists
+  # @ListGap		{ 1.00v	@OrIfPlain 1f	} # gap between list items
+  # @ListIndent		{ 0s			} # indent of list items
+  # @ListRightIndent	{ 0s			} # right indent of list items
+  # @ListLabelWidth	{ 2.00f	@OrIfPlain 5s	} # width allowed for list tags
+  # @NumberSeparator	{ .			} # separates nums like 2.3.7
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @DocumentSetup @Use clause - page layout plus figures, tables, etc.    #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+
+@Use { @DocumentSetup
+  # @PageType		{ A4	@OrIfPlain Other} # page type (width, height)
+  # @PageWidth		{ 80s			} # page width if type Other
+  # @PageHeight		{ 66f			} # page height if type Other
+  # @PageOrientation	{ Portrait		} # Portrait, Landscape, etc.
+  # @PageBackground	{  			} # background of each page
+  # @TopMargin		{ 2.5c	@OrIfPlain 6f	} # top margin of all pages
+  # @FootMargin		{ 2.5c	@OrIfPlain 6f	} # bottom margin of all pages
+  # @OddLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of odd pages
+  # @OddRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of odd pages
+  # @EvenLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of even pages
+  # @EvenRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of even pages
+  # @PageBoxType	{ None			} # None Box CurveBox ShadowBox
+  # @PageBoxMargin	{ 1.00c			} # page box margin
+  # @PageBoxLineWidth	{			} # page box line thickness
+  # @PageBoxPaint	{ none			} # page box paint
+  # @PageBoxShadow	{ 0.60c			} # shadow margin if ShadowBox
+  # @ColumnNumber	{ 1			} # number of columns (1 to 10)
+  # @ColumnGap		{ 1.00c	@OrIfPlain 6s	} # column gap
+  # @FigureLocation	{ PageTop		} # default figure location
+  # @TableLocation	{ PageTop		} # default table location
+  # @FigureFormat	{ @CC @Body		} # default figure format
+  # @TableFormat	{ @CC @Body		} # default table format
+  # @FigureWord		{ figure		} # "Figure" word else anything
+  # @TableWord		{ table			} # "Table" word else anything
+  # @FigureNumbers	{ Arabic		} # method of numbering figures
+  # @TableNumbers	{ Arabic		} # method of numbering tables
+  # @FigureCaptionPos	{ Below 		} # Above or Below
+  # @TableCaptionPos	{ Below			} # Above or Below
+  # @CaptionFont        {                       } # figure, table caption font
+  # @CaptionBreak       {                       } # figure, table caption break
+  # @CaptionFormat      { @B { number @DotSep @OneCol }	} # figure, table caption format
+  # @MakeFigureContents { No                    } # list of figures at start
+  # @MakeTableContents  { No                    } # list of tables at start
+  # @MakeContents	{ No			} # make contents? Yes or No
+  # @ContentsGap	{ 0.20v	@OrIfPlain 0f	} # extra gap above minor entry
+  # @ContentsGapAbove	{ 0.80v	@OrIfPlain 1f	} # extra gap above major entry
+  # @ContentsGapBelow	{ 0.00v	@OrIfPlain 0f	} # extra gap below major entry
+  # @ContentsFont       { Bold                  } # font for major entry
+  # @ContentsPartGapAbove { 1.00v @OrIfPlain 1f	} # extra gap above `part' entry
+  # @ContentsPartGapBelow { 0.00v @OrIfPlain 0f	} # extra gap below `part' entry
+  # @ContentsFormat	{ number @DotSep title	} # contents entry format
+  # @ContentsLeader	{ ..			} # leader symbol in contents
+  # @ContentsLeaderGap	{ 4s	@OrIfPlain 2s	} # gap between leaders
+  # @ContentsRightWidth	{ 3f	@OrIfPlain 6s	} # page numbers column width
+  # @MakeReferences	{ Yes			} # make references? Yes or No
+  # @RefCiteStyle	{ [cite]		} # citation style
+  # @RefCiteLabels	{ @RefNum		} # citation items
+  # @RefNumbers		{ Arabic		} # reference numbers
+  # @RefListFormat	{ Labels		} # NoLabels, Labels, etc.
+  # @RefListLabels	{ [@RefNum]		} # ref list label format
+  # @RefListTitle	{ references		} # title of reference list
+  # @ChapRefListTitle	{ references		} # title of chapter ref list
+  # @RefListIndent	{ 0s			} # indent to left of labels
+  # @RefListRightIndent	{ 0s			} # indent to right of items
+  # @RefListGap		{ @ListGap		} # gap between ref list items
+  # @RefListFont	{        		} # font used in reference list
+  # @RefListBreak	{        		} # break style of ref list
+  # @RefListLabelWidth 	{ @ListLabelWidth	} # Labels column width
+  # @RefListSortKey	{ @Tag			} # sorting key
+  # @MakeIndex		{ No			} # make index? Yes or No
+  # @IndexFont		{			} # index entries font
+  # @IndexBreak		{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexColumnNumber	{ 2			} # index columns (1 to 10)
+  # @IndexColumnGap	{ 1.00c	@OrIfPlain 6s	} # index column gap
+  # @MakeIndexA		{ No 			} # make index A? Yes or No
+  # @IndexAFont		{			} # index A entries font
+  # @IndexABreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexAColumnNumber	{ 2			} # index A columns (1 to 10)
+  # @IndexAColumnGap	{ 1.00c	@OrIfPlain 6s	} # index A column gap
+  # @MakeIndexB		{ No 			} # make index B? Yes or No
+  # @IndexBFont		{			} # index B entries font
+  # @IndexBBreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexBColumnNumber	{ 2			} # index B columns (1 to 10)
+  # @IndexBColumnGap	{ 1.00c	@OrIfPlain 6s	} # index B column gap
+  # @TopGap		{ 0.75c	@OrIfPlain 2f	} # gap between figures
+  # @MidGap		{ 0.75c	@OrIfPlain 2f	} # gap above/below body text
+  # @FootNoteNumbers	{ Arabic		} # footnote numbers
+  # @FootNoteThrough	{ No			} # numbered through chapter?
+  # @FootNoteLocation	{ ColFoot		} # where the footnote appears
+  # @FootNoteFont	{ 0.80f			} # font for footnotes
+  # @FootNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for footnotes
+  # @FootNoteFormat     { { number &0.05f } @Insert body } # footnote format
+  # @FootLen		{ 2.00c	@OrIfPlain 10s	} # length of footnote line
+  # @FootAboveGap	{ @DisplayGap		} # gap above footnote line
+  # @FootGap		{ 0.20c	@OrIfPlain 1fx	} # gap between footnotes
+  # @MarginNoteFont	{ 0.80f			} # font of margin notes
+  # @MarginNoteBreak	{ ragged 1.10fx		} # break style of margin notes
+  # @MarginNoteHGap	{ 0.5c   		} # horizontal gap to notes
+  # @MarginNoteVGap	{ @DisplayGap  		} # min vertical gap between
+  # @MarginNoteWidth	{ 1.50c  		} # width of margin notes
+  # @EndNoteNumbers	{ Arabic		} # endnote numbers
+  # @EndNoteFont	{ 0.80f			} # font of endnotes
+  # @EndNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for endnotes
+  # @EndNoteFormat	{ { number &0.05f } @Insert body } # endnote format
+  # @EndNoteGap		{ 0.20c	@OrIfPlain 1f	} # gap between endnotes
+  # @TheoremWord	{ theorem		} # "Theorem" word, etc.
+  # @TheoremTitleFormat	{ (title)		} # only if title present
+  # @TheoremFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @DefinitionWord	{ definition		} # "Definition" word, etc.
+  # @DefinitionTitleFormat { (title)		} # only if title present
+  # @DefinitionFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ClaimWord		{ claim			} # "Claim" word, etc.
+  # @ClaimTitleFormat	{ (title)		} # only if title present
+  # @ClaimFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @PropositionWord	{ proposition		} # "Proposition" word, etc.
+  # @PropositionTitleFormat { (title)		} # only if title present
+  # @PropositionFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @LemmaWord		{ lemma			} # "Lemma" word, etc.
+  # @LemmaTitleFormat	{ (title)		} # only if title present
+  # @LemmaFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @CorollaryWord	{ corollary		} # "Corollary" word, etc.
+  # @CorollaryTitleFormat { (title)		} # only if title present
+  # @CorollaryFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ExampleWord	{ example		} # "Example" word, etc.
+  # @ExampleTitleFormat	{ (title)		} # only if title present
+  # @ExampleFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ProofWord		{ proof			} # "Proof" word, etc.
+  # @PageHeaders	{ Simple		} # None Simple Titles NoTitles
+  # @PageNumbers	{ Arabic		} # page numbers
+  # @FirstPageNumber	{ 1			} # number of first page 
+  # @IntroPageNumbers	{ Roman			} # intro page numbers
+  # @IntroFirstPageNumber{ 1			} # number of first intro page 
+  # @StructPageNums	{ No			} # make structured page numbers
+
+  # @OddTop		{ @Centre{- @PageNum -}	} # Simple page headers
+  # @OddFoot		{ @Null			}
+  # @EvenTop		{ @Centre{- @PageNum -}	}
+  # @EvenFoot		{ @Null			}
+  # @StartOddTop	{ @Null			}
+  # @StartOddFoot	{ @Null			}
+  # @StartEvenTop	{ @Null			}
+  # @StartEvenFoot	{ @Null			}
+  # @IntroOddTop	{ @Null			}
+  # @IntroOddFoot	{ @Centre @PageNum	}
+  # @IntroEvenTop	{ @Null			}
+  # @IntroEvenFoot	{ @Centre @PageNum	}
+  # @IntroStartOddTop	{ @Null			}
+  # @IntroStartOddFoot	{ @Null			}
+  # @IntroStartEvenTop	{ @Null			}
+  # @IntroStartEvenFoot	{ @Null			}
+
+						  # Titles, NoTitles headers
+  # @RunningOddTop  { @I {@MinorNum @DotSep @MinorTitle} @Right @B @PageNum }
+  # @RunningOddFoot		{ @Null					}
+  # @RunningEvenTop { @B @PageNum @Right @I {@MajorNum @DotSep @MajorTitle} }
+  # @RunningEvenFoot		{ @Null					}
+  # @RunningStartOddTop 	{ @Null					}
+  # @RunningStartOddFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+  # @RunningStartEvenTop	{ @Null					}
+  # @RunningStartEvenFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+  # @RunningIntroOddTop		{ @Null					}
+  # @RunningIntroOddFoot	{ @Right @PageNum			}
+  # @RunningIntroEvenTop	{ @Null					}
+  # @RunningIntroEvenFoot	{ @PageNum				}
+  # @RunningIntroStartOddTop	{ @Null					}
+  # @RunningIntroStartOddFoot	{ @Null					}
+  # @RunningIntroStartEvenTop	{ @Null					}
+  # @RunningIntroStartEvenFoot	{ @Null					}
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @ReportSetup @Use clause - options specific to technical reports.      #
+#                                                                             #
+###############################################################################
+
+@Use { @ReportSetup
+  # @CoverSheet			{ Yes		} # make cover sheet
+  # @DisplayAbstract		{ No		} # abstract full width display
+  # @ContentsSeparate		{ No		} # contents on separate pages
+  # @DateLine			{ No		} # Yes, No, or a date
+  # @ReferencesBeforeAppendices	{ No		} # references before appendices
+  # @AbstractWord		{ abstract	} # word for "Abstract"
+  # @ContentsWord		{ contents	} # word for "Contents"
+  # @AppendixWord		{ appendix	} # word for "Appendix"
+  # @IndexWord			{ index		} # word for "Index"
+  # @IndexAWord			{ index		} # word for "Index" (A)
+  # @IndexBWord			{ index		} # word for "Index" (B)
+  # @SectionNumbers		{ Arabic	} # kind of section numbers
+  # @FirstSectionNumber		{ 1		} # first section num (Arabic)
+  # @SubSectionNumbers		{ Arabic	} # kind of subsection numbers
+  # @FirstSubSectionNumber	{ 1		} # first subsect num (Arabic)
+  # @SubSubSectionNumbers	{ Arabic	} # kind of sub-subsect numbers
+  # @FirstSubSubSectionNumber	{ 1		} # first subsub. num (Arabic)
+  # @AppendixNumbers		{ UCAlpha	} # kind of appendix numbers
+  # @FirstAppendixNumber	{ 1		} # first appendix num (Arabic)
+  # @SubAppendixNumbers		{ Arabic	} # kind of subappendix numbers
+  # @FirstSubAppendixNumber	{ 1		} # first sub-app. num (Arabic)
+  # @SubSubAppendixNumbers	{ Arabic	} # kind of sub-subapp. numbers
+  # @FirstSubSubAppendixNumber	{ 1		} # first sub-sub. num (Arabic)
+  # @AbstractHeadingFont	{ Bold			} # abstract head font
+  # @AbstractHeadingBreak	{ ragged 1.2fx nohyphen	} # abstract head break
+  # @AbstractHeadingFormat	{ title			} # abstract head fmt
+  # @ContentsHeadingFont	{ Bold			} # contents head font
+  # @ContentsHeadingBreak	{ ragged 1.2fx nohyphen	} # contents head break
+  # @ContentsHeadingFormat	{ title			} # contents head fmt
+  # @SectionHeadingFont		{ Bold			} # section head font
+  # @SectionHeadingBreak	{ ragged 1.2fx nohyphen	} # section head break
+  # @SectionHeadingFormat	{ number @DotSep title	} # section head fmt
+  # @SubSectionHeadingFont	{ Bold			} # subsection head font
+  # @SubSectionHeadingBreak	{ ragged 1.2fx nohyphen	} # subsection head break
+  # @SubSectionHeadingFormat	{ number @DotSep title	} # subsection head fmt
+  # @SubSubSectionHeadingFont	{ Slope			} # sub-subs. head font
+  # @SubSubSectionHeadingBreak	{ ragged 1.2fx nohyphen	} # sub-subs. head break
+  # @SubSubSectionHeadingFormat	{ number @DotSep title	} # sub-subs. head fmt
+  # @AppendixHeadingFont	{ Bold			} # appendix head font
+  # @AppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # appendix head break
+  # @AppendixHeadingFormat	{ number @DotSep title	} # appendix head fmt
+  # @SubAppendixHeadingFont	{ Bold			} # subapp. head font
+  # @SubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # subapp. head break
+  # @SubAppendixHeadingFormat	{ number @DotSep title	} # subapp. head fmt
+  # @SubSubAppendixHeadingFont	{ Slope			} # sub-subapp. head font
+  # @SubSubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	} # sub-subapp head break
+  # @SubSubAppendixHeadingFormat{ number @DotSep title	} # sub-subapp. head fmt
+  # @ReferencesHeadingFont	{ Bold			} # references head font
+  # @ReferencesHeadingBreak	{ ragged 1.2fx nohyphen	} # references head break
+  # @ReferencesHeadingFormat	{ title			} # references head fmt
+  # @IndexHeadingFont		{ Bold			} # index head font
+  # @IndexHeadingBreak		{ ragged 1.2fx nohyphen	} # index head break
+  # @IndexHeadingFormat		{ title			} # index head fmt
+  # @IndexAHeadingFont		{ Bold			} # index A head font
+  # @IndexAHeadingBreak		{ ragged 1.2fx nohyphen	} # index A head break
+  # @IndexAHeadingFormat	{ title			} # index A head fmt
+  # @IndexBHeadingFont		{ Bold			} # index B head font
+  # @IndexBHeadingBreak		{ ragged 1.2fx nohyphen	} # index B head break
+  # @IndexBHeadingFormat	{ title			} # index B head fmt
+  # @SectionGap			{ 2.0v	@OrIfPlain 3f	} # between sections
+  # @SubSectionGap		{ 1.5v	@OrIfPlain 2f	} # between subsects
+  # @SubSubSectionGap		{ 1.5v	@OrIfPlain 2f	} # between sub-subs.
+  # @AppendixGap		{ 2.0v	@OrIfPlain 3f	} # between appendices
+  # @SubAppendixGap		{ 1.5v	@OrIfPlain 2f	} # between subappendices
+  # @SubSubAppendixGap		{ 1.5v	@OrIfPlain 2f	} # between sub-subapps
+  # @SectionInContents		{ Yes		} # add sections to contents
+  # @SubSectionInContents	{ Yes		} # add subsections to contents
+  # @SubSubSectionInContents	{ No		} # add sub-subsects to contents
+  # @AppendixInContents		{ Yes		} # add appendices to contents
+  # @SubAppendixInContents	{ Yes		} # add subappendices to contents
+  # @SubSubAppendixInContents	{ No		} # add sub-subapps to contents
+  # @ReferencesInContents	{ Yes		} # add references to contents
+  # @IndexInContents		{ Yes		} # add index to contents
+  # @IndexAInContents		{ Yes		} # add index A to contents
+  # @IndexBInContents		{ Yes		} # add index B to contents
+  # @SectionNumInTheorems	{ No		} # theorem num has section num
+  # @SubSectionNumInTheorems	{ No		} # theorem num has subsect num
+  # @SubSubSectionNumInTheorems	{ No		} # theorem num has sub-ss. num
+  # @AppendixNumInTheorems	{ No		} # theorem num has appendix num
+  # @SubAppendixNumInTheorems	{ No		} # theorem num has sub-app num
+  # @SubSubAppendixNumInTheorems{ No		} # theorem num has sub-sa. num
+  # @SectionNumInDisplays	{ Yes		} # display num has section num
+  # @SubSectionNumInDisplays	{ No		} # display num has subsect num
+  # @SubSubSectionNumInDisplays	{ No		} # display num has sub-ss. num
+  # @AppendixNumInDisplays	{ Yes		} # display num has appendix num
+  # @SubAppendixNumInDisplays	{ No		} # display num has sub-app num
+  # @SubSubAppendixNumInDisplays{ No		} # display num has sub-sa. num
+  # @SectionNumInFigures	{ No		} # figure num has section num
+  # @SubSectionNumInFigures	{ No		} # figure num has subsect num
+  # @SubSubSectionNumInFigures	{ No		} # figure num has sub-ss. num
+  # @AppendixNumInFigures	{ No		} # figure num has appendix num
+  # @SubAppendixNumInFigures	{ No		} # figure num has sub-app num
+  # @SubSubAppendixNumInFigures	{ No		} # figure num has sub-sa. num
+  # @SectionNumInTables		{ No		} # table num has section num
+  # @SubSectionNumInTables	{ No		} # table num has subsect num
+  # @SubSubSectionNumInTables	{ No		} # table num has sub-ss. num
+  # @AppendixNumInTables	{ No		} # table num has appendix num
+  # @SubAppendixNumInTables	{ No		} # table num has sub-app num
+  # @SubSubAppendixNumInTables	{ No		} # table num has sub-sa. num
+  # @SectionNumInRunners 	{ Yes		} # runners have section num
+  # @SubSectionNumInRunners 	{ No		} # runners have subsect num
+  # @SubSubSectionNumInRunners 	{ No		} # runners have sub-ss. num
+  # @AppendixNumInRunners 	{ Yes		} # runners have appendix num
+  # @SubAppendixNumInRunners 	{ No		} # runners have sub-app num
+  # @SubSubAppendixNumInRunners { No		} # runners have sub-sa. num
+  # @FigureContentsPrefix	{		} # for structured page nums
+  # @TableContentsPrefix	{		} # for structured page nums
+  # @SectionPrefix		{		} # for structured page nums
+  # @AppendixPrefix		{		} # for structured page nums
+  # @ReferencesPrefix		{		} # for structured page nums
+  # @IndexPrefix		{		} # for structured page nums
+  # @IndexAPrefix		{		} # for structured page nums
+  # @IndexBPrefix		{		} # for structured page nums
+}
+
+
+###############################################################################
+#                                                                             #
+#  @Database (and @SysDatabase) clauses go here.                              #
+#                                                                             #
+###############################################################################
+
+@SysDatabase @RefStyle { refstyle }		  # reference printing styles
diff --git a/include/reportf b/include/reportf
new file mode 100644
index 0000000..f1a62a9
--- /dev/null
+++ b/include/reportf
@@ -0,0 +1,895 @@
+
+###########################################################################
+#                                                                         #
+#  @ReportSetup extension to @DocumentSetup.                              #
+#                                                                         #
+#  Jeffrey H. Kingston                                                    #
+#  August 1994                                                            #
+#                                                                         #
+#  This package extends DocumentSetup with definitions for reports.       #
+#                                                                         #
+###########################################################################
+
+extend @BasicSetup @DocumentSetup
+export @Report @Section @Appendix
+def @ReportSetup
+    named @CoverSheet			{ Yes			}
+    named @ContentsSeparate		{ No			}
+    named @DateLine			{ No			}
+    named @AbstractDisplay		{ Yes			}
+    named @AbstractTitle		{ dft			}
+    named @ReferencesBeforeAppendices	{ No			}
+
+    named @AbstractWord			{ abstract		}
+    named @ContentsWord			{ contents		}
+    named @AppendixWord			{ appendix		}
+    named @IndexWord			{ index			}
+    named @IndexAWord			{ index			}
+    named @IndexBWord			{ index			}
+
+    named @SectionNumbers		{ Arabic		}
+    named @FirstSectionNumber		{ 1			}
+    named @SubSectionNumbers		{ Arabic		}
+    named @FirstSubSectionNumber	{ 1			}
+    named @SubSubSectionNumbers		{ Arabic		}
+    named @FirstSubSubSectionNumber	{ 1			}
+    named @AppendixNumbers		{ UCAlpha		}
+    named @FirstAppendixNumber		{ 1			}
+    named @SubAppendixNumbers		{ Arabic		}
+    named @FirstSubAppendixNumber	{ 1			}
+    named @SubSubAppendixNumbers	{ Arabic		}
+    named @FirstSubSubAppendixNumber	{ 1			}
+
+    named @AbstractHeadingFont		{ Bold			}
+    named @AbstractHeadingBreak		{ ragged 1.2fx nohyphen }
+    named @AbstractHeadingFormat
+	    right title			{ title			}
+
+    named @ContentsHeadingFont		{ Bold			}
+    named @ContentsHeadingBreak		{ ragged 1.2fx nohyphen }
+    named @ContentsHeadingFormat
+	    right title			{ title			}
+
+    named @SectionHeadingFont		{ Bold			}
+    named @SectionHeadingBreak		{ ragged 1.2fx nohyphen }
+    named @SectionHeadingFormat
+	    left number right title	{ number @DotSep title	}
+
+    named @SubSectionHeadingFont	{ Bold			}
+    named @SubSectionHeadingBreak	{ ragged 1.2fx nohyphen	}
+    named @SubSectionHeadingFormat
+	    left number right title	{ number @DotSep title	}
+
+    named @SubSubSectionHeadingFont	{ Slope			}
+    named @SubSubSectionHeadingBreak	{ ragged 1.2fx nohyphen	}
+    named @SubSubSectionHeadingFormat
+	    left number right title	{ number @DotSep title	}
+
+    named @AppendixHeadingFont		{ Bold			}
+    named @AppendixHeadingBreak		{ ragged 1.2fx nohyphen	}
+    named @AppendixHeadingFormat
+	    left number right title	{ number @DotSep title	}
+
+    named @SubAppendixHeadingFont	{ Bold			}
+    named @SubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	}
+    named @SubAppendixHeadingFormat
+	    left number right title	{ number @DotSep title	}
+
+    named @SubSubAppendixHeadingFont	{ Slope			}
+    named @SubSubAppendixHeadingBreak	{ ragged 1.2fx nohyphen	}
+    named @SubSubAppendixHeadingFormat
+	    left number right title	{ number @DotSep title	}
+
+    named @ReferencesHeadingFont	{ Bold			}
+    named @ReferencesHeadingBreak	{ ragged 1.2fx nohyphen	}
+    named @ReferencesHeadingFormat
+	    right title			{ title			}
+
+    named @IndexHeadingFont		{ Bold			}
+    named @IndexHeadingBreak		{ ragged 1.2fx nohyphen	}
+    named @IndexHeadingFormat
+	    right title			{ title			}
+
+    named @IndexAHeadingFont		{ Bold			}
+    named @IndexAHeadingBreak		{ ragged 1.2fx nohyphen	}
+    named @IndexAHeadingFormat
+	    right title			{ title			}
+
+    named @IndexBHeadingFont		{ Bold			}
+    named @IndexBHeadingBreak		{ ragged 1.2fx nohyphen	}
+    named @IndexBHeadingFormat
+	    right title			{ title			}
+
+    named @SectionGap			{ 2.0v  @OrIfPlain 3f	}
+    named @SubSectionGap		{ 1.5v  @OrIfPlain 2f	}
+    named @SubSubSectionGap		{ 1.5v  @OrIfPlain 2f	}
+    named @AppendixGap			{ 2.0v  @OrIfPlain 3f	}
+    named @SubAppendixGap		{ 1.5v  @OrIfPlain 2f	}
+    named @SubSubAppendixGap		{ 1.5v  @OrIfPlain 2f	}
+
+    named @SectionInContents		{ Yes			}
+    named @SubSectionInContents		{ Yes			}
+    named @SubSubSectionInContents	{ No			}
+    named @AppendixInContents		{ Yes			}
+    named @SubAppendixInContents	{ Yes			}
+    named @SubSubAppendixInContents	{ No			}
+    named @ReferencesInContents		{ Yes			}
+    named @IndexInContents		{ Yes			}
+    named @IndexAInContents		{ Yes			}
+    named @IndexBInContents		{ Yes			}
+
+    named @SectionNumInTheorems		{ No			}
+    named @SubSectionNumInTheorems	{ No			}
+    named @SubSubSectionNumInTheorems	{ No			}
+    named @AppendixNumInTheorems	{ No			}
+    named @SubAppendixNumInTheorems	{ No			}
+    named @SubSubAppendixNumInTheorems	{ No			}
+
+    named @SectionNumInDisplays		{ Yes			}
+    named @SubSectionNumInDisplays	{ No			}
+    named @SubSubSectionNumInDisplays	{ No			}
+    named @AppendixNumInDisplays	{ Yes			}
+    named @SubAppendixNumInDisplays	{ No			}
+    named @SubSubAppendixNumInDisplays	{ No			}
+
+    named @SectionNumInFigures		{ No			}
+    named @SubSectionNumInFigures	{ No			}
+    named @SubSubSectionNumInFigures	{ No			}
+    named @AppendixNumInFigures		{ No			}
+    named @SubAppendixNumInFigures	{ No			}
+    named @SubSubAppendixNumInFigures	{ No			}
+
+    named @SectionNumInTables		{ No			}
+    named @SubSectionNumInTables	{ No			}
+    named @SubSubSectionNumInTables	{ No			}
+    named @AppendixNumInTables		{ No			}
+    named @SubAppendixNumInTables	{ No			}
+    named @SubSubAppendixNumInTables	{ No			}
+
+    named @SectionNumInRunners		{ Yes			}
+    named @SubSectionNumInRunners	{ No			}
+    named @SubSubSectionNumInRunners	{ No			}
+    named @AppendixNumInRunners		{ Yes			}
+    named @SubAppendixNumInRunners	{ No			}
+    named @SubSubAppendixNumInRunners	{ No			}
+
+    named @FigureContentsPrefix		{			}
+    named @TableContentsPrefix		{			}
+    named @SectionPrefix		{			}
+    named @AppendixPrefix		{			}
+    named @ReferencesPrefix		{			}
+    named @IndexPrefix			{			}
+    named @IndexAPrefix			{			}
+    named @IndexBPrefix			{			}
+@Begin
+
+    #######################################################################
+    #                                                                     #
+    #  Lists of sections, subsections, etc.                               #
+    #                                                                     #
+    #######################################################################
+
+    export num
+    def @SectionList named @Tag {} right num
+    {
+	@Galley
+        //@SectionGap	@SectionList @Next num
+    }
+
+    export num
+    def @SubSectionList named @Tag {} right num
+    {
+	@Galley
+        //@SubSectionGap    @SubSectionList @Next num
+    }
+
+    export num
+    def @SubSubSectionList named @Tag {} right num
+    {
+	@Galley
+        //@SubSubSectionGap @SubSubSectionList @Next num
+    }
+
+    export num
+    def @AppendixList named @Tag {} right num
+    {
+	@Galley
+        //@AppendixGap	@AppendixList @Next num
+    }
+
+    export num
+    def @SubAppendixList named @Tag {} right num
+    {
+	@Galley
+        //@SubAppendixGap   @SubAppendixList @Next num
+    }
+
+    export num
+    def @SubSubAppendixList named @Tag {} right num
+    {
+	@Galley
+        //@SubSubAppendixGap   @SubSubAppendixList @Next num
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  @Full - this sends text to a full-width place.                     #
+    #                                                                     #
+    #######################################################################
+
+    def @Full force into { @FullPlace&&following } right x
+    {
+        x
+    }
+
+    def @NoForceFull into { @FullPlace&&following } right x
+    {
+        x
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  @Report                                                            #
+    #                                                                     #
+    #######################################################################
+
+    def @Report
+        named @Title {}
+        named @Author {}
+        named @Institution {}
+        named @DateLine { @DateLine }
+        named @CoverSheet { @CoverSheet }
+        named @ContentsSeparate { @ContentsSeparate }
+        named @AtEnd { dft }
+        named @InitialFont { @InitialFont }
+        named @InitialBreak { @InitialBreak }
+        named @InitialSpace { @InitialSpace }
+        named @InitialLanguage { @InitialLanguage }
+	named @PageOrientation { @PageOrientation }
+        named @PageHeaders { @PageHeaders }
+        named @ColumnNumber { @ColumnNumber }
+        named @FirstPageNumber { @FirstPageNumber }
+	named @OptimizePages { @OptimizePages }
+	named @AbstractDisplay { @AbstractDisplay }
+	named @AbstractTitle { @AbstractTitle }
+	named @Abstract {}
+    {
+
+	def @Cntr right x
+	{
+	    x @Case {
+		""	@Yield @Null
+		else	@Yield { |0.5rt x | }
+	    }
+	}
+
+	def @DateValue right indent
+	{
+	    @DateLine @Case {
+		No	@Yield {}
+		Yes	@Yield @Date
+		else	@Yield @DateLine
+	    }
+	}
+
+	def @TitleMaterial
+	{
+	    //1i    @B {clines 1.4vx} @Break @Cntr @Title
+	    //1.00v @I clines @Break { |0.5rt @Author | }
+	    //1.00v clines @Break @Cntr @Institution
+	    //1.00v clines @Break @Cntr @DateValue
+	}
+
+	def @AbstractPart
+	{
+	    def @Title
+	    {
+		@AbstractHeadingFont @Font @AbstractHeadingBreak @Break
+		@AbstractHeadingFormat {
+		    @AbstractTitle @Dft { abstract @WordVal @AbstractWord }
+		}
+	    }
+
+	    @Abstract @Case {
+
+		"" @Yield @Null
+
+		else @Yield @AbstractDisplay @Case {
+		    
+		    No @Yield { @Title @DP @Abstract }
+
+		    Yes @Yield { |0.5rt @Title |
+				 @DP
+				 |@DisplayIndent @Abstract |@DisplayIndent
+				}
+		}
+	    }
+	}
+
+	def @ContentsPart
+	{
+	    //	|0.5rt @ContentsHeadingFont @Font @ContentsHeadingBreak @Break
+		       @ContentsHeadingFormat { contents @WordVal @ContentsWord } |
+	    //@DisplayGap  @ContentsSection
+	    //  NonStart @Runner @MajorTitle {contents @WordVal @ContentsWord}
+	}
+
+	def @ReferencesPart
+	    named @Tag {}
+	{
+
+           @LargeScaleStructure
+                tag { @Tag }
+                type { Major }
+                initiallanguage { @InitialLanguage }
+                title { @RefHeading @RefListTitle }
+		sendheader { @Body }
+                headingfont { @ReferencesHeadingFont }
+                headingbreak { @ReferencesHeadingBreak }
+                headingformat { @ReferencesHeadingFormat @Body }
+                incontents { @ReferencesInContents }
+		majornum {}
+		majortitle {}
+		minornum {}
+		minortitle { @RefHeading @RefListTitle }
+                prefix { @ReferencesPrefix }
+                inrunners { Yes }
+                { //@RefListGap @ReferencesSection }
+	}
+
+        def @IndexPart
+	    named @Tag {}
+        {
+
+            def @Run
+            {
+                NonStart @Runner
+                    @MajorNum {}
+                    @MajorTitle { index @WordVal @IndexWord }
+                    @MinorNum {}
+                    @MinorTitle {}
+                    @Owner { @Tag }
+                    @Prefix { @IndexPrefix }
+            }
+
+            @LargeScaleStructure
+                tag { @Tag }
+                type { Major }
+                initiallanguage { @InitialLanguage }
+                title { index @WordVal @IndexWord }
+                headingfont { @IndexHeadingFont }
+                headingbreak { @IndexHeadingBreak }
+                headingformat { @IndexHeadingFormat @Body }
+                incontents { @IndexInContents }
+                prefix { @IndexPrefix }
+                inrunners { Yes }
+		majornum {}
+		majortitle {}
+		minornum {}
+		minortitle { index @WordVal @IndexWord }
+                sendheader { @Full @Body }
+                innergap { @SectionGap }
+		wantindefinite { Yes }
+                @IndexSection @Run
+
+        }
+
+        def @IndexAPart
+	    named @Tag {}
+        {
+            def @Run
+            {
+                NonStart @Runner
+                    @MajorNum {}
+                    @MajorTitle { index @WordVal @IndexAWord }
+                    @MinorNum {}
+                    @MinorTitle {}
+                    @Owner { @Tag }
+                    @Prefix { @IndexAPrefix }
+            }
+
+            @LargeScaleStructure
+                tag { @Tag }
+                type { Major }
+                initiallanguage { @InitialLanguage }
+                title { index @WordVal @IndexAWord }
+                headingfont { @IndexAHeadingFont }
+                headingbreak { @IndexAHeadingBreak }
+                headingformat { @IndexAHeadingFormat @Body }
+                incontents { @IndexAInContents }
+                prefix { @IndexAPrefix }
+                inrunners { Yes }
+		majornum {}
+		majortitle {}
+		minornum {}
+		minortitle { index @WordVal @IndexAWord }
+                sendheader { @Full @Body }
+                innergap { @SectionGap }
+		wantindefinite { Yes }
+                @IndexASection @Run
+
+        }
+
+        def @IndexBPart
+	    named @Tag {}
+        {
+            def @Run
+            {
+                NonStart @Runner
+                    @MajorNum {}
+                    @MajorTitle { index @WordVal @IndexBWord }
+                    @MinorNum {}
+                    @MinorTitle {}
+                    @Owner { @Tag }
+                    @Prefix { @IndexBPrefix }
+            }
+
+            @LargeScaleStructure
+                tag { @Tag }
+                type { Major }
+                initiallanguage { @InitialLanguage }
+                title { index @WordVal @IndexBWord }
+                headingfont { @IndexBHeadingFont }
+                headingbreak { @IndexBHeadingBreak }
+                headingformat { @IndexBHeadingFormat @Body }
+                incontents { @IndexBInContents }
+                prefix { @IndexBPrefix }
+                inrunners { Yes }
+		majornum {}
+		majortitle {}
+		minornum {}
+		minortitle { index @WordVal @IndexBWord }
+                sendheader { @Full @Body }
+                innergap { @SectionGap }
+		wantindefinite { Yes }
+                @IndexBSection @Run
+
+        }
+
+	def @ContentsGap
+	{
+	    @ContentsSeparate @Case {
+		No  @Yield @SectionGap
+		Yes @Yield 2b
+	    }
+	}
+
+        def @ReportBodyWithoutCoverSheet force into { @ColPlace&&following }
+	    named @Optimize { @OptimizePages }
+        {
+
+	      			Start @Runner
+	    //			@AbstractDisplay @NoDo @AbstractPart
+	    //@ContentsGap	@ContentsPart
+	    //@ContentsGap	@SectionList @FirstSectionNumber
+	    //@SectionGap	@ReferencesBeforeAppendices @Do {
+				    @MakeReferences @Do @ReferencesPart
+				}
+            //@AppendixGap	@AppendixList @FirstAppendixNumber
+	    //@SectionGap	@EndFigureList
+	    //@SectionGap	@EndNoteList 1
+	    //@SectionGap	@ReferencesBeforeAppendices @NoDo {
+				    @MakeReferences @Do @ReferencesPart
+				}
+	    //			@MakeIndexA @Do @IndexAPart
+	    //			@MakeIndexB @Do @IndexBPart
+	    //			@MakeIndex  @Do @IndexPart
+        }
+
+        def @ReportCoverSheet into { @IntroColPlace&&preceding }
+	    named @Optimize { @OptimizePages }
+        {
+	    //                  Start @Runner
+	    //			@TitleMaterial
+	    //@DisplayGap	@DP @AbstractPart
+	}
+
+        def @ReportBodyWithCoverSheet force into { @ColPlace&&preceding }
+	    named @Optimize { @OptimizePages }
+        {
+
+	      	 		Start @Runner
+	    //@SectionGap	@ContentsPart
+	    //@SectionGap	@SectionList @FirstSectionNumber
+	    //@SectionGap	@ReferencesBeforeAppendices @Do {
+				    @MakeReferences @Do @ReferencesPart
+				}
+            //@AppendixGap	@AppendixList @FirstAppendixNumber
+	    //@SectionGap	@ReferencesBeforeAppendices @NoDo {
+				    @MakeReferences @Do @ReferencesPart
+				}
+	    //@SectionGap	@EndFigureList
+	    //@SectionGap	@EndNoteList 1
+	    //			@MakeIndexA @Do @IndexAPart
+	    //			@MakeIndexB @Do @IndexBPart
+	    //			@MakeIndex  @Do @IndexPart
+        }
+
+        @InitialFont @Font @InitialBreak @Break @InitialLanguage @Language
+	@InitialSpace @Space { @ColourCommand @InitialColour } @SetColour
+        {
+	    @CoverSheet @Case {
+
+		No @Yield {
+		        @FootNoteThrough @Do @BeginFootNoteCounter
+		    //	Yes @BeginAllCounters {}
+		    //	Yes @BeginDisplayCounter {}
+		    //	Yes @BeginFigureCounter {}
+		    //	Yes @BeginTableCounter {}
+		    //  @AbstractDisplay @Do { @NoForceFull @AbstractPart }
+		    //  @ReportBodyWithoutCoverSheet
+		    //  @PageList
+			    @ColumnNumber { @ColumnNumber }
+			    @PageHeaders { @PageHeaders }
+			    @Orient { @PageOrientation }
+			    # extra { Yes }
+			    @AtTop { @TitleMaterial }
+			    @FirstPageNumber
+		    //	NonStart @Runner
+		    //  @AtEnd @Case {
+			    dft @Yield @Null
+			    else @Yield
+				 @EvenPage @Orient { @PageOrientation } @AtEnd
+			}
+		}
+
+		Yes @Yield {
+		        @FootNoteThrough @Do @BeginFootNoteCounter
+		    //	Yes @BeginAllCounters {}
+		    //	Yes @BeginDisplayCounter {}
+		    //	Yes @BeginFigureCounter {}
+		    //	Yes @BeginTableCounter {}
+		    //  @SimpleOddOrEvenIntroPageList
+			    @ColumnNumber { 1 }
+			    @PageHeaders { Simple }
+			    @Orient { @PageOrientation }
+			    1
+		    //	@ReportCoverSheet
+		    //	@PageList
+			    @ColumnNumber { @ColumnNumber }
+			    @PageHeaders { @PageHeaders }
+			    @Orient { @PageOrientation }
+			    # extra { Yes }
+			    @AtTop { @TitleMaterial }
+			    @FirstPageNumber
+		    //	@ReportBodyWithCoverSheet
+		    //	NonStart @Runner
+		    //  @AtEnd @Case {
+			    dft @Yield @Null
+			    else @Yield
+				 @EvenPage @Orient { @PageOrientation } @AtEnd
+			}
+		}
+	    }
+        }
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Sections.                                                          #
+    #                                                                     #
+    #######################################################################
+
+    export @BeginSubSections @EndSubSections @SubSection
+    def @Section force into { @SectionList&&preceding }
+	named @Tag {}
+	named @Title {}
+	named @RunningTitle { dft }
+	named @InitialLanguage {}
+	named @BypassNumber { dft }
+	body @Body
+    {
+
+        def @EndSubSectionsPlace { @Galley }
+
+        def @EndSubSections force into { @EndSubSectionsPlace&&preceding }
+	{}
+
+        macro @BeginSubSections
+        {
+	    //@SubSectionGap @SubSectionList @FirstSubSectionNumber
+	    // @EndSubSectionsPlace //
+	}
+
+        def @SectionShortNum
+	{
+	    @SectionNumbers @Then {
+		@BypassNumber @Dft {
+		    @SectionNumbers @Num @SectionList&&@Tag @Open { num }
+		}
+	    }
+	}
+
+	export @BeginSubSubSections @EndSubSubSections @SubSubSection
+        def @SubSection force into { @SubSectionList&&preceding }
+	    named @Tag {}
+	    named @Title {}
+	    named @RunningTitle { dft }
+	    named @InitialLanguage { @InitialLanguage }
+	    named @BypassNumber { dft }
+	    body @Body
+        {
+
+	    def @EndSubSubSectionsPlace { @Galley }
+
+            def @EndSubSubSections force into
+		{ @EndSubSubSectionsPlace&&preceding }
+	    {}
+
+            macro @BeginSubSubSections
+            {
+		//@SubSubSectionGap @SubSubSectionList @FirstSubSubSectionNumber
+		// @EndSubSubSectionsPlace //
+	    }
+
+	    def @SubSectionShortNum
+	    {
+		@SubSectionNumbers @Then {
+		    @BypassNumber @Dft {
+			@SectionShortNum @Join @SubSectionNumbers @Num
+			{ @SubSectionList&&@Tag @Open { num } }
+		    }
+		}
+	    }
+
+	    def @SubSubSection force into { @SubSubSectionList&&preceding }
+		named @Tag {}
+		named @Title {}
+		named @RunningTitle { dft }
+		named @InitialLanguage { @InitialLanguage }
+		named @BypassNumber { dft }
+		body @Body
+	    {
+
+		@LargeScaleStructure
+		    tag { @Tag }
+		    type { Minor }
+		    initiallanguage { @InitialLanguage }
+		    title { @Title }
+		    runningtitle { @RunningTitle }
+		    headingfont { @SubSubSectionHeadingFont }
+		    headingbreak { @SubSubSectionHeadingBreak }
+		    headingformat { @Num @SubSubSectionHeadingFormat @Body }
+		    incontents { @SubSubSectionInContents }
+		    contentsindent { 6f }
+		    numbers { @SubSubSectionNumbers }
+		    attachnum { @SubSubSectionList&&preceding @Tagged @Tag }
+		    retrievenum { @SubSubSectionList&&@Tag @Open { num } }
+		    bypassnumber { @BypassNumber }
+		    prefix { @SubSectionShortNum }
+		    majornum {}
+		    majortitle {}
+		    intheorems { @SubSubSectionNumInTheorems }
+		    indisplays { @SubSubSectionNumInDisplays }
+		    infigures { @SubSubSectionNumInFigures }
+		    intables { @SubSubSectionNumInTables }
+		    inrunners { @SubSubSectionNumInRunners }
+		    @Body
+
+	    }
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Minor }
+		initiallanguage { @InitialLanguage }
+		title { @Title }
+		runningtitle { @RunningTitle }
+		headingfont { @SubSectionHeadingFont }
+		headingbreak { @SubSectionHeadingBreak }
+		headingformat { @Num @SubSectionHeadingFormat @Body }
+		incontents { @SubSectionInContents }
+		contentsindent { 3f }
+		numbers { @SubSectionNumbers }
+		attachnum { @SubSectionList&&preceding @Tagged @Tag }
+		retrievenum { @SubSectionList&&@Tag @Open { num } }
+		bypassnumber { @BypassNumber }
+		prefix { @SectionShortNum }
+		majornum {}
+		majortitle {}
+		intheorems { @SubSectionNumInTheorems }
+		indisplays { @SubSectionNumInDisplays }
+		infigures { @SubSectionNumInFigures }
+		intables { @SubSectionNumInTables }
+		inrunners { @SubSectionNumInRunners }
+		@Body
+        }
+
+	@LargeScaleStructure
+	    tag { @Tag }
+	    type { Minor }
+	    initiallanguage { @InitialLanguage }
+	    title { @Title }
+	    runningtitle { @RunningTitle }
+	    headingfont { @SectionHeadingFont }
+	    headingbreak { @SectionHeadingBreak }
+	    headingformat { @Num @SectionHeadingFormat @Body }
+	    incontents { @SectionInContents }
+	    contentsindent { 0f }
+	    numbers { @SectionNumbers }
+	    attachnum { @SectionList&&preceding @Tagged @Tag }
+	    retrievenum { @SectionList&&@Tag @Open { num } }
+	    bypassnumber { @BypassNumber }
+	    prefix { @SectionPrefix }
+	    majornum {}
+	    majortitle {}
+	    intheorems { @SectionNumInTheorems }
+	    indisplays { @SectionNumInDisplays }
+	    infigures { @SectionNumInFigures }
+	    intables { @SectionNumInTables }
+	    inrunners { @SectionNumInRunners }
+	    @Body
+
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Appendices.                                                        #
+    #                                                                     #
+    #######################################################################
+
+    export @BeginSubAppendices @EndSubAppendices @SubAppendix
+    def @Appendix force into { @AppendixList&&preceding }
+        named @Tag {}
+        named @Title {}
+        named @RunningTitle { dft }
+	named @InitialLanguage {}
+	named @BypassNumber { dft }
+        body @Body
+    {
+        def @EndSubAppendicesPlace { @Galley }
+
+        def @EndSubAppendices force into { @EndSubAppendicesPlace&&preceding }
+	{}
+
+        macro @BeginSubAppendices
+        {
+	    //@SubAppendixGap @SubAppendixList @FirstSubAppendixNumber
+	    // @EndSubAppendicesPlace //
+	}
+
+        def @AppendixShortNum
+	{
+	    @AppendixNumbers @Then {
+		@BypassNumber @Dft {
+		    @AppendixNumbers @Num @AppendixList&&@Tag @Open { num }
+		}
+	    }
+	}
+
+        def @AppendixLongNum
+        {
+            @AppendixNumbers @Then {
+		@InitialLanguage @Language {
+		    appendix @WordVal @AppendixWord  @AppendixShortNum
+		}
+	    }
+        }
+
+        export @BeginSubSubAppendices @EndSubSubAppendices @SubSubAppendix
+        def @SubAppendix force into { @SubAppendixList&&preceding }
+            named @Tag {}
+            named @Title {}
+            named @RunningTitle { dft }
+	    named @InitialLanguage { @InitialLanguage }
+	    named @BypassNumber { dft }
+            body @Body
+        {
+
+            def @EndSubSubAppendicesPlace { @Galley }
+
+            def @EndSubSubAppendices force into
+		{ @EndSubSubAppendicesPlace&&preceding }
+	    {}
+
+            macro @BeginSubSubAppendices
+            {
+		//@SubSubAppendixGap
+		    @SubSubAppendixList @FirstSubSubAppendixNumber
+		// @EndSubSubAppendicesPlace //
+	    }
+
+            def @SubAppendixShortNum
+	    {
+		@SubAppendixNumbers @Then {
+		    @BypassNumber @Dft {
+			@AppendixShortNum @Join @SubAppendixNumbers @Num
+			{ @SubAppendixList&&@Tag @Open { num } }
+		    }
+		}
+	    }
+
+            def @SubSubAppendix force into { @SubSubAppendixList&&preceding }
+		named @Tag {}
+		named @Title {}
+		named @RunningTitle { dft }
+		named @InitialLanguage { @InitialLanguage }
+		named @BypassNumber { dft }
+		body @Body
+            {
+
+		@LargeScaleStructure
+		    tag { @Tag }
+		    type { Minor }
+		    initiallanguage { @InitialLanguage }
+		    title { @Title }
+		    runningtitle { @RunningTitle }
+		    headingfont { @SubSubAppendixHeadingFont }
+		    headingbreak { @SubSubAppendixHeadingBreak }
+		    headingformat { @Num @SubSubAppendixHeadingFormat @Body }
+		    incontents { @SubSubAppendixInContents }
+		    contentsindent { 6f }
+		    numbers { @SubSubAppendixNumbers }
+		    attachnum { @SubSubAppendixList&&preceding @Tagged @Tag }
+		    retrievenum { @SubSubAppendixList&&@Tag @Open { num } }
+		    bypassnumber { @BypassNumber }
+		    prefix { @SubAppendixShortNum }
+		    majornum {}
+		    majortitle {}
+		    intheorems { @SubSubAppendixNumInTheorems }
+		    indisplays { @SubSubAppendixNumInDisplays }
+		    infigures { @SubSubAppendixNumInFigures }
+		    intables { @SubSubAppendixNumInTables }
+		    inrunners { @SubSubAppendixNumInRunners }
+		    @Body
+
+            }
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Minor }
+		initiallanguage { @InitialLanguage }
+		title { @Title }
+		runningtitle { @RunningTitle }
+		headingfont { @SubAppendixHeadingFont }
+		headingbreak { @SubAppendixHeadingBreak }
+		headingformat { @Num @SubAppendixHeadingFormat @Body }
+		incontents { @SubAppendixInContents }
+		contentsindent { 3f }
+		numbers { @SubAppendixNumbers }
+		attachnum { @SubAppendixList&&preceding @Tagged @Tag }
+		retrievenum { @SubAppendixList&&@Tag @Open { num } }
+		bypassnumber { @BypassNumber }
+		prefix { @AppendixShortNum }
+		majornum {}
+		majortitle {}
+		intheorems { @SubAppendixNumInTheorems }
+		indisplays { @SubAppendixNumInDisplays }
+		infigures { @SubAppendixNumInFigures }
+		intables { @SubAppendixNumInTables }
+		inrunners { @SubAppendixNumInRunners }
+		@Body
+
+        }
+
+	@LargeScaleStructure
+	    tag { @Tag }
+	    type { Minor }
+	    initiallanguage { @InitialLanguage }
+	    title { @Title }
+	    runningtitle { @RunningTitle }
+	    headingfont { @AppendixHeadingFont }
+	    headingbreak { @AppendixHeadingBreak }
+	    headingformat { @Num @AppendixHeadingFormat @Body }
+	    incontents { @AppendixInContents }
+	    contentsindent { 0f }
+	    word { appendix @WordVal @AppendixWord }
+	    numbers { @AppendixNumbers }
+	    attachnum { @AppendixList&&preceding @Tagged @Tag }
+	    retrievenum { @AppendixList&&@Tag @Open { num } }
+	    bypassnumber { @BypassNumber }
+	    prefix { @AppendixPrefix }
+	    majornum {}
+	    majortitle {}
+	    intheorems { @AppendixNumInTheorems }
+	    indisplays { @AppendixNumInDisplays }
+	    infigures { @AppendixNumInFigures }
+	    intables { @AppendixNumInTables }
+	    inrunners { Yes }
+	    @Body
+    }
+
+@End @ReportSetup
diff --git a/include/russian b/include/russian
new file mode 100644
index 0000000..d0f5a53
--- /dev/null
+++ b/include/russian
@@ -0,0 +1,10 @@
+#################################################################
+#                                                               #
+#  russian                                                      #
+#                                                               #
+#  This file includes everything you need for Russian.          #
+#                                                               #
+#################################################################
+
+# Commented out because these fonts are not distributed with Lout.
+# @SysInclude { russian.fd }
diff --git a/include/russian.fd b/include/russian.fd
new file mode 100644
index 0000000..f145530
--- /dev/null
+++ b/include/russian.fd
@@ -0,0 +1,38 @@
+##################################################################################################################
+#                                                                                                                #
+#  Russian font definitions.  Use a very wide window to see them clearly.                                        #
+#                                                                                                                #
+#       Lout font       Lout font         PostScript         PostScript font metrics    Lout character  Recode/  #
+#       family name     face name         font name          (formerly .AFM) file name  mapping file   NoRecode  #
+#                                                                                                                #
+##################################################################################################################
+
+fontdef Academy		Base		{ Academy			Aca		koi8r.LCM	Recode	 }
+fontdef Academy		Slope		{ Academy-Italic		Aca-It		koi8r.LCM	Recode	 }
+fontdef Academy		Bold		{ Academy-Bold			Aca-Bd		koi8r.LCM	Recode	 }
+fontdef Academy		BoldSlope	{ Academy-Italic		Aca-It		koi8r.LCM	Recode	 }
+fontdef Academy		Italic		{ Academy-Italic		Aca-It		koi8r.LCM	Recode	 }
+														 
+fontdef Antiqua		Base		{ Antiqua			Ant		koi8r.LCM	Recode	 }
+fontdef Antiqua		Slope		{ Antiqua-Italic		Ant-It		koi8r.LCM	Recode	 }
+fontdef Antiqua		Bold		{ Antiqua-Bold			Ant-Bd		koi8r.LCM	Recode	 }
+fontdef Antiqua		BoldSlope	{ Antiqua-Italic		Ant-It		koi8r.LCM	Recode	 }
+fontdef Antiqua		Italic		{ Antiqua-Italic		Ant-It		koi8r.LCM	Recode	 }
+														 
+fontdef College		Base		{ College			Col		koi8r.LCM	Recode	 }
+fontdef College		Slope		{ College-Italic		Col-It		koi8r.LCM	Recode	 }
+fontdef College		Bold		{ College-Bold			Col-Bd		koi8r.LCM	Recode	 }
+fontdef College		BoldSlope	{ College-Italic		Col-It		koi8r.LCM	Recode	 }
+fontdef College		Italic		{ College-Italic		Col-It		koi8r.LCM	Recode	 }
+														 
+fontdef Magazine	Base		{ Magazine			Mag		koi8r.LCM	Recode	 }
+fontdef Magazine	Slope		{ Magazine-Italic		Mag-It		koi8r.LCM	Recode	 }
+fontdef Magazine	Bold		{ Magazine-Bold			Mag-Bd		koi8r.LCM	Recode	 }
+fontdef Magazine	BoldSlope	{ Magazine-Italic		Mag-It		koi8r.LCM	Recode	 }
+fontdef Magazine	Italic		{ Magazine-Italic		Mag-It		koi8r.LCM	Recode	 }
+														 
+fontdef Textbook	Base		{ Textbook			Txt		koi8r.LCM	Recode	 }
+fontdef Textbook	Slope		{ Textbook-Italic		Txt-It		koi8r.LCM	Recode	 }
+fontdef Textbook	Bold		{ Textbook-Bold			Txt-Bd		koi8r.LCM	Recode	 }
+fontdef Textbook	BoldSlope	{ Textbook-Italic		Txt-It		koi8r.LCM	Recode	 }
+fontdef Textbook	Italic		{ Textbook-Italic		Txt-It		koi8r.LCM	Recode	 }
diff --git a/include/slides b/include/slides
new file mode 100644
index 0000000..7833f60
--- /dev/null
+++ b/include/slides
@@ -0,0 +1,299 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for overhead transparencies                               #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  @SysInclude commands for standard packages.                                #
+#                                                                             #
+###############################################################################
+
+  @SysInclude { fontdefs	} # font definitions
+  @SysInclude { langdefs	} # language definitions
+  @SysInclude { bsf		} # BasicSetup package
+  @SysInclude { dsf		} # DocumentSetup package
+  @SysInclude { slidesf		} # OverheadSetup extension
+
+
+###############################################################################
+#                                                                             #
+#  @Include command for reading personal definitions from current directory.  #
+#                                                                             #
+###############################################################################
+
+  @Include { mydefs }
+
+
+###############################################################################
+#                                                                             #
+#  The @BasicSetup @Use clause - basics, lists, paragraphs, displays.         #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+ 
+@Use { @BasicSetup
+  # @InitialFont	{ Times Base 12p	} # initial font
+    @InitialFont	{ Times Base 20p	} # initial font
+  # @InitialBreak	{{adjust 1.2fx hyphen} @OrIfPlain {ragged 1fx nohyphen}}
+    @InitialBreak	{ ragged 1.20fx nohyphen} # initial break
+  # @InitialSpace	{ lout			} # initial space style
+  # @InitialLanguage	{ English		} # initial language
+  # @InitialColour	{ black			} # initial colour
+  # @OptimizePages	{ No			} # optimize page breaks?
+  # @HeadingFont	{ Bold			} # font for @Heading
+  # @ParaGap		{ 1.3vx @OrIfPlain 1f	} # gap between paragraphs
+  # @ParaIndent		{ 2.00f	@OrIfPlain 5s	} # first-line indent for @PP
+  # @DisplayGap		{ 1.00v	@OrIfPlain 1f	} # gap above, below displays
+  # @DisplayIndent	{ 2.00f	@OrIfPlain 5s	} # @IndentedDisplay indent
+  # @DefaultIndent	{ 0.5rt			} # @Display indent
+  # @DisplayNumStyle	{ (num)			} # style of display numbers
+  # @WideIndent		{ 4.00f	@OrIfPlain 10s	} # @WideTaggedList indent
+  # @VeryWideIndent	{ 8.00f	@OrIfPlain 20s	} # @VeryWideTaggedList indent
+  # @ListOuterGap	{ 1.00v	@OrIfPlain 1f	} # gap before, after lists
+  # @ListGap		{ 1.00v	@OrIfPlain 1f	} # gap between list items
+  # @ListIndent		{ 0s			} # indent of list items
+  # @ListRightIndent	{ 0s			} # right indent of list items
+  # @ListLabelWidth	{ 2.00f	@OrIfPlain 5s	} # width allowed for list tags
+  # @NumberSeparator	{ .			} # separates nums like 2.3.7
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @DocumentSetup @Use clause - page layout plus figures, tables, etc.    #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+ 
+@Use { @DocumentSetup
+  # @PageType		{ A4	@OrIfPlain Other} # page type (width, height)
+  # @PageWidth		{ 80s			} # page width if type Other
+  # @PageHeight		{ 66f			} # page height if type Other
+  # @PageOrientation	{ Portrait		} # Portrait, Landscape, etc.
+  # @PageBackground	{  			} # background of each page
+  # @TopMargin		{ 2.5c	@OrIfPlain 6f	} # top margin of all pages
+  # @FootMargin		{ 2.5c	@OrIfPlain 6f	} # bottom margin of all pages
+    @FootMargin		{ 5.00c			} # bottom margin of all pages
+  # @OddLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of odd pages
+  # @OddRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of odd pages
+  # @EvenLeftMargin	{ 2.5c	@OrIfPlain 10s	} # left margin of even pages
+  # @EvenRightMargin	{ 2.5c	@OrIfPlain 10s	} # right margin of even pages
+  # @PageBoxType	{ None			} # None Box CurveBox ShadowBox
+  # @PageBoxMargin	{ 1.00c			} # page box margin
+  # @PageBoxLineWidth	{			} # page box line thickness
+  # @PageBoxPaint	{ none			} # page box paint
+  # @PageBoxShadow	{ 0.60c			} # shadow margin if ShadowBox
+  # @ColumnNumber	{ 1			} # number of columns (1 to 10)
+  # @ColumnGap		{ 1.00c	@OrIfPlain 6s	} # column gap
+  # @FigureLocation	{ PageTop		} # default figure location
+  # @TableLocation	{ PageTop		} # default table location
+  # @FigureFormat	{ @CC @Body		} # default figure format
+  # @TableFormat	{ @CC @Body		} # default table format
+  # @FigureWord		{ figure		} # "Figure" word else anything
+  # @TableWord		{ table			} # "Table" word else anything
+  # @FigureNumbers	{ Arabic		} # method of numbering figures
+  # @TableNumbers	{ Arabic		} # method of numbering tables
+  # @FigureCaptionPos	{ Below 		} # Above or Below
+  # @TableCaptionPos	{ Below			} # Above or Below
+  # @CaptionFont        {                       } # figure, table caption font
+  # @CaptionBreak       {                       } # figure, table caption break
+  # @CaptionFormat      { @B { number @DotSep @OneCol }	} # figure, table caption format
+  # @MakeFigureContents { No                    } # list of figures at start
+  # @MakeTableContents  { No                    } # list of tables at start
+  # @MakeContents	{ No			} # make contents? Yes or No
+  # @ContentsGap	{ 0.20v	@OrIfPlain 0f	} # extra gap above minor entry
+    @ContentsGapAbove	{ 0.00v	@OrIfPlain 1f	} # extra gap above major entry
+  # @ContentsGapBelow	{ 0.00v	@OrIfPlain 0f	} # extra gap below major entry
+    @ContentsFont       { Base                  } # font for major entry
+  # @ContentsPartGapAbove { 1.00v @OrIfPlain 1f	} # extra gap above `part' entry
+  # @ContentsPartGapBelow { 0.00v @OrIfPlain 0f	} # extra gap below `part' entry
+  # @ContentsFormat	{ number @DotSep title	} # contents entry format
+  # @ContentsLeader	{ ..			} # leader symbol in contents
+  # @ContentsLeaderGap	{ 4s	@OrIfPlain 2s	} # gap between leaders
+  # @ContentsRightWidth	{ 3f	@OrIfPlain 6s	} # page numbers column width
+  # @MakeReferences	{ Yes			} # make references? Yes or No
+  # @RefCiteStyle	{ [cite]		} # citation style
+  # @RefCiteLabels	{ @RefNum		} # citation items
+  # @RefNumbers		{ Arabic		} # reference numbers
+  # @RefListFormat	{ Labels		} # NoLabels, Labels, etc.
+  # @RefListLabels	{ [@RefNum]		} # ref list label format
+  # @RefListTitle	{ references		} # title of reference list
+  # @ChapRefListTitle	{ references		} # title of chapter ref list
+  # @RefListIndent	{ 0s			} # indent to left of labels
+  # @RefListRightIndent	{ 0s			} # indent to right of items
+  # @RefListGap		{ @ListGap		} # gap between ref list items
+  # @RefListFont	{        		} # font used in reference list
+  # @RefListBreak	{        		} # break style of ref list
+  # @RefListLabelWidth 	{ @ListLabelWidth	} # Labels column width
+  # @RefListSortKey	{ @Tag			} # sorting key
+  # @MakeIndex		{ No			} # make index? Yes or No
+  # @IndexFont		{			} # index entries font
+  # @IndexBreak		{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexColumnNumber	{ 2			} # index columns (1 to 10)
+  # @IndexColumnGap	{ 1.00c	@OrIfPlain 6s	} # index column gap
+  # @MakeIndexA		{ No 			} # make index A? Yes or No
+  # @IndexAFont		{			} # index A entries font
+  # @IndexABreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexAColumnNumber	{ 2			} # index A columns (1 to 10)
+  # @IndexAColumnGap	{ 1.00c	@OrIfPlain 6s	} # index A column gap
+  # @MakeIndexB		{ No 			} # make index B? Yes or No
+  # @IndexBFont		{			} # index B entries font
+  # @IndexBBreak	{ {oragged 1.2fx} @OrIfPlain {oragged 1fx} } # and break
+  # @IndexBColumnNumber	{ 2			} # index B columns (1 to 10)
+  # @IndexBColumnGap	{ 1.00c	@OrIfPlain 6s	} # index B column gap
+  # @TopGap		{ 0.75c	@OrIfPlain 2f	} # gap between figures
+  # @MidGap		{ 0.75c	@OrIfPlain 2f	} # gap above/below body text
+  # @FootNoteNumbers	{ Arabic		} # footnote numbers
+  # @FootNoteThrough	{ No			} # numbered through chapter?
+  # @FootNoteLocation	{ ColFoot		} # where the footnote appears
+  # @FootNoteFont	{ 0.80f			} # font for footnotes
+  # @FootNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for footnotes
+  # @FootNoteFormat     { { number &0.05f } @Insert body } # footnote format
+  # @FootLen		{ 2.00c	@OrIfPlain 10s	} # length of footnote line
+  # @FootAboveGap	{ @DisplayGap		} # gap above footnote line
+  # @FootGap		{ 0.20c	@OrIfPlain 1fx	} # gap between footnotes
+  # @MarginNoteFont	{ 0.80f			} # font of margin notes
+  # @MarginNoteBreak	{ ragged 1.10fx		} # break style of margin notes
+  # @MarginNoteHGap	{ 0.5c   		} # horizontal gap to notes
+  # @MarginNoteVGap	{ @DisplayGap		} # min vertical gap between
+  # @MarginNoteWidth	{ 1.50c  		} # width of margin notes
+  # @EndNoteNumbers	{ Arabic		} # endnote numbers
+  # @EndNoteFont	{ 0.80f			} # font of endnotes
+  # @EndNoteBreak	{ 1.2fx	@OrIfPlain 1fx	} # break for endnotes
+  # @EndNoteFormat	{ { number &0.05f } @Insert body } # endnote format
+  # @EndNoteGap		{ 0.20c	@OrIfPlain 1f	} # gap between endnotes
+  # @TheoremWord	{ theorem		} # "Theorem" word, etc.
+  # @TheoremTitleFormat	{ (title)		} # only if title present
+  # @TheoremFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @DefinitionWord	{ definition		} # "Definition" word, etc.
+  # @DefinitionTitleFormat { (title)		} # only if title present
+  # @DefinitionFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ClaimWord		{ claim			} # "Claim" word, etc.
+  # @ClaimTitleFormat	{ (title)		} # only if title present
+  # @ClaimFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @PropositionWord	{ proposition		} # "Proposition" word, etc.
+  # @PropositionTitleFormat { (title)		} # only if title present
+  # @PropositionFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @LemmaWord		{ lemma			} # "Lemma" word, etc.
+  # @LemmaTitleFormat	{ (title)		} # only if title present
+  # @LemmaFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @CorollaryWord	{ corollary		} # "Corollary" word, etc.
+  # @CorollaryTitleFormat { (title)		} # only if title present
+  # @CorollaryFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ExampleWord	{ example		} # "Example" word, etc.
+  # @ExampleTitleFormat	{ (title)		} # only if title present
+  # @ExampleFormat	{ {@B { word @NumSep number title: } &2s} @Insert body }
+  # @ProofWord		{ proof			} # "Proof" word, etc.
+  # @PageHeaders	{ Simple		} # None Simple Titles NoTitles
+    @PageHeaders	{ Titles		} # None Simple Titles NoTitles
+  # @PageNumbers	{ Arabic		} # page numbers
+  # @FirstPageNumber	{ 1			} # number of first page 
+  # @IntroPageNumbers	{ Roman			} # intro page numbers
+  # @IntroFirstPageNumber{ 1			} # number of first intro page 
+  # @StructPageNums	{ No			} # make structured page numbers
+
+  # @OddTop		{ @Centre{- @PageNum -}	} # Simple page headers
+  # @OddFoot		{ @Null			}
+  # @EvenTop		{ @Centre{- @PageNum -}	}
+  # @EvenFoot		{ @Null			}
+  # @StartOddTop	{ @Null			}
+  # @StartOddFoot	{ @Null			}
+  # @StartEvenTop	{ @Null			}
+  # @StartEvenFoot	{ @Null			}
+  # @IntroOddTop	{ @Null			}
+  # @IntroOddFoot	{ @Centre @PageNum	}
+  # @IntroEvenTop	{ @Null			}
+  # @IntroEvenFoot	{ @Centre @PageNum	}
+  # @IntroStartOddTop	{ @Null			}
+  # @IntroStartOddFoot	{ @Null			}
+  # @IntroStartEvenTop	{ @Null			}
+  # @IntroStartEvenFoot	{ @Null			}
+
+						  # Titles, NoTitles headers
+  # @RunningOddTop  { @I {@MinorNum @DotSep @MinorTitle} @Right @B @PageNum }
+    @RunningOddTop  { 8p @Font {@MajorTitle @MinorNum @Right @PageNum} }
+  # @RunningOddFoot		{ @Null					}
+    @RunningOddFoot		{ @Null					}
+  # @RunningEvenTop { @B @PageNum @Right @I {@MajorNum @DotSep @MajorTitle} }
+    @RunningEvenTop { 8p @Font {@MajorTitle @MinorNum @Right @PageNum} }
+  # @RunningEvenFoot		{ @Null					}
+    @RunningEvenFoot		{ @Null					}
+  # @RunningStartOddTop 	{ @Null					}
+    @RunningStartOddTop 	{ 8p @Font { @MajorTitle @MinorNum @Right @PageNum } }
+  # @RunningStartOddFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+    @RunningStartOddFoot	{ @Null					}
+  # @RunningStartEvenTop	{ @Null					}
+    @RunningStartEvenTop	{ 8p @Font { @MajorTitle @MinorNum @Right @PageNum } }
+  # @RunningStartEvenFoot	{ @Centre { Bold 0.8f } @Font @PageNum	}
+    @RunningStartEvenFoot	{ @Null					}
+  # @RunningIntroOddTop		{ @Null					}
+  # @RunningIntroOddFoot	{ @Right @PageNum			}
+  # @RunningIntroEvenTop	{ @Null					}
+  # @RunningIntroEvenFoot	{ @PageNum				}
+  # @RunningIntroStartOddTop	{ @Null					}
+  # @RunningIntroStartOddFoot	{ @Null					}
+  # @RunningIntroStartEvenTop	{ @Null					}
+  # @RunningIntroStartEvenFoot	{ @Null					}
+}
+
+
+###############################################################################
+#                                                                             #
+#  The @OverheadSetup @Use clause - options specific to overheads.            #
+#                                                                             #
+###############################################################################
+
+@Use { @OverheadSetup
+  # @DateLine			{ No		} # No, Yes, or a date
+  # @ContentsWord		{ contents	} # word for "Contents"
+  # @LectureWord		{ lecture       } # word for "Lecture"
+  # @OverheadWord               {               } # word for "Overhead"
+  # @LectureNumbers		{ Arabic	} # kind of lecture numbers
+  # @FirstLectureNumber		{ 1		} # first lecture num
+  # @OverheadNumbers		{ Arabic	} # kind of overhead numbers
+  # @FirstOverheadNumber	{ 1		} # first overhead num
+  # @TitlePageFont		{ Helvetica Base 1.5f 	} # title page font
+  # @LectureHeadingFont		{ Bold 1.20f		} # lecture head font
+  # @LectureHeadingBreak	{ clines 1.2fx nohyphen	} # lecture head break
+  # @LectureHeadingFormat	{ @Centre number @DP @Centre title @DP }
+  # @AboveLectureGap		{ 3.0f			} # gap above lec head
+  # @OverheadHeadingFont	{ Bold			} # overhead head font
+  # @OverheadHeadingBreak	{ 1.2fx nohyphen	} # overhead head break
+  # @OverheadHeadingFormat	{ @Centre title @DP	} # overhead head format
+  # @OverheadFormat		{ @Body			} # overhead body format
+  # @AboveOverheadGap		{ 1.0f			} # gap above over head
+  # @LectureInContents		{ Yes		} # add lectures to contents
+  # @OverheadInContents		{ No		} # add overheads to contents
+  # @ReferencesInContents	{ Yes		} # add references to contents
+  # @LectureNumInTheorems	{ Yes		} # theorem num has lecture num
+  # @OverheadNumInTheorems	{ No		} # theorem num has overhead num
+  # @LectureNumInDisplays	{ Yes		} # display num has lecture num
+  # @OverheadNumInDisplays	{ No		} # display num has overhead num
+  # @LectureNumInFigures	{ Yes		} # figure num has lecture num
+  # @OverheadNumInFigures	{ No		} # figure num has overhead num
+  # @LectureNumInTables		{ Yes		} # table num has lecture num
+  # @OverheadNumInTables	{ No		} # table num has overhead num
+  # @LectureNumInRunners	{ Yes		} # running head has lecture num
+  # @OverheadNumInRunners	{ Yes		} # running head has overhd num
+  # @LecturePrefix		{		} # for structured page nums
+  # @OverheadPrefix		{		} # for structured page nums
+}
+
+
+###############################################################################
+#                                                                             #
+#  @Database (and @SysDatabase) clauses go here.                              #
+#                                                                             #
+###############################################################################
+
+@SysDatabase @RefStyle { refstyle }		  # reference printing styles
diff --git a/include/slidesf b/include/slidesf
new file mode 100644
index 0000000..e39f804
--- /dev/null
+++ b/include/slidesf
@@ -0,0 +1,371 @@
+
+###########################################################################
+#                                                                         #
+#  @OverheadSetup extension to @DocumentSetup.                            #
+#                                                                         #
+#  Jeffrey H. Kingston                                                    #
+#  August 1994                                                            #
+#                                                                         #
+#  This package extends DocumentSetup with definitions for overheads.     #
+#                                                                         #
+###########################################################################
+
+extend @BasicSetup @DocumentSetup
+export @OverheadTransparencies @Lecture @Overhead
+def @OverheadSetup
+    named @DateLine			{ No			}
+    named @ContentsWord			{ contents		}
+    named @LectureWord			{ lecture		}
+    named @OverheadWord			{ 			}
+    named @LectureNumbers		{ Arabic		}
+    named @FirstLectureNumber		{ 1			}
+    named @OverheadNumbers		{ Arabic		}
+    named @FirstOverheadNumber		{ 1			}
+    named @TitlePageFont		{ Helvetica Base      	}
+    named @LectureHeadingFont		{ Bold 1.20f		}
+    named @LectureHeadingBreak		{ 1.2fx nohyphen	}
+    named @LectureHeadingFormat
+	    left number right title	{ @Centre number @DP @Centre title @DP }
+    named @AboveLectureGap              { 3.0f                  }
+    named @OverheadHeadingFont		{ Bold			}
+    named @OverheadHeadingBreak		{ 1.2fx nohyphen	}
+    named @OverheadHeadingFormat
+	    left number right title	{ @Centre title @DP }
+    named @OverheadFormat
+	named @II right x { |@DisplayIndent x |               }
+	named @QQ right x { |@DisplayIndent x |@DisplayIndent }
+	named @CC right x { |0.5rt x          |               }
+	named @RR right x { |1.0rt x          |               }
+	right @Body
+					{ @Body }
+    named @AboveOverheadGap             { 1.0f                  }
+    named @LectureInContents		{ Yes			}
+    named @OverheadInContents		{ No			}
+    named @ReferencesInContents		{ Yes			}
+    named @LectureNumInTheorems		{ Yes			}
+    named @OverheadNumInTheorems	{ No			}
+    named @LectureNumInDisplays		{ Yes			}
+    named @OverheadNumInDisplays	{ No			}
+    named @LectureNumInFigures		{ Yes			}
+    named @OverheadNumInFigures		{ No			}
+    named @LectureNumInTables		{ Yes			}
+    named @OverheadNumInTables		{ No			}
+    named @LectureNumInRunners		{ Yes			}
+    named @OverheadNumInRunners		{ Yes			}
+    named @LecturePrefix		{			}
+    named @OverheadPrefix		{			}
+@Begin
+
+    #######################################################################
+    #                                                                     #
+    #  Symbols for passing full title to running headers.                 #
+    #                                                                     #
+    #######################################################################
+
+    export @Val
+    def @StoreTitle left @Tag named @Val {} { @Null }
+
+    def @SaveTitle right x { save @StoreTitle @Val { x } }
+
+    def @GetTitle { @StoreTitle&&save @Open { @Val } }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Lists of lectures and overheads.                                   #
+    #                                                                     #
+    #######################################################################
+
+    export num
+    def @LectureList named @Tag {} right num
+    {
+		@Galley
+        //1.1b  @LectureList @Next num
+    }
+
+    export num
+    def @OverheadsList named @Tag {} right num
+    {
+		@Galley
+        //1.1b	@OverheadsList @Next num
+    }
+
+    export num
+    def @LecOverheadsList named @Tag {} right num
+    {
+		@Galley
+        //1.1b	@LecOverheadsList @Next num
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  @Full - this sends text to a full-width place.                     #
+    #                                                                     #
+    #######################################################################
+
+    def @Full force into { @FullPlace&&following } right x { x }
+
+
+    #######################################################################
+    #                                                                     #
+    #  @OverheadTransparencies.                                           #
+    #                                                                     #
+    #######################################################################
+
+    def @OverheadTransparencies
+        named @Title {}
+        named @RunningTitle { dft }
+        named @Author {}
+        named @Institution {}
+        named @DateLine { @DateLine }
+        named @InitialFont { @InitialFont }
+        named @InitialBreak { @InitialBreak }
+        named @InitialSpace { @InitialSpace }
+        named @InitialLanguage { @InitialLanguage }
+	named @PageOrientation { @PageOrientation }
+        named @PageHeaders { @PageHeaders }
+        named @FirstPageNumber { @FirstPageNumber }
+        named @FirstOverheadNumber { @FirstOverheadNumber }
+        named @FirstLectureNumber { @FirstLectureNumber }
+	named @OptimizePages { @OptimizePages }
+    {
+
+	def @DatePart
+	{
+	    @DateLine @Case {
+		No	@Yield { @Null		    }
+		Yes	@Yield { |0.5rt @Date     | }
+		else	@Yield { |0.5rt @DateLine | }
+	    }
+	}
+
+	def @TitlePart
+	{
+	    @TitlePageFont @Font @InitialBreak @Break
+	    @InitialSpace @Space clines @Break {
+		//0.5i	|0.5rt 1.5f @Font @InitialBreak @Break
+			       @InitialSpace @Space clines @Break @Title |
+		//1i    |0.5rt clines @Break @Author |
+		//0.5i  |0.5rt clines @Break @I @Institution |
+		//0.5i  @DatePart
+	    }
+	}
+
+	def @ContentsPart
+	{
+	    @DP	|0.5rt @LectureHeadingFont @Font @LectureHeadingBreak @Break
+		       @LectureHeadingFormat { contents @WordVal @ContentsWord } |
+	    @DP	@ContentsSection
+	}
+
+	def @ReferencesPart
+	    named @Tag {}
+	{
+	    @DP	|0.5rt @LectureHeadingFont @Font @LectureHeadingBreak @Break
+		       @LectureHeadingFormat { @RefHeading @RefListTitle } |
+	    //  @PageMark @Tag
+	    //  @ReferencesInContents @ContentsEntry
+		    title { @RefHeading @RefListTitle }
+		    pagenum { @PageOf @Tag }
+	    //  Start @Runner @MajorTitle { @GetTitle }
+            @DP @ReferencesSection
+	    //  NonStart @Runner @MajorTitle { @GetTitle }
+	}
+
+	def @OverheadsBody force into { @ColPlace&&preceding }
+	    named @Optimize { @OptimizePages }
+	{
+		    @Title @Case {
+			""	@Yield @Null
+			else	@Yield @TitlePart
+		    }
+	    //1.1b  @MakeContents @Case {
+			{ Yes Bypass }	@Yield @ContentsPart
+			else		@Yield @Null
+		    }
+	    //      Start @Runner @MajorTitle { @GetTitle }
+	    //1.1b  @OverheadsList @FirstOverheadNumber
+	    //1.1b  @LectureList @FirstLectureNumber
+	    //1.1b  @ReferencesPart
+	}
+
+        @InitialFont @Font @InitialBreak @Break @InitialLanguage @Language
+	@InitialSpace @Space { @ColourCommand @InitialColour } @SetColour
+        {
+		@SaveTitle {
+		    @InitialLanguage @Language { @RunningTitle @Dft @Title }
+		}
+
+	    //  Yes @BeginAllCounters {}
+	    //  Yes @BeginDisplayCounter {}
+	    //  Yes @BeginFigureCounter {}
+	    //  Yes @BeginFigureCounter {}
+            //	@PageList
+		    @ColumnNumber { 1 }
+		    @PageHeaders { @PageHeaders }
+		    @Orient { @PageOrientation }
+		    extra { Yes }
+		    @FirstPageNumber
+            //	@OverheadsBody
+            //	Start @Runner
+        }
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Overheads.                                                         #
+    #                                                                     #
+    #######################################################################
+
+    def @Overhead force into { @OverheadsList&&preceding }
+	named @Tag {}
+	named @Title {}
+	named @RunningTitle { dft }
+	named @Format
+            named @II right x { |@DisplayIndent x |               }
+            named @QQ right x { |@DisplayIndent x |@DisplayIndent }
+            named @CC right x { |0.5rt x          |               }
+            named @RR right x { |1.0rt x          |               }
+                right @Body { @OverheadFormat @Body }
+	named @InitialLanguage {}
+	named @BypassNumber { dft }
+	body @Body
+    {
+
+	@LargeScaleStructure
+	    tag { @Tag }
+	    type { Major }
+	    initiallanguage { @InitialLanguage }
+	    title { @Title }
+	    majortitle { @GetTitle }
+	    runningtitle { @RunningTitle }
+	    aboveheadinggap { @AboveOverheadGap }
+	    headingfont { @OverheadHeadingFont }
+	    headingbreak { @OverheadHeadingBreak }
+	    headingformat { @Num @OverheadHeadingFormat @Body }
+	    incontents { @OverheadInContents }
+	    contentsindent { 0f }
+	    numbers { @OverheadNumbers }
+	    attachnum { @OverheadsList&&preceding @Tagged @Tag }
+	    retrievenum { @OverheadsList&&@Tag @Open { num } }
+	    bypassnumber { @BypassNumber }
+	    pnprefix { @OverheadPrefix }
+	    intheorems { @OverheadNumInTheorems }
+            indisplays { @OverheadNumInDisplays }
+            infigures { @OverheadNumInFigures }
+            intables { @OverheadNumInTables }
+	    sendheader { @Full @Body }
+	    innergap { @DisplayGap }
+            inrunners { @OverheadNumInRunners }
+	    @Format @Body
+    }
+
+
+    #######################################################################
+    #                                                                     #
+    #  Lectures containing overheads.                                     #
+    #                                                                     #
+    #######################################################################
+
+    export @BeginOverheads @EndOverheads @Overhead
+    def @Lecture force into { @LectureList&&preceding }
+        named @Tag {}
+        named @Title {}
+        named @RunningTitle { dft }
+	named @InitialLanguage {}
+	named @BypassNumber { dft }
+        body @Body
+    {
+        def @EndOverheadsPlace { @Galley }
+
+        def @EndOverheads force into { @EndOverheadsPlace&&preceding }
+	{}
+
+        macro @BeginOverheads
+	{   //1.1b @LecOverheadsList 1
+	    // @EndOverheadsPlace //
+	}
+
+        def @LectureNum
+        {
+	    @LectureNumbers @Then {
+		@BypassNumber @Dft {
+		    @LectureNumbers @Num @LectureList&&@Tag @Open { num }
+		}
+	    }
+        }
+
+        def @Overhead force into { @LecOverheadsList&&preceding }
+            named @Tag {}
+            named @Title {}
+            named @RunningTitle { dft }
+	    named @Format
+                named @II right x { |@DisplayIndent x |               }
+                named @QQ right x { |@DisplayIndent x |@DisplayIndent }
+                named @CC right x { |0.5rt x          |               }
+                named @RR right x { |1.0rt x          |               }
+		    right @Body { @OverheadFormat @Body }
+	    named @InitialLanguage { @InitialLanguage }
+	    named @BypassNumber { dft }
+            body @Body
+        {
+
+	    @LargeScaleStructure
+		tag { @Tag }
+		type { Minor }
+		initiallanguage { @InitialLanguage }
+		title { @Title }
+		runningtitle { @RunningTitle }
+		headingfont { @OverheadHeadingFont }
+		headingbreak { @OverheadHeadingBreak }
+		headingformat { @Num @OverheadHeadingFormat @Body }
+		incontents { @OverheadInContents }
+		contentsindent { 2f }
+		numbers { @OverheadNumbers }
+		attachnum { @LecOverheadsList&&preceding @Tagged @Tag }
+		retrievenum { @LecOverheadsList&&@Tag @Open { num } }
+		bypassnumber { @BypassNumber }
+		prefix { @LectureNum }
+		majornum { @LectureNum }
+		majortitle { @GetTitle }
+		intheorems { @OverheadNumInTheorems }
+		indisplays { OverheadNumInDisplays }
+		infigures { @OverheadNumInFigures }
+		inrunners { @OverheadNumInRunners }
+		@Format @Body
+
+        }
+
+	@LargeScaleStructure
+	    tag { @Tag }
+	    type { Major }
+	    initiallanguage { @InitialLanguage }
+	    title { @Title }
+	    runningtitle { @RunningTitle }
+	    aboveheadinggap { @AboveLectureGap }
+	    headingfont { @LectureHeadingFont }
+	    headingbreak { @LectureHeadingBreak }
+	    headingformat { @Num @LectureHeadingFormat @Body }
+	    incontents { @LectureInContents }
+	    contentsindent { 0f }
+	    word { lecture @WordVal @LectureWord }
+	    numbers {  @LectureNumbers }
+	    attachnum { @LectureList&&preceding @Tagged @Tag }
+	    retrievenum { @LectureList&&@Tag @Open { num } }
+	    bypassnumber { @BypassNumber }
+	    pnprefix { @LecturePrefix }
+	    majortitle { @GetTitle }
+	    intheorems { @LectureNumInTheorems }
+	    indisplays { @LectureNumInDisplays }
+	    infigures { @LectureNumInFigures }
+	    intables { @LectureNumInTables }
+	    sendheader { @Full @Body }
+	    innergap { @DisplayGap }
+	    inrunners { @LectureNumInRunners }
+	    @Body
+	    
+    }
+
+@End @OverheadSetup
diff --git a/include/tab b/include/tab
new file mode 100644
index 0000000..02311d4
--- /dev/null
+++ b/include/tab
@@ -0,0 +1,29 @@
+###############################################################################
+#                                                                             #
+#   Lout setup file for table printing                                        #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+#   This package is OBSOLETE; use tbl instead.                                #
+#                                                                             #
+###############################################################################
+
+
+###############################################################################
+#                                                                             #
+#  The @SysInclude { tabf } line                                              #
+#                                                                             #
+#  This line causes Lout to read the definitions for tables, and should       #
+#  not be touched.                                                            #
+#                                                                             #
+###############################################################################
+
+@SysInclude { tabf }
+
+
+###############################################################################
+#                                                                             #
+#  This package does not offer default options that can be changed.           #
+#                                                                             #
+###############################################################################
diff --git a/include/tabf b/include/tabf
new file mode 100644
index 0000000..bc1e0c8
--- /dev/null
+++ b/include/tabf
@@ -0,0 +1,936 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @Tab package for formatting tables (Version 2.0)                      #
+#                                                                             #
+#  Version 1.0 by Jeffrey H. Kingston, September 1991.                        #
+#  Version 2.0 by Jeffrey H. Kingston, 22 December 1992.                      #
+#  Version 3.0 by Jeffrey H. Kingston, 13 September 1993.                     #
+#                                                                             #
+#  The only change between Versions 2 and 3 is to make the linewidth          #
+#  option accept a Lout length rather than a Fig length.  See the User's      #
+#  Guide for user information.                                                #
+#                                                                             #
+###############################################################################
+
+@SysPrependGraphic { "tabf.lpg" }
+
+export	@CC @RR @Rule @DoubleRule @Line @DoubleLine @NP
+	@Rowa @Rowb @Rowc @Rowd @Rowe @Rowf @Rowg @Rowh @Rowi @Rowj
+	@MarkRowa @MarkRowb @MarkRowc @MarkRowd @MarkRowe @MarkRowf 
+	@MarkRowg @MarkRowh @MarkRowi @MarkRowj 
+	@FirstRowa @FirstRowb @FirstRowc @FirstRowd @FirstRowe @FirstRowf 
+	@FirstRowg @FirstRowh @FirstRowi @FirstRowj 
+
+def @Tab                 
+
+    named above     { no      }
+    named below     { no      }
+    named between   { no      }
+    named side      { no      }
+    named hmargin   { 0.3c    }
+    named vmargin	{
+    	@BackEnd @Case {
+    		PostScript @Yield 0.2v
+    		PDF @Yield 0.2v		# VT: PDF case added
+    		PlainText @Yield 0.5v
+    	}
+    }
+
+    named linewidth
+		named c left x {
+		    @BackEnd @Case {
+		    	PostScript @Yield { x" cm" }
+		    	PDF        @Yield { "__mul(__cm, "x")" }
+		    }
+		}
+		named i left x {
+		    @BackEnd @Case {
+		    	PostScript @Yield { x" in" }
+		    	PDF        @Yield { "__mul(__in, "x")" }
+		    }
+		}
+		named e left x {
+		    @BackEnd @Case {
+		    	PostScript @Yield { x" em" }
+		    	PDF        @Yield { "__mul(__em, "x")" }
+		    }
+		}
+		named p left x {
+		    @BackEnd @Case {
+		    	PostScript @Yield { x" pt" }
+		    	PDF        @Yield { "__mul(__pt, "x")" }
+		    }
+		}
+		named f left x {
+		    @BackEnd @Case {
+		    	PostScript @Yield { x" ft" }
+		    	PDF        @Yield { "__mul(__loutf, "x")" }
+		    }
+		}
+		named s left x {
+		    @BackEnd @Case {
+		    	PostScript @Yield { x" sp" }
+		    	PDF        @Yield { "__mul(__louts, "x")" }
+		    }
+		}
+		named v left x {
+		    @BackEnd @Case {
+		    	PostScript @Yield { x" vs" }
+		    	PDF        @Yield { "__mul(__loutv, "x")" }
+		    }
+		}
+		    { 0.5p    }
+
+    named @Fmta
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named "!"     precedence 10 left x named between { dft } right y {}
+	named "!!"    precedence 10 left x right y {}
+	named "!!!"   precedence 10 left x right y {}
+	named "@Over" precedence 11 left x right y { x // y }
+	named ","     precedence 12 left x right y {}
+	named @Col    precedence 12        right x {}
+	named @CC     right x { clines @Break { & x & } }
+	named @RR     right x { rlines @Break { & x & } }
+    {}
+
+    named @Fmtb
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named "!"     precedence 10 left x named between { dft } right y {}
+	named "!!"    precedence 10 left x right y {}
+	named "!!!"   precedence 10 left x right y {}
+	named "@Over" precedence 11 left x right y { x // y }
+	named ","     precedence 12 left x right y {}
+	named @Col    precedence 12        right x {}
+	named @CC     right x { clines @Break { & x & } }
+	named @RR     right x { rlines @Break { & x & } }
+    {}
+
+    named @Fmtc
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named "!"     precedence 10 left x named between { dft } right y {}
+	named "!!"    precedence 10 left x right y {}
+	named "!!!"   precedence 10 left x right y {}
+	named "@Over" precedence 11 left x right y { x // y }
+	named ","     precedence 12 left x right y {}
+	named @Col    precedence 12        right x {}
+	named @CC     right x { clines @Break { & x & } }
+	named @RR     right x { rlines @Break { & x & } }
+    {}
+
+    named @Fmtd
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named "!"     precedence 10 left x named between { dft } right y {}
+	named "!!"    precedence 10 left x right y {}
+	named "!!!"   precedence 10 left x right y {}
+	named "@Over" precedence 11 left x right y { x // y }
+	named ","     precedence 12 left x right y {}
+	named @Col    precedence 12        right x {}
+	named @CC     right x { clines @Break { & x & } }
+	named @RR     right x { rlines @Break { & x & } }
+    {}
+
+    named @Fmte
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named "!"     precedence 10 left x named between { dft } right y {}
+	named "!!"    precedence 10 left x right y {}
+	named "!!!"   precedence 10 left x right y {}
+	named "@Over" precedence 11 left x right y { x // y }
+	named ","     precedence 12 left x right y {}
+	named @Col    precedence 12        right x {}
+	named @CC     right x { clines @Break { & x & } }
+	named @RR     right x { rlines @Break { & x & } }
+    {}
+
+    named @Fmtf
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named "!"     precedence 10 left x named between { dft } right y {}
+	named "!!"    precedence 10 left x right y {}
+	named "!!!"   precedence 10 left x right y {}
+	named "@Over" precedence 11 left x right y { x // y }
+	named ","     precedence 12 left x right y {}
+	named @Col    precedence 12        right x {}
+	named @CC     right x { clines @Break { & x & } }
+	named @RR     right x { rlines @Break { & x & } }
+    {}
+
+    named @Fmtg
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named "!"     precedence 10 left x named between { dft } right y {}
+	named "!!"    precedence 10 left x right y {}
+	named "!!!"   precedence 10 left x right y {}
+	named "@Over" precedence 11 left x right y { x // y }
+	named ","     precedence 12 left x right y {}
+	named @Col    precedence 12        right x {}
+	named @CC     right x { clines @Break { & x & } }
+	named @RR     right x { rlines @Break { & x & } }
+    {}
+
+    named @Fmth
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named "!"     precedence 10 left x named between { dft } right y {}
+	named "!!"    precedence 10 left x right y {}
+	named "!!!"   precedence 10 left x right y {}
+	named "@Over" precedence 11 left x right y { x // y }
+	named ","     precedence 12 left x right y {}
+	named @Col    precedence 12        right x {}
+	named @CC     right x { clines @Break { & x & } }
+	named @RR     right x { rlines @Break { & x & } }
+    {}
+
+    named @Fmti
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named "!"     precedence 10 left x named between { dft } right y {}
+	named "!!"    precedence 10 left x right y {}
+	named "!!!"   precedence 10 left x right y {}
+	named "@Over" precedence 11 left x right y { x // y }
+	named ","     precedence 12 left x right y {}
+	named @Col    precedence 12        right x {}
+	named @CC     right x { clines @Break { & x & } }
+	named @RR     right x { rlines @Break { & x & } }
+    {}
+
+    named @Fmtj
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named "!"     precedence 10 left x named between { dft } right y {}
+	named "!!"    precedence 10 left x right y {}
+	named "!!!"   precedence 10 left x right y {}
+	named "@Over" precedence 11 left x right y { x // y }
+	named ","     precedence 12 left x right y {}
+	named @Col    precedence 12        right x {}
+	named @CC     right x { clines @Break { & x & } }
+	named @RR     right x { rlines @Break { & x & } }
+    {}
+
+    body @Body
+
+@Begin
+
+    macro @NP { /1.1b }
+
+    def @CC right x { clines @Break { & x & } }
+    def @RR right x { rlines @Break { & x & } }
+#
+#	VT: these definitions have been modified for PDF support
+#
+    def @HSingle	{
+	@BackEnd @Case {
+	  PostScript @Yield { linewidth ltabhs   }
+	  PDF        @Yield { "0 0 m __xsize 0 l" linewidth "w 0 J S" }
+    	}
+    }
+
+    def @HSingleProject	{
+	@BackEnd @Case {
+	  PostScript @Yield { linewidth ltabhsp  }
+	  PDF        @Yield { "0 0 m __xsize 0 l" linewidth "w 2 J S" }
+    	}
+    }
+
+    def @HDouble	{
+	@BackEnd @Case {
+	  PostScript @Yield { linewidth ltabhd   }
+	  PDF        @Yield {		#   dup dup
+	  	"0 0 m __xsize 0 l"	#   0 0 moveto xsize 0 lineto
+	  	"0 __mul(3, " linewidth ") m __xsize __mul(3, " linewidth ") l"	#  0 exch 3 mul moveto xsize exch 3 mul lineto
+	  	linewidth "w 0 J S"	#   setlinewidth 0 setlinecap stroke
+	  }
+    	}
+    }
+
+    def @HDoubleBelow	{
+	@BackEnd @Case {
+	  PostScript @Yield { linewidth ltabhdb  }
+	  PDF        @Yield {		#   dup dup
+		"0 0 m __xsize 0 l"	#   0 0 moveto xsize 0 lineto
+		"0 __mul(-3, "linewidth") m __xsize __mul(-3, "linewidth") l"	#  0 exch -3 mul moveto xsize exch -3 mul lineto
+		linewidth "w 0 J S"	#   setlinewidth 0 setlinecap stroke
+	  }
+    	}
+    }
+
+    def @HDoubleNW	{
+	@BackEnd @Case {
+	  PostScript @Yield { linewidth ltabhdnw  }
+	  PDF        @Yield {		#   dup dup dup dup
+		"0 0 m __xsize 0 l"	#   0 0 moveto xsize 0 lineto
+		"__xsize __mul(3, "linewidth") m"	#	xsize exch 3 mul moveto
+		"__mul(-3, "linewidth") __mul(3, "linewidth") l"	#	-3 mul exch 3 mul lineto
+		"__mul(-3, "linewidth") 0 l"	#	-3 mul 0 lineto
+		linewidth "w 0 j 2 J S"	#   setlinewidth 0 setlinejoin 2 setlinecap stroke
+	  }
+    	}
+    }
+
+    def @HDoubleNE	{
+	@BackEnd @Case {
+	  PostScript @Yield { linewidth ltabhdne  }
+	  PDF        @Yield {		#   dup dup dup dup
+		"0 0 m __xsize 0 l"	#   0 0 moveto xsize 0 lineto
+		"0 __mul(3, "linewidth") m"	#	0 exch 3 mul moveto
+		"__add(__xsize, __mul(3, "linewidth")) __mul(3, "linewidth") l"	#	3 mul xsize add exch 3 mul lineto
+		"__add(__xsize, __mul(3, "linewidth")) 0 l"	#	3 mul xsize add 0 lineto
+		linewidth "w 0 j 2 J S"	#   setlinewidth 0 setlinejoin 2 setlinecap stroke
+	  }
+    	}
+    }
+
+    def @HDoubleSW	{
+	@BackEnd @Case {
+	  PostScript @Yield { linewidth ltabhdsw  }
+	  PDF        @Yield {		#   dup dup dup dup
+		"0 0 m __xsize 0 l"	#	0 0 moveto xsize 0 lineto
+		"__xsize __mul(-3, "linewidth") m"	#	xsize exch -3 mul moveto
+		"__mul(-3, "linewidth") __mul(-3, "linewidth") l"	#	-3 mul exch -3 mul lineto
+		"__mul(-3, "linewidth") 0 l"	#	-3 mul 0 lineto
+		linewidth "w 0 j 2 J S"	#   setlinewidth 0 setlinejoin 2 setlinecap stroke
+	  }
+    	}
+    }
+
+    def @HDoubleSE	{
+	@BackEnd @Case {
+	  PostScript @Yield { linewidth ltabhdse  }
+	  PDF        @Yield {		#   dup dup dup dup
+		"0 0 m __xsize 0 l"	#	0 0 moveto xsize 0 lineto
+		"0 __mul(-3, "linewidth") m"	#	0 exch -3 mul moveto
+		"__add(__xsize, __mul(-3, "linewidth")) __mul(-3, "linewidth") l"	#	3 mul xsize add exch -3 mul lineto
+		"__add(__xsize, __mul( 3, "linewidth")) 0 l"	#	3 mul xsize add 0 lineto
+		linewidth "w 0 j 2 J S"	#   setlinewidth 0 setlinejoin 2 setlinecap stroke
+	  }
+    	}
+    }
+
+    def @VSingle	{
+	@BackEnd @Case {
+	  PostScript @Yield { linewidth ltabvs  }
+	  PDF        @Yield {
+		"0 0 m 0 __ysize l"	#	0 0 moveto 0 ysize lineto
+		linewidth "w 0 J S"	#	setlinewidth 0 setlinecap stroke
+	  }
+    	}
+    }
+
+    def @VDouble	{
+	@BackEnd @Case {
+	  PostScript @Yield { linewidth ltabvd  }
+	  PDF        @Yield {	#	dup dup
+		"0 0 m 0 __ysize l"	#	0 0 moveto 0 ysize lineto
+		"__mul(-3, "linewidth") 0 m __mul(-3, "linewidth") __ysize l"	#	-3 mul 0 moveto -3 mul ysize lineto
+		linewidth "w 0 J S"	#	setlinewidth 0 setlinecap stroke
+	  }
+    	}
+    }
+
+    def @VDoubleRight	{
+	@BackEnd @Case {
+	  PostScript @Yield { linewidth ltabvdr  }
+	  PDF        @Yield {	#	dup dup
+		"0 0 m 0 __ysize l"	#	0 0 moveto 0 ysize lineto
+		"__mul(3, "linewidth") 0 m __mul(3, "linewidth") __ysize l"		#	3 mul 0 moveto 3 mul ysize lineto
+		linewidth "w 0 J S"	#	setlinewidth 0 setlinecap stroke
+	  }
+    	}
+    }
+
+    def @MidHRule
+	left rule
+	right x
+    {
+	rule @Case
+	{
+	    no				@Yield { @OneCol x }
+	    { yes single }		@Yield { @HSingle @Graphic x }
+	    { double doubleboxabove }	@Yield { @HDouble @Graphic x }
+	    doubleboxbelow		@Yield { @HDoubleBelow @Graphic x }
+	}
+    }
+
+    def @LeftHRule
+	left rule
+	right x
+    {
+	rule @Case
+	{
+	    no			@Yield { @OneCol x }
+	    { yes single }	@Yield { @HSingleProject @Graphic x }
+	    double		@Yield { @HDouble @Graphic x }
+	    doubleboxabove	@Yield { @HDoubleNW @Graphic x }
+	    doubleboxbelow	@Yield { @HDoubleSW @Graphic x }
+	}
+    }
+
+    def @RightHRule
+	left rule
+	right x
+    {
+	rule @Case
+	{
+	    no			@Yield { @OneCol x }
+	    { yes single }	@Yield { @HSingleProject @Graphic x }
+	    double		@Yield { @HDouble @Graphic x }
+	    doubleboxabove	@Yield { @HDoubleNE @Graphic x }
+	    doubleboxbelow	@Yield { @HDoubleSE @Graphic x }
+	}
+    }
+
+    def @HSRule
+	left rule
+    {
+	rule @Case
+	{
+	    no		   @Yield {}
+	    { yes single } @Yield { @HSingle @Graphic {} }
+	    double	   @Yield { @HDouble @Graphic {} }
+	    doubleboxabove @Yield { @HDouble @Graphic {} }
+	    doubleboxbelow @Yield { @HDoubleBelow @Graphic {} }
+	}
+    }
+
+    def @ZeroWidth
+	right x
+    { @OneCol { |0io x |0io }
+    }
+
+    def @Line
+    { single @HSRule
+    }
+
+    def @DoubleLine
+    { double @HSRule
+    }
+
+    def @Rule
+    {
+	@OneRow
+	{
+	    @ZeroWidth @HSingle @Graphic { ^|hmargin }
+	    / @Line /
+	    &1rt @ZeroWidth @HSingle @Graphic { |hmargin }
+	}
+    }
+
+    def @DoubleRule
+    {
+	@OneRow
+	{
+	    @ZeroWidth @HDouble @Graphic { ^|hmargin }
+	    / @DoubleLine /
+	    &1rt @ZeroWidth @HDouble @Graphic { |hmargin }
+	}
+    }
+
+    def @VRule
+	left rule
+	right x
+    {
+	rule @Case
+	{
+	    no		   @Yield {}
+	    { yes single } @Yield @OneRow { /0io @VSingle @Graphic x /0io }
+	    double	   @Yield @OneRow { /0io @VDouble @Graphic x /0io }
+	}
+    }
+
+    def @VRuleRight
+	left rule
+	right x
+    {
+	rule @Case
+	{
+	    no		 @Yield {}
+	    {yes single} @Yield @OneRow { /0io @VSingle @Graphic x /0io }
+	    double	 @Yield @OneRow { /0io @VDoubleRight @Graphic x /0io }
+	}
+    }
+
+    def @VSRule
+	left rule
+    {
+	rule @Case
+	{
+	    no		   @Yield {}
+	    { yes single } @Yield { @VSingle @Graphic {} }
+	    double	   @Yield { @VDouble @Graphic {} }
+	}
+    }
+
+    def @VSRuleRight
+	left rule
+    {
+	rule @Case
+	{
+	    no		 @Yield {}
+	    {yes single} @Yield { @VSingle @Graphic {} }
+	    double	 @Yield { @VDoubleRight @Graphic {} }
+	}
+    }
+
+    def @Wrap
+	named ur { no }			# Rule up above entry
+	named dr { no }			# Rule down below entry
+	named vm { vmargin }		# Vertical margin
+	right x				# The object to be wrapped
+    {
+	      ur @HSRule
+	^/vm  @OneCol @OneRow x
+	 /vm  dr @HSRule
+    }
+
+    def @Sep
+	left x
+	named ur { no }			# Rule up above entry
+	named dr { no }			# Rule down below entry
+	named sr { no }			# Rule separating x from y
+	named hm { hmargin }		# Horizontal margin
+	named vm { vmargin }		# Vertical margin
+	right y
+    {
+	def vr
+	{
+	    sr @Case
+	    {	dft	@Yield between 
+		else	@Yield sr
+	    }
+	}
+
+	x | @OneCol
+	{      ur @MidHRule {|hm}
+	  /vm
+	  /vm  dr @MidHRule {|hm}
+	}
+	| @OneCol
+	{      vr @VRule { /vm }  |  ur @MidHRule {|hm}
+	  /vm  vr @VSRule         |
+	  /vm  vr @VRule {^/vm }  |  dr @MidHRule {|hm}
+	}
+	| y
+    }
+
+    def @NSep
+	left x
+	named hm { hmargin }
+	right y
+    {
+	x | @OneCol { |hm } | @OneCol { |hm } | y
+    }
+
+    def @LeftEdge
+	named ur { no }			# Rule up above entry
+	named dr { no }			# Rule down below entry
+	named sr { no }			# Rule separating x from y
+	named hm { hmargin }		# Horizontal margin
+	named vm { vmargin }		# Vertical margin
+	right x
+    {
+	sr @Case
+	{
+	    no @Yield { x }
+	    else @Yield
+	    { @OneCol
+	      {
+		      sr @VRule { /vm }	 |  ur @LeftHRule { |hm }
+	         ^/vm sr @VSRule	 |
+		  /vm sr @VRule { ^/vm } |  dr @LeftHRule { |hm }
+	      }
+	      | x
+	    }
+	}
+    }
+
+    def @RightEdge
+	left x
+	named ur { no }			# Rule up above entry
+	named dr { no }			# Rule down below entry
+	named sr { no }			# Rule separating x from y
+	named hm { hmargin }		# Horizontal margin
+	named vm { vmargin }		# Vertical margin
+    {
+	sr @Case
+	{
+	    no @Yield { x }
+	    else @Yield
+	    {
+	      x | @OneCol
+	      {
+		    ur @RightHRule { |hm }
+		/vm
+		/vm dr @RightHRule { |hm }
+	      }
+	      | @OneCol
+	      {
+		     sr @VRuleRight { /vm }
+		/vm  sr @VSRuleRight
+		/vm  sr @VRuleRight { ^/vm }
+	      }
+	    }
+	}
+    }
+
+    def @DoRowa
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named above	{ above   }
+	named below	{ below   }
+	named side 	{ side    }
+	named vmargin   { vmargin }
+    {
+	@LeftEdge ur { above } dr { below } sr { side } vm { vmargin }
+	@Fmta
+	  A { A }  B { B }  C { C }  D { D }  E { E }
+	  F { F }  G { G }  H { H }  I { I }  J { J }
+	  K { K }  L { L }  M { M }  N { N }  O { O }
+	  P { P }  Q { Q }  R { R }  S { S }  T { T }
+	  U { U }  V { V }  W { W }  X { X }  Y { Y }
+	  Z { Z }
+	  @Col { @Wrap ur {above} dr {below} vm {vmargin} x}
+	  !    { x @Sep ur {above} dr {below} sr { between } vm {vmargin} y}
+	  !!   { x @Sep ur {above} dr {below} sr { single  } vm {vmargin} y}
+	  !!!  { x @Sep ur {above} dr {below} sr { double  } vm {vmargin} y}
+	  ,    { x @NSep y }
+	@RightEdge ur { above } dr { below } sr { side } vm { vmargin }
+    }
+
+    def @DoRowb
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named above	{ above   }
+	named below	{ below   }
+	named side 	{ side    }
+	named vmargin   { vmargin }
+    {
+	@LeftEdge ur { above } dr { below } sr { side } vm { vmargin }
+	@Fmtb
+	  A { A }  B { B }  C { C }  D { D }  E { E }
+	  F { F }  G { G }  H { H }  I { I }  J { J }
+	  K { K }  L { L }  M { M }  N { N }  O { O }
+	  P { P }  Q { Q }  R { R }  S { S }  T { T }
+	  U { U }  V { V }  W { W }  X { X }  Y { Y }
+	  Z { Z }
+	  @Col { @Wrap ur {above} dr {below} vm {vmargin} x}
+	  !    { x @Sep ur {above} dr {below} sr { between } vm {vmargin} y}
+	  !!   { x @Sep ur {above} dr {below} sr { single  } vm {vmargin} y}
+	  !!!  { x @Sep ur {above} dr {below} sr { double  } vm {vmargin} y}
+	  ,    { x @NSep y }
+	@RightEdge ur { above } dr { below } sr { side } vm { vmargin }
+    }
+
+    def @DoRowc
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named above	{ above   }
+	named below	{ below   }
+	named side 	{ side    }
+	named vmargin   { vmargin }
+    {
+	@LeftEdge ur { above } dr { below } sr { side } vm { vmargin }
+	@Fmtc
+	  A { A }  B { B }  C { C }  D { D }  E { E }
+	  F { F }  G { G }  H { H }  I { I }  J { J }
+	  K { K }  L { L }  M { M }  N { N }  O { O }
+	  P { P }  Q { Q }  R { R }  S { S }  T { T }
+	  U { U }  V { V }  W { W }  X { X }  Y { Y }
+	  Z { Z }
+	  @Col { @Wrap ur {above} dr {below} vm {vmargin} x}
+	  !    { x @Sep ur {above} dr {below} sr { between } vm {vmargin} y}
+	  !!   { x @Sep ur {above} dr {below} sr { single  } vm {vmargin} y}
+	  !!!  { x @Sep ur {above} dr {below} sr { double  } vm {vmargin} y}
+	  ,    { x @NSep y }
+	@RightEdge ur { above } dr { below } sr { side } vm { vmargin }
+    }
+
+    def @DoRowd
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named above	{ above   }
+	named below	{ below   }
+	named side 	{ side    }
+	named vmargin   { vmargin }
+    {
+	@LeftEdge ur { above } dr { below } sr { side } vm { vmargin }
+	@Fmtd
+	  A { A }  B { B }  C { C }  D { D }  E { E }
+	  F { F }  G { G }  H { H }  I { I }  J { J }
+	  K { K }  L { L }  M { M }  N { N }  O { O }
+	  P { P }  Q { Q }  R { R }  S { S }  T { T }
+	  U { U }  V { V }  W { W }  X { X }  Y { Y }
+	  Z { Z }
+	  @Col { @Wrap ur {above} dr {below} vm {vmargin} x}
+	  !    { x @Sep ur {above} dr {below} sr { between } vm {vmargin} y}
+	  !!   { x @Sep ur {above} dr {below} sr { single  } vm {vmargin} y}
+	  !!!  { x @Sep ur {above} dr {below} sr { double  } vm {vmargin} y}
+	  ,    { x @NSep y }
+	@RightEdge ur { above } dr { below } sr { side } vm { vmargin }
+    }
+
+    def @DoRowe
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named above	{ above   }
+	named below	{ below   }
+	named side 	{ side    }
+	named vmargin   { vmargin }
+    {
+	@LeftEdge ur { above } dr { below } sr { side } vm { vmargin }
+	@Fmte
+	  A { A }  B { B }  C { C }  D { D }  E { E }
+	  F { F }  G { G }  H { H }  I { I }  J { J }
+	  K { K }  L { L }  M { M }  N { N }  O { O }
+	  P { P }  Q { Q }  R { R }  S { S }  T { T }
+	  U { U }  V { V }  W { W }  X { X }  Y { Y }
+	  Z { Z }
+	  @Col { @Wrap ur {above} dr {below} vm {vmargin} x}
+	  !    { x @Sep ur {above} dr {below} sr { between } vm {vmargin} y}
+	  !!   { x @Sep ur {above} dr {below} sr { single  } vm {vmargin} y}
+	  !!!  { x @Sep ur {above} dr {below} sr { double  } vm {vmargin} y}
+	  ,    { x @NSep y }
+	@RightEdge ur { above } dr { below } sr { side } vm { vmargin }
+    }
+
+    def @DoRowf
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named above	{ above   }
+	named below	{ below   }
+	named side 	{ side    }
+	named vmargin   { vmargin }
+    {
+	@LeftEdge ur { above } dr { below } sr { side } vm { vmargin }
+	@Fmtf
+	  A { A }  B { B }  C { C }  D { D }  E { E }
+	  F { F }  G { G }  H { H }  I { I }  J { J }
+	  K { K }  L { L }  M { M }  N { N }  O { O }
+	  P { P }  Q { Q }  R { R }  S { S }  T { T }
+	  U { U }  V { V }  W { W }  X { X }  Y { Y }
+	  Z { Z }
+	  @Col { @Wrap ur {above} dr {below} vm {vmargin} x}
+	  !    { x @Sep ur {above} dr {below} sr { between } vm {vmargin} y}
+	  !!   { x @Sep ur {above} dr {below} sr { single  } vm {vmargin} y}
+	  !!!  { x @Sep ur {above} dr {below} sr { double  } vm {vmargin} y}
+	  ,    { x @NSep y }
+	@RightEdge ur { above } dr { below } sr { side } vm { vmargin }
+    }
+
+    def @DoRowg
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named above	{ above   }
+	named below	{ below   }
+	named side 	{ side    }
+	named vmargin   { vmargin }
+    {
+	@LeftEdge ur { above } dr { below } sr { side } vm { vmargin }
+	@Fmtg
+	  A { A }  B { B }  C { C }  D { D }  E { E }
+	  F { F }  G { G }  H { H }  I { I }  J { J }
+	  K { K }  L { L }  M { M }  N { N }  O { O }
+	  P { P }  Q { Q }  R { R }  S { S }  T { T }
+	  U { U }  V { V }  W { W }  X { X }  Y { Y }
+	  Z { Z }
+	  @Col { @Wrap ur {above} dr {below} vm {vmargin} x}
+	  !    { x @Sep ur {above} dr {below} sr { between } vm {vmargin} y}
+	  !!   { x @Sep ur {above} dr {below} sr { single  } vm {vmargin} y}
+	  !!!  { x @Sep ur {above} dr {below} sr { double  } vm {vmargin} y}
+	  ,    { x @NSep y }
+	@RightEdge ur { above } dr { below } sr { side } vm { vmargin }
+    }
+
+    def @DoRowh
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named above	{ above   }
+	named below	{ below   }
+	named side 	{ side    }
+	named vmargin   { vmargin }
+    {
+	@LeftEdge ur { above } dr { below } sr { side } vm { vmargin }
+	@Fmth
+	  A { A }  B { B }  C { C }  D { D }  E { E }
+	  F { F }  G { G }  H { H }  I { I }  J { J }
+	  K { K }  L { L }  M { M }  N { N }  O { O }
+	  P { P }  Q { Q }  R { R }  S { S }  T { T }
+	  U { U }  V { V }  W { W }  X { X }  Y { Y }
+	  Z { Z }
+	  @Col { @Wrap ur {above} dr {below} vm {vmargin} x}
+	  !    { x @Sep ur {above} dr {below} sr { between } vm {vmargin} y}
+	  !!   { x @Sep ur {above} dr {below} sr { single  } vm {vmargin} y}
+	  !!!  { x @Sep ur {above} dr {below} sr { double  } vm {vmargin} y}
+	  ,    { x @NSep y }
+	@RightEdge ur { above } dr { below } sr { side } vm { vmargin }
+    }
+
+    def @DoRowi
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named above	{ above   }
+	named below	{ below   }
+	named side 	{ side    }
+	named vmargin   { vmargin }
+    {
+	@LeftEdge ur { above } dr { below } sr { side } vm { vmargin }
+	@Fmti
+	  A { A }  B { B }  C { C }  D { D }  E { E }
+	  F { F }  G { G }  H { H }  I { I }  J { J }
+	  K { K }  L { L }  M { M }  N { N }  O { O }
+	  P { P }  Q { Q }  R { R }  S { S }  T { T }
+	  U { U }  V { V }  W { W }  X { X }  Y { Y }
+	  Z { Z }
+	  @Col { @Wrap ur {above} dr {below} vm {vmargin} x}
+	  !    { x @Sep ur {above} dr {below} sr { between } vm {vmargin} y}
+	  !!   { x @Sep ur {above} dr {below} sr { single  } vm {vmargin} y}
+	  !!!  { x @Sep ur {above} dr {below} sr { double  } vm {vmargin} y}
+	  ,    { x @NSep y }
+	@RightEdge ur { above } dr { below } sr { side } vm { vmargin }
+    }
+
+    def @DoRowj
+	named A {} named B {} named C {} named D {} named E {}
+	named F {} named G {} named H {} named I {} named J {}
+	named K {} named L {} named M {} named N {} named O {}
+	named P {} named Q {} named R {} named S {} named T {}
+	named U {} named V {} named W {} named X {} named Y {}
+	named Z {}
+	named above	{ above   }
+	named below	{ below   }
+	named side 	{ side    }
+	named vmargin   { vmargin }
+    {
+	@LeftEdge ur { above } dr { below } sr { side } vm { vmargin }
+	@Fmtj
+	  A { A }  B { B }  C { C }  D { D }  E { E }
+	  F { F }  G { G }  H { H }  I { I }  J { J }
+	  K { K }  L { L }  M { M }  N { N }  O { O }
+	  P { P }  Q { Q }  R { R }  S { S }  T { T }
+	  U { U }  V { V }  W { W }  X { X }  Y { Y }
+	  Z { Z }
+	  @Col { @Wrap ur {above} dr {below} vm {vmargin} x}
+	  !    { x @Sep ur {above} dr {below} sr { between } vm {vmargin} y}
+	  !!   { x @Sep ur {above} dr {below} sr { single  } vm {vmargin} y}
+	  !!!  { x @Sep ur {above} dr {below} sr { double  } vm {vmargin} y}
+	  ,    { x @NSep y }
+	@RightEdge ur { above } dr { below } sr { side } vm { vmargin }
+    }
+
+    macro @Rowa { / @DoRowa }
+    macro @Rowb { / @DoRowb }
+    macro @Rowc { / @DoRowc }
+    macro @Rowd { / @DoRowd }
+    macro @Rowe { / @DoRowe }
+    macro @Rowf { / @DoRowf }
+    macro @Rowg { / @DoRowg }
+    macro @Rowh { / @DoRowh }
+    macro @Rowi { / @DoRowi }
+    macro @Rowj { / @DoRowj }
+
+    macro @FirstRowa { @DoRowa }
+    macro @FirstRowb { @DoRowb }
+    macro @FirstRowc { @DoRowc }
+    macro @FirstRowd { @DoRowd }
+    macro @FirstRowe { @DoRowe }
+    macro @FirstRowf { @DoRowf }
+    macro @FirstRowg { @DoRowg }
+    macro @FirstRowh { @DoRowh }
+    macro @FirstRowi { @DoRowi }
+    macro @FirstRowj { @DoRowj }
+
+    macro @MarkRowa { ^/ @DoRowa }
+    macro @MarkRowb { ^/ @DoRowb }
+    macro @MarkRowc { ^/ @DoRowc }
+    macro @MarkRowd { ^/ @DoRowd }
+    macro @MarkRowe { ^/ @DoRowe }
+    macro @MarkRowf { ^/ @DoRowf }
+    macro @MarkRowg { ^/ @DoRowg }
+    macro @MarkRowh { ^/ @DoRowh }
+    macro @MarkRowi { ^/ @DoRowi }
+    macro @MarkRowj { ^/ @DoRowj }
+
+
+    @Body
+
+@End @Tab
diff --git a/include/tabf.lpg b/include/tabf.lpg
new file mode 100644
index 0000000..c0dd9a0
--- /dev/null
+++ b/include/tabf.lpg
@@ -0,0 +1,115 @@
+%%BeginResource: procset LoutTabPrependGraphic
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                  %
+%  PostScript @SysPrependGraphic file for @Tab     %
+%                                                  %
+%  To assist in avoiding name clashes, the names   %
+%  of all these symbols begin with "ltab".         %
+%                                                  %
+%  Jeffrey H. Kingston                             %
+%  24 September 1991                               %
+%  22 December 1992                                %
+%                                                  %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% linewidth ltabhs -
+% horizontal single line
+/ltabhs
+{  0 0 moveto xsize 0 lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhsp -
+% horizontal single line with projecting ends
+/ltabhsp
+{  0 0 moveto xsize 0 lineto
+   setlinewidth 2 setlinecap stroke
+} def
+
+% linewidth ltabhd -
+% horizontal double line
+/ltabhd
+{  dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch 3 mul moveto xsize exch 3 mul lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhdb -
+% horizontal double line below mark
+/ltabhdb
+{  dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch -3 mul moveto xsize exch -3 mul lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabhdnw -
+% horizontal double line with northwest corner
+/ltabhdnw
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   xsize exch 3 mul moveto
+   -3 mul exch 3 mul lineto
+   -3 mul 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdne -
+% horizontal double line with northeast corner
+/ltabhdne
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch 3 mul moveto
+   3 mul xsize add exch 3 mul lineto
+   3 mul xsize add 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdsw -
+% horizontal double line with southwest corner
+/ltabhdsw
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   xsize exch -3 mul moveto
+   -3 mul exch -3 mul lineto
+   -3 mul 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabhdse -
+% horizontal double line with southeast corner
+/ltabhdse
+{  dup dup dup dup
+   0 0 moveto xsize 0 lineto
+   0 exch -3 mul moveto
+   3 mul xsize add exch -3 mul lineto
+   3 mul xsize add 0 lineto
+   setlinewidth 0 setlinejoin 2 setlinecap stroke
+} def
+
+% linewidth ltabvs -
+% vertical single line
+/ltabvs
+{  0 0 moveto 0 ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabvd -
+% vertical double line
+/ltabvd
+{  dup dup
+   0 0 moveto 0 ysize lineto
+   -3 mul 0 moveto -3 mul ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+
+% linewidth ltabvdr -
+% vertical double line to right of mark
+/ltabvdr
+{  dup dup
+   0 0 moveto 0 ysize lineto
+   3 mul 0 moveto 3 mul ysize lineto
+   setlinewidth 0 setlinecap stroke
+} def
+%%EndResource
diff --git a/include/tbl b/include/tbl
new file mode 100644
index 0000000..0574bf0
--- /dev/null
+++ b/include/tbl
@@ -0,0 +1,79 @@
+
+###############################################################################
+#                                                                             #
+#   Lout setup file for table printing                                        #
+#                                                                             #
+#   Jeffrey H. Kingston                                                       #
+#   5 February 1999                                                           #
+#                                                                             #
+###############################################################################
+
+###############################################################################
+#                                                                             #
+#  The @SysInclude { tblf } line                                              #
+#                                                                             #
+#  This line causes Lout to read the definitions for diagrams, and should     #
+#  not be touched.                                                            #
+#                                                                             #
+###############################################################################
+ 
+@SysInclude { tblf }
+
+
+###############################################################################
+#                                                                             #
+#  The @TbleSetup @Use clause                                                 #
+#                                                                             #
+#  To change the default value of any option, delete the # at the start of    #
+#  its line and change the value between braces.                              #
+#                                                                             #
+###############################################################################
+
+@Use { @TblSetup
+    # paint                { nopaint            } # colour of background
+    # background           {                    } # object in background
+    # font                 {                    } # font
+    # break                {                    } # paragraph breaking style
+    # width                {                    } # fixed width or "expand"
+    # height               {                    } # fixed height
+    # indent               {                    } # horizontal indent
+    # indentvertical       {                    } # vertical indent
+    # strut                { yes                } # vertical strut
+    # struthorizontal      { no                 } # horizontal strut
+    # margin               {                    } # margin all round
+    # marginhorizontal     { 0.6f @OrIfPlain 2s } # margin left, right of entry
+    # marginleft           {                    } # margin left of entry
+    # marginright          {                    } # margin right of entry
+    # marginvertical       { 0.3f @OrIfPlain 2f } # margin above, below entry
+    # marginabove          {                    } # margin above entry
+    # marginbelow          {                    } # margin below entry
+    # rule                 { no                 } # rule all round cell
+    # rulehorizontal       {                    } # rule above and below cell
+    # ruleabove            {                    } # rule above cell
+    # rulebelow            {                    } # rule below cell
+    # rulevertical         {                    } # rule left and right of cell
+    # ruleleft             {                    } # rule left of cell
+    # ruleright            {                    } # rule right of cell
+    # rulewidth            { 0.05f              } # width (thickness) of rule
+    # rulehorizontalwidth  { {} @OrIfPlain 1f   } # width of above, below rules
+    # ruleabovewidth       {                    } # width of above rule
+    # rulebelowwidth       {                    } # width of below rule
+    # ruleverticalwidth    { {} @OrIfPlain 1s   } # width of left, right rules
+    # ruleleftwidth        {                    } # width of left rule
+    # rulerightwidth       {                    } # width of right rule
+    # rulegap              { 0.15f              } # gap between double rules
+    # rulehorizontalgap    { {} @OrIfPlain 0f   } # gap between dbl a&b rules
+    # ruleabovegap         {                    } # gap between dbl above rules
+    # rulebelowgap         {                    } # gap between dbl below rules
+    # ruleverticalgap      { {} @OrIfPlain 0s   } # gap between dbl l&r rules
+    # ruleleftgap          {                    } # gap between dbl left rules
+    # rulerightgap         {                    } # gap between dbl right rules
+    # rulecolour           { black              } # color of rules
+    # rulehorizontalcolour {                    } # color of above, below rules
+    # ruleabovecolour      {                    } # color of above rules
+    # rulebelowcolour      {                    } # color of below rules
+    # ruleverticalcolour   {                    } # color of left, right rules
+    # ruleleftcolour       {                    } # color of left rules
+    # rulerightcolour      {                    } # color of right rules
+    # ruleplainchar        { .                  } # plain text rule characters
+}
diff --git a/include/tblf b/include/tblf
new file mode 100644
index 0000000..c8f0019
--- /dev/null
+++ b/include/tblf
@@ -0,0 +1,3127 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @Tbl package for tables                                               #
+#                                                                             #
+#  Version 1.0 (22 November 1998)                                             #
+#  Jeffrey H. Kingston                                                        #
+#                                                                             #
+#  Based on the @Tab package (Jeffrey H. Kingston, September 1991).           #
+#                                                                             #
+###############################################################################
+
+@SysPrependGraphic { tblf.lpg }
+
+export @OrIfPlain
+def @TOIP {
+
+    def @OrIfPlain
+	left ps
+	right plain
+    {
+	@BackEnd @Case {
+	    PlainText @Yield plain
+	    else      @Yield ps
+	}
+    }
+}
+
+export @Tbl
+def @TblSetup
+    import @TOIP named paint		p	{ nopaint }
+    import @TOIP named background	bg	{}
+    import @TOIP named font		f	{}
+    import @TOIP named break		b	{}
+    import @TOIP named width		w	{}
+    import @TOIP named height		h	{}
+    import @TOIP named indent		i	{}
+    import @TOIP named indentvertical	iv	{}
+    import @TOIP named strut		s	{ yes }
+    import @TOIP named struthorizontal	sh	{ no }
+    import @TOIP named margin		m	{}
+    import @TOIP named marginhorizontal	mh	{ 0.6f @OrIfPlain 2s }
+    import @TOIP named marginleft	ml	{}
+    import @TOIP named marginright	mr	{}
+    import @TOIP named marginvertical	mv	{ 0.3f @OrIfPlain 2f }
+    import @TOIP named marginabove	ma	{}
+    import @TOIP named marginbelow	mb	{}
+    import @TOIP named rule		r	{ no }
+    import @TOIP named rulehorizontal	rh	{}
+    import @TOIP named ruleabove	ra	{}
+    import @TOIP named rulebelow	rb	{}
+    import @TOIP named rulevertical	rv	{}
+    import @TOIP named ruleleft		rl	{}
+    import @TOIP named ruleright	rr	{}
+    import @TOIP named rulewidth	rw	{ 0.05f }
+    import @TOIP named rulehorizontalwidth rhw	{ {} @OrIfPlain 1f }
+    import @TOIP named ruleabovewidth	raw	{}
+    import @TOIP named rulebelowwidth	rbw	{}
+    import @TOIP named ruleverticalwidth rvw	{ {} @OrIfPlain 1s }
+    import @TOIP named ruleleftwidth	rlw	{}
+    import @TOIP named rulerightwidth	rrw	{}
+    import @TOIP named rulegap		rg	{ 0.15f }
+    import @TOIP named rulehorizontalgap rhg	{ {} @OrIfPlain 0f }
+    import @TOIP named ruleabovegap	rag	{}
+    import @TOIP named rulebelowgap	rbg	{}
+    import @TOIP named ruleverticalgap	rvg	{ {} @OrIfPlain 0s }
+    import @TOIP named ruleleftgap	rlg	{}
+    import @TOIP named rulerightgap	rrg	{}
+    import @TOIP named rulecolour rulecolor	rc	{ black }
+    import @TOIP named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+    import @TOIP named ruleabovecolour ruleabovecolor		rac	{}
+    import @TOIP named rulebelowcolour rulebelowcolor		rbc	{}
+    import @TOIP named ruleverticalcolour ruleverticalcolor	rvc	{}
+    import @TOIP named ruleleftcolour ruleleftcolor		rlc	{}
+    import @TOIP named rulerightcolour rulerightcolor		rrc	{}
+    import @TOIP named ruleplainchar	rpc	{ . }
+
+@Begin
+
+    def @Else
+	precedence 20
+	associativity right
+	left x
+	right y
+    {
+	x @Case {
+	    ""   @Yield y
+	    else @Yield x
+	}
+    }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Specific option values as the setup file knows them (i.e. Level 1)     #
+    #                                                                         #
+    ###########################################################################
+
+    def setupp    { p   }
+    def setupbg   { bg  }
+    def setupf    { f   }
+    def setupb    { b   }
+    def setupw    { w   }
+    def setuph    { h   }
+    def setupi    { i   }
+    def setupiv   { iv  }
+    def setups    { s   }
+    def setupsh   { sh  }
+    def setupml   { ml  @Else mh  @Else m  }
+    def setupmr   { mr  @Else mh  @Else m  }
+    def setupma   { ma  @Else mv  @Else m  }
+    def setupmb   { mb  @Else mv  @Else m  }
+    def setupra   { ra  @Else rh  @Else r  }
+    def setuprb   { rb  @Else rh  @Else r  }
+    def setuprl   { rl  @Else rv  @Else r  }
+    def setuprr   { rr  @Else rv  @Else r  }
+    def setupraw  { raw @Else rhw @Else rw }
+    def setuprbw  { rbw @Else rhw @Else rw }
+    def setuprlw  { rlw @Else rvw @Else rw }
+    def setuprrw  { rrw @Else rvw @Else rw }
+    def setuprag  { rag @Else rhg @Else rg }
+    def setuprbg  { rbg @Else rhg @Else rg }
+    def setuprlg  { rlg @Else rvg @Else rg }
+    def setuprrg  { rrg @Else rvg @Else rg }
+    def setuprac  { rac @Else rhc @Else rc }
+    def setuprbc  { rbc @Else rhc @Else rc }
+    def setuprlc  { rlc @Else rvc @Else rc }
+    def setuprrc  { rrc @Else rvc @Else rc }
+    def setuprpc  { rpc }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  @Tbl symbol                                                            #
+    #                                                                         #
+    ###########################################################################
+
+    export
+
+	@Row
+	@Rowa
+	@Rowb
+	@Rowc
+	@Rowd
+	@Rowe
+	@Rowf
+	@Rowg
+	@Rowh
+
+	@FirstRow
+	@FirstRowa
+	@FirstRowb
+	@FirstRowc
+	@FirstRowd
+	@FirstRowe
+	@FirstRowf
+	@FirstRowg
+	@FirstRowh
+
+	@MarkRow
+	@MarkRowa
+	@MarkRowb
+	@MarkRowc
+	@MarkRowd
+	@MarkRowe
+	@MarkRowf
+	@MarkRowg
+	@MarkRowh
+
+	@NoBreakRow
+	@NoBreakRowa
+	@NoBreakRowb
+	@NoBreakRowc
+	@NoBreakRowd
+	@NoBreakRowe
+	@NoBreakRowf
+	@NoBreakRowg
+	@NoBreakRowh
+
+	@NP
+
+    def @Tbl
+
+	# parameters for formatting the entire table
+	named paint			p	{}
+	named background		bg	{}
+	named font			f	{}
+	named break			b	{}
+	named width			w	{}
+	named height			h	{}
+	named indent			i	{}
+	named indentvertical		iv	{}
+	named strut			s	{}
+	named struthorizontal		sh	{}
+	named margin			m	{}
+	named marginhorizontal		mh	{}
+	named marginleft		ml	{}
+	named marginright		mr	{}
+	named marginvertical		mv	{}
+	named marginabove		ma	{}
+	named marginbelow		mb	{}
+	named rule			r	{}
+	named rulehorizontal		rh	{}
+	named ruleabove			ra	{}
+	named rulebelow			rb	{}
+	named rulevertical		rv	{}
+	named ruleleft			rl	{}
+	named ruleright			rr	{}
+	named rulewidth			rw	{}
+	named rulehorizontalwidth	rhw	{}
+	named ruleabovewidth		raw	{}
+	named rulebelowwidth		rbw	{}
+	named ruleverticalwidth		rvw	{}
+	named ruleleftwidth		rlw	{}
+	named rulerightwidth		rrw	{}
+	named rulegap			rg	{}
+	named rulehorizontalgap		rhg	{}
+	named ruleabovegap		rag	{}
+	named rulebelowgap		rbg	{}
+	named ruleverticalgap		rvg	{}
+	named ruleleftgap		rlg	{}
+	named rulerightgap		rrg	{}
+	named rulecolour rulecolor			rc	{}
+	named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+	named ruleabovecolour ruleabovecolor		rac	{}
+	named rulebelowcolour rulebelowcolor		rbc	{}
+	named ruleverticalcolour ruleverticalcolor	rvc	{}
+	named ruleleftcolour ruleleftcolor		rlc	{}
+	named rulerightcolour rulerightcolor		rrc	{}
+	named ruleplainchar		rpc	{}
+
+	# parameters for formatting @Rowa rows
+	named apaint			ap	{}
+	named abackground		abg	{}
+	named afont			af	{}
+	named abreak			ab	{}
+	named awidth			aw	{}
+	named aheight			ah	{}
+	named aindent			ai	{}
+	named aindentvertical		aiv	{}
+	named astrut			as	{}
+	named astruthorizontal		ash	{}
+	named amargin			am	{}
+	named amarginhorizontal		amh	{}
+	named amarginleft		aml	{}
+	named amarginright		amr	{}
+	named amarginvertical		amv	{}
+	named amarginabove		ama	{}
+	named amarginbelow		amb	{}
+	named arule			ar	{}
+	named arulehorizontal		arh	{}
+	named aruleabove		ara	{}
+	named arulebelow		arb	{}
+	named arulevertical		arv	{}
+	named aruleleft			arl	{}
+	named aruleright		arr	{}
+	named arulewidth		arw	{}
+	named arulehorizontalwidth	arhw	{}
+	named aruleabovewidth		araw	{}
+	named arulebelowwidth		arbw	{}
+	named aruleverticalwidth	arvw	{}
+	named aruleleftwidth		arlw	{}
+	named arulerightwidth		arrw	{} 
+	named arulegap			arg	{}
+	named arulehorizontalgap	arhg	{}
+	named aruleabovegap		arag	{}
+	named arulebelowgap		arbg	{}
+	named aruleverticalgap		arvg	{}
+	named aruleleftgap		arlg	{}
+	named arulerightgap		arrg	{}
+	named arulecolour arulecolor			arc	{}
+	named arulehorizontalcolour arulehorizontalcolor arhc	{}
+	named aruleabovecolour aruleabovecolor		arac	{}
+	named arulebelowcolour arulebelowcolor		arbc	{}
+	named aruleverticalcolour aruleverticalcolor	arvc	{}
+	named aruleleftcolour aruleleftcolor		arlc	{}
+	named arulerightcolour arulerightcolor		arrc	{}
+	named aruleplainchar		arpc	{}
+	named aformat
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	    named @Cell
+		named paint			p	{}
+		named background		bg	{}
+		named font			f	{}
+		named break			b	{}
+		named width			w	{}
+		named height			h	{}
+		named indent			i	{}
+		named indentvertical		iv	{}
+		named strut			s	{}
+		named struthorizontal		sh	{}
+		named margin			m	{}
+		named marginhorizontal		mh	{}
+		named marginleft		ml	{}
+		named marginright		mr	{}
+		named marginvertical		mv	{}
+		named marginabove		ma	{}
+		named marginbelow		mb	{}
+		named rule			r	{}
+		named rulehorizontal		rh	{}
+		named ruleabove			ra	{}
+		named rulebelow			rb	{}
+		named rulevertical		rv	{}
+		named ruleleft			rl	{}
+		named ruleright			rr	{}
+		named rulewidth			rw	{}
+		named rulehorizontalwidth	rhw	{}
+		named ruleabovewidth		raw	{}
+		named rulebelowwidth		rbw	{}
+		named ruleverticalwidth		rvw	{}
+		named ruleleftwidth		rlw	{}
+		named rulerightwidth		rrw	{}
+		named rulegap			rg	{}
+		named rulehorizontalgap		rhg	{}
+		named ruleabovegap		rag	{}
+		named rulebelowgap		rbg	{}
+		named ruleverticalgap		rvg	{}
+		named ruleleftgap		rlg	{}
+		named rulerightgap		rrg	{}
+		named rulecolour rulecolor			rc	{}
+		named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+		named ruleabovecolour ruleabovecolor		rac	{}
+		named rulebelowcolour rulebelowcolor		rbc	{}
+		named ruleverticalcolour ruleverticalcolor	rvc	{}
+		named ruleleftcolour ruleleftcolor		rlc	{}
+		named rulerightcolour rulerightcolor		rrc	{}
+		named ruleplainchar		rpc	{}
+		right x
+	    {}
+	{}
+
+	# parameters for formatting @Rowb rows
+	named bpaint			bp	{}
+	named bbackground		bbg	{}
+	named bfont			bf	{}
+	named bbreak			bb	{}
+	named bwidth			bw	{}
+	named bheight			bh	{}
+	named bindent			bi	{}
+	named bindentvertical		biv	{}
+	named bstrut			bs	{}
+	named bstruthorizontal		bsh	{}
+	named bmargin			bm	{}
+	named bmarginhorizontal		bmh	{}
+	named bmarginleft		bml	{}
+	named bmarginright		bmr	{}
+	named bmarginvertical		bmv	{}
+	named bmarginabove		bma	{}
+	named bmarginbelow		bmb	{}
+	named brule			br	{}
+	named brulehorizontal		brh	{}
+	named bruleabove		bra	{}
+	named brulebelow		brb	{}
+	named brulevertical		brv	{}
+	named bruleleft			brl	{}
+	named bruleright		brr	{}
+	named brulewidth		brw	{}
+	named brulehorizontalwidth	brhw	{}
+	named bruleabovewidth		braw	{}
+	named brulebelowwidth		brbw	{}
+	named bruleverticalwidth	brvw	{}
+	named bruleleftwidth		brlw	{}
+	named brulerightwidth		brrw	{} 
+	named brulegap			brg	{}
+	named brulehorizontalgap	brhg	{}
+	named bruleabovegap		brag	{}
+	named brulebelowgap		brbg	{}
+	named bruleverticalgap		brvg	{}
+	named bruleleftgap		brlg	{}
+	named brulerightgap		brrg	{}
+	named brulecolour brulecolor			brc	{}
+	named brulehorizontalcolour brulehorizontalcolor brhc	{}
+	named bruleabovecolour bruleabovecolor		brac	{}
+	named brulebelowcolour brulebelowcolor		brbc	{}
+	named bruleverticalcolour bruleverticalcolor	brvc	{}
+	named bruleleftcolour bruleleftcolor		brlc	{}
+	named brulerightcolour brulerightcolor		brrc	{}
+	named bruleplainchar		brpc	{}
+	named bformat
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	    named @Cell
+		named paint			p	{}
+		named background		bg	{}
+		named font			f	{}
+		named break			b	{}
+		named width			w	{}
+		named height			h	{}
+		named indent			i	{}
+		named indentvertical		iv	{}
+		named strut			s	{}
+		named struthorizontal		sh	{}
+		named margin			m	{}
+		named marginhorizontal		mh	{}
+		named marginleft		ml	{}
+		named marginright		mr	{}
+		named marginvertical		mv	{}
+		named marginabove		ma	{}
+		named marginbelow		mb	{}
+		named rule			r	{}
+		named rulehorizontal		rh	{}
+		named ruleabove			ra	{}
+		named rulebelow			rb	{}
+		named rulevertical		rv	{}
+		named ruleleft			rl	{}
+		named ruleright			rr	{}
+		named rulewidth			rw	{}
+		named rulehorizontalwidth	rhw	{}
+		named ruleabovewidth		raw	{}
+		named rulebelowwidth		rbw	{}
+		named ruleverticalwidth		rvw	{}
+		named ruleleftwidth		rlw	{}
+		named rulerightwidth		rrw	{}
+		named rulegap			rg	{}
+		named rulehorizontalgap		rhg	{}
+		named ruleabovegap		rag	{}
+		named rulebelowgap		rbg	{}
+		named ruleverticalgap		rvg	{}
+		named ruleleftgap		rlg	{}
+		named rulerightgap		rrg	{}
+		named rulecolour rulecolor			rc	{}
+		named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+		named ruleabovecolour ruleabovecolor		rac	{}
+		named rulebelowcolour rulebelowcolor		rbc	{}
+		named ruleverticalcolour ruleverticalcolor	rvc	{}
+		named ruleleftcolour ruleleftcolor		rlc	{}
+		named rulerightcolour rulerightcolor		rrc	{}
+		named ruleplainchar		rpc	{}
+		right x
+	    {}
+	{}
+
+	# parameters for formatting @Rowc rows
+	named cpaint			cp	{}
+	named cbackground		cbg	{}
+	named cfont			cf	{}
+	named cbreak			cb	{}
+	named cwidth			cw	{}
+	named cheight			ch	{}
+	named cindent			ci	{}
+	named cindentvertical		civ	{}
+	named cstrut			cs	{}
+	named cstruthorizontal		csh	{}
+	named cmargin			cm	{}
+	named cmarginhorizontal		cmh	{}
+	named cmarginleft		cml	{}
+	named cmarginright		cmr	{}
+	named cmarginvertical		cmv	{}
+	named cmarginabove		cma	{}
+	named cmarginbelow		cmb	{}
+	named crule			cr	{}
+	named crulehorizontal		crh	{}
+	named cruleabove		cra	{}
+	named crulebelow		crb	{}
+	named crulevertical		crv	{}
+	named cruleleft			crl	{}
+	named cruleright		crr	{}
+	named crulewidth		crw	{}
+	named crulehorizontalwidth	crhw	{}
+	named cruleabovewidth		craw	{}
+	named crulebelowwidth		crbw	{}
+	named cruleverticalwidth	crvw	{}
+	named cruleleftwidth		crlw	{}
+	named crulerightwidth		crrw	{} 
+	named crulegap			crg	{}
+	named crulehorizontalgap	crhg	{}
+	named cruleabovegap		crag	{}
+	named crulebelowgap		crbg	{}
+	named cruleverticalgap		crvg	{}
+	named cruleleftgap		crlg	{}
+	named crulerightgap		crrg	{}
+	named crulecolour crulecolor			crc	{}
+	named crulehorizontalcolour crulehorizontalcolor crhc	{}
+	named cruleabovecolour cruleabovecolor		crac	{}
+	named crulebelowcolour crulebelowcolor		crbc	{}
+	named cruleverticalcolour cruleverticalcolor	crvc	{}
+	named cruleleftcolour cruleleftcolor		crlc	{}
+	named crulerightcolour crulerightcolor		crrc	{}
+	named cruleplainchar		crpc	{}
+	named cformat
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	    named @Cell
+		named paint			p	{}
+		named background		bg	{}
+		named font			f	{}
+		named break			b	{}
+		named width			w	{}
+		named height			h	{}
+		named indent			i	{}
+		named indentvertical		iv	{}
+		named strut			s	{}
+		named struthorizontal		sh	{}
+		named margin			m	{}
+		named marginhorizontal		mh	{}
+		named marginleft		ml	{}
+		named marginright		mr	{}
+		named marginvertical		mv	{}
+		named marginabove		ma	{}
+		named marginbelow		mb	{}
+		named rule			r	{}
+		named rulehorizontal		rh	{}
+		named ruleabove			ra	{}
+		named rulebelow			rb	{}
+		named rulevertical		rv	{}
+		named ruleleft			rl	{}
+		named ruleright			rr	{}
+		named rulewidth			rw	{}
+		named rulehorizontalwidth	rhw	{}
+		named ruleabovewidth		raw	{}
+		named rulebelowwidth		rbw	{}
+		named ruleverticalwidth		rvw	{}
+		named ruleleftwidth		rlw	{}
+		named rulerightwidth		rrw	{}
+		named rulegap			rg	{}
+		named rulehorizontalgap		rhg	{}
+		named ruleabovegap		rag	{}
+		named rulebelowgap		rbg	{}
+		named ruleverticalgap		rvg	{}
+		named ruleleftgap		rlg	{}
+		named rulerightgap		rrg	{}
+		named rulecolour rulecolor			rc	{}
+		named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+		named ruleabovecolour ruleabovecolor		rac	{}
+		named rulebelowcolour rulebelowcolor		rbc	{}
+		named ruleverticalcolour ruleverticalcolor	rvc	{}
+		named ruleleftcolour ruleleftcolor		rlc	{}
+		named rulerightcolour rulerightcolor		rrc	{}
+		named ruleplainchar		rpc	{}
+		right x
+	    {}
+	{}
+
+	# parameters for formatting @Rowd rows
+	named dpaint			dp	{}
+	named dbackground		dbg	{}
+	named dfont			df	{}
+	named dbreak			db	{}
+	named dwidth			dw	{}
+	named dheight			dh	{}
+	named dindent			di	{}
+	named dindentvertical		div	{}
+	named dstrut			ds	{}
+	named dstruthorizontal		dsh	{}
+	named dmargin			dm	{}
+	named dmarginhorizontal		dmh	{}
+	named dmarginleft		dml	{}
+	named dmarginright		dmr	{}
+	named dmarginvertical		dmv	{}
+	named dmarginabove		dma	{}
+	named dmarginbelow		dmb	{}
+	named drule			dr	{}
+	named drulehorizontal		drh	{}
+	named druleabove		dra	{}
+	named drulebelow		drb	{}
+	named drulevertical		drv	{}
+	named druleleft			drl	{}
+	named druleright		drr	{}
+	named drulewidth		drw	{}
+	named drulehorizontalwidth	drhw	{}
+	named druleabovewidth		draw	{}
+	named drulebelowwidth		drbw	{}
+	named druleverticalwidth	drvw	{}
+	named druleleftwidth		drlw	{}
+	named drulerightwidth		drrw	{} 
+	named drulegap			drg	{}
+	named drulehorizontalgap	drhg	{}
+	named druleabovegap		drag	{}
+	named drulebelowgap		drbg	{}
+	named druleverticalgap		drvg	{}
+	named druleleftgap		drlg	{}
+	named drulerightgap		drrg	{}
+	named drulecolour drulecolor			drc	{}
+	named drulehorizontalcolour drulehorizontalcolor drhc	{}
+	named druleabovecolour druleabovecolor		drac	{}
+	named drulebelowcolour drulebelowcolor		drbc	{}
+	named druleverticalcolour druleverticalcolor	drvc	{}
+	named druleleftcolour druleleftcolor		drlc	{}
+	named drulerightcolour drulerightcolor		drrc	{}
+	named druleplainchar		drpc	{}
+	named dformat
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	    named @Cell
+		named paint			p	{}
+		named background		bg	{}
+		named font			f	{}
+		named break			b	{}
+		named width			w	{}
+		named height			h	{}
+		named indent			i	{}
+		named indentvertical		iv	{}
+		named strut			s	{}
+		named struthorizontal		sh	{}
+		named margin			m	{}
+		named marginhorizontal		mh	{}
+		named marginleft		ml	{}
+		named marginright		mr	{}
+		named marginvertical		mv	{}
+		named marginabove		ma	{}
+		named marginbelow		mb	{}
+		named rule			r	{}
+		named rulehorizontal		rh	{}
+		named ruleabove			ra	{}
+		named rulebelow			rb	{}
+		named rulevertical		rv	{}
+		named ruleleft			rl	{}
+		named ruleright			rr	{}
+		named rulewidth			rw	{}
+		named rulehorizontalwidth	rhw	{}
+		named ruleabovewidth		raw	{}
+		named rulebelowwidth		rbw	{}
+		named ruleverticalwidth		rvw	{}
+		named ruleleftwidth		rlw	{}
+		named rulerightwidth		rrw	{}
+		named rulegap			rg	{}
+		named rulehorizontalgap		rhg	{}
+		named ruleabovegap		rag	{}
+		named rulebelowgap		rbg	{}
+		named ruleverticalgap		rvg	{}
+		named ruleleftgap		rlg	{}
+		named rulerightgap		rrg	{}
+		named rulecolour rulecolor			rc	{}
+		named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+		named ruleabovecolour ruleabovecolor		rac	{}
+		named rulebelowcolour rulebelowcolor		rbc	{}
+		named ruleverticalcolour ruleverticalcolor	rvc	{}
+		named ruleleftcolour ruleleftcolor		rlc	{}
+		named rulerightcolour rulerightcolor		rrc	{}
+		named ruleplainchar		rpc	{}
+		right x
+	    {}
+	{}
+
+	# parameters for formatting @Rowe rows
+	named epaint			ep	{}
+	named ebackground		ebg	{}
+	named efont			ef	{}
+	named ebreak			eb	{}
+	named ewidth			ew	{}
+	named eheight			eh	{}
+	named eindent			ei	{}
+	named eindentvertical		eiv	{}
+	named estrut			es	{}
+	named estruthorizontal		esh	{}
+	named emargin			em	{}
+	named emarginhorizontal		emh	{}
+	named emarginleft		eml	{}
+	named emarginright		emr	{}
+	named emarginvertical		emv	{}
+	named emarginabove		ema	{}
+	named emarginbelow		emb	{}
+	named erule			er	{}
+	named erulehorizontal		erh	{}
+	named eruleabove		era	{}
+	named erulebelow		erb	{}
+	named erulevertical		erv	{}
+	named eruleleft			erl	{}
+	named eruleright		err	{}
+	named erulewidth		erw	{}
+	named erulehorizontalwidth	erhw	{}
+	named eruleabovewidth		eraw	{}
+	named erulebelowwidth		erbw	{}
+	named eruleverticalwidth	ervw	{}
+	named eruleleftwidth		erlw	{}
+	named erulerightwidth		errw	{} 
+	named erulegap			erg	{}
+	named erulehorizontalgap	erhg	{}
+	named eruleabovegap		erag	{}
+	named erulebelowgap		erbg	{}
+	named eruleverticalgap		ervg	{}
+	named eruleleftgap		erlg	{}
+	named erulerightgap		errg	{}
+	named erulecolour erulecolor			erc	{}
+	named erulehorizontalcolour erulehorizontalcolor erhc	{}
+	named eruleabovecolour eruleabovecolor		erac	{}
+	named erulebelowcolour erulebelowcolor		erbc	{}
+	named eruleverticalcolour eruleverticalcolor	ervc	{}
+	named eruleleftcolour eruleleftcolor		erlc	{}
+	named erulerightcolour erulerightcolor		errc	{}
+	named eruleplainchar		erpc	{}
+	named eformat
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	    named @Cell
+		named paint			p	{}
+		named background		bg	{}
+		named font			f	{}
+		named break			b	{}
+		named width			w	{}
+		named height			h	{}
+		named indent			i	{}
+		named indentvertical		iv	{}
+		named strut			s	{}
+		named struthorizontal		sh	{}
+		named margin			m	{}
+		named marginhorizontal		mh	{}
+		named marginleft		ml	{}
+		named marginright		mr	{}
+		named marginvertical		mv	{}
+		named marginabove		ma	{}
+		named marginbelow		mb	{}
+		named rule			r	{}
+		named rulehorizontal		rh	{}
+		named ruleabove			ra	{}
+		named rulebelow			rb	{}
+		named rulevertical		rv	{}
+		named ruleleft			rl	{}
+		named ruleright			rr	{}
+		named rulewidth			rw	{}
+		named rulehorizontalwidth	rhw	{}
+		named ruleabovewidth		raw	{}
+		named rulebelowwidth		rbw	{}
+		named ruleverticalwidth		rvw	{}
+		named ruleleftwidth		rlw	{}
+		named rulerightwidth		rrw	{}
+		named rulegap			rg	{}
+		named rulehorizontalgap		rhg	{}
+		named ruleabovegap		rag	{}
+		named rulebelowgap		rbg	{}
+		named ruleverticalgap		rvg	{}
+		named ruleleftgap		rlg	{}
+		named rulerightgap		rrg	{}
+		named rulecolour rulecolor			rc	{}
+		named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+		named ruleabovecolour ruleabovecolor		rac	{}
+		named rulebelowcolour rulebelowcolor		rbc	{}
+		named ruleverticalcolour ruleverticalcolor	rvc	{}
+		named ruleleftcolour ruleleftcolor		rlc	{}
+		named rulerightcolour rulerightcolor		rrc	{}
+		named ruleplainchar		rpc	{}
+		right x
+	    {}
+	{}
+
+	# parameters for formatting @Rowf rows
+	named fpaint			fp	{}
+	named fbackground		fbg	{}
+	named ffont			ff	{}
+	named fbreak			fb	{}
+	named fwidth			fw	{}
+	named fheight			fh	{}
+	named findent			fi	{}
+	named findentvertical		fiv	{}
+	named fstrut			fs	{}
+	named fstruthorizontal		fsh	{}
+	named fmargin			fm	{}
+	named fmarginhorizontal		fmh	{}
+	named fmarginleft		fml	{}
+	named fmarginright		fmr	{}
+	named fmarginvertical		fmv	{}
+	named fmarginabove		fma	{}
+	named fmarginbelow		fmb	{}
+	named frule			fr	{}
+	named frulehorizontal		frh	{}
+	named fruleabove		fra	{}
+	named frulebelow		frb	{}
+	named frulevertical		frv	{}
+	named fruleleft			frl	{}
+	named fruleright		frr	{}
+	named frulewidth		frw	{}
+	named frulehorizontalwidth	frhw	{}
+	named fruleabovewidth		fraw	{}
+	named frulebelowwidth		frbw	{}
+	named fruleverticalwidth	frvw	{}
+	named fruleleftwidth		frlw	{}
+	named frulerightwidth		frrw	{} 
+	named frulegap			frg	{}
+	named frulehorizontalgap	frhg	{}
+	named fruleabovegap		frag	{}
+	named frulebelowgap		frbg	{}
+	named fruleverticalgap		frvg	{}
+	named fruleleftgap		frlg	{}
+	named frulerightgap		frrg	{}
+	named frulecolour frulecolor			frc	{}
+	named frulehorizontalcolour frulehorizontalcolor frhc	{}
+	named fruleabovecolour fruleabovecolor		frac	{}
+	named frulebelowcolour frulebelowcolor		frbc	{}
+	named fruleverticalcolour fruleverticalcolor	frvc	{}
+	named fruleleftcolour fruleleftcolor		frlc	{}
+	named frulerightcolour frulerightcolor		frrc	{}
+	named fruleplainchar		frpc	{}
+	named fformat
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	    named @Cell
+		named paint			p	{}
+		named background		bg	{}
+		named font			f	{}
+		named break			b	{}
+		named width			w	{}
+		named height			h	{}
+		named indent			i	{}
+		named indentvertical		iv	{}
+		named strut			s	{}
+		named struthorizontal		sh	{}
+		named margin			m	{}
+		named marginhorizontal		mh	{}
+		named marginleft		ml	{}
+		named marginright		mr	{}
+		named marginvertical		mv	{}
+		named marginabove		ma	{}
+		named marginbelow		mb	{}
+		named rule			r	{}
+		named rulehorizontal		rh	{}
+		named ruleabove			ra	{}
+		named rulebelow			rb	{}
+		named rulevertical		rv	{}
+		named ruleleft			rl	{}
+		named ruleright			rr	{}
+		named rulewidth			rw	{}
+		named rulehorizontalwidth	rhw	{}
+		named ruleabovewidth		raw	{}
+		named rulebelowwidth		rbw	{}
+		named ruleverticalwidth		rvw	{}
+		named ruleleftwidth		rlw	{}
+		named rulerightwidth		rrw	{}
+		named rulegap			rg	{}
+		named rulehorizontalgap		rhg	{}
+		named ruleabovegap		rag	{}
+		named rulebelowgap		rbg	{}
+		named ruleverticalgap		rvg	{}
+		named ruleleftgap		rlg	{}
+		named rulerightgap		rrg	{}
+		named rulecolour rulecolor			rc	{}
+		named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+		named ruleabovecolour ruleabovecolor		rac	{}
+		named rulebelowcolour rulebelowcolor		rbc	{}
+		named ruleverticalcolour ruleverticalcolor	rvc	{}
+		named ruleleftcolour ruleleftcolor		rlc	{}
+		named rulerightcolour rulerightcolor		rrc	{}
+		named ruleplainchar		rpc	{}
+		right x
+	    {}
+	{}
+
+	# parameters for formatting @Rowg rows
+	named gpaint			gp	{}
+	named gbackground		gbg	{}
+	named gfont			gf	{}
+	named gbreak			gb	{}
+	named gwidth			gw	{}
+	named gheight			gh	{}
+	named gindent			gi	{}
+	named gindentvertical		giv	{}
+	named gstrut			gs	{}
+	named gstruthorizontal		gsh	{}
+	named gmargin			gm	{}
+	named gmarginhorizontal		gmh	{}
+	named gmarginleft		gml	{}
+	named gmarginright		gmr	{}
+	named gmarginvertical		gmv	{}
+	named gmarginabove		gma	{}
+	named gmarginbelow		gmb	{}
+	named grule			gr	{}
+	named grulehorizontal		grh	{}
+	named gruleabove		gra	{}
+	named grulebelow		grb	{}
+	named grulevertical		grv	{}
+	named gruleleft			grl	{}
+	named gruleright		grr	{}
+	named grulewidth		grw	{}
+	named grulehorizontalwidth	grhw	{}
+	named gruleabovewidth		graw	{}
+	named grulebelowwidth		grbw	{}
+	named gruleverticalwidth	grvw	{}
+	named gruleleftwidth		grlw	{}
+	named grulerightwidth		grrw	{} 
+	named grulegap			grg	{}
+	named grulehorizontalgap	grhg	{}
+	named gruleabovegap		grag	{}
+	named grulebelowgap		grbg	{}
+	named gruleverticalgap		grvg	{}
+	named gruleleftgap		grlg	{}
+	named grulerightgap		grrg	{}
+	named grulecolour grulecolor			grc	{}
+	named grulehorizontalcolour grulehorizontalcolor grhc	{}
+	named gruleabovecolour gruleabovecolor		grac	{}
+	named grulebelowcolour grulebelowcolor		grbc	{}
+	named gruleverticalcolour gruleverticalcolor	grvc	{}
+	named gruleleftcolour gruleleftcolor		grlc	{}
+	named grulerightcolour grulerightcolor		grrc	{}
+	named gruleplainchar		grpc	{}
+	named gformat
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	    named @Cell
+		named paint			p	{}
+		named background		bg	{}
+		named font			f	{}
+		named break			b	{}
+		named width			w	{}
+		named height			h	{}
+		named indent			i	{}
+		named indentvertical		iv	{}
+		named strut			s	{}
+		named struthorizontal		sh	{}
+		named margin			m	{}
+		named marginhorizontal		mh	{}
+		named marginleft		ml	{}
+		named marginright		mr	{}
+		named marginvertical		mv	{}
+		named marginabove		ma	{}
+		named marginbelow		mb	{}
+		named rule			r	{}
+		named rulehorizontal		rh	{}
+		named ruleabove			ra	{}
+		named rulebelow			rb	{}
+		named rulevertical		rv	{}
+		named ruleleft			rl	{}
+		named ruleright			rr	{}
+		named rulewidth			rw	{}
+		named rulehorizontalwidth	rhw	{}
+		named ruleabovewidth		raw	{}
+		named rulebelowwidth		rbw	{}
+		named ruleverticalwidth		rvw	{}
+		named ruleleftwidth		rlw	{}
+		named rulerightwidth		rrw	{}
+		named rulegap			rg	{}
+		named rulehorizontalgap		rhg	{}
+		named ruleabovegap		rag	{}
+		named rulebelowgap		rbg	{}
+		named ruleverticalgap		rvg	{}
+		named ruleleftgap		rlg	{}
+		named rulerightgap		rrg	{}
+		named rulecolour rulecolor			rc	{}
+		named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+		named ruleabovecolour ruleabovecolor		rac	{}
+		named rulebelowcolour rulebelowcolor		rbc	{}
+		named ruleverticalcolour ruleverticalcolor	rvc	{}
+		named ruleleftcolour ruleleftcolor		rlc	{}
+		named rulerightcolour rulerightcolor		rrc	{}
+		named ruleplainchar		rpc	{}
+		right x
+	    {}
+	{}
+
+	# parameters for formatting @Rowh rows
+	named hpaint			hp	{}
+	named hbackground		hbg	{}
+	named hfont			hf	{}
+	named hbreak			hb	{}
+	named hwidth			hw	{}
+	named hheight			hh	{}
+	named hindent			hi	{}
+	named hindentvertical		hiv	{}
+	named hstrut			hs	{}
+	named hstruthorizontal		hsh	{}
+	named hmargin			hm	{}
+	named hmarginhorizontal		hmh	{}
+	named hmarginleft		hml	{}
+	named hmarginright		hmr	{}
+	named hmarginvertical		hmv	{}
+	named hmarginabove		hma	{}
+	named hmarginbelow		hmb	{}
+	named hrule			hr	{}
+	named hrulehorizontal		hrh	{}
+	named hruleabove		hra	{}
+	named hrulebelow		hrb	{}
+	named hrulevertical		hrv	{}
+	named hruleleft			hrl	{}
+	named hruleright		hrr	{}
+	named hrulewidth		hrw	{}
+	named hrulehorizontalwidth	hrhw	{}
+	named hruleabovewidth		hraw	{}
+	named hrulebelowwidth		hrbw	{}
+	named hruleverticalwidth	hrvw	{}
+	named hruleleftwidth		hrlw	{}
+	named hrulerightwidth		hrrw	{} 
+	named hrulegap			hrg	{}
+	named hrulehorizontalgap	hrhg	{}
+	named hruleabovegap		hrag	{}
+	named hrulebelowgap		hrbg	{}
+	named hruleverticalgap		hrvg	{}
+	named hruleleftgap		hrlg	{}
+	named hrulerightgap		hrrg	{}
+	named hrulecolour hrulecolor			hrc	{}
+	named hrulehorizontalcolour hrulehorizontalcolor hrhc	{}
+	named hruleabovecolour hruleabovecolor		hrac	{}
+	named hrulebelowcolour hrulebelowcolor		hrbc	{}
+	named hruleverticalcolour hruleverticalcolor	hrvc	{}
+	named hruleleftcolour hruleleftcolor		hrlc	{}
+	named hrulerightcolour hrulerightcolor		hrrc	{}
+	named hruleplainchar		hrpc	{}
+	named hformat
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	    named @Cell
+		named paint			p	{}
+		named background		bg	{}
+		named font			f	{}
+		named break			b	{}
+		named width			w	{}
+		named height			h	{}
+		named indent			i	{}
+		named indentvertical		iv	{}
+		named strut			s	{}
+		named struthorizontal		sh	{}
+		named margin			m	{}
+		named marginhorizontal		mh	{}
+		named marginleft		ml	{}
+		named marginright		mr	{}
+		named marginvertical		mv	{}
+		named marginabove		ma	{}
+		named marginbelow		mb	{}
+		named rule			r	{}
+		named rulehorizontal		rh	{}
+		named ruleabove			ra	{}
+		named rulebelow			rb	{}
+		named rulevertical		rv	{}
+		named ruleleft			rl	{}
+		named ruleright			rr	{}
+		named rulewidth			rw	{}
+		named rulehorizontalwidth	rhw	{}
+		named ruleabovewidth		raw	{}
+		named rulebelowwidth		rbw	{}
+		named ruleverticalwidth		rvw	{}
+		named ruleleftwidth		rlw	{}
+		named rulerightwidth		rrw	{}
+		named rulegap			rg	{}
+		named rulehorizontalgap		rhg	{}
+		named ruleabovegap		rag	{}
+		named rulebelowgap		rbg	{}
+		named ruleverticalgap		rvg	{}
+		named ruleleftgap		rlg	{}
+		named rulerightgap		rrg	{}
+		named rulecolour rulecolor			rc	{}
+		named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+		named ruleabovecolour ruleabovecolor		rac	{}
+		named rulebelowcolour rulebelowcolor		rbc	{}
+		named ruleverticalcolour ruleverticalcolor	rvc	{}
+		named ruleleftcolour ruleleftcolor		rlc	{}
+		named rulerightcolour rulerightcolor		rrc	{}
+		named ruleplainchar		rpc	{}
+		right x
+	    {}
+	{}
+
+	body @Body   # this is the right parameter of @Tbl
+
+    {
+
+	#######################################################################
+	#                                                                     #
+	#  Specific option values as @Tbl knows them (i.e. Level 2)           #
+	#                                                                     #
+	#######################################################################
+
+	def tblp    { p				@Else setupp   }
+	def tblbg   { bg			@Else setupbg  }
+	def tblf    { f				@Else setupf   }
+	def tblb    { b				@Else setupb   }
+	def tblw    { w				@Else setupw   }
+	def tblh    { h				@Else setuph   }
+	def tbli    { i				@Else setupi   }
+	def tbliv   { iv			@Else setupiv  }
+	def tbls    { s				@Else setups   }
+	def tblsh   { sh			@Else setupsh  }
+	def tblml   { ml  @Else mh  @Else m	@Else setupml  }
+	def tblmr   { mr  @Else mh  @Else m	@Else setupmr  }
+	def tblma   { ma  @Else mv  @Else m	@Else setupma  }
+	def tblmb   { mb  @Else mv  @Else m	@Else setupmb  }
+	def tblra   { ra  @Else rh  @Else r	@Else setupra  }
+	def tblrb   { rb  @Else rh  @Else r	@Else setuprb  }
+	def tblrl   { rl  @Else rv  @Else r	@Else setuprl  }
+	def tblrr   { rr  @Else rv  @Else r	@Else setuprr  }
+	def tblraw  { raw @Else rhw @Else rw	@Else setupraw }
+	def tblrbw  { rbw @Else rhw @Else rw	@Else setuprbw }
+	def tblrlw  { rlw @Else rvw @Else rw	@Else setuprlw }
+	def tblrrw  { rrw @Else rvw @Else rw	@Else setuprrw }
+	def tblrag  { rag @Else rhg @Else rg	@Else setuprag }
+	def tblrbg  { rbg @Else rhg @Else rg	@Else setuprbg }
+	def tblrlg  { rlg @Else rvg @Else rg	@Else setuprlg }
+	def tblrrg  { rrg @Else rvg @Else rg	@Else setuprrg }
+	def tblrac  { rac @Else rhc @Else rc	@Else setuprac }
+	def tblrbc  { rbc @Else rhc @Else rc	@Else setuprbc }
+	def tblrlc  { rlc @Else rvc @Else rc	@Else setuprlc }
+	def tblrrc  { rrc @Else rvc @Else rc	@Else setuprrc }
+	def tblrpc  { rpc			@Else setuprpc }
+
+
+	def @DoCell
+	    named compulsory p    {}
+	    named compulsory bg   {}
+	    named compulsory f    {}
+	    named compulsory b    {}
+	    named compulsory w    {}
+	    named compulsory h    {}
+	    named compulsory i    {}
+	    named compulsory iv   {}
+	    named compulsory s    {}
+	    named compulsory sh   {}
+	    named compulsory ml   {}
+	    named compulsory mr   {}
+	    named compulsory ma   {}
+	    named compulsory mb   {}
+	    named compulsory ra   {}
+	    named compulsory rb   {}
+	    named compulsory rl   {}
+	    named compulsory rr   {}
+	    named compulsory raw  {}
+	    named compulsory rbw  {}
+	    named compulsory rlw  {}
+	    named compulsory rrw  {}
+	    named compulsory rag  {}
+	    named compulsory rbg  {}
+	    named compulsory rlg  {}
+	    named compulsory rrg  {}
+	    named compulsory rac  {}
+	    named compulsory rbc  {}
+	    named compulsory rlc  {}
+	    named compulsory rrc  {}
+	    named compulsory rpc  {}
+	    right @Body
+	{
+
+	    def @ZeroWidth right x
+	    {
+		@OneCol { |0io x |0io }
+	    }
+
+	    def @ZeroHeight right x
+	    {
+		@OneRow { /0io x /0io }
+	    }
+
+	    def @PDFColourCommand right col
+	    {
+	        def @ColourCoords
+	        {
+	            col @Case {
+			nochange	@Yield  { nochange    }
+	                darkblue        @Yield  { 0.0 0.0 0.5 }
+	                blue            @Yield  { 0.0 0.0 1.0 }
+	                lightblue       @Yield  { 0.5 0.5 1.0 }
+	                darkgreen       @Yield  { 0.0 0.5 0.0 }
+	                green           @Yield  { 0.0 1.0 0.0 }
+	                lightgreen      @Yield  { 0.5 1.0 0.5 }
+	                darkred         @Yield  { 0.5 0.0 0.0 }
+	                red             @Yield  { 1.0 0.0 0.0 }
+	                lightred        @Yield  { 1.0 0.5 0.5 }
+	                darkcyan        @Yield  { 0.0 0.5 0.5 }
+	                cyan            @Yield  { 0.0 1.0 1.0 }
+	                lightcyan       @Yield  { 0.5 1.0 1.0 }
+	                darkmagenta     @Yield  { 0.5 0.0 0.5 }
+	                magenta         @Yield  { 1.0 0.0 1.0 }
+	                lightmagenta    @Yield  { 1.0 0.5 1.0 }
+	                darkyellow      @Yield  { 0.5 0.5 0.0 }
+	                yellow          @Yield  { 1.0 1.0 0.0 }
+	                lightyellow     @Yield  { 1.0 1.0 0.5 }
+	                darkgray        @Yield  { 0.2 0.2 0.2 }
+	                gray            @Yield  { 0.5 0.5 0.5 }
+	                lightgray       @Yield  { 0.8 0.8 0.8 }
+	                darkgrey        @Yield  { 0.2 0.2 0.2 }
+	                grey            @Yield  { 0.5 0.5 0.5 }
+	                lightgrey       @Yield  { 0.8 0.8 0.8 }
+	                black           @Yield  { 0.0 0.0 0.0 }
+                	white           @Yield  { 1.0 1.0 1.0 }
+		    }
+	        }
+
+		@ColourCoords "rg" @ColourCoords "RG"
+	    }
+
+	    def @PDFAddPaint right col
+	    {
+	        col @Case {
+	            none @Yield ""
+	            nochange @Yield "q f Q"
+	            else @Yield { "q" @PDFColourCommand col "f Q" }
+	        }
+	    }
+
+	    def @FillBox left col right x
+	    {
+	      @BackEnd @Case {
+		PostScript @Yield {{"LoutBox ltbl"col} @Graphic x}
+		PDF        @Yield {{
+				     "0 0 m __xsize 0 l __xsize __ysize l 0 __ysize l h"
+				     @PDFAddPaint col "S"
+				   } @Graphic x}
+		PlainText  @Yield { rpc @PlainGraphic x }
+	      }
+	    }
+
+	    def @PaintBox left col right x
+	    {
+	      @BackEnd @Case {
+		PostScript @Yield {{"LoutBox ltbl"col} @Graphic x}
+		PDF        @Yield {{
+				     "0 0 m __xsize 0 l __xsize __ysize l 0 __ysize l h"
+				     @PDFAddPaint col "S"
+				   } @Graphic x}
+		PlainText  @Yield { x }
+	      }
+	    }
+
+	    def @HRule left col right thick
+	    {
+		@ZeroHeight thick @High col @FillBox {}
+		# thick @High col @FillBox {}
+	    }
+
+	    def @VRule left col right thick
+	    {
+		@ZeroWidth thick @Wide col @FillBox {}
+		# thick @Wide col @FillBox {}
+	    }
+
+	    def @DoubleHRule
+		left col
+		named gap {}
+		right thick
+	    {
+		@OneCol { col @HRule thick /gap col @HRule thick }
+	    }
+
+	    def @DoubleVRule
+		left col
+		named gap {}
+		right thick
+	    {
+		@OneRow { col @VRule thick /gap col @VRule thick }
+	    }
+
+	    def @MakeHRule
+		left col
+		named thick {}
+		named gap {}
+		right type
+	    {
+		type @Case {
+		    { none "" no } @Yield {}
+		    { yes single } @Yield col @HRule thick
+		    { double } @Yield col @DoubleHRule gap { gap } thick
+		}
+	    }
+
+	    def @MakeVRule
+		left col
+		named thick {}
+		named gap {}
+		right type
+	    {
+		type @Case {
+		    { none "" no } @Yield {}
+		    { yes single } @Yield col @VRule thick
+		    { double } @Yield col @DoubleVRule gap { gap } thick
+		}
+	    }
+
+	    def @RuleBox
+		left col
+		named hthick {}
+		named vthick {}
+		named htype {}
+		named vtype {}
+	    {
+		htype @Case {
+		    { none "" no } @Yield {}
+		    else @Yield vtype @Case {
+			{ none "" no } @Yield {}
+			else @Yield {
+			    @ZeroWidth @ZeroHeight hthick @Wide vthick @High
+			    col @FillBox {}
+			}
+		    }
+		}
+	    }
+
+	    def @AddRules
+		right x
+	    {
+		{
+		  rlc @MakeVRule thick { rlw } gap { rlg } rl
+		  |0rt |1rt
+		  rrc @MakeVRule thick { rrw } gap { rrg } rr
+		} @Background
+		{ rac @MakeHRule thick { raw } gap { rag } ra
+		  /0rt
+		  /1rt
+		  rbc @MakeHRule thick { rbw } gap { rbg } rb
+		} @Background
+		{
+		  |1rt rac @RuleBox hthick { rrw } vthick { raw } htype { rr } vtype { ra }
+		  /0rt
+		  /1rt |1rt
+		  rbc @RuleBox hthick { rrw } vthick { rbw } htype { rr } vtype { rb }
+		} @Background x
+
+	    }
+
+	    def @AddMargins
+		right x
+	    {
+		@OneCol @OneRow {
+		          ^|ml    |mr
+		    ^/ma   |    x |
+		     /mb   |      |
+		}
+	    }
+
+	    def @AddPaint
+		right x
+	    {
+		p @Case {
+		    { none nopaint no } @Yield x
+		    else                @Yield { p @PaintBox x }
+		}
+	    }
+
+	    def @Strut right x
+	    {
+		def strutval right x
+		{
+		    x @Case {
+			{ no No "" } @Yield "0.0f"
+			{ yes Yes  } @Yield "1.0f"
+			else         @Yield x
+		    }
+		}
+
+		def vs { "0.5w" @VShift { { strutval s  } @High } }
+		def hs {                { strutval sh } @Wide   }
+
+		@OneCol @OneRow { ^| hs ^/ vs | x }
+	    }
+
+	    def @VSize right x
+	    {
+		h @Case {
+		    ""   @Yield x
+		    else @Yield { h @High x }
+		}
+	    }
+
+	    def @HSize right x
+	    {
+		w @Case {
+		    ""       @Yield x
+		    "expand" @Yield { "40c" @Wide x }
+		    else     @Yield { w @Wide x }
+		}
+	    }
+
+	    def @HIndent right x
+	    {
+		i @Case {
+		    left  @Yield @OneCol { | x }
+		    ctr   @Yield @OneCol { |"0.5rt" x }
+		    right @Yield @OneCol { |"1.0rt" x }
+		    mctr  @Yield @OneCol { |"0.5bx" x }
+		    ""    @Yield @OneCol x
+		    else  @Yield @OneCol { |i x }
+		}
+	    }
+
+	    def @VIndent right x
+	    {
+		iv @Case {
+		    top   @Yield @OneRow { / x }
+		    ctr   @Yield @OneRow { /"0.5rt" x }
+		    foot  @Yield @OneRow { /"1.0rt" x }
+		    mctr  @Yield @OneRow { /"0.5bx" x }
+		    ""    @Yield @OneRow x
+		    else  @Yield @OneRow { /iv x }
+		}
+	    }
+
+	    @HSize @VSize @AddPaint bg @Background @AddRules
+	    @HIndent @VIndent @AddMargins f @Font b @Break @Strut @Body
+	}
+
+	# symbol for producing @Row rows
+	def @DoRow
+	    named paint			p	{}
+	    named background		bg	{}
+	    named font			f	{}
+	    named break			b	{}
+	    named width			w	{}
+	    named height		h	{}
+	    named indent		i	{}
+	    named indentvertical	iv	{}
+	    named strut			s	{}
+	    named struthorizontal	sh	{}
+	    named margin		m	{}
+	    named marginhorizontal	mh	{}
+	    named marginleft		ml	{}
+	    named marginright		mr	{}
+	    named marginvertical	mv	{}
+	    named marginabove		ma	{}
+	    named marginbelow		mb	{}
+	    named rule			r	{}
+	    named rulehorizontal	rh	{}
+	    named ruleabove		ra	{}
+	    named rulebelow		rb	{}
+	    named rulevertical		rv	{}
+	    named ruleleft		rl	{}
+	    named ruleright		rr	{}
+	    named rulewidth		rw	{}
+	    named rulehorizontalwidth	rhw	{}
+	    named ruleabovewidth	raw	{}
+	    named rulebelowwidth	rbw	{}
+	    named ruleverticalwidth	rvw	{}
+	    named ruleleftwidth		rlw	{}
+	    named rulerightwidth	rrw	{}
+	    named rulegap		rg	{}
+	    named rulehorizontalgap	rhg	{}
+	    named ruleabovegap		rag	{}
+	    named rulebelowgap		rbg	{}
+	    named ruleverticalgap	rvg	{}
+	    named ruleleftgap		rlg	{}
+	    named rulerightgap		rrg	{}
+	    named rulecolour rulecolor				rc	{}
+	    named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+	    named ruleabovecolour ruleabovecolor		rac	{}
+	    named rulebelowcolour rulebelowcolor		rbc	{}
+	    named ruleverticalcolour ruleverticalcolor		rvc	{}
+	    named ruleleftcolour ruleleftcolor			rlc	{}
+	    named rulerightcolour rulerightcolor		rrc	{}
+	    named ruleplainchar		rpc	{}
+	    named compulsory format
+		named A {} named B {} named C {} named D {} named E {}
+		named F {} named G {} named H {} named I {} named J {}
+		named K {} named L {} named M {} named N {} named O {}
+		named P {} named Q {} named R {} named S {} named T {}
+		named U {} named V {} named W {} named X {} named Y {}
+		named Z {}
+		named @Cell
+		    named paint			p	{}
+		    named background		bg	{}
+		    named font			f	{}
+		    named break			b	{}
+		    named width			w	{}
+		    named height		h	{}
+		    named indent		i	{}
+		    named indentvertical	iv	{}
+		    named strut			s	{}
+		    named struthorizontal	sh	{}
+		    named margin		m	{}
+		    named marginhorizontal	mh	{}
+		    named marginleft		ml	{}
+		    named marginright		mr	{}
+		    named marginvertical	mv	{}
+		    named marginabove		ma	{}
+		    named marginbelow		mb	{}
+		    named rule			r	{}
+		    named rulehorizontal	rh	{}
+		    named ruleabove		ra	{}
+		    named rulebelow		rb	{}
+		    named rulevertical		rv	{}
+		    named ruleleft		rl	{}
+		    named ruleright		rr	{}
+		    named rulewidth		rw	{}
+		    named rulehorizontalwidth	rhw	{}
+		    named ruleabovewidth	raw	{}
+		    named rulebelowwidth	rbw	{}
+		    named ruleverticalwidth	rvw	{}
+		    named ruleleftwidth		rlw	{}
+		    named rulerightwidth	rrw	{}
+		    named rulegap		rg	{}
+		    named rulehorizontalgap	rhg	{}
+		    named ruleabovegap		rag	{}
+		    named rulebelowgap		rbg	{}
+		    named ruleverticalgap	rvg	{}
+		    named ruleleftgap		rlg	{}
+		    named rulerightgap		rrg	{}
+		    named rulecolour rulecolor			rc	{}
+		    named rulehorizontalcolour rulehorizontalcolor rhc	{}
+		    named ruleabovecolour ruleabovecolor	rac	{}
+		    named rulebelowcolour rulebelowcolor	rbc	{}
+		    named ruleverticalcolour ruleverticalcolor	rvc	{}
+		    named ruleleftcolour ruleleftcolor		rlc	{}
+		    named rulerightcolour rulerightcolor	rrc	{}
+		    named ruleplainchar		rpc	{}
+		    right x
+		{}
+	    {}
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	{
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values as @Row knows them (i.e. Level 6)       #
+	    #                                                                 #
+	    ###################################################################
+
+	    def rowp    { p				@Else tblp   }
+	    def rowbg   { bg				@Else tblbg  }
+	    def rowf    { f				@Else tblf   }
+	    def rowb    { b				@Else tblb   }
+	    def roww    { w				@Else tblw   }
+	    def rowh    { h				@Else tblh   }
+	    def rowi    { i				@Else tbli   }
+	    def rowiv   { iv				@Else tbliv  }
+	    def rows    { s				@Else tbls   }
+	    def rowsh   { sh				@Else tblsh  }
+	    def rowml   { ml  @Else mh  @Else m		@Else tblml  }
+	    def rowmr   { mr  @Else mh  @Else m		@Else tblmr  }
+	    def rowma   { ma  @Else mv  @Else m		@Else tblma  }
+	    def rowmb   { mb  @Else mv  @Else m		@Else tblmb  }
+	    def rowra   { ra  @Else rh  @Else r		@Else tblra  }
+	    def rowrb   { rb  @Else rh  @Else r		@Else tblrb  }
+	    def rowrl   { rl  @Else rv  @Else r		@Else tblrl  }
+	    def rowrr   { rr  @Else rv  @Else r		@Else tblrr  }
+	    def rowraw  { raw @Else rhw @Else rw	@Else tblraw }
+	    def rowrbw  { rbw @Else rhw @Else rw	@Else tblrbw }
+	    def rowrlw  { rlw @Else rvw @Else rw	@Else tblrlw }
+	    def rowrrw  { rrw @Else rvw @Else rw	@Else tblrrw }
+	    def rowrag  { rag @Else rhg @Else rg	@Else tblrag }
+	    def rowrbg  { rbg @Else rhg @Else rg	@Else tblrbg }
+	    def rowrlg  { rlg @Else rvg @Else rg	@Else tblrlg }
+	    def rowrrg  { rrg @Else rvg @Else rg	@Else tblrrg }
+	    def rowrac  { rac @Else rhc @Else rc	@Else tblrac }
+	    def rowrbc  { rbc @Else rhc @Else rc	@Else tblrbc }
+	    def rowrlc  { rlc @Else rvc @Else rc	@Else tblrlc }
+	    def rowrrc  { rrc @Else rvc @Else rc	@Else tblrrc }
+	    def rowrpc  { rpc				@Else tblrpc }
+
+	    format
+		A { A } B { B } C { C } D { D } E { E } F { F }
+		G { G } H { H } I { I } J { J } K { K } L { L }
+		M { M } N { N } O { O } P { P } Q { Q } R { R }
+		S { S } T { T } U { U } V { V } W { W } X { X }
+		Y { Y } Z { Z }
+		@Cell {
+		
+		    @DoCell
+
+			#######################################################
+			#                                                     #
+			#  Specific option values to @Cell (i.e. Level 7)     #
+			#                                                     #
+			#######################################################
+
+			p    { p			@Else rowp   }
+			bg   { bg			@Else rowbg  }
+			f    { f			@Else rowf   }
+			b    { b			@Else rowb   }
+			w    { w			@Else roww   }
+			h    { h			@Else rowh   }
+			i    { i			@Else rowi   }
+			iv   { iv			@Else rowiv  }
+			s    { s			@Else rows   }
+			sh   { sh			@Else rowsh  }
+			ml   { ml  @Else mh  @Else m	@Else rowml  }
+			mr   { mr  @Else mh  @Else m	@Else rowmr  }
+			ma   { ma  @Else mv  @Else m	@Else rowma  }
+			mb   { mb  @Else mv  @Else m	@Else rowmb  }
+			ra   { ra  @Else rh  @Else r	@Else rowra  }
+			rb   { rb  @Else rh  @Else r	@Else rowrb  }
+			rl   { rl  @Else rv  @Else r	@Else rowrl  }
+			rr   { rr  @Else rv  @Else r	@Else rowrr  }
+			raw  { raw @Else rhw @Else rw	@Else rowraw }
+			rbw  { rbw @Else rhw @Else rw	@Else rowrbw }
+			rlw  { rlw @Else rvw @Else rw	@Else rowrlw }
+			rrw  { rrw @Else rvw @Else rw	@Else rowrrw }
+			rag  { rag @Else rhg @Else rg	@Else rowrag }
+			rbg  { rbg @Else rhg @Else rg	@Else rowrbg }
+			rlg  { rlg @Else rvg @Else rg	@Else rowrlg }
+			rrg  { rrg @Else rvg @Else rg	@Else rowrrg }
+			rac  { rac @Else rhc @Else rc	@Else rowrac }
+			rbc  { rbc @Else rhc @Else rc	@Else rowrbc }
+			rlc  { rlc @Else rvc @Else rc	@Else rowrlc }
+			rrc  { rrc @Else rvc @Else rc	@Else rowrrc }
+			rpc  { rpc			@Else rowrpc }
+
+			x
+		}
+	}
+
+	# symbol for producing @Rowa rows
+	def @DoRowa
+	    named paint			p	{}
+	    named background		bg	{}
+	    named font			f	{}
+	    named break			b	{}
+	    named width			w	{}
+	    named height		h	{}
+	    named indent		i	{}
+	    named indentvertical	iv	{}
+	    named strut			s	{}
+	    named struthorizontal	sh	{}
+	    named margin		m	{}
+	    named marginhorizontal	mh	{}
+	    named marginleft		ml	{}
+	    named marginright		mr	{}
+	    named marginvertical	mv	{}
+	    named marginabove		ma	{}
+	    named marginbelow		mb	{}
+	    named rule			r	{}
+	    named rulehorizontal	rh	{}
+	    named ruleabove		ra	{}
+	    named rulebelow		rb	{}
+	    named rulevertical		rv	{}
+	    named ruleleft		rl	{}
+	    named ruleright		rr	{}
+	    named rulewidth		rw	{}
+	    named rulehorizontalwidth	rhw	{}
+	    named ruleabovewidth	raw	{}
+	    named rulebelowwidth	rbw	{}
+	    named ruleverticalwidth	rvw	{}
+	    named ruleleftwidth		rlw	{}
+	    named rulerightwidth	rrw	{}
+	    named rulegap		rg	{}
+	    named rulehorizontalgap	rhg	{}
+	    named ruleabovegap		rag	{}
+	    named rulebelowgap		rbg	{}
+	    named ruleverticalgap	rvg	{}
+	    named ruleleftgap		rlg	{}
+	    named rulerightgap		rrg	{}
+	    named rulecolour rulecolor				rc	{}
+	    named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+	    named ruleabovecolour ruleabovecolor		rac	{}
+	    named rulebelowcolour rulebelowcolor		rbc	{}
+	    named ruleverticalcolour ruleverticalcolor		rvc	{}
+	    named ruleleftcolour ruleleftcolor			rlc	{}
+	    named rulerightcolour rulerightcolor		rrc	{}
+	    named ruleplainchar		rpc	{}
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	{
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at "aoption" level (i.e. Level 3)       #
+	    #                                                                 #
+	    ###################################################################
+
+	    def tbxp    { ap				@Else tblp   }
+	    def tbxbg   { abg				@Else tblbg  }
+	    def tbxf    { af				@Else tblf   }
+	    def tbxb    { ab				@Else tblb   }
+	    def tbxw    { aw				@Else tblw   }
+	    def tbxh    { ah				@Else tblh   }
+	    def tbxi    { ai				@Else tbli   }
+	    def tbxiv   { aiv				@Else tbliv  }
+	    def tbxs    { as				@Else tbls   }
+	    def tbxsh   { ash				@Else tblsh  }
+	    def tbxml   { aml  @Else amh  @Else am	@Else tblml  }
+	    def tbxmr   { amr  @Else amh  @Else am	@Else tblmr  }
+	    def tbxma   { ama  @Else amv  @Else am	@Else tblma  }
+	    def tbxmb   { amb  @Else amv  @Else am	@Else tblmb  }
+	    def tbxra   { ara  @Else arh  @Else ar	@Else tblra  }
+	    def tbxrb   { arb  @Else arh  @Else ar	@Else tblrb  }
+	    def tbxrl   { arl  @Else arv  @Else ar	@Else tblrl  }
+	    def tbxrr   { arr  @Else arv  @Else ar	@Else tblrr  }
+	    def tbxraw  { araw @Else arhw @Else arw	@Else tblraw }
+	    def tbxrbw  { arbw @Else arhw @Else arw	@Else tblrbw }
+	    def tbxrlw  { arlw @Else arvw @Else arw	@Else tblrlw }
+	    def tbxrrw  { arrw @Else arvw @Else arw	@Else tblrrw }
+	    def tbxrag  { arag @Else arhg @Else arg	@Else tblrag }
+	    def tbxrbg  { arbg @Else arhg @Else arg	@Else tblrbg }
+	    def tbxrlg  { arlg @Else arvg @Else arg	@Else tblrlg }
+	    def tbxrrg  { arrg @Else arvg @Else arg	@Else tblrrg }
+	    def tbxrac  { arac @Else arhc @Else arc	@Else tblrac }
+	    def tbxrbc  { arbc @Else arhc @Else arc	@Else tblrbc }
+	    def tbxrlc  { arlc @Else arvc @Else arc	@Else tblrlc }
+	    def tbxrrc  { arrc @Else arvc @Else arc	@Else tblrrc }
+	    def tbxrpc  { arpc				@Else tblrpc }
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at @Rowa level (i.e. Level 4)           #
+	    #                                                                 #
+	    ###################################################################
+
+	    def rowp    { p				@Else tbxp   }
+	    def rowbg   { bg				@Else tbxbg  }
+	    def rowf    { f				@Else tbxf   }
+	    def rowb    { b				@Else tbxb   }
+	    def roww    { w				@Else tbxw   }
+	    def rowh    { h				@Else tbxh   }
+	    def rowi    { i				@Else tbxi   }
+	    def rowiv   { iv				@Else tbxiv  }
+	    def rows    { s				@Else tbxs   }
+	    def rowsh   { sh				@Else tbxsh  }
+	    def rowml   { ml  @Else mh  @Else m		@Else tbxml  }
+	    def rowmr   { mr  @Else mh  @Else m		@Else tbxmr  }
+	    def rowma   { ma  @Else mv  @Else m		@Else tbxma  }
+	    def rowmb   { mb  @Else mv  @Else m		@Else tbxmb  }
+	    def rowra   { ra  @Else rh  @Else r		@Else tbxra  }
+	    def rowrb   { rb  @Else rh  @Else r		@Else tbxrb  }
+	    def rowrl   { rl  @Else rv  @Else r		@Else tbxrl  }
+	    def rowrr   { rr  @Else rv  @Else r		@Else tbxrr  }
+	    def rowraw  { raw @Else rhw @Else rw	@Else tbxraw }
+	    def rowrbw  { rbw @Else rhw @Else rw	@Else tbxrbw }
+	    def rowrlw  { rlw @Else rvw @Else rw	@Else tbxrlw }
+	    def rowrrw  { rrw @Else rvw @Else rw	@Else tbxrrw }
+	    def rowrag  { rag @Else rhg @Else rg	@Else tbxrag }
+	    def rowrbg  { rbg @Else rhg @Else rg	@Else tbxrbg }
+	    def rowrlg  { rlg @Else rvg @Else rg	@Else tbxrlg }
+	    def rowrrg  { rrg @Else rvg @Else rg	@Else tbxrrg }
+	    def rowrac  { rac @Else rhc @Else rc	@Else tbxrac }
+	    def rowrbc  { rbc @Else rhc @Else rc	@Else tbxrbc }
+	    def rowrlc  { rlc @Else rvc @Else rc	@Else tbxrlc }
+	    def rowrrc  { rrc @Else rvc @Else rc	@Else tbxrrc }
+	    def rowrpc  { rpc				@Else tbxrpc }
+
+	    aformat
+		A { A } B { B } C { C } D { D } E { E } F { F }
+		G { G } H { H } I { I } J { J } K { K } L { L }
+		M { M } N { N } O { O } P { P } Q { Q } R { R }
+		S { S } T { T } U { U } V { V } W { W } X { X }
+		Y { Y } Z { Z }
+		@Cell {
+		
+		    @DoCell
+
+			#######################################################
+			#                                                     #
+			#  Specific option values to @Cell (i.e. Level 5)     #
+			#                                                     #
+			#######################################################
+
+			p    { p			@Else rowp   }
+			bg   { bg			@Else rowbg  }
+			f    { f			@Else rowf   }
+			b    { b			@Else rowb   }
+			w    { w			@Else roww   }
+			h    { h			@Else rowh   }
+			i    { i			@Else rowi   }
+			iv   { iv			@Else rowiv  }
+			s    { s			@Else rows   }
+			sh   { sh			@Else rowsh  }
+			ml   { ml  @Else mh  @Else m	@Else rowml  }
+			mr   { mr  @Else mh  @Else m	@Else rowmr  }
+			ma   { ma  @Else mv  @Else m	@Else rowma  }
+			mb   { mb  @Else mv  @Else m	@Else rowmb  }
+			ra   { ra  @Else rh  @Else r	@Else rowra  }
+			rb   { rb  @Else rh  @Else r	@Else rowrb  }
+			rl   { rl  @Else rv  @Else r	@Else rowrl  }
+			rr   { rr  @Else rv  @Else r	@Else rowrr  }
+			raw  { raw @Else rhw @Else rw	@Else rowraw }
+			rbw  { rbw @Else rhw @Else rw	@Else rowrbw }
+			rlw  { rlw @Else rvw @Else rw	@Else rowrlw }
+			rrw  { rrw @Else rvw @Else rw	@Else rowrrw }
+			rag  { rag @Else rhg @Else rg	@Else rowrag }
+			rbg  { rbg @Else rhg @Else rg	@Else rowrbg }
+			rlg  { rlg @Else rvg @Else rg	@Else rowrlg }
+			rrg  { rrg @Else rvg @Else rg	@Else rowrrg }
+			rac  { rac @Else rhc @Else rc	@Else rowrac }
+			rbc  { rbc @Else rhc @Else rc	@Else rowrbc }
+			rlc  { rlc @Else rvc @Else rc	@Else rowrlc }
+			rrc  { rrc @Else rvc @Else rc	@Else rowrrc }
+			rpc  { rpc			@Else rowrpc }
+
+			x
+		}
+	}
+
+	# symbol for producing @Rowb rows
+	def @DoRowb
+	    named paint			p	{}
+	    named background		bg	{}
+	    named font			f	{}
+	    named break			b	{}
+	    named width			w	{}
+	    named height		h	{}
+	    named indent		i	{}
+	    named indentvertical	iv	{}
+	    named strut			s	{}
+	    named struthorizontal	sh	{}
+	    named margin		m	{}
+	    named marginhorizontal	mh	{}
+	    named marginleft		ml	{}
+	    named marginright		mr	{}
+	    named marginvertical	mv	{}
+	    named marginabove		ma	{}
+	    named marginbelow		mb	{}
+	    named rule			r	{}
+	    named rulehorizontal	rh	{}
+	    named ruleabove		ra	{}
+	    named rulebelow		rb	{}
+	    named rulevertical		rv	{}
+	    named ruleleft		rl	{}
+	    named ruleright		rr	{}
+	    named rulewidth		rw	{}
+	    named rulehorizontalwidth	rhw	{}
+	    named ruleabovewidth	raw	{}
+	    named rulebelowwidth	rbw	{}
+	    named ruleverticalwidth	rvw	{}
+	    named ruleleftwidth		rlw	{}
+	    named rulerightwidth	rrw	{}
+	    named rulegap		rg	{}
+	    named rulehorizontalgap	rhg	{}
+	    named ruleabovegap		rag	{}
+	    named rulebelowgap		rbg	{}
+	    named ruleverticalgap	rvg	{}
+	    named ruleleftgap		rlg	{}
+	    named rulerightgap		rrg	{}
+	    named rulecolour rulecolor				rc	{}
+	    named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+	    named ruleabovecolour ruleabovecolor		rac	{}
+	    named rulebelowcolour rulebelowcolor		rbc	{}
+	    named ruleverticalcolour ruleverticalcolor		rvc	{}
+	    named ruleleftcolour ruleleftcolor			rlc	{}
+	    named rulerightcolour rulerightcolor		rrc	{}
+	    named ruleplainchar		rpc	{}
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	{
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at "boption" level (i.e. Level 3)       #
+	    #                                                                 #
+	    ###################################################################
+
+	    def tbxp    { bp				@Else tblp   }
+	    def tbxbg   { bbg				@Else tblbg  }
+	    def tbxf    { bf				@Else tblf   }
+	    def tbxb    { bb				@Else tblb   }
+	    def tbxw    { bw				@Else tblw   }
+	    def tbxh    { bh				@Else tblh   }
+	    def tbxi    { bi				@Else tbli   }
+	    def tbxiv   { biv				@Else tbliv  }
+	    def tbxs    { bs				@Else tbls   }
+	    def tbxsh   { bsh				@Else tblsh  }
+	    def tbxml   { bml  @Else bmh  @Else bm	@Else tblml  }
+	    def tbxmr   { bmr  @Else bmh  @Else bm	@Else tblmr  }
+	    def tbxma   { bma  @Else bmv  @Else bm	@Else tblma  }
+	    def tbxmb   { bmb  @Else bmv  @Else bm	@Else tblmb  }
+	    def tbxra   { bra  @Else brh  @Else br	@Else tblra  }
+	    def tbxrb   { brb  @Else brh  @Else br	@Else tblrb  }
+	    def tbxrl   { brl  @Else brv  @Else br	@Else tblrl  }
+	    def tbxrr   { brr  @Else brv  @Else br	@Else tblrr  }
+	    def tbxraw  { braw @Else brhw @Else brw	@Else tblraw }
+	    def tbxrbw  { brbw @Else brhw @Else brw	@Else tblrbw }
+	    def tbxrlw  { brlw @Else brvw @Else brw	@Else tblrlw }
+	    def tbxrrw  { brrw @Else brvw @Else brw	@Else tblrrw }
+	    def tbxrag  { brag @Else brhg @Else brg	@Else tblrag }
+	    def tbxrbg  { brbg @Else brhg @Else brg	@Else tblrbg }
+	    def tbxrlg  { brlg @Else brvg @Else brg	@Else tblrlg }
+	    def tbxrrg  { brrg @Else brvg @Else brg	@Else tblrrg }
+	    def tbxrac  { brac @Else brhc @Else brc	@Else tblrac }
+	    def tbxrbc  { brbc @Else brhc @Else brc	@Else tblrbc }
+	    def tbxrlc  { brlc @Else brvc @Else brc	@Else tblrlc }
+	    def tbxrrc  { brrc @Else brvc @Else brc	@Else tblrrc }
+	    def tbxrpc  { brpc				@Else tblrpc }
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at @Rowb level (i.e. Level 4)           #
+	    #                                                                 #
+	    ###################################################################
+
+	    def rowp    { p				@Else tbxp   }
+	    def rowbg   { bg				@Else tbxbg  }
+	    def rowf    { f				@Else tbxf   }
+	    def rowb    { b				@Else tbxb   }
+	    def roww    { w				@Else tbxw   }
+	    def rowh    { h				@Else tbxh   }
+	    def rowi    { i				@Else tbxi   }
+	    def rowiv   { iv				@Else tbxiv  }
+	    def rows    { s				@Else tbxs   }
+	    def rowsh   { sh				@Else tbxsh  }
+	    def rowml   { ml  @Else mh  @Else m		@Else tbxml  }
+	    def rowmr   { mr  @Else mh  @Else m		@Else tbxmr  }
+	    def rowma   { ma  @Else mv  @Else m		@Else tbxma  }
+	    def rowmb   { mb  @Else mv  @Else m		@Else tbxmb  }
+	    def rowra   { ra  @Else rh  @Else r		@Else tbxra  }
+	    def rowrb   { rb  @Else rh  @Else r		@Else tbxrb  }
+	    def rowrl   { rl  @Else rv  @Else r		@Else tbxrl  }
+	    def rowrr   { rr  @Else rv  @Else r		@Else tbxrr  }
+	    def rowraw  { raw @Else rhw @Else rw	@Else tbxraw }
+	    def rowrbw  { rbw @Else rhw @Else rw	@Else tbxrbw }
+	    def rowrlw  { rlw @Else rvw @Else rw	@Else tbxrlw }
+	    def rowrrw  { rrw @Else rvw @Else rw	@Else tbxrrw }
+	    def rowrag  { rag @Else rhg @Else rg	@Else tbxrag }
+	    def rowrbg  { rbg @Else rhg @Else rg	@Else tbxrbg }
+	    def rowrlg  { rlg @Else rvg @Else rg	@Else tbxrlg }
+	    def rowrrg  { rrg @Else rvg @Else rg	@Else tbxrrg }
+	    def rowrac  { rac @Else rhc @Else rc	@Else tbxrac }
+	    def rowrbc  { rbc @Else rhc @Else rc	@Else tbxrbc }
+	    def rowrlc  { rlc @Else rvc @Else rc	@Else tbxrlc }
+	    def rowrrc  { rrc @Else rvc @Else rc	@Else tbxrrc }
+	    def rowrpc  { rpc				@Else tbxrpc }
+
+	    bformat
+		A { A } B { B } C { C } D { D } E { E } F { F }
+		G { G } H { H } I { I } J { J } K { K } L { L }
+		M { M } N { N } O { O } P { P } Q { Q } R { R }
+		S { S } T { T } U { U } V { V } W { W } X { X }
+		Y { Y } Z { Z }
+		@Cell {
+		
+		    @DoCell
+
+			#######################################################
+			#                                                     #
+			#  Specific option values to @Cell (i.e. Level 5)     #
+			#                                                     #
+			#######################################################
+
+			p    { p			@Else rowp   }
+			bg   { bg			@Else rowbg  }
+			f    { f			@Else rowf   }
+			b    { b			@Else rowb   }
+			w    { w			@Else roww   }
+			h    { h			@Else rowh   }
+			i    { i			@Else rowi   }
+			iv   { iv			@Else rowiv  }
+			s    { s			@Else rows   }
+			sh   { sh			@Else rowsh  }
+			ml   { ml  @Else mh  @Else m	@Else rowml  }
+			mr   { mr  @Else mh  @Else m	@Else rowmr  }
+			ma   { ma  @Else mv  @Else m	@Else rowma  }
+			mb   { mb  @Else mv  @Else m	@Else rowmb  }
+			ra   { ra  @Else rh  @Else r	@Else rowra  }
+			rb   { rb  @Else rh  @Else r	@Else rowrb  }
+			rl   { rl  @Else rv  @Else r	@Else rowrl  }
+			rr   { rr  @Else rv  @Else r	@Else rowrr  }
+			raw  { raw @Else rhw @Else rw	@Else rowraw }
+			rbw  { rbw @Else rhw @Else rw	@Else rowrbw }
+			rlw  { rlw @Else rvw @Else rw	@Else rowrlw }
+			rrw  { rrw @Else rvw @Else rw	@Else rowrrw }
+			rag  { rag @Else rhg @Else rg	@Else rowrag }
+			rbg  { rbg @Else rhg @Else rg	@Else rowrbg }
+			rlg  { rlg @Else rvg @Else rg	@Else rowrlg }
+			rrg  { rrg @Else rvg @Else rg	@Else rowrrg }
+			rac  { rac @Else rhc @Else rc	@Else rowrac }
+			rbc  { rbc @Else rhc @Else rc	@Else rowrbc }
+			rlc  { rlc @Else rvc @Else rc	@Else rowrlc }
+			rrc  { rrc @Else rvc @Else rc	@Else rowrrc }
+			rpc  { rpc			@Else rowrpc }
+
+			x
+		}
+	}
+
+	# symbol for producing @Rowc rows
+	def @DoRowc
+	    named paint			p	{}
+	    named background		bg	{}
+	    named font			f	{}
+	    named break			b	{}
+	    named width			w	{}
+	    named height		h	{}
+	    named indent		i	{}
+	    named indentvertical	iv	{}
+	    named strut			s	{}
+	    named struthorizontal	sh	{}
+	    named margin		m	{}
+	    named marginhorizontal	mh	{}
+	    named marginleft		ml	{}
+	    named marginright		mr	{}
+	    named marginvertical	mv	{}
+	    named marginabove		ma	{}
+	    named marginbelow		mb	{}
+	    named rule			r	{}
+	    named rulehorizontal	rh	{}
+	    named ruleabove		ra	{}
+	    named rulebelow		rb	{}
+	    named rulevertical		rv	{}
+	    named ruleleft		rl	{}
+	    named ruleright		rr	{}
+	    named rulewidth		rw	{}
+	    named rulehorizontalwidth	rhw	{}
+	    named ruleabovewidth	raw	{}
+	    named rulebelowwidth	rbw	{}
+	    named ruleverticalwidth	rvw	{}
+	    named ruleleftwidth		rlw	{}
+	    named rulerightwidth	rrw	{}
+	    named rulegap		rg	{}
+	    named rulehorizontalgap	rhg	{}
+	    named ruleabovegap		rag	{}
+	    named rulebelowgap		rbg	{}
+	    named ruleverticalgap	rvg	{}
+	    named ruleleftgap		rlg	{}
+	    named rulerightgap		rrg	{}
+	    named rulecolour rulecolor				rc	{}
+	    named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+	    named ruleabovecolour ruleabovecolor		rac	{}
+	    named rulebelowcolour rulebelowcolor		rbc	{}
+	    named ruleverticalcolour ruleverticalcolor		rvc	{}
+	    named ruleleftcolour ruleleftcolor			rlc	{}
+	    named rulerightcolour rulerightcolor		rrc	{}
+	    named ruleplainchar		rpc	{}
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	{
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at "coption" level (i.e. Level 3)       #
+	    #                                                                 #
+	    ###################################################################
+
+	    def tbxp    { cp				@Else tblp   }
+	    def tbxbg   { cbg				@Else tblbg  }
+	    def tbxf    { cf				@Else tblf   }
+	    def tbxb    { cb				@Else tblb   }
+	    def tbxw    { cw				@Else tblw   }
+	    def tbxh    { ch				@Else tblh   }
+	    def tbxi    { ci				@Else tbli   }
+	    def tbxiv   { civ				@Else tbliv  }
+	    def tbxs    { cs				@Else tbls   }
+	    def tbxsh   { csh				@Else tblsh  }
+	    def tbxml   { cml  @Else cmh  @Else cm	@Else tblml  }
+	    def tbxmr   { cmr  @Else cmh  @Else cm	@Else tblmr  }
+	    def tbxma   { cma  @Else cmv  @Else cm	@Else tblma  }
+	    def tbxmb   { cmb  @Else cmv  @Else cm	@Else tblmb  }
+	    def tbxra   { cra  @Else crh  @Else cr	@Else tblra  }
+	    def tbxrb   { crb  @Else crh  @Else cr	@Else tblrb  }
+	    def tbxrl   { crl  @Else crv  @Else cr	@Else tblrl  }
+	    def tbxrr   { crr  @Else crv  @Else cr	@Else tblrr  }
+	    def tbxraw  { craw @Else crhw @Else crw	@Else tblraw }
+	    def tbxrbw  { crbw @Else crhw @Else crw	@Else tblrbw }
+	    def tbxrlw  { crlw @Else crvw @Else crw	@Else tblrlw }
+	    def tbxrrw  { crrw @Else crvw @Else crw	@Else tblrrw }
+	    def tbxrag  { crag @Else crhg @Else crg	@Else tblrag }
+	    def tbxrbg  { crbg @Else crhg @Else crg	@Else tblrbg }
+	    def tbxrlg  { crlg @Else crvg @Else crg	@Else tblrlg }
+	    def tbxrrg  { crrg @Else crvg @Else crg	@Else tblrrg }
+	    def tbxrac  { crac @Else crhc @Else crc	@Else tblrac }
+	    def tbxrbc  { crbc @Else crhc @Else crc	@Else tblrbc }
+	    def tbxrlc  { crlc @Else crvc @Else crc	@Else tblrlc }
+	    def tbxrrc  { crrc @Else crvc @Else crc	@Else tblrrc }
+	    def tbxrpc  { crpc				@Else tblrpc }
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at @Rowc level (i.e. Level 4)           #
+	    #                                                                 #
+	    ###################################################################
+
+	    def rowp    { p				@Else tbxp   }
+	    def rowbg   { bg				@Else tbxbg  }
+	    def rowf    { f				@Else tbxf   }
+	    def rowb    { b				@Else tbxb   }
+	    def roww    { w				@Else tbxw   }
+	    def rowh    { h				@Else tbxh   }
+	    def rowi    { i				@Else tbxi   }
+	    def rowiv   { iv				@Else tbxiv  }
+	    def rows    { s				@Else tbxs   }
+	    def rowsh   { sh				@Else tbxsh  }
+	    def rowml   { ml  @Else mh  @Else m		@Else tbxml  }
+	    def rowmr   { mr  @Else mh  @Else m		@Else tbxmr  }
+	    def rowma   { ma  @Else mv  @Else m		@Else tbxma  }
+	    def rowmb   { mb  @Else mv  @Else m		@Else tbxmb  }
+	    def rowra   { ra  @Else rh  @Else r		@Else tbxra  }
+	    def rowrb   { rb  @Else rh  @Else r		@Else tbxrb  }
+	    def rowrl   { rl  @Else rv  @Else r		@Else tbxrl  }
+	    def rowrr   { rr  @Else rv  @Else r		@Else tbxrr  }
+	    def rowraw  { raw @Else rhw @Else rw	@Else tbxraw }
+	    def rowrbw  { rbw @Else rhw @Else rw	@Else tbxrbw }
+	    def rowrlw  { rlw @Else rvw @Else rw	@Else tbxrlw }
+	    def rowrrw  { rrw @Else rvw @Else rw	@Else tbxrrw }
+	    def rowrag  { rag @Else rhg @Else rg	@Else tbxrag }
+	    def rowrbg  { rbg @Else rhg @Else rg	@Else tbxrbg }
+	    def rowrlg  { rlg @Else rvg @Else rg	@Else tbxrlg }
+	    def rowrrg  { rrg @Else rvg @Else rg	@Else tbxrrg }
+	    def rowrac  { rac @Else rhc @Else rc	@Else tbxrac }
+	    def rowrbc  { rbc @Else rhc @Else rc	@Else tbxrbc }
+	    def rowrlc  { rlc @Else rvc @Else rc	@Else tbxrlc }
+	    def rowrrc  { rrc @Else rvc @Else rc	@Else tbxrrc }
+	    def rowrpc  { rpc				@Else tbxrpc }
+
+	    cformat
+		A { A } B { B } C { C } D { D } E { E } F { F }
+		G { G } H { H } I { I } J { J } K { K } L { L }
+		M { M } N { N } O { O } P { P } Q { Q } R { R }
+		S { S } T { T } U { U } V { V } W { W } X { X }
+		Y { Y } Z { Z }
+		@Cell {
+		
+		    @DoCell
+
+			#######################################################
+			#                                                     #
+			#  Specific option values to @Cell (i.e. Level 5)     #
+			#                                                     #
+			#######################################################
+
+			p    { p			@Else rowp   }
+			bg   { bg			@Else rowbg  }
+			f    { f			@Else rowf   }
+			b    { b			@Else rowb   }
+			w    { w			@Else roww   }
+			h    { h			@Else rowh   }
+			i    { i			@Else rowi   }
+			iv   { iv			@Else rowiv  }
+			s    { s			@Else rows   }
+			sh   { sh			@Else rowsh  }
+			ml   { ml  @Else mh  @Else m	@Else rowml  }
+			mr   { mr  @Else mh  @Else m	@Else rowmr  }
+			ma   { ma  @Else mv  @Else m	@Else rowma  }
+			mb   { mb  @Else mv  @Else m	@Else rowmb  }
+			ra   { ra  @Else rh  @Else r	@Else rowra  }
+			rb   { rb  @Else rh  @Else r	@Else rowrb  }
+			rl   { rl  @Else rv  @Else r	@Else rowrl  }
+			rr   { rr  @Else rv  @Else r	@Else rowrr  }
+			raw  { raw @Else rhw @Else rw	@Else rowraw }
+			rbw  { rbw @Else rhw @Else rw	@Else rowrbw }
+			rlw  { rlw @Else rvw @Else rw	@Else rowrlw }
+			rrw  { rrw @Else rvw @Else rw	@Else rowrrw }
+			rag  { rag @Else rhg @Else rg	@Else rowrag }
+			rbg  { rbg @Else rhg @Else rg	@Else rowrbg }
+			rlg  { rlg @Else rvg @Else rg	@Else rowrlg }
+			rrg  { rrg @Else rvg @Else rg	@Else rowrrg }
+			rac  { rac @Else rhc @Else rc	@Else rowrac }
+			rbc  { rbc @Else rhc @Else rc	@Else rowrbc }
+			rlc  { rlc @Else rvc @Else rc	@Else rowrlc }
+			rrc  { rrc @Else rvc @Else rc	@Else rowrrc }
+			rpc  { rpc			@Else rowrpc }
+
+			x
+		}
+	}
+
+	# symbol for producing @Rowd rows
+	def @DoRowd
+	    named paint			p	{}
+	    named background		bg	{}
+	    named font			f	{}
+	    named break			b	{}
+	    named width			w	{}
+	    named height		h	{}
+	    named indent		i	{}
+	    named indentvertical	iv	{}
+	    named strut			s	{}
+	    named struthorizontal	sh	{}
+	    named margin		m	{}
+	    named marginhorizontal	mh	{}
+	    named marginleft		ml	{}
+	    named marginright		mr	{}
+	    named marginvertical	mv	{}
+	    named marginabove		ma	{}
+	    named marginbelow		mb	{}
+	    named rule			r	{}
+	    named rulehorizontal	rh	{}
+	    named ruleabove		ra	{}
+	    named rulebelow		rb	{}
+	    named rulevertical		rv	{}
+	    named ruleleft		rl	{}
+	    named ruleright		rr	{}
+	    named rulewidth		rw	{}
+	    named rulehorizontalwidth	rhw	{}
+	    named ruleabovewidth	raw	{}
+	    named rulebelowwidth	rbw	{}
+	    named ruleverticalwidth	rvw	{}
+	    named ruleleftwidth		rlw	{}
+	    named rulerightwidth	rrw	{}
+	    named rulegap		rg	{}
+	    named rulehorizontalgap	rhg	{}
+	    named ruleabovegap		rag	{}
+	    named rulebelowgap		rbg	{}
+	    named ruleverticalgap	rvg	{}
+	    named ruleleftgap		rlg	{}
+	    named rulerightgap		rrg	{}
+	    named rulecolour rulecolor				rc	{}
+	    named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+	    named ruleabovecolour ruleabovecolor		rac	{}
+	    named rulebelowcolour rulebelowcolor		rbc	{}
+	    named ruleverticalcolour ruleverticalcolor		rvc	{}
+	    named ruleleftcolour ruleleftcolor			rlc	{}
+	    named rulerightcolour rulerightcolor		rrc	{}
+	    named ruleplainchar		rpc	{}
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	{
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at "doption" level (i.e. Level 3)       #
+	    #                                                                 #
+	    ###################################################################
+
+	    def tbxp    { dp				@Else tblp   }
+	    def tbxbg   { dbg				@Else tblbg  }
+	    def tbxf    { df				@Else tblf   }
+	    def tbxb    { db				@Else tblb   }
+	    def tbxw    { dw				@Else tblw   }
+	    def tbxh    { dh				@Else tblh   }
+	    def tbxi    { di				@Else tbli   }
+	    def tbxiv   { div				@Else tbliv  }
+	    def tbxs    { ds				@Else tbls   }
+	    def tbxsh   { dsh				@Else tblsh  }
+	    def tbxml   { dml  @Else dmh  @Else dm	@Else tblml  }
+	    def tbxmr   { dmr  @Else dmh  @Else dm	@Else tblmr  }
+	    def tbxma   { dma  @Else dmv  @Else dm	@Else tblma  }
+	    def tbxmb   { dmb  @Else dmv  @Else dm	@Else tblmb  }
+	    def tbxra   { dra  @Else drh  @Else dr	@Else tblra  }
+	    def tbxrb   { drb  @Else drh  @Else dr	@Else tblrb  }
+	    def tbxrl   { drl  @Else drv  @Else dr	@Else tblrl  }
+	    def tbxrr   { drr  @Else drv  @Else dr	@Else tblrr  }
+	    def tbxraw  { draw @Else drhw @Else drw	@Else tblraw }
+	    def tbxrbw  { drbw @Else drhw @Else drw	@Else tblrbw }
+	    def tbxrlw  { drlw @Else drvw @Else drw	@Else tblrlw }
+	    def tbxrrw  { drrw @Else drvw @Else drw	@Else tblrrw }
+	    def tbxrag  { drag @Else drhg @Else drg	@Else tblrag }
+	    def tbxrbg  { drbg @Else drhg @Else drg	@Else tblrbg }
+	    def tbxrlg  { drlg @Else drvg @Else drg	@Else tblrlg }
+	    def tbxrrg  { drrg @Else drvg @Else drg	@Else tblrrg }
+	    def tbxrac  { drac @Else drhc @Else drc	@Else tblrac }
+	    def tbxrbc  { drbc @Else drhc @Else drc	@Else tblrbc }
+	    def tbxrlc  { drlc @Else drvc @Else drc	@Else tblrlc }
+	    def tbxrrc  { drrc @Else drvc @Else drc	@Else tblrrc }
+	    def tbxrpc  { drpc				@Else tblrpc }
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at @Rowd level (i.e. Level 4)           #
+	    #                                                                 #
+	    ###################################################################
+
+	    def rowp    { p				@Else tbxp   }
+	    def rowbg   { bg				@Else tbxbg  }
+	    def rowf    { f				@Else tbxf   }
+	    def rowb    { b				@Else tbxb   }
+	    def roww    { w				@Else tbxw   }
+	    def rowh    { h				@Else tbxh   }
+	    def rowi    { i				@Else tbxi   }
+	    def rowiv   { iv				@Else tbxiv  }
+	    def rows    { s				@Else tbxs   }
+	    def rowsh   { sh				@Else tbxsh  }
+	    def rowml   { ml  @Else mh  @Else m		@Else tbxml  }
+	    def rowmr   { mr  @Else mh  @Else m		@Else tbxmr  }
+	    def rowma   { ma  @Else mv  @Else m		@Else tbxma  }
+	    def rowmb   { mb  @Else mv  @Else m		@Else tbxmb  }
+	    def rowra   { ra  @Else rh  @Else r		@Else tbxra  }
+	    def rowrb   { rb  @Else rh  @Else r		@Else tbxrb  }
+	    def rowrl   { rl  @Else rv  @Else r		@Else tbxrl  }
+	    def rowrr   { rr  @Else rv  @Else r		@Else tbxrr  }
+	    def rowraw  { raw @Else rhw @Else rw	@Else tbxraw }
+	    def rowrbw  { rbw @Else rhw @Else rw	@Else tbxrbw }
+	    def rowrlw  { rlw @Else rvw @Else rw	@Else tbxrlw }
+	    def rowrrw  { rrw @Else rvw @Else rw	@Else tbxrrw }
+	    def rowrag  { rag @Else rhg @Else rg	@Else tbxrag }
+	    def rowrbg  { rbg @Else rhg @Else rg	@Else tbxrbg }
+	    def rowrlg  { rlg @Else rvg @Else rg	@Else tbxrlg }
+	    def rowrrg  { rrg @Else rvg @Else rg	@Else tbxrrg }
+	    def rowrac  { rac @Else rhc @Else rc	@Else tbxrac }
+	    def rowrbc  { rbc @Else rhc @Else rc	@Else tbxrbc }
+	    def rowrlc  { rlc @Else rvc @Else rc	@Else tbxrlc }
+	    def rowrrc  { rrc @Else rvc @Else rc	@Else tbxrrc }
+	    def rowrpc  { rpc				@Else tbxrpc }
+
+	    dformat
+		A { A } B { B } C { C } D { D } E { E } F { F }
+		G { G } H { H } I { I } J { J } K { K } L { L }
+		M { M } N { N } O { O } P { P } Q { Q } R { R }
+		S { S } T { T } U { U } V { V } W { W } X { X }
+		Y { Y } Z { Z }
+		@Cell {
+		
+		    @DoCell
+
+			#######################################################
+			#                                                     #
+			#  Specific option values to @Cell (i.e. Level 5)     #
+			#                                                     #
+			#######################################################
+
+			p    { p			@Else rowp   }
+			bg   { bg			@Else rowbg  }
+			f    { f			@Else rowf   }
+			b    { b			@Else rowb   }
+			w    { w			@Else roww   }
+			h    { h			@Else rowh   }
+			i    { i			@Else rowi   }
+			iv   { iv			@Else rowiv  }
+			s    { s			@Else rows   }
+			sh   { sh			@Else rowsh  }
+			ml   { ml  @Else mh  @Else m	@Else rowml  }
+			mr   { mr  @Else mh  @Else m	@Else rowmr  }
+			ma   { ma  @Else mv  @Else m	@Else rowma  }
+			mb   { mb  @Else mv  @Else m	@Else rowmb  }
+			ra   { ra  @Else rh  @Else r	@Else rowra  }
+			rb   { rb  @Else rh  @Else r	@Else rowrb  }
+			rl   { rl  @Else rv  @Else r	@Else rowrl  }
+			rr   { rr  @Else rv  @Else r	@Else rowrr  }
+			raw  { raw @Else rhw @Else rw	@Else rowraw }
+			rbw  { rbw @Else rhw @Else rw	@Else rowrbw }
+			rlw  { rlw @Else rvw @Else rw	@Else rowrlw }
+			rrw  { rrw @Else rvw @Else rw	@Else rowrrw }
+			rag  { rag @Else rhg @Else rg	@Else rowrag }
+			rbg  { rbg @Else rhg @Else rg	@Else rowrbg }
+			rlg  { rlg @Else rvg @Else rg	@Else rowrlg }
+			rrg  { rrg @Else rvg @Else rg	@Else rowrrg }
+			rac  { rac @Else rhc @Else rc	@Else rowrac }
+			rbc  { rbc @Else rhc @Else rc	@Else rowrbc }
+			rlc  { rlc @Else rvc @Else rc	@Else rowrlc }
+			rrc  { rrc @Else rvc @Else rc	@Else rowrrc }
+			rpc  { rpc			@Else rowrpc }
+
+			x
+		}
+	}
+
+	# symbol for producing @Rowe rows
+	def @DoRowe
+	    named paint			p	{}
+	    named background		bg	{}
+	    named font			f	{}
+	    named break			b	{}
+	    named width			w	{}
+	    named height		h	{}
+	    named indent		i	{}
+	    named indentvertical	iv	{}
+	    named strut			s	{}
+	    named struthorizontal	sh	{}
+	    named margin		m	{}
+	    named marginhorizontal	mh	{}
+	    named marginleft		ml	{}
+	    named marginright		mr	{}
+	    named marginvertical	mv	{}
+	    named marginabove		ma	{}
+	    named marginbelow		mb	{}
+	    named rule			r	{}
+	    named rulehorizontal	rh	{}
+	    named ruleabove		ra	{}
+	    named rulebelow		rb	{}
+	    named rulevertical		rv	{}
+	    named ruleleft		rl	{}
+	    named ruleright		rr	{}
+	    named rulewidth		rw	{}
+	    named rulehorizontalwidth	rhw	{}
+	    named ruleabovewidth	raw	{}
+	    named rulebelowwidth	rbw	{}
+	    named ruleverticalwidth	rvw	{}
+	    named ruleleftwidth		rlw	{}
+	    named rulerightwidth	rrw	{}
+	    named rulegap		rg	{}
+	    named rulehorizontalgap	rhg	{}
+	    named ruleabovegap		rag	{}
+	    named rulebelowgap		rbg	{}
+	    named ruleverticalgap	rvg	{}
+	    named ruleleftgap		rlg	{}
+	    named rulerightgap		rrg	{}
+	    named rulecolour rulecolor				rc	{}
+	    named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+	    named ruleabovecolour ruleabovecolor		rac	{}
+	    named rulebelowcolour rulebelowcolor		rbc	{}
+	    named ruleverticalcolour ruleverticalcolor		rvc	{}
+	    named ruleleftcolour ruleleftcolor			rlc	{}
+	    named rulerightcolour rulerightcolor		rrc	{}
+	    named ruleplainchar		rpc	{}
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	{
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at "eoption" level (i.e. Level 3)       #
+	    #                                                                 #
+	    ###################################################################
+
+	    def tbxp    { ep				@Else tblp   }
+	    def tbxbg   { ebg				@Else tblbg  }
+	    def tbxf    { ef				@Else tblf   }
+	    def tbxb    { eb				@Else tblb   }
+	    def tbxw    { ew				@Else tblw   }
+	    def tbxh    { eh				@Else tblh   }
+	    def tbxi    { ei				@Else tbli   }
+	    def tbxiv   { eiv				@Else tbliv  }
+	    def tbxs    { es				@Else tbls   }
+	    def tbxsh   { esh				@Else tblsh  }
+	    def tbxml   { eml  @Else emh  @Else em	@Else tblml  }
+	    def tbxmr   { emr  @Else emh  @Else em	@Else tblmr  }
+	    def tbxma   { ema  @Else emv  @Else em	@Else tblma  }
+	    def tbxmb   { emb  @Else emv  @Else em	@Else tblmb  }
+	    def tbxra   { era  @Else erh  @Else er	@Else tblra  }
+	    def tbxrb   { erb  @Else erh  @Else er	@Else tblrb  }
+	    def tbxrl   { erl  @Else erv  @Else er	@Else tblrl  }
+	    def tbxrr   { err  @Else erv  @Else er	@Else tblrr  }
+	    def tbxraw  { eraw @Else erhw @Else erw	@Else tblraw }
+	    def tbxrbw  { erbw @Else erhw @Else erw	@Else tblrbw }
+	    def tbxrlw  { erlw @Else ervw @Else erw	@Else tblrlw }
+	    def tbxrrw  { errw @Else ervw @Else erw	@Else tblrrw }
+	    def tbxrag  { erag @Else erhg @Else erg	@Else tblrag }
+	    def tbxrbg  { erbg @Else erhg @Else erg	@Else tblrbg }
+	    def tbxrlg  { erlg @Else ervg @Else erg	@Else tblrlg }
+	    def tbxrrg  { errg @Else ervg @Else erg	@Else tblrrg }
+	    def tbxrac  { erac @Else erhc @Else erc	@Else tblrac }
+	    def tbxrbc  { erbc @Else erhc @Else erc	@Else tblrbc }
+	    def tbxrlc  { erlc @Else ervc @Else erc	@Else tblrlc }
+	    def tbxrrc  { errc @Else ervc @Else erc	@Else tblrrc }
+	    def tbxrpc  { erpc				@Else tblrpc }
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at @Rowe level (i.e. Level 4)           #
+	    #                                                                 #
+	    ###################################################################
+
+	    def rowp    { p				@Else tbxp   }
+	    def rowbg   { bg				@Else tbxbg  }
+	    def rowf    { f				@Else tbxf   }
+	    def rowb    { b				@Else tbxb   }
+	    def roww    { w				@Else tbxw   }
+	    def rowh    { h				@Else tbxh   }
+	    def rowi    { i				@Else tbxi   }
+	    def rowiv   { iv				@Else tbxiv  }
+	    def rows    { s				@Else tbxs   }
+	    def rowsh   { sh				@Else tbxsh  }
+	    def rowml   { ml  @Else mh  @Else m		@Else tbxml  }
+	    def rowmr   { mr  @Else mh  @Else m		@Else tbxmr  }
+	    def rowma   { ma  @Else mv  @Else m		@Else tbxma  }
+	    def rowmb   { mb  @Else mv  @Else m		@Else tbxmb  }
+	    def rowra   { ra  @Else rh  @Else r		@Else tbxra  }
+	    def rowrb   { rb  @Else rh  @Else r		@Else tbxrb  }
+	    def rowrl   { rl  @Else rv  @Else r		@Else tbxrl  }
+	    def rowrr   { rr  @Else rv  @Else r		@Else tbxrr  }
+	    def rowraw  { raw @Else rhw @Else rw	@Else tbxraw }
+	    def rowrbw  { rbw @Else rhw @Else rw	@Else tbxrbw }
+	    def rowrlw  { rlw @Else rvw @Else rw	@Else tbxrlw }
+	    def rowrrw  { rrw @Else rvw @Else rw	@Else tbxrrw }
+	    def rowrag  { rag @Else rhg @Else rg	@Else tbxrag }
+	    def rowrbg  { rbg @Else rhg @Else rg	@Else tbxrbg }
+	    def rowrlg  { rlg @Else rvg @Else rg	@Else tbxrlg }
+	    def rowrrg  { rrg @Else rvg @Else rg	@Else tbxrrg }
+	    def rowrac  { rac @Else rhc @Else rc	@Else tbxrac }
+	    def rowrbc  { rbc @Else rhc @Else rc	@Else tbxrbc }
+	    def rowrlc  { rlc @Else rvc @Else rc	@Else tbxrlc }
+	    def rowrrc  { rrc @Else rvc @Else rc	@Else tbxrrc }
+	    def rowrpc  { rpc				@Else tbxrpc }
+
+	    eformat
+		A { A } B { B } C { C } D { D } E { E } F { F }
+		G { G } H { H } I { I } J { J } K { K } L { L }
+		M { M } N { N } O { O } P { P } Q { Q } R { R }
+		S { S } T { T } U { U } V { V } W { W } X { X }
+		Y { Y } Z { Z }
+		@Cell {
+		
+		    @DoCell
+
+			#######################################################
+			#                                                     #
+			#  Specific option values to @Cell (i.e. Level 5)     #
+			#                                                     #
+			#######################################################
+
+			p    { p			@Else rowp   }
+			bg   { bg			@Else rowbg  }
+			f    { f			@Else rowf   }
+			b    { b			@Else rowb   }
+			w    { w			@Else roww   }
+			h    { h			@Else rowh   }
+			i    { i			@Else rowi   }
+			iv   { iv			@Else rowiv  }
+			s    { s			@Else rows   }
+			sh   { sh			@Else rowsh  }
+			ml   { ml  @Else mh  @Else m	@Else rowml  }
+			mr   { mr  @Else mh  @Else m	@Else rowmr  }
+			ma   { ma  @Else mv  @Else m	@Else rowma  }
+			mb   { mb  @Else mv  @Else m	@Else rowmb  }
+			ra   { ra  @Else rh  @Else r	@Else rowra  }
+			rb   { rb  @Else rh  @Else r	@Else rowrb  }
+			rl   { rl  @Else rv  @Else r	@Else rowrl  }
+			rr   { rr  @Else rv  @Else r	@Else rowrr  }
+			raw  { raw @Else rhw @Else rw	@Else rowraw }
+			rbw  { rbw @Else rhw @Else rw	@Else rowrbw }
+			rlw  { rlw @Else rvw @Else rw	@Else rowrlw }
+			rrw  { rrw @Else rvw @Else rw	@Else rowrrw }
+			rag  { rag @Else rhg @Else rg	@Else rowrag }
+			rbg  { rbg @Else rhg @Else rg	@Else rowrbg }
+			rlg  { rlg @Else rvg @Else rg	@Else rowrlg }
+			rrg  { rrg @Else rvg @Else rg	@Else rowrrg }
+			rac  { rac @Else rhc @Else rc	@Else rowrac }
+			rbc  { rbc @Else rhc @Else rc	@Else rowrbc }
+			rlc  { rlc @Else rvc @Else rc	@Else rowrlc }
+			rrc  { rrc @Else rvc @Else rc	@Else rowrrc }
+			rpc  { rpc			@Else rowrpc }
+
+			x
+		}
+	}
+
+	# symbol for producing @Rowf rows
+	def @DoRowf
+	    named paint			p	{}
+	    named background		bg	{}
+	    named font			f	{}
+	    named break			b	{}
+	    named width			w	{}
+	    named height		h	{}
+	    named indent		i	{}
+	    named indentvertical	iv	{}
+	    named strut			s	{}
+	    named struthorizontal	sh	{}
+	    named margin		m	{}
+	    named marginhorizontal	mh	{}
+	    named marginleft		ml	{}
+	    named marginright		mr	{}
+	    named marginvertical	mv	{}
+	    named marginabove		ma	{}
+	    named marginbelow		mb	{}
+	    named rule			r	{}
+	    named rulehorizontal	rh	{}
+	    named ruleabove		ra	{}
+	    named rulebelow		rb	{}
+	    named rulevertical		rv	{}
+	    named ruleleft		rl	{}
+	    named ruleright		rr	{}
+	    named rulewidth		rw	{}
+	    named rulehorizontalwidth	rhw	{}
+	    named ruleabovewidth	raw	{}
+	    named rulebelowwidth	rbw	{}
+	    named ruleverticalwidth	rvw	{}
+	    named ruleleftwidth		rlw	{}
+	    named rulerightwidth	rrw	{}
+	    named rulegap		rg	{}
+	    named rulehorizontalgap	rhg	{}
+	    named ruleabovegap		rag	{}
+	    named rulebelowgap		rbg	{}
+	    named ruleverticalgap	rvg	{}
+	    named ruleleftgap		rlg	{}
+	    named rulerightgap		rrg	{}
+	    named rulecolour rulecolor				rc	{}
+	    named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+	    named ruleabovecolour ruleabovecolor		rac	{}
+	    named rulebelowcolour rulebelowcolor		rbc	{}
+	    named ruleverticalcolour ruleverticalcolor		rvc	{}
+	    named ruleleftcolour ruleleftcolor			rlc	{}
+	    named rulerightcolour rulerightcolor		rrc	{}
+	    named ruleplainchar		rpc	{}
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	{
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at "foption" level (i.e. Level 3)       #
+	    #                                                                 #
+	    ###################################################################
+
+	    def tbxp    { fp				@Else tblp   }
+	    def tbxbg   { fbg				@Else tblbg  }
+	    def tbxf    { ff				@Else tblf   }
+	    def tbxb    { fb				@Else tblb   }
+	    def tbxw    { fw				@Else tblw   }
+	    def tbxh    { fh				@Else tblh   }
+	    def tbxi    { fi				@Else tbli   }
+	    def tbxiv   { fiv				@Else tbliv  }
+	    def tbxs    { fs				@Else tbls   }
+	    def tbxsh   { fsh				@Else tblsh  }
+	    def tbxml   { fml  @Else fmh  @Else fm	@Else tblml  }
+	    def tbxmr   { fmr  @Else fmh  @Else fm	@Else tblmr  }
+	    def tbxma   { fma  @Else fmv  @Else fm	@Else tblma  }
+	    def tbxmb   { fmb  @Else fmv  @Else fm	@Else tblmb  }
+	    def tbxra   { fra  @Else frh  @Else fr	@Else tblra  }
+	    def tbxrb   { frb  @Else frh  @Else fr	@Else tblrb  }
+	    def tbxrl   { frl  @Else frv  @Else fr	@Else tblrl  }
+	    def tbxrr   { frr  @Else frv  @Else fr	@Else tblrr  }
+	    def tbxraw  { fraw @Else frhw @Else frw	@Else tblraw }
+	    def tbxrbw  { frbw @Else frhw @Else frw	@Else tblrbw }
+	    def tbxrlw  { frlw @Else frvw @Else frw	@Else tblrlw }
+	    def tbxrrw  { frrw @Else frvw @Else frw	@Else tblrrw }
+	    def tbxrag  { frag @Else frhg @Else frg	@Else tblrag }
+	    def tbxrbg  { frbg @Else frhg @Else frg	@Else tblrbg }
+	    def tbxrlg  { frlg @Else frvg @Else frg	@Else tblrlg }
+	    def tbxrrg  { frrg @Else frvg @Else frg	@Else tblrrg }
+	    def tbxrac  { frac @Else frhc @Else frc	@Else tblrac }
+	    def tbxrbc  { frbc @Else frhc @Else frc	@Else tblrbc }
+	    def tbxrlc  { frlc @Else frvc @Else frc	@Else tblrlc }
+	    def tbxrrc  { frrc @Else frvc @Else frc	@Else tblrrc }
+	    def tbxrpc  { frpc				@Else tblrpc }
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at @Rowf level (i.e. Level 4)           #
+	    #                                                                 #
+	    ###################################################################
+
+	    def rowp    { p				@Else tbxp   }
+	    def rowbg   { bg				@Else tbxbg  }
+	    def rowf    { f				@Else tbxf   }
+	    def rowb    { b				@Else tbxb   }
+	    def roww    { w				@Else tbxw   }
+	    def rowh    { h				@Else tbxh   }
+	    def rowi    { i				@Else tbxi   }
+	    def rowiv   { iv				@Else tbxiv  }
+	    def rows    { s				@Else tbxs   }
+	    def rowsh   { sh				@Else tbxsh  }
+	    def rowml   { ml  @Else mh  @Else m		@Else tbxml  }
+	    def rowmr   { mr  @Else mh  @Else m		@Else tbxmr  }
+	    def rowma   { ma  @Else mv  @Else m		@Else tbxma  }
+	    def rowmb   { mb  @Else mv  @Else m		@Else tbxmb  }
+	    def rowra   { ra  @Else rh  @Else r		@Else tbxra  }
+	    def rowrb   { rb  @Else rh  @Else r		@Else tbxrb  }
+	    def rowrl   { rl  @Else rv  @Else r		@Else tbxrl  }
+	    def rowrr   { rr  @Else rv  @Else r		@Else tbxrr  }
+	    def rowraw  { raw @Else rhw @Else rw	@Else tbxraw }
+	    def rowrbw  { rbw @Else rhw @Else rw	@Else tbxrbw }
+	    def rowrlw  { rlw @Else rvw @Else rw	@Else tbxrlw }
+	    def rowrrw  { rrw @Else rvw @Else rw	@Else tbxrrw }
+	    def rowrag  { rag @Else rhg @Else rg	@Else tbxrag }
+	    def rowrbg  { rbg @Else rhg @Else rg	@Else tbxrbg }
+	    def rowrlg  { rlg @Else rvg @Else rg	@Else tbxrlg }
+	    def rowrrg  { rrg @Else rvg @Else rg	@Else tbxrrg }
+	    def rowrac  { rac @Else rhc @Else rc	@Else tbxrac }
+	    def rowrbc  { rbc @Else rhc @Else rc	@Else tbxrbc }
+	    def rowrlc  { rlc @Else rvc @Else rc	@Else tbxrlc }
+	    def rowrrc  { rrc @Else rvc @Else rc	@Else tbxrrc }
+	    def rowrpc  { rpc				@Else tbxrpc }
+
+	    fformat
+		A { A } B { B } C { C } D { D } E { E } F { F }
+		G { G } H { H } I { I } J { J } K { K } L { L }
+		M { M } N { N } O { O } P { P } Q { Q } R { R }
+		S { S } T { T } U { U } V { V } W { W } X { X }
+		Y { Y } Z { Z }
+		@Cell {
+		
+		    @DoCell
+
+			#######################################################
+			#                                                     #
+			#  Specific option values to @Cell (i.e. Level 5)     #
+			#                                                     #
+			#######################################################
+
+			p    { p			@Else rowp   }
+			bg   { bg			@Else rowbg  }
+			f    { f			@Else rowf   }
+			b    { b			@Else rowb   }
+			w    { w			@Else roww   }
+			h    { h			@Else rowh   }
+			i    { i			@Else rowi   }
+			iv   { iv			@Else rowiv  }
+			s    { s			@Else rows   }
+			sh   { sh			@Else rowsh  }
+			ml   { ml  @Else mh  @Else m	@Else rowml  }
+			mr   { mr  @Else mh  @Else m	@Else rowmr  }
+			ma   { ma  @Else mv  @Else m	@Else rowma  }
+			mb   { mb  @Else mv  @Else m	@Else rowmb  }
+			ra   { ra  @Else rh  @Else r	@Else rowra  }
+			rb   { rb  @Else rh  @Else r	@Else rowrb  }
+			rl   { rl  @Else rv  @Else r	@Else rowrl  }
+			rr   { rr  @Else rv  @Else r	@Else rowrr  }
+			raw  { raw @Else rhw @Else rw	@Else rowraw }
+			rbw  { rbw @Else rhw @Else rw	@Else rowrbw }
+			rlw  { rlw @Else rvw @Else rw	@Else rowrlw }
+			rrw  { rrw @Else rvw @Else rw	@Else rowrrw }
+			rag  { rag @Else rhg @Else rg	@Else rowrag }
+			rbg  { rbg @Else rhg @Else rg	@Else rowrbg }
+			rlg  { rlg @Else rvg @Else rg	@Else rowrlg }
+			rrg  { rrg @Else rvg @Else rg	@Else rowrrg }
+			rac  { rac @Else rhc @Else rc	@Else rowrac }
+			rbc  { rbc @Else rhc @Else rc	@Else rowrbc }
+			rlc  { rlc @Else rvc @Else rc	@Else rowrlc }
+			rrc  { rrc @Else rvc @Else rc	@Else rowrrc }
+			rpc  { rpc			@Else rowrpc }
+
+			x
+		}
+	}
+
+	# symbol for producing @Rowg rows
+	def @DoRowg
+	    named paint			p	{}
+	    named background		bg	{}
+	    named font			f	{}
+	    named break			b	{}
+	    named width			w	{}
+	    named height		h	{}
+	    named indent		i	{}
+	    named indentvertical	iv	{}
+	    named strut			s	{}
+	    named struthorizontal	sh	{}
+	    named margin		m	{}
+	    named marginhorizontal	mh	{}
+	    named marginleft		ml	{}
+	    named marginright		mr	{}
+	    named marginvertical	mv	{}
+	    named marginabove		ma	{}
+	    named marginbelow		mb	{}
+	    named rule			r	{}
+	    named rulehorizontal	rh	{}
+	    named ruleabove		ra	{}
+	    named rulebelow		rb	{}
+	    named rulevertical		rv	{}
+	    named ruleleft		rl	{}
+	    named ruleright		rr	{}
+	    named rulewidth		rw	{}
+	    named rulehorizontalwidth	rhw	{}
+	    named ruleabovewidth	raw	{}
+	    named rulebelowwidth	rbw	{}
+	    named ruleverticalwidth	rvw	{}
+	    named ruleleftwidth		rlw	{}
+	    named rulerightwidth	rrw	{}
+	    named rulegap		rg	{}
+	    named rulehorizontalgap	rhg	{}
+	    named ruleabovegap		rag	{}
+	    named rulebelowgap		rbg	{}
+	    named ruleverticalgap	rvg	{}
+	    named ruleleftgap		rlg	{}
+	    named rulerightgap		rrg	{}
+	    named rulecolour rulecolor				rc	{}
+	    named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+	    named ruleabovecolour ruleabovecolor		rac	{}
+	    named rulebelowcolour rulebelowcolor		rbc	{}
+	    named ruleverticalcolour ruleverticalcolor		rvc	{}
+	    named ruleleftcolour ruleleftcolor			rlc	{}
+	    named rulerightcolour rulerightcolor		rrc	{}
+	    named ruleplainchar		rpc	{}
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	{
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at "doption" level (i.e. Level 3)       #
+	    #                                                                 #
+	    ###################################################################
+
+	    def tbxp    { gp				@Else tblp   }
+	    def tbxbg   { gbg				@Else tblbg  }
+	    def tbxf    { gf				@Else tblf   }
+	    def tbxb    { gb				@Else tblb   }
+	    def tbxw    { gw				@Else tblw   }
+	    def tbxh    { gh				@Else tblh   }
+	    def tbxi    { gi				@Else tbli   }
+	    def tbxiv   { giv				@Else tbliv  }
+	    def tbxs    { gs				@Else tbls   }
+	    def tbxsh   { gsh				@Else tblsh  }
+	    def tbxml   { gml  @Else gmh  @Else gm	@Else tblml  }
+	    def tbxmr   { gmr  @Else gmh  @Else gm	@Else tblmr  }
+	    def tbxma   { gma  @Else gmv  @Else gm	@Else tblma  }
+	    def tbxmb   { gmb  @Else gmv  @Else gm	@Else tblmb  }
+	    def tbxra   { gra  @Else grh  @Else gr	@Else tblra  }
+	    def tbxrb   { grb  @Else grh  @Else gr	@Else tblrb  }
+	    def tbxrl   { grl  @Else grv  @Else gr	@Else tblrl  }
+	    def tbxrr   { grr  @Else grv  @Else gr	@Else tblrr  }
+	    def tbxraw  { graw @Else grhw @Else grw	@Else tblraw }
+	    def tbxrbw  { grbw @Else grhw @Else grw	@Else tblrbw }
+	    def tbxrlw  { grlw @Else grvw @Else grw	@Else tblrlw }
+	    def tbxrrw  { grrw @Else grvw @Else grw	@Else tblrrw }
+	    def tbxrag  { grag @Else grhg @Else grg	@Else tblrag }
+	    def tbxrbg  { grbg @Else grhg @Else grg	@Else tblrbg }
+	    def tbxrlg  { grlg @Else grvg @Else grg	@Else tblrlg }
+	    def tbxrrg  { grrg @Else grvg @Else grg	@Else tblrrg }
+	    def tbxrac  { grac @Else grhc @Else grc	@Else tblrac }
+	    def tbxrbc  { grbc @Else grhc @Else grc	@Else tblrbc }
+	    def tbxrlc  { grlc @Else grvc @Else grc	@Else tblrlc }
+	    def tbxrrc  { grrc @Else grvc @Else grc	@Else tblrrc }
+	    def tbxrpc  { grpc				@Else tblrpc }
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at @Rowg level (i.e. Level 4)           #
+	    #                                                                 #
+	    ###################################################################
+
+	    def rowp    { p				@Else tbxp   }
+	    def rowbg   { bg				@Else tbxbg  }
+	    def rowf    { f				@Else tbxf   }
+	    def rowb    { b				@Else tbxb   }
+	    def roww    { w				@Else tbxw   }
+	    def rowh    { h				@Else tbxh   }
+	    def rowi    { i				@Else tbxi   }
+	    def rowiv   { iv				@Else tbxiv  }
+	    def rows    { s				@Else tbxs   }
+	    def rowsh   { sh				@Else tbxsh  }
+	    def rowml   { ml  @Else mh  @Else m		@Else tbxml  }
+	    def rowmr   { mr  @Else mh  @Else m		@Else tbxmr  }
+	    def rowma   { ma  @Else mv  @Else m		@Else tbxma  }
+	    def rowmb   { mb  @Else mv  @Else m		@Else tbxmb  }
+	    def rowra   { ra  @Else rh  @Else r		@Else tbxra  }
+	    def rowrb   { rb  @Else rh  @Else r		@Else tbxrb  }
+	    def rowrl   { rl  @Else rv  @Else r		@Else tbxrl  }
+	    def rowrr   { rr  @Else rv  @Else r		@Else tbxrr  }
+	    def rowraw  { raw @Else rhw @Else rw	@Else tbxraw }
+	    def rowrbw  { rbw @Else rhw @Else rw	@Else tbxrbw }
+	    def rowrlw  { rlw @Else rvw @Else rw	@Else tbxrlw }
+	    def rowrrw  { rrw @Else rvw @Else rw	@Else tbxrrw }
+	    def rowrag  { rag @Else rhg @Else rg	@Else tbxrag }
+	    def rowrbg  { rbg @Else rhg @Else rg	@Else tbxrbg }
+	    def rowrlg  { rlg @Else rvg @Else rg	@Else tbxrlg }
+	    def rowrrg  { rrg @Else rvg @Else rg	@Else tbxrrg }
+	    def rowrac  { rac @Else rhc @Else rc	@Else tbxrac }
+	    def rowrbc  { rbc @Else rhc @Else rc	@Else tbxrbc }
+	    def rowrlc  { rlc @Else rvc @Else rc	@Else tbxrlc }
+	    def rowrrc  { rrc @Else rvc @Else rc	@Else tbxrrc }
+	    def rowrpc  { rpc				@Else tbxrpc }
+
+	    gformat
+		A { A } B { B } C { C } D { D } E { E } F { F }
+		G { G } H { H } I { I } J { J } K { K } L { L }
+		M { M } N { N } O { O } P { P } Q { Q } R { R }
+		S { S } T { T } U { U } V { V } W { W } X { X }
+		Y { Y } Z { Z }
+		@Cell {
+		
+		    @DoCell
+
+			#######################################################
+			#                                                     #
+			#  Specific option values to @Cell (i.e. Level 5)     #
+			#                                                     #
+			#######################################################
+
+			p    { p			@Else rowp   }
+			bg   { bg			@Else rowbg  }
+			f    { f			@Else rowf   }
+			b    { b			@Else rowb   }
+			w    { w			@Else roww   }
+			h    { h			@Else rowh   }
+			i    { i			@Else rowi   }
+			iv   { iv			@Else rowiv  }
+			s    { s			@Else rows   }
+			sh   { sh			@Else rowsh  }
+			ml   { ml  @Else mh  @Else m	@Else rowml  }
+			mr   { mr  @Else mh  @Else m	@Else rowmr  }
+			ma   { ma  @Else mv  @Else m	@Else rowma  }
+			mb   { mb  @Else mv  @Else m	@Else rowmb  }
+			ra   { ra  @Else rh  @Else r	@Else rowra  }
+			rb   { rb  @Else rh  @Else r	@Else rowrb  }
+			rl   { rl  @Else rv  @Else r	@Else rowrl  }
+			rr   { rr  @Else rv  @Else r	@Else rowrr  }
+			raw  { raw @Else rhw @Else rw	@Else rowraw }
+			rbw  { rbw @Else rhw @Else rw	@Else rowrbw }
+			rlw  { rlw @Else rvw @Else rw	@Else rowrlw }
+			rrw  { rrw @Else rvw @Else rw	@Else rowrrw }
+			rag  { rag @Else rhg @Else rg	@Else rowrag }
+			rbg  { rbg @Else rhg @Else rg	@Else rowrbg }
+			rlg  { rlg @Else rvg @Else rg	@Else rowrlg }
+			rrg  { rrg @Else rvg @Else rg	@Else rowrrg }
+			rac  { rac @Else rhc @Else rc	@Else rowrac }
+			rbc  { rbc @Else rhc @Else rc	@Else rowrbc }
+			rlc  { rlc @Else rvc @Else rc	@Else rowrlc }
+			rrc  { rrc @Else rvc @Else rc	@Else rowrrc }
+			rpc  { rpc			@Else rowrpc }
+
+			x
+		}
+	}
+
+	# symbol for producing @Rowh rows
+	def @DoRowh
+	    named paint			p	{}
+	    named background		bg	{}
+	    named font			f	{}
+	    named break			b	{}
+	    named width			w	{}
+	    named height		h	{}
+	    named indent		i	{}
+	    named indentvertical	iv	{}
+	    named strut			s	{}
+	    named struthorizontal	sh	{}
+	    named margin		m	{}
+	    named marginhorizontal	mh	{}
+	    named marginleft		ml	{}
+	    named marginright		mr	{}
+	    named marginvertical	mv	{}
+	    named marginabove		ma	{}
+	    named marginbelow		mb	{}
+	    named rule			r	{}
+	    named rulehorizontal	rh	{}
+	    named ruleabove		ra	{}
+	    named rulebelow		rb	{}
+	    named rulevertical		rv	{}
+	    named ruleleft		rl	{}
+	    named ruleright		rr	{}
+	    named rulewidth		rw	{}
+	    named rulehorizontalwidth	rhw	{}
+	    named ruleabovewidth	raw	{}
+	    named rulebelowwidth	rbw	{}
+	    named ruleverticalwidth	rvw	{}
+	    named ruleleftwidth		rlw	{}
+	    named rulerightwidth	rrw	{}
+	    named rulegap		rg	{}
+	    named rulehorizontalgap	rhg	{}
+	    named ruleabovegap		rag	{}
+	    named rulebelowgap		rbg	{}
+	    named ruleverticalgap	rvg	{}
+	    named ruleleftgap		rlg	{}
+	    named rulerightgap		rrg	{}
+	    named rulecolour rulecolor				rc	{}
+	    named rulehorizontalcolour rulehorizontalcolor	rhc	{}
+	    named ruleabovecolour ruleabovecolor		rac	{}
+	    named rulebelowcolour rulebelowcolor		rbc	{}
+	    named ruleverticalcolour ruleverticalcolor		rvc	{}
+	    named ruleleftcolour ruleleftcolor			rlc	{}
+	    named rulerightcolour rulerightcolor		rrc	{}
+	    named ruleplainchar		rpc	{}
+	    named A {} named B {} named C {} named D {} named E {}
+	    named F {} named G {} named H {} named I {} named J {}
+	    named K {} named L {} named M {} named N {} named O {}
+	    named P {} named Q {} named R {} named S {} named T {}
+	    named U {} named V {} named W {} named X {} named Y {}
+	    named Z {}
+	{
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at "hoption" level (i.e. Level 3)       #
+	    #                                                                 #
+	    ###################################################################
+
+	    def tbxp    { hp				@Else tblp   }
+	    def tbxbg   { hbg				@Else tblbg  }
+	    def tbxf    { hf				@Else tblf   }
+	    def tbxb    { hb				@Else tblb   }
+	    def tbxw    { hw				@Else tblw   }
+	    def tbxh    { hh				@Else tblh   }
+	    def tbxi    { hi				@Else tbli   }
+	    def tbxiv   { hiv				@Else tbliv  }
+	    def tbxs    { hs				@Else tbls   }
+	    def tbxsh   { hsh				@Else tblsh  }
+	    def tbxml   { hml  @Else hmh  @Else hm	@Else tblml  }
+	    def tbxmr   { hmr  @Else hmh  @Else hm	@Else tblmr  }
+	    def tbxma   { hma  @Else hmv  @Else hm	@Else tblma  }
+	    def tbxmb   { hmb  @Else hmv  @Else hm	@Else tblmb  }
+	    def tbxra   { hra  @Else hrh  @Else hr	@Else tblra  }
+	    def tbxrb   { hrb  @Else hrh  @Else hr	@Else tblrb  }
+	    def tbxrl   { hrl  @Else hrv  @Else hr	@Else tblrl  }
+	    def tbxrr   { hrr  @Else hrv  @Else hr	@Else tblrr  }
+	    def tbxraw  { hraw @Else hrhw @Else hrw	@Else tblraw }
+	    def tbxrbw  { hrbw @Else hrhw @Else hrw	@Else tblrbw }
+	    def tbxrlw  { hrlw @Else hrvw @Else hrw	@Else tblrlw }
+	    def tbxrrw  { hrrw @Else hrvw @Else hrw	@Else tblrrw }
+	    def tbxrag  { hrag @Else hrhg @Else hrg	@Else tblrag }
+	    def tbxrbg  { hrbg @Else hrhg @Else hrg	@Else tblrbg }
+	    def tbxrlg  { hrlg @Else hrvg @Else hrg	@Else tblrlg }
+	    def tbxrrg  { hrrg @Else hrvg @Else hrg	@Else tblrrg }
+	    def tbxrac  { hrac @Else hrhc @Else hrc	@Else tblrac }
+	    def tbxrbc  { hrbc @Else hrhc @Else hrc	@Else tblrbc }
+	    def tbxrlc  { hrlc @Else hrvc @Else hrc	@Else tblrlc }
+	    def tbxrrc  { hrrc @Else hrvc @Else hrc	@Else tblrrc }
+	    def tbxrpc  { hrpc				@Else tblrpc }
+
+	    ###################################################################
+	    #                                                                 #
+	    #  Specific option values at @Rowh level (i.e. Level 4)           #
+	    #                                                                 #
+	    ###################################################################
+
+	    def rowp    { p				@Else tbxp   }
+	    def rowbg   { bg				@Else tbxbg  }
+	    def rowf    { f				@Else tbxf   }
+	    def rowb    { b				@Else tbxb   }
+	    def roww    { w				@Else tbxw   }
+	    def rowh    { h				@Else tbxh   }
+	    def rowi    { i				@Else tbxi   }
+	    def rowiv   { iv				@Else tbxiv  }
+	    def rows    { s				@Else tbxs   }
+	    def rowsh   { sh				@Else tbxsh  }
+	    def rowml   { ml  @Else mh  @Else m		@Else tbxml  }
+	    def rowmr   { mr  @Else mh  @Else m		@Else tbxmr  }
+	    def rowma   { ma  @Else mv  @Else m		@Else tbxma  }
+	    def rowmb   { mb  @Else mv  @Else m		@Else tbxmb  }
+	    def rowra   { ra  @Else rh  @Else r		@Else tbxra  }
+	    def rowrb   { rb  @Else rh  @Else r		@Else tbxrb  }
+	    def rowrl   { rl  @Else rv  @Else r		@Else tbxrl  }
+	    def rowrr   { rr  @Else rv  @Else r		@Else tbxrr  }
+	    def rowraw  { raw @Else rhw @Else rw	@Else tbxraw }
+	    def rowrbw  { rbw @Else rhw @Else rw	@Else tbxrbw }
+	    def rowrlw  { rlw @Else rvw @Else rw	@Else tbxrlw }
+	    def rowrrw  { rrw @Else rvw @Else rw	@Else tbxrrw }
+	    def rowrag  { rag @Else rhg @Else rg	@Else tbxrag }
+	    def rowrbg  { rbg @Else rhg @Else rg	@Else tbxrbg }
+	    def rowrlg  { rlg @Else rvg @Else rg	@Else tbxrlg }
+	    def rowrrg  { rrg @Else rvg @Else rg	@Else tbxrrg }
+	    def rowrac  { rac @Else rhc @Else rc	@Else tbxrac }
+	    def rowrbc  { rbc @Else rhc @Else rc	@Else tbxrbc }
+	    def rowrlc  { rlc @Else rvc @Else rc	@Else tbxrlc }
+	    def rowrrc  { rrc @Else rvc @Else rc	@Else tbxrrc }
+	    def rowrpc  { rpc				@Else tbxrpc }
+
+	    hformat
+		A { A } B { B } C { C } D { D } E { E } F { F }
+		G { G } H { H } I { I } J { J } K { K } L { L }
+		M { M } N { N } O { O } P { P } Q { Q } R { R }
+		S { S } T { T } U { U } V { V } W { W } X { X }
+		Y { Y } Z { Z }
+		@Cell {
+		
+		    @DoCell
+
+			#######################################################
+			#                                                     #
+			#  Specific option values to @Cell (i.e. Level 5)     #
+			#                                                     #
+			#######################################################
+
+			p    { p			@Else rowp   }
+			bg   { bg			@Else rowbg  }
+			f    { f			@Else rowf   }
+			b    { b			@Else rowb   }
+			w    { w			@Else roww   }
+			h    { h			@Else rowh   }
+			i    { i			@Else rowi   }
+			iv   { iv			@Else rowiv  }
+			s    { s			@Else rows   }
+			sh   { sh			@Else rowsh  }
+			ml   { ml  @Else mh  @Else m	@Else rowml  }
+			mr   { mr  @Else mh  @Else m	@Else rowmr  }
+			ma   { ma  @Else mv  @Else m	@Else rowma  }
+			mb   { mb  @Else mv  @Else m	@Else rowmb  }
+			ra   { ra  @Else rh  @Else r	@Else rowra  }
+			rb   { rb  @Else rh  @Else r	@Else rowrb  }
+			rl   { rl  @Else rv  @Else r	@Else rowrl  }
+			rr   { rr  @Else rv  @Else r	@Else rowrr  }
+			raw  { raw @Else rhw @Else rw	@Else rowraw }
+			rbw  { rbw @Else rhw @Else rw	@Else rowrbw }
+			rlw  { rlw @Else rvw @Else rw	@Else rowrlw }
+			rrw  { rrw @Else rvw @Else rw	@Else rowrrw }
+			rag  { rag @Else rhg @Else rg	@Else rowrag }
+			rbg  { rbg @Else rhg @Else rg	@Else rowrbg }
+			rlg  { rlg @Else rvg @Else rg	@Else rowrlg }
+			rrg  { rrg @Else rvg @Else rg	@Else rowrrg }
+			rac  { rac @Else rhc @Else rc	@Else rowrac }
+			rbc  { rbc @Else rhc @Else rc	@Else rowrbc }
+			rlc  { rlc @Else rvc @Else rc	@Else rowrlc }
+			rrc  { rrc @Else rvc @Else rc	@Else rowrrc }
+			rpc  { rpc			@Else rowrpc }
+
+			x
+		}
+	}
+
+	macro @Row		{ /  @DoRow  }
+	macro @Rowa		{ /  @DoRowa }
+	macro @Rowb		{ /  @DoRowb }
+	macro @Rowc		{ /  @DoRowc }
+	macro @Rowd		{ /  @DoRowd }
+	macro @Rowe		{ /  @DoRowe }
+	macro @Rowf		{ /  @DoRowf }
+	macro @Rowg		{ /  @DoRowg }
+	macro @Rowh		{ /  @DoRowh }
+
+	macro @FirstRow		{    @DoRow  }
+	macro @FirstRowa	{    @DoRowa }
+	macro @FirstRowb	{    @DoRowb }
+	macro @FirstRowc	{    @DoRowc }
+	macro @FirstRowd	{    @DoRowd }
+	macro @FirstRowe	{    @DoRowe }
+	macro @FirstRowf	{    @DoRowf }
+	macro @FirstRowg	{    @DoRowg }
+	macro @FirstRowh	{    @DoRowh }
+
+	macro @MarkRow		{ ^/ @DoRow  }
+	macro @MarkRowa		{ ^/ @DoRowa }
+	macro @MarkRowb		{ ^/ @DoRowb }
+	macro @MarkRowc		{ ^/ @DoRowc }
+	macro @MarkRowd		{ ^/ @DoRowd }
+	macro @MarkRowe		{ ^/ @DoRowe }
+	macro @MarkRowf		{ ^/ @DoRowf }
+	macro @MarkRowg		{ ^/ @DoRowg }
+	macro @MarkRowh		{ ^/ @DoRowh }
+
+	macro @NoBreakRow	{ /0iu @DoRow  }
+	macro @NoBreakRowa	{ /0iu @DoRowa }
+	macro @NoBreakRowb	{ /0iu @DoRowb }
+	macro @NoBreakRowc	{ /0iu @DoRowc }
+	macro @NoBreakRowd	{ /0iu @DoRowd }
+	macro @NoBreakRowe	{ /0iu @DoRowe }
+	macro @NoBreakRowf	{ /0iu @DoRowf }
+	macro @NoBreakRowg	{ /0iu @DoRowg }
+	macro @NoBreakRowh	{ /0iu @DoRowh }
+
+	macro @NP               { /"1.1b" }
+
+	@Body
+    }
+
+@End @TblSetup
diff --git a/include/tblf.lpg b/include/tblf.lpg
new file mode 100644
index 0000000..a31c30f
--- /dev/null
+++ b/include/tblf.lpg
@@ -0,0 +1,41 @@
+%%BeginResource: procset LoutTblPrependGraphic
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%                                                                    %
+%  PostScript @SysPrependGraphic file for @Tbl  Jeffrey H. Kingston  %
+%  Version 1.0                                             June 1998 %
+%                                                                    %
+%  To assist in avoiding name clashes, the names of all symbols      %
+%  defined here begin with "ltbl".                                   %
+%                                                                    %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% painting (i.e. filling): - ltblwhite - (etc.)
+/ltblnopaint		{			       } def
+/ltblnochange		{ 			  fill } def
+/ltbldarkblue		{ 0.0 0.0 0.5 setrgbcolor fill } def
+/ltblblue		{ 0.0 0.0 1.0 setrgbcolor fill } def
+/ltbllightblue		{ 0.5 0.5 1.0 setrgbcolor fill } def
+/ltbldarkgreen		{ 0.0 0.5 0.0 setrgbcolor fill } def
+/ltblgreen		{ 0.0 1.0 0.0 setrgbcolor fill } def
+/ltbllightgreen	        { 0.5 1.0 0.5 setrgbcolor fill } def
+/ltbldarkred		{ 0.5 0.0 0.0 setrgbcolor fill } def
+/ltblred		{ 1.0 0.0 0.0 setrgbcolor fill } def
+/ltbllightred		{ 1.0 0.5 0.5 setrgbcolor fill } def
+/ltbldarkcyan		{ 0.0 0.5 0.5 setrgbcolor fill } def
+/ltblcyan		{ 0.0 1.0 1.0 setrgbcolor fill } def
+/ltbllightcyan		{ 0.5 1.0 1.0 setrgbcolor fill } def
+/ltbldarkmagenta	{ 0.5 0.0 0.5 setrgbcolor fill } def
+/ltblmagenta		{ 1.0 0.0 1.0 setrgbcolor fill } def
+/ltbllightmagenta	{ 1.0 0.5 1.0 setrgbcolor fill } def
+/ltbldarkyellow        	{ 0.5 0.5 0.0 setrgbcolor fill } def
+/ltblyellow		{ 1.0 1.0 0.0 setrgbcolor fill } def
+/ltbllightyellow	{ 1.0 1.0 0.5 setrgbcolor fill } def
+/ltbldarkgray		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/ltblgray		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/ltbllightgray		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/ltbldarkgrey		{ 0.2 0.2 0.2 setrgbcolor fill } def
+/ltblgrey		{ 0.5 0.5 0.5 setrgbcolor fill } def
+/ltbllightgrey		{ 0.8 0.8 0.8 setrgbcolor fill } def
+/ltblblack		{ 0.0 0.0 0.0 setrgbcolor fill } def
+/ltblwhite		{ 1.0 1.0 1.0 setrgbcolor fill } def
+%%EndResource
diff --git a/include/ts b/include/ts
new file mode 100644
index 0000000..d78ed14
--- /dev/null
+++ b/include/ts
@@ -0,0 +1,105 @@
+
+###############################################################################
+#                                                                             #
+#  Lout @ToySetup package (Jeff Kingston, July 1993, updated October 1994)    #
+#                                                                             #
+#  In response to a user request I have put together this tiny package for    #
+#  people to play with who want to start learning how to do page layout and   #
+#  galleys with Lout.  It produces a very simple sequence of pages.  To       #
+#  invoke the package, run "lout myfile > op" where myfile looks like this:   #
+#                                                                             #
+#     @SysInclude { ts }                                                      #
+#     @Use { @ToySetup }                                                      #
+#     @Document                                                               #
+#     //                                                                      #
+#     @Text {                                                                 #
+#     Any text you like here, using @I, @B, @Heading, @PP, @LP, @DP,          #
+#     @LeftDisplay, @IndentedDisplay, and @CenteredDisplay just as in         #
+#     DocumentSetup.                                                          #
+#     }                                                                       #
+#                                                                             #
+###############################################################################
+
+@SysInclude { fontdefs }
+@SysInclude { langdefs }
+
+export @I @B @Heading @PP @LP @DP @NP
+       @LeftDisplay @IndentedDisplay @CenteredDisplay
+       @Text @Document
+
+def @ToySetup
+    named @PageWidth  { 21.0c }
+    named @PageHeight { 29.7c }
+@Begin
+
+    ###########################################################################
+    #                                                                         #
+    #  Font changes, headings, and paragraphs.                                #
+    #                                                                         #
+    ###########################################################################
+
+    def @I       right x { Slope @Font x      }
+    def @B       right x { Bold @Font x       }
+    def @Heading right x { ragged @Break @B x }
+
+    macro @PP        { //1.3vx 1.0f @Wide &0i }
+    macro @LP        { //1.3vx                }
+    macro @DP        { //0.5v                 }
+    macro @NP        { //1.1b                 }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Displays.                                                              #
+    #                                                                         #
+    ###########################################################################
+
+    def @DispPlace { @Galley }
+
+    def @Disp into { @DispPlace&&preceding }
+	right x
+    {
+	@OneRow x
+    }
+
+    macro @LeftDisplay     { @DP |       @DispPlace  |  @DP // @Disp   }
+    macro @IndentedDisplay { @DP |2f     @DispPlace  |  @DP // @Disp   }
+    macro @CenteredDisplay { @DP |0.5rt  @DispPlace  |  @DP // @Disp   }
+
+
+    ###########################################################################
+    #                                                                         #
+    #  Page layout.                                                           #
+    #                                                                         #
+    ###########################################################################
+
+    def @TextPlace { @Galley }
+
+    def @Text force into { @TextPlace&&preceding }
+        right x
+    {
+	x
+    }
+
+    def @Page right x
+    {
+	@PageWidth @Wide @PageHeight @High
+	{ Times Base 12p } @Font
+	{ adjust nohyphen 14px } @Break
+	English @Language { 0 0 0 } @SetColour
+	{   //1i ||1i
+	    @HExpand @VExpand x
+	    ||1i //1i
+	}
+    }
+
+    def @PageList right num
+    {
+	@Page { |0.5rt - num - //0.4i @TextPlace }
+	//
+	@PageList @Next num
+    }
+
+    def @Document { @PageList 1 }
+
+@End @ToySetup
diff --git a/locale/README b/locale/README
new file mode 100644
index 0000000..8db8468
--- /dev/null
+++ b/locale/README
@@ -0,0 +1,20 @@
+Locale-specific error messages
+
+Lout offers the option of locale-specific error messages.  To
+get them, install with USELOC set to 1 in the make file, as
+described in detail there.  If USELOC is set to 1 when installing,
+Lout will look for a file called $(LIBDIR)/locale/msgs.<loc>
+where <loc> stands for the current locale, for its error messages.
+
+At present we have
+
+  msgs.english.3.16  The up-to-date messages list, in English
+  old.msgs.fr	     French messages from Version 3.05, out of date
+  old.msgs.de	     German messages from Version 3.05, out of date
+
+Someone needs to translate the new errors list into these languages
+(and others) and send it to me.  Please send me any translations you
+do (perhaps ask first) so that I can stop people doing duplicate work.
+
+Jeffrey H. Kingston
+26 May 1999
diff --git a/locale/msgs.english.3.16 b/locale/msgs.english.3.16
new file mode 100644
index 0000000..ca9549b
--- /dev/null
+++ b/locale/msgs.english.3.16
@@ -0,0 +1,581 @@
+$set 1
+1 word is too long
+2 assert failed in %s
+3 assert failed in %s %s
+4 %s - debug flags not implemented
+6 unable to initialize locale
+7 usage: -o <filename>
+8 usage: -c <filename>
+9 usage: -e <filename>
+10 usage: -EPS
+11 usage: -D <directoryname>
+12 usage: -C <directoryname>
+13 usage: -F <directoryname>
+14 usage: -H <directoryname>
+15 usage: -I <directoryname>
+16 usage: -i <filename>
+17 two -h options illegal
+18 usage: -h <filename>
+19 usage: lout -%c<length><length>
+20 lout -%c: units must be c, i, p, or m
+21 lout -%c: units must be c, i, p, or m
+23 standard input specified twice
+24 error in command-line option %s
+25 error in command-line option %s
+26 unknown command line flag %s
+27 cannot open output file %s
+28 -o: output file name %s ends with %s
+29 total of all words printed: %d
+30 unable to initialize collation
+31 cannot set binary mode on stdout
+$set 2
+1 too many open files when opening include file %s; open files are:
+2 too many open files when opening database file %s; open files are:
+3 run out of memory when opening file %s
+4 illegal macro invocation in database
+5 line is too long (or final newline missing)
+6 character %c outside quoted string
+7 cannot open file %s
+8 recursion in macro
+9 %s expected (after %s)
+10 name of include file expected here
+11 unterminated string
+12 unterminated string
+13 skipping null character in string
+14 LexGetToken: error in quoted string
+15 line is too long (or final newline missing)
+16 filter parameter in macro
+17 end of file reached while reading filter parameter
+18 expected %s here (after %s)
+19 expected file name here
+20 cannot open include file %s
+21 line is too long (or final newline missing)
+22 end of file reached while reading %s
+23   %s
+24 exiting now
+$set 3
+1 run out of memory when enlarging file table
+2 too many files (maximum is %d)
+3 database file %s where source file expected
+4 database index file %s where source file expected
+5 file name %s%s is too long
+6 file name %s%s is too long
+7 DatabaseFileNum: filter file position unknown
+8 DatabaseFileNum: unexpected file type
+9 file position %s... is too long to print
+10 file position %s... is too long to print
+11 filter
+12 file
+13 from
+14 line
+15 file path name %s%s%s is too long
+16 files %s and %s both exist
+17 safe execution prohibiting command: %s
+18 DatabaseFileNum: database file position unknown
+$set 5
+1 expected font family name here
+2 expected font face name here
+3 expected opening %s of fontdef here
+4 expected opening %s of langdef here
+5 left brace expected here in %s declaration
+6 name of %s file expected here
+7 unknown or misspelt symbol %s
+8 symbol name or %s expected here (%s declaration)
+9 symbol names missing in %s declaration
+10 name of %s file expected here
+11 symbol %s unknown or misspelt
+12 symbol %s not allowed in macro
+13 unexpected end of input
+14 %s not expected here
+15 unmatched %s in macro
+16 unmatched %s in macro
+17 symbol %s unknown or misspelt
+18 symbol name expected after %s
+19 %s %s does not match %s %s
+20 unmatched %s in macro
+21 %s must follow named parameter %s
+22 right parameter of %s must begin with %s
+23 ReadTokenList: %s
+24 %s ignored (name is missing)
+25 %s ignored (opening %s is missing)
+26 import name expected here
+27 import %s not in scope
+28 %s symbol name expected here
+29 extend symbol %s not in scope
+30 keyword %s or %s expected here
+31 keyword %s expected here
+32 ignoring export list of macro
+33 symbol name expected here
+34 %s expected here
+35 %s expected here
+36 %s expected here
+37 precedence is too low (%d substituted)
+38 precedence is too high (%d substituted)
+39 associativity altered to %s
+40 cannot find %s parameter name
+41 cannot find %s parameter name
+42 opening left brace or @Begin of %s expected
+43 exported symbol %s is not defined in %s
+44 body parameter %s may not be exported
+45 symbol %s exported twice
+46 named parameter import %s has parameters
+47 %s suffix should be omitted in %s clause
+48 %s has %s clause, so cannot be extended
+$set 6
+1 expression is too deeply nested
+2 expression is too deeply nested
+3 left parameter of %s is not a symbol (or not visible)
+4 unmatched %s (inserted %s)
+5 unmatched %s; inserted %s at%s (after %s)
+6 unmatched %s not enclosed in anything
+7 %s %s appended at end of file to match %s at%s
+8 %s replaced by %s %s to match %s at%s
+9 %s %s replaced by %s %s to match %s at%s
+10 cross reference database file name %s is too long
+11 syntax error in cross reference database
+12 error in cross reference database
+13 error in cross reference database
+14 exiting now
+15 %s expected after %s
+16 %s or %s tag not allowed here
+17 invalid parameter of %s
+18 symbol %s occurs in two %s clauses
+19 invalid parameter of %s
+20 symbol %s unknown or misspelt
+21 too many errors (%s lines missing or out of order?)
+22 unexpected end of input
+23 %s replaced by %s
+24 unknown or misspelt symbol %s after %s deleted
+25 symbol expected after %s
+26 %s symbol out of place
+27 symbol expected following %s
+28 %s clause(s) changed from previous run
+29 symbol expected following %s
+30 %s must follow named parameter %s
+31 named parameter %s of %s appears twice
+32 %s out of place here (%s has no right parameter)
+33 right parameter of %s must be enclosed in braces
+34 body parameter of %s must be enclosed in braces
+35 invalid left parameter of %s
+36 right parameter of %s must be enclosed in braces
+37 error in cross reference database
+38 compulsory option %s missing from %s
+39 exiting now
+40 right parameter of %s or %s must be enclosed in braces
+$set 7
+1 %s: maximum paragraph length (%d) exceeded
+1 %s: maximum paragraph length (%d) exceeded
+$set 8
+1 word is too long
+2 word is too long
+3 replacing invalid scale factor by 1.0
+4 replacing invalid scale factor %s by 1.0
+5 replacing undersized scale factor %s by 1.0
+6 replacing oversized scale factor %s by 1.0
+7 %s deleted (right parameter is malformed)
+8 %s expected here
+9 error in left parameter of %s
+10 error in left parameter of %s
+11 replacing unknown %s option %s by %s
+12 %s deleted (choice %s unknown)
+13 left parameter of %s is not a cross reference
+14 left parameter of %s must be a symbol
+15 symbol %s not allowed here (it has no %s)
+16 %s, %s or %s expected in left parameter of %s
+17 right parameter of %s must be a simple word
+18 symbol %s used outside %s
+19 filter parameter of %s symbol is not simple
+20 maximum depth of symbol expansion (%d) reached
+21 the symbols currently being expanded are:
+22 at %d: %d %s %s
+23 exiting now
+24 word %s%s is too long
+25 missing %s symbol or option
+26 replacing invalid left parameter of %s by 2i
+27 replacing invalid left parameter of %s by +0i
+28 replacing invalid left parameter of %s by 0d
+29 %s not expected here
+30 %s dropped (parameter is not a simple word)
+31 %s dropped (no current font at this point)
+32 %s dropped (character %s unknown in font %s)
+33 no current language at this point, using %s
+34 object dropped by %s: no suitable insert point
+35 invalid left parameter of %s
+36 invalid left parameter of %s
+37 %s deleted (invalid right parameter)
+38 no current font at this point, using %s
+39 %s ignored: no choices in right parameter
+40 maximum depth of symbol expansion (%d) reached
+41 this %s is not a sequence of one or more words
+$set 9
+1 symbol with import list misused
+2 no value for parameter %s of symbol %s:
+$set 10
+1 run out of memory enlarging crossref table
+2 automatically generated tag %s&%d is too long
+3 automatically generated tag %s.%s.%d is too long
+4 value of right parameter of %s is not a simple word
+5 value of right parameter of %s is an empty word
+6 symbol %s used in cross reference has no %s parameter
+7 automatically generated tag %s_%d is too long
+8 symbol %s used in cross reference has no %s parameter
+9 unresolved cross reference %s%s%s
+10 %s parameter is not a word
+11 %s parameter is an empty word
+12 no %s precedes this %s%s%s
+13 no %s precedes this %s%s%s
+14 tag of %s is not a simple word
+15 tag of %s is not a simple word
+16 no %s follows this %s%s%s
+17 and more undefined %s%s%s
+18 no %s follows or precedes this %s%s%s
+19 no %s follows this %s%s%s
+20 and more undefined %s%s%s
+21 no %s precedes or follows this %s%s%s
+$set 11
+1 unknown option to %s symbol (%s)
+2 spacing %s is not compatible with current spacing
+3 invalid left parameter of %s
+4 invalid left parameter of %s
+5 unknown option to %s symbol (%s)
+6 line spacing %s is not compatible with current spacing
+7 invalid left parameter of %s
+8 invalid left parameter of %s
+9 this unit not allowed with %s symbol
+10 this unit not allowed with %s symbol
+$set 12
+1 forced to enlarge %s from %s to %s
+2 word %s%s is too long
+3 ^ deleted (it may not precede this object)
+4 gap replaced by 0i (%c unit not allowed here)
+5 %s deleted (cannot open file %s)
+6 %s given zero size (no BoundingBox line in file %s)
+7 %s deleted (bad first line in file %s)
+8 %s given zero size (bad BoundingBox line in file %s)
+9 mark alignment incompatible with centring or right justification
+10 %s deleted (not in column)
+11 %s symbol out of place
+12 %s deleted (not in row)
+13 search for gap preceding %s failed, using zero
+14 %s deleted (out of place)
+15 %s replaced by empty object (out of place)
+$set 13
+1 failed to break column to fit into its available space
+2 reducing column gaps to 0i (object is too wide)
+3 %s object scaled horizontally by factor %.2f (too wide)
+4 %s deleted (too wide; cannot break %s)
+5 word %s scaled horizontally by factor %.2f (too wide)
+6 word %s deleted (too wide)
+7 %s scaled horizontally by factor %.2f (too wide)
+8 %s deleted (too wide)
+9 column mark of unbroken paragraph moved left
+10 column mark of paragraph moved left before breaking
+11 replacing with empty object: negative size constraint %s,%s,%s
+$set 14
+6 paragraph deleted (assigned width %s is too narrow)
+7 hyphen or nohyphen option missing
+$set 16
+2 size constraint %s,%s,%s broken by %s,%s
+3 %s of size %s,%s broken by %s,%s
+4 size adjustment of %s not implemented
+4 size adjustment of %s not implemented
+4 size adjustment of %s not implemented
+5 cannot recover from earlier errors
+$set 17
+1 gap is not a simple word
+2 width missing from %s
+3 %s, %s and %s must be enclosed in double quotes
+4 units letter missing from %s
+5 %.1fr too large (1.0r substituted)
+7 unknown gap mode in %s
+8 invalid width or gap %s
+9 replacing self-contradictory gap %s by breakable version
+10 cannot continue after previous error(s)
+$set 18
+1 cannot attach galley %s
+2 galley nested too deeply (max is %d)
+3 galley %s deleted (insufficient width at target)
+4 right parameter of %s is vertically constrained
+$set 19
+1 galley %s deleted from here (no target)
+2 receptive symbol %s has unconstrained width
+3 too little horizontal space for galley %s at %s
+4 %s object too high for %s space; %s inserted
+5 %s object too wide for %s space; %s inserted
+6 %s object too high for %s space; %s inserted
+7 %s object too wide for %s space; %s inserted
+8 %s object too high for %s space; %s inserted
+9 %s object too wide for %s space; %s inserted
+10 %s object too high for %s space; %s inserted
+11 %s object too wide for %s space; %s inserted
+$set 20
+1 error in database file %s
+2 error in database file %s
+3 component too wide for available space
+$set 21
+1 galley %s must have just one column mark
+2 %s with unspecified scale factor in horizontal galley
+3 replacing infinite scale factor (unconstrained width) by 1.0
+4 replacing infinite scale factor (zero width object) by 1.0
+5 replacing very large scale factor (over 100) by 1.0
+6 object deleted (scale factor is zero)
+7 object deleted (scale factor is smaller than 0.01)
+8 %s replaced by %s (mark not shared)
+9 %s replaced by %s (infinite scale factor)
+10 %s replaced by %s (zero scale factor)
+11 %s replaced by %s (insufficient space)
+12 unexpected absence of %s from the body of %s
+13 %s,%s object too wide for available space
+$set 22
+1 FindSplit: missing galley component
+2 FindSplitInGalley failed
+3 galley %s must have a single column mark
+4 galley %s deleted (never attached)
+5 forcing galley after input point
+6 target of %s is not a cross reference
+7 left parameter of %s is not a symbol
+8 replacing %s%s? by %s%s%s
+9 replacing %s%s%s by %s%s%s
+$set 23
+1 object deleted (it cannot be scaled vertically)
+2 object deleted (it cannot be scaled horizontally)
+3 word %s horizontally scaled by factor %.2f (too wide for %s paragraph)
+4 %s object horizontally scaled by factor %.2f (too wide for %s paragraph)
+5 oversize object has size 0 or less
+6 word %s deleted (too wide for %s paragraph)
+7 %s object deleted (too wide for %s paragraph)
+$set 24
+1 cannot open %s file %s
+2 %s file %s is empty
+3 %s file %s lacks PostScript BeginResource comment
+4 truncating -EPS document at end of first page
+5 rotations, graphics etc. too deeply nested (max is %d)
+6 error in left parameter of %s
+7 error in left parameter of %s
+8 PrintGraphicInclude: cannot include EPSF in a PDF file. File ignored.
+9 ignoring LanguageLevel comment in %s file %s
+10 ignoring Extensions comment in %s file %s
+11 word %s deleted (internal error, off page at %d,%d)
+12 left parameter of %s must be a simple word
+13 left parameter of %s must be a non-empty word
+14 fill %s deleted (internal error, off page at %d,%d)
+$set 26
+1 AppendString abort
+$set 27
+1 unknown debug flag %s
+$set 28
+1 -e argument appears twice in command line
+2 cannot open error file %s
+3 too many levels of error messages
+4   %6s internal error: %s\n
+5   %6s fatal error: %s\n
+6 too many error messages
+7 %s internal error: %s\n
+8 %s fatal error: %s\n
+$set 29
+1   scope[%2d] = %s
+2 scope depth limit exceeded
+3 invalid symbol name %s
+4 %s must be a local definition
+5 a body parameter may not be named %s
+6 the right parameter of a galley may not be called %s
+7 symbol %s previously defined at%s
+8 full name of symbol is too long
+9 full name of symbol is too long
+10 symbol %s has missing %s
+11 symbol %s has erroneous code %c (database out of date?)
+12 symbol name %s previously defined at%s
+13 symbol %s previously defined here
+14 %s must lie within a symbol with a right parameter
+$set 31
+1 exiting now (run out of memory)
+$set 32
+1 word %s is too long
+$set 33
+1 run out of memory enlarging dbcheck table
+2 database file name %s%s is too long
+3 cannot write to database file %s
+4 cross reference %s&&%s used previously, at%s
+5 cross reference %s&&%s used previously
+6 syntax error in database file %s
+7 %s found in database but not declared in %s line
+8 database symbol %s has no tag
+9 database symbol tag is not a simple word
+10 database symbol tag is an empty word
+11 %s or end of file expected here
+12 cannot open database file %s
+13 undefined symbol in database file %s (line %d)
+$set 35
+1 unable to obtain the current time
+$set 36
+1 in hyphenation file %s, unknown escape sequence (line %d)
+2 in hyphenation file %s, line %d: character (octal %o) is not in any class
+3 DoTriePrint: findrep failed
+4 run out of memory while constructing hyphenation table
+5 hyphenation trie node limit exceeded
+6 hyphenation class of %c may not be changed
+7 hyphenation string %s already inserted
+8 cannot open hyphenation file %s
+9 header line of hyphenation file %s missing
+10 Classes heading of hyphenation file %s missing
+11 hyphenation file %s%s is too large (at line %d)
+12 hyphenation file %s%s is too large (at line %d)
+13 format error in hyphenation file %s
+14 cannot write to hyphenation file %s
+15 cannot open hyphenation file %s
+16 run out of memory while reading hyphenation table
+17 error on read from packed hyphenation file %s
+18 bad magic number in hyphenation file %s
+19 no current language for word %s
+20 bad LengthLimit in hyphenation file %s%s (line %d)
+$set 37
+1 font definition does not contain a sequence of words
+2 font definition contains a non-word
+3 font definition does not contain exactly four words
+4 font %s %s already defined at%s
+5 expecting either Recode or NoRecode here
+6 too many different fonts and sizes (maximum is %d)
+7 run out of memory when increasing font table size
+8 cannot open font file %s
+9 font file %s does not begin with StartFontMetrics
+10 run out of memory while reading font file %s
+11 run out of memory while reading font file %s
+12 run out of memory while reading font file %s
+13 UnderlinePosition found twice in font file (line %d)
+14 UnderlineThickness found twice in font file (line %d)
+15 XHeight found twice in font file (line %d)
+16 FontName found twice in font file %s (line %d)
+17 FontName empty in font file %s (line %d)
+18 FontName in font file (%s) and fontdef (%s) disagree
+19 FontName missing in file %s
+20 ignoring unencoded ligature character %s in font file %s (line %d)
+21 too many ligature characters in font file %s (line %d)
+22 WX missing in font file %s (line %d)
+23 B missing in font file %s (line %d)
+24 syntax error on StartKernPairs line in font file %s (line %d)
+25 syntax error in font file %s (line %d): %s
+26 unencoded kern character %s in font file %s (line %d)
+27 unencoded kern character %s in font file %s (line %d)
+28 non-contiguous kerning pair %s %s in font file %s (line %d)
+29 too many kerning pairs in font file %s (line %d)
+30 kerning pair %s %s appears twice in font file %s (line %d)
+31 font %s %s has no glyph for character %s
+32 EndFontMetrics missing from font file %s
+33 error in left parameter of %s
+34 error in left parameter of %s
+35 error in left parameter of %s
+36 initial font must have family, face and size
+37 font family %s not defined
+38 there are no fonts
+39 font family name %s must be accompanied by a face name
+40 font face name %s not defined in font family %s
+41 no current font on which to base size change %s
+42 FontChange: %d
+43 %s %s ignored (result is not positive)
+44 too many different fonts and sizes (max is %d)
+45 run out of memory when increasing font table size
+46 run out of memory when changing font or font size
+47 run out of memory when changing font or font size
+48 no current font at word %s
+49 no current colour at word %s
+50 no current language at word %s
+51 accent dropped from character %s (it has no glyph in font %s)
+52 character %s replaced by space (it has no glyph in font %s)
+53 no current font at this point
+54 no current font at this point
+55 family and face names %s %s are too long
+56 syntax error in font size %s; ignoring it
+$set 38
+1 too many character mappings
+2 run out of memory when loading character mapping
+3 cannot open character mapping file %s
+4 character code(s) missing in mapping file (line %d)
+5 decimal and octal codes disagree in mapping file (line %d)
+6 code %d too small (min is 1) in mapping file (line %d)
+7 code %d out of order in mapping file (line %d)
+8 code %d repeated in mapping file (line %d)
+9 code %d too large (max is %d) in mapping file (line %d)
+10 unknown mapping name %s in mapping file %s (line %d)
+11 unknown character %s in mapping file %s (line %d)
+$set 40
+1 cannot open temporary filter file %s
+2 safe execution prohibiting command: %s
+3 %s
+4 failure (non-zero status) of filter: %s
+5 cannot read filter temporary file %s
+$set 41
+1 database index file seems to be out of date
+2 syntax error in database file
+3 file name %s%s is too long
+4 cannot append to database file %s
+5 rename(%s, %s) failed
+$set 42
+1 ran out of memory when enlarging colour table
+2 too many colours (maximum is %d)
+3 %s ignored (illegal left parameter)
+4 %s ignored (empty left parameter)
+$set 43
+1 run out of memory enlarging language table
+2 language name %s used twice (first at%s)
+3 hyphenation file name expected here
+4 expected word ending pattern here
+5 empty word ending pattern
+6 %s ignored (illegal left parameter)
+7 %s ignored (unknown language %s)
+$set 44
+1 %s may not have a left or named parameter
+2 %s may not have a body parameter
+3 %s must have a right parameter
+$set 45
+1 run out of memory when reading index file %s
+2 run out of memory when reading index file %s
+3 line too long when reading index file %s
+4 run out of memory when reading index file %s
+5 cannot open index file %s for reading
+6 cannot open index file %s for writing
+$set 46
+1 unable to evaluate %s parameter, assuming value is No
+2 value of %s operator is neither Yes nor No, assuming No
+$set 47
+28 PDFPage_ProcessDocInfoKeyword: no memory for __subject=
+$set 48
+1 PDFObject_New: run out of memory
+2 PDFFile_BeginFontEncoding: run out of memory
+3 PDFFile_BeginFontEncoding: out of memory
+4 PDFFont_NewListEntry: run out of memory
+5 PDFFont_NewListEntry: run out of memory
+6 PDFFont_NewListEntry: run out of memory
+7 PDFFont_NewListEntry: run out of memory
+8 PDFFont_WriteFontResource: a font has no encoding
+9 PDFPage_FlushCompressedBuffer: zlib error occurred
+10 PDFPage_FlushCompressedBuffer: zlib error occurred
+11 PDFPage_FlushRawBuffer: zlib error occurred
+12 PDFPage_FlushRawBuffer: write error occurred
+13 PDFPage_Begin: zlib error occurred
+14 PDFPage_Push: run out of memory
+15 PDFPage_Push: run out of memory
+16 PDFTargetAnnot_New: run out of memory
+17 PDFTargetAnnot_New: run out of memory
+18 PDFSourceAnnot_Write: invalid link dest option
+19 PDFSourceAnnot_New: run out of memory
+20 PDFSourceAnnot_New: run out of memory
+21 PDFPage_GetFloat: unable to evaluate number for Lout graphic keyword processing
+22 PDFPage_ProcessLinkKeyword: empty link-name / URI; ignored.
+24 PDFPage_ProcessLinkKeyword: empty file spec
+25 PDFPage_ProcessLinkKeyword: out of memory
+26 PDFPage_ProcessDocInfoKeyword: no memory for __author=
+27 PDFPage_ProcessDocInfoKeyword: no memory for __title=
+29 PDFPage_ProcessDocInfoKeyword: no memory for __keywords=
+30 PDFPage_EvalExpr: '(' expected
+31 PDFPage_EvalExpr: ',' expected
+32 PDFPage_EvalExpr: ')' expected
+33 PDFPage_EvalExpr: __add, __sub, __mul, __div, or a unit keyword was expected
+34 PDFPage_CollectExpr: expression too long (max. 512 chars)
+35 PDFPage_CollectLink: link too long (max. 512 chars)
+36 PDFPage_WriteGraphic: '(' expected
+37 PDFPage_WriteGraphic: '__' encountered while processing @Graphic
+38 PDFPage_Cleanup: run out of memory
+39 %s
+40 %s
+41 The largest page object is %u bytes long.
+42 cannot find font entry for name %s
diff --git a/locale/old.msgs.de b/locale/old.msgs.de
new file mode 100644
index 0000000..84fa8f4
--- /dev/null
+++ b/locale/old.msgs.de
@@ -0,0 +1,497 @@
+$set 1
+1 Wort ist zu lang
+2 Neu: typ %s
+3 Neu: Länge Null!
+4 assert failed in %s
+5 %s - Debug Schalter nicht implementiert
+6 kann locale nicht initialisieren
+7 Nutzung: -o <Filename>
+8 Nutzung: -c <Filename>
+9 Nutzung: -e <Filename>
+10 Nutzung: -EPS
+11 Nutzung: -D <Verzeichnisname>
+12 Nutzung: -C <Verzeichnisname>
+13 Nutzung: -F <Verzeichnisname>
+14 Nutzung: -H <Verzeichnisname>
+15 Nutzung: -I <Verzeichnisname>
+16 Nutzung: -i <Filename>
+17 zwei -h Schalter illegal
+18 Nutzung: -h <Filename>
+21 Nutzung: lout -%c<Länge><Länge>
+22 lout -%c: Einheit muß c, i, p, or m sein
+23 lout -%c: Einheit muß c, i, p, or m sein
+24 Nutzung: lout [ -i <Filename> ] Files
+25 Standardeingabe zweifach angegeben
+26 unbekannter Komandoschalter %s
+27 kann Ausgabefile %s nicht öffnen
+$set 2
+1 Include-File %s zu tief geschachtelt
+2 Datenbankfile %s zu tief geschachtelt
+3 Beim öffnen des File %s ging der Speicher aus
+4 unerlaubte Macroausführung in Datenbank
+5 Zeile ist zu lang (oder abschließendes Zeilenende vermißt)
+6 Zeichen %c außerhalb einer angeführten Zeichenkette
+7 kann File %s nicht öffnen
+8 unbekannter Filetyp
+9 Rekursion im Macro
+10 %s erwartet (nach %s)
+11 Name eines Include-File wird hier erwartet
+12 unbeendete Zeichenkette
+13 unbeendete Zeichenkette
+14 überspringe Null-Zeichen in Zeichenkette
+15 LexGetToken: Fehler in angeführter Zeichenkette
+16 LexGetToken: bad chtbl[]
+17 Zeile ist zu lang (oder abschließendes Zeilenende vermißt)
+18 Filterparameter im Macro
+19 Fileende beim Lesen von Filterparametern erreicht
+20 erwarte hier %s (nach %s)
+21 erwarte hier Filename
+22 kann Include-File %s nicht öffnen
+23 %s in Filterparameter nicht implementiert
+24 LexScanFilter: bad chtbl[]
+25 Zeile ist zu lang (oder abschließendes Zeilenende vermißt)
+$set 3
+1 Beim Erweitern der Filetabelle ging der Speicher aus
+2 zu viele Files (Maximum ist %d)
+3 Datenbank File %s wo Source-File erwartet wird
+4 Datenbank Index-File %s wo Source-File erwartet wird
+5 Filename %s%s ist zu lang
+6 Filename %s%s ist zu lang
+7 Fileposition %s... is zu lang zum ausgeben
+8 Fileposition %s... is zu lang zum ausgeben
+9 File
+10 von
+11 Zeile
+12 Files %s und %s existieren beide
+13 Filepfadname %s/%s ist zu lang
+14 Files %s und %s%s existieren beide
+$set 4
+1 EchoCatOp: %d
+2 EchoToken: %s
+$set 5
+1 erwarte hier Font-Familiennamen
+2 erwarte hier Font-Familiennamen
+3 erwarte hier Anfang %s des fontdef
+4 erwarte hier Anfang %s des langdef
+5 in Deklaration %s linke geschweifte Klammer erwartet
+6 erwarte hier Name des %s File
+7 erwarte hier Symbolnamen oder %s (%s Deklaration)
+8 Symbolnamen vermißt in  %s Deklaration
+9 erwarte hier Namen des %s File
+10 Symbol %s unbekannt or falsch buchstabiert
+11 Symbol %s in Macro nicht erlaubt
+12 unerwartees Ende der Eingabe
+13 %s hier nicht erwartet
+14 ungepaartes %s in Macro
+15 ungepaartes %s in Macro
+16 Symbol %s unbekannt oder falsch buchstabiert
+17 Symbolname erwartet nach %s
+18 %s %s paart sich nicht mit %s %s
+19 ungepaartes %s in Macro
+20 %s muß benanntem Parameter folgen %s
+21 rechter Parameter von %s muß mit %s beginnen
+22 ReadTokenList: %s
+23 %s ignoriert (Name vermißt)
+24 %s ignoriert (Anfang %s vermißt)
+25 Import-Name hier erwartet
+26 Import %s nicht im Scope
+27 %s Symbolname hier erwartet
+28 erweitertes Symbol %s nicht im Scope
+29 Schlüsselwort %s oder %s hier erwartet
+30 Schlüsselwort %s hier erwartet
+31 ignoriere Exportliste des Macro
+32 Symbolname hier erwartet
+33 %s hier erwartet
+34 %s hier erwartet
+35 Präzedenz ist zu gering (%d ersetzt)
+36 Präzedenz ist zu hoch (%d ersetzt)
+37 Assoziativität geändert zu %s
+38 kann Parameternamen %s nicht finden
+39 kann Parameternamen %s nicht finden
+40 öffnende linke geschweifte Klammer oder @Begin von %s erwartet
+41 exportiertes Symbol %s ist nicht definiert in %s
+42 Körperparameter %s kann nicht exportiert werden
+43 Symbol %s zweifach exportiert
+44 unbekanntes oder falsch buchstabiertes Symbol %s
+$set 6
+1 Ausdruck ist zu tief geschachtelt
+2 Ausdruck ist zu tief geschachtelt
+3 linker Parameter von %s ist kein Symbol (oder nicht sichtbar)
+4 ungepaartes %s (%s eingefügt)
+5 reduziere: ungepaartes %s
+6 ungepaartes %s; %s bei %s eingefügt (nach %s)
+7 ungepaartes %s in gar nichts eingeschlossen
+8 reduziere: ungepaartes %s
+9 reduziere: ungepaartes %s
+10 %s %s angefügt am Fileende um %s bei %s zu paaren
+11 %s ersetzt durch %s %s um %s bei %s zu paaren
+12 %s %s ersetzt durch %s %s um %s bei %s
+13 reduziere: %s
+14 Kreuzreferenz Datenbank-Filename %s ist zu lang
+15 Syntaxfehler in Kreuzreferenz Datenbank
+16 Fehler in Kreuzreferenz Datenbank
+17 Fehler in Kreuzreferenz Datenbank
+18 beende nun
+19 %s erwartet nach %s
+20 Symbol %s erscheint in zwei %s Klauseln
+21 ungültiger Parameter von %s
+22 Symbol %s unbekannt oder falsch buchstabiert
+23 unerwartes Ende der Eingabe
+24 %s ersetzt durch %s
+25 unbekanntes oder fasch buchstabiertes Symbol %s nach %s entfernt
+26 Symbol erwartet nach %s
+27 %s Symbol deplaziert
+28 %s folgend Symbol erwartet
+29 %s Klausel(n) verändert seit vorherigem Lauf
+30 %s folgend Symbol erwartet
+31 %s muß benanntem Parameter %s folgen
+32 benannter Parameter %s von %s erscheint doppelt
+33 %s hier deplaziert (%s hat keinen rechten Parameter)
+34 rechter Parameter von %s muß in geschweifte Klammern eingeschlossen sein
+35 Körperparameter von %s muß in geschweifte Klammern eingeschlossen sein
+36 ungültiger linker Parameter von %s
+37 rechter Parameter von %s muß in geschweifte Klammern eingeschlossen sein
+38 Parse: %s
+$set 7
+1 CopyObject: %s
+$set 8
+1 Wort ist zu lang
+2 Wort ist zu lang
+3 ersetze ungültigen Skalierungsfaktor durch 1.0
+4 ersetze ungültigen Skalierungsfaktor %s durch 1.0
+5 ersetze zu kleinen Skalierungsfaktor %s durch 1.0
+6 ersetze zu großen Skalierungsfaktor %s durch 1.0
+7 %s entfernt (rechter Parameter ist schlecht)
+8 erwarte %s hier
+9 Fehler in linkem Parameter von %s
+10 Fehler in linkem Parameter von %s
+11 ersetze unbekannten %s Schalter %s durch %s
+12 %s gelöscht (Auswahl %s unbekannt)
+13 linker Parameter von %s ist keine Kreuzreferenz
+14 linker Parameter von %s muß ein Symbol sein
+15 Symbol %s hier nicht erlaubt (es hat kein %s)
+16 %s oder %s im linken Parameter von %s erwartet
+17 rechter Parameter von %s muß ein einfaches Wort sein
+18 maximale Tiefe der Symbolerweiterung (%d) erreicht
+19 die momentan erweiterten Symbole sind:
+20 bei %d: %s
+21 beende nun
+22 Symbol %s außerhalb von %s benutzt
+23 Filterparameter des %s Symbol ist nicht einfach
+24 Word %s%s ist zu lang
+25 vermisse %s Symbol oder Schalter
+26 ersetze ungültigen linken Parameter von %s durch 2i
+27 ersetze ungültigen linken Parameter von %s durch +0i
+28 ersetze ungültigen linken Parameter von %s durch 0d
+29 %s hier nicht erwartet
+30 %s ausgelassen (Parameter ist kein einfaches Wort)
+31 %s ausgelassen (Kein aktueller Font an dieser Stelle)
+32 %s ausgelassen (Zeichen %s unbekannt in Font %s)
+33 keine aktuelle Sprache an dieser Stelle, benutze %s
+34 ungültiger linker Parameter von %s
+35 %s geslöscht (ungültiger rechter Parameter)
+36 Manifest: %s
+$set 9
+1 Symbol mit Importliste mißbraucht
+$set 10
+1 Beim Erweitern der Kreuzreferenztabelle ging der Speicher aus.
+2 automatisch generierte Marke %s&%d ist zu lang
+3 automatisch generierte Marke %s.%s.%d ist zu lang
+5 Wert des rechten Parameters von %s ist kein einfaches Wort
+6 Wert des rechten Parameters von %s ist ein leeres Wort
+7 in Kreuzreferenz benutzes Symbol %s hat keinen %s Parameter
+8 automatisch generierte Marke %s_%d ist zu lang
+9 %s oder %s Marke hier nicht erlaubt
+10 in Kreuzreferenz benutzes Symbol %s hat keinen %s Parameter
+11 CrossExpand: %d
+12 nicht aufgelößte Kreuzreferenz %s%s%s
+13 %s Parameter ist kein Wort
+14 %s Parameter ist ein leeres Wort
+15 es kommt kein %s vor diesem %s%s%s
+16 es kommt kein %s vor diesem %s%s%s
+17 Marke von %s ist kein einfaches Wort
+18 Marke von %s ist kein einfaches Wort
+19 CrossSequence: %s
+20 es folgt kein %s nach diesem %s%s%s
+21 und mehr undefiniert %s%s%s
+$set 11
+1 ungültiger Parameter von %s
+2 abstellen %s ist mit momentanem Abstellen nicht kompatibel
+3 unbekannter Schalter zu %s Symbol (%s)
+4 Zeilenabstellen %s ist mit momentanem Abstellen nicht kompatibel
+5 ungültiger linker Parameter von %s
+6 ungültiger linker Parameter von %s
+$set 12
+1 MinSize: %s
+2 gezwungen %s zu vergrößern
+3 ^ gelöscht (es darf diesem Objekt nicht voranstehen)
+4 Lücke ersetzt durch 0i (Einheit %c hier nicht erlaubt)
+5 %s gelöscht (kann File %s nicht öffnen)
+6 %s bekam Null-Größe (keine BoundingBox Zeile im File %s)
+7 %s gelöscht (erste Zeile im File %s falsch)
+8 %s bekam Null-Größe (falsche BoundingBox-Zeile im File %s)
+9 MinSize: %s
+10 MinSize: back(x, dim) < 0!
+11 MinSize: fwd(x, dim) < 0!
+$set 13
+1 reduziere Spaltenabstand auf 0i (Objekt ist zu weit)
+2 BreakTable: %d
+3 BreakTable: %d
+4 %s gelöscht (zu weit; kann %s nicht umbrechen)
+5 Wort %s gelöscht (zu weit)
+6 %s %s reduziert (zu weit)
+7 %s oder %s gelöscht (zu weit)
+8 Spaltenmarke des nicht umgebrochenen Abschnitts nach links bewegt
+9 Spaltenmarke des Abschnitts vor Umbruch nach links bewegt
+10 BreakObject: %s
+$set 14
+1 %s Objekt gelöscht (zu weit für %s Paragraph)
+2 %s Objekt gelöscht (zu weit für %s Paragraph)
+3 übergroßes Objekt hat Größe Null oder weniger
+4 %s Objekt gelöscht (zu weit für %s Paragraph)
+5 Paragraph gelöscht (zugewiesene Weite %s ist zu schmal)
+6 hyphen oder nohyphen Option vermißt
+7 FillObject: %d
+$set 15
+1 Beschränkt: %s
+2 DebugBeschränkt: %s
+$set 16
+1 FindShift: %s", INTERN,&fpos(x),"units
+2 FindShift: %s", INTERN, &fpos(x),"type
+3 maximale Größe %s überschritten
+4 Größenbeschränkung %s,%s,%s gebrochen durch %s,%s
+5 AdjustSize: %s
+$set 17
+1 Lücke ist kein einfaches Wort
+2 vermisse Weite von %s
+3 %s, %s und %s muß in doppelte Anführungszeichen eingeschlossen sein
+4 vermisse Einheits-Buchstabe von %s
+5 %.1fr zu groß (1.0r substituiert)
+6 Länge %s ist zu groß (Maximum %dc substituiert)
+7 unbekannter Lücken Modus in %s
+8 ungültige Weite oder Lücke in %s
+9 MinGap: units %d
+10 MinGap: NO_MODE
+11 MinGap: mode %d
+12 ExtraGap: NO_MODE
+13 ExtraGap: %d
+14 ActualGap: units %d
+15 ActualGap: NO_MODE
+16 ActualGap: mode %d
+17 EchoGap: %d
+$set 18
+1 kann Galley %s nicht anhängen
+2 Galley zu tief geschachtelt (max ist %d)
+3 Galley %s gelöscht (unzureichende Weite am Ziel)
+4 rechter Parameter von %s ist vertikal begrenzt
+$set 19
+1 Galley %s von hier gelöscht (kein Ziel)
+2 rezeptives Symbol %s hat unbegrenzte Weite
+3 zu wenig horizontaler Platz für Galley %s bei %s
+4 diese Komponente von %s paßte nicht in nächstes Ziel
+5 diese Komponente von %s paßte nicht in nächstes Ziel
+6 AttachGalley: %s
+7 %s Objekt zu groß für %s Platz; %s eingefügt
+$set 20
+1 DebugInnersNames: %s
+2 FlushGalley: attach_status %d
+3 FlushGalley: dest_index %s
+4 FlushGalley: %s
+5 Fehler in Datenbank-File %s
+$set 21
+1 Galley %s darf nur eine Spaltenmarke haben
+2 ersetze unendlichen Skalierungsfaktor (unbegrenzte Weite) durch 1.0
+3 ersetze unendlichen Skalierungsfaktor (Null-weites Objekt) durch 1.0
+4 ersetze sehr großen Skalierungsfaktor (über 100) durch 1.0
+5 Objekt gelöscht (Skalierungsfaktor ist Null)
+6 Objekt gelöscht (Skalierungsfaktor ist kleiner als 0.01)
+7 SizeGalley: %s
+8 %s fehlt unerwarteter Weise im Körper von %s
+$set 22
+1 FlushInners: %s
+2 FindSplit: missing galley component
+3 FindSplitInGalley failed
+4 FindSplitInGalley: %s
+5 Galley %s muß eine einzige Spaltenmarke haben
+6 Galley %s gelöscht (niemals angehängt)
+7 unterstütze: %s
+8 KillGalley: head
+9 zwinge Galley an Eingabepunkt
+10 Ziel von %s ist keine Kreuzreferenz
+11 linker Parameter von %s ist kein Symbol
+12 ersetze %s%s? durch %s%s%s
+13 TargetSymbol: vermisse Ziel von x
+$set 23
+1 Objekt gelöscht (es kann nicht vertikal skaliert werden)
+2 Objekt gelöscht (es kann nicht horizontal skaliert werden)
+3 FixAndPrintObject: %s
+$set 24
+1 kann %s File %s nicht öffnen
+2 %s File %s ist leer
+3 %s File %s hat keinen PostScript BeginResource Komentar
+4 schneide -EPS Dokument am Ende der ersten Seite ab
+5 Fehler im linken Parameter von %s
+6 Fehler im linken Parameter von %s
+7 ignoriere LanguageLevel Komentar in %s File %s
+8 ignoriere Extensions Kommentar in %s File %s
+$set 25
+1 echo: %s
+2 echo: %s
+3 echo: %s
+$set 26
+1 BeginZeichenkette: momentan in Zeichenkette
+2 AppendZeichenkette: keine aktuelle Zeichenkette
+3 AppendZeichenkette Abbruch
+4 EndZeichenkette: keine Zeichenkette
+$set 27
+1 unbekanntes Debug Flag %s
+2 ProFileOn: %s nochmals gestartet
+3 ProFileOn: Überlauf
+4 ProFileOff: %s ist nicht aktuell
+5 ProFileOff: Überlauf
+$set 28
+1 -e Argument erscheint zweifach in der Komandozeile
+2 kann Fehler-File %s nicht öffnen
+3 zu viele Ebenen von Fehlermeldungen
+4   %6s interner Fehler: %s\n
+5   %6s schlimmer Fehler: %s\n
+6 zu viele Fehlermeldungen
+7 ungültiger Fehlertyp
+$set 29
+1   Scope[%2d] = %s
+2 Scopetiefenlimit überschritten
+3 ungültiger Symbolname %s
+4 %s muß eine lokale Definition sein
+5 ein Körperparameter kann nicht %s benannt werden
+6 der rechte Parameter eines Galley darf nicht %s genannt werden
+7 Symbol %s bereits definiert bei %s
+8 voller Symbolname ist zu lang
+9 voller Symbolname ist zu lang
+10 in Symbol %s wird %s vermißt
+11 DeleteSymBody: %s
+$set 31
+1 beende nun (es ging der Speicher aus)
+$set 32
+1 Wort %s ist zu lang
+2 Nächstes: %s
+$set 33
+1 beim Vergrößern der dbcheck-Tabelle ging der Speicher aus
+2 Dbcheck: Eintrag zweifach eingetragen
+3 NumToSym: no sym
+4 einfügen in gelesene Datenbank
+5 Datenbank Filename %s%s ist zu lang
+6 kann nicht auf Datenbankfile %s schreiben
+7 Kreuzreferenz %s&&%s bereits benutzt bei %s
+8 Kreuzreferenz %s&&%s bereits benutzt
+9 DbConvert: lese Datenbank
+10 Syntaxfehler in Datenbankfile %s
+11 %s in Datenbank gefunden aber nicht in Zeile %s deklariert
+12 Datenbanksymbol %s hat keine Marke
+13 Marke des Datenbanksymbol ist kein einfaches Wort
+14 Marke des Datenbanksymbol ist ein leeres Wort
+15 erwarte hier %s oder Ende des File
+16 kann Datenbankfile %s nicht öffnen
+17 undefiniertes Symbol in Datenbankfile %s (Zeile %d)
+18 DbRetrieveNext: writing
+$set 35
+1 unable to obtain the current time
+$set 36
+1 in Trennungsfile: '%c' ist in keiner Klasse
+2 DoTriePrint: findrep failed
+3 beim Aufbauen der Trenntabelle ging der Speicher aus
+4 hyphenation trie Zeichenkette Limit überschritten
+5 hyphenation trie Knotenlimit überschritten
+6 Trennungsklasse von %c kann nicht geändert werden
+7 Trennungszeichenkette %s bereits vorhanden
+8 kann Trennungsfile %s nicht öffnen
+9 vermisse Kopfzeile des Trennungsfile %s
+10 vermisse Klassenkopf des Trennungsfile %s
+11 TrieRead: %d
+12 Formatfehler in Trennungsfile %s
+13 kann Trennugsfile %s nicht schreiben
+14 kann Trennungsfile %s nich öffnen
+15 beim lesen des Trennungsfiles ging der Speicher aus
+16 Fehler beim Lesen des gepackten Trennungsfiles %s
+17 Falsche magische Nummer im Trennungsfile %s
+18 keine aktuelle Sprache für Wort %s
+$set 37
+1 Fontdefinition enthält keine Folge von Worten
+2 Fontdefinition enthält ein Nicht-Wort
+3 Fontdefinition enthält nicht exakt vier Wörter
+4 Font %s %s bereits definiert bei%s
+5 erwate hier entweder Recode oder NoRecode
+6 zu viele verschiedene Fonts und Größen (Maximum ist %d)
+7 beim Vergrößern der Fonttabelle ging der Speicher aus
+8 kann Fontfile %s nicht öffnen
+9 Fontfile %s beginnt nicht mit StartFontMetrics
+10 beim Lesen des Fontfile %s ging der Speicher aus
+11 beim Lesen des Fontfile %s ging der Speicher aus
+12 beim Lesen des Fontfile %s ging der Speicher aus
+13 XHeight im Fontfile zweifach gefunden (Zeile %d)
+14 FontName im Fontfile %s zweifach gefunden %s (Zeile %d)
+15 FontName Fontfile %s (Zeile %d) leer
+16 FontName im Fontfile (%s) und fontdef (%s) stimmen nicht überein
+17 vermisse FontName im File %s
+18 ignoriere nicht kodierte Ligatur %s in Fontfile %s (Zeile %d)
+19 zu viele Ligaturen in Fontfile %s (Zeile %d)
+20 vermisse WX im Fontfile %s (Zeile %d)
+21 vermisse B im Fontfile %s (Zeile %d)
+22 Syntaxfehler an StartKernPairs Zeile im Fontfile %s (Zeile %d)
+23 Syntaxfehler im Fontfile %s (Zeile %d): %s
+24 nicht kodiertes Kernzeichen %s im Fontfile %s (Zeile %d)
+25 nicht kodiertes Kernzeichen %s im Fontfile %s (Zeile %d)
+26 nicht anschließendes Kerning Paar %s %s im Fontfile  %s (Zeile %d)
+27 zu viele Kerning Paare im Fontfile %s (Zeile %d)
+28 Kerning Paar %s %s erscheint zweifach im Fontfile  %s (Zeile %d)
+29 vermisse EndFontMetrics im Fontfile %s
+30 Fehler im linken Parameter von %s
+31 Fehler im linken Parameter von %s
+32 Anfangsfont muß Familie, Schnitt und Größe haben
+33 Fontfamilie %s nicht definiert
+34 es existieren keine Fonts
+35 Fontfamilienname %s muß von Schnittnamen begleidet werden
+36 Fontschnittname %s in Fontfamilie %s nicht definiert
+37 kein aktueller Font an dem Basisgröße %s geändert werden könnte
+38 FontChange: %d
+39 %s %s ignoriert (Ergebnis nicht positiv)
+40 zu viele verschiedene Fonts und Größen (maximal %d)
+41 beim Vergrößern der Fonttabelle ging der Speicher aus
+42 beim Ändern des Font oder der Fontgröße ging der Speicher aus
+43 beim Ändern des Font oder der Fontgröße ging der Speicher aus
+44 kein aktueller Font beim Wort %s
+45 keine aktuelle Farbe beim Wort %s
+46 keine aktuelle Sprache beim Wort %s
+47 Zeichen %s ausgelassen (es hat keinen Glyph im Font %s)
+48 kein aktueller Font an diesem Punkt
+49 Familien- und Schnittnamen %s %s sind zu lang
+$set 38
+1 zu viele Kodierungsvektoren
+2 beim Laden des Kodierungsvektors ging der Speicher aus
+3 kann Kodierungsvektorfile %s nicht öffnen
+4 zu viele Zeichennamen im Kodierungsvektorfile %s
+5 zu wenige Zeichennamen im Kodierungsvektorfile %s 
+$set 40
+1 kann temporäres Filterfile %s nicht öffnen
+2 %s
+3 Versagen (Nicht-Null-Status) des Filter: %s
+4 kann temporäres Filterfile %s nicht lesen
+$set 41
+1 Datenbankindexfile scheint veraltet zu sein
+2 Syntaxfehler im Datenbankfile
+3 WriteClosure: %s
+4 WriteObject: %s
+5 Filename %s%s ist zu lang
+6 kann nicht an Datenbankfile %s anhängen
+7 Link(%s, %s) versagt
+8 unlink(%s) versagt
+$set 42
+1 beim Vergrößern der Farbtabelle ging der Speicher aus
+2 zu viele Farben (Maximum ist %d)
+3 %s ignoriert (ungültiger linker Parameter)
+4 %s ignoriert (leerer linker Parameter)
+$set 43
+1 beim Vergrößern der Sprachtabelle ging der Speicher aus
+2 Sprachname %s doppelt benutzt (zuerst bei %s)
+3 erwarte hier Trennungsfilenamen
+4 %s ignoriert (ungültiger linker Parameter)
+5 %s ignoriert (unbekannte Sprache %s)
diff --git a/locale/old.msgs.fr b/locale/old.msgs.fr
new file mode 100644
index 0000000..05e40c0
--- /dev/null
+++ b/locale/old.msgs.fr
@@ -0,0 +1,503 @@
+$set 1
+1 mot trop long
+2 Noveau: type %s
+3 Nouveau: longueur nulle!
+4 assertion échoue dans %s
+5 %s - drapeaux de déboguage non implantés
+7 usage: -o <fichier>
+8 usage: -c <fichier>
+9 usage: -e <filename>
+10 usage: -EPS
+11 usage: -D <répertoire>
+12 usage: -C <répertoire>
+13 usage: -F <répertoire>
+14 usage: -H <répertoire>
+15 usage: -I <répertoire>
+16 usage: -i <fichier>
+17 interdit: deux options -h
+18 usage: -h <fichier>
+19 répertoire d'inclusion système: %s
+20 répertoire des bases de données système: %s
+21 usage: lout -%c<longueur><longueur>
+22 lout -%c: unité doit être c, i, p ou m
+23 lout -%c: unité doit être c, i, p ou m
+24 usage: lout [ -i <fichier> ] fichiers...
+25 entrée standard spécifiée deux fois
+26 option de ligne de commande inconnue %s
+27 impossible d'ouvrir le fichier de sortie %s
+$set 2
+1 fichier inclus %s trop imbriqué
+2 fichier de base de données %s trop imbriqué
+3 manque de mémoire en ouvrant le fichier %s
+4 appel de macro interdit dans base de données
+5 ligne trop longue (ou sans fin de ligne)
+6 caractère %c en dehors d'une chaine entre guillemets
+7 impossible d'ouvrir le fichier %s
+8 type de fichier inconnu
+9 macro récursive
+10 %s attendu (après %s)
+11 nom de fichier à inclure attendu ici
+12 chaîne non terminée
+13 chaîne non terminée
+14 caractère nul ignoré dans chaîne
+15 LexGetToken: erreur dans chaîne entre guillemets
+16 LexGetToken: mauvais chtbl[]
+17 ligne trop longue  (ou sans fin de ligne)
+18 paramètre de filtre dans macro
+19 fin de fichier en lisant paramètre de filtre
+20 %s attendu ici (après %s)
+21 nom de fichier attendu ici
+22 impossible d'ouvrir le fichier inclus %s
+23 %s dans paramètre de filtre non implémenté
+24 LexScanFilter: mauvais chtbl[]
+25 ligne trop longue  (ou sans fin de ligne)
+$set 3
+1 manque de mémoire en agrandissant la table des fichiers
+2 trop de fichiers (maximum=%d)
+3 fichier de base de données %s quand un fichier source est attendu
+4 fichier d'index de base de données %s quand un fichier source est attendu
+5 nom de fichier %s%s trop long
+6 nom de fichier %s%s trop long
+7 position de fichier %s... trop longue à imprimer
+8 position de fichier %s... trop longue à imprimer
+9 fichier
+10 depuis
+11 ligne
+12 les fichiers %s et %s existent tous les deux
+13 chemin de fichier %s/%s trop long
+14 les fichiers %s et %s%s existent tous les deux
+$set 4
+1 EchoCatOp: %d
+2 EchoToken: %s
+$set 5
+1 nom de famille de police attendu ici
+2 nom de genre de police attendu ici
+3 ouverture %s de def.police (fontdef) attendue ici
+4 ouverture %s de def.langage (langdef) attendue ici
+5 accolade ouvrante attendue ici dans declaration %s
+6 nom de fichier %s attendu ici
+7 nom de symbol ou %s attendu ici (déclaration de %s)
+8 noms de symbole manquants dans déclaration %s
+9 nom de fichier %s attendu ici
+10 symbole %s inconnu ou mal epelé
+11 symbole %s interdit dans macro
+12 fin de fichier inattendue
+13 %s inattendu ici
+14 %s non apparié dans macro
+15 %s non apparié dans macro
+16 symbole %s inconnu ou mal epelé
+17 nom de symbole attendu après %s
+18 %s %s ne s'apparie pas avec %s %s
+19 %s non apparié dans macro
+20 %s doit suivre paramètre nommé %s
+21 paramètre droit de %s doit commencer par %s
+22 ReadTokenList: %s
+23 %s ignoré (nom manquant)
+24 %s ignoré (%s ouvrant manquant)
+25 nom d'importation attendu ici
+26 importation %s hors de portée
+27 %s nom de symbole attendu ici
+28 extension de symbole %s hors de portée
+29 mot clé %s ou %s attendu ici
+30 mot clé %s attendu ici
+31 liste d'exportation de macro ignorée
+32 nom de symbole attendu ici
+33 %s attendu ici
+34 %s attendu ici
+35 précédence trop petite (remplacée par %d)
+36 précédence trop grande (remplacée par %d)
+37 associativité changée en %s
+38 impossible de trouver nom de paramètre %s
+39 impossible de trouver nom de paramètre %s
+40 accolade ouvrante ou @Begin de %s attendu
+41 symbole exporté %s n'est pas défini dans %s
+42 paramètre de corps %s ne peut pas être exporté
+43 symbole %s exporté deux fois
+44 symbole %s inconnu ou mal epellé 
+$set 6
+1 expression trop fortement imbriquée
+2 expression trop fortement imbriquée
+3 paramètre gauche de %s n'est pas un symbole (ou n'est pas visible)
+4 %s non apparié (%s est inseré)
+5 Reduce: %s non apparié
+6 %s non apparié; %s est inseré en %s (après %s)
+7 %s non apparié n'est contenu dans rien
+8 Reduce: %s non apparié
+9 Reduce: %s non apparié
+10 %s %s ajouté en fin de fichier pour apparier %s en %s
+11 %s remplacé par %s %s pour apparier %s en %s
+12 %s %s remplacé par %s %s pour apparier %s en %s
+13 Reduce: %s
+14 le nom %s de fichier base de donnée de reférences croisées est trop long
+15 erreur de syntaxe dans fichier base de donnée de reférences croisées
+16 erreur dans fichier base de donnée de reférences croisées
+17 erreur dans fichier base de donnée de reférences croisées
+18 arrêt immédiat
+19 %s attendu après %s
+20 le symbole %s apparait dans deux clauses %s
+21 paramètre incorrect de %s
+22 symbole %s inconnu ou mal epelé
+23 fin de fichier inattendue
+24 %s remplacé par %s
+25 symbole inconnu ou mal epelé %s après %s supprimé
+26 symbole attendu après %s
+27 symbole %s mal placé
+28 symbole attendu à la suite de %s
+29 les clause(s) %s changée(s) depuis l'exécution précédentes
+30 symbole attendu à la suite de %s
+31 %s doit suivre paramètre nommé %s
+32 paramètre nommé %s de %s apparait deux fois
+33 %s mal placé ici (%s n'a pas de paramètre droit)
+34 paramètre droit de %s doit être entre accolades
+35 paramètre corps de %s doit être entre accolades
+36 paramètre gauche de %s incorrect
+37 paramètre droit de %s doit être entre accolades
+38 Parse: %s
+$set 7
+1 CopyObject: %s
+$set 8
+1 mot trop long
+2 mot trop long
+3 facteur d'echelle incorrect remplacé par 1.0
+4 facteur d'echelle incorrect %s remplacé par 1.0
+5 facteur d'echelle trop petit %s remplacé par 1.0
+6 facteur d'echelle trop grand %s remplacé par 1.0
+7 %s supprimé (paramètre droit mal construit)
+8 %s attendu ici
+9 erreur dans paramètre gauche de %s
+10 erreur dans paramètre gauche de %s
+11 remplace option inconnue %s de %s par %s
+12 %s supprimé (choix %s inconnu)
+13 paramètre gauche de %s n'est pas une référence croisée
+14 paramètre gauche de %s doit être un symbole
+15 symbole %s interdit ici (il n'a pas de %s)
+16 %s ou %s attendu dans paramètre gauche de %s
+17 paramètre droit de %s doit être un mot simple
+18 profondeur maximale (%d) d'expansion de symbole atteinte
+19 les symboles actuellement expansés sont:
+20 en %d: %s
+21 arrêt immédiat
+22 symbole %s utilisé en dehors de %s
+23 paramètre de filtre du symbole %s n'est pas simple
+24 mot %s%s trop long
+25 symbole %s manquant ou option
+26 paramètre gauche incorrect de %s remplacé par 2i
+27 paramètre gauche incorrect de %s remplacé par +0i
+28 paramètre gauche incorrect de %s remplacé par 0d
+29 %s inattendu ici
+30 %s abandonné (paramètre n'est pas un mot simple)
+31 %s abandonné (pas de police courante en ce point)
+32 %s abandonné (caractère %s inconnu dans la police %s)
+33 pas de langue courante en ce point,  %s utilisé
+34 paramètre gauche incorrect de %s
+35 %s supprimé (paramètre droit incorrect)
+36 Manifest: %s
+$set 9
+1 mauvaise utilisation de symbole avec list d'importation
+$set 10
+1 manque de mémoire pour agrandir table de références croisées
+2 étiquette %s&%d générée automatiquement trop longue
+3 étiquette %s.%s.%d générée automatiquement trop longue
+4 paramètre gauche de %s n'est pas un symbole
+5 la valeur de paramètre droit de %s n'est pas un mot simple
+6 la valeur du paramètre droit de %s est un mot vide
+7 symbole %s utilisé en référence croisé n'a pas de paramètre %s
+8 étiquette %s_%d générée automatiquement trop longue
+9 %s ou étiquette %s interdit ici
+10 symbole %s utilisé en référence croisée n'a pas de paramètre %s
+11 CrossExpand: %d
+12 référence croisée non résolue %s%s%s
+13 paramètre %s n'est pas un mot 
+14 paramètre %s est un mot vide
+15 aucun %s ne précède ce %s%s%s
+16 aucun %s ne précède ce %s%s%s
+17 étiquette de %s n'est pas un mot simple
+18 étiquette de %s n'est pas un mot simple
+19 CrossSequence: %s
+20 aucun %s ne suit ce %s%s%S
+21 et d'autre %s%s%s indéfinis
+$set 11
+1 paramètre gauche de %s incorrect
+2 espacement %s incompatible avec espacement courant
+3 option inconnue du symbole %s (%s)
+4 interligne %s incompatible avec interligne courant
+5 paramètre gauche de %s incorrect
+6 paramètre gauche de %s incorrect
+$set 12
+1 MinSize: %s
+2 obligé d'agrandir %s
+3 ^ supprimé (il ne peut précéder cet objet)
+4 espacement remplacé par 0i (unité %c interdite ici)
+5 %s supprimé (ne peut ouvrir fichier %s)
+6 %s prend une taille nulle (pas de ligne BoundingBox  dans fichier %s)
+7 %s supprimé (mauvaise première ligne dans fichier %s)
+8 %s prend une taille nulle (pas de ligne BoundingBox  dans fichier %s)
+9 MinSize: %s
+10 MinSize: back(x, dim) < 0!
+11 MinSize: fwd(x, dim) < 0!
+$set 13
+1 espace entre colonne réduit à 0i (objet trop large)
+2 BreakTable: %d
+3 BreakTable: %d
+4 %s supprimé (trop large; ne peut césurer %s)
+5 mot %s supprimé (trop large)
+6 %s %s réduit (trop large)
+7 %s ou %s supprimé (trop large)
+8 marque de colonne de paragraphe incassable bougée à gauche
+9 marque de colonne de paragraphe bougée à gauche avant césure
+10 BreakObject: %s
+10 BreakObject: %s
+$set 14
+1 objet %s supprimé (trop large pour un paragraphe de %s)
+2 objet %s supprimé (trop large pour un paragraphe de %s)
+3 objet surdimensionné a une taille négative ou nulle
+4 objet %s supprimé (trop large pour un paragraphe de %s)
+5 paragraphe supprimé (largeur affectée %s trop étroite)
+6 option avec ou sans césure manquante
+7 FillObject: %d
+$set 15
+1 Constrained: %s
+2 DebugConstrained: %s
+$set 16
+1 FindShift: %s
+2 FindShift: %s
+3 taille maximale %s dépassée
+4 contrainte de taille %s,%s,%s violée par %s,%s
+5 AdjustSize: %s
+5 AdjustSize: %s
+$set 17
+1 espacement n'est pas un mot simple
+2 largeur manquante de %s
+3 %s, %s et %s doivent être entre guillemets
+4 lettre d'unité manquante dans %s
+{4 units letter missing from %s
+{5 %.1fr too large (1.0r substituted)
+5 %.1fr trop grand (remplacé par 1.Or)
+6 longueur %s trop grande (remplacée par le maximum %dc)
+7 mode d'espacement inconnu dans %s
+8 largeur ou espacement %s incorrect
+9 MinGap: units %d
+10 MinGap: NO_MODE
+11 MinGap: mode %d
+12 ExtraGap: NO_MODE
+13 ExtraGap: %d
+14 ActualGap: unités %d
+15 ActualGap: NO_MODE
+16 ActualGap: mode %d
+17 EchoGap: %d
+$set 18
+1 ne peut attacher une galée
+2 galée trop imbriquée (maximum %d)
+3 galée %s supprimée (largeur insuffisante à la cible)
+4 paramètre droit de %s contraint verticalement
+$set 19
+1 galée %s supprimée ici (sans cible)
+2 symbole réceptif %s a une largeur incontrainte
+3 espacement horizontal trop petit pour galée %s en %s
+4 ce composant de %s ne rentre pas dans sa plus proche cible
+5 ce composant de %s ne rentre pas dans sa plus proche cible 
+6 AttachGalley: %s
+7 objet de %s trop haut pour un espace de %s %s inseré
+$set 20
+1 DebugInnersNames: %s
+2 FlushGalley: attach_status %d
+3 FlushGalley: dest_index %s
+4 FlushGalley: %s
+5 erreur dans fichier de base de donnée %s
+$set 21
+1 galée %s doit avoir une seule marque de colonne
+2 remplace facteur d'echelle par 1.0 et non infinie (%s a une largeur incontrainte)
+3 remplace facteur d'echelle par 1.0 et non infinie (%s a une largeur nulle)
+4 remplace facteur d'echelle trop grand (> 100) par 1.0
+5 objet supprimé (facteur d'echelle nul)
+6 objet supprimé (facteur d'echelle <0.01)
+7 SizeGalley: %s
+8 absence inattendue de %s dans le corps de %s
+$set 22
+1 FlushInners: %s
+2 FindSplit: composant de galée manquant
+3 FindSplitInGalley échoue
+4 FindSplitInGalley: %s
+5 galée %s doit avoir une seule marque de colonne
+6 galée %s supprimée (n'a jamais été attachée)
+7 Promote: %s
+7 Promote: %s
+8 KillGalley: head
+9 galée forcée après point d'entrée
+10 la cible de %s n'est pas une référence croisée
+11 paramètre gauche de %s n'est pas un symbole
+12 remplace %s%s? par %s%s%s
+13 TargetSymbol: cible manquante de x
+$set 23
+1 objet supprimé (ne peut être mis à l'echelle verticalement)
+2 objet supprimé (ne peut être mis à l'echelle horizontalement)
+3 FixAndPrintObject: %s
+$set 24
+1 impossible d'ouvrir %s fichier %s
+2 %s fichier %s est vide
+3 %s fichier %s sans commentaire PostScript BeginResource
+4 document -EPS tronqué en fin de première page
+5 erreur dans paramètre gauche de %s
+6 erreur dans paramètre gauche de %s
+7 commentaire LanguageLevel ignoré dans %s fichier %s
+8 commentaire Extensions ignoré dans %s fichier %s
+$set 25
+1 echo: %s
+2 echo: %s
+3 echo: %s
+$set 26
+1 BeginString: actuellement dans chaîne
+2 AppendString: pas de chaîne courante
+3 AppendString avorte
+4 EndString: pas de chaîne
+$set 27
+1 drapeau de déboguage %s inconnu
+2 ProfileOn: %s redémarré
+3 ProfileOn: débordement
+4 ProfileOff: %s n'est pas courant
+5 ProfileOff: débordement
+$set 28
+1 argument -e apparaît deux fois dans ligne de commande
+2 impossible d'ouvrir le fichier d'erreur %s
+3 trop de niveaux de message d'erreur
+4   %6s erreur interne: %s\n
+5   %6s erreur fatale: %s\n
+6 trop de messages d'erreur
+7 type d'erreur incorrect
+$set 29
+1   scope[%2d] = %s
+2 profondeur de portée - limite dépassée
+3 nom de symbole %s incorrect
+4 %s doit être une définition locale
+5 un paramètre de corps ne peut être nommé %s
+6 le paramètre droit d'une galée ne peut être nommé %s
+7 symbole %s déjà défini en %s
+8 le nom complet du symbole est trop long
+9 le nom complet du symbole est trop long
+10 symbole %s manque de %s
+11 DeleteSymBody: %s
+$set 31
+1 arrêt immédiat (manque de mémoire)
+$set 32
+1 mot %s trop long
+2 Next: %s
+$set 33
+1 manque de mémoire en agrandissant table dbcheck
+2 Dbcheck: entrée insérée deux fois
+3 NumToSym: pas de symbole
+4 inseré dans base de donnée en cours de lecture
+5 fichier de base de donnée a un nom %s%s trop long
+6 ne peut écrire dans fichier de base de donnée %s
+7 référence croisée %s&%s déjà utilisée, en %s
+8 référence croisée %s&%s déjà utilisée
+9 DbConvert: lecture de la base de donnée
+10 erreur de syntaxe dans fichier de base de donnée %s
+11 %s trouvé dans base de donnée mais non déclaré dans ligne %s
+12 symbole %s de base de donnée sans étiquette
+13 l'étiquette du symbole %s de base de donnée n'est pas un mot simple
+14 l'étiquette du symbole %s de base de donnée est un mot vide
+15 %s ou fin de fichier attendu ici
+16 impossible d'ouvrir fichier de base de donnée %s
+17 symbole indéfini dans fichier de base de donnée %s (ligne %d)
+18 DbRetrieveNext: écriture
+$set 35
+1 impossible d'obtenir le temps à l'horloge 
+$set 36
+1 dans fichier de césure: '%c' n'est dans aucune classe
+2 DoTriePrint: findrep échoue
+3 manque de mémoire en construisant la table de césure
+4 chaine de trie de césure - limite dépassée
+5 noeud de trie de césure - limite dépassée
+6 classe de césure de %c ne peut être modifiée
+7 chaîne de césure %s déjà insérée
+8 impossible d'ouvrir le fichier de césure %s
+9 ligne d'entête de fichier de césure %s manquante
+10 entête des classes de fichier de césure %s manquante
+11 TrieRead: %d
+12 erreur de format dans fichier de césure %s
+13 ne peut écrire dans fichier de césure %s
+14 impossible d'ouvrir le fichier de césure %s
+15 manque de mémoire en lisant la table de césure
+16 erreur en lecture du fichier de césure comprimé %s
+17 mauvais nombre magique dans fichier de césure %s
+18 pas de langage courant pour le mot %s
+$set 37
+1 définition de police ne contient pas une suite de mot
+2 définition de police contient un non-mot
+3 définition de police ne contient pas exactement quatre mots
+4 police %s %s déjà définie en %s
+5 Recode ou NoRecode attendu ici
+6 trop de polices et tailles différentes (maximum=%d)
+7 manque de mémoire en agrandissant la table des polices
+8 impossible d'ouvrir fichier de police %s
+9 fichier de police %s ne commence pas par StartFontMetrics
+10 manque de mémoire en lisant fichier de police %s
+11 manque de mémoire en lisant fichier de police %s
+12 manque de mémoire en lisant fichier de police %s
+13 XHeight apparait deux fois dans fichier de police (ligne %d)
+14 FontName apparait deux fois dans fichier de police %s (ligne %d)
+15 FontName vide dans fichier de police %s (ligne %d)
+16 FontName dans fichier de police %s ne correspond pas à fontdef (%s)
+17 FontName manque dans fichier de police %s
+18 caractère non codé de ligature %s ignoré dans fichier de police %s (ligne %d)
+19 trop de caractère de ligature dans fichier de police %s (ligne %d)
+20 WX manquant dans fichier de police %s (ligne %d)
+21 B manquant dans fichier de police %s (ligne %d)
+22 erreur de syntaxe dans StartKernPairs dans fichier de police %s (ligne %d)
+23 erreur de syntaxe  dans fichier de police %s (ligne %d): %s
+24 caractère de crénage non codé %s dans fichier de police %s (ligne %d)
+25 caractère de crénage non codé %s dans fichier de police %s (ligne %d)
+26 paire de crénage non contigüe %s %s dans fichier de police %s (ligne %d)
+27 trop de paires de crénage dans fichier de police %s (ligne %d)
+28 paire de crénage en double %s %s dans fichier de police %s (ligne %d)
+29 EndFontMetrics manquant dans fichier de police %s 
+30 erreur dans paramètre gauche de %s
+31 erreur dans paramètre gauche de %s
+32 police initiale doit avoir une famille, un genre et une taille
+33 famille de police %s indéfinie
+34 il n'y a pas de polices
+35 nom de famille de police %s doit être accompagné par un nom de genre
+36 nom de genre de police %s indéfini dans famille de police %s
+37 pas de police courant sur laquelle fonder le changement de taille %s
+38 FontChange: %d
+39 %S %S ignoré (résultat non positif)
+40 trop de polices et tailles différentes (max= %d)
+41 manque de mémoire en agrandissant table de taille de police
+42 manque de mémoire en changant de police ou de taille
+43 manque de mémoire en changant de police ou de taille
+44 pas de police courant sur le mot %s
+45 pas de couleur courante sur le mot %s
+46 pas de langage courant sur le mot %s
+47 caractère %s omis (sans graphie dans police %s)
+48 pas de police courante en ce point
+49 noms de famille et de genre de police %s %s trop longs
+$set 38
+1 trop de vecteur d'encodage
+2 manque de mémoire en chargeant les vecteurs d'encodage
+3 impossible d'ouvrir le fichier de vecteur d'encodage %s
+4 trop de noms de caractère dans le fichier de vecteur d'encodage %s
+5 trop peu de noms de caractère dans le fichier de vecteur d'encodage %s
+$set 40
+1 impossible d'ouvrir le fichier temporaire de filtre %s
+2 %s
+3 filtre échoue (status non nul): %s
+4 impossible de lire le fichier temporaire de filtre %s
+$set 41
+1 erreur de syntaxe (%s manquant) dans fichier de base de données
+2 erreur de syntaxe dans fichier de base de données
+3 WriteClosure: %s
+4 WriteObject: %s
+5 nom de fichier %s%s trop long
+6 impossible d'ajouter au fichier de base de donnée %s
+7 appel système link(%s, %s) échoue
+8 appel système unlink(%s) échoue
+$set 42
+1 manque de mémoire en agrandissant la table des couleurs
+2 trop de couleurs (max=%d)
+3 %s ignoré (paramètre gauche illégal)
+4 %s ignoré (paramètre gauche vide)
+$set 43
+1 manque de mémoire en agrandissant la table des langages
+2 nom de langage %s utilisé deux fois (la première fois en %s)
+3 nom de fichier de césure attendu ici
+4 %s ignoré (paramètre gauche illégal)
diff --git a/maillist b/maillist
new file mode 100644
index 0000000..19cf5a6
--- /dev/null
+++ b/maillist
@@ -0,0 +1,25 @@
+The Lout mailing list
+
+A public mailing list has been set up for discussion
+of the Lout document formatting system.  Thanks to
+Rodrigo Vanegas of Brown University for starting this
+list, and to Valeriy E. Ushakov for carrying on with
+it.  To subscribe to the list, send mail to
+
+	lout-request@ptc.spbu.ru
+
+containing the word
+
+	subscribe
+
+in the Subject line (it MUST be in the Subject line).
+To unsubscribe, send mail to lout-request@ptc.spbu.ru
+containing the word unsubscribe in the Subject line.
+Wait for one full working day after subscribing before
+expecting to receive any items.
+
+To post an item, send mail to
+
+	lout@ptc.spbu.ru
+
+It will be forwarded by email to all current subscribers.
diff --git a/makefile b/makefile
new file mode 100644
index 0000000..4452fbc
--- /dev/null
+++ b/makefile
@@ -0,0 +1,425 @@
+###############################################################################
+#                                                                             #
+#  Make file for installing Basser Lout Version 3.17                          #
+#                                                                             #
+#  Jeffrey H. Kingston                                                        #
+#  17 September 1999                                                          #
+#                                                                             #
+#     make lout         Compile the Lout source                               #
+#     make c2lout       Compile a small auxiliary program called c2lout       #
+#     make install      Install the Lout and c2lout binaries and libraries    #
+#     make installman   Install the Lout and c2lout manual entries            #
+#     make installdoc   Install the Lout documentation                        #
+#     make installfr    Install French error messages (optional)              #
+#     make installde    Install German error messages (optional)              #
+#     make clean        Remove compilation temporaries                        #
+#     make uninstall    Undo the effect of make install, installman,          #
+#                       installdoc, installfr, and installde                  #
+#     make restart      Undo everything except changes to this makefile,      #
+#                       ready for a fresh start.                              #
+#                                                                             #
+#  Most installations of Lout should require only the following steps.  If    #
+#  something goes wrong, you can start again with "make restart".  Please     #
+#  carry out all the steps, in exactly the order given.  Believe me, it       #
+#  will be much faster than doing it any other way.                           #
+#                                                                             #
+#  (1) Set exactly one of the following macros defined below to 1 and the     #
+#      others all to 0, to indicate the operating system under which the      #
+#      Lout binary is to run.  At present OSUNIX and OSDOS work but OSMAC     #
+#      doesn't work.                                                          #
+#                                                                             #
+#      OSUNIX    Unix in all its flavours, including Linux.                   #
+#      OSDOS     MS-DOS etc. ("rb" and "wb" file access modes where needed)   #
+#      OSMAC     Macintosh                                                    #
+#                                                                             #
+#  (2) This may be the trickiest step of all.  On some systems, for example   #
+#      NT under Visual C++, Lout's use of the system ftell() call causes      #
+#      a problem.  This problem typically manifests itself on the *second*    #
+#      pass over a large document such as the Lout User's Guide: a message    #
+#      such as "error in database file" is printed and Lout aborts.  The      #
+#      precise error may vary but should say something about a problem with   #
+#      a database file.                                                       #
+#                                                                             #
+#      If this problem occurs you can probably fix it by changing the value   #
+#      of DBFIX below to 1.  Many thanks to Valeriy E. Ushakov for this fix.  #
+#                                                                             #
+#         Systems requiring DBFIX = 0      Systems requiring DBFIX = 1        #
+#         -------------------------------------------------------------       #
+#         Unix                             NT/Visual C++                      #
+#         Cygnus gnuwin32 gcc              djgpp                              #
+#                                          Mingw32                            #
+#                                                                             #
+#  (3) Set the USESTAT macro defined below to 1 if the system you are         #
+#      compiling onto has the stat() file status system call.  If you are     #
+#      unsure, or know it doesn't, set USESTAT to 0.  The stat() call,        #
+#      if used, will allow Lout to determine the time of last change          #
+#      of database index files and rebuild them automatically if required.    #
+#                                                                             #
+#  (4) Set the SAFEDFT macro defined below to 1 if you want safe execution    #
+#      (i.e. disabling calls to system()) to be the default behaviour.  You   #
+#      can always specify safe or unsafe execution by means of the -S and     #
+#      -U options to lout when processing a document; SAFEDFT means that      #
+#      -S rather than -U is the default behaviour.  Unsafe execution is       #
+#      required when formatting C programs and verbatim text, so if in        #
+#      doubt, do not change the value of SAFEDFT.                             #
+#                                                                             #
+#  (5) Set the following four macros defined below to appropriate values:     #
+#                                                                             #
+#      BINDIR    Directory where Lout's binary goes.  This directory is       #
+#                assumed to exist.                                            #
+#                                                                             #
+#      LIBDIR    Directory where Lout's libraries go.  This directory will    #
+#                be created (but its parent must exist already).              #
+#                                                                             #
+#      DOCDIR    Directory where the documents describing the Lout system     #
+#                (written in Lout) go.  This directory will be created (but   #
+#                its parent must exist already).                              #
+#                                                                             #
+#      MANDIR    Directory where the lout and c2lout online manual entries    #
+#                (in nroff -man) go.  This directory is assumed to exist.     #
+#                                                                             #
+#  (6) Set the following two macros defined below to appropriate values.      #
+#      I strongly recommend CHARIN=1 and CHAROUT=0 for all sites (English     #
+#      and non-English language).  This way we get a truly international      #
+#      standard in which everyone has access to accented characters, yet      #
+#      Lout's output is in the strict 7-bit ASCII that is recommended in      #
+#      the PostScript manual.                                                 #
+#                                                                             #
+#      CHARIN    This macro determines the assignment of characters in Lout   #
+#                source files to character classes by the lexical analyser.   #
+#                That is, it determines which characters are letters, which   #
+#                is the comment character, etc.  Supported values are:        #
+#                                                                             #
+#                0  For English language only ASCII installations             #
+#                                                                             #
+#                1  For installations using the ISO-LATIN-1 character set     #
+#                   (adds accented letters to the LETTER character class)     #
+#                                                                             #
+#                Lout will accept any 8-bit character except '\0'; CHARIN     #
+#                does not determine the acceptability of any character, just  #
+#                its class.                                                   #
+#                                                                             #
+#      CHAROUT   This macro determines the format of strings of literal       #
+#                characters in the PostScript output.  Currently supported    #
+#                values are:                                                  #
+#                                                                             #
+#                0  Every output character will be printable ASCII            #
+#                                                                             #
+#                1  Every output character will be printable ISO-LATIN-1      #
+#                                                                             #
+#                The output will be valid PostScript irrespective of the      #
+#                value given to CHAROUT, which may be set independently of    #
+#                CHARIN.  It just determines which characters are printed     #
+#                as \ddd escape sequences and which are printed as one-byte   #
+#                literal characters.                                          #
+#                                                                             #
+#  (7) Set macro USELOC to one of the following values, NOT TO A LOCALE.      #
+#                                                                             #
+#      0         Lout's error messages will always appear in English, and no  #
+#                source code related to locales will be executed (although    #
+#                file <locale.h> will be read for collation stuff).           #
+#                                                                             #
+#      1         Lout's error messages may appear in languages other than     #
+#                English, depending on the current locale.  The Lout source   #
+#                will be compiled including <locale.h>, <nl_types.h>, and     #
+#                calls to setlocale(), catopen(), catgets(), and catclose()   #
+#                                                                             #
+#      If you choose to set USELOC to 1, you now need to set one or more of   #
+#      these macros:                                                          #
+#                                                                             #
+#      LOC_FR    If you want French language error messages, set this macro   #
+#                to your French locale name, i.e. to the value that you       #
+#                expect setlocale(LC_MESSAGES, "") to return when you want    #
+#                to get French language error messages                        #
+#                                                                             #
+#      LOC_DE    If you want German language error messages, set this macro   #
+#                to your German locale name, i.e. to the value that you       #
+#                expect setlocale(LC_MESSAGES, "") to return when you want    #
+#                to get German language error messages                        #
+#                                                                             #
+#      For error messages in other languages, consult ./locale/README.        #
+#                                                                             #
+#  (8) Set macro COLLATE to either 0 or 1.  If you set it to 1, Lout will     #
+#      use the strcoll() routine by default when sorting alphabetically       #
+#      (e.g. when sorting indexes), otherwise Lout will sort by default       #
+#      based on the ISO codes of the characters.  This defaul setting may     #
+#      be changed during individual runs of Lout by the -l and -L flags.      #
+#                                                                             #
+#  (9) Execute "make c2lout".  This will compile the c2lout program, leaving  #
+#      its binary in this directory.  No changes to other directories.        #
+#                                                                             #
+# (10) If you want to be able to produce compressed PDF files, as opposed to  #
+#      uncompressed ones, you need to:                                        #
+#                                                                             #
+#      (a) obtain the zlib compression library from                           #
+#          <http://www.cdrom.com/pub/infozip/zlib/>.                          #
+#                                                                             #
+#      (b) decompress the zlib source files using gunzip and/or tar and       #
+#          then build the library by issuing the "make zlib.a" command        #
+#          whilst in the zlib directory. If you want to test the library,     #
+#          you should use the "make test" command (which also builds the      #
+#          library).                                                          #
+#                                                                             #
+#      (c) set the PDF_COMPRESSION variable below to 1                        #
+#                                                                             #
+#      (d) set the ZLIB variable to the path of the libz.a file. For example: #
+#          ZLIB = /usr/cs3/vtan/lout/lout.3.11/zlib-1.1.1/libz.a              #
+#                                                                             #
+#      (e) set the ZLIBPATH variable to the path of the zlib directory with   #
+#          -I in front. For example:                                          #
+#          ZLIBPATH = -I/usr/cs3/vtan/lout/lout.3.11/zlib-1.1.1/              #
+#                                                                             #
+#      If you don't want zlib support or cannot obtain it or cannot use it,   #
+#      leave the PDF_COMPRESSION, ZLIB, and ZLIBPATH variables as they are.   #
+#                                                                             #
+# (11) Execute "make lout".  This will compile the Lout source, leaving the   #
+#      binary in this directory.  No changes are made in other directories.   #
+#                                                                             #
+# (12) This makefile assumes that Lout is not installed on your system        #
+#      already.  If you do have an earlier version of Lout installed,         #
+#      the simplest way to get rid of it is to type "make uninstall" now.     #
+#      Of course, this is assuming that the old version was installed in the  #
+#      same directories as where you are about to install the new version.    #
+#                                                                             #
+# (13) Execute "make install".  This will do the following things:            #
+#                                                                             #
+#      (a) It will copy the lout and c2lout binaries into $(BINDIR);          #
+#                                                                             #
+#      (b) It will create $(LIBDIR) and copy all the library files into it;   #
+#                                                                             #
+#      (c) It will perform an initializing "lout -x" run.  This run will      #
+#          do the following checks and initializations:                       #
+#                                                                             #
+#          (i)   It will read all the font files mentioned in file            #
+#                $(LIBDIR)/include/fontdefs and check that they               #
+#                exist and are in the correct format;                         #
+#                                                                             #
+#          (ii)  It will read all the hyphenation (.lh) files mentioned       #
+#                in file $(LIBDIR)/include/langdefs, check them, and build    #
+#                the packed (.lp) versions;                                   #
+#                                                                             #
+#          (iii) It will read and check the three standard database           #
+#                (.ld) files in directory $(LIBDIR)/data, and build           #
+#                the corresponding database index (.li) files.                #
+#                                                                             #
+#      (d) It will change the mode of the files created in (c) to be          #
+#          publicly readable, just in case they weren't created that way.     #
+#                                                                             #
+#      It is good to build the various files during installation because      #
+#      later runs will not have write permission in the library directories.  #
+#                                                                             #
+# (14) Execute "make installman".  This installs the manual entries for       #
+#      lout and c2lout into directory $(MANDIR), which is assumed to exist.   #
+#      These entries are troff files; plain text versions are also available  #
+#      in directory ./man if you need them (install them yourself).           #
+#                                                                             #
+# (15) Execute "make installdoc".  This creates directory $(DOCDIR) and       #
+#      copies the Lout documentation into it.                                 #
+#                                                                             #
+# (16) If you want French error messages, execute "make installfr" now.       #
+#      If you want German error messages, execute "make installde" now.       #
+#      These commands compile the error messages files into packed forms      #
+#      using the gencat command, and store them in $(LIBDIR)/locale.          #
+#                                                                             #
+# (17) Execute "make clean".  This cleans up this directory.                  #
+#                                                                             #
+# (18) If the usual size of a piece of paper at your site is not A4, you      #
+#      might like to now change the default value of the @PageType option     #
+#      on line 57 of file $(LIBDIR)/include/dsf.  You can find the list of    #
+#      known page types in the User's Guide, and also at line 615 in file     #
+#      $(LIBDIR)/include/dsf.                                                 #
+#                                                                             #
+# (19) If the usual language at your site is not English, you might like to   #
+#      now change the default value of the @InitialLanguage option on line    #
+#      255 of file $(LIBDIR)/include/bsf.  This will mean that by default     #
+#      the date and words like Chapter and July will appear in a different    #
+#      language, and hyphenation will be carried out according to patterns    #
+#      designed for that language.  You can find the list of known languages  #
+#      in the User's Guide, or in file $(LIBDIR)/include/langdefs; if yours   #
+#      is not on the list, let me know and we can work together to add it.    #
+#      This has nothing to do with locales and USELOC.                        #
+#                                                                             #
+#  Mail jeff@cs.usyd.edu.au if you have any problems.                         #
+#                                                                             #
+###############################################################################
+
+OSUNIX  = 1
+OSDOS   = 0
+OSMAC   = 0
+
+DBFIX   = 0
+
+USESTAT = 1
+SAFEDFT = 0
+
+COLLATE	= 1
+
+BINDIR	= /usr/staff/jeff/bin
+LIBDIR	= /usr/staff/jeff/lout.lib
+DOCDIR	= /usr/staff/jeff/lout.doc
+MANDIR	= /usr/staff/jeff/lout.man
+
+LIBFONT = font
+LIBMAPS = maps
+LIBINCL = include
+LIBDATA = data
+LIBHYPH = hyph
+LIBLOCA = locale
+
+CHARIN	= 1
+CHAROUT	= 0
+
+USELOC	= 1
+LOC_FR	= fr
+LOC_DE	= de
+
+PDF_COMPRESSION	= 0
+ZLIB		=
+ZLIBPATH	=
+
+CC	= gcc
+
+RCOPY	= cp -r
+
+COPTS	= -ansi -pedantic -Wall
+
+CFLAGS	= -DOS_UNIX=$(OSUNIX)					\
+	  -DOS_DOS=$(OSDOS)					\
+	  -DOS_MAC=$(OSMAC)					\
+	  -DDB_FIX=$(DBFIX)					\
+	  -DUSE_STAT=$(USESTAT)					\
+	  -DSAFE_DFT=$(SAFEDFT)					\
+	  -DCOLLATE=$(COLLATE)					\
+	  -DLIB_DIR=\"$(LIBDIR)\"				\
+	  -DFONT_DIR=\"$(LIBFONT)\"				\
+	  -DMAPS_DIR=\"$(LIBMAPS)\"				\
+	  -DINCL_DIR=\"$(LIBINCL)\"				\
+	  -DDATA_DIR=\"$(LIBDATA)\"				\
+	  -DHYPH_DIR=\"$(LIBHYPH)\"				\
+	  -DLOCALE_DIR=\"$(LIBLOCA)\"				\
+	  -DCHAR_IN=$(CHARIN)					\
+	  -DCHAR_OUT=$(CHAROUT)					\
+	  -DLOCALE_ON=$(USELOC)					\
+	  -DASSERT_ON=1 $(COPTS)				\
+	  -DDEBUG_ON=1  -g					\
+	  -DPDF_COMPRESSION=$(PDF_COMPRESSION)			\
+	  $(ZLIBPATH)
+
+OBJS	= z01.o z02.o z03.o z04.o z05.o z06.o z07.o z08.o	\
+	  z09.o z10.o z11.o z12.o z13.o z14.o z15.o z16.o	\
+	  z17.o z18.o z19.o z20.o z21.o z22.o z23.o z24.o	\
+	  z25.o z26.o z27.o z28.o z29.o z30.o z31.o z32.o	\
+	  z33.o z34.o z35.o z36.o z37.o z38.o z39.o z40.o	\
+	  z41.o z42.o z43.o z44.o z45.o z46.o z47.o z48.o
+
+lout:	$(OBJS)
+	$(CC) -o lout $(OBJS) $(ZLIB) -lm
+	chmod a+x lout
+
+$(OBJS): externs.h
+
+externs.h:
+
+c2lout:	c2lout.c
+	$(CC) $(COPTS) -o c2lout c2lout.c
+	chmod a+x c2lout
+
+install: lout c2lout
+	@echo ""
+	@echo "(a) Installing lout and c2lout binaries into BINDIR $(BINDIR)"
+	cp lout $(BINDIR)/lout
+	chmod 755 $(BINDIR)/lout
+	cp c2lout $(BINDIR)/c2lout
+	chmod 755 $(BINDIR)/c2lout
+	@echo ""
+	@echo "(b) Installing library files into LIBDIR $(LIBDIR)"
+	mkdir $(LIBDIR)
+	chmod 755 $(LIBDIR)
+	@echo ""
+	mkdir $(LIBDIR)/$(LIBINCL)
+	chmod 755 $(LIBDIR)/$(LIBINCL)
+	cp include/* $(LIBDIR)/$(LIBINCL)
+	chmod 644 $(LIBDIR)/$(LIBINCL)/*
+	@echo ""
+	mkdir $(LIBDIR)/$(LIBDATA)
+	chmod 755 $(LIBDIR)/$(LIBDATA)
+	cp data/* $(LIBDIR)/$(LIBDATA)
+	chmod 644 $(LIBDIR)/$(LIBDATA)/*
+	@echo ""
+	mkdir $(LIBDIR)/$(LIBHYPH)
+	chmod 755 $(LIBDIR)/$(LIBHYPH)
+	cp hyph/* $(LIBDIR)/$(LIBHYPH)
+	chmod 644 $(LIBDIR)/$(LIBHYPH)/*
+	@echo ""
+	mkdir $(LIBDIR)/$(LIBFONT)
+	chmod 755 $(LIBDIR)/$(LIBFONT)
+	cp font/* $(LIBDIR)/$(LIBFONT)
+	chmod 644 $(LIBDIR)/$(LIBFONT)/*
+	@echo ""
+	mkdir $(LIBDIR)/$(LIBMAPS)
+	chmod 755 $(LIBDIR)/$(LIBMAPS)
+	cp maps/* $(LIBDIR)/$(LIBMAPS)
+	chmod 644 $(LIBDIR)/$(LIBMAPS)/*
+	@echo ""
+	mkdir $(LIBDIR)/$(LIBLOCA)
+	chmod 755 $(LIBDIR)/$(LIBLOCA)
+	@echo ""
+	@echo "(c) Initializing run (should be silent, no errors expected)"
+	$(BINDIR)/lout -x -s $(LIBDIR)/$(LIBINCL)/init
+	@echo ""
+	@echo "(d) Changing mode of files just created by initializing run"
+	chmod 644 $(LIBDIR)/$(LIBDATA)/*
+	chmod 644 $(LIBDIR)/$(LIBHYPH)/*
+
+installman:
+	@echo ""
+	@echo "Installing manual entries into MANDIR $(MANDIR)"
+	sed -e "s@<BINDIR>@$(BINDIR)@" -e "s@<LIBDIR>@$(LIBDIR)@"	\
+	    -e "s@<DOCDIR>@$(DOCDIR)@" -e "s@<MANDIR>@$(MANDIR)@"	\
+	man/lout.1 > $(MANDIR)/lout.1
+	chmod 644 $(MANDIR)/lout.1
+	cp man/c2lout.1 $(MANDIR)/c2lout.1
+	chmod 644 $(MANDIR)/c2lout.1
+
+installdoc:
+	@echo ""
+	@echo "Creating DOCDIR $(DOCDIR) and copying documentation into it"
+	$(RCOPY) doc $(DOCDIR)
+	chmod 755 $(DOCDIR)
+	chmod 755 $(DOCDIR)/*
+	chmod 644 $(DOCDIR)/*/*
+
+installfr:
+	@echo ""
+	@echo "Putting French error messages into $(LIBDIR)/$(LIBLOCA)/$(LOC_FR)"
+	mkdir $(LIBDIR)/$(LIBLOCA)/$(LOC_FR)
+	chmod 755 $(LIBDIR)/$(LIBLOCA)/$(LOC_FR)
+	mkdir $(LIBDIR)/$(LIBLOCA)/$(LOC_FR)/LC_MESSAGES
+	chmod 755 $(LIBDIR)/$(LIBLOCA)/$(LOC_FR)/LC_MESSAGES
+	cp locale/msgs.fr $(LIBDIR)/$(LIBLOCA)/$(LOC_FR)/LC_MESSAGES/msgs.$(LOC_FR)
+	gencat $(LIBDIR)/$(LIBLOCA)/$(LOC_FR)/LC_MESSAGES/errors.$(LOC_FR)	\
+	       $(LIBDIR)/$(LIBLOCA)/$(LOC_FR)/LC_MESSAGES/msgs.$(LOC_FR)
+	chmod 644 $(LIBDIR)/$(LIBLOCA)/$(LOC_FR)/LC_MESSAGES/*
+
+installde:
+	@echo ""
+	@echo "Putting German error messages into $(LIBDIR)/$(LIBLOCA)/$(LOC_DE)"
+	mkdir $(LIBDIR)/$(LIBLOCA)/$(LOC_DE)
+	chmod 755 $(LIBDIR)/$(LIBLOCA)/$(LOC_DE)
+	mkdir $(LIBDIR)/$(LIBLOCA)/$(LOC_DE)/LC_MESSAGES
+	chmod 755 $(LIBDIR)/$(LIBLOCA)/$(LOC_DE)/LC_MESSAGES
+	cp locale/msgs.de $(LIBDIR)/$(LIBLOCA)/$(LOC_DE)/LC_MESSAGES/msgs.$(LOC_DE)
+	gencat $(LIBDIR)/$(LIBLOCA)/$(LOC_DE)/LC_MESSAGES/errors.$(LOC_DE)	\
+	       $(LIBDIR)/$(LIBLOCA)/$(LOC_DE)/LC_MESSAGES/msgs.$(LOC_DE)
+	chmod 644 $(LIBDIR)/$(LIBLOCA)/$(LOC_DE)/LC_MESSAGES/*
+
+uninstall:
+	-rm -f  $(BINDIR)/lout $(BINDIR)/c2lout
+	-rm -fr $(LIBDIR)
+	-rm -fr $(DOCDIR)
+	-rm -f  $(MANDIR)/lout.1 $(MANDIR)/c2lout.1
+
+clean:	
+	-rm -f lout c2lout *.o
+
+restart:	clean uninstall
diff --git a/man/c2lout.1 b/man/c2lout.1
new file mode 100644
index 0000000..472e530
--- /dev/null
+++ b/man/c2lout.1
@@ -0,0 +1,133 @@
+.TH C2LOUT 1
+.SH NAME
+c2lout - convert C and C++ source code into Lout
+.SH SYNOPSIS
+\fBc2lout\fR [ \fIoptions\fR ] \fIC\(en\&files\fR...
+.SH DESCRIPTION
+Reformat C and C++ source code for input to the Lout document formatting
+system, taking care of comments, character strings, tab characters, etc.
+.LP
+.B c2lout
+reads the named C and C++ files and produces output
+suitable for input to
+.BR "lout -s" .
+Thus,
+.LP
+.RS
+.B "c2lout foo.c | lout -s | lpr"
+.RE
+.LP
+will print
+.B foo.c
+on a PostScript printer.  Each file will start on a new page, preceded
+by its name in bold.
+.SH OPTIONS
+.TP
+.B \-pfixed
+Use a fixed width font (the default).
+.TP
+.B \-pvarying
+Use a varying-width italic font with non-italic bold keywords.
+.TP
+.B \-psymbol
+Use a varying-width italic font with mathematical symbols and
+non-italic bold keywords.
+.TP
+.B \-n
+Do not print the file name before each C or C++ file.
+.TP
+.BI \-f " font"
+Select a font family.
+The default is 
+.B \-fCourier
+for
+.BR \-pfixed ,
+and
+.B \-fTimes
+for
+.B \-pvarying
+and
+.BR \-psymbol .
+.TP
+.BI \-s " size"
+Select a Lout font size.  The default is
+.B -s9p
+(meaning 9 points) for
+.BR \-pfixed ,
+and
+.B \-s10p
+for
+.B \-pvarying
+and
+.BR \-psymbol .
+These work well with 80-character-wide programs.
+.TP
+.BI \-v " vsize"
+Select a Lout vertical inter-line gap.  The default is
+.B -v1.1fx
+meaning 1.1 times the font size measured from baseline to baseline.
+.TP
+.BI \-t " num"
+Set the tab interval to
+.I num
+characters (default is
+.BR \-t8 ).
+.TP
+.BI \-T " width"
+Without this option,
+.B c2lout
+simulates tabs with spaces.  With this option,
+.B c2lout
+simulates tabs with Lout tabulation operators;
+.I width
+is the width of one tab interval in the final print, measured in Lout
+units.  This guarantees alignment of characters following tabs even
+with varying-width fonts, provided
+.I width
+is sufficiently large.  For example,
+.B -T0.5i
+produces half-inch tab intervals.
+.TP
+.B \-u
+Print usage information on stderr and exit.
+.TP
+.B \-V
+Print version information on stderr and exit.
+.SS Raw Mode
+There is a \(lq\&raw mode\(rq usage of
+.B c2lout
+invoked by a
+.B -r
+flag (must be the first argument).  This converts one C file into
+Lout-readable source without any heading or trailing information.
+Synopsis:
+.LP
+.RS
+.B c2lout
+.B  \-r
+.BI \-i \ infile
+.BI \-o \ outfile
+.BI \-e \ errfile
+.BI \-t \ num
+.BI \-T \ width
+.RE    
+.LP
+Users should never need this mode; it is invoked automatically
+from within Lout by the
+.B @CP
+symbol from the
+.B cprint
+package (see reference).
+.SH SEE ALSO
+.BR lout (1),
+.BR lpr (1),
+.BR ghostview (1).
+.SH REFERENCES
+.LP
+Jeffrey H. Kingston, 
+.I
+\(lq\&A User's Guide to the Lout Document Formatting System\(rq\c
+\&, Chapter 11.
+.SH AUTHOR
+.LP
+Jeffrey H. Kingston
diff --git a/man/c2lout.txt b/man/c2lout.txt
new file mode 100644
index 0000000..47349d6
--- /dev/null
+++ b/man/c2lout.txt
@@ -0,0 +1,95 @@
+
+
+
+User Commands                                           C2LOUT(1)
+
+
+
+NAME
+     c2lout - convert C and C++ source code into Lout
+
+SYNOPSIS
+     c2lout [ options ] Cfiles...
+
+DESCRIPTION
+     Reformat C and C++ source code for input to the  Lout  docu-
+     ment  formatting  system, taking care of comments, character
+     strings, tab characters, etc.
+
+     c2lout reads the named C and C++ files and  produces  output
+     suitable for input to lout -s.  Thus,
+
+          c2lout foo.c | lout -s | lpr
+
+     will print foo.c on a PostScript printer.   Each  file  will
+     start on a new page, preceded by its name in bold.
+
+OPTIONS
+     -pfixed
+          Use a fixed width font (the default).
+
+     -pvarying
+          Use a varying-width italic font  with  non-italic  bold
+          keywords.
+
+     -psymbol
+          Use a varying-width italic font with mathematical  sym-
+          bols and non-italic bold keywords.
+
+     -n   Do not print the file name before each C or C++ file.
+
+     -f font
+          Select a font family.  The  default  is  -fCourier  for
+          -pfixed, and -fTimes for -pvarying and -psymbol.
+
+     -s size
+          Select a Lout font size.  The default is -s9p  (meaning
+          9  points)  for  -pfixed,  and  -s10p for -pvarying and
+          -psymbol.  These work well with 80-character-wide  pro-
+          grams.
+
+     -v vsize
+          Select a Lout vertical inter-line gap.  The default  is
+          -v1.1fx  meaning  1.1 times the font size measured from
+          baseline to baseline.
+
+     -t num
+          Set the tab interval  to  num  characters  (default  is
+          -t8).
+
+     -T width
+          Without this option, c2lout simulates tabs with spaces.
+          With this option, c2lout simulates tabs with Lout tabu-
+          lation operators; width is the width of one tab  inter-
+          val  in  the final print, measured in Lout units.  This
+          guarantees alignment of characters following tabs  even
+          with  varying-width  fonts,  provided  width  is suffi-
+          ciently large.  For example, -T0.5i produces  half-inch
+          tab intervals.
+
+     -u   Print usage information on stderr and exit.
+
+     -V   Print version information on stderr and exit.
+
+  Raw Mode
+     There is a raw mode usage of c2lout invoked  by  a  -r  flag
+     (must be the first argument).  This converts one C file into
+     Lout-readable source without any heading or trailing  infor-
+     mation.  Synopsis:
+
+          c2lout  -r  -i infile  -o outfile   -e errfile   -t num
+          -T width
+
+     Users should never need this mode; it is  invoked  automati-
+     cally  from  within  Lout  by the @CP symbol from the cprint
+     package (see reference).
+
+SEE ALSO
+     lout(1), lpr(1), ghostview(1).
+
+REFERENCES
+     Jeffrey H. Kingston, A User's Guide  to  the  Lout  Document
+     Formatting System, Chapter 11.
+
+AUTHOR
+     Jeffrey H. Kingston
diff --git a/man/lout.1 b/man/lout.1
new file mode 100644
index 0000000..5b9b6bc
--- /dev/null
+++ b/man/lout.1
@@ -0,0 +1,270 @@
+.\" Use default p.i., so commented out here and in .TP
+.\" .nr oi 16 \" Prevailing indentation for options' .TP request
+.\" .de Sp
+.\" .if n .sp
+.\" .if t .sp 0.4
+.\" ..
+.TH LOUT 1
+.SH NAME
+lout - prepare Lout document for printing
+.SH SYNOPSIS
+\fBlout\fR [ \fIoption\fR ] \fIfile\fR...
+.SH DESCRIPTION
+Invoke the Basser Lout interpreter on the concatenation of the named
+files, producing a PostScript file on standard output suitable for
+printing on PostScript printers using
+.IR lpr (1).
+If no files are named, stdin is used instead.  The special file name
+.RB ` \|\-\| '
+may be used to denote standard input.  There white space between flags
+and their associated option values is optional.
+.LP
+An optional
+.B .lt
+suffix may be used for Lout source and include files.  When invoking
+files ending in this suffix the suffix may be omitted.
+.SH OPTIONS
+.SS Output
+.TP \" \n(oi
+.BI \-o " filename"
+Direct output to
+.I filename
+instead of to stdout.
+.TP
+.BI \-e " filename"
+Direct error messages to
+.I filename
+instead of to stderr.
+.TP
+.B \-a
+Use "\c
+.IR filename :\c
+.IR linenum :\c
+.IR colnum :\c
+.I message\c
+\&" alternative error message format useful with Emacs compilation
+mode and other tools.
+.SS Output format
+.TP \" \n(oi
+.B \-EPS
+Produce output in the form of an EPS (Encapsulated PostScript) file,
+suitable for inclusion in another document.  Useful with stand-alone
+illustrations.
+.TP
+.B \-p
+Produce plain text output instead of PostScript.
+.TP
+.B \-P
+Like
+.BR \-p ,
+but with a form-feed character between pages.
+.TP
+.B \-Z
+Produce Adobe Portable Document Format (PDF) output.  This includes
+links, but the more advanced graphics packages of Lout are not supported.
+.TP
+.B \-PDF
+Synonym for
+.BR \-Z .
+.SS Cross-reference database
+.TP \" \n(oi
+.B \-s
+Suppress all reading and writing of the cross reference database;
+other databases are not affected.  Useful when many simple documents
+that don't do any cross referencing are stored in one directory.
+.TP
+.B \-l
+Use ASCII order when sorting index entries etc.; the default depends on
+the COLLATE compilation option (use
+.B \-V
+option to find out your default value).
+.TP
+.B \-L
+Use your locale's order when sorting index entries etc.; the default
+depends on the COLLATE compilation option (use
+.B \-V
+option to find out your default value).
+.SS Execution of filters
+.TP \" \n(oi
+.B \-S
+Safe execution: disable all calls to
+.IR system (3),
+instead echoing the commands that would have been executed.  Although
+this makes the Lout run certainly safe, the PostScript output file may
+not be.
+.TP
+.B \-U
+Unsafe execution: allow calls to
+.IR system (3).
+This is usually the default behavior, but it is possible to make safe
+execution the default during installation (use
+.B \-V
+option to find out whether this was done or not), hence the need for
+this flag.
+.SS Changing document setup options
+.TP \" \n(oi
+.BI \-\- option { value }
+Set setup file
+.I option
+to
+.IR value ,
+overriding any value assigned to
+.I option
+in the setup file.  For example,
+.B \-\-@PageType{Letter}
+will set the
+.B @PageType
+setup file option to
+.BR  Letter .
+The value may be a sequence of words but not an arbitrary Lout object.
+If there are spaces you must ensure that it is passed to Lout as a
+single option; the usual way to do this is to enclose it in quotes.
+.SS Searching for files
+.TP \" \n(oi
+.BI \-i " filename"
+Search the directories of the include file path (see below) for
+.I filename
+or
+.IR filename .lt
+and include it.  There may be multiple
+.B \-i
+options.
+.TP
+.BI \-I " dirname"
+Add
+.I dirname
+to the list of directories searched for
+.B @Include
+files and
+.B \-i
+option files.
+There may be multiple
+.B \-I
+options.
+.B @Include
+first searches the current directory, then searches the
+.B \-I
+directories in the order given, and finally searches the default
+include file directory (see below).
+.B @SysInclude
+and the
+.B \-i
+option omit the search of the current directory.
+.TP
+.BI \-C " dirname"
+Add
+.I dirname
+to the list of directories searched for Lout character mapping (\c
+.BR .LCM )
+files.
+There may be multiple
+.B \-C
+options; the directories are searched in the order given, and finally
+the default character mappings directory is searched (see below).
+.TP
+.BI -F " dirname"
+Add
+.I dirname
+to the list of directories searched for font metrics (formerly
+.BR .AFM )
+files.  There may be multiple
+.B \-F
+options; the directories are searched in the order given, and finally
+the default font metrics directory is searched (see below).
+.TP
+.BI \-H " dirname"
+Add
+.I dirname
+to the list of directories searched for hyphenation patterns files,
+both unpacked
+.RB ( .lh )
+and packed
+.RB ( .lp ).
+There may be multiple
+.B \-H
+options; the directories are searched in the order given, and finally
+the default hyphenation directory is searched (see below).
+.TP
+.BI -D " dirname"
+Add
+.I dirname
+to the list of directories searched for Lout database files.  There
+may be multiple
+.B \-D
+options.
+.B @Database
+searches the current directory, then the
+.B \-D
+directories in the order given, and finally searches the default
+databases directory (see below).
+.B @SysDatabase
+omits the search of the current directory.
+.SS Miscellaneous options
+.TP \" \n(oi
+.B \-x
+Initializing run, not for ordinary use: read and check all font files
+mentioned in font definitions, read and check all hyphenation files
+mentioned in language definitions and build compressed versions, read
+and check all database files mentioned in database clauses and build
+index files.
+.TP
+.B \-u
+Print usage information on stderr and exit.
+.TP
+.B \-V
+Print version information on stderr and exit.
+.TP
+.B \-M
+Use less memory and run more slowly (the cross reference database index
+will be kept in a file rather than in memory).
+.TP
+.B \-w
+Show the total number of non-empty words printed in the output file.
+This includes words and numbers in page headers and footers; section
+numbers and other numbers; every punctuation character in a font
+different from its adjacent word; and every little fragment of every
+equation; so it will always somewhat overestimate the true number.
+.SH FILES AND ENVIRONMENT VARIABLE
+.LP
+.\" NB: be careful with tabs in the table below
+.nf
+.ta \w'Default character mappings dir.:  'u
+\&Default include file directory:	\fILOUTLIB\fP/include
+\&Default databases directory:	\fILOUTLIB\fP/data
+\&Default font metrics directory:	\fILOUTLIB\fP/font
+\&Default hyphenation directory:	\fILOUTLIB\fP/hyph
+\&Default character mappings dir.:	\fILOUTLIB\fP/maps
+\&Default locales directory:	\fILOUTLIB\fP/locale
+.fi
+.LP
+The default library directory, usually
+.BR /usr/local/lib/lout ,
+can be changed by setting environment variable
+.SB LOUTLIB
+to an alternative directory name.
+.SH SEE ALSO
+.LP
+.BR c2lout (1),
+.BR lpr (1),
+.BR ghostview (1)
+.SH MAILING LIST
+.LP
+A public mailing list for discussion of Lout exists.  To subscribe,
+mail
+.B lout\-request@ptc.spbu.ru
+with the word
+.B subscribe
+in the Subject line.  To post an item, mail it to
+.BR lout@ptc.spbu.ru .
+.SH REFERENCES
+.LP
+Jeffrey H. Kingston,
+.I 
+\(lq\&A User's Guide to the Lout Document Formatting System\(rq\c
+\&, and
+.I
+\(lq\&An Expert's Guide to the Lout Document Formatting System\(rq\c
+\&.
+.SH AUTHOR
+.LP
+Jeffrey H. Kingston
diff --git a/man/lout.txt b/man/lout.txt
new file mode 100644
index 0000000..9638390
--- /dev/null
+++ b/man/lout.txt
@@ -0,0 +1,187 @@
+
+
+
+User Commands                                             LOUT(1)
+
+
+
+NAME
+     lout - prepare Lout document for printing
+
+SYNOPSIS
+     lout [ option ] file...
+
+DESCRIPTION
+     Invoke the Basser Lout interpreter on the  concatenation  of
+     the  named  files,  producing  a PostScript file on standard
+     output suitable for printing on  PostScript  printers  using
+     lpr(1).   If no files are named, stdin is used instead.  The
+     special file name `-' may be used to denote standard  input.
+     There  white space between flags and their associated option
+     values is optional.
+
+     An optional .lt suffix may  be  used  for  Lout  source  and
+     include  files.   When  invoking files ending in this suffix
+     the suffix may be omitted.
+
+OPTIONS
+  Output
+     -o filename
+          Direct output to filename instead of to stdout.
+
+     -e filename
+          Direct error messages to filename instead of to stderr.
+
+     -a   Use "filename:linenum:colnum:message" alternative error
+          message  format  useful with Emacs compilation mode and
+          other tools.
+
+  Output format
+     -EPS Produce output in the  form  of  an  EPS  (Encapsulated
+          PostScript)  file,  suitable  for  inclusion in another
+          document.  Useful with stand-alone illustrations.
+
+     -p   Produce plain text output instead of PostScript.
+
+     -P   Like -p, but with a form-feed character between pages.
+
+     -Z   Produce Adobe Portable Document  Format  (PDF)  output.
+          This  includes  links,  but  the more advanced graphics
+          packages of Lout are not supported.
+
+     -PDF Synonym for -Z.
+
+  Cross-reference database
+     -s   Suppress all reading and writing of the cross reference
+          database;  other  databases  are  not affected.  Useful
+          when many simple documents  that  don't  do  any  cross
+          referencing are stored in one directory.
+
+     -l   Use ASCII order when sorting index  entries  etc.;  the
+          default  depends on the COLLATE compilation option (use
+          -V option to find out your default value).
+
+     -L   Use your locale's  order  when  sorting  index  entries
+          etc.;  the  default  depends on the COLLATE compilation
+          option (use -V option to find out your default value).
+
+  Execution of filters
+     -S   Safe execution: disable all calls to system(3), instead
+          echoing  the  commands  that  would have been executed.
+          Although this makes the Lout run  certainly  safe,  the
+          PostScript output file may not be.
+
+     -U   Unsafe execution: allow calls to  system(3).   This  is
+          usually  the  default  behavior,  but it is possible to
+          make safe execution  the  default  during  installation
+          (use  -V  option  to  find out whether this was done or
+          not), hence the need for this flag.
+
+  Changing document setup options
+     --option{value}
+          Set setup file option to value,  overriding  any  value
+          assigned  to  option  in  the setup file.  For example,
+          --@PageType{Letter} will set the @PageType  setup  file
+          option to Letter.  The value may be a sequence of words
+          but not an arbitrary Lout object.  If there are  spaces
+          you  must  ensure that it is passed to Lout as a single
+          option; the usual way to do this is to  enclose  it  in
+          quotes.
+
+  Searching for files
+     -i filename
+          Search the directories of the include  file  path  (see
+          below)  for  filename  or  filename.lt  and include it.
+          There may be multiple -i options.
+
+     -I dirname
+          Add dirname to the list  of  directories  searched  for
+          @Include  files and -i option files.  There may be mul-
+          tiple -I options.  @Include first searches the  current
+          directory,  then  searches  the  -I  directories in the
+          order given, and finally searches the  default  include
+          file  directory  (see  below).   @SysInclude and the -i
+          option omit the search of the current directory.
+
+     -C dirname
+          Add dirname to the list  of  directories  searched  for
+          Lout character mapping (.LCM) files.  There may be mul-
+          tiple -C options; the directories are searched  in  the
+          order given, and finally the default character mappings
+          directory is searched (see below).
+
+     -F dirname
+          Add dirname to the list  of  directories  searched  for
+          font  metrics (formerly .AFM) files.  There may be mul-
+          tiple -F options; the directories are searched  in  the
+          order  given,  and  finally  the  default  font metrics
+          directory is searched (see below).
+
+     -H dirname
+          Add dirname to the list  of  directories  searched  for
+          hyphenation  patterns  files,  both  unpacked (.lh) and
+          packed (.lp).  There may be multiple  -H  options;  the
+          directories  are  searched  in  the  order  given,  and
+          finally the default hyphenation directory  is  searched
+          (see below).
+
+     -D dirname
+          Add dirname to the list  of  directories  searched  for
+          Lout database files.  There may be multiple -D options.
+          @Database searches the current directory, then  the  -D
+          directories  in  the  order given, and finally searches
+          the default databases directory (see below).  @SysData-
+          base omits the search of the current directory.
+
+  Miscellaneous options
+     -x   Initializing run, not for ordinary use: read and  check
+          all  font files mentioned in font definitions, read and
+          check  all  hyphenation  files  mentioned  in  language
+          definitions  and  build  compressed  versions, read and
+          check all database files mentioned in database  clauses
+          and build index files.
+
+     -u   Print usage information on stderr and exit.
+
+     -V   Print version information on stderr and exit.
+
+     -M   Use less memory and run more slowly (the  cross  refer-
+          ence  database index will be kept in a file rather than
+          in memory).
+
+     -w   Show the total number of non-empty words printed in the
+          output  file.   This includes words and numbers in page
+          headers and footers; section numbers and other numbers;
+          every  punctuation  character  in a font different from
+          its adjacent word; and every little fragment  of  every
+          equation;  so  it will always somewhat overestimate the
+          true number.
+
+FILES AND ENVIRONMENT VARIABLE
+     Default include file directory:   LOUTLIB/include
+     Default databases directory:      LOUTLIB/data
+     Default font metrics directory:   LOUTLIB/font
+     Default hyphenation directory:    LOUTLIB/hyph
+     Default character mappings dir.:  LOUTLIB/maps
+     Default locales directory:        LOUTLIB/locale
+
+     The default library directory, usually  /usr/local/lib/lout,
+     can be changed by setting environment variable LOUTLIB to an
+     alternative directory name.
+
+SEE ALSO
+     c2lout(1), lpr(1), ghostview(1)
+
+MAILING LIST
+     A public mailing list for discussion  of  Lout  exists.   To
+     subscribe,  mail lout-request@ptc.spbu.ru with the word sub-
+     scribe in the Subject line.  To post an  item,  mail  it  to
+     lout@ptc.spbu.ru.
+
+REFERENCES
+     Jeffrey H. Kingston, A User's Guide  to  the  Lout  Document
+     Formatting  System,  and An Expert's Guide to the Lout Docu-
+     ment Formatting System.
+
+AUTHOR
+     Jeffrey H. Kingston
diff --git a/maps/00README b/maps/00README
new file mode 100644
index 0000000..f0f0b17
--- /dev/null
+++ b/maps/00README
@@ -0,0 +1,105 @@
+Directory lout/maps - Lout Character Mapping (LCM) files
+
+Jeffrey H. Kingston
+14 March 1996
+
+This directory contains Lout Character Mapping (LCM) files, which define
+the names and codes of all characters known to Lout, plus various mappings.
+Lout works with all characters via their codes, so it is not possible to
+have an unencoded character.
+
+LCM files replace the CEV and CMA files of previous versions of Lout.  The
+format has changed but the information in the files is consistent with the
+old CEV and CMA files (no changes to the encodings, etc.).  The format
+change was needed to implement kerning of accented characters.
+
+LCM files may contain blank lines and comment lines (which begin with #).
+Each of the remaining lines defines one character, and must contain the
+following entries, in order, separated by white space:
+
+(1) Decimal character code, which must be unique in this file.  These codes
+    must appear sorted into increasing order.  Codes not mentioned in this
+    file have no associated character.
+
+(2) Octal value of the decimal code, written in ASCII.
+
+(3) Character name.  Width and height information for a character with this
+    name must exist in every PostScript font metrics file that shares a Lout
+    fontdef with this file, but the character name need not be encoded in the
+    font metrics file, nor need any character code there agree with the
+    character code here.  Lout will ensure (by including encoding vectors
+    in its output) that the character codes defined in this file apply, not
+    the codes in font metrics files.
+    
+    The character name may be -none-, and this is equivalent to omitting the
+    line.  There must be no subsequent entries on the line in this case.
+
+    If the character has entry UA below, and there is no kerning information
+    for the character in the font metrics file, Lout will apply the kerning
+    information for the corresponding unaccented character to the accented
+    character.  This is always a good thing to do.
+
+    If the character has entry UA below, and there is no entry in some
+    font metrics file for the character, then (contrary to the above)
+    instead of complaining that the character is missing from the font
+    metrics file, Lout will silently apply the size information for
+    the corresponding unaccented character to the accented character.
+    Lout will still print the character code for the accented character,
+    however.  This is always good horizontally but occasionally not
+    enough space is allowed for the character vertically.
+
+(4) Zero or more functions, each beginning with a string identifying which
+    function it is, and followed by function-dependent information ending
+    in a semicolon.  Functions may appear in any order; omitting a function
+    is fine and means that the function does not apply to that character.
+    At present the functions are
+    
+	UC <charname>;   Corresponding upper-case character (must be the
+			 name of a character appearing elsewhere in the
+			 same file).  This entry is used by Lout when
+			 producing small capitals.
+
+        LC <charname>;   Corresponding lower-case character (must be the
+			 name of a character appearing elsewhere in the
+			 same file).  This entry is not currently used.
+
+        UA <charname>;   Corresponding unaccented character (must be the
+			 name of a character appearing elsewhere in the
+			 same file).  This entry is used by Lout to
+			 guess size and kerning information for accented
+			 characters (when this information is missing from
+			 some font metrics file) by using the size and
+			 kerning information of the corresponding unaccented
+			 character.
+
+	AC <charname>;   Name of the accent character (acute, ogonek, etc.)
+			 that forms the accent of this character (must be the
+			 name of a character appearing elsewhere in the
+			 same file).  This entry is not currently used.
+
+The particular LCM files in this directory are:
+
+    Std.LCM       The StandardEncoding encoding vector, exactly as on page
+                  598 of the PostScript LRM 2nd Ed., plus the mappings.
+
+    Latin1.LCM    The ISOLatin1Encoding encoding vector, exactly as on page
+                  599 of the PostScript LRM 2nd Ed., plus the mappings.
+                  This is not usable with Lout as is because the ligature
+                  characters fi and fl have no encoding, and because the
+                  standard packages use characters not in this encoding.
+
+    LtLatin1.LCM  Equal to Latin1.LCM augmented with some other characters
+		  used by Lout and its standard packages.  See the header
+		  in the file for the details.
+
+    LtLatin2.LCM  Similar to LtLatin1.LCM but uses the Latin2 character set.
+
+    koi8r.LCM     For Russian
+
+    Symb.LCM      The Symbol encoding vector, exactly as on page 606 of the
+		  PostScript LRM 2nd Ed., plus mappings.
+
+    Ding.LCM      The Zapf Dingbats encoding vector, taken from the Zapf
+		  Dingbats font metrics file, plus mappings.
+
+    null.LCM      Useful skeleton file for building LCM files.
diff --git a/maps/Ding.LCM b/maps/Ding.LCM
new file mode 100644
index 0000000..f9ee17d
--- /dev/null
+++ b/maps/Ding.LCM
@@ -0,0 +1,272 @@
+###############################################################
+#                                                             #
+#  Ding.LCM                                                   #
+#                                                             #
+#  LCM (Lout Character Mapping) file for Dingbats             #
+#  Taken from the Dingbats metrics file.                      #
+#                                                             #
+#  Jeffrey H. Kingston                                        #
+#  14 March 1996                                              #
+#                                                             #
+#  Dec- Octal   Character                                     #
+#  imal code    name                                          #
+#  code                                                       #
+#                                                             #
+###############################################################
+
+000	000	-none-
+001	001	-none-
+002	002	-none-
+003	003	-none-
+004	004	-none-
+005	005	-none-
+006	006	-none-
+007	007	-none-
+008	010	-none-
+009	011	-none-
+010	012	-none-
+011	013	-none-
+012	014	-none-
+013	015	-none-
+014	016	-none-
+015	017	-none-
+016	020	-none-
+017	021	-none-
+018	022	-none-
+019	023	-none-
+020	024	-none-
+021	025	-none-
+022	026	-none-
+023	027	-none-
+024	030	-none-
+025	031	-none-
+026	032	-none-
+027	033	-none-
+028	034	-none-
+029	035	-none-
+030	036	-none-
+031	037	-none-
+032	040	space
+033	041	a1
+034	042	a2
+035	043	a202
+036	044	a3
+037	045	a4
+038	046	a5
+039	047	a119
+040	050	a118
+041	051	a117
+042	052	a11
+043	053	a12
+044	054	a13
+045	055	a14
+046	056	a15
+047	057	a16
+048	060	a105
+049	061	a17
+050	062	a18
+051	063	a19
+052	064	a20
+053	065	a21
+054	066	a22
+055	067	a23
+056	070	a24
+057	071	a25
+058	072	a26
+059	073	a27
+060	074	a28
+061	075	a6
+062	076	a7
+063	077	a8
+064	100	a9
+065	101	a10
+066	102	a29
+067	103	a30
+068	104	a31
+069	105	a32
+070	106	a33
+071	107	a34
+072	110	a35
+073	111	a36
+074	112	a37
+075	113	a38
+076	114	a39
+077	115	a40
+078	116	a41
+079	117	a42
+080	120	a43
+081	121	a44
+082	122	a45
+083	123	a46
+084	124	a47
+085	125	a48
+086	126	a49
+087	127	a50
+088	130	a51
+089	131	a52
+090	132	a53
+091	133	a54
+092	134	a55
+093	135	a56
+094	136	a57
+095	137	a58
+096	140	a59
+097	141	a60
+098	142	a61
+099	143	a62
+100	144	a63
+101	145	a64
+102	146	a65
+103	147	a66
+104	150	a67
+105	151	a68
+106	152	a69
+107	153	a70
+108	154	a71
+109	155	a72
+110	156	a73
+111	157	a74
+112	160	a203
+113	161	a75
+114	162	a204
+115	163	a76
+116	164	a77
+117	165	a78
+118	166	a79
+119	167	a81
+120	170	a82
+121	171	a83
+122	172	a84
+123	173	a97
+124	174	a98
+125	175	a99
+126	176	a100
+127	177	-none-
+128	200	-none-
+129	201	-none-
+130	202	-none-
+131	203	-none-
+132	204	-none-
+133	205	-none-
+134	206	-none-
+135	207	-none-
+136	210	-none-
+137	211	-none-
+138	212	-none-
+139	213	-none-
+140	214	-none-
+141	215	-none-
+142	216	-none-
+143	217	-none-
+144	220	-none-
+145	221	-none-
+146	222	-none-
+147	223	-none-
+148	224	-none-
+149	225	-none-
+150	226	-none-
+151	227	-none-
+152	230	-none-
+153	231	-none-
+154	232	-none-
+155	233	-none-
+156	234	-none-
+157	235	-none-
+158	236	-none-
+159	237	-none-
+160	240	-none-
+161	241	a101
+162	242	a102
+163	243	a103
+164	244	a104
+165	245	a106
+166	246	a107
+167	247	a108
+168	250	a112
+169	251	a111
+170	252	a110
+171	253	a109
+172	254	a120
+173	255	a121
+174	256	a122
+175	257	a123
+176	260	a124
+177	261	a125
+178	262	a126
+179	263	a127
+180	264	a128
+181	265	a129
+182	266	a130
+183	267	a131
+184	270	a132
+185	271	a133
+186	272	a134
+187	273	a135
+188	274	a136
+189	275	a137
+190	276	a138
+191	277	a139
+192	300	a140
+193	301	a141
+194	302	a142
+195	303	a143
+196	304	a144
+197	305	a145
+198	306	a146
+199	307	a147
+200	310	a148
+201	311	a149
+202	312	a150
+203	313	a151
+204	314	a152
+205	315	a153
+206	316	a154
+207	317	a155
+208	320	a156
+209	321	a157
+210	322	a158
+211	323	a159
+212	324	a160
+213	325	a161
+214	326	a163
+215	327	a164
+216	330	a196
+217	331	a165
+218	332	a192
+219	333	a166
+220	334	a167
+221	335	a168
+222	336	a169
+223	337	a170
+224	340	a171
+225	341	a172
+226	342	a173
+227	343	a162
+228	344	a174
+229	345	a175
+230	346	a176
+231	347	a177
+232	350	a178
+233	351	a179
+234	352	a193
+235	353	a180
+236	354	a199
+237	355	a181
+238	356	a200
+239	357	a182
+240	360	-none-
+241	361	a201
+242	362	a183
+243	363	a184
+244	364	a197
+245	365	a185
+246	366	a194
+247	367	a198
+248	370	a186
+249	371	a195
+250	372	a187
+251	373	a188
+252	374	a189
+253	375	a190
+254	376	a191
+255	377	-none-
diff --git a/maps/Latin1.LCM b/maps/Latin1.LCM
new file mode 100644
index 0000000..40bcf89
--- /dev/null
+++ b/maps/Latin1.LCM
@@ -0,0 +1,273 @@
+###############################################################
+#                                                             #
+#  Latin1.LCM                                                 #
+#                                                             #
+#  LCM (Lout Character Mapping) file for Adobe Latin-1        #
+#  Encoding (PostScript Language Reference Manual, 2nd Ed.,   #
+#  page 599).                                                 #
+#                                                             #
+#  Jeffrey H. Kingston                                        #
+#  14 March 1996                                              #
+#                                                             #
+#  Dec- Octal   Character       Functions ...                 #
+#  imal code    name                                          #
+#  code                                                       #
+#                                                             #
+###############################################################
+
+000	000	-none-
+001	001	-none-
+002	002	-none-
+003	003	-none-
+004	004	-none-
+005	005	-none-
+006	006	-none-
+007	007	-none-
+008	010	-none-
+009	011	-none-
+010	012	-none-
+011	013	-none-
+012	014	-none-
+013	015	-none-
+014	016	-none-
+015	017	-none-
+016	020	-none-
+017	021	-none-
+018	022	-none-
+019	023	-none-
+020	024	-none-
+021	025	-none-
+022	026	-none-
+023	027	-none-
+024	030	-none-
+025	031	-none-
+026	032	-none-
+027	033	-none-
+028	034	-none-
+029	035	-none-
+030	036	-none-
+031	037	-none-
+032	040	space
+033	041	exclam
+034	042	quotedbl
+035	043	numbersign
+036	044	dollar
+037	045	percent
+038	046	ampersand
+039	047	quoteright
+040	050	parenleft
+041	051	parenright
+042	052	asterisk
+043	053	plus
+044	054	comma
+045	055	hyphen
+046	056	period
+047	057	slash
+048	060	zero
+049	061	one
+050	062	two
+051	063	three
+052	064	four
+053	065	five
+054	066	six
+055	067	seven
+056	070	eight
+057	071	nine
+058	072	colon
+059	073	semicolon
+060	074	less
+061	075	equal
+062	076	greater
+063	077	question
+064	100	at
+065	101	A		LC a;
+066	102	B		LC b;
+067	103	C		LC c;
+068	104	D		LC d;
+069	105	E		LC e;
+070	106	F		LC f;
+071	107	G		LC g;
+072	110	H		LC h;
+073	111	I		LC i;
+074	112	J		LC j;
+075	113	K		LC k;
+076	114	L		LC l;
+077	115	M		LC m;
+078	116	N		LC n;
+079	117	O		LC o;
+080	120	P		LC p;
+081	121	Q		LC q;
+082	122	R		LC r;
+083	123	S		LC s;
+084	124	T		LC t;
+085	125	U		LC u;
+086	126	V		LC v;
+087	127	W		LC w;
+088	130	X		LC x;
+089	131	Y		LC y;
+090	132	Z		LC z;
+091	133	bracketleft
+092	134	backslash
+093	135	bracketright
+094	136	asciicircum
+095	137	underscore
+096	140	quoteleft
+097	141	a		UC A;
+098	142	b		UC B;
+099	143	c		UC C;
+100	144	d		UC D;
+101	145	e		UC E;
+102	146	f		UC F;
+103	147	g		UC G;
+104	150	h		UC H;
+105	151	i		UC I;
+106	152	j		UC J;
+107	153	k		UC K;
+108	154	l		UC L;
+109	155	m		UC M;
+110	156	n		UC N;
+111	157	o		UC O;
+112	160	p		UC P;
+113	161	q		UC Q;
+114	162	r		UC R;
+115	163	s		UC S;
+116	164	t		UC T;
+117	165	u		UC U;
+118	166	v		UC V;
+119	167	w		UC W;
+120	170	x		UC X;
+121	171	y		UC Y;
+122	172	z		UC Z;
+123	173	braceleft
+124	174	bar
+125	175	braceright
+126	176	asciitilde
+127	177	-none-
+128	200	-none-
+129	201	-none-
+130	202	-none-
+131	203	-none-
+132	204	-none-
+133	205	-none-
+134	206	-none-
+135	207	-none-
+136	210	-none-
+137	211	-none-
+138	212	-none-
+139	213	-none-
+140	214	-none-
+141	215	-none-
+142	216	-none-
+143	217	-none-
+144	220	dotlessi
+145	221	grave
+146	222	acute
+147	223	circumflex
+148	224	tilde
+149	225	macron
+150	226	breve
+151	227	dotaccent
+152	230	dieresis
+153	231	-none-
+154	232	ring
+155	233	cedilla
+156	234	-none-
+157	235	hungarumlaut
+158	236	ogonek
+159	237	caron
+160	240	space
+161	241	exclamdown
+162	242	cent
+163	243	sterling
+164	244	currency
+165	245	yen
+166	246	brokenbar
+167	247	section
+168	250	dieresis
+169	251	copyright
+170	252	ordfeminine
+171	253	guillemotleft
+172	254	logicalnot
+173	255	hyphen
+174	256	registered
+175	257	macron
+176	260	degree
+177	261	plusminus
+178	262	twosuperior
+179	263	threesuperior
+180	264	acute
+181	265	mu
+182	266	paragraph
+183	267	periodcentered
+184	270	cedilla
+185	271	onesuperior
+186	272	ordmasculine
+187	273	guillemotright
+188	274	onequarter
+189	275	onehalf
+190	276	threequarters
+191	277	questiondown
+192	300	Agrave		LC agrave;	UA A;		AC grave;
+193	301	Aacute		LC aacute;	UA A;		AC acute;
+194	302	Acircumflex	LC acircumflex;	UA A;		AC circumflex;
+195	303	Atilde		LC atilde;	UA A;		AC tilde;
+196	304	Adieresis	LC adieresis;	UA A;		AC dieresis;
+197	305	Aring		LC aring;	UA A;		AC ring;
+198	306	AE		LC ae;
+199	307	Ccedilla	LC ccedilla;	UA C;		AC cedilla;
+200	310	Egrave		LC egrave;	UA E;		AC grave;
+201	311	Eacute		LC eacute;	UA E;		AC acute;
+202	312	Ecircumflex	LC ecircumflex;	UA E;		AC circumflex;
+203	313	Edieresis	LC edieresis;	UA E;		AC dieresis;
+204	314	Igrave		LC igrave;	UA I;		AC grave;
+205	315	Iacute		LC iacute;	UA I;		AC acute;
+206	316	Icircumflex	LC icircumflex;	UA I;		AC circumflex;
+207	317	Idieresis	LC idieresis;	UA I;		AC dieresis;
+208	320	Eth		LC eth;
+209	321	Ntilde		LC ntilde;	UA N;		AC tilde;
+210	322	Ograve		LC ograve;	UA O;		AC grave;
+211	323	Oacute		LC oacute;	UA O;		AC acute;
+212	324	Ocircumflex	LC ocircumflex;	UA O;		AC circumflex;
+213	325	Otilde		LC otilde;	UA O;		AC tilde;
+214	326	Odieresis	LC odieresis;	UA O;		AC dieresis;
+215	327	multiply
+216	330	Oslash		LC oslash;
+217	331	Ugrave		LC ugrave;	UA U;		AC grave;
+218	332	Uacute		LC uacute;	UA U;		AC acute;
+219	333	Ucircumflex	LC ucircumflex;	UA U;		AC circumflex;
+220	334	Udieresis	LC udieresis;	UA U;		AC dieresis;
+221	335	Yacute		LC yacute;	UA Y;		AC acute;
+222	336	Thorn		LC thorn;
+223	337	germandbls
+224	340	agrave		UC Agrave	UA a;		AC grave;
+225	341	aacute		UC Aacute;	UA a;		AC acute;
+226	342	acircumflex	UC Acircumflex;	UA a;		AC circumflex;
+227	343	atilde		UC Atilde;	UA a;		AC tilde;
+228	344	adieresis	UC Adieresis;	UA a;		AC dieresis;
+229	345	aring		UC Aring;	UA a;		AC ring;
+230	346	ae		UC AE;
+231	347	ccedilla	UC Ccedilla;	UA c;		AC cedilla;
+232	350	egrave		UC Egrave;	UA e;		AC grave;
+233	351	eacute		UC Eacute;	UA e;		AC acute;
+234	352	ecircumflex	UC Ecircumflex;	UA e;		AC circumflex;
+235	353	edieresis	UC Edieresis;	UA e;		AC dieresis;
+236	354	igrave		UC Igrave;	UA dotlessi;	AC grave;
+237	355	iacute		UC Iacute;	UA dotlessi;	AC acute;
+238	356	icircumflex	UC Icircumflex;	UA dotlessi;	AC circumflex;
+239	357	idieresis	UC Idieresis;	UA dotlessi;	AC dieresis;
+240	360	eth		UC Eth;
+241	361	ntilde		UC Ntilde;	UA n;		AC tilde;
+242	362	ograve		UC Ograve;	UA o;		AC grave;
+243	363	oacute		UC Oacute;	UA o;		AC acute;
+244	364	ocircumflex	UC Ocircumflex;	UA o;		AC circumflex;
+245	365	otilde		UC Otilde;	UA o;		AC tilde;
+246	366	odieresis	UC Odieresis;	UA o;		AC dieresis;
+247	367	divide
+248	370	oslash		UC Oslash;
+249	371	ugrave		UC Ugrave;	UA u;		AC grave;
+250	372	uacute		UC Uacute;	UA u;		AC acute;
+251	373	ucircumflex	UC Ucircumflex;	UA u;		AC circumflex;
+252	374	udieresis	UC Udieresis;	UA u;		AC dieresis;
+253	375	yacute		UC Yacute;	UA y;		AC acute;
+254	376	thorn		UC Thorn;
+255	377	ydieresis			UA y;		AC dieresis;
diff --git a/maps/LtLatin1.LCM b/maps/LtLatin1.LCM
new file mode 100644
index 0000000..6207fb1
--- /dev/null
+++ b/maps/LtLatin1.LCM
@@ -0,0 +1,291 @@
+###############################################################
+#                                                             #
+#  LtLatin1.LCM                                               #
+#                                                             #
+#  LCM (Lout Character Mapping) file for Adobe Latin-1        #
+#  Encoding (PostScript Language Reference Manual, 2nd Ed.,   #
+#  page 599) with the following additional entries:           #
+#                                                             #
+#     128   200     quotesinglbase                            #
+#     129   201     quotedblbase                              #
+#     130   202     ellipsis                                  #
+#     131   203     OE              (added in Version 3.09)   #
+#     132   204     oe              (added in Version 3.09)   #
+#     133   205     quotedblleft                              #
+#     134   206     quotedblright                             #
+#     135   207     fi                                        #
+#     136   210     fl                                        #
+#     137   211     endash                                    #
+#     138   212     emdash                                    #
+#     139   213     bullet                                    #
+#     140   214     dagger                                    #
+#     141   215     daggerdbl                                 #
+#     142   216     florin                                    #
+#     143   217     fraction                                  #
+#                                                             #
+#  Jeffrey H. Kingston                                        #
+#  14 March 1996                                              #
+#  19 May 1996                                                #
+#                                                             #
+#  Dec- Octal   Character       Functions ...                 #
+#  imal code    name                                          #
+#  code                                                       #
+#                                                             #
+###############################################################
+
+000	000	-none-
+001	001	-none-
+002	002	-none-
+003	003	-none-
+004	004	-none-
+005	005	-none-
+006	006	-none-
+007	007	-none-
+008	010	-none-
+009	011	-none-
+010	012	-none-
+011	013	-none-
+012	014	-none-
+013	015	-none-
+014	016	-none-
+015	017	-none-
+016	020	-none-
+017	021	-none-
+018	022	-none-
+019	023	-none-
+020	024	-none-
+021	025	-none-
+022	026	-none-
+023	027	-none-
+024	030	-none-
+025	031	-none-
+026	032	-none-
+027	033	-none-
+028	034	-none-
+029	035	-none-
+030	036	-none-
+031	037	-none-
+032	040	space
+033	041	exclam
+034	042	quotedbl
+035	043	numbersign
+036	044	dollar
+037	045	percent
+038	046	ampersand
+039	047	quoteright
+040	050	parenleft
+041	051	parenright
+042	052	asterisk
+043	053	plus
+044	054	comma
+045	055	hyphen
+046	056	period
+047	057	slash
+048	060	zero
+049	061	one
+050	062	two
+051	063	three
+052	064	four
+053	065	five
+054	066	six
+055	067	seven
+056	070	eight
+057	071	nine
+058	072	colon
+059	073	semicolon
+060	074	less
+061	075	equal
+062	076	greater
+063	077	question
+064	100	at
+065	101	A		LC a;
+066	102	B		LC b;
+067	103	C		LC c;
+068	104	D		LC d;
+069	105	E		LC e;
+070	106	F		LC f;
+071	107	G		LC g;
+072	110	H		LC h;
+073	111	I		LC i;
+074	112	J		LC j;
+075	113	K		LC k;
+076	114	L		LC l;
+077	115	M		LC m;
+078	116	N		LC n;
+079	117	O		LC o;
+080	120	P		LC p;
+081	121	Q		LC q;
+082	122	R		LC r;
+083	123	S		LC s;
+084	124	T		LC t;
+085	125	U		LC u;
+086	126	V		LC v;
+087	127	W		LC w;
+088	130	X		LC x;
+089	131	Y		LC y;
+090	132	Z		LC z;
+091	133	bracketleft
+092	134	backslash
+093	135	bracketright
+094	136	asciicircum
+095	137	underscore
+096	140	quoteleft
+097	141	a		UC A;
+098	142	b		UC B;
+099	143	c		UC C;
+100	144	d		UC D;
+101	145	e		UC E;
+102	146	f		UC F;
+103	147	g		UC G;
+104	150	h		UC H;
+105	151	i		UC I;
+106	152	j		UC J;
+107	153	k		UC K;
+108	154	l		UC L;
+109	155	m		UC M;
+110	156	n		UC N;
+111	157	o		UC O;
+112	160	p		UC P;
+113	161	q		UC Q;
+114	162	r		UC R;
+115	163	s		UC S;
+116	164	t		UC T;
+117	165	u		UC U;
+118	166	v		UC V;
+119	167	w		UC W;
+120	170	x		UC X;
+121	171	y		UC Y;
+122	172	z		UC Z;
+123	173	braceleft
+124	174	bar
+125	175	braceright
+126	176	asciitilde
+127	177	-none-
+128	200	quotesinglbase
+129	201	quotedblbase
+130	202	ellipsis
+131	203	OE
+132	204	oe
+133	205	quotedblleft
+134	206	quotedblright
+135	207	fi
+136	210	fl
+137	211	endash
+138	212	emdash
+139	213	bullet
+140	214	dagger
+141	215	daggerdbl
+142	216	florin
+143	217	fraction
+144	220	dotlessi
+145	221	grave
+146	222	acute
+147	223	circumflex
+148	224	tilde
+149	225	macron
+150	226	breve
+151	227	dotaccent
+152	230	dieresis
+153	231	-none-
+154	232	ring
+155	233	cedilla
+156	234	-none-
+157	235	hungarumlaut
+158	236	ogonek
+159	237	caron
+160	240	space
+161	241	exclamdown
+162	242	cent
+163	243	sterling
+164	244	currency
+165	245	yen
+166	246	brokenbar
+167	247	section
+168	250	dieresis
+169	251	copyright
+170	252	ordfeminine
+171	253	guillemotleft
+172	254	logicalnot
+173	255	hyphen
+174	256	registered
+175	257	macron
+176	260	degree
+177	261	plusminus
+178	262	twosuperior
+179	263	threesuperior
+180	264	acute
+181	265	mu
+182	266	paragraph
+183	267	periodcentered
+184	270	cedilla
+185	271	onesuperior
+186	272	ordmasculine
+187	273	guillemotright
+188	274	onequarter
+189	275	onehalf
+190	276	threequarters
+191	277	questiondown
+192	300	Agrave		LC agrave;	UA A;		AC grave;
+193	301	Aacute		LC aacute;	UA A;		AC acute;
+194	302	Acircumflex	LC acircumflex;	UA A;		AC circumflex;
+195	303	Atilde		LC atilde;	UA A;		AC tilde;
+196	304	Adieresis	LC adieresis;	UA A;		AC dieresis;
+197	305	Aring		LC aring;	UA A;		AC ring;
+198	306	AE		LC ae;
+199	307	Ccedilla	LC ccedilla;	UA C;		AC cedilla;
+200	310	Egrave		LC egrave;	UA E;		AC grave;
+201	311	Eacute		LC eacute;	UA E;		AC acute;
+202	312	Ecircumflex	LC ecircumflex;	UA E;		AC circumflex;
+203	313	Edieresis	LC edieresis;	UA E;		AC dieresis;
+204	314	Igrave		LC igrave;	UA I;		AC grave;
+205	315	Iacute		LC iacute;	UA I;		AC acute;
+206	316	Icircumflex	LC icircumflex;	UA I;		AC circumflex;
+207	317	Idieresis	LC idieresis;	UA I;		AC dieresis;
+208	320	Eth		LC eth;
+209	321	Ntilde		LC ntilde;	UA N;		AC tilde;
+210	322	Ograve		LC ograve;	UA O;		AC grave;
+211	323	Oacute		LC oacute;	UA O;		AC acute;
+212	324	Ocircumflex	LC ocircumflex;	UA O;		AC circumflex;
+213	325	Otilde		LC otilde;	UA O;		AC tilde;
+214	326	Odieresis	LC odieresis;	UA O;		AC dieresis;
+215	327	multiply
+216	330	Oslash		LC oslash;
+217	331	Ugrave		LC ugrave;	UA U;		AC grave;
+218	332	Uacute		LC uacute;	UA U;		AC acute;
+219	333	Ucircumflex	LC ucircumflex;	UA U;		AC circumflex;
+220	334	Udieresis	LC udieresis;	UA U;		AC dieresis;
+221	335	Yacute		LC yacute;	UA Y;		AC acute;
+222	336	Thorn		LC thorn;
+223	337	germandbls
+224	340	agrave		UC Agrave;	UA a;		AC grave;
+225	341	aacute		UC Aacute;	UA a;		AC acute;
+226	342	acircumflex	UC Acircumflex;	UA a;		AC circumflex;
+227	343	atilde		UC Atilde;	UA a;		AC tilde;
+228	344	adieresis	UC Adieresis;	UA a;		AC dieresis;
+229	345	aring		UC Aring;	UA a;		AC ring;
+230	346	ae		UC AE;
+231	347	ccedilla	UC Ccedilla;	UA c;		AC cedilla;
+232	350	egrave		UC Egrave;	UA e;		AC grave;
+233	351	eacute		UC Eacute;	UA e;		AC acute;
+234	352	ecircumflex	UC Ecircumflex;	UA e;		AC circumflex;
+235	353	edieresis	UC Edieresis;	UA e;		AC dieresis;
+236	354	igrave		UC Igrave;	UA dotlessi;	AC grave;
+237	355	iacute		UC Iacute;	UA dotlessi;	AC acute;
+238	356	icircumflex	UC Icircumflex;	UA dotlessi;	AC circumflex;
+239	357	idieresis	UC Idieresis;	UA dotlessi;	AC dieresis;
+240	360	eth		UC Eth;
+241	361	ntilde		UC Ntilde;	UA n;		AC tilde;
+242	362	ograve		UC Ograve;	UA o;		AC grave;
+243	363	oacute		UC Oacute;	UA o;		AC acute;
+244	364	ocircumflex	UC Ocircumflex;	UA o;		AC circumflex;
+245	365	otilde		UC Otilde;	UA o;		AC tilde;
+246	366	odieresis	UC Odieresis;	UA o;		AC dieresis;
+247	367	divide
+248	370	oslash		UC Oslash;
+249	371	ugrave		UC Ugrave;	UA u;		AC grave;
+250	372	uacute		UC Uacute;	UA u;		AC acute;
+251	373	ucircumflex	UC Ucircumflex;	UA u;		AC circumflex;
+252	374	udieresis	UC Udieresis;	UA u;		AC dieresis;
+253	375	yacute		UC Yacute;	UA y;		AC acute;
+254	376	thorn		UC Thorn;
+255	377	ydieresis			UA y;		AC dieresis;
diff --git a/maps/LtLatin2.LCM b/maps/LtLatin2.LCM
new file mode 100644
index 0000000..458769f
--- /dev/null
+++ b/maps/LtLatin2.LCM
@@ -0,0 +1,301 @@
+###############################################################
+#                                                             #
+#  LtLatin2.LCM                                               #
+#                                                             #
+#  LCM (Lout Character Mapping) file for the ISO Latin-2      #
+#  Encoding (sorry, no reference) with additional entries:    #
+#                                                             #
+#     133   205     quotedblleft                              #
+#     134   206     quotedblright                             #
+#     135   207     fi                                        #
+#     136   210     fl                                        #
+#     137   211     endash                                    #
+#     138   212     emdash                                    #
+#     139   213     bullet                                    #
+#     140   214     dagger                                    #
+#     141   215     daggerdbl                                 #
+#     142   216     florin                                    #
+#     143   217     fraction                                  #
+#                                                             #
+#  The author has been unable to obtain font metrics files    #
+#  containing the sizes of the complete set of Latin-2        #
+#  characters.  Thus, strictly speaking it is not possible    #
+#  to use Latin-2, since Lout does not know these sizes.      #
+#                                                             #
+#  However, this file tells Lout for each accented character  #
+#  what the corresponding unaccented character is.  If Lout   #
+#  ever comes upon a character in some font whose size in     #
+#  that font is undefined, and the character is an accented   #
+#  character (i.e. has a UA entry below), then Lout will      #
+#  use the size of the unaccented character in place of the   #
+#  accented character.  Lout will still print the character   #
+#  code for the accented character, so if your printing       #
+#  device understands it, you can still get it; but the       #
+#  vertical space Lout leaves for the character will not      #
+#  take its accent into account.                              #
+#                                                             #
+#  Jeffrey H. Kingston                                        #
+#  17 March 1996                                              #
+#                                                             #
+#  Dec- Octal   Character       Functions ...                 #
+#  imal code    name                                          #
+#  code                                                       #
+#                                                             #
+###############################################################
+
+000	000	-none-
+001	001	-none-
+002	002	-none-
+003	003	-none-
+004	004	-none-
+005	005	-none-
+006	006	-none-
+007	007	-none-
+008	010	-none-
+009	011	-none-
+010	012	-none-
+011	013	-none-
+012	014	-none-
+013	015	-none-
+014	016	-none-
+015	017	-none-
+016	020	-none-
+017	021	-none-
+018	022	-none-
+019	023	-none-
+020	024	-none-
+021	025	-none-
+022	026	-none-
+023	027	-none-
+024	030	-none-
+025	031	-none-
+026	032	-none-
+027	033	-none-
+028	034	-none-
+029	035	-none-
+030	036	-none-
+031	037	-none-
+032	040	space
+033	041	exclam
+034	042	quotedbl
+035	043	numbersign
+036	044	dollar
+037	045	percent
+038	046	ampersand
+039	047	quoteright
+040	050	parenleft
+041	051	parenright
+042	052	asterisk
+043	053	plus
+044	054	comma
+045	055	hyphen
+046	056	period
+047	057	slash
+048	060	zero
+049	061	one
+050	062	two
+051	063	three
+052	064	four
+053	065	five
+054	066	six
+055	067	seven
+056	070	eight
+057	071	nine
+058	072	colon
+059	073	semicolon
+060	074	less
+061	075	equal
+062	076	greater
+063	077	question
+064	100	at
+065	101	A		LC a;
+066	102	B		LC b;
+067	103	C		LC c;
+068	104	D		LC d;
+069	105	E		LC e;
+070	106	F		LC f;
+071	107	G		LC g;
+072	110	H		LC h;
+073	111	I		LC i;
+074	112	J		LC j;
+075	113	K		LC k;
+076	114	L		LC l;
+077	115	M		LC m;
+078	116	N		LC n;
+079	117	O		LC o;
+080	120	P		LC p;
+081	121	Q		LC q;
+082	122	R		LC r;
+083	123	S		LC s;
+084	124	T		LC t;
+085	125	U		LC u;
+086	126	V		LC v;
+087	127	W		LC w;
+088	130	X		LC x;
+089	131	Y		LC y;
+090	132	Z		LC z;
+091	133	bracketleft
+092	134	backslash
+093	135	bracketright
+094	136	asciicircum
+095	137	underscore
+096	140	quoteleft
+097	141	a		UC A;
+098	142	b		UC B;
+099	143	c		UC C;
+100	144	d		UC D;
+101	145	e		UC E;
+102	146	f		UC F;
+103	147	g		UC G;
+104	150	h		UC H;
+105	151	i		UC I;
+106	152	j		UC J;
+107	153	k		UC K;
+108	154	l		UC L;
+109	155	m		UC M;
+110	156	n		UC N;
+111	157	o		UC O;
+112	160	p		UC P;
+113	161	q		UC Q;
+114	162	r		UC R;
+115	163	s		UC S;
+116	164	t		UC T;
+117	165	u		UC U;
+118	166	v		UC V;
+119	167	w		UC W;
+120	170	x		UC X;
+121	171	y		UC Y;
+122	172	z		UC Z;
+123	173	braceleft
+124	174	bar
+125	175	braceright
+126	176	asciitilde
+127	177	-none-
+128	200	-none-
+129	201	-none-
+130	202	-none-
+131	203	-none-
+132	204	-none-
+133	205	quotedblleft
+134	206	quotedblright
+135	207	fi
+136	210	fl
+137	211	endash
+138	212	emdash
+139	213	bullet
+140	214	dagger
+141	215	daggerdbl
+142	216	florin
+143	217	fraction
+144	220	dotlessi
+145	221	grave
+146	222	acute
+147	223	circumflex
+148	224	tilde
+149	225	macron
+150	226	breve
+151	227	dotaccent
+152	230	dieresis
+153	231	-none-
+154	232	ring
+155	233	cedilla
+156	234	-none-
+157	235	-none-
+158	236	ogonek
+159	237	caron
+160	240	space
+161	241	Aogonek		LC aogonek;	UA A;		AC ogonek;
+162	242	breve
+163	243	Lslash		LC lslash;
+164	244	currency
+165	245	Lcaron		LC lcaron;	UA L;		AC caron;
+166	246	Sacute		LC sacute;	UA S;		AC acute;
+167	247	section
+168	250	dieresis
+169	251	Scaron		LC scaron;	UA S;		AC caron;
+170	252	Scedilla	LC scedilla;	UA S;		AC cedilla;
+171	253	Tcaron		LC tcaron;	UA T;		AC caron;
+172	254	Zacute		LC zacute;	UA Z;		AC acute;
+173	255	hyphen
+174	256	Zcaron		LC zcaron;	UA Z;		AC caron;
+175	257	Zdotabove	LC zdotabove;	UA Z;		AC dotaccent;
+176	260	degree
+177	261	aogonek		UC Aogonek;	UA a;		AC ogonek;
+178	262	ogonek
+179	263	lslash		UC Lslash;
+180	264	acute
+181	265	lcaron		UC Lcaron;	UA l;		AC caron;
+182	266	sacute		UC Sacute;	UA s;		AC acute;
+183	267	caron
+184	270	cedilla
+185	271	scaron		UC Scaron;	UA s;		AC caron;
+186	272	scedilla	UC Scedilla;	UA s;		AC cedilla;
+187	273	tcaron		UC Tcaron;	UA t;		AC caron;
+188	274	zacute		UC Zacute;	UA z;		AC acute;
+189	275	hungarumlaut
+190	276	zcaron		UC Zcaron;	UA z;		AC caron;
+191	277	zdotabove	UC Zdotabove;	UA z;		AC dotaccent;
+192	300	Racute		LC racute;	UA R;		AC acute;
+193	301	Aacute		LC aacute;	UA A;		AC acute;
+194	302	Acircumflex	LC acircumflex;	UA A;		AC circumflex;
+195	303	Abreve		LC abreve;	UA A;		AC breve;
+196	304	Adieresis	LC adieresis;	UA A;		AC dieresis;
+197	305	Lacute		LC lacute;	UA L;		AC acute;
+198	306	Cacute		LC cacute;	UA C;		AC acute;
+199	307	Ccedilla	LC ccedilla;	UA C;		AC cedilla;
+200	310	Ccaron		LC ccaron;	UA C;		AC caron;
+201	311	Eacute		LC eacute;	UA E;		AC acute;
+202	312	Eogonek		LC eogonek;	UA E;		AC ogonek;
+203	313	Edieresis	LC edieresis;	UA E;		AC dieresis;
+204	314	Ecaron		LC ecaron;	UA E;		AC caron;
+205	315	Iacute		LC iacute;	UA I;		AC acute;
+206	316	Icircumflex	LC icircumflex;	UA I;		AC circumflex;
+207	317	Dcaron		LC dcaron;	UA D;		AC caron;
+208	320	Eth 		LC eth;
+209	321	Nacute		LC nacute;	UA N;		AC acute;
+210	322	Ncaron		LC ncaron;	UA N;		AC caron;
+211	323	Oacute		LC oacute;	UA O;		AC acute;
+212	324	Ocircumflex	LC ocircumflex;	UA O;		AC circumflex;
+213	325	Odblacute	LC odblacute;	UA O;		AC hungarumlaut;
+214	326	Odieresis	LC odieresis;	UA O;		AC dieresis;
+215	327	multiply
+216	330	Rcaron		LC rcaron;	UA R;		AC caron;
+217	331	Uring		LC uring;	UA U;		AC ring;
+218	332	Uacute		LC uacute;	UA U;		AC acute;
+219	333	Udblacute	LC udblacute;	UA U;		AC hungarumlaut;
+220	334	Udieresis	LC udieresis;	UA U;		AC dieresis;
+221	335	Yacute		LC yacute;	UA Y;		AC acute;
+222	336	Tcedilla	LC tcedilla;	UA T;		AC cedilla;
+223	337	germandbls
+224	340	racute		UC Racute;	UA r;		AC acute;
+225	341	aacute		UC Aacute;	UA a;		AC acute;
+226	342	acircumflex	UC Acircumflex;	UA a;		AC circumflex;
+227	343	abreve		UC Abreve;	UA a;		AC breve;
+228	344	adieresis	UC Adieresis;	UA a;		AC dieresis;
+229	345	lacute		UC Lacute;	UA l;		AC acute;
+230	346	cacute		UC Cacute;	UA c;		AC acute;
+231	347	ccedilla	UC Ccedilla;	UA c;		AC cedilla;
+232	350	ccaron		UC Ccaron;	UA c;		AC caron;
+233	351	eacute		UC Eacute;	UA e;		AC acute;
+234	352	eogonek		UC Eogonek;	UA e;		AC ogonek;
+235	353	edieresis	UC Edieresis;	UA e;		AC dieresis;
+236	354	ecaron		UC Ecaron;	UA e;		AC caron;
+237	355	iacute		UC Iacute;	UA dotlessi;	AC acute;
+238	356	icircumflex	UC Icircumflex;	UA dotlessi;	AC circumflex;
+239	357	dcaron		UC Dcaron;	UA d;		AC caron;
+240	360	eth 		UC Eth;
+241	361	nacute		UC Nacute;	UA n;		AC acute;
+242	362	ncaron		UC Ncaron;	UA n;		AC caron;
+243	363	oacute		UC Oacute;	UA o;		AC acute;
+244	364	ocircumflex	UC Ocircumflex;	UA o;		AC circumflex;
+245	365	odblacute	UC Odblacute;	UA o;		AC hungarumlaut;
+246	366	odieresis	UC Odieresis;	UA o;		AC dieresis;
+247	367	divide
+248	370	rcaron		UC Rcaron;	UA r;		AC caron;
+249	371	uring		UC Uring;	UA u;		AC ring;
+250	372	uacute		UC Uacute;	UA u;		AC acute;
+251	373	udblacute	UC Udblacute;	UA u;		AC hungarumlaut;
+252	374	udieresis	UC Udieresis;	UA u;		AC dieresis;
+253	375	yacute		UC Yacute;	UA y;		AC acute;
+254	376	tcedilla	UC Tcedilla;	UA t;		AC cedilla;
+255	377	dotaccent
diff --git a/maps/Std.LCM b/maps/Std.LCM
new file mode 100644
index 0000000..adb0f7e
--- /dev/null
+++ b/maps/Std.LCM
@@ -0,0 +1,273 @@
+###############################################################
+#                                                             #
+#  Std.LCM                                                    #
+#                                                             #
+#  LCM (Lout Character Mapping) file for Adobe Standard       #
+#  Encoding (PostScript Language Reference Manual, 2nd Ed.,   #
+#  page 598).                                                 #
+#                                                             #
+#  Jeffrey H. Kingston                                        #
+#  14 March 1996                                              #
+#                                                             #
+#  Dec- Octal   Character       Functions ...                 #
+#  imal code    name                                          #
+#  code                                                       #
+#                                                             #
+###############################################################
+
+000	000	-none-
+001	001	-none-
+002	002	-none-
+003	003	-none-
+004	004	-none-
+005	005	-none-
+006	006	-none-
+007	007	-none-
+008	010	-none-
+009	011	-none-
+010	012	-none-
+011	013	-none-
+012	014	-none-
+013	015	-none-
+014	016	-none-
+015	017	-none-
+016	020	-none-
+017	021	-none-
+018	022	-none-
+019	023	-none-
+020	024	-none-
+021	025	-none-
+022	026	-none-
+023	027	-none-
+024	030	-none-
+025	031	-none-
+026	032	-none-
+027	033	-none-
+028	034	-none-
+029	035	-none-
+030	036	-none-
+031	037	-none-
+032	040	space
+033	041	exclam
+034	042	quotedbl
+035	043	numbersign
+036	044	dollar
+037	045	percent
+038	046	ampersand
+039	047	quoteright
+040	050	parenleft
+041	051	parenright
+042	052	asterisk
+043	053	plus
+044	054	comma
+045	055	hyphen
+046	056	period
+047	057	slash
+048	060	zero
+049	061	one
+050	062	two
+051	063	three
+052	064	four
+053	065	five
+054	066	six
+055	067	seven
+056	070	eight
+057	071	nine
+058	072	colon
+059	073	semicolon
+060	074	less
+061	075	equal
+062	076	greater
+063	077	question
+064	100	at
+065	101	A		LC a;
+066	102	B		LC b;
+067	103	C		LC c;
+068	104	D		LC d;
+069	105	E		LC e;
+070	106	F		LC f;
+071	107	G		LC g;
+072	110	H		LC h;
+073	111	I		LC i;
+074	112	J		LC j;
+075	113	K		LC k;
+076	114	L		LC l;
+077	115	M		LC m;
+078	116	N		LC n;
+079	117	O		LC o;
+080	120	P		LC p;
+081	121	Q		LC q;
+082	122	R		LC r;
+083	123	S		LC s;
+084	124	T		LC t;
+085	125	U		LC u;
+086	126	V		LC v;
+087	127	W		LC w;
+088	130	X		LC x;
+089	131	Y		LC y;
+090	132	Z		LC z;
+091	133	bracketleft
+092	134	backslash
+093	135	bracketright
+094	136	asciicircum
+095	137	underscore
+096	140	quoteleft
+097	141	a		UC A;
+098	142	b		UC B;
+099	143	c		UC C;
+100	144	d		UC D;
+101	145	e		UC E;
+102	146	f		UC F;
+103	147	g		UC G;
+104	150	h		UC H;
+105	151	i		UC I;
+106	152	j		UC J;
+107	153	k		UC K;
+108	154	l		UC L;
+109	155	m		UC M;
+110	156	n		UC N;
+111	157	o		UC O;
+112	160	p		UC P;
+113	161	q		UC Q;
+114	162	r		UC R;
+115	163	s		UC S;
+116	164	t		UC T;
+117	165	u		UC U;
+118	166	v		UC V;
+119	167	w		UC W;
+120	170	x		UC X;
+121	171	y		UC Y;
+122	172	z		UC Z;
+123	173	braceleft
+124	174	bar
+125	175	braceright
+126	176	asciitilde
+127	177	-none-
+128	200	-none-
+129	201	-none-
+130	202	-none-
+131	203	-none-
+132	204	-none-
+133	205	-none-
+134	206	-none-
+135	207	-none-
+136	210	-none-
+137	211	-none-
+138	212	-none-
+139	213	-none-
+140	214	-none-
+141	215	-none-
+142	216	-none-
+143	217	-none-
+144	220	-none-
+145	221	-none-
+146	222	-none-
+147	223	-none-
+148	224	-none-
+149	225	-none-
+150	226	-none-
+151	227	-none-
+152	230	-none-
+153	231	-none-
+154	232	-none-
+155	233	-none-
+156	234	-none-
+157	235	-none-
+158	236	-none-
+159	237	-none-
+160	240	-none-
+161	241	exclamdown
+162	242	cent
+163	243	sterling
+164	244	fraction
+165	245	yen
+166	246	florin
+167	247	section
+168	250	currency
+169	251	quotesingle
+170	252	quotedblleft
+171	253	guillemotleft
+172	254	guilsinglleft
+173	255	guilsinglright
+174	256	fi
+175	257	fl
+176	260	-none-
+177	261	endash
+178	262	dagger
+179	263	daggerdbl
+180	264	periodcentered
+181	265	-none-
+182	266	paragraph
+183	267	bullet
+184	270	quotesinglbase
+185	271	quotedblbase
+186	272	quotedblright
+187	273	guillemotright
+188	274	ellipsis
+189	275	perthousand
+190	276	-none-
+191	277	questiondown
+192	300	-none-
+193	301	grave
+194	302	acute
+195	303	circumflex
+196	304	tilde
+197	305	macron
+198	306	breve
+199	307	dotaccent
+200	310	dieresis
+201	311	-none-
+202	312	ring
+203	313	cedilla
+204	314	-none-
+205	315	hungarumlaut
+206	316	ogonek
+207	317	caron
+208	320	emdash
+209	321	-none-
+210	322	-none-
+211	323	-none-
+212	324	-none-
+213	325	-none-
+214	326	-none-
+215	327	-none-
+216	330	-none-
+217	331	-none-
+218	332	-none-
+219	333	-none-
+220	334	-none-
+221	335	-none-
+222	336	-none-
+223	337	-none-
+224	340	-none-
+225	341	AE
+226	342	-none-
+227	343	ordfeminine
+228	344	-none-
+229	345	-none-
+230	346	-none-
+231	347	-none-
+232	350	Lslash
+233	351	Oslash
+234	352	OE
+235	353	ordmasculine
+236	354	-none-
+237	355	-none-
+238	356	-none-
+239	357	-none-
+240	360	-none-
+241	361	ae
+242	362	-none-
+243	363	-none-
+244	364	-none-
+245	365	dotlessi
+246	366	-none-
+247	367	-none-
+248	370	lslash
+249	371	oslash
+250	372	oe
+251	373	germandbls
+252	374	-none-
+253	375	-none-
+254	376	-none-
+255	377	-none-
diff --git a/maps/Symb.LCM b/maps/Symb.LCM
new file mode 100644
index 0000000..9f31e7c
--- /dev/null
+++ b/maps/Symb.LCM
@@ -0,0 +1,272 @@
+###############################################################
+#                                                             #
+#  Symb.LCM                                                   #
+#                                                             #
+#  LCM (Lout Character Mapping) file for the Adobe            #
+#  Symbol font.                                               #
+#                                                             #
+#  Jeffrey H. Kingston                                        #
+#  14 March 1996                                              #
+#                                                             #
+#  Dec- Octal   Character       Functions ...                 #
+#  imal code    name                                          #
+#  code                                                       #
+#                                                             #
+###############################################################
+
+000	000	-none-
+001	001	-none-
+002	002	-none-
+003	003	-none-
+004	004	-none-
+005	005	-none-
+006	006	-none-
+007	007	-none-
+008	010	-none-
+009	011	-none-
+010	012	-none-
+011	013	-none-
+012	014	-none-
+013	015	-none-
+014	016	-none-
+015	017	-none-
+016	020	-none-
+017	021	-none-
+018	022	-none-
+019	023	-none-
+020	024	-none-
+021	025	-none-
+022	026	-none-
+023	027	-none-
+024	030	-none-
+025	031	-none-
+026	032	-none-
+027	033	-none-
+028	034	-none-
+029	035	-none-
+030	036	-none-
+031	037	-none-
+032	040	space
+033	041	exclam
+034	042	universal
+035	043	numbersign
+036	044	existential
+037	045	percent
+038	046	ampersand
+039	047	suchthat
+040	050	parenleft
+041	051	parenright
+042	052	asteriskmath
+043	053	plus
+044	054	comma
+045	055	minus
+046	056	period
+047	057	slash
+048	060	zero
+049	061	one
+050	062	two
+051	063	three
+052	064	four
+053	065	five
+054	066	six
+055	067	seven
+056	070	eight
+057	071	nine
+058	072	colon
+059	073	semicolon
+060	074	less
+061	075	equal
+062	076	greater
+063	077	question
+064	100	congruent
+065	101	Alpha		LC alpha;
+066	102	Beta		LC beta;
+067	103	Chi		LC chi;
+068	104	Delta		LC delta;
+069	105	Epsilon		LC epsilon;
+070	106	Phi		LC phi;
+071	107	Gamma		LC gamma;
+072	110	Eta		LC eta;
+073	111	Iota		LC iota;
+074	112	theta1		UC Theta;
+075	113	Kappa		LC kappa;
+076	114	Lambda		LC lambda;
+077	115	Mu		LC mu;
+078	116	Nu		LC nu;
+079	117	Omicron		LC omicron;
+080	120	Pi		LC pi;
+081	121	Theta		LC theta;
+082	122	Rho		LC rho;
+083	123	Sigma		LC sigma;
+084	124	Tau		LC tau;
+085	125	Upsilon		LC upsilon;
+086	126	sigma1		UC Sigma;
+087	127	Omega		LC omega;
+088	130	Xi		LC xi;
+089	131	Psi		LC psi;
+090	132	Zeta		LC zeta;
+091	133	bracketleft
+092	134	therefore
+093	135	bracketright
+094	136	perpendicular
+095	137	underscore
+096	140	radicalex
+097	141	alpha		UC Alpha;
+098	142	beta		UC Beta;
+099	143	chi		UC Chi;
+100	144	delta		UC Delta;
+101	145	epsilon		UC Epsilon;
+102	146	phi		UC Phi;
+103	147	gamma		UC Gamma;
+104	150	eta		UC Eta;
+105	151	iota		UC Iota;
+106	152	phi1		UC Phi;
+107	153	kappa		UC Kappa;
+108	154	lambda		UC Lambda;
+109	155	mu		UC Mu;
+110	156	nu		UC Nu;
+111	157	omicron		UC Omicron;
+112	160	pi		UC Pi;
+113	161	theta		UC Theta;
+114	162	rho		UC Rho;
+115	163	sigma		UC Sigma;
+116	164	tau		UC Tau;
+117	165	upsilon		UC Upsilon;
+118	166	omega1		UC Omega;
+119	167	omega		UC Omega;
+120	170	xi		UC Xi;
+121	171	psi		UC Psi;
+122	172	zeta		UC Zeta;
+123	173	braceleft
+124	174	bar
+125	175	braceright
+126	176	similar
+127	177	-none-
+128	200	-none-
+129	201	-none-
+130	202	-none-
+131	203	-none-
+132	204	-none-
+133	205	-none-
+134	206	-none-
+135	207	-none-
+136	210	-none-
+137	211	-none-
+138	212	-none-
+139	213	-none-
+140	214	-none-
+141	215	-none-
+142	216	-none-
+143	217	-none-
+144	220	-none-
+145	221	-none-
+146	222	-none-
+147	223	-none-
+148	224	-none-
+149	225	-none-
+150	226	-none-
+151	227	-none-
+152	230	-none-
+153	231	-none-
+154	232	-none-
+155	233	-none-
+156	234	-none-
+157	235	-none-
+158	236	-none-
+159	237	-none-
+160	240	-none-
+161	241	Upsilon1	LC upsilon;
+162	242	minute
+163	243	lessequal
+164	244	fraction
+165	245	infinity
+166	246	florin
+167	247	club
+168	250	diamond
+169	251	heart
+170	252	spade
+171	253	arrowboth
+172	254	arrowleft
+173	255	arrowup
+174	256	arrowright
+175	257	arrowdown
+176	260	degree
+177	261	plusminus
+178	262	second
+179	263	greaterequal
+180	264	multiply
+181	265	proportional
+182	266	partialdiff
+183	267	bullet
+184	270	divide
+185	271	notequal
+186	272	equivalence
+187	273	approxequal
+188	274	ellipsis
+189	275	arrowvertex
+190	276	arrowhorizex
+191	277	carriagereturn
+192	300	aleph
+193	301	Ifraktur
+194	302	Rfraktur
+195	303	weierstrass
+196	304	circlemultiply
+197	305	circleplus
+198	306	emptyset
+199	307	intersection
+200	310	union
+201	311	propersuperset
+202	312	reflexsuperset
+203	313	notsubset
+204	314	propersubset
+205	315	reflexsubset
+206	316	element
+207	317	notelement
+208	320	angle
+209	321	gradient
+210	322	registerserif
+211	323	copyrightserif
+212	324	trademarkserif
+213	325	product
+214	326	radical
+215	327	dotmath
+216	330	logicalnot
+217	331	logicaland
+218	332	logicalor
+219	333	arrowdblboth
+220	334	arrowdblleft
+221	335	arrowdblup
+222	336	arrowdblright
+223	337	arrowdbldown
+224	340	lozenge
+225	341	angleleft
+226	342	registersans
+227	343	copyrightsans
+228	344	trademarksans
+229	345	summation
+230	346	parenlefttp
+231	347	parenleftex
+232	350	parenleftbt
+233	351	bracketlefttp
+234	352	bracketleftex
+235	353	bracketleftbt
+236	354	bracelefttp
+237	355	braceleftmid
+238	356	braceleftbt
+239	357	braceex
+240	360	-none-
+241	361	angleright
+242	362	integral
+243	363	integraltp
+244	364	integralex
+245	365	integralbt
+246	366	parenrighttp
+247	367	parenrightex
+248	370	parenrightbt
+249	371	bracketrighttp
+250	372	bracketrightex
+251	373	bracketrightbt
+252	374	bracerighttp
+253	375	bracerightmid
+254	376	bracerightbt
+255	377	-none-
diff --git a/maps/koi8r.LCM b/maps/koi8r.LCM
new file mode 100644
index 0000000..a95329b
--- /dev/null
+++ b/maps/koi8r.LCM
@@ -0,0 +1,259 @@
+# Lout Char Map for Russian koi8-r fonts
+# Valeriy Ushakov <uwe@niif.spb.su>
+
+000	000	-none-
+001	001	-none-
+002	002	-none-
+003	003	-none-
+004	004	-none-
+005	005	-none-
+006	006	-none-
+007	007	-none-
+008	010	-none-
+009	011	-none-
+010	012	-none-
+011	013	-none-
+012	014	-none-
+013	015	quotesingle
+014	016	-none-
+015	017	-none-
+016	020	-none-
+017	021	-none-
+018	022	grave
+019	023	-none-
+020	024	-none-
+021	025	-none-
+022	026	-none-
+023	027	-none-
+024	030	-none-
+025	031	-none-
+026	032	-none-
+027	033	-none-
+028	034	-none-
+029	035	-none-
+030	036	-none-
+031	037	-none-
+032	040	space
+033	041	exclam
+034	042	quotedblright
+035	043	numbersign
+036	044	dollar
+037	045	percent
+038	046	ampersand
+039	047	quoteright
+040	050	parenleft
+041	051	parenright
+042	052	asterisk
+043	053	plus
+044	054	comma
+045	055	hyphen
+046	056	period
+047	057	slash
+048	060	zero
+049	061	one
+050	062	two
+051	063	three
+052	064	four
+053	065	five
+054	066	six
+055	067	seven
+056	070	eight
+057	071	nine
+058	072	colon
+059	073	semicolon
+060	074	guillemotleft
+061	075	equal
+062	076	guillemotright
+063	077	question
+064	100	at
+065	101	A		LC a;
+066	102	B		LC b;
+067	103	C		LC c;
+068	104	D		LC d;
+069	105	E		LC e;
+070	106	F		LC f;
+071	107	G		LC g;
+072	110	H		LC h;
+073	111	I		LC i;
+074	112	J		LC j;
+075	113	K		LC k;
+076	114	L		LC l;
+077	115	M		LC m;
+078	116	N		LC n;
+079	117	O		LC o;
+080	120	P		LC p;
+081	121	Q		LC q;
+082	122	R		LC r;
+083	123	S		LC s;
+084	124	T		LC t;
+085	125	U		LC u;
+086	126	V		LC v;
+087	127	W		LC w;
+088	130	X		LC x;
+089	131	Y		LC y;
+090	132	Z		LC z;
+091	133	bracketleft
+092	134	quotedblleft
+093	135	bracketright
+094	136	asciicircum
+095	137	underscore
+096	140	quoteleft
+097	141	a		UC A;
+098	142	b		UC B;
+099	143	c		UC C;
+100	144	d		UC D;
+101	145	e		UC E;
+102	146	f		UC F;
+103	147	g		UC G;
+104	150	h		UC H;
+105	151	i		UC I;
+106	152	j		UC J;
+107	153	k		UC K;
+108	154	l		UC L;
+109	155	m		UC M;
+110	156	n		UC N;
+111	157	o		UC O;
+112	160	p		UC P;
+113	161	q		UC Q;
+114	162	r		UC R;
+115	163	s		UC S;
+116	164	t		UC T;
+117	165	u		UC U;
+118	166	v		UC V;
+119	167	w		UC W;
+120	170	x		UC X;
+121	171	y		UC Y;
+122	172	z		UC Z;
+123	173	endash
+124	174	emdash
+125	175	quotedbl
+126	176	asciitilde
+127	177	-none-
+128	200	-none-
+129	201	-none-
+130	202	-none-
+131	203	-none-
+132	204	-none-
+133	205	-none-
+134	206	-none-
+135	207	-none-
+136	210	-none-
+137	211	-none-
+138	212	-none-
+139	213	-none-
+140	214	-none-
+141	215	-none-
+142	216	-none-
+143	217	-none-
+144	220	-none-
+145	221	-none-
+146	222	-none-
+147	223	-none-
+148	224	-none-
+149	225	-none-
+150	226	-none-
+151	227	-none-
+152	230	-none-
+153	231	-none-
+154	232	-none-
+155	233	-none-
+156	234	-none-
+157	235	-none-
+158	236	-none-
+159	237	-none-
+160	240	-none-
+161	241	-none-
+162	242	-none-
+163	243	afii10071		UC afii10023;
+164	244	-none-
+165	245	-none-
+166	246	-none-
+167	247	-none-
+168	250	-none-
+169	251	-none-
+170	252	-none-
+171	253	-none-
+172	254	-none-
+173	255	-none-
+174	256	-none-
+175	257	-none-
+176	260	-none-
+177	261	-none-
+178	262	-none-
+179	263	afii10023		LC afii10071;
+180	264	-none-
+181	265	-none-
+182	266	-none-
+183	267	-none-
+184	270	afii61352
+185	271	-none-
+186	272	-none-
+187	273	-none-
+188	274	-none-
+189	275	-none-
+190	276	-none-
+191	277	-none-
+192	300	afii10096		UC afii10048;
+193	301	afii10065		UC afii10017;
+194	302	afii10066		UC afii10018;
+195	303	afii10088		UC afii10040;
+196	304	afii10069		UC afii10021;
+197	305	afii10070		UC afii10022;
+198	306	afii10086		UC afii10038;
+199	307	afii10068		UC afii10020;
+200	310	afii10087		UC afii10039;
+201	311	afii10074		UC afii10026;
+202	312	afii10075		UC afii10027;
+203	313	afii10076		UC afii10028;
+204	314	afii10077		UC afii10029;
+205	315	afii10078		UC afii10030;
+206	316	afii10079		UC afii10031;
+207	317	afii10080		UC afii10032;
+208	320	afii10081		UC afii10033;
+209	321	afii10097		UC afii10049;
+210	322	afii10082		UC afii10034;
+211	323	afii10083		UC afii10035;
+212	324	afii10084		UC afii10036;
+213	325	afii10085		UC afii10037;
+214	326	afii10072		UC afii10024;
+215	327	afii10067		UC afii10019;
+216	330	afii10094		UC afii10046;
+217	331	afii10093		UC afii10045;
+218	332	afii10073		UC afii10025;
+219	333	afii10090		UC afii10042;
+220	334	afii10095		UC afii10047;
+221	335	afii10091		UC afii10043;
+222	336	afii10089		UC afii10041;
+223	337	afii10092		UC afii10044;
+224	340	afii10048		LC afii10096;
+225	341	afii10017		LC afii10065;
+226	342	afii10018		LC afii10066;
+227	343	afii10040		LC afii10088;
+228	344	afii10021		LC afii10069;
+229	345	afii10022		LC afii10070;
+230	346	afii10038		LC afii10086;
+231	347	afii10020		LC afii10068;
+232	350	afii10039		LC afii10087;
+233	351	afii10026		LC afii10074;
+234	352	afii10027		LC afii10075;
+235	353	afii10028		LC afii10076;
+236	354	afii10029		LC afii10077;
+237	355	afii10030		LC afii10078;
+238	356	afii10031		LC afii10079;
+239	357	afii10032		LC afii10080;
+240	360	afii10033		LC afii10081;
+241	361	afii10049		LC afii10097;
+242	362	afii10034		LC afii10082;
+243	363	afii10035		LC afii10083;
+244	364	afii10036		LC afii10084;
+245	365	afii10037		LC afii10085;
+246	366	afii10024		LC afii10072;
+247	367	afii10019		LC afii10067;
+248	370	afii10046		LC afii10094;
+249	371	afii10045		LC afii10093;
+250	372	afii10025		LC afii10073;
+251	373	afii10042		LC afii10090;
+252	374	afii10047		LC afii10095;
+253	375	afii10043		LC afii10091;
+254	376	afii10041		LC afii10089;
+255	377	afii10044		LC afii10092;
diff --git a/maps/null.LCM b/maps/null.LCM
new file mode 100644
index 0000000..65926c5
--- /dev/null
+++ b/maps/null.LCM
@@ -0,0 +1,271 @@
+###############################################################
+#                                                             #
+#  null.LCM                                                   #
+#                                                             #
+#  Skeleton LCM (Lout Character Mapping) file                 #
+#                                                             #
+#  Jeffrey H. Kingston                                        #
+#  14 March 1996                                              #
+#                                                             #
+#  Dec- Octal   Character       Functions ...                 #
+#  imal code    name                                          #
+#  code                                                       #
+#                                                             #
+###############################################################
+
+000	000	-none-
+001	001	-none-
+002	002	-none-
+003	003	-none-
+004	004	-none-
+005	005	-none-
+006	006	-none-
+007	007	-none-
+008	010	-none-
+009	011	-none-
+010	012	-none-
+011	013	-none-
+012	014	-none-
+013	015	-none-
+014	016	-none-
+015	017	-none-
+016	020	-none-
+017	021	-none-
+018	022	-none-
+019	023	-none-
+020	024	-none-
+021	025	-none-
+022	026	-none-
+023	027	-none-
+024	030	-none-
+025	031	-none-
+026	032	-none-
+027	033	-none-
+028	034	-none-
+029	035	-none-
+030	036	-none-
+031	037	-none-
+032	040	-none-
+033	041	-none-
+034	042	-none-
+035	043	-none-
+036	044	-none-
+037	045	-none-
+038	046	-none-
+039	047	-none-
+040	050	-none-
+041	051	-none-
+042	052	-none-
+043	053	-none-
+044	054	-none-
+045	055	-none-
+046	056	-none-
+047	057	-none-
+048	060	-none-
+049	061	-none-
+050	062	-none-
+051	063	-none-
+052	064	-none-
+053	065	-none-
+054	066	-none-
+055	067	-none-
+056	070	-none-
+057	071	-none-
+058	072	-none-
+059	073	-none-
+060	074	-none-
+061	075	-none-
+062	076	-none-
+063	077	-none-
+064	100	-none-
+065	101	-none-
+066	102	-none-
+067	103	-none-
+068	104	-none-
+069	105	-none-
+070	106	-none-
+071	107	-none-
+072	110	-none-
+073	111	-none-
+074	112	-none-
+075	113	-none-
+076	114	-none-
+077	115	-none-
+078	116	-none-
+079	117	-none-
+080	120	-none-
+081	121	-none-
+082	122	-none-
+083	123	-none-
+084	124	-none-
+085	125	-none-
+086	126	-none-
+087	127	-none-
+088	130	-none-
+089	131	-none-
+090	132	-none-
+091	133	-none-
+092	134	-none-
+093	135	-none-
+094	136	-none-
+095	137	-none-
+096	140	-none-
+097	141	-none-
+098	142	-none-
+099	143	-none-
+100	144	-none-
+101	145	-none-
+102	146	-none-
+103	147	-none-
+104	150	-none-
+105	151	-none-
+106	152	-none-
+107	153	-none-
+108	154	-none-
+109	155	-none-
+110	156	-none-
+111	157	-none-
+112	160	-none-
+113	161	-none-
+114	162	-none-
+115	163	-none-
+116	164	-none-
+117	165	-none-
+118	166	-none-
+119	167	-none-
+120	170	-none-
+121	171	-none-
+122	172	-none-
+123	173	-none-
+124	174	-none-
+125	175	-none-
+126	176	-none-
+127	177	-none-
+128	200	-none-
+129	201	-none-
+130	202	-none-
+131	203	-none-
+132	204	-none-
+133	205	-none-
+134	206	-none-
+135	207	-none-
+136	210	-none-
+137	211	-none-
+138	212	-none-
+139	213	-none-
+140	214	-none-
+141	215	-none-
+142	216	-none-
+143	217	-none-
+144	220	-none-
+145	221	-none-
+146	222	-none-
+147	223	-none-
+148	224	-none-
+149	225	-none-
+150	226	-none-
+151	227	-none-
+152	230	-none-
+153	231	-none-
+154	232	-none-
+155	233	-none-
+156	234	-none-
+157	235	-none-
+158	236	-none-
+159	237	-none-
+160	240	-none-
+161	241	-none-
+162	242	-none-
+163	243	-none-
+164	244	-none-
+165	245	-none-
+166	246	-none-
+167	247	-none-
+168	250	-none-
+169	251	-none-
+170	252	-none-
+171	253	-none-
+172	254	-none-
+173	255	-none-
+174	256	-none-
+175	257	-none-
+176	260	-none-
+177	261	-none-
+178	262	-none-
+179	263	-none-
+180	264	-none-
+181	265	-none-
+182	266	-none-
+183	267	-none-
+184	270	-none-
+185	271	-none-
+186	272	-none-
+187	273	-none-
+188	274	-none-
+189	275	-none-
+190	276	-none-
+191	277	-none-
+192	300	-none-
+193	301	-none-
+194	302	-none-
+195	303	-none-
+196	304	-none-
+197	305	-none-
+198	306	-none-
+199	307	-none-
+200	310	-none-
+201	311	-none-
+202	312	-none-
+203	313	-none-
+204	314	-none-
+205	315	-none-
+206	316	-none-
+207	317	-none-
+208	320	-none-
+209	321	-none-
+210	322	-none-
+211	323	-none-
+212	324	-none-
+213	325	-none-
+214	326	-none-
+215	327	-none-
+216	330	-none-
+217	331	-none-
+218	332	-none-
+219	333	-none-
+220	334	-none-
+221	335	-none-
+222	336	-none-
+223	337	-none-
+224	340	-none-
+225	341	-none-
+226	342	-none-
+227	343	-none-
+228	344	-none-
+229	345	-none-
+230	346	-none-
+231	347	-none-
+232	350	-none-
+233	351	-none-
+234	352	-none-
+235	353	-none-
+236	354	-none-
+237	355	-none-
+238	356	-none-
+239	357	-none-
+240	360	-none-
+241	361	-none-
+242	362	-none-
+243	363	-none-
+244	364	-none-
+245	365	-none-
+246	366	-none-
+247	367	-none-
+248	370	-none-
+249	371	-none-
+250	372	-none-
+251	373	-none-
+252	374	-none-
+253	375	-none-
+254	376	-none-
+255	377	-none-
diff --git a/notes.dsc b/notes.dsc
new file mode 100644
index 0000000..2e68855
--- /dev/null
+++ b/notes.dsc
@@ -0,0 +1,69 @@
+Basser Lout Version 3 and the PostScript Document Structuring Conventions
+Jeffrey H. Kingston
+24 March 1994
+
+The following notes detail all areas known to the author where Lout does
+not fully conform to Version 3.0 of the PostScript Document Structuring
+Conventions (DSC), as given in Appendix G of the PostScript Language
+Reference Manual, second edition (PLRM).  Page numbers refer to PLRM.
+These are minor infringements which should not trouble anyone (I hope).
+Please let me know of any problems.
+
+Language level and extensions.  Lout does not produce %%LanguageLevel and
+%%Extensions comments, implying that its output is Level 1 PostScript with
+no extensions (p644).  This is true except for PostScript which user-level
+commands choose to add via @SetColour, @Graphic, @IncludeGraphic, and
+@PrependGraphic commands.  If this added PostScript is not Level 1 then
+the absence of %%LanguageLevel and %%Extensions comments will be in
+violation of the DSC.  Lout's standard packages use only Level 1, which
+should take care of most of the @SetColour, @Graphic, and @PrependGraphic
+commands encountered in practice.  If a %%LanguageLevel or %%Extensions
+comment is encountered in an @IncludeGraphic file, Lout prints a warning
+message but takes no other action.
+
+Color separation conventions (pp685-688).  At present Lout generates none
+of the comments described in this section.
+
+DocumentSuppliedResources.  According to p671, each included document
+(%%Begin(End)Document pair in PostScript, @IncludeGraphic file in Lout)
+should have a corresponding "%%DocumentSuppliedResources: file" entry.
+This contradicts p660, where each %%DocumentSuppliedResources entry is
+said to correspond to a %%Begin(End)Resource pair.  Lout does not record
+%%Begin(End)Document pairs in the %%DocumentSuppliedResources list.
+
+EOF.  According to p673, the %%EOF comment of an included document (i.e.
+one enclosed in %%Begin(End)Document) will be ignored.  However, p658
+does not mention this exception, and one Adobe PostScript interpreter at
+least in the author's environment terminates at the first %%EOF whether
+or not it lies inside %%Begin(End)Document.  Accordingly, Lout strips
+out any %%EOF comment within any included document during inclusion.
+
+Font inclusion.  According to p678, "%%IncludeResource: font" comments
+relating to commonly available fonts should be placed in the document
+setup section.  However no definition of which fonts fall into this
+category is offered, so this requirement is not observed by Lout.
+Instead, Lout generates one "%%IncludeResource: font" in the page setup
+section for each font used on the corresponding page, except for fonts
+used on the first page which are done once only in the document setup
+section.  This implies that fonts used on many pages but not the first
+will generate many "%%IncludeResource: font" comments, one for each page
+on which the font is used, which in turn implies that these fonts might
+be downloaded many times (Lout itself never downloads any font, but a
+document manager might react to an "%%IncludeResource: font" comment by
+doing so).  However, most fonts used by most people are already in the
+printer, and in these cases "it is highly likely that the font server
+or document manager would ignore the inclusion request, because the
+font would already be available on the printer" (p678).
+
+PageResources.  This comment is supposed to list all resources needed
+or supplied on the current page except for procsets (p685).  At present
+Lout lists fonts but not encoding vectors under this comment.
+
+Definitions in EPS files.  On p736, "it is strongly recommended that an
+EPS file make its definitions in its own dictionary or dictionaries".
+Lout -EPS does not follow this recommendation, since it is not clear where
+to create this dictionary or dictionaries, given that the DSC states (p625)
+that the prolog should be a sequence of procset definitions (after the
+header section and defaults section) only.  Perhaps each procset should be
+in its own dictionary, as is done in lout/include/fig_prepend for example,
+but this is not stated anywhere.
diff --git a/software/README b/software/README
new file mode 100644
index 0000000..b2dee3a
--- /dev/null
+++ b/software/README
@@ -0,0 +1,16 @@
+
+Lout-related software form elsewhere
+====================================
+
+This directory contains information about software related to
+Lout but not distributed with Lout.  For various practical
+reasons, such as size, licenses, version control, etc., it was
+considered better not to bundle this with Lout itself.  This
+directory is maintained by Jeff Kingston, but he exercises no
+editorial control over it beyond checking that the software
+advertised in it appears to have some connection with Lout.  In
+particular, there is no guarantee that the stuff exists, works,
+is compatible, is supported by its author, etc.  Use at own risk.
+
+Jeff Kingston
+12 April 1995
diff --git a/software/lout.barcodes b/software/lout.barcodes
new file mode 100644
index 0000000..66133c1
--- /dev/null
+++ b/software/lout.barcodes
@@ -0,0 +1,28 @@
+I've developed a little Lout package that will enable you to generate
+barcodes from lout.3.04 (or later).
+
+Usage is very simple. Add the following line to the include portion of
+your lout file
+
+    @SysInclude { barcodes }
+
+and every time you wish to use the barcode font use the following
+syntax
+
+    {BarCode Base} @Font { object }
+
+
+The font is a 3 of 9 barcode font developed by Willem van Schaik.
+
+The package is available as lout.barcodes.1.0.tar.gz and can be found
+with the rest of the Lout distribution at
+
+    ftp://ftp.cs.su.oz.au/jeff/
+
+Regards
+Peter
+----------
+Peter Samuel                                peter@uniq.com.au
+Technical Consultant                        or at present:
+Uniq Professional Services                  Peter.Samuel@nms.otc.com.au
+Phone: +61 2 287 4647                       Fax: +61 2 287 5754
diff --git a/software/lout.eiffel b/software/lout.eiffel
new file mode 100644
index 0000000..4e876fc
--- /dev/null
+++ b/software/lout.eiffel
@@ -0,0 +1,34 @@
+LOUT.EIFFEL - EIFFEL PROGRAM PRINTING IN LOUT DOCUMENTS (VERSION 1.1)
+
+This software allows you to print programs and program fragments
+from the Eiffel programming language with Lout.  The typeset output
+conforms with the style guidelines in the standard reference (Eiffel:
+The Language, by Bertrand Meyer).
+
+When installed, the only change you have to make is to replace the
+@SysInclude { doc } at the top of the document by @SysInclude { edoc },
+then enclose your Eiffel parts in @Eiffel { ... }.
+
+Lout.eiffel is distributed as follows:
+
+   ftp://ftp.cs.su.oz.au/jeff/lout.eiffel.1.1.tar.gz
+
+In other words, in a gzipped tar file called "lout.eiffel.1.1.tar.gz"
+in the "jeff" subdirectory of the home directory of "ftp ftp.cs.su.oz.au"
+with login name "ftp" or "anonymous" using any non-empty password.
+The distribution contains
+
+  *  Source code for the eif2lout program
+
+  *  A manual entry for the eif2lout program
+
+  *  Six Lout library files (edoc, etc.)
+
+  *  A makefile and installation instructions (very easy)
+
+User documentation is contained in the Lout User's Guide distributed
+with Lout itself.
+
+Lout.eiffel was designed and implemented by Jeffrey H. Kingston
+(jeff@cs.su.oz.au) of the Basser Department of Computer Science at the
+University of Sydney.
diff --git a/software/lout.latin2 b/software/lout.latin2
new file mode 100644
index 0000000..29fa82d
--- /dev/null
+++ b/software/lout.latin2
@@ -0,0 +1,3 @@
+LOUT.LATIN2 - LATIN-2 LANGUAGE FORMATTING IN LOUT DOCUMENTS (VERSION 2.0)
+
+This software is now included with the main Lout distribution.
diff --git a/software/lout.russian b/software/lout.russian
new file mode 100644
index 0000000..e247db3
--- /dev/null
+++ b/software/lout.russian
@@ -0,0 +1,5 @@
+LOUT.RUSSIAN - RUSSIAN LANGUAGE FORMATTING IN LOUT DOCUMENTS
+
+This software is now included in the main Lout distribution,
+except that there is a problem with the fonts, which are
+accordingly not being distrubuted.
diff --git a/software/lout.teq b/software/lout.teq
new file mode 100644
index 0000000..b9f53c6
--- /dev/null
+++ b/software/lout.teq
@@ -0,0 +1,40 @@
+LOUT.TEQ - TEX MATHEMATICS IN LOUT DOCUMENTS (VERSION 2.0)
+
+Jeffrey H. Kingston
+jeff@cs.su.oz.au
+
+This software allows you to produce mathematics using the TeX
+mathematical fonts, which are considered to produce better-looking
+mathematics than the Adobe Systems Symbol font used by standard Lout.
+
+When installed, the only change you have to make is to replace the
+@SysInclude { eq } at the top of the document by @SysInclude { teq }.
+Everything else is automatic.  You do not have to have TeX on your
+system for this to work.  The cost is an extra 252 KB in the PostScript
+output file (because the TeX fonts have to be included in it).
+
+Lout.teq is distributed as follows:
+
+   ftp://ftp.cs.su.oz.au/jeff/lout.teq.2.0.tar.gz
+
+In other words, in a gzipped tar file called "lout.teq.2.0.tar.gz"
+in the "jeff" subdirectory of the home directory of "ftp ftp.cs.su.oz.au"
+with login name "ftp" or "anonymous" using any non-empty password.
+The distribution contains
+
+  *  License information (non-commercial only owing to license
+     restrictions on the fonts used)
+
+  *  Five TeX mathematical font metrics and encoding vector files
+
+  *  The teq and teq.lpg source files
+
+  *  A makefile and installation instructions (very easy)
+
+User documentation is contained in the Lout User's Guide distributed
+with Lout itself (Section 7.8).
+
+Lout.teq was designed and implemented by Jeffrey H. Kingston
+(jeff@cs.su.oz.au) of the Basser Department of Computer Science at the
+University of Sydney.  The fonts were converted to PostScript from
+D. E. Knuth's METAFONT by Basil Malyshev.
diff --git a/software/lout.tib b/software/lout.tib
new file mode 100644
index 0000000..a99d0f2
--- /dev/null
+++ b/software/lout.tib
@@ -0,0 +1,26 @@
+			  LoutTib v1.0 Alpha
+			    now available
+
+
+LoutTib is a tool to typeset Tibetan with Lout (batch) document
+formatter. This is an *ALPHA* release (it is only a month old). I
+wrote it as I need Tibetan excerpts in my paper. I find it useful, may
+be you'll find it useful too.
+
+The LoutTib distribution contains
+
+	o Type1 Tibetan font (modified version of Tibetan-ModernA by
+	  Christopher Fynn)
+
+	o Transliteration utility called `louttib', that translate
+	  romanized Tibetan into glyph codes.
+
+	o Supporting Lout code
+
+
+You can get LoutTib (gzipped tar archive) and preformatted PostScript
+documentation (A4, Tibetan font included) from
+
+ ftp://ftp.ptc.spbu.ru/pub/tibet/software/typeset/louttib-1.0alpha.tgz
+ ftp://ftp.ptc.spbu.ru/pub/tibet/software/typeset/louttib-doc.ps.gz
+
diff --git a/whatsnew b/whatsnew
new file mode 100644
index 0000000..bc2c774
--- /dev/null
+++ b/whatsnew
@@ -0,0 +1,226 @@
+Changes and new features introduced in Version 3.04
+
+    Bug fixes
+    Underlining
+    Small capitals now work properly
+    More flexible reference formatting setup file options
+    List items and displays now break across page boundaries
+    Quick reference guide (Appendix A, User's Guide)
+    Version of @Eq that uses TeX's fonts
+    Numbered list items can be tagged and referred to using @NumberOf
+    Multi-paragraph figure captions and multi-page figures
+    Various micro changes to @Eq to improve appearance
+    Merged index entries, and better guidance on how to make an index
+    DOS portability (I hope), still working on Mac portability
+    Eiffel programming language printing
+    Multi-word tags and sorting keys permitted
+    Margin notes
+    `Bypass' symbols (fewer passes for computer-generated Lout source)
+    Arbitrary chapter heading and part heading layouts
+    Viewers like GhostView now show real page numbers
+    @Sup and @Sub symbols (similar to sup and sub in equations)
+    Slovenian language
+    ANSI C (getting closer and closer...)
+    @IncludeGraphic will now accept a compressed file e.g. filename.eps.gz
+    @Verbatim { ... } like in LaTeX.
+ 
+Changes and new features introduced in Version 3.05
+
+    Bug fixes
+    ANSI C (getting very very close...)
+    Removed call to system("sort"), which was causing porting problems
+    Optional list of tables and list of figures in books
+    More options and setup file options for fine-tuning tables and figures
+    Package for printing bar codes (see software directory)
+    Moved initialization of non-English error message files into makefile
+
+Changes and new features introduced in Version 3.06
+
+    Bug fixes
+    Czech
+    Plain text manual pages for people without troff
+
+Changes and new features introduced in Version 3.07
+
+    Bug fixes
+    @URL field added to references
+    @LongFootNote, @LongEndNote, @LongCaption stupidity removed
+    Matrices and delimiters in equations improved
+    Captions to figures and tables may be above or below
+    Theorems, definitions, claims, propositions, lemmas, corollaries, examples
+    Words like "Chapter" and "Theorem" may be changed by the user
+    Numbered displays have been re-implemented and are much improved
+    @RightDisplay symbol
+    @F symbol added as synonym for { Courier Base -1p } @Font ...
+    Ability to set simple document options in the command line
+    Horizontal galleys (for expert users)
+    Drop capitals (large capitals in top left corner of paragraph)
+    Optimal body text breaking (makes large in-line displays more practical)
+    More flexible control of the format of chapter, section etc. headings
+    Option for starting chapters etc. on any, odd, or even pages
+    Command line option -S for safe execution (prohibits calls to system())
+    Symbols for up to three independent indexes at the end of each document
+    References work now when the citation point is after the reference list
+    Placement of objects at arbitrary points on the page
+    Reference lists may be before or after appendices
+    Choice of nine locations for figures and tables (page top, foot, etc.)
+    Numbering of footnotes works properly in all unusual cases now
+    Database index files created afresh automatically if system has stat()
+    Choice of rules for spaces between words (like Lout, troff, or TeX)
+    Spacing in equations (both eq and teq) further improved
+    Kerning of accented characters deduced from corresponding unaccented ones
+    @NotRevealed symbol (for expert users)
+    Another, hopefully better attempt made at Latin-2 formatting
+
+Changes and new features introduced in Version 3.08
+
+    Bug fixes
+
+Changes and new features introduced in Version 3.09
+
+    Bug fixes
+    French hyphenation
+    foll_or_prec works in all cases now, not just galleys (for expert users)
+    @Enclose symbol (for expert users)
+    Multi-page figures and tables can be boxed (revised @Format option)
+    Optimal paragraph breaker has been tuned to discourage widow words,
+      and to hyphenate more paragraphs but use fewer hyphens when it does
+    More consistent set of setup files since all now derived from one master
+    Setup files "doc" and "report" now work with plain text output
+    Unpaginated (continuous) plain text output
+    @FirstChapterNumber, @FirstSectionNumber etc. options in setup file
+    Alternative error message format (filename:linenum:colnum: ...)
+    Newline no longer needed at end of file
+    New diagram drawing package called Diag (replaces Fig):
+      many new link types; trees; labelled nodes and links; many useful options
+    New "oragged" paragraph breaking style, combines ragged and outdent
+    Comprehensive usage message printed by "lout -u"
+    Horizontal spacing of subscripts in equations (both eq and teq) improved
+
+Changes and new features introduced in Version 3.10
+
+    Bug fixes
+    @StructPageNums option for pages numbered by section
+    Dot between section (etc.) numbers and title made optional
+    Updated version of lout.teq (TeX-style equation formatter)
+    EvenPageTop and EvenFullPage figure and table locations
+    @Graph options for plotting values in decreasing order
+    References may cite other references now (bug fix)
+    Installation option for making "lout -S" the default behaviour
+    @E symbol added alongside @Eq as synonym for @OneCol @Eq
+    New language EnglishUK which is like English but with UK hyphenation rules
+    @AnotherFootNote symbol for consecutive footnotes on one word
+    LOUTLIB env variable determines library directory at run time if set
+    Lots of arrow symbols added to eq and teq
+    Paragraph gaps may have "u" suffix, meaning unbreakable (for expert users)
+
+Changes and new features introduced in Version 3.11
+
+    Bug fixes
+    Sorting collation sequence may be locale-specific if desired
+    Changed paragraph breaker, no longer calls the notorious CorrectOversize
+    Word count feature (see manual entry, -w)
+    Italian language
+    Fix for the long-standing bug in database file reading on DOS-like systems
+
+Changes and new features introduced in Version 3.12
+
+    Bug fixes
+    @CurrFamily and @CurrFace symbols similar to @CurrLang (for expert users)
+    @II symbol for getting italics right in headings and tables of contents
+    @Graph now has rticks option for ticks on right-hand side of frame
+    PDF (Adobe Portable Document Format) back end (command line flag -Z)
+    Latin2 and Russian are now part of the main Lout distribution
+    Changed license from GNU General Public License Version 1 to Version 2
+
+Changes and new features introduced in Version 3.13 [released February 1999]
+
+    Bug fixes
+    Gaps between galley components may have "u" (unbreakable) suffix, meaning
+      that the galley may not be broken at this gap (for expert users)
+    @StartHSpan, @StartVSpan, @StartHVSpan, @HSpan, @VSpan (spanning cols, rows)
+    unbreakablefirst @Break and unbreakablelast @Break (stops widows, orphans)
+    named parameters may import their parent, like body parameters (expert)
+    definitions and named parameters may have multiple names (expert)
+    @OneOf symbol chooses result that contains desired galley target (expert)
+    @HLimited, @VLimited symbols for further control over use of space (expert)
+    @ListInterruptItem and @ListNewPage: interrupts, page breaks between items
+    @Verbatim symbol now built-in, so no longer limited to Unix
+    @RawVerbatim like @Verbatim but preserves initial spaces on first line
+    0rt gap for left justification of the preceding object (expert)
+    @Background symbol for printing one object in the background of another
+    Maximum depth of @Includes increased from 7 to 10
+    New table formatting package, see User's Guide (old one is still there)
+    New @Meld symbol for better melding of index entries (expert)
+    Option to @FootNote for choosing your own footnote label
+    Optional full-width abstracts in technical reports
+    Hungarian language including Hungarian-specific heading formats
+
+    *** IMPORTANT: TWO CHANGES THAT ARE NOT UPWARDLY COMPATIBLE ***
+
+    (1)  The @Abstract symbol in technical reports now comes before the
+	 // symbol, not after it.  See User's Guide for details.
+
+    (2)  Setup file arrangements have changed.  You now need to have one
+	 @SysInclude line for each package you use.  For example,
+
+	    Previous versions           Version 3.13
+	    ---------------------------------------------
+
+	    @SysInclude { eq }          @SysInclude { eq }
+	    @SysInclude { ddoc }        @SysInclude { diag }
+				        @SysInclude { doc }
+
+         Import clauses in mydefs files also have to change:
+
+	    Previous versions           Version 3.13
+	    ---------------------------------------------
+
+            import @DocumentLayout      import @BasicSetup
+	    import @CPrint              import @CPSetup
+	    import @DiagramPrint        import @DiagSetup
+
+         Sorry for the inconvenience, but the old system was inconsistent
+	 and was tending towards an unsustainable combinatorial explosion
+	 of setup files.  No changes *within* documents are needed, and
+	 these new arrangements do not affect the content of the packages.
+	 The user's guide documents it all.
+
+Changes and new features introduced in Version 3.14 [released March 1999]
+
+    Bug fixes
+    "lout -PDF" now available as alternative to "lout -Z"
+    Cross referencing list items yields just the raw item number now
+
+Changes and new features introduced in Version 3.15 [May 1999]
+
+    Bug fixes
+    @FootNoteFormat option for controlling format of footnotes
+    @TheoremFormat option for controlling format of theorems (etc.)
+    @ListOuterGap setup file option for space before and after lists
+    Standardized and improved "slides" package, incl. new setup file options
+      (NB please send me @Word&&lecture and @Word&&overhead in your language)
+    Faster database reading (uses more memory though); prevent with -M
+    @DoubleLine symbol in diagrams for drawing a double line
+    -l and -L flags for selecting collation order (see lout -u)
+
+Changes and new features introduced in Version 3.16 [28 May 1999]
+
+    Bug fixes
+    Optimal paragraph breaking weights adjusted yet again (sigh)
+
+Changes and new features introduced in Version 3.17 [13 September 1999]
+
+    Bug fixes
+    @AtEnd option for @Book and @Report (unnumbered back cover page)
+    @Abbreviations symbol in books (like @Introduction but for abbreviations)
+    @Euro symbol added for getting a European Currency symbol
+    Document OBJECT struct declaration in externs.h (for gurus only)
+
+Things that ought to be done but haven't been done yet
+
+    pdfmark in PostScript output
+    Review Uwe's proposal for moving word row marks to the baseline
+
+Jeff Kingston
+17 September 1999
diff --git a/z01.c b/z01.c
new file mode 100644
index 0000000..6338ae5
--- /dev/null
+++ b/z01.c
@@ -0,0 +1,866 @@
+/*@z01.c:Supervise:StartSym, AllowCrossDb, Encapsulated, etc.@****************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z01.c                                                      */
+/*  MODULE:       Supervise                                                  */
+/*  EXTERNS:      main(), StartSym, GalleySym, ForceGalleySym, InputSym,     */
+/*                PrintSym, AllowCrossDb, Encapsulated                       */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+/* On DOS/Win32 we need to set binary mode on stdout (Uwe) */
+#if OS_DOS
+#include <io.h>
+#include <fcntl.h>
+#ifdef __DJGPP__
+#define _setmode(fd, mode)     setmode((fd), (mode))
+#define _fileno(stream)        fileno((stream))
+#endif
+#endif
+
+/*****************************************************************************/
+/*                                                                           */
+/*  MemCheck - check this memory location                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+POINTER MemCheck = 0;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  StartSym        the symbol table entry for \Start (overall scope)        */
+/*  GalleySym       the symbol table entry for @Galley                       */
+/*  ForceGalleySym  the symbol table entry for @ForceGalley                  */
+/*  InputSym        the symbol table entry for @LInput                       */
+/*  PrintSym        the symbol table entry for \Print (root target)          */
+/*  OptGallSym      the symbol table entry for @OptGall (optimal galley rec) */
+/*  FilterInSym     the symbol table entry for @FilterIn                     */
+/*  FilterOutSym    the symbol table entry for @FilterOut                    */
+/*  FilterErrSym    the symbol table entry for @FilterErr                    */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT StartSym, GalleySym, ForceGalleySym, InputSym, PrintSym, OptGallSym,
+       FilterInSym, FilterOutSym, FilterErrSym, VerbatimSym, RawVerbatimSym;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  CommandOptions      Command-line options (ACAT of objects)               */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT CommandOptions;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  UseCollate          Use local collation sequence rather than ASCII       */
+/*  AllowCrossDb        Allow references to OldCrossDb and NewCrossDb        */
+/*  InMemoryDbIndexes   True if cr database index file is to be in-memory    */
+/*  Encapsulated        Produce a one-page encapsulated PostScript file      */
+/*  Kern                Do kerning                                           */
+/*  SafeExecution       Execute safely, i.e. prohibit system() calls         */
+/*  AltErrorFormat      Use alternative error message format                 */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN UseCollate;
+BOOLEAN AllowCrossDb;
+BOOLEAN InMemoryDbIndexes;
+BOOLEAN Encapsulated;
+BOOLEAN Kern;
+BOOLEAN SafeExecution;
+BOOLEAN	AltErrorFormat;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BackEnd		POSTSCRIPT, PLAINTEXT or PDF                         */
+/*  BackEndWord         "PostScript" or "PlainText"                          */
+/*  PlainCharWidth      if PLAINTEXT, the width of each character            */
+/*  PlainCharHeight     if PLAINTEXT, the height of each character           */
+/*  PlainFormFeed       if PLAINTEXT, TRUE if separate components with \f.   */
+/*  InitializeAll       TRUE if this is an initializing run.                 */
+/*  MsgCat              category for locale-specific messages                */
+/*  TotalWordCount      total number of words printed                        */
+/*                                                                           */
+/*****************************************************************************/
+
+int BackEnd;
+FULL_CHAR *BackEndWord;
+FULL_LENGTH PlainCharWidth, PlainCharHeight;
+BOOLEAN PlainFormFeed;
+BOOLEAN InitializeAll;
+#if LOCALE_ON
+nl_catd MsgCat;
+#endif
+int TotalWordCount;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static OBJECT load(xstr, xpredefined, xleft, xright, xindef, xprec)      */
+/*                                                                           */
+/*  Load a predefined operator with these attributes into the symbol table.  */
+/*  If the operator has parameters, load symbols for those also.             */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT load(FULL_CHAR *xstr, unsigned xpre,
+BOOLEAN xleft, BOOLEAN xright, BOOLEAN xindef, unsigned char xprec)
+{ OBJECT s;
+  s = InsertSym(xstr, LOCAL, no_fpos, xprec, xindef, FALSE, xpre,
+	StartSym, nilobj);
+  if( xleft )  InsertSym( AsciiToFull("pa"), LPAR, no_fpos, DEFAULT_PREC,
+    FALSE, FALSE, 0, s, nilobj);
+  if( xright )  InsertSym( AsciiToFull("pb"), RPAR, no_fpos, DEFAULT_PREC,
+    FALSE, FALSE, 0, s, nilobj);
+  if( xleft && xright && xpre != PLUS && xpre != MINUS )
+    right_assoc(s) = TRUE;
+  return s;
+} /* end load */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static void PrintUsage(fp)                                               */
+/*                                                                           */
+/*  Print usage information on file fp.                                      */
+/*                                                                           */
+/*****************************************************************************/
+#define lput(str) fprintf(fp, "%s\n", str)
+
+static void PrintUsage(FILE *fp)
+{
+  lput(""								    );
+  lput("usage:  lout options files"					    );
+  lput(""								    );
+  lput("  -s              suppress access to cross reference database"	    );
+  lput("  -EPS            EPS (Encapsulated PostScript) output"		    );
+  lput("  -PDF or -Z      PDF (Adobe Portable Document Format) output"      );
+  lput("  -p              plain text output instead of PostScript"	    );
+  lput("  -P              like -p but with form-feed char between pages"    );
+  lput("  -S              safe execution (disable calls to system(3))"	    );
+  lput("  -U              unsafe execution (allow calls to system(3))"	    );
+  lput("  -l              ASCII collation order when sorting indexes etc."  );
+  lput("  -L              locale collation order when sorting indexes etc." );
+  lput("  -o file         output to file instead of stdout"		    );
+  lput("  -e file         error messages to file instead of stderr"	    );
+  lput("  -a              alternative error format:  file:line:col ..."	    );
+  lput("  -w              print total number of words in output"	    );
+  lput("  -i file         like @SysInclude { file }; not recommended"	    );
+  lput("  -I directory    add directory to include file search path"	    );
+  lput("  -C directory    add directory to LCM file search path"	    );
+  lput("  -F directory    add directory to font metrics file search path"   );
+  lput("  -H directory    add directory to hyphenation file search path"    );
+  lput("  -D directory    add directory to database file search path"	    );
+  lput("  --option{value} set option e.g. --'@InitialFont{Times Base 10p}'" );
+  lput("  -c file         use file.li instead of lout.li for crossrefs"	    );
+  lput("  -M              save memory (don't read in database indexes)"     );
+  lput("  -x              initializing run, not for ordinary use"	    );
+  lput("  -u              print this usage message on stderr and exit"	    );
+  lput("  -V              print version and configuration information"	    );
+  lput("  -               a file name denoting standard input"		    );
+  lput(""								    );
+
+} /* end PrintUsage */
+
+
+/*@::GetArg(), main()@********************************************************/
+/*                                                                           */
+/*  GetArg(argv, argc, i)                                                    */
+/*                                                                           */
+/*  Get the next argument from the command line and return it.               */
+/*  Return NULL if it isn't there.                                           */
+/*                                                                           */
+/*****************************************************************************/
+
+static FULL_CHAR *GetArg(char *argv[], int argc, int *i)
+{ if( !StringEqual(AsciiToFull(argv[*i]+2), STR_EMPTY) )
+    return AsciiToFull(argv[*i]+2);
+  else if( *i < argc-1 && *argv[*i + 1] != CH_HYPHEN )
+    return AsciiToFull(argv[(*i)++ +1]);
+  else
+    return (FULL_CHAR *) NULL;
+} /* end GetArg */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  main(argc, argv)                                                         */
+/*                                                                           */
+/*  Read command line, initialise everything, read definitions, read         */
+/*  galleys, clean up and exit.                                              */
+/*                                                                           */
+/*****************************************************************************/
+
+int main(int argc, char *argv[])
+{ int i, len;  FULL_CHAR *arg;
+  OBJECT t, y, res, s;			/* current token, parser output      */
+  BOOLEAN stdin_seen;			/* TRUE when stdin file seen         */
+  int source_file_count;		/* number of source files in command */
+  FULL_CHAR *cross_db;			/* name of cross reference database  */
+  FULL_CHAR *outfile;			/* name of output file               */
+  FULL_CHAR *lib;			/* name of library directory         */
+  FILE *out_fp;
+  long MemCheckLong;
+  FULL_CHAR oname[MAX_BUFF], oval[MAX_BUFF], buff[MAX_BUFF], *p;
+  int bp;  OBJECT z;
+  BOOLEAN seen_wordcount;
+#if LOCALE_ON
+  char catname[MAX_BUFF], *loc;
+#endif
+
+  /* find the name of the library directory, from envt or else from -D */
+  lib = AsciiToFull(getenv("LOUTLIB"));
+  if( lib == (FULL_CHAR *) NULL )
+    lib = AsciiToFull(LIB_DIR);
+
+  /* set locale if that's what we are doing */
+#if LOCALE_ON
+  loc = setlocale(LC_MESSAGES, "");
+  if( loc == (char *) NULL )
+  { Error(1, 6, "unable to initialize locale", WARN, no_fpos);
+    loc = "C";
+  }
+  sprintf(catname, "%s/%s/%s/LC_MESSAGES/errors.%s",
+    lib, LOCALE_DIR, loc, loc);
+  MsgCat = catopen(catname, 0);
+#endif
+
+  /* initialise various modules, add current directory to search paths */
+  TotalWordCount = 0;
+  seen_wordcount = FALSE;
+  BackEnd = POSTSCRIPT;
+  BackEndWord = STR_POSTSCRIPT;
+  PlainCharWidth = PLAIN_WIDTH;
+  PlainCharHeight = PLAIN_HEIGHT;
+  PlainFormFeed = FALSE;
+  InitializeAll = FALSE;
+  UseCollate = COLLATE;
+  AllowCrossDb = TRUE;
+  InMemoryDbIndexes = TRUE;
+  Encapsulated = FALSE;
+  SafeExecution = SAFE_DFT ? TRUE : FALSE;
+  Kern = TRUE;
+  MemInit();
+  InitSym();
+  LexInit();
+  InitFiles();
+  AddToPath(SOURCE_PATH,   MakeWord(WORD, STR_EMPTY, no_fpos));
+  AddToPath(DATABASE_PATH, MakeWord(WORD, STR_EMPTY, no_fpos));
+  AddToPath(INCLUDE_PATH,  MakeWord(WORD, STR_EMPTY, no_fpos));
+
+  /* read command line */
+  stdin_seen = FALSE;
+  AltErrorFormat = FALSE;
+  cross_db = CROSS_DB;
+  outfile = STR_STDOUT;
+  source_file_count = 0;
+  New(CommandOptions, ACAT);
+  for( i = 1;  i < argc;  i++ )
+  {
+    if( *argv[i] == CH_HYPHEN ) switch( *(argv[i]+1) )
+    {
+      case CH_FLAG_OUTFILE:
+     
+	/* read name of output file */
+	if( (outfile = GetArg(argv, argc, &i)) == NULL )
+	  Error(1, 7, "usage: -o <filename>", FATAL, no_fpos);
+	if( StringEndsWith(outfile, SOURCE_SUFFIX) )
+	  Error(1, 28, "-o: output file name %s ends with %s",
+	    FATAL, no_fpos, outfile, SOURCE_SUFFIX);
+	break;
+
+
+      case CH_FLAG_SUPPRESS:
+     
+	/* suppress references to OldCrossDb and NewCrossDb */
+	AllowCrossDb = FALSE;
+	break;
+
+
+      case CH_FLAG_MEMCR:
+     
+	/* don't use in-memory database indexes */
+	InMemoryDbIndexes = FALSE;
+	break;
+
+
+      case CH_FLAG_NOKERN:
+     
+	/* suppress kerning */
+	Kern = FALSE;
+	break;
+
+
+      case CH_FLAG_NOCOLLATE:
+     
+	/* suppress local collation */
+	UseCollate = FALSE;
+	break;
+
+
+      case CH_FLAG_COLLATE:
+     
+	/* invoke local collation */
+	UseCollate = TRUE;
+	break;
+
+
+      case CH_FLAG_CROSS:
+     
+	/* read name of cross reference database */
+	if( (cross_db = GetArg(argv, argc, &i)) == NULL )
+	  Error(1, 8, "usage: -c <filename>", FATAL, no_fpos);
+	break;
+
+
+      case CH_FLAG_ERRFILE:
+     
+	/* read log file name */
+	if( (arg = GetArg(argv, argc, &i)) == NULL )
+	  Error(1, 9, "usage: -e <filename>", FATAL, no_fpos);
+	ErrorInit(arg);
+	break;
+
+
+      case CH_FLAG_ALTERR:
+     
+	/* alternative error message format */
+	AltErrorFormat = TRUE;
+	break;
+
+
+      case CH_FLAG_EPSFIRST:
+     
+	/* -EPS produces encapsulated PostScript output */
+	if( !StringEqual(AsciiToFull(argv[i]+1), STR_EPS) )
+	  Error(1, 10, "usage: -EPS", FATAL, no_fpos);
+	Encapsulated = TRUE;
+	break;
+
+
+      case CH_FLAG_DIRPATH:
+     
+	/* add directory to database and sysdatabase paths */
+	if( (arg = GetArg(argv, argc, &i)) == NULL )
+	  Error(1, 11, "usage: -D <directoryname>", FATAL, no_fpos);
+	AddToPath(DATABASE_PATH, MakeWord(WORD, arg, no_fpos));
+	AddToPath(SYSDATABASE_PATH, MakeWord(WORD, arg, no_fpos));
+	break;
+
+
+      case CH_FLAG_ENCPATH:
+     
+	/* add directory to character mapping path */
+	if( (arg = GetArg(argv, argc, &i)) == NULL )
+	  Error(1, 12, "usage: -C <directoryname>", FATAL, no_fpos);
+	AddToPath(MAPPING_PATH, MakeWord(WORD, arg, no_fpos));
+	break;
+
+
+      case CH_FLAG_FNTPATH:
+     
+	/* add directory to font path */
+	if( (arg = GetArg(argv, argc, &i)) == NULL )
+	  Error(1, 13, "usage: -F <directoryname>", FATAL, no_fpos);
+	AddToPath(FONT_PATH, MakeWord(WORD, arg, no_fpos));
+	break;
+
+
+      case CH_FLAG_HYPPATH:
+     
+	/* add directory to hyph path */
+	if( (arg = GetArg(argv, argc, &i)) == NULL )
+	  Error(1, 14, "usage: -H <directoryname>", FATAL, no_fpos);
+	AddToPath(HYPH_PATH, MakeWord(WORD, arg, no_fpos));
+	break;
+
+
+      case CH_FLAG_INCPATH:
+     
+	/* add directory to include and sysinclude paths */
+	if( (arg = GetArg(argv, argc, &i)) == NULL )
+	  Error(1, 15, "usage: -I <directoryname>", FATAL, no_fpos);
+	AddToPath(INCLUDE_PATH, MakeWord(WORD, arg, no_fpos));
+	AddToPath(SYSINCLUDE_PATH, MakeWord(WORD, arg, no_fpos));
+	break;
+
+
+      case CH_FLAG_INCLUDE:
+     
+	/* read sysinclude file and strip any .lt suffix */
+	if( (arg = GetArg(argv, argc, &i)) == NULL )
+	  Error(1, 16, "usage: -i <filename>", FATAL, no_fpos);
+	len = StringLength(arg) - StringLength(SOURCE_SUFFIX);
+	if( len >= 0 && StringEqual(&arg[len], SOURCE_SUFFIX) )
+	  StringCopy(&arg[len], STR_EMPTY);
+	debug0(DFS, D, "  calling DefineFile from main (1)");
+	DefineFile(arg, STR_EMPTY, no_fpos, SOURCE_FILE, SYSINCLUDE_PATH);
+	break;
+
+
+      case CH_FLAG_HYPHEN:
+     
+	/* declare hyphenation file */
+	if( FirstFile(HYPH_FILE) != NO_FILE )
+	  Error(1, 17, "two -h options illegal", FATAL, no_fpos);
+	if( (arg = GetArg(argv, argc, &i)) == NULL )
+	  Error(1, 18, "usage: -h <filename>", FATAL, no_fpos);
+	debug0(DFS, D, "  calling DefineFile from main (2)");
+	DefineFile(arg, STR_EMPTY, no_fpos, HYPH_FILE, INCLUDE_PATH);
+	DefineFile(arg, HYPH_SUFFIX, no_fpos, HYPH_PACKED_FILE, INCLUDE_PATH);
+	break;
+
+
+      case CH_FLAG_VERSION:
+     
+	fprintf(stderr, "%s\n", LOUT_VERSION);
+	fprintf(stderr, "%-28s %s\n",
+	  "Basser Lout written by:", "Jeffrey H. Kingston (jeff@cs.usyd.edu.au)");
+	fprintf(stderr, "%-28s %s\n",
+	  "Free source available from:", "ftp://ftp.cs.usyd.edu.au/jeff/lout");
+	fprintf(stderr, "%-28s %s %s\n",
+	  "This executable compiled:", __TIME__, __DATE__);
+	fprintf(stderr, "%-28s %s%s%s\n", "System include directory:",
+	  lib, STR_DIR, INCL_DIR);
+	fprintf(stderr, "%-28s %s%s%s\n", "System database directory:",
+	  lib, STR_DIR, DATA_DIR);
+	fprintf(stderr, "Database index files created afresh automatically:%s\n",
+	  USE_STAT ? " yes" : " no");
+	fprintf(stderr, "Safe execution (disabling system()) is default:%s\n",
+	  SAFE_DFT ? " yes" : " no");
+	fprintf(stderr, "strcoll() used for sorting by default:%s\n",
+	  COLLATE ? " yes" : " no");
+	fprintf(stderr, "\n");
+	fprintf(stderr, "Basser Lout comes with ABSOLUTELY NO WARRANTY.\n");
+	fprintf(stderr, "This is free software, and you are welcome to\n");
+	fprintf(stderr, "redistribute it under certain conditions.  For\n");
+	fprintf(stderr, "details on both points, consult the GNU General\n");
+	fprintf(stderr, "Public License (distributed with this software).\n");
+	exit(0);
+	break;
+
+
+      case CH_FLAG_WORDS:
+     
+	seen_wordcount = TRUE;
+	break;
+
+
+      case CH_FLAG_PDF:
+
+	BackEnd = PDF;
+	BackEndWord = STR_PDF;
+	break;
+
+
+      case CH_FLAG_FFPLAIN:
+
+	if( StringEqual(AsciiToFull(argv[i]+1), STR_PDF) )
+	{
+	  BackEnd = PDF;
+	  BackEndWord = STR_PDF;
+	  break;
+	}
+	PlainFormFeed = TRUE;
+	/* NB NO BREAK */
+
+
+      case CH_FLAG_PLAIN:
+     
+	BackEnd = PLAINTEXT;
+	BackEndWord = STR_PLAINTEXT;
+	if( *(argv[i]+2) != '\0' )
+	{ float len1, len2;  FULL_CHAR units1, units2;
+	  if( sscanf(argv[i]+2, "%f%c%f%c",&len1,&units1,&len2,&units2) != 4 )
+	  { Error(1, 19, "usage: lout -%c<length><length>",
+	      FATAL, no_fpos, *(argv[i]+1));
+	  }
+	  switch( units1 )
+	  {
+	    case CH_UNIT_CM:	PlainCharWidth = len1 * CM; break;
+	    case CH_UNIT_IN:	PlainCharWidth = len1 * IN; break;
+	    case CH_UNIT_PT:	PlainCharWidth = len1 * PT; break;
+	    case CH_UNIT_EM:	PlainCharWidth = len1 * EM; break;
+
+	    default:	Error(1, 20, "lout -%c: units must be c, i, p, or m",
+				  FATAL, no_fpos, *(argv[i]+1));
+				break;
+	  }
+	  switch( units2 )
+	  {
+	    case CH_UNIT_CM:	PlainCharHeight = len2 * CM; break;
+	    case CH_UNIT_IN:	PlainCharHeight = len2 * IN; break;
+	    case CH_UNIT_PT:	PlainCharHeight = len2 * PT; break;
+	    case CH_UNIT_EM:	PlainCharHeight = len2 * EM; break;
+
+	    default:	Error(1, 21, "lout -%c: units must be c, i, p, or m",
+				  FATAL, no_fpos, *(argv[i]+1));
+				break;
+	  }
+	}
+	break;
+
+
+      case CH_FLAG_INITALL:
+
+	InitializeAll = TRUE;
+	AllowCrossDb = FALSE;
+	break;
+
+
+      case CH_FLAG_USAGE:
+
+	PrintUsage(stderr);
+	exit(0);
+	break;
+
+
+      case CH_FLAG_DEBUG:
+     
+	debug_init(AsciiToFull(argv[i]));
+	break;
+
+
+      case CH_FLAG_MEMCHECK:
+
+	sscanf(argv[i], "-m%ld", &MemCheckLong);
+	MemCheck = (POINTER) MemCheckLong;
+	fprintf(stderr, "checking memory location %ld\n", (long) MemCheck);
+	break;
+
+
+      case '\0':
+     
+	/* read stdin as file name */
+	if( stdin_seen )
+	  Error(1, 23, "standard input specified twice", FATAL, no_fpos);
+	stdin_seen = TRUE;
+	debug0(DFS, D, "  calling DefineFile from main (3)");
+	DefineFile(STR_STDIN, STR_EMPTY, no_fpos, SOURCE_FILE, SOURCE_PATH);
+	break;
+
+
+      case CH_FLAG_OPTION:
+
+	/* read command-line document option */
+	if( sscanf(argv[i]+2, "%[^{ ] { %[^}] }", oname, oval) != 2 ||
+	  StringLength(oname) == 0 || StringLength(oval) == 0 )
+	  Error(1, 24, "error in command-line option %s", FATAL, no_fpos,
+	    argv[i]+2);
+	y = MakeWord(WORD, oname, no_fpos);
+	Link(CommandOptions, y);
+	New(y, ACAT);
+	Link(CommandOptions, y);
+	bp = 0;
+	for( p = oval;  *p != '\0';  p++ )  switch( *p )
+	{
+	  case ' ':
+	  case '\t':
+	  case '\n':
+	  case '{':
+	  case '}':
+
+	    if( bp > 0 )
+	    { buff[bp++] = '\0';
+	      if( Down(y) != y ) 
+	      { OBJECT g;
+		New(g, GAP_OBJ);
+		hspace(g) = 1;  vspace(g) = 0;
+		FposCopy(fpos(g), *no_fpos);
+		Link(y, g);
+	      }
+	      z = MakeWord(WORD, buff, no_fpos);
+	      Link(y, z);
+	      bp = 0;
+	    }
+	    break;
+
+
+	  default:
+
+	    buff[bp++] = *p;
+	    break;
+	}
+	if( bp > 0 )
+	{ buff[bp++] = '\0';
+	  z = MakeWord(WORD, buff, no_fpos);
+	  Link(y, z);
+	}
+	if( Down(y) == y )
+	  Error(1, 25, "error in command-line option %s", FATAL, no_fpos,
+	    argv[i]+2);
+	break;
+
+
+      case CH_FLAG_SAFE:
+
+	/* ensure safe execution by disabling system calls */
+	SafeExecution = TRUE;
+	break;
+
+      case CH_FLAG_UNSAFE:
+
+	/* allow unsafe execution */
+	SafeExecution = FALSE;
+	break;
+
+      default:
+     
+	PrintUsage(stderr);
+	Error(1, 26, "unknown command line flag %s", FATAL, no_fpos, argv[i]);
+	break;
+
+    }
+    else
+    {   /* argument is source file, strip any .lout suffix and define it */
+	arg = AsciiToFull(argv[i]);
+	len = StringLength(arg) - StringLength(SOURCE_SUFFIX);
+	if( len >= 0 && StringEqual(&arg[len], SOURCE_SUFFIX) )
+	  StringCopy(&arg[len], STR_EMPTY);
+	debug0(DFS, D, "  calling DefineFile from main (4)");
+	DefineFile(AsciiToFull(argv[i]), STR_EMPTY, no_fpos,
+	    SOURCE_FILE, SOURCE_PATH);
+	source_file_count++;
+    }
+  } /* for */
+
+  if( UseCollate )
+  {
+    if (!setlocale (LC_COLLATE, ""))
+      Error(1, 30, "unable to initialize collation", WARN, no_fpos);
+  }
+
+  /* start timing if required */
+  ifdebug(DPP, D, ProfileOn("main"));
+
+  /* open output file, or stdout if none specified, and initialize printer */
+  if( StringEqual(outfile, STR_STDOUT) )
+  {
+#if OS_DOS
+    /* For DOS/Win32 we need to set binary mode on stdout to prevent
+       PDF compressed streams and xrefs from being corrupted - Uwe 12/98 */
+    if( BackEnd != PLAINTEXT && _setmode(_fileno(stdout), _O_BINARY) == -1 )
+      Error(1, 31, "cannot set binary mode on stdout", FATAL, no_fpos);
+#endif
+    out_fp = stdout;
+  }
+  else
+  { out_fp = StringFOpen(outfile, BackEnd==PLAINTEXT ? WRITE_TEXT:WRITE_BINARY);
+    if( out_fp == null )
+      Error(1, 27, "cannot open output file %s", FATAL, no_fpos, outfile);
+  }
+  FontInit();
+  ColourInit();
+  LanguageInit();
+  PrintInit(out_fp);
+
+  /* append default directories to file search paths */
+  AddToPath(FONT_PATH,       MakeWordThree(lib, STR_DIR, AsciiToFull(FONT_DIR)));
+  AddToPath(HYPH_PATH,       MakeWordThree(lib, STR_DIR, AsciiToFull(HYPH_DIR)));
+  AddToPath(MAPPING_PATH,    MakeWordThree(lib, STR_DIR, AsciiToFull(MAPS_DIR)));
+  AddToPath(SYSDATABASE_PATH,MakeWordThree(lib, STR_DIR, AsciiToFull(DATA_DIR)));
+  AddToPath(DATABASE_PATH,   MakeWordThree(lib, STR_DIR, AsciiToFull(DATA_DIR)));
+  AddToPath(SYSINCLUDE_PATH, MakeWordThree(lib, STR_DIR, AsciiToFull(INCL_DIR)));
+  AddToPath(INCLUDE_PATH,    MakeWordThree(lib, STR_DIR, AsciiToFull(INCL_DIR)));
+
+  /* use stdin if no source files were mentioned */
+  if( source_file_count == 0 )
+  { debug0(DFS, D, "  calling DefineFile from main (5)");
+    DefineFile(STR_STDIN, STR_EMPTY, no_fpos, SOURCE_FILE, SOURCE_PATH);
+  }
+
+  /* load predefined symbols into symbol table */
+  StartSym       = nilobj;  /* Not a mistake */
+  StartSym       = load(KW_START,        0, FALSE,  FALSE,  TRUE,  NO_PREC     );
+  GalleySym      = load(KW_GALLEY,       0, FALSE,  FALSE,  TRUE,  NO_PREC     );
+  ForceGalleySym = load(KW_FORCE_GALLEY, 0, FALSE,  FALSE,  TRUE,  NO_PREC     );
+  InputSym       = load(KW_INPUT,        0, FALSE,  FALSE,  TRUE,  NO_PREC     );
+  PrintSym       = load(KW_PRINT,        0, FALSE,  FALSE,  TRUE,  NO_PREC     );
+  FilterInSym    = load(KW_FILTERIN,     0, FALSE,  FALSE,  FALSE, NO_PREC     );
+  FilterOutSym   = load(KW_FILTEROUT,    0, FALSE,  FALSE,  FALSE, NO_PREC     );
+  FilterErrSym   = load(KW_FILTERERR,    0, FALSE,  FALSE,  FALSE, NO_PREC     );
+  OptGallSym     = load(KW_OPTGALL,      0, FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  VerbatimSym    = load(KW_VERBATIM,VERBATIM,FALSE, TRUE,   FALSE, DEFAULT_PREC);
+  RawVerbatimSym = load(KW_RAWVERBATIM,RAW_VERBATIM,FALSE, TRUE,   FALSE, DEFAULT_PREC);
+
+
+  load(KW_BEGIN,        BEGIN,          FALSE,  FALSE,  FALSE, BEGIN_PREC  );
+  load(KW_END,          END,            FALSE,  FALSE,  FALSE, END_PREC    );
+  load(KW_ENV,          ENV,            FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_ENVA,         ENVA,           FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_ENVB,         ENVB,           FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_ENVC,         ENVC,           FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_ENVD,         ENVD,           FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_CENV,         CENV,           FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_CLOS,         CLOS,           FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_LVIS,         LVIS,           FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_LUSE,         LUSE,           FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_LEO,          LEO,            FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_LBR,          LBR,            FALSE,  FALSE,  FALSE, LBR_PREC    );
+  load(KW_RBR,          RBR,            FALSE,  FALSE,  FALSE, RBR_PREC    );
+  load(KW_INCLUDE,      INCLUDE,        FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_SYSINCLUDE,   SYS_INCLUDE,    FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_PREPEND,      PREPEND,        FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_SYSPREPEND,   SYS_PREPEND,    FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_DATABASE,     DATABASE,       FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_SYSDATABASE,  SYS_DATABASE,   FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_USE,          USE,            FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_NOT_REVEALED, NOT_REVEALED,   FALSE,  FALSE,  FALSE, NO_PREC     );
+  load(KW_CASE,         CASE,           TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_YIELD,        YIELD,          TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_BACKEND,      BACKEND,        FALSE,  FALSE,  FALSE, DEFAULT_PREC);
+  load(KW_XCHAR,        XCHAR,          FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_FONT,         FONT,           TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_SPACE,        SPACE,          TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_YUNIT,        YUNIT,          TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_ZUNIT,        ZUNIT,          TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_BREAK,        BREAK,          TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_UNDERLINE,    UNDERLINE,      FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_COLOUR,       COLOUR,         TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_COLOR,        COLOUR,         TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_LANGUAGE,     LANGUAGE,       TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_CURR_LANG,    CURR_LANG,      FALSE,  FALSE,  FALSE, DEFAULT_PREC);
+  load(KW_CURR_FAMILY,  CURR_FAMILY,    FALSE,  FALSE,  FALSE, DEFAULT_PREC);
+  load(KW_CURR_FACE,    CURR_FACE,      FALSE,  FALSE,  FALSE, DEFAULT_PREC);
+  load(KW_COMMON,       COMMON,         TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_RUMP,         RUMP,           TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_MELD,         MELD,           TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_INSERT,       INSERT,         TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_ONE_OF,       ONE_OF,         FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_NEXT,         NEXT,           FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_PLUS,         PLUS,           TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_MINUS,        MINUS,          TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_OPEN,         OPEN,           TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_TAGGED,       TAGGED,         TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_WIDE,         WIDE,           TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_HIGH,         HIGH,           TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_HSHIFT,       HSHIFT,         TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_VSHIFT,       VSHIFT,         TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_ONE_COL,      ONE_COL,        FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_ONE_ROW,      ONE_ROW,        FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_HSCALE,       HSCALE,         FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_VSCALE,       VSCALE,         FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_HCOVER,       HCOVER,         FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_VCOVER,       VCOVER,         FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_KERN_SHRINK,  KERN_SHRINK,    TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_SCALE,        SCALE,          TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_HCONTRACT,    HCONTRACT,      FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_VCONTRACT,    VCONTRACT,      FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_HLIMITED,     HLIMITED,       FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_VLIMITED,     VLIMITED,       FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_HEXPAND,      HEXPAND,        FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_VEXPAND,      VEXPAND,        FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_STARTHVSPAN,  START_HVSPAN,   FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_STARTHSPAN,   START_HSPAN,    FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_STARTVSPAN,   START_VSPAN,    FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_HSPAN,        HSPAN,          FALSE,  FALSE,  FALSE, DEFAULT_PREC);
+  load(KW_VSPAN,        VSPAN,          FALSE,  FALSE,  FALSE, DEFAULT_PREC);
+  load(KW_PADJUST,      PADJUST,        FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_HADJUST,      HADJUST,        FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_VADJUST,      VADJUST,        FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_ROTATE,       ROTATE,         TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_BACKGROUND,   BACKGROUND,     TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_INCGRAPHIC,   INCGRAPHIC,     FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_SINCGRAPHIC,  SINCGRAPHIC,    FALSE,  TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_PLAINGRAPHIC, PLAIN_GRAPHIC,  TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_GRAPHIC,      GRAPHIC,        TRUE,   TRUE,   FALSE, DEFAULT_PREC);
+  load(KW_CROSS,        CROSS,          TRUE,   TRUE,   FALSE, CROSSOP_PREC);
+  load(KW_FORCE_CROSS,  FORCE_CROSS,    TRUE,   TRUE,   FALSE, CROSSOP_PREC);
+  load(KW_NULL,         NULL_CLOS,      FALSE,  FALSE,  TRUE,  NO_PREC     );
+  load(KW_PAGE_LABEL,   PAGE_LABEL,     FALSE,  TRUE,   TRUE,  DEFAULT_PREC);
+
+#define setcat(s, mk, jn)  has_mark(s)=mk, has_join(s)=jn
+
+  s=load(KW_VCAT_NN, VCAT, TRUE, TRUE, FALSE, VCAT_PREC); setcat(s,FALSE,FALSE);
+  s=load(KW_VCAT_MN, VCAT, TRUE, TRUE, FALSE, VCAT_PREC); setcat(s,TRUE, FALSE);
+  s=load(KW_VCAT_NJ, VCAT, TRUE, TRUE, FALSE, VCAT_PREC); setcat(s,FALSE,TRUE);
+  s=load(KW_VCAT_MJ, VCAT, TRUE, TRUE, FALSE, VCAT_PREC); setcat(s,TRUE, TRUE);
+  s=load(KW_HCAT_NN, HCAT, TRUE, TRUE, FALSE, HCAT_PREC); setcat(s,FALSE,FALSE);
+  s=load(KW_HCAT_MN, HCAT, TRUE, TRUE, FALSE, HCAT_PREC); setcat(s,TRUE, FALSE);
+  s=load(KW_HCAT_NJ, HCAT, TRUE, TRUE, FALSE, HCAT_PREC); setcat(s,FALSE,TRUE);
+  s=load(KW_HCAT_MJ, HCAT, TRUE, TRUE, FALSE, HCAT_PREC); setcat(s,TRUE, TRUE);
+  s=load(KW_ACAT_NJ, ACAT, TRUE, TRUE, FALSE, ACAT_PREC); setcat(s,FALSE,TRUE);
+  s=load(KW_ACAT_MJ, ACAT, TRUE, TRUE, FALSE, ACAT_PREC); setcat(s,TRUE, TRUE);
+
+  /* intialize current time and load @Moment symbol */
+  InitTime();
+
+  /* initialize filter module */
+  FilterInit();
+
+  /* initialize enviroment table module */
+  EnvInit();
+
+  /* initialise scope chain to <StartSym> */
+  PushScope(StartSym, FALSE, FALSE);
+
+  /* initialise lexical analyser */
+  LexPush(FirstFile(SOURCE_FILE), 0, SOURCE_FILE, 1, FALSE);
+
+  /* process input files */
+  InitParser(cross_db);
+  t = NewToken(BEGIN, no_fpos, 0, 0, BEGIN_PREC, StartSym);
+  res = Parse(&t, StartSym, TRUE, TRUE);
+  debug0(DGT, D, "calling TransferEnd(res) from main()");
+  DisposeObject(CommandOptions);
+  TransferEnd(res);
+  TransferClose();
+
+  /* close various modules */
+  PrintAfterLast();
+  CrossClose();
+  CloseFiles();
+
+  /* remove any leftover filter temporary files */
+  FilterScavenge(TRUE);
+
+  /* print word count, if required */
+  if( seen_wordcount )
+    Error(1, 29, "total of all words printed: %d", WARN,no_fpos,TotalWordCount);
+
+  /* check for unbalanced error blocks */
+  CheckErrorBlocks();
+
+  /* wrapup */
+  ifdebug(DST, D, CheckSymSpread() );
+  ifdebug(ANY, D, DeleteEverySym() );
+  debug0(DMA, D, "at end of run:");
+  ifdebug(DMA, D, DebugMemory() );
+  ifdebug(DPP, D, ProfileOff("main"));
+  ifdebug(DPP, D, ProfilePrint());
+  ifdebug(DET, D, EnvDebug());
+
+#if LOCALE_ON
+  catclose(MsgCat);
+#endif
+
+  exit(0);
+  return 0;
+} /* end main */
diff --git a/z02.c b/z02.c
new file mode 100644
index 0000000..ee4d644
--- /dev/null
+++ b/z02.c
@@ -0,0 +1,966 @@
+/*@z02.c:Lexical Analyser:Declarations@***************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z02.c                                                      */
+/*  MODULE:       Lexical Analyser                                           */
+/*  EXTERNS:      LexLegalName(), LexInit(), LexPush(), LexPop(),            */
+/*                LexNextTokenPos(), LexGetToken()                           */
+/*                                                                           */
+/*  Implementation note:  this fast and cryptic lexical analyser is adapted  */
+/*  from Waite, W. M.: The Cost of Lexical Analysis, in Software - Practice  */
+/*  and Experience, v16, pp473-488 (May 1986).                               */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define	BUFFER_SIZE    8192		/* size of buffer for block read     */
+#define	OTHER		0		/* punctuation or other character    */
+#define	LETTER		1		/* letter type                       */
+#define	QUOTE		2		/* quoted string delimiter type      */
+#define	ESCAPE		3		/* escape character inside strings   */
+#define	COMMENT		4		/* comment delimiter type            */
+#define	CSPACE		5		/* space character type              */
+#define	FORMFEED	6		/* formfeed character type           */
+#define	TAB		7		/* tab character type                */
+#define	NEWLINE		8		/* newline character type            */
+#define	ENDFILE		9		/* end of file character type        */
+
+static	unsigned char	chtbl[256];	/* type table indexed by a FULL_CHAR */
+static	FULL_CHAR	*chpt;		/* pointer to current text character */
+static	FULL_CHAR	*frst;		/* address of first buffer character */
+static	FULL_CHAR	*limit;		/* just past last char in buffer     */
+static	FULL_CHAR	*buf;		/* the character buffer start pos    */
+static	int		blksize;	/* size of block read; others too    */
+static	FULL_CHAR	last_char;	/* last char read in from file       */
+static	FULL_CHAR	*startline;	/* position in buff of last newline  */
+static	FILE_NUM	this_file;	/* number of currently open file     */
+static	FILE		*fp;		/* current input file                */
+static	FILE_POS	file_pos;	/* current file position             */
+static	short		ftype;		/* the type of the current file      */
+static	OBJECT		next_token;	/* next token if already read	     */
+static	int		offset;		/* where to start reading in file    */
+static	int		first_line_num;	/* number of first line (if offset)  */
+static	BOOLEAN		same_file;	/* TRUE if same file as preceding    */
+static	FULL_CHAR	*mem_block;	/* file buffer                       */
+
+static int stack_free;		/* first free slot in lexical stack  */
+static struct {
+  FULL_CHAR	*chpt;		/* pointer to current text character */
+  FULL_CHAR	*frst;		/* address of first buffer character */
+  FULL_CHAR	*limit;		/* just past last char in buffer     */
+  FULL_CHAR	*buf;		/* the character buffer start pos    */
+  int		blksize;	/* size of block read; others too    */
+  FULL_CHAR	last_char;	/* last char read in from file	     */
+  FULL_CHAR	*startline;	/* position in buff of last newline  */
+  FILE_NUM	this_file;	/* number of currently open file     */
+  FILE		*fp;		/* current input file                */
+  FILE_POS	file_pos;	/* current file position             */
+  short		ftype;		/* the type of the current file      */
+  OBJECT	next_token;	/* next token if already read	     */
+  int		offset;		/* where to start reading in file    */
+  int		first_line_num;	/* number of first line (if offset)  */
+  BOOLEAN	same_file;	/* TRUE if same file as preceding    */
+  long		save_ftell;	/* ftell() position if same_file     */
+  FULL_CHAR	*mem_block;	/* file buffer                       */
+} lex_stack[MAX_LEX_STACK];
+
+/*@::LexLegalName(), LexInit()@***********************************************/
+/*                                                                           */
+/*  BOOLEAN LexLegalName(str)                                                */
+/*                                                                           */
+/*  Check whether str is a valid name for a symbol table entry.              */
+/*  Valid names have the BNF form                                            */
+/*                                                                           */
+/*       <name> ::= <letter>  { <letter> }                                   */
+/*       <name> ::= <special> { <special> }                                  */
+/*       <name> ::= <escape>  { <letter> }                                   */
+/*                                                                           */
+/*  The third form is inaccessible to users and is for internal use only.    */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN LexLegalName(FULL_CHAR *str)
+{ int i;  BOOLEAN res;
+  debug1(DLA, DDD, "LexLegalName( %s )", str);
+  switch( chtbl[str[0]] )
+  {
+    case ESCAPE:
+    case LETTER:
+    
+      for( i = 1;  chtbl[str[i]] == LETTER;  i++ );
+      res = str[i] == '\0';
+      break;
+
+
+    case OTHER:
+    
+      for( i = 1;  chtbl[str[i]] == OTHER;  i++ );
+      res = str[i] == '\0';
+      break;
+
+
+    default:
+    
+      res = FALSE;
+      break;
+
+  }
+  debug1(DLA, DDD, "LexLegalName returning %s", bool(res));
+  return res;
+} /* end LexLegalName */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  LexInit()                                                                */
+/*                                                                           */
+/*  Initialise character types.  Those not touched are 0 (OTHER).            */
+/*  The function initchtbl() assists in initializing the chtbl.              */
+/*                                                                           */
+/*****************************************************************************/
+
+static void initchtbl(val, str)
+int val;  FULL_CHAR *str;
+{ int i;
+  for( i = 0;  str[i] != '\0';  i++ )
+	chtbl[ str[i] ] = val;
+} /* end initchtbl */
+
+void LexInit(void)
+{ initchtbl(LETTER,  STR_LETTERS_LOWER);
+  initchtbl(LETTER,  STR_LETTERS_UPPER);
+  initchtbl(LETTER,  STR_LETTERS_SYMSTART);
+  initchtbl(LETTER,  STR_LETTERS_UNDERSCORE);
+  initchtbl(LETTER,  STR_LETTERS_EXTRA0);
+  initchtbl(LETTER,  STR_LETTERS_EXTRA1);
+  initchtbl(LETTER,  STR_LETTERS_EXTRA2);
+  initchtbl(LETTER,  STR_LETTERS_EXTRA3);
+  initchtbl(LETTER,  STR_LETTERS_EXTRA4);
+  initchtbl(LETTER,  STR_LETTERS_EXTRA5);
+  initchtbl(LETTER,  STR_LETTERS_EXTRA6);
+  initchtbl(LETTER,  STR_LETTERS_EXTRA7);
+  initchtbl(QUOTE,   STR_QUOTE);
+  initchtbl(ESCAPE,  STR_ESCAPE);
+  initchtbl(COMMENT, STR_COMMENT);
+  initchtbl(CSPACE,  STR_SPACE);
+  initchtbl(FORMFEED,STR_FORMFEED);
+  initchtbl(TAB,     STR_TAB);
+  initchtbl(NEWLINE, STR_NEWLINE);
+  chtbl['\0'] = ENDFILE;
+  stack_free = -1;
+} /* end LexInit */
+
+/*@::LexPush(), LexPop()@*****************************************************/
+/*                                                                           */
+/*  LexPush(x, offs, ftype, lnum, same)                                      */
+/*                                                                           */
+/*  Start reading from the file sequence whose first file is x (subsequent   */
+/*  files are obtained from NextFile).  The first file (x) is to be fseeked  */
+/*  to offs.  When the sequence is done, ftype determines how to continue:   */
+/*                                                                           */
+/*      ftype          action                                                */
+/*                                                                           */
+/*      SOURCE_FILE    last input file ends, return @End \Input              */
+/*      DATABASE_FILE  database file, return @End \Input                     */
+/*      INCLUDE_FILE   include file, must pop lexical analyser and continue  */
+/*      FILTER_FILE    filter file, return @End @FilterOut                   */
+/*                                                                           */
+/*  lnum is the line number at offs, to be used when creating file pos's     */
+/*  in the tokens returned.  same is TRUE when this file is the same as      */
+/*  the file currently being read, in which case there is no need to         */
+/*  close that file and open this one; just an fseek is required.            */
+/*                                                                           */
+/*****************************************************************************/
+
+void LexPush(FILE_NUM x, int offs, int ftyp, int lnum, BOOLEAN same)
+{ int i;
+  debug5(DLA, DD, "LexPush(%s, %d, %s, %d, %s)", FileName(x), offs,
+    ftyp==SOURCE_FILE ? "source" : ftyp==INCLUDE_FILE ? "include":"database",
+    lnum, bool(same));
+  if( stack_free >= MAX_LEX_STACK - 1 )
+  { if( ftyp == INCLUDE_FILE )
+      Error(2, 1, "too many open files when opening include file %s; open files are:",
+        WARN, PosOfFile(x), FullFileName(x));
+    else
+      Error(2, 2, "too many open files when opening database file %s; open files are:",
+        WARN, PosOfFile(x), FileName(x));
+    for( i = stack_free - 1;  i >= 0;  i-- )
+    {
+      Error(2, 23, "  %s", WARN, no_fpos,
+	EchoFileSource(lex_stack[i].this_file));
+    }
+    Error(2, 24, "exiting now", FATAL, no_fpos);
+  }
+  if( stack_free >= 0 )  /* save current state */
+  { lex_stack[stack_free].chpt		 = chpt;
+    lex_stack[stack_free].frst		 = frst;
+    lex_stack[stack_free].limit		 = limit;
+    lex_stack[stack_free].buf		 = buf;
+    lex_stack[stack_free].blksize	 = blksize;
+    lex_stack[stack_free].last_char	 = last_char;
+    lex_stack[stack_free].startline	 = startline;
+    lex_stack[stack_free].this_file	 = this_file;
+    lex_stack[stack_free].fp		 = fp;
+    lex_stack[stack_free].ftype		 = ftype;
+    lex_stack[stack_free].next_token	 = next_token;
+    lex_stack[stack_free].offset	 = offset;
+    lex_stack[stack_free].first_line_num = first_line_num;
+    lex_stack[stack_free].same_file	 = same_file;
+    lex_stack[stack_free].mem_block	 = mem_block;
+    FposCopy( lex_stack[stack_free].file_pos, file_pos );
+  }
+  stack_free += 1;
+  ifdebug(DMA, D,
+    DebugRegisterUsage(MEM_LEX,1, (MAX_LINE+BUFFER_SIZE+2)*sizeof(FULL_CHAR)));
+  mem_block = (FULL_CHAR *) malloc((MAX_LINE+BUFFER_SIZE+2)*sizeof(FULL_CHAR));
+  if( mem_block == NULL )
+    Error(2, 3, "run out of memory when opening file %s",
+      FATAL, PosOfFile(x), FullFileName(x));
+  buf = chpt = &mem_block[MAX_LINE];
+  last_char = CH_NEWLINE;
+  this_file = x;  offset = offs;
+  first_line_num = lnum;  same_file = same;
+  ftype = ftyp;  next_token = nilobj;
+  *chpt = '\0';
+  if( same_file )
+  { lex_stack[stack_free-1].save_ftell = ftell(fp);
+  }
+  else
+  { fp = null;
+  }
+} /* end LexPush */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  LexPop() - pop lexical analyser.                                         */
+/*                                                                           */
+/*****************************************************************************/
+
+void LexPop(void)
+{ debug0(DLA, DD, "LexPop()");
+  assert( stack_free > 0, "LexPop: stack_free <= 0!" );
+  stack_free--;
+  if( same_file )
+  { fseek(fp, lex_stack[stack_free].save_ftell, SEEK_SET);
+  }
+  else
+  { if( fp != null )  fclose(fp);
+  }
+  ifdebug(DMA, D,
+   DebugRegisterUsage(MEM_LEX,-1,-(MAX_LINE+BUFFER_SIZE+2)* (int) sizeof(FULL_CHAR))
+  );
+  free( (char *) mem_block);
+  mem_block	 = lex_stack[stack_free].mem_block;
+  chpt		 = lex_stack[stack_free].chpt;
+  frst		 = lex_stack[stack_free].frst;
+  limit		 = lex_stack[stack_free].limit;
+  buf		 = lex_stack[stack_free].buf;
+  blksize	 = lex_stack[stack_free].blksize;
+  last_char	 = lex_stack[stack_free].last_char;
+  startline	 = lex_stack[stack_free].startline;
+  this_file	 = lex_stack[stack_free].this_file;
+  fp		 = lex_stack[stack_free].fp;
+  ftype		 = lex_stack[stack_free].ftype;
+  next_token	 = lex_stack[stack_free].next_token;
+  offset	 = lex_stack[stack_free].offset;
+  first_line_num = lex_stack[stack_free].first_line_num;
+  same_file	 = lex_stack[stack_free].same_file;
+  FposCopy( file_pos, lex_stack[stack_free].file_pos );
+} /* end LexPop */
+
+
+/*@::setword(), LexNextTokenPos(), srcnext()@*********************************/
+/*                                                                           */
+/*  setword(typ, res, file_pos, str, len)                                    */
+/*                                                                           */
+/*  Set variable res to a WORD or QWORD token containing string str, etc.    */
+/*                                                                           */
+/*****************************************************************************/
+
+#define setword(typ, res, file_pos, str, len)				\
+{ NewWord(res, typ, len, &file_pos);					\
+  FposCopy(fpos(res), file_pos);					\
+  for( c = 0;  c < len;  c++ ) string(res)[c] = str[c];			\
+  string(res)[c] = '\0';						\
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  long LexNextTokenPos()                                                   */
+/*                                                                           */
+/*  Equivalent to ftell() on the (buffered) current lex file.                */
+/*                                                                           */
+/*****************************************************************************/
+
+long LexNextTokenPos(void)
+{ long res;
+  if( next_token != nilobj )
+    Error(2, 4, "illegal macro invocation in database",
+      FATAL, &fpos(next_token));
+  res = ftell(fp) - (limit - chpt) - (buf - frst);
+#if DB_FIX
+  /* uwe: 1997-11-04
+   *
+   * On NT under Visual C++ ftell() and fseek() always use binary
+   * positions, even if the file was opened in text mode.  This means
+   * that every LF in between the CHPT and LIMIT was counted by
+   * ftell() as *TWO* bytes.  The pointer arithmetic above adjusts the
+   * ftold value as lout has not yet read chars past CHPT, but it
+   * counts each LF as *ONE* byte, naturally.
+   *
+   * The code below compensates for this binary/text brain death.
+   *
+   * PS: gcc from Cygnus' gnuwin32 has sane ftell() and does *NOT*
+   * need this workaround (I haven't tried compiling lout with gcc
+   * though, as the result will need cygwin.dll to run).
+   */
+  {
+    register FULL_CHAR *p;
+    for (p = chpt; p < limit; ++p) {
+      if (*p == (FULL_CHAR) CH_NEWLINE)
+        --res;
+    }
+  }
+#endif /* DB_FIX */
+
+  debug1(DLA, DD, "LexNextTokenPos() returning %ld", res);
+  return res;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static srcnext()                                                         */
+/*                                                                           */
+/*  Move to new line of input file.  May need to recharge buffer.            */
+/*                                                                           */
+/*****************************************************************************/
+
+static void srcnext(void)
+{ register FULL_CHAR *col;
+  debugcond4(DLA, DD, stack_free <= 1,
+    "srcnext();  buf: %d, chpt: %d, frst: %d, limit: %d",
+    buf - mem_block, chpt - mem_block, frst - mem_block, limit - mem_block);
+
+  /* if time to transfer last line to area preceding buffer, do so */
+  if( blksize != 0 && chpt < limit )
+  { debugcond0(DLA, DD, stack_free <= 1, "srcnext: transferring.");
+    col = buf;
+    while( (*--col = *--limit) != CH_NEWLINE );
+    frst = col + 1;  limit++;  blksize = 0;
+  }
+
+  /* if buffer is empty, read next block */
+  /*** changed by JK 9/92 from "if( chpt == limit )" to fix long lines bug */
+  if( chpt >= limit )
+  { if( chpt > limit )
+    { col_num(file_pos) = 1;
+      Error(2, 5, "line is too long (or final newline missing)",
+	FATAL, &file_pos);
+    }
+    chpt = frst;
+    blksize = fread( (char *) buf, sizeof(char), BUFFER_SIZE, fp);
+    if( blksize > 0 )
+      last_char = *(buf + blksize - 1);
+    if( blksize < BUFFER_SIZE && last_char != CH_NEWLINE )
+    {
+      /* at end of file since blksize = 0; so add missing newline char */
+      blksize++;
+      last_char = *(buf+blksize-1) = CH_NEWLINE;
+    }
+    debugcond4(DLA, DD, stack_free <= 1,
+      "srcnext: %d = fread(0x%x, %d, %d, fp)",
+      blksize, buf, sizeof(char), BUFFER_SIZE);
+    frst = buf;  limit = buf + blksize;  *limit = CH_NEWLINE;
+  }
+
+  /* if nothing more to read, make this clear */
+  if( chpt >= limit )
+  { debugcond0(DLA, DD, stack_free <= 1, "srcnext: nothing more to read");
+    chpt = limit = buf;  *limit = '\0';
+  }
+  debugcond4(DLA, DD, stack_free <= 1,
+    "srcnext returning;  buf: %d, chpt: %d, frst: %d, limit: %d",
+    buf - mem_block, chpt - mem_block, frst - mem_block, limit - mem_block);
+} /* end srcnext */
+
+
+/*@::LexGetToken()@***********************************************************/
+/*                                                                           */
+/*  OBJECT LexGetToken()                                                     */
+/*                                                                           */
+/*  Get next token from input.  Look it up in symbol table.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT LexGetToken(void)
+{
+	   FULL_CHAR *startpos;		/* where the latest token started    */
+  register FULL_CHAR *p, *q;		/* pointer to current input char     */
+  register int      c;			/* temporary character (really char) */
+  OBJECT   res;				/* result token                      */
+  int vcount, hcount;			/* no. of newlines and spaces seen   */
+
+  if( next_token != nilobj )
+  { next_token = Delete(res = next_token, PARENT);
+    debugcond4(DLA, DD, stack_free <= 1,
+      "LexGetToken%s (in macro) returning %d.%d %s",
+      EchoFilePos(&file_pos), vspace(res), hspace(res), EchoToken(res));
+    return res;
+  }
+
+  res = nilobj;  p = chpt;
+  vcount = hcount = 0;
+  do switch( chtbl[*p++] )
+  {
+      case ESCAPE:
+      
+	if( ftype==DATABASE_FILE && *p>='a' && *p<='z' && *(p+1) == '{' /*}*/ )
+	{ res = NewToken(LBR, &file_pos, 0, 0, (unsigned) *p, StartSym);
+	  p += 2;
+	}
+	else
+	{
+	  col_num(file_pos) = (startpos = p-1) - startline;
+	  Error(2, 6, "character %c outside quoted string",
+	    WARN, &file_pos, *startpos);
+	}
+	break;
+
+
+      case COMMENT:
+      
+	debug1(DLA, DDD, "LexGetToken%s: comment", EchoFilePos(&file_pos));
+	while( (c = *p++) != CH_NEWLINE && c != '\0' );
+	if( c == CH_NEWLINE )
+	{
+	  /* do NEWLINE action, only preserve existing horizontal space */
+	  /* and don't count the newline in the vcount. */
+	  chpt = p;  srcnext();
+	  line_num(file_pos)++;
+	  col_num(file_pos) = 0;
+	  startline = (p = chpt) - 1;
+	}
+	else
+	{
+	  --p;
+	}
+	break;
+
+
+      case CSPACE:
+      case FORMFEED:
+
+	hcount++;
+	break;
+
+
+      case TAB:
+
+	hcount += 8;
+	break;
+
+
+      case NEWLINE:
+      
+	chpt = p;  srcnext();
+	line_num(file_pos)++;
+	col_num(file_pos) = 0;
+	vcount++;  hcount = 0;
+	startline = (p = chpt) - 1;
+	break;
+
+
+      case ENDFILE:
+      
+	debug0(DLA, DDD, "LexGetToken: endfile");
+	if( !same_file )
+	{
+	  /* close current file, if any */
+	  if( fp != null )
+	  { fclose(fp);  fp = null;
+	    this_file = ftype == SOURCE_FILE ? NextFile(this_file) : NO_FILE;
+	  }
+
+	  /* open next file */
+	  while( this_file != NO_FILE )
+	  { file_num(file_pos) = this_file;
+	    line_num(file_pos) = 1;
+	    col_num(file_pos) = 0;
+	    fp = OpenFile(this_file, FALSE, TRUE);
+	    if( fp != null )  break;
+	    Error(2, 7, "cannot open file %s",
+	      WARN, &file_pos, FullFileName(this_file));
+	    this_file = ftype == SOURCE_FILE ? NextFile(this_file) : NO_FILE;
+	  }
+	}
+
+	if( fp != null )
+	{ if( offset != 0 )
+	  { debugcond1(DLA, DD, stack_free <= 1, "fseek(fp, %d, SEEK_SET)", offset);
+	    fseek(fp, (long) offset, SEEK_SET);
+	    offset = 0L;
+	    line_num(file_pos) = first_line_num;
+	  }
+	  frst = limit = chpt = buf;
+	  blksize = 0;  last_char = CH_NEWLINE;
+	  srcnext();
+	  startline = (p = chpt) - 1;
+	  hcount = 0;
+	}
+
+	/* no next file, so take continuation */
+	else switch( ftype )
+	{
+
+	  case SOURCE_FILE:
+	  case DATABASE_FILE:
+	  
+	    /* input ends with "@End \Input" then UNEXPECTED_EOF */
+	    res = NewToken(END, &file_pos, 0, 0, END_PREC, StartSym);
+	    next_token = NewToken(UNEXPECTED_EOF, &file_pos,0,0,NO_PREC,nilobj);
+	    --p;  startline = p;
+	    break;
+
+
+	  case FILTER_FILE:
+	  
+	    /* input ends with "@End @FilterOut" */
+	    res = NewToken(END, &file_pos, 0, 0, END_PREC, FilterOutSym);
+	    /* ***
+	    next_token = NewToken(CLOSURE,&file_pos,0,0,NO_PREC,FilterOutSym);
+	    *** */
+	    --p;  startline = p;
+	    break;
+
+
+	  case INCLUDE_FILE:
+
+	    LexPop();
+	    p = chpt;
+	    hcount = 0;
+	    break;
+
+
+	  default:
+	  
+	    assert(FALSE, "unknown file type");
+	    break;
+
+	} /* end switch */
+	break;
+
+
+      case OTHER:
+      
+	col_num(file_pos) = (startpos = p-1) - startline;
+	while( chtbl[*p++] == OTHER );
+	c = p - startpos - 1;
+	do
+	{ res = SearchSym(startpos, c);
+	  --c; --p;
+	} while( c > 0 && res == nilobj );
+	goto MORE;  /* 7 lines down */
+
+
+      case LETTER:
+      
+	col_num(file_pos) = (startpos = p-1) - startline;
+	while( chtbl[*p++] == LETTER );  --p;
+	res = SearchSym(startpos, p - startpos);
+
+	MORE: if( res == nilobj )
+	{ setword(WORD, res, file_pos, startpos, p-startpos);
+	}
+	else if( type(res) == MACRO )
+	{ if( recursive(res) )
+	  { Error(2, 8, "recursion in macro", WARN, &file_pos);
+	    setword(WORD, res, file_pos, startpos, p-startpos);
+	  }
+	  else
+	  { res = CopyTokenList( sym_body(res), &file_pos );
+	    if( res != nilobj ) next_token = Delete(res, PARENT);
+	    else hcount = 0;
+	  }
+	}
+	else if( predefined(res) == 0 )
+	{ res = NewToken(CLOSURE, &file_pos, 0, 0, precedence(res), res);
+	}
+	else if( predefined(res) == INCLUDE || predefined(res) == SYS_INCLUDE )
+	{ OBJECT t, fname;  FILE_NUM fnum;  int len;  BOOLEAN scope_suppressed;
+	  chpt = p;
+	  t = LexGetToken();
+	  scope_suppressed = (type(t)==WORD && StringEqual(string(t), KW_LBR));
+
+	  if( type(t)!=LBR && !scope_suppressed )
+	  { Error(2, 9, "%s expected (after %s)",
+	      WARN, &fpos(t), KW_LBR, SymName(res));
+	    Dispose(t);
+	    res = nilobj;
+	    break;
+	  }
+	  if( scope_suppressed )
+	  { UnSuppressScope();
+	    Dispose(t);
+	    New(t, LBR);
+	  }
+	  fname = Parse(&t, nilobj, FALSE, FALSE);
+	  fname = ReplaceWithTidy(fname, FALSE);
+	  if( scope_suppressed ) SuppressScope();
+	  if( !is_word(type(fname)) )
+	  { Error(2, 10, "name of include file expected here",
+	      WARN, &fpos(fname));
+	    Dispose(fname);
+	    res = nilobj;
+	    break;
+	  }
+	  len = StringLength(string(fname)) - StringLength(SOURCE_SUFFIX);
+	  if( len >= 0 && StringEqual(&string(fname)[len], SOURCE_SUFFIX) )
+	    StringCopy(&string(fname)[len], STR_EMPTY);
+	  debug0(DFS, D, "  calling DefineFile from LexGetToken");
+	  fnum = DefineFile(string(fname), STR_EMPTY, &fpos(fname),
+	      INCLUDE_FILE,
+	      predefined(res)==INCLUDE ? INCLUDE_PATH : SYSINCLUDE_PATH);
+	  Dispose(fname);
+	  LexPush(fnum, 0, INCLUDE_FILE, 1, FALSE);
+	  res = LexGetToken();
+	  vcount++; /** TEST ADDITION! **/
+	  p = chpt;
+	}
+	else if( predefined(res) == END )
+	  res = NewToken(predefined(res), &file_pos,0,0,precedence(res),nilobj);
+	else
+	  res = NewToken(predefined(res), &file_pos,0,0,precedence(res),res);
+	break;
+
+
+      case QUOTE:
+      
+	col_num(file_pos) = (startpos = q = p) - 1 - startline;
+	do switch( chtbl[*q++ = *p++] )
+	{
+	  case OTHER:
+	  case LETTER:
+	  case COMMENT:
+	  case CSPACE:
+	  case FORMFEED:
+	  case TAB:	break;
+
+	  case NEWLINE:
+	  case ENDFILE:	--p;
+			Error(2, 11, "unterminated string", WARN, &file_pos);
+			setword(QWORD, res, file_pos, startpos, q-1-startpos);
+			break;
+
+	  case QUOTE:	setword(QWORD, res, file_pos, startpos, q-1-startpos);
+			break;
+
+	  case ESCAPE:	q--;
+			if( chtbl[*p] == NEWLINE || chtbl[*p] == ENDFILE )
+			{ Error(2, 12, "unterminated string", WARN, &file_pos);
+			  setword(QWORD, res, file_pos, startpos, q-startpos);
+			}
+			else if( octaldigit(*p) )
+			{ int count, ch;
+			  count = ch = 0;
+			  do
+			  { ch = ch * 8 + digitchartonum(*p++);
+			    count++;
+			  } while( octaldigit(*p) && count < 3 );
+			  if( ch == '\0' )
+			    Error(2, 13, "skipping null character in string",
+			      WARN, &file_pos);
+			  else *q++ = ch;
+			}
+			else *q++ = *p++;
+			break;
+
+	  default:	Error(2, 14, "LexGetToken: error in quoted string",
+			  INTERN, &file_pos);
+			break;
+
+	} while( res == nilobj );
+	break;
+
+
+      default:
+      
+	assert(FALSE, "LexGetToken: bad chtbl[]");
+	break;
+
+  } while( res == nilobj );
+
+  if( p - startline >= MAX_LINE )
+  { col_num(file_pos) = 1;
+    Error(2, 15, "line is too long (or final newline missing)",FATAL,&file_pos);
+  }
+
+  chpt = p;
+  vspace(res) = vcount;
+  hspace(res) = hcount;
+  debugcond5(DLA, DD, stack_free <= 1, "LexGetToken%s returning %s %s %d.%d",
+    EchoFilePos(&file_pos), Image(type(res)), EchoToken(res),
+    vspace(res), hspace(res));
+  return res;
+} /* end LexGetToken */
+
+
+/*@::LexScanVerbatim@*********************************************************/
+/*                                                                           */
+/*  OBJECT LexScanVerbatim(fp, end_stop, err_pos, lessskip)                  */
+/*                                                                           */
+/*  Scan input file and transfer to filter file fp, or if that is NULL, make */
+/*  a VCAT of objects, one per line (or just a WORD if one line only), and   */
+/*  return that object as the result.  If end_stop, terminate at @End, else  */
+/*  terminate at matching right brace.                                       */
+/*                                                                           */
+/*  If lessskip is true it means that we should skip only up to and          */
+/*  including the first newline character, as opposed to the usual           */
+/*  skipping of all initial white space characters.                          */
+/*                                                                           */
+/*****************************************************************************/
+
+#define print(ch)							\
+{ debug2(DLA, D, "print(%c), bufftop = %d", ch, bufftop);		\
+  if( fp == NULL )							\
+  { if( bufftop < MAX_BUFF )						\
+    { if( chtbl[ch] == NEWLINE )					\
+      { res = BuildLines(res, buff, &bufftop);				\
+      }									\
+      else buff[bufftop++] = ch;					\
+    }									\
+  }									\
+  else putc(ch, fp);							\
+}
+
+#define clear()								\
+{ int i;								\
+  for( i = 0;  i < hs_top;  i++ )  print(hs_buff[i]);			\
+  hs_top = 0;								\
+}
+
+#define hold(ch)							\
+{ if( hs_top == MAX_BUFF )  clear();					\
+  hs_buff[hs_top++] = ch;						\
+}
+
+static OBJECT BuildLines(OBJECT current, FULL_CHAR *buff, int *bufftop)
+{ OBJECT wd, res, gp, gpword;  int c;
+
+  /* build a new word and reset the buffer */
+  setword(WORD, wd, file_pos, buff, *bufftop);
+  debug1(DLA, D, "BuildLines(current, %s)", EchoObject(wd));
+  *bufftop = 0;
+
+  if( current == nilobj )
+  {
+    /* if this is the first word, make it the result */
+    res = wd;
+  }
+  else
+  {
+    /* if this is the second word, make the result a VCAT */
+    if( type(current) == WORD )
+    { New(res, VCAT);
+      FposCopy(fpos(res), fpos(current));
+      Link(res, current);
+    }
+    else res = current;
+
+    /* now attach the new word to res, preceded by a one-line gap */
+    New(gp, GAP_OBJ);
+    mark(gap(gp)) = FALSE;
+    join(gap(gp)) = FALSE;
+    FposCopy(fpos(gp), file_pos);
+    gpword = MakeWord(WORD, AsciiToFull("1vx"), &file_pos);
+    Link(gp, gpword);
+    Link(res, gp);
+    Link(res, wd);
+  }
+  debug1(DLA, D, "BuildLines returning %s", EchoObject(res));
+  return res;
+}
+
+OBJECT LexScanVerbatim(fp, end_stop, err_pos, lessskip)
+FILE *fp;  BOOLEAN end_stop;  FILE_POS *err_pos;  BOOLEAN lessskip;
+{
+  register FULL_CHAR *p;		/* pointer to current input char     */
+  int depth;				/* depth of nesting of { ... }       */
+  BOOLEAN finished;			/* TRUE when finished                */
+  BOOLEAN skipping;			/* TRUE when skipping initial spaces */
+  FULL_CHAR hs_buff[MAX_BUFF];		/* hold spaces here in case last     */
+  int hs_top;				/* next free spot in hs_buff         */
+  FULL_CHAR buff[MAX_BUFF];		/* hold line here if not to file     */
+  int bufftop;				/* top of buff                       */
+  OBJECT res = nilobj;			/* result object if not to file      */
+
+  debug3(DLA, D, "LexScanVerbatim(fp, %s, %s, %s)",
+    bool(end_stop), EchoFilePos(err_pos), bool(lessskip));
+  if( next_token != nilobj )
+  { Error(2, 16, "filter parameter in macro", FATAL, err_pos);
+  }
+
+  p = chpt;  depth = 0;
+  finished = FALSE;
+  skipping = TRUE;
+  hs_top = 0;
+  bufftop = 0;
+  while( !finished ) switch( chtbl[*p++] )
+  {
+      case ESCAPE:
+      case COMMENT:
+      case QUOTE:
+      
+	skipping = FALSE;
+	clear();
+	print(*(p-1));
+	break;
+
+
+      case CSPACE:
+      case TAB:
+      
+	if( !skipping )  hold(*(p-1));
+	break;
+
+
+      case NEWLINE:
+      
+	if( !skipping )  hold(*(p-1));
+	if( lessskip ) skipping = FALSE;
+	chpt = p;  srcnext();
+	line_num(file_pos)++;
+	col_num(file_pos) = 0;
+	startline = (p = chpt) - 1;
+	break;
+
+
+      case ENDFILE:
+      
+	if( fp == NULL )
+	  Error(2, 22, "end of file reached while reading %s",
+	    FATAL, err_pos, lessskip ? KW_VERBATIM : KW_RAWVERBATIM);
+	else
+	  Error(2, 17, "end of file reached while reading filter parameter",
+	    FATAL, err_pos);
+	break;
+
+
+      case OTHER:
+      
+	skipping = FALSE;
+	if( *(p-1) == '{' /*}*/ )
+	{ clear();
+	  print(*(p-1));
+	  depth++;
+	}
+	else if( *(p-1) == /*{*/ '}' )
+	{ if( !end_stop && depth == 0 )
+	  { p--;
+	    finished = TRUE;
+	  }
+	  else
+	  { clear();
+	    print(*(p-1));
+	    depth--;
+	  }
+	}
+	else
+	{ clear();
+	  print(*(p-1));
+	}
+	break;
+
+
+      case LETTER:
+      
+	skipping = FALSE;
+	if( *(p-1) == '@' )
+	{
+	  p--;
+	  if( end_stop && StringBeginsWith(p, KW_END) )
+	  { finished = TRUE;
+	  }
+	  else if( StringBeginsWith(p, KW_INCLUDE) ||
+		   StringBeginsWith(p, KW_SYSINCLUDE) )
+	  { OBJECT incl_fname, t;  FILE *incl_fp;  int ch;  FILE_NUM fnum;
+	    BOOLEAN sysinc = StringBeginsWith(p, KW_SYSINCLUDE);
+	    clear();
+	    p += sysinc ? StringLength(KW_SYSINCLUDE):StringLength(KW_INCLUDE);
+	    chpt = p;
+	    t = LexGetToken();
+	    if( type(t) != LBR )  Error(2, 18, "expected %s here (after %s)",
+		FATAL, &fpos(t), KW_LBR, sysinc ? KW_SYSINCLUDE : KW_INCLUDE);
+	    incl_fname = Parse(&t, nilobj, FALSE, FALSE);
+	    p = chpt;
+	    incl_fname = ReplaceWithTidy(incl_fname, FALSE);
+	    if( !is_word(type(incl_fname)) )
+	      Error(2, 19, "expected file name here", FATAL,&fpos(incl_fname));
+	    debug0(DFS, D, "  calling DefineFile from LexScanVerbatim");
+	    fnum = DefineFile(string(incl_fname), STR_EMPTY, &fpos(incl_fname),
+	      INCLUDE_FILE, sysinc ? SYSINCLUDE_PATH : INCLUDE_PATH);
+	    Dispose(incl_fname);
+	    incl_fp = OpenFile(fnum, FALSE, TRUE);
+	    if( incl_fp == NULL )
+	      Error(2, 20, "cannot open include file %s",
+		FATAL, PosOfFile(fnum), FullFileName(fnum));
+	    while( (ch = getc(incl_fp)) != EOF )
+	      print(ch);
+	    fclose(incl_fp);
+	  }
+	  else
+	  { clear();
+	    print(*p);
+	    p++;
+	  }
+	}
+	else
+	{ clear();
+	  print(*(p-1));
+	}
+	break;
+
+
+      default:
+      
+	assert(FALSE, "LexScanVerbatim: bad chtbl[]");
+	break;
+
+  };
+  print('\n');
+
+  if( p - startline >= MAX_LINE )
+  { col_num(file_pos) = 1;
+    Error(2, 21, "line is too long (or final newline missing)",FATAL,&file_pos);
+  }
+
+  chpt = p;
+  if( fp == NULL && res == nilobj )
+    res = MakeWord(WORD, STR_EMPTY, &file_pos);
+
+  debug2(DLA, D, "LexScanVerbatim returning %s at %s",
+    EchoObject(res), EchoFilePos(&file_pos));
+  return res;
+} /* end LexScanVerbatim */
diff --git a/z03.c b/z03.c
new file mode 100644
index 0000000..80b2af3
--- /dev/null
+++ b/z03.c
@@ -0,0 +1,906 @@
+/*@z03.c:File Service:Declarations, no_fpos@******************************** */
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z03.c                                                      */
+/*  MODULE:       File Service                                               */
+/*  EXTERNS:      InitFiles(), AddToPath(), DefineFile(), FirstFile(),       */
+/*                NextFile(), FileNum(), FileName(), EchoFilePos(),          */
+/*                PosOfFile(), OpenFile(), OpenIncGraphicFile()              */
+/*                EchoFileFrom()                                             */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#if USE_STAT
+#include <sys/types.h>
+#include <sys/stat.h>
+#endif
+
+#define	INIT_TAB 	  3			/* initial file table size   */
+
+#define	file_number(x)	word_font(x)		/* file number of file x     */
+#define	type_of_file(x) word_colour(x)		/* type of file x            */
+#define	used_suffix(x)	word_hyph(x)		/* file needs .lt suffix     */
+#define	updated(x)	fwd(x, COLM)		/* TRUE when x is updated    */
+#define	line_count(x)	fwd(x, ROWM)		/* number of lines written   */
+#define	path(x)		back(x, COLM)		/* search path for file x    */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FILE_TABLE                                                               */
+/*                                                                           */
+/*  A symbol table permitting access to file records by number or name.      */
+/*  The table will automatically enlarge to accept any number of entries,    */
+/*  but there is an arbitrary limit of 65535 files imposed so that file      */
+/*  numbers can be stored in 16 bit fields.                                  */
+/*                                                                           */
+/*     ftab_new(newsize)                 New empty table, newsize capacity   */
+/*     ftab_insert(x, &S)                Insert new file object x into S     */
+/*     ftab_retrieve(str, S)             Retrieve file object of name str    */
+/*     ftab_num(S, num)                  Retrieve file object of number num  */
+/*     ftab_debug(S, fp)                 Debug print of table S to file fp   */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef struct
+{ int filetab_size;				/* size of table             */
+  int filetab_count;				/* number of files in table  */
+  struct filetab_rec
+  {	OBJECT	by_number;			/* file record by number     */
+	OBJECT	by_name_hash;			/* file record by name hash  */
+  } filetab[1];
+} *FILE_TABLE;
+
+#define	ftab_size(S)	(S)->filetab_size
+#define	ftab_count(S)	(S)->filetab_count
+#define	ftab_num(S, i)	(S)->filetab[i].by_number
+#define	ftab_name(S, i)	(S)->filetab[i].by_name_hash
+
+#define hash(pos, str, S)						\
+{ FULL_CHAR *p = str;							\
+  pos = *p++;								\
+  while( *p ) pos += *p++;						\
+  pos = pos % ftab_size(S);						\
+}
+
+static FILE_TABLE ftab_new(int newsize)
+{ FILE_TABLE S;  int i;
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_FILES, 1,
+    2*sizeof(int) + newsize * sizeof(struct filetab_rec)));
+  S = (FILE_TABLE) malloc(2*sizeof(int) + newsize * sizeof(struct filetab_rec));
+  if( S == (FILE_TABLE) NULL )
+    Error(3, 1, "run out of memory when enlarging file table", FATAL, no_fpos);
+  ftab_size(S) = newsize;
+  ftab_count(S) = 0;
+  for( i = 0;  i < newsize;  i++ )
+  { ftab_num(S, i) = ftab_name(S, i) = nilobj;
+  }
+  return S;
+} /* end ftab_new */
+
+static void ftab_insert(OBJECT x, FILE_TABLE *S);
+
+static FILE_TABLE ftab_rehash(FILE_TABLE S, int newsize)
+{ FILE_TABLE NewS;  int i;
+  NewS = ftab_new(newsize);
+  for( i = 1;  i <= ftab_count(S);  i++ )
+     ftab_insert(ftab_num(S, i), &NewS);
+  for( i = 0;  i < ftab_size(S);  i++ )
+  { if( ftab_name(S, i) != nilobj )  DisposeObject(ftab_name(S, i));
+  }
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_FILES, -1,
+    -(2*sizeof(int) + ftab_size(S) * sizeof(struct filetab_rec))));
+  free(S);
+  return NewS;
+} /* end ftab_rehash */
+
+static void ftab_insert(OBJECT x, FILE_TABLE *S)
+{ int pos, num;					
+  if( ftab_count(*S) == ftab_size(*S) - 1 )	/* one less since 0 unused */
+    *S = ftab_rehash(*S, 2*ftab_size(*S));
+  num = ++ftab_count(*S);
+  if( num > MAX_FILES )
+    Error(3, 2, "too many files (maximum is %d)",
+      FATAL, &fpos(x), MAX_FILES);
+  hash(pos, string(x), *S);
+  if( ftab_name(*S, pos) == nilobj )  New(ftab_name(*S, pos), ACAT);
+  Link(ftab_name(*S, pos), x);
+  file_number(x) = num;
+  ftab_num(*S, num) = x;
+} /* end ftab_insert */
+
+static OBJECT ftab_retrieve(FULL_CHAR *str, FILE_TABLE S)
+{ OBJECT x, link, y;  int pos;
+  hash(pos, str, S);
+  x = ftab_name(S, pos);
+  if( x == nilobj )  return nilobj;
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( StringEqual(str, string(y)) )  return y;
+  }
+  return nilobj;
+} /* end ftab_retrieve */
+
+#if DEBUG_ON
+static void ftab_debug(FILE_TABLE S, FILE *fp)
+{ int i;  OBJECT x, link, y;
+  fprintf(fp, "  table size: %d;  current number of files: %d\n",
+    ftab_size(S), ftab_count(S));
+  for( i = 0;  i < ftab_size(S);  i++ )
+  { x = ftab_num(S, i);
+    fprintf(fp, "  ftab_num(S, %d) = %s\n", i,
+      x == nilobj ? AsciiToFull("<nilobj>") :
+      !is_word(type(x)) ? AsciiToFull("not WORD!") : string(x) );
+  }
+  fprintf(fp, "\n");
+  for( i = 0;  i < ftab_size(S);  i++ )
+  { x = ftab_name(S, i);
+    fprintf(fp, "  ftab_name(S, %d) =", i);
+    if( x == nilobj )
+      fprintf(fp, " <nilobj>");
+    else if( type(x) != ACAT )
+      fprintf(fp, " not ACAT!");
+    else for( link = Down(x);  link != x;  link = NextDown(link) )
+    { Child(y, link);
+      fprintf(fp, " %s",
+	is_word(type(y)) ? string(y) : AsciiToFull("not-WORD!"));
+    }
+    fprintf(fp, "\n");
+  }
+} /* end ftab_debug */
+
+static	char	*file_types[]		/* the type names for debug  */
+		= { "source", "include", "incgraphic", "database", "index",
+		    "font", "prepend", "hyph", "hyphpacked",
+		    "mapping", "filter" };
+#endif
+
+
+static	OBJECT		empty_path;		/* file path with just "" in */
+static	FILE_TABLE	file_tab;		/* the file table            */
+static	OBJECT		file_type[MAX_TYPES];	/* files of each type        */
+static	OBJECT		file_path[MAX_PATHS];	/* the search paths          */
+static	char		*file_mode[MAX_TYPES] =
+{ READ_TEXT, READ_TEXT, READ_TEXT, READ_TEXT, READ_BINARY, READ_TEXT,
+  READ_TEXT, READ_TEXT, READ_BINARY, READ_TEXT, READ_TEXT };
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  no_fpos                                                                  */
+/*                                                                           */
+/*  A null file position value.                                              */
+/*                                                                           */
+/*****************************************************************************/
+
+static FILE_POS no_file_pos = {0, 0, 0, 0, 0};
+FILE_POS *no_fpos = &no_file_pos;
+
+
+/*@::InitFiles(), AddToPath(), DefineFile()@**********************************/
+/*                                                                           */
+/*  InitFiles()                                                              */
+/*                                                                           */
+/*  Initialize this module.                                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void InitFiles(void)
+{ int i;  OBJECT tmp;
+  for( i = 0;  i < MAX_TYPES; i++ )  New(file_type[i], ACAT);
+  for( i = 0;  i < MAX_PATHS; i++ )  New(file_path[i], ACAT);
+  file_tab = ftab_new(INIT_TAB);
+  New(empty_path, ACAT);
+  tmp = MakeWord(WORD, STR_EMPTY, no_fpos);
+  Link(empty_path, tmp);
+} /* end InitFiles */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  AddToPath(fpath, dirname)                                                */
+/*                                                                           */
+/*  Add the directory dirname to the end of search path fpath.               */
+/*                                                                           */
+/*****************************************************************************/
+
+void AddToPath(int fpath, OBJECT dirname)
+{ Link(file_path[fpath], dirname);
+} /* end AddToPath */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FILE_NUM DefineFile(str, suffix, xfpos, ftype, fpath)                    */
+/*                                                                           */
+/*  Declare a file whose name is str plus suffix and whose fpos is xfpos.    */
+/*  The file type is ftype, and its search path is fpath.                    */
+/*                                                                           */
+/*****************************************************************************/
+
+FILE_NUM DefineFile(FULL_CHAR *str, FULL_CHAR *suffix,
+FILE_POS *xfpos, int ftype, int fpath)
+{ register int i;
+  OBJECT fname;
+  assert( ftype < MAX_TYPES, "DefineFile: ftype!" );
+  debug5(DFS, DD, "DefineFile(%s, %s,%s, %s, %d)",
+    str, suffix, EchoFilePos(xfpos), file_types[ftype], fpath);
+  if( ftype == SOURCE_FILE && (i = StringLength(str)) >= 3 )
+  {
+    /* check that file name does not end in ".li" or ".ld" */
+    if( StringEqual(&str[i-StringLength(DATA_SUFFIX)], DATA_SUFFIX) )
+      Error(3, 3, "database file %s where source file expected",
+        FATAL, xfpos, str);
+    if( StringEqual(&str[i-StringLength(INDEX_SUFFIX)], INDEX_SUFFIX) )
+      Error(3, 4, "database index file %s where source file expected",
+        FATAL, xfpos, str);
+  }
+  if( StringLength(str) + StringLength(suffix) >= MAX_WORD )
+    Error(3, 5, "file name %s%s is too long", FATAL, no_fpos, str, suffix);
+  fname = MakeWordTwo(WORD, str, suffix, xfpos);
+  Link(file_type[ftype], fname);
+  path(fname) = fpath;
+  updated(fname) = FALSE;
+  line_count(fname) = 0;
+  type_of_file(fname) = ftype;
+  used_suffix(fname) = FALSE;
+  ftab_insert(fname, &file_tab);
+  debug1(DFS, DD, "DefineFile returning %s", string(fname));
+  ifdebug(DFS, DD, ftab_debug(file_tab, stderr));
+  return file_number(fname);
+} /* end DefineFile */
+
+
+/*@::FirstFile(), NextFile(), FileNum()@**************************************/
+/*                                                                           */
+/*  FILE_NUM FirstFile(ftype)                                                */
+/*                                                                           */
+/*  Returns first file of type ftype, else NO_FILE.                          */
+/*                                                                           */
+/*****************************************************************************/
+
+FILE_NUM FirstFile(int ftype)
+{ FILE_NUM i;
+  OBJECT link, y;
+  debug1(DFS, DD, "FirstFile( %s )", file_types[ftype]);
+  link = Down(file_type[ftype]);
+  if( type(link) == ACAT )  i = NO_FILE;
+  else
+  { Child(y, link);
+    i = file_number(y);
+  }
+  debug1(DFS, DD, "FirstFile returning %s", i==NO_FILE ? STR_NONE : FileName(i));
+  return i;
+} /* end FirstFile */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FILE_NUM NextFile(i)                                                     */
+/*                                                                           */
+/*  Returns the next file after file i of the type of i, else NO_FILE.       */
+/*                                                                           */
+/*****************************************************************************/
+
+FILE_NUM NextFile(FILE_NUM i)
+{ OBJECT link, y;
+  debug1(DFS, DD, "NextFile( %s )", FileName(i));
+  link = NextDown(Up(ftab_num(file_tab, i)));
+  if( type(link) == ACAT )  i = NO_FILE;
+  else
+  { Child(y, link);
+    i = file_number(y);
+  }
+  debug1(DFS, DD, "NextFile returning %s", i==NO_FILE ? STR_NONE : FileName(i));
+  return i;
+} /* end NextFile */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FILE_NUM FileNum(str, suffix)                                            */
+/*                                                                           */
+/*  Return the number of the file with name str plus suffix, else NO_FILE.   */
+/*                                                                           */
+/*****************************************************************************/
+
+FILE_NUM FileNum(FULL_CHAR *str, FULL_CHAR *suffix)
+{ register int i;  OBJECT fname;
+  FULL_CHAR buff[MAX_BUFF];
+  debug2(DFS, DD, "FileNum(%s, %s)", str, suffix);
+  if( StringLength(str) + StringLength(suffix) >= MAX_BUFF )
+    Error(3, 6, "file name %s%s is too long", FATAL, no_fpos, str, suffix);
+  StringCopy(buff, str);
+  StringCat(buff, suffix);
+  fname = ftab_retrieve(buff, file_tab);
+  i = fname == nilobj ? NO_FILE : file_number(fname);
+  debug1(DFS, DD, "FileNum returning %s",
+    i == NO_FILE ? STR_NONE : FileName( (FILE_NUM) i));
+  return (FILE_NUM) i;
+} /* end FileNum */
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FILE_NUM DatabaseFileNum(FILE_POS *xfpos)                                */
+/*                                                                           */
+/*  Return a suitable database file number for writing something out whose   */
+/*  file position is xfpos.                                                  */
+/*                                                                           */
+/*****************************************************************************/
+ 
+FILE_NUM DatabaseFileNum(FILE_POS *xfpos)
+{ OBJECT x;
+  FILE_NUM fnum;  FULL_CHAR *str;
+  debug2(DFS, D, "DatabaseFileNum(%s %s)", EchoFilePos(xfpos),
+    EchoFileSource(file_num(*xfpos)));
+  x = ftab_num(file_tab, file_num(*xfpos));
+  switch( type_of_file(x) )
+  {
+    case SOURCE_FILE:
+    case INCLUDE_FILE:
+
+      /* return the corresponding database file (may need to be defined) */
+      str = FileName(file_num(*xfpos));
+      fnum = FileNum(str, DATA_SUFFIX);
+      if( fnum == NO_FILE )
+      { debug0(DFS, DD, "  calling DefineFile from DatabaseFileNum");
+	fnum = DefineFile(str, DATA_SUFFIX, xfpos, DATABASE_FILE, SOURCE_PATH);
+      }
+      break;
+
+
+    case DATABASE_FILE:
+
+      /* return the enclosing source file (recursively if necessary) */
+      if( file_num(fpos(x)) == NO_FILE )
+      {
+	/* xfpos lies in a cross-reference database file; use itself */
+	/* ***
+	Error(3, 18, "DatabaseFileNum: database file position unknown",
+	  INTERN, no_fpos);
+	*** */
+	fnum = file_num(*xfpos);
+      }
+      else
+      {
+	/* xfpos lies in a user-defined database file; use its source */
+        fnum = DatabaseFileNum(&fpos(x));
+      }
+      break;
+
+
+    case FILTER_FILE:
+
+      /* return the enclosing source file (recursively if necessary) */
+      if( file_num(fpos(x)) == NO_FILE )
+	Error(3, 7, "DatabaseFileNum: filter file position unknown",
+	  INTERN, no_fpos);
+      fnum = DatabaseFileNum(&fpos(x));
+      break;
+
+
+    default:
+
+      Error(3, 8, "DatabaseFileNum: unexpected file type", INTERN, no_fpos);
+      fnum = NO_FILE;
+      break;
+
+  }
+  debug2(DFS, D, "DatabaseFileNum returning %d (%s)", fnum,
+    fnum == NO_FILE ? AsciiToFull("NO_FILE") : FileName(fnum));
+  return fnum;
+} /* end DatabaseFileNum */
+ 
+ 
+/*@::FileName(), EchoFilePos(), PosOfFile()@**********************************/
+/*                                                                           */
+/*  FULL_CHAR *FileName(fnum)                                                */
+/*  FULL_CHAR *FullFileName(fnum)                                            */
+/*                                                                           */
+/*  Return the string name of this file.  This is as given to DefineFile     */
+/*  until OpenFile is called, after which it is the full path name.          */
+/*                                                                           */
+/*  FullFileName is the same except it will add a .lt to the file name       */
+/*  if that was needed when the file was opened for reading.                 */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *FileName(FILE_NUM fnum)
+{ OBJECT x;
+  x = ftab_num(file_tab, fnum);
+  assert( x != nilobj, "FileName: x == nilobj!" );
+  if( Down(x) != x )  Child(x, Down(x));
+  return string(x);
+} /* end FileName */
+
+
+FULL_CHAR *FullFileName(FILE_NUM fnum)
+{ OBJECT x;
+  static FULL_CHAR ffbuff[2][MAX_BUFF];
+  static int ffbp = 1;
+
+  x = ftab_num(file_tab, fnum);
+  assert( x != nilobj, "FileName: x == nilobj!" );
+  if( used_suffix(x) )
+  {
+    if( Down(x) != x )  Child(x, Down(x));
+    ffbp = (ffbp + 1) % 2;
+    StringCopy(ffbuff[ffbp], string(x));
+    StringCat(ffbuff[ffbp], SOURCE_SUFFIX);
+    return ffbuff[ffbp];
+  }
+  else
+  {
+    if( Down(x) != x )  Child(x, Down(x));
+    return string(x);
+  }
+} /* end FullFileName */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *EchoFilePos(pos)                                              */
+/*                                                                           */
+/*  Returns a string reporting the value of file position pos.               */
+/*                                                                           */
+/*****************************************************************************/
+
+static FULL_CHAR buff[2][MAX_BUFF];  static int bp = 1;
+
+static void append_fpos(FILE_POS *pos)
+{ OBJECT x;
+  x = ftab_num(file_tab, file_num(*pos));
+  assert( x != nilobj, "EchoFilePos: file_tab entry is nilobj!" );
+  if( file_num(fpos(x)) > 0 )
+  { append_fpos( &fpos(x) );
+    if( StringLength(buff[bp]) + 2 >= MAX_BUFF )
+      Error(3, 9, "file position %s... is too long to print",
+        FATAL, no_fpos, buff[bp]);
+    StringCat(buff[bp], STR_SPACE);
+    StringCat(buff[bp], STR_DIR);
+  }
+  if( StringLength(buff[bp]) + StringLength(string(x)) + 13 >= MAX_BUFF )
+    Error(3, 10, "file position %s... is too long to print",
+      FATAL, no_fpos, buff[bp]);
+  StringCat(buff[bp], STR_SPACE);
+  StringCat(buff[bp], STR_QUOTE);
+  StringCat(buff[bp], string(x));
+  StringCat(buff[bp], STR_QUOTE);
+  if( line_num(*pos) != 0 )
+  { StringCat(buff[bp], STR_SPACE);
+    StringCat(buff[bp], StringInt( (int) line_num(*pos)));
+    StringCat(buff[bp], AsciiToFull(","));
+    StringCat(buff[bp], StringInt( (int) col_num(*pos)));
+  }
+} /* end append_fpos */
+
+FULL_CHAR *EchoFilePos(FILE_POS *pos)
+{ bp = (bp + 1) % 2;
+  StringCopy(buff[bp], STR_EMPTY);
+  if( file_num(*pos) > 0 )  append_fpos(pos);
+  return buff[bp];
+} /* end EchoFilePos */
+
+FULL_CHAR *EchoAltFilePos(FILE_POS *pos)
+{
+  bp = (bp + 1) % 2;
+  StringCopy(buff[bp], STR_EMPTY);
+  if( file_num(*pos) > 0 )
+  {
+    /* *** x = ftab_num(file_tab, file_num(*pos)); *** */
+    StringCat(buff[bp], FullFileName(file_num(*pos)));
+    if( line_num(*pos) != 0 )
+    { StringCat(buff[bp], AsciiToFull(":"));
+      StringCat(buff[bp], StringInt( (int) line_num(*pos)));
+      StringCat(buff[bp], AsciiToFull(":"));
+      StringCat(buff[bp], StringInt( (int) col_num(*pos)));
+    }
+  }
+  return buff[bp];
+} /* end EchoFilePos */
+
+
+/*@::EchoFileSource(), EchoFileLine(), PosOfFile()@***************************/
+/*                                                                           */
+/*  FULL_CHAR *EchoFileSource(fnum)                                          */
+/*                                                                           */
+/*  Returns a string reporting the "file source" information for file fnum.  */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *EchoFileSource(FILE_NUM fnum)
+{ OBJECT x, nextx;
+  bp = (bp + 1) % 2;
+  StringCopy(buff[bp], STR_EMPTY);
+  if( fnum > 0 )
+  { StringCat(buff[bp], STR_SPACE);
+    x = ftab_num(file_tab, fnum);
+    assert( x != nilobj, "EchoFileSource: x == nilobj!" );
+    if( type_of_file(x) == FILTER_FILE )
+    { StringCat(buff[bp], AsciiToFull(condcatgets(MsgCat, 3, 11, "filter")));
+      /* for estrip's benefit: Error(3, 11, "filter"); */
+      StringCat(buff[bp], STR_SPACE);
+    }
+    StringCat(buff[bp], AsciiToFull(condcatgets(MsgCat, 3, 12, "file")));
+    /* for estrip's benefit: Error(3, 12, "file"); */
+    StringCat(buff[bp], STR_SPACE);
+    /* *** x = ftab_num(file_tab, fnum); *** */
+    StringCat(buff[bp], STR_QUOTE);
+    StringCat(buff[bp], FullFileName(fnum));
+    StringCat(buff[bp], STR_QUOTE);
+    if( file_num(fpos(x)) > 0 )
+    { StringCat(buff[bp], AsciiToFull(" ("));
+      for(;;)
+      { nextx = ftab_num(file_tab, file_num(fpos(x)));
+	StringCat(buff[bp], AsciiToFull(condcatgets(MsgCat, 3, 13, "from")));
+	/* for estrip's benefit: Error(3, 13, "from"); */
+	StringCat(buff[bp], STR_SPACE);
+        StringCat(buff[bp], STR_QUOTE);
+        StringCat(buff[bp], string(nextx));
+        StringCat(buff[bp], STR_QUOTE);
+	StringCat(buff[bp], STR_SPACE);
+        StringCat(buff[bp],  AsciiToFull(condcatgets(MsgCat, 3, 14, "line")));
+	/* for estrip's benefit: Error(3, 14, "line"); */
+	StringCat(buff[bp], STR_SPACE);
+        StringCat(buff[bp], StringInt( (int) line_num(fpos(x))));
+	if( file_num(fpos(nextx)) == 0 )  break;
+	StringCat(buff[bp], AsciiToFull(", "));
+	x = nextx;
+      }
+      StringCat(buff[bp], AsciiToFull(")"));
+    }
+  }
+  return buff[bp];
+} /* end EchoFileSource */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *EchoFileLine(pos)                                             */
+/*                                                                           */
+/*  Returns a string reporting the "line source" information for pos.        */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *EchoFileLine(FILE_POS *pos)
+{ bp = (bp + 1) % 2;
+  StringCopy(buff[bp], STR_EMPTY);
+  if( file_num(*pos) > 0 && line_num(*pos) != 0 )
+  { StringCat(buff[bp], StringInt( (int) line_num(*pos)));
+    StringCat(buff[bp], AsciiToFull(","));
+    StringCat(buff[bp], StringInt( (int) col_num(*pos)));
+  }
+  return buff[bp];
+} /* end EchoFileLIne */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FILE_POS *PosOfFile(fnum)                                                */
+/*                                                                           */
+/*  Returns a pointer to the file position where file fnum was encountered.  */
+/*                                                                           */
+/*****************************************************************************/
+
+FILE_POS *PosOfFile(FILE_NUM fnum)
+{ OBJECT  x = ftab_num(file_tab, fnum);
+  assert( x != nilobj, "PosOfFile: file_tab entry is nilobj!" );
+  return &fpos(x);
+}
+
+/*@::SearchPath()@************************************************************/
+/*                                                                           */
+/*  static FILE *SearchPath(str, fpath, check_ld, check_lt, full_name, xfpos,*/
+/*                          read_mode)                                       */
+/*                                                                           */
+/*  Search the given path for a file whose name is str.  If found, open      */
+/*  it with mode read_mode; return the resulting FILE *.                     */
+/*                                                                           */
+/*  If check_ld is TRUE, it means that the file to be opened is a .li file   */
+/*  and OpenFile() is required to check whether the corresponding .ld file   */
+/*  is present.  If it is, then the search must stop.  Furthermore, if the   */
+/*  .li file is out of date wrt the .ld file, it is to be removed.           */
+/*                                                                           */
+/*  If check_lt is TRUE, it means that the file to be opened is a source     */
+/*  file and OpenFile() is required to check for a .lt suffix version.       */
+/*                                                                           */
+/*  Also return the full path name in object *full_name if different from    */
+/*  the existing name, else nilobj.                                          */
+/*                                                                           */
+/*  Set *used_source_suffix to TRUE if the .lt source suffix had to be       */
+/*  added in order to find the file.                                         */
+/*                                                                           */
+/*****************************************************************************/
+
+static FILE *SearchPath(FULL_CHAR *str, OBJECT fpath, BOOLEAN check_ld,
+BOOLEAN check_lt, OBJECT *full_name, FILE_POS *xfpos, char *read_mode,
+BOOLEAN *used_source_suffix)
+{ FULL_CHAR buff[MAX_BUFF], buff2[MAX_BUFF];
+  OBJECT link, y, cpath;  FILE *fp, *fp2;
+  debug4(DFS, DD, "SearchPath(%s, %s, %s, %s, -)", str, EchoObject(fpath),
+	bool(check_ld), bool(check_lt));
+
+  *used_source_suffix = FALSE;
+
+  /* if file name is "stdin" just return it */
+  if( StringEqual(str, STR_STDIN) )
+  {
+    debug0(DFS, DD, "  SearchPath returning stdin");
+    *full_name = nilobj;
+    return stdin;
+  }
+
+  /* use fpath if relative file name, use empty_path if absolute filename */
+  cpath = StringBeginsWith(str, STR_DIR) ? empty_path : fpath;
+
+  /* try opening each path name in the search path */
+  fp = null;
+  for( link = Down(cpath);  fp == null && link != cpath;  link = NextDown(link) )
+  { Child(y, link);
+
+    /* set buff to the full path name */
+    if( StringLength(string(y)) == 0 )
+    { StringCopy(buff, str);
+    }
+    else
+    { if( StringLength(string(y)) + StringLength(STR_DIR) +
+	  StringLength(str) >= MAX_BUFF )
+	Error(3, 15, "file path name %s%s%s is too long",
+	  FATAL, &fpos(y), string(y), STR_DIR, str);
+      StringCopy(buff, string(y));
+      StringCat(buff, STR_DIR);
+      StringCat(buff, str);
+    }
+
+    /* try opening the full path name */
+    fp = StringFOpen(buff, read_mode);
+    debug1(DFS, DD, fp == null ? "  fail %s" : "  succeed %s", buff);
+
+    /* if failed to find .li file, exit if corresponding .ld file */
+    if( check_ld && fp == null )
+    {
+        StringCopy(buff2, buff);
+        StringCopy(&buff2[StringLength(buff2) - StringLength(INDEX_SUFFIX)],
+	  DATA_SUFFIX);
+        fp2 = StringFOpen(buff2, READ_TEXT);
+        debug1(DFS, DD, fp2 == null ? "  fail %s" : "  succeed %s", buff2);
+        if( fp2 != null )
+        { fclose(fp2);
+	  debug0(DFS, DD, "SearchPath returning null (adjacent .ld file)");
+	  *full_name = nilobj;
+	  return null;
+        }
+    }
+
+#if USE_STAT
+    /*****************************************************************/
+    /*                                                               */
+    /*  If your compiler won't compile this bit, it is probably      */
+    /*  because you either don't have the stat() system call on      */
+    /*  your system (it is not ANSI C), or because it can't be       */
+    /*  found in the header files declared at the top of this file.  */
+    /*                                                               */
+    /*  The simple correct thing to do is to set the USESTAT macro   */
+    /*  in the makefile to 0.  You won't lose much.                  */
+    /*                                                               */
+    /*****************************************************************/
+
+    /* if found .li file, compare dates with corresponding .ld file  */
+    if( check_ld && fp != null )
+    {
+      struct stat indexstat, datastat;
+      StringCopy(buff2, buff);
+      StringCopy(&buff2[StringLength(buff2) - StringLength(INDEX_SUFFIX)],
+	DATA_SUFFIX);
+      debug2(DFS, DD, "SearchPath comparing dates of .li %s and .ld %s",
+	buff, buff2);
+      if( stat( (char *) buff, &indexstat) == 0 &&
+	  stat( (char *) buff2, &datastat) == 0 )
+      {
+	debug2(DFS, DD, "SearchPath mtimes are .li %d and .ld %d",
+	  (int) indexstat.st_mtime, (int) datastat.st_mtime);
+	if( datastat.st_mtime > indexstat.st_mtime )
+	{ fclose(fp);
+	  debug1(DFS, DD, "SearchPath calling StringRemove(%s)", buff);
+	  StringRemove(buff);
+	  debug0(DFS, DD, "SearchPath returning null (.li out of date)");
+	  *full_name = nilobj;
+	  return null;
+	}
+      }
+    }
+#endif
+
+    /* if check_lt, see if buff.lt exists as well as or instead of buff */
+    if( check_lt )
+    {
+      StringCopy(buff2, buff);
+      StringCat(buff2, SOURCE_SUFFIX);
+      fp2 = StringFOpen(buff2, READ_TEXT);
+      debug1(DFS, DD, fp2 == null ? "  fail %s" : "  succeed %s", buff2);
+      if( fp2 != null )
+      { if( fp != null )
+	  Error(3, 16, "files %s and %s both exist", FATAL, xfpos,buff,buff2);
+	fp = fp2;
+	*used_source_suffix = TRUE;
+      }
+    }
+
+  }
+  debug1(DFS, DD, "SearchPath returning (fp %s null)", fp==null ? "==" : "!=");
+  *full_name = (fp == null || StringLength(string(y)) == 0) ? nilobj :
+    MakeWord(WORD, buff, xfpos);
+  return fp;
+} /* end SearchPath */
+
+
+/*@::OpenFile(), OpenIncGraphicFile()@****************************************/
+/*                                                                           */
+/*  FILE *OpenFile(fnum, check_ld, check_lt)                                 */
+/*                                                                           */
+/*  Open for reading the file whose number is fnum.  This involves           */
+/*  searching for it along its path if not previously opened.                */
+/*                                                                           */
+/*  If check_ld is TRUE, it means that the file to be opened is a .li file   */
+/*  and OpenFile() is required to check whether the corresponding .ld file   */
+/*  is present.  If it is, then the search must stop.  Furthermore, if the   */
+/*  .li file is out of date wrt the .ld file, it is to be removed.           */
+/*                                                                           */
+/*  If check_lt is TRUE, it means that the file to be opened is a source     */
+/*  file and OpenFile() is required to check for a .lt suffix version        */
+/*  if the file does not open without it.                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+FILE *OpenFile(FILE_NUM fnum, BOOLEAN check_ld, BOOLEAN check_lt)
+{ FILE *fp;  OBJECT fname, full_name, y;  BOOLEAN used_source_suffix;
+  ifdebug(DPP, D, ProfileOn("OpenFile"));
+  debug2(DFS, DD, "OpenFile(%s, %s)", FileName(fnum), bool(check_ld));
+  fname = ftab_num(file_tab, fnum);
+  if( Down(fname) != fname )
+  { Child(y, Down(fname));
+    fp = StringFOpen(string(y), file_mode[type_of_file(fname)]);
+    debug1(DFS,DD,fp==null ? "  failed on %s" : "  succeeded on %s", string(y));
+  }
+  else
+  { fp = SearchPath(string(fname), file_path[path(fname)], check_ld,
+	   check_lt, &full_name, &fpos(fname), file_mode[type_of_file(fname)],
+	   &used_source_suffix);
+    if( full_name != nilobj )  Link(fname, full_name);
+    used_suffix(fname) = used_source_suffix;
+  }
+  ifdebug(DPP, D, ProfileOff("OpenFile"));
+  debug1(DFS, DD, "OpenFile returning (fp %s null)", fp==null ? "==" : "!=");
+  return fp;
+} /* end OpenFile */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FILE *OpenIncGraphicFile(str, typ, full_name, xfpos, compressed)         */
+/*                                                                           */
+/*  Open for reading the @IncludeGraphic file str; typ is INCGRAPHIC or      */
+/*  SINCGRAPHIC.  Return the full name in full_name.  Set compressed to      */
+/*  TRUE if the file was a compressed file.                                  */
+/*                                                                           */
+/*****************************************************************************/
+#define MAX_COMPRESSED 6
+static char *compress_suffixes[MAX_COMPRESSED]
+  = { ".gz", "-gz", ".z", "-z", "_z", ".Z" };
+
+FILE *OpenIncGraphicFile(FULL_CHAR *str, unsigned char typ,
+OBJECT *full_name, FILE_POS *xfpos, BOOLEAN *compressed)
+{ FILE *fp;  int p, i;  BOOLEAN used_source_suffix;
+  debug2(DFS, DD, "OpenIncGraphicFile(%s, %s, -)", str, Image(typ));
+  assert( typ == INCGRAPHIC || typ == SINCGRAPHIC, "OpenIncGraphicFile!" );
+  p = (typ == INCGRAPHIC ? INCLUDE_PATH : SYSINCLUDE_PATH);
+  fp = SearchPath(str, file_path[p], FALSE, FALSE, full_name, xfpos,
+	READ_TEXT, &used_source_suffix);
+  if( *full_name == nilobj )  *full_name = MakeWord(WORD, str, xfpos);
+
+  if( fp == null )
+  {
+    /* if file didn't open, nothing more to do */
+    *compressed = FALSE;
+    fp = null;
+  }
+  else
+  {
+    /* if file is compressed, uncompress it into file LOUT_EPS */
+    for( i = 0;  i < MAX_COMPRESSED; i++ )
+    { if( StringEndsWith(string(*full_name), AsciiToFull(compress_suffixes[i])) )
+        break;
+    }
+    if( i < MAX_COMPRESSED )
+    { char buff[MAX_BUFF];
+      fclose(fp);
+      sprintf(buff, UNCOMPRESS_COM, (char *) string(*full_name), LOUT_EPS);
+      if( SafeExecution )
+      {
+        Error(3, 17, "safe execution prohibiting command: %s", WARN, xfpos,buff);
+        *compressed = FALSE;
+        fp = null;
+      }
+      else
+      {
+        system(buff);
+        fp = fopen(LOUT_EPS, READ_TEXT);
+        *compressed = TRUE;
+      }
+    }
+    else *compressed = FALSE;
+  }
+
+  debug2(DFS, DD, "OpenIncGraphicFile returning (fp %s null, *full_name = %s)",
+    fp==null ? "==" : "!=", string(*full_name));
+  return fp;
+} /* end OpenIncGraphicFile */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FileSetUpdated(fnum, newlines)                                           */
+/*                                                                           */
+/*  Declare that file fnum has been updated, and that it now contains        */
+/*  newlines lines.                                                          */
+/*                                                                           */
+/*****************************************************************************/
+
+void FileSetUpdated(FILE_NUM fnum, int newlines)
+{ 
+  debug2(DFS, DD, "FileSetUpdated(%s, %d)", FileName(fnum), newlines);
+  updated(ftab_num(file_tab, fnum)) = TRUE;
+  line_count(ftab_num(file_tab, fnum)) = newlines;
+  debug0(DFS, DD, "FileSetUpdated returning");
+} /* end FileSetUpdated */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  int FileGetLineCount(FILE_NUM fnum)                                      */
+/*                                                                           */
+/*  Return the number of lines so far written to file fnum.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+int FileGetLineCount(FILE_NUM fnum)
+{ int res;
+  debug1(DFS, DD, "FileGetLineCount(%s)", FileName(fnum));
+  res = line_count(ftab_num(file_tab, fnum));
+  debug1(DFS, DD, "FileGetLineCount returning %d", res);
+  return res;
+} /* end FileGetLineCount */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN FileTestUpdated(fnum)                                            */
+/*                                                                           */
+/*  Test whether file fnum has been declared to be updated.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN FileTestUpdated(FILE_NUM fnum)
+{ return (BOOLEAN) updated(ftab_num(file_tab, fnum));
+} /* end FileTestUpdated */
diff --git a/z04.c b/z04.c
new file mode 100644
index 0000000..fae1267
--- /dev/null
+++ b/z04.c
@@ -0,0 +1,233 @@
+/*@z04.c:Token Service:NewToken(), CopyTokenList()@***************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z04.c                                                      */
+/*  MODULE:       Token Service                                              */
+/*  EXTERNS:      NewToken(), CopyTokenList(), EchoCatOp(), EchoToken()      */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT NewToken(xtype, xfpos, xvspace, xhspace, xprec, xactual)          */
+/*                                                                           */
+/*  Returns a new non-WORD token initialised as the parameters indicate.     */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT NewToken(unsigned char xtype, FILE_POS *xfpos, unsigned char xvspace,
+unsigned char xhspace, unsigned char xprec, OBJECT xactual)
+{ OBJECT res;
+  debug1(DTS, DDD, "NewToken(%s, ...)", Image(xtype));
+  New(res, xtype);  FposCopy(fpos(res), *xfpos);
+  vspace(res) = xvspace;  hspace(res) = xhspace;
+  precedence(res) = xprec;  actual(res) = xactual;
+  debug1(DTS, DDD, "NewToken returning %s", EchoToken(res));
+  return res;
+} /* end NewToken */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT CopyTokenList(x, pos)                                             */
+/*                                                                           */
+/*  Returns a copy of the list of tokens pointed to by x.                    */
+/*  All file positions in the copy are set to *pos.                          */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT CopyTokenList(OBJECT x, FILE_POS *pos)
+{ OBJECT y, z, res;
+  res = nilobj;  y = x;
+  if( x != nilobj ) do
+  { if( is_word(type(y)) )
+    { z = MakeWord(type(y), string(y), pos);
+      vspace(z) = vspace(y);  hspace(z) = hspace(y);
+    }
+    else z = NewToken(type(y), pos,vspace(y),hspace(y),precedence(y),actual(y));
+    res = Append(res, z, PARENT);
+    y = succ(y, PARENT);
+  } while( y != x );
+  return res;
+} /* end CopyTokenList */
+
+/*@::EchoCatOp(), EchoToken()@************************************************/
+/*                                                                           */
+/*  FULL_CHAR *EchoCatOp(xtype, xmark, xjoin)                                */
+/*                                                                           */
+/*  Return the catenation operator with this type, mark and join.            */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *EchoCatOp(unsigned xtype, BOOLEAN xmark, BOOLEAN xjoin)
+{ switch( xtype )
+  {
+    case VCAT:	return	(xmark ? xjoin ? KW_VCAT_MJ : KW_VCAT_MN
+			       : xjoin ? KW_VCAT_NJ : KW_VCAT_NN);
+
+    case HCAT:	return	(xmark ? xjoin ? KW_HCAT_MJ : KW_HCAT_MN
+			       : xjoin ? KW_HCAT_NJ : KW_HCAT_NN);
+
+    case ACAT:	return	(xmark ? xjoin ? KW_ACAT_MJ : AsciiToFull("??")
+			       : xjoin ? KW_ACAT_NJ : AsciiToFull("??") );
+
+    default:	assert(FALSE, "EchoCatOp");
+		return STR_EMPTY;
+
+  } /* end switch */
+} /* end EchoCatOp */
+
+
+#if DEBUG_ON
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *EchoToken(x)                                                  */
+/*                                                                           */
+/*  Return an image of token x.  Do not worry about preceding space.         */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *EchoToken(OBJECT x)
+{ switch( type(x) )
+  {
+    case WORD:
+    
+      return string(x);
+
+
+    case QWORD:
+    
+      return StringQuotedWord(x);
+
+
+    case TSPACE:
+    case TJUXTA:
+    case USE:
+    case NOT_REVEALED:
+    case GSTUB_EXT:
+    case GSTUB_INT:
+    case GSTUB_NONE:
+    
+      return Image(type(x));
+
+
+    case UNEXPECTED_EOF:
+    case BEGIN:
+    case END:
+    case ENV:
+    case ENVA:
+    case ENVB:
+    case ENVC:
+    case ENVD:
+    case CENV:
+    case CLOS:
+    case LBR:
+    case RBR:
+    case NULL_CLOS:
+    case PAGE_LABEL:
+    case CROSS:
+    case FORCE_CROSS:
+    case ONE_COL:
+    case ONE_ROW:
+    case WIDE:
+    case HIGH:
+    case HSHIFT:
+    case VSHIFT:
+    case HSCALE:
+    case VSCALE:
+    case HCOVER:
+    case VCOVER:
+    case SCALE:
+    case KERN_SHRINK:
+    case HCONTRACT:
+    case VCONTRACT:
+    case HLIMITED:
+    case VLIMITED:
+    case HEXPAND:
+    case VEXPAND:
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case HSPAN:
+    case VSPAN:
+    case PADJUST:
+    case HADJUST:
+    case VADJUST:
+    case ROTATE:
+    case BACKGROUND:
+    case VERBATIM:
+    case RAW_VERBATIM:
+    case CASE:
+    case YIELD:
+    case BACKEND:
+    case XCHAR:
+    case FONT:
+    case SPACE:
+    case YUNIT:
+    case ZUNIT:
+    case BREAK:
+    case UNDERLINE:
+    case COLOUR:
+    case LANGUAGE:
+    case CURR_LANG:
+    case CURR_FAMILY:
+    case CURR_FACE:
+    case COMMON:
+    case RUMP:
+    case MELD:
+    case INSERT:
+    case ONE_OF:
+    case NEXT:
+    case PLUS:
+    case MINUS:
+    case OPEN:
+    case TAGGED:
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+    case ACAT:
+    case HCAT:
+    case VCAT:
+    case CLOSURE:
+    case PREPEND:
+    case SYS_PREPEND:
+    case DATABASE:
+    case SYS_DATABASE:
+    case LUSE:
+    case LEO:
+    case LVIS:
+    
+      return actual(x) != nilobj ? SymName(actual(x)) : Image(type(x));
+
+
+    default:
+    
+      assert1(FALSE, "EchoToken:", Image(type(x)));
+      return STR_EMPTY;
+  }
+} /* end EchoToken */
+#endif
diff --git a/z05.c b/z05.c
new file mode 100644
index 0000000..0e346b2
--- /dev/null
+++ b/z05.c
@@ -0,0 +1,877 @@
+/*@z05.c:Read Definitions:ReadFontDef()@**************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z05.c                                                      */
+/*  MODULE:       Read Definitions                                           */
+/*  EXTERNS:      ReadPrependDef(), ReadDatabaseDef(), ReadDefinitions()     */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  is_string(t, str)                                                        */
+/*                                                                           */
+/*  If t is a token denoting unquoted word str, return TRUE.                 */
+/*                                                                           */
+/*****************************************************************************/
+
+#define is_string(t, str)    (type(t) == WORD && StringEqual(string(t), str) )
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static ReadFontDef(encl)                                                 */
+/*                                                                           */
+/*  Read one font definition and pass it on to the font module.  The         */
+/*  syntax is  fontdef <family> <face> { <object> }.                         */
+/*                                                                           */
+/*****************************************************************************/
+
+static void ReadFontDef(OBJECT encl)
+{ OBJECT t, family, face, inside;
+  
+  SuppressScope();
+
+  /* get family name, allow for multiple tokens */
+  family = LexGetToken();
+  if( !is_word(type(family)) )
+    Error(5, 1, "expected font family name here", WARN, &fpos(family));
+  face = LexGetToken();
+  while( is_word(type(face)) && hspace(face) + vspace(face) == 0 )
+  {
+    family = MakeWordTwo(WORD, string(family), string(face), &fpos(family));
+    face = LexGetToken();
+  }
+
+  /* get face name, allow for multiple tokens */
+  if( !is_word(type(face)) )
+    Error(5, 2, "expected font face name here", WARN, &fpos(face));
+  UnSuppressScope();
+  t = LexGetToken();
+  while( is_word(type(t)) && hspace(t) + vspace(t) == 0 )
+  {
+    face = MakeWordTwo(WORD, string(face), string(t), &fpos(face));
+    t = LexGetToken();
+  }
+
+  if( type(t) != LBR )
+  { Error(5, 3, "expected opening %s of fontdef here", WARN, &fpos(t), KW_LBR);
+    Dispose(t);
+    return;
+  }
+  inside = Parse(&t, encl, FALSE, FALSE);
+  inside = ReplaceWithTidy(inside, FALSE);
+  FontDefine(family, face, inside);
+  return;
+} /* end ReadFontDef */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static ReadLangDef(encl)                                                 */
+/*                                                                           */
+/*  Read one language definition and pass it on to the language module.  The */
+/*  syntax is  langdef <name> ... <name> { <object> }                        */
+/*                                                                           */
+/*****************************************************************************/
+
+static void ReadLangDef(OBJECT encl)
+{ OBJECT t, names, inside;
+  
+  New(names, ACAT);
+  t = LexGetToken();
+  while( is_word(type(t)) )
+  { Link(names, t);
+    t = LexGetToken();
+  }
+  if( type(t) != LBR )
+  { Error(5, 4, "expected opening %s of langdef here", WARN, &fpos(t), KW_LBR);
+    Dispose(t);
+    return;
+  }
+  inside = Parse(&t, encl, FALSE, FALSE);
+  inside = ReplaceWithTidy(inside, FALSE);
+  LanguageDefine(names, inside);
+  return;
+} /* end ReadLangDef */
+
+
+/*@::ReadPrependDef(), ReadDatabaseDef()@*************************************/
+/*                                                                           */
+/*  ReadPrependDef(typ, encl)                                                */
+/*                                                                           */
+/*  Read @Prepend { <filename> } and record its presence.                    */
+/*                                                                           */
+/*****************************************************************************/
+
+void ReadPrependDef(unsigned typ, OBJECT encl)
+{ OBJECT t, fname;
+  t = LexGetToken();
+  if( type(t) != LBR )
+  { Error(5, 5, "left brace expected here in %s declaration",
+      WARN, &fpos(t), KW_PREPEND);
+    Dispose(t);
+    return;
+  }
+  fname = Parse(&t, encl, FALSE, FALSE);
+  fname = ReplaceWithTidy(fname, FALSE);
+  if( !is_word(type(fname)) )
+  { Error(5, 6, "name of %s file expected here", WARN, &fpos(fname),KW_PREPEND);
+    DisposeObject(fname);
+    return;
+  }
+  debug0(DFS, D, "  calling DefineFile from ReadPrependDef");
+  DefineFile(string(fname), STR_EMPTY, &fpos(fname), PREPEND_FILE,
+	   typ == PREPEND ? INCLUDE_PATH : SYSINCLUDE_PATH);
+
+} /* end ReadPrependDef */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  ReadDatabaseDef(typ, encl)                                               */
+/*                                                                           */
+/*  Read @Database <symname> ... <symname> { <filename> } and record it.     */
+/*                                                                           */
+/*****************************************************************************/
+
+void ReadDatabaseDef(unsigned typ, OBJECT encl)
+{ OBJECT symbs, t, fname;
+  New(symbs, ACAT);
+  t = LexGetToken();
+  while( type(t)==CLOSURE || (type(t)==WORD && string(t)[0]==CH_SYMSTART) )
+  { if( type(t) == CLOSURE )
+    { Link(symbs, t);
+    }
+    else
+    { Error(5, 7, "unknown or misspelt symbol %s", WARN, &fpos(t), string(t));
+      Dispose(t);
+    }
+    t = LexGetToken();
+  }
+  if( type(t) != LBR )
+  { Error(5, 8, "symbol name or %s expected here (%s declaration)",
+      WARN, &fpos(t), KW_LBR, KW_DATABASE);
+    Dispose(t);
+    return;
+  }
+  if( Down(symbs) == symbs )
+  { Error(5, 9, "symbol names missing in %s declaration",
+      WARN, &fpos(t), KW_DATABASE);
+  }
+  fname = Parse(&t, encl, FALSE, FALSE);
+  fname = ReplaceWithTidy(fname, FALSE);
+  if( !is_word(type(fname)) )
+  { Error(5, 10, "name of %s file expected here", WARN, &fpos(fname),
+      KW_DATABASE);
+    DisposeObject(fname);
+    return;
+  }
+  if( StringEndsWith(string(fname), DATA_SUFFIX) )
+  { Error(5, 47, "%s suffix should be omitted in %s clause", WARN,
+      &fpos(fname), DATA_SUFFIX, KW_DATABASE);
+    DisposeObject(fname);
+    return;
+  }
+  if( Down(symbs) != symbs )
+    (void) DbLoad(fname, typ == DATABASE ? DATABASE_PATH : SYSDATABASE_PATH,
+      TRUE, symbs, InMemoryDbIndexes);
+} /* end ReadDatabaseDef */
+
+
+/*@::ReadTokenList()@*********************************************************/
+/*                                                                           */
+/*  static ReadTokenList(token, res)                                         */
+/*                                                                           */
+/*  Read a list of tokens from input and append them to sym_body(res).       */
+/*  The list is assumed to begin immediately after token, which is either    */
+/*  an LBR or a @Begin, and input is to be read up to and including the      */
+/*  matching RBR or @End @Sym.                                               */
+/*                                                                           */
+/*****************************************************************************/
+#define NextToken(t, res)						\
+  t = LexGetToken(); sym_body(res) = Append(sym_body(res), t, PARENT);
+
+static void ReadTokenList(OBJECT token, OBJECT res)
+{ OBJECT t, xsym, new_par, imps, link, y;  int scope_count, i;
+  NextToken(t, res);
+  for(;;) switch(type(t))
+  {
+    case WORD:
+
+      if( string(t)[0] == CH_SYMSTART )
+	Error(5, 11, "symbol %s unknown or misspelt", WARN, &fpos(t),
+	  string(t));
+      NextToken(t, res);
+      break;
+
+
+    case QWORD:
+
+      NextToken(t, res);
+      break;
+
+
+    case VCAT:
+    case HCAT:
+    case ACAT:
+    case CROSS:
+    case FORCE_CROSS:
+    case NULL_CLOS:
+    case PAGE_LABEL:
+    case ONE_COL:
+    case ONE_ROW:
+    case WIDE:
+    case HIGH:
+    case HSHIFT:
+    case VSHIFT:
+    case HSCALE:
+    case VSCALE:
+    case HCOVER:
+    case VCOVER:
+    case SCALE:
+    case KERN_SHRINK:
+    case HCONTRACT:
+    case VCONTRACT:
+    case HLIMITED:
+    case VLIMITED:
+    case HEXPAND:
+    case VEXPAND:
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case HSPAN:
+    case VSPAN:
+    case PADJUST:
+    case HADJUST:
+    case VADJUST:
+    case ROTATE:
+    case BACKGROUND:
+    case RAW_VERBATIM:
+    case VERBATIM:
+    case CASE:
+    case YIELD:
+    case BACKEND:
+    case XCHAR:
+    case FONT:
+    case SPACE:
+    case YUNIT:
+    case ZUNIT:
+    case BREAK:
+    case UNDERLINE:
+    case COLOUR:
+    case LANGUAGE:
+    case CURR_LANG:
+    case CURR_FAMILY:
+    case CURR_FACE:
+    case COMMON:
+    case RUMP:
+    case MELD:
+    case INSERT:
+    case ONE_OF:
+    case NEXT:
+    case PLUS:
+    case MINUS:
+    case TAGGED:
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+    case NOT_REVEALED:
+
+      NextToken(t, res);
+      break;
+
+
+    case LUSE:
+    case LVIS:
+    case ENV:
+    case USE:
+    case DATABASE:
+    case SYS_DATABASE:
+    case PREPEND:
+    case SYS_PREPEND:
+    case OPEN:
+
+      Error(5, 12, "symbol %s not allowed in macro", WARN, &fpos(t),
+	SymName(actual(t)));
+      NextToken(t, res);
+      break;
+
+
+    case LBR:
+
+      ReadTokenList(t, res);
+      NextToken(t, res);
+      break;
+
+
+    case UNEXPECTED_EOF:
+
+      Error(5, 13, "unexpected end of input", FATAL, &fpos(t));
+      break;
+
+
+    case BEGIN:
+
+      Error(5, 14, "%s not expected here", WARN, &fpos(t), SymName(actual(t)));
+      NextToken(t, res);
+      break;
+
+
+    case RBR:
+
+      if( type(token) != LBR )
+	Error(5, 15, "unmatched %s in macro", WARN, &fpos(t), KW_RBR);
+      return;
+
+
+    case END:
+
+      if( type(token) != BEGIN )
+	Error(5, 16, "unmatched %s in macro", WARN, &fpos(t), KW_END);
+      else
+      { NextToken(t, res);
+        if( type(t) != CLOSURE )
+	{
+	  if( type(t) == WORD && string(t)[0] == CH_SYMSTART )
+	    Error(5, 17, "symbol %s unknown or misspelt",
+	      WARN, &fpos(t), string(t));
+	  else
+	    Error(5, 18, "symbol name expected after %s", WARN,&fpos(t),KW_END);
+	}
+        else if( actual(token) != actual(t) )
+	  Error(5, 19, "%s %s does not match %s %s", WARN, &fpos(t),
+	    SymName(actual(token)), KW_BEGIN, SymName(actual(t)), KW_END);
+      }
+      return;
+
+
+    case CLOSURE:
+
+      xsym = actual(t);
+      PushScope(xsym, TRUE, FALSE);
+      NextToken(t, res);
+      PopScope();
+      if( type(t) == CROSS || type(t) == FORCE_CROSS )
+      { NextToken(t, res);
+	break;
+      }
+
+      /* read named parameters */
+      while( type(t) == CLOSURE && enclosing(actual(t)) == xsym &&
+	     type(actual(t)) == NPAR )
+      {	new_par = t;
+	NextToken(t, res);
+	if( type(t) != LBR )
+	{ if( type(t) == RBR )
+	  { if( type(token) != LBR )
+	      Error(5, 20, "unmatched %s in macro", WARN, &fpos(t), KW_RBR);
+	    return;
+	  }
+	  Error(5, 21, "%s must follow named parameter %s",
+	    WARN, &fpos(new_par), KW_LBR, SymName(actual(new_par)));
+	  break;
+	}
+
+        /* add import list of the named parameter to current scope */
+        scope_count = 0;
+        imps = imports(actual(new_par));
+        if( imps != nilobj )
+        { for( link = Down(imps);  link != imps;  link = NextDown(link) )
+          { Child(y, link);
+            PushScope(actual(y), FALSE, TRUE);
+            scope_count++;
+          }
+        }
+
+	/* read the body of the named parameter */
+	PushScope(actual(new_par), FALSE, FALSE);
+	ReadTokenList(t, res);
+	PopScope();
+
+        /* pop the scopes pushed for the import list */
+        for( i = 0;  i < scope_count;  i++ )
+          PopScope();
+
+	/* get next token, possibly another named parameter */
+	PushScope(xsym, TRUE, FALSE);
+	NextToken(t, res);
+	PopScope();
+      }
+
+      /* read body parameter, if any */
+      if( has_body(xsym) )
+      {
+	if( type(t) == LBR || type(t) == BEGIN )
+	{ PushScope(xsym, FALSE, TRUE);
+	  PushScope(ChildSym(xsym, RPAR), FALSE, FALSE);
+	  if( type(t) == BEGIN )  actual(t) = xsym;
+	  ReadTokenList(t, res);
+	  PopScope();
+	  PopScope();
+	  NextToken(t, res);
+	}
+	else if( type(t) != RBR && type(t) != END )
+	  Error(5, 22, "right parameter of %s must begin with %s",
+	    WARN, &fpos(t), SymName(xsym), KW_LBR);
+      }
+      break;
+
+
+    default:
+
+      Error(5, 23, "ReadTokenList: %s", INTERN, &fpos(t), Image(type(t)));
+      break;
+
+  }
+} /* end ReadTokenList */
+
+
+/*@::ReadMacro()@*************************************************************/
+/*                                                                           */
+/*  static OBJECT ReadMacro(token, encl)                                     */
+/*                                                                           */
+/*  Read a macro from input and insert into symbol table.                    */
+/*  Token *token contains the "macro" keyword.  Input is read up to and      */
+/*  including the closing right brace, and nilobj returned in *token if OK.  */
+/*  The proper scope for reading the macro body is open at entry and exit.   */
+/*  ReadMacro returns the new symbol table entry if successful, else nilobj. */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT ReadMacro(OBJECT *token, OBJECT curr_encl, OBJECT encl)
+{ OBJECT t, res;
+
+  /* find macro name and insert into symbol table */
+  SuppressScope();
+  Dispose(*token);  t = LexGetToken();
+  if( !is_word(type(t)) )
+  { Error(5, 24, "%s ignored (name is missing)", WARN, &fpos(t), KW_MACRO);
+    debug1(ANY, D, "offending type is %s", Image(type(t)));
+    UnSuppressScope();
+    *token = t;
+    return nilobj;
+  }
+  res = InsertSym(string(t), MACRO, &fpos(t), 0, FALSE,TRUE,0,curr_encl,nilobj);
+  if( curr_encl != encl )  visible(res) = TRUE;
+  UnSuppressScope();
+
+  /* find alternative names for this symbol */
+  Dispose(t);  t = LexGetToken();
+  while( is_word(type(t)) )
+  {
+    InsertAlternativeName(string(t), res, &fpos(t));
+    Dispose(t);  t = LexGetToken();
+  }
+
+  /* find opening left brace */
+  if( type(t) != LBR )
+  { Error(5, 25, "%s ignored (opening %s is missing)",
+      WARN, &fpos(t), KW_MACRO, KW_LBR);
+    *token = t;
+    return nilobj;
+  }
+  
+  /* read macro body */
+  ReadTokenList(t, res);
+  Dispose(t);
+
+  /* clean up (kill final RBR, dispose macro name) and exit */
+  t = pred(sym_body(res), PARENT);
+  sym_body(res) = Delete(t, PARENT);
+  Dispose(t);
+  recursive(res) = FALSE;
+  *token = nilobj;
+  return res;
+} /* end ReadMacro */
+
+
+/*@::ReadDefinitions()@*******************************************************/
+/*                                                                           */
+/*  ReadDefinitions(token, encl, res_type)                                   */
+/*                                                                           */
+/*  Read a sequence of definitions and insert them into the symbol table.    */
+/*  Either a sequence of local definitions (res_type == LOCAL) or named      */
+/*  parameters (res_type == NPAR) is expected; *token is the first def etc.  */
+/*  A scope appropriate for reading the bodies of the definitions is open.   */
+/*  The parent definition is encl.                                           */
+/*                                                                           */
+/*****************************************************************************/
+
+void ReadDefinitions(OBJECT *token, OBJECT encl, unsigned char res_type)
+{ OBJECT t, res, res_target, export_list, import_list, link, y, z;
+  OBJECT curr_encl;  BOOLEAN compulsory_par, has_import_encl;
+  t = *token;
+
+  while( res_type==LOCAL || is_string(t, KW_NAMED) || is_string(t, KW_IMPORT) )
+  {
+    curr_encl = encl;
+    if( is_string(t, KW_FONTDEF) )
+    { ReadFontDef(encl);
+      t = LexGetToken();
+      continue;  /* next definition */
+    }
+    else if( is_string(t, KW_LANGDEF) )
+    { ReadLangDef(encl);
+      t = LexGetToken();
+      continue;  /* next definition */
+    }
+    else if( type(t) == PREPEND || type(t) == SYS_PREPEND )
+    { ReadPrependDef(type(t), encl);
+      Dispose(t);
+      t = LexGetToken();
+      continue;  /* next definition */
+    }
+    else if( type(t) == DATABASE || type(t) == SYS_DATABASE )
+    { ReadDatabaseDef(type(t), encl);
+      Dispose(t);
+      t = LexGetToken();
+      continue;  /* next definition */
+    }
+
+    if( !is_string(t, KW_DEF)    && !is_string(t, KW_MACRO)  &&
+	!is_string(t, KW_NAMED)  && !is_string(t, KW_IMPORT) &&
+        !is_string(t, KW_EXTEND) && !is_string(t, KW_EXPORT) )
+      break;
+
+    /* get import or extend list and change scope appropriately */
+    BodyParNotAllowed();
+    New(import_list, ACAT);
+    has_import_encl = FALSE;
+    if( is_string(t, KW_IMPORT) )
+    { Dispose(t);
+      t = LexGetToken();
+      while( type(t) == CLOSURE ||
+	       (type(t)==WORD && !is_string(t,KW_EXPORT) && !is_string(t,KW_DEF)
+	       && !is_string(t, KW_MACRO) && !is_string(t, KW_NAMED)) )
+      {	if( type(t) == CLOSURE )
+	{ if( type(actual(t)) == LOCAL )
+	  {
+	    /* *** letting this through now
+	    if( res_type == NPAR && has_par(actual(t)) )
+	    {
+	      Error(5, 46, "named parameter import %s has parameters",
+		WARN, &fpos(t), SymName(actual(t)));
+	    }
+	    else
+	    {
+	    *** */
+	      PushScope(actual(t), FALSE, TRUE);
+	      if( actual(t) == encl )  has_import_encl = TRUE;
+	      Link(import_list, t);
+	    /* ***
+	    }
+	    *** */
+	  }
+	  else
+	  { Error(5, 26, "import name expected here", WARN, &fpos(t));
+	    Dispose(t);
+	  }
+	}
+	else
+	{ Error(5, 27, "import %s not in scope", WARN, &fpos(t), string(t));
+	  Dispose(t);
+	}
+	t = LexGetToken();
+      }
+    }
+    else if( is_string(t, KW_EXTEND) )
+    { Dispose(t);
+      t = LexGetToken();
+      while( type(t) == CLOSURE ||
+	       (type(t)==WORD && !is_string(t,KW_EXPORT) && !is_string(t,KW_DEF)
+	       && !is_string(t, KW_MACRO)) )
+      {	if( type(t) == CLOSURE )
+	{ if( imports(actual(t)) != nilobj )
+	  { Error(5, 48, "%s has %s clause, so cannot be extended",
+	      WARN, &fpos(t), SymName(actual(t)), KW_IMPORT);
+	  }
+	  else if( type(actual(t)) == LOCAL )
+	  { PushScope(actual(t), FALSE, FALSE);
+	    curr_encl = actual(t);
+            debug1(DRD, D, "  curr_encl = %s", SymName(curr_encl));
+	    Link(import_list, t);
+	  }
+	  else
+	  { Error(5, 28, "%s symbol name expected here",
+	      WARN, &fpos(t), KW_EXTEND);
+	    Dispose(t);
+	  }
+	}
+	else
+	{ Error(5, 29, "extend symbol %s not in scope", WARN,&fpos(t),string(t));
+	  Dispose(t);
+	}
+	t = LexGetToken();
+      }
+    }
+
+    /* get export list and store for setting visible flags below */
+    New(export_list, ACAT);
+    if( is_string(t, KW_EXPORT) )
+    { Dispose(t);
+      SuppressScope();
+      t = LexGetToken();
+      while( is_word(type(t)) && !is_string(t, KW_DEF) && !is_string(t, KW_IMPORT)
+	&& !is_string(t, KW_MACRO) && !is_string(t, KW_EXTEND) )
+      { Link(export_list, t);
+	t = LexGetToken();
+      }
+      UnSuppressScope();
+    }
+
+
+    if( res_type == LOCAL && !is_string(t, KW_DEF) && !is_string(t, KW_MACRO) )
+    { Error(5, 30, "keyword %s or %s expected here", WARN, &fpos(t),
+	KW_DEF, KW_MACRO);
+      break;
+    }
+    if( res_type == NPAR && !is_string(t, KW_NAMED) )
+    { Error(5, 31, "keyword %s expected here", WARN, &fpos(t), KW_NAMED);
+      break;
+    }
+
+    if( is_string(t, KW_MACRO) )
+    { if( Down(export_list) != export_list )
+	Error(5, 32, "ignoring export list of macro", WARN, &fpos(t));
+      res = ReadMacro(&t, curr_encl, encl);
+    }
+    else
+    {
+      SuppressScope();  Dispose(t);  t = LexGetToken();
+
+      /* check for compulsory keyword */
+      if( res_type == NPAR && is_string(t, KW_COMPULSORY) )
+      { compulsory_par = TRUE;
+	Dispose(t);  t = LexGetToken();
+      }
+      else compulsory_par = FALSE;
+
+      /* find name of symbol and insert it */
+      if( !is_word(type(t)) )
+      { Error(5, 33, "symbol name expected here", WARN, &fpos(t));
+	debug1(ANY, D, "offending type is %s", Image(type(t)));
+	UnSuppressScope();
+	*token = t;
+	return;
+      }
+      res = InsertSym(string(t), res_type, &fpos(t), DEFAULT_PREC,
+		FALSE, FALSE, 0, curr_encl, nilobj);
+      if( curr_encl != encl )  visible(res) = TRUE;
+      if( has_import_encl )
+      {
+	imports_encl(res) = TRUE;
+	debug1(DCE, D, "  setting import_encl(%s) to TRUE", SymName(res));
+      }
+      if( compulsory_par )
+      { has_compulsory(encl)++;
+	is_compulsory(res) = TRUE;
+      }
+      Dispose(t);  t = LexGetToken();
+
+      /* find alternative names for this symbol */
+      while( is_word(type(t)) && !is_string(t, KW_NAMED) &&
+	!is_string(t, KW_IMPORT) &&
+	!is_string(t, KW_FORCE) && !is_string(t, KW_INTO) &&
+	!is_string(t, KW_HORIZ) && !is_string(t, KW_PRECEDENCE) &&
+	!is_string(t, KW_ASSOC) && !is_string(t, KW_LEFT) &&
+	!is_string(t, KW_RIGHT) && !is_string(t, KW_BODY) &&
+	!is_string(t, KW_LBR) && !is_string(t, KW_BEGIN) )
+      {
+	InsertAlternativeName(string(t), res, &fpos(t));
+	Dispose(t);  t = LexGetToken();
+      }
+
+      /* find force, if any */
+      if( is_string(t, KW_FORCE) )
+      {	force_target(res) = TRUE;
+	Dispose(t);  t = LexGetToken();
+	if( !is_string(t, KW_INTO) && !is_string(t, KW_HORIZ) )
+	   Error(5, 34, "%s expected here", WARN, &fpos(t), KW_INTO);
+      }
+	
+      /* find horizontally, if any */
+      if( is_string(t, KW_HORIZ) )
+      { horiz_galley(res) = COLM;
+	Dispose(t);  t = LexGetToken();
+	/* *** want to allow KW_HORIZ with @Target form now
+	if( !is_string(t, KW_INTO) )
+	  Error(5, 35, "%s expected here", WARN, &fpos(t), KW_INTO);
+	*** */
+      }
+
+      /* find into clause, if any */
+      res_target = nilobj;
+      if( is_string(t, KW_INTO) )
+      { UnSuppressScope();
+	Dispose(t);  t = LexGetToken();
+	if( type(t) != LBR )
+	{ Error(5, 36, "%s expected here", WARN, &fpos(t), KW_LBR);
+	  debug1(ANY, D, "offending type is %s", Image(type(t)));
+	  UnSuppressScope();
+	  *token = t;
+	  return;
+	}
+	res_target = Parse(&t, curr_encl, FALSE, FALSE);
+	SuppressScope();
+	if( t == nilobj )  t = LexGetToken();
+      }
+
+      /* find precedence clause, if any */
+      if( is_string(t, KW_PRECEDENCE) )
+      {	int prec = 0;
+	Dispose(t);
+	t = LexGetToken();
+	while( type(t) == WORD && decimaldigit(string(t)[0]) )
+	{
+	  prec = prec * 10 + digitchartonum(string(t)[0]);
+	  Dispose(t);  t = LexGetToken();
+	}
+
+	if( prec < MIN_PREC )
+	{ Error(5, 37, "precedence is too low (%d substituted)",
+	    WARN, &fpos(t), MIN_PREC);
+	  prec = MIN_PREC;
+	}
+	else if( prec > MAX_PREC )
+	{ Error(5, 38, "precedence is too high (%d substituted)",
+	    WARN, &fpos(t), MAX_PREC);
+	  prec = MAX_PREC;
+	}
+	precedence(res) = prec;
+      }
+
+      /* find associativity clause, if any */
+      if( is_string(t, KW_ASSOC) )
+      {	Dispose(t);  t = LexGetToken();
+	if( is_string(t, KW_LEFT) )  right_assoc(res) = FALSE;
+	else if( !is_string(t, KW_RIGHT) )
+	  Error(5, 39, "associativity altered to %s", WARN, &fpos(t), KW_RIGHT);
+	Dispose(t);  t = LexGetToken();
+      }
+
+      /* find left parameter, if any */
+      if( is_string(t, KW_LEFT) )
+      {	Dispose(t);  t = LexGetToken();
+	if( type(t) != WORD )
+	{ Error(5, 40, "cannot find %s parameter name", WARN, &fpos(t), KW_LEFT);
+	  debug1(ANY, D, "offending type is %s", Image(type(t)));
+	  UnSuppressScope();
+	  *token = t;
+	  return;
+	}
+	InsertSym(string(t), LPAR, &fpos(t), DEFAULT_PREC, 
+	  FALSE, FALSE, 0, res, nilobj);
+	Dispose(t);  t = LexGetToken();
+      }
+
+      /* find named parameters, if any */
+      UnSuppressScope();
+      ReadDefinitions(&t, res, NPAR);
+
+      /* find right or body parameter, if any */
+      if( is_string(t, KW_RIGHT) || is_string(t, KW_BODY) )
+      {	has_body(res) = is_string(t, KW_BODY);
+	SuppressScope();
+	Dispose(t);  t = LexGetToken();
+	if( type(t) != WORD )
+	{ Error(5, 41, "cannot find %s parameter name", WARN,&fpos(t),KW_RIGHT);
+	  debug1(ANY, D, "offending type is %s", Image(type(t)));
+	  UnSuppressScope();
+	  *token = t;
+	  return;
+	}
+	InsertSym(string(t), RPAR, &fpos(t), DEFAULT_PREC,
+	  FALSE, FALSE, 0, res, nilobj);
+	UnSuppressScope();
+	Dispose(t);  t = LexGetToken();
+      }
+
+      /* read local definitions and body */
+      if( res_target != nilobj )
+	InsertSym(KW_TARGET, LOCAL, &fpos(res_target), DEFAULT_PREC,
+			FALSE, FALSE, 0, res, res_target);
+      if( type(t) == WORD && StringEqual(string(t), KW_LBR) )
+      {	z = NewToken(LBR, &fpos(t), 0, 0, LBR_PREC, StartSym);
+	Dispose(t);
+	t = z;
+      }
+      else if( type(t) == WORD && StringEqual(string(t), KW_BEGIN) )
+      {	z = NewToken(BEGIN, &fpos(t), 0, 0, BEGIN_PREC, StartSym);
+	Dispose(t);
+	t = z;
+      }
+      else if( type(t) != LBR && type(t) != BEGIN )
+	Error(5, 42, "opening left brace or @Begin of %s expected",
+	  FATAL, &fpos(t), SymName(res));
+      if( type(t) == BEGIN )  actual(t) = res;
+      PushScope(res, FALSE, FALSE);
+      BodyParAllowed();
+      sym_body(res) = Parse(&t, res, TRUE, FALSE);
+
+      /* set visible flag of the exported symbols */
+      for( link=Down(export_list);  link != export_list;  link=NextDown(link) )
+      {	Child(y, link);
+	z = SearchSym(string(y), StringLength(string(y)));
+	if( z == nilobj || enclosing(z) != res )
+	  Error(5, 43, "exported symbol %s is not defined in %s",
+	    WARN, &fpos(y), string(y), SymName(res));
+	else if( has_body(res) && type(z) == RPAR )
+	  Error(5, 44, "body parameter %s may not be exported",
+	    WARN, &fpos(y), string(y));
+	else if( visible(z) )
+	  Error(5, 45, "symbol %s exported twice", WARN, &fpos(y), string(y));
+	else visible(z) = TRUE;
+      }
+      DisposeObject(export_list);
+
+      /* pop scope of res */
+      PopScope();
+    }
+
+    /* pop import scopes and store imports in sym tab */
+    for( link=Down(import_list);  link != import_list;  link=NextDown(link) )
+    {
+      PopScope();
+    }
+    if( Down(import_list) == import_list || curr_encl != encl )
+    { DisposeObject(import_list);
+      import_list = nilobj;
+    }
+    else
+    {
+      imports(res) = import_list;
+    }
+
+    BodyParAllowed();
+    if( t == nilobj ) t = LexGetToken();
+
+  } /* end while */
+
+  *token = t;
+  return;
+} /* end ReadDefinitions */
diff --git a/z06.c b/z06.c
new file mode 100644
index 0000000..b725399
--- /dev/null
+++ b/z06.c
@@ -0,0 +1,1533 @@
+/*@z06.c:Parser:PushObj(), PushToken(), etc.@*********************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z06.c                                                      */
+/*  MODULE:       Parser                                                     */
+/*  EXTERNS:      InitParser(), Parse()                                      */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define	LEFT_ASSOC	0
+#define	RIGHT_ASSOC	1
+
+#define	PREV_OP		0		/* means an operator was previous    */
+#define	PREV_OBJ	1		/* prev was object not ending in RBR */
+#define	PREV_RBR	2		/* prev was object ending in RBR     */
+
+static	OBJECT		cross_name;	/* name of the cr database   */
+
+
+#define	MAX_STACK	100			/* size of parser stacks     */
+static	OBJECT		obj_stack[MAX_STACK];	/* stack of objects          */
+static	int		otop = -1;		/* top of obj_stack          */
+static	OBJECT		tok_stack[MAX_STACK];	/* stack of tokens           */
+static	int		ttop = -1;		/* top of tok_stack          */
+static	int		unknown_count = 0;	/* no. of unknown symbols    */
+#if DEBUG_ON
+static	BOOLEAN		debug_now = FALSE;	/* TRUE when want to debug   */
+#endif
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT OptimizeCase(x)                                                   */
+/*                                                                           */
+/*  Optimize the @Case expression x, which is known to be of the form        */
+/*  "@BackEnd @Case ...", by evaluating it immediately if its choices        */
+/*  are all literal words or "else".                                         */
+/*                                                                           */
+/*****************************************************************************/
+
+static void check_yield(OBJECT y, OBJECT *res_yield, BOOLEAN *all_literals)
+{ OBJECT s1, link, z;
+  Child(s1, Down(y));
+  debug1(DOP, DD, "  checkyield(%s)", EchoObject(y));
+  if( is_word(type(s1)) )
+  { if( StringEqual(string(s1),BackEndWord) || StringEqual(string(s1),STR_ELSE) )
+      if( *res_yield == nilobj )  *res_yield = y;
+  }
+  else if( type(s1) == ACAT )
+  { for( link = Down(s1);  link != s1;  link = NextDown(link) )
+    { Child(z, link);
+      if( type(z) == GAP_OBJ )  continue;
+      if( is_word(type(z)) )
+      { if( StringEqual(string(z),BackEndWord)||StringEqual(string(s1),STR_ELSE))
+	  if( *res_yield == nilobj )  *res_yield = y;
+      }
+      else
+      { *all_literals = FALSE;
+	*res_yield = nilobj;
+	break;
+      }
+    }
+  }
+  else
+  { *all_literals = FALSE;
+    *res_yield = nilobj;
+  }
+  debug2(DOP, DD, "  checkyield returning (%s, %s)", EchoObject(*res_yield),
+    bool(*all_literals));
+}
+
+OBJECT OptimizeCase(OBJECT x)
+{ OBJECT link, s2, y, res_yield, res;  BOOLEAN all_literals;  
+  debug1(DOP, DD, "OptimizeCase(%s)", EchoObject(x));
+  assert( type(x) == CASE, "OptimizeCase:  type(x) != CASE!" );
+
+  Child(s2, LastDown(x));
+  all_literals = TRUE;  res_yield = nilobj;
+  if( type(s2) == YIELD )
+  { check_yield(s2, &res_yield, &all_literals);
+  }
+  else if( type(s2) == ACAT )
+  { for( link = Down(s2);  link != s2 && all_literals;  link = NextDown(link) )
+    {
+      Child(y, link);
+      debug2(DOP, DD, "  OptimizeCase examining %s %s", Image(type(y)),
+	EchoObject(y));
+      if( type(y) == GAP_OBJ )  continue;
+      if( type(y) == YIELD )
+      { check_yield(y, &res_yield, &all_literals);
+      }
+      else
+      { all_literals = FALSE;
+	res_yield = nilobj;
+      }
+    }
+  }
+  else
+  { all_literals = FALSE;
+    res_yield = nilobj;
+  }
+
+  if( all_literals && res_yield != nilobj )
+  { Child(res, LastDown(res_yield));
+    DeleteLink(Up(res));
+    DisposeObject(x);
+  }
+  else
+  { res = x;
+  }
+
+  debug1(DOP, DD, "OptimizeCase returning %s", EchoObject(res));
+  return res;
+} /* end OptimizeCase */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  HuntCommandOptions(x)                                                    */
+/*                                                                           */
+/*  See if any of the command-line options apply to closure x.  If so,       */
+/*  change x to reflect the overriding command line option.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+static void HuntCommandOptions(OBJECT x)
+{ OBJECT colink, coname, coval, opt, y, link, sym;  BOOLEAN found;
+  debug1(DOP, DD, "HuntCommandOptions(%s)", SymName(actual(x)));
+  sym = actual(x);
+  for( colink = Down(CommandOptions);  colink != CommandOptions;
+    colink = NextDown(NextDown(colink)) )
+  {
+    Child(coname, colink);
+    Child(coval, NextDown(colink));
+    debug2(DOP, DD, "  hunting \"%s\" with value \"%s\"", string(coname),
+      EchoObject(coval));
+
+    /* set found to TRUE iff coname is the name of an option of x */
+    found = FALSE;
+    for( link = Down(sym);  link != sym;  link = NextDown(link) )
+    { Child(opt, link);
+      if( type(opt) == NPAR && StringEqual(SymName(opt), string(coname)) )
+      { found = TRUE;
+	debug2(DOP, DD, "  %s is an option of %s", string(coname),SymName(sym));
+	break;
+      }
+    }
+
+    if( found )
+    {
+      /* see whether this option is already set within x */
+      found = FALSE;
+      for( link = Down(x);  link != x;  link = NextDown(link) )
+      { Child(y, link);
+	if( type(y) == PAR && actual(y) == opt )
+	{ found = TRUE;
+	  debug2(DOP, DD, "  %s is set in %s", string(coname), SymName(sym));
+	  break;
+	}
+      }
+
+      if( found )
+      {
+	/* option exists already in x: replace it with oval */
+	DisposeChild(Down(y));
+	Link(y, coval);
+	debug2(DOP, DD, "  replacing %s value with %s; x =", string(coname),
+	  EchoObject(coval));
+	ifdebug(DOP, DD, DebugObject(x));
+      }
+      else
+      {
+	/* option applies to x but has not yet been set in x */
+	New(y, PAR);
+	Link(x, y);
+	actual(y) = opt;
+	Link(y, coval);
+	debug2(DOP, DD, "  inserting %s with value %s; x =", string(coname),
+	  EchoObject(coval));
+	ifdebug(DOP, DD, DebugObject(x));
+      }
+    }
+  }
+  debug1(DOP, DD, "HuntCommandOptions(%s) returning", SymName(sym));
+} /* end HuntCommandOptions */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PushObj(x)                                                               */
+/*  PushToken(t)                                                             */
+/*  OBJECT PopObj()                                                          */
+/*  OBJECT PopToken()                                                        */
+/*  OBJECT TokenTop                                                          */
+/*  OBJECT ObjTop                                                            */
+/*                                                                           */
+/*  Push and pop from the object and token stacks; examine top item.         */
+/*                                                                           */
+/*****************************************************************************/
+
+#define PushObj(x)							\
+{ zz_hold = x;								\
+  if( ++otop < MAX_STACK ) obj_stack[otop] = zz_hold;			\
+  else Error(6, 1, "expression is too deeply nested",			\
+    FATAL, &fpos(obj_stack[otop-1]));					\
+}
+
+#define PushToken(t)							\
+{ if( ++ttop < MAX_STACK ) tok_stack[ttop] = t;				\
+  else Error(6, 2, "expression is too deeply nested",			\
+	 FATAL, &fpos(tok_stack[ttop-1]));				\
+}
+
+#define PopObj()	obj_stack[otop--]
+#define PopToken()	tok_stack[ttop--]
+#define	TokenTop	tok_stack[ttop]
+#define	ObjTop		obj_stack[otop]
+
+
+/*@::DebugStacks(), InsertSpace()@********************************************/
+/*                                                                           */
+/*  DebugStacks()                                                            */
+/*                                                                           */
+/*  Print debug output of the stacks state                                   */
+/*                                                                           */
+/*****************************************************************************/
+
+#if DEBUG_ON
+static void DebugStacks(int initial_ttop, int obj_prev)
+{ int i;
+  debug3(ANY, D, "  obj_prev: %s; otop: %d; ttop: %d",
+    obj_prev == PREV_OP ? "PREV_OP" : obj_prev == PREV_OBJ ? "PREV_OBJ" :
+    obj_prev == PREV_RBR ? "PREV_RBR" : "???", otop, ttop);
+  for( i = 0;  i <= otop; i++ )
+    debug3(ANY, D, "  obj[%d] = (%s) %s", i,
+       Image(type(obj_stack[i])), EchoObject(obj_stack[i]));
+  for( i = 0;  i <= ttop;  i++ )
+  { if( i == initial_ttop+1 ) debug0(DOP, DD, "  $");
+    debug3(ANY, D, "  tok[%d] = %s (precedence %d)", i,
+      type(tok_stack[i]) == CLOSURE ?
+	SymName(actual(tok_stack[i])) : Image(type(tok_stack[i])),
+      precedence(tok_stack[i]));
+  }
+} /* end DebugStacks */
+#endif
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  InsertSpace(t)                                                           */
+/*                                                                           */
+/*  Add any missing catenation operator in front of token t.                 */
+/*                                                                           */
+/*****************************************************************************/
+
+#define InsertSpace(t)							\
+if( obj_prev )								\
+{ int typ, prec;							\
+  if( hspace(t) + vspace(t) > 0 )					\
+    typ = TSPACE, prec = ACAT_PREC;					\
+  else if( type(t) == LBR || obj_prev == PREV_RBR )			\
+    typ = TJUXTA, prec = ACAT_PREC;					\
+  else									\
+    typ = TJUXTA, prec = JUXTA_PREC;					\
+  debugcond1(DOP, DD, debug_now, "[ InsertSpace(%s)", Image(typ));	\
+  while( obj_prev && precedence(TokenTop) >= prec )			\
+    obj_prev = Reduce();						\
+  if( obj_prev )							\
+  { New(tmp, typ);  precedence(tmp) = prec;				\
+    vspace(tmp) = vspace(t);  hspace(tmp) = hspace(t);			\
+    mark(gap(tmp)) = FALSE;  join(gap(tmp)) = TRUE;			\
+    FposCopy(fpos(tmp), fpos(t));					\
+    PushToken(tmp);							\
+  }									\
+  debugcond0(DOP, DD, debug_now, "] end InsertSpace()");		\
+} /* end InsertSpace */
+
+
+/*@::Shift(), ShiftObj()@*****************************************************/
+/*                                                                           */
+/*  static Shift(t, prec, rassoc, leftpar, rightpar)                         */
+/*  static ShiftObj(t)                                                       */
+/*                                                                           */
+/*  Shift token or object t onto the stacks; it has the attributes shown.    */
+/*                                                                           */
+/*****************************************************************************/
+
+#define Shift(t, prec, rassoc, leftpar, rightpar)			\
+{ debugcond5(DOP, DD, debug_now, "[ Shift(%s, %d, %s, %s, %s)",		\
+    Image(type(t)), prec, rassoc ? "rightassoc" : "leftassoc",		\
+      leftpar ? "lpar" : "nolpar", rightpar ? "rpar" : "norpar");	\
+  if( leftpar )								\
+  { for(;;)								\
+    { if( !obj_prev )							\
+      {	PushObj( MakeWord(WORD, STR_EMPTY, &fpos(t)) );			\
+	obj_prev = PREV_OBJ;						\
+      }									\
+      else if( precedence(TokenTop) >= prec + rassoc )			\
+      { obj_prev = Reduce();						\
+	if( ttop == initial_ttop )					\
+	{ *token = t;							\
+	  debugcond0(DOP, DD, debug_now,				\
+	    "] ] end Shift() and Parse(); stacks are:");		\
+	  ifdebugcond(DOP, DD, debug_now,				\
+	    DebugStacks(initial_ttop, obj_prev));			\
+	  return PopObj();						\
+	}								\
+      }									\
+      else break;							\
+    }									\
+  }									\
+  else InsertSpace(t);							\
+  PushToken(t);								\
+  if( rightpar )  obj_prev = FALSE;					\
+  else									\
+  { obj_prev = Reduce(); 						\
+    if( ttop == initial_ttop )						\
+    { *token = nilobj;							\
+      debugcond0(DOP, DD, debug_now,					\
+	"] ] end Shift and Parse; stacks are:");			\
+      ifdebugcond(DOP, DD, debug_now,					\
+	DebugStacks(initial_ttop, obj_prev));				\
+      return PopObj();							\
+    }									\
+  }									\
+  debugcond0(DOP, DD, debug_now, "] end Shift()");			\
+} /* end Shift */
+
+
+#define ShiftObj(t, new_obj_prev)					\
+{ debugcond1(DOP, DD, debug_now, "[ ShiftObj(%s)", Image(type(t)));	\
+  InsertSpace(t);							\
+  PushObj(t);								\
+  obj_prev = new_obj_prev;						\
+  debugcond0(DOP, DD, debug_now, "] end ShiftObj()");			\
+}
+
+/*@::Reduce()@****************************************************************/
+/*                                                                           */
+/*  static Reduce()                                                          */
+/*                                                                           */
+/*  Perform a single reduction of the stacks.                                */
+/*                                                                           */
+/*****************************************************************************/
+
+static BOOLEAN Reduce(void)
+{ OBJECT p1, p2, p3, s1, s2, tmp;
+  OBJECT op;  int obj_prev;
+  debugcond0(DOP, DD, debug_now, "[ Reduce()");
+  /* ifdebugcond(DOP, DD, debug_now, DebugStacks(0, TRUE)); */
+
+  op = PopToken();
+  obj_prev = PREV_OBJ;
+  switch( type(op) )
+  {
+
+    case GSTUB_INT:
+    case GSTUB_EXT:
+    
+	debug0(DGT, D, "calling TransferEnd( PopObj() ) from Reduce()");
+	TransferEnd( PopObj() );
+	New(p1, NULL_CLOS);
+	PushObj(p1);
+	Dispose(op);
+	break;
+
+
+    case GSTUB_NONE:
+
+	New(p1, NULL_CLOS);
+	PushObj(p1);
+	Dispose(op);
+	break;
+
+
+    case NULL_CLOS:
+    case PAGE_LABEL:
+    case ONE_ROW:
+    case ONE_COL:
+    case WIDE:
+    case HIGH:
+    case HSHIFT:
+    case VSHIFT:
+    case HSCALE:
+    case VSCALE:
+    case HCOVER:
+    case VCOVER:
+    case SCALE:
+    case KERN_SHRINK:
+    case HCONTRACT:
+    case VCONTRACT:
+    case HLIMITED:
+    case VLIMITED:
+    case HEXPAND:
+    case VEXPAND:
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case HSPAN:
+    case VSPAN:
+    case PADJUST:
+    case HADJUST:
+    case VADJUST:
+    case ROTATE:
+    case BACKGROUND:
+    case YIELD:
+    case BACKEND:
+    case XCHAR:
+    case FONT:
+    case SPACE:
+    case YUNIT:
+    case ZUNIT:
+    case BREAK:
+    case UNDERLINE:
+    case COLOUR:
+    case LANGUAGE:
+    case CURR_LANG:
+    case CURR_FAMILY:
+    case CURR_FACE:
+    case COMMON:
+    case RUMP:
+    case MELD:
+    case INSERT:
+    case ONE_OF:
+    case NEXT:
+    case PLUS:
+    case MINUS:
+    case TAGGED:
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+    case OPEN:
+    case RAW_VERBATIM:
+    case VERBATIM:
+
+	if( has_rpar(actual(op)) )
+	{ s2 = PopObj();
+	  Link(op, s2);
+	}
+	if( has_lpar(actual(op)) )
+	{ s1 = PopObj();
+	  Link(Down(op), s1);
+	}
+	PushObj(op);
+	break;
+
+
+    case CASE:
+
+	if( has_rpar(actual(op)) )
+	{ s2 = PopObj();
+	  Link(op, s2);
+	}
+	if( has_lpar(actual(op)) )
+	{ s1 = PopObj();
+	  Link(Down(op), s1);
+	}
+	if( type(s1) == BACKEND )
+	{ op = OptimizeCase(op);
+	}
+	PushObj(op);
+	break;
+
+
+    case CROSS:
+    case FORCE_CROSS:
+
+	s2 = PopObj();
+	Link(op, s2);
+	s1 = PopObj();
+	Link(Down(op), s1);
+	if( type(s1) != CLOSURE )
+	  Error(6, 3, "left parameter of %s is not a symbol (or not visible)",
+	    WARN, &fpos(s1), Image(type(op)));
+	PushObj(op);
+	break;
+
+
+    case CLOSURE:
+    
+	if( has_rpar(actual(op)) )
+	{ New(s2, PAR);
+	  tmp = PopObj();
+	  Link(s2, tmp);
+	  FposCopy(fpos(s2), fpos(tmp));
+	  actual(s2) = ChildSym(actual(op), RPAR);
+	  Link(op, s2);
+	}
+	if( has_lpar(actual(op)) )
+	{ New(s1, PAR);
+	  tmp = PopObj();
+	  Link(s1, tmp);
+	  FposCopy(fpos(s1), fpos(tmp));
+	  actual(s1) = ChildSym(actual(op), LPAR);
+	  Link(Down(op), s1);
+	}
+	PushObj(op);
+	break;
+
+
+    case LBR:
+    
+	Error(6, 4, "unmatched %s (inserted %s)", WARN, &fpos(op),
+	  KW_LBR, KW_RBR);
+	Dispose(op);
+	obj_prev = PREV_RBR;
+	break;
+
+
+    case BEGIN:
+    
+	assert1(FALSE, "Reduce: unmatched", KW_BEGIN);
+	break;
+
+
+    case RBR:
+    
+	if( type(TokenTop) == LBR )
+	{ /* *** FposCopy(fpos(ObjTop), fpos(TokenTop)); *** */
+	  Dispose( PopToken() );
+	}
+	else if( type(TokenTop) == BEGIN )
+	{ if( file_num(fpos(TokenTop)) > 0 )
+	    Error(6, 5, "unmatched %s; inserted %s at%s (after %s)",
+	      WARN, &fpos(op), KW_RBR, KW_LBR,
+	      EchoFilePos(&fpos(TokenTop)), KW_BEGIN);
+	  else
+	    Error(6, 6, "unmatched %s not enclosed in anything",
+	      FATAL, &fpos(op), KW_RBR);
+	}
+	else 
+	{ assert1(FALSE, "Reduce: unmatched", KW_RBR);
+	}
+	Dispose(op);
+	obj_prev = PREV_RBR;
+	break;
+
+
+    case END:
+    
+	if( type(TokenTop) != BEGIN )
+	{ assert1(FALSE, "Reduce: unmatched", KW_END);
+	}
+	else
+	{ if( actual(op) != actual(TokenTop) )
+	  {
+	    if( actual(op) == StartSym )
+	      Error(6, 7, "%s %s appended at end of file to match %s at%s",
+		WARN, &fpos(op), KW_END, SymName(actual(TokenTop)),
+		KW_BEGIN, EchoFilePos(&fpos(TokenTop)) );
+	    else if( actual(op) == nilobj )
+	      Error(6, 8, "%s replaced by %s %s to match %s at%s",
+	        WARN, &fpos(op), KW_END, KW_END,
+		actual(TokenTop) == nilobj ? AsciiToFull("??") :
+		  SymName(actual(TokenTop)),
+		KW_BEGIN, EchoFilePos(&fpos(TokenTop)) );
+	    else
+	      Error(6, 9, "%s %s replaced by %s %s to match %s at%s",
+	        WARN, &fpos(op), KW_END, SymName(actual(op)),
+		KW_END, SymName(actual(TokenTop)),
+		KW_BEGIN, EchoFilePos(&fpos(TokenTop)) );
+	  }
+	  Dispose( PopToken() );
+	}
+	Dispose(op);
+	obj_prev = PREV_RBR;
+	break;
+
+
+    case GAP_OBJ:
+
+	p1 = PopObj();
+	Link(op, p1);
+	PushObj(op);
+	obj_prev = PREV_OP;
+	break;
+
+
+    case VCAT:
+    case HCAT:
+    case ACAT:
+    
+	p3 = PopObj();  p2 = PopObj();  p1 = PopObj();
+	if( type(p1) == type(op) )
+	{ Dispose(op);
+	}
+	else
+	{ Link(op, p1);
+	  p1 = op;
+	}
+	Link(p1, p2);
+	Link(p1, p3);
+	PushObj(p1);
+	break;
+
+
+    case TSPACE:
+    case TJUXTA:
+
+	p2 = PopObj();  p1 = PopObj();
+	if( type(p1) != ACAT )
+	{ New(tmp, ACAT);
+	  Link(tmp, p1);
+	  FposCopy(fpos(tmp), fpos(p1));
+	  p1 = tmp;
+	}
+	type(op) = GAP_OBJ;
+	Link(p1, op);
+	Link(p1, p2);
+	PushObj(p1);
+	break;
+
+
+    default:
+    
+	assert1(FALSE, "Reduce:", Image(type(op)));
+	break;
+
+  } /* end switch */
+  debugcond1(DOP, DD, debug_now, "] end Reduce(), returning %s",
+    obj_prev == PREV_OP ? "PREV_OP" : obj_prev == PREV_OBJ ? "PREV_OBJ" :
+    obj_prev == PREV_RBR ? "PREV_RBR" : "???");
+  return obj_prev;
+} /* end Reduce */
+
+
+/*@::SetScope(), InitParser()@************************************************/
+/*                                                                           */
+/*  SetScope(env, count, vis_only)                                           */
+/*                                                                           */
+/*  Push scopes required to parse object whose environment is env.           */
+/*  Add to *count the number of scope pushes made.                           */
+/*                                                                           */
+/*  If vis_only is true, we only want visible things of the top-level        */
+/*  element of env to be visible in this scope.                              */
+/*                                                                           */
+/*****************************************************************************/
+
+void SetScope(OBJECT env, int *count, BOOLEAN vis_only)
+{ OBJECT link, y, yenv;  BOOLEAN visible_only;
+  debugcond2(DOP,DD, debug_now, "[ SetScope(%s, %d)", EchoObject(env), *count);
+  assert( env != nilobj && type(env) == ENV, "SetScope: type(env) != ENV!" );
+  if( Down(env) != env )
+  { Child(y, Down(env));
+    assert( LastDown(y) != y, "SetScope: LastDown(y)!" );
+    link = LastDown(env) != Down(env) ? LastDown(env) : LastDown(y);
+    Child(yenv, link);
+    assert( type(yenv) == ENV, "SetScope: type(yenv) != ENV!" );
+    SetScope(yenv, count, FALSE);
+    visible_only = vis_only || (use_invocation(actual(y)) != nilobj);
+    /* i.e. from @Use clause */
+    PushScope(actual(y), FALSE, visible_only);  (*count)++;
+    /*** this following was a bright idea that did not work owing to
+	 allowing body parameters at times they definitely shouldn't be
+    BodyParAllowed();
+    ***/
+  }
+  debugcond1(DOP, DD, debug_now, "] SetScope returning, count = %d", *count);
+} /* end SetScope */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  InitParser()                                                             */
+/*                                                                           */
+/*  Initialise the parser to contain just GstubExt.                          */
+/*  Remember cross_db, the name of the cross reference database, for Parse.  */
+/*                                                                           */
+/*****************************************************************************/
+
+void InitParser(FULL_CHAR *cross_db)
+{ if( StringLength(cross_db) >= MAX_WORD )
+    Error(6, 10, "cross reference database file name %s is too long",
+      FATAL, no_fpos, cross_db);
+  cross_name = MakeWord(WORD, cross_db, no_fpos);
+  PushToken( NewToken(GSTUB_EXT, no_fpos, 0, 0, DEFAULT_PREC, StartSym) );
+} /* end InitParser */
+
+
+/*@::ParseEnvClosure()@*******************************************************/
+/*                                                                           */
+/*  static OBJECT ParseEnvClosure(t, encl)                                   */
+/*                                                                           */
+/*  Parse an object which is a closure with environment.  Consume the        */
+/*  concluding @LClos.                                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT ParseEnvClosure(OBJECT t, OBJECT encl)
+{ OBJECT env, res, y;  int count, i;
+  debugcond0(DOP, DDD, debug_now, "ParseEnvClosure(t, encl)");
+  assert( type(t) == ENV, "ParseEnvClosure: type(t) != ENV!" );
+  env = t;  t = LexGetToken();
+  while( type(t) != CLOS )  switch( type(t) )
+  {
+    case LBR:	count = 0;
+		SetScope(env, &count, FALSE);
+		y = Parse(&t, encl, FALSE, FALSE);
+		if( type(y) != CLOSURE )
+		{
+		  debug1(DIO, D, "  Parse() returning %s:", Image(type(y)));
+		  ifdebug(DIO, D, DebugObject(y));
+		  Error(6, 11, "syntax error in cross reference database",
+		    FATAL, &fpos(y));
+		}
+		for( i = 1;  i <= count;  i++ )  PopScope();
+		AttachEnv(env, y);
+		debug0(DCR, DDD, "  calling SetEnv from ParseEnvClosure (a)");
+		env = SetEnv(y, nilobj);
+		t = LexGetToken();
+		break;
+
+    case ENV:	y = ParseEnvClosure(t, encl);
+		debug0(DCR, DDD, "  calling SetEnv from ParseEnvClosure (b)");
+		env = SetEnv(y, env);
+		t = LexGetToken();
+		break;
+
+    default:	Error(6, 12, "error in cross reference database",
+		  FATAL, &fpos(t));
+		break;
+  }
+  Dispose(t);
+  if( Down(env) == env || Down(env) != LastDown(env) )
+    Error(6, 13, "error in cross reference database", FATAL, &fpos(env));
+  Child(res, Down(env));
+  DeleteNode(env);
+  debugcond1(DOP, DDD, debug_now, "ParseEnvClosure ret. %s", EchoObject(res));
+  assert( type(res) == CLOSURE, "ParseEnvClosure: type(res) != CLOSURE!" );
+  return res;
+} /* end ParseEnvClosure */
+
+
+/*@::Parse()@*****************************************************************/
+/*                                                                           */
+/*  OBJECT Parse(token, encl, defs_allowed, transfer_allowed)                */
+/*                                                                           */
+/*  Parse input tokens, beginning with *token, looking for an object of the  */
+/*  form { ... } or @Begin ... @End <sym>, and return the object.            */
+/*  The parent definition is encl, and scope has been set appropriately.     */
+/*  Parse reads up to and including the last token of the object             */
+/*  (the right brace or <sym>), and returns nilobj in *token.                */
+/*                                                                           */
+/*  If defs_allowed == TRUE, there may be local definitions in the object.   */
+/*  In this case, encl is guaranteed to be the enclosing definition.         */
+/*                                                                           */
+/*  If transfer_allowed == TRUE, the parser may transfer components to the   */
+/*  galley handler as they are read.                                         */
+/*                                                                           */
+/*  Note: the lexical analyser returns "@End \Input" at end of input, so the */
+/*  parser does not have to handle end of input separately.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT Parse(OBJECT *token, OBJECT encl,
+BOOLEAN defs_allowed, BOOLEAN transfer_allowed)
+{ OBJECT t, x, tmp, xsym, env, y, link, res, imps, xlink;
+  int i, offset, lnum, initial_ttop = ttop;
+  int obj_prev, scope_count, compulsory_count;  BOOLEAN revealed;
+
+  debugcond4(DOP, DD, debug_now, "[ Parse(%s, %s, %s, %s)", EchoToken(*token),
+      SymName(encl), bool(defs_allowed), bool(transfer_allowed));
+  assert( type(*token) == LBR || type(*token) == BEGIN, "Parse: *token!" );
+
+  obj_prev = PREV_OP;
+  Shift(*token, precedence(*token), 0, FALSE, TRUE);
+  t = LexGetToken();
+  if( defs_allowed )
+  { ReadDefinitions(&t, encl, LOCAL);
+
+    /* if error in definitions, stop now */
+    if( ErrorSeen() )
+      Error(6, 14, "exiting now", FATAL, &fpos(t));
+
+    if( encl == StartSym )
+    {
+      /* read @Use, @Database, and @Prepend commands and defs and construct env */
+      New(env, ENV);
+      for(;;)
+      {
+	if( type(t) == WORD && (
+	    StringEqual(string(t), KW_DEF)     ||
+	    StringEqual(string(t), KW_FONTDEF) ||
+	    StringEqual(string(t), KW_LANGDEF) ||
+	    StringEqual(string(t), KW_MACRO)   ||
+	    StringEqual(string(t), KW_IMPORT)  ||
+	    StringEqual(string(t), KW_EXTEND)  ||
+	    StringEqual(string(t), KW_EXPORT)  ) )
+	{
+	  ReadDefinitions(&t, encl, LOCAL);
+
+          /* if error in definitions, stop now */
+          if( ErrorSeen() )
+	    Error(6, 39, "exiting now", FATAL, &fpos(t));
+
+	}
+	else if( type(t) == USE )
+	{
+	  OBJECT crs, res_env;  STYLE style;
+	  Dispose(t);  t = LexGetToken();
+	  if( type(t) != LBR )
+	    Error(6, 15, "%s expected after %s", FATAL, &fpos(t),KW_LBR,KW_USE);
+	  debug0(DOP, DD, "  Parse() calling Parse for @Use clause");
+	  y = Parse(&t, encl, FALSE, FALSE);
+	  if( is_cross(type(y)) )
+	  { OBJECT z;
+	    Child(z, Down(y));
+	    if( type(z) == CLOSURE )
+	    { crs = nilobj;
+	      y = CrossExpand(y, env, &style, &crs, &res_env);
+	      if( crs != nilobj )
+	      { Error(6, 16, "%s or %s tag not allowed here",
+		  FATAL, &fpos(y), KW_PRECEDING, KW_FOLLOWING);
+	      }
+	      HuntCommandOptions(y);
+	      AttachEnv(res_env, y);
+	      debug0(DCR, DDD, "  calling SetEnv from Parse (a)");
+	      env = SetEnv(y, env);
+	    }
+	    else Error(6, 17, "invalid parameter of %s", FATAL, &fpos(y), KW_USE);
+	  }
+	  else if( type(y) == CLOSURE )
+	  { if( use_invocation(actual(y)) != nilobj )
+	      Error(6, 18, "symbol %s occurs in two %s clauses",
+		FATAL, &fpos(y), SymName(actual(y)), KW_USE);
+	    use_invocation(actual(y)) = y;
+	    HuntCommandOptions(y);
+	    AttachEnv(env, y);
+	    debug0(DCR, DDD, "  calling SetEnv from Parse (b)");
+	    env = SetEnv(y, nilobj);
+	  }
+	  else Error(6, 19, "invalid parameter of %s", FATAL, &fpos(y), KW_USE);
+	  PushScope(actual(y), FALSE, TRUE);
+	  t = LexGetToken();
+        }
+	else if( type(t) == PREPEND || type(t) == SYS_PREPEND )
+	{ ReadPrependDef(type(t), encl);
+	  Dispose(t);
+	  t = LexGetToken();
+	}
+	else if( type(t) == DATABASE || type(t) == SYS_DATABASE )
+	{ ReadDatabaseDef(type(t), encl);
+	  Dispose(t);
+	  t = LexGetToken();
+	}
+	else break;
+      }
+
+      /* transition point from defs to content; turn on debugging now */
+#if DEBUG_ON
+      debug_now = TRUE;
+#endif
+      debugcond4(DOP, DD, debug_now, "[ Parse (first) (%s, %s, %s, %s)",
+	EchoToken(*token), SymName(encl), bool(defs_allowed),
+	bool(transfer_allowed));
+
+      /* load cross-references from previous run, open new cross refs */
+      if( AllowCrossDb )
+      {
+	  NewCrossDb = DbCreate(MakeWord(WORD, string(cross_name), no_fpos));
+	  OldCrossDb = DbLoad(cross_name, SOURCE_PATH, FALSE, nilobj,
+	    InMemoryDbIndexes);
+      }
+      else OldCrossDb = NewCrossDb = nilobj;
+
+      /* tidy up and possibly print symbol table */
+      FlattenUses();
+      ifdebug(DST, DD, DebugObject(StartSym));
+
+      TransferInit(env);
+      debug0(DMA, D, "at end of definitions:");
+      ifdebug(DMA, D, DebugMemory());
+    }
+  }
+
+  for(;;)
+  { 
+    debugcond0(DOP, DD, debug_now, "");
+    ifdebugcond(DOP, DD, debug_now, DebugStacks(0, obj_prev));
+    debugcond0(DOP, DD, debug_now, "");
+    debugcond2(DOP, DD, debug_now, ">> %s (precedence %d)", EchoToken(t), precedence(t));
+
+    switch( type(t) )
+    {
+
+      case WORD:
+      
+	if( string(t)[0] == CH_SYMSTART &&
+	  (obj_prev != PREV_OBJ || vspace(t) + hspace(t) > 0) )
+	{
+	  Error(6, 20, "symbol %s unknown or misspelt",
+	    WARN, &fpos(t), string(t));
+	  if( ++unknown_count > 25 )
+	  {
+	    Error(6, 21, "too many errors (%s lines missing or out of order?)",
+	      FATAL, &fpos(t), KW_SYSINCLUDE);
+	  }
+	}
+	ShiftObj(t, PREV_OBJ);
+	t = LexGetToken();
+	break;
+
+
+      case QWORD:
+      
+	ShiftObj(t, PREV_OBJ);
+	t = LexGetToken();
+	break;
+
+
+      case VCAT:
+      case HCAT:
+      case ACAT:
+      
+	/* clean up left context */
+	Shift(t, precedence(t), LEFT_ASSOC, TRUE, TRUE);
+
+	/* invoke transfer subroutines if appropriate */
+	/* *** if( type(t) == VCAT && !has_join(actual(t)) *** */
+	if( transfer_allowed && type(t) == VCAT && !has_join(actual(t))
+		&& type(tok_stack[ttop-2]) == GSTUB_EXT )
+	{
+	  debug0(DGT, DD, "  calling TransferComponent from Parse:");
+	  ifdebug(DGT, DD, DebugStacks(0, obj_prev));
+	  TransferComponent( PopObj() );
+	  New(tmp, NULL_CLOS);
+	  FposCopy( fpos(tmp), fpos(t) );
+	  PushObj(tmp);
+	}
+
+	/* push GAP_OBJ token, to cope with 3 parameters */
+	New(x, GAP_OBJ);
+	mark(gap(x)) = has_mark(actual(t));
+	join(gap(x)) = has_join(actual(t));
+	hspace(x) = hspace(t);
+	vspace(x) = vspace(t);
+	precedence(x) = GAP_PREC;
+	FposCopy( fpos(x), fpos(t) );
+	Shift(x, GAP_PREC, LEFT_ASSOC, FALSE, TRUE);
+
+	/* if op is followed by space, insert {} */
+	t = LexGetToken();
+	if( hspace(t) + vspace(t) > 0 )
+	{ ShiftObj(MakeWord(WORD, STR_EMPTY, &fpos(x)), PREV_OBJ);
+	}
+	break;
+
+
+      case CROSS:
+      case FORCE_CROSS:
+      case NULL_CLOS:
+      case PAGE_LABEL:
+      case ONE_COL:
+      case ONE_ROW:
+      case WIDE:
+      case HIGH:
+      case HSHIFT:
+      case VSHIFT:
+      case HSCALE:
+      case VSCALE:
+      case HCOVER:
+      case VCOVER:
+      case SCALE:
+      case KERN_SHRINK:
+      case HCONTRACT:
+      case VCONTRACT:
+      case HLIMITED:
+      case VLIMITED:
+      case HEXPAND:
+      case VEXPAND:
+      case START_HVSPAN:
+      case START_HSPAN:
+      case START_VSPAN:
+      case HSPAN:
+      case VSPAN:
+      case PADJUST:
+      case HADJUST:
+      case VADJUST:
+      case ROTATE:
+      case BACKGROUND:
+      case CASE:
+      case YIELD:
+      case BACKEND:
+      case XCHAR:
+      case FONT:
+      case SPACE:
+      case YUNIT:
+      case ZUNIT:
+      case BREAK:
+      case UNDERLINE:
+      case COLOUR:
+      case LANGUAGE:
+      case CURR_LANG:
+      case CURR_FAMILY:
+      case CURR_FACE:
+      case COMMON:
+      case RUMP:
+      case MELD:
+      case INSERT:
+      case ONE_OF:
+      case NEXT:
+      case TAGGED:
+      case INCGRAPHIC:
+      case SINCGRAPHIC:
+      case PLAIN_GRAPHIC:
+      case GRAPHIC:
+
+	/* clean up left context of t (these ops are all right associative) */
+	Shift(t, precedence(t), RIGHT_ASSOC,
+	  has_lpar(actual(t)), has_rpar(actual(t)));
+	t = LexGetToken();
+	break;
+
+
+      case VERBATIM:
+      case RAW_VERBATIM:
+
+	/* clean up left context of t */
+	x = t;
+	Shift(t, precedence(t), RIGHT_ASSOC,
+	  has_lpar(actual(t)), has_rpar(actual(t)));
+	
+	/* check for opening brace or begin following, and shift it onto the stacks */
+	t = LexGetToken();
+	if( type(t) != BEGIN && type(t) != LBR )
+	  Error(6, 40, "right parameter of %s or %s must be enclosed in braces",
+	    FATAL, &fpos(x), KW_VERBATIM, KW_RAWVERBATIM);
+        actual(t) = type(x) == VERBATIM ? VerbatimSym : RawVerbatimSym;
+	Shift(t, LBR_PREC, 0, FALSE, TRUE);
+
+	/* read right parameter and add it to the stacks, and reduce */
+	y = LexScanVerbatim( (FILE *) NULL, type(t) == BEGIN, &fpos(t),
+	  type(x) == RAW_VERBATIM);
+	ShiftObj(y, PREV_OBJ);
+
+	/* carry on, hopefully to the corresponding right brace or @End @Verbatim */
+	t = LexGetToken();
+	break;
+
+
+      case PLUS:
+      case MINUS:
+
+	/* clean up left context of t (these ops are all left associative) */
+	Shift(t, precedence(t), LEFT_ASSOC,
+	  has_lpar(actual(t)), has_rpar(actual(t)));
+	t = LexGetToken();
+	break;
+
+
+      case UNEXPECTED_EOF:
+
+	Error(6, 22, "unexpected end of input", FATAL, &fpos(t));
+	break;
+
+
+      case BEGIN:
+      
+	if( actual(t) == nilobj )
+	{ Error(6, 23, "%s replaced by %s", WARN, &fpos(t), KW_BEGIN, KW_LBR);
+	  type(t) = LBR;
+	}
+	/* NB NO BREAK! */
+
+
+      case LBR:
+      
+	Shift(t, LBR_PREC, 0, FALSE, TRUE);
+	t = LexGetToken();
+	break;
+
+
+      case END:
+      
+	if( actual(t) == nilobj )  /* haven't sought following symbol yet */
+	{ x = LexGetToken();
+	  if( type(x) == CLOSURE )
+	  { actual(t) = actual(x);
+	    Dispose(x);
+	    x = nilobj;
+	  }
+	  else if( type(x) == VERBATIM )
+	  { actual(t) = VerbatimSym;
+	    Dispose(x);
+	    x = nilobj;
+	  }
+	  else if( type(x) == RAW_VERBATIM )
+	  { actual(t) = RawVerbatimSym;
+	    Dispose(x);
+	    x = nilobj;
+	  }
+	  else if( type(x) == WORD && string(x)[0] == CH_SYMSTART )
+	  { Error(6, 24, "unknown or misspelt symbol %s after %s deleted",
+	      WARN, &fpos(x), string(x), KW_END);
+	    actual(t) = nilobj;
+	    Dispose(x);
+	    x = nilobj;
+	  }
+	  else
+	  { Error(6, 25, "symbol expected after %s", WARN, &fpos(x), KW_END);
+	    actual(t) = nilobj;
+	  }
+	}
+	else x = nilobj;
+	Shift(t, precedence(t), 0, TRUE, FALSE);
+	t = (x != nilobj) ? x : LexGetToken();
+	break;
+
+
+      case RBR:
+      
+	Shift(t, precedence(t), 0, TRUE, FALSE);
+	t = LexGetToken();
+	break;
+				
+
+      case USE:
+      case NOT_REVEALED:
+      case PREPEND:
+      case SYS_PREPEND:
+      case DATABASE:
+      case SYS_DATABASE:
+      
+	Error(6, 26, "%s symbol out of place",
+	  FATAL, &fpos(t), SymName(actual(t)));
+	break;
+
+
+      case ENV:
+      
+	/* only occurs in cross reference databases */
+	res = ParseEnvClosure(t, encl);
+	ShiftObj(res, PREV_OBJ);
+	t = LexGetToken();
+	break;
+
+
+      case ENVA:
+      
+	/* only occurs in cross reference databases */
+	offset = LexNextTokenPos() -StringLength(KW_ENVA)-StringLength(KW_LBR)-1;
+	Dispose(t); t = LexGetToken();
+	tmp = Parse(&t, encl, FALSE, FALSE);
+	env = SetEnv(tmp, nilobj);
+	ShiftObj(env, PREV_OBJ);
+	t = LexGetToken();
+	EnvReadInsert(file_num(fpos(t)), offset, env);
+	break;
+
+
+      case ENVB:
+      
+	/* only occurs in cross reference databases */
+	offset = LexNextTokenPos() -StringLength(KW_ENVB)-StringLength(KW_LBR)-1;
+	Dispose(t); t = LexGetToken();
+	env = Parse(&t, encl, FALSE, FALSE);
+	t = LexGetToken();
+	res = Parse(&t, encl, FALSE, FALSE);
+	env = SetEnv(res, env);
+	ShiftObj(env, PREV_OBJ);
+	t = LexGetToken();
+	EnvReadInsert(file_num(fpos(t)), offset, env);
+	break;
+
+
+      case ENVC:
+      
+	/* only occurs in cross reference databases */
+	Dispose(t); t = LexGetToken();
+	New(res, ENV);
+	ShiftObj(res, PREV_OBJ);
+	break;
+
+
+      case ENVD:
+      
+	/* only occurs in cross reference databases */
+	Dispose(t); t = LexGetToken();
+	if( type(t) != QWORD ||
+	  sscanf((char *) string(t), "%d %d", &offset, &lnum) != 2 )
+	  Error(6, 37, "error in cross reference database", FATAL, &fpos(t));
+	if( !EnvReadRetrieve(file_num(fpos(t)), offset, &env) )
+	{ LexPush(file_num(fpos(t)), offset, DATABASE_FILE, lnum, TRUE);
+	  Dispose(t);  t = LexGetToken();
+	  env = Parse(&t, encl, FALSE, FALSE);
+	  LexPop();
+	}
+	else
+	{ Dispose(t);
+	}
+	ShiftObj(env, PREV_OBJ);
+	t = LexGetToken();
+	break;
+
+
+      case CENV:
+      
+	/* only occurs in cross reference databases */
+	Dispose(t); t = LexGetToken();
+	env = Parse(&t, encl, FALSE, FALSE);
+	scope_count = 0;
+	SetScope(env, &scope_count, FALSE);
+	t = LexGetToken();
+	res = Parse(&t, encl, FALSE, FALSE);
+	for( i = 0;  i < scope_count;  i++ ) PopScope();
+	AttachEnv(env, res);
+	ShiftObj(res, PREV_OBJ);
+	t = LexGetToken();
+	break;
+
+
+      case LUSE:
+
+	/* only occurs in cross-reference databases */
+	/* copy invocation from use_invocation(xsym), don't read it */
+	Dispose(t);  t = LexGetToken();
+	if( type(t) != CLOSURE )
+	  Error(6, 27, "symbol expected following %s", FATAL,&fpos(t),KW_LUSE);
+	xsym = actual(t);
+	if( use_invocation(xsym) == nilobj )
+	  Error(6, 28, "%s clause(s) changed from previous run",
+	    FATAL, &fpos(t), KW_USE);
+	x = CopyObject(use_invocation(xsym), no_fpos);
+	for( link = LastDown(x);  link != x;  link = PrevDown(link) )
+	{ Child(y, link);
+	  if( type(y) == ENV )
+	  { DeleteLink(link);
+	    break;
+	  }
+	}
+	ShiftObj(x, PREV_OBJ);
+	t = LexGetToken();
+	break;
+
+
+      case LVIS:
+      
+	/* only occurs in cross-reference databases */
+	SuppressVisible();
+	Dispose(t);  t = LexGetToken();
+	UnSuppressVisible();
+	if( type(t) != CLOSURE )
+	  Error(6, 29, "symbol expected following %s", FATAL,&fpos(t),KW_LVIS);
+	/* NB NO BREAK! */
+
+
+      case CLOSURE:
+      
+	x = t;  xsym = actual(x);
+
+	/* look ahead one token, which could be an NPAR */
+	/* or could be @NotRevealed */
+	PushScope(xsym, TRUE, FALSE);
+	t = LexGetToken();
+	if( type(t) == NOT_REVEALED )
+	{ Dispose(t);
+	  t = LexGetToken();
+	  revealed = FALSE;
+	}
+	else revealed = TRUE;
+	PopScope();
+
+	/* if x starts a cross-reference, make it a CLOSURE */
+	if( is_cross(type(t)) )
+	{ ShiftObj(x, PREV_OBJ);
+	  break;
+	}
+
+	/* clean up left context of x */
+	Shift(x,precedence(x),right_assoc(xsym),has_lpar(xsym),has_rpar(xsym));
+
+	/* update uses relation if required */
+	if( encl != StartSym && encl != nilobj )
+	{ if( has_target(xsym) )
+	  { uses_galley(encl) = TRUE;
+	    dirty(encl) = (dirty(encl) || dirty(xsym));
+	  }
+	  else if( revealed )  InsertUses(encl, xsym);
+	}
+
+	/* read named parameters */
+	compulsory_count = 0;
+	while( (type(t) == CLOSURE && enclosing(actual(t)) == xsym
+				       && type(actual(t)) == NPAR)
+	  || (type(t) == LBR && precedence(t) != LBR_PREC) )
+	{	
+	  OBJECT new_par;
+
+	  /* check syntax and attach the named parameter to x */
+	  if( type(t) == CLOSURE )
+	  {
+	    new_par = t;
+	    t = LexGetToken();
+	    if( type(t) != LBR )
+	    { Error(6, 30, "%s must follow named parameter %s",
+	        WARN, &fpos(new_par), KW_LBR, SymName(actual(new_par)));
+	      Dispose(new_par);
+	      break;
+	    }
+	  }
+	  else
+	  {
+	    /* compressed form of named parameter */
+	    new_par = NewToken(CLOSURE, &fpos(t), vspace(t), hspace(t),
+	      NO_PREC, ChildSymWithCode(x, precedence(t)));
+	    precedence(t) = LBR_PREC;
+	  }
+
+	  /* add import list of the named parameter to current scope */
+	  scope_count = 0;
+	  imps = imports(actual(new_par));
+	  if( imps != nilobj )
+	  { for( link = Down(imps);  link != imps;  link = NextDown(link) )
+	    { Child(y, link);
+	      PushScope(actual(y), FALSE, TRUE);
+	      scope_count++;
+	    }
+	  }
+
+	  /* read the body of the named parameter */
+	  PushScope(actual(new_par), FALSE, FALSE);
+	  tmp = Parse(&t, encl, FALSE, FALSE);
+	  PopScope();
+	  type(new_par) = PAR;
+	  Link(new_par, tmp);
+
+	  /* pop the scopes pushed for the import list */
+	  for( i = 0;  i < scope_count;  i++ )
+	    PopScope();
+
+	  /* check that new_par has not already occurred, then link it to x */
+	  for( link = Down(x);  link != x;  link = NextDown(link) )
+	  { Child(y, link);
+	    assert( type(y) == PAR, "Parse: type(y) != PAR!" );
+	    if( actual(new_par) == actual(y) )
+	    { Error(6, 31, "named parameter %s of %s appears twice", WARN,
+		&fpos(new_par), SymName(actual(new_par)), SymName(actual(x)));
+	      DisposeObject(new_par);
+	      new_par = nilobj;
+	      break;
+	    }
+	  }
+	  if( new_par != nilobj )
+	  {
+	    /* keep track of the number of compulsory named parameters */
+	    if( is_compulsory(actual(new_par)) )
+	      compulsory_count++;
+
+	    Link(x, new_par);
+	  }
+
+	  /* get next token, possibly another NPAR */
+	  PushScope(xsym, TRUE, FALSE);	 /* allow NPARs only */
+	  if( t == nilobj )  t = LexGetToken();
+	  PopScope();
+
+	} /* end while */
+
+	/* report absence of compulsory parameters */
+	debug4(DOP, D, "%s %s %d : %d", EchoFilePos(&fpos(x)),
+	  SymName(xsym), compulsory_count, has_compulsory(xsym));
+	if( compulsory_count < has_compulsory(xsym) )
+	{
+	  for( xlink = Down(xsym);  xlink != xsym;  xlink = NextDown(xlink) )
+	  { Child(tmp, xlink);
+	    if( type(tmp) == NPAR && is_compulsory(tmp) )
+	    { for( link = Down(x);  link != x;  link = NextDown(link) )
+	      { Child(y, link);
+		if( type(y) == PAR && actual(y) == tmp )
+		  break;
+	      }
+	      if( link == x )
+	      {
+		Error(6, 38, "compulsory option %s missing from %s",
+		  WARN, &fpos(x), SymName(tmp), SymName(xsym));
+	      }
+	    }
+	  }
+	}
+
+	/* record symbol name in BEGIN following, if any */
+	if( type(t) == BEGIN )
+	{ if( !has_rpar(xsym) )
+	    Error(6, 32, "%s out of place here (%s has no right parameter)",
+	      WARN, &fpos(x), KW_BEGIN, SymName(xsym));
+	  else actual(t) = xsym;
+	}
+
+	/* if x can be transferred, do so */
+	if( transfer_allowed && has_target(xsym) &&
+	    !has_key(xsym) && filter(xsym) == nilobj )
+	{   
+	  if( !has_rpar(xsym) || uses_count(ChildSym(xsym, RPAR)) <= 1 )
+	  {
+	    debug1(DGT, D, "examining transfer of %s", SymName(xsym));
+	    ifdebug(DGT, D, DebugStacks(initial_ttop, obj_prev));
+	    i = has_rpar(xsym) ? ttop -1 : ttop;
+	    while( is_cat_op(type(tok_stack[i])) )   i--;
+	    if( (type(tok_stack[i])==LBR || type(tok_stack[i])==BEGIN)
+		  && type(tok_stack[i-1]) == GSTUB_EXT )
+	    {
+	      /* at this point it is likely that x is transferable */
+	      if( has_rpar(xsym) )
+	      { New(tmp, CLOSURE);
+		actual(tmp) = InputSym;
+		FposCopy( fpos(tmp), fpos(t) );
+		ShiftObj(tmp, PREV_OBJ);
+		obj_prev = Reduce();
+	      }
+	      x = PopObj();
+	      x = TransferBegin(x);
+	      if( type(x) == CLOSURE )	/* failure: unReduce */
+	      {	if( has_rpar(xsym) )
+		{ Child(tmp, LastDown(x));
+		  assert(type(tmp)==PAR && type(actual(tmp))==RPAR,
+				"Parse: cannot undo rpar" );
+		  DisposeChild(LastDown(x));
+		  if( has_lpar(xsym) )
+		  { Child(tmp, Down(x));
+		    assert(type(tmp)==PAR && type(actual(tmp))==LPAR,
+				"Parse: cannot undo lpar" );
+		    Child(tmp, Down(tmp));
+		    PushObj(tmp);
+		    DeleteLink(Up(tmp));
+		    DisposeChild(Down(x));
+		  }
+		  PushToken(x);  obj_prev = PREV_OP;
+		}
+		else
+		{ PushObj(x);
+		  obj_prev = PREV_OBJ;
+		}
+	      }
+	      else /* success */
+	      { obj_prev = PREV_OP;
+	        Shift(x, NO_PREC, 0, FALSE, has_rpar(xsym));
+	      }
+	    }
+	  }
+	} /* end if has_target */
+
+	if( filter(xsym) != nilobj )
+	{
+	  if( type(t) == BEGIN || type(t) == LBR )
+	  {
+	    /* create filter object and copy parameter into temp file */
+	    tmp = FilterCreate((BOOLEAN) (type(t) == BEGIN), xsym, &fpos(t));
+
+	    /* push filter object onto stacks and keep going */
+	    Shift(t, precedence(t), 0, FALSE, TRUE);
+	    ShiftObj(tmp, PREV_OBJ);
+	    t = LexGetToken();
+	  }
+	  else Error(6, 33, "right parameter of %s must be enclosed in braces",
+		 FATAL, &fpos(x), SymName(xsym));
+	}
+
+	else if( has_body(xsym) )
+	{ if( type(t) == BEGIN || type(t) == LBR )
+	  { PushScope(xsym, FALSE, TRUE);
+	    PushScope(ChildSym(xsym, RPAR), FALSE, FALSE);
+	    PushObj( Parse(&t, encl, FALSE, TRUE) );
+	    obj_prev = Reduce();
+	    PopScope();
+	    PopScope();
+	    if( t == nilobj )  t = LexGetToken();
+	  }
+	  else
+	  { Error(6, 34, "body parameter of %s must be enclosed in braces",
+	      WARN, &fpos(t), SymName(xsym));
+	  }
+	}
+	break;
+
+
+      case OPEN:
+
+	x = t;  xsym = nilobj;
+	Shift(t, precedence(t), RIGHT_ASSOC, TRUE, TRUE);
+	if( type(ObjTop) == CLOSURE )  xsym = actual(ObjTop);
+	else if( is_cross(type(ObjTop)) && Down(ObjTop) != ObjTop )
+	{ Child(tmp, Down(ObjTop));
+	  if( type(tmp) == CLOSURE )  xsym = actual(tmp);
+	}
+	t = LexGetToken();
+
+	if( xsym == nilobj )
+	  Error(6, 35, "invalid left parameter of %s", WARN, &fpos(x), KW_OPEN);
+	else if( type(t) != BEGIN && type(t) != LBR )
+	  Error(6, 36, "right parameter of %s must be enclosed in braces",
+	    WARN, &fpos(t), KW_OPEN);
+	else
+	{ PushScope(xsym, FALSE, TRUE);
+	  tmp = Parse(&t, encl, FALSE, FALSE);
+	  ShiftObj(tmp, PREV_RBR);
+	  PopScope();
+	  if( t == nilobj )  t = LexGetToken();
+	  obj_prev = Reduce();
+	}
+	break;
+
+
+      default:
+      
+	assert1(FALSE, "Parse:", Image(type(t)));
+	break;
+
+    } /* end switch */
+  } /* end for */
+
+} /* end Parse */
diff --git a/z07.c b/z07.c
new file mode 100644
index 0000000..c6e89a7
--- /dev/null
+++ b/z07.c
@@ -0,0 +1,601 @@
+/*@z07.c:Object Service:SplitIsDefinite(), DisposeObject()@*******************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z07.c                                                      */
+/*  MODULE:       Object Service                                             */
+/*  EXTERNS:      MakeWord(), MakeWordTwo(), MakeWordThree(),                */
+/*                DisposeObject(), CopyObject(),                             */
+/*                SplitIsDefinite(), InsertObject()                          */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN SplitIsDefinite(x)                                               */
+/*                                                                           */
+/*  Return TRUE if x is a definite SPLIT object (both children definite)     */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN SplitIsDefinite(OBJECT x)
+{ OBJECT y1, y2;
+  assert( type(x) == SPLIT, "SplitIsDefinite: x not a SPLIT!" );
+  Child(y1, DownDim(x, COLM));
+  Child(y2, DownDim(x, ROWM));
+  return is_definite(type(y1)) && is_definite(type(y2));
+} /* end SplitIsDefinite */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DisposeObject(x)                                                         */
+/*                                                                           */
+/*  Dispose object x recursively, leaving intact any shared descendants.     */
+/*                                                                           */
+/*****************************************************************************/
+
+int DisposeObject(OBJECT x)
+{ debug2(DOS,DDD,"[DisposeObject( %ld ), type = %s, x =", (long) x, Image(type(x)));
+  ifdebug(DOS, DDD, DebugObject(x));
+  assert( Up(x) == x, "DisposeObject: x has a parent!" );
+  while( Down(x) != x )  DisposeChild(Down(x));   Dispose(x);
+  debug0(DOS, DDD, "]DisposeObject returning.");
+  return 0;
+} /* end DisposeObject */
+
+
+/*@::MakeWord(), MakeWordTwo()@***********************************************/
+/*                                                                           */
+/*  OBJECT MakeWord(typ, str, pos)                                           */
+/*                                                                           */
+/*  Return an unsized WORD or QWORD made from the given string and fpos.     */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT MakeWord(unsigned typ, FULL_CHAR *str, FILE_POS *pos)
+{ OBJECT res;
+  NewWord(res, typ, StringLength(str), pos);
+  StringCopy(string(res), str);
+  FposCopy(fpos(res), *pos);
+  debug4(DOS, DDD, "MakeWord(%s, %s, %s) returning %s",
+    Image(typ), str, EchoFilePos(pos), EchoObject(res));
+  return res;
+} /* end MakeWord */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT MakeWordTwo(typ, str1, str2, pos)                                 */
+/*                                                                           */
+/*  Return an unsized WORD or QWORD made from the two strings and fpos.      */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT MakeWordTwo(unsigned typ, FULL_CHAR *str1, FULL_CHAR *str2, FILE_POS *pos)
+{ int len1 = StringLength(str1);
+  int len2 = StringLength(str2);
+  OBJECT res;
+  debug4(DOS, DDD, "MakeWordTwo(%s, %s, %s, %s)",
+    Image(typ), str1, str2, EchoFilePos(pos));
+  NewWord(res, typ, len1 + len2, pos);
+  StringCopy(string(res), str1);
+  StringCopy(&string(res)[len1], str2);
+  FposCopy(fpos(res), *pos);
+  debug5(DOS, DDD, "MakeWordTwo(%s, %s, %s, %s) returning %s",
+    Image(typ), str1, str2, EchoFilePos(pos), EchoObject(res));
+  return res;
+} /* end MakeWordTwo */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT MakeWordThree(s1, s2, s3)                                         */
+/*                                                                           */
+/*  Return an unsized WORD containing these three strings.                   */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT MakeWordThree(FULL_CHAR *s1, FULL_CHAR *s2, FULL_CHAR *s3)
+{ int len1 = StringLength(s1);
+  int len2 = StringLength(s2);
+  int len3 = StringLength(s3);
+  OBJECT res;
+  debug3(DOS, DDD, "MakeWordThree(%s, %s, %s)", s1, s2, s3);
+  NewWord(res, WORD, len1 + len2 + len3, no_fpos);
+  StringCopy(string(res), s1);
+  StringCopy(&string(res)[len1], s2);
+  StringCopy(&string(res)[len1 + len2], s3);
+  debug4(DOS, DDD, "MakeWordThree(%s, %s, %s) returning %s",
+    s1, s2, s3, EchoObject(res));
+  return res;
+} /* end MakeWordThree */
+
+
+/*@::CopyObject()@************************************************************/
+/*                                                                           */
+/*  OBJECT CopyObject(x, pos)                                                */
+/*                                                                           */
+/*  Make a copy of unsized object x, setting all file positions to *pos.     */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT CopyObject(OBJECT x, FILE_POS *pos)
+{ OBJECT y, link, res, tmp;
+
+  debug2(DOS, DD, "[ CopyObject(%s, %s)", EchoObject(x), EchoFilePos(pos));
+  switch( type(x) )
+  {
+
+    case WORD:
+    case QWORD:
+    
+      NewWord(res, type(x), StringLength(string(x)), pos);
+      StringCopy(string(res), string(x));
+      break;
+
+
+    case GAP_OBJ:
+    
+      New(res, GAP_OBJ);
+      mark(gap(res)) = mark(gap(x));
+      join(gap(res)) = join(gap(x));
+      hspace(res) = hspace(x);
+      vspace(res) = vspace(x);
+      if( Down(x) != x )
+      {	Child(y, Down(x));
+	tmp = CopyObject(y, pos);
+	Link(res, tmp);
+      }
+      break;
+
+
+    /* case HEAD: */
+    case NULL_CLOS:
+    case PAGE_LABEL:
+    case CROSS:
+    case FORCE_CROSS:
+    case ONE_COL:
+    case ONE_ROW:
+    case WIDE:
+    case HIGH:
+    case HSHIFT:
+    case VSHIFT:
+    case HSCALE:
+    case VSCALE:
+    case HCOVER:
+    case VCOVER:
+    case SCALE:
+    case KERN_SHRINK:
+    case HCONTRACT:
+    case VCONTRACT:
+    case HLIMITED:
+    case VLIMITED:
+    case HEXPAND:
+    case VEXPAND:
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case HSPAN:
+    case VSPAN:
+    case PADJUST:
+    case HADJUST:
+    case VADJUST:
+    case ROTATE:
+    case BACKGROUND:
+    case RAW_VERBATIM:
+    case VERBATIM:
+    case CASE:
+    case YIELD:
+    case BACKEND:
+    case XCHAR:
+    case FONT:
+    case SPACE:
+    case YUNIT:
+    case ZUNIT:
+    case BREAK:
+    case UNDERLINE:
+    case COLOUR:
+    case LANGUAGE:
+    case CURR_LANG:
+    case CURR_FAMILY:
+    case CURR_FACE:
+    case COMMON:
+    case RUMP:
+    case MELD:
+    case INSERT:
+    case ONE_OF:
+    case NEXT:
+    case PLUS:
+    case MINUS:
+    case OPEN:
+    case TAGGED:
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+    case VCAT:
+    case HCAT:
+    case ACAT:
+    case ENV_OBJ:
+    
+      New(res, type(x));
+      for( link = Down(x);  link != x;  link = NextDown(link) )
+      {	Child(y, link);
+	tmp = CopyObject(y, pos);
+	Link(res, tmp);
+      }
+      break;
+
+
+    case FILTERED:
+
+      New(res, type(x));
+      for( link = Down(x);  link != x;  link = NextDown(link) )
+      {	Child(y, link);
+	Link(res, y);	/* do not copy children of FILTERED */
+      }
+      debug3(DFH, D, "copying FILTERED %d into %d %s",
+	(int) x, (int) res, EchoObject(res));
+      break;
+
+
+    case ENV:
+    
+      res = x;  /* do not copy environments */
+      break;
+
+
+    case PAR:
+    
+      New(res, PAR);
+      actual(res) = actual(x);
+      assert( Down(x) != x, "CopyObject: PAR child!" );
+      Child(y, Down(x));
+      tmp = CopyObject(y, pos);
+      Link(res, tmp);
+      break;
+
+
+    case CLOSURE:
+    
+      New(res, CLOSURE);
+      for( link = Down(x);  link != x;  link = NextDown(link) )
+      {	Child(y, link);
+	assert( type(y) != CLOSURE, "CopyObject: CLOSURE!" );
+	tmp = CopyObject(y, pos);
+	Link(res, tmp);
+      }
+      actual(res) = actual(x);
+      StyleCopy(save_style(res), save_style(x));
+      break;
+
+
+    default:
+    
+      assert1(FALSE, "CopyObject:", Image(type(x)));
+      break;
+
+  } /* end switch */
+  if( pos == no_fpos )  FposCopy(fpos(res), fpos(x));
+  else FposCopy(fpos(res), *pos);
+  debug1(DOS, DD, "] CopyObject returning %s", EchoObject(res));
+  return res;
+} /* end CopyObject */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT InsertObject(OBJECT x, OBJECT *ins, STYLE *style)                 */
+/*                                                                           */
+/*  Search through manifested object x for an ACAT where ins may be          */
+/*  attached.  If successful, set *ins to nilobj after the attachment.       */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT InsertObject(OBJECT x, OBJECT *ins, STYLE *style)
+{ OBJECT link, y, g, res;
+  debug2(DOS, DDD, "InsertObject(%s, %s)", EchoObject(x), EchoObject(*ins));
+  switch( type(x) )
+  {
+    case WORD:
+    case QWORD:
+
+      New(res, ACAT);
+      FposCopy(fpos(res), fpos(x));
+      ReplaceNode(res, x);
+      Link(res, x);
+      StyleCopy(save_style(res), *style);
+      adjust_cat(res) = padjust(*style);
+      res = InsertObject(res, ins, style);
+      break;
+
+
+    case NULL_CLOS:
+    case HEAD:
+    case CROSS:
+    case FORCE_CROSS:
+    case PAGE_LABEL:
+    case CLOSURE:
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+    case HSPAN:
+    case VSPAN:
+
+      res = x;
+      break;
+
+
+    case HCAT:
+    case VCAT:
+    case COL_THR:
+    case ROW_THR:
+    case SPLIT:
+
+      for( link = Down(x);  link != x && *ins != nilobj;  link = NextDown(link) )
+      { Child(y, link);
+	y = InsertObject(y, ins, style);
+      }
+      res = x;
+      break;
+
+
+    case ONE_COL:
+    case ONE_ROW:
+    case PADJUST:
+    case HADJUST:
+    case VADJUST:
+    case HCONTRACT:
+    case VCONTRACT:
+    case HLIMITED:
+    case VLIMITED:
+    case HEXPAND:
+    case VEXPAND:
+    case HSCALE:
+    case VSCALE:
+    case HCOVER:
+    case VCOVER:
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+    case ROTATE:
+    case BACKGROUND:
+    case SCALE:
+    case KERN_SHRINK:
+    case WIDE:
+    case HIGH:
+    case HSHIFT:
+    case VSHIFT:
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+
+      Child(y, LastDown(x));
+      y = InsertObject(y, ins, style);
+      res = x;
+      break;
+
+
+    case ACAT:
+
+      New(g, GAP_OBJ);
+      SetGap(gap(g), FALSE, FALSE, TRUE, FIXED_UNIT, EDGE_MODE, 0);
+      hspace(g) = vspace(g) = 0;
+      underline(g) = UNDER_OFF;
+      Link(Down(x), g);
+      Link(Down(x), *ins);
+      underline(*ins) = UNDER_OFF;
+      *ins = nilobj;
+      res = x;
+      break;
+
+
+    default:
+    
+      assert1(FALSE, "InsertObject:", Image(type(x)));
+      res = x;
+      break;
+
+  }
+  debug2(DOS, DDD, "InsertObject returning (%s) %s",
+    *ins == nilobj ? "success" : "failure", EchoObject(res));
+  return res;
+} /* end InsertObject */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  Meld(x, y)                                                               */
+/*                                                                           */
+/*  Return the meld of x with y.                                             */
+/*                                                                           */
+/*****************************************************************************/
+#define NO_DIR	0
+#define X_DIR	1
+#define Y_DIR	2
+#define XY_DIR	3
+#define MAX_MELD 32
+
+OBJECT Meld(OBJECT x, OBJECT y)
+{ OBJECT res;
+  char table[MAX_MELD][MAX_MELD], dir[MAX_MELD][MAX_MELD];
+  OBJECT xcomp[MAX_MELD], ycomp[MAX_MELD];
+  OBJECT xgaps[MAX_MELD], ygaps[MAX_MELD];
+  BOOLEAN is_equal;
+  OBJECT link, z, g;  BOOLEAN jn;
+  int xlen, ylen, xi, yi;
+  debug2(DOS, D, "Meld(%s, %s)", EchoObject(x), EchoObject(y));
+  assert(type(x) == ACAT, "Meld: type(x) != ACAT");
+  assert(type(y) == ACAT, "Meld: type(y) != ACAT");
+
+  /* initialize xcomp, xgaps, xlen */
+  debug0(DOS, DD, "  initializing xcomp[]");
+  xlen = 0;
+  xcomp[xlen] = nilobj;
+  xlen++;
+  g = nilobj;
+  FirstDefinite(x, link, z, jn);
+  while( link != x )
+  { if( xlen >= MAX_MELD )
+      Error(7, 1, "%s: maximum paragraph length (%d) exceeded", FATAL, &fpos(x),
+	KW_MELD, MAX_MELD-1);
+    xcomp[xlen] = z;
+    xgaps[xlen] = g;
+    debug3(DOS, DD, "  initializing xcomp[%d] to %s %s",
+      xlen, Image(type(z)), EchoObject(z));
+    xlen++;
+    NextDefiniteWithGap(x, link, z, g, jn)
+  }
+
+  /* initialize ycomp, ygaps, ylen */
+  debug0(DOS, DD, "  initializing ycomp[]");
+  ylen = 0;
+  ycomp[ylen] = nilobj;
+  ylen++;
+  g = nilobj;
+  FirstDefinite(y, link, z, jn);
+  while( link != y )
+  { if( ylen >= MAX_MELD )
+      Error(7, 1, "%s: maximum paragraph length (%d) exceeded", FATAL, &fpos(y),
+	KW_MELD, MAX_MELD-1);
+    ycomp[ylen] = z;
+    ygaps[ylen] = g;
+    debug3(DOS, DD, "  initializing ycomp[%d] to %s %s",
+      ylen, Image(type(z)), EchoObject(z));
+    ylen++;
+    NextDefiniteWithGap(y, link, z, g, jn)
+  }
+
+  /* initialize table and dir */
+  debug0(DOS, DD, "  initializing table[]");
+  table[0][0] = 0;
+  dir[0][0] = NO_DIR;
+  for( xi = 1;  xi < xlen;  xi++ )
+  { table[xi][0] = 0;
+    dir[xi][0] = X_DIR;
+  }
+  for( yi = 1;  yi < ylen;  yi++ )
+  { table[0][yi] = 0;
+    dir[0][yi] = Y_DIR;
+  }
+  for( xi = 1;  xi < xlen;  xi++ )
+  {
+    for( yi = 1;  yi < ylen;  yi++ )
+    {
+      if( is_word(type(xcomp[xi])) )
+      { is_equal = is_word(type(ycomp[yi])) &&
+	  StringEqual(string(xcomp[xi]), string(ycomp[yi]));
+      }
+      else
+      {
+	is_equal = (type(xcomp[xi]) == type(ycomp[yi]));
+      }
+      if( is_equal )
+      {
+	table[xi][yi] = 1 + table[xi - 1][yi - 1];
+	dir[xi][yi] = XY_DIR;
+        debug3(DOS, DD, "  assigning (XY) table[%d][%d] = %d", xi, yi,
+	  table[xi][yi]);
+      }
+      else if( table[xi - 1][yi] > table[xi][yi - 1] )
+      {
+	table[xi][yi] = table[xi - 1][yi];
+	dir[xi][yi] = X_DIR;
+        debug3(DOS, DD, "  assigning (X) table[%d][%d] = %d", xi, yi,
+	  table[xi][yi]);
+      }
+      else
+      {
+	table[xi][yi] = table[xi][yi - 1];
+	dir[xi][yi] = Y_DIR;
+        debug3(DOS, DD, "  assigning (Y) table[%d][%d] = %d", xi, yi,
+	  table[xi][yi]);
+      }
+    }
+  }
+
+  /* traverse table from [xlen-l][ylen-1] back to [0][0], finding who's in */
+  debug0(DOS, DD, "  traversing table[]");
+  New(res, ACAT);
+  StyleCopy(save_style(res), save_style(x));
+  for( xi = xlen - 1, yi = ylen - 1;  dir[xi][yi] != NO_DIR; )
+  {
+    switch( dir[xi][yi] )
+    {
+      case XY_DIR:
+
+        debug3(DOS, DD, "  at table[%d][%d] (XY) linking %s",
+	  xi, yi, EchoObject(xcomp[xi]));
+        Link(Down(res), xcomp[xi]);
+        g = xgaps[xi];
+        xi--;
+        yi--;
+	break;
+
+    
+      case Y_DIR:
+
+        debug3(DOS, DD, "  at table[%d][%d] (ydec) linking %s",
+	  xi, yi, EchoObject(ycomp[yi]));
+        Link(Down(res), ycomp[yi]);
+        g = ygaps[yi];
+        yi--;
+	break;
+
+
+      case X_DIR:
+
+        debug3(DOS, DD, "  at table[%d][%d] (xdec) linking %s",
+	  xi, yi, EchoObject(xcomp[xi]));
+        Link(Down(res), xcomp[xi]);
+        g = xgaps[xi];
+        xi--;
+    }
+
+    /* add gap if not last time; either g or one we make up */
+    if( dir[xi][yi] != NO_DIR )
+    {
+      if( g == nilobj )
+      {
+	OBJECT tmp;
+	New(g, GAP_OBJ);
+	hspace(g) = 1;  vspace(g) = 0;
+	FposCopy(fpos(g), *no_fpos);
+	SetGap(gap(g), FALSE, FALSE, TRUE, FIXED_UNIT, EDGE_MODE,
+	  width(space_gap(save_style(res))));
+	tmp = MakeWord(WORD, AsciiToFull("1s"), &fpos(g));
+	Link(g, tmp);
+        Link(Down(res), g);
+      }
+      else
+      {
+	assert(Up(g) == LastUp(g), "Meld: g!" );
+        Link(Down(res), g);
+      }
+    }
+  }
+
+  debug1(DOS, D, "Meld returning %s", EchoObject(res));
+  return res;
+}
diff --git a/z08.c b/z08.c
new file mode 100644
index 0000000..89afcbe
--- /dev/null
+++ b/z08.c
@@ -0,0 +1,1989 @@
+/*@z08.c:Object Manifest:ReplaceWithSplit()@**********************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z08.c                                                      */
+/*  MODULE:       Object Manifest                                            */
+/*  EXTERNS:      Manifest()                                                 */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define line_breaker(g)							\
+  (vspace(g) > 0 || (units(gap(g)) == FRAME_UNIT && width(gap(g)) > FR))
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static SetUnderline(x)                                                   */
+/*                                                                           */
+/*  Set underline() flags in object x to UNDER_ON as appropriate.            */
+/*                                                                           */
+/*****************************************************************************/
+
+static void SetUnderline(OBJECT x)
+{ OBJECT y, link;
+  debug2(DOM, DD, "  Manifest underlining %s %s", Image(type(x)),EchoObject(x));
+  if( type(x) == ACAT )
+  { for( link = Down(x);  link != x;  link = NextDown(link) )
+    { Child(y, link);
+      SetUnderline(y);
+    }
+  }
+  debug3(DOM, DDD, "  SetUnderline underline() := %s for %s %s",
+    "UNDER_ON", Image(type(x)), EchoObject(x));
+  underline(x) = UNDER_ON;
+} /* end SetUnderline */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static ReplaceWithSplit(x, bthr, fthr)                                   */
+/*                                                                           */
+/*  Replace object x with a SPLIT object, if threads for this object are     */
+/*  requested by bthr and/or fthr.                                           */
+/*                                                                           */
+/*****************************************************************************/
+
+#define ReplaceWithSplit(x, bthr, fthr)					\
+   if( bthr[ROWM] || bthr[COLM] || fthr[ROWM] || fthr[COLM] )		\
+	x = insert_split(x, bthr, fthr)
+
+static OBJECT insert_split(OBJECT x, OBJECT bthr[2], OBJECT fthr[2])
+{ OBJECT res, new_op;  int dim;
+  debug1(DOM, DD, "ReplaceWithSplit(%s, -)", EchoObject(x));
+  assert( type(x) != SPLIT, "ReplaceWithSplit: type(x) already SPLIT!" );
+  New(res, SPLIT);
+  FposCopy(fpos(res), fpos(x));
+  ReplaceNode(res, x);
+  for( dim = COLM;  dim <= ROWM;  dim++ )
+  { if( bthr[dim] || fthr[dim] )
+    { New(new_op, dim == COLM ? COL_THR : ROW_THR);
+      thr_state(new_op) = NOTSIZED;
+      fwd(new_op, 1-dim) = 0;	/* will hold max frame_size */
+      back(new_op, 1-dim) = 0;	/* will hold max frame_origin */
+      FposCopy(fpos(new_op), fpos(x));
+      Link(res, new_op);  Link(new_op, x);
+      if( bthr[dim] )  Link(bthr[dim], new_op);
+      if( fthr[dim] )  Link(fthr[dim], new_op);
+    }
+    else Link(res, x);
+  }
+
+  debug1(DOM, DD, "ReplaceWithSplit returning %s", EchoObject(res));
+  return res;
+} /* end insert_split */
+
+/*@::ReplaceWithTidy()@*******************************************************/
+/*                                                                           */
+/*  OBJECT ReplaceWithTidy(x, one_word)                                      */
+/*                                                                           */
+/*  Replace object x with a tidier version in which juxtapositions are       */
+/*  folded.  If this is not possible, return the original object.            */
+/*                                                                           */
+/*  If one_word is TRUE, the result is to be a single QWORD with inter-      */
+/*  word spaces converted to single space characters.  Otherwise an ACAT     */
+/*  is the preferred result.                                                 */
+/*                                                                           */
+/*  *** Meaning changed, now interword spaces are converted to the same      */
+/*  number of spaces to assist construction of sorting keys.                 */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT ReplaceWithTidy(OBJECT x, BOOLEAN one_word)
+{ static FULL_CHAR	buff[MAX_BUFF];		/* the growing current word */
+  static int		buff_len;		/* length of current word   */
+  static FILE_POS	buff_pos;		/* filepos of current word  */
+  static unsigned	buff_typ;		/* WORD or QWORD of current */
+  OBJECT                link, y, tmp, res;	/* temporaries              */
+  int i;
+  debug2(DOM, DD, "ReplaceWithTidy(%s, %s)", EchoObject(x), bool(one_word));
+  switch( type(x) )
+  {
+    case ACAT:
+    
+      for( link = Down(x);  link != x;  link = NextDown(link) )
+      {	Child(y, link);
+	if( type(y) == ACAT )
+	{ tmp = Down(y);  TransferLinks(tmp, y, link);
+	  DisposeChild(link);  link = PrevDown(tmp);
+	}
+      }
+      res = nilobj;  buff_len = 0;  buff_typ = WORD;
+      FposCopy(buff_pos, fpos(x));
+      for( link = Down(x); link != x; link = NextDown(link) )
+      {	Child(y, link);
+	if( is_word(type(y)) )
+	{ if( buff_len + StringLength(string(y)) >= MAX_BUFF )
+	    Error(8, 1, "word is too long", WARN, &fpos(y));
+	  else
+	  { if( buff_len == 0 )  FposCopy(buff_pos, fpos(y));
+	    StringCopy(&buff[buff_len], string(y));
+	    buff_len += StringLength(string(y));
+	    if( type(y) == QWORD )  buff_typ = QWORD;
+	  }
+	}
+	else if( type(y) == GAP_OBJ )
+	{ if( Down(y) != y || hspace(y) + vspace(y) > 0 )
+	  { if( one_word )
+	    { if( buff_len + hspace(y) + vspace(y) >= MAX_BUFF )
+		Error(8, 2, "word is too long", WARN, &fpos(y));
+	      else
+	      { for( i = 0;  i < hspace(y) + vspace(y);  i++ )
+		{ StringCopy(&buff[buff_len], AsciiToFull(" "));
+		  buff_len++;
+		}
+		buff_typ = QWORD;
+	      }
+	    }
+	    else
+	    { tmp = MakeWord(buff_typ, buff, &buff_pos);
+	      buff_len = 0;  buff_typ = WORD;
+	      if( res == nilobj )
+	      { New(res, ACAT);
+		FposCopy(fpos(res), fpos(x));
+	      }
+	      Link(res, tmp);  Link(res, y);
+	    }
+	  }
+	}
+	else /* error */
+	{ if( res != nilobj )  DisposeObject(res);
+	  debug0(DOM, DD, "ReplaceWithTidy returning unchanged");
+	  return x;
+	}
+      }
+      tmp = MakeWord(buff_typ, buff, &buff_pos);
+      if( res == nilobj )  res = tmp;
+      else Link(res, tmp);
+      ReplaceNode(res, x);  DisposeObject(x);
+      debug1(DOM, DD, "ReplaceWithTidy returning %s", EchoObject(res));
+      return res;
+
+
+    case WORD:
+    case QWORD:
+
+      debug1(DOM, DD, "ReplaceWithTidy returning %s", EchoObject(x));
+      return x;
+
+
+    default:
+
+      debug0(DOM, DD, "ReplaceWithTidy returning unchanged");
+      return x;
+  }
+} /* end ReplaceWithTidy */
+
+
+/*@::GetScaleFactor()@********************************************************/
+/*                                                                           */
+/*  static float GetScaleFactor(x)                                           */
+/*                                                                           */
+/*  Find a scale factor in object x and return it as a float, after checks.  */
+/*                                                                           */
+/*****************************************************************************/
+
+static float GetScaleFactor(OBJECT x)
+{ float scale_factor;
+  if( !is_word(type(x)) )
+  { Error(8, 3, "replacing invalid scale factor by 1.0", WARN, &fpos(x));
+    scale_factor = 1.0;
+  }
+  else if( sscanf( (char *) string(x), "%f", &scale_factor) != 1 )
+  { Error(8, 4, "replacing invalid scale factor %s by 1.0",
+      WARN, &fpos(x), string(x));
+    scale_factor = 1.0;
+  }
+  else if( scale_factor < 0.01 )
+  { Error(8, 5, "replacing undersized scale factor %s by 1.0",
+      WARN, &fpos(x), string(x));
+    scale_factor = 1.0;
+  }
+  else if( scale_factor > 100 )
+  { Error(8, 6, "replacing oversized scale factor %s by 1.0",
+      WARN, &fpos(x), string(x));
+    scale_factor = 1.0;
+  }
+  return scale_factor;
+} /* GetScaleFactor */
+
+
+static OBJECT nbt[2] = { nilobj, nilobj };	/* constant nilobj threads */
+static OBJECT nft[2] = { nilobj, nilobj };	/* constant nilobj threads */
+static OBJECT ntarget = nilobj;			/* constant nilobj target  */
+static OBJECT nenclose = nilobj;		/* constant nilobj enclose  */
+
+
+/*@::ManifestCat@*************************************************************/
+/*                                                                           */
+/*  OBJECT ManifestCat(x,env,style,bthr, fthr, target, crs, ok, need_expand, */
+/*                     enclose, fcr)                                         */
+/*                                                                           */
+/*  This procedure implements Manifest (see below) when x is HCAT or VCAT.   */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT ManifestCat(OBJECT x, OBJECT env, STYLE *style, OBJECT bthr[2],
+OBJECT fthr[2], OBJECT *target, OBJECT *crs, BOOLEAN ok, BOOLEAN need_expand,
+OBJECT *enclose, BOOLEAN fcr)
+{ OBJECT bt[2], ft[2], y, link, gaplink, g, first_bt, last_ft, z;
+  int par, perp;
+  unsigned res_inc;  BOOLEAN still_backing;
+  STYLE new_style;
+  debug1(DOM, DD, "[ ManifestCat(%s)", EchoObject(x));
+    
+  StyleCopy(new_style, *style);
+  if( type(x) == HCAT )
+  { par = ROWM;
+    adjust_cat(x) = hadjust(*style);
+    hadjust(new_style) = FALSE;
+  }
+  else
+  { par = COLM;
+    adjust_cat(x) = vadjust(*style);
+    vadjust(new_style) = FALSE;
+  }
+  perp = 1 - par;
+  link = Down(x);
+  gaplink = NextDown(link);
+  assert( link!=x && gaplink!=x, "Manifest/VCAT: less than two children!" );
+  Child(y, link);  Child(g, gaplink);
+
+  /* set bt and ft threads for y */
+  bt[perp] = bthr[perp];
+  ft[perp] = fthr[perp];
+  if( bthr[par] )  { New(first_bt, THREAD); }
+  else first_bt = nilobj;
+  bt[par] = first_bt;
+  if( join(gap(g)) )  { New(ft[par], THREAD); }
+  else ft[par] = nilobj;
+  still_backing = first_bt != nilobj;
+
+  /* manifest y and insinuate any cross-references */
+  y = Manifest(y, env, &new_style, bt, ft, target, crs, ok, FALSE, enclose, fcr);
+  if( type(x) == VCAT && ok && *crs != nilobj )
+  { debug1(DCR, DD, "  insinuating %s", EchoObject(*crs));
+    TransferLinks(Down(*crs), *crs, link);
+    DisposeObject(*crs);
+    *crs = nilobj;
+  }
+
+  /* manifest the remaining children */
+  while( g != nilobj )
+  {	
+    /* manifest the gap object, store it in gap(g), add perp threads */
+    assert( type(g) == GAP_OBJ, "Manifest/VCAT: type(g) != GAP_OBJECT!" );
+    assert( Down(g) != g, "Manifest/VCAT: GAP_OBJ has no child!" );
+    Child(z, Down(g));
+    debug1(DOM, DD, "manifesting gap, style = %s", EchoStyle(style));
+    z = Manifest(z, env, &new_style, nbt, nft, &ntarget, crs, FALSE, FALSE, enclose, fcr);
+    debug1(DOM, DD, "replacing with tidy, style = %s", EchoStyle(style));
+    z = ReplaceWithTidy(z, FALSE);
+    debug1(DOM, DD, "calling GetGap, style = %s", EchoStyle(style));
+    GetGap(z, style, &gap(g), &res_inc);
+    if( bt[perp] )  Link(bt[perp], g);
+    if( ft[perp] )  Link(ft[perp], g);
+
+    /* find the next child y, and following gap if any */
+    link = NextDown(gaplink);
+    assert( link != x, "Manifest/VCAT: GAP_OBJ is last child!" );
+    Child(y, link);
+    gaplink = NextDown(link);
+    if( gaplink == x )  g = nilobj;
+    else Child(g, gaplink);
+
+    /* set bt and ft threads for y */
+    last_ft = ft[par];
+    if( ft[par] ) { New(bt[par], THREAD); }  else bt[par] = nilobj;
+    if( g != nilobj )
+    { if( join(gap(g)) )  { New(ft[par], THREAD); }  else ft[par] = nilobj;
+    }
+    else
+    {
+      if( fthr[par] )  { New(ft[par], THREAD); }  else ft[par] = nilobj;
+    }
+
+    /* manifest y and insinuate any cross references */
+    y = Manifest(y, env, &new_style, bt, ft, target, crs, ok, FALSE, enclose, fcr);
+    if( type(x) == VCAT && ok && *crs != nilobj )
+    { debug1(DCR, DD, "  insinuating %s", EchoObject(*crs));
+      TransferLinks(Down(*crs), *crs, link);
+      DisposeObject(*crs);
+      *crs = nilobj;
+    }
+
+    if( bt[par] )	/* then thread lists last_ft and bt[par] must merge */
+    { OBJECT llink, rlink, lthread, rthread;
+      BOOLEAN goes_through;
+      assert( Down(bt[par]) != bt[par], "Manifest: bt[par] no children!" );
+      assert( last_ft!=nilobj && Down(last_ft)!=last_ft, "Manifest:last_ft!" );
+
+      /* check whether marks run right through y in par direction */
+      goes_through = FALSE;
+      if( ft[par] )
+      {	assert( Down(ft[par]) != ft[par], "Manifest: ft[par] child!" );
+	Child(lthread, LastDown(bt[par]));
+	Child(rthread, LastDown(ft[par]));
+	goes_through = lthread == rthread;
+      }
+
+      /* merge the thread lists */
+      llink = Down(last_ft);  rlink = Down(bt[par]);
+      while( llink != last_ft && rlink != bt[par] )
+      {	Child(lthread, llink);
+	Child(rthread, rlink);
+	assert( lthread != rthread, "Manifest: lthread == rthread!" );
+	MergeNode(lthread, rthread);
+	llink = NextDown(llink);
+	rlink = NextDown(rlink);
+      }
+
+      /* attach leftover back threads to first_bt if required */
+      if( rlink != bt[par] )
+      { 
+	if( still_backing )  TransferLinks(rlink, bt[par], first_bt);
+      }
+      DisposeObject(bt[par]);
+
+      /* attach leftover forward threads to ft[par] if required */
+      if( llink != last_ft )
+      {
+	if( goes_through )  TransferLinks(llink, last_ft, ft[par]);
+      }
+      DisposeObject(last_ft);
+
+      if( !goes_through )  still_backing = FALSE;
+
+    }
+    else still_backing = FALSE;
+
+  } /* end while */
+
+  /* export par threads */
+  if( fthr[par] )  MergeNode(fthr[par], ft[par]);
+  if( bthr[par] )  MergeNode(bthr[par], first_bt);
+  debug0(DOM, DD, "] ManifestCat returning");
+  return x;
+} /* end ManifestCat */
+
+
+/*@::ManifestCase@************************************************************/
+/*                                                                           */
+/*  OBJECT ManifestCase(x,env,style,bthr,fthr, target, crs, ok, need_expand, */
+/*                      enclose, fcr)                                        */
+/*                                                                           */
+/*  This procedure implements Manifest (see below) when x is CASE.           */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT ManifestCase(OBJECT x, OBJECT env, STYLE *style, OBJECT bthr[2],
+OBJECT fthr[2], OBJECT *target,  OBJECT *crs, BOOLEAN ok, BOOLEAN need_expand,
+OBJECT *enclose, BOOLEAN fcr)
+{ OBJECT y, tag, ylink, yield, ytag, zlink;
+  OBJECT res, z, firsttag, firstres;
+
+  /* make sure left parameter (the tag) is in order */
+  debug0(DOM, DD, "  manifesting CASE now");
+  Child(tag, Down(x));
+  debug1(DOM, DD, "  manifesting CASE tag %s now", EchoObject(tag));
+  tag = Manifest(tag, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE,
+  &nenclose, fcr);
+  tag = ReplaceWithTidy(tag, FALSE);
+
+  /* make sure the right parameter is an ACAT */
+  Child(y, LastDown(x));
+  if( type(y) == YIELD )
+  { New(z, ACAT);
+    MoveLink(Up(y), z, PARENT);
+    Link(x, z);
+    y = z;
+  }
+  if( type(y) != ACAT )
+  { Error(8, 7, "%s deleted (right parameter is malformed)",
+      WARN, &fpos(y), KW_CASE);
+    y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+    ReplaceNode(y, x);  DisposeObject(x);
+    x = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+    return x;
+  }
+
+  /* hunt through right parameter for res, the selected case */
+  res = nilobj;  firsttag = nilobj;
+  for( ylink = Down(y);  ylink != y && res == nilobj;  ylink = NextDown(ylink) )
+  { Child(yield, ylink);
+    if( type(yield) == GAP_OBJ )  continue;
+    if( type(yield) != YIELD )
+    { Error(8, 8, "%s expected here", WARN, &fpos(yield), KW_YIELD);
+      break;
+    }
+    Child(ytag, Down(yield));
+    ytag = Manifest(ytag, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE,
+      &nenclose, fcr);
+    ytag = ReplaceWithTidy(ytag, FALSE);
+    if( is_word(type(ytag)) )
+    { if( firsttag == nilobj )
+      {	firsttag = ytag;
+	Child(firstres, LastDown(yield));
+      }
+      if( (is_word(type(tag)) && StringEqual(string(ytag), string(tag))) ||
+	     StringEqual(string(ytag), STR_ELSE)  )
+      {	Child(res, LastDown(yield));
+	break;
+      }
+    }
+    else if( type(ytag) == ACAT )
+    { z = ytag;
+      for( zlink = Down(z);  zlink != z;  zlink = NextDown(zlink) )
+      {	Child(ytag, zlink);
+	if( type(ytag) == GAP_OBJ )  continue;
+	if( !is_word(type(ytag)) )
+	{ Error(8, 9, "error in left parameter of %s",
+	    WARN, &fpos(ytag), KW_YIELD);
+	  break;
+        }
+        if( firsttag == nilobj )
+        { firsttag = ytag;
+	  Child(firstres, LastDown(yield));
+        }
+        if( (is_word(type(tag)) && StringEqual(string(ytag), string(tag)))
+	        || StringEqual(string(ytag), STR_ELSE) )
+        { Child(res, LastDown(yield));
+	  break;
+        }
+      }
+    }
+    else Error(8, 10, "error in left parameter of %s",
+	   WARN, &fpos(ytag), KW_YIELD);
+  }
+  if( res == nilobj )
+  { if( firsttag != nilobj )
+    { Error(8, 11, "replacing unknown %s option %s by %s",
+	WARN, &fpos(tag), KW_CASE, string(tag), string(firsttag));
+      res = firstres;
+      debug1(DGP, D, "  res = %s", EchoObject(res));
+    }
+    else
+    { Error(8, 12, "%s deleted (choice %s unknown)",
+	WARN, &fpos(tag), KW_CASE, string(tag));
+      y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+      ReplaceNode(y, x);  DisposeObject(x);
+      x = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      return x;
+    }
+  }
+
+  /* now manifest the result and replace x with it */
+  DeleteLink(Up(res));
+  ReplaceNode(res, x);
+  DisposeObject(x);
+  x = Manifest(res, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+  return x;
+} /* ManifestCase */
+
+
+/*@::ManifestTg@**************************************************************/
+/*                                                                           */
+/*  OBJECT ManifestTg(x,env,style,bthr, fthr, target, crs, ok, need_expand,  */
+/*                    enclose, fcr)                                          */
+/*                                                                           */
+/*  This procedure implements Manifest (see below) when x is TAGGED.         */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT ManifestTg(OBJECT x, OBJECT env, STYLE *style, OBJECT bthr[2],
+OBJECT fthr[2], OBJECT *target, OBJECT *crs, BOOLEAN ok, BOOLEAN need_expand,
+OBJECT *enclose, BOOLEAN fcr)
+{ OBJECT y, tag, z;
+
+  /* make sure first argument is a cross-reference */
+  assert( Down(x) != x && NextDown(Down(x)) != x &&
+	NextDown(NextDown(Down(x))) == x, "Manifest TAGGED: children!" );
+  Child(y, Down(x));
+  if( !is_cross(type(y)) )
+  {
+    y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, TRUE);
+    if( !is_cross(type(y)) )
+    { Error(8, 13, "left parameter of %s is not a cross reference",
+        WARN, &fpos(y), KW_TAGGED);
+      y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+      ReplaceNode(y, x);  DisposeObject(x);
+      x = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      return x;
+    }
+  }
+
+  /* make sure the arguments of the cross-reference are OK */
+  Child(z, Down(y));
+  if( type(z) != CLOSURE )
+  { Error(8, 14, "left parameter of %s must be a symbol",
+      WARN, &fpos(y), KW_TAGGED);
+    y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+    ReplaceNode(y, x);  DisposeObject(x);
+    x = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+    return x;
+  }
+  if( !has_tag(actual(z)) )
+  { Error(8, 15, "symbol %s not allowed here (it has no %s)",
+      WARN, &fpos(z), SymName(actual(z)), KW_TAG);
+    y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+    ReplaceNode(y, x);  DisposeObject(x);
+    x = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+    return x;
+  }
+  Child(z, NextDown(Down(y)));
+  z = Manifest(z, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+  z = ReplaceWithTidy(z, FALSE);
+  if( is_word(type(z)) && StringEqual(string(z), KW_PRECEDING) )
+    cross_type(y) = CROSS_PREC;
+  else if( is_word(type(z)) && StringEqual(string(z), KW_FOLLOWING) )
+    cross_type(y) = CROSS_FOLL;
+  else if( is_word(type(z)) && StringEqual(string(z), KW_FOLL_OR_PREC) )
+    cross_type(y) = CROSS_FOLL_OR_PREC;
+  else
+  { Error(8, 16, "%s, %s or %s expected in left parameter of %s",
+      WARN, &fpos(z), KW_PRECEDING, KW_FOLLOWING, KW_FOLL_OR_PREC, KW_TAGGED);
+    y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+    ReplaceNode(y, x);  DisposeObject(x);
+    x = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+    return x;
+  }
+
+  /* make sure second argument (the new key) is ok */
+  Child(tag, LastDown(x));
+  tag = Manifest(tag, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+  tag = ReplaceWithTidy(tag, TRUE); /* && */
+  if( !is_word(type(tag)) )
+  { Error(8, 17, "right parameter of %s must be a simple word",
+      WARN, &fpos(tag), KW_TAGGED);
+    ifdebug(DOM, DD, DebugObject(tag));
+    y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+    ReplaceNode(y, x);  DisposeObject(x);
+    x = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+    return x;
+  }
+
+  /* assemble insinuated cross reference which replaces x */
+  ReplaceNode(tag, z);
+  DisposeObject(z);
+  ReplaceNode(y, x);
+  DisposeObject(x);
+  x = y;
+  ReplaceWithSplit(x, bthr, fthr);
+  debug1(DCR, DD, "  tagged manifesting %s", EchoObject(x));
+  return x;
+} /* end ManifestTg */
+
+
+/*@::ManifestCl@**************************************************************/
+/*                                                                           */
+/*  OBJECT ManifestCl(x,env,style,bthr, fthr, target, crs, ok, need_expand,  */
+/*                    enclose, fcr)                                          */
+/*                                                                           */
+/*  This procedure implements Manifest (see below) when x is CLOSURE.        */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT ManifestCl(OBJECT x, OBJECT env, STYLE *style, OBJECT bthr[2],
+OBJECT fthr[2], OBJECT *target, OBJECT *crs, BOOLEAN ok, BOOLEAN need_expand,
+OBJECT *enclose, BOOLEAN fcr)
+{ OBJECT y, link, sym, res_env, hold_env, hold_env2, z, newz, command;
+  BOOLEAN symbol_free;
+
+  sym = actual(x);
+  StyleCopy(save_style(x), *style);
+  debugcond2(DOM, D, StringEqual(SymName(sym), "@Section"),
+     "manifesting %s at %s", SymName(sym), EchoFilePos(&fpos(x)));
+  debug1(DOM, DD,  "  [ manifesting closure %s", SymName(sym));
+
+  /* enclose, if required */
+  if( *enclose != nilobj && (actual(x)==GalleySym || actual(x)==ForceGalleySym) )
+  { OBJECT sym, par;
+    ReplaceNode(*enclose, x);
+    Child(sym, Down(*enclose));
+    Child(par, Down(sym));
+    DisposeChild(Down(par));
+    Link(par, x);
+    x = *enclose;
+    *enclose = nilobj;
+    debug1(DHY, DD, "  Manifest/enclose: %s", EchoObject(x));
+    x = Manifest(x, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+    debug0(DOM, DD,  "  ] returning from manifesting closure (enclose)");
+    return x;
+  }
+
+  /* expand parameters where possible, and find if they are all free */
+  symbol_free = TRUE;
+  debugcond1(DOM, DD, indefinite(sym), "  freeing %s", EchoObject(x));
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    assert( type(y) == PAR, "Manifest/CLOSURE: type(y) != PAR!" );
+    Child(z, Down(y));
+
+    /* try to evaluate the actual parameter z */
+    if( !is_word(type(z)) && !has_par(actual(y)) )
+    {
+      if( is_tag(actual(y)) || is_key(actual(y)) )
+      {	z = Manifest(z, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+	z = ReplaceWithTidy(z, TRUE);
+	if( !is_word(type(z)) )
+	{
+	  debug2(ANY, D, "z = %s %s", Image(type(z)), EchoObject(z));
+	  Error(8, 41, "this %s is not a sequence of one or more words", FATAL,
+	    &fpos(y), SymName(actual(y)));
+	}
+      }
+      else if( type(z) == NEXT )
+      {	z = Manifest(z, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+	z = ReplaceWithTidy(z, FALSE);
+      }
+      else if( type(z) == CLOSURE && is_par(type(actual(z))) )
+      {
+        /* see whether z would come to something simple if expanded */
+        newz = ParameterCheck(z, env);
+        debugcond2(DOM, DD, indefinite(sym), "  ParameterCheck(%s, env) = %s",
+	  EchoObject(z), EchoObject(newz));
+        if( newz != nilobj )
+        { ReplaceNode(newz, z);
+	  DisposeObject(z);
+	  z = newz;
+        }
+      }
+    }
+
+    /*  now check z to see whether it is either a word or and ACAT of words */
+    /* ***
+    if( type(z) == ACAT )
+    { int i = 0;  OBJECT t, tlink, g;
+      tlink = Down(z);
+      for( ; tlink != z && symbol_free;  tlink = NextDown(tlink), i++ )
+      { Child(t, tlink);
+	switch( type(t) )
+	{
+	  case WORD:
+	  case QWORD:	if( i > 20 )  symbol_free = FALSE;
+			break;
+
+	  case GAP_OBJ:	if( Down(t) != t )
+			{ Child(g, Down(t));
+			  if( !is_word(type(g)) )  symbol_free = FALSE;
+			}
+			break;
+
+	  default:	symbol_free = FALSE;
+			break;
+
+	}
+      }
+    }
+    else
+    *** */
+    
+    if( !is_word(type(z)) )
+    { symbol_free = FALSE;
+    }
+  }
+  debugcond2(DOM, DD, indefinite(sym),"  s_f = %s, x = %s",
+    bool(symbol_free), EchoObject(x));
+
+  /* if all parameters are free of symbols, optimize environment */
+  if( symbol_free && imports(sym) == nilobj && enclosing(sym) != StartSym )
+  { y = SearchEnv(env, enclosing(sym));
+    if( y != nilobj && type(y) == CLOSURE )
+    { OBJECT prntenv;
+      Parent(prntenv, Up(y));
+      if( type(prntenv) != ENV )  fprintf(stderr, "%s\n", Image(type(prntenv)));
+      assert(type(prntenv) == ENV, "Manifest: prntenv!");
+      if( Down(prntenv) == LastDown(prntenv) )
+      { env = prntenv;
+      }
+      else
+      { debug0(DCR, DDD, "calling SetEnv from Manifest (a)");
+        env = SetEnv(y, nilobj);
+      }
+      New(hold_env2, ACAT);  Link(hold_env2, env);
+    }
+    else
+    { /* *** letting this through now
+      if( has_par(enclosing(sym)) )
+	Error(8, 18, "symbol %s used outside %s", WARN, &fpos(x), SymName(sym),
+	  SymName(enclosing(sym)));
+      *** */
+      hold_env2 = nilobj;
+    }
+  }
+  else hold_env2 = nilobj;
+
+  debug3(DOM, DD, " expansion: has_target %s, indefinite %s, recursive %s",
+    bool(has_target(sym)), bool(indefinite(sym)), bool(recursive(sym)));
+  if( has_target(sym) && !need_expand )
+  {
+    /* convert symbols with targets to unsized galleys */
+    OBJECT hd;
+    New(hd, HEAD);
+    FposCopy(fpos(hd), fpos(x));
+    actual(hd) = sym;
+    limiter(hd) = opt_components(hd) = opt_constraints(hd) = nilobj;
+    gall_dir(hd) = horiz_galley(sym);
+    ready_galls(hd) = nilobj;
+    must_expand(hd) = TRUE;
+    sized(hd) = FALSE;
+    ReplaceNode(hd, x);
+    Link(hd, x);
+    AttachEnv(env, x);
+    SetTarget(hd);
+    enclose_obj(hd) = (has_enclose(sym) ? BuildEnclose(hd) : nilobj);
+    x = hd;
+    threaded(x) = bthr[COLM] != nilobj || fthr[COLM] != nilobj;
+    ReplaceWithSplit(x, bthr, fthr);
+  }
+  else if(
+	    *target == sym			  ? (*target = nilobj, TRUE) :
+	    need_expand				  ? TRUE  :
+	    uses_galley(sym) && !recursive(sym)   ? TRUE  :
+	    !indefinite(sym) && !recursive(sym)   ? TRUE  :
+	    indefinite(sym)  && *target != nilobj ? SearchUses(sym, *target)
+						  : FALSE
+	 )
+  {
+    /* expand the closure and manifest the result */
+    debug1(DOM, DD, "expanding; style: %s", EchoStyle(style));
+    debug0(DCE, DD, "  calling ClosureExpand from Manifest/CLOSURE");
+    /* *** now requesting cross refs always, not only if ok
+    x = ClosureExpand(x, env, ok, crs, &res_env);
+    *** */
+    x = ClosureExpand(x, env, TRUE, crs, &res_env);
+    New(hold_env, ACAT);  Link(hold_env, res_env);
+    debug1(DOM, DD, "recursive call; style: %s", EchoStyle(style));
+    if( type(x) == FILTERED )
+    { assert( type(sym) == RPAR, "ManifestCl/filtered: type(sym)!" );
+      assert( filter(enclosing(sym)) != nilobj, "ManifestCl filter-encl!" );
+      New(command, CLOSURE);
+      FposCopy(fpos(command), fpos(x));
+      actual(command) = filter(enclosing(sym));
+      FilterSetFileNames(x);
+      command = Manifest(command,env,style,nbt,nft,&ntarget,crs,FALSE,FALSE, &nenclose, fcr);
+      command = ReplaceWithTidy(command, TRUE);
+      if( !is_word(type(command)) )
+	Error(8, 19, "filter parameter of %s symbol is not simple",
+	  FATAL, &fpos(command), SymName(enclosing(sym)));
+      y = FilterExecute(x, string(command), res_env);
+      DisposeObject(command);
+      ReplaceNode(y, x);
+      DisposeObject(x);
+      x = y;
+    }
+    x = Manifest(x, res_env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+    DisposeObject(hold_env);
+  }
+  else
+  {
+    AttachEnv(env, x);
+    threaded(x) = bthr[COLM] != nilobj || fthr[COLM] != nilobj;
+    debug0(DOM, DD,  "  closure; calling ReplaceWithSplit");
+    ReplaceWithSplit(x, bthr, fthr);
+  }
+  if( hold_env2 != nilobj )  DisposeObject(hold_env2);
+  debug0(DOM, DD,  "  ] returning from manifesting closure");
+  return x;
+} /* end ManifestCl */
+
+
+/*@::Manifest()@**************************************************************/
+/*                                                                           */
+/*  OBJECT Manifest(x, env, style, bthr, fthr, target, crs, ok, need_expand, */
+/*                  enclose, fcr)                                            */
+/*                                                                           */
+/*  Manifest object x, interpreted in environment env and style style.       */
+/*  The result replaces x, and is returned also.                             */
+/*  The manifesting operation converts x from a pure parse tree object       */
+/*  containing closures and no threads, to an object ready for sizing,       */
+/*  with fonts propagated to the words, fill styles propagated to the        */
+/*  ACATs, and line spacings propagated to all interested parties.           */
+/*  All non-recursive, non-indefinite closures are expanded.                 */
+/*  Threads joining objects on a mark are constructed, and SPLIT objects     */
+/*  inserted, so that sizing becomes a trivial operation.                    */
+/*                                                                           */
+/*  Manifest will construct threads and pass them up as children of bthr[]   */
+/*  and fthr[] whenever non-nilobj values of these variables are passed in:  */
+/*                                                                           */
+/*      bthr[COLM]           protrudes upwards from x                        */
+/*      fthr[COLM]           protrudes downwards from x                      */
+/*      bthr[ROWM]           protrudes leftwards from x                      */
+/*      fthr[ROWM]           protrudes rightwards from x                     */
+/*                                                                           */
+/*  If *target != nilobj, Manifest will expand indefinite closures leading   */
+/*  to the first @Galley lying within an object of type *target.             */
+/*                                                                           */
+/*  If *target != nilobj and *enclose != nilobj, Manifest will enclose       */
+/*  any @Galley or @ForceGalley it comes across in *enclose.                 */
+/*                                                                           */
+/*  The env parameter contains the environment in which x is to be           */
+/*  evaluated.  Environments are shared, so their correct disposal is not    */
+/*  simple.  The rule is this:  the code which creates an environment, or    */
+/*  detaches it, is responsible for holding it with a dummy parent until     */
+/*  it is no longer required.                                                */
+/*                                                                           */
+/*  Some objects x are not "real" in the sense that they do not give rise    */
+/*  to rectangles in the final printed document.  The left parameter of      */
+/*  @Wide and similar operators, and the gap following a concatenation       */
+/*  operator, are examples of such non-real objects.  The ok flag is true    */
+/*  when x is part of a real object.  This is needed because some things,    */
+/*  such as the insinuation of cross references, the breaking of             */
+/*  lines @Break ACAT objects, and conversion to small capitals, only apply  */
+/*  to real objects.                                                         */
+/*                                                                           */
+/*  If *crs != nilobj, it points to a list of indexes to cross-references    */
+/*  which are to be insinuated into the manifested form of x if x is real.   */
+/*                                                                           */
+/*  If need_expand is TRUE it forces closure x to expand.                    */
+/*                                                                           */
+/*  If fcr is TRUE, the objective is to expand until a cross-reference is    */
+/*  the result; so expansion will stop at a CROSS or FORCE_CROSS object.     */
+/*                                                                           */
+/*  A postcondition of Manifest() is that the underline() flag is set to     */
+/*  either UNDER_ON or UNDER_OFF in every WORD, every QWORD, and every child */
+/*  of every ACAT, including the gaps.  This can be verified by checking     */
+/*  that the WORD and QWORD cases set underline() to UNDER_OFF, and the ACAT */
+/*  case sets every child of the ACAT to UNDER_OFF.  To see that the correct */
+/*  subset of these flags gets changed to UNDER_ON, consult SetUnderline().  */
+/*  The underline() flag is undefined otherwise, and should have value       */
+/*  UNDER_UNDEF.                                                             */
+/*                                                                           */
+/*****************************************************************************/
+#define MAX_DEPTH 500
+
+OBJECT Manifest(OBJECT x, OBJECT env, STYLE *style, OBJECT bthr[2],
+OBJECT fthr[2], OBJECT *target, OBJECT *crs, BOOLEAN ok, BOOLEAN need_expand,
+OBJECT *enclose, BOOLEAN fcr)
+{ OBJECT bt[2], ft[2], y, link, gaplink, g;  register FULL_CHAR *p;
+  OBJECT res, res_env, res_env2, hold_env, hold_env2, z, prev;
+  OBJECT link1, link2, x1, x2, y1, y2;
+  int par, num1, num2;  GAP res_gap;  unsigned res_inc;  STYLE new_style;
+  BOOLEAN done, multiline;  FULL_CHAR ch;  float scale_factor;
+  static int depth = 0;
+#if DEBUG_ON
+  static unsigned int debug_type[MAX_DEPTH];
+  static OBJECT	      debug_actual[MAX_DEPTH];
+  static int	      debug_lnum[MAX_DEPTH];
+  BOOLEAN eee = (*enclose != nilobj);
+  debug_type[depth] = type(x);
+  debug_lnum[depth] = line_num(fpos(x));
+  if( type(x) == CLOSURE ) debug_actual[depth] = actual(x);
+  depth++;
+  if( depth == MAX_DEPTH )
+  { Error(8, 20, "maximum depth of symbol expansion (%d) reached",
+      WARN, &fpos(x), MAX_DEPTH);
+    Error(8, 21, "the symbols currently being expanded are:", WARN, &fpos(x));
+    while( --depth >= 0 )
+    {
+      Error(8, 22, "at %d: %d %s %s", WARN, &fpos(x), depth, debug_lnum[depth],
+	Image(debug_type[depth]), debug_type[depth] == CLOSURE ?
+	  FullSymName(debug_actual[depth], AsciiToFull(".")) : STR_EMPTY);
+    }
+    Error(8, 23, "exiting now", FATAL, &fpos(x));
+  }
+#else
+  depth++;
+  if( depth == MAX_DEPTH )
+  {
+    Error(8, 40, "maximum depth of symbol expansion (%d) reached",
+      FATAL, &fpos(x), MAX_DEPTH);
+  }
+#endif
+
+  debug2(DOM, DD,   "[Manifest(%s %s )", Image(type(x)), EchoObject(x));
+  debug1(DOM, DD,  "  environment: %s", EchoObject(env));
+  debug6(DOM, DD,  "  style: %s;  target: %s;  threads: %s%s%s%s",
+	EchoStyle(style), SymName(*target),
+	bthr[COLM] ? " up"    : "",  fthr[COLM] ? " down"  : "",
+	bthr[ROWM] ? " left"  : "",  fthr[ROWM] ? " right" : "");
+  debugcond2(DHY, DD, eee, "[ Manifest(%s, *enclose = %s)",
+    EchoObject(x), EchoObject(*enclose));
+
+  switch( type(x) )
+  {
+
+    case ENV_OBJ:
+
+      debug0(DHY, DD, "[Manifest env_obj:");
+      ifdebug(DHY, DD, DebugObject(x));
+      Child(y, Down(x));
+      Child(res_env, NextDown(Down(x)));
+      assert( type(res_env) == ENV, "Manifest/ENV_OBJ: res_env!");
+      y = Manifest(y, res_env, style, bthr, fthr, target, crs, ok, TRUE, enclose, fcr);
+      /* we always expand children of ENV_OBJ (need_expand == TRUE) */
+      ReplaceNode(y, x);
+      DisposeObject(x);
+      x = y;
+      debug1(DHY, DD, "]Manifest env_obj returning %s", EchoObject(x));
+      break;
+
+
+    case CLOSURE:
+    
+      x = ManifestCl(x, env, style, bthr, fthr, target, crs, ok, need_expand, enclose, fcr);
+      break;
+
+
+    case PAGE_LABEL:
+
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      y = ReplaceWithTidy(y, TRUE);
+      ReplaceWithSplit(x, bthr, fthr);
+      break;
+
+
+    case NULL_CLOS:
+
+      StyleCopy(save_style(x), *style);
+      ReplaceWithSplit(x, bthr, fthr);
+      break;
+
+
+    case CROSS:
+    case FORCE_CROSS:
+    
+      assert( Down(x) != x && LastDown(x) != Down(x), "Manifest: CROSS child!");
+      if( !fcr )  /* stop if fcr, i.e. if purpose was to find a cross-reference */
+      {
+        debug0(DCR, DD, "  calling CrossExpand from Manifest/CROSS");
+        Child(y, Down(x));
+        if( type(y) == CLOSURE )
+        {
+	  /* *** want cross ref now always, not only if ok
+	  x = CrossExpand(x, env, style, ok, crs, &res_env);
+	  *** */
+	  x = CrossExpand(x, env, style, crs, &res_env);
+          assert( type(x) == CLOSURE, "Manifest/CROSS: type(x)!" );
+          New(hold_env, ACAT);  Link(hold_env, res_env);
+          /* expand here (calling Manifest immediately makes unwanted cr) */
+          debug0(DCE, DD, "  calling ClosureExpand from Manifest/CROSS");
+          x = ClosureExpand(x, res_env, FALSE, crs, &res_env2);
+          New(hold_env2, ACAT);  Link(hold_env2, res_env2);
+          x = Manifest(x, res_env2, style, bthr, fthr, target, crs, ok, TRUE, enclose, fcr);
+          DisposeObject(hold_env);
+          DisposeObject(hold_env2);
+        }
+        else
+        { y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+          ReplaceNode(y, x);
+          DisposeObject(x);
+          x = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+        }
+      }
+      break;
+
+
+    case WORD:
+    case QWORD:
+    
+      if( !ok || *crs == nilobj )
+      {	word_font(x) = font(*style);
+	word_colour(x) = colour(*style);
+	word_language(x) = language(*style);
+	word_hyph(x) = hyph_style(*style) == HYPH_ON;
+	debug3(DOM, DDD, "  manfifest/WORD underline() := %s for %s %s",
+	  "UNDER_OFF", Image(type(x)), EchoObject(x));
+	if( small_caps(*style) && ok )  x = MapSmallCaps(x, style);
+	underline(x) = UNDER_OFF;
+	ReplaceWithSplit(x, bthr, fthr);
+	break;
+      }
+      New(y, ACAT);
+      FposCopy(fpos(y), fpos(x));
+      ReplaceNode(y, x);
+      Link(y, x);  x = y;
+      /* NB NO BREAK! */
+
+
+    case ACAT:
+    
+      StyleCopy(save_style(x), *style);
+      adjust_cat(x) = padjust(*style);
+      StyleCopy(new_style, *style);
+      padjust(new_style) = FALSE;
+      assert(Down(x) != x, "Manifest: ACAT!" );
+      link = Down(x);  Child(y, link);
+      assert( type(y) != GAP_OBJ, "Manifest ACAT: GAP_OBJ is first!" );
+      multiline = FALSE;
+
+      /* manifest first child and insert any cross references */
+      if( is_word(type(y)) )
+      { word_font(y) = font(*style);
+	word_colour(y) = colour(*style);
+	word_language(y) = language(*style);
+	word_hyph(y) = hyph_style(*style) == HYPH_ON;
+	if( small_caps(*style) && ok )  y = MapSmallCaps(y, style);
+      }
+      else y = Manifest(y, env, &new_style, nbt, nft, target, crs, ok, FALSE, enclose, fcr);
+      debug3(DOM, DDD, "  manfifest/ACAT1 underline() := %s for %s %s",
+	"UNDER_OFF", Image(type(y)), EchoObject(y));
+      underline(y) = UNDER_OFF;
+      /* ??? if( is_word(type(y)) ) */
+      if( ok && *crs != nilobj )
+      {	
+	debug1(DCR, DD, "  insinuating %s", EchoObject(*crs));
+	TransferLinks(Down(*crs), *crs, link);
+	DisposeObject(*crs);
+	*crs = nilobj;
+      }
+      prev = y;
+
+      /* manifest subsequent gaps and children */
+      for( gaplink = Down(link);  gaplink != x;  gaplink = NextDown(link) )
+      {
+	Child(g, gaplink);
+	assert( type(g) == GAP_OBJ, "Manifest ACAT: no GAP_OBJ!" );
+        debug3(DOM, DDD, "  manfifest/ACAT2 underline() := %s for %s %s",
+	  "UNDER_OFF", Image(type(g)), EchoObject(g));
+        underline(g) = UNDER_OFF;
+	link = NextDown(gaplink);
+	assert( link != x, "Manifest ACAT: GAP_OBJ is last!" );
+	Child(y, link);
+	assert( type(y) != GAP_OBJ, "Manifest ACAT: double GAP_OBJ!" );
+
+	/* manifest the next child */
+        debug1(DOM, DD, "  in ACAT (3), style = %s", EchoStyle(style));
+	if( is_word(type(y)) )
+	{ word_font(y) = font(*style);
+	  word_colour(y) = colour(*style);
+	  word_language(y) = language(*style);
+	  word_hyph(y) = hyph_style(*style) == HYPH_ON;
+	  if( small_caps(*style) && ok )  y = MapSmallCaps(y, style);
+	}
+	else y = Manifest(y, env, &new_style, nbt, nft, target, crs, ok, FALSE, enclose, fcr);
+        debug3(DOM, DDD, "  manifest/ACAT3 underline() := %s for %s %s",
+	  "UNDER_OFF", Image(type(y)), EchoObject(y));
+        underline(y) = UNDER_OFF;
+
+	/* manifest the gap object */
+	if( Down(g) != g )
+	{
+	  /* explicit & operator whose value is the child of g */
+	  Child(z, Down(g));
+	  z = Manifest(z, env, &new_style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+	  z = ReplaceWithTidy(z, FALSE);
+	  GetGap(z, style, &gap(g), &res_inc);
+	  vspace(g) = hspace(g) = 0;
+	}
+	else
+	{
+	  /* implicit & operator */
+	  GapCopy(gap(g), space_gap(*style));
+	  switch( space_style(*style) )
+	  {
+	    case SPACE_LOUT:
+
+	      /* usual Lout spacing, the number of white space characters */
+	      width(gap(g)) = width(gap(g)) * (vspace(g) + hspace(g));
+	      break;
+
+
+	    case SPACE_COMPRESS:
+
+	      /* either zero or one space */
+	      if( vspace(g) + hspace(g) == 0 )
+	      { width(gap(g)) = 0;
+	      }
+	      else
+	      { /* else width is like one space, so OK as is */
+	      }
+	      break;
+
+
+	    case SPACE_SEPARATE:
+
+	      /* exactly one space always, so do nothing further */
+	      break;
+
+
+	    case SPACE_TROFF:
+
+	      /* Lout spacing plus one extra space for sentence end at eoln */
+	      width(gap(g)) = width(gap(g)) * (vspace(g) + hspace(g));
+	      debugcond2(DLS, DD, vspace(g) > 0, "  prev = %s %s",
+		Image(type(prev)), EchoObject(prev));
+	      if( vspace(g) > 0 )
+	      { 
+		/* set z to the preceding object; may need to search ACATs! */
+		z = prev;
+		while( type(z) == ACAT
+		       || type(z) == ONE_COL || type(z) == ONE_ROW
+		       || type(z) == HCONTRACT || type(z) == VCONTRACT )
+		{ Child(z, LastDown(z));
+		}
+
+		/* if preceding object is a word, check for end sentence */
+		if( is_word(type(z)) )
+		{
+		  for( p = string(z);  *p != '\0';  p++ );
+		  debug4(DLS, DD, "  prev = %s, last = %c, LSE = %s, LWES = %s",
+		    EchoObject(z), *(p-1), bool(LanguageSentenceEnds[*(p-1)]),
+		    bool(LanguageWordEndsSentence(z, FALSE)));
+		  if( p != string(z) && LanguageSentenceEnds[*(p-1)]
+		      && LanguageWordEndsSentence(z, FALSE) )
+		    width(gap(g)) += width(space_gap(*style));
+		}
+	      }
+	      break;
+
+
+	    case SPACE_TEX:
+
+	      if( vspace(g) + hspace(g) == 0 )
+	      {
+		/* zero spaces gives zero result, as for compress above */
+		width(gap(g)) = 0;
+	      }
+	      else
+	      {
+	        /* set z to the preceding object; may need to search ACATs! */
+	        z = prev;
+		while( type(z) == ACAT
+		       || type(z) == ONE_COL || type(z) == ONE_ROW
+		       || type(z) == HCONTRACT || type(z) == VCONTRACT )
+	        { Child(z, LastDown(z));
+	        }
+
+	        /* one extra space if preceding is word ending sentence */
+	        if( is_word(type(z)) )
+	        {
+		  for( p = string(z);  *p != '\0';  p++ );
+		  debug4(DLS, DD, "  prev = %s, last = %c, LSE = %s, LWES = %s",
+		      EchoObject(z), *(p-1), bool(LanguageSentenceEnds[*(p-1)]),
+		      bool(LanguageWordEndsSentence(z, TRUE)));
+		  if( p != string(z) && LanguageSentenceEnds[*(p-1)]
+		      && LanguageWordEndsSentence(z, TRUE) )
+		    width(gap(g)) += width(space_gap(*style));
+	        }
+	      }
+	      break;
+
+
+	    default:
+
+	      assert(FALSE, "Manifest: unexpected space_style!");
+	      break;
+	  }
+	  nobreak(gap(g)) = (width(gap(g)) == 0);
+	  if( line_breaker(g) && is_definite(type(y)) )  multiline = TRUE;
+	}
+        debug1(DOM, DD, "  in ACAT, gap = %s", EchoLength(width(gap(g))));
+
+	/* compress adjacent juxtaposed words of equal font, etc. */
+	if( is_word(type(y)) && width(gap(g)) == 0 && nobreak(gap(g)) &&
+	    vspace(g)+hspace(g)==0 &&
+	    units(gap(g)) == FIXED_UNIT && mode(gap(g)) == EDGE_MODE &&
+	    prev != nilobj && is_word(type(prev)) && !mark(gap(g)) &&
+	    word_font(prev) == word_font(y) &&
+	    word_colour(prev) == word_colour(y) &&
+	    word_language(prev) == word_language(y) )
+	    /* no need to compare underline() since both are false */
+	{ unsigned typ;
+	  assert( underline(prev) == UNDER_OFF, "Manifest/ACAT: underline(prev)!" );
+	  assert( underline(y) == UNDER_OFF, "Manifest/ACAT: underline(y)!" );
+	  if( StringLength(string(prev))+StringLength(string(y)) >= MAX_BUFF )
+	    Error(8, 24, "word %s%s is too long",
+	      FATAL, &fpos(prev), string(prev), string(y));
+	  z = y;
+	  typ = type(prev) == QWORD || type(y) == QWORD ? QWORD : WORD;
+	  y = MakeWordTwo(typ, string(prev), string(y), &fpos(prev));
+	  word_font(y) = word_font(prev);
+	  word_colour(y) = word_colour(prev);
+	  word_language(y) = word_language(prev);
+	  word_hyph(y) = word_hyph(prev);
+	  underline(y) = UNDER_OFF;
+          debug3(DOM, DDD, "  manifest/ACAT4 underline() := %s for %s %s",
+	    "UNDER_OFF", Image(type(y)), EchoObject(y));
+	  MoveLink(link, y, CHILD);
+	  DisposeObject(z);
+	  DisposeChild(Up(prev));
+	  DisposeChild(gaplink);
+	}
+	prev = y;
+
+	/* insinuate any cross-references */
+	if( ok && *crs != nilobj )
+	{
+	  debug1(DCR, DD, "  insinuating %s", EchoObject(*crs));
+	  TransferLinks(Down(*crs), *crs, link);
+	  DisposeObject(*crs);
+	  *crs = nilobj;
+	}
+      }
+
+      /* implement FILL_OFF break option if required */
+      if( ok && multiline && fill_style(*style) == FILL_UNDEF )
+	Error(8, 25, "missing %s symbol or option", FATAL, &fpos(x), KW_BREAK);
+      if( ok && multiline && fill_style(*style) == FILL_OFF )
+      {	OBJECT prev_acat, new_acat;  BOOLEAN jn;
+
+	/* compress any ACAT children of ACAT x */
+	for( link = x;  NextDown(link) != x;  link = NextDown(link) )
+	{ Child(y, NextDown(link));
+	  if( type(y) == ACAT )
+	  { TransferLinks(Down(y), y, NextDown(link));
+	    DisposeChild(Up(y));
+	    link = PrevDown(link);
+	  }
+	}
+
+	/* do line breaks now */
+	prev_acat = x;
+	New(x, VCAT);
+	adjust_cat(x) = FALSE;
+	ReplaceNode(x, prev_acat);
+	Link(x, prev_acat);
+	FirstDefinite(prev_acat, link, y, jn);
+	if( link != prev_acat )
+	{
+	  NextDefiniteWithGap(prev_acat, link, y, g, jn);
+	  while( link != prev_acat )
+	  {
+	    if( mode(gap(g)) != NO_MODE && line_breaker(g) )
+	    { OBJECT glink = PrevDown(Up(g));
+	      debug2(DOM, DD, "lines gap just before definite %s at %s",
+		Image(type(y)), EchoFilePos(&fpos(y)));
+	      MoveLink(NextDown(glink), x, PARENT);
+	      GapCopy(gap(g), line_gap(*style));
+	      width(gap(g)) *= find_max(1, vspace(g));
+	      New(new_acat, ACAT);
+	      adjust_cat(new_acat) = padjust(*style);
+	      FposCopy(fpos(new_acat), fpos(g));
+	      if( hspace(g) > 0 )
+	      { z = MakeWord(WORD, STR_EMPTY, &fpos(g));
+	        word_font(z) = font(*style);
+	        word_colour(z) = colour(*style);
+	        word_language(z) = language(*style);
+	        word_hyph(z) = hyph_style(*style) == HYPH_ON;
+		underline(z) = UNDER_OFF;
+	        Link(new_acat, z);
+	        New(z, GAP_OBJ);
+	        hspace(z) = hspace(g);
+	        vspace(z) = 0;
+	        underline(z) = UNDER_OFF;
+	        GapCopy(gap(z), space_gap(*style));
+	        width(gap(z)) *= hspace(z);
+	        Link(new_acat, z);
+	      }
+	      TransferLinks(NextDown(glink), prev_acat, new_acat);
+	      StyleCopy(save_style(new_acat), *style);
+	      Link(x, new_acat);
+	      prev_acat = new_acat;
+	      glink = prev_acat;
+	    }
+	    NextDefiniteWithGap(prev_acat, link, y, g, jn);
+	  }
+	}
+
+	/* remove any singleton ACAT objects under x, if they are VCATs */
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ Child(y, link);
+	  if( type(y) == ACAT && Down(y) == LastDown(y) )
+	  { Child(z, Down(y));
+	    if( type(z) == VCAT )
+	    { MoveLink(link, z, CHILD);
+	      DisposeObject(y);
+	    }
+	  }
+	}
+      }
+
+      ReplaceWithSplit(x, bthr, fthr);
+      break;
+
+
+    case HCAT:
+    case VCAT:
+
+     x = ManifestCat(x, env, style, bthr, fthr, target, crs, ok, need_expand,
+       enclose, fcr);
+     break;
+
+
+    case WIDE:
+    case HIGH:
+    
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      y = ReplaceWithTidy(y, FALSE);
+      GetGap(y, style, &res_gap, &res_inc);
+      if( res_inc != GAP_ABS || mode(res_gap) != EDGE_MODE ||
+	units(res_gap) != FIXED_UNIT )
+      {	Error(8, 26, "replacing invalid left parameter of %s by 2i",
+	  WARN, &fpos(y), Image(type(x)) );
+	units(res_gap) = FIXED_UNIT;
+	width(res_gap) = 2*IN;
+      }
+      SetConstraint(constraint(x), MAX_FULL_LENGTH, width(res_gap), MAX_FULL_LENGTH);
+      DisposeChild(Down(x));
+      goto ETC;		/* two cases down from here */
+
+
+    case HSHIFT:
+    case VSHIFT:
+
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      y = ReplaceWithTidy(y, FALSE);
+      GetGap(y, style, &shift_gap(x), &res_inc);
+      shift_type(x) = res_inc;
+      if( mode(shift_gap(x)) != EDGE_MODE || 
+	  (units(shift_gap(x))!=FIXED_UNIT && units(shift_gap(x))!=NEXT_UNIT) )
+      {	Error(8, 27, "replacing invalid left parameter of %s by +0i",
+	  WARN, &fpos(y), Image(type(x)) );
+	shift_type(x) = GAP_INC;
+	units(shift_gap(x)) = FIXED_UNIT;
+	width(shift_gap(x)) = 0;
+	mode(shift_gap(x)) = EDGE_MODE;
+      }
+      DisposeChild(Down(x));
+      goto ETC;		/* next case down from here */
+
+
+    case HCONTRACT:
+    case VCONTRACT:
+    case HLIMITED:
+    case VLIMITED:
+    case HEXPAND:
+    case VEXPAND:
+    case ONE_COL:
+    case ONE_ROW:
+    
+      ETC:
+      par = (type(x)==ONE_COL || type(x)==HEXPAND || type(x) == HCONTRACT ||
+	   type(x)==HLIMITED || type(x)==WIDE || type(x)==HSHIFT) ? COLM : ROWM;
+      Child(y, Down(x));
+
+      /* manifest the child, propagating perp threads and suppressing pars */
+      bt[par] = ft[par] = nilobj;
+      bt[1-par] = bthr[1-par];  ft[1-par] = fthr[1-par];
+      y = Manifest(y, env, style, bt, ft, target, crs, ok, FALSE, enclose, fcr);
+
+      /* replace with split object if par threads needed */
+      bt[par] = bthr[par];  ft[par] = fthr[par];
+      bt[1-par] = ft[1-par] = nilobj;
+      ReplaceWithSplit(x, bt, ft);
+      break;
+
+
+    case HSPAN:
+    case VSPAN:
+
+      ReplaceWithSplit(x, bthr, fthr);
+      break;
+
+
+    case ROTATE:
+
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      y = ReplaceWithTidy(y, FALSE);
+      GetGap(y, style, &res_gap, &res_inc);
+      if( res_inc != GAP_ABS || mode(res_gap) != EDGE_MODE ||
+		units(res_gap) != DEG_UNIT )
+      {	Error(8, 28, "replacing invalid left parameter of %s by 0d",
+	  WARN, &fpos(y), Image(type(x)) );
+	units(res_gap) = DEG_UNIT;
+	width(res_gap) = 0;
+      }
+      sparec(constraint(x)) = width(res_gap);
+      DisposeChild(Down(x));
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, target, crs, ok, FALSE,enclose,fcr);
+      ReplaceWithSplit(x, bthr, fthr);
+      break;
+
+
+    case BACKGROUND:
+
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, target, crs, ok, FALSE,enclose,fcr);
+      Child(y, LastDown(x));
+      y = Manifest(y, env, style, nbt, nft, target, crs, ok, FALSE,enclose,fcr);
+      ReplaceWithSplit(x, bthr, fthr);
+      break;
+
+
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case HSCALE:
+    case VSCALE:
+    case HCOVER:
+    case VCOVER:
+
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, target, crs, ok, FALSE,enclose,fcr);
+      ReplaceWithSplit(x, bthr, fthr);
+      break;
+
+
+    case SCALE:
+
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      y = ReplaceWithTidy(y, FALSE);
+      if( is_word(type(y)) && StringEqual(string(y), STR_EMPTY) )
+      {
+	/* missing scale factor, meaning to be inserted automatically */
+        bc(constraint(x)) = fc(constraint(x)) = 0;  /* work out later */
+      }
+      else if( type(y) != ACAT )
+      {
+	/* presumably one word, common factor for horizontal and vertical */
+	scale_factor = GetScaleFactor(y);
+        bc(constraint(x)) = fc(constraint(x)) = scale_factor * SF;
+      }
+      else
+      {
+	/* get horizontal scale factor */
+	Child(z, Down(y));
+	scale_factor = GetScaleFactor(z);
+        bc(constraint(x)) = scale_factor * SF;
+
+	/* get vertical scale factor */
+	Child(z, LastDown(y));
+	scale_factor = GetScaleFactor(z);
+        fc(constraint(x)) = scale_factor * SF;
+      }
+      DisposeChild(Down(x));
+      Child(y, LastDown(x));
+      y = Manifest(y, env, style, nbt, nft, target, crs, ok, FALSE, enclose, fcr);
+      ReplaceWithSplit(x, bthr, fthr);
+      break;
+
+
+    case KERN_SHRINK:
+
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      Child(y, LastDown(x));
+      y = Manifest(y, env, style, nbt, nft, target, crs, ok, FALSE, enclose, fcr);
+      ReplaceWithSplit(x, bthr, fthr);
+      break;
+
+
+    case YIELD:
+
+      Error(8, 29, "%s not expected here", FATAL, &fpos(x), KW_YIELD);
+      break;
+
+
+    case RAW_VERBATIM:
+    case VERBATIM:
+
+      Child(y, Down(x));
+      y = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      DeleteLink(Down(x));
+      MergeNode(y, x);  x = y;
+      break;
+
+
+    case CASE:
+
+      x = ManifestCase(x,env,style, bthr, fthr, target, crs, ok, need_expand, enclose, fcr);
+      break;
+
+
+    case BACKEND:
+
+      res = MakeWord(WORD, BackEndWord, &fpos(x));
+      ReplaceNode(res, x);
+      DisposeObject(x);
+      x = Manifest(res, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      break;
+
+
+    case XCHAR:
+
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      y = ReplaceWithTidy(y, FALSE);
+      if( !is_word(type(y)) )
+      {	Error(8, 30, "%s dropped (parameter is not a simple word)",
+	  WARN, &fpos(y), KW_XCHAR);
+	res = MakeWord(WORD, STR_EMPTY, &fpos(x));
+      }
+      else if( (word_font(y) = font(*style)) == 0 )
+      {	Error(8, 31, "%s dropped (no current font at this point)",
+	  WARN, &fpos(y), KW_XCHAR);
+	res = MakeWord(WORD, STR_EMPTY, &fpos(x));
+      }
+      else
+      { ch = MapCharEncoding(string(y), FontMapping(word_font(y), &fpos(y)));
+        if( ch == '\0' )
+        { type(y) = QWORD;
+	  Error(8, 32, "%s dropped (character %s unknown in font %s)",
+	    WARN, &fpos(y), KW_XCHAR, StringQuotedWord(y),
+	    FontFamilyAndFace(word_font(y)));
+	  res = MakeWord(WORD, STR_EMPTY, &fpos(x));
+        }
+        else
+        { res = MakeWord(QWORD, STR_SPACE, &fpos(x));
+	  string(res)[0] = ch;
+        }
+      }
+      ReplaceNode(res, x);
+      DisposeObject(x);
+      x = Manifest(res, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      break;
+
+
+    case CURR_LANG:
+
+      if( language(*style) == 0 )
+      { Error(8, 33, "no current language at this point, using %s",
+	  WARN, &fpos(x), STR_NONE);
+	res = MakeWord(WORD, STR_NONE, &fpos(x));
+      }
+      else res = MakeWord(WORD, LanguageString(language(*style)), &fpos(x));
+      ReplaceNode(res, x);
+      DisposeObject(x);
+      x = Manifest(res, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      break;
+
+
+    case CURR_FAMILY:
+    case CURR_FACE:
+
+      if( font(*style) == 0 )
+      { Error(8, 38, "no current font at this point, using %s",
+	  WARN, &fpos(x), STR_NONE);
+	res = MakeWord(WORD, STR_NONE, &fpos(x));
+      }
+      else if( type(x) == CURR_FAMILY )
+	res = MakeWord(WORD, FontFamily(font(*style)), &fpos(x));
+      else
+	res = MakeWord(WORD, FontFace(font(*style)), &fpos(x));
+      ReplaceNode(res, x);
+      DisposeObject(x);
+      x = Manifest(res, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      break;
+
+
+    case FONT:
+    case SPACE:
+    case YUNIT:
+    case ZUNIT:
+    case BREAK:
+    case COLOUR:
+    case LANGUAGE:
+    
+      assert( Down(x) != x && NextDown(Down(x)) != x, "Manifest: FONT!" );
+      StyleCopy(new_style, *style);
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      y = ReplaceWithTidy(y, type(x) == COLOUR);
+      switch( type(x) )
+      {
+	case FONT:	FontChange(&new_style, y);
+			break;
+
+	case SPACE:	SpaceChange(&new_style, y);
+			break;
+
+	case YUNIT:	YUnitChange(&new_style, y);
+			break;
+
+	case ZUNIT:	ZUnitChange(&new_style, y);
+			break;
+
+	case BREAK:	BreakChange(&new_style, y);
+			break;
+	
+	case COLOUR:	ColourChange(&new_style, y);
+			break;
+
+	case LANGUAGE:	LanguageChange(&new_style, y);
+			break;
+
+      }
+      DisposeChild(Down(x));
+      Child(y, Down(x));
+      y = Manifest(y, env, &new_style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      DeleteLink(Down(x));
+      MergeNode(y, x);  x = y;
+      break;
+
+
+    case PADJUST:
+    case HADJUST:
+    case VADJUST:
+
+      StyleCopy(new_style, *style);
+      if(      type(x) == VADJUST )  vadjust(new_style) = TRUE;
+      else if( type(x) == HADJUST )  hadjust(new_style) = TRUE;
+      else                           padjust(new_style) = TRUE;
+      Child(y, Down(x));
+      y = Manifest(y, env, &new_style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      DeleteLink(Down(x));
+      MergeNode(y, x);  x = y;
+      break;
+
+
+    case UNDERLINE:
+
+      /* change x to an ACAT and set the underline flags in its child */
+      assert( Down(x) != x && NextDown(Down(x)) == x, "Manifest: UNDERLINE!" );
+      type(x) = ACAT;
+      adjust_cat(x) = padjust(*style);
+      padjust(*style) = FALSE;
+      StyleCopy(save_style(x), *style);
+      Child(y, Down(x));
+      y = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      SetUnderline(x);
+      break;
+
+
+    case MELD:
+    case COMMON:
+    case RUMP:
+
+      assert( Down(x) != x && NextDown(Down(x)) != x, "Manifest: COMMON!" );
+      debug2(DHY, DDD, "[Manifest %s %s", EchoObject(x), EchoObject(env));
+
+      /* find the first child of x, make sure it is an ACAT, and manifest */
+      Child(x1, Down(x));
+      if( type(x1) != ACAT )
+      { OBJECT newx1;
+	New(newx1, ACAT);
+        adjust_cat(newx1) = padjust(*style);
+	padjust(*style) = FALSE;
+        MoveLink(Down(x), newx1, CHILD);
+        Link(newx1, x1);
+        x1 = newx1;
+      }
+      x1 = Manifest(x1, env, style, nbt, nft, target, crs, ok, FALSE, enclose, fcr);
+      link1 = x1;
+      while( NextDown(link1) != x1 )
+      { Child(z, NextDown(link1));
+	if( type(z) == ACAT )
+	{ TransferLinks(Down(z), z, NextDown(link1));
+	  DisposeChild(Up(z));
+	}
+	else link1 = NextDown(link1);
+      }
+      debug1(DHY, DDD, "  manifested x1 = %s", EchoObject(x1));
+ 
+      /* find the second child of x, make sure it is an ACAT, and manifest */
+      Child(x2, NextDown(Down(x)));
+      if( type(x2) != ACAT )
+      { OBJECT newx2;
+	New(newx2, ACAT);
+        adjust_cat(newx2) = padjust(*style);
+	padjust(*style) = FALSE;
+        MoveLink(NextDown(Down(x)), newx2, CHILD);
+        Link(newx2, x2);
+        x2 = newx2;
+      }
+      x2 = Manifest(x2, env, style, nbt, nft, target, crs, ok, FALSE, enclose, fcr);
+      link2 = x2;
+      while( NextDown(link2) != x2 )
+      { Child(z, NextDown(link2));
+	if( type(z) == ACAT )
+	{ TransferLinks(Down(z), z, NextDown(link2));
+	  DisposeChild(Up(z));
+	}
+	else link2 = NextDown(link2);
+      }
+      debug1(DHY, DDD, "  manifested x2 = %s", EchoObject(x2));
+     
+      if( type(x) == MELD )
+      {
+        /* if Meld, result is Meld(x1, x2) */
+        res = Meld(x1, x2);
+      }
+      else
+      {
+
+        /* find the point where x1 and x2 begin to differ */
+        link1 = Down(x1);
+        link2 = Down(x2);
+        while( link1 != x1 && link2 != x2 )
+        {
+	  Child(y1, link1);
+	  Child(y2, link2);
+	  debug1(DHY, DDD, "    y1 = %s", EchoObject(y1));
+	  debug1(DHY, DDD, "    y2 = %s", EchoObject(y2));
+	  if( is_word(type(y1)) && is_word(type(y2)) )
+	  {
+	    if( !StringEqual(string(y1), string(y2)) )  break;
+	  }
+	  else if( type(y1) != type(y2) )  break;
+	  link1 = NextDown(link1);
+	  link2 = NextDown(link2);
+        }
+
+        /* if COMMON, result is x1 or x2 if either ran out,             */
+        /* or else x2 (say) up to but not including link2 and prec gap  */
+        if( type(x) == COMMON )
+        { if( link2 == x2 )
+	  { res = x2;
+	  }
+	  else if( link1 == x1 )
+	  { res = x1;
+	  }
+	  else
+	  { if( link2 == Down(x2) )
+	      res = MakeWord(WORD, STR_EMPTY, &fpos(x2));
+	    else
+	    { TransferLinks(PrevDown(link2), x2, x1);
+	      res = x2;
+	    }
+	  }
+        }
+
+        /* if RUMP, result is x2 starting from link2 or NextDown(link2) */
+        else if( type(x) == RUMP )
+        { if( link2 == x2 )
+	    res = MakeWord(WORD, STR_EMPTY, &fpos(x2));
+	  else if( link1 == x1 )
+	  { 
+	    TransferLinks(Down(x2), NextDown(link2), x1);
+	    res = x2;
+	  }
+	  else /* link1 != x1 */
+	  {
+	    TransferLinks(Down(x2), link2, x1);
+	    res = x2;
+	  }
+        }
+      }
+
+      /* now res replaces x */
+      ReplaceNode(res, x);
+      DisposeObject(x);
+      x = res;
+      ReplaceWithSplit(x, bthr, fthr);
+      debug1(DHY, DDD, "]Manifest returning %s", EchoObject(x));
+      break;
+
+
+    case INSERT:
+
+      /* manifest and detach the left parameter, call it z */
+      Child(z, Down(x));
+      z = Manifest(z, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      DeleteLink(Down(x));
+
+      /* manifest the right parameter and make it the result */
+      Child(y, LastDown(x));
+      y = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      DeleteLink(LastDown(x));
+      MergeNode(y, x);  x = y;
+
+      /* now find the reattachment point for z down inside the result, x */
+      x = InsertObject(x, &z, style);
+      if( z != nilobj )
+      { Error(8, 34, "object dropped by %s: no suitable insert point", WARN,
+	  &fpos(x), KW_INSERT);
+	DisposeObject(z);
+      }
+      break;
+
+
+    case ONE_OF:
+
+      Child(y, Down(x));
+      if( type(y) != ACAT )
+      {
+	/* child is not a sequence of choices, so ignore ONE_OF */
+	Error(8, 39, "%s ignored: no choices in right parameter", WARN,
+	  &fpos(x), KW_ONE_OF);
+        y = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE,
+	      enclose, fcr);
+        DeleteLink(Down(x));
+        MergeNode(y, x);  x = y;
+      }
+      else
+      {
+	/* try each child in turn; result is first to find *target */
+	OBJECT target_before;
+	for( link = Down(y);  link != y;  link = NextDown(link) )
+	{
+	  Child(z, link);
+	  if( type(z) == GAP_OBJ )  continue;
+	  target_before = *target;
+	  z = Manifest(z, env, style, bthr, fthr, target, crs, ok, FALSE,
+	    enclose, fcr);
+	  if( *target != target_before )
+	    break;
+	}
+	DeleteLink(Up(z));
+	ReplaceNode(z, x);
+	DisposeObject(x);
+	x = z;
+      }
+      break;
+
+
+    case NEXT:
+
+      assert( Down(x) != x, "Manifest/NEXT: Down(x) == x!" );
+      Child(y, Down(x));
+      debug1(DCS, DD, "  Manifesting Next( %s, 1 )", EchoObject(y));
+      y = Manifest(y, env, style, bthr, fthr, target, crs, FALSE, FALSE, enclose, fcr);
+      debug1(DCS, DD, "  calling Next( %s, 1 )", EchoObject(y));
+      done = FALSE;
+      y = Next(y, 1, &done);
+      debug2(DCS, DD, "  Next(done = %s) returning %s",
+			bool(done), EchoObject(y));
+      DeleteLink(Down(x));
+      MergeNode(y, x);  x = y;
+      break;
+
+
+    case PLUS:
+    case MINUS:
+
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      y = ReplaceWithTidy(y, FALSE);
+      Child(z, NextDown(Down(x)));
+      z = Manifest(z, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      z = ReplaceWithTidy(z, FALSE);
+      if( is_word(type(y)) && sscanf( (char *) string(y), "%d", &num1) == 1 &&
+          is_word(type(z)) && sscanf( (char *) string(z), "%d", &num2) == 1 )
+      {
+	FULL_CHAR buff[MAX_BUFF];
+	sprintf( (char *) buff, "%d", type(x) == PLUS ? num1+num2 : num1-num2);
+	res = MakeWord(WORD, buff, &fpos(x));
+      }
+      else
+      { res = MakeWord(WORD, STR_NOCROSS, &fpos(x));
+      }
+      debug4(DOM, DD, "{ %s } %s { %s } = %s", EchoObject(y), Image(type(x)),
+	EchoObject(z), EchoObject(res));
+      res = Manifest(res, env, style, bthr, fthr, target, crs, FALSE, FALSE, enclose, fcr);
+      ReplaceNode(res, x);
+      DisposeObject(x);
+      x = res;
+      break;
+
+
+    case OPEN:
+
+      debug0(DCR, DD, "  [ Manifest/OPEN begins:");
+      Child(y, Down(x));
+      DeleteLink(Down(x));
+      Child(res, LastDown(x));
+      hold_env = nilobj;
+      if( type(y) == CLOSURE )
+      { AttachEnv(env, y);
+	StyleCopy(save_style(y), *style);
+	debug0(DCR, DDD, "calling SetEnv from Manifest (b)");
+	res_env = SetEnv(y, nilobj);
+	New(hold_env, ACAT);  Link(hold_env, res_env);
+	res = Manifest(res, res_env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      }
+      else if( is_cross(type(y)) )
+      { Child(z, Down(y));
+	if( type(z) == CLOSURE )
+	{ debug0(DCR, DD, "  calling CrossExpand from Manifest/OPEN");
+	  /* *** want cross ref now always, not only if ok
+	  y = CrossExpand(y, env, style, ok, crs, &res_env);
+	  *** */
+	  y = CrossExpand(y, env, style, crs, &res_env);
+	  AttachEnv(res_env, y);
+	  debug0(DCR, DDD, "calling SetEnv from Manifest (c)");
+	  res_env = SetEnv(y, env);
+	  New(hold_env, ACAT);  Link(hold_env, res_env);
+	  res = Manifest(res, res_env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+	}
+	else
+	{ Error(8, 35, "invalid left parameter of %s", WARN, &fpos(y), KW_OPEN);
+	  res = Manifest(res, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+	}
+      }
+      else
+      {	Error(8, 36, "invalid left parameter of %s", WARN, &fpos(y), KW_OPEN);
+	res = Manifest(res, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+      }
+      ReplaceNode(res, x);
+      DisposeObject(x);
+      if( hold_env != nilobj )  DisposeObject(hold_env);
+      x = res;
+      debug0(DCR, DD, "  ] Manifest/OPEN ends");
+      break;
+
+
+    case TAGGED:
+
+      x = ManifestTg(x, env, style, bthr, fthr, target, crs, ok, need_expand, enclose, fcr);
+      debug2(DCR, DD, "Manifest returning %ld %s", (long) x, EchoObject(x));
+      break;
+
+
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+
+      debug1(DRS, DD, "  graphic style in Manifest = %s", EchoStyle(style));
+      Child(y, LastDown(x));
+      y = Manifest(y, env, style, nbt, nft, target, crs, ok, FALSE, enclose, fcr);
+      StyleCopy(save_style(x), *style);
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      ReplaceWithSplit(x, bthr, fthr);
+      break;
+	
+
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+
+      StyleCopy(save_style(x), *style);
+      debug2(DGP, DD, "  manifest at %s (style %s)",
+	EchoObject(x), EchoStyle(&save_style(x)));
+      Child(y, Down(x));
+      y = Manifest(y, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, fcr);
+      y = ReplaceWithTidy(y, FALSE);
+      if( !is_word(type(y)) )
+      { Error(8, 37, "%s deleted (invalid right parameter)", WARN, &fpos(y),
+	  type(x) == INCGRAPHIC ? KW_INCGRAPHIC : KW_SINCGRAPHIC);
+	y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+	ReplaceNode(y, x);  DisposeObject(x);
+	x = Manifest(y, env, style, bthr, fthr, target, crs, ok, FALSE, enclose, fcr);
+	return x;
+      }
+      ReplaceWithSplit(x, bthr, fthr);
+      break;
+	
+
+    default:
+
+      assert1(FALSE, "Manifest:", Image(type(x)));
+      break;
+
+  } /* end switch */
+
+  debug2(DOM, DD, "]Manifest returning %s %s", Image(type(x)), EchoObject(x));
+  debug1(DOM, DD, "  at exit, style = %s", EchoStyle(style));
+  debug1(DOM, DDD, "up:    ", EchoObject(bthr[COLM]));
+  debug1(DOM, DDD, "down:  ", EchoObject(fthr[COLM]));
+  debug1(DOM, DDD, "left:  ", EchoObject(bthr[ROWM]));
+  debug1(DOM, DDD, "right: ", EchoObject(fthr[ROWM]));
+  debugcond1(DHY, DD, eee, "] Manifest returning %s", EchoObject(x));
+  depth--;
+  return x;
+} /* end Manifest */
diff --git a/z09.c b/z09.c
new file mode 100644
index 0000000..6801dd8
--- /dev/null
+++ b/z09.c
@@ -0,0 +1,294 @@
+/*@z09.c:Closure Expansion:SearchEnv()@***************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z09.c                                                      */
+/*  MODULE:       Closure Expansion                                          */
+/*  EXTERNS:      SearchEnv(), SetEnv(), AttachEnv(), GetEnv(),              */
+/*                DetachEnv(), ClosureExpand()                               */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT SearchEnv(env, sym)                                               */
+/*                                                                           */
+/*  Search environment env for a symbol such that actual() == sym.           */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT SearchEnv(OBJECT env, OBJECT sym)
+{ OBJECT link, y;
+  debug2(DCE, DD, "[ SearchEnv(%s, %s)", EchoObject(env), SymName(sym));
+  for(;;)
+  {
+    debug1(DCE, DDD, "  searching env %s", EchoObject(env));
+    assert( env != nilobj && type(env) == ENV, "SearchEnv: env!" );
+    if( Down(env) == env )
+    { debug0(DCE, DD, "] SearchEnv returning <nilobj>");
+      return nilobj;
+    }
+    Child(y, Down(env));
+    assert( type(y) == CLOSURE, "SearchEnv: type(y) != CLOSURE!" );
+    if( actual(y) == sym )
+    { debug1(DCE, DD, "] SearchEnv returning %s", EchoObject(y));
+      return y;
+    }
+    assert( LastDown(y) != y, "SearchEnv: LastDown(y) == y!" );
+    link = LastDown(env) != Down(env) ? LastDown(env) : LastDown(y);
+    Child(env, link);
+  }
+} /* end SearchEnv */
+
+
+/*@::SetEnv(), AttachEnv(), GetEnv(), DetachEnv()@****************************/
+/*                                                                           */
+/*  OBJECT SetEnv(x, y)                                                      */
+/*                                                                           */
+/*  Create a new environment containing x and possibly y.                    */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT SetEnv(OBJECT x, OBJECT y)
+{ OBJECT res;
+  debug1(DCE, DD, "SetEnv( x, %s ), x =", EchoObject(y));
+  ifdebug(DCE, DD, DebugObject(x));
+  assert( x!=nilobj && type(x)==CLOSURE, "SetEnv: x==nilobj or not CLOSURE!" );
+  assert( y==nilobj || type(y)==ENV, "SetEnv: y!=nilobj && type(y) != ENV!" );
+  New(res, ENV);  Link(res, x);
+  if( y != nilobj )  Link(res, y);
+  debug1(DCE, DD, "SetEnv returning %s", EchoObject(res));
+  return res;
+} /* end SetEnv */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  AttachEnv(env, x)                                                        */
+/*                                                                           */
+/*  Attach environment env to CLOSURE x.                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void AttachEnv(OBJECT env, OBJECT x)
+{ debug2(DCE, DD, "AttachEnv( %s, %s )", EchoObject(env), EchoObject(x));
+  assert( env != nilobj && type(env) == ENV, "AttachEnv: type(env) != ENV!" );
+  assert( type(x) == CLOSURE || type(x) == ENV_OBJ, "AttachEnv: type(x)!" );
+  Link(x, env);
+  debug0(DCE, DD, "AttachEnv returning.");
+} /* end AttachEnv */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT GetEnv(x)                                                         */
+/*                                                                           */
+/*  Get from CLOSURE x the environment previously attached.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT GetEnv(OBJECT x)
+{ OBJECT env;
+  assert( type(x) == CLOSURE, "GetEnv: type(x) != CLOSURE!" );
+  assert( LastDown(x) != x, "GetEnv: LastDown(x) == x!" );
+  Child(env, LastDown(x));
+  assert( type(env) == ENV, "GetEnv: type(env) != ENV!" );
+  return env;
+} /* end GetEnv */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT DetachEnv(x)                                                      */
+/*                                                                           */
+/*  Detach from CLOSURE x the environment previously attached.               */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT DetachEnv(OBJECT x)
+{ OBJECT env;
+  debug1(DCE, DD, "DetachEnv( %s )", EchoObject(x));
+  assert( type(x) == CLOSURE, "DetachEnv: type(x) != CLOSURE!" );
+  assert( LastDown(x) != x, "DetachEnv: LastDown(x) == x!" );
+  Child(env, LastDown(x));
+  DeleteLink(LastDown(x));
+  assert( type(env) == ENV, "DetachEnv: type(env) != ENV!" );
+  debug1(DCE, DD, "DetachEnv resturning %s", EchoObject(env));
+  return env;
+} /* end DetachEnv */
+
+
+/*@::ClosureExpand()@*********************************************************/
+/*                                                                           */
+/*  OBJECT ClosureExpand(x, env, crs_wanted, crs, res_env)                   */
+/*                                                                           */
+/*  Return expansion of closure x in environment env.                        */
+/*  The body comes from the environment of x if x is a parameter, else from  */
+/*  the symbol table.  The original x is pushed into the environments.       */
+/*  If crs_wanted and x has a tag, a cross-reference is added to crs.        */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT ClosureExpand(OBJECT x, OBJECT env, BOOLEAN crs_wanted,
+OBJECT *crs, OBJECT *res_env)
+{ OBJECT link, y, res, prnt_env, par, prnt;
+  debug3(DCE, D, "[ ClosureExpand( %s, %s, %s, crs, res_env )",
+    EchoObject(x), EchoObject(env), bool(crs_wanted));
+  assert( type(x) == CLOSURE, "ClosureExpand given non-CLOSURE!");
+  assert( predefined(actual(x)) == FALSE, "ClosureExpand given predefined!" );
+
+  /* add tag to x if needed but not provided;  add cross-reference to crs  */
+  if( has_tag(actual(x)) )  CrossAddTag(x);
+  if( crs_wanted && has_tag(actual(x)) )
+  { OBJECT tmp = CopyObject(x, no_fpos);  AttachEnv(env, tmp);
+    y = CrossMake(actual(x), tmp, CROSS_TARG);
+    New(tmp, CROSS_TARG);  actual(tmp) = y;  Link(tmp, y);
+    if( *crs == nilobj )  New(*crs, CR_LIST);   Link(*crs, tmp);
+  }
+
+  /* case x is a parameter */
+  res = *res_env = nilobj;
+  if( is_par(type(actual(x))) )
+  { prnt = SearchEnv(env, enclosing(actual(x)));
+    if( prnt != nilobj )
+    {
+      prnt_env = GetEnv(prnt);
+      for( link = Down(prnt);  link != prnt;  link = NextDown(link) )
+      { Child(par, link);
+        if( type(par) == PAR && actual(par) == actual(x) )
+        { assert( Down(par) != par, "ExpandCLosure: Down(par)!");
+	  Child(res, Down(par));
+	  if( dirty(enclosing(actual(par))) )
+	  { debug2(DSU, DD, "c %s %s", SymName(actual(par)), EchoObject(res));
+	    res = CopyObject(res, no_fpos);
+	  }
+	  else
+	  { debug2(DCE, DDD, "l %s %s",
+	      FullSymName(actual(par), AsciiToFull(".")), EchoObject(res));
+	    DeleteLink(Down(par));
+	    y = MakeWord(WORD, STR_NOCROSS, &fpos(res));
+	    Link(par, y);
+	  }
+	  ReplaceNode(res, x);
+	  if( type(actual(x)) == RPAR && has_body(enclosing(actual(x))) )
+	  { debug0(DCR, DDD, "  calling SetEnv from ClosureExpand (a)");
+	    *res_env = SetEnv(prnt, nilobj);  DisposeObject(x);
+	  }
+	  else if( type(actual(x)) == NPAR && imports_encl(actual(x)) )
+	  { debug0(DCR, DDD, "  calling SetEnv from ClosureExpand (x)");
+	    AttachEnv(env, x);
+	    *res_env = SetEnv(x, nilobj);
+	  }
+	  else
+	  { AttachEnv(env, x);
+	    debug0(DCR, DDD, "  calling SetEnv from ClosureExpand (b)");
+	    *res_env = SetEnv(x, prnt_env);
+	  }
+	  break;
+        }
+      }
+    }
+    else
+    {
+      /* fail only if there is no default value available */
+      if( sym_body(actual(x)) == nilobj )
+      {
+        debug3(DCE, D, "failing ClosureExpand( %s, crs, %s, %s, res_env )\n",
+	  EchoObject(x), bool(crs_wanted), EchoObject(env));
+        Error(9, 2, "no value for parameter %s of symbol %s:", WARN, &fpos(x),
+	  SymName(actual(x)), SymName(enclosing(actual(x))));
+        Error(9, 1, "symbol with import list misused", FATAL, &fpos(x));
+      }
+    }
+  }
+
+  /* case x is a user-defined symbol or default parameter */
+  if( res == nilobj )
+  { if( sym_body(actual(x)) == nilobj )
+      res = MakeWord(WORD,STR_NOCROSS,&fpos(x));
+    else res = CopyObject(sym_body(actual(x)), &fpos(x));
+    ReplaceNode(res, x);  AttachEnv(env, x);
+    debug0(DCR, DDD, "  calling SetEnv from ClosureExpand (c)");
+    *res_env = SetEnv(x, nilobj);
+  }
+
+  assert( *res_env!=nilobj && type(*res_env)==ENV, "ClosureExpand: *res_env!");
+  debug0(DCE, D, "] ClosureExpand returning, res =");
+  ifdebug(DCE, D, DebugObject(res));
+  debug1(DCE, D, "  environment = %s", EchoObject(*res_env));
+  return res;
+} /* end ClosureExpand */
+
+
+/*@::ParameterCheck()@********************************************************/
+/*                                                                           */
+/*  OBJECT ParameterCheck(x, env)                                            */
+/*                                                                           */
+/*  Check whether object x (which is an actual parameter that happens to be  */
+/*  a CLOSURE) has a value which is a simple word, and if so return a copy   */
+/*  of that word, else nilobj.                                               */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT ParameterCheck(OBJECT x, OBJECT env)
+{ OBJECT link, y, res, prnt_env, par, prnt;
+  debug2(DCE, DD, "ParameterCheck(%s, %s)", EchoObject(x), EchoObject(env));
+  assert( type(x) == CLOSURE, "ParameterCheck given non-CLOSURE!");
+
+  /* case x is a parameter */
+  prnt = SearchEnv(env, enclosing(actual(x)));
+  if( prnt == nilobj )
+  { debug0(DCE, DD, "ParameterCheck returning nilobj (prnt fail)");
+    return nilobj;
+  }
+  prnt_env = GetEnv(prnt);
+  for( link = Down(prnt);  link != prnt;  link = NextDown(link) )
+  { Child(par, link);
+    if( type(par) == PAR && actual(par) == actual(x) )
+    {	assert( Down(par) != par, "ParameterCheck: Down(par)!");
+	Child(y, Down(par));
+	res = is_word(type(y)) ? CopyObject(y, no_fpos) : nilobj;
+	debug1(DCE, DD, "  ParameterCheck returning %s", EchoObject(res));
+	return res;
+    }
+  }
+
+  /* case x is a default parameter */
+  y = sym_body(actual(x));
+  if( y == nilobj )
+  { res = nilobj;
+  }
+  else if( is_word(type(y)) )
+  { res = CopyObject(y, &fpos(y));
+  }
+  else if( type(y) == CLOSURE && is_par(type(actual(y))) )
+  { res = ParameterCheck(y, prnt_env);
+  }
+  else
+  { res = nilobj;
+  }
+  debug1(DCE, DD, "ParameterCheck returning %s", EchoObject(res));
+  return res;
+} /* end ParameterCheck */
diff --git a/z10.c b/z10.c
new file mode 100644
index 0000000..a6d052b
--- /dev/null
+++ b/z10.c
@@ -0,0 +1,1078 @@
+/*@z10.c:Cross References:CrossInit(), CrossMake()@***************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z10.c                                                      */
+/*  MODULE:       Cross References                                           */
+/*  EXTERNS:      CrossInit(), CrossMake(), GallTargEval(), CrossAddTag(),   */
+/*                CrossExpand(), CrossSequence(), CrossClose()               */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define	NO_TARGET	0
+#define	SEEN_TARGET	1
+#define	WRITTEN_TARGET	2
+#define INIT_CROSSREF_NUM	100
+
+static OBJECT RootCross = nilobj;		/* header for all crs        */
+
+/*****************************************************************************/
+/*                                                                           */
+/*  CROSSREF_TABLE                                                           */
+/*                                                                           */
+/*  A symbol table permitting access to cross reference generated tags by    */
+/*  a mapping (symbol x file) -> current tag.                                */
+/*                                                                           */
+/*     crtab_getnext(sym, fnum, S)   Get next value associated with sym,fnum */
+/*     crtab_debug(S, fp)            Debug print of table S to file fp       */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef struct crossref_rec
+{ struct crossref_rec	*crtab_next;
+  OBJECT		crtab_sym;
+  FILE_NUM		crtab_fnum;
+  int			crtab_value;
+} *CROSSREF_ENTRY;
+
+typedef struct
+{ int tab_size;					/* size of table             */
+  int tab_count;				/* number of entries held    */
+  CROSSREF_ENTRY tab_chains[1];			/* the chains of entries     */
+} *CROSSREF_TABLE;
+
+#define	crtab_size(S)	(S)->tab_size
+#define	crtab_count(S)	(S)->tab_count
+#define	crtab_chain(S,i) (S)->tab_chains[i]
+
+#define hash(pos, sym, fnum, S)						\
+{ pos = ( ((long) sym) + fnum ) % crtab_size(S);				\
+}
+
+static CROSSREF_TABLE crtab_new(int newsize)
+{ CROSSREF_TABLE S;  int i;
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_CROSSREF, 1,
+    2*sizeof(int) + newsize*sizeof(CROSSREF_ENTRY)));
+  S = (CROSSREF_TABLE)
+    malloc(2*sizeof(int) + newsize*sizeof(CROSSREF_ENTRY));
+  if( S == (CROSSREF_TABLE) NULL )
+    Error(10, 1, "run out of memory enlarging crossref table", FATAL, no_fpos);
+  crtab_size(S) = newsize;
+  crtab_count(S) = 0;
+  for( i = 0;  i < newsize;  i++ )
+    crtab_chain(S, i) = (CROSSREF_ENTRY) nilobj;
+  return S;
+} /* end crtab_new */
+
+static CROSSREF_TABLE crtab_rehash(CROSSREF_TABLE S, int newsize)
+{ CROSSREF_TABLE NewS;  int i;  long newpos;  CROSSREF_ENTRY p, q;
+  NewS = crtab_new(newsize);
+  for( i = 0;  i < crtab_size(S);  i++ )
+  { p = crtab_chain(S, i);
+    while( p != NULL )
+    { q = p->crtab_next;
+      hash(newpos, p->crtab_sym, p->crtab_fnum, NewS);
+      p->crtab_next = crtab_chain(NewS, newpos);
+      crtab_chain(NewS, newpos) = p;
+      crtab_count(NewS)++;
+      p = q;
+    }
+  }
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_CROSSREF, -1,
+   -(2*sizeof(int) + crtab_size(S)*sizeof(CROSSREF_ENTRY))));
+  free(S);
+  return NewS;
+} /* end crtab_rehash */
+
+static int crtab_getnext(OBJECT sym, FILE_NUM fnum, CROSSREF_TABLE *S)
+{ CROSSREF_ENTRY x;  OBJECT t;  long pos;
+
+  /* if S is NULL, create a new table */
+  if( *S == NULL )  *S = crtab_new(INIT_CROSSREF_NUM);
+
+  /* if (sym, fnum) exists, increment its value and return it */
+  hash(pos, sym, fnum, *S);
+  for( x = crtab_chain(*S, pos);  x != NULL;  x = x->crtab_next )
+  { if( x->crtab_sym == sym && x->crtab_fnum == fnum )
+    return ++x->crtab_value;
+  }
+
+  /* if table is full, rehash */
+  if( crtab_count(*S) == crtab_size(*S) )
+  { *S = crtab_rehash(*S, 2*crtab_size(*S));
+    hash(pos, sym, fnum, *S);
+  }
+
+  /* insert a new entry for (sym, fnum) with value 1 */
+  GetMem(t, sizeof(struct crossref_rec), no_fpos);
+  x = (CROSSREF_ENTRY) t;
+  x->crtab_sym = sym;
+  x->crtab_fnum = fnum;
+  x->crtab_next = crtab_chain(*S, pos);
+  crtab_chain(*S, pos) = x;
+  crtab_count(*S)++;
+  return x->crtab_value = 1;
+
+} /* end crtab_getnext */
+
+#if DEBUG_ON
+static void crtab_debug(CROSSREF_TABLE S, FILE *fp)
+{ int i;  CROSSREF_ENTRY x;
+  if( S == NULL )
+  { fprintf(fp, "  null table\n");
+    return;
+  }
+  fprintf(fp, "  table size: %d;  current count: %d\n",
+    crtab_size(S), crtab_count(S));
+  for( i = 0;  i < crtab_size(S);  i++ )
+  { fprintf(fp, "crtab_chain(S, %d) =", i);
+    for( x = crtab_chain(S, i);  x != NULL;  x = x->crtab_next )
+    { fprintf(fp, " %s:%s,%d",
+	SymName(x->crtab_sym), FileName(x->crtab_fnum), x->crtab_value);
+    }
+    fprintf(fp, "\n");
+  }
+} /* end crtab_debug */
+#endif
+
+static CROSSREF_TABLE crossref_tab = NULL;
+
+
+/*@@**************************************************************************/
+/*                                                                           */
+/*  CrossInit(sym)     Initialize cross_sym(sym).                            */
+/*                                                                           */
+/*****************************************************************************/
+
+void CrossInit(OBJECT sym)
+{ OBJECT cs;
+  New(cs, CROSS_SYM);
+  target_state(cs) = NO_TARGET;  target_seq(cs) = 0;
+  /* cr_file(cs) = NO_FILE; unused */
+  gall_seq(cs) = 0;  gall_tag(cs) = nilobj;
+  gall_tfile(cs) = NO_FILE;
+  symb(cs) = sym;  cross_sym(sym) = cs;
+  if( RootCross == nilobj )  New(RootCross, CR_ROOT);  Link(RootCross, cs);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT CrossMake(sym, val, ctype)                                        */
+/*                                                                           */
+/*  Make a cross-reference with the given sym and tag value (NB no fpos).    */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT CrossMake(OBJECT sym, OBJECT val, int ctype)
+{ OBJECT v1, res;
+  debug3(DCR, DD, "CrossMake(%s, %s, %s)", SymName(sym),
+    EchoObject(val), Image(ctype));
+  New(res, CROSS);  cross_type(res) = ctype;  threaded(res) = FALSE;
+  New(v1, CLOSURE);  actual(v1) = sym;
+  Link(res, v1);  Link(res, val);
+  debug1(DCR, DD, "CrossMake returning %s", EchoObject(res));
+  return res;
+}
+
+/*@::GallTargEval(), CrossGenTag()@*******************************************/
+/*                                                                           */
+/*  OBJECT GallTargEval(sym, dfpos)                                          */
+/*                                                                           */
+/*  Produce a suitable cross-reference for a galley target.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT GallTargEval(OBJECT sym, FILE_POS *dfpos)
+{ OBJECT cs, res;
+  FULL_CHAR buff[MAX_BUFF], *str;
+  debug2(DCR, DD, "GallTargEval( %s,%s )", SymName(sym), EchoFilePos(dfpos));
+  if( cross_sym(sym) == nilobj )  CrossInit(sym);
+  cs = cross_sym(sym);
+  if( file_num(*dfpos) != gall_tfile(cs) )
+  { gall_tfile(cs) = file_num(*dfpos);
+    gall_seq(cs)   = 0;
+  }
+  str = FileName(gall_tfile(cs));
+  ++gall_seq(cs);
+  if( StringLength(str) + 6 >= MAX_BUFF )
+    Error(10, 2, "automatically generated tag %s&%d is too long",
+	FATAL, dfpos, str, gall_seq(cs));
+  StringCopy(buff, str);
+  StringCat(buff, AsciiToFull("&"));
+  StringCat(buff, StringInt(gall_seq(cs)));
+  res = CrossMake(sym, MakeWord(WORD, buff, dfpos), GALL_TARG);
+  debug1(DCR, DD, "GallTargEval returning %s", EchoObject(res));
+  return res;
+} /* end GallTargEval */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static OBJECT CrossGenTag(x)                                             */
+/*                                                                           */
+/*  Generate a tag suitable for labelling closure x, in such a way that      */
+/*  the same tag is likely to be generated on subsequent runs.               */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT CrossGenTag(OBJECT x)
+{ FULL_CHAR buff[MAX_BUFF], *str1, *str2;
+  OBJECT sym, res;  FILE_NUM fnum;
+  int seq;
+  debug1(DCR, DD, "CrossGenTag( %s )", SymName(actual(x)));
+  sym = actual(x);
+  if( cross_sym(sym) == nilobj )  CrossInit(sym);
+  fnum = file_num(fpos(x));
+  str1 = SymName(sym);
+  str2 = FileName(fnum);
+  seq = crtab_getnext(sym, fnum, &crossref_tab);
+  debug3(DCR, DDD, "%d = crtab_getnext(%s, %s, S); S =",
+	seq, SymName(sym), FileName(fnum));
+  ifdebug(DCR, DDD, crtab_debug(crossref_tab, stderr));
+  if( StringLength(str1) + StringLength(str2) + 10 >= MAX_BUFF )
+    Error(10, 3, "automatically generated tag %s.%s.%d is too long",
+	FATAL, no_fpos, str1, str2, seq);
+  /* *** make shorter, little risk
+  StringCopy(buff, str1);
+  StringCat(buff, AsciiToFull("."));
+  *** */
+  StringCopy(buff, StringInt(line_num(fpos(sym))));
+  StringCat(buff, AsciiToFull("."));
+  StringCat(buff, str2);
+  StringCat(buff, AsciiToFull("."));
+  StringCat(buff, StringInt(seq));
+  res = MakeWord(QWORD, buff, &fpos(x));
+  debug2(DCR, DD, "CrossGenTag( %s ) returning %s", SymName(actual(x)), string(res));
+  return res;
+} /* end CrossGenTag */
+
+
+/*@::CrossAddTag()@***********************************************************/
+/*                                                                           */
+/*  CrossAddTag(x)                                                           */
+/*                                                                           */
+/*  Add an automatically generated @Tag parameter to closure x if required.  */
+/*                                                                           */
+/*****************************************************************************/
+
+void CrossAddTag(OBJECT x)
+{ OBJECT link, par, ppar, y;
+  debug1(DCR, DD, "CrossAddTag( %s )", EchoObject(x));
+
+  /* search the parameter list of x for a @Tag parameter */
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(par, link);
+    if( type(par) == PAR && is_tag(actual(par)) )
+    {
+      /* has tag, but if value is empty object, delete it */
+      Child(y, Down(par));
+      if( is_word(type(y)) && StringEqual(string(y), STR_EMPTY) )
+      { DisposeChild(link);
+	link = x;
+      }
+      break;
+    }
+  }
+  if( link == x )
+  { 
+      /* search the definition of x for name of its @Tag parameter */
+      ppar = nilobj;
+      for( link=Down(actual(x));  link != actual(x);  link = NextDown(link) )
+      {	Child(y, link);
+	if( is_par(type(y)) && is_tag(y) )
+	{ ppar = y;
+	  break;
+	}
+      }
+      if( ppar != nilobj ) /* should always hold */
+      {
+	/* prepare new PAR containing generated tag */
+	New(par, PAR);
+	actual(par) = ppar;
+	y = CrossGenTag(x);
+	Link(par, y);
+
+	/* find the right spot, then link it to x */
+	switch( type(ppar) )
+	{
+	  case LPAR:	link = Down(x);
+			break;
+
+	  case NPAR:	link = Down(x);
+			if( Down(x) != x )
+			{ Child(y, Down(x));
+			  if( type(y) == PAR && type(actual(y)) == LPAR )
+				link = NextDown(link);
+			}
+			break;
+
+	  case RPAR:	for( link = Down(x); link != x; link = NextDown(link) )
+			{ Child(y, link);
+			  if( type(y) != PAR )  break;
+			}
+			break;
+	}
+	Link(link, par);
+      }
+  }
+  debug1(DCR, DD, "CrossAddTag returning %s", EchoObject(x));
+} /* end CrossAddTag */
+
+
+/*@::CrossExpand()@***********************************************************/
+/*                                                                           */
+/*  OBJECT CrossExpand(x, env, style, crs, res_env)                          */
+/*                                                                           */
+/*  Return the value of cross-reference x, with environment *res_env.  If    */
+/*  x has a non-literal tag, it must be tracked, so an object is added to    */
+/*  *crs for this purpose.  The result replaces x, which is disposed.        */
+/*                                                                           */
+/*****************************************************************************/
+static OBJECT nbt[2] = { nilobj, nilobj };
+static OBJECT nft[2] = { nilobj, nilobj };
+static OBJECT ntarget = nilobj;
+static OBJECT nenclose = nilobj;
+
+OBJECT CrossExpand(OBJECT x, OBJECT env, STYLE *style,
+OBJECT *crs, OBJECT *res_env)
+{ OBJECT sym, res, tag, y, cs, link, db, tmp, index;
+  int ctype, count, i;  FULL_CHAR buff[MAX_BUFF], seq[MAX_BUFF], *str;
+  FILE_NUM fnum, dfnum;  BOOLEAN tagerror = FALSE;
+  long cont, dfpos;  int dlnum;
+  assert( is_cross(type(x)), "CrossExpand: x!" );
+  debug2(DCR, DD, "[ CrossExpand( %s, env, style, %s, res_env )",
+    EchoObject(x), EchoObject(*crs));
+  assert( NextDown(Down(x)) == LastDown(x), "CrossExpand: #args!" );
+
+  /* manifest and tidy the right parameter */
+  Child(tag, LastDown(x));
+  debug0(DOM, D, "  [ calling Manifest from CrossExpand");
+  tag = Manifest(tag, env, style, nbt, nft, &ntarget, crs, FALSE, FALSE, &nenclose, FALSE);
+  debug0(DOM, D, "  ] returning from Manifest");
+  tag = ReplaceWithTidy(tag, TRUE);   /* && */
+
+  /* extract sym (the symbol name) and tag (the tag value) from x */
+  Child(y, Down(x));
+  assert( type(y) == CLOSURE, "ClosureExpand: type(y) != CLOSURE!" );
+  sym = actual(y);
+  ctype = !is_word(type(tag)) ? 1 :
+	  StringEqual(string(tag), STR_EMPTY) ? 2 :
+	  StringEqual(string(tag), KW_PRECEDING) ? CROSS_PREC :
+	  StringEqual(string(tag), KW_FOLL_OR_PREC) ? CROSS_FOLL_OR_PREC :
+	  StringEqual(string(tag), KW_FOLLOWING) ? CROSS_FOLL : CROSS_LIT;
+
+  res = nilobj;
+  switch( ctype )
+  {
+
+    case 1:
+
+      Error(10, 4, "value of right parameter of %s is not a simple word",
+	WARN, &fpos(tag), KW_CROSS);
+      break;
+
+
+    case 2:
+    
+      Error(10, 5, "value of right parameter of %s is an empty word",
+	WARN, &fpos(tag), KW_CROSS);
+      break;
+
+
+    case CROSS_LIT:
+    
+      debug2(DCR, DD, "  CROSS_LIT sym %s, tag %s", SymName(sym), string(tag));
+      if( cross_sym(sym) == nilobj )  CrossInit(sym);
+      cs = cross_sym(sym);
+      if( sym == MomentSym && StringEqual(string(tag), KW_NOW) )
+      {	/* this is a request for the current time */
+	res = StartMoment();
+      }
+      else
+      { if( !has_tag(sym) )
+	{ Error(10, 6, "symbol %s used in cross reference has no %s parameter",
+	    WARN, &fpos(x), SymName(sym), KW_TAG);
+	  tagerror = TRUE;
+	}
+	for( link = NextUp(Up(cs));  link != cs;  link = NextUp(link) )
+        { Parent(db, link);
+	  assert( is_word(type(db)), "CrossExpand: db!" );
+	  if( DbRetrieve(db, FALSE, sym, string(tag), seq, &dfnum, &dfpos,
+	      &dlnum, &cont) )
+	  {
+	    SwitchScope(nilobj);
+	    count = 0;
+	    /* condition db != OldCrossDb added to fix inconsistency with */
+	    /* the call to AttachEnv below, which always carried it; but  */
+	    /* there may still be a problem when db != OldCrossDb because */
+	    /* in that case all symbols currently visible are declared    */
+	    /* visible in the database entry; perhaps InitialEnvironment  */
+	    /* would be best */
+	    if( db != OldCrossDb )
+	    { SetScope(env, &count, FALSE);
+	      debug2(DCR, D, "Retrieving %s, env = %s", SymName(sym),
+	        EchoObject(env));
+	    }
+	    else
+	    { debug1(DCR, D, "Retrieving %s, env = nilobj", SymName(sym));
+	    }
+	    res = ReadFromFile(dfnum, dfpos, dlnum);
+	    for( i = 1;  i <= count;  i++ )  PopScope();
+	    UnSwitchScope(nilobj);
+	    if( db != OldCrossDb )  AttachEnv(env, res);
+	    break;
+	  }
+	}
+      }
+      break;
+
+
+    case CROSS_PREC:
+    case CROSS_FOLL:
+    case CROSS_FOLL_OR_PREC:
+    
+      if( has_tag(sym) )
+      { int new_seq;
+	if( cross_sym(sym) == nilobj )  CrossInit(sym);
+        cs = cross_sym(sym);
+        assert( cs != nilobj, "CrossExpand/CROSS_FOLL: cs == nilobj!" );
+        assert( type(cs) == CROSS_SYM, "CrossExpand/CROSS_FOLL: type(cs)!" );
+
+	/* generate literal tag buff, used to track this cross reference */
+        fnum = file_num(fpos(tag));
+	new_seq = crtab_getnext(sym, fnum, &crossref_tab);
+	str = FileName(fnum);
+
+        if( StringLength(str) + 5 >= MAX_BUFF )
+	  Error(10, 7, "automatically generated tag %s_%d is too long",
+	    FATAL, &fpos(x), str, new_seq); /* was cr_seq(cs) */
+        StringCopy(buff, str);
+        StringCat(buff, AsciiToFull("_"));
+        StringCat(buff, StringInt(new_seq)); /* was cr_seq(cs) */
+	debug1(DCR, DD, "  CROSS_PREC or CROSS_FOLL generated tag %s", buff);
+
+	/* generate tracking cross reference and index, and add to *crs */
+        tmp = CrossMake(sym, MakeWord(WORD, buff, &fpos(tag)), ctype);
+        New(index, ctype);
+        actual(index) = tmp;
+        Link(index, tmp);
+        if( *crs == nilobj )  New(*crs, CR_LIST);
+	Link(*crs, index);
+
+	/* read tracking cross ref from previous run from cross-ref database */
+        if( AllowCrossDb &&
+	    DbRetrieve(OldCrossDb, FALSE, sym, buff, seq, &dfnum, &dfpos,
+	      &dlnum, &cont) )
+	{
+	  SwitchScope(nilobj);
+	  res = ReadFromFile(dfnum, dfpos, dlnum);
+	  UnSwitchScope(nilobj);
+	}
+      }
+      else
+      {	Error(10, 8, "symbol %s used in cross reference has no %s parameter",
+	  WARN, &fpos(x), SymName(sym), KW_TAG);
+	tagerror = TRUE;
+      }
+      break;
+
+
+    default:
+    
+      assert(FALSE, "CrossExpand ctype");
+      break;
+
+
+  } /* end switch */
+  if( res == nilobj )
+  { OBJECT envt;
+    /* *** reporting this now whether or not crs_wanted
+    if( ctype > 1 && !tagerror && crs_wanted )
+    *** */
+    if( ctype > 1 && !tagerror )
+    { debug3(DCR, DD, "  reporting unresolved cross reference %s%s%s",
+	SymName(sym), KW_CROSS, string(tag));
+      Error(10, 9, "unresolved cross reference %s%s%s",
+	WARN, &fpos(x), SymName(sym), KW_CROSS, string(tag));
+    }
+
+    /* build dummy result with environment attached */
+    /* nb at present we are not adding dummy import closures to this! */
+    New(res, CLOSURE);  actual(res) = sym;
+    y = res;
+    debug1(DCR, DD, "First y = %s", SymName(actual(y)));
+    while( enclosing(actual(y)) != StartSym )
+    { New(tmp, CLOSURE);
+      actual(tmp) = enclosing(actual(y));
+      debug0(DCR, DDD, "  calling SetEnv from CrossExpand (a)");
+      envt = SetEnv(tmp, nilobj);
+      AttachEnv(envt, y);
+      y = tmp;
+      debug1(DCR, DD, "Later y = %s", SymName(actual(y)));
+    }
+    New(envt, ENV);  Link(y, envt);
+  }
+
+  /* set environment, replace x by res, debug and exit */
+  *res_env = DetachEnv(res);
+  ReplaceNode(res, x);
+  DisposeObject(x);
+  assert( type(res) == CLOSURE, "CrossExpand: type(res) != CLOSURE!" );
+  assert( actual(res) == sym, "CrossExpand: actual(res) != sym!" );
+  debug1(DCR, DD, "] CrossExpand returning %s", EchoObject(res));
+  debug1(DCR, DD, "  *crs = %s", EchoObject(*crs));
+  debug1(DCR, DD, "  *res_env = %s", EchoObject(*res_env));
+  return res;
+} /* end CrossExpand */
+
+
+/*@::CrossSequence()@*********************************************************/
+/*                                                                           */
+/*  CrossSequence(x)                                                         */
+/*                                                                           */
+/*  Object x is an insinuated cross-reference that has just been popped off  */
+/*  the top of the root galley.  Resolve it with the sequence of others.     */
+/*                                                                           */
+/*****************************************************************************/
+
+void CrossSequence(OBJECT x)
+{ OBJECT sym, tag, val, tmp, cs, par, key, hold_key, link, y, env, hold_env;
+  unsigned ctype;  FULL_CHAR buff[MAX_BUFF], *seq;
+  FILE_NUM dfnum;  int dfpos, dlnum;
+
+  /* if suppressing cross-referencing, dispose x and quit */
+  if( !AllowCrossDb )
+  { if( Up(x) == x )  DisposeObject(x);
+    debug0(DCR, DD, "CrossSequence returning (!AllowCrossDb).");
+    return;
+  }
+
+  /* get interesting fragments from x */
+  debugcond1(DCR, DD, !is_cross(type(x)), "  type(x) = %s, x =", Image(type(x)));
+  ifdebugcond(DCR, DD, !is_cross(type(x)), DebugObject(x));
+  assert( is_cross(type(x)), "CrossSequence: type(x)!" );
+  ctype = cross_type(x);
+  Child(tmp, Down(x));
+  assert( type(tmp) == CLOSURE, "CrossSequence: type(tmp)!" );
+  sym = actual(tmp);
+  if( cross_sym(sym) == nilobj )  CrossInit(sym);
+  cs = cross_sym(sym);
+  assert( type(cs) == CROSS_SYM, "CrossSequence: cs!" );
+
+  /* debug output */
+  debug2(DCR, DD, "CrossSequence %s %s", Image(ctype), EchoObject(x));
+  debug1(DCR, DD, "  x = %s", EchoObject(x));
+  ifdebug(DCR, DD, DebugObject(cs));
+
+  /* delete as much of x as possible */
+  Child(tag, NextDown(Down(x)));
+  DeleteLink(NextDown(Down(x)));
+  if( Up(x) == x )  DisposeObject(x);
+
+  switch( ctype )
+  {
+    case GALL_FOLL:
+    case GALL_FOLL_OR_PREC:
+    case GALL_PREC:
+
+      /* find the value of key of the galley, if any */
+      val = tag;  key = hold_key = nilobj;
+      assert( type(val) == CLOSURE, "CrossSequence/GALL_FOLL: type(val)!" );
+      if( has_key(actual(val)) )
+      { for( link=Down(actual(val)); link != actual(val); link=NextDown(link) )
+	{ Child(y, link);
+	  if( is_key(y) )
+	  { OBJECT nbt[2], nft[2], crs, ntarget, nenclose;
+	    nbt[COLM] = nft[COLM] = nbt[ROWM] = nft[ROWM] = nilobj;
+	    crs = ntarget = nenclose = nilobj;
+	    New(key, CLOSURE);
+	    actual(key) = y;
+	    New(hold_key, ACAT);
+	    Link(hold_key, key);
+	    New(env, ENV);
+	    Link(env, val);
+	    New(hold_env, ACAT);
+	    Link(hold_env, env);
+	    debug0(DOM, D, "  [ calling Manifest from CrossSequence");
+	    key = Manifest(key, env, &save_style(val), nbt, nft,
+	      &ntarget, &crs, FALSE, TRUE, &nenclose, FALSE);
+	    debug0(DOM, D, "  ] returning from Manifest");
+	    key = ReplaceWithTidy(key, TRUE);
+	    DeleteLink(Down(env));
+	    DisposeObject(hold_env);
+	  }
+	}
+      }
+
+      /* write out the galley */
+      dfnum = DatabaseFileNum(&fpos(val));
+      AppendToFile(val, dfnum, &dfpos, &dlnum);
+
+      /* determine the sequence number or string of this galley */
+      if( key == nilobj )
+      {	++gall_seq(cs);
+	StringCopy(buff, StringFiveInt(gall_seq(cs)));
+	seq = buff;
+      }
+      else if( !is_word(type(key)) )
+      {	Error(10, 10, "%s parameter is not a word", WARN, &fpos(key), KW_KEY);
+	debug1(DCR, DD, "key = %s", EchoObject(key));
+	seq = STR_BADKEY;
+      }
+      else if( StringEqual(string(key), STR_EMPTY) )
+      {	Error(10, 11, "%s parameter is an empty word", WARN,&fpos(key),KW_KEY);
+	seq = STR_BADKEY;
+      }
+      else seq = string(key);
+
+      /* either write out the index immediately or store it for later */
+      if( ctype == GALL_PREC )
+      {	if( gall_tag(cs) == nilobj )
+	{ Error(10, 12, "no %s precedes this %s%s%s", WARN, &fpos(val),
+	    SymName(sym), SymName(sym), KW_CROSS, KW_PRECEDING);
+	  debug0(DCR, DD, "  ... so substituting \"none\"");
+	  gall_tag(cs) = MakeWord(WORD, STR_NONE, &fpos(val));
+	}
+	assert( is_word(type(gall_tag(cs))) &&
+		!StringEqual(string(gall_tag(cs)), STR_EMPTY),
+			"CrossSequence: gall_tag!" );
+	debug3(DCR, DD, "  inserting galley (prec) %s&%s %s", SymName(sym),
+	  string(gall_tag(cs)), seq);
+	DbInsert(NewCrossDb, TRUE, sym, string(gall_tag(cs)), no_fpos, seq,
+			dfnum, (long) dfpos, dlnum, FALSE);
+      }
+      else
+      {	tmp = MakeWord(WORD, seq, &fpos(val));
+	cs_type(tmp) = ctype;
+	cs_fnum(tmp) = dfnum;
+	cs_pos(tmp) = dfpos;
+	cs_lnum(tmp) = dlnum;
+	Link(cs, tmp);
+	debug2(DCR, DD, "  saving galley (foll) %s&? %s", SymName(sym), seq);
+      }
+      DisposeObject(val);
+      if( hold_key != nilobj )  DisposeObject(hold_key);
+      break;
+
+
+    case GALL_TARG:
+
+      if( gall_tag(cs) != nilobj )  DisposeObject(gall_tag(cs));
+      if( !is_word(type(tag)) || StringEqual(string(tag), STR_EMPTY) )
+      {
+	debug2(DCR, DD, "  GALL_TARG %s put none for %s",
+	  SymName(sym), EchoObject(tag));
+	DisposeObject(tag);
+	gall_tag(cs) = MakeWord(WORD, STR_NONE, no_fpos);
+      }
+      else gall_tag(cs) = tag;
+      debug2(DCR, DD, "  have new %s gall_targ %s", SymName(sym),
+	  EchoObject(gall_tag(cs)));
+      for( link = Down(cs);  link != cs;  link = NextDown(link) )
+      {	Child(y, link);
+	assert( is_word(type(y)) && !StringEqual(string(y), STR_EMPTY),
+				"CrossSequence: GALL_TARG y!" );
+	switch( cs_type(y) )
+	{
+
+	  case GALL_PREC:
+	  case GALL_FOLL:
+	  case GALL_FOLL_OR_PREC:
+
+	    debug4(DCR, DD, "  inserting galley (%s) %s&%s %s",
+	      Image(cs_type(y)), SymName(sym), string(gall_tag(cs)), string(y));
+	    if( Down(y) != y )
+	      Child(val, Down(y));
+            else
+	      val = nilobj;
+	    DbInsert(NewCrossDb, TRUE, sym, string(gall_tag(cs)), no_fpos,
+	      string(y), cs_fnum(y), (long) cs_pos(y), cs_lnum(y), FALSE);
+	    link = PrevDown(link);
+	    DisposeChild(NextDown(link));
+	    break;
+
+
+	  case CROSS_LIT:
+	  case CROSS_PREC:
+	  case CROSS_FOLL:
+	  case CROSS_FOLL_OR_PREC:
+
+	    break;
+
+
+	  default:
+
+	    assert(FALSE, "CrossSequence: cs_type!");
+	    break;
+	}
+      }
+      break;
+
+
+    case CROSS_PREC:
+
+      if( target_state(cs) == NO_TARGET )
+      {	Error(10, 13, "no %s precedes this %s%s%s", WARN, &fpos(tag),
+	  SymName(sym), SymName(sym), KW_CROSS, KW_PRECEDING);
+	break;
+      }
+      if( target_state(cs) == SEEN_TARGET )
+      {
+	debug2(DCR, DD, "  inserting %s cross_targ %s",
+	  SymName(sym), target_val(cs));
+	AppendToFile(target_val(cs), target_file(cs), &target_pos(cs),
+	  &target_lnum(cs));
+	DisposeObject(target_val(cs));
+	target_val(cs) = nilobj;
+	target_state(cs) = WRITTEN_TARGET;
+      }
+      if( !is_word(type(tag)) || StringEqual(string(tag), STR_EMPTY) )
+      {
+	debug2(DCR, DD, "  GALL_TARG %s put none for %s", SymName(sym),
+		EchoObject(tag));
+	DisposeObject(tag);
+	tag = MakeWord(WORD, STR_NONE, no_fpos);
+      }
+      debug3(DCR, DD, "  inserting cross (prec) %s&%s %s", SymName(sym),
+	    string(tag), "0");
+      DbInsert(NewCrossDb, FALSE, sym, string(tag), &fpos(tag), STR_ZERO,
+	target_file(cs), (long) target_pos(cs), target_lnum(cs), TRUE);
+      DisposeObject(tag);
+      break;
+
+
+    case CROSS_FOLL:
+    case CROSS_FOLL_OR_PREC:
+
+      if( !is_word(type(tag)) )
+      {	Error(10, 14, "tag of %s is not a simple word",
+	  WARN, &fpos(tag), SymName(symb(cs)));
+	debug1(DCR, DD, "  tag = %s", EchoObject(tag));
+      }
+      else if( StringEqual(string(tag), STR_EMPTY) )
+      {
+        debug1(DCR, DD, "  ignoring cross (foll) %s (empty tag)", SymName(sym));
+      }
+      else
+      { Link(cs, tag);
+	cs_fnum(tag) = file_num(fpos(tag));
+	cs_type(tag) = ctype;
+        debug4(DCR, DD, "  storing cross (%s) %s&%s %s", Image(ctype),
+	  SymName(sym), string(tag), "?");
+      }
+      break;
+
+
+    case CROSS_TARG:
+
+      /* get rid of old target, if any, and add new one */
+      if( target_state(cs) == SEEN_TARGET )
+      {
+	debug2(DCR, DD, "  disposing unused %s cross_targ %s", SymName(sym),
+	  target_val(cs));
+	DisposeObject(target_val(cs));
+      }
+      debug2(DCR, DD, "  remembering new %s cross_targ %s", SymName(sym),
+	EchoObject(tag));
+      target_val(cs) = tag;
+      assert( Up(tag) == tag, "CrossSeq: Up(tag)!" );
+
+      target_file(cs) = DatabaseFileNum(&fpos(tag));
+      target_state(cs) = SEEN_TARGET;
+
+      /* store tag of the galley, if any, and delete excessive right pars */
+      tag = nilobj;
+      assert( type(target_val(cs)) == CLOSURE, "CrossSequence: target_val!" );
+      link = Down(target_val(cs));
+      for( ;  link != target_val(cs);  link = NextDown(link) )
+      {	Child(par, link);
+	if( type(par) == PAR )
+	{
+	  assert( Down(par) != par, "CrossSequence: Down(PAR)!" );
+	  if( is_tag(actual(par)) )
+	  {
+	    /* sort out the value of this tag now */
+	    Child(tag, Down(par));
+	    tag = ReplaceWithTidy(tag, TRUE);  /* && */
+	    if( !is_word(type(tag)) )
+	    { Error(10, 15, "tag of %s is not a simple word",
+	        WARN, &fpos(tag), SymName(actual(target_val(cs))));
+	      debug1(DCR, DD, "  tag = %s", EchoObject(tag));
+	    }
+	    else if( StringEqual(string(tag), STR_EMPTY) )
+	    {
+              debug1(DCR, DD, "  ignoring cross (own tag) %s (empty tag)",
+		  SymName(sym));
+	    }
+	    else
+	    {
+	      cs_fnum(tag) = file_num(fpos(tag));
+	      cs_type(tag) = CROSS_LIT;
+	      Link(cs, tag);
+              debug4(DCR, DD, "  storing cross (%s) %s&%s %s",
+		Image(cs_type(tag)), SymName(sym), string(tag), "?");
+	    }
+	  }
+	  else if( type(actual(par)) == RPAR )
+	  {
+	    /* replace any oversized right parameter by question marks */
+	    Child(y, Down(par));
+	    switch( type(y) )
+	    {
+	      case WORD:
+	      case QWORD:
+	      case ACAT:
+	      case OPEN:
+	      case NEXT:
+	      case NULL_CLOS:
+	      case CROSS:
+	      case FORCE_CROSS:
+	      case TAGGED:
+
+		/* leave objects of these types as is */
+		break;
+
+
+	      default:
+
+		/* replace all other types by three question marks */
+		tmp = MakeWord(WORD, AsciiToFull("???"), &fpos(y));
+		ReplaceNode(tmp, y);
+		DisposeObject(y);
+		break;
+
+	    }
+	  }
+	}
+      }
+
+      /* if new target is already writable, write it */
+      if( Down(cs) != cs )
+      {
+	debug2(DCR, DD, "  writing %s cross_targ %s", SymName(sym),
+		EchoObject(target_val(cs)));
+	AppendToFile(target_val(cs), target_file(cs), &target_pos(cs),
+	  &target_lnum(cs));
+	DisposeObject(target_val(cs));
+	target_val(cs) = nilobj;
+	for( link = Down(cs);  link != cs;  link = NextDown(link) )
+	{ Child(tag, link);
+	  assert( is_word(type(tag)) && !StringEqual(string(tag), STR_EMPTY),
+			"CrossSeq: non-WORD or empty tag!" );
+	  switch( cs_type(tag) )
+	  {
+
+	    case CROSS_LIT:
+	    case CROSS_FOLL:
+	    case CROSS_FOLL_OR_PREC:
+
+	      debug3(DCR, DD, "  inserting cross (foll) %s&%s %s", SymName(sym),
+	        string(tag), "0");
+	      DbInsert(NewCrossDb, FALSE, sym, string(tag), &fpos(tag), 
+	        STR_ZERO, target_file(cs), (long) target_pos(cs),
+		target_lnum(cs), TRUE);
+	      link = PrevDown(link);
+	      DisposeChild(NextDown(link));
+	      break;
+
+
+	    case GALL_FOLL:
+	    case GALL_PREC:
+	    case GALL_FOLL_OR_PREC:
+
+	      break;
+
+
+	    default:
+
+	      assert(FALSE, "CrossSequence: cs_type!");
+	      break;
+	  }
+	}
+	target_state(cs) = WRITTEN_TARGET;
+      }
+      break;
+
+
+    default:
+
+      assert1(FALSE, "CrossSequence:", Image(ctype));
+      break;
+
+  } /* end switch */
+  debug0(DCR, DD, "CrossSequence returning.");
+  debug0(DCR, DD, "   cs =");
+  ifdebug(DCR, DD, DebugObject(cs));
+} /* end CrossSequence */
+
+
+/*@::CrossClose()@************************************************************/
+/*                                                                           */
+/*  CrossClose()                                                             */
+/*                                                                           */
+/*  Check for dangling forward references, and convert old cross reference   */
+/*  database to new one.                                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void CrossClose(void)
+{ OBJECT link, cs, ylink, y, sym;  BOOLEAN g;  int len, count;
+  FILE_NUM dfnum;  long dfpos, cont;  int dlnum;
+  FULL_CHAR buff[MAX_BUFF], seq[MAX_BUFF], tag[MAX_BUFF];
+  debug0(DCR, DD, "CrossClose()");
+  ifdebug(DCR, DD, if( RootCross != nilobj ) DebugObject(RootCross));
+
+  /* if suppressing cross referencing, return */
+  if( !AllowCrossDb )
+  { debug0(DCR, DD, "CrossClose returning (!AllowCrossDb).");
+    return;
+  }
+
+  /* check for dangling forward references and dispose cross ref structures */
+  if( RootCross != nilobj )
+  { for( link = Down(RootCross);  link != RootCross;  link = NextDown(link) )
+    { Child(cs, link);
+      sym = symb(cs);
+      assert( type(cs) == CROSS_SYM, "CrossClose: type(cs)!" );
+      count = 0;
+      for( ylink = Down(cs);  ylink != cs;  ylink = NextDown(ylink) )
+      {	Child(y, ylink);
+	assert( is_word(type(y)) && !StringEqual(string(y), STR_EMPTY),
+				"CrossClose: GALL_TARG y!" );
+	switch( cs_type(y) )
+	{
+
+	  case CROSS_FOLL:
+
+	    debug2(DCR, DD, "cs_type(y) = %s, y = %s",
+	      Image(cs_type(y)), EchoObject(y));
+	    if( count < 5 )
+	      Error(10, 16, "no %s follows this %s%s%s", WARN, &fpos(y),
+	        SymName(sym), SymName(sym), KW_CROSS, KW_FOLLOWING);
+            else if( count == 5 )
+	      Error(10, 17, "and more undefined %s%s%s", WARN, no_fpos,
+	        SymName(sym), KW_CROSS, KW_FOLLOWING);
+	    count++;
+	    break;
+
+
+	  case CROSS_FOLL_OR_PREC:
+
+	    /* no following target, so switch to preceding */
+	    if( target_state(cs) == NO_TARGET )
+	    { Error(10, 18, "no %s follows or precedes this %s%s%s", WARN,
+		&fpos(y), SymName(sym), SymName(sym),KW_CROSS,KW_FOLL_OR_PREC);
+		break;
+	    }
+	    if( target_state(cs) == SEEN_TARGET )
+	    {
+	      debug2(DCR, DD, "  inserting %s cross_targ %s",
+	        SymName(sym), target_val(cs));
+	      AppendToFile(target_val(cs), target_file(cs), &target_pos(cs),
+		&target_lnum(cs));
+	      DisposeObject(target_val(cs));
+	      target_val(cs) = nilobj;
+	      target_state(cs) = WRITTEN_TARGET;
+	    }
+	    if( !is_word(type(y)) || StringEqual(string(y), STR_EMPTY) )
+	    {
+	      debug2(DCR, DD, "  CROSS_FOLL_OR_PREC %s put none for %s",
+		SymName(sym), EchoObject(y));
+	      y = MakeWord(WORD, STR_NONE, no_fpos);
+	    }
+	    debug4(DCR, DD, "  inserting cross (%s) %s&%s %s",
+	      Image(cs_type(y)), SymName(sym), string(y), "0");
+	    DbInsert(NewCrossDb, FALSE, sym, string(y), &fpos(y), STR_ZERO,
+	      target_file(cs), (long) target_pos(cs), target_lnum(cs), TRUE);
+	    break;
+
+
+	  case GALL_FOLL:
+
+	    debug2(DCR, DD, "cs_type(y) = %s, y = %s",
+	      Image(cs_type(y)), EchoObject(y));
+	    if( count < 5 )
+	      Error(10, 19, "no %s follows this %s%s%s", WARN, &fpos(y),
+	        SymName(sym), SymName(sym), KW_CROSS, KW_FOLLOWING);
+            else if( count == 5 )
+	      Error(10, 20, "and more undefined %s%s%s", WARN, no_fpos,
+	        SymName(sym), KW_CROSS, KW_FOLLOWING);
+	    DbInsert(NewCrossDb, TRUE, sym, STR_NONE, no_fpos,
+	      string(y), cs_fnum(y), (long) cs_pos(y), cs_lnum(y), FALSE);
+	    count++;
+	    break;
+
+
+	  case GALL_FOLL_OR_PREC:
+
+	    debug3(DCR, DD, "  inserting galley (foll_or_prec) %s&%s %s",
+	      SymName(sym), string(gall_tag(cs)), string(y));
+	    if( gall_tag(cs) == nilobj )
+	      Error(10, 21, "no %s precedes or follows this %s%s%s", WARN,
+		&fpos(y), SymName(sym), SymName(sym),KW_CROSS,KW_FOLL_OR_PREC);
+	    else
+	    {
+	      DbInsert(NewCrossDb, TRUE, sym, string(gall_tag(cs)), no_fpos,
+	        string(y), cs_fnum(y), (long) cs_pos(y), cs_lnum(y), FALSE);
+	    }
+	    break;
+
+
+	  default:
+
+	    debug1(DCR, DD, "CrossClose: unknown cs_type %s",
+	      Image(cs_type(y)));
+	    assert(FALSE, "CrossClose: unknown cs_type!");
+	    break;
+	}
+      }
+      ifdebug(ANY, D,
+	if( target_state(cs) == SEEN_TARGET )  DisposeObject(target_val(cs));
+	if( gall_tag(cs) != nilobj )  DisposeObject(gall_tag(cs));
+      );
+    }
+    ifdebug(ANY, D, DisposeObject(RootCross); );
+  }
+
+  /* add to NewCrossDb those entries of OldCrossDb from other source files */
+  /* but set check to FALSE so that we don't worry about duplication there */
+  cont = 0L;  len = StringLength(DATA_SUFFIX);
+  while( DbRetrieveNext(OldCrossDb,&g,&sym,tag,seq,&dfnum,&dfpos,&dlnum,&cont))
+  { if( g ) continue;
+    StringCopy(buff, FileName(dfnum));
+    StringCopy(&buff[StringLength(buff) - len], STR_EMPTY);
+    if( FileNum(buff, STR_EMPTY) == NO_FILE )
+      DbInsert(NewCrossDb, FALSE, sym, tag, no_fpos, seq, dfnum, dfpos,
+	dlnum, FALSE);
+  }
+
+  /* close OldCrossDb's .li file so that NewCrossDb can use its name */
+  DbClose(OldCrossDb);
+
+  /* make NewCrossDb readable, for next run */
+  DbConvert(NewCrossDb, TRUE);
+
+  debug0(DCR, DD, "CrossClose returning.");
+  ifdebug(DCR, DD, crtab_debug(crossref_tab, stderr));
+} /* end CrossClose */
diff --git a/z11.c b/z11.c
new file mode 100644
index 0000000..21591d9
--- /dev/null
+++ b/z11.c
@@ -0,0 +1,304 @@
+/*@z11.c:Style Service:EchoStyle()@*******************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z11.c                                                      */
+/*  MODULE:       Style Service                                              */
+/*  EXTERNS:      EchoStyle(), SpaceChange(), BreakChange()                  */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+#if DEBUG_ON
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *EchoStyle(style)                                              */
+/*                                                                           */
+/*  Returns a string showing the value of the style.                         */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *EchoStyle(STYLE *style)
+{ static FULL_CHAR res[100];
+  static char *hyphwords[] = { "hyph_undef", "hyph_off", "hyph_on" };
+  static char *fillwords[] = { "fill_undef", "fill_off", "fill_on" };
+  static char *spacewords[] = { "lout", "comp", "troff", "tex" };
+  static char *displaywords[] = { "undef", "adjust", "outdent", "left",
+			     "centre", "right", "do" };
+
+  StringCopy(res, AsciiToFull("["));
+  StringCat(res, EchoCatOp(VCAT,mark(line_gap(*style)),join(line_gap(*style))));
+  StringCat(res, EchoGap(&line_gap(*style)));
+  StringCat(res, AsciiToFull(", "));
+  StringCat(res, font(*style) == 0 ?
+		   AsciiToFull("nofont") : FontFamilyAndFace(font(*style)));
+  StringCat(res, AsciiToFull(" ("));
+  StringCat(res, AsciiToFull(spacewords[space_style(*style)]));
+  StringCat(res, AsciiToFull(" "));
+  StringCat(res, EchoGap(&space_gap(*style)));
+  StringCat(res, AsciiToFull("), "));
+  StringCat(res, AsciiToFull(hyph_style(*style) < 3 ?
+		    hyphwords[hyph_style(*style)] : "?"));
+  StringCat(res, AsciiToFull(":"));
+  StringCat(res, AsciiToFull(fill_style(*style) < 3 ?
+		    fillwords[fill_style(*style)] : "?"));
+  StringCat(res, AsciiToFull(":"));
+  StringCat(res, AsciiToFull(display_style(*style) < 7 ?
+		    displaywords[display_style(*style)] : "?"));
+  if( small_caps(*style) > 0 ) StringCat(res, AsciiToFull(":smallcaps"));
+  if( vadjust(*style) ) StringCat(res, AsciiToFull(":vadjust"));
+  if( hadjust(*style) ) StringCat(res, AsciiToFull(":hadjust"));
+  if( padjust(*style) ) StringCat(res, AsciiToFull(":padjust"));
+  if( yunit(*style) != 0 )
+  { StringCat(res, AsciiToFull(":y="));
+    StringCat(res, EchoLength(yunit(*style)));
+  }
+  if( zunit(*style) != 0 )
+  { StringCat(res, AsciiToFull(":z="));
+    StringCat(res, EchoLength(zunit(*style)));
+  }
+  if( nobreakfirst(*style) ) StringCat(res, AsciiToFull(":NBF"));
+  if( nobreaklast(*style) ) StringCat(res, AsciiToFull(":NBL"));
+  StringCat(res, AsciiToFull("]"));
+  return res;
+} /* end EchoStyle */
+#endif
+
+
+/*@::SpaceChange()@***********************************************************/
+/*                                                                           */
+/*  SpaceChange(style, x)                                                    */
+/*                                                                           */
+/*  Change the current break style as indicated by object x.                 */
+/*                                                                           */
+/*****************************************************************************/
+
+static void changespace(STYLE *style, OBJECT x)
+{ GAP res_gap;  unsigned gap_inc;
+  assert( is_word(type(x)), "changespace: type(x)!" );
+  if( beginsbreakstyle(string(x)[0]) )
+  {
+    /* should be a new space style option */
+    if( StringEqual(string(x), STR_SPACE_LOUT) )
+	space_style(*style) = SPACE_LOUT;
+    else if( StringEqual(string(x), STR_SPACE_COMPRESS) )
+	space_style(*style) = SPACE_COMPRESS;
+    else if( StringEqual(string(x), STR_SPACE_SEPARATE) )
+	space_style(*style) = SPACE_SEPARATE;
+    else if( StringEqual(string(x), STR_SPACE_TROFF) )
+	space_style(*style) = SPACE_TROFF;
+    else if( StringEqual(string(x), STR_SPACE_TEX) )
+	space_style(*style) = SPACE_TEX;
+    else Error(11, 1, "unknown option to %s symbol (%s)",
+	   WARN, &fpos(x), KW_SPACE, string(x));
+  }
+  else /* should be a new space gap */
+  { GetGap(x, style, &res_gap, &gap_inc);
+    if( gap_inc != GAP_ABS && units(res_gap) != units(space_gap(*style)) )
+    { Error(11, 2, "spacing %s is not compatible with current spacing",
+	WARN, &fpos(x), string(x));
+    }
+    else
+    { units(space_gap(*style)) = units(res_gap);
+      mode(space_gap(*style))  = mode(res_gap);
+      width(space_gap(*style)) = gap_inc == GAP_ABS ? width(res_gap) :
+	     gap_inc == GAP_INC ? width(space_gap(*style)) + width(res_gap) :
+	     find_max(width(space_gap(*style)) - width(res_gap), 0);
+    }
+  }
+  debug1(DSS, D, "SpaceChange returning %s", EchoStyle(style));
+} /* end SpaceChange */
+
+
+void SpaceChange(STYLE *style, OBJECT x)
+{ OBJECT link, y;
+  debug2(DSS, D, "SpaceChange(%s, %s)", EchoStyle(style), EchoObject(x));
+  switch( type(x) )
+  {
+    case NULL_CLOS: break;
+
+    case WORD:
+    case QWORD:	if( !StringEqual(string(x), STR_EMPTY) )
+		  changespace(style, x);
+		break;
+
+
+    case ACAT:	for( link = Down(x);  link != x;  link = NextDown(link) )
+		{ Child(y, link);
+		  if( type(y) == GAP_OBJ || type(y) == NULL_CLOS )  continue;
+		  else if( is_word(type(y)) )
+		  { if( !StringEqual(string(y), STR_EMPTY) )
+		      changespace(style, y);
+		  }
+		  else Error(11, 3, "invalid left parameter of %s",
+			 WARN, &fpos(x), KW_SPACE);
+		}
+		break;
+
+
+    default:	Error(11, 4, "invalid left parameter of %s",
+		  WARN, &fpos(x), KW_SPACE);
+		break;
+  }
+  debug1(DSS, D, "SpaceChange returning %s", EchoStyle(style));
+} /* end SpaceChange */
+
+
+/*@::BreakChange()@***********************************************************/
+/*                                                                           */
+/*  BreakChange(style, x)                                                    */
+/*                                                                           */
+/*  Change the current break style as indicated by object x.                 */
+/*                                                                           */
+/*****************************************************************************/
+
+static void changebreak(STYLE *style, OBJECT x)
+{ GAP res_gap;  unsigned gap_inc;
+  if( beginsbreakstyle(string(x)[0]) )
+  {
+    /* should be a new break style option */
+    if( StringEqual(string(x), STR_BREAK_HYPHEN) )
+	hyph_style(*style) = HYPH_ON;
+    else if( StringEqual(string(x), STR_BREAK_NOHYPHEN) )
+	hyph_style(*style) = HYPH_OFF;
+    else if( StringEqual(string(x), STR_BREAK_ADJUST) )
+	fill_style(*style) = FILL_ON, display_style(*style) = DISPLAY_ADJUST;
+    else if( StringEqual(string(x), STR_BREAK_OUTDENT) )
+	fill_style(*style) = FILL_ON, display_style(*style) = DISPLAY_OUTDENT;
+    else if( StringEqual(string(x), STR_BREAK_RAGGED) )
+	fill_style(*style) = FILL_ON, display_style(*style) = DISPLAY_LEFT;
+    else if( StringEqual(string(x), STR_BREAK_CRAGGED) )
+	fill_style(*style) = FILL_ON, display_style(*style) = DISPLAY_CENTRE;
+    else if( StringEqual(string(x), STR_BREAK_RRAGGED) )
+	fill_style(*style) = FILL_ON, display_style(*style) = DISPLAY_RIGHT;
+    else if( StringEqual(string(x), STR_BREAK_ORAGGED) )
+	fill_style(*style) = FILL_ON, display_style(*style) = DISPLAY_ORAGGED;
+    else if( StringEqual(string(x), STR_BREAK_LINES) )
+	fill_style(*style) = FILL_OFF, display_style(*style) = DISPLAY_LEFT;
+    else if( StringEqual(string(x), STR_BREAK_CLINES) )
+	fill_style(*style) = FILL_OFF, display_style(*style) = DISPLAY_CENTRE;
+    else if( StringEqual(string(x), STR_BREAK_RLINES) )
+	fill_style(*style) = FILL_OFF, display_style(*style) = DISPLAY_RIGHT;
+    else if( StringEqual(string(x), STR_BREAK_NOFIRST) )
+	nobreakfirst(*style) = TRUE;
+    else if( StringEqual(string(x), STR_BREAK_FIRST) )
+	nobreakfirst(*style) = FALSE;
+    else if( StringEqual(string(x), STR_BREAK_NOLAST) )
+	nobreaklast(*style) = TRUE;
+    else if( StringEqual(string(x), STR_BREAK_LAST) )
+	nobreaklast(*style) = FALSE;
+    else Error(11, 5, "unknown option to %s symbol (%s)",
+	   WARN, &fpos(x), KW_BREAK, string(x));
+  }
+  else /* should be a new inter-line gap */
+  { GetGap(x, style, &res_gap, &gap_inc);
+    if( gap_inc != GAP_ABS && units(res_gap) != units(line_gap(*style)) )
+      Error(11, 6, "line spacing %s is not compatible with current spacing",
+        WARN, &fpos(x), string(x));
+    else
+    { units(line_gap(*style)) = units(res_gap);
+      mode(line_gap(*style))  = mode(res_gap);
+      width(line_gap(*style)) = gap_inc == GAP_ABS ? width(res_gap) :
+	gap_inc == GAP_INC ? width(line_gap(*style)) + width(res_gap) :
+	find_max(width(line_gap(*style)) - width(res_gap), 0);
+    }
+  }
+} /* end changebreak */
+
+void BreakChange(STYLE *style, OBJECT x)
+{ OBJECT link, y;
+  debug2(DSS, D, "BreakChange(%s, %s)", EchoStyle(style), EchoObject(x));
+  switch( type(x) )
+  {
+    case NULL_CLOS: break;
+
+    case WORD:
+    case QWORD:	if( !StringEqual(string(x), STR_EMPTY) )
+		  changebreak(style, x);
+		break;
+
+
+    case ACAT:	for( link = Down(x);  link != x;  link = NextDown(link) )
+		{ Child(y, link);
+		  if( type(y) == GAP_OBJ || type(y) == NULL_CLOS )  continue;
+		  else if( is_word(type(y)) )
+		  { if( !StringEqual(string(y), STR_EMPTY) )
+		      changebreak(style, y);
+		  }
+		  else Error(11, 7, "invalid left parameter of %s",
+			 WARN, &fpos(x), KW_BREAK);
+		}
+		break;
+
+
+    default:	Error(11, 8, "invalid left parameter of %s",
+		  WARN, &fpos(x), KW_BREAK);
+		break;
+  }
+  debug1(DSS, D, "BreakChange returning %s", EchoStyle(style));
+} /* end BreakChange */
+
+
+/*@::YUnitChange(), ZUnitChange()@********************************************/
+/*                                                                           */
+/*  YUnitChange(style, x)                                                    */
+/*                                                                           */
+/*  Change the current value of the y unit as indicated by object x.         */
+/*                                                                           */
+/*****************************************************************************/
+
+void YUnitChange(STYLE *style, OBJECT x)
+{ GAP res_gap; unsigned gap_inc;
+  GetGap(x, style, &res_gap, &gap_inc);
+  if( units(res_gap) != FIXED_UNIT )
+    Error(11, 9, "this unit not allowed with %s symbol",
+      WARN, &fpos(x), KW_YUNIT);
+  else
+  { if( gap_inc == GAP_ABS ) yunit(*style) = width(res_gap);
+    else if( gap_inc == GAP_INC ) yunit(*style) += width(res_gap);
+    else yunit(*style) = find_max(yunit(*style) - width(res_gap), 0);
+  }
+} /* end YUnitChange */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  ZUnitChange(style, x)                                                    */
+/*                                                                           */
+/*  Change the current value of the z unit as indicated by object x.         */
+/*                                                                           */
+/*****************************************************************************/
+
+void ZUnitChange(STYLE *style, OBJECT x)
+{ GAP res_gap; unsigned gap_inc;
+  GetGap(x, style, &res_gap, &gap_inc);
+  if( units(res_gap) != FIXED_UNIT )
+    Error(11, 10, "this unit not allowed with %s symbol",
+      WARN, &fpos(x), KW_ZUNIT);
+  else
+  { if( gap_inc == GAP_ABS ) zunit(*style) = width(res_gap);
+    else if( gap_inc == GAP_INC ) zunit(*style) += width(res_gap);
+    else zunit(*style) = find_max(zunit(*style) - width(res_gap), 0);
+  }
+} /* end ZUnitChange */
diff --git a/z12.c b/z12.c
new file mode 100644
index 0000000..2f2c551
--- /dev/null
+++ b/z12.c
@@ -0,0 +1,1235 @@
+/*@z12.c:Size Finder:MinSize()@***********************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z12.c                                                      */
+/*  MODULE:       Size Finder                                                */
+/*  EXTERNS:      MinSize()                                                  */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define IG_LOOKING	0
+#define IG_NOFILE	1
+#define IG_BADFILE	2
+#define IG_BADSIZE	3
+#define	IG_OK		4
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  KernLength(fnum, ch1, ch2, res)                                          */
+/*                                                                           */
+/*  Set res to the kern length between ch1 and ch2 in font fnum, or 0 if     */
+/*  none.                                                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+static FULL_LENGTH KernLength(FONT_NUM fnum, FULL_CHAR ch1, FULL_CHAR ch2)
+{ FULL_LENGTH res;
+  MAPPING m         = font_mapping(finfo[fnum].font_table);
+  FULL_CHAR *unacc  = MapTable[m]->map[MAP_UNACCENTED];
+  int ua_ch1        = unacc[ch1];
+  int ua_ch2        = unacc[ch2];
+  int i = finfo[fnum].kern_table[ua_ch1], j;
+  if( i == 0 )  res = 0;
+  else
+  { FULL_CHAR *kc = finfo[fnum].kern_chars;
+    for( j = i;  kc[j] > ua_ch2;  j++ );
+    res = (kc[j] == ua_ch2) ?
+      finfo[fnum].kern_sizes[finfo[fnum].kern_value[j]] : 0;
+  }
+  return res;
+} /* end KernLength */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BuildSpanner(x)                                                          */
+/*                                                                           */
+/*  Build a spanning structure starting at x.                                */
+/*                                                                           */
+/*****************************************************************************/
+
+static BOOLEAN BuildSpanner(OBJECT x)
+{ OBJECT link, prnt, y, hspanner, vspanner, end_link, t, hprnt, vprnt, spanobj;
+  BOOLEAN need_hspanner, need_vspanner;
+  debug1(DSF, DD, "BuildSpanner(%s)", EchoObject(x));
+  assert( type(x) == START_HVSPAN || type(x) == START_HSPAN ||
+	  type(x) == START_VSPAN , "BuildSpanner: type(x) != SPAN!" );
+  Child(spanobj, Down(x));
+  assert(Up(spanobj) == LastUp(spanobj), "BuildSpanner: spanobj!" );
+  DeleteLink(Up(spanobj));
+
+  need_hspanner = (type(x) == START_HVSPAN || type(x) == START_HSPAN);
+  if( need_hspanner )
+  {
+    /* check that column context is legal, if not exit with FALSE */
+    Parent(hprnt, UpDim(x, COLM));
+    if( type(hprnt) != COL_THR )
+    {
+      Error(12, 10, "%s deleted (not in column)", WARN,&fpos(x),Image(type(x)));
+      return FALSE;
+    }
+
+    /* build hspanner object and interpose it between x and spanobj */
+    New(hspanner, HSPANNER);
+    FposCopy(fpos(hspanner), fpos(x));
+    spanner_broken(hspanner) = FALSE;
+    Link(x, hspanner);
+    Link(hspanner, spanobj);
+
+    /* link later members of the spanner on the same row mark to hspanner    */
+    /* by definition this is every member across to the last @HSpan before a */
+    /* @StartHVSpan or @StartHSpan or @StartVSpan or @VSpan or end of row    */
+    Parent(prnt, UpDim(x, ROWM));
+    if( type(prnt) != ROW_THR )
+    {
+      Error(12, 11, "%s symbol out of place", FATAL, &fpos(x), Image(type(x)));
+    }
+    assert(type(prnt) == ROW_THR, "BuildSpanner: type(prnt)!");
+    spanner_sized(hspanner) = 0;
+    spanner_count(hspanner) = 1;
+    end_link = NextDown(UpDim(x, ROWM));
+    for( link = NextDown(UpDim(x, ROWM)); link != prnt; link = NextDown(link) )
+    { Child(y, link);
+      debug2(DSF, DD, "  examining ver %s %s", Image(type(y)), y);
+      if( type(y) == HSPAN )
+        end_link = NextDown(link);
+      else if( type(y) == START_HVSPAN || type(y) == START_HSPAN ||
+	       type(y) == START_VSPAN  || type(y) == VSPAN )
+        break;
+    }
+    for( link = NextDown(UpDim(x,ROWM)); link!=end_link; link = NextDown(link) )
+    {
+      /* each of these components becomes @HSpan and is added to vspanner */
+      Child(y, link);
+      New(t, HSPAN);
+      FposCopy(fpos(t), fpos(y));
+      ReplaceNode(t, y);
+      DisposeObject(y);
+      Link(t, hspanner);
+      spanner_count(hspanner)++;
+    }
+  }
+  else Link(x, spanobj);
+
+  need_vspanner = (type(x) == START_HVSPAN || type(x) == START_VSPAN);
+  if( need_vspanner )
+  {
+    /* check that row context is legal, if not exit with FALSE */
+    Parent(vprnt, UpDim(x, ROWM));
+    if( type(vprnt) != ROW_THR )
+    {
+      Error(12, 12, "%s deleted (not in row)", WARN, &fpos(x), Image(type(x)));
+      return FALSE;
+    }
+
+    /* build vspanner object and interpose it between x and spanobj */
+    New(vspanner, VSPANNER);
+    FposCopy(fpos(vspanner), fpos(x));
+    spanner_broken(vspanner) = FALSE;
+    Link(x, vspanner);
+    Link(vspanner, spanobj);
+
+    /* link later members of the spanner on the same column mark to vspanner */
+    /* by definition this is every member down to the last @VSpan before a   */
+    /* @StartHVSpan or @StartHSpan or @StartVSpan or @HSpan or end of column */
+    Parent(prnt, UpDim(x, COLM));
+    assert(type(prnt) == COL_THR, "BuildSpanner: type(prnt)!");
+    spanner_sized(vspanner) = 0;
+    spanner_count(vspanner) = 1;
+    end_link = NextDown(UpDim(x, COLM));
+    for( link = NextDown(UpDim(x, COLM)); link != prnt; link = NextDown(link) )
+    { Child(y, link);
+      debug2(DSF, DD, "  examining hor %s %s", Image(type(y)), y);
+      if( type(y) == VSPAN )
+        end_link = NextDown(link);
+      else if( type(y) == START_HVSPAN || type(y) == START_HSPAN ||
+	       type(y) == START_VSPAN  || type(y) == HSPAN )
+        break;
+    }
+    for( link = NextDown(UpDim(x,COLM)); link!=end_link; link = NextDown(link) )
+    {
+      /* each of these components becomes @VSpan and is added to vspanner */
+      Child(y, link);
+      New(t, VSPAN);
+      FposCopy(fpos(t), fpos(y));
+      ReplaceNode(t, y);
+      DisposeObject(y);
+      Link(t, vspanner);
+      spanner_count(vspanner)++;
+    }
+  }
+  else Link(x, spanobj);
+
+  debug2(DSF, DD, "BuildSpanner returning TRUE (rows = %d, cols = %d)",
+    need_vspanner ? spanner_count(vspanner) : 0,
+    need_hspanner ? spanner_count(hspanner) : 0);
+  ifdebug(DSF, DD, DebugObject(x));
+  return TRUE;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN FindSpannerGap(thr, cat_op, gp)                                  */
+/*                                                                           */
+/*  For the purposes of calculating spanning spacing, find the gap between   */
+/*  this object and the preceding one under the nearest cat_op.              */
+/*                                                                           */
+/*  If found, set &gp to the gap object and return TRUE; else return FALSE.  */
+/*                                                                           */
+/*****************************************************************************/
+
+static BOOLEAN FindSpannerGap(OBJECT thr, unsigned dim, unsigned cat_op,
+  OBJECT *res)
+{ OBJECT link, x;
+
+  /* find nearest enclosing cat_op that we aren't the first element of */
+  link = UpDim(thr, dim);
+  Parent(x, link);
+  while( (type(x) != cat_op || type(PrevDown(link)) != LINK) && Up(x) != x )
+  { link = UpDim(x, dim);
+    Parent(x, link);
+  }
+
+  /* if found and a gap precedes thr's component of it, return that gap */
+  if( type(x) == cat_op && type(PrevDown(link)) == LINK )
+  { Child(*res, PrevDown(link));
+    assert(type(*res) == GAP_OBJ, "FindSpannerGap: type(*res)!" );
+  }
+  else if( type(x) == HEAD && gall_dir(x)==dim && type(PrevDown(link))==LINK )
+  { Child(*res, PrevDown(link));
+    assert(type(*res) == GAP_OBJ, "FindSpannerGap (HEAD): type(*res)!" );
+    nobreak(gap(*res)) = TRUE;
+  }
+  else *res = nilobj;
+
+  debug1(DSF, DD, "  FindSpannerGap returning %s", EchoObject(*res));
+  return (*res != nilobj);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void SpannerAvailableSpace(x, dim, rb, rf)                               */
+/*                                                                           */
+/*  Work out the total space available to hold this spanner, and set         */
+/*  (*rb, *rf) to record this value.  This space equals the total width      */
+/*  of all columns (and their intervening gaps) spanned, with the mark       */
+/*  of the last column being the one separating rb from rf.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void SpannerAvailableSpace(OBJECT y, int dim, FULL_LENGTH *resb,
+					      FULL_LENGTH *resf)
+{ OBJECT slink, s, thr, gp, prevthr;
+  FULL_LENGTH b, f;
+  unsigned thr_type, cat_type;
+
+  assert( type(y) == HSPANNER || type(y) == VSPANNER, "SpannerAvail!");
+  debug4(DSF, DD, "SpannerAvailableSpace(%d %s %s, %s)",
+    spanner_count(y), Image(type(y)), EchoObject(y), dimen(dim));
+  if( dim == COLM )
+  { thr_type = COL_THR;
+    cat_type = HCAT;
+  }
+  else
+  { thr_type = ROW_THR;
+    cat_type = VCAT;
+  }
+
+  /* first calculate the total space consumed in earlier spans */
+  /* Invariant: (b, f) is the size up to and including prev    */
+  /*                                                           */
+  prevthr = nilobj;
+  for( slink = Up(y);  slink != y;  slink = NextUp(slink) )
+  { Parent(s, slink);
+    Parent(thr, UpDim(s, dim));
+    if( type(thr) == thr_type )
+    {
+      assert( thr_state(thr) == SIZED, "SpannerAvailableSpace: thr_state!" );
+      if( prevthr == nilobj )
+      {
+        /* this is the first column spanned over */
+        b = back(thr, dim);
+        f = fwd(thr, dim);
+        debug4(DSF, DD, "  first component %s,%s: b = %s, f = %s",
+          EchoLength(back(thr, dim)), EchoLength(fwd(thr, dim)),
+	  EchoLength(b), EchoLength(f));
+      }
+      else if( FindSpannerGap(thr, dim, cat_type, &gp) )
+      {
+        /* this is a subquent column spanned over */
+        b += MinGap(fwd(prevthr, dim), back(thr, dim), fwd(thr, dim), &gap(gp));
+	f = fwd(thr, dim);
+        debug5(DSF, DD, "  later component %s,%s: gp = %s, b = %s, f = %s",
+          EchoLength(back(thr, dim)), EchoLength(fwd(thr, dim)), EchoObject(gp),
+	  EchoLength(b), EchoLength(f));
+      }
+      else
+      {
+        Error(12, 13, "search for gap preceding %s failed, using zero",
+  	  WARN, &fpos(s), Image(type(s)));
+        b += fwd(prevthr, dim) + back(thr, dim);
+	f = fwd(thr, dim);
+        debug4(DSF, DD, "  later component %s,%s: (no gap), b = %s, f = %s",
+          EchoLength(back(thr, dim)), EchoLength(fwd(thr, dim)),
+	  EchoLength(b), EchoLength(f));
+      }
+    }
+    else
+      Error(12, 14, "%s deleted (out of place)", WARN,&fpos(s),Image(type(s)));
+    prevthr = thr;
+  }
+
+  *resb = b;
+  *resf = f;
+  SetConstraint(constraint(y), MAX_FULL_LENGTH, b+f, MAX_FULL_LENGTH);
+  debug2(DSF, DD, "SpannerAvailableSpace returning %s,%s",
+    EchoLength(*resb), EchoLength(*resf));
+} /* end SpannerAvailableSpace */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT MinSize(x, dim, extras)                                           */
+/*                                                                           */
+/*  Set fwd(x, dim) and back(x, dim) to their minimum possible values.       */
+/*  If dim == ROWM, construct an extras list and return it in *extras.       */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT MinSize(OBJECT x, int dim, OBJECT *extras)
+{ OBJECT y, z, link, prev, t, g, full_name;
+  FULL_LENGTH b, f, dble_fwd, llx, lly, urx, ury; int status;
+  float fllx, flly, furx, fury;
+  BOOLEAN dble_found, found, will_expand, first_line, cp;
+  FILE *fp;  FULL_CHAR buff[MAX_BUFF];
+
+  debug2(DSF, DD, "[ MinSize( %s, %s, extras )", EchoObject(x), dimen(dim));
+  ifdebug(DSF, DDD, DebugObject(x));
+
+  switch( type(x) )
+  {
+
+    case WORD:
+    case QWORD:
+    
+      if( dim == COLM )  FontWordSize(x);
+      break;
+
+
+    case CROSS:
+    case FORCE_CROSS:
+
+      /* add index to the cross-ref */
+      if( dim == ROWM )
+      {	New(z, cross_type(x)); /* CROSS_PREC, CROSS_FOLL or CROSS_FOLL_OR_PREC */
+	debug2(DCR, DD, "  MinSize CROSS: %ld %s", (long) x, EchoObject(x));
+	actual(z) = x;
+	Link(z, x);		/* new code to avoid disposal */
+	Link(*extras, z);
+	debug2(DCR, DD, "  MinSize index: %ld %s", (long) z, EchoObject(z));
+      }
+      back(x, dim) = fwd(x, dim) = 0;
+      break;
+
+
+    case PAGE_LABEL:
+    
+      if( dim == ROWM )
+      { New(z, PAGE_LABEL_IND);
+	actual(z) = x;
+	Link(z, x);
+	Link(*extras, z);
+      }
+      back(x, dim) = fwd(x, dim) = 0;
+      break;
+
+
+    case NULL_CLOS:
+    
+      back(x, dim) = fwd(x, dim) = 0;
+      break;
+
+
+    case HEAD:
+
+      if( dim == ROWM )
+      {	
+	/* replace the galley x by a dummy closure y */
+	New(y, NULL_CLOS);
+	FposCopy(fpos(y), fpos(x));
+	ReplaceNode(y, x);
+
+	if( has_key(actual(x)) )
+	{
+	  /* galley is sorted, make insinuated cross-reference */
+	  New(z, foll_or_prec(x));
+	  pinpoint(z) = y;
+	  Child(t, Down(x));
+	  actual(z) = CrossMake(whereto(x), t, (int) type(z));
+	  Link(*extras, z);
+	  DisposeObject(x);
+	  debug1(DCR, DDD, "  MinSize: %s", EchoObject(z));
+	}
+	else
+	{
+	  /* galley is following, make UNATTACHED */
+	  New(z, UNATTACHED);  Link(z, x);
+	  pinpoint(z) = y;
+	  Link(*extras, z);
+	  debug1(DCR, DDD, "  MinSize: %s", EchoObject(z));
+	}
+	x = y;	/* now sizing y, not x */
+	back(x, COLM) = fwd(x, COLM) = 0;  /* fix non-zero size @Null bug!! */
+      }
+      else
+      {
+	debug2(DGT, D, "MinSize setting external_ver(%s %s) = FALSE",
+	  Image(type(x)), SymName(actual(x)));
+	external_ver(x) = external_hor(x) = FALSE;
+      }
+      back(x, dim) = fwd(x, dim) = 0;
+      break;
+
+
+    case CLOSURE:
+
+      assert( !has_target(actual(x)), "MinSize: CLOSURE has target!" );
+      if( dim == ROWM )
+      { if( indefinite(actual(x)) )
+	{ New(z, RECEPTIVE);
+	  actual(z) = x;
+	  Link(*extras, z);
+	  debug1(DCR, DDD, "  MinSize: %s", EchoObject(z));
+	}
+	else if( recursive(actual(x)) )
+	{ New(z, RECURSIVE);
+	  actual(z) = x;
+	  Link(*extras, z);
+	  debug1(DCR, DDD, "  MinSize: %s", EchoObject(z));
+	}
+	else
+	{ assert(FALSE, "MinSize: definite non-recursive closure");
+	}
+      }
+      else
+      {
+	debug2(DGT, DD, "MinSize setting external_ver(%s %s) = FALSE",
+	  Image(type(x)), SymName(actual(x)));
+	external_ver(x) = external_hor(x) = FALSE;/* nb must be done here!*/
+      }
+      back(x, dim) = fwd(x, dim) = 0;
+      break;
+
+
+    case ONE_COL:
+    case ONE_ROW:
+    case HCONTRACT:
+    case VCONTRACT:
+    case HLIMITED:
+    case VLIMITED:
+    
+      Child(y, Down(x));
+      y = MinSize(y, dim, extras);
+      back(x, dim) = back(y, dim);
+      fwd(x, dim)  = fwd(y, dim);
+      break;
+
+
+    case BACKGROUND:
+
+      Child(y, Down(x));
+      y = MinSize(y, dim, extras);
+      Child(y, LastDown(x));
+      y = MinSize(y, dim, extras);
+      back(x, dim) = back(y, dim);
+      fwd(x, dim)  = fwd(y, dim);
+      break;
+
+
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case HSPAN:
+    case VSPAN:
+
+      /* if first touch, build the spanner */
+      if( (type(x) == START_HVSPAN || type(x) == START_HSPAN ||
+	   type(x) == START_VSPAN) && dim == COLM )
+      {
+        if( !BuildSpanner(x) )
+	{
+	  t = MakeWord(WORD, STR_EMPTY, &fpos(x));
+	  ReplaceNode(t, x);
+	  x = t;
+	  back(x, COLM) = fwd(x, COLM) = 0;
+	  break;
+	}
+      }
+
+      /* if first vertical touch, break if necessary */
+      if( (type(x) == START_HVSPAN || type(x) == START_HSPAN) && dim == ROWM )
+      { CONSTRAINT c;
+ 
+        /* find the HSPANNER */
+	Child(t, DownDim(x, COLM));
+        assert( type(t) == HSPANNER, "MinSize/SPAN: type(t) != HSPANNER!" );
+ 
+        /* find the available space for this HSPANNER and break it */
+        SpannerAvailableSpace(t, COLM, &b, &f);
+        SetConstraint(c, MAX_FULL_LENGTH, b+f, MAX_FULL_LENGTH);
+        debug2(DSF,D, "  BreakObject(%s,%s)",EchoObject(t),EchoConstraint(&c));
+        t = BreakObject(t, &c);
+        spanner_broken(t) = TRUE;
+      }
+ 
+      /* make sure that HSPAN links to HSPANNER, VSPAN to VSPANNER      */
+      /* NB must follow breaking since that could affect the value of y */
+      Child(y, DownDim(x, dim));
+      if( (type(x) == HSPAN && type(y) != HSPANNER) ||
+	  (type(x) == VSPAN && type(y) != VSPANNER) )
+      {
+	if( dim == COLM )
+	  Error(12, 15, "%s replaced by empty object (out of place)",
+	    WARN, &fpos(x), Image(type(x)));
+        back(x, dim) = fwd(x, dim) = 0;
+	break;
+      }
+
+      /* now size the object */
+      if( (type(x)==HSPAN && dim==ROWM) || (type(x)==VSPAN && dim==COLM) )
+      {
+	/* perp dimension, covered by preceding @Span, so may be zero. */
+	back(x, dim) = fwd(x, dim) = 0;
+      }
+      else if( type(y) != HSPANNER && type(y) != VSPANNER )
+      {
+	/* no spanning in this dimension */
+	MinSize(y, dim, extras);
+	back(x, dim) = back(y, dim);
+	fwd(x, dim) = fwd(y, dim);
+      }
+      else if( ++spanner_sized(y) != spanner_count(y) )
+      {
+	/* not the last column or row, so say zero */
+	back(x, dim) = fwd(x, dim) = 0;
+      }
+      else
+      {
+	/* this is the last column or row of a spanner.  Its width is its */
+	/* natural width minus anything that will fit over the top of the */
+	/* things it spans.                                               */
+
+	MinSize(y, dim, extras);
+	SpannerAvailableSpace(y, dim, &b, &f);
+	back(x, dim) = 0;
+	fwd(x, dim) = find_max(size(y, dim) - b, 0);
+	debug3(DSF, DD, "  size(y, %s) = %s,%s", dimen(dim),
+	  EchoLength(back(y, dim)), EchoLength(fwd(y, dim)));
+      }
+      debug4(DSF, DD, "finishing MinSize(%s) of %s span, reporting %s,%s",
+	dimen(dim), spanner_count(y) != 1 ? "multi-column" : "one-column",
+	EchoLength(back(x, dim)), EchoLength(fwd(x, dim)));
+      break;
+
+
+    case HSPANNER:
+    case VSPANNER:
+
+      assert( (type(x) == HSPANNER) == (dim == COLM), "MinSize: SPANNER!" );
+      Child(y, Down(x));
+      y = MinSize(y, dim, extras);
+      back(x, dim) = back(y, dim);
+      fwd(x, dim)  = fwd(y, dim);
+      break;
+
+
+    case HEXPAND:
+    case VEXPAND:
+
+      Child(y, Down(x));
+      y = MinSize(y, dim, extras);
+      back(x, dim) = back(y, dim);
+      fwd(x, dim)  = fwd(y, dim);
+
+      /* insert index into *extras for expanding later */
+      if( dim == ROWM )
+      {	New(z, EXPAND_IND);
+	actual(z) = x;
+	Link(*extras, z);
+	/* Can't do Link(z, x) because Constrained goes up and finds z */
+	debug2(DCR, DD, "  MinSize index: %ld %s", (long) z, EchoObject(z));
+      }	
+      break;
+
+
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+    
+      Child(y, LastDown(x));
+      y = MinSize(y, dim, extras);
+      back(x, dim) = back(y, dim);
+      fwd(x, dim)  = fwd(y, dim);
+      break;
+
+
+    case HCOVER:
+    case VCOVER:
+
+      /* work out size and set to 0 if parallel */
+      Child(y, Down(x));
+      y = MinSize(y, dim, extras);
+      if( (dim == COLM) == (type(x) == HCOVER) )
+	back(x, dim) = fwd(x, dim) = 0;
+      else
+      {	back(x, dim) = back(y, dim);
+	fwd(x, dim)  = fwd(y, dim);
+      }
+
+      /* insert index into *extras for revising size later */
+      if( dim == ROWM )
+      {	New(z, COVER_IND);
+	actual(z) = x;
+	Link(*extras, z);
+	/* Can't do Link(z, x) because Constrained goes up and finds z */
+	debug2(DCR, DD, "  MinSize index: %ld %s", (long) z, EchoObject(z));
+      }	
+      break;
+
+
+    case HSCALE:
+    case VSCALE:
+
+      /* work out size and set to 0 if parallel */
+      Child(y, Down(x));
+      y = MinSize(y, dim, extras);
+      if( (dim == COLM) == (type(x) == HSCALE) )
+	back(x, dim) = fwd(x, dim) = 0;
+      else
+      {	back(x, dim) = back(y, dim);
+	fwd(x, dim)  = fwd(y, dim);
+      }
+      break;
+
+
+    case ROTATE:
+    
+      Child(y, Down(x));
+      if( dim == COLM )
+      {	y = MinSize(y, COLM, extras);
+	New(whereto(x), ACAT);
+	y = MinSize(y, ROWM, &whereto(x));
+	RotateSize(&back(x, COLM), &fwd(x, COLM), &back(x, ROWM), &fwd(x, ROWM),
+	  y, sparec(constraint(x)));
+      }
+      else
+      {	TransferLinks(Down(whereto(x)), whereto(x), *extras);
+	Dispose(whereto(x));
+      }
+      break;
+	
+
+    case SCALE:
+
+      Child(y, Down(x));
+      y = MinSize(y, dim, extras);
+      if( dim == COLM )
+      { back(x, dim) = (back(y, dim) * bc(constraint(x))) / SF;
+        fwd(x, dim)  = (fwd(y, dim)  * bc(constraint(x))) / SF;
+	if( bc(constraint(x)) == 0 )  /* Lout-supplied factor required */
+        { New(z, SCALE_IND);
+	  actual(z) = x;
+	  Link(*extras, z);
+	  debug1(DSF, DDD, "  MinSize: %s", EchoObject(z));
+	  vert_sized(x) = FALSE;
+        }	
+      }
+      else
+      { back(x, dim) = (back(y, dim) * fc(constraint(x))) / SF;
+        fwd(x, dim)  = (fwd(y, dim)  * fc(constraint(x))) / SF;
+	vert_sized(x) = TRUE;
+      }
+      break;
+
+
+    case KERN_SHRINK:
+
+
+      Child(y, LastDown(x));
+      y = MinSize(y, dim, extras);
+      if( dim == COLM )
+      { FULL_CHAR ch_left, ch_right;  FULL_LENGTH ksize;
+	debug3(DSF, DD, "MinSize(%s,%s %s, COLM)",
+	  EchoLength(back(y, COLM)), EchoLength(fwd(y, COLM)),
+	  EchoObject(x));
+
+	/* default value if don't find anything */
+       	back(x, dim) = back(y, dim);
+	fwd(x, dim)  = fwd(y, dim);
+
+	/* find first character of left parameter */
+	ch_right = (FULL_CHAR) '\0';
+	Child(y, Down(x));
+	while( type(y) == ACAT )
+	{ Child(y, Down(y));
+	}
+	if( is_word(type(y)) )  ch_right = string(y)[0];
+
+	/* find last character of right parameter */
+	ch_left = (FULL_CHAR) '\0';
+	Child(y, LastDown(x));
+	while( type(y) == ACAT )
+	{ Child(y, LastDown(y));
+	}
+	if( is_word(type(y)) )  ch_left = string(y)[StringLength(string(y))-1];
+
+	/* adjust if successful */
+	if( ch_left != (FULL_CHAR) '\0' && ch_right != (FULL_CHAR) '\0' )
+	{
+	  ksize = KernLength(word_font(y), ch_left, ch_right);
+	  debug4(DSF, DD, "  KernLength(%s, %c, %c) = %s",
+	    FontName(word_font(y)), (char) ch_left, (char) ch_right,
+	    EchoLength(ksize));
+	  fwd(x, dim) += ksize;
+	}
+
+      }
+      else
+      {	back(x, dim) = back(y, dim);
+	fwd(x, dim)  = fwd(y, dim);
+      }
+      break;
+
+
+    case WIDE:
+
+      Child(y, Down(x));
+      y = MinSize(y, dim, extras);
+      if( dim == COLM )
+      { y = BreakObject(y, &constraint(x));
+        assert( FitsConstraint(back(y, dim), fwd(y, dim), constraint(x)),
+		"MinSize: BreakObject failed to fit!" );
+        back(x, dim) = back(y, dim);
+	fwd(x, dim)  = fwd(y, dim);
+	EnlargeToConstraint(&back(x, dim), &fwd(x, dim), &constraint(x));
+      }
+      else
+      {	back(x, dim) = back(y, dim);
+	fwd(x, dim)  = fwd(y, dim);
+      }
+      break;
+
+
+    case HIGH:
+    
+      Child(y, Down(x));
+      y = MinSize(y, dim, extras);
+      if( dim == ROWM )
+      { if( !FitsConstraint(back(y, dim), fwd(y, dim), constraint(x)) )
+        { Error(12, 1, "forced to enlarge %s from %s to %s", WARN, &fpos(x),
+	    KW_HIGH, EchoLength(bfc(constraint(x))), EchoLength(size(y, dim)));
+	  debug0(DSF, DD, "offending object was:");
+	  ifdebug(DSF, DD, DebugObject(y));
+	  SetConstraint(constraint(x), MAX_FULL_LENGTH, size(y, dim), MAX_FULL_LENGTH);
+        }
+        back(x, dim) = back(y, dim);
+	fwd(x, dim)  = fwd(y, dim);
+	EnlargeToConstraint(&back(x, dim), &fwd(x, dim), &constraint(x));
+      }
+      else
+      {	back(x, dim) = back(y, dim);
+	fwd(x, dim)  = fwd(y, dim);
+      }
+      break;
+
+
+    case HSHIFT:
+    case VSHIFT:
+
+      Child(y, Down(x));
+      y = MinSize(y, dim, extras);
+      if( (dim == COLM) == (type(x) == HSHIFT) )
+      { f = FindShift(x, y, dim);
+	back(x, dim) = find_min(MAX_FULL_LENGTH, find_max(0, back(y, dim) + f));
+	fwd(x, dim)  = find_min(MAX_FULL_LENGTH, find_max(0, fwd(y, dim)  - f));
+      }
+      else
+      { back(x, dim) = back(y, dim);
+	fwd(x, dim) = fwd(y, dim);
+      }
+      break;
+
+
+    case SPLIT:
+    
+      link = DownDim(x, dim);  Child(y, link);
+      y = MinSize(y, dim, extras);
+      back(x, dim) = back(y, dim);
+      fwd(x, dim)  = fwd(y, dim);
+      break;
+
+
+    case ACAT:
+    case HCAT:
+    case VCAT:
+    
+      if( (dim == ROWM) == (type(x) == VCAT) )
+      {
+	/********************************************************************/
+	/*                                                                  */
+	/*  Calculate sizes parallel to join direction; loop invariant is:  */
+	/*                                                                  */
+	/*     If prev == nilobj, there are no definite children equal to   */
+	/*        or to the left of Child(link).                            */
+	/*     If prev != nilobj, prev is the rightmost definite child to   */
+	/*        the left of Child(link), and (b, f) is the total size up  */
+	/*        to the mark of prev i.e. not including fwd(prev).         */
+	/*     g is the most recent gap, or nilobj if none found yet.       */
+	/*     will_expand == TRUE when a gap is found that is likely to    */
+	/*        enlarge when ActualGap is called later on.                */
+	/*                                                                  */
+	/********************************************************************/
+
+	prev = g = nilobj;  will_expand = FALSE;  must_expand(x) = FALSE;
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ Child(y, link);
+	  if( is_index(type(y)) )
+	  { if( dim == ROWM )
+	    { link = PrevDown(link);
+	      MoveLink(NextDown(link), *extras, PARENT);
+	    }
+	    continue;
+	  }
+	  else if( type(y) == type(x) )
+	  { link = PrevDown(link);
+	    TransferLinks(Down(y), y, NextDown(link));
+	    DisposeChild(Up(y));
+	    continue;
+	  }
+	  else if( type(y) == GAP_OBJ )  g = y;
+	  else /* calculate size of y and accumulate it */
+	  { if( is_word(type(y)) )
+	    { if( dim == COLM )
+	      {
+		/* compress adjacent words if compatible */
+		if( prev != nilobj && width(gap(g)) == 0 && nobreak(gap(g)) &&
+		    type(x) == ACAT &&
+		    is_word(type(prev)) && vspace(g) + hspace(g) == 0 &&
+		    units(gap(g)) == FIXED_UNIT &&
+		    mode(gap(g)) == EDGE_MODE && !mark(gap(g)) &&
+		    word_font(prev) == word_font(y) &&
+		    word_colour(prev) == word_colour(y) &&
+		    word_language(prev) == word_language(y) &&
+		    underline(prev) == underline(y) &&
+		    NextDown(NextDown(Up(prev))) == link
+		    )
+		{
+		  unsigned typ;
+		  debug3(DSF, DD, "compressing %s and %s at %s",
+		    EchoObject(prev), EchoObject(y), EchoFilePos(&fpos(prev)));
+		  if( StringLength(string(prev)) + StringLength(string(y))
+		      >= MAX_BUFF )
+		    Error(12, 2, "word %s%s is too long", FATAL, &fpos(prev),
+		      string(prev), string(y));
+		  typ = type(prev) == QWORD || type(y) == QWORD ? QWORD : WORD;
+		  y = MakeWordTwo(typ, string(prev), string(y), &fpos(prev));
+		  word_font(y) = word_font(prev);
+		  word_colour(y) = word_colour(prev);
+		  word_language(y) = word_language(prev);
+		  word_hyph(y) = word_hyph(prev);
+		  underline(y) = underline(prev);
+		  FontWordSize(y);
+		  Link(Up(prev), y);
+		  DisposeChild(Up(prev));
+		  DisposeChild(Up(g));
+		  DisposeChild(link);
+		  prev = y;
+		  link = Up(prev);
+		  continue;
+		}
+
+		FontWordSize(y);
+		debug4(DSF, DD, "FontWordSize( %s ) font %d = %s,%s",
+		EchoObject(y), word_font(y),
+		EchoLength(back(y, COLM)), EchoLength(fwd(y, COLM)));
+	      }
+	    }
+	    else y = MinSize(y, dim, extras);
+
+	    if( is_indefinite(type(y)) )
+	    {
+	      /* error if preceding gap has mark */
+	      if( g != nilobj && mark(gap(g)) )
+	      {	Error(12, 3, "^ deleted (it may not precede this object)",
+		  WARN, &fpos(y));
+		mark(gap(g)) = FALSE;
+	      }
+
+	      /* error if next unit is used in preceding gap */
+	      if( g != nilobj && units(gap(g)) == NEXT_UNIT )
+	      {	Error(12, 4, "gap replaced by 0i (%c unit not allowed here)",
+		  WARN, &fpos(y), CH_UNIT_WD);
+		units(gap(g)) = FIXED_UNIT;
+		width(gap(g)) = 0;
+	      }
+	    }
+	    else
+	    {
+	      /* calculate running total length */
+	      if( prev == nilobj )  b = back(y, dim), f = 0;
+	      else
+	      { FULL_LENGTH tmp;
+		tmp = MinGap(fwd(prev,dim), back(y,dim), fwd(y, dim), &gap(g));
+		assert(g!=nilobj && mode(gap(g))!=NO_MODE, "MinSize: NO_MODE!");
+		if( units(gap(g)) == FIXED_UNIT && mode(gap(g)) == TAB_MODE )
+		{
+		  f = find_max(width(gap(g)) + back(y, dim), f + tmp);
+		}
+		else
+		{
+		  f = f + tmp;
+		}
+		if( units(gap(g)) == FRAME_UNIT && width(gap(g)) > FR )
+		    will_expand = TRUE;
+		if( units(gap(g)) == AVAIL_UNIT && mark(gap(g)) && width(gap(g)) > 0 )
+		  Error(12, 9, "mark alignment incompatible with centring or right justification",
+		    WARN, &fpos(g));
+		/* ***
+		if( units(gap(g)) == AVAIL_UNIT && width(gap(g)) >= FR )
+		    will_expand = TRUE;
+		*** */
+		if( mark(gap(g)) )  b += f, f = 0;
+	      }
+	      prev = y;
+	    }
+	    debug2(DSF,DD,"  b = %s, f = %s",EchoLength(b),EchoLength(f));
+	  }
+	} /* end for */
+
+	if( prev == nilobj )  b = f = 0;
+	else f += fwd(prev, dim);
+	back(x, dim) = find_min(MAX_FULL_LENGTH, b);
+	fwd(x, dim)  = find_min(MAX_FULL_LENGTH, f);
+
+	if( type(x) == ACAT && will_expand )  fwd(x, COLM) = MAX_FULL_LENGTH;
+      }
+      else
+      {
+	/********************************************************************/
+	/*                                                                  */
+	/*  Calculate sizes perpendicular to join direction                 */
+	/*                                                                  */
+	/*  Loop invariant:                                                 */
+	/*                                                                  */
+	/*     if found, (b, f) is the size of x, from the last // or from  */
+	/*     the start, up to link exclusive.  Else no children yet.      */
+	/*     If dble_found, a previous // exists, and (0, dble_fwd) is    */
+	/*     the size of x from the start up to that //.                  */
+	/*                                                                  */
+	/********************************************************************/
+
+	dble_found = found = FALSE;  dble_fwd = 0;
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ Child(y, link);
+	  debug4(DSF, DD, "  %s in %s, y = %s %s", dimen(dim),
+	    Image(type(x)), Image(type(y)), EchoObject(y));
+	  if( is_index(type(y)) )
+	  { if( dim == ROWM )
+	    { link = PrevDown(link);
+	      MoveLink(NextDown(link), *extras, PARENT);
+	    }
+	    continue;
+	  }
+	  else if( type(y) == type(x) )
+	  { link = PrevDown(link);
+	    TransferLinks(Down(y), y, NextDown(link));
+	    DisposeChild(Up(y));
+	    continue;
+	  }
+	  else if( type(y) == GAP_OBJ )
+	  { assert( found, "MinSize/VCAT/perp: !found!" );
+	    if( !join(gap(y)) )
+	    {
+	      /* found // or || operator, so end current group */
+	      dble_found = TRUE;
+	      dble_fwd = find_max(dble_fwd, b + f);
+	      debug1(DSF, DD, "  endgroup, dble_fwd: %s", EchoLength(dble_fwd));
+	      found = FALSE;
+	    }
+	  }
+	  else /* found object */
+	  {
+	    /* calculate size of subobject y */
+	    if( is_word(type(y)) )
+	    { if( dim == COLM )  FontWordSize(y);
+	    }
+	    else y = MinSize(y, dim, extras);
+	    if( found )
+	    { b = find_max(b, back(y, dim));
+	      f = find_max(f, fwd(y, dim));
+	    }
+	    else
+	    { b = back(y, dim);
+	      f = fwd(y, dim);
+	      found = TRUE;
+	    }
+	    debug2(DSF,DD, "  b: %s, f: %s", EchoLength(b), EchoLength(f));
+	  }
+	} /* end for */
+	assert( found, "MinSize/VCAT/perp: !found (2)!" );
+
+	/* finish off last group */
+	if( dble_found )
+	{ back(x, dim) = 0;
+	  dble_fwd = find_max(dble_fwd, b + f);
+	  fwd(x, dim) = find_min(MAX_FULL_LENGTH, dble_fwd);
+	  debug1(DSF, DD, "  end group, dble_fwd: %s", EchoLength(dble_fwd));
+	}
+	else
+	{ back(x, dim) = b;
+	  fwd(x, dim)  = f;
+	}
+      } /* end else */
+      break;
+
+
+    case COL_THR:
+
+      assert( dim == COLM, "MinSize/COL_THR: dim!" );
+      if( thr_state(x) == NOTSIZED )
+      {	assert( Down(x) != x, "MinSize/COL_THR: Down(x)!" );
+
+	/* first size all the non-spanning members of the thread */
+	debug1(DSF, DD,  "[[ starting sizing %s", Image(type(x)));
+	b = f = 0;
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ Child(y, link);
+	  assert( type(y) != GAP_OBJ, "MinSize/COL_THR: GAP_OBJ!" );
+	  if( type(y) != START_HVSPAN && type(y) != START_HSPAN &&
+	      type(y) != HSPAN && type(y) != VSPAN )
+	  { y = MinSize(y, dim, extras);
+	    b = find_max(b, back(y, dim));
+	    f = find_max(f, fwd(y, dim));
+	  }
+	}
+	back(x, dim) = b;
+	fwd(x, dim)  = f;
+	thr_state(x) = SIZED;
+	debug3(DSF, DD,  "][ middle sizing %s (%s,%s)", Image(type(x)),
+	  EchoLength(back(x, dim)), EchoLength(fwd(x, dim)));
+
+	/* now size all the spanning members of the thread           */
+	/* these will use back(x, dim) and fwd(x, dim) during sizing */
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ Child(y, link);
+	  assert( type(y) != GAP_OBJ, "MinSize/COL_THR: GAP_OBJ!" );
+	  if( type(y) == START_HVSPAN || type(y) == START_HSPAN ||
+	      type(y) == HSPAN || type(y) == VSPAN )
+	  { y = MinSize(y, dim, extras);
+	    b = find_max(b, back(y, dim));
+	    f = find_max(f, fwd(y, dim));
+	  }
+	}
+	back(x, dim) = b;
+	fwd(x, dim)  = f;
+	debug3(DSF, DD,  "]] end sizing %s (%s,%s)", Image(type(x)),
+	  EchoLength(back(x, dim)), EchoLength(fwd(x, dim)));
+      }
+      break;
+
+
+    case ROW_THR:
+
+      assert( dim == ROWM, "MinSize/ROW_THR: dim!" );
+      if( thr_state(x) == NOTSIZED )
+      {	assert( Down(x) != x, "MinSize/ROW_THR: Down(x)!" );
+
+	/* first size all the non-spanning members of the thread */
+	debug1(DSF, D,  "[[ starting sizing %s", Image(type(x)));
+	b = f = 0;
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ Child(y, link);
+	  assert( type(y) != GAP_OBJ, "MinSize/COL_THR: GAP_OBJ!" );
+	  if( type(y) != START_HVSPAN && type(y) != START_VSPAN &&
+	      type(y) != HSPAN        && type(y) != VSPAN )
+	  { y = MinSize(y, dim, extras);
+	    debug5(DSF, D, "   MinSize(%s) has size %s,%s -> %s,%s",
+	      Image(type(y)), EchoLength(back(y, dim)), EchoLength(fwd(y, dim)),
+	      EchoLength(b), EchoLength(f));
+	    b = find_max(b, back(y, dim));
+	    f = find_max(f, fwd(y, dim));
+	  }
+	}
+	back(x, dim) = b;
+	fwd(x, dim)  = f;
+	thr_state(x) = SIZED;
+	debug3(DSF, D,  "][ middle sizing %s (%s,%s)", Image(type(x)),
+	  EchoLength(back(x, dim)), EchoLength(fwd(x, dim)));
+
+	/* now size all the spanning members of the thread           */
+	/* these will use back(x, dim) and fwd(x, dim) during sizing */
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ Child(y, link);
+	  assert( type(y) != GAP_OBJ, "MinSize/COL_THR: GAP_OBJ!" );
+	  if( type(y) == START_HVSPAN || type(y) == START_VSPAN ||
+	      type(y) == HSPAN ||        type(y) == VSPAN )
+	  { y = MinSize(y, dim, extras);
+	    back(x, dim) = find_max(back(x, dim), back(y, dim));
+	    fwd(x, dim) = find_max(fwd(x, dim), fwd(y, dim));
+	    debug5(DSF, D, "   MinSize(%s) has size %s,%s -> %s,%s",
+	      Image(type(y)), EchoLength(back(y, dim)), EchoLength(fwd(y, dim)),
+	      EchoLength(back(x, dim)), EchoLength(fwd(x, dim)));
+	  }
+	}
+	debug3(DSF, D,  "]] end sizing %s (%s,%s)", Image(type(x)),
+	  EchoLength(back(x, dim)), EchoLength(fwd(x, dim)));
+      }
+      break;
+
+
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+
+      /* open file, check for initial %!, and hunt for %%BoundingBox line */
+      /* according to DSC Version 3.0, the BoundingBox parameters must be */
+      /* integers; but we read them as floats and truncate since files    */
+      /* with fractional values seem to be common in the real world       */
+      if( dim == ROWM )  break;
+      status = IG_LOOKING;
+      Child(y, Down(x));
+      fp = OpenIncGraphicFile(string(y), type(x), &full_name, &fpos(y), &cp);
+      if( fp == NULL )  status = IG_NOFILE;
+      first_line = TRUE;
+      while( status == IG_LOOKING && StringFGets(buff, MAX_BUFF, fp) != NULL )
+      {
+	if( first_line && !StringBeginsWith(buff, AsciiToFull("%!")) )
+	  status = IG_BADFILE;
+	else
+	{ first_line = FALSE;
+	  if( buff[0] == '%'
+	      && StringBeginsWith(buff, AsciiToFull("%%BoundingBox:"))
+	      && !StringContains(buff, AsciiToFull("(atend)")) )
+	  { if( sscanf( (char *) buff, "%%%%BoundingBox: %f %f %f %f",
+		&fllx, &flly, &furx, &fury) == 4 )
+	    {
+	      status = IG_OK;
+	      llx = fllx;
+	      lly = flly;
+	      urx = furx;
+	      ury = fury;
+	    }
+	    else status = IG_BADSIZE;
+	  }
+	}
+      }
+
+      /* report error or calculate true size, depending on status */
+      switch( status )
+      {
+	case IG_NOFILE:
+
+	  Error(12, 5, "%s deleted (cannot open file %s)", WARN, &fpos(x),
+	    type(x) == INCGRAPHIC ? KW_INCGRAPHIC : KW_SINCGRAPHIC,
+	    string(full_name));
+	  incgraphic_ok(x) = FALSE;
+	  back(x, COLM) = fwd(x, COLM) = back(x, ROWM) = fwd(x, ROWM) = 0;
+	  break;
+
+	case IG_LOOKING:
+
+	  Error(12, 6, "%s given zero size (no BoundingBox line in file %s)",
+	    WARN, &fpos(x),
+	    type(x) == INCGRAPHIC ? KW_INCGRAPHIC : KW_SINCGRAPHIC,
+	    string(full_name));
+	  back(y, COLM) = fwd(y, COLM) = back(y, ROWM) = fwd(y, ROWM) = 0;
+	  back(x, COLM) = fwd(x, COLM) = back(x, ROWM) = fwd(x, ROWM) = 0;
+	  incgraphic_ok(x) = TRUE;
+	  fclose(fp);
+	  if( cp )  StringRemove(AsciiToFull(LOUT_EPS));
+	  break;
+
+	case IG_BADFILE:
+
+	  Error(12, 7, "%s deleted (bad first line in file %s)", WARN,
+	    &fpos(x), type(x) == INCGRAPHIC ? KW_INCGRAPHIC : KW_SINCGRAPHIC,
+	    string(full_name));
+	  incgraphic_ok(x) = FALSE;
+	  back(x, COLM) = fwd(x, COLM) = back(x, ROWM) = fwd(x, ROWM) = 0;
+	  fclose(fp);
+	  if( cp )  StringRemove(AsciiToFull(LOUT_EPS));
+	  break;
+	
+	case IG_BADSIZE:
+
+	  Error(12, 8, "%s given zero size (bad BoundingBox line in file %s)",
+	    WARN, &fpos(x),
+	    type(x) == INCGRAPHIC ? KW_INCGRAPHIC : KW_SINCGRAPHIC,
+	    string(full_name));
+	  back(y, COLM) = fwd(y, COLM) = back(y, ROWM) = fwd(y, ROWM) = 0;
+	  back(x, COLM) = fwd(x, COLM) = back(x, ROWM) = fwd(x, ROWM) = 0;
+	  incgraphic_ok(x) = TRUE;
+	  fclose(fp);
+	  if( cp )  StringRemove(AsciiToFull(LOUT_EPS));
+	  break;
+
+	case IG_OK:
+
+	  Child(y, Down(x));
+	  back(y, COLM) = llx;  fwd(y, COLM) = urx;
+	  back(y, ROWM) = lly;  fwd(y, ROWM) = ury;
+	  b = (urx - llx) * PT;
+	  b = find_min(MAX_FULL_LENGTH, find_max(0, b));
+	  back(x, COLM) = fwd(x, COLM) = b / 2;
+	  b = (ury - lly) * PT;
+	  b = find_min(MAX_FULL_LENGTH, find_max(0, b));
+	  back(x, ROWM) = fwd(x, ROWM) = b / 2;
+	  incgraphic_ok(x) = TRUE;
+	  fclose(fp);
+	  if( cp )  StringRemove(AsciiToFull(LOUT_EPS));
+	  break;
+
+      }
+      DisposeObject(full_name);
+      break;
+
+
+    default:
+    
+      assert1(FALSE, "MinSize", Image(type(x)));
+      break;
+
+
+  } /* end switch */
+  debug1(DSF, DD,  "] MinSize returning, x = %s", EchoObject(x));
+  debug3(DSF, DD, "  (%s size is %s, %s)", dimen(dim),
+		EchoLength(back(x, dim)), EchoLength(fwd(x, dim)) );
+  ifdebug(DSF, DDD, DebugObject(x));
+
+  assert(back(x, dim) >= 0, "MinSize: back(x, dim) < 0!");
+  assert(fwd(x, dim) >= 0, "MinSize: fwd(x, dim) < 0!");
+
+  return x;
+} /* end MinSize */
diff --git a/z13.c b/z13.c
new file mode 100644
index 0000000..62b71d7
--- /dev/null
+++ b/z13.c
@@ -0,0 +1,748 @@
+/*@z13.c:Object Breaking:BreakJoinedGroup()@**********************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z13.c                                                      */
+/*  MODULE:       Object Breaking                                            */
+/*  EXTERNS:      BreakObject()                                              */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define	broken(x)	back(x, ROWM)	/* OK since no vertical sizes yet    */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static BreakJoinedGroup(start, stop, m, c, res_back, res_fwd)            */
+/*                                                                           */
+/*  Break joined group of components of a VCAT, beginning from Child(start)  */
+/*  inclusive and ending at Child(stop) inclusive.  Break component m first  */
+/*  because it is the widest.                                                */
+/*                                                                           */
+/*****************************************************************************/
+
+static void BreakJoinedGroup(OBJECT start, OBJECT stop, OBJECT m,
+CONSTRAINT *c, FULL_LENGTH *res_back, FULL_LENGTH *res_fwd)
+{ OBJECT y, link;  FULL_LENGTH b, f, sb, sf;  CONSTRAINT yc;
+  debug1(DOB, DD, "[ BreakJoinedGroup(start, stop, m, %s, -, -)",
+    EchoConstraint(c));
+
+  /* work out a suitable constraint to apply to each component */
+  sb = sf = 0;
+  for( link = start;  link != NextDown(stop);  link = NextDown(link) )
+  { Child(y, link);
+    if( !is_definite(type(y)) )  continue;
+    sb = find_max(sb, back(y, COLM));
+    sf = find_max(sf, fwd(y, COLM));
+  }
+  if( sb <= bc(*c) )
+  {
+    /* make sure the constraint will accept objects with size (sb, 0) */
+    b = sb;
+    f = 0;
+  }
+  else
+  {
+    /* sb is too wide anyway, so don't worry about it */
+    b = 0;
+    f = 0;
+  }
+  SetConstraint(yc, find_min(bc(*c), bfc(*c)-f), bfc(*c), find_min(fc(*c), bfc(*c)-b));
+
+  /* apply this constraint to each component in turn, m first */
+  if( m != nilobj )
+  {
+    debug1(DOB, DD, "  +++BreakJoinedGroup calling first child, yc = %s",
+      EchoConstraint(&yc));
+    m = BreakObject(m, &yc);
+    b = back(m, COLM);
+    f = fwd(m, COLM);
+    SetConstraint(yc, find_min(bc(yc), bfc(yc)-f), bfc(yc), find_min(fc(yc), bfc(yc)-b));
+  }
+  else b = f = 0;
+  for( link = start;  link != NextDown(stop);  link = NextDown(link) )
+  { Child(y, link);
+    if( !is_definite(type(y)) || y == m )  continue;
+    debug1(DOB, DD, "  +++BreakJoinedGroup calling child, yc = %s",
+      EchoConstraint(&yc));
+    y = BreakObject(y, &yc);
+    b = find_max(b, back(y, COLM));
+    f = find_max(f, fwd(y, COLM));
+    SetConstraint(yc, find_min(bc(yc), bfc(yc)-f), bfc(yc), find_min(fc(yc), bfc(yc)-b));
+  }
+  if( !FitsConstraint(b, f, *c) )
+  { debug3(DOB, DD, "  in BreakJoinedGroup: !FitsConstraint(%s, %s, %s)",
+      EchoLength(b), EchoLength(f), EchoConstraint(c));
+    Error(13, 1, "failed to break column to fit into its available space",
+      WARN, m != nilobj ? &fpos(m) : (y != nilobj ? &fpos(y) : no_fpos));
+  }
+  *res_back = b;  *res_fwd = f;
+  debug2(DOB, DD,"] BreakJoinedGroup returning (%s, %s)",
+	EchoLength(b), EchoLength(f));
+} /* end BreakJoinedGroup */
+
+
+/*@::BreakVcat()@*************************************************************/
+/*                                                                           */
+/*  static OBJECT BreakVcat(x, c)                                            */
+/*                                                                           */
+/*  Break a VCAT to satisfy constraint c.  This is tedious because every     */
+/*  group of components between //  ...  // must be broken separately.       */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT BreakVcat(OBJECT x, CONSTRAINT *c)
+{ OBJECT y, link, start_group, m;  FULL_LENGTH b, f, dble_fwd;  CONSTRAINT tc;
+  BOOLEAN dble_found;
+  debug1(DOB, DD, "[ BreakVcat(x, %s)", EchoConstraint(c));
+  assert(Down(x) != x, "BreakVcat: Down(x) == x!" );
+  SetConstraint(tc, MAX_FULL_LENGTH, find_min(bfc(*c), fc(*c)), MAX_FULL_LENGTH);
+  
+  dble_found = FALSE;  dble_fwd = 0;  start_group = nilobj;
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( is_index(type(y)) )  continue;
+    if( type(y) == GAP_OBJ )
+    { assert( start_group != nilobj, "BreakVcat: start_group == nilobj!" );
+      if( !join(gap(y)) )
+      {
+	/* finish off and break this group */
+	if( !FitsConstraint(b, f, tc) )
+	  BreakJoinedGroup(start_group, link, m, &tc, &b, &f);
+	dble_found = TRUE;
+	dble_fwd = find_max(dble_fwd, b + f);
+	start_group = nilobj;
+	debug1(DOB, DD, "  end group, dble_fwd: %s", EchoLength(dble_fwd));
+      }
+    }
+    else if( start_group == nilobj )
+    {	
+      /* start new group */
+      b = back(y, COLM);  f = fwd(y, COLM);
+      start_group = link;  m = y;
+      debug2(DOB, DD, "  starting group (b = %s, f = %s):",
+	EchoLength(b), EchoLength(f));
+      ifdebug(DOB, DD, DebugObject(y));
+    }
+    else
+    {
+      /* continue with current group */
+      b = find_max(b, back(y, COLM));  f = find_max(f, fwd(y, COLM));
+      if( fwd(y, COLM) > fwd(m, COLM) )  m = y;
+      debug3(DOB, DD, "  in group%s (b = %s, f = %s):",
+	m == y ? " (new max)" : "",
+	EchoLength(b), EchoLength(f));
+      ifdebug(DOB, DD, DebugObject(y));
+    }
+  }
+  assert( start_group != nilobj, "BreakVcat: start_group == nilobj (2)!" );
+
+  if( dble_found )
+  {	
+    /* finish off and break this last group, and set sizes of x */
+    if( !FitsConstraint(b, f, tc) )
+      BreakJoinedGroup(start_group, LastDown(x), m, &tc, &b, &f);
+    dble_fwd = find_max(dble_fwd, b + f);
+    debug1(DOB, DD, "  ending last group, dble_fwd: %s",EchoLength(dble_fwd));
+    back(x, COLM) = 0;  fwd(x, COLM) = find_min(MAX_FULL_LENGTH, dble_fwd);
+  }
+  else
+  {
+    /* finish off and break this last and only group, and set sizes of x */
+    debug2(DOB, DD, "  BreakVcat ending last and only group (%s, %s)",
+	EchoLength(b), EchoLength(f));
+    BreakJoinedGroup(start_group, LastDown(x), m, c, &b, &f);
+    back(x, COLM) = b;  fwd(x, COLM) = f;
+  }
+
+  debug0(DOB, DD, "] BreakVcat returning x:");
+  ifdebug(DOB, DD, DebugObject(x));
+  debug2(DOB, DD, "  (size is %s, %s)",
+	EchoLength(back(x, COLM)), EchoLength(fwd(x, COLM)));
+  return x;
+} /* end BreakVcat */
+
+
+/*@::BreakTable()@************************************************************/
+/*                                                                           */
+/*  static OBJECT BreakTable(x, c)                                           */
+/*                                                                           */
+/*  Break table (HCAT) x to satisfy constraint c.                            */
+/*                                                                           */
+/*  Outline of algorithm:                                                    */
+/*                                                                           */
+/*     bcount = number of components to left of mark;                        */
+/*     fcount = no. of components on and right of mark;                      */
+/*     bwidth = what back(x) would be if all components had size (0, 0);     */
+/*     fwidth = what fwd(x) would be if all components had size (0, 0);      */
+/*     Set all components of x to Unbroken (broken(y) holds this flag);      */
+/*     while( an Unbroken component of x exists )                            */
+/*     {   my = the Unbroken component of x of minimum width;                */
+/*         mc = desirable constraint for my (see below);                     */
+/*         BreakObject(my, &mc);                                             */
+/*         Set my to Broken and update bcount, fcount, bwidth, fwidth        */
+/*            to reflect the actual size of my, now broken;                  */
+/*     }                                                                     */
+/*                                                                           */
+/*  The constraint mc is chosen in an attempt to ensure that:                */
+/*                                                                           */
+/*     a)  Any sufficiently narrow components will not break;                */
+/*     b)  All broken components will have the same bfc(mc), if possible;    */
+/*     c)  All available space is used.                                      */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT BreakTable(OBJECT x, CONSTRAINT *c)
+{ FULL_LENGTH bwidth, fwidth;	/* running back(x) and fwd(x)		     */
+  int    bcount, fcount;	/* running no. of components		     */
+  OBJECT mlink, my;		/* minimum-width unbroken component	     */
+  BOOLEAN ratm;			/* TRUE when my has a mark to its right      */
+  int    mside;			/* side of the mark my is on: BACK, ON, FWD  */
+  FULL_LENGTH msize;		/* size of my (minimal among unbroken)	     */
+  CONSTRAINT mc;		/* desirable constraint for my		     */
+  OBJECT pg, prec_def;		/* preceding definite object of my           */
+  OBJECT sg, succ_def;		/* succeeding definite object of my          */
+  FULL_LENGTH pd_extra,sd_extra;/* space availiable for free each side of my */
+  FULL_LENGTH av_colsize;	/* the size of each unbroken component       */
+				/* if they are all assigned equal width      */
+  FULL_LENGTH fwd_max, back_max;/* maximum space available forward of or     */
+				/* back of the mark, when columns are even   */
+  FULL_LENGTH col_size;		/* the column size actually used in breaking */
+  FULL_LENGTH prev_col_size;	/* previous column size (try to keep equal)  */
+  FULL_LENGTH beffect, feffect;	/* the amount bwidth, fwidth must increase   */
+				/* when my is broken			     */
+  OBJECT link, y, prev, g;  FULL_LENGTH tmp, tmp2;
+
+  debug1(DOB, D, "[ BreakTable( x, %s )", EchoConstraint(c));
+
+  /* Initialise csize, bcount, fcount, bwidth, fwidth and broken(y) */
+  bcount = fcount = 0;  bwidth = fwidth = 0;  prev = nilobj;
+  prev_col_size = 0;
+  Child(y, Down(x));
+  assert( type(y) != GAP_OBJ, "BreakTable: GAP_OBJ!" );
+  assert( !is_index(type(y)), "BreakTable: index!" );
+  broken(y) = is_indefinite(type(y));
+  if( !broken(y) )  prev = y, fcount = 1;
+
+  for( link = NextDown(Down(x));  link != x;  link = NextDown(NextDown(link)) )
+  {
+    /* find the next gap g and following child y */
+    Child(g, link);
+    assert( type(g) == GAP_OBJ, "BreakTable: GAP_OBJ!" );
+    assert( NextDown(link) != x, "BreakTable: GAP_OBJ is last!" );
+    Child(y, NextDown(link));
+
+    assert( type(y) != GAP_OBJ, "BreakTable: GAP_OBJ!" );
+    assert( !is_index(type(y)), "BreakTable: index!" );
+    broken(y) = is_indefinite(type(y));
+    if( !broken(y) )
+    { if( prev == nilobj )  fcount = 1;
+      else if( mark(gap(g)) )
+      {	bcount += fcount;
+	bwidth += fwidth + MinGap(0, 0, 0, &gap(g));
+	fcount  = 1;  fwidth = 0;
+      }
+      else
+      {	fwidth += MinGap(0, 0, 0, &gap(g));
+	fcount += 1;
+      }
+      prev = y;
+    }
+  }
+
+  /* if column gaps alone are too wide, kill them all */
+  if( !FitsConstraint(bwidth, fwidth, *c) )
+  {
+    debug2(DOB, D, "column gaps alone too wide: bwidth: %s; fwidth: %s",
+       EchoLength(bwidth), EchoLength(fwidth));
+    Error(13, 2, "reducing column gaps to 0i (object is too wide)",
+      WARN, &fpos(x));
+    for( link = Down(x);  link != x;  link = NextDown(link) )
+    { Child(g, link);
+      if( type(g) == GAP_OBJ )
+      {	SetGap(gap(g), nobreak(gap(g)), mark(gap(g)), join(gap(g)),
+	  FIXED_UNIT, EDGE_MODE, 0);
+      }
+    }
+    bwidth = fwidth = 0;
+  }
+
+  /* break each column, from smallest to largest */
+  while( bcount + fcount > 0 && FitsConstraint(bwidth, fwidth, *c) )
+  {
+    debug2(DOB, D, "bcount: %d;  bwidth: %s", bcount, EchoLength(bwidth));
+    debug2(DOB, D, "fcount: %d;  fwidth: %s", fcount, EchoLength(fwidth));
+
+    /* find a minimal-width unbroken component my */
+    my = nilobj;  msize = size(x, COLM);       /* an upper bound for size(y) */
+    for( link = Down(x);  ;  link = NextDown(link) )
+    { Child(y, link);
+      assert( type(y) != GAP_OBJ, "BreakTable: type(y) == GAP_OBJ!" );
+      if( !broken(y) && (size(y, COLM) < msize || my == nilobj) )
+      {	msize = size(y, COLM);
+	my = y;  mlink = link;
+	ratm = FALSE;
+      }
+
+      /* next gap */
+      link = NextDown(link);
+      if( link == x )  break;
+      Child(g, link);
+      assert( type(g) == GAP_OBJ, "BreakTable: type(g) != GAP_OBJ!" );
+      if( mark(gap(g)) )  ratm = TRUE;
+    }
+
+    /* find neighbouring definite objects and resulting pd_extra and sd_extra */
+    SetNeighbours(mlink, ratm, &pg, &prec_def, &sg, &succ_def, &mside);
+    debug2(DOB, D, "my (%s): %s", Image(mside), EchoObject(my));
+    pd_extra = pg == nilobj ? 0 :
+      ExtraGap(broken(prec_def) ? fwd(prec_def,COLM) : 0, 0, &gap(pg), BACK);
+    sd_extra = sg == nilobj ? 0 :
+      ExtraGap(0, broken(succ_def) ? back(succ_def,COLM) : 0, &gap(sg), FWD);
+    debug2(DOB, D, "pd_extra:   %s;  sd_extra:      %s",
+		EchoLength(pd_extra), EchoLength(sd_extra) );
+
+    /* calculate desirable constraints for my */
+    av_colsize = (bfc(*c) - bwidth - fwidth) / (bcount + fcount);
+    debug1(DOB, D, "av_colsize = %s", EchoLength(av_colsize));
+    debug1(DOB, D, "prev_col_size = %s", EchoLength(prev_col_size));
+    switch( mside )
+    {
+
+      case BACK:
+      
+	back_max = find_min(bc(*c), bwidth + av_colsize * bcount);
+	col_size = (back_max - bwidth) / bcount;
+	if( col_size > prev_col_size && col_size - prev_col_size < PT )
+	  col_size = prev_col_size;
+	SetConstraint(mc,
+	  find_min(MAX_FULL_LENGTH, col_size + pd_extra),
+	  find_min(MAX_FULL_LENGTH, col_size + pd_extra + sd_extra),
+	  find_min(MAX_FULL_LENGTH, col_size + sd_extra));
+	break;
+
+
+      case ON:
+      
+	fwd_max = find_min(fc(*c), fwidth + av_colsize * fcount);
+	col_size = (fwd_max - fwidth) / fcount;
+	if( col_size > prev_col_size && col_size - prev_col_size < PT )
+	  col_size = prev_col_size;
+	SetConstraint(mc,
+	  find_min(MAX_FULL_LENGTH, pd_extra + back(my, COLM)),
+	  find_min(MAX_FULL_LENGTH, pd_extra + back(my, COLM) + col_size + sd_extra),
+	  find_min(MAX_FULL_LENGTH, col_size + sd_extra));
+	break;
+
+
+      case FWD:
+      
+	fwd_max = find_min(fc(*c), fwidth + av_colsize * fcount);
+	col_size = (fwd_max - fwidth) / fcount;
+	if( col_size > prev_col_size && col_size - prev_col_size < PT )
+	  col_size = prev_col_size;
+	SetConstraint(mc,
+	  find_min(MAX_FULL_LENGTH, col_size + pd_extra),
+	  find_min(MAX_FULL_LENGTH, col_size + pd_extra + sd_extra),
+	  find_min(MAX_FULL_LENGTH, col_size + sd_extra));
+	break;
+
+
+      default:
+      
+	assert(FALSE, "BreakTable: mside");
+	break;
+    }
+    debug1(DOB, D, "col_size = %s", EchoLength(col_size));
+    prev_col_size = col_size;
+
+    /* now break my according to these constraints, and accept it */
+    debug2(DOB, DD, "  calling BreakObject(%s, %s)", EchoObject(my),
+      EchoConstraint(&mc));
+    my = BreakObject(my, &mc);  broken(my) = TRUE;
+
+    /* calculate the effect of accepting my on bwidth and fwidth */
+    if( pg != nilobj )
+    { tmp = broken(prec_def) ? fwd(prec_def, COLM) : 0;
+      beffect = MinGap(tmp, back(my, COLM), fwd(my, COLM), &gap(pg)) -
+	        MinGap(tmp, 0,             0,            &gap(pg));
+    }
+    else beffect = back(my, COLM);
+
+    if( sg != nilobj )
+    { tmp = broken(succ_def) ? back(succ_def, COLM) : 0;
+      tmp2 = broken(succ_def) ? fwd(succ_def, COLM) : 0;
+      feffect = MinGap(fwd(my, COLM), tmp, tmp2, &gap(sg)) -
+	        MinGap(0,            tmp, tmp2, &gap(sg));
+    }
+    else feffect = fwd(my, COLM);
+
+    switch( mside )
+    {
+	case BACK:	bwidth += beffect + feffect;
+			bcount--;
+			break;
+	
+	case ON:	bwidth += beffect;  fwidth += feffect;
+			fcount--;
+			break;
+
+	case FWD:	fwidth += beffect + feffect;
+			fcount--;
+			break;
+	
+	default:	assert(FALSE, "BreakTable: mside");
+			break;
+    }
+
+  } /* end while */
+
+  back(x, COLM) = bwidth;
+  fwd(x, COLM) = fwidth;
+
+  debug2(DOB, D,  "] BreakTable returning %s,%s; x =",
+    EchoLength(bwidth), EchoLength(fwidth));
+  ifdebug(DOB, DD, DebugObject(x));
+  return x;
+} /* end BreakTable */
+
+
+/*@::BreakObject()@***********************************************************/
+/*                                                                           */
+/*  OBJECT BreakObject(x, c)                                                 */
+/*                                                                           */
+/*  Break lines of object x so that it satisfies constraint c.               */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT BreakObject(OBJECT x, CONSTRAINT *c)
+{ OBJECT link, y;  CONSTRAINT yc;  FULL_LENGTH f;  BOOLEAN junk;
+  debug3(DOB, DD,  "[ BreakObject(x (%s,%s),  %s), x =",
+	EchoLength(back(x, COLM)), EchoLength(fwd(x, COLM)), EchoConstraint(c));
+  ifdebug(DOB, DD, DebugObject(x));
+
+  /* if constraint is negative (should really be never), replace with empty */
+  if( !(bc(*c)>=0 && bfc(*c)>=0 && fc(*c)>=0) )
+  {
+    Error(13, 11, "replacing with empty object: negative size constraint %s,%s,%s",
+      WARN, &fpos(x), EchoLength(bc(*c)), EchoLength(bfc(*c)), EchoLength(fc(*c)));
+    y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+    back(y, COLM) = fwd(y, COLM) = 0;
+    ReplaceNode(y, x);
+    DisposeObject(x);
+    x = y;
+    debug0(DOB, DD, "] BreakObject returning (negative constraint).");
+    return x;
+  }
+
+  /* if no breaking required, return immediately */
+  if( FitsConstraint(back(x, COLM), fwd(x, COLM), *c) )
+  { debug0(DOB, DD, "] BreakObject returning (fits).");
+    return x;
+  }
+
+  switch( type(x) )
+  {
+
+    case ROTATE:
+    
+      if( BackEnd != PLAINTEXT && InsertScale(x, c) )
+      {
+	Parent(x, Up(x));
+	Error(13, 3, "%s object scaled horizontally by factor %.2f (too wide)",
+	  WARN, &fpos(x), KW_ROTATE, (float) bc(constraint(x)) / SF );
+      }
+      else
+      { Error(13, 4, "%s deleted (too wide; cannot break %s)",
+	  WARN, &fpos(x), KW_ROTATE, KW_ROTATE);
+        y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+        back(y, COLM) = fwd(y, COLM) = 0;
+        ReplaceNode(y, x);
+        DisposeObject(x);
+        x = y;
+      }
+      break;
+
+
+    case SCALE:
+
+      InvScaleConstraint(&yc, bc(constraint(x)), c);
+      Child(y, Down(x));
+      y = BreakObject(y, &yc);
+      back(x, COLM) = (back(y, COLM) * bc(constraint(x))) / SF;
+      fwd(x, COLM) =  (fwd(y, COLM)  * bc(constraint(x))) / SF;
+      break;
+
+
+    case KERN_SHRINK:
+
+      /* not really accurate, but there you go */
+      Child(y, LastDown(x));
+      y = BreakObject(y, c);
+      back(x, COLM) = back(y, COLM);
+      fwd(x, COLM) = fwd(y, COLM);
+      break;
+
+
+    case WORD:
+    case QWORD:
+    
+      if( word_hyph(x) )
+      {
+	/* create an ACAT with the same size as x */
+	New(y, ACAT);
+	FposCopy(fpos(y), fpos(x));
+	back(y, COLM) = back(x, COLM);
+	fwd(y, COLM) = fwd(x, COLM);
+	back(y, ROWM) = back(x, ROWM);
+	fwd(y, ROWM) = fwd(x, ROWM);
+
+	/* set ACAT's save_style; have to invent a line_gap, unfortunately */
+	SetGap(line_gap(save_style(y)), FALSE, FALSE, FALSE, FIXED_UNIT,
+	  MARK_MODE, 1.1 * FontSize(word_font(x), x));
+	SetGap(space_gap(save_style(y)), FALSE, FALSE, TRUE, FIXED_UNIT,
+	  EDGE_MODE, 0);
+	hyph_style(save_style(y)) = HYPH_ON;
+	fill_style(save_style(y)) = FILL_ON;
+	display_style(save_style(y)) = DISPLAY_LEFT;
+	small_caps(save_style(y)) = FALSE;
+	font(save_style(y)) = word_font(x);
+	colour(save_style(y)) = word_colour(x);
+	language(save_style(y)) = word_language(x);
+	debug3(DOF, DD, "  in BreakObject y %s %s %s",
+	  EchoStyle(&save_style(y)), Image(type(y)), EchoObject(y));
+
+	/* enclose x in the ACAT and try breaking (i.e. filling) it */
+	ReplaceNode(y, x);
+	Link(y, x);
+	x = y;
+	debug3(DOF, DD, "  in BreakObject x %s %s %s",
+	  EchoStyle(&save_style(x)), Image(type(x)), EchoObject(x));
+	x = BreakObject(x, c);
+      }
+      else if( BackEnd != PLAINTEXT && InsertScale(x, c) )
+      { OBJECT tmp;
+	tmp = x;
+	Parent(x, Up(x));
+	Error(13, 5, "word %s scaled horizontally by factor %.2f (too wide)",
+	  WARN, &fpos(x), string(tmp), (float) bc(constraint(x)) / SF);
+      }
+      else
+      { Error(13, 6, "word %s deleted (too wide)", WARN, &fpos(x), string(x));
+        y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+        back(y, COLM) = fwd(y, COLM) = 0;
+        ReplaceNode(y, x);
+        DisposeObject(x);
+        x = y;
+      }
+      break;
+
+
+    case WIDE:
+    
+      MinConstraint(&constraint(x), c);
+      Child(y, Down(x));
+      y = BreakObject(y, &constraint(x));
+      back(x, COLM) = back(y, COLM);
+      fwd(x, COLM) = fwd(y, COLM);
+      EnlargeToConstraint(&back(x, COLM), &fwd(x, COLM), &constraint(x));
+      break;
+
+
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+
+      if( BackEnd != PLAINTEXT && InsertScale(x, c) )
+      {
+	Parent(x, Up(x));
+	Error(13, 7, "%s scaled horizontally by factor %.2f (too wide)",
+	  WARN, &fpos(x),
+	  type(x) == INCGRAPHIC ? KW_INCGRAPHIC : KW_SINCGRAPHIC,
+	  (float) bc(constraint(x)) / SF);
+      }
+      else
+      { Error(13, 8, "%s deleted (too wide)", WARN, &fpos(x),
+	  type(x) == INCGRAPHIC ? KW_INCGRAPHIC : KW_SINCGRAPHIC);
+        y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+        back(y, COLM) = fwd(y, COLM) = 0;
+        ReplaceNode(y, x);
+        DisposeObject(x);
+        x = y;
+      }
+      break;
+
+
+    case HIGH:
+    case VSCALE:
+    case VCOVER:
+    case VSHIFT:
+    case HCONTRACT: 
+    case VCONTRACT:
+    case HLIMITED: 
+    case VLIMITED:
+    case HEXPAND: 
+    case VEXPAND:
+    case ONE_ROW:
+    case ONE_COL:
+    case HSPANNER:
+    
+      assert( Down(x) == LastDown(x), "BreakObject: downs!" );
+      Child(y, Down(x));
+      y = BreakObject(y, c);
+      back(x, COLM) = back(y, COLM);
+      fwd(x, COLM) = fwd(y, COLM);
+      break;
+
+
+    case BACKGROUND:
+
+      Child(y, Down(x));
+      y = BreakObject(y, c);
+      Child(y, LastDown(x));
+      y = BreakObject(y, c);
+      back(x, COLM) = back(y, COLM);
+      fwd(x, COLM) = fwd(y, COLM);
+      break;
+
+
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case HSPAN:
+    case VSPAN:
+
+      /* these all have size zero except the last one, so if we get to  */
+      /* this point we must be at the last column and need to break it. */
+      /* this is done just by setting its size to zero, unless it is    */
+      /* the last column in which case it claims everything that is     */
+      /* going; the real break is deferred to the first ROWM touch,     */
+      /* when we know that all contributing columns have been broken    */
+      /* unless the child is not a spanner, in which case it's @OneCol  */
+      Child(y, Down(x));
+      if( type(y) != HSPANNER )
+      {
+        y = BreakObject(y, c);
+        back(x, COLM) = back(y, COLM);
+        fwd(x, COLM) = fwd(y, COLM);
+      }
+      else
+      {
+        back(x, COLM) = 0;
+        fwd(x, COLM) = find_min(bfc(*c), fc(*c));
+      }
+      break;
+
+
+    case HSHIFT:
+
+      Child(y, Down(x));
+      f = FindShift(x, y, COLM);
+      SetConstraint(yc,
+	find_min(bc(*c), bfc(*c)) - f, bfc(*c), find_min(fc(*c), bfc(*c)) + f);
+      BreakObject(y, &yc);
+      f = FindShift(x, y, COLM);
+      back(x, COLM) = find_min(MAX_FULL_LENGTH, find_max(0, back(y, COLM) + f));
+      fwd(x, COLM)  = find_min(MAX_FULL_LENGTH, find_max(0, fwd(y, COLM)  - f));
+      break;
+
+
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+    
+      Child(y, LastDown(x));
+      y = BreakObject(y, c);
+      back(x, COLM) = back(y, COLM);
+      fwd(x, COLM) = fwd(y, COLM);
+      break;
+
+
+    case SPLIT:
+    
+      Child(y, DownDim(x, COLM));
+      y = BreakObject(y, c);
+      back(x, COLM) = back(y, COLM);
+      fwd(x, COLM) = fwd(y, COLM);
+      break;
+
+
+    case ACAT:
+    
+      if( back(x, COLM) > 0 )
+      { int sz;  OBJECT rpos;
+	/* shift the column mark of x to the left edge */
+	sz = size(x, COLM);
+	fwd(x, COLM) = find_min(MAX_FULL_LENGTH, sz);
+	back(x, COLM) = 0;
+	rpos = x;
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ Child(y, link);
+	  if( type(y) == GAP_OBJ && mark(gap(y)) )
+	  { mark(gap(y)) = FALSE;
+	    rpos = y;
+	  }
+	}
+	if( FitsConstraint(back(x, COLM), fwd(x, COLM), *c) )
+	{ Error(13, 9, "column mark of unbroken paragraph moved left",
+	    WARN, &fpos(rpos));
+	  break;
+	}
+	Error(13, 10, "column mark of paragraph moved left before breaking",
+	  WARN, &fpos(rpos));
+	ifdebug(DOB, DD, DebugObject(x));
+      }
+      x = FillObject(x, c, nilobj, TRUE, TRUE, FALSE, &junk);
+      break;
+
+
+    case HCAT:
+    
+      x = BreakTable(x, c);
+      break;
+
+
+    case COL_THR:
+    
+      BreakJoinedGroup(Down(x), LastDown(x), nilobj, c,
+	&back(x,COLM), &fwd(x,COLM));
+      break;
+
+
+    case VCAT:
+    
+      x = BreakVcat(x, c);
+      break;
+			
+
+    default:
+    
+      assert1(FALSE, "BreakObject:", Image(type(x)));
+      break;
+
+  }
+  assert( back(x, COLM) >= 0, "BreakObject: back(x, COLM) < 0!" );
+  assert( fwd(x, COLM) >= 0, "BreakObject: fwd(x, COLM) < 0!" );
+  debug2(DOB, DD,  "] BreakObject returning %s,%s, x =",
+    EchoLength(back(x, COLM)), EchoLength(fwd(x, COLM)));
+  ifdebug(DOB, DD,  DebugObject(x));
+  return x;
+} /* end BreakObject */
diff --git a/z14.c b/z14.c
new file mode 100644
index 0000000..2fde585
--- /dev/null
+++ b/z14.c
@@ -0,0 +1,900 @@
+/*@z14.c:Fill Service:Declarations@*******************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z14.c                                                      */
+/*  MODULE:       Fill Service                                               */
+/*  EXTERNS:      FillObject()                                               */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define TOO_TIGHT_BAD	1048576	/* 2^21; badness of a too tight line         */
+#define TOO_LOOSE_BAD	  65536	/* 2^16; the max badness of a too loose line */
+#define	TIGHT_BAD	   4096	/* 2^12; the max badness of a tight line     */
+#define	LOOSE_BAD	   4096	/* 2^12; the max badness of a loose line     */
+#define	HYPH_BAD	    128	/* 2^ 7; threshold for calling hyphenation   */
+#define	HYPH_BAD_INCR	     16	/* 2 ^4: the badness of one hyphen           */
+#define	WIDOW_BAD_INCR	    128	/* 2 ^7: the badness of one widow word       */
+#define SQRT_TOO_LOOSE	    512	/* 2^ 9; sqrt(TOO_LOOSE_BAD) (used to be)    */
+#define	SQRT_TIGHT_BAD	    128	/* 2^ 7; sqrt(TIGHT_BAD) (used to be)        */
+#define	SQRT_LOOSE_BAD	    128	/* 2^ 7; sqrt(LOOSE_BAD) (used to be)        */
+#define	SQRT_TOO_TIGHT	   8192	/* 2^13; sqrt(TOO_TIGHT_BAD) (used to be)    */
+#define MAX_EXPAND	1
+#define MAX_SHRINK	4
+
+
+typedef struct {
+  OBJECT	llink;		/* link to gap before left end of interval   */
+  OBJECT	rlink;		/* link to gap after right end of interval   */
+  OBJECT	cwid;		/* link to current line width in multi case  */
+  int		nat_width;	/* natural width of interval                 */
+  int		space_width;	/* natural width of spaces in the interval   */
+  int		badness;	/* badness of this interval		     */
+  unsigned char	class;		/* badness class of this interval	     */
+  unsigned char	tab_count;	/* number of gaps with tab mode in interval  */
+  int		tab_pos;	/* if tab_count > 0, this holds the position */
+				/*  of the left edge of the object following */
+				/*  the rightmost tab gap in the interval    */
+  int		width_to_tab;	/* if tab_count > 0, the interval width up   */
+				/*  to but not including the rightmost tab   */
+} INTERVAL;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  Badness classes                                                          */
+/*                                                                           */
+/*****************************************************************************/
+
+#define TOO_LOOSE	  0	/* interval is too loose		     */
+#define LOOSE		  1	/* interval is loose but not too loose	     */
+#define TIGHT		  2	/* interval is tight but not too tight	     */
+#define TOO_TIGHT	  3	/* interval is too tight 		     */
+#define TAB_OVERLAP	  4	/* interval has a tab and left part overlaps */
+#define AT_END		  5	/* interval ends at right end of paragraph   */
+#define UNBREAKABLE_LEFT  6	/* interval has an unbreakable gap at left   */
+#define UNBREAKABLE_RIGHT 7	/* interval has an unbreakable gap at right  */
+#define EMPTY_INTERVAL	  8	/* interval is empty                         */
+
+/*@::SetIntervalBadness()@****************************************************/
+/*                                                                           */
+/*  SetIntervalBadness(I)                                                    */
+/*                                                                           */
+/*  Private, calculates the badness and badness class of a non-empty         */
+/*  interval.  Does not take into account any unbreakable gap at either end. */
+/*                                                                           */
+/*****************************************************************************/
+
+#define SetIntervalBadness(I, max_width, etc_width)			\
+{ OBJECT g; int badness;						\
+  int col_width;							\
+									\
+  /* initialize to  saved badness of left-adjoining interval, if any */	\
+  /* and set width of column                                         */	\
+  if( I.llink == x )							\
+  { col_width = (I.cwid!=nilobj) ? bfc(constraint(I.cwid)) : max_width;	\
+    I.badness = 0;							\
+  }									\
+  else									\
+  { col_width = (I.cwid!=nilobj) ? bfc(constraint(I.cwid)) : etc_width;	\
+    Child(g, I.llink);							\
+    I.badness = save_badness(g);					\
+  }									\
+									\
+  /* penalize widow lines, of the form [ <object> &1rt ... ] */		\
+  if( I.tab_count > 0 )							\
+  { OBJECT glink = NextDown(NextDown(I.llink));				\
+    assert( type(glink) == LINK, "SIB: glink!");			\
+    Child(g, glink);							\
+    if( type(g) == GAP_OBJ && mode(gap(g)) == TAB_MODE &&		\
+	units(gap(g)) == AVAIL_UNIT && width(gap(g)) == 1*FR )		\
+      I.badness += WIDOW_BAD_INCR;					\
+  }									\
+									\
+  if( col_width <= 0 )							\
+  { if( I.nat_width == 0 )						\
+    { I.class = TOO_LOOSE;						\
+      I.badness += 0;							\
+    }									\
+    else								\
+    { I.class = TIGHT;							\
+      I.badness += TOO_TIGHT_BAD;					\
+    }									\
+  }									\
+  else if( I.tab_count > 0 && I.width_to_tab > I.tab_pos )		\
+  { I.class = TAB_OVERLAP;						\
+    I.badness += TOO_TIGHT_BAD;						\
+  }									\
+  else if( MAX_EXPAND*(col_width-I.nat_width) > 2*I.space_width )	\
+  { I.class = I.tab_count > 0 ? LOOSE : TOO_LOOSE;			\
+    badness = (SQRT_TOO_LOOSE*(col_width - I.nat_width)) / col_width;	\
+    I.badness += badness * badness;					\
+  }									\
+  else if( I.nat_width <= col_width )					\
+  { I.class = LOOSE;							\
+    badness = (SQRT_LOOSE_BAD*(col_width - I.nat_width)) / col_width;	\
+    I.badness += badness * badness;					\
+  }									\
+  else if( BackEnd != PLAINTEXT && allow_shrink &&			\
+    MAX_SHRINK*(I.nat_width-col_width) <= I.space_width )		\
+  { I.class = TIGHT;							\
+    badness = (SQRT_TIGHT_BAD*(col_width - I.nat_width)) / col_width;	\
+    I.badness += badness * badness;					\
+  }									\
+  else									\
+  { I.class = TOO_TIGHT;						\
+    /***								\
+    badness = (SQRT_TOO_TIGHT*(col_width-I.nat_width)) / col_width;	\
+    I.badness += badness * badness;					\
+    ***/								\
+    I.badness += TOO_TIGHT_BAD;						\
+  }									\
+  assert( I.badness >= 0, "SetIntervalBadness: badness < 0!" );		\
+} /* end macro SetIntervalBadness */
+
+
+/*@::MoveRightToGap()@********************************************************/
+/*                                                                           */
+/*  MoveRightToGap(I, x, rlink, right, max_width, etc_width, hyph_word)      */
+/*                                                                           */
+/*  Private.  Shared by IntervalInit and IntervalShiftRightEnd, for moving   */
+/*  to the next gap to the right, setting save_space(newg), checking for     */
+/*  hyphenation case, and setting the interval badness.                      */
+/*                                                                           */
+/*****************************************************************************/
+
+#define MoveRightToGap(I,x,rlink,right,max_width,etc_width,hyph_word)	\
+{ OBJECT newg, foll, tmp;						\
+  BOOLEAN jn, unbreakable_at_right = FALSE;				\
+  debug0(DOF, DDD, "MoveRightToGap(I, x, rlink, right, -, -, -)");	\
+									\
+  /* search onwards to find newg, the next true breakpoint */		\
+  Child(tmp, rlink);							\
+  debug2(DOF, DDD, "NextDefiniteWithGap(%s, %s)", EchoObject(x),	\
+    EchoObject(tmp));							\
+  NextDefiniteWithGap(x, rlink, foll, newg, jn);			\
+									\
+  /* set right link and calculate badness of the new interval */	\
+  if( rlink != x )							\
+  { 									\
+    assert( Up(newg) == LastUp(newg), "MoveRightToGap: newg!" );	\
+    /* set save_space(newg) now so that it is OK to forget right */	\
+    debug0(DOF, DDD, "  MoveRightToGap setting save_space(newg)");	\
+    if( I.cwid != nilobj )  etc_width = bfc(constraint(I.cwid));	\
+    if( mode(gap(newg)) == TAB_MODE )					\
+    { save_space(newg) = ActualGap(0, back(foll,COLM), fwd(foll,COLM),	\
+	  &gap(newg), etc_width, 0) - back(foll, COLM);			\
+    }									\
+    else								\
+    { save_space(newg) = ActualGap(fwd(right, COLM), back(foll, COLM),	\
+	  fwd(foll,COLM), &gap(newg), etc_width,			\
+	  I.nat_width - fwd(right,COLM))				\
+	  - back(foll, COLM) - fwd(right, COLM);			\
+    }									\
+									\
+    ifdebug(DOF, DDD,							\
+      if( Down(newg) != newg )						\
+      { OBJECT tmp;							\
+	Child(tmp, Down(newg));						\
+	debug5(DOF, DDD, "newg %s: %s %s, gap = %s, save_space = %s",	\
+	Image(type(newg)), Image(type(tmp)), EchoObject(tmp),		\
+	EchoGap(&gap(newg)), EchoLength(save_space(newg)));		\
+      }									\
+      else debug3(DOF, DDD, "newg %s: gap = %s, save_space = %s",	\
+	Image(type(newg)), EchoGap(&gap(newg)),				\
+	EchoLength(save_space(newg)));					\
+    )									\
+									\
+    /* sort out ending with hyphenation and/or being unbreakable */	\
+    /* NB ADD_HYPH is possible after a restart                   */	\
+    if( mode(gap(newg)) == HYPH_MODE || mode(gap(newg)) == ADD_HYPH )	\
+    { if( hyph_allowed )						\
+      {									\
+	/* hyphenation is allowed, so add hyph_word to nat_width */	\
+	if( is_word(type(right)) && 					\
+	 !(string(right)[StringLength(string(right))-1] == CH_HYPHEN) )	\
+        {								\
+	  /* make sure hyph_word exists and is of the right font */	\
+	  debug0(DOF, DDD, "  MoveRightToGap checking hyph_word");	\
+	  if( hyph_word == nilobj )					\
+	  { hyph_word = MakeWord(WORD, STR_HYPHEN, &fpos(x));		\
+	    word_font(hyph_word) = 0;					\
+	    word_colour(hyph_word) = colour(save_style(x));		\
+	    word_language(hyph_word) = language(save_style(x));		\
+	    word_hyph(hyph_word) = hyph_style(save_style(x))==HYPH_ON;	\
+	  }								\
+	  if( word_font(hyph_word) != font(save_style(x)) )		\
+	  { word_font(hyph_word) = font(save_style(x));			\
+	    FposCopy(fpos(hyph_word), fpos(x));				\
+	    FontWordSize(hyph_word);					\
+	  }								\
+									\
+	  mode(gap(newg)) = ADD_HYPH;					\
+	  I.nat_width += size(hyph_word, COLM);				\
+	  debug0(DOF, DDD, "   adding hyph_word from nat_width");	\
+        }								\
+      }									\
+      else								\
+      {									\
+	/* hyphenation is not allowed, so this gap is unbreakable */	\
+	unbreakable_at_right = TRUE;					\
+      }									\
+    }									\
+    else if( nobreak(gap(newg)) )					\
+      unbreakable_at_right = TRUE;					\
+									\
+    I.rlink = Up(newg);							\
+    debug2(DOF, DDD, "  MoveRightToGap setting I.rlink to %s %s",	\
+      Image(type(newg)), EchoObject(newg));				\
+  }									\
+  else I.rlink = x;							\
+  SetIntervalBadness(I, max_width, etc_width);				\
+  if( unbreakable_at_right )  I.class = UNBREAKABLE_RIGHT;		\
+  else if( I.class == TIGHT && mode(gap(newg)) == TAB_MODE )		\
+    I.class = TOO_TIGHT, I.badness = TOO_TIGHT_BAD;			\
+  debug0(DOF, DDD, "MoveRightToGap returning.");				\
+}
+
+/*@::IntervalInit(), IntervalShiftRightEnd()@*********************************/
+/*                                                                           */
+/*  IntervalInit(I, x, max_width, etc_width, hyph_word)                      */
+/*                                                                           */
+/*  Set I to the first interval of x.                                        */
+/*                                                                           */
+/*****************************************************************************/
+
+#define IntervalInit(I, x, max_width, etc_width, hyph_word)		\
+{ OBJECT rlink, right; BOOLEAN jn;					\
+  debug0(DOF, DDD, "IntervalInit(I, x, -, -, hyph_word)");		\
+  I.llink = x;								\
+									\
+  FirstDefinite(x, rlink, right, jn);					\
+  if( rlink == x )  I.class = AT_END, I.rlink = x;			\
+  else									\
+  { 									\
+    /* have first definite object, so set interval width etc. */	\
+    if( multi != nilobj )						\
+    { Child(I.cwid, Down(multi));					\
+    }									\
+    else I.cwid = nilobj;						\
+    I.nat_width = size(right, COLM);					\
+    I.space_width = 0;							\
+    I.tab_count = 0;							\
+									\
+    /* move to gap, check hyphenation there etc. */			\
+    MoveRightToGap(I,x,rlink,right,max_width,etc_width,hyph_word); 	\
+  }									\
+  debug0(DOF, DDD, "IntervalInit returning.");				\
+} /* end macro IntervalInit */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  IntervalShiftRightEnd(I, x, hyph_word, max_width, etc_width)             */
+/*                                                                           */
+/*  Shift the right end of interval I one place to the right.                */
+/*                                                                           */
+/*****************************************************************************/
+
+#define IntervalShiftRightEnd(I, x, hyph_word, max_width, etc_width) 	\
+{ OBJECT rlink, g, right;						\
+  assert( I.class != AT_END, "IntervalShiftRightEnd: AT_END!" );	\
+  rlink = I.rlink;							\
+  if( rlink == x ) I.class = AT_END;					\
+  else									\
+  {									\
+    /* I is optimal here so save its badness and left endpoint */	\
+    Child(g, rlink);							\
+    assert( type(g) == GAP_OBJ, "IntervalShiftRightEnd: type(g)!" );	\
+    save_badness(g) = I.badness;					\
+    save_prev(g) = I.llink;						\
+    save_cwid(g) = I.cwid;						\
+									\
+    /* if hyphenation case, must take away width of hyph_word */	\
+    /* and increase the badness to discourage breaks at this point */	\
+    if( mode(gap(g)) == ADD_HYPH )					\
+    { I.nat_width -= size(hyph_word,COLM);				\
+      save_badness(g) += HYPH_BAD_INCR;					\
+      debug0(DOF, DDD, "   subtracting hyph_word from nat_width");	\
+    }									\
+									\
+    /* find definite object which must lie just to the right of g */	\
+    NextDefinite(x, rlink, right);					\
+    assert( rlink != x, "IntervalShiftRightEnd: rlink == x!" );		\
+									\
+    /* modify I to reflect the addition of g and right */		\
+    if( mode(gap(g)) == TAB_MODE )					\
+    { I.tab_count++;							\
+      I.tab_pos = save_space(g);					\
+      I.width_to_tab = I.nat_width;					\
+      I.nat_width = save_space(g) + size(right, COLM);			\
+      I.space_width = 0;						\
+    }									\
+    else								\
+    { I.nat_width += save_space(g) + size(right, COLM);			\
+      I.space_width += save_space(g);					\
+    }									\
+									\
+    /* now shift one step to the right */				\
+    MoveRightToGap(I, x, rlink, right, max_width, etc_width,hyph_word);	\
+  }									\
+} /* end macro IntervalShiftRightEnd */
+
+
+/*@::IntervalShiftLeftEnd(), IntervalBadness()@*******************************/
+/*                                                                           */
+/*  IntervalShiftLeftEnd(I, x, max_width, etc_width)                         */
+/*                                                                           */
+/*  Shift the left end of interval I one place to the right.                 */
+/*                                                                           */
+/*****************************************************************************/
+
+#define IntervalShiftLeftEnd(I, x, max_width, etc_width)		\
+{ OBJECT llink, left, lgap, y;  BOOLEAN jn;				\
+  debug1(DOF, DDD, "IntervalShiftLeftEnd(%s)", IntervalPrint(I, x));	\
+  assert( I.class != AT_END, "IntervalShiftLeftEnd: AT_END!" );		\
+									\
+  /* find left, the leftmost definite object of I */			\
+  llink = I.llink;							\
+  NextDefinite(x, llink, left);						\
+  assert( llink != x, "IntervalShiftLeftEnd: llink == x!" );		\
+									\
+  /* find lgap, the first true breakpoint following left */		\
+  NextDefiniteWithGap(x, llink, y, lgap, jn);				\
+  assert( llink != x, "IntervalShiftLeftEnd: llink == x!" );		\
+									\
+  /* calculate width and badness of interval minus left and lgap */	\
+  if( mode(gap(lgap)) == TAB_MODE )					\
+  { assert( I.tab_count > 0 || Up(lgap) == I.rlink,			\
+			"IntervalShiftLeftEnd: tab_count <= 0!" );	\
+    I.tab_count--;							\
+    if( I.tab_count == 0 )  I.nat_width -= save_space(lgap);		\
+  }									\
+  else /* take from nat_width, or if tab, from width_to_tab */		\
+  { if( I.tab_count == 0 )						\
+    { I.nat_width -= save_space(lgap) + size(left, COLM);		\
+      I.space_width -= save_space(lgap);				\
+    }									\
+    else if( I.tab_count == 1 )						\
+    { I.width_to_tab -= save_space(lgap) + size(left, COLM);		\
+    }									\
+    /* else no changes since tabs hide them */				\
+  }									\
+  I.llink = Up(lgap);							\
+  if( I.llink == I.rlink )						\
+  { I.class = EMPTY_INTERVAL;						\
+    I.badness = TOO_TIGHT_BAD + 1;					\
+  }									\
+  else									\
+  {									\
+    if( save_cwid(lgap) != nilobj )					\
+    { OBJECT tlink;							\
+      tlink = NextDown(Up(save_cwid(lgap)));				\
+      if( type(tlink) == ACAT )  I.cwid = save_cwid(lgap);		\
+      else Child(I.cwid, tlink);					\
+    }									\
+    SetIntervalBadness(I, max_width, etc_width);			\
+    if( nobreak(gap(lgap)) || ( !hyph_allowed &&			\
+	(mode(gap(lgap))==HYPH_MODE || mode(gap(lgap))==ADD_HYPH) ) )	\
+      I.class = UNBREAKABLE_LEFT;					\
+  }									\
+  debug1(DOF, DDD, "IShiftLeftEnd returning %s", IntervalPrint(I, x));	\
+} /* end macro IntervalShiftLeftEnd */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  IntervalBadness(I)                                                       */
+/*                                                                           */
+/*  Return the badness of interval I.                                        */
+/*                                                                           */
+/*****************************************************************************/
+
+#define IntervalBadness(I)	(I.badness)
+
+
+/*@IntervalClass(), IntervalPrint()@******************************************/
+/*                                                                           */
+/*  IntervalClass(I)                                                         */
+/*                                                                           */
+/*  Return the badness class of interval I.                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+#define IntervalClass(I)	(I.class)
+
+
+#if DEBUG_ON
+/*****************************************************************************/
+/*                                                                           */
+/*  IntervalPrint(I, x)                                                      */
+/*                                                                           */
+/*  Return string image of the contents of interval I of ACAT x.             */
+/*                                                                           */
+/*****************************************************************************/
+
+static FULL_CHAR *IntervalPrint(INTERVAL I, OBJECT x)
+{ static char *class_name[] =
+    { "TOO_LOOSE", "LOOSE", "TIGHT", "TOO_TIGHT", "TAB_OVERLAP", "AT_END",
+      "UNBREAKABLE_LEFT", "UNBREAKABLE_RIGHT" };
+  OBJECT link, y, g, z; int i;
+  static FULL_CHAR res[300];
+  if( I.llink == I.rlink )  return AsciiToFull("[]");
+  StringCopy(res, AsciiToFull(""));
+  if( I.cwid != nilobj )
+  { StringCat(res, AsciiToFull("!"));
+    StringCat(res, EchoLength(bfc(constraint(I.cwid))));
+    StringCat(res, AsciiToFull("!"));
+  }
+  StringCat(res, AsciiToFull("["));
+  g = nilobj;
+  for( link = NextDown(I.llink);  link != I.rlink;  link = NextDown(link) )
+  { assert(link != x, "IntervalPrint: link == x!");
+    Child(y, link);
+    debug2(DOF, DDD, "IntervalPrint at %s %s", Image(type(y)), EchoObject(y));
+    assert(y != x, "IntervalPrint: y == x!");
+    if( type(y) == GAP_OBJ )
+    { g = y;
+      if( Down(g) != g )
+      {	Child(z, Down(g));
+	StringCat(res, STR_SPACE);
+	StringCat(res, EchoCatOp(ACAT, mark(gap(g)), join(gap(g)))),
+	StringCat(res, is_word(type(z)) ? string(z) : Image(type(z)));
+	StringCat(res, STR_SPACE);
+      }
+      else for( i = 1;  i <= hspace(g) + vspace(g); i++ )
+	     StringCat(res, STR_SPACE);
+    }
+    else if( is_word(type(y)) )
+	StringCat(res, string(y)[0] == '\0' ? AsciiToFull("{}") : string(y));
+    else StringCat(res, Image(type(y)));
+  }
+  StringCat(res, AsciiToFull("] n"));
+  StringCat(res, EchoLength(I.nat_width));
+  StringCat(res, AsciiToFull(", "));
+  StringCat(res, EchoLength(I.space_width));
+  StringCat(res, AsciiToFull(" ("));
+  StringCat(res, AsciiToFull(class_name[I.class]));
+  StringCat(res, AsciiToFull(" "));
+  StringCat(res, StringInt(I.badness));
+  StringCat(res, AsciiToFull(")"));
+  if( I.tab_count > 0 )
+  { StringCat(res, AsciiToFull(" <"));
+    StringCat(res, StringInt(I.tab_count));
+    StringCat(res, STR_SPACE);
+    StringCat(res, EchoLength(I.width_to_tab));
+    StringCat(res, AsciiToFull(":"));
+    StringCat(res, EchoLength(I.tab_pos));
+    StringCat(res, AsciiToFull(">"));
+  }
+  return res;
+} /* end IntervalPrint */
+#endif
+
+
+/*@::FillObject()@************************************************************/
+/*                                                                           */
+/*  FillObject(x, c, multi, can_hyphenate, allow_shrink, extend_unbreakable, */
+/*                                              hyph_used)                   */
+/*                                                                           */
+/*  Break ACAT x into lines using optimal breakpoints.  Set hyph_used to     */
+/*  TRUE if any hyphenation was done.                                        */
+/*                                                                           */
+/*    multi               If multi is not nilobj, ignore c and use the       */
+/*                        sequence of constraints within multi for the       */
+/*                        successive lines.                                  */
+/*                                                                           */
+/*    can_hyphenate       TRUE if hyphenation is permitted during this fill. */
+/*                                                                           */
+/*    allow_shrink        TRUE if gaps may be shrunk as well as expanded.    */
+/*                                                                           */
+/*    extend_unbreakable  TRUE if nobreak(gap()) fields are to be set so as  */
+/*                        to prevent gaps hidden under overstruck objects    */
+/*                        from becoming break points.                        */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT FillObject(OBJECT x, CONSTRAINT *c, OBJECT multi, BOOLEAN can_hyphenate,
+  BOOLEAN allow_shrink, BOOLEAN extend_unbreakable, BOOLEAN *hyph_used)
+{ INTERVAL I, BestI;  OBJECT res, gp, tmp, z, y, link, ylink, prev, next;
+  int max_width, etc_width, outdent_margin, f;  BOOLEAN jn;  unsigned typ;
+  static OBJECT hyph_word = nilobj;
+  BOOLEAN hyph_allowed;	    /* TRUE when hyphenation of words is permitted  */
+  assert( type(x) == ACAT, "FillObject: type(x) != ACAT!" );
+
+  debug4(DOF, D, "FillObject(x, %s, can_hyph = %s, %s); %s",
+    EchoConstraint(c), bool(can_hyphenate),
+    multi == nilobj ? "nomulti" : "multi", EchoStyle(&save_style(x)));
+  ifdebug(DOF, DD, DebugObject(x); fprintf(stderr, "\n\n") );
+
+  *hyph_used = FALSE;
+
+  if( multi == nilobj )
+  {
+    /* set max_width (width of 1st line), etc_width (width of later lines) */
+    max_width = find_min(fc(*c), bfc(*c));
+    if( display_style(save_style(x)) == DISPLAY_OUTDENT ||
+        display_style(save_style(x)) == DISPLAY_ORAGGED )
+    { outdent_margin = 2 * FontSize(font(save_style(x)), x);
+      etc_width = max_width - outdent_margin;
+    }
+    else etc_width = max_width;
+    assert( size(x, COLM) > max_width, "FillObject: initial size!" );
+
+    /* if column width is ridiculously small, exit with error message */
+    if( max_width <= 2 * FontSize(font(save_style(x)), x) )
+    {
+      Error(14, 6, "paragraph deleted (assigned width %s is too narrow)",
+         WARN, &fpos(x), EchoLength(max_width));
+      res = MakeWord(WORD, STR_EMPTY, &fpos(x));
+      word_font(res) = font(save_style(x));
+      word_colour(res) = colour(save_style(x));
+      word_language(res) = language(save_style(x));
+      word_hyph(res) = hyph_style(save_style(x)) == HYPH_ON;
+      back(res, COLM) = fwd(res, COLM) = 0;
+      ReplaceNode(res, x);
+      DisposeObject(x);
+      return res;
+    }
+  }
+  else max_width = etc_width = 0; /* not used really */
+
+  /* add &1rt {} to end of paragraph */
+  New(gp, GAP_OBJ);  hspace(gp) = 1;  vspace(gp) = 0;
+  SetGap(gap(gp), FALSE, FALSE, TRUE, AVAIL_UNIT, TAB_MODE, 1*FR);
+  tmp = MakeWord(WORD, STR_GAP_RJUSTIFY, &fpos(x));
+  Link(gp, tmp);  Link(x, gp);
+  tmp = MakeWord(WORD, STR_EMPTY, &fpos(x));
+  back(tmp, COLM) = fwd(tmp, COLM) = back(tmp, ROWM) = fwd(tmp, ROWM) = 0;
+  word_font(tmp) = 0;
+  word_colour(tmp) = 0;
+  word_language(tmp) = 0;
+  word_hyph(tmp) = 0;
+  underline(tmp) = UNDER_OFF;
+  Link(x, tmp);
+
+  /* if extend_unbreakable, run through x and set every gap in the     */
+  /* shadow of a previous gap to be unbreakable                        */
+  if( extend_unbreakable )
+  { int f, max_f;  OBJECT g;
+    FirstDefinite(x, link, y, jn);
+    assert( link != x, "FillObject/extend_unbreakable:  link == x!" );
+    f = max_f = size(y, COLM);  prev = y;
+    NextDefiniteWithGap(x, link, y, g, jn);
+    while( link != x )
+    {
+      /* add unbreakableness if gap is overshadowed by a previous one */
+      f += MinGap(fwd(prev, COLM), back(y, COLM), fwd(y, COLM), &gap(g))
+	     - fwd(prev, COLM) + back(y, COLM);
+      if( f < max_f )
+      { if( units(gap(g)) == FIXED_UNIT )
+	  nobreak(gap(g)) = TRUE;
+      }
+      else
+      { max_f = f;
+      }
+
+      /* on to next component and gap */
+      prev = y;
+      NextDefiniteWithGap(x, link, y, g, jn);
+    }
+  }
+
+  /* initially we can hyphenate if hyphenation is on, but not first pass */
+  if( hyph_style(save_style(x)) == HYPH_UNDEF )
+    Error(14, 7, "hyphen or nohyphen option missing", FATAL, &fpos(x));
+  hyph_allowed = FALSE;
+
+  /* initialize I to first interval, BestI to best ending here, and run */
+  RESTART:
+  IntervalInit(I, x, max_width, etc_width, hyph_word);  BestI = I;
+  while( IntervalClass(I) != AT_END )
+  {
+    debug0(DOF, D, "loop:");
+    debug1(DOF, D, "       %s", IntervalPrint(I, x));
+    switch( IntervalClass(I) )
+    {
+
+      case TOO_LOOSE:
+      case EMPTY_INTERVAL:
+      
+	/* too loose, so save best and shift right end */
+	if( IntervalClass(I) == EMPTY_INTERVAL ||
+	    IntervalBadness(BestI) <= IntervalBadness(I) )
+	      I = BestI;
+	debug1(DOF, D, "BestI: %s\n", IntervalPrint(I, x));
+	/* NB no break */
+
+
+      case UNBREAKABLE_RIGHT:
+
+	IntervalShiftRightEnd(I, x, hyph_word, max_width, etc_width);
+	BestI = I;
+	break;
+
+
+      case LOOSE:
+      case TIGHT:
+      case TOO_TIGHT:
+      
+	/* reasonable, so check best and shift left end */
+	if( IntervalBadness(I) < IntervalBadness(BestI) )  BestI = I;
+	/* NB no break */
+
+
+      case UNBREAKABLE_LEFT:
+      case TAB_OVERLAP:
+      
+	/* too tight, or unbreakable gap at left end, so shift left end */
+	IntervalShiftLeftEnd(I, x, max_width, etc_width);
+	break;
+
+
+      /* ***
+      case EMPTY_INTERVAL:
+
+	PrevDefinite(x, I.llink, y);
+	if( can_hyphenate )
+	{ x = Hyphenate(x);
+	  can_hyphenate = FALSE;
+	  hyph_allowed = TRUE;
+	  *hyph_used = TRUE;
+	}
+	else CorrectOversize(x, I.llink,
+	  (I.cwid!=nilobj) ? bfc(constraint(I.cwid)) : etc_width);
+	goto RESTART;
+      *** */
+
+
+      default:
+      
+	assert(FALSE, "FillObject: IntervalClass(I)");
+	break;
+
+    }
+  }
+
+  /* do end processing */
+  ifdebug(DOF, DD,
+    debug0(DOF, DD, "final result:");
+    debug1(DOF, DD, "%s", IntervalPrint(BestI, x));
+    while( BestI.llink != x )
+    { BestI.rlink = BestI.llink;
+      Child(gp, BestI.rlink);
+      BestI.llink = save_prev(gp);
+      debug1(DOF, DD, "%s", IntervalPrint(BestI, x));
+    }
+  );
+
+  if( I.llink == x )
+  { /* The result has only one line.  Since the line did not fit initially, */
+    /* this must mean either that a large word was discarded or else that   */
+    /* the line was only slightly tight                                     */
+    if( multi == nilobj )
+    { res = x;
+      back(res, COLM) = 0;  fwd(res, COLM) = max_width;
+    }
+    else
+    { New(res, VCAT);
+      adjust_cat(res) = FALSE;
+      ReplaceNode(res, x);
+      Link(res, x);
+    }
+  }
+  else if( can_hyphenate && IntervalBadness(BestI) > HYPH_BAD )
+  { x = Hyphenate(x);
+    can_hyphenate = FALSE;
+    hyph_allowed = TRUE;
+    *hyph_used = TRUE;
+    goto RESTART;
+  }
+  else
+  { OBJECT lgap, llink;
+    New(res, VCAT);
+    adjust_cat(res) = FALSE;
+    back(res, COLM) = 0;  fwd(res, COLM) = max_width;
+    ReplaceNode(res, x);
+    llink = I.llink;
+
+    /* break the lines of x */
+    while( llink != x )
+    { New(y, ACAT);
+      adjust_cat(y) = adjust_cat(x);
+      FposCopy(fpos(y), fpos(x));
+      StyleCopy(save_style(y), save_style(x));
+      if( Down(res) != res &&
+		(display_style(save_style(y)) == DISPLAY_ADJUST ||
+		 display_style(save_style(y)) == DISPLAY_OUTDENT) )
+	 display_style(save_style(y)) = DO_ADJUST;
+      back(y, COLM) = 0;
+      fwd(y, COLM) = max_width;
+
+      /* if outdented paragraphs, add 2.0f @Wide & to front of new line */
+      if( display_style(save_style(x)) == DISPLAY_OUTDENT ||
+          display_style(save_style(x)) == DISPLAY_ORAGGED )
+      {
+	OBJECT t1, t2, z;
+	t1 = MakeWord(WORD, STR_EMPTY, &fpos(x));
+	back(t1, COLM) = fwd(t1, COLM) = back(t1, ROWM) = fwd(t1, ROWM) = 0;
+	word_font(t1) = 0;
+	word_colour(t1) = 0;
+	word_language(t1) = 0;
+	word_hyph(t1) = 0;
+	underline(t1) = UNDER_OFF;
+	New(t2, WIDE);
+	SetConstraint(constraint(t2), MAX_FULL_LENGTH, outdent_margin,
+	  MAX_FULL_LENGTH);
+	back(t2, COLM) = 0;  fwd(t2, COLM) = outdent_margin;
+	underline(t2) = UNDER_OFF;
+	Link(t2, t1);
+	Link(y, t2);
+	New(z, GAP_OBJ);
+	hspace(z) = vspace(z) = 0;
+	SetGap(gap(z), TRUE, FALSE, TRUE, FIXED_UNIT, EDGE_MODE, 0);
+	Link(y, z);
+      }
+
+      /* move the line to below y */
+      TransferLinks(NextDown(llink), x, y);
+
+      /* add hyphen to end of previous line, if lgap is ADD_HYPH */
+      Child(lgap, llink);
+      if( mode(gap(lgap)) == ADD_HYPH )
+      { OBJECT z;  BOOLEAN under;
+
+	/* work out whether the hyphen needs to be underlined */
+	Child(z, LastDown(x));
+	under = underline(z);
+
+	/* add zero-width gap object */
+        New(z, GAP_OBJ);
+	debug0(DOF, DD, "   adding hyphen\n");
+	hspace(z) = vspace(z) = 0;
+	underline(z) = under;
+	SetGap(gap(z), TRUE, FALSE, TRUE, FIXED_UNIT, EDGE_MODE, 0);
+	Link(x, z);
+
+	/* add hyphen */
+	z = MakeWord(WORD, STR_HYPHEN, &fpos(y));
+	word_font(z) = font(save_style(x));
+	word_colour(z) = colour(save_style(x));
+	word_language(z) = language(save_style(x));
+	word_hyph(z) = hyph_style(save_style(x)) == HYPH_ON;
+	underline(z) = under;
+	FontWordSize(z);
+	Link(x, z);
+      }
+
+      /* attach y to res, recycle lgap for gap separating the two lines */
+      Link(NextDown(res), y);
+      MoveLink(llink, NextDown(res), PARENT);
+      hspace(lgap) = 0;
+      vspace(lgap) = 1;
+      GapCopy(gap(lgap), line_gap(save_style(x)));
+      if( Down(lgap) != lgap )  DisposeChild(Down(lgap));
+
+      /* move on to previous line */
+      llink = save_prev(lgap);
+    }
+
+    /* attach first line, x, to res */
+    Link(NextDown(res), x);
+    back(x, COLM) = 0;
+    fwd(x, COLM) = max_width;
+    if( display_style(save_style(x)) == DISPLAY_ADJUST ||
+	display_style(save_style(x)) == DISPLAY_OUTDENT )
+	  display_style(save_style(x)) = DO_ADJUST;
+
+    /* if last line contains only the {} from final &1rt {}, delete the line */
+    /* and the preceding gap                                                 */
+    Child(y, LastDown(res));
+    if( Down(y) == LastDown(y) )
+    { DisposeChild(LastDown(res));
+      assert( Down(res) != LastDown(res), "almost empty paragraph!" );
+      DisposeChild(LastDown(res));
+    }
+
+    /* else delete the final &1rt {} from the last line, to help clines */
+    else
+    { Child(z, LastDown(y));
+      assert( type(z)==WORD && string(z)[0]=='\0', "FillObject: last word!" );
+      DisposeChild(LastDown(y));
+      Child(z, LastDown(y));
+      assert( type(z) == GAP_OBJ, "FillObject: last gap_obj!" );
+      DisposeChild(LastDown(y));
+    }
+
+    /* set unbreakable bit of first and last inter-line gaps, if required */
+    if( nobreakfirst(save_style(x)) && Down(res) != LastDown(res) )
+    { Child(gp, NextDown(Down(res)));
+      assert( type(gp) == GAP_OBJ, "FillObject: type(gp) != GAP_OBJ (a)!" );
+      nobreak(gap(gp)) = TRUE;
+    }
+    if( nobreaklast(save_style(x)) && Down(res) != LastDown(res) )
+    { Child(gp, PrevDown(LastDown(res)));
+      assert( type(gp) == GAP_OBJ, "FillObject: type(gp) != GAP_OBJ (b)!" );
+      nobreak(gap(gp)) = TRUE;
+    }
+
+
+    /* recalculate the width of the last line, since it may now be smaller */
+    assert( LastDown(res) != res, "FillObject: empty paragraph!" );
+    Child(y, LastDown(res));
+    FirstDefinite(y, link, z, jn);
+    assert( link != y, "FillObject: last line is empty!" );
+    f = back(z, COLM);  prev = z;
+    NextDefiniteWithGap(y, link, z, gp, jn);
+    while( link != y )
+    {
+      f += MinGap(fwd(prev, COLM), back(z, COLM), fwd(z, COLM), &gap(gp));
+      prev = z;
+      NextDefiniteWithGap(y, link, z, gp, jn);
+    }
+    fwd(y, COLM) = find_min(MAX_FULL_LENGTH, f + fwd(prev, COLM));
+
+    /* make last line DO_ADJUST if it is oversize */
+    if( size(y, COLM) > max_width )  display_style(save_style(y)) = DO_ADJUST;
+  }
+
+  /* rejoin unused hyphenated gaps so that kerning will work across them */
+  if( *hyph_used && type(res) == VCAT )
+  { for( link = Down(res);  link != res;  link = NextDown(link) )
+    { Child(y, link);
+      if( type(y) == ACAT )
+      { for( ylink = Down(y);  ylink != y;  ylink = NextDown(ylink) )
+        { Child(gp, ylink);
+	  if( type(gp) == GAP_OBJ && width(gap(gp)) == 0 &&
+	      mode(gap(gp)) == ADD_HYPH )
+	  {
+	    /* possible candidate for joining, look into what's on each side */
+	    Child(prev, PrevDown(ylink));
+	    Child(next, NextDown(ylink));
+	    if( is_word(type(prev)) && is_word(type(next)) &&
+	        word_font(prev) == word_font(next) &&
+	        word_colour(prev) == word_colour(next) &&
+	        word_language(prev) == word_language(next) &&
+	        underline(prev) == underline(next) )
+	    { 
+	      debug2(DOF, D, "joining %s with %s", EchoObject(prev),
+		EchoObject(next));
+	      typ = type(prev) == QWORD || type(next) == QWORD ? QWORD : WORD;
+	      tmp = MakeWordTwo(typ, string(prev), string(next), &fpos(prev));
+	      word_font(tmp) = word_font(prev);
+	      word_colour(tmp) = word_colour(prev);
+	      word_language(tmp) = word_language(prev);
+	      word_hyph(tmp) = word_hyph(prev);
+	      FontWordSize(tmp);
+	      underline(tmp) = underline(prev);
+	      MoveLink(ylink, tmp, CHILD);
+	      DisposeChild(Up(prev));
+	      DisposeChild(Up(next));
+	    }
+	  }
+        }
+      }
+    }
+  }
+
+  debug0(DOF, D, "FillObject exiting");
+  return res;
+} /* end FillObject */
diff --git a/z15.c b/z15.c
new file mode 100644
index 0000000..cf25102
--- /dev/null
+++ b/z15.c
@@ -0,0 +1,838 @@
+/*@z15.c:Size Constraints:MinConstraint(), EnlargeToConstraint()@*************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z15.c                                                      */
+/*  MODULE:       Size Constraints                                           */
+/*  EXTERNS:      MinConstraint(), EnlargeToConstraint(),                    */
+/*                ReflectConstraint(), SemiRotateConstraint(),               */
+/*                RotateConstraint(), InvScaleConstraint(), Constrained(),   */
+/*                EchoConstraint(), DebugConstrained()                       */
+/*                                                                           */
+/*****************************************************************************/
+#include <math.h>
+#ifndef M_PI
+#define M_PI       3.1415926535897931160E0
+#endif
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  MinConstraint(xc, yc)                                                    */
+/*                                                                           */
+/*  Replace *xc by the minimum of the two constraints *xc and *yc.           */
+/*                                                                           */
+/*****************************************************************************/
+
+void MinConstraint(CONSTRAINT *xc, CONSTRAINT *yc)
+{ bc(*xc)  = find_min(bc(*xc),  bc(*yc));
+  bfc(*xc) = find_min(bfc(*xc), bfc(*yc));
+  fc(*xc)  = find_min(fc(*xc),  fc(*yc));
+} /* end MinConstraint */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  SetSizeToMaxForwardConstraint(b, f, c)                                   */
+/*                                                                           */
+/*  Set *b, *f to their largest possible value within constraint *c, such    */
+/*  that *f is as large as possible.                                         */
+/*                                                                           */
+/*****************************************************************************/
+
+void SetSizeToMaxForwardConstraint(FULL_LENGTH *b, FULL_LENGTH *f, CONSTRAINT *c)
+{
+  *f = find_min(bfc(*c), fc(*c));
+  *b = find_min(bc(*c), bfc(*c) - *f);
+} /* end EnlargeToConstraint */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  EnlargeToConstraint(b, f, c)                                             */
+/*                                                                           */
+/*  Enlarge *b,*f to its largest possible value within constraint *c.        */
+/*                                                                           */
+/*****************************************************************************/
+
+void EnlargeToConstraint(FULL_LENGTH *b, FULL_LENGTH *f, CONSTRAINT *c)
+{
+  *f = find_min(bfc(*c) - *b, fc(*c));
+} /* end EnlargeToConstraint */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  ReflectConstraint(xc, yc)                                                */
+/*                                                                           */
+/*  Set xc to the constraint which is yc with its back and forward reversed. */
+/*                                                                           */
+/*****************************************************************************/
+
+#define ReflectConstraint(xc, yc)  SetConstraint(xc, fc(yc), bfc(yc), bc(yc))
+
+
+/*@::ScaleToConstraint(), InvScaleConstraint(), etc@**************************/
+/*                                                                           */
+/*  int ScaleToConstraint(b, f, c)                                           */
+/*                                                                           */
+/*  Return the scale factor needed to scale object of size b, f down so it   */
+/*  has a size which fits tightly into constraint c.                         */
+/*                                                                           */
+/*****************************************************************************/
+
+int ScaleToConstraint(FULL_LENGTH b, FULL_LENGTH f, CONSTRAINT *c)
+{ float scale_factor;  int res;
+  debug3(DSC, DD, "ScaleToConstraint(%s, %s, %s)", EchoLength(b),
+    EchoLength(f), EchoConstraint(c));
+  scale_factor = 1.0;
+  if( b     > 0 )  scale_factor = find_min(scale_factor, (float) bc(*c)/b       );
+  if( b + f > 0 )  scale_factor = find_min(scale_factor, (float) bfc(*c)/(b + f));
+  if(     f > 0 )  scale_factor = find_min(scale_factor, (float) fc(*c)/f       );
+  res = scale_factor * SF;
+  debug2(DSC, DD, "ScaleToConstraint returning %.2f (%d)", scale_factor, res);
+  return res;
+} /* end ScaleToConstraint */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  InvScaleConstraint(yc, sf, xc)                                           */
+/*                                                                           */
+/*  Scale constraint xc to the inverse of the scale factor sf.               */
+/*                                                                           */
+/*****************************************************************************/
+
+void InvScaleConstraint(CONSTRAINT *yc, FULL_LENGTH sf, CONSTRAINT *xc)
+{
+#if DEBUG_ON
+  char buff[10];
+#endif
+  ifdebug(DSC, DD, sprintf(buff, "%.3f", (float) sf / SF));
+  debug2(DSC, DD, "InvScaleConstraint(yc, %s, %s)", buff, EchoConstraint(xc));
+  assert( sf > 0, "InvScaleConstraint: sf <= 0!" );
+  bc(*yc)  = bc(*xc)  == MAX_FULL_LENGTH ? MAX_FULL_LENGTH :
+    find_min(MAX_FULL_LENGTH, bc(*xc) * SF / sf);
+  bfc(*yc) = bfc(*xc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH :
+    find_min(MAX_FULL_LENGTH, bfc(*xc)* SF / sf);
+  fc(*yc)  = fc(*xc)  == MAX_FULL_LENGTH ? MAX_FULL_LENGTH :
+    find_min(MAX_FULL_LENGTH, fc(*xc) * SF / sf);
+  debug1(DSC, DD, "InvScaleConstraint returning %s", EchoConstraint(yc));
+} /* end InvScaleConstraint */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static SemiRotateConstraint(xc, u, v, angle, yc)                         */
+/*                                                                           */
+/*  Used by RotateConstraint to calculate one rotated constraint.            */
+/*                                                                           */
+/*****************************************************************************/
+
+static void SemiRotateConstraint(CONSTRAINT *xc, FULL_LENGTH u, FULL_LENGTH v,
+float angle, CONSTRAINT *yc)
+{ float cs, sn;
+#if DEBUG_ON
+  char buff[20];
+#endif
+  ifdebug(DSC, DD, sprintf(buff, "%.1f", angle * 360.0 / (2 * M_PI)));
+  debug4(DSC, DD, "SemiRotateConstraint(xc, %s, %s, %sd, %s",
+    EchoLength(u), EchoLength(v), buff, EchoConstraint(yc));
+  cs = cos(angle);  sn = sin(angle);
+  if( fabs(cs) < 1e-6 )
+    SetConstraint(*xc, MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+  else
+    SetConstraint(*xc,
+      find_min(MAX_FULL_LENGTH, (bc(*yc) - u * sn) / cs),
+      find_min(MAX_FULL_LENGTH, (bfc(*yc) - u * sn - v * sn) / cs),
+      find_min(MAX_FULL_LENGTH, (fc(*yc) - v * sn) / cs ));
+  debug1(DSC, DD, "SemiRotateConstraint returning %s", EchoConstraint(xc));
+} /* end SemiRotateConstraint */
+
+
+/*@::RotateConstraint()@******************************************************/
+/*                                                                           */
+/*  RotateConstraint(c, y, angle, hc, vc, dim)                               */
+/*                                                                           */
+/*  Take the object angle @Rotate y, which is supposed to be constrained     */
+/*  horizontally by hc and vertically by vc, and determine a constraint      */
+/*  (either horizontal or vertical, depending on dim) for y.                 */
+/*                                                                           */
+/*  The constraint returned is a trigonometric function of all these         */
+/*  parameters, including the present size of y in dimension 1-dim.          */
+/*                                                                           */
+/*****************************************************************************/
+
+void RotateConstraint(CONSTRAINT *c, OBJECT y, FULL_LENGTH angle,
+CONSTRAINT *hc, CONSTRAINT *vc, int dim)
+{ CONSTRAINT c1, c2, c3, dc;  float theta, psi;
+#if DEBUG_ON
+  char buff[20];
+#endif
+  ifdebug(DSC, DD, sprintf(buff, "%.1f", (float) angle / DG ));
+  debug4(DSC, DD, "RotateConstraint(c, y, %sd, %s, %s, %s)",
+	buff, EchoConstraint(hc), EchoConstraint(vc), dimen(dim));
+
+  /* work out angle in radians between 0 and 2*PI */
+  theta = (float) angle * 2 * M_PI / (float) (DG * 360);
+  while( theta < 0 ) theta += 2 * M_PI;
+  while( theta >= 2 * M_PI ) theta -= 2 * M_PI;
+  assert( 0 <= theta && theta <= 2 * M_PI, "RotateConstraint: theta!" );
+
+  /* determine theta, c1, and c2 depending on which quadrant we are in */
+  if( theta <= M_PI / 2.0 )   /* first quadrant */
+  { theta = theta;
+    CopyConstraint(c1, *hc);
+    CopyConstraint(c2, *vc);
+  }
+  else if ( theta <= M_PI )   /* second quadrant */
+  { theta -= M_PI / 2.0;
+    ReflectConstraint(c1, *vc);
+    CopyConstraint(c2, *hc);
+  }
+  else if ( theta <= 3.0 * M_PI / 2.0 )   /* third quadrant */
+  { theta -= M_PI;
+    ReflectConstraint(c1, *hc);
+    ReflectConstraint(c2, *vc);
+  }
+  else /* fourth quadrant */
+  { theta -= 3.0 * M_PI / 2.0;
+    CopyConstraint(c1, *vc);
+    ReflectConstraint(c2, *hc);
+  }
+  psi = M_PI / 2.0 - theta;
+  debug2(DSC, DD, "  c1: %s;  c2: %s", EchoConstraint(&c1), EchoConstraint(&c2));
+
+  /* return the minimum of the two constraints, rotated */
+  if( dim == COLM )
+  { SemiRotateConstraint(c, back(y, ROWM), fwd(y, ROWM), theta, &c1);
+    ReflectConstraint(c3, c2);
+    SemiRotateConstraint(&dc, fwd(y, ROWM), back(y, ROWM), psi, &c3);
+    MinConstraint(c, &dc);
+  }
+  else
+  { SemiRotateConstraint(c, back(y, COLM), fwd(y, COLM), psi, &c1);
+    SemiRotateConstraint(&dc, fwd(y, COLM), back(y, COLM), theta, &c2);
+    MinConstraint(c, &dc);
+  }
+
+  debug1(DSC, DD, "RotateConstraint returning %s", EchoConstraint(c));
+} /* end RotateConstraint */
+
+/*@::InsertScale()@***********************************************************/
+/*                                                                           */
+/*  BOOLEAN InsertScale(x, c)                                                */
+/*                                                                           */
+/*  Insert a @Scale object above x so that x is scaled horizontally to fit   */
+/*  constraint c.  If this is not possible, owing to the necessary scale     */
+/*  factor being too small, then don't do it; return FALSE instead.          */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN InsertScale(OBJECT x, CONSTRAINT *c)
+{ int scale_factor; OBJECT prnt;
+  scale_factor = ScaleToConstraint(back(x, COLM), fwd(x, COLM), c);
+  if( scale_factor >= 0.2 * SF )
+  {
+    New(prnt, SCALE);
+    underline(prnt) = underline(x);
+    FposCopy(fpos(prnt), fpos(x));
+
+    /* set horizontal size and scale factor */
+    bc(constraint(prnt)) = scale_factor;
+    back(prnt, COLM) = ( back(x, COLM) * scale_factor ) / SF;
+
+    /* *** slightly too small?
+    fwd(prnt,  COLM) = ( fwd(x,  COLM) * scale_factor ) / SF;
+    *** */
+    fwd(prnt,  COLM) = find_min(bfc(*c) - back(prnt, COLM), fc(*c));
+
+    /* set vertical size and scale factor */
+    fc(constraint(prnt)) = 1 * SF;
+    back(prnt, ROWM) = back(x, ROWM);
+    fwd(prnt, ROWM) = fwd(x, ROWM);
+
+    /* link prnt above x and return */
+    ReplaceNode(prnt, x);
+    Link(prnt, x);
+    return TRUE;
+  }
+  else return FALSE;
+} /* end InsertScale */
+
+
+/*@::CatConstrained()@********************************************************/
+/*                                                                           */
+/*  static CatConstrained(x, xc, ratm, y, dim, OBJECT *why)                  */
+/*                                                                           */
+/*  Calculate the size constraint of object x, as for Constrained below.     */
+/*  y is the enclosing VCAT etc. object;  ratm is TRUE if a ^ lies after     */
+/*  x anywhere.  dim is COLM or ROWM.                                        */
+/*                                                                           */
+/*  The meaning of the key variables is as follows:                          */
+/*                                                                           */
+/*  be       The amount by which back(x, dim) can increase from zero         */
+/*           without having any impact on size(y, dim).  Thereafter,         */
+/*           any increase causes an equal increase in size(y, dim).          */
+/*                                                                           */
+/*  fe       The amount by which fwd(x, dim) can increase from zero          */
+/*           without having any impact on size(y, dim).  Thereafter,         */
+/*           any increase causes an equal increase in size(y, dim).          */
+/*                                                                           */
+/*  backy,   The value that back(y, dim) and fwd(y, dim) would have if x     */
+/*  fwdy     was definite with size 0,0.  They will in general be larger     */
+/*           than the present values if x is indefinite, and smaller         */
+/*           if x is definite, although it depends on marks and gaps.        */
+/*                                                                           */
+/*****************************************************************************/
+
+static void CatConstrained(OBJECT x, CONSTRAINT *xc, BOOLEAN ratm,
+OBJECT y, int dim, OBJECT *why)
+{ int side;			/* the size of y that x is on: BACK, ON, FWD */
+  CONSTRAINT yc;		/* constraints on y                          */
+  FULL_LENGTH backy, fwdy;	/* back(y), fwd(y) would be if x was (0, 0)  */
+  FULL_LENGTH be, fe;		/* amount back(x), fwd(x) can be for free    */
+  FULL_LENGTH beffect, feffect;	/* scratch variables for calculations        */
+  FULL_LENGTH seffect;		/* scratch variables for calculations        */
+  OBJECT link, sg, pg;	/* link to x, its successor and predecessor  */
+  OBJECT prec_def, sd;	/* definite object preceding (succeeding) x  */
+  int tb, tbf, tf, tbc, tbfc, tfc, mxy, myz;
+
+  Constrained(y, &yc, dim, why);
+  if( constrained(yc) )
+  {
+    /* find the link of x, and its neighbours and their links */
+    link = UpDim(x, dim);
+    SetNeighbours(link, ratm, &pg, &prec_def, &sg, &sd, &side);
+
+    /* amount of space available at x without changing the size of y */
+    be = pg == nilobj ? 0 : ExtraGap(fwd(prec_def, dim), 0, &gap(pg), BACK);
+    fe = sg == nilobj ? 0 : ExtraGap(0, back(sd, dim),      &gap(sg), FWD);
+
+    if( is_indefinite(type(x)) )
+    {
+      /* insert two lengths and delete one */
+      beffect = pg==nilobj ? 0 : MinGap(fwd(prec_def, dim), 0, 0, &gap(pg));
+      feffect = sg==nilobj ? 0 : MinGap(0, back(sd,dim), fwd(sd,dim), &gap(sg));
+      seffect = pg==nilobj ?
+	  sg == nilobj ? 0 : back(sd, dim) :
+	  sg == nilobj ? fwd(prec_def, dim) :
+	    MinGap(fwd(prec_def, dim), back(sd, dim), fwd(sd, dim), &gap(sg));
+
+      switch( side )
+      {
+	case BACK:	backy = back(y, dim) + beffect + feffect - seffect;
+			fwdy  = fwd(y, dim);
+			break;
+
+	case ON:	/* must be first, other cases prohibited */
+			backy = 0;
+			fwdy = fwd(y, dim) + feffect;
+			break;
+
+	case FWD:	backy = back(y, dim);
+			fwdy  = fwd(y, dim) + beffect + feffect - seffect;
+			break;
+      }
+    }
+
+    else /* x is definite */
+
+    { beffect = pg == nilobj ? back(x, dim) :
+	MinGap(fwd(prec_def, dim), back(x,dim), fwd(x,dim), &gap(pg)) -
+	MinGap(fwd(prec_def, dim), 0,           0,          &gap(pg));
+
+      feffect = sg == nilobj ? fwd(x, dim) :
+	MinGap(fwd(x, dim), back(sd, dim), fwd(sd, dim), &gap(sg)) -
+	MinGap(0,           back(sd, dim), fwd(sd, dim), &gap(sg));
+
+      switch( side )
+      {
+	case BACK:	backy = back(y, dim) - beffect - feffect;
+			fwdy  = fwd(y, dim);
+			break;
+
+	case ON:	backy = back(y, dim) - beffect;
+			fwdy  = fwd(y, dim)  - feffect;
+			break;
+
+	case FWD:	backy = back(y, dim);
+			fwdy  = fwd(y, dim) - beffect - feffect;
+			break;
+      }
+    }
+
+    debug5(DSC, DD, "  side: %s, backy: %s, fwdy: %s, be: %s, fe: %s",
+		Image(side), EchoLength(backy), EchoLength(fwdy),
+		EchoLength(be), EchoLength(fe) );
+
+    if( !FitsConstraint(backy, fwdy, yc) )
+      SetConstraint(*xc, -1, -1, -1);
+    else switch( side )
+    {
+
+      case BACK:
+	
+	tbc = bc(yc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : bc(yc) - backy;
+	tbfc = bfc(yc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : bfc(yc) - backy - fwdy;
+	mxy = find_min(tbc, tbfc);
+	tb  = find_min(MAX_FULL_LENGTH, be + mxy);
+	tbf = find_min(MAX_FULL_LENGTH, be + fe + mxy);
+	tf  = find_min(MAX_FULL_LENGTH, fe + mxy);
+	SetConstraint(*xc, tb, tbf, tf);
+	break;
+
+
+      case ON:
+	
+	tbc = bc(yc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : bc(yc) - backy;
+	tbfc = bfc(yc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : bfc(yc) - backy - fwdy;
+	tfc = fc(yc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : fc(yc) - fwdy;
+	mxy = find_min(tbc, tbfc);
+	myz = find_min(tfc, tbfc);
+	tb  = find_min(MAX_FULL_LENGTH, be + mxy);
+	tbf = find_min(MAX_FULL_LENGTH, be + fe + tbfc);
+	tf  = find_min(MAX_FULL_LENGTH, fe + myz);
+	SetConstraint(*xc, tb, tbf, tf);
+	break;
+	
+
+      case FWD:
+
+	tfc = fc(yc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : fc(yc) - fwdy;
+	tbfc = bfc(yc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : bfc(yc) - backy - fwdy;
+	mxy = find_min(tfc, tbfc);
+	tb  = find_min(MAX_FULL_LENGTH, be + mxy);
+	tbf = find_min(MAX_FULL_LENGTH, be + fe + mxy);
+	tf  = find_min(MAX_FULL_LENGTH, fe + mxy);
+	SetConstraint(*xc, tb, tbf, tf);
+	break;
+	
+    }
+  } /* end if( constrained ) */
+  else SetConstraint(*xc, MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+} /* end CatConstrained */
+
+
+/*@::Constrained()@***********************************************************/
+/*                                                                           */
+/*  Constrained(x, xc, dim, why)                                             */
+/*                                                                           */
+/*  Calculate the size constraint of object x, and return it in *xc.         */
+/*                                                                           */
+/*  If the resulting constraint is a hard one caused by coming up against    */
+/*  a HIGH (vertical) or WIDE (horizontal), set *why to this object; if      */
+/*  not, leave *why unchanged.                                               */
+/*                                                                           */
+/*****************************************************************************/
+
+void Constrained(OBJECT x, CONSTRAINT *xc, int dim, OBJECT *why)
+{ OBJECT y, link, lp, rp, z, tlink, g;  CONSTRAINT yc, hc, vc;
+  BOOLEAN ratm;  FULL_LENGTH xback, xfwd;  int tb, tf, tbf, tbc, tfc;
+  SetLengthDim(dim);
+  debug2(DSC, DD, "[ Constrained(%s, xc, %s, why), x =",
+    Image(type(x)), dimen(dim));
+  ifdebug(DSC, DD, DebugObject(x));
+  assert( Up(x) != x, "Constrained: x has no parent!" );
+
+  /* a CLOSURE which is external_ver is unconstrained in the ROWM direction */
+  /* a CLOSURE which is external_hor is unconstrained in both directions   */
+  if( type(x) == CLOSURE && ((dim==ROWM && external_ver(x)) || external_hor(x)) )
+  {
+    SetConstraint(*xc, MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+    debug1(DSC, DD, "] Constrained returning %s (external)",EchoConstraint(xc));
+    return;
+  }
+
+  /* find y, the parent of x */
+  link = UpDim(x, dim);  ratm = FALSE;
+  for( tlink = NextDown(link);  type(tlink) == LINK;  tlink = NextDown(tlink) )
+  { Child(g, tlink);
+    if( type(g) == GAP_OBJ && mark(gap(g)) )  ratm = TRUE;
+  }
+  y = tlink;
+  debug1(DSC, DDD, "parent y = %s", Image(type(y)));
+  ifdebug(DSC, DDD, DebugObject(y));
+
+  switch( type(y) )
+  {
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+    case KERN_SHRINK:
+    case ONE_COL:
+    case ONE_ROW:
+    case HCONTRACT:
+    case VCONTRACT:
+    case HEXPAND:
+    case VEXPAND:
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case SPLIT:
+    case BACKGROUND:
+
+      Constrained(y, xc, dim, why);
+      break;
+
+
+    case HSCALE:
+    case VSCALE:
+    
+      if( (dim == COLM) != (type(y) == HSCALE) )  Constrained(y, xc, dim, why);
+      else SetConstraint(*xc, MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+      break;
+
+
+    case HCOVER:
+    case VCOVER:
+    
+      /* dubious, but not likely to arise anyway */
+      if( (dim == COLM) != (type(y) == HCOVER) )  Constrained(y, xc, dim, why);
+      else SetConstraint(*xc, MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+      break;
+
+
+    case SCALE:
+
+      Constrained(y, &yc, dim, why);
+      if( dim == COLM && bc(constraint(y)) == 0 )
+      {
+	/* Lout-supplied factor required later, could be tiny */
+	SetConstraint(*xc, MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+      }
+      else
+      { InvScaleConstraint(xc,
+	  dim == COLM ? bc(constraint(y)) : fc(constraint(y)), &yc);
+      }
+      break;
+
+
+    case ROTATE:
+    
+      Constrained(y, &hc, COLM, why);  Constrained(y, &vc, ROWM, why);
+      RotateConstraint(xc, x, sparec(constraint(y)), &hc, &vc, dim);
+      break;
+
+
+    case WIDE:
+    case HIGH:
+    
+      Constrained(y, xc, dim, why);
+      if( (type(y)==WIDE) == (dim==COLM) )
+      { MinConstraint(xc, &constraint(y));
+	*why = y;
+      }
+      break;
+
+
+    case HLIMITED:
+    case VLIMITED:
+
+      if( (type(y) == HLIMITED) == (dim == COLM) )
+      {
+	BOOLEAN still_searching = TRUE;
+	z = y;
+	SetConstraint(*xc, back(z, dim), size(z, dim), fwd(z, dim));
+	debug2(DSC, D, "  [ %s (%s)", Image(type(z)), EchoConstraint(xc));
+	while( still_searching && Up(z) != z )
+	{
+          Parent(z, UpDim(z, dim));
+	  switch( type(z) )
+	  {
+	    case VLIMITED:
+	    case HLIMITED:
+	    case COL_THR:
+	    case ROW_THR:
+	    case ONE_COL:
+	    case ONE_ROW:
+	    case HCONTRACT:
+	    case VCONTRACT:
+	    case SPLIT:
+	    case START_VSPAN:
+	    case START_HSPAN:
+
+	      SetConstraint(*xc, back(z, dim), size(z, dim), fwd(z, dim));
+	      debug2(DSC, DD, "    let s = %s (%s)", Image(type(z)),
+	        EchoConstraint(xc));
+	      break;
+
+
+	    case HSPANNER:
+	    case VSPANNER:
+
+	      /* SpannerAvailableSpace(z, dim, &b, &f); */
+	      CopyConstraint(*xc, constraint(z));
+	      debug2(DSC, D, "  ] let s = %s (%s) and stop",
+		Image(type(z)), EchoConstraint(&constraint(z)));
+	      still_searching = FALSE;
+	      break;
+
+
+	    default:
+
+	      debug1(DSC, D, "  ] stopping at %s", Image(type(z)));
+	      still_searching = FALSE;
+	      break;
+	  }
+	}
+	*why = y;
+      }
+      else
+      {
+        Constrained(y, xc, dim, why);
+      }
+      break;
+
+
+    case VSPANNER:
+    case HSPANNER:
+
+      /* we're saying that a spanner has a fixed constraint that is */
+      /* determined just once in its life                           */
+      CopyConstraint(*xc, constraint(y));
+      debug2(DSC, DD, "  Constrained(%s) = %s", Image(type(z)), EchoConstraint(xc));
+      /* SetConstraint(*xc, back(y, dim), size(y, dim), fwd(y, dim)); */
+      break;
+
+
+    case HSHIFT:
+    case VSHIFT:
+
+      if( (type(y) == HSHIFT) == (dim == COLM) )
+      { Constrained(y, &yc, dim, why);
+	tf = FindShift(y, x, dim);
+	SetConstraint(*xc,
+	  find_min(bc(yc), bfc(yc)) - tf, bfc(yc), find_min(fc(yc), bfc(yc)) + tf);
+      }
+      else Constrained(y, xc, dim, why);
+      break;
+
+
+    case HEAD:
+    
+      if( dim == ROWM )
+	SetConstraint(*xc, MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+      else
+      {	CopyConstraint(yc, constraint(y));
+	debug1(DSC, DD, "  head: %s; val is:", EchoConstraint(&yc));
+	ifdebug(DSC, DD, DebugObject(y));
+	goto REST_OF_HEAD;   /* a few lines down */
+      }
+      break;
+
+
+    case COL_THR:
+    case ROW_THR:
+
+      assert( (type(y)==COL_THR) == (dim==COLM), "Constrained: COL_THR!" );
+      Constrained(y, &yc, dim, why);
+      tb = bfc(yc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : bfc(yc) - fwd(y, dim);
+      tb = find_min(bc(yc), tb);
+      tf = bfc(yc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : bfc(yc) - back(y, dim);
+      tf = find_min(fc(yc), tf);
+      SetConstraint(*xc, tb, bfc(yc), tf);
+      break;
+
+
+    case VCAT:
+    case HCAT:
+    case ACAT:
+    
+      if( (type(y)==VCAT) == (dim==ROWM) )
+      {	CatConstrained(x, xc, ratm, y, dim, why);
+	break;
+      }
+      Constrained(y, &yc, dim, why);
+      if( !constrained(yc) )
+	SetConstraint(*xc, MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+      else
+      {
+	REST_OF_HEAD:
+	/* let lp and rp be the links of the gaps delimiting */
+	/* the components joined to x (or parent if no such) */
+	for( lp = PrevDown(link);  lp != y;  lp = PrevDown(lp) )
+	{ Child(z, lp);
+	  if( type(z) == GAP_OBJ && !join(gap(z)) )  break;
+	}
+	for( rp = NextDown(link);  rp != y;  rp = NextDown(rp) )
+	{ Child(z, rp);
+	  if( type(z) == GAP_OBJ && !join(gap(z)) )  break;
+	}
+	if( lp == y && rp == y && !(type(y) == HEAD && seen_nojoin(y)) )
+	{
+	  /* if whole object is joined, do this */
+          tb = bfc(yc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : bfc(yc) - fwd(y, dim);
+          tb = find_min(bc(yc), tb);
+          tf = bfc(yc) == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : bfc(yc) - back(y, dim);
+          tf = find_min(fc(yc), tf);
+          SetConstraint(*xc, tb, bfc(yc), tf);
+	}
+	else
+	{
+	  /* if // or || is present, do this */
+	  xback = xfwd = 0;
+	  for(link = NextDown(lp); link != rp;  link = NextDown(link) )
+	  { Child(z, link);
+	    if( type(z) == GAP_OBJ || is_index(type(z)) )  continue;
+	    xback = find_max(xback, back(z, dim));
+	    xfwd = find_max(xfwd, fwd(z, dim));
+	  }
+	  debug2(DSC, DD, "  lp != rp; xback,xfwd = %s,%s",
+			EchoLength(xback), EchoLength(xfwd));
+	  tbf = find_min(bfc(yc), fc(yc));
+	  tbc = tbf == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : tbf - xfwd;
+	  tfc = tbf == MAX_FULL_LENGTH ? MAX_FULL_LENGTH : tbf - xback;
+	  SetConstraint(*xc, tbc, tbf, tfc);
+	}
+      }
+      break;
+
+
+    default:
+    
+      assert1(FALSE, "Constrained:", Image(type(y)));
+      break;
+
+  }
+  debug2(DSC, DD, "] Constrained %s returning %s", Image(type(x)),
+    EchoConstraint(xc));
+} /* end Constrained */
+
+
+/*@::EchoConstraint(), DebugConstrained()@************************************/
+/*                                                                           */
+/*  FULL_CHAR *EchoConstraint(c)                                             */
+/*                                                                           */
+/*  Returns a string showing constraint *c, in centimetres.                  */
+/*                                                                           */
+/*****************************************************************************/
+#if DEBUG_ON
+
+FULL_CHAR *EchoConstraint(CONSTRAINT *c)
+{ static char str[2][40];
+  static int i = 0;
+  i = (i+1) % 2;
+  sprintf(str[i], "<%s, %s, %s>", EchoLength(bc(*c)), EchoLength(bfc(*c)),
+    EchoLength(fc(*c)));
+  return AsciiToFull(str[i]);
+} /* end EchoConstraint */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DebugConstrained(x)                                                      */
+/*                                                                           */
+/*  Calculate and print the constraints of all closures lying within         */
+/*  sized object x.                                                          */
+/*                                                                           */
+/*****************************************************************************/
+
+void DebugConstrained(OBJECT x)
+{ OBJECT y, link, why;
+  CONSTRAINT c;
+  debug1(DSC, DDD, "DebugConstrained( %s )", EchoObject(x) );
+  switch( type(x) )
+  {
+
+    case CROSS:
+    case FORCE_CROSS:
+    case ROTATE:
+    case BACKGROUND:
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+    case KERN_SHRINK:
+    case WORD:
+    case QWORD:
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case HSPAN:
+    case VSPAN:
+    
+      break;
+
+
+    case CLOSURE:
+    
+      Constrained(x, &c, COLM, &why);
+      debug2(DSC, DD, "Constrained( %s, &c, COLM ) = %s",
+	EchoObject(x), EchoConstraint(&c));
+      Constrained(x, &c, ROWM, &why);
+      debug2(DSC, DD, "Constrained( %s, &c, ROWM ) = %s",
+	EchoObject(x), EchoConstraint(&c));
+      break;
+
+
+    case SPLIT:
+    
+      link = DownDim(x, COLM);  Child(y, link);
+      DebugConstrained(y);
+      break;
+
+
+    case HEAD:
+    case ONE_COL:
+    case ONE_ROW:
+    case HCONTRACT:
+    case VCONTRACT:
+    case HLIMITED:
+    case VLIMITED:
+    case HEXPAND:
+    case VEXPAND:
+    case HSCALE:
+    case VSCALE:
+    case HCOVER:
+    case VCOVER:
+    case SCALE:
+    case WIDE:
+    case HIGH:
+    
+      link = Down(x);  Child(y, link);
+      DebugConstrained(y);
+      break;
+
+
+    case COL_THR:
+    case VCAT:
+    case HCAT:
+    case ACAT:
+    
+      for( link = Down(x);  link != x;  link =NextDown(link) )
+      {	Child(y, link);
+	if( type(y) != GAP_OBJ && !is_index(type(y)) )  DebugConstrained(y);
+      }
+      break;
+
+
+    default:
+    
+      assert1(FALSE, "DebugConstrained:", Image(type(x)));
+      break;
+
+  }
+  debug0(DSC, DDD, "DebugConstrained returning.");
+} /* end DebugConstrained */
+#endif
diff --git a/z16.c b/z16.c
new file mode 100644
index 0000000..d9984b0
--- /dev/null
+++ b/z16.c
@@ -0,0 +1,629 @@
+/*@z16.c:Size Adjustment:SetNeighbours(), CatAdjustSize()@********************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z16.c                                                      */
+/*  MODULE:       Size Adjustment                                            */
+/*  EXTERNS:      FindShift(), SetNeighbours(), AdjustSize()                 */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_LENGTH FindShift(x, y, dim)                                         */
+/*                                                                           */
+/*  x = @HShift y or @VShift y depending on dim.  FindShift returns the      */
+/*  length of the shift measured from the mark of y to the mark of x.        */
+/*  This is negative if the mark of y is to the right of the mark of x.      */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_LENGTH FindShift(OBJECT x, OBJECT y, int dim)
+{ FULL_LENGTH len, res;
+  debug4(DSF, DD, "FindShift(%s, %s %s, %s)", Image(type(x)),
+    Image(type(y)), EchoObject(y), dimen(dim));
+
+  /* first determine the magnitude of the shift */
+  switch( units(shift_gap(x)) )
+  {
+    case FIXED_UNIT:	len = width(shift_gap(x));
+			break;
+
+    case NEXT_UNIT:	len = (size(y, dim) * width(shift_gap(x))) / FR;
+			break;
+
+    default:		assert(FALSE, "FindShift: units");
+			break;
+  }
+
+  /* then calculate the shift depending on the shift type */
+  switch( shift_type(x) )
+  {
+    case GAP_ABS:	res = len - back(y, dim);
+			break;
+
+    case GAP_INC:	res = len;
+			break;
+
+    case GAP_DEC:	res = - len;
+			break;
+
+    default:		assert(FALSE, "FindShift: type");
+			break;
+  }
+
+  debug1(DSF, DD, "FindShift returning %s", EchoLength(res));
+  return res;
+} /* end FindShift */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  SetNeighbours(link, ratm, pg, pdef, sg, sdef, side)                      */
+/*                                                                           */
+/*  This is a utility routine used by CatConstrained(), AdjustSize(),        */
+/*  BreakTable() and FlushGalley() for calculating size updates in objects.  */
+/*  Assuming that link is the link of a component of a VCAT etc., and that   */
+/*  ratm is TRUE if there is a marked component to the right of link, set    */
+/*                                                                           */
+/*     pg    to the gap separating link from the first definite object       */
+/*           to the left, or nilobj if none.  If pg != nilobj, set pdef to   */
+/*           the preceding definite object;  else pdef is undefined.         */
+/*                                                                           */
+/*     sg    to the gap separating link from the first definite object       */
+/*           to the right, or nilobj if none.  if sg != nilobj, set sdef to  */
+/*           the succeeding definite object;  else sdef is undefined.        */
+/*                                                                           */
+/*     side  to the side of the mark link is on; either BACK, ON or FWD.     */
+/*                                                                           */
+/*****************************************************************************/
+
+void SetNeighbours(OBJECT link, BOOLEAN ratm, OBJECT *pg, OBJECT *pdef,
+OBJECT *sg, OBJECT *sdef, int *side)
+{ OBJECT plink, slink;
+
+  /* find preceding definite; if it exists, set *pg */
+  *pg = nilobj;
+  for( plink = PrevDown(link);  type(plink) == LINK;  plink = PrevDown(plink) )
+  { Child(*pdef, plink);
+    if( type(*pdef) == SPLIT ? SplitIsDefinite(*pdef) : is_definite(type(*pdef)) )
+    { Child(*pg, PrevDown(link));
+      while( is_index(type(*pg)) )
+      {	link = PrevDown(link);
+	Child(*pg, PrevDown(link));
+      }
+      assert( type(*pg) == GAP_OBJ, "SetNeighbours: type(*pg)!" );
+      break;
+    }
+  }
+
+  /* find succeeding definite; if it exists, set *sg */
+  *sg = nilobj;
+  for( slink = NextDown(link);  type(slink) == LINK;  slink = NextDown(slink) )
+  { Child(*sdef, slink);
+    if( type(*sdef) == SPLIT ? SplitIsDefinite(*sdef) : is_definite(type(*sdef)) )
+    { Child(*sg, PrevDown(slink));
+      while( is_index(type(*sg)) )
+      {	slink = PrevDown(slink);
+	Child(*sg, PrevDown(slink));
+      }
+      assert( type(*sg) == GAP_OBJ, "SetNeighbours: type(*sg)!" );
+      break;
+    }
+  }
+
+  *side = ratm ? BACK : *pg == nilobj || mark(gap(*pg)) ? ON : FWD;
+  debug4(DSA, DD,
+    "SetNeighbours: ratm == %s, pg %s nilobj, sg %s nilobj, side == %s",
+    bool(ratm), *pg == nilobj ? "==" : "!=", *sg == nilobj ? "==" : "!=", 
+    *side == BACK ? "BACK" : *side == ON ? "ON" : "FWD");
+} /* end SetNeighbours */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static CatAdjustSize(x, b, f, ratm, y, dim)                              */
+/*                                                                           */
+/*  Adjust the size of x to be *b, *f.  Object x is known to lie in add-set  */
+/*  y;  ratm is TRUE iff there is a mark to the right of x.  Return the      */
+/*  new size of y in *b, *f.                                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+static void CatAdjustSize(OBJECT x, FULL_LENGTH *b, FULL_LENGTH *f, BOOLEAN ratm,
+OBJECT y, int dim)
+{ OBJECT link;
+  OBJECT pg, prec_def, sg, sd;
+  FULL_LENGTH beffect, feffect, seffect;  int side;
+  int bb, ff;
+
+  debug6(DSA, DD, "CatAdjustSize(%s x, %s, %s, %s, %s y, %s)", Image(type(x)),
+    EchoLength(*b), EchoLength(*f), bool(ratm), Image(type(y)), dimen(dim));
+  debug2(DSA,DD, "x(%s,%s) =", EchoLength(back(x,dim)), EchoLength(fwd(x,dim)));
+  ifdebug(DSA, DD, DebugObject(x));
+  debug2(DSA,DD, "y(%s,%s) =", EchoLength(back(y,dim)), EchoLength(fwd(y,dim)));
+  ifdebug(DSA, DD, DebugObject(y));
+
+  /* DO_ADJUST ACAT is a special case because adjustment affects its size */
+  if( dim==COLM && type(y)==ACAT && display_style(save_style(y)) == DO_ADJUST )
+  { back(x, dim) = *b;  fwd(x, dim) = *f;
+    *b = back(y, dim);  *f = fwd(y, dim);
+    debug2(DSA, DD, "CatAdjustSize ACAT %s,%s", EchoLength(*b), EchoLength(*f));
+    return;
+  }
+
+  link = UpDim(x, dim);
+  SetNeighbours(link, ratm, &pg, &prec_def, &sg, &sd, &side);
+  { ifdebug(DSA, DD,
+    if( pg != nilobj && mode(gap(pg)) == NO_MODE )
+    { debug1(DSA, DD, "NO_MODE gap pg, is_indefinite(x) == %s, y =",
+	bool(is_indefinite(type(x))) );
+      ifdebug(DSA, DD, DebugObject(y));
+    }
+    if( sg != nilobj && mode(gap(sg)) == NO_MODE )
+    { debug1(DSA, DD, "NO_MODE gap sg, is_indefinite(x) == %s, y =",
+	bool(is_indefinite(type(x))) );
+      ifdebug(DSA, DD, DebugObject(y));
+    }
+  ); }
+  if( is_indefinite(type(x)) )
+  {
+    beffect = pg == nilobj ? *b :
+      MinGap(fwd(prec_def, dim), *b, *f, &gap(pg));
+
+    feffect = sg == nilobj ? *f :
+      MinGap(*f, back(sd, dim), fwd(sd, dim), &gap(sg));
+
+    seffect = pg == nilobj ? sg == nilobj ? 0 : back(sd, dim) :
+      sg == nilobj ? fwd(prec_def, dim) :
+      MinGap(fwd(prec_def, dim), back(sd,dim), fwd(sd,dim), &gap(sg));
+  }
+  else /* !is_indefinite(type(x)) */
+  {
+    beffect = pg == nilobj ?  *b - back(x, dim) :
+      MinGap(fwd(prec_def, dim), *b,           *f,          &gap(pg)) -
+      MinGap(fwd(prec_def, dim), back(x, dim), fwd(x, dim), &gap(pg));
+
+    feffect = sg == nilobj ? *f - fwd(x, dim) :
+      MinGap(*f,          back(sd, dim), fwd(sd, dim), &gap(sg)) -
+      MinGap(fwd(x, dim), back(sd, dim), fwd(sd, dim), &gap(sg));
+	
+    seffect = 0;
+  }
+
+  debug3(DSA, D, "  pg = %s, sg = %s, side = %s",
+    pg == nilobj ? AsciiToFull("<nil>") : EchoGap(&gap(pg)),
+    sg == nilobj ? AsciiToFull("<nil>") : EchoGap(&gap(sg)), Image(side));
+  debug3(DSA, D, "  beffect = %s, feffect = %s, seffect = %s",
+    EchoLength(beffect), EchoLength(feffect), EchoLength(seffect));
+  back(x, dim) = *b;  fwd(x, dim) = *f;
+  switch( side )
+  {
+    case BACK:	bb = back(y, dim) + beffect + feffect - seffect;
+		ff = fwd(y, dim);
+		break;
+
+    case ON:	bb = back(y, dim) + beffect - seffect;
+		ff = fwd(y, dim) + feffect;
+		break;
+
+    case FWD:	bb = back(y, dim);
+		ff = fwd(y, dim) + beffect + feffect - seffect;
+		break;
+  }
+  *b = bb;  *f = ff;
+  debug2(DSA, DD, "CatAdjustSize returning %s,%s", EchoLength(*b), EchoLength(*f));
+} /* end CatAdjustSize */
+
+
+/*@::AdjustSize()@************************************************************/
+/*                                                                           */
+/*  AdjustSize(x, b, f, dim)                                                 */
+/*                                                                           */
+/*  Adjust the size of object x, in dimension dim, to be b, f.  If x is a    */
+/*  CLOSURE, the adjustment is from a CLOSURE to a definite object of size   */
+/*  b, f.                                                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+void AdjustSize(OBJECT x, FULL_LENGTH b, FULL_LENGTH f, int dim)
+{ OBJECT y, link, tlink, lp, rp, z, index;
+  BOOLEAN ratm;  FULL_LENGTH tb, tf, cby, cfy, rby, rfy;
+
+  SetLengthDim(dim);
+  debug6(DSA, D, "[ AdjustSize( %s(%s,%s), %s, %s, %s ), x =",
+	type(x) == CLOSURE ? SymName(actual(x)) : Image(type(x)),
+	EchoLength(back(x, dim)), EchoLength(fwd(x, dim)),
+	EchoLength(b), EchoLength(f), dimen(dim));
+  ifdebug(DSA, DD, DebugObject(x) );
+
+  while( b != back(x, dim) || f != fwd(x, dim) || is_indefinite(type(x)) )
+  { assert( Up(x) != x, "AdjustSize: Up(x) == x!" );
+    if( b < 0 || f < 0 )
+      Error(16, 5, "cannot recover from earlier errors", FATAL, &fpos(x));
+
+    /* these cases are unique because they have multiple parents */
+    if( type(x) == COL_THR || type(x) == ROW_THR )
+    { assert( (type(x)==COL_THR) == (dim==COLM), "AdjustSize: COL_THR!" );
+      back(x, dim) = b;  fwd(x, dim) = f;
+      for( link = Up(x);  link != x;  link = NextUp(link) )
+      { Parent(y, link);
+	assert( type(y) == SPLIT, "AdjustSize: type(y) != SPLIT!") ;
+	AdjustSize(y, b, f, dim);
+      }
+      debug0(DSA, D, "] AdjustSize (thread case) returning.");
+      return;
+    }
+
+    link = UpDim(x, dim);  ratm = FALSE;
+    for( tlink=NextDown(link);  type(tlink) == LINK;  tlink=NextDown(tlink) )
+    { Child(y, tlink);
+      if( type(y) == GAP_OBJ && mark(gap(y)) )  ratm = TRUE;
+    }
+    y = tlink;
+
+    debug5(DSA, D, "  b = %s, f = %s, y = %s(%s,%s), x =",
+	EchoLength(b), EchoLength(f), Image(type(y)),
+	EchoLength(back(y, dim)), EchoLength(fwd(y, dim)));
+    ifdebug(DSA, DD, DebugObject(x) );
+
+    switch( type(y) )
+    {
+
+      case HEAD:
+      
+	if( gall_dir(y) == COLM )
+	{ back(x, dim) = b, fwd(x, dim) = f;
+	  debug0(DSA, D, "] AdjustSize returning at horiz HEAD");
+	  return;
+	}
+	else if( dim == ROWM )
+	{ back(x, dim) = b, fwd(x, dim) = f;
+	  debug0(DSA, D, "] AdjustSize ROWM returning at HEAD");
+	  return;
+	}
+	else
+	{
+	  /* let lp and rp be the gaps delimiting the          */
+	  /* components joined to x                            */
+	  for( lp = PrevDown(link);  lp != y;  lp = PrevDown(lp) )
+	  { Child(z, lp);
+	    if( type(z) == GAP_OBJ && !join(gap(z)) )  break;
+	  }
+	  for( rp = NextDown(link);  rp != y;  rp = NextDown(rp) )
+	  { Child(z, rp);
+	    if( type(z) == GAP_OBJ && !join(gap(z)) )  break;
+	  }
+
+	  back(x, dim) = b;  fwd(x, dim) = f;
+	  if( lp == y && rp == y && !seen_nojoin(y) )
+	  {	
+	    /* if whole object is joined, do this */
+	    b = find_max(b, back(y, dim));
+	    f = find_max(f, fwd(y, dim));
+	    debug3(DSA, D, "  under head %s, whole object joined, b = %s, f = %s)",
+	      SymName(actual(y)), EchoLength(b), EchoLength(f));
+	  }
+	  else
+	  {
+	    /* if // or || is present, do this */
+	    debug1(DSA, D, "  [ under head %s with //, working out tb and tf:",
+	      SymName(actual(y)));
+	    tb = tf = 0;
+	    for( link = NextDown(lp);  link != rp;  link = NextDown(link) )
+	    { Child(z, link);
+	      debugcond1(DSA, D, type(z) == GAP_OBJ,
+		"    gap %s", EchoCatOp(VCAT, mark(gap(z)), join(gap(z))));
+	      if( type(z) == GAP_OBJ || is_index(type(z)) )  continue;
+	      debug6(DSA, D,  "    component %s %s(%s, %s) so tb = %s, tf = %s",
+		Image(type(z)), type(z) == CLOSURE ?  SymName(actual(z)) : STR_EMPTY,
+		EchoLength(back(z, dim)), EchoLength(fwd(z, dim)),
+		EchoLength(tb), EchoLength(tf));
+	      ifdebugcond(DSA, DD,  dim == COLM && fwd(z, dim) > 20*CM, DebugObject(z));
+	      tb = find_max(tb, back(z, dim));
+	      tf = find_max(tf, fwd(z, dim));
+	    }
+	    b = 0;  f = find_max(tb + tf, fwd(y, dim));
+	    debug5(DSA, D, "  ] under head %s with //, tb = %s, tf = %s, b = %s, f = %s",
+	      SymName(actual(y)), EchoLength(tb), EchoLength(tf),
+	      EchoLength(b), EchoLength(f));
+	  }
+	  if( back(y, dim) == b && fwd(y, dim) == f )
+	  {
+	    debug0(DSA, D, "] AdjustSize (COLM) returning at HEAD (no wider)");
+	    return;
+	  }
+	  debug3(DSA, DD, "AdjustSize widening HEAD %s to b = %s, f = %s",
+		   SymName(actual(y)), EchoLength(b), EchoLength(f));
+	  ifdebugcond(DSA, DD,  dim == COLM && f > 20*CM, DebugObject(y));
+	  back(y, dim) = b;  fwd(y, dim) = f;
+	  if( Up(y) == y )
+	  {
+	    debug0(DSA, D, "] AdjustSize ret. at HEAD (no parent)" );
+	    return;
+	  }
+	  Parent(index, Up(y));
+	  if( type(index) != RECEIVING )
+	  {
+	    debug1(DSA,D, "] AdjustSize ret. at HEAD (%s)", Image(type(index)));
+	    return;
+	  }
+	  assert(actual(index)!=nilobj, "AdjustSize: actual(index)==nilobj!" );
+	  assert( type(actual(index)) == CLOSURE, "AdjustSize: index non-C!" );
+	  if( actual(actual(index)) != GalleySym &&
+	      actual(actual(index)) != ForceGalleySym )
+	  {
+	    debug0(DSA, D, "] AdjustSize ret. at HEAD (not @Galley, so root)" );
+	    return;
+	  }
+	  y = actual(index);
+	  debug3(DSA, DD, "AdjustSize jumping to y = %s of size %s,%s",
+	    Image(type(y)), EchoLength(back(y, dim)), EchoLength(fwd(y, dim)));
+	}
+	break;
+
+
+      case SPLIT:
+      case HCONTRACT:
+      case VCONTRACT:
+      case HEXPAND:
+      case VEXPAND:
+      case ONE_COL:
+      case ONE_ROW:
+      case PLAIN_GRAPHIC:
+      case GRAPHIC:
+      case KERN_SHRINK:
+      case BACKGROUND:
+
+	back(x, dim) = b;  fwd(x, dim) = f;
+	break;
+
+
+      case HSCALE:
+      case VSCALE:
+
+	back(x, dim) = b;  fwd(x, dim) = f;
+	if( (dim==COLM) == (type(y)==HSCALE) )
+	{ debug0(DSA, D, "] AdjustSize returning at HSCALE or VSCALE");
+	  return;
+	}
+	break;
+
+
+      case HCOVER:
+      case VCOVER:
+
+	/* dubious, but not likely to arise in practice */
+	back(x, dim) = b;  fwd(x, dim) = f;
+	if( (dim==COLM) == (type(y)==HCOVER) )
+	{ debug0(DSA, D, "] AdjustSize returning at HCOVER or VCOVER");
+	  return;
+	}
+	break;
+
+
+      case SCALE:
+
+	back(x, dim) = b;  fwd(x, dim) = f;
+	if( dim == COLM )
+	{ b *= bc(constraint(y)) / SF;
+	  f *= bc(constraint(y)) / SF;
+	}
+	else
+	{ b *= fc(constraint(y)) / SF;
+	  f *= fc(constraint(y)) / SF;
+	}
+	break;
+
+
+      case ROTATE:
+      
+	back(x, dim) = b;  fwd(x, dim) = f;
+	RotateSize(&cby, &cfy, &rby, &rfy, x, sparec(constraint(y)));
+	if( cby != back(y, COLM) || cfy != fwd(y, COLM) )
+	  AdjustSize(y, cby, cfy, COLM);
+	if( rby != back(y, ROWM) || rfy != fwd(y, ROWM) )
+	  AdjustSize(y, rby, rfy, ROWM);
+	debug1(DSA, D, "] AdjustSize returning at %s.", Image(type(y)));
+	return;
+
+
+      case WIDE:
+      case HIGH:
+      
+	if( (type(y) == WIDE) == (dim == COLM) )
+	{ if( !FitsConstraint(b, f, constraint(y)) )
+	  { Error(16, 2, "size constraint %s,%s,%s broken by %s,%s",
+	      WARN, &fpos(y),
+	      EchoLength(bc(constraint(y))), EchoLength(bfc(constraint(y))),
+	      EchoLength(fc(constraint(y))), EchoLength(b), EchoLength(f));
+	    SetConstraint(constraint(y), MAX_FULL_LENGTH, b+f, MAX_FULL_LENGTH);
+	  }
+	  back(x, dim) = b;  fwd(x, dim) = f;
+	  EnlargeToConstraint(&b, &f, &constraint(y));
+	}
+	else
+	{ back(x, dim) = b;
+	  fwd(x, dim) = f;
+	}
+	break;
+
+
+      case HLIMITED:
+      case VLIMITED:
+      
+	if( (type(y) == HLIMITED) == (dim == COLM) )
+	{
+	  /* ***
+          Parent(z, UpDim(y, dim));
+          if( type(z) == ROW_THR || type(z) == COL_THR )
+          {
+            SetConstraint(constraint(y), back(z,dim), size(z,dim), fwd(z,dim));
+          }
+          else
+          {
+            SetConstraint(constraint(y), back(y,dim), size(y,dim), fwd(y,dim));
+          }
+	  if( !FitsConstraint(b, f, constraint(y)) )
+	  { Error(16, 3, "%s of size %s,%s broken by %s,%s",
+	      WARN, &fpos(y), Image(type(y)),
+	      EchoLength(back(y, dim)), EchoLength(fwd(y, dim)),
+	      EchoLength(b), EchoLength(f));
+	  }
+	  *** */
+	  back(x, dim) = b;  fwd(x, dim) = f;
+	}
+	else
+	{ back(x, dim) = b;
+	  fwd(x, dim) = f;
+	}
+	break;
+
+
+      case HSHIFT:
+      case VSHIFT:
+
+	back(x, dim) = b;  fwd(x, dim) = f;
+	if( (type(y) == HSHIFT) == (dim == COLM) )
+	{ tf = FindShift(y, x, dim);
+	  b = find_min(MAX_FULL_LENGTH, find_max(0, b + tf));
+	  f = find_min(MAX_FULL_LENGTH, find_max(0, f - tf));
+	}
+	break;
+
+
+      case COL_THR:
+      case ROW_THR:
+
+	assert( (type(y)==COL_THR) == (dim==COLM), "AdjustSize: COL_THR!" );
+	back(x, dim) = b;  fwd(x, dim) = f;
+	b = find_max(b, back(y, dim));
+	f = find_max(f, fwd(y, dim));
+	break;
+
+
+      case VCAT:
+      case HCAT:
+      case ACAT:
+
+	if( (type(y) == VCAT) == (dim == ROWM) )
+	  CatAdjustSize(x, &b, &f, ratm, y, dim);
+	else
+	{
+	  /* let lp and rp be the gaps bracketing the components joined to x */
+	  for( lp = PrevDown(link);  lp != y;  lp = PrevDown(lp) )
+	  { Child(z, lp);
+	    if( type(z) == GAP_OBJ && !join(gap(z)) )  break;
+	  }
+	  for( rp = NextDown(link);  rp != y;  rp = NextDown(rp) )
+	  { Child(z, rp);
+	    if( type(z) == GAP_OBJ && !join(gap(z)) )  break;
+	  }
+
+	  back(x, dim) = b;  fwd(x, dim) = f;
+	  if( lp == y && rp == y )
+	  {
+	    /* if whole object is joined, do this */
+	    b = find_max(b, back(y, dim));
+	    f = find_max(f, fwd(y, dim));
+	  }
+	  else
+	  { /* if // or || is present, do this */
+	    tb = tf = 0;
+	    for( link = NextDown(lp); link != rp;  link = NextDown(link) )
+	    { Child(z, link);
+	      if( type(z) == GAP_OBJ || is_index(type(z)) )  continue;
+	      tb = find_max(tb, back(z, dim));
+	      tf = find_max(tf, fwd(z, dim));
+	    }
+	    b = 0;  f = find_max(tb + tf, fwd(y, dim));
+	  }
+	}
+	break;
+
+
+      case START_HVSPAN:
+
+	Error(16, 4, "size adjustment of %s not implemented",
+	       WARN, &fpos(y), Image(type(y)));
+	break;
+
+
+      case START_VSPAN:
+      case VSPAN:
+
+	if( dim == COLM )
+	{
+	  back(x, dim) = b;  fwd(x, dim) = f;
+	}
+	else Error(16, 4, "size adjustment of %s not implemented",
+	       WARN, &fpos(y), Image(type(y)));
+	break;
+
+
+      case START_HSPAN:
+      case HSPAN:
+
+	if( dim == ROWM )
+	{
+	  back(x, dim) = b;  fwd(x, dim) = f;
+	}
+	else Error(16, 4, "size adjustment of %s not implemented",
+	       WARN, &fpos(y), Image(type(y)));
+	break;
+
+
+      case HSPANNER:
+      case VSPANNER:
+
+	assert( (dim == COLM) == (type(y) == HSPANNER), "AdjustSize: span");
+	back(x, dim) = b;  fwd(x, dim) = f;
+	debug5(DSC, D, "  adjusting %s from (%s,%s) to (%s,%s)",
+	  Image(type(y)), EchoLength(back(y, dim)), EchoLength(fwd(y, dim)),
+	  EchoLength(b), EchoLength(f));
+	back(y, dim) = b;  fwd(y, dim) = f;
+	debug1(DSA, D, "] AdjustSize returning at %s", Image(type(y)));
+	return;
+	break;
+
+
+      case WORD:
+      case QWORD:
+      case CLOSURE:
+      case NULL_CLOS:
+      case PAGE_LABEL:
+      case CROSS:
+      case FORCE_CROSS:
+      default:
+      
+	assert1(FALSE, "AdjustSize:", Image(type(y)));
+	break;
+
+
+    } /* end switch */
+    x = y;
+  } /* end while */
+  debug0(DSA, D, "] AdjustSize returning.");
+} /* end AdjustSize */
diff --git a/z17.c b/z17.c
new file mode 100644
index 0000000..f57c92b
--- /dev/null
+++ b/z17.c
@@ -0,0 +1,407 @@
+/*@z17.c:Gap Widths:GetGap()@*************************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z17.c                                                      */
+/*  MODULE:       Gap Widths                                                 */
+/*  EXTERNS:      GetGap(), MinGap(), ExtraGap(), ActualGap(), EchoGap()     */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  GetGap(x, style, res_gap, res_inc)                                       */
+/*                                                                           */
+/*  Object x is expected to be a WORD or QWORD containing a gap:             */
+/*                                                                           */
+/*      <gap>        ::=  [ <increment> ] <width> [ <mode> ] [ <nobreak> ]   */
+/*                   ::=                                                     */
+/*                                                                           */
+/*      <nobreak>    ::=  u                                                  */
+/*      <increment>  ::=  +  |  -                                            */
+/*      <width>      ::=  <unsigned number> <units>                          */
+/*      <units>      ::=  c  |  i  |  p  |  m  |  f  |  s                    */
+/*                   ::=  v  |  w  |  b  |  r  |  d  |  y  |  z              */
+/*      <mode>       ::=  e  |  h  |  x  |  o  |  k  |  t  |  n              */
+/*                                                                           */
+/*  Set *res_gap to the gap in the strings of x; *res_inc is the increment.  */
+/*  The gap is calculated using the given style.                             */
+/*  If the gap is empty, this is a synonym for 0ie.                          */
+/*  If there is an error, GetGap prints a message and returns 0ie.           */
+/*                                                                           */
+/*****************************************************************************/
+#define setwidths(x, y) w = x; units(*res_gap) = y;  break;
+
+void GetGap(OBJECT x, STYLE *style, GAP *res_gap, unsigned *res_inc)
+{ int w;  float num; 
+  FULL_CHAR *str;
+
+  debug2(DGW, DD, "GetGap( %s, %s, res_gap, res_inc )",
+	EchoObject(x), EchoStyle(style));
+
+  nobreak(*res_gap) = FALSE;
+  width(*res_gap) = 0;  units(*res_gap) = FIXED_UNIT;
+  mode(*res_gap)  = EDGE_MODE;  *res_inc = GAP_ABS;
+
+  /* make sure we have a WORD or QWORD argument */
+  if( !is_word(type(x)) )
+  { Error(17, 1, "gap is not a simple word", WARN, &fpos(x));
+    debug1(DGW, DD, "GetGap failing (type(x) = %s)", Image(type(x)));
+    return;
+  }
+  str = string(x);
+
+  /* if word is empty, return 0ie */
+  if( *str == '\0' )
+  { debug0(DGW, DD, "GetGap returning (null word)");
+    return;
+  }
+
+  /* read the optional gap increment */
+  if( *str == CH_INCGAP )       *res_inc = GAP_INC, str++;
+  else if( *str == CH_DECGAP )  *res_inc = GAP_DEC, str++;
+
+  /* read the gap width */
+  if( sscanf((char *) str, "%f", &num) != 1 )
+  { Error(17, 2, "width missing from %s", WARN, &fpos(x), string(x));
+    Error(17, 3, "%s, %s and %s must be enclosed in double quotes",
+      WARN, &fpos(x), KW_VCAT_NJ, KW_HCAT_NJ, KW_ACAT_NJ);
+    debug0(DGW, DD, "GetGap failing (width missing)");
+    return;
+  }
+  while( numericchar(*str) )  str++;
+
+  /* read the compulsory units, calculate length, and check reasonableness */
+  switch( *str++ )
+  {
+    case CH_UNIT_CM:	setwidths( num*CM,                        FIXED_UNIT );
+    case CH_UNIT_IN:	setwidths( num*IN,                        FIXED_UNIT );
+    case CH_UNIT_PT:	setwidths( num*PT,                        FIXED_UNIT );
+    case CH_UNIT_EM:	setwidths( num*EM,                        FIXED_UNIT );
+    case CH_UNIT_FT:	setwidths( num*FontSize(font(*style), x), FIXED_UNIT );
+    case CH_UNIT_SP:	setwidths( num*width(space_gap(*style)),  FIXED_UNIT );
+    case CH_UNIT_VS:	setwidths( num*width(line_gap(*style)),   FIXED_UNIT );
+    case CH_UNIT_YU:	setwidths( num*yunit(*style),             FIXED_UNIT );
+    case CH_UNIT_ZU:	setwidths( num*zunit(*style),             FIXED_UNIT );
+    case CH_UNIT_WD:	setwidths( num*FR,                        NEXT_UNIT  );
+    case CH_UNIT_BD:	setwidths( num*FR,                        FRAME_UNIT );
+    case CH_UNIT_RL:	setwidths( num*FR,                        AVAIL_UNIT );
+
+    case CH_UNIT_DG:	if( *res_inc == GAP_DEC ) num = - num;
+			*res_inc = GAP_ABS;
+			while( num >  180.0 ) num -= 360.0;
+			while( num < -180.0 ) num += 360.0;
+			assert((num>=-180.0) && (num<=180.0), "GetGap: dg!");
+			setwidths( num*DG,                        DEG_UNIT   );
+
+    default:	Error(17, 4, "units letter missing from %s",
+		  WARN, &fpos(x), string(x));
+		debug0(DGW, DD, "GetGap failing (units letter missing)");
+		return;
+  }
+
+  if( units(*res_gap) == AVAIL_UNIT && w > FR )
+  { Error(17, 5, "%.1fr too large (1.0r substituted)", WARN, &fpos(x), num);
+    w = FR;
+  }
+  width(*res_gap) = w;
+
+  /* read the optional gap mode */
+  switch( *str )
+  {
+    case CH_NOBREAK:
+    case '\0':		mode(*res_gap) = EDGE_MODE;          break;
+    case CH_MODE_EDGE:	mode(*res_gap) = EDGE_MODE;  str++;  break;
+    case CH_MODE_HYPH:	mode(*res_gap) = HYPH_MODE;  str++;  break;
+    case CH_MODE_MARK:	mode(*res_gap) = MARK_MODE;  str++;  break;
+    case CH_MODE_OVER:	mode(*res_gap) = OVER_MODE;  str++;  break;
+    case CH_MODE_KERN:	mode(*res_gap) = KERN_MODE;  str++;  break;
+    case CH_MODE_TABL:	mode(*res_gap) = TAB_MODE;   str++;  break;
+
+    default:	Error(17, 7, "unknown gap mode in %s",
+		  WARN, &fpos(x), string(x));
+		debug0(DGW, DD, "GetGap failing (spacing mode)");
+		return;
+  }
+
+  /* read the optional nobreak */
+  if( *str == CH_NOBREAK )
+  {
+    if( mode(*res_gap) == HYPH_MODE )
+      Error(17, 9, "replacing self-contradictory gap %s by breakable version",
+	WARN, &fpos(x), string(x));
+    else nobreak(*res_gap) = TRUE;
+    str++;
+  }
+
+  /* if string has not terminated, error */
+  if( *str != '\0' )
+    Error(17, 8, "invalid width or gap %s", WARN, &fpos(x), string(x));
+
+  debug2(DGW, DD, "GetGap returning (res_gap = %s, res_inc = %s)",
+    EchoGap(res_gap), Image( (int) *res_inc) );
+} /* end GetGap */
+
+
+/*@::MinGap()@****************************************************************/
+/*                                                                           */
+/*  FULL_LENGTH MinGap(a, b, c, xgap)                                        */
+/*                                                                           */
+/*  Returns the minimum possible separation between the marks of two         */
+/*  objects with the given intervening gap.                                  */
+/*  The first object has fwd value a, the second has back value b and fwd c. */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_LENGTH MinGap(FULL_LENGTH a, FULL_LENGTH b, FULL_LENGTH c, GAP *xgap)
+{ FULL_LENGTH res;  int w;
+  switch( units(*xgap) )
+  {
+    case FIXED_UNIT:	w = width(*xgap);
+			break;
+
+    case FRAME_UNIT:	w = 0;
+			break;
+
+    case AVAIL_UNIT:	w = 0;
+			break;
+
+    case NEXT_UNIT:	w = width(*xgap) * (b + c) / FR;
+			break;
+
+    default:		assert(FALSE, "MinGap: units");
+			break;
+  }
+  switch( mode(*xgap) )
+  {
+    case NO_MODE:	assert(FALSE, "MinGap: NO_MODE");
+			res = 0;
+			break;
+
+    case ADD_HYPH:
+    case HYPH_MODE:
+    case EDGE_MODE:	res = find_min(MAX_FULL_LENGTH, a + w + b);
+			break;
+
+    case MARK_MODE:	if( BackEnd != PLAINTEXT )
+			  res = find_max(w, a + b + (FULL_LENGTH) (0.1 * w) );
+			else
+			  res = find_max(w, a + b);
+			break;
+
+    case OVER_MODE:	res = w;
+			break;
+
+    case KERN_MODE:	res = find_max(find_max(a, b), w);
+			break;
+
+    case TAB_MODE:	res = a + b;
+			break;
+
+    default:		assert(FALSE, "MinGap: mode");
+			res = 0;
+			break;
+
+  }
+  debug5(DGW, DD, "MinGap( _,%s  %s  %s,%s ) = %s", EchoLength(a),
+	EchoGap(xgap), EchoLength(b), EchoLength(c), EchoLength(res) );
+  return res;
+} /* end MinGap */
+
+
+/*@::ExtraGap()@**************************************************************/
+/*                                                                           */
+/*  FULL_LENGTH ExtraGap(a, b, xgap, dir)                                    */
+/*                                                                           */
+/*  Consider two objects, the first with forward length a, the second with   */
+/*  back length b.  The objects are separated by the given gap.              */
+/*  If dir == FWD, ExtraGap returns the maximum amount that a could be       */
+/*  increased without increasing MinGap(a, b, c, xgap).                      */
+/*  If dir == BACK, similarly for b.                                         */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_LENGTH ExtraGap(FULL_LENGTH a, FULL_LENGTH b, GAP *xgap, int dir)
+{ FULL_LENGTH tmp, res;
+  FULL_LENGTH w = units(*xgap) == FIXED_UNIT ? width(*xgap) : 0;
+  switch( mode(*xgap) )
+  {
+    case NO_MODE:	assert(FALSE, "ExtraGap: NO_MODE");
+			res = 0;
+			break;
+
+    case ADD_HYPH:
+    case HYPH_MODE:
+    case EDGE_MODE:	res = 0;
+			break;
+
+    case MARK_MODE:	if( BackEnd != PLAINTEXT )
+			  res = find_max(0, (FULL_LENGTH) (0.9 * w) - a - b);
+			else
+			  res = find_max(0, w - a - b);
+			break;
+
+    case OVER_MODE:	res = MAX_FULL_LENGTH;
+			break;
+
+    case KERN_MODE:	tmp = find_max(a, find_max(b, w));
+			res = dir == BACK ? tmp - b : tmp - a;
+			break;
+
+    case TAB_MODE:	res = 0;
+			break;
+
+    default:		assert(FALSE, "ExtraGap: mode");
+			res = 0;
+			break;
+
+  }
+  debug5(DGW, DD, "ExtraGap( %s, %s, %s, %s ) = %s", EchoLength(a),
+		EchoLength(b), EchoGap(xgap), Image(dir), EchoLength(res));
+  return res;
+} /* end ExtraGap */
+
+
+/*@::ActualGap()@*************************************************************/
+/*                                                                           */
+/*  FULL_LENGTH ActualGap(prevf, b, f, xgap, frame_size, mk)                 */
+/*                                                                           */
+/*  Returns the actual separation between the marks of an object of size     */
+/*  (?, prevf) and an object of size (b, f) separated by gap *xgap in a      */
+/*  frame of size frame_size; the first object lies at mk in the frame,      */
+/*  where 0 <= mk <= frame_size.                                             */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_LENGTH ActualGap(FULL_LENGTH prevf, FULL_LENGTH b, FULL_LENGTH f,
+  GAP *xgap, FULL_LENGTH frame_size, FULL_LENGTH mk)
+{ FULL_LENGTH res;  int w, w2;
+  switch( units(*xgap) )
+  {
+    case FIXED_UNIT:	w = width(*xgap);
+			break;
+
+    case FRAME_UNIT:	if( width(*xgap) > FR )
+			  w = MAX_FULL_LENGTH;
+			else
+			  w = (width(*xgap) * frame_size) / FR;
+			break;
+
+    case AVAIL_UNIT:	w = (width(*xgap) * (frame_size - b - f)) / FR;
+			w = find_max(w, 0);
+			break;
+
+    case NEXT_UNIT:	w = width(*xgap) * (b + f) / FR;
+			break;
+
+    default:		assert(FALSE, "ActualGap: units");
+			break;
+  }
+  switch( mode(*xgap) )
+  {
+    case NO_MODE:	Error(17, 10, "cannot continue after previous error(s)", FATAL, no_fpos);
+			assert(FALSE, "ActualGap: NO_MODE");
+			w2 = 0;
+			break;
+
+    case ADD_HYPH:
+    case HYPH_MODE:
+    case EDGE_MODE:	w2 = prevf + w + b;
+			break;
+
+    case MARK_MODE:	if( BackEnd != PLAINTEXT )
+			  w2 = find_max(w, prevf + b + (FULL_LENGTH) (0.1 * w) );
+			else
+			  w2 = find_max(w, prevf + b);
+			break;
+
+    case OVER_MODE:	w2 = w;
+			break;
+
+    case KERN_MODE:	w2 = find_max( find_max(prevf, b), w);
+			break;
+
+    case TAB_MODE:	w2 = w + b - mk;
+			w2 = find_max(w2, prevf + b );
+			break;
+
+    default:		assert(FALSE, "ActualGap: mode");
+			w2 = 0;
+			break;
+  }
+  res = find_min(MAX_FULL_LENGTH, w2);
+  debug7(DGW, D, "ActualGap( _,%s %s %s,%s; frame_size %s, mk %s ) = %s",
+	EchoLength(prevf), EchoGap(xgap), EchoLength(b), EchoLength(f),
+	EchoLength(frame_size), EchoLength(mk), EchoLength(res));
+  return res;
+} /* end ActualGap */
+
+
+/*@::EchoGap()@***************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *EchoGap(xgap)                                                 */
+/*                                                                           */
+/*  Returns a static string showing the indicated xgap.                      */
+/*                                                                           */
+/*****************************************************************************/
+#if DEBUG_ON
+
+FULL_CHAR *EchoGap(GAP *xgap)
+{ char *letter = "?ehxokt";  char c;  FULL_CHAR *res;
+  char *u;
+  static int i = 0;
+  static char buff[3][20];
+  assert( mode(*xgap) <= 6, "EchoGap: mode(*xgap)" );
+  c = letter[mode(*xgap)];
+  u = nobreak(*xgap) ? "u" : "";
+  switch( units(*xgap) )
+  {
+    case 0:	     sprintf(buff[i], "(none)%c", c);
+		     break;
+
+    case FIXED_UNIT: sprintf(buff[i], "%.1fc%c%s", (float) width(*xgap)/CM, c,u);
+		     break;
+
+    case NEXT_UNIT:  sprintf(buff[i], "%.1fw%c%s", (float) width(*xgap)/FR, c,u);
+		     break;
+
+    case FRAME_UNIT: sprintf(buff[i], "%.1fb%c%s", (float) width(*xgap)/FR, c,u);
+		     break;
+
+    case AVAIL_UNIT: sprintf(buff[i], "%.1fr%c%s", (float) width(*xgap)/FR, c,u);
+		     break;
+
+    case DEG_UNIT:   sprintf(buff[i], "%.1fd", (float) width(*xgap) / DG);
+		     break;
+
+    default:	     assert(FALSE, "EchoGap: units");
+		     break;
+
+  }
+  res = AsciiToFull(buff[i]);
+  i = (i + 1) % 3;
+  return res;
+} /* end EchoGap */
+#endif
diff --git a/z18.c b/z18.c
new file mode 100644
index 0000000..05e32cd
--- /dev/null
+++ b/z18.c
@@ -0,0 +1,498 @@
+/*@z18.c:Galley Transfer:Declarations@****************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z18.c                                                      */
+/*  MODULE:       Galley Transfer                                            */
+/*  EXTERNS:      TransferInit(), TransferBegin(), TransferComponent(),      */
+/*                TransferEnd(), TransferClose()                             */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+#define	MAX_DEPTH  	30			/* max depth of galleys      */
+static OBJECT		root_galley = nilobj;	/* the root galley           */
+static OBJECT		targets[MAX_DEPTH];	/* currently open \Inputs    */
+static CONSTRAINT	constraints[MAX_DEPTH];	/* their COLM constraints    */
+static int		itop;			/* stack top	             */
+static CONSTRAINT	initial_constraint;	/* initial COLM constraint   */
+       STYLE		InitialStyle;		/* initial style             */
+       OBJECT		InitialEnvironment;	/* initial environment	     */
+
+#if DEBUG_ON
+static void debug_targets(void)
+{ int i;  OBJECT tmp;
+  for( i = 0;  i <= itop;  i++ )
+  { if( targets[i] == nilobj || Down(targets[i]) == targets[i] )  tmp = nilobj;
+    else Child(tmp, Down(targets[i]));
+    debug3(DGT, D, "  target[%d] %s = %s", i,
+      EchoConstraint(&constraints[i]), EchoObject(tmp));
+  }
+} /* end debug_targets */
+#endif
+
+
+/*@::TransferInit()@**********************************************************/
+/*                                                                           */
+/*  TransferInit(InitEnv)                                                    */
+/*                                                                           */
+/*  Initialise this module.  The initial environment is InitEnv.             */
+/*                                                                           */
+/*****************************************************************************/
+
+void TransferInit(OBJECT InitEnv)
+{ OBJECT dest, x, y, recs, inners, nothing, dest_index, up_hd, why;
+  debug1(DGT, D, "[ TransferInit( %s )", EchoObject(InitEnv));
+  SetConstraint(initial_constraint,
+    MAX_FULL_LENGTH-1, MAX_FULL_LENGTH-1, MAX_FULL_LENGTH-1);
+
+  /* set initial environment and style */
+  InitialEnvironment = InitEnv;
+  SetGap(line_gap(InitialStyle), FALSE,FALSE,FALSE,FIXED_UNIT,MARK_MODE,18*PT);
+  vadjust(InitialStyle)         = FALSE;
+  hadjust(InitialStyle)         = FALSE;
+  padjust(InitialStyle)         = FALSE;
+  space_style(InitialStyle)     = SPACE_LOUT;
+  SetGap(space_gap(InitialStyle), FALSE,FALSE,TRUE,FIXED_UNIT,EDGE_MODE,1*EM);
+  hyph_style(InitialStyle)      = HYPH_UNDEF;
+  fill_style(InitialStyle)      = FILL_UNDEF;
+  display_style(InitialStyle)   = DISPLAY_UNDEF;
+  small_caps(InitialStyle)      = SMALL_CAPS_OFF;
+  font(InitialStyle)            = 0;			/* i.e. undefined    */
+  colour(InitialStyle)          = 0;			/* i.e. undefined    */
+  language(InitialStyle)        = 0;			/* i.e. undefined    */
+  yunit(InitialStyle)           = 0;			/* i.e. zero         */
+  zunit(InitialStyle)           = 0;			/* i.e. zero         */
+  nobreakfirst(InitialStyle)	= FALSE;
+  nobreaklast(InitialStyle)	= FALSE;
+
+  /* construct destination for root galley */
+  New(up_hd, HEAD);
+  force_gall(up_hd) = FALSE;
+  actual(up_hd) = enclose_obj(up_hd) = limiter(up_hd) = nilobj;
+  opt_components(up_hd) = opt_constraints(up_hd) = nilobj;
+  gall_dir(up_hd) = ROWM;
+  New(dest_index, RECEIVING);
+  New(dest, CLOSURE);  actual(dest) = PrintSym;
+  actual(dest_index) = dest;
+  debug2(DGT, D, "TransferInit setting external_ver(%s %s) = TRUE",
+    Image(type(dest)), SymName(actual(dest)));
+  external_ver(dest) = TRUE;
+  external_hor(dest) = FALSE;
+  threaded(dest) = FALSE;
+  blocked(dest_index) = FALSE;
+  Link(up_hd, dest_index);
+
+  /* construct root galley */
+  New(root_galley, HEAD);
+  force_gall(root_galley) = FALSE;
+  enclose_obj(root_galley) = limiter(root_galley) = nilobj;
+  opt_components(root_galley) = opt_constraints(root_galley) = nilobj;
+  gall_dir(root_galley) = ROWM;
+  FposCopy(fpos(root_galley), *no_fpos);
+  actual(root_galley) = whereto(root_galley) = nilobj;
+  ready_galls(root_galley) = nilobj;
+  must_expand(root_galley) = sized(root_galley) =FALSE;
+  foll_or_prec(root_galley) = GALL_FOLL;
+  New(x, CLOSURE);  actual(x) = InputSym;
+  Link(root_galley, x);
+  SizeGalley(root_galley, InitEnv, TRUE, FALSE, FALSE, FALSE, &InitialStyle,
+    &initial_constraint, nilobj, &nothing, &recs, &inners, nilobj);
+  assert( recs   == nilobj , "TransferInit: recs   != nilobj!" );
+  assert( inners == nilobj , "TransferInit: inners != nilobj!" );
+  Link(dest_index, root_galley);
+
+  /* initialise target and constraint stacks */
+  Child(y, Down(root_galley));
+  assert( type(y) == RECEPTIVE && type(actual(y)) == CLOSURE &&
+	actual(actual(y)) == InputSym, "TransferInit: initial galley!" );
+  assert( external_ver(actual(y)), "TransferInit: input sym not external!" );
+  blocked(y) = TRUE;
+  itop = 0;
+  New(targets[itop], ACAT);
+  Link(targets[itop], y);
+  Constrained(actual(y), &constraints[itop], COLM, &why);
+  debug2(DSC, DD, "Constrained( %s, COLM ) = %s",
+	EchoObject(y), EchoConstraint(&constraints[itop]));
+
+  debug0(DGT, D, "] TransferInit returning.");
+  ifdebug(DGT, DD, debug_targets());
+} /* end TransferInit */
+
+
+/*@::TransferBegin()@*********************************************************/
+/*                                                                           */
+/*  OBJECT TransferBegin(x)                                                  */
+/*                                                                           */
+/*  Commence the transfer of a new galley whose header is invocation x.      */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT TransferBegin(OBJECT x)
+{ OBJECT xsym, index, y, link, env, new_env, hold_env, res, hd, target, why;
+  CONSTRAINT c;
+  debug1(DGT, D, "[ [ TransferBegin( %s )", EchoObject(x));
+  ifdebug(DGT, DD, debug_targets());
+  assert( type(x) == CLOSURE, "TransferBegin: non-CLOSURE!" );
+
+  /* add an automatically generated @Tag parameter to x if required */
+  if( has_tag(actual(x)) )  CrossAddTag(x);
+
+  /* construct new (inner) env chain */
+  if( Down(targets[itop]) == targets[itop] )
+    Error(18, 1, "cannot attach galley %s", FATAL,&fpos(x),SymName(actual(x)));
+  Child(target, Down(targets[itop]));
+  xsym = actual(x);
+  env = GetEnv(actual(target));
+  debug1(DGT, DD, "  current env chain: %s", EchoObject(env));
+  if( has_body(xsym) )
+  {
+    /* prepare a copy of x for inclusion in environment */
+    y = CopyObject(x, no_fpos);
+
+    /* attach its environment */
+    AttachEnv(env, y);
+
+    /* now the new environment is y catenated with the old one */
+    debug0(DCR, DDD, "calling SetEnv from TransferBegin (a)");
+    new_env = SetEnv(y, nilobj);
+  }
+  else new_env = env;
+  New(hold_env, ACAT);  Link(hold_env, new_env);
+  debug1(DGT, DD, "  new env chain: %s", EchoObject(new_env));
+
+  /* convert x into an unsized galley called hd */
+  New(index, UNATTACHED);
+  pinpoint(index) = nilobj;
+  New(hd, HEAD);
+  FposCopy(fpos(hd), fpos(x));
+  actual(hd) = xsym;
+  limiter(hd) = opt_components(hd) = opt_constraints(hd) = nilobj;
+  gall_dir(hd) = ROWM;
+  ready_galls(hd) = nilobj;
+  must_expand(hd) = TRUE;
+  sized(hd) = FALSE;
+  Link(index, hd);
+  Link(hd, x);
+  AttachEnv(env, x);
+  SetTarget(hd);
+  enclose_obj(hd) = (has_enclose(actual(hd)) ? BuildEnclose(hd) : nilobj);
+
+  /* search for destination for hd and release it */
+  Link(Up(target), index);
+  debug0(DGF,D, "");
+  debug1(DGF,D, "  calling FlushGalley(%s) from TransferBegin, root_galley =",
+    SymName(actual(hd)));
+  ifdebug(DGF, D, DebugGalley(root_galley, nilobj, 4));
+  if( whereto(hd) == nilobj || !uses_extern_target(whereto(hd)) ) /* &&& */
+    FlushGalley(hd);
+
+  /* if failed to flush, undo everything and exit */
+  Parent(index, Up(hd));
+  if( type(index) == UNATTACHED && !sized(hd) )
+  { DeleteNode(index);
+    DisposeObject(hold_env);
+    if( LastDown(x) != x )
+    { Child(env, LastDown(x));
+      if( type(env) == ENV )  DisposeChild(LastDown(x));
+    }
+    debug1(DGT,D, "] TransferBegin returning failed, x: %s", EchoObject(x));
+    return x;
+  }
+
+  if( has_rpar(actual(hd)) )
+  {
+    /* set up new target to be inner \InputSym, or nilobj if none */
+    if( ++itop >= MAX_DEPTH )
+      Error(18, 2, "galley nested too deeply (max is %d)",
+	FATAL, &fpos(x), MAX_DEPTH);
+    New(targets[itop], ACAT);  target = nilobj;
+    for( link = Down(hd);  link != hd;  link = NextDown(link) )
+    { Child(y, link);
+      if( type(y) == RECEPTIVE && actual(actual(y)) == InputSym )
+      {
+	Constrained(actual(y), &constraints[itop], COLM, &why);
+	if( FitsConstraint(0, 0, constraints[itop]) )
+	{ Link(targets[itop], y);  target = y;
+	  debug2(DSC, DD, "Constrained( %s, COLM ) = %s",
+	    EchoObject(y), EchoConstraint(&constraints[itop]));
+	  env = DetachEnv(actual(y));
+	  AttachEnv(new_env, actual(y));
+	}
+	else
+	{ Error(18, 3, "galley %s deleted (insufficient width at target)",
+	    WARN, &fpos(hd), SymName(actual(hd)));
+	}
+	break;
+      }
+    }
+
+    /* return a token appropriate to the new target */
+    if( target == nilobj || external_ver(actual(target)) )
+      res = NewToken(GSTUB_EXT, no_fpos, 0, 0, precedence(xsym), nilobj);
+    else
+    { Constrained(actual(target), &c, ROWM, &why);
+      if( constrained(c) )
+	Error(18, 4, "right parameter of %s is vertically constrained",
+	  FATAL, &fpos(target), SymName(xsym));
+      else res = NewToken(GSTUB_INT, no_fpos, 0, 0, precedence(xsym), nilobj);
+    }
+    debug1(DGT, D, "] TransferBegin returning %s", Image(type(res)));
+  }
+  else
+  {
+    res = NewToken(GSTUB_NONE, no_fpos, 0, 0, precedence(xsym), nilobj);
+    debug1(DGT, D, "] TransferBegin returning %s", Image(type(res)));
+  }
+
+  DisposeObject(hold_env);
+  ifdebug(DGT, DD, debug_targets());
+  return res;
+} /* end TransferBegin */
+
+/*@::TransferComponent()@*****************************************************/
+/*                                                                           */
+/*  TransferComponent(x)                                                     */
+/*                                                                           */
+/*  Transfer component x of a galley.                                        */
+/*                                                                           */
+/*****************************************************************************/
+
+void TransferComponent(OBJECT x)
+{ OBJECT y, env, start_search, recs, inners, nothing, hd, dest, dest_index;
+  debug1(DGT, D, "[ TransferComponent( %s )", EchoObject(x));
+  ifdebug(DGT, DD, debug_targets());
+
+  /* if no dest_index, discard x and exit */
+  if( Down(targets[itop]) == targets[itop] )
+  { DisposeObject(x);
+    debug0(DGT, D, "] TransferComponent returning (no target).");
+    return;
+  }
+  Child(dest_index, Down(targets[itop]));
+  assert( external_ver(actual(dest_index)), "TransferComponent: internal!" );
+
+  /* make the component into a galley */
+  New(hd, HEAD);
+  force_gall(hd) = FALSE;
+  enclose_obj(hd) = limiter(hd) = nilobj;
+  opt_components(hd) = opt_constraints(hd) = nilobj;
+  gall_dir(hd) = ROWM;
+  FposCopy(fpos(hd), fpos(x));
+  actual(hd) = whereto(hd) = ready_galls(hd) = nilobj;
+  foll_or_prec(hd) = GALL_FOLL;
+  must_expand(hd) = sized(hd) = FALSE;
+  Link(hd, x);
+  dest = actual(dest_index);
+  env = GetEnv(dest);
+  debug1(DGT, DD, "  current env chain: %s", EchoObject(env));
+  SizeGalley(hd, env, TRUE, threaded(dest), FALSE, TRUE, &save_style(dest),
+	&constraints[itop], nilobj, &nothing, &recs, &inners, nilobj);
+  if( recs != nilobj )  ExpandRecursives(recs);
+  debug3(DSA, D, "after SizeGalley, hd width is (%s,%s), constraint was %s",
+    EchoLength(back(hd, COLM)), EchoLength(fwd(hd, COLM)),
+    EchoConstraint(&constraints[itop]));
+
+  /* promote the components, remembering where old spot was */
+  start_search = PrevDown(Up(dest_index));
+  debug1(DSA, D, "  calling AdjustSize from TransferComponent %s",
+    EchoFilePos(&fpos(hd)));
+  ifdebug(DSA, D,
+    Child(y, Down(hd));
+    while( type(y) == VCAT )  Child(y, Down(y));
+    debug2(DSA, D, "  first component is %s at %s",
+      Image(type(y)), EchoFilePos(&fpos(y)));
+    if( NextDown(Down(hd)) != hd && NextDown(NextDown(Down(hd))) != hd )
+    { Child(y, NextDown(NextDown(Down(hd))));
+      debug2(DSA, D, "  second component is %s at %s",
+        Image(type(y)), EchoFilePos(&fpos(y)));
+    }
+  );
+  AdjustSize(dest, back(hd, COLM), fwd(hd, COLM), COLM);
+  Promote(hd, hd, dest_index, FALSE);
+  DeleteNode(hd);
+
+  /* flush any widowed galleys attached to \Input */
+  if( Down(dest_index) != dest_index )
+  { OBJECT tinners, index;
+    New(tinners, ACAT);
+    while( Down(dest_index) != dest_index )
+    { Child(y, Down(dest_index));
+      assert( type(y) == HEAD, "TransferComponent: input child!" );
+      if( opt_components(y) != nilobj )
+      { DisposeObject(opt_components(y));
+	opt_components(y) = nilobj;
+	debug1(DOG, D, "TransferComponent de-optimizing %s (@Input case)",
+	  SymName(actual(y)));
+      }
+      DetachGalley(y);
+      Parent(index, Up(y));
+      MoveLink(Up(index), NextDown(start_search), PARENT);
+      Link(tinners, index);
+    }
+    debug0(DGF, D, "  calling FlushInners() from TransferComponent (a)");
+    FlushInners(tinners, nilobj);
+  }
+
+  /* flush any galleys inside hd */
+  if( inners != nilobj )
+  {
+    debug0(DGF, D, "  calling FlushInners() from TransferComponent (b)");
+    FlushInners(inners, nilobj);
+  }
+
+  /* flush parent galley, if needed */
+  if( blocked(dest_index) )
+  { blocked(dest_index) = FALSE;
+    Parent(y, Up(dest_index));
+    debug0(DGF, D, "  calling FlushGalley from TransferComponent");
+    FlushGalley(y);
+  }
+  
+  debug0(DGT, D, "] TransferComponent returning.");
+  ifdebug(DGT, DD, debug_targets());
+} /* end TransferComponent */
+
+
+/*@::TransferEnd()@***********************************************************/
+/*                                                                           */
+/*  TransferEnd(x)                                                           */
+/*                                                                           */
+/*  End the transfer of a galley.                                            */
+/*                                                                           */
+/*****************************************************************************/
+
+void TransferEnd(OBJECT x)
+{ OBJECT recs, inners, nothing, z, env, dest, hd, dest_index, y, start_search;
+  debug1(DGT, D, "[ TransferEnd( %s )", EchoObject(x));
+  ifdebug(DGT, DD, debug_targets());
+
+  /* if no dest_index, discard x and exit */
+  if( Down(targets[itop]) == targets[itop] )
+  { DisposeObject(x);  DisposeObject(targets[itop--]);
+    debug0(DGT, D, "] TransferEnd returning: no dest_index");
+    return;
+  }
+  Child(dest_index, Down(targets[itop]));
+
+  /* make the component into a galley */
+  New(hd, HEAD);  FposCopy(fpos(hd), fpos(x));
+  force_gall(hd) = FALSE;
+  enclose_obj(hd) = limiter(hd) = nilobj;
+  opt_components(hd) = opt_constraints(hd) = nilobj;
+  gall_dir(hd) = ROWM;
+  actual(hd) = whereto(hd) = ready_galls(hd) = nilobj;
+  foll_or_prec(hd) = GALL_FOLL;
+  must_expand(hd) = sized(hd) = FALSE;
+  Link(hd, x);  dest = actual(dest_index);  env = GetEnv(dest);
+  debug1(DGT, DD, "  current env chain: %s", EchoObject(env));
+  SizeGalley(hd, env, external_ver(dest), threaded(dest), FALSE, TRUE,
+    &save_style(dest), &constraints[itop], nilobj, &nothing, &recs, &inners,
+    nilobj);
+  if( recs != nilobj )  ExpandRecursives(recs);
+  debug3(DSA, D, "after SizeGalley, hd width is (%s,%s), constraint was %s",
+    EchoLength(back(hd, COLM)), EchoLength(fwd(hd, COLM)),
+    EchoConstraint(&constraints[itop]));
+
+  /* promote the components, remembering where old spot was */
+  start_search = PrevDown(Up(dest_index));
+  debug0(DSA, D, "calling AdjustSize from TransferEnd (a)");
+  AdjustSize(dest, back(hd, COLM), fwd(hd, COLM), COLM);
+  if( !external_ver(dest) )
+  { Child(z, LastDown(hd));
+    debug0(DSA, D, "calling AdjustSize from TransferEnd (b)");
+    AdjustSize(dest, back(z, ROWM), fwd(z, ROWM), ROWM);
+    Interpose(dest, VCAT, hd, z);
+  }
+  Promote(hd, hd, dest_index, TRUE);  DeleteNode(hd);
+
+  /* flush any widowed galleys attached to \Input */
+  if( Down(dest_index) != dest_index )
+  { OBJECT tinners, index;
+    New(tinners, ACAT);
+    while( Down(dest_index) != dest_index )
+    { Child(y, Down(dest_index));
+      assert( type(y) == HEAD, "TransferEnd: input child!" );
+      if( opt_components(y) != nilobj )
+      { DisposeObject(opt_components(y));
+	opt_components(y) = nilobj;
+	debug1(DOG, D, "TransferEnd de-optimizing %s (@Input case)",
+	  SymName(actual(y)));
+      }
+      DetachGalley(y);
+      Parent(index, Up(y));
+      MoveLink(Up(index), NextDown(start_search), PARENT);
+      Link(tinners, index);
+    }
+    debug0(DGF, D, "  calling FlushInners() from TransferEnd (a)");
+    FlushInners(tinners, nilobj);
+  }
+
+  /* flush any galleys inside hd */
+  if( inners != nilobj )
+  {
+    debug0(DGF, D, "  calling FlushInners() from TransferEnd (b)");
+    FlushInners(inners, nilobj);
+  }
+
+  /* close dest_index, and flush parent galley if needed */
+  if( blocked(dest_index) )
+  { Parent(y, Up(dest_index));
+    DeleteNode(dest_index);
+    debug0(DGF, D, "  calling FlushGalley from TransferEnd");
+    FlushGalley(y);
+  }
+  else DeleteNode(dest_index);
+  
+  /* pop target stack and exit */
+  DisposeObject(targets[itop--]);
+  debug0(DGT, D, "] ] TransferEnd returning.");
+  ifdebug(DGT, DD, debug_targets());
+} /* end TransferEnd */
+
+/*@::TransferClose()@*********************************************************/
+/*                                                                           */
+/*  TransferClose()                                                          */
+/*                                                                           */
+/*  Close this module.                                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+void TransferClose(void)
+{ OBJECT inners;
+  debug0(DGT, D, "[ TransferClose()");
+  ifdebug(DGT, DD, debug_targets());
+  debug0(DGA, D, "  calling FreeGalley from TransferClose");
+  if( LastDown(root_galley) != root_galley )
+  { inners = nilobj;
+    FreeGalley(root_galley, root_galley, &inners, nilobj, nilobj);
+    if( inners != nilobj )
+    {
+      debug0(DGF, D, "  calling FlushInners() from TransferClose");
+      FlushInners(inners, nilobj);
+    }
+    debug0(DGF, D, "  calling FlushGalley from TransferClose");
+    FlushGalley(root_galley);
+  }
+  debug0(DGT, D, "] TransferClose returning.");
+}
diff --git a/z19.c b/z19.c
new file mode 100644
index 0000000..37b35de
--- /dev/null
+++ b/z19.c
@@ -0,0 +1,994 @@
+/*@z19.c:Galley Attaching:DetachGalley()@*************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z19.c                                                      */
+/*  MODULE:       Galley Attaching                                           */
+/*  EXTERNS:      SearchGalley(), AttachGalley(), DetachGalley()             */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT InterposeScale(y, scale_factor, dim)                              */
+/*                                                                           */
+/*  Interpose a @Scale symbol above y with the given scale factor.           */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT InterposeScale(OBJECT y, int scale_factor, int dim)
+{ OBJECT res;
+  New(res, SCALE);
+  FposCopy(fpos(res), fpos(y));
+  if( dim == COLM )
+  { bc(constraint(res)) = scale_factor;
+    fc(constraint(res)) = 1 * SF;
+  }
+  else
+  { bc(constraint(res)) = 1 * SF;
+    fc(constraint(res)) = scale_factor;
+  }
+  back(res, dim) = (back(y, dim) * scale_factor) / SF;
+  fwd(res, dim)  = (fwd(y, dim) * scale_factor) / SF;
+  back(res, 1-dim) = back(y, 1-dim);
+  fwd(res, 1-dim)  = fwd(y, 1-dim);
+  ReplaceNode(res, y);
+  Link(res, y);
+  return res;
+} /* end InterposeScale */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT InterposeWideOrHigh(y, dim)                                       */
+/*                                                                           */
+/*  Interpose a @Wide or @High symbol above y with the same size as y, with  */
+/*  a value which prevents any further increase in the size of y.            */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT InterposeWideOrHigh(OBJECT y, int dim)
+{ OBJECT res;
+  New(res, dim == COLM ? WIDE : HIGH);
+  FposCopy(fpos(res), fpos(y));
+  back(res, dim) = back(y, dim);
+  fwd(res, dim)  = fwd(y, dim);
+  back(res, 1-dim) = back(y, 1-dim);
+  fwd(res, 1-dim)  = fwd(y, 1-dim);
+  SetConstraint(constraint(res), MAX_FULL_LENGTH, size(res, dim), MAX_FULL_LENGTH);
+  ReplaceNode(res, y);
+  Link(res, y);
+  return res;
+} /* end InterposeWideOrHigh */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DetachGalley(hd)                                                         */
+/*                                                                           */
+/*  Detach galley hd from its target.                                        */
+/*                                                                           */
+/*****************************************************************************/
+
+void DetachGalley(OBJECT hd)
+{ OBJECT prnt, index;
+  assert( type(hd) == HEAD && Up(hd) != hd, "DetachGalley: precondition!" );
+  debug1(DGA, D, "DetachGalley( %s )", SymName(actual(hd)));
+  Parent(prnt, Up(hd));
+  assert( Up(prnt) != prnt, "DetachGalley: parent!" );
+  New(index, UNATTACHED);
+  pinpoint(index) = nilobj;
+  MoveLink(Up(hd), index, PARENT);
+  Link(NextDown(Up(prnt)), index);
+  debug0(DGA, D, "DetachGalley returning.");
+} /* end DetachGalley */
+
+
+/*@::SearchGalley()@**********************************************************/
+/*                                                                           */
+/*  OBJECT SearchGalley(start, sym, forwards, subgalleys, closures, input)   */
+/*                                                                           */
+/*  Search a galley and its sub-galleys for a target which uses sym.  The    */
+/*  meanings of the flags are as follows:                                    */
+/*                                                                           */
+/*    forwards     If TRUE, search forwards from just after start, else      */
+/*                 search backwards from just before start                   */
+/*    subgalleys   If TRUE, search down into sub-galleys of this galley      */
+/*    closures     If TRUE, closures in this galley are acceptable results   */
+/*    input        If TRUE, InputSym is an acceptable result                 */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT SearchGalley(OBJECT start, OBJECT sym, BOOLEAN forwards,
+BOOLEAN subgalleys, BOOLEAN closures, BOOLEAN input)
+{ OBJECT y, res, z, zlink, link;
+  debug5(DGA, DD, "[ SearchGalley(start, %s, %s, %s, %s, %s)", SymName(sym),
+	forwards ? "fwd" : "back", subgalleys ? "subgalleys" : "nosubgalleys",
+	closures ? "closures" : "noclosures", input ? "input" : "noinput");
+  assert( type(start) == LINK || type(start) == HEAD, "SearchGalley: start!" );
+
+  link = forwards ? NextDown(start) : PrevDown(start);
+  res = nilobj;
+  while( res == nilobj && type(link) != HEAD )
+  { Child(y, link);
+    switch( type(y) )
+    {
+      case UNATTACHED:
+      case RECEIVING:
+	
+        debug1(DGA, DD, "  examining %s", EchoIndex(y));
+	if( subgalleys )
+	for( zlink = Down(y); zlink!=y && res==nilobj; zlink=NextDown(zlink) )
+	{ Child(z, zlink);
+	  res = SearchGalley(z, sym, TRUE, TRUE, TRUE, input);
+	}
+	if( res == nilobj && input && type(y) == RECEIVING &&
+	    actual(actual(y)) == InputSym )
+	  res = y;
+	break;
+
+
+      case RECEPTIVE:
+	
+        debug1(DGA, DD, "  examining %s", EchoIndex(y));
+	if( closures && type(actual(y)) == CLOSURE
+		     && SearchUses(actual(actual(y)), sym) )  res = y;
+	else if( input && actual(actual(y)) == InputSym )  res = y;
+	break;
+
+
+      default:
+	
+	break;
+
+    }
+    link = forwards ? NextDown(link) : PrevDown(link);
+  }
+  debug1(DGA, DD, "] SearchGalley returning %s", EchoIndex(res));
+  return res;
+} /* end SearchGalley */
+
+
+/*@@**************************************************************************/
+/*                                                                           */
+/*  int AttachGalley(hd, inners, suspend_pt)                                 */
+/*                                                                           */
+/*  Attach galley hd, which may be unsized, to a destination.  This involves */
+/*  searching for a destination forward or back from the attachment point of */
+/*  hd and promoting up to and including the first definite component of hd. */
+/*                                                                           */
+/*  Although AttachGalley never flushes any galleys, it may identify some    */
+/*  galleys which should be flushed, even if the attach is itself not        */
+/*  successful.  These are returned in *inners, or nilobj if none.           */
+/*                                                                           */
+/*  The integer returned by AttachGalley indicates what happened to hd:      */
+/*                                                                           */
+/*    ATTACH_KILLED     The galley was sized to begin with but no target     */
+/*                      for it could be found.  The galley has been killed   */
+/*                      and that's the end of it.                            */
+/*                                                                           */
+/*    ATTACH_INPUT      When searching for a target for the galley we came   */
+/*                      upon InputSym, suggesting that the target might be   */
+/*                      still to be read.  So the galley has been linked to  */
+/*                      that InputSym and must now wait.                     */
+/*                                                                           */
+/*    ATTACH_NOTARGET   The galley is unsized and no target could be found   */
+/*                      for it.  This is fine, it just means that we can't   */
+/*                      flush the galley now and we must try again later.    */
+/*                                                                           */
+/*    ATTACH_SUSPEND    The galley is sized and a target was found for it,   */
+/*                      but the first component of the galley proved to be   */
+/*                      indefinite so could not be promoted.  The galley     */
+/*                      remains unattached but is moved to just before its   */
+/*                      target so that it can find it easily later when its  */
+/*                      first component becomes definite and it is flushed.  */
+/*                                                                           */
+/*    ATTACH_NULL       The galley is sized and a target was found for it,   */
+/*                      but the body of the galley proved to be null (i.e.   */
+/*                      there were no definite components to be flushed).    */
+/*                      This is to be treated just like the normal case      */
+/*                      following, except that the target is replaced by     */
+/*                      @Null rather than by its body.                       */
+/*                                                                           */
+/*    ATTACH_ACCEPT     The galley is sized and a target was found for it,   */
+/*                      and one component of the galley has been promoted.   */
+/*                                                                           */
+/*****************************************************************************/
+
+int AttachGalley(OBJECT hd, OBJECT *inners, OBJECT *suspend_pt)
+{ OBJECT hd_index;		/* the index of hd in the enclosing galley   */
+  OBJECT hd_inners;		/* inner galleys of hd, if unsized           */
+  OBJECT dest;			/* the target @Galley hd empties into        */
+  OBJECT dest_index;		/* the index of dest                         */
+  OBJECT target;		/* the target indefinite containing dest     */
+  OBJECT target_index;		/* the index of target                       */
+  OBJECT target_galley;		/* the body of target, made into a galley    */
+  OBJECT tg_inners;		/* inner galleys of target_galley            */
+  BOOLEAN need_precedes;	/* true if destination lies before galley    */
+  OBJECT recs;			/* list of recursive definite objects        */
+  OBJECT link, y;		/* for scanning through the components of hd */
+  CONSTRAINT c;			/* temporary variable holding a constraint   */
+  OBJECT env, n1, tmp, zlink, z, sym;	/* placeholders and temporaries	     */
+  BOOLEAN was_sized;		/* true if sized(hd) initially               */
+  int dim;			/* the galley direction                      */
+  FULL_LENGTH perp_back, perp_fwd;
+  OBJECT why, junk;
+
+  debug2(DGA, D, "[ AttachGalley(Galley %s into %s)",
+	SymName(actual(hd)), SymName(whereto(hd)));
+  ifdebug(DGA, DD, DebugGalley(hd, nilobj, 4));
+  assert( Up(hd) != hd, "AttachGalley: no index!" );
+  Parent(hd_index, Up(hd));
+  assert( type(hd_index) == UNATTACHED, "AttachGalley: not UNATTACHED!" );
+  hd_inners = tg_inners = nilobj;
+  was_sized = sized(hd);
+  dim = gall_dir(hd);
+
+  for(;;)
+  {
+    /*************************************************************************/
+    /*                                                                       */
+    /*  Search for a destination for hd.  If hd is unsized, search for       */
+    /*  inner galleys preceding it first of all, then for receptive objects  */
+    /*  following it, possibly in inner galleys.  If no luck, exit.          */
+    /*  If hd is sized, search only for receptive objects in the current     */
+    /*  galley below the current spot, and fail if cannot find any.          */
+    /*                                                                       */
+    /*************************************************************************/
+
+    sym = whereto(hd);
+    if( sized(hd) )
+    {
+      /* sized galley case: search on from current spot */
+      target_index = SearchGalley(Up(hd_index), sym, TRUE, FALSE, TRUE, TRUE);
+      if( target_index == nilobj )
+      {	
+	/* search failed to find any new target, so kill the galley */
+	for( link = Down(hd); link != hd; link = NextDown(link) )
+	{ Child(y, link);
+	  if( type(y) == SPLIT )  Child(y, DownDim(y, dim));
+	  if( is_definite(type(y)) )  break;
+	}
+	if( link != hd )
+	  Error(19, 1, "galley %s deleted from here (no target)",
+	    WARN, &fpos(y), SymName(actual(hd)));
+	if( hd_inners != nilobj )  DisposeObject(hd_inners), hd_inners=nilobj;
+	if( tg_inners != nilobj )  DisposeObject(tg_inners), tg_inners=nilobj;
+	KillGalley(hd, FALSE);
+	*inners = nilobj;
+	debug0(DGA, D, "] AttachGalley returning ATTACH_KILLED");
+	return ATTACH_KILLED;
+      }
+      else if( actual(actual(target_index)) == InputSym )
+      {
+	/* search found input object, so suspend on that */
+	DeleteNode(hd_index);
+	Link(target_index, hd);
+	*inners = nilobj;
+	debug0(DGA, D, "] AttachGalley returning ATTACH_INPUT");
+	return ATTACH_INPUT;
+      }
+
+    }
+    else /* unsized galley, either backwards or normal */
+    {
+      if( foll_or_prec(hd) == GALL_PREC )
+      {	target_index= SearchGalley(Up(hd_index), sym, FALSE, TRUE,TRUE,FALSE);
+	need_precedes = FALSE;
+      }
+      else
+      {	target_index = SearchGalley(Up(hd_index), sym, FALSE,TRUE,FALSE,FALSE);
+	need_precedes = (target_index != nilobj);
+	if( target_index == nilobj )
+	  target_index = SearchGalley(Up(hd_index), sym, TRUE,TRUE,TRUE,FALSE);
+      }
+
+      /* if no luck, exit without error */
+      if( target_index == nilobj )
+      {	*inners = nilobj;
+	debug0(DGA, D, "] AttachGalley returning ATTACH_NOTARGET");
+	return ATTACH_NOTARGET;
+      }
+    }
+    assert( type(target_index) == RECEPTIVE, "AttachGalley: target_index!" );
+    target = actual(target_index);
+    assert( type(target) == CLOSURE, "AttachGalley: target!" );
+
+    /* set target_galley to the expanded value of target */
+    debug1(DYY, D, "[ EnterErrorBlock(FALSE) (expanding target %s)",
+      SymName(actual(target)));
+    EnterErrorBlock(FALSE);
+    New(target_galley, HEAD);
+    force_gall(target_galley) = FALSE;
+    enclose_obj(target_galley) = limiter(target_galley) = nilobj;
+    opt_components(target_galley) = opt_constraints(target_galley) = nilobj;
+    gall_dir(target_galley) = external_hor(target) ? COLM : ROWM;
+    FposCopy(fpos(target_galley), fpos(target));
+    actual(target_galley) = actual(target);
+    whereto(target_galley) = ready_galls(target_galley) = nilobj;
+    foll_or_prec(target_galley) = GALL_FOLL;
+    must_expand(target_galley) = FALSE;
+    sized(target_galley) = FALSE;
+
+    /* get perpendicular constraint (none if horizontal galley) */
+    if( dim == ROWM )
+    {
+      Constrained(target, &c, 1-dim, &junk);
+      if( !constrained(c) )
+        Error(19, 2, "receptive symbol %s has unconstrained width",
+	  FATAL, &fpos(target), SymName(actual(target)));
+      debug2(DSC, DD, "Constrained( %s, 1-dim ) = %s",
+	EchoObject(target), EchoConstraint(&c));
+      if( !FitsConstraint(0, 0, c) )
+      { debug0(DGA, D, "  reject: target_galley horizontal constraint is -1");
+	y = nilobj;
+        goto REJECT;
+      }
+    }
+    else /* actually unused */
+      SetConstraint(c, MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+
+    debug1(DGA, DDD, "  expanding %s", EchoObject(target));
+    tmp = CopyObject(target, no_fpos);
+    Link(target_galley, tmp);
+    env = DetachEnv(tmp);
+    debug4(DGM, D, "  external_ver(%s) = %s, external_hor(%s) = %s",
+      SymName(actual(target)), bool(external_ver(target)),
+      SymName(actual(target)), bool(external_hor(target)));
+    SizeGalley(target_galley, env,
+	external_ver(target) || external_hor(target),
+	threaded(target), non_blocking(target_index),
+	trigger_externs(target_index), &save_style(target),
+	&c, whereto(hd), &dest_index, &recs, &tg_inners,
+	enclose_obj(hd) != nilobj ? CopyObject(enclose_obj(hd), no_fpos):nilobj);
+    debug1(DGA, DD, "  SizeGalley tg_inners: %s", DebugInnersNames(tg_inners));
+    if( recs != nilobj )  ExpandRecursives(recs);
+    dest = actual(dest_index);
+    if( underline(dest) == UNDER_UNDEF )  underline(dest) = UNDER_OFF;
+
+    /* verify that hd satisfies any horizontal constraint on dest */
+    if( dim == ROWM )
+    {
+      debug1(DGA, DDD, "  checking hor fit of hd in %s",SymName(actual(dest)));
+      Constrained(dest, &c, 1-dim, &junk);
+      debug3(DSC, DD, "Constrained( %s, %s ) = %s",
+	EchoObject(dest), dimen(1-dim), EchoConstraint(&c));
+      assert( constrained(c), "AttachGalley: dest unconstrained!" );
+      if( !FitsConstraint(0, 0, c) )
+      { debug0(DGA, D, "  reject: hd horizontal constraint is -1");
+	y = nilobj;
+        goto REJECT;
+      }
+    }
+
+    /* manifest and size the galley if not done yet */
+    if( !sized(hd) )
+    {
+      debug2(DYY, D, "[ EnterErrorBlock(TRUE) (sizing galley %s into %s)",
+	SymName(actual(hd)), SymName(whereto(hd)));
+      EnterErrorBlock(TRUE);
+      n1 = nilobj;
+      Child(y, Down(hd));
+      env = DetachEnv(y);
+      /*** threaded() only defined in ROWM case
+      SizeGalley(hd, env, TRUE, threaded(dest), non_blocking(target_index),
+	TRUE, &save_style(dest), &c, nilobj, &n1, &recs, &hd_inners);
+      *** */
+      SizeGalley(hd, env, TRUE, dim == ROWM ? threaded(dest) : FALSE,
+	non_blocking(target_index), TRUE, &save_style(dest), &c, nilobj,
+	&n1, &recs, &hd_inners, nilobj);
+      debug1(DGA,DD,"  SizeGalley hd_inners: %s", DebugInnersNames(hd_inners));
+      if( recs != nilobj )  ExpandRecursives(recs);
+      if( need_precedes )		/* need an ordering constraint */
+      {	OBJECT index1, index2;
+        New(index1, PRECEDES);
+	New(index2, FOLLOWS);
+	blocked(index2) = FALSE;
+	tmp = MakeWord(WORD, STR_EMPTY, no_fpos);
+	Link(index1, tmp);  Link(index2, tmp);
+	Link(Up(hd_index), index1);
+	Link(Down(hd), index2);
+	debug0(DGA, D, "  inserting PRECEDES and FOLLOWS");
+      }
+      LeaveErrorBlock(TRUE);
+      debug0(DYY, D, "] LeaveErrorBlock(TRUE) (finished sizing galley)");
+    }
+
+    if( dim == ROWM )
+    { if( !FitsConstraint(back(hd, 1-dim), fwd(hd, 1-dim), c) )
+      { debug3(DGA, D, "  reject: hd %s,%s does not fit target_galley %s",
+	  EchoLength(back(hd, 1-dim)), EchoLength(fwd(hd, 1-dim)),
+	  EchoConstraint(&c));
+        Error(19, 3, "too little horizontal space for galley %s at %s",
+	  WARN, &fpos(hd), SymName(actual(hd)), SymName(actual(dest)));
+        goto REJECT;
+      }
+    }
+
+    /* check status of first component of hd */
+    debug0(DGA, DDD, "  now ready to attach; hd =");
+    ifdebug(DGA, DDD, DebugObject(hd));
+    for( link = Down(hd);  link != hd;  link = NextDown(link) )
+    {
+      Child(y, link);
+      debug1(DGA, DDD, "  examining %s", EchoIndex(y));
+      if( type(y) == SPLIT )  Child(y, DownDim(y, dim));
+      switch( type(y) )
+      {
+
+	case EXPAND_IND:
+	case SCALE_IND:
+	case COVER_IND:
+	case GALL_PREC:
+	case GALL_FOLL:
+	case GALL_FOLL_OR_PREC:
+	case GALL_TARG:
+	case CROSS_PREC:
+	case CROSS_FOLL:
+	case CROSS_FOLL_OR_PREC:
+	case CROSS_TARG:
+	case PAGE_LABEL_IND:
+	    
+	  break;
+
+
+	case PRECEDES:
+	case UNATTACHED:
+	    
+	  if( was_sized )
+	  { /* SizeGalley was not called, so hd_inners was not set by it */
+	    if( hd_inners == nilobj )  New(hd_inners, ACAT);
+	    Link(hd_inners, y);
+	  }
+	  break;
+
+
+	case RECEPTIVE:
+
+	  goto SUSPEND;
+
+
+	case RECEIVING:
+	    
+	  goto SUSPEND;
+
+
+	case FOLLOWS:
+	    
+	  Child(tmp, Down(y));
+	  if( Up(tmp) == LastUp(tmp) )
+	  { link = pred(link, CHILD);
+	    debug0(DGA, DD, "  disposing FOLLOWS");
+	    DisposeChild(NextDown(link));
+	    break;
+	  }
+	  Parent(tmp, Up(tmp));
+	  assert(type(tmp) == PRECEDES, "Attach: PRECEDES!");
+	  switch( CheckComponentOrder(tmp, target_index) )
+	  {
+	    case CLEAR:		DeleteNode(tmp);
+				link = pred(link, CHILD);
+				DisposeChild(NextDown(link));
+				break;
+
+	    case PROMOTE:	break;
+
+	    case BLOCK:		debug0(DGA, DD, "CheckContraint: BLOCK");
+				goto SUSPEND;
+
+	    case CLOSE:		debug0(DGA, D, "  reject: CheckContraint");
+				goto REJECT;
+	  }
+	  break;
+
+
+	case GAP_OBJ:
+
+	  underline(y) = underline(dest);
+	  if( !join(gap(y)) )  seen_nojoin(hd) = TRUE;
+	  break;
+
+
+	case CLOSURE:
+	case CROSS:
+	case FORCE_CROSS:
+	case NULL_CLOS:
+	case PAGE_LABEL:
+
+	  underline(y) = underline(dest);
+	  break;
+
+
+	case WORD:
+	case QWORD:
+	case ONE_COL:
+	case ONE_ROW:
+	case WIDE:
+	case HIGH:
+	case HSHIFT:
+	case VSHIFT:
+	case HSCALE:
+	case VSCALE:
+	case HCOVER:
+	case VCOVER:
+	case HCONTRACT:
+	case VCONTRACT:
+	case HLIMITED:
+	case VLIMITED:
+	case HEXPAND:
+	case VEXPAND:
+	case START_HVSPAN:
+	case START_HSPAN:
+	case START_VSPAN:
+	case HSPAN:
+	case VSPAN:
+	case ROTATE:
+	case BACKGROUND:
+	case SCALE:
+	case KERN_SHRINK:
+	case INCGRAPHIC:
+	case SINCGRAPHIC:
+	case PLAIN_GRAPHIC:
+	case GRAPHIC:
+	case ACAT:
+	case HCAT:
+	case VCAT:
+	case ROW_THR:
+	case COL_THR:
+	    
+
+	  underline(y) = underline(dest);
+	  if( dim == ROWM )
+	  {
+	    /* make sure y is not joined to a target below (vertical only) */
+	    for( zlink = NextDown(link); zlink != hd; zlink = NextDown(zlink) )
+	    { Child(z, zlink);
+	      switch( type(z) )
+	      {
+	        case RECEPTIVE:
+		
+		  if( non_blocking(z) )
+		  { zlink = PrevDown(zlink);
+		    DeleteNode(z);
+		  }
+		  else
+		  { y = z;
+		    goto SUSPEND;
+		  }
+		  break;
+
+
+	        case RECEIVING:
+		
+		  if( non_blocking(z) )
+		  { zlink = PrevDown(zlink);
+		    while( Down(z) != z )
+		    { Child(tmp, Down(y));
+		      if( opt_components(tmp) != nilobj )
+		      { DisposeObject(opt_components(tmp));
+		        opt_components(tmp) = nilobj;
+		        debug3(DOG, D, "AttachGalley(%s) de-optimizing %s %s",
+			  SymName(actual(hd)), SymName(actual(tmp)), "(join)");
+		      }
+		      DetachGalley(tmp);
+		      KillGalley(tmp, FALSE);
+		    }
+		    DeleteNode(z);
+		  }
+		  else
+		  { y = z;
+		    goto SUSPEND;
+		  }
+		  break;
+
+
+	        case GAP_OBJ:
+		
+		  if( !join(gap(z)) )  zlink = PrevDown(hd);
+		  break;
+
+
+	        default:	break;
+	      }
+	    }
+
+	    /* if HCAT, try vertical hyphenation (vertical galleys only) */
+	    if( type(y) == HCAT )  VerticalHyphenate(y);
+	  }
+
+
+	  /* check availability of parallel space for the first component */
+	  why = nilobj;
+	  Constrained(dest, &c, dim, &why);
+	  debug3(DGF, DD, "  dest parallel Constrained(%s, %s) = %s",
+	    EchoObject(dest), dimen(dim), EchoConstraint(&c));
+	  if( !FitsConstraint(back(y, dim), fwd(y, dim), c) )
+	  { BOOLEAN scaled;
+
+	    /* if forcing galley doesn't fit, try scaling first component */
+	    scaled = FALSE;
+	    if( force_gall(hd) && size(y, dim) > 0 )
+	    { int scale_factor;
+	      scale_factor = ScaleToConstraint(back(y,dim), fwd(y,dim), &c);
+	      if( scale_factor > 0.5 * SF )
+	      {	char num1[20], num2[20];
+		sprintf(num1, "%.1fc", (float) size(y, dim) / CM);
+		sprintf(num2, "%.1fc", (float) bfc(c) / CM);
+		if( dim == ROWM )
+		  Error(19, 4, "%s object too high for %s space; %s inserted",
+		    WARN, &fpos(y), num1, num2, KW_SCALE);
+		else
+		  Error(19, 5, "%s object too wide for %s space; %s inserted",
+		    WARN, &fpos(y), num1, num2, KW_SCALE);
+		y = InterposeScale(y, scale_factor, dim);
+		scaled = TRUE;
+	      }
+	    }
+
+	    /* otherwise we must reject, and warn the user */
+	    if( !scaled )
+	    {
+	      debug3(DGA, D, "  reject: vsize %s,%s in %s; y=",
+		EchoLength(back(y, dim)), EchoLength(fwd(y, dim)),
+		EchoConstraint(&c));
+	      ifdebug(DGA, D, DebugObject(y));
+	      goto REJECT;
+	    }
+
+	  }
+
+	  /* check availability of perpendicular space for first component */
+	  if( dim == ROWM )
+	  { perp_back = back(hd, 1-dim);  perp_fwd = fwd(hd, 1-dim);
+	  }
+	  else
+	  { perp_back = back(y, 1-dim);  perp_fwd = fwd(y, 1-dim);
+	  }
+	  Constrained(dest, &c, 1-dim, &junk);
+	  debug3(DGF, DD, "  dest perpendicular Constrained(%s, %s) = %s",
+	    EchoObject(dest), dimen(1-dim), EchoConstraint(&c));
+	  if( !FitsConstraint(perp_back, perp_fwd, c) )
+	  { BOOLEAN scaled;
+
+	    /* if forcing galley doesn't fit, try scaling first component */
+	    scaled = FALSE;
+	    if( force_gall(hd) && perp_back + perp_fwd > 0 )
+	    { int scale_factor;
+	      scale_factor = ScaleToConstraint(perp_back, perp_fwd, &c);
+	      if( scale_factor > 0.5 * SF )
+	      {	char num1[20], num2[20];
+		sprintf(num1, "%.1fc", (float) (perp_back + perp_fwd) / CM);
+		sprintf(num2, "%.1fc", (float) bfc(c) / CM);
+		if( 1-dim == ROWM )
+		  Error(19, 6, "%s object too high for %s space; %s inserted",
+		    WARN, &fpos(y), num1, num2, KW_SCALE);
+		else
+		  Error(19, 7, "%s object too wide for %s space; %s inserted",
+		    WARN, &fpos(y), num1, num2, KW_SCALE);
+		y = InterposeScale(y, scale_factor, 1-dim);
+		scaled = TRUE;
+	      }
+	    }
+
+	    /* otherwise we must reject, and warn the user */
+	    if( !scaled )
+	    {
+	      debug3(DGA, D, "  reject: vsize %s,%s in %s; y=",
+		EchoLength(perp_back), EchoLength(perp_fwd),
+		EchoConstraint(&c));
+	      ifdebug(DGA, D, DebugObject(y));
+	      goto REJECT;
+	    }
+
+	  }
+
+	  /* dest seems OK, so perform its size adjustments */
+	  debug0(DSA, D, "calling AdjustSize from AttachGalley (a)");
+	  AdjustSize(dest, back(y, dim), fwd(y, dim), dim);
+	  debug0(DSA, D, "calling AdjustSize from AttachGalley (b)");
+	  AdjustSize(dest, perp_back, perp_fwd, 1-dim);
+
+
+	  /* now check parallel space for target_galley in target */
+	  Constrained(target, &c, dim, &why);
+	  debug3(DGF, DD, "  target parallel Constrained(%s, %s) = %s",
+	    EchoObject(target), dimen(dim), EchoConstraint(&c));
+	  Child(z, LastDown(target_galley));  /* works in all cases? */
+	  assert( !is_index(type(z)), "AttachGalley: is_index(z)!" );
+	  assert( back(z, dim)>=0 && fwd(z, dim)>=0, "AttachGalley: z size!" );
+	  if( !FitsConstraint(back(z, dim), fwd(z, dim), c) )
+	  { BOOLEAN scaled;
+
+	    debug2(DGA, D, "  why     = %d %s", (int) why, EchoObject(why));
+	    debug2(DGA, D, "  limiter = %d %s", (int) limiter(hd),
+	      EchoObject(limiter(hd)));
+
+	    /* if forcing galley doesn't fit, try scaling z */
+	    scaled = FALSE;
+	    if( force_gall(hd) && size(z, dim) > 0 && limiter(hd) != why )
+	    { int scale_factor;
+	      scale_factor = ScaleToConstraint(back(z,dim), fwd(z,dim), &c);
+	      if( scale_factor > 0.5 * SF )
+	      {	char num1[20], num2[20];
+		sprintf(num1, "%.1fc", (float) size(z, dim) / CM);
+		sprintf(num2, "%.1fc", (float) bfc(c) / CM);
+		if( dim == ROWM )
+		  Error(19, 8, "%s object too high for %s space; %s inserted",
+		    WARN, &fpos(y), num1, num2, KW_SCALE);
+		else
+		  Error(19, 9, "%s object too wide for %s space; %s inserted",
+		    WARN, &fpos(y), num1, num2, KW_SCALE);
+		z = InterposeWideOrHigh(z, dim);
+		z = InterposeScale(z, scale_factor, dim);
+		scaled = TRUE;
+	      }
+	    }
+
+	    if( !scaled )
+	    {
+	      limiter(hd) = why;
+	      debug3(DGA, D, "  set limiter(%s) = %d %s", SymName(actual(hd)),
+		(int) limiter(hd), EchoObject(limiter(hd)));
+	      debug3(DGA, D, "  reject: size was %s,%s in %s; y =",
+		EchoLength(back(z, dim)), EchoLength(fwd(z, dim)),
+		EchoConstraint(&c));
+	      ifdebug(DGA, D, DebugObject(y));
+	      goto REJECT;
+	    }
+	  }
+	  limiter(hd) = why;
+	  debug3(DGA, D, "  set limiter(%s) = %d %s", SymName(actual(hd)),
+	    (int) limiter(hd), EchoObject(limiter(hd)));
+
+	  /* now check perpendicular space for target_galley in target */
+	  Constrained(target, &c, 1-dim, &junk);
+	  debug3(DGF, DD, "  target perpendicular Constrained(%s, %s) = %s",
+	    EchoObject(target), dimen(1-dim), EchoConstraint(&c));
+	  Child(z, LastDown(target_galley));  /* works in all cases? */
+	  assert( !is_index(type(z)), "AttachGalley: is_index(z)!" );
+	  assert( back(z, 1-dim)>=0 && fwd(z, 1-dim)>=0,
+	    "AttachGalley: z size (perpendicular)!" );
+	  if( !FitsConstraint(back(z, 1-dim), fwd(z, 1-dim), c) )
+	  { BOOLEAN scaled;
+
+	    /* if forcing galley doesn't fit, try scaling z */
+	    scaled = FALSE;
+	    if( force_gall(hd) && size(z, 1-dim) > 0 )
+	    { int scale_factor;
+	      scale_factor = ScaleToConstraint(back(z,1-dim), fwd(z,1-dim), &c);
+	      if( scale_factor > 0.5 * SF )
+	      {	char num1[20], num2[20];
+		sprintf(num1, "%.1fc", (float) size(z, 1-dim) / CM);
+		sprintf(num2, "%.1fc", (float) bfc(c) / CM);
+		if( 1-dim == ROWM )
+		  Error(19, 10, "%s object too high for %s space; %s inserted",
+		    WARN, &fpos(y), num1, num2, KW_SCALE);
+		else
+		  Error(19, 11, "%s object too wide for %s space; %s inserted",
+		    WARN, &fpos(y), num1, num2, KW_SCALE);
+		z = InterposeWideOrHigh(z, 1-dim);
+		z = InterposeScale(z, scale_factor, 1-dim);
+		scaled = TRUE;
+	      }
+	    }
+
+	    if( !scaled )
+	    {
+	      debug3(DGA, D, "  reject: size was %s,%s in %s; y =",
+		EchoLength(back(z, 1-dim)), EchoLength(fwd(z, 1-dim)),
+		EchoConstraint(&c));
+	      ifdebug(DGA, D, DebugObject(y));
+	      goto REJECT;
+	    }
+	  }
+
+	  /* target seems OK, so adjust sizes and accept */
+	  if( external_hor(target) )
+	  {
+	    /* don't adjust any sizes, none to adjust */
+	    debug0(DSA, D, "not calling AdjustSize from AttachGalley (c)");
+	  }
+	  else if( external_ver(target) )
+	  {
+	    /* adjust perp size only, to galley size */
+	    debug0(DSA, D, "calling AdjustSize from AttachGalley (d)");
+	    AdjustSize(target, back(target_galley, 1-dim),
+	      fwd(target_galley, 1-dim), 1-dim);
+	  }
+	  else
+	  {
+	    /* adjust both directions, using z (last component) */
+	    Child(z, LastDown(target_galley));
+	    debug0(DSA, D, "AttachGalley AdjustSize using z =");
+	    ifdebug(DSA, D, DebugObject(z));
+	    debug0(DSA, D, "calling AdjustSize from AttachGalley (e)");
+	    AdjustSize(target, back(z, dim), fwd(z, dim), dim);
+	    debug0(DSA, D, "calling AdjustSize from AttachGalley (f)");
+	    AdjustSize(target, back(z, 1-dim), fwd(z, 1-dim), 1-dim);
+	  }
+
+	  goto ACCEPT;
+
+
+	default:
+	    
+	  assert1(FALSE, "AttachGalley:", Image(type(y)));
+	  break;
+
+      } /* end switch */
+    } /* end for */
+
+    /* null galley: promote whole galley without expanding the target */
+    debug0(DGA, D, "  null galley");
+    if( tg_inners != nilobj )  DisposeObject(tg_inners), tg_inners = nilobj;
+    DisposeObject(target_galley);
+    LeaveErrorBlock(FALSE);
+    debug0(DYY, D, "] LeaveErrorBlock(FALSE) (null galley)");
+
+    /* kill off any null objects within the galley, then transfer it */
+    /* don't use Promote() since it does extra unwanted things here  */
+    for( link = Down(hd);  link != hd;  link = NextDown(link) )
+    { Child(y, link);
+      switch( type(y) )
+      {
+
+	case GAP_OBJ:
+	case CLOSURE:
+	case CROSS:
+	case FORCE_CROSS:
+	case NULL_CLOS:
+	case PAGE_LABEL:
+	
+	  link = PrevDown(link);
+	  debug1(DGA, D, "  null galley, disposing %s", Image(type(y)));
+	  DisposeChild(NextDown(link));
+	  break;
+
+	
+	default:
+	
+	  break;
+      }
+    }
+    TransferLinks(NextDown(hd), hd, Up(target_index));
+
+    /* attach hd temporarily to target_index */
+    MoveLink(Up(hd), target_index, PARENT);
+    assert( type(hd_index) == UNATTACHED, "AttachGalley: type(hd_index)!" );
+    DeleteNode(hd_index);
+
+    /* return; only hd_inners needs to be flushed now */
+    *inners = hd_inners;
+    debug0(DGA, D, "] AttachGalley returning ATTACH_NULL");
+    return ATTACH_NULL;
+
+
+    REJECT:
+	
+      /* reject first component */
+      /* debug1(DGA, D, "  reject %s", EchoObject(y)); */
+      debug0(DGA, D, "  reject first component");
+      LeaveErrorBlock(TRUE);
+      debug0(DYY, D, "] LeaveErrorBlock(TRUE) (REJECT)");
+      if( tg_inners != nilobj )  DisposeObject(tg_inners), tg_inners = nilobj;
+      DisposeObject(target_galley);
+      if( foll_or_prec(hd) == GALL_PREC && !sized(hd) )
+      {
+	/* move to just before the failed target */
+	MoveLink(Up(hd_index), Up(target_index), PARENT);
+      }
+      else
+      {
+	/* move to just after the failed target */
+	MoveLink(Up(hd_index), NextDown(Up(target_index)), PARENT);
+      }
+      continue;
+
+
+    SUSPEND:
+	
+      /* suspend at first component */
+      debug1(DGA, D, "  suspend %s", EchoIndex(y));
+      blocked(y) = TRUE;
+      LeaveErrorBlock(FALSE);
+      debug0(DYY, D, "] LeaveErrorBlock(FALSE) (SUSPEND)");
+      if( tg_inners != nilobj )  DisposeObject(tg_inners), tg_inners = nilobj;
+      DisposeObject(target_galley);
+      MoveLink(Up(hd_index), Up(target_index), PARENT);
+      if( was_sized )
+      { /* nothing new to flush if suspending and already sized */
+	if( hd_inners != nilobj )  DisposeObject(hd_inners), hd_inners=nilobj;
+	*inners = nilobj;
+      }
+      else
+      { /* flush newly discovered inners if not sized before */
+	*inners = hd_inners;
+      }
+      debug0(DGA, D, "] AttachGalley returning ATTACH_SUSPEND");
+      *suspend_pt = y;
+      return ATTACH_SUSPEND;
+
+
+    ACCEPT:
+	
+      /* accept first component; now committed to the attach */
+      debug3(DGA, D, "  accept %s %s %s", Image(type(y)), EchoObject(y),
+	EchoFilePos(&fpos(y)));
+      LeaveErrorBlock(TRUE);
+      debug0(DYY, D, "] LeaveErrorBlock(TRUE) (ACCEPT)");
+
+      /* attach hd to dest */
+      MoveLink(Up(hd), dest_index, PARENT);
+      assert( type(hd_index) == UNATTACHED, "AttachGalley: type(hd_index)!" );
+      DeleteNode(hd_index);
+
+      /* move first component of hd into dest */
+      /* nb Interpose must be done after all AdjustSize calls */
+      if( dim == ROWM && !external_ver(dest) )
+	Interpose(dest, VCAT, hd, y);
+      else if( dim == COLM && !external_hor(dest) )
+      { Interpose(dest, ACAT, y, y);
+	Parent(junk, Up(dest));
+	assert( type(junk) == ACAT, "AttachGalley: type(junk) != ACAT!" );
+	StyleCopy(save_style(junk), save_style(dest));
+	adjust_cat(junk) = padjust(save_style(junk));
+      }
+      Promote(hd, link == hd ? hd : NextDown(link), dest_index, TRUE);
+
+      /* move target_galley into target */
+      /* nb Interpose must be done after all AdjustSize calls */
+      if( !(external_ver(target) || external_hor(target)) )
+      {	Child(z, LastDown(target_galley));
+	Interpose(target, VCAT, z, z);
+      }
+      Promote(target_galley, target_galley, target_index, TRUE);
+      DeleteNode(target_galley);
+      assert(Down(target_index)==target_index, "AttachGalley: target_ind");
+      if( blocked(target_index) )  blocked(dest_index) = TRUE;
+      DeleteNode(target_index);
+
+      /* return; both tg_inners and hd_inners need to be flushed now;        */
+      /* if was_sized, hd_inners contains the inners of the first component; */
+      /* otherwise it contains the inners of all components, from SizeGalley */
+      if( tg_inners == nilobj ) *inners = hd_inners;
+      else if( hd_inners == nilobj ) *inners = tg_inners;
+      else
+      {	TransferLinks(Down(hd_inners), hd_inners, tg_inners);
+	DeleteNode(hd_inners);
+	*inners = tg_inners;
+      }
+      debug0(DGA, D, "] AttachGalley returning ATTACH_ACCEPT");
+      ifdebug(DGA, D,
+	if( dim == COLM && !external_hor(dest) )
+	{ OBJECT z;
+	  Parent(z, Up(dest));
+	  debug2(DGA, D, "  COLM dest_encl on exit = %s %s",
+	    Image(type(z)), EchoObject(z));
+	}
+      )
+      return ATTACH_ACCEPT;
+
+  } /* end for */
+} /* end AttachGalley */
diff --git a/z20.c b/z20.c
new file mode 100644
index 0000000..405599a
--- /dev/null
+++ b/z20.c
@@ -0,0 +1,971 @@
+/*@z20.c:Galley Flushing:DebugInnersNames()@**********************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z20.c                                                      */
+/*  MODULE:       Galley Flushing                                            */
+/*  EXTERNS:      FlushGalley()                                              */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+#if DEBUG_ON
+FULL_CHAR *DebugInnersNames(OBJECT inners)
+{ static FULL_CHAR buff[MAX_BUFF];
+  OBJECT link, y, z;
+  StringCopy(buff, STR_EMPTY);
+  if( inners != nilobj )
+  { for( link = Down(inners);  link != inners;  link = NextDown(link) )
+    { Child(y, link);
+      if( link != Down(inners) )  StringCat(buff, STR_SPACE);
+      switch( type(y) )
+      {
+
+        case RECEIVING:
+        case UNATTACHED:
+      
+	  assert( Down(y) != y, "DebugInnersNames: UNATTACHED!");
+	  Child(z, Down(y));
+          StringCat(buff, SymName(actual(z)));
+	  break;
+
+
+        case PRECEDES:
+        case GALL_PREC:
+        case DEAD:
+      
+	  StringCat(buff, Image(type(y)));
+	  break;
+
+
+        default:
+      
+	  assert1(FALSE, "DebugInnersNames:", Image(type(y)));
+	  break;
+      }
+    }
+  }
+  return buff;
+} /* end DebugInnersNames */
+#endif
+
+
+/*@::ParentFlush(), FlushGalley()@********************************************/
+/*                                                                           */
+/*  ParentFlush(prnt_flush, dest_index, kill)                                */
+/*                                                                           */
+/*  Flush the galley which is the parent of dest_index, if likely to flush.  */
+/*  If kill is TRUE, delete dest_index.                                      */
+/*                                                                           */
+/*****************************************************************************/
+
+static void ParentFlush(BOOLEAN prnt_flush, OBJECT dest_index, BOOLEAN kill)
+{ OBJECT prnt;
+  debug3(DGF, D, "ParentFlush(%s, %s, %s)",
+    bool(prnt_flush), EchoIndex(dest_index), bool(kill));
+  if( prnt_flush )
+  { Parent(prnt, Up(dest_index));
+    if( kill )  DeleteNode(dest_index);
+    debug0(DGF, D, "  calling FlushGalley from ParentFlush");
+    FlushGalley(prnt);
+  }
+  else if( kill )  DeleteNode(dest_index)
+  debug0(DGF, D, "ParentFlush returning.");
+} /* end ParentFlush */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FlushGalley(hd)                                                          */
+/*                                                                           */
+/*  Flush galley hd as far as possible.  It could be the root galley.        */
+/*                                                                           */
+/*****************************************************************************/
+
+void FlushGalley(OBJECT hd)
+{ OBJECT dest;			/* the target galley hd empties into         */
+  OBJECT dest_index;		/* the index of dest                         */
+  OBJECT inners;		/* list of galleys and PRECEDES to flush     */
+  OBJECT link, y;		/* for scanning through the components of hd */
+  int dim;			/* direction of galley                       */
+  CONSTRAINT dest_par_constr;	/* the parallel size constraint on dest      */
+  CONSTRAINT dest_perp_constr;	/* the perpendicular size constraint on dest */
+  int pb, pf, f;		/* candidate replacement sizes for dest      */
+
+  OBJECT dest_encl;		/* the VCAT or ACAT enclosing dest, if any   */
+  int    dest_side;		/* if dest_encl != nilobj, side dest is on   */
+  BOOLEAN need_adjust;		/* TRUE as soon as dest_encl needs adjusting */
+  FULL_LENGTH dest_back, dest_fwd; /* the current size of dest_encl or dest  */
+  FULL_LENGTH frame_size;	/* the total constraint of dest_encl         */
+  OBJECT prec_gap;		/* the gap preceding dest if any else nilobj */
+  OBJECT prec_def;		/* the component preceding dest, if any      */
+  OBJECT succ_gap;		/* the gap following dest if any else nilobj */
+  OBJECT succ_def;		/* the component following dest, if any      */
+  OBJECT stop_link;		/* most recently seen gap link of hd         */
+  FULL_LENGTH stop_back;        /* back(dest_encl) incl all before stop_link */
+  FULL_LENGTH stop_fwd;         /* fwd(dest_encl) incl. all before stop_link */
+  FULL_LENGTH stop_perp_back;   /* back(dest_encl) in other direction        */
+  FULL_LENGTH stop_perp_fwd;    /* fwd(dest_encl) in other direction         */
+  BOOLEAN prnt_flush;		/* TRUE when the parent of hd needs a flush  */
+  BOOLEAN target_is_internal;   /* TRUE if flushing into an internal target  */
+  OBJECT zlink, z, tmp, prnt;  int attach_status;  BOOLEAN remove_target;
+  OBJECT why;
+  FULL_LENGTH perp_back, perp_fwd;  /* current perp size of dest_encl        */
+
+  debug1(DGF, D, "[ FlushGalley %s (hd)", SymName(actual(hd)));
+  prnt_flush = FALSE;
+  dim = gall_dir(hd);
+
+  RESUME:
+  assert( type(hd) == HEAD, "FlushGalley: type(hd) != HEAD!" );
+  debug1(DGF, D, "  resuming FlushGalley %s, hd =", SymName(actual(hd)));
+  ifdebugcond(DGF, D, actual(hd) == nilobj, DebugGalley(hd, nilobj, 4));
+  assert( Up(hd) != hd, "FlushGalley: resume found no parent to hd!" );
+
+
+  /*@@************************************************************************/
+  /*                                                                         */
+  /*  The first step is to examine the parent of galley hd to determine the  */
+  /*  status of the galley.  If this is not suitable for flushing, we do     */
+  /*  what we can to change the status.  If still no good, return; so if     */
+  /*  this code does not return, then the galley is ready to flush into a    */
+  /*  destination in the normal way, and the following variables are set:    */
+  /*                                                                         */
+  /*     dest_index   the parent of the galley and index of its destination  */
+  /*     dest         the destination of the galley, a @Galley object        */
+  /*                                                                         */
+  /***************************************************************************/
+
+  Parent(dest_index, Up(hd));
+  switch( type(dest_index) )
+  {
+
+    case DEAD:
+    
+      /* the galley has been killed off while this process was sleeping */
+      debug1(DGF, D, "] FlushGalley %s returning (DEAD)", SymName(actual(hd)));
+      return;
+
+
+    case UNATTACHED:
+    
+      /* the galley is currently not attached to a destination */
+      attach_status = AttachGalley(hd, &inners, &y);
+      debug1(DGF, D, "  ex-AttachGalley inners: %s", DebugInnersNames(inners));
+      Parent(dest_index, Up(hd));
+      switch( attach_status )
+      {
+
+	case ATTACH_KILLED:
+
+	  assert(inners==nilobj, "FlushGalley/ATTACH_KILLED: inners!=nilobj!");
+	  debug1(DGF, D, "] FlushGalley %s returning (ATTACH_KILLED)",
+	    SymName(actual(hd)));
+	  debug1(DGF, D, "    prnt_flush = %s", bool(prnt_flush));
+	  return;
+
+
+	case ATTACH_INPUT:
+
+	  ParentFlush(prnt_flush, dest_index, FALSE);
+	  assert(inners==nilobj, "FlushGalley/ATTACH_INPUT: inners!=nilobj!");
+	  debug1(DGF, D, "] FlushGalley %s returning (ATTACH_INPUT)",
+	    SymName(actual(hd)));
+	  return;
+
+
+	case ATTACH_NOTARGET:
+
+	  ParentFlush(prnt_flush, dest_index, FALSE);
+	  assert(inners==nilobj, "FlushGalley/ATTACH_NOTARG: inners!=nilobj!");
+	  debug1(DGF, D, "] FlushGalley %s returning (ATTACH_NOTARGET)",
+	    SymName(actual(hd)));
+	  return;
+
+
+	case ATTACH_SUSPEND:
+
+	  /* AttachGalley only returns inners here if they really need to */
+	  /* be flushed; in particular the galley must be unsized before  */
+	  if( inners != nilobj )
+	  {
+	    debug0(DGF, D, "  calling FlushInners() from FlushGalley (a)");
+	    FlushInners(inners, nilobj);
+	    goto RESUME;
+	  }
+	  stop_link = nilobj;
+	  goto SUSPEND;	/* nb y will be set by AttachGalley in this case */
+
+
+	case ATTACH_NULL:
+
+	  /* hd will have been linked to the unexpanded target in this case */
+	  remove_target = (actual(actual(dest_index)) == whereto(hd));
+          if( force_gall(hd) )
+          {
+            /* if hd is a forcing galley, close all predecessors */
+	    debug3(DGA, D, "  forcing ATTACH_NULL case for %s into %s (%s)",
+	      SymName(actual(hd)), SymName(whereto(hd)),
+	      remove_target ? "remove_target" : "not remove_target");
+	    Parent(prnt, Up(dest_index));
+	    if( !non_blocking(dest_index) && remove_target )
+	    {
+	      /* ***
+	      prnt_flush = TRUE;
+	      *** */
+	      prnt_flush = non_blocking(dest_index) = TRUE;
+	    }
+	    FreeGalley(prnt, Up(dest_index), &inners, Up(dest_index),
+	      whereto(hd));
+          }
+          else
+	  {
+	    debug3(DGA, D, "  non-force ATTACH_NULL case for %s into %s (%s)",
+	      SymName(actual(hd)), SymName(whereto(hd)),
+	      remove_target ? "remove_target" : "not remove_target");
+	    if( blocked(dest_index) && remove_target )  prnt_flush = TRUE;
+	  }
+	  DetachGalley(hd);
+	  KillGalley(hd, TRUE);
+          if( inners != nilobj )
+	  {
+	    debug0(DGF, D, "  calling FlushInners() from FlushGalley (b)");
+	    FlushInners(inners, nilobj);
+	  }
+	  else ParentFlush(prnt_flush, dest_index, remove_target);
+	  debug0(DGF, D, "] FlushGalley returning ATTACH_NULL");
+	  return;
+
+
+	case ATTACH_ACCEPT:
+
+          /* if hd is a forcing galley, or actual(dest_index) is   */
+	  /* @ForceGalley, then close all predecessors             */
+          if( force_gall(hd) || actual(actual(dest_index)) == ForceGalleySym )
+          { Parent(prnt, Up(dest_index));
+	    debug1(DGA, D, "  forcing ATTACH_ACCEPT case for %s",
+	      SymName(actual(hd)));
+	    /* debug0(DGA, DD, "  force: prnt ="); */
+	    /* ifdebug(DGA, DD, DebugObject(prnt)); */
+	    /* debug1(DGA, D,"  calling FreeGalley from FlushGalley(%s)", */
+	    /*   SymName(actual(hd))); */
+	    if( !non_blocking(dest_index) )  prnt_flush = TRUE; /* bug fix */
+	    FreeGalley(prnt, Up(dest_index), &inners, Up(dest_index),
+	      whereto(hd));
+	    /* debug0(DGA, DD, "  force: after FreeGalley, prnt ="); */
+	    /* ifdebug(DGA, DD, DebugObject(prnt)); */
+          }
+          else prnt_flush = prnt_flush || blocked(dest_index);
+          debug1(DGF, D, "    force: prnt_flush = %s", bool(prnt_flush));
+          if( inners != nilobj )
+	  {
+	    debug0(DGF, D, "  calling FlushInners() from FlushGalley (c)");
+	    FlushInners(inners, nilobj);
+	  }
+          goto RESUME;
+
+
+	default:
+
+	  assert(FALSE, "FlushGalley: attach_status");
+	  break;
+
+      }
+      break;
+
+
+    case RECEIVING:
+    
+      if( actual(actual(dest_index)) == InputSym )
+      { ParentFlush(prnt_flush, dest_index, FALSE);
+	debug1(DGF, D, "] FlushGalley %s retn, input", SymName(actual(hd)));
+	return;
+      }
+      break;
+
+
+    default:
+    
+      assert1(FALSE, "FlushGalley: dest_index", Image(type(dest_index)));
+      break;
+  }
+  dest = actual(dest_index);
+  if( underline(dest) == UNDER_UNDEF )  underline(dest) = UNDER_OFF;
+  target_is_internal =
+    (dim==ROWM && !external_ver(dest)) || (dim==COLM && !external_hor(dest));
+  debug1(DGF, DD, "  dest_index: %s", EchoObject(dest_index));
+
+
+  /*@@************************************************************************/
+  /*                                                                         */
+  /*  The second step is to examine the components of the galley one by one  */
+  /*  to determine if they can be promoted.  Each component has the format   */
+  /*                                                                         */
+  /*    { <index> } <object>                                                 */
+  /*                                                                         */
+  /*  and is always followed by a gap object (except the last component).    */
+  /*  An index indicates that the following object has some interesting      */
+  /*  feature, and it points to that feature inside the object.  There are   */
+  /*  two possible actions for each component, in addition to accepting it:  */
+  /*                                                                         */
+  /*    REJECT:   The component does not fit, so detach the galley           */
+  /*    SUSPEND:  The component is incomplete; go to sleep and wait          */
+  /*                                                                         */
+  /***************************************************************************/
+
+  stop_link = dest_encl = inners = nilobj;
+  need_adjust = FALSE;
+
+  /***************************************************************************/
+  /*                                                                         */
+  /*  Loop invariant                                                         */
+  /*                                                                         */
+  /*  The children of hd up to but not including Child(link) have been       */
+  /*  examined and pronounced to be promotable, if unbreakable gaps are      */
+  /*  ignored.  When unbreakable gaps are taken into account, the most       */
+  /*  recent gap where a break is possible is at Child(stop_link), or        */
+  /*  nowhere if stop_link == nilobj.                                        */
+  /*                                                                         */
+  /*  Case 1:  target_is_internal == FALSE                                   */
+  /*                                                                         */
+  /*  If this flag is FALSE, it means that the target of this galley is      */
+  /*  external.  Consequently, there is no need to calculate sizes because   */
+  /*  there is no constraint on them.  Also, a REJECT action is impossible   */
+  /*  so unbreakable gaps are no impediment.  Variable dest_encl is nilobj.  */
+  /*                                                                         */
+  /*  Case 2:  target_is_internal == TRUE                                    */
+  /*                                                                         */
+  /*  If this flag is TRUE, it means that the target of this galley is       */
+  /*  internal.  Consequently, sizes need to be calculated, and unbreakable  */
+  /*  gaps need to be taken into account.  Variable dest_encl may be not     */
+  /*  nilobj, in which case the following variables are defined:             */
+  /*                                                                         */
+  /*    dest_encl        the object enclosing dest (which must exist)        */
+  /*    prec_gap         gap object preceding dest (which must exist)        */
+  /*    prec_def         first definite object preceding dest (must exist)   */
+  /*    dest_back        back(dest_encl) including effect of accepted compts */
+  /*    dest_fwd         fwd(dest_encl) including effect of accepted compts  */
+  /*    dest_side        BACK or FWD, i.e. which side of the mark dest is on */
+  /*    dest_par_constr  the parallel size constraint on dest                */
+  /*    dest_perp_constr the perpendicular size constraint on dest           */
+  /*    frame_size       size of frame enclosing dest_encl                   */
+  /*    perp_back        back(dest_encl) in other direction, incl accepteds  */
+  /*    perp_fwd         fwd(dest_encl) in other direction,  incl accepteds  */
+  /*                                                                         */
+  /*  if dest_encl is nilobj, these variables are not defined.               */
+  /*                                                                         */
+  /*  If stop_link is non-nilobj, then in the internal case dest_encl must   */
+  /*  be non-nilobj, and the following variables are defined:                */
+  /*                                                                         */
+  /*    stop_back        back(dest_encl) including all before stop_link      */
+  /*    stop_fwd         fwd(dest_encl)  including all before stop_link      */
+  /*    stop_perp_back   back(dest_encl) in other direction                  */
+  /*    stop_perp_fwd    fwd(dest_encl) in other direction                   */
+  /*                                                                         */
+  /*  need_adjust is true if at least one definite component has been        */
+  /*  accepted for promotion and the destination is internal; hence,         */
+  /*  dest_encl is defined and its size needs to be adjusted.                */
+  /*                                                                         */
+  /*  inners is the set of all PRECEDES and UNATTACHED indexes found.        */
+  /*                                                                         */
+  /***************************************************************************/
+
+  for( link = Down(hd);  link != hd;  link = NextDown(link) )
+  {
+    Child(y, link);
+    if( type(y) == SPLIT )  Child(y, DownDim(y, dim));
+    debug2(DGF, DD, "  examining %s %s", Image(type(y)), EchoObject(y));
+    switch( type(y) )
+    {
+
+      case GAP_OBJ:
+
+	underline(y) = underline(dest);
+	prec_gap = y;
+	if( target_is_internal )
+	{ assert( dest_encl != nilobj, "FlushGalley/GAP_OBJ: dest_encl!" );
+	  if( !nobreak(gap(prec_gap)) )
+	  {
+	    stop_link = link;
+	    stop_back = dest_back;
+	    stop_fwd  = dest_fwd;
+	    stop_perp_back = perp_back;
+	    stop_perp_fwd = perp_fwd;
+	  }
+	}
+	else stop_link = link;
+	if( !join(gap(y)) )  seen_nojoin(hd) = TRUE;
+	break;
+
+
+      case SCALE_IND:
+      case COVER_IND:
+      case EXPAND_IND:
+      case GALL_PREC:
+      case GALL_FOLL:
+      case GALL_FOLL_OR_PREC:
+      case GALL_TARG:
+      case CROSS_PREC:
+      case CROSS_FOLL:
+      case CROSS_FOLL_OR_PREC:
+      case CROSS_TARG:
+      case PAGE_LABEL_IND:
+
+	underline(y) = underline(dest);
+	break;
+
+
+      case PRECEDES:
+      case UNATTACHED:
+	  
+	if( inners == nilobj )  New(inners, ACAT);
+	Link(inners, y);
+	break;
+
+
+      case RECEIVING:
+      case RECEPTIVE:
+	  
+	goto SUSPEND;
+
+
+      case FOLLOWS:
+	  
+	Child(tmp, Down(y));
+	if( Up(tmp) == LastUp(tmp) )
+	{ link = PrevDown(link);
+	  DisposeChild(NextDown(link));
+	  break;
+	}
+	Parent(tmp, Up(tmp));
+	assert(type(tmp) == PRECEDES, "Flush: PRECEDES!");
+	switch( CheckComponentOrder(tmp, dest_index) )
+	{
+	  case CLEAR:	DeleteNode(tmp);
+			link = PrevDown(link);
+			DisposeChild(NextDown(link));
+			break;
+
+	  case PROMOTE:	break;
+
+	  case BLOCK:	goto SUSPEND;
+
+	  case CLOSE:	if( opt_components(hd) != nilobj )
+			{ DisposeObject(opt_components(hd));
+			  opt_components(hd) = nilobj;
+			  debug2(DOG, D, "FlushGalley(%s) de-optimizing %s",
+			    "(CLOSE problem)", SymName(actual(hd)));
+			}
+			debug1(DGF, D, "  reject (a) %s", EchoObject(y));
+			goto REJECT;
+	}
+	break;
+
+
+      case NULL_CLOS:
+      case PAGE_LABEL:
+      case WORD:
+      case QWORD:
+      case ONE_COL:
+      case ONE_ROW:
+      case WIDE:
+      case HIGH:
+      case HSHIFT:
+      case VSHIFT:
+      case HSCALE:
+      case VSCALE:
+      case HCOVER:
+      case VCOVER:
+      case HCONTRACT:
+      case VCONTRACT:
+      case HLIMITED:
+      case VLIMITED:
+      case HEXPAND:
+      case VEXPAND:
+      case START_HVSPAN:
+      case START_HSPAN:
+      case START_VSPAN:
+      case HSPAN:
+      case VSPAN:
+      case ROTATE:
+      case BACKGROUND:
+      case SCALE:
+      case KERN_SHRINK:
+      case INCGRAPHIC:
+      case SINCGRAPHIC:
+      case PLAIN_GRAPHIC:
+      case GRAPHIC:
+      case ACAT:
+      case HCAT:
+      case VCAT:
+      case ROW_THR:
+      case CLOSURE:
+      case CROSS:
+      case FORCE_CROSS:
+
+	underline(y) = underline(dest);
+	if( dim == ROWM )
+	{
+	  /* make sure y is not joined to a target below (vertical case only) */
+	  for( zlink = NextDown(link); zlink != hd; zlink = NextDown(zlink) )
+	  { Child(z, zlink);
+	    switch( type(z) )
+	    {
+	      case RECEPTIVE:
+	      case RECEIVING:	y = z;
+				goto SUSPEND;
+
+	      case GAP_OBJ:	if( !join(gap(z)) )  zlink = PrevDown(hd);
+				break;
+
+	      default:		break;
+	    }
+	  }
+
+	  /* try vertical hyphenation before anything else */
+	  if( type(y) == HCAT )  VerticalHyphenate(y);
+
+	}
+
+	/* check size constraint */
+	if( target_is_internal )
+	{
+	  /* initialise dest_encl etc if not done yet */
+	  if( dest_encl == nilobj )
+	  { assert( UpDim(dest,1-dim) == UpDim(dest,dim), "FlushG: UpDims!" );
+	    /* *** weird old code, trying for UpDim(dest, ROWM)?
+	    Parent(dest_encl, NextDown(Up(dest)));
+	    *** */
+	    Parent(dest_encl, Up(dest));
+	    debug4(DGF, D, "  flush dest = %s %s, dest_encl = %s %s",
+	      Image(type(dest)), EchoObject(dest),
+	      Image(type(dest_encl)), EchoObject(dest_encl));
+	    assert( (dim==ROWM && type(dest_encl)==VCAT) ||
+	            (dim==COLM && type(dest_encl)==ACAT),
+	      "FlushGalley: dest != VCAT or ACAT!" );
+	    SetNeighbours(Up(dest), FALSE, &prec_gap, &prec_def,
+	      &succ_gap, &succ_def, &dest_side);
+	    assert(prec_gap != nilobj || is_indefinite(type(y)),
+	      "FlushGalley: prec_gap == nilobj && !is_indefinite(type(y))!" );
+	    assert(succ_gap == nilobj, "FlushGalley: succ_gap != nilobj!" );
+	    assert(dest_side == FWD || is_indefinite(type(y)),
+	      "FlushGalley: dest_side != FWD || !is_indefinite(type(y))!");
+	    dest_back = back(dest_encl, dim);
+	    dest_fwd  = fwd(dest_encl, dim);
+	    perp_back = back(dest_encl, 1-dim);
+	    perp_fwd  = fwd(dest_encl, 1-dim);
+	    Constrained(dest_encl, &dest_par_constr, dim, &why);
+	    Constrained(dest_encl, &dest_perp_constr, 1-dim, &why);
+	    debug1(DGF, D, "  setting dest_perp_constr = %s",
+	      EchoConstraint(&dest_perp_constr));
+	    frame_size = constrained(dest_par_constr) ? bfc(dest_par_constr) :0;
+	  }
+
+	  if( !is_indefinite(type(y)) )
+	  {
+	    ifdebugcond(DGF, D,  mode(gap(prec_gap)) == NO_MODE,
+	      DebugGalley(hd, y, 4));
+
+	    /* calculate parallel effect of adding y to dest */
+	    f = dest_fwd  + fwd(y, dim) - fwd(prec_def, dim) +
+		  ActualGap(fwd(prec_def, dim), back(y, dim),
+			fwd(y, dim), &gap(prec_gap), frame_size,
+			dest_back + dest_fwd - fwd(prec_def, dim));
+	    debug5(DGF, D, "  f = %s + %s - %s + %s (prec_gap %s)",
+	      EchoLength(dest_fwd), EchoLength(fwd(y, dim)),
+	      EchoLength(fwd(prec_def, dim)), EchoLength(
+		  ActualGap(fwd(prec_def, dim), back(y, dim),
+			fwd(y, dim), &gap(prec_gap), frame_size,
+			dest_back + dest_fwd - fwd(prec_def, dim))
+	      ), EchoGap(&gap(prec_gap)));
+	    debug3(DGF, D, "  b,f: %s,%s;   dest_encl: %s",
+			EchoLength(dest_back), EchoLength(f),
+			EchoConstraint(&dest_par_constr));
+
+	    /* check new size against parallel constraint */
+	    if( (units(gap(prec_gap))==FRAME_UNIT && width(gap(prec_gap)) > FR)
+	        || !FitsConstraint(dest_back, f, dest_par_constr)
+		|| (opt_components(hd) != nilobj && opt_comps_permitted(hd)<=0)
+	      )
+	    {
+	      if( opt_components(hd) != nilobj )
+	      { OBJECT z;
+
+		/* record the size of this just-completed target area for hd */
+		New(z, WIDE);
+		CopyConstraint(constraint(z), dest_par_constr);
+		Link(opt_constraints(hd), z);
+		ifdebug(DOG, D,
+		  debug2(DOG, D, "FlushGalley(%s) adding constraint %s",
+		    SymName(actual(hd)), EchoConstraint(&constraint(z)));
+		  if( units(gap(prec_gap))==FRAME_UNIT &&
+		      width(gap(prec_gap)) > FR ) 
+		  { debug1(DOG, D, "  prec_gap = %s", EchoGap(&gap(prec_gap)));
+		  }
+		  if( !FitsConstraint(dest_back, f, dest_par_constr) )
+		  { debug3(DOG, D, "  !FitsConstraint(%s, %s, %s)",
+		      EchoLength(dest_back), EchoLength(f),
+		      EchoConstraint(&dest_par_constr));
+		  }
+		  if( opt_comps_permitted(hd) <= 0 )
+		  { debug1(DOG, D, "  opt_comps_permitted = %2d",
+		      opt_comps_permitted(hd));
+		  }
+		  debug4(DOG, D, "prec_gap = %s;  y = %s (%s,%s):",
+		    EchoGap(&gap(prec_gap)), Image(type(y)),
+		    EchoLength(back(y, dim)), EchoLength(fwd(y, dim)));
+		  DebugObject(y);
+		)
+
+		/* refresh the number of components permitted into the next target */
+		if( opt_counts(hd) != nilobj && Down(opt_counts(hd)) != opt_counts(hd) )
+		{ Child(z, Down(opt_counts(hd)));
+		  opt_comps_permitted(hd) += comp_count(z) - 1;
+		  DisposeChild(Up(z));
+		}
+		else opt_comps_permitted(hd) = MAX_FILES;  /* a large number */
+		debug1(DOG, D, "  REJECT permitted = %2d", opt_comps_permitted(hd));
+	      }
+	      debug1(DGF, D, "  reject (b) %s", EchoObject(y));
+	      goto REJECT;
+	    }
+
+	    /* calculate perpendicular effect of adding y to dest */
+	    if( seen_nojoin(hd) )
+	    {
+	      pb = 0;
+	      pf = find_max(perp_fwd,  size(y, 1-dim));
+	    }
+	    else
+	    {
+	      pb = find_max(perp_back, back(y, 1-dim));
+	      pf = find_max(perp_fwd,  fwd(y,  1-dim));
+	    }
+
+	    /* check new size against perpendicular constraint */
+	    if( !FitsConstraint(pb, pf, dest_perp_constr) )
+	    {
+	      if( opt_components(hd) != nilobj )
+	      { DisposeObject(opt_components(hd));
+		opt_components(hd) = nilobj;
+		debug1(DOG, D, "FlushGalley(%s) de-optimizing (perp problem)",
+		  SymName(actual(hd)));
+	      }
+	      if( dim == ROWM )
+	      {
+		Error(20, 3, "component too wide for available space",
+		  WARN, &fpos(y));
+		debug6(DGF, D, "  %s,%s [%s,%s] too wide for %s, y = %s",
+		  EchoLength(pb), EchoLength(pf),
+		  EchoLength(back(y, 1-dim)), EchoLength(fwd(y, 1-dim)),
+		  EchoConstraint(&dest_perp_constr), EchoObject(y));
+	      }
+	      debug1(DGF, D, "  reject (c) %s", EchoObject(y));
+	      goto REJECT;
+	    }
+
+	    /* accept definite component */
+	    dest_fwd = f;  prec_def = y;
+	    perp_back = pb;  perp_fwd = pf;
+	    need_adjust = TRUE;
+	    if( opt_components(hd) != nilobj )
+	    { opt_comps_permitted(hd)--;
+	      debug1(DOG, D, "  ACCEPT permitted = %2d", opt_comps_permitted(hd));
+	    }
+	  }
+	  /* accept indefinite component */
+	} /* end if( target_is_internal ) */
+
+	/* accept this component into dest, subject to following nobreaks */
+	debug3(DGF, D, "  t-accept %s %s %s", Image(type(y)), EchoObject(y),
+	  EchoFilePos(&fpos(y)));
+	prnt_flush = prnt_flush || blocked(dest_index);
+	debug1(DGF, DDD, "    prnt_flush = %s", bool(prnt_flush));
+	debug1(DGF, DDD, "    inners = %s", DebugInnersNames(inners));
+	if( inners != nilobj )
+	{ BOOLEAN promotable;  OBJECT tgp;
+
+	  /* We would prefer to promote right now, then give these inners */
+	  /* a chance.  However this is not possible unless the following */
+	  /* gap (if any) is breakable                                    */
+
+	  if( type(NextDown(link)) == LINK )
+	  { Child(tgp, NextDown(link));
+	    assert( type(tgp) == GAP_OBJ, "FlushGalley:  tgp!" );
+	    promotable = !nobreak(gap(tgp));
+	  }
+	  else promotable = TRUE;
+
+	  if( promotable )
+	  {
+	    Promote(hd, NextDown(link), dest_index, TRUE);
+	    if( need_adjust )
+	    { debug0(DSA, D, "  calling AdjustSize from FlushGalley (ACCEPT)");
+	      AdjustSize(dest_encl, dest_back, dest_fwd, dim);
+	      AdjustSize(dest_encl, perp_back, perp_fwd, 1-dim);
+	    }
+	    debug0(DGF, D, "  calling FlushInners() from FlushGalley (d)");
+	    FlushInners(inners, hd);
+	    goto RESUME;
+	  }
+	}
+	break;
+
+
+      default:
+	  
+	assert1(FALSE, "FlushGalley:", Image(type(y)));
+	break;
+
+    } /* end switch */
+  } /* end for */
+
+
+  /* EMPTY: */
+
+    /* galley is now completely accepted; clean up and exit */
+    debug0(DGF, D, "  galley empty now");
+    if( inners != nilobj )  DisposeObject(inners);
+    if( Down(hd) != hd )
+    { Promote(hd, hd, dest_index, TRUE);
+      if( need_adjust )
+      { debug0(DSA, D, "  calling AdjustSize from FlushGalley (EMPTY)");
+	AdjustSize(dest_encl, dest_back, dest_fwd, dim);
+	AdjustSize(dest_encl, perp_back, perp_fwd, 1-dim);
+      }
+    }
+    if( opt_components(hd) != nilobj )
+    { OBJECT z;
+      New(z, WIDE);
+      if( dest_encl != nilobj )
+        CopyConstraint(constraint(z), dest_par_constr);
+      else
+        SetConstraint(constraint(z),
+	  MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+      Link(opt_constraints(hd), z);
+      debug2(DOG, D, "FlushGalley(%s) empty adding constraint %s",
+        SymName(actual(hd)), EchoConstraint(&constraint(z)));
+    }
+    DetachGalley(hd);
+    debug0(DGF, D, "  calling KillGalley from FlushGalley");
+    KillGalley(hd, TRUE);
+    ParentFlush(prnt_flush, dest_index, TRUE);
+    debug1(DGF,D,"] FlushGalley %s returning (emptied).", SymName(actual(hd)));
+    return;
+
+
+  REJECT:
+  
+    /* reject this component and move to a new dest */
+    assert(actual(dest) != PrintSym, "FlushGalley: reject print!");
+    if( inners != nilobj )  DisposeObject(inners);
+    if( stop_link != nilobj )
+    { Promote(hd, stop_link, dest_index, TRUE);
+      if( need_adjust )
+      { debug0(DSA, D, "  calling AdjustSize from FlushGalley (REJECT)");
+	AdjustSize(dest_encl, stop_back, stop_fwd, dim);
+	AdjustSize(dest_encl, stop_perp_back, stop_perp_fwd, 1-dim);
+      }
+    }
+    DetachGalley(hd);
+    assert( type(dest_index) == RECEIVING, "FlushGalley/REJECT: dest_index!" );
+    prnt_flush = prnt_flush || blocked(dest_index);
+    DeleteNode(dest_index);
+    goto RESUME;
+
+
+  SUSPEND:
+  
+    /* suspend this component */
+    debug1(DGF, D, "  suspend %s", EchoIndex(y));
+    if( inners != nilobj )  DisposeObject(inners);
+    if( stop_link != nilobj )
+    { Promote(hd, stop_link, dest_index, TRUE);
+      if( need_adjust )
+      { debug0(DSA, D, "  calling AdjustSize from FlushGalley (SUSPEND)");
+	AdjustSize(dest_encl, stop_back, stop_fwd, dim);
+	AdjustSize(dest_encl, stop_perp_back, stop_perp_fwd, 1-dim);
+      }
+    }
+
+    /* check whether external galleys can remove the blockage */
+    if( type(y) == RECEPTIVE && ready_galls(hd) != nilobj && AllowCrossDb )
+    { OBJECT eg, val, index2, hd2, tag, seq, newsym;
+      BOOLEAN found, gall;  FULL_CHAR newtag[MAX_BUFF], newseq[MAX_BUFF];
+
+      /* get first ready galley in from cross reference database */
+      Child(eg, Down(ready_galls(hd)));
+      SwitchScope(nilobj);
+      val = ReadFromFile(eg_fnum(eg), eg_fpos(eg), eg_lnum(eg));
+      UnSwitchScope(nilobj);
+      if( val == nilobj )
+	Error(20, 1, "error in database file %s",
+	  FATAL, &fpos(y), FileName(eg_fnum(eg)));
+      assert( type(val) == CLOSURE, "AttachG: db CLOSURE!" );
+      New(index2, UNATTACHED);
+      pinpoint(index2) = nilobj;
+      New(hd2, HEAD);
+      FposCopy(fpos(hd2), fpos(val));
+      actual(hd2) = actual(val);
+      limiter(hd2) = nilobj;
+      opt_components(hd2) = opt_constraints(hd2) = nilobj;
+      gall_dir(hd2) = horiz_galley(actual(val));
+      sized(hd2) = FALSE;
+      ready_galls(hd2) = nilobj;
+      must_expand(hd2) = TRUE;
+      Link(index2, hd2);
+      Link(hd2, val);
+      SetTarget(hd2);
+      foll_or_prec(hd2) = GALL_FOLL;
+      enclose_obj(hd2) = (has_enclose(actual(hd2)) ? BuildEnclose(hd2) : nilobj);
+      Link(Up(y), index2);
+
+      /* set up the next ready galley for reading next time */
+      Child(tag, Down(eg));  Child(seq, LastDown(eg));
+      do /* skip duplicate seq values */
+      {	found = DbRetrieveNext(OldCrossDb, &gall, &newsym, newtag, newseq,
+		&eg_fnum(eg), &eg_fpos(eg), &eg_lnum(eg), &eg_cont(eg));
+	debug2(DGF, DD, "  ext gall  found:   %15s  gall:    %15s",
+			bool(gall), bool(found));
+	debug2(DGF, DD, "  ext gall  new sym: %15s  old sym: %15s",
+			SymName(newsym), SymName(eg_symbol(eg)));
+	debug2(DGF, DD, "  ext gall  new tag: %15s  old tag: %15s",
+			newtag, string(tag));
+	debug2(DGF, DD, "  ext gall  new seq: %15s  old seq: %15s",
+			newseq, string(seq));
+	if( found )  found = gall && newsym == eg_symbol(eg) &&
+			StringEqual(newtag, string(tag));
+
+	/* merge galleys whose seq strings are equal */
+	if( found && StringEqual(newseq, string(seq)) )
+	{
+	  SwitchScope(nilobj);
+	  val = ReadFromFile(eg_fnum(eg), eg_fpos(eg), eg_lnum(eg));
+	  UnSwitchScope(nilobj);
+	  if( val == nilobj )
+	    Error(20, 2, "error in database file %s",
+	      FATAL, &fpos(y), FileName(eg_fnum(eg)));
+	  assert( type(val) == CLOSURE, "AttachG: db CLOSURE!" );
+	  if( !has_merge(actual(val)) )  DisposeObject(val);
+	  else /* add val to hd2 */
+	  { if( type(hd2) != ACAT )
+	    { OBJECT tmp = hd2;
+	      New(hd2, ACAT);
+	      MoveLink(Up(tmp), hd2, CHILD);
+	      Link(hd2, tmp);
+	    }
+	    Link(hd2, val);
+	  }
+	}
+
+      } while( found && StringEqual(newseq, string(seq)) );
+      if( found )
+      {	DisposeChild(Up(tag));
+	DisposeChild(Up(seq));
+	tag = MakeWord(WORD, newtag, no_fpos);
+	seq = MakeWord(WORD, newseq, no_fpos);
+	Link(eg, tag);  Link(eg, seq);
+	debug1(DGF, DD, "  another ext gall: into %s", SymName(newsym));
+      }
+      else
+      {	DisposeChild(Up(eg));
+	debug1(DGF, DD, "  last ext gall into ", SymName(eg_symbol(eg)));
+	if( Down(ready_galls(hd)) == ready_galls(hd) )
+	{ Dispose(ready_galls(hd));
+	  ready_galls(hd) = nilobj;
+	  debug0(DGF, DD, "  all ext galls exhausted");
+	}
+      }
+
+      /* flush the ready galley found above, and resume */
+      debug2(DGF, DD, "  ext gall FlushGalley (%s into %s)",
+	SymName(actual(hd2)), SymName(whereto(hd2)));
+      debug0(DGF, DD, "  calling FlushGalley from FlushGalley/SUSPEND");
+      if( type(hd2) == ACAT )
+	hd2 = ConvertGalleyList(hd2);
+      FlushGalley(hd2);
+      goto RESUME;
+    }
+    else if( type(y) == RECEPTIVE && trigger_externs(y) && AllowCrossDb )
+    { OBJECT sym, cr, ins, tag, seq, eg, cnt;  BOOLEAN found;
+      FULL_CHAR newseq[MAX_BUFF];  FILE_NUM tfnum;  long tfpos, tcont;
+      int tlnum;
+      debug1(DGF, DD, "  ext gall target %s", SymName(actual(actual(y))));
+      for( sym = FirstExternTarget(actual(actual(y)), &cnt);
+	     sym != nilobj;  sym = NextExternTarget(actual(actual(y)), &cnt) )
+      {
+	debug1(DGF, DD, "  ext gall gall_targ %s", SymName(sym));
+	cr = GallTargEval(sym, &fpos(actual(y)));
+	New(ins, GALL_TARG);
+	actual(ins) = cr;
+	Link(Up(y), ins);
+	Child(tag, LastDown(cr));
+	assert( is_word(type(tag)), "FlushGalley: cr is_word(type(tag))!" );
+	found = DbRetrieve(OldCrossDb, TRUE, sym, string(tag),
+		newseq, &tfnum, &tfpos, &tlnum, &tcont);
+	if( found )
+	{ if( ready_galls(hd) == nilobj )  New(ready_galls(hd), ACAT);
+	  New(eg, EXT_GALL);
+	  debug1(DGF, DD, "  ext gall retrieved: into %s", SymName(sym));
+	  eg_fnum(eg) = tfnum;
+	  eg_fpos(eg) = tfpos;
+	  eg_lnum(eg) = tlnum;
+	  eg_symbol(eg) = sym;
+	  eg_cont(eg) = tcont;
+	  tag = MakeWord(WORD, string(tag), no_fpos);
+	  Link(eg, tag);
+	  seq = MakeWord(WORD, newseq, no_fpos);
+	  Link(eg, seq);
+	  Link(ready_galls(hd), eg);
+	}
+      }
+      trigger_externs(y) = FALSE;
+      if( ready_galls(hd) != nilobj )  goto RESUME;
+    } /* end if external galleys */
+
+    /* if non-blocking, delete the index and resume */
+    if( type(y) == RECEPTIVE && non_blocking(y) )
+    { DeleteNode(y);
+      goto RESUME;
+    }
+    else if( type(y) == RECEIVING && non_blocking(y) )
+    {	
+      if( Down(y) == y )
+      {	DeleteNode(y);
+      }
+      else
+      {	Child(z, Down(y));
+	if( opt_components(z) != nilobj )
+	  GazumpOptimize(z, actual(y));
+	DetachGalley(z);
+      }
+      goto RESUME;
+    }
+
+    /* if all the above fail to remove the blockage, suspend */
+    blocked(y) = TRUE;
+    ParentFlush(prnt_flush, dest_index, FALSE);
+    debug1(DGF,D, "] FlushGalley %s returning (suspend)", SymName(actual(hd)));
+    return;
+
+} /* end FlushGalley */
diff --git a/z21.c b/z21.c
new file mode 100644
index 0000000..f0b38b8
--- /dev/null
+++ b/z21.c
@@ -0,0 +1,508 @@
+/*@z21.c:Galley Maker:SizeGalley()@*******************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z21.c                                                      */
+/*  MODULE:       Galley Maker                                               */
+/*  EXTERNS:      SizeGalley()                                               */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+/*****************************************************************************/
+/*                                                                           */
+/*  SizeGalley(hd, env, rows, joined, nonblock, trig, style, c, target,      */
+/*                                     dest_index, recs, inners, enclose)    */
+/*                                                                           */
+/*  Convert unsized galley hd into sized format.  The input parameters are:  */
+/*                                                                           */
+/*    hd          the galley to be converted                                 */
+/*    env         its environment (needs to be "held" while manifesting)     */
+/*    rows        TRUE if the resulting galley may have more than one row    */
+/*    joined      TRUE if the resulting galley must be simply joined         */
+/*    nonblock    Set the non_blocking() field of RECEPTIVEs to this value   */
+/*    trig        TRUE if indefinites of hd may trigger external galleys     */
+/*    *style      The initial style                                          */
+/*    *c          the width constraint hd should conform to                  */
+/*    target      if non-nilobj, expand indefinite objects to reveal a       */
+/*                @Galley within this symbol                                 */
+/*    enclose     If non-nilobj, enclose any @Galley symbol encountered      */
+/*                during manifesting by this symbol.                         */
+/*                                                                           */
+/*  The output parameters, in addition to the converted hd, are:             */
+/*                                                                           */
+/*    dest_index  the index of the @Galley found within target, if any       */
+/*    recs        list of all RECURSIVE indexes found (or nilobj if none)    */
+/*    inners      list of all UNATTACHED indexes found (or nilobj if none),  */
+/*                not including any that come after the target or InputSym.  */
+/*                                                                           */
+/*****************************************************************************/
+
+void SizeGalley(OBJECT hd, OBJECT env, BOOLEAN rows, BOOLEAN joined,
+BOOLEAN nonblock, BOOLEAN trig, STYLE *style, CONSTRAINT *c, OBJECT target,
+OBJECT *dest_index, OBJECT *recs, OBJECT *inners, OBJECT enclose)
+{ OBJECT y, link, z, crs, t, tlink, zlink, tmp, why;
+  OBJECT extras, tmp1, tmp2, bt[2], ft[2], hold_env;
+  BOOLEAN after_target;
+  
+  assert( type(hd) == HEAD && Down(hd) != hd, "SizeGalley: precondition!" );
+  assert( !sized(hd), "SizeGalley: already sized!" );
+  debug6(DGM, D, "SizeGalley(%s, -, %s, %s, %s, %s, -, %s, -, -, -), hd =",
+	SymName(actual(hd)), bool(rows), bool(joined), bool(nonblock),
+	bool(trig), EchoConstraint(c));
+  debug1(DGM, DD, "  env = %s", EchoObject(env));
+  ifdebug(DGM, D, DebugObject(hd));
+
+  /* manifest the child of hd, making sure it is simply joined if required */
+  Child(y, Down(hd));
+  tmp1 = target;
+  tmp2 = enclose;
+  crs = nilobj;
+  bt[COLM] = ft[COLM] = bt[ROWM] = ft[ROWM] = nilobj;
+  New(hold_env, ACAT);  Link(hold_env, env);
+  if( AllowCrossDb && type(y) == CLOSURE && has_optimize(actual(y))
+      && FindOptimize(y, env) )
+  {
+    SetOptimize(hd, style);
+  }
+  debug0(DOM, D, "  [ calling Manifest from SizeGalley");
+  if( joined )
+  { New(bt[COLM], THREAD);  New(ft[COLM], THREAD);
+    debug0(DGM, DD, "  SizeGalley calling Manifest (joined)");
+    y = Manifest(y, env, style, bt, ft, &tmp1, &crs, TRUE, must_expand(hd),
+      &tmp2, FALSE);
+    assert( Down(bt[COLM]) != bt[COLM] && Down(ft[COLM]) != ft[COLM],
+	"SizeGalley: threads!" );
+    Child(tmp1, Down(bt[COLM]));  Child(tmp2, Down(ft[COLM]));
+    if( Down(bt[COLM]) != LastDown(bt[COLM]) ||
+	  Down(ft[COLM]) != LastDown(ft[COLM]) || tmp1 != tmp2 )
+      Error(21, 1, "galley %s must have just one column mark",
+	FATAL, &fpos(y), SymName(actual(hd)) );
+    DisposeObject(bt[COLM]);  DisposeObject(ft[COLM]);
+  }
+  else
+  { debug0(DGM, DD, "  SizeGalley calling Manifest (not joined)");
+    y = Manifest(y, env, style, bt, ft, &tmp1, &crs, TRUE, must_expand(hd),
+      &tmp2, FALSE);
+  }
+  debug0(DOM, D, "  ] returning from Manifest in SizeGalley");
+  DisposeObject(hold_env);
+  debug0(DGM, DD, "SizeGalley: after manifesting, hd =");
+  ifdebug(DGM, DD, DebugObject(hd));
+
+  /* horizontally size hd */
+  debug0(DGM, DD, "SizeGalley horizontally sizing hd:");
+  New(extras, ACAT);
+  y = MinSize(y, COLM, &extras);
+
+  /* break hd if vertical galley */
+  if( gall_dir(hd) == ROWM )
+  {
+    CopyConstraint(constraint(hd), *c);
+    debug0(DOB, DD, "  calling BreakObject from SizeGalley");
+    debug0(DGM, DD, "  SizeGalley calling BreakObject:");
+    y = BreakObject(y, c);
+    if( !FitsConstraint(back(y, COLM), fwd(y, COLM), *c) )
+      Error(21, 13, "%s,%s object too wide for available space",
+        FATAL, &fpos(y), EchoLength(back(y, COLM)), EchoLength(fwd(y, COLM)));
+    back(hd, COLM) = back(y, COLM);
+    fwd(hd, COLM)  = fwd(y, COLM);
+    assert( FitsConstraint(back(hd, COLM), fwd(hd, COLM), *c),
+	"SizeGalley: BreakObject failed to fit!" );
+    debug2(DSF, DD, "MinSize(hd, COLM) = %s,%s",
+	  EchoLength(back(hd, COLM)), EchoLength(fwd(hd, COLM)) );
+  }
+
+  /* hyphenate hd if horizontal optimal galley says so */
+  else if( opt_components(hd) != nilobj && opt_hyph(hd) && type(y) == ACAT )
+  { debug0(DOG, D, "  SizeGalley calling Hyphenate()");
+    y = Hyphenate(y);
+  }
+
+  /* get the rows of hd to the top level, if required */
+  seen_nojoin(hd) = FALSE;
+  if( rows )
+  { /* OBJECT prev_gap = nilobj; */
+    debug0(DGM, DD, "SizeGalley cleaning up rows of hd:");
+    for( link = hd;  NextDown(link) != hd;  link = NextDown(link) )
+    { Child(y, NextDown(link));
+      debug2(DGM, DD, "  cleaning %s: %s", Image(type(y)), EchoObject(y));
+      switch( type(y) )
+      {
+	case GAP_OBJ:
+
+	  /* prev_gap = y; */
+	  if( !join(gap(y)) )  seen_nojoin(hd) = TRUE;
+	  break;
+
+
+	case VCAT:
+	  
+	  if( gall_dir(hd) == ROWM )
+	  { TransferLinks(Down(y), y, Up(y));
+	    DisposeChild(Up(y));
+	    link = PrevDown(link);
+	  }
+	  break;
+
+
+	case ACAT:
+	  
+	  if( gall_dir(hd) == COLM )
+	  { TransferLinks(Down(y), y, Up(y));
+	    DisposeChild(Up(y));
+	    link = PrevDown(link);
+	  }
+	  break;
+
+
+	case SPLIT:
+	  
+	  assert(Up(y)==LastUp(y), "SizeGalley COL_THR: Up(y)!=LastUp(y)!");
+	  Child(z, DownDim(y, ROWM));
+	  if( is_indefinite(type(z)) )
+	  {
+	    debug1(DGT, D, "SizeGalley setting external_ver(%s) to TRUE (a)",
+	      EchoObject(z));
+	    external_ver(z) = TRUE;
+	  }
+	  else if( type(z) == VCAT )
+	  { OBJECT hor, thor, clink, dlink;
+	    Child(hor, DownDim(y, COLM));
+	    assert( type(hor) == COL_THR, "SizeGalley: missing COL_THR!" );
+	    Parent(thor, UpDim(z, COLM));
+	    assert( hor == thor, "SizeGalley/SPLIT: hor != thor!" );
+	    clink = DownDim(y, COLM);
+	    dlink = UpDim(z, COLM);
+	    for( tlink = LastDown(z);  tlink != z;  tlink = PrevDown(tlink) )
+	    { Child(t, tlink);
+	      if( type(t) == GAP_OBJ )
+	      { Link(NextDown(link), t);
+	      }
+	      else
+	      {	New(tmp, SPLIT);
+		back(tmp, COLM) = back(hor, COLM);
+		fwd(tmp, COLM) = fwd(hor, COLM);
+		Link(NextDown(link), tmp);
+		Link(tmp, NextUp(clink));
+		Link(NextDown(dlink), t);
+		Link(tmp, t);
+	      }
+	    }
+	    DeleteLink(dlink);
+	    assert(Up(y)==LastUp(y), "SizeGalley COL_THR: Up(y) != LastUp(y)!");
+	    DisposeChild(Up(y));
+	    link = PrevDown(link);
+	  }
+	  break;
+
+
+	case CLOSURE:
+	case HEAD:
+	  
+	  if( gall_dir(hd) == COLM )
+	    external_hor(y) = TRUE;
+	  else
+	  {
+	    debug1(DGT, D, "SizeGalley setting external_ver(%s) to TRUE (b)",
+	      EchoObject(y));
+	    external_ver(y) = TRUE;
+	  }
+	  break;
+
+
+	default:
+	  
+	  break;
+      }
+    }
+  }
+
+  /* determine a scale factor for {} @Scale objects */
+  /* NB AdjustSize cannot be done correctly until after seen_nojoin is set */
+  for( link = Down(extras);  link != extras;  link = NextDown(link) )
+  { Child(y, link);
+    if( type(y) == SCALE_IND )
+    {
+      /* check that all is in order */
+      CONSTRAINT zc;  OBJECT t;  FULL_LENGTH b, f;
+      z = actual(y);
+      assert( type(z) == SCALE, "SizeObject: type(z) != SCALE!" );
+      assert( bc(constraint(z)) == 0, "SizeObject: bc(constraint(z)) != 0" );
+      assert( Down(z) != z, "SizeObject SCALE: Down(z) == z!" );
+      Child(t, Down(z));
+
+      /* use @Scale COLM size constraint to determine a suitable scale factor */
+      /* check that @Scale is not in a horizontal galley */
+      if( gall_dir(hd) == COLM )
+      { Error(21, 2, "%s with unspecified scale factor in horizontal galley",
+	  FATAL, &fpos(z), KW_SCALE);
+      }
+
+      Constrained(z, &zc, COLM, &why);
+      debug2(DGM, DD, "Constrained(%s, -, COLM) = %s", EchoObject(z),
+	EchoConstraint(&zc));
+      if( !constrained(zc) )
+      { Error(21, 3, "replacing infinite scale factor (unconstrained width) by 1.0",
+	  WARN, &fpos(z));
+	bc(constraint(z)) = fc(constraint(z)) = 1 * SF;
+      }
+      else if( size(t, COLM) == 0 )
+      { Error(21, 4, "replacing infinite scale factor (zero width object) by 1.0",
+	  WARN, &fpos(z));
+	bc(constraint(z)) = fc(constraint(z)) = 1 * SF;
+      }
+      else if( (float) bfc(zc) / size(t, COLM) > 100.0 )
+      { Error(21, 5, "replacing very large scale factor (over 100) by 1.0",
+	  WARN, &fpos(z));
+	bc(constraint(z)) = fc(constraint(z)) = 1 * SF;
+      }
+      else if( (float) bfc(zc) / size(t, COLM) < 0.01 )
+      { if( bfc(zc) == 0 )
+	  Error(21, 6, "object deleted (scale factor is zero)",
+	    WARN, &fpos(z));
+	else
+	  Error(21, 7, "object deleted (scale factor is smaller than 0.01)",
+	    WARN, &fpos(z));
+	bc(constraint(z)) = fc(constraint(z)) = 1 * SF;
+	tmp = MakeWord(WORD, STR_EMPTY, &fpos(t));
+	back(tmp, COLM) = fwd(tmp, COLM) = 0;
+	back(tmp, ROWM) = fwd(tmp, ROWM) = 0;
+	word_font(tmp) = word_colour(tmp) = word_language(tmp) = 0;
+	word_hyph(tmp) = FALSE;
+	ReplaceNode(tmp, t);
+	DisposeObject(t);
+	t = tmp;
+      }
+      else bc(constraint(z)) = fc(constraint(z)) = (bfc(zc) * SF)/size(t, COLM);
+
+      /* calculate scaled size and adjust */
+      b = (back(t, COLM) * fc(constraint(z))) / SF;
+      f = (fwd(t, COLM) * fc(constraint(z))) / SF;
+      debug3(DGM, DD, "AdjustSize(%s, %s, %s, COLM)", EchoObject(z),
+	EchoLength(b), EchoLength(f));
+      AdjustSize(z, b, f, COLM);
+
+      /* if already vertically sized (because inside @Rotate) adjust that */
+      if( vert_sized(z) )
+      { b = (back(t, ROWM) * fc(constraint(z))) / SF;
+	f = (fwd(t, ROWM) * fc(constraint(z))) / SF;
+	debug4(DGM, DD, "AdjustSize(%s, %s, %s, %s)", EchoObject(z),
+	  EchoLength(b), EchoLength(f), dimen(ROWM));
+	AdjustSize(z, b, f, ROWM);
+      }
+    }
+  }
+  DisposeObject(extras);
+
+  /* size the rows of hd and attach indices where needed */
+  debug0(DGM, DD, "  SizeGalley calling MinSize(ROWM):");
+  debug0(DGM, DD, "SizeGalley sizing rows of hd =");
+  ifdebug(DGM, DD, DebugObject(hd));
+  *recs = *inners = *dest_index = nilobj;
+  after_target = FALSE;
+  for( link = Down(hd);  link != hd;  link = NextDown(link) )
+  { Child(y, link);
+
+    if( type(y) == GAP_OBJ || is_index(type(y)) )  continue;
+    debug0(DGM, DDD, "  ROWM sizing:");
+    ifdebug(DGM, DDD, DebugObject(y));
+    New(extras, ACAT);
+    y = MinSize(y, ROWM, &extras);
+    debug3(DSF, DD, "MinSize( %s , ROWM ) = %s,%s", EchoObject(y),
+	  EchoLength(back(y, ROWM)), EchoLength(fwd(y, ROWM)) );
+    debug0(DGM, DDD, "  ROWM result:");
+    ifdebug(DGM, DDD, DebugObject(y));
+
+    /* now attach indexes in front of y */
+    for( zlink = Down(extras);  zlink != extras;  zlink = NextDown(zlink) )
+    { Child(z, zlink);
+      blocked(z) = FALSE;
+      /* debug1(DCR, DD, "  extra: %s", EchoObject(z)); */
+      debug2(DGM, DD, "  extra%s: %s",
+	after_target ? " after_target" : "", EchoObject(z));
+      switch( type(z) )
+      {
+	case RECEPTIVE:
+
+	  /* debug2(DCR, DD, "  ... uses_ext  = %s, trig = %s",
+	    bool(uses_extern_target(actual(actual(z)))), bool(trig)); */
+	  trigger_externs(z) = uses_extern_target(actual(actual(z))) && trig;
+	  non_blocking(z) = nonblock;
+	  if( actual(actual(z)) == GalleySym || actual(actual(z)) == ForceGalleySym )
+	    *dest_index = z;
+	  if( actual(actual(z)) == GalleySym || actual(actual(z)) == ForceGalleySym
+	    || actual(actual(z)) == InputSym )
+	    after_target = TRUE;
+	  break;
+
+
+	case RECURSIVE:
+
+	  if( *recs == nilobj )  New(*recs, ACAT);
+	  Link(*recs, z);
+	  break;
+
+
+	case UNATTACHED:
+
+	  if( !after_target )	/* *** new semantics *** */
+	  { if( *inners == nilobj )  New(*inners, ACAT);
+	    Link(*inners, z);
+	  }
+	  break;
+
+		
+	case SCALE_IND:
+	case EXPAND_IND:
+	case GALL_PREC:
+	case GALL_FOLL:
+	case GALL_FOLL_OR_PREC:
+	case GALL_TARG:
+	case CROSS_PREC:
+	case CROSS_FOLL:
+	case CROSS_FOLL_OR_PREC:
+	case CROSS_TARG:
+	case PAGE_LABEL_IND:
+
+	  debug1(DCR, DD, "  SizeGalley: %s", EchoObject(z));
+	  break;
+
+
+	case COVER_IND:
+
+	  /* adjust size of the COVER object, change it to @Scale etc. */
+	  { OBJECT cover, prnt, chld;  int dirn, thr_type, ok1, ok2, sf,subst, esubst;
+	    float sf1, sf2;  CONSTRAINT c;  FULL_LENGTH b, f;
+	    cover = actual(z);
+	    if( type(cover) == HCOVER )
+	    { dirn = COLM;
+	      thr_type = COL_THR;
+	      ok1 = VCAT;
+	      ok2 = VCAT;
+	      subst = HSCALE;
+	      esubst = ONE_COL;
+	    }
+	    else
+	    { dirn = ROWM;
+	      thr_type = ROW_THR;
+	      ok1 = ACAT;
+	      ok2 = HCAT;
+	      subst = VSCALE;
+	      esubst = ONE_ROW;
+	    }
+	    Parent(prnt, UpDim(cover, dirn));
+	    while( type(prnt) == SPLIT || type(prnt) == thr_type )
+	      Parent(prnt, UpDim(prnt, dirn));
+	    Child(chld, Down(cover));
+	    if( type(prnt) != ok1 && type(prnt) != ok2 )
+	    {
+	      Error(21, 8, "%s replaced by %s (mark not shared)",
+		WARN, &fpos(cover), Image(type(cover)), Image(subst));
+	      debug2(DGM, DDD, "  cover = %s %s", Image(type(cover)),
+		EchoObject(cover));
+	      debug1(DGM, DDD, "  prnt = %s:", Image(type(prnt)));
+	      ifdebug(DGM, DDD, DebugObject(prnt));
+	      type(cover) = subst;
+	    }
+	    else if( back(chld, dirn) == 0 && fwd(chld, dirn) == 0 )
+	    {
+	      /* empty object, this is treated as a no-op */
+	      type(cover) = esubst;
+	    }
+	    else if( back(chld, dirn) == 0 || fwd(chld, dirn) == 0 )
+	    { Error(21, 9, "%s replaced by %s (infinite scale factor)",
+		WARN, &fpos(cover), Image(type(cover)), Image(subst));
+	      type(cover) = subst;
+	    }
+	    else if( size(prnt, dirn) == 0 )
+	    { Error(21, 10, "%s replaced by %s (zero scale factor)",
+		WARN, &fpos(cover), Image(type(cover)), Image(subst));
+	      type(cover) = subst;
+	    }
+	    else /* sensible scale factor exists */
+	    {
+	      /* work out proposed scale factor and sizes for cover */
+	      sf1 = (float) back(prnt, dirn) / back(chld, dirn);
+	      sf2 = (float) fwd(prnt, dirn)  / fwd(chld, dirn);
+	      sf = find_max(sf1, sf2) * SF;
+	      b = (back(chld, dirn) * sf) / SF;
+	      f = (fwd(chld,  dirn) * sf) / SF;
+
+	      /* check whether new object fits */
+	      Constrained(cover, &c, dirn, &why);
+	      if( FitsConstraint(b, f, c) )
+	      {
+		/* it fits, so make cover a SCALE object with this size */
+		type(cover) = SCALE;
+		if( dirn == COLM )
+		{ bc(constraint(cover)) = sf;
+		  fc(constraint(cover)) = SF;
+		}
+		else
+		{ bc(constraint(cover)) = SF;
+		  fc(constraint(cover)) = sf;
+		}
+		AdjustSize(cover, b, f, dirn);
+	      }
+	      else
+	      { Error(21, 11, "%s replaced by %s (insufficient space)",
+		  WARN, &fpos(cover), Image(type(cover)), Image(subst));
+		type(cover) = subst;
+	      }
+	    }
+	  }
+	  break;
+
+
+	default:
+	  
+	  assert1(FALSE, "SizeGalley:", Image(type(z)));
+	  break;
+
+      }
+    }
+    TransferLinks(Down(extras), extras, link);
+    assert( Down(extras) == extras && Up(extras) == extras, "SizeG: extras!");
+    Dispose(extras);
+  }
+  
+  /* insinuate cross references */
+  if( crs != nilobj )
+  { 
+    debug1(DCR, DD, "SizeGalley insinuating %s", EchoObject(crs));
+    TransferLinks(Down(crs), crs, Down(hd));
+    DisposeObject(crs);
+  }
+
+  /* check that *dest_index was found if it was required, and exit */
+  if( target != nilobj && *dest_index == nilobj )
+    Error(21, 12, "unexpected absence of %s from the body of %s",
+      FATAL, &fpos(hd), SymName(target), SymName(actual(hd)));
+  debug3(DGM, D, "SizeGalley returning %s,%s  %s;  hd =",
+    EchoLength(back(hd, COLM)), EchoLength(fwd(hd, COLM)),
+    EchoConstraint(&constraint(hd)));
+  ifdebug(DGM, D, DebugGalley(hd, nilobj, 4));
+  sized(hd) = TRUE;
+
+} /* end SizeGalley */
diff --git a/z22.c b/z22.c
new file mode 100644
index 0000000..cbb6801
--- /dev/null
+++ b/z22.c
@@ -0,0 +1,1070 @@
+/*@z22.c:Galley Service:Interpose()@******************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z22.c                                                      */
+/*  MODULE:       Galley Service                                             */
+/*  EXTERNS:      Interpose(), FlushInners(), ExpandRecursives(),            */
+/*                Promote(), KillGalley(), FreeGalley(),                     */
+/*                SetTarget(), CheckComponentOrder()                         */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  Interpose(z, typ, x, y)                                                  */
+/*                                                                           */
+/*  Insert a new typ object above z.  Its sizes are to be taken from x       */
+/*  (column) and y (row).                                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+void Interpose(OBJECT z, int typ, OBJECT x, OBJECT y)
+{ OBJECT encl;
+  New(encl, typ);
+  FposCopy(fpos(encl), fpos(y));
+  ReplaceNode(encl, z);  Link(encl, z);
+  back(encl, COLM) = back(x, COLM);
+  fwd(encl, COLM) = fwd(x, COLM);
+  back(encl, ROWM) = back(y, ROWM);
+  fwd(encl, ROWM) = fwd(y, ROWM);
+  underline(encl) = underline(z);
+} /* end Interpose */
+
+
+/*@::FlushInners()@***********************************************************/
+/*                                                                           */
+/*  FlushInners(inners, hd)                                                  */
+/*                                                                           */
+/*  Flush each galley on the list inners.  These have become flushable       */
+/*  by being promoted off the top of galley hd; if hd is the root galley,    */
+/*  identifiable by having PrintSym as target, do not flush inners at all.   */
+/*                                                                           */
+/*****************************************************************************/
+
+void FlushInners(OBJECT inners, OBJECT hd)
+{ OBJECT y, z, tmp, dest_index;
+
+  ifdebug(DGF, D,
+    OBJECT link;
+    fprintf(stderr, "dgf: [ FlushInners(");
+    for( link = Down(inners);  link != inners;  link = NextDown(link) )
+    {
+      Child(y, link);
+      fprintf(stderr, " %s", Image(type(y)));
+      switch( type(y) )
+      {
+
+        case DEAD:
+      
+	  break;
+
+
+        case RECEIVING:
+        case UNATTACHED:
+      
+	  if( Down(y) != y )	/* bug fix (was assert before) */
+	  { assert( Down(y) != y, "FlushInners: UNATTACHED!");
+	    Child(z, Down(y));
+	    fprintf(stderr, " %s", SymName(actual(z)));
+	  }
+	  break;
+
+
+        case PRECEDES:
+      
+	  break;
+
+
+        case GALL_PREC:
+
+	  break;
+
+
+        default:
+      
+	  break;
+      }
+    }
+    fprintf(stderr, ")\n");
+  )
+
+  /* check for root galley case */
+  if( hd != nilobj )
+  { assert( Up(hd) != hd, "FlushInners: Up(hd)!" );
+    Parent(dest_index, Up(hd));
+    if( actual(actual(dest_index)) == PrintSym )
+    { DisposeObject(inners);
+      debug0(DGF, D, "] FlushInners returning (PrintSym)");
+      return;
+    }
+  }
+
+  while( Down(inners) != inners )
+  { Child(y, Down(inners));
+    DeleteLink(Down(inners));
+    switch( type(y) )
+    {
+
+      case DEAD:
+      
+	break;
+
+
+      case RECEIVING:
+      case UNATTACHED:
+      
+	if( Down(y) != y )	/* bug fix (was assert before) */
+	{ assert( Down(y) != y, "FlushInners: UNATTACHED!");
+	  Child(z, Down(y));
+	  debug1(DGF,D,"  possibly calling FlushGalley %s from FlushInners (a)",
+	    SymName(actual(z)));
+	  if( whereto(z)==nilobj || !uses_extern_target(whereto(z)) ) /* &&& */
+	    FlushGalley(z);
+	}
+	break;
+
+
+      case PRECEDES:
+      
+	Child(tmp, Down(y));
+	if( Up(tmp) != LastUp(tmp) )
+	{ Parent(tmp, LastUp(tmp));
+	  assert(type(tmp)==FOLLOWS, "FlushInners: FOLLOWS!");
+	  if( blocked(tmp) )
+	  { blocked(tmp) = FALSE;
+	    Parent(z, Up(tmp));
+	    debug0(DGF, D, "  calling FlushGalley from FlushInners (b)");
+	    if( whereto(z)==nilobj || !uses_extern_target(whereto(z)) )/* &&& */
+	      FlushGalley(z);
+	  }
+	}
+	break;
+
+
+      case GALL_PREC:
+
+	/* someone else is looking after this now */
+	break;
+
+
+      default:
+      
+	assert1(FALSE, "FlushInners:", Image(type(y)));
+	break;
+    }
+  }
+  Dispose(inners);
+  debug0(DGF, D, "] FlushInners returning");
+} /* end FlushInners */
+
+
+/*@::ExpandRecursives()@******************************************************/
+/*                                                                           */
+/*  ExpandRecursives(recs)                                                   */
+/*                                                                           */
+/*  Expand each of the recursive definite objects in the list recs.          */
+/*                                                                           */
+/*****************************************************************************/
+
+void ExpandRecursives(OBJECT recs)
+{ CONSTRAINT non_c, hc, vc;
+  OBJECT target_index, target, z, n1, inners, newrecs, hd, tmp, env, why;
+  debug0(DCR, DD, "ExpandRecursives(recs)");
+  SetConstraint(non_c, MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+  n1 = nilobj;
+  assert(recs != nilobj, "ExpandRecursives: recs == nilobj!");
+  while( Down(recs) != recs )
+  { Child(target_index, Down(recs));  DeleteLink( Down(recs) );
+    assert( type(target_index) == RECURSIVE, "ExpandRecursives: index!" );
+    target = actual(target_index);
+    debug2(DCR, DD, "  expanding %s %s", Image(type(target_index)),
+      EchoObject(target));
+
+    /* expand body of target, convert to galley, and check size */
+    New(hd, HEAD);  actual(hd) = actual(target);  must_expand(hd) = TRUE;
+    force_gall(hd) = FALSE;
+    enclose_obj(hd) = limiter(hd) = nilobj;
+    opt_components(hd) = opt_constraints(hd) = nilobj;
+    gall_dir(hd) = horiz_galley(actual(target));
+    whereto(hd) = ready_galls(hd) = nilobj;
+    foll_or_prec(hd) = GALL_FOLL;
+    sized(hd) = FALSE;
+    tmp =  CopyObject(target, &fpos(target));  env = DetachEnv(tmp);
+    Link(hd, tmp);  Link(target_index, hd);
+    SizeGalley(hd, env, external_ver(target),
+      gall_dir(hd) == ROWM ? threaded(target) : FALSE, FALSE, FALSE,
+      &save_style(target), &non_c, nilobj, &n1, &newrecs, &inners, nilobj);
+    debug0(DCR, DDD, "    as galley:");
+    ifdebug(DCR, DDD, DebugObject(hd));
+    debug1(DGS, D, "[ ExpandRecursives calling Constrained(%s, COLM)",
+      EchoObject(target));
+    Constrained(target, &hc, COLM, &why);
+    debug2(DGS, D, "] ExpandRecursives Constrained(%s, COLM) = %s",
+      EchoObject(target), EchoConstraint(&hc));
+    debug3(DCR, DD, "    horizontal size: (%s, %s); constraint: %s",
+      EchoLength(back(hd, COLM)), EchoLength(fwd(hd, COLM)), EchoConstraint(&hc));
+    if( !FitsConstraint(back(hd, COLM), fwd(hd, COLM), hc) )
+    { DisposeChild(Up(hd));
+      if( inners != nilobj ) DisposeObject(inners);
+      if( newrecs != nilobj ) DisposeObject(newrecs);
+      DeleteNode(target_index);
+      debug0(DCR, DD, "    rejecting (too wide)");
+      continue;
+    }
+    if( !external_ver(target) )
+    { Constrained(target, &vc, ROWM, &why);
+      debug2(DSC, DD, "Constrained( %s, ROWM ) = %s",
+	EchoObject(target), EchoConstraint(&vc));
+      Child(z, LastDown(hd));
+      debug3(DCR, DD, "    vsize: (%s, %s); constraint: %s",
+	EchoLength(back(z, ROWM)), EchoLength(fwd(z, ROWM)), EchoConstraint(&vc));
+      if( !FitsConstraint(back(z, ROWM), fwd(z, ROWM), vc) )
+      {	DisposeChild(Up(hd));
+	if( inners != nilobj ) DisposeObject(inners);
+	if( newrecs != nilobj ) DisposeObject(newrecs);
+	DeleteNode(target_index);
+	debug0(DCR, DD, "    rejecting (too high)");
+	continue;
+      }
+    }
+
+    /* object fits; adjust sizes and promote */
+    debug0(DSA, D, "calling AdjustSize from ExpandRecursives (a)");
+    AdjustSize(target, back(hd, COLM), fwd(hd, COLM), COLM);
+    if( !external_ver(target) )
+    { debug0(DSA, D, "calling AdjustSize from ExpandRecursives (b)");
+      AdjustSize(target, back(z, ROWM), fwd(z, ROWM), ROWM);
+      Interpose(target, VCAT, z, z);
+    }
+    Promote(hd, hd, target_index, TRUE);  DeleteNode(hd);
+    DeleteNode(target_index);
+    if( inners != nilobj )
+    {
+      debug0(DGF, D, "  calling FlushInners from ExpandRecursives");
+      FlushInners(inners, nilobj);
+    }
+    if( newrecs != nilobj )  MergeNode(recs, newrecs);
+  } /* end while */
+  Dispose(recs);
+  debug0(DCR, DD, "ExpandRecursives returning.");
+} /* end ExpandRecursives */
+
+/*@::FindSplitInGalley()@*****************************************************/
+/*                                                                           */
+/*  static OBJECT FindSplitInGalley(hd)                                      */
+/*                                                                           */
+/*  Search simply joined galley hd for a SPLIT object, which must be there.  */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT FindSplitInGalley(OBJECT hd)
+{ OBJECT link, y;
+  debug0(DGF, D, "FindSplitInGalley(hd)");
+  for( link = Down(hd);  link != hd;  link = NextDown(link) )
+  { Child(y, link);
+    if( is_definite(type(y)) )  break;
+  }
+  if( link == hd )
+  { debug0(DGF, D, "FindSplitInGalley failing, no definite component; hd =");
+    ifdebug(DGF, D, DebugObject(hd));
+    Error(22, 1, "FindSplit: missing galley component", INTERN, &fpos(hd));
+  }
+  while( type(y) != SPLIT )  switch( type(y) )
+  {
+    case VCAT:
+    case ONE_ROW:
+    case WIDE:
+    case HIGH:
+    case HSHIFT:
+    case VSHIFT:
+    case VCONTRACT:
+    case VLIMITED:
+    case VEXPAND:
+
+      Child(y, Down(y));
+      break;
+
+
+    case CLOSURE:
+    case NULL_CLOS:
+    case PAGE_LABEL:
+    case HCAT:
+    case WORD:
+    case QWORD:
+    case ACAT:
+    case ROW_THR:
+    case COL_THR:
+    case ONE_COL:
+    case SCALE:
+    case KERN_SHRINK:
+    case HSCALE:
+    case VSCALE:
+    case HCOVER:
+    case VCOVER:
+    case HCONTRACT:
+    case HLIMITED:
+    case HEXPAND:
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case HSPAN:
+    case VSPAN:
+    case ROTATE:
+    case BACKGROUND:
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+
+      debug0(DGF, D, "FindSplitInGalley(hd) failing, hd =");
+      ifdebug(DGF, D, DebugObject(hd));
+      Error(22, 2, "FindSplitInGalley failed", INTERN, &fpos(y),Image(type(y)));
+      break;
+
+
+    default:
+    
+      assert1(FALSE, "FindSplitInGalley:", Image(type(y)));
+      break;
+
+  }
+  debug0(DGF, D, "FindSplitInGalley returning.");
+  return y;
+} /* end FindSplitInGalley */
+
+/*@::Promote()@***************************************************************/
+/*                                                                           */
+/*  Promote(hd, stop_link, dest_index, join_after)                           */
+/*                                                                           */
+/*  Promote components of galley hd into its destination (dest), up to but   */
+/*  not including the one linked to hd by link stop_link, which always       */
+/*  follows a component.  No size adjustments are made, except that when     */
+/*  two col_thr nodes are merged, a COLM adjustment is made to the result.   */
+/*                                                                           */
+/*  If the galley is ending here, Promote inserts a gap at the end of it.    */
+/*  Whether to make this a joining gap or not is a tricky question which     */
+/*  Promote answers by referring to join_after.                              */
+/*                                                                           */
+/*****************************************************************************/
+
+void Promote(OBJECT hd, OBJECT stop_link, OBJECT dest_index, BOOLEAN join_after)
+{
+  /* these two variables refer to the root galley only */
+  static BOOLEAN first = TRUE;	/* TRUE when the first component not written */
+  static OBJECT page_label=nilobj;	/* current page label object         */
+
+  OBJECT dest, link, y, z, tmp1, tmp2, why;  FULL_CHAR *label_string;
+  int dim;
+  debug1(DGS, DD, "Promote(%s, stop_link)", SymName(actual(hd)));
+
+  assert( type(hd) == HEAD, "Promote: hd!" );
+  assert( type(stop_link) == LINK || stop_link == hd, "Promote: stop_link!" );
+  assert( stop_link != Down(hd), "Promote: stop_link == Down(hd)!" );
+  type(dest_index) = RECEIVING;
+  dest = actual(dest_index);
+
+  /* insert final gap if galley is ending */
+  if( stop_link != hd )
+  { Child(y, stop_link);
+    assert( type(y) == GAP_OBJ, "Promote: missing GAP_OBJ!" );
+    stop_link = NextDown(stop_link);
+  }
+  else
+  { New(y, GAP_OBJ);
+    FposCopy(fpos(y), fpos(hd));
+    hspace(y) = 0;  vspace(y) = 1;
+    /* SetGap(gap(y), FALSE, FALSE, seen_nojoin(hd), FIXED_UNIT, NO_MODE, 0); */
+    /* SetGap(gap(y), FALSE, FALSE, threaded(dest), FIXED_UNIT, NO_MODE, 0); */
+    /* SetGap(gap(y), FALSE, FALSE, TRUE, FIXED_UNIT, NO_MODE, 0); */
+    /* ClearGap(gap(y)); */
+    SetGap(gap(y), FALSE, FALSE, join_after, FIXED_UNIT, NO_MODE, 0);
+    Link(stop_link, y);
+  }
+
+  /* if optimizing, add to dummy paragraph containing components and gaps */
+  if( opt_components(hd) != nilobj )
+  { OBJECT last, tmp;
+
+    debug1(DOG, DD, "Promote(%s) optimizing:", SymName(actual(hd)));
+    if( LastDown(opt_components(hd))!=opt_components(hd) && !opt_gazumped(hd) )
+    {
+      Child(last, LastDown(opt_components(hd)));
+    }
+    else last = nilobj;
+    for( link = Down(hd);  link != stop_link;  link = NextDown(link) )
+    { Child(y, link);
+      if( type(y) == GAP_OBJ )
+      {
+	if( last == nilobj )
+	{
+	  /* do nothing, gap cannot separate definite objects */
+	  debug1(DOG, DD, "  skipping initial GAP_OBJ %s", EchoGap(&gap(y)));
+	}
+	else if( type(last) == GAP_OBJ )
+	{
+	  /* previous gap must have preceded an indefinite, so overwrite it */
+	  FposCopy(fpos(last), fpos(y));
+	  debug2(DOG, DD, "  overwriting GAP_OBJ %s with %s",
+	    EchoGap(&gap(last)), EchoGap(&gap(y)));
+	  GapCopy(gap(last), gap(y));
+	  if( Down(last) != last )  DisposeChild(Down(last));
+	  if( Down(y) != y )
+	  { Child(tmp, Down(y));
+	    tmp = CopyObject(tmp, no_fpos);
+	    Link(last, tmp);
+	  }
+	  join(gap(last)) = TRUE;  /* irrelevant but improves debug output */
+	}
+	else
+	{
+	  /* previous was definite, so this gap must be stored */
+	  opt_gazumped(hd) = FALSE;
+	  New(last, GAP_OBJ);
+	  FposCopy(fpos(last), fpos(y));
+	  GapCopy(gap(last), gap(y));
+	  join(gap(last)) = TRUE;  /* irrelevant but improves debug output */
+	  hspace(last) = 1;
+	  vspace(last) = 0;
+	  Link(opt_components(hd), last);
+	  debug1(DOG, DD, "  adding GAP_OBJ %s", EchoGap(&gap(last)));
+	}
+      }
+      else if( is_word(type(y)) )
+      {
+	/* definite, must be stored */
+	opt_gazumped(hd) = FALSE;
+	last = MakeWord(type(y), string(y), &fpos(y));
+	back(last, COLM) = back(y, gall_dir(hd));
+	fwd(last, COLM) = fwd(y, gall_dir(hd));
+	word_font(last) = word_font(y);
+	word_colour(last) = word_colour(y);
+	word_language(last) = word_language(y);
+	word_hyph(last) = word_hyph(y);
+	Link(opt_components(hd), last);
+	debug2(DOG, DD, "  adding %s \"%s\"", Image(type(last)), string(last));
+      }
+      else if( is_indefinite(type(y)) )
+      {
+	/* indefinite, always skip these */
+	/* ***
+	New(z, NULL_CLOS);
+	FposCopy(fpos(z), fpos(y));
+	back(z, COLM) = 0;
+	fwd(z, COLM) = 0;
+	Link(opt_components(hd), z);
+	debug1(DOG, DD, "  adding %s", KW_NULL);
+	*** */
+      }
+      else if( is_definite(type(y)) )
+      {
+	/* definite other than WORD, add it */
+	opt_gazumped(hd) = FALSE;
+	last = MakeWord(QWORD, AsciiToFull("w"), &fpos(y));
+	back(last, COLM) = back(y, gall_dir(hd));
+	fwd(last, COLM) = fwd(y, gall_dir(hd));
+	Link(opt_components(hd), last);
+	debug1(DOG, DD, "  adding word for %s", EchoObject(y));
+      }
+    }
+    debug1(DOG, DD, "Promote(%s) end optimizing", SymName(actual(hd)));
+  }
+
+  /* error if promoting a seen_nojoin galley into a threaded destination */
+  if( seen_nojoin(hd) && gall_dir(hd) == ROWM && threaded(dest) )
+    Error(22, 3, "galley %s must have a single column mark",
+      FATAL, &fpos(hd), SymName(actual(hd)));
+
+  /* make nojoin status clear by adding an extra gap at start if needed */
+  if( gall_dir(hd) == ROWM && !external_ver(dest) && seen_nojoin(hd) &&
+      join(gap(y)) )
+  { OBJECT prnt, extra_null, extra_gap;
+
+    /* add nojoin gap at start */
+    Parent(prnt, Up(dest));  /* can't be threaded */
+    assert( type(prnt) == VCAT, "Promote: nojoin case, can't find VCAT" );
+    New(extra_null, NULL_CLOS);
+    back(extra_null, COLM) = fwd(extra_null, COLM) = 0;
+    back(extra_null, ROWM) = fwd(extra_null, ROWM) = 0;
+    New(extra_gap, GAP_OBJ);
+    hspace(extra_gap) = vspace(extra_gap) = 0;
+    SetGap(gap(extra_gap), FALSE, FALSE, FALSE, FIXED_UNIT, EDGE_MODE, 0);
+    Link(Down(prnt), extra_gap);
+    Link(Down(prnt), extra_null);
+    debug0(DGS, DD, "  Promote adding extra nojoin gap");
+    /* join(gap(y)) = FALSE; */
+  }
+
+
+  /* if promoting out of root galley, do special things */
+  if( actual(dest) == PrintSym )
+  { CONSTRAINT c;
+    link = hd;
+    while( NextDown(link) != stop_link )
+    { Child(y, NextDown(link));
+      debug2(DGS, DD, "root promote %s %s", Image(type(y)),
+	is_definite(type(y)) ? STR_EMPTY : EchoObject(y));
+      if( type(y) == SPLIT )  Child(y, DownDim(y, ROWM));
+      switch( type(y) )
+      {
+
+	case SCALE_IND:
+	case COVER_IND:
+	case PRECEDES:
+      
+	  DisposeChild(NextDown(link));
+	  break;
+	
+
+	case UNATTACHED:
+      
+	  assert( Down(y) != y, "FlushRootGalley: UNATTACHED!" );
+	  Child(z, Down(y));
+	  assert( type(z) == HEAD, "FlushRootGalley: unattached HEAD!" );
+	  if( sized(z) )
+	  {
+	    /* galley is part flushed, leave it here */
+	    link = NextDown(link);
+	  }
+	  else if( foll_or_prec(z) == GALL_PREC )
+	  {
+	    /* galley is preceding or foll_or_prec, send to CrossSequence */
+	    OBJECT t;
+	    type(y) = GALL_PREC;
+	    pinpoint(y) = nilobj;
+	    Child(t, Down(z));
+	    actual(y) = CrossMake(whereto(z), t, GALL_PREC);
+	    DisposeChild(Down(y));
+	    CrossSequence(actual(y));
+	    DisposeChild(NextDown(link));
+	  }
+	  else
+	  {
+	    /* galley was never attached, print message and kill it */
+	    Error(22, 4, "galley %s deleted (never attached)",
+	      WARN, &fpos(z), SymName(actual(z)));
+	    debug1(DGF, D, "never-attached galley %s:", EchoFilePos(&fpos(z)));
+	    ifdebug(DGF, D, DebugObject(z));
+	    KillGalley(z, FALSE);
+	    /* ***
+	    link = NextDown(link);
+	    *** */
+	  }
+	  break;
+
+
+	case EXPAND_IND:
+      
+	  /* expand @HExpand or @VExpand to occupy everything possible */
+	  dim = type(actual(y)) == HEXPAND ? COLM : ROWM;
+	  Constrained(actual(y), &c, dim, &why);
+	  if( constrained(c) )
+	  { FULL_LENGTH b = back(actual(y), dim);
+	    FULL_LENGTH f = fwd(actual(y), dim);
+	    EnlargeToConstraint(&b, &f, &c);
+	    debug1(DSA, D, "Promote %s AdjustSize", Image(type(actual(y))));
+	    AdjustSize(actual(y), b, f, dim);
+	  }
+	  DisposeChild(NextDown(link));
+	  break;
+
+
+	case PAGE_LABEL_IND:
+
+	  if( page_label != nilobj )
+	  { DisposeObject(page_label);
+	    page_label = nilobj;
+	  }
+	  Child(z, Down(y));
+	  assert( type(z) == PAGE_LABEL, "Promote: type(z) != PAGE_LABEL!" );
+	  assert( Down(z) != z, "Promote: PAGE_LABEL Down(z) == z!" );
+	  Child(page_label, Down(z));
+	  DeleteLink(Up(page_label));
+	  DisposeChild(NextDown(link));
+	  break;
+
+
+	case CROSS_PREC:
+	case CROSS_FOLL:
+	case CROSS_FOLL_OR_PREC:
+	case CROSS_TARG:
+	      
+	  debug2(DGS, DD, "root promote %s %s", Image(type(y)), EchoObject(y));
+	  /* NB NO BREAK */
+
+
+	case GALL_PREC:
+	case GALL_FOLL:
+	case GALL_FOLL_OR_PREC:
+	case GALL_TARG:
+
+	  CrossSequence(actual(y));
+	  DisposeChild(NextDown(link));
+	  break;
+
+
+	case WORD:
+	case QWORD:
+	case ONE_COL:
+	case ONE_ROW:
+	case WIDE:
+	case HIGH:
+	case HSHIFT:
+	case VSHIFT:
+	case HSCALE:
+	case VSCALE:
+	case HCOVER:
+	case VCOVER:
+	case HCONTRACT:
+	case VCONTRACT:
+	case HLIMITED:
+	case VLIMITED:
+	case HEXPAND:
+	case VEXPAND:
+	case START_HVSPAN:
+	case START_HSPAN:
+	case START_VSPAN:
+	case HSPAN:
+	case VSPAN:
+	case ROTATE:
+	case BACKGROUND:
+	case SCALE:
+	case KERN_SHRINK:
+	case INCGRAPHIC:
+	case SINCGRAPHIC:
+	case PLAIN_GRAPHIC:
+	case GRAPHIC:
+	case ACAT:
+	case HCAT:
+	case ROW_THR:
+
+	case CLOSURE:
+	case NULL_CLOS:
+	case PAGE_LABEL:
+	case CROSS:
+	case FORCE_CROSS:
+
+	  /* print this component */
+	  debug0(DGS, DD, "root promote definite or indefinite");
+	  if( !is_indefinite(type(y)) && size(y, ROWM) != 0 )
+	  {
+	    /* fix horizontally; work out which fonts needed */
+	    SetLengthDim(COLM);
+	    FixAndPrintObject(y, back(y, COLM), back(y, COLM), fwd(y, COLM),
+	      COLM, FALSE, 0, 0);
+
+	    /* print prefatory or page separating material, including fonts */
+	    label_string = page_label != nilobj && is_word(type(page_label)) ?
+	      string(page_label) : AsciiToFull("?");
+	    debug1(DGS, DD, "root promote definite; label_string = %s",
+	      label_string);
+	    debug1(DCR, D, "label_string = %s", label_string);
+	    if( first )
+	    { PrintBeforeFirst(size(hd, COLM), size(y, ROWM), label_string);
+	      first = FALSE;
+	    }
+	    else PrintBetween(size(hd, COLM), size(y, ROWM), label_string);
+	    if( page_label != nilobj )
+	    { DisposeObject(page_label);
+	      page_label = nilobj;
+	    }
+
+	    /* fix and print vertically */
+	    debug1(DGF,D, "  Promote calling FixAndPrint %s", Image(type(y)));
+	    debug3(DGP,D, "  Promote calling FixAndPrint %s %s,%s", dimen(ROWM),
+	      EchoLength(back(y,ROWM)), EchoLength(fwd(y, ROWM)));
+	    SetLengthDim(ROWM);
+	    FixAndPrintObject(y, back(y,ROWM), back(y, ROWM), fwd(y, ROWM),
+	      ROWM, FALSE, size(y, ROWM), 0);
+
+	  }
+	  DisposeChild(NextDown(link));
+
+	  /* scavenge any filter files now not needed */
+	  FilterScavenge(FALSE);
+	  break;
+
+
+	case GAP_OBJ:
+
+	  DisposeChild(NextDown(link));
+	  break;
+
+
+	default:
+      
+	  assert1(FALSE, "Promote:", Image(type(y)));
+	  break;
+	
+      }
+    }
+    debug0(DGS, DD, "Promote returning (root galley).");
+    return;
+  }
+
+  /* prepare the promotion */
+  if( external_ver(dest) && gall_dir(hd) == ROWM )
+  { if( threaded(dest) )
+    { Parent(tmp1, UpDim(dest, COLM));
+      assert( type(tmp1) == COL_THR, "Promote: tmp1 not COL_THR!" );
+      y = FindSplitInGalley(hd);
+      assert( type(y) == SPLIT, "Promote: FindSplitInGalley!" );
+      Child(tmp2, DownDim(y, COLM));
+      assert( type(tmp2) == COL_THR, "Promote: tmp2 not COL_THR!" );
+      if( tmp1 != tmp2 )
+      { FULL_LENGTH b = find_max(back(tmp1, COLM), back(tmp2, COLM));
+	FULL_LENGTH f = find_max(fwd(tmp1, COLM),  fwd(tmp2, COLM));
+	debug0(DSA, D, "calling AdjustSize(tmp1) from Promote (node merging)");
+	AdjustSize(tmp1, b, f, COLM);
+	debug0(DSA, D, "calling AdjustSize(tmp2) from Promote (node merging)");
+	AdjustSize(tmp2, b, f, COLM);
+	MergeNode(tmp1, tmp2);
+      }
+    }
+    link = Up(dest_index);
+  }
+  else if( external_hor(dest) && gall_dir(hd) == COLM )
+  { link = Up(dest_index);
+  }
+  else
+  { for( link = hd;  NextDown(link) != stop_link;  )
+    { Child(y, NextDown(link));
+      if( is_index(type(y)) )
+	MoveLink(NextDown(link), Up(dest_index), PARENT);
+      else link = NextDown(link);
+    }
+    assert( Down(hd) != stop_link, "Promote: Down(hd) == stop_link!" );
+    assert( UpDim(dest, ROWM) == UpDim(dest, COLM), "Promote: dims!" );
+    link = Up(dest);
+  }
+  
+  /* promote components */
+  TransferLinks(Down(hd), stop_link, link);
+
+  debug0(DGS, DD, "Promote returning.");
+} /* end Promote */
+
+
+/*@::MakeDead(), KillGalley()@************************************************/
+/*                                                                           */
+/*  static MakeDead(y)                                                       */
+/*                                                                           */
+/*  Convert object y into a DEAD object and remove it to the dead store.     */
+/*                                                                           */
+/*****************************************************************************/
+
+static void MakeDead(OBJECT y)
+{ static int	dead_count = 0;		/* number of DEAD objects seen       */
+  static OBJECT	dead_store = nilobj;	/* where DEAD objects are kept       */
+
+  debug1(DGS, DDD, "MakeDead( %s )", Image(type(y)));
+  if( dead_store == nilobj )  New(dead_store, ACAT);
+  type(y) = DEAD;
+  MoveLink(Up(y), dead_store, PARENT);
+  if( dead_count >= 150 )
+  { DisposeChild(Down(dead_store));
+  }
+  else dead_count++;
+  debug1(DGS, DDD, "MakeDead returning (dead_count = %d).", dead_count);
+} /* end MakeDead */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  KillGalley(hd, optimize)                                                 */
+/*                                                                           */
+/*  Kill galley hd, which may be sized or unsized.  The index of hd must     */
+/*  be UNATTACHED; it is moved out of its present location to a secret spot. */
+/*                                                                           */
+/*  If hd is to be optimized, generate all the stuff for the cross           */
+/*  reference database.  However, don't do this if optimize is FALSE, for    */
+/*  in that case hd is defective in some way and not optimizable.            */
+/*                                                                           */
+/*****************************************************************************/
+
+void KillGalley(OBJECT hd, BOOLEAN optimize)
+{ OBJECT prnt, link, y, z;
+  debug2(DGF, D, "[ KillGalley(Galley %s into %s)",
+	SymName(actual(hd)), SymName(whereto(hd)));
+  assert( type(hd) == HEAD && Up(hd) != hd, "KillGalley: precondition!" );
+  Parent(prnt, Up(hd));
+  assert( type(prnt) == UNATTACHED, "KillGalley: UNATTACHED precondition!" );
+  assert( Up(prnt) != prnt, "KillGalley: prnt!" );
+
+  /* delete any ready_galls that might be hanging about */
+  if( ready_galls(hd) != nilobj )
+  { DisposeObject(ready_galls(hd));
+    ready_galls(hd) = nilobj;
+  }
+
+  /* delete every remaining component */
+  for( link = hd; NextDown(link) != hd; )
+  { Child(y, NextDown(link));
+    switch( type(y) )
+    {
+      case RECEIVING:	while( Down(y) != y )
+			{ Child(z, Down(y));
+			  DetachGalley(z);
+			}
+			DeleteNode(y);
+			break;
+		
+      case RECEPTIVE:	assert( Down(y) == y, "KillGalley: RECEPTIVE!" );
+			DeleteNode(y);
+			break;
+
+      case UNATTACHED:	assert( Down(y) != y, "KillGalley: UNATTACHED!" );
+			Child(z, Down(y));  KillGalley(z, FALSE);
+			break;
+
+      case HEAD:	assert(FALSE, "KillGalley: head");
+			break;
+
+      default:		DisposeChild(NextDown(link));
+			break;
+    }
+  }
+
+  /* perform optimization calculations if required */
+  if( optimize && opt_components(hd) != nilobj )
+    CalculateOptimize(hd);
+
+  /* move index into dead_store */
+  MakeDead(prnt);
+  debug0(DGF, D, "] KillGalley returning.");
+} /* end KillGalley */
+
+
+/*@::FreeGalley()@************************************************************/
+/*                                                                           */
+/*  FreeGalley(hd, stop_link, inners, relocate_link, sym)                    */
+/*                                                                           */
+/*  Free galley hd up to but not including stop_link.  *Inners is well-      */
+/*  defined, either nilobj or an ACAT of galleys to be flushed.              */
+/*                                                                           */
+/*  Relocate_link defines what to do with any galley attached to one of the  */
+/*  freed targets.  If it is non-nilobj, galley hd is searched onwards from  */
+/*  it to see if a target can be found there.  If so, the galley is          */
+/*  relocated to just before that point.  If not, or if relocate_link is     */
+/*  nilobj, the galley is freed and added to *inners for flushing.  If the   */
+/*  whereto() of such galley is sym, it is freed, not relocated, because the */
+/*  cause of this call to FreeGalley is also targeted to sym, and it will    */
+/*  consume all possible targets of sym.                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void FreeGalley(OBJECT hd, OBJECT stop_link, OBJECT *inners,
+OBJECT relocate_link, OBJECT sym)
+{ OBJECT link, y, z, zlink, srch, index;
+  assert( type(hd) == HEAD && sized(hd), "FreeGalley: pre!");
+  assert( Up(hd) != hd, "FreeGalley: Up(hd)!" );
+  assert( *inners == nilobj || type(*inners) == ACAT, "FreeGalley: ACAT!" );
+  debug3(DGA, D, "[ FreeGalley(Galley %s into %s); rl %s nilobj",
+    SymName(actual(hd)), SymName(whereto(hd)),
+    relocate_link == nilobj ? "==" : "!=");
+
+  /* close targets and move or flush any inner galleys */
+  for( link = Down(hd);  link != stop_link;  link = NextDown(link) )
+  { Child(y, link);
+    if( type(y) == RECEIVING && actual(actual(y)) == InputSym )
+      Error(22, 5, "forcing galley after input point", WARN, &fpos(actual(y)));
+    else if( type(y) == RECEIVING )
+    {
+      /* either relocate or free each galley */
+      for( zlink = Down(y);  zlink != y; )
+      {	Child(z, zlink);
+	zlink = NextDown(zlink);
+	assert( type(z) == HEAD, "FreeGalley/RECEIVING: type(z) != HEAD!" );
+	debug1(DGA, D, "FreeGalley examining galley %s", SymName(actual(z)));
+	if( relocate_link != nilobj && whereto(z) != sym &&
+	    (srch = SearchGalley(relocate_link, whereto(z), TRUE,
+	    FALSE, TRUE, FALSE)) != nilobj )
+	{
+	  if( opt_components(z) != nilobj )  GazumpOptimize(z, actual(y));
+	  debug2(DGA, D, "  FreeGalley relocating %s to just before %s",
+	    SymName(actual(z)), SymName(whereto(z)));
+	  DetachGalley(z);
+	  Parent(index, Up(z));
+	  MoveLink(Up(index), Up(srch), PARENT);  /* just before new dest */
+	}
+	else
+	{ debug1(DGA, D, "  FreeGalley freeing galley %s", SymName(actual(z)));
+	  FreeGalley(z, z, inners, nilobj, sym);
+	  if( *inners == nilobj )  New(*inners, ACAT);
+	  Link(*inners, y);
+	}
+      }
+      non_blocking(y) = TRUE;
+    }
+    else if( type(y) == RECEPTIVE )
+    { non_blocking(y) = TRUE;
+    }
+  }
+  debug0(DGA, D, "] FreeGalley returning.");
+} /* end FreeGalley */
+
+
+/*@::SetTarget()@*************************************************************/
+/*                                                                           */
+/*  SetTarget(hd)                                                            */
+/*                                                                           */
+/*  Search for the target of unsized galley hd, and set the following:       */
+/*                                                                           */
+/*     whereto(hd)          The symbol which is this galley's target         */
+/*     foll_or_prec(hd)     GALL_FOLL, GALL_PREC, GALL_FOLL_OR_PREC          */
+/*     force_gall(hd)       TRUE is this is a forcing galley                 */
+/*                                                                           */
+/*****************************************************************************/
+
+void SetTarget(OBJECT hd)
+{ OBJECT x, y, link, cr, lpar, rpar, env;
+  BOOLEAN copied;
+  debug1(DGS, DD, "SetTarget(%s)", SymName(actual(hd)));
+  assert( type(hd) == HEAD, "SetTarget: type(hd) != HEAD!" );
+  Child(x, Down(hd));
+  assert( type(x) == CLOSURE, "SetTarget: type(x) != CLOSURE!" );
+  assert( has_target(actual(x)), "SetTarget: x has no target!" );
+
+  /* search the parameters of x for @Target */
+  cr = nilobj;
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( type(y) == PAR && is_target(actual(y)) )
+    { assert( Down(y) != y, "SetTarget: Down(PAR)!" );
+      Child(cr, Down(y));
+      break;
+    }
+  }
+
+  /* search the children of actual(x) for a default value of @Target */
+  if( cr == nilobj )
+  for( link = Down(actual(x));  link != actual(x);  link = NextDown(link) )
+  { Child(y, link);
+    if( is_target(y) )
+    { cr = sym_body(y);
+      break;
+    }
+  }
+  assert(cr != nilobj, "SetTarget:  cr == nilobj!");
+  
+  /* if cr is not a cross-reference, expand it until it is */
+  copied = FALSE;
+  if( !is_cross(type(cr)) )
+  { OBJECT nbt[2], nft[2], ntarget, ncrs, nenclose;
+    nbt[COLM] = nft[COLM] = nbt[ROWM] = nft[ROWM] = nilobj;
+    ntarget = ncrs = nenclose = nilobj;
+    cr = CopyObject(cr, &fpos(x));
+    copied = TRUE;
+    env = GetEnv(x);
+    cr = Manifest(cr, env, &InitialStyle, nbt, nft, &ntarget, &ncrs,
+           FALSE, FALSE, &nenclose, TRUE);
+  }
+
+  /* check that cr is now a cross-reference object */
+  debug1(DGS, DD, "SetTarget examining %s", EchoObject(cr));
+  debug1(DGS, DD, "  type(cr) = %s", Image( (int) type(cr)) );
+  if( !is_cross(type(cr)) )
+    Error(22, 6, "target of %s is not a cross reference",
+      FATAL, &fpos(cr), SymName(actual(x)));
+
+  /* determine which symbol is the target of this galley */
+  Child(lpar, Down(cr));
+  if( type(lpar) != CLOSURE )
+    Error(22, 7, "left parameter of %s is not a symbol",
+      FATAL, &fpos(lpar), KW_CROSS);
+  whereto(hd) = actual(lpar);
+
+  /* determine the direction from the right parameter */
+  Child(rpar, NextDown(Down(cr)));
+  if( !is_word(type(rpar)) )
+  {
+    Error(22, 8, "replacing %s%s? by %s%s%s", WARN, &fpos(rpar),
+      SymName(actual(lpar)), KW_CROSS,
+      SymName(actual(lpar)), KW_CROSS, KW_FOLLOWING);
+    foll_or_prec(hd) = GALL_FOLL;
+  }
+  else if( StringEqual(string(rpar), KW_PRECEDING) )
+     foll_or_prec(hd) = GALL_PREC;
+  else if( StringEqual(string(rpar), KW_FOLLOWING) )
+     foll_or_prec(hd) = GALL_FOLL;
+  else if( StringEqual(string(rpar), KW_FOLL_OR_PREC) )
+     foll_or_prec(hd) = GALL_FOLL_OR_PREC;
+  else
+  {
+    Error(22, 9, "replacing %s%s%s by %s%s%s",
+      WARN, &fpos(rpar), SymName(actual(lpar)), KW_CROSS,
+      string(rpar), SymName(actual(lpar)), KW_CROSS, KW_FOLLOWING);
+    foll_or_prec(hd) = GALL_FOLL;
+  }
+
+  /* determine whether this is a forcing galley */
+  force_gall(hd) = force_target(actual(hd)) || type(cr) == FORCE_CROSS;
+
+  if( copied )  DisposeObject(cr);
+} /* end SetTarget */
+
+
+/*@::CheckComponentOrder()@***************************************************/
+/*                                                                           */
+/*  int CheckComponentOrder(preceder, follower)                              */
+/*                                                                           */
+/*  Check the ordering relation between components preceder and follower,    */
+/*  and return its current status:                                           */
+/*                                                                           */
+/*      CLEAR     follower definitely follows preceder, and always will;     */
+/*      PROMOTE   follower is not prevented from following preceder;         */
+/*      CLOSE     follower must move down its galley to follow preceder;     */
+/*      BLOCK     follower cannot be guaranteed to follow preceder.          */
+/*                                                                           */
+/*****************************************************************************/
+
+int CheckComponentOrder(OBJECT preceder, OBJECT follower)
+{ OBJECT prec_galley, foll_galley, z;  int res;
+  debug2(DGS, DD, "CheckComponentOrder( %s, %s )",
+    EchoObject(preceder), EchoObject(follower));
+  Parent(prec_galley, Up(preceder));
+  Parent(foll_galley, Up(follower));
+  if( prec_galley == foll_galley )
+  { res = CLOSE;
+    for( z = Up(follower);  z != foll_galley;  z = pred(z, CHILD) )
+    if( z == Up(preceder) )
+    { res = CLEAR;
+      break;
+    }
+  }
+  else
+  { res = PROMOTE;
+    while( Up(prec_galley) != prec_galley )
+    { Parent(z, Up(prec_galley));	/* index of galley */
+      Parent(prec_galley, Up(z));	/* enclosing galley */
+      if( prec_galley == foll_galley )
+      {	res = BLOCK;
+	break;
+      }
+    }
+  }
+  debug1(DGS, DD, "CheckComponentOrder returning %s", Image(res));
+  return res;
+} /* end CheckComponentOrder */
diff --git a/z23.c b/z23.c
new file mode 100644
index 0000000..9b2a4d2
--- /dev/null
+++ b/z23.c
@@ -0,0 +1,1237 @@
+/*@z23.c:Galley Printer:ScaleFactor()@****************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z23.c                                                      */
+/*  MODULE:       Galley Printer                                             */
+/*  EXTERNS:      FixAndPrintObject()                                        */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define	NO_SUPPRESS	FALSE
+#define	SUPPRESS	TRUE
+#define word_equal(x, str)  (is_word(type(x)) && StringEqual(string(x), str))
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static float ScaleFactor(avail_size, inner_size)                         */
+/*                                                                           */
+/*  Return the scale factor for this scaling, or 0 if impossible.            */
+/*                                                                           */
+/*****************************************************************************/
+
+static float ScaleFactor(FULL_LENGTH avail_size, FULL_LENGTH inner_size)
+{ float scale_factor;
+  scale_factor = avail_size <= 0 ? 0 :
+		 inner_size <= 0 ? 0 : (float) avail_size / inner_size;
+  return scale_factor;
+}
+
+
+/*@::FindAdjustIncrement()@***************************************************/
+/*                                                                           */
+/*  static FULL_LENGTH FindAdjustIncrement(x, frame_size, dim)               */
+/*                                                                           */
+/*  Find the amount by which to increase the width of the subobjects of      */
+/*  concatenation object x so that it is adjusted to fill size frame_size.   */
+/*                                                                           */
+/*****************************************************************************/
+
+static FULL_LENGTH FindAdjustIncrement(OBJECT x, FULL_LENGTH frame_size,int dim)
+{ OBJECT y, link, prev, g;
+  int adjustable_gaps;  BOOLEAN jn;
+  FULL_LENGTH inc, mk, actual_size;
+
+  debug2(DGP, DD, "FindAdjustIncrement(x, %s, %s)",
+	EchoLength(frame_size), dimen(dim));
+  FirstDefinite(x, link, prev, jn);
+  if( link != x )
+  { adjustable_gaps = 0;
+    mk = back(prev, dim);
+    NextDefiniteWithGap(x, link, y, g, jn);
+    while( link != x )
+    { if ( mode(gap(g)) == TAB_MODE || units(gap(g)) == AVAIL_UNIT
+				    || units(gap(g)) == FRAME_UNIT )
+      {	debug0(DGP, DD, "FindAdjustIncrement returning 0 (tab gap)");
+	return 0;
+      }
+      mk += ActualGap(fwd(prev, dim), back(y, dim), fwd(y, dim), &gap(g),
+		frame_size, mk);
+      prev = y;
+      adjustable_gaps++;
+      NextDefiniteWithGap(x, link, y, g, jn);
+    }
+    actual_size = mk + fwd(prev, dim);
+    debug2(DGP, DD, "  actual_size = %s, adjustable_gaps = %d",
+	EchoLength(actual_size), adjustable_gaps);
+    inc = adjustable_gaps==0 ? 0 : (frame_size - actual_size) / adjustable_gaps;
+  }
+  else inc = 0;
+  debug1(DGP, DD, "FindAdjustIncrement returning %s", EchoLength(inc));
+  return inc;
+} /* end FindAdjustIncrement */
+
+
+/*@::FixAndPrintObject()@*****************************************************/
+/*                                                                           */
+/*  FixAndPrintObject(x, xmk, xb, xf, dim, suppress, pg, count)              */
+/*                                                                           */
+/*  Fix the absolute position of object x in dimension dim, in such a way    */
+/*  that the principal mark of x has coordinate xmk, and x has actual size   */
+/*  (xb, xf), where xb >= back(x, dim) and xf >= fwd(x, dim).                */
+/*                                                                           */
+/*  Actually, in the case where x includes an object lying on a thread       */
+/*  leading outside x, the final size of x may be different.  Because        */
+/*  of this, the procedure sets back(x, dim) and fwd(x, dim) to the actual   */
+/*  size of x upon return.  The caller assumes that x will exactly occupy    */
+/*  this space back(x, dim), fwd(x, dim).                                    */
+/*                                                                           */
+/*  The suppress parameter is true if a temporary suppression of adjustment  */
+/*  in this direction is in effect (because a neighbouring adjustment has    */
+/*  already been done).  This is for @HAdjust and @VAdjust, not @PAdjust.    */
+/*                                                                           */
+/*  If dim == COLM, the coordinate information is merely stored; but if      */
+/*  dim == ROWM, it is used to generate PostScript for printing x.           */
+/*                                                                           */
+/*  Parameter pg records the height of the current page.  This is used       */
+/*  to correct for the fact that Lout places its origin at the top left,     */
+/*  while PostScript places its origin at the bottom left.  This correction  */
+/*  cannot be made by transforming user space.                               */
+/*                                                                           */
+/*  x is child number count of its parent (used by COL_THR and ROW_THR only) */
+/*                                                                           */
+/*****************************************************************************/
+
+void FixAndPrintObject(OBJECT x, FULL_LENGTH xmk, FULL_LENGTH xb,
+  FULL_LENGTH xf, int dim, BOOLEAN suppress, FULL_LENGTH pg, int count)
+{ OBJECT y, link, prev, g, uplink, z, face, thr;
+  FULL_LENGTH mk, ymk, frame_size, back_edge, yb, yf, inc, f;
+  int i; float scale_factor;  BOOLEAN jn;
+  debug7(DGP, DD, "[ FixAndPrintObject(%s %s, %s, %s,%s, %s, %s, pg )",
+    Image(type(x)),
+    ((type(x) == WORD || type(x) == QWORD) ? string(x) : STR_EMPTY),
+    EchoLength(xmk), EchoLength(xb), EchoLength(xf),dimen(dim),
+    (suppress == SUPPRESS ? "suppress" : "no_suppress"));
+  debug2(DGP, DD, "  size(x) = %s,%s;  x =",
+    EchoLength(back(x, dim)), EchoLength(fwd(x, dim)));
+  ifdebug(DGP, DD, DebugObject(x));
+
+  /*** start and stop debugging
+  if( dim == COLM && is_word(type(x)) &&
+      StringEqual(string(x), AsciiToFull("STARTBUG")) )
+    dbg[DGP].on[DD] = dbg[DGP].on[D] = TRUE;
+  if( dim == COLM && is_word(type(x)) &&
+      StringEqual(string(x), AsciiToFull("STOPBUG")) )
+    dbg[DGP].on[DD] = dbg[DGP].on[D] = FALSE;
+  *** */
+
+
+  switch( type(x) )
+  {
+
+    case CLOSURE:
+    case NULL_CLOS:
+    case PAGE_LABEL:
+    case CROSS:
+    case FORCE_CROSS:
+    
+      back(x, dim) = xb;  fwd(x, dim) = xf;
+      break;
+
+
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+
+      CountChild(y, DownDim(x, dim), count);
+      if( type(y) == HSPANNER || type(y) == VSPANNER )
+      {
+        Child(z, Down(y));
+	Parent(thr, UpDim(x, dim));
+        debug7(DGP, DD, "  calling SPAN %s(xmk %s, x %s,%s, cons %s, z %s,%s)",
+	    dimen(dim), EchoLength(xmk),
+	    EchoLength(back(x, dim)), EchoLength(fwd(x, dim)),
+	    EchoConstraint(&constraint(y)),
+	    EchoLength(back(z, dim)), EchoLength(fwd(z, dim)));
+	/* ***
+	f = find_max(xf, fwd(z,dim));
+        FixAndPrintObject(z, xmk - back(thr, dim) + back(z, dim), back(z, dim),
+	  find_max(f, bfc(constraint(y)) - back(z, dim)),
+	  dim, FALSE, pg, 1);
+	*** */
+	debug5(DGP, DD, "  calling FAPO from %s (y = %s, bfc = %s, z = %s,%s",
+	  Image(type(x)), Image(type(y)), EchoLength(bfc(constraint(y))),
+	  EchoLength(back(z, dim)), EchoLength(fwd(z, dim)));
+	/* ***
+        FixAndPrintObject(z, xmk - back(thr, dim) + back(z, dim), back(z, dim),
+	  bfc(constraint(y)) - back(z, dim), dim, FALSE, pg, 1);
+	*** */
+        FixAndPrintObject(z, xmk - back(thr, dim) + back(z, dim), back(z, dim),
+	  find_max(fwd(z, dim), bfc(constraint(y)) - back(z, dim)),
+	  dim, FALSE, pg, 1);
+      }
+      else
+      {
+        FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+	back(x, dim) = back(y, dim);  fwd(x, dim) = fwd(y, dim);
+      }
+      break;
+
+
+    case HSPAN:
+    case VSPAN:
+
+      /* nothing to print, spanner beneath is already done */
+      break;
+
+
+    case WORD:
+    case QWORD:
+    
+      if( dim == COLM )
+      {
+	/* save horizontal position for PrintWord below */
+	word_save_mark(x) = xmk;
+
+	/* if first occurrence of this font on this page, notify font */
+	if( string(x)[0] != '\0' )
+	{ face = finfo[word_font(x)].original_font;
+	  if( font_page(face) < font_curr_page )
+	  { debug3(DFT, DD, "FAPO: x = %s, word_font = %d, face = %s",
+	      string(x), word_font(x), EchoObject(face));
+	    FontPageUsed(face);
+	  }
+	}
+      }
+      else
+      {
+	debug4(DGP, D, /* underline(x) == UNDER_UNDEF, */
+	  "  FAPO %s %s %s (underline = %s)", EchoFilePos(&fpos(x)),
+	  Image(type(x)),
+	  string(x), underline(x) == UNDER_OFF ? "UNDER_OFF" :
+		     underline(x) == UNDER_ON  ? "UNDER_ON" : "UNDER_UNDEF");
+	assert( underline(x) == UNDER_OFF || underline(x) == UNDER_ON,
+	  "FixAndPrintObject: underline(x)!" );
+	if( string(x)[0] != '\0' )
+	{ PrintWord(x, word_save_mark(x), pg - xmk);
+	  if( underline(x) == UNDER_ON )
+	  {
+	    FontWordSize(x);  /* to restore fwd(x, COLM) */
+	    PrintUnderline(word_font(x), word_save_mark(x),
+	      word_save_mark(x) + fwd(x, COLM), pg - xmk);
+	  }
+	}
+      }
+      back(x, dim) = xb;  fwd(x, dim) = xf;
+      break;
+
+
+    case WIDE:
+    case HIGH:
+    
+      CountChild(y, Down(x), count);
+      if( (dim == COLM) == (type(x) == WIDE) )
+      { yf = bfc(constraint(x)) - back(y, dim);
+        FixAndPrintObject(y, xmk, back(y,dim), yf, dim, NO_SUPPRESS, pg,count);
+        back(x, dim) = xb;  fwd(x, dim) = xf;
+      }
+      else
+      {	FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+	back(x, dim) = back(y, dim);  fwd(x, dim) = fwd(y, dim);
+      }
+      break;
+
+
+    case HSHIFT:
+    case VSHIFT:
+
+      CountChild(y, Down(x), count);
+      if( (dim == COLM) == (type(x) == HSHIFT) )
+      {
+	/* work out the size of the shift depending on the units */
+	f = FindShift(x, y, dim);
+	ymk = xmk - f;
+	yb = find_max(0, xb - f);
+	yf = find_max(0, xf + f);
+	FixAndPrintObject(y, ymk, yb, yf, dim, suppress, pg, count);
+
+	/* recalculate the size of x as in MinSize */
+	f = FindShift(x, y, dim);
+	back(x, dim) = find_min(MAX_FULL_LENGTH, find_max(0, back(y, dim) + f));
+	fwd(x, dim)  = find_min(MAX_FULL_LENGTH, find_max(0, fwd(y, dim)  - f));
+      }
+      else
+      {	FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+	back(x, dim) = back(y, dim);  fwd(x, dim) = fwd(y, dim);
+      }
+      break;
+
+
+    case HCONTRACT:
+    case VCONTRACT:
+    
+      CountChild(y, Down(x), count);
+      if( (dim == COLM) == (type(x) == HCONTRACT) )
+      {	FixAndPrintObject(y, xmk, back(y,dim), fwd(y,dim), dim,
+	  NO_SUPPRESS, pg, count);
+        back(x, dim) = xb;  fwd(x, dim) = xf;
+      }
+      else
+      {	FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+        back(x, dim) = back(y, dim);  fwd(x, dim) = fwd(y, dim);
+      }
+      break;
+
+
+    case ONE_COL:
+    case ONE_ROW:
+    case HLIMITED:
+    case VLIMITED:
+    case HEXPAND:
+    case VEXPAND:
+    
+      CountChild(y, Down(x), count);
+      if( (dim == COLM) == (type(x) == ONE_COL || type(x) == HEXPAND) )
+      { FixAndPrintObject(y, xmk, xb, xf, dim, NO_SUPPRESS, pg, count);
+        back(x, dim) = xb;  fwd(x, dim) = xf;
+      }
+      else
+      {	FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+	back(x, dim) = back(y, dim);  fwd(x, dim) = fwd(y, dim);
+      }
+      break;
+
+
+    case VSCALE:
+
+      debug0(DRS, DD, "FixAndPrintObject at VSCALE");
+      CountChild(y, Down(x), count);
+      switch( BackEnd )
+      {
+	case PLAINTEXT:
+
+	  break;
+
+
+	case POSTSCRIPT:
+	case PDF:
+
+          if( dim == COLM )
+            FixAndPrintObject(y, xmk, xb, xf, dim, NO_SUPPRESS, pg, count);
+          else if( (scale_factor = ScaleFactor(xb+xf, size(y, ROWM))) > 0 )
+          { SaveGraphicState(y);
+	    CoordTranslate(0, pg-(xmk-xb+(FULL_LENGTH) (back(y,ROWM)*scale_factor)));
+	    CoordScale(1.0, scale_factor);
+            FixAndPrintObject(y, 0, back(y,ROWM), fwd(y,ROWM), dim,
+	      NO_SUPPRESS, 0, count);
+	    RestoreGraphicState();
+          }
+          else if( !is_word(type(y)) || string(y)[0] != '\0' )
+            Error(23, 1, "object deleted (it cannot be scaled vertically)",
+	      WARN, &fpos(x));
+	  break;
+      }
+      back(x, dim) = xb;  fwd(x, dim) = xf;
+      break;
+
+
+    case HSCALE:
+    
+      debug0(DRS, DD, "FixAndPrintObject at HSCALE");
+      CountChild(y, Down(x), count);
+      switch( BackEnd )
+      {
+	case PLAINTEXT:
+
+	  break;
+
+
+	case POSTSCRIPT:
+	case PDF:
+
+          if( dim == COLM )
+          { save_mark(x) = xmk;
+	    bc(constraint(x)) = xb;
+	    fc(constraint(x)) = xf;
+            if( (scale_factor = ScaleFactor(xb+xf, size(y, COLM))) > 0 )
+	      FixAndPrintObject(y, 0, back(y, COLM), fwd(y, COLM), dim,
+		NO_SUPPRESS, pg, count);
+            else if( !is_word(type(y)) || string(y)[0] != '\0' )
+	      Error(23, 2, "object deleted (it cannot be scaled horizontally)",
+		WARN, &fpos(y));
+          }
+          else if( (scale_factor =
+	    ScaleFactor(bc(constraint(x))+fc(constraint(x)),size(y,COLM))) > 0 )
+          { SaveGraphicState(y);
+	    CoordTranslate(save_mark(x) - bc(constraint(x))
+	       + (FULL_LENGTH) (back(y, COLM)*scale_factor), 0);
+	    CoordScale(scale_factor, 1.0);
+            FixAndPrintObject(y, xmk, xb, xf, dim, NO_SUPPRESS, pg, count);
+	    RestoreGraphicState();
+          }
+	  break;
+      }
+      back(x, dim) = xb;  fwd(x, dim) = xf;
+      break;
+
+
+    case SCALE:
+
+      CountChild(y, Down(x), count);
+      switch( BackEnd )
+      {
+	case PLAINTEXT:
+
+	  /* printable only if scale factor is one */
+	  if( bc(constraint(x)) == SF && fc(constraint(x)) == SF )
+	  {
+	    FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+	  }
+	  break;
+
+
+	case POSTSCRIPT:
+	case PDF:
+
+          if( dim == COLM )
+          { assert( bc(constraint(x)) > 0, "FAPO: horizontal scale factor!" );
+	    save_mark(x) = xmk;
+	    yb = xb * SF / bc(constraint(x));
+	    yf = xf * SF / bc(constraint(x));
+            FixAndPrintObject(y, 0, yb, yf, dim, NO_SUPPRESS, pg, count);
+          }
+          else
+          { assert( fc(constraint(x)) > 0, "FAPO: vertical scale factor!" );
+	    yb = xb * SF / fc(constraint(x));
+	    yf = xf * SF / fc(constraint(x));
+	    SaveGraphicState(y);
+	    CoordTranslate(save_mark(x), pg - xmk);
+	    CoordScale( (float) bc(constraint(x))/SF,
+	      (float) fc(constraint(x))/SF);
+            FixAndPrintObject(y, 0, yb, yf, dim, NO_SUPPRESS,
+	      0, count);
+	    RestoreGraphicState();
+          }
+	  break;
+      }
+      back(x, dim) = xb;  fwd(x, dim) = xf;
+      break;
+
+
+    case KERN_SHRINK:
+
+      CountChild(y, LastDown(x), count);
+      if( dim == COLM )
+      { FixAndPrintObject(y, xmk, back(y,dim), fwd(y,dim), dim,
+	  NO_SUPPRESS, pg, count);
+      }
+      else
+      {	FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+        back(x, dim) = back(y, dim);  fwd(x, dim) = fwd(y, dim);
+      }
+      break;
+
+
+    case BACKGROUND:
+ 
+      /* this object has the size of its second child; but its first */
+      /* child gets printed too, in the same space                   */
+      CountChild(y, Down(x), count);
+      FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+      CountChild(y, LastDown(x), count);
+      FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+      break;
+
+
+    case ROTATE:
+    
+      CountChild(y, Down(x), count);
+      switch( BackEnd )
+      {
+	case PLAINTEXT:
+
+	  /* printable only if angle is zero */
+	  if( sparec(constraint(x)) == 0 )
+	  {
+	    FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+	  }
+	  break;
+
+
+	case POSTSCRIPT:
+	case PDF:
+
+          if( dim == COLM )
+          { CONSTRAINT colc, rowc, yc;
+            save_mark(x) = xmk;
+	    SetConstraint(colc, back(x,COLM), MAX_FULL_LENGTH, fwd(x,COLM));
+	    SetConstraint(rowc, back(x,ROWM), MAX_FULL_LENGTH, fwd(x,ROWM));
+	    RotateConstraint(&yc, y, sparec(constraint(x)), &colc, &rowc,COLM);
+	    FixAndPrintObject(y, 0, bc(yc), fc(yc), COLM,NO_SUPPRESS,pg,count);
+          }
+          else
+          { CONSTRAINT colc, rowc, yc;
+	    SaveGraphicState(y);
+	    CoordTranslate(save_mark(x), pg - xmk);
+	    CoordRotate(sparec(constraint(x)));
+	    SetConstraint(colc, back(x,COLM), MAX_FULL_LENGTH, fwd(x,COLM));
+	    SetConstraint(rowc, back(x,ROWM), MAX_FULL_LENGTH, fwd(x,ROWM));
+	    RotateConstraint(&yc, y, sparec(constraint(x)), &colc, &rowc, ROWM);
+	    FixAndPrintObject(y, 0, bc(yc), fc(yc), ROWM, NO_SUPPRESS,0,count);
+	    RestoreGraphicState();
+          }
+	  break;
+      }
+      back(x, dim) = xb;  fwd(x, dim) = xf;
+      break;
+
+
+    case PLAIN_GRAPHIC:
+
+      CountChild(y, LastDown(x), count);
+      switch( BackEnd )
+      {
+
+	case POSTSCRIPT:
+	case PDF:
+
+          FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+	  break;
+
+
+	case PLAINTEXT:
+
+          if( dim == COLM )
+          {
+	    back(x, dim) = xb;
+	    fwd(x, dim)  = xf;
+	    save_mark(x) = xmk - back(x, dim);
+	    debug2(DGP, DD, "PLAIN_GRAPHIC COLM storing size %s, %s",
+	      EchoLength(back(x, dim)), EchoLength(fwd(x, dim)));
+            FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+          }
+          else
+          { OBJECT tmp, pre, post;
+            Child(tmp, Down(x));
+            if( type(tmp) == VCAT )
+            { Child(pre, Down(tmp));
+              Child(post, LastDown(tmp));
+            }
+            else pre = tmp, post = nilobj;
+	    back(x, dim) = xb;
+	    fwd(x, dim)  = xf;
+            PrintPlainGraphicObject(pre, save_mark(x),
+	      pg - (xmk - back(x, dim)), x);
+            FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+            if( post != nilobj )
+	      PrintPlainGraphicObject(post, save_mark(x),
+		pg - (xmk - back(x, dim)), x);
+          }
+	  break;
+
+      } /* end switch */
+      back(x, dim) = xb;  fwd(x, dim) = xf;
+      break;
+
+
+    case GRAPHIC:
+    
+      CountChild(y, LastDown(x), count);
+      switch( BackEnd )
+      {
+	case PLAINTEXT:
+
+          FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+	  break;
+
+
+	case POSTSCRIPT:
+	case PDF:
+
+          if( dim == COLM )
+          {
+	    /* if first occurrence of this font on this page, notify font */
+	    if( font(save_style(x)) > 0 )
+	    { face = finfo[font(save_style(x))].original_font;
+	      if( font_page(face) < font_curr_page )  FontPageUsed(face);
+	    }
+
+	    back(x, dim) = xb;
+	    fwd(x, dim)  = xf;
+	    debug2(DGP, DD, "GRAPHIC COLM storing size %s, %s",
+	      EchoLength(back(x, dim)), EchoLength(fwd(x, dim)));
+	    save_mark(x) = xmk - back(x, COLM);
+            FixAndPrintObject(y, xb, xb, xf, dim, NO_SUPPRESS, pg, count);
+          }
+          else
+          { OBJECT tmp, pre, post;
+            Child(tmp, Down(x));
+            if( type(tmp) == VCAT )
+            { Child(pre, Down(tmp));
+              Child(post, LastDown(tmp));
+            }
+            else pre = tmp, post = nilobj;
+	    back(x, dim) = xb;
+	    fwd(x, dim)  = xf;
+
+	    SaveTranslateDefineSave(x, save_mark(x), pg - (xmk + fwd(x, ROWM)));
+	    /* ***
+            SaveGraphicState(x);
+            CoordTranslate(save_mark(x), pg - (xmk + fwd(x, ROWM)));
+	    debug4(DGP, DD, "GRAPHIC ROWM calling %s,%s %s,%s",
+	      EchoLength(back(x, COLM)), EchoLength(fwd(x, COLM)),
+	      EchoLength(back(x, ROWM)), EchoLength(fwd(x, ROWM)));
+            DefineGraphicNames(x);
+            SaveGraphicState(x);
+	    *** */
+
+            PrintGraphicObject(pre);
+            RestoreGraphicState();
+            FixAndPrintObject(y, xb, xb, xf, dim, NO_SUPPRESS, xb + xf, count);
+            if( post != nilobj )  PrintGraphicObject(post);
+            RestoreGraphicState();
+          }
+	  break;
+
+      } /* end switch */
+      back(x, dim) = xb;  fwd(x, dim) = xf;
+      break;
+
+
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+
+      CountChild(y, Down(x), count);
+      switch( BackEnd )
+      {
+	case PLAINTEXT:
+
+	  break;
+
+
+	case POSTSCRIPT:
+	case PDF:
+
+          if( dim == COLM )
+	  { save_mark(x) = xmk;
+	    if( incgraphic_ok(x) )
+	    { debug2(DGP, DD, "  %s (style %s)",
+		EchoObject(x), EchoStyle(&save_style(x)));
+	      face = finfo[font(save_style(x))].original_font;
+	      if( font_page(face) < font_curr_page )
+	      {	debug3(DFT, DD, "FAPO-IG: x = %s, font = %d, face = %s",
+		  string(x), font(save_style(x)), EchoObject(face));
+		FontPageUsed(face);
+	      }
+	    }
+	  }
+          else if( incgraphic_ok(x) )
+	    PrintGraphicInclude(x, save_mark(x), pg - xmk);
+	  break;
+
+      }
+      back(x, dim) = xb;  fwd(x, dim) = xf;
+      break;
+
+
+    case SPLIT:
+    
+      link = DownDim(x, dim);  CountChild(y, link, count);
+      FixAndPrintObject(y, xmk, xb, xf, dim, suppress, pg, count);
+      back(x, dim) = back(y, dim);  fwd(x, dim) = fwd(y, dim);
+      break;
+
+
+    case VCAT:
+    case HCAT:
+
+      if( (type(x) == VCAT) == (dim == ROWM) )
+      { 
+	FirstDefinite(x, link, prev, jn);
+	if( link != x )
+	{
+
+	  /* handle the special case of a 0rt gap at the beginning (left  */
+	  /* justify) by converting it to 0ie but increasing fwd(prev)    */
+	  /* to the max. possible                                         */
+	  NextDefiniteWithGap(x, link, y, g, jn);
+	  if( link != x && mode(gap(g)) == TAB_MODE &&
+	      units(gap(g)) == AVAIL_UNIT && width(gap(g)) == 0 )
+	  {
+	    debug2(DGP, DD, "  FAPO-CAT converting 0rt (back(x, dim) %s, xb %s)",
+	      EchoLength(back(x, dim)), EchoLength(xb));
+	    fwd(prev, dim) += xb - back(x, dim);
+	    back(x, dim) = xb;
+	    mode(gap(g)) = EDGE_MODE;
+	    units(gap(g)) = FIXED_UNIT;
+	  }
+	  FirstDefinite(x, link, prev, jn);
+
+	  /* the frame size is the total width actually available */
+	  frame_size = back(x, dim) + xf;
+
+	  /* back_edge is where the first element begins */
+	  back_edge = xmk - back(x, dim);
+
+	  /* inc is the adjust increment, used when adjusting gaps */
+	  if( adjust_cat(x) && !suppress )
+	    inc = FindAdjustIncrement(x, frame_size, dim);
+	  else inc = 0;
+
+	  debug6(DGP, DD, "[ FAPO-CAT %s (%s,%s): xmk %s, xb %s, xf %s",
+	    Image(type(x)), EchoLength(back(x, dim)), EchoLength(fwd(x, dim)),
+	    EchoLength(xmk), EchoLength(xb), EchoLength(xf));
+
+	  mk = back_edge + back(prev, dim);
+	  debug4(DGP, DD, "  FAPO-CAT back_edge %s, mk %s, framesize %s, inc %s",
+	    EchoLength(back_edge), EchoLength(mk), EchoLength(frame_size),
+	    EchoLength(inc));
+
+	  NextDefiniteWithGap(x, link, y, g, jn);
+
+	  while( link != x )
+	  {
+	    if( mode(gap(g)) == TAB_MODE && units(gap(g)) == AVAIL_UNIT &&
+		width(gap(g))==FR )
+	    {
+	      /* object is followed by 1rt gap, give it full space to print */
+	      debug5(DGP,D,"  FAPO (a) calling FAPO(%s, %s, %s, max(%s, %s))",
+	        Image(type(prev)), EchoLength(mk), EchoLength(back(prev, dim)),
+		EchoLength(fwd(prev, dim)), EchoLength(xmk+xf-mk-size(y,dim)));
+	      FixAndPrintObject(prev, mk, back(prev, dim),
+		find_max(fwd(prev, dim), xmk+xf-mk - size(y, dim)),
+		dim, NO_SUPPRESS, pg, count);
+	    }
+	    else
+	    {
+	      debug5(DGP, DD, "  FAPO-CAT (b) calling FAPO(%s, %s, %s, %s+%s)",
+	        Image(type(prev)), EchoLength(mk), EchoLength(back(prev, dim)),
+		EchoLength(fwd(prev, dim)), EchoLength(inc));
+	      FixAndPrintObject(prev, mk, back(prev, dim), fwd(prev, dim) + inc,
+	        dim, NO_SUPPRESS, pg, count);
+	    }
+	    /* NB fwd(prev, dim) may be changed by the call to FAPO */
+	    mk += ActualGap(fwd(prev, dim), back(y, dim), fwd(y, dim), &gap(g),
+		    frame_size, mk - back_edge);
+	    prev = y;
+	    NextDefiniteWithGap(x, link, y, g, jn);
+	  }
+	  if( suppress )
+	  {
+	    debug4(DGP, DD, "  FAPO-CAT (c) calling FAPO(%s, %s, %s, %s)",
+	      Image(type(prev)), EchoLength(mk), EchoLength(back(prev, dim)),
+	      EchoLength(fwd(prev, dim)));
+	    FixAndPrintObject(prev, mk, back(prev, dim), fwd(prev, dim),
+	      dim, NO_SUPPRESS, pg, count);
+	  }
+	  else
+	  {
+	    debug5(DGP, DD,"  FAPO-CAT (d) calling FAPO(%s, %s, %s, max(%s, %s))",
+	      Image(type(prev)), EchoLength(mk), EchoLength(back(prev, dim)),
+	      EchoLength(fwd(prev, dim)), EchoLength(xmk + xf - mk));
+	    FixAndPrintObject(prev, mk, back(prev,dim),
+	      find_max(fwd(prev, dim), xmk + xf - mk),
+	      dim, NO_SUPPRESS, pg, count);
+	  }
+	  back(x, dim) = find_max(back(x, dim), xb);
+	  fwd(x, dim) = mk + fwd(prev, dim) - back_edge - back(x, dim);
+	}
+	else back(x, dim) = xb, fwd(x, dim) = xf;
+	debug0(DGP, DD, "] FAPO-CAT returning.");
+      }
+      else
+      { OBJECT start_group, zlink, m;  BOOLEAN dble_found;
+	FULL_LENGTH b, f, dlen;
+	start_group = nilobj;  dble_found = FALSE;  dlen = 0;
+	debug0(DGP, DD, "  groups beginning.");
+	FirstDefinite(x, link, y, jn);
+	if( link != x )
+	{
+	  /* start first group, with or without join */
+	  b = back(y, dim);
+	  f = fwd(y, dim);
+	  m = y;
+	  start_group = link;
+	  dble_found = !jn;
+	  debug4(DGP, DD, "  starting first group %s (%sdbl_found): b = %s, f = %s",
+	    Image(type(y)), dble_found ? "" : "not ",
+	    EchoLength(b), EchoLength(f));
+	
+	  NextDefiniteWithGap(x, link, y, g, jn);
+	  while( link != x )
+	  {
+	    if( !jn )
+	    {
+	      /* finish off and fix the group ending just before g */
+	      debug2(DGP, DD, "  finishing group: b = %s, f = %s",
+		EchoLength(b), EchoLength(f));
+	      FixAndPrintObject(m, xmk+b, b, xf-b, dim,
+		NO_SUPPRESS, pg, count);
+	      b = back(m, dim);  f = fwd(m, dim);
+	      for( zlink = start_group;  zlink != link;  zlink=NextDown(zlink) )
+	      { CountChild(z, zlink, count);
+		if( !is_definite(type(z)) || z == m )  continue;
+		FixAndPrintObject(z, xmk + b, b, xf - b, dim,
+		  SUPPRESS, pg, count);
+		b = find_max(b, back(z, dim));  f = find_max(f, fwd(z, dim));
+	      }
+	      dlen = find_max(dlen, b + f);
+	      dble_found = TRUE;
+	      start_group = nilobj;
+
+	      /* start new group */
+	      b = back(y, dim);
+	      f = fwd(y, dim);
+	      m = y;
+	      start_group = link;
+	      debug2(DGP, DD, "  starting group: b = %s, f = %s",
+		EchoLength(b), EchoLength(f));
+	    }
+	    else
+	    {
+	      /* continue with current group */
+	      b = find_max(b, back(y, dim));
+	      f = find_max(f, fwd(y, dim));
+	      if( fwd(y, dim) > fwd(m, dim) )  m = y;
+	      debug2(DGP, DD, "  continuing group: b = %s, f = %s",
+		EchoLength(b), EchoLength(f));
+	    }
+
+	    NextDefiniteWithGap(x, link, y, g, jn);
+	  }
+	  assert( start_group != nilobj, "FAPO: final start_group!" );
+
+	  if( dble_found || !jn )
+	  {
+	    /* finish off and fix this last group */
+	    debug2(DGP, DD, "  finishing last group: b = %s, f = %s",
+	        EchoLength(b), EchoLength(f));
+	    FixAndPrintObject(m, xmk+b, b, xf - b, dim, NO_SUPPRESS, pg,count);
+	    b = back(m, dim);  f = fwd(m, dim);
+	    for( zlink = start_group;  zlink != x;  zlink = NextDown(zlink) )
+	    { CountChild(z, zlink, count);
+	      if( !is_definite(type(z)) || z == m )  continue;
+	      FixAndPrintObject(z, xmk+b, b, xf - b, dim, SUPPRESS, pg, count);
+	      b = find_max(b, back(z, dim));  f = find_max(f, fwd(z, dim));
+	    }
+	    dlen = find_max(dlen, b + f);
+	    back(x, dim) = 0;  fwd(x, dim) = dlen;
+	  }
+	  else
+	  {
+	    /* finish off and fix this last and only group */
+	    debug2(DGP, DD, "  finishing last and only group: b = %s, f = %s",
+	      EchoLength(b), EchoLength(f));
+	    FixAndPrintObject(m, xmk, xb, xf, dim, NO_SUPPRESS, pg, count);
+	    b = back(m, dim);  f = fwd(m, dim);
+	    for( zlink = start_group;  zlink != x;  zlink = NextDown(zlink) )
+	    { CountChild(z, zlink, count);
+	      if( !is_definite(type(z)) || z == m )  continue;
+	      FixAndPrintObject(z, xmk, xb, xf, dim, SUPPRESS, pg, count);
+	      b = find_max(b, back(z, dim));  f = find_max(f, fwd(z, dim));
+	    }
+	    back(x, dim) = b;  fwd(x, dim) = f;
+	  }
+	}
+      }
+      break;
+
+
+    case ACAT:
+
+      if( dim == COLM )
+      { BOOLEAN will_adjust, adjusting;
+	FULL_LENGTH actual_size,
+	adjust_indent, frame_size, back_edge, adjust_inc, inc, adjust_sofar;
+	int adjustable_gaps, gaps_sofar;
+	BOOLEAN underlining; int underline_xstart; FONT_NUM underline_font;
+	OBJECT urec, last_bad_gap;
+      
+
+	/*********************************************************************/
+	/*                                                                   */
+	/*  The first step is to calculate the following values:             */
+	/*                                                                   */
+	/*    last_bad_gap     The rightmost tab gap, or nilobj if none;     */
+	/*                                                                   */
+	/*    adjustable_gaps  the number of gaps suitable for adjustment;   */
+	/*                     i.e. to the right of the right-most tab gap,  */
+	/*                     and of non-zero width;                        */
+	/*                                                                   */
+	/*    actual_size      the actual size of x without adjustment.      */
+	/*                                                                   */
+	/*  These are needed when adjusting the line.                        */
+	/*                                                                   */
+	/*********************************************************************/
+
+	FirstDefinite(x, link, y, jn);
+	if( link == x )  break;  /* no definite children, nothing to print */
+
+	/*** nasty bug finder 
+	{ OBJECT ff = y;
+	debugcond1(DGP, DD, word_equal(ff, "@ReportLayout"),
+	  "FAPO(%s, COLM)", EchoObject(x));
+	debugcond1(DGP, DD, word_equal(ff, "@ReportLayout"),
+	  "  adjust_cat(x) = %s", bool(adjust_cat(x)));
+	}
+	***/
+
+	last_bad_gap = nilobj;
+	adjustable_gaps = 0;
+	back_edge = xmk - xb;
+	mk = back_edge + back(y, dim);
+	frame_size = xb + xf;
+	prev = y;
+	NextDefiniteWithGap(x, link, y, g, jn);
+	while( link != x )
+	{
+	  save_actual_gap(g) = ActualGap(fwd(prev, dim), back(y, dim),
+		fwd(y, dim), &gap(g), frame_size, mk - back_edge);
+	  mk += save_actual_gap(g);
+	  if( mode(gap(g)) == TAB_MODE || units(gap(g)) == AVAIL_UNIT
+				       || units(gap(g)) == FRAME_UNIT )
+	  { last_bad_gap = g;
+	    adjustable_gaps = 0;
+	  }
+	  else if( width(gap(g)) > 0 )  adjustable_gaps++;
+	  prev = y;
+	  NextDefiniteWithGap(x, link, y, g, jn);
+	}
+	actual_size = mk + fwd(prev, dim) - back_edge;
+
+	/*********************************************************************/
+	/*                                                                   */
+	/*  It is possible that the line cannot be displayed in any          */
+	/*  reasonable way, because the paragraph breaker was forced to      */
+	/*  produce an overfull line.  In this case, actual_size will        */
+	/*  exceed frame_size and there will be no adjustable gaps.  The     */
+	/*  solution is to horizontally scale the line if possible, or       */
+	/*  else to not print it at all.                                     */
+	/*                                                                   */
+	/*********************************************************************/
+
+	if( actual_size > frame_size && adjustable_gaps == 0 )
+	{ 
+	  /* can't be fixed by adjustment, so scale the line or delete it */
+	  CONSTRAINT c;
+	  SetConstraint(c, 0, frame_size, frame_size);
+	  fwd(x, dim) = actual_size;
+	  debug2(DGP, DD, "  oversize, actual_size = %s, frame_size = %s",
+	      EchoLength(actual_size), EchoLength(frame_size));
+	  if( BackEnd != PLAINTEXT && InsertScale(x, &c) )
+	  {
+	    /* the problem has just been fixed, by inserting a @Scale above x */
+	    OBJECT prnt;
+	    Parent(prnt, Up(x));
+	    Child(y, Down(x));
+	    if( actual_size - frame_size < 1 * PT )
+	    {
+	      /* the correction is probably due to roundoff error, and */
+	      /* anyway is too small to print an error message about   */
+	    }
+	    else if( Down(x) == LastDown(x) && is_word(type(y)) )
+	    {
+	      Error(23, 3, "word %s horizontally scaled by factor %.2f (too wide for %s paragraph)",
+		WARN, &fpos(y), string(y), (float) bc(constraint(prnt)) / SF,
+		EchoLength(frame_size));
+	    }
+	    else
+	    {
+	      Error(23, 4, "%s object horizontally scaled by factor %.2f (too wide for %s paragraph)",
+		WARN, &fpos(x), EchoLength(size(x, COLM)),
+		(float) bc(constraint(prnt)) / SF, EchoLength(frame_size));
+	    }
+	    FixAndPrintObject(prnt, xmk, back(prnt, dim), fwd(prnt, dim), dim,
+	      NO_SUPPRESS, pg, count);
+	  }
+	  else
+	  {
+	    /* fix the problem by refraining from printing the line */
+	    if( size(x, COLM) <= 0 )
+	      Error(23, 5, "oversize object has size 0 or less", INTERN, &fpos(x));
+	    Child(y, Down(x));
+	    if( Down(x) == LastDown(x) && is_word(type(y)) )
+	    { Error(23, 6, "word %s deleted (too wide for %s paragraph)",
+		WARN, &fpos(y), string(y), EchoLength(frame_size));
+	    }
+	    else
+	    { Error(23, 7, "%s object deleted (too wide for %s paragraph)",
+		WARN, &fpos(x), EchoLength(size(x, COLM)), EchoLength(frame_size));
+	    }
+
+	    /* delete and dispose every child of x */
+	    while( Down(x) != x )
+	      DisposeChild(Down(x));
+	    y = MakeWord(WORD, STR_EMPTY, &fpos(x));
+	    Link(x, y);
+	    back(y, COLM) = fwd(y, COLM) = 0;
+	    back(y, ROWM) = fwd(y, ROWM) = 0;
+	  }
+        }
+        else
+        {
+
+	  /*********************************************************************/
+	  /*                                                                   */
+	  /*  The line may be displayed in one of four ways:  centred, right-  */
+	  /*  justified, adjusted, or none of the above (i.e. left justified). */
+	  /*  An overfull line is always adjusted; otherwise, the line will    */
+	  /*  be centred or right justified if the display style asks for it;  */
+	  /*  otherwise, the line will be adjusted if adjust_cat(x) == TRUE    */
+	  /*  (i.e. there is an enclosing @PAdjust) or if the display style is */
+	  /*  DO_ADJUST (meaning that this line is one of a paragraph set in   */
+	  /*  the adjust or outdent break style, other than the last line);    */
+	  /*  otherwise, the line is left justified.                           */
+	  /*                                                                   */
+	  /*  The second step is to decide which of these four cases holds     */
+	  /*  for this line, and to record the decision in these variables:    */
+	  /*                                                                   */
+	  /*    will_adjust      TRUE if the adjusted style applies; in this   */
+	  /*                     case, variables adjust_inc and inc will be    */
+	  /*                     set to the appropriate adjustment value;      */
+	  /*                                                                   */
+	  /*    adjust_indent    If centring or right justification applies,   */
+	  /*                     the indent to produce this, else zero.        */
+	  /*                                                                   */
+	  /*  NB adjust_inc may be negative, if the optimal paragraph breaker  */
+	  /*  has chosen to shrink some gaps.                                  */
+	  /*                                                                   */
+	  /*********************************************************************/
+
+	  if( actual_size > frame_size )
+	  { 
+	    assert( adjustable_gaps > 0, "FAPO: adjustable_gaps!" );
+	    adjust_cat(x) = TRUE;
+	    adjust_indent = 0;
+	  }
+	  else switch( display_style(save_style(x)) )
+	  {
+	    case DO_ADJUST:	adjust_cat(x) = TRUE;
+				adjust_indent = 0;
+				break;
+	
+	    case DISPLAY_CENTRE: adjust_cat(x) = FALSE;
+				adjust_indent = (frame_size - actual_size)/2;
+				debug1(DGP, DD, "cdisp %s", EchoObject(x));
+				break;
+
+	    case DISPLAY_RIGHT:	adjust_cat(x) = FALSE;
+				adjust_indent = frame_size - actual_size;
+				debug1(DGP, DD, "rdisp %s", EchoObject(x));
+				break;
+
+	    default:		/* leave adjust_cat(x) as is */
+				adjust_indent = 0;
+				break;
+	  }
+
+	  debug2(DGP, DD, "ACAT %s %s",
+	    EchoStyle(&save_style(x)), EchoObject(x));
+	  debug2(DGP, DD, "frame_size = %s, actual_size = %s",
+	    EchoLength(frame_size), EchoLength(actual_size));
+
+	  if( adjust_cat(x) && adjustable_gaps > 0  )
+	  { will_adjust = TRUE;
+	    adjust_inc = (frame_size - actual_size) / adjustable_gaps;
+	    inc = find_max(adjust_inc, 0);
+	    gaps_sofar = 0;	/* number of gaps adjusted so far */
+	    adjust_sofar = 0;	/* total width of adjustments so far */
+	    debug2(DGP, DD, "will_adjust: adjustable_gaps = %d, adjust_inc = %s",
+	      adjustable_gaps, EchoLength(adjust_inc));
+	  }
+	  else will_adjust = FALSE;
+
+
+	  /*********************************************************************/
+	  /*                                                                   */
+	  /*  The third and final step is to traverse x, fixing subobjects.    */
+	  /*  Variable adjusting is true while adjusting is occurring.         */
+	  /*                                                                   */
+	  /*********************************************************************/
+
+	  underlining = FALSE;
+	  adjusting = will_adjust && last_bad_gap == nilobj;
+	  FirstDefinite(x, link, y, jn);
+	  prev = y;
+	  mk = xmk - back(x, dim) + back(y, dim) + adjust_indent;
+	  NextDefiniteWithGap(x, link, y, g, jn);
+	  while( link != x )
+	  {
+	    /* check for underlining */
+	    if( underline(prev) == UNDER_ON )
+	    {
+	      debug3(DGP, DD, "  FAPO/ACAT1 underline() := %s for %s %s",
+	        bool(FALSE), Image(type(prev)), EchoObject(prev));
+	      underline(prev) = UNDER_OFF;
+	      if( !underlining )
+	      {
+	        /* underlining begins here */
+	        underlining = TRUE;
+	        debug2(DGP, DD, "underlining begins at %s %s",
+		  Image(type(prev)), EchoObject(prev));
+	        underline_font = is_word(type(prev)) ? word_font(prev) :
+		    font(save_style(x));
+	        underline_xstart = mk - back(prev, dim);
+	      }
+	      if( underline(g) == UNDER_OFF )
+	      {
+	        /* underlining ends here */
+	        debug2(DGP, DD, "underlining ends at %s %s",
+		  Image(type(prev)), EchoObject(prev));
+	        New(urec, UNDER_REC);
+	        back(urec, COLM) = underline_xstart;
+	        fwd(urec, COLM) = mk + fwd(prev, dim);
+	        back(urec, ROWM) = underline_font;
+	        underlining = FALSE;
+	        Link(Up(prev), urec);
+	      }
+	    }
+
+	    /* fix previous definite now we know it is not the last one  */
+	    if( adjusting && width(gap(g)) > 0 )
+	    { int tmp;
+
+	      FixAndPrintObject(prev, mk, back(prev, dim), fwd(prev, dim) + inc,
+	        dim, NO_SUPPRESS, pg, count);
+
+	      gaps_sofar++;
+	      tmp = ((frame_size - actual_size) * gaps_sofar) / adjustable_gaps;
+	      mk += save_actual_gap(g) + (tmp - adjust_sofar);
+	      adjust_sofar = tmp;
+	    }
+	    else
+	    {
+	      FixAndPrintObject(prev, mk, back(prev, dim), fwd(prev, dim),
+	        dim, NO_SUPPRESS, pg, count);
+
+	      mk += save_actual_gap(g);
+	    }
+	    prev = y;
+
+	    /* commence adjustment if required */
+	    if( !adjusting && will_adjust && g == last_bad_gap )
+	      adjusting = TRUE;
+
+	    NextDefiniteWithGap(x, link, y, g, jn);
+	  }
+
+	  /* check for underlining */
+	  debugcond3(DGP, D, underline(prev) == UNDER_UNDEF,
+	    "  underlining is UNDER_UNDEF in %s: %s %s in para:",
+	    EchoFilePos(&fpos(prev)), Image(type(prev)), EchoObject(prev));
+	  debugcond1(DGP, D, underline(prev)==UNDER_UNDEF, "%s", EchoObject(x));
+	  assert( underline(prev) == UNDER_OFF || underline(prev) == UNDER_ON,
+	    "FixAndPrint: underline(prev)!" );
+	  if( underline(prev) == UNDER_ON )
+	  {
+	    debug3(DGP, DD, "  FAPO/ACAT1 underline() := %s for %s %s",
+	      bool(FALSE), Image(type(prev)), EchoObject(prev));
+	    underline(prev) = UNDER_OFF;
+	    if( !underlining )
+	    {
+	      /* underlining begins here */
+	      debug2(DGP, DD, "underlining begins at %s %s",
+	        Image(type(prev)), EchoObject(prev));
+	      underlining = TRUE;
+	      underline_font = is_word(type(prev)) ? word_font(prev) :
+		    font(save_style(x));
+	      underline_xstart = mk - back(prev, dim);
+	    }
+
+	    /* underlining must end here */
+	    debug2(DGP, DD, "underlining ends at %s %s",
+	      Image(type(prev)), EchoObject(prev));
+	    New(urec, UNDER_REC);
+	    back(urec, COLM) = underline_xstart;
+	    fwd(urec, COLM) = mk + fwd(prev, dim);
+	    back(urec, ROWM) = underline_font;
+	    underlining = FALSE;
+	    Link(Up(prev), urec);
+	  }
+
+	  /* fix the last definite subobject, prev, which must exist */
+	  FixAndPrintObject(prev, mk, back(prev, dim),
+	    frame_size - (mk - xmk) - back(x, dim),
+	    dim, NO_SUPPRESS, pg, count);
+
+        }
+      }
+      else for( link = Down(x);  link != x;  link = NextDown(link) )
+      {	Child(y, link);
+	if( !is_definite(type(y)) )
+	{
+	  if( type(y) == UNDER_REC )   /* generate an underline now */
+	    PrintUnderline(back(y, ROWM), back(y, COLM), fwd(y, COLM), pg - xmk);
+	  continue;
+	}
+	FixAndPrintObject(y, xmk, xb, xf, dim, NO_SUPPRESS, pg, count);
+      }
+      back(x, dim) = xb;  fwd(x, dim) = xf;
+      break;
+
+
+    case COL_THR:
+    case ROW_THR:
+
+      /* find and delete the child number count of y */
+      assert( (type(x) == COL_THR) == (dim == COLM), "FixAndPrintObject: thr!" );
+      for( link = Down(x), uplink = Up(x), i = 1;
+	link != x && uplink != x && i < count;
+	link = NextDown(link), uplink = NextUp(uplink), i++ );
+      assert( link != x && uplink != x, "FixAndPrintObject: link or uplink!" );
+      CountChild(y, link, count);
+      debug7(DGP, DD, "  fapo of %s (%s,%s) child %d %s (%s,%s)",
+	Image(type(x)),
+	EchoLength(back(x, dim)), EchoLength(fwd(x, dim)),
+	i, Image(type(y)), EchoLength(back(y, dim)), EchoLength(fwd(y, dim)));
+      MoveLink(uplink, link, CHILD);  DeleteLink(link);  /* IMPORTANT!!! */
+      assert( type(y) != GAP_OBJ, "FAPO: THR!");
+
+      /* assign size if not done previously */
+      /* ***
+      if( thr_state(x) != FINALSIZE && type(y) != START_HVSPAN &&
+	  type(y) != START_HSPAN && type(y) != START_VSPAN &&
+	  type(y) != HSPAN && type(y) != VSPAN )
+      *** */
+      if( thr_state(x) != FINALSIZE )
+      {	back(x, dim) = xb;  fwd(x, dim) = xf;
+	thr_state(x) = FINALSIZE;
+      }
+
+      /* fix y */
+      FixAndPrintObject(y, xmk, back(x, dim), fwd(x, dim), dim,
+	NO_SUPPRESS, pg, count);
+      if( Up(x) == x )  Dispose(x);
+      break;
+
+
+    default:
+    
+      assert1(FALSE, "FixAndPrintObject:", Image(type(x)));
+      break;
+
+  } /* end switch */
+  debug2(DGP, DD, "] FixAndPrintObject returning (size now %s,%s).",
+	EchoLength(back(x, dim)), EchoLength(fwd(x, dim)));
+} /* end FixAndPrintObject */
diff --git a/z24.c b/z24.c
new file mode 100644
index 0000000..a5aa145
--- /dev/null
+++ b/z24.c
@@ -0,0 +1,1513 @@
+/*@z24.c:Print Service:PrintInit()@*******************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  PDF Back End by Vincent Tan, February 1998.                              */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z24.c                                                      */
+/*  MODULE:       Print Service                                              */
+/*  EXTERNS:      PrintInit(), PrintBeforeFirst(), PrintBetween(),           */
+/*                PrintWord(), PrintAfterLast(), CoordTranslate(),           */
+/*                CoordRotate(), CoordScale(), SaveGraphicState(),           */
+/*                RestoreGraphicState(), PrintGraphicObject(),               */
+/*                DefineGraphicNames(), PrintGraphicInclude()                */
+/*                                                                           */
+/*  This module implements the PostScript back end.                          */
+/*                                                                           */
+/*****************************************************************************/
+#include <math.h>			/* for fabs()                        */
+
+#include "externs.h"
+#define	StartUpResource	"LoutStartUp"
+#define DEFAULT_XHEIGHT 500
+#define	NO_FONT		0		/* actually stolen from z37.c        */
+#define	NO_COLOUR	0
+#define	MAX_GS		50		/* maximum depth of graphics states  */
+
+#define printnum(x, fp)							\
+{ char buff[20];  register int i, y;					\
+  if( x >= 0 )  y = x;							\
+  else { y = -x; putc(CH_MINUS, fp); }					\
+  i = 0;								\
+  do { buff[i++] = numtodigitchar(y % 10);				\
+     } while( (y = (y / 10)) > 0 );					\
+  do { --i; putc(buff[i], fp);						\
+     } while( i );							\
+}
+
+static FILE	*out_fp;		/* output file                       */
+
+/* these variables used by PLAINTEXT back end only                           */
+static int	hsize;			/* horizontal size of page in chars  */
+static int	vsize;			/* vertical size of page in chars    */
+static FULL_CHAR *page;			/* the page (two-dim array of chars) */
+
+/* these types and variables used by POSTSCRIPT back end only                */
+typedef struct
+{
+  FONT_NUM	gs_font;		/* font number of this state         */
+  COLOUR_NUM	gs_colour;		/* colour number of this state       */
+  BOOLEAN	gs_cpexists;		/* TRUE if a current point exists    */
+  FULL_LENGTH	gs_currenty;		/* if cpexists, its y coordinate     */
+  short		gs_xheight2;		/* of font exists, half xheight      */
+} GRAPHICS_STATE;
+
+static GRAPHICS_STATE	gs_stack[MAX_GS];/* graphics state stack             */
+static int		gs_stack_top;	/* top of graphics state stack       */
+
+static FONT_NUM		currentfont;	/* font of most recent atom          */
+static COLOUR_NUM	currentcolour;	/* colour of most recent atom        */
+static short		currentxheight2;/* half xheight in current font      */
+static BOOLEAN		cpexists;	/* true if a current point exists    */
+static FULL_LENGTH	currenty;	/* if cpexists, its y coordinate     */
+
+static int		wordcount;	/* atoms printed since last newline  */
+static int		pagecount;	/* total number of pages printed     */
+static BOOLEAN		prologue_done;	/* TRUE after prologue is printed    */
+static OBJECT		needs;		/* Resource needs of included EPSFs  */
+static OBJECT		supplied;	/* Resources supplied by this file   */
+
+
+/*@::EightBitToPrintForm()@***************************************************/
+/*                                                                           */
+/*  static char *EightBitToPrintForm[]                                       */
+/*                                                                           */
+/*  Given 8-bit character i, returns a string of characters that will be     */
+/*  interpreted by PostScript as character i when read within a string.      */
+/*                                                                           */
+/*      CHAR_OUT==1    Printable ASCII literal, others as escape sequences   */
+/*      CHAR_OUT==2    Printable ISO-LATIN-1 literal, others escaped         */
+/*                                                                           */
+/*****************************************************************************/
+
+static char *EightBitToPrintForm[] = {
+#if CHAR_OUT==0
+    "",      "\\001", "\\002", "\\003", "\\004", "\\005", "\\006", "\\007",
+    "\\010", "\\011", "\\012", "\\013", "\\014", "\\015", "\\016", "\\017",
+    "\\020", "\\021", "\\022", "\\023", "\\024", "\\025", "\\026", "\\027",
+    "\\030", "\\031", "\\032", "\\033", "\\034", "\\035", "\\036", "\\037",
+    " ",     "!",     "\"",    "#",     "$",     "%",     "&",     "'",
+    "\\(",   "\\)",   "*",     "+",     ",",     "-",     ".",     "/",
+    "0",     "1",     "2",     "3",     "4",     "5",     "6",     "7",
+    "8",     "9",     ":",     ";",     "<",     "=",     ">",     "?",
+    "@",     "A",     "B",     "C",     "D",     "E",     "F",     "G",
+    "H",     "I",     "J",     "K",     "L",     "M",     "N",     "O",
+    "P",     "Q",     "R",     "S",     "T",     "U",     "V",     "W",
+    "X",     "Y",     "Z",     "[",     "\\\\",  "]",     "^",     "_",
+    "`",     "a",     "b",     "c",     "d",     "e",     "f",     "g",
+    "h",     "i",     "j",     "k",     "l",     "m",     "n",     "o",
+    "p",     "q",     "r",     "s",     "t",     "u",     "v",     "w",
+    "x",     "y",     "z",     "{",     "|",     "}",     "~",     "\\177",
+    "\\200", "\\201", "\\202", "\\203", "\\204", "\\205", "\\206", "\\207",
+    "\\210", "\\211", "\\212", "\\213", "\\214", "\\215", "\\216", "\\217",
+    "\\220", "\\221", "\\222", "\\223", "\\224", "\\225", "\\226", "\\227",
+    "\\230", "\\231", "\\232", "\\233", "\\234", "\\235", "\\236", "\\237",
+    "\\240", "\\241", "\\242", "\\243", "\\244", "\\245", "\\246", "\\247",
+    "\\250", "\\251", "\\252", "\\253", "\\254", "\\255", "\\256", "\\257",
+    "\\260", "\\261", "\\262", "\\263", "\\264", "\\265", "\\266", "\\267",
+    "\\270", "\\271", "\\272", "\\273", "\\274", "\\275", "\\276", "\\277",
+    "\\300", "\\301", "\\302", "\\303", "\\304", "\\305", "\\306", "\\307",
+    "\\310", "\\311", "\\312", "\\313", "\\314", "\\315", "\\316", "\\317",
+    "\\320", "\\321", "\\322", "\\323", "\\324", "\\325", "\\326", "\\327",
+    "\\330", "\\331", "\\332", "\\333", "\\334", "\\335", "\\336", "\\337",
+    "\\340", "\\341", "\\342", "\\343", "\\344", "\\345", "\\346", "\\347",
+    "\\350", "\\351", "\\352", "\\353", "\\354", "\\355", "\\356", "\\357",
+    "\\360", "\\361", "\\362", "\\363", "\\364", "\\365", "\\366", "\\367",
+    "\\370", "\\371", "\\372", "\\373", "\\374", "\\375", "\\376", "\\377"
+#else
+#if CHAR_OUT==1
+    "",      "\\001", "\\002", "\\003", "\\004", "\\005", "\\006", "\\007",
+    "\\010", "\\011", "\\012", "\\013", "\\014", "\\015", "\\016", "\\017",
+    "\\020", "\\021", "\\022", "\\023", "\\024", "\\025", "\\026", "\\027",
+    "\\030", "\\031", "\\032", "\\033", "\\034", "\\035", "\\036", "\\037",
+    " ",     "!",     "\"",    "#",     "$",     "%",     "&",     "'",
+    "\\(",   "\\)",   "*",     "+",     ",",     "-",     ".",     "/",
+    "0",     "1",     "2",     "3",     "4",     "5",     "6",     "7",
+    "8",     "9",     ":",     ";",     "<",     "=",     ">",     "?",
+    "@",     "A",     "B",     "C",     "D",     "E",     "F",     "G",
+    "H",     "I",     "J",     "K",     "L",     "M",     "N",     "O",
+    "P",     "Q",     "R",     "S",     "T",     "U",     "V",     "W",
+    "X",     "Y",     "Z",     "[",     "\\\\",  "]",     "^",     "_",
+    "`",     "a",     "b",     "c",     "d",     "e",     "f",     "g",
+    "h",     "i",     "j",     "k",     "l",     "m",     "n",     "o",
+    "p",     "q",     "r",     "s",     "t",     "u",     "v",     "w",
+    "x",     "y",     "z",     "{",     "|",     "}",     "~",     "\\177",
+    "\\200", "\\201", "\\202", "\\203", "\\204", "\\205", "\\206", "\\207",
+    "\\210", "\\211", "\\212", "\\213", "\\214", "\\215", "\\216", "\\217",
+    "\220",  "\221",  "\222",  "\223",  "\224",  "\225",  "\226",  "\227",
+    "\230",  "\\231", "\232",  "\233",  "\\234", "\235",  "\236",  "\237",
+    "\240",  "\241",  "\242",  "\243",  "\244",  "\245",  "\246",  "\247",
+    "\250",  "\251",  "\252",  "\253",  "\254",  "\255",  "\256",  "\257",
+    "\260",  "\261",  "\262",  "\263",  "\264",  "\265",  "\266",  "\267",
+    "\270",  "\271",  "\272",  "\273",  "\274",  "\275",  "\276",  "\277",
+    "\300",  "\301",  "\302",  "\303",  "\304",  "\305",  "\306",  "\307",
+    "\310",  "\311",  "\312",  "\313",  "\314",  "\315",  "\316",  "\317",
+    "\320",  "\321",  "\322",  "\323",  "\324",  "\325",  "\326",  "\327",
+    "\330",  "\331",  "\332",  "\333",  "\334",  "\335",  "\336",  "\337",
+    "\340",  "\341",  "\342",  "\343",  "\344",  "\345",  "\346",  "\347",
+    "\350",  "\351",  "\352",  "\353",  "\354",  "\355",  "\356",  "\357",
+    "\360",  "\361",  "\362",  "\363",  "\364",  "\365",  "\366",  "\367",
+    "\370",  "\371",  "\372",  "\373",  "\374",  "\375",  "\376",  "\377"
+#else
+If you are trying to compile this you have the wrong CHAR_OUT value!
+#endif
+#endif
+};
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PrintInit(file_ptr)                                                      */
+/*                                                                           */
+/*  Initialise this module.  Output is to go to FILE file_ptr.               */
+/*                                                                           */
+/*****************************************************************************/
+
+void PrintInit(FILE *file_ptr)
+{ debug0(DGP, DD, "PrintInit()");
+  out_fp = file_ptr;  prologue_done = FALSE;
+  gs_stack_top = -1;
+  currentfont = NO_FONT;
+  currentcolour = NO_COLOUR;
+  cpexists = FALSE;
+  wordcount = pagecount = 0;
+  New(needs, ACAT);
+  New(supplied, ACAT);
+  debug0(DGP, DD, "PrintInit returning.");
+}
+
+
+/*@::PrintBeforeFirst@********************************************************/
+/*                                                                           */
+/*  PrintBeforeFirst(h, v, label)                                            */
+/*                                                                           */
+/*  This procedure is called just before starting to print the first         */
+/*  component of the output.  Its size is h, v, and label is the page        */
+/*  label to attach to the %%Page comment.                                   */
+/*                                                                           */
+/*  If BackEnd is PLAINTEXT, this procedure obtains a two-dimensional array  */
+/*  of characters large enough to hold the first component, and clears it.   */
+/*                                                                           */
+/*  If BackEnd is POSTSCRIPT, this procedure generates the PostScript        */
+/*  prologue, augmented with any @PrependGraphic or @SysPrependGraphic       */
+/*  files specified by the user.  The following PostScript operators are     */
+/*  defined:                                                                 */
+/*                                                                           */
+/*      scale_factor  fnt       scale and set font                           */
+/*      x_coordinate  x         move to x_coordinate, current y coordinate   */
+/*      string        s         show string                                  */
+/*      number        in        result is number inches                      */
+/*      number        cm        result is number centimetres                 */
+/*      number        pt        result is number points                      */
+/*      number        sp        result is number spaces                      */
+/*      number        vs        result is number vspaces                     */
+/*      number        ft        result is number font-sizes                  */
+/*                                                                           */
+/*  as well as LoutGraphic, for use with the @Graphic operator:              */
+/*                                                                           */
+/*      xsize ysize xmark ymark fr vs sp LoutGraphic -                       */
+/*                                                                           */
+/*  Define xmark, ymark, xsize, ysize to be the positions of                 */
+/*  these features of x, and define symbols ft, vs and sp                    */
+/*  to be the current font size, line separation, and space width.           */
+/*                                                                           */
+/*****************************************************************************/
+
+void PrintBeforeFirst(FULL_LENGTH h, FULL_LENGTH v, FULL_CHAR *label)
+{ FILE_NUM fnum;  int i, j;  FULL_CHAR *p;
+  debug2(DGP, DD, "PrintBeforeFirst(%d, %d)", h, v);
+
+  switch( BackEnd )
+  {
+    case PLAINTEXT:
+
+      /* get a new page[] and clear it */
+      hsize = ceiling(h, PlainCharWidth);
+      vsize = ceiling(v, PlainCharHeight);
+      debug2(DGP, DD, "  PlainCharWidth: %d;  PlainCharHeight: %d",
+	PlainCharWidth, PlainCharHeight);
+      ifdebug(DMA, D, DebugRegisterUsage(MEM_PAGES, 1,
+	hsize * vsize * sizeof(FULL_CHAR)));
+      debug2(DGP, DD, "  PrintBeforeFirst allocating %d by %d", hsize, vsize);
+      page = (FULL_CHAR *) malloc(hsize * vsize * sizeof(FULL_CHAR));
+      for( i = 0;  i < vsize;  i++ )
+	for( j = 0;  j < hsize;  j++ )
+	  page[i*hsize + j] = ' ';
+      break;
+
+
+    case POSTSCRIPT:
+
+      /* print header comments for PostScript DSC 3.0 output */
+      if( Encapsulated )
+        fprintf(out_fp, "%%!PS-Adobe-3.0 EPSF-3.0\n");
+      else
+        fprintf(out_fp, "%%!PS-Adobe-3.0\n");
+      fprintf(out_fp, "%%%%Creator: %s\n", LOUT_VERSION);
+      fprintf(out_fp, "%%%%CreationDate: %s", TimeString());
+      fprintf(out_fp, "%%%%DocumentData: Binary\n");
+      fprintf(out_fp, "%%%%DocumentNeededResources: (atend)\n");
+      fprintf(out_fp, "%%%%DocumentMedia: Plain %d %d 0 white ()\n", h/PT, v/PT);
+      fprintf(out_fp, "%%%%DocumentSuppliedResources: (atend)\n");
+      fprintf(out_fp, "%%%%Pages: (atend)\n");
+      fprintf(out_fp, "%%%%BoundingBox: 0 0 %d %d\n", h/PT, v/PT);
+      fprintf(out_fp, "%%%%EndComments\n\n");
+
+      /* print procedure definitions part of header */
+      fprintf(out_fp, "%%%%BeginProlog\n");
+      fprintf(out_fp, "%%%%BeginResource: procset %s\n", StartUpResource);
+      fprintf(out_fp, "/m  { 3 1 roll moveto show } bind def\n");
+      fprintf(out_fp, "/s  { exch currentpoint exch pop moveto show } bind def\n");
+      fprintf(out_fp, "/k  { exch neg 0 rmoveto show } bind def\n");
+      fprintf(out_fp, "/ul { gsave setlinewidth dup 3 1 roll\n");
+      fprintf(out_fp, "      moveto lineto stroke grestore } bind def\n");
+      fprintf(out_fp, "/in { %d mul } def\n", IN);
+      fprintf(out_fp, "/cm { %d mul } def\n", CM);
+      fprintf(out_fp, "/pt { %d mul } def\n", PT);
+      fprintf(out_fp, "/em { %d mul } def\n", EM);
+      fprintf(out_fp, "/sp { louts mul } def\n");
+      fprintf(out_fp, "/vs { loutv mul } def\n");
+      fprintf(out_fp, "/ft { loutf mul } def\n");
+      fprintf(out_fp, "/dg {           } def\n\n");
+
+      fputs("/LoutGraphic {\n",					  out_fp);
+      fputs("  /louts exch def\n",				  out_fp);
+      fputs("  /loutv exch def\n",				  out_fp);
+      fputs("  /loutf exch def\n",				  out_fp);
+      fputs("  /ymark exch def\n",				  out_fp);
+      fputs("  /xmark exch def\n",				  out_fp);
+      fputs("  /ysize exch def\n",				  out_fp);
+      fputs("  /xsize exch def\n} def\n\n",			  out_fp);
+
+      fputs("/LoutGr2 { gsave translate LoutGraphic gsave } def\n\n", out_fp);
+
+      /* print definition used by Lout output to recode fonts                */
+      /* adapted from PostScript Language Reference Manual (2nd Ed), p. 275  */
+      /* usage: /<fullname> <encodingvector> /<originalname> LoutRecode -    */
+
+      fputs("/LoutFont\n",                                            out_fp);
+      fputs("{ findfont exch scalefont setfont\n",                    out_fp);
+      fputs("} bind def\n\n",					      out_fp);
+
+      fputs("/LoutRecode {\n",                                        out_fp);
+      fputs("  { findfont dup length dict begin\n",                   out_fp);
+      fputs("    {1 index /FID ne {def} {pop pop} ifelse} forall\n",  out_fp);
+      fputs("    /Encoding exch def\n",                               out_fp);
+      fputs("    currentdict end definefont pop\n",                   out_fp);
+      fputs("  }\n",                                                  out_fp);
+      fputs("  stopped pop\n",                                         out_fp);
+      fputs("} bind def\n\n",                                         out_fp);
+
+      /* print definitions used by Lout output when including EPSF files     */
+      /* copied from PostScript Language Reference Manual (2nd Ed.), p. 726  */
+
+      fputs("/BeginEPSF {\n",					  out_fp);
+      fputs("  /LoutEPSFState save def\n",			  out_fp);
+      fputs("  /dict_count countdictstack def\n",		  out_fp);
+      fputs("  /op_count count 1 sub def\n",			  out_fp);
+      fputs("  userdict begin\n",				  out_fp);
+      fputs("  /showpage { } def\n",				  out_fp);
+      fputs("  0 setgray 0 setlinecap\n",			  out_fp);
+      fputs("  1 setlinewidth 0 setlinejoin\n",			  out_fp);
+      fputs("  10 setmiterlimit [] 0 setdash newpath\n",	  out_fp);
+      fputs("  /languagelevel where\n",				  out_fp);
+      fputs("  { pop languagelevel\n",				  out_fp);
+      fputs("    1 ne\n",					  out_fp);
+      fputs("    { false setstrokeadjust false setoverprint\n",	  out_fp);
+      fputs("    } if\n",					  out_fp);
+      fputs("  } if\n",						  out_fp);
+      fputs("} bind def\n\n",					  out_fp);
+
+      fputs("/EndEPSF {\n",					  out_fp);
+      fputs("  count op_count sub { pop } repeat\n",		  out_fp);
+      fputs("  countdictstack dict_count sub { end } repeat\n",	  out_fp);
+      fputs("  LoutEPSFState restore\n",			  out_fp);
+      fputs("} bind def\n",					  out_fp);
+
+      fputs("%%EndResource\n\n",				  out_fp);
+
+      /* print encoding vectors as resources */
+      MapPrintEncodings(out_fp);
+
+      /* print prepend files (assumed to be organized as DSC 3.0 Resources) */
+      for( fnum=FirstFile(PREPEND_FILE);  fnum!=NO_FILE;  fnum=NextFile(fnum) )
+      { FULL_CHAR buff[MAX_BUFF];  FILE *fp;
+        if( (fp = OpenFile(fnum, FALSE, FALSE)) == null )
+          Error(24, 1, "cannot open %s file %s",
+	    WARN, PosOfFile(fnum), KW_PREPEND, FileName(fnum));
+        else if( StringFGets(buff, MAX_BUFF, fp) == NULL )
+          Error(24, 2, "%s file %s is empty",
+	    WARN, PosOfFile(fnum), KW_PREPEND, FileName(fnum));
+        else
+        {
+          if( StringBeginsWith(buff, AsciiToFull("%%BeginResource:")) )
+	  { OBJECT tmp;
+	    tmp = MakeWord(WORD, &buff[strlen("%%BeginResource:")], no_fpos);
+	    Link(supplied, tmp);
+	  }
+	  else
+	    Error(24, 3, "%s file %s lacks PostScript BeginResource comment",
+	      WARN, PosOfFile(fnum), KW_PREPEND, FileName(fnum));
+          StringFPuts(buff, out_fp);
+          fprintf(out_fp, "%% %s file %s\n", KW_PREPEND, FileName(fnum));
+          while( StringFGets(buff, MAX_BUFF, fp) != NULL )
+	    StringFPuts(buff, out_fp);
+	  fprintf(out_fp, "\n");
+	  fclose(fp);
+        }
+      }
+
+      fputs("%%EndProlog\n\n", out_fp);
+      fputs("%%BeginSetup\n", out_fp);
+      FontPrintPageSetup(out_fp);
+      fputs("%%EndSetup\n\n", out_fp);
+      fprintf(out_fp, "%%%%Page: ");
+      for( p = label;  *p != '\0';  p++ )
+	fputs(EightBitToPrintForm[*p], out_fp);
+      fprintf(out_fp, " %d\n", ++pagecount);
+      fprintf(out_fp, "%%%%BeginPageSetup\n");
+      FontPrintPageResources(out_fp);
+      FontAdvanceCurrentPage();
+      fprintf(out_fp, "/pgsave save def\n");
+      fprintf(out_fp, "%.4f dup scale %d setlinewidth\n", 1.0 / PT, PT/2);
+      fprintf(out_fp, "%%%%EndPageSetup\n\n");
+      break;
+
+    case PDF:
+
+      PDFFile_Init(out_fp, h/PT, v/PT, IN, CM, PT, EM);
+
+      /* print encoding vectors as resources */
+	MapPrintEncodings(out_fp);
+
+	FontPrintPageSetup(out_fp);
+
+      PDFPage_Init(out_fp, 1.0 / PT, PT/2);
+
+    	FontPrintPageResources(out_fp);	/*	write out font objects	*/
+      FontAdvanceCurrentPage();
+      break;
+
+ } /* end switch */
+ prologue_done = TRUE;
+} /* end PrintBeforeFirst */
+
+
+/*@::PrintBetween()@**********************************************************/
+/*                                                                           */
+/*  PrintBetween(h, v, label)                                                */
+/*                                                                           */
+/*  Start a new output component, of size h by v; label is the page label    */
+/*  to attach to the %%Page comment.                                         */
+/*                                                                           */
+/*****************************************************************************/
+
+void PrintBetween(FULL_LENGTH h, FULL_LENGTH v, FULL_CHAR *label)
+{ int new_hsize, new_vsize, i, j, jmax;  FULL_CHAR *p;
+  debug2(DGP, DD, "PrintBetween(%d, %d)", h, v);
+
+  switch( BackEnd )
+  {
+    case PLAINTEXT:
+
+      /* print the page that has just ended */
+      ifdebug(DGP, D,
+	putc('+', out_fp);
+	for( j = 0;  j < hsize;  j++ )  putc('-', out_fp);
+	putc('+', out_fp);
+	putc('\n', out_fp);
+      );
+      for( i = vsize - 1;  i >= 0;  i-- )
+      { ifdebug(DGP, D, putc('|', out_fp));
+	for( jmax = hsize-1;  jmax >= 0 && page[i*hsize+jmax] == ' ';  jmax--);
+	ifdebug(DGP, D, jmax = hsize - 1);
+	for( j = 0;  j <= jmax;  j++ )
+	  putc(page[i*hsize + j], out_fp);
+        ifdebug(DGP, D, putc('|', out_fp));
+	putc('\n', out_fp);
+      }
+      ifdebug(DGP, D,
+	putc('+', out_fp);
+	for( j = 0;  j < hsize;  j++ )  putc('-', out_fp);
+	putc('+', out_fp);
+	putc('\n', out_fp);
+      );
+
+      /* separate the page from the next one with a form-feed if required */
+      if( PlainFormFeed ) putc('\f', out_fp);
+
+      /* if page size has changed, get a new page[] array */
+      new_hsize = ceiling(h, PlainCharWidth);
+      new_vsize = ceiling(v, PlainCharHeight);
+      if( new_hsize != hsize || new_vsize != vsize )
+      {
+        ifdebug(DMA, D, DebugRegisterUsage(MEM_PAGES, -1,
+	  -hsize * vsize * sizeof(FULL_CHAR)));
+	free(page);
+	hsize = new_hsize;
+	vsize = new_vsize;
+        debug2(DGP, DD, "  PrintBetween allocating %d by %d", hsize, vsize);
+        ifdebug(DMA, D, DebugRegisterUsage(MEM_PAGES, 1,
+	  hsize * vsize * sizeof(FULL_CHAR)));
+        page = (FULL_CHAR *) malloc(hsize * vsize * sizeof(FULL_CHAR));
+      }
+
+      /* clear page[] for the new page just beginning */
+      for( i = 0;  i < vsize;  i++ )
+	for( j = 0;  j < hsize;  j++ )
+	  page[i*hsize + j] = ' ';
+      break;
+
+
+    case POSTSCRIPT:
+
+      fprintf(out_fp, "\npgsave restore\nshowpage\n");
+      gs_stack_top = 0;
+      cpexists = FALSE;
+      currentfont = NO_FONT;
+      currentcolour = NO_COLOUR;
+      if( Encapsulated )
+      { PrintAfterLast();
+        Error(24, 4, "truncating -EPS document at end of first page",
+	  FATAL, no_fpos);
+      }
+      fprintf(out_fp, "\n%%%%Page: ");
+      for( p = label;  *p != '\0';  p++ )
+	fputs(EightBitToPrintForm[*p], out_fp);
+      fprintf(out_fp, " %d\n", ++pagecount);
+      fprintf(out_fp, "%%%%BeginPageSetup\n");
+      FontPrintPageResources(out_fp);
+      fprintf(out_fp, "/pgsave save def\n");
+      FontPrintPageSetup(out_fp);
+      FontAdvanceCurrentPage();
+      fprintf(out_fp, "%.4f dup scale %d setlinewidth\n", 1.0 / PT, PT/2);
+      fprintf(out_fp, "%%%%EndPageSetup\n");
+      wordcount = 0;
+      break;
+
+    case PDF:
+
+      /* write out page objects	*/
+      PDFPage_Cleanup(out_fp);
+      PDFPage_Init(out_fp, 1.0 / PT, PT/2);
+
+      /* write out font objects	*/
+      FontPrintPageResources(out_fp);
+      FontPrintPageSetup(out_fp);
+      FontAdvanceCurrentPage();
+      break;
+
+  } /* end switch */
+} /* end PrintBetween */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  KernLength(fnum, ch1, ch2, res)                                          */
+/*                                                                           */
+/*  Set res to the kern length between ch1 and ch2 in font fnum, or 0 if     */
+/*  none.                                                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+#define KernLength(fnum, mp, ch1, ch2, res)				\
+{ int ua_ch1 = mp[ch1];							\
+  int ua_ch2 = mp[ch2];							\
+  int i = finfo[fnum].kern_table[ua_ch1], j;				\
+  if( i == 0 )  res = 0;						\
+  else									\
+  { FULL_CHAR *kc = finfo[fnum].kern_chars;				\
+    for( j = i;  kc[j] > ua_ch2;  j++ );				\
+    res = (kc[j] == ua_ch2) ?						\
+      finfo[fnum].kern_sizes[finfo[fnum].kern_value[j]] : 0;		\
+  }									\
+} /* end KernLength */
+
+
+/*@::PrintWord()@*************************************************************/
+/*                                                                           */
+/*  PrintWord(x, hpos, vpos)                                                 */
+/*                                                                           */
+/*  Print non-empty word x; its marks cross at the point (hpos, vpos).       */
+/*                                                                           */
+/*****************************************************************************/
+
+void PrintWord(OBJECT x, int hpos, int vpos)
+{ FULL_CHAR *p, *q, *a, *b, *lig, *unacc;
+  int i, h, v, ksize;  char command;  MAPPING m;
+
+  debug5(DGP, DD, "PrintWord( %s, %d, %d ) font %d colour %d", string(x),
+	hpos, vpos, word_font(x), word_colour(x));
+  TotalWordCount++;
+
+  switch( BackEnd )
+  {
+    case PLAINTEXT:
+
+      h = ((float) hpos / PlainCharWidth) + 0.5;
+      v = ((float) vpos / PlainCharHeight);
+      debug3(DGP, DD, "PrintWord(%s at h = %d, v = %d)", string(x), h, v);
+      if( h >= 0 && h + StringLength(string(x)) < hsize && v >= 0 && v < vsize )
+      {
+        assert( h >= 0,     "PrintWord:  h < 0!" );
+        assert( h <  hsize, "PrintWord:  h >= hsize!" );
+        assert( v >= 0,     "PrintWord:  v < 0!" );
+        assert( v <  vsize, "PrintWord:  v >= vsize!" );
+        p = &page[v*hsize + h];
+        for( i = 0;  string(x)[i] != '\0';  i++ )
+	  *p++ = string(x)[i];
+      }
+      else
+      {
+        Error(24, 11, "word %s deleted (internal error, off page at %d,%d)",
+          WARN, &fpos(x), string(x), h, v);
+      }
+      break;
+
+
+    case POSTSCRIPT:
+
+      /* if font is different to previous word then print change */
+      if( word_font(x) != currentfont )
+      { currentfont = word_font(x);
+        currentxheight2 = FontHalfXHeight(currentfont);
+        fprintf(out_fp, "%hd %s", FontSize(currentfont, x),
+          FontName(currentfont));
+        if( ++wordcount >= 5 )
+        { fputs("\n", out_fp);
+          wordcount = 0;
+        }
+        else fputs(" ", out_fp);
+      }
+
+      /* if colour is different to previous word then print change */
+      if( word_colour(x) != currentcolour )
+      { currentcolour = word_colour(x);
+	if( currentcolour > 0 )
+	{ fprintf(out_fp, "%s", ColourCommand(currentcolour));
+          if( ++wordcount >= 5 )
+          { fputs("\n", out_fp);
+            wordcount = 0;
+          }
+          else fputs(" ", out_fp);
+	}
+      }
+
+      /* move to coordinate of x */
+      debug1(DGP, DDD, "  currentxheight2 = %d", currentxheight2);
+      vpos = vpos - currentxheight2;
+      if( cpexists && currenty == vpos )
+      { printnum(hpos, out_fp);
+        command = 's';
+      }
+      else
+      { currenty = vpos;
+        printnum(hpos, out_fp);
+        fputs(" ", out_fp);
+        printnum(currenty, out_fp);
+        command = 'm';
+        cpexists = TRUE;
+      }
+
+      /* convert ligature sequences into ligature characters */
+      lig = finfo[word_font(x)].lig_table;
+      p = q = string(x);
+      do
+      { 
+        /* check for missing glyph (lig[] == 1) or ligatures (lig[] > 1) */
+        if( lig[*q++ = *p++] )
+        {
+          if( lig[*(q-1)] == 1 ) continue;
+          else
+          { a = &lig[ lig[*(p-1)] + MAX_CHARS ];
+            while( *a++ == *(p-1) )
+            { b = p;
+              while( *a == *b && *(a+1) != '\0' && *b != '\0' )  a++, b++;
+              if( *(a+1) == '\0' )
+              { *(q-1) = *a;
+                p = b;
+                break;
+              }
+              else
+              { while( *++a );
+                a++;
+              }
+            }
+          }
+        }
+      } while( *p );
+      *q = '\0';
+
+      /* show string(x) */
+      fputs("(", out_fp);
+      p = string(x);
+      fputs(EightBitToPrintForm[*p], out_fp);
+      m = font_mapping(finfo[word_font(x)].font_table);
+      unacc = MapTable[m]->map[MAP_UNACCENTED];
+      /* acc   = MapTable[m]->map[MAP_ACCENT]; */
+      for( p++;  *p;  p++ )
+      { KernLength(word_font(x), unacc, *(p-1), *p, ksize);
+        if( ksize != 0 )
+        { fprintf(out_fp, ")%c %d(", command, -ksize);
+          ++wordcount;
+          command = 'k';
+        }
+	fputs(EightBitToPrintForm[*p], out_fp);
+      }
+      if( ++wordcount >= 5 )
+      { fprintf(out_fp, ")%c\n", command);
+        wordcount = 0;
+      }
+      else fprintf(out_fp, ")%c ", command);
+      break;
+
+
+
+    case PDF:
+    {
+
+      static int last_hpos;	/* does not need to be initialised */
+      static int next_hpos = -1;
+#if 0
+      struct metrics *fnt;
+#endif
+      /* if font is different to previous word then print change */
+      if( word_font(x) != currentfont )
+      { currentfont = word_font(x);
+        currentxheight2 = FontHalfXHeight(currentfont);
+	  PDFFont_Set(out_fp, FontSize(currentfont, x), FontName(currentfont));
+      }
+
+      /* if colour is different to previous word then print change */
+      if( word_colour(x) != currentcolour )
+      {
+        currentcolour = word_colour(x);
+	  if( currentcolour > 0 )
+	  {
+          char	str[256];
+
+	    sprintf(str, "%s ", ColourCommand(currentcolour));
+	    PDFPage_Write(out_fp, str);
+        }
+      }
+
+      /* move to coordinate of x */
+      debug1(DGP, DDD, "  currentxheight2 = %d", currentxheight2);
+      vpos = vpos - currentxheight2;
+      if( cpexists && (currenty == vpos) && PDFHasValidTextMatrix() )
+      { /* printnum(hpos, out_fp); */
+        command = 's';
+/*
+	Note: I calculate the width of the space char here in case the font has
+	changed. This prevents subtle spacing errors from occurring.
+ */
+#if 0
+        fnt = finfo[currentfont].size_table;
+
+        if ( (next_hpos + fnt[' '].right /* width of space char */ ) == hpos )
+          command = ' ';
+#endif
+      }
+      else
+      { currenty = vpos;
+        /* printnum(hpos, out_fp);
+        fputs(" ", out_fp);
+        printnum(currenty, out_fp); */
+        command = 'm';
+        cpexists = TRUE;
+      }
+
+      /* convert ligature sequences into ligature characters */
+      lig = finfo[word_font(x)].lig_table;
+      p = q = string(x);
+      do
+      { 
+        /* check for missing glyph (lig[] == 1) or ligatures (lig[] > 1) */
+        if( lig[*q++ = *p++] )
+        {
+          if( lig[*(q-1)] == 1 ) continue;
+          else
+          { a = &lig[ lig[*(p-1)] + MAX_CHARS ];
+            while( *a++ == *(p-1) )
+            { b = p;
+              while( *a == *b && *(a+1) != '\0' && *b != '\0' )  a++, b++;
+              if( *(a+1) == '\0' )
+              { *(q-1) = *a;
+                p = b;
+                break;
+              }
+              else
+              { while( *++a );
+                a++;
+              }
+            }
+          }
+        }
+      } while( *p );
+      *q = '\0';
+
+      /* show string(x) */
+      /* FontWordSize(x); - this should not be necessary	*/
+
+      switch (command)
+      {
+	case 'm':
+
+	  PDFText_OpenXY(out_fp, hpos, vpos);
+	  last_hpos = hpos;
+	  next_hpos =	hpos + fwd(x, COLM);	/* fwd(x, COLM) = width of wd */
+	  break;
+
+	case 's':
+#if 0
+	  PDFText_Open(out_fp);
+	  PDFText_Kern(out_fp, hpos - next_hpos);
+#else
+	  PDFText_OpenX(out_fp, hpos - last_hpos);
+#endif
+	  last_hpos = hpos;
+	  next_hpos =	hpos + fwd(x, COLM);	/* fwd(x, COLM) = width of wd */
+	  break;
+#if 0
+	case ' ':
+
+	  PDFText_Open(out_fp);
+#if 1
+	  /* try kerning to get correct position */
+	  PDFText_Kern(out_fp, fnt[' '].right);
+#else
+	  PDFPage_Write(out_fp, EightBitToPrintForm[' ']);
+#endif
+	  next_hpos += fwd(x, COLM) +	fnt[' '].right;	/* width of space ch */
+	  break;
+#endif
+      }
+
+      p = string(x);
+      PDFPage_Write(out_fp, EightBitToPrintForm[*p]);
+
+      m = font_mapping(finfo[word_font(x)].font_table);
+      unacc = MapTable[m]->map[MAP_UNACCENTED];
+      /* acc   = MapTable[m]->map[MAP_ACCENT]; */
+      for( p++;  *p;  p++ )
+      {
+	KernLength(word_font(x), unacc, *(p-1), *p, ksize);
+        KernLength(font_num(finfo[word_font(x)].original_font),
+	  unacc, *(p-1), *p, ksize);
+	if ( ksize != 0 )
+	{
+	  PDFText_Kern(out_fp, ksize);
+	}
+	PDFPage_Write(out_fp, EightBitToPrintForm[*p]);
+      }
+      PDFText_Close(out_fp);
+      break;
+    }
+
+
+  } /* end switch */
+  debug0(DGP, DDD, "PrintWord returning");
+} /* end PrintWord */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PrintPlainGraphicObject(x, xmk, ymk, z)                                  */
+/*                                                                           */
+/*  Print plain graphic object x at xmk, ymk with the size of z.             */
+/*                                                                           */
+/*****************************************************************************/
+
+void PrintPlainGraphicObject(OBJECT x, FULL_LENGTH xmk,FULL_LENGTH ymk,OBJECT z)
+{ int i, len, starth, startv, stoph, stopv, h, v;
+  debug2(DGP, D, "PrintPlainGraphicObject(x, xmk %s, ymk %s)",
+    EchoLength(xmk), EchoLength(ymk));
+
+  assert( BackEnd == PLAINTEXT, "PrintPlainGraphicObject: back end!" );
+  if( type(x) != WORD && type(x) != QWORD )
+  {
+    Error(24, 12, "left parameter of %s must be a simple word",
+      WARN, &fpos(x), KW_PLAINGRAPHIC);
+    return;
+  }
+  len = StringLength(string(x));
+  if( StringLength(string(x)) == 0 )
+  {
+    Error(24, 13, "left parameter of %s must be a non-empty word",
+      WARN, &fpos(x), KW_PLAINGRAPHIC);
+    return;
+  }
+  starth = (((float) xmk ) / PlainCharWidth) + 0.5;
+  startv = (((float) ymk ) / PlainCharHeight);
+  stoph = (((float) xmk + size(z, COLM)) / PlainCharWidth) + 0.5;
+  stopv = (((float) ymk - size(z, ROWM)) / PlainCharHeight); /* NB - not + */
+  SetLengthDim(COLM);
+  debug5(DGP, D, "  xmk %s bk %s fwd %s -> %d,%d",
+    EchoLength(xmk), EchoLength(back(z, COLM)), EchoLength(fwd(z, COLM)),
+    starth, stoph);
+  SetLengthDim(ROWM);
+  debug5(DGP, D, "  ymk %s bk %s fwd %s -> %d,%d",
+    EchoLength(ymk), EchoLength(back(z, ROWM)), EchoLength(fwd(z, ROWM)),
+    startv, stopv);
+  if( starth >= 0 && stoph < hsize && startv >= 0 && stopv < vsize )
+  { i = 0;
+    for( v = startv-1;  v >= stopv;  v-- )
+    {
+      for( h = starth;  h < stoph;  h++ )
+      {
+        if( i == len )  i = 0;
+        page[v*hsize + h] = string(x)[i++];
+      }
+    }
+  }
+  else
+  {
+    Error(24, 14, "fill %s deleted (internal error, off page at %d,%d)",
+      WARN, &fpos(x), string(x), h, v);
+  }
+} /* end PrintPlainGraphicObject */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PrintUnderline(fnum, xstart, xstop, ymk)                                 */
+/*                                                                           */
+/*  Draw an underline suitable for font fnum, from xstart to xstop at the    */
+/*  appropriate distance below mark ymk.                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void PrintUnderline(FONT_NUM fnum, FULL_LENGTH xstart, FULL_LENGTH xstop,
+  FULL_LENGTH ymk)
+{
+
+  debug4(DGP, DD, "PrintUnderline(fnum %d, xstart %s, xstop %s, ymk %s )",
+    fnum, EchoLength(xstart), EchoLength(xstop), EchoLength(ymk));
+
+  switch( BackEnd )
+  {
+    case PLAINTEXT:
+
+      /* do nothing */
+      break;
+
+
+    case POSTSCRIPT:
+
+      fprintf(out_fp, "%d %d %d %d ul\n", xstart, xstop,
+	ymk - finfo[fnum].underline_pos, finfo[fnum].underline_thick);
+      break;
+
+    case PDF:
+	PDFPage_PrintUnderline(out_fp,  xstart, xstop,
+	    ymk - finfo[fnum].underline_pos, finfo[fnum].underline_thick);
+      break;
+  }
+  debug0(DGP, DD, "PrintUnderline returning.");
+} /* end PrintUnderline */
+
+
+/*@::PrintAfterLast(), CoordTranslate()@**************************************/
+/*                                                                           */
+/*  PrintAfterLast()                                                         */
+/*                                                                           */
+/*  Clean up this module and close output stream.                            */
+/*                                                                           */
+/*****************************************************************************/
+
+void PrintAfterLast(void)
+{ OBJECT x, link;  BOOLEAN first_need;  int i, j, jmax;
+  if( prologue_done )
+  { 
+    switch( BackEnd )
+    {
+      case PLAINTEXT:
+
+        /* print the page that has just ended (exists since prologue_done) */
+	ifdebug(DGP, D,
+	  putc('+', out_fp);
+	  for( j = 0;  j < hsize;  j++ )  putc('-', out_fp);
+	  putc('+', out_fp);
+	  putc('\n', out_fp);
+	);
+        for( i = vsize - 1;  i >= 0;  i-- )
+        { ifdebug(DGP, D, putc('|', out_fp));
+	  for( jmax = hsize-1;  jmax >= 0 && page[i*hsize+jmax] == ' ';  jmax--);
+	  ifdebug(DGP, D, jmax = hsize - 1);
+	  for( j = 0;  j <= jmax;  j++ )
+	    putc(page[i*hsize + j], out_fp);
+          ifdebug(DGP, D, putc('|', out_fp));
+	  putc('\n', out_fp);
+        }
+	ifdebug(DGP, D,
+	  putc('+', out_fp);
+	  for( j = 0;  j < hsize;  j++ )  putc('-', out_fp);
+	  putc('+', out_fp);
+	  putc('\n', out_fp);
+	);
+	break;
+    
+
+      case POSTSCRIPT:
+
+        fprintf(out_fp, "\npgsave restore\nshowpage\n");
+        fprintf(out_fp, "\n%%%%Trailer\n");
+
+        /* print resource requirements (DSC 3.0 version) - fonts */
+        first_need = FontNeeded(out_fp);
+
+        /* print resource requirements (DSC 3.0 version) - included EPSFs  */
+        for( link = Down(needs); link != needs; link = NextDown(link) )
+        { Child(x, link);
+          assert(is_word(type(x)), "PrintAfterLast: needs!" );
+          fprintf(out_fp, "%s %s",
+	    first_need ? "%%DocumentNeededResources:" : "%%+", string(x));
+          first_need = FALSE;
+        }
+
+	/* print resources supplied */
+	fprintf(out_fp,
+	  "%%%%DocumentSuppliedResources: procset %s\n", StartUpResource);
+	for( link = Down(supplied);  link != supplied;  link = NextDown(link) )
+	{ Child(x, link);
+	  fprintf(out_fp, "%%%%+ %s", string(x));
+	}
+        MapPrintResources(out_fp);
+
+        fprintf(out_fp, "%%%%Pages: %d\n", pagecount);
+        fprintf(out_fp, "%%%%EOF\n");
+	break;
+
+     case PDF:
+
+    	PDFPage_Cleanup(out_fp);		/* write out page objects */
+        /* MapPrintResources(out_fp); not needed */
+    	PDFFile_Cleanup(out_fp);
+        break;
+
+    } /* end switch */
+  } /* end if prologue_done */
+} /* end PrintAfterLast */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  CoordTranslate(xdist, ydist)                                             */
+/*                                                                           */
+/*  Translate coordinate system by the given x and y distances.              */
+/*                                                                           */
+/*****************************************************************************/
+
+void CoordTranslate(FULL_LENGTH xdist, FULL_LENGTH ydist)
+{ debug2(DRS,D,"CoordTranslate(%s, %s)",
+    EchoLength(xdist), EchoLength(ydist));
+  assert( BackEnd != PLAINTEXT, "CoordTranslate: BackEnd!" );
+  if (BackEnd == POSTSCRIPT)
+    fprintf(out_fp, "%d %d translate\n", xdist, ydist);
+  else if (BackEnd == PDF)
+  {
+    if ((xdist != 0) || (ydist != 0))
+    {
+#if 1
+      PDFPage_Translate(out_fp, xdist, ydist);
+#else
+      char	temp_str[64];
+      sprintf(temp_str, "1 0 0 1 %d %d cm\n", xdist, ydist);
+      PDFPage_Write(out_fp, temp_str);
+#endif
+    }
+  }
+  cpexists = FALSE;
+  /***
+  currentfont = NO_FONT;
+  currentcolour = NO_COLOUR;
+  ***/
+  debug0(DRS, D, "CoordTranslate returning.");
+} /* end CoordTranslate */
+
+
+/*@::CoordRotate(), CoordScale(), SaveGraphicsState(), etc.@******************/
+/*                                                                           */
+/*  CoordRotate(amount)                                                      */
+/*                                                                           */
+/*  Rotate coordinate system by given amount (in internal DG units)          */
+/*                                                                           */
+/*****************************************************************************/
+
+void CoordRotate(FULL_LENGTH amount)
+{ debug1(DRS, D, "CoordRotate(%.1f degrees)", (float) amount / DG);
+  assert( BackEnd != PLAINTEXT, "CoordRotate: BackEnd!" );
+  if (BackEnd == POSTSCRIPT)
+    fprintf(out_fp, "%.4f rotate\n", (float) amount / DG);
+  else if (BackEnd == PDF)
+  {
+    int theAmount = ((amount / DG) % 360);
+    if ( theAmount != 0 )
+    {
+      #define  PI   3.1415926535897931160
+
+      PDFPage_Rotate(out_fp, (double) theAmount * (double) PI / (double) 180.0);
+    }
+  }
+  cpexists = FALSE;
+  /***
+  currentfont = NO_FONT;
+  currentcolour = NO_COLOUR;
+  ***/
+  debug0(DRS, D, "CoordRotate returning.");
+} /* end CoordRotate */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  CoordScale(ratio, dim)                                                   */
+/*                                                                           */
+/*  Scale coordinate system by ratio in the given dimension.                 */
+/*                                                                           */
+/*****************************************************************************/
+
+void CoordScale(float hfactor, float vfactor)
+{
+#if DEBUG_ON
+  char buff[20];
+#endif
+  assert( BackEnd != PLAINTEXT, "CoordScale: BackEnd!" );
+  ifdebug(DRS, D, sprintf(buff, "%.3f, %.3f", hfactor, vfactor));
+  debug1(DRS, D, "CoordScale(%s)", buff);
+  if (BackEnd == POSTSCRIPT)
+    fprintf(out_fp, "%.4f %.4f scale\n", hfactor, vfactor);
+  else if (BackEnd == PDF)
+  {
+    if ( (fabs(hfactor - 1.0) > 0.01) || (fabs(vfactor - 1.0) > 0.01) )
+    {
+#if 1
+      PDFPage_Scale(out_fp, hfactor, vfactor);
+#else
+      char temp_str[64];
+      sprintf(temp_str, "%.2f 0 0 %.2f 0 0 cm\n", hfactor, vfactor);
+      PDFPage_Write(out_fp, temp_str);
+#endif
+    }
+  }
+  cpexists = FALSE;
+  /***
+  currentfont = NO_FONT;
+  currentcolour = NO_COLOUR;
+  ***/
+  debug0(DRS, D, "CoordScale returning.");
+} /* end CoordScale */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  SaveGraphicState(x)                                                      */
+/*                                                                           */
+/*  Save current coord system on stack for later restoration.                */
+/*  Object x is just for error reporting, not really used at all.            */
+/*                                                                           */
+/*****************************************************************************/
+
+void SaveGraphicState(OBJECT x)
+{ debug0(DRS, D, "SaveGraphicState()");
+  assert( BackEnd != PLAINTEXT, "SaveGraphicState: BackEnd!" );
+  if (BackEnd == POSTSCRIPT)
+    fprintf(out_fp, "gsave\n");
+  else if (BackEnd == PDF)
+    PDFPage_Push(out_fp);
+  gs_stack_top++;
+  if( gs_stack_top >= MAX_GS )
+    Error(24, 5, "rotations, graphics etc. too deeply nested (max is %d)",
+      FATAL, &fpos(x), MAX_GS);
+  gs_stack[gs_stack_top].gs_font	= currentfont;
+  gs_stack[gs_stack_top].gs_colour	= currentcolour;
+  gs_stack[gs_stack_top].gs_cpexists	= cpexists;
+  gs_stack[gs_stack_top].gs_currenty	= currenty;
+  gs_stack[gs_stack_top].gs_xheight2	= currentxheight2;
+  debug0(DRS, D, "SaveGraphicState returning.");
+} /* end SaveGraphicState */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  RestoreGraphicState()                                                    */
+/*                                                                           */
+/*  Restore previously saved coordinate system.  NB we normally assume that  */
+/*  no white space is needed before any item of output, but since this       */
+/*  procedure is sometimes called immediately after PrintGraphicObject(),    */
+/*  which does not append a concluding space, we prepend one here.           */
+/*                                                                           */
+/*****************************************************************************/
+
+void RestoreGraphicState(void)
+{ debug0(DRS, D, "RestoreGraphicState()");
+  assert( BackEnd != PLAINTEXT, "RestoreGraphicState: BackEnd!" );
+  if( BackEnd == POSTSCRIPT )
+    fprintf(out_fp, "\ngrestore\n");
+  else if( BackEnd == PDF )
+    PDFPage_Pop(out_fp);
+  currentfont	  = gs_stack[gs_stack_top].gs_font;
+  currentcolour	  = gs_stack[gs_stack_top].gs_colour;
+  cpexists	  = gs_stack[gs_stack_top].gs_cpexists;
+  currenty	  = gs_stack[gs_stack_top].gs_currenty;
+  currentxheight2 = gs_stack[gs_stack_top].gs_xheight2;
+  gs_stack_top--;
+  /* ***
+  cpexists = FALSE;
+  currentfont = NO_FONT;
+  currentcolour = NO_COLOUR;
+  *** */
+  debug0(DRS, D, "RestoreGraphicState returning.");
+} /* end RestoreGraphicState */
+
+
+/*@::PrintGraphicObject(), DefineGraphicNames()@******************************/
+/*                                                                           */
+/*  PrintGraphicObject(x)                                                    */
+/*                                                                           */
+/*  Print object x on out_fp                                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+void PrintGraphicObject(OBJECT x)
+{ OBJECT y, link;
+  assert( BackEnd != PLAINTEXT, "PrintGraphicObject: BackEnd!" );
+  debug3(DPS, D, "PrintGraphicObject(%s %s %s)",
+    EchoFilePos(&fpos(x)), Image(type(x)), EchoObject(x));
+  switch( type(x) )
+  {
+    case WORD:
+    case QWORD:
+#if 1
+      if (BackEnd == POSTSCRIPT)
+	StringFPuts(string(x), out_fp);
+      else if (BackEnd == PDF)
+      {
+	PDFPage_WriteGraphic(out_fp, string(x));
+      }
+#else
+      StringFPuts(string(x), out_fp);
+#endif
+      break;
+	
+
+    case ACAT:
+    
+      for( link = Down(x);  link != x;  link = NextDown(link) )
+      {	Child(y, link);
+	if( type(y) == GAP_OBJ )
+	{
+          if( BackEnd == POSTSCRIPT )
+	  {
+	    if( vspace(y) > 0 )  fputs("\n", out_fp);
+	    else if( hspace(y) > 0 ) fputs(" ", out_fp);
+	  }
+	  else if( BackEnd == PDF )
+	  {
+	    if( vspace(y) > 0 )  PDFPage_Write(out_fp, "\n");
+	    else if( hspace(y) > 0 ) PDFPage_Write(out_fp, " ");
+	  }
+	}
+	else if( is_word(type(y)) || type(y) == ACAT )
+	  PrintGraphicObject(y);
+	else if( type(y) != WIDE && !is_index(type(y)) )
+		/* @Wide, indexes are sometimes inserted by Manifest */
+	{ Error(24, 6, "error in left parameter of %s",
+	    WARN, &fpos(x), KW_GRAPHIC);
+	  debug1(DGP, D, "  type(y) = %s, y =", Image(type(y)));
+	  ifdebug(DGP, D, DebugObject(y));
+	}
+      }
+      break;
+
+
+    default:
+    
+      Error(24, 7, "error in left parameter of %s", WARN, &fpos(x), KW_GRAPHIC);
+      debug1(DGP, D, "  type(x) = %s, x =", Image(type(x)));
+      ifdebug(DGP, D, DebugObject(x));
+      break;
+
+  }
+  debug0(DPS, D, "PrintGraphicObject returning");
+} /* end PrintGraphicObject */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DefineGraphicNames(x)                                                    */
+/*                                                                           */
+/*  Generate PostScript for xsize, ysize etc. names of graphic object.       */
+/*                                                                           */
+/*****************************************************************************/
+
+void DefineGraphicNames(OBJECT x)
+{ assert( type(x) == GRAPHIC, "PrintGraphic: type(x) != GRAPHIC!" );
+  assert( BackEnd != PLAINTEXT, "DefineGraphicNames: BackEnd!" );
+  debug1(DRS, D, "DefineGraphicNames( %s )", EchoObject(x));
+  debug1(DRS, DD, "  style = %s", EchoStyle(&save_style(x)));
+
+  /* if font is different to previous word then print change */
+  if( font(save_style(x)) != currentfont )
+  { currentfont = font(save_style(x));
+    if( currentfont > 0 )
+    { currentxheight2 = FontHalfXHeight(currentfont);
+#if 1	/*	VT 98/01/04: modified for PDF	*/
+      if (BackEnd == POSTSCRIPT)
+        fprintf(out_fp, "%hd %s ", FontSize(currentfont, x), FontName(currentfont));
+      else if (BackEnd == PDF)
+	PDFFont_Set(out_fp, FontSize(currentfont, x), FontName(currentfont));
+#else
+      fprintf(out_fp, "%hd %s ", FontSize(currentfont, x),
+        FontName(currentfont));
+#endif
+    }
+  }
+
+  /* if colour is different to previous word then print change */
+  if( colour(save_style(x)) != currentcolour )
+  { currentcolour = colour(save_style(x));
+    if( currentcolour > 0 )
+    {
+#if 1
+      if( BackEnd == POSTSCRIPT )
+        fprintf(out_fp, "%s ", ColourCommand(currentcolour));
+      else if (BackEnd == PDF)
+      {
+	char str[256];
+	sprintf(str, "%s ", ColourCommand(currentcolour));
+	PDFPage_Write(out_fp, str);
+      }
+#else
+      fprintf(out_fp, "%s ", ColourCommand(currentcolour));
+#endif
+    }
+  }
+
+  if (BackEnd == POSTSCRIPT)
+    fprintf(out_fp, "%d %d %d %d %d %d %d LoutGraphic\n",
+      size(x, COLM), size(x, ROWM), back(x, COLM), fwd(x, ROWM),
+      currentfont <= 0 ? 12*PT : FontSize(currentfont, x),
+      width(line_gap(save_style(x))), width(space_gap(save_style(x))));
+  else if( BackEnd == PDF )
+  {
+    PDFPage_SetVars(size(x, COLM), size(x, ROWM), back(x, COLM), fwd(x, ROWM),
+      currentfont <= 0 ? 12*PT : FontSize(currentfont, x),
+      width(line_gap(save_style(x))), width(space_gap(save_style(x))));
+  }
+
+  debug0(DRS, D, "DefineGraphicNames returning.");
+} /* end DefineGraphicNames */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  SaveTranslateDefineSave(x, xdist, ydist)                                 */
+/*                                                                           */
+/*  Equivalent to the sequence of calls                                      */
+/*                                                                           */
+/*      SaveGraphicState(x)                                                  */
+/*      CoordTranslate(xdist, ydist)                                         */
+/*      DefineGraphicNames(x)                                                */
+/*      SaveGraphicState(x)                                                  */
+/*                                                                           */
+/*  but generates less PostScript.                                           */
+/*                                                                           */
+/*****************************************************************************/
+
+void SaveTranslateDefineSave(OBJECT x, FULL_LENGTH xdist, FULL_LENGTH ydist)
+{
+  if( BackEnd == PDF )
+  {
+    /* do it bit by bit */
+    SaveGraphicState(x);
+    CoordTranslate(xdist, ydist);
+    DefineGraphicNames(x);
+    SaveGraphicState(x);
+    return;
+  }
+
+  assert( BackEnd == POSTSCRIPT, "SaveTranslateDefineSave: BackEnd!" );
+  if( gs_stack_top >= MAX_GS - 1 || font(save_style(x)) != currentfont ||
+      colour(save_style(x))!=currentcolour )
+  {
+    /* do it bit by bit, will be rare anyway */
+    SaveGraphicState(x);
+    CoordTranslate(xdist, ydist);
+    DefineGraphicNames(x);
+    SaveGraphicState(x);
+  }
+  else
+  {
+    /* no font or colour changes, no stack overflow, so can optimize */
+
+    /* from Save */
+    gs_stack_top++;
+    gs_stack[gs_stack_top].gs_font	= currentfont;
+    gs_stack[gs_stack_top].gs_colour	= currentcolour;
+    gs_stack[gs_stack_top].gs_cpexists	= cpexists;
+    gs_stack[gs_stack_top].gs_currenty	= currenty;
+    gs_stack[gs_stack_top].gs_xheight2	= currentxheight2;
+
+    /* from CoordTranslate */
+    cpexists = FALSE;
+
+    /* from Save */
+    gs_stack_top++;
+    gs_stack[gs_stack_top].gs_font	= currentfont;
+    gs_stack[gs_stack_top].gs_colour	= currentcolour;
+    gs_stack[gs_stack_top].gs_cpexists	= cpexists;
+    gs_stack[gs_stack_top].gs_currenty	= currenty;
+    gs_stack[gs_stack_top].gs_xheight2	= currentxheight2;
+
+    /* accumulated output from all four calls, repackaged */
+    fprintf(out_fp, "%d %d %d %d %d %d %d %d %d LoutGr2\n",
+      size(x, COLM), size(x, ROWM), back(x, COLM), fwd(x, ROWM),
+      currentfont <= 0 ? 12*PT : FontSize(currentfont, x),
+      width(line_gap(save_style(x))), width(space_gap(save_style(x))),
+      xdist, ydist);
+      
+  }
+} /* end SaveTranslateDefineSave */
+
+
+/*@::PrintGraphicInclude()@***************************************************/
+/*                                                                           */
+/*  PrintGraphicInclude(x, colmark, rowmark)                                 */
+/*                                                                           */
+/*  Print graphic include file, with appropriate surrounds.  This code       */
+/*  closely follows the PostScript Language Reference Manual, 2n ed.,        */
+/*  pages 733-5, except we do not clip the included EPSF.                    */
+/*                                                                           */
+/*  Note to porters: Version 3.0 of the EPSF standard is not compatible      */
+/*  with previous versions.  Thus, this output may crash your system.        */
+/*  If you can find out which comment line(s) are causing the trouble,       */
+/*  you can add to procedure strip_out to strip them out during the          */
+/*  file inclusion step.  e.g. on my system %%EOF causes problems, so I      */
+/*  strip it out.                                                            */
+/*                                                                           */
+/*  May 1994: I've just discovered that %%Trailer causes problems for        */
+/*  the mpage Unix utility, so now I'm stripping it out as well.             */
+/*                                                                           */
+/*****************************************************************************/
+#define	SKIPPING	0
+#define	READING_DNR	1
+#define FINISHED	2
+
+static BOOLEAN strip_out(FULL_CHAR *buff)
+{ if( StringBeginsWith(buff, AsciiToFull("%%EOF"))     )  return TRUE;
+  if( StringBeginsWith(buff, AsciiToFull("%%Trailer")) )  return TRUE;
+  return FALSE;
+} /* end strip_out */
+
+void PrintGraphicInclude(OBJECT x, FULL_LENGTH colmark, FULL_LENGTH rowmark)
+{ OBJECT y, full_name;  FULL_CHAR buff[MAX_BUFF];
+  FILE *fp;  int state;  BOOLEAN compressed;
+  debug0(DRS, D, "PrintGraphicInclude(x)");
+
+  if (BackEnd == PDF)
+  {
+    Error(24, 8, "PrintGraphicInclude: cannot include EPSF in a PDF file. File ignored.",
+      WARN, &fpos(x));
+    return;
+  }
+
+  assert( BackEnd == POSTSCRIPT, "PrintGraphicInclude: BackEnd!" );
+  assert(type(x)==INCGRAPHIC || type(x)==SINCGRAPHIC, "PrintGraphicInclude!");
+  assert(incgraphic_ok(x), "PrintGraphicInclude: !incgraphic_ok(x)!");
+
+  /* open the include file and get its full path name */
+  Child(y, Down(x));
+  fp = OpenIncGraphicFile(string(y), type(x), &full_name,&fpos(y),&compressed);
+  assert( fp != NULL, "PrintGraphicInclude: fp!" );
+
+  /* if font is different to previous word then print change */
+  if( font(save_style(x)) != currentfont )
+  { currentfont = font(save_style(x));
+    currentxheight2 = FontHalfXHeight(currentfont);
+    fprintf(out_fp, "%hd %s\n", FontSize(currentfont,x), FontName(currentfont));
+  }
+
+  /* if colour is different to previous word then print change */
+  if( colour(save_style(x)) != currentcolour )
+  { currentcolour = colour(save_style(x));
+    if( currentcolour > 0 )
+    {
+      fprintf(out_fp, "%s\n", ColourCommand(currentcolour));
+    }
+  }
+
+  /* generate appropriate header code */
+  fprintf(out_fp, "BeginEPSF\n");
+  CoordTranslate(colmark - back(x, COLM), rowmark - fwd(x, ROWM));
+  CoordScale( (float) PT, (float) PT );
+  CoordTranslate(-back(y, COLM), -back(y, ROWM));
+  fprintf(out_fp, "%%%%BeginDocument: %s\n", string(full_name));
+
+  /* copy through the include file, except divert resources lines to needs */
+  /* and strip out some comment lines that cause problems                  */
+  state = (StringFGets(buff, MAX_BUFF, fp) == NULL) ? FINISHED : SKIPPING;
+  while( state != FINISHED ) switch(state)
+  {
+    case SKIPPING:
+
+      if( StringBeginsWith(buff, AsciiToFull("%%DocumentNeededResources:")) &&
+	  !StringContains(buff, AsciiToFull("(atend)")) )
+      { y = MakeWord(WORD, &buff[StringLength("%%DocumentNeededResources:")],
+	      no_fpos);
+        Link(needs, y);
+	state = (StringFGets(buff,MAX_BUFF,fp)==NULL) ? FINISHED : READING_DNR;
+      }
+      else
+      { if( StringBeginsWith(buff, AsciiToFull("%%LanguageLevel:")) )
+	  Error(24, 9, "ignoring LanguageLevel comment in %s file %s",
+	    WARN, &fpos(x), KW_INCGRAPHIC, string(full_name));
+	if( StringBeginsWith(buff, AsciiToFull("%%Extensions:")) )
+	  Error(24, 10, "ignoring Extensions comment in %s file %s",
+	    WARN, &fpos(x), KW_INCGRAPHIC, string(full_name));
+	if( !strip_out(buff) )  StringFPuts(buff, out_fp);
+	state = (StringFGets(buff, MAX_BUFF, fp) == NULL) ? FINISHED : SKIPPING;
+      }
+      break;
+
+    case READING_DNR:
+
+      if( StringBeginsWith(buff, AsciiToFull("%%+")) )
+      {	x = MakeWord(WORD, &buff[StringLength(AsciiToFull("%%+"))], no_fpos);
+	Link(needs, x);
+	state = (StringFGets(buff,MAX_BUFF,fp)==NULL) ? FINISHED : READING_DNR;
+      }
+      else
+      { if( !strip_out(buff) )  StringFPuts(buff, out_fp);
+	state = (StringFGets(buff, MAX_BUFF, fp) == NULL) ? FINISHED : SKIPPING;
+      }
+      break;
+  }
+
+  /* wrapup */
+  DisposeObject(full_name);
+  fclose(fp);
+  if( compressed )  StringRemove(AsciiToFull(LOUT_EPS));
+  fprintf(out_fp, "\n%%%%EndDocument\nEndEPSF\n");
+  wordcount = 0;
+  debug0(DRS, D, "PrintGraphicInclude returning.");
+} /* end PrintGraphicInclude */
diff --git a/z25.c b/z25.c
new file mode 100644
index 0000000..926219a
--- /dev/null
+++ b/z25.c
@@ -0,0 +1,996 @@
+/*@z25.c:Object Echo:aprint(), cprint(), printnum()@**************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z25.c                                                      */
+/*  MODULE:       Object Echo                                                */
+/*  EXTERNS:      EchoObject(), DebugObject()                                */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#if DEBUG_ON
+
+static	int	limit;			/* column where newline is needed    */
+static	int	indent;			/* current indent                    */
+static	int	col;			/* current output column             */
+static	FILE	*fp;			/* current output file               */
+
+#define	moveright()	(indent += 3)
+#define	moveleft()	(indent -= 3)
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static aprint(x)                                                         */
+/*  static cprint(x)                                                         */
+/*                                                                           */
+/*  Print the ASCII or FULL_CHAR string x onto the appropriate output.       */
+/*                                                                           */
+/*****************************************************************************/
+
+static void cprint(FULL_CHAR *x)
+{ col += StringLength(x);
+  if( fp == null ) AppendString(x);
+  else StringFPuts(x, fp);
+} /* end print */
+
+static void aprint(char *x)
+{ cprint(AsciiToFull(x));
+} /* end aprint */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static printnum(x)                                                       */
+/*                                                                           */
+/*  Print the number x onto the appropriate output.                          */
+/*                                                                           */
+/*****************************************************************************/
+
+static void printnum(int x)
+{ cprint(StringInt(x));
+} /* end printnum */
+
+
+/*@::tab(), newline(), space()@***********************************************/
+/*                                                                           */
+/*  static tab(x)                                                            */
+/*                                                                           */
+/*  Tab to column x, or anyway insert at least one space.                    */
+/*                                                                           */
+/*****************************************************************************/
+
+static void tab(int x)
+{  do
+     aprint(" ");
+   while( col < x );
+} /* end tab */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static newline()                                                         */
+/*                                                                           */
+/*  Echo a newline to the appropriate output (unless output is a string).    */
+/*  Correct indenting and right limits are maintained, if possible.          */
+/*                                                                           */
+/*****************************************************************************/
+
+static void newline(void)
+{ if( fp == null )  AppendString(STR_SPACE);
+  else
+  { fputs("\n", fp);
+    fflush(fp);
+    for( col = 0;  col < indent;  col++ )  fputs(" ", fp);
+  }
+} /* end newline */
+
+
+/*@::echo()@******************************************************************/
+/*                                                                           */
+/*  static echo(x, outer_prec, count)                                        */
+/*                                                                           */
+/*  Echo x.  The result will be enclosed in braces only if its precedence    */
+/*  is less than or equal to outer_prec (words and parameterless closures    */
+/*  are taken to have infinite precedence, i.e. never enclosed in braces).   */
+/*                                                                           */
+/*  x is child number count of its parent.  Used by COL_THR and ROW_THR      */
+/*  only.                                                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+static void echo(OBJECT x, unsigned outer_prec, int count)
+{ OBJECT link, y, tmp, sym, z;
+  char *op;  int prec, i, childcount;
+  BOOLEAN npar_seen, name_printed, lbr_printed, braces_needed;
+
+  switch( type(x) )
+  {
+
+    case DEAD:
+
+	aprint("#dead");
+	break;
+
+
+    case UNDER_REC:
+    
+	aprint("#under_rec");
+	break;
+
+
+    case UNATTACHED:
+    
+	aprint( "#unattached " );
+	moveright();
+	if( Down(x) != x )
+	{ CountChild(y, Down(x), count);
+	  if( y != x ) echo(y, NO_PREC, count);
+	  else aprint("<child is self!>");
+	}
+	else aprint("<no child!>");
+	moveleft();
+	break;
+
+
+    case SCALE_IND:
+    case COVER_IND:
+    case EXPAND_IND:
+    case GALL_PREC:
+    case GALL_FOLL:
+    case GALL_FOLL_OR_PREC:
+    case GALL_TARG:
+    case CROSS_PREC:
+    case CROSS_FOLL:
+    case CROSS_FOLL_OR_PREC:
+    case CROSS_TARG:
+    case RECURSIVE:
+    case PAGE_LABEL_IND:
+    
+	/* aprint("#"); cprint(Image(type(x))); aprint(" "); */
+	echo(actual(x), NO_PREC, 1);
+	break;
+
+		
+    case RECEPTIVE:
+    case RECEIVING:
+    
+	aprint(type(x) == RECEIVING ? "#receiving " : "#receptive ");
+	if( external_ver(actual(x)) )  aprint("(external_ver) ");
+	if( external_hor(actual(x)) )  aprint("(external_hor) ");
+	if( threaded(actual(x)) )  aprint("(threaded) ");
+	if( blocked(x) )           aprint("(blocked) " );
+	if( trigger_externs(x) )   aprint("(trigger_externs) " );
+	if( non_blocking(x) )      aprint("(non_blocking) " );
+	cprint( type(actual(x)) == CLOSURE ?
+		SymName(actual(actual(x))) : Image(type(actual(x))) );
+	aprint(" ");
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ CountChild(y, link, count);
+	  moveright();
+	  echo(y, NO_PREC, count);
+	  moveleft();
+	}
+	break;
+
+
+    case PRECEDES:
+    
+	aprint("#precedes");
+	break;
+
+
+    case FOLLOWS:
+    
+	aprint("#follows");
+	if( blocked(x) )  aprint(" (blocked)");
+	CountChild(y, Down(x), count);
+	if( Up(y) == LastUp(y) )  aprint(" (no precedes!)");
+	break;
+
+
+    case HEAD:
+    
+	aprint("Galley ");  cprint(SymName(actual(x)));
+	aprint(" into ");   cprint(SymName(whereto(x)));
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ CountChild(y, link, count);
+	  newline();
+	  echo(y, type(y) == GAP_OBJ ? VCAT : VCAT_PREC, count);
+	}
+	break;
+
+
+    case ROW_THR:
+
+	aprint("{R ");
+	for( i=0, link = Down(x);  link != x && i < count ;  link = NextDown(link), i++ );
+	if( link != x )
+	{ CountChild(y, link, count);
+	  echo(y, VCAT_PREC, count);
+	  /* newline(); */
+	}
+	aprint(" R}");
+	break;
+
+
+    case COL_THR:
+
+	aprint("{C ");
+	for( i=0, link = Down(x);  link != x && i < count ;  link = NextDown(link), i++ );
+	if( link != x )
+	{ CountChild(y, link, count);
+	  echo(y, HCAT_PREC, count);
+	  /* newline(); */
+	}
+	aprint(" C}");
+	break;
+
+
+    case HSPANNER:
+
+	aprint("{HS ");
+	CountChild(y, Down(x), count);
+	echo(y, NO_PREC, count);
+	aprint(" HS}");
+	break;
+
+
+    case VSPANNER:
+
+	aprint("{VS ");
+	CountChild(y, Down(x), count);
+	echo(y, NO_PREC, count);
+	aprint(" VS}");
+	break;
+
+
+    case THREAD:
+
+	aprint("<thread>");
+	break;
+
+
+    case VCAT: op = "/", prec = VCAT_PREC;  goto ETC;
+    case HCAT: op = "|", prec = HCAT_PREC;  goto ETC;
+    
+	ETC:
+	if( Down(x) == x )
+	{ aprint(op);
+	  aprint("<empty>");
+	  break;
+	}
+	if( prec <= outer_prec ) aprint("{ ");
+	/* *** if( Down(x) == LastDown(x) )  aprint(op);  must be manifested */
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ CountChild(y, link, count);
+	  if( is_index(type(y)) )
+	    newline();
+	  else if( (type(y) == GAP_OBJ && type(x) != ACAT) )
+	    newline();
+	  if( type(y) == GAP_OBJ )  echo(y, type(x), count);
+	  else echo(y, prec, count);
+	}
+	if( prec <= outer_prec )  aprint(" }");
+	break;
+
+
+    case ACAT: op = "&", prec = ACAT_PREC;
+
+	childcount = 0;
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ CountChild(y, link, count);
+	  if( type(y) == GAP_OBJ )
+	  {
+	    echo(y, ACAT, count);
+	    continue;
+	  }
+	  childcount++;
+	  echo(y, prec, count);
+	  /* ***
+	  if( link == Down(x) || link == LastDown(x) )
+	    echo(y, prec, count);
+	  else if( NextDown(NextDown(link)) == LastDown(x) )
+	  { sprintf(buff, " ++%d++ ", childcount+1);
+	    aprint(buff);
+	  }
+	  *** */
+	}
+	break;
+
+
+    case GAP_OBJ:
+
+	/* in this case the outer_prec argument is VCAT, HCAT or ACAT */
+	if( Down(x) != x )
+	{ if( outer_prec == ACAT )  aprint(" ");
+	  cprint( EchoCatOp(outer_prec, mark(gap(x)), join(gap(x))) );
+	  CountChild(y, Down(x), count);
+	  echo(y, FORCE_PREC, count);
+	  aprint(" ");
+	}
+	/* ***
+	else if( outer_prec == ACAT )
+	{ for( i = 1;  i <= vspace(x);  i++ )  newline();
+	  for( i = 1;  i <= hspace(x);  i++ )  aprint(" ");
+	}
+	*** */
+	else
+	{ cprint( EchoCatOp(outer_prec, mark(gap(x)), join(gap(x))) );
+	  cprint( EchoGap(&gap(x)) );
+	  aprint(" ");
+	}
+	break;
+
+
+    case WORD:
+    
+	if( StringLength(string(x)) == 0 )
+	  aprint("{}");
+	else
+	{ aprint("\"");
+	  cprint( string(x) );
+	  aprint("\"");
+	}
+	break;
+
+
+    case QWORD:
+    
+	cprint( StringQuotedWord(x) );
+	break;
+
+
+    case ENV:
+    
+	/* debug only */
+	aprint("<");
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ CountChild(y, link, count);
+	  if( type(y) == CLOSURE )
+	  { cprint( SymName(actual(y)) );
+	    if( LastDown(y) != y )  echo(GetEnv(y), NO_PREC, count);
+	  }
+	  else if( type(y) == ENV )  echo(y, NO_PREC, count);
+	  else cprint(Image(type(y)));
+	  if( NextDown(link) != x )  aprint(" ");
+	}
+	aprint(">");
+	break;
+
+
+    case CROSS:
+    case FORCE_CROSS:
+
+	assert( Down(x) != x, "echo: CROSS Down(x)!" );
+	CountChild(y, Down(x), count);
+	if( type(y) == CLOSURE )  cprint(SymName(actual(y)));
+	else
+	{ cprint(KW_LBR);
+	  echo(y, NO_PREC, count);
+	  cprint(KW_RBR);
+	}
+	cprint(Image(type(x)));
+	/* ***
+	cprint(KW_CROSS);
+	aprint("<");
+	cprint(Image(cross_type(x)));
+	aprint(">");
+	*** */
+	aprint(" ");
+	if( NextDown(Down(x)) != x )
+	{ CountChild(y, NextDown(Down(x)), count);
+	  echo(y, NO_PREC, count);
+	}
+	else aprint("??");
+	break;
+
+
+    case CLOSURE:
+    
+	sym = actual(x);
+	braces_needed =
+	    precedence(sym) <= outer_prec && (has_lpar(sym) || has_rpar(sym));
+
+	/* print brace if needed */
+	if( braces_needed )  aprint("{ ");
+
+	npar_seen = FALSE;  name_printed = FALSE;
+	for( link = Down(x); link != x;  link = NextDown(link) )
+	{ CountChild(y, link, count);
+	  if( type(y) == PAR )
+	  { assert( Down(y) != y, "EchoObject: Down(PAR)!" );
+	    switch( type(actual(y)) )
+	    {
+	     case LPAR:	Child(tmp, Down(y));
+			echo(tmp, (unsigned) precedence(sym), 1);
+			aprint(" ");
+			break;
+
+	     case NPAR:	if( !name_printed )
+			{ cprint(SymName(sym));
+			  aprint("%");
+			  cprint(SymName(enclosing(sym)));
+			  if( external_ver(x) || external_hor(x) || threaded(x) )
+			  { aprint(" #");
+			    if( external_ver(x) )  aprint(" external_ver");
+			    if( external_hor(x) )  aprint(" external_hor");
+			    if( threaded(x) )  aprint(" threaded");
+			    newline();
+			  }
+			  name_printed = TRUE;
+			}
+			newline();  aprint("  ");
+			cprint( SymName(actual(y)) );
+			aprint(" { ");
+			Child(tmp, Down(y));
+			echo(tmp, NO_PREC, 1);
+			aprint(" }");
+			npar_seen = TRUE;
+			break;
+
+	     case RPAR:	if( !name_printed )
+			{ cprint(SymName(sym));
+			  aprint("%");
+			  cprint(SymName(enclosing(sym)));
+			  if( external_ver(x) || external_hor(x) || threaded(x) )
+			  { aprint(" #");
+			    if( external_ver(x) )  aprint(" external_ver");
+			    if( external_hor(x) )  aprint(" external_hor");
+			    if( threaded(x) )  aprint(" threaded");
+			    newline();
+			  }
+			  name_printed = TRUE;
+			}
+			if( npar_seen ) newline();
+			else aprint(" ");
+			Child(tmp, Down(y));
+			if( has_body(sym) )
+			{ aprint("{ ");
+			  echo(tmp, NO_PREC, 1);
+			  aprint(" }");
+			}
+			else echo(tmp, (unsigned) precedence(sym), 1);
+			break;
+	
+	     default:	assert1(FALSE, "echo:", Image(type(actual(y))));
+			break;
+
+	    }
+	  }
+	}
+	if( !name_printed )
+	{ cprint( SymName(sym) );
+	  aprint("%");
+	  cprint(SymName(enclosing(sym)));
+	  if( external_ver(x) || external_hor(x) || threaded(x) )
+	  { aprint(" #");
+	    if( external_ver(x) )  aprint(" external_ver");
+	    if( external_hor(x) )  aprint(" external_hor");
+	    if( threaded(x) )  aprint(" threaded");
+	    newline();
+	  }
+	}
+
+	/* print closing brace if needed */
+	if( braces_needed ) aprint(" }");
+	break;
+
+
+    case SPLIT:
+    
+	/* this should occur only in debug output case */
+	cprint(KW_SPLIT);  moveright();
+	CountChild(y, DownDim(x, COLM), count);
+	aprint(" COLM:");
+	echo(y, FORCE_PREC, count);
+	newline();
+	/* ***
+	Child(y, DownDim(x, ROWM));
+	aprint(" ROWM:");
+	echo(y, FORCE_PREC);
+	*** */
+	moveleft();
+	break;
+
+
+    case PAR:
+    
+	/* this should occur only in debug output case */
+	aprint("par ");  cprint(SymName(actual(x)));
+	break;
+
+
+    case CR_LIST:
+
+	aprint("(");
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ CountChild(y, link, count);
+	  echo(y, NO_PREC, count);
+	  if( NextDown(link) != x )  aprint(", ");
+	}
+	aprint(")");
+	break;
+
+
+    case MACRO:
+    
+	newline();  cprint(KW_MACRO);
+	aprint(" ");  cprint(SymName(x));
+	if( sym_body(x) != nilobj )
+	{ newline();  cprint(KW_LBR);
+	  y = sym_body(x);
+	  do
+	  { for( i = 1;  i <= vspace(y);  i++ )  newline();
+	    for( i = 1;  i <= hspace(y);  i++ )  aprint(" ");
+	    cprint(EchoToken(y));
+	    y = succ(y, PARENT);
+	  } while( y != sym_body(x) );
+	  newline();  cprint(KW_RBR);
+	}
+	else aprint(" {}");
+	if( visible(x) )  aprint(" # (visible)");
+	break;
+
+
+    case NPAR:
+    case LOCAL:
+    
+	/* print predefined operators in abbreviated form */
+	if( sym_body(x) == nilobj && enclosing(x) != nilobj )
+	{ tab(3); aprint("# sys ");
+	  cprint(SymName(x));
+	  break;
+	}
+
+	/* print def line and miscellaneous debug info */
+	if( type(x) == LOCAL ) newline();
+	cprint(type(x) == NPAR ? KW_NAMED : KW_DEF);
+	aprint(" ");  cprint( SymName(x) );
+	if( recursive(x) || indefinite(x) || visible(x) ||
+	    is_extern_target(x) || uses_extern_target(x) || uses_galley(x) )
+	{ tab(25);  aprint("#");
+	  if( visible(x)  )  aprint(" visible");
+	  if( recursive(x)  )  aprint(" recursive");
+	  if( indefinite(x) )  aprint(" indefinite");
+	  if( is_extern_target(x) )  aprint(" is_extern_target");
+	  if( uses_extern_target(x) )  aprint(" uses_extern_target");
+	  if( uses_galley(x) )  aprint(" uses_galley");
+	}
+
+	/* print uses list, if necessary */
+	if( uses(x) != nilobj || dirty(x) )
+	{ newline();  aprint("   # ");
+	  if( dirty(x) ) aprint("dirty, ");
+	  aprint("uses");
+	  if( uses(x) != nilobj )
+	  { tmp = next(uses(x));
+	    do
+	    { aprint(" "), cprint( SymName(item(tmp)) );
+	      tmp = next(tmp);
+	    } while( tmp != next(uses(x)) );
+	  }
+	  /* ***
+	  for( tmp = uses(x);  tmp != nilobj;  tmp = next(tmp) )
+	  { aprint(" "), cprint( SymName(item(tmp)) );
+	  }
+	  *** */
+	}
+
+	/* print precedence, if necessary */
+	if( precedence(x) != DEFAULT_PREC )
+	{ newline();  aprint("   ");  cprint(KW_PRECEDENCE);
+	  aprint(" ");  printnum(precedence(x));
+	}
+
+	/* print associativity, if necessary */
+	if( !right_assoc(x) )
+	{ newline();  aprint("   ");
+	  cprint(KW_ASSOC);  aprint(" ");  cprint(KW_LEFT);
+	}
+
+	/* print named parameters and local objects */
+	lbr_printed = FALSE;
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ CountChild(y, link, count);
+	  assert( enclosing(y) == x, "echo: enclosing(y) != x!" );
+	  switch( type(y) )
+	  {
+	    case LPAR:
+	    case RPAR:	newline();  aprint("   ");
+			cprint( type(y) == LPAR ? KW_LEFT :
+			    has_body(x) ? KW_BODY : KW_RIGHT);
+			aprint(" ");
+			cprint( SymName(y) );
+			aprint("   # uses_count = ");
+			printnum(uses_count(y));
+			if( visible(y) )  aprint(" (visible)");
+			break;
+
+	    case NPAR:	moveright();  newline();
+			echo(y, NO_PREC, count);
+			aprint("   # uses_count = ");
+			printnum(uses_count(y));
+			moveleft();
+			break;
+
+	    case MACRO:
+	    case LOCAL:	if( !lbr_printed )
+			{ newline();
+			  cprint(KW_LBR);
+			  lbr_printed = TRUE;
+			}
+			moveright();
+			echo(y, NO_PREC, count);
+			moveleft();  newline();
+			break;
+
+	    default:	assert1(FALSE, "echo:", Image(type(y)));
+			break;
+	  }
+	}
+	if( type(x) == NPAR && Down(x) == x )  aprint(" ");
+	else newline();
+	if( !lbr_printed )
+	{ cprint(KW_LBR);  aprint("  ");
+	  lbr_printed = TRUE;
+	}
+	else aprint("   ");
+
+	/* print body */
+	moveright();
+	if( sym_body(x) != nilobj )  echo(sym_body(x), NO_PREC, 1);
+	moveleft();  if( type(x) == LOCAL ) newline();
+	cprint(KW_RBR);
+	break;
+
+
+    case ONE_COL:
+    case ONE_ROW:
+    case HCONTRACT:
+    case VCONTRACT:
+    case HLIMITED:
+    case VLIMITED:
+    case HEXPAND:
+    case VEXPAND:
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case PADJUST:
+    case HADJUST:
+    case VADJUST:
+    case HSCALE:
+    case VSCALE:
+    case HCOVER:
+    case VCOVER:
+    case COMMON:
+    case RUMP:
+    case MELD:
+    case INSERT:
+    case ONE_OF:
+    case NEXT:
+    case PLUS:
+    case MINUS:
+    case WIDE:
+    case HIGH:
+    case HSHIFT:
+    case VSHIFT:
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+    case ROTATE:
+    case BACKGROUND:
+    case SCALE:
+    case KERN_SHRINK:
+    case CASE:
+    case YIELD:
+    case XCHAR:
+    case FONT:
+    case SPACE:
+    case YUNIT:
+    case ZUNIT:
+    case BREAK:
+    case UNDERLINE:
+    case COLOUR:
+    case LANGUAGE:
+    case OPEN:
+    case TAGGED:
+    case ENV_OBJ:
+
+    
+	/* print enclosing left brace if needed */
+	braces_needed = (DEFAULT_PREC <= outer_prec);
+	if( braces_needed )  cprint(KW_LBR), aprint(" ");
+
+	/* print left parameter */
+	if( Down(x) != LastDown(x) )
+	{ CountChild(y, Down(x), count);
+	  echo(y, find_max(outer_prec, DEFAULT_PREC), count);
+	  aprint(" ");
+	}
+
+	cprint(Image(type(x)));
+
+	/* print right parameter */
+	assert( LastDown(x) != x, "echo: right parameter of predefined!" );
+	aprint(" ");
+	CountChild(y, LastDown(x), count);
+	echo(y, type(x)==OPEN ? FORCE_PREC : find_max(outer_prec,DEFAULT_PREC),
+	  count);
+	if( braces_needed )  aprint(" "), cprint(KW_RBR);
+	break;
+
+
+    case RAW_VERBATIM:
+    case VERBATIM:
+
+	cprint(type(x) == VERBATIM ? KW_VERBATIM : KW_RAWVERBATIM);
+	aprint(" ");
+	cprint(KW_LBR);
+	CountChild(y, Down(x), count);
+	if( type(y) == WORD )
+	{ cprint(string(y));
+	}
+	else
+	{ newline();
+	  for( link = Down(y);  link != y;  link = NextDown(link) )
+	  { Child(z, link)
+	    cprint(string(z));
+	    newline();
+	  }
+	}
+	cprint(KW_RBR);
+	break;
+
+
+    case CURR_LANG:
+    case CURR_FAMILY:
+    case CURR_FACE:
+    case BACKEND:
+    case PAGE_LABEL:
+    case HSPAN:
+    case VSPAN:
+
+	/* predefined symbols that have (or may have) no parameters */
+	cprint(Image(type(x)));
+	break;
+
+
+    case FILTERED:
+
+	aprint("[filtered ");
+	if( Down(x) != x )
+	{ Child(y, Down(x));
+	  if( type(y) != WORD ) cprint(Image(type(y)));
+	  else cprint(string(y));
+	}
+	else aprint("?");
+	aprint("]");
+	break;
+
+
+    case NULL_CLOS:
+    
+	cprint(Image(type(x)));
+	break;
+
+
+    case CR_ROOT:
+
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ CountChild(y, link, count);
+	  echo(y, NO_PREC, count);  newline();
+	}
+	break;
+
+
+    case CROSS_SYM:
+
+	aprint("Cross-references for ");
+	cprint(SymName(symb(x)));  newline();
+	switch( target_state(x) )
+	{
+	  case 0:	aprint("NO_TARGET");
+			break;
+
+	  case 1:	aprint("SEEN_TARGET ");
+			printnum(target_seq(x));
+			aprint(": ");
+			echo(target_val(x), NO_PREC, 1);
+			break;
+
+	  case 2:	aprint("WRITTEN_TARGET ");
+			printnum(target_seq(x));
+			aprint(": to file ");
+			cprint(FileName(target_file(x)));
+			aprint(" at ");
+			printnum(target_pos(x));
+			break;
+	
+	  default:	aprint("ILLEGAL!");
+			break;
+	}
+	newline();
+	for( link = Down(x);  link != x;  link = NextDown(link) )
+	{ Child(y, link);
+	  aprint("   ");
+	  cprint(Image(cs_type(y)));
+	  aprint(": ");
+	  cprint(string(y));
+	  newline();
+	}
+	break;
+
+
+    default:
+    
+	assert1(FALSE, "echo:", Image(type(x)));
+	break;
+
+  } /* end switch */
+} /* end echo */
+
+
+/*@::EchoObject(), DebugObject()@*********************************************/
+/*                                                                           */
+/*  FULL_CHAR *EchoObject(x)                                                 */
+/*                                                                           */
+/*  Return an image of unsized object x in result.                           */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *EchoObject(OBJECT x)
+{ debug0(DOE, D, "EchoObject()");
+  fp = null;
+  col = 0;
+  indent = 0;
+  limit  = 60;
+  if( fp == null )
+  BeginString();
+  if( x == nilobj )  AppendString(AsciiToFull("<nilobj>"));
+  else echo(x, type(x) == GAP_OBJ ? VCAT : 0, 1);
+  debug0(DOE, D, "EchoObject returning");
+  return EndString();
+} /* end EchoObject */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DebugObject(x)                                                           */
+/*                                                                           */
+/*  Send an image of unsized object x to result.                             */
+/*                                                                           */
+/*****************************************************************************/
+
+void DebugObject(OBJECT x)
+{ debug0(DOE, D, "DebugObject()");
+  fp = stderr;
+  col = 0;
+  indent = 0;
+  limit  = 60;
+  if( x == nilobj )  fprintf(stderr, "<nilobj>");
+  else echo(x, type(x) == GAP_OBJ ? VCAT : 0, 1);
+  fprintf(stderr, "\n");
+  debug0(DOE, D, "DebugObject returning");
+} /* end DebugObject */
+
+
+/*@::EchoIndex()@*************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *EchoIndex()                                                   */
+/*                                                                           */
+/*  Echo a component of a galley, briefly.                                   */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *EchoIndex(OBJECT index)
+{ static char buff[MAX_BUFF];  OBJECT z;
+  if( index == nilobj )
+  { sprintf(buff, "<nilobj>");
+  }
+  else switch( type(index) )
+  {
+    case RECEIVING:
+
+      sprintf(buff, "receiving %s%s", type(actual(index)) == CLOSURE ?
+	SymName(actual(actual(index))) : Image(type(actual(index))),
+	non_blocking(index) ? " (non_blocking)" : "");
+      break;
+
+
+    case RECEPTIVE:
+
+      sprintf(buff, "receptive %s%s", type(actual(index)) == CLOSURE ?
+	SymName(actual(actual(index))) : Image(type(actual(index))),
+	non_blocking(index) ? " (non_blocking)" : "");
+      break;
+
+
+    case UNATTACHED:
+
+      if( Down(index) != index )
+      { Child(z, Down(index));
+      }
+      else z = nilobj;
+      sprintf(buff, "unattached %s",
+	z == nilobj ? AsciiToFull("<nilobj>") : SymName(actual(z)));
+      break;
+
+
+    case WORD:
+    case QWORD:
+
+      sprintf(buff, "\"%s\"", string(index));
+      break;
+
+
+    default:
+
+      sprintf(buff, "%s", Image(type(index)));
+      break;
+  }
+  return AsciiToFull(buff);
+} /* end EchoIndex */
+
+
+/*@::DebugGalley()@***********************************************************/
+/*                                                                           */
+/*  DebugGalley(hd, pinpt, indent)                                           */
+/*                                                                           */
+/*  Print overview of galley hd on stderr; mark pinpoint if found            */
+/*                                                                           */
+/*****************************************************************************/
+#define dprint(a, b, c) fprintf(stderr, "| %-7s %20s %s\n", a, b, c)
+
+void DebugGalley(OBJECT hd, OBJECT pinpt, int indent)
+{ OBJECT link, y;  char istr[30];  int i;
+  for( i = 0;  i < indent;  i++ )  istr[i] = ' ';
+  istr[i] = '\0';
+  if( type(hd) != HEAD )
+  { fprintf(stderr, "%shd is %s\n", istr, Image(type(hd)));
+    return;
+  }
+  fprintf(stderr, "%sgalley %s into %s\n", istr,
+    SymName(actual(hd)), SymName(whereto(hd)));
+  for( link = Down(hd);  link != hd;  link = NextDown(link) )
+  { Child(y, link);
+    if( y == pinpt )
+    { fprintf(stderr, "++ %s ", Image(type(y)));
+      DebugObject(y);
+    }
+    else
+    if( type(y) == GAP_OBJ )
+      dprint("gap_obj", Image(type(y)), EchoGap(&gap(y)));
+    else if( is_index(type(y)) )
+      dprint("index", Image(type(y)), "");
+    else if( is_definite(type(y)) )
+      dprint("def_obj", Image(type(y)), is_word(type(y)) ? string(y):STR_EMPTY);
+    else if( is_indefinite(type(y)) )
+      dprint("indefin", Image(type(y)),
+	type(y) == CLOSURE ? SymName(actual(y)) : STR_EMPTY);
+    else
+      dprint("unknown", Image(type(y)), "");
+  }
+} /* end DebugGalley */
+#endif
diff --git a/z26.c b/z26.c
new file mode 100644
index 0000000..2fafe70
--- /dev/null
+++ b/z26.c
@@ -0,0 +1,328 @@
+/*@z26.c:Echo Service:BeginString()@******************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z26.c                                                      */
+/*  MODULE:       Echo Service                                               */
+/*  EXTERNS:      BeginString(), AppendString(), EndString(),                */
+/*                EchoLength(), Image()                                      */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+#if DEBUG_ON
+#define	MULTI	  7			/* max no of simultaneous calls      */
+
+static	FULL_CHAR buff[MULTI][2*MAX_BUFF];/* buffers for strings       */
+static	int	curr = 1;		/* current buffer in use             */
+static	int	bp;			/* next free space in buff[curr]     */
+static	BOOLEAN	instring = FALSE;	/* TRUE while making a string        */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BeginString()                                                            */
+/*                                                                           */
+/*  Locate a clear buffer into which debug output may be accumulated.        */
+/*                                                                           */
+/*****************************************************************************/
+
+void BeginString(void)
+{ assert(!instring, "BeginString: currently in string");
+  instring = TRUE;  curr = (curr + 1) % MULTI;
+  assert( 0 <= curr && curr < MULTI, "BeginString: curr!" );
+  StringCopy(buff[curr], "");  bp = 0;
+}
+
+
+/*@::AppendString(), EndString(), EchoLength()@*******************************/
+/*                                                                           */
+/*  AppendString(str, p1, p2, p3, p4, p5, p6)                                */
+/*                                                                           */
+/*  Sprintf str to the current buffer, if space is available there.          */
+/*                                                                           */
+/*****************************************************************************/
+
+void AppendString(FULL_CHAR *str)
+{ int len;
+  assert(instring, "AppendString: no current string");
+  assert( 0 <= curr && curr < MULTI, "BeginString: curr!" );
+  if( bp == MAX_BUFF ) return;		/* no space, do nothing */
+
+  len = StringLength(str);
+  if( len + bp >= MAX_BUFF )
+  { StringCopy( &buff[curr][MAX_BUFF/2], AsciiToFull(" ... <too long>") );
+    bp = MAX_BUFF;
+  }
+  else
+  { StringCopy(&buff[curr][bp], str);
+    while( buff[curr][bp] != '\0' )  bp++;
+    if( bp >= MAX_BUFF )  Error(26, 1, "AppendString abort", INTERN, no_fpos);
+  }
+} /* end AppendString */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *EndString()                                                   */
+/*                                                                           */
+/*  Return the string constructed by previous AppendString operations.       */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *EndString(void)
+{ assert(instring, "EndString: no string");
+  assert( 0 <= curr && curr < MULTI, "BeginString: curr!" );
+  instring = FALSE;
+  return buff[curr];
+} /* end Endstring */
+#endif
+
+/*****************************************************************************/
+/*                                                                           */
+/*  SetLengthDim(int dim)                                                    */
+/*                                                                           */
+/*  Set dimension for echoing lengths.                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+static int length_dim = COLM;
+
+void SetLengthDim(int dim)
+{
+  length_dim = dim;
+}
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *EchoLength(len)                                               */
+/*                                                                           */
+/*  Echo a length.                                                           */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *EchoLength(int len)
+{ static FULL_CHAR buff[8][20];
+  static int i = 0;
+  i = (i + 1) % 8;
+  if( len == MAX_FULL_LENGTH )
+    sprintf( (char *) buff[i], "%s", "INF");
+  else switch( BackEnd )
+  {
+    case POSTSCRIPT:
+    case PDF:
+
+      sprintf( (char *) buff[i], "%.3fc", (float) len/CM);
+      break;
+
+    case PLAINTEXT:
+
+      if( length_dim == COLM )
+      {
+        sprintf( (char *) buff[i], "%.2fs", (float) len/PlainCharWidth);
+      }
+      else
+      {
+        sprintf( (char *) buff[i], "%.2ff", (float) len/PlainCharHeight);
+      }
+      break;
+
+  }
+  return buff[i];
+} /* end EchoLength */
+
+
+/*@::Image()@*****************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *Image(c)                                                      */
+/*                                                                           */
+/*  Returns the string value of type c.                                      */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *Image(unsigned int c)
+{ static FULL_CHAR b[20];
+  switch(c)
+  {
+
+    case LINK:			return  AsciiToFull("link");
+
+    case SPLIT:			return  AsciiToFull("split");
+    case HEAD:			return  AsciiToFull("head");
+    case PAR:			return  AsciiToFull("par");
+    case WORD:			return  AsciiToFull("word");
+    case QWORD:			return  AsciiToFull("qword");
+    case GAP_OBJ:		return  AsciiToFull("gap_obj");
+    case ROW_THR:		return  AsciiToFull("row_thr");
+    case COL_THR:		return  AsciiToFull("col_thr");
+    case CLOSURE:		return  AsciiToFull("closure");
+    case NULL_CLOS:		return  KW_NULL;
+    case PAGE_LABEL:		return  KW_PAGE_LABEL;
+    case CROSS:			return  KW_CROSS;
+    case FORCE_CROSS:		return  KW_FORCE_CROSS;
+    case ONE_COL:		return  KW_ONE_COL;
+    case ONE_ROW:		return  KW_ONE_ROW;
+    case WIDE:			return  KW_WIDE;
+    case HIGH:			return  KW_HIGH;
+    case HSHIFT:		return  KW_HSHIFT;
+    case VSHIFT:		return  KW_VSHIFT;
+    case HSCALE:		return  KW_HSCALE;
+    case VSCALE:		return  KW_VSCALE;
+    case HCOVER:		return  KW_HCOVER;
+    case VCOVER:		return  KW_VCOVER;
+    case HCONTRACT:		return  KW_HCONTRACT;
+    case VCONTRACT:		return  KW_VCONTRACT;
+    case HLIMITED:		return  KW_HLIMITED;
+    case VLIMITED:		return  KW_VLIMITED;
+    case HEXPAND:		return  KW_HEXPAND;
+    case VEXPAND:		return  KW_VEXPAND;
+    case START_HVSPAN:		return  KW_STARTHVSPAN;
+    case START_HSPAN:		return  KW_STARTHSPAN;
+    case START_VSPAN:		return  KW_STARTVSPAN;
+    case HSPAN:			return  KW_HSPAN;
+    case VSPAN:			return  KW_VSPAN;
+    case HSPANNER:		return  AsciiToFull("hspannner");
+    case VSPANNER:		return  AsciiToFull("vspannner");
+    case PADJUST:		return  KW_PADJUST;
+    case HADJUST:		return  KW_HADJUST;
+    case VADJUST:		return  KW_VADJUST;
+    case ROTATE:		return  KW_ROTATE;
+    case BACKGROUND:		return	KW_BACKGROUND;
+    case SCALE:			return  KW_SCALE;
+    case KERN_SHRINK:		return  KW_KERN_SHRINK;
+    case RAW_VERBATIM:		return  KW_RAWVERBATIM;
+    case VERBATIM:		return  KW_VERBATIM;
+    case CASE:			return  KW_CASE;
+    case YIELD:			return  KW_YIELD;
+    case BACKEND:		return  KW_BACKEND;
+    case FILTERED:		return  AsciiToFull("filtered");
+    case XCHAR:			return  KW_XCHAR;
+    case FONT:			return  KW_FONT;
+    case SPACE:			return  KW_SPACE;
+    case YUNIT:			return  KW_YUNIT;
+    case ZUNIT:			return  KW_ZUNIT;
+    case BREAK:			return  KW_BREAK;
+    case UNDERLINE:		return  KW_UNDERLINE;
+    case COLOUR:		return  KW_COLOUR;
+    case LANGUAGE:		return  KW_LANGUAGE;
+    case CURR_LANG:		return  KW_CURR_LANG;
+    case CURR_FAMILY:		return  KW_CURR_FAMILY;
+    case CURR_FACE:		return  KW_CURR_FACE;
+    case COMMON:		return  KW_COMMON;
+    case RUMP:			return  KW_RUMP;
+    case MELD:			return  KW_MELD;
+    case INSERT:		return  KW_INSERT;
+    case ONE_OF:		return  KW_ONE_OF;
+    case NEXT:			return  KW_NEXT;
+    case PLUS:			return  KW_PLUS;
+    case MINUS:			return  KW_MINUS;
+    case ENV_OBJ:		return  AsciiToFull("env_obj");
+    case ENV:			return  KW_ENV;
+    case ENVA:			return  KW_ENVA;
+    case ENVB:			return  KW_ENVB;
+    case ENVC:			return  KW_ENVC;
+    case ENVD:			return  KW_ENVD;
+    case CENV:			return  KW_CENV;
+    case CLOS:			return  KW_CLOS;
+    case LVIS:			return  KW_LVIS;
+    case LUSE:			return  KW_LUSE;
+    case LEO:			return  KW_LEO;
+    case OPEN:			return  KW_OPEN;
+    case TAGGED:		return  KW_TAGGED;
+    case INCGRAPHIC:		return  KW_INCGRAPHIC;
+    case SINCGRAPHIC:		return  KW_SINCGRAPHIC;
+    case PLAIN_GRAPHIC:		return  KW_PLAINGRAPHIC;
+    case GRAPHIC:		return  KW_GRAPHIC;
+    case ACAT:			return  AsciiToFull("acat");
+    case HCAT:			return  AsciiToFull("hcat");
+    case VCAT:			return  AsciiToFull("vcat");
+
+    case TSPACE:		return  AsciiToFull("tspace");
+    case TJUXTA:		return  AsciiToFull("tjuxta");
+    case LBR:			return  AsciiToFull("lbr");
+    case RBR:			return  AsciiToFull("rbr");
+    case UNEXPECTED_EOF:	return  AsciiToFull("unexpected_eof");
+    case BEGIN:			return  KW_BEGIN;
+    case END:			return  KW_END;
+    case USE:			return  KW_USE;
+    case NOT_REVEALED:		return  KW_NOT_REVEALED;
+    case GSTUB_NONE:		return  AsciiToFull("gstub_none");
+    case GSTUB_INT:		return  AsciiToFull("gstub_int");
+    case GSTUB_EXT:		return  AsciiToFull("gstub_ext");
+    case INCLUDE:		return  KW_INCLUDE;
+    case SYS_INCLUDE:		return  KW_SYSINCLUDE;
+    case PREPEND:		return  KW_PREPEND;
+    case SYS_PREPEND:		return  KW_SYSPREPEND;
+    case DATABASE:		return  KW_DATABASE;
+    case SYS_DATABASE:		return  KW_SYSDATABASE;
+    /* case START: 		return  AsciiToFull("start"); unused */
+
+    case DEAD:			return  AsciiToFull("dead");
+    case UNATTACHED:		return  AsciiToFull("unattached");
+    case RECEPTIVE:		return  AsciiToFull("receptive");
+    case RECEIVING:		return  AsciiToFull("receiving");
+    case RECURSIVE:		return  AsciiToFull("recursive");
+    case PRECEDES:		return  AsciiToFull("precedes");
+    case FOLLOWS:		return  AsciiToFull("follows");
+    case CROSS_LIT:		return  AsciiToFull("cross_lit");
+    case CROSS_FOLL:		return  AsciiToFull("cross_foll");
+    case CROSS_FOLL_OR_PREC:	return  AsciiToFull("cross_foll_or_prec");
+    case GALL_FOLL:		return  AsciiToFull("gall_foll");
+    case GALL_FOLL_OR_PREC:	return  AsciiToFull("gall_foll_or_prec");
+    case CROSS_TARG:		return  AsciiToFull("cross_targ");
+    case GALL_TARG:		return  AsciiToFull("gall_targ");
+    case GALL_PREC:		return  AsciiToFull("gall_prec");
+    case CROSS_PREC:		return  AsciiToFull("cross_prec");
+    case PAGE_LABEL_IND:	return  AsciiToFull("page_label_ind");
+    case SCALE_IND:		return  AsciiToFull("scale_ind");
+    case COVER_IND:		return  AsciiToFull("cover_ind");
+    case EXPAND_IND:		return  AsciiToFull("expand_ind");
+    case THREAD:		return  AsciiToFull("thread");
+    case CROSS_SYM:		return  AsciiToFull("cross_sym");
+    case CR_ROOT:		return  AsciiToFull("cr_root");
+    case MACRO:			return  KW_MACRO;
+    case LOCAL:			return  AsciiToFull("local");
+    case LPAR:			return  AsciiToFull("lpar");
+    case NPAR:			return  AsciiToFull("npar");
+    case RPAR:			return  AsciiToFull("rpar");
+    case CR_LIST:		return  AsciiToFull("cr_list");
+    case EXT_GALL:		return  AsciiToFull("ext_gall");
+    case DISPOSED:		return  AsciiToFull("disposed");
+
+    case BACK:			return  AsciiToFull("back");
+    case ON:			return  AsciiToFull("on");
+    case FWD:			return  AsciiToFull("fwd");
+
+    case PROMOTE:		return  AsciiToFull("promote");
+    case CLOSE:			return  AsciiToFull("close");
+    case BLOCK:			return  AsciiToFull("block");
+    case CLEAR:			return  AsciiToFull("clear");
+
+    case GAP_ABS:		return  AsciiToFull("abs");
+    case GAP_INC:		return  AsciiToFull("inc");
+    case GAP_DEC:		return  AsciiToFull("dec");
+
+    default:			sprintf( (char *) b, "?? (%d)", c);
+				return b;
+  } /* end switch */
+} /* end Image */
diff --git a/z27.c b/z27.c
new file mode 100644
index 0000000..dc40a3a
--- /dev/null
+++ b/z27.c
@@ -0,0 +1,209 @@
+/*@z27.c:Debug Service:Debug flags@*******************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z27.c                                                      */
+/*  MODULE:       Debug Service                                              */
+/*  EXTERNS:      dbg[], DebugInit(), Debug()                                */
+/*                ProfileOn(), ProfileOff(), ProfilePrint()                  */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+#if DEBUG_ON
+struct dbs  dbg[] = {
+    {"zz",    {0, 0, 0}},		/* - unused -                */
+    {"sp",    {0, 0, 0}},		/* Supervise                 */
+    {"la",    {0, 0, 0}},		/* Lexical Analyser          */
+    {"fs",    {0, 0, 0}},		/* File Service              */
+    {"ts",    {0, 0, 0}},		/* Token Service             */
+    {"rd",    {0, 0, 0}},		/* Read Definitions          */
+    {"op",    {0, 0, 0}},		/* Object Parser             */
+    {"os",    {0, 0, 0}},		/* Object Service            */
+    {"om",    {0, 0, 0}},		/* Object Manifest           */
+    {"ce",    {0, 0, 0}},		/* Closure Expansion         */
+    {"cr",    {0, 0, 0}},		/* Cross References          */
+    {"ss",    {0, 0, 0}},		/* Style Service             */
+    {"sf",    {0, 0, 0}},		/* Size Finder               */
+    {"ob",    {0, 0, 0}},		/* Object Breaking           */
+    {"of",    {0, 0, 0}},		/* Object Filling            */
+    {"sc",    {0, 0, 0}},		/* Size Constraints          */
+    {"sa",    {0, 0, 0}},		/* Size Adjustments          */
+    {"gw",    {0, 0, 0}},		/* Gap Widths                */
+    {"gt",    {0, 0, 0}},		/* Galley Transfer           */
+    {"ga",    {0, 0, 0}},		/* Galley Attaching          */
+    {"gf",    {0, 0, 0}},		/* Galley Flusher            */
+    {"gm",    {0, 0, 0}},		/* Galley Maker              */
+    {"gs",    {0, 0, 0}},		/* Galley Service            */
+    {"gp",    {0, 0, 0}},		/* Galley Printer            */
+    {"ps",    {0, 0, 0}},		/* Print Service             */
+    {"oe",    {0, 0, 0}},		/* Object Echo               */
+    {"es",    {0, 0, 0}},		/* Echo Service              */
+    {"zz",    {0, 0, 0}},		/* Debug Service (unused)    */
+    {"yy",    {0, 0, 0}},		/* Error Service             */
+    {"st",    {0, 0, 0}},		/* Symbol Table              */
+    {"su",    {0, 0, 0}},		/* Symbol Uses               */
+    {"ma",    {0, 0, 0}},		/* Memory Allocator          */
+    {"cs",    {0, 0, 0}},		/* Counter Service           */
+    {"bs",    {0, 0, 0}},		/* Database Service          */
+    {"rs",    {0, 0, 0}},		/* Rotation Service          */
+    {"tk",    {0, 0, 0}},		/* Time Keeper               */
+    {"hy",    {0, 0, 0}},		/* Hyphenation               */
+    {"ft",    {0, 0, 0}},		/* Font Tables               */
+    {"cm",    {0, 0, 0}},		/* Character Mappings        */
+    {"sh",    {0, 0, 0}},		/* String Handler            */
+    {"fh",    {0, 0, 0}},		/* Filter Handler            */
+    {"io",    {0, 0, 0}},		/* Object Input-Output       */
+    {"co",    {0, 0, 0}},		/* Colour Service            */
+    {"ls",    {0, 0, 0}},		/* Language Service          */
+    {"vh",    {0, 0, 0}},		/* Vertical Hyphenation      */
+    {"ex",    {0, 0, 0}},		/* External Sort             */
+    {"og",    {0, 0, 0}},		/* Optimal Galleys           */
+    {"et",    {0, 0, 0}},		/* Environment Table         */
+    {"pd",    {0, 0, 0}},		/* PDF Back End              */
+    {"pp",    {0, 0, 0}},		/* Profiling                 */
+    {"",      {0, 0, 0}},		/* any                       */
+};
+
+/*@::DebugInit(), Debug()@****************************************************/
+/*                                                                           */
+/*  DebugInit(str)                                                           */
+/*                                                                           */
+/*  Turn on the debug flag given by str.                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void DebugInit(FULL_CHAR *str)
+{ int j, urg;
+  for( urg = 0;  urg < 2 && str[urg+2] == CH_FLAG_DEBUG;  urg++ );
+  for( j = 1;  ;  j++ )
+  { if( StringEqual(AsciiToFull(dbg[j].flag), &str[urg+2]) )  break;
+    if( StringEqual(AsciiToFull(dbg[j].flag), STR_EMPTY) )
+      Error(27, 1, "unknown debug flag %s", FATAL, no_fpos, str);
+  }
+  for( ;  urg >= 0;  urg-- )  dbg[j].on[urg] = dbg[ANY].on[urg] = TRUE;
+} /* end DebugInit */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  Debug(category, urgency, str, ...)                                       */
+/*                                                                           */
+/*  Print str on debug output, if the flag corresponding to the given        */
+/*  debug category and urgency is on.                                        */
+/*                                                                           */
+/*****************************************************************************/
+
+void Debug(int category, int urgency, char *str, ...)
+{ static BOOLEAN first_message = TRUE;
+  va_list ap;
+  if( first_message )
+  { fprintf(stderr, "\nLout Debug Output:\n");
+    first_message = FALSE;
+  }
+  fprintf(stderr, "%2s: ", dbg[category].flag);
+  va_start(ap, str);
+  vfprintf(stderr, str, ap);
+  va_end(ap);
+  fprintf(stderr, "\n");
+  fflush(stderr);
+} /* end Debug */
+
+
+/*@::ProfileOn(), ProfileOff(), ProfilePrint()@*******************************/
+/*                                                                           */
+/*  ProfileOn(str)                                                           */
+/*                                                                           */
+/*  Start profiling label str.                                               */
+/*                                                                           */
+/*****************************************************************************/
+#define MAXPROF	20
+#include <time.h>
+
+struct profrec
+{ char *label;			/* label of the profile              */
+  int calls;			/* number of calls with this label   */
+  long time;			/* total time of this label          */
+};
+
+static struct profrec profstack[MAXPROF];
+static struct profrec profstore[MAXPROF];
+static int proftop = 0, profsize = 0;
+
+void ProfileOn(char *str)
+{ int i;  time_t raw_time;
+  for( i = 0;  i < proftop;  i++ )
+  { if( strcmp(profstack[i].label, str) == 0 )
+    { for( i = 0;  i < proftop;  i++ )
+	fprintf(stderr, "profstack[%d] = %s\n", i, profstack[i].label);
+      assert1(FALSE, "ProfileOn: restarted", str);
+    }
+  }
+  assert(proftop < MAXPROF, "ProfileOn: overflow");
+  time(&raw_time);  profstack[proftop].label = str;
+  profstack[proftop++].time  = raw_time;
+} /* end ProfileOn */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  ProfileOff(str)                                                          */
+/*                                                                           */
+/*  Stop profiling label str.                                                */
+/*                                                                           */
+/*****************************************************************************/
+
+void ProfileOff(char *str)
+{ int i;  time_t raw_time;
+  assert1(proftop > 0 && strcmp(profstack[proftop-1].label, str) == 0,
+    "ProfileOff: not current", str);
+  for( i = 0;  i < profsize && strcmp(profstore[i].label, str) != 0; i++ );
+  if( i >= profsize )
+  { profsize++;
+    assert(profsize < MAXPROF, "ProfileOff: overflow");
+    profstore[i].label = str;
+    profstore[i].calls = 0;
+    profstore[i].time  = 0;
+  }
+  time(&raw_time);  profstore[i].calls += 1;
+  profstore[i].time  += (raw_time - profstack[--proftop].time);
+} /* end ProfileOff */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  ProfilePrint()                                                           */
+/*                                                                           */
+/*  Print results of profiling.                                              */
+/*                                                                           */
+/*****************************************************************************/
+
+void ProfilePrint(void)
+{ int i;
+  for( i = 0;  i < profsize;  i++ )
+  { fprintf(stderr, "Profile %-20s  %6ld secs, %3d calls, %6.2f secs/call\n",
+	profstore[i].label, profstore[i].time, profstore[i].calls,
+	(float) profstore[i].time / profstore[i].calls );
+  }
+} /* end ProfilePrint */
+#endif
diff --git a/z28.c b/z28.c
new file mode 100644
index 0000000..8aea5ac
--- /dev/null
+++ b/z28.c
@@ -0,0 +1,259 @@
+/*@z28.c:Error Service:ErrorInit(), ErrorSeen()@******************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z28.c                                                      */
+/*  MODULE:       Error Service                                              */
+/*  EXTERNS:      ErrorInit(), Error(), ErrorSeen()                          */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+#define	MAX_BLOCKS	 20		/* max number of error blocks        */
+#define	MAX_ERRORS	 20		/* max number of held error messages */
+
+static BOOLEAN	print_block[MAX_BLOCKS];	/* TRUE if print this block  */
+static int	start_block[MAX_BLOCKS];	/* first message of block    */
+static char	message[MAX_ERRORS][MAX_BUFF];	/* the error messages        */
+static int	message_fnum[MAX_ERRORS];	/* file number of error mess */
+static FILE	*fp = NULL;			/* file pointer of log file  */
+static BOOLEAN	error_seen = FALSE;		/* TRUE after first error    */
+static int	block_top = 0;			/* first free error block    */
+static int	mess_top = 0;			/* first free error message  */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  ErrorInit(str)                                                           */
+/*                                                                           */
+/*  Open log file str and initialise this module.                            */
+/*                                                                           */
+/*****************************************************************************/
+
+void ErrorInit(FULL_CHAR *str)
+{ if( fp != NULL )
+    Error(28, 1, "-e argument appears twice in command line", FATAL, no_fpos);
+  fp = StringFOpen(str, WRITE_TEXT);
+  if( fp == NULL )
+    Error(28, 2, "cannot open error file %s", FATAL, no_fpos, str);
+} /* end ErrorInit */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN ErrorSeen()                                                      */
+/*                                                                           */
+/*  TRUE once an error has been found.                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN ErrorSeen(void)
+{ return error_seen;
+} /* end ErrorSeen */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PrintFileBanner(fnum)                                                    */
+/*                                                                           */
+/*  If fnum was not the subject of the previous call to PrintFileBanner,     */
+/*  print a file banner for fnum.                                            */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PrintFileBanner(int fnum)
+{ static int CurrentFileNum = -1;
+  if( fnum != CurrentFileNum )
+  { fprintf(fp, "lout%s:\n", EchoFileSource(fnum));
+    CurrentFileNum = fnum;
+  }
+} /* end PrintFileBanner */
+
+
+/*@::EnterErrorBlock(), LeaveErrorBlock()@************************************/
+/*                                                                           */
+/*  EnterErrorBlock(ok_to_print)                                             */
+/*                                                                           */
+/*  Start off a new block of error messages.  If ok_to_print, they do not    */
+/*  need to be held for a later commit.                                      */
+/*                                                                           */
+/*****************************************************************************/
+
+void EnterErrorBlock(BOOLEAN ok_to_print)
+{ if( block_top < MAX_BLOCKS )
+  { print_block[block_top] = ok_to_print;
+    start_block[block_top] = mess_top;
+    block_top++;
+  }
+  else Error(28, 3, "too many levels of error messages", FATAL, no_fpos);
+} /* end EnterErrorBlock */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  LeaveErrorBlock(commit)                                                  */
+/*                                                                           */
+/*  Finish off a block of error messages.  If commit is true, print them,    */
+/*  otherwise discard them.                                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void LeaveErrorBlock(BOOLEAN commit)
+{ int i;
+  debug0(DYY, D, "  leaving error block");
+  assert( block_top > 0, "LeaveErrorBlock: no matching EnterErrorBlock!" );
+  assert( commit || !print_block[block_top - 1], "LeaveErrorBlock: commit!" );
+  if( fp == NULL )  fp = stderr;
+  if( commit )
+  { for( i = start_block[block_top - 1];  i < mess_top;  i++ )
+    {
+      if( AltErrorFormat )
+      { fputs(message[i], fp);
+      }
+      else
+      { PrintFileBanner(message_fnum[i]);
+        fputs(message[i], fp);
+      }
+    }
+  }
+  block_top--;
+  mess_top = start_block[block_top];
+} /* end LeaveErrorBlock */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  CheckErrorBlocks()                                                       */
+/*                                                                           */
+/*  Check (at end of run) that all error blocks have been unstacked.         */
+/*                                                                           */
+/*****************************************************************************/
+
+void CheckErrorBlocks(void)
+{ assert( block_top == 0, "CheckErrorBlocks: block_top != 0!" );
+} /* end CheckErrorBlocks */
+
+
+/*@::Error()@*****************************************************************/
+/*                                                                           */
+/*  Error(etype, pos, str, p1, p2, p3, p4, p5, p6)                           */
+/*                                                                           */
+/*  Report error of type etype at position *pos in input.                    */
+/*  The error message is str with parameters p1 - p6.                        */
+/*                                                                           */
+/*****************************************************************************/
+
+POINTER Error(int set_num, int msg_num, char *str, int etype, FILE_POS *pos, ...)
+{
+  va_list ap;
+  char val[MAX_BUFF];
+  va_start(ap, pos);
+  vsprintf(val, condcatgets(MsgCat, set_num, msg_num, str), ap);
+  if( fp == NULL )  fp = stderr;
+  switch( etype )
+  {
+
+    case INTERN:
+    
+      while( block_top > 0 )  LeaveErrorBlock(TRUE);
+      if( AltErrorFormat )
+      {
+        fprintf(fp, condcatgets(MsgCat, 28, 7, "%s internal error: %s\n"),
+	  EchoAltFilePos(pos), val);
+        /* for estrip's benefit: Error(28, 7, "%s internal error: %s\n") */
+      }
+      else
+      {
+        PrintFileBanner(file_num(*pos));
+        fprintf(fp, condcatgets(MsgCat, 28, 4, "  %6s internal error: %s\n"),
+	  EchoFileLine(pos), val);
+        /* for estrip's benefit: Error(28, 4, "  %6s internal error: %s\n") */
+      }
+#if DEBUG_ON
+      abort();
+#else
+      exit(1);
+#endif
+      break;
+
+
+    case FATAL:
+    
+      while( block_top > 0 )  LeaveErrorBlock(TRUE);
+      if( AltErrorFormat )
+      {
+        fprintf(fp, condcatgets(MsgCat, 28, 8, "%s: fatal error: %s\n"),
+	  EchoAltFilePos(pos), val);
+      }
+      else
+      {
+        PrintFileBanner(file_num(*pos));
+        fprintf(fp, condcatgets(MsgCat, 28, 5, "  %6s: fatal error: %s\n"),
+	  EchoFileLine(pos), val);
+      }
+      /* for estrip's benefit: Error(28, 5, "  %6s: fatal error: %s\n") */
+      /* for estrip's benefit: Error(28, 8, "%s: fatal error: %s\n") */
+      exit(1);
+      break;
+
+
+    case WARN:
+    
+      if( block_top == 0 || print_block[block_top - 1] )
+      {
+	if( AltErrorFormat )
+	{
+	  fprintf(fp, "%s: %s\n", EchoAltFilePos(pos), val);
+	}
+	else
+	{
+	  PrintFileBanner(file_num(*pos));
+	  fprintf(fp, "  %6s: %s\n", EchoFileLine(pos), val);
+	}
+      }
+      else if( mess_top < MAX_ERRORS )
+      {
+	if( AltErrorFormat )
+	{
+	  sprintf(message[mess_top++], "%s: %s\n", EchoAltFilePos(pos), val);
+	}
+	else
+	{ message_fnum[mess_top] = file_num(*pos);
+	  sprintf(message[mess_top++], "  %6s: %s\n",
+	    EchoFileLine(pos), val);
+	}
+      }
+      else Error(28, 6, "too many error messages", FATAL, pos);
+      error_seen = TRUE;
+      break;
+
+
+    default:
+    
+      assert(FALSE, "Error: invalid error type");
+      break;
+
+  }
+  va_end(ap);
+  return 0;
+} /* end Error */
diff --git a/z29.c b/z29.c
new file mode 100644
index 0000000..8c3e58e
--- /dev/null
+++ b/z29.c
@@ -0,0 +1,772 @@
+/*@z29.c:Symbol Table:Declarations, hash()@***********************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z29.c                                                      */
+/*  MODULE:       Symbol Table                                               */
+/*  EXTERNS:      InitSym(), PushScope(), PopScope(), SuppressVisible(),     */
+/*                UnSuppressVisible(), SuppressScope(), UnSuppressScope(),   */
+/*                SwitchScope(), UnSwitchScope(), BodyParAllowed(),          */
+/*                BodyParNotAllowed(), InsertSym(), SearchSym(),             */
+/*                SymName(), FullSymName(), ChildSym(), CheckSymSpread(),    */
+/*                DeleteEverySym()                                           */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+#define	MAX_STACK	300		/* size of scope stack               */
+#define	MAX_TAB		1783		/* size of hash table                */
+
+#define	length(x)	word_font(x)
+
+static	OBJECT		scope[MAX_STACK];		/* the scope stack   */
+static	BOOLEAN		npars_only[MAX_STACK];		/* look for NPAR exc */
+static	BOOLEAN		vis_only[MAX_STACK];		/* look for visibles */
+static	BOOLEAN		body_ok[MAX_STACK];		/* look for body par */
+static	BOOLEAN		suppress_scope;			/* suppress scoping  */
+static	BOOLEAN		suppress_visible;		/* suppress visible  */
+static	int		scope_top;			/* scope stack top   */
+static	struct { OBJECT f1, f2; } symtab[MAX_TAB];	/* the hash table    */
+#if DEBUG_ON
+static	int		sym_spread[MAX_TAB] = { 0 };	/* hash table spread */
+static	int		sym_count = 0;			/* symbol count      */
+#endif
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  #define hash(str, len, val)                                              */
+/*                                                                           */
+/*  Set val to the hash value of string str, which has length len.           */
+/*  The hash function is just the character sum mod MAX_TAB.                 */
+/*  This definition assumes that working variables rlen and x exist.         */
+/*                                                                           */
+/*****************************************************************************/
+
+#define hash(str, len, val)						\
+{ rlen = len;								\
+  x    = str;								\
+  val  = *x++;								\
+  while( --rlen )  val += *x++;						\
+  val %= MAX_TAB;							\
+}
+
+
+/*@::InitSym(), PushScope(), PopScope(), SuppressVisible(), etc.@*************/
+/*                                                                           */
+/*  InitSym()                                                                */
+/*                                                                           */
+/*  Initialize the symbol table to empty.                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+void InitSym(void)
+{ int i;
+  scope_top = 0;
+  suppress_scope = FALSE;
+  suppress_visible = FALSE;
+  for( i = 0;  i < MAX_TAB;  i++ )
+    symtab[i].f1 = symtab[i].f2 = (OBJECT) &symtab[i];
+} /* end InitSym */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PushScope(x, npars, vis)                                                 */
+/*  PopScope()                                                               */
+/*                                                                           */
+/*  Add or remove an OBJECT x (which must be in the symbol table) to or from */
+/*  the scope stack.  If npars is TRUE, only the named parameters of x are   */
+/*  added to scope.  If vis is TRUE, only visible locals and parameters are  */
+/*  added.                                                                   */
+/*                                                                           */
+/*****************************************************************************/
+
+void PushScope(OBJECT x, BOOLEAN npars, BOOLEAN vis)
+{ debug3(DST, DD, "[ PushScope(%s, %s, %s)", SymName(x), bool(npars), bool(vis));
+  assert( suppress_scope == FALSE, "PushScope: suppress_scope!" );
+  if( scope_top >= MAX_STACK )
+  {
+#if DEBUG_ON
+    int i;
+    for( i = 0; i < scope_top; i++ )
+      Error(29, 1, "  scope[%2d] = %s", WARN, &fpos(x), i, SymName(scope[i]));
+#endif
+    Error(29, 2, "scope depth limit exceeded", INTERN, &fpos(x));
+  }
+  scope[scope_top]      = x;
+  npars_only[scope_top] = npars;
+  vis_only[scope_top]   = vis;
+  body_ok[scope_top]    = FALSE;
+  scope_top++;
+} /* end PushScope */
+
+void PopScope(void)
+{ debug0(DST, DD, "] PopScope()");
+  assert( scope_top > 0, "PopScope: tried to pop empty scope stack");
+  assert( suppress_scope == FALSE, "PopScope: suppress_scope!" );
+  scope_top--;
+} /* end PopScope */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  SuppressVisible()                                                        */
+/*  UnSuppressVisible()                                                      */
+/*                                                                           */
+/*  Make all children of any symbol acceptable, not just the exported ones.  */
+/*                                                                           */
+/*****************************************************************************/
+
+void SuppressVisible(void)
+{ debug0(DST, DD, "[ SuppressVisible()");
+  suppress_visible = TRUE;
+} /* end SuppressVisible */
+
+void UnSuppressVisible(void)
+{ debug0(DST, DD, "] UnSuppressVisible()");
+  suppress_visible = FALSE;
+} /* end UnSuppressVisible */
+
+
+/*@::SuppressScope(), UnSuppressScope(), SwitchScope(), UnswitchScope()@******/
+/*                                                                           */
+/*  SuppressScope()                                                          */
+/*  UnSuppressScope()                                                        */
+/*                                                                           */
+/*  Suppress all scopes (so that all calls to SearchSym fail); and undo it.  */
+/*                                                                           */
+/*****************************************************************************/
+
+
+void SuppressScope(void)
+{ debug0(DST, DD, "[ SuppressScope()");
+  suppress_scope = TRUE;
+} /* end SuppressScope */
+
+void UnSuppressScope(void)
+{ debug0(DST, DD, "] UnSuppressScope()");
+  suppress_scope = FALSE;
+} /* end UnSuppressScope */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  SwitchScope(sym)                                                         */
+/*  UnSwitchScope(sym)                                                       */
+/*                                                                           */
+/*  Switch to the scope of sym (if nilobj, StartSym); and switch back again. */
+/*                                                                           */
+/*****************************************************************************/
+
+void SwitchScope(OBJECT sym)
+{ int i;
+  OBJECT new_scopes[MAX_STACK];
+  if( sym == nilobj )  PushScope(StartSym, FALSE, FALSE);
+  else
+  { i = 0;
+    while( sym != StartSym )
+    { new_scopes[i++] = enclosing(sym);
+      sym = enclosing(sym);
+    }
+    while( i > 0 )  PushScope(new_scopes[--i], FALSE, FALSE);
+  }
+}
+
+void UnSwitchScope(OBJECT sym)
+{ if( sym == nilobj )  PopScope();
+  else
+  { while( sym != StartSym )
+    { PopScope();
+      sym = enclosing(sym);
+    }
+  }
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BodyParAllowed()                                                         */
+/*  BodyParNotAllowed()                                                      */
+/*                                                                           */
+/*  Allow or disallow invocations of the body parameter of the current tos.  */
+/*                                                                           */
+/*****************************************************************************/
+
+void BodyParAllowed(void)
+{ debug0(DST, DD, "BodyParAllowed()");
+  body_ok[scope_top-1] = TRUE;
+} /* end BodyParAllowed */
+
+void BodyParNotAllowed(void)
+{ debug0(DST, DD, "BodyParNotAllowed()");
+  body_ok[scope_top-1] = FALSE;
+} /* end BodyParNotAllowed */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DebugScope(void)                                                         */
+/*                                                                           */
+/*  Debug print of current scope stack                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+void DebugScope(void)
+{ int i;
+  if( suppress_scope )
+  {
+    debug0(DST, DD, "suppressed");
+  }
+  else for( i = 0;  i < scope_top;  i++ )
+  { debug6(DST, DD, "%s %s%s%s%s%s",
+      i == scope_top - 1 ? "->" : "  ",
+      SymName(scope[i]),
+      npars_only[i] ? " npars_only" : "",
+      vis_only[i]   ? " vis_only"   : "",
+      body_ok[i]    ? " body_ok"    : "",
+      i == scope_top - 1 && suppress_visible ? " suppress_visible" : "");
+  }
+} /* end DebugScope */
+
+
+/*@::InsertSym()@*************************************************************/
+/*                                                                           */
+/*  OBJECT InsertSym(str, xtype, xfpos, xprecedence, indefinite, xrecursive, */
+/*                                         xpredefined, xenclosing, xbody)   */
+/*                                                                           */
+/*  Insert a new symbol into the table.  Its string value is str.            */
+/*  Initialise the symbol as the parameters indicate.                        */
+/*  Return a pointer to the new symbol.                                      */
+/*  If str is not a valid symbol name, InsertSym prints an error             */
+/*  message and does not insert the symbol.                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT InsertSym(FULL_CHAR *str, unsigned char xtype, FILE_POS *xfpos,
+unsigned char xprecedence, BOOLEAN xindefinite, BOOLEAN xrecursive,
+unsigned xpredefined, OBJECT xenclosing, OBJECT xbody)
+{ register int sum, rlen;
+  register unsigned char *x;
+  OBJECT p, q, s, tmp, link, entry, plink;  int len;
+
+  debug3(DST, DD, "InsertSym( %s, %s, in %s )",
+	Image(xtype), str, SymName(xenclosing));
+  if( !LexLegalName(str) )
+    Error(29, 3, "invalid symbol name %s", WARN, xfpos, str);
+
+  New(s, xtype);
+  FposCopy(fpos(s), *xfpos);
+  has_body(s)          = FALSE;
+  filter(s)            = nilobj;
+  use_invocation(s)    = nilobj;
+  imports(s)           = nilobj;
+  imports_encl(s)      = FALSE;
+  right_assoc(s)       = TRUE;
+  precedence(s)        = xprecedence;
+  indefinite(s)        = xindefinite;
+  recursive(s)         = xrecursive;
+  predefined(s)        = xpredefined;
+  enclosing(s)         = xenclosing;
+  sym_body(s)          = xbody;
+  base_uses(s)         = nilobj;
+  uses(s)              = nilobj;
+  marker(s)            = nilobj;
+  cross_sym(s)         = nilobj;
+  is_extern_target(s)  = FALSE;
+  uses_extern_target(s)= FALSE;
+  visible(s)           = FALSE;
+  uses_galley(s)       = FALSE;
+  horiz_galley(s)      = ROWM;
+  has_compulsory(s)    = 0;
+  is_compulsory(s)     = FALSE;
+
+  uses_count(s)  = 0;
+  dirty(s)       = FALSE;
+  if( enclosing(s) != nilobj && type(enclosing(s)) == NPAR )
+    dirty(enclosing(s)) = TRUE;
+
+  has_par(s)     = FALSE;
+  has_lpar(s)    = FALSE;
+  has_rpar(s)    = FALSE;
+  if( is_par(type(s)) )  has_par(enclosing(s))  = TRUE;
+  if( type(s) == LPAR )  has_lpar(enclosing(s)) = TRUE;
+  if( type(s) == RPAR )  has_rpar(enclosing(s)) = TRUE;
+
+  /* assign a code letter between a and z to any NPAR symbol */
+  if( type(s) == NPAR )
+  { if( LastDown(enclosing(s)) != enclosing(s) )
+    { Child(tmp, LastDown(enclosing(s)));
+      if( type(tmp) == NPAR )
+      { if( npar_code(tmp) == 'z' || npar_code(tmp) == ' ' )
+	  npar_code(s) = ' ';
+	else
+	  npar_code(s) = npar_code(tmp)+1;
+      }
+      else
+	npar_code(s) = 'a';
+    }
+    else npar_code(s) = 'a';
+  }
+
+  has_target(s)  = FALSE;
+  force_target(s) = FALSE;
+  if( !StringEqual(str, KW_TARGET) ) is_target(s) = FALSE;
+  else
+  { is_target(s) = has_target(enclosing(s)) = TRUE;
+
+    /* if @Target is found after @Key, take note of external target */
+    if( has_key(enclosing(s)) && xbody != nilobj && is_cross(type(xbody)) )
+    { if( LastDown(xbody) != Down(xbody) )
+      { OBJECT sym;
+	Child(sym, Down(xbody));
+	if( type(sym) == CLOSURE )
+	{ is_extern_target(actual(sym)) = TRUE;
+	  uses_extern_target(actual(sym)) = TRUE;
+	}
+      }
+    }
+  }
+
+  has_tag(s) = is_tag(s) = FALSE;
+  has_key(s) = is_key(s) = FALSE;
+  has_optimize(s) = is_optimize(s) = FALSE;
+  has_merge(s) = is_merge(s) = FALSE;
+  has_enclose(s) = is_enclose(s) = FALSE;
+  if( enclosing(s) != nilobj && type(enclosing(s)) == LOCAL )
+  {
+    if( StringEqual(str, KW_TAG) )
+      is_tag(s) = has_tag(enclosing(s)) = dirty(enclosing(s)) = TRUE;
+
+    if( StringEqual(str, KW_OPTIMIZE) )
+      is_optimize(s) = has_optimize(enclosing(s)) = TRUE;
+
+    if( StringEqual(str, KW_KEY) )
+    { is_key(s) = has_key(enclosing(s)) = dirty(enclosing(s)) = TRUE;
+
+      /* if @Key is found after @Target, take note of external target */
+      for( link=Down(enclosing(s));  link!=enclosing(s);  link=NextDown(link) )
+      { Child(p, link);
+	if( is_target(p) && sym_body(p)!=nilobj && is_cross(type(sym_body(p))) )
+	{ OBJECT sym;
+	  Child(sym, Down(sym_body(p)));
+	  if( type(sym) == CLOSURE )
+	  { is_extern_target(actual(sym)) = TRUE;
+	    uses_extern_target(actual(sym)) = TRUE;
+	  }
+	}
+      }
+    } 
+
+    if( StringEqual(str, KW_MERGE) )
+      is_merge(s) = has_merge(enclosing(s)) = TRUE;
+
+    if( StringEqual(str, KW_ENCLOSE) )
+      is_enclose(s) = has_enclose(enclosing(s)) = TRUE;
+  }
+
+  if( StringEqual(str, KW_FILTER) )
+  { if( type(s) != LOCAL || enclosing(s) == StartSym )
+      Error(29, 4, "%s must be a local definition", WARN, &fpos(s), str);
+    else if( !has_rpar(enclosing(s)) )
+      Error(29, 14, "%s must lie within a symbol with a right parameter",
+	WARN, &fpos(s), KW_FILTER);
+    else
+    { filter(enclosing(s)) = s;
+      precedence(enclosing(s)) = FILTER_PREC;
+    }
+  }
+
+  if( type(s) == RPAR && has_body(enclosing(s)) &&
+    (is_tag(s) || is_key(s) || is_optimize(s)) )
+    Error(29, 5, "a body parameter may not be named %s", WARN, &fpos(s), str);
+
+  if( type(s) == RPAR && has_target(enclosing(s)) &&
+    (is_tag(s) || is_key(s) || is_optimize(s)) )
+    Error(29, 6, "the right parameter of a galley may not be called %s",
+      WARN, &fpos(s), str);
+
+  len = StringLength(str);
+  hash(str, len, sum);
+
+  ifdebug(DST, D, sym_spread[sum]++;  sym_count++);
+  entry = (OBJECT) &symtab[sum];
+  for( plink = Down(entry);  plink != entry;  plink = NextDown(plink) )
+  { Child(p, plink);
+    if( length(p) == len && StringEqual(str, string(p)) )
+    { for( link = Down(p);  link != p;  link = NextDown(link) )
+      {	Child(q, link);
+	if( enclosing(s) == enclosing(q) )
+	{ Error(29, 7, "symbol %s previously defined at%s",
+	    WARN, &fpos(s), str, EchoFilePos(&fpos(q)) );
+	  if( AltErrorFormat )
+	  {
+	    Error(29, 13, "symbol %s previously defined here",
+	      WARN, &fpos(q), str);
+	  }
+	  break;
+	}
+      }
+      goto wrapup;
+    }
+  }
+
+  /* need a new OBJECT as well as s */
+  NewWord(p, WORD, len, xfpos);
+  length(p) = len;
+  StringCopy(string(p), str);
+  Link(entry, p);
+
+ wrapup:
+  Link(p, s);
+  if( enclosing(s) != nilobj ) Link(enclosing(s), s);
+  debug2(DST, DD, "InsertSym Link(%s, %s) and returning.",
+		SymName(enclosing(s)), SymName(s));
+  return s;
+} /* end InsertSym */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  InsertAlternativeName(str, s, xfpos)                                     */
+/*                                                                           */
+/*  Insert an alternative name for symbol s.                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+void InsertAlternativeName(FULL_CHAR *str, OBJECT s, FILE_POS *xfpos)
+{ register int sum, rlen;
+  register unsigned char *x;
+  int len;
+  OBJECT entry, link, plink, p, q;
+  debug3(DST, DD, "InsertAlternativeName(%s, %s, %s)",
+    str, SymName(s), EchoFilePos(xfpos));
+
+  len = StringLength(str);
+  hash(str, len, sum);
+
+  ifdebug(DST, D, sym_spread[sum]++;  sym_count++);
+  entry = (OBJECT) &symtab[sum];
+  for( plink = Down(entry);  plink != entry;  plink = NextDown(plink) )
+  { Child(p, plink);
+    if( length(p) == len && StringEqual(str, string(p)) )
+    { for( link = Down(p);  link != p;  link = NextDown(link) )
+      {	Child(q, link);
+	if( enclosing(s) == enclosing(q) )
+	{ Error(29, 12, "symbol name %s previously defined at%s",
+	    WARN, &fpos(s), str, EchoFilePos(&fpos(q)) );
+	  break;
+	}
+      }
+      goto wrapup;
+    }
+  }
+
+  /* need a new OBJECT as well as s */
+  NewWord(p, WORD, len, xfpos);
+  length(p) = len;
+  StringCopy(string(p), str);
+  Link(entry, p);
+
+ wrapup:
+  Link(p, s);
+  /* not for copies if( enclosing(s) != nilobj ) Link(enclosing(s), s); */
+  debug0(DST, DD, "InsertAlternativeName returning.");
+} /* end InsertAlternativeName */
+
+
+/*@::SearchSym(), SymName()@**************************************************/
+/*                                                                           */
+/*  OBJECT SearchSym(str, len)                                               */
+/*                                                                           */
+/*  Search the symbol table for str, with length len, and return an          */
+/*  OBJECT referencing the entry if found.  Otherwise return nilobj.         */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT SearchSym(FULL_CHAR *str, int len)
+{ register int rlen, sum;
+  register FULL_CHAR *x, *y;
+  OBJECT p, q, link, plink, entry;
+  int s;
+
+  debug2(DST, DDD, "SearchSym( %c..., %d )", str[0], len);
+
+  hash(str, len, sum);
+  rlen = len;
+  entry = (OBJECT) &symtab[sum];
+  for( plink = Down(entry);  plink != entry;  plink = NextDown(plink) )
+  { Child(p, plink);
+    if( rlen == length(p) )
+    { x = str;  y = string(p);
+      do; while( *x++ == *y++ && --rlen );
+      if( rlen == 0 )
+      {
+	debug1(DST, DDD, "  found %s", string(p));
+	s = scope_top;
+	do
+	{ s--;
+	  for( link = Down(p);  link != p;  link = NextDown(link) )
+	  { Child(q, link);
+	    { debugcond4(DST, DDD, enclosing(q) == scope[s],
+	       "  !npars_only[s] = %s, !vis_only[s] = %s, body_ok[s] = %s, !ss = %s",
+	       bool(!npars_only[s]), bool(!vis_only[s]), bool(body_ok[s]),
+	       bool(!suppress_scope));
+	    }
+	    if( enclosing(q) == scope[s]
+	      && (!npars_only[s] || type(q) == NPAR)
+	      && (!vis_only[s] || visible(q) || suppress_visible )
+	      && (body_ok[s] || type(q)!=RPAR || !has_body(enclosing(q))
+		  || suppress_visible )
+	      && (!suppress_scope || StringEqual(string(p), KW_INCLUDE) ||
+				     StringEqual(string(p), KW_SYSINCLUDE))
+	    )
+	    {	debug3(DST, DD, "SearchSym returning %s %s%%%s",
+		  Image(type(q)), SymName(q), SymName(enclosing(q)));
+		return q;
+	    }
+	  }
+	} while( scope[s] != StartSym );
+      }
+    }
+    rlen = len;
+  }
+  debug0(DST, DDD, "SearchSym returning <nilobj>");
+  return nilobj;
+} /* end SearchSym */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *SymName(s)                                                    */
+/*                                                                           */
+/*  Return the string value of the name of symbol s.                         */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *SymName(OBJECT s)
+{ OBJECT p;
+  if( s == nilobj )  return AsciiToFull("<nilobj>");
+  Parent(p, Up(s));
+  assert( is_word(type(p)), "SymName: !is_word(type(p))!" );
+  return string(p);
+} /* end SymName */
+	
+
+/*@::FullSymName(), ChildSym()@***********************************************/
+/*                                                                           */
+/*  FULL_CHAR *FullSymName(x, str)                                           */
+/*                                                                           */
+/*  Return the path name of symbol x. with str separating each entry.        */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *FullSymName(OBJECT x, FULL_CHAR *str)
+{ OBJECT stack[20];  int i;
+  static FULL_CHAR buff[MAX_BUFF], *sname;
+  if( x == nilobj )  return AsciiToFull("<nilobj>");
+  assert( enclosing(x) != nilobj, "FullSymName: enclosing(x) == nilobj!" );
+  for( i = 0;  enclosing(x) != nilobj && i < 20;  i++ )
+  { stack[i] = x;
+    x = enclosing(x);
+  }
+  StringCopy(buff, STR_EMPTY);
+  for( i--;  i > 0;  i-- )
+  { sname = SymName(stack[i]);
+    if( StringLength(sname)+StringLength(str)+StringLength(buff) >= MAX_BUFF )
+      Error(29, 8, "full name of symbol is too long", FATAL, &fpos(x));
+    StringCat(buff, sname);
+    StringCat(buff, str);
+  }
+  sname = SymName(stack[0]);
+  if( StringLength(sname) + StringLength(buff) >= MAX_BUFF )
+    Error(29, 9, "full name of symbol is too long", FATAL, &fpos(x));
+  StringCat(buff, sname);
+  return buff;
+} /* end FullSymName */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT ChildSym(s, typ)                                                  */
+/*                                                                           */
+/*  Find the child of symbol s of type typ, either LPAR or RPAR.             */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT ChildSym(OBJECT s, unsigned typ)
+{ OBJECT link, y;
+  for( link = Down(s);  link != s;  link = NextDown(link) )
+  { Child(y, link);
+    if( type(y) == typ && enclosing(y) == s )  return y;
+  }
+  Error(29, 10, "symbol %s has missing %s", FATAL, &fpos(s),
+    SymName(s), Image(typ));
+  return nilobj;
+} /* end ChildSym */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT ChildSymWithCode(s, code)                                         */
+/*                                                                           */
+/*  Find the child of symbol s with the given npar code, else nil.           */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT ChildSymWithCode(OBJECT s, unsigned char code)
+{ OBJECT link, y;
+  for( link = Down(actual(s));  link != actual(s);  link = NextDown(link) )
+  { Child(y, link);
+    if( type(y) == NPAR && enclosing(y) == actual(s) && npar_code(y) == code )
+      return y;
+  }
+  Error(29, 11, "symbol %s has erroneous code %c (database out of date?)",
+    FATAL, &fpos(s), SymName(actual(s)), (char) code);
+  return nilobj;
+} /* end ChildSym */
+
+
+/*@::CheckSymSpread(), DeleteSymBody()@***************************************/
+/*                                                                           */
+/*  CheckSymSpread()                                                         */
+/*                                                                           */
+/*  Check the spread of symbols through the hash table.                      */
+/*                                                                           */
+/*****************************************************************************/
+#if DEBUG_ON
+
+void CheckSymSpread(void)
+{ int i, j, sum, usum;  OBJECT entry, plink;
+  debug2(DST, D, "Symbol table spread (table size = %d, symbols = %d):",
+    MAX_TAB, sym_count);
+  usum = sum = 0;
+  for( i = 0;  i < MAX_TAB;  i++ )
+  { fprintf(stderr, "%4d: ", i);
+    for( j = 1;  j <= sym_spread[i];  j++ )
+    { fprintf(stderr, ".");
+      sum += j;
+    }
+    entry = (OBJECT) &symtab[i];
+    for( plink=Down(entry), j=1;  plink != entry;  plink=NextDown(plink), j++ )
+    { fprintf(stderr, "+");
+      usum += j;
+    }
+    fprintf(stderr, "\n");
+  }
+  fprintf(stderr, "average length counting duplicate names = %.1f\n",
+	(float) sum / sym_count);
+  fprintf(stderr, "average length not counting duplicate names = %.1f\n",
+	(float) usum / sym_count);
+} /* end CheckSymSpread */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static DeleteSymBody(s)                                                  */
+/*                                                                           */
+/*  Delete the body of symbol s.                                             */
+/*                                                                           */
+/*****************************************************************************/
+
+static void DeleteSymBody(OBJECT s)
+{ OBJECT t;
+  debug1(DST, DDD, "DeleteSymBody( %s )", SymName(s));
+  switch( type(s) )
+  {
+    case MACRO:	while( sym_body(s) != nilobj )
+		{ t = sym_body(s);
+		  sym_body(s) = Delete(sym_body(s), PARENT);
+		  Dispose(t);
+		}
+		break;
+	
+    case LPAR:
+    case NPAR:
+    case RPAR:
+    case LOCAL:	if( sym_body(s) != nilobj ) DisposeObject(sym_body(s));
+		break;
+
+    default:	assert1(FALSE, "DeleteSymBody:", Image(type(s)));
+		break;
+  }
+  debug0(DST, DDD, "DeleteSymBody returning.");
+} /* end DeleteSymBody */
+
+
+/*@::DeleteEverySym()@********************************************************/
+/*                                                                           */
+/*  DeleteEverySym()                                                         */
+/*                                                                           */
+/*  Delete every symbol in the symbol table.                                 */
+/*  Note that we first delete all bodies, then the symbols themselves.       */
+/*  This is so that the closures within the bodies have well-defined         */
+/*  actual() pointers, even while the symbol table is being disposed.        */
+/*  If this is not done, debug output during the disposal gets confused.     */
+/*                                                                           */
+/*****************************************************************************/
+
+void DeleteEverySym(void)
+{ int i, j, load, cost;  OBJECT p, plink, link, x, entry;
+  debug0(DST, DD, "DeleteEverySym()");
+
+  /* dispose the bodies of all symbols */
+  for( i = 0;  i < MAX_TAB;  i++ )
+  { entry = (OBJECT) &symtab[i];
+    for( plink = Down(entry);  plink != entry;  plink = NextDown(plink) )
+    { Child(p, plink);
+      for( link = Down(p);  link != p;  link = NextDown(link) )
+      {	Child(x, link);  DeleteSymBody(x);
+	/* *** will not work now
+	while( base_uses(x) != nilobj )
+	{ tmp = base_uses(x);  base_uses(x) = next(tmp);
+	  PutMem(tmp, USES_SIZE);
+	}
+	while( uses(x) != nilobj )
+	{ tmp = uses(x);  uses(x) = next(tmp);
+	  PutMem(tmp, USES_SIZE);
+	}
+	*** */
+      }
+    }
+  }
+
+  /* dispose the symbol name strings, gather statistics, and print them */
+  load = cost = 0;
+  for( i = 0;  i < MAX_TAB;  i++ )
+  { j = 1; entry = (OBJECT) &symtab[i];
+    while( Down(entry) != entry )
+    { load += 1;  cost += j;  j += 1;
+      DisposeChild(Down(entry));
+    }
+  }
+  if( load > 0 )
+  { debug4(DST, DD, "size = %d, items = %d (%d%%), probes = %.1f",
+      MAX_TAB, load, (100*load)/MAX_TAB, (float) cost/load);
+  }
+  else
+  { debug1(DST, DD, "table size = %d, no entries in table", MAX_TAB);
+  }
+  debug0(DST, DD, "DeleteEverySym returning.");
+} /* end DeleteEverySym */
+#endif
diff --git a/z30.c b/z30.c
new file mode 100644
index 0000000..65b7992
--- /dev/null
+++ b/z30.c
@@ -0,0 +1,192 @@
+/*@z30.c:Symbol uses:InsertUses()@********************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z30.c                                                      */
+/*  MODULE:       Symbol Uses                                                */
+/*  EXTERNS:      InsertUses(), FlattenUses(), SearchUses(),                 */
+/*                FirstExternTarget(), NextExternTarget()                    */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  InsertUses(x, y)                                                         */
+/*                                                                           */
+/*  Record the fact that symbol x uses symbol y, by linking them.            */
+/*  Increment count of the number of times y is used, if y is a parameter.   */
+/*                                                                           */
+/*****************************************************************************/
+
+void InsertUses(OBJECT x, OBJECT y)
+{ OBJECT tmp;
+  debug2(DSU, D, "InsertUses( %s, %s )", SymName(x), SymName(y));
+  if( type(x) == LOCAL && type(y) == LOCAL && !predefined(y) )
+  { GetMem(tmp, USES_SIZE, no_fpos);  item(tmp) = y;
+    if( base_uses(x) == nilobj )  next(tmp) = tmp;
+    else next(tmp) = next(base_uses(x)), next(base_uses(x)) = tmp;
+    base_uses(x) = tmp;
+  }
+  if( is_par(type(y)) )
+  {
+    uses_count(y) += (enclosing(y) == x ? 1 : 2);
+    if( dirty(y) || uses_count(y) > 1 )  dirty(enclosing(y)) = TRUE;
+  }
+  else if( sym_body(y) == nilobj || dirty(y) )  dirty(x) = TRUE;
+  debug5(DSU, D, "InsertUses returning ( %s %s; %s %s, count = %d )",
+    SymName(x), (dirty(x) ? "dirty" : "clean"),
+    SymName(y), (dirty(y) ? "dirty" : "clean"), uses_count(y));
+} /* end InsertUses */
+
+
+/*@::GatherUses(), GatherAllUses(), FlattenUses()@****************************/
+/*                                                                           */
+/*  static GatherUses(x, sym)                                                */
+/*  static GatherAllUses(x)                                                  */
+/*                                                                           */
+/*  GatherUses adds all the unmarked descendants of x to the uses relation   */
+/*  of sym;  GatherAllUses applies gather_uses to all descendants of x.      */
+/*                                                                           */
+/*****************************************************************************/
+
+static void GatherUses(OBJECT x, OBJECT sym)
+{ OBJECT link, y, tmp;
+  if( base_uses(x) != nilobj )
+  { link = next(base_uses(x));
+    do
+    { y = item(link);
+      if( marker(y) != sym )
+      {	if( y != sym )
+	{ marker(y) = sym;
+	  GetMem(tmp, USES_SIZE, no_fpos);  item(tmp) = y;
+	  if( uses(sym) == nilobj )  next(tmp) = tmp;
+	  else next(tmp) = next(uses(sym)), next(uses(sym)) = tmp;
+	  uses(sym) = tmp;
+	  if( indefinite(y) )  indefinite(sym) = TRUE;
+	  if( uses_extern_target(y) )  uses_extern_target(sym) = TRUE;
+	  GatherUses(y, sym);
+	}
+	else recursive(sym) = TRUE;
+      }
+      link = next(link);
+    } while( link != next(base_uses(x)) );
+  }
+} /* end GatherUses */
+
+
+static void GatherAllUses(OBJECT x)
+{ OBJECT link, y;
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( type(y) == LOCAL )  GatherUses(y, y);
+    GatherAllUses(y);
+  }
+} /* end GatherAllUses */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FlattenUses()                                                            */
+/*                                                                           */
+/*  Traverse the directed graph assembled by InsertUses, finding its         */
+/*  transitive closure and storing this explicitly in uses(x) for all x.     */
+/*                                                                           */
+/*****************************************************************************/
+
+void FlattenUses(void)
+{ GatherAllUses(StartSym);
+} /* end FlattenUses */
+
+
+/*@::SearchUses(), FirstExternTarget(), NextExternTarget()@*******************/
+/*                                                                           */
+/*  BOOLEAN SearchUses(x, y)                                                 */
+/*                                                                           */
+/*  Discover whether symbol x uses symbol y by searching the uses list of x. */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN SearchUses(OBJECT x, OBJECT y)
+{ OBJECT p;
+  debug3(DSU, DD, "SearchUses(%s, %s) uses: %d", SymName(x),SymName(y),uses(x));
+  if( x == y )  return TRUE;
+  if( uses(x) != nilobj )
+  { p = next(uses(x));
+    do
+    { debug1(DSU, DDD, "  checking %s", SymName(item(p)));
+      if( item(p) == y )  return TRUE;
+      p = next(p);
+    } while( p != next(uses(x)) );
+  }
+  return FALSE;
+} /* end SearchUses */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT FirstExternTarget(sym, cont)                                      */
+/*  OBJECT NextExternTarget(sym, cont)                                       */
+/*                                                                           */
+/*  Together these two procedures return all symbols which are both used by  */
+/*  sym and a target for at least one external galley.  Return nilobj at end.*/
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT FirstExternTarget(OBJECT sym, OBJECT *cont)
+{ OBJECT res;
+  debug1(DSU, D, "FirstExternTarget( %s )", SymName(sym));
+  res = nilobj;  *cont = nilobj;
+  if( is_extern_target(sym) )  res = sym;
+  else if( uses(sym) != nilobj )
+  { *cont = next(uses(sym));
+    do
+    { if( is_extern_target(item(*cont)) )
+      {	res = item(*cont);
+	break;
+      }
+      *cont = next(*cont);
+    } while( *cont != next(uses(sym)) );
+  }
+  debug1(DSU, D, "FirstExternTarget returning %s", SymName(res));
+  return res;
+} /* end FirstExternTarget */
+
+OBJECT NextExternTarget(OBJECT sym, OBJECT *cont)
+{ OBJECT res;
+  debug1(DSU, D, "NextExternTarget( %s )", SymName(sym));
+  res = nilobj;
+  if( *cont != nilobj )
+  { *cont = next(*cont);
+    while( *cont != next(uses(sym)) )
+    { if( is_extern_target(item(*cont)) )
+      {	res = item(*cont);
+	break;
+      }
+      *cont = next(*cont);
+    }
+  }
+  debug1(DSU, D, "NextExternTarget returning %s", SymName(res));
+  return res;
+} /* end NextExternTarget */
diff --git a/z31.c b/z31.c
new file mode 100644
index 0000000..47bf5c9
--- /dev/null
+++ b/z31.c
@@ -0,0 +1,364 @@
+/*@z31.c:Memory Allocator:DebugMemory()@**************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z31.c                                                      */
+/*  MODULE:       Memory Allocator                                           */
+/*  EXTERNS:      DebugMemory(), zz_free[], MemInit(), GetMemory()           */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+#define	MEM_CHUNK	1020		/* how many ALIGNs to get from sys   */
+
+
+#if DEBUG_ON
+static	int	no_of_calls	= 0;	/* number of calls to calloc()       */
+static  int     recs_created    = 0;	/* number of records created         */
+static  int     bytes_created   = 0;	/* number of bytes in created recs   */
+	int	zz_newcount	= 0;	/* number of calls to New()          */
+	int	zz_disposecount	= 0;	/* number of calls to Dispose()      */
+	int	zz_listcount	= 0;	/* number of elements in zz_free[]   */
+
+static	int	usage_nums[MEM_USAGE_MAX] = { 0 };
+static	int	usage_bytes[MEM_USAGE_MAX] = { 0 };
+static	int	max_usage_bytes[MEM_USAGE_MAX] = { 0 };
+static	int	curr_total_bytes, max_total_bytes = 0;
+static	char	*usage_strings[] = {
+			"lout binary",
+			"object memory chunks",
+			"font tables",
+			"lex buffers",
+			"file tables",
+			"cross reference tables",
+			"plain text output grids",
+			"database check tables",
+			"hyphenation pattern tables",
+			"character mappings",
+			"colour tables",
+			"language tables",
+};
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DebugRegisterUsage(typ, delta_num, delta_size)                           */
+/*                                                                           */
+/*  Register a change in the number of things of type typ that               */
+/*  have been allocated memory, and the change in the number of bytes.       */
+/*                                                                           */
+/*****************************************************************************/
+
+void DebugRegisterUsage(int typ, int delta_num, int delta_size)
+{ int i;
+  assert(0 <= typ && typ < MEM_USAGE_MAX, "DebugRegisterUsage!");
+  usage_nums[typ] += delta_num;
+  usage_bytes[typ] += delta_size;
+  curr_total_bytes += delta_size;
+  if( curr_total_bytes > max_total_bytes )
+  { max_total_bytes = curr_total_bytes;
+    for( i = 0; i < MEM_USAGE_MAX;  i++ )
+      max_usage_bytes[i] = usage_bytes[i];
+  }
+} /* end DebugRegisterUsage */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DebugMemory()                                                            */
+/*                                                                           */
+/*  Print memory usage.                                                      */
+/*                                                                           */
+/*****************************************************************************/
+
+void DebugMemory(void)
+{ int i, j;  OBJECT p;  int recs_free, bytes_free;
+
+  recs_free = bytes_free = 0;
+  for( i = 0;  i < MAX_OBJECT_REC;  i++ )
+  { if( zz_free[i] != nilobj )
+    { j = 0;
+      for( p = zz_free[i];  p != nilobj;  p = pred(p, CHILD) )  j++;
+      debug3(DMA, DD, "zz_free[%2d]: %5d (%d bytes)", i, j,
+	i * j * sizeof(ALIGN));
+      recs_free += j;
+      bytes_free += i* j * sizeof(ALIGN);
+    }
+  }
+
+  debug4(DMA, D, "%-35s %8s %8s %8s",
+    "Summary of malloc() memory usage", "Quantity", "Bytes", "At max.");
+
+  for( i = 1;  i < MEM_USAGE_MAX;  i++ )
+  {
+    debug4(DMA, D, "%-35s %8d %8d %8d", usage_strings[i], usage_nums[i],
+      usage_bytes[i], max_usage_bytes[i]);
+  }
+  debug4(DMA, D, "%-35s %8s %8s %8s", "", "", "--------", "--------");
+  debug4(DMA, D, "%-35s %8s %8d %8d", "","",curr_total_bytes,max_total_bytes);
+
+
+  /***
+  debug3(DMA, D, "%-12s %8s %8s", "", "records", "bytes");
+  debug4(DMA, D, "%-12s %8s %8d (%d calls)", "calloc", "-",
+    no_of_calls * MEM_CHUNK * sizeof(ALIGN), no_of_calls);
+  debug3(DMA, D, "%-12s %8d %8d", "created", recs_created, bytes_created);
+  debug3(DMA, D, "%-12s %8d %8d", "free (count)",    recs_free,    bytes_free);
+  debug3(DMA, D, "%-12s %8d %8s", "free (var)",      zz_listcount, "-");
+  debug3(DMA, D, "%-12s %8d %8s", "new-dispose",
+    zz_newcount - zz_disposecount, "-");
+  debug3(DMA, D, "%-12s %8d %8s", "created-free",
+    recs_created - recs_free, "-");
+  debug2(DMA, D, "newcount %d, disposecount %d", zz_newcount, zz_disposecount);
+  *** */
+
+  debug0(DMA, D, "");
+
+} /* end DebugMemory */
+#endif
+
+
+/*@::zz_free[], zz_lengths[], MemInit()@**************************************/
+/*                                                                           */
+/*  OBJECT         zz_free[], zz_hold, zz_tmp, zz_res                        */
+/*  int            zz_size                                                   */
+/*  unsigned char  zz_lengths[]                                              */
+/*                                                                           */
+/*  zz_free[i]:    free records of size i*sizeof(ALIGN).                     */
+/*  zz_lengths[i]: the number of ALIGNs in a record of type i.               */
+/*  These variables are used only within the New() and Dispose() macros,     */
+/*  and the list handling macros.                                            */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT		zz_free[MAX_OBJECT_REC], zz_hold, zz_tmp, zz_res;
+int		zz_size;
+unsigned char	zz_lengths[DISPOSED];		/* DISPOSED is 1 + max type */
+OBJECT 		xx_link, xx_tmp, xx_res, xx_hold;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  MemInit()                                                                */
+/*                                                                           */
+/*  Initialise memory allocator.                                             */
+/*                                                                           */
+/*****************************************************************************/
+
+void MemInit(void)
+{
+  zz_lengths[ WORD         ] = 0;
+  zz_lengths[ QWORD        ] = 0;
+  zz_lengths[ LINK         ] = ceiling(sizeof(struct link_type), sizeof(ALIGN));
+
+  /* object types, except closure NB have actual() field in token phase! */
+  zz_lengths[ CLOSURE      ] =
+  zz_lengths[ NULL_CLOS    ] =
+  zz_lengths[ PAGE_LABEL   ] =
+  zz_lengths[ UNDER_REC    ] =
+  zz_lengths[ CROSS        ] =
+  zz_lengths[ FORCE_CROSS  ] =
+  zz_lengths[ SPLIT        ] =
+  zz_lengths[ PAR          ] =
+  zz_lengths[ ROW_THR      ] =
+  zz_lengths[ COL_THR      ] =
+  zz_lengths[ HSPANNER     ] =
+  zz_lengths[ VSPANNER     ] =
+  zz_lengths[ ACAT         ] =
+  zz_lengths[ HCAT         ] =
+  zz_lengths[ VCAT         ] =
+  zz_lengths[ ONE_COL      ] =
+  zz_lengths[ ONE_ROW      ] =
+  zz_lengths[ WIDE         ] =
+  zz_lengths[ HIGH         ] =
+  zz_lengths[ HSHIFT       ] =
+  zz_lengths[ VSHIFT       ] =
+  zz_lengths[ HSCALE       ] =
+  zz_lengths[ VSCALE       ] =
+  zz_lengths[ HCOVER       ] =
+  zz_lengths[ VCOVER       ] =
+  zz_lengths[ SCALE        ] =
+  zz_lengths[ KERN_SHRINK  ] =
+  zz_lengths[ HCONTRACT    ] =
+  zz_lengths[ VCONTRACT    ] =
+  zz_lengths[ HLIMITED     ] =
+  zz_lengths[ VLIMITED     ] =
+  zz_lengths[ HEXPAND      ] =
+  zz_lengths[ VEXPAND      ] =
+  zz_lengths[ START_HVSPAN ] =
+  zz_lengths[ START_HSPAN  ] =
+  zz_lengths[ START_VSPAN  ] =
+  zz_lengths[ HSPAN        ] =
+  zz_lengths[ VSPAN        ] =
+  zz_lengths[ PADJUST      ] =
+  zz_lengths[ HADJUST      ] =
+  zz_lengths[ VADJUST      ] =
+  zz_lengths[ ROTATE       ] =
+  zz_lengths[ BACKGROUND   ] =
+  zz_lengths[ VERBATIM     ] =
+  zz_lengths[ RAW_VERBATIM ] =
+  zz_lengths[ CASE         ] =
+  zz_lengths[ YIELD        ] =
+  zz_lengths[ BACKEND      ] =
+  zz_lengths[ FILTERED     ] =
+  zz_lengths[ XCHAR        ] =
+  zz_lengths[ FONT         ] =
+  zz_lengths[ SPACE        ] =
+  zz_lengths[ YUNIT        ] =
+  zz_lengths[ ZUNIT        ] =
+  zz_lengths[ BREAK        ] =
+  zz_lengths[ UNDERLINE    ] =
+  zz_lengths[ COLOUR       ] =
+  zz_lengths[ LANGUAGE     ] =
+  zz_lengths[ CURR_LANG    ] =
+  zz_lengths[ CURR_FAMILY  ] =
+  zz_lengths[ CURR_FACE    ] =
+  zz_lengths[ COMMON       ] =
+  zz_lengths[ RUMP         ] =
+  zz_lengths[ MELD         ] =
+  zz_lengths[ INSERT       ] =
+  zz_lengths[ ONE_OF       ] =
+  zz_lengths[ NEXT         ] =
+  zz_lengths[ PLUS         ] =
+  zz_lengths[ MINUS        ] =
+  zz_lengths[ ENV_OBJ      ] =
+  zz_lengths[ ENV          ] =
+  zz_lengths[ ENVA         ] =
+  zz_lengths[ ENVB         ] =
+  zz_lengths[ ENVC         ] =
+  zz_lengths[ ENVD         ] =
+  zz_lengths[ CENV         ] =
+  zz_lengths[ CLOS         ] =
+  zz_lengths[ LVIS         ] =
+  zz_lengths[ LUSE         ] =
+  zz_lengths[ LEO          ] =
+  zz_lengths[ OPEN         ] =
+  zz_lengths[ TAGGED       ] =
+  zz_lengths[ INCGRAPHIC   ] =
+  zz_lengths[ SINCGRAPHIC  ] =
+  zz_lengths[ PLAIN_GRAPHIC] =
+  zz_lengths[ GRAPHIC      ] =
+	ceiling(sizeof(struct closure_type), sizeof(ALIGN));
+
+  zz_lengths[ HEAD         ] =
+	ceiling(sizeof(struct head_type), sizeof(ALIGN));
+
+  zz_lengths[ LBR          ] =
+  zz_lengths[ RBR          ] =
+  zz_lengths[ BEGIN        ] =
+  zz_lengths[ END          ] =
+  zz_lengths[ USE          ] =
+  zz_lengths[ NOT_REVEALED ] =
+  zz_lengths[ GSTUB_NONE   ] =
+  zz_lengths[ GSTUB_INT    ] =
+  zz_lengths[ GSTUB_EXT    ] =
+  zz_lengths[ UNEXPECTED_EOF] =
+  zz_lengths[ PREPEND      ] =
+  zz_lengths[ SYS_PREPEND  ] =
+  zz_lengths[ DATABASE     ] =
+  zz_lengths[ SYS_DATABASE ] =
+  zz_lengths[ DEAD         ] =
+  zz_lengths[ UNATTACHED   ] =
+  zz_lengths[ RECEPTIVE    ] =
+  zz_lengths[ RECEIVING    ] =
+  zz_lengths[ RECURSIVE    ] =
+  zz_lengths[ PRECEDES     ] =
+  zz_lengths[ FOLLOWS      ] =
+  zz_lengths[ CROSS_FOLL   ] =
+  zz_lengths[ CROSS_FOLL_OR_PREC] =
+  zz_lengths[ GALL_FOLL    ] =
+  zz_lengths[ GALL_FOLL_OR_PREC ] =
+  zz_lengths[ CROSS_TARG   ] =
+  zz_lengths[ GALL_TARG    ] =
+  zz_lengths[ GALL_PREC    ] =
+  zz_lengths[ CROSS_PREC   ] =
+  zz_lengths[ PAGE_LABEL_IND] =
+  zz_lengths[ SCALE_IND    ] =
+  zz_lengths[ COVER_IND    ] =
+  zz_lengths[ EXPAND_IND   ] =
+  zz_lengths[ THREAD       ] =
+  zz_lengths[ CR_LIST      ] =
+	ceiling(sizeof(struct closure_type), sizeof(ALIGN));
+
+  /* symbol types */
+  zz_lengths[ MACRO        ] =
+  zz_lengths[ LOCAL        ] =
+  zz_lengths[ LPAR         ] =
+  zz_lengths[ RPAR         ] =
+  zz_lengths[ NPAR         ] =
+	ceiling(sizeof(struct symbol_type), sizeof(ALIGN));
+
+  /* gap objects */
+  zz_lengths[ TSPACE       ] =
+  zz_lengths[ TJUXTA       ] =
+  zz_lengths[ GAP_OBJ      ] =
+	ceiling(sizeof(struct gapobj_type), sizeof(ALIGN));
+
+  /* cross-reference and data base types */
+  zz_lengths[ CROSS_SYM    ] =
+  zz_lengths[ CR_ROOT      ] = ceiling(sizeof(struct cr_type) , sizeof(ALIGN));
+
+  /* external galley record */
+  zz_lengths[ EXT_GALL  ] = ceiling(sizeof(struct ext_gall_type),sizeof(ALIGN));
+
+} /* end MemInit() */
+
+
+/*@::GetMemory()@*************************************************************/
+/*                                                                           */
+/*  OBJECT GetMemory(siz, pos)                                               */
+/*                                                                           */
+/*  Return a pointer to siz ALIGNs of memory (0 < siz < MAX_OBJECT_REC).     */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT GetMemory(int siz, FILE_POS *pos)
+{ static ALIGN *next_free = (ALIGN *) nilobj;
+  static ALIGN *top_free  = (ALIGN *) nilobj;
+  OBJECT res;
+
+  debug1(DMA, DDD, "GetMemory( %d )", siz);
+
+  /* get memory from operating system, if not enough left here */
+  if( &next_free[siz] > top_free )
+  {
+#if DEBUG_ON
+    DebugRegisterUsage(MEM_OBJECTS, 1, MEM_CHUNK * sizeof(ALIGN));
+#endif
+    next_free = (ALIGN *) calloc(MEM_CHUNK, sizeof(ALIGN));
+    ifdebug(DMA, D, no_of_calls++; )
+    if( next_free == NULL )
+      Error(31, 1, "exiting now (run out of memory)", FATAL, pos);
+    top_free = &next_free[MEM_CHUNK];
+    debug2(DMA, DD, "GetMemory: calloc returned %ld - %ld",
+      (long) next_free, (long) top_free);
+  }
+
+  res = (OBJECT) next_free;
+  next_free = &next_free[siz];
+#if DEBUG_ON
+  recs_created++; bytes_created += siz * sizeof(ALIGN);
+#endif
+  debug3(DMA, DDD, "GetMemory returning @%ld (next_free = @%ld, top_free = @%ld",
+    (long) res, (long) next_free, (long) top_free);
+  return res;
+} /* end GetMemory */
diff --git a/z32.c b/z32.c
new file mode 100644
index 0000000..daba6b5
--- /dev/null
+++ b/z32.c
@@ -0,0 +1,158 @@
+/*@z32.c:Counter Service:Next()@**********************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z32.c                                                      */
+/*  MODULE:       Counter Service                                            */
+/*  EXTERNS:      Next()                                                     */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT Next(x, inc, done)                                                */
+/*                                                                           */
+/*  Return x with its value incremented by inc (if possible).                */
+/*  Set *done to TRUE if successful, leave *done unchanged otherwise.        */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT Next(OBJECT x, int inc, BOOLEAN *done)
+{ OBJECT y, link;  int l, r, n, len;
+  FULL_CHAR buff[MAX_BUFF];
+  debug3(DCS, DD, "Next( %s, %d, %s )", EchoObject(x), inc, bool(*done));
+  switch( type(x) )
+  {
+    case WORD:
+    case QWORD:
+    
+      len = StringLength(string(x));
+      for( r = len - 1;  r >= 0 && !decimaldigit(string(x)[r]);  r--);
+      if( r < 0 ) break;
+      for( l = r-1;  l >= 0 && decimaldigit(string(x)[l]);  l-- );
+      sscanf( (char *) &string(x)[l+1], "%d", &n);
+      string(x)[l+1] = '\0';
+      StringCopy(buff, string(x));
+      StringCat(buff, StringInt(n+inc));
+      StringCat(buff, &string(x)[r+1]);
+      if( StringLength(buff) >= MAX_BUFF )
+	Error(32, 1, "word %s is too long", FATAL, &fpos(x), buff);
+      y = MakeWord(type(x), buff, &fpos(x));
+      word_font(y) = word_font(x);
+      word_colour(y) = word_colour(x);
+      word_language(y) = word_language(x);
+      word_hyph(y) = word_hyph(x);
+      underline(y) = underline(x);
+      MergeNode(y, x);  x = y;
+      *done = TRUE;
+      break;
+
+
+    case INCGRAPHIC:
+    case SINCGRAPHIC:
+    case GAP_OBJ:
+    case CLOSURE:
+    case NULL_CLOS:
+    case PAGE_LABEL:
+    case CROSS:
+    case FORCE_CROSS:
+    case START_HVSPAN:
+    case START_HSPAN:
+    case START_VSPAN:
+    case HSPAN:
+    case VSPAN:
+    
+      break;
+
+
+    case ONE_COL:
+    case ONE_ROW:
+    case WIDE:
+    case HIGH:
+    case HSHIFT:
+    case VSHIFT:
+    case HCONTRACT:
+    case VCONTRACT:
+    case HLIMITED:
+    case VLIMITED:
+    case HEXPAND:
+    case VEXPAND:
+    case PADJUST:
+    case HADJUST:
+    case VADJUST:
+    case HSCALE:
+    case VSCALE:
+    case HCOVER:
+    case VCOVER:
+    case ROTATE:
+    case BACKGROUND:
+    case SCALE:
+    case KERN_SHRINK:
+    case SPLIT:
+    case PLAIN_GRAPHIC:
+    case GRAPHIC:
+    
+      Child(y, LastDown(x));
+      y = Next(y, inc, done);
+      break;
+
+
+    case ACAT:
+    
+      /* *** seems identical!
+      link = LastDown(x);
+      while( link != x && !*done )
+      {	Child(y, link);
+	if( is_index(type(y)) )  continue;
+	y = Next(y, inc, done);
+	if( !*done )  link = PrevDown(link);
+      }
+      break;
+      *** */
+
+
+    case COL_THR:
+    case ROW_THR:
+    case HCAT:
+    case VCAT:
+    
+      link = LastDown(x);
+      while( link != x && !*done )
+      {	Child(y, link);
+	if( is_index(type(y)) )  continue;
+	y = Next(y, inc, done);
+	if( !*done )  link = PrevDown(link);
+      }
+      break;
+
+
+    default:
+    
+      assert1(FALSE, "Next:", Image(type(x)));
+      break;
+
+  } /* end switch */
+  debug1(DCS, DD, "Next returning %s", EchoObject(x));
+  return x;
+} /* end Next */
diff --git a/z33.c b/z33.c
new file mode 100644
index 0000000..0369277
--- /dev/null
+++ b/z33.c
@@ -0,0 +1,861 @@
+/*@z33.c:Database Service:OldCrossDb(), NewCrossDb(), SymToNum()@*************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z33.c                                                      */
+/*  MODULE:       Database Service                                           */
+/*  EXTERNS:      OldCrossDb, NewCrossDb, DbCreate(), DbInsert(),            */
+/*                DbConvert(), DbClose(), DbLoad(), DbRetrieve(),            */
+/*                DbRetrieveNext()                                           */
+/*                                                                           */
+/*****************************************************************************/
+#define INIT_DBCHECK_NUM	107
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DBCHECK_TABLE                                                            */
+/*                                                                           */
+/*  A symbol table holding all non-galley cross references, basically        */
+/*  implementing a function (sym, tag) -> fpos (if any).                     */
+/*                                                                           */
+/*     dtab_new(newsize)                New empty table, newsize capacity    */
+/*     dtab_insert(x, S)                Insert new (sym, tag) pair x into S  */
+/*     dtab_retrieve(sym, tag, S)       Retrieve (sym, tag) pair from S      */
+/*     dtab_debug(S, fp)                Debug print of table S to file fp    */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef struct
+{ int dbchecktab_size;				/* size of table             */
+  int dbchecktab_count;				/* number of objects held    */
+  OBJECT dbchecktab_item[1];
+} *DBCHECK_TABLE;
+
+#define	dtab_size(S)	(S)->dbchecktab_size
+#define	dtab_count(S)	(S)->dbchecktab_count
+#define	dtab_item(S, i)	(S)->dbchecktab_item[i]
+
+#define hash(pos, sym, tag, S)						\
+{ FULL_CHAR *p = tag;							\
+  pos = (long) sym;							\
+  while( *p ) pos += *p++;						\
+  pos = pos % dtab_size(S);						\
+}
+
+static DBCHECK_TABLE dtab_new(int newsize)
+{ DBCHECK_TABLE S;  int i;
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_DBCHECK, 1,
+    2*sizeof(int) + newsize * sizeof(OBJECT)));
+  S = (DBCHECK_TABLE)
+	  malloc(2*sizeof(int) + newsize * sizeof(OBJECT));
+  if( S == (DBCHECK_TABLE) NULL )
+    Error(33, 1, "run out of memory enlarging dbcheck table", FATAL, no_fpos);
+  dtab_size(S) = newsize;
+  dtab_count(S) = 0;
+  for( i = 0;  i < newsize;  i++ )  dtab_item(S, i) = nilobj;
+  return S;
+} /* end dtab_new */
+
+static void dtab_insert(OBJECT x, DBCHECK_TABLE *S);
+
+static DBCHECK_TABLE dtab_rehash(DBCHECK_TABLE S, int newsize)
+{ DBCHECK_TABLE NewS;  int i;  OBJECT link, z;
+  NewS = dtab_new(newsize);
+  for( i = 0;  i < dtab_size(S);  i++ )
+  { if( dtab_item(S, i) != nilobj )
+    { OBJECT ent = dtab_item(S, i);
+      assert( type(ent) == ACAT, "dtab_rehash: ACAT!" );
+      for( link = Down(ent);  link != ent;  link = NextDown(link) )
+      { Child(z, link);
+	dtab_insert(z, &NewS);
+      }
+      DisposeObject(ent);
+    }
+  }
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_DBCHECK, -1,
+    -(2*sizeof(int) + dtab_size(S) * sizeof(OBJECT))));
+  free(S);
+  return NewS;
+} /* end dtab_rehash */
+
+static void dtab_insert(OBJECT x, DBCHECK_TABLE *S)
+{ long pos;  OBJECT z, link, y;
+  if( dtab_count(*S) == dtab_size(*S) - 1 )	/* one less since 0 unused */
+    *S = dtab_rehash(*S, 2*dtab_size(*S));
+  dtab_count(*S)++;
+  hash(pos, db_checksym(x), string(x), *S);
+  if( dtab_item(*S, pos) == nilobj )  New(dtab_item(*S, pos), ACAT);
+  z = dtab_item(*S, pos);
+  for( link = Down(z);  link != z;  link = NextDown(link) )
+  { Child(y, link);
+    if( db_checksym(x) == db_checksym(y) && StringEqual(string(x), string(y)) )
+    { assert(FALSE, "Dbcheck: entry inserted twice");
+    }
+  }
+  Link(dtab_item(*S, pos), x);
+} /* end dtab_insert */
+
+static OBJECT dtab_retrieve(OBJECT sym, FULL_CHAR *tag, DBCHECK_TABLE S)
+{ OBJECT x, link, y;  long pos;
+  hash(pos, sym, tag, S);
+  x = dtab_item(S, pos);
+  if( x == nilobj )  return nilobj;
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( sym == db_checksym(y) && StringEqual(tag, string(y)) )
+      return y;
+  }
+  return nilobj;
+} /* end dtab_retrieve */
+
+#if DEBUG_ON
+static void dtab_debug(DBCHECK_TABLE S, FILE *fp)
+{ int i;  OBJECT x, link, y;
+  fprintf(fp, "  table size: %d;  current number of items: %d\n",
+    dtab_size(S), dtab_count(S));
+  for( i = 0;  i < dtab_size(S);  i++ )
+  { x = dtab_item(S, i);
+    fprintf(fp, "dtab_item(S, %d) =", i);
+    if( x == nilobj )
+      fprintf(fp, " <nilobj>");
+    else if( type(x) != ACAT )
+      fprintf(fp, " not ACAT!");
+    else for( link = Down(x);  link != x;  link = NextDown(link) )
+    { Child(y, link);
+      fprintf(fp, " %s&&%s",
+	is_word(type(y)) ? SymName(db_checksym(y)) : AsciiToFull("?"),
+	is_word(type(y)) ? string(y) : AsciiToFull("not-WORD!"));
+    }
+    fprintf(fp, "\n");
+  }
+} /* end dtab_debug */
+#endif
+
+static DBCHECK_TABLE DbCheckTable;		/* the dbcheck table         */
+static BOOLEAN	     DbCheckTableInit = FALSE;	/* TRUE if table inited	     */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OldCrossDb     Database containing cross references from previous run.   */
+/*  NewCrossDb     Writable database of cross references from this run.      */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT OldCrossDb, NewCrossDb;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  #define SymToNum(db, sym, num, gall)                                     */
+/*                                                                           */
+/*  Set num to the number used to refer to sym in database db.  If sym is    */
+/*  not currently referred to in db, create a new number and record sym.     */
+/*  If gall is true, sym is the target of galleys stored in this database.   */
+/*  Store in boolean fields db_targ(link) and is_extern_target(sym).         */
+/*                                                                           */
+/*****************************************************************************/
+
+#define SymToNum(db, sym, num, gall)					\
+{ OBJECT link, yy;  int count;						\
+  count = 0;								\
+  for( link = Down(db);  link != db;  link = NextDown(link) )		\
+  { Child(yy, link);							\
+    assert(type(yy)==CROSS_SYM || type(yy)==ACAT, "SymToNum: yy!");	\
+    if( type(yy) != CROSS_SYM )  continue;				\
+    if( symb(yy) == sym )  break;					\
+    if( number(link) > count )  count = number(link);			\
+  }									\
+  if( link == db )							\
+  { if( cross_sym(sym) == nilobj )  CrossInit(sym);			\
+    Link(db, cross_sym(sym));						\
+    link = LastDown(db);						\
+    number(link) = count + 1;						\
+    db_targ(link) = FALSE;						\
+  }									\
+  num = number(link);							\
+  if( gall )  db_targ(link) = is_extern_target(sym) =			\
+				uses_extern_target(sym) = TRUE;		\
+} /* end SymToNum */
+
+
+/*@::NumToSym(), DbCreate()@**************************************************/
+/*                                                                           */
+/*  #define NumToSym(db, num, sym)                                           */
+/*                                                                           */
+/*  Set sym to the symbol which is referred to in database db by num.        */
+/*                                                                           */
+/*****************************************************************************/
+
+#define NumToSym(db, num, sym)						\
+{ OBJECT link, y;							\
+  for( link = Down(db);  link != db;  link = NextDown(link) )		\
+  { Child(y, link);							\
+    if( type(y) == CROSS_SYM && number(link) == num )  break;		\
+  }									\
+  assert( link != db, "NumToSym: no sym");				\
+  assert( type(y) == CROSS_SYM, "NumToSym: y!" );			\
+  sym = symb(y);							\
+} /* end NumToSym */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT DbCreate(x)                                                       */
+/*                                                                           */
+/*  Create a new writable database with name (i.e. file stem) x and file     */
+/*  position fpos for error messages.                                        */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT DbCreate(OBJECT x)
+{ OBJECT db = x;
+  debug1(DBS, DD, "DbCreate(%s)", string(db));
+  assert( is_word(type(x)), "DbCreate: !is_word(type(x))" );
+  reading(db) = FALSE;  db_filep(db) = null;
+  debug1(DBS, DD, "DbCreate returning %s", EchoObject(db));
+  return db;
+} /* end DbCreate */
+
+
+/*@::DbInsert()@**************************************************************/
+/*                                                                           */
+/*  DbInsert(db, gall, sym, tag, tagfpos, seq, dfnum, dlnum, dfpos)          */
+/*                                                                           */
+/*  Insert a new entry into writable database db.  The primary key of the    */
+/*  entry has these three parts:                                             */
+/*                                                                           */
+/*      gall        TRUE if inserting a galley                               */
+/*      sym         The symbol which is the target of this entry             */
+/*      tag         The tag of this target (must be a non-null string)       */
+/*                                                                           */
+/*  tagfpos is the file position that the tag originated from.               */
+/*  There is also an auxiliary key, seq, which enforces an ordering on       */
+/*  entries with equal primary keys but is not itself ever retrieved.  This  */
+/*  ordering is used for sorted galleys.  The value of the entry has the     */
+/*  following parts:                                                         */
+/*                                                                           */
+/*      dfnum       The file containing the object                           */
+/*      dfpos       The position of the object in that file                  */
+/*      dlnum       The line number of the object in the file                */
+/*                                                                           */
+/*  If check is TRUE, we need to check whether an entry with this key has    */
+/*  been inserted before.  This will never be the case with galley entries.  */
+/*                                                                           */
+/*****************************************************************************/
+
+void DbInsert(OBJECT db, BOOLEAN gall, OBJECT sym, FULL_CHAR *tag,
+FILE_POS *tagfpos, FULL_CHAR *seq, FILE_NUM dfnum, long dfpos, int dlnum,
+BOOLEAN check)
+{ int symnum;  OBJECT chk;
+  static int extra_seq = 0;
+  FULL_CHAR buff[MAX_BUFF];
+  assert( is_word(type(db)), "DbInsert: db!" );
+  assert( tag[0] != '\0', "DbInsert: null tag!" );
+  assert( seq[0] != '\0', "DbInsert: null seq!" );
+  ifdebug(DPP, D, ProfileOn("DbInsert"));
+  debug6(DBS, D, "DbInsert(%s, %s, %s, %s, %s, %s, dlnum, dfpos)",
+	string(db), bool(gall), SymName(sym), tag, seq,
+	dfnum == NO_FILE ? AsciiToFull(".") : FileName(dfnum));
+  assert(!reading(db), "DbInsert: insert into reading database");
+
+  /* if required, check that (sym, tag) not already inserted */
+  if( check )
+  { 
+    debug2(DBS, DD, "  checking %s&&%s, DbCheckTable =", SymName(sym), tag);
+    if( !DbCheckTableInit )
+    { DbCheckTable = dtab_new(INIT_DBCHECK_NUM);
+      DbCheckTableInit = TRUE;
+    }
+    ifdebug(DBS, DD, dtab_debug(DbCheckTable, stderr));
+    chk = dtab_retrieve(sym, tag, DbCheckTable);
+    if( chk == nilobj )
+    { chk = MakeWord(WORD, tag, tagfpos);
+      db_checksym(chk) = sym;
+      dtab_insert(chk, &DbCheckTable);
+    }
+    else
+    { if( file_num(fpos(chk)) > 0 )
+        Error(33, 4, "cross reference %s&&%s used previously, at%s",
+          WARN, tagfpos, SymName(sym), tag, EchoFilePos(&fpos(chk)));
+      else Error(33, 5, "cross reference %s&&%s used previously",
+	  WARN, tagfpos, SymName(sym), tag);
+    }
+  }
+
+  /* open database index file if not already done */
+  if( db_filep(db) == null )
+  { if( StringLength(string(db)) + StringLength(NEW_INDEX_SUFFIX) >= MAX_BUFF )
+      Error(33, 2, "database file name %s%s is too long",
+	FATAL, no_fpos, string(db), NEW_INDEX_SUFFIX);
+    StringCopy(buff, string(db));
+    StringCat(buff, NEW_INDEX_SUFFIX);
+    db_filep(db) = StringFOpen(buff, WRITE_BINARY);
+    if( db_filep(db) == null )
+      Error(33, 3, "cannot write to database file %s", FATAL, &fpos(db), buff);
+  }
+
+  /* work out database index file entry and append it to file */
+  if( dfnum != NO_FILE )
+  { StringCopy(buff, FileName(dfnum));
+    StringCopy(&buff[StringLength(buff)-StringLength(DATA_SUFFIX)], STR_EMPTY);
+  }
+  else StringCopy(buff, AsciiToFull("."));
+  SymToNum(db, sym, symnum, gall);
+  ifdebug(DBS, DD,
+  fprintf(stderr, "  -> %s%d&%s\t%s\t%ld\t%d\t%s\n", gall ? "0" : "", symnum,
+    tag, seq, dfpos, dlnum, buff);
+  );
+  fprintf(db_filep(db), "%s%d&%s\t%s\t%s\t%ld\t%d\t%s\n", gall ? "0" : "",
+    symnum, tag, seq, StringFiveInt(++extra_seq), dfpos, dlnum, buff);
+
+  /* return */
+  debug0(DBS, DD, "DbInsert returning.");
+  ifdebug(DPP, D, ProfileOff("DbInsert"));
+} /* end DbInsert */
+
+
+/*@::DbConvert(), DbClose()@**************************************************/
+/*                                                                           */
+/*  DbConvert(db, full_name)                                                 */
+/*                                                                           */
+/*  Convert database db from writable to readable, then dispose it.          */
+/*  full_name is TRUE if symbols are to be known by their full path name.    */
+/*                                                                           */
+/*****************************************************************************/
+
+void DbConvert(OBJECT db, BOOLEAN full_name)
+{ FULL_CHAR oldname[MAX_BUFF+10], newname[MAX_BUFF];
+  OBJECT link, y;
+  ifdebug(DPP, D, ProfileOn("DbConvert"));
+  debug2(DBS, DD, "DbConvert( %ld %s )", (long) db, string(db));
+  assert( !reading(db), "DbConvert: reading database");
+  StringCopy(newname, string(db));
+  StringCat(newname, INDEX_SUFFIX);
+  StringCopy(oldname, string(db));
+  StringCat(oldname, NEW_INDEX_SUFFIX);
+  if( db_filep(db) != null )
+  {
+    fprintf(db_filep(db), "00 %s %s\n", LOUT_VERSION, "database index file");
+    for( link = Down(db);  link != db;  link = NextDown(link) )
+    { Child(y, link);
+      assert( type(y) == CROSS_SYM || type(y) == ACAT, "DbConvert: y!" );
+      if( type(y) != CROSS_SYM )  continue;
+      fprintf(db_filep(db), "%s %d %s\n",
+	db_targ(link) ? "00target" : "00symbol",
+	number(link),
+	full_name ? FullSymName(symb(y), AsciiToFull(" ")) : SymName(symb(y)));
+    }
+    fclose(db_filep(db));
+    debug2(DBS, DD, "  calling SortFile(%s, %s)", oldname, newname);
+    SortFile(oldname, newname);
+  }
+  else StringRemove(newname);
+  StringRemove(oldname);
+  DeleteNode(db);
+  debug0(DBS, DD, "DbConvert returning.");
+  ifdebug(DPP, D, ProfileOff("DbConvert"));
+} /* end DbConvert */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DbClose(db)                                                              */
+/*                                                                           */
+/*  Close readable database db.                                              */
+/*                                                                           */
+/*****************************************************************************/
+
+void DbClose(OBJECT db)
+{ if( db != nilobj && !in_memory(db) && db_filep(db) != NULL )
+  {  fclose(db_filep(db));
+     db_filep(db) = NULL;
+  }
+} /* end DbClose */
+
+
+/*@::DbLoad()@****************************************************************/
+/*                                                                           */
+/*  OBJECT DbLoad(stem, fpath, create, symbs, in_mem)                        */
+/*                                                                           */
+/*  Open for reading the database whose index file name is string(stem).li.  */
+/*  This file has not yet been defined; its search path is fpath.  If it     */
+/*  will not open and create is true, try creating it from string(stem).ld.  */
+/*                                                                           */
+/*  symbs is an ACAT of CLOSUREs showing the symbols that the database may   */
+/*  contain; or nilobj if the database may contain any symbol.               */
+/*                                                                           */
+/*  If in_mem is true, this database index is to be kept in internal memory, */
+/*  rather than an external file, as a speed optimization.                   */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT DbLoad(OBJECT stem, int fpath, BOOLEAN create, OBJECT symbs,
+  BOOLEAN in_mem)
+{ FILE *fp;  OBJECT db, t, res, tag, par, sym, link, y;
+  int i, lnum, dlnum, num, count, leftp;
+  FILE_NUM index_fnum, dfnum;  long dfpos;
+  BOOLEAN gall;  FULL_CHAR line[MAX_BUFF], sym_name[MAX_BUFF]; char *gotline;
+  ifdebug(DPP, D, ProfileOn("DbLoad"));
+  debug3(DBS, DD, "[ DbLoad(%s, %d, %s, -)", string(stem), fpath, bool(create));
+
+  /* open or else create index file fp */
+  debug0(DFS, D, "  calling DefineFile from DbLoad (1)");
+  index_fnum = DefineFile(string(stem), INDEX_SUFFIX, &fpos(stem), INDEX_FILE,
+		 fpath);
+  fp = OpenFile(index_fnum, create, FALSE);
+
+  /* read first line of database index file, which should have the version */
+  if( fp != null )
+  { if( StringFGets(line, MAX_BUFF, fp) == NULL ||
+        !StringBeginsWith(&line[3], LOUT_VERSION) )
+    {
+      /* out of date, pretend it isn't there at all */
+      StringRemove(FileName(index_fnum));
+      fp = null;
+    }
+  }
+
+  if( fp == null && create )
+  { db = nilobj;
+    debug0(DFS, D, "  calling DefineFile from DbLoad (2)");
+    dfnum = DefineFile(string(stem), DATA_SUFFIX, &fpos(stem),
+      DATABASE_FILE, DATABASE_PATH);
+    dfpos = 0L;  LexPush(dfnum, 0, DATABASE_FILE, 1, FALSE);
+    t = LexGetToken();
+    dlnum = line_num(fpos(t));
+    while( type(t) == LBR )
+    { res = Parse(&t, StartSym, FALSE, FALSE);
+      if( t != nilobj || type(res) != CLOSURE )
+	Error(33, 6, "syntax error in database file %s",
+	  FATAL, &fpos(res), FileName(dfnum));
+      assert( symbs != nilobj, "DbLoad: create && symbs == nilobj!" );
+      if( symbs != nilobj )
+      {	for( link = Down(symbs);  link != symbs;  link = NextDown(link) )
+	{ Child(y, link);
+	  if( type(y) == CLOSURE && actual(y) == actual(res) )  break;
+	}
+	if( link == symbs )
+	  Error(33, 7, "%s found in database but not declared in %s line",
+	    FATAL, &fpos(res), SymName(actual(res)), KW_DATABASE);
+      }
+      for( tag = nilobj, link = Down(res); link != res; link = NextDown(link) )
+      {	Child(par, link);
+	if( type(par) == PAR && is_tag(actual(par)) && Down(par) != par )
+	{ Child(tag, Down(par));
+	  break;
+	}
+      }
+      if( tag == nilobj )
+	Error(33, 8, "database symbol %s has no tag",
+	  FATAL, &fpos(res), SymName(actual(res)));
+      tag = ReplaceWithTidy(tag, TRUE);  /* && */
+      if( !is_word(type(tag)) )
+	Error(33, 9, "database symbol tag is not a simple word",
+	  FATAL, &fpos(res));
+      if( StringEqual(string(tag), STR_EMPTY) )
+	Error(33, 10, "database symbol tag is an empty word", FATAL,&fpos(res));
+      if( db == nilobj )
+      {	StringCopy(line, FileName(dfnum));
+	i = StringLength(line) - StringLength(INDEX_SUFFIX);
+	assert( i > 0, "DbLoad: FileName(dfnum) (1)!" );
+	StringCopy(&line[i], STR_EMPTY);
+	db = DbCreate(MakeWord(WORD, line, &fpos(stem)));
+      }
+      DbInsert(db, FALSE, actual(res), string(tag), &fpos(tag), STR_ZERO,
+	NO_FILE, dfpos, dlnum, TRUE);
+      DisposeObject(res);  dfpos = LexNextTokenPos();  t = LexGetToken();
+      dlnum = line_num(fpos(t));
+    }
+    if( type(t) != END )
+      Error(33, 11, "%s or end of file expected here", FATAL, &fpos(t), KW_LBR);
+    LexPop();
+    if( db == nilobj )
+    { StringCopy(line, FileName(dfnum));
+      i = StringLength(line) - StringLength(INDEX_SUFFIX);
+      assert( i > 0, "DbLoad: FileName(dfnum) (2)!" );
+      StringCopy(&line[i], STR_EMPTY);
+      db = DbCreate(MakeWord(WORD, line, &fpos(stem)));
+    }
+    DbConvert(db, FALSE);
+    if( (fp = OpenFile(index_fnum, FALSE, FALSE)) == null ||
+        StringFGets(line, MAX_BUFF, fp) == NULL ||
+        !StringBeginsWith(&line[3], LOUT_VERSION) )
+      Error(33, 12, "cannot open database file %s",
+        FATAL, &fpos(db), FileName(index_fnum));
+  }
+
+  /* set up database record */
+  StringCopy(line, FileName(index_fnum));
+  i = StringLength(line) - StringLength(INDEX_SUFFIX);
+  assert( i > 0, "DbLoad: FileName(index_fnum)!" );
+  StringCopy(&line[i], STR_EMPTY);
+  db = MakeWord(WORD, line, &fpos(stem));
+  reading(db) = TRUE;
+  in_memory(db) = in_mem;
+  if( symbs != nilobj )
+  { assert( type(symbs) == ACAT, "DbLoad: type(symbs)!" );
+    Link(db, symbs);
+  }
+  if( fp == null )
+  { debug1(DBS, DD, "] DbLoad returning (empty) %s", string(db));
+    db_filep(db) = null;
+    db_lines(db) = (LINE *) NULL;
+    ifdebug(DPP, D, ProfileOff("DbLoad"));
+    return db;
+  }
+
+  /* read header lines of index file, find its symbols */
+  leftp = 0;  lnum = 1;
+  gotline = StringFGets(line, MAX_BUFF, fp);
+  while( gotline != NULL )
+  {
+    if( line[0] != '0' || line[1] != '0' )  break;
+    lnum++;
+    leftp = (int) ftell(fp);
+    gall = StringBeginsWith(line, AsciiToFull("00target "));
+    sscanf( (char *) line, gall ? "00target %d" : "00symbol %d", &num);
+    for( i = 9;  line[i] != CH_SPACE && line[i] != '\0';  i++ );
+    if( symbs == nilobj )
+    {
+      /* any symbols are possible, full path names in index file required */
+      count = 0;  sym = StartSym;
+      while( line[i] != CH_NEWLINE && line[i] != '\0' )
+      {	PushScope(sym, FALSE, FALSE);  count++;
+	sscanf( (char *) &line[i+1], "%s", sym_name);
+	sym = SearchSym(sym_name, StringLength(sym_name));
+	i += StringLength(sym_name) + 1;
+      }
+      for( i = 1;  i <= count;  i++ )  PopScope();
+    }
+    else
+    {
+      /* only symbs symbols possible, full path names not required */
+      sym = nilobj;
+      sscanf( (char *) &line[i+1], "%s", sym_name);
+      for( link = Down(symbs);  link != symbs;  link = NextDown(link) )
+      {	Child(y, link);
+	assert( type(y) == CLOSURE, "DbLoad: type(y) != CLOSURE!" );
+	if( StringEqual(sym_name, SymName(actual(y))) )
+	{ sym = actual(y);
+	  break;
+	}
+      }
+    }
+    if( sym != nilobj && sym != StartSym )
+    { if( cross_sym(sym) == nilobj )  CrossInit(sym);
+      Link(db, cross_sym(sym));
+      link = LastDown(db);
+      number(link) = num;  db_targ(link) = gall;
+      if( gall )  is_extern_target(sym) = uses_extern_target(sym) = TRUE;
+    }
+    else
+    { Error(33, 13, "undefined symbol in database file %s (line %d)",
+	WARN, &fpos(db), FileName(index_fnum), lnum);
+      debug1(DBS, DD, "] DbLoad returning %s (error)", string(db));
+      fclose(fp);
+      in_memory(db) = FALSE;
+      db_filep(db) = null;  /* subsequently treated like an empty database */
+      ifdebug(DPP, D, ProfileOff("DbLoad"));
+      return db;
+    }
+    gotline = StringFGets(line, MAX_BUFF, fp);
+  }
+
+  /* if in_memory, go on to read the entire database index into memory */
+  if( in_memory(db) )
+  { int len;
+    if( gotline == NULL )
+      db_lines(db) = 0;
+    else
+    {
+      db_lines(db) = ReadLines(fp, FileName(index_fnum), line, &len);
+      db_lineslen(db) = len;
+      SortLines(db_lines(db), db_lineslen(db));
+    }
+  }
+  else /* external, save leftpos and file pointer */
+  { db_filep(db) = fp;
+    left_pos(db) = leftp;
+  }
+
+  /* return */
+  debug1(DBS, DD, "] DbLoad returning %s", string(db));
+  ifdebug(DPP, D, ProfileOff("DbLoad"));
+  return db;
+} /* end DbLoad */
+
+
+/*@::SearchFile()@************************************************************/
+/*                                                                           */
+/*  static BOOLEAN SearchFile(fp, left, right, str, line)                    */
+/*                                                                           */
+/*  File fp is a text file.  left is the beginning of a line, right is the   */
+/*  end of a line.   Search the file by binary search for a line beginning   */
+/*  with str.  If found, return it in line, else return FALSE.               */
+/*                                                                           */
+/*****************************************************************************/
+
+static BOOLEAN SearchFile(FILE *fp, int left, int right,
+FULL_CHAR *str, FULL_CHAR *line)
+{ int l, r, mid, mid_end;  FULL_CHAR buff[MAX_BUFF];  BOOLEAN res;
+  ifdebug(DPP, D, ProfileOn("SearchFile"));
+  debug3(DBS, DD, "SearchFile(fp, %d, %d, %s, line)", left, right, str);
+
+  l = left;  r = right;
+  while( l <= r )
+  {
+    /* loop invt: (l==0 or fp[l-1]==CH_NEWLINE) and (fp[r] == CH_NEWLINE)    */
+    /* and first key >= str lies in the range fp[l..r+1]                     */
+
+    /* find line near middle of the range; mid..mid_end brackets it */
+    debug2(DBS, DD, "  start loop: l = %d, r = %d", l, r);
+    mid = (l + r)/2;
+    fseek(fp, (long) mid, SEEK_SET);
+    do { mid++; } while( getc(fp) != CH_NEWLINE );
+    if( mid == r + 1 )
+    { mid = l;
+      fseek(fp, (long) mid, SEEK_SET);
+    }
+    StringFGets(line, MAX_BUFF, fp);
+    mid_end = (int) ftell(fp) - 1;
+    debug3(DBS, DD, "  mid: %d, mid_end: %d, line: %s", mid, mid_end, line);
+    assert( l <= mid,      "SearchFile: l > mid!"        );
+    assert( mid < mid_end, "SearchFile: mid >= mid_end!" );
+    assert( mid_end <= r,  "SearchFile: mid_end > r!"    );
+
+    /* compare str with this line and prepare next step */
+    debug2(DBS, DD, "  comparing key %s with line %s", str, line);
+    if( StringLessEqual(str, line) )  r = mid - 1;
+    else l = mid_end + 1;
+  } /* end while */
+
+  /* now first key >= str lies in fp[l]; compare it with str */
+  if( l < right )
+  { fseek(fp, (long) l, SEEK_SET);
+    StringFGets(line, MAX_BUFF, fp);
+    sscanf( (char *) line, "%[^\t]", buff);
+    res = StringEqual(str, buff);
+  }
+  else res = FALSE;
+  debug1(DBS, DD, "SearchFile returning %s", bool(res));
+  ifdebug(DPP, D, ProfileOff("SearchFile"));
+  return res;
+} /* end SearchFile */
+
+
+/*@::SearchLines()@***********************************************************/
+/*                                                                           */
+/*  static BOOLEAN SearchLines(LINE *lines, int left, int right, str, lnum)  */
+/*                                                                           */
+/*  Search the sorted array of LINE arrays lines[left..right] for a line     */
+/*  beginning with str, and return TRUE if found else FALSE.                 */
+/*                                                                           */
+/*  If TRUE is returned then the number of the line is in *lnum.             */
+/*                                                                           */
+/*****************************************************************************/
+
+static BOOLEAN SearchLines(LINE *lines, int left, int right, FULL_CHAR *str,
+  int *lnum)
+{ int l, r, mid;  FULL_CHAR buff[MAX_BUFF];
+  BOOLEAN res;
+  debug3(DBS, D, "SearchLines(lines, %d, %d, %s, lnum)", left, right, str);
+  if( right < left )
+  {
+    debug0(DBS, D, "SearchLines returning FALSE (empty lines)");
+    return FALSE;
+  }
+  l = left;
+  r = right - 1;
+  while( l <= r )
+  {
+    /* loop invt: first key >= str (if any) lies in the range lines[l..r+1] */
+    /* and left <= l <= right and r < right                                 */
+    mid = (l + r) / 2;
+    debug4(DBS, D, "  [l %d, r %d] examining lines[%d] = %s", l, r, mid,
+      lines[mid]);
+    if( StringLessEqual(str, (FULL_CHAR *) lines[mid]) )  r = mid - 1;
+    else l = mid + 1;
+  }
+  sscanf( (char *) lines[l], "%[^\t]", buff);
+  if( StringEqual(str, buff) )
+  {
+    res = TRUE;
+    *lnum = l;
+    debug1(DBS, D, "SearchLines returning TRUE (lnum %d)", *lnum);
+  }
+  else
+  { res = FALSE;
+    debug0(DBS, D, "SearchLines returning FALSE");
+  }
+  return res;
+} /* end SearchLines */
+
+
+/*@::DbRetrieve()@************************************************************/
+/*                                                                           */
+/*  BOOLEAN DbRetrieve(db, gall, sym, tag, seq, dfnum, dfpos, dlnum, cont)   */
+/*                                                                           */
+/*  Retrieve the first entry of database db with the given gall, sym and     */
+/*  tag.  Set *seq, *dfnum, *dlnum, *dfpos to the associated value.          */
+/*  Set *cont to a private value for passing to DbRetrieveNext.              */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN DbRetrieve(OBJECT db, BOOLEAN gall, OBJECT sym, FULL_CHAR *tag,
+  FULL_CHAR *seq, FILE_NUM *dfnum, long *dfpos, int *dlnum, long *cont)
+{ int symnum, lnum;  FULL_CHAR line[MAX_BUFF], buff[MAX_BUFF];
+  ifdebug(DPP, D, ProfileOn("DbRetrieve"));
+  debug4(DBS, DD, "DbRetrieve(%s, %s%s&%s)", string(db), gall ? "0" : "",
+	SymName(sym), tag);
+
+  /* check OK to proceed */
+  if( !reading(db) || db_filep(db) == null )
+  { debug0(DBS, DD, "DbRetrieve returning FALSE (empty or not reading)");
+    ifdebug(DPP, D, ProfileOff("DbRetrieve"));
+    return FALSE;
+  }
+
+  /* convert parameters into search key */
+  SymToNum(db, sym, symnum, FALSE);
+  sprintf( (char *) buff, "%s%d&%s", gall ? "0" : "", symnum, tag);
+
+  if( in_memory(db) )
+  {
+    /* search internal table, return if not found; set *cont to continuation */
+    if( !SearchLines(db_lines(db), 0, db_lineslen(db) - 1, buff, &lnum) )
+    { debug0(DBS, DD, "DbRetrieve returning FALSE (key not present)");
+      ifdebug(DPP, D, ProfileOff("DbRetrieve"));
+      return FALSE;
+    }
+    sscanf( (char *) db_lines(db)[lnum],
+      "%*[^\t]\t%[^\t]\t%*[^\t]\t%ld\t%d\t%[^\n]", seq, dfpos, dlnum, buff);
+    *cont = lnum+1;
+  }
+  else
+  {
+    /* search for key in file, return if not found; set *cont to continuatn */
+    fseek(db_filep(db), 0L, SEEK_END);
+    if( !SearchFile(db_filep(db), (int) left_pos(db),
+	   (int) ftell(db_filep(db)) - 1, buff, line) )
+    { debug0(DBS, DD, "DbRetrieve returning FALSE (key not present)");
+      ifdebug(DPP, D, ProfileOff("DbRetrieve"));
+      return FALSE;
+    }
+    sscanf( (char *) line,
+      "%*[^\t]\t%[^\t]\t%*[^\t]\t%ld\t%d\t%[^\n]", seq, dfpos, dlnum, buff);
+    *cont = ftell(db_filep(db));
+  }
+
+  /* work out file name if . abbreviation used, and possibly define file */
+  if( StringEqual(buff, AsciiToFull(".")) )
+  { StringCopy(buff, string(db));
+  }
+  *dfnum = FileNum(buff, DATA_SUFFIX);
+  if( *dfnum == NO_FILE )  /* can only occur in cross reference database */
+  { debug0(DFS, D, "  calling DefineFile from DbRetrieve");
+    *dfnum = DefineFile(buff, DATA_SUFFIX, &fpos(db),
+      DATABASE_FILE, SOURCE_PATH);
+  }
+
+  /* return */
+  debug3(DBS, DD, "DbRetrieve returning TRUE (in %s at %ld, line %d)",
+    FileName(*dfnum), *dfpos, *dlnum);
+  ifdebug(DPP, D, ProfileOff("DbRetrieve"));
+  return TRUE;
+} /* end DbRetrieve */
+
+
+/*@::DbRetrieveNext()@********************************************************/
+/*                                                                           */
+/*  BOOLEAN DbRetrieveNext(db, gall, sym, tag, seq, dfnum, dfpos,dlnum,cont) */
+/*                                                                           */
+/*  Retrieve the entry of database db pointed to by *cont.                   */
+/*  Set *gall, *sym, *tag, *seq, *dfnum, *dlnum, *dfpos to the value.        */
+/*  Reset *cont to the next entry for passing to the next DbRetrieveNext.    */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN DbRetrieveNext(OBJECT db, BOOLEAN *gall, OBJECT *sym, FULL_CHAR *tag,
+  FULL_CHAR *seq, FILE_NUM *dfnum, long *dfpos, int *dlnum, long *cont)
+{ FULL_CHAR line[MAX_BUFF], *cline, fname[MAX_BUFF]; int symnum;
+  ifdebug(DPP, D, ProfileOn("DbRetrieveNext"));
+  debug2(DBS, DD, "DbRetrieveNext( %s, %ld )", string(db), *cont);
+  assert(reading(db), "DbRetrieveNext: not reading");
+
+  /* check OK to proceed */
+  if( db_filep(db) == null )
+  { debug0(DBS, DD, "DbRetrieveNext returning FALSE (empty database)");
+    ifdebug(DPP, D, ProfileOff("DbRetrieveNext"));
+    return FALSE;
+  }
+
+  if( in_memory(db) )
+  {
+    /* get next entry from internal database */
+    if( *cont >= db_lineslen(db) )
+    { debug0(DBS, DD, "DbRetrieveNext returning FALSE (no successor)");
+      ifdebug(DPP, D, ProfileOff("DbRetrieveNext"));
+      return FALSE;
+    }
+    cline = (FULL_CHAR *) db_lines(db)[*cont];
+    *gall = (cline[0] == '0' ? 1 : 0);
+    sscanf((char *)&cline[*gall], "%d&%[^\t]\t%[^\t]\t%*[^\t]\t%ld\t%d\t%[^\n]",
+      &symnum, tag, seq, dfpos, dlnum, fname);
+    *cont = *cont + 1;
+  }
+  else
+  {
+    /* use *cont to find position of next entry; advance *cont */
+    fseek(db_filep(db), *cont == 0L ? (long) left_pos(db) : *cont, SEEK_SET);
+    if( StringFGets(line, MAX_BUFF, db_filep(db)) == NULL )
+    { debug0(DBS, DD, "DbRetrieveNext returning FALSE (no successor)");
+      ifdebug(DPP, D, ProfileOff("DbRetrieveNext"));
+      return FALSE;
+    }
+    *gall = (line[0] == '0' ? 1 : 0);
+    sscanf((char *)&line[*gall], "%d&%[^\t]\t%[^\t]\t%*[^\t]\t%ld\t%d\t%[^\n]",
+      &symnum, tag, seq, dfpos, dlnum, fname);
+    *cont = ftell(db_filep(db));
+  }
+
+  /* work out file name if . abbreviation used, and possibly define file */
+  if( StringEqual(fname, AsciiToFull(".")) )
+  { StringCopy(fname, string(db));
+  }
+  *dfnum = FileNum(fname, DATA_SUFFIX);
+  if( *dfnum == NO_FILE )  /* can only occur in cross reference database */
+  { debug0(DFS, D, "  calling DefineFile from DbRetrieveNext");
+    *dfnum = DefineFile(fname, DATA_SUFFIX, &fpos(db),
+      DATABASE_FILE, SOURCE_PATH);
+  }
+  NumToSym(db, symnum, *sym);
+
+  /* return */
+  debug3(DBS, DD, "DbRetrieveNext returning TRUE (in %s at %ld, line %d)",
+    FileName(*dfnum), *dfpos, *dlnum);
+  ifdebug(DPP, D, ProfileOff("DbRetrieveNext"));
+  return TRUE;
+} /* end DbRetrieveNext */
diff --git a/z34.c b/z34.c
new file mode 100644
index 0000000..1e21324
--- /dev/null
+++ b/z34.c
@@ -0,0 +1,112 @@
+/*@z34.c:Rotation Service:Declarations@***************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z34.c                                                      */
+/*  MODULE:       Rotation Service                                           */
+/*  EXTERNS:      RotateSize()                                               */
+/*                                                                           */
+/*****************************************************************************/
+#include <math.h>
+#ifndef M_PI
+#define M_PI       3.1415926535897931160E0
+#endif
+#include "externs.h"
+
+typedef struct { double x, y;          } rect_coord;
+typedef struct { double angle, radius; } polar_coord;
+
+#define rect_to_polar(rect, polar)				\
+polar.angle = atan2(rect.y, rect.x),				\
+polar.radius = sqrt(rect.x*rect.x + rect.y*rect.y)
+
+#define polar_to_rect(polar, rect)				\
+rect.x = polar.radius * cos(polar.angle),			\
+rect.y = polar.radius * sin(polar.angle)
+
+
+/*@::RotateSize()@************************************************************/
+/*                                                                           */
+/*  RotateSize(xcb, xcf, xrb, xrf, y, theta)                                 */
+/*                                                                           */
+/*  Calculate the size of x, assuming that it is y rotated by theta degrees. */
+/*                                                                           */
+/*****************************************************************************/
+
+void RotateSize(FULL_LENGTH *xcb, FULL_LENGTH *xcf, FULL_LENGTH *xrb,
+  FULL_LENGTH *xrf, OBJECT y, FULL_LENGTH theta)
+{ rect_coord ycorners[4], xcorner;  polar_coord pol;
+  double maxx, maxy, minx, miny, ang;  int i;
+#if DEBUG_ON
+  char buff1[20], buff2[20];
+#endif
+
+  /* calculate theta in radians */
+  ang = (double) theta * 2 * M_PI / (double) (DG * 360);
+  ifdebug(DRS, D, sprintf(buff2, "%.1f", ang));
+  debug2(DRS, D, "RotateSize( %s, %s )", EchoObject(y), buff2);
+  debug4(DRS, DD, "  ycb %s, ycf %s, yrb %s, yrf %s",
+	EchoLength(back(y, COLM)), EchoLength(fwd(y, COLM)),
+	EchoLength(back(y, ROWM)), EchoLength(fwd(y, ROWM)));
+
+  /* set up coordinates of the four corners of y */
+  ycorners[0].x =   (float) fwd(y, COLM);
+  ycorners[0].y =   (float) back(y, ROWM);
+  ycorners[1].x = - (float) back(y, COLM);
+  ycorners[1].y =   (float) back(y, ROWM);
+  ycorners[2].x = - (float) back(y, COLM);
+  ycorners[2].y = - (float) fwd(y, ROWM);
+  ycorners[3].x =   (float) fwd(y, COLM);
+  ycorners[3].y = - (float) fwd(y, ROWM);
+
+  /* rotate these four corners by theta and store their extremes */
+  maxx = maxy = (float) - MAX_FULL_LENGTH;
+  minx = miny = (float) MAX_FULL_LENGTH;
+  for( i = 0;  i < 4;  i++ )
+  {	
+    if( ycorners[i].x == 0 && ycorners[i].y == 0 )
+    {	pol.radius = 0; pol.angle  = 0; }
+    else rect_to_polar(ycorners[i], pol);
+    ifdebug(DRS, DD, sprintf(buff1, "%.1f", pol.angle));
+    ifdebug(DRS, DD, sprintf(buff2, "%.1f", ang));
+    debug5(DRS, DD, "  transforming (%s, %s) -> (%s, %s) + %s",
+      EchoLength( (int) ycorners[i].x), EchoLength( (int) ycorners[i].y),
+      EchoLength( (int) pol.radius), buff1, buff2);
+    pol.angle += ang;
+    polar_to_rect(pol, xcorner);
+    ifdebug(DRS, DD, sprintf(buff1, "%.1f", pol.angle));
+    debug4(DRS, DD, "    transforming (%s, %s) -> (%s, %s)",
+      EchoLength( (int) pol.radius), buff1,
+      EchoLength( (int) xcorner.x), EchoLength( (int) xcorner.y) );
+    maxx = find_max(maxx, xcorner.x);    minx = find_min(minx, xcorner.x);
+    maxy = find_max(maxy, xcorner.y);    miny = find_min(miny, xcorner.y);
+  }
+
+  /* store sizes back into x and return */
+  *xcb = - (int) minx;    *xcf  =   (int) maxx;
+  *xrb =   (int) maxy;    *xrf  = - (int) miny;
+  debug0(DRS, D, "RotateSize returning.");
+  debug4(DRS, DD, "  xcb %s, xcf %s, xrb %s, xrf %s",
+    EchoLength(*xcb), EchoLength(*xcf),
+    EchoLength(*xrb), EchoLength(*xrf));
+} /* end RotateSize */
diff --git a/z35.c b/z35.c
new file mode 100644
index 0000000..4d0e002
--- /dev/null
+++ b/z35.c
@@ -0,0 +1,151 @@
+/*@z35.c:Time Keeper: MomentSym(), TimeString()@******************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z35.c                                                      */
+/*  MODULE:       Time Keeper                                                */
+/*  EXTERNS:      MomentSym, InitTime(), StartMoment(), TimeString()         */
+/*                                                                           */
+/*****************************************************************************/
+#include <time.h>
+#include "externs.h"
+
+#define load(str, typ, encl)						\
+  sym = InsertSym(str, typ, no_fpos, DEFAULT_PREC,  			\
+  FALSE, FALSE, 0, encl, MakeWord(WORD, STR_EMPTY, no_fpos));		\
+  if( typ == NPAR )  visible(sym) = TRUE
+
+#define add_par(format, val, sym)					\
+  sprintf( (char *) buff, format, val);					\
+  New(par, PAR);  actual(par) = sym;					\
+  Link(current_moment, par);						\
+  tmp = MakeWord(WORD, buff, no_fpos);					\
+  Link(par, tmp);
+
+static OBJECT current_moment = nilobj;
+static FULL_CHAR time_string[30] = { '\0' };
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT MomentSym;                                                        */
+/*                                                                           */
+/*  The symbol table entry for the @Moment symbol.                           */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT MomentSym = nilobj;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *TimeString()                                                  */
+/*                                                                           */
+/*  Returns a pointer to a string containing the current time.               */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *TimeString(void)
+{ return time_string;
+} /* end TimeString */
+
+
+/*@::InitTime(), StartMoment()@***********************************************/
+/*                                                                           */
+/*  InitTime()                                                               */
+/*                                                                           */
+/*  Place a declaration of the @Moment symbol into the symbol table, and     */
+/*  initialize the value of the object StartMoment.                          */
+/*                                                                           */
+/*****************************************************************************/
+
+void InitTime(void)
+{ time_t raw_time; struct tm *now;
+  FULL_CHAR buff[20]; OBJECT par, tmp, sym, env;
+  OBJECT tag, second, minute, hour, weekday,
+	monthday, yearday, month, year, century, dst;
+  debug0(DTK, D, "InitTime()");
+
+  /* define @Moment symbol with its host of named parameters */
+  MomentSym = load(KW_MOMENT,         LOCAL, StartSym);
+  tag       = load(KW_TAG,            NPAR,  MomentSym);
+  second    = load(KW_SECOND,         NPAR,  MomentSym);
+  minute    = load(KW_MINUTE,         NPAR,  MomentSym);
+  hour      = load(KW_HOUR,           NPAR,  MomentSym);
+  monthday  = load(KW_DAY,            NPAR,  MomentSym);
+  month     = load(KW_MONTH,          NPAR,  MomentSym);
+  year      = load(KW_YEAR,           NPAR,  MomentSym);
+  century   = load(KW_CENTURY,        NPAR,  MomentSym);
+  weekday   = load(KW_WEEKDAY,        NPAR,  MomentSym);
+  yearday   = load(KW_YEARDAY,        NPAR,  MomentSym);
+  dst       = load(KW_DAYLIGHTSAVING, NPAR,  MomentSym);
+
+  /* get current time and convert to ASCII */
+  if( time(&raw_time) == -1 )
+    Error(35, 1, "unable to obtain the current time", WARN, no_fpos);
+  now = localtime(&raw_time);
+  StringCopy(time_string, AsciiToFull(asctime(now)));
+
+  /* start of current_moment */
+  New(current_moment, CLOSURE);
+  actual(current_moment) = MomentSym;
+
+  /* attach its many parameters */
+  add_par("%s",   KW_NOW,                      tag);
+  add_par("%.2d", now->tm_sec,                 second);
+  add_par("%.2d", now->tm_min,                 minute);
+  add_par("%.2d", now->tm_hour,                hour);
+  add_par("%d",   now->tm_mday,                monthday);
+  add_par("%d",   now->tm_mon + 1,             month);
+  add_par("%.2d", now->tm_year % 100,          year);
+  add_par("%d",   (now->tm_year+1900) / 100,   century);
+  add_par("%d",   now->tm_wday + 1,            weekday);
+  add_par("%d",   now->tm_yday,                yearday);
+  add_par("%d",   now->tm_isdst,               dst);
+
+  /* add a null environment */
+  New(env, ENV);
+  AttachEnv(env, current_moment);
+  debug0(DTK, D, "InitTime() returning.");
+  debug0(DTK, DD, "current_moment =");
+  ifdebug(DTK, DD, DebugObject(current_moment));
+} /* end InitTime */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT StartMoment()                                                     */
+/*                                                                           */
+/*  Returns a copy of the initial time.                                      */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT StartMoment(void)
+{ OBJECT res;
+  debug0(DTK, D, "StartMoment()");
+  assert(current_moment != nilobj, "StartMoment: current_moment == nilobj!");
+  res = CopyObject(current_moment, no_fpos);
+  debug0(DTK, D, "StartMoment returning");
+  ifdebug(DTK, D, DebugObject(res));
+  return res;
+}
diff --git a/z36.c b/z36.c
new file mode 100644
index 0000000..28352c9
--- /dev/null
+++ b/z36.c
@@ -0,0 +1,1223 @@
+/*@z36.c:Hyphenation: Declarations@*******************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z36.c                                                      */
+/*  MODULE:       Hyphenation                                                */
+/*  EXTERNS:      Hyphenate()                                                */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define	NODE_MULT	4		/* what to multiply node indexes by  */
+#define MAX_CHAR	256		/* max chars represented in one char */
+#define TRIE_MAGIC	5361534
+#define KILL_CLASS	0		/* characters preventing hyphenation */
+#define PUNCT_CLASS	1		/* characters delimiting hyphenation */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static tex_codes[]                                                       */
+/*                                                                           */
+/*  TeX hyphenation files often contain escape sequences consisting of a     */
+/*  backslash and two or three characters to denote 8-bit characters.  This  */
+/*  code will read and translate such sequences if they are in the following */
+/*  list.                                                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+static char *tex_codes[] = {
+
+	"Agrave",	"`A",	"\300",
+	"Aacute",	"'A",	"\301",
+	"Acircumflex",	"^A",	"\302",
+	"Atilde",	"~A",	"\303",
+	"Adieresis",	"\"A",	"\304",
+	"agrave",	"`a",	"\340",
+	"aacute",	"'a",	"\341",
+	"acircumflex",	"^a",	"\342",
+	"atilde",	"~a",	"\343",
+	"adieresis",	"\"a",	"\344",
+
+	"ccedilla",	"cc",	"\347",
+
+	"Egrave",	"`E",	"\310",
+	"Eacute",	"'E",	"\311",
+	"Ecircumflex",	"^E",	"\312",
+	"Edieresis",	"\"E",	"\313",
+	"egrave",	"`e",	"\350",
+	"eacute",	"'e",	"\351",
+	"ecircumflex",	"^e",	"\352",
+	"edieresis",	"\"e",	"\353",
+
+	"Igrave",	"`I",	"\314",
+	"Iacute",	"'I",	"\315",
+	"Icircumflex",	"^I",	"\316",
+	"Idieresis",	"\"I",	"\317",
+	"igrave",	"`\\i",	"\354",
+	"iacute",	"'\\i",	"\355",
+	"icircumflex",	"^\\i",	"\356",
+	"idieresis",	"\"\\i","\357",
+
+	"Ograve",	"`O",	"\322",
+	"Oacute",	"'O",	"\323",
+	"Ocircumflex",	"^O",	"\324",
+	"Otilde",	"~O",	"\325",
+	"Odieresis",	"\"O",	"\326",
+	"ograve",	"`o",	"\362",
+	"oacute",	"'o",	"\363",
+	"ocircumflex",	"^o",	"\364",
+	"otilde",	"~o",	"\365",
+	"odieresis",	"\"o",	"\366",
+
+	"Ugrave",	"`U",	"\331",
+	"Uacute",	"'U",	"\332",
+	"Ucircumflex",	"^U",	"\333",
+	"Udieresis",	"\"U",	"\334",
+	"ugrave",	"`u",	"\371",
+	"uacute",	"'u",	"\372",
+	"ucircumflex",	"^u",	"\373",
+	"udieresis",	"\"u",	"\374",
+
+	"",		"",	""
+};
+
+static void DecodeEscapes(FULL_CHAR *str, FULL_CHAR *fname, int hline_num)
+{ FULL_CHAR *p, *q;
+  int i;
+  p = q = str;
+  while( *q != '\0' )
+  {
+    if( *q == '\\' )
+    { for( i = 0;  tex_codes[i][0] != '\0';  i += 3 )
+      {
+	if( StringBeginsWith(q+1, AsciiToFull(tex_codes[i+1])) )
+	  break;
+      }
+      if( tex_codes[i][0] != '\0' )
+      {
+	StringCopy(p, tex_codes[i+2]);
+	p += StringLength(AsciiToFull(tex_codes[i+2]));
+	q += StringLength(AsciiToFull(tex_codes[i+1])) + 1;
+      }
+      else
+      {
+	Error(36, 1, "in hyphenation file %s, unknown escape sequence (line %d)",
+	  FATAL, no_fpos, fname, hline_num);
+      }
+    }
+    else *p++ = *q++;
+  }
+  *p++ = '\0';
+} /* end DecodeEscapes */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static TRIE HyphTables[]                                                 */
+/*                                                                           */
+/*  The packed hyphenation tables, indexed by language.  An entry is NULL    */
+/*  when the table for that language has not yet been read in; TriedFile     */
+/*  is TRUE after we have tried to read that file, whether or not we were    */
+/*  successful.                                                              */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef struct trie_rec
+{ int		magic;			/* a magic number to make sure ok    */
+  int		class_count;		/* the number of character classes   */
+  unsigned char	class[MAX_CHAR];	/* the character classes             */
+  short		*node_mem;		/* the node memory                   */
+  int		node_lim;		/* top of node memory                */
+  int		node_free;		/* first free space in node memory   */
+  FULL_CHAR	*string_mem;		/* the string memory                 */
+  int		string_lim;		/* top of string memory              */
+  int		string_first;		/* the first (last inserted) string  */
+} *TRIE;
+
+static TRIE	HyphTables[MAX_LANGUAGE] = { NULL };
+static BOOLEAN	TriedFile[MAX_LANGUAGE]  = { FALSE };
+
+
+/*@::CompressValue(), UncompressValue()@**************************************/
+/*                                                                           */
+/*  CompressValue(p, q)                                                      */
+/*                                                                           */
+/*  Compress value string p, placing the result in q.                        */
+/*                                                                           */
+/*****************************************************************************/
+#define FirstHalf(y)		( (y) >> 4 )
+#define LastHalf(y)		( (y) & 15 )
+#define AssignFirstHalf(x, y)	( (x) = ((y) << 4) )
+#define AssignLastHalf(x, y)	( (x) |= (y) )
+
+#define CompressValue(compressed, uncompressed)				\
+/* FULL_CHAR *compressed, *uncompressed; */				\
+{ register FULL_CHAR *p, *q;						\
+  p = compressed;  q = uncompressed;					\
+  for( ; ; )								\
+  {									\
+    if( *q == (FULL_CHAR) '\0' )					\
+    { *p = (FULL_CHAR) '\0';						\
+      break;								\
+    }									\
+    AssignFirstHalf(*p, *q++ - '0' + 2);				\
+    if( *q == (FULL_CHAR) '\0' )					\
+    { *++p = (FULL_CHAR) '\0';						\
+      break;								\
+    }									\
+    AssignLastHalf(*p, *q++ - '0' + 2);					\
+    p++;								\
+  }									\
+}
+
+/*****************************************************************************/
+/*                                                                           */
+/*  UncompressValue(q, p)                                                    */
+/*                                                                           */
+/*  Uncompress value string q, placing the result in p.                      */
+/*                                                                           */
+/*****************************************************************************/
+
+#define UncompressValue(compressed, uncompressed)			\
+/* FULL_CHAR *compressed, *uncompressed; */				\
+{ register FULL_CHAR *p, *q;						\
+  p = compressed; q = uncompressed;					\
+  for( ; ; )								\
+  {									\
+    if( FirstHalf(*p) == '\0' )  break;					\
+    *q++ = FirstHalf(*p) + '0' - 2;					\
+    if( LastHalf(*p) == '\0' )  break;					\
+    *q++ = LastHalf(*p) + '0' - 2;					\
+    p++;								\
+  }									\
+  *q = (FULL_CHAR) '\0';						\
+}
+
+/*@::AltCompressValue(), AltUncompressValue()@********************************/
+/*                                                                           */
+/*  AltCompressValue(compressed, uncompressed)                               */
+/*                                                                           */
+/*  Compress value string, placing the result in compressed.                 */
+/*                                                                           */
+/*  This is an alternative compression scheme to the one given above, which  */
+/*  should give better compression.  The result is a sequence of pairs of    */
+/*  the form (skip, value) saying that we are to skip so many places and     */
+/*  then insert the given non-zero value.  All the other values are zero.    */
+/*  Skip values are 4-bit numbers (maximum skip is 15, but we will insert    */
+/*  a 15 skip with a zero value in the rare case of skipping further).       */
+/*  Values are also 4-bit numbers, known to be non-zero.  So the memory      */
+/*  cost is 8 bits per non-zero value.                                       */
+/*                                                                           */
+/*****************************************************************************/
+#define CharPack(ch, a, b) (ch = ((a) << 4) | (b))
+#define CharUnPack(ch, a, b) ((a) = (ch) >> 4, (b) = (ch) & 15)
+
+#define AltCompressValue(compressed, uncompressed)			\
+/* FULL_CHAR *compressed, *uncompressed; */				\
+{ register FULL_CHAR *p, *q, *prev;					\
+  prev = (uncompressed) - 1;  p = (compressed);				\
+  for( q = (uncompressed);  *q != (FULL_CHAR) '\0';  q++ )		\
+  {									\
+    if( *q != (FULL_CHAR) '0' || q - prev - 1 >= 15 )			\
+    {									\
+      CharPack(*p++, q - prev - 1, *q - '0' + 2);			\
+      prev = q;								\
+    }									\
+  }									\
+  *p++ = (FULL_CHAR) '\0';						\
+}
+
+/*****************************************************************************/
+/*                                                                           */
+/*  AltUncompressValue(q, p)                                                 */
+/*                                                                           */
+/*  Uncompress value string q, placing the result in p.                      */
+/*                                                                           */
+/*****************************************************************************/
+
+#define AltUncompressValue(compressed, uncompressed)			\
+{ register FULL_CHAR *p, *q, xval; int i, skip;				\
+  q = (uncompressed);							\
+  for( p = (compressed);  *p != (FULL_CHAR) '\0';  p++ )		\
+  { CharUnPack(*p, skip, xval);						\
+    for( i = 0;  i < skip;  i++ )					\
+      *q++ = (FULL_CHAR) '0';						\
+    *q++ = (FULL_CHAR) (xval + '0' - 2);					\
+  }									\
+  *q++ = (FULL_CHAR) '\0';						\
+  debug1(DHY, D, "AltUncompressValue returning %s", (uncompressed));	\
+}
+
+/* ***
+static void AltUncompressValue(FULL_CHAR *compressed, FULL_CHAR *uncompressed)
+{ register FULL_CHAR *p, *q, xval; int i, skip;				
+  q = uncompressed;							
+  for( p = compressed;  *p != (FULL_CHAR) '\0';  p++ )			
+  { CharUnPack(*p, skip, xval);						
+    for( i = 0;  i < skip;  i++ )					
+      *q++ = (FULL_CHAR) '0';						
+    *q++ = (FULL_CHAR) (xval + '0' - 2);					
+  }									
+  *q++ = (FULL_CHAR) '\0';						
+  debug1(DHY, D, "AltUncompressValue returning %s", uncompressed);
+}
+*** */
+
+/*@@**************************************************************************/
+/*                                                                           */
+/*  ClassConvert(in, out, T, fname, hline_num)                               */
+/*                                                                           */
+/*  Set out[i] to the character class of in[i] in T, for all i.              */
+/*                                                                           */
+/*****************************************************************************/
+
+#define ClassConvert(in, out, T, fname, hline_num)			\
+{ int i;								\
+  for( i = 0;  in[i] != '\0';  i++ )					\
+    if( T->class[in[i]] != 0 )  out[i] = T->class[in[i]];		\
+    else								\
+      Error(36, 2, "in hyphenation file %s, line %d: character (octal %o) is not in any class",	\
+	FATAL, no_fpos, fname, hline_num, in[i]);				\
+  out[i] = '\0';							\
+} /* end ClassConvert */
+
+
+/*@::findrep(), TrieRetrieve(), ShowRate()@***********************************/
+/*                                                                           */
+/*  findrep(i, T)     Returns one character whose class in T is i.           */
+/*                                                                           */
+/*****************************************************************************/
+#if DEBUG_ON
+
+static FULL_CHAR findrep(int i, TRIE T)
+{ int ch;
+  for( ch = 0;  ch < MAX_CHAR;  ch++ )
+    if( T->class[ch] == i ) return (FULL_CHAR) ch;
+  Error(36, 3, "DoTriePrint: findrep failed", INTERN, no_fpos);
+  return (FULL_CHAR) ch;  /* never reached, but gcc doesn't know that */
+} /* end findrep */
+
+
+#if 0
+/*****************************************************************************/
+/*                                                                           */
+/*  static FULL_CHAR *TrieRetrieve(key, T)                                   */
+/*                                                                           */
+/*  Retrieve the value associated with key in T, or NULL if not present.     */
+/*  This procedure is not presently in use.                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+static FULL_CHAR *TrieRetrieve(FULL_CHAR *key, TRIE T)
+{ FULL_CHAR str[MAX_BUFF];  int i, curr_node, next_node, pos;
+  debug1(DHY, DD, "TrieRetrieve(%s, T)", key);
+  ClassConvert(key, str, T, STR_EMPTY, 0);
+
+  /* invariant: curr_node is an existing node of T with prefix str[0..i-1] */
+  curr_node = i = 0;
+  for(;;)
+  {
+    /* if next_node is 0, the string was never inserted */
+    next_node = T->node_mem[curr_node + str[i]];
+    if( next_node == 0 )  return (FULL_CHAR *) NULL;
+
+    /* if next_node < 0 it represents an offset into the string memory */
+    if( next_node < 0 )
+    { pos = - next_node;
+      if( str[i] != '\0' )
+      {	do
+	{ if( str[++i] != T->string_mem[pos++] )  return (FULL_CHAR *) NULL;
+	} while( str[i] != '\0' );
+      }
+      return &(T->string_mem[pos]);
+    }
+
+    /* otherwise next_node is the trie node to be searched next */
+    curr_node = NODE_MULT*next_node;  i++;
+  }
+} /* end TrieRetrieve */
+#endif
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static ShowRate(key, start, stop, rate, fp)                              */
+/*                                                                           */
+/*  Debug print of key[] and rate[] on file fp.                              */
+/*                                                                           */
+/*****************************************************************************/
+
+static void ShowRate(FULL_CHAR *key, int start, int stop, FULL_CHAR *rate,
+FILE *fp)
+{ int i;
+  fprintf(fp, "key:    ");
+  for( i = start;  i < stop;  i++ )  fprintf(fp, " %c", key[i]);
+  fprintf(fp, "\nrate:");
+  for( i = 0;  rate[i] != '\0';  i++ )  fprintf(fp, " %c", rate[i]);
+  fprintf(fp, "\n");
+} /* end ShowRate */
+
+
+/*@::DoTriePrint(), TriePrint()@**********************************************/
+/*                                                                           */
+/*  static DoTriePrint(T, node, len, fp)                                     */
+/*                                                                           */
+/*  Print on file fp the subset of the entries of trie T stored in node and  */
+/*  its descendants.  The node has prefix prefix[0..len-1].                  */
+/*                                                                           */
+/*****************************************************************************/
+
+static FULL_CHAR prefix[MAX_BUFF];
+
+static void DoTriePrint(TRIE T, int node, int len, FILE *fp)
+{ int i, next_node, pos;  FULL_CHAR str[20];
+  for( i = 0;  i < T->class_count;  i++ )
+  {
+    /* if next_node < 0, have string to print */
+    next_node = T->node_mem[node + i];
+    if( next_node < 0 )
+    {
+      prefix[len] = '\0';
+      fprintf(fp, "%s", prefix);
+      pos = - next_node;
+      if( i != 0 )
+      {
+	fprintf(fp, "%c", findrep(i, T));
+	while( T->string_mem[pos] != '\0' )
+	{ fprintf(fp, "%c", findrep(T->string_mem[pos], T));
+	  pos++;
+	}
+	pos++;
+      }
+      AltUncompressValue(&(T->string_mem[pos]), str);
+      fprintf(fp, " %s\n", str);
+    }
+
+    /* else if next_node > 0 have a child node to explore */
+    else if( next_node > 0 )
+    { assert( i > 0, "DoTriePrint: i == 0!" );
+      prefix[len] = findrep(i, T);
+      prefix[len+1] = '\0';
+      DoTriePrint(T, NODE_MULT*next_node, len+1, fp);
+    }
+  }
+} /* end DoTriePrint */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static TriePrint(T, fp)                                                  */
+/*                                                                           */
+/*  Print trie T on file fp.                                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+static void TriePrint(TRIE T, FILE *fp)
+{ int i, ch;
+  assert( T-> magic == TRIE_MAGIC, "TriePrint: magic!" );
+  fprintf(fp, "Classes:");
+  for( i = 1;  i < T->class_count;  i++ )
+  { fprintf(fp, " ");
+    for( ch = 0;  ch < MAX_CHAR;  ch++ )
+      if( T->class[ch] == i )  fprintf(fp, "%c", ch);
+  }
+  fprintf(fp, "\n");
+  fprintf(fp, "Node space: %d capacity, %d used\n", T->node_lim, T->node_free);
+  fprintf(fp, "String space: %d capacity, %d used\n", T->string_lim,
+	T->string_lim - T->string_first);
+  prefix[0] = '\0';
+  DoTriePrint(T, 0, 0, fp);
+} /* end TriePrint */
+#endif
+
+
+/*@::NewTrie(), NewTrieString(), NewTrieNode()@*******************************/
+/*                                                                           */
+/*  static TRIE NewTrie(node_lim, string_lim)                                */
+/*                                                                           */
+/*  Initialize a new trie with this much space for nodes and strings.        */
+/*                                                                           */
+/*****************************************************************************/
+
+static TRIE NewTrie(unsigned node_lim, unsigned string_lim)
+{ TRIE T;  int i;
+  debug2(DHY, DD, "NewTrie(%d, %d)", node_lim, string_lim);
+  ifdebug(DMA, DD, DebugRegisterUsage(MEM_HYPH_PATS, 1,
+    sizeof(struct trie_rec) + node_lim*sizeof(short)+string_lim*sizeof(char)));
+  T = (TRIE) malloc( sizeof(struct trie_rec)
+		     + node_lim*sizeof(short) + string_lim*sizeof(char));
+  if( T == (TRIE) NULL )
+    Error(36, 4, "run out of memory while constructing hyphenation table",
+      FATAL, no_fpos);
+  T->magic = TRIE_MAGIC;  T->class_count = 1;
+  for( i = 0;  i < MAX_CHAR;  i++ )  T->class[i] = 0;
+  T->node_mem = (short *) ( (char *) T + sizeof(struct trie_rec));
+  T->node_lim = node_lim;  T->node_free = 0;
+  T->string_mem = (FULL_CHAR *) &(T->node_mem[node_lim]);
+  T->string_lim = T->string_first = string_lim;
+  debug0(DHY, DD, "NewTrie returning.");
+  return T;
+} /* end NewTrie */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static short NewTrieString(str, T)                                       */
+/*                                                                           */
+/*  Copy a new string into T, and return its offset in string_mem;           */
+/*                                                                           */
+/*****************************************************************************/
+
+static short NewTrieString(FULL_CHAR *str, TRIE T)
+{ short res = T->string_first - StringLength(str) - 1;
+  if( res >= 0 )
+  { T->string_first = res;  StringCopy(&(T->string_mem[res]), str);
+  }
+  return res;
+} /* end NewTrieString */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  ststic int NewTrieNode(T)                                                */
+/*                                                                           */
+/*  Allocate a new empty trie node in T, and return its offset in node_mem.  */
+/*                                                                           */
+/*****************************************************************************/
+
+static int NewTrieNode(TRIE T)
+{ int i;  int res;
+  if( T->node_free + T->class_count > T->node_lim )
+    Error(36, 5, "hyphenation trie node limit exceeded", INTERN, no_fpos);
+  res = T->node_free;  T->node_free += T->class_count;
+  for( i = res;  i < T->node_free;  i++ )  T->node_mem[i] = 0;
+  return res;
+} /* end NewTrieNode */
+
+
+/*@::AddClassToTrie(), TrieInsert()@******************************************/
+/*                                                                           */
+/*  static AddClassToTrie(str, T)                                            */
+/*                                                                           */
+/*  Add a new character class, whose members are the characters of str, to   */
+/*  trie T.  This cannot occur after the first insertion.                    */
+/*                                                                           */
+/*****************************************************************************/
+
+static void AddClassToTrie(FULL_CHAR *str, TRIE T)
+{ int i;
+  assert( T->string_first == T->string_lim, "AddClassToTrie: after insertion");
+  for( i = 0;  str[i] != '\0';  i++ )
+    if( T->class[str[i]] == 0 ) T->class[str[i]] = T->class_count;
+    else Error(36, 6, "hyphenation class of %c may not be changed",
+      INTERN, no_fpos, str[i]);
+  T->class_count++;
+} /* end AddClassToTrie */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static BOOLEAN TrieInsert(key, value, T, fname, hline_num)               */
+/*                                                                           */
+/*  Insert a new key and value into trie T (originating in file fname on     */
+/*  line hline_num).                                                         */
+/*                                                                           */
+/*****************************************************************************/
+
+static BOOLEAN TrieInsert(FULL_CHAR *key, FULL_CHAR *value, TRIE T,
+FULL_CHAR *fname, int hline_num)
+{ FULL_CHAR str[MAX_BUFF], compressed_value[MAX_BUFF];
+  int i, curr_node, next_node, pos, ch;  short strpos;
+  debug2(DHY, DD, "TrieInsert(%s, %s, T)", key, value);
+
+  /* if first insertion, add one node after making sure class_count is even */
+  if( T->node_free == 0 )
+  { T->class_count = NODE_MULT * ceiling(T->class_count, NODE_MULT);
+    ch = NewTrieNode(T);
+  }
+
+  AltCompressValue(compressed_value, value);
+
+  /* invariant: curr_node is an existing node of T with prefix str[0..i-1] */
+  ClassConvert(key, str, T, fname, hline_num);
+  curr_node = i = 0;
+  for(;;)
+  {
+    /* if str is ended, add compressed_value only to string memory */
+    if( str[i] == '\0' )
+    { if( T->node_mem[curr_node] != 0 )
+	Error(36, 7, "hyphenation string %s already inserted",
+	  INTERN, no_fpos, key);
+      else
+      {
+	strpos = NewTrieString(compressed_value, T);
+	if( strpos < 0 )
+	{ debug0(DHY, DD, "TrieInsert returning FALSE (trie full)");
+	  return FALSE;
+	}
+	T->node_mem[curr_node] = - strpos;
+      }
+      debug0(DHY, DD, "TrieInsert returning TRUE (empty suffix).");
+      return TRUE;
+    }
+
+    /* if next position is unoccupied, store remainder of str and value */
+    next_node = T->node_mem[curr_node + str[i]];
+    if( next_node == 0 )
+    { ch = NewTrieString(compressed_value, T);
+      if( ch < 0 )
+      { debug0(DHY, DD, "TrieInsert returning FALSE (trie full)");
+	return FALSE;
+      }
+      strpos = NewTrieString(&str[i+1], T);
+      if( strpos < 0 )
+      { debug0(DHY, DD, "TrieInsert returning FALSE (trie full)");
+	return FALSE;
+      }
+      T->node_mem[curr_node + str[i]] = - strpos;
+      debug0(DHY, DD, "TrieInsert returning (non-empty suffix).");
+      return TRUE;
+    }
+
+    /* if next position is occupied by a non-empty string, move that */
+    /* string down one level and replace it by a trie node           */
+    if( next_node < 0 )
+    { pos = - next_node;
+      ch = T->string_mem[pos];
+      if( T->string_first == pos )  T->string_first++;
+      T->node_mem[curr_node + str[i]] = next_node = NewTrieNode(T)/NODE_MULT;
+      T->node_mem[NODE_MULT*next_node + ch] = -(pos+1);
+    }
+
+    /* now next is the offset of the next node to be searched */
+    curr_node = NODE_MULT*next_node;  i++;
+  }
+} /* end TrieInsert */
+
+
+/*@::BeGetChar(), BePutChar(), BeGetShort(), BePutShort(), etc.@**************/
+/*                                                                           */
+/*  BeGetChar(fp, pv)                                                        */
+/*  BePutChar(fp, v)                                                         */
+/*  BeGetShort(fp, pv)                                                       */
+/*  BePutShort(fp, v)                                                        */
+/*  BeGetInt(fp, pv)                                                         */
+/*  BePutInt(fp, v)                                                          */
+/*                                                                           */
+/*  Get char, short, or int pv from file fp, and put char, short, or int     */
+/*  onto file fp.  These routines are designed so that the file can be       */
+/*  written or read safely by big-endian and little-endian architectures;    */
+/*  this is accomplished by reading and writing one byte at a time to and    */
+/*  from a big-endian format file.  All return 0 on success, -1 on failure.  */
+/*  Thanks to David W. Sanderson for this code.                              */
+/*                                                                           */
+/*****************************************************************************/
+
+#define BeGetChar(fp, pv)  ( (c = getc(fp)) == EOF ? -1 : (*pv = c & 0xFF, 0) )
+#define BePutChar(fp, v)   ( putc( (char) (v & 0xFF), fp), 0 )
+
+#define BeGetShort(fp, pv)						\
+(  (c = getc(fp)) == EOF ? -1 :						\
+   (  *pv = (c & 0xFF) << 8,						\
+      (c = getc(fp)) == EOF ? -1 : (*pv |= c & 0xFF, 0)			\
+   )									\
+)
+
+#define BePutShort(fp, v)						\
+( putc((v >> 8) & 0xFF, fp), putc(v & 0xFF, fp), 0 )
+
+static int BeGetInt(FILE *fp, int *pv)
+{ int c;
+  if ((c = getc(fp)) == EOF) return -1;
+  *pv = (c & 0xFF) << 24;
+  if ((c = getc(fp)) == EOF) return -1;
+  *pv |= (c & 0xFF) << 16;
+  if ((c = getc(fp)) == EOF) return -1;
+  *pv |= (c & 0xFF) << 8;
+  if ((c = getc(fp)) == EOF) return -1;
+  *pv |= c & 0xFF;
+  return 0;
+}
+
+static int BePutInt(FILE *fp, int v)
+{
+  putc((v >> 24) & 0xFF, fp);
+  putc((v >> 16) & 0xFF, fp);
+  putc((v >> 8) & 0xFF, fp);
+  putc(v & 0xFF, fp);
+  return 0;
+}
+
+
+/*@::CompressTrie(), TrieRead(), AccumulateRating()@**************************/
+/*                                                                           */
+/*  static CompressTrie(T)                                                   */
+/*                                                                           */
+/*  Compress trie T and return its length in characters.                     */
+/*                                                                           */
+/*****************************************************************************/
+
+static void CompressTrie(TRIE T)
+{ FULL_CHAR *p, *q;  int len, i;
+  debug0(DHY, DD, "CompressTrie(T), T =");
+  debug2(DHY, DD, "Node space: %d capacity, %d used\n",
+    T->node_lim, T->node_free);
+  debug2(DHY, DD, "String space: %d capacity, %d used\n",
+    T->string_lim, T->string_lim - T->string_first);
+  ifdebug(DHY, DD, TriePrint(T, stderr));
+  T->node_lim = T->node_free;
+  for( i = 0;  i < T->node_lim;  i++ )
+    if( T->node_mem[i] < 0 )
+      T->node_mem[i] = - ( -T->node_mem[i] - T->string_first);
+  p = (FULL_CHAR *) &(T->node_mem[T->node_free]);
+  q = &(T->string_mem[T->string_first]);
+  len = T->string_lim - T->string_first;
+  for( i = 0;  i < len;  i++ )  *p++ = *q++;
+  T->string_mem = (FULL_CHAR *) &(T->node_mem[T->node_lim]);
+  T->string_first = 0;
+  T->string_lim = len;
+  len = sizeof(struct trie_rec) + T->node_lim * sizeof(short)
+				+ T->string_lim * sizeof(FULL_CHAR);
+  debug1(DHY, DD, "CompressTrie returning; len = %d, T =", len);
+  ifdebug(DHY, DD, TriePrint(T, stderr));
+} /* end CompressTrie */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static TRIE TrieRead(lnum, success)                                      */
+/*                                                                           */
+/*  Read in a packed trie if possible, otherwise pack an unpacked one.       */
+/*  The trie is to be for language lnum.                                     */
+/*                                                                           */
+/*  Boolean success is set to true if no errors were encountered.  If the    */
+/*  file read was a placeholder, success will be true but still a null       */
+/*  TRIE will be returned.                                                   */
+/*                                                                           */
+/*****************************************************************************/
+#define START_STATE		0
+#define CLASSES_STATE		1
+#define EXCEPTIONS_STATE	2
+#define LENGTH_LIMIT_STATE	3
+#define PATTERNS_STATE		4
+
+static TRIE TrieRead(LANGUAGE_NUM lnum, BOOLEAN *success)
+{ TRIE T;  FILE_NUM unpacked_fnum, packed_fnum;  OBJECT fname;
+  FILE *unpacked_fp, *packed_fp;  unsigned len;
+  int prev, i, j, c, state, hline_num, length_limit;
+#if DEBUG_ON
+  int icount = 0;
+#endif
+  debug2(DHY, DD, "TrieRead(%d %s)", lnum,
+    lnum == 0 ? STR_NONE : LanguageString(lnum));
+
+  /* get hyphenation file name from language module */
+  fname = LanguageHyph(lnum);
+  assert( fname == nilobj || is_word(type(fname)), "TrieRead: fname!" );
+  if( fname == nilobj )
+  { *success = FALSE;
+    return (TRIE) NULL;
+  }
+
+  /* define and open packed file */
+  debug0(DFS, DD, "  calling DefineFile from TrieRead (1)");
+  packed_fnum = DefineFile(string(fname), HYPH_PACKED_SUFFIX,
+    &fpos(fname), HYPH_PACKED_FILE, HYPH_PATH);
+  if( InitializeAll )
+  {
+    /* initializing so want to reconstruct packed files */
+    /* thanks to Ian Jackson <ian@chiark.greenend.org.uk> for this */
+    packed_fp = NULL;
+  }
+  else
+  {
+    /* not initializing so use existing packed files if possible */
+    packed_fp = OpenFile(packed_fnum, FALSE, FALSE);
+  }
+
+  if( packed_fp == NULL )
+  {
+    /* no packed file, so define and open unpacked one instead */
+    FULL_CHAR str[MAX_BUFF], key[MAX_BUFF], value[MAX_BUFF],
+		  buff[MAX_BUFF+10];
+    int bpos, bcount;
+    debug0(DFS, DD, "  calling DefineFile from TrieRead (2)");
+    unpacked_fnum = DefineFile(string(fname), HYPH_SUFFIX,
+      &fpos(fname), HYPH_FILE, HYPH_PATH);
+    unpacked_fp = OpenFile(unpacked_fnum, FALSE, FALSE);
+    if( unpacked_fp == NULL )
+    { Error(36, 8, "cannot open hyphenation file %s",
+	WARN, no_fpos, FileName(unpacked_fnum));
+      *success = FALSE;
+      return (TRIE) NULL;
+    }
+
+    /* check that first line contains magic header or stub */
+    if( StringFGets(str, MAX_BUFF, unpacked_fp) == NULL ||
+        ( !StringEqual(str, AsciiToFull("Lout hyphenation information\n")) &&
+	  !StringEqual(str, AsciiToFull("Lout hyphenation placeholder\n")) )
+      )
+      Error(36, 9, "header line of hyphenation file %s missing",
+	FATAL, no_fpos, FileName(unpacked_fnum));
+
+    /* if file is just a placeholder, exit silently with success */
+    if( !StringEqual(str, AsciiToFull("Lout hyphenation information\n")) )
+    { *success = TRUE;
+      return (TRIE) NULL;
+    }
+
+    /* read the classes, exceptions, and patterns from the unpacked file */
+    T = NewTrie( (unsigned) 120000,  (unsigned) 32767);
+    state = START_STATE;
+    hline_num = 1;
+    length_limit = 0;
+    while( StringFGets(buff, MAX_BUFF, unpacked_fp) != NULL )
+    {
+      hline_num++;  bpos = 0;
+      while( sscanf( (char *) &buff[bpos], "%s%n", str, &bcount) == 1 &&
+	str[0] != '%' )
+      {
+	bpos += bcount;
+        DecodeEscapes(str, string(fname), hline_num);
+
+        switch( state )
+        {
+	  case START_STATE:
+
+	    if( !StringEqual(str, AsciiToFull("Classes:")) )
+	      Error(36, 10, "Classes heading of hyphenation file %s missing",
+	        FATAL, no_fpos, FileName(unpacked_fnum));
+	    state = CLASSES_STATE;
+	    break;
+
+
+	  case CLASSES_STATE:
+
+	    if( StringEqual(str, AsciiToFull("Exceptions:")) )
+	    { state = EXCEPTIONS_STATE;
+	    }
+	    else if( StringEqual(str, AsciiToFull("Patterns:")) )
+	    { state = PATTERNS_STATE;
+	    }
+	    else if( StringEqual(str, AsciiToFull("LengthLimit:")) )
+	    { state = LENGTH_LIMIT_STATE;
+	    }
+	    else
+	    { debug1(DHY, DD, "adding class %s", str);
+	      AddClassToTrie(str, T);
+	    }
+	    break;
+
+
+	  case EXCEPTIONS_STATE:
+
+	    if( StringEqual(str, AsciiToFull("Patterns:")) )
+	    { state = PATTERNS_STATE;
+	    }
+	    else if( StringEqual(str, AsciiToFull("LengthLimit:")) )
+	    { state = LENGTH_LIMIT_STATE;
+	    }
+	    else
+	    { prev = CH_EIGHT; j = 0;
+	      key[j] = '.', value[j++] = prev, prev = CH_EIGHT;
+	      for( i = 0;  str[i] != '\0';  i++ )
+	      { if( str[i] == CH_HYPHEN )  prev = CH_NINE;
+	        else key[j] = str[i], value[j++] = prev, prev = CH_EIGHT;
+	      }
+	      key[j] = '.', value[j++] = prev, prev = CH_EIGHT;
+	      key[j] = '\0';  value[j] = prev;  value[j+1] = '\0';
+	      if( !TrieInsert(key, value, T, string(fname), hline_num) )
+	      {
+	        Error(36, 11, "hyphenation file %s%s is too large (at line %d)",
+		  WARN, &fpos(fname), string(fname), HYPH_SUFFIX, hline_num);
+	        *success = FALSE;
+	        return (TRIE) NULL;
+	      }
+	    }
+	    break;
+
+
+	  case LENGTH_LIMIT_STATE:
+
+	    if( StringEqual(str, AsciiToFull("Patterns:")) )
+	    { state = PATTERNS_STATE;
+	    }
+	    else if( sscanf( (char *) str, "%d", &length_limit) != 1 )
+	    {
+	      Error(36, 20, "bad LengthLimit in hyphenation file %s%s (line %d)",
+		WARN, &fpos(fname), string(fname), HYPH_SUFFIX, hline_num);
+	      *success = FALSE;
+	      return (TRIE) NULL;
+	    }
+	    break;
+
+
+	  case PATTERNS_STATE:
+
+	    prev = CH_ZERO; j = 0;
+	    for( i = 0;  str[i] != '\0';  i++ )
+	    { if( decimaldigit(str[i]) )  prev = str[i];
+	      else key[j] = str[i], value[j++] = prev, prev = CH_ZERO;
+	    }
+	    key[j] = '\0';  value[j] = prev;  value[j+1] = '\0';
+	    if( length_limit == 0 || j <= length_limit )
+	    {
+	      debug3(DHY, DD, "TrieInsert(%s, %s, T) [%d]", key, value, ++icount);
+	      if( !TrieInsert(key, value, T, string(fname), hline_num) )
+	      {
+	        Error(36, 12, "hyphenation file %s%s is too large (at line %d)",
+		    WARN, &fpos(fname), string(fname), HYPH_SUFFIX, hline_num);
+	        *success = FALSE;
+	        return (TRIE) NULL;
+	      }
+	    }
+	    break;
+
+
+	  default:
+
+	    assert(FALSE, "TrieRead: state");
+	    break;
+
+        } /* end switch */
+      } /* end while */
+    } /* end while */
+
+    if( state != PATTERNS_STATE )
+      Error(36, 13, "format error in hyphenation file %s",
+	FATAL, no_fpos, FileName(unpacked_fnum));
+    fclose(unpacked_fp);
+    CompressTrie(T);
+
+    /* write the compressed trie out to the packed file */
+    /* cannot use FileName(packed_fnum) because path won't be right */
+    StringCopy(buff, FileName(unpacked_fnum));
+    StringCopy(&buff[StringLength(buff) - StringLength(HYPH_SUFFIX)],
+      HYPH_PACKED_SUFFIX);
+    packed_fp = StringFOpen(buff, WRITE_BINARY);
+    if( packed_fp == NULL )
+      Error(36, 14, "cannot write to hyphenation file %s", FATAL,no_fpos,buff);
+    BePutInt(packed_fp, T->magic);
+    BePutInt(packed_fp, T->class_count);
+    for( i = 0; i < MAX_CHAR; i++ )  BePutChar(packed_fp, T->class[i]);
+    /* BePutInt(packed_fp, 0); */ /* placeholder for node_mem now omitted */
+    BePutInt(packed_fp, T->node_lim);
+    BePutInt(packed_fp, T->node_free);
+    /* BePutInt(packed_fp, 0); */  /* placeholder for string_mem now omitted */
+    BePutInt(packed_fp, T->string_lim);
+    BePutInt(packed_fp, T->string_first);
+    for( i=0; i < T->node_free; i++ )  BePutShort(packed_fp, T->node_mem[i]);
+    for( i=0; i < T->string_lim; i++)  BePutChar(packed_fp, T->string_mem[i]);
+    fclose(packed_fp);
+
+    /* free T */
+    ifdebug(DMA, DD, DebugRegisterUsage(MEM_HYPH_PATS, 1,
+      sizeof(struct trie_rec) + 120000*sizeof(short)+32767*sizeof(char)));
+    free(T);
+
+    /* now try again to open packed_fnum, the file just written */
+    packed_fp = OpenFile(packed_fnum, FALSE, FALSE);
+    if( packed_fp == NULL )
+      Error(36, 15, "cannot open hyphenation file %s",
+	FATAL, no_fpos, FileName(packed_fnum));
+  } /* end if( packed_fp == NULL ) */
+
+  /* now packed hyphenation file is open, read it in */
+  fseek(packed_fp, 0L, SEEK_END);
+  len = (unsigned) ftell(packed_fp); rewind(packed_fp);
+  ifdebug(DMA, DD, DebugRegisterUsage(MEM_HYPH_PATS, 1, len));
+  /* the 2*sizeof(void*) is for the sizes of node_mem and string_mem */
+  T = (TRIE) malloc(len + 2*sizeof(void*));
+  if( T == (TRIE) NULL )
+    Error(36, 16, "run out of memory while reading hyphenation table",
+      FATAL, no_fpos);
+  if( BeGetInt(packed_fp, &T->magic) != 0 )
+    Error(36, 17, "error on read from packed hyphenation file %s",
+      FATAL, no_fpos, FileName(packed_fnum));
+  if( T->magic != TRIE_MAGIC )
+    Error(36, 18, "bad magic number in hyphenation file %s",
+      FATAL, no_fpos, FileName(packed_fnum));
+  BeGetInt(packed_fp, &T->class_count);
+  for( i = 0; i < MAX_CHAR; i++ )  BeGetChar(packed_fp, &T->class[i]);
+  /* BeGetInt(packed_fp, &i); */  /* placeholder for node_mem now omitted */
+  BeGetInt(packed_fp, &T->node_lim);
+  BeGetInt(packed_fp, &T->node_free);
+  /* BeGetInt(packed_fp, &i); */ /* placeholder for string_mem now omitted */
+  BeGetInt(packed_fp, &T->string_lim);
+  BeGetInt(packed_fp, &T->string_first);
+  T->node_mem = (short *) ( (char *) T + sizeof(struct trie_rec) );
+  T->string_mem = (FULL_CHAR *) &(T->node_mem[T->node_lim]);
+  for( i = 0; i < T->node_free; i++ )  BeGetShort(packed_fp, &T->node_mem[i]);
+  for( i = 0; i < T->string_lim; i++ ) BeGetChar(packed_fp, &T->string_mem[i]);
+  fclose(packed_fp);
+
+  /* debug and exit */
+  debug0(DHY, DD, "TrieRead returning, T =");
+  *success = TRUE;
+  ifdebug(DHY, DD, TriePrint(T, stderr));
+  return T;
+} /* end TrieRead */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  AccumulateRating(x, y)                                                   */
+/*                                                                           */
+/*  Accumulate the hyphenation rating string x into y.                       */
+/*                                                                           */
+/*****************************************************************************/
+
+#define AccumulateRating(x, y)						\
+{ FULL_CHAR *p = x, *q = y;						\
+  while( *p )								\
+  { if( *p > *q )  *q = *p;						\
+    p++, q++;								\
+  }									\
+} /* end AccumulateRating */
+
+
+/*@::ReadHyphTable()@*********************************************************/
+/*                                                                           */
+/*  BOOLEAN ReadHyphTable(lnum)                                              */
+/*                                                                           */
+/*  Read hyphenation table for language lnum.                                */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN ReadHyphTable(LANGUAGE_NUM lnum)
+{ BOOLEAN res;
+  debug1(DHY, DD, "ReadHyphTable(%d)", lnum);
+  assert(lnum > 0, "ReadHyphTable: lnum <= 0!");
+  assert(HyphTables[lnum]==(TRIE) NULL && !TriedFile[lnum], "ReadHyphTable!");
+  HyphTables[lnum] = TrieRead(lnum, &res);
+  TriedFile[lnum] = TRUE;
+  debug2(DHY, DD, "ReadHyphTable(%d) returning %s", lnum, bool(res));
+  return res;
+} /* end ReadHyphTable */
+
+
+/*@::Hyphenate@***************************************************************/
+/*                                                                           */
+/*  OBJECT Hyphenate(x)                                                      */
+/*                                                                           */
+/*  Hyphenate ACAT object x, returning the hyphenated result.                */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT Hyphenate(OBJECT x)
+{ OBJECT link, y, z, next_link;  TRIE T;  LANGUAGE_NUM lnum;
+  FULL_CHAR str[MAX_WORD+2], rate[MAX_WORD+3], val[MAX_WORD+3],
+    *class, *key, *ss, *s, *p, *rem, *lig, *a, *b;
+  int start, stop, i, curr_node, next_node, pos;
+  BOOLEAN hyphenated, success;
+  assert( type(x) == ACAT, "Hyphenate: type(x) != ACAT!" );
+  debug1(DHY, D, "Hyphenate(%s)", EchoObject(x));
+
+  /* for each word y of x, try to hyphenate it */
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( !is_word(type(y)) || string(y)[0] == '\0' || !word_hyph(y) )
+    {
+      if( type(y) == GAP_OBJ && mode(gap(y)) == HYPH_MODE )
+	nobreak(gap(y)) = FALSE;
+      continue;
+    }
+    debug1(DHY, DD, "Hyphenate() examining %s", EchoObject(y));
+
+    /* determine T, the trie to use */
+    lnum = word_language(y);
+    if( lnum == 0 )
+      Error(36, 19, "no current language for word %s",
+	FATAL, &fpos(y), string(y));
+    T = HyphTables[lnum];
+
+    /* if no trie is present, try to get it from a file */
+    if( T == (TRIE) NULL )
+    { if( !TriedFile[lnum] )
+      { T = HyphTables[lnum] = TrieRead(lnum, &success);
+        TriedFile[lnum] = TRUE;
+      }
+      if( T == (TRIE) NULL )
+      { debug1(DHY, DD, "Hyphenate continuing (no trie for %s)", string(y));
+        continue;
+      }
+    }
+
+    /* start := index of first letter of y, stop := index following last */
+    key = string(y);  class = T->class;
+    for( start = 0;  class[key[start]] == PUNCT_CLASS;  start++ );
+    for( stop = start;  class[key[stop]] > PUNCT_CLASS;  stop++ );
+
+    /* if a - ended the run, hyphenate there only */
+    if( key[stop] == CH_HYPHEN )
+    {
+      /* actually, don't hyphenate if the hyphen is last in the word [thanks Uwe] */
+      if( key[stop+1] == '\0' )
+	continue;
+
+      next_link = NextDown(link);
+      z = MakeWord(WORD, &key[stop+1], &fpos(y));
+      word_font(z) = word_font(y);
+      word_colour(z) = word_colour(y);
+      word_language(z) = word_language(y);
+      word_hyph(z) = word_hyph(y);
+      underline(z) = underline(y);
+      debug1(DHY, DD, "Hyphenate (hyph case) making fragment %s", string(z));
+      FontWordSize(z);
+      Link(NextDown(link), z);
+      New(z, GAP_OBJ);
+      hspace(z) = vspace(z) = 0;
+      SetGap(gap(z), FALSE, FALSE, TRUE, FIXED_UNIT, HYPH_MODE, 0);
+      underline(z) = underline(y);
+      Link(NextDown(link), z);
+      Link(z, MakeWord(WORD, STR_GAP_ZERO_HYPH, &fpos(y)));
+      key[stop + 1] = '\0';
+      FontWordSize(y);
+      /* *** link = PrevDown(next_link); */
+      link = NextDown(link);
+      continue;
+    }
+
+    /* do not hyphenate if less than 5 letters, or a kill char is nearby */
+    if( stop - start < 5 )  continue;
+    if( key[stop] != '\0' && class[key[stop]] == KILL_CLASS )  continue;
+
+    /* let str[] be the converted substring, let rate[] be all CH_ZERO */
+    str[0] = PUNCT_CLASS;  rate[0] = CH_ZERO;
+    for( i = 0;  i < stop - start;  i++ )
+    { str[i+1] = class[key[start + i]];
+      rate[i+1] = CH_ZERO;
+    }
+    str[i+1] = PUNCT_CLASS;  rate[i+1] = CH_ZERO;
+    str[i+2] = '\0';  rate[i+2] = CH_ZERO;
+    rate[i+3] = '\0';
+    ifdebug(DHY, DD, ShowRate(key, start, stop, rate, stderr));
+
+    /* for each suffix of str[], accumulate patterns matching its prefixes */
+    ss = str;
+    do
+    {
+      ifdebug(DHY, DD,
+	fprintf(stderr, "trying suffix \"");
+	for( p = ss; *p != 0;  p++ )  fprintf(stderr, "%c", findrep(*p, T));
+	fprintf(stderr, "\"\n");
+      );
+	
+      /* accumulate all prefixes of ss */
+      curr_node = 0;  s = ss;
+      for(;;)
+      {
+	/* if curr_node has empty string, that is one prefix */
+	pos = T->node_mem[curr_node];
+	if( pos < 0 )
+	{ AltUncompressValue(&(T->string_mem[- pos]), val);
+	  AccumulateRating(val, rate+(ss-str));
+	  debug1(DHY, DD, " found %s", val);
+	}
+
+	/* if ss is finished, no other prefixes are possible */
+	if( *s == '\0' )  break;
+
+	/* determine next_node and break if empty */
+	next_node = T->node_mem[curr_node + *s];
+	if( next_node == 0 )  break;
+
+	/* if next_node is a string, check whether it is a prefix of ss */
+	if( next_node < 0 )
+	{ rem = &(T->string_mem[-next_node]);
+	  do
+	  { if( *rem == '\0' )
+	    { AltUncompressValue(rem+1, val);
+	      AccumulateRating(val, rate+(ss-str));
+	      debug1(DHY, DD, " found %s", val);
+	      break;
+	    }
+	  } while( *++s == *rem++ );
+	  break;
+	}
+
+	/* otherwise go on to the next trie node */
+	curr_node = NODE_MULT*next_node;  s++;
+      }
+    } while( *(++ss + 1) != PUNCT_CLASS );
+    ifdebug(DHY, DD, ShowRate(key, start, stop, rate, stderr));
+
+    /* set rate[i] to CH_ZERO whenever key[start+i-1] lies within a ligature */
+    lig = finfo[word_font(y)].lig_table;
+    for( p = key, i = 2;  *p != '\0';  p++, i++ )
+    { if( lig[*p] > 1 )
+      { a = &lig[ lig[*p] + MAX_CHARS ];
+        while( *a++ == *p )
+        { b = p+1;
+          while( *a == *b && *(a+1) != '\0' && *b != '\0' )  a++, b++;
+          if( *(a+1) == '\0' )
+          { rate[i] = CH_ZERO;
+            break;
+          }
+          else
+          { while( *++a );
+            a++;
+          }
+        }
+      }
+    }
+    ifdebug(DHY, DD, ShowRate(key, start, stop, rate, stderr));
+
+    /* now rate[] has accumulated ratings; use it to perform hyphenations */
+    hyphenated = FALSE;
+    next_link = NextDown(link);
+    for( i = stop - start - 1;  i >= 3;  i-- )
+    {
+      /* hyphenate at i if rate[i] is odd */
+      if( is_odd(rate[i]) )
+      {	z = MakeWord(WORD, &key[start+i-1], &fpos(y));
+	word_font(z) = word_font(y);
+	word_colour(z) = word_colour(y);
+	word_language(z) = word_language(y);
+	word_hyph(z) = word_hyph(y);
+	underline(z) = underline(y);
+        debug1(DHY, D, "Hyphenate making fragment %s", string(z));
+	FontWordSize(z);
+	Link(NextDown(link), z);
+	New(z, GAP_OBJ);
+	hspace(z) = vspace(z) = 0;
+	SetGap(gap(z), FALSE, FALSE, TRUE, FIXED_UNIT, HYPH_MODE, 0);
+	underline(z) = underline(y);
+	Link(NextDown(link), z);
+	Link(z, MakeWord(WORD, STR_GAP_ZERO_HYPH, &fpos(y)));
+	key[start + i - 1] = '\0';
+	hyphenated = TRUE;
+      }
+    }
+    if( hyphenated )
+    { FontWordSize(y);
+      link = PrevDown(next_link);
+    }
+
+  } /* end for each word */
+
+  debug3(DHY, D, "Hyphenate returning %s,%s %s",
+    EchoLength(back(x, COLM)), EchoLength(fwd(x, COLM)), EchoObject(x));
+  return x;
+} /* end Hyphenate */
diff --git a/z37.c b/z37.c
new file mode 100644
index 0000000..f3b89e8
--- /dev/null
+++ b/z37.c
@@ -0,0 +1,1480 @@
+/*@z37.c:Font Service:Declarations@*******************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z37.c                                                      */
+/*  MODULE:       Font Service                                               */
+/*  EXTERNS:      FontInit(), FontDefine(), FontChange(), FontWordSize(),    */
+/*                FontSize(), FontHalfXHeight(), FontEncoding(),             */
+/*                FontMapping(), FontFamilyAndFace(), FontNeeded()           */
+/*                                                                           */
+/*  This module implements fonts, using encoding vectors and Adobe font      */
+/*  metrics files (.AFM files, version 2).                                   */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define DEFAULT_XHEIGHT 500	/* the default XHeight if font has none      */
+#define	NO_FONT		  0	/* the not-a-font font number                */
+#define SZ_DFT	       1000	/* default lout size is 50p                  */
+#define	INIT_FINFO_SIZE	100	/* initial number of sized fonts set aside   */
+
+/*****************************************************************************/
+/*                                                                           */
+/* these definitions have been placed in "externs" because z24.c needs them  */
+/*                                                                           */
+/*  struct metrics {							     */
+/*    SHORT_LENGTH up;							     */
+/*    SHORT_LENGTH down;						     */
+/*    SHORT_LENGTH left;						     */
+/*    SHORT_LENGTH right;						     */
+/*    SHORT_LENGTH last_adjust;						     */
+/*  };							     		     */
+/*  									     */
+/*  typedef struct font_rec {						     */
+/*    struct metrics	*size_table;		   metrics of sized fonts    */
+/*    FULL_CHAR		*lig_table;		   ligatures                 */
+/*    OBJECT		font_table;		   record of sized fonts     */
+/*    OBJECT            original_font;             font rec before resizing  */
+/*    SHORT_LENGTH	underline_pos;             position of underline     */
+/*    SHORT_LENGTH	underline_thick;           thickness of underline    */
+/*    unsigned short	*kern_table;		   first kerning chars       */
+/*    FULL_CHAR		*kern_chars;		   second kerning chars      */
+/*    unsigned char	*kern_value;		   points into kern_lengths  */
+/*    SHORT_LENGTH	*kern_sizes;		   sizes of kernings         */
+/*  } FONT_INFO;							     */
+/*                                                                           */
+/*****************************************************************************/
+
+	int		font_curr_page;		/* current page number       */
+	FONT_INFO	*finfo;			/* all the font table info   */
+static	int		finfo_size;		/* current finfo array size  */
+static	OBJECT		font_root;		/* root of tree of fonts     */
+static	OBJECT		font_used;		/* fonts used on this page   */
+static	FONT_NUM	font_count;		/* number of sized fonts     */
+static	int		font_seqnum;		/* unique number for a font  */
+
+
+/*@::FontInit(), FontDebug()@*************************************************/
+/*                                                                           */
+/*  FontInit()                                                               */
+/*                                                                           */
+/*  Initialise this module.                                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void FontInit(void)
+{ debug0(DFT, D, "FontInit()");
+  font_curr_page = 1;
+  font_count	= 0;
+  New(font_root, ACAT);
+  New(font_used, ACAT);
+  font_seqnum	= 0;
+  finfo         = (FONT_INFO *) malloc(INIT_FINFO_SIZE * sizeof(FONT_INFO));
+  finfo_size    = INIT_FINFO_SIZE;
+  ifdebug(DMA, D,
+    DebugRegisterUsage(MEM_FONTS, 1, INIT_FINFO_SIZE * sizeof(FONT_INFO)));
+  debug0(DFT, D, "FontInit returning.");
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FontDebug()                        	                                     */
+/*                                                                           */
+/*  Print out font tree (not currectly used).                                */
+/*                                                                           */
+/*****************************************************************************/
+
+#if DEBUG_ON
+static void FontDebug(void)
+{ OBJECT family, face, filename, link, flink;  int i;
+  assert(font_root!=nilobj && type(font_root)==ACAT, "FontDebug: font_root!");
+  for( link = Down(font_root);  link != font_root;  link = NextDown(link) )
+  { Child(family, link);
+    assert( is_word(type(family)), "FontDebug: family!" );
+    fprintf(stderr, "family %s:\n", string(family));
+    for( flink = Down(family);  flink != family;  flink = NextDown(flink) )
+    { Child(face, flink);
+      assert( is_word(type(face)), "FontDebug: face!" );
+      fprintf(stderr, "   face %s in file ", string(face));
+      assert( Down(face) != face, "FontDebug: Down(face)!");
+      Child(filename, Down(face));
+      assert( is_word(type(filename)), "FontDebug: filename!" );
+      fprintf(stderr, "%s\n", string(filename));
+    }
+  }
+  for( i = 1;  i <= font_count;  i++ )
+    fprintf(stderr, "  finfo[%d].font_table = %s\n", i,
+      EchoObject(finfo[i].font_table));
+} /* end FontDebug */
+#endif
+
+
+/*@::FontDefine()@************************************************************/
+/*                                                                           */
+/*  FontDefine(family, face, inside)                                         */
+/*                                                                           */
+/*  Insert a font defined by fontdef <family> <face> { <inside> }, where     */
+/*  <inside> ::= fontname AFMfilename LCMfilename recode                     */
+/*                                                                           */
+/*****************************************************************************/
+static void ReadFont(OBJECT face, OBJECT err);
+
+void FontDefine(OBJECT family, OBJECT face, OBJECT inside)
+{ OBJECT font_name, AFMfilename, LCMfilename, recode;
+  OBJECT short_name, link, y, val[5]; int i;
+  debug3(DFT, D, "FontDefine( %s, %s, %s )", string(family),
+    string(face), EchoObject(inside));
+
+  /* extract font_name, AFMfilename, LCMfilename, and recode */
+  if( type(inside) != ACAT )
+  { Error(37, 1, "font definition does not contain a sequence of words",
+      WARN, &fpos(inside));
+    DisposeObject(inside);  return;
+  }
+  for( i = 0;  Down(inside) != inside && i != 5;  i++ )
+  { Child(val[i], Down(inside));
+    DeleteLink(Up(val[i]));
+    if( type(val[i]) == GAP_OBJ )  DisposeObject(val[i--]);
+    else if( !is_word(type(val[i])) )
+    { Error(37, 2, "font definition contains a non-word", WARN, &fpos(val[i]));
+      DisposeObject(inside);  return;
+    }
+  }
+  if( Down(inside) != inside || i != 4 )
+  { Error(37, 3, "font definition does not contain exactly four words",
+      WARN, &fpos(inside));
+    DisposeObject(inside);  return;
+  }
+  font_name = val[0];    AFMfilename = val[1];
+  LCMfilename = val[2];  recode = val[3];
+
+  /* insert family into font tree if not already present */
+  for( link = Down(font_root);  link != font_root;  link = NextDown(link) )
+  { Child(y, link);
+    if( StringEqual(string(y), string(family)) )
+    { Dispose(family);  family = y; break; }
+  }
+  if( link == font_root )  Link(font_root, family);
+
+  /* insert face into family, or error if already present and different */
+  for( link = Down(family);  link != family;  link = NextDown(link) )
+  { Child(y, link);
+    if( StringEqual(string(y), string(face)) )
+    { OBJECT other_name, other_AFMname;
+      Child(other_AFMname, Down(y));
+      Child(other_name, NextDown(Down(other_AFMname)));
+      if( StringEqual(string(other_name), string(font_name)) &&
+          StringEqual(string(other_AFMname), string(AFMfilename)) )
+      { debug0(DFT, D, "FontDefine returning: font redefined");
+        Dispose(face);
+        return;
+      }
+      Error(37, 4, "font %s %s already defined at%s", WARN, &fpos(face),
+	string(family), string(face), EchoFilePos(&fpos(y)));
+      debug0(DFT, D, "FontDefine returning: font already defined");
+      Dispose(face);
+      return;
+    }
+  }
+  Link(family, face);
+
+  /* add AFMfilename as first size of font, and PostScript name as its child */
+  Link(face, AFMfilename);
+  short_name = MakeWordTwo(WORD, AsciiToFull("fnt"), StringInt(++font_seqnum),
+    no_fpos);
+  Link(AFMfilename, short_name);  Link(AFMfilename, font_name);
+
+  /* load character mapping file */
+  if( StringEqual(string(recode), STR_FONT_RECODE) )
+  { font_recoded(face) = TRUE;
+    font_mapping(AFMfilename) = MapLoad(LCMfilename, TRUE);
+  }
+  else if( StringEqual(string(recode), STR_FONT_NORECODE) )
+  { font_recoded(face) = FALSE;
+    font_mapping(AFMfilename) = MapLoad(LCMfilename, FALSE);
+  }
+  else Error(37, 5, "expecting either Recode or NoRecode here",
+	 FATAL, &fpos(recode));
+
+  /* say that this font is currently unused on any page */
+  font_page(face) = 0;
+  font_firstpage(face) = FALSE;
+
+  /* if initializing run, read the font just to make sure */
+  if( InitializeAll )
+  { ReadFont(face, face);
+  }
+
+  debug0(DFT, D, "FontDefine returning.");
+} /* end FontDefine */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DebugKernTable(fnum)                                                     */
+/*                                                                           */
+/*  Print debug output of kern table for font fnum.                          */
+/*                                                                           */
+/*****************************************************************************/
+#if DEBUG_ON
+
+static void DebugKernTable(FONT_NUM fnum)
+{ int i, j;
+  unsigned short *kt = finfo[fnum].kern_table;
+  FULL_CHAR      *kc = finfo[fnum].kern_chars;
+  unsigned char  *kv = finfo[fnum].kern_value;
+  SHORT_LENGTH   *ks = finfo[fnum].kern_sizes;
+  debug1(DFT, DD, "DebugKernTable(%d)", fnum);
+  for( i = 0;  i < MAX_CHARS;  i++ )
+  { if( kt[i] != 0 )
+    { debug1(DFT, DD, "kt[%d]:", i);
+      for( j = kt[i];  kc[j] != '\0';  j++ )
+      { debug3(DFT, DD, "KPX %c %c %d", i, kc[j], ks[kv[j]]);
+      }
+    }
+  }
+  debug1(DFT, DD, "DebugKernTable(%d) returning", fnum);
+} /* DebugKernTable */
+#endif
+
+
+/*@::ReadFont()@**************************************************************/
+/*                                                                           */
+/*  static ReadFont(face, err)                                               */
+/*                                                                           */
+/*  Read in a font file.  Object err is used only for error reporting.       */
+/*                                                                           */
+/*****************************************************************************/
+
+static void ReadFont(OBJECT face, OBJECT err)
+{ OBJECT filename, fontname;
+  FULL_CHAR buff[MAX_BUFF], command[MAX_BUFF], ch;
+  int wx, llx, lly, urx, ury, xheight2, i, lnum, ligtop;
+  float fl_wx, fl_llx, fl_lly, fl_urx, fl_ury, fl_xheight2, fl_under_pos,
+	fl_under_thick;
+  int under_pos, under_thick;
+  BOOLEAN upfound, utfound, xhfound, wxfound, bfound;
+  BOOLEAN fixed_pitch = FALSE;
+  FILE_NUM fnum;  FILE *fp;
+  struct metrics *fnt;
+  FULL_CHAR *lig, ligchar;
+  unsigned short *kt;  FULL_CHAR *kc;  unsigned char *kv;  SHORT_LENGTH *ks;
+  OBJECT x;
+  assert( is_word(type(face)), "ReadFont: !is_word(type(face))!" );
+  debug1(DFT, DD, "ReadFont( %s, err )", string(face));
+
+  /* get a new font number for this font, possibly requiring realloc */
+  if( ++font_count >= finfo_size )
+  { if( font_count > MAX_FONT )
+      Error(37, 6, "too many different fonts and sizes (maximum is %d)",
+	FATAL, &fpos(err),MAX_FONT);
+    ifdebug(DMA, D,
+      DebugRegisterUsage(MEM_FONTS, -1, -finfo_size * sizeof(FONT_INFO)));
+    finfo_size *= 2;
+    ifdebug(DMA, D,
+      DebugRegisterUsage(MEM_FONTS, 1, finfo_size * sizeof(FONT_INFO)));
+    finfo = (FONT_INFO *) realloc(finfo, finfo_size * sizeof(FONT_INFO));
+    if( finfo == (FONT_INFO *) NULL )
+      Error(37, 7, "run out of memory when increasing font table size",
+	FATAL, &fpos(err));
+  }
+
+  /* open the Adobe font metrics (AFM) file of the font */
+  assert( Down(face) != face, "ReadFont: filename missing!" );
+  Child(filename, Down(face));
+  assert( Down(filename) != filename, "ReadFont: filename child missing!" );
+  debug0(DFS, D, "  calling DefineFile from ReadFont");
+  fnum = DefineFile(string(filename), STR_EMPTY, &fpos(filename),
+    FONT_FILE, FONT_PATH);
+  fp = OpenFile(fnum, FALSE, FALSE);
+  if( fp == NULL )
+    Error(37, 8, "cannot open font file %s", FATAL, &fpos(filename),
+      FileName(fnum));
+
+  /* check that the AFM file begins, as it should, with "StartFontMetrics" */
+  if( StringFGets(buff, MAX_BUFF, fp) == NULL ||
+	sscanf( (char *) buff, "%s", command) != 1 ||
+	!StringEqual(command, "StartFontMetrics")  )
+  { debug1(DFT, DD, "first line of AFM file:%s", buff);
+    debug1(DFT, DD, "command:%s", command);
+    Error(37, 9, "font file %s does not begin with StartFontMetrics",
+      FATAL, &fpos(filename), FileName(fnum));
+  }
+
+  /* initialise font metrics table for the new font */
+  ifdebug(DMA, D,
+      DebugRegisterUsage(MEM_FONTS, 1, MAX_CHARS * sizeof(struct metrics)));
+  fnt = (struct metrics *) malloc(MAX_CHARS * sizeof(struct metrics));
+  if( fnt == (struct metrics *) NULL )
+    Error(37, 10, "run out of memory while reading font file %s",
+      FATAL, &fpos(err), FileName(fnum));
+  ifdebug(DMA, D,
+      DebugRegisterUsage(MEM_FONTS, 0, 2*MAX_CHARS*sizeof(FULL_CHAR)));
+  lig = (FULL_CHAR *) malloc(2*MAX_CHARS*sizeof(FULL_CHAR));
+
+  /* initialise ligature table for the new font */
+  if( lig == (FULL_CHAR *) NULL )
+    Error(37, 11, "run out of memory while reading font file %s",
+      FATAL, &fpos(err), FileName(fnum));
+  for( i = 0;  i < MAX_CHARS;  i++ )  lig[i] = 1;	/* i.e. char unknown */
+  ligtop = MAX_CHARS+2;		/* must avoid ligtop - MAX_CHARS == 0 or 1 */
+
+  /* initialise kerning table for the new font */
+  ifdebug(DMA, D,
+      DebugRegisterUsage(MEM_FONTS, 0, MAX_CHARS * sizeof(unsigned short)));
+  kt = (unsigned short *) malloc(MAX_CHARS * sizeof(unsigned short));
+  if( kt == (unsigned short *) NULL )
+    Error(37, 12, "run out of memory while reading font file %s",
+      FATAL, &fpos(err), FileName(fnum));
+  for( i = 0;  i < MAX_CHARS;  i++ )  kt[i] = 0;  /* i.e. no kerns */
+  ks = (SHORT_LENGTH *) NULL;			  /* i.e. no kern sizes */
+
+  /* read font metrics file */
+  xhfound = upfound = utfound = FALSE;
+  fontname = nilobj;  lnum = 1;
+  while ( ( StringFGets(buff, MAX_BUFF, fp) ) != NULL )
+  {
+    lnum++;
+    sscanf( (char *) buff, "%s", command);
+    switch( command[0] )
+    {
+
+      case 'U':
+
+	if( StringEqual(command, AsciiToFull("UnderlinePosition")) ) 
+	{ if( upfound )
+	  { Error(37, 13, "UnderlinePosition found twice in font file (line %d)",
+	      FATAL, &fpos(filename), lnum);
+	  }
+	  sscanf( (char *) buff, "UnderlinePosition %f", &fl_under_pos);
+	  under_pos = fl_under_pos;
+	  upfound = TRUE;
+	}
+	else if( StringEqual(command, AsciiToFull("UnderlineThickness")) ) 
+	{ if( utfound )
+	  { Error(37, 14, "UnderlineThickness found twice in font file (line %d)",
+	      FATAL, &fpos(filename), lnum);
+	  }
+	  sscanf( (char *) buff, "UnderlineThickness %f", &fl_under_thick);
+	  under_thick = fl_under_thick;
+	  utfound = TRUE;
+	}
+	break;
+
+
+      case 'X':
+
+	if( StringEqual(command, AsciiToFull("XHeight")) ) 
+	{ if( xhfound )
+	  { Error(37, 15, "XHeight found twice in font file (line %d)",
+	      FATAL, &fpos(filename), lnum);
+	  }
+	  sscanf( (char *) buff, "XHeight %f", &fl_xheight2);
+	  xheight2 = fl_xheight2 / 2;
+	  xhfound = TRUE;
+	}
+	break;
+
+
+      case 'F':
+
+	if( StringEqual(command, AsciiToFull("FontName")) )
+	{ if( fontname != nilobj )
+	  { Error(37, 16, "FontName found twice in font file %s (line %d)",
+	      FATAL, &fpos(filename), FileName(fnum), lnum);
+	  }
+	  sscanf( (char *) buff, "FontName %s", command);
+	  if( StringEqual(command, STR_EMPTY) )
+	  { Error(37, 17, "FontName empty in font file %s (line %d)",
+	      FATAL, &fpos(filename), FileName(fnum), lnum);
+	  }
+	  Child(x, LastDown(filename));
+	  if( !StringEqual(command, string(x)) )
+	  Error(37, 18, "FontName in font file (%s) and fontdef (%s) disagree",
+	    WARN, &fpos(filename), command, string(x));
+	  fontname = MakeWord(WORD, command, &fpos(filename));
+	}
+	break;
+
+
+      case 'I':
+
+	if( StringEqual(command, AsciiToFull("IsFixedPitch")) )
+	{ 
+	  sscanf( (char *) buff, "IsFixedPitch %s", command);
+	  if( StringEqual(command, AsciiToFull("true")) )
+	  { fixed_pitch = TRUE;
+	  }
+	}
+	break;
+
+
+      case 'S':
+
+	if( StringEqual(command, AsciiToFull("StartCharMetrics")) )
+	{
+	  if( fontname == nilobj )
+	    Error(37, 19, "FontName missing in file %s",
+	      FATAL, &fpos(filename), FileName(fnum));
+	  if( !xhfound )  xheight2 = DEFAULT_XHEIGHT / 2;
+	  while( StringFGets(buff, MAX_BUFF, fp) != NULL &&
+	         !StringBeginsWith(buff, AsciiToFull("EndCharMetrics")) )
+	  {
+	    /* read one line containing metric info for one character */
+	    debug1(DFT, DDD, "ReadFont reading %s", buff);
+	    lnum++;  ch = '\0';  
+	    wxfound = bfound = FALSE;
+	    i = 0;  while( buff[i] == ' ' )  i++;
+	    while( buff[i] != '\n' )
+	    {
+	      debug2(DFT, DDD, "  ch = %d, &buff[i] = %s", ch, &buff[i]);
+	      sscanf( (char *) &buff[i], "%s", command);
+	      if( StringEqual(command, "N") )
+	      { sscanf( (char *) &buff[i], "N %s", command);
+		ch = MapCharEncoding(command, font_mapping(filename));
+	      }
+	      else if( StringEqual(command, "WX") )
+	      {	sscanf( (char *) &buff[i], "WX %f", &fl_wx);
+		wx = fl_wx;
+		wxfound = TRUE;
+	      }
+	      else if( StringEqual(command, "B") )
+	      { sscanf( (char *) &buff[i], "B %f %f %f %f",
+		  &fl_llx, &fl_lly, &fl_urx, &fl_ury);
+		llx = fl_llx;
+		lly = fl_lly;
+		urx = fl_urx;
+		ury = fl_ury;
+		bfound = TRUE;
+	      }
+	      else if( StringEqual(command, "L") &&
+		BackEnd != PLAINTEXT && ch != '\0' )
+	      { if( lig[ch] == 1 )  lig[ch] = ligtop - MAX_CHARS;
+		lig[ligtop++] = ch;
+		i++;  /* skip L */
+		while( buff[i] == ' ' )  i++;
+		while( buff[i] != ';' && buff[i] != '\n' )
+		{ sscanf( (char *) &buff[i], "%s", command);
+		  ligchar = MapCharEncoding(command, font_mapping(filename));
+		  if( ligchar != '\0' )  lig[ligtop++] = ligchar;
+		  else
+		  { Error(37, 20, "ignoring unencoded ligature character %s in font file %s (line %d)",
+		      WARN, &fpos(filename), command, FileName(fnum), lnum);
+		    lig[ch] = 1;
+		  }
+		  if( ligtop > 2*MAX_CHARS - 5 )
+		    Error(37, 21, "too many ligature characters in font file %s (line %d)",
+		    FATAL, &fpos(filename), FileName(fnum), lnum);
+		  while( buff[i] != ' ' && buff[i] != ';' )  i++;
+		  while( buff[i] == ' ' ) i++;
+		}
+		lig[ligtop++] = '\0';
+	      }
+	      while( buff[i] != ';' && buff[i] != '\n' )  i++;
+	      if( buff[i] == ';' )
+	      { i++;  while( buff[i] == ' ' ) i++;
+	      }
+	    }
+	    if( ch > '\0' )
+	    { 
+	      if( !wxfound )
+	      { Error(37, 22, "WX missing in font file %s (line %d)",
+		  FATAL, &fpos(filename), FileName(fnum), lnum);
+	      }
+	      if( !bfound )
+	      { Error(37, 23, "B missing in font file %s (line %d)",
+		  FATAL, &fpos(filename), FileName(fnum), lnum);
+	      }
+	      if( lig[ch] == 1 )  lig[ch] = 0;	/* set to known if unknown */
+	      else if( lig[ch] > 1 )		/* add '\0' to end of ligs */
+	        lig[ligtop++] = '\0';
+	      switch( BackEnd )
+	      {
+		case POSTSCRIPT:
+		case PDF:	 fnt[ch].left  = llx;
+				 fnt[ch].down  = lly - xheight2;
+				 fnt[ch].right = wx;
+				 fnt[ch].up    = ury - xheight2;
+				 fnt[ch].last_adjust =
+				   (urx == 0 || wx == 0 || fixed_pitch) ? 0 : urx - wx;
+				 break;
+
+		case PLAINTEXT:  fnt[ch].left  = 0;
+				 fnt[ch].down  = - PlainCharHeight / 2;
+				 fnt[ch].right = PlainCharWidth;
+				 fnt[ch].up    = PlainCharHeight / 2;
+				 fnt[ch].last_adjust = 0;
+				 break;
+	      }
+	      debug6(DFT, DDD, "  fnt[%c] = (%d,%d,%d,%d,%d)",ch, fnt[ch].left,
+	        fnt[ch].down, fnt[ch].right, fnt[ch].up, fnt[ch].last_adjust);
+	    }
+	  }
+	}
+	else if( BackEnd != PLAINTEXT && Kern &&
+	  StringEqual(command, AsciiToFull("StartKernPairs")) )
+	{ FULL_CHAR ch1, ch2, last_ch1;
+	  FULL_CHAR name1[30], name2[30];
+	  int kc_top, ks_top, pos, num_pairs, ksize;  float fl_ksize;
+
+	  if( sscanf( (char *) buff, "StartKernPairs %d", &num_pairs) != 1 )
+	    Error(37, 24, "syntax error on StartKernPairs line in font file %s (line %d)",
+	      FATAL, &fpos(filename), FileName(fnum), lnum);
+	  kc_top = 1;  ks_top = 1;
+	  ifdebug(DMA, D,
+	    DebugRegisterUsage(MEM_FONTS, 0, 2*num_pairs * sizeof(FULL_CHAR)));
+	  kc = (FULL_CHAR *) malloc(2 * num_pairs * sizeof(FULL_CHAR));
+	  ifdebug(DMA, D, DebugRegisterUsage(MEM_FONTS, 0,
+	    2 * num_pairs * sizeof(unsigned char)));
+	  kv = (unsigned char *) malloc(2 * num_pairs * sizeof(unsigned char));
+	  ifdebug(DMA, D, DebugRegisterUsage(MEM_FONTS, 0,
+	    num_pairs * sizeof(SHORT_LENGTH)));
+	  ks = (SHORT_LENGTH *) malloc(num_pairs * sizeof(SHORT_LENGTH));
+	  last_ch1 = '\0';
+	  while( StringFGets(buff, MAX_BUFF, fp) == (char *) buff &&
+	    !StringBeginsWith(buff, AsciiToFull("EndKernPairs")) )
+	  {
+	    debug1(DFT, DD, "ReadFont reading %s", buff);
+	    lnum++;
+	    if( StringBeginsWith(buff, AsciiToFull("KPX")) )
+	    {
+	      /* get the two character names and kern size from buff */
+	      if( sscanf((char *)buff, "KPX %s %s %f",name1,name2,&fl_ksize)!=3 )
+		Error(37, 25, "syntax error in font file %s (line %d): %s",
+		  FATAL, &fpos(filename), FileName(fnum), lnum, buff);
+
+	      /* ignore size 0 kern pairs (they are frequent, why?) */
+	      ksize = fl_ksize;
+	      if( ksize == 0 )  continue;
+
+	      /* check that both characters are encoded */
+	      ch1 = MapCharEncoding(name1, font_mapping(filename));
+	      if( ch1 == '\0' )
+	      {
+		/* ***
+		Error(37, 26, "unencoded kern character %s in font file %s (line %d)",
+		  WARN, &fpos(filename), name1, FileName(fnum), lnum);
+		*** */
+		continue;
+	      }
+	      ch2 = MapCharEncoding(name2, font_mapping(filename));
+	      if( ch2 == '\0' )
+	      {
+		/* ***
+		Error(37, 27, "unencoded kern character %s in font file %s (line %d)",
+		  WARN, &fpos(filename), name2, FileName(fnum), lnum);
+		*** */
+		continue;
+	      }
+
+	      /* check that ch1 is contiguous with previous occurrences */
+	      if( ch1 != last_ch1 && kt[ch1] != 0 )
+	      { Error(37, 28, "non-contiguous kerning pair %s %s in font file %s (line %d)",
+		  WARN, &fpos(filename), name1, name2, FileName(fnum), lnum);
+		continue;
+	      }
+	      last_ch1 = ch1;
+
+	      /* if ch1 never seen before, make new entry in kt[] and kc[] */
+	      if( kt[ch1] == 0 )
+	      { debug2(DFT, DD, "  kt[%d] = %d", ch1, kc_top);
+		kt[ch1] = kc_top;
+		kc[kc_top] = (FULL_CHAR) '\0';
+		kv[kc_top] = 0;
+		kc_top++;
+	      }
+
+	      /* find kerning size in ks[] or else add it to the end */
+	      for( pos = 1;  pos < ks_top;  pos++ )
+	      { if( ks[pos] == ksize )  break;
+	      }
+	      if( pos == ks_top )
+	      { if( ks_top == num_pairs )
+		  Error(37, 29, "too many kerning pairs in font file %s (line %d)",
+		    FATAL, &fpos(filename), FileName(fnum), lnum);
+		debug2(DFT, DD, "  ks[%d] = %d", pos, ksize);
+		ks[pos] = ksize;
+		ks_top++;
+	      }
+
+	      /* insert ch2 into the kc entries (sorted decreasing) for ch1 */
+	      for( i = kc_top-1; i >= kt[ch1] && kc[i] < ch2;  i-- )
+	      { kc[i+1] = kc[i];
+		kv[i+1] = kv[i];
+	      }
+	      if( i >= kt[ch1] && kc[i] == ch2 )
+		Error(37, 30, "kerning pair %s %s appears twice in font file %s (line %d)",
+		  FATAL, &fpos(filename), name1, name2, FileName(fnum), lnum);
+	      kc[i+1] = ch2;
+	      kv[i+1] = pos;
+	      kc_top++;
+	    }
+	  }
+	  ks[0] = ks_top;
+	}
+	break;
+
+
+      case 'E':
+
+	if( StringEqual(command, AsciiToFull("EndFontMetrics")) )
+	{
+	  /* make a new font record and insert into font tree */
+	  font_num(face) = font_num(fontname) = font_count;
+	  font_size(fontname) =
+	    (BackEnd != PLAINTEXT) ? SZ_DFT : PlainCharHeight;
+	  font_xheight2(fontname) =
+	    (BackEnd != PLAINTEXT) ? xheight2 : PlainCharHeight / 4;
+	  font_mapping(fontname) = font_mapping(filename);
+	  ch = MapCharEncoding(STR_PS_SPACENAME, font_mapping(fontname));
+	  font_spacewidth(fontname) = ch == '\0' ? 0 : fnt[ch].right;
+	  finfo[font_count].font_table = fontname;
+	  finfo[font_count].original_font = face;
+	  finfo[font_count].underline_pos = xheight2 - under_pos;
+	  finfo[font_count].underline_thick = under_thick;
+	  finfo[font_count].size_table = fnt;
+	  finfo[font_count].lig_table = lig;
+	  finfo[font_count].kern_table = kt;
+	  finfo[font_count].kern_chars = kc;
+	  finfo[font_count].kern_value = kv;
+	  finfo[font_count].kern_sizes = ks;
+	  Link(face, fontname);
+	  ifdebug(DFT, DD, DebugKernTable(font_count));
+	  /* *** either no errors or too many, so killing this now
+	  if( InitializeAll )
+	  { OBJECT family;  FULL_CHAR *str;
+	    Parent(family, Up(face));
+	    for( i = 0;  i < MAX_CHARS;  i++ )
+	    {
+	      if( lig[i] == 1 )
+	      { str = string(MapTable[font_mapping(fontname)]->vector[i]);
+		if( !StringEqual(str, AsciiToFull(".notdef")) &&
+		     MapCharEncoding(str, font_mapping(fontname)) == i )
+		  Error(37, 31, "font %s %s has no glyph for character %s",
+		    WARN, &fpos(filename), string(family), string(face), str);
+	      }
+	    }
+	  }
+	  *** */
+
+	  /* close file, debug and exit */
+	  fclose(fp);
+	  debug4(DFT, D, "ReadFont returning: %d, name %s, fs %d, xh2 %d",
+		  font_count, string(fontname), font_size(fontname), xheight2);
+	  return;
+	}
+	break;
+
+
+      default:
+
+	break;
+
+    }
+  }
+  Error(37, 32, "EndFontMetrics missing from font file %s",
+    FATAL, &fpos(filename), FileName(fnum));
+} /* end ReadFont */
+
+
+/*@::FontChange()@************************************************************/
+/*                                                                           */
+/*  FontChange(style, x)                                                     */
+/*                                                                           */
+/*  Returns an internal font number which is the current font changed        */
+/*  according to word object x.  e.g. if current font is Roman 12p and x is  */
+/*  "-3p", then FontChange returns the internal font number of Roman 9p.     */
+/*                                                                           */
+/*  FontChange permits empty and null objects within x; these have no        */
+/*  effect.                                                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void FontChange(STYLE *style, OBJECT x)
+{ /* register */ int i;
+  OBJECT par[3], family, face, fsize, y, link, new, old, tmpf;
+  GAP gp;  SHORT_LENGTH flen;  int num, c;  unsigned inc;
+  struct metrics *newfnt, *oldfnt;  FULL_CHAR *lig;
+  SHORT_LENGTH *oldks, *newks;  int klen;
+  debug2(DFT, D, "FontChange( %s, %s )", EchoStyle(style), EchoObject(x));
+  assert( font(*style) <= font_count, "FontChange: font_count!");
+  ifdebug(DFT, DD, FontDebug());
+
+  /* set par[0..num-1] to the 1, 2 or 3 parameters of the font operator */
+  num = 0;
+  if( type(x) == NULL_CLOS )
+  { /* acceptable, but do nothing */
+  }
+  else if( is_word(type(x)) )
+  {
+    if( StringEqual(string(x), STR_SMALL_CAPS_ON) )
+      small_caps(*style) = SMALL_CAPS_ON;
+    else if( StringEqual(string(x), STR_SMALL_CAPS_OFF) )
+      small_caps(*style) = SMALL_CAPS_OFF;
+    else if( !StringEqual(string(x), STR_EMPTY) )
+      par[num++] = x; 
+  }
+  else if( type(x) == ACAT )
+  { for( link = Down(x);  link != x;  link = NextDown(link) )
+    { Child(y, link);
+      debug1(DFT, DDD, "  pars examining y = %s", EchoObject(y));
+      if( type(y) == GAP_OBJ || type(y)  == NULL_CLOS )  continue;
+      if( is_word(type(y)) ) 
+      {
+        if( StringEqual(string(y), STR_SMALL_CAPS_ON) )
+          small_caps(*style) = SMALL_CAPS_ON;
+        else if( StringEqual(string(y), STR_SMALL_CAPS_OFF) )
+          small_caps(*style) = SMALL_CAPS_OFF;
+        else if( !StringEqual(string(y), STR_EMPTY) )
+	{
+	  if( num >= 3 )
+	  { Error(37, 33, "error in left parameter of %s",
+	      WARN, &fpos(x), KW_FONT);
+	    debug0(DFT, D, "FontChange returning: ACAT children");
+	    return;
+	  }
+          par[num++] = y; 
+	}
+      }
+      else
+      {	Error(37, 34, "error in left parameter of %s",
+	  WARN, &fpos(x), KW_FONT);
+	debug0(DFT, D, "FontChange returning: ACAT children");
+	return;
+      }
+    }
+  }
+  else
+  { Error(37, 35, "error in left parameter of %s", WARN, &fpos(x), KW_FONT);
+    debug0(DFT, D, "FontChange returning: wrong type");
+    return;
+  }
+  debug1(DFT, DDD, " found pars, num = %d", num);
+  if( num == 0 )
+  { debug1(DFT, D, "FontChange returning %s", EchoStyle(style));
+    return;
+  }
+
+  /* extract fsize parameter, if any */
+  assert( num >= 1 && num <= 3, "FontChange: num!" );
+  fsize = nilobj;
+  for( i = 0;  i < num;  i++ )
+  {
+    c = string(par[i])[0];
+    if( c == CH_INCGAP || c == CH_DECGAP || decimaldigit(c) )
+    {
+      /* extract fsize, shuffle the rest down */
+      fsize = par[i];
+      for( i = i + 1;  i < num;  i++ )
+	par[i-1] = par[i];
+      num--;
+    }
+  }
+
+  /* *** old now
+  c = string(par[num-1])[0];
+  if( c == CH_INCGAP || c == CH_DECGAP || decimaldigit(c) )
+  { fsize = par[num-1];  num--;
+  }
+  else fsize = nilobj;
+  *** */
+
+  /* check for initial font case: must have family, face, and size */
+  if( font(*style) == NO_FONT && (fsize == nilobj || num < 2) )
+    Error(37, 36, "initial font must have family, face and size",
+      FATAL, &fpos(x));
+
+  /* get font family */
+  if( num == 2 )
+  {
+    /* par[0] contains a new family name */
+    for( link = Down(font_root);  link != font_root;  link = NextDown(link) )
+    { Child(family, link);
+      if( StringEqual(string(family), string(par[0])) )  break;
+    }
+    if( link == font_root )
+    { Error(37, 37, "font family %s not defined",
+	WARN, &fpos(par[0]), string(par[0]));
+      return;
+    }
+  }
+  else
+  { /* preserve current family */
+    assert( Up(finfo[font(*style)].font_table)!=finfo[font(*style)].font_table,
+      "FontChange: Up(finfo[font(*style)].font_table) !" );
+    Parent(face, Up(finfo[font(*style)].font_table));
+    assert( is_word(type(face)), "FontChange: type(face)!" );
+    assert( Up(face) != face, "FontChange: Up(face)!" );
+    Parent(family, Up(face));
+    assert( is_word(type(family)), "FontChange: type(family)!" );
+  }
+
+  /* get font face */
+  if( num != 0 )
+  {
+    /* par[num-1] contains a new face name */
+    for( link = Down(family);  link != family;  link = NextDown(link) )
+    { Child(face, link);
+      if( StringEqual(string(face), string(par[num-1])) )  break;
+    }
+    if( link == family )
+    {
+      /* missing face name; first check whether a family name was intended */
+      for( link = Down(font_root);  link != font_root;  link = NextDown(link) )
+      {	Child(tmpf, link);
+	if( StringEqual(string(tmpf), string(par[num-1])) )  break;
+      }
+      if( font_root == Down(font_root) )
+      {	Error(37, 38, "there are no fonts", FATAL, &fpos(par[num-1]));
+      }
+      else if( link != font_root )
+      {	Error(37, 39, "font family name %s must be accompanied by a face name",
+	  WARN, &fpos(par[num-1]), string(par[num-1]));
+      }
+      else Error(37, 40, "font face name %s not defined in font family %s",
+	     WARN, &fpos(par[num-1]), string(par[num-1]), string(family));
+      return;
+    }
+  }
+  else
+  {
+    /* preserve current face name */
+    Parent(face, Up(finfo[font(*style)].font_table));
+    assert( is_word(type(face)), "FontChange: type(face)!" );
+    assert( Up(face) != face, "FontChange: Up(face)!" );
+  }
+
+  /* get font size */
+  if( fsize == nilobj )  flen = font_size(finfo[font(*style)].font_table);
+  else 
+  { GetGap(fsize, style, &gp, &inc);
+    if( mode(gp) != EDGE_MODE || units(gp) != FIXED_UNIT )
+    { Error(37, 56, "syntax error in font size %s; ignoring it",
+	WARN, &fpos(fsize), string(fsize));
+      flen = font_size(finfo[font(*style)].font_table);
+    }
+    else if( inc == GAP_ABS )
+      flen = width(gp);
+    else if( font(*style) == NO_FONT )
+    { Error(37, 41, "no current font on which to base size change %s",
+	FATAL, &fpos(fsize), string(fsize));
+    }
+    else if( inc == GAP_INC )
+      flen = font_size(finfo[font(*style)].font_table) + width(gp);
+    else if( inc == GAP_DEC )
+      flen = font_size(finfo[font(*style)].font_table) - width(gp);
+    else Error(37, 42, "FontChange: %d", INTERN, &fpos(x), inc);
+  }
+
+  if( flen <= 0 )
+  { Error(37, 43, "%s %s ignored (result is not positive)",
+      WARN, &fpos(fsize), string(fsize), KW_FONT);
+    return;
+  }
+
+  /* if the font file has not been read before, read it now */
+  assert( Down(face) != face && type(Down(face)) == LINK, "FontChange: dn!" );
+  if( Down(face) == LastDown(face) )  ReadFont(face, x);
+  assert( Down(face) != LastDown(face), "FontChange: after ReadFont!" );
+
+  /* search fonts of face for desired size; return if already present */
+  if( BackEnd == PLAINTEXT )  flen = PlainCharHeight;
+  for( link = NextDown(Down(face));  link != face;  link = NextDown(link) )
+  { Child(fsize, link);
+    if( font_size(fsize) == flen )
+    { font(*style) = font_num(fsize);
+      SetGap(space_gap(*style), nobreak(space_gap(*style)), FALSE, TRUE,
+	FIXED_UNIT, EDGE_MODE, font_spacewidth(fsize));
+      debug2(DFT, D,"FontChange returning (old) %d (XHeight2 = %d)",
+	font(*style), font_xheight2(finfo[font(*style)].font_table));
+      return;
+    }
+  }
+
+  /* now need to rescale the font; first create a sized font record */
+  if( ++font_count >= finfo_size )
+  { if( font_count > MAX_FONT )
+      Error(37, 44, "too many different fonts and sizes (max is %d)",
+        FATAL, &fpos(x), MAX_FONT);
+    ifdebug(DMA, D, DebugRegisterUsage(MEM_FONTS, -1,
+      -finfo_size * sizeof(FONT_INFO)));
+    finfo_size *= 2;
+    ifdebug(DMA, D, DebugRegisterUsage(MEM_FONTS, 1,
+      finfo_size * sizeof(FONT_INFO)));
+    finfo = (FONT_INFO *) realloc(finfo, finfo_size * sizeof(FONT_INFO));
+    if( finfo == (FONT_INFO *) NULL )
+      Error(37, 45, "run out of memory when increasing font table size",
+	FATAL, &fpos(x));
+  }
+
+  assert( Down(face) != face && NextDown(Down(face)) != face, "FontChange!!" );
+  Child(old, NextDown(Down(face)));
+  assert( is_word(type(old)), "FontChange: old!" );
+  new = MakeWord(WORD, string(old), no_fpos);
+  Link(face, new);
+  font_size(new)        = BackEnd != PLAINTEXT ? flen : font_size(old);
+  font_xheight2(new)    = font_xheight2(old) * font_size(new) / font_size(old);
+  font_mapping(new)	= font_mapping(old);
+  font_spacewidth(new)	= font_spacewidth(old) * font_size(new)/font_size(old);
+  font_num(new)         = font_count;
+  finfo[font_count].font_table = new;
+  finfo[font_count].original_font = face;
+  finfo[font_count].underline_pos =
+    (finfo[font_num(old)].underline_pos * font_size(new)) / font_size(old);
+  finfo[font_count].underline_thick =
+    (finfo[font_num(old)].underline_thick * font_size(new)) / font_size(old);
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_FONTS, 1,
+      MAX_CHARS * sizeof(struct metrics)));
+  finfo[font_count].size_table =
+    (struct metrics *) malloc(MAX_CHARS * sizeof(struct metrics));
+  if( finfo[font_count].size_table == (struct metrics *) NULL )
+    Error(37, 46, "run out of memory when changing font or font size",
+      FATAL, &fpos(x));
+  finfo[font_count].lig_table  = lig = finfo[font_num(old)].lig_table;
+
+  /* scale old font to new size */
+  newfnt = finfo[font_num(new)].size_table;
+  oldfnt = finfo[font_num(old)].size_table;
+  for( i = 0;  i < MAX_CHARS;  i++ )  if( lig[i] != 1 )
+  { newfnt[i].left  = (oldfnt[i].left  * font_size(new)) / font_size(old);
+    newfnt[i].right = (oldfnt[i].right * font_size(new)) / font_size(old);
+    newfnt[i].down  = (oldfnt[i].down  * font_size(new)) / font_size(old);
+    newfnt[i].up    = (oldfnt[i].up    * font_size(new)) / font_size(old);
+    newfnt[i].last_adjust = (oldfnt[i].last_adjust * font_size(new)) / font_size(old);
+  }
+
+  /* copy and scale kerning tables */
+  finfo[font_count].kern_table = finfo[font_num(old)].kern_table;
+  finfo[font_count].kern_chars = finfo[font_num(old)].kern_chars;
+  finfo[font_count].kern_value = finfo[font_num(old)].kern_value;
+  oldks = finfo[font_num(old)].kern_sizes;
+  if( oldks != (SHORT_LENGTH *) NULL )
+  { klen = oldks[0];
+    ifdebug(DMA, D, DebugRegisterUsage(MEM_FONTS, 0, klen * sizeof(SHORT_LENGTH)));
+    finfo[font_count].kern_sizes = newks =
+      (SHORT_LENGTH *) malloc(klen * sizeof(SHORT_LENGTH));
+    if( newks == (SHORT_LENGTH *) NULL )
+      Error(37, 47, "run out of memory when changing font or font size",
+	FATAL, &fpos(x));
+    newks[0] = klen;
+    for( i = 1;  i < klen;  i++ )
+      newks[i] = (oldks[i] * font_size(new)) / font_size(old);
+  }
+  else finfo[font_count].kern_sizes = (SHORT_LENGTH *) NULL;
+
+  /* return new font number and exit */
+  font(*style) = font_count;
+  SetGap(space_gap(*style), nobreak(space_gap(*style)), FALSE, TRUE,
+    FIXED_UNIT, EDGE_MODE, font_spacewidth(new));
+  debug2(DFT, D,"FontChange returning (scaled) %d (XHeight2 = %d)",
+    font(*style), font_xheight2(finfo[font(*style)].font_table));
+  /* FontDebug(); */
+} /* end FontChange */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  KernLength(fnum, ch1, ch2, res)                                          */
+/*                                                                           */
+/*  Set res to the kern length between ch1 and ch2 in font fnum, or 0 if     */
+/*  none.  Actually we first convert ch1 and ch2 to corresponding unaccented */
+/*  characters, because metrics files don't seem to contain kerning pairs    */
+/*  for accented characters.                                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+#define KernLength(fnum, mp, ch1, ch2, res)				\
+{ int ua_ch1 = mp[ch1];							\
+  int ua_ch2 = mp[ch2];							\
+  int i = finfo[fnum].kern_table[ua_ch1], j;				\
+  if( i == 0 )  res = 0;						\
+  else									\
+  { FULL_CHAR *kc = finfo[fnum].kern_chars;				\
+    for( j = i;  kc[j] > ua_ch2;  j++ );				\
+    res = (kc[j] == ua_ch2) ?						\
+      finfo[fnum].kern_sizes[finfo[fnum].kern_value[j]] : 0;		\
+  }									\
+} /* end KernLength */
+
+
+/*@::FontWordSize()@**********************************************************/
+/*                                                                           */
+/*  FontWordSize(x)                                                          */
+/*                                                                           */
+/*  Calculate the horizontal and vertical size of WORD or QWORD x, including */
+/*  the effect of ligature sequences but not replacing them with ligatures.  */
+/*                                                                           */
+/*****************************************************************************/
+
+void FontWordSize(OBJECT x)
+{ FULL_CHAR *p, *q, *a, *b, *lig, *unacc, *acc;  OBJECT tmp;
+  FULL_CHAR buff[MAX_BUFF];  MAPPING m;
+  int r, u, d, ksize; struct metrics *fnt;
+  debug2(DFT, D, "FontWordSize( %s ), font = %d", string(x), word_font(x));
+  assert( is_word(type(x)), "FontWordSize: !is_word(type(x))!" );
+
+  p = string(x);
+  q = buff;
+  if( *p )
+  { if ( word_font(x) < 1 || word_font(x) > font_count )
+      Error(37, 48, "no current font at word %s", FATAL, &fpos(x), string(x));
+    if ( word_colour(x) == 0 && BackEnd != PLAINTEXT )
+      Error(37, 49, "no current colour at word %s", FATAL, &fpos(x), string(x));
+    if ( word_language(x) == 0 )
+      Error(37, 50, "no current language at word %s", FATAL, &fpos(x),string(x));
+    fnt = finfo[word_font(x)].size_table;
+    lig = finfo[word_font(x)].lig_table;
+    m = font_mapping(finfo[word_font(x)].font_table);
+    unacc = MapTable[m]->map[MAP_UNACCENTED];
+    acc   = MapTable[m]->map[MAP_ACCENT];
+    d = u = r = 0;
+    do
+    { 
+      /* check for missing glyph (lig[] == 1) or ligatures (lig[] > 1) */
+      debug2(DFT, D, "  examining `%c' lig = %d", *p, lig[*p]);
+      if( lig[*q = *p++] )
+      {
+	if( lig[*q] == 1 )
+	{ tmp = MakeWord(QWORD, STR_SPACE, &fpos(x));
+	  string(tmp)[0] = *q;
+	  /* bug fix: unaccented version exists if unacc differs from self */
+	  if( unacc[*q] != *q )
+	  {
+	    /* *** this is acceptable now, let this char through
+	    Error(37, 51, "accent dropped from character %s (it has no glyph in font %s)",
+	      WARN, &fpos(x),
+	      StringQuotedWord(tmp), FontFamilyAndFace(word_font(x)));
+	    *(p-1) = *q = unacc[*q];
+	    *** */
+	    debug2(DFT, D, "  unacc[%c] = `%c'", *q, unacc[*q]);
+	    fnt[*q].up = fnt[unacc[*q]].up;
+	    fnt[*q].down = fnt[unacc[*q]].down;
+	    fnt[*q].left = fnt[unacc[*q]].left;
+	    fnt[*q].right = fnt[unacc[*q]].right;
+	    fnt[*q].last_adjust = fnt[unacc[*q]].last_adjust;
+	    lig[*q] = 0;
+	  }
+	  else
+	  {
+	    debug1(DFT, D, "  unacc[%c] = 0, replacing by space", *q);
+	    Error(37, 52, "character %s replaced by space (it has no glyph in font %s)",
+	      WARN, &fpos(x),
+	      StringQuotedWord(tmp), FontFamilyAndFace(word_font(x)));
+	    *(p-1) = *q = CH_SPACE;
+	  }
+	  Dispose(tmp);
+	}
+	else
+	{
+	  debug1(DFT, D, "  processing ligature beginning at %c", *q);
+	  a = &lig[ lig[*(p-1)] + MAX_CHARS ];
+	  while( *a++ == *(p-1) )
+	  { b = p;
+	    while( *a == *b && *(a+1) != '\0' && *b != '\0' )  a++, b++;
+	    if( *(a+1) == '\0' )
+	    { *q = *a;
+	      p = b;
+	      break;
+	    }
+	    else
+	    { while( *++a );
+	      a++;
+	    }
+	  }
+	}
+      }
+
+      /* accumulate size of *q */
+      if( fnt[*q].up   > u )  u = fnt[*q].up;
+      if( fnt[*q].down < d )  d = fnt[*q].down;
+      r += fnt[*q++].right;
+    } while( *p );
+    *q = '\0';
+
+    /* adjust for last character */
+    r += fnt[*(q-1)].last_adjust;
+
+    /* add kern lengths to r */
+    for( p = buff, q = p+1;  *q;  p++, q++ )
+    { KernLength(word_font(x), unacc, *p, *q, ksize);
+      debugcond3(DFT, D, ksize != 0, "  KernLength(fnum, %c, %c) = %d",
+	*p, *q, ksize);
+      r += ksize;
+    }
+    /* set sizes of x */
+    back(x, COLM) = 0;
+    fwd(x, COLM)  = r;
+    back(x, ROWM) = u;
+    fwd(x, ROWM)  = -d;
+  } 
+  else back(x, COLM) = fwd(x, COLM) = back(x, ROWM) = fwd(x, ROWM) = 0;
+  debug4(DFT, D, "FontWordSize returning %hd %hd %hd %hd",
+	  back(x, COLM), fwd(x, COLM), back(x, ROWM), fwd(x, ROWM));
+} /* end FontWordSize */
+
+
+/*@::FontSize(), FontHalfXHeight(), FontEncoding(), FontName()@***************/
+/*                                                                           */
+/*  FULL_LENGTH FontSize(fnum, x)                                            */
+/*                                                                           */
+/*  Return the size of this font.  x is for error messages only.             */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_LENGTH FontSize(FONT_NUM fnum, OBJECT x)
+{ debug1(DFT, DD, "FontSize( %d )", fnum);
+  assert( fnum <= font_count, "FontSize!" );
+  if( fnum <= 0 )
+    Error(37, 53, "no current font at this point", FATAL, &fpos(x));
+  debug1(DFT, DD, "FontSize returning %d", font_size(finfo[fnum].font_table));
+  return font_size(finfo[fnum].font_table);
+} /* end FontSize */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_LENGTH FontHalfXHeight(fnum)                                        */
+/*                                                                           */
+/*  Return the xheight2 value of this font.                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_LENGTH FontHalfXHeight(FONT_NUM fnum)
+{ debug1(DFT, DD, "FontHalfXHeight( %d )", fnum);
+  assert( fnum <= font_count, "FontHalfXHeight!" );
+  debug1(DFT, DD, "FontHalfXHeight returning %d",
+    font_xheight2(finfo[fnum].font_table));
+  return font_xheight2(finfo[fnum].font_table);
+} /* end FontHalfXHeight */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  MAPPING FontMapping(fnum, xfpos)                                         */
+/*                                                                           */
+/*  Return the character mapping of this font, to use for small caps, etc.   */
+/*  xfpos is the file position for error messages.                           */
+/*                                                                           */
+/*****************************************************************************/
+
+MAPPING FontMapping(FONT_NUM fnum, FILE_POS *xfpos)
+{ debug1(DFT, DD, "FontMapping( %d )", fnum);
+  assert( fnum <= font_count, "FontMapping!" );
+  if( fnum <= 0 )
+    Error(37, 54, "no current font at this point", FATAL, xfpos);
+  debug1(DFT, DD, "FontMapping returning %d",
+    font_mapping(finfo[fnum].font_table));
+  return font_mapping(finfo[fnum].font_table);
+} /* end FontMapping */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *FontName(fnum)                                                */
+/*                                                                           */
+/*  Return the short PostScript name of this font.                           */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *FontName(FONT_NUM fnum)
+{ OBJECT face, AFMfilename, short_name;
+  debug1(DFT, D, "FontName( %d )", fnum);
+  assert( fnum <= font_count, "FontName!" );
+  Parent(face, Up(finfo[fnum].font_table));
+  Child(AFMfilename, Down(face));
+  Child(short_name, Down(AFMfilename));
+  assert( is_word(type(short_name)), "FontName: short_name!" );
+  debug1(DFT, D, "FontName returning %s", string(short_name));
+  return string(short_name);
+} /* end FontName */
+
+
+/*@::FontFamily(), FontFace@**************************************************/
+/*                                                                           */
+/*  FULL_CHAR *FontFamilyAndFace(fnum)                                       */
+/*                                                                           */
+/*  Return a static string of the current font family and face.              */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *FontFamily(FONT_NUM fnum)
+{ OBJECT face, family;
+  debug1(DFT, D, "FontFamily( %d )", fnum);
+  assert( fnum <= font_count, "FontFamiliy!" );
+  Parent(face, Up(finfo[fnum].font_table));
+  Parent(family, Up(face));
+  debug1(DFT, D, "FontFamily returning %s", string(family));
+  return string(family);
+} /* end FontFamilyAndFace */
+
+
+FULL_CHAR *FontFace(FONT_NUM fnum)
+{ OBJECT face, family;
+  debug1(DFT, D, "FontFacec( %d )", fnum);
+  assert( fnum <= font_count, "FontFamiliy!" );
+  Parent(face, Up(finfo[fnum].font_table));
+  Parent(family, Up(face));
+  debug1(DFT, D, "FontFace returning %s", string(face));
+  return string(face);
+} /* end FontFamilyAndFace */
+
+
+/*@::FontFamilyAndFace(), FontPrintAll()@*************************************/
+/*                                                                           */
+/*  FULL_CHAR *FontFamilyAndFace(fnum)                                       */
+/*                                                                           */
+/*  Return a static string of the current font family and face.              */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *FontFamilyAndFace(FONT_NUM fnum)
+{ OBJECT face, family; static FULL_CHAR buff[80];
+  debug1(DFT, D, "FontFamilyAndFace( %d )", fnum);
+  assert( fnum <= font_count, "FontName!" );
+  Parent(face, Up(finfo[fnum].font_table));
+  Parent(family, Up(face));
+  if( StringLength(string(family)) + StringLength(string(face)) + 1 > 80 )
+    Error(37, 55, "family and face names %s %s are too long",
+      FATAL, no_fpos, string(family), string(face));
+  StringCopy(buff, string(family));
+  StringCat(buff, STR_SPACE);
+  StringCat(buff, string(face));
+  debug1(DFT, D, "FontName returning %s", buff);
+  return buff;
+} /* end FontFamilyAndFace */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FontPrintAll(fp)                   	                                     */
+/*                                                                           */
+/*  Print all font encoding commands on output file fp                       */
+/*                                                                           */
+/*****************************************************************************/
+
+void FontPrintAll(FILE *fp)
+{ OBJECT family, face, AFMfilename, short_name, ps_name, link, flink;
+  assert(font_root!=nilobj && type(font_root)==ACAT, "FontDebug: font_root!");
+  debug0(DFT, DD, "FontPrintAll(fp)");
+  for( link = Down(font_root);  link != font_root;  link = NextDown(link) )
+  { Child(family, link);
+    assert( is_word(type(family)), "FontPrintAll: family!" );
+    for( flink = Down(family);  flink != family;  flink = NextDown(flink) )
+    { Child(face, flink);
+      assert( is_word(type(face)), "FontPrintAll: face!" );
+      assert( Down(face) != face, "FontDebug: Down(face)!");
+      Child(AFMfilename, Down(face));
+      assert( is_word(type(AFMfilename)), "FontPrintAll: filename!" );
+      assert( Down(AFMfilename) != AFMfilename, "FontPrintAll: 1!" );
+      assert( LastDown(AFMfilename) != Down(AFMfilename), "FontPrintAll: 2!" );
+      Child(short_name, Down(AFMfilename));
+      assert( is_word(type(short_name)), "FontPrintAll: short_name!" );
+      Child(ps_name, LastDown(AFMfilename));
+      assert( is_word(type(ps_name)), "FontPrintAll: ps_name!" );
+      if( font_recoded(face) )
+      { fprintf(fp, "/%s%s %s /%s LoutRecode\n",
+	  string(ps_name), string(short_name),
+	  MapEncodingName(font_mapping(AFMfilename)), string(ps_name));
+        fprintf(fp, "/%s { /%s%s LoutFont } def\n", string(short_name),
+	  string(ps_name), string(short_name));
+      }
+      else fprintf(fp, "/%s { /%s LoutFont } def\n", string(short_name),
+	  string(ps_name));
+    }
+  }
+  fputs("\n", fp);
+  debug0(DFT, DD, "FontPrintAll returning.");
+} /* end FontPrintAll */
+
+
+/*@@**************************************************************************/
+/*                                                                           */
+/*  FontPrintPageSetup(fp)             	                                     */
+/*                                                                           */
+/*  Print all font encoding commands needed for the current page onto fp.    */
+/*                                                                           */
+/*****************************************************************************/
+
+void FontPrintPageSetup(FILE *fp)
+{ OBJECT face, AFMfilename, short_name, ps_name, link;
+  assert(font_root!=nilobj && type(font_root)==ACAT, "FontDebug: font_root!");
+  assert(font_used!=nilobj && type(font_used)==ACAT, "FontDebug: font_used!");
+  debug0(DFT, DD, "FontPrintPageSetup(fp)");
+  for( link = Down(font_used);  link != font_used;  link = NextDown(link) )
+  {
+    Child(face, link);
+    assert( is_word(type(face)), "FontPrintPageSetup: face!" );
+    assert( Down(face) != face, "FontDebug: Down(face)!");
+
+    /* record that face is used on the first page, if this is the first page */
+    if( font_curr_page == 1 )  font_firstpage(face) = TRUE;
+
+    /* print font encoding command unless already done */
+    if( !font_firstpage(face) || font_curr_page == 1 )
+    { Child(AFMfilename, Down(face));
+      assert( is_word(type(AFMfilename)), "FontPrintPageSetup: filename!" );
+      assert( Down(AFMfilename) != AFMfilename, "FontPrintPageSetup: 1!" );
+      assert( LastDown(AFMfilename)!=Down(AFMfilename), "FontPrintPageSetup!");
+      Child(short_name, Down(AFMfilename));
+      assert( is_word(type(short_name)), "FontPrintPageSetup: short_name!" );
+      Child(ps_name, LastDown(AFMfilename));
+      assert( is_word(type(ps_name)), "FontPrintPageSetup: ps_name!" );
+      fprintf(fp, "%%%%IncludeResource: font %s\n", string(ps_name));
+
+      switch( BackEnd )
+      {
+	case POSTSCRIPT:
+
+          if( font_recoded(face) )
+          { fprintf(fp, "/%s%s %s /%s LoutRecode\n",
+	      string(ps_name), string(short_name),
+	      MapEncodingName(font_mapping(AFMfilename)), string(ps_name));
+            fprintf(fp, "/%s { /%s%s LoutFont } def\n", string(short_name),
+	      string(ps_name), string(short_name));
+          }
+          else fprintf(fp, "/%s { /%s LoutFont } def\n", string(short_name),
+	    string(ps_name));
+	  break;
+
+	
+	case PDF:
+
+	  PDFFont_AddFont(fp, string(short_name), string(ps_name),
+	    MapEncodingName(font_mapping(AFMfilename)));
+	  break;
+      }
+    }
+  }
+  debug0(DFT, DD, "FontPrintPageSetup returning.");
+} /* end FontPrintPageSetup */
+
+
+/*@@**************************************************************************/
+/*                                                                           */
+/*  FontPrintPageResources(fp)        	                                     */
+/*                                                                           */
+/*  Print all page resources (i.e. fonts needed or supplied) onto fp.        */
+/*                                                                           */
+/*****************************************************************************/
+
+void FontPrintPageResources(FILE *fp)
+{ OBJECT face, AFMfilename, short_name, ps_name, link;
+  BOOLEAN first;
+  assert(font_root!=nilobj && type(font_root)==ACAT, "FontDebug: font_root!");
+  assert(font_used!=nilobj && type(font_used)==ACAT, "FontDebug: font_used!");
+  debug0(DFT, DD, "FontPrintPageResources(fp)");
+  first = TRUE;
+  for( link = Down(font_used);  link != font_used;  link = NextDown(link) )
+  {
+    Child(face, link);
+    assert( is_word(type(face)), "FontPrintPageResources: face!" );
+    assert( Down(face) != face, "FontDebug: Down(face)!");
+
+    Child(AFMfilename, Down(face));
+    assert( is_word(type(AFMfilename)), "FontPrintPageResources: filename!" );
+    assert( Down(AFMfilename) != AFMfilename, "FontPrintPageResources: 1!" );
+    assert( LastDown(AFMfilename)!=Down(AFMfilename), "FontPrintPageRes!");
+    Child(short_name, Down(AFMfilename));
+    assert( is_word(type(short_name)), "FontPrintPageResources: short_name!" );
+    Child(ps_name, LastDown(AFMfilename));
+    assert( is_word(type(ps_name)), "FontPrintPageResources: ps_name!" );
+
+    switch( BackEnd )
+    {
+      case POSTSCRIPT:
+
+        fprintf(fp, "%s font %s\n",
+          first ? "%%PageResources:" : "%%+", string(ps_name));
+        first = FALSE;
+	break;
+
+
+      case PDF:
+
+	/* PDFWriteFontResource(fp, string(ps_name)); */
+	break;
+    }
+  }
+  debug0(DFT, DD, "FontPrintPageResources returning.");
+} /* end FontPrintPageResources */
+
+
+/*@@**************************************************************************/
+/*                                                                           */
+/*  FontAdvanceCurrentPage()        	                                     */
+/*                                                                           */
+/*  Advance the current page.                                                */
+/*                                                                           */
+/*****************************************************************************/
+
+void FontAdvanceCurrentPage(void)
+{ debug0(DFT, DD, "FontAdvanceCurrentPage()");
+  while( Down(font_used) != font_used )  DeleteLink(Down(font_used));
+  font_curr_page++;
+  debug0(DFT, DD, "FontAdvanceCurrentPage() returning.");
+} /* end FontAdvanceCurrentPage */
+
+
+/*@::FontPageUsed()@**********************************************************/
+/*                                                                           */
+/*  OBJECT FontPageUsed(face)                                                */
+/*                                                                           */
+/*  Declares that font face is used on the current page.                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void FontPageUsed(OBJECT face)
+{ debug1(DFT, DD, "FontPageUsed(%d)", font_num(face));
+  assert( font_page(face) < font_curr_page, "FontPageUsed!" );
+  Link(font_used, face);
+  font_page(face) = font_curr_page;
+  debug0(DFT, DD, "FontPageUsed returning");
+} /* end FontPageUsed */
+
+
+/*@::FontNeeded()@************************************************************/
+/*                                                                           */
+/*  OBJECT FontNeeded(fp)                                                    */
+/*                                                                           */
+/*  Writes font needed resources onto file out_fp.  Returns TRUE if none.    */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN FontNeeded(FILE *fp)
+{ BOOLEAN first_need = TRUE;
+  OBJECT link, flink, family, face, x;
+  for( link = Down(font_root); link != font_root; link = NextDown(link) )
+  { Child(family, link);
+    for( flink = Down(family);  flink != family;  flink = NextDown(flink) )
+    { Child(face, flink);
+      if( LastDown(face) != Down(face) )
+      { Child(x, LastDown(face));
+        fprintf(fp, "%s font %s\n",
+            first_need ? "%%DocumentNeededResources:" : "%%+", string(x));
+        first_need = FALSE;
+      }
+    }
+  }
+  return first_need;
+} /* end FontNeeded */
diff --git a/z38.c b/z38.c
new file mode 100644
index 0000000..4a7290f
--- /dev/null
+++ b/z38.c
@@ -0,0 +1,645 @@
+/*@z38.c:Character Mappings:Declarations@*************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z38.c                                                      */
+/*  MODULE:       Character Mappings                                         */
+/*  EXTERNS:      MapLoad(), MapCharEncoding(), MapEncodingName(),           */
+/*                MapPrintEncodings(), MapPrintResources(), MapSmallCaps()   */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define MAX_MAP		 20		/* max number of lcm files           */
+
+/*****************************************************************************/
+/*                                                                           */
+/*  Should really be private but have been placed in externs because for     */
+/*  efficiency they are used by z37.c and z34.c                              */
+/*                                                                           */
+/*  #define   MAX_CHASH      353                                             */
+/*  #define   MAP_UPPERCASE    0                                             */
+/*  #define   MAP_LOWERCASE    1                                             */
+/*  #define   MAP_UNACCENTED   2                                             */
+/*  #define   MAP_ACCENT       3                                             */
+/*  #define   MAPS             4                                             */
+/*                                                                           */
+/*  typedef struct mapvec {                                                  */
+/*    OBJECT      file_name;                                                 */
+/*    FILE_NUM    fnum;                                                      */
+/*    BOOLEAN     must_print;                                                */
+/*    OBJECT      name;                                                      */
+/*    OBJECT      vector[MAX_CHARS];                                         */
+/*    FULL_CHAR   hash_table[MAX_CHASH];                                     */
+/*    FULL_CHAR   map[MAPS][MAX_CHARS];                                      */
+/*  } *MAP_VEC;                                                              */
+/*                                                                           */
+/*****************************************************************************/
+
+MAP_VEC	MapTable[MAX_MAP];		/* the mappings                      */
+
+static	OBJECT	notdef_word = nilobj;	/* notdef word                       */
+static	int	maptop = 1;		/* first free slot in MapTable[]     */
+					/* save 0 for "no mapping"           */
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static int NameInsert(cname)                                             */
+/*  static FULL_CHAR NameRetrieve(cname)                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+#define hash(str, pos)							\
+{ FULL_CHAR *p = str;							\
+  for( pos = 2 * *p++;  *p;  pos += *p++);				\
+  pos = pos % MAX_CHASH;						\
+}
+
+static void NameInsert(FULL_CHAR *cname, int ccode, MAP_VEC map)
+{ int pos;
+  hash(cname, pos);
+  while( map->hash_table[pos] != (FULL_CHAR) '\0' )
+    pos = (pos + 1) % MAX_CHASH;
+  map->vector[ccode] = MakeWord(WORD, cname, no_fpos);
+  map->hash_table[pos] = ccode;
+} /* end NameInsert */
+
+static FULL_CHAR NameRetrieve(FULL_CHAR *cname, MAP_VEC map)
+{ int pos;  FULL_CHAR ch;
+  hash(cname, pos);
+  while( (ch = map->hash_table[pos]) != (FULL_CHAR) '\0' )
+  {
+    if( StringEqual(string(map->vector[ch]), cname) )
+      return ch;
+    pos = (pos + 1) % MAX_CHASH;
+  }
+  return ch;
+} /* end NameRetrieve */
+
+
+/*@::MapLoad()@***************************************************************/
+/*                                                                           */
+/*  MAPPING MapLoad(file_name, must_print)                                   */
+/*                                                                           */
+/*  Declare file_name to be a character mapping (LCM) file.  A file may be   */
+/*  so declared more than once.  If must_print is true, the encoding vector  */
+/*  given by this file must be printed in the PostScript output.             */
+/*                                                                           */
+/*****************************************************************************/
+
+MAPPING MapLoad(OBJECT file_name, BOOLEAN must_print)
+{ FILE *fp;  MAP_VEC map;  MAPPING res;
+  int i, m, curr_line_num, line_pos, prev_code, dc, oc, count;
+  FULL_CHAR buff[MAX_BUFF], cn[MAX_BUFF], ch, mapname[MAX_BUFF],
+  mapval[MAX_BUFF];
+  debug2(DCM,D, "MapLoad(%s, %s)", EchoObject(file_name),bool(must_print));
+
+  /* if the file name is "-", it means no mapping file is supplied */
+  if( StringEqual(string(file_name), AsciiToFull("-")) )
+  { debug1(DCM, D, "MapLoad returning 0 (file name is %s)",
+      string(file_name));
+    return (MAPPING) 0;
+  }
+
+  /* if seen this file name before, just update must_print and return prev */
+  for( res = 1;  res < maptop;  res++ )
+  {
+    if( StringEqual(string(MapTable[res]->file_name), string(file_name)) )
+    { Dispose(file_name);
+      MapTable[res]->must_print = MapTable[res]->must_print || must_print;
+      debug1(DCM, D, "MapLoad returning %d (not new)", res);
+      return res;
+    }
+  }
+
+  /* initialize PostScript name of all undefined characters */
+  if( notdef_word == nilobj )
+    notdef_word = MakeWord(WORD, AsciiToFull(".notdef"), no_fpos);
+
+  /* new, so allocate a new slot in MapTable for this new mapping */
+  if( maptop == MAX_MAP )
+    Error(38, 1, "too many character mappings", FATAL, &fpos(file_name));
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_CMAPS, 1, sizeof(struct mapvec)));
+  MapTable[res = maptop++] = map = (MAP_VEC) malloc( sizeof(struct mapvec) );
+  if( map == (MAP_VEC) NULL )
+    Error(38, 2, "run out of memory when loading character mapping",
+      FATAL, &fpos(file_name));
+
+  /* initialize all the fields */
+  map->file_name = file_name;
+  debug0(DFS, D, "  calling DefineFile from MapLoad");
+  map->fnum = DefineFile(string(file_name), STR_EMPTY, &fpos(file_name),
+    MAPPING_FILE, MAPPING_PATH);
+  fp = OpenFile(map->fnum, FALSE, FALSE);
+  if( fp == NULL )  Error(38, 3, "cannot open character mapping file %s",
+      FATAL, PosOfFile(map->fnum), FileName(map->fnum));
+  map->must_print = must_print;
+  StringCopy(buff, AsciiToFull("vec"));
+  StringCat(buff, StringInt(maptop));
+  map->name = MakeWord(WORD, buff, no_fpos);
+  for( m = 0;  m < MAPS;  m++ )
+  { for( i = 0;  i < MAX_CHARS;  i++ )
+      map->map[m][i] = '\0';
+  }
+
+  /* unaccented map is defined to be self as default */
+  for( i = 0;  i < MAX_CHARS;  i++ )
+    map->map[MAP_UNACCENTED][i] = i;
+
+  for( i = 0;  i < MAX_CHARS; i++ )  map->vector[i] = notdef_word;
+  for( i = 0;  i < MAX_CHASH; i++ )  map->hash_table[i] = 0;
+
+  /* first pass through the file; read character codes and names only */
+  prev_code = -1;  curr_line_num = 0;
+  while( fgets( (char *) buff, MAX_BUFF, fp) == (char *) buff )
+  { 
+    /* skip comment lines and blank lines */
+    curr_line_num++;
+    for( i = 0;  buff[i] == ' ' || buff[i] == '\t';  i++ );
+    if( buff[i] == '#' || buff[i] == '\n' || buff[i] == '\0' )  continue;
+
+    /* parse line and check validity of decimal and octal character codes */
+    count = sscanf( (char *) buff, "%d %o %s", &dc, &oc, cn);
+    if( count < 2 )
+      Error(38, 4, "character code(s) missing in mapping file (line %d)",
+	FATAL, &fpos(file_name));
+    if( dc != oc )
+      Error(38, 5, "decimal and octal codes disagree in mapping file (line %d)",
+	FATAL, &fpos(file_name));
+    if( dc < 1 && !StringEqual(cn, STR_NOCHAR) )
+      Error(38, 6, "code %d too small (min is 1) in mapping file (line %d)",
+	FATAL, &fpos(file_name), dc, curr_line_num);
+    if( dc < prev_code )
+      Error(38, 7, "code %d out of order in mapping file (line %d)",
+	FATAL, &fpos(file_name), dc, curr_line_num);
+    if( dc == prev_code )
+      Error(38, 8, "code %d repeated in mapping file (line %d)",
+	FATAL, &fpos(file_name), dc, curr_line_num);
+    if( dc > MAX_CHARS )
+      Error(38, 9, "code %d too large (max is %d) in mapping file (line %d)",
+	FATAL, &fpos(file_name), dc, MAX_CHARS, curr_line_num);
+    prev_code = dc;
+
+    /* insert character name, if any */
+    debug2(DCM, DD, "  line %d: %s", curr_line_num, cn);
+    if( count >= 3 && !StringEqual(cn, STR_NOCHAR) )
+    {
+      /* insert (cn, dc) pair into hash table; name may be repeated */
+      if( (ch = NameRetrieve(cn, map)) != 0 )
+	map->vector[dc] = map->vector[ch];
+      else
+	NameInsert(cn, dc, map);
+    }
+  }
+
+  /* second pass through the file: read mappings */
+  rewind(fp);
+  curr_line_num = 0;
+  while( fgets( (char *) buff, MAX_BUFF, fp) == (char *) buff )
+  { 
+    /* skip comment lines and blank lines */
+    curr_line_num++;
+    for( i = 0;  buff[i] == ' ' || buff[i] == '\t';  i++ );
+    if( buff[i] == '#' || buff[i] == '\n' || buff[i] == '\0' )  continue;
+
+    /* parse line */
+    count = sscanf( (char *) buff, "%d %o %s%n",
+      &dc, &oc, cn, &line_pos);
+
+    /* find and insert the maps */
+    while( sscanf( (char *) &buff[line_pos], "%s %[^;];%n",
+      mapname, mapval, &i) == 2 )
+    {
+      debug3(DCM, DD, "  line %d: %s %s", curr_line_num, mapname, mapval);
+      line_pos += i;
+      if( StringEqual(mapname, AsciiToFull("UC")) )
+	m = MAP_UPPERCASE;
+      else if( StringEqual(mapname, AsciiToFull("LC")) )
+	m = MAP_LOWERCASE;
+      else if( StringEqual(mapname, AsciiToFull("UA")) )
+	m = MAP_UNACCENTED;
+      else if( StringEqual(mapname, AsciiToFull("AC")) )
+	m = MAP_ACCENT;
+      else
+	Error(38, 10, "unknown mapping name %s in mapping file %s (line %d)",
+	  FATAL, &fpos(file_name), mapname, FileName(map->fnum), curr_line_num);
+      ch = NameRetrieve(mapval, map);
+      if( ch == (FULL_CHAR) '\0' )
+	Error(38, 11, "unknown character %s in mapping file %s (line %d)",
+	  FATAL, &fpos(file_name), mapval, FileName(map->fnum), curr_line_num);
+      map->map[m][dc] = ch;
+    }
+  }
+  fclose(fp);
+  debug1(DCM, D, "MapLoad returning %d (new mapping)", res);
+  return res;
+} /* end MapLoad */
+
+
+/*@::MapCharEncoding(), MapEncodingName(), MapPrintEncodings()@***************/
+/*                                                                           */
+/*  FULL_CHAR MapCharEncoding(str, map)                                      */
+/*                                                                           */
+/*  Returns the character code corresponding to character name str in        */
+/*  MAPPING enc, or 0 if not found.                                          */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR MapCharEncoding(FULL_CHAR *str, MAPPING m)
+{ MAP_VEC map;
+  map = MapTable[m];
+  return (FULL_CHAR) NameRetrieve(str, map);
+} /* end MapCharEncoding */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *MapEncodingName(m)                                            */
+/*                                                                           */
+/*  Returns the PostScript name of the encoding vector of mapping m          */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *MapEncodingName(MAPPING m)
+{ assert( m < maptop, "MapEncodingName: m out of range!" );
+  return string(MapTable[m]->name);
+} /* end MapEncodingName */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  MapPrintEncodings(fp)                                                    */
+/*                                                                           */
+/*  Print all encoding vectors in PostScript form on file fp.                */
+/*                                                                           */
+/*****************************************************************************/
+
+void MapPrintEncodings(FILE *fp)
+{ MAPPING m;  MAP_VEC map;  int i;
+  for( m = 1;  m < maptop;  m++ )  if( MapTable[m]->must_print )
+  { map = MapTable[m];
+    switch( BackEnd )
+    {
+      case POSTSCRIPT:
+
+        fprintf(fp, "%%%%BeginResource encoding %s\n", string(map->name));
+        fprintf(fp, "/%s [\n", string(map->name));
+        for( i = 0;  i < MAX_CHARS;  i++ )
+          fprintf(fp, "/%s%c", string(map->vector[i]), (i+1) % 8 != 0 ? ' ' : '\n');
+        fprintf(fp, "] def\n");
+        fprintf(fp, "%%%%EndResource\n\n");
+	break;
+
+
+      case PDF:
+
+	PDFFile_BeginFontEncoding(fp, (char*) string(map->name));
+	for( i = 0;  i < MAX_CHARS;  i++ )
+	  fprintf(fp, "/%s%c", string(map->vector[i]),
+	    (i+1) % 8 != 0 ? ' ' : '\n');
+	PDFFile_EndFontEncoding(fp);
+	break;
+    }
+  }
+} /* end MapPrintEncodings */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  MapPrintResources(fp)                                                    */
+/*                                                                           */
+/*  Print resource entries for all encoding vectors on file fp.              */
+/*                                                                           */
+/*****************************************************************************/
+
+void MapPrintResources(FILE *fp)
+{ MAPPING m;  MAP_VEC map;
+  for( m = 1;  m < maptop;  m++ )  if( MapTable[m]->must_print )
+  { map = MapTable[m];
+    fprintf(fp, "%%%%+ encoding %s\n", string(map->name));
+  }
+} /* end MapPrintResources */
+
+/*@@**************************************************************************/
+/*                                                                           */
+/*  OBJECT DoWord(buff, q, x, fnum)                                          */
+/*                                                                           */
+/*  Replace WORD or QWORD x by a small caps version, based on word_font(x).  */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT DoWord(FULL_CHAR *buff, FULL_CHAR *q, OBJECT x, FONT_NUM fnum)
+{ OBJECT res;
+  *q++ = '\0';
+  res = MakeWord(type(x), buff, &fpos(x));
+  word_font(res) = fnum;
+  word_colour(res) = word_colour(x);
+  word_language(res) = word_language(x);
+  word_hyph(res) = word_hyph(x);
+  underline(res) = UNDER_OFF;
+  return res;
+} /* end DoWord */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT DoVShift(x, vshift, chld)                                         */
+/*                                                                           */
+/*  Make an new VSHIFT object with the given shift and child.                */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT DoVShift(OBJECT x, FULL_LENGTH vshift, OBJECT chld)
+{ OBJECT res;
+  New(res, VSHIFT);
+  FposCopy(fpos(res), fpos(x));
+  shift_type(res) = GAP_DEC;
+  units(shift_gap(res)) = FIXED_UNIT;
+  mode(shift_gap(res)) = EDGE_MODE;
+  width(shift_gap(res)) = vshift;
+  underline(res) = UNDER_OFF;
+  Link(res, chld);
+  return res;
+}
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void DoAddGap(new_acat)                                                  */
+/*                                                                           */
+/*  Add a new 0i gap object to new_acat.                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+static void DoAddGap(OBJECT new_acat)
+{ OBJECT new_g;
+  New(new_g, GAP_OBJ);
+  FposCopy(fpos(new_g), fpos(new_acat));
+  hspace(new_g) = vspace(new_g) = 0;
+  SetGap(gap(new_g), TRUE, FALSE, TRUE, FIXED_UNIT, EDGE_MODE, 0*IN);
+  underline(new_g) = UNDER_OFF;
+  Link(new_acat, new_g);
+}
+
+/*@::MapSmallCaps()@**********************************************************/
+/*                                                                           */
+/*  OBJECT MapSmallCaps(x, style)                                            */
+/*                                                                           */
+/*  Replace WORD or QWORD x by a small caps version, based on word_font(x).  */
+/*                                                                           */
+/*****************************************************************************/
+#define	INIT		0
+#define	ALL_NON		1
+#define	ALL_TRANS	2
+#define	MIXED_NON	3
+#define	MIXED_TRANS	4
+#define transformable(ch)	(uc[ch] != '\0')
+
+OBJECT MapSmallCaps(OBJECT x, STYLE *style)
+{ MAPPING m;  int i;  OBJECT new_y, new_x, new_acat, tmp;
+  FULL_CHAR buff[MAX_BUFF], *uc, *p, *q;
+  FONT_NUM small_font;  FULL_LENGTH vshift;  int state;  STYLE new_style;
+  static OBJECT font_change_word = nilobj;
+  assert( is_word(type(x)), "MapSmallCaps: !is_word(type(x))" );
+  debug2(DCM, D, "MapSmallCaps(%s %s)", Image(type(x)), string(x));
+
+  /* get the mapping and return if there isn't one for this font */
+  m = FontMapping(font_num(x), &fpos(x));
+  if( m == 0 )
+  { debug0(DCM, D, "MapSmallCaps returning unchanged (mapping is 0)");
+    return x;
+  }
+  assert( 1 <= m && m < maptop, "MapSmallCaps: mapping out of range!" );
+  uc = MapTable[m]->map[MAP_UPPERCASE];
+
+  /* if plain text, apply the mapping and exit */
+  if( BackEnd == PLAINTEXT )
+  {
+    for( i = 0;  string(x)[i] != '\0';  i++ )
+      if( uc[string(x)[i]] != '\0' )
+        string(x)[i] = uc[string(x)[i]];
+    debug1(DCM, D, "MapSmallCaps returning (plain text) %s", EchoObject(x));
+    return x;
+  }
+
+  /* set up the font change word if not already done */
+  if( font_change_word == nilobj )
+  { font_change_word = MakeWord(WORD, AsciiToFull("0.7f"), no_fpos);
+  }
+
+  state = INIT;  q = buff;
+  for( p = string(x);  *p != '\0';  p++ )
+  {
+    debug2(DCM, DD, " examining %c (%s)", *p,
+      transformable(*p) ? "transformable" : "not transformable");
+    switch( state )
+    {
+      case INIT:
+
+        /* this state is for when we are at the first character */
+        if( transformable(*p) )
+        { *q++ = uc[*p];
+
+	  /* work out what the smaller font is going to be, and the vshift */
+	  StyleCopy(new_style, *style);
+	  FontChange(&new_style, font_change_word);
+	  small_font = font(new_style);
+	  vshift = FontHalfXHeight(word_font(x)) - FontHalfXHeight(small_font);
+
+          state = ALL_TRANS;
+        }
+        else
+        { *q++ = *p;
+          state = ALL_NON;
+        }
+        break;
+
+
+      case ALL_NON:
+
+        /* in this state, all characters so far are non-transformable */
+        if( transformable(*p) )
+        { 
+	  /* work out what the smaller font is going to be */
+	  StyleCopy(new_style, *style);
+	  FontChange(&new_style, font_change_word);
+	  small_font = font(new_style);
+	  vshift = FontHalfXHeight(word_font(x)) - FontHalfXHeight(small_font);
+
+	  /* make a new WORD out of the current contents of buff */
+	  new_y = DoWord(buff, q, x, word_font(x));
+
+	  /* construct the skeleton of the result to replace x */
+	  New(new_x, ONE_COL);
+	  FposCopy(fpos(new_x), fpos(x));
+	  New(new_acat, ACAT);
+	  FposCopy(fpos(new_acat), fpos(x));
+	  Link(new_x, new_acat);
+	  Link(new_acat, new_y);
+	  DoAddGap(new_acat);
+
+	  /* start off a new buffer with *p */
+	  q = buff;
+	  *q++ = uc[*p];
+	  state = MIXED_TRANS;
+        }
+        else *q++ = *p;
+        break;
+
+
+      case ALL_TRANS:
+
+        /* in this state, all characters so far are transformable */
+        if( transformable(*p) ) *q++ = uc[*p];
+        else
+        {
+	  /* make a new @VShift WORD out of the current contents of buff */
+	  tmp = DoWord(buff, q, x, small_font);
+	  new_y = DoVShift(x, vshift, tmp);
+
+	  /* construct the skeleton of the result to replace x */
+	  New(new_x, ONE_COL);
+	  FposCopy(fpos(new_x), fpos(x));
+	  New(new_acat, ACAT);
+	  FposCopy(fpos(new_acat), fpos(x));
+	  Link(new_x, new_acat);
+	  Link(new_acat, new_y);
+	  DoAddGap(new_acat);
+
+	  /* start off a new buffer with *p */
+	  q = buff;
+	  *q++ = *p;
+	  state = MIXED_NON;
+        }
+        break;
+
+
+      case MIXED_NON:
+
+        /* in this state the previous char was non-transformable, but */
+        /* there have been characters before that that were transformable */
+        if( transformable(*p) )
+        {
+	  /* make a new WORD out of the current contents of buff */
+	  new_y = DoWord(buff, q, x, word_font(x));
+
+	  /* link the new word into the growing structure that replaces x */
+	  Link(new_acat, new_y);
+	  DoAddGap(new_acat);
+
+	  /* start off a new buffer with *p */
+	  q = buff;
+	  *q++ = uc[*p];
+	  state = MIXED_TRANS;
+        }
+        else *q++ = *p;
+        break;
+
+
+      case MIXED_TRANS:
+
+        /* in this state the previous char was transformable, but there */
+        /* have been characters before that that were non-transformable */
+        if( transformable(*p) ) *q++ = uc[*p];
+        else
+        {
+	  /* make a new @VShift WORD out of the current contents of buff */
+	  tmp = DoWord(buff, q, x, small_font);
+	  new_y = DoVShift(x, vshift, tmp);
+
+	  /* link the new word into the growing structure that replaces x */
+	  Link(new_acat, new_y);
+	  DoAddGap(new_acat);
+
+	  /* start off a new buffer with *p */
+	  q = buff;
+	  *q++ = *p;
+	  state = MIXED_NON;
+        }
+        break;
+
+    }
+  }
+
+  /* now at termination, clean up the structure */
+  switch( state )
+  {
+    case INIT:
+    case ALL_NON:
+
+      /* original x is OK as is: either empty or all non-transformable */
+      break;
+
+
+    case ALL_TRANS:
+
+      /* make a new @VShift WORD and replace x with it */
+      tmp = DoWord(buff, q, x, small_font);
+      new_x = DoVShift(x, vshift, tmp);
+      ReplaceNode(new_x, x);
+      Dispose(x);
+      x = new_x;
+      break;
+
+
+    case MIXED_NON:
+
+      /* make a new WORD, add to new_acat, and replace x */
+      new_y = DoWord(buff, q, x, word_font(x));
+      Link(new_acat, new_y);
+      ReplaceNode(new_x, x);
+      Dispose(x);
+      x = new_x;
+      break;
+
+
+    case MIXED_TRANS:
+
+      /* make a new @VShift WORD, add to new_acat, and replace x */
+      tmp = DoWord(buff, q, x, small_font);
+      new_y = DoVShift(x, vshift, tmp);
+      Link(new_acat, new_y);
+      ReplaceNode(new_x, x);
+      Dispose(x);
+      x = new_x;
+      break;
+  }
+  debug1(DCM, D, "MapSmallCaps returning %s", EchoObject(x));
+  return x;
+} /* end MapSmallCaps */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN MapIsLowerCase(FULL_CHAR ch, MAPPING m)                          */
+/*                                                                           */
+/*  Returns TRUE if ch is a lower-case character in mapping m; i.e. if it    */
+/*  has a corresponding upper-case character.                                */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN MapIsLowerCase(FULL_CHAR ch, MAPPING m)
+{ BOOLEAN res;
+  debug2(DCM, D, "MapIsLowerCase(%c, %d)", ch, m);
+  res = (MapTable[m]->map[MAP_UPPERCASE][ch] != '\0');
+  debug1(DCM, D, "MapIsLowerCase returning %s", bool(res));
+  return res;
+} /* end MapIsLowerCase */
diff --git a/z39.c b/z39.c
new file mode 100644
index 0000000..8f337aa
--- /dev/null
+++ b/z39.c
@@ -0,0 +1,218 @@
+/*@z39.c:String Handler:AsciiToFull(), StringEqual(), etc.@*******************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z39.c                                                      */
+/*  MODULE:       String Handler                                             */
+/*  EXTERNS:      AsciiToFull(), StringEqual(),                              */
+/*                StringCat(), StringCopy(), StringLength(),                 */
+/*                StringFOpen(), StringFPuts(), StringFGets(),               */
+/*                StringRemove(), StringRename(), StringBeginsWith(),        */
+/*                StringContains(), StringInt(), StringFiveInt(),            */
+/*                StringQuotedWord()                                         */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*          AsciiToFull(str)          Returns ASCII string as FULL_CHARs.    */
+/*  BOOLEAN StringEqual(a, b)         TRUE if strings a and b are equal      */
+/*          StringCat(a, b)           Catenate string b onto end of a        */
+/*          StringCopy(a, b)          Overwrite string a with string b       */
+/*          StringLength(a)           Length of string a                     */
+/*          StringFOpen(str, mode)    Equivalent to fopen(str, mode)         */
+/*          StringFPuts(str, fp)      Equivalent to fputs(str, fp)           */
+/*          StringFGets(str, n, fp)   Equivalent to fgets(str, n, fp)        */
+/*          StringRemove(a)           Equivalent to remove(a)                */
+/*          StringRename(a, b)        Equivalent to rename(a, b)             */
+/*                                                                           */
+/*  These procedures are defined as macros in file externs.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  int strcollcmp(char *a, char *b)                                         */
+/*                                                                           */
+/*  Written by Valery Ushakov (uwe).                                         */
+/*                                                                           */
+/*  Like strcoll, but returns 0 only iff strcmp returns 0.                   */
+/*  This allow to test for equality using only strcmp. --uwe                 */
+/*                                                                           */
+/*****************************************************************************/
+
+int strcollcmp(char *a, char *b)
+{
+  int order = strcoll (a, b);
+  if( order == 0 ) /* then disambiguate with strcmp */
+    order = strcmp (a, b);
+  return order;
+}
+
+/*@::StringBeginsWith(), StringContains(), StringInt(), StringFiveInt()@******/
+/*                                                                           */
+/*  BOOLEAN StringBeginsWith(str, pattern)                                   */
+/*  BOOLEAN StringEndsWith(str, pattern)                                     */
+/*                                                                           */
+/*  Check whether str begins with or ends with pattern.                      */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN StringBeginsWith(FULL_CHAR *str, FULL_CHAR *pattern)
+{ FULL_CHAR *sp, *pp;
+  sp = str;  pp = pattern;
+  while( *sp != '\0' && *pp != '\0' )
+  { if( *sp++ != *pp++ )  return FALSE;
+  }
+  return (*pp == '\0');
+} /* end StringBeginsWith */
+
+
+BOOLEAN StringEndsWith(FULL_CHAR *str, FULL_CHAR *pattern)
+{ FULL_CHAR *sp, *pp; int slen, plen;
+  slen = StringLength(str);
+  plen = StringLength(pattern);
+  if( slen < plen )  return FALSE;
+  sp = &str[slen - plen];  pp = pattern;
+  while( *sp != '\0' && *pp != '\0' )
+  { if( *sp++ != *pp++ )  return FALSE;
+  }
+  return (*pp == '\0');
+} /* end StringBeginsWith */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN StringContains(str, pattern)                                     */
+/*                                                                           */
+/*  Check whether str contains pattern.                                      */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN StringContains(FULL_CHAR *str, FULL_CHAR *pattern)
+{ FULL_CHAR *sp;
+  for( sp = str;  *sp != '\0';  sp++ )
+  { if( StringBeginsWith(sp, pattern) )  return TRUE;
+  }
+  return FALSE;
+} /* end StringContains */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *StringInt(i)                                                  */
+/*  FULL_CHAR *StringFiveInt(i)                                              */
+/*                                                                           */
+/*  Returns a string version of integer i.                                   */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *StringInt(int i)
+{ static FULL_CHAR buff[20];
+  sprintf( (char *) buff, "%d", i);
+  return buff;
+} /* end StringInt */
+
+FULL_CHAR *StringFiveInt(int i)
+{ static FULL_CHAR buff[20];
+  sprintf( (char *) buff, "%.5d", i);
+  return buff;
+} /* end StringInt */
+
+
+/*@::StringQuotedWord()@******************************************************/
+/*                                                                           */
+/*  static char *quoted_string[]                                             */
+/*                                                                           */
+/*  quoted_string[ch] is a string containing the representation of the       */
+/*  8-bit character ch within a quoted string in a Lout source file.         */
+/*                                                                           */
+/*****************************************************************************/
+
+static char *quoted_string[] = {
+    "\\000", "\\001", "\\002", "\\003", "\\004", "\\005", "\\006", "\\007",
+    "\\010", "\\011", "\\012", "\\013", "\\014", "\\015", "\\016", "\\017",
+    "\\020", "\\021", "\\022", "\\023", "\\024", "\\025", "\\026", "\\027",
+    "\\030", "\\031", "\\032", "\\033", "\\034", "\\035", "\\036", "\\037",
+    " ",     "!",     "\\\"",  "#",     "$",     "%",     "&",     "'",
+    "(",     ")",     "*",     "+",     ",",     "-",     ".",     "/",
+    "0",     "1",     "2",     "3",     "4",     "5",     "6",     "7",
+    "8",     "9",     ":",     ";",     "<",     "=",     ">",     "?",
+
+    "@",     "A",     "B",     "C",     "D",     "E",     "F",     "G",
+    "H",     "I",     "J",     "K",     "L",     "M",     "N",     "O",
+    "P",     "Q",     "R",     "S",     "T",     "U",     "V",     "W",
+    "X",     "Y",     "Z",     "[",     "\\\\",  "]",     "^",     "_",
+    "`",     "a",     "b",     "c",     "d",     "e",     "f",     "g",
+    "h",     "i",     "j",     "k",     "l",     "m",     "n",     "o",
+    "p",     "q",     "r",     "s",     "t",     "u",     "v",     "w",
+    "x",     "y",     "z",     "{",     "|",     "}",     "~",     "\\177",
+
+    "\\200", "\\201", "\\202", "\\203", "\\204", "\\205", "\\206", "\\207",
+    "\\210", "\\211", "\\212", "\\213", "\\214", "\\215", "\\216", "\\217",
+    "\\220", "\\221", "\\222", "\\223", "\\224", "\\225", "\\226", "\\227",
+    "\\230", "\\231", "\\232", "\\233", "\\234", "\\235", "\\236", "\\237",
+    "\\240", "\\241", "\\242", "\\243", "\\244", "\\245", "\\246", "\\247",
+    "\\250", "\\251", "\\252", "\\253", "\\254", "\\255", "\\256", "\\257",
+    "\\260", "\\261", "\\262", "\\263", "\\264", "\\265", "\\266", "\\267",
+    "\\270", "\\271", "\\272", "\\273", "\\274", "\\275", "\\276", "\\277",
+
+    "\\300", "\\301", "\\302", "\\303", "\\304", "\\305", "\\306", "\\307",
+    "\\310", "\\311", "\\312", "\\313", "\\314", "\\315", "\\316", "\\317",
+    "\\320", "\\321", "\\322", "\\323", "\\324", "\\325", "\\326", "\\327",
+    "\\330", "\\331", "\\332", "\\333", "\\334", "\\335", "\\336", "\\337",
+    "\\340", "\\341", "\\342", "\\343", "\\344", "\\345", "\\346", "\\347",
+    "\\350", "\\351", "\\352", "\\353", "\\354", "\\355", "\\356", "\\357",
+    "\\360", "\\361", "\\362", "\\363", "\\364", "\\365", "\\366", "\\367",
+    "\\370", "\\371", "\\372", "\\373", "\\374", "\\375", "\\376", "\\377",
+};
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *StringQuotedWord(x)                                           */
+/*                                                                           */
+/*  Returns the string in QWORD x in the form it would need to take if it    */
+/*  was a quoted word in a Lout source file.  Note that the result is        */
+/*  returned in a static variable so it needs to be copied before a          */
+/*  subsequent call to StringQuotedWord is made.                             */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *StringQuotedWord(OBJECT x)
+{ FULL_CHAR *p, *q, *r;
+  static FULL_CHAR buff[MAX_BUFF];
+  assert( type(x) == QWORD, "StringQuotedWord: type(x) != QWORD!" );
+  q = buff;
+  *q++ = CH_QUOTE;
+  for( p = string(x);  *p != '\0';  p++ )
+  { 
+    for( r = (FULL_CHAR *) quoted_string[*p];  *r != '\0';  *q++ = *r++ );
+  }
+  *q++ = CH_QUOTE;
+  *q++ = '\0';
+  return buff;
+} /* StringQuotedWord */
diff --git a/z40.c b/z40.c
new file mode 100644
index 0000000..4998849
--- /dev/null
+++ b/z40.c
@@ -0,0 +1,255 @@
+/*@z40.c:Filter Handler:FilterInit()@*****************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z40.c                                                      */
+/*  MODULE:       Filter Handler                                             */
+/*  EXTERNS:      FilterInit(), FilterCreate(), FilterSetFileNames(),        */
+/*                FilterExecute(), FilterWrite(), FilterScavenge()           */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+static int	filter_count;		/* number of filter files            */
+static OBJECT	filter_active;		/* the active filter file records    */
+static OBJECT	filter_in_filename;	/* initial name of filter input file */
+static OBJECT	filter_out_filename;	/* initial name of filter ouput file */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FilterInit()                                                             */
+/*                                                                           */
+/*  Initialize this module.                                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void FilterInit(void)
+{ filter_count = 0;
+  New(filter_active, ACAT);
+  sym_body(FilterInSym)  = MakeWord(WORD, FILTER_IN,  no_fpos);
+  sym_body(FilterOutSym) = MakeWord(WORD, FILTER_OUT, no_fpos);
+  sym_body(FilterErrSym) = MakeWord(WORD, FILTER_ERR, no_fpos);
+  filter_in_filename = sym_body(FilterInSym);
+  filter_out_filename = sym_body(FilterOutSym);
+} /* end FilterInit */
+
+
+/*@::FilterCreate(), FilterSetFileNames()@************************************/
+/*                                                                           */
+/*  OBJECT FilterCreate(use_begin, act, xfpos)                               */
+/*                                                                           */
+/*  Create and return a new FILTERED object.  Open the corresponding file    */
+/*  for writing and dump the parameter text to be filtered into it.          */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT FilterCreate(BOOLEAN use_begin, OBJECT act, FILE_POS *xfpos)
+{ FULL_CHAR buff[MAX_LINE];  FILE *fp;  OBJECT x, res, junk;
+  debug3(DFH, D, "FilterCreate(%s, %s, %s)", bool(use_begin),
+    SymName(act), EchoFilePos(xfpos));
+  New(res, FILTERED);
+  FposCopy(fpos(res), *xfpos);
+  ++filter_count;
+  sprintf( (char *) buff, "%s%d", FILTER_IN, filter_count);
+  fp = StringFOpen(buff, WRITE_TEXT);
+  if( fp == NULL )
+    Error(40, 1, "cannot open temporary filter file %s", FATAL, xfpos, buff);
+  x = MakeWord(WORD, buff, xfpos);
+  filter_use_begin(x) = use_begin;
+  filter_actual(x) = act;
+  Link(res, x);
+  Link(filter_active, x);
+  junk = LexScanVerbatim(fp, use_begin, xfpos, FALSE);
+  fclose(fp);
+  sprintf( (char *) buff, "%s%d", FILTER_OUT, filter_count);
+  x = MakeWord(WORD, buff, xfpos);
+  Link(res, x);
+  debug2(DFH, D, "FilterCreate returning %d %s", (int) res, EchoObject(res));
+  return res;
+} /* end FilterCreate */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FilterSetFileNames(x)                                                    */
+/*                                                                           */
+/*  Set @FilterIn, @FilterOut, and @FilterErr to suitable values for the     */
+/*  manifesting of the command which runs filter x.                          */
+/*                                                                           */
+/*****************************************************************************/
+
+void FilterSetFileNames(OBJECT x)
+{ OBJECT y;
+  assert( type(x) == FILTERED, "FilterSetFileNames: type(x)!" );
+  assert( Down(x) != x, "FilterSetFileNames: x has no children!" );
+  debug2(DFH, D, "FilterSetFileNames(%d %s)", (int) x, EchoObject(x));
+  Child(y, Down(x));
+  assert( type(y) == WORD, "FilterSetFileNames: type(y)!" );
+  sym_body(FilterInSym) = y;
+  Child(y, NextDown(Down(x)));
+  assert( type(y) == WORD, "FilterSetFileNames: type(y) (2)!" );
+  sym_body(FilterOutSym) = y;
+  debug0(DFH, D, "FilterSetFileNames returning.");
+} /* end FilterSetFileNames */
+
+
+/*@::FilterExecute()@*********************************************************/
+/*                                                                           */
+/*  OBJECT FilterExecute(x, command, env)                                    */
+/*                                                                           */
+/*  Execute the filter command on FILTERED object x, and return the result.  */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT FilterExecute(OBJECT x, FULL_CHAR *command, OBJECT env)
+{ int i, count, status;  OBJECT t, res;  char line[MAX_LINE];
+  FILE *err_fp;  FILE_NUM filter_out_file;
+
+  assert( type(x) == FILTERED, "FilterExecute: type(x)!" );
+  assert( type(env) == ENV, "FilterExecute: type(env)!" );
+  debug4(DFH, D, "FilterExecute(%d %s, \"%s\", %s)", (int) x, EchoObject(x),
+    command, EchoObject(env));
+
+  /* reset FilterInSym since Manifest of @Filter is now complete */
+  sym_body(FilterInSym) = filter_in_filename;
+
+  if( SafeExecution )
+  {
+    /* if safe execution, print error message and return empty object */
+    Error(40, 2, "safe execution prohibiting command: %s", WARN, &fpos(x),
+      command);
+    res = MakeWord(WORD, STR_EMPTY, &fpos(x));
+  }
+  else
+  {
+    /* execute the command, echo error messages, and exit if status problem */
+    status = system( (char *) command);
+    err_fp = StringFOpen(FILTER_ERR, READ_TEXT);
+    if( err_fp != NULL )
+    { while( fgets(line, MAX_LINE, err_fp) != NULL )
+      { if( line[strlen(line)-1] == '\n' )
+	  line[strlen(line)-1] = '\0';
+        Error(40, 3, "%s", WARN, &fpos(x), line);
+      }
+      fclose(err_fp);
+      StringRemove(FILTER_ERR);
+    }
+    if( status != 0 )
+      Error(40, 4, "failure (non-zero status) of filter: %s",
+        FATAL, &fpos(x), command);
+
+    /* read in output of system command as a Lout object */
+    SwitchScope(nilobj);
+    count = 0;
+    SetScope(env, &count, TRUE);
+    debug0(DFS, D, "  calling DefineFile from FilterExecute");
+    filter_out_file =
+      DefineFile(string(sym_body(FilterOutSym)), STR_EMPTY, &fpos(x),
+        FILTER_FILE, SOURCE_PATH);
+    LexPush(filter_out_file, 0, FILTER_FILE, 1, FALSE);
+    t = NewToken(BEGIN, &fpos(x), 0, 0, BEGIN_PREC, FilterOutSym);
+    res = Parse(&t, nilobj, FALSE, FALSE);
+    LexPop();
+    for( i = 1;  i <= count;  i++ )  PopScope();
+    UnSwitchScope(nilobj);
+    StringRemove(string(sym_body(FilterOutSym)));
+    sym_body(FilterOutSym) = filter_out_filename;
+  }
+
+  debug1(DFH, D, "FilterExecute returning %s", EchoObject(res));
+  return res;
+} /* end FilterExecute */
+
+
+/*@::FilterWrite(), FilterScavenge()@*****************************************/
+/*                                                                           */
+/*  FilterWrite(x, fp, linecount)                                            */
+/*                                                                           */
+/*  Write out the active FILTERED object x by copying the file.              */
+/*  Increment *linecount by the number of lines written.                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void FilterWrite(OBJECT x, FILE *fp, int *linecount)
+{ FILE *in_fp;  OBJECT y;  int ch;
+  assert( type(x) == FILTERED, "FilterWrite: type(x)!" );
+  debug2(DFH, D, "[ FilterWrite(%d %s, fp)", (int) x, EchoObject(x));
+  Child(y, Down(x));
+  in_fp = StringFOpen(string(y), READ_TEXT);
+  if( in_fp == NULL )
+    Error(40, 5, "cannot read filter temporary file %s",
+      FATAL, &fpos(x), string(y));
+  if( filter_use_begin(y) )
+  { StringFPuts(KW_BEGIN, fp);
+    StringFPuts("\n", fp);
+    *linecount += 1;
+    while( (ch = getc(in_fp)) != EOF )
+    { putc(ch, fp);
+      if( ch == '\n' )  *linecount += 1;
+    }
+    StringFPuts(KW_END, fp);
+    StringFPuts(" ", fp);
+    StringFPuts(SymName(filter_actual(y)), fp);
+  }
+  else
+  { StringFPuts(KW_LBR, fp);
+    StringFPuts("\n", fp);
+    *linecount += 1;
+    while( (ch = getc(in_fp)) != EOF )
+    { putc(ch, fp);
+      ifdebug(DFH, D, putc(ch, stderr));
+      if( ch == '\n' )  *linecount += 1;
+    }
+    StringFPuts(KW_RBR, fp);
+  }
+  StringFPuts("\n", fp);
+  *linecount += 1;
+  fclose(in_fp);
+  debug0(DFH, D, "] FilterWrite returning.");
+} /* end FilterWrite */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FilterScavenge(all)                                                      */
+/*                                                                           */
+/*  Unlink unneeded filter files, or all remaining filter files if all.      */
+/*                                                                           */
+/*****************************************************************************/
+
+void FilterScavenge(BOOLEAN all)
+{ OBJECT y, link, nextlink;
+  debug1(DFH, D, "FilterScavenge(%s)", bool(all));
+  for( link = Down(filter_active);  link != filter_active;  link = nextlink )
+  { Child(y, link);
+    nextlink = NextDown(link);
+    if( all || Up(y) == LastUp(y) )
+    { debug1(DFH, D, "FilterScavenge scavenging %s", string(y));
+      StringRemove(string(y));
+      DisposeChild(link);
+    }
+  }
+  debug0(DFH, D, "FilterScavenge returning.");
+} /* end FilterScavenge */
diff --git a/z41.c b/z41.c
new file mode 100644
index 0000000..a276a02
--- /dev/null
+++ b/z41.c
@@ -0,0 +1,721 @@
+/*@z41.c:Object Input-Output:AppendToFile, ReadFromFile@**********************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z41.c                                                      */
+/*  MODULE:       Object Input-Output                                        */
+/*  EXTERNS:      ReadFromFile(), AppendToFile(), CloseFiles()               */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+static FILE_NUM	last_write_fnum = NO_FILE;
+static FILE	*last_write_fp  = null;
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT ReadFromFile(fnum, pos, lnum)                                     */
+/*                                                                           */
+/*  Read an object from file fnum starting at position pos.                  */
+/*  The object may include @Env operators defining its environment, or       */
+/*  not, but in any case ReadFromFile assumes that the correct scope is set. */
+/*  lnum is the line number of the spot you end up at when you seek to pos.  */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT ReadFromFile(FILE_NUM fnum, long pos, int lnum)
+{ OBJECT t, res;
+#if DEBUG_ON
+  int ipos;
+#endif
+  ifdebug(DPP, D, ProfileOn("ReadFromFile"));
+  ifdebug(DIO, D, ipos = (int) pos);
+  debug3(DIO, D, "ReadFromFile(%s, %d, %d)", FileName(fnum), ipos, lnum);
+  LexPush(fnum, (int) pos, DATABASE_FILE, lnum, FALSE);
+  t = LexGetToken();
+  if( type(t) != LBR )
+  { debug1(DIO, D, "  following because type(t) = %s", Image(type(t)));
+    Error(41, 1, "database index file seems to be out of date",
+      FATAL, &fpos(t));
+  }
+  res = Parse(&t, StartSym, FALSE, FALSE);
+  if( t != nilobj || type(res) != CLOSURE )
+  { debug1(DIO, D, "  following because of %s", t!=nilobj ? "t" : "type(res)");
+    Error(41, 2, "syntax error in database file", FATAL, &fpos(res));
+  }
+  LexPop();
+  debug1(DIO, D, "ReadFromFile returning %s", EchoObject(res));
+  ifdebug(DPP, D, ProfileOff("ReadFromFile"));
+  return res;
+} /* end ReadFromFile */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static Optimize(x, env)                                                  */
+/*                                                                           */
+/*****************************************************************************/
+static void OptimizeParameterList(OBJECT x, OBJECT env);
+
+static void Optimize(OBJECT x, OBJECT env)
+{ OBJECT tmp;
+  if( Down(x) != x )
+  { OptimizeParameterList(x, env);
+  }
+  tmp = ParameterCheck(x, env);
+  if( tmp != nilobj )
+  { ReplaceNode(tmp, x);
+    DisposeObject(x);
+  }
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OptimizeParameterList(x, env)                                            */
+/*                                                                           */
+/*  Optimize the space required to print the parameters of x by evaluating   */
+/*  them in environment env if this is feasible.                             */
+/*                                                                           */
+/*****************************************************************************/
+
+static void OptimizeParameterList(OBJECT x, OBJECT env)
+{ OBJECT y, z, link, t, tlink;
+  assert( type(x) == CLOSURE, "OptimizeParameterList: type(x) != CLOSURE!" );
+  if( env == nilobj )  return;
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( type(y) == PAR )
+    { Child(z, Down(y));
+      if( type(z) == CLOSURE )
+      {
+	Optimize(z, env);
+      }
+      else if( type(z) == ACAT )
+      { for( tlink = Down(z);  tlink != z;  tlink = NextDown(tlink) )
+        { Child(t, Down(tlink));
+          if( type(t) == CLOSURE )
+	    Optimize(t, env);
+        }
+      }
+    }
+  }
+} /* end OptimizeParameter */
+
+
+/*@::WriteClosure()@**********************************************************/
+/*                                                                           */
+/*  static WriteClosure(x, linecount, fnum, env)                             */
+/*                                                                           */
+/*  Write closure x to file last_write_fp, without enclosing braces and      */
+/*  without any environment attached.  If x happens to be a closure that     */
+/*  was previously read as a @Use clause, write only @LUse and the name.     */
+/*  Increment *linecount by the number of lines written.                     */
+/*  The file being written to is fnum; the environment is env (for optim.)   */
+/*                                                                           */
+/*****************************************************************************/
+static void WriteObject(OBJECT x, int outer_prec, int *linecount, FILE_NUM fnum);
+
+static BOOLEAN need_lvis(OBJECT sym)	/* true if @LVis needed before sym */
+{ return !visible(sym) &&
+	 enclosing(sym) != StartSym &&
+	 type(enclosing(sym)) == LOCAL;
+} /* end need_lvis */
+
+static void WriteClosure(OBJECT x, int *linecount, FILE_NUM fnum, OBJECT env)
+{ OBJECT y, link, z, sym;
+  BOOLEAN npar_written, name_printed;
+  debug2(DIO, D, "[ WriteClosure(%s %s)", Image(type(x)), EchoObject(x));
+
+  sym = actual(x);
+  /* *** if( use_invocation(sym) == x ) *** */
+  if( use_invocation(sym) != nilobj )
+  { StringFPuts(KW_LUSE, last_write_fp);
+    StringFPuts(STR_SPACE, last_write_fp);
+    StringFPuts(SymName(sym), last_write_fp);
+  }
+  else
+  { npar_written = FALSE;  name_printed = FALSE;
+    OptimizeParameterList(x, env);
+    for( link = Down(x);  link != x;  link = NextDown(link) )
+    { Child(y, link);
+      if( type(y) == PAR )  switch( type(actual(y)) )
+      {
+        case LPAR:
+      
+	  assert( Down(y) != y, "WriteObject/CLOSURE: LPAR!" );
+	  Child(z, Down(y));
+	  WriteObject(z, (int) precedence(sym), linecount, fnum);
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  break;
+
+
+        case NPAR:
+      
+	  assert( Down(y) != y, "WriteObject/CLOSURE: NPAR!" );
+	  Child(z, Down(y));
+	  if( !name_printed )
+	  { if( need_lvis(sym) )
+	    { StringFPuts(KW_LVIS, last_write_fp);
+	      StringFPuts(STR_SPACE, last_write_fp);
+	    }
+	    StringFPuts(SymName(sym), last_write_fp);
+	    name_printed = TRUE;
+	  }
+	  StringFPuts(STR_NEWLINE, last_write_fp);
+	  *linecount += 1;
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  StringFPuts(STR_SPACE, last_write_fp);
+
+	  if( npar_code(actual(y)) != ' ' )
+	  { StringFPuts(STR_ESCAPE, last_write_fp);
+	    fprintf(last_write_fp, "%c", (char) npar_code(actual(y)));
+	  }
+	  else
+	  { StringFPuts(SymName(actual(y)), last_write_fp);
+	  }
+
+	  StringFPuts(KW_LBR, last_write_fp);
+	  WriteObject(z, NO_PREC, linecount, fnum);
+	  StringFPuts(KW_RBR, last_write_fp);
+	  npar_written = TRUE;
+	  break;
+
+
+        case RPAR:
+      
+	  assert( Down(y) != y, "WriteObject/CLOSURE: RPAR!" );
+	  Child(z, Down(y));
+	  if( !name_printed )
+	  { if( need_lvis(sym) )
+	    { StringFPuts(KW_LVIS, last_write_fp);
+	      StringFPuts(STR_SPACE, last_write_fp);
+	    }
+	    StringFPuts(SymName(sym), last_write_fp);
+	    name_printed = TRUE;
+	  }
+	  if( npar_written )
+	  { StringFPuts(STR_NEWLINE, last_write_fp);
+	    *linecount += 1;
+	  }
+	  else
+	  { StringFPuts(STR_SPACE, last_write_fp);
+	  }
+	  /* old version: if( filter(sym) != nilobj ) */
+	  if( filter(sym) != nilobj && type(z) == FILTERED ) /* ??? */
+	  {
+	    debug1(DIO, D, "  filter(sym) != nilobj, type(z) == %s",
+	      Image(type(z)));
+	    assert( type(z) == FILTERED, "WriteClosure:  filter!" );
+	    WriteObject(z, NO_PREC, linecount, fnum);
+	  }
+	  else if( has_body(sym) )
+	  {
+	    StringFPuts(KW_LBR, last_write_fp);
+	    StringFPuts(STR_SPACE, last_write_fp);
+	    WriteObject(z, NO_PREC, linecount, fnum);
+	    StringFPuts(STR_SPACE, last_write_fp);
+	    StringFPuts(KW_RBR, last_write_fp);
+	  }
+	  else WriteObject(z, (int) precedence(sym), linecount, fnum);
+	  break;
+
+
+        default:
+      
+	  assert1(FALSE, "WriteClosure:", Image(type(actual(y))));
+	  break;
+
+      } /* end switch */
+    } /* end for each parameter */
+    if( !name_printed )
+    { if( need_lvis(sym) )
+      { StringFPuts(KW_LVIS, last_write_fp);
+        StringFPuts(STR_SPACE, last_write_fp);
+      }
+      StringFPuts(SymName(sym), last_write_fp);
+      name_printed = TRUE;
+    }
+  }
+  debug0(DIO, D, "] WriteClosure returning");
+} /* end WriteClosure */
+
+
+/*@::WriteObject()@***********************************************************/
+/*                                                                           */
+/*  static WriteObject(x, outer_prec, linecount, fnum)                       */
+/*                                                                           */
+/*  Write object x to file last_write_fp, assuming it is a subobject of an   */
+/*  object and the precedence of operators enclosing it is outer_prec.       */
+/*  Increment *linecount by the number of lines written.                     */
+/*  The file being written to is fnum.                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+static void WriteObject(OBJECT x, int outer_prec, int *linecount, FILE_NUM fnum)
+{ OBJECT link, y, z, gap_obj, sym, env;  FULL_CHAR *name; int offset, lnum;
+  int prec, i, last_prec;  BOOLEAN braces_needed;
+  debug2(DIO, D, "[ WriteObject(%s %s)", Image(type(x)), EchoObject(x));
+  switch( type(x) )
+  {
+
+    case WORD:
+
+      if( StringLength(string(x)) == 0 && outer_prec > ACAT_PREC )
+      { StringFPuts(KW_LBR, last_write_fp);
+	StringFPuts(KW_RBR, last_write_fp);
+      }
+      else StringFPuts(string(x), last_write_fp);
+      break;
+
+    
+    case QWORD:
+
+      StringFPuts(StringQuotedWord(x), last_write_fp);
+      break;
+
+    
+    case VCAT:  prec = VCAT_PREC;  goto ETC;
+    case HCAT:  prec = HCAT_PREC;  goto ETC;
+    case ACAT:  prec = ACAT_PREC;  goto ETC;
+
+      ETC:
+      if( prec < outer_prec )  StringFPuts(KW_LBR, last_write_fp);
+      last_prec = prec;
+      for( link = Down(x);  link != x;  link = NextDown(link) )
+      {	Child(y, link);
+	if( type(y) == GAP_OBJ )
+	{ if( Down(y) == y )
+	  { assert( type(x) == ACAT, "WriteObject: Down(y) == y!" );
+	    for( i = 1;  i <= vspace(y);  i++ )
+	      StringFPuts(STR_NEWLINE, last_write_fp);
+	    *linecount += vspace(y);
+	    for( i = 1;  i <= hspace(y);  i++ )
+	      StringFPuts(STR_SPACE,  last_write_fp);
+	    last_prec = (vspace(y) + hspace(y) == 0) ? JUXTA_PREC : ACAT_PREC;
+	  }
+	  else
+	  { Child(gap_obj, Down(y));
+	    if( type(x)==ACAT )
+	      StringFPuts(STR_SPACE, last_write_fp);
+	    else
+	    { StringFPuts(STR_NEWLINE, last_write_fp);
+	      *linecount += 1;
+	    }
+	    StringFPuts(EchoCatOp(type(x), mark(gap(y)), join(gap(y))),
+	      last_write_fp);
+	    if( !is_word(type(gap_obj)) || StringLength(string(gap_obj)) != 0 )
+		WriteObject(gap_obj, FORCE_PREC, linecount, fnum);
+	    StringFPuts(STR_SPACE, last_write_fp);
+	    last_prec = prec;
+	  }
+	}
+	else
+	{ if( type(x) == ACAT )
+	  { OBJECT next_gap;  int next_prec;
+	    if( NextDown(link) != x )
+	    { Child(next_gap, NextDown(link));
+	      assert( type(next_gap) == GAP_OBJ, "WriteObject: next_gap!" );
+	      next_prec = (vspace(next_gap) + hspace(next_gap) == 0)
+				? JUXTA_PREC : ACAT_PREC;
+	    }
+	    else next_prec = prec;
+	    WriteObject(y, find_max(last_prec, next_prec), linecount, fnum);
+	  }
+	  else WriteObject(y, prec, linecount, fnum);
+	}
+      }
+      if( prec < outer_prec )  StringFPuts(KW_RBR, last_write_fp);
+      break;
+
+
+    case ENV:
+
+      if( Down(x) == x )
+      {
+	/* environment is empty */
+	StringFPuts(KW_ENVC, last_write_fp);
+	StringFPuts(STR_NEWLINE, last_write_fp);
+	*linecount += 1;
+      }
+      else if( EnvWriteRetrieve(x, fnum, &offset, &lnum) )
+      {
+	/* environment was previously written to this file */
+	StringFPuts(KW_ENVD, last_write_fp);
+	fprintf(last_write_fp, " \"%d %d\"", offset, lnum);
+	StringFPuts(STR_NEWLINE, last_write_fp);
+	*linecount += 1;
+      }
+      else
+      {
+	/* record the position of this environment */
+	EnvWriteInsert(x, fnum, (int) ftell(last_write_fp), *linecount);
+
+	/* write the environment */
+	if( Down(x) == LastDown(x) )
+        {
+	  /* envt contains just one closure (with its environment) */
+	  Child(y, Down(x));
+	  assert( type(y) == CLOSURE, "WriteObject: ENV/CLOSURE!" );
+	  StringFPuts(KW_LBR, last_write_fp);
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  StringFPuts(KW_ENVA, last_write_fp);
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  StringFPuts(KW_LBR, last_write_fp);
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  WriteObject(y, NO_PREC, linecount, fnum);
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  StringFPuts(KW_RBR, last_write_fp);
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  StringFPuts(KW_RBR, last_write_fp);
+	  StringFPuts(STR_NEWLINE, last_write_fp);
+	  *linecount += 1;
+        }
+        else
+        {
+	  /* envt contains a closure (with envt) plus an environment */
+	  Child(env, LastDown(x));
+	  assert( type(env) == ENV, "WriteObject: ENV/ENV!" );
+	  StringFPuts(KW_LBR, last_write_fp);
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  StringFPuts(KW_ENVB, last_write_fp);
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  StringFPuts(KW_LBR, last_write_fp);
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  WriteObject(env, NO_PREC, linecount, fnum);
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  StringFPuts(KW_RBR, last_write_fp);
+	  StringFPuts(STR_NEWLINE, last_write_fp);
+	  *linecount += 1;
+	  Child(y, Down(x));
+	  assert( type(y) == CLOSURE, "WriteObject: ENV/ENV+CLOSURE!" );
+	  StringFPuts(KW_LBR, last_write_fp);
+	  WriteObject(y, NO_PREC, linecount, fnum);
+	  StringFPuts(KW_RBR, last_write_fp);
+	  StringFPuts(STR_SPACE, last_write_fp);
+	  StringFPuts(KW_RBR, last_write_fp);
+	  StringFPuts(STR_NEWLINE, last_write_fp);
+	  *linecount += 1;
+        }
+      }
+      break;
+
+
+    case CLOSURE:
+
+      sym = actual(x);  env = nilobj;
+      if( LastDown(x) != x )
+      {	Child(y, LastDown(x));
+	if( type(y) == ENV )  env = y;
+      }
+
+      braces_needed = env != nilobj ||
+	(precedence(sym) <= outer_prec && (has_lpar(sym) || has_rpar(sym))) ||
+	outer_prec >= JUXTA_PREC;
+
+      /* print environment */
+      if( env != nilobj )
+      {	StringFPuts(KW_CENV, last_write_fp);
+	StringFPuts(STR_SPACE, last_write_fp);
+	StringFPuts(KW_LBR, last_write_fp);
+      	StringFPuts(STR_NEWLINE, last_write_fp);
+	*linecount += 1;
+	WriteObject(env, NO_PREC, linecount, fnum);
+        StringFPuts(KW_RBR, last_write_fp);
+      	StringFPuts(STR_NEWLINE, last_write_fp);
+	*linecount += 1;
+      }
+
+      /* print left brace if needed */
+      if( braces_needed )  StringFPuts(KW_LBR, last_write_fp);
+	
+      /* print the closure proper */
+      WriteClosure(x, linecount, fnum, env);
+
+      /* print closing brace if needed */
+      if( braces_needed )  StringFPuts(KW_RBR, last_write_fp);
+
+      /* print closing environment if needed */
+      /* ***
+      if( env != nilobj )
+      { StringFPuts(KW_RBR, last_write_fp);
+	StringFPuts(STR_NEWLINE, last_write_fp);
+	*linecount += 1;
+      }
+      *** */
+      break;
+
+
+    case CROSS:
+    case FORCE_CROSS:
+
+      Child(y, Down(x));
+      assert( type(y) == CLOSURE, "WriteObject/CROSS: type(y) != CLOSURE!" );
+      if( DEFAULT_PREC <= outer_prec )  StringFPuts(KW_LBR, last_write_fp);
+      if( need_lvis(actual(y)) )
+      { StringFPuts(KW_LVIS, last_write_fp);
+        StringFPuts(STR_SPACE, last_write_fp);
+      }
+      StringFPuts(SymName(actual(y)), last_write_fp);
+      StringFPuts(type(x) == CROSS ? KW_CROSS : KW_FORCE_CROSS, last_write_fp);
+      Child(y, LastDown(x));
+      WriteObject(y, FORCE_PREC, linecount, fnum);
+      if( DEFAULT_PREC <= outer_prec )  StringFPuts(KW_RBR, last_write_fp);
+      break;
+
+
+    case NULL_CLOS:	name = KW_NULL;		goto SETC;
+    case PAGE_LABEL:	name = KW_PAGE_LABEL;	goto SETC;
+    case ONE_COL:	name = KW_ONE_COL;	goto SETC;
+    case ONE_ROW:	name = KW_ONE_ROW;	goto SETC;
+    case WIDE:		name = KW_WIDE;		goto SETC;
+    case HIGH:		name = KW_HIGH;		goto SETC;
+    case HSHIFT:	name = KW_HSHIFT;	goto SETC;
+    case VSHIFT:	name = KW_VSHIFT;	goto SETC;
+    case HSCALE:	name = KW_HSCALE;	goto SETC;
+    case VSCALE:	name = KW_VSCALE;	goto SETC;
+    case HCOVER:	name = KW_HCOVER;	goto SETC;
+    case VCOVER:	name = KW_VCOVER;	goto SETC;
+    case SCALE:		name = KW_SCALE;	goto SETC;
+    case KERN_SHRINK:	name = KW_KERN_SHRINK;	goto SETC;
+    case HCONTRACT:	name = KW_HCONTRACT;	goto SETC;
+    case VCONTRACT:	name = KW_VCONTRACT;	goto SETC;
+    case HLIMITED:	name = KW_HLIMITED;	goto SETC;
+    case VLIMITED:	name = KW_VLIMITED;	goto SETC;
+    case HEXPAND:	name = KW_HEXPAND;	goto SETC;
+    case VEXPAND:	name = KW_VEXPAND;	goto SETC;
+    case START_HVSPAN:	name = KW_STARTHVSPAN;	goto SETC;
+    case START_HSPAN:	name = KW_STARTHSPAN;	goto SETC;
+    case START_VSPAN:	name = KW_STARTVSPAN;	goto SETC;
+    case HSPAN:		name = KW_HSPAN;	goto SETC;
+    case VSPAN:		name = KW_VSPAN;	goto SETC;
+    case PADJUST:	name = KW_PADJUST;	goto SETC;
+    case HADJUST:	name = KW_HADJUST;	goto SETC;
+    case VADJUST:	name = KW_VADJUST;	goto SETC;
+    case ROTATE:	name = KW_ROTATE;	goto SETC;
+    case BACKGROUND:	name = KW_BACKGROUND;	goto SETC;
+    case CASE:		name = KW_CASE;		goto SETC;
+    case YIELD:		name = KW_YIELD;	goto SETC;
+    case BACKEND:	name = KW_BACKEND;	goto SETC;
+    case XCHAR:		name = KW_XCHAR;	goto SETC;
+    case FONT:		name = KW_FONT;		goto SETC;
+    case SPACE:		name = KW_SPACE;	goto SETC;
+    case YUNIT:		name = KW_YUNIT;	goto SETC;
+    case ZUNIT:		name = KW_ZUNIT;	goto SETC;
+    case BREAK:		name = KW_BREAK;	goto SETC;
+    case UNDERLINE:	name = KW_UNDERLINE;	goto SETC;
+    case COLOUR:	name = KW_COLOUR;	goto SETC;
+    case LANGUAGE:	name = KW_LANGUAGE;	goto SETC;
+    case CURR_LANG:	name = KW_CURR_LANG;	goto SETC;
+    case CURR_FAMILY:	name = KW_CURR_FAMILY;	goto SETC;
+    case CURR_FACE:	name = KW_CURR_FACE;	goto SETC;
+    case COMMON:	name = KW_COMMON;	goto SETC;
+    case RUMP:		name = KW_RUMP;		goto SETC;
+    case MELD:		name = KW_MELD;		goto SETC;
+    case INSERT:	name = KW_INSERT;	goto SETC;
+    case ONE_OF:	name = KW_ONE_OF;	goto SETC;
+    case NEXT:		name = KW_NEXT;		goto SETC;
+    case PLUS:		name = KW_PLUS;		goto SETC;
+    case MINUS:		name = KW_MINUS;	goto SETC;
+    case OPEN:		name = KW_OPEN;		goto SETC;
+    case TAGGED:	name = KW_TAGGED;	goto SETC;
+    case INCGRAPHIC:	name = KW_INCGRAPHIC;	goto SETC;
+    case SINCGRAPHIC:	name = KW_SINCGRAPHIC;	goto SETC;
+    case PLAIN_GRAPHIC:	name = KW_PLAINGRAPHIC;	goto SETC;
+    case GRAPHIC:	name = KW_GRAPHIC;	goto SETC;
+
+      /* print left parameter, if present */
+      SETC:
+      if( DEFAULT_PREC <= outer_prec )  StringFPuts(KW_LBR, last_write_fp);
+      if( Down(x) != LastDown(x) )
+      {	Child(y, Down(x));
+	WriteObject(y, DEFAULT_PREC, linecount, fnum);
+	StringFPuts(STR_SPACE, last_write_fp);
+      }
+
+      /* print the name of the symbol */
+      StringFPuts(name, last_write_fp);
+
+      /* print right parameter, if present */
+      if( LastDown(x) != x )
+      {	Child(y, LastDown(x));
+	StringFPuts(STR_SPACE, last_write_fp);
+	if( type(x) == OPEN )
+	{ StringFPuts(KW_LBR, last_write_fp);
+	  WriteObject(y, NO_PREC, linecount, fnum);
+	  StringFPuts(KW_RBR, last_write_fp);
+	}
+	else WriteObject(y, DEFAULT_PREC, linecount, fnum);
+      }
+      if( DEFAULT_PREC <= outer_prec )  StringFPuts(KW_RBR, last_write_fp);
+      break;
+
+
+    case RAW_VERBATIM:
+    case VERBATIM:
+
+      StringFPuts(type(x) == VERBATIM ? KW_VERBATIM : KW_RAWVERBATIM, last_write_fp);
+      StringFPuts(STR_SPACE, last_write_fp);
+      StringFPuts(KW_BEGIN, last_write_fp);
+      StringFPuts(STR_NEWLINE, last_write_fp);
+      Child(y, Down(x));
+      if( type(y) == WORD )
+      {
+	StringFPuts(string(y), last_write_fp);
+        StringFPuts(STR_SPACE, last_write_fp);
+      }
+      else
+      {
+	assert( type(y) == VCAT, "WriteObject/VERBATIM!" );
+	for( link = Down(y);  link != y;  link = NextDown(link) )
+	{ Child(z, link);
+	  if( type(z) == GAP_OBJ )  continue;
+	  assert( type(z) == WORD, "WriteObject/VERBATIM/WORD!");
+	  StringFPuts(string(z), last_write_fp);
+	  StringFPuts(STR_NEWLINE, last_write_fp);
+	  *linecount += 1;
+	}
+      }
+      StringFPuts(KW_END, last_write_fp);
+      StringFPuts(STR_SPACE, last_write_fp);
+      StringFPuts(type(x) == VERBATIM ? KW_VERBATIM : KW_RAWVERBATIM, last_write_fp);
+      break;
+
+
+    case FILTERED:
+
+      FilterWrite(x, last_write_fp, linecount);
+      break;
+
+
+    default:
+
+      assert1(FALSE, "WriteObject:", Image(type(x)));
+      break;
+
+  } /* end switch */
+  debug0(DIO, D, "] WriteObject returning");
+} /* end WriteObject */
+
+
+/*@::AppendToFile(), CloseFiles()@********************************************/
+/*                                                                           */
+/*  AppendToFile(x, fnum, pos, lnum)                                         */
+/*                                                                           */
+/*  Append object x to file fnum, returning its fseek position in *pos.      */
+/*  and its line number in lnum.  Record that this file has been updated.    */
+/*                                                                           */
+/*****************************************************************************/
+
+void AppendToFile(OBJECT x, FILE_NUM fnum, int *pos, int *lnum)
+{ FULL_CHAR buff[MAX_BUFF], *str;  int linecount;
+  debug2(DIO, D, "[ AppendToFile( %s, %s )", EchoObject(x), FileName(fnum));
+
+  /* open file fnum for writing */
+  if( last_write_fnum != fnum )
+  { if( last_write_fnum != NO_FILE )  fclose(last_write_fp);
+    str = FileName(fnum);
+    if( StringLength(str) + StringLength(NEW_DATA_SUFFIX) >= MAX_BUFF )
+      Error(41, 3, "file name %s%s is too long",
+	FATAL, PosOfFile(fnum), str, NEW_DATA_SUFFIX);
+    StringCopy(buff, str);  StringCat(buff, NEW_DATA_SUFFIX);
+    last_write_fp = StringFOpen(buff,
+      FileTestUpdated(fnum) ? APPEND_TEXT : WRITE_TEXT);
+    if( last_write_fp == null )
+      Error(41, 4, "cannot append to database file %s", FATAL, no_fpos, buff);
+    last_write_fnum = fnum;
+    (void) fseek(last_write_fp, 0L, SEEK_END);
+  }
+
+  /* write x out and record the fact that fnum has changed */
+  *pos = (int) ftell(last_write_fp);
+  StringFPuts(KW_LBR, last_write_fp);
+  linecount = FileGetLineCount(fnum);
+  *lnum = linecount + 1;
+  WriteObject(x, NO_PREC, &linecount, fnum);
+  StringFPuts(KW_RBR, last_write_fp);
+  StringFPuts(STR_NEWLINE, last_write_fp);
+  StringFPuts(STR_NEWLINE, last_write_fp);
+  FileSetUpdated(fnum, linecount + 2);
+  debug0(DIO, D, "] AppendToFile returning.");
+} /* end AppendToFile */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  CloseFiles()                                                             */
+/*                                                                           */
+/*  Close all files and move new versions to the names of old versions.      */
+/*                                                                           */
+/*****************************************************************************/
+
+void CloseFiles(void)
+{ FILE_NUM fnum;  FULL_CHAR oldname[MAX_BUFF], newname[MAX_BUFF];
+  FILE *fp;
+  ifdebug(DPP, D, ProfileOn("CloseFiles"));
+  debug0(DIO, D, "CloseFiles()");
+
+  /* close off last file opened by AppendToFile above */
+  if( last_write_fnum != NO_FILE )  fclose(last_write_fp);
+
+  /* get rid of old database files */
+  for( fnum=FirstFile(SOURCE_FILE);  fnum != NO_FILE;  fnum = NextFile(fnum) )
+  { StringCopy(oldname, FileName(fnum));
+    StringCat(oldname, DATA_SUFFIX);
+    debug1(DIO, D, "remove(%s)", oldname);
+    StringRemove(oldname);
+  }
+
+  /* move any new database files to the old names, if updated */
+  /* just to avoid confusion: the "new name" means the ".ldx" */
+  /* temporary file name; the "old name" means the permanent  */
+  /* name, i.e. ".ld".  So we have to move the new name to    */
+  /* the old name.                                            */
+
+  for( fnum=FirstFile(DATABASE_FILE); fnum != NO_FILE; fnum = NextFile(fnum) )
+  { if( FileTestUpdated(fnum) )
+    {
+      /* construct new and old file names */
+      StringCopy(oldname, FileName(fnum));
+      StringCopy(newname, oldname);
+      StringCat(newname, NEW_DATA_SUFFIX);
+
+      /* guaranteed portable algorithm for changing the name of file	*/
+      /* "newname" to "oldname": if "oldname" exists already, then	*/
+      /* remove it (avoids removing a non-existent file, which can	*/
+      /* be a problem); then rename "newname" to be "oldname" (avoids	*/
+      /* overwriting an existing file "oldname", another problem)	*/
+
+      if( (fp = StringFOpen(oldname, READ_TEXT)) != NULL )
+      { fclose(fp);
+	StringRemove(oldname);
+      }
+      debug2(DIO, D, "rename(%s, %s)", newname, oldname);
+      if( StringRename(newname, oldname) != 0 )
+	Error(41, 5, "rename(%s, %s) failed", INTERN, no_fpos,newname,oldname);
+    }
+  }
+  debug0(DIO, D, "CloseFiles returning.");
+  ifdebug(DPP, D, ProfileOff("CloseFiles"));
+} /* end CloseFiles */
diff --git a/z42.c b/z42.c
new file mode 100644
index 0000000..66a3c80
--- /dev/null
+++ b/z42.c
@@ -0,0 +1,243 @@
+/*@z42.c:Colour Service:ColourChange, ColourCommand@**************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z42.c                                                      */
+/*  MODULE:       Colour Service                                             */
+/*  EXTERNS:      ColourChange(), ColourCommand()                            */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define INIT_COLOUR_NUM	100
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  COLOUR_TABLE                                                             */
+/*                                                                           */
+/*  A symbol table permitting access to colour records by number or name.    */
+/*  The table will automatically enlarge to accept any number of entries,    */
+/*  but there is an arbitrary limit of 65535 colours imposed so that colour  */
+/*  numbers can be stored in 16 bit fields.                                  */
+/*                                                                           */
+/*     ctab_new(newsize)                 New empty table, newsize capacity   */
+/*     ctab_insert(x, &S)                Insert new colour object x into S   */
+/*     ctab_retrieve(str, S)             Retrieve colour object of name str  */
+/*     ctab_num(S, num)                  Retrieve colour object, number num  */
+/*     ctab_debug(S, fp)                 Debug print of table S to file fp   */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef struct
+{ int coltab_size;				/* size of table             */
+  int coltab_count;				/* number of colours held    */
+  struct coltab_rec
+  {	OBJECT	by_number;			/* colour record by number   */
+	OBJECT	by_name_hash;			/* colour record by name     */
+  } coltab[1];
+} *COLOUR_TABLE;
+
+#define	ctab_size(S)	(S)->coltab_size
+#define	ctab_count(S)	(S)->coltab_count
+#define	ctab_num(S, i)	(S)->coltab[i].by_number
+#define	ctab_name(S, i)	(S)->coltab[i].by_name_hash
+
+#define hash(pos, str, S)						\
+{ FULL_CHAR *p = str;							\
+  pos = *p++;								\
+  while( *p ) pos += *p++;						\
+  pos = pos % ctab_size(S);						\
+}
+
+static COLOUR_TABLE ctab_new(int newsize)
+{ COLOUR_TABLE S;  int i;
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_COLOUR_TAB, 1,
+    2*sizeof(int) + newsize * sizeof(struct coltab_rec)));
+  S = (COLOUR_TABLE) malloc(2*sizeof(int) + newsize * sizeof(struct coltab_rec));
+  if( S == (COLOUR_TABLE) NULL )
+    Error(42, 1, "ran out of memory when enlarging colour table",
+      FATAL, no_fpos);
+  ctab_size(S) = newsize;
+  ctab_count(S) = 0;
+  for( i = 0;  i < newsize;  i++ )
+  { ctab_num(S, i) = ctab_name(S, i) = nilobj;
+  }
+  return S;
+} /* end ctab_new */
+
+static void ctab_insert(OBJECT x, COLOUR_TABLE *S);
+
+static COLOUR_TABLE ctab_rehash(COLOUR_TABLE S, int newsize)
+{ COLOUR_TABLE NewS;  int i;
+  NewS = ctab_new(newsize);
+  for( i = 1;  i <= ctab_count(S);  i++ )
+     ctab_insert(ctab_num(S, i), &NewS);
+  for( i = 0;  i < ctab_size(S);  i++ )
+  { if( ctab_name(S, i) != nilobj )  DisposeObject(ctab_name(S, i));
+  }
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_COLOUR_TAB, -1,
+    -(2*sizeof(int) + ctab_size(S) * sizeof(struct coltab_rec))));
+  free(S);
+  return NewS;
+} /* end ctab_rehash */
+
+static void ctab_insert(OBJECT x, COLOUR_TABLE *S)
+{ int pos, num;					
+  if( ctab_count(*S) == ctab_size(*S) - 1 )	/* one less since 0 unused */
+    *S = ctab_rehash(*S, 2*ctab_size(*S));
+  num = ++ctab_count(*S);
+  if( num > MAX_COLOUR )
+    Error(42, 2, "too many colours (maximum is %d)",
+      FATAL, &fpos(x), MAX_COLOUR);
+  hash(pos, string(x), *S);
+  if( ctab_name(*S, pos) == nilobj )  New(ctab_name(*S, pos), ACAT);
+  Link(ctab_name(*S, pos), x);
+  word_colour(x) = num;
+  ctab_num(*S, num) = x;
+} /* end ctab_insert */
+
+static OBJECT ctab_retrieve(FULL_CHAR *str, COLOUR_TABLE S)
+{ OBJECT x, link, y;  int pos;
+  hash(pos, str, S);
+  x = ctab_name(S, pos);
+  if( x == nilobj )  return nilobj;
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( StringEqual(str, string(y)) )  return y;
+  }
+  return nilobj;
+} /* end ctab_retrieve */
+
+#if DEBUG_ON
+static void ctab_debug(COLOUR_TABLE S, FILE *fp)
+{ int i;  OBJECT x, link, y;
+  fprintf(fp, "  table size: %d;  current number of colours: %d\n",
+    ctab_size(S), ctab_count(S));
+  for( i = 0;  i < ctab_size(S);  i++ )
+  { x = ctab_num(S, i);
+    fprintf(fp, "  ctab_num(S, %d) = %s\n", i,
+      x == nilobj ? AsciiToFull("<nilobj>") :
+      is_word(type(x)) ? string(x) : AsciiToFull("not WORD!"));
+  }
+  fprintf(fp, "\n");
+  for( i = 0;  i < ctab_size(S);  i++ )
+  { x = ctab_name(S, i);
+    fprintf(fp, "ctab_name(S, %d) =", i);
+    if( x == nilobj )
+      fprintf(fp, " <nilobj>");
+    else if( type(x) != ACAT )
+      fprintf(fp, " not ACAT!");
+    else for( link = Down(x);  link != x;  link = NextDown(link) )
+    { Child(y, link);
+      fprintf(fp, " %s",
+	is_word(type(y)) ? string(y) : AsciiToFull("not-WORD!"));
+    }
+    fprintf(fp, "\n");
+  }
+} /* end ctab_debug */
+#endif
+
+
+static COLOUR_TABLE col_tab;
+
+/*****************************************************************************/
+/*                                                                           */
+/*  ColourInit()                                                             */
+/*                                                                           */
+/*  Initialize this module.                                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void ColourInit(void)
+{ col_tab = ctab_new(INIT_COLOUR_NUM);
+} /* end ColourInit */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  ColourChange(style, x)                                                   */
+/*                                                                           */
+/*  Change the current style to contain the colour of colour command x.      */
+/*                                                                           */
+/*****************************************************************************/
+
+void ColourChange(STYLE *style, OBJECT x)
+{ OBJECT cname;
+  debug2(DCO, D, "ColourChange(%s, %s)", EchoStyle(style), EchoObject(x));
+
+  /* if argument is not a word, fail and exit */
+  if( !is_word(type(x)) )
+  { Error(42, 3, "%s ignored (illegal left parameter)", WARN, &fpos(x),
+      KW_COLOUR);
+    debug0(DCO, D, "ColourChange returning (colour unchanged)");
+    return;
+  }
+
+  /* if argument is empty, fail and exit */
+  if( StringEqual(string(x), STR_EMPTY) )
+  { if( BackEnd != PLAINTEXT )
+      Error(42, 4, "%s ignored (empty left parameter)", WARN, &fpos(x),
+        KW_COLOUR);
+    debug0(DCO, D, "ColourChange returning (colour unchanged)");
+    return;
+  }
+
+  /* if argument is nochange, do nothing */
+  if( StringEqual(string(x), STR_COLOUR_NOCHANGE) )
+  { debug0(DCO, D, "ColourChange returning (colour nochange)");
+    return;
+  }
+
+  /* retrieve colour command if present, else insert it */
+  { cname = ctab_retrieve(string(x), col_tab);
+    if( cname == nilobj )
+    { cname = MakeWord(type(x), string(x), &fpos(x));
+      ctab_insert(cname, &col_tab);
+      colour(*style) = word_colour(cname);
+    }
+    else colour(*style) = word_colour(cname);
+  }
+
+  debug1(DCO, D, "ColourChange returning (colour = %s)", string(cname));
+  ifdebug(DCO, DD, ctab_debug(col_tab, stderr));
+} /* ColourChange */
+
+
+/*@::ColourCommand()@*********************************************************/
+/*                                                                           */
+/*  FULL_CHAR *ColourCommand(cnum)                                           */
+/*                                                                           */
+/*  Return the PostScript command for producing colour cnum.                 */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *ColourCommand(COLOUR_NUM cnum)
+{ FULL_CHAR *res;
+  debug1(DCO, D, "ColourCommand(%d)", cnum);
+  assert( cnum > 0 && cnum <= ctab_count(col_tab), "ColourCommand: number" );
+
+  res = string(ctab_num(col_tab, cnum));
+
+  debug1(DCO, D, "ColourCommand returning %s", res);
+  return res;
+} /* end ColourCommand */
diff --git a/z43.c b/z43.c
new file mode 100644
index 0000000..67013ef
--- /dev/null
+++ b/z43.c
@@ -0,0 +1,402 @@
+/*@z43.c:Language Service:LanguageChange, LanguageString@*********************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z43.c                                                      */
+/*  MODULE:       Language Service                                           */
+/*  EXTERNS:      LanguageInit(), LanguageDefine(), LanguageChange(),        */
+/*                LanguageString(), LanguageHyph()                           */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define INIT_LANGUAGE_NUM	100
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  LANGUAGE_TABLE                                                           */
+/*                                                                           */
+/*  A symbol table permitting access to language name records.               */
+/*  The table will automatically enlarge to accept any number of entries.    */
+/*                                                                           */
+/*     ltab_new(newsize)         New empty table, newsize capacity           */
+/*     ltab_insert(x, &S)        Insert new language name object x into S    */
+/*     ltab_retrieve(str, S)     Retrieve language name object named str     */
+/*     ltab_debug(S, fp)         Debug print of table S to file fp           */
+/*                                                                           */
+/*****************************************************************************/
+
+typedef struct
+{ int langtab_size;				/* size of table             */
+  int langtab_count;				/* number of objects held    */
+  OBJECT langtab_item[1];
+} *LANGUAGE_TABLE;
+
+#define	ltab_size(S)	(S)->langtab_size
+#define	ltab_count(S)	(S)->langtab_count
+#define	ltab_item(S, i)	(S)->langtab_item[i]
+
+#define hash(pos, str, S)						\
+{ FULL_CHAR *p = str;							\
+  pos = *p++;								\
+  while( *p ) pos += *p++;						\
+  pos = pos % ltab_size(S);						\
+}
+
+static LANGUAGE_TABLE ltab_new(int newsize)
+{ LANGUAGE_TABLE S;  int i;
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_LANG_TAB, 1,
+    2*sizeof(int) + newsize * sizeof(OBJECT)));
+  S = (LANGUAGE_TABLE)
+	  malloc(2*sizeof(int) + newsize * sizeof(OBJECT));
+  if( S == (LANGUAGE_TABLE) NULL )
+    Error(43, 1, "run out of memory enlarging language table", FATAL, no_fpos);
+  ltab_size(S) = newsize;
+  ltab_count(S) = 0;
+  for( i = 0;  i < newsize;  i++ )  ltab_item(S, i) = nilobj;
+  return S;
+} /* end ltab_new */
+
+static void ltab_insert(OBJECT x, LANGUAGE_TABLE *S);
+
+static LANGUAGE_TABLE ltab_rehash(LANGUAGE_TABLE S, int newsize)
+{ LANGUAGE_TABLE NewS;  int i;
+  NewS = ltab_new(newsize);
+  for( i = 1;  i <= ltab_size(S);  i++ )
+  { if( ltab_item(S, i) != nilobj )
+      ltab_insert(ltab_item(S, i), &NewS);
+  }
+  free(S);
+  return NewS;
+} /* end ltab_rehash */
+
+static void ltab_insert(OBJECT x, LANGUAGE_TABLE *S)
+{ int pos;  OBJECT z, link, y;
+  if( ltab_count(*S) == ltab_size(*S) - 1 )	/* one less since 0 unused */
+    *S = ltab_rehash(*S, 2*ltab_size(*S));
+  hash(pos, string(x), *S);
+  if( ltab_item(*S, pos) == nilobj )  New(ltab_item(*S, pos), ACAT);
+  z = ltab_item(*S, pos);
+  for( link = Down(z);  link != z;  link = NextDown(link) )
+  { Child(y, link);
+    if( StringEqual(string(x), string(y)) )
+    { Error(43, 2, "language name %s used twice (first at%s)",
+	FATAL, &fpos(x), string(x), EchoFilePos(&fpos(y)));
+    }
+  }
+  Link(ltab_item(*S, pos), x);
+} /* end ltab_insert */
+
+static OBJECT ltab_retrieve(FULL_CHAR *str, LANGUAGE_TABLE S)
+{ OBJECT x, link, y;  int pos;
+  hash(pos, str, S);
+  x = ltab_item(S, pos);
+  if( x == nilobj )  return nilobj;
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( StringEqual(str, string(y)) )  return y;
+  }
+  return nilobj;
+} /* end ltab_retrieve */
+
+#if DEBUG_ON
+static void ltab_debug(LANGUAGE_TABLE S, FILE *fp)
+{ int i;  OBJECT x, link, y;
+  fprintf(fp, "  table size: %d;  current number of keys: %d\n",
+    ltab_size(S), ltab_count(S));
+  for( i = 0;  i < ltab_size(S);  i++ )
+  { x = ltab_item(S, i);
+    fprintf(fp, "ltab_item(S, %d) =", i);
+    if( x == nilobj )
+      fprintf(fp, " <nilobj>");
+    else if( type(x) != ACAT )
+      fprintf(fp, " not ACAT!");
+    else for( link = Down(x);  link != x;  link = NextDown(link) )
+    { Child(y, link);
+      fprintf(fp, " %s",
+	is_word(type(y)) ? string(y) : AsciiToFull("not-WORD!"));
+    }
+    fprintf(fp, "\n");
+  }
+} /* end ltab_debug */
+#endif
+
+
+static	LANGUAGE_TABLE	names_tab;		/* the language names        */
+static	OBJECT		*hyph_tab;		/* arry of hyph filenames    */
+static	OBJECT		*canonical_tab;		/* array of lang names       */
+static	int		lang_tabsize;		/* size of prev two arrays   */
+static	int		lang_count;		/* number of languages       */
+static	OBJECT		lang_ends[MAX_LANGUAGE];/* sentence endings        */
+
+/*@@**************************************************************************/
+/*                                                                           */
+/*  BOOLEAN LanguageSentenceEnds[]                                           */
+/*                                                                           */
+/*  LanguageSentenceEnds[ch] is TRUE if there exists a language in which     */
+/*  character ch could occur at the end of a sentence.                       */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN LanguageSentenceEnds[MAX_CHARS];
+
+
+/*@::LanguageInit(), LanguageDefine()@****************************************/
+/*                                                                           */
+/*  LanguageInit()                                                           */
+/*                                                                           */
+/*  Initialize this module.                                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void LanguageInit(void)
+{ int i;
+  debug0(DLS, D, "LanguageInit()");
+  names_tab = ltab_new(INIT_LANGUAGE_NUM);
+  lang_count = 0;
+  lang_tabsize = INIT_LANGUAGE_NUM;
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_LANG_TAB, 0,
+    INIT_LANGUAGE_NUM * sizeof(OBJECT)));
+  hyph_tab = (OBJECT *) malloc(INIT_LANGUAGE_NUM * sizeof(OBJECT));
+  ifdebug(DMA, D, DebugRegisterUsage(MEM_LANG_TAB, 0,
+    INIT_LANGUAGE_NUM * sizeof(OBJECT)));
+  canonical_tab = (OBJECT *) malloc(INIT_LANGUAGE_NUM * sizeof(OBJECT));
+  for( i = 0;  i < MAX_CHARS;  i++ )  LanguageSentenceEnds[i] = FALSE;
+  debug0(DLS, D, "LanguageInit returning.");
+} /* end LanguageInit */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  LanguageDefine(names, inside)                                            */
+/*                                                                           */
+/*  Define a language whose names are given by ACAT of words names, and      */
+/*  whose associated hyphenation patterns file name is hyph_file.            */
+/*                                                                           */
+/*****************************************************************************/
+
+void LanguageDefine(OBJECT names, OBJECT inside)
+{ OBJECT link, y, hyph_file;  BOOLEAN junk;  FULL_CHAR ch;
+  int len;
+  assert( names != nilobj && type(names) == ACAT, "LanguageDefine: names!");
+  assert( Down(names) != names, "LanguageDefine: names is empty!");
+  debug2(DLS, D, "LanguageDefine(%s, %s)",
+    EchoObject(names), EchoObject(inside));
+
+  /* double table size if overflow */
+  if( ++lang_count >= lang_tabsize )
+  {
+    ifdebug(DMA, D, DebugRegisterUsage(MEM_LANG_TAB, 0,
+      -lang_tabsize * sizeof(OBJECT)));
+    ifdebug(DMA, D, DebugRegisterUsage(MEM_LANG_TAB, 0,
+      -lang_tabsize * sizeof(OBJECT)));
+    lang_tabsize *= 2;
+    ifdebug(DMA, D, DebugRegisterUsage(MEM_LANG_TAB, 0,
+      lang_tabsize * sizeof(OBJECT)));
+    ifdebug(DMA, D, DebugRegisterUsage(MEM_LANG_TAB, 0,
+      lang_tabsize * sizeof(OBJECT)));
+    hyph_tab = (OBJECT *) realloc(hyph_tab, lang_tabsize * sizeof(OBJECT) );
+    canonical_tab = (OBJECT *) realloc(canonical_tab, lang_tabsize * sizeof(OBJECT) );
+  }
+
+  /* insert each language name into names_tab */
+  for( link = Down(names);  link != names;  link = NextDown(link) )
+  { Child(y, link);
+    assert( is_word(type(y)), "LanguageDefine: type(y) != WORD!" );
+    word_language(y) = lang_count;
+    ltab_insert(y, &names_tab);
+  }
+
+  /* initialize canonical language name entry */
+  Child(y, Down(names));
+  canonical_tab[lang_count] = y;
+
+  /* make inside an ACAT if it isn't already */
+  if( type(inside) != ACAT )
+  { New(y, ACAT);
+    FposCopy(fpos(y), fpos(inside));
+    Link(y, inside);
+    inside = y;
+  }
+
+  /* initialize hyphenation file entry (first child of inside) */
+  Child(hyph_file, Down(inside));
+  DeleteLink(Down(inside));
+  if( !is_word(type(hyph_file)) )
+    Error(43, 3, "hyphenation file name expected here",
+      FATAL, &fpos(inside));
+  if( StringEqual(string(hyph_file), STR_EMPTY) ||
+      StringEqual(string(hyph_file), STR_HYPHEN) )
+  { Dispose(hyph_file);
+    hyph_tab[lang_count] = nilobj;
+  }
+  else hyph_tab[lang_count] = hyph_file;
+
+  /* initialize sentence ends */
+  lang_ends[lang_count] = inside;
+  for( link = Down(inside);  link != inside;  link = NextDown(link) )
+  { Child(y, link);
+    if( type(y) == GAP_OBJ )
+    { link = PrevDown(link);
+      DisposeChild(NextDown(link));
+      continue;
+    }
+    if( !is_word(type(y)) )
+    { debug2(DLS, D, "word patterns failing on %s %s", Image(type(y)),
+	EchoObject(y));
+      Error(43, 4, "expected word ending pattern here", FATAL, &fpos(y));
+    }
+    len = StringLength(string(y));
+    if( len == 0 )
+      Error(43, 5, "empty word ending pattern", FATAL, &fpos(y));
+    ch = string(y)[len - 1];
+    LanguageSentenceEnds[ch] = TRUE;
+  }
+
+  /* if initializing run, initialize the hyphenation table */
+  if( InitializeAll )
+  { if( hyph_tab[lang_count] != nilobj )
+    junk = ReadHyphTable(lang_count);
+  }
+
+  debug0(DLS, D, "LanguageDefine returning.");
+} /* end LanguageDefine */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN LanguageWordEndsSentence(OBJECT wd, BOOLEAN lc_prec)             */
+/*                                                                           */
+/*  Returns TRUE if word ends a sentence in the current language.  This is   */
+/*  so if it ends with a string in the list associated with the current      */
+/*  language.  If lc_prec is TRUE, it is also necessary for the character    */
+/*  preceding this suffix to be lower-case.                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN LanguageWordEndsSentence(OBJECT wd, BOOLEAN lc_prec)
+{ OBJECT x, y, link;  int pos;
+  assert( is_word(type(wd)), "LanguageWordEndsSentence: wd!" );
+  debug2(DLS, D, "LanguageWordEndsSentence(%d %s)",
+    word_language(wd), EchoObject(wd));
+  x = lang_ends[word_language(wd)];
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( StringEndsWith(string(wd), string(y)) )
+    {
+      if( !lc_prec )
+      { debug0(DLS, D, "LanguageWordEndsSentence returning TRUE (!lc_prec)");
+        return TRUE;
+      }
+
+      /* now check whether the preceding character is lower case */
+      pos = StringLength(string(wd)) - StringLength(string(y)) - 1;
+      if( pos >= 0 &&
+	MapIsLowerCase(string(wd)[pos], FontMapping(word_font(wd), &fpos(wd))))
+      {
+        debug0(DLS, D, "LanguageWordEndsSentence returning TRUE (!lc_prec)");
+        return TRUE;
+      }
+    }
+  }
+  debug0(DLS, D, "LanguageWordEndsSentence returning FALSE");
+  return FALSE;
+} /* end LanguageWordEndsSentence */
+
+
+/*@::LanguageChange(), LanguageString(), LanguageHyph()@**********************/
+/*                                                                           */
+/*  LanguageChange(style, x)                                                 */
+/*                                                                           */
+/*  Change the current style to contain the language of language command x.  */
+/*                                                                           */
+/*****************************************************************************/
+
+void LanguageChange(STYLE *style, OBJECT x)
+{ OBJECT lname;
+  debug2(DLS, D, "LanguageChange(%s, %s)", EchoStyle(style), EchoObject(x));
+
+  /* if argument is not a word, fail and exit */
+  if( !is_word(type(x)) )
+  { Error(43, 6, "%s ignored (illegal left parameter)", WARN, &fpos(x),
+      KW_LANGUAGE);
+    debug0(DLS, D, "LanguageChange returning (language unchanged)");
+    return;
+  }
+
+  /* if argument is empty, return unchanged */
+  if( StringEqual(string(x), STR_EMPTY) )
+  { debug0(DLS, D, "LanguageChange returning (empty, language unchanged)");
+    return;
+  }
+
+  /* retrieve language record if present, else leave style unchanged */
+  lname = ltab_retrieve(string(x), names_tab);
+  if( lname == nilobj )
+    Error(43, 7, "%s ignored (unknown language %s)", WARN, &fpos(x),
+      KW_LANGUAGE, string(x));
+  else language(*style) = word_language(lname);
+
+  debug1(DLS, D, "LanguageChange returning (language = %s)", string(lname));
+  ifdebug(DLS, DD, ltab_debug(names_tab, stderr));
+} /* LanguageChange */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *LanguageString(lnum)                                          */
+/*                                                                           */
+/*  Return the canonical name of language lnum.                              */
+/*                                                                           */
+/*****************************************************************************/
+
+FULL_CHAR *LanguageString(LANGUAGE_NUM lnum)
+{ FULL_CHAR *res;
+  debug1(DLS, D, "LanguageString(%d)", lnum);
+  assert( lnum > 0 && lnum <= lang_count, "LanguageString: unknown number" );
+
+  res = string(canonical_tab[lnum]);
+
+  debug1(DLS, D, "LanguageString returning %s", res);
+  return res;
+} /* end LanguageString */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT LanguageHyph(lnum)                                                */
+/*                                                                           */
+/*  Return the hyphenation file name object for language lnum.               */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT LanguageHyph(LANGUAGE_NUM lnum)
+{ OBJECT res;
+  debug1(DLS, D, "LanguageHyph(%d)", lnum);
+  assert( lnum > 0 && lnum <= lang_count, "LanguageHyph: unknown number" );
+
+  res = hyph_tab[lnum];
+
+  debug1(DLS, D, "LanguageHyph returning %s", EchoObject(res));
+  return res;
+} /* end LanguageHyph */
diff --git a/z44.c b/z44.c
new file mode 100644
index 0000000..e1f056d
--- /dev/null
+++ b/z44.c
@@ -0,0 +1,572 @@
+/*@z44.c:Vertical Hyphenation:VerticalHyphenate()@****************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z44.c                                                      */
+/*  MODULE:       Vertical Hyphenation                                       */
+/*  EXTERNS:      VerticalHyphenate(), ConvertGalleyList()                   */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FirstDefiniteCompressed(x, link, y)                                      */
+/*  NextDefiniteWithGapCompressed(x, link, y, g)                             */
+/*                                                                           */
+/*  Like FirstDefinite() and NextDefiniteWithGap(), except that these        */
+/*  versions assume that x is of type VCAT, and they compress any VCAT       */
+/*  objects found within x as they go.                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+#define FirstDefiniteCompressed(x, link, y)				\
+{ BOOLEAN jn;								\
+  FirstDefinite(x, link, y, jn);					\
+  while( link != x && type(y) == VCAT )					\
+  { TransferLinks(Down(y), y, link);					\
+    DisposeChild(link);							\
+    FirstDefinite(x, link, y, jn);					\
+  }									\
+  assert( link==x || is_definite(type(y)), "FirstDefiniteCompressed!");	\
+}
+
+#define NextDefiniteWithGapCompressed(x, link, y, g)			\
+{ OBJECT start_link = PrevDown(link), ylink, yg, z;			\
+  BOOLEAN jn;								\
+  NextDefiniteWithGap(x, link, y, g, jn);				\
+  while( link != x && type(y) == VCAT )					\
+  { FirstDefinite(y, ylink, z, jn);					\
+    if( ylink != y && PrevDown(ylink) != y )				\
+    { Child(yg, PrevDown(ylink));					\
+      assert( type(yg)==GAP_OBJ && mode(gap(yg)) != NO_MODE, "NDWGC!");	\
+      MoveLink(PrevDown(ylink), Up(g), PARENT);				\
+      MoveLink(Up(g), ylink, PARENT);					\
+    }									\
+    TransferLinks(Down(y), y, link);					\
+    DisposeChild(link);							\
+    link = NextDown(start_link);					\
+    NextDefiniteWithGap(x, link, y, g, jn);				\
+  }									\
+  assert( link==x || is_definite(type(y)), "FirstDefiniteCompressed!");	\
+  assert( link==x || mode(gap(g)) != NO_MODE,				\
+    "FirstDefiniteWithGapCompressed: mode(gap(g))!" );			\
+}
+
+
+/*@@**************************************************************************/
+/*                                                                           */
+/*  OBJECT FindTarget(index)                                                 */
+/*                                                                           */
+/*  Work out what the given index is pointing at, or nilobj if nothing.      */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT FindTarget(OBJECT index)
+{ OBJECT res;
+  debug1(DVH, DD, "FindTarget(%s)", Image(type(index)));
+  switch( type(index) )
+  {
+    case DEAD:
+
+      res = nilobj;
+      break;
+
+
+    case UNATTACHED:
+    case GALL_PREC:
+    case GALL_FOLL:
+    case GALL_FOLL_OR_PREC:
+
+      res = pinpoint(index);
+      break;
+
+
+    case RECEPTIVE:
+    case RECEIVING:
+    case RECURSIVE:
+    case SCALE_IND:
+    case COVER_IND:
+    case EXPAND_IND:
+
+      res = actual(index);
+      break;
+
+
+    case PRECEDES:
+    case FOLLOWS:
+    case CROSS_TARG:
+    case CROSS_PREC:
+    case CROSS_FOLL:
+    case CROSS_FOLL_OR_PREC:
+    case PAGE_LABEL_IND:
+
+      res = nilobj;  /* somewhat doubtful */
+      break;
+
+
+    case GALL_TARG:
+
+      res = nilobj;  /* somewhat doubtful */
+      break;
+
+
+    default:
+
+      assert1(FALSE, "FindTarget: unknown index", Image(type(index)));
+      break;
+  }
+  debug1(DVH, DD, "FindTarget returning %s", EchoObject(res));
+  return res;
+} /* end FindTarget */
+
+
+/*@@**************************************************************************/
+/*                                                                           */
+/*  OBJECT WhichComponent(target)                                            */
+/*                                                                           */
+/*  Return the component of the enclosing galley that contains target,       */
+/*  or nilobj if some problem.                                               */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT WhichComponent(OBJECT target)
+{ OBJECT prnt;
+  debug1(DVH, DD, "WhichComponent(%s)", EchoObject(target));
+  while( Up(target) != target )
+  { Parent(prnt, Up(target));
+    if( type(prnt) == HEAD )
+    { debug1(DVH, DD, "WhichComponent returning %s", EchoObject(target));
+      return target;
+    }
+    target = prnt;
+  }
+  debug0(DVH, DD, "WhichComponent returning nilobj");
+  return nilobj;
+} /* end WhichComponent */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT EncloseInHcat(nxt, y, replace)                                   */
+/*                                                                           */
+/*  Enclose object nxt in an HCAT, similar to HCAT y, at position replace.  */
+/*  The link to nxt will now link to the new HCAT.                          */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT EncloseInHcat(OBJECT nxt, OBJECT y, OBJECT replace)
+{ OBJECT new_y, new_row_thread, s1, new_s1, s2, new_s2, link, sh, new_sh, tmp;
+  assert( Up(nxt) != nxt, "EncloseInHCat: Up(nxt) == nxt!" );
+  New(new_y, HCAT);
+  adjust_cat(new_y) = FALSE;
+  MoveLink(Up(nxt), new_y, CHILD);
+  assert( Up(nxt) == nxt, "EncloseInHCat: Up(nxt) != nxt!" );
+  FposCopy(fpos(new_y), fpos(y));
+  back(new_y, COLM) = back(y, COLM);
+  fwd(new_y, COLM) = fwd(y, COLM);
+  back(new_y, ROWM) = back(nxt, ROWM);
+  fwd(new_y, ROWM) = fwd(nxt, ROWM);
+  New(new_row_thread, ROW_THR);
+  back(new_row_thread, ROWM) = back(new_y, ROWM);
+  fwd(new_row_thread, ROWM) = fwd(new_y, ROWM);
+  for( link = Down(y);  link != y;  link = NextDown(link) )
+  { Child(s1, link);
+    if( type(s1) == GAP_OBJ )
+    { New(new_s1, GAP_OBJ);
+      FposCopy(fpos(new_s1), fpos(s1));
+      GapCopy(gap(new_s1), gap(s1));
+      hspace(new_s1) = hspace(s1);
+      vspace(new_s1) = vspace(s1);
+      Link(new_y, new_s1);
+      continue;
+    }
+    if( type(s1) == WIDE || type(s1) == ONE_COL )
+      Child(s2, Down(s1));
+    else s2 = s1;
+    assert( type(s2) == SPLIT, "EncloseInHcat: type(s2) != SPLIT!" );
+    Child(sh, DownDim(s2, COLM));
+    New(new_s2, SPLIT);
+    FposCopy(fpos(new_s2), fpos(s2));
+    if( s2 != s1 )
+    { New(new_s1, type(s1));
+      back(new_s1, COLM) = back(s1, COLM);
+      fwd(new_s1, COLM) = fwd(s1, COLM);
+      back(new_s1, ROWM) = back(new_row_thread, COLM);
+      fwd(new_s1, ROWM) = fwd(new_row_thread, COLM);
+      Link(new_y, new_s1);
+      Link(new_s1, new_s2);
+    }
+    else Link(new_y, new_s2);
+    if( sh == replace )
+    { 
+      /* replace sh by nxt in the copy */
+      new_sh = nxt;
+      back(new_sh, COLM) = back(s2, COLM);
+      fwd(new_sh, COLM) = fwd(s2, COLM);
+    }
+    else
+    {
+      /* replace sh by an empty object of the same width in the copy */
+      New(new_sh, WIDE);
+      FposCopy(fpos(new_sh), fpos(sh));
+      SetConstraint(constraint(new_sh), back(sh,COLM),size(sh,COLM),fwd(sh,COLM));
+      back(new_sh, COLM) = back(sh, COLM);
+      fwd(new_sh, COLM) = fwd(sh, COLM);
+      back(new_sh, ROWM) = fwd(new_sh, ROWM) = 0;
+      tmp = MakeWord(WORD, STR_EMPTY, &fpos(sh));
+      back(tmp, COLM) = fwd(tmp, COLM) = 0;
+      back(tmp, ROWM) = fwd(tmp, ROWM) = 0;
+      underline(tmp) = UNDER_OFF;
+      Link(new_sh, tmp);
+    }
+    Link(new_s2, new_sh);
+    back(new_s2, COLM) = back(new_sh, COLM);
+    fwd(new_s2, COLM) = fwd(new_sh, COLM);
+    Link(new_s2, new_row_thread);
+    back(new_s2, ROWM) = back(new_row_thread, ROWM);
+    fwd(new_s2, ROWM) = fwd(new_row_thread, ROWM);
+    Link(new_row_thread, new_sh);
+  }
+  return new_y;
+} /* end EncloseInHcat */
+
+
+/*@::VerticalHyphenate()@*****************************************************/
+/*                                                                           */
+/*  BOOLEAN VerticalHyphenate(OBJECT y)                                      */
+/*                                                                           */
+/*  Attempt to vertically hyphenate galley component y, of type HCAT.        */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN VerticalHyphenate(OBJECT y)
+{ OBJECT large_comp, index, z, link, g;
+  OBJECT row_thread, s1, s2, sh, sv, shp, prev, nxt, large_comp_split;
+  FULL_LENGTH rump_fwd;
+  debug1(DVH, D, "[ VerticalHyphenate(y: %s), y =", EchoLength(size(y, ROWM)));
+  ifdebug(DVH, D, DebugObject(y));
+  debug0(DVH, DD, "galley before vertical hyphenation:");
+  ifdebug(DVH, DD, Parent(z, Up(y)); DebugGalley(z, y, 2));
+
+  /* find large_comp, the largest VCAT component, or else return FALSE */
+  row_thread = large_comp = nilobj;
+  rump_fwd = 0;
+  assert( type(y) == HCAT, "VerticalHyphenate: type(y) != HCAT!" );
+  for( link = Down(y);  link != y;  link = NextDown(link) )
+  { Child(s1, link);
+    if( type(s1) == GAP_OBJ )
+    { if( !join(gap(s1)) )
+      { debug0(DVH, D, "] VerticalHyphenate returning FALSE (not joined)");
+	return FALSE;
+      }
+      continue;
+    }
+
+    /* check that s2 is a SPLIT object whose children look right */
+    if( type(s1) == WIDE || type(s1) == ONE_COL )
+      Child(s2, Down(s1));
+    else s2 = s1;
+    if( type(s2) != SPLIT )
+    { debug0(DVH, D, "] VerticalHyphenate returning FALSE (child not SPLIT)");
+      return FALSE;
+    }
+    Child(sh, DownDim(s2, COLM));
+    Child(sv, DownDim(s2, ROWM));
+    if( type(sv) != ROW_THR )
+    { debug0(DVH, D, "] VerticalHyphenate returning FALSE (no ROW_THR)");
+      return FALSE;
+    }
+    if( row_thread == nilobj )  row_thread = sv;
+    if( sv != row_thread )
+    { debug0(DVH, D, "] VerticalHyphenate returning FALSE (different ROW_THR)");
+      return FALSE;
+    }
+    Parent(shp, UpDim(sh, ROWM));
+    if( shp != row_thread )
+    { debug0(DVH, D, "] VerticalHyphenate returning FALSE (sh parent)");
+      return FALSE;
+    }
+
+    /* Now sh is one of the HCAT components */
+    if( type(sh) != VCAT )
+    { rump_fwd = find_max(rump_fwd, fwd(sh, ROWM));
+    }
+    else if( large_comp != nilobj )
+    { debug0(DVH, D, "] VerticalHyphenate returning FALSE (two VCATs)");
+      return FALSE;
+    }
+    else
+    { large_comp = sh;
+      large_comp_split = s2;
+    }
+  }
+
+  /* if no large_comp, return */
+  if( large_comp == nilobj )
+  { debug0(DVH, D, "] VerticalHyphenate returning FALSE (no VCAT)");
+    return FALSE;
+  }
+
+  /* check that large_comp has at least two components */
+  FirstDefiniteCompressed(large_comp, link, prev);
+  if( link == large_comp )
+  { debug0(DVH,D, "] VerticalHyphenate returning FALSE (VCAT: no components)");
+    return FALSE;
+  }
+  NextDefiniteWithGapCompressed(large_comp, link, nxt, g);
+  if( link == large_comp )
+  { debug0(DVH,D, "] VerticalHyphenate returning FALSE (VCAT: one component)");
+    return FALSE;
+  }
+
+  /* make sure that first gap does not change when rearranging */
+  rump_fwd = find_max(rump_fwd, fwd(prev, ROWM));
+  if( MinGap(rump_fwd, back(nxt, ROWM), fwd(nxt, ROWM), &gap(g)) !=
+      MinGap(fwd(prev, ROWM), back(nxt, ROWM), fwd(nxt, ROWM), &gap(g)) )
+  { debug0(DVH, D, "] VerticalHyphenate returning FALSE (first gap changes)");
+    return FALSE;
+  }
+
+  /* check that large_comp has no joins */
+  for( link = Down(large_comp);  link != large_comp;  link = NextDown(link) )
+  { Child(z, link);
+    if( type(z) == GAP_OBJ && mode(gap(z)) != NO_MODE && join(gap(z)) )
+    { debug0(DVH, D, "] VerticalHyphenate returning FALSE (VCAT: joined)");
+      return FALSE;
+    }
+  }
+
+  /* enclose all definite components after the first in HCATs */
+  for( link = NextDown(Up(prev));  link != large_comp;  link = NextDown(link) )
+  { Child(nxt, link);
+    if( type(nxt) == GAP_OBJ )  continue;
+    if( is_definite(type(nxt)) )
+      nxt = EncloseInHcat(nxt, y, large_comp);
+  }
+
+  /* move all components after the first to the top level */
+  TransferLinks(Up(g), large_comp, NextDown(Up(y)));
+
+  /* change the size of y to its new, smaller value */
+  fwd(y, ROWM) = fwd(row_thread, ROWM) = fwd(large_comp, ROWM)
+	      = fwd(large_comp_split, ROWM) = fwd(prev, ROWM);
+
+  /* set link to the link of the first thing before y which is not an index */
+  for( link = PrevDown(Up(y));  type(link) == LINK;  link = PrevDown(link) )
+  { Child(index, link);
+    if( !is_index(type(index)) )  break;
+  }
+
+  /* for each index, find where it's pointing and possibly move it */
+  while( NextDown(link) != Up(y) )
+  { Child(index, NextDown(link));
+    assert( is_index(type(index)), "MoveIndexes: is_index!" );
+    z = FindTarget(index);
+    if( z != nilobj )
+    { z = WhichComponent(z);
+      if( z != nilobj && z != y )
+      { MoveLink(NextDown(link), Up(z), PARENT);
+      }
+      else link = NextDown(link);
+    }
+    else link = NextDown(link);
+  }
+
+  debug1(DVH, D, "] VerticalHyphenate returning TRUE (y: %s)",
+    EchoLength(size(y, ROWM)));
+  debug0(DVH, DD, "galley after vertical hyphenation:");
+  ifdebug(DVH, DD, Parent(z, Up(y)); DebugGalley(z, y, 2));
+  return TRUE;
+} /* end VerticalHyphenate */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  static OBJECT BuildMergeTree(int n, OBJECT x, OBJECT *lenv, *lact)       */
+/*                                                                           */
+/*  Build a balanced tree of n-1 @Merge symbols, whose parameters are the    */
+/*  first n children of x.  Return in lenv the environment of the root       */
+/*  @Merge symbol, and in *lact the symbol table entry for the parent of     */
+/*  this @Merge symbol.                                                      */
+/*                                                                           */
+/*****************************************************************************/
+
+static OBJECT BuildMergeTree(int n, OBJECT x, OBJECT *lenv, OBJECT *lact)
+{ OBJECT res, merge, link, y, l, r, env, act, left_par, right_par;
+  debug2(DHY, DD, "BuildMergeTree(%d, %s, -. -)", n, EchoObject(x));
+
+  if( n == 1 )
+  { New(res, ENV_OBJ);
+    Child(y, Down(x));
+    MoveLink(Down(x), res, PARENT);
+    assert(type(y)==CLOSURE && has_merge(actual(y)), "BuildMergeTree: has_m!");
+    *lact = actual(y);
+    *lenv = DetachEnv(y);
+    AttachEnv(*lenv, res);
+  }
+  else
+  {
+    /* build the two subtrees */
+    l = BuildMergeTree(n/2, x, lenv, lact);
+    r = BuildMergeTree( n - n/2, x, &env, &act);
+
+    /* set merge to new @Merge closure */
+    for( link = Down(act);  link != act;  link = NextDown(link) )
+    { Child(y, link);
+      if( is_merge(y) )  break;
+    }
+    assert( y != act, "BuildMergeTree: y!" );
+    New(merge, CLOSURE);
+    actual(merge) = y;
+
+    /* build left parameter of the new @Merge */
+    New(left_par, PAR);
+    actual(left_par) = ChildSym(y, LPAR);
+    Link(merge, left_par);
+    Link(left_par, l);
+
+    /* build right parameter of the new @Merge */
+    New(right_par, PAR);
+    actual(right_par) = ChildSym(y, RPAR);
+    Link(merge, right_par);
+    Link(right_par, r);
+
+    New(res, ENV_OBJ);
+    Link(res, merge);
+    Link(res, env);
+  }
+
+  debug2(DHY, DD, "BuildMergeTree returning %s (*lact = %s)",
+    EchoObject(res), SymName(*lact));
+  return res;
+} /* end BuildMergeTree */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT ConvertGalleyList(x)                                              */
+/*                                                                           */
+/*  Convert a set of galleys x into a single galley containing a balanced    */
+/*  tree of @Merge symbols.                                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT ConvertGalleyList(OBJECT x)
+{ OBJECT res, y, link, junk1, junk2, obj;  int n;
+  debug1(DHY, DD, "ConvertGalleyList(%s)", EchoObject(x));
+  Child(res, Down(x));
+  Child(y, Down(res));
+  MoveLink(Down(x), y, CHILD);
+  DeleteLink(Down(res));
+  MoveLink(Up(x), res, CHILD);
+  for( link = Down(x), n = 0;  link != x;  link = NextDown(link), n++ );
+  y = BuildMergeTree(n, x, &junk1, &junk2);
+  assert( Down(x) == x && Up(x) == x, "ConvertGalleyList: x!" );
+  Dispose(x);
+  Child(obj, Down(y));
+  MoveLink(Down(y), res, PARENT);
+  MoveLink(LastDown(y), obj, PARENT);
+  assert( Down(y) == y && Up(y) == y, "ConvertGalleyList: y!" );
+  Dispose(y);
+  debug0(DHY, DD, "ConvertGalleyList returning, res =");
+  ifdebug(DHY, DD, DebugObject(res));
+  return res;
+} /* end ConvertGalleyList */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  OBJECT BuildEnclose(hd)                                                  */
+/*                                                                           */
+/*  Build the @Enclose object for galley hd.                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+OBJECT BuildEnclose(OBJECT hd)
+{ OBJECT sym, parsym, x, y, link, par, val, env, res;
+  debug1(DHY, D, "BuildEnclose(%s)", SymName(actual(hd)));
+
+  /* find @Enclose symbol and check that it has just one parameter */
+  for( link = Down(actual(hd));  link != actual(hd);  link = NextDown(link) )
+  { Child(sym, link);
+    if( is_enclose(sym) )  break;
+  }
+  assert( link != actual(hd), "BuildEnclose: no enclose!" );
+  parsym = nilobj;
+  for( link = Down(sym);  link != sym;  link = NextDown(link) )
+  { Child(y, link);
+    switch( type(y) )
+    {
+	case LPAR:
+	case NPAR:
+
+	  Error(44, 1, "%s may not have a left or named parameter", FATAL,
+	    &fpos(y), KW_ENCLOSE);
+	  break;
+
+
+	case RPAR:
+
+	  if( has_body(sym) )
+	    Error(44, 2, "%s may not have a body parameter", FATAL,
+	      &fpos(y), KW_ENCLOSE);
+	  parsym = y;
+	  break;
+
+
+	default:
+
+	  break;
+    }
+  }
+  if( parsym == nilobj )
+    Error(44, 3, "%s must have a right parameter", FATAL, &fpos(sym),KW_ENCLOSE);
+
+  /* set x to new @Enclose closure with dummy actual right parameter */
+  New(x, CLOSURE);
+  FposCopy(fpos(x), fpos(hd));
+  actual(x) = sym;
+  New(par, PAR);
+  FposCopy(fpos(par), fpos(hd));
+  actual(par) = parsym;
+  Link(x, par);
+  val = MakeWord(WORD, AsciiToFull("??"), &fpos(hd));
+  Link(par, val);
+
+  /* set env to the appropriate environment for this symbol */
+  /* strictly speaking y should not be included if sym is a parameter */
+  Child(y, Down(hd));
+  assert(type(y) == CLOSURE, "BuildEnclose:  hd child!");
+  y = CopyObject(y, &fpos(hd));
+  env = SetEnv(y, nilobj);
+
+  /* build res, an ENV_OBJ with x at left and env at right */
+  New(res, ENV_OBJ);
+  Link(res, x);
+  Link(res, env);
+
+  debug1(DHY, D, "BuildEnclose returning %s", EchoObject(res));
+  return res;
+} /* end BuildEnclose */
diff --git a/z45.c b/z45.c
new file mode 100644
index 0000000..693356c
--- /dev/null
+++ b/z45.c
@@ -0,0 +1,238 @@
+/*@z45.c:External Sort:SortFile()@********************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z45.c                                                      */
+/*  MODULE:       External Sort                                              */
+/*  EXTERNS:      SortFile()                                                 */
+/*                                                                           */
+/*  This simple sort utility assumes that the source file can all be read    */
+/*  into memory.  If not, you get an "out of memory" error message.          */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+#define BUFF_SIZE	4096		/* size of one memory buffer */
+#define LINES_GUESS     2000		/* initial guess of number of lines */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  LINE *ReadLines(FILE *fp, FULL_CHAR *fname, FULL_CHAR *first_line, *len) */
+/*                                                                           */
+/*  Read all of the lines of fp into memory and return a null-terminated     */
+/*  array of pointers to these lines, and set *len to the number of lines.   */
+/*  Make sure the lines themselves are null-terminated, also.                */
+/*                                                                           */
+/*  fname is the name of the file being sorted, and is used for error        */
+/*  messages only.                                                           */
+/*                                                                           */
+/*  if first_line is non-null then it is a pointer to a string which is      */
+/*  to become as the first line of the result.  This string needs copying.   */
+/*                                                                           */
+/*****************************************************************************/
+
+LINE *ReadLines(FILE *fp, FULL_CHAR *fname, FULL_CHAR *first_line, int *len)
+{
+  char *buff;				/* the current input line buffer     */
+  char *buff_top;			/* first spot off end of buffer      */
+  char *bp;				/* first free spot in buff           */
+
+  LINE *lines;				/* the array of pointers to lines    */
+  int  lines_length;			/* the length of the lines array     */
+  LINE *lines_top;			/* first spot off end of lines       */
+  LINE *lp;				/* first free spot in lines          */
+
+  char *p, *q;
+  int ch;
+  debug1(DEX, D, "ReadLines(-, %s, -)", fname);
+
+  /* initialize buff to be empty with size BUFF_SIZE */
+  buff = malloc(BUFF_SIZE * sizeof(char));
+  if( buff == NULL )
+    Error(45, 1, "run out of memory when reading index file %s",
+      FATAL, no_fpos, fname);
+  buff_top = buff + BUFF_SIZE;
+  bp = buff;
+
+  /* initialize the lines buffer to be the first line  */
+  lines_length = LINES_GUESS;
+  lines = malloc(lines_length * sizeof(LINE *));
+  lines_top = &lines[lines_length];
+  lp = lines;
+
+  /* add first_line to lines buffer if required */
+  if( first_line != (FULL_CHAR *) null )
+  {
+    *lp = malloc((StringLength(first_line) + 1) * sizeof(char));
+    StringCopy( (char *) *lp, first_line);
+    lp++;
+  }
+
+  *lp++ = bp;
+  while( (ch = getc(fp)) != EOF )
+  {
+    debug4(DEX, DD, "lines: [%d  %d(%d)  %d]",
+      (int) lines, (int) (lp-1), (int) *(lp-1), (int) lines_top -1);
+    debug3(DEX, DD, " buff: [%d   bp %d   %d]",
+      (int) buff, (int) bp, (int) buff_top - 1);
+    assert( (int) buff >= (int) lines_top ||
+	    (int) buff_top <= (int) lines,
+	    "ReadLines: lines and buff overlap!" );
+
+    /* get new buffer and copy current line across if out of buff space */
+    if( bp == buff_top )
+    {
+      debug0(DEX, D, "  getting new buff");
+      buff = malloc(BUFF_SIZE * sizeof(char));
+      if( buff == NULL )
+	Error(45, 2, "run out of memory when reading index file %s",
+	  FATAL, no_fpos, fname);
+      buff_top = buff + BUFF_SIZE;
+      for( p = buff, q = *(lp-1);  q != bp;  *p++ = *q++ );
+      bp = p; *bp = '\0';
+      debug1(DEX, D, "  copied into new buff: %s", buff);
+      *(lp-1) = buff;
+      if( bp == buff_top )
+	Error(45, 3, "line too long when reading index file %s",
+	  FATAL, no_fpos, fname);
+    }
+
+    /* if newline char, end this line and start the next */
+    if( ch == '\n' )
+    {
+      *bp++ = '\0';
+      debug1(DEX, D, "  finished line: %s", *(lp-1));
+
+      /* if no room in lines for next line, double its size */
+      if( lp == lines_top )
+      {
+        debug1(DEX, D, "  realloc(lines, %d)", 2 * lines_length);
+	lines = realloc(lines, 2 * lines_length * sizeof(LINE *));
+	if( lines == NULL )
+	  Error(45, 4, "run out of memory when reading index file %s",
+	    FATAL, no_fpos, fname);
+	lp = &lines[lines_length];
+	lines_length = 2 * lines_length;
+	lines_top = &lines[lines_length];
+      }
+
+      *lp++ = bp;
+    }
+    else /* ordinary char with space available, so just add it */
+    {
+      *bp++ = ch;
+    }
+  }
+
+  *len = (lp - lines - 1);
+  debug1(DEX, D, "ReadLines returning (len = %d)", *len);
+  return lines;
+
+} /* end ReadLines */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  WriteLines(FILE *fp, LINE *lines, int len)                               */
+/*                                                                           */
+/*  Write array of lines "lines", of length len, to file fp.                 */
+/*                                                                           */
+/*****************************************************************************/
+
+void WriteLines(FILE *fp, LINE *lines, int len)
+{ int i;
+  for( i = 0;  i < len;  i++ )
+  { fputs(lines[i], fp);
+    fputs("\n", fp);
+  }
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  Line comparison functions (for qsort)                                    */
+/*                                                                           */
+/*  By Jeff Kingston and Valery Ushakov (uwe).                               */
+/*                                                                           */
+/*****************************************************************************/
+
+static int pstrcmp(const void *a, const void *b)	/* !UseCollate */
+{
+  return strcmp (*(char **)a, *(char **)b);
+}
+
+static int pstrcollcmp(const void *a, const void *b)	/* UseCollate */
+{
+  return strcollcmp (*(char **)a, *(char**)b);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void SortLines(LINE *lines, int lines_len)                               */
+/*                                                                           */
+/*  Sort the given lines.                                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+void SortLines(LINE *lines, int lines_len)
+{
+  qsort(lines, lines_len, sizeof(LINE), (UseCollate ? pstrcollcmp : pstrcmp));
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void SortFile(char *infile, char *outfile)                               */
+/*                                                                           */
+/*  Sort file infile, placing the result on file outfile.                    */
+/*                                                                           */
+/*****************************************************************************/
+
+void SortFile(FULL_CHAR *infile, FULL_CHAR *outfile)
+{
+  LINE *lines;
+  int lines_len;
+  FILE *in_fp, *out_fp; 
+  debug2(DEX, D, "SortFile(%s, %s)", infile, outfile);
+  
+  /* open input file */
+  in_fp = fopen( (char *) infile, READ_BINARY);
+  if( in_fp == (FILE *) NULL )
+    Error(45, 5, "cannot open index file %s for reading",
+	    FATAL, no_fpos, outfile);
+
+  /* open output file */
+  out_fp = fopen( (char *) outfile, WRITE_BINARY);
+  if( out_fp == (FILE *) NULL )
+    Error(45, 6, "cannot open index file %s for writing",
+	    FATAL, no_fpos, outfile);
+
+  /* read lines, sort them, and write them out again sorted */
+  lines = ReadLines(in_fp, infile, (FULL_CHAR *) NULL, &lines_len);
+  SortLines(lines, lines_len);
+  fclose(in_fp);
+  WriteLines(out_fp, lines, lines_len);
+  fclose(out_fp);
+}
diff --git a/z46.c b/z46.c
new file mode 100644
index 0000000..7a920f4
--- /dev/null
+++ b/z46.c
@@ -0,0 +1,480 @@
+/*@z46.c:Optimal Galleys:FindOptimize()@**************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z46.c                                                      */
+/*  MODULE:       Optimal Galleys                                            */
+/*  EXTERNS:      FindOptimize(), SetOptimize(), GazumpOptimize(),           */
+/*                CalculateOptimize(), DebugOptimize()                       */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN FindOptimize(x, env)                                             */
+/*                                                                           */
+/*  Object x is a CLOSURE which represents an at present unsized galley.     */
+/*  Return TRUE if x has an @Optimize parameter which is Yes.                */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN FindOptimize(OBJECT x, OBJECT env)
+{ OBJECT y, link, res;
+  OBJECT bt[2], ft[2], ntarget, nenclose, crs;
+  debug1(DOG, D, "FindOptimize( %s )", EchoObject(x));
+  assert( type(x) == CLOSURE, "FindOptimize: type(x) != CLOSURE!" );
+  assert( has_target(actual(x)), "FindOptimize: x has no target!" );
+
+  /* search the parameter list of x for @Optimize */
+  res = nilobj;
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( type(y) == PAR && is_optimize(actual(y)) )
+    { assert( Down(y) != y, "FindOptimize: Down(PAR)!" );
+      Child(res, Down(y));
+      res = CopyObject(res, &fpos(x));
+      break;
+    }
+  }
+
+  /* search the children list of actual(x) for a default value of @Target */
+  if( res == nilobj )
+  for( link = Down(actual(x));  link != actual(x);  link = NextDown(link) )
+  { Child(y, link);
+    if( is_optimize(y) )
+    { res = CopyObject(sym_body(y), &fpos(x));
+      break;
+    }
+  }
+  
+  /* should have found it by now */
+  assert( res != nilobj, "FindOptimize: res == nilobj!" );
+
+  /* manifest and tidy the parameter, return TRUE if Yes */
+  bt[COLM] = ft[COLM] = bt[ROWM] = ft[ROWM] = ntarget = nenclose = crs = nilobj;
+  res = Manifest(res, env, &save_style(x), bt, ft, &ntarget, &crs, TRUE, FALSE,
+    &nenclose, FALSE);
+  res = ReplaceWithTidy(res, TRUE);
+  if( !is_word(type(res)) )
+  { Error(46, 1, "unable to evaluate %s parameter, assuming value is No",
+      WARN, &fpos(x), KW_OPTIMIZE);
+    debug2(DOG, D, "FindOptimize returning FALSE; found %s %s",
+      Image(type(res)), EchoObject(res));
+    return FALSE;
+  }
+  else if( StringEqual(string(res), AsciiToFull("Yes")) )
+  { debug0(DOG, D, "FindOptimize returning TRUE");
+    return TRUE;
+  }
+  else if( StringEqual(string(res), AsciiToFull("No")) )
+  { debug0(DOG, D, "FindOptimize returning FALSE");
+    return FALSE;
+  }
+  else
+  { Error(46, 2, "value of %s operator is neither Yes nor No, assuming No",
+      WARN, &fpos(x), KW_OPTIMIZE);
+    debug1(DOG, D, "FindOptimize returning FALSE (found WORD %s)", string(res));
+    return FALSE;
+  }
+} /* end FindOptimize */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  SetOptimize(hd, style)                                                   */
+/*                                                                           */
+/*  Initialize the optimization data of galley hd.  Search the cross ref     */
+/*  database for information about its fate on the previous run.             */
+/*                                                                           */
+/*****************************************************************************/
+
+void SetOptimize(OBJECT hd, STYLE *style)
+{ FULL_CHAR buff[MAX_BUFF], seq[MAX_BUFF];
+  OBJECT res, y, link, z;  FILE_NUM dfnum;  long dfpos, cont;  int dlnum;
+  debug2(DOG, D, "SetOptimize(%s, %s)", SymName(actual(hd)), EchoStyle(style));
+
+  /* set opt_counts(hd) to result of previous run, if any */
+  StringCopy(buff, SymName(actual(hd)));
+  StringCat(buff, AsciiToFull("."));
+  StringCat(buff, StringInt(line_num(fpos(hd))));
+  if( DbRetrieve(OldCrossDb, FALSE, OptGallSym, buff, seq, &dfnum,
+    &dfpos, &dlnum, &cont) )
+  {
+    SwitchScope(nilobj);
+    res = ReadFromFile(dfnum, dfpos, dlnum);
+    UnSwitchScope(nilobj);
+    assert( res != nilobj, "SetOptimize: res == nilobj!" );
+    assert( type(res) == CLOSURE, "SetOptimize: type(res) != CLOSURE!" );
+    assert( actual(res) == OptGallSym, "SetOptimize: actual(res) != Opt!" );
+    assert( Down(res) != res, "SetOptimize: Down(res) == res!" );
+    Child(y, Down(res));
+    assert( type(y) == PAR, "SetOptimize: type(y) != PAR!" );
+    Child(y, Down(y));
+    assert( type(y) == ACAT, "SetOptimize: type(y) != ACAT!" );
+    y = ReplaceWithTidy(y, FALSE);
+    opt_hyph(hd) = FALSE;
+    assert( type(y) == ACAT, "SetOptimize: type(y) != ACAT (2)!" );
+    for( link = y;  NextDown(link) != y;  link = NextDown(link) )
+    { Child(z, NextDown(link));
+      if( type(z) == GAP_OBJ )
+      { DisposeChild(NextDown(link));
+	link = PrevDown(link);
+      }
+      else if( is_word(type(z)) )
+      { if( StringEqual(string(z), AsciiToFull("h")) )
+	{ opt_hyph(hd) = TRUE;
+	  DisposeChild(NextDown(link));
+	  link = PrevDown(link);
+	}
+	else
+	{ int num = 0;
+	  sscanf( (char *) string(z), "%d", &num);
+	  assert( num > 0, "SetOptimize: num <= 0!" );
+	  comp_count(z) = num;
+	}
+      }
+      else
+      { assert( FALSE, "SetOptimize: type(z)!" );
+      }
+    }
+    DeleteLink(Up(y));
+    DisposeObject(res);
+    opt_counts(hd) = y;
+  }
+  else opt_counts(hd) = nilobj;
+
+  /* set up first opt_comps_permitted value */
+  if( opt_counts(hd) != nilobj && Down(opt_counts(hd)) != opt_counts(hd) )
+  { Child(z, Down(opt_counts(hd)));
+    opt_comps_permitted(hd) = comp_count(z) - 1;
+    DisposeChild(Up(z));
+  }
+  else opt_comps_permitted(hd) = MAX_FILES;  /* a large number */
+  debug1(DOG, D, "  initial permitted = %2d", opt_comps_permitted(hd));
+
+  /* set opt_components(hd) and opt_constraints(hd) for storing this run */
+  New(opt_components(hd), ACAT);
+  opt_gazumped(hd) = FALSE;
+  New(opt_constraints(hd), ACAT);
+  StyleCopy(save_style(opt_components(hd)), *style);
+  if( gall_dir(hd) == ROWM )
+    hyph_style(save_style(opt_components(hd))) = HYPH_OFF;
+
+  debug0(DOG, D, "SetOptimize returning:");
+  ifdebug(DOG, D, DebugOptimize(hd));
+} /* end SetOptimize */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  GazumpOptimize(hd, dest)                                                 */
+/*                                                                           */
+/*  Optimizing galley hd, currently attached to @Galley dest, is to be       */
+/*  gazumped by some other galley.  Record the current size constraint and   */
+/*  add &1rt {} to the list of components.                                   */
+/*                                                                           */
+/*****************************************************************************/
+
+void GazumpOptimize(OBJECT hd, OBJECT dest)
+{ OBJECT g, tmp, junk, prnt;
+
+  debug2(DOG, D, "GazumpOptimize(%s, %s)", SymName(actual(hd)),
+    EchoObject(dest));
+  assert( type(hd) == HEAD, "GazumpOptimize: type(hd) != HEAD!" );
+  assert( opt_components(hd) != nilobj, "GazumpOptimize: opt_c!" );
+
+  /* record the size of this just-completed target area for hd */
+  New(tmp, WIDE);
+  if( (gall_dir(hd) == COLM && external_hor(dest)) ||
+      (gall_dir(hd) == COLM && external_hor(dest)) )
+  { SetConstraint(constraint(tmp), MAX_FULL_LENGTH, MAX_FULL_LENGTH, MAX_FULL_LENGTH);
+  }
+  else
+  { Parent(prnt, Up(dest));
+    Constrained(prnt, &constraint(tmp), gall_dir(hd), &junk);
+  }
+  Link(opt_constraints(hd), tmp);
+  debug2(DOG, D, "GazumpOptimize(%s) adding constraint %s",
+    SymName(actual(hd)), EchoConstraint(&constraint(tmp)));
+
+  /* optimizing galley is being gazumped; record this as &1rt {} &1c */
+  if( LastDown(opt_components(hd)) != opt_components(hd) )
+  { Child(g, LastDown(opt_components(hd)));
+    assert( type(g) == GAP_OBJ, "FlushGalley: type(g) != GAP_OBJ!" );
+
+    /* ***
+    SetGap(gap(g), FALSE, FALSE, TRUE, FRAME_UNIT, EDGE_MODE, 2 * FR);
+    if( Down(g) == g )
+    { junk = MakeWord(WORD, AsciiToFull("2b"), &fpos(g));
+      Link(g, junk);
+    }
+    *** */
+
+    /* first we overwrite whatever is there now by &1rt */
+    SetGap(gap(g), FALSE, FALSE, TRUE, AVAIL_UNIT, TAB_MODE, 1 * FR);
+    if( Down(g) != g )  DisposeChild(Down(g));
+    tmp = MakeWord(WORD, AsciiToFull("1rt"), &fpos(g));
+    Link(g, tmp);
+
+    /* next we add an empty word */
+    tmp = MakeWord(WORD, STR_EMPTY, &fpos(g));
+    back(tmp, COLM) = fwd(tmp, COLM) = 0;
+    back(tmp, ROWM) = fwd(tmp, ROWM) = 0;
+    word_font(tmp) = word_colour(tmp) = 0;
+    word_language(tmp) = word_hyph(tmp) = 0;
+    Link(opt_components(hd), tmp);
+
+    /* finally we add &1c */
+    New(g, GAP_OBJ);
+    hspace(g) = 1;  vspace(g) = 0;
+    FposCopy(fpos(g), fpos(tmp));
+    SetGap(gap(g), FALSE, FALSE, TRUE, FIXED_UNIT, EDGE_MODE, 1 * CM);
+    tmp = MakeWord(WORD, AsciiToFull("1c"), &fpos(g));
+    Link(g, tmp);
+    Link(opt_components(hd), g);
+
+    opt_gazumped(hd) = TRUE;
+    debug2(DOG, D, "GazumpOptimize(%s) new gap is %s",
+      SymName(actual(hd)), EchoGap(&gap(g)));
+  }
+
+  /* refresh the number of comps permitted into the next target */
+  if( opt_counts(hd) != nilobj && Down(opt_counts(hd)) != opt_counts(hd) )
+  { Child(tmp, Down(opt_counts(hd)));
+    opt_comps_permitted(hd) += comp_count(tmp) - 1;
+    DisposeChild(Up(tmp));
+  }
+  else opt_comps_permitted(hd) = MAX_FILES;
+
+  debug1(DOG, D, "GazumpOptimize returning, permitted = %2d",
+    opt_comps_permitted(hd));
+} /* end GazumpOptimize */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  CalculateOptimize(hd)                                                    */
+/*                                                                           */
+/*  Calculate the optimal break for galley hd and write the result into      */
+/*  the cross reference database.                                            */
+/*                                                                           */
+/*****************************************************************************/
+
+void CalculateOptimize(OBJECT hd)
+{ OBJECT z, y, ylink, og, og_par, para, link, wd, g, last;
+  int count, compcount;  FULL_CHAR buff[MAX_BUFF];
+  FILE_NUM fnum;  int write_pos, write_lnum;  BOOLEAN hyph_used;
+  debug1(DOG, D, "CalculateOptimize(%s)", SymName(actual(hd)));
+
+  /* delete the concluding GAP_OBJ stuck in by Promote() */
+  assert( LastDown(opt_components(hd)) != opt_components(hd), "CO!" );
+  Child(last, LastDown(opt_components(hd)));
+  assert( type(last) == GAP_OBJ, "CalculateOptimize: type(last)!" );
+  DisposeChild(Up(last));
+  ifdebug(DOG, D, DebugOptimize(hd));
+
+  /* break the paragraph; don't let user see any error messages */
+  assert( opt_constraints(hd) != nilobj, "KillGalley: no opt_constraints!" );
+  assert( Down(opt_constraints(hd)) != opt_constraints(hd), "KillGalleyo!" );
+  /* *** no longer needed since z14 doesn't refer to these fields
+  back(opt_components(hd), COLM) = 0;
+  fwd(opt_components(hd), COLM) = MAX_FULL_LENGTH;
+  *** */
+  Child(y, LastDown(opt_constraints(hd)));
+  EnterErrorBlock(FALSE);
+  opt_components(hd) = FillObject(opt_components(hd), &constraint(y),
+    opt_constraints(hd), FALSE, FALSE, TRUE, &hyph_used);
+  LeaveErrorBlock(FALSE);
+  debug1(DOG, D, "after breaking (%shyph_used):", hyph_used ? "" : "not ");
+  ifdebug(DOG, D, DebugOptimize(hd));
+
+  /* quit if one line only */
+  if( type(opt_components(hd)) != VCAT ||
+      Down(opt_components(hd)) == LastDown(opt_components(hd)) )
+  {
+    debug0(DOG, D, "CalculateOptimize returning (one target only)");
+    return;
+  }
+
+  /* construct a new @OptGall symbol */
+  New(og, CLOSURE);
+  actual(og) = OptGallSym;
+  FposCopy(fpos(og), fpos(hd));
+  New(og_par, PAR);
+  actual(og_par) = ChildSym(OptGallSym, RPAR);
+  Link(og, og_par);
+  New(para, ACAT);
+  Link(og_par, para);
+
+  /* begin with "h" if hyphenation was used */
+  if( hyph_used )
+  { wd = MakeWord(WORD, AsciiToFull("h"), &fpos(hd));
+    Link(para, wd);
+  }
+
+  /* attach words showing the number of components per target */
+  compcount = 0;
+  for( link = Down(opt_components(hd));  link != opt_components(hd);
+       link = NextDown(link) )
+  { Child(y, link);
+    if( type(y) != ACAT )  continue;
+
+    /* let wd be a word containing the number of components in this target */
+    count = 0;
+    for( ylink = Down(y);  ylink != y;  ylink = NextDown(ylink) )
+    { Child(z, ylink);
+      if( type(z) != GAP_OBJ ) count++;
+    }
+    wd = MakeWord(WORD, StringInt(count), &fpos(y));
+
+    /* link wd to para, prepended by a gap if not first */
+    if( Down(para) != para )
+    { New(g, GAP_OBJ);
+      SetGap(gap(g), FALSE, FALSE, TRUE, FIXED_UNIT, EDGE_MODE, 1*EM);
+      if( ++compcount % 20 == 0 )
+      { hspace(g) = 0;
+	vspace(g) = 1;
+      }
+      else
+      { hspace(g) = 1;
+        vspace(g) = 0;
+      }
+      Link(para, g);
+    }
+    Link(para, wd);
+  }
+  debug2(DOG, D, "CalculateOptimize(%s) made object %s",
+    SymName(actual(hd)), EchoObject(og));
+
+  /* dispose the optimizing data structures */
+  DisposeObject(opt_components(hd));
+  opt_components(hd) = nilobj;
+  DisposeObject(opt_constraints(hd));
+  opt_constraints(hd) = nilobj;
+
+  /* write result onto cross-reference database */
+  if( AllowCrossDb )
+  {
+    /* construct a suitable tag for this galley's entry */
+    StringCopy(buff, SymName(actual(hd)));
+    StringCat(buff, AsciiToFull("."));
+    StringCat(buff, StringInt(line_num(fpos(hd))));
+    fnum = DatabaseFileNum(&fpos(hd));
+    AppendToFile(og, fnum, &write_pos, &write_lnum);
+    DbInsert(NewCrossDb, FALSE, OptGallSym, buff, &fpos(hd),
+      STR_ZERO, fnum, write_pos, write_lnum, FALSE);
+  }
+  debug0(DOG, D, "CalculateOptimize returning.");
+}
+
+#if DEBUG_ON
+/*****************************************************************************/
+/*                                                                           */
+/*  DebugOptimizedAcat(x)                                                    */
+/*                                                                           */
+/*  Debug output of one line of optimized ACAT.                              */
+/*                                                                           */
+/*****************************************************************************/
+
+static void DebugOptimizedAcat(OBJECT x)
+{ OBJECT link, y;
+  assert( type(x) == ACAT, "DebugOptimizedAcat!" );
+  for( link = Down(x);  link != x;  link = NextDown(link) )
+  { Child(y, link);
+    if( type(y) == GAP_OBJ )
+    { debug1(DOG, D, "  GAP_OBJ %s", EchoGap(&gap(y)));
+    }
+    else if( is_word(type(y)) )
+    { debug2(DOG, D, "  word (%s, %s)", EchoLength(back(y, COLM)),
+	EchoLength(fwd(y, COLM)));
+    }
+    else
+    { debug1(DOG, D, "  %s", Image(type(y)));
+    }
+  }
+} /* end DebugOptimizedAcat */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  DebugOptimize(hd)                                                        */
+/*                                                                           */
+/*  Debug output of optimized galley hd.                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void DebugOptimize(OBJECT hd)
+{ OBJECT link, y;
+
+  assert( opt_components(hd) != nilobj, "DebugOptimize!");
+  debug3(DOG, D, "Optimized Galley %s %sinto %s", SymName(actual(hd)),
+    gall_dir(hd) == COLM ? "horizontally " : "", SymName(whereto(hd)));
+
+  /* print components */
+  /* *** believe this now ***
+  if( type(opt_components(hd)) == ACAT )
+    DebugOptimizedAcat(opt_components(hd));
+  else if( type(opt_components(hd)) == VCAT )
+  {
+    for( link = Down(opt_components(hd));  link != opt_components(hd);
+	 link = NextDown(link) )
+    {
+      Child(y, link);
+      if( type(y) == ACAT )  DebugOptimizedAcat(y);
+      debug0(DOG, D, "----------------");
+    }
+  }
+  else debug1(DOG, D, "? %s ?", Image(type(opt_components(hd))));
+  *** */
+  debug0(DOG, D, "components:");
+  ifdebug(DOG, D, DebugObject(opt_components(hd)));
+  debug0(DOG, D, "");
+
+  /* print constraints */
+  debug0(DOG, D, "constraints:");
+  for( link = Down(opt_constraints(hd));  link != opt_constraints(hd);
+       link = NextDown(link) )
+  {
+    Child(y, link);
+    debug1(DOG, D, "%s", EchoConstraint(&constraint(y)));
+  }
+  debug0(DOG, D, "");
+
+  /* print counts */
+  debug0(DOG, D, "counts");
+  if( opt_counts(hd) != nilobj )
+  {
+    if( opt_hyph(hd) )
+      fprintf(stderr, "hyph");
+    for( link = Down(opt_counts(hd));  link != opt_counts(hd);
+	 link = NextDown(link) )
+    { Child(y, link);
+      fprintf(stderr, " %d", comp_count(y));
+    }
+    fprintf(stderr, "\n");
+  }
+  debug0(DOG, D, "");
+} /* end DebugOptimize */
+#endif
diff --git a/z47.c b/z47.c
new file mode 100644
index 0000000..2fac7b8
--- /dev/null
+++ b/z47.c
@@ -0,0 +1,250 @@
+/*@z47.c:Environment Table:EnvReadRetrieve()@*********************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z47.c                                                      */
+/*  MODULE:       Environment Table                                          */
+/*  EXTERNS:      EnvInit(), EnvWriteRetrieve(), EnvWriteInsert(),           */
+/*                EnvReadRetrieve(), EnvReadInsert()                         */
+/*                                                                           */
+/*****************************************************************************/
+#include "externs.h"
+#define	TAB_SIZE	211
+#define	MAX_CACHE	180
+
+#define	env_offset(x)	back(x, ROWM)
+#define	env_lnum(x)	line_num(fpos(x))
+#define	env_fnum(x)	file_num(fpos(x))
+#define	env_read(x)	sized(x)
+
+static	OBJECT	env_cache;			/* cache of envts in use     */
+static	int	cache_count;			/* current size of cache     */
+static	int	stat_writes;			/* calls to WriteRetrieve    */
+static	int	stat_write_hits;		/* hits in WriteRetrieve     */
+static	int	stat_reads;			/* calls to ReadRetrieve     */
+static	int	stat_read_hits;			/* hits in ReadRetrieve      */
+
+static OBJECT tab[TAB_SIZE];
+
+#define hash1(pos, env, fnum)						\
+{									\
+  pos = ( (int) env + fnum ) % TAB_SIZE;				\
+}
+
+#define hash2(pos, fnum, offset)					\
+{									\
+  pos = ( offset + fnum ) % TAB_SIZE;					\
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void EnvInit(void)                                                       */
+/*                                                                           */
+/*  Initialize this module.                                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void EnvInit(void)
+{ int i;
+  debug0(DET, DD, "EnvInit()");
+  stat_reads = 0;
+  stat_read_hits = 0;
+  stat_writes = 0;
+  stat_write_hits = 0;
+  New(env_cache, ACAT);
+  cache_count = 0;
+  for( i = 0;  i < TAB_SIZE;  i++ )
+  { tab[i] = nilobj;
+  }
+  debug0(DET, DD, "EnvInit returning");
+} /* end EnvInit */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN EnvWriteRetrieve(OBJECT env, FILE_NUM fnum, int *offset, *lnum)  */
+/*                                                                           */
+/*  Return the offset in file fnum where environment env has been written,   */
+/*  or FALSE if env has not been written to this file.                       */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN EnvWriteRetrieve(OBJECT env, FILE_NUM fnum, int *offset, int *lnum)
+{ int pos;  OBJECT link, y, z;
+  debug2(DET, DD, "EnvWriteRetrieve(env %d, %s)", (int) env, FileName(fnum));
+  debug1(DET, DDD, "  %s", EchoObject(env));
+  stat_writes++;
+  hash1(pos, env, fnum);
+  if( tab[pos] != nilobj )
+  {
+    for( link = Down(tab[pos]);  link != tab[pos];  link = NextDown(link) )
+    { Child(y, link);
+      Child(z, Down(y));
+      if( env_fnum(y) == fnum && z == env && !env_read(y) )
+      { MoveLink(LastUp(y), env_cache, PARENT);
+	*offset = env_offset(y);
+	*lnum   = env_lnum(y);
+	stat_write_hits++;
+	debug2(DET, DD, "EnvWriteRetrieve returning TRUE (offset %d, lnum %d)",
+	  *offset, *lnum);
+	return TRUE;
+      }
+    }
+  }
+  debug0(DET, DD, "EnvWriteRetrieve returning FALSE");
+  return FALSE;
+} /* end EnvWriteRetrieve */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void EnvWriteInsert(OBJECT env, FILE_NUM fnum, int offset, int lnum)     */
+/*                                                                           */
+/*  Record the fact that environment env has been written to file fnum       */
+/*  at the given offset.                                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void EnvWriteInsert(OBJECT env, FILE_NUM fnum, int offset, int lnum)
+{ int pos;  OBJECT loser, x;
+  debug3(DET, DD, "EnvWriteInsert(env %d, %s, %d)", (int) env,
+    FileName(fnum), offset);
+
+  /* to limit the cache size, remove least recently used entry if full */
+  if( cache_count >= MAX_CACHE )
+  {
+    Child(loser, Down(env_cache));
+    DeleteLink(Up(loser));
+    DisposeChild(Up(loser));
+    cache_count--;
+  }
+
+  /* insert the new entry */
+  hash1(pos, env, fnum);
+  if( tab[pos] == nilobj )  New(tab[pos], ACAT);
+  New(x, ACAT);
+  env_fnum(x) = fnum;
+  env_offset(x) = offset;
+  env_lnum(x) = lnum;
+  env_read(x) = FALSE;
+  Link(tab[pos], x);
+  Link(env_cache, x);
+  Link(x, env);
+  cache_count++;
+
+  debug1(DET, DD, "EnvWriteInsert returning (cache_count = %d)", cache_count);
+} /* end EnvWriteInsert */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN EnvReadRetrieve(FILE_NUM fnum, int offset, OBJECT *env)          */
+/*                                                                           */
+/*  Return the environment that appears in file fnum at the given offset,    */
+/*  or FALSE if this is not currently known.                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+BOOLEAN EnvReadRetrieve(FILE_NUM fnum, int offset, OBJECT *env)
+{ int pos;  OBJECT link, y, z;
+  debug2(DET, DD, "EnvReadRetrieve(%s, %d)", FileName(fnum), offset);
+  stat_reads++;
+
+  hash2(pos, fnum, offset);
+  if( tab[pos] != nilobj )
+  {
+    for( link = Down(tab[pos]);  link != tab[pos];  link = NextDown(link) )
+    { Child(y, link);
+      Child(z, Down(y));
+      if( env_fnum(y) == fnum && env_offset(y) == offset && env_read(y) )
+      { MoveLink(LastUp(y), env_cache, PARENT);
+	Child(*env, Down(y));
+	stat_read_hits++;
+        debug1(DET, DD, "EnvReadRetrieve returning env %d", (int) *env);
+	  return TRUE;
+      }
+    }
+  }
+  debug0(DET, DD, "EnvReadRetrieve returning FALSE");
+  return FALSE;
+} /* end EnvReadRetrieve */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void EnvReadInsert(FILE_NUM fnum, int offset, OBJECT env)               */
+/*                                                                           */
+/*  Record the fact that environment env has just been read from file fnum   */
+/*  at position offset.                                                      */
+/*                                                                           */
+/*****************************************************************************/
+
+void EnvReadInsert(FILE_NUM fnum, int offset, OBJECT env)
+{ int pos; OBJECT x, loser;
+  debug3(DET, DD, "EnvReadInsert(%s, %d, env %d)",
+    FileName(fnum), offset, (int) env);
+
+  /* to limit the cache size, remove least recently used entry if full */
+  if( cache_count >= MAX_CACHE )
+  {
+    Child(loser, Down(env_cache));
+    DeleteLink(Up(loser));
+    DisposeChild(Up(loser));
+    cache_count--;
+  }
+
+  /* insert the new entry */
+  hash2(pos, fnum, offset);
+  if( tab[pos] == nilobj )  New(tab[pos], ACAT);
+  New(x, ACAT);
+  env_fnum(x) = fnum;
+  env_offset(x) = offset;
+  env_read(x) = TRUE;
+  Link(tab[pos], x);
+  Link(env_cache, x);
+  Link(x, env);
+  cache_count++;
+
+  debug1(DET, DD, "EnvReadInsert returning (cache_count = %d)", cache_count);
+} /* end EnvReadInsert */
+
+
+#if DEBUG_ON
+/*****************************************************************************/
+/*                                                                           */
+/*  void EnvDebug()                                                          */
+/*                                                                           */
+/*  Debug statistics of this module's performance.                           */
+/*                                                                           */
+/*****************************************************************************/
+
+void EnvDebug(void)
+{
+  debug3(DET, D, "Env Table  %6s %6s %6s", "calls", "hits", "% hits");
+  debug3(DET, D, "reading    %6d %6d %6.1f", stat_reads, stat_read_hits,
+  stat_reads == 0 ? (float) 0 : (float) 100 * stat_read_hits / stat_reads);
+  debug3(DET, D, "writing    %6d %6d %6.1f", stat_writes, stat_write_hits,
+  stat_writes == 0 ? (float) 0 : (float) 100 * stat_write_hits / stat_writes);
+} /* end EnvDebug */
+#endif
diff --git a/z48.c b/z48.c
new file mode 100644
index 0000000..6c66e43
--- /dev/null
+++ b/z48.c
@@ -0,0 +1,3706 @@
+/*@z48.c:PDF back end@********************************************************/
+/*                                                                           */
+/*  THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.17)                       */
+/*  COPYRIGHT (C) 1991, 1999 Jeffrey H. Kingston                             */
+/*                                                                           */
+/*  Jeffrey H. Kingston (jeff@cs.usyd.edu.au)                                */
+/*  Basser Department of Computer Science                                    */
+/*  The University of Sydney 2006                                            */
+/*  AUSTRALIA                                                                */
+/*                                                                           */
+/*  This PDF Back End module written by Vincent Tan, March 1998.             */
+/*                                                                           */
+/*  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 2, 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, write to the Free Software              */
+/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston MA 02111-1307 USA   */
+/*                                                                           */
+/*  FILE:         z48.c                                                      */
+/*  MODULE:       PDF back end                                               */
+/*  EXTERNS:      PDFFile_Init(), PDFFile_BeginFontEncoding(),               */
+/*                PDFFile_EndFontEncoding(), PDFFile_Cleanup(),              */
+/*                PDFPage_Init(), PDFPage_Cleanup(), PDFPage_Write(),        */
+/*                PDFPage_Push(), PDFPage_Pop(), PDFPage_Scale(),            */
+/*                PDFPage_Translate(), PDFPage_Rotate(), PDFPage_SetVars(),  */
+/*                PDFPage_WriteGraphic(), PDFPage_PrintUnderline(),          */
+/*                PDFFont_AddFont(), PDFFont_Set(), PDFText_OpenXY(),        */
+/*                PDFText_OpenX(), PDFText_Open(), PDFText_Kern(),           */
+/*                PDFText_Close(), PDFHasValidTextMatrix()                   */
+/*                                                                           */
+/*****************************************************************************/
+#define  PI   3.1415926535897931160
+#include "externs.h"
+
+
+/* ANSI headers */
+#include <ctype.h>
+#include <math.h>
+#include <time.h>
+
+/* zlib headers: define PDF_COMPRESSION = 0 if you don't have zlib library */
+#if PDF_COMPRESSION
+#include "zlib.h"
+#endif
+
+static void Assert(BOOLEAN condition, FILE_POS *inFilePos)
+{
+  if (!condition)		/* allows me to set a breakpoint here */
+  assert(condition, inFilePos);
+}
+
+/* #define's and typedefs */
+#undef USE_MATRICES
+#undef _CALC_LARGEST_PAGE_OBJECT_
+
+enum {
+  kBase14FontCount = 14,    /* there are 14 base PDF fonts */
+  kBufferSize = 1024	    /* size of buffer for skipping non-marking commands */
+};
+
+#if PDF_COMPRESSION
+enum {
+  kRawOutputBufferSize = 4096,		/* arbitrary choice */
+  kCompressedOutputBufferSize = 4096	/* arbitrary choice */
+};
+#endif
+
+enum {
+  kNumberOfObjectsPerBlock = 256,	/* arbitrary choice */
+  kNumberOfPagesPerBlock = 64		/* arbitrary choice */
+};
+
+typedef enum {
+  kFitNoChange = 0,	/* special default case */
+  kFit,			/* [ /Fit ]: fit the page to the window */
+  kFitH,		/* [ /FitH top ]: fit the width of the page to window; */
+			/* top specifies y-coord of the top edge of the window */
+  kFitV,		/* [ /FitV left ]: fit the height of the page to the   */
+			/* window. left specifies x-coord of left edge of win. */
+  kFitR,		/* [ /FitR left bottom right top ]: fit the rectangle  */
+			/* specified by left bottom right top in the window.   */
+			/* If the height (top - bottom) and width (right-left) */
+			/* imply different zoom factors, the numerically       */
+			/* smaller zoom factor is used, to ensure that the     */
+			/* specified rectangle fits in the window              */
+  kFitB,		/* [ /FitB ]: fit the page's bounding box to window    */
+  kFitBH,		/* [ /FitBH top ]: fit the width of the page's bound.  */
+			/* box to the window. top specifies the y-coordinate   */
+			/* of the top edge of the window                       */
+  kFitBV,		/* [ /FitBV left ]: fit the height of the page's       */
+			/* bounding box to the window. left specifies the      */
+			/* x-coordinate of the left edge of the window         */
+
+  kNumberOfDestLinkOptions
+} PDF_LINK_DEST_OPTION;
+
+enum eUnitsKeywords {
+  k_in = 0,
+  k_cm,
+  k_pt,
+  k_em,
+  k_loutf,
+  k_loutv,
+  k_louts,
+  kNumberOfUnitKeywords
+};
+
+enum eGraphicsKeywords {
+  k_xsize = 0,
+  k_ysize,
+  k_xmark,
+  k_ymark,
+  kNumberOfGraphicsKeywords
+};
+
+enum eArithmeticKeywords {
+  k_add = 0,
+  k_sub,
+  k_mul,
+  k_div,
+  k_sin,
+  k_cos,
+  k_pick,
+  kNumberOfArithmeticKeywords
+};
+
+typedef enum {
+  k_link_source = 0,	/* source of a link to an internal document target */
+  k_link_external,	/* source of a link to an external document target */
+  k_link_URI,		/* source of a link to an (external) URI target    */
+  k_link_target,	/* internal document target                        */
+  k_link_target_for_export,	/* external document target                */
+  kNumberOfLinkKeywords
+} PDF_LINK_KEYWORD;
+
+enum {
+  k_author = 0,
+  k_title,
+  k_subject,
+  k_keywords,
+  kNumberOfDocInfoKeywords
+};
+
+
+/* basic types */
+#ifdef	USE_MATRICES
+typedef	double			t_matrix[9];
+#endif
+
+typedef	char		t_tempbuf[512];
+typedef	unsigned int	PDF_OBJECT_NUM;
+typedef	PDF_OBJECT_NUM	PDF_PAGE_OBJECT_NUM;  /* an object number that can */
+					      /* refer ONLY to page object */
+typedef	unsigned int	PDF_FONT_NUM;
+typedef	unsigned int	PDF_PAGE_NUM;
+typedef	unsigned int	PDF_FILE_OFFSET;
+
+
+/* font list */
+struct t_font_list_entry {
+  struct t_font_list_entry *m_next_font_entry;
+  FULL_CHAR *m_PDF_font_name;
+  FULL_CHAR *m_short_font_name;
+  FULL_CHAR *m_actual_font_name;
+  PDF_OBJECT_NUM m_font_encoding_obj;	/* valid for entire PDF file */
+  PDF_OBJECT_NUM m_pdf_object_number;	/* valid for entire PDF file */
+  BOOLEAN m_font_resource_in_pdf;	/* TRUE when PDF file has       */
+					/* /Type /Font resource         */
+  BOOLEAN m_in_use;			/* used on a per-page basis */
+};
+
+typedef struct t_font_list_entry t_font_list_entry, *t_font_list_entry_ptr;
+
+
+/* offsets of all objects (for xref list) */
+typedef	PDF_FILE_OFFSET t_offset_array[kNumberOfObjectsPerBlock];
+
+struct t_offset_block {
+  struct t_offset_block *m_next_block;
+  t_offset_array m_block;
+};
+
+typedef struct t_offset_block t_offset_block, *t_offset_block_ptr;
+
+
+/* for /Pages object */
+typedef PDF_PAGE_OBJECT_NUM t_page_array[kNumberOfPagesPerBlock];
+
+struct t_page_block {
+  struct t_page_block *m_next_block;
+  t_page_array m_block;
+};
+
+typedef	struct t_page_block t_page_block, *t_page_block_ptr;
+
+
+/* for font encodings */
+struct	t_font_encoding_entry {
+  struct t_font_encoding_entry* m_next_entry;
+  PDF_OBJECT_NUM m_object_num;
+  FULL_CHAR *m_font_encoding;
+};
+
+typedef struct t_font_encoding_entry
+  t_font_encoding_entry, *t_font_encoding_entry_ptr;
+
+
+/* for qsave/qrestore [see PDFPage_Push()] */
+struct t_qsave_entry {
+  struct t_qsave_entry *m_next_entry;
+  int m_page_h_origin, m_page_v_origin;
+  float m_page_h_scale_factor, m_page_v_scale_factor;
+};
+
+typedef struct t_qsave_entry t_qsave_entry, *t_qsave_entry_ptr;
+
+
+/* for qsave/qrestore [see PDFPage_Push()] */
+struct t_qsave_marking_entry {
+  struct t_qsave_marking_entry* m_next_entry;
+  unsigned int m_buffer_pos;
+};
+
+typedef	struct t_qsave_marking_entry t_qsave_marking_entry, *t_qsave_marking_entry_ptr;
+
+
+/* target of link annotations */
+struct t_target_annot_entry {
+  struct t_target_annot_entry* m_next_entry;
+
+  /* all of the following are always defined */
+  FULL_CHAR *m_name;
+  PDF_PAGE_OBJECT_NUM m_page_object_num;
+
+  /* these are in PDF's default user space coordinates */
+  int m_ll_x;
+  int m_ll_y;
+  int m_ur_x;
+  int m_ur_y;
+
+  BOOLEAN m_for_export;
+};
+
+typedef struct t_target_annot_entry t_target_annot_entry, *t_target_annot_entry_ptr;
+
+/* source of link annotations */
+struct t_source_annot_entry {
+  struct t_source_annot_entry* m_next_entry;
+
+  t_target_annot_entry* m_target;	/* if is a link and this is NULL then */
+					/* the link is a fwd link and remains */
+					/* unresolvable until the page is     */
+					/* encountered - instead, the m_name  */
+					/* field is defined; m_target will be */
+					/* NULL for URI type links            */
+
+  FULL_CHAR *m_name;			/* this string is defined if m_target */
+					/* is NULL otherwise it is null       */
+					/* for URI links, this contains the   */
+					/* URI to link to                     */
+  FULL_CHAR *m_file_spec;		/* only defined for link_type ==      */
+					/* k_link_external                    */
+
+  /* all of the following are always defined */
+  /* these are in PDF's default user space coordinates */
+  int m_ll_x;
+  int m_ll_y;
+  int m_ur_x;
+  int m_ur_y;
+
+  PDF_OBJECT_NUM m_this_object_num;	/* obj num of this "/Type /Annot" obj */
+  PDF_PAGE_OBJECT_NUM m_this_page_object_num;	/* obj num of the page that   */
+					/* this annot lies in                 */
+  PDF_LINK_DEST_OPTION m_dest_option;
+  PDF_LINK_KEYWORD m_link_type;
+
+  BOOLEAN m_written_to_PDF_file;
+};
+
+typedef struct t_source_annot_entry t_source_annot_entry, *t_source_annot_entry_ptr;
+
+
+/* matrices */
+#ifdef USE_MATRICES
+struct t_matrix_entry {
+  struct t_matrix_entry* m_next_entry;
+  t_matrix m_matrix;
+};
+
+typedef struct t_matrix_entry t_matrix_entry, *t_matrix_entry_ptr;
+#endif
+
+
+/* statics */
+
+/* general */
+static BOOLEAN g_PDF_debug;
+
+/* objects */
+static PDF_OBJECT_NUM		g_next_objnum;
+static t_offset_block_ptr	g_obj_offset_list;	/* first block       */
+static t_offset_block_ptr	g_cur_obj_offset_block;
+
+/* fonts */
+static t_font_list_entry_ptr	g_font_list;		/* backwards         */
+static t_font_encoding_entry_ptr g_font_encoding_list;	/* backwards         */
+
+/* pages */
+static PDF_PAGE_NUM		g_page_count;		/* current page num, */
+							/* starting at 1     */
+static PDF_PAGE_OBJECT_NUM	g_page_object_num;	/* obj num of current*/
+							/* "/Type /Page" obj,*/
+							/* corr. to page     */
+							/* num g_page_count  */
+static t_page_block_ptr		g_page_block_list;	/* first block       */
+static t_page_block_ptr		g_cur_page_block;
+static PDF_OBJECT_NUM		g_pages_root;
+
+/* document */
+static int g_doc_h_bound;
+static int g_doc_v_bound;
+static FULL_CHAR* g_doc_author;
+static FULL_CHAR* g_doc_title;
+static FULL_CHAR* g_doc_subject;
+static FULL_CHAR* g_doc_keywords;
+
+/* link annotations */
+static t_target_annot_entry_ptr g_target_annot_list;
+static BOOLEAN g_has_exported_targets;
+
+/* globals for each page */
+/* these indicate what kind of content the page has */
+static BOOLEAN g_page_uses_fonts;
+static BOOLEAN g_page_has_text;
+static BOOLEAN g_page_has_graphics;
+
+/* these are only defined when the page has some content */
+static PDF_OBJECT_NUM g_page_contents_obj_num;
+static PDF_OBJECT_NUM g_page_length_obj_num;
+static PDF_FILE_OFFSET g_page_start_offset;
+
+/* valid after a PDF_Push and PDF_Pop */
+static t_qsave_entry_ptr g_qsave_stack;
+
+static t_qsave_marking_entry_ptr g_qsave_marking_stack;	/* implemented as a   */
+							/* linked list; pts   */
+							/* to top of stack    */
+static BOOLEAN g_in_buffering_mode;
+static char g_buffer[kBufferSize];			/* this buffer is used*/
+							/* for removing redundant operations */
+static unsigned int g_buffer_pos;
+
+/* valid after a link annotation has been defined */
+static t_source_annot_entry_ptr g_source_annot_list;
+
+#ifdef USE_MATRICES
+static t_matrix g_cur_matrix;
+static t_matrix_entry_ptr g_matrix_stack;
+#endif
+
+/* track these values in case they are ever required */
+static float g_page_h_scale_factor, g_page_v_scale_factor;
+static int g_page_h_origin, g_page_v_origin;
+static int g_page_line_width;
+
+/* magic keywords (actually they will appear in Lout documents as "__in", "__cm", etc.) */
+static char *g_unit_keywords[kNumberOfUnitKeywords] =
+{
+  "in", "cm", "pt", "em", "loutf", "loutv", "louts"	/* MUST be followed by a fp number */
+};
+
+static char *g_graphic_keywords[kNumberOfGraphicsKeywords] =
+{
+  "xsize", "ysize", "xmark", "ymark"	/* like macros, these expand to the actual value */
+};
+
+static char *g_arithmetic_keywords[kNumberOfArithmeticKeywords] =
+{
+  /* syntax: "__mul(x, y)" emits (x * y) to 2 decimal places              */
+  /*                                                                      */
+  /* Notes:                                                               */
+  /*                                                                      */
+  /*    sin and cos expect their arguments in degrees                     */
+  /*                                                                      */
+  /*    for negation, use "__sub(0, arg)"                                 */
+  /*                                                                      */
+  /*    __pick(i, expr1, expr2, expr3...) picks the ith expr from the     */
+  /*    list of expr the "," are optional (if they are not used, you      */
+  /*    should separate values with whitespace)                           */
+
+  "add", "sub", "mul", "div", "sin", "cos", "pick"	/* like macros, these expand to the actual value */
+};
+
+static char *g_link_keywords[kNumberOfLinkKeywords] =
+{
+  /* syntax: "__link_source=<<name_of_target_link [dest_link_option]>>"   */
+  /*                                                                      */
+  /* example: "__link_source=<<chapter6>>"                                */
+  /* example: "__link_source=<<part7 __FitH>>"                            */
+
+  "link_source=<<",
+
+  /* syntax: "__link_external=<<name_of_target_link __link_to=file_spec>>"*/
+  /* syntax: "__link_external=<<name_of_target_link __link_to=<< /FS /URL /F (url)>>>>" */
+  /*                                                                      */
+  /* **	note the special format required for URL links **                 */
+  /*                                                                      */
+  /* example: "__link_external=<<chapter6 __link_to=/usr/bin/file.pdf>>"  */
+  /* example: "__link_external=<<chapter6 __link_to=<< /FS /URL /F        */
+  /*          (ftp://ftp.cs.usyd.edu.au/jeff/lout/user.pdf) >>>>"         */
+
+  "link_external=<<",
+
+  /* syntax: "__link_URI=<<URL>>"                                         */
+  /*                                                                      */
+  /* example: "__link_URI=<<http://www.adobe.com>>"                       */
+
+  "link_URI=<<",
+
+  /* syntax: "__link_target=<<name_of_target_link>>" where                */
+  /* name_of_target_link is in this PDF file; name_of_target_link CANNOT  */
+  /* be accessed by external documents in links                           */
+  /*                                                                      */
+  /* example: "__link_target=<<my_internal_target>>"                      */
+
+  "link_target=<<",
+
+  /* syntax: "__link_target_for_export=<<name_of_target_link>>" where     */
+  /* name_of_target_link is in this file; name_of_target_link can be      */
+  /* accessed by external documents in links                              */
+  /*                                                                      */
+  /* example: "__link_target_for_export=<<my_exported_target>>"           */
+
+  "link_target_for_export=<<"
+};
+
+static char *g_dest_link_options[kNumberOfDestLinkOptions] =
+{
+  /* see PDF_LINK_DEST_OPTION for descriptions of the meanings of these */
+  "__FitNoChange",
+  "__Fit",
+  "__FitH",
+  "__FitV",
+  "__FitR",
+  "__FitB",
+  "__FitBH",
+  "__FitBV"
+};
+
+static char* g_external_file_spec_keyword[1] =
+{
+  "__link_to="
+};
+
+static char* g_doc_info_keywords[kNumberOfDocInfoKeywords] =
+{
+  "author=", "title=", "subject=", "keywords="
+};
+
+static int g_units[kNumberOfUnitKeywords];
+
+static int g_graphics_vars[kNumberOfGraphicsKeywords];
+
+/* text state */
+static BOOLEAN g_TJ_pending;
+static BOOLEAN g_ET_pending;
+static BOOLEAN g_valid_text_matrix;	/* true when BT...ET block open */
+
+
+/* expressions */
+static int g_expr_depth = 0;
+static int g_expr_index;
+static t_tempbuf g_expr;
+
+/* links */
+static int g_link_depth = 0;
+static int g_link_index;
+static t_tempbuf g_link;
+static PDF_LINK_KEYWORD g_link_keyword;
+
+/* the 14 base fonts */
+static char *g_standard_base_14_fonts[kBase14FontCount] = {
+  "Courier",
+  "Courier-Bold",
+  "Courier-Oblique",
+  "Courier-BoldOblique",
+  "Helvetica",
+  "Helvetica-Bold",
+  "Helvetica-Oblique",
+  "Helvetica-BoldOblique",
+  "Symbol",
+  "Times",
+  "Times-Bold",
+  "Times-Italic",
+  "Times-BoldItalic",
+  "ZapfDingbats"
+};
+
+
+#if PDF_COMPRESSION
+static BOOLEAN		g_apply_compression;
+static z_stream		g_comp_stream;           /* zlib compression stream */
+static unsigned char*	g_raw_buffer_ptr;
+
+/* compression buffers */
+static unsigned char	g_raw_output[kRawOutputBufferSize];
+static unsigned char	g_compressed_output[kCompressedOutputBufferSize];
+#endif
+
+/* for calculating largest page object */
+#ifdef _CALC_LARGEST_PAGE_OBJECT_
+static PDF_FILE_OFFSET g_max_page_length = 0;
+#endif
+
+BOOLEAN PDFHasValidTextMatrix(void)	/* this is called from z24.c */
+{
+  return g_valid_text_matrix;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  t_offset_block_ptr  PDFObject_FindOffsetBlock(PDF_OBJECT_NUM in_obj_num) */
+/*                                                                           */
+/*  Find the offset block for the given object number.                       */
+/*                                                                           */
+/*****************************************************************************/
+
+static t_offset_block_ptr PDFObject_FindOffsetBlock(PDF_OBJECT_NUM in_obj_num,
+  unsigned int* out_block_pos)
+{
+  int wanted_block_num = (in_obj_num - 1) / kNumberOfObjectsPerBlock;
+  int block_pos = (in_obj_num - 1) % kNumberOfObjectsPerBlock;
+  t_offset_block_ptr the_block = g_obj_offset_list;
+
+  Assert((in_obj_num > 0) && (in_obj_num < g_next_objnum), no_fpos);
+
+  /* find block */
+  while (wanted_block_num != 0) {
+    Assert(the_block != NULL, no_fpos);
+    the_block = the_block->m_next_block;
+    wanted_block_num--;
+  }
+  Assert(the_block != NULL, no_fpos);
+
+  if (out_block_pos != NULL)
+    *out_block_pos = block_pos;
+  return the_block;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDF_OBJECT_NUM PDFObject_New(FILE* in_fp)                                */
+/*                                                                           */
+/*  Return the next available object number.                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+static PDF_OBJECT_NUM PDFObject_New(/* FILE* in_fp */)
+{
+  int wanted_block_num = (g_next_objnum - 1) / kNumberOfObjectsPerBlock;
+  int block_pos = (g_next_objnum - 1) % kNumberOfObjectsPerBlock;
+  t_offset_block_ptr the_block = g_cur_obj_offset_block;
+
+  /* if first obj in a block then allocate the block */
+  if (block_pos == 0)
+  {
+    the_block = (t_offset_block_ptr) malloc(sizeof(t_offset_block));
+    if (the_block == NULL)
+      Error(48, 1, "PDFObject_New: run out of memory", FATAL, no_fpos);
+    if (wanted_block_num == 0)  /* if first block in file */
+    {
+      Assert(g_obj_offset_list == NULL, no_fpos);
+      g_obj_offset_list = the_block;
+    }
+    else
+    {
+      Assert(g_cur_obj_offset_block != NULL, no_fpos);
+      g_cur_obj_offset_block->m_next_block = the_block;
+    }
+    the_block->m_next_block = NULL;	/* don't forget to init this! */
+    g_cur_obj_offset_block = the_block;
+  }
+  else
+  {
+    Assert(the_block != NULL, no_fpos);
+  }
+
+  /* initialise the offset of this object to zero (it hasn't been written    */
+  /* to the PDF file yet)                                                    */
+  the_block->m_block[block_pos] = 0;                  /* ftell(in_fp);       */
+
+  return g_next_objnum++;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFObject_WriteRef(FILE* in_fp, PDF_OBJECT_NUM in_object_number)    */
+/*                                                                           */
+/*  Return the next available object number and write a reference to it.     */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFObject_WriteRef(FILE* in_fp, PDF_OBJECT_NUM in_object_number)
+{
+  fprintf(in_fp, "%u 0 R", in_object_number);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFObject_WriteObj(FILE* in_fp, PDF_OBJECT_NUM in_object_number)    */
+/*                                                                           */
+/*  Write the object's definition (and remember its file position).          */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFObject_WriteObj(FILE* in_fp, PDF_OBJECT_NUM in_object_number)
+{
+  unsigned int block_pos;
+  t_offset_block_ptr block =
+    PDFObject_FindOffsetBlock(in_object_number, &block_pos);
+  Assert(block->m_block[block_pos]==0, no_fpos); /* offset shd be "unknown"  */
+  block->m_block[block_pos] = ftell(in_fp);	 /* remember offset for xref */
+
+  fprintf(in_fp, "%u 0 obj\n", in_object_number);
+}
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDF_OBJECT_NUM PDFObject_WriteNewObj(FILE* in_fp)                        */
+/*                                                                           */
+/*  Return the next available object number and write its definition.        */
+/*                                                                           */
+/*****************************************************************************/
+
+static PDF_OBJECT_NUM PDFObject_WriteNewObj(FILE* in_fp)
+{
+  PDF_OBJECT_NUM next_ref = PDFObject_New(/* in_fp */);
+  PDFObject_WriteObj(in_fp, next_ref);
+  return next_ref;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDF_OBJECT_NUM PDFObject_WriteNextRef(FILE* in_fp)                       */
+/*                                                                           */
+/*  Return the next available object number and write a reference to it.     */
+/*                                                                           */
+/*****************************************************************************/
+
+/* ***
+static PDF_OBJECT_NUM PDFObject_WriteNextRef(FILE* in_fp)
+{
+  PDF_OBJECT_NUM next_ref = PDFObject_New(in_fp);
+  PDFObject_WriteRef(in_fp, next_ref);
+  return next_ref;
+}
+*** */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/* void PDFFile_BeginFontEncoding(FILE* in_fp, const char* in_encoding_name) */
+/*                                                                           */
+/*  Begin font encoding.                                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFFile_BeginFontEncoding(FILE* in_fp, const char* in_encoding_name)
+{
+  PDF_OBJECT_NUM encoding_num;
+  t_font_encoding_entry_ptr encoding_entry;
+
+  /* TO FILL IN: create entry in font-encoding list and add this encoding    */
+  if (g_PDF_debug)
+    fprintf(in_fp, "%%\n%% font encoding '%s':\n%%\n", in_encoding_name);
+
+  encoding_num = PDFObject_WriteNewObj(in_fp);
+  fputs("<<\n/Type /Encoding\n/Differences [ 0\n", in_fp);
+
+  /* add font encoding to list of encodings (assume we don't get passed the  */
+  /* same encoding more than once)                                           */
+  encoding_entry =
+    (t_font_encoding_entry_ptr) malloc(sizeof(t_font_encoding_entry));
+  if (encoding_entry == NULL)
+    Error(48, 2, "PDFFile_BeginFontEncoding: run out of memory",FATAL,no_fpos);
+
+  encoding_entry->m_font_encoding =
+    (FULL_CHAR*) malloc(strlen(in_encoding_name) + 1);
+  if (encoding_entry->m_font_encoding == NULL)
+    Error(48, 3, "PDFFile_BeginFontEncoding: out of memory", FATAL, no_fpos);
+
+  encoding_entry->m_next_entry = g_font_encoding_list;
+  encoding_entry->m_object_num = encoding_num;
+  strcpy((char*) encoding_entry->m_font_encoding, (char*) in_encoding_name);
+  g_font_encoding_list = encoding_entry;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFFile_EndFontEncoding(FILE* in_fp)                                */
+/*                                                                           */
+/*  End of font encoding.                                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFFile_EndFontEncoding(FILE* in_fp)
+{
+  fputs("]\n>>\nendobj\n", in_fp);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/* const FULL_CHAR* PDFFont_FindListEntry(const FULL_CHAR* in_real_font_name)*/
+/*                                                                           */
+/*  Try to find the font list entry with the specified real font name;       */
+/*  return the entry's reference if found else return NULL.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+static t_font_list_entry_ptr
+  PDFFont_FindListEntry(const FULL_CHAR* in_real_font_name)
+{
+  t_font_list_entry_ptr entry = g_font_list;
+
+  while (entry != NULL) {
+    if (strcmp((char*)in_real_font_name, (char*)entry->m_actual_font_name)==0)
+      break;
+    entry = entry->m_next_font_entry;
+  }
+  return entry;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  const FULL_CHAR*                                                         */
+/*    PDFFont_FindListEntry_Short(const FULL_CHAR* in_short_font_name)       */
+/*                                                                           */
+/*  Try to find the font list entry with the specified real font name;       */
+/*  return the entry's reference if found else return NULL.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+static t_font_list_entry_ptr
+  PDFFont_FindListEntry_Short(const FULL_CHAR* in_short_font_name)
+{
+  t_font_list_entry_ptr entry = g_font_list;
+
+  while (entry != NULL) {
+    if (strcmp((char*)in_short_font_name, (char*)entry->m_short_font_name)==0)
+      break;
+    entry = entry->m_next_font_entry;
+  }
+  return entry;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  const t_font_list_entry_ptr PDFFont_NewListEntry(                        */
+/*   const FULL_CHAR* in_short_font_name, const FULL_CHAR* in_real_font_name)*/
+/*                                                                           */
+/*  Create a new font entry and return the short name of the font.           */
+/*                                                                           */
+/*****************************************************************************/
+
+static t_font_list_entry_ptr
+  PDFFont_NewListEntry(const FULL_CHAR* in_short_font_name,
+			const FULL_CHAR* in_real_font_name,
+			PDF_OBJECT_NUM in_font_encoding_obj)
+{
+  PDF_FONT_NUM next_font_num = 0;
+  t_font_list_entry_ptr new_entry = g_font_list;
+  /* t_font_list_entry_ptr last_font_list_entry = NULL; */
+
+  /* find next available font number */
+  {
+    while (new_entry != NULL) {
+      next_font_num++;
+      new_entry = new_entry->m_next_font_entry;
+    }
+  }
+
+  /* make a new font list entry */
+  {
+    char PDF_font_name[64] = "/F";
+    char num[32];
+
+    new_entry = (t_font_list_entry_ptr) malloc(sizeof(t_font_list_entry));
+    if (new_entry == NULL)
+      Error(48, 4, "PDFFont_NewListEntry: run out of memory", FATAL, no_fpos);
+
+    sprintf(num, "%u", next_font_num);
+    strcat(PDF_font_name, num);
+
+    new_entry->m_PDF_font_name =
+      (FULL_CHAR*) malloc(strlen((char*) PDF_font_name) + 1);
+    if (new_entry->m_PDF_font_name == NULL)
+      Error(48, 5, "PDFFont_NewListEntry: run out of memory", FATAL, no_fpos);
+    strcpy((char*) new_entry->m_PDF_font_name, PDF_font_name);
+
+    new_entry->m_short_font_name =
+      (FULL_CHAR*) malloc(strlen((char*) in_short_font_name) + 1);
+    if (new_entry->m_short_font_name == NULL)
+      Error(48, 6, "PDFFont_NewListEntry: run out of memory", FATAL, no_fpos);
+    strcpy((char*) new_entry->m_short_font_name, (char*) in_short_font_name);
+
+    new_entry->m_actual_font_name =
+      (FULL_CHAR*) malloc(strlen((char*) in_real_font_name) + 1);
+    if (new_entry->m_actual_font_name == NULL)
+      Error(48, 7, "PDFFont_NewListEntry: run out of memory", FATAL, no_fpos);
+    strcpy((char*) new_entry->m_actual_font_name, (char*) in_real_font_name);
+
+    new_entry->m_font_encoding_obj = in_font_encoding_obj;
+
+    new_entry->m_pdf_object_number = 0;	/* don't give this font resource an  */
+					/* object number until needed        */
+    /* new_entry->m_in_use = TRUE; */	/* should be cleared after each page */
+    /* g_page_uses_fonts = TRUE;   */
+    new_entry->m_font_resource_in_pdf = FALSE;	/* not in PDF file yet       */
+
+    new_entry->m_next_font_entry = g_font_list;
+    g_font_list = new_entry;
+  }
+  debug1(DPD, D, "new PDF font entry with short name %s",
+    new_entry->m_short_font_name);
+  return new_entry;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  const t_font_list_entry_ptr PDFGetFont(const char* in_real_font_name)    */
+/*                                                                           */
+/*  Return the reference of a font entry. Never returns NULL.                */
+/*                                                                           */
+/*****************************************************************************/
+/*
+static t_font_list_entry_ptr PDFGetFont(const FULL_CHAR* in_real_font_name)
+{
+  t_font_list_entry_ptr entry = PDFFont_FindListEntry(in_real_font_name);
+  if (entry == NULL)
+    entry = PDFFont_NewListEntry(in_real_font_name);
+  return entry;
+}
+*/
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDFFont_WriteObjectRef(FILE* in_fp, t_font_list_entry_ptr in_font_entry) */
+/*                                                                           */
+/*  Write a reference to the object to the file.                             */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFFont_WriteObjectRef(FILE* in_fp,
+  const t_font_list_entry* in_font_entry)
+{
+  Assert(in_font_entry->m_pdf_object_number != 0, no_fpos);
+  PDFObject_WriteRef(in_fp, in_font_entry->m_pdf_object_number);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFFont_WriteObject(FILE* in_fp,                                    */
+/*    t_font_list_entry_ptr in_font_entry)                                   */
+/*                                                                           */
+/*  Write a reference to the object to the file.                             */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFFont_WriteObject(FILE* in_fp, t_font_list_entry_ptr in_font_entry)
+{
+  if (in_font_entry->m_pdf_object_number == 0)
+    in_font_entry->m_pdf_object_number = PDFObject_New(/* in_fp */);
+  PDFObject_WriteObj(in_fp, in_font_entry->m_pdf_object_number);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  BOOLEAN PDFFont_IsOneOfTheBase14Fonts(const FULL_CHAR* in_real_font_name)*/
+/*                                                                           */
+/*  Returns true if given font is one of the base 14 fonts.                  */
+/*                                                                           */
+/*****************************************************************************/
+
+static BOOLEAN PDFFont_IsOneOfTheBase14Fonts(const FULL_CHAR* in_real_font_name)
+{
+  int i;
+  for (i = 0; i < kBase14FontCount; i++)
+    if (strcmp(g_standard_base_14_fonts[i], (char*) in_real_font_name) == 0)
+      return TRUE;
+  return FALSE;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDFFont_WriteFontResource(FILE* in_fp,                                   */
+/*    t_font_list_entry_ptr in_font_entry)                                   */
+/*                                                                           */
+/*  Writes out the PDF idea of a Font resource.                              */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFFont_WriteFontResource(FILE* in_fp,
+  t_font_list_entry_ptr in_font_entry)
+{
+  if (! in_font_entry->m_font_resource_in_pdf)
+  {
+    in_font_entry->m_font_resource_in_pdf = TRUE;
+
+    if (g_PDF_debug)
+      fprintf(in_fp, "%%\n%% declare use of font %s:\n%%\n",
+	in_font_entry->m_actual_font_name);
+
+    PDFFont_WriteObject(in_fp, in_font_entry);
+    fputs("<<\n/Type /Font\n/Subtype /Type1\n", in_fp);
+    fprintf(in_fp, "/Name %s\n", (char*) in_font_entry->m_PDF_font_name);
+    fprintf(in_fp, "/BaseFont /%s\n", (char*) in_font_entry->m_actual_font_name);
+    if (! PDFFont_IsOneOfTheBase14Fonts(in_font_entry->m_actual_font_name))
+    {
+      /* ***
+      fputs("/FirstChar 0"\n, in_fp);	- we don't do first chars (yet)
+      fputs("/LastChar 255\n", in_fp);	- we don't do last chars (yet)
+      fputs("/Widths ", in_fp);		- we don't do last chars (yet)
+      fputs("/FontDescriptor ", in_fp);	- we don't do font descriptors (yet)
+      *** */
+    }
+
+    if (in_font_entry->m_font_encoding_obj != 0)
+    {
+      fputs("/Encoding ", in_fp);
+      PDFObject_WriteRef(in_fp, in_font_entry->m_font_encoding_obj);
+      fputs("\n", in_fp);
+    }
+
+    /* ***
+    else
+      Error(48, 8, "PDFFont_WriteFontResource: a font has no encoding",
+	WARN, no_fpos);
+    *** */
+    fputs(">>\nendobj\n", in_fp);
+  }
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDFFont_WriteFontResource_name(FILE* in_fp,                              */
+/*    const FULL_CHAR* in_real_font_name)                                    */
+/*                                                                           */
+/*  Writes out the PDF idea of a Font resource.                              */
+/*                                                                           */
+/*****************************************************************************/
+
+/* ***
+static void PDFFont_WriteFontResource_name(FILE* in_fp,
+  const FULL_CHAR* in_real_font_name)
+{
+  t_font_list_entry_ptr entry = PDFFont_FindListEntry(in_real_font_name);
+  Assert(entry != NULL, no_fpos);
+  PDFFont_WriteFontResource(in_fp, entry);
+}
+*** */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  const FULL_CHAR* PDFGetPDFFontName(const FULL_CHAR* in_real_font_name)   */
+/*                                                                           */
+/*  Return the short name of a font.                                         */
+/*                                                                           */
+/*****************************************************************************/
+
+/* ***
+static const FULL_CHAR* PDFGetPDFFontName(const FULL_CHAR* in_real_font_name)
+{
+  t_font_list_entry_ptr entry = PDFFont_FindListEntry(in_real_font_name);
+  Assert(entry != NULL, no_fpos);
+  return entry->m_PDF_font_name;
+}
+*** */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/* PDF_OBJECT_NUM PDFFont_FindFontEncoding(FULL_CHAR* in_font_encoding_name) */
+/*                                                                           */
+/*  Return the object number of a given font encoding.                       */
+/*                                                                           */
+/*****************************************************************************/
+
+static PDF_OBJECT_NUM PDFFont_FindFontEncoding(
+  const FULL_CHAR* in_font_encoding_name)
+{
+  t_font_encoding_entry_ptr entry = g_font_encoding_list;
+
+  while (entry != NULL)
+  {
+    if (strcmp((char*)in_font_encoding_name, (char*)entry->m_font_encoding)==0)
+      break;
+    entry = entry->m_next_entry;
+  }
+  return (entry != NULL) ? entry->m_object_num : 0;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFFont_AddFont(                                                    */
+/*           FILE* in_fp, const FULL_CHAR* in_short_font_name,               */
+/*           const FULL_CHAR* in_real_font_name)                             */
+/*                                                                           */
+/*  Add this font to the list of fonts that the document uses. Also remember */
+/*  that this font is "in use" (output when page resources are written).     */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFFont_AddFont(FILE* in_fp, const FULL_CHAR* in_short_font_name,
+  const FULL_CHAR* in_real_font_name, const FULL_CHAR* in_font_encoding_name)
+{
+  t_font_list_entry_ptr entry = PDFFont_FindListEntry(in_real_font_name);
+  debug4(DPD, D, "PDFFont_AddFont(-, %s, %s, %s) [new = %s]",
+    in_short_font_name, in_real_font_name, in_font_encoding_name,
+    bool(entry == NULL));
+  /* *** this attempted bug fix by Jeff K. problem may be multiple font
+	 entries for the same font
+  if (entry == NULL)
+  *** */
+  if (TRUE)
+    entry = PDFFont_NewListEntry(in_short_font_name, in_real_font_name,
+      PDFFont_FindFontEncoding(in_font_encoding_name));
+
+  /* ***
+  entry->m_in_use = TRUE;
+  g_page_uses_fonts = TRUE;
+  *** */
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFPage_SetVars(int xsize, int ysize, int xmark, int ymark,         */
+/*    int loutf, int loutv, int louts)                                       */
+/*                                                                           */
+/*  Writes a string to the page's stream.                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFPage_SetVars(int xsize, int ysize, int xmark, int ymark,
+  int loutf, int loutv, int louts)
+{
+  g_graphics_vars[k_xsize] = xsize;
+  g_graphics_vars[k_ysize] = ysize;
+  g_graphics_vars[k_xmark] = xmark;
+  g_graphics_vars[k_ymark] = ymark;
+
+  g_units[k_loutf] = loutf;
+  g_units[k_loutv] = loutv;
+  g_units[k_louts] = louts;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFPage_FlushCompressedBuffer(FILE* in_fp)                          */
+/*                                                                           */
+/*  Flushes the compressed output buffer to the page's stream.               */
+/*                                                                           */
+/*****************************************************************************/
+
+#if PDF_COMPRESSION
+static void PDFPage_FlushCompressedBuffer(FILE* in_fp)
+{
+  int err;
+
+  Assert(g_apply_compression, no_fpos);
+  do {
+    err = deflate(&g_comp_stream, Z_FINISH);
+
+    fwrite(g_compressed_output,
+      sizeof(g_compressed_output) - g_comp_stream.avail_out, 1, in_fp);
+    g_comp_stream.next_out = g_compressed_output;
+    g_comp_stream.avail_out = sizeof(g_compressed_output);
+  } while (err == Z_OK);
+
+  if (err != Z_STREAM_END)
+    Error(48, 9, "PDFPage_FlushCompressedBuffer: zlib error occurred",
+      FATAL, no_fpos);
+
+  err = deflateEnd(&g_comp_stream);
+  if (err != Z_OK)
+    Error(48, 10, "PDFPage_FlushCompressedBuffer: zlib error occurred",
+      FATAL, no_fpos);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFPage_FlushRawBuffer(FILE* in_fp)                                 */
+/*                                                                           */
+/*  Attempts to compress the raw buffer; also flushes the compressed output  */
+/*  buffer to the page's stream if it is full.                               */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFPage_FlushRawBuffer(FILE* in_fp)
+{
+  int err;
+
+  /* compress the raw buffer */
+  Assert(g_apply_compression, no_fpos);
+  g_comp_stream.next_in = g_raw_output;
+  g_comp_stream.avail_in = (uInt) (g_raw_buffer_ptr - g_raw_output);
+  Assert(g_comp_stream.avail_out != 0, no_fpos);
+
+  /* always compress to the point where the raw buffer is empty */
+  do {
+    err = deflate(&g_comp_stream, Z_NO_FLUSH);
+    if (err != Z_OK)
+      Error(48, 11, "PDFPage_FlushRawBuffer: zlib error occurred",FATAL,no_fpos);
+
+    /* IF compressed output buffer is full THEN flush it to disk and reset it */
+    if (g_comp_stream.avail_out == 0)
+    {
+      if (fwrite(g_compressed_output, sizeof(g_compressed_output), 1, in_fp)!=1)
+	Error(48, 12, "PDFPage_FlushRawBuffer: write error occurred",
+	  FATAL, no_fpos);
+      g_comp_stream.next_out = g_compressed_output;
+      g_comp_stream.avail_out = sizeof(g_compressed_output);
+    }
+  } while (g_comp_stream.avail_in != 0);
+
+  /* reset raw buffer for next call */
+  g_raw_buffer_ptr = g_raw_output;
+}
+#endif
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFPage_WriteStream(FILE* in_fp, char* in_str)                      */
+/*                                                                           */
+/*  Writes a string to the page's stream.                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFPage_WriteStream(FILE* in_fp, char* in_str)
+{
+  if (*in_str == 0)
+    return;
+
+#if PDF_COMPRESSION
+  if (g_apply_compression)
+  {
+    unsigned int total = strlen(in_str);
+    char *ptr = in_str;
+
+    while (total != 0)
+    {
+      unsigned int len = total;
+      BOOLEAN needToFlush =
+	((g_raw_buffer_ptr + len) > (g_raw_output + sizeof(g_raw_output)));
+      if (needToFlush)
+	len = g_raw_output + sizeof(g_raw_output) - g_raw_buffer_ptr;
+      memcpy(g_raw_buffer_ptr, ptr, len);
+
+      ptr += len;
+      g_raw_buffer_ptr += len;
+      total -= len;
+
+      /* IF need to flush raw buffer THEN do so */
+      if (needToFlush) PDFPage_FlushRawBuffer(in_fp);
+    } /* while still have bytes to process */
+  }
+  else
+#endif
+    fputs(in_str, in_fp);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFPage_Begin(FILE* in_fp)                                          */
+/*                                                                           */
+/*  Begins the page's stream.                                                */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFPage_Begin(FILE* in_fp)
+{
+  if (g_page_contents_obj_num == 0)
+  {
+    t_tempbuf str;
+
+    if (g_PDF_debug)
+      fprintf(in_fp, "%%\n%% page %u's contents:\n%%\n", g_page_count);
+
+    g_page_contents_obj_num = PDFObject_WriteNewObj(in_fp);
+    g_page_length_obj_num = PDFObject_New(/* in_fp */);
+    fputs("<< /Length ", in_fp);
+    PDFObject_WriteRef(in_fp, g_page_length_obj_num);
+#if PDF_COMPRESSION
+    if (g_apply_compression) fputs(" /Filter /FlateDecode", in_fp);
+#endif
+    fputs(" >>\nstream\n", in_fp);
+    g_page_start_offset = ftell(in_fp);
+
+#if PDF_COMPRESSION
+    if (g_apply_compression)
+    {
+      int err;
+
+      g_raw_buffer_ptr = g_raw_output;
+      g_comp_stream.zalloc = (alloc_func) Z_NULL;
+      g_comp_stream.zfree = (free_func) Z_NULL;
+      g_comp_stream.opaque = (voidpf) Z_NULL;
+
+      err = deflateInit(&g_comp_stream, Z_DEFAULT_COMPRESSION);
+      if (err != Z_OK)
+	Error(48, 13, "PDFPage_Begin: zlib error occurred", FATAL, no_fpos);
+
+      g_comp_stream.next_out = g_compressed_output;
+      g_comp_stream.avail_out = sizeof(g_compressed_output);
+    }
+#endif
+
+#ifndef USE_MATRICES
+    sprintf(str, "%.2f 0 0 %.2f 0 0 cm\n",
+      g_page_h_scale_factor, g_page_v_scale_factor);
+    PDFPage_WriteStream(in_fp, str);
+#endif
+    sprintf(str, "%u w\n", g_page_line_width);
+    PDFPage_WriteStream(in_fp, str);
+  }
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFPage_FlushBuffer(FILE* in_fp)                                    */
+/*                                                                           */
+/*  Flush the buffer to the page's stream and turn off buffering mode.       */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFPage_FlushBuffer(FILE* in_fp)
+{
+  if (g_in_buffering_mode)
+  {
+    g_in_buffering_mode = FALSE;
+
+    /* empty the stack since it's no longer needed */
+    while (g_qsave_marking_stack != NULL)
+    {
+      t_qsave_marking_entry_ptr entry = g_qsave_marking_stack;
+      g_qsave_marking_stack = entry->m_next_entry;
+      free(entry);
+    }
+
+    /* output the buffer */
+    PDFPage_WriteStream(in_fp, g_buffer);
+  }
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDF_FILE_OFFSET PDFPage_End(FILE* in_fp)                                 */
+/*                                                                           */
+/*  Ends the page's stream.                                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+static PDF_FILE_OFFSET PDFPage_End(FILE* in_fp)
+{
+
+  /* if page has no marks on it then write out an empty stream */
+  if (g_in_buffering_mode)
+  {
+    g_buffer_pos = 0;
+    g_buffer[0] = '\0';			/* force empty string to be written  */
+    PDFPage_FlushBuffer(in_fp);	  /* all I really want is to empty the stack */
+  }
+
+  /* IF applying compression THEN first flush the raw buffer and then flush */
+  /* the compressed buffer (must be performed in that order!)               */
+#if PDF_COMPRESSION
+  if (g_apply_compression)
+  {
+    if ((g_raw_buffer_ptr > g_raw_output) && (g_raw_buffer_ptr[-1] == '\n'))
+      g_raw_buffer_ptr--;		/* remove last linefeed */
+
+    PDFPage_FlushRawBuffer(in_fp);
+    PDFPage_FlushCompressedBuffer(in_fp);
+    fputs("\n", in_fp);
+  }
+#endif
+
+  /* close page's stream */
+  Assert(g_page_contents_obj_num != 0, no_fpos);
+  {
+    PDF_FILE_OFFSET page_length = ftell(in_fp) - g_page_start_offset;
+
+    /* close page's stream */
+    fputs("endstream\nendobj\n", in_fp);
+    return page_length;
+  }
+  return 0;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFPage_Write(FILE* in_fp, char* in_str)                            */
+/*                                                                           */
+/*  Writes a string to the page's stream.                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFPage_Write(FILE* in_fp, char* in_str)
+{
+  if (*in_str == 0)
+    return;
+
+  PDFPage_Begin(in_fp);	/* write page content's hdr "<< /Length >> stream"...*/
+
+  /* IF trying to remove redundant operations THEN */
+  if (g_in_buffering_mode)
+  {
+
+    /* if buffer will overflow then turn off buffering and flush buffer */
+    unsigned int len = strlen(in_str);
+    if ( (g_buffer_pos + len) > (kBufferSize-1) )	/* -1 for NULL char */
+    {
+      PDFPage_FlushBuffer(in_fp);
+      PDFPage_WriteStream(in_fp, in_str);
+    }
+    else
+    {
+      strcpy(g_buffer + g_buffer_pos, in_str);		/* save into buffer */
+      g_buffer_pos += len;
+    }
+  }
+  else
+  {
+    if (g_TJ_pending)
+    {
+      g_TJ_pending  = FALSE;				/* clear it */
+      PDFPage_WriteStream(in_fp, ")]TJ\n");
+    }
+
+    if (g_ET_pending)
+    {
+      g_ET_pending  = FALSE;				/* clear it */
+      PDFPage_WriteStream(in_fp, "ET\n");
+      g_valid_text_matrix = FALSE;			/* Td is not allowed */
+    }
+
+    PDFPage_WriteStream(in_fp, in_str);
+  }
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDFPage_Push(FILE* in_fp)                                                */
+/*                                                                           */
+/*  Saves the current graphics state.                                        */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFPage_Push(FILE* in_fp)
+{
+
+  /* push origin coords */
+  {
+    t_qsave_entry_ptr entry = (t_qsave_entry_ptr) malloc(sizeof(t_qsave_entry));
+    if (entry == NULL)
+      Error(48, 14, "PDFPage_Push: run out of memory", FATAL, no_fpos);
+
+    entry->m_page_h_origin = g_page_h_origin;
+    entry->m_page_v_origin = g_page_v_origin;
+    /* entry->m_page_h_scale_factor = g_page_h_scale_factor; */
+    /* entry->m_page_v_scale_factor = g_page_v_scale_factor; */
+    entry->m_next_entry = g_qsave_stack;
+    g_qsave_stack = entry;
+  }
+
+  /* if buffering text */
+  if (g_in_buffering_mode)
+  {
+
+    /* push current state */
+    t_qsave_marking_entry_ptr entry =
+      (t_qsave_marking_entry_ptr) malloc(sizeof(t_qsave_marking_entry));
+    if (entry == NULL)
+      Error(48, 15, "PDFPage_Push: run out of memory", FATAL, no_fpos);
+
+    entry->m_next_entry = g_qsave_marking_stack;    /* next-to-top-of-stack */
+    entry->m_buffer_pos = g_buffer_pos;
+    g_qsave_marking_stack = entry;		    /* new TOS              */
+    /* g_in_buffering_mode = TRUE; */
+  }
+
+  /* write out push op */
+  PDFPage_Write(in_fp, "q\n");
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDFPage_Pop(FILE* in_fp)                                                 */
+/*                                                                           */
+/*  Restores the current graphics state.                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFPage_Pop(FILE* in_fp)
+{
+
+  /* pop origin coords */
+  {
+    t_qsave_entry_ptr entry = g_qsave_stack;
+
+    g_page_h_origin = entry->m_page_h_origin;
+    g_page_v_origin = entry->m_page_v_origin;
+    /* g_page_h_scale_factor = entry->m_page_h_scale_factor; */
+    /* g_page_v_scale_factor = entry->m_page_v_scale_factor; */
+
+    g_qsave_stack = entry->m_next_entry;
+
+    free(entry);
+  }
+
+  /* if no marks on page since last push (and thus there should be a stack) */
+  if (g_in_buffering_mode)
+  {
+
+    /* pop state: behave as if the q...Q never existed */
+    t_qsave_marking_entry_ptr entry = g_qsave_marking_stack;
+
+    Assert(entry != NULL, no_fpos);
+
+    g_qsave_marking_stack = entry->m_next_entry;	/* new TOS */
+    g_buffer_pos   = entry->m_buffer_pos;
+    g_buffer[g_buffer_pos] = '\0';	/* chop off unwanted text */
+
+    free(entry);
+  }
+  else
+  {
+    Assert(g_qsave_marking_stack == NULL, no_fpos);
+    PDFPage_Write(in_fp, "\nQ\n");
+  }
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDFFont_Set(FILE* in_fp, FULL_LENGTH in_font_size,                       */
+/*    FULL_CHAR* in_font_name)                                               */
+/*                                                                           */
+/*  Sets the font name and size for subsequent text write statements.        */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFFont_Set(FILE* in_fp, FULL_LENGTH in_font_size,
+  FULL_CHAR *in_short_font_name)
+{
+  t_tempbuf str;
+
+  t_font_list_entry_ptr entry = PDFFont_FindListEntry_Short(in_short_font_name);
+  if( entry == NULL )
+  {
+    Error(48, 42, "cannot find font entry for name %s", FATAL, no_fpos,
+      in_short_font_name);
+  }
+  /* Assert(entry != NULL, no_fpos); */
+#ifdef USE_MATRICES
+  sprintf(str, "%s %u Tf\n", entry->m_PDF_font_name,
+    (int) (g_page_v_scale_factor * in_font_size));
+#else
+  sprintf(str, "%s %u Tf\n", entry->m_PDF_font_name, in_font_size);
+  /* g_text_font_size_in_ems = g_page_v_scale_factor * in_font_size; */
+#endif
+
+#if 1
+
+  /* font changes can occur within BT...ET blocks, so temporarily turn off   */
+  /* g_ET_pending. I do it this way so that the qsave_marking_stack          */
+  /* optimisation can still be applied (this avoids output such as           */
+  /* "/F0 240 Tf /F0 240 Tf /F1 600 Tf" and instead produces "")             */
+  if (g_TJ_pending)
+  {
+    g_TJ_pending = FALSE;		/* clear it */
+    PDFPage_WriteStream(in_fp, ")]TJ\n");
+  }
+
+  {
+    BOOLEAN cur_ET_pending = g_ET_pending;
+
+    g_ET_pending = FALSE;		/* clear it */
+    PDFPage_Write(in_fp, str);
+    g_ET_pending = cur_ET_pending;	/* restore it */
+  }
+#else
+  /* font changes can occur within BT...ET blocks, so bypass PDFPage_Write() */
+  PDFPage_WriteStream(in_fp, str);
+#endif
+  entry->m_in_use = TRUE;
+  g_page_uses_fonts = TRUE;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFText_RMove(FILE* in_fp, int hdelta, int vdelta)                  */
+/*                                                                           */
+/*  Offsets text pen by the given offsets.                                   */
+/*                                                                           */
+/*****************************************************************************/
+
+/* ***
+void PDFText_RMove(FILE* in_fp, int hdelta, int vdelta)
+{
+  t_tempbuf str;
+
+  g_tx_hpos += hdelta;
+  g_tx_vpos += vdelta;
+#if 1
+  sprintf(str, "ET\n1 0 0 1 %d %d cm\nBT\n", hdelta, vdelta);
+#else
+  sprintf(str, "1 0 0 1 %d %d Tm\n", g_tx_hpos, g_tx_vpos);
+#endif
+  PDFPage_Write(in_fp, str);
+}
+*** */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFText_MoveTo(FILE* in_fp, int hpos, int vpos)                     */
+/*                                                                           */
+/*  Move text pen to the given coords.                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+/* ***
+static void PDFText_MoveTo(FILE* in_fp, int hpos, int vpos)
+{
+  g_tx_hpos = 0;
+  g_tx_vpos = 0;
+#if 1
+  PDFText_RMove(in_fp, hpos, vpos);
+#else
+  {
+    t_tempbuf str;
+    sprintf(str, "1 0 0 1 %d %d Tm\n", hpos, vpos);
+    PDFPage_Write(in_fp, str);
+  }
+#endif
+}
+*** */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFText_OpenString(FILE* in_fp)                                     */
+/*                                                                           */
+/*  Open TJ block                                                            */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFText_OpenString(FILE* in_fp)
+{
+  if (g_TJ_pending)
+    g_TJ_pending = FALSE;	/* clear it */
+  else
+    PDFPage_Write(in_fp, "[(");
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFText_MoveToXYAndOpen(FILE* in_fp, int hpos, int vpos)           */
+/*                                                                           */
+/*  Move text pen to the given coords.                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFText_MoveToXYAndOpen(FILE* in_fp, int hpos, int vpos)
+{
+#if 1
+  t_tempbuf str;
+  sprintf(str, "1 0 0 1 %d %d Tm\n", hpos, vpos);
+  PDFPage_Write(in_fp, str);
+#else
+  PDFText_MoveTo(in_fp, hpos, vpos);
+#endif
+  PDFText_OpenString(in_fp);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFText_MoveToXAndOpen(FILE* in_fp, int hpos, int vpos)             */
+/*                                                                           */
+/*  Move text pen to the given coords.                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFText_MoveToXAndOpen(FILE* in_fp, int hpos)
+{
+#if 1
+  t_tempbuf str;
+  sprintf(str, "%d 0 Td\n", hpos);
+  PDFPage_Write(in_fp, str);
+#else
+  PDFText_MoveTo(in_fp, hpos, vpos);
+#endif
+  PDFText_OpenString(in_fp);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFText_OpenBT(FILE* in_fp)                                         */
+/*                                                                           */
+/*  Opens a text object at the given coords.                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFText_OpenBT(FILE* in_fp)
+{
+  PDFPage_FlushBuffer(in_fp);	/* about to mark page: flush buffered PDF    */
+
+  g_page_has_text = TRUE;
+
+  if (g_TJ_pending)
+  {
+    g_TJ_pending = FALSE;		/* clear it */
+    PDFPage_WriteStream(in_fp, ")]TJ\n");
+  }
+
+  if (g_ET_pending)
+    g_ET_pending = FALSE;		/* clear it */
+  else
+  {
+    PDFPage_Write(in_fp, "BT\n");
+    g_valid_text_matrix = TRUE;		/* Td is allowed */
+  }
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFText_OpenXY(FILE* in_fp, int hpos, int vpos)                     */
+/*                                                                           */
+/*  Opens a text object at the given coords.                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFText_OpenXY(FILE* in_fp, int hpos, int vpos)
+{
+  PDFText_OpenBT(in_fp);
+  PDFText_MoveToXYAndOpen(in_fp, hpos, vpos);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFText_OpenX(FILE* in_fp, int hpos)                                */
+/*                                                                           */
+/*  Opens a text object at the given coords.                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFText_OpenX(FILE* in_fp, int hpos)
+{
+  PDFText_OpenBT(in_fp);
+  PDFText_MoveToXAndOpen(in_fp, hpos);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFText_Open(FILE* in_fp)                                           */
+/*                                                                           */
+/*  Opens a text object.                                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFText_Open(FILE* in_fp)
+{
+  if (g_TJ_pending)
+  {
+    g_TJ_pending = FALSE;		/* clear it */
+    Assert(g_ET_pending == TRUE, no_fpos);
+    g_ET_pending = FALSE;		/* clear it */
+  }
+  else
+  {
+    PDFText_OpenBT(in_fp);
+    PDFText_OpenString(in_fp);
+  }
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFText_Kern(FILE* in_fp, int in_kern)                              */
+/*                                                                           */
+/*  Apply kerning to a text string.                                          */
+/*                                                                           */
+/*  Note: in_kern is in 1/1000 of font size                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFText_Kern(FILE* in_fp, int in_kern)
+{
+  t_tempbuf str;
+
+  /* sprintf(str, ")%d(", -in_kern * 1000 / g_text_font_size_in_ems); */
+  sprintf(str, ")%d(", -in_kern);
+  PDFPage_Write(in_fp, str);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFText_Close(FILE* in_fp)                                          */
+/*                                                                           */
+/*  Closes a previously opened text object.                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFText_Close(FILE* in_fp)
+{
+  /* PDFPage_Begin(in_fp); - shouldn't be needed */
+  Assert(g_page_contents_obj_num != 0, no_fpos);
+
+  g_TJ_pending = TRUE;
+  /* PDFPage_Write(in_fp, ")] TJ\n"); */
+  g_ET_pending = TRUE;
+}
+
+
+#ifdef USE_MATRICES
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDF_Matrix_XY(double* in_out_x, double* in_out_y)                   */
+/*                                                                           */
+/*  Returns (x, y) after applying the current matrix:                        */
+/*                                                                           */
+/*                                  [ a b 0 ]                                */
+/*  [ x y 1 ]       x       [ c d 0 ]       =       [ ax+cy+e  bx+dy+f  1 ]  */
+/*                                  [ e f 1 ]                                */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDF_Matrix_XY(double* in_out_x, double* in_out_y)
+{
+  double result_x, result_y;
+
+  result_x = g_cur_matrix[0] * *in_out_x + g_cur_matrix[3] * *in_out_y +
+    g_cur_matrix[6];
+  result_y = g_cur_matrix[1] * *in_out_x + g_cur_matrix[4] * *in_out_y +
+    g_cur_matrix[7];
+  *in_out_x = result_x;
+  *in_out_y = result_y;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDF_Matrix_Mul(t_matrix in_left, t_matrix in_right, t_matrix out_result) */
+/*                                                                           */
+/*  Multiplies the given matrices.                                           */
+/*                                                                           */
+/*  [ a b 0 ]               [ g h 0 ]               [ ag+bi   ah+bj   0 ]    */
+/*  [ c d 0 ]       x       [ i j 0 ]       =       [ cg+di   ch+dj   0 ]    */
+/*  [ e f 1 ]               [ k l 1 ]               [ eg+fi+k eh+fj+l 1 ]    */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDF_Matrix_Mul(t_matrix in_left, t_matrix in_right,
+  t_matrix out_result)
+{
+  t_matrix result;
+  result[0] = in_left[0] * in_right[0] + in_left[1] * in_right[3];
+  result[1] = in_left[0] * in_right[1] + in_left[1] * in_right[4];
+  result[2] = 0;
+  result[3] = in_left[3] * in_right[0] + in_left[4] * in_right[3];
+  result[4] = in_left[3] * in_right[1] + in_left[4] * in_right[4];
+  result[5] = 0;
+  result[6] = in_left[6] * in_right[0] + in_left[7] * in_right[3] + in_right[6];
+  result[7] = in_left[6] * in_right[1] + in_left[7] * in_right[4] + in_right[7];
+  result[8] = 1;
+
+  memcpy(out_result, result, sizeof(t_matrix));
+}
+#endif
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void  PDFPage_Scale(float in_h_scale_factor, float in_v_scale_factor)    */
+/*                                                                           */
+/*  Changes CTM by scale factor:                                             */
+/*                                                                           */
+/*  [  sh   0  0 ]                                                           */
+/*  [   0  sv  0 ]                                                           */
+/*  [   0   0  1 ]                                                           */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFPage_Scale(FILE* in_fp, float in_h_scale_factor, float in_v_scale_factor)
+{
+#ifdef USE_MATRICES
+  t_matrix m = { 0, 0, 0, 0, 0, 0, 0, 0, 1 };
+  m[0] = in_h_scale_factor;
+  m[4] = in_v_scale_factor;
+
+  PDF_Matrix_Mul(m, g_cur_matrix, g_cur_matrix);
+#else
+  t_tempbuf str;
+
+  sprintf(str, "%.2f 0 0 %.2f 0 0 cm\n", in_h_scale_factor, in_v_scale_factor);
+  PDFPage_Write(in_fp, str);
+#endif
+  g_page_h_scale_factor *= in_h_scale_factor;
+  g_page_v_scale_factor *= in_v_scale_factor;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void  PDFPage_Rotate(FILE* in_fp, float in_angle_in_radians)             */
+/*                                                                           */
+/*  Changes CTM by rotation factor.                                          */
+/*                                                                           */
+/*  [  cos a  sin a  0 ]                                                     */
+/*  [ -sin a  cos a  0 ]                                                     */
+/*  [   0       0    1 ]                                                     */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFPage_Rotate(FILE* in_fp, float in_angle_in_radians)
+{
+  float cos_radians = cos(in_angle_in_radians);
+  float sin_radians = sin(in_angle_in_radians);
+#ifdef USE_MATRICES
+  t_matrix m = { 0, 0, 0, 0, 0, 0, 0, 0, 1 };
+  m[0] = m[4] = cos_radians;
+  m[1] = sin_radians;
+  m[3] = -sin_radians;
+  PDF_Matrix_Mul(m, g_cur_matrix, g_cur_matrix);
+#else
+  t_tempbuf str;
+
+  sprintf(str, "%.2f %.2f %.2f %.2f 0 0 cm\n", cos_radians, sin_radians,
+    -sin_radians, cos_radians);
+  PDFPage_Write(in_fp, str);
+#endif
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void  PDFPage_Translate(FILE* in_fp, float in_delta_h, float in_delta_v) */
+/*                                                                           */
+/*  Changes CTM by translation:                                              */
+/*                                                                           */
+/*  [  1  0  0 ]                                                             */
+/*  [  0  1  0 ]                                                             */
+/*  [  dh dv 1 ]                                                             */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFPage_Translate(FILE* in_fp, float in_delta_h, float in_delta_v)
+{
+#ifdef USE_MATRICES
+  t_matrix m = { 1, 0, 0, 0, 1, 0, 0, 0, 1 };
+  m[6] = in_delta_h;
+  m[7] = in_delta_v;
+  PDF_Matrix_Mul(m, g_cur_matrix, g_cur_matrix);
+#else
+  t_tempbuf str;
+
+  sprintf(str, "1 0 0 1 %.2f %.2f cm\n", in_delta_h, in_delta_v);
+  PDFPage_Write(in_fp, str);
+#endif
+  g_page_h_origin += in_delta_h;
+  g_page_v_origin += in_delta_v;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFTargetAnnot_New(FULL_CHAR* in_annot_name, ...)                   */
+/*                                                                           */
+/*  Create a new target annotation entry.                                    */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFTargetAnnot_New(FULL_CHAR* in_annot_name,
+  unsigned int in_annot_name_length, int in_ll_x, int in_ll_y, int in_ur_x,
+  int in_ur_y, BOOLEAN in_for_export)
+{
+  t_target_annot_entry_ptr entry =
+    (t_target_annot_entry_ptr) malloc(sizeof(t_target_annot_entry));
+
+  if (entry == NULL)
+    Error(48, 16, "PDFTargetAnnot_New: run out of memory", FATAL, no_fpos);
+
+  entry->m_name = (FULL_CHAR*) malloc(in_annot_name_length + 1);
+  if (entry->m_name == NULL)
+    Error(48, 17, "PDFTargetAnnot_New: run out of memory", FATAL, no_fpos);
+  memcpy(entry->m_name, in_annot_name, in_annot_name_length);
+  entry->m_name[in_annot_name_length] = '\0';
+
+  Assert(g_page_contents_obj_num != 0, no_fpos);
+  entry->m_page_object_num = g_page_object_num;
+
+  entry->m_ll_x = in_ll_x;
+  entry->m_ll_y = in_ll_y;
+  entry->m_ur_x = in_ur_x;
+  entry->m_ur_y = in_ur_y;
+  entry->m_for_export = in_for_export;
+
+  entry->m_next_entry = g_target_annot_list;
+  g_target_annot_list = entry;
+
+  if (in_for_export)
+    g_has_exported_targets = in_for_export;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  t_target_annot_entry_ptr PDFTargetAnnot_Find(FULL_CHAR* in_annot_name)   */
+/*                                                                           */
+/*  Finds an annotation. Returns NULL if not found.                          */
+/*                                                                           */
+/*****************************************************************************/
+
+static t_target_annot_entry_ptr PDFTargetAnnot_Find(FULL_CHAR* in_annot_name)
+{
+  t_target_annot_entry_ptr entry = g_target_annot_list;
+
+  /* this takes O(n) time; may need re-implementing if speed is a factor */
+  while (entry != NULL)
+  {
+    if (strcmp((char*) in_annot_name, (char*) entry->m_name) == 0)
+      break;
+    entry = entry->m_next_entry;
+  }
+
+  return entry;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDFSourceAnnot_Write(FILE* in_fp,                                        */
+/*    t_source_annot_entry_ptr in_source_entry)                              */
+/*                                                                           */
+/*  Write an annot which specifies the source and target of the link.        */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFSourceAnnot_Write(FILE* in_fp, t_source_annot_entry_ptr in_entry)
+{
+  t_target_annot_entry_ptr target;
+
+  Assert(in_entry != NULL, no_fpos);
+
+  target = in_entry->m_target;
+
+  /* if it is an unresolved forward link then exit */
+  if ( (in_entry->m_link_type == k_link_source) && (target == NULL) )
+    return;
+
+  /* green light: write it out */
+  if (g_PDF_debug)
+  {
+    fprintf(in_fp, "%%\n%% annotation in page object # %u to %s:\n%%\n",
+      in_entry->m_this_page_object_num, in_entry->m_target->m_name);
+  }
+
+  PDFObject_WriteObj(in_fp, in_entry->m_this_object_num);
+  fprintf(in_fp, "<<\n/Type /Annot\n/Subtype /Link\n"
+    /* this is what Adobe does (it's also more flexible) */
+    "/Rect [ %d %d %d %d ]\n/Border [ 0 0 0 ]\n",
+    /* "/BS << /Type /Border /S /U >>\n" */
+    /* border appearance is "underline" */
+    in_entry->m_ll_x, in_entry->m_ll_y, in_entry->m_ur_x, in_entry->m_ur_y);
+
+  switch (in_entry->m_link_type)
+  {
+    case k_link_source:
+
+      fprintf(in_fp, "/Dest [ ");
+      PDFObject_WriteRef(in_fp, in_entry->m_target->m_page_object_num);
+      switch (in_entry->m_dest_option)
+      {
+	case kFitNoChange:
+
+	  fprintf(in_fp, " /XYZ null null null");
+	  /* NB NO BREAK */
+
+	case kFit:
+
+	  fprintf(in_fp, " /Fit");
+	  break;
+
+
+	case kFitH:
+
+	  /* [ /FitH top ]: fit the width of the page to the window; top    */
+	  /* specifies the y-coordinate of the top edge of the window       */
+	  fprintf(in_fp, " /FitH %u", target->m_ur_y);
+	  break;
+
+
+	case kFitV:
+
+	  /* [ /FitV left ]: fit the height of the page to the window;      */
+	  /* left specifies the x-coordinate of the left edge of the window */
+	  fprintf(in_fp, " /FitV %u", target->m_ll_x);
+	  break;
+
+
+	case kFitR:
+
+	  /* [ /FitR left bottom right top ]: fit the rectangle specified   */
+	  /* by left bottom right top in the window. If the height (top -   */
+	  /* bottom) and width (right - left) imply different zoom factors, */
+	  /* the numerically smaller zoom factor is used, to ensure that    */
+	  /* the specified rectangle fits in the window                     */
+	  fprintf(in_fp, " /FitR %u %u %u %u", target->m_ll_x, target->m_ll_y,
+	    target->m_ur_x, target->m_ur_y);
+	  break;
+
+
+	case kFitB:
+
+	  /* [ /FitB ]: fit the page's bounding box to the window           */
+	  fprintf(in_fp, " /FitB");
+	  break;
+
+
+	case kFitBH:
+
+	  /* [ /FitBH top ]: fit the width of the page's bounding box to    */
+	  /* the window. top specifies the y-coord of top edge of window    */
+	  fprintf(in_fp, " /FitBH %u", target->m_ur_y);
+	  break;
+
+
+	case kFitBV:
+
+	  /* [ /FitBV left ]: fit the height of the page' bounding box to   */
+	  /* the window. left specifies the x-coordinate of the left edge   */
+	  /* of the window                                                  */
+	  fprintf(in_fp, " /FitBV %u", target->m_ll_x);
+	  break;
+
+
+	default:
+
+	  Error(48, 18, "PDFSourceAnnot_Write: invalid link dest option",
+	    FATAL, no_fpos);
+      }
+      fprintf(in_fp, " ]\n");
+      break;
+
+
+    case k_link_external:
+
+#if 1	/* required wrapper for URLs is now in the Lout libraries */
+      fprintf(in_fp, "/A << /Type /Action /S /GoToR /D (%s) /F\n"
+	/* <= split across lines for LONG file specs */
+	"(%s) >>\n", in_entry->m_name, in_entry->m_file_spec);
+#else
+      if (in_entry->m_file_spec[0] != '<')
+      {
+	/* note: destination/target is specified as a string, as is file spec */
+	fprintf(in_fp, "/A << /Type /Action /S /GoToR /D (%s) /F\n"
+	  /* <= split across lines for LONG file specs */
+	  "(%s) >>\n", in_entry->m_name, in_entry->m_file_spec);
+      }
+      else
+      {
+        /* if file spec starts with '<' then URL, eg <http://www.adobe.com> */
+	Assert(in_entry->m_file_spec[strlen((char*) in_entry->m_file_spec)-1]
+	  == '>', no_fpos);
+	fprintf(in_fp, "/A << /Type /Action /S /GoToR /D (%s) /F\n"
+	  /* <= split across lines for LONG file specs */
+	  "<< /FS /URL /F (%s) >> >>\n", in_entry->m_name, in_entry->m_file_spec);
+      }
+#endif
+      break;
+
+
+    case k_link_URI:
+
+      fprintf(in_fp, "/A << /Type /Action /S /URI /URI\n"
+	/* <= split across lines for LONG URI's */
+	"(%s) >>\n", in_entry->m_name);
+      break;
+
+
+    case k_link_target:
+    case k_link_target_for_export:
+    case kNumberOfLinkKeywords:
+
+      break;
+  }
+
+  fprintf(in_fp, ">>\nendobj\n");
+  in_entry->m_written_to_PDF_file = TRUE;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFSourceAnnot_New(FULL_CHAR* in_annot_name)                        */
+/*                                                                           */
+/*  Create an entry in the g_source_annot_list which links to in_annot_name. */
+/*                                                                           */
+/*****************************************************************************/
+
+static t_source_annot_entry_ptr
+PDFSourceAnnot_New(PDF_LINK_KEYWORD in_link_type, FULL_CHAR* in_annot_name,
+  unsigned int in_annot_name_length, int in_ll_x, int in_ll_y, int in_ur_x,
+  int in_ur_y, PDF_LINK_DEST_OPTION in_link_dest_option)
+{
+  t_target_annot_entry_ptr target = NULL;
+  t_source_annot_entry_ptr entry =
+    (t_source_annot_entry_ptr) malloc(sizeof(t_source_annot_entry));
+
+  if (entry == NULL)
+    Error(48, 19, "PDFSourceAnnot_New: run out of memory", FATAL, no_fpos);
+
+  entry->m_ll_x = in_ll_x;
+  entry->m_ll_y = in_ll_y;
+  entry->m_ur_x = in_ur_x;
+  entry->m_ur_y = in_ur_y;
+
+  entry->m_this_object_num = PDFObject_New(/* in_fp */);
+  entry->m_this_page_object_num = g_page_object_num;
+  entry->m_link_type = in_link_type;
+  Assert((in_link_dest_option >= kFitNoChange) &&
+    (in_link_dest_option <= kFitBV), no_fpos);
+  entry->m_dest_option = in_link_dest_option;
+  entry->m_file_spec = NULL;
+  entry->m_written_to_PDF_file = FALSE;
+
+  if (in_link_type == k_link_source)
+    target = PDFTargetAnnot_Find(in_annot_name);
+
+  if (target != NULL)
+  {
+    entry->m_target = target;
+    entry->m_name = NULL;
+  }
+  else
+  {
+    entry->m_target = NULL;	/* fwd link */
+    entry->m_name = (FULL_CHAR*) malloc(in_annot_name_length + 1);
+    if (entry->m_name == NULL)
+      Error(48, 20, "PDFSourceAnnot_New: run out of memory", FATAL, no_fpos);
+    memcpy(entry->m_name, in_annot_name, in_annot_name_length);
+    entry->m_name[in_annot_name_length] = '\0';
+  }
+
+  entry->m_next_entry = g_source_annot_list;
+  g_source_annot_list = entry;
+
+  return entry;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDFSourceAnnot_Dispose(t_source_annot_entry_ptr in_source_annot)         */
+/*                                                                           */
+/*  Dispose of a source annot entry; returns the next entry in the list.     */
+/*                                                                           */
+/*****************************************************************************/
+
+static t_source_annot_entry_ptr
+  PDFSourceAnnot_Dispose(t_source_annot_entry_ptr in_source_annot)
+{
+  t_source_annot_entry_ptr next_entry = in_source_annot->m_next_entry;
+
+  if (in_source_annot->m_name != NULL)
+    free(in_source_annot->m_name);
+  if (in_source_annot->m_file_spec != NULL)
+    free(in_source_annot->m_file_spec);
+  free(in_source_annot);
+  return next_entry;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  float  PDFPage_GetFloat(FULL_CHAR* in_str)                               */
+/*                                                                           */
+/*  Outputs an appropriate PDF string for drawing a graphic element.         */
+/*                                                                           */
+/*****************************************************************************/
+
+static FULL_CHAR *PDFPage_GetFloat(FULL_CHAR* in_str, float* out_value)
+{
+  if (sscanf((char*) in_str, "%f", out_value) == 1)
+  {
+    /* skip (presumed) floating point number: [ ]*[+|-][0-9.]* */
+    while (isspace(*in_str))
+      in_str++;
+    if ( (*in_str == '-') || (*in_str == '+') )
+      in_str++;
+    while (isdigit(*in_str) || (*in_str == '.'))
+      in_str++;
+  }
+  else Error(48, 21, "PDFPage_GetFloat: unable to evaluate number for Lout graphic keyword processing",
+    FATAL, no_fpos);
+  return in_str;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  int PDFKeyword_Find(int in_number_of_array_elements,                     */
+/*    char* in_keyword_array[], FULL_CHAR* in_str)                           */
+/*                                                                           */
+/*  Return index into keyword array if an element matches the given string.  */
+/*  Returns -1 if not found.                                                 */
+/*                                                                           */
+/*****************************************************************************/
+
+static int PDFKeyword_Find(int in_number_of_array_elements,
+  char* in_keyword_array[], FULL_CHAR* in_str)
+{
+  unsigned int i;
+
+  /* look for keyword */
+  for (i = 0; i < in_number_of_array_elements; i++)
+  {
+    unsigned int len = strlen(in_keyword_array[i]);
+
+    if (memcmp(in_keyword_array[i], in_str, len) == 0)
+      break;
+  }
+
+  return (i < in_number_of_array_elements) ? i : -1;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *PDFPage_ProcessGraphicsKeyword(FULL_CHAR* charPtr, int i)     */
+/*                                                                           */
+/*  Processes a link keyword.                                                */
+/*                                                                           */
+/*****************************************************************************/
+
+#if 0	/* this function is no longer used */
+
+static FULL_CHAR *PDFPage_ProcessGraphicsKeyword(FULL_CHAR* charPtr, int i,
+  char** strPtr)
+{
+  float value;
+
+  /* if need be, expand this later to a full blown expression evaluator (ugh) */
+  switch (*charPtr)
+  {
+    case '+':
+
+      Assert(FALSE, no_fpos);
+      charPtr = PDFPage_GetFloat(++charPtr, &value);
+      sprintf(*strPtr, "%.2f", g_graphics_vars[i] + value);
+      break;
+
+
+    case '-':
+
+      Assert(FALSE, no_fpos);
+      charPtr = PDFPage_GetFloat(++charPtr, &value);
+      sprintf(*strPtr, "%.2f", g_graphics_vars[i] - value);
+      break;
+
+
+    case '*':
+
+      Assert(FALSE, no_fpos);
+      charPtr = PDFPage_GetFloat(++charPtr, &value);
+      sprintf(*strPtr, "%.2f", g_graphics_vars[i] * value);
+      break;
+
+
+    case '/':
+
+      Assert(FALSE, no_fpos);
+      charPtr = PDFPage_GetFloat(++charPtr, &value);
+      Assert(value != 0, no_fpos);	/* not great since value is a float... */
+      sprintf(*strPtr, "%.2f", g_graphics_vars[i] / value);
+      break;
+
+
+    default:
+
+      sprintf(*strPtr, "%d", g_graphics_vars[i]);
+      break;
+  }
+  *strPtr += strlen(*strPtr);
+  return charPtr;
+}
+
+#endif
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFPage_ProcessLinkKeyword(void)                                    */
+/*                                                                           */
+/*  Processes a link keyword.                                                */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFPage_ProcessLinkKeyword(void)
+{
+  FULL_CHAR* charPtr = (FULL_CHAR*) g_link;
+  PDF_LINK_KEYWORD keyword = g_link_keyword;
+  unsigned int link_len = 0;
+  FULL_CHAR* link_name = charPtr;
+
+  /* scan for name of link; scan until end of string or until ' __' reached  */
+  /* (scan for name of link; scan until end of string or whitespace reached) */
+#if 1
+
+  FULL_CHAR* parm = NULL;
+  debug1(DPD, D, "PDFPage_ProcessLinkKeyword(g_link = %s", g_link);
+
+  while ((*charPtr != '\0') &&
+    !(isspace(charPtr[0]) && (charPtr[1] == '_') && (charPtr[2] == '_')))
+  {
+    link_len++;
+    charPtr++;
+  }
+
+  if (*charPtr != '\0')
+    parm = ++charPtr;
+
+  while (*charPtr != '\0')
+    charPtr++;
+#else
+  while ((*charPtr != '\0') && ! isspace(*charPtr))
+  {
+    link_len++;
+    charPtr++;
+  }
+#endif
+  if (link_len == 0)
+    Error(48, 22, "PDFPage_ProcessLinkKeyword: empty link-name / URI; ignored.",
+      WARN, no_fpos);
+  else
+  {
+
+    /* see documentaton for @Graphic for the meaning of the x, y parms */
+    /* translate the object's box into PDF's default user space */
+    int ll_x = g_page_h_origin * g_page_h_scale_factor;
+    int ll_y = g_page_v_origin * g_page_v_scale_factor;
+    int ur_x = (g_page_h_origin + g_graphics_vars[k_xsize]) * g_page_h_scale_factor;
+    int ur_y = (g_page_v_origin + g_graphics_vars[k_ysize]) * g_page_v_scale_factor;
+
+    /* remove this block later (it produces debugging output): */
+#if 0
+    {
+      t_tempbuf strz = "PDFPage_ProcessLinkKeyword: ";
+      switch (keyword)
+      {
+	case k_link_source:
+
+	  strcat(strz, "link_source           =");
+	  break;
+
+
+	case k_link_external:
+
+	  strcat(strz, "link_external         =");
+	  break;
+
+
+	case k_link_URI:
+
+	  strcat(strz, "link_URI              =");
+	  break;
+
+
+	case k_link_target:
+
+	  strcat(strz, "link_target           =");
+	  break;
+
+
+	case k_link_target_for_export:
+
+	  strcat(strz, "link_target_for_export=");
+	  break;
+      }
+      strcat(strz, (char*) link_name);
+      fprintf(stderr, "%s", strz);
+      /* Err or(48, 23, strz, WARN, no_fpos); */
+    }
+#endif
+    switch (keyword)
+    {
+      case k_link_source:
+
+	{
+	  int j;
+
+	  /* if there is a dest option specified then get it */
+	  if (parm != NULL)
+	  {
+	    j = PDFKeyword_Find(kNumberOfDestLinkOptions, g_dest_link_options,
+		charPtr);
+	    if (j >= 0)		/* note signed comparison */
+	      charPtr += strlen(g_dest_link_options[j]);
+	    else
+	    {
+	      j = (int) kFitNoChange;	/* default */
+	      /* must consume the rest of the string */
+	      while (*charPtr != '\0')
+		charPtr++;
+	      link_len = charPtr - link_name;
+	    }
+	  }
+	  else
+	    j = (int) kFitNoChange;	/* default */
+
+	  PDFSourceAnnot_New(keyword, link_name, link_len,
+	    ll_x, ll_y, ur_x, ur_y, (PDF_LINK_DEST_OPTION) j);
+	  break;
+	}
+
+
+      case k_link_external:
+      case k_link_URI:
+
+	{
+	  t_source_annot_entry_ptr source;
+	  source = PDFSourceAnnot_New(keyword, link_name, link_len, ll_x,
+	    ll_y, ur_x, ur_y, (PDF_LINK_DEST_OPTION) 0 /* doesn't matter */);
+	  if (keyword == k_link_external)
+	  {
+	    int j;
+
+	    link_len = 0;
+
+	    if (parm != NULL)
+	    {
+	      j = PDFKeyword_Find(1, g_external_file_spec_keyword, parm);
+	      if (j == 0)
+	      {
+		parm += strlen(g_external_file_spec_keyword[0]);
+		link_len = strlen((char*) parm);
+#if 0
+		/* scan for name of file spec; scan until end of string or */
+		/* until whitespace reached                                */
+		link_name = charPtr;
+		while ((*charPtr != '\0') && ! isspace(*charPtr))
+		{
+		  link_len++;
+		  charPtr++;
+		}
+#endif
+	      }
+	    }
+
+	    if (link_len == 0)
+	      Error(48, 24, "PDFPage_ProcessLinkKeyword: empty file spec",
+		FATAL, no_fpos);
+	    else
+	    {
+	      source->m_file_spec = (FULL_CHAR*) malloc(link_len + 1);
+	      if (source->m_file_spec == NULL)
+		Error(48, 25, "PDFPage_ProcessLinkKeyword: out of memory",
+		  FATAL, no_fpos);
+#if 1
+	      strcpy((char*) source->m_file_spec, (char*) parm);
+#else
+	      memcpy(source->m_file_spec, link_name, link_len);
+	      source->m_file_spec[link_len] = '\0';
+#endif
+	    }
+	  }
+	  break;
+	}
+
+
+      case k_link_target:
+      case k_link_target_for_export:
+
+	PDFTargetAnnot_New(link_name, link_len, ll_x, ll_y, ur_x, ur_y,
+	  keyword == k_link_target_for_export);
+	break;
+
+
+      case kNumberOfLinkKeywords:
+	break;
+
+    } /* switch */
+  } /* else */
+
+  debug0(DPD, D, "PDFPage_ProcessLinkKeyword returning");
+  /* return charPtr; */
+} /* PDFPage_ProcessLinkKeyword */
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR* PDFPage_ProcessDocInfoKeyword(FULL_CHAR* charPtr, int i)      */
+/*                                                                           */
+/*  Processes a document info keyword.                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+static FULL_CHAR *PDFPage_ProcessDocInfoKeyword(FULL_CHAR* charPtr, int i)
+{
+  switch (i)
+  {
+    case k_author:
+
+      if (g_doc_author != NULL)
+	free(g_doc_author);
+      g_doc_author = (FULL_CHAR*) malloc(strlen((char*) charPtr) + 1);
+      if (g_doc_author == NULL)
+	Error(48, 26, "PDFPage_ProcessDocInfoKeyword: no memory for __author=",
+	  WARN, no_fpos);
+      else
+	strcpy((char*) g_doc_author, (char*) charPtr);
+      break;
+
+
+    case k_title:
+
+      if (g_doc_title != NULL)
+	free(g_doc_title);
+      g_doc_title = (FULL_CHAR*) malloc(strlen((char*) charPtr) + 1);
+      if (g_doc_title == NULL)
+	Error(48, 27, "PDFPage_ProcessDocInfoKeyword: no memory for __title=",
+	  WARN, no_fpos);
+       else
+	strcpy((char*) g_doc_title, (char*) charPtr);
+      break;
+
+
+    case k_subject:
+
+      if (g_doc_subject != NULL)
+	free(g_doc_subject);
+      g_doc_subject = (FULL_CHAR*) malloc(strlen((char*) charPtr) + 1);
+      if (g_doc_subject == NULL)
+	Error(47, 28, "PDFPage_ProcessDocInfoKeyword: no memory for __subject=",
+	  WARN, no_fpos);
+      else
+	strcpy((char*) g_doc_subject, (char*) charPtr);
+      break;
+
+
+    case k_keywords:
+      if (g_doc_keywords != NULL)
+	free(g_doc_keywords);
+      g_doc_keywords = (FULL_CHAR*) malloc(strlen((char*) charPtr) + 1);
+      if (g_doc_keywords == NULL)
+	Error(48, 29, "PDFPage_ProcessDocInfoKeyword: no memory for __keywords=",
+	  WARN, no_fpos);
+      else
+	strcpy((char*) g_doc_keywords, (char*) charPtr);
+      break;
+
+  }
+  return (charPtr + strlen((char*) charPtr));
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void  PDFPage_EvalExpr(char* inExpr)                                     */
+/*                                                                           */
+/*  Evaluate collected expression in the given expression buffer.            */
+/*                                                                           */
+/*****************************************************************************/
+
+static char *PDFPage_EvalExpr(char* inExpr, float* outValue)
+{
+  int i;
+  char* chp = inExpr;
+
+  while (isspace( (int) *chp))	/* ignore leading white space */
+    chp++;
+
+  while (*chp == '_')
+    chp++;
+
+  while (*chp == '+')	/* ignore unary + */
+    chp++;
+
+  if (isdigit((int) *chp) || (*chp == '.'))
+  {
+    chp = (char*) PDFPage_GetFloat((FULL_CHAR*) chp, outValue);
+  }
+  else if (*chp == '-')	/* handle unary negation */
+  {
+    float val;
+
+    chp = PDFPage_EvalExpr(++chp, &val);
+    *outValue = -val;
+  }
+  else
+  {
+    i = PDFKeyword_Find(kNumberOfArithmeticKeywords,
+	  g_arithmetic_keywords, (FULL_CHAR*) chp);
+    if (i >= 0)
+    {
+      float val1, val2;
+
+      chp += strlen(g_arithmetic_keywords[i]);
+
+      while (isspace( (int) *chp))
+	chp++;
+      if (*chp != '(')
+	Error(48, 30, "PDFPage_EvalExpr: '(' expected", FATAL, no_fpos);
+      chp = PDFPage_EvalExpr(++chp, &val1);
+      if ( (i <= k_div) || (i == k_pick) )
+      {
+	int count;
+
+	if (i == k_pick)
+	{
+	  count = floor(val1);
+	  Assert(count != 0, no_fpos);
+	}
+	else
+	  count = 1;
+
+	if (*chp != ',')
+	  Error(48, 31, "PDFPage_EvalExpr: ',' expected", FATAL, no_fpos);
+
+	do {
+	  chp = PDFPage_EvalExpr(++chp, &val2);
+	  if ((count != 1) && (*chp == ','))
+	    ++chp;
+	} while (--count != 0);
+      }
+      if (*chp != ')')
+	Error(48, 32, "PDFPage_EvalExpr: ')' expected", FATAL, no_fpos);
+      ++chp;
+      switch (i)
+      {
+
+	case k_add:
+	  *outValue = val1 + val2;
+	  break;
+
+
+	case k_sub:
+
+	  *outValue = val1 - val2;
+	  break;
+
+
+	case k_mul:
+
+	  *outValue = val1 * val2;
+	  break;
+
+
+	case k_div:
+
+	  Assert(val2 != 0, no_fpos); /* not great since value is a float... */
+	  *outValue = val1 / val2;
+	  break;
+
+
+	case k_sin:
+
+	  *outValue = sin((double) val1 * (double) PI / (double) 180.0);
+	  break;
+
+
+	case k_cos:
+
+	  *outValue = cos((double) val1 * (double) PI / (double) 180.0);
+	  break;
+
+
+	case k_pick:
+
+	  *outValue = val2;
+	  break;
+      }
+    }
+    else
+    {
+      i = PDFKeyword_Find(kNumberOfGraphicsKeywords, g_graphic_keywords,
+	    (FULL_CHAR*) chp);
+      if (i >= 0)
+      {
+	chp += strlen(g_graphic_keywords[i]);
+	*outValue = g_graphics_vars[i];
+      }
+      else
+      {
+	i = PDFKeyword_Find(kNumberOfUnitKeywords, g_unit_keywords, (FULL_CHAR*) chp);
+	if (i >= 0)
+	{
+	  chp += strlen(g_unit_keywords[i]);
+	  *outValue = g_units[i];
+	}
+	else
+	{
+	  Error(48, 33, "PDFPage_EvalExpr: __add, __sub, __mul, __div, or a unit keyword was expected",
+	    FATAL, no_fpos);
+	}
+      }
+    }
+  }
+  return chp;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *PDFPage_CollectExpr(FULL_CHAR* charPtr)                       */
+/*                                                                           */
+/*  Collect expression into the expression buffer.                           */
+/*                                                                           */
+/*****************************************************************************/
+
+static FULL_CHAR *PDFPage_CollectExpr(FULL_CHAR* charPtr, BOOLEAN* outHasResult,
+  float* outResult)
+{
+  *outHasResult = FALSE;
+  while (*charPtr != 0)
+  {
+    char ch;
+
+    if ( g_expr_index >= sizeof(g_expr) )
+      Error(48, 34, "PDFPage_CollectExpr: expression too long (max. 512 chars)",
+	FATAL, no_fpos);
+
+    g_expr[g_expr_index++] = ch = *charPtr++;
+    if (ch == '(')
+      g_expr_depth++;
+    else if (ch == ')')
+    {
+      Assert(g_expr_depth != 0, no_fpos);
+      g_expr_depth--;
+      if (g_expr_depth == 0)
+      {
+	g_expr[g_expr_index] = '\0';	/* terminate the string */
+	(char*) PDFPage_EvalExpr(g_expr, outResult);
+	*outHasResult = TRUE;
+	break;	/* exit while */
+      }
+    }
+  }
+  return charPtr;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  FULL_CHAR *PDFPage_CollectLink(FULL_CHAR* charPtr)                       */
+/*                                                                           */
+/*  Collect link into the link buffer.                                       */
+/*                                                                           */
+/*****************************************************************************/
+
+static FULL_CHAR *PDFPage_CollectLink(FULL_CHAR* charPtr
+  /*, BOOLEAN* outHasResult, float* outResult*/)
+{
+  debug1(DPD, D, "PDFPage_CollectLink(\"%s\")", charPtr);
+  while (*charPtr != 0)
+  {
+    char ch;
+
+    if ( g_link_index >= sizeof(g_link) )
+      Error(48, 35, "PDFPage_CollectLink: link too long (max. 512 chars)",
+	FATAL, no_fpos);
+
+    g_link[g_link_index++] = ch = *charPtr++;
+    if ((ch == '<') && (*charPtr == '<'))
+    {
+      g_link[g_link_index++] = *charPtr++;
+      g_link_depth++;
+    }
+    else if ((ch == '>') && (*charPtr == '>'))
+    {
+      Assert(g_link_depth != 0, no_fpos);
+
+      g_link_depth--;
+      if (g_link_depth == 0)
+      {
+	/* I don't want the outermost '<<' '>>' pair */
+	g_link[--g_link_index] = '\0';	/* terminate the string */
+
+	PDFPage_ProcessLinkKeyword();
+
+	charPtr++;
+	break;	/* exit while */
+      }
+      else
+	g_link[g_link_index++] = *charPtr++;
+    }
+  }
+  debug0(DPD, D, "PDFPage_CollectLink returning");
+  return charPtr;
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFPage_WriteGraphic(FILE* in_fp, FULL_CHAR* in_str)                */
+/*                                                                           */
+/*  Outputs an appropriate PDF string for drawing a graphic element.         */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFPage_WriteGraphic(FILE* in_fp, FULL_CHAR* in_str)
+{
+  t_tempbuf str;
+
+  FULL_CHAR *charPtr = in_str;
+  char *strPtr = str;
+
+  if (*charPtr == 0)
+    return;
+
+  /* if in collecting an expression mode then collect until terminating ')' */
+  if (g_expr_depth != 0)
+  {
+    BOOLEAN hasResult;
+    float value;
+
+    charPtr = PDFPage_CollectExpr(charPtr, &hasResult, &value);
+    if (hasResult)
+    {
+      sprintf(strPtr, "%.2f", value);
+      strPtr += strlen(strPtr);
+    }
+  }
+
+  /* if in collecting-a-link mode then collect until terminating '>>'        */
+  if (g_link_depth != 0)
+    charPtr = PDFPage_CollectLink(charPtr);
+
+  /* scan the string for '__' otherwise output it */
+  while (*charPtr != 0)
+  {
+    int i;
+    float value;
+
+    Assert(strPtr < (str + sizeof(t_tempbuf)), no_fpos);
+
+    /* look for "__" (double underline) */
+    if ( (charPtr[0] == '_') && (charPtr[1] == '_') )
+    {
+      charPtr += 2;
+
+      /* "in", "cm", "pt", "em", "loutf", "loutv", "louts" */
+#if 0
+      i = PDFKeyword_Find(kNumberOfUnitKeywords, g_unit_keywords, charPtr);
+      if (i >= 0)
+      {
+	Assert(FALSE, no_fpos);
+	charPtr += strlen(g_unit_keywords[i]);	/* skip keyword */
+	charPtr = PDFPage_GetFloat(charPtr, &value); /* get value */
+	sprintf(strPtr, "%.2f", g_units[i] * value); /* output it */
+	strPtr += strlen(strPtr);
+      }
+      else
+#endif
+      {
+
+	/* "xsize", "ysize", "xmark", "ymark" */
+	i = PDFKeyword_Find(kNumberOfGraphicsKeywords, g_graphic_keywords, charPtr);
+	if (i >= 0)
+	{
+	  charPtr += strlen(g_graphic_keywords[i]);
+#if 1
+	  sprintf(strPtr, "%d", g_graphics_vars[i]);
+	  strPtr += strlen(strPtr);
+#else
+	  charPtr = PDFPage_ProcessGraphicsKeyword(charPtr, i, &strPtr);
+#endif
+	}
+	else
+	{
+	  /* "link_source=<<", "link_target=<<", "link_target_for_export=<<", "link_URI=<<" */
+	  i = PDFKeyword_Find(kNumberOfLinkKeywords, g_link_keywords, charPtr);
+	  if (i >= 0)
+	  {
+	    charPtr += strlen(g_link_keywords[i]);
+#if 1
+	    while (isspace(*charPtr))
+	      charPtr++;
+
+	    g_link_index = 0;
+	    g_link_depth++;
+	    g_link_keyword = (PDF_LINK_KEYWORD) i;
+	    charPtr = PDFPage_CollectLink(charPtr);
+#else
+	    charPtr = PDFPage_ProcessLinkKeyword(charPtr, (PDF_LINK_KEYWORD) i);
+#endif
+	  } /* if */
+	  else
+	  {
+
+	    /* "author=", "title=", "subject=", "keywords=" */
+	    i = PDFKeyword_Find(kNumberOfDocInfoKeywords, g_doc_info_keywords, charPtr);
+	    if (i >= 0)
+	    {
+	      charPtr += strlen(g_doc_info_keywords[i]);
+	      charPtr = PDFPage_ProcessDocInfoKeyword(charPtr, i);
+	    }
+	    else
+	    {
+
+	      /* "add" "sub" "mul" "div", "sin", "cos" */
+	      i = PDFKeyword_Find(kNumberOfArithmeticKeywords, g_arithmetic_keywords, charPtr);
+	      if (i >= 0)
+	      {
+		strcpy(g_expr, g_arithmetic_keywords[i]);
+		charPtr += strlen(g_arithmetic_keywords[i]);
+		while (isspace(*charPtr))
+		  charPtr++;
+		if (*charPtr != '(')
+		  Error(48, 36, "PDFPage_WriteGraphic: '(' expected", FATAL, no_fpos);
+
+		strcat(g_expr, "(");
+		g_expr_index = strlen(g_expr);
+		g_expr_depth++;
+		{
+		  BOOLEAN hasResult;
+
+		  charPtr = PDFPage_CollectExpr(++charPtr, &hasResult, &value);
+		  if (hasResult)
+		  {
+		    sprintf(strPtr, "%.2f", value);
+		    strPtr += strlen(strPtr);
+		  }
+		}
+	      }
+	      else
+	      {
+		/* alert user in case there was a spelling mistake */
+		Error(48, 37, "PDFPage_WriteGraphic: '__' encountered while processing @Graphic", WARN, no_fpos);
+		*strPtr++ = '_';
+		*strPtr++ = '_';
+	      } /* else */
+	    } /* else */
+	  } /* else */
+	} /* else */
+      } /* else */
+    } /* if */
+    else
+    {
+      *strPtr++ = *charPtr++;
+    }
+  }
+
+  *strPtr = 0;
+
+  PDFPage_FlushBuffer(in_fp);	/* this is a marking operation, so flush */
+  PDFPage_Write(in_fp, str);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/* PDFPage_PrintUnderline(FILE* in_fp, int x1, int x2, int y, int thickness) */
+/*                                                                           */
+/*  Implements underlining (just draws a horizontal line).                   */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFPage_PrintUnderline(FILE* in_fp, int in_x1, int in_x2, int in_y,
+  int in_thickness)
+{
+  t_tempbuf str;
+
+  /* this is a marking operation, so flush and turn off buffering */
+  PDFPage_FlushBuffer(in_fp);
+
+  /* fprintf(out_fp, "/ul { gsave setlinewidth dup 3 1 roll\n"); */
+  /* fprintf(out_fp, "      moveto lineto stroke grestore } bind def\n");  */
+
+  sprintf(str, "q %d w %d %d m %d %d l s Q\n",in_thickness,in_x1,in_y,in_x2,in_y);
+  PDFPage_Write(in_fp, str);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFPage_Init(FILE* in_fp, float in_scale_factor, int in_line_width) */
+/*                                                                           */
+/*  Inits the vars for the start of processing a new page.                   */
+/*                                                                           */
+/*  [ 0 1 2 ]               [ s 0 0 ]                                        */
+/*  [ 3 4 5 ]       =       [ 0 s 0 ]                                        */
+/*  [ 6 7 8 ]               [ 0 0 1 ]                                        */
+/*                                                                           */
+/*****************************************************************************/
+
+void  PDFPage_Init(FILE* in_fp, float in_scale_factor, int in_line_width)
+{
+
+#ifdef USE_MATRICES
+  g_cur_matrix[0] = g_cur_matrix[4] = in_scale_factor;
+  g_cur_matrix[1] = g_cur_matrix[2] = g_cur_matrix[3] =
+  g_cur_matrix[5] = g_cur_matrix[6] = g_cur_matrix[7] = 0;
+  g_cur_matrix[8] = 1;
+  g_matrix_stack = NULL;
+#endif
+
+  /* clear/init page vars */
+  g_page_uses_fonts = FALSE;
+  g_page_has_text  = FALSE;
+  g_page_has_graphics = FALSE;
+
+  g_page_contents_obj_num = 0; /* undefined */
+  g_page_length_obj_num = 0; /* undefined */
+  g_page_start_offset = 0; /* undefined */
+  /* g_text_font_size_in_ems = 0; */ /* undefined */
+
+  g_page_h_scale_factor = g_page_v_scale_factor = in_scale_factor;
+  g_page_h_origin = g_page_v_origin = 0;
+  g_page_line_width = in_line_width;
+
+  /* ***
+  g_graphics_vars[k_in] = IN;
+  g_graphics_vars[k_cm] = CM;
+  g_graphics_vars[k_pt] = PT;
+  g_graphics_vars[k_em] = EM;
+  *** */
+  g_graphics_vars[k_xsize] = 0; /* undefined */
+  g_graphics_vars[k_ysize] = 0; /* undefined */
+  g_graphics_vars[k_xmark] = 0; /* undefined */
+  g_graphics_vars[k_ymark] = 0; /* undefined */
+  /* ***
+  g_graphics_vars[k_loutf] = 0;
+  g_graphics_vars[k_loutv] = 0;
+  g_graphics_vars[k_louts] = 0;
+  *** */
+
+  /* No need to touch k_in other constant units */
+  g_units[k_loutf] = 0; /* undefined */
+  g_units[k_loutv] = 0; /* undefined */
+  g_units[k_louts] = 0; /* undefined */
+
+  g_ET_pending = FALSE;
+  g_TJ_pending = FALSE;
+  g_valid_text_matrix = FALSE;	/* Td is not allowed */
+
+  /* mark all fonts "not in use" */
+  {
+    t_font_list_entry_ptr entry = g_font_list;
+    while (entry != NULL) {
+      entry->m_in_use = FALSE;	/* set the "in use" state to "not in use" */
+      entry = entry->m_next_font_entry;
+    }
+  }
+
+  /* init qsave stack */
+  g_qsave_stack = NULL;
+
+  /* init qsave_marking stack */
+  g_qsave_marking_stack = NULL;
+  g_buffer_pos   = 0;
+  /* buffer contains empty string */
+  g_buffer[0]    = '\0';
+  /* try to chop entire stream if possible! Originally: FALSE; */
+  /* turn on buffering only AFTER a save request */
+  g_in_buffering_mode  = FALSE;
+  /* try to chop entire stream if possible! Originally: FALSE; */
+  /* turn on buffering only AFTER a save request */
+  g_in_buffering_mode  = TRUE;
+
+  /* bump page number */
+  ++g_page_count;
+  g_page_object_num  = PDFObject_New(/* in_fp */);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFPage_Cleanup(FILE* in_fp)                                        */
+/*                                                                           */
+/*  Cleans up the processing after a page's contents have been written out.  */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFPage_Cleanup(FILE* in_fp)
+{
+  BOOLEAN hasAnnot = FALSE;
+
+  Assert(g_qsave_stack == NULL, no_fpos);
+
+  /* if page has some content then close its stream object */
+  if (g_page_contents_obj_num != 0)
+  {
+    PDF_FILE_OFFSET page_length = PDFPage_End(in_fp);
+
+#ifdef _CALC_LARGEST_PAGE_OBJECT_
+    if (page_length > g_max_page_length)
+      g_max_page_length = page_length;
+#endif
+
+    /* write page's length object */
+    if (g_PDF_debug)
+      fprintf(in_fp, "%%\n%% length object for page %u:\n%%\n", g_page_count);
+
+    PDFObject_WriteObj(in_fp, g_page_length_obj_num);
+    fprintf(in_fp, "%u\nendobj\n", page_length);
+
+    /* write out any used font resources */
+    {
+      t_font_list_entry_ptr entry = g_font_list;
+      while (entry != NULL) {
+	PDFFont_WriteFontResource(in_fp, entry);
+	entry = entry->m_next_font_entry;
+      }
+    }
+  }
+
+  /* write out annotations */
+  {
+    t_source_annot_entry_ptr source = g_source_annot_list;
+
+    while (source != NULL)
+    {
+      if (source->m_this_page_object_num == g_page_object_num)
+      {
+
+	/* even if the annotation(s) cannot be written out now, flag the */
+	/* fact that this page has annotations                           */
+	hasAnnot = TRUE;
+
+	/* attempt to write out annotation */
+	PDFSourceAnnot_Write(in_fp, source);
+      } /* if annot entry belongs to this page */
+      source = source->m_next_entry;
+    } /* while */
+  }
+
+  /* start writing page object ("/Type /Page"); remember its number */
+  {
+    unsigned int wanted_block_num = (g_page_count - 1) / kNumberOfPagesPerBlock;
+    unsigned int block_pos = (g_page_count - 1) % kNumberOfPagesPerBlock;
+    t_page_block_ptr the_block = g_cur_page_block;
+
+    /* if first obj in a block then allocate the block */
+    if (block_pos == 0)
+    {
+      the_block = (t_page_block_ptr) malloc(sizeof(t_page_block));
+      if (the_block == NULL)
+        Error(48, 38, "PDFPage_Cleanup: run out of memory", FATAL, no_fpos);
+      if (wanted_block_num == 0)	/* if first block in file */
+      {
+	Assert(g_page_block_list == NULL, no_fpos);
+	g_page_block_list = the_block;
+      }
+      else
+      {
+	Assert(g_cur_page_block != NULL, no_fpos);
+	g_cur_page_block->m_next_block = the_block;
+      }
+      the_block->m_next_block = NULL;	/* don't forget to init this! */
+      g_cur_page_block = the_block;
+    }
+    else
+    {
+      Assert(the_block != NULL, no_fpos);
+    }
+
+    /* save object number of this page for later use in the /Pages list */
+    if (g_PDF_debug)
+      fprintf(in_fp, "%%\n%% page number %u:\n%%\n", g_page_count);
+    the_block->m_block[block_pos] = g_page_object_num;
+    PDFObject_WriteObj(in_fp, g_page_object_num);
+    /* PDFObject_WriteNewObj(in_fp); */
+  }
+
+  /* write out /Page ID */
+  fputs("<<\n/Type /Page\n", in_fp);
+
+  /* write out page size and orientation */
+  fprintf(in_fp, "/CropBox [ 0 0 %u %u ]\n",g_doc_h_bound,g_doc_v_bound);
+
+  /* write out parent object ref */
+  fputs("/Parent ", in_fp);
+  PDFObject_WriteRef(in_fp, g_pages_root);
+  fputs("\n", in_fp);
+
+  /* write out contents object ref (if it exists) */
+  if (g_page_contents_obj_num != 0)
+  {
+    fputs("/Contents ", in_fp);
+    PDFObject_WriteRef(in_fp, g_page_contents_obj_num);
+    fputs("\n", in_fp);
+  }
+
+  /* open resources dictionary */
+  if (g_page_uses_fonts || g_page_has_text || g_page_has_graphics)
+    fputs("/Resources\n<<\n", in_fp);
+
+  /* write out font resources used */
+  if (g_page_uses_fonts)
+  {
+    t_font_list_entry_ptr entry = g_font_list;
+    fputs("/Font <<", in_fp);
+    while (entry != NULL) {
+      if (entry->m_in_use) {
+	fprintf(in_fp, " %s ", entry->m_PDF_font_name);
+	PDFFont_WriteObjectRef(in_fp, entry);
+      }
+      entry = entry->m_next_font_entry;
+    }
+    fputs(" >>\n", in_fp);
+  }
+
+  /* write out any procsets used */
+  if (g_page_has_text || g_page_has_graphics)
+  {
+    fputs("/ProcSet [ /PDF", in_fp);
+    if (g_page_has_text)
+      fputs(" /Text", in_fp);
+    fputs(" ]\n", in_fp);
+  }
+
+  /* close resources dictionary */
+  if (g_page_uses_fonts || g_page_has_text || g_page_has_graphics)
+    fputs(">>\n", in_fp);
+
+  /* write out annot array */
+  if (hasAnnot)
+  {
+    t_source_annot_entry_ptr entry = g_source_annot_list;
+    t_source_annot_entry_ptr previous_entry = NULL;
+
+    /* write out annotations */
+    fputs("/Annots [", in_fp);
+    while (entry != NULL)
+    {
+      if (entry->m_this_page_object_num == g_page_object_num)
+      {
+	fputs(" ", in_fp);
+	PDFObject_WriteRef(in_fp, entry->m_this_object_num);
+
+	/* if the annotation has just been written out above then delete it */
+	if (entry->m_written_to_PDF_file)
+	{
+	  t_source_annot_entry_ptr next_entry = entry->m_next_entry;
+	  if (g_source_annot_list == entry)
+		g_source_annot_list = next_entry;
+	  if (previous_entry != NULL)
+		previous_entry->m_next_entry = next_entry;
+	  PDFSourceAnnot_Dispose(entry);
+	  entry = next_entry;
+	}
+	else /* annot is a fwd referring one: defer deleting it */
+	{
+	  previous_entry = entry;
+	  entry = entry->m_next_entry;
+	}
+      } /* if annot entry belongs to this page */
+      else /* annot does not belong to this page; skip it */
+      {
+	previous_entry = entry;
+	entry = entry->m_next_entry;
+      }
+    } /* while */
+    fputs(" ]\n", in_fp);
+  } /* if */
+
+  /* close object */
+  fputs(">>\nendobj\n", in_fp);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFFile_Init(FILE* in_fp, int in_h_bound, int in_v_bound)           */
+/*                                                                           */
+/*  Initialize this module.                                                  */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFFile_Init(FILE* in_fp, int in_h_bound, int in_v_bound,
+  int in_IN, int in_CM, int in_PT, int in_EM)
+{
+  /* write PDF header */
+  fputs("%PDF-1.2\n", in_fp);			/* identifies this as PDF   */
+  fputs("\045\342\343\317\323\n", in_fp);	/* 0x25 0xE2 0xE3 0xCF 0xD3 */
+
+  /* set debugging status */
+#if DEBUG_ON
+  g_PDF_debug = dbg[DPD].on[D] || dbg[DPD].on[DD] || dbg[DPD].on[DDD];
+#else
+  g_PDF_debug = FALSE;
+#endif
+
+#if PDF_COMPRESSION
+  g_apply_compression = !g_PDF_debug;
+#endif
+
+  /* objects */
+  g_next_objnum = 1; /* object numbers start at one */
+  g_obj_offset_list = NULL;
+  g_cur_obj_offset_block = NULL;
+
+  /* fonts */
+  g_font_list = NULL;
+  g_font_encoding_list = NULL;
+
+  /* pages */
+  g_page_count = 0;
+  g_page_block_list = NULL;
+  g_cur_page_block = NULL;
+  g_pages_root = PDFObject_New(/* in_fp */);
+
+  /* doc */
+  g_doc_h_bound = in_h_bound;
+  g_doc_v_bound = in_v_bound;
+  g_doc_author = NULL;
+  g_doc_title = NULL;
+  g_doc_subject = NULL;
+  g_doc_keywords = NULL;
+
+  /* link annotations */
+  g_target_annot_list = NULL;
+  g_has_exported_targets = FALSE;
+  g_source_annot_list = NULL;
+
+  /* units */
+  g_units[k_in] = in_IN;
+  g_units[k_cm] = in_CM;
+  g_units[k_pt] = in_PT;
+  g_units[k_em] = in_EM;
+
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFFile_WritePagesObject(FILE* in_fp)                               */
+/*                                                                           */
+/*  Cleans up processing after all pages has been written out.               */
+/*                                                                           */
+/*****************************************************************************/
+
+static void PDFFile_WritePagesObject(FILE* in_fp)
+{
+  unsigned int  i;
+  t_page_block_ptr the_block  = g_page_block_list;
+
+  if (g_PDF_debug)
+    fprintf(in_fp, "%%\n%% root of pages tree:\n%%\n");
+
+  /* write out the root of the Pages tree */
+  PDFObject_WriteObj(in_fp, g_pages_root);
+  fputs("<<\n", in_fp);
+  fputs("/Type /Pages\n", in_fp);
+  fputs("/Kids [ ", in_fp);
+  for (i = 0; i < g_page_count; i++)
+  {
+    int block_pos = i % kNumberOfPagesPerBlock;
+    PDFObject_WriteRef(in_fp, the_block->m_block[block_pos]);
+    if (block_pos == (kNumberOfPagesPerBlock - 1))
+    {
+      the_block = the_block->m_next_block;
+      /* Assert(the_block != NULL, no_fpos);  not always true! */
+    }
+    fputs(" ", in_fp);
+  }
+  fprintf(in_fp, " ]\n/Count %u\n", g_page_count);
+  /* ***
+  fprintf(in_fp, "/MediaBox [ 0 0 612 792 ]\n");
+  fprintf(in_fp, "/MediaBox [ 0 0 %u %u ]\n",g_doc_h_bound,g_doc_v_bound);
+  *** */
+  fprintf(in_fp, "/MediaBox [ 0 0 %u %u ]\n", g_doc_h_bound, g_doc_v_bound);
+  fputs(">>\nendobj\n", in_fp);
+}
+
+
+/*****************************************************************************/
+/*                                                                           */
+/*  PDF_FILE_OFFSET PDFFile_WriteXREF(FILE* in_fp)                           */
+/*                                                                           */
+/*  Writes out the XREF table.                                               */
+/*                                                                           */
+/*****************************************************************************/
+
+static PDF_FILE_OFFSET PDFFile_WriteXREF(FILE* in_fp)
+{
+  int i;
+  PDF_FILE_OFFSET xref_start;
+  t_offset_block_ptr the_block = g_obj_offset_list;
+
+  if (g_PDF_debug)
+    fprintf(in_fp, "%%\n%% xref table:\n%%\n");
+
+  xref_start = ftell(in_fp);
+  fputs("xref\n", in_fp);
+  fprintf(in_fp, "0 %u\n", g_next_objnum);
+  fputs("0000000000 65535 f \n", in_fp);	/* object 0 is a deleted obj */
+  Assert( (g_next_objnum == 1) || (the_block != NULL), no_fpos);
+  for (i = 1; i < g_next_objnum; i++)	/* write out list of object offsets */
+  {
+    int block_pos = (i - 1) % kNumberOfObjectsPerBlock;
+
+    /* always write an entry (even if the object doesn't exist) */
+    fprintf(in_fp, "%010u 00000 n \n", the_block->m_block[block_pos]);
+
+    if (the_block->m_block[block_pos] == 0)
+    {
+      t_tempbuf str;
+
+      strcpy(str, "PDFFile_WriteXREF: undefined object number: ");
+      sprintf(str + strlen(str), "%u", i);
+      Error(48, 39, "%s", WARN, no_fpos, str);
+    }
+
+    if (block_pos == (kNumberOfObjectsPerBlock - 1))
+    {
+      the_block = the_block->m_next_block;
+      /* Assert(the_block != NULL, no_fpos);  not always true! */
+    }
+  }
+  return xref_start;
+}
+
+/*****************************************************************************/
+/*                                                                           */
+/*  void PDFFile_Cleanup(FILE* in_fp)                                        */
+/*                                                                           */
+/*  Cleans up processing after all pages has been written out.               */
+/*                                                                           */
+/*****************************************************************************/
+
+void PDFFile_Cleanup(FILE* in_fp)
+{
+  PDF_FILE_OFFSET xref_start;	/* file offset of start of xref table */
+  PDF_OBJECT_NUM catalog_obj_num;
+  PDF_OBJECT_NUM info_obj_num;
+  PDF_OBJECT_NUM dests_obj_num;
+
+  /* write out any unresolved link annotations.  This could be done earlier  */
+  /* (in fact, it can be done as each new target is defined) but I've        */
+  /* arbitrarily decided to do it here.                                      */
+  {
+    t_source_annot_entry_ptr source = g_source_annot_list;
+
+    while (source != NULL)
+    {
+      t_target_annot_entry_ptr target;
+
+      Assert(source->m_target == NULL, no_fpos);
+      target = PDFTargetAnnot_Find(source->m_name);
+      if (target != NULL)
+      {
+	source->m_target = target;
+	PDFSourceAnnot_Write(in_fp, source);
+      }
+      source = source->m_next_entry;
+    }
+  }
+
+  /* write out pages object */
+  PDFFile_WritePagesObject(in_fp);
+
+  /* if file has exported targets for links then write out /Dests dictionary */
+  if (g_has_exported_targets)
+  {
+    t_target_annot_entry_ptr entry = g_target_annot_list;
+
+    Assert(entry != NULL, no_fpos);	/* should be at least an entry! */
+
+    /* write PDF 1.1 style /Dests dictionary */
+    if (g_PDF_debug)
+      fprintf(in_fp, "%%\n%% /Dests dictionary (exported links):\n%%\n");
+
+    dests_obj_num = PDFObject_WriteNewObj(in_fp);
+    fputs("<<\n", in_fp);
+
+    while (entry != NULL)
+    {
+      if (entry->m_for_export)
+      {
+	fprintf(in_fp, "/%s [ ", entry->m_name);
+	PDFObject_WriteRef(in_fp, entry->m_page_object_num);
+	fprintf(in_fp, " /XYZ null null null ]\n");
+      }
+      entry = entry->m_next_entry;
+    }
+    fputs(">>\nendobj\n", in_fp);
+  }
+
+  /* write out catalog object */
+  if (g_PDF_debug)
+    fprintf(in_fp, "%%\n%% catalog:\n%%\n");
+
+  catalog_obj_num = PDFObject_WriteNewObj(in_fp);
+  fputs("<<\n", in_fp);
+  fputs("/Type /Catalog\n", in_fp);
+  fputs("/Pages ", in_fp);
+  PDFObject_WriteRef(in_fp, g_pages_root);
+  fputs("\n", in_fp);
+
+  /* if file has exported targets for links then write out a /Dest dictionary */
+  if (g_has_exported_targets)
+  {
+    fputs("/Dests ", in_fp);
+    PDFObject_WriteRef(in_fp, dests_obj_num);
+    fputs("\n", in_fp);
+  }
+
+  /* ***
+  fputs("/PageMode ", in_fp);
+  switch ()
+  {
+  }
+  fputs("\n", in_fp);
+  *** */
+
+  fputs(">>\nendobj\n", in_fp);
+
+  /* write out info object */
+  if (g_PDF_debug)
+    fprintf(in_fp, "%%\n%% Info object:\n%%\n");
+
+  /* ***
+  Author string (Optional) The name of the person who created the document.
+  CreationDate Date (Optional) The date the document was created.
+  ModDate Date (Optional) The date the document was last modified.
+  Creator string (Optional) If the document was converted into a PDF document from another
+  form, this is the name of the application that created the original document.
+  Producer string (Optional) The name of the application that converted the document from its native
+  format to PDF.
+  Title string (Optional) The documentÕs title.
+  Subject string (Optional) The subject of the document.
+  Keywords string (Optional) Keywords associated with the document.
+
+  example:
+
+  /Creator (Adobe Illustrator)
+  /CreationDate (D:19930204080603-08'00')
+  /Author (Werner Heisenberg)
+  /Producer (Acrobat Network Distiller 1.0 for Macintosh)
+  *** */
+
+  info_obj_num = PDFObject_WriteNewObj(in_fp);
+  fputs("<<\n", in_fp);
+
+  fprintf(in_fp, "/Creator (%s)\n", LOUT_VERSION);
+  fprintf(in_fp, "/Producer (%s)\n", LOUT_VERSION);
+
+  {
+    time_t now;
+    struct tm *date;
+
+    /* I will presume that localtime() is Y2K compliant.  If it isn't    */
+    /* on your system, feel free to tweak this code. :-)                 */
+
+    now = time( NULL );
+    date = localtime( &now );
+    fprintf(in_fp, "/CreationDate (D:%.4d%.2d%.2d%.2d%.2d%.2d)\n",
+      date->tm_year + 1900, date->tm_mon + 1, date->tm_mday,
+      date->tm_hour, date->tm_min, date->tm_sec);
+  }
+
+  if (g_doc_author != NULL)
+    fprintf(in_fp, "/Author (%s)\n", g_doc_author);
+
+  if (g_doc_title != NULL)
+    fprintf(in_fp, "/Title (%s)\n", g_doc_title);
+
+  if (g_doc_subject != NULL)
+    fprintf(in_fp, "/Subject (%s)\n", g_doc_subject);
+
+  if (g_doc_keywords != NULL)
+    fprintf(in_fp, "/Keywords (%s)\n", g_doc_keywords);
+
+  fputs(">>\nendobj\n", in_fp);
+
+  /* write out xref table */
+  xref_start = PDFFile_WriteXREF(in_fp);
+
+  /* write out trailer */
+  /* *** uwe: comments can appear in the body only.
+  if (g_PDF_debug)
+    fprintf(in_fp, "%%\n%% trailer:\n%%\n");
+  *** */
+
+  fputs("trailer\n<<\n", in_fp);
+  fprintf(in_fp, "/Size %u\n", g_next_objnum);
+  fputs("/Root ", in_fp);
+  PDFObject_WriteRef(in_fp, catalog_obj_num);
+  fputs("\n/Info ", in_fp);
+  PDFObject_WriteRef(in_fp, info_obj_num);
+
+  fprintf(in_fp, " >>\nstartxref\n%u\n", xref_start);
+  fputs("%%EOF\n", in_fp);
+
+  /* memory deallocation (no need to dispose of the qsave_marking_stack  */
+  /* because it's always empty after a page has been processed)          */
+
+  while (g_obj_offset_list != NULL)
+  {
+    t_offset_block_ptr the_block = g_obj_offset_list;
+    g_obj_offset_list = the_block->m_next_block;
+    free(the_block);
+  }
+
+  while (g_font_encoding_list != NULL)
+  {
+    t_font_encoding_entry_ptr the_block = g_font_encoding_list;
+    g_font_encoding_list = the_block->m_next_entry;
+    free(the_block->m_font_encoding);
+    free(the_block);
+  }
+
+  while (g_font_list != NULL)
+  {
+    t_font_list_entry_ptr the_block = g_font_list;
+    g_font_list = the_block->m_next_font_entry;
+    free(the_block->m_PDF_font_name);
+    free(the_block->m_short_font_name);
+    free(the_block->m_actual_font_name);
+    free(the_block);
+  }
+
+  while (g_page_block_list != NULL)
+  {
+    t_page_block_ptr the_block = g_page_block_list;
+    g_page_block_list = the_block->m_next_block;
+    free(the_block);
+  }
+
+  while (g_source_annot_list != NULL)
+  {
+    t_source_annot_entry_ptr entry = g_source_annot_list;
+
+    if (entry->m_target == NULL)
+    {
+      t_tempbuf str;
+      strcpy(str, "PDFFile_Cleanup: unresolved link annotation named ");
+      strcat(str, (char*) entry->m_name);
+      Error(48, 40, "%s", WARN, no_fpos, str);
+    }
+
+    g_source_annot_list = PDFSourceAnnot_Dispose(entry);
+  }
+
+  while (g_target_annot_list != NULL)
+  {
+    t_target_annot_entry_ptr entry = g_target_annot_list;
+    g_target_annot_list = entry->m_next_entry;
+    free(entry->m_name);
+    free(entry);
+  }
+
+#ifdef _CALC_LARGEST_PAGE_OBJECT_
+  /* display largest page object */
+  {
+    t_tempbuf str;
+    /* JK sprintf(str, "The largest page object is %u bytes long.", g_max_page_length); */
+    Error(48, 41, "The largest page object is %u bytes long.", WARN, no_fpos, g_max_page_length);
+  }
+#endif
+}